Made gussian_map get called just once rather than N times
[dana/xcompmgr.git] / xcompmgr.c
index 30ede48..f9ecc3b 100644 (file)
@@ -1,6 +1,31 @@
+/*
+ * $Id$
+ *
+ * Copyright © 2003 Keith Packard
+ *
+ * Permission to use, copy, modify, distribute, and sell this software and its
+ * documentation for any purpose is hereby granted without fee, provided that
+ * the above copyright notice appear in all copies and that both that
+ * copyright notice and this permission notice appear in supporting
+ * documentation, and that the name of Keith Packard not be used in
+ * advertising or publicity pertaining to distribution of the software without
+ * specific, written prior permission.  Keith Packard makes no
+ * representations about the suitability of this software for any purpose.  It
+ * is provided "as is" without express or implied warranty.
+ *
+ * KEITH PACKARD DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE,
+ * INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO
+ * EVENT SHALL KEITH PACKARD BE LIABLE FOR ANY SPECIAL, INDIRECT OR
+ * CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE,
+ * DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER
+ * TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR
+ * PERFORMANCE OF THIS SOFTWARE.
+ */
+
 #include <stdlib.h>
 #include <stdio.h>
 #include <math.h>
+#include <sys/poll.h>
 #include <X11/Xlib.h>
 #include <X11/Xutil.h>
 #include <X11/extensions/Xcomposite.h>
@@ -28,19 +53,30 @@ typedef struct _win {
     struct _win                *prev_trans;
 } win;
 
-win *list;
+typedef struct _conv {
+    int            size;
+    double  *data;
+} conv;
 
+win             *list;
 Display                *dpy;
 int            scr;
 Window         root;
 Picture                rootPicture;
+Picture                rootBuffer;
 Picture                transPicture;
+Picture                blackPicture;
 Picture                rootTile;
 XserverRegion  allDamage;
+int            root_height, root_width;
+conv            *gussianMap;
+
+#define BACKGROUND_PROP        "_XROOTPMAP_ID"
+
+#define WINDOW_SOLID   0
+#define WINDOW_TRANS   1
+#define WINDOW_ARGB    2
 
-#define WINDOW_PLAIN   0
-#define WINDOW_DROP    1
-#define WINDOW_TRANS   2
 #define TRANS_OPACITY  0.75
 #define SHADOW_RADIUS  15
 #define SHADOW_OPACITY 0.75
@@ -55,10 +91,6 @@ gaussian (double r, double x, double y)
            exp ((- (x * x + y * y)) / (2 * r * r)));
 }
 
-typedef struct _conv {
-    int            size;
-    double  *data;
-} conv;
 
 conv *
 make_gaussian_map (Display *dpy, double r)
@@ -80,7 +112,7 @@ make_gaussian_map (Display *dpy, double r)
            t += g;
            c->data[y * size + x] = g;
        }
-    printf ("gaussian total %f\n", t);
+/*    printf ("gaussian total %f\n", t); */
     for (y = 0; y < size; y++)
        for (x = 0; x < size; x++)
        {
@@ -106,7 +138,7 @@ make_gaussian_map (Display *dpy, double r)
  *  center  +-----+-------------------+-----+
  */
  
-unsigned int
+unsigned char
 sum_gaussian (conv *map, double opacity, int x, int y, int width, int height)
 {
     int            fx, fy;
@@ -157,17 +189,16 @@ sum_gaussian (conv *map, double opacity, int x, int y, int width, int height)
     if (v > 1)
        v = 1;
     
-    return ((unsigned int) (v * opacity * 255.0)) << 24;
+    return ((unsigned int) (v * opacity * 255.0));
 }
 
 XImage *
-make_shadow (Display *dpy, double opacity, double r, int width, int height)
+make_shadow (Display *dpy, double opacity, int width, int height)
 {
-    conv           *map = make_gaussian_map (dpy, r);
     XImage         *ximage;
-    double         *gdata = map->data;
-    unsigned int    *data;
-    int                    gsize = map->size;
+    double         *gdata = gussianMap->data;
+    unsigned char   *data;
+    int                    gsize = gussianMap->size;
     int                    ylimit, xlimit;
     int                    swidth = width + gsize;
     int                    sheight = height + gsize;
@@ -175,18 +206,18 @@ make_shadow (Display *dpy, double opacity, double r, int width, int height)
     int                    x, y;
     int                    fx, fy;
     int                    sx, sy;
-    unsigned int    d;
+    unsigned char   d;
     double         v;
     unsigned char   c;
     
-    data = malloc (swidth * sheight * sizeof (int));
+    data = malloc (swidth * sheight * sizeof (unsigned char));
     ximage = XCreateImage (dpy,
                           DefaultVisual(dpy, DefaultScreen(dpy)),
-                          32,
+                          8,
                           ZPixmap,
                           0,
                           (char *) data,
-                          swidth, sheight, 32, swidth * sizeof (int));
+                          swidth, sheight, 8, swidth * sizeof (unsigned char));
     /*
      * Build the gaussian in sections
      */
@@ -204,7 +235,7 @@ make_shadow (Display *dpy, double opacity, double r, int width, int height)
     for (y = 0; y < ylimit; y++)
        for (x = 0; x < xlimit; x++)
        {
-           d = sum_gaussian (map, opacity, x - center, y - center, width, height);
+           d = sum_gaussian (gussianMap, opacity, x - center, y - center, width, height);
            data[y * swidth + x] = d;
            data[(sheight - y - 1) * swidth + x] = d;
            data[(sheight - y - 1) * swidth + (swidth - x - 1)] = d;
@@ -216,7 +247,7 @@ make_shadow (Display *dpy, double opacity, double r, int width, int height)
      */
     for (y = 0; y < ylimit; y++)
     {
-       d = sum_gaussian (map, opacity, center, y - center, width, height);
+       d = sum_gaussian (gussianMap, opacity, center, y - center, width, height);
        for (x = gsize; x < swidth - gsize; x++)
        {
            data[y * swidth + x] = d;
@@ -230,7 +261,7 @@ make_shadow (Display *dpy, double opacity, double r, int width, int height)
     
     for (x = 0; x < xlimit; x++)
     {
-       d = sum_gaussian (map, opacity, x - center, center, width, height);
+       d = sum_gaussian (gussianMap, opacity, x - center, center, width, height);
        for (y = gsize; y < sheight - gsize; y++)
        {
            data[y * swidth + x] = d;
@@ -242,25 +273,24 @@ make_shadow (Display *dpy, double opacity, double r, int width, int height)
      * center
      */
 
-    d = sum_gaussian (map, opacity, center, center, width, height);
+    d = sum_gaussian (gussianMap, opacity, center, center, width, height);
     for (y = ylimit; y < sheight - ylimit; y++)
        for (x = xlimit; x < swidth - xlimit; x++)
            data[y * swidth + x] = d;
 
-    free (map);
     return ximage;
 }
 
 Picture
-shadow_picture (Display *dpy, double opacity, double r, int width, int height, int *wp, int *hp)
+shadow_picture (Display *dpy, double opacity, int width, int height, int *wp, int *hp)
 {
-    XImage  *shadowImage = make_shadow (dpy, opacity, r, width, height);
+    XImage  *shadowImage = make_shadow (dpy, opacity, width, height);
     Pixmap  shadowPixmap = XCreatePixmap (dpy, root, 
                                          shadowImage->width,
                                          shadowImage->height,
-                                         32);
+                                         8);
     Picture shadowPicture = XRenderCreatePicture (dpy, shadowPixmap,
-                                                 XRenderFindStandardFormat (dpy, PictStandardARGB32),
+                                                 XRenderFindStandardFormat (dpy, PictStandardA8),
                                                  0, 0);
     GC     gc = XCreateGC (dpy, shadowPixmap, 0, 0);
     
@@ -299,9 +329,10 @@ root_tile (Display *dpy)
     Bool           fill;
     XRenderPictureAttributes   pa;
 
-    if (XGetWindowProperty (dpy, root, XInternAtom (dpy, "_XROOTPMAP_ID", False),
+    if (XGetWindowProperty (dpy, root, XInternAtom (dpy, BACKGROUND_PROP, False),
                            0, 4, False, AnyPropertyType,
-                           &actual_type, &actual_format, &nitems, &bytes_after, &prop) == Success)
+                           &actual_type, &actual_format, &nitems, &bytes_after, &prop) == Success &&
+       actual_type == XInternAtom (dpy, "PIXMAP", False) && actual_format == 32 && nitems == 1)
     {
        memcpy (&pixmap, prop, 4);
        XFree (prop);
@@ -336,8 +367,8 @@ paint_root (Display *dpy)
        rootTile = root_tile (dpy);
     
     XRenderComposite (dpy, PictOpSrc,
-                     rootTile, None, rootPicture,
-                     0, 0, 0, 0, 0, 0, 32767, 32767);
+                     rootTile, None, rootBuffer,
+                     0, 0, 0, 0, 0, 0, root_width, root_height);
 }
 
 XserverRegion
@@ -345,21 +376,31 @@ win_extents (Display *dpy, win *w)
 {
     XRectangle     r;
     
-    if (!w->shadow)
+    if (w->mode == WINDOW_ARGB)
     {
-       double  opacity = SHADOW_OPACITY;
-       if (w->mode == WINDOW_TRANS)
-           opacity = opacity * TRANS_OPACITY;
-       w->shadow = shadow_picture (dpy, opacity, SHADOW_RADIUS, 
-                                   w->a.width, w->a.height,
-                                   &w->shadow_width, &w->shadow_height);
-       w->shadow_dx = SHADOW_OFFSET_X;
-       w->shadow_dy = SHADOW_OFFSET_Y;
+       r.x = w->a.x;
+       r.y = w->a.y;
+       r.width = w->a.width + w->a.border_width * 2;
+       r.height = w->a.height + w->a.border_width * 2;
+    }
+    else
+    {
+       if (!w->shadow)
+       {
+           double      opacity = SHADOW_OPACITY;
+           if (w->mode == WINDOW_TRANS)
+               opacity = opacity * TRANS_OPACITY;
+           w->shadow = shadow_picture (dpy, opacity, 
+                                       w->a.width, w->a.height,
+                                       &w->shadow_width, &w->shadow_height);
+           w->shadow_dx = SHADOW_OFFSET_X;
+           w->shadow_dy = SHADOW_OFFSET_Y;
+       }
+       r.x = w->a.x + w->a.border_width + w->shadow_dx;
+       r.y = w->a.y + w->a.border_width + w->shadow_dy;
+       r.width = w->shadow_width;
+       r.height = w->shadow_height;
     }
-    r.x = w->a.x + w->a.border_width + w->shadow_dx;
-    r.y = w->a.y + w->a.border_width + w->shadow_dy;
-    r.width = w->shadow_width;
-    r.height = w->shadow_height;
     return XFixesCreateRegion (dpy, &r, 1);
 }
 
@@ -379,23 +420,46 @@ paint_all (Display *dpy, XserverRegion region)
     win        *w;
     win        *t = 0;
     
+    if (!region)
+    {
+       XRectangle  r;
+       r.x = 0;
+       r.y = 0;
+       r.width = root_width;
+       r.height = root_height;
+       region = XFixesCreateRegion (dpy, &r, 1);
+    }
+    if (!rootBuffer)
+    {
+       Pixmap  rootPixmap = XCreatePixmap (dpy, root, root_width, root_height,
+                                           DefaultDepth (dpy, scr));
+       rootBuffer = XRenderCreatePicture (dpy, rootPixmap,
+                                          XRenderFindVisualFormat (dpy,
+                                                                   DefaultVisual (dpy, scr)),
+                                          0, 0);
+       XFreePixmap (dpy, rootPixmap);
+    }
+    XFixesSetPictureClipRegion (dpy, rootPicture, 0, 0, region);
     for (w = list; w; w = w->next)
     {
        Picture mask;
        
        if (w->a.map_state != IsViewable)
            continue;
+       if (!w->picture)
+           continue;
+       
        if (w->borderSize)
            XFixesDestroyRegion (dpy, w->borderSize);
        w->borderSize = border_size (dpy, w);
        if (w->extents)
            XFixesDestroyRegion (dpy, w->extents);
        w->extents = win_extents (dpy, w);
-       if (w->mode != WINDOW_TRANS)
+       if (w->mode == WINDOW_SOLID)
        {
-           XFixesSetPictureClipRegion (dpy, rootPicture, 0, 0, region);
+           XFixesSetPictureClipRegion (dpy, rootBuffer, 0, 0, region);
            XFixesSubtractRegion (dpy, region, region, 0, 0, w->borderSize, 0, 0);
-           XRenderComposite (dpy, PictOpSrc, w->picture, None, rootPicture,
+           XRenderComposite (dpy, PictOpSrc, w->picture, None, rootBuffer,
                              0, 0, 0, 0, 
                              w->a.x + w->a.border_width,
                              w->a.y + w->a.border_width,
@@ -407,21 +471,28 @@ paint_all (Display *dpy, XserverRegion region)
        w->prev_trans = t;
        t = w;
     }
-    XFixesSetPictureClipRegion (dpy, rootPicture, 0, 0, region);
+    XFixesSetPictureClipRegion (dpy, rootBuffer, 0, 0, region);
     paint_root (dpy);
     for (w = t; w; w = w->prev_trans)
     {
-       XFixesSetPictureClipRegion (dpy, rootPicture, 0, 0, w->borderClip);
+       XFixesSetPictureClipRegion (dpy, rootBuffer, 0, 0, w->borderClip);
        if (w->shadow)
        {
-           XRenderComposite (dpy, PictOpOver, w->shadow, None, rootPicture,
+           XRenderComposite (dpy, PictOpOver, blackPicture, w->shadow, rootBuffer,
                              0, 0, 0, 0,
                              w->a.x + w->a.border_width + w->shadow_dx,
                              w->a.y + w->a.border_width + w->shadow_dy,
                              w->shadow_width, w->shadow_height);
        }
        if (w->mode == WINDOW_TRANS)
-           XRenderComposite (dpy, PictOpOver, w->picture, transPicture, rootPicture,
+           XRenderComposite (dpy, PictOpOver, w->picture, transPicture, rootBuffer,
+                             0, 0, 0, 0, 
+                             w->a.x + w->a.border_width,
+                             w->a.y + w->a.border_width,
+                             w->a.width,
+                             w->a.height);
+       else if (w->mode == WINDOW_ARGB)
+           XRenderComposite (dpy, PictOpOver, w->picture, None, rootBuffer,
                              0, 0, 0, 0, 
                              w->a.x + w->a.border_width,
                              w->a.y + w->a.border_width,
@@ -431,6 +502,9 @@ paint_all (Display *dpy, XserverRegion region)
        w->borderClip = None;
     }
     XFixesDestroyRegion (dpy, region);
+    XFixesSetPictureClipRegion (dpy, rootBuffer, 0, 0, None);
+    XRenderComposite (dpy, PictOpSrc, rootBuffer, None, rootPicture,
+                     0, 0, 0, 0, 0, 0, root_width, root_height);
 }
 
 void
@@ -470,9 +544,12 @@ map_win (Display *dpy, Window id)
     if (!w)
        return;
     w->a.map_state = IsViewable;
-    w->damage = XDamageCreate (dpy, id, XDamageReportNonEmpty);
-    region = win_extents (dpy, w);
-    add_damage (dpy, region);
+    if (w->picture)
+    {
+       w->damage = XDamageCreate (dpy, id, XDamageReportNonEmpty);
+       region = win_extents (dpy, w);
+       add_damage (dpy, region);
+    }
 }
 
 void
@@ -498,10 +575,11 @@ unmap_win (Display *dpy, Window id)
 void
 add_win (Display *dpy, Window id, Window prev)
 {
-    win        *new = malloc (sizeof (win));
-    win        **p;
-    XWindowAttributes a;
-    XRenderPictureAttributes pa;
+    win                                *new = malloc (sizeof (win));
+    win                                **p;
+    XWindowAttributes          a;
+    XRenderPictureAttributes   pa;
+    XRenderPictFormat          *format;
     
     if (!new)
        return;
@@ -522,19 +600,29 @@ add_win (Display *dpy, Window id, Window prev)
     new->damaged = 0;
     new->damage = None;
     pa.subwindow_mode = IncludeInferiors;
-    new->picture = XRenderCreatePicture (dpy, id,
-                                        XRenderFindVisualFormat (dpy, 
-                                                                 new->a.visual),
-                                        CPSubwindowMode,
-                                        &pa);
+    if (new->a.class == InputOnly)
+    {
+       new->picture = 0;
+       format = 0;
+    }
+    else
+    {
+       format = XRenderFindVisualFormat (dpy, new->a.visual);
+       new->picture = XRenderCreatePicture (dpy, id,
+                                            format,
+                                            CPSubwindowMode,
+                                            &pa);
+    }
                                         
     new->shadow = None;
     new->borderSize = None;
     new->extents = None;
-    if (new->a.override_redirect)
+    if (format && format->type == PictTypeDirect && format->direct.alphaMask)
+       new->mode = WINDOW_ARGB;
+    else if (new->a.override_redirect)
        new->mode = WINDOW_TRANS;
     else
-       new->mode = WINDOW_DROP;
+       new->mode = WINDOW_SOLID;
     new->next = *p;
     *p = new;
     if (new->a.map_state == IsViewable)
@@ -549,7 +637,19 @@ configure_win (Display *dpy, XConfigureEvent *ce)
     XserverRegion   damage = None;
     
     if (!w)
+    {
+       if (ce->window == root)
+       {
+           if (rootBuffer)
+           {
+               XRenderFreePicture (dpy, rootBuffer);
+               rootBuffer = None;
+           }
+           root_width = ce->width;
+           root_height = ce->height;
+       }
        return;
+    }
     if (w->a.map_state == IsViewable)
     {
        damage = XFixesCreateRegion (dpy, 0, 0);
@@ -593,8 +693,9 @@ configure_win (Display *dpy, XConfigureEvent *ce)
     }
     if (damage)
     {
-       XserverRegion   border = border_size (dpy, w);
-       XFixesUnionRegion (dpy, damage, damage, 0, 0, border, 0, 0);
+       XserverRegion   extents = win_extents (dpy, w);
+       XFixesUnionRegion (dpy, damage, damage, 0, 0, extents, 0, 0);
+       XFixesDestroyRegion (dpy, extents);
        add_damage (dpy, damage);
     }
 }
@@ -610,7 +711,8 @@ destroy_win (Display *dpy, Window id, Bool gone)
            if (!gone)
            {
                unmap_win (dpy, id);
-               XRenderFreePicture (dpy, w->picture);
+               if (w->picture)
+                   XRenderFreePicture (dpy, w->picture);
            }
            *prev = w->next;
            free (w);
@@ -656,6 +758,17 @@ expose_root (Display *dpy, Window root, XRectangle *rects, int nrects)
     add_damage (dpy, region);
 }
 
+int
+time_in_millis ()
+{
+    struct timeval  tp;
+
+    gettimeofday (&tp, 0);
+    return(tp.tv_sec * 1000) + (tp.tv_usec / 1000);
+}
+
+#define INTERVAL    0
+
 main ()
 {
     XEvent         ev;
@@ -663,6 +776,7 @@ main ()
     Window         root_return, parent_return;
     Window         *children;
     Pixmap         transPixmap;
+    Pixmap         blackPixmap;
     unsigned int    nchildren;
     int                    i;
     int                    damage_event, damage_error;
@@ -673,6 +787,13 @@ main ()
     GC             gc;
     int                    size_expose = 0;
     int                    n_expose = 0;
+    struct pollfd   ufd;
+    int                    n;
+    int                    last_update;
+    int                    now;
+#if INTERVAL
+    int                    timeout;
+#endif
 
     dpy = XOpenDisplay (0);
     if (!dpy)
@@ -684,6 +805,9 @@ main ()
     scr = DefaultScreen (dpy);
     root = RootWindow (dpy, scr);
     pa.subwindow_mode = IncludeInferiors;
+
+    gussianMap = make_gaussian_map(dpy, SHADOW_RADIUS);
+
     transPixmap = XCreatePixmap (dpy, root, 1, 1, 8);
     pa.repeat = True;
     transPicture = XRenderCreatePicture (dpy, transPixmap,
@@ -694,41 +818,70 @@ main ()
     c.alpha = 0xc0c0;
     XRenderFillRectangle (dpy, PictOpSrc, transPicture, &c, 0, 0, 1, 1);
     
+    root_width = DisplayWidth (dpy, scr);
+    root_height = DisplayHeight (dpy, scr);
+    
     rootPicture = XRenderCreatePicture (dpy, root, 
                                        XRenderFindVisualFormat (dpy,
                                                                 DefaultVisual (dpy, scr)),
                                        CPSubwindowMode,
                                        &pa);
+    blackPixmap = XCreatePixmap (dpy, root, 1, 1, 32);
+    pa.repeat = True;
+    blackPicture = XRenderCreatePicture (dpy, blackPixmap,
+                                        XRenderFindStandardFormat (dpy, PictStandardARGB32),
+                                        CPRepeat,
+                                        &pa);
+    c.red = c.green = c.blue = 0;
+    c.alpha = 0xffff;
+    XRenderFillRectangle (dpy, PictOpSrc, blackPicture, &c, 0, 0, 1, 1);
     if (!XCompositeQueryExtension (dpy, &event_base, &error_base))
     {
        fprintf (stderr, "No composite extension\n");
        exit (1);
     }
+    printf ("Composite error %d\n", error_base);
     if (!XDamageQueryExtension (dpy, &damage_event, &damage_error))
     {
        fprintf (stderr, "No damage extension\n");
        exit (1);
     }
+    printf ("Damage error %d\n", damage_error);
     if (!XFixesQueryExtension (dpy, &xfixes_event, &xfixes_error))
     {
        fprintf (stderr, "No XFixes extension\n");
        exit (1);
     }
+    printf ("XFixes error %d\n", xfixes_error);
     allDamage = None;
     XGrabServer (dpy);
     XCompositeRedirectSubwindows (dpy, root, CompositeRedirectManual);
-    paint_root (dpy);
-    XSelectInput (dpy, root, SubstructureNotifyMask|ExposureMask);
+    XSelectInput (dpy, root, 
+                 SubstructureNotifyMask|
+                 ExposureMask|
+                 StructureNotifyMask|
+                 PropertyChangeMask);
     XQueryTree (dpy, root, &root_return, &parent_return, &children, &nchildren);
     for (i = 0; i < nchildren; i++)
        add_win (dpy, children[i], i ? children[i-1] : None);
     XFree (children);
     XUngrabServer (dpy);
+    paint_all (dpy, None);
+#if INTERVAL
+    last_update = time_in_millis ();
+#endif
     for (;;)
     {
+#if INTERVAL
+       int busy_start = 0;
+#endif
 /*     dump_wins (); */
        do {
            XNextEvent (dpy, &ev);
+#if INTERVAL
+           if (!busy_start)
+               busy_start = time_in_millis();
+#endif
 /*         printf ("event %d\n", ev.type); */
            switch (ev.type) {
            case CreateNotify:
@@ -783,14 +936,43 @@ main ()
                    }
                }
                break;
+           case PropertyNotify:
+               if (ev.xproperty.atom == XInternAtom (dpy, BACKGROUND_PROP, False))
+               {
+                   if (rootTile)
+                   {
+                       XClearArea (dpy, root, 0, 0, 0, 0, True);
+                       XRenderFreePicture (dpy, rootTile);
+                       rootTile = None;
+                   }
+               }
+               break;
            default:
                if (ev.type == damage_event + XDamageNotify)
                    damage_win (dpy, (XDamageNotifyEvent *) &ev);
                break;
            }
        } while (XEventsQueued (dpy, QueuedAfterReading));
+#if INTERVAL
+       now = time_in_millis ();
+/*     printf ("\t\tbusy %d\n", now - busy_start); */
+       timeout = INTERVAL - (now - last_update);
+       if (timeout > 0)
+       {
+           ufd.fd = ConnectionNumber (dpy);
+           ufd.events = POLLIN;
+           n = poll (&ufd, 1, timeout);
+           if (n > 0 && (ufd.revents & POLLIN) && XEventsQueued (dpy, QueuedAfterReading))
+               continue;
+       }
+#endif
        if (allDamage)
        {
+#if INTERVAL
+           int old_update = last_update;
+           last_update = time_in_millis();
+/*         printf ("delta %d\n", last_update - old_update); */
+#endif
            paint_all (dpy, allDamage);
            allDamage = None;
        }