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