17c478bd9Sstevel@tonic-gate /*
27c478bd9Sstevel@tonic-gate * CDDL HEADER START
37c478bd9Sstevel@tonic-gate *
47c478bd9Sstevel@tonic-gate * The contents of this file are subject to the terms of the
57c478bd9Sstevel@tonic-gate * Common Development and Distribution License, Version 1.0 only
67c478bd9Sstevel@tonic-gate * (the "License"). You may not use this file except in compliance
77c478bd9Sstevel@tonic-gate * with the License.
87c478bd9Sstevel@tonic-gate *
97c478bd9Sstevel@tonic-gate * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
107c478bd9Sstevel@tonic-gate * or http://www.opensolaris.org/os/licensing.
117c478bd9Sstevel@tonic-gate * See the License for the specific language governing permissions
127c478bd9Sstevel@tonic-gate * and limitations under the License.
137c478bd9Sstevel@tonic-gate *
147c478bd9Sstevel@tonic-gate * When distributing Covered Code, include this CDDL HEADER in each
157c478bd9Sstevel@tonic-gate * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
167c478bd9Sstevel@tonic-gate * If applicable, add the following below this CDDL HEADER, with the
177c478bd9Sstevel@tonic-gate * fields enclosed by brackets "[]" replaced with your own identifying
187c478bd9Sstevel@tonic-gate * information: Portions Copyright [yyyy] [name of copyright owner]
197c478bd9Sstevel@tonic-gate *
207c478bd9Sstevel@tonic-gate * CDDL HEADER END
217c478bd9Sstevel@tonic-gate */
227c478bd9Sstevel@tonic-gate /*
23*740638c8Sbw * Copyright 2005 Sun Microsystems, Inc. All rights reserved.
247c478bd9Sstevel@tonic-gate * Use is subject to license terms.
257c478bd9Sstevel@tonic-gate */
267c478bd9Sstevel@tonic-gate
277c478bd9Sstevel@tonic-gate /* Copyright (c) 1983, 1984, 1985, 1986, 1987, 1988, 1989 AT&T */
287c478bd9Sstevel@tonic-gate /* All Rights Reserved */
297c478bd9Sstevel@tonic-gate
307c478bd9Sstevel@tonic-gate /*
317c478bd9Sstevel@tonic-gate * University Copyright- Copyright (c) 1982, 1986, 1988
327c478bd9Sstevel@tonic-gate * The Regents of the University of California
337c478bd9Sstevel@tonic-gate * All Rights Reserved
347c478bd9Sstevel@tonic-gate *
357c478bd9Sstevel@tonic-gate * University Acknowledgment- Portions of this document are derived from
367c478bd9Sstevel@tonic-gate * software developed by the University of California, Berkeley, and its
377c478bd9Sstevel@tonic-gate * contributors.
387c478bd9Sstevel@tonic-gate */
397c478bd9Sstevel@tonic-gate
407c478bd9Sstevel@tonic-gate #pragma ident "%Z%%M% %I% %E% SMI"
417c478bd9Sstevel@tonic-gate
427c478bd9Sstevel@tonic-gate #include <sys/param.h>
437c478bd9Sstevel@tonic-gate #include <stdio.h>
447c478bd9Sstevel@tonic-gate #include <dirent.h>
457c478bd9Sstevel@tonic-gate #include <stdlib.h>
467c478bd9Sstevel@tonic-gate #include <strings.h>
477c478bd9Sstevel@tonic-gate #include <unistd.h>
487c478bd9Sstevel@tonic-gate #include <fcntl.h>
497c478bd9Sstevel@tonic-gate #include <protocols/rwhod.h>
507c478bd9Sstevel@tonic-gate
517c478bd9Sstevel@tonic-gate static DIR *dirp;
527c478bd9Sstevel@tonic-gate
537c478bd9Sstevel@tonic-gate #define HOSTLIM 100
547c478bd9Sstevel@tonic-gate static int hostslim = HOSTLIM;
557c478bd9Sstevel@tonic-gate static int nhosts;
567c478bd9Sstevel@tonic-gate struct hs {
577c478bd9Sstevel@tonic-gate struct whod *hs_wd;
587c478bd9Sstevel@tonic-gate int hs_nusers;
597c478bd9Sstevel@tonic-gate };
607c478bd9Sstevel@tonic-gate static int hscmp(), ucmp(), lcmp(), tcmp();
617c478bd9Sstevel@tonic-gate
627c478bd9Sstevel@tonic-gate #define RWHODIR "/var/spool/rwho"
637c478bd9Sstevel@tonic-gate
647c478bd9Sstevel@tonic-gate static char *interval();
657c478bd9Sstevel@tonic-gate static time_t now;
667c478bd9Sstevel@tonic-gate static int aflg;
677c478bd9Sstevel@tonic-gate static int rflg = 1;
687c478bd9Sstevel@tonic-gate
697c478bd9Sstevel@tonic-gate #define down(h) (now - (h)->hs_wd->wd_recvtime > 11 * 60)
707c478bd9Sstevel@tonic-gate
717c478bd9Sstevel@tonic-gate /* ARGSUSED */
72*740638c8Sbw int
main(int argc,char ** argv)737c478bd9Sstevel@tonic-gate main(int argc, char **argv)
747c478bd9Sstevel@tonic-gate {
757c478bd9Sstevel@tonic-gate struct dirent *dp;
767c478bd9Sstevel@tonic-gate int f, i;
777c478bd9Sstevel@tonic-gate struct whod *buf;
787c478bd9Sstevel@tonic-gate int cc;
797c478bd9Sstevel@tonic-gate char *name;
807c478bd9Sstevel@tonic-gate struct hs *hs;
817c478bd9Sstevel@tonic-gate struct hs *hsp;
827c478bd9Sstevel@tonic-gate struct whod *wd;
837c478bd9Sstevel@tonic-gate struct whoent *we;
847c478bd9Sstevel@tonic-gate int maxloadav = 0;
857c478bd9Sstevel@tonic-gate int (*cmp)() = hscmp;
867c478bd9Sstevel@tonic-gate ptrdiff_t hoff;
877c478bd9Sstevel@tonic-gate
887c478bd9Sstevel@tonic-gate name = *argv;
897c478bd9Sstevel@tonic-gate while (*++argv)
907c478bd9Sstevel@tonic-gate while (**argv)
917c478bd9Sstevel@tonic-gate switch (*(*argv)++) {
927c478bd9Sstevel@tonic-gate case 'a':
937c478bd9Sstevel@tonic-gate aflg++;
947c478bd9Sstevel@tonic-gate break;
957c478bd9Sstevel@tonic-gate case 'l':
967c478bd9Sstevel@tonic-gate cmp = lcmp;
977c478bd9Sstevel@tonic-gate break;
987c478bd9Sstevel@tonic-gate case 'u':
997c478bd9Sstevel@tonic-gate cmp = ucmp;
1007c478bd9Sstevel@tonic-gate break;
1017c478bd9Sstevel@tonic-gate case 't':
1027c478bd9Sstevel@tonic-gate cmp = tcmp;
1037c478bd9Sstevel@tonic-gate break;
1047c478bd9Sstevel@tonic-gate case 'r':
1057c478bd9Sstevel@tonic-gate rflg = -rflg;
1067c478bd9Sstevel@tonic-gate break;
1077c478bd9Sstevel@tonic-gate case '-':
1087c478bd9Sstevel@tonic-gate break;
1097c478bd9Sstevel@tonic-gate default:
1107c478bd9Sstevel@tonic-gate (void) fprintf(stderr, "Usage: %s [ -alrtu ]"
1117c478bd9Sstevel@tonic-gate " (choose at most one of l, t, or u)\n",
1127c478bd9Sstevel@tonic-gate name);
1137c478bd9Sstevel@tonic-gate exit(1);
1147c478bd9Sstevel@tonic-gate }
1157c478bd9Sstevel@tonic-gate
1167c478bd9Sstevel@tonic-gate if ((hs = malloc(hostslim * sizeof (struct hs))) == NULL) {
1177c478bd9Sstevel@tonic-gate (void) fprintf(stderr, "initial hs malloc failed\n");
1187c478bd9Sstevel@tonic-gate exit(1);
1197c478bd9Sstevel@tonic-gate }
1207c478bd9Sstevel@tonic-gate hsp = hs;
1217c478bd9Sstevel@tonic-gate if ((buf = malloc(sizeof (struct whod))) == NULL) {
1227c478bd9Sstevel@tonic-gate (void) fprintf(stderr, "initial buf malloc failed\n");
1237c478bd9Sstevel@tonic-gate exit(1);
1247c478bd9Sstevel@tonic-gate }
1257c478bd9Sstevel@tonic-gate
1267c478bd9Sstevel@tonic-gate if (chdir(RWHODIR) < 0) {
1277c478bd9Sstevel@tonic-gate perror(RWHODIR);
1287c478bd9Sstevel@tonic-gate exit(1);
1297c478bd9Sstevel@tonic-gate }
1307c478bd9Sstevel@tonic-gate dirp = opendir(".");
1317c478bd9Sstevel@tonic-gate if (dirp == NULL) {
1327c478bd9Sstevel@tonic-gate perror(RWHODIR);
1337c478bd9Sstevel@tonic-gate exit(1);
1347c478bd9Sstevel@tonic-gate }
1357c478bd9Sstevel@tonic-gate while (dp = readdir(dirp)) {
1367c478bd9Sstevel@tonic-gate if (dp->d_ino == 0)
1377c478bd9Sstevel@tonic-gate continue;
1387c478bd9Sstevel@tonic-gate if (strncmp(dp->d_name, "whod.", 5))
1397c478bd9Sstevel@tonic-gate continue;
1407c478bd9Sstevel@tonic-gate if (nhosts == hostslim) {
1417c478bd9Sstevel@tonic-gate /*
1427c478bd9Sstevel@tonic-gate * We trust that the file system's limit on the number
1437c478bd9Sstevel@tonic-gate * of files in a directory will kick in long before
1447c478bd9Sstevel@tonic-gate * integer overflow.
1457c478bd9Sstevel@tonic-gate */
1467c478bd9Sstevel@tonic-gate hostslim = hostslim << 1;
1477c478bd9Sstevel@tonic-gate
1487c478bd9Sstevel@tonic-gate /*
1497c478bd9Sstevel@tonic-gate * hsp points into an area about to be moved,
1507c478bd9Sstevel@tonic-gate * so we first remember its offset into hs[],
1517c478bd9Sstevel@tonic-gate * then restore it after realloc() has moved
1527c478bd9Sstevel@tonic-gate * the data.
1537c478bd9Sstevel@tonic-gate */
1547c478bd9Sstevel@tonic-gate hoff = hsp - hs;
1557c478bd9Sstevel@tonic-gate hs = realloc(hs, hostslim * sizeof (struct hs));
1567c478bd9Sstevel@tonic-gate if (hs == NULL) {
1577c478bd9Sstevel@tonic-gate (void) fprintf(stderr, "too many hosts\n");
1587c478bd9Sstevel@tonic-gate exit(1);
1597c478bd9Sstevel@tonic-gate }
1607c478bd9Sstevel@tonic-gate hsp = hs + hoff;
1617c478bd9Sstevel@tonic-gate }
1627c478bd9Sstevel@tonic-gate f = open(dp->d_name, 0);
1637c478bd9Sstevel@tonic-gate if (f > 0) {
1647c478bd9Sstevel@tonic-gate int whdrsize = sizeof (*buf) - sizeof (buf->wd_we);
1657c478bd9Sstevel@tonic-gate
1667c478bd9Sstevel@tonic-gate cc = read(f, buf, sizeof (struct whod));
1677c478bd9Sstevel@tonic-gate if (cc >= whdrsize) {
1687c478bd9Sstevel@tonic-gate hsp->hs_wd = malloc(whdrsize);
1697c478bd9Sstevel@tonic-gate wd = buf;
1707c478bd9Sstevel@tonic-gate bcopy((char *)buf, (char *)hsp->hs_wd,
1717c478bd9Sstevel@tonic-gate whdrsize);
1727c478bd9Sstevel@tonic-gate hsp->hs_nusers = 0;
1737c478bd9Sstevel@tonic-gate for (i = 0; i < 2; i++)
1747c478bd9Sstevel@tonic-gate if (wd->wd_loadav[i] > maxloadav)
1757c478bd9Sstevel@tonic-gate maxloadav = wd->wd_loadav[i];
1767c478bd9Sstevel@tonic-gate /* LINTED: pointer alignment */
1777c478bd9Sstevel@tonic-gate we = (struct whoent *)(((char *)buf)+cc);
1787c478bd9Sstevel@tonic-gate while (--we >= wd->wd_we)
1797c478bd9Sstevel@tonic-gate if (aflg || we->we_idle < 3600)
1807c478bd9Sstevel@tonic-gate hsp->hs_nusers++;
1817c478bd9Sstevel@tonic-gate nhosts++; hsp++;
1827c478bd9Sstevel@tonic-gate }
1837c478bd9Sstevel@tonic-gate }
1847c478bd9Sstevel@tonic-gate (void) close(f);
1857c478bd9Sstevel@tonic-gate }
1867c478bd9Sstevel@tonic-gate (void) time(&now);
1877c478bd9Sstevel@tonic-gate qsort((char *)hs, nhosts, sizeof (hs[0]), cmp);
1887c478bd9Sstevel@tonic-gate if (nhosts == 0) {
1897c478bd9Sstevel@tonic-gate (void) printf("no hosts!?!\n");
1907c478bd9Sstevel@tonic-gate exit(1);
1917c478bd9Sstevel@tonic-gate }
1927c478bd9Sstevel@tonic-gate for (i = 0; i < nhosts; i++) {
1937c478bd9Sstevel@tonic-gate hsp = &hs[i];
1947c478bd9Sstevel@tonic-gate if (down(hsp)) {
1957c478bd9Sstevel@tonic-gate (void) printf("%-12s%s\n", hsp->hs_wd->wd_hostname,
1967c478bd9Sstevel@tonic-gate interval((int)(now - hsp->hs_wd->wd_recvtime),
1977c478bd9Sstevel@tonic-gate "down"));
1987c478bd9Sstevel@tonic-gate continue;
1997c478bd9Sstevel@tonic-gate }
2007c478bd9Sstevel@tonic-gate (void) printf("%-12s%s, %4d user%s load %*.2f,"
2017c478bd9Sstevel@tonic-gate " %*.2f, %*.2f\n",
2027c478bd9Sstevel@tonic-gate hsp->hs_wd->wd_hostname,
2037c478bd9Sstevel@tonic-gate interval(hsp->hs_wd->wd_sendtime -
2047c478bd9Sstevel@tonic-gate hsp->hs_wd->wd_boottime, " up"),
2057c478bd9Sstevel@tonic-gate hsp->hs_nusers,
2067c478bd9Sstevel@tonic-gate hsp->hs_nusers == 1 ? ", " : "s,",
2077c478bd9Sstevel@tonic-gate maxloadav >= 1000 ? 5 : 4,
2087c478bd9Sstevel@tonic-gate hsp->hs_wd->wd_loadav[0] / 100.0,
2097c478bd9Sstevel@tonic-gate maxloadav >= 1000 ? 5 : 4,
2107c478bd9Sstevel@tonic-gate hsp->hs_wd->wd_loadav[1] / 100.0,
2117c478bd9Sstevel@tonic-gate maxloadav >= 1000 ? 5 : 4,
2127c478bd9Sstevel@tonic-gate hsp->hs_wd->wd_loadav[2] / 100.0);
2137c478bd9Sstevel@tonic-gate free(hsp->hs_wd);
2147c478bd9Sstevel@tonic-gate }
2157c478bd9Sstevel@tonic-gate
2167c478bd9Sstevel@tonic-gate return (0);
2177c478bd9Sstevel@tonic-gate }
2187c478bd9Sstevel@tonic-gate
2197c478bd9Sstevel@tonic-gate static char *
interval(int time,char * updown)2207c478bd9Sstevel@tonic-gate interval(int time, char *updown)
2217c478bd9Sstevel@tonic-gate {
2227c478bd9Sstevel@tonic-gate static char resbuf[32];
2237c478bd9Sstevel@tonic-gate int days, hours, minutes;
2247c478bd9Sstevel@tonic-gate
2257c478bd9Sstevel@tonic-gate if (time < 0 || time > 10*365*24*60*60) {
2267c478bd9Sstevel@tonic-gate (void) sprintf(resbuf, " %s ??:??", updown);
2277c478bd9Sstevel@tonic-gate return (resbuf);
2287c478bd9Sstevel@tonic-gate }
2297c478bd9Sstevel@tonic-gate minutes = (time + 59) / 60; /* round to minutes */
2307c478bd9Sstevel@tonic-gate hours = minutes / 60; minutes %= 60;
2317c478bd9Sstevel@tonic-gate days = hours / 24; hours %= 24;
2327c478bd9Sstevel@tonic-gate if (days)
2337c478bd9Sstevel@tonic-gate (void) sprintf(resbuf, "%s %2d+%02d:%02d",
2347c478bd9Sstevel@tonic-gate updown, days, hours, minutes);
2357c478bd9Sstevel@tonic-gate else
2367c478bd9Sstevel@tonic-gate (void) sprintf(resbuf, "%s %2d:%02d",
2377c478bd9Sstevel@tonic-gate updown, hours, minutes);
2387c478bd9Sstevel@tonic-gate return (resbuf);
2397c478bd9Sstevel@tonic-gate }
2407c478bd9Sstevel@tonic-gate
2417c478bd9Sstevel@tonic-gate static int
hscmp(struct hs * h1,struct hs * h2)2427c478bd9Sstevel@tonic-gate hscmp(struct hs *h1, struct hs *h2)
2437c478bd9Sstevel@tonic-gate {
2447c478bd9Sstevel@tonic-gate
2457c478bd9Sstevel@tonic-gate return (rflg * strcmp(h1->hs_wd->wd_hostname, h2->hs_wd->wd_hostname));
2467c478bd9Sstevel@tonic-gate }
2477c478bd9Sstevel@tonic-gate
2487c478bd9Sstevel@tonic-gate /*
2497c478bd9Sstevel@tonic-gate * Compare according to load average.
2507c478bd9Sstevel@tonic-gate */
2517c478bd9Sstevel@tonic-gate static int
lcmp(struct hs * h1,struct hs * h2)2527c478bd9Sstevel@tonic-gate lcmp(struct hs *h1, struct hs *h2)
2537c478bd9Sstevel@tonic-gate {
2547c478bd9Sstevel@tonic-gate
2557c478bd9Sstevel@tonic-gate if (down(h1))
2567c478bd9Sstevel@tonic-gate if (down(h2))
2577c478bd9Sstevel@tonic-gate return (tcmp(h1, h2));
2587c478bd9Sstevel@tonic-gate else
2597c478bd9Sstevel@tonic-gate return (rflg);
2607c478bd9Sstevel@tonic-gate else if (down(h2))
2617c478bd9Sstevel@tonic-gate return (-rflg);
2627c478bd9Sstevel@tonic-gate else
2637c478bd9Sstevel@tonic-gate return (rflg *
2647c478bd9Sstevel@tonic-gate (h2->hs_wd->wd_loadav[0] - h1->hs_wd->wd_loadav[0]));
2657c478bd9Sstevel@tonic-gate }
2667c478bd9Sstevel@tonic-gate
2677c478bd9Sstevel@tonic-gate /*
2687c478bd9Sstevel@tonic-gate * Compare according to number of users.
2697c478bd9Sstevel@tonic-gate */
2707c478bd9Sstevel@tonic-gate static int
ucmp(struct hs * h1,struct hs * h2)2717c478bd9Sstevel@tonic-gate ucmp(struct hs *h1, struct hs *h2)
2727c478bd9Sstevel@tonic-gate {
2737c478bd9Sstevel@tonic-gate
2747c478bd9Sstevel@tonic-gate if (down(h1))
2757c478bd9Sstevel@tonic-gate if (down(h2))
2767c478bd9Sstevel@tonic-gate return (tcmp(h1, h2));
2777c478bd9Sstevel@tonic-gate else
2787c478bd9Sstevel@tonic-gate return (rflg);
2797c478bd9Sstevel@tonic-gate else if (down(h2))
2807c478bd9Sstevel@tonic-gate return (-rflg);
2817c478bd9Sstevel@tonic-gate else
2827c478bd9Sstevel@tonic-gate return (rflg * (h2->hs_nusers - h1->hs_nusers));
2837c478bd9Sstevel@tonic-gate }
2847c478bd9Sstevel@tonic-gate
2857c478bd9Sstevel@tonic-gate /*
2867c478bd9Sstevel@tonic-gate * Compare according to uptime.
2877c478bd9Sstevel@tonic-gate */
2887c478bd9Sstevel@tonic-gate static int
tcmp(struct hs * h1,struct hs * h2)2897c478bd9Sstevel@tonic-gate tcmp(struct hs *h1, struct hs *h2)
2907c478bd9Sstevel@tonic-gate {
2917c478bd9Sstevel@tonic-gate
2927c478bd9Sstevel@tonic-gate return (rflg * (
2937c478bd9Sstevel@tonic-gate (down(h2) ? h2->hs_wd->wd_recvtime - now :
2947c478bd9Sstevel@tonic-gate h2->hs_wd->wd_sendtime - h2->hs_wd->wd_boottime)
2957c478bd9Sstevel@tonic-gate -
2967c478bd9Sstevel@tonic-gate (down(h1) ? h1->hs_wd->wd_recvtime - now :
2977c478bd9Sstevel@tonic-gate h1->hs_wd->wd_sendtime - h1->hs_wd->wd_boottime)));
2987c478bd9Sstevel@tonic-gate }
299