#include "utils.h"
#include "yarandom.h"
#include "usleep.h"
+#include "resources.h"
+
+#undef countof
+#define countof(x) (sizeof(x)/sizeof(*(x)))
+
+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)
+{
+ 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;
+
+ 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
+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++)
+ {
+ 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,
+};
-#define NUM_MODES 6
void
erase_window(Display *dpy, Window window, GC gc,
int width, int height, int mode, int delay)
{
- int *clear_lines;
- int i, j, line, num_lines=0, granularity, max_num;
+ 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);
+}
+
+
+void
+erase_full_window(Display *dpy, Window window)
+{
+ XWindowAttributes xgwa;
+ XGCValues gcv;
+ GC erase_gc;
+ XColor black;
+ 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);
- max_num = 2*height;
- if(2*width>max_num)
- max_num = 2*width;
+ XGetWindowAttributes (dpy, window, &xgwa);
+ black.flags = DoRed|DoGreen|DoBlue;
+ black.red = black.green = black.blue = 0;
+ XAllocColor(dpy, xgwa.colormap, &black);
+ gcv.foreground = black.pixel;
+ erase_gc = XCreateGC (dpy, window, GCForeground, &gcv);
+ erase_window (dpy, window, erase_gc, xgwa.width, xgwa.height,
+ erase_mode, erase_speed);
+ 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);
- clear_lines = (int *)calloc(max_num, sizeof(int));
- if(clear_lines)
+ while (1)
{
- if(mode<0 || mode>=NUM_MODES)
- mode = random()%NUM_MODES;
- granularity = 25;
- switch(mode)
- {
- case 0:
- 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:
- 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:
- 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:
- 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:
- 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:
- 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;
- }
- 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);
- }
+ XFillRectangle(dpy, window, gc, 0, 0, 1280, 1024);
+ XSync (dpy, False);
+ usleep (delay);
+ erase_full_window(dpy, window);
+ XSync (dpy, False);
+ usleep (delay);
- XClearWindow (dpy, window);
+ }
}
+
+#endif