xref: /minix/usr.bin/last/last.c (revision a06e2ab3)
1 /*	$NetBSD: last.c,v 1.36 2012/03/15 03:04:05 dholland Exp $	*/
2 
3 /*
4  * Copyright (c) 1987, 1993, 1994
5  *	The Regents of the University of California.  All rights reserved.
6  *
7  * Redistribution and use in source and binary forms, with or without
8  * modification, are permitted provided that the following conditions
9  * are met:
10  * 1. Redistributions of source code must retain the above copyright
11  *    notice, this list of conditions and the following disclaimer.
12  * 2. Redistributions in binary form must reproduce the above copyright
13  *    notice, this list of conditions and the following disclaimer in the
14  *    documentation and/or other materials provided with the distribution.
15  * 3. Neither the name of the University nor the names of its contributors
16  *    may be used to endorse or promote products derived from this software
17  *    without specific prior written permission.
18  *
19  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
20  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
21  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
22  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
23  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
24  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
25  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
26  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
27  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
28  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
29  * SUCH DAMAGE.
30  */
31 
32 #include <sys/cdefs.h>
33 #ifndef lint
34 __COPYRIGHT("@(#) Copyright (c) 1987, 1993, 1994\
35  The Regents of the University of California.  All rights reserved.");
36 #endif /* not lint */
37 
38 #ifndef lint
39 #if 0
40 static char sccsid[] = "@(#)last.c	8.2 (Berkeley) 4/2/94";
41 #endif
42 __RCSID("$NetBSD: last.c,v 1.36 2012/03/15 03:04:05 dholland Exp $");
43 #endif /* not lint */
44 
45 #include <sys/param.h>
46 #include <sys/stat.h>
47 
48 #include <err.h>
49 #include <errno.h>
50 #include <fcntl.h>
51 #include <paths.h>
52 #include <stdio.h>
53 #include <stdlib.h>
54 #include <string.h>
55 #include <time.h>
56 #include <tzfile.h>
57 #include <unistd.h>
58 #include <arpa/inet.h>
59 #ifdef SUPPORT_UTMPX
60 #include <utmpx.h>
61 #endif
62 #ifdef SUPPORT_UTMP
63 #include <utmp.h>
64 #endif
65 #include <util.h>
66 
67 #ifndef UT_NAMESIZE
68 #define UT_NAMESIZE 8
69 #define UT_LINESIZE 8
70 #define UT_HOSTSIZE 16
71 #endif
72 #ifndef SIGNATURE
73 #define SIGNATURE -1
74 #endif
75 
76 
77 
78 #define	NO	0			/* false/no */
79 #define	YES	1			/* true/yes */
80 
81 #define	TBUFLEN	30			/* length of time string buffer */
82 #define	TFMT	"%a %b %d %R"		/* strftime format string */
83 #define	LTFMT	"%a %b %d %Y %T"	/* strftime long format string */
84 #define	TFMTS	"%R"			/* strftime format string - time only */
85 #define	LTFMTS	"%T"			/* strftime long format string - " */
86 
87 /* fmttime() flags */
88 #define	FULLTIME	0x1		/* show year, seconds */
89 #define	TIMEONLY	0x2		/* show time only, not date */
90 #define	GMT		0x4		/* show time at GMT, for offsets only */
91 
92 #define MAXUTMP		1024
93 
94 typedef struct arg {
95 	const char	*name;		/* argument */
96 #define	HOST_TYPE	-2
97 #define	TTY_TYPE	-3
98 #define	USER_TYPE	-4
99 	int		type;		/* type of arg */
100 	struct arg	*next;		/* linked list pointer */
101 } ARG;
102 static ARG	*arglist;		/* head of linked list */
103 
104 typedef struct ttytab {
105 	time_t	logout;			/* log out time */
106 	char	tty[128];		/* terminal name */
107 	struct ttytab	*next;		/* linked list pointer */
108 } TTY;
109 static TTY	*ttylist;		/* head of linked list */
110 
111 static time_t	currentout;		/* current logout value */
112 static long	maxrec;			/* records to display */
113 static int	fulltime = 0;		/* Display seconds? */
114 static int	xflag;			/* Assume file is wtmpx format */
115 
116 static void	 addarg(int, const char *);
117 static TTY	*addtty(const char *);
118 static void	 hostconv(char *);
119 static const char *ttyconv(char *);
120 #ifdef SUPPORT_UTMPX
121 static void	 wtmpx(const char *, int, int, int, int);
122 #endif
123 #ifdef SUPPORT_UTMP
124 static void	 wtmp(const char *, int, int, int, int);
125 #endif
126 static char	*fmttime(time_t, int);
127 __dead static void	 usage(void);
128 
129 static
usage(void)130 void usage(void)
131 {
132 	(void)fprintf(stderr, "usage: %s [-#%s] [-nTx] [-f file]"
133 	    " [-H hostsize] [-h host] [-L linesize]\n"
134 	    "\t    [-N namesize] [-t tty] [user ...]\n", getprogname(),
135 #ifdef NOTYET_SUPPORT_UTMPX
136 	    "w"
137 #else
138 	    ""
139 #endif
140 	);
141 	exit(EXIT_FAILURE);
142 }
143 
144 int
main(int argc,char * argv[])145 main(int argc, char *argv[])
146 {
147 	int ch;
148 	char *p;
149 	const char *file = NULL;
150 	int namesize = UT_NAMESIZE;
151 	int linesize = UT_LINESIZE;
152 	int hostsize = UT_HOSTSIZE;
153 	int numeric = 0;
154 
155 	maxrec = -1;
156 
157 	while ((ch = getopt(argc, argv, "0123456789f:H:h:L:nN:Tt:x")) != -1)
158 		switch (ch) {
159 		case '0': case '1': case '2': case '3': case '4':
160 		case '5': case '6': case '7': case '8': case '9':
161 			/*
162 			 * kludge: last was originally designed to take
163 			 * a number after a dash.
164 			 */
165 			if (maxrec == -1) {
166 				p = argv[optind - 1];
167 				if (p[0] == '-' && p[1] == ch && !p[2])
168 					maxrec = atol(++p);
169 				else if (optind < argc)
170 					maxrec = atol(argv[optind] + 1);
171 				else
172 					usage();
173 				if (!maxrec)
174 					return 0;
175 			}
176 			break;
177 		case 'f':
178 			file = optarg;
179 			if ('\0' == file[0])
180 				usage();
181 			break;
182 		case 'H':
183 			hostsize = atoi(optarg);
184 			if (hostsize < 1)
185 				usage();
186 			break;
187 		case 'h':
188 			hostconv(optarg);
189 			addarg(HOST_TYPE, optarg);
190 			break;
191 		case 'L':
192 			linesize = atoi(optarg);
193 			if (linesize < 1)
194 				usage();
195 			break;
196 		case 'N':
197 			namesize = atoi(optarg);
198 			if (namesize < 1)
199 				usage();
200 			break;
201 		case 'n':
202 			numeric = 1;
203 			break;
204 		case 'T':
205 			fulltime = 1;
206 			break;
207 		case 't':
208 			addarg(TTY_TYPE, ttyconv(optarg));
209 			break;
210 		case 'x':
211 			xflag = 1;
212 			break;
213 		case '?':
214 		default:
215 			usage();
216 		}
217 
218 	if (argc) {
219 		setlinebuf(stdout);
220 		for (argv += optind; *argv; ++argv) {
221 #define	COMPATIBILITY
222 #ifdef	COMPATIBILITY
223 			/* code to allow "last p5" to work */
224 			addarg(TTY_TYPE, ttyconv(*argv));
225 #endif
226 			addarg(USER_TYPE, *argv);
227 		}
228 	}
229 	if (file == NULL) {
230 #ifdef SUPPORT_UTMPX
231 		if (access(_PATH_WTMPX, R_OK) == 0)
232 			file = _PATH_WTMPX;
233 		else
234 #endif
235 #ifdef SUPPORT_UTMP
236 		if (access(_PATH_WTMP, R_OK) == 0)
237 			file = _PATH_WTMP;
238 #endif
239 		if (file == NULL)
240 #if defined(SUPPORT_UTMPX) && defined(SUPPORT_UTMP)
241 			errx(EXIT_FAILURE, "Cannot access `%s' or `%s'", _PATH_WTMPX,
242 			    _PATH_WTMP);
243 #elif defined(SUPPORT_UTMPX)
244 			errx(EXIT_FAILURE, "Cannot access `%s'", _PATH_WTMPX);
245 #elif defined(SUPPORT_UTMP)
246 			errx(EXIT_FAILURE, "Cannot access `%s'", _PATH_WTMP);
247 #else
248 			errx(EXIT_FAILURE, "No utmp or utmpx support compiled in.");
249 #endif
250 	}
251 #if defined(SUPPORT_UTMPX) && defined(SUPPORT_UTMP)
252 	if (file[strlen(file) - 1] == 'x' || xflag)
253 		wtmpx(file, namesize, linesize, hostsize, numeric);
254 	else
255 		wtmp(file, namesize, linesize, hostsize, numeric);
256 #elif defined(SUPPORT_UTMPX)
257 	wtmpx(file, namesize, linesize, hostsize, numeric);
258 #elif defined(SUPPORT_UTMP)
259 	wtmp(file, namesize, linesize, hostsize, numeric);
260 #else
261 	errx(EXIT_FAILURE, "No utmp or utmpx support compiled in.");
262 #endif
263 	exit(EXIT_SUCCESS);
264 }
265 
266 
267 /*
268  * addarg --
269  *	add an entry to a linked list of arguments
270  */
271 static void
addarg(int type,const char * arg)272 addarg(int type, const char *arg)
273 {
274 	ARG *cur;
275 
276 	if (!(cur = (ARG *)malloc(sizeof(ARG))))
277 		err(EXIT_FAILURE, "malloc failure");
278 	cur->next = arglist;
279 	cur->type = type;
280 	cur->name = arg;
281 	arglist = cur;
282 }
283 
284 /*
285  * addtty --
286  *	add an entry to a linked list of ttys
287  */
288 static TTY *
addtty(const char * tty)289 addtty(const char *tty)
290 {
291 	TTY *cur;
292 
293 	if (!(cur = (TTY *)malloc(sizeof(TTY))))
294 		err(EXIT_FAILURE, "malloc failure");
295 	cur->next = ttylist;
296 	cur->logout = currentout;
297 	memmove(cur->tty, tty, sizeof(cur->tty));
298 	return (ttylist = cur);
299 }
300 
301 /*
302  * hostconv --
303  *	convert the hostname to search pattern; if the supplied host name
304  *	has a domain attached that is the same as the current domain, rip
305  *	off the domain suffix since that's what login(1) does.
306  */
307 static void
hostconv(char * arg)308 hostconv(char *arg)
309 {
310 	static int first = 1;
311 	static char *hostdot, name[MAXHOSTNAMELEN + 1];
312 	char *argdot;
313 
314 	if (!(argdot = strchr(arg, '.')))
315 		return;
316 	if (first) {
317 		first = 0;
318 		if (gethostname(name, sizeof(name)))
319 			err(EXIT_FAILURE, "gethostname");
320 		name[sizeof(name) - 1] = '\0';
321 		hostdot = strchr(name, '.');
322 	}
323 	if (hostdot && !strcasecmp(hostdot, argdot))
324 		*argdot = '\0';
325 }
326 
327 /*
328  * ttyconv --
329  *	convert tty to correct name.
330  */
331 static const char *
ttyconv(char * arg)332 ttyconv(char *arg)
333 {
334 	char *mval;
335 
336 	if (!strcmp(arg, "co"))
337 		return ("console");
338 	/*
339 	 * kludge -- we assume that all tty's end with
340 	 * a two character suffix.
341 	 */
342 	if (strlen(arg) == 2) {
343 		if (asprintf(&mval, "tty%s", arg) == -1)
344 			err(EXIT_FAILURE, "malloc failure");
345 		return (mval);
346 	}
347 	if (!strncmp(arg, _PATH_DEV, sizeof(_PATH_DEV) - 1))
348 		return (&arg[sizeof(_PATH_DEV) - 1]);
349 	return (arg);
350 }
351 
352 /*
353  * fmttime --
354  *	return pointer to (static) formatted time string.
355  */
356 static char *
fmttime(time_t t,int flags)357 fmttime(time_t t, int flags)
358 {
359 	struct tm *tm;
360 	static char tbuf[TBUFLEN];
361 
362 	tm = (flags & GMT) ? gmtime(&t) : localtime(&t);
363 	if (tm == NULL) {
364 		strcpy(tbuf, "????");
365 		return tbuf;
366 	}
367 	strftime(tbuf, sizeof(tbuf),
368 	    (flags & TIMEONLY)
369 	     ? (flags & FULLTIME ? LTFMTS : TFMTS)
370 	     : (flags & FULLTIME ? LTFMT : TFMT),
371 	    tm);
372 	return (tbuf);
373 }
374 
375 #ifdef SUPPORT_UTMP
376 #define TYPE(a)	0
377 #define NAMESIZE UT_NAMESIZE
378 #define LINESIZE UT_LINESIZE
379 #define HOSTSIZE UT_HOSTSIZE
380 #define ut_timefld ut_time
381 #define HAS_UT_SS 0
382 #include "want.c"
383 #undef TYPE /*(a)*/
384 #undef NAMESIZE
385 #undef LINESIZE
386 #undef HOSTSIZE
387 #undef ut_timefld
388 #undef HAS_UT_SS
389 #endif
390 
391 #ifdef SUPPORT_UTMPX
392 #define utmp utmpx
393 #define want wantx
394 #define wtmp wtmpx
395 #define gethost gethostx
396 #define buf bufx
397 #define onintr onintrx
398 #define TYPE(a) (a)->ut_type
399 #define NAMESIZE UTX_USERSIZE
400 #define LINESIZE UTX_LINESIZE
401 #define HOSTSIZE UTX_HOSTSIZE
402 #define ut_timefld ut_xtime
403 #define HAS_UT_SS 1
404 #include "want.c"
405 #endif
406