cde/programs/dtscreen/dtscreen.c

   1 /*
   2  * CDE - Common Desktop Environment
   3  *
   4  * Copyright (c) 1993-2012, The Open Group. All rights reserved.
   5  *
   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)
  10  * any later version.
  11  *
  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
  16  * details.
  17  *
  18  * You should have received a copy of the GNU Lesser General Public
  19  * License along with these libraries and programs; if not, write
  20  * to the Free Software Foundation, Inc., 51 Franklin Street, Fifth
  21  * Floor, Boston, MA 02110-1301 USA
  22  */
  23 /* $TOG: dtscreen.c /main/6 1998/04/20 12:58:46 mgreess $ */
  24 /*
  25  */
  26
  27 /*-
  28  * dtscreen.c - X11 client to lock a display and show a screen saver.
  29  *
  30  * Copyright (c) 1988-91 by Patrick J. Naughton.
  31  *
  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.
  37  *
  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.
  43  *
  44  * Comments and additions should be sent to the author:
  45  *
  46  *                     naughton@eng.sun.com
  47  *
  48  *                     Patrick J. Naughton
  49  *                     MS 21-14
  50  *                     Sun Laboritories, Inc.
  51  *                     2550 Garcia Ave
  52  *                     Mountain View, CA  94043
  53  *
  54  * Revision History:
  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.
  60  *            added swarm 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.
  80  *            Fixed GContext->GC.
  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]
  95  *            wrote the man page.
  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.
  99  *
 100  */
 101
 102 /*              include file for message texts          */
 103 #include <limits.h>
 104 #include <nl_types.h>
 105 #define MF_DTSCREEN "dtscreen"
 106
 107 #include <nl_types.h>
 108 #include <locale.h>
 109 nl_catd  scmc_catd;   /* Cat descriptor for scmc conversion */
 110
 111 #include <stdio.h>
 112 #include <stdlib.h>
 113 #include <signal.h>
 114 #include <string.h>
 115 #include <errno.h>
 116
 117 #include <X11/Intrinsic.h> /* For Boolean */
 118 #include <X11/Shell.h>
 119 #include "dtscreen.h"
 120 #ifdef NEVER
 121 /* We'd like to include DtP.h, but it interferes with dtscreen.h */
 122 # include <Dt/DtP.h>
 123 #endif /* NEVER */
 124 #include <Dt/EnvControlP.h>
 125 #include <Dt/Saver.h>
 126
 127 #if !defined(NL_CAT_LOCALE)
 128 #define NL_CAT_LOCALE 0
 129 #endif
 130
 131 char       *ProgramName;        /* argv[0] */
 132 Display    *dsp = NULL;         /* server display connection */
 133 void        (*callback) () = NULL;
 134 void        (*init) () = NULL;
 135
 136 static perwindow *Win; /* perwindow information */
 137 static int  windows;            /* number of windows */
 138 static Window *winprop = NULL;  /* dtsession cover windows */
 139
 140 /* VARARGS1 */
 141 void
 142 error(char *s1, char *s2)
 143 {
 144     fprintf(stderr, s1, ProgramName, s2);
 145     exit(1);
 146 }
 147
 148 /*
 149  * Restore all grabs, reset screensaver, restore colormap, close connection.
 150  */
 151 static void
 152 finish(void)
 153 {
 154     XSync(dsp, False);
 155     if (winprop)
 156       XFree((char *)winprop);
 157     XFlush(dsp);
 158     XCloseDisplay(dsp);
 159 }
 160
 161
 162 static void
 163 justDisplay(void)
 164 {
 165     XEvent      event;
 166     int window;
 167
 168     for (window = 0; window < windows; window++)
 169         init(Win+window);
 170     do {
 171         while (!XPending(dsp)) {
 172             for (window = 0; window < windows; window++)
 173                 callback(Win+window);
 174             XSync(dsp, False);
 175             usleep(delay);
 176         }
 177         XNextEvent(dsp, &event);
 178
 179 #ifndef DEBUG
 180         if (event.type == VisibilityNotify)
 181             XRaiseWindow(dsp, event.xany.window);
 182 #endif
 183     } while (1);
 184 }
 185
 186
 187 long
 188 allocpixel(Colormap cmap, char *name, char *def)
 189 {
 190     XColor      col;
 191     XColor      tmp;
 192     XParseColor(dsp, cmap, name, &col);
 193     if (!XAllocColor(dsp, cmap, &col)) {
 194 #ifdef MIT_R5
 195
 196         fprintf(stderr,
 197              "couldn't allocate: %s, using %s instead\n",
 198                 name, def);
 199
 200 #else
 201         fprintf(stderr, catgets(scmc_catd, 2, 35,
 202              "couldn't allocate: %s, using %s instead\n"),
 203                 name, def);
 204 #endif
 205
 206         XAllocNamedColor(dsp, cmap, def, &col, &tmp);
 207     }
 208     return col.pixel;
 209 }
 210
 211
 212 int
 213 main(int argc, char *argv[])
 214 {
 215     XSetWindowAttributes xswa;
 216     XGCValues   xgcv;
 217     int         nitems = 0;
 218     int         window;
 219     int i;
 220
 221    /*
 222     * So we can find the app-defaults file.
 223     */
 224     _DtEnvControl(DT_ENV_SET);
 225
 226     /* set locale to what is defined by local environment */
 227     setlocale(LC_ALL,"");
 228     scmc_catd = catopen(MF_DTSCREEN, NL_CAT_LOCALE);
 229
 230     ProgramName = strrchr(argv[0], '/');
 231     if (ProgramName)
 232         ProgramName++;
 233     else
 234         ProgramName = argv[0];
 235
 236     srandom(time((time_t *) 0));  /* random mode needs the seed set. */
 237
 238     GetResources(argc, argv);
 239
 240     CheckResources();
 241
 242    if (!create)
 243    {
 244      /* Make sure DtSvc is initialized properly. */
 245      XtAppContext appContext;
 246      Widget shellWidget;
 247      int dummyArgc = 1;
 248      char *dummyArgv[1];
 249
 250      dummyArgv[0] = ProgramName;
 251      XtToolkitInitialize();
 252      appContext = XtCreateApplicationContext();
 253      XtDisplayInitialize(appContext, dsp, ProgramName, ProgramName,
 254                          NULL, 0, &dummyArgc, dummyArgv);
 255      shellWidget = XtAppCreateShell(ProgramName, ProgramName,
 256                                     applicationShellWidgetClass,
 257                                     dsp, NULL, 0);
 258      DtAppInitialize(appContext, dsp, shellWidget,
 259                      ProgramName, ProgramName);
 260
 261      /*
 262       * Try to get array of window ids from desktop. Also returned is
 263       * a property identifier whose change will tell us when to terminate.
 264       */
 265       if (!DtSaverGetWindows(dsp, &winprop, &nitems))
 266       {
 267         fprintf(stderr, catgets(scmc_catd, 2, 40,
 268              "%s: Cannot locate window in which to draw. Using the -create\n"
 269              "option will cause %s to create its own window.\n"),
 270              ProgramName, ProgramName);
 271
 272         exit(1);
 273       }
 274
 275       Win = (perwindow *)malloc(nitems * sizeof(perwindow));
 276       windows = nitems;
 277       for (window = 0; window < windows; window++)
 278       {
 279         Win[window].w = winprop[window];
 280         Win[window].perscreen = NULL;
 281         Win[window].data = NULL;
 282       }
 283     }
 284     else
 285     {
 286       Screen     *scr = ScreenOfDisplay(dsp, 0);
 287
 288       Win = (perwindow *)malloc(sizeof(perwindow));
 289       windows = 1;
 290       xswa.override_redirect = True;
 291       xswa.background_pixel = BlackPixelOfScreen(scr);
 292       xswa.event_mask = VisibilityChangeMask;
 293
 294       Win[0].w = XCreateWindow(
 295                       dsp,
 296                       RootWindowOfScreen(scr),
 297                       0, 0,
 298                       WidthOfScreen(scr) - 100, HeightOfScreen(scr) - 100,
 299                       0, CopyFromParent, InputOutput, CopyFromParent,
 300                       CWBackPixel | CWEventMask, &xswa);
 301       Win[0].perscreen = NULL;
 302       Win[0].data = NULL;
 303       XMapWindow(dsp, Win[0].w);
 304       XRaiseWindow(dsp, Win[0].w);
 305     }
 306
 307     for (window = 0; window < windows; window++)
 308     {
 309       XWindowAttributes attr;
 310
 311       XGetWindowAttributes(dsp, Win[window].w, &attr);
 312
 313       for (i = 0; i < window; i++)
 314       {
 315         if (Win[i].perscreen && Win[i].perscreen->screen == attr.screen)
 316         {
 317           Win[window].perscreen = Win[i].perscreen;
 318           break;
 319         }
 320       }
 321
 322       if (Win[window].perscreen == NULL)
 323       {
 324         Colormap cmap;
 325         perscreen *pscreen;
 326
 327         pscreen = (perscreen *)malloc(sizeof(perscreen));
 328         Win[window].perscreen = pscreen;
 329
 330         pscreen->screen = attr.screen;
 331         cmap = DefaultColormapOfScreen(pscreen->screen);
 332
 333         pscreen->pixels[0] = allocpixel(cmap, "White", "White");
 334         pscreen->pixels[1] = allocpixel(cmap, "Black", "Black");
 335         if (mono || CellsOfScreen(pscreen->screen) == 2)
 336         {
 337           pscreen->npixels = 2;
 338         }
 339         else
 340         {
 341           int         colorcount = NUMCOLORS;
 342           u_char      red[NUMCOLORS];
 343           u_char      green[NUMCOLORS];
 344           u_char      blue[NUMCOLORS];
 345
 346           hsbramp(0.0, saturation, 1.0, 1.0, saturation, 1.0, colorcount,
 347                       red, green, blue);
 348           pscreen->npixels = 0;
 349           for (i = 0; i < colorcount; i++)
 350           {
 351             XColor      xcolor;
 352
 353             xcolor.red = red[i] << 8;
 354             xcolor.green = green[i] << 8;
 355             xcolor.blue = blue[i] << 8;
 356             xcolor.flags = DoRed | DoGreen | DoBlue;
 357
 358             if (!XAllocColor(dsp, cmap, &xcolor))
 359                 break;
 360
 361             pscreen->pixels[i] = xcolor.pixel;
 362             pscreen->npixels++;
 363           }
 364         }
 365       }
 366
 367       xgcv.foreground = WhitePixelOfScreen(Win[window].perscreen->screen);
 368       xgcv.background = BlackPixelOfScreen(Win[window].perscreen->screen);
 369       Win[window].gc = XCreateGC(dsp, Win[window].w,
 370                          GCForeground | GCBackground, &xgcv);
 371     }
 372     if(-1 == nice(nicelevel)) {
 373       fprintf(stderr, "dtscreen: failed to set nice() level '%s'\n", strerror(errno));
 374     }
 375
 376     justDisplay();
 377
 378     finish();
 379
 380     return 0;
 381 }