c39b7b1fc2adab1a094dd96896a9ceb55ba25551
[dana/xcompmgr.git] / xcompmgr.c
1 /*
2  * $Id$
3  *
4  * Copyright © 2003 Keith Packard
5  *
6  * Permission to use, copy, modify, distribute, and sell this software and its
7  * documentation for any purpose is hereby granted without fee, provided that
8  * the above copyright notice appear in all copies and that both that
9  * copyright notice and this permission notice appear in supporting
10  * documentation, and that the name of Keith Packard not be used in
11  * advertising or publicity pertaining to distribution of the software without
12  * specific, written prior permission.  Keith Packard makes no
13  * representations about the suitability of this software for any purpose.  It
14  * is provided "as is" without express or implied warranty.
15  *
16  * KEITH PACKARD DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE,
17  * INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO
18  * EVENT SHALL KEITH PACKARD BE LIABLE FOR ANY SPECIAL, INDIRECT OR
19  * CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE,
20  * DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER
21  * TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR
22  * PERFORMANCE OF THIS SOFTWARE.
23  */
24
25
26 /* Modified by Matthew Hawn. I don't know what to say here so follow what it 
27    says above. Not that I can really do anything about it
28 */
29
30
31 #include <stdlib.h>
32 #include <stdio.h>
33 #include <string.h>
34 #include <math.h>
35 #include <sys/poll.h>
36 #include <sys/time.h>
37 #include <time.h>
38 #include <unistd.h>
39 #include <X11/Xlib.h>
40 #include <X11/Xutil.h>
41 #include <X11/Xatom.h>
42 #include <X11/extensions/Xcomposite.h>
43 #include <X11/extensions/Xdamage.h>
44 #include <X11/extensions/Xrender.h>
45
46 #if COMPOSITE_MAJOR > 0 || COMPOSITE_MINOR >= 2
47 #define HAS_NAME_WINDOW_PIXMAP 1
48 #endif
49
50 #define CAN_DO_USABLE 0
51
52 typedef struct _ignore {
53     struct _ignore      *next;
54     unsigned long       sequence;
55 } ignore;
56
57 typedef struct _win {
58     struct _win         *next;
59     Window              id;
60 #if HAS_NAME_WINDOW_PIXMAP
61     Pixmap              pixmap;
62 #endif
63     XWindowAttributes   a;
64 #if CAN_DO_USABLE
65     Bool                usable;             /* mapped and all damaged at one point */
66     XRectangle          damage_bounds;      /* bounds of damage */
67 #endif
68     int                 mode;
69     int                 damaged;
70     Damage              damage;
71     Picture             picture;
72     Picture             alphaPict;
73     Picture             shadowPict;
74     XserverRegion       borderSize;
75     XserverRegion       extents;
76     Picture             shadow;
77     int                 shadow_dx;
78     int                 shadow_dy;
79     int                 shadow_width;
80     int                 shadow_height;
81     unsigned int        opacity;
82     Atom                windowType;
83     unsigned long       damage_sequence;    /* sequence when damage was created */
84
85     /* for drawing translucent windows */
86     XserverRegion       borderClip;
87     struct _win         *prev_trans;
88 } win;
89
90 typedef struct _conv {
91     int     size;
92     double  *data;
93 } conv;
94
95 typedef struct _fade {
96     struct _fade        *next;
97     win                 *w;
98     double              cur;
99     double              finish;
100     double              step;
101     void                (*callback) (Display *dpy, win *w, Bool gone);
102     Display             *dpy;
103     Bool                gone;
104 } fade;
105
106 win             *list;
107 fade            *fades;
108 Display         *dpy;
109 int             scr;
110 Window          root;
111 Picture         rootPicture;
112 Picture         rootBuffer;
113 Picture         blackPicture;
114 Picture         transBlackPicture;
115 Picture         rootTile;
116 XserverRegion   allDamage;
117 Bool            clipChanged;
118 #if HAS_NAME_WINDOW_PIXMAP
119 Bool            hasNamePixmap;
120 #endif
121 int             root_height, root_width;
122 ignore          *ignore_head, **ignore_tail = &ignore_head;
123 int             xfixes_event, xfixes_error;
124 int             damage_event, damage_error;
125 int             composite_event, composite_error;
126 int             render_event, render_error;
127 Bool            synchronize;
128 int             composite_opcode;
129
130 /* find these once and be done with it */
131 Atom            opacityAtom;
132 Atom            winTypeAtom;
133 Atom            winDesktopAtom;
134 Atom            winDockAtom;
135 Atom            winToolbarAtom;
136 Atom            winMenuAtom;
137 Atom            winUtilAtom;
138 Atom            winSplashAtom;
139 Atom            winDialogAtom;
140 Atom            winNormalAtom;
141
142 /* opacity property name; sometime soon I'll write up an EWMH spec for it */
143 #define OPACITY_PROP    "_NET_WM_WINDOW_OPACITY"
144
145 #define TRANSLUCENT     0xe0000000
146 #define OPAQUE          0xffffffff
147
148 conv            *gaussianMap;
149
150 #define WINDOW_SOLID    0
151 #define WINDOW_TRANS    1
152 #define WINDOW_ARGB     2
153
154 #define TRANS_OPACITY   0.75
155
156 #define DEBUG_REPAINT 0
157 #define DEBUG_EVENTS 0
158 #define MONITOR_REPAINT 0
159
160 #define SHADOWS         1
161 #define SHARP_SHADOW    0
162
163 typedef enum _compMode {
164     CompSimple,         /* looks like a regular X server */
165     CompServerShadows,  /* use window alpha for shadow; sharp, but precise */
166     CompClientShadows,  /* use window extents for shadow, blurred */
167 } CompMode;
168
169 static void
170 determine_mode(Display *dpy, win *w);
171     
172 static double
173 get_opacity_percent(Display *dpy, win *w, double def);
174
175 static XserverRegion
176 win_extents (Display *dpy, win *w);
177
178 CompMode    compMode = CompSimple;
179
180 int         shadowRadius = 12;
181 int         shadowOffsetX = -15;
182 int         shadowOffsetY = -15;
183 double      shadowOpacity = .75;
184
185 double  fade_in_step =  0.028;
186 double  fade_out_step = 0.03;
187 int     fade_delta =    10;
188 int     fade_time =     0;
189 Bool    fadeWindows = False;
190 Bool    excludeDockShadows = False;
191 Bool    fadeTrans = False;
192
193 Bool    autoRedirect = False;
194
195 /* For shadow precomputation */
196 int            Gsize = -1;
197 unsigned char *shadowCorner = NULL;
198 unsigned char *shadowTop = NULL;
199
200 int
201 get_time_in_milliseconds ()
202 {
203     struct timeval  tv;
204
205     gettimeofday (&tv, NULL);
206     return tv.tv_sec * 1000 + tv.tv_usec / 1000;
207 }
208
209 fade *
210 find_fade (win *w)
211 {
212     fade    *f;
213     
214     for (f = fades; f; f = f->next)
215     {
216         if (f->w == w)
217             return f;
218     }
219     return 0;
220 }
221
222 void
223 dequeue_fade (Display *dpy, fade *f)
224 {
225     fade    **prev;
226
227     for (prev = &fades; *prev; prev = &(*prev)->next)
228         if (*prev == f)
229         {
230             *prev = f->next;
231             if (f->callback)
232                 (*f->callback) (dpy, f->w, f->gone);
233             free (f);
234             break;
235         }
236 }
237
238 void
239 cleanup_fade (Display *dpy, win *w)
240 {
241     fade *f = find_fade (w);
242     if (f)
243         dequeue_fade (dpy, f);
244 }
245
246 void
247 enqueue_fade (Display *dpy, fade *f)
248 {
249     if (!fades)
250         fade_time = get_time_in_milliseconds () + fade_delta;
251     f->next = fades;
252     fades = f;
253 }
254
255 static void
256 set_fade (Display *dpy, win *w, double start, double finish, double step,
257           void (*callback) (Display *dpy, win *w, Bool gone),
258           Bool gone, Bool exec_callback, Bool override)
259 {
260     fade    *f;
261
262     f = find_fade (w);
263     if (!f)
264     {
265         f = malloc (sizeof (fade));
266         f->next = 0;
267         f->w = w;
268         f->cur = start;
269         enqueue_fade (dpy, f);
270     }
271     else if(!override)
272         return;
273     else
274     {
275         if (exec_callback)
276             if (f->callback)
277                 (*f->callback)(dpy, f->w, f->gone);
278     }
279
280     if (finish < 0)
281         finish = 0;
282     if (finish > 1)
283         finish = 1;
284     f->finish = finish;
285     if (f->cur < finish)
286         f->step = step;
287     else if (f->cur > finish)
288         f->step = -step;
289     f->callback = callback;
290     f->gone = gone;
291     w->opacity = f->cur * OPAQUE;
292 #if 0
293     printf ("set_fade start %g step %g\n", f->cur, f->step);
294 #endif
295     determine_mode (dpy, w);
296     if (w->shadow)
297     {
298         XRenderFreePicture (dpy, w->shadow);
299         w->shadow = None;
300         w->extents = win_extents (dpy, w);
301     }
302 }
303
304 int
305 fade_timeout (void)
306 {
307     int now;
308     int delta;
309     if (!fades)
310         return -1;
311     now = get_time_in_milliseconds();
312     delta = fade_time - now;
313     if (delta < 0)
314         delta = 0;
315 /*    printf ("timeout %d\n", delta); */
316     return delta;
317 }
318
319 void
320 run_fades (Display *dpy)
321 {
322     int     now = get_time_in_milliseconds();
323     fade    *f, *next;
324     int     steps;
325
326 #if 0
327     printf ("run fades\n");
328 #endif
329     if (fade_time - now > 0)
330         return;
331     steps = 1 + (now - fade_time) / fade_delta;
332     for (next = fades; f = next; )
333     {
334         win *w = f->w;
335         next = f->next;
336         f->cur += f->step * steps;
337         if (f->cur >= 1)
338             f->cur = 1;
339         else if (f->cur < 0)
340             f->cur = 0;
341 #if 0
342         printf ("opacity now %g\n", f->cur);
343 #endif
344         w->opacity = f->cur * OPAQUE;
345         if (f->step > 0)
346         {
347             if (f->cur >= f->finish)
348             {
349                 w->opacity = f->finish*OPAQUE;
350                 dequeue_fade (dpy, f);
351             }
352         }
353         else
354         {
355             if (f->cur <= f->finish)
356             {
357                 w->opacity = f->finish*OPAQUE;
358                 dequeue_fade (dpy, f);
359             }
360         }
361         determine_mode (dpy, w);
362         if (w->shadow)
363         {
364             XRenderFreePicture (dpy, w->shadow);
365             w->shadow = None;
366             w->extents = win_extents(dpy, w);
367         }
368     }
369     fade_time = now + fade_delta;
370 }
371
372 static double
373 gaussian (double r, double x, double y)
374 {
375     return ((1 / (sqrt (2 * M_PI * r))) *
376             exp ((- (x * x + y * y)) / (2 * r * r)));
377 }
378
379
380 static conv *
381 make_gaussian_map (Display *dpy, double r)
382 {
383     conv            *c;
384     int             size = ((int) ceil ((r * 3)) + 1) & ~1;
385     int             center = size / 2;
386     int             x, y;
387     double          t;
388     double          g;
389     
390     c = malloc (sizeof (conv) + size * size * sizeof (double));
391     c->size = size;
392     c->data = (double *) (c + 1);
393     t = 0.0;
394     for (y = 0; y < size; y++)
395         for (x = 0; x < size; x++)
396         {
397             g = gaussian (r, (double) (x - center), (double) (y - center));
398             t += g;
399             c->data[y * size + x] = g;
400         }
401 /*    printf ("gaussian total %f\n", t); */
402     for (y = 0; y < size; y++)
403         for (x = 0; x < size; x++)
404         {
405             c->data[y*size + x] /= t;
406         }
407     return c;
408 }
409
410 /*
411  * A picture will help
412  *
413  *      -center   0                width  width+center
414  *  -center +-----+-------------------+-----+
415  *          |     |                   |     |
416  *          |     |                   |     |
417  *        0 +-----+-------------------+-----+
418  *          |     |                   |     |
419  *          |     |                   |     |
420  *          |     |                   |     |
421  *   height +-----+-------------------+-----+
422  *          |     |                   |     |
423  * height+  |     |                   |     |
424  *  center  +-----+-------------------+-----+
425  */
426  
427 static unsigned char
428 sum_gaussian (conv *map, double opacity, int x, int y, int width, int height)
429 {
430     int     fx, fy;
431     double  *g_data;
432     double  *g_line = map->data;
433     int     g_size = map->size;
434     int     center = g_size / 2;
435     int     fx_start, fx_end;
436     int     fy_start, fy_end;
437     double  v;
438     
439     /*
440      * Compute set of filter values which are "in range",
441      * that's the set with:
442      *  0 <= x + (fx-center) && x + (fx-center) < width &&
443      *  0 <= y + (fy-center) && y + (fy-center) < height
444      *
445      *  0 <= x + (fx - center)  x + fx - center < width
446      *  center - x <= fx        fx < width + center - x
447      */
448
449     fx_start = center - x;
450     if (fx_start < 0)
451         fx_start = 0;
452     fx_end = width + center - x;
453     if (fx_end > g_size)
454         fx_end = g_size;
455
456     fy_start = center - y;
457     if (fy_start < 0)
458         fy_start = 0;
459     fy_end = height + center - y;
460     if (fy_end > g_size)
461         fy_end = g_size;
462
463     g_line = g_line + fy_start * g_size + fx_start;
464     
465     v = 0;
466     for (fy = fy_start; fy < fy_end; fy++)
467     {
468         g_data = g_line;
469         g_line += g_size;
470         
471         for (fx = fx_start; fx < fx_end; fx++)
472             v += *g_data++;
473     }
474     if (v > 1)
475         v = 1;
476     
477     return ((unsigned char) (v * opacity * 255.0));
478 }
479
480 /* precompute shadow corners and sides to save time for large windows */
481 static void
482 presum_gaussian (conv *map)
483 {
484     int center = map->size/2;
485     int opacity, x, y;
486
487     Gsize = map->size;
488
489     if (shadowCorner)
490         free ((void *)shadowCorner);
491     if (shadowTop)
492         free ((void *)shadowTop);
493
494     shadowCorner = (unsigned char *)(malloc ((Gsize + 1) * (Gsize + 1) * 26));
495     shadowTop = (unsigned char *)(malloc ((Gsize + 1) * 26));
496     
497     for (x = 0; x <= Gsize; x++)
498     {
499         shadowTop[25 * (Gsize + 1) + x] = sum_gaussian (map, 1, x - center, center, Gsize * 2, Gsize * 2);
500         for(opacity = 0; opacity < 25; opacity++)
501             shadowTop[opacity * (Gsize + 1) + x] = shadowTop[25 * (Gsize + 1) + x] * opacity / 25;
502         for(y = 0; y <= x; y++)
503         {
504             shadowCorner[25 * (Gsize + 1) * (Gsize + 1) + y * (Gsize + 1) + x]
505                 = sum_gaussian (map, 1, x - center, y - center, Gsize * 2, Gsize * 2);
506             shadowCorner[25 * (Gsize + 1) * (Gsize + 1) + x * (Gsize + 1) + y]
507                 = shadowCorner[25 * (Gsize + 1) * (Gsize + 1) + y * (Gsize + 1) + x];
508             for(opacity = 0; opacity < 25; opacity++)
509                 shadowCorner[opacity * (Gsize + 1) * (Gsize + 1) + y * (Gsize + 1) + x]
510                     = shadowCorner[opacity * (Gsize + 1) * (Gsize + 1) + x * (Gsize + 1) + y]
511                     = shadowCorner[25 * (Gsize + 1) * (Gsize + 1) + y * (Gsize + 1) + x] * opacity / 25;
512         }
513     }
514 }
515
516 static XImage *
517 make_shadow (Display *dpy, double opacity, int width, int height)
518 {
519     XImage          *ximage;
520     unsigned char   *data;
521     int             gsize = gaussianMap->size;
522     int             ylimit, xlimit;
523     int             swidth = width + gsize;
524     int             sheight = height + gsize;
525     int             center = gsize / 2;
526     int             x, y;
527     unsigned char   d;
528     int             x_diff;
529     int             opacity_int = (int)(opacity * 25);
530     data = malloc (swidth * sheight * sizeof (unsigned char));
531     if (!data)
532         return 0;
533     ximage = XCreateImage (dpy,
534                            DefaultVisual(dpy, DefaultScreen(dpy)),
535                            8,
536                            ZPixmap,
537                            0,
538                            (char *) data,
539                            swidth, sheight, 8, swidth * sizeof (unsigned char));
540     if (!ximage)
541     {
542         free (data);
543         return 0;
544     }
545     /*
546      * Build the gaussian in sections
547      */
548
549     /*
550      * center (fill the complete data array)
551      */
552     if (Gsize > 0)
553         d = shadowTop[opacity_int * (Gsize + 1) + Gsize];
554     else
555         d = sum_gaussian (gaussianMap, opacity, center, center, width, height);
556     memset(data, d, sheight * swidth);
557     
558     /*
559      * corners
560      */
561     ylimit = gsize;
562     if (ylimit > sheight / 2)
563         ylimit = (sheight + 1) / 2;
564     xlimit = gsize;
565     if (xlimit > swidth / 2)
566         xlimit = (swidth + 1) / 2;
567
568     for (y = 0; y < ylimit; y++)
569         for (x = 0; x < xlimit; x++)
570         {
571             if (xlimit == Gsize && ylimit == Gsize)
572                 d = shadowCorner[opacity_int * (Gsize + 1) * (Gsize + 1) + y * (Gsize + 1) + x];
573             else
574                 d = sum_gaussian (gaussianMap, opacity, x - center, y - center, width, height);
575             data[y * swidth + x] = d;
576             data[(sheight - y - 1) * swidth + x] = d;
577             data[(sheight - y - 1) * swidth + (swidth - x - 1)] = d;
578             data[y * swidth + (swidth - x - 1)] = d;
579         }
580
581     /*
582      * top/bottom
583      */
584     x_diff = swidth - (gsize * 2);
585     if (x_diff > 0 && ylimit > 0)
586     {
587         for (y = 0; y < ylimit; y++)
588         {
589             if (ylimit == Gsize)
590                 d = shadowTop[opacity_int * (Gsize + 1) + y];
591             else
592                 d = sum_gaussian (gaussianMap, opacity, center, y - center, width, height);
593             memset (&data[y * swidth + gsize], d, x_diff);
594             memset (&data[(sheight - y - 1) * swidth + gsize], d, x_diff);
595         }
596     }
597
598     /*
599      * sides
600      */
601     
602     for (x = 0; x < xlimit; x++)
603     {
604         if (xlimit == Gsize)
605             d = shadowTop[opacity_int * (Gsize + 1) + x];
606         else
607             d = sum_gaussian (gaussianMap, opacity, x - center, center, width, height);
608         for (y = gsize; y < sheight - gsize; y++)
609         {
610             data[y * swidth + x] = d;
611             data[y * swidth + (swidth - x - 1)] = d;
612         }
613     }
614
615     return ximage;
616 }
617
618 static Picture
619 shadow_picture (Display *dpy, double opacity, Picture alpha_pict, int width, int height, int *wp, int *hp)
620 {
621     XImage  *shadowImage;
622     Pixmap  shadowPixmap;
623     Pixmap  finalPixmap;
624     Picture shadowPicture;
625     Picture finalPicture;
626     GC      gc;
627     
628     shadowImage = make_shadow (dpy, opacity, width, height);
629     if (!shadowImage)
630         return None;
631     shadowPixmap = XCreatePixmap (dpy, root, 
632                                   shadowImage->width,
633                                   shadowImage->height,
634                                   8);
635     if (!shadowPixmap)
636     {
637         XDestroyImage (shadowImage);
638         return None;
639     }
640
641     shadowPicture = XRenderCreatePicture (dpy, shadowPixmap,
642                                           XRenderFindStandardFormat (dpy, PictStandardA8),
643                                           0, 0);
644     if (!shadowPicture)
645     {
646         XDestroyImage (shadowImage);
647         XFreePixmap (dpy, shadowPixmap);
648         return None;
649     }
650
651     gc = XCreateGC (dpy, shadowPixmap, 0, 0);
652     if (!gc)
653     {
654         XDestroyImage (shadowImage);
655         XFreePixmap (dpy, shadowPixmap);
656         XRenderFreePicture (dpy, shadowPicture);
657         return None;
658     }
659     
660     XPutImage (dpy, shadowPixmap, gc, shadowImage, 0, 0, 0, 0, 
661                shadowImage->width,
662                shadowImage->height);
663     *wp = shadowImage->width;
664     *hp = shadowImage->height;
665     XFreeGC (dpy, gc);
666     XDestroyImage (shadowImage);
667     XFreePixmap (dpy, shadowPixmap);
668     return shadowPicture;
669 }
670
671 Picture
672 solid_picture (Display *dpy, Bool argb, double a, double r, double g, double b)
673 {
674     Pixmap                      pixmap;
675     Picture                     picture;
676     XRenderPictureAttributes    pa;
677     XRenderColor                c;
678
679     pixmap = XCreatePixmap (dpy, root, 1, 1, argb ? 32 : 8);
680     if (!pixmap)
681         return None;
682
683     pa.repeat = True;
684     picture = XRenderCreatePicture (dpy, pixmap,
685                                     XRenderFindStandardFormat (dpy, argb ? PictStandardARGB32 : PictStandardA8),
686                                     CPRepeat,
687                                     &pa);
688     if (!picture)
689     {
690         XFreePixmap (dpy, pixmap);
691         return None;
692     }
693
694     c.alpha = a * 0xffff;
695     c.red = r * 0xffff;
696     c.green = g * 0xffff;
697     c.blue = b * 0xffff;
698     XRenderFillRectangle (dpy, PictOpSrc, picture, &c, 0, 0, 1, 1);
699     XFreePixmap (dpy, pixmap);
700     return picture;
701 }
702
703 void
704 discard_ignore (Display *dpy, unsigned long sequence)
705 {
706     while (ignore_head)
707     {
708         if ((long) (sequence - ignore_head->sequence) > 0)
709         {
710             ignore  *next = ignore_head->next;
711             free (ignore_head);
712             ignore_head = next;
713             if (!ignore_head)
714                 ignore_tail = &ignore_head;
715         }
716         else
717             break;
718     }
719 }
720
721 void
722 set_ignore (Display *dpy, unsigned long sequence)
723 {
724     ignore  *i = malloc (sizeof (ignore));
725     if (!i)
726         return;
727     i->sequence = sequence;
728     i->next = 0;
729     *ignore_tail = i;
730     ignore_tail = &i->next;
731 }
732
733 int
734 should_ignore (Display *dpy, unsigned long sequence)
735 {
736     discard_ignore (dpy, sequence);
737     return ignore_head && ignore_head->sequence == sequence;
738 }
739
740 static win *
741 find_win (Display *dpy, Window id)
742 {
743     win *w;
744
745     for (w = list; w; w = w->next)
746         if (w->id == id)
747             return w;
748     return 0;
749 }
750
751 static char *backgroundProps[] = {
752     "_XROOTPMAP_ID",
753     "_XSETROOT_ID",
754     0,
755 };
756     
757 static Picture
758 root_tile (Display *dpy)
759 {
760     Picture         picture;
761     Atom            actual_type;
762     Pixmap          pixmap;
763     int             actual_format;
764     unsigned long   nitems;
765     unsigned long   bytes_after;
766     unsigned char   *prop;
767     Bool            fill;
768     XRenderPictureAttributes    pa;
769     int             p;
770
771     pixmap = None;
772     for (p = 0; backgroundProps[p]; p++)
773     {
774         if (XGetWindowProperty (dpy, root, XInternAtom (dpy, backgroundProps[p], False),
775                                 0, 4, False, AnyPropertyType,
776                                 &actual_type, &actual_format, &nitems, &bytes_after, &prop) == Success &&
777             actual_type == XInternAtom (dpy, "PIXMAP", False) && actual_format == 32 && nitems == 1)
778         {
779             memcpy (&pixmap, prop, 4);
780             XFree (prop);
781             fill = False;
782             break;
783         }
784     }
785     if (!pixmap)
786     {
787         pixmap = XCreatePixmap (dpy, root, 1, 1, DefaultDepth (dpy, scr));
788         fill = True;
789     }
790     pa.repeat = True;
791     picture = XRenderCreatePicture (dpy, pixmap,
792                                     XRenderFindVisualFormat (dpy,
793                                                              DefaultVisual (dpy, scr)),
794                                     CPRepeat, &pa);
795     if (fill)
796     {
797         XRenderColor    c;
798         
799         c.red = c.green = c.blue = 0x8080;
800         c.alpha = 0xffff;
801         XRenderFillRectangle (dpy, PictOpSrc, picture, &c, 
802                               0, 0, 1, 1);
803     }
804     return picture;
805 }
806
807 static void
808 paint_root (Display *dpy)
809 {
810     if (!rootTile)
811         rootTile = root_tile (dpy);
812     
813     XRenderComposite (dpy, PictOpSrc,
814                       rootTile, None, rootBuffer,
815                       0, 0, 0, 0, 0, 0, root_width, root_height);
816 }
817
818 static XserverRegion
819 win_extents (Display *dpy, win *w)
820 {
821     XRectangle      r;
822     
823     r.x = w->a.x;
824     r.y = w->a.y;
825     r.width = w->a.width + w->a.border_width * 2;
826     r.height = w->a.height + w->a.border_width * 2;
827     if (compMode != CompSimple && !(w->windowType == winDockAtom && excludeDockShadows))
828     {
829         if (compMode == CompServerShadows || w->mode != WINDOW_ARGB)
830         {
831             XRectangle  sr;
832
833             if (compMode == CompServerShadows)
834             {
835                 w->shadow_dx = 2;
836                 w->shadow_dy = 7;
837                 w->shadow_width = w->a.width;
838                 w->shadow_height = w->a.height;
839             }
840             else
841             {
842                 w->shadow_dx = shadowOffsetX;
843                 w->shadow_dy = shadowOffsetY;
844                 if (!w->shadow)
845                 {
846                     double      opacity = shadowOpacity;
847                     if (w->mode == WINDOW_TRANS)
848                         opacity = opacity * ((double)w->opacity)/((double)OPAQUE);
849                     w->shadow = shadow_picture (dpy, opacity, w->alphaPict,
850                                                 w->a.width + w->a.border_width * 2,
851                                                 w->a.height + w->a.border_width * 2,
852                                                 &w->shadow_width, &w->shadow_height);
853                 }
854             }
855             sr.x = w->a.x + w->shadow_dx;
856             sr.y = w->a.y + w->shadow_dy;
857             sr.width = w->shadow_width;
858             sr.height = w->shadow_height;
859             if (sr.x < r.x)
860             {
861                 r.width = (r.x + r.width) - sr.x;
862                 r.x = sr.x;
863             }
864             if (sr.y < r.y)
865             {
866                 r.height = (r.y + r.height) - sr.y;
867                 r.y = sr.y;
868             }
869             if (sr.x + sr.width > r.x + r.width)
870                 r.width = sr.x + sr.width - r.x;
871             if (sr.y + sr.height > r.y + r.height)
872                 r.height = sr.y + sr.height - r.y;
873         }
874     }
875     return XFixesCreateRegion (dpy, &r, 1);
876 }
877
878 static XserverRegion
879 border_size (Display *dpy, win *w)
880 {
881     XserverRegion   border;
882     /*
883      * if window doesn't exist anymore,  this will generate an error
884      * as well as not generate a region.  Perhaps a better XFixes
885      * architecture would be to have a request that copies instead
886      * of creates, that way you'd just end up with an empty region
887      * instead of an invalid XID.
888      */
889     set_ignore (dpy, NextRequest (dpy));
890     border = XFixesCreateRegionFromWindow (dpy, w->id, WindowRegionBounding);
891     /* translate this */
892     set_ignore (dpy, NextRequest (dpy));
893     XFixesTranslateRegion (dpy, border,
894                            w->a.x + w->a.border_width,
895                            w->a.y + w->a.border_width);
896     return border;
897 }
898
899 static void
900 paint_all (Display *dpy, XserverRegion region)
901 {
902     win *w;
903     win *t = 0;
904     
905     if (!region)
906     {
907         XRectangle  r;
908         r.x = 0;
909         r.y = 0;
910         r.width = root_width;
911         r.height = root_height;
912         region = XFixesCreateRegion (dpy, &r, 1);
913     }
914 #if MONITOR_REPAINT
915     rootBuffer = rootPicture;
916 #else
917     if (!rootBuffer)
918     {
919         Pixmap  rootPixmap = XCreatePixmap (dpy, root, root_width, root_height,
920                                             DefaultDepth (dpy, scr));
921         rootBuffer = XRenderCreatePicture (dpy, rootPixmap,
922                                            XRenderFindVisualFormat (dpy,
923                                                                     DefaultVisual (dpy, scr)),
924                                            0, 0);
925         XFreePixmap (dpy, rootPixmap);
926     }
927 #endif
928     XFixesSetPictureClipRegion (dpy, rootPicture, 0, 0, region);
929 #if MONITOR_REPAINT
930     XRenderComposite (dpy, PictOpSrc, blackPicture, None, rootPicture,
931                       0, 0, 0, 0, 0, 0, root_width, root_height);
932 #endif
933 #if DEBUG_REPAINT
934     printf ("paint:");
935 #endif
936     for (w = list; w; w = w->next)
937     {
938 #if CAN_DO_USABLE
939         if (!w->usable)
940             continue;
941 #endif
942         /* never painted, ignore it */
943         if (!w->damaged)
944             continue;
945         /* if invisible, ignore it */
946         if (w->a.x + w->a.width < 1 || w->a.y + w->a.height < 1
947             || w->a.x >= root_width || w->a.y >= root_height)
948             continue;
949         if (!w->picture)
950         {
951             XRenderPictureAttributes    pa;
952             XRenderPictFormat           *format;
953             Drawable                    draw = w->id;
954             
955 #if HAS_NAME_WINDOW_PIXMAP
956             if (hasNamePixmap && !w->pixmap)
957                 w->pixmap = XCompositeNameWindowPixmap (dpy, w->id);
958             if (w->pixmap)
959                 draw = w->pixmap;
960 #endif
961             format = XRenderFindVisualFormat (dpy, w->a.visual);
962             pa.subwindow_mode = IncludeInferiors;
963             w->picture = XRenderCreatePicture (dpy, draw,
964                                                format,
965                                                CPSubwindowMode,
966                                                &pa);
967         }
968 #if DEBUG_REPAINT
969         printf (" 0x%x", w->id);
970 #endif
971         if (clipChanged)
972         {
973             if (w->borderSize)
974             {
975                 set_ignore (dpy, NextRequest (dpy));
976                 XFixesDestroyRegion (dpy, w->borderSize);
977                 w->borderSize = None;
978             }
979             if (w->extents)
980             {
981                 XFixesDestroyRegion (dpy, w->extents);
982                 w->extents = None;
983             }
984             if (w->borderClip)
985             {
986                 XFixesDestroyRegion (dpy, w->borderClip);
987                 w->borderClip = None;
988             }
989         }
990         if (!w->borderSize)
991             w->borderSize = border_size (dpy, w);
992         if (!w->extents)
993             w->extents = win_extents (dpy, w);
994         if (w->mode == WINDOW_SOLID)
995         {
996             int x, y, wid, hei;
997 #if HAS_NAME_WINDOW_PIXMAP
998             x = w->a.x;
999             y = w->a.y;
1000             wid = w->a.width + w->a.border_width * 2;
1001             hei = w->a.height + w->a.border_width * 2;
1002 #else
1003             x = w->a.x + w->a.border_width;
1004             y = w->a.y + w->a.border_width;
1005             wid = w->a.width;
1006             hei = w->a.height;
1007 #endif
1008             XFixesSetPictureClipRegion (dpy, rootBuffer, 0, 0, region);
1009             set_ignore (dpy, NextRequest (dpy));
1010             XFixesSubtractRegion (dpy, region, region, w->borderSize);
1011             set_ignore (dpy, NextRequest (dpy));
1012             XRenderComposite (dpy, PictOpSrc, w->picture, None, rootBuffer,
1013                               0, 0, 0, 0, 
1014                               x, y, wid, hei);
1015         }
1016         if (!w->borderClip)
1017         {
1018             w->borderClip = XFixesCreateRegion (dpy, 0, 0);
1019             XFixesCopyRegion (dpy, w->borderClip, region);
1020         }
1021         w->prev_trans = t;
1022         t = w;
1023     }
1024 #if DEBUG_REPAINT
1025     printf ("\n");
1026     fflush (stdout);
1027 #endif
1028     XFixesSetPictureClipRegion (dpy, rootBuffer, 0, 0, region);
1029     paint_root (dpy);
1030     for (w = t; w; w = w->prev_trans)
1031     {
1032         XFixesSetPictureClipRegion (dpy, rootBuffer, 0, 0, w->borderClip);
1033         switch (compMode) {
1034         case CompSimple:
1035             break;
1036         case CompServerShadows:
1037             /* dont' bother drawing shadows on desktop windows */
1038             if (w->windowType == winDesktopAtom)
1039                 break;
1040             set_ignore (dpy, NextRequest (dpy));
1041             if (w->opacity != OPAQUE && !w->shadowPict)
1042                 w->shadowPict = solid_picture (dpy, True,
1043                                                (double) w->opacity / OPAQUE * 0.3,
1044                                                0, 0, 0);
1045             XRenderComposite (dpy, PictOpOver, 
1046                               w->shadowPict ? w->shadowPict : transBlackPicture,
1047                               w->picture, rootBuffer,
1048                               0, 0, 0, 0,
1049                               w->a.x + w->shadow_dx,
1050                               w->a.y + w->shadow_dy,
1051                               w->shadow_width, w->shadow_height);
1052             break;
1053         case CompClientShadows:
1054             /* don't bother drawing shadows on desktop windows */
1055             if (w->shadow && w->windowType != winDesktopAtom)
1056             {
1057                 XRenderComposite (dpy, PictOpOver, blackPicture, w->shadow, rootBuffer,
1058                                   0, 0, 0, 0,
1059                                   w->a.x + w->shadow_dx,
1060                                   w->a.y + w->shadow_dy,
1061                                   w->shadow_width, w->shadow_height);
1062             }
1063             break;
1064         }
1065         if (w->opacity != OPAQUE && !w->alphaPict)
1066             w->alphaPict = solid_picture (dpy, False, 
1067                                           (double) w->opacity / OPAQUE, 0, 0, 0);
1068         if (w->mode == WINDOW_TRANS)
1069         {
1070             int x, y, wid, hei;
1071 #if HAS_NAME_WINDOW_PIXMAP
1072             x = w->a.x;
1073             y = w->a.y;
1074             wid = w->a.width + w->a.border_width * 2;
1075             hei = w->a.height + w->a.border_width * 2;
1076 #else
1077             x = w->a.x + w->a.border_width;
1078             y = w->a.y + w->a.border_width;
1079             wid = w->a.width;
1080             hei = w->a.height;
1081 #endif
1082             set_ignore (dpy, NextRequest (dpy));
1083             XRenderComposite (dpy, PictOpOver, w->picture, w->alphaPict, rootBuffer,
1084                               0, 0, 0, 0, 
1085                               x, y, wid, hei);
1086         }
1087         else if (w->mode == WINDOW_ARGB)
1088         {
1089             int x, y, wid, hei;
1090 #if HAS_NAME_WINDOW_PIXMAP
1091             x = w->a.x;
1092             y = w->a.y;
1093             wid = w->a.width + w->a.border_width * 2;
1094             hei = w->a.height + w->a.border_width * 2;
1095 #else
1096             x = w->a.x + w->a.border_width;
1097             y = w->a.y + w->a.border_width;
1098             wid = w->a.width;
1099             hei = w->a.height;
1100 #endif
1101             set_ignore (dpy, NextRequest (dpy));
1102             XRenderComposite (dpy, PictOpOver, w->picture, w->alphaPict, rootBuffer,
1103                               0, 0, 0, 0, 
1104                               x, y, wid, hei);
1105         }
1106         XFixesDestroyRegion (dpy, w->borderClip);
1107         w->borderClip = None;
1108     }
1109     XFixesDestroyRegion (dpy, region);
1110     if (rootBuffer != rootPicture)
1111     {
1112         XFixesSetPictureClipRegion (dpy, rootBuffer, 0, 0, None);
1113         XRenderComposite (dpy, PictOpSrc, rootBuffer, None, rootPicture,
1114                           0, 0, 0, 0, 0, 0, root_width, root_height);
1115     }
1116 }
1117
1118 static void
1119 add_damage (Display *dpy, XserverRegion damage)
1120 {
1121     if (allDamage)
1122     {
1123         XFixesUnionRegion (dpy, allDamage, allDamage, damage);
1124         XFixesDestroyRegion (dpy, damage);
1125     }
1126     else
1127         allDamage = damage;
1128 }
1129
1130 static void
1131 repair_win (Display *dpy, win *w)
1132 {
1133     XserverRegion   parts;
1134
1135     if (!w->damaged)
1136     {
1137         parts = win_extents (dpy, w);
1138         set_ignore (dpy, NextRequest (dpy));
1139         XDamageSubtract (dpy, w->damage, None, None);
1140     }
1141     else
1142     {
1143         XserverRegion   o;
1144         parts = XFixesCreateRegion (dpy, 0, 0);
1145         set_ignore (dpy, NextRequest (dpy));
1146         XDamageSubtract (dpy, w->damage, None, parts);
1147         XFixesTranslateRegion (dpy, parts,
1148                                w->a.x + w->a.border_width,
1149                                w->a.y + w->a.border_width);
1150         if (compMode == CompServerShadows)
1151         {
1152             o = XFixesCreateRegion (dpy, 0, 0);
1153             XFixesCopyRegion (dpy, o, parts);
1154             XFixesTranslateRegion (dpy, o, w->shadow_dx, w->shadow_dy);
1155             XFixesUnionRegion (dpy, parts, parts, o);
1156             XFixesDestroyRegion (dpy, o);
1157         }
1158     }
1159     add_damage (dpy, parts);
1160     w->damaged = 1;
1161 }
1162
1163 static void
1164 map_win (Display *dpy, Window id, unsigned long sequence, Bool fade)
1165 {
1166     win         *w = find_win (dpy, id);
1167     Drawable    back;
1168
1169     if (!w)
1170         return;
1171
1172     w->a.map_state = IsViewable;
1173     
1174     /* This needs to be here or else we lose transparency messages */
1175     XSelectInput (dpy, id, PropertyChangeMask);
1176
1177 #if CAN_DO_USABLE
1178     w->damage_bounds.x = w->damage_bounds.y = 0;
1179     w->damage_bounds.width = w->damage_bounds.height = 0;
1180 #endif
1181     w->damaged = 0;
1182
1183     if (fade && fadeWindows)
1184         set_fade (dpy, w, 0, get_opacity_percent (dpy, w, 1.0), fade_in_step, 0, False, True, True);
1185 }
1186
1187 static void
1188 finish_unmap_win (Display *dpy, win *w)
1189 {
1190     w->damaged = 0;
1191 #if CAN_DO_USABLE
1192     w->usable = False;
1193 #endif
1194     if (w->extents != None)
1195     {
1196         add_damage (dpy, w->extents);    /* destroys region */
1197         w->extents = None;
1198     }
1199     
1200 #if HAS_NAME_WINDOW_PIXMAP
1201     if (w->pixmap)
1202     {
1203         XFreePixmap (dpy, w->pixmap);
1204         w->pixmap = None;
1205     }
1206 #endif
1207
1208     if (w->picture)
1209     {
1210         set_ignore (dpy, NextRequest (dpy));
1211         XRenderFreePicture (dpy, w->picture);
1212         w->picture = None;
1213     }
1214
1215     /* don't care about properties anymore */
1216     set_ignore (dpy, NextRequest (dpy));
1217     XSelectInput(dpy, w->id, 0);
1218
1219     if (w->borderSize)
1220     {
1221         set_ignore (dpy, NextRequest (dpy));
1222         XFixesDestroyRegion (dpy, w->borderSize);
1223         w->borderSize = None;
1224     }
1225     if (w->shadow)
1226     {
1227         XRenderFreePicture (dpy, w->shadow);
1228         w->shadow = None;
1229     }
1230     if (w->borderClip)
1231     {
1232         XFixesDestroyRegion (dpy, w->borderClip);
1233         w->borderClip = None;
1234     }
1235
1236     clipChanged = True;
1237 }
1238
1239 #if HAS_NAME_WINDOW_PIXMAP
1240 static void
1241 unmap_callback (Display *dpy, win *w, Bool gone)
1242 {
1243     finish_unmap_win (dpy, w);
1244 }
1245 #endif
1246
1247 static void
1248 unmap_win (Display *dpy, Window id, Bool fade)
1249 {
1250     win *w = find_win (dpy, id);
1251     if (!w)
1252         return;
1253     w->a.map_state = IsUnmapped;
1254 #if HAS_NAME_WINDOW_PIXMAP
1255     if (w->pixmap && fade && fadeWindows)
1256         set_fade (dpy, w, w->opacity*1.0/OPAQUE, 0.0, fade_out_step, unmap_callback, False, False, True);
1257     else
1258 #endif
1259         finish_unmap_win (dpy, w);
1260 }
1261
1262 /* Get the opacity prop from window
1263    not found: default
1264    otherwise the value
1265  */
1266 static unsigned int
1267 get_opacity_prop(Display *dpy, win *w, unsigned int def)
1268 {
1269     Atom actual;
1270     int format;
1271     unsigned long n, left;
1272
1273     unsigned char *data;
1274     int result = XGetWindowProperty(dpy, w->id, opacityAtom, 0L, 1L, False, 
1275                        XA_CARDINAL, &actual, &format, 
1276                                     &n, &left, &data);
1277     if (result == Success && data != NULL)
1278     {
1279         unsigned int i;
1280         memcpy (&i, data, sizeof (unsigned int));
1281         XFree( (void *) data);
1282         return i;
1283     }
1284     return def;
1285 }
1286
1287 /* Get the opacity property from the window in a percent format
1288    not found: default
1289    otherwise: the value
1290 */
1291 static double
1292 get_opacity_percent(Display *dpy, win *w, double def)
1293 {
1294     unsigned int opacity = get_opacity_prop (dpy, w, (unsigned int)(OPAQUE*def));
1295
1296     return opacity*1.0/OPAQUE;
1297 }
1298
1299 /* determine mode for window all in one place.
1300    Future might check for menu flag and other cool things
1301 */
1302
1303 static Atom
1304 get_wintype_prop(Display * dpy, Window w)
1305 {
1306     Atom actual;
1307     int format;
1308     unsigned long n, left;
1309
1310     unsigned char *data;
1311     int result = XGetWindowProperty (dpy, w, winTypeAtom, 0L, 1L, False,
1312                                      XA_ATOM, &actual, &format,
1313                                      &n, &left, &data);
1314
1315     if (result == Success && data != None)
1316     {
1317         Atom a;
1318         memcpy (&a, data, sizeof (Atom));
1319         XFree ( (void *) data);
1320         return a;
1321     }
1322     return winNormalAtom;
1323 }
1324
1325 static void
1326 determine_mode(Display *dpy, win *w)
1327 {
1328     int mode;
1329     XRenderPictFormat *format;
1330     unsigned int default_opacity;
1331
1332     /* if trans prop == -1 fall back on  previous tests*/
1333
1334     if (w->alphaPict)
1335     {
1336         XRenderFreePicture (dpy, w->alphaPict);
1337         w->alphaPict = None;
1338     }
1339     if (w->shadowPict)
1340     {
1341         XRenderFreePicture (dpy, w->shadowPict);
1342         w->shadowPict = None;
1343     }
1344
1345     if (w->a.class == InputOnly)
1346     {
1347         format = 0;
1348     }
1349     else
1350     {
1351         format = XRenderFindVisualFormat (dpy, w->a.visual);
1352     }
1353
1354     if (format && format->type == PictTypeDirect && format->direct.alphaMask)
1355     {
1356         mode = WINDOW_ARGB;
1357     }
1358     else if (w->opacity != OPAQUE)
1359     {
1360         mode = WINDOW_TRANS;
1361     }
1362     else
1363     {
1364         mode = WINDOW_SOLID;
1365     }
1366     w->mode = mode;
1367     if (w->extents)
1368     {
1369         XserverRegion damage;
1370         damage = XFixesCreateRegion (dpy, 0, 0);
1371         XFixesCopyRegion (dpy, damage, w->extents);
1372         add_damage (dpy, damage);
1373     }
1374 }
1375
1376 static Atom
1377 determine_wintype (Display *dpy, Window w)
1378 {
1379     Window       root_return, parent_return;
1380     Window      *children = NULL;
1381     unsigned int nchildren, i;
1382     Atom         type;
1383
1384     type = get_wintype_prop (dpy, w);
1385     if (type != winNormalAtom)
1386         return type;
1387
1388     if (!XQueryTree (dpy, w, &root_return, &parent_return, &children,
1389                             &nchildren))
1390     {
1391         /* XQueryTree failed. */
1392         if (children)
1393             XFree ((void *)children);
1394         return winNormalAtom;
1395     }
1396
1397     for (i = 0;i < nchildren;i++)
1398     {
1399         type = determine_wintype (dpy, children[i]);
1400         if (type != winNormalAtom)
1401             return type;
1402     }
1403
1404     if (children)
1405         XFree ((void *)children);
1406
1407     return winNormalAtom;
1408 }
1409
1410 static void
1411 add_win (Display *dpy, Window id, Window prev)
1412 {
1413     win                         *new = malloc (sizeof (win));
1414     win                         **p;
1415     
1416     if (!new)
1417         return;
1418     if (prev)
1419     {
1420         for (p = &list; *p; p = &(*p)->next)
1421             if ((*p)->id == prev)
1422                 break;
1423     }
1424     else
1425         p = &list;
1426     new->id = id;
1427     set_ignore (dpy, NextRequest (dpy));
1428     if (!XGetWindowAttributes (dpy, id, &new->a))
1429     {
1430         free (new);
1431         return;
1432     }
1433     new->damaged = 0;
1434 #if CAN_DO_USABLE
1435     new->usable = False;
1436 #endif
1437 #if HAS_NAME_WINDOW_PIXMAP
1438     new->pixmap = None;
1439 #endif
1440     new->picture = None;
1441     if (new->a.class == InputOnly)
1442     {
1443         new->damage_sequence = 0;
1444         new->damage = None;
1445     }
1446     else
1447     {
1448         new->damage_sequence = NextRequest (dpy);
1449         new->damage = XDamageCreate (dpy, id, XDamageReportNonEmpty);
1450     }
1451     new->alphaPict = None;
1452     new->shadowPict = None;
1453     new->borderSize = None;
1454     new->extents = None;
1455     new->shadow = None;
1456     new->shadow_dx = 0;
1457     new->shadow_dy = 0;
1458     new->shadow_width = 0;
1459     new->shadow_height = 0;
1460     new->opacity = OPAQUE;
1461
1462     new->borderClip = None;
1463     new->prev_trans = 0;
1464
1465     /* moved mode setting to one place */
1466     new->opacity = get_opacity_prop (dpy, new, OPAQUE);
1467     new->windowType = determine_wintype (dpy, new->id);
1468     determine_mode (dpy, new);
1469     
1470     new->next = *p;
1471     *p = new;
1472     if (new->a.map_state == IsViewable)
1473         map_win (dpy, id, new->damage_sequence - 1, True);
1474 }
1475
1476 void
1477 restack_win (Display *dpy, win *w, Window new_above)
1478 {
1479     Window  old_above;
1480     
1481     if (w->next)
1482         old_above = w->next->id;
1483     else
1484         old_above = None;
1485     if (old_above != new_above)
1486     {
1487         win **prev;
1488
1489         /* unhook */
1490         for (prev = &list; *prev; prev = &(*prev)->next)
1491             if ((*prev) == w)
1492                 break;
1493         *prev = w->next;
1494         
1495         /* rehook */
1496         for (prev = &list; *prev; prev = &(*prev)->next)
1497         {
1498             if ((*prev)->id == new_above)
1499                 break;
1500         }
1501         w->next = *prev;
1502         *prev = w;
1503     }
1504 }
1505
1506 static void
1507 configure_win (Display *dpy, XConfigureEvent *ce)
1508 {
1509     win             *w = find_win (dpy, ce->window);
1510     Window          above;
1511     XserverRegion   damage = None;
1512     
1513     if (!w)
1514     {
1515         if (ce->window == root)
1516         {
1517             if (rootBuffer)
1518             {
1519                 XRenderFreePicture (dpy, rootBuffer);
1520                 rootBuffer = None;
1521             }
1522             root_width = ce->width;
1523             root_height = ce->height;
1524         }
1525         return;
1526     }
1527 #if CAN_DO_USABLE
1528     if (w->usable)
1529 #endif
1530     {
1531         damage = XFixesCreateRegion (dpy, 0, 0);
1532         if (w->extents != None) 
1533             XFixesCopyRegion (dpy, damage, w->extents);
1534     }
1535     w->a.x = ce->x;
1536     w->a.y = ce->y;
1537     if (w->a.width != ce->width || w->a.height != ce->height)
1538     {
1539 #if HAS_NAME_WINDOW_PIXMAP
1540         if (w->pixmap)
1541         {
1542             XFreePixmap (dpy, w->pixmap);
1543             w->pixmap = None;
1544             if (w->picture)
1545             {
1546                 XRenderFreePicture (dpy, w->picture);
1547                 w->picture = None;
1548             }
1549         }
1550 #endif
1551         if (w->shadow)
1552         {
1553             XRenderFreePicture (dpy, w->shadow);
1554             w->shadow = None;
1555         }
1556     }
1557     w->a.width = ce->width;
1558     w->a.height = ce->height;
1559     w->a.border_width = ce->border_width;
1560     w->a.override_redirect = ce->override_redirect;
1561     restack_win (dpy, w, ce->above);
1562     if (damage)
1563     {
1564         XserverRegion   extents = win_extents (dpy, w);
1565         XFixesUnionRegion (dpy, damage, damage, extents);
1566         XFixesDestroyRegion (dpy, extents);
1567         add_damage (dpy, damage);
1568     }
1569     clipChanged = True;
1570 }
1571
1572 static void
1573 circulate_win (Display *dpy, XCirculateEvent *ce)
1574 {
1575     win     *w = find_win (dpy, ce->window);
1576     Window  new_above;
1577
1578     if (!w)
1579         return;
1580
1581     if (ce->place == PlaceOnTop)
1582         new_above = list->id;
1583     else
1584         new_above = None;
1585     restack_win (dpy, w, new_above);
1586     clipChanged = True;
1587 }
1588
1589 static void
1590 finish_destroy_win (Display *dpy, Window id, Bool gone)
1591 {
1592     win **prev, *w;
1593
1594     for (prev = &list; (w = *prev); prev = &w->next)
1595         if (w->id == id)
1596         {
1597             if (!gone)
1598                 finish_unmap_win (dpy, w);
1599             *prev = w->next;
1600             if (w->picture)
1601             {
1602                 set_ignore (dpy, NextRequest (dpy));
1603                 XRenderFreePicture (dpy, w->picture);
1604                 w->picture = None;
1605             }
1606             if (w->alphaPict)
1607             {
1608                 XRenderFreePicture (dpy, w->alphaPict);
1609                 w->alphaPict = None;
1610             }
1611             if (w->shadowPict)
1612             {
1613                 XRenderFreePicture (dpy, w->shadowPict);
1614                 w->shadowPict = None;
1615             }
1616             if (w->damage != None)
1617             {
1618                 set_ignore (dpy, NextRequest (dpy));
1619                 XDamageDestroy (dpy, w->damage);
1620                 w->damage = None;
1621             }
1622             cleanup_fade (dpy, w);
1623             free (w);
1624             break;
1625         }
1626 }
1627
1628 #if HAS_NAME_WINDOW_PIXMAP
1629 static void
1630 destroy_callback (Display *dpy, win *w, Bool gone)
1631 {
1632     finish_destroy_win (dpy, w->id, gone);
1633 }
1634 #endif
1635
1636 static void
1637 destroy_win (Display *dpy, Window id, Bool gone, Bool fade)
1638 {
1639     win *w = find_win (dpy, id);
1640 #if HAS_NAME_WINDOW_PIXMAP
1641     if (w && w->pixmap && fade && fadeWindows)
1642         set_fade (dpy, w, w->opacity*1.0/OPAQUE, 0.0, fade_out_step, destroy_callback, gone, False, True);
1643     else
1644 #endif
1645     {
1646         finish_destroy_win (dpy, id, gone);
1647     }
1648 }
1649
1650 /*
1651 static void
1652 dump_win (win *w)
1653 {
1654     printf ("\t%08lx: %d x %d + %d + %d (%d)\n", w->id,
1655             w->a.width, w->a.height, w->a.x, w->a.y, w->a.border_width);
1656 }
1657
1658
1659 static void
1660 dump_wins (void)
1661 {
1662     win *w;
1663
1664     printf ("windows:\n");
1665     for (w = list; w; w = w->next)
1666         dump_win (w);
1667 }
1668 */
1669
1670 static void
1671 damage_win (Display *dpy, XDamageNotifyEvent *de)
1672 {
1673     win *w = find_win (dpy, de->drawable);
1674
1675     if (!w)
1676         return;
1677 #if CAN_DO_USABLE
1678     if (!w->usable)
1679     {
1680         if (w->damage_bounds.width == 0 || w->damage_bounds.height == 0)
1681         {
1682             w->damage_bounds = de->area;
1683         }
1684         else
1685         {
1686             if (de->area.x < w->damage_bounds.x)
1687             {
1688                 w->damage_bounds.width += (w->damage_bounds.x - de->area.x);
1689                 w->damage_bounds.x = de->area.x;
1690             }
1691             if (de->area.y < w->damage_bounds.y)
1692             {
1693                 w->damage_bounds.height += (w->damage_bounds.y - de->area.y);
1694                 w->damage_bounds.y = de->area.y;
1695             }
1696             if (de->area.x + de->area.width > w->damage_bounds.x + w->damage_bounds.width)
1697                 w->damage_bounds.width = de->area.x + de->area.width - w->damage_bounds.x;
1698             if (de->area.y + de->area.height > w->damage_bounds.y + w->damage_bounds.height)
1699                 w->damage_bounds.height = de->area.y + de->area.height - w->damage_bounds.y;
1700         }
1701 #if 0
1702         printf ("unusable damage %d, %d: %d x %d bounds %d, %d: %d x %d\n",
1703                 de->area.x,
1704                 de->area.y,
1705                 de->area.width,
1706                 de->area.height,
1707                 w->damage_bounds.x,
1708                 w->damage_bounds.y,
1709                 w->damage_bounds.width,
1710                 w->damage_bounds.height);
1711 #endif
1712         if (w->damage_bounds.x <= 0 && 
1713             w->damage_bounds.y <= 0 &&
1714             w->a.width <= w->damage_bounds.x + w->damage_bounds.width &&
1715             w->a.height <= w->damage_bounds.y + w->damage_bounds.height)
1716         {
1717             clipChanged = True;
1718             if (fadeWindows)
1719                 set_fade (dpy, w, 0, get_opacity_percent (dpy, w, 1.0), fade_in_step, 0, False, True, True);
1720             w->usable = True;
1721         }
1722     }
1723     if (w->usable)
1724 #endif
1725         repair_win (dpy, w);
1726 }
1727
1728 static int
1729 error (Display *dpy, XErrorEvent *ev)
1730 {
1731     int     o;
1732     char    *name = 0;
1733     
1734     if (should_ignore (dpy, ev->serial))
1735         return 0;
1736     
1737     if (ev->request_code == composite_opcode &&
1738         ev->minor_code == X_CompositeRedirectSubwindows)
1739     {
1740         fprintf (stderr, "Another composite manager is already running\n");
1741         exit (1);
1742     }
1743     
1744     o = ev->error_code - xfixes_error;
1745     switch (o) {
1746     case BadRegion: name = "BadRegion"; break;
1747     default: break;
1748     }
1749     o = ev->error_code - damage_error;
1750     switch (o) {
1751     case BadDamage: name = "BadDamage"; break;
1752     default: break;
1753     }
1754     o = ev->error_code - render_error;
1755     switch (o) {
1756     case BadPictFormat: name ="BadPictFormat"; break;
1757     case BadPicture: name ="BadPicture"; break;
1758     case BadPictOp: name ="BadPictOp"; break;
1759     case BadGlyphSet: name ="BadGlyphSet"; break;
1760     case BadGlyph: name ="BadGlyph"; break;
1761     default: break;
1762     }
1763         
1764     printf ("error %d request %d minor %d serial %d\n",
1765             ev->error_code, ev->request_code, ev->minor_code, ev->serial);
1766
1767 /*    abort ();     this is just annoying to most people */
1768     return 0;
1769 }
1770
1771 static void
1772 expose_root (Display *dpy, Window root, XRectangle *rects, int nrects)
1773 {
1774     XserverRegion  region = XFixesCreateRegion (dpy, rects, nrects);
1775     
1776     add_damage (dpy, region);
1777 }
1778
1779
1780 static int
1781 ev_serial (XEvent *ev)
1782 {
1783     if (ev->type & 0x7f != KeymapNotify)
1784         return ev->xany.serial;
1785     return NextRequest (ev->xany.display);
1786 }
1787
1788
1789 static char *
1790 ev_name (XEvent *ev)
1791 {
1792     static char buf[128];
1793     switch (ev->type & 0x7f) {
1794     case Expose:
1795         return "Expose";
1796     case MapNotify:
1797         return "Map";
1798     case UnmapNotify:
1799         return "Unmap";
1800     case ReparentNotify:
1801         return "Reparent";
1802     case CirculateNotify:
1803         return "Circulate";
1804     default:
1805         if (ev->type == damage_event + XDamageNotify)
1806             return "Damage";
1807         sprintf (buf, "Event %d", ev->type);
1808         return buf;
1809     }
1810 }
1811
1812 static Window
1813 ev_window (XEvent *ev)
1814 {
1815     switch (ev->type) {
1816     case Expose:
1817         return ev->xexpose.window;
1818     case MapNotify:
1819         return ev->xmap.window;
1820     case UnmapNotify:
1821         return ev->xunmap.window;
1822     case ReparentNotify:
1823         return ev->xreparent.window;
1824     case CirculateNotify:
1825         return ev->xcirculate.window;
1826     default:
1827         if (ev->type == damage_event + XDamageNotify)
1828             return ((XDamageNotifyEvent *) ev)->drawable;
1829         return 0;
1830     }
1831 }
1832
1833 void
1834 usage (char *program)
1835 {
1836     fprintf (stderr, "%s v1.1\n", program);
1837     fprintf (stderr, "usage: %s [options]\n", program);
1838     fprintf (stderr, "Options\n");
1839     fprintf (stderr, "   -d display\n      Specifies which display should be managed.\n");
1840     fprintf (stderr, "   -r radius\n      Specifies the blur radius for client-side shadows. (default 12)\n");
1841     fprintf (stderr, "   -o opacity\n      Specifies the translucency for client-side shadows. (default .75)\n");
1842     fprintf (stderr, "   -l left-offset\n      Specifies the left offset for client-side shadows. (default -15)\n");
1843     fprintf (stderr, "   -t top-offset\n      Specifies the top offset for clinet-side shadows. (default -15)\n");
1844     fprintf (stderr, "   -I fade-in-step\n      Specifies the opacity change between steps while fading in. (default 0.028)\n");
1845     fprintf (stderr, "   -O fade-out-step\n      Specifies the opacity change between steps while fading out. (default 0.03)\n");
1846     fprintf (stderr, "   -D fade-delta-time\n      Specifies the time between steps in a fade in milliseconds. (default 10)\n");
1847     fprintf (stderr, "   -a\n      Use automatic server-side compositing. Faster, but no special effects.\n");
1848     fprintf (stderr, "   -c\n      Draw client-side shadows with fuzzy edges.\n");
1849     fprintf (stderr, "   -C\n      Avoid drawing shadows on dock/panel windows.\n");
1850     fprintf (stderr, "   -f\n      Fade windows in/out when opening/closing.\n");
1851     fprintf (stderr, "   -F\n      Fade windows during opacity changes.\n");
1852     fprintf (stderr, "   -n\n      Normal client-side compositing with transparency support\n");
1853     fprintf (stderr, "   -s\n      Draw server-side shadows with sharp edges.\n");
1854     fprintf (stderr, "   -S\n      Enable synchronous operation (for debugging).\n");
1855     exit (1);
1856 }
1857
1858 int
1859 main (int argc, char **argv)
1860 {
1861     XEvent          ev;
1862     Window          root_return, parent_return;
1863     Window          *children;
1864     Pixmap          transPixmap;
1865     Pixmap          blackPixmap;
1866     unsigned int    nchildren;
1867     int             i;
1868     XRenderPictureAttributes    pa;
1869     XRenderColor                c;
1870     XRectangle      *expose_rects = 0;
1871     int             size_expose = 0;
1872     int             n_expose = 0;
1873     struct pollfd   ufd;
1874     int             n;
1875     int             last_update;
1876     int             now;
1877     int             p;
1878     int             composite_major, composite_minor;
1879     char            *display = 0;
1880     int             o;
1881
1882     while ((o = getopt (argc, argv, "D:I:O:d:r:o:l:t:scnfFCaS")) != -1)
1883     {
1884         switch (o) {
1885         case 'd':
1886             display = optarg;
1887             break;
1888         case 'D':
1889             fade_delta = atoi (optarg);
1890             if (fade_delta < 1)
1891                 fade_delta = 10;
1892             break;
1893         case 'I':
1894             fade_in_step = atof (optarg);
1895             if (fade_in_step <= 0)
1896                 fade_in_step = 0.01;
1897             break;
1898         case 'O':
1899             fade_out_step = atof (optarg);
1900             if (fade_out_step <= 0)
1901                 fade_out_step = 0.01;
1902             break;
1903         case 's':
1904             compMode = CompServerShadows;
1905             break;
1906         case 'c':
1907             compMode = CompClientShadows;
1908             break;
1909         case 'C':
1910             excludeDockShadows = True;
1911             break;
1912         case 'n':
1913             compMode = CompSimple;
1914             break;
1915         case 'f':
1916             fadeWindows = True;
1917             break;
1918         case 'F':
1919             fadeTrans = True;
1920             break;
1921         case 'a':
1922             autoRedirect = True;
1923             break;
1924         case 'S':
1925             synchronize = True;
1926             break;
1927         case 'r':
1928             shadowRadius = atoi (optarg);
1929             break;
1930         case 'o':
1931             shadowOpacity = atof (optarg);
1932             break;
1933         case 'l':
1934             shadowOffsetX = atoi (optarg);
1935             break;
1936         case 't':
1937             shadowOffsetY = atoi (optarg);
1938             break;
1939         default:
1940             usage (argv[0]);
1941             break;
1942         }
1943     }
1944     
1945     dpy = XOpenDisplay (display);
1946     if (!dpy)
1947     {
1948         fprintf (stderr, "Can't open display\n");
1949         exit (1);
1950     }
1951     XSetErrorHandler (error);
1952     if (synchronize)
1953         XSynchronize (dpy, 1);
1954     scr = DefaultScreen (dpy);
1955     root = RootWindow (dpy, scr);
1956
1957     if (!XRenderQueryExtension (dpy, &render_event, &render_error))
1958     {
1959         fprintf (stderr, "No render extension\n");
1960         exit (1);
1961     }
1962     if (!XQueryExtension (dpy, COMPOSITE_NAME, &composite_opcode,
1963                           &composite_event, &composite_error))
1964     {
1965         fprintf (stderr, "No composite extension\n");
1966         exit (1);
1967     }
1968     XCompositeQueryVersion (dpy, &composite_major, &composite_minor);
1969 #if HAS_NAME_WINDOW_PIXMAP
1970     if (composite_major > 0 || composite_minor >= 2)
1971         hasNamePixmap = True;
1972 #endif
1973
1974     if (!XDamageQueryExtension (dpy, &damage_event, &damage_error))
1975     {
1976         fprintf (stderr, "No damage extension\n");
1977         exit (1);
1978     }
1979     if (!XFixesQueryExtension (dpy, &xfixes_event, &xfixes_error))
1980     {
1981         fprintf (stderr, "No XFixes extension\n");
1982         exit (1);
1983     }
1984     /* get atoms */
1985     opacityAtom = XInternAtom (dpy, OPACITY_PROP, False);
1986     winTypeAtom = XInternAtom (dpy, "_NET_WM_WINDOW_TYPE", False);
1987     winDesktopAtom = XInternAtom (dpy, "_NET_WM_WINDOW_TYPE_DESKTOP", False);
1988     winDockAtom = XInternAtom (dpy, "_NET_WM_WINDOW_TYPE_DOCK", False);
1989     winToolbarAtom = XInternAtom (dpy, "_NET_WM_WINDOW_TYPE_TOOLBAR", False);
1990     winMenuAtom = XInternAtom (dpy, "_NET_WM_WINDOW_TYPE_MENU", False);
1991     winUtilAtom = XInternAtom (dpy, "_NET_WM_WINDOW_TYPE_UTILITY", False);
1992     winSplashAtom = XInternAtom (dpy, "_NET_WM_WINDOW_TYPE_SPLASH", False);
1993     winDialogAtom = XInternAtom (dpy, "_NET_WM_WINDOW_TYPE_DIALOG", False);
1994     winNormalAtom = XInternAtom (dpy, "_NET_WM_WINDOW_TYPE_NORMAL", False);
1995
1996     pa.subwindow_mode = IncludeInferiors;
1997
1998     if (compMode == CompClientShadows)
1999     {
2000         gaussianMap = make_gaussian_map(dpy, shadowRadius);
2001         presum_gaussian (gaussianMap);
2002     }
2003
2004     root_width = DisplayWidth (dpy, scr);
2005     root_height = DisplayHeight (dpy, scr);
2006
2007     rootPicture = XRenderCreatePicture (dpy, root, 
2008                                         XRenderFindVisualFormat (dpy,
2009                                                                  DefaultVisual (dpy, scr)),
2010                                         CPSubwindowMode,
2011                                         &pa);
2012     blackPicture = solid_picture (dpy, True, 1, 0, 0, 0);
2013     if (compMode == CompServerShadows)
2014         transBlackPicture = solid_picture (dpy, True, 0.3, 0, 0, 0);
2015     allDamage = None;
2016     clipChanged = True;
2017     XGrabServer (dpy);
2018     if (autoRedirect)
2019         XCompositeRedirectSubwindows (dpy, root, CompositeRedirectAutomatic);
2020     else
2021     {
2022         XCompositeRedirectSubwindows (dpy, root, CompositeRedirectManual);
2023         XSelectInput (dpy, root, 
2024                       SubstructureNotifyMask|
2025                       ExposureMask|
2026                       StructureNotifyMask|
2027                       PropertyChangeMask);
2028         XQueryTree (dpy, root, &root_return, &parent_return, &children, &nchildren);
2029         for (i = 0; i < nchildren; i++)
2030             add_win (dpy, children[i], i ? children[i-1] : None);
2031         XFree (children);
2032     }
2033     XUngrabServer (dpy);
2034     ufd.fd = ConnectionNumber (dpy);
2035     ufd.events = POLLIN;
2036     if (!autoRedirect)
2037         paint_all (dpy, None);
2038     for (;;)
2039     {
2040         /*      dump_wins (); */
2041         do {
2042             if (autoRedirect)
2043                 XFlush (dpy);
2044             if (!QLength (dpy))
2045             {
2046                  if (poll (&ufd, 1, fade_timeout()) == 0)
2047                  {
2048                     run_fades (dpy);
2049                     break;
2050                  }
2051             }
2052
2053             XNextEvent (dpy, &ev);
2054             if (ev.type & 0x7f != KeymapNotify)
2055                 discard_ignore (dpy, ev.xany.serial);
2056 #if DEBUG_EVENTS
2057             printf ("event %10.10s serial 0x%08x window 0x%08x\n",
2058                     ev_name(&ev), ev_serial (&ev), ev_window (&ev));
2059 #endif
2060             if (!autoRedirect) switch (ev.type) {
2061             case CreateNotify:
2062                 add_win (dpy, ev.xcreatewindow.window, 0);
2063                 break;
2064             case ConfigureNotify:
2065                 configure_win (dpy, &ev.xconfigure);
2066                 break;
2067             case DestroyNotify:
2068                 destroy_win (dpy, ev.xdestroywindow.window, True, True);
2069                 break;
2070             case MapNotify:
2071                 map_win (dpy, ev.xmap.window, ev.xmap.serial, True);
2072                 break;
2073             case UnmapNotify:
2074                 unmap_win (dpy, ev.xunmap.window, True);
2075                 break;
2076             case ReparentNotify:
2077                 if (ev.xreparent.parent == root)
2078                     add_win (dpy, ev.xreparent.window, 0);
2079                 else
2080                     destroy_win (dpy, ev.xreparent.window, False, True);
2081                 break;
2082             case CirculateNotify:
2083                 circulate_win (dpy, &ev.xcirculate);
2084                 break;
2085             case Expose:
2086                 if (ev.xexpose.window == root)
2087                 {
2088                     int more = ev.xexpose.count + 1;
2089                     if (n_expose == size_expose)
2090                     {
2091                         if (expose_rects)
2092                         {
2093                             expose_rects = realloc (expose_rects, 
2094                                                     (size_expose + more) * 
2095                                                     sizeof (XRectangle));
2096                             size_expose += more;
2097                         }
2098                         else
2099                         {
2100                             expose_rects = malloc (more * sizeof (XRectangle));
2101                             size_expose = more;
2102                         }
2103                     }
2104                     expose_rects[n_expose].x = ev.xexpose.x;
2105                     expose_rects[n_expose].y = ev.xexpose.y;
2106                     expose_rects[n_expose].width = ev.xexpose.width;
2107                     expose_rects[n_expose].height = ev.xexpose.height;
2108                     n_expose++;
2109                     if (ev.xexpose.count == 0)
2110                     {
2111                         expose_root (dpy, root, expose_rects, n_expose);
2112                         n_expose = 0;
2113                     }
2114                 }
2115                 break;
2116             case PropertyNotify:
2117                 for (p = 0; backgroundProps[p]; p++)
2118                 {
2119                     if (ev.xproperty.atom == XInternAtom (dpy, backgroundProps[p], False))
2120                     {
2121                         if (rootTile)
2122                         {
2123                             XClearArea (dpy, root, 0, 0, 0, 0, True);
2124                             XRenderFreePicture (dpy, rootTile);
2125                             rootTile = None;
2126                             break;
2127                         }
2128                     }
2129                 }
2130                 /* check if Trans property was changed */
2131                 if (ev.xproperty.atom == opacityAtom)
2132                 {
2133                     /* reset mode and redraw window */
2134                     win * w = find_win(dpy, ev.xproperty.window);
2135                     if (w)
2136                     {
2137                         if (fadeTrans)
2138                             set_fade (dpy, w, w->opacity*1.0/OPAQUE, get_opacity_percent (dpy, w, 1.0),
2139                                       fade_out_step, 0, False, True, False);
2140                         else
2141                         {
2142                         w->opacity = get_opacity_prop(dpy, w, OPAQUE);
2143                         determine_mode(dpy, w);
2144                             if (w->shadow)
2145                             {
2146                                 XRenderFreePicture (dpy, w->shadow);
2147                                 w->shadow = None;
2148                                 w->extents = win_extents (dpy, w);
2149                             }
2150                         }
2151                     }
2152                 }
2153                 break;
2154             default:
2155                 if (ev.type == damage_event + XDamageNotify)
2156                     damage_win (dpy, (XDamageNotifyEvent *) &ev);
2157                 break;
2158             }
2159         } while (QLength (dpy));
2160         if (allDamage && !autoRedirect)
2161         {
2162             static int  paint;
2163             paint_all (dpy, allDamage);
2164             paint++;
2165             XSync (dpy, False);
2166             allDamage = None;
2167             clipChanged = False;
2168         }
2169     }
2170 }