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       if (pause == 0)
 630       /* non blocking read of the next available message */
 631         dbus_connection_read_write(conn, 0);
 632       else
 633       /* blocking read of the next available message */
 634         dbus_connection_read_write(conn, 20000);
 635
 636       msg = dbus_connection_pop_message(conn);
 637
 638       if (NULL == msg){
 639           continue;
 640       }
 641       fprintf(stderr, "signal on view %i\n", view);
 642       /* check this is a method call for the right interface & method */
 643       if ((view == 1 && dbus_message_is_signal(msg, LIVEWP_SIGNAL_INTERFACE, LIVEWP_PAUSE_LIVEBG_ON_VIEW1))||
 644           (view == 2 && dbus_message_is_signal(msg, LIVEWP_SIGNAL_INTERFACE, LIVEWP_PAUSE_LIVEBG_ON_VIEW2))||
 645           (view == 3 && dbus_message_is_signal(msg, LIVEWP_SIGNAL_INTERFACE, LIVEWP_PAUSE_LIVEBG_ON_VIEW3))||
 646           (view == 4 && dbus_message_is_signal(msg, LIVEWP_SIGNAL_INTERFACE, LIVEWP_PAUSE_LIVEBG_ON_VIEW4))){
 647           /* fprintf(stderr, "Pause scene visible %i\n", view); */
 648            pause = 1;
 649            dbus_message_unref (msg);
 650            continue;
 651       }
 652       if ((view == 1 && dbus_message_is_signal(msg, LIVEWP_SIGNAL_INTERFACE, LIVEWP_PLAY_LIVEBG_ON_VIEW1))||
 653           (view == 2 && dbus_message_is_signal(msg, LIVEWP_SIGNAL_INTERFACE, LIVEWP_PLAY_LIVEBG_ON_VIEW2))||
 654           (view == 3 && dbus_message_is_signal(msg, LIVEWP_SIGNAL_INTERFACE, LIVEWP_PLAY_LIVEBG_ON_VIEW3))||
 655           (view == 4 && dbus_message_is_signal(msg, LIVEWP_SIGNAL_INTERFACE, LIVEWP_PLAY_LIVEBG_ON_VIEW4))){
 656            /* fprintf(stderr, "Play scene visible %i\n", view); */
 657            pause = 0;
 658            dbus_message_unref (msg);
 659            continue;
 660       }
 661 #if 0
 662       /*  dbus_connection_steal_borrowed_message(conn, msg); */
 663      /* fprintf (stderr, "APPLICATION PATH11111111111111111111 %s %s %s\n",   dbus_message_get_path(msg),   dbus_message_get_interface (msg), dbus_message_get_member (msg));*/
 664         /*dbus_connection_return_message(conn, msg);*/
 665       if (dbus_message_is_signal(msg, LIVEWP_SIGNAL_INTERFACE, LIVEWP_PAUSE_LIVEBG_ON_VIEW) ||
 666           dbus_message_is_signal(msg, LIVEWP_SIGNAL_INTERFACE, LIVEWP_PLAY_LIVEBG_ON_VIEW)){
 667           if (!dbus_message_iter_init(msg, &args))
 668               fprintf(stderr, "dbus message has no param\n");
 669           else if (DBUS_TYPE_INT32 != dbus_message_iter_get_arg_type(&args))
 670               fprintf(stderr, "dbus message param is not int \n");
 671           else{
 672               dbus_message_iter_get_basic(&args, &param);
 673               fprintf(stderr, "dbus param = %i\n", param);
 674           }
 675           if (param == view){
 676               if (dbus_message_is_signal(msg, LIVEWP_SIGNAL_INTERFACE, LIVEWP_PAUSE_LIVEBG_ON_VIEW)){
 677                  fprintf(stderr, "dbus  Pause scene visible %i\n", param);
 678                      pause = 1;
 679               }
 680               if (dbus_message_is_signal(msg, LIVEWP_SIGNAL_INTERFACE, LIVEWP_PLAY_LIVEBG_ON_VIEW)){
 681                  fprintf(stderr, "dbus   Play scene visible %i\n", param);
 682                      pause = 0;
 683               }
 684               /*msg = dbus_connection_pop_message(conn);*/
 685               fprintf(stderr, "dbus  steal message\n");
 686               /*dbus_connection_steal_borrowed_message(conn, msg);*/
 687           }else{
 688               fprintf(stderr, "dbus  return message\n");
 689               /*dbus_connection_return_message(conn, msg);*/
 690           }
 691       }
 692 #endif
 693       dbus_message_unref (msg);
 694     }
 695
 696   ft->free_cb (dpy, window, closure);
 697   if (fpst) fps_free (fpst);
 698
 699 #ifdef DEBUG_PAIR
 700   if (window2) ft->free_cb (dpy, window2, closure2);
 701   if (window2) fps_free (fpst2);
 702 #endif
 703   /* close the connection */
 704   dbus_connection_close(conn);
 705 }
 706
 707
 708 static Widget
 709 make_shell (Screen *screen, Widget toplevel, int width, int height)
 710 {
 711   Display *dpy = DisplayOfScreen (screen);
 712   Visual *visual = pick_visual (screen);
 713   Boolean def_visual_p = (toplevel &&
 714                           visual == DefaultVisualOfScreen (screen));
 715
 716   if (width  <= 0) width  = 600;
 717   if (height <= 0) height = 480;
 718
 719   if (def_visual_p)
 720     {
 721       Window window;
 722       XtVaSetValues (toplevel,
 723                      XtNmappedWhenManaged, False,
 724                      XtNwidth, width,
 725                      XtNheight, height,
 726                      XtNinput, True,  /* for WM_HINTS */
 727                      NULL);
 728       XtRealizeWidget (toplevel);
 729       window = XtWindow (toplevel);
 730
 731       if (get_boolean_resource (dpy, "installColormap", "InstallColormap"))
 732         {
 733           Colormap cmap =
 734             XCreateColormap (dpy, window, DefaultVisualOfScreen (screen),
 735                              AllocNone);
 736           XSetWindowColormap (dpy, window, cmap);
 737         }
 738     }
 739   else
 740     {
 741       unsigned int bg, bd;
 742       Widget new;
 743       Colormap cmap = XCreateColormap (dpy, VirtualRootWindowOfScreen(screen),
 744                                        visual, AllocNone);
 745       bg = get_pixel_resource (dpy, cmap, "background", "Background");
 746       bd = get_pixel_resource (dpy, cmap, "borderColor", "Foreground");
 747
 748       new = XtVaAppCreateShell (progname, progclass,
 749                                 topLevelShellWidgetClass, dpy,
 750                                 XtNmappedWhenManaged, False,
 751                                 XtNvisual, visual,
 752                                 XtNdepth, visual_depth (screen, visual),
 753                                 XtNwidth, width,
 754                                 XtNheight, height,
 755                                 XtNcolormap, cmap,
 756                                 XtNbackground, (Pixel) bg,
 757                                 XtNborderColor, (Pixel) bd,
 758                                 XtNinput, True,  /* for WM_HINTS */
 759                                 NULL);
 760
 761       if (!toplevel)  /* kludge for the second window in -pair mode... */
 762         XtVaSetValues (new, XtNx, 0, XtNy, 550, NULL);
 763
 764       XtRealizeWidget (new);
 765       toplevel = new;
 766     }
 767
 768   return toplevel;
 769 }
 770
 771 static void
 772 init_window (Display *dpy, Widget toplevel, const char *title)
 773 {
 774   Window window;
 775   XWindowAttributes xgwa;
 776   XtPopup (toplevel, XtGrabNone);
 777   XtVaSetValues (toplevel, XtNtitle, title, NULL);
 778
 779   /* Select KeyPress, and announce that we accept WM_DELETE_WINDOW.
 780    */
 781   window = XtWindow (toplevel);
 782   XGetWindowAttributes (dpy, window, &xgwa);
 783   XSelectInput (dpy, window,
 784                 (xgwa.your_event_mask | KeyPressMask | KeyReleaseMask |
 785                  ButtonPressMask | ButtonReleaseMask));
 786   XChangeProperty (dpy, window, XA_WM_PROTOCOLS, XA_ATOM, 32,
 787                    PropModeReplace,
 788                    (unsigned char *) &XA_WM_DELETE_WINDOW, 1);
 789 }
 790
 791
 792 int
 793 main (int argc, char **argv)
 794 {
 795   struct xscreensaver_function_table *ft = xscreensaver_function_table;
 796
 797 /*  osso_context_t  *osso; */
 798
 799   XWindowAttributes xgwa;
 800   Widget toplevel;
 801   Display *dpy;
 802   Window window;
 803 # ifdef DEBUG_PAIR
 804   Window window2 = 0;
 805   Widget toplevel2 = 0;
 806 # endif
 807   XtAppContext app;
 808   Bool root_p;
 809   Window on_window = 0;
 810   XEvent event;
 811   Boolean dont_clear;
 812   char version[255];
 813   int view;
 814
 815   fix_fds();
 816
 817   progname = argv[0];   /* reset later */
 818   progclass = ft->progclass;
 819
 820   if (ft->setup_cb)
 821     ft->setup_cb (ft, ft->setup_arg);
 822
 823   merge_options ();
 824
 825 #ifdef __sgi
 826   /* We have to do this on SGI to prevent the background color from being
 827      overridden by the current desktop color scheme (we'd like our backgrounds
 828      to be black, thanks.)  This should be the same as setting the
 829      "*useSchemes: none" resource, but it's not -- if that resource is
 830      present in the `default_defaults' above, it doesn't work, though it
 831      does work when passed as an -xrm arg on the command line.  So screw it,
 832      turn them off from C instead.
 833    */
 834   SgiUseSchemes ("none");
 835 #endif /* __sgi */
 836
 837   toplevel = XtAppInitialize (&app, progclass, merged_options,
 838                               merged_options_size, &argc, argv,
 839                               merged_defaults, 0, 0);
 840
 841   dpy = XtDisplay (toplevel);
 842
 843   XtGetApplicationNameAndClass (dpy,
 844                                 (char **) &progname,
 845                                 (char **) &progclass);
 846
 847   /* half-assed way of avoiding buffer-overrun attacks. */
 848   if (strlen (progname) >= 100) ((char *) progname)[100] = 0;
 849
 850   XSetErrorHandler (screenhack_ehandler);
 851
 852   XA_WM_PROTOCOLS = XInternAtom (dpy, "WM_PROTOCOLS", False);
 853   XA_WM_DELETE_WINDOW = XInternAtom (dpy, "WM_DELETE_WINDOW", False);
 854
 855   {
 856     char *v = (char *) strdup(strchr(screensaver_id, ' '));
 857     char *s1, *s2, *s3, *s4;
 858     s1 = (char *) strchr(v,  ' '); s1++;
 859     s2 = (char *) strchr(s1, ' ');
 860     s3 = (char *) strchr(v,  '('); s3++;
 861     s4 = (char *) strchr(s3, ')');
 862     *s2 = 0;
 863     *s4 = 0;
 864     sprintf (version, "%s: from the XScreenSaver %s distribution (%s.)",
 865              progclass, s1, s3);
 866     free(v);
 867   }
 868
 869   if (argc > 1)
 870     {
 871       const char *s;
 872       int i;
 873       int x = 18;
 874       int end = 78;
 875       Bool help_p = (!strcmp(argv[1], "-help") ||
 876                      !strcmp(argv[1], "--help"));
 877       fprintf (stderr, "%s\n", version);
 878       for (s = progclass; *s; s++) fprintf(stderr, " ");
 879       fprintf (stderr, "  http://www.jwz.org/xscreensaver/\n\n");
 880
 881       if (!help_p)
 882         fprintf(stderr, "Unrecognised option: %s\n", argv[1]);
 883       fprintf (stderr, "Options include: ");
 884       for (i = 0; i < merged_options_size; i++)
 885         {
 886           char *sw = merged_options [i].option;
 887           Bool argp = (merged_options [i].argKind == XrmoptionSepArg);
 888           int size = strlen (sw) + (argp ? 6 : 0) + 2;
 889           if (x + size >= end)
 890             {
 891               fprintf (stderr, "\n\t\t ");
 892               x = 18;
 893             }
 894           x += size;
 895           fprintf (stderr, "%s", sw);
 896           if (argp) fprintf (stderr, " <arg>");
 897           if (i != merged_options_size - 1) fprintf (stderr, ", ");
 898         }
 899
 900       fprintf (stderr, ".\n");
 901
 902 #if 0
 903       if (help_p)
 904         {
 905           fprintf (stderr, "\nResources:\n\n");
 906           for (i = 0; i < merged_options_size; i++)
 907             {
 908               const char *opt = merged_options [i].option;
 909               const char *res = merged_options [i].specifier + 1;
 910               const char *val = merged_options [i].value;
 911               char *s = get_string_resource (dpy, (char *) res, (char *) res);
 912
 913               if (s)
 914                 {
 915                   int L = strlen(s);
 916                 while (L > 0 && (s[L-1] == ' ' || s[L-1] == '\t'))
 917                   s[--L] = 0;
 918                 }
 919
 920               fprintf (stderr, "    %-16s %-18s ", opt, res);
 921               if (merged_options [i].argKind == XrmoptionSepArg)
 922                 {
 923                   fprintf (stderr, "[%s]", (s ? s : "?"));
 924                 }
 925               else
 926                 {
 927                   fprintf (stderr, "%s", (val ? val : "(null)"));
 928                   if (val && s && !strcasecmp (val, s))
 929                     fprintf (stderr, " [default]");
 930                 }
 931               fprintf (stderr, "\n");
 932             }
 933           fprintf (stderr, "\n");
 934         }
 935 #endif
 936
 937       exit (help_p ? 0 : 1);
 938     }
 939
 940   {
 941     char **s;
 942     for (s = merged_defaults; *s; s++)
 943       free(*s);
 944   }
 945
 946   free (merged_options);
 947   free (merged_defaults);
 948   merged_options = 0;
 949   merged_defaults = 0;
 950
 951   dont_clear = get_boolean_resource (dpy, "dontClearRoot", "Boolean");
 952   mono_p = get_boolean_resource (dpy, "mono", "Boolean");
 953   if (CellsOfScreen (DefaultScreenOfDisplay (dpy)) <= 2)
 954     mono_p = True;
 955
 956   root_p = get_boolean_resource (dpy, "root", "Boolean");
 957
 958   {
 959     char *s = get_string_resource (dpy, "windowID", "WindowID");
 960     if (s && *s)
 961       on_window = get_integer_resource (dpy, "windowID", "WindowID");
 962     if (s) free (s);
 963   }
 964
 965   view = get_integer_resource (dpy, "view", "view");
 966   fprintf(stderr, "View %i\n", view);
 967   if (on_window)
 968     {
 969       window = (Window) on_window;
 970       XtDestroyWidget (toplevel);
 971       XGetWindowAttributes (dpy, window, &xgwa);
 972       visual_warning (xgwa.screen, window, xgwa.visual, xgwa.colormap, True);
 973
 974       /* Select KeyPress and resize events on the external window.
 975        */
 976       xgwa.your_event_mask |= KeyPressMask | StructureNotifyMask;
 977       XSelectInput (dpy, window, xgwa.your_event_mask);
 978
 979       /* Select ButtonPress and ButtonRelease events on the external window,
 980          if no other app has already selected them (only one app can select
 981          ButtonPress at a time: BadAccess results.)
 982        */
 983       if (! (xgwa.all_event_masks & (ButtonPressMask | ButtonReleaseMask)))
 984         XSelectInput (dpy, window,
 985                       (xgwa.your_event_mask |
 986                        ButtonPressMask | ButtonReleaseMask));
 987     }
 988   else if (root_p)
 989     {
 990       window = VirtualRootWindowOfScreen (XtScreen (toplevel));
 991       XtDestroyWidget (toplevel);
 992       XGetWindowAttributes (dpy, window, &xgwa);
 993       /* With RANDR, the root window can resize! */
 994       XSelectInput (dpy, window, xgwa.your_event_mask | StructureNotifyMask);
 995       visual_warning (xgwa.screen, window, xgwa.visual, xgwa.colormap, False);
 996     }
 997   else
 998     {
 999       Widget new = make_shell (XtScreen (toplevel), toplevel,
1000                                toplevel->core.width,
1001                                toplevel->core.height);
1002       if (new != toplevel)
1003         {
1004           XtDestroyWidget (toplevel);
1005           toplevel = new;
1006         }
1007
1008       init_window (dpy, toplevel, version);
1009       window = XtWindow (toplevel);
1010       XGetWindowAttributes (dpy, window, &xgwa);
1011
1012 # ifdef DEBUG_PAIR
1013       if (get_boolean_resource (dpy, "pair", "Boolean"))
1014         {
1015           toplevel2 = make_shell (xgwa.screen, 0,
1016                                   toplevel->core.width,
1017                                   toplevel->core.height);
1018           init_window (dpy, toplevel2, version);
1019           window2 = XtWindow (toplevel2);
1020         }
1021 # endif /* DEBUG_PAIR */
1022     }
1023
1024   if (!dont_clear)
1025     {
1026       unsigned int bg = get_pixel_resource (dpy, xgwa.colormap,
1027                                             "background", "Background");
1028       XSetWindowBackground (dpy, window, bg);
1029       XClearWindow (dpy, window);
1030 # ifdef DEBUG_PAIR
1031       if (window2)
1032         {
1033           XSetWindowBackground (dpy, window2, bg);
1034           XClearWindow (dpy, window2);
1035         }
1036 # endif
1037     }
1038
1039   if (!root_p && !on_window)
1040     /* wait for it to be mapped */
1041     XIfEvent (dpy, &event, MapNotify_event_p, (XPointer) window);
1042
1043   XSync (dpy, False);
1044
1045   /* This is the one and only place that the random-number generator is
1046      seeded in any screenhack.  You do not need to seed the RNG again,
1047      it is done for you before your code is invoked. */
1048 # undef ya_rand_init
1049   ya_rand_init (0);
1050
1051   run_screenhack_table (dpy, window,
1052 # ifdef DEBUG_PAIR
1053                         window2,
1054 # endif
1055                         ft, view);
1056
1057   XtDestroyWidget (toplevel);
1058   XtDestroyApplicationContext (app);
1059
1060   return 0;
1061 }