2 * Copyright © 2001 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.
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, (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)
444 client->watch (client->manager_window, True,
445 PropertyChangeMask | StructureNotifyMask,
448 read_settings (client);
452 xsettings_client_new (Display *display,
454 XSettingsNotifyFunc notify,
455 XSettingsWatchFunc watch,
458 XSettingsClient *client;
463 client = malloc (sizeof *client);
467 client->display = display;
468 client->screen = screen;
469 client->notify = notify;
470 client->watch = watch;
471 client->cb_data = cb_data;
473 client->ungrab = NULL;
475 client->manager_window = None;
476 client->settings = NULL;
478 sprintf(buffer, "_XSETTINGS_S%d", screen);
479 atom_names[0] = buffer;
480 atom_names[1] = "_XSETTINGS_SETTINGS";
481 atom_names[2] = "MANAGER";
483 XInternAtoms (display, atom_names, 3, False, atoms);
485 client->selection_atom = atoms[0];
486 client->xsettings_atom = atoms[1];
487 client->manager_atom = atoms[2];
489 /* Select on StructureNotify so we get MANAGER events
491 add_events (display, RootWindow (display, screen), StructureNotifyMask);
494 client->watch (RootWindow (display, screen), True, StructureNotifyMask,
497 check_manager_window (client);
503 xsettings_client_set_grab_func (XSettingsClient *client,
504 XSettingsGrabFunc grab)
510 xsettings_client_set_ungrab_func (XSettingsClient *client,
511 XSettingsGrabFunc ungrab)
513 client->ungrab = ungrab;
517 xsettings_client_destroy (XSettingsClient *client)
520 client->watch (RootWindow (client->display, client->screen),
521 False, 0, client->cb_data);
522 if (client->manager_window && client->watch)
523 client->watch (client->manager_window, False, 0, client->cb_data);
525 xsettings_list_free (client->settings);
530 xsettings_client_get_setting (XSettingsClient *client,
532 XSettingsSetting **setting)
534 XSettingsSetting *search = xsettings_list_lookup (client->settings, name);
537 *setting = xsettings_setting_copy (search);
538 return *setting ? XSETTINGS_SUCCESS : XSETTINGS_NO_MEM;
541 return XSETTINGS_NO_ENTRY;
545 xsettings_client_process_event (XSettingsClient *client,
548 /* The checks here will not unlikely cause us to reread
549 * the properties from the manager window a number of
550 * times when the manager changes from A->B. But manager changes
551 * are going to be pretty rare.
553 if (xev->xany.window == RootWindow (client->display, client->screen))
555 if (xev->xany.type == ClientMessage &&
556 xev->xclient.message_type == client->manager_atom &&
557 xev->xclient.data.l[1] == client->selection_atom)
559 check_manager_window (client);
563 else if (xev->xany.window == client->manager_window)
565 if (xev->xany.type == DestroyNotify)
567 check_manager_window (client);
570 else if (xev->xany.type == PropertyNotify)
572 read_settings (client);