1 /* $NetBSD: lastcomm.c,v 1.18 2005/03/28 23:33:22 christos Exp $ */ 2 3 /* 4 * Copyright (c) 1980, 1993 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) 1980, 1993\n\ 35 The Regents of the University of California. All rights reserved.\n"); 36 #endif /* not lint */ 37 38 #ifndef lint 39 #if 0 40 static char sccsid[] = "@(#)lastcomm.c 8.2 (Berkeley) 4/29/95"; 41 #endif 42 __RCSID("$NetBSD: lastcomm.c,v 1.18 2005/03/28 23:33:22 christos Exp $"); 43 #endif /* not lint */ 44 45 #include <sys/param.h> 46 #include <sys/stat.h> 47 #include <sys/acct.h> 48 49 #include <ctype.h> 50 #include <err.h> 51 #include <fcntl.h> 52 #include <math.h> 53 #include <pwd.h> 54 #include <stdio.h> 55 #include <stdlib.h> 56 #include <string.h> 57 #include <struct.h> 58 #include <time.h> 59 #include <tzfile.h> 60 #include <unistd.h> 61 #include <utmp.h> 62 #include "pathnames.h" 63 64 static time_t expand(u_int); 65 static char *flagbits(int); 66 static const char *getdev(dev_t); 67 static int requested(char *[], struct acct *); 68 static void usage(void) __attribute__((__noreturn__)); 69 70 int main(int, char **); 71 72 int 73 main(int argc, char *argv[]) 74 { 75 char *p; 76 struct acct ab; 77 struct stat sb; 78 FILE *fp; 79 off_t size; 80 time_t t; 81 double delta; 82 int ch; 83 const char *acctfile = _PATH_ACCT; 84 85 setprogname(argv[0]); 86 87 while ((ch = getopt(argc, argv, "f:")) != -1) 88 switch((char)ch) { 89 case 'f': 90 acctfile = optarg; 91 break; 92 case '?': 93 default: 94 usage(); 95 } 96 argc -= optind; 97 argv += optind; 98 99 /* Open the file. */ 100 if ((fp = fopen(acctfile, "r")) == NULL || fstat(fileno(fp), &sb)) 101 err(1, "%s", acctfile); 102 103 /* 104 * Round off to integral number of accounting records, probably 105 * not necessary, but it doesn't hurt. 106 */ 107 size = sb.st_size - sb.st_size % sizeof(struct acct); 108 109 /* Check if any records to display. */ 110 if (size < sizeof(struct acct)) 111 exit(0); 112 113 /* 114 * Seek to before the last entry in the file; use lseek(2) in case 115 * the file is bigger than a "long". 116 */ 117 size -= sizeof(struct acct); 118 if (lseek(fileno(fp), size, SEEK_SET) == -1) 119 err(1, "%s", acctfile); 120 121 for (;;) { 122 if (fread(&ab, sizeof(struct acct), 1, fp) != 1) 123 err(1, "%s", acctfile); 124 125 if (ab.ac_comm[0] == '\0') { 126 ab.ac_comm[0] = '?'; 127 ab.ac_comm[1] = '\0'; 128 } else 129 for (p = &ab.ac_comm[0]; 130 p < &ab.ac_comm[fldsiz(acct, ac_comm)] && *p; ++p) 131 if (!isprint((unsigned char)*p)) 132 *p = '?'; 133 if (!*argv || requested(argv, &ab)) { 134 135 t = expand(ab.ac_utime) + expand(ab.ac_stime); 136 (void)printf( 137 "%-*.*s %-7s %-*.*s %-*.*s %6.2f secs %.16s", 138 (int)fldsiz(acct, ac_comm), 139 (int)fldsiz(acct, ac_comm), 140 ab.ac_comm, flagbits(ab.ac_flag), 141 UT_NAMESIZE, UT_NAMESIZE, 142 user_from_uid(ab.ac_uid, 0), UT_LINESIZE, 143 UT_LINESIZE, getdev(ab.ac_tty), 144 t / (double)AHZ, ctime(&ab.ac_btime)); 145 delta = expand(ab.ac_etime) / (double)AHZ; 146 printf(" (%1.0f:%02.0f:%05.2f)\n", 147 floor(delta / SECSPERHOUR), 148 floor(fmod(delta, SECSPERHOUR) / SECSPERMIN), 149 fmod(delta, SECSPERMIN)); 150 } 151 /* are we at the beginning of the file yet? */ 152 if (size == 0) 153 break; 154 /* seek backward over the one we read and the next to read */ 155 if (fseek(fp, 2 * -(long)sizeof(struct acct), SEEK_CUR) == -1) 156 err(1, "%s", acctfile); 157 /* and account for its size */ 158 size -= sizeof(struct acct); 159 } 160 exit(0); 161 } 162 163 static time_t 164 expand(u_int t) 165 { 166 time_t nt; 167 168 nt = t & 017777; 169 t >>= 13; 170 while (t) { 171 t--; 172 nt <<= 3; 173 } 174 return (nt); 175 } 176 177 static char * 178 flagbits(int f) 179 { 180 static char flags[20] = "-"; 181 char *p; 182 183 #define BIT(flag, ch) if (f & flag) *p++ = ch 184 185 p = flags + 1; 186 BIT(ASU, 'S'); 187 BIT(AFORK, 'F'); 188 BIT(ACOMPAT, 'C'); 189 BIT(ACORE, 'D'); 190 BIT(AXSIG, 'X'); 191 *p = '\0'; 192 return (flags); 193 } 194 195 static int 196 requested(char *argv[], struct acct *acp) 197 { 198 do { 199 if (!strcmp(user_from_uid(acp->ac_uid, 0), *argv)) 200 return (1); 201 if (!strcmp(getdev(acp->ac_tty), *argv)) 202 return (1); 203 if (!strncmp(acp->ac_comm, *argv, fldsiz(acct, ac_comm))) 204 return (1); 205 } while (*++argv); 206 return (0); 207 } 208 209 static const char * 210 getdev(dev_t dev) 211 { 212 static dev_t lastdev = (dev_t)-1; 213 static const char *lastname; 214 215 if (dev == NODEV) /* Special case. */ 216 return ("__"); 217 if (dev == lastdev) /* One-element cache. */ 218 return (lastname); 219 lastdev = dev; 220 if ((lastname = devname(dev, S_IFCHR)) == NULL) 221 lastname = "??"; 222 return (lastname); 223 } 224 225 static void 226 usage(void) 227 { 228 (void)fprintf(stderr, 229 "Usage: %s [ -f file ] [command ...] [user ...] [tty ...]\n", 230 getprogname()); 231 exit(1); 232 } 233