/* -----------------------------------------------------------------------------
|
/* -----------------------------------------------------------------------------
|
*
|
*
|
* SystemC to Verilog Translator v0.4
|
* SystemC to Verilog Translator v0.4
|
* Provided by Universidad Rey Juan Carlos
|
* Provided by Universidad Rey Juan Carlos
|
*
|
*
|
* -----------------------------------------------------------------------------
|
* -----------------------------------------------------------------------------
|
* This program is free software; you can redistribute it and/or modify
|
* 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
|
* it under the terms of the GNU General Public License as published by
|
* the Free Software Foundation; either version 2 of the License, or
|
* the Free Software Foundation; either version 2 of the License, or
|
* (at your option) any later version.
|
* (at your option) any later version.
|
*
|
*
|
* This program is distributed in the hope that it will be useful,
|
* This program is distributed in the hope that it will be useful,
|
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
* GNU Library General Public License for more details.
|
* GNU Library General Public License for more details.
|
*
|
*
|
* You should have received a copy of the GNU General Public License
|
* You should have received a copy of the GNU General Public License
|
* along with this program; if not, write to the Free Software
|
* along with this program; if not, write to the Free Software
|
* Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
|
* Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
|
*/
|
*/
|
|
|
%{
|
%{
|
#include
|
#include
|
#include "y.tab.h"
|
#include "y.tab.h"
|
|
|
extern int yylval;
|
extern int yylval;
|
extern FILE* yyin;
|
extern FILE* yyin;
|
extern FILE* yyout;
|
extern FILE* yyout;
|
|
|
extern int lineno;
|
extern int lineno;
|
|
|
int includefound = 0;
|
int includefound = 0;
|
int linecomment = 0;
|
int linecomment = 0;
|
int multilinecomment = 0;
|
int multilinecomment = 0;
|
%}
|
%}
|
|
|
%%
|
%%
|
"\t" /* ignore whitespace */
|
"\t" /* ignore whitespace */
|
" " /* ignore whitespace */
|
" " /* ignore whitespace */
|
[0-9]+ if(!includefound & !linecomment & !multilinecomment) {
|
[0-9]+ if(!includefound & !linecomment & !multilinecomment) {
|
yylval=atoi(yytext);
|
yylval=atoi(yytext);
|
return NUMBER;
|
return NUMBER;
|
}
|
}
|
SC_MODULE if(!includefound & !linecomment & !multilinecomment) return SC_MODULE;
|
SC_MODULE if(!includefound & !linecomment & !multilinecomment) return SC_MODULE;
|
SC_METHOD if(!includefound & !linecomment & !multilinecomment) return SC_METHOD;
|
SC_METHOD if(!includefound & !linecomment & !multilinecomment) return SC_METHOD;
|
SC_CTOR if(!includefound & !linecomment & !multilinecomment) return SC_CTOR;
|
SC_CTOR if(!includefound & !linecomment & !multilinecomment) return SC_CTOR;
|
"void" if(!includefound & !linecomment & !multilinecomment) return VOID;
|
"void" if(!includefound & !linecomment & !multilinecomment) return VOID;
|
sensitive_pos if(!includefound & !linecomment & !multilinecomment) return SENSITIVE_POS;
|
sensitive_pos if(!includefound & !linecomment & !multilinecomment) return SENSITIVE_POS;
|
|
.pos\(\) if(!includefound & !linecomment & !multilinecomment) return POS;
|
sensitive_neg if(!includefound & !linecomment & !multilinecomment) return SENSITIVE_NEG;
|
sensitive_neg if(!includefound & !linecomment & !multilinecomment) return SENSITIVE_NEG;
|
sensitive if(!includefound & !linecomment & !multilinecomment) return SENSITIVE;
|
sensitive if(!includefound & !linecomment & !multilinecomment) return SENSITIVE;
|
"<<" if(!includefound & !linecomment & !multilinecomment) return SENSIBLE;
|
"<<" if(!includefound & !linecomment & !multilinecomment) return SENSIBLE;
|
sc_in if(!includefound & !linecomment & !multilinecomment) return SC_IN;
|
sc_in if(!includefound & !linecomment & !multilinecomment) return SC_IN;
|
sc_out if(!includefound & !linecomment & !multilinecomment) return SC_OUT;
|
sc_out if(!includefound & !linecomment & !multilinecomment) return SC_OUT;
|
sc_signal if(!includefound & !linecomment & !multilinecomment) return SC_SIGNAL;
|
sc_signal if(!includefound & !linecomment & !multilinecomment) return SC_SIGNAL;
|
"bool" if(!includefound & !linecomment & !multilinecomment) return BOOL;
|
"bool" if(!includefound & !linecomment & !multilinecomment) return BOOL;
|
"<" if(!includefound & !linecomment & !multilinecomment) return MENOR;
|
"<" if(!includefound & !linecomment & !multilinecomment) return MENOR;
|
">" if(!includefound & !linecomment & !multilinecomment) return MAYOR;
|
">" if(!includefound & !linecomment & !multilinecomment) return MAYOR;
|
sc_int if(!includefound & !linecomment & !multilinecomment) return SC_SGNREG;
|
sc_int if(!includefound & !linecomment & !multilinecomment) return SC_SGNREG;
|
sc_uint if(!includefound & !linecomment & !multilinecomment) return SC_REG;
|
sc_uint if(!includefound & !linecomment & !multilinecomment) return SC_REG;
|
sc_bigint if(!includefound & !linecomment & !multilinecomment) return SC_SGNREG;
|
sc_bigint if(!includefound & !linecomment & !multilinecomment) return SC_SGNREG;
|
sc_biguint if(!includefound & !linecomment & !multilinecomment) return SC_REG;
|
sc_biguint if(!includefound & !linecomment & !multilinecomment) return SC_REG;
|
\( if(!includefound & !linecomment & !multilinecomment) return OPENPAR;
|
\( if(!includefound & !linecomment & !multilinecomment) return OPENPAR;
|
\) if(!includefound & !linecomment & !multilinecomment) return CLOSEPAR;
|
\) if(!includefound & !linecomment & !multilinecomment) return CLOSEPAR;
|
; if(!includefound & !linecomment & !multilinecomment) return SEMICOLON;
|
; if(!includefound & !linecomment & !multilinecomment) return SEMICOLON;
|
"enum" if(!includefound & !linecomment & !multilinecomment) return ENUM;
|
"enum" if(!includefound & !linecomment & !multilinecomment) return ENUM;
|
"," if(!includefound & !linecomment & !multilinecomment) return COLON;
|
"," if(!includefound & !linecomment & !multilinecomment) return COLON;
|
"{" if(!includefound & !linecomment & !multilinecomment) return OPENKEY;
|
"{" if(!includefound & !linecomment & !multilinecomment) return OPENKEY;
|
"}" if(!includefound & !linecomment & !multilinecomment) return CLOSEKEY;
|
"}" if(!includefound & !linecomment & !multilinecomment) return CLOSEKEY;
|
"->" if(!includefound & !linecomment & !multilinecomment) return ARROW;
|
"->" if(!includefound & !linecomment & !multilinecomment) return ARROW;
|
"=" if(!includefound & !linecomment & !multilinecomment) return EQUALS;
|
"=" if(!includefound & !linecomment & !multilinecomment) return EQUALS;
|
"new" if(!includefound & !linecomment & !multilinecomment) return NEW;
|
"new" if(!includefound & !linecomment & !multilinecomment) return NEW;
|
"\"" if(!includefound & !linecomment & !multilinecomment) return QUOTE;
|
"\"" if(!includefound & !linecomment & !multilinecomment) return QUOTE;
|
[a-zA-Z][a-z_A-Z0-9]* if(!includefound & !linecomment & !multilinecomment) {
|
[a-zA-Z][a-z_A-Z0-9]* if(!includefound & !linecomment & !multilinecomment) {
|
yylval=(int)strdup(yytext);
|
yylval=(int)strdup(yytext);
|
return WORD;
|
return WORD;
|
}
|
}
|
"[" if(!includefound & !linecomment & !multilinecomment) {
|
"[" if(!includefound & !linecomment & !multilinecomment) {
|
yylval=(int)strdup(yytext);
|
yylval=(int)strdup(yytext);
|
return OPENCORCH;
|
return OPENCORCH;
|
}
|
}
|
"]" if(!includefound & !linecomment & !multilinecomment) {
|
"]" if(!includefound & !linecomment & !multilinecomment) {
|
yylval=(int)strdup(yytext);
|
yylval=(int)strdup(yytext);
|
return CLOSECORCH;
|
return CLOSECORCH;
|
}
|
}
|
|
|
"*" if(!includefound & !linecomment & !multilinecomment) return ASTERISCO;
|
"*" if(!includefound & !linecomment & !multilinecomment) return ASTERISCO;
|
"\n" includefound = 0; linecomment = 0; lineno++;
|
"\n" includefound = 0; linecomment = 0; lineno++;
|
"\\\n" lineno++;/* no new line */
|
"\\\n" lineno++;/* no new line */
|
"$" /* ignore */
|
"$" /* ignore */
|
"." /* ignore */
|
"." /* ignore */
|
":" /* ignore */
|
":" /* ignore */
|
"#include" includefound = 1;
|
"#include" includefound = 1;
|
|
"#ifdef" if (!multilinecomment) linecomment = 1;
|
|
"#define" if (!multilinecomment) linecomment = 1;
|
|
"#ifndef" if (!multilinecomment) linecomment = 1;
|
|
"#else" if (!multilinecomment) linecomment = 1;
|
|
"#endif" if (!multilinecomment) linecomment = 1;
|
"//" if (!multilinecomment) linecomment = 1;
|
"//" if (!multilinecomment) linecomment = 1;
|
"/*" if (!linecomment) multilinecomment = 1;
|
"/*" if (!linecomment) multilinecomment = 1;
|
"*/" if (multilinecomment) multilinecomment = 0;
|
"*/" if (multilinecomment) multilinecomment = 0;
|
"-"
|
"-"
|
[.:~@#^!%/+'*_"&""?""|""\\"]
|
[.:~@#^!%/+'*_"&""?""|""\\"]
|
|
|
"("[ ]*"sc_uint"[ ]*"<"[ ]*[0-9]+[ ]*">"[ ]*")"
|
"("[ ]*"sc_uint"[ ]*"<"[ ]*[0-9]+[ ]*">"[ ]*")"
|
"("[ ]*"sc_biguint"[ ]*"<"[ ]*[0-9]+[ ]*">"[ ]*")"
|
"("[ ]*"sc_biguint"[ ]*"<"[ ]*[0-9]+[ ]*">"[ ]*")"
|
"("[ ]*"sc_int"[ ]*"<"[ ]*[0-9]+[ ]*">"[ ]*")"
|
"("[ ]*"sc_int"[ ]*"<"[ ]*[0-9]+[ ]*">"[ ]*")"
|
"("[ ]*"sc_bigint"[ ]*"<"[ ]*[0-9]+[ ]*">"[ ]*")"
|
"("[ ]*"sc_bigint"[ ]*"<"[ ]*[0-9]+[ ]*">"[ ]*")"
|
"("[ ]*"int"[ ]*")"
|
"("[ ]*"int"[ ]*")"
|
|
|
"//"[ ]*[tT][rR][aA][nN][sS][lL][aA][tT][eE][ ]*[oO][fF][fF] return TRANSLATEOFF; /*Translate directive*/
|
"//"[ ]*[tT][rR][aA][nN][sS][lL][aA][tT][eE][ ]*[oO][fF][fF] return TRANSLATEOFF; /*Translate directive*/
|
"//"[ ]*[tT][rR][aA][nN][sS][lL][aA][tT][eE][ ]*[oO][nN] return TRANSLATEON; /*Translate directive*/
|
"//"[ ]*[tT][rR][aA][nN][sS][lL][aA][tT][eE][ ]*[oO][nN] return TRANSLATEON; /*Translate directive*/
|
%%
|
%%
|
|
|