2f764a745cd01f2b8f3c79d3b49e5cd371109e09
[projects/chimara/chimara.git] / player / preferences.c
1 /* -*- Mode: C; indent-tabs-mode: t; c-basic-offset: 4; tab-width: 4 -*- */
2 /*
3  * callbacks.c
4  * Copyright (C) Philip en Marijn 2008 <>
5  * 
6  * preferences.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  * preferences.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 <stdlib.h>
34 #include <glib.h>
35 #include <glib-object.h>
36 #include <glib/gi18n.h>
37 #include <gtk/gtk.h>
38 #include <libchimara/chimara-glk.h>
39 #include <libchimara/chimara-if.h>
40 #include <config.h>
41 #include "error.h"
42 #include "app.h"
43 #include "preferences.h"
44
45 typedef struct _ChimaraPrefsPrivate {
46         int dummy;
47 } ChimaraPrefsPrivate;
48
49 #define CHIMARA_PREFS_PRIVATE(o) (G_TYPE_INSTANCE_GET_PRIVATE((o), CHIMARA_TYPE_PREFS, ChimaraPrefsPrivate))
50 #define CHIMARA_PREFS_USE_PRIVATE ChimaraPrefsPrivate *priv = CHIMARA_PREFS_PRIVATE(self)
51
52 G_DEFINE_TYPE(ChimaraPrefs, chimara_prefs, GTK_TYPE_WINDOW);
53
54 static GtkTextTag *current_tag;
55 static GtkListStore *preferred_list;
56
57 static void style_tree_select_callback(GtkTreeSelection *selection);
58
59 static void
60 chimara_prefs_finalize(GObject *self)
61 {
62         //CHIMARA_APP_USE_PRIVATE;
63         //g_object_unref(priv->action_group);
64         
65         /* Chain up */
66         G_OBJECT_CLASS(chimara_prefs_parent_class)->finalize(self);
67 }
68
69 static void
70 chimara_prefs_class_init(ChimaraPrefsClass *klass)
71 {
72         /* Override methods of parent classes */
73         GObjectClass *object_class = G_OBJECT_CLASS(klass);
74         //object_class->set_property = chimara_if_set_property;
75         //object_class->get_property = chimara_if_get_property;
76         object_class->finalize = chimara_prefs_finalize;
77         
78         /* Signals */
79
80         /* Properties */
81
82         /* Private data */
83         g_type_class_add_private(klass, sizeof(ChimaraPrefsPrivate));
84 }
85
86 static GObject *
87 load_object(GtkBuilder *builder, const gchar *name)
88 {
89         GObject *retval;
90         if( (retval = gtk_builder_get_object(builder, name)) == NULL) {
91                 error_dialog(NULL, NULL, "Error while getting object '%s'", name);
92                 g_error("Error while getting object '%s'", name);
93         }
94         return retval;
95 }
96
97 /* Internal functions to convert from human-readable names in the config file
98 to enums and back. Later: replace with plugin functions. */
99 static ChimaraIFFormat
100 parse_format(const char *format)
101 {
102         if(strcmp(format, "z5") == 0)
103                 return CHIMARA_IF_FORMAT_Z5;
104         if(strcmp(format, "z6") == 0)
105                 return CHIMARA_IF_FORMAT_Z6;
106         if(strcmp(format, "z8") == 0)
107                 return CHIMARA_IF_FORMAT_Z8;
108         if(strcmp(format, "zblorb") == 0)
109                 return CHIMARA_IF_FORMAT_Z_BLORB;
110         if(strcmp(format, "glulx") == 0)
111                 return CHIMARA_IF_FORMAT_GLULX;
112         if(strcmp(format, "gblorb") == 0)
113                 return CHIMARA_IF_FORMAT_GLULX_BLORB;
114         return CHIMARA_IF_FORMAT_NONE;
115 }
116
117 static const char *format_strings[CHIMARA_IF_NUM_FORMATS] = {
118         "z5", "z6", "z8", "zblorb", "glulx", "gblorb"
119 };
120
121 static const char *format_to_string(ChimaraIFFormat format)
122 {
123         if(format >= 0 && format < CHIMARA_IF_NUM_FORMATS)
124                 return format_strings[format];
125         return "unknown";
126 }
127
128 static const char *format_display_strings[CHIMARA_IF_NUM_FORMATS] = {
129         N_("Z-machine version 5"),
130         N_("Z-machine version 6"),
131         N_("Z-machine version 8"),
132         N_("Z-machine Blorb file"),
133         N_("Glulx"),
134         N_("Glulx Blorb file")
135 };
136
137 static const char *
138 format_to_display_string(ChimaraIFFormat format)
139 {
140         if(format >= 0 && format < CHIMARA_IF_NUM_FORMATS)
141                 return gettext(format_display_strings[format]);
142         return _("Unknown");
143 }
144
145 static ChimaraIFInterpreter
146 parse_interpreter(const char *interp)
147 {
148         if(strcmp(interp, "frotz") == 0)
149                 return CHIMARA_IF_INTERPRETER_FROTZ;
150         if(strcmp(interp, "nitfol") == 0)
151                 return CHIMARA_IF_INTERPRETER_NITFOL;
152         if(strcmp(interp, "glulxe") == 0)
153                 return CHIMARA_IF_INTERPRETER_GLULXE;
154         if(strcmp(interp, "git") == 0)
155                 return CHIMARA_IF_INTERPRETER_GIT;
156         return CHIMARA_IF_INTERPRETER_NONE;
157 }
158
159 static const char *interpreter_strings[CHIMARA_IF_NUM_INTERPRETERS] = {
160         "frotz", "nitfol", "glulxe", "git"
161 };
162
163 static const char *
164 interpreter_to_string(ChimaraIFInterpreter interp)
165 {
166         if(interp >= 0 && interp < CHIMARA_IF_NUM_INTERPRETERS)
167                 return interpreter_strings[interp];
168         return "unknown";
169 }
170
171 static const char *interpreter_display_strings[CHIMARA_IF_NUM_INTERPRETERS] = {
172         N_("Frotz"),
173         N_("Nitfol"),
174         N_("Glulxe"),
175         N_("Git")
176 };
177
178 static const char *
179 interpreter_to_display_string(ChimaraIFInterpreter interp)
180 {
181         if(interp >= 0 && interp < CHIMARA_IF_NUM_INTERPRETERS)
182                 return gettext(interpreter_display_strings[interp]);
183         return _("Unknown");
184 }
185
186 /* Create the preferences dialog. */
187 static void
188 chimara_prefs_init(ChimaraPrefs *self)
189 {
190         GError *error = NULL;
191         ChimaraApp *theapp = chimara_app_get();
192         
193         /* Build user interface */
194         GtkBuilder *builder = gtk_builder_new();
195         char *object_ids[] = {
196                 "prefswindow",
197                 "available_interpreters",
198                 "interpreters",
199                 "style-list",
200                 NULL
201         };
202         
203         if( !gtk_builder_add_objects_from_file(builder, PACKAGE_DATA_DIR "/chimara.ui", object_ids, &error) ) {
204 #ifdef DEBUG
205                 g_error_free(error);
206                 error = NULL;
207                 if( !gtk_builder_add_objects_from_file(builder, PACKAGE_SRC_DIR "/chimara.ui", object_ids, &error) ) {
208 #endif /* DEBUG */
209                         error_dialog(NULL, error, "Error while building interface: ");  
210                         return;
211 #ifdef DEBUG
212                 }
213 #endif /* DEBUG */
214         }
215         
216         /* Initialize the tree of style names */
217         GtkTreeStore *style_list = GTK_TREE_STORE( load_object(builder, "style-list") );
218         GtkTreeIter buffer, grid, buffer_child, grid_child;
219
220         gtk_tree_store_append(style_list, &buffer, NULL);
221         gtk_tree_store_append(style_list, &grid, NULL);
222         gtk_tree_store_set(style_list, &buffer, 0, "Text buffer", -1);
223         gtk_tree_store_set(style_list, &grid, 0, "Text grid", -1);
224
225         //int i;
226         //unsigned int num_tags;
227         //const gchar **tag_names = chimara_glk_get_tag_names(glk, &num_tags);
228         //for(i=0; i<num_tags; i++) {
229         //      gtk_tree_store_append(style_list, &buffer_child, &buffer);
230         //      gtk_tree_store_append(style_list, &grid_child, &grid);
231         //      gtk_tree_store_set(style_list, &buffer_child, 0, tag_names[i], -1);
232         //      gtk_tree_store_set(style_list, &grid_child, 0, tag_names[i], -1);
233         //}
234
235         /* Set selection mode to single select */
236         GtkTreeView *view = GTK_TREE_VIEW( load_object(builder, "style-treeview") );
237         GtkTreeSelection *selection = gtk_tree_view_get_selection(view);
238         gtk_tree_selection_set_mode(selection, GTK_SELECTION_SINGLE);
239         g_signal_connect(selection, "changed", G_CALLBACK(style_tree_select_callback), NULL);
240
241         /* Bind the preferences to the entries in the preferences file */
242         GObject *flep = G_OBJECT( load_object(builder, "flep") );
243         g_settings_bind(theapp->prefs_settings, "flep", flep, "active", G_SETTINGS_BIND_DEFAULT);
244         GtkFileChooser *blorb_chooser = GTK_FILE_CHOOSER( load_object(builder, "blorb_file_chooser") );
245         GtkFileChooser *css_chooser = GTK_FILE_CHOOSER( load_object(builder, "css-filechooser") );
246         char *filename;
247         g_settings_get(theapp->prefs_settings, "resource-path", "ms", &filename);
248         if(filename) {
249                 gtk_file_chooser_set_filename(blorb_chooser, filename);
250                 g_free(filename);
251         }
252         g_settings_get(theapp->prefs_settings, "css-file", "ms", &filename);
253         //if(filename) {
254         //      if(!chimara_glk_set_css_from_file(glk, filename, NULL)) {
255         //              /* If the setting didn't point to a CSS file, fail silently and
256         //               null the setting */
257         //              g_settings_set(theapp->prefs_settings, "css-file", "ms", NULL);
258         //      } else {
259         //              gtk_file_chooser_set_filename(css_chooser, filename);
260         //      }
261         //      g_free(filename);
262         //}
263
264         /* Populate the list of available interpreters */
265         GtkListStore *interp_list = GTK_LIST_STORE( load_object(builder, "available_interpreters") );
266         unsigned int count;
267         GtkTreeIter tree_iter;
268         for(count = 0; count < CHIMARA_IF_NUM_INTERPRETERS; count++) {
269                 gtk_list_store_append(interp_list, &tree_iter);
270                 gtk_list_store_set(interp_list, &tree_iter,
271                         0, interpreter_to_display_string(count),
272                         -1);
273         }
274
275         /* Get the list of preferred interpreters from the preferences */
276         //GVariantIter *iter;
277         //char *format, *plugin;
278         //g_settings_get(prefs_settings, "preferred-interpreters", "a{ss}", &iter);
279         //while(g_variant_iter_loop(iter, "{ss}", &format, &plugin)) {
280         //      ChimaraIFFormat format_num = parse_format(format);
281         //      if(format_num == CHIMARA_IF_FORMAT_NONE)
282         //              continue;
283         //      ChimaraIFInterpreter interp_num = parse_interpreter(plugin);
284         //      if(interp_num == CHIMARA_IF_INTERPRETER_NONE)
285         //              continue;
286         //      chimara_if_set_preferred_interpreter(CHIMARA_IF(glk), format_num, interp_num);
287         //}
288         //g_variant_iter_free(iter);
289
290         /* Display it all in the list */
291         //preferred_list = GTK_LIST_STORE( load_object(builder, "interpreters") );
292         //for(count = 0; count < CHIMARA_IF_NUM_FORMATS; count++) {
293         //      gtk_list_store_append(preferred_list, &tree_iter);
294         //      gtk_list_store_set(preferred_list, &tree_iter,
295         //              0, format_to_display_string(count),
296         //              1, interpreter_to_display_string(chimara_if_get_preferred_interpreter(CHIMARA_IF(glk), count)),
297         //              -1);
298         //}
299 }
300
301 /* PUBLIC FUNCTIONS */
302 GtkWidget *
303 chimara_prefs_new(void)
304 {
305         return GTK_WIDGET(g_object_new(CHIMARA_TYPE_PREFS,
306                 "type", GTK_WINDOW_TOPLEVEL,
307                 NULL));
308 }
309
310 /* GLADE CALLBACKS */
311
312 static void
313 style_tree_select_callback(GtkTreeSelection *selection)
314 {
315         GtkTreeIter child, parent;
316         gchar *child_name, *parent_name;
317         GtkTreeModel *model;
318
319         if( !gtk_tree_selection_get_selected(selection, &model, &child) )
320                 return;
321
322         gtk_tree_model_get(model, &child, 0, &child_name, -1);
323                 
324         if( !gtk_tree_model_iter_parent(model, &parent, &child) )
325                 return;
326
327         gtk_tree_model_get(model, &parent, 0, &parent_name, -1);
328         //if( !strcmp(parent_name, "Text buffer") )
329         //      current_tag = chimara_glk_get_tag(glk, CHIMARA_GLK_TEXT_BUFFER, child_name);
330         //else
331         //      current_tag = chimara_glk_get_tag(glk, CHIMARA_GLK_TEXT_GRID, child_name);
332 }
333
334 #if 0
335 void
336 on_toggle_left(GtkToggleButton *button, ChimaraGlk *glk) {
337         /* No nothing if the button is deactivated */
338         if( !gtk_toggle_button_get_active(button) )
339                 return;
340         g_object_set(current_tag, "justification", GTK_JUSTIFY_LEFT, "justification-set", TRUE, NULL);
341         chimara_glk_update_style(glk);
342 }
343
344 void
345 on_toggle_center(GtkToggleButton *button, ChimaraGlk *glk) {
346         if( !gtk_toggle_button_get_active(button) )
347                 return;
348         g_object_set(current_tag, "justification", GTK_JUSTIFY_CENTER, "justification-set", TRUE, NULL);
349         chimara_glk_update_style(glk);
350 }
351
352 void
353 on_toggle_right(GtkToggleButton *button, ChimaraGlk *glk) {
354         if( !gtk_toggle_button_get_active(button) )
355                 return;
356         g_object_set(current_tag, "justification", GTK_JUSTIFY_RIGHT, "justification-set", TRUE, NULL);
357         chimara_glk_update_style(glk);
358 }
359
360 void
361 on_toggle_justify(GtkToggleButton *button, ChimaraGlk *glk) {
362         if( !gtk_toggle_button_get_active(button) )
363                 return;
364         g_object_set(current_tag, "justification", GTK_JUSTIFY_FILL, "justification-set", TRUE, NULL);
365         chimara_glk_update_style(glk);
366 }
367
368 void
369 on_toggle_bold(GtkToggleButton *button, ChimaraGlk *glk) {
370         if( gtk_toggle_button_get_active(button) )
371                 g_object_set(current_tag, "weight", PANGO_WEIGHT_BOLD, "weight-set", TRUE, NULL);
372         else
373                 g_object_set(current_tag, "weight", PANGO_WEIGHT_NORMAL, "weight-set", TRUE, NULL);
374
375         chimara_glk_update_style(glk);
376 }
377
378 void
379 on_toggle_italic(GtkToggleButton *button, ChimaraGlk *glk) {
380         if( gtk_toggle_button_get_active(button) )
381                 g_object_set(current_tag, "style", PANGO_STYLE_ITALIC, "style-set", TRUE, NULL);
382         else
383                 g_object_set(current_tag, "style", PANGO_STYLE_NORMAL, "style-set", TRUE, NULL);
384
385         chimara_glk_update_style(glk);
386 }
387
388 void
389 on_toggle_underline(GtkToggleButton *button, ChimaraGlk *glk) {
390         if( gtk_toggle_button_get_active(button) )
391                 g_object_set(current_tag, "underline", PANGO_UNDERLINE_SINGLE, "underline-set", TRUE, NULL);
392         else
393                 g_object_set(current_tag, "underline", PANGO_UNDERLINE_NONE, "underline-set", TRUE, NULL);
394
395         chimara_glk_update_style(glk);
396 }
397
398 void
399 on_foreground_color_set(GtkColorButton *button, ChimaraGlk *glk)
400 {
401         GdkColor color;
402     gtk_color_button_get_color(button, &color);
403         g_object_set(current_tag, "foreground-gdk", &color, "foreground-set", TRUE, NULL);
404         chimara_glk_update_style(glk);
405 }
406
407 void
408 on_background_color_set(GtkColorButton *button, ChimaraGlk *glk)
409 {
410         GdkColor color;
411     gtk_color_button_get_color(button, &color);
412         g_object_set(current_tag, "background-gdk", &color, "background-set", TRUE, NULL);
413         chimara_glk_update_style(glk);
414 }
415
416 void
417 on_font_set(GtkFontButton *button, ChimaraGlk *glk)
418 {
419         const gchar *font_name = gtk_font_button_get_font_name(button);
420         PangoFontDescription *font_description = pango_font_description_from_string(font_name);
421         g_object_set(current_tag, "font-desc", font_description, NULL);
422         chimara_glk_update_style(glk);
423 }
424 #endif
425
426 void
427 on_css_filechooser_file_set(GtkFileChooserButton *button, ChimaraGlk *glk)
428 {
429         //GError *error = NULL;
430         //ChimaraApp *theapp = chimara_app_get();
431         //char *filename = gtk_file_chooser_get_filename( GTK_FILE_CHOOSER(button) );
432         //if(!chimara_glk_set_css_from_file(glk, filename, &error)) {
433         //      error_dialog(NULL, error, "There was a problem reading the CSS file: ");
434         //      g_settings_set(theapp->prefs_settings, "css-file", "ms", NULL);
435         //} else {
436         //      g_settings_set(theapp->prefs_settings, "css-file", "ms", filename);
437         //}
438         //g_free(filename);
439 }
440
441 void
442 on_resource_file_set(GtkFileChooserButton *button, ChimaraGlk *glk)
443 {
444         ChimaraApp *theapp = chimara_app_get();
445         char *filename = gtk_file_chooser_get_filename( GTK_FILE_CHOOSER(button) );
446         g_settings_set(theapp->prefs_settings, "resource-path", "ms", filename);
447         g_free(filename);
448 }
449
450 void
451 on_interpreter_cell_changed(GtkCellRendererCombo *combo, char *path_string, GtkTreeIter *new_iter, ChimaraGlk *glk)
452 {
453         //unsigned int format, interpreter;
454         //format = (unsigned int)strtol(path_string, NULL, 10);
455         //GtkTreeModel *combo_model;
456         //g_object_get(combo, "model", &combo_model, NULL);
457         //char *combo_string = gtk_tree_model_get_string_from_iter(combo_model, new_iter);
458         //interpreter = (unsigned int)strtol(combo_string, NULL, 10);
459         //g_free(combo_string);
460
461         //chimara_if_set_preferred_interpreter(CHIMARA_IF(glk), format, interpreter);
462
463         /* Display the new setting in the list */
464         //GtkTreeIter iter;
465         //GtkTreePath *path = gtk_tree_path_new_from_string(path_string);
466         //gtk_tree_model_get_iter(GTK_TREE_MODEL(preferred_list), &iter, path);
467         //gtk_tree_path_free(path);
468         //gtk_list_store_set(preferred_list, &iter,
469         //      1, interpreter_to_display_string(interpreter),
470         //      -1);
471
472         /* Save the new settings in the preferences file */
473         //ChimaraApp *theapp = chimara_app_get();
474         //GVariantBuilder *builder = g_variant_builder_new( G_VARIANT_TYPE("a{ss}") );
475         //unsigned int count;
476         //for(count = 0; count < CHIMARA_IF_NUM_FORMATS; count++) {
477         //      g_variant_builder_add(builder, "{ss}",
478         //              format_to_string(count),
479         //              interpreter_to_string(chimara_if_get_preferred_interpreter(CHIMARA_IF(glk), count)));
480         //}
481         //g_settings_set(theapp->prefs_settings, "preferred-interpreters", "a{ss}", builder);
482         //g_variant_builder_unref(builder);
483 }