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