17c478bdstevel@tonic-gate/*
27c478bdstevel@tonic-gate * CDDL HEADER START
37c478bdstevel@tonic-gate *
47c478bdstevel@tonic-gate * The contents of this file are subject to the terms of the
57c478bdstevel@tonic-gate * Common Development and Distribution License, Version 1.0 only
67c478bdstevel@tonic-gate * (the "License").  You may not use this file except in compliance
77c478bdstevel@tonic-gate * with the License.
87c478bdstevel@tonic-gate *
97c478bdstevel@tonic-gate * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
107c478bdstevel@tonic-gate * or http://www.opensolaris.org/os/licensing.
117c478bdstevel@tonic-gate * See the License for the specific language governing permissions
127c478bdstevel@tonic-gate * and limitations under the License.
137c478bdstevel@tonic-gate *
147c478bdstevel@tonic-gate * When distributing Covered Code, include this CDDL HEADER in each
157c478bdstevel@tonic-gate * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
167c478bdstevel@tonic-gate * If applicable, add the following below this CDDL HEADER, with the
177c478bdstevel@tonic-gate * fields enclosed by brackets "[]" replaced with your own identifying
187c478bdstevel@tonic-gate * information: Portions Copyright [yyyy] [name of copyright owner]
197c478bdstevel@tonic-gate *
207c478bdstevel@tonic-gate * CDDL HEADER END
217c478bdstevel@tonic-gate */
227c478bdstevel@tonic-gate/*
23740638cbw * Copyright 2005 Sun Microsystems, Inc.  All rights reserved.
247c478bdstevel@tonic-gate * Use is subject to license terms.
257c478bdstevel@tonic-gate */
267c478bdstevel@tonic-gate
277c478bdstevel@tonic-gate/*	Copyright (c) 1983, 1984, 1985, 1986, 1987, 1988, 1989 AT&T	*/
287c478bdstevel@tonic-gate/*	  All Rights Reserved  	*/
297c478bdstevel@tonic-gate
307c478bdstevel@tonic-gate/*
317c478bdstevel@tonic-gate * Portions of this source code were derived from Berkeley 4.3 BSD
327c478bdstevel@tonic-gate * under license from the Regents of the University of California.
337c478bdstevel@tonic-gate */
347c478bdstevel@tonic-gate
357c478bdstevel@tonic-gate#pragma ident	"%Z%%M%	%I%	%E% SMI"
367c478bdstevel@tonic-gate
377c478bdstevel@tonic-gate/*
387c478bdstevel@tonic-gate * Finger server.
397c478bdstevel@tonic-gate */
407c478bdstevel@tonic-gate#include <sys/types.h>
417c478bdstevel@tonic-gate#include <netinet/in.h>
427c478bdstevel@tonic-gate#include <sys/socket.h>
437c478bdstevel@tonic-gate#include <stdio.h>
447c478bdstevel@tonic-gate#include <ctype.h>
457c478bdstevel@tonic-gate
467c478bdstevel@tonic-gate#define	MAXARGS 10
477c478bdstevel@tonic-gate
48740638cbwvoid fatal(char *prog, char *s);
49740638cbw
50740638cbwint
517c478bdstevel@tonic-gatemain(argc, argv)
52740638cbw	int argc;
537c478bdstevel@tonic-gate	char *argv[];
547c478bdstevel@tonic-gate{
557c478bdstevel@tonic-gate	register char *sp;
567c478bdstevel@tonic-gate	char line[512];
577c478bdstevel@tonic-gate	struct sockaddr_storage sin;
587c478bdstevel@tonic-gate	pid_t pid, w;
597c478bdstevel@tonic-gate	int i, p[2], status;
607c478bdstevel@tonic-gate	FILE *fp;
617c478bdstevel@tonic-gate	char *av[MAXARGS + 1];
627c478bdstevel@tonic-gate
637c478bdstevel@tonic-gate	i = sizeof (sin);
647c478bdstevel@tonic-gate	if (getpeername(0, (struct sockaddr *)&sin, &i) < 0)
657c478bdstevel@tonic-gate		fatal(argv[0], "getpeername");
667c478bdstevel@tonic-gate	line[0] = '\0';
677c478bdstevel@tonic-gate	if (fgets(line, sizeof (line), stdin) == NULL)
687c478bdstevel@tonic-gate		exit(1);
697c478bdstevel@tonic-gate	sp = line;
707c478bdstevel@tonic-gate	av[0] = "finger";
717c478bdstevel@tonic-gate	i = 1;
727c478bdstevel@tonic-gate
737c478bdstevel@tonic-gate	/* skip past leading white space */
747c478bdstevel@tonic-gate	while (isspace(*sp))
757c478bdstevel@tonic-gate		sp++;
767c478bdstevel@tonic-gate
777c478bdstevel@tonic-gate	/*
787c478bdstevel@tonic-gate	 * The finger protocol says a "/W" switch means verbose output.
797c478bdstevel@tonic-gate	 * We explicitly set either the "long" or "short" output flags
807c478bdstevel@tonic-gate	 * to the finger program so that we don't have to know what what
817c478bdstevel@tonic-gate	 * the "finger" program's default is.
827c478bdstevel@tonic-gate	 */
837c478bdstevel@tonic-gate	if (*sp == '/' && (sp[1] == 'W' || sp[1] == 'w')) {
847c478bdstevel@tonic-gate		sp += 2;
857c478bdstevel@tonic-gate		av[i++] = "-l";
867c478bdstevel@tonic-gate	} else {
877c478bdstevel@tonic-gate		av[i++] = "-s";
887c478bdstevel@tonic-gate	}
897c478bdstevel@tonic-gate
907c478bdstevel@tonic-gate	/* look for username arguments */
917c478bdstevel@tonic-gate	while (i < MAXARGS) {
927c478bdstevel@tonic-gate
937c478bdstevel@tonic-gate		/* skip over leading white space */
947c478bdstevel@tonic-gate		while (isspace(*sp))
957c478bdstevel@tonic-gate			sp++;
967c478bdstevel@tonic-gate
977c478bdstevel@tonic-gate		/* check for end of "command line" */
987c478bdstevel@tonic-gate		if (*sp == '\0')
997c478bdstevel@tonic-gate			break;
1007c478bdstevel@tonic-gate
1017c478bdstevel@tonic-gate		/* pick up another name argument */
1027c478bdstevel@tonic-gate		av[i++] = sp;
1037c478bdstevel@tonic-gate		while ((*sp != '\0') && !isspace(*sp))
1047c478bdstevel@tonic-gate			sp++;
1057c478bdstevel@tonic-gate
1067c478bdstevel@tonic-gate		/* check again for end of "command line" */
1077c478bdstevel@tonic-gate		if (*sp == '\0')
1087c478bdstevel@tonic-gate			break;
1097c478bdstevel@tonic-gate		else
1107c478bdstevel@tonic-gate			*sp++ = '\0';
1117c478bdstevel@tonic-gate	}
1127c478bdstevel@tonic-gate
1137c478bdstevel@tonic-gate	av[i] = (char *)0;
1147c478bdstevel@tonic-gate	if (pipe(p) < 0)
1157c478bdstevel@tonic-gate		fatal(argv[0], "pipe");
1167c478bdstevel@tonic-gate
1177c478bdstevel@tonic-gate	if ((pid = fork()) == 0) {
1187c478bdstevel@tonic-gate		close(p[0]);
1197c478bdstevel@tonic-gate		if (p[1] != 1) {
1207c478bdstevel@tonic-gate			dup2(p[1], 1);
1217c478bdstevel@tonic-gate			close(p[1]);
1227c478bdstevel@tonic-gate		}
1237c478bdstevel@tonic-gate		execv("/usr/bin/finger", av);
1247c478bdstevel@tonic-gate		printf("No local finger program found\n");
1257c478bdstevel@tonic-gate		fflush(stdout);
1267c478bdstevel@tonic-gate		_exit(1);
1277c478bdstevel@tonic-gate	}
1287c478bdstevel@tonic-gate	if (pid == (pid_t)-1)
1297c478bdstevel@tonic-gate		fatal(argv[0], "fork");
1307c478bdstevel@tonic-gate	close(p[1]);
1317c478bdstevel@tonic-gate	if ((fp = fdopen(p[0], "r")) == NULL)
1327c478bdstevel@tonic-gate		fatal(argv[0], "fdopen");
1337c478bdstevel@tonic-gate	while ((i = getc(fp)) != EOF) {
1347c478bdstevel@tonic-gate		if (i == '\n')
1357c478bdstevel@tonic-gate			putchar('\r');
1367c478bdstevel@tonic-gate		putchar(i);
1377c478bdstevel@tonic-gate	}
1387c478bdstevel@tonic-gate	fclose(fp);
1397c478bdstevel@tonic-gate	while ((w = wait(&status)) != pid && w != (pid_t)-1)
1407c478bdstevel@tonic-gate		;
1417c478bdstevel@tonic-gate	return (0);
1427c478bdstevel@tonic-gate}
1437c478bdstevel@tonic-gate
144740638cbwvoid
1457c478bdstevel@tonic-gatefatal(prog, s)
1467c478bdstevel@tonic-gate	char *prog, *s;
1477c478bdstevel@tonic-gate{
1487c478bdstevel@tonic-gate
1497c478bdstevel@tonic-gate	fprintf(stderr, "%s: ", prog);
1507c478bdstevel@tonic-gate	perror(s);
1517c478bdstevel@tonic-gate	exit(1);
1527c478bdstevel@tonic-gate}
153