2
* Copyright © 2001, 2007 Red Hat, Inc.
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.
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.
21
* Author: Owen Taylor, Red Hat, Inc.
23
#include "clutter-build-config.h"
30
#include <X11/Xmd.h> /* For CARD16 */
32
#include "xsettings-client.h"
34
struct _XSettingsClient
38
XSettingsNotifyFunc notify;
39
XSettingsWatchFunc watch;
42
XSettingsGrabFunc grab;
43
XSettingsGrabFunc ungrab;
45
Window manager_window;
50
XSettingsList *settings;
54
notify_changes (XSettingsClient *client,
55
XSettingsList *old_list)
57
XSettingsList *old_iter = old_list;
58
XSettingsList *new_iter = client->settings;
63
while (old_iter || new_iter)
67
if (old_iter && new_iter)
68
cmp = strcmp (old_iter->setting->name, new_iter->setting->name);
76
client->notify (old_iter->setting->name,
77
XSETTINGS_ACTION_DELETED,
83
if (!xsettings_setting_equal (old_iter->setting,
85
client->notify (old_iter->setting->name,
86
XSETTINGS_ACTION_CHANGED,
92
client->notify (new_iter->setting->name,
99
old_iter = old_iter->next;
101
new_iter = new_iter->next;
106
ignore_errors (Display *display, XErrorEvent *event)
111
static char local_byte_order = '\0';
113
#define BYTES_LEFT(buffer) ((buffer)->data + (buffer)->len - (buffer)->pos)
115
static XSettingsResult
116
fetch_card16 (XSettingsBuffer *buffer,
121
if (BYTES_LEFT (buffer) < 2)
122
return XSETTINGS_ACCESS;
124
x = *(CARD16 *)buffer->pos;
127
if (buffer->byte_order == local_byte_order)
130
*result = (x << 8) | (x >> 8);
132
return XSETTINGS_SUCCESS;
135
static XSettingsResult
136
fetch_ushort (XSettingsBuffer *buffer,
137
unsigned short *result)
142
r = fetch_card16 (buffer, &x);
143
if (r == XSETTINGS_SUCCESS)
149
static XSettingsResult
150
fetch_card32 (XSettingsBuffer *buffer,
155
if (BYTES_LEFT (buffer) < 4)
156
return XSETTINGS_ACCESS;
158
x = *(CARD32 *)buffer->pos;
161
if (buffer->byte_order == local_byte_order)
164
*result = (x << 24) | ((x & 0xff00) << 8) | ((x & 0xff0000) >> 8) | (x >> 24);
166
return XSETTINGS_SUCCESS;
169
static XSettingsResult
170
fetch_card8 (XSettingsBuffer *buffer,
173
if (BYTES_LEFT (buffer) < 1)
174
return XSETTINGS_ACCESS;
176
*result = *(CARD8 *)buffer->pos;
179
return XSETTINGS_SUCCESS;
182
#define XSETTINGS_PAD(n,m) ((n + m - 1) & (~(m-1)))
184
static XSettingsList *
185
parse_settings (unsigned char *data,
188
XSettingsBuffer buffer;
189
XSettingsResult result = XSETTINGS_SUCCESS;
190
XSettingsList *settings = NULL;
194
XSettingsSetting *setting = NULL;
196
local_byte_order = xsettings_byte_order ();
198
buffer.pos = buffer.data = data;
201
result = fetch_card8 (&buffer, (unsigned char *)&buffer.byte_order);
202
if (buffer.byte_order != MSBFirst &&
203
buffer.byte_order != LSBFirst)
205
fprintf (stderr, "Invalid byte order in XSETTINGS property\n");
206
result = XSETTINGS_FAILED;
212
result = fetch_card32 (&buffer, &serial);
213
if (result != XSETTINGS_SUCCESS)
216
result = fetch_card32 (&buffer, &n_entries);
217
if (result != XSETTINGS_SUCCESS)
220
for (i = 0; i < n_entries; i++)
227
result = fetch_card8 (&buffer, &type);
228
if (result != XSETTINGS_SUCCESS)
233
result = fetch_card16 (&buffer, &name_len);
234
if (result != XSETTINGS_SUCCESS)
237
pad_len = XSETTINGS_PAD(name_len, 4);
238
if (BYTES_LEFT (&buffer) < pad_len)
240
result = XSETTINGS_ACCESS;
244
setting = malloc (sizeof *setting);
247
result = XSETTINGS_NO_MEM;
250
setting->type = XSETTINGS_TYPE_INT; /* No allocated memory */
252
setting->name = malloc (name_len + 1);
255
result = XSETTINGS_NO_MEM;
259
memcpy (setting->name, buffer.pos, name_len);
260
setting->name[name_len] = '\0';
261
buffer.pos += pad_len;
263
result = fetch_card32 (&buffer, &v_int);
264
if (result != XSETTINGS_SUCCESS)
266
setting->last_change_serial = v_int;
270
case XSETTINGS_TYPE_INT:
271
result = fetch_card32 (&buffer, &v_int);
272
if (result != XSETTINGS_SUCCESS)
275
setting->data.v_int = (INT32)v_int;
277
case XSETTINGS_TYPE_STRING:
278
result = fetch_card32 (&buffer, &v_int);
279
if (result != XSETTINGS_SUCCESS)
282
pad_len = XSETTINGS_PAD (v_int, 4);
283
if (v_int + 1 == 0 || /* Guard against wrap-around */
284
BYTES_LEFT (&buffer) < pad_len)
286
result = XSETTINGS_ACCESS;
290
setting->data.v_string = malloc (v_int + 1);
291
if (!setting->data.v_string)
293
result = XSETTINGS_NO_MEM;
297
memcpy (setting->data.v_string, buffer.pos, v_int);
298
setting->data.v_string[v_int] = '\0';
299
buffer.pos += pad_len;
302
case XSETTINGS_TYPE_COLOR:
303
result = fetch_ushort (&buffer, &setting->data.v_color.red);
304
if (result != XSETTINGS_SUCCESS)
306
result = fetch_ushort (&buffer, &setting->data.v_color.green);
307
if (result != XSETTINGS_SUCCESS)
309
result = fetch_ushort (&buffer, &setting->data.v_color.blue);
310
if (result != XSETTINGS_SUCCESS)
312
result = fetch_ushort (&buffer, &setting->data.v_color.alpha);
313
if (result != XSETTINGS_SUCCESS)
318
/* Quietly ignore unknown types */
322
setting->type = type;
324
result = xsettings_list_insert (&settings, setting);
325
if (result != XSETTINGS_SUCCESS)
333
if (result != XSETTINGS_SUCCESS)
337
case XSETTINGS_NO_MEM:
338
fprintf(stderr, "Out of memory reading XSETTINGS property\n");
340
case XSETTINGS_ACCESS:
341
fprintf(stderr, "Invalid XSETTINGS property (read off end)\n");
343
case XSETTINGS_DUPLICATE_ENTRY:
344
fprintf (stderr, "Duplicate XSETTINGS entry for '%s'\n", setting->name);
345
case XSETTINGS_FAILED:
346
case XSETTINGS_SUCCESS:
347
case XSETTINGS_NO_ENTRY:
352
xsettings_setting_free (setting);
354
xsettings_list_free (settings);
363
read_settings (XSettingsClient *client)
367
unsigned long n_items;
368
unsigned long bytes_after;
372
int (*old_handler) (Display *, XErrorEvent *);
374
XSettingsList *old_list = client->settings;
376
client->settings = NULL;
378
if (client->manager_window)
380
old_handler = XSetErrorHandler (ignore_errors);
381
result = XGetWindowProperty (client->display, client->manager_window,
382
client->xsettings_atom, 0, LONG_MAX,
383
False, client->xsettings_atom,
384
&type, &format, &n_items, &bytes_after, &data);
385
XSetErrorHandler (old_handler);
387
if (result == Success && type != None)
389
if (type != client->xsettings_atom)
391
fprintf (stderr, "Invalid type for XSETTINGS property");
393
else if (format != 8)
395
fprintf (stderr, "Invalid format for XSETTINGS property %d", format);
398
client->settings = parse_settings (data, n_items);
404
notify_changes (client, old_list);
405
xsettings_list_free (old_list);
409
add_events (Display *display,
413
XWindowAttributes attr;
415
XGetWindowAttributes (display, window, &attr);
416
XSelectInput (display, window, attr.your_event_mask | mask);
420
check_manager_window (XSettingsClient *client)
422
if (client->manager_window && client->watch)
423
client->watch (client->manager_window, False, 0, client->cb_data);
426
client->grab (client->display);
428
XGrabServer (client->display);
430
client->manager_window = XGetSelectionOwner (client->display,
431
client->selection_atom);
432
if (client->manager_window)
433
XSelectInput (client->display, client->manager_window,
434
PropertyChangeMask | StructureNotifyMask);
437
client->ungrab (client->display);
439
XUngrabServer (client->display);
441
XFlush (client->display);
443
if (client->manager_window && client->watch)
445
if (!client->watch (client->manager_window, True,
446
PropertyChangeMask | StructureNotifyMask,
449
/* Inability to watch the window probably means that it was destroyed
452
client->manager_window = None;
458
read_settings (client);
462
xsettings_client_new (Display *display,
464
XSettingsNotifyFunc notify,
465
XSettingsWatchFunc watch,
468
return xsettings_client_new_with_grab_funcs (display, screen, notify, watch, cb_data,
473
xsettings_client_new_with_grab_funcs (Display *display,
475
XSettingsNotifyFunc notify,
476
XSettingsWatchFunc watch,
478
XSettingsGrabFunc grab,
479
XSettingsGrabFunc ungrab)
481
XSettingsClient *client;
486
client = malloc (sizeof *client);
490
client->display = display;
491
client->screen = screen;
492
client->notify = notify;
493
client->watch = watch;
494
client->cb_data = cb_data;
496
client->ungrab = ungrab;
498
client->manager_window = None;
499
client->settings = NULL;
501
sprintf(buffer, "_XSETTINGS_S%d", screen);
502
atom_names[0] = buffer;
503
atom_names[1] = "_XSETTINGS_SETTINGS";
504
atom_names[2] = "MANAGER";
506
#ifdef HAVE_XINTERNATOMS
507
XInternAtoms (display, atom_names, 3, False, atoms);
509
atoms[0] = XInternAtom (display, atom_names[0], False);
510
atoms[1] = XInternAtom (display, atom_names[1], False);
511
atoms[2] = XInternAtom (display, atom_names[2], False);
514
client->selection_atom = atoms[0];
515
client->xsettings_atom = atoms[1];
516
client->manager_atom = atoms[2];
518
/* Select on StructureNotify so we get MANAGER events
520
add_events (display, RootWindow (display, screen), StructureNotifyMask);
523
client->watch (RootWindow (display, screen), True, StructureNotifyMask,
526
check_manager_window (client);
533
xsettings_client_set_grab_func (XSettingsClient *client,
534
XSettingsGrabFunc grab)
540
xsettings_client_set_ungrab_func (XSettingsClient *client,
541
XSettingsGrabFunc ungrab)
543
client->ungrab = ungrab;
547
xsettings_client_destroy (XSettingsClient *client)
550
client->watch (RootWindow (client->display, client->screen),
551
False, 0, client->cb_data);
552
if (client->manager_window && client->watch)
553
client->watch (client->manager_window, False, 0, client->cb_data);
555
xsettings_list_free (client->settings);
560
xsettings_client_get_setting (XSettingsClient *client,
562
XSettingsSetting **setting)
564
XSettingsSetting *search = xsettings_list_lookup (client->settings, name);
567
*setting = xsettings_setting_copy (search);
568
return *setting ? XSETTINGS_SUCCESS : XSETTINGS_NO_MEM;
571
return XSETTINGS_NO_ENTRY;
575
xsettings_client_process_event (XSettingsClient *client,
578
/* The checks here will not unlikely cause us to reread
579
* the properties from the manager window a number of
580
* times when the manager changes from A->B. But manager changes
581
* are going to be pretty rare.
583
if (xev->xany.window == RootWindow (client->display, client->screen))
585
if (xev->xany.type == ClientMessage &&
586
xev->xclient.message_type == client->manager_atom &&
587
xev->xclient.data.l[1] == client->selection_atom)
589
check_manager_window (client);
593
else if (xev->xany.window == client->manager_window)
595
if (xev->xany.type == DestroyNotify)
597
check_manager_window (client);
598
/* let GDK do its cleanup */
601
else if (xev->xany.type == PropertyNotify)
603
read_settings (client);