http://www.tienza.es/crux/src/www.jwz.org/xscreensaver/xscreensaver-5.05.tar.gz
[xscreensaver] / driver / test-passwd.c
index 019f86da1283d41055679db76bf563343659abd3..ac5bf99213873d24138e800e23a45283b9695aad 100644 (file)
@@ -1,4 +1,4 @@
-/* xscreensaver, Copyright (c) 1998 Jamie Zawinski <jwz@jwz.org>
+/* xscreensaver, Copyright (c) 1998-2007 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
@@ -20,6 +20,8 @@
 
 #include <stdio.h>
 #include <ctype.h>
+#include <pwd.h>
+
 #include <X11/Xlib.h>
 #include <X11/Xatom.h>
 #include <X11/Intrinsic.h>
@@ -29,6 +31,8 @@
 #include "xscreensaver.h"
 #include "resources.h"
 #include "version.h"
+#include "visual.h"
+#include "auth.h"
 
 char *progname = 0;
 char *progclass = 0;
@@ -37,25 +41,43 @@ saver_info *global_si_kludge;
 
 FILE *real_stderr, *real_stdout;
 
-void reset_stderr(saver_screen_info *ssi) {}
-void clear_stderr(saver_screen_info *ssi) {}
-void reset_watchdog_timer(saver_info *si, Bool on_p) {}
 void monitor_power_on (saver_info *si) {}
-void ungrab_keyboard_and_mouse (saver_info *si) {}
-Bool select_visual (saver_screen_info *ssi, const char *v) { return False; }
-void raise_window (saver_info *si, Bool i, Bool b, Bool d) {}
-void restore_real_vroot (saver_info *si) {}
-void saver_exit (saver_info *si, int status, const char *core) { exit(status);}
-const char * signal_name(int signal) { return "???"; }
 Bool monitor_powered_on_p (saver_info *si) { return True; }
-void start_notice_events_timer (saver_info *si, Window w) {}
 void initialize_screensaver_window (saver_info *si) {}
-void blank_screen (saver_info *si) {}
+void raise_window (saver_info *si, Bool i, Bool b, Bool d) {}
+Bool blank_screen (saver_info *si) {return False;}
 void unblank_screen (saver_info *si) {}
+Bool select_visual (saver_screen_info *ssi, const char *v) { return False; }
+Bool window_exists_p (Display *dpy, Window window) {return True;}
+void start_notice_events_timer (saver_info *si, Window w, Bool b) {}
 Bool handle_clientmessage (saver_info *si, XEvent *e, Bool u) { return False; }
 int BadWindow_ehandler (Display *dpy, XErrorEvent *error) { exit(1); }
+const char *signal_name(int signal) { return "???"; }
+Bool restore_real_vroot (saver_info *si) { return False; }
+void store_saver_status (saver_info *si) {}
+void saver_exit (saver_info *si, int status, const char *core) { exit(status);}
+int move_mouse_grab (saver_info *si, Window to, Cursor c, int ts) { return 0; }
+int mouse_screen (saver_info *si) { return 0; }
+void check_for_leaks (const char *where) { }
+void shutdown_stderr (saver_info *si) { }
 
 const char *blurb(void) { return progname; }
+Atom XA_SCREENSAVER, XA_DEMO, XA_PREFS;
+
+void
+get_screen_viewport (saver_screen_info *ssi,
+                     int *x_ret, int *y_ret,
+                     int *w_ret, int *h_ret,
+                     int tx, int ty,
+                     Bool verbose_p)
+{
+  *x_ret = 0;
+  *y_ret = 0;
+  *w_ret = WidthOfScreen (ssi->screen);
+  *h_ret = HeightOfScreen (ssi->screen);
+
+  if (*w_ret > *h_ret * 2) *w_ret /= 2;  /* xinerama kludge */
+}
 
 void
 idle_timer (XtPointer closure, XtIntervalId *id)
@@ -69,152 +91,72 @@ idle_timer (XtPointer closure, XtIntervalId *id)
 }
 
 
-static char *
-reformat_hack(const char *hack)
+static int
+text_auth_conv (
+  int num_msg,
+  const struct auth_message *auth_msgs,
+  struct auth_response **resp,
+  saver_info *si)
 {
+  char *input;
+  char buf[255];
+  struct auth_response *responses;
   int i;
-  const char *in = hack;
-  int indent = 13;
-  char *h2 = (char *) malloc(strlen(in) + indent + 2);
-  char *out = h2;
-
-  while (isspace(*in)) in++;           /* skip whitespace */
-  while (*in && !isspace(*in) && *in != ':')
-    *out++ = *in++;                    /* snarf first token */
-  while (isspace(*in)) in++;           /* skip whitespace */
-
-  if (*in == ':')
-    *out++ = *in++;                    /* copy colon */
-  else
-    {
-      in = hack;
-      out = h2;                                /* reset to beginning */
-    }
-
-  *out = 0;
 
-  while (isspace(*in)) in++;           /* skip whitespace */
-  for (i = strlen(h2); i < indent; i++)        /* indent */
-    *out++ = ' ';
-
-  while (*in) *out++ = *in++;          /* copy rest of line */
-  *out = 0;
-
-  return h2;
-}
+  responses = calloc(num_msg, sizeof(struct auth_response));
+  if (!responses)
+    return -1;
 
+  /* The unlock state won't actually be used until this function returns and
+   * the auth module processes the response, but set it anyway for consistency
+   */
+  si->unlock_state = ul_read;
 
-static void
-get_screenhacks (saver_info *si)
-{
-  saver_preferences *p = &si->prefs;
-  int i = 0;
-  int hacks_size = 60;
-  int size;
-  char *d;
-
-  d = get_string_resource ("monoPrograms", "MonoPrograms");
-  if (d && !*d) { free(d); d = 0; }
-  if (!d)
-    d = get_string_resource ("colorPrograms", "ColorPrograms");
-  if (d && !*d) { free(d); d = 0; }
-
-  if (d)
+  for (i = 0; i < num_msg; ++i)
     {
-      fprintf (stderr,
-       "%s: the `monoPrograms' and `colorPrograms' resources are obsolete;\n\
-       see the manual for details.\n", blurb());
-      free(d);
+      printf ("\n%s: %s", progname, auth_msgs[i].msg);
+      if (   auth_msgs[i].type == AUTH_MSGTYPE_PROMPT_NOECHO
+          || auth_msgs[i].type == AUTH_MSGTYPE_PROMPT_ECHO)
+        {
+          input = fgets (buf, sizeof(buf)-1, stdin);
+          if (!input || !*input)
+            exit (0);
+          if (input[strlen(input)-1] == '\n')
+            input[strlen(input)-1] = 0;
+
+          responses[i].response = strdup(input);
+        }
     }
 
-  d = get_string_resource ("programs", "Programs");
+  *resp = responses;
 
-  size = d ? strlen (d) : 0;
-  p->screenhacks = (char **) malloc (sizeof (char *) * hacks_size);
-  p->screenhacks_count = 0;
+  si->unlock_state = ul_finished;
 
-  while (i < size)
-    {
-      int end, start = i;
-      if (d[i] == ' ' || d[i] == '\t' || d[i] == '\n' || d[i] == 0)
-       {
-         i++;
-         continue;
-       }
-      if (hacks_size <= p->screenhacks_count)
-       p->screenhacks = (char **) realloc (p->screenhacks,
-                                           (hacks_size = hacks_size * 2) *
-                                           sizeof (char *));
-      p->screenhacks [p->screenhacks_count++] = d + i;
-      while (d[i] != 0 && d[i] != '\n')
-       i++;
-      end = i;
-      while (i > start && (d[i-1] == ' ' || d[i-1] == '\t'))
-       i--;
-      d[i] = 0;
-      i = end + 1;
-    }
+  return 0;
+}
 
-  /* shrink all whitespace to one space, for the benefit of the "demo"
-     mode display.  We only do this when we can easily tell that the
-     whitespace is not significant (no shell metachars).
-   */
-  for (i = 0; i < p->screenhacks_count; i++)
-    {
-      char *s = p->screenhacks [i];
-      char *s2;
-      int L = strlen (s);
-      int j, k;
-      for (j = 0; j < L; j++)
-       {
-         switch (s[j])
-           {
-           case '\'': case '"': case '`': case '\\':
-             goto DONE;
-           case '\t':
-             s[j] = ' ';
-           case ' ':
-             k = 0;
-             for (s2 = s+j+1; *s2 == ' ' || *s2 == '\t'; s2++)
-               k++;
-             if (k > 0)
-               {
-                 for (s2 = s+j+1; s2[k]; s2++)
-                   *s2 = s2[k];
-                 *s2 = 0;
-               }
-             break;
-           }
-       }
-    DONE:
-      p->screenhacks[i] = reformat_hack(s);  /* mallocs */
-    }
 
-  if (p->screenhacks_count)
-    {
-      /* Shrink down the screenhacks array to be only as big as it needs to.
-        This doesn't really matter at all. */
-      p->screenhacks = (char **)
-       realloc (p->screenhacks, ((p->screenhacks_count + 1) *
-                                 sizeof(char *)));
-      p->screenhacks [p->screenhacks_count] = 0;
-    }
-  else
-    {
-      free (p->screenhacks);
-      p->screenhacks = 0;
-    }
-}
+#ifdef __GNUC__
+ __extension__     /* shut up about "string length is greater than the length
+                      ISO C89 compilers are required to support" when including
+                      the .ad file... */
+#endif
 
+static char *fallback[] = {
+#include "XScreenSaver_ad.h"
+ 0
+};
 
 int
 main (int argc, char **argv)
 {
-  Widget toplevel_shell;
+  enum { PASS, SPLASH, TTY } which;
+  Widget toplevel_shell = 0;
   saver_screen_info ssip;
   saver_info sip;
   saver_info *si = &sip;
   saver_preferences *p = &si->prefs;
+  struct passwd *pw;
 
   memset(&sip, 0, sizeof(sip));
   memset(&ssip, 0, sizeof(ssip));
@@ -230,60 +172,134 @@ main (int argc, char **argv)
   si->version = (char *) malloc (5);
   memcpy (si->version, screensaver_id + 17, 4);
   progname = argv[0];
+  {
+    char *s = strrchr(progname, '/');
+    if (*s) strcpy (progname, s+1);
+  }
+
+  if (argc != 2) goto USAGE;
+  else if (!strcmp (argv[1], "pass"))   which = PASS;
+  else if (!strcmp (argv[1], "splash")) which = SPLASH;
+  else if (!strcmp (argv[1], "tty"))    which = TTY;
+  else
+    {
+    USAGE:
+      fprintf (stderr, "usage: %s [ pass | splash | tty ]\n", progname);
+      exit (1);
+    }
+
+#ifdef NO_LOCKING
+  if (which == PASS || which == TTY)
+    {
+      fprintf (stderr, "%s: compiled with NO_LOCKING\n", progname);
+      exit (1);
+    }
+#endif
 
-# ifdef SCO
-  set_auth_parameters(argc, argv);
-# endif /* SCO */
+#ifndef NO_LOCKING
+  /* before hack_uid() for proper permissions */
+  lock_priv_init (argc, argv, True);
 
-  if (! lock_init (argc, argv))        /* before hack_uid() for proper permissions */
+  hack_uid (si);
+
+  if (! lock_init (argc, argv, True))
     {
       si->locking_disabled_p = True;
       si->nolock_reason = "error getting password";
     }
-
-  hack_uid (si);
+#endif
 
   progclass = "XScreenSaver";
 
-  toplevel_shell = XtAppInitialize (&si->app, progclass, 0, 0,
-                                   &argc, argv, 0, 0, 0);
-
-  si->dpy = XtDisplay (toplevel_shell);
-  si->db = XtDatabase (si->dpy);
-  si->default_screen->toplevel_shell = toplevel_shell;
-  si->default_screen->screen = XtScreen(toplevel_shell);
-  si->default_screen->default_visual =
-    si->default_screen->current_visual =
-      DefaultVisualOfScreen(si->default_screen->screen);
-  si->default_screen->screensaver_window =
-    RootWindowOfScreen(si->default_screen->screen);
-
-  db = si->db;
-  XtGetApplicationNameAndClass (si->dpy, &progname, &progclass);
+  if (which != TTY)
+    {
+      toplevel_shell = XtAppInitialize (&si->app, progclass, 0, 0,
+                                        &argc, argv, fallback,
+                                        0, 0);
+
+      si->dpy = XtDisplay (toplevel_shell);
+      p->db = XtDatabase (si->dpy);
+      si->default_screen->toplevel_shell = toplevel_shell;
+      si->default_screen->screen = XtScreen(toplevel_shell);
+      si->default_screen->default_visual =
+        si->default_screen->current_visual =
+        DefaultVisualOfScreen(si->default_screen->screen);
+      si->default_screen->screensaver_window =
+        RootWindowOfScreen(si->default_screen->screen);
+      si->default_screen->current_depth =
+        visual_depth(si->default_screen->screen,
+                     si->default_screen->current_visual);
+
+      /* I could call get_screen_viewport(), but it is not worthwhile.
+       * These are used by the save_under pixmap. */
+      ssip.width = WidthOfScreen(ssip.screen);
+      ssip.height = HeightOfScreen(ssip.screen);
+
+      db = p->db;
+      XtGetApplicationNameAndClass (si->dpy, &progname, &progclass);
+
+      load_init_file (si->dpy, &si->prefs);
+    }
 
-  p->debug_p = True;
   p->verbose_p = True;
-  p->lock_p = True;
-  p->passwd_timeout = 1000 * get_seconds_resource ("passwdTimeout", "Time");
-
-  get_screenhacks(si);
 
-  hack_uid_warn (si);
+  pw = getpwuid (getuid ());
+  si->user = strdup (pw->pw_name);
 
   while (1)
     {
-#if 0
-      if (unlock_p (si))
-       fprintf (stderr, "%s: password correct\n", progname);
+#ifndef NO_LOCKING
+      if (which == PASS)
+        {
+         si->unlock_cb = gui_auth_conv;
+          si->auth_finished_cb = auth_finished_cb;
+
+         xss_authenticate(si, True);
+
+          if (si->unlock_state == ul_success)
+            fprintf (stderr, "%s: authentication succeeded\n", progname);
+          else
+            fprintf (stderr, "%s: authentication FAILED!\n", progname);
+
+          XSync(si->dpy, False);
+          fprintf (stderr, "\n######################################\n\n");
+          sleep (3);
+        }
       else
-       fprintf (stderr, "%s: password INCORRECT!\n", progname);
-
-      XSync(si->dpy, False);
-      sleep (3);
-#else
-      si->demo_mode_p = True;
-      make_screenhack_dialog (si);
-      XtAppMainLoop(si->app);
 #endif
+      if (which == SPLASH)
+        {
+          XEvent event;
+          make_splash_dialog (si);
+          XtAppAddTimeOut (si->app, p->splash_duration + 1000,
+                           idle_timer, (XtPointer) si);
+          while (si->splash_dialog)
+            {
+              XtAppNextEvent (si->app, &event);
+              if (event.xany.window == si->splash_dialog)
+                handle_splash_event (si, &event);
+              XtDispatchEvent (&event);
+            }
+          XSync (si->dpy, False);
+          sleep (1);
+        }
+#ifndef NO_LOCKING
+      else if (which == TTY)
+        {
+          si->unlock_cb = text_auth_conv;
+
+          printf ("%s: Authenticating user %s\n", progname, si->user);
+          xss_authenticate(si, True);
+
+          if (si->unlock_state == ul_success)
+            printf ("%s: Ok!\n", progname);
+          else
+            printf ("%s: Wrong!\n", progname);
+        }
+#endif
+      else
+        abort();
     }
+
+  free(si->user);
 }