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