Branch data Line data Source code
1 : : #line 2 "scan_citi.cpp"
2 : :
3 : : #line 4 "scan_citi.cpp"
4 : :
5 : : #define YY_INT_ALIGNED short int
6 : :
7 : : /* A lexical scanner generated by flex */
8 : :
9 : : #define yy_create_buffer citi__create_buffer
10 : : #define yy_delete_buffer citi__delete_buffer
11 : : #define yy_flex_debug citi__flex_debug
12 : : #define yy_init_buffer citi__init_buffer
13 : : #define yy_flush_buffer citi__flush_buffer
14 : : #define yy_load_buffer_state citi__load_buffer_state
15 : : #define yy_switch_to_buffer citi__switch_to_buffer
16 : : #define yyin citi_in
17 : : #define yyleng citi_leng
18 : : #define yylex citi_lex
19 : : #define yylineno citi_lineno
20 : : #define yyout citi_out
21 : : #define yyrestart citi_restart
22 : : #define yytext citi_text
23 : : #define yywrap citi_wrap
24 : : #define yyalloc citi_alloc
25 : : #define yyrealloc citi_realloc
26 : : #define yyfree citi_free
27 : :
28 : : #define FLEX_SCANNER
29 : : #define YY_FLEX_MAJOR_VERSION 2
30 : : #define YY_FLEX_MINOR_VERSION 5
31 : : #define YY_FLEX_SUBMINOR_VERSION 37
32 : : #if YY_FLEX_SUBMINOR_VERSION > 0
33 : : #define FLEX_BETA
34 : : #endif
35 : :
36 : : /* First, we deal with platform-specific or compiler-specific issues. */
37 : :
38 : : /* begin standard C headers. */
39 : : #include <stdio.h>
40 : : #include <string.h>
41 : : #include <errno.h>
42 : : #include <stdlib.h>
43 : :
44 : : /* end standard C headers. */
45 : :
46 : : /* flex integer type definitions */
47 : :
48 : : #ifndef FLEXINT_H
49 : : #define FLEXINT_H
50 : :
51 : : /* C99 systems have <inttypes.h>. Non-C99 systems may or may not. */
52 : :
53 : : #if defined (__STDC_VERSION__) && __STDC_VERSION__ >= 199901L
54 : :
55 : : /* C99 says to define __STDC_LIMIT_MACROS before including stdint.h,
56 : : * if you want the limit (max/min) macros for int types.
57 : : */
58 : : #ifndef __STDC_LIMIT_MACROS
59 : : #define __STDC_LIMIT_MACROS 1
60 : : #endif
61 : :
62 : : #include <inttypes.h>
63 : : typedef int8_t flex_int8_t;
64 : : typedef uint8_t flex_uint8_t;
65 : : typedef int16_t flex_int16_t;
66 : : typedef uint16_t flex_uint16_t;
67 : : typedef int32_t flex_int32_t;
68 : : typedef uint32_t flex_uint32_t;
69 : : #else
70 : : typedef signed char flex_int8_t;
71 : : typedef short int flex_int16_t;
72 : : typedef int flex_int32_t;
73 : : typedef unsigned char flex_uint8_t;
74 : : typedef unsigned short int flex_uint16_t;
75 : : typedef unsigned int flex_uint32_t;
76 : :
77 : : /* Limits of integral types. */
78 : : #ifndef INT8_MIN
79 : : #define INT8_MIN (-128)
80 : : #endif
81 : : #ifndef INT16_MIN
82 : : #define INT16_MIN (-32767-1)
83 : : #endif
84 : : #ifndef INT32_MIN
85 : : #define INT32_MIN (-2147483647-1)
86 : : #endif
87 : : #ifndef INT8_MAX
88 : : #define INT8_MAX (127)
89 : : #endif
90 : : #ifndef INT16_MAX
91 : : #define INT16_MAX (32767)
92 : : #endif
93 : : #ifndef INT32_MAX
94 : : #define INT32_MAX (2147483647)
95 : : #endif
96 : : #ifndef UINT8_MAX
97 : : #define UINT8_MAX (255U)
98 : : #endif
99 : : #ifndef UINT16_MAX
100 : : #define UINT16_MAX (65535U)
101 : : #endif
102 : : #ifndef UINT32_MAX
103 : : #define UINT32_MAX (4294967295U)
104 : : #endif
105 : :
106 : : #endif /* ! C99 */
107 : :
108 : : #endif /* ! FLEXINT_H */
109 : :
110 : : #ifdef __cplusplus
111 : :
112 : : /* The "const" storage-class-modifier is valid. */
113 : : #define YY_USE_CONST
114 : :
115 : : #else /* ! __cplusplus */
116 : :
117 : : /* C99 requires __STDC__ to be defined as 1. */
118 : : #if defined (__STDC__)
119 : :
120 : : #define YY_USE_CONST
121 : :
122 : : #endif /* defined (__STDC__) */
123 : : #endif /* ! __cplusplus */
124 : :
125 : : #ifdef YY_USE_CONST
126 : : #define yyconst const
127 : : #else
128 : : #define yyconst
129 : : #endif
130 : :
131 : : /* Returned upon end-of-file. */
132 : : #define YY_NULL 0
133 : :
134 : : /* Promotes a possibly negative, possibly signed char to an unsigned
135 : : * integer for use as an array index. If the signed char is negative,
136 : : * we want to instead treat it as an 8-bit unsigned char, hence the
137 : : * double cast.
138 : : */
139 : : #define YY_SC_TO_UI(c) ((unsigned int) (unsigned char) c)
140 : :
141 : : /* Enter a start condition. This macro really ought to take a parameter,
142 : : * but we do it the disgusting crufty way forced on us by the ()-less
143 : : * definition of BEGIN.
144 : : */
145 : : #define BEGIN (yy_start) = 1 + 2 *
146 : :
147 : : /* Translate the current start state into a value that can be later handed
148 : : * to BEGIN to return to the state. The YYSTATE alias is for lex
149 : : * compatibility.
150 : : */
151 : : #define YY_START (((yy_start) - 1) / 2)
152 : : #define YYSTATE YY_START
153 : :
154 : : /* Action number for EOF rule of a given start state. */
155 : : #define YY_STATE_EOF(state) (YY_END_OF_BUFFER + state + 1)
156 : :
157 : : /* Special action meaning "start processing a new file". */
158 : : #define YY_NEW_FILE citi_restart(citi_in )
159 : :
160 : : #define YY_END_OF_BUFFER_CHAR 0
161 : :
162 : : /* Size of default input buffer. */
163 : : #ifndef YY_BUF_SIZE
164 : : #define YY_BUF_SIZE 16384
165 : : #endif
166 : :
167 : : /* The state buf must be large enough to hold one state per character in the main buffer.
168 : : */
169 : : #define YY_STATE_BUF_SIZE ((YY_BUF_SIZE + 2) * sizeof(yy_state_type))
170 : :
171 : : #ifndef YY_TYPEDEF_YY_BUFFER_STATE
172 : : #define YY_TYPEDEF_YY_BUFFER_STATE
173 : : typedef struct yy_buffer_state *YY_BUFFER_STATE;
174 : : #endif
175 : :
176 : : #ifndef YY_TYPEDEF_YY_SIZE_T
177 : : #define YY_TYPEDEF_YY_SIZE_T
178 : : typedef size_t yy_size_t;
179 : : #endif
180 : :
181 : : extern yy_size_t citi_leng;
182 : :
183 : : extern FILE *citi_in, *citi_out;
184 : :
185 : : #define EOB_ACT_CONTINUE_SCAN 0
186 : : #define EOB_ACT_END_OF_FILE 1
187 : : #define EOB_ACT_LAST_MATCH 2
188 : :
189 : : /* Note: We specifically omit the test for yy_rule_can_match_eol because it requires
190 : : * access to the local variable yy_act. Since yyless() is a macro, it would break
191 : : * existing scanners that call yyless() from OUTSIDE citi_lex.
192 : : * One obvious solution it to make yy_act a global. I tried that, and saw
193 : : * a 5% performance hit in a non-citi_lineno scanner, because yy_act is
194 : : * normally declared as a register variable-- so it is not worth it.
195 : : */
196 : : #define YY_LESS_LINENO(n) \
197 : : do { \
198 : : int yyl;\
199 : : for ( yyl = n; yyl < citi_leng; ++yyl )\
200 : : if ( citi_text[yyl] == '\n' )\
201 : : --citi_lineno;\
202 : : }while(0)
203 : :
204 : : /* Return all but the first "n" matched characters back to the input stream. */
205 : : #define yyless(n) \
206 : : do \
207 : : { \
208 : : /* Undo effects of setting up citi_text. */ \
209 : : int yyless_macro_arg = (n); \
210 : : YY_LESS_LINENO(yyless_macro_arg);\
211 : : *yy_cp = (yy_hold_char); \
212 : : YY_RESTORE_YY_MORE_OFFSET \
213 : : (yy_c_buf_p) = yy_cp = yy_bp + yyless_macro_arg - YY_MORE_ADJ; \
214 : : YY_DO_BEFORE_ACTION; /* set up citi_text again */ \
215 : : } \
216 : : while ( 0 )
217 : :
218 : : #define unput(c) yyunput( c, (yytext_ptr) )
219 : :
220 : : #ifndef YY_STRUCT_YY_BUFFER_STATE
221 : : #define YY_STRUCT_YY_BUFFER_STATE
222 : : struct yy_buffer_state
223 : : {
224 : : FILE *yy_input_file;
225 : :
226 : : char *yy_ch_buf; /* input buffer */
227 : : char *yy_buf_pos; /* current position in input buffer */
228 : :
229 : : /* Size of input buffer in bytes, not including room for EOB
230 : : * characters.
231 : : */
232 : : yy_size_t yy_buf_size;
233 : :
234 : : /* Number of characters read into yy_ch_buf, not including EOB
235 : : * characters.
236 : : */
237 : : yy_size_t yy_n_chars;
238 : :
239 : : /* Whether we "own" the buffer - i.e., we know we created it,
240 : : * and can realloc() it to grow it, and should free() it to
241 : : * delete it.
242 : : */
243 : : int yy_is_our_buffer;
244 : :
245 : : /* Whether this is an "interactive" input source; if so, and
246 : : * if we're using stdio for input, then we want to use getc()
247 : : * instead of fread(), to make sure we stop fetching input after
248 : : * each newline.
249 : : */
250 : : int yy_is_interactive;
251 : :
252 : : /* Whether we're considered to be at the beginning of a line.
253 : : * If so, '^' rules will be active on the next match, otherwise
254 : : * not.
255 : : */
256 : : int yy_at_bol;
257 : :
258 : : int yy_bs_lineno; /**< The line count. */
259 : : int yy_bs_column; /**< The column count. */
260 : :
261 : : /* Whether to try to fill the input buffer when we reach the
262 : : * end of it.
263 : : */
264 : : int yy_fill_buffer;
265 : :
266 : : int yy_buffer_status;
267 : :
268 : : #define YY_BUFFER_NEW 0
269 : : #define YY_BUFFER_NORMAL 1
270 : : /* When an EOF's been seen but there's still some text to process
271 : : * then we mark the buffer as YY_EOF_PENDING, to indicate that we
272 : : * shouldn't try reading from the input source any more. We might
273 : : * still have a bunch of tokens to match, though, because of
274 : : * possible backing-up.
275 : : *
276 : : * When we actually see the EOF, we change the status to "new"
277 : : * (via citi_restart()), so that the user can continue scanning by
278 : : * just pointing citi_in at a new input file.
279 : : */
280 : : #define YY_BUFFER_EOF_PENDING 2
281 : :
282 : : };
283 : : #endif /* !YY_STRUCT_YY_BUFFER_STATE */
284 : :
285 : : /* Stack of input buffers. */
286 : : static size_t yy_buffer_stack_top = 0; /**< index of top of stack. */
287 : : static size_t yy_buffer_stack_max = 0; /**< capacity of stack. */
288 : : static YY_BUFFER_STATE * yy_buffer_stack = 0; /**< Stack as an array. */
289 : :
290 : : /* We provide macros for accessing buffer states in case in the
291 : : * future we want to put the buffer states in a more general
292 : : * "scanner state".
293 : : *
294 : : * Returns the top of the stack, or NULL.
295 : : */
296 : : #define YY_CURRENT_BUFFER ( (yy_buffer_stack) \
297 : : ? (yy_buffer_stack)[(yy_buffer_stack_top)] \
298 : : : NULL)
299 : :
300 : : /* Same as previous macro, but useful when we know that the buffer stack is not
301 : : * NULL or when we need an lvalue. For internal use only.
302 : : */
303 : : #define YY_CURRENT_BUFFER_LVALUE (yy_buffer_stack)[(yy_buffer_stack_top)]
304 : :
305 : : /* yy_hold_char holds the character lost when citi_text is formed. */
306 : : static char yy_hold_char;
307 : : static yy_size_t yy_n_chars; /* number of characters read into yy_ch_buf */
308 : : yy_size_t citi_leng;
309 : :
310 : : /* Points to current character in buffer. */
311 : : static char *yy_c_buf_p = (char *) 0;
312 : : static int yy_init = 0; /* whether we need to initialize */
313 : : static int yy_start = 0; /* start state number */
314 : :
315 : : /* Flag which is used to allow citi_wrap()'s to do buffer switches
316 : : * instead of setting up a fresh citi_in. A bit of a hack ...
317 : : */
318 : : static int yy_did_buffer_switch_on_eof;
319 : :
320 : : void citi_restart (FILE *input_file );
321 : : void citi__switch_to_buffer (YY_BUFFER_STATE new_buffer );
322 : : YY_BUFFER_STATE citi__create_buffer (FILE *file,int size );
323 : : void citi__delete_buffer (YY_BUFFER_STATE b );
324 : : void citi__flush_buffer (YY_BUFFER_STATE b );
325 : : void citi_push_buffer_state (YY_BUFFER_STATE new_buffer );
326 : : void citi_pop_buffer_state (void );
327 : :
328 : : static void citi_ensure_buffer_stack (void );
329 : : static void citi__load_buffer_state (void );
330 : : static void citi__init_buffer (YY_BUFFER_STATE b,FILE *file );
331 : :
332 : : #define YY_FLUSH_BUFFER citi__flush_buffer(YY_CURRENT_BUFFER )
333 : :
334 : : YY_BUFFER_STATE citi__scan_buffer (char *base,yy_size_t size );
335 : : YY_BUFFER_STATE citi__scan_string (yyconst char *yy_str );
336 : : YY_BUFFER_STATE citi__scan_bytes (yyconst char *bytes,yy_size_t len );
337 : :
338 : : void *citi_alloc (yy_size_t );
339 : : void *citi_realloc (void *,yy_size_t );
340 : : void citi_free (void * );
341 : :
342 : : #define yy_new_buffer citi__create_buffer
343 : :
344 : : #define yy_set_interactive(is_interactive) \
345 : : { \
346 : : if ( ! YY_CURRENT_BUFFER ){ \
347 : : citi_ensure_buffer_stack (); \
348 : : YY_CURRENT_BUFFER_LVALUE = \
349 : : citi__create_buffer(citi_in,YY_BUF_SIZE ); \
350 : : } \
351 : : YY_CURRENT_BUFFER_LVALUE->yy_is_interactive = is_interactive; \
352 : : }
353 : :
354 : : #define yy_set_bol(at_bol) \
355 : : { \
356 : : if ( ! YY_CURRENT_BUFFER ){\
357 : : citi_ensure_buffer_stack (); \
358 : : YY_CURRENT_BUFFER_LVALUE = \
359 : : citi__create_buffer(citi_in,YY_BUF_SIZE ); \
360 : : } \
361 : : YY_CURRENT_BUFFER_LVALUE->yy_at_bol = at_bol; \
362 : : }
363 : :
364 : : #define YY_AT_BOL() (YY_CURRENT_BUFFER_LVALUE->yy_at_bol)
365 : :
366 : : /* Begin user sect3 */
367 : :
368 : : #define citi_wrap() 1
369 : : #define YY_SKIP_YYWRAP
370 : :
371 : : typedef unsigned char YY_CHAR;
372 : :
373 : : FILE *citi_in = (FILE *) 0, *citi_out = (FILE *) 0;
374 : :
375 : : typedef int yy_state_type;
376 : :
377 : : extern int citi_lineno;
378 : :
379 : : int citi_lineno = 1;
380 : :
381 : : extern char *citi_text;
382 : : #define yytext_ptr citi_text
383 : :
384 : : static yy_state_type yy_get_previous_state (void );
385 : : static yy_state_type yy_try_NUL_trans (yy_state_type current_state );
386 : : static int yy_get_next_buffer (void );
387 : : static void yy_fatal_error (yyconst char msg[] );
388 : :
389 : : /* Done after the current pattern has been matched and before the
390 : : * corresponding action - sets up citi_text.
391 : : */
392 : : #define YY_DO_BEFORE_ACTION \
393 : : (yytext_ptr) = yy_bp; \
394 : : citi_leng = (size_t) (yy_cp - yy_bp); \
395 : : (yy_hold_char) = *yy_cp; \
396 : : *yy_cp = '\0'; \
397 : : (yy_c_buf_p) = yy_cp;
398 : :
399 : : #define YY_NUM_RULES 31
400 : : #define YY_END_OF_BUFFER 32
401 : : /* This struct is not used in this scanner,
402 : : but its presence is necessary. */
403 : : struct yy_trans_info
404 : : {
405 : : flex_int32_t yy_verify;
406 : : flex_int32_t yy_nxt;
407 : : };
408 : : static yyconst flex_int16_t yy_accept[168] =
409 : : { 0,
410 : : 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
411 : : 0, 0, 32, 30, 2, 1, 30, 30, 3, 18,
412 : : 18, 18, 18, 18, 27, 18, 18, 18, 18, 18,
413 : : 18, 28, 2, 29, 28, 30, 25, 30, 19, 30,
414 : : 30, 30, 24, 30, 21, 18, 18, 18, 22, 23,
415 : : 20, 30, 1, 0, 3, 18, 18, 18, 18, 5,
416 : : 18, 18, 18, 18, 18, 18, 18, 29, 0, 0,
417 : : 19, 19, 0, 0, 0, 0, 24, 0, 20, 0,
418 : : 18, 18, 5, 18, 18, 18, 18, 18, 18, 18,
419 : : 7, 0, 0, 19, 26, 17, 0, 18, 18, 18,
420 : :
421 : : 18, 18, 18, 18, 8, 9, 18, 18, 0, 19,
422 : : 0, 0, 4, 18, 18, 10, 18, 18, 18, 18,
423 : : 18, 0, 0, 18, 18, 18, 18, 18, 18, 18,
424 : : 0, 0, 18, 18, 12, 18, 18, 18, 0, 0,
425 : : 6, 11, 18, 18, 0, 0, 18, 18, 0, 0,
426 : : 18, 18, 0, 0, 18, 18, 0, 0, 18, 18,
427 : : 15, 16, 18, 18, 13, 14, 0
428 : : } ;
429 : :
430 : : static yyconst flex_int32_t yy_ec[256] =
431 : : { 0,
432 : : 1, 1, 1, 1, 1, 1, 1, 1, 2, 3,
433 : : 1, 1, 4, 1, 1, 1, 1, 1, 1, 1,
434 : : 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
435 : : 1, 2, 1, 1, 5, 1, 1, 1, 1, 1,
436 : : 1, 1, 6, 7, 6, 8, 1, 9, 9, 9,
437 : : 9, 9, 9, 9, 9, 9, 9, 1, 1, 1,
438 : : 1, 1, 1, 1, 10, 11, 12, 13, 14, 15,
439 : : 16, 17, 18, 17, 17, 19, 20, 21, 22, 17,
440 : : 17, 23, 24, 25, 17, 26, 17, 17, 17, 17,
441 : : 27, 1, 28, 1, 29, 1, 17, 17, 17, 17,
442 : :
443 : : 30, 17, 17, 17, 17, 17, 17, 17, 17, 17,
444 : : 17, 17, 17, 17, 17, 17, 17, 17, 17, 17,
445 : : 17, 17, 1, 1, 1, 1, 1, 1, 1, 1,
446 : : 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
447 : : 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
448 : : 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
449 : : 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
450 : : 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
451 : : 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
452 : : 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
453 : :
454 : : 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
455 : : 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
456 : : 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
457 : : 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
458 : : 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
459 : : 1, 1, 1, 1, 1
460 : : } ;
461 : :
462 : : static yyconst flex_int32_t yy_meta[31] =
463 : : { 0,
464 : : 1, 1, 1, 1, 1, 1, 1, 2, 2, 2,
465 : : 2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
466 : : 2, 2, 2, 2, 2, 2, 1, 1, 2, 2
467 : : } ;
468 : :
469 : : static yyconst flex_int16_t yy_base[171] =
470 : : { 0,
471 : : 0, 26, 30, 38, 51, 59, 29, 57, 83, 0,
472 : : 111, 0, 273, 274, 274, 41, 269, 262, 261, 261,
473 : : 38, 62, 61, 0, 274, 66, 108, 67, 113, 68,
474 : : 117, 274, 274, 125, 265, 124, 274, 258, 127, 245,
475 : : 251, 254, 139, 260, 274, 251, 251, 242, 274, 274,
476 : : 141, 256, 143, 255, 248, 247, 0, 245, 238, 0,
477 : : 237, 227, 128, 226, 230, 233, 225, 147, 244, 237,
478 : : 144, 145, 42, 232, 228, 220, 152, 239, 157, 238,
479 : : 154, 219, 229, 220, 219, 216, 211, 224, 219, 203,
480 : : 202, 131, 221, 220, 274, 199, 198, 217, 209, 203,
481 : :
482 : : 202, 207, 207, 195, 0, 0, 200, 199, 208, 207,
483 : : 196, 195, 204, 193, 195, 0, 192, 188, 198, 189,
484 : : 188, 187, 186, 189, 183, 182, 175, 178, 174, 173,
485 : : 172, 171, 180, 179, 0, 167, 166, 165, 164, 163,
486 : : 0, 0, 158, 157, 156, 155, 172, 171, 167, 166,
487 : : 159, 158, 150, 149, 153, 152, 154, 153, 147, 146,
488 : : 274, 274, 101, 35, 0, 0, 274, 175, 177, 33
489 : : } ;
490 : :
491 : : static yyconst flex_int16_t yy_def[171] =
492 : : { 0,
493 : : 167, 1, 168, 168, 169, 169, 6, 6, 167, 9,
494 : : 9, 11, 167, 167, 167, 167, 167, 167, 167, 170,
495 : : 170, 170, 170, 170, 167, 170, 170, 170, 170, 170,
496 : : 170, 167, 167, 167, 167, 167, 167, 167, 167, 167,
497 : : 167, 167, 167, 167, 167, 170, 170, 170, 167, 167,
498 : : 167, 167, 167, 167, 167, 170, 170, 170, 170, 170,
499 : : 170, 170, 170, 170, 170, 170, 170, 167, 167, 167,
500 : : 167, 167, 167, 167, 167, 167, 167, 167, 167, 167,
501 : : 170, 170, 170, 170, 170, 170, 170, 170, 170, 170,
502 : : 170, 167, 167, 167, 167, 167, 167, 170, 170, 170,
503 : :
504 : : 170, 170, 170, 170, 170, 170, 170, 170, 167, 167,
505 : : 167, 167, 170, 170, 170, 170, 170, 170, 170, 170,
506 : : 170, 167, 167, 170, 170, 170, 170, 170, 170, 170,
507 : : 167, 167, 170, 170, 170, 170, 170, 170, 167, 167,
508 : : 170, 170, 170, 170, 167, 167, 170, 170, 167, 167,
509 : : 170, 170, 167, 167, 170, 170, 167, 167, 170, 170,
510 : : 167, 167, 170, 170, 170, 170, 0, 167, 167, 167
511 : : } ;
512 : :
513 : : static yyconst flex_int16_t yy_nxt[305] =
514 : : { 0,
515 : : 14, 15, 16, 17, 14, 18, 14, 14, 19, 20,
516 : : 20, 20, 21, 20, 20, 20, 20, 20, 20, 22,
517 : : 20, 20, 23, 20, 20, 20, 14, 14, 24, 20,
518 : : 25, 33, 34, 35, 57, 14, 26, 27, 28, 33,
519 : : 34, 35, 14, 53, 54, 56, 29, 93, 58, 30,
520 : : 94, 31, 15, 16, 17, 166, 36, 37, 38, 39,
521 : : 15, 16, 17, 14, 36, 37, 38, 39, 56, 56,
522 : : 14, 59, 40, 56, 56, 56, 64, 58, 60, 61,
523 : : 41, 66, 42, 14, 15, 43, 44, 14, 18, 45,
524 : : 14, 19, 24, 24, 24, 46, 24, 24, 24, 24,
525 : :
526 : : 24, 24, 47, 24, 24, 48, 24, 24, 24, 49,
527 : : 50, 24, 24, 51, 52, 56, 36, 14, 38, 39,
528 : : 56, 165, 65, 24, 56, 62, 67, 68, 69, 63,
529 : : 24, 70, 71, 24, 70, 71, 109, 14, 14, 110,
530 : : 73, 77, 78, 79, 80, 53, 54, 86, 87, 68,
531 : : 69, 70, 71, 72, 77, 78, 73, 73, 92, 79,
532 : : 80, 98, 81, 164, 163, 162, 161, 160, 159, 158,
533 : : 157, 156, 155, 73, 92, 32, 32, 14, 14, 154,
534 : : 153, 152, 151, 150, 149, 148, 147, 146, 145, 144,
535 : : 143, 142, 141, 60, 140, 139, 138, 137, 136, 135,
536 : :
537 : : 134, 133, 60, 132, 131, 130, 129, 128, 127, 126,
538 : : 125, 124, 113, 123, 122, 110, 110, 121, 120, 119,
539 : : 118, 117, 116, 115, 114, 113, 112, 111, 94, 94,
540 : : 108, 107, 106, 105, 104, 103, 102, 101, 100, 99,
541 : : 79, 77, 97, 96, 95, 72, 68, 91, 90, 89,
542 : : 88, 85, 84, 83, 82, 81, 55, 53, 79, 60,
543 : : 59, 58, 77, 76, 75, 74, 72, 68, 56, 55,
544 : : 55, 53, 167, 13, 167, 167, 167, 167, 167, 167,
545 : : 167, 167, 167, 167, 167, 167, 167, 167, 167, 167,
546 : : 167, 167, 167, 167, 167, 167, 167, 167, 167, 167,
547 : :
548 : : 167, 167, 167, 167
549 : : } ;
550 : :
551 : : static yyconst flex_int16_t yy_chk[305] =
552 : : { 0,
553 : : 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
554 : : 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
555 : : 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
556 : : 2, 3, 3, 3, 170, 7, 2, 2, 2, 4,
557 : : 4, 4, 7, 16, 16, 21, 2, 73, 21, 2,
558 : : 73, 2, 5, 5, 5, 164, 5, 5, 5, 5,
559 : : 6, 6, 6, 8, 6, 6, 6, 6, 23, 22,
560 : : 8, 22, 6, 26, 28, 30, 28, 28, 23, 26,
561 : : 8, 30, 8, 9, 9, 9, 9, 9, 9, 9,
562 : : 9, 9, 9, 9, 9, 9, 9, 9, 9, 9,
563 : :
564 : : 9, 9, 9, 9, 9, 9, 9, 9, 9, 9,
565 : : 9, 9, 9, 11, 11, 27, 11, 11, 11, 11,
566 : : 29, 163, 29, 11, 31, 27, 31, 34, 34, 27,
567 : : 11, 36, 36, 11, 39, 39, 92, 11, 11, 92,
568 : : 39, 43, 43, 51, 51, 53, 53, 63, 63, 68,
569 : : 68, 71, 71, 72, 77, 77, 39, 71, 72, 79,
570 : : 79, 81, 81, 160, 159, 158, 157, 156, 155, 154,
571 : : 153, 152, 151, 71, 72, 168, 168, 169, 169, 150,
572 : : 149, 148, 147, 146, 145, 144, 143, 140, 139, 138,
573 : : 137, 136, 134, 133, 132, 131, 130, 129, 128, 127,
574 : :
575 : : 126, 125, 124, 123, 122, 121, 120, 119, 118, 117,
576 : : 115, 114, 113, 112, 111, 110, 109, 108, 107, 104,
577 : : 103, 102, 101, 100, 99, 98, 97, 96, 94, 93,
578 : : 91, 90, 89, 88, 87, 86, 85, 84, 83, 82,
579 : : 80, 78, 76, 75, 74, 70, 69, 67, 66, 65,
580 : : 64, 62, 61, 59, 58, 56, 55, 54, 52, 48,
581 : : 47, 46, 44, 42, 41, 40, 38, 35, 20, 19,
582 : : 18, 17, 13, 167, 167, 167, 167, 167, 167, 167,
583 : : 167, 167, 167, 167, 167, 167, 167, 167, 167, 167,
584 : : 167, 167, 167, 167, 167, 167, 167, 167, 167, 167,
585 : :
586 : : 167, 167, 167, 167
587 : : } ;
588 : :
589 : : /* Table of booleans, true if rule could match eol. */
590 : : static yyconst flex_int32_t yy_rule_can_match_eol[32] =
591 : : { 0,
592 : : 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
593 : : 1, 0, 0, 0, 1, 0, 0, 0, 0, 1, 0, 0, };
594 : :
595 : : static yy_state_type yy_last_accepting_state;
596 : : static char *yy_last_accepting_cpos;
597 : :
598 : : extern int citi__flex_debug;
599 : : int citi__flex_debug = 0;
600 : :
601 : : /* The intent behind this definition is that it'll catch
602 : : * any uses of REJECT which flex missed.
603 : : */
604 : : #define REJECT reject_used_but_not_detected
605 : : #define yymore() yymore_used_but_not_detected
606 : : #define YY_MORE_ADJ 0
607 : : #define YY_RESTORE_YY_MORE_OFFSET
608 : : char *citi_text;
609 : : #line 1 "scan_citi.l"
610 : : /* -*-c-*- */
611 : : #line 4 "scan_citi.l"
612 : : /*
613 : : * scan_citi.l - scanner for CITIfiles
614 : : *
615 : : * Copyright (C) 2006 Stefan Jahn <stefan@lkcc.org>
616 : : *
617 : : * This is free software; you can redistribute it and/or modify
618 : : * it under the terms of the GNU General Public License as published by
619 : : * the Free Software Foundation; either version 2, or (at your option)
620 : : * any later version.
621 : : *
622 : : * This software is distributed in the hope that it will be useful,
623 : : * but WITHOUT ANY WARRANTY; without even the implied warranty of
624 : : * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
625 : : * GNU General Public License for more details.
626 : : *
627 : : * You should have received a copy of the GNU General Public License
628 : : * along with this package; see the file COPYING. If not, write to
629 : : * the Free Software Foundation, Inc., 51 Franklin Street - Fifth Floor,
630 : : * Boston, MA 02110-1301, USA.
631 : : *
632 : : * $Id$
633 : : *
634 : : */
635 : :
636 : : #if HAVE_CONFIG_H
637 : : # include <config.h>
638 : : #endif
639 : :
640 : : #include <stdio.h>
641 : : #include <stdlib.h>
642 : : #include <string.h>
643 : : #include <ctype.h>
644 : :
645 : : #ifdef __MINGW32__
646 : : #include <io.h>
647 : : #endif
648 : :
649 : : #ifdef HAVE_UNISTD_H
650 : : #include <unistd.h>
651 : : #endif
652 : :
653 : : #include "logging.h"
654 : : #include "complex.h"
655 : : #include "object.h"
656 : : #include "vector.h"
657 : : #include "dataset.h"
658 : : #include "check_citi.h"
659 : : #include "tokens_citi.h"
660 : :
661 : : using namespace qucs;
662 : :
663 : :
664 : : #line 665 "scan_citi.cpp"
665 : :
666 : : #define INITIAL 0
667 : : #define COMMENTS 1
668 : : #define FLOATS 2
669 : : #define LISTS 3
670 : : #define DATAS 4
671 : : #define VALUES 5
672 : :
673 : : #ifndef YY_EXTRA_TYPE
674 : : #define YY_EXTRA_TYPE void *
675 : : #endif
676 : :
677 : : static int yy_init_globals (void );
678 : :
679 : : /* Accessor methods to globals.
680 : : These are made visible to non-reentrant scanners for convenience. */
681 : :
682 : : int citi_lex_destroy (void );
683 : :
684 : : int citi_get_debug (void );
685 : :
686 : : void citi_set_debug (int debug_flag );
687 : :
688 : : YY_EXTRA_TYPE citi_get_extra (void );
689 : :
690 : : void citi_set_extra (YY_EXTRA_TYPE user_defined );
691 : :
692 : : FILE *citi_get_in (void );
693 : :
694 : : void citi_set_in (FILE * in_str );
695 : :
696 : : FILE *citi_get_out (void );
697 : :
698 : : void citi_set_out (FILE * out_str );
699 : :
700 : : yy_size_t citi_get_leng (void );
701 : :
702 : : char *citi_get_text (void );
703 : :
704 : : int citi_get_lineno (void );
705 : :
706 : : void citi_set_lineno (int line_number );
707 : :
708 : : /* Macros after this point can all be overridden by user definitions in
709 : : * section 1.
710 : : */
711 : :
712 : : #ifndef YY_SKIP_YYWRAP
713 : : #ifdef __cplusplus
714 : : extern "C" int citi_wrap (void );
715 : : #else
716 : : extern int citi_wrap (void );
717 : : #endif
718 : : #endif
719 : :
720 : : #ifndef yytext_ptr
721 : : static void yy_flex_strncpy (char *,yyconst char *,int );
722 : : #endif
723 : :
724 : : #ifdef YY_NEED_STRLEN
725 : : static int yy_flex_strlen (yyconst char * );
726 : : #endif
727 : :
728 : : #ifndef YY_NO_INPUT
729 : :
730 : : #ifdef __cplusplus
731 : : static int yyinput (void );
732 : : #else
733 : : static int input (void );
734 : : #endif
735 : :
736 : : #endif
737 : :
738 : : /* Amount of stuff to slurp up with each read. */
739 : : #ifndef YY_READ_BUF_SIZE
740 : : #define YY_READ_BUF_SIZE 8192
741 : : #endif
742 : :
743 : : /* Copy whatever the last rule matched to the standard output. */
744 : : #ifndef ECHO
745 : : /* This used to be an fputs(), but since the string might contain NUL's,
746 : : * we now use fwrite().
747 : : */
748 : : #define ECHO do { if (fwrite( citi_text, citi_leng, 1, citi_out )) {} } while (0)
749 : : #endif
750 : :
751 : : /* Gets input and stuffs it into "buf". number of characters read, or YY_NULL,
752 : : * is returned in "result".
753 : : */
754 : : #ifndef YY_INPUT
755 : : #define YY_INPUT(buf,result,max_size) \
756 : : if ( YY_CURRENT_BUFFER_LVALUE->yy_is_interactive ) \
757 : : { \
758 : : int c = '*'; \
759 : : size_t n; \
760 : : for ( n = 0; n < max_size && \
761 : : (c = getc( citi_in )) != EOF && c != '\n'; ++n ) \
762 : : buf[n] = (char) c; \
763 : : if ( c == '\n' ) \
764 : : buf[n++] = (char) c; \
765 : : if ( c == EOF && ferror( citi_in ) ) \
766 : : YY_FATAL_ERROR( "input in flex scanner failed" ); \
767 : : result = n; \
768 : : } \
769 : : else \
770 : : { \
771 : : errno=0; \
772 : : while ( (result = fread(buf, 1, max_size, citi_in))==0 && ferror(citi_in)) \
773 : : { \
774 : : if( errno != EINTR) \
775 : : { \
776 : : YY_FATAL_ERROR( "input in flex scanner failed" ); \
777 : : break; \
778 : : } \
779 : : errno=0; \
780 : : clearerr(citi_in); \
781 : : } \
782 : : }\
783 : : \
784 : :
785 : : #endif
786 : :
787 : : /* No semi-colon after return; correct usage is to write "yyterminate();" -
788 : : * we don't want an extra ';' after the "return" because that will cause
789 : : * some compilers to complain about unreachable statements.
790 : : */
791 : : #ifndef yyterminate
792 : : #define yyterminate() return YY_NULL
793 : : #endif
794 : :
795 : : /* Number of entries by which start-condition stack grows. */
796 : : #ifndef YY_START_STACK_INCR
797 : : #define YY_START_STACK_INCR 25
798 : : #endif
799 : :
800 : : /* Report a fatal error. */
801 : : #ifndef YY_FATAL_ERROR
802 : : #define YY_FATAL_ERROR(msg) yy_fatal_error( msg )
803 : : #endif
804 : :
805 : : /* end tables serialization structures and prototypes */
806 : :
807 : : /* Default declaration of generated scanner - a define so the user can
808 : : * easily add parameters.
809 : : */
810 : : #ifndef YY_DECL
811 : : #define YY_DECL_IS_OURS 1
812 : :
813 : : extern int citi_lex (void);
814 : :
815 : : #define YY_DECL int citi_lex (void)
816 : : #endif /* !YY_DECL */
817 : :
818 : : /* Code executed at the beginning of each rule, after citi_text and citi_leng
819 : : * have been set up.
820 : : */
821 : : #ifndef YY_USER_ACTION
822 : : #define YY_USER_ACTION
823 : : #endif
824 : :
825 : : /* Code executed at the end of each rule. */
826 : : #ifndef YY_BREAK
827 : : #define YY_BREAK break;
828 : : #endif
829 : :
830 : : #define YY_RULE_SETUP \
831 : : if ( citi_leng > 0 ) \
832 : : YY_CURRENT_BUFFER_LVALUE->yy_at_bol = \
833 : : (citi_text[citi_leng - 1] == '\n'); \
834 : : YY_USER_ACTION
835 : :
836 : : /** The main scanner function which does all the work.
837 : : */
838 : 0 : YY_DECL
839 : : {
840 : : register yy_state_type yy_current_state;
841 : : register char *yy_cp, *yy_bp;
842 : : register int yy_act;
843 : :
844 : : #line 70 "scan_citi.l"
845 : :
846 : :
847 : : #line 848 "scan_citi.cpp"
848 : :
849 [ # # ]: 0 : if ( !(yy_init) )
850 : : {
851 : 0 : (yy_init) = 1;
852 : :
853 : : #ifdef YY_USER_INIT
854 : : YY_USER_INIT;
855 : : #endif
856 : :
857 [ # # ]: 0 : if ( ! (yy_start) )
858 : 0 : (yy_start) = 1; /* first start state */
859 : :
860 [ # # ]: 0 : if ( ! citi_in )
861 : 0 : citi_in = stdin;
862 : :
863 [ # # ]: 0 : if ( ! citi_out )
864 : 0 : citi_out = stdout;
865 : :
866 [ # # ][ # # ]: 0 : if ( ! YY_CURRENT_BUFFER ) {
867 : 0 : citi_ensure_buffer_stack ();
868 : 0 : YY_CURRENT_BUFFER_LVALUE =
869 : 0 : citi__create_buffer(citi_in,YY_BUF_SIZE );
870 : : }
871 : :
872 : 0 : citi__load_buffer_state( );
873 : : }
874 : :
875 : 0 : while ( 1 ) /* loops until end-of-file is reached */
876 : : {
877 : 0 : yy_cp = (yy_c_buf_p);
878 : :
879 : : /* Support of citi_text. */
880 : 0 : *yy_cp = (yy_hold_char);
881 : :
882 : : /* yy_bp points to the position in yy_ch_buf of the start of
883 : : * the current run.
884 : : */
885 : 0 : yy_bp = yy_cp;
886 : :
887 : 0 : yy_current_state = (yy_start);
888 : 0 : yy_current_state += YY_AT_BOL();
889 : : yy_match:
890 [ # # ]: 0 : do
891 : : {
892 : 0 : register YY_CHAR yy_c = yy_ec[YY_SC_TO_UI(*yy_cp)];
893 [ # # ]: 0 : if ( yy_accept[yy_current_state] )
894 : : {
895 : 0 : (yy_last_accepting_state) = yy_current_state;
896 : 0 : (yy_last_accepting_cpos) = yy_cp;
897 : : }
898 [ # # ]: 0 : while ( yy_chk[yy_base[yy_current_state] + yy_c] != yy_current_state )
899 : : {
900 : 0 : yy_current_state = (int) yy_def[yy_current_state];
901 [ # # ]: 0 : if ( yy_current_state >= 168 )
902 : 0 : yy_c = yy_meta[(unsigned int) yy_c];
903 : : }
904 : 0 : yy_current_state = yy_nxt[yy_base[yy_current_state] + (unsigned int) yy_c];
905 : 0 : ++yy_cp;
906 : : }
907 : 0 : while ( yy_base[yy_current_state] != 274 );
908 : :
909 : : yy_find_action:
910 : 0 : yy_act = yy_accept[yy_current_state];
911 [ # # ]: 0 : if ( yy_act == 0 )
912 : : { /* have to back up */
913 : 0 : yy_cp = (yy_last_accepting_cpos);
914 : 0 : yy_current_state = (yy_last_accepting_state);
915 : 0 : yy_act = yy_accept[yy_current_state];
916 : : }
917 : :
918 : 0 : YY_DO_BEFORE_ACTION;
919 : :
920 [ # # ][ # # ]: 0 : if ( yy_act != YY_END_OF_BUFFER && yy_rule_can_match_eol[yy_act] )
921 : : {
922 : : int yyl;
923 [ # # ]: 0 : for ( yyl = 0; yyl < citi_leng; ++yyl )
924 [ # # ]: 0 : if ( citi_text[yyl] == '\n' )
925 : :
926 : 0 : citi_lineno++;
927 : : ;
928 : : }
929 : :
930 : : do_action: /* This label is used only to access EOF actions. */
931 : :
932 [ # # # # : 0 : switch ( yy_act )
# # # # #
# # # # #
# # # # #
# # # # #
# # # # #
# # # # #
# ]
933 : : { /* beginning of action switch */
934 : : case 0: /* must back up */
935 : : /* undo the effects of YY_DO_BEFORE_ACTION */
936 : 0 : *yy_cp = (yy_hold_char);
937 : 0 : yy_cp = (yy_last_accepting_cpos);
938 : 0 : yy_current_state = (yy_last_accepting_state);
939 : 0 : goto yy_find_action;
940 : :
941 : : case 1:
942 : : /* rule 1 can match eol */
943 [ # # ]: 0 : YY_RULE_SETUP
944 : : #line 72 "scan_citi.l"
945 : : { /* detect end of line */ return Eol; }
946 : : YY_BREAK
947 : : case 2:
948 : : YY_RULE_SETUP
949 : : #line 74 "scan_citi.l"
950 : : /* skip spaces */
951 : : YY_BREAK
952 : : case 3:
953 : : YY_RULE_SETUP
954 : : #line 76 "scan_citi.l"
955 : : { /* identify integer */
956 : : citi_lval.d = strtol (citi_text, NULL, 10);
957 : : return Integer;
958 : : }
959 : : YY_BREAK
960 : : case 4:
961 : : YY_RULE_SETUP
962 : : #line 81 "scan_citi.l"
963 : : {
964 : : return Version;
965 : : }
966 : : YY_BREAK
967 : : case 5:
968 : : YY_RULE_SETUP
969 : : #line 85 "scan_citi.l"
970 : : {
971 : : citi_lval.ident = strdup (citi_text);
972 : : return VarType;
973 : : }
974 : : YY_BREAK
975 : : case 6:
976 : : YY_RULE_SETUP
977 : : #line 90 "scan_citi.l"
978 : : { return CITIFILE; }
979 : : YY_BREAK
980 : : case 7:
981 : : YY_RULE_SETUP
982 : : #line 91 "scan_citi.l"
983 : : { return VAR; }
984 : : YY_BREAK
985 : : case 8:
986 : : YY_RULE_SETUP
987 : : #line 92 "scan_citi.l"
988 : : { BEGIN(DATAS); return DATA; }
989 : : YY_BREAK
990 : : case 9:
991 : : YY_RULE_SETUP
992 : : #line 93 "scan_citi.l"
993 : : { return NAME; }
994 : : YY_BREAK
995 : : case 10:
996 : : YY_RULE_SETUP
997 : : #line 94 "scan_citi.l"
998 : : { BEGIN(FLOATS); return Begin; }
999 : : YY_BREAK
1000 : : case 11:
1001 : : YY_RULE_SETUP
1002 : : #line 95 "scan_citi.l"
1003 : : { BEGIN(VALUES); return CONSTANT; }
1004 : : YY_BREAK
1005 : : case 12:
1006 : : YY_RULE_SETUP
1007 : : #line 96 "scan_citi.l"
1008 : : { BEGIN(COMMENTS); }
1009 : : YY_BREAK
1010 : : case 13:
1011 : : YY_RULE_SETUP
1012 : : #line 98 "scan_citi.l"
1013 : : { BEGIN(LISTS); return SegListBegin; }
1014 : : YY_BREAK
1015 : : case 14:
1016 : : YY_RULE_SETUP
1017 : : #line 99 "scan_citi.l"
1018 : : { BEGIN(LISTS); return VarListBegin; }
1019 : : YY_BREAK
1020 : : case 15:
1021 : : YY_RULE_SETUP
1022 : : #line 100 "scan_citi.l"
1023 : : { BEGIN(INITIAL); return SegListEnd; }
1024 : : YY_BREAK
1025 : : case 16:
1026 : : YY_RULE_SETUP
1027 : : #line 101 "scan_citi.l"
1028 : : { BEGIN(INITIAL); return VarListEnd; }
1029 : : YY_BREAK
1030 : : case 17:
1031 : : YY_RULE_SETUP
1032 : : #line 102 "scan_citi.l"
1033 : : { return SEG; }
1034 : : YY_BREAK
1035 : : case 18:
1036 : : YY_RULE_SETUP
1037 : : #line 104 "scan_citi.l"
1038 : : { /* identify identifier */
1039 : : citi_lval.ident = strdup (citi_text);
1040 : : return Identifier;
1041 : : }
1042 : : YY_BREAK
1043 : : case 19:
1044 : : YY_RULE_SETUP
1045 : : #line 109 "scan_citi.l"
1046 : : { /* identify float */
1047 : : citi_lval.f = strtod (citi_text, NULL);
1048 : : return Float;
1049 : : }
1050 : : YY_BREAK
1051 : : case 20:
1052 : : /* rule 20 can match eol */
1053 : : YY_RULE_SETUP
1054 : : #line 114 "scan_citi.l"
1055 : : { BEGIN(INITIAL); return Eol; }
1056 : : YY_BREAK
1057 : : case 21:
1058 : : YY_RULE_SETUP
1059 : : #line 116 "scan_citi.l"
1060 : : { /* pass the ',' to the parser */ return ','; }
1061 : : YY_BREAK
1062 : : case 22:
1063 : : YY_RULE_SETUP
1064 : : #line 117 "scan_citi.l"
1065 : : { /* pass the '[' to the parser */ return '['; }
1066 : : YY_BREAK
1067 : : case 23:
1068 : : YY_RULE_SETUP
1069 : : #line 118 "scan_citi.l"
1070 : : { /* pass the ']' to the parser */ BEGIN(INITIAL); return ']'; }
1071 : : YY_BREAK
1072 : : case 24:
1073 : : /* rule 24 can match eol */
1074 : : YY_RULE_SETUP
1075 : : #line 119 "scan_citi.l"
1076 : : { BEGIN(INITIAL); return Eol; }
1077 : : YY_BREAK
1078 : : case 25:
1079 : : YY_RULE_SETUP
1080 : : #line 121 "scan_citi.l"
1081 : : { /* pass the ',' to the parser */ return ','; }
1082 : : YY_BREAK
1083 : : case 26:
1084 : : YY_RULE_SETUP
1085 : : #line 123 "scan_citi.l"
1086 : : { BEGIN(INITIAL); return End; }
1087 : : YY_BREAK
1088 : : case 27:
1089 : : YY_RULE_SETUP
1090 : : #line 125 "scan_citi.l"
1091 : : { /* leave these characters */
1092 : : BEGIN(COMMENTS);
1093 : : }
1094 : : YY_BREAK
1095 : : case 28:
1096 : : YY_RULE_SETUP
1097 : : #line 129 "scan_citi.l"
1098 : : { /* skip any character in here */ }
1099 : : YY_BREAK
1100 : : case 29:
1101 : : /* rule 29 can match eol */
1102 : : YY_RULE_SETUP
1103 : : #line 130 "scan_citi.l"
1104 : : { BEGIN(INITIAL); /* skipping ends here */ }
1105 : : YY_BREAK
1106 : : case 30:
1107 : : YY_RULE_SETUP
1108 : : #line 132 "scan_citi.l"
1109 : : { /* any other character in invalid */
1110 : : logprint (LOG_ERROR,
1111 : : "line %d: syntax error, unrecognized character: `%s'\n",
1112 : : citi_lineno, citi_text);
1113 : : return InvalidCharacter;
1114 : : }
1115 : : YY_BREAK
1116 : : case 31:
1117 : : YY_RULE_SETUP
1118 : : #line 139 "scan_citi.l"
1119 : : ECHO;
1120 : : YY_BREAK
1121 : : #line 1122 "scan_citi.cpp"
1122 : : case YY_STATE_EOF(INITIAL):
1123 : : case YY_STATE_EOF(COMMENTS):
1124 : : case YY_STATE_EOF(FLOATS):
1125 : : case YY_STATE_EOF(LISTS):
1126 : : case YY_STATE_EOF(DATAS):
1127 : : case YY_STATE_EOF(VALUES):
1128 : 0 : yyterminate();
1129 : :
1130 : : case YY_END_OF_BUFFER:
1131 : : {
1132 : : /* Amount of text matched not including the EOB char. */
1133 : 0 : int yy_amount_of_matched_text = (int) (yy_cp - (yytext_ptr)) - 1;
1134 : :
1135 : : /* Undo the effects of YY_DO_BEFORE_ACTION. */
1136 : 0 : *yy_cp = (yy_hold_char);
1137 : : YY_RESTORE_YY_MORE_OFFSET
1138 : :
1139 [ # # ]: 0 : if ( YY_CURRENT_BUFFER_LVALUE->yy_buffer_status == YY_BUFFER_NEW )
1140 : : {
1141 : : /* We're scanning a new file or input source. It's
1142 : : * possible that this happened because the user
1143 : : * just pointed citi_in at a new source and called
1144 : : * citi_lex(). If so, then we have to assure
1145 : : * consistency between YY_CURRENT_BUFFER and our
1146 : : * globals. Here is the right place to do so, because
1147 : : * this is the first action (other than possibly a
1148 : : * back-up) that will match for the new input source.
1149 : : */
1150 : 0 : (yy_n_chars) = YY_CURRENT_BUFFER_LVALUE->yy_n_chars;
1151 : 0 : YY_CURRENT_BUFFER_LVALUE->yy_input_file = citi_in;
1152 : 0 : YY_CURRENT_BUFFER_LVALUE->yy_buffer_status = YY_BUFFER_NORMAL;
1153 : : }
1154 : :
1155 : : /* Note that here we test for yy_c_buf_p "<=" to the position
1156 : : * of the first EOB in the buffer, since yy_c_buf_p will
1157 : : * already have been incremented past the NUL character
1158 : : * (since all states make transitions on EOB to the
1159 : : * end-of-buffer state). Contrast this with the test
1160 : : * in input().
1161 : : */
1162 [ # # ]: 0 : if ( (yy_c_buf_p) <= &YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[(yy_n_chars)] )
1163 : : { /* This was really a NUL. */
1164 : : yy_state_type yy_next_state;
1165 : :
1166 : 0 : (yy_c_buf_p) = (yytext_ptr) + yy_amount_of_matched_text;
1167 : :
1168 : 0 : yy_current_state = yy_get_previous_state( );
1169 : :
1170 : : /* Okay, we're now positioned to make the NUL
1171 : : * transition. We couldn't have
1172 : : * yy_get_previous_state() go ahead and do it
1173 : : * for us because it doesn't know how to deal
1174 : : * with the possibility of jamming (and we don't
1175 : : * want to build jamming into it because then it
1176 : : * will run more slowly).
1177 : : */
1178 : :
1179 : 0 : yy_next_state = yy_try_NUL_trans( yy_current_state );
1180 : :
1181 : 0 : yy_bp = (yytext_ptr) + YY_MORE_ADJ;
1182 : :
1183 [ # # ]: 0 : if ( yy_next_state )
1184 : : {
1185 : : /* Consume the NUL. */
1186 : 0 : yy_cp = ++(yy_c_buf_p);
1187 : 0 : yy_current_state = yy_next_state;
1188 : 0 : goto yy_match;
1189 : : }
1190 : :
1191 : : else
1192 : : {
1193 : 0 : yy_cp = (yy_c_buf_p);
1194 : 0 : goto yy_find_action;
1195 : : }
1196 : : }
1197 : :
1198 [ # # # # ]: 0 : else switch ( yy_get_next_buffer( ) )
1199 : : {
1200 : : case EOB_ACT_END_OF_FILE:
1201 : : {
1202 : 0 : (yy_did_buffer_switch_on_eof) = 0;
1203 : :
1204 : : if ( citi_wrap( ) )
1205 : : {
1206 : : /* Note: because we've taken care in
1207 : : * yy_get_next_buffer() to have set up
1208 : : * citi_text, we can now set up
1209 : : * yy_c_buf_p so that if some total
1210 : : * hoser (like flex itself) wants to
1211 : : * call the scanner after we return the
1212 : : * YY_NULL, it'll still work - another
1213 : : * YY_NULL will get returned.
1214 : : */
1215 : 0 : (yy_c_buf_p) = (yytext_ptr) + YY_MORE_ADJ;
1216 : :
1217 : 0 : yy_act = YY_STATE_EOF(YY_START);
1218 : 0 : goto do_action;
1219 : : }
1220 : :
1221 : : else
1222 : : {
1223 : : if ( ! (yy_did_buffer_switch_on_eof) )
1224 : : YY_NEW_FILE;
1225 : : }
1226 : : break;
1227 : : }
1228 : :
1229 : : case EOB_ACT_CONTINUE_SCAN:
1230 : : (yy_c_buf_p) =
1231 : 0 : (yytext_ptr) + yy_amount_of_matched_text;
1232 : :
1233 : 0 : yy_current_state = yy_get_previous_state( );
1234 : :
1235 : 0 : yy_cp = (yy_c_buf_p);
1236 : 0 : yy_bp = (yytext_ptr) + YY_MORE_ADJ;
1237 : 0 : goto yy_match;
1238 : :
1239 : : case EOB_ACT_LAST_MATCH:
1240 : : (yy_c_buf_p) =
1241 : 0 : &YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[(yy_n_chars)];
1242 : :
1243 : 0 : yy_current_state = yy_get_previous_state( );
1244 : :
1245 : 0 : yy_cp = (yy_c_buf_p);
1246 : 0 : yy_bp = (yytext_ptr) + YY_MORE_ADJ;
1247 : 0 : goto yy_find_action;
1248 : : }
1249 : 0 : break;
1250 : : }
1251 : :
1252 : : default:
1253 : : YY_FATAL_ERROR(
1254 : 0 : "fatal flex scanner internal error--no action found" );
1255 : : } /* end of action switch */
1256 : : } /* end of scanning one token */
1257 : : } /* end of citi_lex */
1258 : :
1259 : : /* yy_get_next_buffer - try to read in a new buffer
1260 : : *
1261 : : * Returns a code representing an action:
1262 : : * EOB_ACT_LAST_MATCH -
1263 : : * EOB_ACT_CONTINUE_SCAN - continue scanning from current position
1264 : : * EOB_ACT_END_OF_FILE - end of file
1265 : : */
1266 : 0 : static int yy_get_next_buffer (void)
1267 : : {
1268 : 0 : register char *dest = YY_CURRENT_BUFFER_LVALUE->yy_ch_buf;
1269 : 0 : register char *source = (yytext_ptr);
1270 : : register int number_to_move, i;
1271 : : int ret_val;
1272 : :
1273 [ # # ]: 0 : if ( (yy_c_buf_p) > &YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[(yy_n_chars) + 1] )
1274 : : YY_FATAL_ERROR(
1275 : 0 : "fatal flex scanner internal error--end of buffer missed" );
1276 : :
1277 [ # # ]: 0 : if ( YY_CURRENT_BUFFER_LVALUE->yy_fill_buffer == 0 )
1278 : : { /* Don't try to fill the buffer, so this is an EOF. */
1279 [ # # ]: 0 : if ( (yy_c_buf_p) - (yytext_ptr) - YY_MORE_ADJ == 1 )
1280 : : {
1281 : : /* We matched a single character, the EOB, so
1282 : : * treat this as a final EOF.
1283 : : */
1284 : 0 : return EOB_ACT_END_OF_FILE;
1285 : : }
1286 : :
1287 : : else
1288 : : {
1289 : : /* We matched some text prior to the EOB, first
1290 : : * process it.
1291 : : */
1292 : 0 : return EOB_ACT_LAST_MATCH;
1293 : : }
1294 : : }
1295 : :
1296 : : /* Try to read more data. */
1297 : :
1298 : : /* First move last chars to start of buffer. */
1299 : 0 : number_to_move = (int) ((yy_c_buf_p) - (yytext_ptr)) - 1;
1300 : :
1301 [ # # ]: 0 : for ( i = 0; i < number_to_move; ++i )
1302 : 0 : *(dest++) = *(source++);
1303 : :
1304 [ # # ]: 0 : if ( YY_CURRENT_BUFFER_LVALUE->yy_buffer_status == YY_BUFFER_EOF_PENDING )
1305 : : /* don't do the read, it's not guaranteed to return an EOF,
1306 : : * just force an EOF
1307 : : */
1308 : 0 : YY_CURRENT_BUFFER_LVALUE->yy_n_chars = (yy_n_chars) = 0;
1309 : :
1310 : : else
1311 : : {
1312 : : yy_size_t num_to_read =
1313 : 0 : YY_CURRENT_BUFFER_LVALUE->yy_buf_size - number_to_move - 1;
1314 : :
1315 [ # # ]: 0 : while ( num_to_read <= 0 )
1316 : : { /* Not enough room in the buffer - grow it. */
1317 : :
1318 : : /* just a shorter name for the current buffer */
1319 : 0 : YY_BUFFER_STATE b = YY_CURRENT_BUFFER_LVALUE;
1320 : :
1321 : : int yy_c_buf_p_offset =
1322 : 0 : (int) ((yy_c_buf_p) - b->yy_ch_buf);
1323 : :
1324 [ # # ]: 0 : if ( b->yy_is_our_buffer )
1325 : : {
1326 : 0 : yy_size_t new_size = b->yy_buf_size * 2;
1327 : :
1328 [ # # ]: 0 : if ( new_size <= 0 )
1329 : 0 : b->yy_buf_size += b->yy_buf_size / 8;
1330 : : else
1331 : 0 : b->yy_buf_size *= 2;
1332 : :
1333 : : b->yy_ch_buf = (char *)
1334 : : /* Include room in for 2 EOB chars. */
1335 : 0 : citi_realloc((void *) b->yy_ch_buf,b->yy_buf_size + 2 );
1336 : : }
1337 : : else
1338 : : /* Can't grow it, we don't own it. */
1339 : 0 : b->yy_ch_buf = 0;
1340 : :
1341 [ # # ]: 0 : if ( ! b->yy_ch_buf )
1342 : : YY_FATAL_ERROR(
1343 : 0 : "fatal error - scanner input buffer overflow" );
1344 : :
1345 : 0 : (yy_c_buf_p) = &b->yy_ch_buf[yy_c_buf_p_offset];
1346 : :
1347 : 0 : num_to_read = YY_CURRENT_BUFFER_LVALUE->yy_buf_size -
1348 : 0 : number_to_move - 1;
1349 : :
1350 : : }
1351 : :
1352 [ # # ]: 0 : if ( num_to_read > YY_READ_BUF_SIZE )
1353 : 0 : num_to_read = YY_READ_BUF_SIZE;
1354 : :
1355 : : /* Read in more data. */
1356 [ # # ][ # # ]: 0 : YY_INPUT( (&YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[number_to_move]),
[ # # ][ # # ]
[ # # ][ # # ]
[ # # ][ # # ]
[ # # ][ # # ]
[ # # ][ # # ]
[ # # ]
1357 : : (yy_n_chars), num_to_read );
1358 : :
1359 : 0 : YY_CURRENT_BUFFER_LVALUE->yy_n_chars = (yy_n_chars);
1360 : : }
1361 : :
1362 [ # # ]: 0 : if ( (yy_n_chars) == 0 )
1363 : : {
1364 [ # # ]: 0 : if ( number_to_move == YY_MORE_ADJ )
1365 : : {
1366 : 0 : ret_val = EOB_ACT_END_OF_FILE;
1367 : 0 : citi_restart(citi_in );
1368 : : }
1369 : :
1370 : : else
1371 : : {
1372 : 0 : ret_val = EOB_ACT_LAST_MATCH;
1373 : 0 : YY_CURRENT_BUFFER_LVALUE->yy_buffer_status =
1374 : 0 : YY_BUFFER_EOF_PENDING;
1375 : : }
1376 : : }
1377 : :
1378 : : else
1379 : 0 : ret_val = EOB_ACT_CONTINUE_SCAN;
1380 : :
1381 [ # # ]: 0 : if ((yy_size_t) ((yy_n_chars) + number_to_move) > YY_CURRENT_BUFFER_LVALUE->yy_buf_size) {
1382 : : /* Extend the array by 50%, plus the number we really need. */
1383 : 0 : yy_size_t new_size = (yy_n_chars) + number_to_move + ((yy_n_chars) >> 1);
1384 : 0 : YY_CURRENT_BUFFER_LVALUE->yy_ch_buf = (char *) citi_realloc((void *) YY_CURRENT_BUFFER_LVALUE->yy_ch_buf,new_size );
1385 [ # # ]: 0 : if ( ! YY_CURRENT_BUFFER_LVALUE->yy_ch_buf )
1386 : 0 : YY_FATAL_ERROR( "out of dynamic memory in yy_get_next_buffer()" );
1387 : : }
1388 : :
1389 : 0 : (yy_n_chars) += number_to_move;
1390 : 0 : YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[(yy_n_chars)] = YY_END_OF_BUFFER_CHAR;
1391 : 0 : YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[(yy_n_chars) + 1] = YY_END_OF_BUFFER_CHAR;
1392 : :
1393 : 0 : (yytext_ptr) = &YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[0];
1394 : :
1395 : 0 : return ret_val;
1396 : : }
1397 : :
1398 : : /* yy_get_previous_state - get the state just before the EOB char was reached */
1399 : :
1400 : 0 : static yy_state_type yy_get_previous_state (void)
1401 : : {
1402 : : register yy_state_type yy_current_state;
1403 : : register char *yy_cp;
1404 : :
1405 : 0 : yy_current_state = (yy_start);
1406 : 0 : yy_current_state += YY_AT_BOL();
1407 : :
1408 [ # # ]: 0 : for ( yy_cp = (yytext_ptr) + YY_MORE_ADJ; yy_cp < (yy_c_buf_p); ++yy_cp )
1409 : : {
1410 [ # # ]: 0 : register YY_CHAR yy_c = (*yy_cp ? yy_ec[YY_SC_TO_UI(*yy_cp)] : 1);
1411 [ # # ]: 0 : if ( yy_accept[yy_current_state] )
1412 : : {
1413 : 0 : (yy_last_accepting_state) = yy_current_state;
1414 : 0 : (yy_last_accepting_cpos) = yy_cp;
1415 : : }
1416 [ # # ]: 0 : while ( yy_chk[yy_base[yy_current_state] + yy_c] != yy_current_state )
1417 : : {
1418 : 0 : yy_current_state = (int) yy_def[yy_current_state];
1419 [ # # ]: 0 : if ( yy_current_state >= 168 )
1420 : 0 : yy_c = yy_meta[(unsigned int) yy_c];
1421 : : }
1422 : 0 : yy_current_state = yy_nxt[yy_base[yy_current_state] + (unsigned int) yy_c];
1423 : : }
1424 : :
1425 : 0 : return yy_current_state;
1426 : : }
1427 : :
1428 : : /* yy_try_NUL_trans - try to make a transition on the NUL character
1429 : : *
1430 : : * synopsis
1431 : : * next_state = yy_try_NUL_trans( current_state );
1432 : : */
1433 : 0 : static yy_state_type yy_try_NUL_trans (yy_state_type yy_current_state )
1434 : : {
1435 : : register int yy_is_jam;
1436 : 0 : register char *yy_cp = (yy_c_buf_p);
1437 : :
1438 : 0 : register YY_CHAR yy_c = 1;
1439 [ # # ]: 0 : if ( yy_accept[yy_current_state] )
1440 : : {
1441 : 0 : (yy_last_accepting_state) = yy_current_state;
1442 : 0 : (yy_last_accepting_cpos) = yy_cp;
1443 : : }
1444 [ # # ]: 0 : while ( yy_chk[yy_base[yy_current_state] + yy_c] != yy_current_state )
1445 : : {
1446 : 0 : yy_current_state = (int) yy_def[yy_current_state];
1447 [ # # ]: 0 : if ( yy_current_state >= 168 )
1448 : 0 : yy_c = yy_meta[(unsigned int) yy_c];
1449 : : }
1450 : 0 : yy_current_state = yy_nxt[yy_base[yy_current_state] + (unsigned int) yy_c];
1451 : 0 : yy_is_jam = (yy_current_state == 167);
1452 : :
1453 [ # # ]: 0 : return yy_is_jam ? 0 : yy_current_state;
1454 : : }
1455 : :
1456 : : #ifndef YY_NO_INPUT
1457 : : #ifdef __cplusplus
1458 : 0 : static int yyinput (void)
1459 : : #else
1460 : : static int input (void)
1461 : : #endif
1462 : :
1463 : : {
1464 : : int c;
1465 : :
1466 : 0 : *(yy_c_buf_p) = (yy_hold_char);
1467 : :
1468 [ # # ]: 0 : if ( *(yy_c_buf_p) == YY_END_OF_BUFFER_CHAR )
1469 : : {
1470 : : /* yy_c_buf_p now points to the character we want to return.
1471 : : * If this occurs *before* the EOB characters, then it's a
1472 : : * valid NUL; if not, then we've hit the end of the buffer.
1473 : : */
1474 [ # # ]: 0 : if ( (yy_c_buf_p) < &YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[(yy_n_chars)] )
1475 : : /* This was really a NUL. */
1476 : 0 : *(yy_c_buf_p) = '\0';
1477 : :
1478 : : else
1479 : : { /* need more input */
1480 : 0 : yy_size_t offset = (yy_c_buf_p) - (yytext_ptr);
1481 : 0 : ++(yy_c_buf_p);
1482 : :
1483 [ # # # # ]: 0 : switch ( yy_get_next_buffer( ) )
1484 : : {
1485 : : case EOB_ACT_LAST_MATCH:
1486 : : /* This happens because yy_g_n_b()
1487 : : * sees that we've accumulated a
1488 : : * token and flags that we need to
1489 : : * try matching the token before
1490 : : * proceeding. But for input(),
1491 : : * there's no matching to consider.
1492 : : * So convert the EOB_ACT_LAST_MATCH
1493 : : * to EOB_ACT_END_OF_FILE.
1494 : : */
1495 : :
1496 : : /* Reset buffer status. */
1497 : 0 : citi_restart(citi_in );
1498 : :
1499 : : /*FALLTHROUGH*/
1500 : :
1501 : : case EOB_ACT_END_OF_FILE:
1502 : : {
1503 : : if ( citi_wrap( ) )
1504 : 0 : return EOF;
1505 : :
1506 : : if ( ! (yy_did_buffer_switch_on_eof) )
1507 : : YY_NEW_FILE;
1508 : : #ifdef __cplusplus
1509 : : return yyinput();
1510 : : #else
1511 : : return input();
1512 : : #endif
1513 : : }
1514 : :
1515 : : case EOB_ACT_CONTINUE_SCAN:
1516 : 0 : (yy_c_buf_p) = (yytext_ptr) + offset;
1517 : 0 : break;
1518 : : }
1519 : : }
1520 : : }
1521 : :
1522 : 0 : c = *(unsigned char *) (yy_c_buf_p); /* cast for 8-bit char's */
1523 : 0 : *(yy_c_buf_p) = '\0'; /* preserve citi_text */
1524 : 0 : (yy_hold_char) = *++(yy_c_buf_p);
1525 : :
1526 : 0 : YY_CURRENT_BUFFER_LVALUE->yy_at_bol = (c == '\n');
1527 [ # # ]: 0 : if ( YY_CURRENT_BUFFER_LVALUE->yy_at_bol )
1528 : :
1529 : 0 : citi_lineno++;
1530 : : ;
1531 : :
1532 : 0 : return c;
1533 : : }
1534 : : #endif /* ifndef YY_NO_INPUT */
1535 : :
1536 : : /** Immediately switch to a different input stream.
1537 : : * @param input_file A readable stream.
1538 : : *
1539 : : * @note This function does not reset the start condition to @c INITIAL .
1540 : : */
1541 : 0 : void citi_restart (FILE * input_file )
1542 : : {
1543 : :
1544 [ # # ][ # # ]: 0 : if ( ! YY_CURRENT_BUFFER ){
1545 : 0 : citi_ensure_buffer_stack ();
1546 : 0 : YY_CURRENT_BUFFER_LVALUE =
1547 : 0 : citi__create_buffer(citi_in,YY_BUF_SIZE );
1548 : : }
1549 : :
1550 [ # # ]: 0 : citi__init_buffer(YY_CURRENT_BUFFER,input_file );
1551 : 0 : citi__load_buffer_state( );
1552 : 0 : }
1553 : :
1554 : : /** Switch to a different input buffer.
1555 : : * @param new_buffer The new input buffer.
1556 : : *
1557 : : */
1558 : 0 : void citi__switch_to_buffer (YY_BUFFER_STATE new_buffer )
1559 : : {
1560 : :
1561 : : /* TODO. We should be able to replace this entire function body
1562 : : * with
1563 : : * citi_pop_buffer_state();
1564 : : * citi_push_buffer_state(new_buffer);
1565 : : */
1566 : 0 : citi_ensure_buffer_stack ();
1567 [ # # ][ # # ]: 0 : if ( YY_CURRENT_BUFFER == new_buffer )
1568 : 0 : return;
1569 : :
1570 [ # # ][ # # ]: 0 : if ( YY_CURRENT_BUFFER )
1571 : : {
1572 : : /* Flush out information for old buffer. */
1573 : 0 : *(yy_c_buf_p) = (yy_hold_char);
1574 : 0 : YY_CURRENT_BUFFER_LVALUE->yy_buf_pos = (yy_c_buf_p);
1575 : 0 : YY_CURRENT_BUFFER_LVALUE->yy_n_chars = (yy_n_chars);
1576 : : }
1577 : :
1578 : 0 : YY_CURRENT_BUFFER_LVALUE = new_buffer;
1579 : 0 : citi__load_buffer_state( );
1580 : :
1581 : : /* We don't actually know whether we did this switch during
1582 : : * EOF (citi_wrap()) processing, but the only time this flag
1583 : : * is looked at is after citi_wrap() is called, so it's safe
1584 : : * to go ahead and always set it.
1585 : : */
1586 : 0 : (yy_did_buffer_switch_on_eof) = 1;
1587 : : }
1588 : :
1589 : 0 : static void citi__load_buffer_state (void)
1590 : : {
1591 : 0 : (yy_n_chars) = YY_CURRENT_BUFFER_LVALUE->yy_n_chars;
1592 : 0 : (yytext_ptr) = (yy_c_buf_p) = YY_CURRENT_BUFFER_LVALUE->yy_buf_pos;
1593 : 0 : citi_in = YY_CURRENT_BUFFER_LVALUE->yy_input_file;
1594 : 0 : (yy_hold_char) = *(yy_c_buf_p);
1595 : 0 : }
1596 : :
1597 : : /** Allocate and initialize an input buffer state.
1598 : : * @param file A readable stream.
1599 : : * @param size The character buffer size in bytes. When in doubt, use @c YY_BUF_SIZE.
1600 : : *
1601 : : * @return the allocated buffer state.
1602 : : */
1603 : 0 : YY_BUFFER_STATE citi__create_buffer (FILE * file, int size )
1604 : : {
1605 : : YY_BUFFER_STATE b;
1606 : :
1607 : 0 : b = (YY_BUFFER_STATE) citi_alloc(sizeof( struct yy_buffer_state ) );
1608 [ # # ]: 0 : if ( ! b )
1609 : 0 : YY_FATAL_ERROR( "out of dynamic memory in citi__create_buffer()" );
1610 : :
1611 : 0 : b->yy_buf_size = size;
1612 : :
1613 : : /* yy_ch_buf has to be 2 characters longer than the size given because
1614 : : * we need to put in 2 end-of-buffer characters.
1615 : : */
1616 : 0 : b->yy_ch_buf = (char *) citi_alloc(b->yy_buf_size + 2 );
1617 [ # # ]: 0 : if ( ! b->yy_ch_buf )
1618 : 0 : YY_FATAL_ERROR( "out of dynamic memory in citi__create_buffer()" );
1619 : :
1620 : 0 : b->yy_is_our_buffer = 1;
1621 : :
1622 : 0 : citi__init_buffer(b,file );
1623 : :
1624 : 0 : return b;
1625 : : }
1626 : :
1627 : : /** Destroy the buffer.
1628 : : * @param b a buffer created with citi__create_buffer()
1629 : : *
1630 : : */
1631 : 0 : void citi__delete_buffer (YY_BUFFER_STATE b )
1632 : : {
1633 : :
1634 [ # # ]: 0 : if ( ! b )
1635 : 0 : return;
1636 : :
1637 [ # # ][ # # ]: 0 : if ( b == YY_CURRENT_BUFFER ) /* Not sure if we should pop here. */
1638 : 0 : YY_CURRENT_BUFFER_LVALUE = (YY_BUFFER_STATE) 0;
1639 : :
1640 [ # # ]: 0 : if ( b->yy_is_our_buffer )
1641 : 0 : citi_free((void *) b->yy_ch_buf );
1642 : :
1643 : 0 : citi_free((void *) b );
1644 : : }
1645 : :
1646 : : /* Initializes or reinitializes a buffer.
1647 : : * This function is sometimes called more than once on the same buffer,
1648 : : * such as during a citi_restart() or at EOF.
1649 : : */
1650 : 0 : static void citi__init_buffer (YY_BUFFER_STATE b, FILE * file )
1651 : :
1652 : : {
1653 : 0 : int oerrno = errno;
1654 : :
1655 : 0 : citi__flush_buffer(b );
1656 : :
1657 : 0 : b->yy_input_file = file;
1658 : 0 : b->yy_fill_buffer = 1;
1659 : :
1660 : : /* If b is the current buffer, then citi__init_buffer was _probably_
1661 : : * called from citi_restart() or through yy_get_next_buffer.
1662 : : * In that case, we don't want to reset the lineno or column.
1663 : : */
1664 [ # # ][ # # ]: 0 : if (b != YY_CURRENT_BUFFER){
1665 : 0 : b->yy_bs_lineno = 1;
1666 : 0 : b->yy_bs_column = 0;
1667 : : }
1668 : :
1669 [ # # ][ # # ]: 0 : b->yy_is_interactive = file ? (isatty( fileno(file) ) > 0) : 0;
1670 : :
1671 : 0 : errno = oerrno;
1672 : 0 : }
1673 : :
1674 : : /** Discard all buffered characters. On the next scan, YY_INPUT will be called.
1675 : : * @param b the buffer state to be flushed, usually @c YY_CURRENT_BUFFER.
1676 : : *
1677 : : */
1678 : 0 : void citi__flush_buffer (YY_BUFFER_STATE b )
1679 : : {
1680 [ # # ]: 0 : if ( ! b )
1681 : 0 : return;
1682 : :
1683 : 0 : b->yy_n_chars = 0;
1684 : :
1685 : : /* We always need two end-of-buffer characters. The first causes
1686 : : * a transition to the end-of-buffer state. The second causes
1687 : : * a jam in that state.
1688 : : */
1689 : 0 : b->yy_ch_buf[0] = YY_END_OF_BUFFER_CHAR;
1690 : 0 : b->yy_ch_buf[1] = YY_END_OF_BUFFER_CHAR;
1691 : :
1692 : 0 : b->yy_buf_pos = &b->yy_ch_buf[0];
1693 : :
1694 : 0 : b->yy_at_bol = 1;
1695 : 0 : b->yy_buffer_status = YY_BUFFER_NEW;
1696 : :
1697 [ # # ][ # # ]: 0 : if ( b == YY_CURRENT_BUFFER )
1698 : 0 : citi__load_buffer_state( );
1699 : : }
1700 : :
1701 : : /** Pushes the new state onto the stack. The new state becomes
1702 : : * the current state. This function will allocate the stack
1703 : : * if necessary.
1704 : : * @param new_buffer The new state.
1705 : : *
1706 : : */
1707 : 0 : void citi_push_buffer_state (YY_BUFFER_STATE new_buffer )
1708 : : {
1709 [ # # ]: 0 : if (new_buffer == NULL)
1710 : 0 : return;
1711 : :
1712 : 0 : citi_ensure_buffer_stack();
1713 : :
1714 : : /* This block is copied from citi__switch_to_buffer. */
1715 [ # # ][ # # ]: 0 : if ( YY_CURRENT_BUFFER )
1716 : : {
1717 : : /* Flush out information for old buffer. */
1718 : 0 : *(yy_c_buf_p) = (yy_hold_char);
1719 : 0 : YY_CURRENT_BUFFER_LVALUE->yy_buf_pos = (yy_c_buf_p);
1720 : 0 : YY_CURRENT_BUFFER_LVALUE->yy_n_chars = (yy_n_chars);
1721 : : }
1722 : :
1723 : : /* Only push if top exists. Otherwise, replace top. */
1724 [ # # ][ # # ]: 0 : if (YY_CURRENT_BUFFER)
1725 : 0 : (yy_buffer_stack_top)++;
1726 : 0 : YY_CURRENT_BUFFER_LVALUE = new_buffer;
1727 : :
1728 : : /* copied from citi__switch_to_buffer. */
1729 : 0 : citi__load_buffer_state( );
1730 : 0 : (yy_did_buffer_switch_on_eof) = 1;
1731 : : }
1732 : :
1733 : : /** Removes and deletes the top of the stack, if present.
1734 : : * The next element becomes the new top.
1735 : : *
1736 : : */
1737 : 0 : void citi_pop_buffer_state (void)
1738 : : {
1739 [ # # ][ # # ]: 0 : if (!YY_CURRENT_BUFFER)
1740 : 0 : return;
1741 : :
1742 [ # # ]: 0 : citi__delete_buffer(YY_CURRENT_BUFFER );
1743 : 0 : YY_CURRENT_BUFFER_LVALUE = NULL;
1744 [ # # ]: 0 : if ((yy_buffer_stack_top) > 0)
1745 : 0 : --(yy_buffer_stack_top);
1746 : :
1747 [ # # ][ # # ]: 0 : if (YY_CURRENT_BUFFER) {
1748 : 0 : citi__load_buffer_state( );
1749 : 0 : (yy_did_buffer_switch_on_eof) = 1;
1750 : : }
1751 : : }
1752 : :
1753 : : /* Allocates the stack if it does not exist.
1754 : : * Guarantees space for at least one push.
1755 : : */
1756 : 0 : static void citi_ensure_buffer_stack (void)
1757 : : {
1758 : : yy_size_t num_to_alloc;
1759 : :
1760 [ # # ]: 0 : if (!(yy_buffer_stack)) {
1761 : :
1762 : : /* First allocation is just for 2 elements, since we don't know if this
1763 : : * scanner will even need a stack. We use 2 instead of 1 to avoid an
1764 : : * immediate realloc on the next call.
1765 : : */
1766 : 0 : num_to_alloc = 1;
1767 : : (yy_buffer_stack) = (struct yy_buffer_state**)citi_alloc
1768 : : (num_to_alloc * sizeof(struct yy_buffer_state*)
1769 : 0 : );
1770 [ # # ]: 0 : if ( ! (yy_buffer_stack) )
1771 : 0 : YY_FATAL_ERROR( "out of dynamic memory in citi_ensure_buffer_stack()" );
1772 : :
1773 : 0 : memset((yy_buffer_stack), 0, num_to_alloc * sizeof(struct yy_buffer_state*));
1774 : :
1775 : 0 : (yy_buffer_stack_max) = num_to_alloc;
1776 : 0 : (yy_buffer_stack_top) = 0;
1777 : 0 : return;
1778 : : }
1779 : :
1780 [ # # ]: 0 : if ((yy_buffer_stack_top) >= ((yy_buffer_stack_max)) - 1){
1781 : :
1782 : : /* Increase the buffer to prepare for a possible push. */
1783 : 0 : int grow_size = 8 /* arbitrary grow size */;
1784 : :
1785 : 0 : num_to_alloc = (yy_buffer_stack_max) + grow_size;
1786 : : (yy_buffer_stack) = (struct yy_buffer_state**)citi_realloc
1787 : : ((yy_buffer_stack),
1788 : : num_to_alloc * sizeof(struct yy_buffer_state*)
1789 : 0 : );
1790 [ # # ]: 0 : if ( ! (yy_buffer_stack) )
1791 : 0 : YY_FATAL_ERROR( "out of dynamic memory in citi_ensure_buffer_stack()" );
1792 : :
1793 : : /* zero only the new slots.*/
1794 : 0 : memset((yy_buffer_stack) + (yy_buffer_stack_max), 0, grow_size * sizeof(struct yy_buffer_state*));
1795 : 0 : (yy_buffer_stack_max) = num_to_alloc;
1796 : : }
1797 : : }
1798 : :
1799 : : /** Setup the input buffer state to scan directly from a user-specified character buffer.
1800 : : * @param base the character buffer
1801 : : * @param size the size in bytes of the character buffer
1802 : : *
1803 : : * @return the newly allocated buffer state object.
1804 : : */
1805 : 0 : YY_BUFFER_STATE citi__scan_buffer (char * base, yy_size_t size )
1806 : : {
1807 : : YY_BUFFER_STATE b;
1808 : :
1809 [ # # ][ # # ]: 0 : if ( size < 2 ||
[ # # ]
1810 : 0 : base[size-2] != YY_END_OF_BUFFER_CHAR ||
1811 : 0 : base[size-1] != YY_END_OF_BUFFER_CHAR )
1812 : : /* They forgot to leave room for the EOB's. */
1813 : 0 : return 0;
1814 : :
1815 : 0 : b = (YY_BUFFER_STATE) citi_alloc(sizeof( struct yy_buffer_state ) );
1816 [ # # ]: 0 : if ( ! b )
1817 : 0 : YY_FATAL_ERROR( "out of dynamic memory in citi__scan_buffer()" );
1818 : :
1819 : 0 : b->yy_buf_size = size - 2; /* "- 2" to take care of EOB's */
1820 : 0 : b->yy_buf_pos = b->yy_ch_buf = base;
1821 : 0 : b->yy_is_our_buffer = 0;
1822 : 0 : b->yy_input_file = 0;
1823 : 0 : b->yy_n_chars = b->yy_buf_size;
1824 : 0 : b->yy_is_interactive = 0;
1825 : 0 : b->yy_at_bol = 1;
1826 : 0 : b->yy_fill_buffer = 0;
1827 : 0 : b->yy_buffer_status = YY_BUFFER_NEW;
1828 : :
1829 : 0 : citi__switch_to_buffer(b );
1830 : :
1831 : 0 : return b;
1832 : : }
1833 : :
1834 : : /** Setup the input buffer state to scan a string. The next call to citi_lex() will
1835 : : * scan from a @e copy of @a str.
1836 : : * @param yystr a NUL-terminated string to scan
1837 : : *
1838 : : * @return the newly allocated buffer state object.
1839 : : * @note If you want to scan bytes that may contain NUL values, then use
1840 : : * citi__scan_bytes() instead.
1841 : : */
1842 : 0 : YY_BUFFER_STATE citi__scan_string (yyconst char * yystr )
1843 : : {
1844 : :
1845 : 0 : return citi__scan_bytes(yystr,strlen(yystr) );
1846 : : }
1847 : :
1848 : : /** Setup the input buffer state to scan the given bytes. The next call to citi_lex() will
1849 : : * scan from a @e copy of @a bytes.
1850 : : * @param yybytes the byte buffer to scan
1851 : : * @param _yybytes_len the number of bytes in the buffer pointed to by @a bytes.
1852 : : *
1853 : : * @return the newly allocated buffer state object.
1854 : : */
1855 : 0 : YY_BUFFER_STATE citi__scan_bytes (yyconst char * yybytes, yy_size_t _yybytes_len )
1856 : : {
1857 : : YY_BUFFER_STATE b;
1858 : : char *buf;
1859 : : yy_size_t n;
1860 : : int i;
1861 : :
1862 : : /* Get memory for full buffer, including space for trailing EOB's. */
1863 : 0 : n = _yybytes_len + 2;
1864 : 0 : buf = (char *) citi_alloc(n );
1865 [ # # ]: 0 : if ( ! buf )
1866 : 0 : YY_FATAL_ERROR( "out of dynamic memory in citi__scan_bytes()" );
1867 : :
1868 [ # # ]: 0 : for ( i = 0; i < _yybytes_len; ++i )
1869 : 0 : buf[i] = yybytes[i];
1870 : :
1871 : 0 : buf[_yybytes_len] = buf[_yybytes_len+1] = YY_END_OF_BUFFER_CHAR;
1872 : :
1873 : 0 : b = citi__scan_buffer(buf,n );
1874 [ # # ]: 0 : if ( ! b )
1875 : 0 : YY_FATAL_ERROR( "bad buffer in citi__scan_bytes()" );
1876 : :
1877 : : /* It's okay to grow etc. this buffer, and we should throw it
1878 : : * away when we're done.
1879 : : */
1880 : 0 : b->yy_is_our_buffer = 1;
1881 : :
1882 : 0 : return b;
1883 : : }
1884 : :
1885 : : #ifndef YY_EXIT_FAILURE
1886 : : #define YY_EXIT_FAILURE 2
1887 : : #endif
1888 : :
1889 : 0 : static void yy_fatal_error (yyconst char* msg )
1890 : : {
1891 : 0 : (void) fprintf( stderr, "%s\n", msg );
1892 : 0 : exit( YY_EXIT_FAILURE );
1893 : : }
1894 : :
1895 : : /* Redefine yyless() so it works in section 3 code. */
1896 : :
1897 : : #undef yyless
1898 : : #define yyless(n) \
1899 : : do \
1900 : : { \
1901 : : /* Undo effects of setting up citi_text. */ \
1902 : : int yyless_macro_arg = (n); \
1903 : : YY_LESS_LINENO(yyless_macro_arg);\
1904 : : citi_text[citi_leng] = (yy_hold_char); \
1905 : : (yy_c_buf_p) = citi_text + yyless_macro_arg; \
1906 : : (yy_hold_char) = *(yy_c_buf_p); \
1907 : : *(yy_c_buf_p) = '\0'; \
1908 : : citi_leng = yyless_macro_arg; \
1909 : : } \
1910 : : while ( 0 )
1911 : :
1912 : : /* Accessor methods (get/set functions) to struct members. */
1913 : :
1914 : : /** Get the current line number.
1915 : : *
1916 : : */
1917 : 0 : int citi_get_lineno (void)
1918 : : {
1919 : :
1920 : 0 : return citi_lineno;
1921 : : }
1922 : :
1923 : : /** Get the input stream.
1924 : : *
1925 : : */
1926 : 0 : FILE *citi_get_in (void)
1927 : : {
1928 : 0 : return citi_in;
1929 : : }
1930 : :
1931 : : /** Get the output stream.
1932 : : *
1933 : : */
1934 : 0 : FILE *citi_get_out (void)
1935 : : {
1936 : 0 : return citi_out;
1937 : : }
1938 : :
1939 : : /** Get the length of the current token.
1940 : : *
1941 : : */
1942 : 0 : yy_size_t citi_get_leng (void)
1943 : : {
1944 : 0 : return citi_leng;
1945 : : }
1946 : :
1947 : : /** Get the current token.
1948 : : *
1949 : : */
1950 : :
1951 : 0 : char *citi_get_text (void)
1952 : : {
1953 : 0 : return citi_text;
1954 : : }
1955 : :
1956 : : /** Set the current line number.
1957 : : * @param line_number
1958 : : *
1959 : : */
1960 : 0 : void citi_set_lineno (int line_number )
1961 : : {
1962 : :
1963 : 0 : citi_lineno = line_number;
1964 : 0 : }
1965 : :
1966 : : /** Set the input stream. This does not discard the current
1967 : : * input buffer.
1968 : : * @param in_str A readable stream.
1969 : : *
1970 : : * @see citi__switch_to_buffer
1971 : : */
1972 : 0 : void citi_set_in (FILE * in_str )
1973 : : {
1974 : 0 : citi_in = in_str ;
1975 : 0 : }
1976 : :
1977 : 0 : void citi_set_out (FILE * out_str )
1978 : : {
1979 : 0 : citi_out = out_str ;
1980 : 0 : }
1981 : :
1982 : 0 : int citi_get_debug (void)
1983 : : {
1984 : 0 : return citi__flex_debug;
1985 : : }
1986 : :
1987 : 0 : void citi_set_debug (int bdebug )
1988 : : {
1989 : 0 : citi__flex_debug = bdebug ;
1990 : 0 : }
1991 : :
1992 : 0 : static int yy_init_globals (void)
1993 : : {
1994 : : /* Initialization is the same as for the non-reentrant scanner.
1995 : : * This function is called from citi_lex_destroy(), so don't allocate here.
1996 : : */
1997 : :
1998 : : /* We do not touch citi_lineno unless the option is enabled. */
1999 : 0 : citi_lineno = 1;
2000 : :
2001 : 0 : (yy_buffer_stack) = 0;
2002 : 0 : (yy_buffer_stack_top) = 0;
2003 : 0 : (yy_buffer_stack_max) = 0;
2004 : 0 : (yy_c_buf_p) = (char *) 0;
2005 : 0 : (yy_init) = 0;
2006 : 0 : (yy_start) = 0;
2007 : :
2008 : : /* Defined in main.c */
2009 : : #ifdef YY_STDINIT
2010 : : citi_in = stdin;
2011 : : citi_out = stdout;
2012 : : #else
2013 : 0 : citi_in = (FILE *) 0;
2014 : 0 : citi_out = (FILE *) 0;
2015 : : #endif
2016 : :
2017 : : /* For future reference: Set errno on error, since we are called by
2018 : : * citi_lex_init()
2019 : : */
2020 : 0 : return 0;
2021 : : }
2022 : :
2023 : : /* citi_lex_destroy is for both reentrant and non-reentrant scanners. */
2024 : 0 : int citi_lex_destroy (void)
2025 : : {
2026 : :
2027 : : /* Pop the buffer stack, destroying each element. */
2028 [ # # ][ # # ]: 0 : while(YY_CURRENT_BUFFER){
[ # # ]
2029 [ # # ]: 0 : citi__delete_buffer(YY_CURRENT_BUFFER );
2030 : 0 : YY_CURRENT_BUFFER_LVALUE = NULL;
2031 : 0 : citi_pop_buffer_state();
2032 : : }
2033 : :
2034 : : /* Destroy the stack itself. */
2035 : 0 : citi_free((yy_buffer_stack) );
2036 : 0 : (yy_buffer_stack) = NULL;
2037 : :
2038 : : /* Reset the globals. This is important in a non-reentrant scanner so the next time
2039 : : * citi_lex() is called, initialization will occur. */
2040 : 0 : yy_init_globals( );
2041 : :
2042 : 0 : return 0;
2043 : : }
2044 : :
2045 : : /*
2046 : : * Internal utility routines.
2047 : : */
2048 : :
2049 : : #ifndef yytext_ptr
2050 : : static void yy_flex_strncpy (char* s1, yyconst char * s2, int n )
2051 : : {
2052 : : register int i;
2053 : : for ( i = 0; i < n; ++i )
2054 : : s1[i] = s2[i];
2055 : : }
2056 : : #endif
2057 : :
2058 : : #ifdef YY_NEED_STRLEN
2059 : : static int yy_flex_strlen (yyconst char * s )
2060 : : {
2061 : : register int n;
2062 : : for ( n = 0; s[n]; ++n )
2063 : : ;
2064 : :
2065 : : return n;
2066 : : }
2067 : : #endif
2068 : :
2069 : 0 : void *citi_alloc (yy_size_t size )
2070 : : {
2071 : 0 : return (void *) malloc( size );
2072 : : }
2073 : :
2074 : 0 : void *citi_realloc (void * ptr, yy_size_t size )
2075 : : {
2076 : : /* The cast to (char *) in the following accommodates both
2077 : : * implementations that use char* generic pointers, and those
2078 : : * that use void* generic pointers. It works with the latter
2079 : : * because both ANSI C and C++ allow castless assignment from
2080 : : * any pointer type to void*, and deal with argument conversions
2081 : : * as though doing an assignment.
2082 : : */
2083 : 0 : return (void *) realloc( (char *) ptr, size );
2084 : : }
2085 : :
2086 : 0 : void citi_free (void * ptr )
2087 : : {
2088 : 0 : free( (char *) ptr ); /* see citi_realloc() for (char *) cast */
2089 : 0 : }
2090 : :
2091 : : #define YYTABLES_NAME "yytables"
2092 : :
2093 : : #line 139 "scan_citi.l"
2094 : :
2095 : :
2096 : :
|
