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 typedef struct _ignore {
  51     struct _ignore      *next;
  52     unsigned long       sequence;
  53 } ignore;
  54
  55 typedef struct _win {
  56     struct _win         *next;
  57     Window              id;
  58 #if HAS_NAME_WINDOW_PIXMAP
  59     Pixmap              pixmap;
  60 #endif
  61     XWindowAttributes   a;
  62     int                 mode;
  63     int                 damaged;
  64     Damage              damage;
  65     Picture             picture;
  66     Picture             alphaPict;
  67     Picture             shadowPict;
  68     XserverRegion       borderSize;
  69     XserverRegion       extents;
  70     Picture             shadow;
  71     int                 shadow_dx;
  72     int                 shadow_dy;
  73     int                 shadow_width;
  74     int                 shadow_height;
  75     unsigned int        opacity;
  76
  77     unsigned long       damage_sequence;    /* sequence when damage was created */
  78
  79     /* for drawing translucent windows */
  80     XserverRegion       borderClip;
  81     struct _win         *prev_trans;
  82 } win;
  83
  84 typedef struct _conv {
  85     int     size;
  86     double  *data;
  87 } conv;
  88
  89 typedef struct _fade {
  90     struct _fade        *next;
  91     win                 *w;
  92     double              cur;
  93     double              step;
  94     void                (*callback) (Display *dpy, win *w, Bool gone);
  95     Display             *dpy;
  96     Bool                gone;
  97 } fade;
  98
  99 win             *list;
 100 fade            *fades;
 101 Display         *dpy;
 102 int             scr;
 103 Window          root;
 104 Picture         rootPicture;
 105 Picture         rootBuffer;
 106 Picture         blackPicture;
 107 Picture         transBlackPicture;
 108 Picture         rootTile;
 109 XserverRegion   allDamage;
 110 Bool            clipChanged;
 111 #if HAS_NAME_WINDOW_PIXMAP
 112 Bool            hasNamePixmap;
 113 #endif
 114 int             root_height, root_width;
 115 ignore          *ignore_head, **ignore_tail = &ignore_head;
 116 int             xfixes_event, xfixes_error;
 117 int             damage_event, damage_error;
 118 int             composite_event, composite_error;
 119 int             render_event, render_error;
 120
 121 /* find these once and be done with it */
 122 Atom            opacityAtom;
 123
 124 /* opacity property name; sometime soon I'll write up an EWMH spec for it */
 125 #define OPACITY_PROP    "_NET_WM_WINDOW_OPACITY"
 126
 127 #define TRANSLUCENT     0xe0000000
 128 #define OPAQUE          0xffffffff
 129
 130 conv            *gaussianMap;
 131
 132 #define WINDOW_SOLID    0
 133 #define WINDOW_TRANS    1
 134 #define WINDOW_ARGB     2
 135
 136 #define TRANS_OPACITY   0.75
 137
 138 #define DEBUG_REPAINT 0
 139 #define DEBUG_EVENTS 0
 140 #define MONITOR_REPAINT 0
 141
 142 #define SHADOWS         1
 143 #define SHARP_SHADOW    0
 144
 145 typedef enum _compMode {
 146     CompSimple,         /* looks like a regular X server */
 147     CompServerShadows,  /* use window alpha for shadow; sharp, but precise */
 148     CompClientShadows,  /* use window extents for shadow, blurred */
 149 } CompMode;
 150
 151 static void
 152 determine_mode(Display *dpy, win *w);
 153
 154 CompMode    compMode = CompSimple;
 155
 156 int         shadowRadius = 12;
 157
 158 double  fade_step =     0.05;
 159 int     fade_delta =    10;
 160 int     fade_time =     0;
 161 Bool    fadeWindows;
 162
 163 int
 164 get_time_in_milliseconds ()
 165 {
 166     struct timeval  tv;
 167
 168     gettimeofday (&tv, NULL);
 169     return tv.tv_sec * 1000 + tv.tv_usec / 1000;
 170 }
 171
 172 fade *
 173 find_fade (win *w)
 174 {
 175     fade    *f;
 176
 177     for (f = fades; f; f = f->next)
 178     {
 179         if (f->w == w)
 180             return f;
 181     }
 182     return 0;
 183 }
 184
 185 void
 186 dequeue_fade (Display *dpy, fade *f)
 187 {
 188     fade    **prev;
 189
 190     for (prev = &fades; *prev; prev = &(*prev)->next)
 191         if (*prev == f)
 192         {
 193             *prev = f->next;
 194             if (f->callback)
 195                 (*f->callback) (dpy, f->w, f->gone);
 196             free (f);
 197             break;
 198         }
 199 }
 200
 201 void
 202 cleanup_fade (Display *dpy, win *w)
 203 {
 204     fade *f = find_fade (w);
 205     if (f)
 206         dequeue_fade (dpy, f);
 207 }
 208
 209 void
 210 enqueue_fade (Display *dpy, fade *f)
 211 {
 212     if (!fades)
 213         fade_time = get_time_in_milliseconds () + fade_delta;
 214     f->next = fades;
 215     fades = f;
 216 }
 217
 218 static void
 219 set_fade (Display *dpy, win *w, Bool in,
 220           void (*callback) (Display *dpy, win *w, Bool gone),
 221           Bool gone)
 222 {
 223     fade    *f;
 224
 225     f = find_fade (w);
 226     if (!f)
 227     {
 228         f = malloc (sizeof (fade));
 229         f->next = 0;
 230         f->w = w;
 231         if (in)
 232             f->cur = 0;
 233         else
 234             f->cur = 1;
 235         enqueue_fade (dpy, f);
 236     }
 237     if (in)
 238         f->step = fade_step;
 239     else
 240         f->step = -fade_step;
 241     f->callback = callback;
 242     f->gone = gone;
 243     w->opacity = f->cur * OPAQUE;
 244 #if 0
 245     printf ("set_fade start %g step %g\n", f->cur, f->step);
 246 #endif
 247     determine_mode (dpy, w);
 248 }
 249
 250 int
 251 fade_timeout (void)
 252 {
 253     int now;
 254     int delta;
 255     if (!fades)
 256         return -1;
 257     now = get_time_in_milliseconds();
 258     delta = fade_time - now;
 259     if (delta < 0)
 260         delta = 0;
 261 /*    printf ("timeout %d\n", delta); */
 262     return delta;
 263 }
 264
 265 void
 266 run_fades (Display *dpy)
 267 {
 268     int     now = get_time_in_milliseconds();
 269     fade    *f, *next;
 270     int     steps;
 271
 272 #if 0
 273     printf ("run fades\n");
 274 #endif
 275     if (fade_time - now > 0)
 276         return;
 277     steps = 1 + (now - fade_time) / fade_delta;
 278     for (next = fades; f = next; )
 279     {
 280         win *w = f->w;
 281         next = f->next;
 282         f->cur += f->step * steps;
 283         if (f->cur >= 1)
 284             f->cur = 1;
 285         else if (f->cur < 0)
 286             f->cur = 0;
 287 #if 0
 288         printf ("opacity now %g\n", f->cur);
 289 #endif
 290         w->opacity = f->cur * OPAQUE;
 291         if (f->step > 0)
 292         {
 293             if (f->cur >= 1)
 294                 dequeue_fade (dpy, f);
 295         }
 296         else
 297         {
 298             if (f->cur <= 0)
 299                 dequeue_fade (dpy, f);
 300         }
 301         determine_mode (dpy, w);
 302     }
 303     fade_time = now + fade_delta;
 304 }
 305
 306 #define SHADOW_OPACITY  0.75
 307 #define SHADOW_OFFSET_X (-shadowRadius * 5 / 4)
 308 #define SHADOW_OFFSET_Y (-shadowRadius * 5 / 4)
 309
 310 static double
 311 gaussian (double r, double x, double y)
 312 {
 313     return ((1 / (sqrt (2 * M_PI * r))) *
 314             exp ((- (x * x + y * y)) / (2 * r * r)));
 315 }
 316
 317
 318 static conv *
 319 make_gaussian_map (Display *dpy, double r)
 320 {
 321     conv            *c;
 322     int             size = ((int) ceil ((r * 3)) + 1) & ~1;
 323     int             center = size / 2;
 324     int             x, y;
 325     double          t;
 326     double          g;
 327
 328     c = malloc (sizeof (conv) + size * size * sizeof (double));
 329     c->size = size;
 330     c->data = (double *) (c + 1);
 331     t = 0.0;
 332     for (y = 0; y < size; y++)
 333         for (x = 0; x < size; x++)
 334         {
 335             g = gaussian (r, (double) (x - center), (double) (y - center));
 336             t += g;
 337             c->data[y * size + x] = g;
 338         }
 339 /*    printf ("gaussian total %f\n", t); */
 340     for (y = 0; y < size; y++)
 341         for (x = 0; x < size; x++)
 342         {
 343             c->data[y*size + x] /= t;
 344         }
 345     return c;
 346 }
 347
 348 /*
 349  * A picture will help
 350  *
 351  *      -center   0                width  width+center
 352  *  -center +-----+-------------------+-----+
 353  *          |     |                   |     |
 354  *          |     |                   |     |
 355  *        0 +-----+-------------------+-----+
 356  *          |     |                   |     |
 357  *          |     |                   |     |
 358  *          |     |                   |     |
 359  *   height +-----+-------------------+-----+
 360  *          |     |                   |     |
 361  * height+  |     |                   |     |
 362  *  center  +-----+-------------------+-----+
 363  */
 364
 365 static unsigned char
 366 sum_gaussian (conv *map, double opacity, int x, int y, int width, int height)
 367 {
 368     int     fx, fy;
 369     double  *g_data;
 370     double  *g_line = map->data;
 371     int     g_size = map->size;
 372     int     center = g_size / 2;
 373     int     fx_start, fx_end;
 374     int     fy_start, fy_end;
 375     double  v;
 376
 377     /*
 378      * Compute set of filter values which are "in range",
 379      * that's the set with:
 380      *  0 <= x + (fx-center) && x + (fx-center) < width &&
 381      *  0 <= y + (fy-center) && y + (fy-center) < height
 382      *
 383      *  0 <= x + (fx - center)  x + fx - center < width
 384      *  center - x <= fx        fx < width + center - x
 385      */
 386
 387     fx_start = center - x;
 388     if (fx_start < 0)
 389         fx_start = 0;
 390     fx_end = width + center - x;
 391     if (fx_end > g_size)
 392         fx_end = g_size;
 393
 394     fy_start = center - y;
 395     if (fy_start < 0)
 396         fy_start = 0;
 397     fy_end = height + center - y;
 398     if (fy_end > g_size)
 399         fy_end = g_size;
 400
 401     g_line = g_line + fy_start * g_size + fx_start;
 402
 403     v = 0;
 404     for (fy = fy_start; fy < fy_end; fy++)
 405     {
 406         g_data = g_line;
 407         g_line += g_size;
 408
 409         for (fx = fx_start; fx < fx_end; fx++)
 410             v += *g_data++;
 411     }
 412     if (v > 1)
 413         v = 1;
 414
 415     return ((unsigned char) (v * opacity * 255.0));
 416 }
 417
 418 static XImage *
 419 make_shadow (Display *dpy, double opacity, int width, int height)
 420 {
 421     XImage          *ximage;
 422     unsigned char   *data;
 423     int             gsize = gaussianMap->size;
 424     int             ylimit, xlimit;
 425     int             swidth = width + gsize;
 426     int             sheight = height + gsize;
 427     int             center = gsize / 2;
 428     int             x, y;
 429     unsigned char   d;
 430     int             x_diff;
 431
 432     data = malloc (swidth * sheight * sizeof (unsigned char));
 433     if (!data)
 434         return 0;
 435     ximage = XCreateImage (dpy,
 436                            DefaultVisual(dpy, DefaultScreen(dpy)),
 437                            8,
 438                            ZPixmap,
 439                            0,
 440                            (char *) data,
 441                            swidth, sheight, 8, swidth * sizeof (unsigned char));
 442     if (!ximage)
 443     {
 444         free (data);
 445         return 0;
 446     }
 447     /*
 448      * Build the gaussian in sections
 449      */
 450
 451     /*
 452      * center (fill the complete data array)
 453      */
 454
 455     d = sum_gaussian (gaussianMap, opacity, center, center, width, height);
 456     memset(data, d, sheight * swidth);
 457
 458     /*
 459      * corners
 460      */
 461     ylimit = gsize;
 462     if (ylimit > sheight / 2)
 463         ylimit = (sheight + 1) / 2;
 464     xlimit = gsize;
 465     if (xlimit > swidth / 2)
 466         xlimit = (swidth + 1) / 2;
 467
 468     for (y = 0; y < ylimit; y++)
 469         for (x = 0; x < xlimit; x++)
 470         {
 471             d = sum_gaussian (gaussianMap, opacity, x - center, y - center, width, height);
 472             data[y * swidth + x] = d;
 473             data[(sheight - y - 1) * swidth + x] = d;
 474             data[(sheight - y - 1) * swidth + (swidth - x - 1)] = d;
 475             data[y * swidth + (swidth - x - 1)] = d;
 476         }
 477
 478     /*
 479      * top/bottom
 480      */
 481     x_diff = swidth - (gsize * 2);
 482     if (x_diff > 0 && ylimit > 0)
 483     {
 484         for (y = 0; y < ylimit; y++)
 485         {
 486             d = sum_gaussian (gaussianMap, opacity, center, y - center, width, height);
 487             memset (&data[y * swidth + gsize], d, x_diff);
 488             memset (&data[(sheight - y - 1) * swidth + gsize], d, x_diff);
 489         }
 490     }
 491
 492     /*
 493      * sides
 494      */
 495
 496     for (x = 0; x < xlimit; x++)
 497     {
 498         d = sum_gaussian (gaussianMap, opacity, x - center, center, width, height);
 499         for (y = gsize; y < sheight - gsize; y++)
 500         {
 501             data[y * swidth + x] = d;
 502             data[y * swidth + (swidth - x - 1)] = d;
 503         }
 504     }
 505
 506     return ximage;
 507 }
 508
 509 static Picture
 510 shadow_picture (Display *dpy, double opacity, int width, int height, int *wp, int *hp)
 511 {
 512     XImage  *shadowImage;
 513     Pixmap  shadowPixmap;
 514     Picture shadowPicture;
 515     GC      gc;
 516
 517     shadowImage = make_shadow (dpy, opacity, width, height);
 518     if (!shadowImage)
 519         return None;
 520     shadowPixmap = XCreatePixmap (dpy, root,
 521                                   shadowImage->width,
 522                                   shadowImage->height,
 523                                   8);
 524     shadowPicture = XRenderCreatePicture (dpy, shadowPixmap,
 525                                           XRenderFindStandardFormat (dpy, PictStandardA8),
 526                                           0, 0);
 527     gc = XCreateGC (dpy, shadowPixmap, 0, 0);
 528
 529     XPutImage (dpy, shadowPixmap, gc, shadowImage, 0, 0, 0, 0,
 530                shadowImage->width,
 531                shadowImage->height);
 532     *wp = shadowImage->width;
 533     *hp = shadowImage->height;
 534     XFreeGC (dpy, gc);
 535     XDestroyImage (shadowImage);
 536     XFreePixmap (dpy, shadowPixmap);
 537     return shadowPicture;
 538 }
 539
 540 Picture
 541 solid_picture (Display *dpy, Bool argb, double a, double r, double g, double b)
 542 {
 543     Pixmap                      pixmap;
 544     Picture                     picture;
 545     XRenderPictureAttributes    pa;
 546     XRenderColor                c;
 547
 548     pixmap = XCreatePixmap (dpy, root, 1, 1, argb ? 32 : 8);
 549     pa.repeat = True;
 550     picture = XRenderCreatePicture (dpy, pixmap,
 551                                     XRenderFindStandardFormat (dpy, argb ? PictStandardARGB32 : PictStandardA8),
 552                                     CPRepeat,
 553                                     &pa);
 554     c.alpha = a * 0xffff;
 555     c.red = r * 0xffff;
 556     c.green = g * 0xffff;
 557     c.blue = b * 0xffff;
 558     XRenderFillRectangle (dpy, PictOpSrc, picture, &c, 0, 0, 1, 1);
 559     XFreePixmap (dpy, pixmap);
 560     return picture;
 561 }
 562
 563 void
 564 discard_ignore (Display *dpy, unsigned long sequence)
 565 {
 566     while (ignore_head)
 567     {
 568         if ((long) (sequence - ignore_head->sequence) > 0)
 569         {
 570             ignore  *next = ignore_head->next;
 571             free (ignore_head);
 572             ignore_head = next;
 573             if (!ignore_head)
 574                 ignore_tail = &ignore_head;
 575         }
 576         else
 577             break;
 578     }
 579 }
 580
 581 void
 582 set_ignore (Display *dpy, unsigned long sequence)
 583 {
 584     ignore  *i = malloc (sizeof (ignore));
 585     if (!i)
 586         return;
 587     i->sequence = sequence;
 588     i->next = 0;
 589     *ignore_tail = i;
 590     ignore_tail = &i->next;
 591 }
 592
 593 int
 594 should_ignore (Display *dpy, unsigned long sequence)
 595 {
 596     discard_ignore (dpy, sequence);
 597     return ignore_head && ignore_head->sequence == sequence;
 598 }
 599
 600 static win *
 601 find_win (Display *dpy, Window id)
 602 {
 603     win *w;
 604
 605     for (w = list; w; w = w->next)
 606         if (w->id == id)
 607             return w;
 608     return 0;
 609 }
 610
 611 static char *backgroundProps[] = {
 612     "_XROOTPMAP_ID",
 613     "_XSETROOT_ID",
 614     0,
 615 };
 616
 617 static Picture
 618 root_tile (Display *dpy)
 619 {
 620     Picture         picture;
 621     Atom            actual_type;
 622     Pixmap          pixmap;
 623     int             actual_format;
 624     unsigned long   nitems;
 625     unsigned long   bytes_after;
 626     unsigned char   *prop;
 627     Bool            fill;
 628     XRenderPictureAttributes    pa;
 629     int             p;
 630
 631     pixmap = None;
 632     for (p = 0; backgroundProps[p]; p++)
 633     {
 634         if (XGetWindowProperty (dpy, root, XInternAtom (dpy, backgroundProps[p], False),
 635                                 0, 4, False, AnyPropertyType,
 636                                 &actual_type, &actual_format, &nitems, &bytes_after, &prop) == Success &&
 637             actual_type == XInternAtom (dpy, "PIXMAP", False) && actual_format == 32 && nitems == 1)
 638         {
 639             memcpy (&pixmap, prop, 4);
 640             XFree (prop);
 641             fill = False;
 642             break;
 643         }
 644     }
 645     if (!pixmap)
 646     {
 647         pixmap = XCreatePixmap (dpy, root, 1, 1, DefaultDepth (dpy, scr));
 648         fill = True;
 649     }
 650     pa.repeat = True;
 651     picture = XRenderCreatePicture (dpy, pixmap,
 652                                     XRenderFindVisualFormat (dpy,
 653                                                              DefaultVisual (dpy, scr)),
 654                                     CPRepeat, &pa);
 655     if (fill)
 656     {
 657         XRenderColor    c;
 658
 659         c.red = c.green = c.blue = 0x8080;
 660         c.alpha = 0xffff;
 661         XRenderFillRectangle (dpy, PictOpSrc, picture, &c,
 662                               0, 0, 1, 1);
 663     }
 664     return picture;
 665 }
 666
 667 static void
 668 paint_root (Display *dpy)
 669 {
 670     if (!rootTile)
 671         rootTile = root_tile (dpy);
 672
 673     XRenderComposite (dpy, PictOpSrc,
 674                       rootTile, None, rootBuffer,
 675                       0, 0, 0, 0, 0, 0, root_width, root_height);
 676 }
 677
 678 static XserverRegion
 679 win_extents (Display *dpy, win *w)
 680 {
 681     XRectangle      r;
 682
 683     r.x = w->a.x;
 684     r.y = w->a.y;
 685     r.width = w->a.width + w->a.border_width * 2;
 686     r.height = w->a.height + w->a.border_width * 2;
 687     if (compMode != CompSimple)
 688     {
 689         if (compMode == CompServerShadows || w->mode != WINDOW_ARGB)
 690         {
 691             XRectangle  sr;
 692
 693             if (compMode == CompServerShadows)
 694             {
 695                 w->shadow_dx = 2;
 696                 w->shadow_dy = 7;
 697                 w->shadow_width = w->a.width;
 698                 w->shadow_height = w->a.height;
 699             }
 700             else
 701             {
 702                 w->shadow_dx = SHADOW_OFFSET_X;
 703                 w->shadow_dy = SHADOW_OFFSET_Y;
 704                 if (!w->shadow)
 705                 {
 706                     double      opacity = SHADOW_OPACITY;
 707                     if (w->mode == WINDOW_TRANS)
 708                         opacity = opacity * TRANS_OPACITY;
 709                     w->shadow = shadow_picture (dpy, opacity,
 710                                                 w->a.width + w->a.border_width * 2,
 711                                                 w->a.height + w->a.border_width * 2,
 712                                                 &w->shadow_width, &w->shadow_height);
 713                 }
 714             }
 715             sr.x = w->a.x + w->shadow_dx;
 716             sr.y = w->a.y + w->shadow_dy;
 717             sr.width = w->shadow_width;
 718             sr.height = w->shadow_height;
 719             if (sr.x < r.x)
 720             {
 721                 r.width = (r.x + r.width) - sr.x;
 722                 r.x = sr.x;
 723             }
 724             if (sr.y < r.y)
 725             {
 726                 r.height = (r.y + r.height) - sr.y;
 727                 r.y = sr.y;
 728             }
 729             if (sr.x + sr.width > r.x + r.width)
 730                 r.width = sr.x + sr.width - r.x;
 731             if (sr.y + sr.height > r.y + r.height)
 732                 r.height = sr.y + sr.height - r.y;
 733         }
 734     }
 735     return XFixesCreateRegion (dpy, &r, 1);
 736 }
 737
 738 static XserverRegion
 739 border_size (Display *dpy, win *w)
 740 {
 741     XserverRegion   border;
 742     /*
 743      * if window doesn't exist anymore,  this will generate an error
 744      * as well as not generate a region.  Perhaps a better XFixes
 745      * architecture would be to have a request that copies instead
 746      * of creates, that way you'd just end up with an empty region
 747      * instead of an invalid XID.
 748      */
 749     set_ignore (dpy, NextRequest (dpy));
 750     border = XFixesCreateRegionFromWindow (dpy, w->id, WindowRegionBounding);
 751     /* translate this */
 752     set_ignore (dpy, NextRequest (dpy));
 753     XFixesTranslateRegion (dpy, border,
 754                            w->a.x + w->a.border_width,
 755                            w->a.y + w->a.border_width);
 756     return border;
 757 }
 758
 759 static void
 760 paint_all (Display *dpy, XserverRegion region)
 761 {
 762     win *w;
 763     win *t = 0;
 764
 765     if (!region)
 766     {
 767         XRectangle  r;
 768         r.x = 0;
 769         r.y = 0;
 770         r.width = root_width;
 771         r.height = root_height;
 772         region = XFixesCreateRegion (dpy, &r, 1);
 773     }
 774 #if MONITOR_REPAINT
 775     rootBuffer = rootPicture;
 776 #else
 777     if (!rootBuffer)
 778     {
 779         Pixmap  rootPixmap = XCreatePixmap (dpy, root, root_width, root_height,
 780                                             DefaultDepth (dpy, scr));
 781         rootBuffer = XRenderCreatePicture (dpy, rootPixmap,
 782                                            XRenderFindVisualFormat (dpy,
 783                                                                     DefaultVisual (dpy, scr)),
 784                                            0, 0);
 785         XFreePixmap (dpy, rootPixmap);
 786     }
 787 #endif
 788     XFixesSetPictureClipRegion (dpy, rootPicture, 0, 0, region);
 789 #if MONITOR_REPAINT
 790     XRenderComposite (dpy, PictOpSrc, blackPicture, None, rootPicture,
 791                       0, 0, 0, 0, 0, 0, root_width, root_height);
 792 #endif
 793 #if DEBUG_REPAINT
 794     printf ("paint:");
 795 #endif
 796     for (w = list; w; w = w->next)
 797     {
 798         if (w->a.map_state != IsViewable)
 799             continue;
 800         /* never painted, ignore it */
 801         if (!w->damaged)
 802             continue;
 803         if (!w->picture)
 804         {
 805             XRenderPictureAttributes    pa;
 806             XRenderPictFormat           *format;
 807             Drawable                    draw = w->id;
 808
 809 #if HAS_NAME_WINDOW_PIXMAP
 810             if (hasNamePixmap && !w->pixmap)
 811                 w->pixmap = XCompositeNameWindowPixmap (dpy, w->id);
 812             if (w->pixmap)
 813                 draw = w->pixmap;
 814 #endif
 815             format = XRenderFindVisualFormat (dpy, w->a.visual);
 816             pa.subwindow_mode = IncludeInferiors;
 817             w->picture = XRenderCreatePicture (dpy, draw,
 818                                                format,
 819                                                CPSubwindowMode,
 820                                                &pa);
 821         }
 822 #if DEBUG_REPAINT
 823         printf (" 0x%x", w->id);
 824 #endif
 825         if (clipChanged)
 826         {
 827             if (w->borderSize)
 828             {
 829                 set_ignore (dpy, NextRequest (dpy));
 830                 XFixesDestroyRegion (dpy, w->borderSize);
 831                 w->borderSize = None;
 832             }
 833             if (w->extents)
 834             {
 835                 XFixesDestroyRegion (dpy, w->extents);
 836                 w->extents = None;
 837             }
 838             if (w->borderClip)
 839             {
 840                 XFixesDestroyRegion (dpy, w->borderClip);
 841                 w->borderClip = None;
 842             }
 843         }
 844         if (!w->borderSize)
 845             w->borderSize = border_size (dpy, w);
 846         if (!w->extents)
 847             w->extents = win_extents (dpy, w);
 848         if (w->mode == WINDOW_SOLID)
 849         {
 850             XFixesSetPictureClipRegion (dpy, rootBuffer, 0, 0, region);
 851             set_ignore (dpy, NextRequest (dpy));
 852             XFixesSubtractRegion (dpy, region, region, w->borderSize);
 853             set_ignore (dpy, NextRequest (dpy));
 854             XRenderComposite (dpy, PictOpSrc, w->picture, None, rootBuffer,
 855                               0, 0, 0, 0,
 856                               w->a.x + w->a.border_width,
 857                               w->a.y + w->a.border_width,
 858                               w->a.width,
 859                               w->a.height);
 860         }
 861         if (!w->borderClip)
 862         {
 863             w->borderClip = XFixesCreateRegion (dpy, 0, 0);
 864             XFixesCopyRegion (dpy, w->borderClip, region);
 865         }
 866         w->prev_trans = t;
 867         t = w;
 868     }
 869 #if DEBUG_REPAINT
 870     printf ("\n");
 871     fflush (stdout);
 872 #endif
 873     XFixesSetPictureClipRegion (dpy, rootBuffer, 0, 0, region);
 874     paint_root (dpy);
 875     for (w = t; w; w = w->prev_trans)
 876     {
 877         XFixesSetPictureClipRegion (dpy, rootBuffer, 0, 0, w->borderClip);
 878         switch (compMode) {
 879         case CompSimple:
 880             break;
 881         case CompServerShadows:
 882             set_ignore (dpy, NextRequest (dpy));
 883             if (w->opacity != OPAQUE && !w->shadowPict)
 884                 w->shadowPict = solid_picture (dpy, True,
 885                                                (double) w->opacity / OPAQUE * 0.3,
 886                                                0, 0, 0);
 887             XRenderComposite (dpy, PictOpOver,
 888                               w->shadowPict ? w->shadowPict : transBlackPicture,
 889                               w->picture, rootBuffer,
 890                               0, 0, 0, 0,
 891                               w->a.x + w->shadow_dx,
 892                               w->a.y + w->shadow_dy,
 893                               w->shadow_width, w->shadow_height);
 894             break;
 895         case CompClientShadows:
 896             if (w->shadow)
 897             {
 898                 XRenderComposite (dpy, PictOpOver, blackPicture, w->shadow, rootBuffer,
 899                                   0, 0, 0, 0,
 900                                   w->a.x + w->shadow_dx,
 901                                   w->a.y + w->shadow_dy,
 902                                   w->shadow_width, w->shadow_height);
 903             }
 904             break;
 905         }
 906         if (w->opacity != OPAQUE && !w->alphaPict)
 907             w->alphaPict = solid_picture (dpy, False,
 908                                           (double) w->opacity / OPAQUE, 0, 0, 0);
 909         if (w->mode == WINDOW_TRANS)
 910         {
 911             set_ignore (dpy, NextRequest (dpy));
 912             XRenderComposite (dpy, PictOpOver, w->picture, w->alphaPict, rootBuffer,
 913                               0, 0, 0, 0,
 914                               w->a.x + w->a.border_width,
 915                               w->a.y + w->a.border_width,
 916                               w->a.width,
 917                               w->a.height);
 918         }
 919         else if (w->mode == WINDOW_ARGB)
 920         {
 921             set_ignore (dpy, NextRequest (dpy));
 922             XRenderComposite (dpy, PictOpOver, w->picture, w->alphaPict, rootBuffer,
 923                               0, 0, 0, 0,
 924                               w->a.x + w->a.border_width,
 925                               w->a.y + w->a.border_width,
 926                               w->a.width,
 927                               w->a.height);
 928         }
 929         XFixesDestroyRegion (dpy, w->borderClip);
 930         w->borderClip = None;
 931     }
 932     XFixesDestroyRegion (dpy, region);
 933     if (rootBuffer != rootPicture)
 934     {
 935         XFixesSetPictureClipRegion (dpy, rootBuffer, 0, 0, None);
 936         XRenderComposite (dpy, PictOpSrc, rootBuffer, None, rootPicture,
 937                           0, 0, 0, 0, 0, 0, root_width, root_height);
 938     }
 939 }
 940
 941 static void
 942 add_damage (Display *dpy, XserverRegion damage)
 943 {
 944     if (allDamage)
 945     {
 946         XFixesUnionRegion (dpy, allDamage, allDamage, damage);
 947         XFixesDestroyRegion (dpy, damage);
 948     }
 949     else
 950         allDamage = damage;
 951 }
 952
 953 static void
 954 repair_win (Display *dpy, Window id)
 955 {
 956     win             *w = find_win (dpy, id);
 957     XserverRegion   parts;
 958
 959     if (!w)
 960         return;
 961     if (!w->damaged)
 962     {
 963         parts = win_extents (dpy, w);
 964         set_ignore (dpy, NextRequest (dpy));
 965         XDamageSubtract (dpy, w->damage, None, None);
 966     }
 967     else
 968     {
 969         XserverRegion   o;
 970         parts = XFixesCreateRegion (dpy, 0, 0);
 971         set_ignore (dpy, NextRequest (dpy));
 972         XDamageSubtract (dpy, w->damage, None, parts);
 973         XFixesTranslateRegion (dpy, parts,
 974                                w->a.x + w->a.border_width,
 975                                w->a.y + w->a.border_width);
 976         if (compMode == CompServerShadows)
 977         {
 978             o = XFixesCreateRegion (dpy, 0, 0);
 979             XFixesCopyRegion (dpy, o, parts);
 980             XFixesTranslateRegion (dpy, o, w->shadow_dx, w->shadow_dy);
 981             XFixesUnionRegion (dpy, parts, parts, o);
 982             XFixesDestroyRegion (dpy, o);
 983         }
 984     }
 985     add_damage (dpy, parts);
 986     w->damaged = 1;
 987 }
 988
 989 static void
 990 map_win (Display *dpy, Window id, unsigned long sequence, Bool fade)
 991 {
 992     win         *w = find_win (dpy, id);
 993     Drawable    back;
 994
 995     if (!w)
 996         return;
 997     w->a.map_state = IsViewable;
 998
 999     /* make sure we know if property was changed */
1000     XSelectInput(dpy, id, PropertyChangeMask);
1001
1002     w->damaged = 0;
1003     clipChanged = True;
1004     if (fade && fadeWindows)
1005         set_fade (dpy, w, True, 0, False);
1006 }
1007
1008 static void
1009 finish_unmap_win (Display *dpy, win *w)
1010 {
1011     w->a.map_state = IsUnmapped;
1012     w->damaged = 0;
1013     if (w->extents != None)
1014     {
1015         add_damage (dpy, w->extents);    /* destroys region */
1016         w->extents = None;
1017     }
1018
1019 #if HAS_NAME_WINDOW_PIXMAP
1020     if (w->pixmap)
1021     {
1022         XFreePixmap (dpy, w->pixmap);
1023         w->pixmap = None;
1024     }
1025 #endif
1026
1027     if (w->picture)
1028     {
1029         set_ignore (dpy, NextRequest (dpy));
1030         XRenderFreePicture (dpy, w->picture);
1031         w->picture = None;
1032     }
1033
1034     /* don't care about properties anymore */
1035     set_ignore (dpy, NextRequest (dpy));
1036     XSelectInput(dpy, w->id, 0);
1037
1038     if (w->borderSize)
1039     {
1040         set_ignore (dpy, NextRequest (dpy));
1041         XFixesDestroyRegion (dpy, w->borderSize);
1042         w->borderSize = None;
1043     }
1044     if (w->shadow)
1045     {
1046         XRenderFreePicture (dpy, w->shadow);
1047         w->shadow = None;
1048     }
1049     if (w->borderClip)
1050     {
1051         XFixesDestroyRegion (dpy, w->borderClip);
1052         w->borderClip = None;
1053     }
1054
1055     clipChanged = True;
1056 }
1057
1058 #if HAS_NAME_WINDOW_PIXMAP
1059 static void
1060 unmap_callback (Display *dpy, win *w, Bool gone)
1061 {
1062     finish_unmap_win (dpy, w);
1063 }
1064 #endif
1065
1066 static void
1067 unmap_win (Display *dpy, Window id, Bool fade)
1068 {
1069     win *w = find_win (dpy, id);
1070     if (!w)
1071         return;
1072 #if HAS_NAME_WINDOW_PIXMAP
1073     if (w->pixmap && fade && fadeWindows)
1074         set_fade (dpy, w, False, unmap_callback, False);
1075     else
1076 #endif
1077         finish_unmap_win (dpy, w);
1078 }
1079
1080 /* Get the opacity prop from window
1081    not found: default
1082    otherwise the value
1083  */
1084 static unsigned int
1085 get_opacity_prop(Display *dpy, win *w, unsigned int def)
1086 {
1087     Atom actual;
1088     int format;
1089     unsigned long n, left;
1090
1091     char *data;
1092     XGetWindowProperty(dpy, w->id, opacityAtom, 0L, 1L, False,
1093                        XA_CARDINAL, &actual, &format,
1094                        &n, &left, (unsigned char **) &data);
1095     if (data != None)
1096     {
1097         unsigned int i;
1098         memcpy (&i, data, sizeof (unsigned int));
1099         XFree( (void *) data);
1100         return i;
1101     }
1102     return def;
1103 }
1104
1105 /* determine mode for window all in one place.
1106    Future might check for menu flag and other cool things
1107 */
1108
1109 static void
1110 determine_mode(Display *dpy, win *w)
1111 {
1112     int mode;
1113     XRenderPictFormat *format;
1114     unsigned int default_opacity;
1115
1116     /* if trans prop == -1 fall back on  previous tests*/
1117
1118     if (w->alphaPict)
1119     {
1120         XRenderFreePicture (dpy, w->alphaPict);
1121         w->alphaPict = None;
1122     }
1123     if (w->shadowPict)
1124     {
1125         XRenderFreePicture (dpy, w->shadowPict);
1126         w->shadowPict = None;
1127     }
1128
1129     if (w->a.class == InputOnly)
1130     {
1131         format = 0;
1132     }
1133     else
1134     {
1135         format = XRenderFindVisualFormat (dpy, w->a.visual);
1136     }
1137
1138     if (format && format->type == PictTypeDirect && format->direct.alphaMask)
1139     {
1140         mode = WINDOW_ARGB;
1141     }
1142     else if (w->opacity != OPAQUE)
1143     {
1144         mode = WINDOW_TRANS;
1145     }
1146     else
1147     {
1148         mode = WINDOW_SOLID;
1149     }
1150     w->mode = mode;
1151     if (w->extents)
1152     {
1153         XserverRegion damage;
1154         damage = XFixesCreateRegion (dpy, 0, 0);
1155         XFixesCopyRegion (dpy, damage, w->extents);
1156         add_damage (dpy, damage);
1157     }
1158 }
1159
1160 static void
1161 add_win (Display *dpy, Window id, Window prev)
1162 {
1163     win                         *new = malloc (sizeof (win));
1164     win                         **p;
1165
1166     if (!new)
1167         return;
1168     if (prev)
1169     {
1170         for (p = &list; *p; p = &(*p)->next)
1171             if ((*p)->id == prev)
1172                 break;
1173     }
1174     else
1175         p = &list;
1176     new->id = id;
1177     set_ignore (dpy, NextRequest (dpy));
1178     if (!XGetWindowAttributes (dpy, id, &new->a))
1179     {
1180         free (new);
1181         return;
1182     }
1183     new->damaged = 0;
1184 #if HAS_NAME_WINDOW_PIXMAP
1185     new->pixmap = None;
1186 #endif
1187     new->picture = None;
1188     if (new->a.class == InputOnly)
1189     {
1190         new->damage_sequence = 0;
1191         new->damage = None;
1192     }
1193     else
1194     {
1195         new->damage_sequence = NextRequest (dpy);
1196         new->damage = XDamageCreate (dpy, id, XDamageReportNonEmpty);
1197     }
1198     new->alphaPict = None;
1199     new->shadowPict = None;
1200     new->borderSize = None;
1201     new->extents = None;
1202     new->shadow = None;
1203     new->shadow_dx = 0;
1204     new->shadow_dy = 0;
1205     new->shadow_width = 0;
1206     new->shadow_height = 0;
1207     new->opacity = OPAQUE;
1208
1209     new->borderClip = None;
1210     new->prev_trans = 0;
1211
1212     /* moved mode setting to one place */
1213     new->opacity = get_opacity_prop(dpy, new, OPAQUE);
1214     determine_mode (dpy, new);
1215
1216     new->next = *p;
1217     *p = new;
1218     if (new->a.map_state == IsViewable)
1219         map_win (dpy, id, new->damage_sequence - 1, False);
1220 }
1221
1222 void
1223 restack_win (Display *dpy, win *w, Window new_above)
1224 {
1225     Window  old_above;
1226
1227     if (w->next)
1228         old_above = w->next->id;
1229     else
1230         old_above = None;
1231     if (old_above != new_above)
1232     {
1233         win **prev;
1234
1235         /* unhook */
1236         for (prev = &list; *prev; prev = &(*prev)->next)
1237             if ((*prev) == w)
1238                 break;
1239         *prev = w->next;
1240
1241         /* rehook */
1242         for (prev = &list; *prev; prev = &(*prev)->next)
1243         {
1244             if ((*prev)->id == new_above)
1245                 break;
1246         }
1247         w->next = *prev;
1248         *prev = w;
1249     }
1250 }
1251
1252 static void
1253 configure_win (Display *dpy, XConfigureEvent *ce)
1254 {
1255     win             *w = find_win (dpy, ce->window);
1256     Window          above;
1257     XserverRegion   damage = None;
1258
1259     if (!w)
1260     {
1261         if (ce->window == root)
1262         {
1263             if (rootBuffer)
1264             {
1265                 XRenderFreePicture (dpy, rootBuffer);
1266                 rootBuffer = None;
1267             }
1268             root_width = ce->width;
1269             root_height = ce->height;
1270         }
1271         return;
1272     }
1273     if (w->a.map_state == IsViewable)
1274     {
1275         damage = XFixesCreateRegion (dpy, 0, 0);
1276         if (w->extents != None)
1277             XFixesCopyRegion (dpy, damage, w->extents);
1278     }
1279     w->a.x = ce->x;
1280     w->a.y = ce->y;
1281     if (w->a.width != ce->width || w->a.height != ce->height)
1282     {
1283 #if HAS_NAME_WINDOW_PIXMAP
1284         if (w->pixmap)
1285         {
1286             XFreePixmap (dpy, w->pixmap);
1287             w->pixmap = None;
1288             if (w->picture)
1289             {
1290                 XRenderFreePicture (dpy, w->picture);
1291                 w->picture = None;
1292             }
1293         }
1294 #endif
1295         if (w->shadow)
1296         {
1297             XRenderFreePicture (dpy, w->shadow);
1298             w->shadow = None;
1299         }
1300     }
1301     w->a.width = ce->width;
1302     w->a.height = ce->height;
1303     w->a.border_width = ce->border_width;
1304     w->a.override_redirect = ce->override_redirect;
1305     restack_win (dpy, w, ce->above);
1306     if (damage)
1307     {
1308         XserverRegion   extents = win_extents (dpy, w);
1309         XFixesUnionRegion (dpy, damage, damage, extents);
1310         XFixesDestroyRegion (dpy, extents);
1311         add_damage (dpy, damage);
1312     }
1313     clipChanged = True;
1314 }
1315
1316 static void
1317 circulate_win (Display *dpy, XCirculateEvent *ce)
1318 {
1319     win     *w = find_win (dpy, ce->window);
1320     Window  new_above;
1321
1322     if (ce->place == PlaceOnTop)
1323         new_above = list->id;
1324     else
1325         new_above = None;
1326     restack_win (dpy, w, new_above);
1327     clipChanged = True;
1328 }
1329
1330 static void
1331 finish_destroy_win (Display *dpy, Window id, Bool gone)
1332 {
1333     win **prev, *w;
1334
1335     for (prev = &list; (w = *prev); prev = &w->next)
1336         if (w->id == id)
1337         {
1338             if (!gone)
1339                 finish_unmap_win (dpy, w);
1340             *prev = w->next;
1341             if (w->picture)
1342             {
1343                 set_ignore (dpy, NextRequest (dpy));
1344                 XRenderFreePicture (dpy, w->picture);
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             if (w->damage != None)
1357             {
1358                 set_ignore (dpy, NextRequest (dpy));
1359                 XDamageDestroy (dpy, w->damage);
1360             }
1361             cleanup_fade (dpy, w);
1362             free (w);
1363             break;
1364         }
1365 }
1366
1367 #if HAS_NAME_WINDOW_PIXMAP
1368 static void
1369 destroy_callback (Display *dpy, win *w, Bool gone)
1370 {
1371     finish_destroy_win (dpy, w->id, gone);
1372 }
1373 #endif
1374
1375 static void
1376 destroy_win (Display *dpy, Window id, Bool gone, Bool fade)
1377 {
1378     win *w = find_win (dpy, id);
1379 #if HAS_NAME_WINDOW_PIXMAP
1380     if (w && w->pixmap && fade && fadeWindows)
1381         set_fade (dpy, w, False, destroy_callback, gone);
1382     else
1383 #endif
1384     {
1385         finish_destroy_win (dpy, id, gone);
1386     }
1387 }
1388
1389 /*
1390 static void
1391 dump_win (win *w)
1392 {
1393     printf ("\t%08lx: %d x %d + %d + %d (%d)\n", w->id,
1394             w->a.width, w->a.height, w->a.x, w->a.y, w->a.border_width);
1395 }
1396
1397
1398 static void
1399 dump_wins (void)
1400 {
1401     win *w;
1402
1403     printf ("windows:\n");
1404     for (w = list; w; w = w->next)
1405         dump_win (w);
1406 }
1407 */
1408
1409 static void
1410 damage_win (Display *dpy, XDamageNotifyEvent *de)
1411 {
1412     repair_win (dpy, de->drawable);
1413 }
1414
1415 static int
1416 error (Display *dpy, XErrorEvent *ev)
1417 {
1418     int     o;
1419     char    *name = 0;
1420
1421     if (should_ignore (dpy, ev->serial))
1422         return 0;
1423
1424
1425     o = ev->error_code - xfixes_error;
1426     switch (o) {
1427     case BadRegion: name = "BadRegion"; break;
1428     default: break;
1429     }
1430     o = ev->error_code - damage_error;
1431     switch (o) {
1432     case BadDamage: name = "BadDamage"; break;
1433     default: break;
1434     }
1435     o = ev->error_code - render_error;
1436     switch (o) {
1437     case BadPictFormat: name ="BadPictFormat"; break;
1438     case BadPicture: name ="BadPicture"; break;
1439     case BadPictOp: name ="BadPictOp"; break;
1440     case BadGlyphSet: name ="BadGlyphSet"; break;
1441     case BadGlyph: name ="BadGlyph"; break;
1442     default: break;
1443     }
1444
1445     printf ("error %d request %d minor %d serial %d\n",
1446             ev->error_code, ev->request_code, ev->minor_code, ev->serial);
1447
1448     abort ();
1449     return 0;
1450 }
1451
1452 static void
1453 expose_root (Display *dpy, Window root, XRectangle *rects, int nrects)
1454 {
1455     XserverRegion  region = XFixesCreateRegion (dpy, rects, nrects);
1456
1457     add_damage (dpy, region);
1458 }
1459
1460
1461 static int
1462 ev_serial (XEvent *ev)
1463 {
1464     if (ev->type & 0x7f != KeymapNotify)
1465         return ev->xany.serial;
1466     return NextRequest (ev->xany.display);
1467 }
1468
1469
1470 static char *
1471 ev_name (XEvent *ev)
1472 {
1473     static char buf[128];
1474     switch (ev->type & 0x7f) {
1475     case Expose:
1476         return "Expose";
1477     case MapNotify:
1478         return "Map";
1479     case UnmapNotify:
1480         return "Unmap";
1481     case ReparentNotify:
1482         return "Reparent";
1483     case CirculateNotify:
1484         return "Circulate";
1485     default:
1486         if (ev->type == damage_event + XDamageNotify)
1487             return "Damage";
1488         sprintf (buf, "Event %d", ev->type);
1489         return buf;
1490     }
1491 }
1492
1493 static Window
1494 ev_window (XEvent *ev)
1495 {
1496     switch (ev->type) {
1497     case Expose:
1498         return ev->xexpose.window;
1499     case MapNotify:
1500         return ev->xmap.window;
1501     case UnmapNotify:
1502         return ev->xunmap.window;
1503     case ReparentNotify:
1504         return ev->xreparent.window;
1505     case CirculateNotify:
1506         return ev->xcirculate.window;
1507     default:
1508         if (ev->type == damage_event + XDamageNotify)
1509             return ((XDamageNotifyEvent *) ev)->drawable;
1510         return 0;
1511     }
1512 }
1513
1514 void
1515 usage (char *program)
1516 {
1517     fprintf (stderr, "usage: %s [-d display] [-n] [-s] [-c]\n", program);
1518     exit (1);
1519 }
1520
1521 int
1522 main (int argc, char **argv)
1523 {
1524     XEvent          ev;
1525     Window          root_return, parent_return;
1526     Window          *children;
1527     Pixmap          transPixmap;
1528     Pixmap          blackPixmap;
1529     unsigned int    nchildren;
1530     int             i;
1531     XRenderPictureAttributes    pa;
1532     XRenderColor                c;
1533     XRectangle      *expose_rects = 0;
1534     int             size_expose = 0;
1535     int             n_expose = 0;
1536     struct pollfd   ufd;
1537     int             n;
1538     int             last_update;
1539     int             now;
1540     int             p;
1541     int             composite_major, composite_minor;
1542     char            *display = 0;
1543     int             o;
1544
1545     while ((o = getopt (argc, argv, "d:scnf")) != -1)
1546     {
1547         switch (o) {
1548         case 'd':
1549             display = optarg;
1550             break;
1551         case 's':
1552             compMode = CompServerShadows;
1553             break;
1554         case 'c':
1555             compMode = CompClientShadows;
1556             break;
1557         case 'n':
1558             compMode = CompSimple;
1559             break;
1560         case 'f':
1561             fadeWindows = True;
1562             break;
1563         default:
1564             usage (argv[0]);
1565             break;
1566         }
1567     }
1568
1569     dpy = XOpenDisplay (display);
1570     if (!dpy)
1571     {
1572         fprintf (stderr, "Can't open display\n");
1573         exit (1);
1574     }
1575     XSetErrorHandler (error);
1576 #if 0
1577     XSynchronize (dpy, 1);
1578 #endif
1579     scr = DefaultScreen (dpy);
1580     root = RootWindow (dpy, scr);
1581
1582     if (!XRenderQueryExtension (dpy, &render_event, &render_error))
1583     {
1584         fprintf (stderr, "No render extension\n");
1585         exit (1);
1586     }
1587     if (!XCompositeQueryExtension (dpy, &composite_event, &composite_error))
1588     {
1589         fprintf (stderr, "No composite extension\n");
1590         exit (1);
1591     }
1592     XCompositeQueryVersion (dpy, &composite_major, &composite_minor);
1593 #if HAS_NAME_WINDOW_PIXMAP
1594     if (composite_major > 0 || composite_minor >= 2)
1595         hasNamePixmap = True;
1596 #endif
1597
1598     if (!XDamageQueryExtension (dpy, &damage_event, &damage_error))
1599     {
1600         fprintf (stderr, "No damage extension\n");
1601         exit (1);
1602     }
1603     if (!XFixesQueryExtension (dpy, &xfixes_event, &xfixes_error))
1604     {
1605         fprintf (stderr, "No XFixes extension\n");
1606         exit (1);
1607     }
1608     /* get atoms */
1609     opacityAtom = XInternAtom (dpy, OPACITY_PROP, False);
1610
1611     pa.subwindow_mode = IncludeInferiors;
1612
1613     if (compMode == CompClientShadows)
1614         gaussianMap = make_gaussian_map(dpy, shadowRadius);
1615
1616     root_width = DisplayWidth (dpy, scr);
1617     root_height = DisplayHeight (dpy, scr);
1618
1619     rootPicture = XRenderCreatePicture (dpy, root,
1620                                         XRenderFindVisualFormat (dpy,
1621                                                                  DefaultVisual (dpy, scr)),
1622                                         CPSubwindowMode,
1623                                         &pa);
1624     blackPicture = solid_picture (dpy, True, 1, 0, 0, 0);
1625     if (compMode == CompServerShadows)
1626         transBlackPicture = solid_picture (dpy, True, 0.3, 0, 0, 0);
1627     allDamage = None;
1628     clipChanged = True;
1629     XGrabServer (dpy);
1630     XCompositeRedirectSubwindows (dpy, root, CompositeRedirectManual);
1631     XSelectInput (dpy, root,
1632                   SubstructureNotifyMask|
1633                   ExposureMask|
1634                   StructureNotifyMask|
1635                   PropertyChangeMask);
1636     XQueryTree (dpy, root, &root_return, &parent_return, &children, &nchildren);
1637     for (i = 0; i < nchildren; i++)
1638         add_win (dpy, children[i], i ? children[i-1] : None);
1639     XFree (children);
1640     XUngrabServer (dpy);
1641     ufd.fd = ConnectionNumber (dpy);
1642     ufd.events = POLLIN;
1643     paint_all (dpy, None);
1644     for (;;)
1645     {
1646         /*      dump_wins (); */
1647         do {
1648             if (!QLength (dpy))
1649             {
1650                  if (poll (&ufd, 1, fade_timeout()) == 0)
1651                  {
1652                     run_fades (dpy);
1653                     break;
1654                  }
1655             }
1656
1657             XNextEvent (dpy, &ev);
1658             if (ev.type & 0x7f != KeymapNotify)
1659                 discard_ignore (dpy, ev.xany.serial);
1660 #if DEBUG_EVENTS
1661             printf ("event %10.10s serial 0x%08x window 0x%08x\n",
1662                     ev_name(&ev), ev_serial (&ev), ev_window (&ev));
1663 #endif
1664             switch (ev.type) {
1665             case CreateNotify:
1666                 add_win (dpy, ev.xcreatewindow.window, 0);
1667                 break;
1668             case ConfigureNotify:
1669                 configure_win (dpy, &ev.xconfigure);
1670                 break;
1671             case DestroyNotify:
1672                 destroy_win (dpy, ev.xdestroywindow.window, True, True);
1673                 break;
1674             case MapNotify:
1675                 map_win (dpy, ev.xmap.window, ev.xmap.serial, True);
1676                 break;
1677             case UnmapNotify:
1678                 unmap_win (dpy, ev.xunmap.window, True);
1679                 break;
1680             case ReparentNotify:
1681                 if (ev.xreparent.parent == root)
1682                     add_win (dpy, ev.xreparent.window, 0);
1683                 else
1684                     destroy_win (dpy, ev.xreparent.window, False, True);
1685                 break;
1686             case CirculateNotify:
1687                 circulate_win (dpy, &ev.xcirculate);
1688                 break;
1689             case Expose:
1690                 if (ev.xexpose.window == root)
1691                 {
1692                     int more = ev.xexpose.count + 1;
1693                     if (n_expose == size_expose)
1694                     {
1695                         if (expose_rects)
1696                         {
1697                             expose_rects = realloc (expose_rects,
1698                                                     (size_expose + more) *
1699                                                     sizeof (XRectangle));
1700                             size_expose += more;
1701                         }
1702                         else
1703                         {
1704                             expose_rects = malloc (more * sizeof (XRectangle));
1705                             size_expose = more;
1706                         }
1707                     }
1708                     expose_rects[n_expose].x = ev.xexpose.x;
1709                     expose_rects[n_expose].y = ev.xexpose.y;
1710                     expose_rects[n_expose].width = ev.xexpose.width;
1711                     expose_rects[n_expose].height = ev.xexpose.height;
1712                     n_expose++;
1713                     if (ev.xexpose.count == 0)
1714                     {
1715                         expose_root (dpy, root, expose_rects, n_expose);
1716                         n_expose = 0;
1717                     }
1718                 }
1719                 break;
1720             case PropertyNotify:
1721                 for (p = 0; backgroundProps[p]; p++)
1722                 {
1723                     if (ev.xproperty.atom == XInternAtom (dpy, backgroundProps[p], False))
1724                     {
1725                         if (rootTile)
1726                         {
1727                             XClearArea (dpy, root, 0, 0, 0, 0, True);
1728                             XRenderFreePicture (dpy, rootTile);
1729                             rootTile = None;
1730                             break;
1731                         }
1732                     }
1733                 }
1734                 /* check if Trans property was changed */
1735                 if (ev.xproperty.atom == opacityAtom)
1736                 {
1737                     /* reset mode and redraw window */
1738                     win * w = find_win(dpy, ev.xproperty.window);
1739                     if (w)
1740                     {
1741                         w->opacity = get_opacity_prop(dpy, w, OPAQUE);
1742                         determine_mode(dpy, w);
1743                     }
1744                 }
1745                 break;
1746             default:
1747                 if (ev.type == damage_event + XDamageNotify)
1748                     damage_win (dpy, (XDamageNotifyEvent *) &ev);
1749                 break;
1750             }
1751         } while (QLength (dpy));
1752         if (allDamage)
1753         {
1754             static int  paint;
1755             paint_all (dpy, allDamage);
1756             paint++;
1757             XSync (dpy, False);
1758             allDamage = None;
1759             clipChanged = False;
1760         }
1761     }
1762 }