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/gi18n.h>
  36 #include <gtk/gtk.h>
  37 #include <libchimara/chimara-glk.h>
  38 #include <libchimara/chimara-if.h>
  39 #include <config.h>
  40 #include "error.h"
  41
  42 GObject *load_object(const gchar *name);
  43 static GtkTextTag *current_tag;
  44 static GtkListStore *preferred_list;
  45
  46 static void style_tree_select_callback(GtkTreeSelection *selection, ChimaraGlk *glk);
  47
  48 /* Internal functions to convert from human-readable names in the config file
  49 to enums and back. Later: replace with plugin functions. */
  50 static ChimaraIFFormat
  51 parse_format(const char *format)
  52 {
  53         if(strcmp(format, "z5") == 0)
  54                 return CHIMARA_IF_FORMAT_Z5;
  55         if(strcmp(format, "z6") == 0)
  56                 return CHIMARA_IF_FORMAT_Z6;
  57         if(strcmp(format, "z8") == 0)
  58                 return CHIMARA_IF_FORMAT_Z8;
  59         if(strcmp(format, "zblorb") == 0)
  60                 return CHIMARA_IF_FORMAT_Z_BLORB;
  61         if(strcmp(format, "glulx") == 0)
  62                 return CHIMARA_IF_FORMAT_GLULX;
  63         if(strcmp(format, "gblorb") == 0)
  64                 return CHIMARA_IF_FORMAT_GLULX_BLORB;
  65         return CHIMARA_IF_FORMAT_NONE;
  66 }
  67
  68 static const char *format_strings[CHIMARA_IF_NUM_FORMATS] = {
  69         "z5", "z6", "z8", "zblorb", "glulx", "gblorb"
  70 };
  71
  72 static const char *format_to_string(ChimaraIFFormat format)
  73 {
  74         if(format >= 0 && format < CHIMARA_IF_NUM_FORMATS)
  75                 return format_strings[format];
  76         return "unknown";
  77 }
  78
  79 static const char *format_display_strings[CHIMARA_IF_NUM_FORMATS] = {
  80         N_("Z-machine version 5"),
  81         N_("Z-machine version 6"),
  82         N_("Z-machine version 8"),
  83         N_("Z-machine Blorb file"),
  84         N_("Glulx"),
  85         N_("Glulx Blorb file")
  86 };
  87
  88 static const char *
  89 format_to_display_string(ChimaraIFFormat format)
  90 {
  91         if(format >= 0 && format < CHIMARA_IF_NUM_FORMATS)
  92                 return gettext(format_display_strings[format]);
  93         return _("Unknown");
  94 }
  95
  96 static ChimaraIFInterpreter
  97 parse_interpreter(const char *interp)
  98 {
  99         if(strcmp(interp, "frotz") == 0)
 100                 return CHIMARA_IF_INTERPRETER_FROTZ;
 101         if(strcmp(interp, "nitfol") == 0)
 102                 return CHIMARA_IF_INTERPRETER_NITFOL;
 103         if(strcmp(interp, "glulxe") == 0)
 104                 return CHIMARA_IF_INTERPRETER_GLULXE;
 105         if(strcmp(interp, "git") == 0)
 106                 return CHIMARA_IF_INTERPRETER_GIT;
 107         return CHIMARA_IF_INTERPRETER_NONE;
 108 }
 109
 110 static const char *interpreter_strings[CHIMARA_IF_NUM_INTERPRETERS] = {
 111         "frotz", "nitfol", "glulxe", "git"
 112 };
 113
 114 static const char *
 115 interpreter_to_string(ChimaraIFInterpreter interp)
 116 {
 117         if(interp >= 0 && interp < CHIMARA_IF_NUM_INTERPRETERS)
 118                 return interpreter_strings[interp];
 119         return "unknown";
 120 }
 121
 122 static const char *interpreter_display_strings[CHIMARA_IF_NUM_INTERPRETERS] = {
 123         N_("Frotz"),
 124         N_("Nitfol"),
 125         N_("Glulxe"),
 126         N_("Git")
 127 };
 128
 129 static const char *
 130 interpreter_to_display_string(ChimaraIFInterpreter interp)
 131 {
 132         if(interp >= 0 && interp < CHIMARA_IF_NUM_INTERPRETERS)
 133                 return gettext(interpreter_display_strings[interp]);
 134         return _("Unknown");
 135 }
 136
 137 /* Create the preferences dialog. */
 138 void
 139 preferences_create(ChimaraGlk *glk)
 140 {
 141         /* Initialize the tree of style names */
 142         GtkTreeStore *style_list = gtk_tree_store_new(1, G_TYPE_STRING);
 143         GtkTreeIter buffer, grid, buffer_child, grid_child;
 144
 145         gtk_tree_store_append(style_list, &buffer, NULL);
 146         gtk_tree_store_append(style_list, &grid, NULL);
 147         gtk_tree_store_set(style_list, &buffer, 0, "Text buffer", -1);
 148         gtk_tree_store_set(style_list, &grid, 0, "Text grid", -1);
 149
 150         int i;
 151     gint num_tags = chimara_glk_get_num_tag_names(glk);
 152         const gchar **tag_names = chimara_glk_get_tag_names(glk);
 153         for(i=0; i<num_tags; i++) {
 154                 gtk_tree_store_append(style_list, &buffer_child, &buffer);
 155                 gtk_tree_store_append(style_list, &grid_child, &grid);
 156                 gtk_tree_store_set(style_list, &buffer_child, 0, tag_names[i], -1);
 157                 gtk_tree_store_set(style_list, &grid_child, 0, tag_names[i], -1);
 158         }
 159
 160         /* Attach the model to the treeview */
 161         GtkTreeView *view = GTK_TREE_VIEW( load_object("style-treeview") );
 162         gtk_tree_view_set_model(view, GTK_TREE_MODEL(style_list));
 163         g_object_unref(style_list);
 164
 165         /* Set the columns */
 166         GtkTreeViewColumn *column = gtk_tree_view_column_new();
 167         gtk_tree_view_column_set_title(column, "Style Name");
 168         gtk_tree_view_append_column(view, column);
 169
 170         /* Set the renderers */
 171         GtkCellRenderer *renderer = gtk_cell_renderer_text_new();
 172         gtk_tree_view_column_pack_start(column, renderer, TRUE);
 173         gtk_tree_view_column_add_attribute(column, renderer, "text", 0);
 174
 175         /* Set selection mode to single select */
 176         GtkTreeSelection *selection = gtk_tree_view_get_selection(view);
 177         gtk_tree_selection_set_mode(selection, GTK_SELECTION_SINGLE);
 178
 179         g_signal_connect(selection, "changed", G_CALLBACK(style_tree_select_callback), glk);
 180
 181         /* Bind the preferences to the entries in the preferences file */
 182         extern GSettings *prefs_settings;
 183         GObject *flep = G_OBJECT( load_object("flep") );
 184         g_settings_bind(prefs_settings, "flep", flep, "active", G_SETTINGS_BIND_DEFAULT);
 185         GtkFileChooser *blorb_chooser = GTK_FILE_CHOOSER( load_object("blorb_file_chooser") );
 186         char *filename;
 187         g_settings_get(prefs_settings, "resource-path", "ms", &filename);
 188         if(filename) {
 189                 gtk_file_chooser_set_filename(blorb_chooser, filename);
 190                 g_free(filename);
 191         }
 192
 193         /* Populate the list of available interpreters */
 194         GtkListStore *interp_list = GTK_LIST_STORE( load_object("available_interpreters") );
 195         unsigned int count;
 196         GtkTreeIter tree_iter;
 197         for(count = 0; count < CHIMARA_IF_NUM_INTERPRETERS; count++) {
 198                 gtk_list_store_append(interp_list, &tree_iter);
 199                 gtk_list_store_set(interp_list, &tree_iter,
 200                         0, interpreter_to_display_string(count),
 201                         -1);
 202         }
 203
 204         /* Get the list of preferred interpreters from the preferences */
 205         GVariantIter *iter;
 206         char *format, *plugin;
 207         g_settings_get(prefs_settings, "preferred-interpreters", "a{ss}", &iter);
 208         while(g_variant_iter_loop(iter, "{ss}", &format, &plugin)) {
 209                 ChimaraIFFormat format_num = parse_format(format);
 210                 if(format_num == CHIMARA_IF_FORMAT_NONE)
 211                         continue;
 212                 ChimaraIFInterpreter interp_num = parse_interpreter(plugin);
 213                 if(interp_num == CHIMARA_IF_INTERPRETER_NONE)
 214                         continue;
 215                 chimara_if_set_preferred_interpreter(CHIMARA_IF(glk), format_num, interp_num);
 216         }
 217         g_variant_iter_free(iter);
 218
 219         /* Display it all in the list */
 220         preferred_list = GTK_LIST_STORE( load_object("interpreters") );
 221         for(count = 0; count < CHIMARA_IF_NUM_FORMATS; count++) {
 222                 gtk_list_store_append(preferred_list, &tree_iter);
 223                 gtk_list_store_set(preferred_list, &tree_iter,
 224                         0, format_to_display_string(count),
 225                         1, interpreter_to_display_string(chimara_if_get_preferred_interpreter(CHIMARA_IF(glk), count)),
 226                         -1);
 227         }
 228 }
 229
 230 static void
 231 style_tree_select_callback(GtkTreeSelection *selection, ChimaraGlk *glk)
 232 {
 233         GtkTreeIter child, parent;
 234         gchar *child_name, *parent_name;
 235         GtkTreeModel *model;
 236
 237         if( !gtk_tree_selection_get_selected(selection, &model, &child) )
 238                 return;
 239
 240         gtk_tree_model_get(model, &child, 0, &child_name, -1);
 241
 242         if( !gtk_tree_model_iter_parent(model, &parent, &child) )
 243                 return;
 244
 245         gtk_tree_model_get(model, &parent, 0, &parent_name, -1);
 246         if( !strcmp(parent_name, "Text buffer") )
 247                 current_tag = chimara_glk_get_tag(glk, CHIMARA_GLK_TEXT_BUFFER, child_name);
 248         else
 249                 current_tag = chimara_glk_get_tag(glk, CHIMARA_GLK_TEXT_GRID, child_name);
 250 }
 251
 252 void
 253 on_toggle_left(GtkToggleToolButton *button, ChimaraGlk *glk) {
 254         /* No nothing if the button is deactivated */
 255         if( !gtk_toggle_tool_button_get_active(button) )
 256                 return;
 257
 258         /* Untoggle other alignment options */
 259         GtkToggleToolButton *center = GTK_TOGGLE_TOOL_BUTTON(load_object("toolbutton-center"));
 260         GtkToggleToolButton *right = GTK_TOGGLE_TOOL_BUTTON(load_object("toolbutton-right"));
 261         GtkToggleToolButton *justify = GTK_TOGGLE_TOOL_BUTTON(load_object("toolbutton-justify"));
 262         gtk_toggle_tool_button_set_active(center, FALSE);
 263         gtk_toggle_tool_button_set_active(right, FALSE);
 264         gtk_toggle_tool_button_set_active(justify, FALSE);
 265
 266         g_object_set(current_tag, "justification", GTK_JUSTIFY_LEFT, "justification-set", TRUE, NULL);
 267         chimara_glk_update_style(glk);
 268 }
 269
 270 void
 271 on_toggle_center(GtkToggleToolButton *button, ChimaraGlk *glk) {
 272         if( !gtk_toggle_tool_button_get_active(button) )
 273                 return;
 274
 275         /* Untoggle other alignment options */
 276         GtkToggleToolButton *left = GTK_TOGGLE_TOOL_BUTTON(load_object("toolbutton-left"));
 277         GtkToggleToolButton *right = GTK_TOGGLE_TOOL_BUTTON(load_object("toolbutton-right"));
 278         GtkToggleToolButton *justify = GTK_TOGGLE_TOOL_BUTTON(load_object("toolbutton-justify"));
 279         gtk_toggle_tool_button_set_active(left, FALSE);
 280         gtk_toggle_tool_button_set_active(right, FALSE);
 281         gtk_toggle_tool_button_set_active(justify, FALSE);
 282
 283         g_object_set(current_tag, "justification", GTK_JUSTIFY_CENTER, "justification-set", TRUE, NULL);
 284         chimara_glk_update_style(glk);
 285 }
 286
 287 void
 288 on_toggle_right(GtkToggleToolButton *button, ChimaraGlk *glk) {
 289         if( !gtk_toggle_tool_button_get_active(button) )
 290                 return;
 291
 292         /* Untoggle other alignment options */
 293         GtkToggleToolButton *left = GTK_TOGGLE_TOOL_BUTTON(load_object("toolbutton-left"));
 294         GtkToggleToolButton *center = GTK_TOGGLE_TOOL_BUTTON(load_object("toolbutton-center"));
 295         GtkToggleToolButton *justify = GTK_TOGGLE_TOOL_BUTTON(load_object("toolbutton-justify"));
 296         gtk_toggle_tool_button_set_active(left, FALSE);
 297         gtk_toggle_tool_button_set_active(center, FALSE);
 298         gtk_toggle_tool_button_set_active(justify, FALSE);
 299
 300         g_object_set(current_tag, "justification", GTK_JUSTIFY_RIGHT, "justification-set", TRUE, NULL);
 301         chimara_glk_update_style(glk);
 302 }
 303
 304 void
 305 on_toggle_justify(GtkToggleToolButton *button, ChimaraGlk *glk) {
 306         if( !gtk_toggle_tool_button_get_active(button) )
 307                 return;
 308
 309         /* Untoggle other alignment options */
 310         GtkToggleToolButton *left = GTK_TOGGLE_TOOL_BUTTON(load_object("toolbutton-left"));
 311         GtkToggleToolButton *center = GTK_TOGGLE_TOOL_BUTTON(load_object("toolbutton-center"));
 312         GtkToggleToolButton *right = GTK_TOGGLE_TOOL_BUTTON(load_object("toolbutton-right"));
 313         gtk_toggle_tool_button_set_active(left, FALSE);
 314         gtk_toggle_tool_button_set_active(center, FALSE);
 315         gtk_toggle_tool_button_set_active(right, FALSE);
 316
 317         g_object_set(current_tag, "justification", GTK_JUSTIFY_FILL, "justification-set", TRUE, NULL);
 318         chimara_glk_update_style(glk);
 319 }
 320
 321 void
 322 on_toggle_bold(GtkToggleToolButton *button, ChimaraGlk *glk) {
 323         if( gtk_toggle_tool_button_get_active(button) )
 324                 g_object_set(current_tag, "weight", PANGO_WEIGHT_BOLD, "weight-set", TRUE, NULL);
 325         else
 326                 g_object_set(current_tag, "weight", PANGO_WEIGHT_NORMAL, "weight-set", TRUE, NULL);
 327
 328         chimara_glk_update_style(glk);
 329 }
 330
 331 void
 332 on_toggle_italic(GtkToggleToolButton *button, ChimaraGlk *glk) {
 333         if( gtk_toggle_tool_button_get_active(button) )
 334                 g_object_set(current_tag, "style", PANGO_STYLE_ITALIC, "style-set", TRUE, NULL);
 335         else
 336                 g_object_set(current_tag, "style", PANGO_STYLE_NORMAL, "style-set", TRUE, NULL);
 337
 338         chimara_glk_update_style(glk);
 339 }
 340
 341 void
 342 on_toggle_underline(GtkToggleToolButton *button, ChimaraGlk *glk) {
 343         if( gtk_toggle_tool_button_get_active(button) )
 344                 g_object_set(current_tag, "underline", PANGO_UNDERLINE_SINGLE, "underline-set", TRUE, NULL);
 345         else
 346                 g_object_set(current_tag, "underline", PANGO_UNDERLINE_NONE, "underline-set", TRUE, NULL);
 347
 348         chimara_glk_update_style(glk);
 349 }
 350
 351 void
 352 on_foreground_color_set(GtkColorButton *button, ChimaraGlk *glk)
 353 {
 354         GdkColor color;
 355     gtk_color_button_get_color(button, &color);
 356         g_object_set(current_tag, "foreground-gdk", &color, "foreground-set", TRUE, NULL);
 357         chimara_glk_update_style(glk);
 358 }
 359
 360 void
 361 on_background_color_set(GtkColorButton *button, ChimaraGlk *glk)
 362 {
 363         GdkColor color;
 364     gtk_color_button_get_color(button, &color);
 365         g_object_set(current_tag, "background-gdk", &color, "background-set", TRUE, NULL);
 366         chimara_glk_update_style(glk);
 367 }
 368
 369 void
 370 on_font_set(GtkFontButton *button, ChimaraGlk *glk)
 371 {
 372         const gchar *font_name = gtk_font_button_get_font_name(button);
 373         PangoFontDescription *font_description = pango_font_description_from_string(font_name);
 374         g_object_set(current_tag, "font-desc", font_description, NULL);
 375         chimara_glk_update_style(glk);
 376 }
 377
 378 void
 379 on_resource_file_set(GtkFileChooserButton *button, ChimaraGlk *glk)
 380 {
 381         extern GSettings *prefs_settings;
 382         char *filename = gtk_file_chooser_get_filename( GTK_FILE_CHOOSER(button) );
 383         g_settings_set(prefs_settings, "resource-path", "ms", filename);
 384         g_free(filename);
 385 }
 386
 387 void
 388 on_interpreter_cell_changed(GtkCellRendererCombo *combo, char *path_string, GtkTreeIter *new_iter, ChimaraGlk *glk)
 389 {
 390         unsigned int format, interpreter;
 391         format = (unsigned int)strtol(path_string, NULL, 10);
 392         GtkTreeModel *combo_model;
 393         g_object_get(combo, "model", &combo_model, NULL);
 394         char *combo_string = gtk_tree_model_get_string_from_iter(combo_model, new_iter);
 395         interpreter = (unsigned int)strtol(combo_string, NULL, 10);
 396         g_free(combo_string);
 397
 398         chimara_if_set_preferred_interpreter(CHIMARA_IF(glk), format, interpreter);
 399
 400         /* Display the new setting in the list */
 401         GtkTreeIter iter;
 402         GtkTreePath *path = gtk_tree_path_new_from_string(path_string);
 403         gtk_tree_model_get_iter(GTK_TREE_MODEL(preferred_list), &iter, path);
 404         gtk_tree_path_free(path);
 405         gtk_list_store_set(preferred_list, &iter,
 406                 1, interpreter_to_display_string(interpreter),
 407                 -1);
 408
 409         /* Save the new settings in the preferences file */
 410         extern GSettings *prefs_settings;
 411         GVariantBuilder *builder = g_variant_builder_new( G_VARIANT_TYPE("a{ss}") );
 412         unsigned int count;
 413         for(count = 0; count < CHIMARA_IF_NUM_FORMATS; count++) {
 414                 g_variant_builder_add(builder, "{ss}",
 415                         format_to_string(count),
 416                         interpreter_to_string(chimara_if_get_preferred_interpreter(CHIMARA_IF(glk), count)));
 417         }
 418         g_settings_set(prefs_settings, "preferred-interpreters", "a{ss}", builder);
 419         g_variant_builder_unref(builder);
 420 }