1 %{ 2 /* $NetBSD: scan.l,v 1.6 2011/09/23 14:14:38 nonaka Exp $ */ 3 4 /*- 5 * Copyright (c) 1999 6 * Shin Takemura and PocketBSD Project. All rights reserved. 7 * 8 * Redistribution and use in source and binary forms, with or without 9 * modification, are permitted provided that the following conditions 10 * are met: 11 * 1. Redistributions of source code must retain the above copyright 12 * notice, this list of conditions and the following disclaimer. 13 * 2. Redistributions in binary form must reproduce the above copyright 14 * notice, this list of conditions and the following disclaimer in the 15 * documentation and/or other materials provided with the distribution. 16 * 3. All advertising materials mentioning features or use of this software 17 * must display the following acknowledgement: 18 * This product includes software developed by the PocketBSD project 19 * and its contributors. 20 * 4. Neither the name of the project nor the names of its contributors 21 * may be used to endorse or promote products derived from this software 22 * without specific prior written permission. 23 * 24 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND 25 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 26 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 27 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE 28 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 29 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 30 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 31 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 32 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 33 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 34 * SUCH DAMAGE. 35 * 36 */ 37 38 #include <strings.h> 39 #include "gram.h" 40 41 #include "platid_gen.h" 42 43 int yyline; 44 char *getstr(char *); 45 void getcomment(void); 46 int yyparse(void); 47 void yyerror(const char *); 48 %} 49 50 %option noyywrap 51 52 %% 53 #[^\n]*\n { yylval.str = strdup(yytext); yyline++; return DIRECTIVE; } 54 \"([^"]|\\\")*\" { yylval.str = getstr(yytext); return NAME; } 55 [a-zA-Z][0-9a-zA-Z]* { yylval.str = strdup(yytext); return FSYM; } 56 [a-zA-Z][_0-9a-zA-Z]* { yylval.str = strdup(yytext); return MOD; } 57 [0-9a-zA-Z]+ { yylval.str = strdup(yytext); return SYM; } 58 \n { yyline++; } 59 "/*" { getcomment(); } 60 [ \t]+ { /* ignored */; } 61 . { return yytext[0]; } 62 63 %% 64 65 char* 66 getstr(char*s) 67 { 68 char *res, *p, *p2; 69 res = strdup(s + 1); 70 for (p = p2 = res; *p != '\"'; p++) { 71 if (*p == '\\') { 72 *p2++ = *++p; 73 } else { 74 *p2++ = *p; 75 } 76 } 77 *p2 = '\0'; 78 return (res); 79 } 80 81 void 82 getcomment() 83 { 84 int c; 85 86 for ( ; ; ) { 87 while ( (c = input()) != '*' && c != EOF ) { 88 if (c == '\n') yyline++; 89 } 90 if (c == '\n') yyline++; 91 92 if ( c == '*' ) { 93 while ( (c = input()) == '*' ) { 94 if (c == '\n') yyline++; 95 } 96 if (c == '\n') yyline++; 97 if ( c == '/' ) 98 break; /* found the end */ 99 } 100 101 if ( c == EOF ) { 102 yyerror( "EOF in comment" ); 103 break; 104 } 105 } 106 } 107 108 int 109 read_def() 110 { 111 yyline = 1; 112 def_tree = NULL; 113 return yyparse(); 114 } 115