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

   1 /* -*- indent-tabs-mode: nil; tab-width: 4; c-basic-offset: 4; -*-
   2
   3    test.c for the Openbox window manager
   4    Copyright (c) 2006        Mikael Magnusson
   5    Copyright (c) 2003-2007   Dana Jansens
   6    Copyright (c) 2003        Derek Foreman
   7
   8    This program is free software; you can redistribute it and/or modify
   9    it under the terms of the GNU General Public License as published by
  10    the Free Software Foundation; either version 2 of the License, or
  11    (at your option) any later version.
  12
  13    This program is distributed in the hope that it will be useful,
  14    but WITHOUT ANY WARRANTY; without even the implied warranty of
  15    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  16    GNU General Public License for more details.
  17
  18    See the COPYING file for a copy of the GNU General Public License.
  19 */
  20
  21 #include <stdio.h>
  22 #include <X11/Xlib.h>
  23 #include <X11/Xutil.h>
  24 #include <X11/extensions/shape.h>
  25 #include <string.h>
  26 #include <stdlib.h>
  27 #include "render.h"
  28 #include <glib.h>
  29
  30 static gint x_error_handler(Display * disp, XErrorEvent * error)
  31 {
  32     gchar buf[1024];
  33     XGetErrorText(disp, error->error_code, buf, 1024);
  34     printf("%s\n", buf);
  35     return 0;
  36 }
  37
  38 Display *ob_display;
  39 gint ob_screen;
  40 Window ob_root;
  41
  42 gint main()
  43 {
  44     Window win;
  45     RrInstance *inst;
  46     RrAppearance *look;
  47
  48     Window root;
  49     XEvent report;
  50     gint h = 500, w = 500;
  51
  52     ob_display = XOpenDisplay(NULL);
  53     XSetErrorHandler(x_error_handler);
  54     ob_screen = DefaultScreen(ob_display);
  55     ob_root = RootWindow(ob_display, ob_screen);
  56     win =
  57         XCreateWindow(ob_display, RootWindow(ob_display, 0),
  58                       10, 10, w, h, 10,
  59                       CopyFromParent,    /* depth */
  60                       CopyFromParent,    /* class */
  61                       CopyFromParent,    /* visual */
  62                       0,                    /* valuemask */
  63                       0);                    /* attributes */
  64     XMapWindow(ob_display, win);
  65     XSelectInput(ob_display, win, ExposureMask | StructureNotifyMask);
  66     root = RootWindow (ob_display, DefaultScreen (ob_display));
  67     inst = RrInstanceNew(ob_display, ob_screen);
  68
  69     look = RrAppearanceNew(inst, 0);
  70     look->surface.grad = RR_SURFACE_PYRAMID;
  71     look->surface.secondary = RrColorParse(inst, "Yellow");
  72     look->surface.primary = RrColorParse(inst, "Blue");
  73     look->surface.interlaced = FALSE;
  74     if (ob_display == NULL) {
  75         fprintf(stderr, "couldn't connect to X server :0\n");
  76         return 0;
  77     }
  78
  79     RrPaint(look, win, w, h);
  80     while (1) {
  81         XNextEvent(ob_display, &report);
  82         switch (report.type) {
  83         case Expose:
  84             break;
  85         case ConfigureNotify:
  86             RrPaint(look, win,
  87                     report.xconfigure.width,
  88                     report.xconfigure.height);
  89             break;
  90         }
  91
  92     }
  93
  94     RrAppearanceFree (look);
  95     RrInstanceFree (inst);
  96
  97     return 1;
  98 }