BSD 4_3_Reno release

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

diff --git a/usr/src/libexec/fingerd/fingerd.c b/usr/src/libexec/fingerd/fingerd.c
index a717bef..e966e30 100644 (file)
--- a/usr/src/libexec/fingerd/fingerd.c
+++ b/usr/src/libexec/fingerd/fingerd.c
@@ -1,58 +1,102 @@
-#ifndef lint
-static char sccsid[] = "@(#)fingerd.c  1.1 (Berkeley) %G%";
-#endif
-

 /*
 /*

- * Finger server.
+ * Copyright (c) 1983 The Regents of the University of California.
+ * All rights reserved.
+ *
+ * Redistribution and use in source and binary forms are permitted
+ * provided that: (1) source distributions retain this entire copyright
+ * notice and comment, and (2) distributions including binaries display
+ * the following acknowledgement:  ``This product includes software
+ * developed by the University of California, Berkeley and its contributors''
+ * in the documentation or other materials provided with the distribution
+ * and in all advertising materials mentioning features or use of this
+ * software. 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 ``AS IS'' AND WITHOUT ANY EXPRESS OR
+ * IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED
+ * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.

  */
  */

-#include <sys/types.h>
-#include <netinet/in.h>
+
+#ifndef lint
+char copyright[] =
+"@(#) Copyright (c) 1983 The Regents of the University of California.\n\
+ All rights reserved.\n";
+#endif /* not lint */
+
+#ifndef lint
+static char sccsid[] = "@(#)fingerd.c  5.6 (Berkeley) 6/1/90";
+#endif /* not lint */

 
 #include <stdio.h>
 
 #include <stdio.h>

-#include <ctype.h>
+#include "pathnames.h"

 
 

-main(argc, argv)
-       char *argv[];
+main()

 {
 {

-       register char **fargp;
-       register char *cp;
-       char *fargv[80], line[512];
+       register FILE *fp;
+       register int ch;
+       register char *lp;
+       int p[2];
+#define        ENTRIES 50
+       char **ap, *av[ENTRIES + 1], line[1024], *strtok();
+
+#ifdef LOGGING                                 /* unused for now */
+#include <netinet/in.h>

        struct sockaddr_in sin;
        struct sockaddr_in sin;

-       int i;
-
-       i = sizeof (sin);
-       if (getpeername(0, &sin, &i) < 0)
-               fatal(argv[0], "getpeername");
-       line[0] = '\0';
-       gets(line);
-       fargp = fargv;
-       *fargp++ = "finger";
-       cp = line;
-       while (1) {
-               while (isspace(*cp))
-                       cp++;
-               if (!*cp)
+       int sval;
+
+       sval = sizeof(sin);
+       if (getpeername(0, &sin, &sval) < 0)
+               fatal("getpeername");
+#endif
+
+       if (!fgets(line, sizeof(line), stdin))
+               exit(1);
+
+       av[0] = "finger";
+       for (lp = line, ap = &av[1];;) {
+               *ap = strtok(lp, " \t\r\n");
+               if (!*ap)
+                       break;
+               /* RFC742: "/[Ww]" == "-l" */
+               if ((*ap)[0] == '/' && ((*ap)[1] == 'W' || (*ap)[1] == 'w'))
+                       *ap = "-l";
+               if (++ap == av + ENTRIES)

                        break;
                        break;

-               *fargp++ = cp;
-               if (*cp == '/' && (cp[1] == 'W' || cp[1] == 'w')) {
-                       *cp++ = '-';
-                       *cp++ = 'l';
+               lp = NULL;
+       }
+
+       if (pipe(p) < 0)
+               fatal("pipe");
+
+       switch(fork()) {
+       case 0:
+               (void)close(p[0]);
+               if (p[1] != 1) {
+                       (void)dup2(p[1], 1);
+                       (void)close(p[1]);

                }
                }

-               while (!isspace(*cp))
-                       cp++;
-               *cp++ = '\0';
+               execv(_PATH_FINGER, av);
+               _exit(1);
+       case -1:
+               fatal("fork");
+       }
+       (void)close(p[1]);
+       if (!(fp = fdopen(p[0], "r")))
+               fatal("fdopen");
+       while ((ch = getc(fp)) != EOF) {
+               if (ch == '\n')
+                       putchar('\r');
+               putchar(ch);

        }
        }

-       *fargp = NULL;
-       execv("/usr/ucb/finger", fargv);
-       execvp("finger", fargv);
-       fatal(argv[0], "/usr/ucb/finger");
+       exit(0);

 }
 
 }
 

-fatal(prog, s)
-       char *prog, *s;
+fatal(msg)
+       char *msg;

 {
 {

+       extern int errno;
+       char *strerror();

 
 

-       fprintf(stderr, "%s: ", prog);
-       perror(s);
+       fprintf(stderr, "fingerd: %s: %s\r\n", msg, strerror(errno));

        exit(1);
 }
        exit(1);
 }