![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to lex.yy.c CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [Research Unix] / researchv9 / sys / conf / src / config|
Return to lex.yy.c CVS log | Up to [Research Unix] / researchv9 / sys / conf / src / config |
1.1 ! root 1: # include "stdio.h" ! 2: # define U(x) x ! 3: # define NLSTATE yyprevious=YYNEWLINE ! 4: # define BEGIN yybgin = yysvec + 1 + ! 5: # define INITIAL 0 ! 6: # define YYLERR yysvec ! 7: # define YYSTATE (yyestate-yysvec-1) ! 8: # define YYOPTIM 1 ! 9: # define YYLMAX 200 ! 10: # define output(c) putc(c,yyout) ! 11: # define input() (((yytchar=yysptr>yysbuf?U(*--yysptr):getc(yyin))==10?(yylineno++,yytchar):yytchar)==EOF?0:yytchar) ! 12: # define unput(c) {yytchar= (c);if(yytchar=='\n')yylineno--;*yysptr++=yytchar;} ! 13: # define yymore() (yymorfg=1) ! 14: # define ECHO fprintf(yyout, "%s",yytext) ! 15: # define REJECT { nstr = yyreject(); goto yyfussy;} ! 16: int yyleng; extern char yytext[]; ! 17: int yymorfg; ! 18: extern char *yysptr, yysbuf[]; ! 19: int yytchar; ! 20: FILE *yyin = {stdin}, *yyout = {stdout}; ! 21: extern int yylineno; ! 22: struct yysvf { ! 23: struct yywork *yystoff; ! 24: struct yysvf *yyother; ! 25: int *yystops;}; ! 26: struct yysvf *yyestate; ! 27: extern struct yysvf yysvec[], *yybgin; ! 28: /* config.l 1.8 81/05/18 */ ! 29: ! 30: #include <ctype.h> ! 31: #include "y.tab.h" ! 32: #include "config.h" ! 33: ! 34: #define tprintf if (do_trace) printf ! 35: ! 36: YYSTYPE yylval; ! 37: ! 38: /* ! 39: * Key word table ! 40: */ ! 41: ! 42: struct kt { ! 43: char *kt_name; ! 44: int kt_val; ! 45: } key_words[] = { ! 46: "cpu", CPU, "ident", IDENT, "config", CONFIG, "options", OPTIONS, ! 47: "device", DEVICE, "controller", CONTROLLER, "uba", UBA, "mba", MBA, ! 48: "csr", CSR, "nexus", NEXUS, "drive", DRIVE, "vector", VECTOR, ! 49: "pseudo-device", PSEUDO_DEVICE, "flags", FLAGS, "trace", TRACE, ! 50: "disk", DISK, "tape", DEVICE, "slave", SLAVE, "at", AT, ! 51: "hz", HZ, "timezone", TIMEZONE, "dst", DST, "maxusers", MAXUSERS, ! 52: "master", MASTER, "mkfile", MAKEFILE, ! 53: "machine", MACHINE, "priority", PRIORITY, ! 54: 0,0, ! 55: }; ! 56: # define YYNEWLINE 10 ! 57: yylex(){ ! 58: int nstr; extern int yyprevious; ! 59: while((nstr = yylook()) >= 0) ! 60: yyfussy: switch(nstr){ ! 61: case 0: ! 62: if(yywrap()) return(0); break; ! 63: case 1: ! 64: { ! 65: int i; ! 66: ! 67: if ((i = kw_lookup(yytext)) == -1) ! 68: { ! 69: yylval.cp = yytext; ! 70: tprintf("id(%s) ", yytext); ! 71: return ID; ! 72: } ! 73: tprintf("(%s) ", yytext); ! 74: return i; ! 75: } ! 76: break; ! 77: case 2: ! 78: { ! 79: yytext[strlen(yytext)-1] = '\0'; ! 80: yylval.cp = yytext + 1; ! 81: return ID; ! 82: } ! 83: break; ! 84: case 3: ! 85: { ! 86: yylval.i = octal(yytext); ! 87: tprintf("#O:%o ", yylval.i); ! 88: return NUMBER; ! 89: } ! 90: break; ! 91: case 4: ! 92: { ! 93: yylval.i = hex(yytext); ! 94: tprintf("#X:%x ", yylval.i); ! 95: return NUMBER; ! 96: } ! 97: break; ! 98: case 5: ! 99: { ! 100: yylval.i = atoi(yytext); ! 101: tprintf("#D:%d ", yylval.i); ! 102: return NUMBER; ! 103: } ! 104: break; ! 105: case 6: ! 106: { ! 107: double atof(); ! 108: yylval.i = (int) (60 * atof(yytext) + 0.5); ! 109: return FPNUMBER; ! 110: } ! 111: break; ! 112: case 7: ! 113: { ! 114: return MINUS; ! 115: } ! 116: break; ! 117: case 8: ! 118: { ! 119: yylval.i = QUES; ! 120: tprintf("? "); ! 121: return NUMBER; ! 122: } ! 123: break; ! 124: case 9: ! 125: { ! 126: yyline++; ! 127: tprintf("\n... "); ! 128: } ! 129: break; ! 130: case 10: ! 131: { ! 132: yyline++; ! 133: tprintf("\n"); ! 134: return SEMICOLON; ! 135: } ! 136: break; ! 137: case 11: ! 138: { /* Ignored (comment) */; } ! 139: break; ! 140: case 12: ! 141: { /* Ignored (white space) */; } ! 142: break; ! 143: case 13: ! 144: { return SEMICOLON; } ! 145: break; ! 146: case 14: ! 147: { return COMMA; } ! 148: break; ! 149: case 15: ! 150: { return VME16D16; } ! 151: break; ! 152: case 16: ! 153: { return VME24D16; } ! 154: break; ! 155: case 17: ! 156: { return VME32D32; } ! 157: break; ! 158: case 18: ! 159: { return VME16D16; } ! 160: break; ! 161: case 19: ! 162: { return VME24D16; } ! 163: break; ! 164: case 20: ! 165: { return VME32D16; } ! 166: break; ! 167: case 21: ! 168: { return VME16D32; } ! 169: break; ! 170: case 22: ! 171: { return VME24D32; } ! 172: break; ! 173: case 23: ! 174: { return VME32D32; } ! 175: break; ! 176: case -1: ! 177: break; ! 178: default: ! 179: fprintf(yyout,"bad switch yylook %d",nstr); ! 180: } return(0); } ! 181: /* end of yylex */ ! 182: /* ! 183: * kw_lookup ! 184: * Look up a string in the keyword table. Returns a -1 if the ! 185: * string is not a keyword otherwise it returns the keyword number ! 186: */ ! 187: ! 188: kw_lookup(word) ! 189: register char *word; ! 190: { ! 191: register struct kt *kp; ! 192: ! 193: for (kp = key_words; kp->kt_name != 0; kp++) ! 194: if (eq(word, kp->kt_name)) ! 195: return kp->kt_val; ! 196: return -1; ! 197: } ! 198: ! 199: /* ! 200: * Number conversion routines ! 201: */ ! 202: ! 203: octal(str) ! 204: char *str; ! 205: { ! 206: int num; ! 207: ! 208: sscanf(str, "%o", &num); ! 209: return num; ! 210: } ! 211: ! 212: hex(str) ! 213: char *str; ! 214: { ! 215: int num; ! 216: ! 217: sscanf(str+2, "%x", &num); ! 218: return num; ! 219: } ! 220: int yyvstop[] = { ! 221: 0, ! 222: ! 223: 12, ! 224: 0, ! 225: ! 226: 12, ! 227: 0, ! 228: ! 229: 12, ! 230: 0, ! 231: ! 232: 10, ! 233: -9, ! 234: 0, ! 235: ! 236: 11, ! 237: 0, ! 238: ! 239: 14, ! 240: 0, ! 241: ! 242: 7, ! 243: 0, ! 244: ! 245: 3, ! 246: 0, ! 247: ! 248: 5, ! 249: 0, ! 250: ! 251: 13, ! 252: 0, ! 253: ! 254: 8, ! 255: 0, ! 256: ! 257: 1, ! 258: 0, ! 259: ! 260: 1, ! 261: 0, ! 262: ! 263: 9, ! 264: 0, ! 265: ! 266: 6, ! 267: 0, ! 268: ! 269: 3, ! 270: 0, ! 271: ! 272: 5, ! 273: 0, ! 274: ! 275: 1, ! 276: 0, ! 277: ! 278: 2, ! 279: 0, ! 280: ! 281: 4, ! 282: 0, ! 283: ! 284: 1, ! 285: 0, ! 286: ! 287: 15, ! 288: 0, ! 289: ! 290: 16, ! 291: 0, ! 292: ! 293: 17, ! 294: 0, ! 295: ! 296: 18, ! 297: 0, ! 298: ! 299: 21, ! 300: 0, ! 301: ! 302: 19, ! 303: 0, ! 304: ! 305: 22, ! 306: 0, ! 307: ! 308: 20, ! 309: 0, ! 310: ! 311: 23, ! 312: 0, ! 313: 0}; ! 314: # define YYTYPE char ! 315: struct yywork { YYTYPE verify, advance; } yycrank[] = { ! 316: 0,0, 0,0, 1,0, 1,0, ! 317: 1,0, 1,0, 1,0, 1,0, ! 318: 1,0, 1,0, 1,3, 1,4, ! 319: 1,0, 1,0, 1,0, 1,0, ! 320: 1,0, 1,0, 1,0, 1,0, ! 321: 1,0, 1,0, 1,0, 1,0, ! 322: 1,0, 1,0, 1,0, 1,0, ! 323: 1,0, 1,0, 1,0, 1,0, ! 324: 1,0, 3,3, 1,0, 1,5, ! 325: 1,6, 1,0, 1,0, 1,0, ! 326: 1,0, 1,0, 1,0, 1,0, ! 327: 1,0, 1,7, 1,8, 1,0, ! 328: 1,0, 1,9, 1,10, 4,15, ! 329: 16,22, 0,0, 0,0, 0,0, ! 330: 3,3, 1,10, 0,0, 1,0, ! 331: 1,11, 1,0, 1,0, 1,0, ! 332: 1,12, 1,0, 1,13, 24,25, ! 333: 24,26, 24,27, 25,28, 26,29, ! 334: 27,30, 10,17, 4,15, 10,20, ! 335: 10,20, 10,20, 10,20, 10,20, ! 336: 10,20, 10,20, 10,20, 10,20, ! 337: 10,20, 31,34, 32,36, 31,35, ! 338: 32,37, 33,38, 34,40, 33,39, ! 339: 1,0, 1,0, 1,0, 1,0, ! 340: 35,41, 1,0, 1,13, 9,17, ! 341: 36,42, 9,18, 9,18, 9,18, ! 342: 9,18, 9,18, 9,18, 9,18, ! 343: 9,18, 17,17, 17,17, 17,17, ! 344: 17,17, 17,17, 17,17, 17,17, ! 345: 17,17, 17,17, 17,17, 1,14, ! 346: 14,21, 21,24, 28,31, 29,32, ! 347: 1,0, 1,0, 1,0, 1,0, ! 348: 1,0, 2,0, 2,0, 2,0, ! 349: 2,0, 2,0, 2,0, 2,0, ! 350: 2,0, 30,33, 37,43, 2,0, ! 351: 2,0, 2,0, 2,0, 2,0, ! 352: 2,0, 2,0, 2,0, 2,0, ! 353: 2,0, 2,0, 2,0, 2,0, ! 354: 2,0, 2,0, 2,0, 2,0, ! 355: 2,0, 2,0, 2,0, 2,0, ! 356: 38,44, 2,0, 39,45, 2,6, ! 357: 2,0, 2,0, 2,0, 2,0, ! 358: 2,0, 2,0, 2,0, 2,0, ! 359: 2,7, 9,19, 2,0, 2,0, ! 360: 18,18, 18,18, 18,18, 18,18, ! 361: 18,18, 18,18, 18,18, 18,18, ! 362: 0,0, 5,16, 2,0, 2,11, ! 363: 2,0, 2,0, 2,0, 2,12, ! 364: 2,0, 5,16, 5,16, 6,6, ! 365: 0,0, 0,0, 0,0, 0,0, ! 366: 0,0, 0,0, 0,0, 6,6, ! 367: 6,0, 20,20, 20,20, 20,20, ! 368: 20,20, 20,20, 20,20, 20,20, ! 369: 20,20, 20,20, 20,20, 0,0, ! 370: 0,0, 0,0, 5,0, 2,0, ! 371: 2,0, 2,0, 2,0, 0,0, ! 372: 2,0, 0,0, 0,0, 0,0, ! 373: 6,6, 5,16, 0,0, 0,0, ! 374: 5,16, 5,16, 0,0, 0,0, ! 375: 0,0, 0,0, 0,0, 6,6, ! 376: 5,16, 0,0, 6,6, 6,6, ! 377: 0,0, 0,0, 2,14, 0,0, ! 378: 0,0, 5,16, 6,6, 2,0, ! 379: 2,0, 2,0, 2,0, 2,0, ! 380: 0,0, 0,0, 0,0, 6,6, ! 381: 0,0, 0,0, 0,0, 0,0, ! 382: 0,0, 0,0, 0,0, 0,0, ! 383: 0,0, 0,0, 0,0, 0,0, ! 384: 13,13, 0,0, 0,0, 0,0, ! 385: 0,0, 0,0, 0,0, 0,0, ! 386: 0,0, 5,16, 0,0, 0,0, ! 387: 0,0, 0,0, 0,0, 0,0, ! 388: 0,0, 0,0, 0,0, 6,6, ! 389: 13,13, 13,13, 13,13, 13,13, ! 390: 13,13, 13,13, 13,13, 13,13, ! 391: 13,13, 13,13, 13,13, 13,13, ! 392: 13,13, 13,13, 13,13, 13,13, ! 393: 13,13, 13,13, 13,13, 13,13, ! 394: 13,13, 13,13, 13,13, 13,13, ! 395: 13,13, 13,13, 0,0, 0,0, ! 396: 0,0, 0,0, 13,13, 0,0, ! 397: 13,13, 13,13, 13,13, 13,13, ! 398: 13,13, 13,13, 13,13, 13,13, ! 399: 13,13, 13,13, 13,13, 13,13, ! 400: 13,13, 13,13, 13,13, 13,13, ! 401: 13,13, 13,13, 13,13, 13,13, ! 402: 13,13, 13,13, 13,13, 13,13, ! 403: 13,13, 13,13, 19,23, 19,23, ! 404: 19,23, 19,23, 19,23, 19,23, ! 405: 19,23, 19,23, 19,23, 19,23, ! 406: 0,0, 0,0, 0,0, 0,0, ! 407: 0,0, 0,0, 0,0, 0,0, ! 408: 0,0, 0,0, 0,0, 0,0, ! 409: 0,0, 0,0, 0,0, 0,0, ! 410: 0,0, 0,0, 0,0, 0,0, ! 411: 0,0, 0,0, 0,0, 0,0, ! 412: 0,0, 0,0, 0,0, 0,0, ! 413: 0,0, 0,0, 0,0, 0,0, ! 414: 0,0, 0,0, 0,0, 0,0, ! 415: 0,0, 0,0, 0,0, 19,23, ! 416: 19,23, 19,23, 19,23, 19,23, ! 417: 19,23, 0,0, 0,0, 0,0, ! 418: 0,0}; ! 419: struct yysvf yysvec[] = { ! 420: 0, 0, 0, ! 421: yycrank+-1, 0, yyvstop+1, ! 422: yycrank+-128, yysvec+1, yyvstop+3, ! 423: yycrank+24, 0, yyvstop+5, ! 424: yycrank+42, 0, yyvstop+7, ! 425: yycrank+-184, 0, 0, ! 426: yycrank+-194, 0, yyvstop+10, ! 427: yycrank+0, 0, yyvstop+12, ! 428: yycrank+0, 0, yyvstop+14, ! 429: yycrank+53, 0, yyvstop+16, ! 430: yycrank+27, 0, yyvstop+18, ! 431: yycrank+0, 0, yyvstop+20, ! 432: yycrank+0, 0, yyvstop+22, ! 433: yycrank+227, 0, yyvstop+24, ! 434: yycrank+11, yysvec+13, yyvstop+26, ! 435: yycrank+0, 0, yyvstop+28, ! 436: yycrank+-18, yysvec+5, 0, ! 437: yycrank+61, 0, yyvstop+30, ! 438: yycrank+128, 0, yyvstop+32, ! 439: yycrank+302, 0, 0, ! 440: yycrank+157, 0, yyvstop+34, ! 441: yycrank+20, yysvec+13, yyvstop+36, ! 442: yycrank+0, 0, yyvstop+38, ! 443: yycrank+0, yysvec+19, yyvstop+40, ! 444: yycrank+18, yysvec+13, yyvstop+42, ! 445: yycrank+16, 0, 0, ! 446: yycrank+19, 0, 0, ! 447: yycrank+22, 0, 0, ! 448: yycrank+22, 0, yyvstop+44, ! 449: yycrank+23, 0, yyvstop+46, ! 450: yycrank+37, 0, yyvstop+48, ! 451: yycrank+36, 0, 0, ! 452: yycrank+37, 0, 0, ! 453: yycrank+40, 0, 0, ! 454: yycrank+36, 0, 0, ! 455: yycrank+46, 0, 0, ! 456: yycrank+46, 0, 0, ! 457: yycrank+88, 0, 0, ! 458: yycrank+106, 0, 0, ! 459: yycrank+112, 0, 0, ! 460: yycrank+0, 0, yyvstop+50, ! 461: yycrank+0, 0, yyvstop+52, ! 462: yycrank+0, 0, yyvstop+54, ! 463: yycrank+0, 0, yyvstop+56, ! 464: yycrank+0, 0, yyvstop+58, ! 465: yycrank+0, 0, yyvstop+60, ! 466: 0, 0, 0}; ! 467: struct yywork *yytop = yycrank+404; ! 468: struct yysvf *yybgin = yysvec+1; ! 469: char yymatch[] = { ! 470: 00 ,01 ,01 ,01 ,01 ,01 ,01 ,01 , ! 471: 01 ,011 ,012 ,01 ,01 ,01 ,01 ,01 , ! 472: 01 ,01 ,01 ,01 ,01 ,01 ,01 ,01 , ! 473: 01 ,01 ,01 ,01 ,01 ,01 ,01 ,01 , ! 474: 011 ,01 ,'"' ,01 ,01 ,01 ,01 ,01 , ! 475: 01 ,01 ,01 ,01 ,01 ,'-' ,01 ,01 , ! 476: '0' ,'1' ,'1' ,'1' ,'1' ,'1' ,'1' ,'1' , ! 477: '8' ,'8' ,01 ,01 ,01 ,01 ,01 ,01 , ! 478: 01 ,'A' ,'A' ,'A' ,'A' ,'A' ,'A' ,'A' , ! 479: 'A' ,'A' ,'A' ,'A' ,'A' ,'A' ,'A' ,'A' , ! 480: 'A' ,'A' ,'A' ,'A' ,'A' ,'A' ,'A' ,'A' , ! 481: 'A' ,'A' ,'A' ,01 ,01 ,01 ,01 ,'A' , ! 482: 01 ,'a' ,'a' ,'a' ,'a' ,'a' ,'a' ,'A' , ! 483: 'A' ,'A' ,'A' ,'A' ,'A' ,'A' ,'A' ,'A' , ! 484: 'A' ,'A' ,'A' ,'A' ,'A' ,'A' ,'A' ,'A' , ! 485: 'A' ,'A' ,'A' ,01 ,01 ,01 ,01 ,01 , ! 486: 0}; ! 487: char yyextra[] = { ! 488: 0,0,0,0,0,0,0,0, ! 489: 0,1,0,0,0,0,0,0, ! 490: 0,0,0,0,0,0,0,0, ! 491: 0}; ! 492: int yylineno =1; ! 493: # define YYU(x) x ! 494: # define NLSTATE yyprevious=YYNEWLINE ! 495: char yytext[YYLMAX]; ! 496: struct yysvf *yylstate [YYLMAX], **yylsp, **yyolsp; ! 497: char yysbuf[YYLMAX]; ! 498: char *yysptr = yysbuf; ! 499: int *yyfnd; ! 500: extern struct yysvf *yyestate; ! 501: int yyprevious = YYNEWLINE; ! 502: yylook(){ ! 503: register struct yysvf *yystate, **lsp; ! 504: register struct yywork *yyt; ! 505: struct yysvf *yyz; ! 506: int yych; ! 507: struct yywork *yyr; ! 508: # ifdef LEXDEBUG ! 509: int debug; ! 510: # endif ! 511: char *yylastch; ! 512: /* start off machines */ ! 513: # ifdef LEXDEBUG ! 514: debug = 0; ! 515: # endif ! 516: if (!yymorfg) ! 517: yylastch = yytext; ! 518: else { ! 519: yymorfg=0; ! 520: yylastch = yytext+yyleng; ! 521: } ! 522: for(;;){ ! 523: lsp = yylstate; ! 524: yyestate = yystate = yybgin; ! 525: if (yyprevious==YYNEWLINE) yystate++; ! 526: for (;;){ ! 527: # ifdef LEXDEBUG ! 528: if(debug)fprintf(yyout,"state %d\n",yystate-yysvec-1); ! 529: # endif ! 530: yyt = yystate->yystoff; ! 531: if(yyt == yycrank){ /* may not be any transitions */ ! 532: yyz = yystate->yyother; ! 533: if(yyz == 0)break; ! 534: if(yyz->yystoff == yycrank)break; ! 535: } ! 536: *yylastch++ = yych = input(); ! 537: tryagain: ! 538: # ifdef LEXDEBUG ! 539: if(debug){ ! 540: fprintf(yyout,"char "); ! 541: allprint(yych); ! 542: putchar('\n'); ! 543: } ! 544: # endif ! 545: yyr = yyt; ! 546: if ( (int)yyt > (int)yycrank){ ! 547: yyt = yyr + yych; ! 548: if (yyt <= yytop && yyt->verify+yysvec == yystate){ ! 549: if(yyt->advance+yysvec == YYLERR) /* error transitions */ ! 550: {unput(*--yylastch);break;} ! 551: *lsp++ = yystate = yyt->advance+yysvec; ! 552: goto contin; ! 553: } ! 554: } ! 555: # ifdef YYOPTIM ! 556: else if((int)yyt < (int)yycrank) { /* r < yycrank */ ! 557: yyt = yyr = yycrank+(yycrank-yyt); ! 558: # ifdef LEXDEBUG ! 559: if(debug)fprintf(yyout,"compressed state\n"); ! 560: # endif ! 561: yyt = yyt + yych; ! 562: if(yyt <= yytop && yyt->verify+yysvec == yystate){ ! 563: if(yyt->advance+yysvec == YYLERR) /* error transitions */ ! 564: {unput(*--yylastch);break;} ! 565: *lsp++ = yystate = yyt->advance+yysvec; ! 566: goto contin; ! 567: } ! 568: yyt = yyr + YYU(yymatch[yych]); ! 569: # ifdef LEXDEBUG ! 570: if(debug){ ! 571: fprintf(yyout,"try fall back character "); ! 572: allprint(YYU(yymatch[yych])); ! 573: putchar('\n'); ! 574: } ! 575: # endif ! 576: if(yyt <= yytop && yyt->verify+yysvec == yystate){ ! 577: if(yyt->advance+yysvec == YYLERR) /* error transition */ ! 578: {unput(*--yylastch);break;} ! 579: *lsp++ = yystate = yyt->advance+yysvec; ! 580: goto contin; ! 581: } ! 582: } ! 583: if ((yystate = yystate->yyother) && (yyt= yystate->yystoff) != yycrank){ ! 584: # ifdef LEXDEBUG ! 585: if(debug)fprintf(yyout,"fall back to state %d\n",yystate-yysvec-1); ! 586: # endif ! 587: goto tryagain; ! 588: } ! 589: # endif ! 590: else ! 591: {unput(*--yylastch);break;} ! 592: contin: ! 593: # ifdef LEXDEBUG ! 594: if(debug){ ! 595: fprintf(yyout,"state %d char ",yystate-yysvec-1); ! 596: allprint(yych); ! 597: putchar('\n'); ! 598: } ! 599: # endif ! 600: ; ! 601: } ! 602: # ifdef LEXDEBUG ! 603: if(debug){ ! 604: fprintf(yyout,"stopped at %d with ",*(lsp-1)-yysvec-1); ! 605: allprint(yych); ! 606: putchar('\n'); ! 607: } ! 608: # endif ! 609: while (lsp-- > yylstate){ ! 610: *yylastch-- = 0; ! 611: if (*lsp != 0 && (yyfnd= (*lsp)->yystops) && *yyfnd > 0){ ! 612: yyolsp = lsp; ! 613: if(yyextra[*yyfnd]){ /* must backup */ ! 614: while(yyback((*lsp)->yystops,-*yyfnd) != 1 && lsp > yylstate){ ! 615: lsp--; ! 616: unput(*yylastch--); ! 617: } ! 618: } ! 619: yyprevious = YYU(*yylastch); ! 620: yylsp = lsp; ! 621: yyleng = yylastch-yytext+1; ! 622: yytext[yyleng] = 0; ! 623: # ifdef LEXDEBUG ! 624: if(debug){ ! 625: fprintf(yyout,"\nmatch "); ! 626: sprint(yytext); ! 627: fprintf(yyout," action %d\n",*yyfnd); ! 628: } ! 629: # endif ! 630: return(*yyfnd++); ! 631: } ! 632: unput(*yylastch); ! 633: } ! 634: if (yytext[0] == 0 /* && feof(yyin) */) ! 635: { ! 636: yysptr=yysbuf; ! 637: return(0); ! 638: } ! 639: yyprevious = yytext[0] = input(); ! 640: if (yyprevious>0) ! 641: output(yyprevious); ! 642: yylastch=yytext; ! 643: # ifdef LEXDEBUG ! 644: if(debug)putchar('\n'); ! 645: # endif ! 646: } ! 647: } ! 648: yyback(p, m) ! 649: int *p; ! 650: { ! 651: if (p==0) return(0); ! 652: while (*p) ! 653: { ! 654: if (*p++ == m) ! 655: return(1); ! 656: } ! 657: return(0); ! 658: } ! 659: /* the following are only used in the lex library */ ! 660: yyinput(){ ! 661: return(input()); ! 662: } ! 663: yyoutput(c) ! 664: int c; { ! 665: output(c); ! 666: } ! 667: yyunput(c) ! 668: int c; { ! 669: unput(c); ! 670: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.