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