rwho.c revision 1.13 1 1.13 mjl /* $NetBSD: rwho.c,v 1.13 2000/09/06 12:13:48 mjl Exp $ */
2 1.5 tls
3 1.1 cgd /*
4 1.5 tls * Copyright (c) 1983, 1993
5 1.5 tls * The Regents of the University of California. All rights reserved.
6 1.1 cgd *
7 1.1 cgd * Redistribution and use in source and binary forms, with or without
8 1.1 cgd * modification, are permitted provided that the following conditions
9 1.1 cgd * are met:
10 1.1 cgd * 1. Redistributions of source code must retain the above copyright
11 1.1 cgd * notice, this list of conditions and the following disclaimer.
12 1.1 cgd * 2. Redistributions in binary form must reproduce the above copyright
13 1.1 cgd * notice, this list of conditions and the following disclaimer in the
14 1.1 cgd * documentation and/or other materials provided with the distribution.
15 1.1 cgd * 3. All advertising materials mentioning features or use of this software
16 1.1 cgd * must display the following acknowledgement:
17 1.1 cgd * This product includes software developed by the University of
18 1.1 cgd * California, Berkeley and its contributors.
19 1.1 cgd * 4. Neither the name of the University nor the names of its contributors
20 1.1 cgd * may be used to endorse or promote products derived from this software
21 1.1 cgd * without specific prior written permission.
22 1.1 cgd *
23 1.1 cgd * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
24 1.1 cgd * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
25 1.1 cgd * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
26 1.1 cgd * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
27 1.1 cgd * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
28 1.1 cgd * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
29 1.1 cgd * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
30 1.1 cgd * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
31 1.1 cgd * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
32 1.1 cgd * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
33 1.1 cgd * SUCH DAMAGE.
34 1.1 cgd */
35 1.1 cgd
36 1.8 lukem #include <sys/cdefs.h>
37 1.1 cgd #ifndef lint
38 1.8 lukem __COPYRIGHT("@(#) Copyright (c) 1983, 1993\n\
39 1.8 lukem The Regents of the University of California. All rights reserved.\n");
40 1.1 cgd #endif /* not lint */
41 1.1 cgd
42 1.1 cgd #ifndef lint
43 1.5 tls /*static char sccsid[] = "from: @(#)rwho.c 8.1 (Berkeley) 6/6/93";*/
44 1.13 mjl __RCSID("$NetBSD: rwho.c,v 1.13 2000/09/06 12:13:48 mjl Exp $");
45 1.1 cgd #endif /* not lint */
46 1.1 cgd
47 1.1 cgd #include <sys/param.h>
48 1.1 cgd #include <sys/file.h>
49 1.9 mrg
50 1.9 mrg #include <protocols/rwhod.h>
51 1.9 mrg
52 1.3 jtc #include <dirent.h>
53 1.9 mrg #include <err.h>
54 1.9 mrg #include <errno.h>
55 1.13 mjl #include <locale.h>
56 1.1 cgd #include <stdio.h>
57 1.9 mrg #include <stdlib.h>
58 1.4 cgd #include <string.h>
59 1.10 kleink #include <time.h>
60 1.11 christos #include <fcntl.h>
61 1.9 mrg #include <unistd.h>
62 1.1 cgd
63 1.13 mjl void usage(void);
64 1.13 mjl int utmpcmp(const void *, const void *);
65 1.13 mjl
66 1.1 cgd DIR *dirp;
67 1.1 cgd
68 1.1 cgd struct whod wd;
69 1.1 cgd #define NUSERS 1000
70 1.1 cgd struct myutmp {
71 1.1 cgd char myhost[MAXHOSTNAMELEN];
72 1.1 cgd int myidle;
73 1.1 cgd struct outmp myutmp;
74 1.1 cgd } myutmp[NUSERS];
75 1.1 cgd int nusers;
76 1.1 cgd
77 1.1 cgd #define WHDRSIZE (sizeof (wd) - sizeof (wd.wd_we))
78 1.1 cgd /*
79 1.1 cgd * this macro should be shared with ruptime.
80 1.1 cgd */
81 1.1 cgd #define down(w,now) ((now) - (w)->wd_recvtime > 11 * 60)
82 1.1 cgd
83 1.9 mrg int utmpcmp __P((const void *, const void *));
84 1.9 mrg int main __P((int, char **));
85 1.9 mrg
86 1.1 cgd time_t now;
87 1.1 cgd int aflg;
88 1.1 cgd
89 1.9 mrg int
90 1.13 mjl main(int argc, char **argv)
91 1.1 cgd {
92 1.1 cgd int ch;
93 1.3 jtc struct dirent *dp;
94 1.1 cgd int cc, width;
95 1.8 lukem struct whod *w = &wd;
96 1.8 lukem struct whoent *we;
97 1.8 lukem struct myutmp *mp;
98 1.7 cgd int f, n, i, nhosts;
99 1.1 cgd
100 1.13 mjl setlocale(LC_TIME, "");
101 1.13 mjl
102 1.8 lukem while ((ch = getopt(argc, argv, "a")) != -1)
103 1.1 cgd switch((char)ch) {
104 1.1 cgd case 'a':
105 1.1 cgd aflg = 1;
106 1.1 cgd break;
107 1.1 cgd case '?':
108 1.1 cgd default:
109 1.13 mjl usage();
110 1.1 cgd }
111 1.13 mjl
112 1.13 mjl if(optind != argc)
113 1.13 mjl usage();
114 1.13 mjl
115 1.13 mjl if (chdir(_PATH_RWHODIR) || (dirp = opendir(".")) == NULL)
116 1.13 mjl err(1, "%s", _PATH_RWHODIR);
117 1.13 mjl
118 1.1 cgd mp = myutmp;
119 1.7 cgd nhosts = 0;
120 1.1 cgd (void)time(&now);
121 1.9 mrg while ((dp = readdir(dirp)) != NULL) {
122 1.1 cgd if (dp->d_ino == 0 || strncmp(dp->d_name, "whod.", 5))
123 1.1 cgd continue;
124 1.1 cgd f = open(dp->d_name, O_RDONLY);
125 1.1 cgd if (f < 0)
126 1.1 cgd continue;
127 1.1 cgd cc = read(f, (char *)&wd, sizeof (struct whod));
128 1.1 cgd if (cc < WHDRSIZE) {
129 1.1 cgd (void) close(f);
130 1.1 cgd continue;
131 1.1 cgd }
132 1.7 cgd nhosts++;
133 1.1 cgd if (down(w,now)) {
134 1.1 cgd (void) close(f);
135 1.1 cgd continue;
136 1.1 cgd }
137 1.1 cgd cc -= WHDRSIZE;
138 1.1 cgd we = w->wd_we;
139 1.1 cgd for (n = cc / sizeof (struct whoent); n > 0; n--) {
140 1.1 cgd if (aflg == 0 && we->we_idle >= 60*60) {
141 1.1 cgd we++;
142 1.1 cgd continue;
143 1.1 cgd }
144 1.13 mjl if (nusers >= NUSERS)
145 1.13 mjl err(1, "too many users");
146 1.13 mjl
147 1.1 cgd mp->myutmp = we->we_utmp; mp->myidle = we->we_idle;
148 1.1 cgd (void) strcpy(mp->myhost, w->wd_hostname);
149 1.1 cgd nusers++; we++; mp++;
150 1.1 cgd }
151 1.1 cgd (void) close(f);
152 1.1 cgd }
153 1.7 cgd if (nhosts == 0)
154 1.7 cgd errx(0, "no hosts in %s.", _PATH_RWHODIR);
155 1.1 cgd qsort((char *)myutmp, nusers, sizeof (struct myutmp), utmpcmp);
156 1.1 cgd mp = myutmp;
157 1.1 cgd width = 0;
158 1.1 cgd for (i = 0; i < nusers; i++) {
159 1.1 cgd int j = strlen(mp->myhost) + 1 + strlen(mp->myutmp.out_line);
160 1.1 cgd if (j > width)
161 1.1 cgd width = j;
162 1.1 cgd mp++;
163 1.1 cgd }
164 1.1 cgd mp = myutmp;
165 1.1 cgd for (i = 0; i < nusers; i++) {
166 1.13 mjl char buf[BUFSIZ], cbuf[80];
167 1.13 mjl strftime(cbuf, sizeof(cbuf), "%c", localtime((time_t *)&mp->myutmp.out_time));
168 1.13 mjl /* cbuf = ctime((time_t *)&mp->myutmp.out_time); */
169 1.1 cgd (void)sprintf(buf, "%s:%s", mp->myhost, mp->myutmp.out_line);
170 1.1 cgd printf("%-8.8s %-*s %.12s",
171 1.1 cgd mp->myutmp.out_name,
172 1.1 cgd width,
173 1.1 cgd buf,
174 1.13 mjl cbuf + 4);
175 1.1 cgd mp->myidle /= 60;
176 1.1 cgd if (mp->myidle) {
177 1.1 cgd if (aflg) {
178 1.1 cgd if (mp->myidle >= 100*60)
179 1.1 cgd mp->myidle = 100*60 - 1;
180 1.1 cgd if (mp->myidle >= 60)
181 1.1 cgd printf(" %2d", mp->myidle / 60);
182 1.1 cgd else
183 1.1 cgd printf(" ");
184 1.1 cgd } else
185 1.1 cgd printf(" ");
186 1.1 cgd printf(":%02d", mp->myidle % 60);
187 1.1 cgd }
188 1.1 cgd printf("\n");
189 1.1 cgd mp++;
190 1.1 cgd }
191 1.1 cgd exit(0);
192 1.1 cgd }
193 1.1 cgd
194 1.9 mrg int
195 1.13 mjl utmpcmp(const void *v1, const void *v2)
196 1.1 cgd {
197 1.9 mrg const struct myutmp *u1, *u2;
198 1.1 cgd int rc;
199 1.1 cgd
200 1.9 mrg u1 = v1;
201 1.9 mrg u2 = v2;
202 1.1 cgd rc = strncmp(u1->myutmp.out_name, u2->myutmp.out_name, 8);
203 1.1 cgd if (rc)
204 1.1 cgd return (rc);
205 1.12 tron rc = strcmp(u1->myhost, u2->myhost);
206 1.1 cgd if (rc)
207 1.1 cgd return (rc);
208 1.1 cgd return (strncmp(u1->myutmp.out_line, u2->myutmp.out_line, 8));
209 1.1 cgd }
210 1.12 tron
211 1.13 mjl void
212 1.13 mjl usage(void)
213 1.13 mjl {
214 1.13 mjl fprintf(stderr, "usage: rwho [-a]\n");
215 1.13 mjl exit(1);
216 1.13 mjl }
217