Return to strings.c CVS log

Up to [CSRG BSD Unix] / 40BSD / cmd

Annotation of 40BSD/cmd/strings.c, revision 1.1

1.1     ! root        1: static char *sccsid = "@(#)strings.c   4.1 (Berkeley) 10/1/80";
        !             2: #include <stdio.h>
        !             3: #include <a.out.h>
        !             4: #include <ctype.h>
        !             5: 
        !             6: long   ftell();
        !             7: 
        !             8: /*
        !             9:  * strings
        !            10:  */
        !            11: 
        !            12: struct exec header;
        !            13: 
        !            14: char   *infile = "Standard input";
        !            15: int    oflg;
        !            16: int    asdata;
        !            17: long   offset;
        !            18: int    minlength = 4;
        !            19: 
        !            20: main(argc, argv)
        !            21:        int argc;
        !            22:        char *argv[];
        !            23: {
        !            24: 
        !            25:        argc--, argv++;
        !            26:        while (argc > 0 && argv[0][0] == '-') {
        !            27:                register int i;
        !            28:                if (argv[0][1] == 0)
        !            29:                        asdata++;
        !            30:                else for (i = 1; argv[0][i] != 0; i++) switch (argv[0][i]) {
        !            31: 
        !            32:                case 'o':
        !            33:                        oflg++;
        !            34:                        break;
        !            35: 
        !            36:                case 'a':
        !            37:                        asdata++;
        !            38:                        break;
        !            39: 
        !            40:                default:
        !            41:                        if (!isdigit(argv[0][i])) {
        !            42:                                fprintf(stderr, "Usage: strings [ -a ] [ -o ] [ -# ] [ file ... ]\n");
        !            43:                                exit(1);
        !            44:                        }
        !            45:                        minlength = argv[0][i] - '0';
        !            46:                        for (i++; isdigit(argv[0][i]); i++)
        !            47:                                minlength = minlength * 10 + argv[0][i] - '0';
        !            48:                        i--;
        !            49:                        break;
        !            50:                }
        !            51:                argc--, argv++;
        !            52:        }
        !            53:        do {
        !            54:                if (argc > 0) {
        !            55:                        if (freopen(argv[0], "r", stdin) == NULL) {
        !            56:                                perror(argv[0]);
        !            57:                                exit(1);
        !            58:                        }
        !            59:                        infile = argv[0];
        !            60:                        argc--, argv++;
        !            61:                }
        !            62:                fseek(stdin, (long) 0, 0);
        !            63:                if (asdata ||
        !            64:                    fread((char *)&header, sizeof header, 1, stdin) != 1 || 
        !            65:                    N_BADMAG(header)) {
        !            66:                        fseek(stdin, (long) 0, 0);
        !            67:                        find((long) 100000000L);
        !            68:                        continue;
        !            69:                }
        !            70:                fseek(stdin, (long) N_TXTOFF(header)+header.a_text, 1);
        !            71:                find((long) header.a_data);
        !            72:        } while (argc > 0);
        !            73: }
        !            74: 
        !            75: find(cnt)
        !            76:        long cnt;
        !            77: {
        !            78:        static char buf[BUFSIZ];
        !            79:        register char *cp;
        !            80:        register int c, cc;
        !            81: 
        !            82:        cp = buf, cc = 0;
        !            83:        for (; cnt != 0; cnt--) {
        !            84:                c = getc(stdin);
        !            85:                if (c == '\n' || dirt(c) || cnt == 0) {
        !            86:                        if (cp > buf && cp[-1] == '\n')
        !            87:                                --cp;
        !            88:                        *cp++ = 0;
        !            89:                        if (cp > &buf[minlength]) {
        !            90:                                if (oflg)
        !            91:                                        printf("%7D ", ftell(stdin) - cc - 1);
        !            92:                                printf("%s\n", buf);
        !            93:                        }
        !            94:                        cp = buf, cc = 0;
        !            95:                } else {
        !            96:                        if (cp < &buf[sizeof buf - 2])
        !            97:                                *cp++ = c;
        !            98:                        cc++;
        !            99:                }
        !           100:                if (ferror(stdin) || feof(stdin))
        !           101:                        break;
        !           102:        }
        !           103: }
        !           104: 
        !           105: dirt(c)
        !           106:        int c;
        !           107: {
        !           108: 
        !           109:        switch (c) {
        !           110: 
        !           111:        case '\n':
        !           112:        case '\f':
        !           113:                return (0);
        !           114: 
        !           115:        case 0177:
        !           116:                return (1);
        !           117: 
        !           118:        default:
        !           119:                return (c > 0200 || c < ' ');
        !           120:        }
        !           121: }

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