From 31f1753e4e57b99039bdabdf2e0e496d536d15c7 Mon Sep 17 00:00:00 2001 From: ccremers Date: Tue, 12 Sep 2006 16:17:49 +0000 Subject: [PATCH] - Added malloc wrappers for OSX builds. --- src/arachne.c | 2 + src/binding.c | 2 + src/list.c | 2 + src/scanner.c | 2295 ++++++++++++++++++++++++------------------------- 4 files changed, 1143 insertions(+), 1158 deletions(-) diff --git a/src/arachne.c b/src/arachne.c index f34165d..7ef9fdf 100644 --- a/src/arachne.c +++ b/src/arachne.c @@ -11,9 +11,11 @@ #include #include #include +#ifndef OSXHOST #ifdef DEBUG #include #endif +#endif #include "term.h" #include "termlist.h" diff --git a/src/binding.c b/src/binding.c index ba2197a..6196b60 100644 --- a/src/binding.c +++ b/src/binding.c @@ -14,7 +14,9 @@ #include "arachne.h" #include "switches.h" #include "depend.h" +#ifndef OSXHOST #include +#endif static System sys; //!< local storage of system pointer diff --git a/src/list.c b/src/list.c index 467622d..0a3d3f9 100644 --- a/src/list.c +++ b/src/list.c @@ -6,7 +6,9 @@ */ #include "list.h" +#ifndef OSXHOST #include +#endif #include //! Make a node diff --git a/src/scanner.c b/src/scanner.c index 1ca8c8e..df160fc 100644 --- a/src/scanner.c +++ b/src/scanner.c @@ -42,7 +42,7 @@ typedef uint32_t flex_uint32_t; typedef signed char flex_int8_t; typedef short int flex_int16_t; typedef int flex_int32_t; -typedef unsigned char flex_uint8_t; +typedef unsigned char flex_uint8_t; typedef unsigned short int flex_uint16_t; typedef unsigned int flex_uint32_t; #endif /* ! C99 */ @@ -83,14 +83,14 @@ typedef unsigned int flex_uint32_t; /* The "const" storage-class-modifier is valid. */ #define YY_USE_CONST -#else /* ! __cplusplus */ +#else /* ! __cplusplus */ #if __STDC__ #define YY_USE_CONST -#endif /* __STDC__ */ -#endif /* ! __cplusplus */ +#endif /* __STDC__ */ +#endif /* ! __cplusplus */ #ifdef YY_USE_CONST #define yyconst const @@ -154,14 +154,14 @@ extern FILE *yyin, *yyout; * a 5% performance hit in a non-yylineno scanner, because yy_act is * normally declared as a register variable-- so it is not worth it. */ -#define YY_LESS_LINENO(n) \ + #define YY_LESS_LINENO(n) \ do { \ int yyl;\ for ( yyl = n; yyl < yyleng; ++yyl )\ if ( yytext[yyl] == '\n' )\ --yylineno;\ }while(0) - + /* Return all but the first "n" matched characters back to the input stream. */ #define yyless(n) \ do \ @@ -191,72 +191,72 @@ typedef unsigned int yy_size_t; #ifndef YY_STRUCT_YY_BUFFER_STATE #define YY_STRUCT_YY_BUFFER_STATE struct yy_buffer_state -{ - FILE *yy_input_file; + { + FILE *yy_input_file; - char *yy_ch_buf; /* input buffer */ - char *yy_buf_pos; /* current position in input buffer */ + char *yy_ch_buf; /* input buffer */ + char *yy_buf_pos; /* current position in input buffer */ - /* Size of input buffer in bytes, not including room for EOB - * characters. - */ - yy_size_t yy_buf_size; + /* Size of input buffer in bytes, not including room for EOB + * characters. + */ + yy_size_t yy_buf_size; - /* Number of characters read into yy_ch_buf, not including EOB - * characters. - */ - int yy_n_chars; + /* Number of characters read into yy_ch_buf, not including EOB + * characters. + */ + int yy_n_chars; - /* Whether we "own" the buffer - i.e., we know we created it, - * and can realloc() it to grow it, and should free() it to - * delete it. - */ - int yy_is_our_buffer; + /* Whether we "own" the buffer - i.e., we know we created it, + * and can realloc() it to grow it, and should free() it to + * delete it. + */ + int yy_is_our_buffer; - /* Whether this is an "interactive" input source; if so, and - * if we're using stdio for input, then we want to use getc() - * instead of fread(), to make sure we stop fetching input after - * each newline. - */ - int yy_is_interactive; + /* Whether this is an "interactive" input source; if so, and + * if we're using stdio for input, then we want to use getc() + * instead of fread(), to make sure we stop fetching input after + * each newline. + */ + int yy_is_interactive; - /* Whether we're considered to be at the beginning of a line. - * If so, '^' rules will be active on the next match, otherwise - * not. - */ - int yy_at_bol; + /* Whether we're considered to be at the beginning of a line. + * If so, '^' rules will be active on the next match, otherwise + * not. + */ + int yy_at_bol; - int yy_bs_lineno; /**< The line count. */ - int yy_bs_column; /**< The column count. */ + int yy_bs_lineno; /**< The line count. */ + int yy_bs_column; /**< The column count. */ + + /* Whether to try to fill the input buffer when we reach the + * end of it. + */ + int yy_fill_buffer; - /* Whether to try to fill the input buffer when we reach the - * end of it. - */ - int yy_fill_buffer; - - int yy_buffer_status; + int yy_buffer_status; #define YY_BUFFER_NEW 0 #define YY_BUFFER_NORMAL 1 - /* When an EOF's been seen but there's still some text to process - * then we mark the buffer as YY_EOF_PENDING, to indicate that we - * shouldn't try reading from the input source any more. We might - * still have a bunch of tokens to match, though, because of - * possible backing-up. - * - * When we actually see the EOF, we change the status to "new" - * (via yyrestart()), so that the user can continue scanning by - * just pointing yyin at a new input file. - */ + /* When an EOF's been seen but there's still some text to process + * then we mark the buffer as YY_EOF_PENDING, to indicate that we + * shouldn't try reading from the input source any more. We might + * still have a bunch of tokens to match, though, because of + * possible backing-up. + * + * When we actually see the EOF, we change the status to "new" + * (via yyrestart()), so that the user can continue scanning by + * just pointing yyin at a new input file. + */ #define YY_BUFFER_EOF_PENDING 2 -}; + }; #endif /* !YY_STRUCT_YY_BUFFER_STATE */ /* Stack of input buffers. */ static size_t yy_buffer_stack_top = 0; /**< index of top of stack. */ static size_t yy_buffer_stack_max = 0; /**< capacity of stack. */ -static YY_BUFFER_STATE *yy_buffer_stack = 0; /**< Stack as an array. */ +static YY_BUFFER_STATE * yy_buffer_stack = 0; /**< Stack as an array. */ /* We provide macros for accessing buffer states in case in the * future we want to put the buffer states in a more general @@ -288,27 +288,27 @@ static int yy_start = 0; /* start state number */ */ static int yy_did_buffer_switch_on_eof; -void yyrestart (FILE * input_file); -void yy_switch_to_buffer (YY_BUFFER_STATE new_buffer); -YY_BUFFER_STATE yy_create_buffer (FILE * file, int size); -void yy_delete_buffer (YY_BUFFER_STATE b); -void yy_flush_buffer (YY_BUFFER_STATE b); -void yypush_buffer_state (YY_BUFFER_STATE new_buffer); -void yypop_buffer_state (void); +void yyrestart (FILE *input_file ); +void yy_switch_to_buffer (YY_BUFFER_STATE new_buffer ); +YY_BUFFER_STATE yy_create_buffer (FILE *file,int size ); +void yy_delete_buffer (YY_BUFFER_STATE b ); +void yy_flush_buffer (YY_BUFFER_STATE b ); +void yypush_buffer_state (YY_BUFFER_STATE new_buffer ); +void yypop_buffer_state (void ); -static void yyensure_buffer_stack (void); -static void yy_load_buffer_state (void); -static void yy_init_buffer (YY_BUFFER_STATE b, FILE * file); +static void yyensure_buffer_stack (void ); +static void yy_load_buffer_state (void ); +static void yy_init_buffer (YY_BUFFER_STATE b,FILE *file ); #define YY_FLUSH_BUFFER yy_flush_buffer(YY_CURRENT_BUFFER ) -YY_BUFFER_STATE yy_scan_buffer (char *base, yy_size_t size); -YY_BUFFER_STATE yy_scan_string (yyconst char *yy_str); -YY_BUFFER_STATE yy_scan_bytes (yyconst char *bytes, int len); +YY_BUFFER_STATE yy_scan_buffer (char *base,yy_size_t size ); +YY_BUFFER_STATE yy_scan_string (yyconst char *yy_str ); +YY_BUFFER_STATE yy_scan_bytes (yyconst char *bytes,int len ); -void *yyalloc (yy_size_t); -void *yyrealloc (void *, yy_size_t); -void yyfree (void *); +void *yyalloc (yy_size_t ); +void *yyrealloc (void *,yy_size_t ); +void yyfree (void * ); #define yy_new_buffer yy_create_buffer @@ -349,10 +349,10 @@ int yylineno = 1; extern char *yytext; #define yytext_ptr yytext -static yy_state_type yy_get_previous_state (void); -static yy_state_type yy_try_NUL_trans (yy_state_type current_state); -static int yy_get_next_buffer (void); -static void yy_fatal_error (yyconst char msg[]); +static yy_state_type yy_get_previous_state (void ); +static yy_state_type yy_try_NUL_trans (yy_state_type current_state ); +static int yy_get_next_buffer (void ); +static void yy_fatal_error (yyconst char msg[] ); /* Done after the current pattern has been matched and before the * corresponding action - sets up yytext. @@ -369,166 +369,173 @@ static void yy_fatal_error (yyconst char msg[]); /* This struct is not used in this scanner, but its presence is necessary. */ struct yy_trans_info -{ - flex_int32_t yy_verify; - flex_int32_t yy_nxt; -}; -static yyconst flex_int16_t yy_accept[148] = { 0, - 0, 0, 0, 0, 0, 0, 31, 29, 7, 6, - 28, 9, 29, 29, 28, 28, 28, 28, 28, 28, - 28, 28, 28, 28, 28, 3, 3, 2, 30, 4, - 7, 28, 9, 5, 8, 28, 28, 28, 28, 28, - 28, 28, 28, 28, 28, 28, 28, 28, 28, 28, - 28, 3, 3, 2, 4, 8, 28, 28, 28, 28, - 28, 28, 28, 28, 28, 28, 28, 17, 28, 28, - 28, 28, 28, 28, 14, 28, 28, 28, 28, 28, - 28, 28, 28, 28, 12, 11, 28, 13, 28, 28, - 28, 28, 16, 28, 15, 28, 28, 28, 28, 26, + { + flex_int32_t yy_verify; + flex_int32_t yy_nxt; + }; +static yyconst flex_int16_t yy_accept[148] = + { 0, + 0, 0, 0, 0, 0, 0, 31, 29, 7, 6, + 28, 9, 29, 29, 28, 28, 28, 28, 28, 28, + 28, 28, 28, 28, 28, 3, 3, 2, 30, 4, + 7, 28, 9, 5, 8, 28, 28, 28, 28, 28, + 28, 28, 28, 28, 28, 28, 28, 28, 28, 28, + 28, 3, 3, 2, 4, 8, 28, 28, 28, 28, + 28, 28, 28, 28, 28, 28, 28, 17, 28, 28, + 28, 28, 28, 28, 14, 28, 28, 28, 28, 28, + 28, 28, 28, 28, 12, 11, 28, 13, 28, 28, + 28, 28, 16, 28, 15, 28, 28, 28, 28, 26, - 28, 28, 28, 28, 28, 28, 28, 28, 28, 28, - 28, 28, 18, 28, 28, 28, 28, 28, 28, 28, - 1, 28, 28, 28, 27, 28, 28, 28, 24, 28, - 28, 10, 23, 28, 22, 28, 28, 28, 20, 28, - 28, 28, 21, 28, 19, 25, 0 -}; + 28, 28, 28, 28, 28, 28, 28, 28, 28, 28, + 28, 28, 18, 28, 28, 28, 28, 28, 28, 28, + 1, 28, 28, 28, 27, 28, 28, 28, 24, 28, + 28, 10, 23, 28, 22, 28, 28, 28, 20, 28, + 28, 28, 21, 28, 19, 25, 0 + } ; -static yyconst flex_int32_t yy_ec[256] = { 0, - 1, 1, 1, 1, 1, 1, 1, 1, 2, 3, - 1, 1, 4, 1, 1, 1, 1, 1, 1, 1, - 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, - 1, 2, 5, 6, 7, 1, 1, 1, 5, 1, - 1, 8, 1, 1, 5, 1, 9, 10, 10, 10, - 10, 10, 10, 10, 10, 10, 10, 1, 11, 1, - 1, 1, 1, 12, 13, 13, 13, 13, 13, 13, - 13, 13, 13, 13, 13, 13, 13, 13, 13, 13, - 13, 13, 13, 13, 13, 13, 13, 13, 13, 13, - 1, 1, 1, 5, 1, 1, 14, 15, 16, 17, +static yyconst flex_int32_t yy_ec[256] = + { 0, + 1, 1, 1, 1, 1, 1, 1, 1, 2, 3, + 1, 1, 4, 1, 1, 1, 1, 1, 1, 1, + 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, + 1, 2, 5, 6, 7, 1, 1, 1, 5, 1, + 1, 8, 1, 1, 5, 1, 9, 10, 10, 10, + 10, 10, 10, 10, 10, 10, 10, 1, 11, 1, + 1, 1, 1, 12, 13, 13, 13, 13, 13, 13, + 13, 13, 13, 13, 13, 13, 13, 13, 13, 13, + 13, 13, 13, 13, 13, 13, 13, 13, 13, 13, + 1, 1, 1, 5, 1, 1, 14, 15, 16, 17, - 18, 19, 20, 21, 22, 15, 23, 24, 25, 26, - 27, 28, 15, 29, 30, 31, 32, 33, 34, 15, - 35, 15, 1, 1, 1, 1, 1, 1, 1, 1, - 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, - 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, - 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, - 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, - 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, - 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, - 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, + 18, 19, 20, 21, 22, 15, 23, 24, 25, 26, + 27, 28, 15, 29, 30, 31, 32, 33, 34, 15, + 35, 15, 1, 1, 1, 1, 1, 1, 1, 1, + 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, + 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, + 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, + 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, + 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, + 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, + 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, - 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, - 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, - 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, - 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, - 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, - 1, 1, 1, 1, 1 -}; + 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, + 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, + 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, + 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, + 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, + 1, 1, 1, 1, 1 + } ; -static yyconst flex_int32_t yy_meta[36] = { 0, - 1, 1, 2, 1, 3, 4, 1, 1, 1, 3, - 1, 1, 3, 3, 3, 3, 3, 3, 3, 3, - 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, - 3, 3, 3, 3, 3 -}; +static yyconst flex_int32_t yy_meta[36] = + { 0, + 1, 1, 2, 1, 3, 4, 1, 1, 1, 3, + 1, 1, 3, 3, 3, 3, 3, 3, 3, 3, + 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, + 3, 3, 3, 3, 3 + } ; -static yyconst flex_int16_t yy_base[154] = { 0, - 0, 0, 34, 35, 176, 175, 180, 183, 40, 43, - 0, 0, 30, 0, 24, 147, 164, 151, 150, 146, - 31, 32, 145, 26, 159, 0, 51, 183, 183, 161, - 57, 0, 0, 183, 0, 157, 39, 144, 139, 39, - 141, 140, 152, 141, 138, 50, 137, 130, 130, 142, - 130, 0, 65, 183, 183, 0, 136, 129, 126, 139, - 133, 129, 134, 117, 119, 132, 130, 0, 118, 129, - 125, 114, 114, 113, 0, 116, 111, 108, 107, 118, - 104, 106, 104, 106, 0, 0, 114, 0, 99, 99, - 97, 97, 0, 100, 0, 104, 93, 107, 93, 0, +static yyconst flex_int16_t yy_base[154] = + { 0, + 0, 0, 34, 35, 176, 175, 180, 183, 40, 43, + 0, 0, 30, 0, 24, 147, 164, 151, 150, 146, + 31, 32, 145, 26, 159, 0, 51, 183, 183, 161, + 57, 0, 0, 183, 0, 157, 39, 144, 139, 39, + 141, 140, 152, 141, 138, 50, 137, 130, 130, 142, + 130, 0, 65, 183, 183, 0, 136, 129, 126, 139, + 133, 129, 134, 117, 119, 132, 130, 0, 118, 129, + 125, 114, 114, 113, 0, 116, 111, 108, 107, 118, + 104, 106, 104, 106, 0, 0, 114, 0, 99, 99, + 97, 97, 0, 100, 0, 104, 93, 107, 93, 0, - 106, 90, 96, 101, 88, 82, 91, 88, 88, 95, - 94, 84, 0, 96, 92, 77, 79, 84, 79, 88, - 0, 80, 78, 72, 0, 82, 81, 68, 0, 66, - 78, 0, 0, 76, 0, 68, 53, 39, 0, 56, - 43, 39, 0, 42, 0, 0, 183, 76, 80, 59, - 84, 88, 91 -}; + 106, 90, 96, 101, 88, 82, 91, 88, 88, 95, + 94, 84, 0, 96, 92, 77, 79, 84, 79, 88, + 0, 80, 78, 72, 0, 82, 81, 68, 0, 66, + 78, 0, 0, 76, 0, 68, 53, 39, 0, 56, + 43, 39, 0, 42, 0, 0, 183, 76, 80, 59, + 84, 88, 91 + } ; -static yyconst flex_int16_t yy_def[154] = { 0, - 147, 1, 148, 148, 149, 149, 147, 147, 147, 147, - 150, 151, 147, 150, 150, 150, 150, 150, 150, 150, - 150, 150, 150, 150, 150, 152, 152, 147, 147, 147, - 147, 150, 151, 147, 153, 150, 150, 150, 150, 150, - 150, 150, 150, 150, 150, 150, 150, 150, 150, 150, - 150, 152, 152, 147, 147, 153, 150, 150, 150, 150, - 150, 150, 150, 150, 150, 150, 150, 150, 150, 150, - 150, 150, 150, 150, 150, 150, 150, 150, 150, 150, - 150, 150, 150, 150, 150, 150, 150, 150, 150, 150, - 150, 150, 150, 150, 150, 150, 150, 150, 150, 150, +static yyconst flex_int16_t yy_def[154] = + { 0, + 147, 1, 148, 148, 149, 149, 147, 147, 147, 147, + 150, 151, 147, 150, 150, 150, 150, 150, 150, 150, + 150, 150, 150, 150, 150, 152, 152, 147, 147, 147, + 147, 150, 151, 147, 153, 150, 150, 150, 150, 150, + 150, 150, 150, 150, 150, 150, 150, 150, 150, 150, + 150, 152, 152, 147, 147, 153, 150, 150, 150, 150, + 150, 150, 150, 150, 150, 150, 150, 150, 150, 150, + 150, 150, 150, 150, 150, 150, 150, 150, 150, 150, + 150, 150, 150, 150, 150, 150, 150, 150, 150, 150, + 150, 150, 150, 150, 150, 150, 150, 150, 150, 150, - 150, 150, 150, 150, 150, 150, 150, 150, 150, 150, - 150, 150, 150, 150, 150, 150, 150, 150, 150, 150, - 150, 150, 150, 150, 150, 150, 150, 150, 150, 150, - 150, 150, 150, 150, 150, 150, 150, 150, 150, 150, - 150, 150, 150, 150, 150, 150, 0, 147, 147, 147, - 147, 147, 147 -}; + 150, 150, 150, 150, 150, 150, 150, 150, 150, 150, + 150, 150, 150, 150, 150, 150, 150, 150, 150, 150, + 150, 150, 150, 150, 150, 150, 150, 150, 150, 150, + 150, 150, 150, 150, 150, 150, 150, 150, 150, 150, + 150, 150, 150, 150, 150, 150, 0, 147, 147, 147, + 147, 147, 147 + } ; -static yyconst flex_int16_t yy_nxt[219] = { 0, - 8, 9, 10, 9, 11, 8, 12, 8, 13, 11, - 8, 14, 11, 11, 11, 15, 11, 11, 16, 11, - 17, 18, 19, 11, 11, 11, 11, 20, 21, 22, - 23, 24, 25, 11, 11, 27, 27, 34, 35, 28, - 28, 31, 31, 31, 31, 31, 31, 36, 43, 46, - 37, 49, 53, 47, 62, 50, 54, 44, 31, 31, - 31, 32, 45, 58, 59, 69, 53, 146, 145, 144, - 54, 63, 143, 142, 141, 70, 26, 26, 26, 26, - 29, 29, 29, 29, 33, 140, 33, 33, 52, 52, - 52, 56, 139, 56, 56, 138, 137, 136, 135, 134, +static yyconst flex_int16_t yy_nxt[219] = + { 0, + 8, 9, 10, 9, 11, 8, 12, 8, 13, 11, + 8, 14, 11, 11, 11, 15, 11, 11, 16, 11, + 17, 18, 19, 11, 11, 11, 11, 20, 21, 22, + 23, 24, 25, 11, 11, 27, 27, 34, 35, 28, + 28, 31, 31, 31, 31, 31, 31, 36, 43, 46, + 37, 49, 53, 47, 62, 50, 54, 44, 31, 31, + 31, 32, 45, 58, 59, 69, 53, 146, 145, 144, + 54, 63, 143, 142, 141, 70, 26, 26, 26, 26, + 29, 29, 29, 29, 33, 140, 33, 33, 52, 52, + 52, 56, 139, 56, 56, 138, 137, 136, 135, 134, - 133, 132, 131, 130, 129, 128, 127, 126, 125, 124, - 123, 122, 121, 120, 119, 118, 117, 116, 115, 114, - 113, 112, 111, 110, 109, 108, 107, 106, 105, 104, - 103, 102, 101, 100, 99, 98, 97, 96, 95, 94, - 93, 92, 91, 90, 89, 88, 87, 86, 85, 84, - 83, 82, 81, 80, 79, 78, 77, 76, 75, 74, - 73, 72, 71, 68, 67, 66, 65, 64, 61, 60, - 57, 55, 51, 48, 42, 41, 40, 39, 38, 147, - 30, 30, 7, 147, 147, 147, 147, 147, 147, 147, - 147, 147, 147, 147, 147, 147, 147, 147, 147, 147, + 133, 132, 131, 130, 129, 128, 127, 126, 125, 124, + 123, 122, 121, 120, 119, 118, 117, 116, 115, 114, + 113, 112, 111, 110, 109, 108, 107, 106, 105, 104, + 103, 102, 101, 100, 99, 98, 97, 96, 95, 94, + 93, 92, 91, 90, 89, 88, 87, 86, 85, 84, + 83, 82, 81, 80, 79, 78, 77, 76, 75, 74, + 73, 72, 71, 68, 67, 66, 65, 64, 61, 60, + 57, 55, 51, 48, 42, 41, 40, 39, 38, 147, + 30, 30, 7, 147, 147, 147, 147, 147, 147, 147, + 147, 147, 147, 147, 147, 147, 147, 147, 147, 147, - 147, 147, 147, 147, 147, 147, 147, 147, 147, 147, - 147, 147, 147, 147, 147, 147, 147, 147 -}; + 147, 147, 147, 147, 147, 147, 147, 147, 147, 147, + 147, 147, 147, 147, 147, 147, 147, 147 + } ; -static yyconst flex_int16_t yy_chk[219] = { 0, - 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, - 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, - 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, - 1, 1, 1, 1, 1, 3, 4, 13, 13, 3, - 4, 9, 9, 9, 10, 10, 10, 15, 21, 22, - 15, 24, 27, 22, 40, 24, 27, 21, 31, 31, - 31, 150, 21, 37, 37, 46, 53, 144, 142, 141, - 53, 40, 140, 138, 137, 46, 148, 148, 148, 148, - 149, 149, 149, 149, 151, 136, 151, 151, 152, 152, - 152, 153, 134, 153, 153, 131, 130, 128, 127, 126, +static yyconst flex_int16_t yy_chk[219] = + { 0, + 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, + 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, + 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, + 1, 1, 1, 1, 1, 3, 4, 13, 13, 3, + 4, 9, 9, 9, 10, 10, 10, 15, 21, 22, + 15, 24, 27, 22, 40, 24, 27, 21, 31, 31, + 31, 150, 21, 37, 37, 46, 53, 144, 142, 141, + 53, 40, 140, 138, 137, 46, 148, 148, 148, 148, + 149, 149, 149, 149, 151, 136, 151, 151, 152, 152, + 152, 153, 134, 153, 153, 131, 130, 128, 127, 126, - 124, 123, 122, 120, 119, 118, 117, 116, 115, 114, - 112, 111, 110, 109, 108, 107, 106, 105, 104, 103, - 102, 101, 99, 98, 97, 96, 94, 92, 91, 90, - 89, 87, 84, 83, 82, 81, 80, 79, 78, 77, - 76, 74, 73, 72, 71, 70, 69, 67, 66, 65, - 64, 63, 62, 61, 60, 59, 58, 57, 51, 50, - 49, 48, 47, 45, 44, 43, 42, 41, 39, 38, - 36, 30, 25, 23, 20, 19, 18, 17, 16, 7, - 6, 5, 147, 147, 147, 147, 147, 147, 147, 147, - 147, 147, 147, 147, 147, 147, 147, 147, 147, 147, + 124, 123, 122, 120, 119, 118, 117, 116, 115, 114, + 112, 111, 110, 109, 108, 107, 106, 105, 104, 103, + 102, 101, 99, 98, 97, 96, 94, 92, 91, 90, + 89, 87, 84, 83, 82, 81, 80, 79, 78, 77, + 76, 74, 73, 72, 71, 70, 69, 67, 66, 65, + 64, 63, 62, 61, 60, 59, 58, 57, 51, 50, + 49, 48, 47, 45, 44, 43, 42, 41, 39, 38, + 36, 30, 25, 23, 20, 19, 18, 17, 16, 7, + 6, 5, 147, 147, 147, 147, 147, 147, 147, 147, + 147, 147, 147, 147, 147, 147, 147, 147, 147, 147, - 147, 147, 147, 147, 147, 147, 147, 147, 147, 147, - 147, 147, 147, 147, 147, 147, 147, 147 -}; + 147, 147, 147, 147, 147, 147, 147, 147, 147, 147, + 147, 147, 147, 147, 147, 147, 147, 147 + } ; /* Table of booleans, true if rule could match eol. */ -static yyconst flex_int32_t yy_rule_can_match_eol[31] = { 0, - 0, 0, 1, 0, 0, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, -}; +static yyconst flex_int32_t yy_rule_can_match_eol[31] = + { 0, +0, 0, 1, 0, 0, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, }; static yy_state_type yy_last_accepting_state; static char *yy_last_accepting_cpos; @@ -557,21 +564,20 @@ char *yytext; /* tokens for language */ #include "parser.h" -void mkname (char *name); -void mkval (void); -void mktext (void); +void mkname(char *name); +void mkval(void); +void mktext(void); -int yyerror (char *s); +int yyerror(char *s); -Symbol mkstring (char *name); +Symbol mkstring(char *name); -struct stringlist -{ - char *string; - struct stringlist *next; +struct stringlist { + char* string; + struct stringlist* next; }; -typedef struct stringlist *Stringlist; +typedef struct stringlist* Stringlist; static Stringlist allocatedStrings = NULL; @@ -609,28 +615,28 @@ int include_stack_ptr = 0; #ifndef YY_SKIP_YYWRAP #ifdef __cplusplus -extern "C" int yywrap (void); +extern "C" int yywrap (void ); #else -extern int yywrap (void); +extern int yywrap (void ); #endif #endif -static void yyunput (int c, char *buf_ptr); - + static void yyunput (int c,char *buf_ptr ); + #ifndef yytext_ptr -static void yy_flex_strncpy (char *, yyconst char *, int); +static void yy_flex_strncpy (char *,yyconst char *,int ); #endif #ifdef YY_NEED_STRLEN -static int yy_flex_strlen (yyconst char *); +static int yy_flex_strlen (yyconst char * ); #endif #ifndef YY_NO_INPUT #ifdef __cplusplus -static int yyinput (void); +static int yyinput (void ); #else -static int input (void); +static int input (void ); #endif #endif @@ -734,445 +740,458 @@ extern int yylex (void); */ YY_DECL { - register yy_state_type yy_current_state; - register char *yy_cp, *yy_bp; - register int yy_act; - + register yy_state_type yy_current_state; + register char *yy_cp, *yy_bp; + register int yy_act; + #line 61 "scanner.l" #line 750 "" - if ((yy_init)) - { - (yy_init) = 0; + if ( (yy_init) ) + { + (yy_init) = 0; #ifdef YY_USER_INIT - YY_USER_INIT; + YY_USER_INIT; #endif - if (!(yy_start)) - (yy_start) = 1; /* first start state */ + if ( ! (yy_start) ) + (yy_start) = 1; /* first start state */ - if (!yyin) - yyin = stdin; + if ( ! yyin ) + yyin = stdin; - if (!yyout) - yyout = stdout; + if ( ! yyout ) + yyout = stdout; - if (!YY_CURRENT_BUFFER) - { - yyensure_buffer_stack (); - YY_CURRENT_BUFFER_LVALUE = yy_create_buffer (yyin, YY_BUF_SIZE); - } + if ( ! YY_CURRENT_BUFFER ) { + yyensure_buffer_stack (); + YY_CURRENT_BUFFER_LVALUE = + yy_create_buffer(yyin,YY_BUF_SIZE ); + } - yy_load_buffer_state (); - } + yy_load_buffer_state( ); + } - while (1) /* loops until end-of-file is reached */ - { - yy_cp = (yy_c_buf_p); + while ( 1 ) /* loops until end-of-file is reached */ + { + yy_cp = (yy_c_buf_p); - /* Support of yytext. */ - *yy_cp = (yy_hold_char); + /* Support of yytext. */ + *yy_cp = (yy_hold_char); - /* yy_bp points to the position in yy_ch_buf of the start of - * the current run. - */ - yy_bp = yy_cp; + /* yy_bp points to the position in yy_ch_buf of the start of + * the current run. + */ + yy_bp = yy_cp; - yy_current_state = (yy_start); - yy_match: - do - { - register YY_CHAR yy_c = yy_ec[YY_SC_TO_UI (*yy_cp)]; - if (yy_accept[yy_current_state]) - { - (yy_last_accepting_state) = yy_current_state; - (yy_last_accepting_cpos) = yy_cp; - } - while (yy_chk[yy_base[yy_current_state] + yy_c] != yy_current_state) - { - yy_current_state = (int) yy_def[yy_current_state]; - if (yy_current_state >= 148) - yy_c = yy_meta[(unsigned int) yy_c]; - } - yy_current_state = - yy_nxt[yy_base[yy_current_state] + (unsigned int) yy_c]; - ++yy_cp; - } - while (yy_base[yy_current_state] != 183); + yy_current_state = (yy_start); +yy_match: + do + { + register YY_CHAR yy_c = yy_ec[YY_SC_TO_UI(*yy_cp)]; + if ( yy_accept[yy_current_state] ) + { + (yy_last_accepting_state) = yy_current_state; + (yy_last_accepting_cpos) = yy_cp; + } + while ( yy_chk[yy_base[yy_current_state] + yy_c] != yy_current_state ) + { + yy_current_state = (int) yy_def[yy_current_state]; + if ( yy_current_state >= 148 ) + yy_c = yy_meta[(unsigned int) yy_c]; + } + yy_current_state = yy_nxt[yy_base[yy_current_state] + (unsigned int) yy_c]; + ++yy_cp; + } + while ( yy_base[yy_current_state] != 183 ); - yy_find_action: - yy_act = yy_accept[yy_current_state]; - if (yy_act == 0) - { /* have to back up */ - yy_cp = (yy_last_accepting_cpos); - yy_current_state = (yy_last_accepting_state); - yy_act = yy_accept[yy_current_state]; - } +yy_find_action: + yy_act = yy_accept[yy_current_state]; + if ( yy_act == 0 ) + { /* have to back up */ + yy_cp = (yy_last_accepting_cpos); + yy_current_state = (yy_last_accepting_state); + yy_act = yy_accept[yy_current_state]; + } - YY_DO_BEFORE_ACTION; + YY_DO_BEFORE_ACTION; - if (yy_act != YY_END_OF_BUFFER && yy_rule_can_match_eol[yy_act]) - { - int yyl; - for (yyl = 0; yyl < yyleng; ++yyl) - if (yytext[yyl] == '\n') + if ( yy_act != YY_END_OF_BUFFER && yy_rule_can_match_eol[yy_act] ) + { + int yyl; + for ( yyl = 0; yyl < yyleng; ++yyl ) + if ( yytext[yyl] == '\n' ) + + yylineno++; +; + } - yylineno++; - ; - } +do_action: /* This label is used only to access EOF actions. */ - do_action: /* This label is used only to access EOF actions. */ + switch ( yy_act ) + { /* beginning of action switch */ + case 0: /* must back up */ + /* undo the effects of YY_DO_BEFORE_ACTION */ + *yy_cp = (yy_hold_char); + yy_cp = (yy_last_accepting_cpos); + yy_current_state = (yy_last_accepting_state); + goto yy_find_action; - switch (yy_act) - { /* beginning of action switch */ - case 0: /* must back up */ - /* undo the effects of YY_DO_BEFORE_ACTION */ - *yy_cp = (yy_hold_char); - yy_cp = (yy_last_accepting_cpos); - yy_current_state = (yy_last_accepting_state); - goto yy_find_action; - - case 1: - YY_RULE_SETUP +case 1: +YY_RULE_SETUP #line 62 "scanner.l" - BEGIN (incl); - YY_BREAK case 2:YY_RULE_SETUP +BEGIN(incl); + YY_BREAK +case 2: +YY_RULE_SETUP #line 63 "scanner.l" /* eat the whitespace */ - YY_BREAK case 3: + YY_BREAK +case 3: /* rule 3 can match eol */ - YY_RULE_SETUP +YY_RULE_SETUP #line 64 "scanner.l" - { /* got the include file name */ - if (include_stack_ptr >= MAX_INCLUDE_DEPTH) - { - printfstderr ("Includes nested too deeply"); - exit (1); - } - - include_stack[include_stack_ptr++] = YY_CURRENT_BUFFER; - - /* try to open, using scytherdirs environment variable as well. */ - yyin = openFileSearch (yytext, NULL); - - if (!yyin) - { - error ("could not open include file %s.", yytext); - } - - yy_switch_to_buffer (yy_create_buffer (yyin, YY_BUF_SIZE)); - - BEGIN (INITIAL); - } - YY_BREAK case 4:YY_RULE_SETUP +{ /* got the include file name */ + if ( include_stack_ptr >= MAX_INCLUDE_DEPTH ) + { + printfstderr( "Includes nested too deeply" ); + exit( 1 ); + } + + include_stack[include_stack_ptr++] = + YY_CURRENT_BUFFER; + + /* try to open, using scytherdirs environment variable as well. */ + yyin = openFileSearch (yytext, NULL); + + if (! yyin) + { + error ("could not open include file %s.", yytext); + } + + yy_switch_to_buffer(yy_create_buffer(yyin,YY_BUF_SIZE ) ); + + BEGIN(INITIAL); + } + YY_BREAK +case 4: +YY_RULE_SETUP #line 88 "scanner.l" - { /* eat the closing things */ - BEGIN (INITIAL); - } - YY_BREAK case YY_STATE_EOF (INITIAL): +{ /* eat the closing things */ + BEGIN(INITIAL); + } + YY_BREAK +case YY_STATE_EOF(INITIAL): #line 92 "scanner.l" - { - if (--include_stack_ptr < 0) - { - yyterminate (); - } +{ + if ( --include_stack_ptr < 0 ) + { + yyterminate(); + } - else - { - yy_delete_buffer (YY_CURRENT_BUFFER); - yy_switch_to_buffer (include_stack[include_stack_ptr]); - BEGIN (inclend); - } - } - YY_BREAK case 5:YY_RULE_SETUP + else + { + yy_delete_buffer(YY_CURRENT_BUFFER ); + yy_switch_to_buffer(include_stack[include_stack_ptr] ); + BEGIN(inclend); + } + } + YY_BREAK +case 5: +YY_RULE_SETUP #line 107 "scanner.l" - { - register int c; +{ + register int c; - for (;;) - { - while ((c = input ()) != '*' && c != '\n' && c != EOF) - ; /* eat up text of comment */ + for ( ; ; ) + { + while ( (c = input()) != '*' && c != '\n' && c != EOF ) + ; /* eat up text of comment */ - if (c == '*') - { - while ((c = input ()) == '*') - ; - if (c == '/') - break; /* found the end */ - } + if ( c == '*' ) + { + while ( (c = input()) == '*' ) + ; + if ( c == '/' ) + break; /* found the end */ + } - if (c == '\n') - mylineno++; + if (c == '\n') + mylineno++; - if (c == EOF) - { - yyerror ("EOF in comment"); - break; - } - } - } - YY_BREAK case 6: + if ( c == EOF ) + { + yyerror( "EOF in comment" ); + break; + } + } + } + YY_BREAK +case 6: /* rule 6 can match eol */ - YY_RULE_SETUP +YY_RULE_SETUP #line 134 "scanner.l" - { - mylineno++; - } - YY_BREAK case 7: +{ mylineno++; } + YY_BREAK +case 7: /* rule 7 can match eol */ - YY_RULE_SETUP +YY_RULE_SETUP #line 135 "scanner.l" - { - } - YY_BREAK case 8:YY_RULE_SETUP +{ } + YY_BREAK +case 8: +YY_RULE_SETUP #line 136 "scanner.l" - { - } - YY_BREAK case 9:YY_RULE_SETUP +{ } + YY_BREAK +case 9: +YY_RULE_SETUP #line 137 "scanner.l" - { - } - YY_BREAK case 10:YY_RULE_SETUP +{ } + YY_BREAK +case 10: +YY_RULE_SETUP #line 139 "scanner.l" - { - return PROTOCOL; - } - YY_BREAK case 11:YY_RULE_SETUP +{ return PROTOCOL; } + YY_BREAK +case 11: +YY_RULE_SETUP #line 140 "scanner.l" - { - return ROLE; - } - YY_BREAK case 12:YY_RULE_SETUP +{ return ROLE; } + YY_BREAK +case 12: +YY_RULE_SETUP #line 141 "scanner.l" - { - return READT; - } - YY_BREAK case 13:YY_RULE_SETUP +{ return READT; } + YY_BREAK +case 13: +YY_RULE_SETUP #line 142 "scanner.l" - { - return SENDT; - } - YY_BREAK case 14:YY_RULE_SETUP +{ return SENDT; } + YY_BREAK +case 14: +YY_RULE_SETUP #line 143 "scanner.l" - { - return VAR; - } - YY_BREAK case 15:YY_RULE_SETUP +{ return VAR; } + YY_BREAK +case 15: +YY_RULE_SETUP #line 144 "scanner.l" - { - return CONST; - } - YY_BREAK case 16:YY_RULE_SETUP +{ return CONST; } + YY_BREAK +case 16: +YY_RULE_SETUP #line 145 "scanner.l" - { - return CLAIMT; - } - YY_BREAK case 17:YY_RULE_SETUP +{ return CLAIMT; } + YY_BREAK +case 17: +YY_RULE_SETUP #line 146 "scanner.l" - { - return RUN; - } - YY_BREAK case 18:YY_RULE_SETUP +{ return RUN; } + YY_BREAK +case 18: +YY_RULE_SETUP #line 147 "scanner.l" - { - return SECRET; - } - YY_BREAK case 19:YY_RULE_SETUP +{ return SECRET; } + YY_BREAK +case 19: +YY_RULE_SETUP #line 148 "scanner.l" - { - return INVERSEKEYS; - } - YY_BREAK case 20:YY_RULE_SETUP +{ return INVERSEKEYS; } + YY_BREAK +case 20: +YY_RULE_SETUP #line 149 "scanner.l" - { - return UNTRUSTED; - } - YY_BREAK case 21:YY_RULE_SETUP +{ return UNTRUSTED; } + YY_BREAK +case 21: +YY_RULE_SETUP #line 150 "scanner.l" - { - return COMPROMISED; - } - YY_BREAK case 22:YY_RULE_SETUP +{ return COMPROMISED; } + YY_BREAK +case 22: +YY_RULE_SETUP #line 151 "scanner.l" - { - return USERTYPE; - } - YY_BREAK case 23:YY_RULE_SETUP +{ return USERTYPE; } + YY_BREAK +case 23: +YY_RULE_SETUP #line 152 "scanner.l" - { - return SINGULAR; - } - YY_BREAK case 24:YY_RULE_SETUP +{ return SINGULAR; } + YY_BREAK +case 24: +YY_RULE_SETUP #line 153 "scanner.l" - { - return FUNCTION; - } - YY_BREAK case 25:YY_RULE_SETUP +{ return FUNCTION; } + YY_BREAK +case 25: +YY_RULE_SETUP #line 154 "scanner.l" - { - return HASHFUNCTION; - } - YY_BREAK case 26:YY_RULE_SETUP +{ return HASHFUNCTION; } + YY_BREAK +case 26: +YY_RULE_SETUP #line 155 "scanner.l" - { - return KNOWS; - } - YY_BREAK case 27:YY_RULE_SETUP +{ return KNOWS; } + YY_BREAK +case 27: +YY_RULE_SETUP #line 156 "scanner.l" - { - return TRUSTED; - } - YY_BREAK case 28:YY_RULE_SETUP +{ return TRUSTED; } + YY_BREAK +case 28: +YY_RULE_SETUP #line 157 "scanner.l" - { - yylval.symb = mkstring (yytext); - return ID; - } - YY_BREAK case 29:YY_RULE_SETUP +{ + yylval.symb = mkstring(yytext); + return ID; + } + YY_BREAK +case 29: +YY_RULE_SETUP #line 161 "scanner.l" - { - return yytext[0]; - } - YY_BREAK case 30:YY_RULE_SETUP +{ return yytext[0]; } + YY_BREAK +case 30: +YY_RULE_SETUP #line 165 "scanner.l" - ECHO; - YY_BREAK +ECHO; + YY_BREAK #line 1063 "" - case YY_STATE_EOF (incl): - case YY_STATE_EOF (inclend): - yyterminate (); +case YY_STATE_EOF(incl): +case YY_STATE_EOF(inclend): + yyterminate(); case YY_END_OF_BUFFER: - { - /* Amount of text matched not including the EOB char. */ - int yy_amount_of_matched_text = (int) (yy_cp - (yytext_ptr)) - 1; - - /* Undo the effects of YY_DO_BEFORE_ACTION. */ - *yy_cp = (yy_hold_char); - YY_RESTORE_YY_MORE_OFFSET - if (YY_CURRENT_BUFFER_LVALUE->yy_buffer_status == YY_BUFFER_NEW) - { - /* We're scanning a new file or input source. It's - * possible that this happened because the user - * just pointed yyin at a new source and called - * yylex(). If so, then we have to assure - * consistency between YY_CURRENT_BUFFER and our - * globals. Here is the right place to do so, because - * this is the first action (other than possibly a - * back-up) that will match for the new input source. - */ - (yy_n_chars) = YY_CURRENT_BUFFER_LVALUE->yy_n_chars; - YY_CURRENT_BUFFER_LVALUE->yy_input_file = yyin; - YY_CURRENT_BUFFER_LVALUE->yy_buffer_status = YY_BUFFER_NORMAL; - } - - /* Note that here we test for yy_c_buf_p "<=" to the position - * of the first EOB in the buffer, since yy_c_buf_p will - * already have been incremented past the NUL character - * (since all states make transitions on EOB to the - * end-of-buffer state). Contrast this with the test - * in input(). - */ - if ((yy_c_buf_p) <= - &YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[(yy_n_chars)]) - { /* This was really a NUL. */ - yy_state_type yy_next_state; - - (yy_c_buf_p) = (yytext_ptr) + yy_amount_of_matched_text; - - yy_current_state = yy_get_previous_state (); - - /* Okay, we're now positioned to make the NUL - * transition. We couldn't have - * yy_get_previous_state() go ahead and do it - * for us because it doesn't know how to deal - * with the possibility of jamming (and we don't - * want to build jamming into it because then it - * will run more slowly). - */ - - yy_next_state = yy_try_NUL_trans (yy_current_state); - - yy_bp = (yytext_ptr) + YY_MORE_ADJ; - - if (yy_next_state) - { - /* Consume the NUL. */ - yy_cp = ++(yy_c_buf_p); - yy_current_state = yy_next_state; - goto yy_match; - } - - else - { - yy_cp = (yy_c_buf_p); - goto yy_find_action; - } - } - - else - switch (yy_get_next_buffer ()) { - case EOB_ACT_END_OF_FILE: - { - (yy_did_buffer_switch_on_eof) = 0; + /* Amount of text matched not including the EOB char. */ + int yy_amount_of_matched_text = (int) (yy_cp - (yytext_ptr)) - 1; - if (yywrap ()) - { - /* Note: because we've taken care in - * yy_get_next_buffer() to have set up - * yytext, we can now set up - * yy_c_buf_p so that if some total - * hoser (like flex itself) wants to - * call the scanner after we return the - * YY_NULL, it'll still work - another - * YY_NULL will get returned. + /* Undo the effects of YY_DO_BEFORE_ACTION. */ + *yy_cp = (yy_hold_char); + YY_RESTORE_YY_MORE_OFFSET + + if ( YY_CURRENT_BUFFER_LVALUE->yy_buffer_status == YY_BUFFER_NEW ) + { + /* We're scanning a new file or input source. It's + * possible that this happened because the user + * just pointed yyin at a new source and called + * yylex(). If so, then we have to assure + * consistency between YY_CURRENT_BUFFER and our + * globals. Here is the right place to do so, because + * this is the first action (other than possibly a + * back-up) that will match for the new input source. */ - (yy_c_buf_p) = (yytext_ptr) + YY_MORE_ADJ; + (yy_n_chars) = YY_CURRENT_BUFFER_LVALUE->yy_n_chars; + YY_CURRENT_BUFFER_LVALUE->yy_input_file = yyin; + YY_CURRENT_BUFFER_LVALUE->yy_buffer_status = YY_BUFFER_NORMAL; + } - yy_act = YY_STATE_EOF (YY_START); - goto do_action; - } + /* Note that here we test for yy_c_buf_p "<=" to the position + * of the first EOB in the buffer, since yy_c_buf_p will + * already have been incremented past the NUL character + * (since all states make transitions on EOB to the + * end-of-buffer state). Contrast this with the test + * in input(). + */ + if ( (yy_c_buf_p) <= &YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[(yy_n_chars)] ) + { /* This was really a NUL. */ + yy_state_type yy_next_state; - else - { - if (!(yy_did_buffer_switch_on_eof)) - YY_NEW_FILE; - } - break; - } + (yy_c_buf_p) = (yytext_ptr) + yy_amount_of_matched_text; - case EOB_ACT_CONTINUE_SCAN: - (yy_c_buf_p) = (yytext_ptr) + yy_amount_of_matched_text; + yy_current_state = yy_get_previous_state( ); - yy_current_state = yy_get_previous_state (); + /* Okay, we're now positioned to make the NUL + * transition. We couldn't have + * yy_get_previous_state() go ahead and do it + * for us because it doesn't know how to deal + * with the possibility of jamming (and we don't + * want to build jamming into it because then it + * will run more slowly). + */ - yy_cp = (yy_c_buf_p); - yy_bp = (yytext_ptr) + YY_MORE_ADJ; - goto yy_match; + yy_next_state = yy_try_NUL_trans( yy_current_state ); - case EOB_ACT_LAST_MATCH: - (yy_c_buf_p) = - &YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[(yy_n_chars)]; + yy_bp = (yytext_ptr) + YY_MORE_ADJ; - yy_current_state = yy_get_previous_state (); + if ( yy_next_state ) + { + /* Consume the NUL. */ + yy_cp = ++(yy_c_buf_p); + yy_current_state = yy_next_state; + goto yy_match; + } - yy_cp = (yy_c_buf_p); - yy_bp = (yytext_ptr) + YY_MORE_ADJ; - goto yy_find_action; + else + { + yy_cp = (yy_c_buf_p); + goto yy_find_action; + } + } + + else switch ( yy_get_next_buffer( ) ) + { + case EOB_ACT_END_OF_FILE: + { + (yy_did_buffer_switch_on_eof) = 0; + + if ( yywrap( ) ) + { + /* Note: because we've taken care in + * yy_get_next_buffer() to have set up + * yytext, we can now set up + * yy_c_buf_p so that if some total + * hoser (like flex itself) wants to + * call the scanner after we return the + * YY_NULL, it'll still work - another + * YY_NULL will get returned. + */ + (yy_c_buf_p) = (yytext_ptr) + YY_MORE_ADJ; + + yy_act = YY_STATE_EOF(YY_START); + goto do_action; + } + + else + { + if ( ! (yy_did_buffer_switch_on_eof) ) + YY_NEW_FILE; + } + break; + } + + case EOB_ACT_CONTINUE_SCAN: + (yy_c_buf_p) = + (yytext_ptr) + yy_amount_of_matched_text; + + yy_current_state = yy_get_previous_state( ); + + yy_cp = (yy_c_buf_p); + yy_bp = (yytext_ptr) + YY_MORE_ADJ; + goto yy_match; + + case EOB_ACT_LAST_MATCH: + (yy_c_buf_p) = + &YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[(yy_n_chars)]; + + yy_current_state = yy_get_previous_state( ); + + yy_cp = (yy_c_buf_p); + yy_bp = (yytext_ptr) + YY_MORE_ADJ; + goto yy_find_action; + } + break; } - break; - } default: - YY_FATAL_ERROR - ("fatal flex scanner internal error--no action found"); - } /* end of action switch */ - } /* end of scanning one token */ -} /* end of yylex */ + YY_FATAL_ERROR( + "fatal flex scanner internal error--no action found" ); + } /* end of action switch */ + } /* end of scanning one token */ +} /* end of yylex */ /* yy_get_next_buffer - try to read in a new buffer * @@ -1181,158 +1200,157 @@ YY_DECL * EOB_ACT_CONTINUE_SCAN - continue scanning from current position * EOB_ACT_END_OF_FILE - end of file */ -static int -yy_get_next_buffer (void) +static int yy_get_next_buffer (void) { - register char *dest = YY_CURRENT_BUFFER_LVALUE->yy_ch_buf; - register char *source = (yytext_ptr); - register int number_to_move, i; - int ret_val; + register char *dest = YY_CURRENT_BUFFER_LVALUE->yy_ch_buf; + register char *source = (yytext_ptr); + register int number_to_move, i; + int ret_val; - if ((yy_c_buf_p) > &YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[(yy_n_chars) + 1]) - YY_FATAL_ERROR - ("fatal flex scanner internal error--end of buffer missed"); + if ( (yy_c_buf_p) > &YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[(yy_n_chars) + 1] ) + YY_FATAL_ERROR( + "fatal flex scanner internal error--end of buffer missed" ); - if (YY_CURRENT_BUFFER_LVALUE->yy_fill_buffer == 0) - { /* Don't try to fill the buffer, so this is an EOF. */ - if ((yy_c_buf_p) - (yytext_ptr) - YY_MORE_ADJ == 1) - { - /* We matched a single character, the EOB, so - * treat this as a final EOF. - */ - return EOB_ACT_END_OF_FILE; - } + if ( YY_CURRENT_BUFFER_LVALUE->yy_fill_buffer == 0 ) + { /* Don't try to fill the buffer, so this is an EOF. */ + if ( (yy_c_buf_p) - (yytext_ptr) - YY_MORE_ADJ == 1 ) + { + /* We matched a single character, the EOB, so + * treat this as a final EOF. + */ + return EOB_ACT_END_OF_FILE; + } - else - { - /* We matched some text prior to the EOB, first - * process it. - */ - return EOB_ACT_LAST_MATCH; - } - } + else + { + /* We matched some text prior to the EOB, first + * process it. + */ + return EOB_ACT_LAST_MATCH; + } + } - /* Try to read more data. */ + /* Try to read more data. */ - /* First move last chars to start of buffer. */ - number_to_move = (int) ((yy_c_buf_p) - (yytext_ptr)) - 1; + /* First move last chars to start of buffer. */ + number_to_move = (int) ((yy_c_buf_p) - (yytext_ptr)) - 1; - for (i = 0; i < number_to_move; ++i) - *(dest++) = *(source++); + for ( i = 0; i < number_to_move; ++i ) + *(dest++) = *(source++); - if (YY_CURRENT_BUFFER_LVALUE->yy_buffer_status == YY_BUFFER_EOF_PENDING) - /* don't do the read, it's not guaranteed to return an EOF, - * just force an EOF - */ - YY_CURRENT_BUFFER_LVALUE->yy_n_chars = (yy_n_chars) = 0; + if ( YY_CURRENT_BUFFER_LVALUE->yy_buffer_status == YY_BUFFER_EOF_PENDING ) + /* don't do the read, it's not guaranteed to return an EOF, + * just force an EOF + */ + YY_CURRENT_BUFFER_LVALUE->yy_n_chars = (yy_n_chars) = 0; - else - { - int num_to_read = - YY_CURRENT_BUFFER_LVALUE->yy_buf_size - number_to_move - 1; + else + { + int num_to_read = + YY_CURRENT_BUFFER_LVALUE->yy_buf_size - number_to_move - 1; - while (num_to_read <= 0) - { /* Not enough room in the buffer - grow it. */ + while ( num_to_read <= 0 ) + { /* Not enough room in the buffer - grow it. */ - /* just a shorter name for the current buffer */ - YY_BUFFER_STATE b = YY_CURRENT_BUFFER; + /* just a shorter name for the current buffer */ + YY_BUFFER_STATE b = YY_CURRENT_BUFFER; - int yy_c_buf_p_offset = (int) ((yy_c_buf_p) - b->yy_ch_buf); + int yy_c_buf_p_offset = + (int) ((yy_c_buf_p) - b->yy_ch_buf); - if (b->yy_is_our_buffer) - { - int new_size = b->yy_buf_size * 2; + if ( b->yy_is_our_buffer ) + { + int new_size = b->yy_buf_size * 2; - if (new_size <= 0) - b->yy_buf_size += b->yy_buf_size / 8; - else - b->yy_buf_size *= 2; + if ( new_size <= 0 ) + b->yy_buf_size += b->yy_buf_size / 8; + else + b->yy_buf_size *= 2; - b->yy_ch_buf = (char *) - /* Include room in for 2 EOB chars. */ - yyrealloc ((void *) b->yy_ch_buf, b->yy_buf_size + 2); - } - else - /* Can't grow it, we don't own it. */ - b->yy_ch_buf = 0; + b->yy_ch_buf = (char *) + /* Include room in for 2 EOB chars. */ + yyrealloc((void *) b->yy_ch_buf,b->yy_buf_size + 2 ); + } + else + /* Can't grow it, we don't own it. */ + b->yy_ch_buf = 0; - if (!b->yy_ch_buf) - YY_FATAL_ERROR ("fatal error - scanner input buffer overflow"); + if ( ! b->yy_ch_buf ) + YY_FATAL_ERROR( + "fatal error - scanner input buffer overflow" ); - (yy_c_buf_p) = &b->yy_ch_buf[yy_c_buf_p_offset]; + (yy_c_buf_p) = &b->yy_ch_buf[yy_c_buf_p_offset]; - num_to_read = YY_CURRENT_BUFFER_LVALUE->yy_buf_size - - number_to_move - 1; + num_to_read = YY_CURRENT_BUFFER_LVALUE->yy_buf_size - + number_to_move - 1; - } + } - if (num_to_read > YY_READ_BUF_SIZE) - num_to_read = YY_READ_BUF_SIZE; + if ( num_to_read > YY_READ_BUF_SIZE ) + num_to_read = YY_READ_BUF_SIZE; - /* Read in more data. */ - YY_INPUT ((&YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[number_to_move]), - (yy_n_chars), num_to_read); + /* Read in more data. */ + YY_INPUT( (&YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[number_to_move]), + (yy_n_chars), num_to_read ); - YY_CURRENT_BUFFER_LVALUE->yy_n_chars = (yy_n_chars); - } + YY_CURRENT_BUFFER_LVALUE->yy_n_chars = (yy_n_chars); + } - if ((yy_n_chars) == 0) - { - if (number_to_move == YY_MORE_ADJ) - { - ret_val = EOB_ACT_END_OF_FILE; - yyrestart (yyin); - } + if ( (yy_n_chars) == 0 ) + { + if ( number_to_move == YY_MORE_ADJ ) + { + ret_val = EOB_ACT_END_OF_FILE; + yyrestart(yyin ); + } - else - { - ret_val = EOB_ACT_LAST_MATCH; - YY_CURRENT_BUFFER_LVALUE->yy_buffer_status = YY_BUFFER_EOF_PENDING; - } - } + else + { + ret_val = EOB_ACT_LAST_MATCH; + YY_CURRENT_BUFFER_LVALUE->yy_buffer_status = + YY_BUFFER_EOF_PENDING; + } + } - else - ret_val = EOB_ACT_CONTINUE_SCAN; + else + ret_val = EOB_ACT_CONTINUE_SCAN; - (yy_n_chars) += number_to_move; - YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[(yy_n_chars)] = YY_END_OF_BUFFER_CHAR; - YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[(yy_n_chars) + 1] = - YY_END_OF_BUFFER_CHAR; + (yy_n_chars) += number_to_move; + YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[(yy_n_chars)] = YY_END_OF_BUFFER_CHAR; + YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[(yy_n_chars) + 1] = YY_END_OF_BUFFER_CHAR; - (yytext_ptr) = &YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[0]; + (yytext_ptr) = &YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[0]; - return ret_val; + return ret_val; } /* yy_get_previous_state - get the state just before the EOB char was reached */ -static yy_state_type -yy_get_previous_state (void) + static yy_state_type yy_get_previous_state (void) { - register yy_state_type yy_current_state; - register char *yy_cp; + register yy_state_type yy_current_state; + register char *yy_cp; + + yy_current_state = (yy_start); - yy_current_state = (yy_start); + for ( yy_cp = (yytext_ptr) + YY_MORE_ADJ; yy_cp < (yy_c_buf_p); ++yy_cp ) + { + register YY_CHAR yy_c = (*yy_cp ? yy_ec[YY_SC_TO_UI(*yy_cp)] : 1); + if ( yy_accept[yy_current_state] ) + { + (yy_last_accepting_state) = yy_current_state; + (yy_last_accepting_cpos) = yy_cp; + } + while ( yy_chk[yy_base[yy_current_state] + yy_c] != yy_current_state ) + { + yy_current_state = (int) yy_def[yy_current_state]; + if ( yy_current_state >= 148 ) + yy_c = yy_meta[(unsigned int) yy_c]; + } + yy_current_state = yy_nxt[yy_base[yy_current_state] + (unsigned int) yy_c]; + } - for (yy_cp = (yytext_ptr) + YY_MORE_ADJ; yy_cp < (yy_c_buf_p); ++yy_cp) - { - register YY_CHAR yy_c = (*yy_cp ? yy_ec[YY_SC_TO_UI (*yy_cp)] : 1); - if (yy_accept[yy_current_state]) - { - (yy_last_accepting_state) = yy_current_state; - (yy_last_accepting_cpos) = yy_cp; - } - while (yy_chk[yy_base[yy_current_state] + yy_c] != yy_current_state) - { - yy_current_state = (int) yy_def[yy_current_state]; - if (yy_current_state >= 148) - yy_c = yy_meta[(unsigned int) yy_c]; - } - yy_current_state = - yy_nxt[yy_base[yy_current_state] + (unsigned int) yy_c]; - } - - return yy_current_state; + return yy_current_state; } /* yy_try_NUL_trans - try to make a transition on the NUL character @@ -1340,214 +1358,208 @@ yy_get_previous_state (void) * synopsis * next_state = yy_try_NUL_trans( current_state ); */ -static yy_state_type -yy_try_NUL_trans (yy_state_type yy_current_state) + static yy_state_type yy_try_NUL_trans (yy_state_type yy_current_state ) { - register int yy_is_jam; - register char *yy_cp = (yy_c_buf_p); + register int yy_is_jam; + register char *yy_cp = (yy_c_buf_p); - register YY_CHAR yy_c = 1; - if (yy_accept[yy_current_state]) - { - (yy_last_accepting_state) = yy_current_state; - (yy_last_accepting_cpos) = yy_cp; - } - while (yy_chk[yy_base[yy_current_state] + yy_c] != yy_current_state) - { - yy_current_state = (int) yy_def[yy_current_state]; - if (yy_current_state >= 148) - yy_c = yy_meta[(unsigned int) yy_c]; - } - yy_current_state = yy_nxt[yy_base[yy_current_state] + (unsigned int) yy_c]; - yy_is_jam = (yy_current_state == 147); + register YY_CHAR yy_c = 1; + if ( yy_accept[yy_current_state] ) + { + (yy_last_accepting_state) = yy_current_state; + (yy_last_accepting_cpos) = yy_cp; + } + while ( yy_chk[yy_base[yy_current_state] + yy_c] != yy_current_state ) + { + yy_current_state = (int) yy_def[yy_current_state]; + if ( yy_current_state >= 148 ) + yy_c = yy_meta[(unsigned int) yy_c]; + } + yy_current_state = yy_nxt[yy_base[yy_current_state] + (unsigned int) yy_c]; + yy_is_jam = (yy_current_state == 147); - return yy_is_jam ? 0 : yy_current_state; + return yy_is_jam ? 0 : yy_current_state; } -static void -yyunput (int c, register char *yy_bp) + static void yyunput (int c, register char * yy_bp ) { - register char *yy_cp; + register char *yy_cp; + + yy_cp = (yy_c_buf_p); - yy_cp = (yy_c_buf_p); + /* undo effects of setting up yytext */ + *yy_cp = (yy_hold_char); - /* undo effects of setting up yytext */ - *yy_cp = (yy_hold_char); + if ( yy_cp < YY_CURRENT_BUFFER_LVALUE->yy_ch_buf + 2 ) + { /* need to shift things up to make room */ + /* +2 for EOB chars. */ + register int number_to_move = (yy_n_chars) + 2; + register char *dest = &YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[ + YY_CURRENT_BUFFER_LVALUE->yy_buf_size + 2]; + register char *source = + &YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[number_to_move]; - if (yy_cp < YY_CURRENT_BUFFER_LVALUE->yy_ch_buf + 2) - { /* need to shift things up to make room */ - /* +2 for EOB chars. */ - register int number_to_move = (yy_n_chars) + 2; - register char *dest = - &YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[YY_CURRENT_BUFFER_LVALUE-> - yy_buf_size + 2]; - register char *source = - &YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[number_to_move]; + while ( source > YY_CURRENT_BUFFER_LVALUE->yy_ch_buf ) + *--dest = *--source; - while (source > YY_CURRENT_BUFFER_LVALUE->yy_ch_buf) - *--dest = *--source; + yy_cp += (int) (dest - source); + yy_bp += (int) (dest - source); + YY_CURRENT_BUFFER_LVALUE->yy_n_chars = + (yy_n_chars) = YY_CURRENT_BUFFER_LVALUE->yy_buf_size; - yy_cp += (int) (dest - source); - yy_bp += (int) (dest - source); - YY_CURRENT_BUFFER_LVALUE->yy_n_chars = - (yy_n_chars) = YY_CURRENT_BUFFER_LVALUE->yy_buf_size; + if ( yy_cp < YY_CURRENT_BUFFER_LVALUE->yy_ch_buf + 2 ) + YY_FATAL_ERROR( "flex scanner push-back overflow" ); + } - if (yy_cp < YY_CURRENT_BUFFER_LVALUE->yy_ch_buf + 2) - YY_FATAL_ERROR ("flex scanner push-back overflow"); + *--yy_cp = (char) c; + + if ( c == '\n' ){ + --yylineno; } - *--yy_cp = (char) c; - - if (c == '\n') - { - --yylineno; - } - - (yytext_ptr) = yy_bp; - (yy_hold_char) = *yy_cp; - (yy_c_buf_p) = yy_cp; + (yytext_ptr) = yy_bp; + (yy_hold_char) = *yy_cp; + (yy_c_buf_p) = yy_cp; } #ifndef YY_NO_INPUT #ifdef __cplusplus -static int -yyinput (void) + static int yyinput (void) #else -static int -input (void) + static int input (void) #endif + { - int c; + int c; + + *(yy_c_buf_p) = (yy_hold_char); - *(yy_c_buf_p) = (yy_hold_char); + if ( *(yy_c_buf_p) == YY_END_OF_BUFFER_CHAR ) + { + /* yy_c_buf_p now points to the character we want to return. + * If this occurs *before* the EOB characters, then it's a + * valid NUL; if not, then we've hit the end of the buffer. + */ + if ( (yy_c_buf_p) < &YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[(yy_n_chars)] ) + /* This was really a NUL. */ + *(yy_c_buf_p) = '\0'; - if (*(yy_c_buf_p) == YY_END_OF_BUFFER_CHAR) - { - /* yy_c_buf_p now points to the character we want to return. - * If this occurs *before* the EOB characters, then it's a - * valid NUL; if not, then we've hit the end of the buffer. - */ - if ((yy_c_buf_p) < &YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[(yy_n_chars)]) - /* This was really a NUL. */ - *(yy_c_buf_p) = '\0'; + else + { /* need more input */ + int offset = (yy_c_buf_p) - (yytext_ptr); + ++(yy_c_buf_p); - else - { /* need more input */ - int offset = (yy_c_buf_p) - (yytext_ptr); - ++(yy_c_buf_p); + switch ( yy_get_next_buffer( ) ) + { + case EOB_ACT_LAST_MATCH: + /* This happens because yy_g_n_b() + * sees that we've accumulated a + * token and flags that we need to + * try matching the token before + * proceeding. But for input(), + * there's no matching to consider. + * So convert the EOB_ACT_LAST_MATCH + * to EOB_ACT_END_OF_FILE. + */ - switch (yy_get_next_buffer ()) - { - case EOB_ACT_LAST_MATCH: - /* This happens because yy_g_n_b() - * sees that we've accumulated a - * token and flags that we need to - * try matching the token before - * proceeding. But for input(), - * there's no matching to consider. - * So convert the EOB_ACT_LAST_MATCH - * to EOB_ACT_END_OF_FILE. - */ + /* Reset buffer status. */ + yyrestart(yyin ); - /* Reset buffer status. */ - yyrestart (yyin); + /*FALLTHROUGH*/ - /*FALLTHROUGH*/ case EOB_ACT_END_OF_FILE: - { - if (yywrap ()) - return EOF; + case EOB_ACT_END_OF_FILE: + { + if ( yywrap( ) ) + return EOF; - if (!(yy_did_buffer_switch_on_eof)) - YY_NEW_FILE; + if ( ! (yy_did_buffer_switch_on_eof) ) + YY_NEW_FILE; #ifdef __cplusplus - return yyinput (); + return yyinput(); #else - return input (); + return input(); #endif - } + } - case EOB_ACT_CONTINUE_SCAN: - (yy_c_buf_p) = (yytext_ptr) + offset; - break; - } - } - } + case EOB_ACT_CONTINUE_SCAN: + (yy_c_buf_p) = (yytext_ptr) + offset; + break; + } + } + } - c = *(unsigned char *) (yy_c_buf_p); /* cast for 8-bit char's */ - *(yy_c_buf_p) = '\0'; /* preserve yytext */ - (yy_hold_char) = *++(yy_c_buf_p); - - if (c == '\n') + c = *(unsigned char *) (yy_c_buf_p); /* cast for 8-bit char's */ + *(yy_c_buf_p) = '\0'; /* preserve yytext */ + (yy_hold_char) = *++(yy_c_buf_p); + if ( c == '\n' ) + yylineno++; - ; +; - return c; + return c; } -#endif /* ifndef YY_NO_INPUT */ +#endif /* ifndef YY_NO_INPUT */ /** Immediately switch to a different input stream. * @param input_file A readable stream. * * @note This function does not reset the start condition to @c INITIAL . */ -void -yyrestart (FILE * input_file) + void yyrestart (FILE * input_file ) { + + if ( ! YY_CURRENT_BUFFER ){ + yyensure_buffer_stack (); + YY_CURRENT_BUFFER_LVALUE = + yy_create_buffer(yyin,YY_BUF_SIZE ); + } - if (!YY_CURRENT_BUFFER) - { - yyensure_buffer_stack (); - YY_CURRENT_BUFFER_LVALUE = yy_create_buffer (yyin, YY_BUF_SIZE); - } - - yy_init_buffer (YY_CURRENT_BUFFER, input_file); - yy_load_buffer_state (); + yy_init_buffer(YY_CURRENT_BUFFER,input_file ); + yy_load_buffer_state( ); } /** Switch to a different input buffer. * @param new_buffer The new input buffer. * */ -void -yy_switch_to_buffer (YY_BUFFER_STATE new_buffer) + void yy_switch_to_buffer (YY_BUFFER_STATE new_buffer ) { + + /* TODO. We should be able to replace this entire function body + * with + * yypop_buffer_state(); + * yypush_buffer_state(new_buffer); + */ + yyensure_buffer_stack (); + if ( YY_CURRENT_BUFFER == new_buffer ) + return; - /* TODO. We should be able to replace this entire function body - * with - * yypop_buffer_state(); - * yypush_buffer_state(new_buffer); - */ - yyensure_buffer_stack (); - if (YY_CURRENT_BUFFER == new_buffer) - return; + if ( YY_CURRENT_BUFFER ) + { + /* Flush out information for old buffer. */ + *(yy_c_buf_p) = (yy_hold_char); + YY_CURRENT_BUFFER_LVALUE->yy_buf_pos = (yy_c_buf_p); + YY_CURRENT_BUFFER_LVALUE->yy_n_chars = (yy_n_chars); + } - if (YY_CURRENT_BUFFER) - { - /* Flush out information for old buffer. */ - *(yy_c_buf_p) = (yy_hold_char); - YY_CURRENT_BUFFER_LVALUE->yy_buf_pos = (yy_c_buf_p); - YY_CURRENT_BUFFER_LVALUE->yy_n_chars = (yy_n_chars); - } + YY_CURRENT_BUFFER_LVALUE = new_buffer; + yy_load_buffer_state( ); - YY_CURRENT_BUFFER_LVALUE = new_buffer; - yy_load_buffer_state (); - - /* We don't actually know whether we did this switch during - * EOF (yywrap()) processing, but the only time this flag - * is looked at is after yywrap() is called, so it's safe - * to go ahead and always set it. - */ - (yy_did_buffer_switch_on_eof) = 1; + /* We don't actually know whether we did this switch during + * EOF (yywrap()) processing, but the only time this flag + * is looked at is after yywrap() is called, so it's safe + * to go ahead and always set it. + */ + (yy_did_buffer_switch_on_eof) = 1; } -static void -yy_load_buffer_state (void) +static void yy_load_buffer_state (void) { - (yy_n_chars) = YY_CURRENT_BUFFER_LVALUE->yy_n_chars; - (yytext_ptr) = (yy_c_buf_p) = YY_CURRENT_BUFFER_LVALUE->yy_buf_pos; - yyin = YY_CURRENT_BUFFER_LVALUE->yy_input_file; - (yy_hold_char) = *(yy_c_buf_p); + (yy_n_chars) = YY_CURRENT_BUFFER_LVALUE->yy_n_chars; + (yytext_ptr) = (yy_c_buf_p) = YY_CURRENT_BUFFER_LVALUE->yy_buf_pos; + yyin = YY_CURRENT_BUFFER_LVALUE->yy_input_file; + (yy_hold_char) = *(yy_c_buf_p); } /** Allocate and initialize an input buffer state. @@ -1556,110 +1568,106 @@ yy_load_buffer_state (void) * * @return the allocated buffer state. */ -YY_BUFFER_STATE -yy_create_buffer (FILE * file, int size) + YY_BUFFER_STATE yy_create_buffer (FILE * file, int size ) { - YY_BUFFER_STATE b; + YY_BUFFER_STATE b; + + b = (YY_BUFFER_STATE) yyalloc(sizeof( struct yy_buffer_state ) ); + if ( ! b ) + YY_FATAL_ERROR( "out of dynamic memory in yy_create_buffer()" ); - b = (YY_BUFFER_STATE) yyalloc (sizeof (struct yy_buffer_state)); - if (!b) - YY_FATAL_ERROR ("out of dynamic memory in yy_create_buffer()"); + b->yy_buf_size = size; - b->yy_buf_size = size; + /* yy_ch_buf has to be 2 characters longer than the size given because + * we need to put in 2 end-of-buffer characters. + */ + b->yy_ch_buf = (char *) yyalloc(b->yy_buf_size + 2 ); + if ( ! b->yy_ch_buf ) + YY_FATAL_ERROR( "out of dynamic memory in yy_create_buffer()" ); - /* yy_ch_buf has to be 2 characters longer than the size given because - * we need to put in 2 end-of-buffer characters. - */ - b->yy_ch_buf = (char *) yyalloc (b->yy_buf_size + 2); - if (!b->yy_ch_buf) - YY_FATAL_ERROR ("out of dynamic memory in yy_create_buffer()"); + b->yy_is_our_buffer = 1; - b->yy_is_our_buffer = 1; + yy_init_buffer(b,file ); - yy_init_buffer (b, file); - - return b; + return b; } /** Destroy the buffer. * @param b a buffer created with yy_create_buffer() * */ -void -yy_delete_buffer (YY_BUFFER_STATE b) + void yy_delete_buffer (YY_BUFFER_STATE b ) { + + if ( ! b ) + return; - if (!b) - return; + if ( b == YY_CURRENT_BUFFER ) /* Not sure if we should pop here. */ + YY_CURRENT_BUFFER_LVALUE = (YY_BUFFER_STATE) 0; - if (b == YY_CURRENT_BUFFER) /* Not sure if we should pop here. */ - YY_CURRENT_BUFFER_LVALUE = (YY_BUFFER_STATE) 0; + if ( b->yy_is_our_buffer ) + yyfree((void *) b->yy_ch_buf ); - if (b->yy_is_our_buffer) - yyfree ((void *) b->yy_ch_buf); - - yyfree ((void *) b); + yyfree((void *) b ); } #ifndef __cplusplus -extern int isatty (int); +extern int isatty (int ); #endif /* __cplusplus */ - + /* Initializes or reinitializes a buffer. * This function is sometimes called more than once on the same buffer, * such as during a yyrestart() or at EOF. */ -static void -yy_init_buffer (YY_BUFFER_STATE b, FILE * file) + static void yy_init_buffer (YY_BUFFER_STATE b, FILE * file ) + { - int oerrno = errno; + int oerrno = errno; + + yy_flush_buffer(b ); - yy_flush_buffer (b); + b->yy_input_file = file; + b->yy_fill_buffer = 1; - b->yy_input_file = file; - b->yy_fill_buffer = 1; - - /* If b is the current buffer, then yy_init_buffer was _probably_ - * called from yyrestart() or through yy_get_next_buffer. - * In that case, we don't want to reset the lineno or column. - */ - if (b != YY_CURRENT_BUFFER) - { - b->yy_bs_lineno = 1; - b->yy_bs_column = 0; + /* If b is the current buffer, then yy_init_buffer was _probably_ + * called from yyrestart() or through yy_get_next_buffer. + * In that case, we don't want to reset the lineno or column. + */ + if (b != YY_CURRENT_BUFFER){ + b->yy_bs_lineno = 1; + b->yy_bs_column = 0; } - b->yy_is_interactive = file ? (isatty (fileno (file)) > 0) : 0; - - errno = oerrno; + b->yy_is_interactive = file ? (isatty( fileno(file) ) > 0) : 0; + + errno = oerrno; } /** Discard all buffered characters. On the next scan, YY_INPUT will be called. * @param b the buffer state to be flushed, usually @c YY_CURRENT_BUFFER. * */ -void -yy_flush_buffer (YY_BUFFER_STATE b) + void yy_flush_buffer (YY_BUFFER_STATE b ) { - if (!b) - return; + if ( ! b ) + return; - b->yy_n_chars = 0; + b->yy_n_chars = 0; - /* We always need two end-of-buffer characters. The first causes - * a transition to the end-of-buffer state. The second causes - * a jam in that state. - */ - b->yy_ch_buf[0] = YY_END_OF_BUFFER_CHAR; - b->yy_ch_buf[1] = YY_END_OF_BUFFER_CHAR; + /* We always need two end-of-buffer characters. The first causes + * a transition to the end-of-buffer state. The second causes + * a jam in that state. + */ + b->yy_ch_buf[0] = YY_END_OF_BUFFER_CHAR; + b->yy_ch_buf[1] = YY_END_OF_BUFFER_CHAR; - b->yy_buf_pos = &b->yy_ch_buf[0]; + b->yy_buf_pos = &b->yy_ch_buf[0]; - b->yy_at_bol = 1; - b->yy_buffer_status = YY_BUFFER_NEW; + b->yy_at_bol = 1; + b->yy_buffer_status = YY_BUFFER_NEW; - if (b == YY_CURRENT_BUFFER) - yy_load_buffer_state (); + if ( b == YY_CURRENT_BUFFER ) + yy_load_buffer_state( ); } /** Pushes the new state onto the stack. The new state becomes @@ -1668,97 +1676,92 @@ yy_flush_buffer (YY_BUFFER_STATE b) * @param new_buffer The new state. * */ -void -yypush_buffer_state (YY_BUFFER_STATE new_buffer) +void yypush_buffer_state (YY_BUFFER_STATE new_buffer ) { - if (new_buffer == NULL) - return; + if (new_buffer == NULL) + return; - yyensure_buffer_stack (); + yyensure_buffer_stack(); - /* This block is copied from yy_switch_to_buffer. */ - if (YY_CURRENT_BUFFER) - { - /* Flush out information for old buffer. */ - *(yy_c_buf_p) = (yy_hold_char); - YY_CURRENT_BUFFER_LVALUE->yy_buf_pos = (yy_c_buf_p); - YY_CURRENT_BUFFER_LVALUE->yy_n_chars = (yy_n_chars); - } + /* This block is copied from yy_switch_to_buffer. */ + if ( YY_CURRENT_BUFFER ) + { + /* Flush out information for old buffer. */ + *(yy_c_buf_p) = (yy_hold_char); + YY_CURRENT_BUFFER_LVALUE->yy_buf_pos = (yy_c_buf_p); + YY_CURRENT_BUFFER_LVALUE->yy_n_chars = (yy_n_chars); + } - /* Only push if top exists. Otherwise, replace top. */ - if (YY_CURRENT_BUFFER) - (yy_buffer_stack_top)++; - YY_CURRENT_BUFFER_LVALUE = new_buffer; + /* Only push if top exists. Otherwise, replace top. */ + if (YY_CURRENT_BUFFER) + (yy_buffer_stack_top)++; + YY_CURRENT_BUFFER_LVALUE = new_buffer; - /* copied from yy_switch_to_buffer. */ - yy_load_buffer_state (); - (yy_did_buffer_switch_on_eof) = 1; + /* copied from yy_switch_to_buffer. */ + yy_load_buffer_state( ); + (yy_did_buffer_switch_on_eof) = 1; } /** Removes and deletes the top of the stack, if present. * The next element becomes the new top. * */ -void -yypop_buffer_state (void) +void yypop_buffer_state (void) { - if (!YY_CURRENT_BUFFER) - return; + if (!YY_CURRENT_BUFFER) + return; - yy_delete_buffer (YY_CURRENT_BUFFER); - YY_CURRENT_BUFFER_LVALUE = NULL; - if ((yy_buffer_stack_top) > 0) - --(yy_buffer_stack_top); + yy_delete_buffer(YY_CURRENT_BUFFER ); + YY_CURRENT_BUFFER_LVALUE = NULL; + if ((yy_buffer_stack_top) > 0) + --(yy_buffer_stack_top); - if (YY_CURRENT_BUFFER) - { - yy_load_buffer_state (); - (yy_did_buffer_switch_on_eof) = 1; - } + if (YY_CURRENT_BUFFER) { + yy_load_buffer_state( ); + (yy_did_buffer_switch_on_eof) = 1; + } } /* Allocates the stack if it does not exist. * Guarantees space for at least one push. */ -static void -yyensure_buffer_stack (void) +static void yyensure_buffer_stack (void) { - int num_to_alloc; + int num_to_alloc; + + if (!(yy_buffer_stack)) { - if (!(yy_buffer_stack)) - { + /* First allocation is just for 2 elements, since we don't know if this + * scanner will even need a stack. We use 2 instead of 1 to avoid an + * immediate realloc on the next call. + */ + num_to_alloc = 1; + (yy_buffer_stack) = (struct yy_buffer_state**)yyalloc + (num_to_alloc * sizeof(struct yy_buffer_state*) + ); + + memset((yy_buffer_stack), 0, num_to_alloc * sizeof(struct yy_buffer_state*)); + + (yy_buffer_stack_max) = num_to_alloc; + (yy_buffer_stack_top) = 0; + return; + } - /* First allocation is just for 2 elements, since we don't know if this - * scanner will even need a stack. We use 2 instead of 1 to avoid an - * immediate realloc on the next call. - */ - num_to_alloc = 1; - (yy_buffer_stack) = (struct yy_buffer_state **) yyalloc - (num_to_alloc * sizeof (struct yy_buffer_state *)); + if ((yy_buffer_stack_top) >= ((yy_buffer_stack_max)) - 1){ - memset ((yy_buffer_stack), 0, - num_to_alloc * sizeof (struct yy_buffer_state *)); + /* Increase the buffer to prepare for a possible push. */ + int grow_size = 8 /* arbitrary grow size */; - (yy_buffer_stack_max) = num_to_alloc; - (yy_buffer_stack_top) = 0; - return; - } + num_to_alloc = (yy_buffer_stack_max) + grow_size; + (yy_buffer_stack) = (struct yy_buffer_state**)yyrealloc + ((yy_buffer_stack), + num_to_alloc * sizeof(struct yy_buffer_state*) + ); - if ((yy_buffer_stack_top) >= ((yy_buffer_stack_max)) - 1) - { - - /* Increase the buffer to prepare for a possible push. */ - int grow_size = 8 /* arbitrary grow size */ ; - - num_to_alloc = (yy_buffer_stack_max) + grow_size; - (yy_buffer_stack) = (struct yy_buffer_state **) yyrealloc - ((yy_buffer_stack), num_to_alloc * sizeof (struct yy_buffer_state *)); - - /* zero only the new slots. */ - memset ((yy_buffer_stack) + (yy_buffer_stack_max), 0, - grow_size * sizeof (struct yy_buffer_state *)); - (yy_buffer_stack_max) = num_to_alloc; - } + /* zero only the new slots.*/ + memset((yy_buffer_stack) + (yy_buffer_stack_max), 0, grow_size * sizeof(struct yy_buffer_state*)); + (yy_buffer_stack_max) = num_to_alloc; + } } /** Setup the input buffer state to scan directly from a user-specified character buffer. @@ -1767,34 +1770,33 @@ yyensure_buffer_stack (void) * * @return the newly allocated buffer state object. */ -YY_BUFFER_STATE -yy_scan_buffer (char *base, yy_size_t size) +YY_BUFFER_STATE yy_scan_buffer (char * base, yy_size_t size ) { - YY_BUFFER_STATE b; + YY_BUFFER_STATE b; + + if ( size < 2 || + base[size-2] != YY_END_OF_BUFFER_CHAR || + base[size-1] != YY_END_OF_BUFFER_CHAR ) + /* They forgot to leave room for the EOB's. */ + return 0; - if (size < 2 || - base[size - 2] != YY_END_OF_BUFFER_CHAR || - base[size - 1] != YY_END_OF_BUFFER_CHAR) - /* They forgot to leave room for the EOB's. */ - return 0; + b = (YY_BUFFER_STATE) yyalloc(sizeof( struct yy_buffer_state ) ); + if ( ! b ) + YY_FATAL_ERROR( "out of dynamic memory in yy_scan_buffer()" ); - b = (YY_BUFFER_STATE) yyalloc (sizeof (struct yy_buffer_state)); - if (!b) - YY_FATAL_ERROR ("out of dynamic memory in yy_scan_buffer()"); + b->yy_buf_size = size - 2; /* "- 2" to take care of EOB's */ + b->yy_buf_pos = b->yy_ch_buf = base; + b->yy_is_our_buffer = 0; + b->yy_input_file = 0; + b->yy_n_chars = b->yy_buf_size; + b->yy_is_interactive = 0; + b->yy_at_bol = 1; + b->yy_fill_buffer = 0; + b->yy_buffer_status = YY_BUFFER_NEW; - b->yy_buf_size = size - 2; /* "- 2" to take care of EOB's */ - b->yy_buf_pos = b->yy_ch_buf = base; - b->yy_is_our_buffer = 0; - b->yy_input_file = 0; - b->yy_n_chars = b->yy_buf_size; - b->yy_is_interactive = 0; - b->yy_at_bol = 1; - b->yy_fill_buffer = 0; - b->yy_buffer_status = YY_BUFFER_NEW; + yy_switch_to_buffer(b ); - yy_switch_to_buffer (b); - - return b; + return b; } /** Setup the input buffer state to scan a string. The next call to yylex() will @@ -1805,11 +1807,10 @@ yy_scan_buffer (char *base, yy_size_t size) * @note If you want to scan bytes that may contain NUL values, then use * yy_scan_bytes() instead. */ -YY_BUFFER_STATE -yy_scan_string (yyconst char *yy_str) +YY_BUFFER_STATE yy_scan_string (yyconst char * yy_str ) { - - return yy_scan_bytes (yy_str, strlen (yy_str)); + + return yy_scan_bytes(yy_str,strlen(yy_str) ); } /** Setup the input buffer state to scan the given bytes. The next call to yylex() will @@ -1819,46 +1820,44 @@ yy_scan_string (yyconst char *yy_str) * * @return the newly allocated buffer state object. */ -YY_BUFFER_STATE -yy_scan_bytes (yyconst char *bytes, int len) +YY_BUFFER_STATE yy_scan_bytes (yyconst char * bytes, int len ) { - YY_BUFFER_STATE b; - char *buf; - yy_size_t n; - int i; + YY_BUFFER_STATE b; + char *buf; + yy_size_t n; + int i; + + /* Get memory for full buffer, including space for trailing EOB's. */ + n = len + 2; + buf = (char *) yyalloc(n ); + if ( ! buf ) + YY_FATAL_ERROR( "out of dynamic memory in yy_scan_bytes()" ); - /* Get memory for full buffer, including space for trailing EOB's. */ - n = len + 2; - buf = (char *) yyalloc (n); - if (!buf) - YY_FATAL_ERROR ("out of dynamic memory in yy_scan_bytes()"); + for ( i = 0; i < len; ++i ) + buf[i] = bytes[i]; - for (i = 0; i < len; ++i) - buf[i] = bytes[i]; + buf[len] = buf[len+1] = YY_END_OF_BUFFER_CHAR; - buf[len] = buf[len + 1] = YY_END_OF_BUFFER_CHAR; + b = yy_scan_buffer(buf,n ); + if ( ! b ) + YY_FATAL_ERROR( "bad buffer in yy_scan_bytes()" ); - b = yy_scan_buffer (buf, n); - if (!b) - YY_FATAL_ERROR ("bad buffer in yy_scan_bytes()"); + /* It's okay to grow etc. this buffer, and we should throw it + * away when we're done. + */ + b->yy_is_our_buffer = 1; - /* It's okay to grow etc. this buffer, and we should throw it - * away when we're done. - */ - b->yy_is_our_buffer = 1; - - return b; + return b; } #ifndef YY_EXIT_FAILURE #define YY_EXIT_FAILURE 2 #endif -static void -yy_fatal_error (yyconst char *msg) +static void yy_fatal_error (yyconst char* msg ) { - (void) fprintf (stderr, "%s\n", msg); - exit (YY_EXIT_FAILURE); + (void) fprintf( stderr, "%s\n", msg ); + exit( YY_EXIT_FAILURE ); } /* Redefine yyless() so it works in section 3 code. */ @@ -1883,59 +1882,53 @@ yy_fatal_error (yyconst char *msg) /** Get the current line number. * */ -int -yyget_lineno (void) +int yyget_lineno (void) { - - return yylineno; + + return yylineno; } /** Get the input stream. * */ -FILE * -yyget_in (void) +FILE *yyget_in (void) { - return yyin; + return yyin; } /** Get the output stream. * */ -FILE * -yyget_out (void) +FILE *yyget_out (void) { - return yyout; + return yyout; } /** Get the length of the current token. * */ -int -yyget_leng (void) +int yyget_leng (void) { - return yyleng; + return yyleng; } /** Get the current token. * */ -char * -yyget_text (void) +char *yyget_text (void) { - return yytext; + return yytext; } /** Set the current line number. * @param line_number * */ -void -yyset_lineno (int line_number) +void yyset_lineno (int line_number ) { - - yylineno = line_number; + + yylineno = line_number; } /** Set the input stream. This does not discard the current @@ -1944,48 +1937,42 @@ yyset_lineno (int line_number) * * @see yy_switch_to_buffer */ -void -yyset_in (FILE * in_str) +void yyset_in (FILE * in_str ) { - yyin = in_str; + yyin = in_str ; } -void -yyset_out (FILE * out_str) +void yyset_out (FILE * out_str ) { - yyout = out_str; + yyout = out_str ; } -int -yyget_debug (void) +int yyget_debug (void) { - return yy_flex_debug; + return yy_flex_debug; } -void -yyset_debug (int bdebug) +void yyset_debug (int bdebug ) { - yy_flex_debug = bdebug; + yy_flex_debug = bdebug ; } /* yylex_destroy is for both reentrant and non-reentrant scanners. */ -int -yylex_destroy (void) +int yylex_destroy (void) { + + /* Pop the buffer stack, destroying each element. */ + while(YY_CURRENT_BUFFER){ + yy_delete_buffer(YY_CURRENT_BUFFER ); + YY_CURRENT_BUFFER_LVALUE = NULL; + yypop_buffer_state(); + } - /* Pop the buffer stack, destroying each element. */ - while (YY_CURRENT_BUFFER) - { - yy_delete_buffer (YY_CURRENT_BUFFER); - YY_CURRENT_BUFFER_LVALUE = NULL; - yypop_buffer_state (); - } + /* Destroy the stack itself. */ + yyfree((yy_buffer_stack) ); + (yy_buffer_stack) = NULL; - /* Destroy the stack itself. */ - yyfree ((yy_buffer_stack)); - (yy_buffer_stack) = NULL; - - return 0; + return 0; } /* @@ -1993,50 +1980,45 @@ yylex_destroy (void) */ #ifndef yytext_ptr -static void -yy_flex_strncpy (char *s1, yyconst char *s2, int n) +static void yy_flex_strncpy (char* s1, yyconst char * s2, int n ) { - register int i; - for (i = 0; i < n; ++i) - s1[i] = s2[i]; + register int i; + for ( i = 0; i < n; ++i ) + s1[i] = s2[i]; } #endif #ifdef YY_NEED_STRLEN -static int -yy_flex_strlen (yyconst char *s) +static int yy_flex_strlen (yyconst char * s ) { - register int n; - for (n = 0; s[n]; ++n) - ; + register int n; + for ( n = 0; s[n]; ++n ) + ; - return n; + return n; } #endif -void * -yyalloc (yy_size_t size) +void *yyalloc (yy_size_t size ) { - return (void *) malloc (size); + return (void *) malloc( size ); } -void * -yyrealloc (void *ptr, yy_size_t size) +void *yyrealloc (void * ptr, yy_size_t size ) { - /* The cast to (char *) in the following accommodates both - * implementations that use char* generic pointers, and those - * that use void* generic pointers. It works with the latter - * because both ANSI C and C++ allow castless assignment from - * any pointer type to void*, and deal with argument conversions - * as though doing an assignment. - */ - return (void *) realloc ((char *) ptr, size); + /* The cast to (char *) in the following accommodates both + * implementations that use char* generic pointers, and those + * that use void* generic pointers. It works with the latter + * because both ANSI C and C++ allow castless assignment from + * any pointer type to void*, and deal with argument conversions + * as though doing an assignment. + */ + return (void *) realloc( (char *) ptr, size ); } -void -yyfree (void *ptr) +void yyfree (void * ptr ) { - free ((char *) ptr); /* see yyrealloc() for (char *) cast */ + free( (char *) ptr ); /* see yyrealloc() for (char *) cast */ } #define YYTABLES_NAME "yytables" @@ -2057,58 +2039,54 @@ yyfree (void *ptr) -Symbol -mkstring (char *name) +Symbol mkstring(char *name) { - Symbol t; - char *s; - Stringlist sl; - int len; + Symbol t; + char* s; + Stringlist sl; + int len; - if ((t = lookup (name)) != NULL) - { - return t; - } - // make new name - len = strlen (name); - s = (char *) malloc (len + 1); - sl = (Stringlist) malloc (sizeof (struct stringlist)); - strncpy (s, name, len); - sl->next = allocatedStrings; - allocatedStrings = sl; - sl->string = s; - s[len] = EOS; + if (( t = lookup(name)) != NULL) + { + return t; + } + // make new name + len = strlen(name); + s = (char *)malloc(len+1); + sl = (Stringlist) malloc(sizeof(struct stringlist)); + strncpy(s,name,len); + sl->next = allocatedStrings; + allocatedStrings = sl; + sl->string = s; + s[len] = EOS; - t = get_symb (); - t->lineno = yylineno; - t->type = T_UNDEF; - t->text = s; + t = get_symb(); + t->lineno = yylineno; + t->type = T_UNDEF; + t->text = s; - insert (t); - return t; + insert(t); + return t; } -void -scanner_cleanup (void) +void scanner_cleanup(void) { - yy_delete_buffer (YY_CURRENT_BUFFER); + yy_delete_buffer (YY_CURRENT_BUFFER); } -void -strings_cleanup (void) +void strings_cleanup(void) { - Stringlist sl; - while (allocatedStrings != NULL) - { - sl = allocatedStrings; - allocatedStrings = sl->next; - free (sl->string); - free (sl); - } + Stringlist sl; + while (allocatedStrings != NULL) + { + sl = allocatedStrings; + allocatedStrings = sl->next; + free(sl->string); + free(sl); + } } -int -yywrap (void) +int yywrap (void) { /* signal true to let lex know that nothing else is coming */ return 1; @@ -2122,3 +2100,4 @@ void mktext(void); // vim:ft=lex: +