Return to lex.l CVS log

Up to [Research Unix] / researchv10dc / cmd / oworm / oscsi

Annotation of researchv10dc/cmd/oworm/oscsi/lex.l, revision 1.1.1.1

1.1       root        1: %{
                      2: #undef ECHO
                      3: #include       "x.tab.h"
                      4: #include       <string.h>
                      5: #undef getc
                      6: #define        getc(x)         Fgetc(0)
                      7: #undef output
                      8: #define        output(x)       (void)(x)
                      9: %}
                     10: %%
                     11: a              return(SIDEA);
                     12: all            return(ALL);
                     13: b              return(SIDEB);
                     14: capacity       return(CAPACITY);
                     15: copy           return(COPY);
                     16: diag           return(DIAGNOSTIC);
                     17: diagnostic     return(DIAGNOSTIC);
                     18: disk           return(DISK);
                     19: echo           return(ECHO);
                     20: eject          return(EJECT);
                     21: err            return(ERROR);
                     22: error          return(ERROR);
                     23: ext            return(EXT);
                     24: help           return(HELP);
                     25: id             return(ID);
                     26: inq            return(INQUIRY);
                     27: inquiry                return(INQUIRY);
                     28: media          return(MEDIA);
                     29: read           return(READ);
                     30: rel            return(RELEASE);
                     31: release                return(RELEASE);
                     32: reset          return(RESET);
                     33: sense          return(SENSE);
                     34: set            return(SET);
                     35: sleep          return(SLEEP);
                     36: start          return(START);
                     37: status         return(STATUS);
                     38: stop           return(STOP);
                     39: worm           return(WORM);
                     40: write          return(WRITE);
                     41: [0123456789]+  { yylval.num = atoi(yytext); return(NUMBER); }
                     42: \n             { yylineno++; return('\n'); }
                     43: \"[^"]*\"      { yytext[yyleng-1] = 0; yylval.str = strdup(yytext+1); return(STRING); }
                     44: #.*            { ; /* comment */ }
                     45: [ \t]+         { ; /* white space */ }
                     46: ^!.*           { system(yytext+1); print("!\n"); }
                     47: .              { return(yytext[0]); }
                     48: 
                     49: %%

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