Pileus Git - ~andy/gtk/blob - gdk/x11/xsettings-client.c

   1 /*
   2  * Copyright © 2001, 2007 Red Hat, Inc.
   3  *
   4  * Permission to use, copy, modify, distribute, and sell this software and its
   5  * documentation for any purpose is hereby granted without fee, provided that
   6  * the above copyright notice appear in all copies and that both that
   7  * copyright notice and this permission notice appear in supporting
   8  * documentation, and that the name of Red Hat not be used in advertising or
   9  * publicity pertaining to distribution of the software without specific,
  10  * written prior permission.  Red Hat makes no representations about the
  11  * suitability of this software for any purpose.  It is provided "as is"
  12  * without express or implied warranty.
  13  *
  14  * RED HAT DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE, INCLUDING ALL
  15  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO EVENT SHALL RED HAT
  16  * BE LIABLE FOR ANY SPECIAL, INDIRECT OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
  17  * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN ACTION
  18  * OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF OR IN
  19  * CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
  20  *
  21  * Author:  Owen Taylor, Red Hat, Inc.
  22  */
  23
  24 #include "config.h"
  25
  26 #include "xsettings-client.h"
  27
  28 #include <gdk/x11/gdkx11display.h>
  29 #include <gdk/x11/gdkx11screen.h>
  30 #include <gdk/x11/gdkx11window.h>
  31 #include <gdk/x11/gdkscreen-x11.h>
  32
  33 #include <gdkinternals.h>
  34
  35 #include <string.h>
  36
  37 #include <X11/Xlib.h>
  38 #include <X11/Xmd.h>            /* For CARD16 */
  39
  40 #include "gdksettings.c"
  41
  42 typedef struct _XSettingsBuffer  XSettingsBuffer;
  43
  44 struct _XSettingsBuffer
  45 {
  46   char byte_order;
  47   size_t len;
  48   unsigned char *data;
  49   unsigned char *pos;
  50 };
  51
  52 struct _XSettingsClient
  53 {
  54   GdkScreen *screen;
  55   Display *display;
  56
  57   Window manager_window;
  58   Atom manager_atom;
  59   Atom selection_atom;
  60   Atom xsettings_atom;
  61
  62   GHashTable *settings; /* string of GDK settings name => XSettingsSetting */
  63 };
  64
  65 static void
  66 gdk_xsettings_notify (const char       *name,
  67                       GdkSettingAction  action,
  68                       XSettingsSetting *setting,
  69                       GdkScreen        *screen)
  70 {
  71   GdkEvent new_event;
  72   GdkX11Screen *x11_screen = GDK_X11_SCREEN (screen);
  73
  74   if (x11_screen->xsettings_in_init)
  75     return;
  76
  77   new_event.type = GDK_SETTING;
  78   new_event.setting.window = gdk_screen_get_root_window (screen);
  79   new_event.setting.send_event = FALSE;
  80   new_event.setting.action = action;
  81   new_event.setting.name = (char*) name;
  82
  83   gdk_event_put (&new_event);
  84 }
  85
  86 static void
  87 notify_changes (XSettingsClient *client,
  88                 GHashTable      *old_list)
  89 {
  90   GHashTableIter iter;
  91   XSettingsSetting *setting, *old_setting;
  92   const char *name;
  93
  94   if (client->settings != NULL)
  95     {
  96       g_hash_table_iter_init (&iter, client->settings);
  97       while (g_hash_table_iter_next (&iter, (gpointer *) &name, (gpointer*) &setting))
  98         {
  99           old_setting = old_list ? g_hash_table_lookup (old_list, name) : NULL;
 100
 101           if (old_setting == NULL)
 102             gdk_xsettings_notify (name, GDK_SETTING_ACTION_NEW, setting, client->screen);
 103           else if (!xsettings_setting_equal (setting, old_setting))
 104             gdk_xsettings_notify (name, GDK_SETTING_ACTION_CHANGED, setting, client->screen);
 105
 106           /* remove setting from old_list */
 107           if (old_setting != NULL)
 108             g_hash_table_remove (old_list, name);
 109         }
 110     }
 111
 112   if (old_list != NULL)
 113     {
 114       /* old_list now contains only deleted settings */
 115       g_hash_table_iter_init (&iter, old_list);
 116       while (g_hash_table_iter_next (&iter, (gpointer *) &name, (gpointer*) &old_setting))
 117         gdk_xsettings_notify (name, GDK_SETTING_ACTION_DELETED, NULL, client->screen);
 118     }
 119 }
 120
 121 #define BYTES_LEFT(buffer) ((buffer)->data + (buffer)->len - (buffer)->pos)
 122
 123 #define return_if_fail_bytes(buffer, n_bytes) G_STMT_START{ \
 124   if (BYTES_LEFT (buffer) < (n_bytes)) \
 125     { \
 126       g_warning ("Invalid XSETTINGS property (read off end: Expected %u bytes, only %ld left", \
 127                  (n_bytes), BYTES_LEFT (buffer)); \
 128       return FALSE; \
 129     } \
 130 }G_STMT_END
 131
 132 static gboolean
 133 fetch_card16 (XSettingsBuffer *buffer,
 134               CARD16          *result)
 135 {
 136   CARD16 x;
 137
 138   return_if_fail_bytes (buffer, 2);
 139
 140   x = *(CARD16 *)buffer->pos;
 141   buffer->pos += 2;
 142
 143   if (buffer->byte_order == MSBFirst)
 144     *result = GUINT16_FROM_BE (x);
 145   else
 146     *result = GUINT16_FROM_LE (x);
 147
 148   return TRUE;
 149 }
 150
 151 static gboolean
 152 fetch_ushort (XSettingsBuffer *buffer,
 153               unsigned short  *result)
 154 {
 155   CARD16 x;
 156   gboolean r;
 157
 158   r = fetch_card16 (buffer, &x);
 159   if (r)
 160     *result = x;
 161
 162   return r;
 163 }
 164
 165 static gboolean
 166 fetch_card32 (XSettingsBuffer *buffer,
 167               CARD32          *result)
 168 {
 169   CARD32 x;
 170
 171   return_if_fail_bytes (buffer, 4);
 172
 173   x = *(CARD32 *)buffer->pos;
 174   buffer->pos += 4;
 175
 176   if (buffer->byte_order == MSBFirst)
 177     *result = GUINT32_FROM_BE (x);
 178   else
 179     *result = GUINT32_FROM_LE (x);
 180
 181   return TRUE;
 182 }
 183
 184 static gboolean
 185 fetch_card8 (XSettingsBuffer *buffer,
 186              CARD8           *result)
 187 {
 188   return_if_fail_bytes (buffer, 1);
 189
 190   *result = *(CARD8 *)buffer->pos;
 191   buffer->pos += 1;
 192
 193   return TRUE;
 194 }
 195
 196 #define XSETTINGS_PAD(n,m) ((n + m - 1) & (~(m-1)))
 197
 198 static gboolean
 199 fetch_string (XSettingsBuffer  *buffer,
 200               guint             length,
 201               char            **result)
 202 {
 203   guint pad_len;
 204
 205   pad_len = XSETTINGS_PAD (length, 4);
 206   if (pad_len < length) /* guard against overflow */
 207     {
 208       g_warning ("Invalid XSETTINGS property (overflow in string length)");
 209       return FALSE;
 210     }
 211
 212   return_if_fail_bytes (buffer, pad_len);
 213
 214   *result = g_strndup ((char *) buffer->pos, length);
 215   buffer->pos += pad_len;
 216
 217   return TRUE;
 218 }
 219
 220 static GHashTable *
 221 parse_settings (unsigned char *data,
 222                 size_t         len)
 223 {
 224   XSettingsBuffer buffer;
 225   GHashTable *settings = NULL;
 226   CARD32 serial;
 227   CARD32 n_entries;
 228   CARD32 i;
 229   XSettingsSetting *setting = NULL;
 230   char *x_name = NULL;
 231   const char *gdk_name;
 232
 233   buffer.pos = buffer.data = data;
 234   buffer.len = len;
 235
 236   if (!fetch_card8 (&buffer, (unsigned char *)&buffer.byte_order))
 237     goto out;
 238
 239   if (buffer.byte_order != MSBFirst &&
 240       buffer.byte_order != LSBFirst)
 241     {
 242       g_warning ("Invalid XSETTINGS property (unknown byte order %u)", buffer.byte_order);
 243       goto out;
 244     }
 245
 246   buffer.pos += 3;
 247
 248   if (!fetch_card32 (&buffer, &serial) ||
 249       !fetch_card32 (&buffer, &n_entries))
 250     goto out;
 251
 252   GDK_NOTE(SETTINGS, g_print("reading %u settings (serial %u byte order %u)\n", n_entries, serial, buffer.byte_order));
 253
 254   for (i = 0; i < n_entries; i++)
 255     {
 256       CARD8 type;
 257       CARD16 name_len;
 258       CARD32 v_int;
 259
 260       if (!fetch_card8 (&buffer, &type))
 261         goto out;
 262
 263       buffer.pos += 1;
 264
 265       if (!fetch_card16 (&buffer, &name_len))
 266         goto out;
 267
 268       setting = g_new (XSettingsSetting, 1);
 269       setting->type = XSETTINGS_TYPE_INT; /* No allocated memory */
 270
 271       if (!fetch_string (&buffer, name_len, &x_name) ||
 272           /* last change serial (we ignore it) */
 273           !fetch_card32 (&buffer, &v_int))
 274         goto out;
 275
 276       switch (type)
 277         {
 278         case XSETTINGS_TYPE_INT:
 279           if (!fetch_card32 (&buffer, &v_int))
 280             goto out;
 281
 282           setting->data.v_int = (INT32)v_int;
 283           GDK_NOTE(SETTINGS, g_print("  %s = %d\n", x_name, (gint) setting->data.v_int));
 284           break;
 285         case XSETTINGS_TYPE_STRING:
 286           if (!fetch_card32 (&buffer, &v_int) ||
 287               !fetch_string (&buffer, v_int, &setting->data.v_string))
 288             goto out;
 289
 290           GDK_NOTE(SETTINGS, g_print("  %s = \"%s\"\n", x_name, setting->data.v_string));
 291           break;
 292         case XSETTINGS_TYPE_COLOR:
 293           if (!fetch_ushort (&buffer, &setting->data.v_color.red) ||
 294               !fetch_ushort (&buffer, &setting->data.v_color.green) ||
 295               !fetch_ushort (&buffer, &setting->data.v_color.blue) ||
 296               !fetch_ushort (&buffer, &setting->data.v_color.alpha))
 297             goto out;
 298
 299           GDK_NOTE(SETTINGS, g_print("  %s = #%02X%02X%02X%02X\n", x_name,
 300                                  setting->data.v_color.alpha, setting->data.v_color.red,
 301                                  setting->data.v_color.green, setting->data.v_color.blue));
 302           break;
 303         default:
 304           /* Quietly ignore unknown types */
 305           GDK_NOTE(SETTINGS, g_print("  %s = ignored (unknown type %u)\n", x_name, type));
 306           break;
 307         }
 308
 309       setting->type = type;
 310
 311       gdk_name = gdk_from_xsettings_name (x_name);
 312       g_free (x_name);
 313       x_name = NULL;
 314
 315       if (gdk_name == NULL)
 316         {
 317           GDK_NOTE(SETTINGS, g_print("    ==> unknown to GTK\n"));
 318         }
 319       else
 320         {
 321           GDK_NOTE(SETTINGS, g_print("    ==> storing as '%s'\n", gdk_name));
 322
 323           if (settings == NULL)
 324             settings = g_hash_table_new_full (g_str_hash, g_str_equal,
 325                                               NULL,
 326                                               (GDestroyNotify) xsettings_setting_free);
 327
 328           if (g_hash_table_lookup (settings, gdk_name) != NULL)
 329             {
 330               g_warning ("Invalid XSETTINGS property (Duplicate entry for '%s')", gdk_name);
 331               goto out;
 332             }
 333
 334           g_hash_table_insert (settings, (gpointer) gdk_name, setting);
 335         }
 336
 337       setting = NULL;
 338     }
 339
 340   return settings;
 341
 342  out:
 343
 344   if (setting)
 345     xsettings_setting_free (setting);
 346
 347   if (settings)
 348     g_hash_table_unref (settings);
 349
 350   g_free (x_name);
 351
 352   return NULL;
 353 }
 354
 355 static void
 356 read_settings (XSettingsClient *client)
 357 {
 358   Atom type;
 359   int format;
 360   unsigned long n_items;
 361   unsigned long bytes_after;
 362   unsigned char *data;
 363   int result;
 364
 365   GHashTable *old_list = client->settings;
 366
 367   client->settings = NULL;
 368
 369   if (client->manager_window)
 370     {
 371       gdk_x11_display_error_trap_push (gdk_screen_get_display (client->screen));
 372       result = XGetWindowProperty (client->display, client->manager_window,
 373                                    client->xsettings_atom, 0, LONG_MAX,
 374                                    False, client->xsettings_atom,
 375                                    &type, &format, &n_items, &bytes_after, &data);
 376       gdk_x11_display_error_trap_pop_ignored (gdk_screen_get_display (client->screen));
 377
 378       if (result == Success && type != None)
 379         {
 380           if (type != client->xsettings_atom)
 381             {
 382               fprintf (stderr, "Invalid type for XSETTINGS property");
 383             }
 384           else if (format != 8)
 385             {
 386               fprintf (stderr, "Invalid format for XSETTINGS property %d", format);
 387             }
 388           else
 389             client->settings = parse_settings (data, n_items);
 390
 391           XFree (data);
 392         }
 393     }
 394
 395   notify_changes (client, old_list);
 396   if (old_list)
 397     g_hash_table_unref (old_list);
 398 }
 399
 400 static void
 401 add_events (Display *display,
 402             Window   window,
 403             long     mask)
 404 {
 405   XWindowAttributes attr;
 406
 407   XGetWindowAttributes (display, window, &attr);
 408   XSelectInput (display, window, attr.your_event_mask | mask);
 409 }
 410
 411 static Bool
 412 gdk_xsettings_watch (Window     window,
 413                      Bool       is_start,
 414                      long       mask,
 415                      GdkScreen *screen);
 416
 417 static void
 418 check_manager_window (XSettingsClient *client)
 419 {
 420   if (client->manager_window)
 421     gdk_xsettings_watch (client->manager_window, False, 0, client->screen);
 422
 423   gdk_x11_display_grab (gdk_screen_get_display (client->screen));
 424
 425   client->manager_window = XGetSelectionOwner (client->display,
 426                                                client->selection_atom);
 427   if (client->manager_window)
 428     XSelectInput (client->display, client->manager_window,
 429                   PropertyChangeMask | StructureNotifyMask);
 430
 431   gdk_x11_display_ungrab (gdk_screen_get_display (client->screen));
 432
 433   XFlush (client->display);
 434
 435   if (client->manager_window)
 436     {
 437       if (!gdk_xsettings_watch (client->manager_window, True,
 438                                 PropertyChangeMask | StructureNotifyMask,
 439                                 client->screen))
 440         {
 441           /* Inability to watch the window probably means that it was destroyed
 442            * after we ungrabbed
 443            */
 444           client->manager_window = None;
 445           return;
 446         }
 447     }
 448
 449   read_settings (client);
 450 }
 451
 452 static GdkFilterReturn
 453 gdk_xsettings_client_event_filter (GdkXEvent *xevent,
 454                                    GdkEvent  *event,
 455                                    gpointer   data)
 456 {
 457   GdkScreen *screen = data;
 458   XSettingsClient *client = GDK_X11_SCREEN (screen)->xsettings_client;
 459   XEvent *xev = xevent;
 460
 461   /* The checks here will not unlikely cause us to reread
 462    * the properties from the manager window a number of
 463    * times when the manager changes from A->B. But manager changes
 464    * are going to be pretty rare.
 465    */
 466   if (xev->xany.window == gdk_x11_window_get_xid (gdk_screen_get_root_window (screen)))
 467     {
 468       if (xev->xany.type == ClientMessage &&
 469           xev->xclient.message_type == client->manager_atom &&
 470           xev->xclient.data.l[1] == client->selection_atom)
 471         {
 472           check_manager_window (client);
 473           return GDK_FILTER_REMOVE;
 474         }
 475     }
 476   else if (xev->xany.window == client->manager_window)
 477     {
 478       if (xev->xany.type == DestroyNotify)
 479         {
 480           check_manager_window (client);
 481           /* let GDK do its cleanup */
 482           return GDK_FILTER_CONTINUE;
 483         }
 484       else if (xev->xany.type == PropertyNotify)
 485         {
 486           read_settings (client);
 487           return GDK_FILTER_REMOVE;
 488         }
 489     }
 490
 491   return GDK_FILTER_CONTINUE;;
 492 }
 493
 494 static Bool
 495 gdk_xsettings_watch (Window     window,
 496                      Bool       is_start,
 497                      long       mask,
 498                      GdkScreen *screen)
 499 {
 500   GdkWindow *gdkwin;
 501
 502   gdkwin = gdk_x11_window_lookup_for_display (gdk_screen_get_display (screen), window);
 503
 504   if (is_start)
 505     {
 506       if (gdkwin)
 507         g_object_ref (gdkwin);
 508       else
 509         {
 510           gdkwin = gdk_x11_window_foreign_new_for_display (gdk_screen_get_display (screen), window);
 511
 512           /* gdk_window_foreign_new_for_display() can fail and return NULL if the
 513            * window has already been destroyed.
 514            */
 515           if (!gdkwin)
 516             return False;
 517         }
 518
 519       gdk_window_add_filter (gdkwin, gdk_xsettings_client_event_filter, screen);
 520     }
 521   else
 522     {
 523       if (!gdkwin)
 524         {
 525           /* gdkwin should not be NULL here, since if starting the watch succeeded
 526            * we have a reference on the window. It might mean that the caller didn't
 527            * remove the watch when it got a DestroyNotify event. Or maybe the
 528            * caller ignored the return value when starting the watch failed.
 529            */
 530           g_warning ("gdk_xsettings_watch_cb(): Couldn't find window to unwatch");
 531           return False;
 532         }
 533
 534       gdk_window_remove_filter (gdkwin, gdk_xsettings_client_event_filter, screen);
 535       g_object_unref (gdkwin);
 536     }
 537
 538   return True;
 539 }
 540
 541 XSettingsClient *
 542 xsettings_client_new (GdkScreen *screen)
 543 {
 544   XSettingsClient *client;
 545   char buffer[256];
 546   char *atom_names[3];
 547   Atom atoms[3];
 548
 549   client = g_new (XSettingsClient, 1);
 550   if (!client)
 551     return NULL;
 552
 553   client->screen = screen;
 554   client->display = gdk_x11_display_get_xdisplay (gdk_screen_get_display (screen));
 555   client->screen = screen;
 556   client->manager_window = None;
 557   client->settings = NULL;
 558
 559   sprintf(buffer, "_XSETTINGS_S%d", gdk_x11_screen_get_screen_number (screen));
 560   atom_names[0] = buffer;
 561   atom_names[1] = "_XSETTINGS_SETTINGS";
 562   atom_names[2] = "MANAGER";
 563
 564   XInternAtoms (client->display, atom_names, 3, False, atoms);
 565
 566   client->selection_atom = atoms[0];
 567   client->xsettings_atom = atoms[1];
 568   client->manager_atom = atoms[2];
 569
 570   /* Select on StructureNotify so we get MANAGER events
 571    */
 572   add_events (client->display, gdk_x11_window_get_xid (gdk_screen_get_root_window (screen)), StructureNotifyMask);
 573
 574   gdk_xsettings_watch (gdk_x11_window_get_xid (gdk_screen_get_root_window (screen)), True, StructureNotifyMask,
 575                        client->screen);
 576
 577   check_manager_window (client);
 578
 579   return client;
 580 }
 581
 582 void
 583 xsettings_client_destroy (XSettingsClient *client)
 584 {
 585   gdk_xsettings_watch (gdk_x11_window_get_xid (gdk_screen_get_root_window (client->screen)),
 586                        False, 0, client->screen);
 587   if (client->manager_window)
 588     gdk_xsettings_watch (client->manager_window, False, 0, client->screen);
 589
 590   if (client->settings)
 591     g_hash_table_unref (client->settings);
 592   g_free (client);
 593 }
 594
 595 const XSettingsSetting *
 596 xsettings_client_get_setting (XSettingsClient   *client,
 597                               const char        *name)
 598 {
 599   return g_hash_table_lookup (client->settings, name);
 600 }
 601
 602 int
 603 xsettings_setting_equal (XSettingsSetting *setting_a,
 604                          XSettingsSetting *setting_b)
 605 {
 606   if (setting_a->type != setting_b->type)
 607     return 0;
 608
 609   switch (setting_a->type)
 610     {
 611     case XSETTINGS_TYPE_INT:
 612       return setting_a->data.v_int == setting_b->data.v_int;
 613     case XSETTINGS_TYPE_COLOR:
 614       return (setting_a->data.v_color.red == setting_b->data.v_color.red &&
 615               setting_a->data.v_color.green == setting_b->data.v_color.green &&
 616               setting_a->data.v_color.blue == setting_b->data.v_color.blue &&
 617               setting_a->data.v_color.alpha == setting_b->data.v_color.alpha);
 618     case XSETTINGS_TYPE_STRING:
 619       return strcmp (setting_a->data.v_string, setting_b->data.v_string) == 0;
 620     }
 621
 622   return 0;
 623 }
 624
 625 void
 626 xsettings_setting_free (XSettingsSetting *setting)
 627 {
 628   if (setting->type == XSETTINGS_TYPE_STRING)
 629     g_free (setting->data.v_string);
 630
 631   g_free (setting);
 632 }
 633