Return to btlook.c CVS log

Up to [Research Unix] / researchv10no / cmd / cbt

Annotation of researchv10no/cmd/cbt/btlook.c, revision 1.1

1.1     ! root        1: #include "stdio.h"
        !             2: #include "cbt.h"
        !             3: 
        !             4: /* like btbuild, but random access */
        !             5: char keybuf[NDSZ];
        !             6: char recbuf[32767];
        !             7: mbuf key = { keybuf, 0};
        !             8: mbuf rec = { recbuf, 0};
        !             9: bfile *bf;
        !            10: int rflag;
        !            11: 
        !            12: main(argc, argv)
        !            13: char **argv;
        !            14: {      int n;
        !            15:        if(argv[1][0] == '-') {
        !            16:                rflag++;
        !            17:                argc--;
        !            18:                argv++;
        !            19:        }
        !            20:        if(argc != 2) {
        !            21:                fprintf(stderr, "usage: btlook bfile < recs\n");
        !            22:                exit(1);
        !            23:        }
        !            24:        if((bf = bopen(argv[1], 0)) == NULL) {
        !            25:                perror(argv[1]);
        !            26:                exit(1);
        !            27:        }
        !            28:        for(;;) {
        !            29:                if(rflag)
        !            30:                        getrkey();
        !            31:                else 
        !            32:                        getakey();
        !            33:                if(bseek(bf, key) != 1) {
        !            34:                        fprintf(stderr, "not found:%s:\n",key.mdata);
        !            35:                        continue;
        !            36:                }
        !            37:                if(bread(bf, 0, &rec) != 0) {
        !            38:                        fprintf(stderr, "vanished:%s:\n", key.mdata);
        !            39:                        abort();
        !            40:                }
        !            41:                if(rec.mlen >= sizeof(recbuf)) {
        !            42:                        fprintf(stderr, "rec len %ud: recompile btlook\n",
        !            43:                                rec.mlen);
        !            44:                        abort();
        !            45:                }
        !            46:                rec.mdata[rec.mlen] = 0;
        !            47:                if(rflag) {
        !            48:                        put(2, &key.mlen);
        !            49:                        put(key.mlen, key.mdata);
        !            50:                        put(2, &rec.mlen);
        !            51:                        put(rec.mlen, rec.mdata);
        !            52:                } else
        !            53:                        printf("%s      %s\n", key.mdata, rec.mdata);
        !            54:        }
        !            55: }
        !            56: 
        !            57: get(n, s)
        !            58: char *s;
        !            59: {      int m;
        !            60:        for(m = 0; n > 0; n -= m) {
        !            61:                m = read(0, s, n);
        !            62:                if(m == 0) {
        !            63:                        bclose(bf);
        !            64:                        exit(0);
        !            65:                }
        !            66:                if(m < 0) {
        !            67:                        fprintf(stderr, "btlook: io error\n");
        !            68:                        abort();
        !            69:                }
        !            70:                s += m;
        !            71:        }
        !            72: }
        !            73: 
        !            74: put(n, s)
        !            75: char *s;
        !            76: {
        !            77:        if(fwrite(s, 1, n, stdout) != n) {
        !            78:                fprintf(stderr, "btlook: io error\n");
        !            79:                abort();
        !            80:        }
        !            81: }
        !            82: 
        !            83: getrkey()
        !            84: {
        !            85:        get(2, (char *)&key.mlen);
        !            86:        if(key.mlen >= sizeof(keybuf)) {
        !            87:                fprintf(stderr, "key too long\n");
        !            88:                exit(1);
        !            89:        }
        !            90:        get(key.mlen, key.mdata);
        !            91:        key.mdata[key.mlen] = 0;
        !            92:        get(2, (char *)&rec.mlen);
        !            93:        if(rec.mlen >= sizeof(recbuf)) {
        !            94:                fprintf(stderr, "rec len %ud: recompile btlook\n", rec.mlen);
        !            95:                abort();
        !            96:        }
        !            97:        get(rec.mlen, rec.mdata);
        !            98: }
        !            99: 
        !           100: getakey()
        !           101: {
        !           102:        int c;
        !           103:        char *s;
        !           104:        for(s=key.mdata;;s++) {
        !           105:                c = getchar();
        !           106:                switch(c) {
        !           107:                case EOF:
        !           108:                        exit(0);
        !           109:                case '\t':
        !           110:                        for(;;) {
        !           111:                                switch(getchar()) {
        !           112:                                case EOF:
        !           113:                                        exit(0);
        !           114:                                case '\n':
        !           115:                                        goto out;
        !           116:                                }
        !           117:                        }
        !           118:                case '\n':
        !           119:                        goto out;
        !           120:                default:
        !           121:                        *s = c;
        !           122:                }
        !           123:        }
        !           124: out:
        !           125:        *s = 0;         
        !           126:        key.mlen = s - key.mdata;
        !           127:        if(key.mlen >= sizeof(keybuf)) {
        !           128:                fprintf(stderr, "key too long:%s:\n", key.mdata);
        !           129:                abort();
        !           130:        }
        !           131: }

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