Return to process.c CVS log

Up to [Research Unix] / researchv10no / cmd / netnews / src

Annotation of researchv10no/cmd/netnews/src/process.c, revision 1.1.1.1

1.1       root        1: /*
                      2:  * process - process options for readnews
                      3:  */
                      4: 
                      5: static char *SccsId = "@(#)process.c   2.7     4/23/83";
                      6: 
                      7: #include "rparams.h"
                      8: 
                      9: #define OPTION 0       /* pick up an option string */
                     10: #define STRING 1       /* pick up a string of arguments */
                     11: 
                     12: struct optable *optpt, options[] = { /*
                     13: optlet filchar flag    newstate oldmode        newmode buf     */
                     14: 'p',   '\0',   FALSE,  OPTION, UNKNOWN,        UNKNOWN,(char *)NULL,   
                     15: 't',   '\0',   FALSE,  STRING, ANY,            UNKNOWN,header.title,   
                     16: 'a',   ' ',    FALSE,  STRING, ANY,            UNKNOWN,datebuf,
                     17: 'n',   NGDELIM,        FALSE,  STRING, ANY,            UNKNOWN,header.nbuf,
                     18: 'c',   ' ',    FALSE,  STRING, UNKNOWN,        UNKNOWN,coptbuf,        
                     19: 'l',   ' ',    FALSE,  OPTION, UNKNOWN,        UNKNOWN,(char *)NULL,
                     20: 'r',   '\0',   FALSE,  OPTION, ANY,            UNKNOWN,(char *)NULL,
                     21: 's',   NGDELIM,        FALSE,  STRING, ANY,            UNKNOWN,header.nbuf,
                     22: 'x',   '\0',   FALSE,  OPTION, ANY,            UNKNOWN,(char *)NULL,
                     23: 'h',   '\0',   FALSE,  OPTION, ANY,            UNKNOWN,(char *)NULL,
                     24: 'M',   '\0',   FALSE,  OPTION, UNKNOWN,        MAIL,   (char *)NULL,
                     25: 'f',   '\0',   FALSE,  OPTION, ANY,            UNKNOWN,(char *)NULL,
                     26: 'u',   '\0',   FALSE,  OPTION, ANY,            UNKNOWN,(char *)NULL,
                     27: 'e',   '\0',   FALSE,  OPTION, ANY,            UNKNOWN,(char *)NULL,
                     28: '\0',  '\0',   0,      0,      0,              0,      (char *)NULL
                     29: };
                     30: 
                     31: process(argc,argv)
                     32: register int argc;
                     33: register char **argv;
                     34: {
                     35:        register int state = OPTION;
                     36:        register char *ptr;
                     37:        char filchar;
                     38:        int len, tlen;
                     39: 
                     40:        /* loop once per arg. */
                     41: 
                     42:        while (--argc) {
                     43:            if (state == OPTION) {
                     44:                if (**argv != '-') {
                     45:                        sprintf(bfr, "Bad option string \"%s\"", *argv);
                     46:                        xerror(bfr);
                     47:                }
                     48:                while (*++*argv != '\0') {
                     49:                        for (optpt = options; optpt->optlet != '\0'; ++optpt) {
                     50:                                if (optpt->optlet == **argv)
                     51:                                        goto found;
                     52:                        }
                     53:                        /* unknown option letter */
                     54:                        fprintf(stderr, "Usage: readnews [ -a [ date ]] [ -n newsgroups ] [ -t titles ] [ -lprxhfuM ]\n");
                     55:                        fprintf(stderr, "\t[ -c [ ``mailer'' ]]\n\n");
                     56:                        fprintf(stderr, "       readnews -s\n");
                     57:                        exit(1);
                     58: 
                     59:                    found:;
                     60:                        if (mode != UNKNOWN && (mode&optpt->oldmode) == 0) {
                     61:                                sprintf(bfr, "Bad %c option", **argv);
                     62:                                xerror(bfr);
                     63:                        }
                     64:                        if (mode == UNKNOWN)
                     65:                                mode = optpt->newmode;
                     66:                        filchar = optpt->filchar;
                     67:                        optpt->flag = TRUE;
                     68:                        state = optpt->newstate;
                     69:                        ptr = optpt->buf;
                     70:                        len = LBUFLEN;
                     71:                }
                     72: 
                     73:                argv++;         /* done with this option arg. */
                     74: 
                     75:            } else {
                     76: 
                     77:                /*
                     78:                 * Pick up a piece of a string and put it into
                     79:                 * the appropriate buffer.
                     80:                 */
                     81:                if (**argv == '-') {
                     82:                        state = OPTION;
                     83:                        argc++; /* uncount this arg. */
                     84:                        continue;
                     85:                }
                     86: 
                     87:                if ((tlen = strlen(*argv)) >= len)
                     88:                        xerror("Argument string too long");
                     89:                strcpy(ptr, *argv++);
                     90:                ptr += tlen;
                     91:                if (*(ptr-1) != filchar)
                     92:                        *ptr++ = filchar;
                     93:                len -= tlen + 1;
                     94:                *ptr = '\0';
                     95:            }
                     96:        }
                     97:        return;
                     98: }

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