git.hungrycats.org Git - xscreensaver/blob - hacks/wander.c

   1 /* wander, by Rick Campbell <rick@campbellcentral.org>, 19 December 1998.
   2  *
   3  * Permission to use, copy, modify, distribute, and sell this software and its
   4  * documentation for any purpose is hereby granted without fee, provided that
   5  * the above copyright notice appear in all copies and that both that
   6  * copyright notice and this permission notice appear in supporting
   7  * documentation.  No representations are made about the suitability of this
   8  * software for any purpose.  It is provided "as is" without express or
   9  * implied warranty.
  10  */
  11
  12 #include <stdio.h>
  13
  14 #include "screenhack.h"
  15 #include "colors.h"
  16 #include "erase.h"
  17
  18 #define MAXIMUM_COLOR_COUNT (256)
  19
  20 struct state {
  21   Display *dpy;
  22   Window window;
  23
  24    unsigned int advance;
  25    Bool         circles;
  26    Colormap     color_map;
  27    int          color_count;
  28    int          color_index;
  29    XColor       colors      [MAXIMUM_COLOR_COUNT];
  30    GC           context;
  31    unsigned int density;
  32    int          depth;
  33    int          height;
  34    unsigned int length;
  35    unsigned int reset;
  36    Bool reset_p;
  37    unsigned int size;
  38    int          width;
  39    int delay;
  40
  41   int x, y, last_x, last_y, width_1, height_1, length_limit, reset_limit;
  42   unsigned long color;
  43   Pixmap pixmap;
  44
  45   eraser_state *eraser;
  46 };
  47
  48
  49 static void *
  50 wander_init (Display *dpy, Window window)
  51 {
  52     struct state *st = (struct state *) calloc (1, sizeof(*st));
  53     XGCValues values;
  54     XWindowAttributes attributes;
  55
  56     st->dpy = dpy;
  57     st->window = window;
  58     st->delay = get_integer_resource (st->dpy, "delay", "Integer");
  59
  60     XClearWindow (st->dpy, st->window);
  61     XGetWindowAttributes (st->dpy, st->window, &attributes);
  62     st->width = attributes.width;
  63     st->height = attributes.height;
  64     st->depth = attributes.depth;
  65     st->color_map = attributes.colormap;
  66     if (st->color_count)
  67     {
  68         free_colors (attributes.screen, st->color_map,
  69                      st->colors, st->color_count);
  70         st->color_count = 0;
  71     }
  72     st->context = XCreateGC (st->dpy, st->window, 0, &values);
  73     st->color_count = MAXIMUM_COLOR_COUNT;
  74     make_color_loop (attributes.screen, attributes.visual, st->color_map,
  75                     0,   1, 1,
  76                     120, 1, 1,
  77                     240, 1, 1,
  78                     st->colors, &st->color_count, True, False);
  79     if (st->color_count <= 0)
  80     {
  81         st->color_count = 2;
  82         st->colors [0].red = st->colors [0].green = st->colors [0].blue = 0;
  83         st->colors [1].red = st->colors [1].green = st->colors [1].blue = 0xFFFF;
  84         XAllocColor (st->dpy, st->color_map, &st->colors [0]);
  85         XAllocColor (st->dpy, st->color_map, &st->colors [1]);
  86     }
  87     st->color_index = random () % st->color_count;
  88
  89     st->advance = get_integer_resource (st->dpy, "advance", "Integer");
  90     st->density = get_integer_resource (st->dpy, "density", "Integer");
  91     if (st->density < 1) st->density = 1;
  92     st->reset = get_integer_resource (st->dpy, "reset", "Integer");
  93     if (st->reset < 100) st->reset = 100;
  94     st->circles = get_boolean_resource (st->dpy, "circles", "Boolean");
  95     st->size = get_integer_resource (st->dpy, "size", "Integer");
  96     if (st->size < 1) st->size = 1;
  97     st->width = st->width / st->size;
  98     st->height = st->height / st->size;
  99     st->length = get_integer_resource (st->dpy, "length", "Integer");
 100     if (st->length < 1) st->length = 1;
 101     XSetForeground (st->dpy, st->context, st->colors [st->color_index].pixel);
 102
 103
 104     st->x = random () % st->width;
 105     st->y = random () % st->height;
 106     st->last_x = st->x;
 107     st->last_y = st->y;
 108     st->width_1 = st->width - 1;
 109     st->height_1 = st->height - 1;
 110     st->length_limit = st->length;
 111     st->reset_limit = st->reset;
 112     st->color_index = random () % st->color_count;
 113     st->color = st->colors [random () % st->color_count].pixel;
 114     st->pixmap = XCreatePixmap (st->dpy, window, st->size,
 115                             st->size, st->depth);
 116
 117     XSetForeground (st->dpy, st->context,
 118                     BlackPixel (st->dpy, DefaultScreen (st->dpy)));
 119     XFillRectangle (st->dpy, st->pixmap, st->context, 0, 0,
 120                     st->width * st->size, st->height * st->size);
 121     XSetForeground (st->dpy, st->context, st->color);
 122     XFillArc (st->dpy, st->pixmap, st->context, 0, 0, st->size, st->size, 0, 360*64);
 123
 124     return st;
 125 }
 126
 127
 128 static unsigned long
 129 wander_draw (Display *dpy, Window window, void *closure)
 130 {
 131   struct state *st = (struct state *) closure;
 132   int i;
 133
 134   if (st->eraser) {
 135     st->eraser = erase_window (st->dpy, st->window, st->eraser);
 136     goto END;
 137   }
 138
 139   for (i = 0; i < 2000; i++)
 140     {
 141       if (random () % st->density)
 142         {
 143           st->x = st->last_x;
 144           st->y = st->last_y;
 145         }
 146       else
 147         {
 148           st->last_x = st->x;
 149           st->last_y = st->y;
 150           st->x = (st->x + st->width_1  + (random () % 3)) % st->width;
 151           st->y = (st->y + st->height_1 + (random () % 3)) % st->height;
 152         }
 153
 154       if ((random () % st->length_limit) == 0)
 155         {
 156           if (st->advance == 0)
 157             {
 158               st->color_index = random () % st->color_count;
 159             }
 160           else
 161             {
 162               st->color_index = (st->color_index + st->advance) % st->color_count;
 163             }
 164           st->color = st->colors [st->color_index].pixel;
 165           XSetForeground (st->dpy, st->context, st->color);
 166           if (st->circles)
 167             {
 168               XFillArc (st->dpy, st->pixmap, st->context,
 169                         0, 0, st->size, st->size, 0, 360 * 64);
 170             }
 171         }
 172
 173       if (st->reset_p || (random () % st->reset_limit) == 0)
 174         {
 175           st->reset_p = 0;
 176           st->eraser = erase_window (st->dpy, st->window, st->eraser);
 177           st->color = st->colors [random () % st->color_count].pixel;
 178           st->x = random () % st->width;
 179           st->y = random () % st->height;
 180           st->last_x = st->x;
 181           st->last_y = st->y;
 182           if (st->circles)
 183             {
 184               XFillArc (st->dpy, st->pixmap, st->context, 0, 0, st->size, st->size, 0, 360*64);
 185             }
 186         }
 187
 188       if (st->size == 1)
 189         {
 190           XDrawPoint (st->dpy, st->window, st->context, st->x, st->y);
 191         }
 192       else
 193         {
 194           if (st->circles)
 195             {
 196               XCopyArea (st->dpy, st->pixmap, st->window, st->context, 0, 0, st->size, st->size,
 197                          st->x * st->size, st->y * st->size);
 198             }
 199           else
 200             {
 201               XFillRectangle (st->dpy, st->window, st->context, st->x * st->size, st->y * st->size,
 202                               st->size, st->size);
 203             }
 204         }
 205     }
 206
 207  END:
 208   return st->delay;
 209 }
 210
 211
 212 static void
 213 wander_reshape (Display *dpy, Window window, void *closure,
 214                  unsigned int w, unsigned int h)
 215 {
 216   struct state *st = (struct state *) closure;
 217   st->width  = w / st->size;
 218   st->height = h / st->size;
 219   st->width_1  = st->width - 1;
 220   st->height_1 = st->height - 1;
 221 }
 222
 223 static Bool
 224 wander_event (Display *dpy, Window window, void *closure, XEvent *event)
 225 {
 226   struct state *st = (struct state *) closure;
 227   if (screenhack_event_helper (dpy, window, event))
 228     {
 229       st->reset_p = 1;
 230       return True;
 231     }
 232   return False;
 233 }
 234
 235 static void
 236 wander_free (Display *dpy, Window window, void *closure)
 237 {
 238 }
 239
 240 static const char *wander_defaults [] =
 241 {
 242     ".background: black",
 243     ".foreground: white",
 244     ".fpsSolid:   true",
 245     ".advance:    1",
 246     ".density:    2",
 247     ".length:     25000",
 248     ".delay:      20000",
 249     ".reset:      2500000",
 250     ".circles:    False",
 251     ".size:       1",
 252 #ifdef USE_IPHONE
 253   "*ignoreRotation: True",
 254 #endif
 255     0
 256 };
 257
 258 static XrmOptionDescRec wander_options [] =
 259 {
 260     { "-advance", ".advance", XrmoptionSepArg, 0 },
 261     { "-circles", ".circles",   XrmoptionNoArg, "True" },
 262     { "-no-circles",".circles", XrmoptionNoArg, "False" },
 263     { "-density", ".density", XrmoptionSepArg, 0 },
 264     { "-length",  ".length",  XrmoptionSepArg, 0 },
 265     { "-delay",   ".delay",   XrmoptionSepArg, 0 },
 266     { "-reset",   ".reset",   XrmoptionSepArg, 0 },
 267     { "-size",    ".size",    XrmoptionSepArg, 0 },
 268     { 0, 0, 0, 0 }
 269 };
 270
 271
 272 XSCREENSAVER_MODULE ("Wander", wander)