Sat Nov 1 06:28:23 2008

Asterisk developer's documentation

---

ast_expr2f.c

Go to the documentation of this file.

#line 2 "ast_expr2f.c"

#line 4 "ast_expr2f.c"

#define  YY_INT_ALIGNED short int

/* A lexical scanner generated by flex */

#define FLEX_SCANNER
#define YY_FLEX_MAJOR_VERSION 2
#define YY_FLEX_MINOR_VERSION 5
#define YY_FLEX_SUBMINOR_VERSION 33
#if YY_FLEX_SUBMINOR_VERSION > 0
#define FLEX_BETA
#endif

/* First, we deal with  platform-specific or compiler-specific issues. */

/* begin standard C headers. */
#include <stdio.h>
#include <string.h>
#include <errno.h>
#include <stdlib.h>

/* end standard C headers. */

/* flex integer type definitions */

#ifndef FLEXINT_H
#define FLEXINT_H

/* C99 systems have <inttypes.h>. Non-C99 systems may or may not. */

#if !defined __STDC_VERSION__ || __STDC_VERSION__ >= 199901L

/* C99 says to define __STDC_LIMIT_MACROS before including stdint.h,
 * if you want the limit (max/min) macros for int types. 
 */
#ifndef __STDC_LIMIT_MACROS
#define __STDC_LIMIT_MACROS 1
#endif

#include <inttypes.h>
typedef int8_t flex_int8_t;
typedef uint8_t flex_uint8_t;
typedef int16_t flex_int16_t;
typedef uint16_t flex_uint16_t;
typedef int32_t flex_int32_t;
typedef uint32_t flex_uint32_t;
#else
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 short int flex_uint16_t;
typedef unsigned int flex_uint32_t;
#endif /* ! C99 */

/* Limits of integral types. */
#ifndef INT8_MIN
#define INT8_MIN               (-128)
#endif
#ifndef INT16_MIN
#define INT16_MIN              (-32767-1)
#endif
#ifndef INT32_MIN
#define INT32_MIN              (-2147483647-1)
#endif
#ifndef INT8_MAX
#define INT8_MAX               (127)
#endif
#ifndef INT16_MAX
#define INT16_MAX              (32767)
#endif
#ifndef INT32_MAX
#define INT32_MAX              (2147483647)
#endif
#ifndef UINT8_MAX
#define UINT8_MAX              (255U)
#endif
#ifndef UINT16_MAX
#define UINT16_MAX             (65535U)
#endif
#ifndef UINT32_MAX
#define UINT32_MAX             (4294967295U)
#endif

#endif /* ! FLEXINT_H */

#ifdef __cplusplus

/* The "const" storage-class-modifier is valid. */
#define YY_USE_CONST

#else /* ! __cplusplus */

#if __STDC__

#define YY_USE_CONST

#endif   /* __STDC__ */
#endif   /* ! __cplusplus */

#ifdef YY_USE_CONST
#define yyconst const
#else
#define yyconst
#endif

/* Returned upon end-of-file. */
#define YY_NULL 0

/* Promotes a possibly negative, possibly signed char to an unsigned
 * integer for use as an array index.  If the signed char is negative,
 * we want to instead treat it as an 8-bit unsigned char, hence the
 * double cast.
 */
#define YY_SC_TO_UI(c) ((unsigned int) (unsigned char) c)

/* An opaque pointer. */
#ifndef YY_TYPEDEF_YY_SCANNER_T
#define YY_TYPEDEF_YY_SCANNER_T
typedef void* yyscan_t;
#endif

/* For convenience, these vars (plus the bison vars far below)
   are macros in the reentrant scanner. */
#define yyin yyg->yyin_r
#define yyout yyg->yyout_r
#define yyextra yyg->yyextra_r
#define yyleng yyg->yyleng_r
#define yytext yyg->yytext_r
#define yylineno (YY_CURRENT_BUFFER_LVALUE->yy_bs_lineno)
#define yycolumn (YY_CURRENT_BUFFER_LVALUE->yy_bs_column)
#define yy_flex_debug yyg->yy_flex_debug_r

int ast_yylex_init (yyscan_t* scanner);

/* Enter a start condition.  This macro really ought to take a parameter,
 * but we do it the disgusting crufty way forced on us by the ()-less
 * definition of BEGIN.
 */
#define BEGIN yyg->yy_start = 1 + 2 *

/* Translate the current start state into a value that can be later handed
 * to BEGIN to return to the state.  The YYSTATE alias is for lex
 * compatibility.
 */
#define YY_START ((yyg->yy_start - 1) / 2)
#define YYSTATE YY_START

/* Action number for EOF rule of a given start state. */
#define YY_STATE_EOF(state) (YY_END_OF_BUFFER + state + 1)

/* Special action meaning "start processing a new file". */
#define YY_NEW_FILE ast_yyrestart(yyin ,yyscanner )

#define YY_END_OF_BUFFER_CHAR 0

/* Size of default input buffer. */
#ifndef YY_BUF_SIZE
#define YY_BUF_SIZE 16384
#endif

/* The state buf must be large enough to hold one state per character in the main buffer.
 */
#define YY_STATE_BUF_SIZE   ((YY_BUF_SIZE + 2) * sizeof(yy_state_type))

#ifndef YY_TYPEDEF_YY_BUFFER_STATE
#define YY_TYPEDEF_YY_BUFFER_STATE
typedef struct yy_buffer_state *YY_BUFFER_STATE;
#endif

#define EOB_ACT_CONTINUE_SCAN 0
#define EOB_ACT_END_OF_FILE 1
#define EOB_ACT_LAST_MATCH 2

    #define YY_LESS_LINENO(n)
    
/* Return all but the first "n" matched characters back to the input stream. */
#define yyless(n) \
   do \
      { \
      /* Undo effects of setting up yytext. */ \
        int yyless_macro_arg = (n); \
        YY_LESS_LINENO(yyless_macro_arg);\
      *yy_cp = yyg->yy_hold_char; \
      YY_RESTORE_YY_MORE_OFFSET \
      yyg->yy_c_buf_p = yy_cp = yy_bp + yyless_macro_arg - YY_MORE_ADJ; \
      YY_DO_BEFORE_ACTION; /* set up yytext again */ \
      } \
   while ( 0 )

#define unput(c) yyunput( c, yyg->yytext_ptr , yyscanner )

/* The following is because we cannot portably get our hands on size_t
 * (without autoconf's help, which isn't available because we want
 * flex-generated scanners to compile on their own).
 */

#ifndef YY_TYPEDEF_YY_SIZE_T
#define YY_TYPEDEF_YY_SIZE_T
typedef unsigned int yy_size_t;
#endif

#ifndef YY_STRUCT_YY_BUFFER_STATE
#define YY_STRUCT_YY_BUFFER_STATE
struct yy_buffer_state
   {
   FILE *yy_input_file;

   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;

   /* 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 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;

    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;

   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 ast_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 */

/* We provide macros for accessing buffer states in case in the
 * future we want to put the buffer states in a more general
 * "scanner state".
 *
 * Returns the top of the stack, or NULL.
 */
#define YY_CURRENT_BUFFER ( yyg->yy_buffer_stack \
                          ? yyg->yy_buffer_stack[yyg->yy_buffer_stack_top] \
                          : NULL)

/* Same as previous macro, but useful when we know that the buffer stack is not
 * NULL or when we need an lvalue. For internal use only.
 */
#define YY_CURRENT_BUFFER_LVALUE yyg->yy_buffer_stack[yyg->yy_buffer_stack_top]

void ast_yyrestart (FILE *input_file ,yyscan_t yyscanner );
void ast_yy_switch_to_buffer (YY_BUFFER_STATE new_buffer ,yyscan_t yyscanner );
YY_BUFFER_STATE ast_yy_create_buffer (FILE *file,int size ,yyscan_t yyscanner );
void ast_yy_delete_buffer (YY_BUFFER_STATE b ,yyscan_t yyscanner );
void ast_yy_flush_buffer (YY_BUFFER_STATE b ,yyscan_t yyscanner );
void ast_yypush_buffer_state (YY_BUFFER_STATE new_buffer ,yyscan_t yyscanner );
void ast_yypop_buffer_state (yyscan_t yyscanner );

static void ast_yyensure_buffer_stack (yyscan_t yyscanner );
static void ast_yy_load_buffer_state (yyscan_t yyscanner );
static void ast_yy_init_buffer (YY_BUFFER_STATE b,FILE *file ,yyscan_t yyscanner );

#define YY_FLUSH_BUFFER ast_yy_flush_buffer(YY_CURRENT_BUFFER ,yyscanner)

YY_BUFFER_STATE ast_yy_scan_buffer (char *base,yy_size_t size ,yyscan_t yyscanner );
YY_BUFFER_STATE ast_yy_scan_string (yyconst char *yy_str ,yyscan_t yyscanner );
YY_BUFFER_STATE ast_yy_scan_bytes (yyconst char *bytes,int len ,yyscan_t yyscanner );

void *ast_yyalloc (yy_size_t ,yyscan_t yyscanner );
void *ast_yyrealloc (void *,yy_size_t ,yyscan_t yyscanner );
void ast_yyfree (void * ,yyscan_t yyscanner );

#define yy_new_buffer ast_yy_create_buffer

#define yy_set_interactive(is_interactive) \
   { \
   if ( ! YY_CURRENT_BUFFER ){ \
        ast_yyensure_buffer_stack (yyscanner); \
      YY_CURRENT_BUFFER_LVALUE =    \
            ast_yy_create_buffer(yyin,YY_BUF_SIZE ,yyscanner); \
   } \
   YY_CURRENT_BUFFER_LVALUE->yy_is_interactive = is_interactive; \
   }

#define yy_set_bol(at_bol) \
   { \
   if ( ! YY_CURRENT_BUFFER ){\
        ast_yyensure_buffer_stack (yyscanner); \
      YY_CURRENT_BUFFER_LVALUE =    \
            ast_yy_create_buffer(yyin,YY_BUF_SIZE ,yyscanner); \
   } \
   YY_CURRENT_BUFFER_LVALUE->yy_at_bol = at_bol; \
   }

#define YY_AT_BOL() (YY_CURRENT_BUFFER_LVALUE->yy_at_bol)

/* Begin user sect3 */

#define ast_yywrap(n) 1
#define YY_SKIP_YYWRAP

typedef unsigned char YY_CHAR;

typedef int yy_state_type;

#define yytext_ptr yytext_r

static yy_state_type yy_get_previous_state (yyscan_t yyscanner );
static yy_state_type yy_try_NUL_trans (yy_state_type current_state  ,yyscan_t yyscanner);
static int yy_get_next_buffer (yyscan_t yyscanner );
static void yy_fatal_error (yyconst char msg[] ,yyscan_t yyscanner );

/* Done after the current pattern has been matched and before the
 * corresponding action - sets up yytext.
 */
#define YY_DO_BEFORE_ACTION \
   yyg->yytext_ptr = yy_bp; \
   yyg->yytext_ptr -= yyg->yy_more_len; \
   yyleng = (size_t) (yy_cp - yyg->yytext_ptr); \
   yyg->yy_hold_char = *yy_cp; \
   *yy_cp = '\0'; \
   yyg->yy_c_buf_p = yy_cp;

#define YY_NUM_RULES 35
#define YY_END_OF_BUFFER 36
/* 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[55] =
    {   0,
        0,    0,    0,    0,   32,   32,   36,   35,   25,   27,
       19,   35,   29,   29,   17,    2,   22,   23,   15,   13,
       14,   16,   28,   20,    9,    3,    8,   18,    1,   35,
       31,   30,   32,   33,   33,   12,    0,   26,   29,   24,
        5,   28,   21,   11,    6,    7,   10,    4,    0,   31,
       30,   32,   34,    0
    } ;

static yyconst flex_int32_t yy_ec[256] =
    {   0,
        1,    1,    1,    1,    1,    1,    1,    1,    2,    3,
        1,    1,    2,    1,    1,    1,    1,    1,    1,    1,
        1,    1,    1,    1,    1,    1,    1,    1,    1,    1,
        1,    2,    4,    5,    6,    7,    8,    9,    6,   10,
       11,   12,   13,    6,   14,    6,   15,   16,   16,   16,
       16,   16,   16,   16,   16,   16,   16,   17,    6,   18,
       19,   20,   21,    6,    6,    6,    6,    6,    6,    6,
        6,    6,    6,    6,    6,    6,    6,    6,    6,    6,
        6,    6,    6,    6,    6,    6,    6,    6,    6,    6,
        1,    6,    1,    6,    6,    1,    6,    6,    6,    6,

        6,    6,    6,    6,    6,    6,    6,    6,    6,    6,
        6,    6,    6,    6,    6,    6,    6,    6,    6,    6,
        6,    6,   22,   23,   24,   25,    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[26] =
    {   0,
        1,    2,    2,    2,    1,    3,    4,    2,    2,    2,
        2,    2,    2,    2,    2,    3,    2,    2,    2,    2,
        2,    3,    2,    1,    1
    } ;

static yyconst flex_int16_t yy_base[61] =
    {   0,
        0,    0,    4,    5,   29,   54,   71,  101,  101,  101,
       50,   63,   25,   45,  101,   56,  101,  101,  101,  101,
      101,  101,   31,   47,   44,   14,   43,  101,   29,   18,
      101,  101,    0,  101,   28,  101,   38,  101,   42,  101,
      101,   50,  101,  101,  101,  101,  101,  101,   22,  101,
      101,    0,  101,  101,   79,   83,   87,   89,   93,   97
    } ;

static yyconst flex_int16_t yy_def[61] =
    {   0,
       54,    1,   55,   55,   56,   56,   54,   54,   54,   54,
       54,   57,   54,   58,   54,   54,   54,   54,   54,   54,
       54,   54,   54,   54,   54,   54,   54,   54,   54,   59,
       54,   54,   60,   54,   54,   54,   57,   54,   54,   54,
       54,   54,   54,   54,   54,   54,   54,   54,   59,   54,
       54,   60,   54,    0,   54,   54,   54,   54,   54,   54
    } ;

static yyconst flex_int16_t yy_nxt[127] =
    {   0,
        8,    9,   10,   11,   12,   13,   14,   15,   16,   17,
       18,   19,   20,   21,   22,   23,   24,   25,   26,   27,
       28,    8,   29,    8,    8,   31,   31,   32,   32,   33,
       39,   39,   45,   33,   33,   35,   39,   39,   46,   50,
       39,   51,   38,   50,   33,   51,   42,   39,   39,   53,
       33,   48,   33,   33,   33,   39,   39,   39,   33,   33,
       35,   47,   44,   43,   41,   42,   40,   38,   36,   33,
       54,   54,   54,   54,   54,   33,   54,   33,   33,   30,
       30,   30,   30,   34,   34,   34,   34,   37,   37,   37,
       37,   39,   39,   49,   49,   49,   49,   52,   54,   52,

        7,   54,   54,   54,   54,   54,   54,   54,   54,   54,
       54,   54,   54,   54,   54,   54,   54,   54,   54,   54,
       54,   54,   54,   54,   54,   54
    } ;

static yyconst flex_int16_t yy_chk[127] =
    {   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,    3,    4,    3,    4,    5,
       13,   13,   26,    5,    5,    5,   23,   23,   26,   30,
       13,   30,   37,   49,    5,   49,   23,   39,   39,   35,
        5,   29,    5,    5,    6,   42,   42,   39,    6,    6,
        6,   27,   25,   24,   16,   42,   14,   12,   11,    6,
        7,    0,    0,    0,    0,    6,    0,    6,    6,   55,
       55,   55,   55,   56,   56,   56,   56,   57,   57,   57,
       57,   58,   58,   59,   59,   59,   59,   60,    0,   60,

       54,   54,   54,   54,   54,   54,   54,   54,   54,   54,
       54,   54,   54,   54,   54,   54,   54,   54,   54,   54,
       54,   54,   54,   54,   54,   54
    } ;

/* The intent behind this definition is that it'll catch
 * any uses of REJECT which flex missed.
 */
#define REJECT reject_used_but_not_detected
#define yymore() (yyg->yy_more_flag = 1)
#define YY_MORE_ADJ yyg->yy_more_len
#define YY_RESTORE_YY_MORE_OFFSET
#line 1 "ast_expr2.fl"
#line 2 "ast_expr2.fl"
/*
 * Asterisk -- An open source telephony toolkit.
 *
 * Copyright (C) 1999 - 2006, Digium, Inc.
 *
 * Mark Spencer <markster@digium.com>
 *
 * See http://www.asterisk.org for more information about
 * the Asterisk project. Please do not directly contact
 * any of the maintainers of this project for assistance;
 * the project provides a web site, mailing lists and IRC
 * channels for your use.
 *
 * This program is free software, distributed under the terms of
 * the GNU General Public License Version 2. See the LICENSE file
 * at the top of the source tree.
 */

/*! \file
 *
 * \brief Dialplan Expression Lexical Scanner
 */

#include "asterisk.h"

#if !defined(STANDALONE_AEL)
ASTERISK_FILE_VERSION(__FILE__, "$Revision: 144924 $")
#endif

#include <sys/types.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <locale.h>
#include <ctype.h>
#if !defined(SOLARIS) && !defined(__CYGWIN__)
/* #include <err.h> */
#else
#define quad_t int64_t
#endif
#include <errno.h>
#include <regex.h>
#include <limits.h>

#include "asterisk/ast_expr.h"
#include "asterisk/logger.h"
#include "asterisk/strings.h"

enum valtype {
   AST_EXPR_integer, AST_EXPR_numeric_string, AST_EXPR_string
} ;

struct val {
   enum valtype type;
   union {
      char *s;
      quad_t i;
   } u;
} ;

#include "ast_expr2.h" /* the o/p of the bison on ast_expr2.y */

#define SET_COLUMNS  do {     \
   yylloc_param->first_column = (int)(yyg->yytext_r - YY_CURRENT_BUFFER_LVALUE->yy_ch_buf); \
   yylloc_param->last_column += yyleng - 1; \
   yylloc_param->first_line = yylloc_param->last_line = 1; \
   } while (0)

#define SET_STRING   do {     \
   yylval_param->val = calloc(1, sizeof(struct val)); \
   yylval_param->val->type = AST_EXPR_string;      \
   yylval_param->val->u.s = strdup(yytext);     \
   } while (0)

#define SET_NUMERIC_STRING do {  \
   yylval_param->val = calloc(1, sizeof(struct val)); \
   yylval_param->val->type = AST_EXPR_numeric_string; \
   yylval_param->val->u.s = strdup(yytext);  \
   } while (0)

struct parse_io
{
   char *string;
   struct val *val;
   yyscan_t scanner;
};
 
void ast_yyset_column(int column_no, yyscan_t yyscanner);
int ast_yyget_column(yyscan_t yyscanner);
static int curlycount = 0;
static char *expr2_token_subst(const char *mess);

#line 575 "ast_expr2f.c"

#define INITIAL 0
#define var 1
#define trail 2

#ifndef YY_NO_UNISTD_H
/* Special case for "unistd.h", since it is non-ANSI. We include it way
 * down here because we want the user's section 1 to have been scanned first.
 * The user has a chance to override it with an option.
 */
#include <unistd.h>
#endif

#ifndef YY_EXTRA_TYPE
#define YY_EXTRA_TYPE void *
#endif

/* Holds the entire state of the reentrant scanner. */
struct yyguts_t
    {

    /* User-defined. Not touched by flex. */
    YY_EXTRA_TYPE yyextra_r;

    /* The rest are the same as the globals declared in the non-reentrant scanner. */
    FILE *yyin_r, *yyout_r;
    size_t yy_buffer_stack_top; /**< index of top of stack. */
    size_t yy_buffer_stack_max; /**< capacity of stack. */
    YY_BUFFER_STATE * yy_buffer_stack; /**< Stack as an array. */
    char yy_hold_char;
    int yy_n_chars;
    int yyleng_r;
    char *yy_c_buf_p;
    int yy_init;
    int yy_start;
    int yy_did_buffer_switch_on_eof;
    int yy_start_stack_ptr;
    int yy_start_stack_depth;
    int *yy_start_stack;
    yy_state_type yy_last_accepting_state;
    char* yy_last_accepting_cpos;

    int yylineno_r;
    int yy_flex_debug_r;

    char *yytext_r;
    int yy_more_flag;
    int yy_more_len;

    YYSTYPE * yylval_r;

    YYLTYPE * yylloc_r;

    }; /* end struct yyguts_t */

static int yy_init_globals (yyscan_t yyscanner );

    /* This must go here because YYSTYPE and YYLTYPE are included
     * from bison output in section 1.*/
    #    define yylval yyg->yylval_r
    
    #    define yylloc yyg->yylloc_r
    
/* Accessor methods to globals.
   These are made visible to non-reentrant scanners for convenience. */

int ast_yylex_destroy (yyscan_t yyscanner );

int ast_yyget_debug (yyscan_t yyscanner );

void ast_yyset_debug (int debug_flag ,yyscan_t yyscanner );

YY_EXTRA_TYPE ast_yyget_extra (yyscan_t yyscanner );

void ast_yyset_extra (YY_EXTRA_TYPE user_defined ,yyscan_t yyscanner );

FILE *ast_yyget_in (yyscan_t yyscanner );

void ast_yyset_in  (FILE * in_str ,yyscan_t yyscanner );

FILE *ast_yyget_out (yyscan_t yyscanner );

void ast_yyset_out  (FILE * out_str ,yyscan_t yyscanner );

int ast_yyget_leng (yyscan_t yyscanner );

char *ast_yyget_text (yyscan_t yyscanner );

int ast_yyget_lineno (yyscan_t yyscanner );

void ast_yyset_lineno (int line_number ,yyscan_t yyscanner );

YYSTYPE * ast_yyget_lval (yyscan_t yyscanner );

void ast_yyset_lval (YYSTYPE * yylval_param ,yyscan_t yyscanner );

       YYLTYPE *ast_yyget_lloc (yyscan_t yyscanner );
    
        void ast_yyset_lloc (YYLTYPE * yylloc_param ,yyscan_t yyscanner );
    
/* Macros after this point can all be overridden by user definitions in
 * section 1.
 */

#ifndef YY_SKIP_YYWRAP
#ifdef __cplusplus
extern "C" int ast_yywrap (yyscan_t yyscanner );
#else
extern int ast_yywrap (yyscan_t yyscanner );
#endif
#endif

    static void yyunput (int c,char *buf_ptr  ,yyscan_t yyscanner);
    
#ifndef yytext_ptr
static void yy_flex_strncpy (char *,yyconst char *,int ,yyscan_t yyscanner);
#endif

#ifdef YY_NEED_STRLEN
static int yy_flex_strlen (yyconst char * ,yyscan_t yyscanner);
#endif

#ifndef YY_NO_INPUT

#ifdef __cplusplus
static int yyinput (yyscan_t yyscanner );
#else
static int input (yyscan_t yyscanner );
#endif

#endif

/* Amount of stuff to slurp up with each read. */
#ifndef YY_READ_BUF_SIZE
#define YY_READ_BUF_SIZE 8192
#endif

/* Copy whatever the last rule matched to the standard output. */
#ifndef ECHO
/* This used to be an fputs(), but since the string might contain NUL's,
 * we now use fwrite().
 */
#define ECHO (void) fwrite( yytext, yyleng, 1, yyout )
#endif

/* Gets input and stuffs it into "buf".  number of characters read, or YY_NULL,
 * is returned in "result".
 */
#ifndef YY_INPUT
#define YY_INPUT(buf,result,max_size) \
   if ( YY_CURRENT_BUFFER_LVALUE->yy_is_interactive ) \
      { \
      int c = '*'; \
      size_t n; \
      for ( n = 0; n < max_size && \
              (c = getc( yyin )) != EOF && c != '\n'; ++n ) \
         buf[n] = (char) c; \
      if ( c == '\n' ) \
         buf[n++] = (char) c; \
      if ( c == EOF && ferror( yyin ) ) \
         YY_FATAL_ERROR( "input in flex scanner failed" ); \
      result = n; \
      } \
   else \
      { \
      errno=0; \
      while ( (result = fread(buf, 1, max_size, yyin))==0 && ferror(yyin)) \
         { \
         if( errno != EINTR) \
            { \
            YY_FATAL_ERROR( "input in flex scanner failed" ); \
            break; \
            } \
         errno=0; \
         clearerr(yyin); \
         } \
      }\
\

#endif

/* No semi-colon after return; correct usage is to write "yyterminate();" -
 * we don't want an extra ';' after the "return" because that will cause
 * some compilers to complain about unreachable statements.
 */
#ifndef yyterminate
#define yyterminate() return YY_NULL
#endif

/* Number of entries by which start-condition stack grows. */
#ifndef YY_START_STACK_INCR
#define YY_START_STACK_INCR 25
#endif

/* Report a fatal error. */
#ifndef YY_FATAL_ERROR
#define YY_FATAL_ERROR(msg) yy_fatal_error( msg , yyscanner)
#endif

/* end tables serialization structures and prototypes */

/* Default declaration of generated scanner - a define so the user can
 * easily add parameters.
 */
#ifndef YY_DECL
#define YY_DECL_IS_OURS 1

extern int ast_yylex (YYSTYPE * yylval_param,YYLTYPE * yylloc_param ,yyscan_t yyscanner);

#define YY_DECL int ast_yylex (YYSTYPE * yylval_param, YYLTYPE * yylloc_param , yyscan_t yyscanner)
#endif /* !YY_DECL */

/* Code executed at the beginning of each rule, after yytext and yyleng
 * have been set up.
 */
#ifndef YY_USER_ACTION
#define YY_USER_ACTION
#endif

/* Code executed at the end of each rule. */
#ifndef YY_BREAK
#define YY_BREAK break;
#endif

#define YY_RULE_SETUP \
   YY_USER_ACTION

/** The main scanner function which does all the work.
 */
YY_DECL
{
   register yy_state_type yy_current_state;
   register char *yy_cp, *yy_bp;
   register int yy_act;
    struct yyguts_t * yyg = (struct yyguts_t*)yyscanner;

#line 105 "ast_expr2.fl"


#line 815 "ast_expr2f.c"

    yylval = yylval_param;

    yylloc = yylloc_param;

   if ( !yyg->yy_init )
      {
      yyg->yy_init = 1;

#ifdef YY_USER_INIT
      YY_USER_INIT;
#endif

      if ( ! yyg->yy_start )
         yyg->yy_start = 1;   /* first start state */

      if ( ! yyin )
         yyin = stdin;

      if ( ! yyout )
         yyout = stdout;

      if ( ! YY_CURRENT_BUFFER ) {
         ast_yyensure_buffer_stack (yyscanner);
         YY_CURRENT_BUFFER_LVALUE =
            ast_yy_create_buffer(yyin,YY_BUF_SIZE ,yyscanner);
      }

      ast_yy_load_buffer_state(yyscanner );
      }

   while ( 1 )    /* loops until end-of-file is reached */
      {
      yyg->yy_more_len = 0;
      if ( yyg->yy_more_flag )
         {
         yyg->yy_more_len = yyg->yy_c_buf_p - yyg->yytext_ptr;
         yyg->yy_more_flag = 0;
         }
      yy_cp = yyg->yy_c_buf_p;

      /* Support of yytext. */
      *yy_cp = yyg->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_current_state = yyg->yy_start;
yy_match:
      do
         {
         register YY_CHAR yy_c = yy_ec[YY_SC_TO_UI(*yy_cp)];
         if ( yy_accept[yy_current_state] )
            {
            yyg->yy_last_accepting_state = yy_current_state;
            yyg->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 >= 55 )
               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_current_state != 54 );
      yy_cp = yyg->yy_last_accepting_cpos;
      yy_current_state = yyg->yy_last_accepting_state;

yy_find_action:
      yy_act = yy_accept[yy_current_state];

      YY_DO_BEFORE_ACTION;

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 = yyg->yy_hold_char;
         yy_cp = yyg->yy_last_accepting_cpos;
         yy_current_state = yyg->yy_last_accepting_state;
         goto yy_find_action;

case 1:
YY_RULE_SETUP
#line 107 "ast_expr2.fl"
{ SET_COLUMNS; SET_STRING; return TOK_OR;}
   YY_BREAK
case 2:
YY_RULE_SETUP
#line 108 "ast_expr2.fl"
{ SET_COLUMNS; SET_STRING; return TOK_AND;}
   YY_BREAK
case 3:
YY_RULE_SETUP
#line 109 "ast_expr2.fl"
{ SET_COLUMNS; SET_STRING; return TOK_EQ;}
   YY_BREAK
case 4:
YY_RULE_SETUP
#line 110 "ast_expr2.fl"
{ SET_COLUMNS; SET_STRING; return TOK_OR;}
   YY_BREAK
case 5:
YY_RULE_SETUP
#line 111 "ast_expr2.fl"
{ SET_COLUMNS; SET_STRING; return TOK_AND;}
   YY_BREAK
case 6:
YY_RULE_SETUP
#line 112 "ast_expr2.fl"
{ SET_COLUMNS; SET_STRING; return TOK_EQ;}
   YY_BREAK
case 7:
YY_RULE_SETUP
#line 113 "ast_expr2.fl"
{ SET_COLUMNS; SET_STRING; return TOK_EQTILDE;}
   YY_BREAK
case 8:
YY_RULE_SETUP
#line 114 "ast_expr2.fl"
{ SET_COLUMNS; SET_STRING; return TOK_GT;}
   YY_BREAK
case 9:
YY_RULE_SETUP
#line 115 "ast_expr2.fl"
{ SET_COLUMNS; SET_STRING; return TOK_LT;}
   YY_BREAK
case 10:
YY_RULE_SETUP
#line 116 "ast_expr2.fl"
{ SET_COLUMNS; SET_STRING; return TOK_GE;}
   YY_BREAK
case 11:
YY_RULE_SETUP
#line 117 "ast_expr2.fl"
{ SET_COLUMNS; SET_STRING; return TOK_LE;}
   YY_BREAK
case 12:
YY_RULE_SETUP
#line 118 "ast_expr2.fl"
{ SET_COLUMNS; SET_STRING; return TOK_NE;}
   YY_BREAK
case 13:
YY_RULE_SETUP
#line 119 "ast_expr2.fl"
{ SET_COLUMNS; SET_STRING; return TOK_PLUS;}
   YY_BREAK
case 14:
YY_RULE_SETUP
#line 120 "ast_expr2.fl"
{ SET_COLUMNS; SET_STRING; return TOK_MINUS;}
   YY_BREAK
case 15:
YY_RULE_SETUP
#line 121 "ast_expr2.fl"
{ SET_COLUMNS; SET_STRING; return TOK_MULT;}
   YY_BREAK
case 16:
YY_RULE_SETUP
#line 122 "ast_expr2.fl"
{ SET_COLUMNS; SET_STRING; return TOK_DIV;}
   YY_BREAK
case 17:
YY_RULE_SETUP
#line 123 "ast_expr2.fl"
{ SET_COLUMNS; SET_STRING; return TOK_MOD;}
   YY_BREAK
case 18:
YY_RULE_SETUP
#line 124 "ast_expr2.fl"
{ SET_COLUMNS; SET_STRING; return TOK_COND;}
   YY_BREAK
case 19:
YY_RULE_SETUP
#line 125 "ast_expr2.fl"
{ SET_COLUMNS; SET_STRING; return TOK_COMPL;}
   YY_BREAK
case 20:
YY_RULE_SETUP
#line 126 "ast_expr2.fl"
{ SET_COLUMNS; SET_STRING; return TOK_COLON;}
   YY_BREAK
case 21:
YY_RULE_SETUP
#line 127 "ast_expr2.fl"
{ SET_COLUMNS; SET_STRING; return TOK_COLONCOLON;}
   YY_BREAK
case 22:
YY_RULE_SETUP
#line 128 "ast_expr2.fl"
{ SET_COLUMNS; SET_STRING; return TOK_LP;}
   YY_BREAK
case 23:
YY_RULE_SETUP
#line 129 "ast_expr2.fl"
{ SET_COLUMNS; SET_STRING; return TOK_RP;}
   YY_BREAK
case 24:
YY_RULE_SETUP