2 * Copyright (c) 1993, John Brezak
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
8 * 1. Redistributions of source code must retain the above copyright
9 * notice, this list of conditions and the following disclaimer.
10 * 2. Redistributions in binary form must reproduce the above copyright
11 * notice, this list of conditions and the following disclaimer in the
12 * documentation and/or other materials provided with the distribution.
13 * 3. All advertising materials mentioning features or use of this software
14 * must display the following acknowledgement:
15 * This product includes software developed by the University of
16 * California, Berkeley and its contributors.
17 * 4. Neither the name of the University nor the names of its contributors
18 * may be used to endorse or promote products derived from this software
19 * without specific prior written permission.
21 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
22 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
23 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
24 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
25 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
26 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
27 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
28 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
29 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
30 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
33 * $FreeBSD: src/libexec/rpc.rusersd/rusers_proc.c,v 1.10 1999/08/28 00:09:56 peter Exp $
34 * $DragonFly: src/libexec/rpc.rusersd/rusers_proc.c,v 1.4 2007/11/25 01:28:23 swildner Exp $
43 #include <sys/param.h>
50 #include <X11/extensions/xidle.h>
53 #include <rpcsvc/rnusers.h>
56 #define IGNOREUSER "sleeper"
59 #define _PATH_UTMP UTMP_FILE
63 #define _PATH_UTMP "/etc/utmp"
67 #define _PATH_DEV "/dev"
71 #define UT_LINESIZE sizeof(((struct utmp *)0)->ut_line)
74 #define UT_NAMESIZE sizeof(((struct utmp *)0)->ut_name)
77 #define UT_HOSTSIZE sizeof(((struct utmp *)0)->ut_host)
80 typedef char ut_line_t[UT_LINESIZE+1];
81 typedef char ut_name_t[UT_NAMESIZE+1];
82 typedef char ut_host_t[UT_HOSTSIZE+1];
84 utmpidle utmp_idle[MAXUSERS];
85 rutmp old_utmp[MAXUSERS];
86 ut_line_t line[MAXUSERS];
87 ut_name_t name[MAXUSERS];
88 ut_host_t host[MAXUSERS];
90 extern int from_inetd;
97 static jmp_buf openAbort;
102 longjmp (openAbort, 1);
105 XqueryIdle(char *display)
107 int first_event, first_error;
110 (void) signal (SIGALRM, abortOpen);
111 (void) alarm ((unsigned) 10);
112 if (!setjmp (openAbort)) {
113 if (!(dpy= XOpenDisplay(display))) {
114 syslog(LOG_ERR, "Cannot open display %s", display);
117 if (XidleQueryExtension(dpy, &first_event, &first_error)) {
118 if (!XGetIdleTime(dpy, &IdleTime)) {
119 syslog(LOG_ERR, "%s: unable to get idle time", display);
124 syslog(LOG_ERR, "%s: Xidle extension not loaded", display);
130 syslog(LOG_ERR, "%s: server grabbed for over 10 seconds", display);
133 (void) signal (SIGALRM, SIG_DFL);
134 (void) alarm ((unsigned) 0);
137 return((IdleTime + 30) / 60);
142 getidle(char *tty, char *display)
145 char devname[PATH_MAX];
150 * If this is an X terminal or console, then try the
154 if (display && *display && (idle = XqueryIdle(display)) >= 0)
159 u_long kbd_idle, mouse_idle;
160 #if !defined(__DragonFly__) && !defined(__FreeBSD__)
161 kbd_idle = getidle("kbd", NULL);
163 kbd_idle = getidle("vga", NULL);
165 mouse_idle = getidle("mouse", NULL);
166 idle = (kbd_idle < mouse_idle)?kbd_idle:mouse_idle;
169 sprintf(devname, "%s/%s", _PATH_DEV, tty);
170 if (stat(devname, &st) < 0) {
172 printf("%s: %s\n", devname, strerror(errno));
178 printf("%s: now=%d atime=%d\n", devname, now,
181 idle = now - st.st_atime;
182 idle = (idle + 30) / 60; /* secs->mins */
184 if (idle < 0) idle = 0;
192 static utmpidlearr ut;
196 bzero((char *)&ut, sizeof(ut));
197 ut.utmpidlearr_val = &utmp_idle[0];
199 ufp = fopen(_PATH_UTMP, "r");
201 syslog(LOG_ERR, "%m");
205 /* only entries with both name and line fields */
206 while (fread((char *)&usr, sizeof(usr), 1, ufp) == 1 &&
208 if (*usr.ut_name && *usr.ut_line &&
209 strncmp(usr.ut_name, IGNOREUSER,
212 && usr.ut_type == USER_PROCESS
215 utmp_idle[nusers].ui_utmp.ut_time =
217 utmp_idle[nusers].ui_idle =
218 getidle(usr.ut_line, usr.ut_host);
219 utmp_idle[nusers].ui_utmp.ut_line = line[nusers];
220 strncpy(line[nusers], usr.ut_line, UT_LINESIZE);
221 utmp_idle[nusers].ui_utmp.ut_name = name[nusers];
222 strncpy(name[nusers], usr.ut_name, UT_NAMESIZE);
223 utmp_idle[nusers].ui_utmp.ut_host = host[nusers];
224 strncpy(host[nusers], usr.ut_host, UT_HOSTSIZE);
226 /* Make sure entries are NUL terminated */
227 line[nusers][UT_LINESIZE] =
228 name[nusers][UT_NAMESIZE] =
229 host[nusers][UT_HOSTSIZE] = '\0';
233 ut.utmpidlearr_len = nusers;
241 static int num_users = 0;
244 ufp = fopen(_PATH_UTMP, "r");
246 syslog(LOG_ERR, "%m");
250 /* only entries with both name and line fields */
251 while (fread((char *)&usr, sizeof(usr), 1, ufp) == 1)
252 if (*usr.ut_name && *usr.ut_line &&
253 strncmp(usr.ut_name, IGNOREUSER,
256 && usr.ut_type == USER_PROCESS
273 bzero((char *)&ut, sizeof(ut));
275 utidle = do_names_2(all);
277 ut.utmparr_len = utidle->utmpidlearr_len;
278 ut.utmparr_val = &old_utmp[0];
279 for (i = 0; i < ut.utmparr_len; i++)
280 bcopy(&utmp_idle[i].ui_utmp, &old_utmp[i],
281 sizeof(old_utmp[0]));
289 rusersproc_names_2_svc(argp, rqstp)
291 struct svc_req *rqstp;
293 return(do_names_2(0));
297 rusersproc_allnames_2_svc(argp, rqstp)
299 struct svc_req *rqstp;
301 return(do_names_2(1));
305 rusersproc_names_1_svc(argp, rqstp)
307 struct svc_req *rqstp;
309 return(do_names_1(0));
313 rusersproc_allnames_1_svc(argp, rqstp)
315 struct svc_req *rqstp;
317 return(do_names_1(1));
321 rusers_service(rqstp, transp)
322 struct svc_req *rqstp;
329 bool_t (*xdr_argument)(), (*xdr_result)();
332 switch (rqstp->rq_proc) {
334 (void)svc_sendreply(transp, (xdrproc_t)xdr_void, NULL);
338 xdr_argument = xdr_void;
339 xdr_result = xdr_int;
340 local = (char *(*)()) rusers_num;
343 case RUSERSPROC_NAMES:
344 xdr_argument = xdr_void;
345 xdr_result = xdr_utmpidlearr;
346 switch (rqstp->rq_vers) {
347 case RUSERSVERS_ORIG:
348 local = (char *(*)()) rusersproc_names_1_svc;
350 case RUSERSVERS_IDLE:
351 local = (char *(*)()) rusersproc_names_2_svc;
354 svcerr_progvers(transp, RUSERSVERS_ORIG, RUSERSVERS_IDLE);
360 case RUSERSPROC_ALLNAMES:
361 xdr_argument = xdr_void;
362 xdr_result = xdr_utmpidlearr;
363 switch (rqstp->rq_vers) {
364 case RUSERSVERS_ORIG:
365 local = (char *(*)()) rusersproc_allnames_1_svc;
367 case RUSERSVERS_IDLE:
368 local = (char *(*)()) rusersproc_allnames_2_svc;
371 svcerr_progvers(transp, RUSERSVERS_ORIG, RUSERSVERS_IDLE);
378 svcerr_noproc(transp);
381 bzero((char *)&argument, sizeof(argument));
382 if (!svc_getargs(transp, (xdrproc_t)xdr_argument, (caddr_t)&argument)) {
383 svcerr_decode(transp);
386 result = (*local)(&argument, rqstp);
387 if (result != NULL &&
388 !svc_sendreply(transp, (xdrproc_t)xdr_result, result)) {
389 svcerr_systemerr(transp);
391 if (!svc_freeargs(transp, (xdrproc_t)xdr_argument, (caddr_t)&argument)) {
392 syslog(LOG_ERR, "unable to free arguments");