Add include of cairo.h when using librsvg
[dana/openbox.git] / tests / icons.c
1 /* -*- indent-tabs-mode: nil; tab-width: 4; c-basic-offset: 4; -*-
2
3    icons.c for the Openbox window manager
4    Copyright (c) 2003-2007   Dana Jansens
5
6    This program is free software; you can redistribute it and/or modify
7    it under the terms of the GNU General Public License as published by
8    the Free Software Foundation; either version 2 of the License, or
9    (at your option) any later version.
10
11    This program is distributed in the hope that it will be useful,
12    but WITHOUT ANY WARRANTY; without even the implied warranty of
13    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14    GNU General Public License for more details.
15
16    See the COPYING file for a copy of the GNU General Public License.
17 */
18
19 #include <X11/Xlib.h>
20 #include <X11/Xutil.h>
21 #include <X11/Xatom.h>
22 #include <X11/cursorfont.h>
23 #include <stdlib.h>
24 #include <stdio.h>
25 #include <assert.h>
26 #include <glib.h>
27
28 Window findClient(Display *d, Window win)
29 {
30     Window r, *children;
31     unsigned int n, i;
32     Atom state = XInternAtom(d, "WM_STATE", True);
33     Atom ret_type;
34     int ret_format;
35     unsigned long ret_items, ret_bytesleft;
36     unsigned long *prop_return;
37
38     XQueryTree(d, win, &r, &r, &children, &n);
39     for (i = 0; i < n; ++i) {
40         Window w = findClient(d, children[i]);
41         if (w) return w;
42     }
43
44     // try me
45     XGetWindowProperty(d, win, state, 0, 1,
46                        False, state, &ret_type, &ret_format,
47                        &ret_items, &ret_bytesleft,
48                        (unsigned char**) &prop_return);
49     if (ret_type == None || ret_items < 1)
50         return None;
51     return win; // found it!
52 }
53
54 int main(int argc, char **argv)
55 {
56     Display *d = XOpenDisplay(NULL);
57     int s = DefaultScreen(d);
58     Atom net_wm_icon = XInternAtom(d, "_NET_WM_ICON", True);
59     Atom ret_type;
60     unsigned int winw = 0, winh = 0;
61     int ret_format;
62     unsigned long ret_items, ret_bytesleft;
63     const int MAX_IMAGES = 10;
64     unsigned long *prop_return[MAX_IMAGES];
65     XImage *i[MAX_IMAGES];
66     long offset = 0;
67     unsigned int image = 0;
68     unsigned int j; // loop counter
69     Window id, win;
70     Pixmap p;
71     Cursor cur;
72     XEvent ev;
73     unsigned int bs = sizeof(long);
74
75     printf("Click on a window with an icon...\n");
76
77     //int id = strtol(argv[1], NULL, 16);
78     XUngrabPointer(d, CurrentTime);
79     cur = XCreateFontCursor(d, XC_crosshair);
80     XGrabPointer(d, RootWindow(d, s), False, ButtonPressMask, GrabModeAsync,
81                  GrabModeAsync, None, cur, CurrentTime);
82     while (1) {
83         XNextEvent(d, &ev);
84         if (ev.type == ButtonPress) {
85             XUngrabPointer(d, CurrentTime);
86             id = findClient(d, ev.xbutton.subwindow);
87             break;
88         }
89     }
90
91     printf("Using window 0x%lx\n", id);
92
93     do {
94         unsigned int w, h;
95
96         XGetWindowProperty(d, id, net_wm_icon, offset++, 1,
97                            False, XA_CARDINAL, &ret_type, &ret_format,
98                            &ret_items, &ret_bytesleft,
99                            (unsigned char**) &prop_return[image]);
100         if (ret_type == None || ret_items < 1) {
101             printf("No icon found\n");
102             return 1;
103         }
104         w = prop_return[image][0];
105         XFree(prop_return[image]);
106
107         XGetWindowProperty(d, id, net_wm_icon, offset++, 1,
108                            False, XA_CARDINAL, &ret_type, &ret_format,
109                            &ret_items, &ret_bytesleft,
110                            (unsigned char**) &prop_return[image]);
111         if (ret_type == None || ret_items < 1) {
112             printf("Failed to get height\n");
113             return 1;
114         }
115         h = prop_return[image][0];
116         XFree(prop_return[image]);
117
118         XGetWindowProperty(d, id, net_wm_icon, offset, w*h,
119                            False, XA_CARDINAL, &ret_type, &ret_format,
120                            &ret_items, &ret_bytesleft,
121                            (unsigned char**) &prop_return[image]);
122         if (ret_type == None || ret_items < w*h) {
123             printf("Failed to get image data\n");
124             return 1;
125         }
126         offset += w*h;
127
128         printf("Found icon with size %dx%d\n", w, h);
129
130         i[image] = XCreateImage(d, DefaultVisual(d, s), DefaultDepth(d, s),
131                                 ZPixmap, 0, NULL, w, h, 32, 0);
132         assert(i[image]);
133         i[image]->byte_order = LSBFirst;
134         i[image]->data = (char*)prop_return[image];
135         for (j = 0; j < w*h; j++) {
136             unsigned char alpha = (unsigned char)i[image]->data[j*bs+3];
137             unsigned char r = (unsigned char) i[image]->data[j*bs+0];
138             unsigned char g = (unsigned char) i[image]->data[j*bs+1];
139             unsigned char b = (unsigned char) i[image]->data[j*bs+2];
140
141             // background color
142             unsigned char bgr = 0;
143             unsigned char bgg = 0;
144             unsigned char bgb = 0;
145
146             r = bgr + (r - bgr) * alpha / 256;
147             g = bgg + (g - bgg) * alpha / 256;
148             b = bgb + (b - bgb) * alpha / 256;
149
150             i[image]->data[j*4+0] = (char) r;
151             i[image]->data[j*4+1] = (char) g;
152             i[image]->data[j*4+2] = (char) b;
153         }
154
155         winw += w;
156         if (h > winh) winh = h;
157
158         ++image;
159     } while (ret_bytesleft > 0 && image < MAX_IMAGES);
160
161 #define hashsize(n) ((guint32)1<<(n))
162 #define hashmask(n) (hashsize(n)-1)
163 #define rot(x,k) (((x)<<(k)) | ((x)>>(32-(k))))
164
165 #define mix(a,b,c) \
166 { \
167   a -= c;  a ^= rot(c, 4);  c += b; \
168   b -= a;  b ^= rot(a, 6);  a += c; \
169   c -= b;  c ^= rot(b, 8);  b += a; \
170   a -= c;  a ^= rot(c,16);  c += b; \
171   b -= a;  b ^= rot(a,19);  a += c; \
172   c -= b;  c ^= rot(b, 4);  b += a; \
173 }
174
175 #define final(a,b,c) \
176 { \
177   c ^= b; c -= rot(b,14); \
178   a ^= c; a -= rot(c,11); \
179   b ^= a; b -= rot(a,25); \
180   c ^= b; c -= rot(b,16); \
181   a ^= c; a -= rot(c,4);  \
182   b ^= a; b -= rot(a,14); \
183   c ^= b; c -= rot(b,24); \
184 }
185
186     /* hash the images */
187     for (j = 0; j < image; ++j) {
188         unsigned int w, h, length;
189         guint32 a,b,c;
190         guint32 initval = 0xf00d;
191         const guint32 *k = (guint32*)i[j]->data;
192
193         w = i[j]->width;
194         h = i[j]->height;
195         length = w * h;
196
197         /* Set up the internal state */
198         a = b = c = 0xdeadbeef + (((guint32)length)<<2) + initval;
199
200         /*---------------------------------------- handle most of the key */
201         while (length > 3)
202         {
203             a += k[0];
204             b += k[1];
205             c += k[2];
206             mix(a,b,c);
207             length -= 3;
208             k += 3;
209         }
210
211         /*--------------------------------- handle the last 3 uint32_t's */
212         switch(length)           /* all the case statements fall through */
213         {
214         case 3 : c+=k[2];
215         case 2 : b+=k[1];
216         case 1 : a+=k[0];
217             final(a,b,c);
218         case 0:     /* case 0: nothing left to add */
219             break;
220         }
221         /*------------------------------------ report the result */
222         printf("image[%d] %ux%u %lu\n", j, w, h, c);
223     }
224
225     win = XCreateSimpleWindow(d, RootWindow(d, s), 0, 0, winw, winh,
226                               0, 0, 0);
227     assert(win);
228     XMapWindow(d, win);
229
230     p = XCreatePixmap(d, win, winw, winh, DefaultDepth(d, s));
231     XFillRectangle(d, p, DefaultGC(d, s), 0, 0, winw, winh);
232
233     for (j = 0; j < image; ++j) {
234         static unsigned int x = 0;
235
236         XPutImage(d, p, DefaultGC(d, s), i[j], 0, 0, x, 0,
237                   i[j]->width, i[j]->height);
238         x += i[j]->width;
239         XDestroyImage(i[j]);
240     }
241
242     XSetWindowBackgroundPixmap(d, win, p);
243     XClearWindow(d, win);
244
245     XFlush(d);
246
247     getchar();
248
249     XFreePixmap(d, p);
250     XCloseDisplay(d);
251 }