From http://www.jwz.org/xscreensaver/xscreensaver-5.35.tar.gz

[xscreensaver] / hacks / greynetic.c

diff --git a/hacks/greynetic.c b/hacks/greynetic.c
index 4a17ba36f114d7f6bd1b0bafc7a8929511f84cce..586fdffb04a132753eef19814559d84c2987a034 100644 (file)
--- a/hacks/greynetic.c
+++ b/hacks/greynetic.c
@@ -1,5 +1,4 @@
-/* xscreensaver, Copyright (c) 1992, 1995, 1996, 1997, 1998
- *  Jamie Zawinski <jwz@jwz.org>
+/* xscreensaver, Copyright (c) 1992-2008 Jamie Zawinski <jwz@jwz.org>

  *
  * Permission to use, copy, modify, distribute, and sell this software and its
  * documentation for any purpose is hereby granted without fee, provided that
  *
  * Permission to use, copy, modify, distribute, and sell this software and its
  * documentation for any purpose is hereby granted without fee, provided that


@@ -12,6 +11,10 @@
 
 #include "screenhack.h"
 
 
 #include "screenhack.h"
 

+#ifndef HAVE_JWXYZ
+# define DO_STIPPLE
+#endif
+

 #define NBITS 12
 
 /* On some systems (notably MacOS X) these files are messed up.
 #define NBITS 12
 
 /* On some systems (notably MacOS X) these files are messed up.


@@ -31,27 +34,29 @@
  * # include <X11/bitmaps/vlines3>
 */
 
  * # include <X11/bitmaps/vlines3>
 */
 

+#ifdef DO_STIPPLE

 #define stipple_width  16
 #define stipple_height 4
 #define stipple_width  16
 #define stipple_height 4

-static char stipple_bits[] = { 0x55, 0x55, 0xee, 0xee, 0x55, 0x55, 0xba, 0xbb};
+static unsigned char stipple_bits[] = {
+  0x55, 0x55, 0xee, 0xee, 0x55, 0x55, 0xba, 0xbb};

 
 #define cross_weave_width  16
 #define cross_weave_height 16
 
 #define cross_weave_width  16
 #define cross_weave_height 16

-static char cross_weave_bits[] = {
+static unsigned char cross_weave_bits[] = {

    0x55, 0x55, 0x88, 0x88, 0x55, 0x55, 0x22, 0x22, 0x55, 0x55, 0x88, 0x88,
    0x55, 0x55, 0x22, 0x22, 0x55, 0x55, 0x88, 0x88, 0x55, 0x55, 0x22, 0x22,
    0x55, 0x55, 0x88, 0x88, 0x55, 0x55, 0x22, 0x22};
 
 #define dimple1_width 16
 #define dimple1_height 16
    0x55, 0x55, 0x88, 0x88, 0x55, 0x55, 0x22, 0x22, 0x55, 0x55, 0x88, 0x88,
    0x55, 0x55, 0x22, 0x22, 0x55, 0x55, 0x88, 0x88, 0x55, 0x55, 0x22, 0x22,
    0x55, 0x55, 0x88, 0x88, 0x55, 0x55, 0x22, 0x22};
 
 #define dimple1_width 16
 #define dimple1_height 16

-static char dimple1_bits[] = {
+static unsigned char dimple1_bits[] = {

    0x55, 0x55, 0x00, 0x00, 0x55, 0x55, 0x00, 0x00, 0x55, 0x55, 0x00, 0x00,
    0x55, 0x55, 0x00, 0x00, 0x55, 0x55, 0x00, 0x00, 0x55, 0x55, 0x00, 0x00,
    0x55, 0x55, 0x00, 0x00, 0x55, 0x55, 0x00, 0x00};
 
 #define dimple3_width 16
 #define dimple3_height 16
    0x55, 0x55, 0x00, 0x00, 0x55, 0x55, 0x00, 0x00, 0x55, 0x55, 0x00, 0x00,
    0x55, 0x55, 0x00, 0x00, 0x55, 0x55, 0x00, 0x00, 0x55, 0x55, 0x00, 0x00,
    0x55, 0x55, 0x00, 0x00, 0x55, 0x55, 0x00, 0x00};
 
 #define dimple3_width 16
 #define dimple3_height 16

-static char dimple3_bits[] = {
+static unsigned char dimple3_bits[] = {

    0x11, 0x11, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x11, 0x11, 0x00, 0x00,
    0x00, 0x00, 0x00, 0x00, 0x11, 0x11, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
    0x11, 0x11, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00};
    0x11, 0x11, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x11, 0x11, 0x00, 0x00,
    0x00, 0x00, 0x00, 0x00, 0x11, 0x11, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
    0x11, 0x11, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00};


@@ -81,36 +86,61 @@ static char vlines2_bits[] = { 0x01};
 #define vlines3_height 1
 static char vlines3_bits[] = { 0x02};
 
 #define vlines3_height 1
 static char vlines3_bits[] = { 0x02};
 

+#endif /* DO_STIPPLE */

 
 

+struct state {
+  Display *dpy;
+  Window window;

 
 

+  Pixmap pixmaps [NBITS];

 
 

-static Pixmap pixmaps [NBITS];
-static GC gc;
-static int delay;
-static unsigned long fg, bg, pixels [512];
-static int npixels;
+  GC gc;
+  int delay;
+  unsigned long fg, bg, pixels [512];
+  int npixels;
+  int xlim, ylim;
+  Bool grey_p;
+  Colormap cmap;
+};

 
 

-static void
-init_greynetic (Display *dpy, Window window)
+
+static void *
+greynetic_init (Display *dpy, Window window)

 {
 {

+  struct state *st = (struct state *) calloc (1, sizeof(*st));
+# ifdef DO_STIPPLE

   int i;
   int i;

+# endif /* DO_STIPPLE */

   XGCValues gcv;
   XWindowAttributes xgwa;
   XGCValues gcv;
   XWindowAttributes xgwa;

-  Colormap cmap;
-  XGetWindowAttributes (dpy, window, &xgwa);
-  cmap = xgwa.colormap;
-  npixels = 0;
-  gcv.foreground= fg= get_pixel_resource("foreground","Foreground", dpy, cmap);
-  gcv.background= bg= get_pixel_resource("background","Background", dpy, cmap);
-  gcv.fill_style= FillOpaqueStippled;
-  gc = XCreateGC (dpy, window, GCForeground|GCBackground|GCFillStyle, &gcv);
+  st->dpy = dpy;
+  st->window = window;
+
+  XGetWindowAttributes (st->dpy, st->window, &xgwa);
+  st->xlim = xgwa.width;
+  st->ylim = xgwa.height;
+  st->cmap = xgwa.colormap;
+  st->npixels = 0;
+  st->grey_p = get_boolean_resource(st->dpy, "grey", "Boolean");
+  gcv.foreground= st->fg= get_pixel_resource(st->dpy, st->cmap, "foreground","Foreground");
+  gcv.background= st->bg= get_pixel_resource(st->dpy, st->cmap, "background","Background");

 
 

-  delay = get_integer_resource ("delay", "Integer");
-  if (delay < 0) delay = 0;
+  st->delay = get_integer_resource (st->dpy, "delay", "Integer");
+  if (st->delay < 0) st->delay = 0;

 
 

+# ifndef DO_STIPPLE
+  st->gc = XCreateGC (st->dpy, st->window, GCForeground, &gcv);
+#  ifdef HAVE_JWXYZ /* allow non-opaque alpha components in pixel values */
+  jwxyz_XSetAlphaAllowed (st->dpy, st->gc, True);
+#  endif /* HAVE_JWXYZ */
+# else /* DO_STIPPLE */
+  gcv.fill_style= FillOpaqueStippled;
+  st->gc = XCreateGC (st->dpy, st->window, GCForeground|GCBackground|GCFillStyle, &gcv);
+  

   i = 0;
   i = 0;

-#define BITS(n,w,h) \
-  pixmaps [i++] = XCreatePixmapFromBitmapData (dpy, window, n, w, h, 1, 0, 1)
+# define BITS(n,w,h) \
+  st->pixmaps [i++] = \
+    XCreatePixmapFromBitmapData (st->dpy, st->window, (char *) n, w, h, 1, 0, 1)

 
   BITS (stipple_bits, stipple_width, stipple_height);
   BITS (cross_weave_bits, cross_weave_width, cross_weave_height);
 
   BITS (stipple_bits, stipple_width, stipple_height);
   BITS (cross_weave_bits, cross_weave_width, cross_weave_height);


@@ -124,102 +154,143 @@ init_greynetic (Display *dpy, Window window)
   BITS (root_weave_bits, root_weave_width, root_weave_height);
   BITS (vlines2_bits, vlines2_width, vlines2_height);
   BITS (vlines3_bits, vlines3_width, vlines3_height);
   BITS (root_weave_bits, root_weave_width, root_weave_height);
   BITS (vlines2_bits, vlines2_width, vlines2_height);
   BITS (vlines3_bits, vlines3_width, vlines3_height);

+# endif /* DO_STIPPLE */
+  return st;

 }
 
 }
 

-static void
-greynetic (Display *dpy, Window window)
+static unsigned long
+greynetic_draw (Display *dpy, Window window, void *closure)

 {
 {

-  static int tick = 500, xlim, ylim;
-  static Colormap cmap;
+  struct state *st = (struct state *) closure;

   int x, y, w=0, h=0, i;
   XGCValues gcv;
   int x, y, w=0, h=0, i;
   XGCValues gcv;

-  if (tick++ == 500)
-    {
-      XWindowAttributes xgwa;
-      XGetWindowAttributes (dpy, window, &xgwa);
-      tick = 0;
-      xlim = xgwa.width;
-      ylim = xgwa.height;
-      cmap = xgwa.colormap;
-    }
+

   for (i = 0; i < 10; i++) /* minimize area, but don't try too hard */
     {
   for (i = 0; i < 10; i++) /* minimize area, but don't try too hard */
     {

-      w = 50 + random () % (xlim - 50);
-      h = 50 + random () % (ylim - 50);
-      if (w + h < xlim && w + h < ylim)
+      w = 50 + random () % (st->xlim - 50);
+      h = 50 + random () % (st->ylim - 50);
+      if (w + h < st->xlim && w + h < st->ylim)

        break;
     }
        break;
     }

-  x = random () % (xlim - w);
-  y = random () % (ylim - h);
-  gcv.stipple = pixmaps [random () % NBITS];
+  x = random () % (st->xlim - w);
+  y = random () % (st->ylim - h);
+# ifdef DO_STIPPLE
+  gcv.stipple = st->pixmaps [random () % NBITS];
+# endif /* !DO_STIPPLE */

   if (mono_p)
     {
     MONO:
       if (random () & 1)
   if (mono_p)
     {
     MONO:
       if (random () & 1)

-       gcv.foreground = fg, gcv.background = bg;
+       gcv.foreground = st->fg, gcv.background = st->bg;

       else
       else

-       gcv.foreground = bg, gcv.background = fg;
+       gcv.foreground = st->bg, gcv.background = st->fg;

     }
   else
     {
       XColor fgc, bgc;
     }
   else
     {
       XColor fgc, bgc;

-      if (npixels == sizeof (pixels) / sizeof (unsigned long))
+      if (st->npixels == sizeof (st->pixels) / sizeof (unsigned long))

        goto REUSE;
       fgc.flags = bgc.flags = DoRed|DoGreen|DoBlue;
       fgc.red = random ();
       fgc.green = random ();
       fgc.blue = random ();
        goto REUSE;
       fgc.flags = bgc.flags = DoRed|DoGreen|DoBlue;
       fgc.red = random ();
       fgc.green = random ();
       fgc.blue = random ();

+# ifdef DO_STIPPLE

       bgc.red = random ();
       bgc.green = random ();
       bgc.blue = random ();
       bgc.red = random ();
       bgc.green = random ();
       bgc.blue = random ();

-      if (! XAllocColor (dpy, cmap, &fgc))
+# endif /* DO_STIPPLE */
+
+      if (st->grey_p)
+        {
+          fgc.green = fgc.blue = fgc.red;
+          bgc.green = bgc.blue = bgc.red;
+        }
+
+      if (! XAllocColor (st->dpy, st->cmap, &fgc))

        goto REUSE;
        goto REUSE;

-      pixels [npixels++] = fgc.pixel;
+      st->pixels [st->npixels++] = fgc.pixel;

       gcv.foreground = fgc.pixel;
       gcv.foreground = fgc.pixel;

-      if (! XAllocColor (dpy, cmap, &bgc))
+# ifdef DO_STIPPLE
+      if (! XAllocColor (st->dpy, st->cmap, &bgc))

        goto REUSE;
        goto REUSE;

-      pixels [npixels++] = bgc.pixel;
+      st->pixels [st->npixels++] = bgc.pixel;

       gcv.background = bgc.pixel;
       gcv.background = bgc.pixel;

+# endif /* DO_STIPPLE */

       goto DONE;
     REUSE:
       goto DONE;
     REUSE:

-      if (npixels <= 0)
+      if (st->npixels <= 0)

        {
          mono_p = 1;
          goto MONO;
        }
        {
          mono_p = 1;
          goto MONO;
        }

-      gcv.foreground = pixels [random () % npixels];
-      gcv.background = pixels [random () % npixels];
+      gcv.foreground = st->pixels [random () % st->npixels];
+# ifdef DO_STIPPLE
+      gcv.background = st->pixels [random () % st->npixels];
+# endif /* DO_STIPPLE */

     DONE:
       ;
     DONE:
       ;

+
+# ifdef HAVE_JWXYZ
+      {
+        /* give a non-opaque alpha to the color */
+        unsigned long pixel = gcv.foreground;
+        unsigned long amask = BlackPixel (dpy,0);
+        unsigned long a = (random() & amask);
+        pixel = (pixel & (~amask)) | a;
+        gcv.foreground = pixel;
+      }
+# endif /* !HAVE_JWXYZ */

     }
     }

-  XChangeGC (dpy, gc, GCStipple|GCForeground|GCBackground, &gcv);
-  XFillRectangle (dpy, window, gc, x, y, w, h);
-  XSync (dpy, False);
+# ifndef DO_STIPPLE
+  XChangeGC (st->dpy, st->gc, GCForeground, &gcv);
+# else  /* DO_STIPPLE */
+  XChangeGC (st->dpy, st->gc, GCStipple|GCForeground|GCBackground, &gcv);
+# endif /* DO_STIPPLE */
+  XFillRectangle (st->dpy, st->window, st->gc, x, y, w, h);
+  return st->delay;

 }
 
 \f
 }
 
 \f

-char *progclass = "Greynetic";
-
-char *defaults [] = {
+static const char *greynetic_defaults [] = {

   ".background:        black",
   ".foreground:        white",
   ".background:        black",
   ".foreground:        white",

+  "*fpsSolid:  true",

   "*delay:     10000",
   "*delay:     10000",

+  "*grey:      false",
+#ifdef HAVE_MOBILE
+  "*ignoreRotation: True",
+#endif

   0
 };
 
   0
 };
 

-XrmOptionDescRec options [] = {
+static XrmOptionDescRec greynetic_options [] = {

   { "-delay",          ".delay",       XrmoptionSepArg, 0 },
   { "-delay",          ".delay",       XrmoptionSepArg, 0 },

+  { "-grey",           ".grey",        XrmoptionNoArg, "True" },

   { 0, 0, 0, 0 }
 };
 
   { 0, 0, 0, 0 }
 };
 

-void
-screenhack (Display *dpy, Window window)
+static void
+greynetic_reshape (Display *dpy, Window window, void *closure, 
+                 unsigned int w, unsigned int h)

 {
 {

-  init_greynetic (dpy, window);
-  while (1)
-    {
-      greynetic (dpy, window);
-      screenhack_handle_events (dpy);
-      if (delay) usleep (delay);
-    }
+  struct state *st = (struct state *) closure;
+  st->xlim = w;
+  st->ylim = h;
+}
+
+static Bool
+greynetic_event (Display *dpy, Window window, void *closure, XEvent *event)
+{
+  return False;

 }
 }

+
+static void
+greynetic_free (Display *dpy, Window window, void *closure)
+{
+  struct state *st = (struct state *) closure;
+  XFreeGC (st->dpy, st->gc);
+  free (st);
+}
+
+XSCREENSAVER_MODULE ("Greynetic", greynetic)
+