screenblank.c revision 1.22 1 /* $NetBSD: screenblank.c,v 1.22 2004/11/25 20:23:36 christos 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.22 2004/11/25 20:23:36 christos 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 timespec *);
96 static void sighandler(int);
97 static int is_graphics_fb(struct dev_stat *);
98 static void usage(void);
99
100 int
101 main(int argc, char *argv[])
102 {
103 struct dev_stat *dsp;
104 struct timespec timo_on, timo_off, *tvp, tv;
105 struct sigaction sa;
106 struct stat st;
107 int ch, change, fflag = 0, kflag = 0, mflag = 0, state;
108 const char *kbd, *mouse, *display;
109
110 LIST_INIT(&ds_list);
111
112 /*
113 * Set the default timeouts: 10 minutes on, .25 seconds off.
114 */
115 timo_on.tv_sec = 600;
116 timo_on.tv_nsec = 0;
117 timo_off.tv_sec = 0;
118 timo_off.tv_nsec = 250000000;
119
120 while ((ch = getopt(argc, argv, "d:e:f:i:km")) != -1) {
121 switch (ch) {
122 case 'd':
123 cvt_arg(optarg, &timo_on);
124 break;
125
126 case 'e':
127 cvt_arg(optarg, &timo_off);
128 break;
129
130 case 'f':
131 fflag = 1;
132 add_dev(optarg, 1);
133 break;
134
135 case 'i':
136 add_dev(optarg, 0);
137 break;
138
139 case 'k':
140 if (mflag || kflag)
141 usage();
142 kflag = 1;
143 break;
144
145 case 'm':
146 if (kflag || mflag)
147 usage();
148 mflag = 1;
149 break;
150
151 default:
152 usage();
153 }
154 }
155 argc -= optind;
156 if (argc)
157 usage();
158
159 /*
160 * Default to WSCONS support.
161 */
162 kbd = _PATH_WSKBD;
163 mouse = _PATH_WSMOUSE;
164 display = _PATH_WSDISPLAY;
165
166 #ifdef HAVE_FBIO
167 /*
168 * If a display device wasn't specified, check to see which we
169 * have. If we can't open the WSCONS display, fall back to fbio.
170 */
171 if (!fflag) {
172 int fd;
173
174 if ((fd = open(display, O_RDONLY, 0666)) == -1)
175 setvideo = FBIOSVIDEO;
176 else
177 (void) close(fd);
178 }
179
180 /*
181 * Do this here so that -f ... args above can influence us.
182 */
183 if (setvideo == FBIOSVIDEO) {
184 videoon = FBVIDEO_ON;
185 videooff = FBVIDEO_OFF;
186 kbd = _PATH_KEYBOARD;
187 mouse = _PATH_MOUSE;
188 display = _PATH_FB;
189 }
190 #endif
191
192 /*
193 * Add the keyboard, mouse, and default framebuffer devices
194 * as necessary. We _always_ check the console device.
195 */
196 add_dev(_PATH_CONSOLE, 0);
197 if (!kflag)
198 add_dev(kbd, 0);
199 if (!mflag)
200 add_dev(mouse, 0);
201 if (!fflag)
202 add_dev(display, 1);
203
204 /* Ensure that the framebuffer is on. */
205 state = videoon;
206 change_state(state);
207 tvp = &timo_on;
208
209 /*
210 * Make sure the framebuffer gets turned back on when we're
211 * killed.
212 */
213 sa.sa_handler = sighandler;
214 sa.sa_flags = SA_NOCLDSTOP;
215 if (sigemptyset(&sa.sa_mask))
216 err(1, "sigemptyset");
217 if (sigaction(SIGINT, &sa, NULL) || sigaction(SIGTERM, &sa, NULL) ||
218 sigaction(SIGHUP, &sa, NULL))
219 err(1, "sigaction");
220
221 openlog("screenblank", LOG_PID, LOG_DAEMON);
222 /* Detach. */
223 if (daemon(0, 0))
224 err(1, "daemon");
225 pidfile(NULL);
226
227 /* Start the state machine. */
228 for (;;) {
229 change = 0;
230 for (dsp = ds_list.lh_first; dsp != NULL;
231 dsp = dsp->ds_link.le_next) {
232 /* Don't check framebuffers in graphics mode. */
233 if (is_graphics_fb(dsp))
234 continue;
235 if (stat(dsp->ds_path, &st) == -1) {
236 syslog(LOG_CRIT,
237 "Can't stat `%s' (%m)", dsp->ds_path);
238 exit(1);
239 }
240 if (st.st_atime > dsp->ds_atime) {
241 change = 1;
242 dsp->ds_atime = st.st_atime;
243 }
244 if (st.st_mtime > dsp->ds_mtime) {
245 change = 1;
246 dsp->ds_mtime = st.st_mtime;
247 }
248 }
249
250 if (state == videoon) {
251 if (!change) {
252 state = videooff;
253 change_state(state);
254 tvp = &timo_off;
255 }
256 } else {
257 if (change) {
258 state = videoon;
259 change_state(state);
260 tvp = &timo_on;
261 }
262 }
263
264 tv = *tvp;
265 if (nanosleep(&tv, NULL) == -1)
266 err(1, "nanosleep");
267 }
268 /* NOTREACHED */
269 }
270
271 static void
272 add_dev(const char *path, int isfb)
273 {
274 struct dev_stat *dsp;
275 struct stat sb;
276
277 /* Make sure we can stat the device. */
278 if (stat(path, &sb) == -1) {
279 warn("Can't stat `%s'", path);
280 return;
281 }
282
283 #ifdef HAVE_FBIO
284 /*
285 * We default to WSCONS. If this is a frame buffer
286 * device, check to see if it responds to the old
287 * Sun-style fbio ioctls. If so, switch to fbio mode.
288 */
289 if (isfb && setvideo != FBIOSVIDEO) {
290 int onoff, fd;
291
292 if ((fd = open(path, O_RDWR, 0666)) == -1) {
293 warn("Can't open `%s'", path);
294 return;
295 }
296 if ((ioctl(fd, FBIOGVIDEO, &onoff)) == 0)
297 setvideo = FBIOSVIDEO;
298 (void)close(fd);
299 }
300 #endif
301
302 /* Create the entry... */
303 dsp = malloc(sizeof(struct dev_stat));
304 if (dsp == NULL)
305 err(1, "Can't allocate memory for `%s'", path);
306 (void)memset(dsp, 0, sizeof(struct dev_stat));
307 dsp->ds_path = path;
308 dsp->ds_isfb = isfb;
309
310 /* ...and put it in the list. */
311 LIST_INSERT_HEAD(&ds_list, dsp, ds_link);
312 }
313
314 /* ARGSUSED */
315 static void
316 sighandler(int sig)
317 {
318
319 /* Kill the pid file and re-enable the framebuffer before exit. */
320 change_state(videoon);
321 exit(0);
322 }
323
324 /*
325 * Return 1 if we are a framebuffer in graphics mode or a framebuffer
326 * where we cannot tell the mode. Return 0 if we are not a framebuffer
327 * device, or a wscons framebuffer in text mode.
328 */
329 static int
330 is_graphics_fb(struct dev_stat *dsp)
331 {
332 int fd;
333 int state;
334
335 if (dsp->ds_isfb == 0)
336 return 0;
337
338 /* We can't tell if we are not a wscons device */
339 if (setvideo != WSDISPLAYIO_SVIDEO)
340 return 1;
341
342 if ((fd = open(dsp->ds_path, O_RDWR, 0)) == -1) {
343 syslog(LOG_WARNING, "Cannot open `%s' (%m)", dsp->ds_path);
344 return 1;
345 }
346
347 if (ioctl(fd, WSDISPLAYIO_GMODE, &state) == -1) {
348 syslog(LOG_WARNING, "Cannot get mode on `%s' (%m)",
349 dsp->ds_path);
350 /* We can't tell, so we say we are mapped */
351 state = WSDISPLAYIO_MODE_MAPPED;
352 }
353
354 (void)close(fd);
355
356 return state != WSDISPLAYIO_MODE_EMUL;
357 }
358
359 static void
360 change_state(int state)
361 {
362 struct dev_stat *dsp;
363 int fd;
364 int fail = 1;
365
366 for (dsp = ds_list.lh_first; dsp != NULL; dsp = dsp->ds_link.le_next) {
367 /* Don't change the state of non-framebuffers! */
368 if (dsp->ds_isfb == 0)
369 continue;
370 if ((fd = open(dsp->ds_path, O_RDWR, 0)) == -1) {
371 syslog(LOG_WARNING, "Can't open `%s' (%m)",
372 dsp->ds_path);
373 continue;
374 }
375 if (ioctl(fd, setvideo, &state) == -1)
376 syslog(LOG_WARNING, "Can't set video on `%s' (%m)",
377 dsp->ds_path);
378 else
379 fail = 0;
380 (void)close(fd);
381 }
382 if (fail) {
383 syslog(LOG_CRIT, "No frame buffer devices, exiting\n");
384 exit(1);
385 }
386 }
387
388 static void
389 cvt_arg(char *arg, struct timespec *tvp)
390 {
391 char *cp;
392 int seconds, nanoseconds, factor;
393 int period = 0;
394 factor = 1000000000;
395 nanoseconds = 0;
396 seconds = 0;
397
398 for (cp = arg; *cp != '\0'; ++cp) {
399 if (*cp == '.') {
400 if (period)
401 errx(1, "Invalid argument: %s", arg);
402 period = 1;
403 continue;
404 }
405
406 if (!isdigit((unsigned char)*cp))
407 errx(1, "Invalid argument: %s", arg);
408
409 if (period) {
410 if (factor > 1) {
411 nanoseconds = nanoseconds * 10 + (*cp - '0');
412 factor /= 10;
413 }
414 } else
415 seconds = (seconds * 10) + (*cp - '0');
416 }
417
418 tvp->tv_sec = seconds;
419 if (factor > 1)
420 nanoseconds *= factor;
421
422 tvp->tv_nsec = nanoseconds;
423 }
424
425 static void
426 usage(void)
427 {
428
429 (void)fprintf(stderr,
430 "usage: %s [-k | -m] [-d inactivity-timeout] [-e wakeup-delay]\n"
431 "\t\t[-f framebuffer] [-i input-device]\n",
432 getprogname());
433 exit(1);
434 }
435