]> icculus.org git repositories - mikachu/openbox.git/blob - obt/prop.c
Merge branch 'work' into wip/mikabox
[mikachu/openbox.git] / obt / prop.c
1 /* -*- indent-tabs-mode: nil; tab-width: 4; c-basic-offset: 4; -*-
2
3    obt/prop.c for the Openbox window manager
4    Copyright (c) 2006        Mikael Magnusson
5    Copyright (c) 2003-2007   Dana Jansens
6
7    This program is free software; you can redistribute it and/or modify
8    it under the terms of the GNU General Public License as published by
9    the Free Software Foundation; either version 2 of the License, or
10    (at your option) any later version.
11
12    This program is distributed in the hope that it will be useful,
13    but WITHOUT ANY WARRANTY; without even the implied warranty of
14    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
15    GNU General Public License for more details.
16
17    See the COPYING file for a copy of the GNU General Public License.
18 */
19
20 #include "obt/prop.h"
21 #include "obt/display.h"
22
23 #include <X11/Xatom.h>
24 #ifdef HAVE_STRING_H
25 #  include <string.h>
26 #endif
27
28 Atom prop_atoms[OBT_PROP_NUM_ATOMS];
29 gboolean prop_started = FALSE;
30
31 #define CREATE_NAME(var, name) (prop_atoms[OBT_PROP_##var] = \
32                                 XInternAtom((obt_display), (name), FALSE))
33 #define CREATE(var) CREATE_NAME(var, #var)
34 #define CREATE_(var) CREATE_NAME(var, "_" #var)
35
36 void obt_prop_startup(void)
37 {
38     if (prop_started) return;
39     prop_started = TRUE;
40
41     g_assert(obt_display);
42
43     CREATE(CARDINAL);
44     CREATE(WINDOW);
45     CREATE(PIXMAP);
46     CREATE(ATOM);
47     CREATE(STRING);
48     CREATE_NAME(UTF8, "UTF8_STRING");
49
50     CREATE(MANAGER);
51
52     CREATE(WM_COLORMAP_WINDOWS);
53     CREATE(WM_PROTOCOLS);
54     CREATE(WM_STATE);
55     CREATE(WM_CHANGE_STATE);
56     CREATE(WM_DELETE_WINDOW);
57     CREATE(WM_TAKE_FOCUS);
58     CREATE(WM_NAME);
59     CREATE(WM_ICON_NAME);
60     CREATE(WM_CLASS);
61     CREATE(WM_WINDOW_ROLE);
62     CREATE(WM_CLIENT_MACHINE);
63     CREATE(WM_COMMAND);
64     CREATE(WM_CLIENT_LEADER);
65     CREATE(WM_TRANSIENT_FOR);
66     CREATE_(MOTIF_WM_HINTS);
67     CREATE_(MOTIF_WM_INFO);
68
69     CREATE(SM_CLIENT_ID);
70
71     CREATE_(NET_WM_FULL_PLACEMENT);
72
73     CREATE_(NET_SUPPORTED);
74     CREATE_(NET_CLIENT_LIST);
75     CREATE_(NET_CLIENT_LIST_STACKING);
76     CREATE_(NET_NUMBER_OF_DESKTOPS);
77     CREATE_(NET_DESKTOP_GEOMETRY);
78     CREATE_(NET_DESKTOP_VIEWPORT);
79     CREATE_(NET_CURRENT_DESKTOP);
80     CREATE_(NET_DESKTOP_NAMES);
81     CREATE_(NET_ACTIVE_WINDOW);
82 /*    CREATE_(NET_RESTACK_WINDOW);*/
83     CREATE_(NET_WORKAREA);
84     CREATE_(NET_SUPPORTING_WM_CHECK);
85     CREATE_(NET_DESKTOP_LAYOUT);
86     CREATE_(NET_SHOWING_DESKTOP);
87
88     CREATE_(NET_CLOSE_WINDOW);
89     CREATE_(NET_WM_MOVERESIZE);
90     CREATE_(NET_MOVERESIZE_WINDOW);
91     CREATE_(NET_REQUEST_FRAME_EXTENTS);
92     CREATE_(NET_RESTACK_WINDOW);
93
94     CREATE_(NET_STARTUP_ID);
95
96     CREATE_(NET_WM_NAME);
97     CREATE_(NET_WM_VISIBLE_NAME);
98     CREATE_(NET_WM_ICON_NAME);
99     CREATE_(NET_WM_VISIBLE_ICON_NAME);
100     CREATE_(NET_WM_DESKTOP);
101     CREATE_(NET_WM_WINDOW_TYPE);
102     CREATE_(NET_WM_STATE);
103     CREATE_(NET_WM_STRUT);
104     CREATE_(NET_WM_STRUT_PARTIAL);
105     CREATE_(NET_WM_ICON);
106     CREATE_(NET_WM_ICON_GEOMETRY);
107     CREATE_(NET_WM_PID);
108     CREATE_(NET_WM_ALLOWED_ACTIONS);
109     CREATE_(NET_WM_USER_TIME);
110 /*  CREATE_(NET_WM_USER_TIME_WINDOW); */
111     CREATE_(KDE_NET_WM_FRAME_STRUT);
112     CREATE_(NET_FRAME_EXTENTS);
113
114     CREATE_(NET_WM_PING);
115 #ifdef SYNC
116     CREATE_(NET_WM_SYNC_REQUEST);
117     CREATE_(NET_WM_SYNC_REQUEST_COUNTER);
118 #endif
119
120     CREATE_(NET_WM_WINDOW_TYPE_DESKTOP);
121     CREATE_(NET_WM_WINDOW_TYPE_DOCK);
122     CREATE_(NET_WM_WINDOW_TYPE_TOOLBAR);
123     CREATE_(NET_WM_WINDOW_TYPE_MENU);
124     CREATE_(NET_WM_WINDOW_TYPE_UTILITY);
125     CREATE_(NET_WM_WINDOW_TYPE_SPLASH);
126     CREATE_(NET_WM_WINDOW_TYPE_DIALOG);
127     CREATE_(NET_WM_WINDOW_TYPE_NORMAL);
128     CREATE_(NET_WM_WINDOW_TYPE_POPUP_MENU);
129
130     prop_atoms[OBT_PROP_NET_WM_MOVERESIZE_SIZE_TOPLEFT] = 0;
131     prop_atoms[OBT_PROP_NET_WM_MOVERESIZE_SIZE_TOP] = 1;
132     prop_atoms[OBT_PROP_NET_WM_MOVERESIZE_SIZE_TOPRIGHT] = 2;
133     prop_atoms[OBT_PROP_NET_WM_MOVERESIZE_SIZE_RIGHT] = 3;
134     prop_atoms[OBT_PROP_NET_WM_MOVERESIZE_SIZE_BOTTOMRIGHT] = 4;
135     prop_atoms[OBT_PROP_NET_WM_MOVERESIZE_SIZE_BOTTOM] = 5;
136     prop_atoms[OBT_PROP_NET_WM_MOVERESIZE_SIZE_BOTTOMLEFT] = 6;
137     prop_atoms[OBT_PROP_NET_WM_MOVERESIZE_SIZE_LEFT] = 7;
138     prop_atoms[OBT_PROP_NET_WM_MOVERESIZE_MOVE] = 8;
139     prop_atoms[OBT_PROP_NET_WM_MOVERESIZE_SIZE_KEYBOARD] = 9;
140     prop_atoms[OBT_PROP_NET_WM_MOVERESIZE_MOVE_KEYBOARD] = 10;
141     prop_atoms[OBT_PROP_NET_WM_MOVERESIZE_CANCEL] = 11;
142
143     CREATE_(NET_WM_ACTION_MOVE);
144     CREATE_(NET_WM_ACTION_RESIZE);
145     CREATE_(NET_WM_ACTION_MINIMIZE);
146     CREATE_(NET_WM_ACTION_SHADE);
147     CREATE_(NET_WM_ACTION_MAXIMIZE_HORZ);
148     CREATE_(NET_WM_ACTION_MAXIMIZE_VERT);
149     CREATE_(NET_WM_ACTION_FULLSCREEN);
150     CREATE_(NET_WM_ACTION_CHANGE_DESKTOP);
151     CREATE_(NET_WM_ACTION_CLOSE);
152     CREATE_(NET_WM_ACTION_ABOVE);
153     CREATE_(NET_WM_ACTION_BELOW);
154
155     CREATE_(NET_WM_STATE_MODAL);
156 /*    CREATE_(NET_WM_STATE_STICKY);*/
157     CREATE_(NET_WM_STATE_MAXIMIZED_VERT);
158     CREATE_(NET_WM_STATE_MAXIMIZED_HORZ);
159     CREATE_(NET_WM_STATE_SHADED);
160     CREATE_(NET_WM_STATE_SKIP_TASKBAR);
161     CREATE_(NET_WM_STATE_SKIP_PAGER);
162     CREATE_(NET_WM_STATE_HIDDEN);
163     CREATE_(NET_WM_STATE_FULLSCREEN);
164     CREATE_(NET_WM_STATE_ABOVE);
165     CREATE_(NET_WM_STATE_BELOW);
166     CREATE_(NET_WM_STATE_DEMANDS_ATTENTION);
167
168     prop_atoms[OBT_PROP_NET_WM_STATE_ADD] = 1;
169     prop_atoms[OBT_PROP_NET_WM_STATE_REMOVE] = 0;
170     prop_atoms[OBT_PROP_NET_WM_STATE_TOGGLE] = 2;
171
172     prop_atoms[OBT_PROP_NET_WM_ORIENTATION_HORZ] = 0;
173     prop_atoms[OBT_PROP_NET_WM_ORIENTATION_VERT] = 1;
174     prop_atoms[OBT_PROP_NET_WM_TOPLEFT] = 0;
175     prop_atoms[OBT_PROP_NET_WM_TOPRIGHT] = 1;
176     prop_atoms[OBT_PROP_NET_WM_BOTTOMRIGHT] = 2;
177     prop_atoms[OBT_PROP_NET_WM_BOTTOMLEFT] = 3;
178
179     CREATE_(KDE_WM_CHANGE_STATE);
180     CREATE_(KDE_NET_WM_WINDOW_TYPE_OVERRIDE);
181
182 /*
183     CREATE_NAME(ROOTPMAPId, "_XROOTPMAP_ID");
184     CREATE_NAME(ESETROOTId, "ESETROOT_PMAP_ID");
185 */
186
187     CREATE_(OPENBOX_PID);
188     CREATE_(OB_FOCUS);
189     CREATE_(OB_THEME);
190     CREATE_(OB_CONFIG_FILE);
191     CREATE_(OB_WM_ACTION_UNDECORATE);
192     CREATE_(OB_WM_STATE_UNDECORATED);
193     CREATE_(OB_WM_STATE_LOCKED);
194     CREATE_(OB_LAST_DESKTOP);
195     CREATE_(OB_CONTROL);
196     CREATE_(OB_TARGET_WINDOW);
197 }
198
199 Atom obt_prop_atom(ObtPropAtom a)
200 {
201     g_assert(prop_started);
202     g_assert(a < OBT_PROP_NUM_ATOMS);
203     return prop_atoms[a];
204 }
205
206 static gboolean get_prealloc(Window win, Atom prop, Atom type, gint size,
207                              guchar *data, gulong num)
208 {
209     gboolean ret = FALSE;
210     gint res;
211     guchar *xdata = NULL;
212     Atom ret_type;
213     gint ret_size;
214     gulong ret_items, bytes_left;
215     glong num32 = 32 / size * num; /* num in 32-bit elements */
216
217     res = XGetWindowProperty(obt_display, win, prop, 0l, num32,
218                              FALSE, type, &ret_type, &ret_size,
219                              &ret_items, &bytes_left, &xdata);
220     if (res == Success && ret_items && xdata) {
221         if (ret_size == size && ret_items >= num) {
222             guint i;
223             for (i = 0; i < num; ++i)
224                 switch (size) {
225                 case 8:
226                     data[i] = xdata[i];
227                     break;
228                 case 16:
229                     ((guint16*)data)[i] = ((gushort*)xdata)[i];
230                     break;
231                 case 32:
232                     ((guint32*)data)[i] = ((gulong*)xdata)[i];
233                     break;
234                 default:
235                     g_assert_not_reached(); /* unhandled size */
236                 }
237             ret = TRUE;
238         }
239         XFree(xdata);
240     }
241     return ret;
242 }
243
244 static gboolean get_all(Window win, Atom prop, Atom type, gint size,
245                         guchar **data, guint *num)
246 {
247     gboolean ret = FALSE;
248     gint res;
249     guchar *xdata = NULL;
250     Atom ret_type;
251     gint ret_size;
252     gulong ret_items, bytes_left;
253
254     res = XGetWindowProperty(obt_display, win, prop, 0l, G_MAXLONG,
255                              FALSE, type, &ret_type, &ret_size,
256                              &ret_items, &bytes_left, &xdata);
257     if (res == Success) {
258         if (ret_size == size && ret_items > 0) {
259             guint i;
260
261             *data = g_malloc(ret_items * (size / 8));
262             for (i = 0; i < ret_items; ++i)
263                 switch (size) {
264                 case 8:
265                     (*data)[i] = xdata[i];
266                     break;
267                 case 16:
268                     ((guint16*)*data)[i] = ((gushort*)xdata)[i];
269                     break;
270                 case 32:
271                     ((guint32*)*data)[i] = ((gulong*)xdata)[i];
272                     break;
273                 default:
274                     g_assert_not_reached(); /* unhandled size */
275                 }
276             *num = ret_items;
277             ret = TRUE;
278         }
279         XFree(xdata);
280     }
281     return ret;
282 }
283
284 static gboolean get_stringlist(Window win, Atom prop, gchar ***list, gint *nstr)
285 {
286     XTextProperty tprop;
287     gboolean ret = FALSE;
288
289     if (XGetTextProperty(obt_display, win, &tprop, prop) && tprop.nitems) {
290         if (XTextPropertyToStringList(&tprop, list, nstr))
291             ret = TRUE;
292         XFree(tprop.value);
293     }
294     return ret;
295 }
296
297 gboolean obt_prop_get32(Window win, Atom prop, Atom type, guint32 *ret)
298 {
299     return get_prealloc(win, prop, type, 32, (guchar*)ret, 1);
300 }
301
302 gboolean obt_prop_get_array32(Window win, Atom prop, Atom type, guint32 **ret,
303                               guint *nret)
304 {
305     return get_all(win, prop, type, 32, (guchar**)ret, nret);
306 }
307
308 gboolean obt_prop_get_string_locale(Window win, Atom prop, gchar **ret)
309 {
310     gchar **list;
311     gint nstr;
312     gchar *s;
313
314     if (get_stringlist(win, prop, &list, &nstr) && nstr) {
315         s = g_locale_to_utf8(list[0], -1, NULL, NULL, NULL);
316         XFreeStringList(list);
317         if (s) {
318             *ret = s;
319             return TRUE;
320         }
321     }
322     return FALSE;
323 }
324
325 gboolean obt_prop_get_strings_locale(Window win, Atom prop, gchar ***ret)
326 {
327     GSList *strs = NULL, *it;
328     gchar *raw, *p;
329     guint num, i, count = 0;
330
331     if (get_all(win, prop, OBT_PROP_ATOM(STRING), 8,
332                 (guchar**)&raw, &num))
333     {
334         p = raw;
335         while (p < raw + num) {
336             ++count;
337             strs = g_slist_append(strs, p);
338             p += strlen(p) + 1; /* next string */
339         }
340
341         *ret = g_new0(gchar*, count + 1);
342         (*ret)[count] = NULL; /* null terminated list */
343
344         for (i = 0, it = strs; it; ++i, it = g_slist_next(it)) {
345             (*ret)[i] = g_locale_to_utf8(it->data, -1, NULL, NULL, NULL);
346             /* make sure translation did not fail */
347             if (!(*ret)[i])
348                 (*ret)[i] = g_strdup("");
349         }
350         g_free(raw);
351         g_slist_free(strs);
352         return TRUE;
353     }
354     return FALSE;
355 }
356
357 gboolean obt_prop_get_string_utf8(Window win, Atom prop, gchar **ret)
358 {
359     gchar *raw;
360     gchar *str;
361     guint num;
362
363     if (get_all(win, prop, OBT_PROP_ATOM(UTF8), 8,
364                 (guchar**)&raw, &num))
365     {
366         str = g_strndup(raw, num); /* grab the first string from the list */
367         g_free(raw);
368         if (g_utf8_validate(str, -1, NULL)) {
369             *ret = str;
370             return TRUE;
371         }
372         g_free(str);
373     }
374     return FALSE;
375 }
376
377 gboolean obt_prop_get_strings_utf8(Window win, Atom prop, gchar ***ret)
378 {
379     GSList *strs = NULL, *it;
380     gchar *raw, *p;
381     guint num, i, count = 0;
382
383     if (get_all(win, prop, OBT_PROP_ATOM(UTF8), 8,
384                 (guchar**)&raw, &num))
385     {
386         p = raw;
387         while (p < raw + num) {
388             ++count;
389             strs = g_slist_append(strs, p);
390             p += strlen(p) + 1; /* next string */
391         }
392
393         *ret = g_new0(gchar*, count + 1);
394
395         for (i = 0, it = strs; it; ++i, it = g_slist_next(it)) {
396             if (g_utf8_validate(it->data, -1, NULL))
397                 (*ret)[i] = g_strdup(it->data);
398             else
399                 (*ret)[i] = g_strdup("");
400         }
401         g_free(raw);
402         g_slist_free(strs);
403         return TRUE;
404     }
405     return FALSE;
406 }
407
408 void obt_prop_set32(Window win, Atom prop, Atom type, gulong val)
409 {
410     XChangeProperty(obt_display, win, prop, type, 32, PropModeReplace,
411                     (guchar*)&val, 1);
412 }
413
414 void obt_prop_set_array32(Window win, Atom prop, Atom type, gulong *val,
415                       guint num)
416 {
417     XChangeProperty(obt_display, win, prop, type, 32, PropModeReplace,
418                     (guchar*)val, num);
419 }
420
421 void obt_prop_set_string_locale(Window win, Atom prop, const gchar *val)
422 {
423     gchar const *s[2] = { val, NULL };
424     obt_prop_set_strings_locale(win, prop, s);
425 }
426
427 void obt_prop_set_strings_locale(Window win, Atom prop, const gchar **strs)
428 {
429     gint i, count;
430     gchar **lstrs;
431     XTextProperty tprop;
432
433     /* count the strings in strs, and convert them to the locale format */
434     for (count = 0; strs[count]; ++count);
435     lstrs = g_new0(char*, count);
436     for (i = 0; i < count; ++i) {
437         lstrs[i] = g_locale_from_utf8(strs[i], -1, NULL, NULL, NULL);
438         if (!lstrs[i]) {
439             lstrs[i] = g_strdup(""); /* make it an empty string */
440             g_warning("Unable to translate string '%s' from UTF8 to locale "
441                       "format", strs[i]);
442         }
443     }
444
445
446     XStringListToTextProperty(lstrs, count, &tprop);
447     XSetTextProperty(obt_display, win, &tprop, prop);
448     XFree(tprop.value);
449 }
450
451 void obt_prop_set_string_utf8(Window win, Atom prop, const gchar *val)
452 {
453     XChangeProperty(obt_display, win, prop, OBT_PROP_ATOM(UTF8), 8,
454                     PropModeReplace, (const guchar*)val, strlen(val));
455 }
456
457 void obt_prop_set_strings_utf8(Window win, Atom prop, const gchar **strs)
458 {
459     GString *str;
460     gchar const **s;
461
462     str = g_string_sized_new(0);
463     for (s = strs; *s; ++s) {
464         str = g_string_append(str, *s);
465         str = g_string_append_c(str, '\0');
466     }
467     XChangeProperty(obt_display, win, prop, obt_prop_atom(OBT_PROP_UTF8), 8,
468                     PropModeReplace, (guchar*)str->str, str->len);
469     g_string_free(str, TRUE);
470 }
471
472 void obt_prop_erase(Window win, Atom prop)
473 {
474     XDeleteProperty(obt_display, win, prop);
475 }
476
477 void obt_prop_message(gint screen, Window about, Atom messagetype,
478                       glong data0, glong data1, glong data2, glong data3,
479                       glong data4, glong mask)
480 {
481     obt_prop_message_to(obt_root(screen), about, messagetype,
482                         data0, data1, data2, data3, data4, mask);
483 }
484
485 void obt_prop_message_to(Window to, Window about,
486                          Atom messagetype,
487                          glong data0, glong data1, glong data2, glong data3,
488                          glong data4, glong mask)
489 {
490     XEvent ce;
491     ce.xclient.type = ClientMessage;
492     ce.xclient.message_type = messagetype;
493     ce.xclient.display = obt_display;
494     ce.xclient.window = about;
495     ce.xclient.format = 32;
496     ce.xclient.data.l[0] = data0;
497     ce.xclient.data.l[1] = data1;
498     ce.xclient.data.l[2] = data2;
499     ce.xclient.data.l[3] = data3;
500     ce.xclient.data.l[4] = data4;
501     XSendEvent(obt_display, to, FALSE, mask, &ce);
502 }