source4/heimdal/lib/com_err/lex.c

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