home *** CD-ROM | disk | FTP | other *** search
/ Usenet 1994 October / usenetsourcesnewsgroupsinfomagicoctober1994disk2.iso / unix / volume13 / printacct < prev    next >
Text File  |  1988-01-31  |  22KB  |  900 lines
  1. Subject:  v13i033:  Print BSD accounting file
  2. Newsgroups: comp.sources.unix
  3. Sender: sources
  4. Approved: rsalz@uunet.UU.NET
  5.  
  6. Submitted-by: Roy Smith <phri!roy>
  7. Posting-number: Volume 13, Issue 33
  8. Archive-name: printacct
  9.  
  10. [  This package displays the contents of the /usr/adm/acct files in
  11.    human-readable format, so you can use things like awk and perl to
  12.    print "better" accounting records.  It will probably need work to
  13.    run with the SystemV accounting stuff.  --r$ ]
  14.  
  15. # This is a shell archive.  Remove anything before this line,
  16. # then unpack it by saving it in a file and typing "sh file".
  17. # Contents:  README Makefile pracct.1 pracct.c yesterday.c accounting
  18.  
  19. echo x - README
  20. sed 's/^@//' > "README" <<'@//E*O*F README//'
  21. Mon Jan 25 23:15:18 EST 1988
  22.  
  23.     This is a little program I whipped up to help me do user cpu usage
  24. accounting.  On the surface, /etc/sa (or /usr/etc/sa if you're on a Sun) does
  25. cpu usage accounting, but it does so much damn processing that I kept finding
  26. myself being frustrated because I couldn't get exactly the statistics I
  27. wanted.  Very un-unix-like, sa is.  Doesn't let the user get at the actual
  28. data to do what he wants with it.
  29.  
  30.     My answer was to just convert the fields in /usr/adm/acct to ascii and
  31. hack together awk scripts to pull out whatever bits of information I happened
  32. to want that month.  Maybe not very efficient, but easy.  Contained herein is
  33. the program to print the /usr/adm/acct file, a man page, and a sample shell
  34. script that we run out of crontab at 15 minutes past midnight every day.  We
  35. run this on a network of Sun workstations, all of which remote mount a common
  36. /usr/local.  Since root permissions don't apply accross NFS mount points, I
  37. made /usr/local/acct owned by user "acct", and su to that when it comes time
  38. to move the daily summary file there.  You can't just make the whole script
  39. suid acct because it has to remove /usr/adm/acct (aka /private/usr/adm/acct),
  40. which needs root permission.  Isn't NFS fun?
  41.  
  42.     One last note.  I like to keep each day's stats in a file named for
  43. that day.  Since we run the stats for day X a few minutes into day X+1, I
  44. can't just use date to generate file names, because the names would be off by
  45. one day.  I whipped up yesterday.c to solve this problem.  A nicer solution
  46. (but decidedly feeping creatureism) would be to expand the Sys5 date to accept
  47. a (signed) offset which is added to the current date before going through the
  48. variable output formatting code.
  49.  
  50.     This was developed on SunOS-3.[02] systems, and hasn't been tested on
  51. any other systems.  I believe the format of /usr/adm/acct is BSD specific, so
  52. it probably won't run on Sys5 machines unmodified.
  53.  
  54.     This code is public domain.  Do with it what you want, including
  55. selling it for profit if you can find somebody stupid enough to pay money for
  56. it.  All I ask is that you retain this notice with the code, and keep my name
  57. on it.
  58.  
  59. Roy Smith, System Administrator
  60. Public Health Research Institute
  61. 455 First Avenue, New York, NY 10016
  62.  
  63. UUCP: {allegra,philabs,seismo!cmcl2}!phri!roy
  64. @//E*O*F README//
  65. chmod u=rw,g=r,o=r README
  66.  
  67. echo x - Makefile
  68. sed 's/^@//' > "Makefile" <<'@//E*O*F Makefile//'
  69. #
  70. # Makefile for pracct
  71. #
  72. # $Header: Makefile,v 1.3 86/12/09 17:41:42 roy Exp $
  73. # Copyright 1986 Roy Smith
  74. #
  75. # $Log:    Makefile,v $
  76. # Revision 1.3  86/12/09  17:41:42  roy
  77. # Added rules for yesterday.  Deleted rules for lint.
  78. # 
  79. # Revision 1.2  86/11/29  23:30:18  roy
  80. # Added rule to co source file if needed.
  81. # Added rule for "make lint"
  82. # 
  83. # Revision 1.1  86/11/29  23:12:19  roy
  84. # Initial revision
  85. # 
  86. #
  87.  
  88. CFLAGS = -O
  89.  
  90. programs:    pracct yesterday
  91.  
  92. pracct:        pracct.o
  93.         cc $(CFLAGS) -o pracct pracct.o
  94.  
  95. pracct.o:    pracct.c
  96.         cc $(CFLAGS) -c pracct.c
  97.  
  98. pracct.c:    RCS/pracct.c,v
  99.         co pracct.c
  100.  
  101. yesterday:    yesterday.o
  102.         cc $(CFLAGS) -o yesterday yesterday.o
  103.  
  104. yesterday.o:    yesterday.c
  105.         cc $(CFLAGS) -c yesterday.c
  106.  
  107. yesterday.c:    RCS/yesterday.c,v
  108.         co yesterday.c
  109. @//E*O*F Makefile//
  110. chmod u=rw,g=r,o=r Makefile
  111.  
  112. echo x - pracct.1
  113. sed 's/^@//' > "pracct.1" <<'@//E*O*F pracct.1//'
  114. @.TH DATE 1 "25 Jan 1988"
  115. @.SH NAME
  116. pracct \- print accounting information in human readable form
  117. @.SH SYNOPSIS
  118. @.B pracct
  119. [-v] [-a file] [-f [cvVsSxXeEbBuUgGmitTfF]]
  120. @.SH DESCRIPTION
  121. @.I Pracct
  122. prints out the system accounting file in human-readable form with a minimum
  123. of processing.
  124. This is sort of a RISC version of
  125. @.I /etc/sa.
  126. As the man page says,
  127. @.I sa
  128. has a near google of options; unfortunately, it is rare that it has exactly
  129. the right one.
  130. With
  131. @.I pracct,
  132. you can simply get an ascii dump of the fields of interest and
  133. use
  134. @.I awk
  135. (for example) to calculate whatever statistics you desire.
  136. The options are many:
  137. @.TP
  138. @.B -v
  139. Verbose output; each field is tagged with a (hopefully) descriptive label.
  140. @.TP
  141. @.BI -a " file"
  142. Alternate accounting file, used instead of default
  143. @.I
  144. /usr/adm/acct.
  145. @.TP
  146. @.BI -f " flags"
  147. Fields to print.
  148. Fields are printed in the order specified.
  149. Default is
  150. @.B UcXB.
  151. Fields are separated with spaces, and an attempt is made to ensure that no
  152. spaces appear within fields (i.e. -f F will give `F----' instead of
  153. `F\0\0\0\0').
  154. This may be defeated, however, by command, user, group, or tty names
  155. containing spaces within them.
  156. Also,
  157. @.B
  158. -B
  159. gives a date in ctime format, which has embedded spaces.
  160. The fields are:
  161. @.TP
  162. @.B
  163. c
  164. Command name
  165. @.TP
  166. @.B
  167. v
  168. Numeric user CPU time (seconds)
  169. @.TP
  170. @.B
  171. V
  172. Symbolic user time (DD+HH:MM:SS)
  173. @.TP
  174. @.B
  175. s
  176. Numeric system time (seconds)
  177. @.TP
  178. @.B
  179. S
  180. Symbolic system time (DD+HH:MM:SS)
  181. @.TP
  182. @.B
  183. x
  184. User+system time (seconds)
  185. @.TP
  186. @.B
  187. X
  188. Symbolic user+system time (DD+HH:MM:SS)
  189. @.TP
  190. @.B
  191. e
  192. Numeric elapsed time (seconds)
  193. @.TP
  194. @.B
  195. E
  196. Symbolic elapsed time (DD+HH:MM:SS)
  197. @.TP
  198. @.B
  199. b
  200. Numeric beginning time (seconds)
  201. @.TP
  202. @.B
  203. B
  204. Symbolic beginning time (ctime format)
  205. @.TP
  206. @.B
  207. u
  208. Numeric user I.D.
  209. @.TP
  210. @.B
  211. U
  212. Login name
  213. @.TP
  214. @.B
  215. g
  216. Numeric group I.D.
  217. @.TP
  218. @.B
  219. G
  220. Group name
  221. @.TP
  222. @.B
  223. m
  224. Average memory usage
  225. @.TP
  226. @.B
  227. i
  228. Disk I/O blocks
  229. @.TP
  230. @.B
  231. t
  232. Major/minor device for control tty
  233. @.TP
  234. @.B
  235. T
  236. Name of control tty (/dev/tty??); currently unimplemented
  237. @.TP
  238. @.B
  239. f
  240. Accounting flags in octal
  241. @.TP
  242. @.B
  243. F
  244. Flags as FSCDX
  245. @.SH "SEE ALSO"
  246. sa(8), acct(2)
  247. @.SH AUTHOR
  248. Roy Smith <phri!roy>
  249. @//E*O*F pracct.1//
  250. chmod u=rw,g=r,o=r pracct.1
  251.  
  252. echo x - pracct.c
  253. sed 's/^@//' > "pracct.c" <<'@//E*O*F pracct.c//'
  254. /*
  255.  * Pracct.c -- print out the system accounting file with a minimum of
  256.  * processing.  This is sort of a RISC version of /etc/sa.  As the man page
  257.  * says, sa has a near google of options; unfortunately, it is rare that
  258.  * it has exactly the right one.  With pracct, you can simply get an ascii
  259.  * dump of the fields of interest and let awk do the the rest.
  260.  */
  261.  
  262. # ifndef LINT
  263. static char rcsid[] = "$Header: pracct.c,v 1.7 88/01/25 22:57:16 roy Exp $";
  264. # endif
  265.  
  266. /*
  267.  * $Log:    pracct.c,v $
  268.  * Revision 1.7  88/01/25  22:57:16  roy
  269.  * Removed copyright notice; code placed in public domain.
  270.  * 
  271.  * Revision 1.6  87/11/17  15:10:55  roy
  272.  * Added uid/gid name caches.
  273.  * 
  274.  * Revision 1.5  86/12/02  17:31:43  roy
  275.  * Fixed but with printing ac_comm -- if command name is full
  276.  * length of ac_comm[], it isn't null terminated; we now are
  277.  * careful not to run past this.  Changed symbolic flag format
  278.  * to print '-' instead of ' ' for missing flags to keep the number
  279.  * of fields on an output line constant.
  280.  * 
  281.  * Revision 1.4  86/12/02  14:34:52  roy
  282.  * Added support for -v (verbose) and -a
  283.  * (alternate accounting file) options.
  284.  * 
  285.  * Revision 1.3  86/12/02  00:33:21  roy
  286.  * Added command-line option processing using getopt.
  287.  * 
  288.  * Revision 1.2  86/11/29  23:29:16  roy
  289.  * Fixed rcsid string (capitalized $ H e a d e r : $).
  290.  * Added type casts to keep lint happy.
  291.  * 
  292.  * Revision 1.1  86/11/29  23:07:16  roy
  293.  * Initial revision
  294.  * 
  295.  */
  296.  
  297. # include <sys/types.h>
  298. # include <sys/acct.h>
  299. # include <sys/file.h>
  300. # include <sys/time.h>
  301. # include <pwd.h>
  302. # include <grp.h>
  303. # include <stdio.h>
  304.  
  305. # define ACCT_FILE    "/usr/adm/acct"    /* raw accounting data file */
  306. # define DFLT_FLDS    "UcXB"        /* default fields to print */
  307. # define FIELD_SEP    ' '        /* how to delimit fields on output */
  308. # define GETOPT_FMT    "va:f:"        /* permissible command-line flags */
  309. # define USAGE_MSG    "pracct [-v] [-a file] [-f [cvVsSxXeEbBuUgGmitTfF]]"
  310.  
  311. /*
  312.  * Symbolic names and flags for fields in acct(5) structure
  313.  */
  314. # define COMM        'c'    /* command name */
  315. # define UTIME        'v'    /* numeric user CPU time (seconds) */
  316. # define SYM_UTIME    'V'    /* symbolic user time (DD+HH:MM:SS) */
  317. # define STIME        's'    /* numeric system time (seconds) */
  318. # define SYM_STIME    'S'    /* symbolic system time (DD+HH:MM:SS) */
  319. # define SUMTIME    'x'    /* user+system time (seconds) */
  320. # define SYM_SUMTIME    'X'    /* symbolic user+system time (DD+HH:MM:SS) */
  321. # define ETIME        'e'    /* numeric elapsed time (seconds) */
  322. # define SYM_ETIME    'E'    /* symbolic elapsed time (DD+HH:MM:SS) */
  323. # define BTIME        'b'    /* numeric beginning time (seconds) */
  324. # define SYM_BTIME    'B'    /* symbolic beginning time (ctime format) */
  325. # define UID        'u'    /* numeric user I.D. */
  326. # define SYM_UID    'U'    /* login name */
  327. # define GID        'g'    /* numeric group I.D. */
  328. # define SYM_GID    'G'    /* group name */
  329. # define MEM        'm'    /* average memory usage */
  330. # define IO        'i'    /* disk I/O blocks */
  331. # define TTY        't'    /* major/minor device for control tty */
  332. # define SYM_TTY    'T'    /* name of control tty /dev/tty?? */
  333. # define FLAG        'f'    /* flags in octal */
  334. # define SYM_FLAG    'F'    /* flags as FSCDX */
  335.  
  336. /*
  337.  * Name cache stuff.
  338.  */
  339. # define NC_NUID    256    /* size of uid cache; power of 2 */
  340. # define NC_UIDMASK    0xff    /* log base 2 (NC_NUID) - 1 */
  341. # define NC_NGID    64    /* size of gid cache;  power of 2 */
  342. # define NC_GIDMASK    0x3f    /* log base 2 (NC_NGID) - 1 */
  343.  
  344. struct nc
  345. {
  346.     int nc_n;        /* numeric uid or gid */
  347.     char *nc_name;        /* user or group name; NULL if unused */
  348. } unc[NC_NUID], gnc[NC_NGID];
  349.  
  350. main (argc, argv)
  351. int argc;
  352. char *argv[];
  353. {
  354.     struct acct ac;
  355.     int fd, acsize, first, nbytes, verbose, n, maxcom;
  356.     long utime, stime, etime, sumtime, btime;
  357.     char *fields, *f, *ct, *ctime(), *dhms(), *uid2name(), *gid2name();
  358.     char c, *afile;
  359.     extern int optind;
  360.     extern char *optarg;
  361.  
  362.     fields = DFLT_FLDS;
  363.     verbose = 0;
  364.     afile = ACCT_FILE;
  365.  
  366.     /*
  367.      * figure out the maximum number of characters
  368.      * stored for each command name.
  369.      */
  370.     maxcom = sizeof (ac.ac_comm) / sizeof (*ac.ac_comm);
  371.  
  372.     while ((c = getopt (argc, argv, GETOPT_FMT)) != EOF)
  373.     {
  374.         switch (c)
  375.         {
  376.         case 'f':
  377.             fields = optarg;
  378.             break;
  379.  
  380.         case 'v':
  381.             verbose = 1;
  382.             break;
  383.  
  384.         case 'a':
  385.             afile = optarg;
  386.             break;
  387.  
  388.         case '?':
  389.             fprintf (stderr, "pracct: illegal option (-%c)\n", c);
  390.             fprintf (stderr, "pracct: usage: %s\n", USAGE_MSG);
  391.             exit (1);
  392.  
  393.         default:
  394.             fprintf (stderr, "bad return from getopt (%o)!\n", c);
  395.             abort ();
  396.         }
  397.     }
  398.  
  399.     /*
  400.      * Open accounting file for reading.
  401.      */
  402.     if ((fd = open (afile, O_RDONLY, 0)) < 0)
  403.     {
  404.         perror ("pracct: can't open accounting file");
  405.         exit (1);
  406.     }
  407.  
  408.     /*
  409.      * Flush name cache.
  410.      */
  411.     for (n = 0; n < NC_NUID; n++)
  412.         unc[n].nc_name = NULL;
  413.  
  414.     for (n = 0; n < NC_NGID; n++)
  415.         gnc[n].nc_name = NULL;
  416.  
  417.     /*
  418.      * Read the accounting file, one accounting-structure-worth
  419.      * at a time, until EOF or error.
  420.      */
  421.     acsize = sizeof (ac) / sizeof (char);
  422.     while ((nbytes = read (fd, (char *) &ac, acsize)) == acsize)
  423.     {
  424.         /*
  425.          * Convert from snazzy compressed floating point format to
  426.          * plain old integers.  It's easier to just do all the
  427.          * conversions than to check to see which ones we actually
  428.          * need.  We often want sumtime, so we rarely lose big.
  429.          * This may get changed later if it proves to be important.
  430.          */
  431.         utime = expand (ac.ac_utime);
  432.         stime = expand (ac.ac_stime);
  433.         sumtime = utime + stime;
  434.         etime = expand (ac.ac_etime);
  435.  
  436.         /*
  437.          * Step though the desired fields in the order specified.
  438.          * Insert a field delimiter in front of every field except
  439.          * for the first one.  Warning: fields may have internal
  440.          * blanks, i.e. those in ctime format.
  441.          */
  442.         first = 1;
  443.         for (f = fields; *f != NULL; f++)
  444.         {
  445.             if (first)
  446.                 first = 0;
  447.             else
  448.                 putchar (FIELD_SEP);
  449.  
  450.             switch (*f)
  451.             {
  452.             case COMM:
  453.                 /*
  454.                  * We have to be careful not to print past
  455.                  * the end of the string because the command
  456.                  * name is only null terminated if it is
  457.                  * less than maxcom characters long.
  458.                  */
  459.                 printf ("%-*.*s", maxcom, maxcom, ac.ac_comm);
  460.                 continue;
  461.  
  462.             case UTIME:
  463.                 printf ("%8ld", utime);
  464.                 if (verbose)
  465.                     printf ("user");
  466.                 continue;
  467.  
  468.             case SYM_UTIME:
  469.                 printf ("%11s", dhms (utime));
  470.                 if (verbose)
  471.                     printf ("user");
  472.                 continue;
  473.  
  474.             case STIME:
  475.                 printf ("%8ld", stime);
  476.                 if (verbose)
  477.                     printf ("sys");
  478.                 continue;
  479.  
  480.             case SYM_STIME:
  481.                 printf ("%11s", dhms (stime));
  482.                 if (verbose)
  483.                     printf ("sys");
  484.                 continue;
  485.  
  486.             case SUMTIME:
  487.                 printf ("%8ld", sumtime);
  488.                 if (verbose)
  489.                     printf ("u+s");
  490.                 continue;
  491.  
  492.             case SYM_SUMTIME:
  493.                 printf ("%11s", dhms (sumtime));
  494.                 if (verbose)
  495.                     printf ("u+s");
  496.                 continue;
  497.  
  498.             case ETIME:
  499.                 printf ("%8ld", etime);
  500.                 if (verbose)
  501.                     printf ("real");
  502.                 continue;
  503.  
  504.             case SYM_ETIME:
  505.                 printf ("%11s", dhms (etime));
  506.                 if (verbose)
  507.                     printf ("real");
  508.                 continue;
  509.  
  510.             case BTIME:
  511.                 printf ("%10ld", (long) ac.ac_btime);
  512.                 if (verbose)
  513.                     printf ("begin");
  514.                 continue;
  515.  
  516.             case SYM_BTIME:
  517.                 /*
  518.                  * Beginning time in ctime format.  Ctime
  519.                  * does us a favor and sticks a newline at
  520.                  * the end of the string, which we then have
  521.                  * to be careful not to print.
  522.                  */
  523.                 btime = ac.ac_btime;
  524.                 ct = ctime (&btime);
  525.                 while (*ct != '\n'  && *ct != NULL)
  526.                     putchar (*(ct++));
  527.                 if (verbose)
  528.                     printf (" begin");
  529.                 continue;
  530.  
  531.             case UID:
  532.                 printf ("%5d", ac.ac_uid);
  533.                 if (verbose)
  534.                     printf ("uid");
  535.                 continue;
  536.  
  537.             case SYM_UID:
  538.                 printf ("%-8s", uid2name (ac.ac_uid));
  539.                 continue;
  540.  
  541.             case GID:
  542.                 printf ("%5d", ac.ac_gid);
  543.                 if (verbose)
  544.                     printf ("gid");
  545.                 continue;
  546.  
  547.             case SYM_GID:
  548.                 printf ("%-8s", gid2name (ac.ac_gid));
  549.                 continue;
  550.  
  551.             case MEM:
  552.                 printf ("%5d", ac.ac_mem);
  553.                 if (verbose)
  554.                     printf ("mem");
  555.                 continue;
  556.  
  557.             case IO:
  558.                 printf ("%10ld", (long) expand (ac.ac_io));
  559.                 if (verbose)
  560.                     printf ("io");
  561.                 continue;
  562.  
  563.             case TTY:
  564.                 if (verbose)
  565.                 {
  566.                     printf ("%3d", major (ac.ac_tty));
  567.                     printf ("/%3d", minor (ac.ac_tty));
  568.                 }
  569.                 else
  570.                 {
  571.                     printf ("%3d", major (ac.ac_tty));
  572.                     printf (" %3d", minor (ac.ac_tty));
  573.                 }
  574.                 continue;
  575.  
  576.             case SYM_TTY:
  577.                 printf ("no SYM_TTY yet");
  578.                 continue;
  579.  
  580.             case FLAG:
  581.                 printf ("%03o", ac.ac_flag);
  582.                 continue;
  583.  
  584.             case SYM_FLAG:
  585.                 putchar (ac.ac_flag & AFORK   ? 'F' : '-');
  586.                 putchar (ac.ac_flag & ASU     ? 'S' : '-');
  587.                 putchar (ac.ac_flag & ACOMPAT ? 'C' : '-');
  588.                 putchar (ac.ac_flag & ACORE   ? 'D' : '-');
  589.                 putchar (ac.ac_flag & AXSIG   ? 'X' : '-');
  590.                 continue;
  591.             }
  592.         }
  593.         /*
  594.          * After all the required fields, end the line.
  595.          */
  596.         putchar ('\n');
  597.     }
  598.  
  599.     if (nbytes > 0)
  600.     {
  601.         fprintf (stderr, "pracct: short read on accounting file\n");
  602.         exit (1);
  603.     }
  604.     if (nbytes < 0)
  605.     {
  606.         perror ("pracct: read error on accounting file");
  607.         exit (1);
  608.     }
  609.     exit (0);
  610. }
  611.  
  612. /*
  613.  * Dhms -- convert time in seconds to DD+HH:MM:SS format.  If
  614.  * time is negative or greater than 99+23:59:59, return all ?'s.
  615.  * Result is returned as a fixed-width, null-terminated, static
  616.  * string which is overwritten on each call.
  617.  */
  618. char *dhms (time)
  619. register long time;    /* , no see :-) */
  620. {
  621.     int sec, min, hour, day;
  622.     static char buf[(sizeof ("DD+HH:MM:SS") / sizeof (char)) + 1];
  623.  
  624.     sec = time % 60;
  625.     time = time / 60;
  626.     min = time % 60;
  627.     time = time / 60;
  628.     hour = time % 24;
  629.     time = time / 24;
  630.     day = time;
  631.  
  632.     if (time < 0 || day > 99)
  633.         sprintf (buf, "??+??:??:??");
  634.     else
  635.         sprintf (buf, "%02d+%02d:%02d:%02d", day, hour, min, sec);
  636.  
  637.     return (buf);
  638. }
  639.  
  640. /*
  641.  * Expand -- convert time from compressed floating point format to normal
  642.  * integer.  This routine is based on one in the 4.2BSD /etc/sa.c source
  643.  * file.  Warning: this depends on the format of t being exactly as in
  644.  * 4.2BSD -- 3 bit power-of-8 exponent in high-order bits and 13 bit
  645.  * mantissa in low-order bits.
  646.  */
  647. time_t expand (t)
  648. comp_t t;
  649. {
  650.     register time_t xtime;
  651.     register exp;
  652.  
  653.     /*
  654.      * Get mantissa and exponent.
  655.      */
  656.     xtime = t & 017777;
  657.     exp = (t >> 13) & 07;
  658.  
  659.     /*
  660.      * Compute time = mantissa * 8^exp.
  661.      */
  662.     while (exp != 0)
  663.     {
  664.         exp--;
  665.         xtime <<= 3;
  666.     }
  667.  
  668.     return(xtime);
  669. }
  670.  
  671. /*
  672.  * Uid2name -- convert a numeric user i.d. to a login name by looking it
  673.  * up in /etc/passwd.  The login name is returned as a null-terminated,
  674.  * static string which is overwritten on each call.  A name cache speeds
  675.  * this up many fold (without it, over two-thirds of the user cpu time can
  676.  * be spent here).
  677.  */
  678. char *uid2name (uid)
  679. register int uid;
  680. {
  681.     struct passwd *getpwuid(), *pw;
  682.     register struct nc *entry;
  683.     char *malloc();
  684.     register char *name, *temp;
  685.     register int l;
  686.  
  687.     entry = &unc[uid & NC_UIDMASK];
  688.     if (entry->nc_name == NULL || entry->nc_n != uid)
  689.     {
  690.         entry->nc_n = uid;
  691.         if (entry->nc_name != NULL)
  692.             free (entry->nc_name);
  693.  
  694.         if ((pw = getpwuid (uid)) == NULL)
  695.             name = "???";
  696.         else
  697.             name = pw->pw_name;
  698.  
  699.         l = 0;
  700.         for (temp = name; *temp != NULL; temp++)
  701.             l++;
  702.         if ((entry->nc_name = malloc (l+1)) == NULL)
  703.         {
  704.             fprintf (stderr, "out of memory in uid2name\n");
  705.             exit (1);
  706.         }
  707.         temp = entry->nc_name;
  708.         while ((*(temp++) = *(name++)) != NULL)
  709.             ;
  710.     }
  711.     return (entry->nc_name);
  712. }
  713.  
  714. /*
  715.  * Gid2name -- convert a numeric group i.d. to a group name by
  716.  * looking it up in /etc/group.  Similar to uid2name, q.v.
  717.  */
  718. char *gid2name (gid)
  719. register int gid;
  720. {
  721.     struct group *getgrgid(), *gr;
  722.     register struct nc *entry;
  723.     char *malloc();
  724.     register char *name, *temp;
  725.     register int l;
  726.  
  727.     entry = &gnc[gid & NC_GIDMASK];
  728.     if (entry->nc_name == NULL || entry->nc_n != gid)
  729.     {
  730.         entry->nc_n = gid;
  731.         if (entry->nc_name != NULL)
  732.             free (entry->nc_name);
  733.  
  734.         if ((gr = getgrgid (gid)) == NULL)
  735.             name = "???";
  736.         else
  737.             name = gr->gr_name;
  738.  
  739.         l = 0;
  740.         for (temp = name; *temp != NULL; temp++)
  741.             l++;
  742.         if ((entry->nc_name = malloc (l+1)) == NULL)
  743.         {
  744.             fprintf (stderr, "out of memory in gid2name\n");
  745.             exit (1);
  746.         }
  747.         temp = entry->nc_name;
  748.         while ((*(temp++) = *(name++)) != NULL)
  749.             ;
  750.     }
  751.     return (entry->nc_name);
  752. }
  753. @//E*O*F pracct.c//
  754. chmod u=r,g=r,o=r pracct.c
  755.  
  756. echo x - yesterday.c
  757. sed 's/^@//' > "yesterday.c" <<'@//E*O*F yesterday.c//'
  758. /*
  759.  * Yesterday -- print out yesterday's date.
  760.  */
  761.  
  762. # ifndef LINT
  763. static char rcsid[] = "$Header: yesterday.c,v 1.3 88/01/25 22:57:34 roy Exp $";
  764. # endif
  765.  
  766. /*
  767.  * $Log:    yesterday.c,v $
  768.  * Revision 1.3  88/01/25  22:57:34  roy
  769.  * Removed copyright notice; code placed in public domain.
  770.  * 
  771.  * Revision 1.2  86/12/09  17:40:44  roy
  772.  * Fixed typo (prerror->perror) and added missing arguments to printf.
  773.  * 
  774.  */
  775.  
  776. # include <sys/time.h>
  777. # define SEC_PER_DAY    (60*60*24)    /* Let's see them change this one! */
  778.  
  779. char *months[] =
  780. {
  781.     "Jan", "Feb", "Mar", "Apr", "May", "Jun",
  782.     "Jul", "Aug", "Sep", "Oct", "Nov", "Dec"
  783. };
  784.  
  785. char *days[] =
  786. {
  787.     "Sun", "Mon", "Tue", "Wed", "Thu", "Fri", "Sat"
  788. };
  789.  
  790. main ()
  791. {
  792.     register struct tm *timebuf;
  793.     struct timeval t;
  794.     struct timezone tz;
  795.     long yesterday;
  796.     int status;
  797.  
  798.     status = 0;
  799.     if ((status = gettimeofday (&t, &tz)) < 0)
  800.     {
  801.         perror ("yesterday: gettimeofday failed");
  802.         yesterday = 0;
  803.     }
  804.     else
  805.     {
  806.         yesterday = t.tv_sec - SEC_PER_DAY;
  807.     }
  808.  
  809.     timebuf = localtime (&yesterday);
  810.  
  811.     printf ("%s %s %2d 19%02d\n",    days[timebuf->tm_wday],
  812.                     months[timebuf->tm_mon],
  813.                     timebuf->tm_mday,
  814.                     timebuf->tm_year);
  815.     exit (status);
  816. }
  817. @//E*O*F yesterday.c//
  818. chmod u=r,g=r,o=r yesterday.c
  819.  
  820. echo x - accounting
  821. sed 's/^@//' > "accounting" <<'@//E*O*F accounting//'
  822. #!/bin/sh
  823.  
  824. #
  825. # Generate per-user cpu time stats.  Stats are kept in $acctdir/hostname/date.
  826. # Note that since we do this a few minutes after midnight, date is yesterday,
  827. # not today.  If $acctdir/hostname doesn't exist, we create it.
  828. #
  829.  
  830. #
  831. # Change these to put things in different places
  832. #
  833. pracct=/usr/local/etc/pracct
  834. yesterday=/usr/local/etc/yesterday
  835. acctdir=/usr/local/acct
  836.  
  837. #
  838. # Make a copy of the accounting file, then do the normal daily summary
  839. # and truncate the accounting file.  Accounting is temporarily turned
  840. # off while we snarf a copy of the file and do the statistics to keep
  841. # things in sync.
  842. #
  843. /usr/etc/accton
  844. cp /usr/adm/acct /tmp/acct1.$$
  845. /usr/etc/sa -s > /dev/null
  846. rm /usr/adm/acct
  847. touch /usr/adm/acct
  848. /usr/etc/accton /usr/adm/acct
  849.  
  850. #
  851. # Generate the per-user stats.
  852. #
  853. $pracct -a /tmp/acct1.$$ -f Ux | awk '
  854.         {time[$1] = time[$1] + $2}
  855.         END {for (name in time) print name, time[name]}
  856.     ' > /tmp/acct2.$$
  857.  
  858. rm -f /tmp/acct1.$$
  859.  
  860. #
  861. # Make sure a directory exists for this machine.  If not, try to create it.
  862. # Move daily summary temp file to accounting directory.  This must be done
  863. # as user "acct" so we can write on the common accounting directory.
  864. #
  865. su acct << EOF_SU_ACCT
  866.     if test ! -d $acctdir/`hostname`
  867.     then
  868.         mkdir $acctdir/`hostname`
  869.     fi
  870.     cp /tmp/acct2.$$ $acctdir/`hostname`/`$yesterday | tr ' ' '-'`
  871. EOF_SU_ACCT
  872.  
  873. rm -f /tmp/acct2.$$
  874. @//E*O*F accounting//
  875. chmod u=rwx,g=rx,o=rx accounting
  876.  
  877. echo Inspecting for damage in transit...
  878. temp=/tmp/shar$$; dtemp=/tmp/.shar$$
  879. trap "rm -f $temp $dtemp; exit" 0 1 2 3 15
  880. cat > $temp <<\!!!
  881.       43     405    2316 README
  882.       40     114     755 Makefile
  883.      135     366    2061 pracct.1
  884.      499    1907   11883 pracct.c
  885.       59     170    1153 yesterday.c
  886.       52     215    1364 accounting
  887.      828    3177   19532 total
  888. !!!
  889. wc  README Makefile pracct.1 pracct.c yesterday.c accounting | sed 's=[^ ]*/==' | diff -b $temp - >$dtemp
  890. if [ -s $dtemp ]
  891. then echo "Ouch [diff of wc output]:" ; cat $dtemp
  892. else echo "No problems found."
  893. fi
  894. exit 0
  895. -- 
  896. Roy Smith, {allegra,cmcl2,philabs}!phri!roy
  897. System Administrator, Public Health Research Institute
  898. 455 First Avenue, New York, NY 10016
  899.  
  900.