2 * CDE - Common Desktop Environment
4 * Copyright (c) 1993-2012, The Open Group. All rights reserved.
6 * These libraries and programs are free software; you can
7 * redistribute them and/or modify them under the terms of the GNU
8 * Lesser General Public License as published by the Free Software
9 * Foundation; either version 2 of the License, or (at your option)
12 * These libraries and programs are distributed in the hope that
13 * they will be useful, but WITHOUT ANY WARRANTY; without even the
14 * implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR
15 * PURPOSE. See the GNU Lesser General Public License for more
18 * You should have received a copy of the GNU Lesser General Public
19 * License along with these librararies and programs; if not, write
20 * to the Free Software Foundation, Inc., 51 Franklin Street, Fifth
21 * Floor, Boston, MA 02110-1301 USA
23 /* $TOG: dtscreen.c /main/6 1998/04/20 12:58:46 mgreess $ */
28 * dtscreen.c - X11 client to lock a display and show a screen saver.
30 * Copyright (c) 1988-91 by Patrick J. Naughton.
32 * Permission to use, copy, modify, and distribute this software and its
33 * documentation for any purpose and without fee is hereby granted,
34 * provided that the above copyright notice appear in all copies and that
35 * both that copyright notice and this permission notice appear in
36 * supporting documentation.
38 * This file is provided AS IS with no warranties of any kind. The author
39 * shall have no liability with respect to the infringement of copyrights,
40 * trade secrets or any patents by this file or any part thereof. In no
41 * event will the author be liable for any lost revenue or profits or
42 * other special, indirect and consequential damages.
44 * Comments and additions should be sent to the author:
46 * naughton@eng.sun.com
50 * Sun Laboritories, Inc.
52 * Mountain View, CA 94043
55 * 16-May-91: added pyro and random modes.
56 * ripped big comment block out of all other files.
57 * 29-Oct-90: added cast to XFree() arg.
58 * added volume arg to call to XBell().
59 * 31-Aug-90: added blank mode.
61 * moved usleep() and seconds() out to usleep.c.
62 * added SVR4 defines to dtscreen.h
63 * 29-Jul-90: added support for multiple screens to be locked by one dtscreen.
64 * moved global defines to dtscreen.h
65 * removed use of allowsig().
66 * 07-Jul-90: reworked commandline args and resources to use Xrm.
67 * moved resource processing out to resource.c
68 * 02-Jul-90: reworked colors to not use dynamic colormap.
69 * 23-May-90: added autoraise when obscured.
70 * 18-Feb-90: added SunOS3.5 fix.
71 * changed -mono -> -color, and -saver -> -lock.
72 * allow non-locking screensavers to display on remote machine.
73 * added -echokeys to disable echoing of '?'s on input.
74 * cleaned up all of the parameters and defaults.
75 * 23-Sep-89: Added fix to allow local hostname:0 as a display.
76 * Put empty case for Enter/Leave events.
77 * Moved colormap installation later in startup.
78 * 19-Sep-89: Added '?'s on input.
79 * 27-Mar-89: Added -qix mode.
81 * 08-Mar-89: Added -nice, -mode and -display, built vector for life and hop.
82 * 24-Feb-89: Replaced hopalong display with life display from SunView1.
83 * 22-Feb-89: Added fix for color servers with n < 8 planes.
84 * 16-Feb-89: Updated calling conventions for XCreateHsbColormap();
85 * Added -count for number of iterations per color.
86 * Fixed defaulting mechanism.
87 * Ripped out VMS hacks.
88 * Sent to expo for X11R3 contrib.
89 * 19-Jan-89: Fixed monochrome gc bug.
90 * 19-Sep-88: Changed -color to -mono. (default is color on color displays).
91 * Added -saver option. (just do display... don't lock.)
92 * 01-Apr-88: Added XGrabServer/XUngrabServer for more security.
93 * 27-Mar-88: Rotate fractal by 45 degrees clockwise.
94 * 24-Mar-88: Added color support. [-color]
96 * 23-Mar-88: Added HOPALONG routines from Scientific American Sept. 86 p. 14.
97 * added requirement for display to be "unix:0".
98 * 22-Mar-88: Recieved Walter Milliken's comp.windows.x posting.
102 /* include file for message texts */
104 #include <nl_types.h>
105 #define MF_DTSCREEN "dtscreen"
107 #include <nl_types.h>
109 nl_catd scmc_catd; /* Cat descriptor for scmc conversion */
116 #include <X11/Intrinsic.h> /* For Boolean */
117 #include <X11/Shell.h>
118 #include "dtscreen.h"
120 /* We'd like to include DtP.h, but it interferes with dtscreen.h */
123 #include <Dt/EnvControlP.h>
124 #include <Dt/Saver.h>
126 #if !defined(NL_CAT_LOCALE)
127 #define NL_CAT_LOCALE 0
130 char *ProgramName; /* argv[0] */
131 Display *dsp = NULL; /* server display connection */
132 void (*callback) () = NULL;
133 void (*init) () = NULL;
135 static perwindow *Win; /* perwindow information */
136 static int windows; /* number of windows */
137 static Window *winprop = NULL; /* dtsession cover windows */
144 fprintf(stderr, s1, ProgramName, s2);
149 * Restore all grabs, reset screensaver, restore colormap, close connection.
156 XFree((char *)winprop);
168 for (window = 0; window < windows; window++)
171 while (!XPending(dsp)) {
172 for (window = 0; window < windows; window++)
173 callback(Win+window);
177 XNextEvent(dsp, &event);
180 if (event.type == VisibilityNotify)
181 XRaiseWindow(dsp, event.xany.window);
188 allocpixel(cmap, name, def)
195 XParseColor(dsp, cmap, name, &col);
196 if (!XAllocColor(dsp, cmap, &col)) {
200 "couldn't allocate: %s, using %s instead\n",
204 fprintf(stderr, catgets(scmc_catd, 2, 35,
205 "couldn't allocate: %s, using %s instead\n"),
209 XAllocNamedColor(dsp, cmap, def, &col, &tmp);
220 XSetWindowAttributes xswa;
228 * So we can find the app-defaults file.
230 _DtEnvControl(DT_ENV_SET);
232 /* set locale to what is defined by local environment */
233 setlocale(LC_ALL,"");
234 scmc_catd = catopen(MF_DTSCREEN, NL_CAT_LOCALE);
236 ProgramName = strrchr(argv[0], '/');
240 ProgramName = argv[0];
242 srandom(time((time_t *) 0)); /* random mode needs the seed set. */
244 GetResources(argc, argv);
250 /* Make sure DtSvc is initialized properly. */
251 XtAppContext appContext;
256 dummyArgv[0] = ProgramName;
257 XtToolkitInitialize();
258 appContext = XtCreateApplicationContext();
259 XtDisplayInitialize(appContext, dsp, ProgramName, ProgramName,
260 NULL, 0, &dummyArgc, dummyArgv);
261 shellWidget = XtAppCreateShell(ProgramName, ProgramName,
262 applicationShellWidgetClass,
264 DtAppInitialize(appContext, dsp, shellWidget,
265 ProgramName, ProgramName);
268 * Try to get array of window ids from desktop. Also returned is
269 * a property identifier whose change will tell us when to terminate.
271 if (!DtSaverGetWindows(dsp, &winprop, &nitems))
273 fprintf(stderr, catgets(scmc_catd, 2, 40,
274 "%s: Cannot locate window in which to draw. Using the -create\n"
275 "option will cause %s to create its own window.\n"),
276 ProgramName, ProgramName);
281 Win = (perwindow *)malloc(nitems * sizeof(perwindow));
283 for (window = 0; window < windows; window++)
285 Win[window].w = winprop[window];
286 Win[window].perscreen = NULL;
287 Win[window].data = NULL;
292 Screen *scr = ScreenOfDisplay(dsp, 0);
294 Win = (perwindow *)malloc(sizeof(perwindow));
296 xswa.override_redirect = True;
297 xswa.background_pixel = BlackPixelOfScreen(scr);
298 xswa.event_mask = VisibilityChangeMask;
300 Win[0].w = XCreateWindow(
302 RootWindowOfScreen(scr),
304 WidthOfScreen(scr) - 100, HeightOfScreen(scr) - 100,
305 0, CopyFromParent, InputOutput, CopyFromParent,
306 CWBackPixel | CWEventMask, &xswa);
307 Win[0].perscreen = NULL;
309 XMapWindow(dsp, Win[0].w);
310 XRaiseWindow(dsp, Win[0].w);
313 for (window = 0; window < windows; window++)
315 XWindowAttributes attr;
317 XGetWindowAttributes(dsp, Win[window].w, &attr);
319 for (i = 0; i < window; i++)
321 if (Win[i].perscreen && Win[i].perscreen->screen == attr.screen)
323 Win[window].perscreen = Win[i].perscreen;
328 if (Win[window].perscreen == NULL)
333 pscreen = (perscreen *)malloc(sizeof(perscreen));
334 Win[window].perscreen = pscreen;
336 pscreen->screen = attr.screen;
337 cmap = DefaultColormapOfScreen(pscreen->screen);
339 pscreen->pixels[0] = allocpixel(cmap, "White", "White");
340 pscreen->pixels[1] = allocpixel(cmap, "Black", "Black");
341 if (mono || CellsOfScreen(pscreen->screen) == 2)
343 pscreen->npixels = 2;
347 int colorcount = NUMCOLORS;
348 u_char red[NUMCOLORS];
349 u_char green[NUMCOLORS];
350 u_char blue[NUMCOLORS];
352 hsbramp(0.0, saturation, 1.0, 1.0, saturation, 1.0, colorcount,
354 pscreen->npixels = 0;
355 for (i = 0; i < colorcount; i++)
359 xcolor.red = red[i] << 8;
360 xcolor.green = green[i] << 8;
361 xcolor.blue = blue[i] << 8;
362 xcolor.flags = DoRed | DoGreen | DoBlue;
364 if (!XAllocColor(dsp, cmap, &xcolor))
367 pscreen->pixels[i] = xcolor.pixel;
373 xgcv.foreground = WhitePixelOfScreen(Win[window].perscreen->screen);
374 xgcv.background = BlackPixelOfScreen(Win[window].perscreen->screen);
375 Win[window].gc = XCreateGC(dsp, Win[window].w,
376 GCForeground | GCBackground, &xgcv);