Return to htest.c CVS log

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

Annotation of researchv10no/cmd/gre/htest.c, revision 1.1

1.1     ! root        1: #include       <stdio.h>
        !             2: #include       "re.h"
        !             3: 
        !             4: #ifdef PROFILING
        !             5: short profb[50000];
        !             6: #endif
        !             7: 
        !             8: main(argc, argv)
        !             9:        char **argv;
        !            10: {
        !            11:        re_re *r;
        !            12:        char *pat, *s;
        !            13:        char buf[4096];
        !            14:        unsigned char map[256];
        !            15:        FILE *exprs[1024];
        !            16:        char *match[10][2];
        !            17:        int n, i, bufc;
        !            18:        extern re_debug;
        !            19: 
        !            20: #ifdef PROFILING
        !            21:        { extern etext(); monitor((int (*)())2, etext, profb, ((int)etext) - 2+12+2400, 300); }
        !            22: #endif
        !            23:        if((argc%2) || (argc < 2)){
        !            24:                fprintf(stderr, "Usage: %s {pattern file}* sequence\n", argv[0]);
        !            25:                fprintf(stderr, "\tEg: %s '^(a|b)+$' temp0 '(gh+|hb)' temp1  01101\n", argv[0]);
        !            26:                exit(1);
        !            27:        }
        !            28:        for(n = 0; n < 256; n++)
        !            29:                map[n] = n;
        !            30:        for(n = 0, i = 1; i < argc-1; i++, n++){
        !            31:                pat = argv[i++];
        !            32:                r = re_recomp(pat, pat+strlen(pat), map);
        !            33:                if(r == 0)
        !            34:                        exit(1);
        !            35:                if((exprs[n] = fopen(argv[i], "w+r")) == NULL){
        !            36:                        perror(argv[i]);
        !            37:                        exit(1);
        !            38:                }
        !            39:                re_refile(r, exprs[n]);
        !            40:        }
        !            41:        bufc = fread(buf, 1, sizeof buf, stdin);
        !            42:        for(s = argv[i]; *s; s++){
        !            43:                rewind(exprs[n = *s-'0']);
        !            44:                r = re_filere(exprs[n]);
        !            45: re_debug = 20;
        !            46:                if(re_reexec(r, buf, buf+bufc, match)){
        !            47:                        printf("%s matched:", argv[1+2*n]);
        !            48:                        for(i = 0; i < 10; i++)
        !            49:                                if(match[i][0]){
        !            50:                                        printf(" G%d='", i);
        !            51:                                        fwrite(match[i][0], 1, match[i][1]-match[i][0], stdout);
        !            52:                                        putchar('\'');
        !            53:                                }
        !            54:                        putchar('\n');
        !            55:                }
        !            56:                re_refree(r);
        !            57:        }
        !            58:        exit(0);
        !            59: }
        !            60: 
        !            61: void
        !            62: re_error(char *s)
        !            63: {
        !            64:        fprintf(stderr, "pattern error: %s\n", s);
        !            65:        /* NOTREACHED */
        !            66: }

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