1 /* $NetBSD: last.c,v 1.5 1994/12/21 22:41:25 jtc 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. All advertising materials mentioning features or use of this software 16 * must display the following acknowledgement: 17 * This product includes software developed by the University of 18 * California, Berkeley and its contributors. 19 * 4. Neither the name of the University nor the names of its contributors 20 * may be used to endorse or promote products derived from this software 21 * without specific prior written permission. 22 * 23 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND 24 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 25 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 26 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE 27 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 28 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 29 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 30 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 31 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 32 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 33 * SUCH DAMAGE. 34 */ 35 36 #ifndef lint 37 static char copyright[] = 38 "@(#) Copyright (c) 1987, 1993, 1994\n\ 39 The Regents of the University of California. All rights reserved.\n"; 40 #endif /* not lint */ 41 42 #ifndef lint 43 #if 0 44 static char sccsid[] = "@(#)last.c 8.2 (Berkeley) 4/2/94"; 45 #endif 46 static char rcsid[] = "$NetBSD: last.c,v 1.5 1994/12/21 22:41:25 jtc Exp $"; 47 #endif /* not lint */ 48 49 #include <sys/param.h> 50 #include <sys/stat.h> 51 52 #include <err.h> 53 #include <fcntl.h> 54 #include <paths.h> 55 #include <signal.h> 56 #include <stdio.h> 57 #include <stdlib.h> 58 #include <string.h> 59 #include <time.h> 60 #include <tzfile.h> 61 #include <unistd.h> 62 #include <utmp.h> 63 64 #define NO 0 /* false/no */ 65 #define YES 1 /* true/yes */ 66 67 static struct utmp buf[1024]; /* utmp read buffer */ 68 69 typedef struct arg { 70 char *name; /* argument */ 71 #define HOST_TYPE -2 72 #define TTY_TYPE -3 73 #define USER_TYPE -4 74 int type; /* type of arg */ 75 struct arg *next; /* linked list pointer */ 76 } ARG; 77 ARG *arglist; /* head of linked list */ 78 79 typedef struct ttytab { 80 long logout; /* log out time */ 81 char tty[UT_LINESIZE + 1]; /* terminal name */ 82 struct ttytab *next; /* linked list pointer */ 83 } TTY; 84 TTY *ttylist; /* head of linked list */ 85 86 static long currentout, /* current logout value */ 87 maxrec; /* records to display */ 88 static char *file = _PATH_WTMP; /* wtmp file */ 89 90 void addarg __P((int, char *)); 91 TTY *addtty __P((char *)); 92 void hostconv __P((char *)); 93 void onintr __P((int)); 94 char *ttyconv __P((char *)); 95 int want __P((struct utmp *, int)); 96 void wtmp __P((void)); 97 98 int 99 main(argc, argv) 100 int argc; 101 char *argv[]; 102 { 103 extern int optind; 104 extern char *optarg; 105 int ch; 106 char *p; 107 108 maxrec = -1; 109 while ((ch = getopt(argc, argv, "0123456789f:h:t:")) != EOF) 110 switch (ch) { 111 case '0': case '1': case '2': case '3': case '4': 112 case '5': case '6': case '7': case '8': case '9': 113 /* 114 * kludge: last was originally designed to take 115 * a number after a dash. 116 */ 117 if (maxrec == -1) { 118 p = argv[optind - 1]; 119 if (p[0] == '-' && p[1] == ch && !p[2]) 120 maxrec = atol(++p); 121 else 122 maxrec = atol(argv[optind] + 1); 123 if (!maxrec) 124 exit(0); 125 } 126 break; 127 case 'f': 128 file = optarg; 129 break; 130 case 'h': 131 hostconv(optarg); 132 addarg(HOST_TYPE, optarg); 133 break; 134 case 't': 135 addarg(TTY_TYPE, ttyconv(optarg)); 136 break; 137 case '?': 138 default: 139 (void)fprintf(stderr, 140 "usage: last [-#] [-f file] [-t tty] [-h hostname] [user ...]\n"); 141 exit(1); 142 } 143 144 if (argc) { 145 setlinebuf(stdout); 146 for (argv += optind; *argv; ++argv) { 147 #define COMPATIBILITY 148 #ifdef COMPATIBILITY 149 /* code to allow "last p5" to work */ 150 addarg(TTY_TYPE, ttyconv(*argv)); 151 #endif 152 addarg(USER_TYPE, *argv); 153 } 154 } 155 wtmp(); 156 exit(0); 157 } 158 159 /* 160 * wtmp -- 161 * read through the wtmp file 162 */ 163 void 164 wtmp() 165 { 166 struct utmp *bp; /* current structure */ 167 TTY *T; /* tty list entry */ 168 struct stat stb; /* stat of file for size */ 169 long bl, delta; /* time difference */ 170 int bytes, wfd; 171 char *ct, *crmsg; 172 173 if ((wfd = open(file, O_RDONLY, 0)) < 0 || fstat(wfd, &stb) == -1) 174 err(1, "%s", file); 175 bl = (stb.st_size + sizeof(buf) - 1) / sizeof(buf); 176 177 (void)time(&buf[0].ut_time); 178 (void)signal(SIGINT, onintr); 179 (void)signal(SIGQUIT, onintr); 180 181 while (--bl >= 0) { 182 if (lseek(wfd, (off_t)(bl * sizeof(buf)), L_SET) == -1 || 183 (bytes = read(wfd, buf, sizeof(buf))) == -1) 184 err(1, "%s", file); 185 for (bp = &buf[bytes / sizeof(buf[0]) - 1]; bp >= buf; --bp) { 186 /* 187 * if the terminal line is '~', the machine stopped. 188 * see utmp(5) for more info. 189 */ 190 if (bp->ut_line[0] == '~' && !bp->ut_line[1]) { 191 /* everybody just logged out */ 192 for (T = ttylist; T; T = T->next) 193 T->logout = -bp->ut_time; 194 currentout = -bp->ut_time; 195 crmsg = strncmp(bp->ut_name, "shutdown", 196 UT_NAMESIZE) ? "crash" : "shutdown"; 197 if (want(bp, NO)) { 198 ct = ctime(&bp->ut_time); 199 printf("%-*.*s %-*.*s %-*.*s %10.10s %5.5s \n", 200 UT_NAMESIZE, UT_NAMESIZE, 201 bp->ut_name, UT_LINESIZE, 202 UT_LINESIZE, bp->ut_line, 203 UT_HOSTSIZE, UT_HOSTSIZE, 204 bp->ut_host, ct, ct + 11); 205 if (maxrec != -1 && !--maxrec) 206 return; 207 } 208 continue; 209 } 210 /* 211 * if the line is '{' or '|', date got set; see 212 * utmp(5) for more info. 213 */ 214 if ((bp->ut_line[0] == '{' || bp->ut_line[0] == '|') 215 && !bp->ut_line[1]) { 216 if (want(bp, NO)) { 217 ct = ctime(&bp->ut_time); 218 printf("%-*.*s %-*.*s %-*.*s %10.10s %5.5s \n", 219 UT_NAMESIZE, UT_NAMESIZE, bp->ut_name, 220 UT_LINESIZE, UT_LINESIZE, bp->ut_line, 221 UT_HOSTSIZE, UT_HOSTSIZE, bp->ut_host, 222 ct, ct + 11); 223 if (maxrec && !--maxrec) 224 return; 225 } 226 continue; 227 } 228 /* find associated tty */ 229 for (T = ttylist;; T = T->next) { 230 if (!T) { 231 /* add new one */ 232 T = addtty(bp->ut_line); 233 break; 234 } 235 if (!strncmp(T->tty, bp->ut_line, UT_LINESIZE)) 236 break; 237 } 238 if (bp->ut_name[0] && want(bp, YES)) { 239 ct = ctime(&bp->ut_time); 240 printf("%-*.*s %-*.*s %-*.*s %10.10s %5.5s ", 241 UT_NAMESIZE, UT_NAMESIZE, bp->ut_name, 242 UT_LINESIZE, UT_LINESIZE, bp->ut_line, 243 UT_HOSTSIZE, UT_HOSTSIZE, bp->ut_host, 244 ct, ct + 11); 245 if (!T->logout) 246 puts(" still logged in"); 247 else { 248 if (T->logout < 0) { 249 T->logout = -T->logout; 250 printf("- %s", crmsg); 251 } 252 else 253 printf("- %5.5s", 254 ctime(&T->logout)+11); 255 delta = T->logout - bp->ut_time; 256 if (delta < SECSPERDAY) 257 printf(" (%5.5s)\n", 258 asctime(gmtime(&delta))+11); 259 else 260 printf(" (%ld+%5.5s)\n", 261 delta / SECSPERDAY, 262 asctime(gmtime(&delta))+11); 263 } 264 if (maxrec != -1 && !--maxrec) 265 return; 266 } 267 T->logout = bp->ut_time; 268 } 269 } 270 ct = ctime(&buf[0].ut_time); 271 printf("\nwtmp begins %10.10s %5.5s \n", ct, ct + 11); 272 } 273 274 /* 275 * want -- 276 * see if want this entry 277 */ 278 int 279 want(bp, check) 280 struct utmp *bp; 281 int check; 282 { 283 ARG *step; 284 285 if (check) 286 /* 287 * when uucp and ftp log in over a network, the entry in 288 * the utmp file is the name plus their process id. See 289 * etc/ftpd.c and usr.bin/uucp/uucpd.c for more information. 290 */ 291 if (!strncmp(bp->ut_line, "ftp", sizeof("ftp") - 1)) 292 bp->ut_line[3] = '\0'; 293 else if (!strncmp(bp->ut_line, "uucp", sizeof("uucp") - 1)) 294 bp->ut_line[4] = '\0'; 295 if (!arglist) 296 return (YES); 297 298 for (step = arglist; step; step = step->next) 299 switch(step->type) { 300 case HOST_TYPE: 301 if (!strncasecmp(step->name, bp->ut_host, UT_HOSTSIZE)) 302 return (YES); 303 break; 304 case TTY_TYPE: 305 if (!strncmp(step->name, bp->ut_line, UT_LINESIZE)) 306 return (YES); 307 break; 308 case USER_TYPE: 309 if (!strncmp(step->name, bp->ut_name, UT_NAMESIZE)) 310 return (YES); 311 break; 312 } 313 return (NO); 314 } 315 316 /* 317 * addarg -- 318 * add an entry to a linked list of arguments 319 */ 320 void 321 addarg(type, arg) 322 int type; 323 char *arg; 324 { 325 ARG *cur; 326 327 if (!(cur = (ARG *)malloc((u_int)sizeof(ARG)))) 328 err(1, "malloc failure"); 329 cur->next = arglist; 330 cur->type = type; 331 cur->name = arg; 332 arglist = cur; 333 } 334 335 /* 336 * addtty -- 337 * add an entry to a linked list of ttys 338 */ 339 TTY * 340 addtty(ttyname) 341 char *ttyname; 342 { 343 TTY *cur; 344 345 if (!(cur = (TTY *)malloc((u_int)sizeof(TTY)))) 346 err(1, "malloc failure"); 347 cur->next = ttylist; 348 cur->logout = currentout; 349 memmove(cur->tty, ttyname, UT_LINESIZE); 350 return (ttylist = cur); 351 } 352 353 /* 354 * hostconv -- 355 * convert the hostname to search pattern; if the supplied host name 356 * has a domain attached that is the same as the current domain, rip 357 * off the domain suffix since that's what login(1) does. 358 */ 359 void 360 hostconv(arg) 361 char *arg; 362 { 363 static int first = 1; 364 static char *hostdot, name[MAXHOSTNAMELEN]; 365 char *argdot; 366 367 if (!(argdot = strchr(arg, '.'))) 368 return; 369 if (first) { 370 first = 0; 371 if (gethostname(name, sizeof(name))) 372 err(1, "gethostname"); 373 hostdot = strchr(name, '.'); 374 } 375 if (hostdot && !strcasecmp(hostdot, argdot)) 376 *argdot = '\0'; 377 } 378 379 /* 380 * ttyconv -- 381 * convert tty to correct name. 382 */ 383 char * 384 ttyconv(arg) 385 char *arg; 386 { 387 char *mval; 388 389 /* 390 * kludge -- we assume that all tty's end with 391 * a two character suffix. 392 */ 393 if (strlen(arg) == 2) { 394 /* either 6 for "ttyxx" or 8 for "console" */ 395 if (!(mval = malloc((u_int)8))) 396 err(1, "malloc failure"); 397 if (!strcmp(arg, "co")) 398 (void)strcpy(mval, "console"); 399 else { 400 (void)strcpy(mval, "tty"); 401 (void)strcpy(mval + 3, arg); 402 } 403 return (mval); 404 } 405 if (!strncmp(arg, _PATH_DEV, sizeof(_PATH_DEV) - 1)) 406 return (arg + 5); 407 return (arg); 408 } 409 410 /* 411 * onintr -- 412 * on interrupt, we inform the user how far we've gotten 413 */ 414 void 415 onintr(signo) 416 int signo; 417 { 418 char *ct; 419 420 ct = ctime(&buf[0].ut_time); 421 printf("\ninterrupted %10.10s %5.5s \n", ct, ct + 11); 422 if (signo == SIGINT) 423 exit(1); 424 (void)fflush(stdout); /* fix required for rsh */ 425 } 426