xref: /netbsd-src/usr.sbin/screenblank/screenblank.c (revision e5548b402ae4c44fb816de42c7bba9581ce23ef5)
1 /*	$NetBSD: screenblank.c,v 1.23 2005/11/11 15:14:24 peter 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.23 2005/11/11 15:14:24 peter 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 		LIST_FOREACH(dsp, &ds_list, ds_link) {
231 			/* Don't check framebuffers in graphics mode. */
232 			if (is_graphics_fb(dsp))
233 				continue;
234 			if (stat(dsp->ds_path, &st) == -1) {
235 				syslog(LOG_CRIT,
236 				    "Can't stat `%s' (%m)", dsp->ds_path);
237 				exit(1);
238 			}
239 			if (st.st_atime > dsp->ds_atime) {
240 				change = 1;
241 				dsp->ds_atime = st.st_atime;
242 			}
243 			if (st.st_mtime > dsp->ds_mtime) {
244 				change = 1;
245 				dsp->ds_mtime = st.st_mtime;
246 			}
247 		}
248 
249 		if (state == videoon) {
250 			if (!change) {
251 				state = videooff;
252 				change_state(state);
253 				tvp = &timo_off;
254 			}
255 		} else {
256 			if (change) {
257 				state = videoon;
258 				change_state(state);
259 				tvp = &timo_on;
260 			}
261 		}
262 
263 		tv = *tvp;
264 		if (nanosleep(&tv, NULL) == -1)
265 			err(1, "nanosleep");
266 	}
267 	/* NOTREACHED */
268 }
269 
270 static void
271 add_dev(const char *path, int isfb)
272 {
273 	struct dev_stat *dsp;
274 	struct stat sb;
275 
276 	/* Make sure we can stat the device. */
277 	if (stat(path, &sb) == -1) {
278 		warn("Can't stat `%s'", path);
279 		return;
280 	}
281 
282 #ifdef HAVE_FBIO
283 	/*
284 	 * We default to WSCONS.  If this is a frame buffer
285 	 * device, check to see if it responds to the old
286 	 * Sun-style fbio ioctls.  If so, switch to fbio mode.
287 	 */
288 	if (isfb && setvideo != FBIOSVIDEO) {
289 		int onoff, fd;
290 
291 		if ((fd = open(path, O_RDWR, 0666)) == -1) {
292 			warn("Can't open `%s'", path);
293 			return;
294 		}
295 		if ((ioctl(fd, FBIOGVIDEO, &onoff)) == 0)
296 			setvideo = FBIOSVIDEO;
297 		(void)close(fd);
298 	}
299 #endif
300 
301 	/* Create the entry... */
302 	dsp = malloc(sizeof(struct dev_stat));
303 	if (dsp == NULL)
304 		err(1, "Can't allocate memory for `%s'", path);
305 	(void)memset(dsp, 0, sizeof(struct dev_stat));
306 	dsp->ds_path = path;
307 	dsp->ds_isfb = isfb;
308 
309 	/* ...and put it in the list. */
310 	LIST_INSERT_HEAD(&ds_list, dsp, ds_link);
311 }
312 
313 /* ARGSUSED */
314 static void
315 sighandler(int sig)
316 {
317 
318 	/* Kill the pid file and re-enable the framebuffer before exit. */
319 	change_state(videoon);
320 	exit(0);
321 }
322 
323 /*
324  * Return 1 if we are a framebuffer in graphics mode or a framebuffer
325  * where we cannot tell the mode. Return 0 if we are not a framebuffer
326  * device, or a wscons framebuffer in text mode.
327  */
328 static int
329 is_graphics_fb(struct dev_stat *dsp)
330 {
331 	int fd;
332 	int state;
333 
334 	if (dsp->ds_isfb == 0)
335 		return 0;
336 
337 	/* We can't tell if we are not a wscons device */
338 	if (setvideo != WSDISPLAYIO_SVIDEO)
339 		return 1;
340 
341 	if ((fd = open(dsp->ds_path, O_RDWR, 0)) == -1) {
342 		syslog(LOG_WARNING, "Cannot open `%s' (%m)", dsp->ds_path);
343 		return 1;
344 	}
345 
346 	if (ioctl(fd, WSDISPLAYIO_GMODE, &state) == -1) {
347 		syslog(LOG_WARNING, "Cannot get mode on `%s' (%m)",
348 		    dsp->ds_path);
349 		/* We can't tell, so we say we are mapped */
350 		state = WSDISPLAYIO_MODE_MAPPED;
351 	}
352 
353 	(void)close(fd);
354 
355 	return state != WSDISPLAYIO_MODE_EMUL;
356 }
357 
358 static void
359 change_state(int state)
360 {
361 	struct dev_stat *dsp;
362 	int fd;
363 	int fail = 1;
364 
365 	LIST_FOREACH(dsp, &ds_list, ds_link) {
366 		/* Don't change the state of non-framebuffers! */
367 		if (dsp->ds_isfb == 0)
368 			continue;
369 		if ((fd = open(dsp->ds_path, O_RDWR, 0)) == -1) {
370 			syslog(LOG_WARNING, "Can't open `%s' (%m)",
371 			    dsp->ds_path);
372 			continue;
373 		}
374 		if (ioctl(fd, setvideo, &state) == -1)
375 			syslog(LOG_WARNING, "Can't set video on `%s' (%m)",
376 			    dsp->ds_path);
377 		else
378 			fail = 0;
379 		(void)close(fd);
380 	}
381 	if (fail) {
382 		syslog(LOG_CRIT, "No frame buffer devices, exiting\n");
383 		exit(1);
384 	}
385 }
386 
387 static void
388 cvt_arg(char *arg, struct timespec *tvp)
389 {
390 	char *cp;
391 	int seconds, nanoseconds, factor;
392 	int period = 0;
393 	factor = 1000000000;
394 	nanoseconds = 0;
395 	seconds = 0;
396 
397 	for (cp = arg; *cp != '\0'; ++cp) {
398 		if (*cp == '.') {
399 			if (period)
400 				errx(1, "Invalid argument: %s", arg);
401 			period = 1;
402 			continue;
403 		}
404 
405 		if (!isdigit((unsigned char)*cp))
406 			errx(1, "Invalid argument: %s", arg);
407 
408 		if (period) {
409 			if (factor > 1) {
410 				nanoseconds = nanoseconds * 10 + (*cp - '0');
411 				factor /= 10;
412 			}
413 		} else
414 			seconds = (seconds * 10) + (*cp - '0');
415 	}
416 
417 	tvp->tv_sec = seconds;
418 	if (factor > 1)
419 		nanoseconds *= factor;
420 
421 	tvp->tv_nsec = nanoseconds;
422 }
423 
424 static void
425 usage(void)
426 {
427 
428 	(void)fprintf(stderr,
429 	    "usage: %s [-k | -m] [-d inactivity-timeout] [-e wakeup-delay]\n"
430 	    "\t\t[-f framebuffer] [-i input-device]\n",
431 	    getprogname());
432 	exit(1);
433 }
434