initial import of NetBSD tree

3 files changed, 368 insertions, 0 deletions

diff --git a/usr.bin/rusers/Makefile b/usr.bin/rusers/Makefile
new file mode 100644
index 00000000000..089b3c48e47
--- /dev/null
+++ b/usr.bin/rusers/Makefile
@@ -0,0 +1,8 @@
+#	$Id: Makefile,v 1.1 1995/10/18 08:46:04 deraadt Exp $
+
+PROG = rusers
+
+DPADD=	${LIBRPCSVC}
+LDADD=	-lrpcsvc
+
+.include <bsd.prog.mk>
diff --git a/usr.bin/rusers/rusers.1 b/usr.bin/rusers/rusers.1
new file mode 100644
index 00000000000..63ef7069029
--- /dev/null
+++ b/usr.bin/rusers/rusers.1
@@ -0,0 +1,95 @@
+.\" Copyright (c) 1983, 1990 The 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.
+.\"
+.\"     from: @(#)rusers.1	6.7 (Berkeley) 4/23/91
+.\"	$Id: rusers.1,v 1.1 1995/10/18 08:46:04 deraadt Exp $
+.\"
+.Dd April 23, 1991
+.Dt RUSERS 1
+.Os BSD 4.2
+.Sh NAME
+.Nm rusers
+.Nd who is logged in to machines on local network
+.Sh SYNOPSIS
+.Nm rusers
+.Op Fl al
+.Op Ar host ...
+.Sh DESCRIPTION
+The
+.Nm rusers
+command produces output similar to
+.Xr who ,
+but for the list of hosts or all machines on the local
+network. For each host responding to the rusers query,
+the hostname with the names of the users currently logged
+on is printed on each line. The rusers command will wait for
+one minute to catch late responders.
+.Pp
+The following options are available:
+.Bl -tag -width indent
+.It Fl a
+Print all machines responding even if no one is currently logged in.
+.It Fl l
+Print a long format listing. This includes the user name, host name,
+tty that the user is logged in to, the date and time the user
+logged in, the amount of time since the user typed on the keyboard,
+and the remote host they logged in from (if applicable).
+.El
+.Sh DIAGNOSTICS
+.Bl -tag -width indent
+.It rusers: RPC: Program not registered
+The
+.Xr rpc.rusersd 8
+daemon has not been started on the remote host.
+.It rusers: RPC: Timed out
+A communication error occurred.  Either the network is
+excessively congested, or the
+.Xr rpc.rusersd 8
+daemon has terminated on the remote host.
+.It rusers: RPC: Port mapper failure - RPC: Timed out
+The remote host is not running the portmapper (see
+.Xr portmap 8 ),
+and cannot accommodate any RPC-based services.  The host may be down.
+.El
+.Sh SEE ALSO
+.Xr rwho 1
+.Xr users 1 ,
+.Xr who 1 ,
+.Xr portmap 8 ,
+.Xr rpc.rusersd 8
+.Sh HISTORY
+The
+.Nm rusers
+command
+appeared in
+.Tn SunOS .
+.Sh BUGS
+The sorting options are not implemented.
diff --git a/usr.bin/rusers/rusers.c b/usr.bin/rusers/rusers.c
new file mode 100644
index 00000000000..813634181ad
--- /dev/null
+++ b/usr.bin/rusers/rusers.c
@@ -0,0 +1,265 @@
+/*-
+ *  Copyright (c) 1993 John Brezak
+ *  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. The name of the author may not be used to endorse or promote products
+ *     derived from this software without specific prior written permission.
+ * 
+ * THIS SOFTWARE IS PROVIDED BY THE AUTHOR `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 AUTHOR 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
+static char rcsid[] = "$Id: rusers.c,v 1.1 1995/10/18 08:46:04 deraadt Exp $";
+#endif /* not lint */
+
+#include <sys/types.h>
+#include <sys/param.h>
+#include <sys/socket.h>
+#include <netdb.h>
+#include <stdio.h>
+#include <strings.h>
+#include <rpc/rpc.h>
+#include <arpa/inet.h>
+#include <utmp.h>
+#include <stdlib.h>
+
+/*
+ * For now we only try version 2 of the protocol. The current
+ * version is 3 (rusers.h), but only Solaris and NetBSD seem
+ * to support it currently.
+ */
+#include <rpcsvc/rnusers.h>	/* Old version */
+
+#define MAX_INT 0x7fffffff
+#define HOST_WIDTH 20
+#define LINE_WIDTH 8
+char *argv0;
+
+struct timeval timeout = { 25, 0 };
+int longopt;
+int allopt;
+
+struct host_list {
+	struct host_list *next;
+	struct in_addr addr;
+} *hosts;
+
+int
+search_host(struct in_addr addr)
+{
+	struct host_list *hp;
+	
+	if (!hosts)
+		return(0);
+
+	for (hp = hosts; hp != NULL; hp = hp->next) {
+		if (hp->addr.s_addr == addr.s_addr)
+			return(1);
+	}
+	return(0);
+}
+
+void
+remember_host(struct in_addr addr)
+{
+	struct host_list *hp;
+
+	if (!(hp = (struct host_list *)malloc(sizeof(struct host_list)))) {
+		fprintf(stderr, "%s: no memory.\n", argv0);
+		exit(1);
+	}
+	hp->addr.s_addr = addr.s_addr;
+	hp->next = hosts;
+	hosts = hp;
+}
+
+int
+rusers_reply(char *replyp, struct sockaddr_in *raddrp)
+{
+	int x, idle;
+	char date[32], idle_time[64], remote[64], local[64];
+	struct hostent *hp;
+	struct utmpidlearr *up = (struct utmpidlearr *)replyp;
+	char *host;
+	int days, hours, minutes, seconds;
+	
+	if (search_host(raddrp->sin_addr))
+		return(0);
+
+	if (!allopt && !up->uia_cnt)
+		return(0);
+	
+	hp = gethostbyaddr((char *)&raddrp->sin_addr.s_addr,
+			   sizeof(struct in_addr), AF_INET);
+	if (hp)
+		host = hp->h_name;
+	else
+		host = inet_ntoa(raddrp->sin_addr);
+	
+	if (!longopt)
+		printf("%-*.*s ", HOST_WIDTH, HOST_WIDTH, host);
+	
+	for (x = 0; x < up->uia_cnt; x++) {
+		strncpy(date,
+			&(ctime((time_t *)&(up->uia_arr[x]->ui_utmp.ut_time))[4]),
+			sizeof(date)-1);
+
+		idle = up->uia_arr[x]->ui_idle;
+		sprintf(idle_time, "   :%02d", idle);
+		if (idle == MAX_INT)
+			strcpy(idle_time, "??");
+		else if (idle == 0)
+			strcpy(idle_time, "");
+		else {
+			seconds = idle;
+			days = seconds/(60*60*24);
+			seconds %= (60*60*24);
+			hours = seconds/(60*60);
+			seconds %= (60*60);
+			minutes = seconds/60;
+			seconds %= 60;
+			if (idle > 60)
+				sprintf(idle_time, "%2d:%02d",
+					minutes, seconds);
+			if (idle >= (60*60))
+				sprintf(idle_time, "%2d:%02d:%02d",
+					hours, minutes, seconds);
+			if (idle >= (24*60*60))
+				sprintf(idle_time, "%d days, %d:%02d:%02d",
+					days, hours, minutes, seconds);
+		}
+
+		strncpy(remote, up->uia_arr[x]->ui_utmp.ut_host,
+		    sizeof(remote)-1);
+		if (strlen(remote) != 0)
+			sprintf(remote, "(%.16s)",
+			    up->uia_arr[x]->ui_utmp.ut_host);
+
+		if (longopt) {
+			strncpy(local, host, sizeof(local));
+			local[HOST_WIDTH + LINE_WIDTH + 1 -
+			    strlen(up->uia_arr[x]->ui_utmp.ut_line) - 1] = 0;
+			strcat(local, ":");
+			strcat(local, up->uia_arr[x]->ui_utmp.ut_line);
+
+			printf("%-8.8s %-*.*s %-12.12s %8s %.18s\n",
+			    up->uia_arr[x]->ui_utmp.ut_name,
+			    HOST_WIDTH+LINE_WIDTH+1, HOST_WIDTH+LINE_WIDTH+1, local,
+			    date,
+			    idle_time,
+			    remote);
+		} else
+			printf("%0.8s ",
+			    up->uia_arr[x]->ui_utmp.ut_name);
+	}
+	if (!longopt)
+		putchar('\n');
+	
+	remember_host(raddrp->sin_addr);
+	return(0);
+}
+
+void
+onehost(char *host)
+{
+	struct utmpidlearr up;
+	CLIENT *rusers_clnt;
+	struct sockaddr_in addr;
+	struct hostent *hp;
+	
+	hp = gethostbyname(host);
+	if (hp == NULL) {
+		fprintf(stderr, "%s: unknown host \"%s\"\n",
+			argv0, host);
+		exit(1);
+	}
+
+	rusers_clnt = clnt_create(host, RUSERSPROG, RUSERSVERS_IDLE, "udp");
+	if (rusers_clnt == NULL) {
+		clnt_pcreateerror(argv0);
+		exit(1);
+	}
+
+	bzero((char *)&up, sizeof(up));
+	if (clnt_call(rusers_clnt, RUSERSPROC_NAMES, xdr_void, NULL,
+	    xdr_utmpidlearr, &up, timeout) != RPC_SUCCESS) {
+		clnt_perror(rusers_clnt, argv0);
+		exit(1);
+	}
+	addr.sin_addr.s_addr = *(int *)hp->h_addr;
+	rusers_reply((char *)&up, &addr);
+}
+
+void
+allhosts(void)
+{
+	struct utmpidlearr up;
+	enum clnt_stat clnt_stat;
+
+	bzero((char *)&up, sizeof(up));
+	clnt_stat = clnt_broadcast(RUSERSPROG, RUSERSVERS_IDLE,
+	    RUSERSPROC_NAMES, xdr_void, NULL, xdr_utmpidlearr,
+	    &up, rusers_reply);
+	if (clnt_stat != RPC_SUCCESS && clnt_stat != RPC_TIMEDOUT) {
+		fprintf(stderr, "%s: %s\n", argv0, clnt_sperrno(clnt_stat));
+		exit(1);
+	}
+}
+
+void usage(void)
+{
+	fprintf(stderr, "Usage: %s [-la] [hosts ...]\n", argv0);
+	exit(1);
+}
+
+void main(int argc, char *argv[])
+{
+	int ch;
+	extern int optind;
+	
+	if (!(argv0 = rindex(argv[0], '/')))
+		argv0 = argv[0];
+	else
+		argv0++;
+
+
+	while ((ch = getopt(argc, argv, "al")) != -1)
+		switch (ch) {
+		case 'a':
+			allopt++;
+			break;
+		case 'l':
+			longopt++;
+			break;
+		default:
+			usage();
+			/*NOTREACHED*/
+		}
+
+	setlinebuf(stdout);
+	if (argc == optind)
+		allhosts();
+	else {
+		for (; optind < argc; optind++)
+			(void) onehost(argv[optind]);
+	}
+	exit(0);
+}