Return to lexan.c CVS log

Up to [XINU] / xinu / sys / shell

Annotation of xinu/sys/shell/lexan.c, revision 1.1

1.1     ! root        1: /* lexan.c - lexan */
        !             2: 
        !             3: #include <conf.h>
        !             4: #include <kernel.h>
        !             5: #include <shell.h>
        !             6: 
        !             7: /*------------------------------------------------------------------------
        !             8:  *  lexan  -  ad hoc lexical analyzer to divide command line into tokens
        !             9:  *------------------------------------------------------------------------
        !            10:  */
        !            11: lexan(line)
        !            12: char   *line;
        !            13: {
        !            14:        char    **tokptr;
        !            15:        int     ntok;
        !            16:        char    *p;
        !            17:        char    ch;
        !            18:        char    *to;
        !            19:        char    quote;
        !            20: 
        !            21:        to = Shl.shargst;               /* area to place token strings */
        !            22:        tokptr = &Shl.shtok[ntok = 0];  /* array of ptrs to tokens */
        !            23:        for  (p = line ; *p!='\0' && *p!='\n' && ntok < SHMAXTOK ;) {
        !            24:                while ( (ch = *p) == ' ')       /* skip leading blanks  */
        !            25:                        p++;
        !            26:                if (ch == '\0' || ch == '\n')   /* end of line or string*/
        !            27:                        return(ntok);
        !            28:                *tokptr++ = to;                 /* save start of token  */
        !            29:                Shl.shtktyp[ntok++] = ch;
        !            30:                if (ch == '"' || ch == '\'') {  /* check for quoted str.*/
        !            31:                        quote = ch;
        !            32:                        for (p++ ; (ch = *p++) != quote && ch != '\n'
        !            33:                                && ch != '\0' ; )
        !            34:                                *to++ = ch;
        !            35:                        if (ch != quote)
        !            36:                                return(SYSERR);
        !            37:                } else {                /* other possible tokens        */
        !            38:                        *to++ = *p++;
        !            39:                        if (ch!='>' && ch!='<' && ch!='&')
        !            40:                                while ((ch = *p)!='\n' && ch !='\0' &&
        !            41:                                        ch!='<' && ch!='>' && ch!=' ' &&
        !            42:                                        ch!='"' && ch!='\'' && ch !='&')
        !            43:                                        *to++= *p++; /* copy alphamerics*/
        !            44:                }
        !            45:                *to++ = NULLCH;         /* terminate token string       */
        !            46:        }
        !            47:        return(ntok);
        !            48: }

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