1 /* Integration test for compiling the output of a minimal "flex"
2 script. */
3
4 /* { dg-skip-if "" { powerpc*-*-aix* } } */
5 /* { dg-additional-options "-fanalyzer-call-summaries" } */
6 /* { dg-additional-options "-Wno-analyzer-too-complex" } */
7
8 /* A lexical scanner generated by flex */
9
10 #define YY_INT_ALIGNED short int
11
12 /* First, we deal with platform-specific or compiler-specific issues. */
13
14 /* begin standard C headers. */
15 #include <stdio.h>
16 #include <string.h>
17 #include <errno.h>
18 #include <stdlib.h>
19
20 /* end standard C headers. */
21
22 /* flex integer type definitions */
23
24 #ifndef FLEXINT_H
25 #define FLEXINT_H
26
27 /* C99 systems have <inttypes.h>. Non-C99 systems may or may not. */
28
29 #if defined (__STDC_VERSION__) && __STDC_VERSION__ >= 199901L
30
31 /* C99 says to define __STDC_LIMIT_MACROS before including stdint.h,
32 * if you want the limit (max/min) macros for int types.
33 */
34 #ifndef __STDC_LIMIT_MACROS
35 #define __STDC_LIMIT_MACROS 1
36 #endif
37
38 #include <inttypes.h>
39 typedef int8_t flex_int8_t;
40 typedef uint8_t flex_uint8_t;
41 typedef int16_t flex_int16_t;
42 typedef uint16_t flex_uint16_t;
43 typedef int32_t flex_int32_t;
44 typedef uint32_t flex_uint32_t;
45 #else
46 typedef signed char flex_int8_t;
47 typedef short int flex_int16_t;
48 typedef int flex_int32_t;
49 typedef unsigned char flex_uint8_t;
50 typedef unsigned short int flex_uint16_t;
51 typedef unsigned int flex_uint32_t;
52
53 #endif /* ! C99 */
54
55 #endif /* ! FLEXINT_H */
56
57 /* begin standard C++ headers. */
58
59 /* TODO: this is always defined, so inline it */
60 #define yyconst const
61
62 #define yynoreturn __attribute__((__noreturn__))
63
64 /* Returned upon end-of-file. */
65 #define YY_NULL 0
66
67 /* Promotes a possibly negative, possibly signed char to an
68 * integer in range [0..255] for use as an array index.
69 */
70 #define YY_SC_TO_UI(c) ((YY_CHAR) (c))
71
72 /* Enter a start condition. This macro really ought to take a parameter,
73 * but we do it the disgusting crufty way forced on us by the ()-less
74 * definition of BEGIN.
75 */
76 #define BEGIN (yy_start) = 1 + 2 *
77 /* Translate the current start state into a value that can be later handed
78 * to BEGIN to return to the state. The YYSTATE alias is for lex
79 * compatibility.
80 */
81 #define YY_START (((yy_start) - 1) / 2)
82 #define YYSTATE YY_START
83 /* Action number for EOF rule of a given start state. */
84 #define YY_STATE_EOF(state) (YY_END_OF_BUFFER + state + 1)
85 /* Special action meaning "start processing a new file". */
86 #define YY_NEW_FILE yyrestart( yyin )
87 #define YY_END_OF_BUFFER_CHAR 0
88
89 /* Size of default input buffer. */
90 #ifndef YY_BUF_SIZE
91 #ifdef __ia64__
92 /* On IA-64, the buffer size is 16k, not 8k.
93 * Moreover, YY_BUF_SIZE is 2*YY_READ_BUF_SIZE in the general case.
94 * Ditto for the __ia64__ case accordingly.
95 */
96 #define YY_BUF_SIZE 32768
97 #else
98 #define YY_BUF_SIZE 16384
99 #endif /* __ia64__ */
100 #endif
101
102 /* The state buf must be large enough to hold one state per character in the main buffer.
103 */
104 #define YY_STATE_BUF_SIZE ((YY_BUF_SIZE + 2) * sizeof(yy_state_type))
105
106 #ifndef YY_TYPEDEF_YY_BUFFER_STATE
107 #define YY_TYPEDEF_YY_BUFFER_STATE
108 typedef struct yy_buffer_state *YY_BUFFER_STATE;
109 #endif
110
111 #ifndef YY_TYPEDEF_YY_SIZE_T
112 #define YY_TYPEDEF_YY_SIZE_T
113 typedef size_t yy_size_t;
114 #endif
115
116 extern int yyleng;
117
118 extern FILE *yyin, *yyout;
119
120 #define EOB_ACT_CONTINUE_SCAN 0
121 #define EOB_ACT_END_OF_FILE 1
122 #define EOB_ACT_LAST_MATCH 2
123
124 #define YY_LESS_LINENO(n)
125 #define YY_LINENO_REWIND_TO(ptr)
126
127 /* Return all but the first "n" matched characters back to the input stream. */
128 #define yyless(n) \
129 do \
130 { \
131 /* Undo effects of setting up yytext. */ \
132 int yyless_macro_arg = (n); \
133 YY_LESS_LINENO(yyless_macro_arg);\
134 *yy_cp = (yy_hold_char); \
135 YY_RESTORE_YY_MORE_OFFSET \
136 (yy_c_buf_p) = yy_cp = yy_bp + yyless_macro_arg - YY_MORE_ADJ; \
137 YY_DO_BEFORE_ACTION; /* set up yytext again */ \
138 } \
139 while ( 0 )
140 #define unput(c) yyunput( c, (yytext_ptr) )
141
142 #ifndef YY_STRUCT_YY_BUFFER_STATE
143 #define YY_STRUCT_YY_BUFFER_STATE
144 struct yy_buffer_state
145 {
146 FILE *yy_input_file;
147
148 char *yy_ch_buf; /* input buffer */
149 char *yy_buf_pos; /* current position in input buffer */
150
151 /* Size of input buffer in bytes, not including room for EOB
152 * characters.
153 */
154 int yy_buf_size;
155
156 /* Number of characters read into yy_ch_buf, not including EOB
157 * characters.
158 */
159 int yy_n_chars;
160
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
163 * delete it.
164 */
165 int yy_is_our_buffer;
166
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
170 * each newline.
171 */
172 int yy_is_interactive;
173
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
176 * not.
177 */
178 int yy_at_bol;
179
180 int yy_bs_lineno; /**< The line count. */
181 int yy_bs_column; /**< The column count. */
182
183 /* Whether to try to fill the input buffer when we reach the
184 * end of it.
185 */
186 int yy_fill_buffer;
187
188 int yy_buffer_status;
189
190 #define YY_BUFFER_NEW 0
191 #define YY_BUFFER_NORMAL 1
192 /* When an EOF's been seen but there's still some text to process
193 * then we mark the buffer as YY_EOF_PENDING, to indicate that we
194 * shouldn't try reading from the input source any more. We might
195 * still have a bunch of tokens to match, though, because of
196 * possible backing-up.
197 *
198 * When we actually see the EOF, we change the status to "new"
199 * (via yyrestart()), so that the user can continue scanning by
200 * just pointing yyin at a new input file.
201 */
202 #define YY_BUFFER_EOF_PENDING 2
203
204 };
205 #endif /* !YY_STRUCT_YY_BUFFER_STATE */
206
207 /* Stack of input buffers. */
208 static size_t yy_buffer_stack_top = 0; /**< index of top of stack. */
209 static size_t yy_buffer_stack_max = 0; /**< capacity of stack. */
210 static YY_BUFFER_STATE * yy_buffer_stack = NULL; /**< Stack as an array. */
211
212 /* We provide macros for accessing buffer states in case in the
213 * future we want to put the buffer states in a more general
214 * "scanner state".
215 *
216 * Returns the top of the stack, or NULL.
217 */
218 #define YY_CURRENT_BUFFER ( (yy_buffer_stack) \
219 ? (yy_buffer_stack)[(yy_buffer_stack_top)] \
220 : NULL)
221 /* Same as previous macro, but useful when we know that the buffer stack is not
222 * NULL or when we need an lvalue. For internal use only.
223 */
224 #define YY_CURRENT_BUFFER_LVALUE (yy_buffer_stack)[(yy_buffer_stack_top)]
225
226 /* yy_hold_char holds the character lost when yytext is formed. */
227 static char yy_hold_char;
228 static int yy_n_chars; /* number of characters read into yy_ch_buf */
229 int yyleng;
230
231 /* Points to current character in buffer. */
232 static char *yy_c_buf_p = NULL;
233 static int yy_init = 0; /* whether we need to initialize */
234 static int yy_start = 0; /* start state number */
235
236 /* Flag which is used to allow yywrap()'s to do buffer switches
237 * instead of setting up a fresh yyin. A bit of a hack ...
238 */
239 static int yy_did_buffer_switch_on_eof;
240
241 void yyrestart ( FILE *input_file );
242 void yy_switch_to_buffer ( YY_BUFFER_STATE new_buffer );
243 YY_BUFFER_STATE yy_create_buffer ( FILE *file, int size );
244 void yy_delete_buffer ( YY_BUFFER_STATE b );
245 void yy_flush_buffer ( YY_BUFFER_STATE b );
246 void yypush_buffer_state ( YY_BUFFER_STATE new_buffer );
247 void yypop_buffer_state ( void );
248
249 static void yyensure_buffer_stack ( void );
250 static void yy_load_buffer_state ( void );
251 static void yy_init_buffer ( YY_BUFFER_STATE b, FILE *file );
252 #define YY_FLUSH_BUFFER yy_flush_buffer( YY_CURRENT_BUFFER )
253
254 YY_BUFFER_STATE yy_scan_buffer ( char *base, yy_size_t size );
255 YY_BUFFER_STATE yy_scan_string ( const char *yy_str );
256 YY_BUFFER_STATE yy_scan_bytes ( const char *bytes, int len );
257
258 void *yyalloc ( yy_size_t );
259 void *yyrealloc ( void *, yy_size_t );
260 void yyfree ( void * );
261
262 #define yy_new_buffer yy_create_buffer
263 #define yy_set_interactive(is_interactive) \
264 { \
265 if ( ! YY_CURRENT_BUFFER ){ \
266 yyensure_buffer_stack (); \
267 YY_CURRENT_BUFFER_LVALUE = \
268 yy_create_buffer( yyin, YY_BUF_SIZE ); \
269 } \
270 YY_CURRENT_BUFFER_LVALUE->yy_is_interactive = is_interactive; \
271 }
272 #define yy_set_bol(at_bol) \
273 { \
274 if ( ! YY_CURRENT_BUFFER ){\
275 yyensure_buffer_stack (); \
276 YY_CURRENT_BUFFER_LVALUE = \
277 yy_create_buffer( yyin, YY_BUF_SIZE ); \
278 } \
279 YY_CURRENT_BUFFER_LVALUE->yy_at_bol = at_bol; \
280 }
281 #define YY_AT_BOL() (YY_CURRENT_BUFFER_LVALUE->yy_at_bol)
282
283 typedef flex_uint8_t YY_CHAR;
284
285 FILE *yyin = NULL, *yyout = NULL;
286
287 typedef int yy_state_type;
288
289 extern int yylineno;
290 int yylineno = 1;
291
292 extern char *yytext;
293 #ifdef yytext_ptr
294 #undef yytext_ptr
295 #endif
296 #define yytext_ptr yytext
297
298 static yy_state_type yy_get_previous_state ( void );
299 static yy_state_type yy_try_NUL_trans ( yy_state_type current_state );
300 static int yy_get_next_buffer ( void );
301 static void yynoreturn yy_fatal_error ( const char* msg );
302
303 /* Done after the current pattern has been matched and before the
304 * corresponding action - sets up yytext.
305 */
306 #define YY_DO_BEFORE_ACTION \
307 (yytext_ptr) = yy_bp; \
308 yyleng = (int) (yy_cp - yy_bp); \
309 (yy_hold_char) = *yy_cp; \
310 *yy_cp = '\0'; \
311 (yy_c_buf_p) = yy_cp;
312 #define YY_NUM_RULES 1
313 #define YY_END_OF_BUFFER 2
314 /* This struct is not used in this scanner,
315 but its presence is necessary. */
316 struct yy_trans_info
317 {
318 flex_int32_t yy_verify;
319 flex_int32_t yy_nxt;
320 };
321 static const flex_int16_t yy_accept[6] =
322 { 0,
323 0, 0, 2, 1, 0
324 } ;
325
326 static const YY_CHAR yy_ec[256] =
327 { 0,
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,
331 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
332 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
333 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
334 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
335 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
336 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
337 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
338
339 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
340 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
341 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
342 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
343 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
344 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
345 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
346 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
347 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
348 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
349
350 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
351 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
352 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
353 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
354 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
355 1, 1, 1, 1, 1
356 } ;
357
358 static const YY_CHAR yy_meta[2] =
359 { 0,
360 1
361 } ;
362
363 static const flex_int16_t yy_base[7] =
364 { 0,
365 0, 0, 2, 3, 3, 0
366 } ;
367
368 static const flex_int16_t yy_def[7] =
369 { 0,
370 6, 6, 5, 5, 0, 5
371 } ;
372
373 static const flex_int16_t yy_nxt[5] =
374 { 0,
375 4, 5, 3, 5
376 } ;
377
378 static const flex_int16_t yy_chk[5] =
379 { 0,
380 6, 3, 5, 5
381 } ;
382
383 static yy_state_type yy_last_accepting_state;
384 static char *yy_last_accepting_cpos;
385
386 extern int yy_flex_debug;
387 int yy_flex_debug = 0;
388
389 /* The intent behind this definition is that it'll catch
390 * any uses of REJECT which flex missed.
391 */
392 #define REJECT reject_used_but_not_detected
393 #define yymore() yymore_used_but_not_detected
394 #define YY_MORE_ADJ 0
395 #define YY_RESTORE_YY_MORE_OFFSET
396 char *yytext;
397
398 #define INITIAL 0
399
400 #ifndef YY_NO_UNISTD_H
401 /* Special case for "unistd.h", since it is non-ANSI. We include it way
402 * down here because we want the user's section 1 to have been scanned first.
403 * The user has a chance to override it with an option.
404 */
405 #include <unistd.h>
406 #endif
407
408 #ifndef YY_EXTRA_TYPE
409 #define YY_EXTRA_TYPE void *
410 #endif
411
412 static int yy_init_globals ( void );
413
414 /* Accessor methods to globals.
415 These are made visible to non-reentrant scanners for convenience. */
416
417 int yylex_destroy ( void );
418
419 int yyget_debug ( void );
420
421 void yyset_debug ( int debug_flag );
422
423 YY_EXTRA_TYPE yyget_extra ( void );
424
425 void yyset_extra ( YY_EXTRA_TYPE user_defined );
426
427 FILE *yyget_in ( void );
428
429 void yyset_in ( FILE * _in_str );
430
431 FILE *yyget_out ( void );
432
433 void yyset_out ( FILE * _out_str );
434
435 int yyget_leng ( void );
436
437 char *yyget_text ( void );
438
439 int yyget_lineno ( void );
440
441 void yyset_lineno ( int _line_number );
442
443 /* Macros after this point can all be overridden by user definitions in
444 * section 1.
445 */
446
447 #ifndef YY_SKIP_YYWRAP
448 #ifdef __cplusplus
449 extern "C" int yywrap ( void );
450 #else
451 extern int yywrap ( void );
452 #endif
453 #endif
454
455 #ifndef YY_NO_UNPUT
456
457 static void yyunput ( int c, char *buf_ptr );
458
459 #endif
460
461 #ifndef yytext_ptr
462 static void yy_flex_strncpy ( char *, const char *, int );
463 #endif
464
465 #ifdef YY_NEED_STRLEN
466 static int yy_flex_strlen ( const char * );
467 #endif
468
469 #ifndef YY_NO_INPUT
470 #ifdef __cplusplus
471 static int yyinput ( void );
472 #else
473 static int input ( void );
474 #endif
475
476 #endif
477
478 /* Amount of stuff to slurp up with each read. */
479 #ifndef YY_READ_BUF_SIZE
480 #ifdef __ia64__
481 /* On IA-64, the buffer size is 16k, not 8k */
482 #define YY_READ_BUF_SIZE 16384
483 #else
484 #define YY_READ_BUF_SIZE 8192
485 #endif /* __ia64__ */
486 #endif
487
488 /* Copy whatever the last rule matched to the standard output. */
489 #ifndef ECHO
490 /* This used to be an fputs(), but since the string might contain NUL's,
491 * we now use fwrite().
492 */
493 #define ECHO do { if (fwrite( yytext, (size_t) yyleng, 1, yyout )) {} } while (0)
494 #endif
495
496 /* Gets input and stuffs it into "buf". number of characters read, or YY_NULL,
497 * is returned in "result".
498 */
499 #ifndef YY_INPUT
500 #define YY_INPUT(buf,result,max_size) \
501 if ( YY_CURRENT_BUFFER_LVALUE->yy_is_interactive ) \
502 { \
503 int c = '*'; \
504 int n; \
505 for ( n = 0; n < max_size && \
506 (c = getc( yyin )) != EOF && c != '\n'; ++n ) \
507 buf[n] = (char) c; \
508 if ( c == '\n' ) \
509 buf[n++] = (char) c; \
510 if ( c == EOF && ferror( yyin ) ) \
511 YY_FATAL_ERROR( "input in flex scanner failed" ); \
512 result = n; \
513 } \
514 else \
515 { \
516 errno=0; \
517 while ( (result = (int) fread(buf, 1, (yy_size_t) max_size, yyin)) == 0 && ferror(yyin)) \
518 { \
519 if( errno != EINTR) \
520 { \
521 YY_FATAL_ERROR( "input in flex scanner failed" ); \
522 break; \
523 } \
524 errno=0; \
525 clearerr(yyin); \
526 } \
527 }\
528 \
529
530 #endif
531
532 /* No semi-colon after return; correct usage is to write "yyterminate();" -
533 * we don't want an extra ';' after the "return" because that will cause
534 * some compilers to complain about unreachable statements.
535 */
536 #ifndef yyterminate
537 #define yyterminate() return YY_NULL
538 #endif
539
540 /* Number of entries by which start-condition stack grows. */
541 #ifndef YY_START_STACK_INCR
542 #define YY_START_STACK_INCR 25
543 #endif
544
545 /* Report a fatal error. */
546 #ifndef YY_FATAL_ERROR
547 #define YY_FATAL_ERROR(msg) yy_fatal_error( msg )
548 #endif
549
550 /* end tables serialization structures and prototypes */
551
552 /* Default declaration of generated scanner - a define so the user can
553 * easily add parameters.
554 */
555 #ifndef YY_DECL
556 #define YY_DECL_IS_OURS 1
557
558 extern int yylex (void);
559
560 #define YY_DECL int yylex (void)
561 #endif /* !YY_DECL */
562
563 /* Code executed at the beginning of each rule, after yytext and yyleng
564 * have been set up.
565 */
566 #ifndef YY_USER_ACTION
567 #define YY_USER_ACTION
568 #endif
569
570 /* Code executed at the end of each rule. */
571 #ifndef YY_BREAK
572 #define YY_BREAK /*LINTED*/break;
573 #endif
574
575 #define YY_RULE_SETUP \
576 YY_USER_ACTION
577
578 /** The main scanner function which does all the work.
579 */
580 YY_DECL
581 {
582 yy_state_type yy_current_state;
583 char *yy_cp, *yy_bp;
584 int yy_act;
585
586 if ( !(yy_init) )
587 {
588 (yy_init) = 1;
589
590 #ifdef YY_USER_INIT
591 YY_USER_INIT;
592 #endif
593
594 if ( ! (yy_start) )
595 (yy_start) = 1; /* first start state */
596
597 if ( ! yyin )
598 yyin = stdin;
599
600 if ( ! yyout )
601 yyout = stdout;
602
603 if ( ! YY_CURRENT_BUFFER ) {
604 yyensure_buffer_stack ();
605 YY_CURRENT_BUFFER_LVALUE =
606 yy_create_buffer( yyin, YY_BUF_SIZE );
607 }
608
609 yy_load_buffer_state( );
610 }
611
612 {
613
614 while ( /*CONSTCOND*/1 ) /* loops until end-of-file is reached */
615 {
616 yy_cp = (yy_c_buf_p);
617
618 /* Support of yytext. */
619 *yy_cp = (yy_hold_char);
620
621 /* yy_bp points to the position in yy_ch_buf of the start of
622 * the current run.
623 */
624 yy_bp = yy_cp;
625
626 yy_current_state = (yy_start);
627 yy_match:
628 do
629 {
630 YY_CHAR yy_c = yy_ec[YY_SC_TO_UI(*yy_cp)] ;
631 if ( yy_accept[yy_current_state] )
632 {
633 (yy_last_accepting_state) = yy_current_state;
634 (yy_last_accepting_cpos) = yy_cp;
635 }
636 while ( yy_chk[yy_base[yy_current_state] + yy_c] != yy_current_state )
637 {
638 yy_current_state = (int) yy_def[yy_current_state];
639 if ( yy_current_state >= 6 )
640 yy_c = yy_meta[yy_c];
641 }
642 yy_current_state = yy_nxt[yy_base[yy_current_state] + yy_c];
643 ++yy_cp;
644 }
645 while ( yy_base[yy_current_state] != 3 );
646
647 yy_find_action:
648 yy_act = yy_accept[yy_current_state];
649 if ( yy_act == 0 )
650 { /* have to back up */
651 yy_cp = (yy_last_accepting_cpos);
652 yy_current_state = (yy_last_accepting_state);
653 yy_act = yy_accept[yy_current_state];
654 }
655
656 YY_DO_BEFORE_ACTION;
657
658 do_action: /* This label is used only to access EOF actions. */
659
660 switch ( yy_act )
661 { /* beginning of action switch */
662 case 0: /* must back up */
663 /* undo the effects of YY_DO_BEFORE_ACTION */
664 *yy_cp = (yy_hold_char);
665 yy_cp = (yy_last_accepting_cpos);
666 yy_current_state = (yy_last_accepting_state);
667 goto yy_find_action;
668
669 case 1:
670 YY_RULE_SETUP
671 ECHO;
672 YY_BREAK
673 case YY_STATE_EOF(INITIAL):
674 yyterminate();
675
676 case YY_END_OF_BUFFER:
677 {
678 /* Amount of text matched not including the EOB char. */
679 int yy_amount_of_matched_text = (int) (yy_cp - (yytext_ptr)) - 1;
680
681 /* Undo the effects of YY_DO_BEFORE_ACTION. */
682 *yy_cp = (yy_hold_char);
683 YY_RESTORE_YY_MORE_OFFSET
684
685 if ( YY_CURRENT_BUFFER_LVALUE->yy_buffer_status == YY_BUFFER_NEW )
686 {
687 /* We're scanning a new file or input source. It's
688 * possible that this happened because the user
689 * just pointed yyin at a new source and called
690 * yylex(). If so, then we have to assure
691 * consistency between YY_CURRENT_BUFFER and our
692 * globals. Here is the right place to do so, because
693 * this is the first action (other than possibly a
694 * back-up) that will match for the new input source.
695 */
696 (yy_n_chars) = YY_CURRENT_BUFFER_LVALUE->yy_n_chars;
697 YY_CURRENT_BUFFER_LVALUE->yy_input_file = yyin;
698 YY_CURRENT_BUFFER_LVALUE->yy_buffer_status = YY_BUFFER_NORMAL;
699 }
700
701 /* Note that here we test for yy_c_buf_p "<=" to the position
702 * of the first EOB in the buffer, since yy_c_buf_p will
703 * already have been incremented past the NUL character
704 * (since all states make transitions on EOB to the
705 * end-of-buffer state). Contrast this with the test
706 * in input().
707 */
708 if ( (yy_c_buf_p) <= &YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[(yy_n_chars)] )
709 { /* This was really a NUL. */
710 yy_state_type yy_next_state;
711
712 (yy_c_buf_p) = (yytext_ptr) + yy_amount_of_matched_text;
713
714 yy_current_state = yy_get_previous_state( );
715
716 /* Okay, we're now positioned to make the NUL
717 * transition. We couldn't have
718 * yy_get_previous_state() go ahead and do it
719 * for us because it doesn't know how to deal
720 * with the possibility of jamming (and we don't
721 * want to build jamming into it because then it
722 * will run more slowly).
723 */
724
725 yy_next_state = yy_try_NUL_trans( yy_current_state );
726
727 yy_bp = (yytext_ptr) + YY_MORE_ADJ;
728
729 if ( yy_next_state )
730 {
731 /* Consume the NUL. */
732 yy_cp = ++(yy_c_buf_p);
733 yy_current_state = yy_next_state;
734 goto yy_match;
735 }
736
737 else
738 {
739 yy_cp = (yy_c_buf_p);
740 goto yy_find_action;
741 }
742 }
743
744 else switch ( yy_get_next_buffer( ) )
745 {
746 case EOB_ACT_END_OF_FILE:
747 {
748 (yy_did_buffer_switch_on_eof) = 0;
749
750 if ( yywrap( ) )
751 {
752 /* Note: because we've taken care in
753 * yy_get_next_buffer() to have set up
754 * yytext, we can now set up
755 * yy_c_buf_p so that if some total
756 * hoser (like flex itself) wants to
757 * call the scanner after we return the
758 * YY_NULL, it'll still work - another
759 * YY_NULL will get returned.
760 */
761 (yy_c_buf_p) = (yytext_ptr) + YY_MORE_ADJ;
762
763 yy_act = YY_STATE_EOF(YY_START);
764 goto do_action;
765 }
766
767 else
768 {
769 if ( ! (yy_did_buffer_switch_on_eof) )
770 YY_NEW_FILE;
771 }
772 break;
773 }
774
775 case EOB_ACT_CONTINUE_SCAN:
776 (yy_c_buf_p) =
777 (yytext_ptr) + yy_amount_of_matched_text;
778
779 yy_current_state = yy_get_previous_state( );
780
781 yy_cp = (yy_c_buf_p);
782 yy_bp = (yytext_ptr) + YY_MORE_ADJ;
783 goto yy_match;
784
785 case EOB_ACT_LAST_MATCH:
786 (yy_c_buf_p) =
787 &YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[(yy_n_chars)];
788
789 yy_current_state = yy_get_previous_state( );
790
791 yy_cp = (yy_c_buf_p);
792 yy_bp = (yytext_ptr) + YY_MORE_ADJ;
793 goto yy_find_action;
794 }
795 break;
796 }
797
798 default:
799 YY_FATAL_ERROR(
800 "fatal flex scanner internal error--no action found" );
801 } /* end of action switch */
802 } /* end of scanning one token */
803 } /* end of user's declarations */
804 } /* end of yylex */
805
806 /* yy_get_next_buffer - try to read in a new buffer
807 *
808 * Returns a code representing an action:
809 * EOB_ACT_LAST_MATCH -
810 * EOB_ACT_CONTINUE_SCAN - continue scanning from current position
811 * EOB_ACT_END_OF_FILE - end of file
812 */
813 static int yy_get_next_buffer (void)
814 {
815 char *dest = YY_CURRENT_BUFFER_LVALUE->yy_ch_buf;
816 char *source = (yytext_ptr);
817 int number_to_move, i;
818 int ret_val;
819
820 if ( (yy_c_buf_p) > &YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[(yy_n_chars) + 1] )
821 YY_FATAL_ERROR(
822 "fatal flex scanner internal error--end of buffer missed" );
823
824 if ( YY_CURRENT_BUFFER_LVALUE->yy_fill_buffer == 0 )
825 { /* Don't try to fill the buffer, so this is an EOF. */
826 if ( (yy_c_buf_p) - (yytext_ptr) - YY_MORE_ADJ == 1 )
827 {
828 /* We matched a single character, the EOB, so
829 * treat this as a final EOF.
830 */
831 return EOB_ACT_END_OF_FILE;
832 }
833
834 else
835 {
836 /* We matched some text prior to the EOB, first
837 * process it.
838 */
839 return EOB_ACT_LAST_MATCH;
840 }
841 }
842
843 /* Try to read more data. */
844
845 /* First move last chars to start of buffer. */
846 number_to_move = (int) ((yy_c_buf_p) - (yytext_ptr) - 1);
847
848 for ( i = 0; i < number_to_move; ++i )
849 *(dest++) = *(source++);
850
851 if ( YY_CURRENT_BUFFER_LVALUE->yy_buffer_status == YY_BUFFER_EOF_PENDING )
852 /* don't do the read, it's not guaranteed to return an EOF,
853 * just force an EOF
854 */
855 YY_CURRENT_BUFFER_LVALUE->yy_n_chars = (yy_n_chars) = 0;
856
857 else
858 {
859 int num_to_read =
860 YY_CURRENT_BUFFER_LVALUE->yy_buf_size - number_to_move - 1;
861
862 while ( num_to_read <= 0 )
863 { /* Not enough room in the buffer - grow it. */
864
865 /* just a shorter name for the current buffer */
866 YY_BUFFER_STATE b = YY_CURRENT_BUFFER_LVALUE;
867
868 int yy_c_buf_p_offset =
869 (int) ((yy_c_buf_p) - b->yy_ch_buf);
870
871 if ( b->yy_is_our_buffer )
872 {
873 int new_size = b->yy_buf_size * 2;
874
875 if ( new_size <= 0 )
876 b->yy_buf_size += b->yy_buf_size / 8;
877 else
878 b->yy_buf_size *= 2;
879
880 b->yy_ch_buf = (char *) /* { dg-warning "leak" } */
881 /* Include room in for 2 EOB chars. */
882 yyrealloc( (void *) b->yy_ch_buf,
883 (yy_size_t) (b->yy_buf_size + 2) );
884 }
885 else
886 /* Can't grow it, we don't own it. */
887 b->yy_ch_buf = NULL; /* { dg-bogus "leak" "" { xfail *-*-* } } */
888 /* TODO: leak false positive: PR analyzer/103546. */
889
890 if ( ! b->yy_ch_buf )
891 YY_FATAL_ERROR(
892 "fatal error - scanner input buffer overflow" );
893
894 (yy_c_buf_p) = &b->yy_ch_buf[yy_c_buf_p_offset];
895
896 num_to_read = YY_CURRENT_BUFFER_LVALUE->yy_buf_size -
897 number_to_move - 1;
898
899 }
900
901 if ( num_to_read > YY_READ_BUF_SIZE )
902 num_to_read = YY_READ_BUF_SIZE;
903
904 /* Read in more data. */
905 YY_INPUT( (&YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[number_to_move]),
906 (yy_n_chars), num_to_read );
907
908 YY_CURRENT_BUFFER_LVALUE->yy_n_chars = (yy_n_chars);
909 }
910
911 if ( (yy_n_chars) == 0 )
912 {
913 if ( number_to_move == YY_MORE_ADJ )
914 {
915 ret_val = EOB_ACT_END_OF_FILE;
916 yyrestart( yyin );/* { dg-bogus "leak" } */
917 }
918
919 else
920 {
921 ret_val = EOB_ACT_LAST_MATCH;
922 YY_CURRENT_BUFFER_LVALUE->yy_buffer_status =
923 YY_BUFFER_EOF_PENDING;
924 }
925 }
926
927 else
928 ret_val = EOB_ACT_CONTINUE_SCAN;
929
930 if (((yy_n_chars) + number_to_move) > YY_CURRENT_BUFFER_LVALUE->yy_buf_size) {
931 /* Extend the array by 50%, plus the number we really need. */
932 int new_size = (yy_n_chars) + number_to_move + ((yy_n_chars) >> 1);
933 YY_CURRENT_BUFFER_LVALUE->yy_ch_buf = (char *) yyrealloc(
934 (void *) YY_CURRENT_BUFFER_LVALUE->yy_ch_buf, (yy_size_t) new_size );
935 if ( ! YY_CURRENT_BUFFER_LVALUE->yy_ch_buf )
936 YY_FATAL_ERROR( "out of dynamic memory in yy_get_next_buffer()" );
937 /* "- 2" to take care of EOB's */
938 YY_CURRENT_BUFFER_LVALUE->yy_buf_size = (int) (new_size - 2);
939 }
940
941 (yy_n_chars) += number_to_move;
942 YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[(yy_n_chars)] = YY_END_OF_BUFFER_CHAR;
943 YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[(yy_n_chars) + 1] = YY_END_OF_BUFFER_CHAR;
944
945 (yytext_ptr) = &YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[0];
946
947 return ret_val;
948 }
949
950 /* yy_get_previous_state - get the state just before the EOB char was reached */
951
952 static yy_state_type yy_get_previous_state (void)
953 {
954 yy_state_type yy_current_state;
955 char *yy_cp;
956
957 yy_current_state = (yy_start);
958
959 for ( yy_cp = (yytext_ptr) + YY_MORE_ADJ; yy_cp < (yy_c_buf_p); ++yy_cp )
960 {
961 YY_CHAR yy_c = (*yy_cp ? yy_ec[YY_SC_TO_UI(*yy_cp)] : 1);
962 if ( yy_accept[yy_current_state] )
963 {
964 (yy_last_accepting_state) = yy_current_state;
965 (yy_last_accepting_cpos) = yy_cp;
966 }
967 while ( yy_chk[yy_base[yy_current_state] + yy_c] != yy_current_state )
968 {
969 yy_current_state = (int) yy_def[yy_current_state];
970 if ( yy_current_state >= 6 )
971 yy_c = yy_meta[yy_c];
972 }
973 yy_current_state = yy_nxt[yy_base[yy_current_state] + yy_c];
974 }
975
976 return yy_current_state;
977 }
978
979 /* yy_try_NUL_trans - try to make a transition on the NUL character
980 *
981 * synopsis
982 * next_state = yy_try_NUL_trans( current_state );
983 */
984 static yy_state_type yy_try_NUL_trans (yy_state_type yy_current_state )
985 {
986 int yy_is_jam;
987 char *yy_cp = (yy_c_buf_p);
988
989 YY_CHAR yy_c = 1;
990 if ( yy_accept[yy_current_state] )
991 {
992 (yy_last_accepting_state) = yy_current_state;
993 (yy_last_accepting_cpos) = yy_cp;
994 }
995 while ( yy_chk[yy_base[yy_current_state] + yy_c] != yy_current_state )
996 {
997 yy_current_state = (int) yy_def[yy_current_state];
998 if ( yy_current_state >= 6 )
999 yy_c = yy_meta[yy_c];
1000 }
1001 yy_current_state = yy_nxt[yy_base[yy_current_state] + yy_c];
1002 yy_is_jam = (yy_current_state == 5);
1003
1004 return yy_is_jam ? 0 : yy_current_state;
1005 }
1006
1007 #ifndef YY_NO_UNPUT
1008
1009 static void yyunput (int c, char * yy_bp )
1010 {
1011 char *yy_cp;
1012
1013 yy_cp = (yy_c_buf_p);
1014
1015 /* undo effects of setting up yytext */
1016 *yy_cp = (yy_hold_char);
1017
1018 if ( yy_cp < YY_CURRENT_BUFFER_LVALUE->yy_ch_buf + 2 )
1019 { /* need to shift things up to make room */
1020 /* +2 for EOB chars. */
1021 int number_to_move = (yy_n_chars) + 2;
1022 char *dest = &YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[
1023 YY_CURRENT_BUFFER_LVALUE->yy_buf_size + 2];
1024 char *source =
1025 &YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[number_to_move];
1026
1027 while ( source > YY_CURRENT_BUFFER_LVALUE->yy_ch_buf )
1028 *--dest = *--source;
1029
1030 yy_cp += (int) (dest - source);
1031 yy_bp += (int) (dest - source);
1032 YY_CURRENT_BUFFER_LVALUE->yy_n_chars =
1033 (yy_n_chars) = (int) YY_CURRENT_BUFFER_LVALUE->yy_buf_size;
1034
1035 if ( yy_cp < YY_CURRENT_BUFFER_LVALUE->yy_ch_buf + 2 )
1036 YY_FATAL_ERROR( "flex scanner push-back overflow" );
1037 }
1038
1039 *--yy_cp = (char) c;
1040
1041 (yytext_ptr) = yy_bp;
1042 (yy_hold_char) = *yy_cp;
1043 (yy_c_buf_p) = yy_cp;
1044 }
1045
1046 #endif
1047
1048 #ifndef YY_NO_INPUT
1049 #ifdef __cplusplus
1050 static int yyinput (void)
1051 #else
1052 static int input (void)
1053 #endif
1054
1055 {
1056 int c;
1057
1058 *(yy_c_buf_p) = (yy_hold_char);
1059
1060 if ( *(yy_c_buf_p) == YY_END_OF_BUFFER_CHAR )
1061 {
1062 /* yy_c_buf_p now points to the character we want to return.
1063 * If this occurs *before* the EOB characters, then it's a
1064 * valid NUL; if not, then we've hit the end of the buffer.
1065 */
1066 if ( (yy_c_buf_p) < &YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[(yy_n_chars)] )
1067 /* This was really a NUL. */
1068 *(yy_c_buf_p) = '\0';
1069
1070 else
1071 { /* need more input */
1072 int offset = (int) ((yy_c_buf_p) - (yytext_ptr));
1073 ++(yy_c_buf_p);
1074
1075 switch ( yy_get_next_buffer( ) )
1076 {
1077 case EOB_ACT_LAST_MATCH:
1078 /* This happens because yy_g_n_b()
1079 * sees that we've accumulated a
1080 * token and flags that we need to
1081 * try matching the token before
1082 * proceeding. But for input(),
1083 * there's no matching to consider.
1084 * So convert the EOB_ACT_LAST_MATCH
1085 * to EOB_ACT_END_OF_FILE.
1086 */
1087
1088 /* Reset buffer status. */
1089 yyrestart( yyin );
1090
1091 /*FALLTHROUGH*/
1092
1093 case EOB_ACT_END_OF_FILE:
1094 {
1095 if ( yywrap( ) )
1096 return 0;
1097
1098 if ( ! (yy_did_buffer_switch_on_eof) )
1099 YY_NEW_FILE;
1100 #ifdef __cplusplus
1101 return yyinput();
1102 #else
1103 return input(); /* { dg-bogus "infinite recursion" } */
1104 #endif
1105 }
1106
1107 case EOB_ACT_CONTINUE_SCAN:
1108 (yy_c_buf_p) = (yytext_ptr) + offset;
1109 break;
1110 }
1111 }
1112 }
1113
1114 c = *(unsigned char *) (yy_c_buf_p); /* cast for 8-bit char's */
1115 *(yy_c_buf_p) = '\0'; /* preserve yytext */
1116 (yy_hold_char) = *++(yy_c_buf_p);
1117
1118 return c;
1119 }
1120 #endif /* ifndef YY_NO_INPUT */
1121
1122 /** Immediately switch to a different input stream.
1123 * @param input_file A readable stream.
1124 *
1125 * @note This function does not reset the start condition to @c INITIAL .
1126 */
1127
1128 void yyrestart (FILE * input_file )
1129 {
1130
1131 if ( ! YY_CURRENT_BUFFER ){
1132 yyensure_buffer_stack ();
1133 YY_CURRENT_BUFFER_LVALUE = yy_create_buffer( yyin, YY_BUF_SIZE );
1134 }
1135
1136 yy_init_buffer( YY_CURRENT_BUFFER, input_file );
1137 yy_load_buffer_state( );
1138 }
1139
1140 /** Switch to a different input buffer.
1141 * @param new_buffer The new input buffer.
1142 *
1143 */
1144 void yy_switch_to_buffer (YY_BUFFER_STATE new_buffer )
1145 {
1146
1147 /* TODO. We should be able to replace this entire function body
1148 * with
1149 * yypop_buffer_state();
1150 * yypush_buffer_state(new_buffer);
1151 */
1152 yyensure_buffer_stack ();
1153 if ( YY_CURRENT_BUFFER == new_buffer )
1154 return;
1155
1156 if ( YY_CURRENT_BUFFER )
1157 {
1158 /* Flush out information for old buffer. */
1159 *(yy_c_buf_p) = (yy_hold_char);
1160 YY_CURRENT_BUFFER_LVALUE->yy_buf_pos = (yy_c_buf_p);
1161 YY_CURRENT_BUFFER_LVALUE->yy_n_chars = (yy_n_chars);
1162 }
1163
1164 YY_CURRENT_BUFFER_LVALUE = new_buffer;
1165 yy_load_buffer_state( );
1166
1167 /* We don't actually know whether we did this switch during
1168 * EOF (yywrap()) processing, but the only time this flag
1169 * is looked at is after yywrap() is called, so it's safe
1170 * to go ahead and always set it.
1171 */
1172 (yy_did_buffer_switch_on_eof) = 1;
1173 }
1174
1175 static void yy_load_buffer_state (void)
1176 {
1177 (yy_n_chars) = YY_CURRENT_BUFFER_LVALUE->yy_n_chars;
1178 (yytext_ptr) = (yy_c_buf_p) = YY_CURRENT_BUFFER_LVALUE->yy_buf_pos;
1179 yyin = YY_CURRENT_BUFFER_LVALUE->yy_input_file;
1180 (yy_hold_char) = *(yy_c_buf_p);
1181 }
1182
1183 /** Allocate and initialize an input buffer state.
1184 * @param file A readable stream.
1185 * @param size The character buffer size in bytes. When in doubt, use @c YY_BUF_SIZE.
1186 *
1187 * @return the allocated buffer state.
1188 */
1189
1190 YY_BUFFER_STATE
1191 yy_create_buffer (FILE * file, int size )
1192 {
1193 YY_BUFFER_STATE b;
1194
1195 b = (YY_BUFFER_STATE) yyalloc( sizeof( struct yy_buffer_state ) );
1196 if ( ! b )
1197 YY_FATAL_ERROR( "out of dynamic memory in yy_create_buffer()" );
1198
1199 b->yy_buf_size = size;
1200
1201 /* yy_ch_buf has to be 2 characters longer than the size given because
1202 * we need to put in 2 end-of-buffer characters.
1203 */
1204 b->yy_ch_buf = (char *) yyalloc( (yy_size_t) (b->yy_buf_size + 2) );
1205 if ( ! b->yy_ch_buf )
1206 YY_FATAL_ERROR( "out of dynamic memory in yy_create_buffer()" );
1207
1208 b->yy_is_our_buffer = 1;
1209
1210 yy_init_buffer( b, file ); /* { dg-bogus "leak" "" { xfail *-*-* } } */
1211 /* TODO: leak false positive: PR analyzer/103546. */
1212
1213 return b;
1214 }
1215
1216 /** Destroy the buffer.
1217 * @param b a buffer created with yy_create_buffer()
1218 *
1219 */
1220
1221 void yy_delete_buffer (YY_BUFFER_STATE b )
1222 {
1223
1224 if ( ! b )
1225 return;
1226
1227 if ( b == YY_CURRENT_BUFFER ) /* Not sure if we should pop here. */
1228 YY_CURRENT_BUFFER_LVALUE = (YY_BUFFER_STATE) 0;
1229
1230 if ( b->yy_is_our_buffer )
1231 yyfree( (void *) b->yy_ch_buf );
1232
1233 yyfree( (void *) b );
1234 }
1235
1236 /* Initializes or reinitializes a buffer.
1237 * This function is sometimes called more than once on the same buffer,
1238 * such as during a yyrestart() or at EOF.
1239 */
1240
1241 static void yy_init_buffer (YY_BUFFER_STATE b, FILE * file )
1242 {
1243 int oerrno = errno;
1244
1245 yy_flush_buffer( b );
1246
1247 b->yy_input_file = file;
1248 b->yy_fill_buffer = 1;
1249
1250 /* If b is the current buffer, then yy_init_buffer was _probably_
1251 * called from yyrestart() or through yy_get_next_buffer.
1252 * In that case, we don't want to reset the lineno or column.
1253 */
1254 if (b != YY_CURRENT_BUFFER){
1255 b->yy_bs_lineno = 1;
1256 b->yy_bs_column = 0;
1257 }
1258
1259 b->yy_is_interactive = file ? (isatty( fileno(file) ) > 0) : 0;
1260
1261 errno = oerrno;
1262 }
1263
1264 /** Discard all buffered characters. On the next scan, YY_INPUT will be called.
1265 * @param b the buffer state to be flushed, usually @c YY_CURRENT_BUFFER.
1266 *
1267 */
1268 void yy_flush_buffer (YY_BUFFER_STATE b )
1269 {
1270 if ( ! b )
1271 return;
1272
1273 b->yy_n_chars = 0;
1274
1275 /* We always need two end-of-buffer characters. The first causes
1276 * a transition to the end-of-buffer state. The second causes
1277 * a jam in that state.
1278 */
1279 b->yy_ch_buf[0] = YY_END_OF_BUFFER_CHAR;
1280 b->yy_ch_buf[1] = YY_END_OF_BUFFER_CHAR;
1281
1282 b->yy_buf_pos = &b->yy_ch_buf[0];
1283
1284 b->yy_at_bol = 1;
1285 b->yy_buffer_status = YY_BUFFER_NEW;
1286
1287 if ( b == YY_CURRENT_BUFFER )
1288 yy_load_buffer_state( );
1289 }
1290
1291 /** Pushes the new state onto the stack. The new state becomes
1292 * the current state. This function will allocate the stack
1293 * if necessary.
1294 * @param new_buffer The new state.
1295 *
1296 */
1297 void yypush_buffer_state (YY_BUFFER_STATE new_buffer )
1298 {
1299 if (new_buffer == NULL)
1300 return;
1301
1302 yyensure_buffer_stack();
1303
1304 /* This block is copied from yy_switch_to_buffer. */
1305 if ( YY_CURRENT_BUFFER )
1306 {
1307 /* Flush out information for old buffer. */
1308 *(yy_c_buf_p) = (yy_hold_char);
1309 YY_CURRENT_BUFFER_LVALUE->yy_buf_pos = (yy_c_buf_p);
1310 YY_CURRENT_BUFFER_LVALUE->yy_n_chars = (yy_n_chars);
1311 }
1312
1313 /* Only push if top exists. Otherwise, replace top. */
1314 if (YY_CURRENT_BUFFER)
1315 (yy_buffer_stack_top)++;
1316 YY_CURRENT_BUFFER_LVALUE = new_buffer;
1317
1318 /* copied from yy_switch_to_buffer. */
1319 yy_load_buffer_state( );
1320 (yy_did_buffer_switch_on_eof) = 1;
1321 }
1322
1323 /** Removes and deletes the top of the stack, if present.
1324 * The next element becomes the new top.
1325 *
1326 */
1327 void yypop_buffer_state (void)
1328 {
1329 if (!YY_CURRENT_BUFFER)
1330 return;
1331
1332 yy_delete_buffer(YY_CURRENT_BUFFER );
1333 YY_CURRENT_BUFFER_LVALUE = NULL;
1334 if ((yy_buffer_stack_top) > 0)
1335 --(yy_buffer_stack_top);
1336
1337 if (YY_CURRENT_BUFFER) {
1338 yy_load_buffer_state( );
1339 (yy_did_buffer_switch_on_eof) = 1;
1340 }
1341 }
1342
1343 /* Allocates the stack if it does not exist.
1344 * Guarantees space for at least one push.
1345 */
1346 static void yyensure_buffer_stack (void)
1347 {
1348 yy_size_t num_to_alloc;
1349
1350 if (!(yy_buffer_stack)) {
1351
1352 /* First allocation is just for 2 elements, since we don't know if this
1353 * scanner will even need a stack. We use 2 instead of 1 to avoid an
1354 * immediate realloc on the next call.
1355 */
1356 num_to_alloc = 1; /* After all that talk, this was set to 1 anyways... */
1357 (yy_buffer_stack) = (struct yy_buffer_state**)yyalloc
1358 (num_to_alloc * sizeof(struct yy_buffer_state*)
1359 );
1360 if ( ! (yy_buffer_stack) )
1361 YY_FATAL_ERROR( "out of dynamic memory in yyensure_buffer_stack()" );
1362
1363 memset((yy_buffer_stack), 0, num_to_alloc * sizeof(struct yy_buffer_state*));
1364
1365 (yy_buffer_stack_max) = num_to_alloc;
1366 (yy_buffer_stack_top) = 0;
1367 return;
1368 }
1369
1370 if ((yy_buffer_stack_top) >= ((yy_buffer_stack_max)) - 1){
1371
1372 /* Increase the buffer to prepare for a possible push. */
1373 yy_size_t grow_size = 8 /* arbitrary grow size */;
1374
1375 num_to_alloc = (yy_buffer_stack_max) + grow_size;
1376 (yy_buffer_stack) = (struct yy_buffer_state**)yyrealloc
1377 ((yy_buffer_stack),
1378 num_to_alloc * sizeof(struct yy_buffer_state*)
1379 );
1380 if ( ! (yy_buffer_stack) )
1381 YY_FATAL_ERROR( "out of dynamic memory in yyensure_buffer_stack()" );
1382
1383 /* zero only the new slots.*/
1384 memset((yy_buffer_stack) + (yy_buffer_stack_max), 0, grow_size * sizeof(struct yy_buffer_state*));
1385 (yy_buffer_stack_max) = num_to_alloc;
1386 }
1387 }
1388
1389 /** Setup the input buffer state to scan directly from a user-specified character buffer.
1390 * @param base the character buffer
1391 * @param size the size in bytes of the character buffer
1392 *
1393 * @return the newly allocated buffer state object.
1394 */
1395 YY_BUFFER_STATE yy_scan_buffer (char * base, yy_size_t size )
1396 {
1397 YY_BUFFER_STATE b;
1398
1399 if ( size < 2 ||
1400 base[size-2] != YY_END_OF_BUFFER_CHAR ||
1401 base[size-1] != YY_END_OF_BUFFER_CHAR )
1402 /* They forgot to leave room for the EOB's. */
1403 return NULL;
1404
1405 b = (YY_BUFFER_STATE) yyalloc( sizeof( struct yy_buffer_state ) );
1406 if ( ! b )
1407 YY_FATAL_ERROR( "out of dynamic memory in yy_scan_buffer()" );
1408
1409 b->yy_buf_size = (int) (size - 2); /* "- 2" to take care of EOB's */
1410 b->yy_buf_pos = b->yy_ch_buf = base;
1411 b->yy_is_our_buffer = 0;
1412 b->yy_input_file = NULL;
1413 b->yy_n_chars = b->yy_buf_size;
1414 b->yy_is_interactive = 0;
1415 b->yy_at_bol = 1;
1416 b->yy_fill_buffer = 0;
1417 b->yy_buffer_status = YY_BUFFER_NEW;
1418
1419 yy_switch_to_buffer( b );
1420
1421 return b;
1422 }
1423
1424 /** Setup the input buffer state to scan a string. The next call to yylex() will
1425 * scan from a @e copy of @a str.
1426 * @param yystr a NUL-terminated string to scan
1427 *
1428 * @return the newly allocated buffer state object.
1429 * @note If you want to scan bytes that may contain NUL values, then use
1430 * yy_scan_bytes() instead.
1431 */
1432 YY_BUFFER_STATE yy_scan_string (const char * yystr )
1433 {
1434
1435 return yy_scan_bytes( yystr, (int) strlen(yystr) );
1436 }
1437
1438 /** Setup the input buffer state to scan the given bytes. The next call to yylex() will
1439 * scan from a @e copy of @a bytes.
1440 * @param yybytes the byte buffer to scan
1441 * @param _yybytes_len the number of bytes in the buffer pointed to by @a bytes.
1442 *
1443 * @return the newly allocated buffer state object.
1444 */
1445 YY_BUFFER_STATE yy_scan_bytes (const char * yybytes, int _yybytes_len )
1446 {
1447 YY_BUFFER_STATE b;
1448 char *buf;
1449 yy_size_t n;
1450 int i;
1451
1452 /* Get memory for full buffer, including space for trailing EOB's. */
1453 n = (yy_size_t) (_yybytes_len + 2);
1454 buf = (char *) yyalloc( n );
1455 if ( ! buf )
1456 YY_FATAL_ERROR( "out of dynamic memory in yy_scan_bytes()" );
1457
1458 for ( i = 0; i < _yybytes_len; ++i )
1459 buf[i] = yybytes[i];
1460
1461 buf[_yybytes_len] = buf[_yybytes_len+1] = YY_END_OF_BUFFER_CHAR;
1462
1463 b = yy_scan_buffer( buf, n );
1464 if ( ! b )
1465 YY_FATAL_ERROR( "bad buffer in yy_scan_bytes()" );
1466
1467 /* It's okay to grow etc. this buffer, and we should throw it
1468 * away when we're done.
1469 */
1470 b->yy_is_our_buffer = 1;
1471
1472 return b; /* { dg-bogus "leak" } */
1473 }
1474
1475 #ifndef YY_EXIT_FAILURE
1476 #define YY_EXIT_FAILURE 2
1477 #endif
1478
1479 static void yynoreturn yy_fatal_error (const char* msg )
1480 {
1481 fprintf( stderr, "%s\n", msg );
1482 exit( YY_EXIT_FAILURE );
1483 }
1484
1485 /* Redefine yyless() so it works in section 3 code. */
1486
1487 #undef yyless
1488 #define yyless(n) \
1489 do \
1490 { \
1491 /* Undo effects of setting up yytext. */ \
1492 int yyless_macro_arg = (n); \
1493 YY_LESS_LINENO(yyless_macro_arg);\
1494 yytext[yyleng] = (yy_hold_char); \
1495 (yy_c_buf_p) = yytext + yyless_macro_arg; \
1496 (yy_hold_char) = *(yy_c_buf_p); \
1497 *(yy_c_buf_p) = '\0'; \
1498 yyleng = yyless_macro_arg; \
1499 } \
1500 while ( 0 )
1501
1502 /* Accessor methods (get/set functions) to struct members. */
1503
1504 /** Get the current line number.
1505 *
1506 */
1507 int yyget_lineno (void)
1508 {
1509
1510 return yylineno;
1511 }
1512
1513 /** Get the input stream.
1514 *
1515 */
1516 FILE *yyget_in (void)
1517 {
1518 return yyin;
1519 }
1520
1521 /** Get the output stream.
1522 *
1523 */
1524 FILE *yyget_out (void)
1525 {
1526 return yyout;
1527 }
1528
1529 /** Get the length of the current token.
1530 *
1531 */
1532 int yyget_leng (void)
1533 {
1534 return yyleng;
1535 }
1536
1537 /** Get the current token.
1538 *
1539 */
1540
1541 char *yyget_text (void)
1542 {
1543 return yytext;
1544 }
1545
1546 /** Set the current line number.
1547 * @param _line_number line number
1548 *
1549 */
1550 void yyset_lineno (int _line_number )
1551 {
1552
1553 yylineno = _line_number;
1554 }
1555
1556 /** Set the input stream. This does not discard the current
1557 * input buffer.
1558 * @param _in_str A readable stream.
1559 *
1560 * @see yy_switch_to_buffer
1561 */
1562 void yyset_in (FILE * _in_str )
1563 {
1564 yyin = _in_str ;
1565 }
1566
1567 void yyset_out (FILE * _out_str )
1568 {
1569 yyout = _out_str ;
1570 }
1571
1572 int yyget_debug (void)
1573 {
1574 return yy_flex_debug;
1575 }
1576
1577 void yyset_debug (int _bdebug )
1578 {
1579 yy_flex_debug = _bdebug ;
1580 }
1581
1582 static int yy_init_globals (void)
1583 {
1584 /* Initialization is the same as for the non-reentrant scanner.
1585 * This function is called from yylex_destroy(), so don't allocate here.
1586 */
1587
1588 (yy_buffer_stack) = NULL;
1589 (yy_buffer_stack_top) = 0;
1590 (yy_buffer_stack_max) = 0;
1591 (yy_c_buf_p) = NULL;
1592 (yy_init) = 0;
1593 (yy_start) = 0;
1594
1595 /* Defined in main.c */
1596 #ifdef YY_STDINIT
1597 yyin = stdin;
1598 yyout = stdout;
1599 #else
1600 yyin = NULL;
1601 yyout = NULL;
1602 #endif
1603
1604 /* For future reference: Set errno on error, since we are called by
1605 * yylex_init()
1606 */
1607 return 0;
1608 }
1609
1610 /* yylex_destroy is for both reentrant and non-reentrant scanners. */
1611 int yylex_destroy (void)
1612 {
1613
1614 /* Pop the buffer stack, destroying each element. */
1615 while(YY_CURRENT_BUFFER){
1616 yy_delete_buffer( YY_CURRENT_BUFFER );
1617 YY_CURRENT_BUFFER_LVALUE = NULL;
1618 yypop_buffer_state();
1619 }
1620
1621 /* Destroy the stack itself. */
1622 yyfree((yy_buffer_stack) );
1623 (yy_buffer_stack) = NULL;
1624
1625 /* Reset the globals. This is important in a non-reentrant scanner so the next time
1626 * yylex() is called, initialization will occur. */
1627 yy_init_globals( );
1628
1629 return 0;
1630 }
1631
1632 /*
1633 * Internal utility routines.
1634 */
1635
1636 #ifndef yytext_ptr
1637 static void yy_flex_strncpy (char* s1, const char * s2, int n )
1638 {
1639
1640 int i;
1641 for ( i = 0; i < n; ++i )
1642 s1[i] = s2[i];
1643 }
1644 #endif
1645
1646 #ifdef YY_NEED_STRLEN
1647 static int yy_flex_strlen (const char * s )
1648 {
1649 int n;
1650 for ( n = 0; s[n]; ++n )
1651 ;
1652
1653 return n;
1654 }
1655 #endif
1656
1657 void *yyalloc (yy_size_t size )
1658 {
1659 return malloc(size);
1660 }
1661
1662 void *yyrealloc (void * ptr, yy_size_t size )
1663 {
1664
1665 /* The cast to (char *) in the following accommodates both
1666 * implementations that use char* generic pointers, and those
1667 * that use void* generic pointers. It works with the latter
1668 * because both ANSI C and C++ allow castless assignment from
1669 * any pointer type to void*, and deal with argument conversions
1670 * as though doing an assignment.
1671 */
1672 return realloc(ptr, size);
1673 }
1674
1675 void yyfree (void * ptr )
1676 {
1677 free( (char *) ptr ); /* see yyrealloc() for (char *) cast */
1678 }
1679
1680 #define YYTABLES_NAME "yytables"