Introduce preferences file
[projects/chimara/chimara.git] / player / main.c
1 /* -*- Mode: C; indent-tabs-mode: t; c-basic-offset: 4; tab-width: 4 -*- */
2 /*
3  * main.c
4  * Copyright (C) Philip en Marijn 2008 <>
5  * 
6  * main.c is free software copyrighted by Philip en Marijn.
7  * 
8  * Redistribution and use in source and binary forms, with or without
9  * modification, are permitted provided that the following conditions
10  * are met:
11  * 1. Redistributions of source code must retain the above copyright
12  *    notice, this list of conditions and the following disclaimer.
13  * 2. Redistributions in binary form must reproduce the above copyright
14  *    notice, this list of conditions and the following disclaimer in the
15  *    documentation and/or other materials provided with the distribution.
16  * 3. Neither the name ``Philip en Marijn'' nor the name of any other
17  *    contributor may be used to endorse or promote products derived
18  *    from this software without specific prior written permission.
19  * 
20  * main.c IS PROVIDED BY Philip en Marijn ``AS IS'' AND ANY EXPRESS
21  * OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
22  * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
23  * ARE DISCLAIMED.  IN NO EVENT SHALL Philip en Marijn OR ANY OTHER CONTRIBUTORS
24  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
25  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
26  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR
27  * BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
28  * WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR
29  * OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF
30  * ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
31  */
32
33 #include <sys/types.h>
34 #include <sys/stat.h>
35 #include <unistd.h>
36 #include <string.h>
37 #include <stdio.h>
38
39 #include <glib.h>
40 #include <glib/gi18n.h>
41 #include <gtk/gtk.h>
42
43 /* Use a custom GSettings backend for our preferences file */
44 #define G_SETTINGS_ENABLE_BACKEND
45 #include <gio/gsettingsbackend.h>
46
47 #include "error.h"
48 #include <libchimara/chimara-glk.h>
49 #include <libchimara/chimara-if.h>
50
51 #include "preferences.h"
52
53 /* Static global pointers to widgets */
54 static GtkUIManager *uimanager = NULL;
55 static GtkWidget *window = NULL;
56 static GtkWidget *glk = NULL;
57
58 /* Global global pointers */
59 GtkBuilder *builder = NULL;
60 GtkWidget *aboutwindow = NULL;
61 GtkWidget *prefswindow = NULL;
62 GtkWidget *toolbar = NULL;
63 GSettings *settings = NULL;
64
65 GObject *
66 load_object(const gchar *name)
67 {
68         GObject *retval;
69         if( (retval = gtk_builder_get_object(builder, name)) == NULL) {
70                 error_dialog(NULL, NULL, "Error while getting object '%s'", name);
71                 g_error("Error while getting object '%s'", name);
72         }
73         return retval;
74 }
75
76 static void
77 change_window_title(ChimaraGlk *glk, GParamSpec *pspec, GtkWindow *window)
78 {
79         gchar *program_name, *story_name, *title;
80         g_object_get(glk, "program-name", &program_name, "story-name", &story_name, NULL);
81         if(!program_name) {
82                 gtk_window_set_title(window, "Chimara");
83                 return;
84         }
85         else if(!story_name)
86                 title = g_strdup_printf("%s - Chimara", program_name);
87         else
88                 title = g_strdup_printf("%s - %s - Chimara", program_name, story_name);
89                 
90         g_free(program_name);
91         g_free(story_name);
92         gtk_window_set_title(window, title);
93         g_free(title);
94 }
95
96 static void
97 create_window(void)
98 {
99         GError *error = NULL;
100
101         builder = gtk_builder_new();
102         if( !gtk_builder_add_from_file(builder, PACKAGE_DATA_DIR "/chimara.ui", &error) ) {
103 #ifdef DEBUG
104                 g_error_free(error);
105                 error = NULL;
106                 if( !gtk_builder_add_from_file(builder, PACKAGE_SRC_DIR "/chimara.ui", &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         window = GTK_WIDGET(load_object("chimara"));
116         aboutwindow = GTK_WIDGET(load_object("aboutwindow"));
117         prefswindow = GTK_WIDGET(load_object("prefswindow"));
118         GtkActionGroup *actiongroup = GTK_ACTION_GROUP(load_object("actiongroup"));
119         GtkToggleAction *toolbar_action = GTK_TOGGLE_ACTION(load_object("toolbar"));
120
121         const gchar **ptr;
122         GtkRecentFilter *filter = gtk_recent_filter_new();
123         /* TODO: Use mimetypes and construct the filter dynamically depending on 
124         what plugins are installed */
125         const gchar *patterns[] = {
126                 "*.z[1-8]", "*.[zg]lb", "*.[zg]blorb", "*.ulx", "*.blb", "*.blorb", NULL
127         };
128
129         for(ptr = patterns; *ptr; ptr++)
130                 gtk_recent_filter_add_pattern(filter, *ptr);
131         GtkRecentChooser *recent = GTK_RECENT_CHOOSER(load_object("recent"));
132         gtk_recent_chooser_add_filter(recent, filter);
133
134         uimanager = gtk_ui_manager_new();
135         if( !gtk_ui_manager_add_ui_from_file(uimanager, PACKAGE_DATA_DIR "/chimara.menus", &error) ) {
136 #ifdef DEBUG
137                 g_error_free(error);
138                 error = NULL;
139                 if( !gtk_ui_manager_add_ui_from_file(uimanager, PACKAGE_SRC_DIR "/chimara.menus", &error) ) {
140 #endif /* DEBUG */
141                         error_dialog(NULL, error, "Error while building interface: ");
142                         return;
143 #ifdef DEBUG
144                 }
145 #endif /* DEBUG */
146         }
147
148         glk = chimara_if_new();
149         g_object_set(glk,
150             "ignore-errors", TRUE,
151             /*"interpreter-number", CHIMARA_IF_ZMACHINE_TANDY_COLOR,*/
152             NULL);
153         if( !chimara_glk_set_css_from_file(CHIMARA_GLK(glk), PACKAGE_DATA_DIR "/style.css", &error) ) {
154 #ifdef DEBUG
155                 g_error_free(error);
156                 error = NULL;
157                 if( !chimara_glk_set_css_from_file(CHIMARA_GLK(glk), PACKAGE_SRC_DIR "/style.css", &error) ) {
158 #endif /* DEBUG */
159                         error_dialog(NULL, error, "Couldn't open CSS file: ");
160                         return;
161 #ifdef DEBUG
162                 }
163 #endif /* DEBUG */
164         }
165         chimara_if_set_preferred_interpreter(CHIMARA_IF(glk),
166             CHIMARA_IF_FORMAT_Z5,
167             CHIMARA_IF_INTERPRETER_FROTZ);
168         chimara_if_set_preferred_interpreter(CHIMARA_IF(glk),
169             CHIMARA_IF_FORMAT_Z6,
170             CHIMARA_IF_INTERPRETER_NITFOL);
171         chimara_if_set_preferred_interpreter(CHIMARA_IF(glk),
172             CHIMARA_IF_FORMAT_Z8,
173             CHIMARA_IF_INTERPRETER_FROTZ);
174         chimara_if_set_preferred_interpreter(CHIMARA_IF(glk),
175             CHIMARA_IF_FORMAT_Z_BLORB,
176             CHIMARA_IF_INTERPRETER_FROTZ);
177         chimara_if_set_preferred_interpreter(CHIMARA_IF(glk),
178             CHIMARA_IF_FORMAT_GLULX,
179             CHIMARA_IF_INTERPRETER_GLULXE);
180         chimara_if_set_preferred_interpreter(CHIMARA_IF(glk),
181             CHIMARA_IF_FORMAT_GLULX_BLORB,
182             CHIMARA_IF_INTERPRETER_GLULXE);
183         
184         /* DON'T UNCOMMENT THIS your eyes will burn
185          but it is a good test of programmatically altering just one style
186         chimara_glk_set_css_from_string(CHIMARA_GLK(glk),
187             "buffer.normal { font-family: 'Comic Sans MS'; }");*/
188         
189         GtkBox *vbox = GTK_BOX( gtk_builder_get_object(builder, "vbox") );                      
190         if(vbox == NULL)
191         {
192                 error_dialog(NULL, NULL, "Could not find vbox");
193                 return;
194         }
195
196         gtk_ui_manager_insert_action_group(uimanager, actiongroup, 0);
197         GtkWidget *menubar = gtk_ui_manager_get_widget(uimanager, "/menubar");
198         toolbar = gtk_ui_manager_get_widget(uimanager, "/toolbar");
199         gtk_widget_set_no_show_all(toolbar, TRUE);
200         if(gtk_toggle_action_get_active(toolbar_action))
201                 gtk_widget_show(toolbar);
202         else
203                 gtk_widget_hide(toolbar);
204
205         gtk_box_pack_end(vbox, glk, TRUE, TRUE, 0);
206         gtk_box_pack_start(vbox, menubar, FALSE, FALSE, 0);
207         gtk_box_pack_start(vbox, toolbar, FALSE, FALSE, 0);
208         
209         gtk_builder_connect_signals(builder, glk);
210         g_signal_connect(glk, "notify::program-name", G_CALLBACK(change_window_title), window);
211         g_signal_connect(glk, "notify::story-name", G_CALLBACK(change_window_title), window);
212         
213         /* Create preferences window */
214         preferences_create(CHIMARA_GLK(glk));
215 }
216
217 int
218 main(int argc, char *argv[])
219 {
220         GError *error = NULL;
221
222 #ifdef ENABLE_NLS
223         bindtextdomain(GETTEXT_PACKAGE, PACKAGE_LOCALE_DIR);
224         bind_textdomain_codeset(GETTEXT_PACKAGE, "UTF-8");
225         textdomain(GETTEXT_PACKAGE);
226 #endif
227
228         if( !g_thread_supported() )
229                 g_thread_init(NULL);
230         gdk_threads_init();
231         gtk_init(&argc, &argv);
232
233         /* Initialize settings file */
234         gchar *keyfile = g_build_filename(g_get_home_dir(), ".chimara", NULL);
235         GSettingsBackend *backend = g_keyfile_settings_backend_new(keyfile, "/", "player");
236         settings = g_settings_new_with_backend("org.chimara-if.chimara-player", backend);
237
238         create_window();
239         gtk_widget_show_all(window);
240
241         g_object_unref( G_OBJECT(uimanager) );
242
243         if(argc == 3) {
244                 g_object_set(glk, "graphics-file", argv[2], NULL);
245         }
246         if(argc >= 2) {
247                 if( !chimara_if_run_game(CHIMARA_IF(glk), argv[1], &error) ) {
248                         error_dialog(GTK_WINDOW(window), error, "Error starting Glk library: ");
249                         return 1;
250                 }
251         }
252
253     gdk_threads_enter();
254         gtk_main();
255         gdk_threads_leave();
256
257         chimara_glk_stop(CHIMARA_GLK(glk));
258         chimara_glk_wait(CHIMARA_GLK(glk));
259
260         g_object_unref( G_OBJECT(builder) );
261
262         return 0;
263 }