Return to versys.c CVS log

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

Annotation of 3BSD/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: 
                     23:        sprintf(myname, "%.7s", Myname);
                     24:        sprintf(s1, "%.7s", name);
                     25:        if (strcmp(s1, myname) == 0)
                     26:                return(0);
                     27:        for (fnp = Sysfiles; *fnp != NULL; fnp++) {
                     28:                fp = fopen(*fnp, "r");
                     29:                if (fp == NULL)
                     30:                        continue;
                     31:        
                     32:                while (fgets(line, 300, fp) != NULL) {
                     33:                        *(index(line, ' ')) = '\0';
                     34:                        line[7] = '\0';
                     35:                        if (strcmp(s1, line) == SAME) {
                     36:                                fclose(fp);
                     37:                                return(0);
                     38:                        }
                     39: 
                     40:                }
                     41:                fclose(fp);
                     42:        }
                     43:        return(FAIL);
                     44: }

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