who.c revision 1.11 1 1.11 christos /* $NetBSD: who.c,v 1.11 2003/02/17 13:56:28 christos Exp $ */
2 1.3 jtc
3 1.1 cgd /*
4 1.3 jtc * Copyright (c) 1989, 1993
5 1.3 jtc * The Regents of the University of California. All rights reserved.
6 1.1 cgd *
7 1.1 cgd * This code is derived from software contributed to Berkeley by
8 1.1 cgd * Michael Fischbein.
9 1.1 cgd *
10 1.1 cgd * Redistribution and use in source and binary forms, with or without
11 1.1 cgd * modification, are permitted provided that the following conditions
12 1.1 cgd * are met:
13 1.1 cgd * 1. Redistributions of source code must retain the above copyright
14 1.1 cgd * notice, this list of conditions and the following disclaimer.
15 1.1 cgd * 2. Redistributions in binary form must reproduce the above copyright
16 1.1 cgd * notice, this list of conditions and the following disclaimer in the
17 1.1 cgd * documentation and/or other materials provided with the distribution.
18 1.1 cgd * 3. All advertising materials mentioning features or use of this software
19 1.1 cgd * must display the following acknowledgement:
20 1.1 cgd * This product includes software developed by the University of
21 1.1 cgd * California, Berkeley and its contributors.
22 1.1 cgd * 4. Neither the name of the University nor the names of its contributors
23 1.1 cgd * may be used to endorse or promote products derived from this software
24 1.1 cgd * without specific prior written permission.
25 1.1 cgd *
26 1.1 cgd * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
27 1.1 cgd * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
28 1.1 cgd * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
29 1.1 cgd * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
30 1.1 cgd * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
31 1.1 cgd * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
32 1.1 cgd * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
33 1.1 cgd * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
34 1.1 cgd * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
35 1.1 cgd * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
36 1.1 cgd * SUCH DAMAGE.
37 1.1 cgd */
38 1.1 cgd
39 1.5 kleink #include <sys/cdefs.h>
40 1.1 cgd #ifndef lint
41 1.5 kleink __COPYRIGHT(
42 1.3 jtc "@(#) Copyright (c) 1989, 1993\n\
43 1.5 kleink The Regents of the University of California. All rights reserved.\n");
44 1.1 cgd #endif /* not lint */
45 1.1 cgd
46 1.1 cgd #ifndef lint
47 1.3 jtc #if 0
48 1.3 jtc static char sccsid[] = "@(#)who.c 8.1 (Berkeley) 6/6/93";
49 1.3 jtc #endif
50 1.11 christos __RCSID("$NetBSD: who.c,v 1.11 2003/02/17 13:56:28 christos Exp $");
51 1.1 cgd #endif /* not lint */
52 1.1 cgd
53 1.1 cgd #include <sys/types.h>
54 1.4 jtc #include <sys/stat.h>
55 1.5 kleink #include <err.h>
56 1.5 kleink #include <locale.h>
57 1.1 cgd #include <pwd.h>
58 1.1 cgd #include <stdio.h>
59 1.5 kleink #include <stdlib.h>
60 1.4 jtc #include <string.h>
61 1.5 kleink #include <time.h>
62 1.4 jtc #include <unistd.h>
63 1.10 christos #include "utmpentry.h"
64 1.9 christos
65 1.9 christos static void output_labels(void);
66 1.9 christos static void who_am_i(const char *, int);
67 1.9 christos static void usage(void);
68 1.9 christos static void process(const char *, int);
69 1.9 christos static void print(const char *, const char *, time_t, const char *);
70 1.5 kleink
71 1.9 christos int main(int, char **);
72 1.1 cgd
73 1.9 christos static int show_term; /* show term state */
74 1.9 christos static int show_idle; /* show idle time */
75 1.9 christos
76 1.11 christos extern int maxname, maxline, maxhost;
77 1.5 kleink
78 1.4 jtc int
79 1.9 christos main(int argc, char **argv)
80 1.1 cgd {
81 1.5 kleink int c, only_current_term, show_labels;
82 1.5 kleink
83 1.5 kleink setlocale(LC_ALL, "");
84 1.4 jtc
85 1.5 kleink only_current_term = show_term = show_idle = show_labels = 0;
86 1.5 kleink while ((c = getopt(argc, argv, "mTuH")) != -1) {
87 1.4 jtc switch (c) {
88 1.4 jtc case 'm':
89 1.4 jtc only_current_term = 1;
90 1.4 jtc break;
91 1.4 jtc case 'T':
92 1.4 jtc show_term = 1;
93 1.4 jtc break;
94 1.4 jtc case 'u':
95 1.4 jtc show_idle = 1;
96 1.4 jtc break;
97 1.5 kleink case 'H':
98 1.5 kleink show_labels = 1;
99 1.5 kleink break;
100 1.4 jtc default:
101 1.4 jtc usage();
102 1.4 jtc /* NOTREACHED */
103 1.4 jtc }
104 1.4 jtc }
105 1.4 jtc argc -= optind;
106 1.4 jtc argv += optind;
107 1.4 jtc
108 1.4 jtc if (chdir("/dev")) {
109 1.4 jtc err(1, "cannot change directory to /dev");
110 1.4 jtc /* NOTREACHED */
111 1.4 jtc }
112 1.1 cgd
113 1.1 cgd switch (argc) {
114 1.4 jtc case 0: /* who */
115 1.4 jtc if (only_current_term) {
116 1.9 christos who_am_i(NULL, show_labels);
117 1.4 jtc } else {
118 1.9 christos process(NULL, show_labels);
119 1.4 jtc }
120 1.4 jtc break;
121 1.4 jtc case 1: /* who utmp_file */
122 1.4 jtc if (only_current_term) {
123 1.9 christos who_am_i(*argv, show_labels);
124 1.4 jtc } else {
125 1.9 christos process(*argv, show_labels);
126 1.4 jtc }
127 1.1 cgd break;
128 1.4 jtc case 2: /* who am i */
129 1.9 christos who_am_i(NULL, show_labels);
130 1.1 cgd break;
131 1.1 cgd default:
132 1.4 jtc usage();
133 1.4 jtc /* NOTREACHED */
134 1.1 cgd }
135 1.1 cgd exit(0);
136 1.1 cgd }
137 1.1 cgd
138 1.9 christos static void
139 1.9 christos who_am_i(const char *fname, int show_labels)
140 1.4 jtc {
141 1.4 jtc struct passwd *pw;
142 1.6 lukem char *p;
143 1.4 jtc char *t;
144 1.9 christos time_t now;
145 1.10 christos struct utmpentry *ehead, *ep;
146 1.4 jtc
147 1.4 jtc /* search through the utmp and find an entry for this tty */
148 1.9 christos if ((p = ttyname(STDIN_FILENO)) != NULL) {
149 1.9 christos
150 1.4 jtc /* strip any directory component */
151 1.6 lukem if ((t = strrchr(p, '/')) != NULL)
152 1.4 jtc p = t + 1;
153 1.10 christos
154 1.10 christos (void)getutentries(fname, &ehead);
155 1.10 christos for (ep = ehead; ep; ep = ep->next)
156 1.10 christos if (strcmp(ep->line, p) == 0) {
157 1.9 christos if (show_labels)
158 1.9 christos output_labels();
159 1.10 christos print(ep->name, ep->line, (time_t)ep->tv.tv_sec,
160 1.10 christos ep->host);
161 1.4 jtc return;
162 1.4 jtc }
163 1.4 jtc } else
164 1.9 christos p = "tty??";
165 1.4 jtc
166 1.9 christos (void)time(&now);
167 1.4 jtc pw = getpwuid(getuid());
168 1.9 christos if (show_labels)
169 1.9 christos output_labels();
170 1.9 christos print(pw ? pw->pw_name : "?", p, now, "");
171 1.9 christos }
172 1.9 christos
173 1.9 christos static void
174 1.9 christos process(const char *fname, int show_labels)
175 1.9 christos {
176 1.10 christos struct utmpentry *ehead, *ep;
177 1.10 christos (void)getutentries(fname, &ehead);
178 1.9 christos if (show_labels)
179 1.9 christos output_labels();
180 1.9 christos for (ep = ehead; ep != NULL; ep = ep->next)
181 1.10 christos print(ep->name, ep->line, (time_t)ep->tv.tv_sec, ep->host);
182 1.9 christos }
183 1.4 jtc
184 1.9 christos static void
185 1.9 christos print(const char *name, const char *line, time_t t, const char *host)
186 1.1 cgd {
187 1.4 jtc struct stat sb;
188 1.4 jtc char state;
189 1.4 jtc static time_t now = 0;
190 1.4 jtc time_t idle;
191 1.4 jtc
192 1.5 kleink state = '?';
193 1.5 kleink idle = 0;
194 1.5 kleink
195 1.4 jtc if (show_term || show_idle) {
196 1.4 jtc if (now == 0)
197 1.4 jtc time(&now);
198 1.4 jtc
199 1.4 jtc if (stat(line, &sb) == 0) {
200 1.4 jtc state = (sb.st_mode & 020) ? '+' : '-';
201 1.4 jtc idle = now - sb.st_atime;
202 1.4 jtc }
203 1.4 jtc
204 1.4 jtc }
205 1.4 jtc
206 1.9 christos (void)printf("%-*.*s ", maxname, maxname, name);
207 1.4 jtc
208 1.4 jtc if (show_term) {
209 1.4 jtc (void)printf("%c ", state);
210 1.4 jtc }
211 1.4 jtc
212 1.9 christos (void)printf("%-*.*s ", maxline, maxline, line);
213 1.9 christos (void)printf("%.12s ", ctime(&t) + 4);
214 1.1 cgd
215 1.4 jtc if (show_idle) {
216 1.4 jtc if (idle < 60)
217 1.4 jtc (void)printf(" . ");
218 1.4 jtc else if (idle < (24 * 60 * 60))
219 1.5 kleink (void)printf("%02ld:%02ld ",
220 1.5 kleink (long)(idle / (60 * 60)),
221 1.5 kleink (long)(idle % (60 * 60)) / 60);
222 1.4 jtc else
223 1.4 jtc (void)printf(" old ");
224 1.4 jtc }
225 1.4 jtc
226 1.9 christos if (*host)
227 1.9 christos printf("\t(%.*s)", maxhost, host);
228 1.1 cgd (void)putchar('\n');
229 1.1 cgd }
230 1.1 cgd
231 1.9 christos static void
232 1.5 kleink output_labels()
233 1.5 kleink {
234 1.9 christos (void)printf("%-*.*s ", maxname, maxname, "USER");
235 1.5 kleink
236 1.5 kleink if (show_term)
237 1.5 kleink (void)printf("S ");
238 1.5 kleink
239 1.9 christos (void)printf("%-*.*s ", maxline, maxline, "LINE");
240 1.5 kleink (void)printf("WHEN ");
241 1.5 kleink
242 1.5 kleink if (show_idle)
243 1.5 kleink (void)printf("IDLE ");
244 1.5 kleink
245 1.9 christos (void)printf("\t%.*s", maxhost, "FROM");
246 1.5 kleink
247 1.5 kleink (void)putchar('\n');
248 1.5 kleink }
249 1.5 kleink
250 1.9 christos static void
251 1.4 jtc usage()
252 1.4 jtc {
253 1.9 christos (void)fprintf(stderr, "Usage: %s [-mTuH] [ file ]\n %s am i\n",
254 1.9 christos getprogname(), getprogname());
255 1.4 jtc exit(1);
256 1.1 cgd }
257