xref: /freebsd/usr.bin/who/who.c (revision 99e8005137088aafb1350e23b113d69b01b0820f)
1 /*
2  * Copyright (c) 1989, 1993
3  *	The Regents of the University of California.  All rights reserved.
4  *
5  * This code is derived from software contributed to Berkeley by
6  * Michael Fischbein.
7  *
8  * Redistribution and use in source and binary forms, with or without
9  * modification, are permitted provided that the following conditions
10  * are met:
11  * 1. Redistributions of source code must retain the above copyright
12  *    notice, this list of conditions and the following disclaimer.
13  * 2. Redistributions in binary form must reproduce the above copyright
14  *    notice, this list of conditions and the following disclaimer in the
15  *    documentation and/or other materials provided with the distribution.
16  * 3. All advertising materials mentioning features or use of this software
17  *    must display the following acknowledgement:
18  *	This product includes software developed by the University of
19  *	California, Berkeley and its contributors.
20  * 4. Neither the name of the University nor the names of its contributors
21  *    may be used to endorse or promote products derived from this software
22  *    without specific prior written permission.
23  *
24  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
25  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
26  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
27  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
28  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
29  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
30  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
31  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
32  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
33  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
34  * SUCH DAMAGE.
35  */
36 
37 #ifndef lint
38 static const char copyright[] =
39 "@(#) Copyright (c) 1989, 1993\n\
40 	The Regents of the University of California.  All rights reserved.\n";
41 #endif /* not lint */
42 
43 #ifndef lint
44 #if 0
45 static char sccsid[] = "@(#)who.c	8.1 (Berkeley) 6/6/93";
46 #endif
47 static const char rcsid[] =
48   "$FreeBSD$";
49 #endif /* not lint */
50 
51 #include <sys/types.h>
52 #include <sys/file.h>
53 #include <err.h>
54 #include <langinfo.h>
55 #include <locale.h>
56 #include <pwd.h>
57 #include <stdio.h>
58 #include <string.h>
59 #include <time.h>
60 #include <unistd.h>
61 #include <utmp.h>
62 
63 static void usage __P((void));
64 void output __P((struct utmp *));
65 
66 int
67 main(argc, argv)
68 	int argc;
69 	char **argv;
70 {
71 	register char *p;
72 	struct utmp usr;
73 	struct passwd *pw;
74 	FILE *ufp, *file();
75 	char *t;
76 
77 	(void) setlocale(LC_TIME, "");
78 
79 	switch (argc) {
80 	case 1:					/* who */
81 		ufp = file(_PATH_UTMP);
82 		/* only entries with both name and line fields */
83 		while (fread((char *)&usr, sizeof(usr), 1, ufp) == 1)
84 			if (*usr.ut_name && *usr.ut_line)
85 				output(&usr);
86 		break;
87 	case 2:					/* who utmp_file */
88 		ufp = file(argv[1]);
89 		/* all entries */
90 		while (fread((char *)&usr, sizeof(usr), 1, ufp) == 1)
91 			output(&usr);
92 		break;
93 	case 3:					/* who am i */
94 	        if (strcmp(argv[1], "am")
95 		    || (strcmp(argv[2], "I") && strcmp(argv[2], "i")))
96 		        usage();
97 
98 		ufp = file(_PATH_UTMP);
99 
100 		/* search through the utmp and find an entry for this tty */
101 		if ((p = ttyname(0))) {
102 			/* strip any directory component */
103 			if ((t = rindex(p, '/')))
104 				p = t + 1;
105 			while (fread((char *)&usr, sizeof(usr), 1, ufp) == 1)
106 				if (*usr.ut_name && !strcmp(usr.ut_line, p)) {
107 					output(&usr);
108 					exit(0);
109 				}
110 			/* well, at least we know what the tty is */
111 			(void)strncpy(usr.ut_line, p, UT_LINESIZE);
112 		} else
113 			(void)strcpy(usr.ut_line, "tty??");
114 		pw = getpwuid(getuid());
115 		(void)strncpy(usr.ut_name, pw ? pw->pw_name : "?", UT_NAMESIZE);
116 		(void)time(&usr.ut_time);
117 		*usr.ut_host = '\0';
118 		output(&usr);
119 		break;
120 	default:
121 		usage();
122 	}
123 	exit(0);
124 }
125 
126 static void
127 usage()
128 {
129 	(void)fprintf(stderr, "%s\n%s\n",
130 		"usage: who [file]",
131 		"       who am i");
132 	exit(1);
133 }
134 
135 void
136 output(up)
137 	struct utmp *up;
138 {
139 	char buf[80];
140 	static int d_first = -1;
141 
142 	if (d_first < 0)
143 		d_first = (*nl_langinfo(D_MD_ORDER) == 'd');
144 
145 	(void)printf("%-*.*s %-*.*s", UT_NAMESIZE, UT_NAMESIZE, up->ut_name,
146 	    UT_LINESIZE, UT_LINESIZE, up->ut_line);
147 	(void)strftime(buf, sizeof(buf),
148 		       d_first ? "%e %b %R" : "%b %e %R",
149 		       localtime(&up->ut_time));
150 	(void)printf("%s", buf);
151 	if (*up->ut_host)
152 		printf("\t(%.*s)", UT_HOSTSIZE, up->ut_host);
153 	(void)putchar('\n');
154 }
155 
156 FILE *
157 file(name)
158 	char *name;
159 {
160 	FILE *ufp;
161 
162 	if (!(ufp = fopen(name, "r")))
163 		err(1, "%s", name);
164 	return(ufp);
165 }
166