1 #include <glib-object.h>
2 #include <libchimara/chimara-glk.h>
3 #include <libchimara/chimara-if.h>
7 typedef struct _ChimaraPlayerPrivate {
9 } ChimaraPlayerPrivate;
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)
14 G_DEFINE_TYPE(ChimaraPlayer, chimara_player, GTK_TYPE_WINDOW);
17 load_object(GtkBuilder *builder, const gchar *name)
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);
28 change_window_title(ChimaraGlk *glk, GParamSpec *pspec, GtkWindow *window)
30 gchar *program_name, *story_name, *title;
31 g_object_get(glk, "program-name", &program_name, "story-name", &story_name, NULL);
33 gtk_window_set_title(window, "Chimara");
37 title = g_strdup_printf("%s - Chimara", program_name);
39 title = g_strdup_printf("%s - %s - Chimara", program_name, story_name);
43 gtk_window_set_title(window, title);
48 chimara_player_dispose(GObject *object)
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");
59 G_OBJECT_CLASS(chimara_player_parent_class)->dispose(object);
63 chimara_player_finalize(GObject *object)
65 g_printerr("Unreffing\n");
66 g_object_unref(CHIMARA_PLAYER(object)->glk);
69 G_OBJECT_CLASS(chimara_player_parent_class)->finalize(object);
73 chimara_player_class_init(ChimaraPlayerClass *klass)
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;
87 g_type_class_add_private(klass, sizeof(ChimaraPlayerPrivate));
91 chimara_player_init(ChimaraPlayer *self)
95 GtkBuilder *builder = gtk_builder_new();
96 char *object_ids[] = {
102 if( !gtk_builder_add_objects_from_file(builder, PACKAGE_DATA_DIR "/chimara.ui", object_ids, &error) ) {
106 if( !gtk_builder_add_objects_from_file(builder, PACKAGE_SRC_DIR "/chimara.ui", object_ids, &error) ) {
108 error_dialog(NULL, error, "Error while building interface: ");
115 GtkActionGroup *actiongroup = GTK_ACTION_GROUP(load_object(builder, "actiongroup"));
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);
124 GtkUIManager *uimanager = gtk_ui_manager_new();
125 if( !gtk_ui_manager_add_ui_from_file(uimanager, PACKAGE_DATA_DIR "/chimara.menus", &error) ) {
129 if( !gtk_ui_manager_add_ui_from_file(uimanager, PACKAGE_SRC_DIR "/chimara.menus", &error) ) {
131 error_dialog(NULL, error, "Error while building interface: ");
138 self->glk = chimara_if_new();
139 g_object_set(self->glk,
140 "ignore-errors", TRUE,
141 /*"interpreter-number", CHIMARA_IF_ZMACHINE_TANDY_COLOR,*/
143 if( !chimara_glk_set_css_from_file(CHIMARA_GLK(self->glk), PACKAGE_DATA_DIR "/style.css", &error) ) {
147 if( !chimara_glk_set_css_from_file(CHIMARA_GLK(self->glk), PACKAGE_SRC_DIR "/style.css", &error) ) {
149 error_dialog(NULL, error, "Couldn't open CSS file: ");
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'; }");*/
161 GtkBox *vbox = GTK_BOX(load_object(builder, "vbox"));
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);
170 gtk_widget_hide(self->toolbar);
172 /* Connect the accelerators */
173 GtkAccelGroup *accels = gtk_ui_manager_get_accel_group(uimanager);
174 gtk_window_add_accel_group(GTK_WINDOW(self), accels);
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));
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);
187 g_object_unref( G_OBJECT(builder) );
188 g_object_unref( G_OBJECT(uimanager) );
191 /* PUBLIC FUNCTIONS */
194 chimara_player_new(void)
196 return GTK_WIDGET(g_object_new(CHIMARA_TYPE_PLAYER,
197 "type", GTK_WINDOW_TOPLEVEL,