screenblank.c revision 1.16 1 /* $NetBSD: screenblank.c,v 1.16 2002/01/23 16:57:51 lukem Exp $ */
2
3 /*-
4 * Copyright (c) 1996-2002 The NetBSD Foundation, Inc.
5 * All rights reserved.
6 *
7 * This code is derived from software contributed to The NetBSD Foundation
8 * by Jason R. Thorpe.
9 *
10 * Redistribution and use in source and binary forms, with or without
11 * modification, are permitted provided that the following conditions
12 * are met:
13 * 1. Redistributions of source code must retain the above copyright
14 * notice, this list of conditions and the following disclaimer.
15 * 2. Redistributions in binary form must reproduce the above copyright
16 * notice, this list of conditions and the following disclaimer in the
17 * documentation and/or other materials provided with the distribution.
18 * 3. All advertising materials mentioning features or use of this software
19 * must display the following acknowledgement:
20 * This product includes software developed by the NetBSD
21 * Foundation, Inc. and its contributors.
22 * 4. Neither the name of The NetBSD Foundation nor the names of its
23 * contributors may be used to endorse or promote products derived
24 * from this software without specific prior written permission.
25 *
26 * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
27 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
28 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
29 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
30 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
31 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
32 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
33 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
34 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
35 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
36 * POSSIBILITY OF SUCH DAMAGE.
37 */
38
39 /*
40 * Screensaver daemon for the Sun 3 and SPARC, and platforms using WSCONS.
41 */
42
43 #include <sys/cdefs.h>
44 #ifndef lint
45 __COPYRIGHT(
46 "@(#) Copyright (c) 1996-2002 \
47 The NetBSD Foundation, Inc. All rights reserved.");
48 __RCSID("$NetBSD: screenblank.c,v 1.16 2002/01/23 16:57:51 lukem Exp $");
49 #endif
50
51 #include <sys/types.h>
52 #include <sys/time.h>
53 #include <sys/stat.h>
54 #include <sys/ioctl.h>
55 #include <sys/queue.h>
56 #include <ctype.h>
57 #include <err.h>
58 #include <errno.h>
59 #include <fcntl.h>
60 #include <limits.h>
61 #include <math.h>
62 #include <paths.h>
63 #include <stdlib.h>
64 #include <stdio.h>
65 #include <string.h>
66 #include <signal.h>
67 #include <syslog.h>
68 #include <unistd.h>
69 #include <util.h>
70
71 #include <dev/wscons/wsconsio.h>
72
73 #ifdef HAVE_FBIO
74 #include <dev/sun/fbio.h>
75 #endif
76
77 #include "pathnames.h"
78
79 u_long setvideo = WSDISPLAYIO_SVIDEO; /* "set video" ioctl */
80 int videoon = WSDISPLAYIO_VIDEO_ON; /* value for "on" */
81 int videooff = WSDISPLAYIO_VIDEO_OFF; /* value for "off" */
82
83 struct dev_stat {
84 LIST_ENTRY(dev_stat) ds_link; /* linked list */
85 const char *ds_path; /* path to device */
86 int ds_isfb; /* boolean; framebuffer? */
87 time_t ds_atime; /* time device last accessed */
88 time_t ds_mtime; /* time device last modified */
89 };
90 LIST_HEAD(ds_list, dev_stat) ds_list;
91
92 int main(int, char *[]);
93 static void add_dev(const char *, int);
94 static void change_state(int);
95 static void cvt_arg(char *, struct timeval *);
96 static void sighandler(int);
97 static void usage(void);
98
99 int
100 main(int argc, char *argv[])
101 {
102 struct dev_stat *dsp;
103 struct timeval timo_on, timo_off, *tvp, tv;
104 struct sigaction sa;
105 struct stat st;
106 int ch, change, fflag = 0, kflag = 0, mflag = 0, state;
107 const char *kbd, *mouse, *display;
108
109 LIST_INIT(&ds_list);
110
111 /*
112 * Set the default timeouts: 10 minutes on, .25 seconds off.
113 */
114 timo_on.tv_sec = 600;
115 timo_on.tv_usec = 0;
116 timo_off.tv_sec = 0;
117 timo_off.tv_usec = 250000;
118
119 while ((ch = getopt(argc, argv, "d:e:f:km")) != -1) {
120 switch (ch) {
121 case 'd':
122 cvt_arg(optarg, &timo_on);
123 break;
124
125 case 'e':
126 cvt_arg(optarg, &timo_off);
127 break;
128
129 case 'f':
130 fflag = 1;
131 add_dev(optarg, 1);
132 break;
133
134 case 'k':
135 if (mflag || kflag)
136 usage();
137 kflag = 1;
138 break;
139
140 case 'm':
141 if (kflag || mflag)
142 usage();
143 mflag = 1;
144 break;
145
146 default:
147 usage();
148 }
149 }
150 argc -= optind;
151 if (argc)
152 usage();
153
154 /*
155 * Default to WSCONS support.
156 */
157 kbd = _PATH_WSKBD;
158 mouse = _PATH_WSMOUSE;
159 display = _PATH_WSDISPLAY;
160
161 #ifdef HAVE_FBIO
162 /*
163 * If a display device wasn't specified, check to see which we
164 * have. If we can't open the WSCONS display, fall back to fbio.
165 */
166 if (!fflag) {
167 int fd;
168
169 if ((fd = open(display, O_RDONLY, 0666)) == -1)
170 setvideo = FBIOSVIDEO;
171 else
172 (void) close(fd);
173 }
174
175 /*
176 * Do this here so that -f ... args above can influence us.
177 */
178 if (setvideo == FBIOSVIDEO) {
179 videoon = FBVIDEO_ON;
180 videooff = FBVIDEO_OFF;
181 kbd = _PATH_KEYBOARD;
182 mouse = _PATH_MOUSE;
183 display = _PATH_FB;
184 }
185 #endif
186
187 /*
188 * Add the keyboard, mouse, and default framebuffer devices
189 * as necessary. We _always_ check the console device.
190 */
191 add_dev(_PATH_CONSOLE, 0);
192 if (!kflag)
193 add_dev(kbd, 0);
194 if (!mflag)
195 add_dev(mouse, 0);
196 if (!fflag)
197 add_dev(display, 1);
198
199 /* Ensure that the framebuffer is on. */
200 state = videoon;
201 change_state(state);
202 tvp = &timo_on;
203
204 /*
205 * Make sure the framebuffer gets turned back on when we're
206 * killed.
207 */
208 sa.sa_handler = sighandler;
209 sa.sa_flags = SA_NOCLDSTOP;
210 if (sigemptyset(&sa.sa_mask))
211 err(1, "sigemptyset");
212 if (sigaction(SIGINT, &sa, NULL) || sigaction(SIGTERM, &sa, NULL) ||
213 sigaction(SIGHUP, &sa, NULL))
214 err(1, "sigaction");
215
216 openlog("screenblank", LOG_PID, LOG_DAEMON);
217 /* Detach. */
218 if (daemon(0, 0))
219 err(1, "daemon");
220 pidfile(NULL);
221
222 /* Start the state machine. */
223 for (;;) {
224 change = 0;
225 for (dsp = ds_list.lh_first; dsp != NULL;
226 dsp = dsp->ds_link.le_next) {
227 #if 0 /* XXXLUKEM - doesn't make sense for wscons framebuffers */
228 /* Don't check framebuffers. */
229 if (dsp->ds_isfb)
230 continue;
231 #endif
232 if (stat(dsp->ds_path, &st) == -1) {
233 syslog(LOG_CRIT,
234 "Can't stat `%s' (%m)", dsp->ds_path);
235 exit(1);
236 }
237 if (st.st_atime > dsp->ds_atime) {
238 change = 1;
239 dsp->ds_atime = st.st_atime;
240 }
241 if (st.st_mtime > dsp->ds_mtime) {
242 change = 1;
243 dsp->ds_mtime = st.st_mtime;
244 }
245 }
246
247 if (state == videoon) {
248 if (!change) {
249 state = videooff;
250 change_state(state);
251 tvp = &timo_off;
252 }
253 } else {
254 if (change) {
255 state = videoon;
256 change_state(state);
257 tvp = &timo_on;
258 }
259 }
260
261 tv = *tvp;
262 if (select(0, NULL, NULL, NULL, &tv) == -1)
263 err(1, "select");
264 }
265 /* NOTREACHED */
266 }
267
268 static void
269 add_dev(const char *path, int isfb)
270 {
271 struct dev_stat *dsp;
272 struct stat sb;
273
274 /* Make sure we can stat the device. */
275 if (stat(path, &sb) == -1) {
276 warn("Can't stat `%s'", path);
277 return;
278 }
279
280 #ifdef HAVE_FBIO
281 /*
282 * We default to WSCONS. If this is a frame buffer
283 * device, check to see if it responds to the old
284 * Sun-style fbio ioctls. If so, switch to fbio mode.
285 */
286 if (isfb && setvideo != FBIOSVIDEO) {
287 int onoff, fd;
288
289 if ((fd = open(path, O_RDWR, 0666)) == -1) {
290 warn("Can't open `%s'", path);
291 return;
292 }
293 if ((ioctl(fd, FBIOGVIDEO, &onoff)) == 0)
294 setvideo = FBIOSVIDEO;
295 (void)close(fd);
296 }
297 #endif
298
299 /* Create the entry... */
300 dsp = malloc(sizeof(struct dev_stat));
301 if (dsp == NULL)
302 err(1, "Can't allocate memory for `%s'", path);
303 (void)memset(dsp, 0, sizeof(struct dev_stat));
304 dsp->ds_path = path;
305 dsp->ds_isfb = isfb;
306
307 /* ...and put it in the list. */
308 LIST_INSERT_HEAD(&ds_list, dsp, ds_link);
309 }
310
311 /* ARGSUSED */
312 static void
313 sighandler(int sig)
314 {
315
316 /* Kill the pid file and re-enable the framebuffer before exit. */
317 change_state(videoon);
318 exit(0);
319 }
320
321 static void
322 change_state(int state)
323 {
324 struct dev_stat *dsp;
325 int fd;
326 int fail = 1;
327
328 for (dsp = ds_list.lh_first; dsp != NULL; dsp = dsp->ds_link.le_next) {
329 /* Don't change the state of non-framebuffers! */
330 if (dsp->ds_isfb == 0)
331 continue;
332 if ((fd = open(dsp->ds_path, O_RDWR, 0)) == -1) {
333 syslog(LOG_WARNING, "Can't open `%s' (%m)",
334 dsp->ds_path);
335 continue;
336 }
337 if (ioctl(fd, setvideo, &state) == -1)
338 syslog(LOG_WARNING, "Can't set video on `%s' (%m)",
339 dsp->ds_path);
340 else
341 fail = 0;
342 (void)close(fd);
343 }
344 if (fail) {
345 syslog(LOG_CRIT, "No frame buffer devices, exiting\n");
346 exit(1);
347 }
348 }
349
350 static void
351 cvt_arg(char *arg, struct timeval *tvp)
352 {
353 char *cp;
354 int seconds, microseconds, factor;
355 int period = 0;
356 factor = 1000000;
357 microseconds = 0;
358 seconds = 0;
359
360 for (cp = arg; *cp != '\0'; ++cp) {
361 if (*cp == '.') {
362 if (period)
363 errx(1, "Invalid argument: %s", arg);
364 period = 1;
365 continue;
366 }
367
368 if (!isdigit(*cp))
369 errx(1, "Invalid argument: %s", arg);
370
371 if (period) {
372 if (factor > 1) {
373 microseconds = microseconds * 10 + (*cp - '0');
374 factor /= 10;
375 }
376 } else
377 seconds = (seconds * 10) + (*cp - '0');
378 }
379
380 tvp->tv_sec = seconds;
381 if (factor > 1)
382 microseconds *= factor;
383
384 tvp->tv_usec = microseconds;
385 }
386
387 static void
388 usage(void)
389 {
390
391 (void)fprintf(stderr,
392 "Usage: %s [-k | -m] [-d timeout] [-e timeout] [-f framebuffer]\n",
393 getprogname());
394 exit(1);
395 }
396