BSD 4_3 release

[unix-history] / usr / src / usr.bin / uucp / versys.c

diff --git a/usr/src/usr.bin/uucp/versys.c b/usr/src/usr.bin/uucp/versys.c
index 9e373d1..084b3f3 100644 (file)
--- a/usr/src/usr.bin/uucp/versys.c
+++ b/usr/src/usr.bin/uucp/versys.c
@@ -1,50 +1,114 @@
-static char sccsid[] = "@(#)versys.c   4.1     (Berkeley)      9/11/82";
+#ifndef lint
+static char sccsid[] = "@(#)versys.c   5.5 (Berkeley) 10/9/85";
+#endif

 
 #include "uucp.h"
 
 #include "uucp.h"

+#include <stdio.h>
+#include <ctype.h>

 
 

+/*LINTLIBRARY*/

 
 

-#define SNAMESIZE 7
+char PhoneNumber[MAXPH];

 
 

-/*******
- *     versys(name)    verify system names n1 and n2
- *     char *name;
+/*
+ *     verify system names n1 and n2
+ *     return codes:  SUCCESS  |  FAIL

  *
  *

- *     return codes:  0  |  FAIL
+ *     NOTE:
+ *             the old calling sequence was versys(name) but is
+ *     now versys(&name) so that we can perform aliasing!!!!
+ *     See accompanying changes in uucp.c and uux.c
+ *             -- Ray Essick, April 27, 1984
+ */
+versys(nameptr)
+register char **nameptr;
+{
+       register FILE *fp;
+       char line[BUFSIZ];
+       char *name;
+
+       DEBUG (11, "Before Alias: %s\n", *nameptr);
+       uualias (nameptr);                      /* alias expansion */
+       DEBUG (11, "After Alias: %s\n", *nameptr);
+       name = *nameptr;                        /* dereference */
+
+       if (strncmp(name, Myname, MAXBASENAME) == 0)
+               return SUCCESS;
+
+       fp = fopen(SYSFILE, "r");
+       ASSERT(fp != NULL, CANTOPEN, SYSFILE, 0);
+       PhoneNumber[0] = '\0';
+       while (cfgets(line, sizeof(line), fp) != NULL) {
+               char *targs[100];
+
+               getargs(line, targs, 100);
+               if (strncmp(name, targs[0], MAXBASENAME) == SAME) {
+                       fclose(fp);
+                       strncpy(PhoneNumber, targs[F_PHONE], MAXPH);
+                       return SUCCESS;
+               }
+       }
+       fclose(fp);
+       return FAIL;
+}
+
+/*
+ *     Works (sort of) like rhost(3) on 4.1[abc] Bsd systems.
+ *
+ *     Looks for the host in the L.aliases file and returns the
+ *     "standard" name by modifying the pointer. The returned
+ *     value is saved with malloc(3) so it isn't zapped by
+ *     subsequent calls.
+ *
+ *     Returns:
+ *             FAIL            No L.aliases file
+ *             SUCCESS         Anything else

  */
 
  */
 

-versys(name)
-char *name;
+uualias(hostptr)
+char  **hostptr;                         /* we change it */

 {
 {

-       FILE *fp;
-       char **fnp;
-       char line[300];
-       char s1[SNAMESIZE + 1];
-       char myname[SNAMESIZE + 1];
-       char *index();
-       char *cp;
-
-       sprintf(myname, "%.7s", Myname);
-       sprintf(s1, "%.7s", name);
-       if (strcmp(s1, myname) == 0)
-               return(0);
-       for (fnp = Sysfiles; *fnp != NULL; fnp++) {
-               fp = fopen(*fnp, "r");
-               if (fp == NULL)
-                       continue;
-       
-               while (fgets(line, 300, fp) != NULL) {
-                       cp = index(line, ' ');
-                       if (cp == 0)
-                               continue;
-                       *cp = '\0';
-                       line[7] = '\0';
-                       if (strcmp(s1, line) == SAME) {
-                               fclose(fp);
-                               return(0);
-                       }
+       FILE *Aliases;                    /* list of aliases */
+       char buf[BUFSIZ];
+       int atend;
+       char *p, *q;
+       char *koshername;                /* "official" name */

 
 

+       if ((Aliases = fopen(ALIASFILE, "r")) == NULL) {
+               DEBUG(11, "No %s file\n", ALIASFILE);
+               return FAIL;                      /* no alias file */
+       }
+
+       DEBUG (11, "Alias expansion for %s\n", *hostptr);
+       while (cfgets(buf, sizeof (buf), Aliases)) {
+               p = &buf[0];
+               atend = 0;
+               DEBUG(11, "Alias line: %s\n", buf);
+
+               while (!atend) {
+                       while (isspace(*p) && *p != '\n')
+                               p++;                      /* skip white space */
+                       q = p;
+                       while (!isspace(*q) && *q != '\n')
+                               q++;                      /* find end */
+                       if (*q == '\n')
+                               atend++;                  /* last entry */
+                       *q = '\0';
+                       DEBUG(11, "Compare against: %s\n", p);
+                       if (strcmp(*hostptr, p) == 0)/* match? */ {
+                               koshername = malloc((unsigned)strlen(buf) + 1);
+                               strcpy(koshername, buf); /* save it */
+                               fclose(Aliases);
+                               DEBUG(4, "Alias: %s to ", *hostptr);
+                               DEBUG(4, "%s\n", koshername);
+                               *hostptr = koshername;    /* correct one */
+                               return SUCCESS;           /* all is well */
+                       }
+                       p = q + 1;                        /* try next entry */

                }
                }

-               fclose(fp);
+

        }
        }

-       return(FAIL);
+       fclose(Aliases);
+       DEBUG(11, "Alias doesn't match %s, remains unchanged\n", *hostptr);
+       return SUCCESS;                           /* unchanged host */

 }
 }