Return to getargs.c CVS log

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

Annotation of researchv10no/cmd/weather/getargs.c, revision 1.1

1.1     ! root        1: # include "ctype.h"
        !             2: getargs(s, arps)
        !             3:        char *s, *arps[];
        !             4: {
        !             5:        int i, c;
        !             6: i = 0;
        !             7: while (isspace(*s))
        !             8:        s++;
        !             9: while (1)
        !            10:        {
        !            11:        arps[i++]=s;
        !            12:        while ( isalnum(c= *s) ||
        !            13:                (c==',' && !isspace(s[1])) ||
        !            14:                c=='-' || c=='=' || c=='%')
        !            15:                        s++;
        !            16:        if (*s==0) break;
        !            17:        *s++ =0;
        !            18:        while ((c= *s) && !isalnum(c) && c != '.' && c !='%' && c != '=' && c != '-') s++;
        !            19:        if (*s==0)break;
        !            20:        }
        !            21: return(i);
        !            22: }

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