/* * Copyright (c) 1980 Regents of the University of California. * All rights reserved. * * Redistribution and use in source and binary forms, with or without * modification, are permitted provided that the following conditions * are met: * 1. Redistributions of source code must retain the above copyright * notice, this list of conditions and the following disclaimer. * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. * 3. All advertising materials mentioning features or use of this software * must display the following acknowledgement: * This product includes software developed by the University of * California, Berkeley and its contributors. * 4. Neither the name of the University nor the names of its contributors * may be used to endorse or promote products derived from this software * without specific prior written permission. * * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF * SUCH DAMAGE. */ #ifndef lint char copyright[] = "@(#) Copyright (c) 1980 Regents of the University of California.\n\ All rights reserved.\n"; #endif /* not lint */ #ifndef lint static char sccsid[] = "@(#)lastcomm.c 5.11 (Berkeley) 6/1/90"; #endif /* not lint */ /* * last command */ #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include "pathnames.h" #define LINESIZE 6 #define _PATH_DEV "/dev/" #define NODEV (-1) /* * This seems to have to be multiple of struct acct size * Now it is 160 * 52 */ #define DEV_BSIZE 8320L #define btodb(x) ((x)/DEV_BSIZE) #define dbtob(x) ((x)*DEV_BSIZE) struct acct buf[DEV_BSIZE / sizeof (struct acct)]; time_t expand(unsigned); char *flagbits(register int); char *getdev(dev_t); time_t expand (unsigned t) { register time_t nt; nt = t & 017777; t >>= 13; while (t) { t--; nt <<= 3; } return (nt); } #define BIT(flag, ch) if (f & flag) *p++ = ch; char *flagbits(register int f) { static char flags[20]; char *p, *strcpy(); p = strcpy(flags, "- "); BIT(ASU, 'S'); BIT(AFORK, 'F'); BIT(ACORE, 'D'); BIT(AXSIG, 'X'); return (flags); } int ok(register char **argv, register struct acct *acp) { register char *cp; char *user_from_uid(uid_t, int); do { cp = user_from_uid(acp->ac_uid, 0); if (!strcmp(cp, *argv)) return(1); if ((cp = getdev(acp->ac_tty)) && !strcmp(cp, *argv)) return(1); if (!strncmp(acp->ac_comm, *argv, sizeof(acp->ac_comm))) return(1); } while (*++argv); return(0); } #include #define N_DEVS 131 /* hash value for device names */ #define NDEVS 2048 /* max number of file names in /dev */ struct devhash { dev_t dev_dev; char dev_name [LINESIZE + 1]; struct devhash * dev_nxt; }; struct devhash *dev_hash[N_DEVS]; struct devhash *dev_chain; #define HASH(d) (((int) d) % N_DEVS) void setupdevs() { register DIR * fd; register struct devhash * hashtab; register ndevs = NDEVS; struct direct * dp; char *malloc(); /*NOSTRICT*/ hashtab = (struct devhash *)malloc(NDEVS * sizeof(struct devhash)); if (hashtab == (struct devhash *)0) { fputs("No mem for dev table\n", stderr); return; } if ((fd = opendir(_PATH_DEV)) == NULL) { perror(_PATH_DEV); return; } while ((dp = readdir(fd))) { if (dp->d_ino == 0) continue; if (strncmp(dp->d_name, "vc", 2) && strncmp(dp->d_name, "tty", 3) && strcmp(dp->d_name, "console")) continue; (void)strncpy(hashtab->dev_name, dp->d_name, LINESIZE); hashtab->dev_name[LINESIZE] = 0; hashtab->dev_nxt = dev_chain; dev_chain = hashtab; hashtab++; if (--ndevs <= 0) break; } closedir(fd); } char *getdev(dev_t dev) { register struct devhash *hp, *nhp; struct stat statb; char name[sizeof(hp->dev_name) + 6]; static dev_t lastdev = (dev_t) -1; static char *lastname; static int init = 0; char *strcpy(), *strcat(); if (dev == (dev_t) NODEV) return ("__"); if (dev == lastdev) return (lastname); if (!init) { setupdevs(); init++; } for (hp = dev_hash[HASH(dev)]; hp; hp = hp->dev_nxt) if (hp->dev_dev == dev) { lastdev = dev; return (lastname = hp->dev_name); } for (hp = dev_chain; hp; hp = nhp) { nhp = hp->dev_nxt; (void)strcpy(name, _PATH_DEV); strcat(name, hp->dev_name); if (stat(name, &statb) < 0) /* name truncated usually */ continue; if ((statb.st_mode & S_IFMT) != S_IFCHR) continue; hp->dev_dev = statb.st_rdev; hp->dev_nxt = dev_hash[HASH(hp->dev_dev)]; dev_hash[HASH(hp->dev_dev)] = hp; if (hp->dev_dev == dev) { dev_chain = nhp; lastdev = dev; return (lastname = hp->dev_name); } } dev_chain = (struct devhash *) 0; return ("??"); } char *user_from_uid(uid_t uid, int val) { struct passwd *p; p=getpwuid(uid); if(p!=NULL) return(p->pw_name); return("???"); } int main(int argc, char **argv) { extern int optind; extern char *optarg; register struct acct *acp; register int cc; register long bn; struct stat sb; int ch, fd; long endtime; char *acctfile, *user_from_uid(uid_t, int); long lseek(); acctfile = _PATH_ACCT; while ((ch = getopt(argc, argv, "f:")) != EOF) switch((char)ch) { case 'f': acctfile = optarg; break; case '?': default: fputs("lastcomm [ -f file ]\n", stderr); exit(1); } argv += optind; fd = open(acctfile, O_RDONLY); if (fd < 0) { perror(acctfile); exit(1); } printf("%-*.*s %s %-*s %-*s %s %-11s %.19s\n", (int) sizeof(acp->ac_comm), (int) sizeof(acp->ac_comm), "Command", "Flags", UT_NAMESIZE, "User", LINESIZE, "Tty", "PagFlt", "Time", "Endtime"); (void)fstat(fd, &sb); for (bn = btodb(sb.st_size); bn >= 0; bn--) { (void)lseek(fd, (off_t)dbtob(bn), L_SET); cc = read(fd, buf, DEV_BSIZE); if (cc < 0) { perror("read"); break; } acp = buf + ((cc / sizeof (buf[0])) - 1); for (; acp >= buf; acp--) { register char *cp; time_t x; if (acp->ac_comm[0] == '\0') (void)strcpy(acp->ac_comm, "?"); for (cp = &acp->ac_comm[0]; cp < &acp->ac_comm[sizeof(acp->ac_comm)] && *cp; cp++) if (!isascii(*cp) || iscntrl(*cp)) *cp = '?'; if (*argv && ! ok(argv, acp)) continue; x = expand(acp->ac_utime) + expand(acp->ac_stime); endtime = acp->ac_btime + acp->ac_etime; printf("%-*.*s %s %-*s %-*s %6d %6.2f secs %.19s\n", (int) sizeof(acp->ac_comm), (int) sizeof(acp->ac_comm), acp->ac_comm, flagbits(acp->ac_flag), UT_NAMESIZE, user_from_uid(acp->ac_uid, 0), LINESIZE, getdev(acp->ac_tty), acp->ac_minflt + acp->ac_majflt, x / (double)AHZ, ctime(&endtime)); } } return 0; }