Home | History | Annotate | Line # | Download | only in rwho
rwho.c revision 1.13
      1  1.13       mjl /*	$NetBSD: rwho.c,v 1.13 2000/09/06 12:13:48 mjl Exp $	*/
      2   1.5       tls 
      3   1.1       cgd /*
      4   1.5       tls  * Copyright (c) 1983, 1993
      5   1.5       tls  *	The Regents of the University of California.  All rights reserved.
      6   1.1       cgd  *
      7   1.1       cgd  * Redistribution and use in source and binary forms, with or without
      8   1.1       cgd  * modification, are permitted provided that the following conditions
      9   1.1       cgd  * are met:
     10   1.1       cgd  * 1. Redistributions of source code must retain the above copyright
     11   1.1       cgd  *    notice, this list of conditions and the following disclaimer.
     12   1.1       cgd  * 2. Redistributions in binary form must reproduce the above copyright
     13   1.1       cgd  *    notice, this list of conditions and the following disclaimer in the
     14   1.1       cgd  *    documentation and/or other materials provided with the distribution.
     15   1.1       cgd  * 3. All advertising materials mentioning features or use of this software
     16   1.1       cgd  *    must display the following acknowledgement:
     17   1.1       cgd  *	This product includes software developed by the University of
     18   1.1       cgd  *	California, Berkeley and its contributors.
     19   1.1       cgd  * 4. Neither the name of the University nor the names of its contributors
     20   1.1       cgd  *    may be used to endorse or promote products derived from this software
     21   1.1       cgd  *    without specific prior written permission.
     22   1.1       cgd  *
     23   1.1       cgd  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
     24   1.1       cgd  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
     25   1.1       cgd  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
     26   1.1       cgd  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
     27   1.1       cgd  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
     28   1.1       cgd  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
     29   1.1       cgd  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
     30   1.1       cgd  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
     31   1.1       cgd  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
     32   1.1       cgd  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
     33   1.1       cgd  * SUCH DAMAGE.
     34   1.1       cgd  */
     35   1.1       cgd 
     36   1.8     lukem #include <sys/cdefs.h>
     37   1.1       cgd #ifndef lint
     38   1.8     lukem __COPYRIGHT("@(#) Copyright (c) 1983, 1993\n\
     39   1.8     lukem 	The Regents of the University of California.  All rights reserved.\n");
     40   1.1       cgd #endif /* not lint */
     41   1.1       cgd 
     42   1.1       cgd #ifndef lint
     43   1.5       tls /*static char sccsid[] = "from: @(#)rwho.c	8.1 (Berkeley) 6/6/93";*/
     44  1.13       mjl __RCSID("$NetBSD: rwho.c,v 1.13 2000/09/06 12:13:48 mjl Exp $");
     45   1.1       cgd #endif /* not lint */
     46   1.1       cgd 
     47   1.1       cgd #include <sys/param.h>
     48   1.1       cgd #include <sys/file.h>
     49   1.9       mrg 
     50   1.9       mrg #include <protocols/rwhod.h>
     51   1.9       mrg 
     52   1.3       jtc #include <dirent.h>
     53   1.9       mrg #include <err.h>
     54   1.9       mrg #include <errno.h>
     55  1.13       mjl #include <locale.h>
     56   1.1       cgd #include <stdio.h>
     57   1.9       mrg #include <stdlib.h>
     58   1.4       cgd #include <string.h>
     59  1.10    kleink #include <time.h>
     60  1.11  christos #include <fcntl.h>
     61   1.9       mrg #include <unistd.h>
     62   1.1       cgd 
     63  1.13       mjl void usage(void);
     64  1.13       mjl int utmpcmp(const void *, const void *);
     65  1.13       mjl 
     66   1.1       cgd DIR	*dirp;
     67   1.1       cgd 
     68   1.1       cgd struct	whod wd;
     69   1.1       cgd #define	NUSERS	1000
     70   1.1       cgd struct	myutmp {
     71   1.1       cgd 	char	myhost[MAXHOSTNAMELEN];
     72   1.1       cgd 	int	myidle;
     73   1.1       cgd 	struct	outmp myutmp;
     74   1.1       cgd } myutmp[NUSERS];
     75   1.1       cgd int	nusers;
     76   1.1       cgd 
     77   1.1       cgd #define	WHDRSIZE	(sizeof (wd) - sizeof (wd.wd_we))
     78   1.1       cgd /*
     79   1.1       cgd  * this macro should be shared with ruptime.
     80   1.1       cgd  */
     81   1.1       cgd #define	down(w,now)	((now) - (w)->wd_recvtime > 11 * 60)
     82   1.1       cgd 
     83   1.9       mrg int	utmpcmp __P((const void *, const void *));
     84   1.9       mrg int	main __P((int, char **));
     85   1.9       mrg 
     86   1.1       cgd time_t	now;
     87   1.1       cgd int	aflg;
     88   1.1       cgd 
     89   1.9       mrg int
     90  1.13       mjl main(int argc, char **argv)
     91   1.1       cgd {
     92   1.1       cgd 	int ch;
     93   1.3       jtc 	struct dirent *dp;
     94   1.1       cgd 	int cc, width;
     95   1.8     lukem 	struct whod *w = &wd;
     96   1.8     lukem 	struct whoent *we;
     97   1.8     lukem 	struct myutmp *mp;
     98   1.7       cgd 	int f, n, i, nhosts;
     99   1.1       cgd 
    100  1.13       mjl 	setlocale(LC_TIME, "");
    101  1.13       mjl 
    102   1.8     lukem 	while ((ch = getopt(argc, argv, "a")) != -1)
    103   1.1       cgd 		switch((char)ch) {
    104   1.1       cgd 		case 'a':
    105   1.1       cgd 			aflg = 1;
    106   1.1       cgd 			break;
    107   1.1       cgd 		case '?':
    108   1.1       cgd 		default:
    109  1.13       mjl 			usage();
    110   1.1       cgd 		}
    111  1.13       mjl 
    112  1.13       mjl 	if(optind != argc)
    113  1.13       mjl 		usage();
    114  1.13       mjl 
    115  1.13       mjl 	if (chdir(_PATH_RWHODIR) || (dirp = opendir(".")) == NULL)
    116  1.13       mjl 		err(1, "%s", _PATH_RWHODIR);
    117  1.13       mjl 
    118   1.1       cgd 	mp = myutmp;
    119   1.7       cgd 	nhosts = 0;
    120   1.1       cgd 	(void)time(&now);
    121   1.9       mrg 	while ((dp = readdir(dirp)) != NULL) {
    122   1.1       cgd 		if (dp->d_ino == 0 || strncmp(dp->d_name, "whod.", 5))
    123   1.1       cgd 			continue;
    124   1.1       cgd 		f = open(dp->d_name, O_RDONLY);
    125   1.1       cgd 		if (f < 0)
    126   1.1       cgd 			continue;
    127   1.1       cgd 		cc = read(f, (char *)&wd, sizeof (struct whod));
    128   1.1       cgd 		if (cc < WHDRSIZE) {
    129   1.1       cgd 			(void) close(f);
    130   1.1       cgd 			continue;
    131   1.1       cgd 		}
    132   1.7       cgd 		nhosts++;
    133   1.1       cgd 		if (down(w,now)) {
    134   1.1       cgd 			(void) close(f);
    135   1.1       cgd 			continue;
    136   1.1       cgd 		}
    137   1.1       cgd 		cc -= WHDRSIZE;
    138   1.1       cgd 		we = w->wd_we;
    139   1.1       cgd 		for (n = cc / sizeof (struct whoent); n > 0; n--) {
    140   1.1       cgd 			if (aflg == 0 && we->we_idle >= 60*60) {
    141   1.1       cgd 				we++;
    142   1.1       cgd 				continue;
    143   1.1       cgd 			}
    144  1.13       mjl 			if (nusers >= NUSERS)
    145  1.13       mjl 				err(1, "too many users");
    146  1.13       mjl 
    147   1.1       cgd 			mp->myutmp = we->we_utmp; mp->myidle = we->we_idle;
    148   1.1       cgd 			(void) strcpy(mp->myhost, w->wd_hostname);
    149   1.1       cgd 			nusers++; we++; mp++;
    150   1.1       cgd 		}
    151   1.1       cgd 		(void) close(f);
    152   1.1       cgd 	}
    153   1.7       cgd 	if (nhosts == 0)
    154   1.7       cgd 		errx(0, "no hosts in %s.", _PATH_RWHODIR);
    155   1.1       cgd 	qsort((char *)myutmp, nusers, sizeof (struct myutmp), utmpcmp);
    156   1.1       cgd 	mp = myutmp;
    157   1.1       cgd 	width = 0;
    158   1.1       cgd 	for (i = 0; i < nusers; i++) {
    159   1.1       cgd 		int j = strlen(mp->myhost) + 1 + strlen(mp->myutmp.out_line);
    160   1.1       cgd 		if (j > width)
    161   1.1       cgd 			width = j;
    162   1.1       cgd 		mp++;
    163   1.1       cgd 	}
    164   1.1       cgd 	mp = myutmp;
    165   1.1       cgd 	for (i = 0; i < nusers; i++) {
    166  1.13       mjl 		char buf[BUFSIZ], cbuf[80];
    167  1.13       mjl 		strftime(cbuf, sizeof(cbuf), "%c", localtime((time_t *)&mp->myutmp.out_time));
    168  1.13       mjl /*		cbuf = ctime((time_t *)&mp->myutmp.out_time); */
    169   1.1       cgd 		(void)sprintf(buf, "%s:%s", mp->myhost, mp->myutmp.out_line);
    170   1.1       cgd 		printf("%-8.8s %-*s %.12s",
    171   1.1       cgd 		   mp->myutmp.out_name,
    172   1.1       cgd 		   width,
    173   1.1       cgd 		   buf,
    174  1.13       mjl 		   cbuf + 4);
    175   1.1       cgd 		mp->myidle /= 60;
    176   1.1       cgd 		if (mp->myidle) {
    177   1.1       cgd 			if (aflg) {
    178   1.1       cgd 				if (mp->myidle >= 100*60)
    179   1.1       cgd 					mp->myidle = 100*60 - 1;
    180   1.1       cgd 				if (mp->myidle >= 60)
    181   1.1       cgd 					printf(" %2d", mp->myidle / 60);
    182   1.1       cgd 				else
    183   1.1       cgd 					printf("   ");
    184   1.1       cgd 			} else
    185   1.1       cgd 				printf(" ");
    186   1.1       cgd 			printf(":%02d", mp->myidle % 60);
    187   1.1       cgd 		}
    188   1.1       cgd 		printf("\n");
    189   1.1       cgd 		mp++;
    190   1.1       cgd 	}
    191   1.1       cgd 	exit(0);
    192   1.1       cgd }
    193   1.1       cgd 
    194   1.9       mrg int
    195  1.13       mjl utmpcmp(const void *v1, const void *v2)
    196   1.1       cgd {
    197   1.9       mrg 	const struct myutmp *u1, *u2;
    198   1.1       cgd 	int rc;
    199   1.1       cgd 
    200   1.9       mrg 	u1 = v1;
    201   1.9       mrg 	u2 = v2;
    202   1.1       cgd 	rc = strncmp(u1->myutmp.out_name, u2->myutmp.out_name, 8);
    203   1.1       cgd 	if (rc)
    204   1.1       cgd 		return (rc);
    205  1.12      tron 	rc = strcmp(u1->myhost, u2->myhost);
    206   1.1       cgd 	if (rc)
    207   1.1       cgd 		return (rc);
    208   1.1       cgd 	return (strncmp(u1->myutmp.out_line, u2->myutmp.out_line, 8));
    209   1.1       cgd }
    210  1.12      tron 
    211  1.13       mjl void
    212  1.13       mjl usage(void)
    213  1.13       mjl {
    214  1.13       mjl 	fprintf(stderr, "usage: rwho [-a]\n");
    215  1.13       mjl 	exit(1);
    216  1.13       mjl }
    217