vcs.maemo.org Git - xscreensaver/blob - xscreensaver/hacks/screenhack.c

   1 /* xscreensaver, Copyright (c) 1992-2010 Jamie Zawinski <jwz@jwz.org>
   2  *
   3  * Permission to use, copy, modify, distribute, and sell this software and its
   4  * documentation for any purpose is hereby granted without fee, provided that
   5  * the above copyright notice appear in all copies and that both that
   6  * copyright notice and this permission notice appear in supporting
   7  * documentation.  No representations are made about the suitability of this
   8  * software for any purpose.  It is provided "as is" without express or
   9  * implied warranty.
  10  *
  11  * And remember: X Windows is to graphics hacking as roman numerals are to
  12  * the square root of pi.
  13  */
  14
  15 /* This file contains simple code to open a window or draw on the root.
  16    The idea being that, when writing a graphics hack, you can just link
  17    with this .o to get all of the uninteresting junk out of the way.
  18
  19    Create a few static global procedures and variables:
  20
  21       static void *YOURNAME_init (Display *, Window);
  22
  23           Return an opaque structure representing your drawing state.
  24
  25       static unsigned long YOURNAME_draw (Display *, Window, void *closure);
  26
  27           Draw one frame.
  28           The `closure' arg is your drawing state, that you created in `init'.
  29           Return the number of microseconds to wait until the next frame.
  30
  31           This should return in some small fraction of a second.
  32           Do not call `usleep' or loop excessively.  For long loops, use a
  33           finite state machine.
  34
  35       static void YOURNAME_reshape (Display *, Window, void *closure,
  36                                     unsigned int width, unsigned int height);
  37
  38           Called when the size of the window changes with the new size.
  39
  40       static Bool YOURNAME_event (Display *, Window, void *closure,
  41                                   XEvent *event);
  42
  43           Called when a keyboard or mouse event arrives.
  44           Return True if you handle it in some way, False otherwise.
  45
  46       static void YOURNAME_free (Display *, Window, void *closure);
  47
  48            Called when you are done: free everything you've allocated,
  49            including your private `state' structure.
  50
  51            NOTE: this is called in windowed-mode when the user typed
  52            'q' or clicks on the window's close box; but when
  53            xscreensaver terminates this screenhack, it does so by
  54            killing the process with SIGSTOP.  So this callback is
  55            mostly useless.
  56
  57       static char YOURNAME_defaults [] = { "...", "...", ... , 0 };
  58
  59            This variable is an array of strings, your default resources.
  60            Null-terminate the list.
  61
  62       static XrmOptionDescRec YOURNAME_options[] = { { ... }, ... { 0,0,0,0 } }
  63
  64            This variable describes your command-line options.
  65            Null-terminate the list.
  66
  67       Finally , invoke the XSCREENSAVER_MODULE() macro to tie it all together.
  68
  69    Additional caveats:
  70
  71       - Make sure that all functions in your module are static (check this
  72         by running "nm -g" on the .o file).
  73
  74       - Do not use global variables: all such info must be stored in the
  75         private `state' structure.
  76
  77       - Do not use static function-local variables, either.  Put it in `state'.
  78
  79         Assume that there are N independent runs of this code going in the
  80         same address space at the same time: they must not affect each other.
  81
  82       - Don't forget to write an XML file to describe the user interface
  83         of your screen saver module.  See .../hacks/config/README for details.
  84  */
  85
  86 #define DEBUG_PAIR
  87
  88 #include <stdio.h>
  89 #include <X11/Intrinsic.h>
  90 #include <X11/IntrinsicP.h>
  91 #include <X11/CoreP.h>
  92 #include <X11/Shell.h>
  93 #include <X11/StringDefs.h>
  94 #include <X11/keysym.h>
  95 #include <dbus/dbus.h>
  96
  97 #ifdef __sgi
  98 # include <X11/SGIScheme.h>     /* for SgiUseSchemes() */
  99 #endif /* __sgi */
 100
 101 #ifdef HAVE_XMU
 102 # ifndef VMS
 103 #  include <X11/Xmu/Error.h>
 104 # else /* VMS */
 105 #  include <Xmu/Error.h>
 106 # endif
 107 #else
 108 # include "xmu.h"
 109 #endif
 110
 111 #include "screenhackI.h"
 112 #include "version.h"
 113 #include "vroot.h"
 114 #include "fps.h"
 115
 116 #ifndef _XSCREENSAVER_VROOT_H_
 117 # error Error!  You have an old version of vroot.h!  Check -I args.
 118 #endif /* _XSCREENSAVER_VROOT_H_ */
 119
 120 #ifndef isupper
 121 # define isupper(c)  ((c) >= 'A' && (c) <= 'Z')
 122 #endif
 123 #ifndef _tolower
 124 # define _tolower(c)  ((c) - 'A' + 'a')
 125 #endif
 126
 127
 128 /* This is defined by the SCREENHACK_MAIN() macro via screenhack.h.
 129  */
 130 extern struct xscreensaver_function_table *xscreensaver_function_table;
 131
 132
 133 const char *progname;   /* used by hacks in error messages */
 134 const char *progclass;  /* used by ../utils/resources.c */
 135 Bool mono_p;            /* used by hacks */
 136
 137
 138 static XrmOptionDescRec default_options [] = {
 139   { "-root",    ".root",                XrmoptionNoArg, "True" },
 140   { "-window",  ".root",                XrmoptionNoArg, "False" },
 141   { "-mono",    ".mono",                XrmoptionNoArg, "True" },
 142   { "-install", ".installColormap",     XrmoptionNoArg, "True" },
 143   { "-noinstall",".installColormap",    XrmoptionNoArg, "False" },
 144   { "-visual",  ".visualID",            XrmoptionSepArg, 0 },
 145   { "-window-id", ".windowID",          XrmoptionSepArg, 0 },
 146   { "-fps",     ".doFPS",               XrmoptionNoArg, "True" },
 147   { "-no-fps",  ".doFPS",               XrmoptionNoArg, "False" },
 148   { "-view",  ".view",                  XrmoptionSepArg, 1 },
 149
 150 # ifdef DEBUG_PAIR
 151   { "-pair",    ".pair",                XrmoptionNoArg, "True" },
 152 # endif /* DEBUG_PAIR */
 153   { 0, 0, 0, 0 }
 154 };
 155
 156 static char *default_defaults[] = {
 157   ".root:               false",
 158   "*geometry:           600x480", /* this should be .geometry, but nooooo... */
 159   "*mono:               false",
 160   "*installColormap:    false",
 161   "*doFPS:              false",
 162   "*visualID:           default",
 163   "*windowID:           ",
 164   "*desktopGrabber:     xscreensaver-getimage %s",
 165   0
 166 };
 167
 168 static XrmOptionDescRec *merged_options;
 169 static int merged_options_size;
 170 static char **merged_defaults;
 171
 172
 173 static void
 174 merge_options (void)
 175 {
 176   struct xscreensaver_function_table *ft = xscreensaver_function_table;
 177
 178   const XrmOptionDescRec *options = ft->options;
 179   const char * const *defaults    = ft->defaults;
 180   const char *progclass           = ft->progclass;
 181
 182   int def_opts_size, opts_size;
 183   int def_defaults_size, defaults_size;
 184
 185   for (def_opts_size = 0; default_options[def_opts_size].option;
 186        def_opts_size++)
 187     ;
 188   for (opts_size = 0; options[opts_size].option; opts_size++)
 189     ;
 190
 191   merged_options_size = def_opts_size + opts_size;
 192   merged_options = (XrmOptionDescRec *)
 193     malloc ((merged_options_size + 1) * sizeof(*default_options));
 194   memcpy (merged_options, default_options,
 195           (def_opts_size * sizeof(*default_options)));
 196   memcpy (merged_options + def_opts_size, options,
 197           ((opts_size + 1) * sizeof(*default_options)));
 198
 199   for (def_defaults_size = 0; default_defaults[def_defaults_size];
 200        def_defaults_size++)
 201     ;
 202   for (defaults_size = 0; defaults[defaults_size]; defaults_size++)
 203     ;
 204   merged_defaults = (char **)
 205     malloc ((def_defaults_size + defaults_size + 1) * sizeof (*defaults));;
 206   memcpy (merged_defaults, default_defaults,
 207           def_defaults_size * sizeof(*defaults));
 208   memcpy (merged_defaults + def_defaults_size, defaults,
 209           (defaults_size + 1) * sizeof(*defaults));
 210
 211   /* This totally sucks.  Xt should behave like this by default.
 212      If the string in `defaults' looks like ".foo", change that
 213      to "Progclass.foo".
 214    */
 215   {
 216     char **s;
 217     for (s = merged_defaults; *s; s++)
 218       if (**s == '.')
 219         {
 220           const char *oldr = *s;
 221           char *newr = (char *) malloc(strlen(oldr) + strlen(progclass) + 3);
 222           strcpy (newr, progclass);
 223           strcat (newr, oldr);
 224           *s = newr;
 225         }
 226       else
 227         *s = strdup (*s);
 228   }
 229 }
 230
 231 \f
 232 /* Make the X errors print out the name of this program, so we have some
 233    clue which one has a bug when they die under the screensaver.
 234  */
 235
 236 static int
 237 screenhack_ehandler (Display *dpy, XErrorEvent *error)
 238 {
 239   fprintf (stderr, "\nX error in %s:\n", progname);
 240   if (XmuPrintDefaultErrorMessage (dpy, error, stderr))
 241     exit (-1);
 242   else
 243     fprintf (stderr, " (nonfatal.)\n");
 244   return 0;
 245 }
 246
 247 static Bool
 248 MapNotify_event_p (Display *dpy, XEvent *event, XPointer window)
 249 {
 250   return (event->xany.type == MapNotify &&
 251           event->xvisibility.window == (Window) window);
 252 }
 253
 254
 255 static Atom XA_WM_PROTOCOLS, XA_WM_DELETE_WINDOW;
 256
 257 /* Dead-trivial event handling: exits if "q" or "ESC" are typed.
 258    Exit if the WM_PROTOCOLS WM_DELETE_WINDOW ClientMessage is received.
 259    Returns False if the screen saver should now terminate.
 260  */
 261 static Bool
 262 screenhack_handle_event_1 (Display *dpy, XEvent *event)
 263 {
 264   switch (event->xany.type)
 265     {
 266     case KeyPress:
 267       {
 268         KeySym keysym;
 269         char c = 0;
 270         XLookupString (&event->xkey, &c, 1, &keysym, 0);
 271         if (c == 'q' ||
 272             c == 'Q' ||
 273             c == 3 ||   /* ^C */
 274             c == 27)    /* ESC */
 275           return False;  /* exit */
 276         else if (! (keysym >= XK_Shift_L && keysym <= XK_Hyper_R))
 277           XBell (dpy, 0);  /* beep for non-chord keys */
 278       }
 279       break;
 280     case ButtonPress:
 281       XBell (dpy, 0);
 282       break;
 283     case ClientMessage:
 284       {
 285         if (event->xclient.message_type != XA_WM_PROTOCOLS)
 286           {
 287             char *s = XGetAtomName(dpy, event->xclient.message_type);
 288             if (!s) s = "(null)";
 289             fprintf (stderr, "%s: unknown ClientMessage %s received!\n",
 290                      progname, s);
 291           }
 292         else if (event->xclient.data.l[0] != XA_WM_DELETE_WINDOW)
 293           {
 294             char *s1 = XGetAtomName(dpy, event->xclient.message_type);
 295             char *s2 = XGetAtomName(dpy, event->xclient.data.l[0]);
 296             if (!s1) s1 = "(null)";
 297             if (!s2) s2 = "(null)";
 298             fprintf (stderr, "%s: unknown ClientMessage %s[%s] received!\n",
 299                      progname, s1, s2);
 300           }
 301         else
 302           {
 303             return False;  /* exit */
 304           }
 305       }
 306       break;
 307     }
 308   return True;
 309 }
 310
 311
 312 static Visual *
 313 pick_visual (Screen *screen)
 314 {
 315   struct xscreensaver_function_table *ft = xscreensaver_function_table;
 316
 317   if (ft->pick_visual_hook)
 318     {
 319       Visual *v = ft->pick_visual_hook (screen);
 320       if (v) return v;
 321     }
 322
 323   return get_visual_resource (screen, "visualID", "VisualID", False);
 324 }
 325
 326
 327 /* Notice when the user has requested a different visual or colormap
 328    on a pre-existing window (e.g., "-root -visual truecolor" or
 329    "-window-id 0x2c00001 -install") and complain, since when drawing
 330    on an existing window, we have no choice about these things.
 331  */
 332 static void
 333 visual_warning (Screen *screen, Window window, Visual *visual, Colormap cmap,
 334                 Bool window_p)
 335 {
 336   struct xscreensaver_function_table *ft = xscreensaver_function_table;
 337
 338   char *visual_string = get_string_resource (DisplayOfScreen (screen),
 339                                              "visualID", "VisualID");
 340   Visual *desired_visual = pick_visual (screen);
 341   char win[100];
 342   char why[100];
 343
 344   if (window == RootWindowOfScreen (screen))
 345     strcpy (win, "root window");
 346   else
 347     sprintf (win, "window 0x%lx", (unsigned long) window);
 348
 349   if (window_p)
 350     sprintf (why, "-window-id 0x%lx", (unsigned long) window);
 351   else
 352     strcpy (why, "-root");
 353
 354   if (visual_string && *visual_string)
 355     {
 356       char *s;
 357       for (s = visual_string; *s; s++)
 358         if (isupper (*s)) *s = _tolower (*s);
 359
 360       if (!strcmp (visual_string, "default") ||
 361           !strcmp (visual_string, "default") ||
 362           !strcmp (visual_string, "best"))
 363         /* don't warn about these, just silently DWIM. */
 364         ;
 365       else if (visual != desired_visual)
 366         {
 367           fprintf (stderr, "%s: ignoring `-visual %s' because of `%s'.\n",
 368                    progname, visual_string, why);
 369           fprintf (stderr, "%s: using %s's visual 0x%lx.\n",
 370                    progname, win, XVisualIDFromVisual (visual));
 371         }
 372       free (visual_string);
 373     }
 374
 375   if (visual == DefaultVisualOfScreen (screen) &&
 376       has_writable_cells (screen, visual) &&
 377       get_boolean_resource (DisplayOfScreen (screen),
 378                             "installColormap", "InstallColormap"))
 379     {
 380       fprintf (stderr, "%s: ignoring `-install' because of `%s'.\n",
 381                progname, why);
 382       fprintf (stderr, "%s: using %s's colormap 0x%lx.\n",
 383                progname, win, (unsigned long) cmap);
 384     }
 385
 386   if (ft->validate_visual_hook)
 387     {
 388       if (! ft->validate_visual_hook (screen, win, visual))
 389         exit (1);
 390     }
 391 }
 392
 393
 394 static void
 395 fix_fds (void)
 396 {
 397   /* Bad Things Happen if stdin, stdout, and stderr have been closed
 398      (as by the `sh incantation "attraction >&- 2>&-").  When you do
 399      that, the X connection gets allocated to one of these fds, and
 400      then some random library writes to stderr, and random bits get
 401      stuffed down the X pipe, causing "Xlib: sequence lost" errors.
 402      So, we cause the first three file descriptors to be open to
 403      /dev/null if they aren't open to something else already.  This
 404      must be done before any other files are opened (or the closing
 405      of that other file will again free up one of the "magic" first
 406      three FDs.)
 407
 408      We do this by opening /dev/null three times, and then closing
 409      those fds, *unless* any of them got allocated as #0, #1, or #2,
 410      in which case we leave them open.  Gag.
 411
 412      Really, this crap is technically required of *every* X program,
 413      if you want it to be robust in the face of "2>&-".
 414    */
 415   int fd0 = open ("/dev/null", O_RDWR);
 416   int fd1 = open ("/dev/null", O_RDWR);
 417   int fd2 = open ("/dev/null", O_RDWR);
 418   if (fd0 > 2) close (fd0);
 419   if (fd1 > 2) close (fd1);
 420   if (fd2 > 2) close (fd2);
 421 }
 422
 423
 424 static Boolean
 425 screenhack_table_handle_events (Display *dpy,
 426                                 const struct xscreensaver_function_table *ft,
 427                                 Window window, void *closure
 428 #ifdef DEBUG_PAIR
 429                                 , Window window2, void *closure2
 430 #endif
 431                                 )
 432 {
 433   XtAppContext app = XtDisplayToApplicationContext (dpy);
 434
 435   if (XtAppPending (app) & (XtIMTimer|XtIMAlternateInput))
 436     XtAppProcessEvent (app, XtIMTimer|XtIMAlternateInput);
 437
 438   while (XPending (dpy))
 439     {
 440       XEvent event;
 441       XNextEvent (dpy, &event);
 442
 443       if (event.xany.type == ConfigureNotify)
 444         {
 445           if (event.xany.window == window)
 446             ft->reshape_cb (dpy, window, closure,
 447                             event.xconfigure.width, event.xconfigure.height);
 448 #ifdef DEBUG_PAIR
 449           if (event.xany.window == window2)
 450             ft->reshape_cb (dpy, window2, closure2,
 451                             event.xconfigure.width, event.xconfigure.height);
 452 #endif
 453         }
 454       else if (event.xany.type == ClientMessage ||
 455                (! (event.xany.window == window
 456                    ? ft->event_cb (dpy, window, closure, &event)
 457 #ifdef DEBUG_PAIR
 458                    : event.xany.window == window2
 459                    ? ft->event_cb (dpy, window2, closure2, &event)
 460 #endif
 461                    : 0)))
 462         if (! screenhack_handle_event_1 (dpy, &event))
 463           return False;
 464
 465       if (XtAppPending (app) & (XtIMTimer|XtIMAlternateInput))
 466         XtAppProcessEvent (app, XtIMTimer|XtIMAlternateInput);
 467     }
 468   return True;
 469 }
 470
 471
 472 static Boolean
 473 usleep_and_process_events (Display *dpy,
 474                            const struct xscreensaver_function_table *ft,
 475                            Window window, fps_state *fpst, void *closure,
 476                            unsigned long delay
 477 #ifdef DEBUG_PAIR
 478                          , Window window2, fps_state *fpst2, void *closure2,
 479                            unsigned long delay2
 480 #endif
 481                            )
 482 {
 483   do {
 484     unsigned long quantum = 100000;  /* 1/10th second */
 485     if (quantum > delay)
 486       quantum = delay;
 487     delay -= quantum;
 488
 489     XSync (dpy, False);
 490     if (quantum > 0)
 491       {
 492         usleep (quantum);
 493         if (fpst) fps_slept (fpst, quantum);
 494 #ifdef DEBUG_PAIR
 495         if (fpst2) fps_slept (fpst2, quantum);
 496 #endif
 497       }
 498
 499     if (! screenhack_table_handle_events (dpy, ft, window, closure
 500 #ifdef DEBUG_PAIR
 501                                           , window2, closure2
 502 #endif
 503                                           ))
 504       return False;
 505   } while (delay > 0);
 506
 507   return True;
 508 }
 509
 510
 511 static void
 512 screenhack_do_fps (Display *dpy, Window w, fps_state *fpst, void *closure)
 513 {
 514   fps_compute (fpst, 0);
 515   fps_draw (fpst);
 516 }
 517
 518
 519 static void
 520 run_screenhack_table (Display *dpy,
 521                       Window window,
 522 # ifdef DEBUG_PAIR
 523                       Window window2,
 524 # endif
 525                       const struct xscreensaver_function_table *ft,
 526                       int view)
 527 {
 528 #define LIVEWP_SIGNAL_INTERFACE "org.maemo.livewp"
 529 #define LIVEWP_PAUSE_LIVEBG_ON_VIEW1 "pause_livebg_on_view1"
 530 #define LIVEWP_PAUSE_LIVEBG_ON_VIEW2 "pause_livebg_on_view2"
 531 #define LIVEWP_PAUSE_LIVEBG_ON_VIEW3 "pause_livebg_on_view3"
 532 #define LIVEWP_PAUSE_LIVEBG_ON_VIEW4 "pause_livebg_on_view4"
 533 #define LIVEWP_PAUSE_LIVEBG_ON_VIEW "pause_livebg_on_view"
 534 #define LIVEWP_PLAY_LIVEBG_ON_VIEW1 "play_livebg_on_view1"
 535 #define LIVEWP_PLAY_LIVEBG_ON_VIEW2 "play_livebg_on_view2"
 536 #define LIVEWP_PLAY_LIVEBG_ON_VIEW3 "play_livebg_on_view3"
 537 #define LIVEWP_PLAY_LIVEBG_ON_VIEW4 "play_livebg_on_view4"
 538 #define LIVEWP_PLAY_LIVEBG_ON_VIEW "play_livebg_on_view"
 539    DBusMessage* msg;
 540    DBusConnection* conn;
 541    DBusError err;
 542    DBusMessageIter args;
 543    int ret;
 544    char pause = 0;
 545    int param = 0;
 546    int start_frame = 200;
 547
 548   /* Kludge: even though the init_cb functions are declared to take 2 args,
 549      actually call them with 3, for the benefit of xlockmore_init() and
 550      xlockmore_setup().
 551    */
 552   void *(*init_cb) (Display *, Window, void *) =
 553     (void *(*) (Display *, Window, void *)) ft->init_cb;
 554
 555   void (*fps_cb) (Display *, Window, fps_state *, void *) = ft->fps_cb;
 556
 557   void *closure = init_cb (dpy, window, ft->setup_arg);
 558   fps_state *fpst = fps_init (dpy, window);
 559
 560 #ifdef DEBUG_PAIR
 561   void *closure2 = 0;
 562   fps_state *fpst2 = 0;
 563   if (window2) closure2 = init_cb (dpy, window2, ft->setup_arg);
 564   if (window2) fpst2 = fps_init (dpy, window2);
 565 #endif
 566
 567   if (! closure)  /* if it returns nothing, it can't possibly be re-entrant. */
 568     abort();
 569
 570   if (! fps_cb) fps_cb = screenhack_do_fps;
 571   /* DBUS */
 572   /* initialise the error */
 573   dbus_error_init(&err);
 574   conn = dbus_bus_get(DBUS_BUS_SESSION, &err);
 575   if (dbus_error_is_set(&err)) {
 576          fprintf(stderr, "Connection Error (%s)\n", err.message);
 577          dbus_error_free(&err);
 578   }
 579   if (NULL == conn) {
 580          fprintf(stderr, "Connection Null\n");
 581          exit(1);
 582   }
 583   if (view == 1){
 584         dbus_bus_add_match (conn, "type='signal', interface='org.maemo.livewp', member='pause_livebg_on_view1'", NULL);
 585         dbus_bus_add_match (conn, "type='signal', interface='org.maemo.livewp', member='play_livebg_on_view1'", NULL);
 586   }
 587   if (view == 2){
 588         dbus_bus_add_match (conn, "type='signal', interface='org.maemo.livewp', member='pause_livebg_on_view2'", NULL);
 589         dbus_bus_add_match (conn, "type='signal', interface='org.maemo.livewp', member='play_livebg_on_view2'", NULL);
 590   }
 591   if (view == 3){
 592         dbus_bus_add_match (conn, "type='signal', interface='org.maemo.livewp', member='pause_livebg_on_view3'", NULL);
 593         dbus_bus_add_match (conn, "type='signal', interface='org.maemo.livewp', member='play_livebg_on_view3'", NULL);
 594   }
 595   if (view == 4){
 596         dbus_bus_add_match (conn, "type='signal', interface='org.maemo.livewp', member='pause_livebg_on_view4'", NULL);
 597         dbus_bus_add_match (conn, "type='signal', interface='org.maemo.livewp', member='play_livebg_on_view4'", NULL);
 598   }
 599
 600   dbus_connection_flush(conn);
 601
 602   while (1)
 603     {
 604       if (pause == 0){
 605         unsigned long delay = ft->draw_cb (dpy, window, closure);
 606 #ifdef DEBUG_PAIR
 607         unsigned long delay2 = 0;
 608         if (window2) delay2 = ft->draw_cb (dpy, window2, closure2);
 609 #endif
 610
 611
 612         if (fpst) fps_cb (dpy, window, fpst, closure);
 613 #ifdef DEBUG_PAIR
 614         if (fpst2) fps_cb (dpy, window, fpst2, closure);
 615 #endif
 616       if (! usleep_and_process_events (dpy, ft,
 617                                        window, fpst, closure, delay
 618 #ifdef DEBUG_PAIR
 619                                        , window2, fpst2, closure2, delay2
 620 #endif
 621                                        ))
 622         break;
 623
 624       }
 625       if (start_frame > 0) {
 626           start_frame--;
 627           continue;
 628         }
 629         dbus_connection_flush(conn);
 630       if (pause == 0)
 631       /* non blocking read of the next available message */
 632         dbus_connection_read_write(conn, 0);
 633       else
 634       /* blocking read of the next available message */
 635         dbus_connection_read_write(conn, 20000);
 636
 637       msg = dbus_connection_pop_message(conn);
 638
 639       if (NULL == msg){
 640           continue;
 641       }
 642       fprintf(stderr, "signal on view %i\n", view);
 643       /* check this is a method call for the right interface & method */
 644       if ((view == 1 && dbus_message_is_signal(msg, LIVEWP_SIGNAL_INTERFACE, LIVEWP_PAUSE_LIVEBG_ON_VIEW1))||
 645           (view == 2 && dbus_message_is_signal(msg, LIVEWP_SIGNAL_INTERFACE, LIVEWP_PAUSE_LIVEBG_ON_VIEW2))||
 646           (view == 3 && dbus_message_is_signal(msg, LIVEWP_SIGNAL_INTERFACE, LIVEWP_PAUSE_LIVEBG_ON_VIEW3))||
 647           (view == 4 && dbus_message_is_signal(msg, LIVEWP_SIGNAL_INTERFACE, LIVEWP_PAUSE_LIVEBG_ON_VIEW4))){
 648           /* fprintf(stderr, "Pause scene visible %i\n", view); */
 649            pause = 1;
 650            dbus_message_unref (msg);
 651            continue;
 652       }
 653       if ((view == 1 && dbus_message_is_signal(msg, LIVEWP_SIGNAL_INTERFACE, LIVEWP_PLAY_LIVEBG_ON_VIEW1))||
 654           (view == 2 && dbus_message_is_signal(msg, LIVEWP_SIGNAL_INTERFACE, LIVEWP_PLAY_LIVEBG_ON_VIEW2))||
 655           (view == 3 && dbus_message_is_signal(msg, LIVEWP_SIGNAL_INTERFACE, LIVEWP_PLAY_LIVEBG_ON_VIEW3))||
 656           (view == 4 && dbus_message_is_signal(msg, LIVEWP_SIGNAL_INTERFACE, LIVEWP_PLAY_LIVEBG_ON_VIEW4))){
 657            /* fprintf(stderr, "Play scene visible %i\n", view); */
 658            pause = 0;
 659            dbus_message_unref (msg);
 660            continue;
 661       }
 662 #if 0
 663       /*  dbus_connection_steal_borrowed_message(conn, msg); */
 664      /* fprintf (stderr, "APPLICATION PATH11111111111111111111 %s %s %s\n",   dbus_message_get_path(msg),   dbus_message_get_interface (msg), dbus_message_get_member (msg));*/
 665         /*dbus_connection_return_message(conn, msg);*/
 666       if (dbus_message_is_signal(msg, LIVEWP_SIGNAL_INTERFACE, LIVEWP_PAUSE_LIVEBG_ON_VIEW) ||
 667           dbus_message_is_signal(msg, LIVEWP_SIGNAL_INTERFACE, LIVEWP_PLAY_LIVEBG_ON_VIEW)){
 668           if (!dbus_message_iter_init(msg, &args))
 669               fprintf(stderr, "dbus message has no param\n");
 670           else if (DBUS_TYPE_INT32 != dbus_message_iter_get_arg_type(&args))
 671               fprintf(stderr, "dbus message param is not int \n");
 672           else{
 673               dbus_message_iter_get_basic(&args, &param);
 674               fprintf(stderr, "dbus param = %i\n", param);
 675           }
 676           if (param == view){
 677               if (dbus_message_is_signal(msg, LIVEWP_SIGNAL_INTERFACE, LIVEWP_PAUSE_LIVEBG_ON_VIEW)){
 678                  fprintf(stderr, "dbus  Pause scene visible %i\n", param);
 679                      pause = 1;
 680               }
 681               if (dbus_message_is_signal(msg, LIVEWP_SIGNAL_INTERFACE, LIVEWP_PLAY_LIVEBG_ON_VIEW)){
 682                  fprintf(stderr, "dbus   Play scene visible %i\n", param);
 683                      pause = 0;
 684               }
 685               /*msg = dbus_connection_pop_message(conn);*/
 686               fprintf(stderr, "dbus  steal message serial = %i\n", dbus_message_get_serial(msg));
 687               /*dbus_connection_steal_borrowed_message(conn, msg);*/
 688           }else{
 689               fprintf(stderr, "dbus  return message\n");
 690               /*dbus_connection_return_message(conn, msg);*/
 691           }
 692       }
 693 #endif
 694       dbus_message_unref (msg);
 695     }
 696
 697   ft->free_cb (dpy, window, closure);
 698   if (fpst) fps_free (fpst);
 699
 700 #ifdef DEBUG_PAIR
 701   if (window2) ft->free_cb (dpy, window2, closure2);
 702   if (window2) fps_free (fpst2);
 703 #endif
 704   /* close the connection */
 705   dbus_connection_close(conn);
 706 }
 707
 708
 709 static Widget
 710 make_shell (Screen *screen, Widget toplevel, int width, int height)
 711 {
 712   Display *dpy = DisplayOfScreen (screen);
 713   Visual *visual = pick_visual (screen);
 714   Boolean def_visual_p = (toplevel &&
 715                           visual == DefaultVisualOfScreen (screen));
 716
 717   if (width  <= 0) width  = 600;
 718   if (height <= 0) height = 480;
 719
 720   if (def_visual_p)
 721     {
 722       Window window;
 723       XtVaSetValues (toplevel,
 724                      XtNmappedWhenManaged, False,
 725                      XtNwidth, width,
 726                      XtNheight, height,
 727                      XtNinput, True,  /* for WM_HINTS */
 728                      NULL);
 729       XtRealizeWidget (toplevel);
 730       window = XtWindow (toplevel);
 731
 732       if (get_boolean_resource (dpy, "installColormap", "InstallColormap"))
 733         {
 734           Colormap cmap =
 735             XCreateColormap (dpy, window, DefaultVisualOfScreen (screen),
 736                              AllocNone);
 737           XSetWindowColormap (dpy, window, cmap);
 738         }
 739     }
 740   else
 741     {
 742       unsigned int bg, bd;
 743       Widget new;
 744       Colormap cmap = XCreateColormap (dpy, VirtualRootWindowOfScreen(screen),
 745                                        visual, AllocNone);
 746       bg = get_pixel_resource (dpy, cmap, "background", "Background");
 747       bd = get_pixel_resource (dpy, cmap, "borderColor", "Foreground");
 748
 749       new = XtVaAppCreateShell (progname, progclass,
 750                                 topLevelShellWidgetClass, dpy,
 751                                 XtNmappedWhenManaged, False,
 752                                 XtNvisual, visual,
 753                                 XtNdepth, visual_depth (screen, visual),
 754                                 XtNwidth, width,
 755                                 XtNheight, height,
 756                                 XtNcolormap, cmap,
 757                                 XtNbackground, (Pixel) bg,
 758                                 XtNborderColor, (Pixel) bd,
 759                                 XtNinput, True,  /* for WM_HINTS */
 760                                 NULL);
 761
 762       if (!toplevel)  /* kludge for the second window in -pair mode... */
 763         XtVaSetValues (new, XtNx, 0, XtNy, 550, NULL);
 764
 765       XtRealizeWidget (new);
 766       toplevel = new;
 767     }
 768
 769   return toplevel;
 770 }
 771
 772 static void
 773 init_window (Display *dpy, Widget toplevel, const char *title)
 774 {
 775   Window window;
 776   XWindowAttributes xgwa;
 777   XtPopup (toplevel, XtGrabNone);
 778   XtVaSetValues (toplevel, XtNtitle, title, NULL);
 779
 780   /* Select KeyPress, and announce that we accept WM_DELETE_WINDOW.
 781    */
 782   window = XtWindow (toplevel);
 783   XGetWindowAttributes (dpy, window, &xgwa);
 784   XSelectInput (dpy, window,
 785                 (xgwa.your_event_mask | KeyPressMask | KeyReleaseMask |
 786                  ButtonPressMask | ButtonReleaseMask));
 787   XChangeProperty (dpy, window, XA_WM_PROTOCOLS, XA_ATOM, 32,
 788                    PropModeReplace,
 789                    (unsigned char *) &XA_WM_DELETE_WINDOW, 1);
 790 }
 791
 792
 793 int
 794 main (int argc, char **argv)
 795 {
 796   struct xscreensaver_function_table *ft = xscreensaver_function_table;
 797
 798 /*  osso_context_t  *osso; */
 799
 800   XWindowAttributes xgwa;
 801   Widget toplevel;
 802   Display *dpy;
 803   Window window;
 804 # ifdef DEBUG_PAIR
 805   Window window2 = 0;
 806   Widget toplevel2 = 0;
 807 # endif
 808   XtAppContext app;
 809   Bool root_p;
 810   Window on_window = 0;
 811   XEvent event;
 812   Boolean dont_clear;
 813   char version[255];
 814   int view;
 815
 816   fix_fds();
 817
 818   progname = argv[0];   /* reset later */
 819   progclass = ft->progclass;
 820
 821   if (ft->setup_cb)
 822     ft->setup_cb (ft, ft->setup_arg);
 823
 824   merge_options ();
 825
 826 #ifdef __sgi
 827   /* We have to do this on SGI to prevent the background color from being
 828      overridden by the current desktop color scheme (we'd like our backgrounds
 829      to be black, thanks.)  This should be the same as setting the
 830      "*useSchemes: none" resource, but it's not -- if that resource is
 831      present in the `default_defaults' above, it doesn't work, though it
 832      does work when passed as an -xrm arg on the command line.  So screw it,
 833      turn them off from C instead.
 834    */
 835   SgiUseSchemes ("none");
 836 #endif /* __sgi */
 837
 838   toplevel = XtAppInitialize (&app, progclass, merged_options,
 839                               merged_options_size, &argc, argv,
 840                               merged_defaults, 0, 0);
 841
 842   dpy = XtDisplay (toplevel);
 843
 844   XtGetApplicationNameAndClass (dpy,
 845                                 (char **) &progname,
 846                                 (char **) &progclass);
 847
 848   /* half-assed way of avoiding buffer-overrun attacks. */
 849   if (strlen (progname) >= 100) ((char *) progname)[100] = 0;
 850
 851   XSetErrorHandler (screenhack_ehandler);
 852
 853   XA_WM_PROTOCOLS = XInternAtom (dpy, "WM_PROTOCOLS", False);
 854   XA_WM_DELETE_WINDOW = XInternAtom (dpy, "WM_DELETE_WINDOW", False);
 855
 856   {
 857     char *v = (char *) strdup(strchr(screensaver_id, ' '));
 858     char *s1, *s2, *s3, *s4;
 859     s1 = (char *) strchr(v,  ' '); s1++;
 860     s2 = (char *) strchr(s1, ' ');
 861     s3 = (char *) strchr(v,  '('); s3++;
 862     s4 = (char *) strchr(s3, ')');
 863     *s2 = 0;
 864     *s4 = 0;
 865     sprintf (version, "%s: from the XScreenSaver %s distribution (%s.)",
 866              progclass, s1, s3);
 867     free(v);
 868   }
 869
 870   if (argc > 1)
 871     {
 872       const char *s;
 873       int i;
 874       int x = 18;
 875       int end = 78;
 876       Bool help_p = (!strcmp(argv[1], "-help") ||
 877                      !strcmp(argv[1], "--help"));
 878       fprintf (stderr, "%s\n", version);
 879       for (s = progclass; *s; s++) fprintf(stderr, " ");
 880       fprintf (stderr, "  http://www.jwz.org/xscreensaver/\n\n");
 881
 882       if (!help_p)
 883         fprintf(stderr, "Unrecognised option: %s\n", argv[1]);
 884       fprintf (stderr, "Options include: ");
 885       for (i = 0; i < merged_options_size; i++)
 886         {
 887           char *sw = merged_options [i].option;
 888           Bool argp = (merged_options [i].argKind == XrmoptionSepArg);
 889           int size = strlen (sw) + (argp ? 6 : 0) + 2;
 890           if (x + size >= end)
 891             {
 892               fprintf (stderr, "\n\t\t ");
 893               x = 18;
 894             }
 895           x += size;
 896           fprintf (stderr, "%s", sw);
 897           if (argp) fprintf (stderr, " <arg>");
 898           if (i != merged_options_size - 1) fprintf (stderr, ", ");
 899         }
 900
 901       fprintf (stderr, ".\n");
 902
 903 #if 0
 904       if (help_p)
 905         {
 906           fprintf (stderr, "\nResources:\n\n");
 907           for (i = 0; i < merged_options_size; i++)
 908             {
 909               const char *opt = merged_options [i].option;
 910               const char *res = merged_options [i].specifier + 1;
 911               const char *val = merged_options [i].value;
 912               char *s = get_string_resource (dpy, (char *) res, (char *) res);
 913
 914               if (s)
 915                 {
 916                   int L = strlen(s);
 917                 while (L > 0 && (s[L-1] == ' ' || s[L-1] == '\t'))
 918                   s[--L] = 0;
 919                 }
 920
 921               fprintf (stderr, "    %-16s %-18s ", opt, res);
 922               if (merged_options [i].argKind == XrmoptionSepArg)
 923                 {
 924                   fprintf (stderr, "[%s]", (s ? s : "?"));
 925                 }
 926               else
 927                 {
 928                   fprintf (stderr, "%s", (val ? val : "(null)"));
 929                   if (val && s && !strcasecmp (val, s))
 930                     fprintf (stderr, " [default]");
 931                 }
 932               fprintf (stderr, "\n");
 933             }
 934           fprintf (stderr, "\n");
 935         }
 936 #endif
 937
 938       exit (help_p ? 0 : 1);
 939     }
 940
 941   {
 942     char **s;
 943     for (s = merged_defaults; *s; s++)
 944       free(*s);
 945   }
 946
 947   free (merged_options);
 948   free (merged_defaults);
 949   merged_options = 0;
 950   merged_defaults = 0;
 951
 952   dont_clear = get_boolean_resource (dpy, "dontClearRoot", "Boolean");
 953   mono_p = get_boolean_resource (dpy, "mono", "Boolean");
 954   if (CellsOfScreen (DefaultScreenOfDisplay (dpy)) <= 2)
 955     mono_p = True;
 956
 957   root_p = get_boolean_resource (dpy, "root", "Boolean");
 958
 959   {
 960     char *s = get_string_resource (dpy, "windowID", "WindowID");
 961     if (s && *s)
 962       on_window = get_integer_resource (dpy, "windowID", "WindowID");
 963     if (s) free (s);
 964   }
 965
 966   view = get_integer_resource (dpy, "view", "view");
 967   fprintf(stderr, "View %i\n", view);
 968   if (on_window)
 969     {
 970       window = (Window) on_window;
 971       XtDestroyWidget (toplevel);
 972       XGetWindowAttributes (dpy, window, &xgwa);
 973       visual_warning (xgwa.screen, window, xgwa.visual, xgwa.colormap, True);
 974
 975       /* Select KeyPress and resize events on the external window.
 976        */
 977       xgwa.your_event_mask |= KeyPressMask | StructureNotifyMask;
 978       XSelectInput (dpy, window, xgwa.your_event_mask);
 979
 980       /* Select ButtonPress and ButtonRelease events on the external window,
 981          if no other app has already selected them (only one app can select
 982          ButtonPress at a time: BadAccess results.)
 983        */
 984       if (! (xgwa.all_event_masks & (ButtonPressMask | ButtonReleaseMask)))
 985         XSelectInput (dpy, window,
 986                       (xgwa.your_event_mask |
 987                        ButtonPressMask | ButtonReleaseMask));
 988     }
 989   else if (root_p)
 990     {
 991       window = VirtualRootWindowOfScreen (XtScreen (toplevel));
 992       XtDestroyWidget (toplevel);
 993       XGetWindowAttributes (dpy, window, &xgwa);
 994       /* With RANDR, the root window can resize! */
 995       XSelectInput (dpy, window, xgwa.your_event_mask | StructureNotifyMask);
 996       visual_warning (xgwa.screen, window, xgwa.visual, xgwa.colormap, False);
 997     }
 998   else
 999     {
1000       Widget new = make_shell (XtScreen (toplevel), toplevel,
1001                                toplevel->core.width,
1002                                toplevel->core.height);
1003       if (new != toplevel)
1004         {
1005           XtDestroyWidget (toplevel);
1006           toplevel = new;
1007         }
1008
1009       init_window (dpy, toplevel, version);
1010       window = XtWindow (toplevel);
1011       XGetWindowAttributes (dpy, window, &xgwa);
1012
1013 # ifdef DEBUG_PAIR
1014       if (get_boolean_resource (dpy, "pair", "Boolean"))
1015         {
1016           toplevel2 = make_shell (xgwa.screen, 0,
1017                                   toplevel->core.width,
1018                                   toplevel->core.height);
1019           init_window (dpy, toplevel2, version);
1020           window2 = XtWindow (toplevel2);
1021         }
1022 # endif /* DEBUG_PAIR */
1023     }
1024
1025   if (!dont_clear)
1026     {
1027       unsigned int bg = get_pixel_resource (dpy, xgwa.colormap,
1028                                             "background", "Background");
1029       XSetWindowBackground (dpy, window, bg);
1030       XClearWindow (dpy, window);
1031 # ifdef DEBUG_PAIR
1032       if (window2)
1033         {
1034           XSetWindowBackground (dpy, window2, bg);
1035           XClearWindow (dpy, window2);
1036         }
1037 # endif
1038     }
1039
1040   if (!root_p && !on_window)
1041     /* wait for it to be mapped */
1042     XIfEvent (dpy, &event, MapNotify_event_p, (XPointer) window);
1043
1044   XSync (dpy, False);
1045
1046   /* This is the one and only place that the random-number generator is
1047      seeded in any screenhack.  You do not need to seed the RNG again,
1048      it is done for you before your code is invoked. */
1049 # undef ya_rand_init
1050   ya_rand_init (0);
1051
1052   run_screenhack_table (dpy, window,
1053 # ifdef DEBUG_PAIR
1054                         window2,
1055 # endif
1056                         ft, view);
1057
1058   XtDestroyWidget (toplevel);
1059   XtDestroyApplicationContext (app);
1060
1061   return 0;
1062 }