http://ftp.x.org/contrib/applications/xscreensaver-2.24.tar.gz
[xscreensaver] / driver / windows.c
index a9731b02e0b27a474156e02baf73ecb0791933b0..a460e6da4937377d9727e951b449c6d4439d60b1 100644 (file)
@@ -1,4 +1,5 @@
-/* xscreensaver, Copyright (c) 1991-1995 Jamie Zawinski <jwz@mcom.com>
+/* windows.c --- turning the screen black; dealing with visuals, virtual roots.
+ * xscreensaver, Copyright (c) 1991-1998 Jamie Zawinski <jwz@netscape.com>
  *
  * Permission to use, copy, modify, distribute, and sell this software and its
  * documentation for any purpose is hereby granted without fee, provided that
  * implied warranty.
  */
 
+#ifdef HAVE_CONFIG_H
+# include "config.h"
+#endif
+
+#ifdef VMS
+# include <unixlib.h>          /* for getpid() */
+# include "vms-gtod.h"         /* for gettimeofday() */
+# if !defined(HAVE_UNAME) && (__VMS_VER >= 70000000)
+#  define HAVE_UNAME 1
+# endif /* !HAVE_UNAME */
+#endif /* VMS */
+
+# ifdef HAVE_UNAME
+#  include <sys/utsname.h>     /* for uname() */
+# endif /* HAVE_UNAME */
+
 #include <stdio.h>
+#include <X11/Xproto.h>                /* for CARD32 */
 #include <X11/Xlib.h>
-#include <X11/Xutil.h>
+#include <X11/Xutil.h>         /* for XSetClassHint() */
 #include <X11/Xatom.h>
-#include <X11/Xos.h>
-#include <X11/Xmu/SysUtil.h>
-
+#include <X11/Xos.h>           /* for time() */
 #include <signal.h>            /* for the signal names */
 
-#include "xscreensaver.h"
+#ifdef HAVE_MIT_SAVER_EXTENSION
+# include <X11/extensions/scrnsaver.h>
+#endif /* HAVE_MIT_SAVER_EXTENSION */
 
-#ifdef HAVE_SAVER_EXTENSION
-#include <X11/extensions/scrnsaver.h>
-extern Bool use_saver_extension;
-#endif /* HAVE_SAVER_EXTENSION */
 
-#if __STDC__
-extern int kill (pid_t, int);          /* signal() is in sys/signal.h... */
-#endif /* __STDC__ */
+#ifdef HAVE_XHPDISABLERESET
+# include <X11/XHPlib.h>
+
+ /* Calls to XHPDisableReset and XHPEnableReset must be balanced,
+    or BadAccess errors occur.  (Ok for this to be global, since it
+    affects the whole machine, not just the current screen.) */
+  Bool hp_locked_p = False;
 
-extern Time timeout;
+#endif /* HAVE_XHPDISABLERESET */
 
-extern Bool lock_p, demo_mode_p;
+
+/* This file doesn't need the Xt headers, so stub these types out... */
+#undef XtPointer
+#define XtAppContext void*
+#define XrmDatabase  void*
+#define XtIntervalId void*
+#define XtPointer    void*
+#define Widget       void*
+
+#include "xscreensaver.h"
+#include "visual.h"
+#include "fade.h"
+
+extern int kill (pid_t, int);          /* signal() is in sys/signal.h... */
 
 Atom XA_VROOT, XA_XSETROOT_ID;
-Atom XA_SCREENSAVER_VERSION, XA_SCREENSAVER_ID;
+Atom XA_SCREENSAVER, XA_SCREENSAVER_VERSION, XA_SCREENSAVER_ID;
+Atom XA_SCREENSAVER_TIME;
 
-#if __STDC__
-extern void describe_visual (FILE *, Display *, Visual *);
-extern void reset_stderr (void);
-#endif
 
-Window screensaver_window = 0;
-Cursor cursor;
-Colormap cmap, cmap2;
-Bool install_cmap_p;
-Bool fade_p, unfade_p;
-int fade_seconds, fade_ticks;
+extern saver_info *global_si_kludge;   /* I hate C so much... */
 
-static unsigned long black_pixel;
-static Window real_vroot, real_vroot_value;
 
-#ifdef HAVE_SAVER_EXTENSION
-Window server_saver_window = 0;
-#endif /* HAVE_SAVER_EXTENSION */
+static void store_activate_time (saver_info *si, Bool use_last_p);
 
 #define ALL_POINTER_EVENTS \
        (ButtonPressMask | ButtonReleaseMask | EnterWindowMask | \
@@ -61,59 +80,140 @@ Window server_saver_window = 0;
         Button1MotionMask | Button2MotionMask | Button3MotionMask | \
         Button4MotionMask | Button5MotionMask | ButtonMotionMask)
 
-/* I don't really understand Sync vs Async, but these seem to work... */
-#define grab_kbd(win) \
-  XGrabKeyboard (dpy, (win), True, GrabModeSync, GrabModeAsync, CurrentTime)
-#define grab_mouse(win) \
-  XGrabPointer (dpy, (win), True, ALL_POINTER_EVENTS, \
-               GrabModeAsync, GrabModeAsync, None, cursor, CurrentTime)
+
+static int
+grab_kbd(saver_info *si, Window w)
+{
+  saver_preferences *p = &si->prefs;
+  int status = XGrabKeyboard (si->dpy, w, True,
+                             /* I don't really understand Sync vs Async,
+                                but these seem to work... */
+                             GrabModeSync, GrabModeAsync,
+                             CurrentTime);
+  if (status == GrabSuccess)
+    si->keyboard_grab_window = w;
+
+  if (p->debug_p)
+    fprintf(stderr, "%s: XGrabKeyboard(... 0x%x ...) ==> %s\n",
+           blurb(), (unsigned long) w,
+           (status == GrabSuccess ? "GrabSuccess" :
+            status == AlreadyGrabbed ? "AlreadyGrabbed" :
+            status == GrabInvalidTime ? "GrabInvalidTime" :
+            status == GrabNotViewable ? "GrabNotViewable" :
+            status == GrabFrozen ? "GrabFrozen" :
+            "???"));
+
+  return status;
+}
+
+static const char *
+grab_string(int status)
+{
+  switch (status)
+    {
+    case GrabSuccess:     return "GrabSuccess";     break;
+    case AlreadyGrabbed:  return "AlreadyGrabbed";  break;
+    case GrabInvalidTime: return "GrabInvalidTime"; break;
+    case GrabNotViewable: return "GrabNotViewable"; break;
+    case GrabFrozen:      return "GrabFrozen";      break;
+    default:
+      {
+       static char foo[255];
+       sprintf(foo, "unknown status: %d", status);
+       return foo;
+      }
+    }
+}
+
+
+static int
+grab_mouse (saver_info *si, Window w, Cursor cursor)
+{
+  saver_preferences *p = &si->prefs;
+  int status = XGrabPointer (si->dpy, w, True, ALL_POINTER_EVENTS,
+                            GrabModeAsync, GrabModeAsync, None,
+                            cursor, CurrentTime);
+  if (status == GrabSuccess)
+    si->mouse_grab_window = w;
+
+  if (p->debug_p)
+    fprintf(stderr, "%s: XGrabPointer(... 0x%x, 0x%x ...) ==> %s\n",
+           blurb(), (unsigned long) w, (unsigned long) cursor,
+           grab_string(status));
+  return status;
+}
+
+
+static void
+ungrab_kbd(saver_info *si)
+{
+  saver_preferences *p = &si->prefs;
+  XUngrabKeyboard(si->dpy, CurrentTime);
+  if (p->debug_p)
+    fprintf(stderr, "%s: XUngrabKeyboard (was 0x%x)\n", blurb(),
+           (unsigned long) si->keyboard_grab_window);
+  si->keyboard_grab_window = 0;
+}
+
+
+static void
+ungrab_mouse(saver_info *si)
+{
+  saver_preferences *p = &si->prefs;
+  XUngrabPointer(si->dpy, CurrentTime);
+  if (p->debug_p)
+    fprintf(stderr, "%s: XUngrabPointer (was 0x%x)\n", blurb(),
+           (unsigned long) si->mouse_grab_window);
+  si->mouse_grab_window = 0;
+}
+
 
 void
-grab_keyboard_and_mouse P((void))
+grab_keyboard_and_mouse (saver_info *si, Window window, Cursor cursor)
 {
   Status status;
-  XSync (dpy, False);
+  XSync (si->dpy, False);
 
-  if (demo_mode_p) return;
-
-  status = grab_kbd (screensaver_window);
+  status = grab_kbd (si, window);
   if (status != GrabSuccess)
     {  /* try again in a second */
       sleep (1);
-      status = grab_kbd (screensaver_window);
+      status = grab_kbd (si, window);
       if (status != GrabSuccess)
-       fprintf (stderr, "%s: %scouldn't grab keyboard!  (%d)\n",
-                progname, (verbose_p ? "## " : ""), status);
+       fprintf (stderr, "%s: couldn't grab keyboard!  (%s)\n",
+                blurb(), grab_string(status));
     }
-  status = grab_mouse (screensaver_window);
+
+  status = grab_mouse (si, window, cursor);
   if (status != GrabSuccess)
     {  /* try again in a second */
       sleep (1);
-      status = grab_mouse (screensaver_window);
+      status = grab_mouse (si, window, cursor);
       if (status != GrabSuccess)
-       fprintf (stderr, "%s: %scouldn't grab pointer!  (%d)\n",
-                progname, (verbose_p ? "## " : ""), status);
+       fprintf (stderr, "%s: couldn't grab pointer!  (%s)\n",
+                blurb(), grab_string(status));
     }
 }
 
 void
-ungrab_keyboard_and_mouse P((void))
+ungrab_keyboard_and_mouse (saver_info *si)
 {
-  XUngrabPointer (dpy, CurrentTime);
-  XUngrabKeyboard (dpy, CurrentTime);
+  ungrab_mouse (si);
+  ungrab_kbd (si);
 }
 
 
-void
-ensure_no_screensaver_running ()
+/* Prints an error message to stderr and returns True if there is another
+   xscreensaver running already.  Silently returns False otherwise. */
+Bool
+ensure_no_screensaver_running (Display *dpy, Screen *screen)
 {
+  Bool status = 0;
   int i;
   Window root = RootWindowOfScreen (screen);
   Window root2, parent, *kids;
   unsigned int nkids;
-  int (*old_handler) ();
-
-  old_handler = XSetErrorHandler (BadWindow_ehandler);
+  XErrorHandler old_handler = XSetErrorHandler (BadWindow_ehandler);
 
   if (! XQueryTree (dpy, root, &root2, &parent, &kids, &nkids))
     abort ();
@@ -143,56 +243,19 @@ ensure_no_screensaver_running ()
            id = "???";
 
          fprintf (stderr,
-      "%s: %salready running on display %s (window 0x%x)\n from process %s.\n",
-                  progname, (verbose_p ? "## " : ""), DisplayString (dpy),
-                  (int) kids [i], id);
-         exit (1);
+      "%s: already running on display %s (window 0x%x)\n from process %s.\n",
+                  blurb(), DisplayString (dpy), (int) kids [i], id);
+         status = True;
        }
     }
 
   if (kids) XFree ((char *) kids);
   XSync (dpy, False);
   XSetErrorHandler (old_handler);
+  return status;
 }
 
 
-void
-disable_builtin_screensaver ()
-{
-  int server_timeout, server_interval, prefer_blank, allow_exp;
-  /* Turn off the server builtin saver if it is now running. */
-  XForceScreenSaver (dpy, ScreenSaverReset);
-  XGetScreenSaver (dpy, &server_timeout, &server_interval,
-                  &prefer_blank, &allow_exp);
-
-#ifdef HAVE_SAVER_EXTENSION
-  if (use_saver_extension)
-    {
-      /* Override the values specified with "xset" with our own parameters. */
-      prefer_blank = False;
-      allow_exp = True;
-      server_interval = 0;
-      server_timeout = (timeout / 1000);
-      if (verbose_p)
-       fprintf (stderr,
-                "%s: configuring server for saver timeout of %d seconds.\n",
-                progname, server_timeout);
-      XSetScreenSaver (dpy, server_timeout, server_interval,
-                      prefer_blank, allow_exp);
-    }
-  else
-#endif /* HAVE_SAVER_EXTENSION */
-  if (server_timeout != 0)
-    {
-      server_timeout = 0;
-      XSetScreenSaver (dpy, server_timeout, server_interval,
-                      prefer_blank, allow_exp);
-      printf ("%s%sisabling server builtin screensaver.\n\
-       You can re-enable it with \"xset s on\".\n",
-             (verbose_p ? "" : progname), (verbose_p ? "\n\tD" : ": d"));
-    }
-}
-
 \f
 /* Virtual-root hackery */
 
@@ -201,48 +264,41 @@ ERROR!  You must not include vroot.h in this file.
 #endif
 
 static void
-#if __STDC__
-store_vroot_property (Window win, Window value)
-#else
-store_vroot_property (win, value)
-     Window win, value;
-#endif
+store_vroot_property (Display *dpy, Window win, Window value)
 {
 #if 0
-  printf ("%s: storing XA_VROOT = 0x%x (%s) = 0x%x (%s)\n", progname, 
-         win,
-         (win == screensaver_window ? "ScreenSaver" :
-          (win == real_vroot ? "VRoot" :
-           (win == real_vroot_value ? "Vroot_value" : "???"))),
-         value,
-         (value == screensaver_window ? "ScreenSaver" :
-          (value == real_vroot ? "VRoot" :
-           (value == real_vroot_value ? "Vroot_value" : "???"))));
+  if (p->verbose_p)
+    fprintf (stderr,
+            "%s: storing XA_VROOT = 0x%x (%s) = 0x%x (%s)\n", blurb(), 
+            win,
+            (win == screensaver_window ? "ScreenSaver" :
+             (win == real_vroot ? "VRoot" :
+              (win == real_vroot_value ? "Vroot_value" : "???"))),
+            value,
+            (value == screensaver_window ? "ScreenSaver" :
+             (value == real_vroot ? "VRoot" :
+              (value == real_vroot_value ? "Vroot_value" : "???"))));
 #endif
   XChangeProperty (dpy, win, XA_VROOT, XA_WINDOW, 32, PropModeReplace,
                   (unsigned char *) &value, 1);
 }
 
 static void
-#if __STDC__
-remove_vroot_property (Window win)
-#else
-remove_vroot_property (win)
-     Window win;
-#endif
+remove_vroot_property (Display *dpy, Window win)
 {
 #if 0
-  printf ("%s: removing XA_VROOT from 0x%x (%s)\n", progname, win, 
-         (win == screensaver_window ? "ScreenSaver" :
-          (win == real_vroot ? "VRoot" :
-           (win == real_vroot_value ? "Vroot_value" : "???"))));
+  if (p->verbose_p)
+    fprintf (stderr, "%s: removing XA_VROOT from 0x%x (%s)\n", blurb(), win, 
+            (win == screensaver_window ? "ScreenSaver" :
+             (win == real_vroot ? "VRoot" :
+              (win == real_vroot_value ? "Vroot_value" : "???"))));
 #endif
   XDeleteProperty (dpy, win, XA_VROOT);
 }
 
 
 static void
-kill_xsetroot_data P((void))
+kill_xsetroot_data (Display *dpy, Window window, Bool verbose_p)
 {
   Atom type;
   int format;
@@ -261,7 +317,7 @@ kill_xsetroot_data P((void))
      cause the RetainPermanent resources of the client which created it
      (and which no longer exists) to be freed.
    */
-  if (XGetWindowProperty (dpy, screensaver_window, XA_XSETROOT_ID, 0, 1,
+  if (XGetWindowProperty (dpy, window, XA_XSETROOT_ID, 0, 1,
                          True, AnyPropertyType, &type, &format, &nitems, 
                          &bytesafter, (unsigned char **) &dataP)
       == Success
@@ -272,31 +328,33 @@ kill_xsetroot_data P((void))
        {
          if (verbose_p)
            printf ("%s: destroying xsetroot data (0x%lX).\n",
-                   progname, *dataP);
+                   blurb(), *dataP);
          XKillClient (dpy, *dataP);
        }
       else
-       fprintf (stderr, "%s: %sdeleted unrecognised _XSETROOT_ID property: \n\
+       fprintf (stderr, "%s: deleted unrecognised _XSETROOT_ID property: \n\
        %lu, %lu; type: %lu, format: %d, nitems: %lu, bytesafter %ld\n",
-                progname, (verbose_p ? "## " : ""),
-                (unsigned long) dataP, (dataP ? *dataP : 0), type,
+                blurb(), (unsigned long) dataP, (dataP ? *dataP : 0), type,
                 format, nitems, bytesafter);
     }
 }
 
 
-static void handle_signals P((Bool on_p));
+static void handle_signals (saver_info *si, Bool on_p);
 
 static void
-save_real_vroot P((void))
+save_real_vroot (saver_screen_info *ssi)
 {
+  saver_info *si = ssi->global;
+  Display *dpy = si->dpy;
+  Screen *screen = ssi->screen;
   int i;
   Window root = RootWindowOfScreen (screen);
   Window root2, parent, *kids;
   unsigned int nkids;
 
-  real_vroot = 0;
-  real_vroot_value = 0;
+  ssi->real_vroot = 0;
+  ssi->real_vroot_value = 0;
   if (! XQueryTree (dpy, root, &root2, &parent, &kids, &nkids))
     abort ();
   if (root != root2)
@@ -317,55 +375,71 @@ save_real_vroot P((void))
        continue;
       if (! vrootP)
        continue;
-      if (real_vroot)
+      if (ssi->real_vroot)
        {
-         if (*vrootP == screensaver_window) abort ();
+         if (*vrootP == ssi->screensaver_window) abort ();
          fprintf (stderr,
-           "%s: %smore than one virtual root window found (0x%x and 0x%x).\n",
-                  progname, (verbose_p ? "## " : ""),
-                  (int) real_vroot, (int) kids [i]);
+           "%s: more than one virtual root window found (0x%x and 0x%x).\n",
+                  blurb(), (int) ssi->real_vroot, (int) kids [i]);
          exit (1);
        }
-      real_vroot = kids [i];
-      real_vroot_value = *vrootP;
+      ssi->real_vroot = kids [i];
+      ssi->real_vroot_value = *vrootP;
     }
 
-  if (real_vroot)
+  if (ssi->real_vroot)
     {
-      handle_signals (True);
-      remove_vroot_property (real_vroot);
+      handle_signals (si, True);
+      remove_vroot_property (si->dpy, ssi->real_vroot);
       XSync (dpy, False);
     }
 
   XFree ((char *) kids);
 }
 
+
 static Bool
-restore_real_vroot_1 P((void))
+restore_real_vroot_2 (saver_screen_info *ssi)
 {
-  if (verbose_p && real_vroot)
+  saver_info *si = ssi->global;
+  saver_preferences *p = &si->prefs;
+  if (p->verbose_p && ssi->real_vroot)
     printf ("%s: restoring __SWM_VROOT property on the real vroot (0x%lx).\n",
-           progname, (unsigned long) real_vroot);
-  remove_vroot_property (screensaver_window);
-  if (real_vroot)
+           blurb(), (unsigned long) ssi->real_vroot);
+  remove_vroot_property (si->dpy, ssi->screensaver_window);
+  if (ssi->real_vroot)
     {
-      store_vroot_property (real_vroot, real_vroot_value);
-      real_vroot = 0;
-      real_vroot_value = 0;
+      store_vroot_property (si->dpy, ssi->real_vroot, ssi->real_vroot_value);
+      ssi->real_vroot = 0;
+      ssi->real_vroot_value = 0;
       /* make sure the property change gets there before this process
         terminates!  We might be doing this because we have intercepted
         SIGTERM or something. */
-      XSync (dpy, False);
+      XSync (si->dpy, False);
       return True;
     }
   return False;
 }
 
+static Bool
+restore_real_vroot_1 (saver_info *si)
+{
+  int i;
+  Bool did_any = False;
+  for (i = 0; i < si->nscreens; i++)
+    {
+      saver_screen_info *ssi = &si->screens[i];
+      if (restore_real_vroot_2 (ssi))
+       did_any = True;
+    }
+  return did_any;
+}
+
 void
-restore_real_vroot ()
+restore_real_vroot (saver_info *si)
 {
-  if (restore_real_vroot_1 ())
-    handle_signals (False);
+  if (restore_real_vroot_1 (si))
+    handle_signals (si, False);
 }
 
 \f
@@ -373,96 +447,190 @@ restore_real_vroot ()
    inconsistent state
  */
 
-static const char *sig_names [255] = { 0 };
+const char *
+signal_name(int signal)
+{
+  switch (signal) {
+  case SIGHUP:   return "SIGHUP";
+  case SIGINT:   return "SIGINT";
+  case SIGQUIT:          return "SIGQUIT";
+  case SIGILL:   return "SIGILL";
+  case SIGTRAP:          return "SIGTRAP";
+#ifdef SIGABRT
+  case SIGABRT:          return "SIGABRT";
+#endif
+  case SIGFPE:   return "SIGFPE";
+  case SIGKILL:          return "SIGKILL";
+  case SIGBUS:   return "SIGBUS";
+  case SIGSEGV:          return "SIGSEGV";
+  case SIGPIPE:          return "SIGPIPE";
+  case SIGALRM:          return "SIGALRM";
+  case SIGTERM:          return "SIGTERM";
+#ifdef SIGSTOP
+  case SIGSTOP:          return "SIGSTOP";
+#endif
+#ifdef SIGCONT
+  case SIGCONT:          return "SIGCONT";
+#endif
+#ifdef SIGUSR1
+  case SIGUSR1:          return "SIGUSR1";
+#endif
+#ifdef SIGUSR2
+  case SIGUSR2:          return "SIGUSR2";
+#endif
+#ifdef SIGEMT
+  case SIGEMT:   return "SIGEMT";
+#endif
+#ifdef SIGSYS
+  case SIGSYS:   return "SIGSYS";
+#endif
+#ifdef SIGCHLD
+  case SIGCHLD:          return "SIGCHLD";
+#endif
+#ifdef SIGPWR
+  case SIGPWR:   return "SIGPWR";
+#endif
+#ifdef SIGWINCH
+  case SIGWINCH:  return "SIGWINCH";
+#endif
+#ifdef SIGURG
+  case SIGURG:   return "SIGURG";
+#endif
+#ifdef SIGIO
+  case SIGIO:    return "SIGIO";
+#endif
+#ifdef SIGVTALRM
+  case SIGVTALRM: return "SIGVTALRM";
+#endif
+#ifdef SIGXCPU
+  case SIGXCPU:          return "SIGXCPU";
+#endif
+#ifdef SIGXFSZ
+  case SIGXFSZ:          return "SIGXFSZ";
+#endif
+#ifdef SIGDANGER
+  case SIGDANGER: return "SIGDANGER";
+#endif
+  default:
+    {
+      static char buf[50];
+      sprintf(buf, "signal %d\n", signal);
+      return buf;
+    }
+  }
+}
+
 
-static void
-restore_real_vroot_handler (sig)
-     int sig;
+
+static RETSIGTYPE
+restore_real_vroot_handler (int sig)
 {
+  saver_info *si = global_si_kludge;   /* I hate C so much... */
+
   signal (sig, SIG_DFL);
-  if (restore_real_vroot_1 ())
-    fprintf (stderr, "\n%s: %s%s (%d) intercepted, vroot restored.\n",
-            progname, (verbose_p ? "## " : ""),
-            ((sig < sizeof(sig_names) && sig >= 0 && sig_names [sig])
-             ? sig_names [sig] : "unknown signal"),
-            sig);
+  if (restore_real_vroot_1 (si))
+    fprintf (real_stderr, "\n%s: %s intercepted, vroot restored.\n",
+            blurb(), signal_name(sig));
   kill (getpid (), sig);
 }
 
-
 static void
-#if __STDC__
-catch_signal (int sig, char *signame, Bool on_p)
-#else
-catch_signal (sig, signame, on_p)
-     int sig;
-     char *signame;
-     Bool on_p;
-#endif
+catch_signal (saver_info *si, int sig, Bool on_p)
 {
   if (! on_p)
     signal (sig, SIG_DFL);
   else
     {
-      sig_names [sig] = signame;
-      if (((int) signal (sig, restore_real_vroot_handler)) == -1)
+      if (((long) signal (sig, restore_real_vroot_handler)) == -1L)
        {
          char buf [255];
-         sprintf (buf, "%s: %scouldn't catch %s (%d)", progname,
-                  (verbose_p ? "## " : ""), signame, sig);
+         sprintf (buf, "%s: couldn't catch %s", blurb(), signal_name(sig));
          perror (buf);
-         restore_real_vroot ();
-         exit (1);
+         saver_exit (si, 1);
        }
     }
 }
 
 static void
-handle_signals (on_p)
-     Bool on_p;
+handle_signals (saver_info *si, Bool on_p)
 {
 #if 0
   if (on_p) printf ("handling signals\n");
   else printf ("unhandling signals\n");
 #endif
 
-  catch_signal (SIGHUP,  "SIGHUP",  on_p);
-  catch_signal (SIGINT,  "SIGINT",  on_p);
-  catch_signal (SIGQUIT, "SIGQUIT", on_p);
-  catch_signal (SIGILL,  "SIGILL",  on_p);
-  catch_signal (SIGTRAP, "SIGTRAP", on_p);
-  catch_signal (SIGIOT,  "SIGIOT",  on_p);
-  catch_signal (SIGABRT, "SIGABRT", on_p);
+  catch_signal (si, SIGHUP,  on_p);
+  catch_signal (si, SIGINT,  on_p);
+  catch_signal (si, SIGQUIT, on_p);
+  catch_signal (si, SIGILL,  on_p);
+  catch_signal (si, SIGTRAP, on_p);
+  catch_signal (si, SIGIOT,  on_p);
+  catch_signal (si, SIGABRT, on_p);
 #ifdef SIGEMT
-  catch_signal (SIGEMT,  "SIGEMT",  on_p);
+  catch_signal (si, SIGEMT,  on_p);
 #endif
-  catch_signal (SIGFPE,  "SIGFPE",  on_p);
-  catch_signal (SIGBUS,  "SIGBUS",  on_p);
-  catch_signal (SIGSEGV, "SIGSEGV", on_p);
+  catch_signal (si, SIGFPE,  on_p);
+  catch_signal (si, SIGBUS,  on_p);
+  catch_signal (si, SIGSEGV, on_p);
 #ifdef SIGSYS
-  catch_signal (SIGSYS,  "SIGSYS",  on_p);
+  catch_signal (si, SIGSYS,  on_p);
 #endif
-  catch_signal (SIGTERM, "SIGTERM", on_p);
+  catch_signal (si, SIGTERM, on_p);
 #ifdef SIGXCPU
-  catch_signal (SIGXCPU, "SIGXCPU", on_p);
+  catch_signal (si, SIGXCPU, on_p);
 #endif
 #ifdef SIGXFSZ
-  catch_signal (SIGXFSZ, "SIGXFSZ", on_p);
+  catch_signal (si, SIGXFSZ, on_p);
 #endif
 #ifdef SIGDANGER
-  catch_signal (SIGDANGER, "SIGDANGER", on_p);
+  catch_signal (si, SIGDANGER, on_p);
+#endif
+}
+
+void
+saver_exit (saver_info *si, int status)
+{
+  saver_preferences *p = &si->prefs;
+  static Bool exiting = False;
+  Bool vrs;
+
+  if (exiting)
+    exit(status);
+
+  exiting = True;
+  
+  vrs = restore_real_vroot_1 (si);
+  emergency_kill_subproc (si);
+
+  if (vrs && (p->verbose_p || status != 0))
+    fprintf (real_stderr, "%s: vroot restored, exiting.\n", blurb());
+  else if (p->verbose_p)
+    fprintf (real_stderr, "%s: no vroot to restore; exiting.\n", blurb());
+
+  fflush(real_stdout);
+
+#ifdef VMS     /* on VMS, 1 is the "normal" exit code instead of 0. */
+  if (status == 0) status = 1;
+  else if (status == 1) status = -1;
 #endif
+
+  if (si->prefs.debug_p)
+    {
+      fprintf(real_stderr, "%s: dumping core (because of -debug)\n", blurb());
+      /* Do this to drop a core file, so that we can get a stack trace. */
+      abort();
+    }
+
+  exit (status);
 }
 
 \f
 /* Managing the actual screensaver window */
 
 Bool
-window_exists_p (dpy, window)
-     Display *dpy;
-     Window window;
+window_exists_p (Display *dpy, Window window)
 {
-  int (*old_handler) ();
+  XErrorHandler old_handler;
   XWindowAttributes xgwa;
   xgwa.screen = 0;
   old_handler = XSetErrorHandler (BadWindow_ehandler);
@@ -472,9 +640,13 @@ window_exists_p (dpy, window)
   return (xgwa.screen != 0);
 }
 
-void
-initialize_screensaver_window P((void))
+static void
+initialize_screensaver_window_1 (saver_screen_info *ssi)
 {
+  saver_info *si = ssi->global;
+  saver_preferences *p = &si->prefs;
+  Bool install_cmap_p = (ssi->install_cmap_p || p->install_cmap_p);
+
   /* This resets the screensaver window as fully as possible, since there's
      no way of knowing what some random client may have done to us in the
      meantime.  We could just destroy and recreate the window, but that has
@@ -484,88 +656,90 @@ initialize_screensaver_window P((void))
   XClassHint class_hints;
   XSetWindowAttributes attrs;
   unsigned long attrmask;
-  int width = WidthOfScreen (screen);
-  int height = HeightOfScreen (screen);
+  int width = WidthOfScreen (ssi->screen);
+  int height = HeightOfScreen (ssi->screen);
   char id [2048];
-
-  reset_stderr ();
+  static Bool printed_visual_info = False;  /* only print the message once. */
 
   black.red = black.green = black.blue = 0;
 
-  if (cmap == DefaultColormapOfScreen (screen))
-    cmap = 0;
+  if (ssi->cmap == DefaultColormapOfScreen (ssi->screen))
+    ssi->cmap = 0;
+
+  if (ssi->current_visual != DefaultVisualOfScreen (ssi->screen))
+    install_cmap_p = True;
 
-  if (install_cmap_p || visual != DefaultVisualOfScreen (screen))
+  if (install_cmap_p)
     {
-      if (! cmap)
+      if (! ssi->cmap)
        {
-         cmap = XCreateColormap (dpy, RootWindowOfScreen (screen),
-                                 visual, AllocNone);
-         if (! XAllocColor (dpy, cmap, &black)) abort ();
-         black_pixel = black.pixel;
+         ssi->cmap = XCreateColormap (si->dpy, RootWindowOfScreen (ssi->screen),
+                                     ssi->current_visual, AllocNone);
+         if (! XAllocColor (si->dpy, ssi->cmap, &black)) abort ();
+         ssi->black_pixel = black.pixel;
        }
     }
   else
     {
-      if (cmap)
+      Colormap def_cmap = DefaultColormapOfScreen (ssi->screen);
+      if (ssi->cmap)
        {
-         XFreeColors (dpy, cmap, &black_pixel, 1, 0);
-         XFreeColormap (dpy, cmap);
+         XFreeColors (si->dpy, ssi->cmap, &ssi->black_pixel, 1, 0);
+         if (ssi->cmap != ssi->demo_cmap &&
+             ssi->cmap != def_cmap)
+           XFreeColormap (si->dpy, ssi->cmap);
        }
-      cmap = DefaultColormapOfScreen (screen);
-      black_pixel = BlackPixelOfScreen (screen);
-    }
-
-  if (cmap2)
-    {
-      XFreeColormap (dpy, cmap2);
-      cmap2 = 0;
-    }
-
-  if (fade_p)
-    {
-      cmap2 = copy_colormap (dpy, cmap, 0);
-      if (! cmap2)
-       fade_p = unfade_p = 0;
+      ssi->cmap = def_cmap;
+      ssi->black_pixel = BlackPixelOfScreen (ssi->screen);
     }
 
   attrmask = (CWOverrideRedirect | CWEventMask | CWBackingStore | CWColormap |
              CWBackPixel | CWBackingPixel | CWBorderPixel);
   attrs.override_redirect = True;
+
+  /* When use_mit_saver_extension or use_sgi_saver_extension is true, we won't
+     actually be reading these events during normal operation; but we still
+     need to see Button events for demo-mode to work properly.
+   */
   attrs.event_mask = (KeyPressMask | KeyReleaseMask |
                      ButtonPressMask | ButtonReleaseMask |
                      PointerMotionMask);
+
   attrs.backing_store = NotUseful;
-  attrs.colormap = cmap;
-  attrs.background_pixel = black_pixel;
-  attrs.backing_pixel = black_pixel;
-  attrs.border_pixel = black_pixel;
+  attrs.colormap = ssi->cmap;
+  attrs.background_pixel = ssi->black_pixel;
+  attrs.backing_pixel = ssi->black_pixel;
+  attrs.border_pixel = ssi->black_pixel;
 
-#if 0
-  if (demo_mode_p || lock_p) width = width / 2;  /* #### */
-#endif
+  if (p->debug_p) width = width / 2;
 
-  if (screensaver_window || !verbose_p)
+  if (!p->verbose_p || printed_visual_info)
     ;
-  else if (visual == DefaultVisualOfScreen (screen))
+  else if (ssi->current_visual == DefaultVisualOfScreen (ssi->screen))
     {
-      fprintf (stderr, "%s: using default visual ", progname);
-      describe_visual (stderr, dpy, visual);
+      fprintf (stderr, "%s: using default visual ", blurb());
+      describe_visual (stderr, ssi->screen, ssi->current_visual,
+                      install_cmap_p);
     }
   else
     {
-      fprintf (stderr, "%s: using visual:   ", progname);
-      describe_visual (stderr, dpy, visual);
-      fprintf (stderr, "%s: default visual: ", progname);
-      describe_visual (stderr, dpy, DefaultVisualOfScreen (screen));
+      fprintf (stderr, "%s: using visual:   ", blurb());
+      describe_visual (stderr, ssi->screen, ssi->current_visual,
+                      install_cmap_p);
+      fprintf (stderr, "%s: default visual: ", blurb());
+      describe_visual (stderr, ssi->screen,
+                      DefaultVisualOfScreen (ssi->screen),
+                      ssi->install_cmap_p);
     }
+  printed_visual_info = True;
 
-#ifdef HAVE_SAVER_EXTENSION
-  if (use_saver_extension)
+#ifdef HAVE_MIT_SAVER_EXTENSION
+  if (p->use_mit_saver_extension)
     {
       XScreenSaverInfo *info;
-      Window root = RootWindowOfScreen (screen);
+      Window root = RootWindowOfScreen (ssi->screen);
 
+#if 0
       /* This call sets the server screensaver timeouts to what we think
         they should be (based on the resources and args xscreensaver was
         started with.)  It's important that we do this to sync back up
@@ -576,11 +750,11 @@ initialize_screensaver_window P((void))
         but a side effect of this would be that the server would map its
         saver window (which we then hide again right away) meaning that
         the bits currently on the screen get blown away.  Ugly. */
-#if 0
+
       /* #### Ok, that doesn't work - when we tell the server that the
         screensaver is "off" it sends us a Deactivate event, which is
         sensible... but causes the saver to never come on.  Hmm. */
-      disable_builtin_screensaver ();
+      disable_builtin_screensaver (si, True);
 #endif /* 0 */
 
 #if 0
@@ -595,22 +769,22 @@ initialize_screensaver_window P((void))
         window, we'd have to reimplement the ACTIVATE ClientMessage to
         tell the *server* to tell *us* to turn on, to cause the window
         to get created at the right time.  Gag.  */
-      XScreenSaverSetAttributes (dpy, root,
+      XScreenSaverSetAttributes (si->dpy, root,
                                 0, 0, width, height, 0,
-                                visual_depth, InputOutput, visual,
+                                current_depth, InputOutput, visual,
                                 attrmask, &attrs);
-      XSync (dpy, False);
+      XSync (si->dpy, False);
 #endif /* 0 */
 
       info = XScreenSaverAllocInfo ();
-      XScreenSaverQueryInfo (dpy, root, info);
-      server_saver_window = info->window;
-      if (! server_saver_window) abort ();
+      XScreenSaverQueryInfo (si->dpy, root, info);
+      ssi->server_mit_saver_window = info->window;
+      if (! ssi->server_mit_saver_window) abort ();
       XFree (info);
     }
-#endif /* HAVE_SAVER_EXTENSION */
+#endif /* HAVE_MIT_SAVER_EXTENSION */
 
-  if (screensaver_window)
+  if (ssi->screensaver_window)
     {
       XWindowChanges changes;
       unsigned int changesmask = CWX|CWY|CWWidth|CWHeight|CWBorderWidth;
@@ -620,156 +794,522 @@ initialize_screensaver_window P((void))
       changes.height = height;
       changes.border_width = 0;
 
-      XConfigureWindow (dpy, screensaver_window, changesmask, &changes);
-      XChangeWindowAttributes (dpy, screensaver_window, attrmask, &attrs);
+      XConfigureWindow (si->dpy, ssi->screensaver_window,
+                       changesmask, &changes);
+      XChangeWindowAttributes (si->dpy, ssi->screensaver_window,
+                              attrmask, &attrs);
     }
   else
     {
-      screensaver_window =
-       XCreateWindow (dpy, RootWindowOfScreen (screen), 0, 0, width, height,
-                      0, visual_depth, InputOutput, visual, attrmask,
-                      &attrs);
+      ssi->screensaver_window =
+       XCreateWindow (si->dpy, RootWindowOfScreen (ssi->screen), 0, 0,
+                      width, height, 0, ssi->current_depth, InputOutput,
+                      ssi->current_visual, attrmask, &attrs);
+      reset_stderr (ssi);
+      store_activate_time(si, True);
+      if (p->verbose_p)
+       fprintf (stderr, "%s: saver window is 0x%lx.\n",
+                blurb(), (unsigned long) ssi->screensaver_window);
     }
 
-#ifdef HAVE_SAVER_EXTENSION
-  if (!use_saver_extension ||
-      window_exists_p (dpy, screensaver_window))
+#ifdef HAVE_MIT_SAVER_EXTENSION
+  if (!p->use_mit_saver_extension ||
+      window_exists_p (si->dpy, ssi->screensaver_window))
     /* When using the MIT-SCREEN-SAVER extension, the window pointed to
        by screensaver_window only exists while the saver is active.
        So we must be careful to only try and manipulate it while it
        exists...
+       (#### The above comment would be true if the MIT extension actually
+       worked, but it's not true today -- see `server_mit_saver_window'.)
      */
-#endif /* HAVE_SAVER_EXTENSION */
+#endif /* HAVE_MIT_SAVER_EXTENSION */
     {
       class_hints.res_name = progname;
       class_hints.res_class = progclass;
-      XSetClassHint (dpy, screensaver_window, &class_hints);
-      XStoreName (dpy, screensaver_window, "screensaver");
-      XChangeProperty (dpy, screensaver_window, XA_SCREENSAVER_VERSION,
+      XSetClassHint (si->dpy, ssi->screensaver_window, &class_hints);
+      XStoreName (si->dpy, ssi->screensaver_window, "screensaver");
+      XChangeProperty (si->dpy, ssi->screensaver_window,
+                      XA_SCREENSAVER_VERSION,
                       XA_STRING, 8, PropModeReplace,
-                      (unsigned char *) screensaver_version,
-                      strlen (screensaver_version));
-
-      sprintf (id, "%d on host ", getpid ());
-      if (! XmuGetHostname (id + strlen (id), sizeof (id) - strlen (id) - 1))
-       strcat (id, "???");
-      XChangeProperty (dpy, screensaver_window, XA_SCREENSAVER_ID, XA_STRING,
+                      (unsigned char *) si->version,
+                      strlen (si->version));
+
+      sprintf (id, "%lu on host ", (unsigned long) getpid ());
+
+# if defined(HAVE_UNAME)
+      {
+       struct utsname uts;
+       if (uname (&uts) < 0)
+         strcat (id, "???");
+       else
+         strcat (id, uts.nodename);
+      }
+# elif defined(VMS)
+      strcat (id, getenv("SYS$NODE"));
+# else  /* !HAVE_UNAME && !VMS */
+      strcat (id, "???");
+# endif /* !HAVE_UNAME && !VMS */
+
+      XChangeProperty (si->dpy, ssi->screensaver_window,
+                      XA_SCREENSAVER_ID, XA_STRING,
                       8, PropModeReplace, (unsigned char *) id, strlen (id));
 
-      if (!cursor)
+      if (!ssi->cursor)
        {
          Pixmap bit;
-         bit = XCreatePixmapFromBitmapData (dpy, screensaver_window, "\000",
-                                            1, 1,
-                                            BlackPixelOfScreen (screen),
-                                            BlackPixelOfScreen (screen), 1);
-         cursor = XCreatePixmapCursor (dpy, bit, bit, &black, &black, 0, 0);
-         XFreePixmap (dpy, bit);
+         bit = XCreatePixmapFromBitmapData (si->dpy, ssi->screensaver_window,
+                                            "\000", 1, 1,
+                                            BlackPixelOfScreen (ssi->screen),
+                                            BlackPixelOfScreen (ssi->screen),
+                                            1);
+         ssi->cursor = XCreatePixmapCursor (si->dpy, bit, bit, &black, &black,
+                                            0, 0);
+         XFreePixmap (si->dpy, bit);
        }
 
-      XSetWindowBackground (dpy, screensaver_window, black_pixel);
-      if (! demo_mode_p)
-       XDefineCursor (dpy, screensaver_window, cursor);
+      XSetWindowBackground (si->dpy, ssi->screensaver_window,
+                           ssi->black_pixel);
+      if (si->demo_mode_p)
+       XUndefineCursor (si->dpy, ssi->screensaver_window);
       else
-       XUndefineCursor (dpy, screensaver_window);
+       XDefineCursor (si->dpy, ssi->screensaver_window, ssi->cursor);
     }
 }
 
+void
+initialize_screensaver_window (saver_info *si)
+{
+  int i;
+  for (i = 0; i < si->nscreens; i++)
+    initialize_screensaver_window_1 (&si->screens[i]);
+}
+
 
 void 
-raise_window (inhibit_fade, between_hacks_p)
-     Bool inhibit_fade, between_hacks_p;
+raise_window (saver_info *si,
+             Bool inhibit_fade, Bool between_hacks_p, Bool dont_clear)
 {
-  initialize_screensaver_window ();
+  saver_preferences *p = &si->prefs;
+  int i;
 
-  if (fade_p && !inhibit_fade && !demo_mode_p)
+  initialize_screensaver_window (si);
+  reset_watchdog_timer (si, True);
+
+  if (p->fade_p && !inhibit_fade && !si->demo_mode_p)
     {
-      int grabbed;
-      Colormap current_map = (between_hacks_p
-                             ? cmap
-                             : DefaultColormapOfScreen (screen));
-      copy_colormap (dpy, current_map, cmap2);
-      XGrabServer (dpy);
-      /* grab and blacken mouse on the root window (saver not mapped yet) */
-      grabbed = grab_mouse (RootWindowOfScreen (screen));
-      /* fade what's on the screen to black */
-      XInstallColormap (dpy, cmap2);
-      fade_colormap (dpy, current_map, cmap2, fade_seconds, fade_ticks, True);
-      XClearWindow (dpy, screensaver_window);
-      XMapRaised (dpy, screensaver_window);
-
-#ifdef HAVE_SAVER_EXTENSION
-      if (server_saver_window && window_exists_p (dpy, server_saver_window))
-       XUnmapWindow (dpy, server_saver_window);
-#endif /* HAVE_SAVER_EXTENSION */
-
-      /* Once the saver window is up, restore the colormap.
-        (The "black" pixels of the two colormaps are compatible.) */
-      XInstallColormap (dpy, cmap);
+      int grabbed = -1;
+      Window *current_windows = (Window *)
+       calloc(sizeof(Window), si->nscreens);
+      Colormap *current_maps = (Colormap *)
+       calloc(sizeof(Colormap), si->nscreens);
+
+      for (i = 0; i < si->nscreens; i++)
+       {
+         saver_screen_info *ssi = &si->screens[i];
+         current_windows[i] = ssi->screensaver_window;
+         current_maps[i] = (between_hacks_p
+                            ? ssi->cmap
+                            : DefaultColormapOfScreen (ssi->screen));
+         /* Ensure that the default background of the window is really black,
+            not a pixmap or something.  (This does not clear the window.) */
+         XSetWindowBackground (si->dpy, ssi->screensaver_window,
+                               ssi->black_pixel);
+       }
+
+      if (p->verbose_p) fprintf (stderr, "%s: fading... ", blurb());
+
+      XGrabServer (si->dpy);                   /* ############ DANGER! */
+
+      /* Clear the stderr layer on each screen.
+        Grab the mouse on the first screen on which the mouse is grabbable
+        (if there are multiple heads, I think you might only be able to
+        grab the mouse on the screen that currently has the mouse?  Anyway,
+        we only grab the mouse once, and don't try again after the grab
+        has succeeded.)  We grab the mouse on the root window of the screen,
+        not on the screensaver window, since the screensaver window is not
+        yet mapped.
+       */
+      for (i = 0; i < si->nscreens; i++)
+       {
+         saver_screen_info *ssi = &si->screens[i];
+
+         /* grab and blacken mouse on the root window (saver not mapped yet)
+          */
+         if (grabbed != GrabSuccess)
+           {
+             Window root = RootWindowOfScreen(ssi->screen);
+             grabbed = grab_mouse (si, root,
+                                   (si->demo_mode_p ? 0 : ssi->cursor));
+           }
+
+         if (!dont_clear || ssi->stderr_overlay_window)
+           /* Do this before the fade, since the stderr cmap won't fade
+              even if we uninstall it (beats me...) */
+           clear_stderr (ssi);
+       }
+
+      /* Note!  The server is grabbed, and this will take several seconds
+        to complete! */
+      fade_screens (si->dpy, current_maps, current_windows,
+                   p->fade_seconds, p->fade_ticks, True, !dont_clear);
+
+      free(current_maps);
+      free(current_windows);
+      current_maps = 0;
+      current_windows = 0;
+
+      if (p->verbose_p) fprintf (stderr, "fading done.\n");
+
+#ifdef HAVE_MIT_SAVER_EXTENSION
+      for (i = 0; i < si->nscreens; i++)
+       {
+         saver_screen_info *ssi = &si->screens[i];
+         if (ssi->server_mit_saver_window &&
+             window_exists_p (si->dpy, ssi->server_mit_saver_window))
+           XUnmapWindow (si->dpy, ssi->server_mit_saver_window);
+       }
+#endif /* HAVE_MIT_SAVER_EXTENSION */
+
+      /* If we had successfully grabbed the mouse, let it go now. */
       if (grabbed == GrabSuccess)
-       XUngrabPointer (dpy, CurrentTime);
-      XUngrabServer (dpy);
+       ungrab_mouse (si);
+
+      XUngrabServer (si->dpy);
+      XSync (si->dpy, False);                  /* ###### (danger over) */
     }
   else
     {
-      XClearWindow (dpy, screensaver_window);
-      XMapRaised (dpy, screensaver_window);
-#ifdef HAVE_SAVER_EXTENSION
-      if (server_saver_window && window_exists_p (dpy, server_saver_window))
-       XUnmapWindow (dpy, server_saver_window);
-#endif /* HAVE_SAVER_EXTENSION */
+      for (i = 0; i < si->nscreens; i++)
+       {
+         saver_screen_info *ssi = &si->screens[i];
+         if (!dont_clear)
+           XClearWindow (si->dpy, ssi->screensaver_window);
+         if (!dont_clear || ssi->stderr_overlay_window)
+           clear_stderr (ssi);
+         XMapRaised (si->dpy, ssi->screensaver_window);
+#ifdef HAVE_MIT_SAVER_EXTENSION
+         if (ssi->server_mit_saver_window &&
+             window_exists_p (si->dpy, ssi->server_mit_saver_window))
+           XUnmapWindow (si->dpy, ssi->server_mit_saver_window);
+#endif /* HAVE_MIT_SAVER_EXTENSION */
+       }
     }
 
-  if (install_cmap_p)
-    XInstallColormap (dpy, cmap);
+  for (i = 0; i < si->nscreens; i++)
+    {
+      saver_screen_info *ssi = &si->screens[i];
+      if (ssi->cmap)
+       XInstallColormap (si->dpy, ssi->cmap);
+    }
 }
 
 void
-blank_screen ()
+blank_screen (saver_info *si)
 {
-  save_real_vroot ();
-  store_vroot_property (screensaver_window, screensaver_window);
-  raise_window (False, False);
-  grab_keyboard_and_mouse ();
-#ifdef __hpux
-  if (lock_p)
-    XHPDisableReset (dpy);     /* turn off C-Sh-Reset */
+  int i;
+  for (i = 0; i < si->nscreens; i++)
+    {
+      saver_screen_info *ssi = &si->screens[i];
+
+      save_real_vroot (ssi);
+      store_vroot_property (si->dpy,
+                           ssi->screensaver_window,
+                           ssi->screensaver_window);
+    }
+  store_activate_time (si, si->screen_blanked_p);
+  raise_window (si, False, False, False);
+
+  /* Note: we do our grabs on the root window, not on the screensaver window.
+     If we grabbed on the saver window, then the demo mode and lock dialog
+     boxes wouldn't get any events.
+   */
+  grab_keyboard_and_mouse (si,
+                          /*si->screens[0].screensaver_window,*/
+                          RootWindowOfScreen(si->screens[0].screen),
+                          (si->demo_mode_p ? 0 : si->screens[0].cursor));
+
+#ifdef HAVE_XHPDISABLERESET
+  if (si->locked_p && !hp_locked_p)
+    {
+      XHPDisableReset (si->dpy);       /* turn off C-Sh-Reset */
+      hp_locked_p = True;
+    }
 #endif
+
+  si->screen_blanked_p = True;
 }
 
 void
-unblank_screen ()
+unblank_screen (saver_info *si)
 {
-  if (unfade_p && !demo_mode_p)
+  saver_preferences *p = &si->prefs;
+  int i;
+
+  monitor_power_on (si);
+
+  store_activate_time (si, True);
+  reset_watchdog_timer (si, False);
+
+  if (p->unfade_p && !si->demo_mode_p)
     {
-      int grabbed;
-      Colormap default_map = DefaultColormapOfScreen (screen);
-      blacken_colormap (dpy, cmap2);
-      XGrabServer (dpy);
-      /* grab and blacken mouse on the root window. */
-      grabbed = grab_mouse (RootWindowOfScreen (screen));
-      XInstallColormap (dpy, cmap2);
-      XUnmapWindow (dpy, screensaver_window);
-      fade_colormap (dpy, default_map, cmap2, fade_seconds, fade_ticks, False);
-      XInstallColormap (dpy, default_map);
+      int grabbed = -1;
+      Window *current_windows = (Window *)
+       calloc(sizeof(Window), si->nscreens);
+
+      for (i = 0; i < si->nscreens; i++)
+       {
+         saver_screen_info *ssi = &si->screens[i];
+         current_windows[i] = ssi->screensaver_window;
+         /* Ensure that the default background of the window is really black,
+            not a pixmap or something.  (This does not clear the window.) */
+         XSetWindowBackground (si->dpy, ssi->screensaver_window,
+                               ssi->black_pixel);
+       }
+
+      if (p->verbose_p) fprintf (stderr, "%s: unfading... ", blurb());
+
+
+      XSync (si->dpy, False);
+      XGrabServer (si->dpy);                   /* ############ DANGER! */
+      XSync (si->dpy, False);
+
+      /* Clear the stderr layer on each screen.
+        Grab the mouse on the first screen on which the mouse is grabbable
+        (if there are multiple heads, I think you might only be able to
+        grab the mouse on the screen that currently has the mouse?  Anyway,
+        we only grab the mouse once, and don't try again after the grab
+        has succeeded.)
+       */
+      for (i = 0; i < si->nscreens; i++)
+       {
+         saver_screen_info *ssi = &si->screens[i];
+         if (grabbed != GrabSuccess)
+           grabbed = grab_mouse (si, RootWindowOfScreen (ssi->screen),
+                                 0);
+         clear_stderr (ssi);
+       }
+
+      XUngrabServer (si->dpy);
+      XSync (si->dpy, False);                  /* ###### (danger over) */
+
+
+      fade_screens (si->dpy, 0, current_windows,
+                   p->fade_seconds, p->fade_ticks,
+                   False, False);
+
+      free(current_windows);
+      current_windows = 0;
+
+      if (p->verbose_p) fprintf (stderr, "unfading done.\n");
+
+      /* If we had successfully grabbed the mouse, let it go now. */
       if (grabbed == GrabSuccess)
-       XUngrabPointer (dpy, CurrentTime);
-      XUngrabServer (dpy);
+       ungrab_mouse (si);
     }
   else
     {
-      if (install_cmap_p)
+      for (i = 0; i < si->nscreens; i++)
        {
-         XClearWindow (dpy, screensaver_window); /* avoid technicolor */
-         XInstallColormap (dpy, DefaultColormapOfScreen (screen));
+         saver_screen_info *ssi = &si->screens[i];
+         if (ssi->cmap)
+           {
+             Colormap c = DefaultColormapOfScreen (ssi->screen);
+             /* avoid technicolor */
+             XClearWindow (si->dpy, ssi->screensaver_window);
+             if (c) XInstallColormap (si->dpy, c);
+           }
+         XUnmapWindow (si->dpy, ssi->screensaver_window);
        }
-      XUnmapWindow (dpy, screensaver_window);
-    }
-  kill_xsetroot_data ();
-  ungrab_keyboard_and_mouse ();
-  restore_real_vroot ();
-#ifdef __hpux
-  if (lock_p)
-    XHPEnableReset (dpy);      /* turn C-Sh-Reset back on */
+    }
+
+
+  /* If the focus window does has a non-default colormap, then install
+     that colormap as well.  (On SGIs, this will cause both the root map
+     and the focus map to be installed simultaniously.  It'd be nice to
+     pick up the other colormaps that had been installed, too; perhaps
+     XListInstalledColormaps could be used for that?)
+   */
+  {
+    Window focus = 0;
+    int revert_to;
+    XGetInputFocus (si->dpy, &focus, &revert_to);
+    if (focus && focus != PointerRoot && focus != None)
+      {
+       XWindowAttributes xgwa;
+       xgwa.colormap = 0;
+       XGetWindowAttributes (si->dpy, focus, &xgwa);
+       if (xgwa.colormap &&
+           xgwa.colormap != DefaultColormapOfScreen (xgwa.screen))
+         XInstallColormap (si->dpy, xgwa.colormap);
+      }
+  }
+
+
+  for (i = 0; i < si->nscreens; i++)
+    {
+      saver_screen_info *ssi = &si->screens[i];
+      kill_xsetroot_data (si->dpy, ssi->screensaver_window, p->verbose_p);
+    }
+
+  store_activate_time(si, False);  /* store unblank time */
+
+  ungrab_keyboard_and_mouse (si);
+  restore_real_vroot (si);
+
+#ifdef HAVE_XHPDISABLERESET
+  if (hp_locked_p)
+    {
+      XHPEnableReset (si->dpy);        /* turn C-Sh-Reset back on */
+      hp_locked_p = False;
+    }
 #endif
+
+  /* Unmap the windows a second time, dammit -- just to avoid a race
+     with the screen-grabbing hacks.  (I'm not sure if this is really
+     necessary; I'm stabbing in the dark now.)
+  */
+  for (i = 0; i < si->nscreens; i++)
+    XUnmapWindow (si->dpy, si->screens[i].screensaver_window);
+
+  si->screen_blanked_p = False;
+}
+
+
+static void
+store_activate_time (saver_info *si, Bool use_last_p)
+{
+  static time_t last_time = 0;
+  time_t now = ((use_last_p && last_time) ? last_time : time ((time_t) 0));
+  CARD32 now32 = (CARD32) now;
+  int i;
+  last_time = now;
+
+  for (i = 0; i < si->nscreens; i++)
+    {
+      saver_screen_info *ssi = &si->screens[i];
+      if (!ssi->screensaver_window) continue;
+      XChangeProperty (si->dpy, ssi->screensaver_window, XA_SCREENSAVER_TIME,
+                      XA_INTEGER, 32, PropModeReplace,
+                      (unsigned char *) &now32, 1);
+    }
+}
+
+
+Bool
+select_visual (saver_screen_info *ssi, const char *visual_name)
+{
+  saver_info *si = ssi->global;
+  saver_preferences *p = &si->prefs;
+  Bool install_cmap_p = p->install_cmap_p;
+  Bool was_installed_p = (ssi->cmap != DefaultColormapOfScreen(ssi->screen));
+  Visual *new_v;
+  Bool got_it;
+
+  if (visual_name && *visual_name)
+    {
+      if (!strcmp(visual_name, "default-i"))
+       {
+         visual_name = "default";
+         install_cmap_p = True;
+       }
+      else if (!strcmp(visual_name, "default-n"))
+       {
+         visual_name = "default";
+         install_cmap_p = False;
+       }
+      new_v = get_visual (ssi->screen, visual_name, True, False);
+    }
+  else
+    {
+      new_v = ssi->default_visual;
+    }
+
+  got_it = !!new_v;
+
+  if (new_v && new_v != DefaultVisualOfScreen(ssi->screen))
+    install_cmap_p = True;
+
+  ssi->install_cmap_p = install_cmap_p;
+
+  if (new_v &&
+      ((ssi->current_visual != new_v) ||
+       (install_cmap_p != was_installed_p)))
+    {
+      Colormap old_c = ssi->cmap;
+      Window old_w = ssi->screensaver_window;
+
+      if (p->verbose_p)
+       {
+         fprintf (stderr, "%s: switching to visual ", blurb());
+         describe_visual (stderr, ssi->screen, new_v, install_cmap_p);
+#if 0
+         fprintf (stderr, "%s:                from ", blurb());
+         describe_visual (stderr, ssi->screen, ssi->current_visual,
+                          was_installed_p);
+#endif
+       }
+
+      reset_stderr (ssi);
+      ssi->current_visual = new_v;
+      ssi->current_depth = visual_depth(ssi->screen, new_v);
+      ssi->cmap = 0;
+      ssi->screensaver_window = 0;
+
+      initialize_screensaver_window_1 (ssi);
+      raise_window (si, True, True, False);
+      store_vroot_property (si->dpy,
+                           ssi->screensaver_window, ssi->screensaver_window);
+      store_activate_time (si, True);
+
+
+
+      /* Transfer the grabs from the old window to the new.
+        Actually I think none of this is necessary, since we always
+        hold our grabs on the root window, but I wrote this before
+        re-discovering that...
+       */
+
+
+      /* If we're destroying the window that holds our mouse grab,
+        transfer the grab to the new window.  (Grab the server while
+        so doing, to avoid a race condition.)
+       */
+      if (old_w == si->mouse_grab_window)
+       {
+         XGrabServer (si->dpy);                /* ############ DANGER! */
+         ungrab_mouse(si);
+         grab_mouse(si, ssi->screensaver_window,
+                    (si->demo_mode_p ? 0 : ssi->cursor));
+         XUngrabServer (si->dpy);
+         XSync (si->dpy, False);               /* ###### (danger over) */
+       }
+
+      /* If we're destroying the window that holds our keyboard grab,
+        transfer the grab to the new window.  (Grab the server while
+        so doing, to avoid a race condition.)
+       */
+      if (old_w == si->keyboard_grab_window)
+       {
+         XGrabServer (si->dpy);                /* ############ DANGER! */
+         ungrab_kbd(si);
+         grab_kbd(si, ssi->screensaver_window);
+         XUngrabServer (si->dpy);
+         XSync (si->dpy, False);               /* ###### (danger over) */
+       }
+
+      /* Now we can destroy this window without horking our grabs. */
+
+      XDestroyWindow (si->dpy, old_w);
+
+      if (p->verbose_p)
+       fprintf (stderr, "%s: destroyed old saver window 0x%lx.\n",
+                blurb(), (unsigned long) old_w);
+
+      if (old_c &&
+         old_c != DefaultColormapOfScreen (ssi->screen) &&
+         old_c != ssi->demo_cmap)
+       XFreeColormap (si->dpy, old_c);
+    }
+
+  return got_it;
 }