http://ftp.x.org/contrib/applications/xscreensaver-2.16.tar.gz
[xscreensaver] / utils / erase.c
index 72f5a87a469b3d6129dadb55ed0ac47cd5b477ce..874ed925c8d1a40e24dc9ecf7132ac68b640063e 100644 (file)
 #include "usleep.h"
 #include "resources.h"
 
-#define NUM_MODES 8
+#undef countof
+#define countof(x) (sizeof(x)/sizeof(*(x)))
 
-void
-erase_window(Display *dpy, Window window, GC gc,
-            int width, int height, int mode, int delay)
+typedef void (*Eraser) (Display *dpy, Window window, GC gc,
+                       int width, int height, int delay, int granularity);
+
+
+static void
+random_lines (Display *dpy, Window window, GC gc,
+             int width, int height, int delay, int granularity)
+{
+  Bool horiz_p = (random() & 1);
+  int max = (horiz_p ? height : width);
+  int *lines = (int *) calloc(max, sizeof(*lines));
+  int i;
+
+  for (i = 0; i < max; i++)
+    lines[i] = i;
+
+  for (i = 0; i < max; i++)
+    {
+      int t, r;
+      t = lines[i];
+      r = random() % max;
+      lines[i] = lines[r];
+      lines[r] = t;
+    }
+
+  for (i = 0; i < max; i++)
+    { 
+      if (horiz_p)
+       XDrawLine (dpy, window, gc, 0, lines[i], width, lines[i]);
+      else
+       XDrawLine (dpy, window, gc, lines[i], 0, lines[i], height);
+
+      XSync (dpy, False);
+      if (delay > 0 && ((i % granularity) == 0))
+       usleep (delay * granularity);
+    }
+  free(lines);
+}
+
+
+static void
+venetian (Display *dpy, Window window, GC gc,
+         int width, int height, int delay, int granularity)
+{
+  Bool horiz_p = (random() & 1);
+  Bool flip_p = (random() & 1);
+  int max = (horiz_p ? height : width);
+  int *lines = (int *) calloc(max, sizeof(*lines));
+  int i, j;
+
+  granularity /= 6;
+
+  j = 0;
+  for (i = 0; i < max*2; i++)
+    {
+      int line = ((i / 16) * 16) - ((i % 16) * 15);
+      if (line >= 0 && line < max)
+       lines[j++] = (flip_p ? max - line : line);
+    }
+
+  for (i = 0; i < max; i++)
+    { 
+      if (horiz_p)
+       XDrawLine (dpy, window, gc, 0, lines[i], width, lines[i]);
+      else
+       XDrawLine (dpy, window, gc, lines[i], 0, lines[i], height);
+
+      XSync (dpy, False);
+      if (delay > 0 && ((i % granularity) == 0))
+       usleep (delay * granularity);
+    }
+  free(lines);
+}
+
+
+static void
+triple_wipe (Display *dpy, Window window, GC gc,
+            int width, int height, int delay, int granularity)
 {
-  int *clear_lines;
-  int i, j, line, num_lines=0, granularity, max_num;
+  Bool flip_x = random() & 1;
+  Bool flip_y = random() & 1;
+  int max = width + (height / 2);
+  int *lines = (int *)calloc(max, sizeof(int));
+  int i;
+
+  for(i = 0; i < width/2; i++)
+    lines[i] = i*2+height;
+  for(i = 0; i < height/2; i++)
+    lines[i+width/2] = i*2;
+  for(i = 0; i < width/2; i++)
+    lines[i+width/2+height/2] = width-i*2-(width%2?0:1)+height;
+
+  granularity /= 6;
 
-  max_num = 2*height;
-  if(2*width>max_num)
-    max_num = 2*width;
+  for (i = 0; i < max; i++)
+    { 
+      int x, y, x2, y2;
+      if (lines[i] < height)
+       x = 0, y = lines[i], x2 = width, y2 = y;
+      else
+       x = lines[i]-height, y = 0, x2 = x, y2 = height;
 
-  clear_lines = (int *)calloc(max_num, sizeof(int));
-  if(clear_lines)
+      if (flip_x)
+       x = width-x, x2 = width-x2;
+      if (flip_y)
+       y = height-y, y2 = height-y2;
+
+      XDrawLine (dpy, window, gc, x, y, x2, y2);
+      XSync (dpy, False);
+      if (delay > 0 && ((i % granularity) == 0))
+       usleep (delay*granularity);
+    }
+  free(lines);
+}
+
+
+static void
+quad_wipe (Display *dpy, Window window, GC gc,
+          int width, int height, int delay, int granularity)
+{
+  Bool flip_x = random() & 1;
+  Bool flip_y = random() & 1;
+  int max = width + height;
+  int *lines = (int *)calloc(max, sizeof(int));
+  int i;
+
+  granularity /= 3;
+
+  for (i = 0; i < max/4; i++)
     {
-      if(mode<0 || mode>=NUM_MODES)
-       mode = random()%NUM_MODES;
-      granularity = 25;
-      switch(mode)
-       {
-       case 0:                         /* clear random horizontal lines */
-         for(i = 0; i < height; i++)
-           clear_lines[i] = i;
-         for(i = 0; i < height; i++)
-           {
-             int t, r;
-             t = clear_lines[i];
-             r = random()%height;
-             clear_lines[i] = clear_lines[r];
-             clear_lines[r] = t;
-           }
-         num_lines = height;
-         break;
-
-       case 1:                         /* clear random vertical lines */
-         for(i = 0; i < width; i++)
-           clear_lines[i] = i+height;
-         for(i = 0; i < width; i++)
-           {
-             int t, r;
-             t = clear_lines[i];
-             r = random()%width;
-             clear_lines[i] = clear_lines[r];
-             clear_lines[r] = t;
-           }
-         num_lines = width;
-         break;
-
-       case 2:                                 /* 4 sequential wipes,
-                                                  L-R, T-B, R-L, B-T. */
-         for(i = 0; i < width/2; i++)
-           clear_lines[i] = i*2+height;
-         for(i = 0; i < height/2; i++)
-           clear_lines[i+width/2] = i*2;
-         for(i = 0; i < width/2; i++)
-           clear_lines[i+width/2+height/2] = width-i*2-(width%2?0:1)+height;
-         num_lines = width+height/2;
-         granularity = 4;
-         break;
-
-       case 3:                                 /* 4 parallel wipes,
-                                                  L-R, T-B, R-L, B-T. */
-         for(i = 0; i < max_num/4; i++)
-           {
-             clear_lines[i*4] = i*2;
-             clear_lines[i*4+1] = height-i*2-(height%2?0:1);
-             clear_lines[i*4+2] = height+i*2;
-             clear_lines[i*4+3] = height+width-i*2-(width%2?0:1);
-           }
-         num_lines = max_num;
-         granularity = 4;
-         break;
-
-       case 4:                                 /* flutter wipe L-R */
-         j = 0;
-         for(i = 0; i < width*2; i++)
-           {
-             line = (i/16)*16-(i%16)*15;
-             if(line>=0 && line<width)
-               {
-                 clear_lines[j] = height+line;
-                 j++;
-               }
-           }
-         num_lines = width;
-         granularity = 4;
-         break;
-
-       case 5:                                 /* flutter wipe R-L */
-         j = 0;
-         for(i = width*2; i >= 0; i--)
-           {
-             line = (i/16)*16-(i%16)*15;
-             if(line>=0 && line<width)
-               {
-                 clear_lines[j] = height+line;
-                 j++;
-               }
-           }
-         num_lines = width;
-         granularity = 4;
-         break;
-
-       case 6:                                 /* circle wipe */
-         {
-           int full = 360 * 64;
-           int inc = full / 64;
-           int start = random() % full;
-           int rad = (width > height ? width : height);
-           if (random() & 1)
-             inc = -inc;
-           for (i = (inc > 0 ? 0 : full);
-                (inc > 0 ? i < full : i > 0);
-                i += inc) {
-             XFillArc(dpy, window, gc,
-                      (width/2)-rad, (height/2)-rad, rad*2, rad*2,
-                      (i+start) % full, inc);
-             XFlush (dpy);
-             usleep (delay*granularity);
-           }
-         num_lines = 0;
-         }
-         break;
-
-       case 7:                                 /* three-circle wipe */
-         {
-           int full = 360 * 64;
-           int q = full / 3;
-           int inc = full / 180;
-           int start = random() % q;
-           int rad = (width > height ? width : height);
-           if (random() & 1)
-             inc = -inc;
-           for (i = (inc > 0 ? 0 : q);
-                (inc > 0 ? i < q : i > 0);
-                i += inc) {
-             XFillArc(dpy, window, gc,
-                      (width/2)-rad, (height/2)-rad, rad*2, rad*2,
-                      (i+start) % full, inc);
-             XFillArc(dpy, window, gc,
-                      (width/2)-rad, (height/2)-rad, rad*2, rad*2,
-                      (i+start+q) % full, inc);
-             XFillArc(dpy, window, gc,
-                      (width/2)-rad, (height/2)-rad, rad*2, rad*2,
-                      (i+start+q+q) % full, inc);
-             XFlush (dpy);
-             usleep (delay*granularity);
-           }
-         num_lines = 0;
-         }
-         break;
-
-       default:
-         abort();
-         break;
-       }
-
-      for (i = 0; i < num_lines; i++)
-       { 
-         if(clear_lines[i] < height)
-           XDrawLine (dpy, window, gc, 0, clear_lines[i], width, 
-                      clear_lines[i]);
-         else
-           XDrawLine (dpy, window, gc, clear_lines[i]-height, 0,
-                      clear_lines[i]-height, height);
-         XFlush (dpy);
-         if ((i % granularity) == 0)
-           {
-             usleep (delay*granularity);
-           }
-       }
-      
-      free(clear_lines);
+      lines[i*4]   = i*2;
+      lines[i*4+1] = height-i*2-(height%2?0:1);
+      lines[i*4+2] = height+i*2;
+      lines[i*4+3] = height+width-i*2-(width%2?0:1);
     }
 
+  for (i = 0; i < max; i++)
+    { 
+      int x, y, x2, y2;
+      if (lines[i] < height)
+       x = 0, y = lines[i], x2 = width, y2 = y;
+      else
+       x = lines[i]-height, y = 0, x2 = x, y2 = height;
+
+      if (flip_x)
+       x = width-x, x2 = width-x2;
+      if (flip_y)
+       y = height-y, y2 = height-y2;
+
+      XDrawLine (dpy, window, gc, x, y, x2, y2);
+      XSync (dpy, False);
+      if (delay > 0 && ((i % granularity) == 0))
+       usleep (delay*granularity);
+    }
+  free(lines);
+}
+
+
+
+static void
+circle_wipe (Display *dpy, Window window, GC gc,
+            int width, int height, int delay, int granularity)
+{
+  int full = 360 * 64;
+  int inc = full / 64;
+  int start = random() % full;
+  int rad = (width > height ? width : height);
+  int i;
+  if (random() & 1)
+    inc = -inc;
+  for (i = (inc > 0 ? 0 : full);
+       (inc > 0 ? i < full : i > 0);
+       i += inc)
+    {
+      XFillArc(dpy, window, gc,
+              (width/2)-rad, (height/2)-rad, rad*2, rad*2,
+              (i+start) % full, inc);
+      XFlush (dpy);
+      usleep (delay*granularity);
+    }
+}
+
+
+static void
+three_circle_wipe (Display *dpy, Window window, GC gc,
+                  int width, int height, int delay, int granularity)
+{
+  int i;
+  int full = 360 * 64;
+  int q = full / 6;
+  int q2 = q * 2;
+  int inc = full / 240;
+  int start = random() % q;
+  int rad = (width > height ? width : height);
+
+  for (i = 0; i < q; i += inc)
+    {
+      XFillArc(dpy, window, gc, (width/2)-rad, (height/2)-rad, rad*2, rad*2,
+              (start+i) % full, inc);
+      XFillArc(dpy, window, gc, (width/2)-rad, (height/2)-rad, rad*2, rad*2,
+              (start-i) % full, -inc);
+
+      XFillArc(dpy, window, gc, (width/2)-rad, (height/2)-rad, rad*2, rad*2,
+              (start+q2+i) % full, inc);
+      XFillArc(dpy, window, gc, (width/2)-rad, (height/2)-rad, rad*2, rad*2,
+              (start+q2-i) % full, -inc);
+
+      XFillArc(dpy, window, gc, (width/2)-rad, (height/2)-rad, rad*2, rad*2,
+              (start+q2+q2+i) % full, inc);
+      XFillArc(dpy, window, gc, (width/2)-rad, (height/2)-rad, rad*2, rad*2,
+              (start+q2+q2-i) % full, -inc);
+
+      XSync (dpy, False);
+      usleep (delay*granularity);
+    }
+}
+
+
+static void
+squaretate (Display *dpy, Window window, GC gc,
+           int width, int height, int delay, int granularity)
+{
+  int steps = (((width > height ? width : width) * 2) / granularity);
+  int i;
+  Bool flip = random() & 1;
+
+#define DRAW() \
+      if (flip) { \
+       points[0].x = width-points[0].x; \
+       points[1].x = width-points[1].x; \
+        points[2].x = width-points[2].x; } \
+      XFillPolygon (dpy, window, gc, points, 3, Convex, CoordModeOrigin)
+
+  for (i = 0; i < steps; i++)
+    {
+      XPoint points [3];
+      points[0].x = 0;
+      points[0].y = 0;
+      points[1].x = width;
+      points[1].y = 0;
+      points[2].x = 0;
+      points[2].y = points[0].y + ((i * height) / steps);
+      DRAW();
+
+      points[0].x = 0;
+      points[0].y = 0;
+      points[1].x = 0;
+      points[1].y = height;
+      points[2].x = ((i * width) / steps);
+      points[2].y = height;
+      DRAW();
+
+      points[0].x = width;
+      points[0].y = height;
+      points[1].x = 0;
+      points[1].y = height;
+      points[2].x = width;
+      points[2].y = height - ((i * height) / steps);
+      DRAW();
+
+      points[0].x = width;
+      points[0].y = height;
+      points[1].x = width;
+      points[1].y = 0;
+      points[2].x = width - ((i * width) / steps);
+      points[2].y = 0;
+      DRAW();
+
+      XSync (dpy, True);
+      if (delay > 0)
+       usleep (delay * granularity);
+   }
+#undef DRAW
+}
+
+
+
+
+static Eraser erasers[] = {
+  random_lines,
+  venetian,
+  triple_wipe,
+  quad_wipe,
+  circle_wipe,
+  three_circle_wipe,
+  squaretate,
+};
+
+
+void
+erase_window(Display *dpy, Window window, GC gc,
+            int width, int height, int mode, int delay)
+{
+  int granularity = 25;
+
+  if (mode < 0 || mode >= countof(erasers))
+    mode = random() % countof(erasers);
+  (*(erasers[mode])) (dpy, window, gc, width, height, delay, granularity);
   XClearWindow (dpy, window);
   XSync(dpy, False);
 }
@@ -198,8 +323,23 @@ erase_full_window(Display *dpy, Window window)
   XGCValues gcv;
   GC erase_gc;
   XColor black;
-  int erase_speed = get_integer_resource("eraseSpeed", "Integer");
-  int erase_mode = get_integer_resource("eraseMode", "Integer");
+  int erase_speed, erase_mode;
+  char *s;
+
+  s = get_string_resource("eraseSpeed", "Integer");
+  if (s && *s)
+    erase_speed = get_integer_resource("eraseSpeed", "Integer");
+  else
+    erase_speed = 400;
+  if (s) free(s);
+
+  s = get_string_resource("eraseMode", "Integer");
+  if (s && *s)
+    erase_mode = get_integer_resource("eraseMode", "Integer");
+  else
+    erase_mode = -1;
+  if (s) free(s);
+
   XGetWindowAttributes (dpy, window, &xgwa);
   black.flags = DoRed|DoGreen|DoBlue;
   black.red = black.green = black.blue = 0;
@@ -211,3 +351,47 @@ erase_full_window(Display *dpy, Window window)
   XFreeColors(dpy, xgwa.colormap, &black.pixel, 1, 0);
   XFreeGC(dpy, erase_gc);
 }
+
+
+\f
+#if 0
+#include "screenhack.h"
+
+char *progclass = "Erase";
+char *defaults [] = {
+  0
+};
+
+XrmOptionDescRec options [] = {0};
+int options_size = 0;
+
+void
+screenhack (dpy, window)
+     Display *dpy;
+     Window window;
+{
+  int delay = 500000;
+  XGCValues gcv;
+  GC gc;
+  XColor white;
+  XWindowAttributes xgwa;
+  XGetWindowAttributes (dpy, window, &xgwa);
+  white.flags = DoRed|DoGreen|DoBlue;
+  white.red = white.green = white.blue = 0xFFFF;
+  XAllocColor(dpy, xgwa.colormap, &white);
+  gcv.foreground = white.pixel;
+  gc = XCreateGC (dpy, window, GCForeground, &gcv);
+
+  while (1)
+    {
+      XFillRectangle(dpy, window, gc, 0, 0, 1280, 1024);
+      XSync (dpy, False);
+      usleep (delay);
+      erase_full_window(dpy, window);
+      XSync (dpy, False);
+      usleep (delay);
+
+    }
+}
+
+#endif