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