Return to in_host.c CVS log

Up to [Research Unix] / researchv9 / ipc / src / libin

Annotation of researchv9/ipc/src/libin/in_host.c, revision 1.1

1.1     ! root        1: #include <sys/types.h>
        !             2: #include <sys/stat.h>
        !             3: #include <sys/inet/in.h>
        !             4: #include <stdio.h>
        !             5: #include <ctype.h>
        !             6: #include "config.h"
        !             7: 
        !             8: struct namefile {
        !             9:        char *name;
        !            10:        char *data;
        !            11:        long time;
        !            12: };
        !            13: 
        !            14: static struct namefile files[] = {
        !            15:        { "/usr/ipc/lib/inaddr.local", 0, 0 },
        !            16:        { "/usr/ipc/lib/inaddr", 0, 0 },
        !            17:        { "/usr/inet/lib/hosts", 0, 0 },
        !            18:        { "/usr/inet/lib/networks", 0, 0 },
        !            19: };
        !            20: #define NFIL (sizeof(files)/sizeof(struct namefile))
        !            21: 
        !            22: struct trbuf {
        !            23:        struct trbuf *next;
        !            24:        in_addr addr;
        !            25:        char *name;
        !            26: };
        !            27: 
        !            28: #define TLBSIZE 1023
        !            29: static struct trbuf tlb[TLBSIZE];
        !            30: 
        !            31: /* imported */
        !            32: extern char *in_getw();
        !            33: extern char *malloc();
        !            34: 
        !            35: /* exported */
        !            36: int in_host_dostat=1;
        !            37: 
        !            38: static int
        !            39: getfile(i)
        !            40:        int i;
        !            41: {
        !            42:        int fd;
        !            43:        struct stat sbuf;
        !            44:        unsigned int x;
        !            45: 
        !            46:        if (in_host_dostat)
        !            47:                stat(files[i].name, &sbuf);
        !            48:        else
        !            49:                sbuf.st_mtime = files[i].time;
        !            50:        if (files[i].data == 0 || sbuf.st_mtime!=files[i].time) {
        !            51:                if (!in_host_dostat)
        !            52:                        stat(files[i].name, &sbuf);
        !            53:                fd = open(files[i].name, 0);
        !            54:                if (fd<0)
        !            55:                        return -1;
        !            56:                if (files[i].data!=0)
        !            57:                        free(files[i].data);
        !            58:                x = sbuf.st_size;
        !            59:                files[i].data = malloc(x+2);
        !            60:                if (files[i].data==0) {
        !            61:                        close(fd);
        !            62:                        return -1;
        !            63:                }
        !            64:                if (read(fd, files[i].data, x)!=x){
        !            65:                        close(fd);
        !            66:                        return -1;
        !            67:                }
        !            68:                close(fd);
        !            69:                files[i].data[sbuf.st_size] = '\n';
        !            70:                files[i].data[sbuf.st_size+1] = 0;
        !            71:                files[i].time = sbuf.st_mtime;
        !            72:                for (i=0; i<TLBSIZE; i++)
        !            73:                        tlb[i].addr = 0;
        !            74:        }
        !            75:        return 0;
        !            76: }
        !            77: 
        !            78: #define SKIPWHITE while(*p==' ' || *p=='\t') p++
        !            79: #define GETBLACK       xp = b;\
        !            80:                        while(*p!=' ' && *p!='\t' && *p!='\n' && *p!='\0')\
        !            81:                                *xp++ = *p++;\
        !            82:                        *xp = '\0'
        !            83: 
        !            84: char *
        !            85: in_host(addr)
        !            86: in_addr addr;
        !            87: {
        !            88:        register char *p, *xp, *op;
        !            89:        unsigned char *yp;
        !            90:        static char b[32];
        !            91:        int f;
        !            92:        in_addr x, in_netof(), in_aton();
        !            93: 
        !            94:        if (addr==0)
        !            95:                return "*";
        !            96:        for(f=0; f<NFIL; f++){
        !            97:                if (getfile(f) < 0) {
        !            98:                        continue;
        !            99:                } else if (addr == tlb[addr%TLBSIZE].addr) {
        !           100:                        p = tlb[addr%TLBSIZE].name;
        !           101:                        GETBLACK;
        !           102:                        return(b);
        !           103:                } else for (p = files[f].data; *p; p++){
        !           104:                        /* get number */
        !           105:                        SKIPWHITE;
        !           106:                        GETBLACK;
        !           107:                        x = in_aton(b);
        !           108:                        SKIPWHITE;
        !           109:                        if (x != 0 && *p != '\n') {
        !           110:                                /* get name */
        !           111:                                op = p;
        !           112:                                GETBLACK;
        !           113:        
        !           114:                                /* see if this is the one */
        !           115:                                if (x==addr){
        !           116:                                        int i;
        !           117: 
        !           118:                                        i = x%TLBSIZE;
        !           119:                                        tlb[i].addr = x;
        !           120:                                        tlb[i].name = op;
        !           121:                                        return b;
        !           122:                                }
        !           123:                        }
        !           124:                        /* drop rest of line */
        !           125:                        while(*p!='\n'&&*p!='\0') p++;
        !           126:                }
        !           127:        }
        !           128:        yp = (unsigned char *) &addr;
        !           129:        sprintf(b, "%d.%d.%d.%d", yp[3], yp[2], yp[1], yp[0]);
        !           130:        return(b);
        !           131: }

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