/*
Copyright(C) 2016, Red Hat, Inc., Jerome Marchand
This program is free software: you can redistribute it and/or modify
it under the terms of the GNU General Public License as published by
the Free Software Foundation, either version 3 of the License, or
(at your option) any later version.
This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
GNU General Public License for more details.
You should have received a copy of the GNU General Public License
along with this program. If not, see <http://www.gnu.org/licenses/>.
*/
NUM [0-9]
ALPHA [a-zA-Z]
IDENT_FIRST [a-zA-Z_]
IDENT [a-zA-Z0-9_]
FILECHAR [a-zA-Z0-9_/<>\-\.]
HEX [a-fA-F0-9]
%{
#include "parser.h"
#include "parser.tab.h"
%}
%option nounput
%option noyywrap
%s SYMBOL
%x IN_STRING UNKNOWN_FIELD
%%
static int last_sc = INITIAL;
<SYMBOL>{ /* Keywords used by symbol declaration */
"const" { return(CONST); }
"enum" { return(ENUM); }
"struct" { return(STRUCT); }
"typedef" { return(TYPEDEF); }
"union" { return(UNION); }
"volatile" { return(VOLATILE); }
"..." { return(ELLIPSIS); }
}
<INITIAL,UNKNOWN_FIELD>{ /* keywords used only in the header */
"Version:" { BEGIN(INITIAL); return(VERSION_KW); }
"CU:" { BEGIN(INITIAL); return(CU_KW); }
"File:" { BEGIN(INITIAL); return(FILE_KW); }
"Stack:" { BEGIN(INITIAL); return(STACK_KW); }
"Symbol:\n" { BEGIN(SYMBOL); return(SYMBOL_KW_NL); }
{IDENT}+":" { BEGIN(UNKNOWN_FIELD); }
}
<UNKNOWN_FIELD>{ /* Ignore unknown fields. */
[^\n:]*"\n" { ; }
/* A line that doesn't start with {IDENT}+":", i.e. not a valid field */
{IDENT}*[^a-zA-Z0-9_\n:]+{IDENT}*[^\n]*"\n" { ; }
}
"->" { return(ARROW); }
{FILECHAR}+"."[chS]|"<built-in>" { yylval.str = strdup(yytext);
debug("Source file: %s\n", yylval.str);
return(SRCFILE);
}
{IDENT_FIRST}{IDENT}* { yylval.str = strdup(yytext);
debug("Identifier: %s\n", yylval.str);
return(IDENTIFIER);
}
"(NULL)" { yylval.str = NULL;
debug("Identifier: (NULL)\n");
return(IDENTIFIER);
}
0[xX]{HEX}+ { yylval.ul = strtoul(yytext, NULL, 16);
debug("Constant: 0x%lx\n", yylval.ul);
return(CONSTANT);
}
{NUM}+ { yylval.ul = strtoul(yytext, NULL, 10);
debug("Constant: %li\n", yylval.ul);
return(CONSTANT);
}
[{}()\[\];:,.*@=-] { return(yytext[0]); }
"\n" { return(NEWLINE); }
[ \t\v\f] { ; }
"\"" { last_sc = YY_START; BEGIN(IN_STRING); }
<IN_STRING>[^"]* { yylval.str = strdup(yytext);
debug("String: %s\n", yylval.str);
return(STRING);
}
<IN_STRING>"\"" { BEGIN(last_sc); }
. { printf("Unexpected entry \"%c\"\n", *yytext); }
/* Get back to initial condition or we'll start the next file in SYMBOL */
<<EOF>> { BEGIN(INITIAL); yyterminate(); }
%%