player/player.c

   1 #include <glib-object.h>
   2 #include <libchimara/chimara-glk.h>
   3 #include <libchimara/chimara-if.h>
   4 #include "player.h"
   5 #include "error.h"
   6
   7 typedef struct _ChimaraPlayerPrivate {
   8         int dummy;
   9 } ChimaraPlayerPrivate;
  10
  11 #define CHIMARA_PLAYER_PRIVATE(o) (G_TYPE_INSTANCE_GET_PRIVATE((o), CHIMARA_TYPE_PLAYER, ChimaraPlayerPrivate))
  12 #define CHIMARA_PLAYER_USE_PRIVATE ChimaraPlayerPrivate *priv = CHIMARA_PLAYER_PRIVATE(self)
  13
  14 G_DEFINE_TYPE(ChimaraPlayer, chimara_player, GTK_TYPE_WINDOW);
  15
  16 static GObject *
  17 load_object(GtkBuilder *builder, const gchar *name)
  18 {
  19         GObject *retval;
  20         if( (retval = gtk_builder_get_object(builder, name)) == NULL) {
  21                 error_dialog(NULL, NULL, "Error while getting object '%s'", name);
  22                 g_error("Error while getting object '%s'", name);
  23         }
  24         return retval;
  25 }
  26
  27 static void
  28 change_window_title(ChimaraGlk *glk, GParamSpec *pspec, GtkWindow *window)
  29 {
  30         gchar *program_name, *story_name, *title;
  31         g_object_get(glk, "program-name", &program_name, "story-name", &story_name, NULL);
  32         if(!program_name) {
  33                 gtk_window_set_title(window, "Chimara");
  34                 return;
  35         }
  36         else if(!story_name)
  37                 title = g_strdup_printf("%s - Chimara", program_name);
  38         else
  39                 title = g_strdup_printf("%s - %s - Chimara", program_name, story_name);
  40
  41         g_free(program_name);
  42         g_free(story_name);
  43         gtk_window_set_title(window, title);
  44         g_free(title);
  45 }
  46
  47 static void
  48 chimara_player_dispose(GObject *object)
  49 {
  50         ChimaraPlayer *self = CHIMARA_PLAYER(object);
  51         if(chimara_glk_get_running(CHIMARA_GLK(self->glk))) {
  52                 chimara_glk_stop(CHIMARA_GLK(self->glk));
  53                 g_printerr("Stopping...\n");
  54                 chimara_glk_wait(CHIMARA_GLK(self->glk));
  55                 g_printerr("Done Waiting\n");
  56         }
  57
  58         /* Chain up */
  59         G_OBJECT_CLASS(chimara_player_parent_class)->dispose(object);
  60 }
  61
  62 static void
  63 chimara_player_finalize(GObject *object)
  64 {
  65         g_printerr("Unreffing\n");
  66         g_object_unref(CHIMARA_PLAYER(object)->glk);
  67
  68         /* Chain up */
  69         G_OBJECT_CLASS(chimara_player_parent_class)->finalize(object);
  70 }
  71
  72 static void
  73 chimara_player_class_init(ChimaraPlayerClass *klass)
  74 {
  75         /* Override methods of parent classes */
  76         GObjectClass *object_class = G_OBJECT_CLASS(klass);
  77         //object_class->set_property = chimara_if_set_property;
  78         //object_class->get_property = chimara_if_get_property;
  79         object_class->dispose = chimara_player_dispose;
  80         object_class->finalize = chimara_player_finalize;
  81
  82         /* Signals */
  83
  84         /* Properties */
  85
  86         /* Private data */
  87         g_type_class_add_private(klass, sizeof(ChimaraPlayerPrivate));
  88 }
  89
  90 static void
  91 chimara_player_init(ChimaraPlayer *self)
  92 {
  93         GError *error = NULL;
  94
  95         GtkBuilder *builder = gtk_builder_new();
  96         char *object_ids[] = {
  97                 "actiongroup",
  98                 "vbox",
  99                 NULL
 100         };
 101
 102         if( !gtk_builder_add_objects_from_file(builder, PACKAGE_DATA_DIR "/chimara.ui", object_ids, &error) ) {
 103 #ifdef DEBUG
 104                 g_error_free(error);
 105                 error = NULL;
 106                 if( !gtk_builder_add_objects_from_file(builder, PACKAGE_SRC_DIR "/chimara.ui", object_ids, &error) ) {
 107 #endif /* DEBUG */
 108                         error_dialog(NULL, error, "Error while building interface: ");
 109                         return;
 110 #ifdef DEBUG
 111                 }
 112 #endif /* DEBUG */
 113         }
 114
 115         GtkActionGroup *actiongroup = GTK_ACTION_GROUP(load_object(builder, "actiongroup"));
 116
 117         /* Set the default value of the "View/Toolbar" menu item upon creation of a
 118          new window to the "show-toolbar-default" setting, but bind the setting
 119          one-way only - we don't want toolbars to disappear suddenly */
 120         GtkToggleAction *toolbar_action = GTK_TOGGLE_ACTION(load_object(builder, "toolbar"));
 121         //gtk_toggle_action_set_active(toolbar_action, g_settings_get_boolean(state_settings, "show-toolbar-default"));
 122         //g_settings_bind(state_settings, "show-toolbar-default", toolbar_action, "active", G_SETTINGS_BIND_SET);
 123
 124         GtkUIManager *uimanager = gtk_ui_manager_new();
 125         if( !gtk_ui_manager_add_ui_from_file(uimanager, PACKAGE_DATA_DIR "/chimara.menus", &error) ) {
 126 #ifdef DEBUG
 127                 g_error_free(error);
 128                 error = NULL;
 129                 if( !gtk_ui_manager_add_ui_from_file(uimanager, PACKAGE_SRC_DIR "/chimara.menus", &error) ) {
 130 #endif /* DEBUG */
 131                         error_dialog(NULL, error, "Error while building interface: ");
 132                         return;
 133 #ifdef DEBUG
 134                 }
 135 #endif /* DEBUG */
 136         }
 137
 138         self->glk = chimara_if_new();
 139         g_object_set(self->glk,
 140                                  "ignore-errors", TRUE,
 141                                  /*"interpreter-number", CHIMARA_IF_ZMACHINE_TANDY_COLOR,*/
 142                                  NULL);
 143         if( !chimara_glk_set_css_from_file(CHIMARA_GLK(self->glk), PACKAGE_DATA_DIR "/style.css", &error) ) {
 144 #ifdef DEBUG
 145                 g_error_free(error);
 146                 error = NULL;
 147                 if( !chimara_glk_set_css_from_file(CHIMARA_GLK(self->glk), PACKAGE_SRC_DIR "/style.css", &error) ) {
 148 #endif /* DEBUG */
 149                         error_dialog(NULL, error, "Couldn't open CSS file: ");
 150                         return;
 151 #ifdef DEBUG
 152                 }
 153 #endif /* DEBUG */
 154         }
 155
 156         /* DON'T UNCOMMENT THIS your eyes will burn
 157          but it is a good test of programmatically altering just one style
 158          chimara_glk_set_css_from_string(CHIMARA_GLK(glk),
 159          "buffer.normal { font-family: 'Comic Sans MS'; }");*/
 160
 161         GtkBox *vbox = GTK_BOX(load_object(builder, "vbox"));
 162
 163         gtk_ui_manager_insert_action_group(uimanager, actiongroup, 0);
 164         GtkWidget *menubar = gtk_ui_manager_get_widget(uimanager, "/menubar");
 165         self->toolbar = gtk_ui_manager_get_widget(uimanager, "/toolbar");
 166         gtk_widget_set_no_show_all(self->toolbar, TRUE);
 167         if(gtk_toggle_action_get_active(toolbar_action))
 168                 gtk_widget_show(self->toolbar);
 169         else
 170                 gtk_widget_hide(self->toolbar);
 171
 172         /* Connect the accelerators */
 173         GtkAccelGroup *accels = gtk_ui_manager_get_accel_group(uimanager);
 174         gtk_window_add_accel_group(GTK_WINDOW(self), accels);
 175
 176         gtk_box_pack_end(vbox, self->glk, TRUE, TRUE, 0);
 177         g_object_ref(self->glk); /* add an extra reference to keep it alive while
 178                                                           the Glk program shuts down */
 179         gtk_box_pack_start(vbox, menubar, FALSE, FALSE, 0);
 180         gtk_box_pack_start(vbox, self->toolbar, FALSE, FALSE, 0);
 181         gtk_container_add(GTK_CONTAINER(self), GTK_WIDGET(vbox));
 182
 183         gtk_builder_connect_signals(builder, self);
 184         g_signal_connect(self->glk, "notify::program-name", G_CALLBACK(change_window_title), self);
 185         g_signal_connect(self->glk, "notify::story-name", G_CALLBACK(change_window_title), self);
 186
 187         g_object_unref( G_OBJECT(builder) );
 188         g_object_unref( G_OBJECT(uimanager) );
 189 }
 190
 191 /* PUBLIC FUNCTIONS */
 192
 193 GtkWidget *
 194 chimara_player_new(void)
 195 {
 196     return GTK_WIDGET(g_object_new(CHIMARA_TYPE_PLAYER,
 197                 "type", GTK_WINDOW_TOPLEVEL,
 198                 NULL));
 199 }