1 /* ------------------------------------------------
2 Copyright 2014 AT&T Intellectual Property
3 Licensed under the Apache License, Version 2.0 (the "License");
4 you may not use this file except in compliance with the License.
5 You may obtain a copy of the License at
7 http://www.apache.org/licenses/LICENSE-2.0
9 Unless required by applicable law or agreed to in writing, software
10 distributed under the License is distributed on an "AS IS" BASIS,
11 WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
12 See the License for the specific language governing permissions and
13 limitations under the License.
14 ------------------------------------------- */
19 flex -PNicParser -oniclexer.cc nic.l
25 * AT&T lex can't handle this lexer due to lex bugs. It works with flex
26 * 2.3.7, pclex 2.0.5, and MKS lex 3.1a.
34 #include "nic.tab.cc.h"
37 Some includes that flex doesn't include as standard,
45 // Prevent flex from defining yywrap as extern "C"
47 #define YY_SKIP_YYWRAP
49 /* No lex lib, supply the yywrap fcn. that normally resides there
52 int NicParserwrap(){return(1);}
54 extern int NicParserdebug;
58 These variables are used for error reporting:
59 flex_nic_lineno : the line currently being parsed when the error occurs.
60 flex_nic_ch : the character on the line where the error occurs
61 flex_nic_linebuf : store the line for reporting.
63 NOTE : 1) the fixed size flex_nic_linebuf buffer is dangerous.
64 2) You might get pointed to a place shortly after
65 where the syntax error occurs. It is close enough
69 int flex_nic_lineno = 1;
71 char flex_nic_linebuf[20000];
73 char *flex_nic_stringinput = NULL;
74 int flex_nic_stringinput_ptr = 0;
75 FILE *flex_nic_fileinput = NULL;
76 int my_NicParser_yyinput(char *buf, int max_size);
80 void NicParsererror(char *s){
82 fprintf(stderr,"On line %d, char %d: %s (token %s):\n%s\n",
83 flex_nic_lineno, flex_nic_ch, s, NicParsertext, flex_nic_linebuf );
84 for(i=0;i<flex_nic_ch;i++){
85 if(flex_nic_linebuf[i] == '\t'){
91 fprintf(stderr,"^\n");
92 // fprintf(stderr,"%*s\n",1+flex_nic_ch,"^");
96 #define YY_INPUT(b, r, ms) (r = my_NicParser_yyinput(b,ms))
99 /* MKS needs the next line to increase the NFA table */
105 /* literal keyword tokens */
108 The actions associated with each text token are to
109 keep track of the current location (for syntax error reporting)
110 and to report any necessary info to the emf.y parse tree builder
112 Its likely that there are a number of omissions, inconsistencies
113 (some keywords do not need to be in caps), and relics
114 (keywords such as BETWEEN, INDICATOR, etc., are not used
116 This parser is somewhat of a work in progress.
121 OPTIONS: { flex_nic_ch+=NicParserleng; return OPTIONS; }
122 FUNCTIONS: { flex_nic_ch+=NicParserleng; return FUNC; }
123 TYPES: { flex_nic_ch+=NicParserleng; return TYPES; }
124 UNARY_OPS: { flex_nic_ch+=NicParserleng; return UNARY_OPS; }
125 BINARY_OPS: { flex_nic_ch+=NicParserleng; return BINARY_OPS; }
126 MISSING_FIELDS: { flex_nic_ch+=NicParserleng; return FIELDS; }
128 [;,=] { flex_nic_ch+=NicParserleng; return yytext[0]; }
132 [A-Za-z_][A-Za-z0-9_]* { flex_nic_ch+=NicParserleng; NicParserlval.strval = strdup(yytext); return NAME; }
141 NicParserlval.strval = strdup(NicParsertext+1);
145 unput(c); /* just peeking */
147 flex_nic_ch+=NicParserleng;
148 NicParserlval.strval[NicParserleng-2] = '\0';
154 '[^'\n]*$ { flex_nic_ch+=NicParserleng; NicParsererror("Unterminated string"); }
157 /* Newline : advance the error reporting line number */
158 /* and grab the next line into flex_nic_linebuf */
161 \n.* {flex_nic_ch=0; flex_nic_lineno++;
162 strcpy(flex_nic_linebuf,NicParsertext+1);
166 [ \t\r]+ {flex_nic_ch+=NicParserleng; } /* white space */
168 "--".*$ {flex_nic_ch+=NicParserleng; }; /* comment */
169 "//".*$ {flex_nic_ch+=NicParserleng; }; /* comment */
171 .|\n {flex_nic_ch+=NicParserleng; fprintf(stderr,"Warning: unknown token (ignored)\n"); NicParsererror(yytext);}
175 int my_NicParser_yyinput(char *buf, int max_size){
179 if(flex_nic_stringinput != NULL){
181 if(flex_nic_stringinput[flex_nic_stringinput_ptr] != '\0'){
182 buf[c++] = flex_nic_stringinput[flex_nic_stringinput_ptr++];
190 if(flex_nic_fileinput != NULL){
192 inchar = getc(flex_nic_fileinput);
205 void NicParser_setfileinput(FILE *f){
206 NicParserrestart(NULL);
208 flex_nic_fileinput = f;
209 flex_nic_stringinput = NULL;
214 void NicParser_setstringinput(char *s){
215 NicParserrestart(NULL);
217 flex_nic_fileinput = NULL;
218 flex_nic_stringinput = s;
219 flex_nic_stringinput_ptr = 0;