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
35 static const char rcsid[] =
44 #include <sys/param.h>
52 #include <X11/extensions/xidle.h>
55 #include <rpcsvc/rnusers.h>
58 #define IGNOREUSER "sleeper"
61 #define _PATH_UTMP UTMP_FILE
65 #define _PATH_UTMP "/etc/utmp"
69 #define _PATH_DEV "/dev"
73 #define UT_LINESIZE sizeof(((struct utmp *)0)->ut_line)
76 #define UT_NAMESIZE sizeof(((struct utmp *)0)->ut_name)
79 #define UT_HOSTSIZE sizeof(((struct utmp *)0)->ut_host)
82 typedef char ut_line_t[UT_LINESIZE+1];
83 typedef char ut_name_t[UT_NAMESIZE+1];
84 typedef char ut_host_t[UT_HOSTSIZE+1];
86 utmpidle utmp_idle[MAXUSERS];
87 rutmp old_utmp[MAXUSERS];
88 ut_line_t line[MAXUSERS];
89 ut_name_t name[MAXUSERS];
90 ut_host_t host[MAXUSERS];
92 extern int from_inetd;
99 static jmp_buf openAbort;
104 longjmp (openAbort, 1);
107 XqueryIdle(char *display)
109 int first_event, first_error;
112 (void) signal (SIGALRM, abortOpen);
113 (void) alarm ((unsigned) 10);
114 if (!setjmp (openAbort)) {
115 if (!(dpy= XOpenDisplay(display))) {
116 syslog(LOG_ERR, "Cannot open display %s", display);
119 if (XidleQueryExtension(dpy, &first_event, &first_error)) {
120 if (!XGetIdleTime(dpy, &IdleTime)) {
121 syslog(LOG_ERR, "%s: unable to get idle time", display);
126 syslog(LOG_ERR, "%s: Xidle extension not loaded", display);
132 syslog(LOG_ERR, "%s: server grabbed for over 10 seconds", display);
135 (void) signal (SIGALRM, SIG_DFL);
136 (void) alarm ((unsigned) 0);
139 return((IdleTime + 30) / 60);
144 getidle(char *tty, char *display)
147 char devname[PATH_MAX];
152 * If this is an X terminal or console, then try the
156 if (display && *display && (idle = XqueryIdle(display)) >= 0)
161 u_long kbd_idle, mouse_idle;
162 #if !defined(__FreeBSD__)
163 kbd_idle = getidle("kbd", NULL);
165 kbd_idle = getidle("vga", NULL);
167 mouse_idle = getidle("mouse", NULL);
168 idle = (kbd_idle < mouse_idle)?kbd_idle:mouse_idle;
171 sprintf(devname, "%s/%s", _PATH_DEV, tty);
172 if (stat(devname, &st) < 0) {
174 printf("%s: %s\n", devname, strerror(errno));
180 printf("%s: now=%d atime=%d\n", devname, now,
183 idle = now - st.st_atime;
184 idle = (idle + 30) / 60; /* secs->mins */
186 if (idle < 0) idle = 0;
194 static utmpidlearr ut;
198 bzero((char *)&ut, sizeof(ut));
199 ut.utmpidlearr_val = &utmp_idle[0];
201 ufp = fopen(_PATH_UTMP, "r");
203 syslog(LOG_ERR, "%m");
207 /* only entries with both name and line fields */
208 while (fread((char *)&usr, sizeof(usr), 1, ufp) == 1 &&
210 if (*usr.ut_name && *usr.ut_line &&
211 strncmp(usr.ut_name, IGNOREUSER,
214 && usr.ut_type == USER_PROCESS
217 utmp_idle[nusers].ui_utmp.ut_time =
219 utmp_idle[nusers].ui_idle =
220 getidle(usr.ut_line, usr.ut_host);
221 utmp_idle[nusers].ui_utmp.ut_line = line[nusers];
222 strncpy(line[nusers], usr.ut_line, UT_LINESIZE);
223 utmp_idle[nusers].ui_utmp.ut_name = name[nusers];
224 strncpy(name[nusers], usr.ut_name, UT_NAMESIZE);
225 utmp_idle[nusers].ui_utmp.ut_host = host[nusers];
226 strncpy(host[nusers], usr.ut_host, UT_HOSTSIZE);
228 /* Make sure entries are NUL terminated */
229 line[nusers][UT_LINESIZE] =
230 name[nusers][UT_NAMESIZE] =
231 host[nusers][UT_HOSTSIZE] = '\0';
235 ut.utmpidlearr_len = nusers;
243 static int num_users = 0;
246 ufp = fopen(_PATH_UTMP, "r");
248 syslog(LOG_ERR, "%m");
252 /* only entries with both name and line fields */
253 while (fread((char *)&usr, sizeof(usr), 1, ufp) == 1)
254 if (*usr.ut_name && *usr.ut_line &&
255 strncmp(usr.ut_name, IGNOREUSER,
258 && usr.ut_type == USER_PROCESS
275 bzero((char *)&ut, sizeof(ut));
277 utidle = do_names_2(all);
279 ut.utmparr_len = utidle->utmpidlearr_len;
280 ut.utmparr_val = &old_utmp[0];
281 for (i = 0; i < ut.utmparr_len; i++)
282 bcopy(&utmp_idle[i].ui_utmp, &old_utmp[i],
283 sizeof(old_utmp[0]));
291 rusersproc_names_2_svc(void *argp, struct svc_req *rqstp)
293 return(do_names_2(0));
297 rusersproc_allnames_2_svc(void *argp, struct svc_req *rqstp)
299 return(do_names_2(1));
303 rusersproc_names_1_svc(void *argp, struct svc_req *rqstp)
305 return(do_names_1(0));
309 rusersproc_allnames_1_svc(void *argp, struct svc_req *rqstp)
311 return(do_names_1(1));
315 rusers_service(struct svc_req *rqstp, SVCXPRT *transp)
321 bool_t (*xdr_argument)(), (*xdr_result)();
324 switch (rqstp->rq_proc) {
326 (void)svc_sendreply(transp, (xdrproc_t)xdr_void, NULL);
330 xdr_argument = xdr_void;
331 xdr_result = xdr_int;
332 local = (char *(*)()) rusers_num;
335 case RUSERSPROC_NAMES:
336 xdr_argument = xdr_void;
337 xdr_result = xdr_utmpidlearr;
338 switch (rqstp->rq_vers) {
339 case RUSERSVERS_ORIG:
340 local = (char *(*)()) rusersproc_names_1_svc;
342 case RUSERSVERS_IDLE:
343 local = (char *(*)()) rusersproc_names_2_svc;
346 svcerr_progvers(transp, RUSERSVERS_ORIG, RUSERSVERS_IDLE);
352 case RUSERSPROC_ALLNAMES:
353 xdr_argument = xdr_void;
354 xdr_result = xdr_utmpidlearr;
355 switch (rqstp->rq_vers) {
356 case RUSERSVERS_ORIG:
357 local = (char *(*)()) rusersproc_allnames_1_svc;
359 case RUSERSVERS_IDLE:
360 local = (char *(*)()) rusersproc_allnames_2_svc;
363 svcerr_progvers(transp, RUSERSVERS_ORIG, RUSERSVERS_IDLE);
370 svcerr_noproc(transp);
373 bzero(&argument, sizeof(argument));
374 if (!svc_getargs(transp, (xdrproc_t)xdr_argument, &argument)) {
375 svcerr_decode(transp);
378 result = (*local)(&argument, rqstp);
379 if (result != NULL &&
380 !svc_sendreply(transp, (xdrproc_t)xdr_result, result)) {
381 svcerr_systemerr(transp);
383 if (!svc_freeargs(transp, (xdrproc_t)xdr_argument, &argument)) {
384 syslog(LOG_ERR, "unable to free arguments");