Return to what3.c CVS log

Up to [CSRG BSD Unix] / 42BSD / usr.bin / refer

Annotation of 42BSD/usr.bin/refer/what3.c, revision 1.1

1.1     ! root        1: #ifndef lint
        !             2: static char *sccsid = "@(#)what3.c     4.1 (Berkeley) 5/6/83";
        !             3: #endif
        !             4: 
        !             5: #include "what..c"
        !             6: 
        !             7: doclook(argc, argv, colevel)
        !             8: char *argv[];
        !             9: {
        !            10:        int fpa[2], fpb[2], fpc[2], pid1, pid2, st;
        !            11:        int iarg;
        !            12:        char *s;
        !            13:        FILE *ansf;
        !            14:        struct filans *af;
        !            15:        struct stat statbuf;
        !            16: # define RD 0
        !            17: # define WR 1
        !            18: # define fmv(x,y) close(y); dup(x); close(x);
        !            19:        /* we want to run chkbib and then lhunt and pipe in & out */
        !            20:        pipe (fpa); /* from this program to chkbib */
        !            21:        pipe (fpb); /* from chkbib to lhunt */
        !            22:        pipe (fpc); /* from lhunt to us */
        !            23:        if (  (pid1 = fork())  ==0)
        !            24:        {
        !            25:                fmv(fpa[RD], 0);
        !            26:                fmv(fpb[WR], 1);
        !            27:                close(fpa[WR]); 
        !            28:                close(fpb[RD]); 
        !            29:                close(fpc[RD]); 
        !            30:                close(fpc[WR]); 
        !            31:                execl("/usr/lib/refer/mkey", "mkey", "-s", 0);
        !            32:                _assert(0);
        !            33:        }
        !            34:        if (  (pid2 = fork()) == 0)
        !            35:        {
        !            36:                char coarg[20];
        !            37:                sprintf(coarg, "-C%d", colevel);
        !            38:                fmv(fpb[RD], 0);
        !            39:                fmv(fpc[WR], 1);
        !            40:                close(fpa[RD]); 
        !            41:                close(fpa[WR]); 
        !            42:                close(fpb[WR]); 
        !            43:                close(fpc[RD]);
        !            44:                execl("/usr/lib/refer/hunt", "hunt",
        !            45:                /* "-P", */
        !            46:                coarg, "-Ty", "-Fn", "/usr/dict/lookall/All", 0);
        !            47:                _assert(0);
        !            48:        }
        !            49:        _assert (pid1 != -1); 
        !            50:        _assert(pid2 != -1);
        !            51:        close(fpb[RD]); 
        !            52:        close(fpb[WR]); 
        !            53:        close(fpa[RD]); 
        !            54:        close(fpc[WR]);
        !            55:        ansf = fopen("/dev/null", "r");
        !            56:        fmv (fpc[RD], ansf->_file);
        !            57:        for(iarg=1; iarg<argc; iarg++)
        !            58:                prod(fpa[WR], argv[iarg]);
        !            59:        close(fpa[WR]);
        !            60:        s=fnames;
        !            61:        af=files;
        !            62:        while (af < files+NFILES)
        !            63:        {
        !            64:                if (fgets(af->nm=s, NAMES, ansf)==0)
        !            65:                        break;
        !            66:                trimnl(s);
        !            67:                if (*s==0) continue;
        !            68:                while (*s++);
        !            69:                _assert(s<fnames+NAMES);
        !            70:                st = stat(af->nm, &statbuf);
        !            71:                if (st<0) continue;
        !            72:                af->uid = statbuf.st_uid;
        !            73:                af->fdate = statbuf.st_mtime;
        !            74:                af->size = statbuf.st_size;
        !            75:                af++;
        !            76:        }
        !            77:        fclose(ansf);
        !            78:        return(af-files);
        !            79: }
        !            80: 
        !            81: prod(f,s)
        !            82: char *s;
        !            83: {
        !            84:        write (f, s, strlen(s));
        !            85:        write (f, "\n", 1);
        !            86: }

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