-static Window
-find_screensaver_window (Display *dpy, char **version)
-{
- int i;
- Window root = RootWindowOfScreen (DefaultScreenOfDisplay (dpy));
- Window root2, parent, *kids;
- unsigned int nkids;
-
- if (version) *version = 0;
-
- if (! XQueryTree (dpy, root, &root2, &parent, &kids, &nkids))
- abort ();
- if (root != root2)
- abort ();
- if (parent)
- abort ();
- if (! (kids && nkids))
- abort ();
- for (i = 0; i < nkids; i++)
- {
- Atom type;
- int format;
- unsigned long nitems, bytesafter;
- char *v;
-
- if (XGetWindowProperty (dpy, kids[i],
- XA_SCREENSAVER_VERSION,
- 0, 200, False, XA_STRING,
- &type, &format, &nitems, &bytesafter,
- (unsigned char **) &v)
- == Success
- && type != None)
- {
- if (version)
- *version = v;
- return kids[i];
- }
- }
- fprintf (stderr, "%s: no screensaver is running on display %s\n", progname,
- DisplayString (dpy));
- exit (1);
-}
-
-
-void
-xscreensaver_command (Display *dpy, Atom command)
-{
- char *v = 0;
- Window window = find_screensaver_window (dpy, &v);
-
- if (command == XA_SCREENSAVER_TIME ||
- command == XA_SCREENSAVER_VERSION)
- {
- XClassHint hint;
- memset (&hint, 0, sizeof(hint));
- if (!v || !*v)
- {
- fprintf (stderr, "%s: version property not set on window 0x%x?\n",
- progname, (unsigned int) window);
- exit (1);
- }
-
- XGetClassHint(dpy, window, &hint);
- if (!hint.res_class)
- {
- fprintf (stderr, "%s: class hints not set on window 0x%x?\n",
- progname, (unsigned int) window);
- exit (1);
- }
-
- fprintf (stdout, "%s %s", hint.res_class, v);
-
- if (command != XA_SCREENSAVER_TIME)
- {
- fprintf (stdout, "\n");
- }
- else
- {
- Atom type;
- int format;
- unsigned long nitems, bytesafter;
- unsigned char *data = 0;
- XWindowAttributes xgwa;
- Bool active_p = False;
-
- xgwa.map_state = IsViewable;
- XGetWindowAttributes (dpy, window, &xgwa);
-
- if (XGetWindowProperty (dpy, window, XA_VROOT,
- 0, 0, False, XA_WINDOW,
- &type, &format, &nitems, &bytesafter,
- &data)
- == Success
- && type != None)
- active_p = True;
-
- if (data) free (data);
- data = 0;
-
- if (XGetWindowProperty (dpy, window,
- XA_SCREENSAVER_TIME,
- 0, 1, False, XA_INTEGER,
- &type, &format, &nitems, &bytesafter,
- &data)
- == Success
- && type == XA_INTEGER
- && data)
- {
- CARD32 time32 = *((CARD32 *)data);
- time_t tt = (time_t) time32;
-
- if (active_p)
- fprintf (stdout, ": screen blanked since ");
- else
- /* suggestions for a better way to phrase this are welcome. */
- fprintf (stdout, ": screen non-blanked since ");
- fprintf (stdout, "%s", ctime(&tt));
- if (data) free (data);
- }
- else
- {
- if (data) free (data);
- fprintf (stdout, "\n");
- fflush (stdout);
- fprintf (stderr, "%s: no time on window 0x%x (%s %s).\n",
- progname, (unsigned int) window,
- hint.res_class, (v ? v : "???"));
- exit (1);
- }
- }
- }
- else
- {
- XEvent event;
- event.xany.type = ClientMessage;
- event.xclient.display = dpy;
- event.xclient.window = window;
- event.xclient.message_type = XA_SCREENSAVER;
- event.xclient.format = 32;
- event.xclient.data.l[0] = (long) command;
- if (! XSendEvent (dpy, window, False, 0L, &event))
- {
- fprintf (stderr, "%s: XSendEvent(dpy, 0x%x ...) failed.\n",
- progname, (unsigned int) window);
- exit (1);
- }
- }
- XSync (dpy, 0);
-}
-