]> Pileus Git - ~andy/gtk/blob - gtk/gtksettings.c
Fix problems with setting symbolic colors from rc files. (#338345,
[~andy/gtk] / gtk / gtksettings.c
1 /* GTK - The GIMP Toolkit
2  * Copyright (C) 2000 Red Hat, Inc.
3  *
4  * This library is free software; you can redistribute it and/or
5  * modify it under the terms of the GNU Lesser General Public
6  * License as published by the Free Software Foundation; either
7  * version 2 of the License, or (at your option) any later version.
8  *
9  * This library is distributed in the hope that it will be useful,
10  * but WITHOUT ANY WARRANTY; without even the implied warranty of
11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
12  * Lesser General Public License for more details.
13  *
14  * You should have received a copy of the GNU Lesser General Public
15  * License along with this library; if not, write to the Free
16  * Software Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
17  */
18
19 #include <config.h>
20
21 #include <string.h>
22
23 #include "gtkmodules.h"
24 #include "gtksettings.h"
25 #include "gtkrc.h"
26 #include "gtkintl.h"
27 #include "gtkwidget.h"
28 #include "gtkprivate.h"
29 #include "gtkalias.h"
30
31 #ifdef GDK_WINDOWING_X11
32 #include "x11/gdkx.h"
33 #endif
34
35 #define DEFAULT_TIMEOUT_INITIAL 200
36 #define DEFAULT_TIMEOUT_REPEAT   20
37 #define DEFAULT_TIMEOUT_EXPAND  500
38
39 typedef struct _GtkSettingsValuePrivate GtkSettingsValuePrivate;
40
41 typedef enum
42 {
43   GTK_SETTINGS_SOURCE_DEFAULT,
44   GTK_SETTINGS_SOURCE_RC_FILE,
45   GTK_SETTINGS_SOURCE_XSETTING,
46   GTK_SETTINGS_SOURCE_APPLICATION
47 } GtkSettingsSource;
48
49 struct _GtkSettingsValuePrivate
50 {
51   GtkSettingsValue public;
52   GtkSettingsSource source;
53 };
54
55 struct _GtkSettingsPropertyValue
56 {
57   GValue value;
58   GtkSettingsSource source;
59 };
60
61 enum {
62   PROP_0,
63   PROP_DOUBLE_CLICK_TIME,
64   PROP_DOUBLE_CLICK_DISTANCE,
65   PROP_CURSOR_BLINK,
66   PROP_CURSOR_BLINK_TIME,
67   PROP_SPLIT_CURSOR,
68   PROP_THEME_NAME,
69   PROP_ICON_THEME_NAME,
70   PROP_FALLBACK_ICON_THEME,
71   PROP_KEY_THEME_NAME,
72   PROP_MENU_BAR_ACCEL,
73   PROP_DND_DRAG_THRESHOLD,
74   PROP_FONT_NAME,
75   PROP_ICON_SIZES,
76   PROP_MODULES,
77 #ifdef GDK_WINDOWING_X11
78   PROP_XFT_ANTIALIAS,
79   PROP_XFT_HINTING,
80   PROP_XFT_HINTSTYLE,
81   PROP_XFT_RGBA,
82   PROP_XFT_DPI,
83   PROP_CURSOR_THEME_NAME,
84   PROP_CURSOR_THEME_SIZE,
85 #endif
86   PROP_ALTERNATIVE_BUTTON_ORDER,
87   PROP_SHOW_INPUT_METHOD_MENU,
88   PROP_SHOW_UNICODE_MENU,
89   PROP_TIMEOUT_INITIAL,
90   PROP_TIMEOUT_REPEAT,
91   PROP_TIMEOUT_EXPAND,
92   PROP_COLOR_SCHEME,
93   PROP_ENABLE_ANIMATIONS,
94   PROP_TOUCHSCREEN_MODE,
95   PROP_COLOR_HASH
96 };
97
98
99 /* --- prototypes --- */
100 static void     gtk_settings_init                (GtkSettings           *settings);
101 static void     gtk_settings_class_init          (GtkSettingsClass      *class);
102 static void     gtk_settings_finalize            (GObject               *object);
103 static void     gtk_settings_get_property        (GObject               *object,
104                                                   guint                  property_id,
105                                                   GValue                *value,
106                                                   GParamSpec            *pspec);
107 static void     gtk_settings_set_property        (GObject               *object,
108                                                   guint                  property_id,
109                                                   const GValue          *value,
110                                                   GParamSpec            *pspec);
111 static void     gtk_settings_notify              (GObject               *object,
112                                                   GParamSpec            *pspec);
113 static guint    settings_install_property_parser (GtkSettingsClass      *class,
114                                                   GParamSpec            *pspec,
115                                                   GtkRcPropertyParser    parser);
116 static void    settings_update_double_click      (GtkSettings           *settings);
117 static void    settings_update_modules           (GtkSettings           *settings);
118
119 #ifdef GDK_WINDOWING_X11
120 static void    settings_update_cursor_theme      (GtkSettings           *settings);
121 static void    settings_update_resolution        (GtkSettings           *settings);
122 static void    settings_update_font_options      (GtkSettings           *settings);
123 #endif
124 static void    settings_update_color_scheme      (GtkSettings *settings);
125
126 static void    merge_color_scheme                (GtkSettings           *settings, 
127                                                   GValue                *value, 
128                                                   GtkSettingsSource      source);
129 static gchar  *get_color_scheme                  (GtkSettings           *settings);
130 static GHashTable *get_color_hash                (GtkSettings           *settings);
131
132
133 /* --- variables --- */
134 static gpointer          parent_class = NULL;
135 static GQuark            quark_property_parser = 0;
136 static GSList           *object_list = NULL;
137 static guint             class_n_properties = 0;
138
139
140 /* --- functions --- */
141 GType
142 gtk_settings_get_type (void)
143 {
144   static GType settings_type = 0;
145   
146   if (!settings_type)
147     {
148       static const GTypeInfo settings_info =
149       {
150         sizeof (GtkSettingsClass),
151         NULL,           /* base_init */
152         NULL,           /* base_finalize */
153         (GClassInitFunc) gtk_settings_class_init,
154         NULL,           /* class_finalize */
155         NULL,           /* class_data */
156         sizeof (GtkSettings),
157         0,              /* n_preallocs */
158         (GInstanceInitFunc) gtk_settings_init,
159       };
160       
161       settings_type = g_type_register_static (G_TYPE_OBJECT, I_("GtkSettings"),
162                                               &settings_info, 0);
163     }
164   
165   return settings_type;
166 }
167
168 static void
169 gtk_settings_init (GtkSettings *settings)
170 {
171   GParamSpec **pspecs, **p;
172   guint i = 0;
173   
174   g_datalist_init (&settings->queued_settings);
175   object_list = g_slist_prepend (object_list, settings);
176
177   /* build up property array for all yet existing properties and queue
178    * notification for them (at least notification for internal properties
179    * will instantly be caught)
180    */
181   pspecs = g_object_class_list_properties (G_OBJECT_GET_CLASS (settings), NULL);
182   for (p = pspecs; *p; p++)
183     if ((*p)->owner_type == G_OBJECT_TYPE (settings))
184       i++;
185   settings->property_values = g_new0 (GtkSettingsPropertyValue, i);
186   i = 0;
187   g_object_freeze_notify (G_OBJECT (settings));
188   for (p = pspecs; *p; p++)
189     {
190       GParamSpec *pspec = *p;
191
192       if (pspec->owner_type != G_OBJECT_TYPE (settings))
193         continue;
194       g_value_init (&settings->property_values[i].value, G_PARAM_SPEC_VALUE_TYPE (pspec));
195       g_param_value_set_default (pspec, &settings->property_values[i].value);
196       g_object_notify (G_OBJECT (settings), pspec->name);
197       settings->property_values[i].source = GTK_SETTINGS_SOURCE_DEFAULT;
198       i++;
199     }
200   g_object_thaw_notify (G_OBJECT (settings));
201   g_free (pspecs);
202 }
203
204 static void
205 gtk_settings_class_init (GtkSettingsClass *class)
206 {
207   GObjectClass *gobject_class = G_OBJECT_CLASS (class);
208   guint result;
209   
210   parent_class = g_type_class_peek_parent (class);
211
212   gobject_class->finalize = gtk_settings_finalize;
213   gobject_class->get_property = gtk_settings_get_property;
214   gobject_class->set_property = gtk_settings_set_property;
215   gobject_class->notify = gtk_settings_notify;
216
217   quark_property_parser = g_quark_from_static_string ("gtk-rc-property-parser");
218   result = settings_install_property_parser (class,
219                                              g_param_spec_int ("gtk-double-click-time",
220                                                                P_("Double Click Time"),
221                                                                P_("Maximum time allowed between two clicks for them to be considered a double click (in milliseconds)"),
222                                                                0, G_MAXINT, 250,
223                                                                GTK_PARAM_READWRITE),
224                                              NULL);
225   g_assert (result == PROP_DOUBLE_CLICK_TIME);
226   result = settings_install_property_parser (class,
227                                              g_param_spec_int ("gtk-double-click-distance",
228                                                                P_("Double Click Distance"),
229                                                                P_("Maximum distance allowed between two clicks for them to be considered a double click (in pixels)"),
230                                                                0, G_MAXINT, 5,
231                                                                GTK_PARAM_READWRITE),
232                                              NULL);
233   g_assert (result == PROP_DOUBLE_CLICK_DISTANCE);
234   result = settings_install_property_parser (class,
235                                              g_param_spec_boolean ("gtk-cursor-blink",
236                                                                    P_("Cursor Blink"),
237                                                                    P_("Whether the cursor should blink"),
238                                                                    TRUE,
239                                                                    GTK_PARAM_READWRITE),
240                                              NULL);
241   g_assert (result == PROP_CURSOR_BLINK);
242   result = settings_install_property_parser (class,
243                                              g_param_spec_int ("gtk-cursor-blink-time",
244                                                                P_("Cursor Blink Time"),
245                                                                P_("Length of the cursor blink cycle, in milleseconds"),
246                                                                100, G_MAXINT, 1200,
247                                                                GTK_PARAM_READWRITE),
248                                              NULL);
249   g_assert (result == PROP_CURSOR_BLINK_TIME);
250   result = settings_install_property_parser (class,
251                                              g_param_spec_boolean ("gtk-split-cursor",
252                                                                    P_("Split Cursor"),
253                                                                    P_("Whether two cursors should be displayed for mixed left-to-right and right-to-left text"),
254                                                                    TRUE,
255                                                                    GTK_PARAM_READWRITE),
256                                              NULL);
257   g_assert (result == PROP_SPLIT_CURSOR);
258   result = settings_install_property_parser (class,
259                                              g_param_spec_string ("gtk-theme-name",
260                                                                    P_("Theme Name"),
261                                                                    P_("Name of theme RC file to load"),
262                                                                   "Raleigh",
263                                                                   GTK_PARAM_READWRITE),
264                                              NULL);
265   g_assert (result == PROP_THEME_NAME);
266
267   result = settings_install_property_parser (class,
268                                              g_param_spec_string ("gtk-icon-theme-name",
269                                                                   P_("Icon Theme Name"),
270                                                                   P_("Name of icon theme to use"),
271                                                                   "hicolor",
272                                                                   GTK_PARAM_READWRITE),
273                                              NULL);
274   g_assert (result == PROP_ICON_THEME_NAME);
275
276   result = settings_install_property_parser (class,
277                                              g_param_spec_string ("gtk-fallback-icon-theme",
278                                                                   P_("Fallback Icon Theme Name"),
279                                                                   P_("Name of a icon theme to fall back to"),
280                                                                   NULL,
281                                                                   GTK_PARAM_READWRITE),
282                                              NULL);
283   g_assert (result == PROP_FALLBACK_ICON_THEME);
284   
285   result = settings_install_property_parser (class,
286                                              g_param_spec_string ("gtk-key-theme-name",
287                                                                   P_("Key Theme Name"),
288                                                                   P_("Name of key theme RC file to load"),
289                                                                   NULL,
290                                                                   GTK_PARAM_READWRITE),
291                                              NULL);
292   g_assert (result == PROP_KEY_THEME_NAME);    
293
294   result = settings_install_property_parser (class,
295                                              g_param_spec_string ("gtk-menu-bar-accel",
296                                                                   P_("Menu bar accelerator"),
297                                                                   P_("Keybinding to activate the menu bar"),
298                                                                   "F10",
299                                                                   GTK_PARAM_READWRITE),
300                                              NULL);
301   g_assert (result == PROP_MENU_BAR_ACCEL);
302
303   result = settings_install_property_parser (class,
304                                              g_param_spec_int ("gtk-dnd-drag-threshold",
305                                                                P_("Drag threshold"),
306                                                                P_("Number of pixels the cursor can move before dragging"),
307                                                                1, G_MAXINT, 8,
308                                                                GTK_PARAM_READWRITE),
309                                              NULL);
310   g_assert (result == PROP_DND_DRAG_THRESHOLD);
311
312   result = settings_install_property_parser (class,
313                                              g_param_spec_string ("gtk-font-name",
314                                                                    P_("Font Name"),
315                                                                    P_("Name of default font to use"),
316                                                                   "Sans 10",
317                                                                   GTK_PARAM_READWRITE),
318                                              NULL);
319   g_assert (result == PROP_FONT_NAME);
320
321   result = settings_install_property_parser (class,
322                                              g_param_spec_string ("gtk-icon-sizes",
323                                                                    P_("Icon Sizes"),
324                                                                    P_("List of icon sizes (gtk-menu=16,16:gtk-button=20,20..."),
325                                                                   NULL,
326                                                                   GTK_PARAM_READWRITE),
327                                              NULL);
328   g_assert (result == PROP_ICON_SIZES);
329
330   result = settings_install_property_parser (class,
331                                              g_param_spec_string ("gtk-modules",
332                                                                   P_("GTK Modules"),
333                                                                   P_("List of currently active GTK modules"),
334                                                                   NULL,
335                                                                   GTK_PARAM_READWRITE),
336                                              NULL);
337   g_assert (result == PROP_MODULES);
338
339 #ifdef GDK_WINDOWING_X11
340   result = settings_install_property_parser (class,
341                                              g_param_spec_int ("gtk-xft-antialias",
342                                                                P_("Xft Antialias"),
343                                                                P_("Whether to antialias Xft fonts; 0=no, 1=yes, -1=default"),
344                                                                -1, 1, -1,
345                                                                GTK_PARAM_READWRITE),
346                                              NULL);
347  
348   g_assert (result == PROP_XFT_ANTIALIAS);
349   
350   result = settings_install_property_parser (class,
351                                              g_param_spec_int ("gtk-xft-hinting",
352                                                                P_("Xft Hinting"),
353                                                                P_("Whether to hint Xft fonts; 0=no, 1=yes, -1=default"),
354                                                                -1, 1, -1,
355                                                                GTK_PARAM_READWRITE),
356                                              NULL);
357   
358   g_assert (result == PROP_XFT_HINTING);
359   
360   result = settings_install_property_parser (class,
361                                              g_param_spec_string ("gtk-xft-hintstyle",
362                                                                   P_("Xft Hint Style"),
363                                                                   P_("What degree of hinting to use; hintnone, hintslight, hintmedium, or hintfull"),
364                                                                   NULL,
365                                                                   GTK_PARAM_READWRITE),
366                                               NULL);
367   
368   g_assert (result == PROP_XFT_HINTSTYLE);
369   
370   result = settings_install_property_parser (class,
371                                              g_param_spec_string ("gtk-xft-rgba",
372                                                                   P_("Xft RGBA"),
373                                                                   P_("Type of subpixel antialiasing; none, rgb, bgr, vrgb, vbgr"),
374                                                                   NULL,
375                                                                   GTK_PARAM_READWRITE),
376                                              NULL);
377   
378   g_assert (result == PROP_XFT_RGBA);
379   
380   result = settings_install_property_parser (class,
381                                              g_param_spec_int ("gtk-xft-dpi",
382                                                                P_("Xft DPI"),
383                                                                P_("Resolution for Xft, in 1024 * dots/inch. -1 to use default value"),
384                                                                -1, 1024*1024, -1,
385                                                                GTK_PARAM_READWRITE),
386                                              NULL);
387   
388   g_assert (result == PROP_XFT_DPI);
389
390   result = settings_install_property_parser (class,
391                                              g_param_spec_string ("gtk-cursor-theme-name",
392                                                                   P_("Cursor theme name"),
393                                                                   P_("Name of the cursor theme to use, or NULL to use the default theme"),
394                                                                   NULL,
395                                                                   GTK_PARAM_READWRITE),
396                                              NULL);
397   g_assert (result == PROP_CURSOR_THEME_NAME);
398
399   result = settings_install_property_parser (class,
400                                              g_param_spec_int ("gtk-cursor-theme-size",
401                                                                P_("Cursor theme size"),
402                                                                P_("Size to use for cursors, or 0 to use the default size"),
403                                                                0, 128, 0,
404                                                                GTK_PARAM_READWRITE),
405                                              NULL);
406   
407   g_assert (result == PROP_CURSOR_THEME_SIZE);
408
409 #endif  /* GDK_WINDOWING_X11 */
410   result = settings_install_property_parser (class,
411                                              g_param_spec_boolean ("gtk-alternative-button-order",
412                                                                    P_("Alternative button order"),
413                                                                    P_("Whether buttons in dialogs should use the alternative button order"),
414                                                                    FALSE,
415                                                                    GTK_PARAM_READWRITE),
416                                              NULL);
417   g_assert (result == PROP_ALTERNATIVE_BUTTON_ORDER);
418
419   result = settings_install_property_parser (class,
420                                              g_param_spec_boolean ("gtk-show-input-method-menu",
421                                                                    P_("Show the 'Input Methods' menu"),
422                                                                    P_("Whether the context menus of entries and text views should offer to change the input method"),
423                                                                    TRUE,
424                                                                    GTK_PARAM_READWRITE),
425                                              NULL);
426   g_assert (result == PROP_SHOW_INPUT_METHOD_MENU);
427
428   result = settings_install_property_parser (class,
429                                              g_param_spec_boolean ("gtk-show-unicode-menu",
430                                                                    P_("Show the 'Insert Unicode Control Character' menu"),
431                                                                    P_("Whether the context menus of entries and text views should offer to insert control characters"),
432                                                                    TRUE,
433                                                                    GTK_PARAM_READWRITE),
434                                              NULL);
435   g_assert (result == PROP_SHOW_UNICODE_MENU);
436
437   result = settings_install_property_parser (class,
438                                              g_param_spec_int ("gtk-timeout-initial",
439                                                                P_("Start timeout"),
440                                                                P_("Starting value for timeouts, when button is pressed"),
441                                                                0, G_MAXINT, DEFAULT_TIMEOUT_INITIAL,
442                                                                GTK_PARAM_READWRITE),
443                                              NULL);
444
445   g_assert (result == PROP_TIMEOUT_INITIAL);
446
447   result = settings_install_property_parser (class,
448                                              g_param_spec_int ("gtk-timeout-repeat",
449                                                                P_("Repeat timeout"),
450                                                                P_("Repeat value for timeouts, when button is pressed"),
451                                                                0, G_MAXINT, DEFAULT_TIMEOUT_REPEAT,
452                                                                GTK_PARAM_READWRITE),
453                                              NULL);
454
455   g_assert (result == PROP_TIMEOUT_REPEAT);
456
457   result = settings_install_property_parser (class,
458                                              g_param_spec_int ("gtk-timeout-expand",
459                                                                P_("Expand timeout"),
460                                                                P_("Expand value for timeouts, when a widget is expanding a new region"),
461                                                                0, G_MAXINT, DEFAULT_TIMEOUT_EXPAND,
462                                                                GTK_PARAM_READWRITE),
463                                              NULL);
464
465   g_assert (result == PROP_TIMEOUT_EXPAND);
466
467   /**
468    * GtkSettings:gtk-color-scheme:
469    *
470    * A palette of named colors for use in themes. The format of the string is
471    * <programlisting>
472    * name1: color1
473    * name2: color2
474    * ...
475    * </programlisting>
476    * Color names must be acceptable as identifiers in the 
477    * <link linkend="gtk-Resource-Files">gtkrc</link> syntax, and
478    * color specifications must be in the format accepted by
479    * gdk_color_parse().
480    * 
481    * Note that due to the way the color tables from different sources are
482    * merged, color specifications will be converted to hexadecimal form
483    * when getting this property.
484    *
485    * Since: 2.10
486    */
487   result = settings_install_property_parser (class,
488                                              g_param_spec_string ("gtk-color-scheme",
489                                                                   P_("Color scheme"),
490                                                                   P_("A palette of named colors for use in themes"),
491                                                                   "",
492                                                                   GTK_PARAM_READWRITE),
493                                              NULL);
494
495   g_assert (result == PROP_COLOR_SCHEME);
496
497   result = settings_install_property_parser (class,
498                                              g_param_spec_boolean ("gtk-enable-animations",
499                                                                    P_("Enable Animations"),
500                                                                    P_("Whether to enable toolkit-wide animations."),
501                                                                    TRUE,
502                                                                    GTK_PARAM_READWRITE),
503                                              NULL);
504
505   g_assert (result == PROP_ENABLE_ANIMATIONS);
506
507   /**
508    * GtkSettings:gtk-touchscreen-mode:
509    *
510    * When TRUE, there are no motion notify events delivered on this screen,
511    * and widgets can't use the pointer hovering them for any essential
512    * functionality.
513    *
514    * Since: 2.10
515    */
516   result = settings_install_property_parser (class,
517                                              g_param_spec_boolean ("gtk-touchscreen-mode",
518                                                                    P_("Enable Touchscreen Mode"),
519                                                                    P_("When TRUE, there are no motion notify events delivered on this screen"),
520                                                                    FALSE,
521                                                                    GTK_PARAM_READWRITE),
522                                              NULL);
523
524   g_assert (result == PROP_TOUCHSCREEN_MODE);
525
526   /**
527    * GtkSettings:color-hash:
528    *
529    * Holds a hash table representation of the gtk-color-scheme setting,
530    * mapping color names to #GdkColor<!-- -->s. 
531    *
532    * Since: 2.10
533    */
534   g_object_class_install_property (gobject_class,
535                                    PROP_COLOR_HASH,
536                                    g_param_spec_boxed ("color-hash",
537                                                        P_("Color Hash"),
538                                                        P_("A hash table representation of the color scheme."),
539                                                        G_TYPE_HASH_TABLE,
540                                                        GTK_PARAM_READABLE));
541
542   class_n_properties++;
543 }
544
545 static void
546 gtk_settings_finalize (GObject *object)
547 {
548   GtkSettings *settings = GTK_SETTINGS (object);
549   guint i;
550
551   object_list = g_slist_remove (object_list, settings);
552
553   for (i = 0; i < class_n_properties; i++)
554     g_value_unset (&settings->property_values[i].value);
555   g_free (settings->property_values);
556
557   g_datalist_clear (&settings->queued_settings);
558
559   G_OBJECT_CLASS (parent_class)->finalize (object);
560 }
561
562 /**
563  * gtk_settings_get_for_screen:
564  * @screen : a #GdkScreen.
565  * 
566  * Gets the #GtkSettings object for @screen, creating it if necessary.
567  *
568  * Return value: a #GtkSettings object.
569  *
570  * Since: 2.2
571  */
572 GtkSettings*
573 gtk_settings_get_for_screen (GdkScreen *screen)
574 {
575   GtkSettings *settings;
576   
577   g_return_val_if_fail (GDK_IS_SCREEN (screen), NULL);
578   
579   settings = g_object_get_data (G_OBJECT (screen), "gtk-settings");
580   if (!settings)
581     {
582       settings = g_object_new (GTK_TYPE_SETTINGS, NULL);
583       settings->screen = screen;
584       g_object_set_data (G_OBJECT (screen), I_("gtk-settings"), settings);
585
586       gtk_rc_reparse_all_for_settings (settings, TRUE);
587       settings_update_double_click (settings);
588 #ifdef GDK_WINDOWING_X11
589       settings_update_cursor_theme (settings);
590       settings_update_resolution (settings);
591       settings_update_font_options (settings);
592 #endif
593       settings_update_color_scheme (settings);
594     }
595   
596   return settings;
597 }
598
599 /**
600  * gtk_settings_get_default:
601  * 
602  * Gets the #GtkSettings object for the default GDK screen, creating
603  * it if necessary. See gtk_settings_get_for_screen().
604  * 
605  * Return value: a #GtkSettings object. If there is no default
606  *  screen, then returns %NULL.
607  **/
608 GtkSettings*
609 gtk_settings_get_default (void)
610 {
611   GdkScreen *screen = gdk_screen_get_default ();
612
613   if (screen)
614     return gtk_settings_get_for_screen (screen);
615   else
616     return NULL;
617 }
618
619 static void
620 gtk_settings_set_property (GObject      *object,
621                            guint         property_id,
622                            const GValue *value,
623                            GParamSpec   *pspec)
624 {
625   GtkSettings *settings = GTK_SETTINGS (object);
626
627   g_value_copy (value, &settings->property_values[property_id - 1].value);
628   settings->property_values[property_id - 1].source = GTK_SETTINGS_SOURCE_APPLICATION;
629 }
630
631 static void
632 gtk_settings_get_property (GObject     *object,
633                            guint        property_id,
634                            GValue      *value,
635                            GParamSpec  *pspec)
636 {
637   GtkSettings *settings = GTK_SETTINGS (object);
638   GType value_type = G_VALUE_TYPE (value);
639   GType fundamental_type = G_TYPE_FUNDAMENTAL (value_type);
640
641   if (property_id == PROP_COLOR_HASH)
642     {
643       g_value_set_boxed (value, get_color_hash (settings));
644       return;
645     }
646
647   /* For enums and strings, we need to get the value as a string,
648    * not as an int, since we support using names/nicks as the setting
649    * value.
650    */
651   if ((g_value_type_transformable (G_TYPE_INT, value_type) &&
652        !(fundamental_type == G_TYPE_ENUM || fundamental_type == G_TYPE_FLAGS)) ||
653       g_value_type_transformable (G_TYPE_STRING, G_VALUE_TYPE (value)) ||
654       g_value_type_transformable (GDK_TYPE_COLOR, G_VALUE_TYPE (value)))
655     {
656       if (settings->property_values[property_id - 1].source == GTK_SETTINGS_SOURCE_APPLICATION ||
657           !gdk_screen_get_setting (settings->screen, pspec->name, value))
658         g_value_copy (&settings->property_values[property_id - 1].value, value);
659       else 
660         {
661           if (pspec->param_id == PROP_COLOR_SCHEME)
662             {
663               merge_color_scheme (settings, value, GTK_SETTINGS_SOURCE_XSETTING);
664               g_value_take_string (value, get_color_scheme (settings));
665             }
666           
667           g_param_value_validate (pspec, value);
668         }
669     }
670   else
671     {
672       GValue val = { 0, };
673
674       /* Try to get xsetting as a string and parse it. */
675       
676       g_value_init (&val, G_TYPE_STRING);
677
678       if (settings->property_values[property_id - 1].source == GTK_SETTINGS_SOURCE_APPLICATION ||
679           !gdk_screen_get_setting (settings->screen, pspec->name, &val))
680         {
681           g_value_copy (&settings->property_values[property_id - 1].value, value);
682         }
683       else
684         {
685           GValue tmp_value = { 0, };
686           GValue gstring_value = { 0, };
687           GtkRcPropertyParser parser = (GtkRcPropertyParser) g_param_spec_get_qdata (pspec, quark_property_parser);
688           
689           g_value_init (&gstring_value, G_TYPE_GSTRING);
690           g_value_take_boxed (&gstring_value,
691                               g_string_new (g_value_get_string (&val)));
692
693           g_value_init (&tmp_value, G_PARAM_SPEC_VALUE_TYPE (pspec));
694
695           if (parser && _gtk_settings_parse_convert (parser, &gstring_value,
696                                                      pspec, &tmp_value))
697             {
698               g_value_copy (&tmp_value, value);
699               g_param_value_validate (pspec, value);
700             }
701           else
702             {
703               g_value_copy (&settings->property_values[property_id - 1].value, value);
704             }
705
706           g_value_unset (&gstring_value);
707           g_value_unset (&tmp_value);
708         }
709
710       g_value_unset (&val);
711     }
712 }
713
714 static void
715 gtk_settings_notify (GObject    *object,
716                      GParamSpec *pspec)
717 {
718   GtkSettings *settings = GTK_SETTINGS (object);
719   guint property_id = pspec->param_id;
720
721   if (settings->screen == NULL) /* initialization */
722     return;
723
724   switch (property_id)
725     {
726     case PROP_MODULES:
727       settings_update_modules (settings);
728       break;
729     case PROP_DOUBLE_CLICK_TIME:
730     case PROP_DOUBLE_CLICK_DISTANCE:
731       settings_update_double_click (settings);
732       break;
733     case PROP_COLOR_SCHEME:
734       settings_update_color_scheme (settings);
735       break;
736 #ifdef GDK_WINDOWING_X11
737     case PROP_XFT_DPI:
738       settings_update_resolution (settings);
739       /* This is a hack because with gtk_rc_reset_styles() doesn't get
740        * widgets with gtk_widget_style_set(), and also causes more
741        * recomputation than necessary.
742        */
743       gtk_rc_reset_styles (GTK_SETTINGS (object));
744       break;
745     case PROP_XFT_ANTIALIAS:
746     case PROP_XFT_HINTING:
747     case PROP_XFT_HINTSTYLE:
748     case PROP_XFT_RGBA:
749       settings_update_font_options (settings);
750       gtk_rc_reset_styles (GTK_SETTINGS (object));
751       break;
752     case PROP_CURSOR_THEME_NAME:
753     case PROP_CURSOR_THEME_SIZE:
754       settings_update_cursor_theme (settings);
755       break;
756 #endif /* GDK_WINDOWING_X11 */
757     }
758 }
759
760 gboolean
761 _gtk_settings_parse_convert (GtkRcPropertyParser parser,
762                              const GValue       *src_value,
763                              GParamSpec         *pspec,
764                              GValue             *dest_value)
765 {
766   gboolean success = FALSE;
767
768   g_return_val_if_fail (G_VALUE_HOLDS (dest_value, G_PARAM_SPEC_VALUE_TYPE (pspec)), FALSE);
769
770   if (parser)
771     {
772       GString *gstring;
773       gboolean free_gstring = TRUE;
774       
775       if (G_VALUE_HOLDS (src_value, G_TYPE_GSTRING))
776         {
777           gstring = g_value_get_boxed (src_value);
778           free_gstring = FALSE;
779         }
780       else if (G_VALUE_HOLDS_LONG (src_value))
781         {
782           gstring = g_string_new (NULL);
783           g_string_append_printf (gstring, "%ld", g_value_get_long (src_value));
784         }
785       else if (G_VALUE_HOLDS_DOUBLE (src_value))
786         {
787           gstring = g_string_new (NULL);
788           g_string_append_printf (gstring, "%f", g_value_get_double (src_value));
789         }
790       else if (G_VALUE_HOLDS_STRING (src_value))
791         {
792           gchar *tstr = g_strescape (g_value_get_string (src_value), NULL);
793           
794           gstring = g_string_new ("\"");
795           g_string_append (gstring, tstr);
796           g_string_append_c (gstring, '\"');
797           g_free (tstr);
798         }
799       else
800         {
801           g_return_val_if_fail (G_VALUE_HOLDS (src_value, G_TYPE_GSTRING), FALSE);
802           gstring = NULL; /* silence compiler */
803         }
804
805       success = (parser (pspec, gstring, dest_value) &&
806                  !g_param_value_validate (pspec, dest_value));
807
808       if (free_gstring)
809         g_string_free (gstring, TRUE);
810     }
811   else if (G_VALUE_HOLDS (src_value, G_TYPE_GSTRING))
812     {
813       if (G_VALUE_HOLDS (dest_value, G_TYPE_STRING))
814         {
815           GString *gstring = g_value_get_boxed (src_value);
816
817           g_value_set_string (dest_value, gstring ? gstring->str : NULL);
818           success = !g_param_value_validate (pspec, dest_value);
819         }
820     }
821   else if (g_value_type_transformable (G_VALUE_TYPE (src_value), G_VALUE_TYPE (dest_value)))
822     success = g_param_value_convert (pspec, src_value, dest_value, TRUE);
823
824   return success;
825 }
826
827 static void
828 apply_queued_setting (GtkSettings             *data,
829                       GParamSpec              *pspec,
830                       GtkSettingsValuePrivate *qvalue)
831 {
832   GValue tmp_value = { 0, };
833   GtkRcPropertyParser parser = (GtkRcPropertyParser) g_param_spec_get_qdata (pspec, quark_property_parser);
834
835   g_value_init (&tmp_value, G_PARAM_SPEC_VALUE_TYPE (pspec));
836   if (_gtk_settings_parse_convert (parser, &qvalue->public.value,
837                                    pspec, &tmp_value))
838     {
839       if (pspec->param_id == PROP_COLOR_SCHEME) 
840         {
841           merge_color_scheme (data, &tmp_value, qvalue->source);
842           g_object_set_property (G_OBJECT (data), pspec->name, &tmp_value);
843           data->property_values[pspec->param_id - 1].source = GTK_SETTINGS_SOURCE_DEFAULT;
844         }      
845       
846       else if (data->property_values[pspec->param_id - 1].source <= qvalue->source)
847         {
848           g_object_set_property (G_OBJECT (data), pspec->name, &tmp_value);
849           data->property_values[pspec->param_id - 1].source = qvalue->source;
850         }
851     }
852   else
853     {
854       gchar *debug = g_strdup_value_contents (&qvalue->public.value);
855       
856       g_message ("%s: failed to retrieve property `%s' of type `%s' from rc file value \"%s\" of type `%s'",
857                  qvalue->public.origin,
858                  pspec->name,
859                  g_type_name (G_PARAM_SPEC_VALUE_TYPE (pspec)),
860                  debug,
861                  G_VALUE_TYPE_NAME (&tmp_value));
862       g_free (debug);
863     }
864   g_value_unset (&tmp_value);
865 }
866
867 static guint
868 settings_install_property_parser (GtkSettingsClass   *class,
869                                   GParamSpec         *pspec,
870                                   GtkRcPropertyParser parser)
871 {
872   GSList *node, *next;
873
874   switch (G_TYPE_FUNDAMENTAL (G_PARAM_SPEC_VALUE_TYPE (pspec)))
875     {
876     case G_TYPE_BOOLEAN:
877     case G_TYPE_UCHAR:
878     case G_TYPE_CHAR:
879     case G_TYPE_UINT:
880     case G_TYPE_INT:
881     case G_TYPE_ULONG:
882     case G_TYPE_LONG:
883     case G_TYPE_FLOAT:
884     case G_TYPE_DOUBLE:
885     case G_TYPE_STRING:
886       break;
887     default:
888       if (!parser)
889         {
890           g_warning (G_STRLOC ": parser needs to be specified for property \"%s\" of type `%s'",
891                      pspec->name, g_type_name (G_PARAM_SPEC_VALUE_TYPE (pspec)));
892           return 0;
893         }
894     }
895   if (g_object_class_find_property (G_OBJECT_CLASS (class), pspec->name))
896     {
897       g_warning (G_STRLOC ": an rc-data property \"%s\" already exists",
898                  pspec->name);
899       return 0;
900     }
901   
902   for (node = object_list; node; node = node->next)
903     g_object_freeze_notify (node->data);
904
905   g_object_class_install_property (G_OBJECT_CLASS (class), ++class_n_properties, pspec);
906   g_param_spec_set_qdata (pspec, quark_property_parser, (gpointer) parser);
907
908   for (node = object_list; node; node = node->next)
909     {
910       GtkSettings *settings = node->data;
911       GtkSettingsValuePrivate *qvalue;
912       
913       settings->property_values = g_renew (GtkSettingsPropertyValue, settings->property_values, class_n_properties);
914       settings->property_values[class_n_properties - 1].value.g_type = 0;
915       g_value_init (&settings->property_values[class_n_properties - 1].value, G_PARAM_SPEC_VALUE_TYPE (pspec));
916       g_param_value_set_default (pspec, &settings->property_values[class_n_properties - 1].value);
917       settings->property_values[class_n_properties - 1].source = GTK_SETTINGS_SOURCE_DEFAULT;
918       g_object_notify (G_OBJECT (settings), pspec->name);
919       
920       qvalue = g_datalist_get_data (&settings->queued_settings, pspec->name);
921       if (qvalue)
922         apply_queued_setting (settings, pspec, qvalue);
923     }
924
925   for (node = object_list; node; node = next)
926     {
927       next = node->next;
928       g_object_thaw_notify (node->data);
929     }
930
931   return class_n_properties;
932 }
933
934 GtkRcPropertyParser
935 _gtk_rc_property_parser_from_type (GType type)
936 {
937   if (type == GDK_TYPE_COLOR)
938     return gtk_rc_property_parse_color;
939   else if (type == GTK_TYPE_REQUISITION)
940     return gtk_rc_property_parse_requisition;
941   else if (type == GTK_TYPE_BORDER)
942     return gtk_rc_property_parse_border;
943   else if (G_TYPE_FUNDAMENTAL (type) == G_TYPE_ENUM && G_TYPE_IS_DERIVED (type))
944     return gtk_rc_property_parse_enum;
945   else if (G_TYPE_FUNDAMENTAL (type) == G_TYPE_FLAGS && G_TYPE_IS_DERIVED (type))
946     return gtk_rc_property_parse_flags;
947   else
948     return NULL;
949 }
950
951 void
952 gtk_settings_install_property (GParamSpec *pspec)
953 {
954   GtkRcPropertyParser parser;
955
956   g_return_if_fail (G_IS_PARAM_SPEC (pspec));
957
958   parser = _gtk_rc_property_parser_from_type (G_PARAM_SPEC_VALUE_TYPE (pspec));
959
960   settings_install_property_parser (gtk_type_class (GTK_TYPE_SETTINGS), pspec, parser);
961 }
962
963 void
964 gtk_settings_install_property_parser (GParamSpec          *pspec,
965                                       GtkRcPropertyParser  parser)
966 {
967   g_return_if_fail (G_IS_PARAM_SPEC (pspec));
968   g_return_if_fail (parser != NULL);
969   
970   settings_install_property_parser (gtk_type_class (GTK_TYPE_SETTINGS), pspec, parser);
971 }
972
973 static void
974 free_value (gpointer data)
975 {
976   GtkSettingsValuePrivate *qvalue = data;
977   
978   g_value_unset (&qvalue->public.value);
979   g_free (qvalue->public.origin);
980   g_free (qvalue);
981 }
982
983 static void
984 gtk_settings_set_property_value_internal (GtkSettings            *settings,
985                                           const gchar            *prop_name,
986                                           const GtkSettingsValue *new_value,
987                                           GtkSettingsSource       source)
988 {
989   GtkSettingsValuePrivate *qvalue;
990   GParamSpec *pspec;
991   gchar *name;
992   GQuark name_quark;
993
994   if (!G_VALUE_HOLDS_LONG (&new_value->value) &&
995       !G_VALUE_HOLDS_DOUBLE (&new_value->value) &&
996       !G_VALUE_HOLDS_STRING (&new_value->value) &&
997       !G_VALUE_HOLDS (&new_value->value, G_TYPE_GSTRING))
998     {
999       g_warning (G_STRLOC ": value type invalid");
1000       return;
1001     }
1002   
1003   name = g_strdup (prop_name);
1004   g_strcanon (name, G_CSET_A_2_Z G_CSET_a_2_z G_CSET_DIGITS "-", '-');
1005   name_quark = g_quark_from_string (name);
1006   g_free (name);
1007
1008   qvalue = g_datalist_id_get_data (&settings->queued_settings, name_quark);
1009   if (!qvalue)
1010     {
1011       qvalue = g_new0 (GtkSettingsValuePrivate, 1);
1012       g_datalist_id_set_data_full (&settings->queued_settings, name_quark, qvalue, free_value);
1013     }
1014   else
1015     {
1016       g_free (qvalue->public.origin);
1017       g_value_unset (&qvalue->public.value);
1018     }
1019   qvalue->public.origin = g_strdup (new_value->origin);
1020   g_value_init (&qvalue->public.value, G_VALUE_TYPE (&new_value->value));
1021   g_value_copy (&new_value->value, &qvalue->public.value);
1022   qvalue->source = source;
1023   pspec = g_object_class_find_property (G_OBJECT_GET_CLASS (settings), g_quark_to_string (name_quark));
1024   if (pspec)
1025     apply_queued_setting (settings, pspec, qvalue);
1026 }
1027
1028 void
1029 gtk_settings_set_property_value (GtkSettings            *settings,
1030                                  const gchar            *prop_name,
1031                                  const GtkSettingsValue *new_value)
1032 {
1033   g_return_if_fail (GTK_SETTINGS (settings));
1034   g_return_if_fail (prop_name != NULL);
1035   g_return_if_fail (new_value != NULL);
1036   g_return_if_fail (new_value->origin != NULL);
1037
1038   gtk_settings_set_property_value_internal (settings, prop_name, new_value,
1039                                             GTK_SETTINGS_SOURCE_APPLICATION);
1040 }
1041
1042 void
1043 _gtk_settings_set_property_value_from_rc (GtkSettings            *settings,
1044                                           const gchar            *prop_name,
1045                                           const GtkSettingsValue *new_value)
1046 {
1047   g_return_if_fail (GTK_SETTINGS (settings));
1048   g_return_if_fail (prop_name != NULL);
1049   g_return_if_fail (new_value != NULL);
1050   g_return_if_fail (new_value->origin != NULL);
1051
1052   gtk_settings_set_property_value_internal (settings, prop_name, new_value,
1053                                             GTK_SETTINGS_SOURCE_RC_FILE);
1054 }
1055
1056 void
1057 gtk_settings_set_string_property (GtkSettings *settings,
1058                                   const gchar *name,
1059                                   const gchar *v_string,
1060                                   const gchar *origin)
1061 {
1062   GtkSettingsValue svalue = { NULL, { 0, }, };
1063
1064   g_return_if_fail (GTK_SETTINGS (settings));
1065   g_return_if_fail (name != NULL);
1066   g_return_if_fail (v_string != NULL);
1067   g_return_if_fail (origin != NULL);
1068
1069   svalue.origin = (gchar*) origin;
1070   g_value_init (&svalue.value, G_TYPE_STRING);
1071   g_value_set_static_string (&svalue.value, v_string);
1072   gtk_settings_set_property_value (settings, name, &svalue);
1073   g_value_unset (&svalue.value);
1074 }
1075
1076 void
1077 gtk_settings_set_long_property (GtkSettings *settings,
1078                                 const gchar *name,
1079                                 glong        v_long,
1080                                 const gchar *origin)
1081 {
1082   GtkSettingsValue svalue = { NULL, { 0, }, };
1083   
1084   g_return_if_fail (GTK_SETTINGS (settings));
1085   g_return_if_fail (name != NULL);
1086   g_return_if_fail (origin != NULL);
1087
1088   svalue.origin = (gchar*) origin;
1089   g_value_init (&svalue.value, G_TYPE_LONG);
1090   g_value_set_long (&svalue.value, v_long);
1091   gtk_settings_set_property_value (settings, name, &svalue);
1092   g_value_unset (&svalue.value);
1093 }
1094
1095 void
1096 gtk_settings_set_double_property (GtkSettings *settings,
1097                                   const gchar *name,
1098                                   gdouble      v_double,
1099                                   const gchar *origin)
1100 {
1101   GtkSettingsValue svalue = { NULL, { 0, }, };
1102
1103   g_return_if_fail (GTK_SETTINGS (settings));
1104   g_return_if_fail (name != NULL);
1105   g_return_if_fail (origin != NULL);
1106
1107   svalue.origin = (gchar*) origin;
1108   g_value_init (&svalue.value, G_TYPE_DOUBLE);
1109   g_value_set_double (&svalue.value, v_double);
1110   gtk_settings_set_property_value (settings, name, &svalue);
1111   g_value_unset (&svalue.value);
1112 }
1113
1114 /**
1115  * gtk_rc_property_parse_color:
1116  * @pspec: a #GParamSpec
1117  * @gstring: the #GString to be parsed
1118  * @property_value: a #GValue which must hold #GdkColor values.
1119  * 
1120  * A #GtkRcPropertyParser for use with gtk_settings_install_property_parser()
1121  * or gtk_widget_class_install_style_property_parser() which parses a
1122  * color given either by its name or in the form 
1123  * <literal>{ red, green, blue }</literal> where %red, %green and
1124  * %blue are integers between 0 and 65535 or floating-point numbers
1125  * between 0 and 1.
1126  * 
1127  * Return value: %TRUE if @gstring could be parsed and @property_value
1128  * has been set to the resulting #GdkColor.
1129  **/
1130 gboolean
1131 gtk_rc_property_parse_color (const GParamSpec *pspec,
1132                              const GString    *gstring,
1133                              GValue           *property_value)
1134 {
1135   GdkColor color = { 0, 0, 0, 0, };
1136   GScanner *scanner;
1137   gboolean success;
1138
1139   g_return_val_if_fail (G_IS_PARAM_SPEC (pspec), FALSE);
1140   g_return_val_if_fail (G_VALUE_HOLDS (property_value, GDK_TYPE_COLOR), FALSE);
1141
1142   scanner = gtk_rc_scanner_new ();
1143   g_scanner_input_text (scanner, gstring->str, gstring->len);
1144   if (gtk_rc_parse_color (scanner, &color) == G_TOKEN_NONE &&
1145       g_scanner_get_next_token (scanner) == G_TOKEN_EOF)
1146     {
1147       g_value_set_boxed (property_value, &color);
1148       success = TRUE;
1149     }
1150   else
1151     success = FALSE;
1152   g_scanner_destroy (scanner);
1153
1154   return success;
1155 }
1156
1157 /**
1158  * gtk_rc_property_parse_enum:
1159  * @pspec: a #GParamSpec
1160  * @gstring: the #GString to be parsed
1161  * @property_value: a #GValue which must hold enum values.
1162  * 
1163  * A #GtkRcPropertyParser for use with gtk_settings_install_property_parser()
1164  * or gtk_widget_class_install_style_property_parser() which parses a single
1165  * enumeration value.
1166  *
1167  * The enumeration value can be specified by its name, its nickname or
1168  * its numeric value. For consistency with flags parsing, the value
1169  * may be surrounded by parentheses.
1170  * 
1171  * Return value: %TRUE if @gstring could be parsed and @property_value
1172  * has been set to the resulting #GEnumValue.
1173  **/
1174 gboolean
1175 gtk_rc_property_parse_enum (const GParamSpec *pspec,
1176                             const GString    *gstring,
1177                             GValue           *property_value)
1178 {
1179   gboolean need_closing_brace = FALSE, success = FALSE;
1180   GScanner *scanner;
1181   GEnumValue *enum_value = NULL;
1182
1183   g_return_val_if_fail (G_IS_PARAM_SPEC (pspec), FALSE);
1184   g_return_val_if_fail (G_VALUE_HOLDS_ENUM (property_value), FALSE);
1185
1186   scanner = gtk_rc_scanner_new ();
1187   g_scanner_input_text (scanner, gstring->str, gstring->len);
1188
1189   /* we just want to parse _one_ value, but for consistency with flags parsing
1190    * we support optional parenthesis
1191    */
1192   g_scanner_get_next_token (scanner);
1193   if (scanner->token == '(')
1194     {
1195       need_closing_brace = TRUE;
1196       g_scanner_get_next_token (scanner);
1197     }
1198   if (scanner->token == G_TOKEN_IDENTIFIER)
1199     {
1200       GEnumClass *class = G_PARAM_SPEC_ENUM (pspec)->enum_class;
1201       
1202       enum_value = g_enum_get_value_by_name (class, scanner->value.v_identifier);
1203       if (!enum_value)
1204         enum_value = g_enum_get_value_by_nick (class, scanner->value.v_identifier);
1205       if (enum_value)
1206         {
1207           g_value_set_enum (property_value, enum_value->value);
1208           success = TRUE;
1209         }
1210     }
1211   else if (scanner->token == G_TOKEN_INT)
1212     {
1213       g_value_set_enum (property_value, scanner->value.v_int);
1214       success = TRUE;
1215     }
1216   if (need_closing_brace && g_scanner_get_next_token (scanner) != ')')
1217     success = FALSE;
1218   if (g_scanner_get_next_token (scanner) != G_TOKEN_EOF)
1219     success = FALSE;
1220
1221   g_scanner_destroy (scanner);
1222
1223   return success;
1224 }
1225
1226 static guint
1227 parse_flags_value (GScanner    *scanner,
1228                    GFlagsClass *class,
1229                    guint       *number)
1230 {
1231   g_scanner_get_next_token (scanner);
1232   if (scanner->token == G_TOKEN_IDENTIFIER)
1233     {
1234       GFlagsValue *flags_value;
1235
1236       flags_value = g_flags_get_value_by_name (class, scanner->value.v_identifier);
1237       if (!flags_value)
1238         flags_value = g_flags_get_value_by_nick (class, scanner->value.v_identifier);
1239       if (flags_value)
1240         {
1241           *number |= flags_value->value;
1242           return G_TOKEN_NONE;
1243         }
1244     }
1245   else if (scanner->token == G_TOKEN_INT)
1246     {
1247       *number |= scanner->value.v_int;
1248       return G_TOKEN_NONE;
1249     }
1250   return G_TOKEN_IDENTIFIER;
1251 }
1252
1253 /**
1254  * gtk_rc_property_parse_flags:
1255  * @pspec: a #GParamSpec
1256  * @gstring: the #GString to be parsed
1257  * @property_value: a #GValue which must hold flags values.
1258  * 
1259  * A #GtkRcPropertyParser for use with gtk_settings_install_property_parser()
1260  * or gtk_widget_class_install_style_property_parser() which parses flags. 
1261  * 
1262  * Flags can be specified by their name, their nickname or
1263  * numerically. Multiple flags can be specified in the form 
1264  * <literal>"( flag1 | flag2 | ... )"</literal>.
1265  * 
1266  * Return value: %TRUE if @gstring could be parsed and @property_value
1267  * has been set to the resulting flags value.
1268  **/
1269 gboolean
1270 gtk_rc_property_parse_flags (const GParamSpec *pspec,
1271                              const GString    *gstring,
1272                              GValue           *property_value)
1273 {
1274   GFlagsClass *class;
1275    gboolean success = FALSE;
1276   GScanner *scanner;
1277
1278   g_return_val_if_fail (G_IS_PARAM_SPEC (pspec), FALSE);
1279   g_return_val_if_fail (G_VALUE_HOLDS_FLAGS (property_value), FALSE);
1280
1281   class = G_PARAM_SPEC_FLAGS (pspec)->flags_class;
1282   scanner = gtk_rc_scanner_new ();
1283   g_scanner_input_text (scanner, gstring->str, gstring->len);
1284
1285   /* parse either a single flags value or a "\( ... [ \| ... ] \)" compound */
1286   if (g_scanner_peek_next_token (scanner) == G_TOKEN_IDENTIFIER ||
1287       scanner->next_token == G_TOKEN_INT)
1288     {
1289       guint token, flags_value = 0;
1290       
1291       token = parse_flags_value (scanner, class, &flags_value);
1292
1293       if (token == G_TOKEN_NONE && g_scanner_peek_next_token (scanner) == G_TOKEN_EOF)
1294         {
1295           success = TRUE;
1296           g_value_set_flags (property_value, flags_value);
1297         }
1298       
1299     }
1300   else if (g_scanner_get_next_token (scanner) == '(')
1301     {
1302       guint token, flags_value = 0;
1303
1304       /* parse first value */
1305       token = parse_flags_value (scanner, class, &flags_value);
1306
1307       /* parse nth values, preceeded by '|' */
1308       while (token == G_TOKEN_NONE && g_scanner_get_next_token (scanner) == '|')
1309         token = parse_flags_value (scanner, class, &flags_value);
1310
1311       /* done, last token must have closed expression */
1312       if (token == G_TOKEN_NONE && scanner->token == ')' &&
1313           g_scanner_peek_next_token (scanner) == G_TOKEN_EOF)
1314         {
1315           g_value_set_flags (property_value, flags_value);
1316           success = TRUE;
1317         }
1318     }
1319   g_scanner_destroy (scanner);
1320
1321   return success;
1322 }
1323
1324 static gboolean
1325 get_braced_int (GScanner *scanner,
1326                 gboolean  first,
1327                 gboolean  last,
1328                 gint     *value)
1329 {
1330   if (first)
1331     {
1332       g_scanner_get_next_token (scanner);
1333       if (scanner->token != '{')
1334         return FALSE;
1335     }
1336
1337   g_scanner_get_next_token (scanner);
1338   if (scanner->token != G_TOKEN_INT)
1339     return FALSE;
1340
1341   *value = scanner->value.v_int;
1342
1343   if (last)
1344     {
1345       g_scanner_get_next_token (scanner);
1346       if (scanner->token != '}')
1347         return FALSE;
1348     }
1349   else
1350     {
1351       g_scanner_get_next_token (scanner);
1352       if (scanner->token != ',')
1353         return FALSE;
1354     }
1355
1356   return TRUE;
1357 }
1358
1359 /**
1360  * gtk_rc_property_parse_requisition:
1361  * @pspec: a #GParamSpec
1362  * @gstring: the #GString to be parsed
1363  * @property_value: a #GValue which must hold boxed values.
1364  * 
1365  * A #GtkRcPropertyParser for use with gtk_settings_install_property_parser()
1366  * or gtk_widget_class_install_style_property_parser() which parses a
1367  * requisition in the form 
1368  * <literal>"{ width, height }"</literal> for integers %width and %height.
1369  * 
1370  * Return value: %TRUE if @gstring could be parsed and @property_value
1371  * has been set to the resulting #GtkRequisition.
1372  **/
1373 gboolean
1374 gtk_rc_property_parse_requisition  (const GParamSpec *pspec,
1375                                     const GString    *gstring,
1376                                     GValue           *property_value)
1377 {
1378   GtkRequisition requisition;
1379   GScanner *scanner;
1380   gboolean success = FALSE;
1381
1382   g_return_val_if_fail (G_IS_PARAM_SPEC (pspec), FALSE);
1383   g_return_val_if_fail (G_VALUE_HOLDS_BOXED (property_value), FALSE);
1384
1385   scanner = gtk_rc_scanner_new ();
1386   g_scanner_input_text (scanner, gstring->str, gstring->len);
1387
1388   if (get_braced_int (scanner, TRUE, FALSE, &requisition.width) &&
1389       get_braced_int (scanner, FALSE, TRUE, &requisition.height))
1390     {
1391       g_value_set_boxed (property_value, &requisition);
1392       success = TRUE;
1393     }
1394
1395   g_scanner_destroy (scanner);
1396
1397   return success;
1398 }
1399
1400 /**
1401  * gtk_rc_property_parse_border:
1402  * @pspec: a #GParamSpec
1403  * @gstring: the #GString to be parsed
1404  * @property_value: a #GValue which must hold boxed values.
1405  * 
1406  * A #GtkRcPropertyParser for use with gtk_settings_install_property_parser()
1407  * or gtk_widget_class_install_style_property_parser() which parses
1408  * borders in the form 
1409  * <literal>"{ left, right, top, bottom }"</literal> for integers 
1410  * %left, %right, %top and %bottom.
1411  * 
1412  * Return value: %TRUE if @gstring could be parsed and @property_value
1413  * has been set to the resulting #GtkBorder.
1414  **/
1415 gboolean
1416 gtk_rc_property_parse_border (const GParamSpec *pspec,
1417                               const GString    *gstring,
1418                               GValue           *property_value)
1419 {
1420   GtkBorder border;
1421   GScanner *scanner;
1422   gboolean success = FALSE;
1423
1424   g_return_val_if_fail (G_IS_PARAM_SPEC (pspec), FALSE);
1425   g_return_val_if_fail (G_VALUE_HOLDS_BOXED (property_value), FALSE);
1426
1427   scanner = gtk_rc_scanner_new ();
1428   g_scanner_input_text (scanner, gstring->str, gstring->len);
1429
1430   if (get_braced_int (scanner, TRUE, FALSE, &border.left) &&
1431       get_braced_int (scanner, FALSE, FALSE, &border.right) &&
1432       get_braced_int (scanner, FALSE, FALSE, &border.top) &&
1433       get_braced_int (scanner, FALSE, TRUE, &border.bottom))
1434     {
1435       g_value_set_boxed (property_value, &border);
1436       success = TRUE;
1437     }
1438
1439   g_scanner_destroy (scanner);
1440
1441   return success;
1442 }
1443
1444 void
1445 _gtk_settings_handle_event (GdkEventSetting *event)
1446 {
1447   GtkSettings *settings = gtk_settings_get_for_screen (gdk_drawable_get_screen (event->window));
1448   
1449   if (g_object_class_find_property (G_OBJECT_GET_CLASS (settings), event->name))
1450     g_object_notify (G_OBJECT (settings), event->name);
1451 }
1452
1453 static void
1454 reset_rc_values_foreach (GQuark    key_id,
1455                          gpointer  data,
1456                          gpointer  user_data)
1457 {
1458   GtkSettingsValuePrivate *qvalue = data;
1459   GSList **to_reset = user_data;
1460
1461   if (qvalue->source == GTK_SETTINGS_SOURCE_RC_FILE)
1462     *to_reset = g_slist_prepend (*to_reset, GUINT_TO_POINTER (key_id));
1463 }
1464
1465 void
1466 _gtk_settings_reset_rc_values (GtkSettings *settings)
1467 {
1468   GSList *to_reset = NULL;
1469   GSList *tmp_list;
1470   GParamSpec **pspecs, **p;
1471   gint i;
1472
1473   /* Remove any queued settings
1474    */
1475   g_datalist_foreach (&settings->queued_settings,
1476                       reset_rc_values_foreach,
1477                       &to_reset);
1478
1479   for (tmp_list = to_reset; tmp_list; tmp_list = tmp_list->next)
1480     {
1481       GQuark key_id = GPOINTER_TO_UINT (tmp_list->data);
1482       g_datalist_id_remove_data (&settings->queued_settings, key_id);
1483     }
1484
1485   /* Now reset the active settings
1486    */
1487   pspecs = g_object_class_list_properties (G_OBJECT_GET_CLASS (settings), NULL);
1488   i = 0;
1489
1490   g_object_freeze_notify (G_OBJECT (settings));
1491   for (p = pspecs; *p; p++)
1492     {
1493       if (settings->property_values[i].source == GTK_SETTINGS_SOURCE_RC_FILE)
1494         {
1495           GParamSpec *pspec = *p;
1496
1497           g_param_value_set_default (pspec, &settings->property_values[i].value);
1498           g_object_notify (G_OBJECT (settings), pspec->name);
1499         }
1500       i++;
1501     }
1502   g_object_thaw_notify (G_OBJECT (settings));
1503   g_free (pspecs);
1504 }
1505
1506 static void
1507 settings_update_double_click (GtkSettings *settings)
1508 {
1509   if (gdk_screen_get_number (settings->screen) == 0)
1510     {
1511       GdkDisplay *display = gdk_screen_get_display (settings->screen);
1512       gint double_click_time;
1513       gint double_click_distance;
1514   
1515       g_object_get (settings, 
1516                     "gtk-double-click-time", &double_click_time, 
1517                     "gtk-double-click-distance", &double_click_distance,
1518                     NULL);
1519       
1520       gdk_display_set_double_click_time (display, double_click_time);
1521       gdk_display_set_double_click_distance (display, double_click_distance);
1522     }
1523 }
1524
1525 static void
1526 settings_update_modules (GtkSettings *settings)
1527 {
1528   gchar *modules;
1529   
1530   g_object_get (settings, 
1531                 "gtk-modules", &modules,
1532                 NULL);
1533   
1534   _gtk_modules_settings_changed (settings, modules);
1535   
1536   g_free (modules);
1537 }
1538
1539 #ifdef GDK_WINDOWING_X11
1540 static void
1541 settings_update_cursor_theme (GtkSettings *settings)
1542 {
1543   GdkDisplay *display = gdk_screen_get_display (settings->screen);
1544   gchar *theme = NULL;
1545   gint size = 0;
1546   
1547   g_object_get (settings, 
1548                 "gtk-cursor-theme-name", &theme,
1549                 "gtk-cursor-theme-size", &size,
1550                 NULL);
1551   
1552   gdk_x11_display_set_cursor_theme (display, theme, size);
1553
1554   g_free (theme);
1555 }
1556
1557 static void
1558 settings_update_font_options (GtkSettings *settings)
1559 {
1560   gint hinting;
1561   gchar *hint_style_str;
1562   cairo_hint_style_t hint_style = CAIRO_HINT_STYLE_DEFAULT;
1563   gint antialias;
1564   cairo_antialias_t antialias_mode = CAIRO_ANTIALIAS_DEFAULT;
1565   gchar *rgba_str;
1566   cairo_subpixel_order_t subpixel_order = CAIRO_SUBPIXEL_ORDER_DEFAULT;
1567   cairo_font_options_t *options;
1568   
1569   g_object_get (settings,
1570                 "gtk-xft-antialias", &antialias,
1571                 "gtk-xft-hinting", &hinting,
1572                 "gtk-xft-hintstyle", &hint_style_str,
1573                 "gtk-xft-rgba", &rgba_str,
1574                 NULL);
1575
1576   options = cairo_font_options_create ();
1577   
1578   /* hint_metrics = FALSE should never be set for user interface code.
1579    */
1580   cairo_font_options_set_hint_metrics (options, CAIRO_HINT_METRICS_ON);
1581
1582   if (hinting >= 0 && !hinting)
1583     {
1584       hint_style = CAIRO_HINT_STYLE_NONE;
1585     }
1586   else if (hint_style_str)
1587     {
1588       if (strcmp (hint_style_str, "hintnone") == 0)
1589         hint_style = CAIRO_HINT_STYLE_NONE;
1590       else if (strcmp (hint_style_str, "hintslight") == 0)
1591         hint_style = CAIRO_HINT_STYLE_SLIGHT;
1592       else if (strcmp (hint_style_str, "hintmedium") == 0)
1593         hint_style = CAIRO_HINT_STYLE_MEDIUM;
1594       else if (strcmp (hint_style_str, "hintfull") == 0)
1595         hint_style = CAIRO_HINT_STYLE_FULL;
1596     }
1597
1598   if (hint_style_str)
1599     g_free (hint_style_str);
1600
1601   cairo_font_options_set_hint_style (options, hint_style);
1602
1603   if (rgba_str)
1604     {
1605       if (strcmp (rgba_str, "rgb") == 0)
1606         subpixel_order = CAIRO_SUBPIXEL_ORDER_RGB;
1607       else if (strcmp (rgba_str, "bgr") == 0)
1608         subpixel_order = CAIRO_SUBPIXEL_ORDER_BGR;
1609       else if (strcmp (rgba_str, "vrgb") == 0)
1610         subpixel_order = CAIRO_SUBPIXEL_ORDER_VRGB;
1611       else if (strcmp (rgba_str, "vbgr") == 0)
1612         subpixel_order = CAIRO_SUBPIXEL_ORDER_VBGR;
1613
1614       g_free (rgba_str);
1615     }
1616
1617   cairo_font_options_set_subpixel_order (options, subpixel_order);
1618   
1619   if (antialias >= 0 && !antialias)
1620     antialias_mode = CAIRO_ANTIALIAS_NONE;
1621   else if (subpixel_order != CAIRO_SUBPIXEL_ORDER_DEFAULT)
1622     antialias_mode = CAIRO_ANTIALIAS_SUBPIXEL;
1623   else if (antialias >= 0)
1624     antialias_mode = CAIRO_ANTIALIAS_GRAY;
1625   
1626   cairo_font_options_set_antialias (options, antialias_mode);
1627
1628   gdk_screen_set_font_options (settings->screen, options);
1629   
1630   cairo_font_options_destroy (options);
1631 }
1632
1633 static void
1634 settings_update_resolution (GtkSettings *settings)
1635 {
1636   gint dpi_int;
1637   double dpi;
1638   
1639   g_object_get (settings,
1640                 "gtk-xft-dpi", &dpi_int,
1641                 NULL);
1642
1643   if (dpi_int > 0)
1644     dpi = dpi_int / 1024.;
1645   else
1646     dpi = -1.;
1647
1648   gdk_screen_set_resolution (settings->screen, dpi);
1649 }
1650 #endif
1651
1652 static void
1653 settings_update_color_scheme (GtkSettings *settings)
1654 {
1655   gchar *dummy;
1656
1657   g_object_get (settings, "gtk-color-scheme", &dummy, NULL);
1658
1659   /* nothing to do here, the color hash is updated as a
1660    * side effect of getting the color scheme
1661    */
1662
1663   g_free (dummy);  
1664 }
1665
1666
1667 typedef struct {
1668   GHashTable *color_hash;
1669   gchar *tables[GTK_SETTINGS_SOURCE_APPLICATION + 1];
1670 } ColorSchemeData;
1671
1672
1673 static gboolean
1674 update_color_hash (ColorSchemeData   *data,
1675                    const gchar       *str, 
1676                    GtkSettingsSource  source)
1677 {
1678   gchar *copy, *s, *p, *name;
1679   GdkColor color;
1680   gboolean changed = FALSE;
1681
1682   if (data->tables[source] == NULL && str == NULL)
1683     return FALSE;
1684
1685   if (data->tables[source] != NULL && str != NULL &&
1686       strcmp (data->tables[source], str) == 0)
1687     return FALSE;
1688
1689   g_free (data->tables[source]);
1690   data->tables[source] = g_strdup (str);
1691
1692   copy = g_strdup (str);
1693
1694   s = copy;
1695   while (s && *s)
1696     {
1697       name = s;
1698       p = strchr (s, ':');
1699       if (p)
1700         {
1701           *p = '\0';
1702           p++;
1703         }
1704       else
1705         break;
1706
1707       while (*p == ' ')
1708         p++;
1709
1710       s = p;
1711       while (*s) 
1712         {
1713           if (*s == '\n')
1714             {
1715               *s = '\0';
1716               s++;
1717               break;
1718             }
1719           s++;
1720         }
1721
1722       if (gdk_color_parse (p, &color))
1723         {
1724           GdkColor *old;
1725
1726           old = g_hash_table_lookup (data->color_hash, name);
1727           if (!old || 
1728               (old->pixel <= source && !gdk_color_equal (old, &color)))
1729             {
1730               GdkColor *new;
1731               
1732               new = gdk_color_copy (&color);
1733               new->pixel = source;
1734   
1735               g_hash_table_insert (data->color_hash, g_strdup (name), new);
1736  
1737               changed = TRUE;
1738             }
1739         }
1740     }
1741
1742   g_free (copy);
1743
1744   return changed;
1745 }
1746
1747 static void
1748 color_scheme_data_free (ColorSchemeData *data)
1749 {
1750   gint i;
1751
1752   g_hash_table_unref (data->color_hash);
1753
1754   for (i = 0; i <= GTK_SETTINGS_SOURCE_APPLICATION; i++)
1755     g_free (data->tables[i]);
1756
1757   g_free (data);
1758 }
1759
1760 static void
1761 merge_color_scheme (GtkSettings       *settings, 
1762                     GValue            *value, 
1763                     GtkSettingsSource  source)
1764 {
1765   ColorSchemeData *data;
1766   const gchar *colors;
1767
1768   colors = g_value_get_string (value);
1769
1770   data = (ColorSchemeData *) g_object_get_data (G_OBJECT (settings),
1771                                                  "gtk-color-scheme");
1772   if (!data)
1773     {
1774       data = g_new0 (ColorSchemeData, 1);
1775       data->color_hash = g_hash_table_new_full (g_str_hash, g_str_equal, g_free,
1776                                                 (GDestroyNotify) gdk_color_free);
1777       g_object_set_data_full (G_OBJECT (settings), "gtk-color-scheme",
1778                               data, (GDestroyNotify) color_scheme_data_free);
1779     }
1780   
1781   if (update_color_hash (data, colors, source))
1782     g_object_notify (G_OBJECT (settings), "color-hash");
1783 }
1784
1785 static GHashTable *
1786 get_color_hash (GtkSettings *settings)
1787 {
1788   ColorSchemeData *data;
1789
1790   if (!g_object_get_data (G_OBJECT (settings), "gtk-color-scheme"))
1791     settings_update_color_scheme (settings);
1792   
1793   data = (ColorSchemeData *)g_object_get_data (G_OBJECT (settings), 
1794                                                "gtk-color-scheme");
1795
1796   if (!data)
1797     return NULL;
1798
1799   return data->color_hash;
1800 }
1801
1802 static void 
1803 append_color_scheme (gpointer key,
1804                      gpointer value,
1805                      gpointer data)
1806 {
1807   gchar *name = (gchar *)key;
1808   GdkColor *color = (GdkColor *)value;
1809   GString *string = (GString *)data;
1810
1811   g_string_append_printf (string, "%s: #%04x%04x%04x\n",
1812                           name, color->red, color->green, color->blue);
1813 }
1814
1815 static gchar *
1816 get_color_scheme (GtkSettings *settings)
1817 {
1818   ColorSchemeData *data;
1819   GString *string;
1820   
1821   data = (ColorSchemeData *) g_object_get_data (G_OBJECT (settings),
1822                                                 "gtk-color-scheme");
1823
1824   string = g_string_new ("");
1825
1826   g_hash_table_foreach (data->color_hash, append_color_scheme, string);
1827
1828   return g_string_free (string, FALSE);
1829 }
1830
1831
1832 #define __GTK_SETTINGS_C__
1833 #include "gtkaliasdef.c"