27  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
47  *	pac [-Pprinter] [-pprice] [-s] [-r] [-c] [-m] [user ...]
64 static int	 allflag = 1;	/* Get stats on everybody */
68 static int	 pflag = 0;	/* 1 if -p on cmd line */
70 static long	 price100;	/* per-page cost in 100th of a cent */
88 	int	h_count;		/* Number of runs */
109 	while ((opt = getopt(argc, argv, "P:p:scmr")) != -1) {  in main()
159 	argc -= optind;  in main()
167 	for( ; argc > 0; argc--, argv++) {  in main()
197  * is set, then just gather the facts on everyone.
202  * Some software relies on whitespace between runs_count and hostname:username
203  * being optional (such as Ghostscript's unix-lpr.sh).
205  * Host names are ignored if the -m flag is present.
224 		/* if -m was specified, don't use the hostname part */  in account()
236 		hp->h_feetpages += t;  in account()
238 			hp->h_count += ic;  in account()
240 			hp->h_count++;  in account()
253 	int hno, c, runs;  in dumpit()  local
261 	for (ap = base, c = hcount; c--; ap++) {  in dumpit()
265 		hp = hp->h_link;  in dumpit()
268 	printf(" pages/feet runs price    %s\n",  in dumpit()
270 	printf(" ---------- ---- -------- ----------------------\n");  in dumpit()
272 	runs = 0;  in dumpit()
273 	for (ap = base, c = hcount; c--; ap++) {  in dumpit()
275 		runs += hp->h_count;  in dumpit()
276 		feet += hp->h_feetpages;  in dumpit()
278 			hp->h_feetpages, hp->h_count,   in dumpit()
279 			hp->h_feetpages * price * hp->h_count,  in dumpit()
280 			hp->h_name);  in dumpit()
283 		printf(" ---------- ---- -------- ----------------------\n");  in dumpit()
284 		printf("Sum:%7.2f %4d $%7.2f\n", feet, runs,   in dumpit()
285 			feet * price * runs);  in dumpit()
308 			fprintf(acf, "%7.2f\t%s\t%d\n", hp->h_feetpages,  in rewrite()
309 			    hp->h_name, hp->h_count);  in rewrite()
310 			hp = hp->h_link;  in rewrite()
346 	hp->h_name = strdup(name);  in enter()
347 	if (hp->h_name == NULL)  in enter()
349 	hp->h_feetpages = 0.0;  in enter()
350 	hp->h_count = 0;  in enter()
351 	hp->h_link = hashtab[h];  in enter()
368 	for (hp = hashtab[h]; hp != NULL; hp = hp->h_link)  in lookup()
369 		if (strcmp(hp->h_name, name) == 0)  in lookup()
403 		r = h1->h_feetpages < h2->h_feetpages ?  in qucmp()
404 		    -1 : h1->h_feetpages > h2->h_feetpages;  in qucmp()
406 		r = strcmp(h1->h_name, h2->h_name);  in qucmp()
407 	return(reverse ? -r : r);  in qucmp()
411  * Perform lookup for printer name or abbreviation --
418 	if ((stat = cgetent(&bp, printcapdb, s)) == -2) {  in chkprinter()
421 	} else if (stat == -1)  in chkprinter()
423 	else if (stat == -3)  in chkprinter()
426 	if (cgetstr(bp, "af", &acctfile) == -1) {  in chkprinter()
442 	  "usage: pac [-Pprinter] [-pprice] [-s] [-c] [-r] [-m] [user ...]\n");  in usage()