s4:heimdal Import generated files from heimdal tree
[Samba/kamenim.git] / source4 / heimdal / lib / com_err / lex.c
blob1b6473966bb17d689e8194d55b0519cc537db141
2 #line 3 "lex.c"
4 #define YY_INT_ALIGNED short int
6 /* A lexical scanner generated by flex */
8 #define FLEX_SCANNER
9 #define YY_FLEX_MAJOR_VERSION 2
10 #define YY_FLEX_MINOR_VERSION 5
11 #define YY_FLEX_SUBMINOR_VERSION 35
12 #if YY_FLEX_SUBMINOR_VERSION > 0
13 #define FLEX_BETA
14 #endif
16 /* First, we deal with platform-specific or compiler-specific issues. */
18 /* begin standard C headers. */
19 #include <stdio.h>
20 #include <string.h>
21 #include <errno.h>
22 #include <stdlib.h>
24 /* end standard C headers. */
26 /* flex integer type definitions */
28 #ifndef FLEXINT_H
29 #define FLEXINT_H
31 /* C99 systems have <inttypes.h>. Non-C99 systems may or may not. */
33 #if defined (__STDC_VERSION__) && __STDC_VERSION__ >= 199901L
35 /* C99 says to define __STDC_LIMIT_MACROS before including stdint.h,
36 * if you want the limit (max/min) macros for int types.
38 #ifndef __STDC_LIMIT_MACROS
39 #define __STDC_LIMIT_MACROS 1
40 #endif
42 #include <inttypes.h>
43 typedef int8_t flex_int8_t;
44 typedef uint8_t flex_uint8_t;
45 typedef int16_t flex_int16_t;
46 typedef uint16_t flex_uint16_t;
47 typedef int32_t flex_int32_t;
48 typedef uint32_t flex_uint32_t;
49 #else
50 typedef signed char flex_int8_t;
51 typedef short int flex_int16_t;
52 typedef int flex_int32_t;
53 typedef unsigned char flex_uint8_t;
54 typedef unsigned short int flex_uint16_t;
55 typedef unsigned int flex_uint32_t;
56 #endif /* ! C99 */
58 /* Limits of integral types. */
59 #ifndef INT8_MIN
60 #define INT8_MIN (-128)
61 #endif
62 #ifndef INT16_MIN
63 #define INT16_MIN (-32767-1)
64 #endif
65 #ifndef INT32_MIN
66 #define INT32_MIN (-2147483647-1)
67 #endif
68 #ifndef INT8_MAX
69 #define INT8_MAX (127)
70 #endif
71 #ifndef INT16_MAX
72 #define INT16_MAX (32767)
73 #endif
74 #ifndef INT32_MAX
75 #define INT32_MAX (2147483647)
76 #endif
77 #ifndef UINT8_MAX
78 #define UINT8_MAX (255U)
79 #endif
80 #ifndef UINT16_MAX
81 #define UINT16_MAX (65535U)
82 #endif
83 #ifndef UINT32_MAX
84 #define UINT32_MAX (4294967295U)
85 #endif
87 #endif /* ! FLEXINT_H */
89 #ifdef __cplusplus
91 /* The "const" storage-class-modifier is valid. */
92 #define YY_USE_CONST
94 #else /* ! __cplusplus */
96 /* C99 requires __STDC__ to be defined as 1. */
97 #if defined (__STDC__)
99 #define YY_USE_CONST
101 #endif /* defined (__STDC__) */
102 #endif /* ! __cplusplus */
104 #ifdef YY_USE_CONST
105 #define yyconst const
106 #else
107 #define yyconst
108 #endif
110 /* Returned upon end-of-file. */
111 #define YY_NULL 0
113 /* Promotes a possibly negative, possibly signed char to an unsigned
114 * integer for use as an array index. If the signed char is negative,
115 * we want to instead treat it as an 8-bit unsigned char, hence the
116 * double cast.
118 #define YY_SC_TO_UI(c) ((unsigned int) (unsigned char) c)
120 /* Enter a start condition. This macro really ought to take a parameter,
121 * but we do it the disgusting crufty way forced on us by the ()-less
122 * definition of BEGIN.
124 #define BEGIN (yy_start) = 1 + 2 *
126 /* Translate the current start state into a value that can be later handed
127 * to BEGIN to return to the state. The YYSTATE alias is for lex
128 * compatibility.
130 #define YY_START (((yy_start) - 1) / 2)
131 #define YYSTATE YY_START
133 /* Action number for EOF rule of a given start state. */
134 #define YY_STATE_EOF(state) (YY_END_OF_BUFFER + state + 1)
136 /* Special action meaning "start processing a new file". */
137 #define YY_NEW_FILE yyrestart(yyin )
139 #define YY_END_OF_BUFFER_CHAR 0
141 /* Size of default input buffer. */
142 #ifndef YY_BUF_SIZE
143 #define YY_BUF_SIZE 16384
144 #endif
146 /* The state buf must be large enough to hold one state per character in the main buffer.
148 #define YY_STATE_BUF_SIZE ((YY_BUF_SIZE + 2) * sizeof(yy_state_type))
150 #ifndef YY_TYPEDEF_YY_BUFFER_STATE
151 #define YY_TYPEDEF_YY_BUFFER_STATE
152 typedef struct yy_buffer_state *YY_BUFFER_STATE;
153 #endif
155 extern int yyleng;
157 extern FILE *yyin, *yyout;
159 #define EOB_ACT_CONTINUE_SCAN 0
160 #define EOB_ACT_END_OF_FILE 1
161 #define EOB_ACT_LAST_MATCH 2
163 #define YY_LESS_LINENO(n)
165 /* Return all but the first "n" matched characters back to the input stream. */
166 #define yyless(n) \
167 do \
169 /* Undo effects of setting up yytext. */ \
170 int yyless_macro_arg = (n); \
171 YY_LESS_LINENO(yyless_macro_arg);\
172 *yy_cp = (yy_hold_char); \
173 YY_RESTORE_YY_MORE_OFFSET \
174 (yy_c_buf_p) = yy_cp = yy_bp + yyless_macro_arg - YY_MORE_ADJ; \
175 YY_DO_BEFORE_ACTION; /* set up yytext again */ \
177 while ( 0 )
179 #define unput(c) yyunput( c, (yytext_ptr) )
181 #ifndef YY_TYPEDEF_YY_SIZE_T
182 #define YY_TYPEDEF_YY_SIZE_T
183 typedef size_t yy_size_t;
184 #endif
186 #ifndef YY_STRUCT_YY_BUFFER_STATE
187 #define YY_STRUCT_YY_BUFFER_STATE
188 struct yy_buffer_state
190 FILE *yy_input_file;
192 char *yy_ch_buf; /* input buffer */
193 char *yy_buf_pos; /* current position in input buffer */
195 /* Size of input buffer in bytes, not including room for EOB
196 * characters.
198 yy_size_t yy_buf_size;
200 /* Number of characters read into yy_ch_buf, not including EOB
201 * characters.
203 int yy_n_chars;
205 /* Whether we "own" the buffer - i.e., we know we created it,
206 * and can realloc() it to grow it, and should free() it to
207 * delete it.
209 int yy_is_our_buffer;
211 /* Whether this is an "interactive" input source; if so, and
212 * if we're using stdio for input, then we want to use getc()
213 * instead of fread(), to make sure we stop fetching input after
214 * each newline.
216 int yy_is_interactive;
218 /* Whether we're considered to be at the beginning of a line.
219 * If so, '^' rules will be active on the next match, otherwise
220 * not.
222 int yy_at_bol;
224 int yy_bs_lineno; /**< The line count. */
225 int yy_bs_column; /**< The column count. */
227 /* Whether to try to fill the input buffer when we reach the
228 * end of it.
230 int yy_fill_buffer;
232 int yy_buffer_status;
234 #define YY_BUFFER_NEW 0
235 #define YY_BUFFER_NORMAL 1
236 /* When an EOF's been seen but there's still some text to process
237 * then we mark the buffer as YY_EOF_PENDING, to indicate that we
238 * shouldn't try reading from the input source any more. We might
239 * still have a bunch of tokens to match, though, because of
240 * possible backing-up.
242 * When we actually see the EOF, we change the status to "new"
243 * (via yyrestart()), so that the user can continue scanning by
244 * just pointing yyin at a new input file.
246 #define YY_BUFFER_EOF_PENDING 2
249 #endif /* !YY_STRUCT_YY_BUFFER_STATE */
251 /* Stack of input buffers. */
252 static size_t yy_buffer_stack_top = 0; /**< index of top of stack. */
253 static size_t yy_buffer_stack_max = 0; /**< capacity of stack. */
254 static YY_BUFFER_STATE * yy_buffer_stack = 0; /**< Stack as an array. */
256 /* We provide macros for accessing buffer states in case in the
257 * future we want to put the buffer states in a more general
258 * "scanner state".
260 * Returns the top of the stack, or NULL.
262 #define YY_CURRENT_BUFFER ( (yy_buffer_stack) \
263 ? (yy_buffer_stack)[(yy_buffer_stack_top)] \
264 : NULL)
266 /* Same as previous macro, but useful when we know that the buffer stack is not
267 * NULL or when we need an lvalue. For internal use only.
269 #define YY_CURRENT_BUFFER_LVALUE (yy_buffer_stack)[(yy_buffer_stack_top)]
271 /* yy_hold_char holds the character lost when yytext is formed. */
272 static char yy_hold_char;
273 static int yy_n_chars; /* number of characters read into yy_ch_buf */
274 int yyleng;
276 /* Points to current character in buffer. */
277 static char *yy_c_buf_p = (char *) 0;
278 static int yy_init = 0; /* whether we need to initialize */
279 static int yy_start = 0; /* start state number */
281 /* Flag which is used to allow yywrap()'s to do buffer switches
282 * instead of setting up a fresh yyin. A bit of a hack ...
284 static int yy_did_buffer_switch_on_eof;
286 void yyrestart (FILE *input_file );
287 void yy_switch_to_buffer (YY_BUFFER_STATE new_buffer );
288 YY_BUFFER_STATE yy_create_buffer (FILE *file,int size );
289 void yy_delete_buffer (YY_BUFFER_STATE b );
290 void yy_flush_buffer (YY_BUFFER_STATE b );
291 void yypush_buffer_state (YY_BUFFER_STATE new_buffer );
292 void yypop_buffer_state (void );
294 static void yyensure_buffer_stack (void );
295 static void yy_load_buffer_state (void );
296 static void yy_init_buffer (YY_BUFFER_STATE b,FILE *file );
298 #define YY_FLUSH_BUFFER yy_flush_buffer(YY_CURRENT_BUFFER )
300 YY_BUFFER_STATE yy_scan_buffer (char *base,yy_size_t size );
301 YY_BUFFER_STATE yy_scan_string (yyconst char *yy_str );
302 YY_BUFFER_STATE yy_scan_bytes (yyconst char *bytes,int len );
304 void *yyalloc (yy_size_t );
305 void *yyrealloc (void *,yy_size_t );
306 void yyfree (void * );
308 #define yy_new_buffer yy_create_buffer
310 #define yy_set_interactive(is_interactive) \
312 if ( ! YY_CURRENT_BUFFER ){ \
313 yyensure_buffer_stack (); \
314 YY_CURRENT_BUFFER_LVALUE = \
315 yy_create_buffer(yyin,YY_BUF_SIZE ); \
317 YY_CURRENT_BUFFER_LVALUE->yy_is_interactive = is_interactive; \
320 #define yy_set_bol(at_bol) \
322 if ( ! YY_CURRENT_BUFFER ){\
323 yyensure_buffer_stack (); \
324 YY_CURRENT_BUFFER_LVALUE = \
325 yy_create_buffer(yyin,YY_BUF_SIZE ); \
327 YY_CURRENT_BUFFER_LVALUE->yy_at_bol = at_bol; \
330 #define YY_AT_BOL() (YY_CURRENT_BUFFER_LVALUE->yy_at_bol)
332 /* Begin user sect3 */
334 typedef unsigned char YY_CHAR;
336 FILE *yyin = (FILE *) 0, *yyout = (FILE *) 0;
338 typedef int yy_state_type;
340 extern int yylineno;
342 int yylineno = 1;
344 extern char *yytext;
345 #define yytext_ptr yytext
347 static yy_state_type yy_get_previous_state (void );
348 static yy_state_type yy_try_NUL_trans (yy_state_type current_state );
349 static int yy_get_next_buffer (void );
350 static void yy_fatal_error (yyconst char msg[] );
352 /* Done after the current pattern has been matched and before the
353 * corresponding action - sets up yytext.
355 #define YY_DO_BEFORE_ACTION \
356 (yytext_ptr) = yy_bp; \
357 yyleng = (size_t) (yy_cp - yy_bp); \
358 (yy_hold_char) = *yy_cp; \
359 *yy_cp = '\0'; \
360 (yy_c_buf_p) = yy_cp;
362 #define YY_NUM_RULES 16
363 #define YY_END_OF_BUFFER 17
364 /* This struct is not used in this scanner,
365 but its presence is necessary. */
366 struct yy_trans_info
368 flex_int32_t yy_verify;
369 flex_int32_t yy_nxt;
371 static yyconst flex_int16_t yy_accept[46] =
372 { 0,
373 0, 0, 17, 15, 11, 12, 13, 10, 9, 14,
374 14, 14, 14, 10, 9, 14, 3, 14, 14, 1,
375 7, 14, 14, 8, 14, 14, 14, 14, 14, 14,
376 14, 6, 14, 14, 5, 14, 14, 14, 14, 14,
377 14, 4, 14, 2, 0
380 static yyconst flex_int32_t yy_ec[256] =
381 { 0,
382 1, 1, 1, 1, 1, 1, 1, 1, 2, 3,
383 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
384 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
385 1, 2, 1, 4, 5, 1, 1, 1, 1, 1,
386 1, 1, 1, 1, 1, 1, 1, 6, 6, 6,
387 6, 6, 6, 6, 6, 6, 6, 1, 1, 1,
388 1, 1, 1, 1, 7, 7, 7, 7, 7, 7,
389 7, 7, 7, 7, 7, 7, 7, 7, 7, 7,
390 7, 7, 7, 7, 7, 7, 7, 7, 7, 7,
391 1, 1, 1, 1, 8, 1, 9, 10, 11, 12,
393 13, 14, 7, 7, 15, 7, 7, 16, 7, 17,
394 18, 19, 7, 20, 7, 21, 7, 7, 7, 22,
395 7, 7, 1, 1, 1, 1, 1, 1, 1, 1,
396 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
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, 1, 1, 1,
401 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
402 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
404 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
405 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
406 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
407 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
408 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
409 1, 1, 1, 1, 1
412 static yyconst flex_int32_t yy_meta[23] =
413 { 0,
414 1, 1, 2, 1, 1, 3, 3, 3, 3, 3,
415 3, 3, 3, 3, 3, 3, 3, 3, 3, 3,
416 3, 3
419 static yyconst flex_int16_t yy_base[48] =
420 { 0,
421 0, 0, 56, 57, 57, 57, 57, 0, 49, 0,
422 12, 13, 34, 0, 47, 0, 0, 40, 31, 0,
423 0, 38, 36, 0, 30, 34, 32, 25, 22, 28,
424 34, 0, 19, 13, 0, 22, 30, 26, 26, 18,
425 12, 0, 14, 0, 57, 34, 23
428 static yyconst flex_int16_t yy_def[48] =
429 { 0,
430 45, 1, 45, 45, 45, 45, 45, 46, 47, 47,
431 47, 47, 47, 46, 47, 47, 47, 47, 47, 47,
432 47, 47, 47, 47, 47, 47, 47, 47, 47, 47,
433 47, 47, 47, 47, 47, 47, 47, 47, 47, 47,
434 47, 47, 47, 47, 0, 45, 45
437 static yyconst flex_int16_t yy_nxt[80] =
438 { 0,
439 4, 5, 6, 7, 8, 9, 10, 10, 10, 10,
440 10, 10, 11, 10, 12, 10, 10, 10, 13, 10,
441 10, 10, 17, 36, 21, 16, 44, 43, 18, 22,
442 42, 19, 20, 37, 14, 41, 14, 40, 39, 38,
443 35, 34, 33, 32, 31, 30, 29, 28, 27, 26,
444 25, 24, 15, 23, 15, 45, 3, 45, 45, 45,
445 45, 45, 45, 45, 45, 45, 45, 45, 45, 45,
446 45, 45, 45, 45, 45, 45, 45, 45, 45
449 static yyconst flex_int16_t yy_chk[80] =
450 { 0,
451 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
452 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
453 1, 1, 11, 34, 12, 47, 43, 41, 11, 12,
454 40, 11, 11, 34, 46, 39, 46, 38, 37, 36,
455 33, 31, 30, 29, 28, 27, 26, 25, 23, 22,
456 19, 18, 15, 13, 9, 3, 45, 45, 45, 45,
457 45, 45, 45, 45, 45, 45, 45, 45, 45, 45,
458 45, 45, 45, 45, 45, 45, 45, 45, 45
461 static yy_state_type yy_last_accepting_state;
462 static char *yy_last_accepting_cpos;
464 extern int yy_flex_debug;
465 int yy_flex_debug = 0;
467 /* The intent behind this definition is that it'll catch
468 * any uses of REJECT which flex missed.
470 #define REJECT reject_used_but_not_detected
471 #define yymore() yymore_used_but_not_detected
472 #define YY_MORE_ADJ 0
473 #define YY_RESTORE_YY_MORE_OFFSET
474 char *yytext;
475 #line 1 "lex.l"
476 #line 2 "lex.l"
478 * Copyright (c) 1998 - 2000 Kungliga Tekniska Högskolan
479 * (Royal Institute of Technology, Stockholm, Sweden).
480 * All rights reserved.
482 * Redistribution and use in source and binary forms, with or without
483 * modification, are permitted provided that the following conditions
484 * are met:
486 * 1. Redistributions of source code must retain the above copyright
487 * notice, this list of conditions and the following disclaimer.
489 * 2. Redistributions in binary form must reproduce the above copyright
490 * notice, this list of conditions and the following disclaimer in the
491 * documentation and/or other materials provided with the distribution.
493 * 3. Neither the name of the Institute nor the names of its contributors
494 * may be used to endorse or promote products derived from this software
495 * without specific prior written permission.
497 * THIS SOFTWARE IS PROVIDED BY THE INSTITUTE AND CONTRIBUTORS ``AS IS'' AND
498 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
499 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
500 * ARE DISCLAIMED. IN NO EVENT SHALL THE INSTITUTE OR CONTRIBUTORS BE LIABLE
501 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
502 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
503 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
504 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
505 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
506 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
507 * SUCH DAMAGE.
511 * This is to handle the definition of this symbol in some AIX
512 * headers, which will conflict with the definition that lex will
513 * generate for it. It's only a problem for AIX lex.
516 #undef ECHO
518 #include "compile_et.h"
519 #include "parse.h"
520 #include "lex.h"
522 static unsigned lineno = 1;
523 static int getstring(void);
525 #define YY_NO_UNPUT
527 #undef ECHO
529 #line 530 "lex.c"
531 #define INITIAL 0
533 #ifndef YY_NO_UNISTD_H
534 /* Special case for "unistd.h", since it is non-ANSI. We include it way
535 * down here because we want the user's section 1 to have been scanned first.
536 * The user has a chance to override it with an option.
538 #include <unistd.h>
539 #endif
541 #ifndef YY_EXTRA_TYPE
542 #define YY_EXTRA_TYPE void *
543 #endif
545 static int yy_init_globals (void );
547 /* Accessor methods to globals.
548 These are made visible to non-reentrant scanners for convenience. */
550 int yylex_destroy (void );
552 int yyget_debug (void );
554 void yyset_debug (int debug_flag );
556 YY_EXTRA_TYPE yyget_extra (void );
558 void yyset_extra (YY_EXTRA_TYPE user_defined );
560 FILE *yyget_in (void );
562 void yyset_in (FILE * in_str );
564 FILE *yyget_out (void );
566 void yyset_out (FILE * out_str );
568 int yyget_leng (void );
570 char *yyget_text (void );
572 int yyget_lineno (void );
574 void yyset_lineno (int line_number );
576 /* Macros after this point can all be overridden by user definitions in
577 * section 1.
580 #ifndef YY_SKIP_YYWRAP
581 #ifdef __cplusplus
582 extern "C" int yywrap (void );
583 #else
584 extern int yywrap (void );
585 #endif
586 #endif
588 static void yyunput (int c,char *buf_ptr );
590 #ifndef yytext_ptr
591 static void yy_flex_strncpy (char *,yyconst char *,int );
592 #endif
594 #ifdef YY_NEED_STRLEN
595 static int yy_flex_strlen (yyconst char * );
596 #endif
598 #ifndef YY_NO_INPUT
600 #ifdef __cplusplus
601 static int yyinput (void );
602 #else
603 static int input (void );
604 #endif
606 #endif
608 /* Amount of stuff to slurp up with each read. */
609 #ifndef YY_READ_BUF_SIZE
610 #define YY_READ_BUF_SIZE 8192
611 #endif
613 /* Copy whatever the last rule matched to the standard output. */
614 #ifndef ECHO
615 /* This used to be an fputs(), but since the string might contain NUL's,
616 * we now use fwrite().
618 #define ECHO fwrite( yytext, yyleng, 1, yyout )
619 #endif
621 /* Gets input and stuffs it into "buf". number of characters read, or YY_NULL,
622 * is returned in "result".
624 #ifndef YY_INPUT
625 #define YY_INPUT(buf,result,max_size) \
626 if ( YY_CURRENT_BUFFER_LVALUE->yy_is_interactive ) \
628 int c = '*'; \
629 unsigned n; \
630 for ( n = 0; n < max_size && \
631 (c = getc( yyin )) != EOF && c != '\n'; ++n ) \
632 buf[n] = (char) c; \
633 if ( c == '\n' ) \
634 buf[n++] = (char) c; \
635 if ( c == EOF && ferror( yyin ) ) \
636 YY_FATAL_ERROR( "input in flex scanner failed" ); \
637 result = n; \
639 else \
641 errno=0; \
642 while ( (result = fread(buf, 1, max_size, yyin))==0 && ferror(yyin)) \
644 if( errno != EINTR) \
646 YY_FATAL_ERROR( "input in flex scanner failed" ); \
647 break; \
649 errno=0; \
650 clearerr(yyin); \
655 #endif
657 /* No semi-colon after return; correct usage is to write "yyterminate();" -
658 * we don't want an extra ';' after the "return" because that will cause
659 * some compilers to complain about unreachable statements.
661 #ifndef yyterminate
662 #define yyterminate() return YY_NULL
663 #endif
665 /* Number of entries by which start-condition stack grows. */
666 #ifndef YY_START_STACK_INCR
667 #define YY_START_STACK_INCR 25
668 #endif
670 /* Report a fatal error. */
671 #ifndef YY_FATAL_ERROR
672 #define YY_FATAL_ERROR(msg) yy_fatal_error( msg )
673 #endif
675 /* end tables serialization structures and prototypes */
677 /* Default declaration of generated scanner - a define so the user can
678 * easily add parameters.
680 #ifndef YY_DECL
681 #define YY_DECL_IS_OURS 1
683 extern int yylex (void);
685 #define YY_DECL int yylex (void)
686 #endif /* !YY_DECL */
688 /* Code executed at the beginning of each rule, after yytext and yyleng
689 * have been set up.
691 #ifndef YY_USER_ACTION
692 #define YY_USER_ACTION
693 #endif
695 /* Code executed at the end of each rule. */
696 #ifndef YY_BREAK
697 #define YY_BREAK break;
698 #endif
700 #define YY_RULE_SETUP \
701 YY_USER_ACTION
703 /** The main scanner function which does all the work.
705 YY_DECL
707 register yy_state_type yy_current_state;
708 register char *yy_cp, *yy_bp;
709 register int yy_act;
711 #line 57 "lex.l"
713 #line 714 "lex.c"
715 if ( !(yy_init) )
717 (yy_init) = 1;
719 #ifdef YY_USER_INIT
720 YY_USER_INIT;
721 #endif
723 if ( ! (yy_start) )
724 (yy_start) = 1; /* first start state */
726 if ( ! yyin )
727 yyin = stdin;
729 if ( ! yyout )
730 yyout = stdout;
732 if ( ! YY_CURRENT_BUFFER ) {
733 yyensure_buffer_stack ();
734 YY_CURRENT_BUFFER_LVALUE =
735 yy_create_buffer(yyin,YY_BUF_SIZE );
738 yy_load_buffer_state( );
741 while ( 1 ) /* loops until end-of-file is reached */
743 yy_cp = (yy_c_buf_p);
745 /* Support of yytext. */
746 *yy_cp = (yy_hold_char);
748 /* yy_bp points to the position in yy_ch_buf of the start of
749 * the current run.
751 yy_bp = yy_cp;
753 yy_current_state = (yy_start);
754 yy_match:
757 register YY_CHAR yy_c = yy_ec[YY_SC_TO_UI(*yy_cp)];
758 if ( yy_accept[yy_current_state] )
760 (yy_last_accepting_state) = yy_current_state;
761 (yy_last_accepting_cpos) = yy_cp;
763 while ( yy_chk[yy_base[yy_current_state] + yy_c] != yy_current_state )
765 yy_current_state = (int) yy_def[yy_current_state];
766 if ( yy_current_state >= 46 )
767 yy_c = yy_meta[(unsigned int) yy_c];
769 yy_current_state = yy_nxt[yy_base[yy_current_state] + (unsigned int) yy_c];
770 ++yy_cp;
772 while ( yy_base[yy_current_state] != 57 );
774 yy_find_action:
775 yy_act = yy_accept[yy_current_state];
776 if ( yy_act == 0 )
777 { /* have to back up */
778 yy_cp = (yy_last_accepting_cpos);
779 yy_current_state = (yy_last_accepting_state);
780 yy_act = yy_accept[yy_current_state];
783 YY_DO_BEFORE_ACTION;
785 do_action: /* This label is used only to access EOF actions. */
787 switch ( yy_act )
788 { /* beginning of action switch */
789 case 0: /* must back up */
790 /* undo the effects of YY_DO_BEFORE_ACTION */
791 *yy_cp = (yy_hold_char);
792 yy_cp = (yy_last_accepting_cpos);
793 yy_current_state = (yy_last_accepting_state);
794 goto yy_find_action;
796 case 1:
797 YY_RULE_SETUP
798 #line 58 "lex.l"
799 { return ET; }
800 YY_BREAK
801 case 2:
802 YY_RULE_SETUP
803 #line 59 "lex.l"
804 { return ET; }
805 YY_BREAK
806 case 3:
807 YY_RULE_SETUP
808 #line 60 "lex.l"
809 { return EC; }
810 YY_BREAK
811 case 4:
812 YY_RULE_SETUP
813 #line 61 "lex.l"
814 { return EC; }
815 YY_BREAK
816 case 5:
817 YY_RULE_SETUP
818 #line 62 "lex.l"
819 { return PREFIX; }
820 YY_BREAK
821 case 6:
822 YY_RULE_SETUP
823 #line 63 "lex.l"
824 { return INDEX; }
825 YY_BREAK
826 case 7:
827 YY_RULE_SETUP
828 #line 64 "lex.l"
829 { return ID; }
830 YY_BREAK
831 case 8:
832 YY_RULE_SETUP
833 #line 65 "lex.l"
834 { return END; }
835 YY_BREAK
836 case 9:
837 YY_RULE_SETUP
838 #line 66 "lex.l"
839 { yylval.number = atoi(yytext); return NUMBER; }
840 YY_BREAK
841 case 10:
842 YY_RULE_SETUP
843 #line 67 "lex.l"
845 YY_BREAK
846 case 11:
847 YY_RULE_SETUP
848 #line 68 "lex.l"
850 YY_BREAK
851 case 12:
852 /* rule 12 can match eol */
853 YY_RULE_SETUP
854 #line 69 "lex.l"
855 { lineno++; }
856 YY_BREAK
857 case 13:
858 YY_RULE_SETUP
859 #line 70 "lex.l"
860 { return getstring(); }
861 YY_BREAK
862 case 14:
863 YY_RULE_SETUP
864 #line 71 "lex.l"
865 { yylval.string = strdup(yytext); return STRING; }
866 YY_BREAK
867 case 15:
868 YY_RULE_SETUP
869 #line 72 "lex.l"
870 { return *yytext; }
871 YY_BREAK
872 case 16:
873 YY_RULE_SETUP
874 #line 73 "lex.l"
875 ECHO;
876 YY_BREAK
877 #line 878 "lex.c"
878 case YY_STATE_EOF(INITIAL):
879 yyterminate();
881 case YY_END_OF_BUFFER:
883 /* Amount of text matched not including the EOB char. */
884 int yy_amount_of_matched_text = (int) (yy_cp - (yytext_ptr)) - 1;
886 /* Undo the effects of YY_DO_BEFORE_ACTION. */
887 *yy_cp = (yy_hold_char);
888 YY_RESTORE_YY_MORE_OFFSET
890 if ( YY_CURRENT_BUFFER_LVALUE->yy_buffer_status == YY_BUFFER_NEW )
892 /* We're scanning a new file or input source. It's
893 * possible that this happened because the user
894 * just pointed yyin at a new source and called
895 * yylex(). If so, then we have to assure
896 * consistency between YY_CURRENT_BUFFER and our
897 * globals. Here is the right place to do so, because
898 * this is the first action (other than possibly a
899 * back-up) that will match for the new input source.
901 (yy_n_chars) = YY_CURRENT_BUFFER_LVALUE->yy_n_chars;
902 YY_CURRENT_BUFFER_LVALUE->yy_input_file = yyin;
903 YY_CURRENT_BUFFER_LVALUE->yy_buffer_status = YY_BUFFER_NORMAL;
906 /* Note that here we test for yy_c_buf_p "<=" to the position
907 * of the first EOB in the buffer, since yy_c_buf_p will
908 * already have been incremented past the NUL character
909 * (since all states make transitions on EOB to the
910 * end-of-buffer state). Contrast this with the test
911 * in input().
913 if ( (yy_c_buf_p) <= &YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[(yy_n_chars)] )
914 { /* This was really a NUL. */
915 yy_state_type yy_next_state;
917 (yy_c_buf_p) = (yytext_ptr) + yy_amount_of_matched_text;
919 yy_current_state = yy_get_previous_state( );
921 /* Okay, we're now positioned to make the NUL
922 * transition. We couldn't have
923 * yy_get_previous_state() go ahead and do it
924 * for us because it doesn't know how to deal
925 * with the possibility of jamming (and we don't
926 * want to build jamming into it because then it
927 * will run more slowly).
930 yy_next_state = yy_try_NUL_trans( yy_current_state );
932 yy_bp = (yytext_ptr) + YY_MORE_ADJ;
934 if ( yy_next_state )
936 /* Consume the NUL. */
937 yy_cp = ++(yy_c_buf_p);
938 yy_current_state = yy_next_state;
939 goto yy_match;
942 else
944 yy_cp = (yy_c_buf_p);
945 goto yy_find_action;
949 else switch ( yy_get_next_buffer( ) )
951 case EOB_ACT_END_OF_FILE:
953 (yy_did_buffer_switch_on_eof) = 0;
955 if ( yywrap( ) )
957 /* Note: because we've taken care in
958 * yy_get_next_buffer() to have set up
959 * yytext, we can now set up
960 * yy_c_buf_p so that if some total
961 * hoser (like flex itself) wants to
962 * call the scanner after we return the
963 * YY_NULL, it'll still work - another
964 * YY_NULL will get returned.
966 (yy_c_buf_p) = (yytext_ptr) + YY_MORE_ADJ;
968 yy_act = YY_STATE_EOF(YY_START);
969 goto do_action;
972 else
974 if ( ! (yy_did_buffer_switch_on_eof) )
975 YY_NEW_FILE;
977 break;
980 case EOB_ACT_CONTINUE_SCAN:
981 (yy_c_buf_p) =
982 (yytext_ptr) + yy_amount_of_matched_text;
984 yy_current_state = yy_get_previous_state( );
986 yy_cp = (yy_c_buf_p);
987 yy_bp = (yytext_ptr) + YY_MORE_ADJ;
988 goto yy_match;
990 case EOB_ACT_LAST_MATCH:
991 (yy_c_buf_p) =
992 &YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[(yy_n_chars)];
994 yy_current_state = yy_get_previous_state( );
996 yy_cp = (yy_c_buf_p);
997 yy_bp = (yytext_ptr) + YY_MORE_ADJ;
998 goto yy_find_action;
1000 break;
1003 default:
1004 YY_FATAL_ERROR(
1005 "fatal flex scanner internal error--no action found" );
1006 } /* end of action switch */
1007 } /* end of scanning one token */
1008 } /* end of yylex */
1010 /* yy_get_next_buffer - try to read in a new buffer
1012 * Returns a code representing an action:
1013 * EOB_ACT_LAST_MATCH -
1014 * EOB_ACT_CONTINUE_SCAN - continue scanning from current position
1015 * EOB_ACT_END_OF_FILE - end of file
1017 static int yy_get_next_buffer (void)
1019 register char *dest = YY_CURRENT_BUFFER_LVALUE->yy_ch_buf;
1020 register char *source = (yytext_ptr);
1021 register int number_to_move, i;
1022 int ret_val;
1024 if ( (yy_c_buf_p) > &YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[(yy_n_chars) + 1] )
1025 YY_FATAL_ERROR(
1026 "fatal flex scanner internal error--end of buffer missed" );
1028 if ( YY_CURRENT_BUFFER_LVALUE->yy_fill_buffer == 0 )
1029 { /* Don't try to fill the buffer, so this is an EOF. */
1030 if ( (yy_c_buf_p) - (yytext_ptr) - YY_MORE_ADJ == 1 )
1032 /* We matched a single character, the EOB, so
1033 * treat this as a final EOF.
1035 return EOB_ACT_END_OF_FILE;
1038 else
1040 /* We matched some text prior to the EOB, first
1041 * process it.
1043 return EOB_ACT_LAST_MATCH;
1047 /* Try to read more data. */
1049 /* First move last chars to start of buffer. */
1050 number_to_move = (int) ((yy_c_buf_p) - (yytext_ptr)) - 1;
1052 for ( i = 0; i < number_to_move; ++i )
1053 *(dest++) = *(source++);
1055 if ( YY_CURRENT_BUFFER_LVALUE->yy_buffer_status == YY_BUFFER_EOF_PENDING )
1056 /* don't do the read, it's not guaranteed to return an EOF,
1057 * just force an EOF
1059 YY_CURRENT_BUFFER_LVALUE->yy_n_chars = (yy_n_chars) = 0;
1061 else
1063 int num_to_read =
1064 YY_CURRENT_BUFFER_LVALUE->yy_buf_size - number_to_move - 1;
1066 while ( num_to_read <= 0 )
1067 { /* Not enough room in the buffer - grow it. */
1069 /* just a shorter name for the current buffer */
1070 YY_BUFFER_STATE b = YY_CURRENT_BUFFER;
1072 int yy_c_buf_p_offset =
1073 (int) ((yy_c_buf_p) - b->yy_ch_buf);
1075 if ( b->yy_is_our_buffer )
1077 int new_size = b->yy_buf_size * 2;
1079 if ( new_size <= 0 )
1080 b->yy_buf_size += b->yy_buf_size / 8;
1081 else
1082 b->yy_buf_size *= 2;
1084 b->yy_ch_buf = (char *)
1085 /* Include room in for 2 EOB chars. */
1086 yyrealloc((void *) b->yy_ch_buf,b->yy_buf_size + 2 );
1088 else
1089 /* Can't grow it, we don't own it. */
1090 b->yy_ch_buf = 0;
1092 if ( ! b->yy_ch_buf )
1093 YY_FATAL_ERROR(
1094 "fatal error - scanner input buffer overflow" );
1096 (yy_c_buf_p) = &b->yy_ch_buf[yy_c_buf_p_offset];
1098 num_to_read = YY_CURRENT_BUFFER_LVALUE->yy_buf_size -
1099 number_to_move - 1;
1103 if ( num_to_read > YY_READ_BUF_SIZE )
1104 num_to_read = YY_READ_BUF_SIZE;
1106 /* Read in more data. */
1107 YY_INPUT( (&YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[number_to_move]),
1108 (yy_n_chars), (size_t) num_to_read );
1110 YY_CURRENT_BUFFER_LVALUE->yy_n_chars = (yy_n_chars);
1113 if ( (yy_n_chars) == 0 )
1115 if ( number_to_move == YY_MORE_ADJ )
1117 ret_val = EOB_ACT_END_OF_FILE;
1118 yyrestart(yyin );
1121 else
1123 ret_val = EOB_ACT_LAST_MATCH;
1124 YY_CURRENT_BUFFER_LVALUE->yy_buffer_status =
1125 YY_BUFFER_EOF_PENDING;
1129 else
1130 ret_val = EOB_ACT_CONTINUE_SCAN;
1132 if ((yy_size_t) ((yy_n_chars) + number_to_move) > YY_CURRENT_BUFFER_LVALUE->yy_buf_size) {
1133 /* Extend the array by 50%, plus the number we really need. */
1134 yy_size_t new_size = (yy_n_chars) + number_to_move + ((yy_n_chars) >> 1);
1135 YY_CURRENT_BUFFER_LVALUE->yy_ch_buf = (char *) yyrealloc((void *) YY_CURRENT_BUFFER_LVALUE->yy_ch_buf,new_size );
1136 if ( ! YY_CURRENT_BUFFER_LVALUE->yy_ch_buf )
1137 YY_FATAL_ERROR( "out of dynamic memory in yy_get_next_buffer()" );
1140 (yy_n_chars) += number_to_move;
1141 YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[(yy_n_chars)] = YY_END_OF_BUFFER_CHAR;
1142 YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[(yy_n_chars) + 1] = YY_END_OF_BUFFER_CHAR;
1144 (yytext_ptr) = &YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[0];
1146 return ret_val;
1149 /* yy_get_previous_state - get the state just before the EOB char was reached */
1151 static yy_state_type yy_get_previous_state (void)
1153 register yy_state_type yy_current_state;
1154 register char *yy_cp;
1156 yy_current_state = (yy_start);
1158 for ( yy_cp = (yytext_ptr) + YY_MORE_ADJ; yy_cp < (yy_c_buf_p); ++yy_cp )
1160 register YY_CHAR yy_c = (*yy_cp ? yy_ec[YY_SC_TO_UI(*yy_cp)] : 1);
1161 if ( yy_accept[yy_current_state] )
1163 (yy_last_accepting_state) = yy_current_state;
1164 (yy_last_accepting_cpos) = yy_cp;
1166 while ( yy_chk[yy_base[yy_current_state] + yy_c] != yy_current_state )
1168 yy_current_state = (int) yy_def[yy_current_state];
1169 if ( yy_current_state >= 46 )
1170 yy_c = yy_meta[(unsigned int) yy_c];
1172 yy_current_state = yy_nxt[yy_base[yy_current_state] + (unsigned int) yy_c];
1175 return yy_current_state;
1178 /* yy_try_NUL_trans - try to make a transition on the NUL character
1180 * synopsis
1181 * next_state = yy_try_NUL_trans( current_state );
1183 static yy_state_type yy_try_NUL_trans (yy_state_type yy_current_state )
1185 register int yy_is_jam;
1186 register char *yy_cp = (yy_c_buf_p);
1188 register YY_CHAR yy_c = 1;
1189 if ( yy_accept[yy_current_state] )
1191 (yy_last_accepting_state) = yy_current_state;
1192 (yy_last_accepting_cpos) = yy_cp;
1194 while ( yy_chk[yy_base[yy_current_state] + yy_c] != yy_current_state )
1196 yy_current_state = (int) yy_def[yy_current_state];
1197 if ( yy_current_state >= 46 )
1198 yy_c = yy_meta[(unsigned int) yy_c];
1200 yy_current_state = yy_nxt[yy_base[yy_current_state] + (unsigned int) yy_c];
1201 yy_is_jam = (yy_current_state == 45);
1203 return yy_is_jam ? 0 : yy_current_state;
1206 static void yyunput (int c, register char * yy_bp )
1208 register char *yy_cp;
1210 yy_cp = (yy_c_buf_p);
1212 /* undo effects of setting up yytext */
1213 *yy_cp = (yy_hold_char);
1215 if ( yy_cp < YY_CURRENT_BUFFER_LVALUE->yy_ch_buf + 2 )
1216 { /* need to shift things up to make room */
1217 /* +2 for EOB chars. */
1218 register int number_to_move = (yy_n_chars) + 2;
1219 register char *dest = &YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[
1220 YY_CURRENT_BUFFER_LVALUE->yy_buf_size + 2];
1221 register char *source =
1222 &YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[number_to_move];
1224 while ( source > YY_CURRENT_BUFFER_LVALUE->yy_ch_buf )
1225 *--dest = *--source;
1227 yy_cp += (int) (dest - source);
1228 yy_bp += (int) (dest - source);
1229 YY_CURRENT_BUFFER_LVALUE->yy_n_chars =
1230 (yy_n_chars) = YY_CURRENT_BUFFER_LVALUE->yy_buf_size;
1232 if ( yy_cp < YY_CURRENT_BUFFER_LVALUE->yy_ch_buf + 2 )
1233 YY_FATAL_ERROR( "flex scanner push-back overflow" );
1236 *--yy_cp = (char) c;
1238 (yytext_ptr) = yy_bp;
1239 (yy_hold_char) = *yy_cp;
1240 (yy_c_buf_p) = yy_cp;
1243 #ifndef YY_NO_INPUT
1244 #ifdef __cplusplus
1245 static int yyinput (void)
1246 #else
1247 static int input (void)
1248 #endif
1251 int c;
1253 *(yy_c_buf_p) = (yy_hold_char);
1255 if ( *(yy_c_buf_p) == YY_END_OF_BUFFER_CHAR )
1257 /* yy_c_buf_p now points to the character we want to return.
1258 * If this occurs *before* the EOB characters, then it's a
1259 * valid NUL; if not, then we've hit the end of the buffer.
1261 if ( (yy_c_buf_p) < &YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[(yy_n_chars)] )
1262 /* This was really a NUL. */
1263 *(yy_c_buf_p) = '\0';
1265 else
1266 { /* need more input */
1267 int offset = (yy_c_buf_p) - (yytext_ptr);
1268 ++(yy_c_buf_p);
1270 switch ( yy_get_next_buffer( ) )
1272 case EOB_ACT_LAST_MATCH:
1273 /* This happens because yy_g_n_b()
1274 * sees that we've accumulated a
1275 * token and flags that we need to
1276 * try matching the token before
1277 * proceeding. But for input(),
1278 * there's no matching to consider.
1279 * So convert the EOB_ACT_LAST_MATCH
1280 * to EOB_ACT_END_OF_FILE.
1283 /* Reset buffer status. */
1284 yyrestart(yyin );
1286 /*FALLTHROUGH*/
1288 case EOB_ACT_END_OF_FILE:
1290 if ( yywrap( ) )
1291 return EOF;
1293 if ( ! (yy_did_buffer_switch_on_eof) )
1294 YY_NEW_FILE;
1295 #ifdef __cplusplus
1296 return yyinput();
1297 #else
1298 return input();
1299 #endif
1302 case EOB_ACT_CONTINUE_SCAN:
1303 (yy_c_buf_p) = (yytext_ptr) + offset;
1304 break;
1309 c = *(unsigned char *) (yy_c_buf_p); /* cast for 8-bit char's */
1310 *(yy_c_buf_p) = '\0'; /* preserve yytext */
1311 (yy_hold_char) = *++(yy_c_buf_p);
1313 return c;
1315 #endif /* ifndef YY_NO_INPUT */
1317 /** Immediately switch to a different input stream.
1318 * @param input_file A readable stream.
1320 * @note This function does not reset the start condition to @c INITIAL .
1322 void yyrestart (FILE * input_file )
1325 if ( ! YY_CURRENT_BUFFER ){
1326 yyensure_buffer_stack ();
1327 YY_CURRENT_BUFFER_LVALUE =
1328 yy_create_buffer(yyin,YY_BUF_SIZE );
1331 yy_init_buffer(YY_CURRENT_BUFFER,input_file );
1332 yy_load_buffer_state( );
1335 /** Switch to a different input buffer.
1336 * @param new_buffer The new input buffer.
1339 void yy_switch_to_buffer (YY_BUFFER_STATE new_buffer )
1342 /* TODO. We should be able to replace this entire function body
1343 * with
1344 * yypop_buffer_state();
1345 * yypush_buffer_state(new_buffer);
1347 yyensure_buffer_stack ();
1348 if ( YY_CURRENT_BUFFER == new_buffer )
1349 return;
1351 if ( YY_CURRENT_BUFFER )
1353 /* Flush out information for old buffer. */
1354 *(yy_c_buf_p) = (yy_hold_char);
1355 YY_CURRENT_BUFFER_LVALUE->yy_buf_pos = (yy_c_buf_p);
1356 YY_CURRENT_BUFFER_LVALUE->yy_n_chars = (yy_n_chars);
1359 YY_CURRENT_BUFFER_LVALUE = new_buffer;
1360 yy_load_buffer_state( );
1362 /* We don't actually know whether we did this switch during
1363 * EOF (yywrap()) processing, but the only time this flag
1364 * is looked at is after yywrap() is called, so it's safe
1365 * to go ahead and always set it.
1367 (yy_did_buffer_switch_on_eof) = 1;
1370 static void yy_load_buffer_state (void)
1372 (yy_n_chars) = YY_CURRENT_BUFFER_LVALUE->yy_n_chars;
1373 (yytext_ptr) = (yy_c_buf_p) = YY_CURRENT_BUFFER_LVALUE->yy_buf_pos;
1374 yyin = YY_CURRENT_BUFFER_LVALUE->yy_input_file;
1375 (yy_hold_char) = *(yy_c_buf_p);
1378 /** Allocate and initialize an input buffer state.
1379 * @param file A readable stream.
1380 * @param size The character buffer size in bytes. When in doubt, use @c YY_BUF_SIZE.
1382 * @return the allocated buffer state.
1384 YY_BUFFER_STATE yy_create_buffer (FILE * file, int size )
1386 YY_BUFFER_STATE b;
1388 b = (YY_BUFFER_STATE) yyalloc(sizeof( struct yy_buffer_state ) );
1389 if ( ! b )
1390 YY_FATAL_ERROR( "out of dynamic memory in yy_create_buffer()" );
1392 b->yy_buf_size = size;
1394 /* yy_ch_buf has to be 2 characters longer than the size given because
1395 * we need to put in 2 end-of-buffer characters.
1397 b->yy_ch_buf = (char *) yyalloc(b->yy_buf_size + 2 );
1398 if ( ! b->yy_ch_buf )
1399 YY_FATAL_ERROR( "out of dynamic memory in yy_create_buffer()" );
1401 b->yy_is_our_buffer = 1;
1403 yy_init_buffer(b,file );
1405 return b;
1408 /** Destroy the buffer.
1409 * @param b a buffer created with yy_create_buffer()
1412 void yy_delete_buffer (YY_BUFFER_STATE b )
1415 if ( ! b )
1416 return;
1418 if ( b == YY_CURRENT_BUFFER ) /* Not sure if we should pop here. */
1419 YY_CURRENT_BUFFER_LVALUE = (YY_BUFFER_STATE) 0;
1421 if ( b->yy_is_our_buffer )
1422 yyfree((void *) b->yy_ch_buf );
1424 yyfree((void *) b );
1427 #ifndef __cplusplus
1428 extern int isatty (int );
1429 #endif /* __cplusplus */
1431 /* Initializes or reinitializes a buffer.
1432 * This function is sometimes called more than once on the same buffer,
1433 * such as during a yyrestart() or at EOF.
1435 static void yy_init_buffer (YY_BUFFER_STATE b, FILE * file )
1438 int oerrno = errno;
1440 yy_flush_buffer(b );
1442 b->yy_input_file = file;
1443 b->yy_fill_buffer = 1;
1445 /* If b is the current buffer, then yy_init_buffer was _probably_
1446 * called from yyrestart() or through yy_get_next_buffer.
1447 * In that case, we don't want to reset the lineno or column.
1449 if (b != YY_CURRENT_BUFFER){
1450 b->yy_bs_lineno = 1;
1451 b->yy_bs_column = 0;
1454 b->yy_is_interactive = file ? (isatty( fileno(file) ) > 0) : 0;
1456 errno = oerrno;
1459 /** Discard all buffered characters. On the next scan, YY_INPUT will be called.
1460 * @param b the buffer state to be flushed, usually @c YY_CURRENT_BUFFER.
1463 void yy_flush_buffer (YY_BUFFER_STATE b )
1465 if ( ! b )
1466 return;
1468 b->yy_n_chars = 0;
1470 /* We always need two end-of-buffer characters. The first causes
1471 * a transition to the end-of-buffer state. The second causes
1472 * a jam in that state.
1474 b->yy_ch_buf[0] = YY_END_OF_BUFFER_CHAR;
1475 b->yy_ch_buf[1] = YY_END_OF_BUFFER_CHAR;
1477 b->yy_buf_pos = &b->yy_ch_buf[0];
1479 b->yy_at_bol = 1;
1480 b->yy_buffer_status = YY_BUFFER_NEW;
1482 if ( b == YY_CURRENT_BUFFER )
1483 yy_load_buffer_state( );
1486 /** Pushes the new state onto the stack. The new state becomes
1487 * the current state. This function will allocate the stack
1488 * if necessary.
1489 * @param new_buffer The new state.
1492 void yypush_buffer_state (YY_BUFFER_STATE new_buffer )
1494 if (new_buffer == NULL)
1495 return;
1497 yyensure_buffer_stack();
1499 /* This block is copied from yy_switch_to_buffer. */
1500 if ( YY_CURRENT_BUFFER )
1502 /* Flush out information for old buffer. */
1503 *(yy_c_buf_p) = (yy_hold_char);
1504 YY_CURRENT_BUFFER_LVALUE->yy_buf_pos = (yy_c_buf_p);
1505 YY_CURRENT_BUFFER_LVALUE->yy_n_chars = (yy_n_chars);
1508 /* Only push if top exists. Otherwise, replace top. */
1509 if (YY_CURRENT_BUFFER)
1510 (yy_buffer_stack_top)++;
1511 YY_CURRENT_BUFFER_LVALUE = new_buffer;
1513 /* copied from yy_switch_to_buffer. */
1514 yy_load_buffer_state( );
1515 (yy_did_buffer_switch_on_eof) = 1;
1518 /** Removes and deletes the top of the stack, if present.
1519 * The next element becomes the new top.
1522 void yypop_buffer_state (void)
1524 if (!YY_CURRENT_BUFFER)
1525 return;
1527 yy_delete_buffer(YY_CURRENT_BUFFER );
1528 YY_CURRENT_BUFFER_LVALUE = NULL;
1529 if ((yy_buffer_stack_top) > 0)
1530 --(yy_buffer_stack_top);
1532 if (YY_CURRENT_BUFFER) {
1533 yy_load_buffer_state( );
1534 (yy_did_buffer_switch_on_eof) = 1;
1538 /* Allocates the stack if it does not exist.
1539 * Guarantees space for at least one push.
1541 static void yyensure_buffer_stack (void)
1543 int num_to_alloc;
1545 if (!(yy_buffer_stack)) {
1547 /* First allocation is just for 2 elements, since we don't know if this
1548 * scanner will even need a stack. We use 2 instead of 1 to avoid an
1549 * immediate realloc on the next call.
1551 num_to_alloc = 1;
1552 (yy_buffer_stack) = (struct yy_buffer_state**)yyalloc
1553 (num_to_alloc * sizeof(struct yy_buffer_state*)
1555 if ( ! (yy_buffer_stack) )
1556 YY_FATAL_ERROR( "out of dynamic memory in yyensure_buffer_stack()" );
1558 memset((yy_buffer_stack), 0, num_to_alloc * sizeof(struct yy_buffer_state*));
1560 (yy_buffer_stack_max) = num_to_alloc;
1561 (yy_buffer_stack_top) = 0;
1562 return;
1565 if ((yy_buffer_stack_top) >= ((yy_buffer_stack_max)) - 1){
1567 /* Increase the buffer to prepare for a possible push. */
1568 int grow_size = 8 /* arbitrary grow size */;
1570 num_to_alloc = (yy_buffer_stack_max) + grow_size;
1571 (yy_buffer_stack) = (struct yy_buffer_state**)yyrealloc
1572 ((yy_buffer_stack),
1573 num_to_alloc * sizeof(struct yy_buffer_state*)
1575 if ( ! (yy_buffer_stack) )
1576 YY_FATAL_ERROR( "out of dynamic memory in yyensure_buffer_stack()" );
1578 /* zero only the new slots.*/
1579 memset((yy_buffer_stack) + (yy_buffer_stack_max), 0, grow_size * sizeof(struct yy_buffer_state*));
1580 (yy_buffer_stack_max) = num_to_alloc;
1584 /** Setup the input buffer state to scan directly from a user-specified character buffer.
1585 * @param base the character buffer
1586 * @param size the size in bytes of the character buffer
1588 * @return the newly allocated buffer state object.
1590 YY_BUFFER_STATE yy_scan_buffer (char * base, yy_size_t size )
1592 YY_BUFFER_STATE b;
1594 if ( size < 2 ||
1595 base[size-2] != YY_END_OF_BUFFER_CHAR ||
1596 base[size-1] != YY_END_OF_BUFFER_CHAR )
1597 /* They forgot to leave room for the EOB's. */
1598 return 0;
1600 b = (YY_BUFFER_STATE) yyalloc(sizeof( struct yy_buffer_state ) );
1601 if ( ! b )
1602 YY_FATAL_ERROR( "out of dynamic memory in yy_scan_buffer()" );
1604 b->yy_buf_size = size - 2; /* "- 2" to take care of EOB's */
1605 b->yy_buf_pos = b->yy_ch_buf = base;
1606 b->yy_is_our_buffer = 0;
1607 b->yy_input_file = 0;
1608 b->yy_n_chars = b->yy_buf_size;
1609 b->yy_is_interactive = 0;
1610 b->yy_at_bol = 1;
1611 b->yy_fill_buffer = 0;
1612 b->yy_buffer_status = YY_BUFFER_NEW;
1614 yy_switch_to_buffer(b );
1616 return b;
1619 /** Setup the input buffer state to scan a string. The next call to yylex() will
1620 * scan from a @e copy of @a str.
1621 * @param yystr a NUL-terminated string to scan
1623 * @return the newly allocated buffer state object.
1624 * @note If you want to scan bytes that may contain NUL values, then use
1625 * yy_scan_bytes() instead.
1627 YY_BUFFER_STATE yy_scan_string (yyconst char * yystr )
1630 return yy_scan_bytes(yystr,strlen(yystr) );
1633 /** Setup the input buffer state to scan the given bytes. The next call to yylex() will
1634 * scan from a @e copy of @a bytes.
1635 * @param bytes the byte buffer to scan
1636 * @param len the number of bytes in the buffer pointed to by @a bytes.
1638 * @return the newly allocated buffer state object.
1640 YY_BUFFER_STATE yy_scan_bytes (yyconst char * yybytes, int _yybytes_len )
1642 YY_BUFFER_STATE b;
1643 char *buf;
1644 yy_size_t n;
1645 int i;
1647 /* Get memory for full buffer, including space for trailing EOB's. */
1648 n = _yybytes_len + 2;
1649 buf = (char *) yyalloc(n );
1650 if ( ! buf )
1651 YY_FATAL_ERROR( "out of dynamic memory in yy_scan_bytes()" );
1653 for ( i = 0; i < _yybytes_len; ++i )
1654 buf[i] = yybytes[i];
1656 buf[_yybytes_len] = buf[_yybytes_len+1] = YY_END_OF_BUFFER_CHAR;
1658 b = yy_scan_buffer(buf,n );
1659 if ( ! b )
1660 YY_FATAL_ERROR( "bad buffer in yy_scan_bytes()" );
1662 /* It's okay to grow etc. this buffer, and we should throw it
1663 * away when we're done.
1665 b->yy_is_our_buffer = 1;
1667 return b;
1670 #ifndef YY_EXIT_FAILURE
1671 #define YY_EXIT_FAILURE 2
1672 #endif
1674 static void yy_fatal_error (yyconst char* msg )
1676 (void) fprintf( stderr, "%s\n", msg );
1677 exit( YY_EXIT_FAILURE );
1680 /* Redefine yyless() so it works in section 3 code. */
1682 #undef yyless
1683 #define yyless(n) \
1684 do \
1686 /* Undo effects of setting up yytext. */ \
1687 int yyless_macro_arg = (n); \
1688 YY_LESS_LINENO(yyless_macro_arg);\
1689 yytext[yyleng] = (yy_hold_char); \
1690 (yy_c_buf_p) = yytext + yyless_macro_arg; \
1691 (yy_hold_char) = *(yy_c_buf_p); \
1692 *(yy_c_buf_p) = '\0'; \
1693 yyleng = yyless_macro_arg; \
1695 while ( 0 )
1697 /* Accessor methods (get/set functions) to struct members. */
1699 /** Get the current line number.
1702 int yyget_lineno (void)
1705 return yylineno;
1708 /** Get the input stream.
1711 FILE *yyget_in (void)
1713 return yyin;
1716 /** Get the output stream.
1719 FILE *yyget_out (void)
1721 return yyout;
1724 /** Get the length of the current token.
1727 int yyget_leng (void)
1729 return yyleng;
1732 /** Get the current token.
1736 char *yyget_text (void)
1738 return yytext;
1741 /** Set the current line number.
1742 * @param line_number
1745 void yyset_lineno (int line_number )
1748 yylineno = line_number;
1751 /** Set the input stream. This does not discard the current
1752 * input buffer.
1753 * @param in_str A readable stream.
1755 * @see yy_switch_to_buffer
1757 void yyset_in (FILE * in_str )
1759 yyin = in_str ;
1762 void yyset_out (FILE * out_str )
1764 yyout = out_str ;
1767 int yyget_debug (void)
1769 return yy_flex_debug;
1772 void yyset_debug (int bdebug )
1774 yy_flex_debug = bdebug ;
1777 static int yy_init_globals (void)
1779 /* Initialization is the same as for the non-reentrant scanner.
1780 * This function is called from yylex_destroy(), so don't allocate here.
1783 (yy_buffer_stack) = 0;
1784 (yy_buffer_stack_top) = 0;
1785 (yy_buffer_stack_max) = 0;
1786 (yy_c_buf_p) = (char *) 0;
1787 (yy_init) = 0;
1788 (yy_start) = 0;
1790 /* Defined in main.c */
1791 #ifdef YY_STDINIT
1792 yyin = stdin;
1793 yyout = stdout;
1794 #else
1795 yyin = (FILE *) 0;
1796 yyout = (FILE *) 0;
1797 #endif
1799 /* For future reference: Set errno on error, since we are called by
1800 * yylex_init()
1802 return 0;
1805 /* yylex_destroy is for both reentrant and non-reentrant scanners. */
1806 int yylex_destroy (void)
1809 /* Pop the buffer stack, destroying each element. */
1810 while(YY_CURRENT_BUFFER){
1811 yy_delete_buffer(YY_CURRENT_BUFFER );
1812 YY_CURRENT_BUFFER_LVALUE = NULL;
1813 yypop_buffer_state();
1816 /* Destroy the stack itself. */
1817 yyfree((yy_buffer_stack) );
1818 (yy_buffer_stack) = NULL;
1820 /* Reset the globals. This is important in a non-reentrant scanner so the next time
1821 * yylex() is called, initialization will occur. */
1822 yy_init_globals( );
1824 return 0;
1828 * Internal utility routines.
1831 #ifndef yytext_ptr
1832 static void yy_flex_strncpy (char* s1, yyconst char * s2, int n )
1834 register int i;
1835 for ( i = 0; i < n; ++i )
1836 s1[i] = s2[i];
1838 #endif
1840 #ifdef YY_NEED_STRLEN
1841 static int yy_flex_strlen (yyconst char * s )
1843 register int n;
1844 for ( n = 0; s[n]; ++n )
1847 return n;
1849 #endif
1851 void *yyalloc (yy_size_t size )
1853 return (void *) malloc( size );
1856 void *yyrealloc (void * ptr, yy_size_t size )
1858 /* The cast to (char *) in the following accommodates both
1859 * implementations that use char* generic pointers, and those
1860 * that use void* generic pointers. It works with the latter
1861 * because both ANSI C and C++ allow castless assignment from
1862 * any pointer type to void*, and deal with argument conversions
1863 * as though doing an assignment.
1865 return (void *) realloc( (char *) ptr, size );
1868 void yyfree (void * ptr )
1870 free( (char *) ptr ); /* see yyrealloc() for (char *) cast */
1873 #define YYTABLES_NAME "yytables"
1875 #line 73 "lex.l"
1879 #ifndef yywrap /* XXX */
1881 yywrap ()
1883 return 1;
1885 #endif
1887 static int
1888 getstring(void)
1890 char x[128];
1891 int i = 0;
1892 int c;
1893 int quote = 0;
1894 while(i < sizeof(x) - 1 && (c = input()) != EOF){
1895 if(quote) {
1896 x[i++] = c;
1897 quote = 0;
1898 continue;
1900 if(c == '\n'){
1901 error_message("unterminated string");
1902 lineno++;
1903 break;
1905 if(c == '\\'){
1906 quote++;
1907 continue;
1909 if(c == '\"')
1910 break;
1911 x[i++] = c;
1913 x[i] = '\0';
1914 yylval.string = strdup(x);
1915 if (yylval.string == NULL)
1916 err(1, "malloc");
1917 return STRING;
1920 void
1921 error_message (const char *format, ...)
1923 va_list args;
1925 va_start (args, format);
1926 fprintf (stderr, "%s:%d:", filename, lineno);
1927 vfprintf (stderr, format, args);
1928 va_end (args);
1929 numerror++;