1 /* -*- Mode: C; indent-tabs-mode: t; c-basic-offset: 4; tab-width: 4 -*- */
4 * Copyright (C) Philip en Marijn 2008 <>
6 * preferences.c is free software copyrighted by Philip en Marijn.
8 * Redistribution and use in source and binary forms, with or without
9 * modification, are permitted provided that the following conditions
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.
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.
35 #include <glib-object.h>
36 #include <glib/gi18n.h>
38 #include <libchimara/chimara-glk.h>
39 #include <libchimara/chimara-if.h>
43 #include "preferences.h"
45 typedef struct _ChimaraPrefsPrivate {
47 } ChimaraPrefsPrivate;
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)
52 G_DEFINE_TYPE(ChimaraPrefs, chimara_prefs, GTK_TYPE_DIALOG);
54 static GtkTextTag *current_tag;
55 static GtkListStore *preferred_list;
57 static void style_tree_select_callback(GtkTreeSelection *selection);
60 chimara_prefs_finalize(GObject *self)
62 //CHIMARA_APP_USE_PRIVATE;
63 //g_object_unref(priv->action_group);
66 G_OBJECT_CLASS(chimara_prefs_parent_class)->finalize(self);
70 chimara_prefs_class_init(ChimaraPrefsClass *klass)
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;
83 g_type_class_add_private(klass, sizeof(ChimaraPrefsPrivate));
87 load_object(GtkBuilder *builder, const gchar *name)
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);
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)
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;
117 static const char *format_strings[CHIMARA_IF_NUM_FORMATS] = {
118 "z5", "z6", "z8", "zblorb", "glulx", "gblorb"
121 static const char *format_to_string(ChimaraIFFormat format)
123 if(format >= 0 && format < CHIMARA_IF_NUM_FORMATS)
124 return format_strings[format];
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"),
134 N_("Glulx Blorb file")
138 format_to_display_string(ChimaraIFFormat format)
140 if(format >= 0 && format < CHIMARA_IF_NUM_FORMATS)
141 return gettext(format_display_strings[format]);
145 static ChimaraIFInterpreter
146 parse_interpreter(const char *interp)
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;
159 static const char *interpreter_strings[CHIMARA_IF_NUM_INTERPRETERS] = {
160 "frotz", "nitfol", "glulxe", "git"
164 interpreter_to_string(ChimaraIFInterpreter interp)
166 if(interp >= 0 && interp < CHIMARA_IF_NUM_INTERPRETERS)
167 return interpreter_strings[interp];
171 static const char *interpreter_display_strings[CHIMARA_IF_NUM_INTERPRETERS] = {
179 interpreter_to_display_string(ChimaraIFInterpreter interp)
181 if(interp >= 0 && interp < CHIMARA_IF_NUM_INTERPRETERS)
182 return gettext(interpreter_display_strings[interp]);
186 /* Create the preferences dialog. */
188 chimara_prefs_init(ChimaraPrefs *self)
190 GError *error = NULL;
191 ChimaraApp *theapp = chimara_app_get();
193 /* Set parent properties */
195 "title", _("Chimara Preferences"),
196 "window-position", GTK_WIN_POS_CENTER,
197 "type-hint", GDK_WINDOW_TYPE_HINT_DIALOG,
200 gtk_dialog_add_buttons(GTK_DIALOG(self),
201 GTK_STOCK_CLOSE, GTK_RESPONSE_CLOSE,
204 /* Build user interface */
205 GtkBuilder *builder = gtk_builder_new();
206 char *object_ids[] = {
208 "available_interpreters",
214 if( !gtk_builder_add_objects_from_file(builder, PACKAGE_DATA_DIR "/chimara.ui", object_ids, &error) ) {
218 if( !gtk_builder_add_objects_from_file(builder, PACKAGE_SRC_DIR "/chimara.ui", object_ids, &error) ) {
220 error_dialog(NULL, error, "Error while building interface: ");
227 GtkWidget *notebook = GTK_WIDGET( load_object(builder, "prefs-notebook") );
228 GtkWidget *content_area = gtk_dialog_get_content_area( GTK_DIALOG(self) );
229 gtk_container_add( GTK_CONTAINER(content_area), notebook );
231 /* Initialize the tree of style names */
232 GtkTreeStore *style_list = GTK_TREE_STORE( load_object(builder, "style-list") );
233 GtkTreeIter buffer, grid, buffer_child, grid_child;
235 gtk_tree_store_append(style_list, &buffer, NULL);
236 gtk_tree_store_append(style_list, &grid, NULL);
237 gtk_tree_store_set(style_list, &buffer, 0, "Text buffer", -1);
238 gtk_tree_store_set(style_list, &grid, 0, "Text grid", -1);
241 //unsigned int num_tags;
242 //const gchar **tag_names = chimara_glk_get_tag_names(glk, &num_tags);
243 //for(i=0; i<num_tags; i++) {
244 // gtk_tree_store_append(style_list, &buffer_child, &buffer);
245 // gtk_tree_store_append(style_list, &grid_child, &grid);
246 // gtk_tree_store_set(style_list, &buffer_child, 0, tag_names[i], -1);
247 // gtk_tree_store_set(style_list, &grid_child, 0, tag_names[i], -1);
250 /* Set selection mode to single select */
251 GtkTreeView *view = GTK_TREE_VIEW( load_object(builder, "style-treeview") );
252 GtkTreeSelection *selection = gtk_tree_view_get_selection(view);
253 gtk_tree_selection_set_mode(selection, GTK_SELECTION_SINGLE);
254 g_signal_connect(selection, "changed", G_CALLBACK(style_tree_select_callback), NULL);
256 /* Bind the preferences to the entries in the preferences file */
257 GObject *flep = G_OBJECT( load_object(builder, "flep") );
258 g_settings_bind(theapp->prefs_settings, "flep", flep, "active", G_SETTINGS_BIND_DEFAULT);
259 GtkFileChooser *blorb_chooser = GTK_FILE_CHOOSER( load_object(builder, "blorb_file_chooser") );
260 GtkFileChooser *css_chooser = GTK_FILE_CHOOSER( load_object(builder, "css-filechooser") );
262 g_settings_get(theapp->prefs_settings, "resource-path", "ms", &filename);
264 gtk_file_chooser_set_filename(blorb_chooser, filename);
267 g_settings_get(theapp->prefs_settings, "css-file", "ms", &filename);
269 // if(!chimara_glk_set_css_from_file(glk, filename, NULL)) {
270 // /* If the setting didn't point to a CSS file, fail silently and
271 // null the setting */
272 // g_settings_set(theapp->prefs_settings, "css-file", "ms", NULL);
274 // gtk_file_chooser_set_filename(css_chooser, filename);
279 /* Populate the list of available interpreters */
280 GtkListStore *interp_list = GTK_LIST_STORE( load_object(builder, "available_interpreters") );
282 GtkTreeIter tree_iter;
283 for(count = 0; count < CHIMARA_IF_NUM_INTERPRETERS; count++) {
284 gtk_list_store_append(interp_list, &tree_iter);
285 gtk_list_store_set(interp_list, &tree_iter,
286 0, interpreter_to_display_string(count),
290 /* Get the list of preferred interpreters from the preferences */
291 //GVariantIter *iter;
292 //char *format, *plugin;
293 //g_settings_get(prefs_settings, "preferred-interpreters", "a{ss}", &iter);
294 //while(g_variant_iter_loop(iter, "{ss}", &format, &plugin)) {
295 // ChimaraIFFormat format_num = parse_format(format);
296 // if(format_num == CHIMARA_IF_FORMAT_NONE)
298 // ChimaraIFInterpreter interp_num = parse_interpreter(plugin);
299 // if(interp_num == CHIMARA_IF_INTERPRETER_NONE)
301 // chimara_if_set_preferred_interpreter(CHIMARA_IF(glk), format_num, interp_num);
303 //g_variant_iter_free(iter);
305 /* Display it all in the list */
306 //preferred_list = GTK_LIST_STORE( load_object(builder, "interpreters") );
307 //for(count = 0; count < CHIMARA_IF_NUM_FORMATS; count++) {
308 // gtk_list_store_append(preferred_list, &tree_iter);
309 // gtk_list_store_set(preferred_list, &tree_iter,
310 // 0, format_to_display_string(count),
311 // 1, interpreter_to_display_string(chimara_if_get_preferred_interpreter(CHIMARA_IF(glk), count)),
315 gtk_builder_connect_signals(builder, self);
316 g_object_unref(builder);
318 /* Connect own signals */
319 g_signal_connect(self, "response", G_CALLBACK(gtk_widget_hide), NULL);
320 g_signal_connect(self, "delete-event", G_CALLBACK(gtk_widget_hide_on_delete), NULL);
323 /* PUBLIC FUNCTIONS */
325 chimara_prefs_new(void)
327 return GTK_WIDGET(g_object_new(CHIMARA_TYPE_PREFS,
328 "type", GTK_WINDOW_TOPLEVEL,
332 /* GLADE CALLBACKS */
335 style_tree_select_callback(GtkTreeSelection *selection)
337 GtkTreeIter child, parent;
338 gchar *child_name, *parent_name;
341 if( !gtk_tree_selection_get_selected(selection, &model, &child) )
344 gtk_tree_model_get(model, &child, 0, &child_name, -1);
346 if( !gtk_tree_model_iter_parent(model, &parent, &child) )
349 gtk_tree_model_get(model, &parent, 0, &parent_name, -1);
350 //if( !strcmp(parent_name, "Text buffer") )
351 // current_tag = chimara_glk_get_tag(glk, CHIMARA_GLK_TEXT_BUFFER, child_name);
353 // current_tag = chimara_glk_get_tag(glk, CHIMARA_GLK_TEXT_GRID, child_name);
357 on_toggle_left(GtkToggleButton *button, ChimaraGlk *glk) {
358 /* No nothing if the button is deactivated */
359 if( !gtk_toggle_button_get_active(button) )
361 g_object_set(current_tag, "justification", GTK_JUSTIFY_LEFT, "justification-set", TRUE, NULL);
362 chimara_glk_update_style(glk);
366 on_toggle_center(GtkToggleButton *button, ChimaraGlk *glk) {
367 if( !gtk_toggle_button_get_active(button) )
369 g_object_set(current_tag, "justification", GTK_JUSTIFY_CENTER, "justification-set", TRUE, NULL);
370 chimara_glk_update_style(glk);
374 on_toggle_right(GtkToggleButton *button, ChimaraGlk *glk) {
375 if( !gtk_toggle_button_get_active(button) )
377 g_object_set(current_tag, "justification", GTK_JUSTIFY_RIGHT, "justification-set", TRUE, NULL);
378 chimara_glk_update_style(glk);
382 on_toggle_justify(GtkToggleButton *button, ChimaraGlk *glk) {
383 if( !gtk_toggle_button_get_active(button) )
385 g_object_set(current_tag, "justification", GTK_JUSTIFY_FILL, "justification-set", TRUE, NULL);
386 chimara_glk_update_style(glk);
390 on_toggle_bold(GtkToggleButton *button, ChimaraGlk *glk) {
391 if( gtk_toggle_button_get_active(button) )
392 g_object_set(current_tag, "weight", PANGO_WEIGHT_BOLD, "weight-set", TRUE, NULL);
394 g_object_set(current_tag, "weight", PANGO_WEIGHT_NORMAL, "weight-set", TRUE, NULL);
396 chimara_glk_update_style(glk);
400 on_toggle_italic(GtkToggleButton *button, ChimaraGlk *glk) {
401 if( gtk_toggle_button_get_active(button) )
402 g_object_set(current_tag, "style", PANGO_STYLE_ITALIC, "style-set", TRUE, NULL);
404 g_object_set(current_tag, "style", PANGO_STYLE_NORMAL, "style-set", TRUE, NULL);
406 chimara_glk_update_style(glk);
410 on_toggle_underline(GtkToggleButton *button, ChimaraGlk *glk) {
411 if( gtk_toggle_button_get_active(button) )
412 g_object_set(current_tag, "underline", PANGO_UNDERLINE_SINGLE, "underline-set", TRUE, NULL);
414 g_object_set(current_tag, "underline", PANGO_UNDERLINE_NONE, "underline-set", TRUE, NULL);
416 chimara_glk_update_style(glk);
420 on_foreground_color_set(GtkColorButton *button, ChimaraGlk *glk)
423 gtk_color_button_get_color(button, &color);
424 g_object_set(current_tag, "foreground-gdk", &color, "foreground-set", TRUE, NULL);
425 chimara_glk_update_style(glk);
429 on_background_color_set(GtkColorButton *button, ChimaraGlk *glk)
432 gtk_color_button_get_color(button, &color);
433 g_object_set(current_tag, "background-gdk", &color, "background-set", TRUE, NULL);
434 chimara_glk_update_style(glk);
438 on_font_set(GtkFontButton *button, ChimaraGlk *glk)
440 const gchar *font_name = gtk_font_button_get_font_name(button);
441 PangoFontDescription *font_description = pango_font_description_from_string(font_name);
442 g_object_set(current_tag, "font-desc", font_description, NULL);
443 chimara_glk_update_style(glk);
447 on_css_filechooser_file_set(GtkFileChooserButton *button, ChimaraGlk *glk)
449 //GError *error = NULL;
450 //ChimaraApp *theapp = chimara_app_get();
451 //char *filename = gtk_file_chooser_get_filename( GTK_FILE_CHOOSER(button) );
452 //if(!chimara_glk_set_css_from_file(glk, filename, &error)) {
453 // error_dialog(NULL, error, "There was a problem reading the CSS file: ");
454 // g_settings_set(theapp->prefs_settings, "css-file", "ms", NULL);
456 // g_settings_set(theapp->prefs_settings, "css-file", "ms", filename);
462 on_resource_file_set(GtkFileChooserButton *button, ChimaraGlk *glk)
464 ChimaraApp *theapp = chimara_app_get();
465 char *filename = gtk_file_chooser_get_filename( GTK_FILE_CHOOSER(button) );
466 g_settings_set(theapp->prefs_settings, "resource-path", "ms", filename);
471 on_interpreter_cell_changed(GtkCellRendererCombo *combo, char *path_string, GtkTreeIter *new_iter, ChimaraGlk *glk)
473 //unsigned int format, interpreter;
474 //format = (unsigned int)strtol(path_string, NULL, 10);
475 //GtkTreeModel *combo_model;
476 //g_object_get(combo, "model", &combo_model, NULL);
477 //char *combo_string = gtk_tree_model_get_string_from_iter(combo_model, new_iter);
478 //interpreter = (unsigned int)strtol(combo_string, NULL, 10);
479 //g_free(combo_string);
481 //chimara_if_set_preferred_interpreter(CHIMARA_IF(glk), format, interpreter);
483 /* Display the new setting in the list */
485 //GtkTreePath *path = gtk_tree_path_new_from_string(path_string);
486 //gtk_tree_model_get_iter(GTK_TREE_MODEL(preferred_list), &iter, path);
487 //gtk_tree_path_free(path);
488 //gtk_list_store_set(preferred_list, &iter,
489 // 1, interpreter_to_display_string(interpreter),
492 /* Save the new settings in the preferences file */
493 //ChimaraApp *theapp = chimara_app_get();
494 //GVariantBuilder *builder = g_variant_builder_new( G_VARIANT_TYPE("a{ss}") );
495 //unsigned int count;
496 //for(count = 0; count < CHIMARA_IF_NUM_FORMATS; count++) {
497 // g_variant_builder_add(builder, "{ss}",
498 // format_to_string(count),
499 // interpreter_to_string(chimara_if_get_preferred_interpreter(CHIMARA_IF(glk), count)));
501 //g_settings_set(theapp->prefs_settings, "preferred-interpreters", "a{ss}", builder);
502 //g_variant_builder_unref(builder);