[unix-history] / usr / src / libexec / rlogind / rlogind.c

/*
 * Copyright (c) 1983 Regents of the University of California.
 * All rights reserved.  The Berkeley software License Agreement
 * specifies the terms and conditions for redistribution.
 */

#ifndef lint
char copyright[] =
"@(#) Copyright (c) 1983 Regents of the University of California.\n\
 All rights reserved.\n";
#endif not lint

#ifndef lint
static char sccsid[] = "@(#)rlogind.c	5.2.1.1 (Berkeley) %G%";
#endif not lint

/*
 * remote login server:
 *	remuser\0
 *	locuser\0
 *	terminal info\0
 *	data
 */

#include <stdio.h>
#include <sys/types.h>
#include <sys/stat.h>
#include <sys/socket.h>
#include <sys/wait.h>
#include <sys/file.h>

#include <netinet/in.h>

#include <errno.h>
#include <pwd.h>
#include <signal.h>
#include <sgtty.h>
#include <stdio.h>
#include <netdb.h>
#include <syslog.h>
#include <strings.h>

extern	errno;
int	reapchild();
struct	passwd *getpwnam();
char	*crypt(), *malloc();

main(argc, argv)
	int argc;
	char **argv;
{
	int on = 1, options = 0, fromlen;
	struct sockaddr_in from;

	fromlen = sizeof (from);
	if (getpeername(0, &from, &fromlen) < 0) {
		fprintf(stderr, "%s: ", argv[0]);
		perror("getpeername");
		_exit(1);
	}
	if (setsockopt(0, SOL_SOCKET, SO_KEEPALIVE, &on, sizeof (on)) < 0) {
		openlog(argv[0], LOG_PID, 0);
		syslog(LOG_WARNING, "setsockopt (SO_KEEPALIVE): %m");
	}
	doit(0, &from);
}

int	child;
int	cleanup();
int	netf;
extern	errno;
char	*line;
extern	char	*inet_ntoa();

doit(f, fromp)
	int f;
	struct sockaddr_in *fromp;
{
	int i, p, t, pid, on = 1;
	register struct hostent *hp;
	struct hostent hostent;
	char c;

	alarm(60);
	read(f, &c, 1);
	if (c != 0)
		exit(1);
	alarm(0);
	fromp->sin_port = ntohs((u_short)fromp->sin_port);
	hp = gethostbyaddr(&fromp->sin_addr, sizeof (struct in_addr),
		fromp->sin_family);
	if (hp == 0) {
		/*
		 * Only the name is used below.
		 */
		hp = &hostent;
		hp->h_name = inet_ntoa(fromp->sin_addr);
	}
	if (fromp->sin_family != AF_INET ||
	    fromp->sin_port >= IPPORT_RESERVED)
		fatal(f, "Permission denied");
	write(f, "", 1);
	for (c = 'p'; c <= 's'; c++) {
		struct stat stb;
		line = "/dev/ptyXX";
		line[strlen("/dev/pty")] = c;
		line[strlen("/dev/ptyp")] = '0';
		if (stat(line, &stb) < 0)
			break;
		for (i = 0; i < 16; i++) {
			line[strlen("/dev/ptyp")] = "0123456789abcdef"[i];
			p = open(line, 2);
			if (p > 0)
				goto gotpty;
		}
	}
	fatal(f, "All network ports in use");
	/*NOTREACHED*/
gotpty:
	netf = f;
	line[strlen("/dev/")] = 't';
#ifdef DEBUG
	{ int tt = open("/dev/tty", 2);
	  if (tt > 0) {
		ioctl(tt, TIOCNOTTY, 0);
		close(tt);
	  }
	}
#endif
	t = open(line, 2);
	if (t < 0)
		fatalperror(f, line, errno);
	{ struct sgttyb b;
	  gtty(t, &b); b.sg_flags = RAW|ANYP; stty(t, &b);
	}
	pid = fork();
	if (pid < 0)
		fatalperror(f, "", errno);
	if (pid == 0) {
		close(f), close(p);
		dup2(t, 0), dup2(t, 1), dup2(t, 2);
		close(t);
		execl("/bin/login", "login", "-r", hp->h_name, 0);
		fatalperror(2, "/bin/login", errno);
		/*NOTREACHED*/
	}
	close(t);
	ioctl(f, FIONBIO, &on);
	ioctl(p, FIONBIO, &on);
	ioctl(p, TIOCPKT, &on);
	signal(SIGTSTP, SIG_IGN);
	signal(SIGCHLD, cleanup);
	setpgrp(0, 0);
	protocol(f, p);
	cleanup();
}

char	magic[2] = { 0377, 0377 };

/*
 * Handle a "control" request (signaled by magic being present)
 * in the data stream.  For now, we are only willing to handle
 * window size changes.
 */
control(pty, cp, n)
	int pty;
	char *cp;
	int n;
{
	struct winsize *wp;

	if (n < 4+sizeof (*wp) || cp[2] != 's' || cp[3] != 's')
		return (0);
	wp = (struct winsize *)(cp+4);
	wp->ws_row = ntohs(wp->ws_row);
	wp->ws_col = ntohs(wp->ws_col);
	wp->ws_xpixel = ntohs(wp->ws_xpixel);
	wp->ws_ypixel = ntohs(wp->ws_ypixel);
	(void)ioctl(pty, TIOCSWINSZ, wp);
	return (4+sizeof (*wp));
}

/*
 * rlogin "protocol" machine.
 */
protocol(f, p)
	int f, p;
{
	char pibuf[1024], fibuf[1024], *pbp, *fbp;
	register pcc = 0, fcc = 0;
	int cc, stop = TIOCPKT_DOSTOP;

	/*
	 * Must ignore SIGTTOU, otherwise we'll stop
	 * when we try and set slave pty's window shape
	 * (our pgrp is that of the master pty).
	 */
	(void) signal(SIGTTOU, SIG_IGN);
	for (;;) {
		int ibits = 0, obits = 0;

		if (fcc)
			obits |= (1<<p);
		else
			ibits |= (1<<f);
		if (pcc >= 0)
			if (pcc)
				obits |= (1<<f);
			else
				ibits |= (1<<p);
		if (select(16, &ibits, &obits, 0, 0) < 0) {
			if (errno == EINTR)
				continue;
			fatalperror(f, "select", errno);
		}
		if (ibits == 0 && obits == 0) {
			/* shouldn't happen... */
			sleep(5);
			continue;
		}
		if (ibits & (1<<f)) {
			fcc = read(f, fibuf, sizeof (fibuf));
			if (fcc < 0 && errno == EWOULDBLOCK)
				fcc = 0;
			else {
				register char *cp;
				int left, n;

				if (fcc <= 0)
					break;
				fbp = fibuf;
			top:
				for (cp = fibuf; cp < fibuf+fcc; cp++)
					if (cp[0] == magic[0] &&
					    cp[1] == magic[1]) {
						left = fcc - (cp-fibuf);
						n = control(p, cp, left);
						if (n) {
							left -= n;
							if (left > 0)
								bcopy(cp, cp+n, left);
							fcc -= n;
							goto top; /* n^2 */
						}
					}
			}
		}
		if (ibits & (1<<p)) {
			pcc = read(p, pibuf, sizeof (pibuf));
			pbp = pibuf;
			if (pcc < 0 && errno == EWOULDBLOCK)
				pcc = 0;
			else if (pcc <= 0)
				break;
			else if (pibuf[0] == 0)
				pbp++, pcc--;
			else {
#define	pkcontrol(c)	((c)&(TIOCPKT_FLUSHWRITE|TIOCPKT_NOSTOP|TIOCPKT_DOSTOP))
				if (pkcontrol(pibuf[0])) {
				/* The following 3 lines do nothing. */
					int nstop = pibuf[0] &
					    (TIOCPKT_NOSTOP|TIOCPKT_DOSTOP);

					if (nstop)
						stop = nstop;
					pibuf[0] |= nstop;
					send(f, &pibuf[0], 1, MSG_OOB);
				}
				pcc = 0;
			}
		}
		if ((obits & (1<<f)) && pcc > 0) {
			cc = write(f, pbp, pcc);
			if (cc < 0 && errno == EWOULDBLOCK) {
				/* also shouldn't happen */
				sleep(5);
				continue;
			}
			if (cc > 0) {
				pcc -= cc;
				pbp += cc;
			}
		}
		if ((obits & (1<<p)) && fcc > 0) {
			cc = write(p, fbp, fcc);
			if (cc > 0) {
				fcc -= cc;
				fbp += cc;
			}
		}
	}
}

cleanup()
{

	rmut();
	vhangup();		/* XXX */
	shutdown(netf, 2);
	kill(0, SIGKILL);
	exit(1);
}

fatal(f, msg)
	int f;
	char *msg;
{
	char buf[BUFSIZ];

	buf[0] = '\01';		/* error indicator */
	(void) sprintf(buf + 1, "rlogind: %s.\r\n", msg);
	(void) write(f, buf, strlen(buf));
	exit(1);
}

fatalperror(f, msg, errno)
	int f;
	char *msg;
	int errno;
{
	char buf[BUFSIZ];
	extern int sys_nerr;
	extern char *sys_errlist[];

	if ((unsigned)errno < sys_nerr)
		(void) sprintf(buf, "%s: %s", msg, sys_errlist[errno]);
	else
		(void) sprintf(buf, "%s: Error %d", msg, errno);
	fatal(f, buf);
}

#include <utmp.h>

struct	utmp wtmp;
char	wtmpf[]	= "/usr/adm/wtmp";
char	utmpf[] = "/etc/utmp";
#define SCPYN(a, b)	strncpy(a, b, sizeof(a))
#define SCMPN(a, b)	strncmp(a, b, sizeof(a))

rmut()
{
	register f;
	int found = 0;
	struct utmp *u, *utmp;
	int nutmp;
	struct stat statbf;

	f = open(utmpf, O_RDWR);
	if (f >= 0) {
		fstat(f, &statbf);
		utmp = (struct utmp *)malloc(statbf.st_size);
		if (!utmp)
			syslog(LOG_ERR, "utmp malloc failed");
		if (statbf.st_size && utmp) {
			nutmp = read(f, utmp, statbf.st_size);
			nutmp /= sizeof(struct utmp);
		
			for (u = utmp ; u < &utmp[nutmp] ; u++) {
				if (SCMPN(u->ut_line, line+5) ||
				    u->ut_name[0]==0)
					continue;
				lseek(f, ((long)u)-((long)utmp), L_SET);
				SCPYN(u->ut_name, "");
				SCPYN(u->ut_host, "");
				time(&u->ut_time);
				write(f, (char *)u, sizeof(wtmp));
				found++;
			}
		}
		close(f);
	}
	if (found) {
		f = open(wtmpf, O_WRONLY|O_APPEND);
		if (f >= 0) {
			SCPYN(wtmp.ut_line, line+5);
			SCPYN(wtmp.ut_name, "");
			SCPYN(wtmp.ut_host, "");
			time(&wtmp.ut_time);
			write(f, (char *)&wtmp, sizeof(wtmp));
			close(f);
		}
	}
	chmod(line, 0666);
	chown(line, 0, 0);
	line[strlen("/dev/")] = 'p';
	chmod(line, 0666);
	chown(line, 0, 0);
}
Commit	Line	Data
8c5eec2f DF	1	/*
	2	* Copyright (c) 1983 Regents of the University of California.
	3	* All rights reserved. The Berkeley software License Agreement
	4	* specifies the terms and conditions for redistribution.
	5	*/
	6
	7	#ifndef lint
	8	char copyright[] =
	9	"@(#) Copyright (c) 1983 Regents of the University of California.\n\
	10	All rights reserved.\n";
	11	#endif not lint
	12
a10a364d	13	#ifndef lint
551b317a	14	static char sccsid[] = "@(#)rlogind.c 5.2.1.1 (Berkeley) %G%";
8c5eec2f	15	#endif not lint
a10a364d	16
bb933cc2 MK	17	/*
	18	* remote login server:
	19	* remuser\0
	20	* locuser\0
6632767b	21	* terminal info\0
bb933cc2 MK	22	* data
	23	*/
	24
a10a364d BJ	25	#include <stdio.h>
	26	#include <sys/types.h>
	27	#include <sys/stat.h>
	28	#include <sys/socket.h>
560a8855	29	#include <sys/wait.h>
6632767b	30	#include <sys/file.h>
c6c678f1 SL	31
	32	#include <netinet/in.h>
	33
a10a364d BJ	34	#include <errno.h>
a10a364d BJ	35	#include <pwd.h>
a10a364d BJ	36	#include <signal.h>
	37	#include <sgtty.h>
	38	#include <stdio.h>
3f5b52bc	39	#include <netdb.h>
3f99c0f7	40	#include <syslog.h>
6632767b	41	#include <strings.h>
a10a364d BJ	42
a10a364d BJ	43	extern errno;
92e31018	44	int reapchild();
a10a364d	45	struct passwd *getpwnam();
6632767b	46	char crypt(), malloc();
bb933cc2	47
a10a364d BJ	48	main(argc, argv)
	49	int argc;
	50	char **argv;
	51	{
bcb894cb	52	int on = 1, options = 0, fromlen;
a10a364d BJ	53	struct sockaddr_in from;
a10a364d BJ	54
bb933cc2 MK	55	fromlen = sizeof (from);
	56	if (getpeername(0, &from, &fromlen) < 0) {
	57	fprintf(stderr, "%s: ", argv[0]);
	58	perror("getpeername");
	59	_exit(1);
92e31018	60	}
bcb894cb	61	if (setsockopt(0, SOL_SOCKET, SO_KEEPALIVE, &on, sizeof (on)) < 0) {
3f99c0f7 RC	62	openlog(argv[0], LOG_PID, 0);
3f99c0f7 RC	63	syslog(LOG_WARNING, "setsockopt (SO_KEEPALIVE): %m");
c6c678f1	64	}
bb933cc2	65	doit(0, &from);
92e31018 SL	66	}
92e31018 SL	67
a10a364d BJ	68	int child;
	69	int cleanup();
	70	int netf;
	71	extern errno;
	72	char *line;
43368533	73	extern char *inet_ntoa();
a10a364d BJ	74
	75	doit(f, fromp)
	76	int f;
	77	struct sockaddr_in *fromp;
	78	{
6632767b	79	int i, p, t, pid, on = 1;
3f5b52bc	80	register struct hostent *hp;
43368533	81	struct hostent hostent;
6632767b	82	char c;
a10a364d BJ	83
	84	alarm(60);
	85	read(f, &c, 1);
	86	if (c != 0)
	87	exit(1);
	88	alarm(0);
1227078b	89	fromp->sin_port = ntohs((u_short)fromp->sin_port);
3f5b52bc SL	90	hp = gethostbyaddr(&fromp->sin_addr, sizeof (struct in_addr),
3f5b52bc SL	91	fromp->sin_family);
8de87e4f	92	if (hp == 0) {
43368533 KM	93	/*
	94	* Only the name is used below.
	95	*/
	96	hp = &hostent;
	97	hp->h_name = inet_ntoa(fromp->sin_addr);
8de87e4f	98	}
a10a364d	99	if (fromp->sin_family != AF_INET \|\|
1227078b	100	fromp->sin_port >= IPPORT_RESERVED)
82c973f2	101	fatal(f, "Permission denied");
a10a364d BJ	102	write(f, "", 1);
	103	for (c = 'p'; c <= 's'; c++) {
	104	struct stat stb;
	105	line = "/dev/ptyXX";
	106	line[strlen("/dev/pty")] = c;
	107	line[strlen("/dev/ptyp")] = '0';
	108	if (stat(line, &stb) < 0)
	109	break;
	110	for (i = 0; i < 16; i++) {
	111	line[strlen("/dev/ptyp")] = "0123456789abcdef"[i];
	112	p = open(line, 2);
	113	if (p > 0)
	114	goto gotpty;
	115	}
	116	}
82c973f2 SL	117	fatal(f, "All network ports in use");
82c973f2 SL	118	/NOTREACHED/
a10a364d	119	gotpty:
1227078b	120	netf = f;
a10a364d BJ	121	line[strlen("/dev/")] = 't';
	122	#ifdef DEBUG
	123	{ int tt = open("/dev/tty", 2);
	124	if (tt > 0) {
	125	ioctl(tt, TIOCNOTTY, 0);
	126	close(tt);
	127	}
	128	}
	129	#endif
	130	t = open(line, 2);
82c973f2 SL	131	if (t < 0)
82c973f2 SL	132	fatalperror(f, line, errno);
a10a364d BJ	133	{ struct sgttyb b;
	134	gtty(t, &b); b.sg_flags = RAW\|ANYP; stty(t, &b);
	135	}
82c973f2 SL	136	pid = fork();
	137	if (pid < 0)
	138	fatalperror(f, "", errno);
6632767b SL	139	if (pid == 0) {
	140	close(f), close(p);
	141	dup2(t, 0), dup2(t, 1), dup2(t, 2);
1227078b	142	close(t);
6632767b SL	143	execl("/bin/login", "login", "-r", hp->h_name, 0);
	144	fatalperror(2, "/bin/login", errno);
	145	/NOTREACHED/
	146	}
	147	close(t);
	148	ioctl(f, FIONBIO, &on);
	149	ioctl(p, FIONBIO, &on);
	150	ioctl(p, TIOCPKT, &on);
	151	signal(SIGTSTP, SIG_IGN);
	152	signal(SIGCHLD, cleanup);
ad5d2c7f	153	setpgrp(0, 0);
6632767b SL	154	protocol(f, p);
	155	cleanup();
	156	}
82c973f2	157
6632767b SL	158	char magic[2] = { 0377, 0377 };
	159
	160	/*
	161	* Handle a "control" request (signaled by magic being present)
	162	* in the data stream. For now, we are only willing to handle
	163	* window size changes.
	164	*/
	165	control(pty, cp, n)
	166	int pty;
	167	char *cp;
	168	int n;
	169	{
	170	struct winsize *wp;
	171
	172	if (n < 4+sizeof (*wp) \|\| cp[2] != 's' \|\| cp[3] != 's')
	173	return (0);
	174	wp = (struct winsize *)(cp+4);
	175	wp->ws_row = ntohs(wp->ws_row);
	176	wp->ws_col = ntohs(wp->ws_col);
	177	wp->ws_xpixel = ntohs(wp->ws_xpixel);
	178	wp->ws_ypixel = ntohs(wp->ws_ypixel);
	179	(void)ioctl(pty, TIOCSWINSZ, wp);
	180	return (4+sizeof (*wp));
	181	}
	182
	183	/*
	184	* rlogin "protocol" machine.
	185	*/
	186	protocol(f, p)
	187	int f, p;
	188	{
	189	char pibuf[1024], fibuf[1024], pbp, fbp;
	190	register pcc = 0, fcc = 0;
	191	int cc, stop = TIOCPKT_DOSTOP;
	192
ffaf1c0b	193	/*
9ee4d121 SL	194	* Must ignore SIGTTOU, otherwise we'll stop
	195	* when we try and set slave pty's window shape
	196	* (our pgrp is that of the master pty).
ffaf1c0b	197	*/
9ee4d121	198	(void) signal(SIGTTOU, SIG_IGN);
6632767b SL	199	for (;;) {
	200	int ibits = 0, obits = 0;
	201
	202	if (fcc)
	203	obits \|= (1<<p);
	204	else
	205	ibits \|= (1<<f);
	206	if (pcc >= 0)
	207	if (pcc)
	208	obits \|= (1<<f);
82c973f2	209	else
6632767b SL	210	ibits \|= (1<<p);
	211	if (select(16, &ibits, &obits, 0, 0) < 0) {
	212	if (errno == EINTR)
a10a364d	213	continue;
6632767b SL	214	fatalperror(f, "select", errno);
	215	}
	216	if (ibits == 0 && obits == 0) {
	217	/* shouldn't happen... */
	218	sleep(5);
	219	continue;
	220	}
	221	if (ibits & (1<<f)) {
	222	fcc = read(f, fibuf, sizeof (fibuf));
	223	if (fcc < 0 && errno == EWOULDBLOCK)
	224	fcc = 0;
	225	else {
	226	register char *cp;
	227	int left, n;
	228
	229	if (fcc <= 0)
1227078b	230	break;
6632767b SL	231	fbp = fibuf;
	232	top:
	233	for (cp = fibuf; cp < fibuf+fcc; cp++)
	234	if (cp[0] == magic[0] &&
	235	cp[1] == magic[1]) {
	236	left = fcc - (cp-fibuf);
	237	n = control(p, cp, left);
	238	if (n) {
	239	left -= n;
	240	if (left > 0)
	241	bcopy(cp, cp+n, left);
	242	fcc -= n;
	243	goto top; /* n^2 */
	244	}
a10a364d	245	}
a10a364d	246	}
6632767b SL	247	}
	248	if (ibits & (1<<p)) {
	249	pcc = read(p, pibuf, sizeof (pibuf));
	250	pbp = pibuf;
	251	if (pcc < 0 && errno == EWOULDBLOCK)
	252	pcc = 0;
	253	else if (pcc <= 0)
	254	break;
	255	else if (pibuf[0] == 0)
	256	pbp++, pcc--;
	257	else {
	258	#define pkcontrol(c) ((c)&(TIOCPKT_FLUSHWRITE\|TIOCPKT_NOSTOP\|TIOCPKT_DOSTOP))
	259	if (pkcontrol(pibuf[0])) {
	260	/* The following 3 lines do nothing. */
	261	int nstop = pibuf[0] &
	262	(TIOCPKT_NOSTOP\|TIOCPKT_DOSTOP);
	263
	264	if (nstop)
	265	stop = nstop;
	266	pibuf[0] \|= nstop;
	267	send(f, &pibuf[0], 1, MSG_OOB);
a10a364d	268	}
6632767b	269	pcc = 0;
a10a364d	270	}
6632767b SL	271	}
	272	if ((obits & (1<<f)) && pcc > 0) {
	273	cc = write(f, pbp, pcc);
	274	if (cc < 0 && errno == EWOULDBLOCK) {
	275	/* also shouldn't happen */
	276	sleep(5);
	277	continue;
	278	}
	279	if (cc > 0) {
	280	pcc -= cc;
	281	pbp += cc;
	282	}
	283	}
	284	if ((obits & (1<<p)) && fcc > 0) {
	285	cc = write(p, fbp, fcc);
	286	if (cc > 0) {
	287	fcc -= cc;
	288	fbp += cc;
a10a364d BJ	289	}
a10a364d BJ	290	}
a10a364d	291	}
a10a364d BJ	292	}
	293
	294	cleanup()
	295	{
a10a364d BJ	296
a10a364d BJ	297	rmut();
dd83e8ac	298	vhangup(); /* XXX */
ff24c640	299	shutdown(netf, 2);
a10a364d BJ	300	kill(0, SIGKILL);
	301	exit(1);
	302	}
	303
82c973f2 SL	304	fatal(f, msg)
	305	int f;
	306	char *msg;
	307	{
	308	char buf[BUFSIZ];
	309
	310	buf[0] = '\01'; /* error indicator */
560a8855	311	(void) sprintf(buf + 1, "rlogind: %s.\r\n", msg);
82c973f2 SL	312	(void) write(f, buf, strlen(buf));
	313	exit(1);
	314	}
	315
	316	fatalperror(f, msg, errno)
	317	int f;
	318	char *msg;
	319	int errno;
	320	{
	321	char buf[BUFSIZ];
1227078b	322	extern int sys_nerr;
82c973f2 SL	323	extern char *sys_errlist[];
82c973f2 SL	324
6632767b	325	if ((unsigned)errno < sys_nerr)
1227078b MK	326	(void) sprintf(buf, "%s: %s", msg, sys_errlist[errno]);
	327	else
	328	(void) sprintf(buf, "%s: Error %d", msg, errno);
82c973f2 SL	329	fatal(f, buf);
	330	}
	331
a10a364d BJ	332	#include <utmp.h>
	333
	334	struct utmp wtmp;
	335	char wtmpf[] = "/usr/adm/wtmp";
0675fdb1	336	char utmpf[] = "/etc/utmp";
a10a364d BJ	337	#define SCPYN(a, b) strncpy(a, b, sizeof(a))
	338	#define SCMPN(a, b) strncmp(a, b, sizeof(a))
	339
	340	rmut()
	341	{
	342	register f;
	343	int found = 0;
0675fdb1 JB	344	struct utmp u, utmp;
	345	int nutmp;
	346	struct stat statbf;
a10a364d	347
0675fdb1	348	f = open(utmpf, O_RDWR);
a10a364d	349	if (f >= 0) {
0675fdb1 JB	350	fstat(f, &statbf);
	351	utmp = (struct utmp *)malloc(statbf.st_size);
	352	if (!utmp)
	353	syslog(LOG_ERR, "utmp malloc failed");
	354	if (statbf.st_size && utmp) {
	355	nutmp = read(f, utmp, statbf.st_size);
	356	nutmp /= sizeof(struct utmp);
	357
	358	for (u = utmp ; u < &utmp[nutmp] ; u++) {
	359	if (SCMPN(u->ut_line, line+5) \|\|
	360	u->ut_name[0]==0)
	361	continue;
	362	lseek(f, ((long)u)-((long)utmp), L_SET);
	363	SCPYN(u->ut_name, "");
	364	SCPYN(u->ut_host, "");
	365	time(&u->ut_time);
	366	write(f, (char *)u, sizeof(wtmp));
	367	found++;
	368	}
a10a364d BJ	369	}
	370	close(f);
	371	}
	372	if (found) {
0675fdb1	373	f = open(wtmpf, O_WRONLY\|O_APPEND);
a10a364d BJ	374	if (f >= 0) {
	375	SCPYN(wtmp.ut_line, line+5);
	376	SCPYN(wtmp.ut_name, "");
9b3ee53c	377	SCPYN(wtmp.ut_host, "");
a10a364d	378	time(&wtmp.ut_time);
a10a364d BJ	379	write(f, (char *)&wtmp, sizeof(wtmp));
	380	close(f);
	381	}
	382	}
	383	chmod(line, 0666);
	384	chown(line, 0, 0);
	385	line[strlen("/dev/")] = 'p';
	386	chmod(line, 0666);
	387	chown(line, 0, 0);
	388	}