1 /* xscreensaver, Copyright (c) 1992-2010 Jamie Zawinski <jwz@jwz.org>
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
11 * And remember: X Windows is to graphics hacking as roman numerals are to
12 * the square root of pi.
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.
19 Create a few static global procedures and variables:
21 static void *YOURNAME_init (Display *, Window);
23 Return an opaque structure representing your drawing state.
25 static unsigned long YOURNAME_draw (Display *, Window, void *closure);
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.
31 This should return in some small fraction of a second.
32 Do not call `usleep' or loop excessively. For long loops, use a
35 static void YOURNAME_reshape (Display *, Window, void *closure,
36 unsigned int width, unsigned int height);
38 Called when the size of the window changes with the new size.
40 static Bool YOURNAME_event (Display *, Window, void *closure,
43 Called when a keyboard or mouse event arrives.
44 Return True if you handle it in some way, False otherwise.
46 static void YOURNAME_free (Display *, Window, void *closure);
48 Called when you are done: free everything you've allocated,
49 including your private `state' structure.
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
57 static char YOURNAME_defaults [] = { "...", "...", ... , 0 };
59 This variable is an array of strings, your default resources.
60 Null-terminate the list.
62 static XrmOptionDescRec YOURNAME_options[] = { { ... }, ... { 0,0,0,0 } }
64 This variable describes your command-line options.
65 Null-terminate the list.
67 Finally , invoke the XSCREENSAVER_MODULE() macro to tie it all together.
71 - Make sure that all functions in your module are static (check this
72 by running "nm -g" on the .o file).
74 - Do not use global variables: all such info must be stored in the
75 private `state' structure.
77 - Do not use static function-local variables, either. Put it in `state'.
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.
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.
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> */
100 # include <X11/SGIScheme.h> /* for SgiUseSchemes() */
105 # include <X11/Xmu/Error.h>
107 # include <Xmu/Error.h>
113 #include "screenhackI.h"
118 #ifndef _XSCREENSAVER_VROOT_H_
119 # error Error! You have an old version of vroot.h! Check -I args.
120 #endif /* _XSCREENSAVER_VROOT_H_ */
123 # define isupper(c) ((c) >= 'A' && (c) <= 'Z')
126 # define _tolower(c) ((c) - 'A' + 'a')
130 /* This is defined by the SCREENHACK_MAIN() macro via screenhack.h.
132 extern struct xscreensaver_function_table *xscreensaver_function_table;
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 */
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 },
153 { "-pair", ".pair", XrmoptionNoArg, "True" },
154 # endif /* DEBUG_PAIR */
158 static char *default_defaults[] = {
160 "*geometry: 600x480", /* this should be .geometry, but nooooo... */
162 "*installColormap: false",
164 "*visualID: default",
166 "*desktopGrabber: xscreensaver-getimage %s",
170 static XrmOptionDescRec *merged_options;
171 static int merged_options_size;
172 static char **merged_defaults;
178 struct xscreensaver_function_table *ft = xscreensaver_function_table;
180 const XrmOptionDescRec *options = ft->options;
181 const char * const *defaults = ft->defaults;
182 const char *progclass = ft->progclass;
184 int def_opts_size, opts_size;
185 int def_defaults_size, defaults_size;
187 for (def_opts_size = 0; default_options[def_opts_size].option;
190 for (opts_size = 0; options[opts_size].option; opts_size++)
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)));
201 for (def_defaults_size = 0; default_defaults[def_defaults_size];
204 for (defaults_size = 0; defaults[defaults_size]; defaults_size++)
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));
213 /* This totally sucks. Xt should behave like this by default.
214 If the string in `defaults' looks like ".foo", change that
219 for (s = merged_defaults; *s; s++)
222 const char *oldr = *s;
223 char *newr = (char *) malloc(strlen(oldr) + strlen(progclass) + 3);
224 strcpy (newr, progclass);
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.
239 screenhack_ehandler (Display *dpy, XErrorEvent *error)
241 fprintf (stderr, "\nX error in %s:\n", progname);
242 if (XmuPrintDefaultErrorMessage (dpy, error, stderr))
245 fprintf (stderr, " (nonfatal.)\n");
250 MapNotify_event_p (Display *dpy, XEvent *event, XPointer window)
252 return (event->xany.type == MapNotify &&
253 event->xvisibility.window == (Window) window);
257 static Atom XA_WM_PROTOCOLS, XA_WM_DELETE_WINDOW;
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.
264 screenhack_handle_event_1 (Display *dpy, XEvent *event)
266 switch (event->xany.type)
272 XLookupString (&event->xkey, &c, 1, &keysym, 0);
277 return False; /* exit */
278 else if (! (keysym >= XK_Shift_L && keysym <= XK_Hyper_R))
279 XBell (dpy, 0); /* beep for non-chord keys */
287 if (event->xclient.message_type != XA_WM_PROTOCOLS)
289 char *s = XGetAtomName(dpy, event->xclient.message_type);
290 if (!s) s = "(null)";
291 fprintf (stderr, "%s: unknown ClientMessage %s received!\n",
294 else if (event->xclient.data.l[0] != XA_WM_DELETE_WINDOW)
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",
305 return False; /* exit */
315 pick_visual (Screen *screen)
317 struct xscreensaver_function_table *ft = xscreensaver_function_table;
319 if (ft->pick_visual_hook)
321 Visual *v = ft->pick_visual_hook (screen);
325 return get_visual_resource (screen, "visualID", "VisualID", False);
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.
335 visual_warning (Screen *screen, Window window, Visual *visual, Colormap cmap,
338 struct xscreensaver_function_table *ft = xscreensaver_function_table;
340 char *visual_string = get_string_resource (DisplayOfScreen (screen),
341 "visualID", "VisualID");
342 Visual *desired_visual = pick_visual (screen);
346 if (window == RootWindowOfScreen (screen))
347 strcpy (win, "root window");
349 sprintf (win, "window 0x%lx", (unsigned long) window);
352 sprintf (why, "-window-id 0x%lx", (unsigned long) window);
354 strcpy (why, "-root");
356 if (visual_string && *visual_string)
359 for (s = visual_string; *s; s++)
360 if (isupper (*s)) *s = _tolower (*s);
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. */
367 else if (visual != desired_visual)
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));
374 free (visual_string);
377 if (visual == DefaultVisualOfScreen (screen) &&
378 has_writable_cells (screen, visual) &&
379 get_boolean_resource (DisplayOfScreen (screen),
380 "installColormap", "InstallColormap"))
382 fprintf (stderr, "%s: ignoring `-install' because of `%s'.\n",
384 fprintf (stderr, "%s: using %s's colormap 0x%lx.\n",
385 progname, win, (unsigned long) cmap);
388 if (ft->validate_visual_hook)
390 if (! ft->validate_visual_hook (screen, win, visual))
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
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.
414 Really, this crap is technically required of *every* X program,
415 if you want it to be robust in the face of "2>&-".
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);
427 screenhack_table_handle_events (Display *dpy,
428 const struct xscreensaver_function_table *ft,
429 Window window, void *closure
431 , Window window2, void *closure2
435 XtAppContext app = XtDisplayToApplicationContext (dpy);
437 if (XtAppPending (app) & (XtIMTimer|XtIMAlternateInput))
438 XtAppProcessEvent (app, XtIMTimer|XtIMAlternateInput);
440 while (XPending (dpy))
443 XNextEvent (dpy, &event);
445 if (event.xany.type == ConfigureNotify)
447 if (event.xany.window == window)
448 ft->reshape_cb (dpy, window, closure,
449 event.xconfigure.width, event.xconfigure.height);
451 if (event.xany.window == window2)
452 ft->reshape_cb (dpy, window2, closure2,
453 event.xconfigure.width, event.xconfigure.height);
456 else if (event.xany.type == ClientMessage ||
457 (! (event.xany.window == window
458 ? ft->event_cb (dpy, window, closure, &event)
460 : event.xany.window == window2
461 ? ft->event_cb (dpy, window2, closure2, &event)
464 if (! screenhack_handle_event_1 (dpy, &event))
467 if (XtAppPending (app) & (XtIMTimer|XtIMAlternateInput))
468 XtAppProcessEvent (app, XtIMTimer|XtIMAlternateInput);
475 usleep_and_process_events (Display *dpy,
476 const struct xscreensaver_function_table *ft,
477 Window window, fps_state *fpst, void *closure,
480 , Window window2, fps_state *fpst2, void *closure2,
486 unsigned long quantum = 100000; /* 1/10th second */
495 if (fpst) fps_slept (fpst, quantum);
497 if (fpst2) fps_slept (fpst2, quantum);
501 if (! screenhack_table_handle_events (dpy, ft, window, closure
514 screenhack_do_fps (Display *dpy, Window w, fps_state *fpst, void *closure)
516 fps_compute (fpst, 0);
522 run_screenhack_table (Display *dpy,
527 const struct xscreensaver_function_table *ft,
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"
542 DBusConnection* conn;
544 DBusMessageIter args;
548 int start_frame = 200;
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
554 void *(*init_cb) (Display *, Window, void *) =
555 (void *(*) (Display *, Window, void *)) ft->init_cb;
557 void (*fps_cb) (Display *, Window, fps_state *, void *) = ft->fps_cb;
559 void *closure = init_cb (dpy, window, ft->setup_arg);
560 fps_state *fpst = fps_init (dpy, window);
564 fps_state *fpst2 = 0;
565 if (window2) closure2 = init_cb (dpy, window2, ft->setup_arg);
566 if (window2) fpst2 = fps_init (dpy, window2);
569 if (! closure) /* if it returns nothing, it can't possibly be re-entrant. */
572 if (! fps_cb) fps_cb = screenhack_do_fps;
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);
582 fprintf(stderr, "Connection Null\n");
586 dbus_bus_add_match (conn, "type='signal', interface='org.maemo.livewp', member='pause_livebg_on_view1'", NULL);
587 dbus_bus_add_match (conn, "type='signal', interface='org.maemo.livewp', member='play_livebg_on_view1'", NULL);
590 dbus_bus_add_match (conn, "type='signal', interface='org.maemo.livewp', member='pause_livebg_on_view2'", NULL);
591 dbus_bus_add_match (conn, "type='signal', interface='org.maemo.livewp', member='play_livebg_on_view2'", NULL);
594 dbus_bus_add_match (conn, "type='signal', interface='org.maemo.livewp', member='pause_livebg_on_view3'", NULL);
595 dbus_bus_add_match (conn, "type='signal', interface='org.maemo.livewp', member='play_livebg_on_view3'", NULL);
598 dbus_bus_add_match (conn, "type='signal', interface='org.maemo.livewp', member='pause_livebg_on_view4'", NULL);
599 dbus_bus_add_match (conn, "type='signal', interface='org.maemo.livewp', member='play_livebg_on_view4'", NULL);
602 dbus_connection_flush(conn);
607 unsigned long delay = ft->draw_cb (dpy, window, closure);
609 unsigned long delay2 = 0;
610 if (window2) delay2 = ft->draw_cb (dpy, window2, closure2);
614 if (fpst) fps_cb (dpy, window, fpst, closure);
616 if (fpst2) fps_cb (dpy, window, fpst2, closure);
618 if (! usleep_and_process_events (dpy, ft,
619 window, fpst, closure, delay
621 , window2, fpst2, closure2, delay2
627 if (start_frame > 0) {
631 dbus_connection_flush(conn);
633 /* non blocking read of the next available message */
634 dbus_connection_read_write(conn, 0);
636 /* blocking read of the next available message */
637 dbus_connection_read_write(conn, 20000);
639 msg = dbus_connection_pop_message(conn);
644 fprintf(stderr, "signal on view %i\n", view);
645 /* check this is a method call for the right interface & method */
646 if ((view == 1 && dbus_message_is_signal(msg, LIVEWP_SIGNAL_INTERFACE, LIVEWP_PAUSE_LIVEBG_ON_VIEW1))||
647 (view == 2 && dbus_message_is_signal(msg, LIVEWP_SIGNAL_INTERFACE, LIVEWP_PAUSE_LIVEBG_ON_VIEW2))||
648 (view == 3 && dbus_message_is_signal(msg, LIVEWP_SIGNAL_INTERFACE, LIVEWP_PAUSE_LIVEBG_ON_VIEW3))||
649 (view == 4 && dbus_message_is_signal(msg, LIVEWP_SIGNAL_INTERFACE, LIVEWP_PAUSE_LIVEBG_ON_VIEW4))){
650 /* fprintf(stderr, "Pause scene visible %i\n", view); */
652 dbus_message_unref (msg);
655 if ((view == 1 && dbus_message_is_signal(msg, LIVEWP_SIGNAL_INTERFACE, LIVEWP_PLAY_LIVEBG_ON_VIEW1))||
656 (view == 2 && dbus_message_is_signal(msg, LIVEWP_SIGNAL_INTERFACE, LIVEWP_PLAY_LIVEBG_ON_VIEW2))||
657 (view == 3 && dbus_message_is_signal(msg, LIVEWP_SIGNAL_INTERFACE, LIVEWP_PLAY_LIVEBG_ON_VIEW3))||
658 (view == 4 && dbus_message_is_signal(msg, LIVEWP_SIGNAL_INTERFACE, LIVEWP_PLAY_LIVEBG_ON_VIEW4))){
659 /* fprintf(stderr, "Play scene visible %i\n", view); */
661 dbus_message_unref (msg);
665 /* dbus_connection_steal_borrowed_message(conn, msg); */
666 /* fprintf (stderr, "APPLICATION PATH11111111111111111111 %s %s %s\n", dbus_message_get_path(msg), dbus_message_get_interface (msg), dbus_message_get_member (msg));*/
667 /*dbus_connection_return_message(conn, msg);*/
668 if (dbus_message_is_signal(msg, LIVEWP_SIGNAL_INTERFACE, LIVEWP_PAUSE_LIVEBG_ON_VIEW) ||
669 dbus_message_is_signal(msg, LIVEWP_SIGNAL_INTERFACE, LIVEWP_PLAY_LIVEBG_ON_VIEW)){
670 if (!dbus_message_iter_init(msg, &args))
671 fprintf(stderr, "dbus message has no param\n");
672 else if (DBUS_TYPE_INT32 != dbus_message_iter_get_arg_type(&args))
673 fprintf(stderr, "dbus message param is not int \n");
675 dbus_message_iter_get_basic(&args, ¶m);
676 fprintf(stderr, "dbus param = %i\n", param);
679 if (dbus_message_is_signal(msg, LIVEWP_SIGNAL_INTERFACE, LIVEWP_PAUSE_LIVEBG_ON_VIEW)){
680 fprintf(stderr, "dbus Pause scene visible %i\n", param);
683 if (dbus_message_is_signal(msg, LIVEWP_SIGNAL_INTERFACE, LIVEWP_PLAY_LIVEBG_ON_VIEW)){
684 fprintf(stderr, "dbus Play scene visible %i\n", param);
687 /*msg = dbus_connection_pop_message(conn);*/
688 fprintf(stderr, "dbus steal message serial = %i\n", dbus_message_get_serial(msg));
689 /*dbus_connection_steal_borrowed_message(conn, msg);*/
691 fprintf(stderr, "dbus return message\n");
692 /*dbus_connection_return_message(conn, msg);*/
696 dbus_message_unref (msg);
699 ft->free_cb (dpy, window, closure);
700 if (fpst) fps_free (fpst);
703 if (window2) ft->free_cb (dpy, window2, closure2);
704 if (window2) fps_free (fpst2);
706 /* close the connection */
707 dbus_connection_close(conn);
712 make_shell (Screen *screen, Widget toplevel, int width, int height)
714 Display *dpy = DisplayOfScreen (screen);
715 Visual *visual = pick_visual (screen);
716 Boolean def_visual_p = (toplevel &&
717 visual == DefaultVisualOfScreen (screen));
719 if (width <= 0) width = 600;
720 if (height <= 0) height = 480;
725 XtVaSetValues (toplevel,
726 XtNmappedWhenManaged, False,
729 XtNinput, True, /* for WM_HINTS */
731 XtRealizeWidget (toplevel);
732 window = XtWindow (toplevel);
734 if (get_boolean_resource (dpy, "installColormap", "InstallColormap"))
737 XCreateColormap (dpy, window, DefaultVisualOfScreen (screen),
739 XSetWindowColormap (dpy, window, cmap);
746 Colormap cmap = XCreateColormap (dpy, VirtualRootWindowOfScreen(screen),
748 bg = get_pixel_resource (dpy, cmap, "background", "Background");
749 bd = get_pixel_resource (dpy, cmap, "borderColor", "Foreground");
751 new = XtVaAppCreateShell (progname, progclass,
752 topLevelShellWidgetClass, dpy,
753 XtNmappedWhenManaged, False,
755 XtNdepth, visual_depth (screen, visual),
759 XtNbackground, (Pixel) bg,
760 XtNborderColor, (Pixel) bd,
761 XtNinput, True, /* for WM_HINTS */
764 if (!toplevel) /* kludge for the second window in -pair mode... */
765 XtVaSetValues (new, XtNx, 0, XtNy, 550, NULL);
767 XtRealizeWidget (new);
775 init_window (Display *dpy, Widget toplevel, const char *title)
778 XWindowAttributes xgwa;
779 XtPopup (toplevel, XtGrabNone);
780 XtVaSetValues (toplevel, XtNtitle, title, NULL);
782 /* Select KeyPress, and announce that we accept WM_DELETE_WINDOW.
784 window = XtWindow (toplevel);
785 XGetWindowAttributes (dpy, window, &xgwa);
786 XSelectInput (dpy, window,
787 (xgwa.your_event_mask | KeyPressMask | KeyReleaseMask |
788 ButtonPressMask | ButtonReleaseMask));
789 XChangeProperty (dpy, window, XA_WM_PROTOCOLS, XA_ATOM, 32,
791 (unsigned char *) &XA_WM_DELETE_WINDOW, 1);
796 main (int argc, char **argv)
798 struct xscreensaver_function_table *ft = xscreensaver_function_table;
800 /* osso_context_t *osso; */
802 XWindowAttributes xgwa;
808 Widget toplevel2 = 0;
812 Window on_window = 0;
820 progname = argv[0]; /* reset later */
821 progclass = ft->progclass;
824 ft->setup_cb (ft, ft->setup_arg);
829 /* We have to do this on SGI to prevent the background color from being
830 overridden by the current desktop color scheme (we'd like our backgrounds
831 to be black, thanks.) This should be the same as setting the
832 "*useSchemes: none" resource, but it's not -- if that resource is
833 present in the `default_defaults' above, it doesn't work, though it
834 does work when passed as an -xrm arg on the command line. So screw it,
835 turn them off from C instead.
837 SgiUseSchemes ("none");
840 toplevel = XtAppInitialize (&app, progclass, merged_options,
841 merged_options_size, &argc, argv,
842 merged_defaults, 0, 0);
844 dpy = XtDisplay (toplevel);
846 XtGetApplicationNameAndClass (dpy,
848 (char **) &progclass);
850 /* half-assed way of avoiding buffer-overrun attacks. */
851 if (strlen (progname) >= 100) ((char *) progname)[100] = 0;
853 XSetErrorHandler (screenhack_ehandler);
855 XA_WM_PROTOCOLS = XInternAtom (dpy, "WM_PROTOCOLS", False);
856 XA_WM_DELETE_WINDOW = XInternAtom (dpy, "WM_DELETE_WINDOW", False);
859 char *v = (char *) strdup(strchr(screensaver_id, ' '));
860 char *s1, *s2, *s3, *s4;
861 s1 = (char *) strchr(v, ' '); s1++;
862 s2 = (char *) strchr(s1, ' ');
863 s3 = (char *) strchr(v, '('); s3++;
864 s4 = (char *) strchr(s3, ')');
867 sprintf (version, "%s: from the XScreenSaver %s distribution (%s.)",
878 Bool help_p = (!strcmp(argv[1], "-help") ||
879 !strcmp(argv[1], "--help"));
880 fprintf (stderr, "%s\n", version);
881 for (s = progclass; *s; s++) fprintf(stderr, " ");
882 fprintf (stderr, " http://www.jwz.org/xscreensaver/\n\n");
885 fprintf(stderr, "Unrecognised option: %s\n", argv[1]);
886 fprintf (stderr, "Options include: ");
887 for (i = 0; i < merged_options_size; i++)
889 char *sw = merged_options [i].option;
890 Bool argp = (merged_options [i].argKind == XrmoptionSepArg);
891 int size = strlen (sw) + (argp ? 6 : 0) + 2;
894 fprintf (stderr, "\n\t\t ");
898 fprintf (stderr, "%s", sw);
899 if (argp) fprintf (stderr, " <arg>");
900 if (i != merged_options_size - 1) fprintf (stderr, ", ");
903 fprintf (stderr, ".\n");
908 fprintf (stderr, "\nResources:\n\n");
909 for (i = 0; i < merged_options_size; i++)
911 const char *opt = merged_options [i].option;
912 const char *res = merged_options [i].specifier + 1;
913 const char *val = merged_options [i].value;
914 char *s = get_string_resource (dpy, (char *) res, (char *) res);
919 while (L > 0 && (s[L-1] == ' ' || s[L-1] == '\t'))
923 fprintf (stderr, " %-16s %-18s ", opt, res);
924 if (merged_options [i].argKind == XrmoptionSepArg)
926 fprintf (stderr, "[%s]", (s ? s : "?"));
930 fprintf (stderr, "%s", (val ? val : "(null)"));
931 if (val && s && !strcasecmp (val, s))
932 fprintf (stderr, " [default]");
934 fprintf (stderr, "\n");
936 fprintf (stderr, "\n");
940 exit (help_p ? 0 : 1);
945 for (s = merged_defaults; *s; s++)
949 free (merged_options);
950 free (merged_defaults);
954 dont_clear = get_boolean_resource (dpy, "dontClearRoot", "Boolean");
955 mono_p = get_boolean_resource (dpy, "mono", "Boolean");
956 if (CellsOfScreen (DefaultScreenOfDisplay (dpy)) <= 2)
959 root_p = get_boolean_resource (dpy, "root", "Boolean");
962 char *s = get_string_resource (dpy, "windowID", "WindowID");
964 on_window = get_integer_resource (dpy, "windowID", "WindowID");
968 view = get_integer_resource (dpy, "view", "view");
969 fprintf(stderr, "View %i\n", view);
972 window = (Window) on_window;
973 XtDestroyWidget (toplevel);
974 XGetWindowAttributes (dpy, window, &xgwa);
975 visual_warning (xgwa.screen, window, xgwa.visual, xgwa.colormap, True);
977 /* Select KeyPress and resize events on the external window.
979 xgwa.your_event_mask |= KeyPressMask | StructureNotifyMask;
980 XSelectInput (dpy, window, xgwa.your_event_mask);
982 /* Select ButtonPress and ButtonRelease events on the external window,
983 if no other app has already selected them (only one app can select
984 ButtonPress at a time: BadAccess results.)
986 if (! (xgwa.all_event_masks & (ButtonPressMask | ButtonReleaseMask)))
987 XSelectInput (dpy, window,
988 (xgwa.your_event_mask |
989 ButtonPressMask | ButtonReleaseMask));
993 window = VirtualRootWindowOfScreen (XtScreen (toplevel));
994 XtDestroyWidget (toplevel);
995 XGetWindowAttributes (dpy, window, &xgwa);
996 /* With RANDR, the root window can resize! */
997 XSelectInput (dpy, window, xgwa.your_event_mask | StructureNotifyMask);
998 visual_warning (xgwa.screen, window, xgwa.visual, xgwa.colormap, False);
1002 Widget new = make_shell (XtScreen (toplevel), toplevel,
1003 toplevel->core.width,
1004 toplevel->core.height);
1005 if (new != toplevel)
1007 XtDestroyWidget (toplevel);
1011 init_window (dpy, toplevel, version);
1012 window = XtWindow (toplevel);
1013 XGetWindowAttributes (dpy, window, &xgwa);
1016 if (get_boolean_resource (dpy, "pair", "Boolean"))
1018 toplevel2 = make_shell (xgwa.screen, 0,
1019 toplevel->core.width,
1020 toplevel->core.height);
1021 init_window (dpy, toplevel2, version);
1022 window2 = XtWindow (toplevel2);
1024 # endif /* DEBUG_PAIR */
1029 unsigned int bg = get_pixel_resource (dpy, xgwa.colormap,
1030 "background", "Background");
1031 XSetWindowBackground (dpy, window, bg);
1032 XClearWindow (dpy, window);
1036 XSetWindowBackground (dpy, window2, bg);
1037 XClearWindow (dpy, window2);
1042 if (!root_p && !on_window)
1043 /* wait for it to be mapped */
1044 XIfEvent (dpy, &event, MapNotify_event_p, (XPointer) window);
1048 /* This is the one and only place that the random-number generator is
1049 seeded in any screenhack. You do not need to seed the RNG again,
1050 it is done for you before your code is invoked. */
1051 # undef ya_rand_init
1054 run_screenhack_table (dpy, window,
1060 XtDestroyWidget (toplevel);
1061 XtDestroyApplicationContext (app);