Dogcows Code - chaz/openbox/blob - render/test.c

   1 #include <stdio.h>
   2 #include <X11/Xlib.h>
   3 #include <X11/Xutil.h>
   4 #include <X11/extensions/shape.h>
   5 #include <string.h>
   6 #include <stdlib.h>
   7 #include "render.h"
   8 #include <glib.h>
   9
  10 static int x_error_handler(Display * disp, XErrorEvent * error)
  11 {
  12         char buf[1024];
  13         XGetErrorText(disp, error->error_code, buf, 1024);
  14         printf("%s\n", buf);
  15         return 0;
  16 }
  17
  18 Display *ob_display;
  19 int ob_screen;
  20 Window ob_root;
  21
  22 int main()
  23 {
  24         Window win;
  25         RrInstance *inst;
  26         RrAppearance *look;
  27
  28         Window root;
  29         XEvent report;
  30         int h = 500, w = 500;
  31
  32         ob_display = XOpenDisplay(NULL);
  33         XSetErrorHandler(x_error_handler);
  34         ob_screen = DefaultScreen(ob_display);
  35         ob_root = RootWindow(ob_display, ob_screen);
  36         win =
  37             XCreateWindow(ob_display, RootWindow(ob_display, 0),
  38                           10, 10, w, h, 10,
  39                           CopyFromParent,       /* depth */
  40                           CopyFromParent,       /* class */
  41                           CopyFromParent,       /* visual */
  42                           0,                    /* valuemask */
  43                           0);                   /* attributes */
  44         XMapWindow(ob_display, win);
  45         XSelectInput(ob_display, win, ExposureMask | StructureNotifyMask);
  46         root = RootWindow (ob_display, DefaultScreen (ob_display));
  47         inst = RrInstanceNew(ob_display, ob_screen);
  48
  49         look = RrAppearanceNew(inst, 0);
  50         look->surface.grad = RR_SURFACE_PYRAMID;
  51         look->surface.secondary = RrColorParse(inst, "Yellow");
  52         look->surface.primary = RrColorParse(inst, "Blue");
  53         look->surface.interlaced = FALSE;
  54         if (ob_display == NULL) {
  55                 fprintf(stderr, "couldn't connect to X server :0\n");
  56                 return 0;
  57         }
  58
  59         RrPaint(look, win, w, h);
  60         while (1) {
  61                 XNextEvent(ob_display, &report);
  62                 switch (report.type) {
  63                 case Expose:
  64                 break;
  65                 case ConfigureNotify:
  66                     RrPaint(look, win,
  67                             report.xconfigure.width,
  68                             report.xconfigure.height);
  69                 break;
  70                 }
  71
  72         }
  73
  74         RrAppearanceFree (look);
  75         RrInstanceFree (inst);
  76
  77         return 1;
  78 }