1 /* A lexical scanner generated by flex */
3 /* Scanner skeleton version:
8 #define YY_FLEX_MAJOR_VERSION 2
9 #define YY_FLEX_MINOR_VERSION 5
14 /* cfront 1.2 defines "c_plusplus" instead of "__cplusplus" */
27 /* Use prototypes in function declarations. */
30 /* The "const" storage-class-modifier is valid. */
33 #else /* ! __cplusplus */
41 #endif /* ! __cplusplus */
60 #define YY_PROTO(proto) proto
62 #define YY_PROTO(proto) ()
65 /* Returned upon end-of-file. */
68 /* Promotes a possibly negative, possibly signed char to an unsigned
69 * integer for use as an array index. If the signed char is negative,
70 * we want to instead treat it as an 8-bit unsigned char, hence the
73 #define YY_SC_TO_UI(c) ((unsigned int) (unsigned char) c)
75 /* Enter a start condition. This macro really ought to take a parameter,
76 * but we do it the disgusting crufty way forced on us by the ()-less
77 * definition of BEGIN.
79 #define BEGIN yy_start = 1 + 2 *
81 /* Translate the current start state into a value that can be later handed
82 * to BEGIN to return to the state. The YYSTATE alias is for lex
85 #define YY_START ((yy_start - 1) / 2)
86 #define YYSTATE YY_START
88 /* Action number for EOF rule of a given start state. */
89 #define YY_STATE_EOF(state) (YY_END_OF_BUFFER + state + 1)
91 /* Special action meaning "start processing a new file". */
92 #define YY_NEW_FILE yyrestart( yyin )
94 #define YY_END_OF_BUFFER_CHAR 0
96 /* Size of default input buffer. */
97 #define YY_BUF_SIZE 16384
99 typedef struct yy_buffer_state
*YY_BUFFER_STATE
;
102 extern FILE *yyin
, *yyout
;
104 #define EOB_ACT_CONTINUE_SCAN 0
105 #define EOB_ACT_END_OF_FILE 1
106 #define EOB_ACT_LAST_MATCH 2
108 /* The funky do-while in the following #define is used to turn the definition
109 * int a single C statement (which needs a semi-colon terminator). This
110 * avoids problems with code like:
112 * if ( condition_holds )
115 * do_something_else();
117 * Prior to using the do-while the compiler would get upset at the
118 * "else" because it interpreted the "if" statement as being all
119 * done when it reached the ';' after the yyless() call.
122 /* Return all but the first 'n' matched characters back to the input stream. */
127 /* Undo effects of setting up yytext. */ \
128 *yy_cp = yy_hold_char; \
129 YY_RESTORE_YY_MORE_OFFSET \
130 yy_c_buf_p = yy_cp = yy_bp + n - YY_MORE_ADJ; \
131 YY_DO_BEFORE_ACTION; /* set up yytext again */ \
135 #define unput(c) yyunput( c, yytext_ptr )
137 /* The following is because we cannot portably get our hands on size_t
138 * (without autoconf's help, which isn't available because we want
139 * flex-generated scanners to compile on their own).
141 typedef unsigned int yy_size_t
;
144 struct yy_buffer_state
148 char *yy_ch_buf
; /* input buffer */
149 char *yy_buf_pos
; /* current position in input buffer */
151 /* Size of input buffer in bytes, not including room for EOB
154 yy_size_t yy_buf_size
;
156 /* Number of characters read into yy_ch_buf, not including EOB
161 /* Whether we "own" the buffer - i.e., we know we created it,
162 * and can realloc() it to grow it, and should free() it to
165 int yy_is_our_buffer
;
167 /* Whether this is an "interactive" input source; if so, and
168 * if we're using stdio for input, then we want to use getc()
169 * instead of fread(), to make sure we stop fetching input after
172 int yy_is_interactive
;
174 /* Whether we're considered to be at the beginning of a line.
175 * If so, '^' rules will be active on the next match, otherwise
180 /* Whether to try to fill the input buffer when we reach the
185 int yy_buffer_status
;
186 #define YY_BUFFER_NEW 0
187 #define YY_BUFFER_NORMAL 1
188 /* When an EOF's been seen but there's still some text to process
189 * then we mark the buffer as YY_EOF_PENDING, to indicate that we
190 * shouldn't try reading from the input source any more. We might
191 * still have a bunch of tokens to match, though, because of
192 * possible backing-up.
194 * When we actually see the EOF, we change the status to "new"
195 * (via yyrestart()), so that the user can continue scanning by
196 * just pointing yyin at a new input file.
198 #define YY_BUFFER_EOF_PENDING 2
201 static YY_BUFFER_STATE yy_current_buffer
= 0;
203 /* We provide macros for accessing buffer states in case in the
204 * future we want to put the buffer states in a more general
207 #define YY_CURRENT_BUFFER yy_current_buffer
210 /* yy_hold_char holds the character lost when yytext is formed. */
211 static char yy_hold_char
;
213 static int yy_n_chars
; /* number of characters read into yy_ch_buf */
218 /* Points to current character in buffer. */
219 static char *yy_c_buf_p
= (char *) 0;
220 static int yy_init
= 1; /* whether we need to initialize */
221 static int yy_start
= 0; /* start state number */
223 /* Flag which is used to allow yywrap()'s to do buffer switches
224 * instead of setting up a fresh yyin. A bit of a hack ...
226 static int yy_did_buffer_switch_on_eof
;
228 void yyrestart
YY_PROTO(( FILE *input_file
));
230 void yy_switch_to_buffer
YY_PROTO(( YY_BUFFER_STATE new_buffer
));
231 void yy_load_buffer_state
YY_PROTO(( void ));
232 YY_BUFFER_STATE yy_create_buffer
YY_PROTO(( FILE *file
, int size
));
233 void yy_delete_buffer
YY_PROTO(( YY_BUFFER_STATE b
));
234 void yy_init_buffer
YY_PROTO(( YY_BUFFER_STATE b
, FILE *file
));
235 void yy_flush_buffer
YY_PROTO(( YY_BUFFER_STATE b
));
236 #define YY_FLUSH_BUFFER yy_flush_buffer( yy_current_buffer )
238 YY_BUFFER_STATE yy_scan_buffer
YY_PROTO(( char *base
, yy_size_t size
));
239 YY_BUFFER_STATE yy_scan_string
YY_PROTO(( yyconst
char *yy_str
));
240 YY_BUFFER_STATE yy_scan_bytes
YY_PROTO(( yyconst
char *bytes
, int len
));
242 static void *yy_flex_alloc
YY_PROTO(( yy_size_t
));
243 static void *yy_flex_realloc
YY_PROTO(( void *, yy_size_t
));
244 static void yy_flex_free
YY_PROTO(( void * ));
246 #define yy_new_buffer yy_create_buffer
248 #define yy_set_interactive(is_interactive) \
250 if ( ! yy_current_buffer ) \
251 yy_current_buffer = yy_create_buffer( yyin, YY_BUF_SIZE ); \
252 yy_current_buffer->yy_is_interactive = is_interactive; \
255 #define yy_set_bol(at_bol) \
257 if ( ! yy_current_buffer ) \
258 yy_current_buffer = yy_create_buffer( yyin, YY_BUF_SIZE ); \
259 yy_current_buffer->yy_at_bol = at_bol; \
262 #define YY_AT_BOL() (yy_current_buffer->yy_at_bol)
264 typedef unsigned char YY_CHAR
;
265 FILE *yyin
= (FILE *) 0, *yyout
= (FILE *) 0;
266 typedef int yy_state_type
;
268 #define yytext_ptr yytext
270 static yy_state_type yy_get_previous_state
YY_PROTO(( void ));
271 static yy_state_type yy_try_NUL_trans
YY_PROTO(( yy_state_type current_state
));
272 static int yy_get_next_buffer
YY_PROTO(( void ));
273 static void yy_fatal_error
YY_PROTO(( yyconst
char msg
[] ));
275 /* Done after the current pattern has been matched and before the
276 * corresponding action - sets up yytext.
278 #define YY_DO_BEFORE_ACTION \
279 yytext_ptr = yy_bp; \
280 yyleng = (int) (yy_cp - yy_bp); \
281 yy_hold_char = *yy_cp; \
285 #define YY_NUM_RULES 33
286 #define YY_END_OF_BUFFER 34
287 static yyconst
short int yy_accept
[99] =
289 0, 0, 34, 33, 32, 31, 33, 33, 4, 27,
290 3, 29, 29, 29, 29, 29, 29, 29, 29, 29,
291 29, 29, 29, 29, 1, 2, 32, 0, 0, 27,
292 29, 29, 29, 29, 29, 20, 29, 29, 29, 29,
293 29, 29, 29, 19, 29, 29, 29, 28, 30, 29,
294 29, 29, 23, 29, 29, 29, 29, 29, 29, 24,
295 29, 29, 29, 29, 29, 7, 9, 11, 13, 29,
296 29, 22, 29, 29, 8, 10, 12, 14, 29, 29,
297 21, 29, 26, 29, 18, 29, 25, 29, 17, 29,
298 29, 29, 29, 15, 5, 16, 6, 0
302 static yyconst
int yy_ec
[256] =
304 1, 1, 1, 1, 1, 1, 1, 1, 2, 3,
305 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
306 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
307 1, 2, 1, 4, 5, 1, 1, 1, 1, 1,
308 1, 1, 1, 1, 6, 1, 1, 7, 8, 9,
309 10, 11, 7, 7, 7, 7, 7, 1, 12, 1,
310 1, 1, 1, 1, 13, 13, 14, 13, 13, 15,
311 13, 13, 13, 13, 13, 13, 16, 13, 17, 13,
312 13, 13, 18, 19, 13, 13, 13, 13, 13, 13,
313 1, 1, 1, 1, 13, 1, 20, 13, 21, 22,
315 23, 24, 13, 25, 26, 13, 13, 27, 28, 29,
316 30, 31, 13, 32, 33, 34, 35, 13, 13, 13,
317 13, 13, 36, 1, 37, 1, 1, 1, 1, 1,
318 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
319 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
320 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
321 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
322 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
323 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
324 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
326 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
327 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
328 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
329 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
330 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
334 static yyconst
int yy_meta
[38] =
336 1, 1, 2, 1, 1, 1, 3, 3, 3, 3,
337 3, 1, 3, 3, 3, 3, 3, 3, 3, 3,
338 3, 3, 3, 3, 3, 3, 3, 3, 3, 3,
342 static yyconst
short int yy_base
[102] =
344 0, 0, 122, 123, 119, 123, 0, 0, 123, 31,
345 123, 0, 90, 99, 88, 19, 92, 84, 85, 94,
346 83, 20, 87, 79, 123, 123, 108, 105, 105, 45,
347 0, 78, 79, 83, 80, 0, 69, 76, 66, 71,
348 72, 76, 73, 0, 62, 69, 59, 89, 123, 58,
349 58, 49, 0, 64, 65, 65, 53, 53, 53, 0,
350 59, 60, 60, 50, 58, 0, 0, 0, 0, 50,
351 45, 0, 46, 54, 0, 0, 0, 0, 46, 41,
352 0, 44, 0, 44, 0, 42, 0, 42, 0, 42,
353 33, 20, 13, 0, 0, 0, 0, 123, 64, 67,
358 static yyconst
short int yy_def
[102] =
360 98, 1, 98, 98, 98, 98, 99, 100, 98, 101,
361 98, 101, 101, 101, 101, 101, 101, 101, 101, 101,
362 101, 101, 101, 101, 98, 98, 98, 99, 100, 101,
363 101, 101, 101, 101, 101, 101, 101, 101, 101, 101,
364 101, 101, 101, 101, 101, 101, 101, 99, 98, 101,
365 101, 101, 101, 101, 101, 101, 101, 101, 101, 101,
366 101, 101, 101, 101, 101, 101, 101, 101, 101, 101,
367 101, 101, 101, 101, 101, 101, 101, 101, 101, 101,
368 101, 101, 101, 101, 101, 101, 101, 101, 101, 101,
369 101, 101, 101, 101, 101, 101, 101, 0, 98, 98,
374 static yyconst
short int yy_nxt
[161] =
376 4, 5, 6, 7, 8, 9, 10, 10, 10, 10,
377 10, 11, 12, 13, 14, 15, 16, 17, 18, 12,
378 19, 12, 12, 20, 12, 12, 12, 21, 12, 22,
379 12, 12, 23, 24, 12, 25, 26, 30, 30, 30,
380 30, 30, 35, 43, 31, 97, 96, 36, 44, 37,
381 45, 30, 30, 30, 30, 30, 66, 67, 68, 69,
382 75, 76, 77, 78, 28, 95, 28, 29, 94, 29,
383 93, 92, 91, 90, 89, 88, 87, 86, 85, 84,
384 83, 82, 81, 80, 79, 74, 73, 72, 71, 70,
385 65, 64, 48, 63, 62, 61, 60, 59, 58, 57,
387 56, 55, 54, 53, 52, 51, 50, 49, 48, 27,
388 47, 46, 42, 41, 40, 39, 38, 34, 33, 32,
389 27, 98, 3, 98, 98, 98, 98, 98, 98, 98,
390 98, 98, 98, 98, 98, 98, 98, 98, 98, 98,
391 98, 98, 98, 98, 98, 98, 98, 98, 98, 98,
392 98, 98, 98, 98, 98, 98, 98, 98, 98, 98
395 static yyconst
short int yy_chk
[161] =
397 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
398 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
399 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
400 1, 1, 1, 1, 1, 1, 1, 10, 10, 10,
401 10, 10, 16, 22, 101, 93, 92, 16, 22, 16,
402 22, 30, 30, 30, 30, 30, 52, 52, 52, 52,
403 59, 59, 59, 59, 99, 91, 99, 100, 90, 100,
404 88, 86, 84, 82, 80, 79, 74, 73, 71, 70,
405 65, 64, 63, 62, 61, 58, 57, 56, 55, 54,
406 51, 50, 48, 47, 46, 45, 43, 42, 41, 40,
408 39, 38, 37, 35, 34, 33, 32, 29, 28, 27,
409 24, 23, 21, 20, 19, 18, 17, 15, 14, 13,
410 5, 3, 98, 98, 98, 98, 98, 98, 98, 98,
411 98, 98, 98, 98, 98, 98, 98, 98, 98, 98,
412 98, 98, 98, 98, 98, 98, 98, 98, 98, 98,
413 98, 98, 98, 98, 98, 98, 98, 98, 98, 98
416 static yy_state_type yy_last_accepting_state
;
417 static char *yy_last_accepting_cpos
;
419 /* The intent behind this definition is that it'll catch
420 * any uses of REJECT which flex missed.
422 #define REJECT reject_used_but_not_detected
423 #define yymore() yymore_used_but_not_detected
424 #define YY_MORE_ADJ 0
425 #define YY_RESTORE_YY_MORE_OFFSET
431 # include "../../config.h"
432 #endif // HAVE_CONFIG_H
436 #include "yacc_parser.hh"
438 extern YYSTYPE yylval
;
442 /* Macros after this point can all be overridden by user definitions in
446 #ifndef YY_SKIP_YYWRAP
448 extern "C" int yywrap
YY_PROTO(( void ));
450 extern int yywrap
YY_PROTO(( void ));
455 static void yyunput
YY_PROTO(( int c
, char *buf_ptr
));
459 static void yy_flex_strncpy
YY_PROTO(( char *, yyconst
char *, int ));
462 #ifdef YY_NEED_STRLEN
463 static int yy_flex_strlen
YY_PROTO(( yyconst
char * ));
468 static int yyinput
YY_PROTO(( void ));
470 static int input
YY_PROTO(( void ));
475 static int yy_start_stack_ptr
= 0;
476 static int yy_start_stack_depth
= 0;
477 static int *yy_start_stack
= 0;
478 #ifndef YY_NO_PUSH_STATE
479 static void yy_push_state
YY_PROTO(( int new_state
));
481 #ifndef YY_NO_POP_STATE
482 static void yy_pop_state
YY_PROTO(( void ));
484 #ifndef YY_NO_TOP_STATE
485 static int yy_top_state
YY_PROTO(( void ));
489 #define YY_NO_PUSH_STATE 1
490 #define YY_NO_POP_STATE 1
491 #define YY_NO_TOP_STATE 1
494 #ifdef YY_MALLOC_DECL
502 /* Just try to get by without declaring the routines. This will fail
503 * miserably on non-ANSI systems for which sizeof(size_t) != sizeof(int)
504 * or sizeof(void*) != sizeof(int).
509 /* Amount of stuff to slurp up with each read. */
510 #ifndef YY_READ_BUF_SIZE
511 #define YY_READ_BUF_SIZE 8192
514 /* Copy whatever the last rule matched to the standard output. */
517 /* This used to be an fputs(), but since the string might contain NUL's,
518 * we now use fwrite().
520 #define ECHO (void) fwrite( yytext, yyleng, 1, yyout )
523 /* Gets input and stuffs it into "buf". number of characters read, or YY_NULL,
524 * is returned in "result".
527 #define YY_INPUT(buf,result,max_size) \
528 if ( yy_current_buffer->yy_is_interactive ) \
531 for ( n = 0; n < max_size && \
532 (c = getc( yyin )) != EOF && c != '\n'; ++n ) \
535 buf[n++] = (char) c; \
536 if ( c == EOF && ferror( yyin ) ) \
537 YY_FATAL_ERROR( "input in flex scanner failed" ); \
540 else if ( ((result = fread( buf, 1, max_size, yyin )) == 0) \
541 && ferror( yyin ) ) \
542 YY_FATAL_ERROR( "input in flex scanner failed" );
545 /* No semi-colon after return; correct usage is to write "yyterminate();" -
546 * we don't want an extra ';' after the "return" because that will cause
547 * some compilers to complain about unreachable statements.
550 #define yyterminate() return YY_NULL
553 /* Number of entries by which start-condition stack grows. */
554 #ifndef YY_START_STACK_INCR
555 #define YY_START_STACK_INCR 25
558 /* Report a fatal error. */
559 #ifndef YY_FATAL_ERROR
560 #define YY_FATAL_ERROR(msg) yy_fatal_error( msg )
563 /* Default declaration of generated scanner - a define so the user can
564 * easily add parameters.
567 #define YY_DECL int yylex YY_PROTO(( void ))
570 /* Code executed at the beginning of each rule, after yytext and yyleng
573 #ifndef YY_USER_ACTION
574 #define YY_USER_ACTION
577 /* Code executed at the end of each rule. */
579 #define YY_BREAK break;
582 #define YY_RULE_SETUP \
587 register yy_state_type yy_current_state
;
588 register char *yy_cp
, *yy_bp
;
605 yy_start
= 1; /* first start state */
613 if ( ! yy_current_buffer
)
615 yy_create_buffer( yyin
, YY_BUF_SIZE
);
617 yy_load_buffer_state();
620 while ( 1 ) /* loops until end-of-file is reached */
624 /* Support of yytext. */
625 *yy_cp
= yy_hold_char
;
627 /* yy_bp points to the position in yy_ch_buf of the start of
632 yy_current_state
= yy_start
;
636 register YY_CHAR yy_c
= yy_ec
[YY_SC_TO_UI(*yy_cp
)];
637 if ( yy_accept
[yy_current_state
] )
639 yy_last_accepting_state
= yy_current_state
;
640 yy_last_accepting_cpos
= yy_cp
;
642 while ( yy_chk
[yy_base
[yy_current_state
] + yy_c
] != yy_current_state
)
644 yy_current_state
= (int) yy_def
[yy_current_state
];
645 if ( yy_current_state
>= 99 )
646 yy_c
= yy_meta
[(unsigned int) yy_c
];
648 yy_current_state
= yy_nxt
[yy_base
[yy_current_state
] + (unsigned int) yy_c
];
651 while ( yy_base
[yy_current_state
] != 123 );
654 yy_act
= yy_accept
[yy_current_state
];
656 { /* have to back up */
657 yy_cp
= yy_last_accepting_cpos
;
658 yy_current_state
= yy_last_accepting_state
;
659 yy_act
= yy_accept
[yy_current_state
];
665 do_action
: /* This label is used only to access EOF actions. */
669 { /* beginning of action switch */
670 case 0: /* must back up */
671 /* undo the effects of YY_DO_BEFORE_ACTION */
672 *yy_cp
= yy_hold_char
;
673 yy_cp
= yy_last_accepting_cpos
;
674 yy_current_state
= yy_last_accepting_state
;
729 yylval
= (int) strdup(yytext
); return BINDING
;
740 yylval
= (int) strdup(yytext
); return TRUE
;
751 yylval
= (int) strdup(yytext
); return FALSE
;
756 yylval
= (int) strdup(yytext
); return NUMBER
;
761 yylval
= (int) strdup(yytext
); return QUOTES
;
766 yylval
= (int) strdup(yytext
); return WORD
;
789 case YY_STATE_EOF(INITIAL
):
792 case YY_END_OF_BUFFER
:
794 /* Amount of text matched not including the EOB char. */
795 int yy_amount_of_matched_text
= (int) (yy_cp
- yytext_ptr
) - 1;
797 /* Undo the effects of YY_DO_BEFORE_ACTION. */
798 *yy_cp
= yy_hold_char
;
799 YY_RESTORE_YY_MORE_OFFSET
801 if ( yy_current_buffer
->yy_buffer_status
== YY_BUFFER_NEW
)
803 /* We're scanning a new file or input source. It's
804 * possible that this happened because the user
805 * just pointed yyin at a new source and called
806 * yylex(). If so, then we have to assure
807 * consistency between yy_current_buffer and our
808 * globals. Here is the right place to do so, because
809 * this is the first action (other than possibly a
810 * back-up) that will match for the new input source.
812 yy_n_chars
= yy_current_buffer
->yy_n_chars
;
813 yy_current_buffer
->yy_input_file
= yyin
;
814 yy_current_buffer
->yy_buffer_status
= YY_BUFFER_NORMAL
;
817 /* Note that here we test for yy_c_buf_p "<=" to the position
818 * of the first EOB in the buffer, since yy_c_buf_p will
819 * already have been incremented past the NUL character
820 * (since all states make transitions on EOB to the
821 * end-of-buffer state). Contrast this with the test
824 if ( yy_c_buf_p
<= &yy_current_buffer
->yy_ch_buf
[yy_n_chars
] )
825 { /* This was really a NUL. */
826 yy_state_type yy_next_state
;
828 yy_c_buf_p
= yytext_ptr
+ yy_amount_of_matched_text
;
830 yy_current_state
= yy_get_previous_state();
832 /* Okay, we're now positioned to make the NUL
833 * transition. We couldn't have
834 * yy_get_previous_state() go ahead and do it
835 * for us because it doesn't know how to deal
836 * with the possibility of jamming (and we don't
837 * want to build jamming into it because then it
838 * will run more slowly).
841 yy_next_state
= yy_try_NUL_trans( yy_current_state
);
843 yy_bp
= yytext_ptr
+ YY_MORE_ADJ
;
847 /* Consume the NUL. */
848 yy_cp
= ++yy_c_buf_p
;
849 yy_current_state
= yy_next_state
;
860 else switch ( yy_get_next_buffer() )
862 case EOB_ACT_END_OF_FILE
:
864 yy_did_buffer_switch_on_eof
= 0;
868 /* Note: because we've taken care in
869 * yy_get_next_buffer() to have set up
870 * yytext, we can now set up
871 * yy_c_buf_p so that if some total
872 * hoser (like flex itself) wants to
873 * call the scanner after we return the
874 * YY_NULL, it'll still work - another
875 * YY_NULL will get returned.
877 yy_c_buf_p
= yytext_ptr
+ YY_MORE_ADJ
;
879 yy_act
= YY_STATE_EOF(YY_START
);
885 if ( ! yy_did_buffer_switch_on_eof
)
891 case EOB_ACT_CONTINUE_SCAN
:
893 yytext_ptr
+ yy_amount_of_matched_text
;
895 yy_current_state
= yy_get_previous_state();
898 yy_bp
= yytext_ptr
+ YY_MORE_ADJ
;
901 case EOB_ACT_LAST_MATCH
:
903 &yy_current_buffer
->yy_ch_buf
[yy_n_chars
];
905 yy_current_state
= yy_get_previous_state();
908 yy_bp
= yytext_ptr
+ YY_MORE_ADJ
;
916 "fatal flex scanner internal error--no action found" );
917 } /* end of action switch */
918 } /* end of scanning one token */
922 /* yy_get_next_buffer - try to read in a new buffer
924 * Returns a code representing an action:
925 * EOB_ACT_LAST_MATCH -
926 * EOB_ACT_CONTINUE_SCAN - continue scanning from current position
927 * EOB_ACT_END_OF_FILE - end of file
930 static int yy_get_next_buffer()
932 register char *dest
= yy_current_buffer
->yy_ch_buf
;
933 register char *source
= yytext_ptr
;
934 register int number_to_move
, i
;
937 if ( yy_c_buf_p
> &yy_current_buffer
->yy_ch_buf
[yy_n_chars
+ 1] )
939 "fatal flex scanner internal error--end of buffer missed" );
941 if ( yy_current_buffer
->yy_fill_buffer
== 0 )
942 { /* Don't try to fill the buffer, so this is an EOF. */
943 if ( yy_c_buf_p
- yytext_ptr
- YY_MORE_ADJ
== 1 )
945 /* We matched a single character, the EOB, so
946 * treat this as a final EOF.
948 return EOB_ACT_END_OF_FILE
;
953 /* We matched some text prior to the EOB, first
956 return EOB_ACT_LAST_MATCH
;
960 /* Try to read more data. */
962 /* First move last chars to start of buffer. */
963 number_to_move
= (int) (yy_c_buf_p
- yytext_ptr
) - 1;
965 for ( i
= 0; i
< number_to_move
; ++i
)
966 *(dest
++) = *(source
++);
968 if ( yy_current_buffer
->yy_buffer_status
== YY_BUFFER_EOF_PENDING
)
969 /* don't do the read, it's not guaranteed to return an EOF,
972 yy_current_buffer
->yy_n_chars
= yy_n_chars
= 0;
977 yy_current_buffer
->yy_buf_size
- number_to_move
- 1;
979 while ( num_to_read
<= 0 )
980 { /* Not enough room in the buffer - grow it. */
981 #ifdef YY_USES_REJECT
983 "input buffer overflow, can't enlarge buffer because scanner uses REJECT" );
986 /* just a shorter name for the current buffer */
987 YY_BUFFER_STATE b
= yy_current_buffer
;
989 int yy_c_buf_p_offset
=
990 (int) (yy_c_buf_p
- b
->yy_ch_buf
);
992 if ( b
->yy_is_our_buffer
)
994 int new_size
= b
->yy_buf_size
* 2;
997 b
->yy_buf_size
+= b
->yy_buf_size
/ 8;
1001 b
->yy_ch_buf
= (char *)
1002 /* Include room in for 2 EOB chars. */
1003 yy_flex_realloc( (void *) b
->yy_ch_buf
,
1004 b
->yy_buf_size
+ 2 );
1007 /* Can't grow it, we don't own it. */
1010 if ( ! b
->yy_ch_buf
)
1012 "fatal error - scanner input buffer overflow" );
1014 yy_c_buf_p
= &b
->yy_ch_buf
[yy_c_buf_p_offset
];
1016 num_to_read
= yy_current_buffer
->yy_buf_size
-
1021 if ( num_to_read
> YY_READ_BUF_SIZE
)
1022 num_to_read
= YY_READ_BUF_SIZE
;
1024 /* Read in more data. */
1025 YY_INPUT( (&yy_current_buffer
->yy_ch_buf
[number_to_move
]),
1026 yy_n_chars
, num_to_read
);
1028 yy_current_buffer
->yy_n_chars
= yy_n_chars
;
1031 if ( yy_n_chars
== 0 )
1033 if ( number_to_move
== YY_MORE_ADJ
)
1035 ret_val
= EOB_ACT_END_OF_FILE
;
1041 ret_val
= EOB_ACT_LAST_MATCH
;
1042 yy_current_buffer
->yy_buffer_status
=
1043 YY_BUFFER_EOF_PENDING
;
1048 ret_val
= EOB_ACT_CONTINUE_SCAN
;
1050 yy_n_chars
+= number_to_move
;
1051 yy_current_buffer
->yy_ch_buf
[yy_n_chars
] = YY_END_OF_BUFFER_CHAR
;
1052 yy_current_buffer
->yy_ch_buf
[yy_n_chars
+ 1] = YY_END_OF_BUFFER_CHAR
;
1054 yytext_ptr
= &yy_current_buffer
->yy_ch_buf
[0];
1060 /* yy_get_previous_state - get the state just before the EOB char was reached */
1062 static yy_state_type
yy_get_previous_state()
1064 register yy_state_type yy_current_state
;
1065 register char *yy_cp
;
1067 yy_current_state
= yy_start
;
1069 for ( yy_cp
= yytext_ptr
+ YY_MORE_ADJ
; yy_cp
< yy_c_buf_p
; ++yy_cp
)
1071 register YY_CHAR yy_c
= (*yy_cp
? yy_ec
[YY_SC_TO_UI(*yy_cp
)] : 1);
1072 if ( yy_accept
[yy_current_state
] )
1074 yy_last_accepting_state
= yy_current_state
;
1075 yy_last_accepting_cpos
= yy_cp
;
1077 while ( yy_chk
[yy_base
[yy_current_state
] + yy_c
] != yy_current_state
)
1079 yy_current_state
= (int) yy_def
[yy_current_state
];
1080 if ( yy_current_state
>= 99 )
1081 yy_c
= yy_meta
[(unsigned int) yy_c
];
1083 yy_current_state
= yy_nxt
[yy_base
[yy_current_state
] + (unsigned int) yy_c
];
1086 return yy_current_state
;
1090 /* yy_try_NUL_trans - try to make a transition on the NUL character
1093 * next_state = yy_try_NUL_trans( current_state );
1096 #ifdef YY_USE_PROTOS
1097 static yy_state_type
yy_try_NUL_trans( yy_state_type yy_current_state
)
1099 static yy_state_type
yy_try_NUL_trans( yy_current_state
)
1100 yy_state_type yy_current_state
;
1103 register int yy_is_jam
;
1104 register char *yy_cp
= yy_c_buf_p
;
1106 register YY_CHAR yy_c
= 1;
1107 if ( yy_accept
[yy_current_state
] )
1109 yy_last_accepting_state
= yy_current_state
;
1110 yy_last_accepting_cpos
= yy_cp
;
1112 while ( yy_chk
[yy_base
[yy_current_state
] + yy_c
] != yy_current_state
)
1114 yy_current_state
= (int) yy_def
[yy_current_state
];
1115 if ( yy_current_state
>= 99 )
1116 yy_c
= yy_meta
[(unsigned int) yy_c
];
1118 yy_current_state
= yy_nxt
[yy_base
[yy_current_state
] + (unsigned int) yy_c
];
1119 yy_is_jam
= (yy_current_state
== 98);
1121 return yy_is_jam
? 0 : yy_current_state
;
1126 #ifdef YY_USE_PROTOS
1127 static void yyunput( int c
, register char *yy_bp
)
1129 static void yyunput( c
, yy_bp
)
1131 register char *yy_bp
;
1134 register char *yy_cp
= yy_c_buf_p
;
1136 /* undo effects of setting up yytext */
1137 *yy_cp
= yy_hold_char
;
1139 if ( yy_cp
< yy_current_buffer
->yy_ch_buf
+ 2 )
1140 { /* need to shift things up to make room */
1141 /* +2 for EOB chars. */
1142 register int number_to_move
= yy_n_chars
+ 2;
1143 register char *dest
= &yy_current_buffer
->yy_ch_buf
[
1144 yy_current_buffer
->yy_buf_size
+ 2];
1145 register char *source
=
1146 &yy_current_buffer
->yy_ch_buf
[number_to_move
];
1148 while ( source
> yy_current_buffer
->yy_ch_buf
)
1149 *--dest
= *--source
;
1151 yy_cp
+= (int) (dest
- source
);
1152 yy_bp
+= (int) (dest
- source
);
1153 yy_current_buffer
->yy_n_chars
=
1154 yy_n_chars
= yy_current_buffer
->yy_buf_size
;
1156 if ( yy_cp
< yy_current_buffer
->yy_ch_buf
+ 2 )
1157 YY_FATAL_ERROR( "flex scanner push-back overflow" );
1160 *--yy_cp
= (char) c
;
1164 yy_hold_char
= *yy_cp
;
1167 #endif /* ifndef YY_NO_UNPUT */
1171 static int yyinput()
1178 *yy_c_buf_p
= yy_hold_char
;
1180 if ( *yy_c_buf_p
== YY_END_OF_BUFFER_CHAR
)
1182 /* yy_c_buf_p now points to the character we want to return.
1183 * If this occurs *before* the EOB characters, then it's a
1184 * valid NUL; if not, then we've hit the end of the buffer.
1186 if ( yy_c_buf_p
< &yy_current_buffer
->yy_ch_buf
[yy_n_chars
] )
1187 /* This was really a NUL. */
1191 { /* need more input */
1192 int offset
= yy_c_buf_p
- yytext_ptr
;
1195 switch ( yy_get_next_buffer() )
1197 case EOB_ACT_LAST_MATCH
:
1198 /* This happens because yy_g_n_b()
1199 * sees that we've accumulated a
1200 * token and flags that we need to
1201 * try matching the token before
1202 * proceeding. But for input(),
1203 * there's no matching to consider.
1204 * So convert the EOB_ACT_LAST_MATCH
1205 * to EOB_ACT_END_OF_FILE.
1208 /* Reset buffer status. */
1213 case EOB_ACT_END_OF_FILE
:
1218 if ( ! yy_did_buffer_switch_on_eof
)
1227 case EOB_ACT_CONTINUE_SCAN
:
1228 yy_c_buf_p
= yytext_ptr
+ offset
;
1234 c
= *(unsigned char *) yy_c_buf_p
; /* cast for 8-bit char's */
1235 *yy_c_buf_p
= '\0'; /* preserve yytext */
1236 yy_hold_char
= *++yy_c_buf_p
;
1243 #ifdef YY_USE_PROTOS
1244 void yyrestart( FILE *input_file
)
1246 void yyrestart( input_file
)
1250 if ( ! yy_current_buffer
)
1251 yy_current_buffer
= yy_create_buffer( yyin
, YY_BUF_SIZE
);
1253 yy_init_buffer( yy_current_buffer
, input_file
);
1254 yy_load_buffer_state();
1258 #ifdef YY_USE_PROTOS
1259 void yy_switch_to_buffer( YY_BUFFER_STATE new_buffer
)
1261 void yy_switch_to_buffer( new_buffer
)
1262 YY_BUFFER_STATE new_buffer
;
1265 if ( yy_current_buffer
== new_buffer
)
1268 if ( yy_current_buffer
)
1270 /* Flush out information for old buffer. */
1271 *yy_c_buf_p
= yy_hold_char
;
1272 yy_current_buffer
->yy_buf_pos
= yy_c_buf_p
;
1273 yy_current_buffer
->yy_n_chars
= yy_n_chars
;
1276 yy_current_buffer
= new_buffer
;
1277 yy_load_buffer_state();
1279 /* We don't actually know whether we did this switch during
1280 * EOF (yywrap()) processing, but the only time this flag
1281 * is looked at is after yywrap() is called, so it's safe
1282 * to go ahead and always set it.
1284 yy_did_buffer_switch_on_eof
= 1;
1288 #ifdef YY_USE_PROTOS
1289 void yy_load_buffer_state( void )
1291 void yy_load_buffer_state()
1294 yy_n_chars
= yy_current_buffer
->yy_n_chars
;
1295 yytext_ptr
= yy_c_buf_p
= yy_current_buffer
->yy_buf_pos
;
1296 yyin
= yy_current_buffer
->yy_input_file
;
1297 yy_hold_char
= *yy_c_buf_p
;
1301 #ifdef YY_USE_PROTOS
1302 YY_BUFFER_STATE
yy_create_buffer( FILE *file
, int size
)
1304 YY_BUFFER_STATE
yy_create_buffer( file
, size
)
1311 b
= (YY_BUFFER_STATE
) yy_flex_alloc( sizeof( struct yy_buffer_state
) );
1313 YY_FATAL_ERROR( "out of dynamic memory in yy_create_buffer()" );
1315 b
->yy_buf_size
= size
;
1317 /* yy_ch_buf has to be 2 characters longer than the size given because
1318 * we need to put in 2 end-of-buffer characters.
1320 b
->yy_ch_buf
= (char *) yy_flex_alloc( b
->yy_buf_size
+ 2 );
1321 if ( ! b
->yy_ch_buf
)
1322 YY_FATAL_ERROR( "out of dynamic memory in yy_create_buffer()" );
1324 b
->yy_is_our_buffer
= 1;
1326 yy_init_buffer( b
, file
);
1332 #ifdef YY_USE_PROTOS
1333 void yy_delete_buffer( YY_BUFFER_STATE b
)
1335 void yy_delete_buffer( b
)
1342 if ( b
== yy_current_buffer
)
1343 yy_current_buffer
= (YY_BUFFER_STATE
) 0;
1345 if ( b
->yy_is_our_buffer
)
1346 yy_flex_free( (void *) b
->yy_ch_buf
);
1348 yy_flex_free( (void *) b
);
1352 #ifndef YY_ALWAYS_INTERACTIVE
1353 #ifndef YY_NEVER_INTERACTIVE
1354 extern int isatty
YY_PROTO(( int ));
1358 #ifdef YY_USE_PROTOS
1359 void yy_init_buffer( YY_BUFFER_STATE b
, FILE *file
)
1361 void yy_init_buffer( b
, file
)
1368 yy_flush_buffer( b
);
1370 b
->yy_input_file
= file
;
1371 b
->yy_fill_buffer
= 1;
1373 #if YY_ALWAYS_INTERACTIVE
1374 b
->yy_is_interactive
= 1;
1376 #if YY_NEVER_INTERACTIVE
1377 b
->yy_is_interactive
= 0;
1379 b
->yy_is_interactive
= file
? (isatty( fileno(file
) ) > 0) : 0;
1385 #ifdef YY_USE_PROTOS
1386 void yy_flush_buffer( YY_BUFFER_STATE b
)
1388 void yy_flush_buffer( b
)
1398 /* We always need two end-of-buffer characters. The first causes
1399 * a transition to the end-of-buffer state. The second causes
1400 * a jam in that state.
1402 b
->yy_ch_buf
[0] = YY_END_OF_BUFFER_CHAR
;
1403 b
->yy_ch_buf
[1] = YY_END_OF_BUFFER_CHAR
;
1405 b
->yy_buf_pos
= &b
->yy_ch_buf
[0];
1408 b
->yy_buffer_status
= YY_BUFFER_NEW
;
1410 if ( b
== yy_current_buffer
)
1411 yy_load_buffer_state();
1415 #ifndef YY_NO_SCAN_BUFFER
1416 #ifdef YY_USE_PROTOS
1417 YY_BUFFER_STATE
yy_scan_buffer( char *base
, yy_size_t size
)
1419 YY_BUFFER_STATE
yy_scan_buffer( base
, size
)
1427 base
[size
-2] != YY_END_OF_BUFFER_CHAR
||
1428 base
[size
-1] != YY_END_OF_BUFFER_CHAR
)
1429 /* They forgot to leave room for the EOB's. */
1432 b
= (YY_BUFFER_STATE
) yy_flex_alloc( sizeof( struct yy_buffer_state
) );
1434 YY_FATAL_ERROR( "out of dynamic memory in yy_scan_buffer()" );
1436 b
->yy_buf_size
= size
- 2; /* "- 2" to take care of EOB's */
1437 b
->yy_buf_pos
= b
->yy_ch_buf
= base
;
1438 b
->yy_is_our_buffer
= 0;
1439 b
->yy_input_file
= 0;
1440 b
->yy_n_chars
= b
->yy_buf_size
;
1441 b
->yy_is_interactive
= 0;
1443 b
->yy_fill_buffer
= 0;
1444 b
->yy_buffer_status
= YY_BUFFER_NEW
;
1446 yy_switch_to_buffer( b
);
1453 #ifndef YY_NO_SCAN_STRING
1454 #ifdef YY_USE_PROTOS
1455 YY_BUFFER_STATE
yy_scan_string( yyconst
char *yy_str
)
1457 YY_BUFFER_STATE
yy_scan_string( yy_str
)
1458 yyconst
char *yy_str
;
1462 for ( len
= 0; yy_str
[len
]; ++len
)
1465 return yy_scan_bytes( yy_str
, len
);
1470 #ifndef YY_NO_SCAN_BYTES
1471 #ifdef YY_USE_PROTOS
1472 YY_BUFFER_STATE
yy_scan_bytes( yyconst
char *bytes
, int len
)
1474 YY_BUFFER_STATE
yy_scan_bytes( bytes
, len
)
1475 yyconst
char *bytes
;
1484 /* Get memory for full buffer, including space for trailing EOB's. */
1486 buf
= (char *) yy_flex_alloc( n
);
1488 YY_FATAL_ERROR( "out of dynamic memory in yy_scan_bytes()" );
1490 for ( i
= 0; i
< len
; ++i
)
1493 buf
[len
] = buf
[len
+1] = YY_END_OF_BUFFER_CHAR
;
1495 b
= yy_scan_buffer( buf
, n
);
1497 YY_FATAL_ERROR( "bad buffer in yy_scan_bytes()" );
1499 /* It's okay to grow etc. this buffer, and we should throw it
1500 * away when we're done.
1502 b
->yy_is_our_buffer
= 1;
1509 #ifndef YY_NO_PUSH_STATE
1510 #ifdef YY_USE_PROTOS
1511 static void yy_push_state( int new_state
)
1513 static void yy_push_state( new_state
)
1517 if ( yy_start_stack_ptr
>= yy_start_stack_depth
)
1521 yy_start_stack_depth
+= YY_START_STACK_INCR
;
1522 new_size
= yy_start_stack_depth
* sizeof( int );
1524 if ( ! yy_start_stack
)
1525 yy_start_stack
= (int *) yy_flex_alloc( new_size
);
1528 yy_start_stack
= (int *) yy_flex_realloc(
1529 (void *) yy_start_stack
, new_size
);
1531 if ( ! yy_start_stack
)
1533 "out of memory expanding start-condition stack" );
1536 yy_start_stack
[yy_start_stack_ptr
++] = YY_START
;
1543 #ifndef YY_NO_POP_STATE
1544 static void yy_pop_state()
1546 if ( --yy_start_stack_ptr
< 0 )
1547 YY_FATAL_ERROR( "start-condition stack underflow" );
1549 BEGIN(yy_start_stack
[yy_start_stack_ptr
]);
1554 #ifndef YY_NO_TOP_STATE
1555 static int yy_top_state()
1557 return yy_start_stack
[yy_start_stack_ptr
- 1];
1561 #ifndef YY_EXIT_FAILURE
1562 #define YY_EXIT_FAILURE 2
1565 #ifdef YY_USE_PROTOS
1566 static void yy_fatal_error( yyconst
char msg
[] )
1568 static void yy_fatal_error( msg
)
1572 (void) fprintf( stderr
, "%s\n", msg
);
1573 exit( YY_EXIT_FAILURE
);
1578 /* Redefine yyless() so it works in section 3 code. */
1584 /* Undo effects of setting up yytext. */ \
1585 yytext[yyleng] = yy_hold_char; \
1586 yy_c_buf_p = yytext + n; \
1587 yy_hold_char = *yy_c_buf_p; \
1588 *yy_c_buf_p = '\0'; \
1594 /* Internal utility routines. */
1597 #ifdef YY_USE_PROTOS
1598 static void yy_flex_strncpy( char *s1
, yyconst
char *s2
, int n
)
1600 static void yy_flex_strncpy( s1
, s2
, n
)
1607 for ( i
= 0; i
< n
; ++i
)
1612 #ifdef YY_NEED_STRLEN
1613 #ifdef YY_USE_PROTOS
1614 static int yy_flex_strlen( yyconst
char *s
)
1616 static int yy_flex_strlen( s
)
1621 for ( n
= 0; s
[n
]; ++n
)
1629 #ifdef YY_USE_PROTOS
1630 static void *yy_flex_alloc( yy_size_t size
)
1632 static void *yy_flex_alloc( size
)
1636 return (void *) malloc( size
);
1639 #ifdef YY_USE_PROTOS
1640 static void *yy_flex_realloc( void *ptr
, yy_size_t size
)
1642 static void *yy_flex_realloc( ptr
, size
)
1647 /* The cast to (char *) in the following accommodates both
1648 * implementations that use char* generic pointers, and those
1649 * that use void* generic pointers. It works with the latter
1650 * because both ANSI C and C++ allow castless assignment from
1651 * any pointer type to void*, and deal with argument conversions
1652 * as though doing an assignment.
1654 return (void *) realloc( (char *) ptr
, size
);
1657 #ifdef YY_USE_PROTOS
1658 static void yy_flex_free( void *ptr
)
1660 static void yy_flex_free( ptr
)