Return to versys.c CVS log

Up to [CSRG BSD Unix] / 41BSD / cmd / uucp

Annotation of 41BSD/cmd/uucp/versys.c, revision 1.1.1.1

1.1       root        1: #include "uucp.h"
                      2: 
                      3: 
                      4: #define SNAMESIZE 7
                      5: 
                      6: /*******
                      7:  *     versys(name)    verify system names n1 and n2
                      8:  *     char *name;
                      9:  *
                     10:  *     return codes:  0  |  FAIL
                     11:  */
                     12: 
                     13: versys(name)
                     14: char *name;
                     15: {
                     16:        FILE *fp;
                     17:        char **fnp;
                     18:        char line[300];
                     19:        char s1[SNAMESIZE + 1];
                     20:        char myname[SNAMESIZE + 1];
                     21:        char *index();
                     22:        char *cp;
                     23: 
                     24:        sprintf(myname, "%.7s", Myname);
                     25:        sprintf(s1, "%.7s", name);
                     26:        if (strcmp(s1, myname) == 0)
                     27:                return(0);
                     28:        for (fnp = Sysfiles; *fnp != NULL; fnp++) {
                     29:                fp = fopen(*fnp, "r");
                     30:                if (fp == NULL)
                     31:                        continue;
                     32:        
                     33:                while (fgets(line, 300, fp) != NULL) {
                     34:                        cp = index(line, ' ');
                     35:                        if (cp == 0)
                     36:                                continue;
                     37:                        *cp = '\0';
                     38:                        line[7] = '\0';
                     39:                        if (strcmp(s1, line) == SAME) {
                     40:                                fclose(fp);
                     41:                                return(0);
                     42:                        }
                     43: 
                     44:                }
                     45:                fclose(fp);
                     46:        }
                     47:        return(FAIL);
                     48: }

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.