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