%{ /* * Copyright (c) 1983 Regents of the University of California. * All rights reserved. * * Redistribution and use in source and binary forms are permitted * provided that the above copyright notice and this paragraph are * duplicated in all such forms and that any documentation, * advertising materials, and other materials related to such * distribution and use acknowledge that the software was developed * by the University of California, Berkeley. The name of the * University may not be used to endorse or promote products derived * from this software without specific prior written permission. * THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR * IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED * WARRANTIES OF MERCHANTIBILITY AND FITNESS FOR A PARTICULAR PURPOSE. */ #ifndef lint static char sccsid[] = "@(#)scan.l 5.7 (Berkeley) 06/25/90"; #endif /* not lint */ extern int yylineno; int yylineno = 1; #include "y.tab.h" #include "htable.h" %} BLANK [ \t] DIGIT [0-9] ALPHA [A-Za-z] ANUM [0-9A-Za-z] NAMECHR [0-9A-Za-z./-] %% "NET" { yylval.number = KW_NET; return (KEYWORD); } "GATEWAY" { yylval.number = KW_GATEWAY; return (KEYWORD); } "HOST" { yylval.number = KW_HOST; return (KEYWORD); } {ALPHA}{NAMECHR}*{ANUM} { yylval.namelist = newname(yytext); return (NAME); } {ALPHA} { yylval.namelist = newname(yytext); return (NAME); } {DIGIT}+{ALPHA}{NAMECHR}* { fprintf(stderr, "Warning: nonstandard name \"%s\"\n", yytext); yylval.namelist = newname(yytext); return (NAME); } {DIGIT}+ { yylval.number = atoi(yytext); return (NUMBER); } "." return ('.'); ":" return (':'); "," return (','); "/" return ('/'); ";".* ; "\n"{BLANK}+ ++yylineno; {BLANK}+ ; "\n" ++yylineno; return (END); . fprintf(stderr, "Illegal char: '%s'\n", yytext); %%