Asterisk - The Open Source Telephony Project GIT-master-d856a3e
ael_lex.c
Go to the documentation of this file.
1#define ASTMM_LIBC ASTMM_REDIRECT
2#include "asterisk.h"
3
4#line 2 "ael_lex.c"
5
6#line 4 "ael_lex.c"
7
8#define YY_INT_ALIGNED short int
9
10/* A lexical scanner generated by flex */
11
12#define FLEX_SCANNER
13#define YY_FLEX_MAJOR_VERSION 2
14#define YY_FLEX_MINOR_VERSION 5
15#define YY_FLEX_SUBMINOR_VERSION 35
16#if YY_FLEX_SUBMINOR_VERSION > 0
17#define FLEX_BETA
18#endif
19
20/* First, we deal with platform-specific or compiler-specific issues. */
21
22/* begin standard C headers. */
23#include <stdio.h>
24#include <string.h>
25#include <errno.h>
26#include <stdlib.h>
27
28/* end standard C headers. */
29
30/* flex integer type definitions */
31
32#ifndef FLEXINT_H
33#define FLEXINT_H
34
35/* C99 systems have <inttypes.h>. Non-C99 systems may or may not. */
36
37#if defined (__STDC_VERSION__) && __STDC_VERSION__ >= 199901L
38
39/* C99 says to define __STDC_LIMIT_MACROS before including stdint.h,
40 * if you want the limit (max/min) macros for int types.
41 */
42#ifndef __STDC_LIMIT_MACROS
43#define __STDC_LIMIT_MACROS 1
44#endif
45
46#include <inttypes.h>
47typedef int8_t flex_int8_t;
48typedef uint8_t flex_uint8_t;
49typedef int16_t flex_int16_t;
50typedef uint16_t flex_uint16_t;
51typedef int32_t flex_int32_t;
52typedef uint32_t flex_uint32_t;
53#else
54typedef signed char flex_int8_t;
55typedef short int flex_int16_t;
56typedef int flex_int32_t;
57typedef unsigned char flex_uint8_t;
58typedef unsigned short int flex_uint16_t;
59typedef unsigned int flex_uint32_t;
60#endif /* ! C99 */
61
62/* Limits of integral types. */
63#ifndef INT8_MIN
64#define INT8_MIN (-128)
65#endif
66#ifndef INT16_MIN
67#define INT16_MIN (-32767-1)
68#endif
69#ifndef INT32_MIN
70#define INT32_MIN (-2147483647-1)
71#endif
72#ifndef INT8_MAX
73#define INT8_MAX (127)
74#endif
75#ifndef INT16_MAX
76#define INT16_MAX (32767)
77#endif
78#ifndef INT32_MAX
79#define INT32_MAX (2147483647)
80#endif
81#ifndef UINT8_MAX
82#define UINT8_MAX (255U)
83#endif
84#ifndef UINT16_MAX
85#define UINT16_MAX (65535U)
86#endif
87#ifndef UINT32_MAX
88#define UINT32_MAX (4294967295U)
89#endif
90
91#endif /* ! FLEXINT_H */
92
93#ifdef __cplusplus
94
95/* The "const" storage-class-modifier is valid. */
96#define YY_USE_CONST
97
98#else /* ! __cplusplus */
99
100/* C99 requires __STDC__ to be defined as 1. */
101#if defined (__STDC__)
102
103#define YY_USE_CONST
104
105#endif /* defined (__STDC__) */
106#endif /* ! __cplusplus */
107
108#ifdef YY_USE_CONST
109#define yyconst const
110#else
111#define yyconst
112#endif
113
114/* Returned upon end-of-file. */
115#define YY_NULL 0
116
117/* Promotes a possibly negative, possibly signed char to an unsigned
118 * integer for use as an array index. If the signed char is negative,
119 * we want to instead treat it as an 8-bit unsigned char, hence the
120 * double cast.
121 */
122#define YY_SC_TO_UI(c) ((unsigned int) (unsigned char) c)
123
124/* An opaque pointer. */
125#ifndef YY_TYPEDEF_YY_SCANNER_T
126#define YY_TYPEDEF_YY_SCANNER_T
127typedef void* yyscan_t;
128#endif
129
130/* For convenience, these vars (plus the bison vars far below)
131 are macros in the reentrant scanner. */
132#define yyin yyg->yyin_r
133#define yyout yyg->yyout_r
134#define yyextra yyg->yyextra_r
135#define yyleng yyg->yyleng_r
136#define yytext yyg->yytext_r
137#define yylineno (YY_CURRENT_BUFFER_LVALUE->yy_bs_lineno)
138#define yycolumn (YY_CURRENT_BUFFER_LVALUE->yy_bs_column)
139#define yy_flex_debug yyg->yy_flex_debug_r
140
141/* Enter a start condition. This macro really ought to take a parameter,
142 * but we do it the disgusting crufty way forced on us by the ()-less
143 * definition of BEGIN.
144 */
145#define BEGIN yyg->yy_start = 1 + 2 *
146
147/* Translate the current start state into a value that can be later handed
148 * to BEGIN to return to the state. The YYSTATE alias is for lex
149 * compatibility.
150 */
151#define YY_START ((yyg->yy_start - 1) / 2)
152#define YYSTATE YY_START
153
154/* Action number for EOF rule of a given start state. */
155#define YY_STATE_EOF(state) (YY_END_OF_BUFFER + state + 1)
156
157/* Special action meaning "start processing a new file". */
158#define YY_NEW_FILE ael_yyrestart(yyin ,yyscanner )
159
160#define YY_END_OF_BUFFER_CHAR 0
161
162/* Size of default input buffer. */
163#ifndef YY_BUF_SIZE
164#define YY_BUF_SIZE 16384
165#endif
166
167/* The state buf must be large enough to hold one state per character in the main buffer.
168 */
169#define YY_STATE_BUF_SIZE ((YY_BUF_SIZE + 2) * sizeof(yy_state_type))
170
171#ifndef YY_TYPEDEF_YY_BUFFER_STATE
172#define YY_TYPEDEF_YY_BUFFER_STATE
174#endif
175
176#define EOB_ACT_CONTINUE_SCAN 0
177#define EOB_ACT_END_OF_FILE 1
178#define EOB_ACT_LAST_MATCH 2
179
180 #define YY_LESS_LINENO(n)
181
182/* Return all but the first "n" matched characters back to the input stream. */
183#define yyless(n) \
184 do \
185 { \
186 /* Undo effects of setting up yytext. */ \
187 int yyless_macro_arg = (n); \
188 YY_LESS_LINENO(yyless_macro_arg);\
189 *yy_cp = yyg->yy_hold_char; \
190 YY_RESTORE_YY_MORE_OFFSET \
191 yyg->yy_c_buf_p = yy_cp = yy_bp + yyless_macro_arg - YY_MORE_ADJ; \
192 YY_DO_BEFORE_ACTION; /* set up yytext again */ \
193 } \
194 while ( 0 )
195
196#define unput(c) yyunput( c, yyg->yytext_ptr , yyscanner )
197
198#ifndef YY_TYPEDEF_YY_SIZE_T
199#define YY_TYPEDEF_YY_SIZE_T
200typedef size_t yy_size_t;
201#endif
202
203#ifndef YY_STRUCT_YY_BUFFER_STATE
204#define YY_STRUCT_YY_BUFFER_STATE
205struct yy_buffer_state
206 {
207 FILE *yy_input_file;
208
209 char *yy_ch_buf; /* input buffer */
210 char *yy_buf_pos; /* current position in input buffer */
211
212 /* Size of input buffer in bytes, not including room for EOB
213 * characters.
214 */
216
217 /* Number of characters read into yy_ch_buf, not including EOB
218 * characters.
219 */
220 int yy_n_chars;
221
222 /* Whether we "own" the buffer - i.e., we know we created it,
223 * and can realloc() it to grow it, and should free() it to
224 * delete it.
225 */
227
228 /* Whether this is an "interactive" input source; if so, and
229 * if we're using stdio for input, then we want to use getc()
230 * instead of fread(), to make sure we stop fetching input after
231 * each newline.
232 */
234
235 /* Whether we're considered to be at the beginning of a line.
236 * If so, '^' rules will be active on the next match, otherwise
237 * not.
238 */
239 int yy_at_bol;
240
241 int yy_bs_lineno; /**< The line count. */
242 int yy_bs_column; /**< The column count. */
243
244 /* Whether to try to fill the input buffer when we reach the
245 * end of it.
246 */
247 int yy_fill_buffer;
248
250
251#define YY_BUFFER_NEW 0
252#define YY_BUFFER_NORMAL 1
253 /* When an EOF's been seen but there's still some text to process
254 * then we mark the buffer as YY_EOF_PENDING, to indicate that we
255 * shouldn't try reading from the input source any more. We might
256 * still have a bunch of tokens to match, though, because of
257 * possible backing-up.
258 *
259 * When we actually see the EOF, we change the status to "new"
260 * (via ael_yyrestart()), so that the user can continue scanning by
261 * just pointing yyin at a new input file.
262 */
263#define YY_BUFFER_EOF_PENDING 2
264
265 };
266#endif /* !YY_STRUCT_YY_BUFFER_STATE */
267
268/* We provide macros for accessing buffer states in case in the
269 * future we want to put the buffer states in a more general
270 * "scanner state".
271 *
272 * Returns the top of the stack, or NULL.
273 */
274#define YY_CURRENT_BUFFER ( yyg->yy_buffer_stack \
275 ? yyg->yy_buffer_stack[yyg->yy_buffer_stack_top] \
276 : NULL)
277
278/* Same as previous macro, but useful when we know that the buffer stack is not
279 * NULL or when we need an lvalue. For internal use only.
280 */
281#define YY_CURRENT_BUFFER_LVALUE yyg->yy_buffer_stack[yyg->yy_buffer_stack_top]
282
283void ael_yyrestart (FILE *input_file ,yyscan_t yyscanner );
284void ael_yy_switch_to_buffer (YY_BUFFER_STATE new_buffer ,yyscan_t yyscanner );
285YY_BUFFER_STATE ael_yy_create_buffer (FILE *file,int size ,yyscan_t yyscanner );
288void ael_yypush_buffer_state (YY_BUFFER_STATE new_buffer ,yyscan_t yyscanner );
289void ael_yypop_buffer_state (yyscan_t yyscanner );
290
291static void ael_yyensure_buffer_stack (yyscan_t yyscanner );
292static void ael_yy_load_buffer_state (yyscan_t yyscanner );
293static void ael_yy_init_buffer (YY_BUFFER_STATE b,FILE *file ,yyscan_t yyscanner );
294
295#define YY_FLUSH_BUFFER ael_yy_flush_buffer(YY_CURRENT_BUFFER ,yyscanner)
296
297YY_BUFFER_STATE ael_yy_scan_buffer (char *base,yy_size_t size ,yyscan_t yyscanner );
298YY_BUFFER_STATE ael_yy_scan_string (yyconst char *yy_str ,yyscan_t yyscanner );
299YY_BUFFER_STATE ael_yy_scan_bytes (yyconst char *bytes,int len ,yyscan_t yyscanner );
300
301void *ael_yyalloc (yy_size_t ,yyscan_t yyscanner );
302void *ael_yyrealloc (void *,yy_size_t ,yyscan_t yyscanner );
303void ael_yyfree (void * ,yyscan_t yyscanner );
304
305#define yy_new_buffer ael_yy_create_buffer
306
307#define yy_set_interactive(is_interactive) \
308 { \
309 if ( ! YY_CURRENT_BUFFER ){ \
310 ael_yyensure_buffer_stack (yyscanner); \
311 YY_CURRENT_BUFFER_LVALUE = \
312 ael_yy_create_buffer(yyin,YY_BUF_SIZE ,yyscanner); \
313 } \
314 YY_CURRENT_BUFFER_LVALUE->yy_is_interactive = is_interactive; \
315 }
316
317#define yy_set_bol(at_bol) \
318 { \
319 if ( ! YY_CURRENT_BUFFER ){\
320 ael_yyensure_buffer_stack (yyscanner); \
321 YY_CURRENT_BUFFER_LVALUE = \
322 ael_yy_create_buffer(yyin,YY_BUF_SIZE ,yyscanner); \
323 } \
324 YY_CURRENT_BUFFER_LVALUE->yy_at_bol = at_bol; \
325 }
326
327#define YY_AT_BOL() (YY_CURRENT_BUFFER_LVALUE->yy_at_bol)
328
329/* Begin user sect3 */
330
331#define ael_yywrap(n) 1
332#define YY_SKIP_YYWRAP
333
334typedef unsigned char YY_CHAR;
335
336typedef int yy_state_type;
337
338#define yytext_ptr yytext_r
339
341static yy_state_type yy_try_NUL_trans (yy_state_type current_state ,yyscan_t yyscanner);
342static int yy_get_next_buffer (yyscan_t yyscanner );
343static void yy_fatal_error (yyconst char msg[] ,yyscan_t yyscanner );
344
345/* Done after the current pattern has been matched and before the
346 * corresponding action - sets up yytext.
347 */
348#define YY_DO_BEFORE_ACTION \
349 yyg->yytext_ptr = yy_bp; \
350 yyg->yytext_ptr -= yyg->yy_more_len; \
351 yyleng = (size_t) (yy_cp - yyg->yytext_ptr); \
352 yyg->yy_hold_char = *yy_cp; \
353 *yy_cp = '\0'; \
354 yyg->yy_c_buf_p = yy_cp;
355
356#define YY_NUM_RULES 76
357#define YY_END_OF_BUFFER 77
358/* This struct is not used in this scanner,
359 but its presence is necessary. */
360struct yy_trans_info
361 {
364 };
366 { 0,
367 0, 0, 0, 0, 0, 0, 0, 0, 43, 43,
368 0, 0, 0, 0, 0, 0, 77, 75, 50, 48,
369 49, 51, 51, 51, 9, 3, 4, 7, 51, 8,
370 5, 6, 12, 75, 51, 51, 51, 51, 51, 51,
371 51, 51, 51, 51, 51, 51, 51, 51, 51, 51,
372 1, 10, 2, 75, 65, 64, 75, 66, 75, 71,
373 72, 73, 75, 75, 67, 68, 69, 75, 70, 43,
374 44, 45, 75, 59, 60, 75, 58, 57, 52, 52,
375 57, 53, 75, 62, 63, 75, 61, 50, 49, 0,
376 51, 42, 13, 11, 0, 0, 0, 0, 0, 0,
377
378 0, 0, 0, 0, 0, 0, 22, 0, 0, 0,
379 0, 0, 0, 0, 0, 0, 0, 0, 65, 64,
380 0, 66, 65, 64, 66, 0, 71, 72, 73, 0,
381 71, 72, 73, 0, 67, 68, 69, 0, 70, 67,
382 68, 69, 70, 43, 44, 45, 46, 45, 47, 0,
383 59, 60, 0, 58, 59, 60, 58, 56, 55, 54,
384 0, 62, 63, 0, 61, 62, 63, 61, 0, 13,
385 0, 0, 0, 0, 0, 0, 0, 0, 0, 33,
386 0, 0, 0, 51, 0, 0, 0, 0, 0, 0,
387 0, 0, 0, 0, 0, 0, 0, 0, 35, 0,
388
389 0, 0, 27, 0, 0, 0, 28, 26, 0, 0,
390 0, 29, 0, 0, 0, 0, 0, 0, 0, 0,
391 0, 0, 31, 38, 0, 0, 0, 0, 0, 0,
392 0, 0, 0, 19, 17, 0, 0, 0, 0, 0,
393 34, 0, 0, 0, 0, 0, 0, 16, 0, 23,
394 0, 0, 0, 24, 0, 30, 21, 0, 0, 14,
395 0, 36, 0, 18, 0, 0, 37, 0, 51, 0,
396 15, 32, 0, 0, 41, 25, 39, 0, 40, 20,
397 0, 0, 74, 0
398 } ;
399
401 { 0,
402 1, 1, 1, 1, 1, 1, 1, 1, 2, 3,
403 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
404 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
405 1, 4, 5, 6, 7, 8, 1, 9, 5, 10,
406 11, 12, 5, 13, 5, 5, 14, 5, 5, 5,
407 5, 5, 5, 5, 5, 5, 5, 15, 16, 5,
408 17, 18, 1, 19, 5, 5, 5, 5, 5, 5,
409 5, 5, 5, 5, 5, 5, 5, 5, 5, 5,
410 5, 5, 5, 20, 5, 5, 5, 5, 5, 5,
411 21, 22, 23, 1, 5, 1, 24, 25, 26, 27,
412
413 28, 29, 30, 31, 32, 33, 34, 35, 36, 37,
414 38, 39, 5, 40, 41, 42, 43, 5, 44, 45,
415 5, 5, 46, 47, 48, 1, 1, 49, 49, 49,
416 49, 49, 49, 49, 49, 49, 49, 49, 49, 49,
417 49, 49, 49, 49, 49, 49, 49, 49, 49, 49,
418 49, 49, 49, 49, 49, 49, 49, 49, 49, 49,
419 49, 49, 49, 49, 49, 49, 49, 49, 49, 49,
420 49, 49, 49, 49, 49, 49, 49, 49, 49, 49,
421 49, 49, 49, 49, 49, 49, 49, 49, 49, 49,
422 49, 49, 49, 49, 49, 49, 49, 49, 49, 49,
423
424 49, 49, 49, 49, 49, 49, 49, 49, 49, 49,
425 49, 49, 49, 49, 49, 49, 49, 49, 49, 49,
426 49, 49, 49, 49, 49, 49, 49, 49, 49, 49,
427 49, 49, 49, 49, 49, 49, 49, 49, 49, 49,
428 49, 49, 49, 49, 49, 49, 49, 49, 49, 49,
429 49, 49, 49, 49, 49
430 } ;
431
433 { 0,
434 1, 1, 2, 1, 3, 4, 3, 3, 1, 1,
435 1, 5, 1, 3, 1, 1, 1, 3, 1, 3,
436 3, 1, 3, 3, 3, 3, 3, 3, 3, 3,
437 3, 3, 3, 3, 3, 3, 3, 3, 3, 3,
438 3, 3, 3, 3, 3, 1, 1, 1, 1
439 } ;
440
442 { 0,
443 0, 0, 40, 43, 82, 121, 160, 199, 55, 56,
444 60, 74, 247, 296, 90, 104, 432, 1023, 429, 1023,
445 426, 1023, 397, 31, 1023, 1023, 1023, 1023, 43, 1023,
446 1023, 410, 1023, 0, 401, 382, 36, 389, 34, 378,
447 38, 380, 80, 368, 372, 385, 381, 66, 357, 369,
448 1023, 1023, 1023, 138, 1023, 1023, 143, 1023, 336, 1023,
449 1023, 1023, 375, 414, 1023, 1023, 1023, 453, 1023, 396,
450 1023, 104, 177, 1023, 1023, 182, 1023, 1023, 1023, 78,
451 0, 1023, 231, 1023, 1023, 262, 1023, 393, 390, 356,
452 1023, 1023, 0, 1023, 348, 360, 92, 350, 354, 337,
453
454 333, 333, 333, 334, 329, 333, 344, 326, 335, 320,
455 327, 322, 299, 303, 93, 302, 301, 280, 1023, 1023,
456 314, 1023, 328, 344, 358, 492, 1023, 1023, 1023, 531,
457 570, 609, 648, 687, 1023, 1023, 1023, 726, 1023, 765,
458 804, 843, 882, 329, 1023, 143, 1023, 144, 1023, 392,
459 1023, 1023, 397, 1023, 431, 436, 470, 1023, 1023, 1023,
460 475, 1023, 1023, 484, 1023, 514, 523, 553, 305, 0,
461 288, 305, 299, 297, 280, 297, 292, 287, 289, 0,
462 291, 276, 250, 257, 250, 252, 247, 258, 241, 238,
463 251, 248, 232, 232, 236, 235, 228, 233, 0, 234,
464
465 113, 218, 0, 217, 209, 220, 0, 0, 207, 200,
466 196, 0, 203, 199, 208, 197, 189, 193, 206, 203,
467 186, 203, 0, 0, 181, 187, 184, 192, 190, 181,
468 187, 186, 186, 0, 0, 171, 171, 160, 164, 166,
469 0, 169, 169, 152, 147, 143, 149, 0, 138, 0,
470 139, 149, 138, 0, 140, 0, 135, 134, 109, 0,
471 112, 0, 111, 0, 105, 80, 0, 82, 61, 76,
472 0, 0, 46, 30, 0, 0, 0, 170, 0, 0,
473 0, 50, 1023, 1023, 930, 935, 940, 945, 950, 955,
474 960, 965, 970, 975, 980, 985, 989, 994, 999, 1004,
475
476 1009, 1012, 1017
477 } ;
478
480 { 0,
481 284, 1, 285, 285, 286, 286, 287, 287, 288, 288,
482 289, 289, 290, 290, 291, 291, 284, 284, 284, 284,
483 284, 284, 284, 284, 284, 284, 284, 284, 284, 284,
484 284, 284, 284, 292, 284, 284, 284, 284, 284, 284,
485 284, 284, 284, 284, 284, 284, 284, 284, 284, 284,
486 284, 284, 284, 293, 284, 284, 293, 284, 294, 284,
487 284, 284, 294, 295, 284, 284, 284, 295, 284, 296,
488 284, 297, 298, 284, 284, 298, 284, 284, 284, 284,
489 299, 284, 300, 284, 284, 300, 284, 284, 284, 284,
490 284, 284, 301, 284, 284, 284, 284, 284, 284, 284,
491
492 284, 284, 284, 284, 284, 284, 302, 284, 284, 284,
493 284, 284, 284, 284, 284, 284, 284, 293, 284, 284,
494 293, 284, 293, 293, 293, 294, 284, 284, 284, 294,
495 294, 294, 294, 295, 284, 284, 284, 295, 284, 295,
496 295, 295, 295, 296, 284, 297, 284, 297, 284, 298,
497 284, 284, 298, 284, 298, 298, 298, 284, 284, 284,
498 300, 284, 284, 300, 284, 300, 300, 300, 284, 301,
499 284, 284, 284, 284, 284, 284, 284, 284, 284, 302,
500 284, 284, 284, 284, 284, 284, 284, 284, 284, 284,
501 284, 284, 284, 284, 284, 284, 284, 284, 302, 284,
502
503 284, 284, 302, 284, 284, 284, 302, 302, 284, 284,
504 284, 302, 284, 284, 284, 284, 284, 284, 284, 284,
505 284, 284, 302, 302, 284, 284, 284, 284, 284, 284,
506 284, 284, 284, 302, 302, 284, 284, 284, 284, 284,
507 302, 284, 284, 284, 284, 284, 284, 302, 284, 302,
508 284, 284, 284, 302, 284, 302, 302, 284, 284, 302,
509 284, 302, 284, 302, 284, 284, 302, 284, 284, 284,
510 302, 302, 284, 284, 302, 302, 302, 284, 302, 302,
511 303, 303, 284, 0, 284, 284, 284, 284, 284, 284,
512 284, 284, 284, 284, 284, 284, 284, 284, 284, 284,
513
514 284, 284, 284
515 } ;
516
518 { 0,
519 18, 19, 20, 21, 22, 22, 23, 24, 25, 26,
520 27, 22, 28, 29, 30, 31, 32, 22, 33, 22,
521 22, 34, 22, 35, 36, 37, 38, 39, 40, 41,
522 42, 43, 44, 22, 45, 46, 22, 22, 47, 48,
523 49, 22, 22, 50, 22, 51, 52, 53, 22, 55,
524 56, 91, 55, 56, 92, 283, 93, 71, 71, 97,
525 55, 57, 58, 55, 57, 58, 72, 72, 100, 74,
526 75, 280, 104, 98, 101, 105, 91, 278, 102, 278,
527 74, 76, 75, 74, 75, 55, 279, 58, 55, 114,
528 58, 60, 61, 115, 74, 76, 75, 62, 158, 84,
529
530 85, 277, 60, 63, 61, 74, 147, 77, 107, 108,
531 84, 86, 87, 84, 85, 148, 109, 149, 276, 74,
532 275, 77, 192, 159, 84, 86, 87, 60, 274, 61,
533 60, 61, 173, 174, 193, 84, 62, 85, 273, 272,
534 225, 60, 63, 61, 226, 147, 147, 119, 120, 84,
535 271, 85, 123, 124, 284, 148, 284, 284, 119, 121,
536 122, 270, 269, 123, 121, 125, 60, 268, 61, 65,
537 66, 278, 67, 278, 267, 281, 266, 265, 264, 263,
538 65, 68, 69, 119, 262, 122, 151, 152, 123, 261,
539 125, 155, 156, 260, 259, 258, 257, 151, 153, 152,
540
541 256, 255, 155, 153, 156, 65, 254, 69, 65, 66,
542 253, 67, 252, 251, 250, 249, 248, 247, 246, 65,
543 68, 69, 151, 245, 154, 244, 243, 155, 242, 157,
544 241, 240, 239, 238, 237, 236, 235, 234, 233, 232,
545 162, 163, 231, 230, 65, 229, 69, 78, 78, 78,
546 78, 162, 164, 165, 80, 78, 78, 78, 228, 78,
547 227, 78, 78, 78, 224, 78, 223, 222, 81, 221,
548 220, 166, 167, 219, 218, 217, 162, 216, 163, 215,
549 214, 213, 166, 164, 168, 212, 211, 210, 209, 119,
550 120, 208, 78, 78, 78, 82, 78, 78, 78, 78,
551
552 119, 121, 122, 80, 78, 78, 78, 166, 78, 167,
553 78, 78, 78, 207, 78, 206, 205, 81, 204, 203,
554 202, 201, 200, 123, 124, 119, 199, 122, 198, 197,
555 196, 145, 195, 194, 123, 121, 125, 119, 120, 191,
556 190, 78, 78, 78, 82, 127, 128, 189, 119, 121,
557 122, 129, 188, 119, 120, 187, 127, 130, 128, 123,
558 186, 125, 185, 184, 119, 121, 122, 119, 120, 183,
559 182, 181, 180, 119, 179, 122, 178, 177, 119, 121,
560 122, 127, 176, 128, 131, 132, 175, 172, 171, 119,
561 133, 122, 169, 89, 88, 131, 130, 132, 145, 117,
562
563 116, 151, 152, 119, 113, 122, 155, 156, 112, 111,
564 110, 106, 151, 153, 152, 103, 99, 155, 153, 156,
565 131, 96, 132, 135, 136, 95, 137, 94, 90, 89,
566 88, 284, 284, 284, 135, 138, 139, 151, 284, 154,
567 151, 152, 155, 284, 157, 151, 152, 284, 284, 284,
568 284, 151, 153, 152, 284, 284, 151, 153, 152, 135,
569 284, 139, 140, 141, 284, 142, 284, 284, 284, 284,
570 284, 284, 284, 140, 138, 143, 151, 284, 154, 151,
571 152, 151, 284, 154, 162, 163, 284, 284, 284, 284,
572 151, 153, 152, 166, 167, 162, 164, 165, 140, 284,
573
574 143, 127, 128, 284, 166, 164, 168, 129, 284, 284,
575 284, 284, 127, 130, 128, 151, 284, 154, 284, 284,
576 162, 284, 163, 162, 163, 284, 284, 284, 284, 166,
577 284, 167, 162, 163, 162, 164, 165, 127, 284, 128,
578 131, 132, 284, 162, 164, 165, 133, 284, 284, 284,
579 284, 131, 130, 132, 284, 284, 284, 284, 284, 162,
580 284, 163, 162, 163, 284, 284, 284, 284, 162, 284,
581 163, 284, 284, 162, 164, 165, 131, 284, 132, 127,
582 128, 284, 284, 284, 284, 129, 284, 284, 284, 284,
583 127, 130, 128, 284, 284, 284, 284, 284, 162, 284,
584
585 163, 284, 284, 284, 284, 284, 284, 284, 284, 284,
586 284, 284, 284, 284, 284, 127, 284, 128, 127, 128,
587 284, 284, 284, 284, 129, 284, 284, 284, 284, 127,
588 130, 128, 284, 284, 284, 284, 284, 284, 284, 284,
589 284, 284, 284, 284, 284, 284, 284, 284, 284, 284,
590 284, 284, 284, 284, 127, 284, 128, 127, 128, 284,
591 284, 284, 284, 129, 284, 284, 284, 284, 127, 130,
592 128, 284, 284, 284, 284, 284, 284, 284, 284, 284,
593 284, 284, 284, 284, 284, 284, 284, 284, 284, 284,
594 284, 284, 284, 127, 284, 128, 135, 136, 284, 137,
595
596 284, 284, 284, 284, 284, 284, 284, 135, 138, 139,
597 284, 284, 284, 284, 284, 284, 284, 284, 284, 284,
598 284, 284, 284, 284, 284, 284, 284, 284, 284, 284,
599 284, 284, 135, 284, 139, 140, 141, 284, 142, 284,
600 284, 284, 284, 284, 284, 284, 140, 138, 143, 284,
601 284, 284, 284, 284, 284, 284, 284, 284, 284, 284,
602 284, 284, 284, 284, 284, 284, 284, 284, 284, 284,
603 284, 140, 284, 143, 135, 136, 284, 137, 284, 284,
604 284, 284, 284, 284, 284, 135, 138, 139, 284, 284,
605 284, 284, 284, 284, 284, 284, 284, 284, 284, 284,
606
607 284, 284, 284, 284, 284, 284, 284, 284, 284, 284,
608 135, 284, 139, 135, 136, 284, 137, 284, 284, 284,
609 284, 284, 284, 284, 135, 138, 139, 284, 284, 284,
610 284, 284, 284, 284, 284, 284, 284, 284, 284, 284,
611 284, 284, 284, 284, 284, 284, 284, 284, 284, 135,
612 284, 139, 135, 136, 284, 137, 284, 284, 284, 284,
613 284, 284, 284, 135, 138, 139, 284, 284, 284, 284,
614 284, 284, 284, 284, 284, 284, 284, 284, 284, 284,
615 284, 284, 284, 284, 284, 284, 284, 284, 135, 284,
616 139, 135, 136, 284, 137, 284, 284, 284, 284, 284,
617
618 284, 284, 135, 138, 139, 284, 284, 284, 284, 284,
619 284, 284, 284, 284, 284, 284, 284, 284, 284, 284,
620 284, 284, 284, 284, 284, 284, 284, 135, 284, 139,
621 54, 54, 54, 54, 54, 59, 59, 59, 59, 59,
622 64, 64, 64, 64, 64, 70, 70, 70, 70, 70,
623 73, 73, 73, 73, 73, 79, 79, 79, 79, 79,
624 83, 83, 83, 83, 83, 91, 284, 91, 91, 91,
625 118, 118, 118, 118, 118, 126, 126, 126, 126, 126,
626 134, 134, 134, 134, 134, 144, 144, 144, 144, 146,
627 146, 146, 146, 146, 150, 150, 150, 150, 150, 160,
628
629 284, 160, 160, 160, 161, 161, 161, 161, 161, 170,
630 284, 170, 170, 170, 91, 91, 91, 282, 282, 282,
631 284, 282, 17, 284, 284, 284, 284, 284, 284, 284,
632 284, 284, 284, 284, 284, 284, 284, 284, 284, 284,
633 284, 284, 284, 284, 284, 284, 284, 284, 284, 284,
634 284, 284, 284, 284, 284, 284, 284, 284, 284, 284,
635 284, 284, 284, 284, 284, 284, 284, 284, 284, 284,
636 284, 284
637 } ;
638
640 { 0,
641 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
642 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
643 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
644 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
645 1, 1, 1, 1, 1, 1, 1, 1, 1, 3,
646 3, 24, 4, 4, 29, 282, 29, 9, 10, 37,
647 3, 3, 3, 4, 4, 4, 9, 10, 39, 11,
648 11, 274, 41, 37, 39, 41, 24, 270, 39, 270,
649 11, 11, 11, 12, 12, 3, 273, 3, 4, 48,
650 4, 5, 5, 48, 12, 12, 12, 5, 80, 15,
651
652 15, 269, 5, 5, 5, 11, 72, 11, 43, 43,
653 15, 15, 15, 16, 16, 72, 43, 72, 268, 12,
654 266, 12, 115, 80, 16, 16, 16, 5, 265, 5,
655 6, 6, 97, 97, 115, 15, 6, 15, 263, 261,
656 201, 6, 6, 6, 201, 146, 148, 54, 54, 16,
657 259, 16, 57, 57, 146, 148, 146, 148, 54, 54,
658 54, 258, 257, 57, 57, 57, 6, 255, 6, 7,
659 7, 278, 7, 278, 253, 278, 252, 251, 249, 247,
660 7, 7, 7, 54, 246, 54, 73, 73, 57, 245,
661 57, 76, 76, 244, 243, 242, 240, 73, 73, 73,
662
663 239, 238, 76, 76, 76, 7, 237, 7, 8, 8,
664 236, 8, 233, 232, 231, 230, 229, 228, 227, 8,
665 8, 8, 73, 226, 73, 225, 222, 76, 221, 76,
666 220, 219, 218, 217, 216, 215, 214, 213, 211, 210,
667 83, 83, 209, 206, 8, 205, 8, 13, 13, 13,
668 13, 83, 83, 83, 13, 13, 13, 13, 204, 13,
669 202, 13, 13, 13, 200, 13, 198, 197, 13, 196,
670 195, 86, 86, 194, 193, 192, 83, 191, 83, 190,
671 189, 188, 86, 86, 86, 187, 186, 185, 184, 118,
672 118, 183, 13, 13, 13, 13, 14, 14, 14, 14,
673
674 118, 118, 118, 14, 14, 14, 14, 86, 14, 86,
675 14, 14, 14, 182, 14, 181, 179, 14, 178, 177,
676 176, 175, 174, 121, 121, 118, 173, 118, 172, 171,
677 169, 144, 117, 116, 121, 121, 121, 123, 123, 114,
678 113, 14, 14, 14, 14, 59, 59, 112, 123, 123,
679 123, 59, 111, 124, 124, 110, 59, 59, 59, 121,
680 109, 121, 108, 107, 124, 124, 124, 125, 125, 106,
681 105, 104, 103, 123, 102, 123, 101, 100, 125, 125,
682 125, 59, 99, 59, 63, 63, 98, 96, 95, 124,
683 63, 124, 90, 89, 88, 63, 63, 63, 70, 50,
684
685 49, 150, 150, 125, 47, 125, 153, 153, 46, 45,
686 44, 42, 150, 150, 150, 40, 38, 153, 153, 153,
687 63, 36, 63, 64, 64, 35, 64, 32, 23, 21,
688 19, 17, 0, 0, 64, 64, 64, 150, 0, 150,
689 155, 155, 153, 0, 153, 156, 156, 0, 0, 0,
690 0, 155, 155, 155, 0, 0, 156, 156, 156, 64,
691 0, 64, 68, 68, 0, 68, 0, 0, 0, 0,
692 0, 0, 0, 68, 68, 68, 155, 0, 155, 157,
693 157, 156, 0, 156, 161, 161, 0, 0, 0, 0,
694 157, 157, 157, 164, 164, 161, 161, 161, 68, 0,
695
696 68, 126, 126, 0, 164, 164, 164, 126, 0, 0,
697 0, 0, 126, 126, 126, 157, 0, 157, 0, 0,
698 161, 0, 161, 166, 166, 0, 0, 0, 0, 164,
699 0, 164, 167, 167, 166, 166, 166, 126, 0, 126,
700 130, 130, 0, 167, 167, 167, 130, 0, 0, 0,
701 0, 130, 130, 130, 0, 0, 0, 0, 0, 166,
702 0, 166, 168, 168, 0, 0, 0, 0, 167, 0,
703 167, 0, 0, 168, 168, 168, 130, 0, 130, 131,
704 131, 0, 0, 0, 0, 131, 0, 0, 0, 0,
705 131, 131, 131, 0, 0, 0, 0, 0, 168, 0,
706
707 168, 0, 0, 0, 0, 0, 0, 0, 0, 0,
708 0, 0, 0, 0, 0, 131, 0, 131, 132, 132,
709 0, 0, 0, 0, 132, 0, 0, 0, 0, 132,
710 132, 132, 0, 0, 0, 0, 0, 0, 0, 0,
711 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
712 0, 0, 0, 0, 132, 0, 132, 133, 133, 0,
713 0, 0, 0, 133, 0, 0, 0, 0, 133, 133,
714 133, 0, 0, 0, 0, 0, 0, 0, 0, 0,
715 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
716 0, 0, 0, 133, 0, 133, 134, 134, 0, 134,
717
718 0, 0, 0, 0, 0, 0, 0, 134, 134, 134,
719 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
720 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
721 0, 0, 134, 0, 134, 138, 138, 0, 138, 0,
722 0, 0, 0, 0, 0, 0, 138, 138, 138, 0,
723 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
724 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
725 0, 138, 0, 138, 140, 140, 0, 140, 0, 0,
726 0, 0, 0, 0, 0, 140, 140, 140, 0, 0,
727 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
728
729 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
730 140, 0, 140, 141, 141, 0, 141, 0, 0, 0,
731 0, 0, 0, 0, 141, 141, 141, 0, 0, 0,
732 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
733 0, 0, 0, 0, 0, 0, 0, 0, 0, 141,
734 0, 141, 142, 142, 0, 142, 0, 0, 0, 0,
735 0, 0, 0, 142, 142, 142, 0, 0, 0, 0,
736 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
737 0, 0, 0, 0, 0, 0, 0, 0, 142, 0,
738 142, 143, 143, 0, 143, 0, 0, 0, 0, 0,
739
740 0, 0, 143, 143, 143, 0, 0, 0, 0, 0,
741 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
742 0, 0, 0, 0, 0, 0, 0, 143, 0, 143,
743 285, 285, 285, 285, 285, 286, 286, 286, 286, 286,
744 287, 287, 287, 287, 287, 288, 288, 288, 288, 288,
745 289, 289, 289, 289, 289, 290, 290, 290, 290, 290,
746 291, 291, 291, 291, 291, 292, 0, 292, 292, 292,
747 293, 293, 293, 293, 293, 294, 294, 294, 294, 294,
748 295, 295, 295, 295, 295, 296, 296, 296, 296, 297,
749 297, 297, 297, 297, 298, 298, 298, 298, 298, 299,
750
751 0, 299, 299, 299, 300, 300, 300, 300, 300, 301,
752 0, 301, 301, 301, 302, 302, 302, 303, 303, 303,
753 0, 303, 284, 284, 284, 284, 284, 284, 284, 284,
754 284, 284, 284, 284, 284, 284, 284, 284, 284, 284,
755 284, 284, 284, 284, 284, 284, 284, 284, 284, 284,
756 284, 284, 284, 284, 284, 284, 284, 284, 284, 284,
757 284, 284, 284, 284, 284, 284, 284, 284, 284, 284,
758 284, 284
759 } ;
760
761/* The intent behind this definition is that it'll catch
762 * any uses of REJECT which flex missed.
763 */
764#define REJECT reject_used_but_not_detected
765#define yymore() (yyg->yy_more_flag = 1)
766#define YY_MORE_ADJ yyg->yy_more_len
767#define YY_RESTORE_YY_MORE_OFFSET
768#line 1 "ael.flex"
769/*
770 * Asterisk -- An open source telephony toolkit.
771 *
772 * Copyright (C) 2006, Digium, Inc.
773 *
774 * Steve Murphy <murf@parsetree.com>
775 *
776 * See http://www.asterisk.org for more information about
777 * the Asterisk project. Please do not directly contact
778 * any of the maintainers of this project for assistance;
779 * the project provides a web site, mailing lists and IRC
780 * channels for your use.
781 *
782 * This program is free software, distributed under the terms of
783 * the GNU General Public License Version 2. See the LICENSE file
784 * at the top of the source tree.
785 */
786/*! \file
787 *
788 * \brief Flex scanner description of tokens used in AEL2 .
789 *
790 */
791/*
792 * Start with flex options:
793 *
794 * %x describes the contexts we have: paren, semic and argg, plus INITIAL
795 */
796
797/* prefix used for various globally-visible functions and variables.
798 * This renames also ael_yywrap, but since we do not use it, we just
799 * add option noyywrap to remove it.
800 */
801/* I specify this option to suppress flex generating code with ECHO
802 in it. This generates compiler warnings in some systems; We've
803 seen the fwrite generate Unused variable warnings with 4.1.2 gcc.
804 Some systems have tweaked flex ECHO macro to keep the compiler
805 happy. To keep the warning message from getting output, I added
806 a default rule at the end of the patterns section */
807/* ael_yyfree normally just frees its arg. It can be null sometimes,
808 which some systems will complain about, so, we'll define our own version */
809/* batch gives a bit more performance if we are using it in
810 * a non-interactive mode. We probably don't care much.
811 */
812/* outfile is the filename to be used instead of lex.yy.c */
813/*
814 * These are not supported in flex 2.5.4, but we need them
815 * at the moment:
816 * reentrant produces a thread-safe parser. Not 100% sure that
817 * we require it, though.
818 * bison-bridge passes an additional yylval argument to ael_yylex().
819 * bison-locations is probably not needed.
820 */
821#line 71 "ael.flex"
822#include <sys/types.h>
823#include <sys/stat.h>
824#include <unistd.h>
825#include <glob.h>
826
827#if !defined(GLOB_ABORTED)
828#define GLOB_ABORTED GLOB_ABEND
829#endif
830#if !defined(GLOB_BRACE)
831#define GLOB_BRACE 0
832#endif
833#if !defined(GLOB_NOMAGIC)
834#define GLOB_NOMAGIC 0
835#endif
836
837#include "asterisk/logger.h"
838#include "asterisk/utils.h"
839#include "asterisk/lock.h"
840#include "asterisk/hashtab.h"
841#include "ael/ael.tab.h"
842#include "asterisk/ael_structs.h"
843
844/*
845 * A stack to keep track of matching brackets ( [ { } ] )
846 */
847static char pbcstack[400]; /* XXX missing size checks */
848static int pbcpos = 0;
849static void pbcpush(char x);
850static int pbcpop(char x);
851static int parencount = 0;
852
853/*
854 * A similar stack to keep track of matching brackets ( [ { } ] ) in word tokens surrounded by ${ ... }
855 */
856static char pbcstack2[400]; /* XXX missing size checks */
857static int pbcpos2 = 0;
858static void pbcpush2(char x);
859static int pbcpop2(char x);
860static int parencount2 = 0;
861
862/*
863 * A similar stack to keep track of matching brackets ( [ { } ] ) in word tokens surrounded by $[ ... ]
864 */
865static char pbcstack3[400]; /* XXX missing size checks */
866static int pbcpos3 = 0;
867static void pbcpush3(char x);
868static int pbcpop3(char x);
869static int parencount3 = 0;
870
871
872/*
873 * current line, column and filename, updated as we read the input.
874 */
875static int my_lineno = 1; /* current line in the source */
876static int my_col = 1; /* current column in the source */
877char *my_file = 0; /* used also in the bison code */
878char *prev_word; /* XXX document it */
879
880#define MAX_INCLUDE_DEPTH 50
881
882/*
883 * flex is not too smart, and generates global functions
884 * without prototypes so the compiler may complain.
885 * To avoid that, we declare the prototypes here,
886 * even though these functions are not used.
887 */
888int ael_yyget_column (yyscan_t yyscanner);
889void ael_yyset_column (int column_no , yyscan_t yyscanner);
890
891int ael_yyparse (struct parse_io *);
892
893/*
894 * A stack to process include files.
895 * As we switch into the new file we need to store the previous
896 * state to restore it later.
897 */
899 char *fname;
901 int colno;
902 glob_t globbuf; /* the current globbuf */
903 int globbuf_pos; /* where we are in the current globbuf */
905};
906
908static int include_stack_index = 0;
909static void setup_filestack(char *fnamebuf, int fnamebuf_siz, glob_t *globbuf, int globpos, yyscan_t xscan, int create);
910
911/*
912 * if we use the @n feature of bison, we must supply the start/end
913 * location of tokens in the structure pointed by yylloc.
914 * Simple tokens are just assumed to be on the same line, so
915 * the line number is constant, and the column is incremented
916 * by the length of the token.
917 */
918#ifdef FLEX_BETA /* set for 2.5.33 */
919
920/* compute the total number of lines and columns in the text
921 * passed as argument.
922 */
923static void pbcwhere(const char *text, int *line, int *col )
924{
925 int loc_line = *line;
926 int loc_col = *col;
927 char c;
928 while ( (c = *text++) ) {
929 if ( c == '\t' ) {
930 loc_col += 8 - (loc_col % 8);
931 } else if ( c == '\n' ) {
932 loc_line++;
933 loc_col = 1;
934 } else
935 loc_col++;
936 }
937 *line = loc_line;
938 *col = loc_col;
939}
940
941#define STORE_POS do { \
942 yylloc->first_line = yylloc->last_line = my_lineno; \
943 yylloc->first_column=my_col; \
944 yylloc->last_column=my_col+yyleng-1; \
945 my_col+=yyleng; \
946 } while (0)
947
948#define STORE_LOC do { \
949 yylloc->first_line = my_lineno; \
950 yylloc->first_column=my_col; \
951 pbcwhere(yytext, &my_lineno, &my_col); \
952 yylloc->last_line = my_lineno; \
953 yylloc->last_column = my_col - 1; \
954 } while (0)
955#else
956#define STORE_POS
957#define STORE_LOC
958#endif
959#line 957 "ael_lex.c"
960
961#define INITIAL 0
962#define paren 1
963#define semic 2
964#define argg 3
965#define comment 4
966#define curlystate 5
967#define wordstate 6
968#define brackstate 7
969
970#ifndef YY_NO_UNISTD_H
971/* Special case for "unistd.h", since it is non-ANSI. We include it way
972 * down here because we want the user's section 1 to have been scanned first.
973 * The user has a chance to override it with an option.
974 */
975#include <unistd.h>
976#endif
977
978#ifndef YY_EXTRA_TYPE
979#define YY_EXTRA_TYPE void *
980#endif
981
982/* Holds the entire state of the reentrant scanner. */
983struct yyguts_t
984 {
985
986 /* User-defined. Not touched by flex. */
988
989 /* The rest are the same as the globals declared in the non-reentrant scanner. */
990 FILE *yyin_r, *yyout_r;
991 size_t yy_buffer_stack_top; /**< index of top of stack. */
992 size_t yy_buffer_stack_max; /**< capacity of stack. */
993 YY_BUFFER_STATE * yy_buffer_stack; /**< Stack as an array. */
994 char yy_hold_char;
995 int yy_n_chars;
996 int yyleng_r;
997 char *yy_c_buf_p;
998 int yy_init;
999 int yy_start;
1003 int *yy_start_stack;
1006
1007 int yylineno_r;
1008 int yy_flex_debug_r;
1009
1010 char *yytext_r;
1011 int yy_more_flag;
1012 int yy_more_len;
1013
1014 YYSTYPE * yylval_r;
1015
1016 YYLTYPE * yylloc_r;
1017
1018 }; /* end struct yyguts_t */
1019
1020static int yy_init_globals (yyscan_t yyscanner );
1021
1022 /* This must go here because YYSTYPE and YYLTYPE are included
1023 * from bison output in section 1.*/
1024 # define yylval yyg->yylval_r
1025
1026 # define yylloc yyg->yylloc_r
1027
1028int ael_yylex_init (yyscan_t* scanner);
1029
1030int ael_yylex_init_extra (YY_EXTRA_TYPE user_defined,yyscan_t* scanner);
1031
1032/* Accessor methods to globals.
1033 These are made visible to non-reentrant scanners for convenience. */
1034
1035int ael_yylex_destroy (yyscan_t yyscanner );
1036
1037int ael_yyget_debug (yyscan_t yyscanner );
1038
1039void ael_yyset_debug (int debug_flag ,yyscan_t yyscanner );
1040
1042
1043void ael_yyset_extra (YY_EXTRA_TYPE user_defined ,yyscan_t yyscanner );
1044
1045FILE *ael_yyget_in (yyscan_t yyscanner );
1046
1047void ael_yyset_in (FILE * in_str ,yyscan_t yyscanner );
1048
1049FILE *ael_yyget_out (yyscan_t yyscanner );
1050
1051void ael_yyset_out (FILE * out_str ,yyscan_t yyscanner );
1052
1053int ael_yyget_leng (yyscan_t yyscanner );
1054
1055char *ael_yyget_text (yyscan_t yyscanner );
1056
1057int ael_yyget_lineno (yyscan_t yyscanner );
1058
1059void ael_yyset_lineno (int line_number ,yyscan_t yyscanner );
1060
1061YYSTYPE * ael_yyget_lval (yyscan_t yyscanner );
1062
1063void ael_yyset_lval (YYSTYPE * yylval_param ,yyscan_t yyscanner );
1064
1065 YYLTYPE *ael_yyget_lloc (yyscan_t yyscanner );
1066
1067 void ael_yyset_lloc (YYLTYPE * yylloc_param ,yyscan_t yyscanner );
1068
1069/* Macros after this point can all be overridden by user definitions in
1070 * section 1.
1071 */
1072
1073#ifndef YY_SKIP_YYWRAP
1074#ifdef __cplusplus
1075extern "C" int ael_yywrap (yyscan_t yyscanner );
1076#else
1077extern int ael_yywrap (yyscan_t yyscanner );
1078#endif
1079#endif
1080
1081 static void yyunput (int c,char *buf_ptr ,yyscan_t yyscanner);
1082
1083#ifndef yytext_ptr
1084static void yy_flex_strncpy (char *,yyconst char *,int ,yyscan_t yyscanner);
1085#endif
1086
1087#ifdef YY_NEED_STRLEN
1088static int yy_flex_strlen (yyconst char * ,yyscan_t yyscanner);
1089#endif
1090
1091#ifndef YY_NO_INPUT
1092
1093#ifdef __cplusplus
1094static int yyinput (yyscan_t yyscanner );
1095#else
1096static int input (yyscan_t yyscanner );
1097#endif
1098
1099#endif
1100
1101/* Amount of stuff to slurp up with each read. */
1102#ifndef YY_READ_BUF_SIZE
1103#define YY_READ_BUF_SIZE 8192
1104#endif
1105
1106/* Copy whatever the last rule matched to the standard output. */
1107#ifndef ECHO
1108/* This used to be an fputs(), but since the string might contain NUL's,
1109 * we now use fwrite().
1110 */
1111#define ECHO fwrite( yytext, yyleng, 1, yyout )
1112#endif
1113
1114/* Gets input and stuffs it into "buf". number of characters read, or YY_NULL,
1115 * is returned in "result".
1116 */
1117#ifndef YY_INPUT
1118#define YY_INPUT(buf,result,max_size) \
1119 if ( YY_CURRENT_BUFFER_LVALUE->yy_is_interactive ) \
1120 { \
1121 int c = '*'; \
1122 int n; \
1123 for ( n = 0; n < max_size && \
1124 (c = getc( yyin )) != EOF && c != '\n'; ++n ) \
1125 buf[n] = (char) c; \
1126 if ( c == '\n' ) \
1127 buf[n++] = (char) c; \
1128 if ( c == EOF && ferror( yyin ) ) \
1129 YY_FATAL_ERROR( "input in flex scanner failed" ); \
1130 result = n; \
1131 } \
1132 else \
1133 { \
1134 errno=0; \
1135 while ( (result = fread(buf, 1, max_size, yyin))==0 && ferror(yyin)) \
1136 { \
1137 if( errno != EINTR) \
1138 { \
1139 YY_FATAL_ERROR( "input in flex scanner failed" ); \
1140 break; \
1141 } \
1142 errno=0; \
1143 clearerr(yyin); \
1144 } \
1145 }\
1146\
1147
1148#endif
1149
1150/* No semi-colon after return; correct usage is to write "yyterminate();" -
1151 * we don't want an extra ';' after the "return" because that will cause
1152 * some compilers to complain about unreachable statements.
1153 */
1154#ifndef yyterminate
1155#define yyterminate() return YY_NULL
1156#endif
1157
1158/* Number of entries by which start-condition stack grows. */
1159#ifndef YY_START_STACK_INCR
1160#define YY_START_STACK_INCR 25
1161#endif
1162
1163/* Report a fatal error. */
1164#ifndef YY_FATAL_ERROR
1165#define YY_FATAL_ERROR(msg) yy_fatal_error( msg , yyscanner)
1166#endif
1167
1168/* end tables serialization structures and prototypes */
1169
1170/* Default declaration of generated scanner - a define so the user can
1171 * easily add parameters.
1172 */
1173#ifndef YY_DECL
1174#define YY_DECL_IS_OURS 1
1175
1176extern int ael_yylex \
1177 (YYSTYPE * yylval_param,YYLTYPE * yylloc_param ,yyscan_t yyscanner);
1178
1179#define YY_DECL int ael_yylex \
1180 (YYSTYPE * yylval_param, YYLTYPE * yylloc_param , yyscan_t yyscanner)
1181#endif /* !YY_DECL */
1182
1183/* Code executed at the beginning of each rule, after yytext and yyleng
1184 * have been set up.
1185 */
1186#ifndef YY_USER_ACTION
1187#define YY_USER_ACTION
1188#endif
1189
1190/* Code executed at the end of each rule. */
1191#ifndef YY_BREAK
1192#define YY_BREAK break;
1193#endif
1194
1195#define YY_RULE_SETUP \
1196 YY_USER_ACTION
1197
1198/** The main scanner function which does all the work.
1199 */
1201{
1202 register yy_state_type yy_current_state;
1203 register char *yy_cp, *yy_bp;
1204 register int yy_act;
1205 struct yyguts_t * yyg = (struct yyguts_t*)yyscanner;
1206
1207#line 220 "ael.flex"
1208
1209
1210#line 1208 "ael_lex.c"
1211
1212 yylval = yylval_param;
1213
1214 yylloc = yylloc_param;
1215
1216 if ( !yyg->yy_init )
1217 {
1218 yyg->yy_init = 1;
1219
1220#ifdef YY_USER_INIT
1221 YY_USER_INIT;
1222#endif
1223
1224 if ( ! yyg->yy_start )
1225 yyg->yy_start = 1; /* first start state */
1226
1227 if ( ! yyin )
1228 yyin = stdin;
1229
1230 if ( ! yyout )
1231 yyout = stdout;
1232
1233 if ( ! YY_CURRENT_BUFFER ) {
1234 ael_yyensure_buffer_stack (yyscanner);
1237 }
1238
1239 ael_yy_load_buffer_state(yyscanner );
1240 }
1241
1242 while ( 1 ) /* loops until end-of-file is reached */
1243 {
1244 yyg->yy_more_len = 0;
1245 if ( yyg->yy_more_flag )
1246 {
1247 yyg->yy_more_len = yyg->yy_c_buf_p - yyg->yytext_ptr;
1248 yyg->yy_more_flag = 0;
1249 }
1250 yy_cp = yyg->yy_c_buf_p;
1251
1252 /* Support of yytext. */
1254
1255 /* yy_bp points to the position in yy_ch_buf of the start of
1256 * the current run.
1257 */
1258 yy_bp = yy_cp;
1259
1260 yy_current_state = yyg->yy_start;
1261yy_match:
1262 do
1263 {
1264 register YY_CHAR yy_c = yy_ec[YY_SC_TO_UI(*yy_cp)];
1265 if ( yy_accept[yy_current_state] )
1266 {
1267 yyg->yy_last_accepting_state = yy_current_state;
1269 }
1270 while ( yy_chk[yy_base[yy_current_state] + yy_c] != yy_current_state )
1271 {
1272 yy_current_state = (int) yy_def[yy_current_state];
1273 if ( yy_current_state >= 285 )
1274 yy_c = yy_meta[(unsigned int) yy_c];
1275 }
1276 yy_current_state = yy_nxt[yy_base[yy_current_state] + (unsigned int) yy_c];
1277 ++yy_cp;
1278 }
1279 while ( yy_current_state != 284 );
1281 yy_current_state = yyg->yy_last_accepting_state;
1282
1283yy_find_action:
1284 yy_act = yy_accept[yy_current_state];
1285
1287
1288do_action: /* This label is used only to access EOF actions. */
1289
1290 switch ( yy_act )
1291 { /* beginning of action switch */
1292 case 0: /* must back up */
1293 /* undo the effects of YY_DO_BEFORE_ACTION */
1296 yy_current_state = yyg->yy_last_accepting_state;
1297 goto yy_find_action;
1298
1299case 1:
1301#line 222 "ael.flex"
1302{ STORE_POS; return LC;}
1303 YY_BREAK
1304case 2:
1306#line 223 "ael.flex"
1307{ STORE_POS; return RC;}
1308 YY_BREAK
1309case 3:
1311#line 224 "ael.flex"
1312{ STORE_POS; return LP;}
1313 YY_BREAK
1314case 4:
1316#line 225 "ael.flex"
1317{ STORE_POS; return RP;}
1318 YY_BREAK
1319case 5:
1321#line 226 "ael.flex"
1322{ STORE_POS; return SEMI;}
1323 YY_BREAK
1324case 6:
1326#line 227 "ael.flex"
1327{ STORE_POS; return EQ;}
1328 YY_BREAK
1329case 7:
1331#line 228 "ael.flex"
1332{ STORE_POS; return COMMA;}
1333 YY_BREAK
1334case 8:
1336#line 229 "ael.flex"
1337{ STORE_POS; return COLON;}
1338 YY_BREAK
1339case 9:
1341#line 230 "ael.flex"
1342{ STORE_POS; return AMPER;}
1343 YY_BREAK
1344case 10:
1346#line 231 "ael.flex"
1347{ STORE_POS; return BAR;}
1348 YY_BREAK
1349case 11:
1351#line 232 "ael.flex"
1352{ STORE_POS; return EXTENMARK;}
1353 YY_BREAK
1354case 12:
1356#line 233 "ael.flex"
1357{ STORE_POS; return AT;}
1358 YY_BREAK
1359case 13:
1361#line 234 "ael.flex"
1362{/*comment*/}
1363 YY_BREAK
1364case 14:
1366#line 235 "ael.flex"
1367{ STORE_POS; return KW_CONTEXT;}
1368 YY_BREAK
1369case 15:
1371#line 236 "ael.flex"
1372{ STORE_POS; return KW_ABSTRACT;}
1373 YY_BREAK
1374case 16:
1376#line 237 "ael.flex"
1377{ STORE_POS; return KW_EXTEND;}
1378 YY_BREAK
1379case 17:
1381#line 238 "ael.flex"
1382{ STORE_POS; return KW_MACRO;};
1383 YY_BREAK
1384case 18:
1386#line 239 "ael.flex"
1387{ STORE_POS; return KW_GLOBALS;}
1388 YY_BREAK
1389case 19:
1391#line 240 "ael.flex"
1392{ STORE_POS; return KW_LOCAL;}
1393 YY_BREAK
1394case 20:
1396#line 241 "ael.flex"
1397{ STORE_POS; return KW_IGNOREPAT;}
1398 YY_BREAK
1399case 21:
1401#line 242 "ael.flex"
1402{ STORE_POS; return KW_SWITCH;}
1403 YY_BREAK
1404case 22:
1406#line 243 "ael.flex"
1407{ STORE_POS; return KW_IF;}
1408 YY_BREAK
1409case 23:
1411#line 244 "ael.flex"
1412{ STORE_POS; return KW_IFTIME;}
1413 YY_BREAK
1414case 24:
1416#line 245 "ael.flex"
1417{ STORE_POS; return KW_RANDOM;}
1418 YY_BREAK
1419case 25:
1421#line 246 "ael.flex"
1422{ STORE_POS; return KW_REGEXTEN;}
1423 YY_BREAK
1424case 26:
1426#line 247 "ael.flex"
1427{ STORE_POS; return KW_HINT;}
1428 YY_BREAK
1429case 27:
1431#line 248 "ael.flex"
1432{ STORE_POS; return KW_ELSE;}
1433 YY_BREAK
1434case 28:
1436#line 249 "ael.flex"
1437{ STORE_POS; return KW_GOTO;}
1438 YY_BREAK
1439case 29:
1441#line 250 "ael.flex"
1442{ STORE_POS; return KW_JUMP;}
1443 YY_BREAK
1444case 30:
1446#line 251 "ael.flex"
1447{ STORE_POS; return KW_RETURN;}
1448 YY_BREAK
1449case 31:
1451#line 252 "ael.flex"
1452{ STORE_POS; return KW_BREAK;}
1453 YY_BREAK
1454case 32:
1456#line 253 "ael.flex"
1457{ STORE_POS; return KW_CONTINUE;}
1458 YY_BREAK
1459case 33:
1461#line 254 "ael.flex"
1462{ STORE_POS; return KW_FOR;}
1463 YY_BREAK
1464case 34:
1466#line 255 "ael.flex"
1467{ STORE_POS; return KW_WHILE;}
1468 YY_BREAK
1469case 35:
1471#line 256 "ael.flex"
1472{ STORE_POS; return KW_CASE;}
1473 YY_BREAK
1474case 36:
1476#line 257 "ael.flex"
1477{ STORE_POS; return KW_DEFAULT;}
1478 YY_BREAK
1479case 37:
1481#line 258 "ael.flex"
1482{ STORE_POS; return KW_PATTERN;}
1483 YY_BREAK
1484case 38:
1486#line 259 "ael.flex"
1487{ STORE_POS; return KW_CATCH;}
1488 YY_BREAK
1489case 39:
1491#line 260 "ael.flex"
1492{ STORE_POS; return KW_SWITCHES;}
1493 YY_BREAK
1494case 40:
1496#line 261 "ael.flex"
1497{ STORE_POS; return KW_ESWITCHES;}
1498 YY_BREAK
1499case 41:
1501#line 262 "ael.flex"
1502{ STORE_POS; return KW_INCLUDES;}
1503 YY_BREAK
1504case 42:
1506#line 263 "ael.flex"
1507{ BEGIN(comment); my_col += 2; }
1508 YY_BREAK
1509case 43:
1511#line 265 "ael.flex"
1512{ my_col += yyleng; }
1513 YY_BREAK
1514case 44:
1515/* rule 44 can match eol */
1517#line 266 "ael.flex"
1518{ ++my_lineno; my_col=1;}
1519 YY_BREAK
1520case 45:
1522#line 267 "ael.flex"
1523{ my_col += yyleng; }
1524 YY_BREAK
1525case 46:
1526/* rule 46 can match eol */
1528#line 268 "ael.flex"
1529{ ++my_lineno; my_col=1;}
1530 YY_BREAK
1531case 47:
1533#line 269 "ael.flex"
1534{ my_col += 2; BEGIN(INITIAL); } /* the nice thing about comments is that you know exactly what ends them */
1535 YY_BREAK
1536case 48:
1537/* rule 48 can match eol */
1539#line 271 "ael.flex"
1540{ my_lineno++; my_col = 1; }
1541 YY_BREAK
1542case 49:
1544#line 272 "ael.flex"
1545{ my_col += yyleng; }
1546 YY_BREAK
1547case 50:
1549#line 273 "ael.flex"
1550{ my_col += (yyleng*8)-(my_col%8); }
1551 YY_BREAK
1552case 51:
1554#line 275 "ael.flex"
1555{
1556 /* boy did I open a can of worms when I changed the lexical token "word".
1557 all the above keywords can be used as a beginning to a "word".-
1558 before, a "word" would match a longer sequence than the above
1559 keywords, and all would be well. But now "word" is a single char
1560 and feeds into a statemachine sort of sequence from there on. So...
1561 I added the {KEYWORD}? to the beginning of the word match sequence */
1562
1563 if (!strcmp(yytext,"${")) {
1564 parencount2 = 0;
1565 pbcpos2 = 0;
1566 pbcpush2('{'); /* push '{' so the last pcbpop (parencount2 = -1) will succeed */
1568 yymore();
1569 } else if (!strcmp(yytext,"$[")) {
1570 parencount3 = 0;
1571 pbcpos3 = 0;
1572 pbcpush3('['); /* push '[' so the last pcbpop (parencount3 = -1) will succeed */
1574 yymore();
1575 } else {
1577 yymore();
1578 }
1579 }
1580 YY_BREAK
1581case 52:
1583#line 301 "ael.flex"
1584{ yymore(); /* Keep going */ }
1585 YY_BREAK
1586case 53:
1588#line 302 "ael.flex"
1589{ yymore(); /* Keep going */ }
1590 YY_BREAK
1591case 54:
1593#line 303 "ael.flex"
1594{ yymore(); /* Keep Going */ }
1595 YY_BREAK
1596case 55:
1598#line 304 "ael.flex"
1599{ /* the beginning of a ${} construct. prepare and pop into curlystate */
1600 parencount2 = 0;
1601 pbcpos2 = 0;
1602 pbcpush2('{'); /* push '{' so the last pcbpop (parencount2 = -1) will succeed */
1604 yymore();
1605 }
1606 YY_BREAK
1607case 56:
1609#line 311 "ael.flex"
1610{ /* the beginning of a $[] construct. prepare and pop into brackstate */
1611 parencount3 = 0;
1612 pbcpos3 = 0;
1613 pbcpush3('['); /* push '[' so the last pcbpop (parencount3 = -1) will succeed */
1615 yymore();
1616 }
1617 YY_BREAK
1618case 57:
1619/* rule 57 can match eol */
1621#line 318 "ael.flex"
1622{
1623 /* a non-word constituent char, like a space, tab, curly, paren, etc */
1624 char c = yytext[yyleng-1];
1625 STORE_POS;
1626 yylval->str = malloc(yyleng);
1627 strncpy(yylval->str, yytext, yyleng);
1628 yylval->str[yyleng-1] = 0;
1629 unput(c); /* put this ending char back in the stream */
1630 BEGIN(0);
1631 return word;
1632 }
1633 YY_BREAK
1634case 58:
1635/* rule 58 can match eol */
1637#line 331 "ael.flex"
1638{
1639 if ( pbcpop2('}') ) { /* error */
1640 STORE_LOC;
1641 ast_log(LOG_ERROR,"File=%s, line=%d, column=%d: Mismatched ')' in expression: %s !\n", my_file, my_lineno, my_col, yytext);
1642 BEGIN(0);
1643 yylval->str = malloc(yyleng+1);
1644 strncpy(yylval->str, yytext, yyleng);
1645 yylval->str[yyleng] = 0;
1646 return word;
1647 }
1648 parencount2--;
1649 if ( parencount2 >= 0) {
1650 yymore();
1651 } else {
1652 BEGIN(wordstate); /* Finished with the current ${} construct. Return to word gathering state */
1653 yymore();
1654 }
1655 }
1656 YY_BREAK
1657case 59:
1658/* rule 59 can match eol */
1660#line 350 "ael.flex"
1661{
1662 char c = yytext[yyleng-1];
1663 if (c == '{')
1664 parencount2++;
1665 pbcpush2(c);
1666 yymore();
1667 }
1668 YY_BREAK
1669case 60:
1670/* rule 60 can match eol */
1672#line 358 "ael.flex"
1673{
1674 char c = yytext[yyleng-1];
1675 if ( pbcpop2(c)) { /* error */
1676 STORE_LOC;
1677 ast_log(LOG_ERROR,"File=%s, line=%d, column=%d: Mismatched '%c' in expression!\n",
1679 BEGIN(0);
1680 yylval->str = malloc(yyleng+1);
1681 strncpy(yylval->str, yytext, yyleng);
1682 yylval->str[yyleng] = 0;
1683 return word;
1684 }
1685 yymore();
1686 }
1687 YY_BREAK
1688case 61:
1689/* rule 61 can match eol */
1691#line 374 "ael.flex"
1692{
1693 if ( pbcpop3(']') ) { /* error */
1694 STORE_LOC;
1695 ast_log(LOG_ERROR,"File=%s, line=%d, column=%d: Mismatched ')' in expression: %s !\n", my_file, my_lineno, my_col, yytext);
1696 BEGIN(0);
1697 yylval->str = malloc(yyleng+1);
1698 strncpy(yylval->str, yytext, yyleng);
1699 yylval->str[yyleng] = 0;
1700 return word;
1701 }
1702 parencount3--;
1703 if ( parencount3 >= 0) {
1704 yymore();
1705 } else {
1706 BEGIN(wordstate); /* Finished with the current ${} construct. Return to word gathering state */
1707 yymore();
1708 }
1709 }
1710 YY_BREAK
1711case 62:
1712/* rule 62 can match eol */
1714#line 393 "ael.flex"
1715{
1716 char c = yytext[yyleng-1];
1717 if (c == '[')
1718 parencount3++;
1719 pbcpush3(c);
1720 yymore();
1721 }
1722 YY_BREAK
1723case 63:
1724/* rule 63 can match eol */
1726#line 401 "ael.flex"
1727{
1728 char c = yytext[yyleng-1];
1729 if ( pbcpop3(c)) { /* error */
1730 STORE_LOC;
1731 ast_log(LOG_ERROR,"File=%s, line=%d, column=%d: Mismatched '%c' in expression!\n",
1733 BEGIN(0);
1734 yylval->str = malloc(yyleng+1);
1735 strncpy(yylval->str, yytext, yyleng);
1736 yylval->str[yyleng] = 0;
1737 return word;
1738 }
1739 yymore();
1740 }
1741 YY_BREAK
1742/*
1743 * context used for arguments of if_head, random_head, switch_head,
1744 * for (last statement), while (XXX why not iftime_head ?).
1745 * End with the matching parentheses.
1746 * A comma at the top level is valid here, unlike in argg where it
1747 * is an argument separator so it must be returned as a token.
1748 */
1749case 64:
1750/* rule 64 can match eol */
1752#line 424 "ael.flex"
1753{
1754 if ( pbcpop(')') ) { /* error */
1755 STORE_LOC;
1756 ast_log(LOG_ERROR,"File=%s, line=%d, column=%d: Mismatched ')' in expression: %s !\n", my_file, my_lineno, my_col, yytext);
1757 BEGIN(0);
1758 yylval->str = malloc(yyleng+1);
1759 strncpy(yylval->str, yytext, yyleng);
1760 yylval->str[yyleng] = 0;
1761 prev_word = 0;
1762 return word;
1763 }
1764 parencount--;
1765 if ( parencount >= 0) {
1766 yymore();
1767 } else {
1768 STORE_LOC;
1769 yylval->str = malloc(yyleng);
1770 strncpy(yylval->str, yytext, yyleng);
1771 yylval->str[yyleng-1] = 0;
1772 unput(')');
1773 BEGIN(0);
1774 return word;
1775 }
1776 }
1777 YY_BREAK
1778case 65:
1779/* rule 65 can match eol */
1781#line 449 "ael.flex"
1782{
1783 char c = yytext[yyleng-1];
1784 if (c == '(')
1785 parencount++;
1786 pbcpush(c);
1787 yymore();
1788 }
1789 YY_BREAK
1790case 66:
1791/* rule 66 can match eol */
1793#line 457 "ael.flex"
1794{
1795 char c = yytext[yyleng-1];
1796 if ( pbcpop(c)) { /* error */
1797 STORE_LOC;
1798 ast_log(LOG_ERROR,"File=%s, line=%d, column=%d: Mismatched '%c' in expression!\n",
1800 BEGIN(0);
1801 yylval->str = malloc(yyleng+1);
1802 strncpy(yylval->str, yytext, yyleng);
1803 yylval->str[yyleng] = 0;
1804 return word;
1805 }
1806 yymore();
1807 }
1808 YY_BREAK
1809/*
1810 * handlers for arguments to a macro or application calls.
1811 * We enter this context when we find the initial '(' and
1812 * stay here until we close all matching parentheses,
1813 * and find the comma (argument separator) or the closing ')'
1814 * of the (external) call, which happens when parencount == 0
1815 * before the decrement.
1816 */
1817case 67:
1818/* rule 67 can match eol */
1820#line 481 "ael.flex"
1821{
1822 char c = yytext[yyleng-1];
1823 if (c == '(')
1824 parencount++;
1825 pbcpush(c);
1826 yymore();
1827 }
1828 YY_BREAK
1829case 68:
1830/* rule 68 can match eol */
1832#line 489 "ael.flex"
1833{
1834 if ( pbcpop(')') ) { /* error */
1835 STORE_LOC;
1836 ast_log(LOG_ERROR,"File=%s, line=%d, column=%d: Mismatched ')' in expression!\n", my_file, my_lineno, my_col);
1837 BEGIN(0);
1838 yylval->str = malloc(yyleng+1);
1839 strncpy(yylval->str, yytext, yyleng);
1840 yylval->str[yyleng] = 0;
1841 return word;
1842 }
1843
1844 parencount--;
1845 if( parencount >= 0){
1846 yymore();
1847 } else {
1848 STORE_LOC;
1849 BEGIN(0);
1850 if ( !strcmp(yytext, ")") )
1851 return RP;
1852 yylval->str = malloc(yyleng);
1853 strncpy(yylval->str, yytext, yyleng);
1854 yylval->str[yyleng-1] = '\0'; /* trim trailing ')' */
1855 unput(')');
1856 return word;
1857 }
1858 }
1859 YY_BREAK
1860case 69:
1861/* rule 69 can match eol */
1863#line 516 "ael.flex"
1864{
1865 if( parencount != 0) { /* ast_log(LOG_NOTICE,"Folding in a comma!\n"); */
1866 yymore();
1867 } else {
1868 STORE_LOC;
1869 if( !strcmp(yytext,"," ) )
1870 return COMMA;
1871 yylval->str = malloc(yyleng);
1872 strncpy(yylval->str, yytext, yyleng);
1873 yylval->str[yyleng-1] = '\0'; /* trim trailing ',' */
1874 unput(',');
1875 return word;
1876 }
1877 }
1878 YY_BREAK
1879case 70:
1880/* rule 70 can match eol */
1882#line 531 "ael.flex"
1883{
1884 char c = yytext[yyleng-1];
1885 if ( pbcpop(c) ) { /* error */
1886 STORE_LOC;
1887 ast_log(LOG_ERROR,"File=%s, line=%d, column=%d: Mismatched '%c' in expression!\n", my_file, my_lineno, my_col, c);
1888 BEGIN(0);
1889 yylval->str = malloc(yyleng+1);
1890 strncpy(yylval->str, yytext, yyleng);
1891 yylval->str[yyleng] = '\0';
1892 return word;
1893 }
1894 yymore();
1895 }
1896 YY_BREAK
1897/*
1898 * context used to find tokens in the right hand side of assignments,
1899 * or in the first and second operand of a 'for'. As above, match
1900 * commas and use ';' as a separator (hence return it as a separate token).
1901 */
1902case 71:
1903/* rule 71 can match eol */
1905#line 550 "ael.flex"
1906{
1907 char c = yytext[yyleng-1];
1908 yymore();
1909 pbcpush(c);
1910 }
1911 YY_BREAK
1912case 72:
1913/* rule 72 can match eol */
1915#line 556 "ael.flex"
1916{
1917 char c = yytext[yyleng-1];
1918 if ( pbcpop(c) ) { /* error */
1919 STORE_LOC;
1920 ast_log(LOG_ERROR,"File=%s, line=%d, column=%d: Mismatched '%c' in expression!\n", my_file, my_lineno, my_col, c);
1921 BEGIN(0);
1922 yylval->str = malloc(yyleng+1);
1923 strncpy(yylval->str, yytext, yyleng);
1924 yylval->str[yyleng] = '\0';
1925 return word;
1926 }
1927 yymore();
1928 }
1929 YY_BREAK
1930case 73:
1931/* rule 73 can match eol */
1933#line 570 "ael.flex"
1934{
1935 STORE_LOC;
1936 yylval->str = malloc(yyleng);
1937 strncpy(yylval->str, yytext, yyleng);
1938 yylval->str[yyleng-1] = '\0'; /* trim trailing ';' */
1939 unput(';');
1940 BEGIN(0);
1941 return word;
1942 }
1943 YY_BREAK
1944case 74:
1945/* rule 74 can match eol */
1947#line 580 "ael.flex"
1948{
1949 char fnamebuf[1024],*p1,*p2;
1950 int glob_ret;
1951 glob_t globbuf; /* the current globbuf */
1952 int globbuf_pos = -1; /* where we are in the current globbuf */
1953 globbuf.gl_offs = 0; /* initialize it to silence gcc */
1954
1955 p1 = strchr(yytext,'"');
1956 p2 = strrchr(yytext,'"');
1958 ast_log(LOG_ERROR,"File=%s, line=%d, column=%d: Includes nested too deeply! Wow!!! How did you do that?\n", my_file, my_lineno, my_col);
1959 } else if ( (int)(p2-p1) > sizeof(fnamebuf) - 1 ) {
1960 ast_log(LOG_ERROR,"File=%s, line=%d, column=%d: Filename is incredibly way too long (%d chars!). Inclusion ignored!\n", my_file, my_lineno, my_col, yyleng - 10);
1961 } else {
1962 strncpy(fnamebuf, p1+1, p2-p1-1);
1963 fnamebuf[p2-p1-1] = 0;
1964 if (fnamebuf[0] != '/') {
1965 char fnamebuf2[1024];
1966 snprintf(fnamebuf2,sizeof(fnamebuf2), "%s/%s", (char *)ast_config_AST_CONFIG_DIR, fnamebuf);
1967 ast_copy_string(fnamebuf,fnamebuf2,sizeof(fnamebuf));
1968 }
1969#ifdef SOLARIS
1970 glob_ret = glob(fnamebuf, GLOB_NOCHECK, NULL, &globbuf);
1971#else
1972 glob_ret = glob(fnamebuf, GLOB_NOMAGIC|GLOB_BRACE, NULL, &globbuf);
1973#endif
1974 if (glob_ret == GLOB_NOSPACE) {
1976 "Glob Expansion of pattern '%s' failed: Not enough memory\n", fnamebuf);
1977 } else if (glob_ret == GLOB_ABORTED) {
1979 "Glob Expansion of pattern '%s' failed: Read error\n", fnamebuf);
1980 } else if (glob_ret == GLOB_NOMATCH) {
1982 "Glob Expansion of pattern '%s' failed: No matches!\n", fnamebuf);
1983 } else {
1984 globbuf_pos = 0;
1985 }
1986 }
1987 if (globbuf_pos > -1) {
1988 setup_filestack(fnamebuf, sizeof(fnamebuf), &globbuf, 0, yyscanner, 1);
1989 }
1990 }
1991 YY_BREAK
1992case YY_STATE_EOF(INITIAL):
1993case YY_STATE_EOF(paren):
1994case YY_STATE_EOF(semic):
1995case YY_STATE_EOF(argg):
1996case YY_STATE_EOF(comment):
2000#line 625 "ael.flex"
2001{
2002 char fnamebuf[2048];
2003 if (include_stack_index > 0 && include_stack[include_stack_index-1].globbuf_pos < include_stack[include_stack_index-1].globbuf.gl_pathc-1) {
2006 setup_filestack(fnamebuf, sizeof(fnamebuf), &include_stack[include_stack_index-1].globbuf, include_stack[include_stack_index-1].globbuf_pos, yyscanner, 0);
2007 /* finish this */
2008
2009 } else {
2013 }
2014 if (my_file) {
2015 free(my_file);
2016 my_file = 0;
2017 }
2018 if ( --include_stack_index < 0 ) {
2019 yyterminate();
2020 } else {
2021 globfree(&include_stack[include_stack_index].globbuf);
2023
2029 }
2030 }
2031 }
2032 YY_BREAK
2033case 75:
2034/* rule 75 can match eol */
2036#line 657 "ael.flex"
2037{ /* default rule */ ast_log(LOG_ERROR,"Unhandled char(s): %s\n", yytext); }
2038 YY_BREAK
2039case 76:
2041#line 659 "ael.flex"
2042YY_FATAL_ERROR( "flex scanner jammed" );
2043 YY_BREAK
2044#line 2042 "ael_lex.c"
2045
2046 case YY_END_OF_BUFFER:
2047 {
2048 /* Amount of text matched not including the EOB char. */
2049 int yy_amount_of_matched_text = (int) (yy_cp - yyg->yytext_ptr) - 1;
2050
2051 /* Undo the effects of YY_DO_BEFORE_ACTION. */
2054
2055 if ( YY_CURRENT_BUFFER_LVALUE->yy_buffer_status == YY_BUFFER_NEW )
2056 {
2057 /* We're scanning a new file or input source. It's
2058 * possible that this happened because the user
2059 * just pointed yyin at a new source and called
2060 * ael_yylex(). If so, then we have to assure
2061 * consistency between YY_CURRENT_BUFFER and our
2062 * globals. Here is the right place to do so, because
2063 * this is the first action (other than possibly a
2064 * back-up) that will match for the new input source.
2065 */
2067 YY_CURRENT_BUFFER_LVALUE->yy_input_file = yyin;
2068 YY_CURRENT_BUFFER_LVALUE->yy_buffer_status = YY_BUFFER_NORMAL;
2069 }
2070
2071 /* Note that here we test for yy_c_buf_p "<=" to the position
2072 * of the first EOB in the buffer, since yy_c_buf_p will
2073 * already have been incremented past the NUL character
2074 * (since all states make transitions on EOB to the
2075 * end-of-buffer state). Contrast this with the test
2076 * in input().
2077 */
2078 if ( yyg->yy_c_buf_p <= &YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[yyg->yy_n_chars] )
2079 { /* This was really a NUL. */
2080 yy_state_type yy_next_state;
2081
2082 yyg->yy_c_buf_p = yyg->yytext_ptr + yy_amount_of_matched_text;
2083
2084 yy_current_state = yy_get_previous_state( yyscanner );
2085
2086 /* Okay, we're now positioned to make the NUL
2087 * transition. We couldn't have
2088 * yy_get_previous_state() go ahead and do it
2089 * for us because it doesn't know how to deal
2090 * with the possibility of jamming (and we don't
2091 * want to build jamming into it because then it
2092 * will run more slowly).
2093 */
2094
2095 yy_next_state = yy_try_NUL_trans( yy_current_state , yyscanner);
2096
2097 yy_bp = yyg->yytext_ptr + YY_MORE_ADJ;
2098
2099 if ( yy_next_state )
2100 {
2101 /* Consume the NUL. */
2102 yy_cp = ++yyg->yy_c_buf_p;
2103 yy_current_state = yy_next_state;
2104 goto yy_match;
2105 }
2106
2107 else
2108 {
2110 yy_current_state = yyg->yy_last_accepting_state;
2111 goto yy_find_action;
2112 }
2113 }
2114
2115 else switch ( yy_get_next_buffer( yyscanner ) )
2116 {
2118 {
2120
2121 if ( ael_yywrap(yyscanner ) )
2122 {
2123 /* Note: because we've taken care in
2124 * yy_get_next_buffer() to have set up
2125 * yytext, we can now set up
2126 * yy_c_buf_p so that if some total
2127 * hoser (like flex itself) wants to
2128 * call the scanner after we return the
2129 * YY_NULL, it'll still work - another
2130 * YY_NULL will get returned.
2131 */
2132 yyg->yy_c_buf_p = yyg->yytext_ptr + YY_MORE_ADJ;
2133
2135 goto do_action;
2136 }
2137
2138 else
2139 {
2142 }
2143 break;
2144 }
2145
2147 yyg->yy_c_buf_p =
2148 yyg->yytext_ptr + yy_amount_of_matched_text;
2149
2150 yy_current_state = yy_get_previous_state( yyscanner );
2151
2152 yy_cp = yyg->yy_c_buf_p;
2153 yy_bp = yyg->yytext_ptr + YY_MORE_ADJ;
2154 goto yy_match;
2155
2156 case EOB_ACT_LAST_MATCH:
2157 yyg->yy_c_buf_p =
2159
2160 yy_current_state = yy_get_previous_state( yyscanner );
2161
2162 yy_cp = yyg->yy_c_buf_p;
2163 yy_bp = yyg->yytext_ptr + YY_MORE_ADJ;
2164 goto yy_find_action;
2165 }
2166 break;
2167 }
2168
2169 default:
2171 "fatal flex scanner internal error--no action found" );
2172 } /* end of action switch */
2173 } /* end of scanning one token */
2174} /* end of ael_yylex */
2175
2176/* yy_get_next_buffer - try to read in a new buffer
2177 *
2178 * Returns a code representing an action:
2179 * EOB_ACT_LAST_MATCH -
2180 * EOB_ACT_CONTINUE_SCAN - continue scanning from current position
2181 * EOB_ACT_END_OF_FILE - end of file
2182 */
2183static int yy_get_next_buffer (yyscan_t yyscanner)
2184{
2185 struct yyguts_t * yyg = (struct yyguts_t*)yyscanner;
2186 register char *dest = YY_CURRENT_BUFFER_LVALUE->yy_ch_buf;
2187 register char *source = yyg->yytext_ptr;
2188 register int number_to_move, i;
2189 int ret_val;
2190
2191 if ( yyg->yy_c_buf_p > &YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[yyg->yy_n_chars + 1] )
2193 "fatal flex scanner internal error--end of buffer missed" );
2194
2195 if ( YY_CURRENT_BUFFER_LVALUE->yy_fill_buffer == 0 )
2196 { /* Don't try to fill the buffer, so this is an EOF. */
2197 if ( yyg->yy_c_buf_p - yyg->yytext_ptr - YY_MORE_ADJ == 1 )
2198 {
2199 /* We matched a single character, the EOB, so
2200 * treat this as a final EOF.
2201 */
2202 return EOB_ACT_END_OF_FILE;
2203 }
2204
2205 else
2206 {
2207 /* We matched some text prior to the EOB, first
2208 * process it.
2209 */
2210 return EOB_ACT_LAST_MATCH;
2211 }
2212 }
2213
2214 /* Try to read more data. */
2215
2216 /* First move last chars to start of buffer. */
2217 number_to_move = (int) (yyg->yy_c_buf_p - yyg->yytext_ptr) - 1;
2218
2219 for ( i = 0; i < number_to_move; ++i )
2220 *(dest++) = *(source++);
2221
2222 if ( YY_CURRENT_BUFFER_LVALUE->yy_buffer_status == YY_BUFFER_EOF_PENDING )
2223 /* don't do the read, it's not guaranteed to return an EOF,
2224 * just force an EOF
2225 */
2226 YY_CURRENT_BUFFER_LVALUE->yy_n_chars = yyg->yy_n_chars = 0;
2227
2228 else
2229 {
2230 int num_to_read =
2231 YY_CURRENT_BUFFER_LVALUE->yy_buf_size - number_to_move - 1;
2232
2233 while ( num_to_read <= 0 )
2234 { /* Not enough room in the buffer - grow it. */
2235
2236 /* just a shorter name for the current buffer */
2238
2239 int yy_c_buf_p_offset =
2240 (int) (yyg->yy_c_buf_p - b->yy_ch_buf);
2241
2242 if ( b->yy_is_our_buffer )
2243 {
2244 int new_size = b->yy_buf_size * 2;
2245
2246 if ( new_size <= 0 )
2247 b->yy_buf_size += b->yy_buf_size / 8;
2248 else
2249 b->yy_buf_size *= 2;
2250
2251 b->yy_ch_buf = (char *)
2252 /* Include room in for 2 EOB chars. */
2253 ael_yyrealloc((void *) b->yy_ch_buf,b->yy_buf_size + 2 ,yyscanner );
2254 }
2255 else
2256 /* Can't grow it, we don't own it. */
2257 b->yy_ch_buf = 0;
2258
2259 if ( ! b->yy_ch_buf )
2261 "fatal error - scanner input buffer overflow" );
2262
2263 yyg->yy_c_buf_p = &b->yy_ch_buf[yy_c_buf_p_offset];
2264
2265 num_to_read = YY_CURRENT_BUFFER_LVALUE->yy_buf_size -
2266 number_to_move - 1;
2267
2268 }
2269
2270 if ( num_to_read > YY_READ_BUF_SIZE )
2271 num_to_read = YY_READ_BUF_SIZE;
2272
2273 /* Read in more data. */
2274 YY_INPUT( (&YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[number_to_move]),
2275 yyg->yy_n_chars, (size_t) num_to_read );
2276
2278 }
2279
2280 if ( yyg->yy_n_chars == 0 )
2281 {
2282 if ( number_to_move == YY_MORE_ADJ )
2283 {
2284 ret_val = EOB_ACT_END_OF_FILE;
2285 ael_yyrestart(yyin ,yyscanner);
2286 }
2287
2288 else
2289 {
2290 ret_val = EOB_ACT_LAST_MATCH;
2291 YY_CURRENT_BUFFER_LVALUE->yy_buffer_status =
2293 }
2294 }
2295
2296 else
2297 ret_val = EOB_ACT_CONTINUE_SCAN;
2298
2299 if ((yy_size_t) (yyg->yy_n_chars + number_to_move) > YY_CURRENT_BUFFER_LVALUE->yy_buf_size) {
2300 /* Extend the array by 50%, plus the number we really need. */
2301 yy_size_t new_size = yyg->yy_n_chars + number_to_move + (yyg->yy_n_chars >> 1);
2302 YY_CURRENT_BUFFER_LVALUE->yy_ch_buf = (char *) ael_yyrealloc((void *) YY_CURRENT_BUFFER_LVALUE->yy_ch_buf,new_size ,yyscanner );
2303 if ( ! YY_CURRENT_BUFFER_LVALUE->yy_ch_buf )
2304 YY_FATAL_ERROR( "out of dynamic memory in yy_get_next_buffer()" );
2305 }
2306
2307 yyg->yy_n_chars += number_to_move;
2310
2311 yyg->yytext_ptr = &YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[0];
2312
2313 return ret_val;
2314}
2315
2316/* yy_get_previous_state - get the state just before the EOB char was reached */
2317
2319{
2320 register yy_state_type yy_current_state;
2321 register char *yy_cp;
2322 struct yyguts_t * yyg = (struct yyguts_t*)yyscanner;
2323
2324 yy_current_state = yyg->yy_start;
2325
2326 for ( yy_cp = yyg->yytext_ptr + YY_MORE_ADJ; yy_cp < yyg->yy_c_buf_p; ++yy_cp )
2327 {
2328 register YY_CHAR yy_c = (*yy_cp ? yy_ec[YY_SC_TO_UI(*yy_cp)] : 1);
2329 if ( yy_accept[yy_current_state] )
2330 {
2331 yyg->yy_last_accepting_state = yy_current_state;
2333 }
2334 while ( yy_chk[yy_base[yy_current_state] + yy_c] != yy_current_state )
2335 {
2336 yy_current_state = (int) yy_def[yy_current_state];
2337 if ( yy_current_state >= 285 )
2338 yy_c = yy_meta[(unsigned int) yy_c];
2339 }
2340 yy_current_state = yy_nxt[yy_base[yy_current_state] + (unsigned int) yy_c];
2341 }
2342
2343 return yy_current_state;
2344}
2345
2346/* yy_try_NUL_trans - try to make a transition on the NUL character
2347 *
2348 * synopsis
2349 * next_state = yy_try_NUL_trans( current_state );
2350 */
2351 static yy_state_type yy_try_NUL_trans (yy_state_type yy_current_state , yyscan_t yyscanner)
2352{
2353 register int yy_is_jam;
2354 struct yyguts_t * yyg = (struct yyguts_t*)yyscanner; /* This var may be unused depending upon options. */
2355 register char *yy_cp = yyg->yy_c_buf_p;
2356
2357 register YY_CHAR yy_c = 1;
2358 if ( yy_accept[yy_current_state] )
2359 {
2360 yyg->yy_last_accepting_state = yy_current_state;
2362 }
2363 while ( yy_chk[yy_base[yy_current_state] + yy_c] != yy_current_state )
2364 {
2365 yy_current_state = (int) yy_def[yy_current_state];
2366 if ( yy_current_state >= 285 )
2367 yy_c = yy_meta[(unsigned int) yy_c];
2368 }
2369 yy_current_state = yy_nxt[yy_base[yy_current_state] + (unsigned int) yy_c];
2370 yy_is_jam = (yy_current_state == 284);
2371
2372 return yy_is_jam ? 0 : yy_current_state;
2373}
2374
2375 static void yyunput (int c, register char * yy_bp , yyscan_t yyscanner)
2376{
2377 register char *yy_cp;
2378 struct yyguts_t * yyg = (struct yyguts_t*)yyscanner;
2379
2380 yy_cp = yyg->yy_c_buf_p;
2381
2382 /* undo effects of setting up yytext */
2384
2385 if ( yy_cp < YY_CURRENT_BUFFER_LVALUE->yy_ch_buf + 2 )
2386 { /* need to shift things up to make room */
2387 /* +2 for EOB chars. */
2388 register int number_to_move = yyg->yy_n_chars + 2;
2389 register char *dest = &YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[
2390 YY_CURRENT_BUFFER_LVALUE->yy_buf_size + 2];
2391 register char *source =
2392 &YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[number_to_move];
2393
2394 while ( source > YY_CURRENT_BUFFER_LVALUE->yy_ch_buf )
2395 *--dest = *--source;
2396
2397 yy_cp += (int) (dest - source);
2398 yy_bp += (int) (dest - source);
2399 YY_CURRENT_BUFFER_LVALUE->yy_n_chars =
2400 yyg->yy_n_chars = YY_CURRENT_BUFFER_LVALUE->yy_buf_size;
2401
2402 if ( yy_cp < YY_CURRENT_BUFFER_LVALUE->yy_ch_buf + 2 )
2403 YY_FATAL_ERROR( "flex scanner push-back overflow" );
2404 }
2405
2406 *--yy_cp = (char) c;
2407
2408 yyg->yytext_ptr = yy_bp;
2410 yyg->yy_c_buf_p = yy_cp;
2411}
2412
2413#ifndef YY_NO_INPUT
2414#ifdef __cplusplus
2415 static int yyinput (yyscan_t yyscanner)
2416#else
2417 static int input (yyscan_t yyscanner)
2418#endif
2419
2420{
2421 int c;
2422 struct yyguts_t * yyg = (struct yyguts_t*)yyscanner;
2423
2425
2427 {
2428 /* yy_c_buf_p now points to the character we want to return.
2429 * If this occurs *before* the EOB characters, then it's a
2430 * valid NUL; if not, then we've hit the end of the buffer.
2431 */
2432 if ( yyg->yy_c_buf_p < &YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[yyg->yy_n_chars] )
2433 /* This was really a NUL. */
2434 *yyg->yy_c_buf_p = '\0';
2435
2436 else
2437 { /* need more input */
2438 int offset = yyg->yy_c_buf_p - yyg->yytext_ptr;
2439 ++yyg->yy_c_buf_p;
2440
2441 switch ( yy_get_next_buffer( yyscanner ) )
2442 {
2443 case EOB_ACT_LAST_MATCH:
2444 /* This happens because yy_g_n_b()
2445 * sees that we've accumulated a
2446 * token and flags that we need to
2447 * try matching the token before
2448 * proceeding. But for input(),
2449 * there's no matching to consider.
2450 * So convert the EOB_ACT_LAST_MATCH
2451 * to EOB_ACT_END_OF_FILE.
2452 */
2453
2454 /* Reset buffer status. */
2455 ael_yyrestart(yyin ,yyscanner);
2456
2457 /*FALLTHROUGH*/
2458
2460 {
2461 if ( ael_yywrap(yyscanner ) )
2462 return EOF;
2463
2466#ifdef __cplusplus
2467 return yyinput(yyscanner);
2468#else
2469 return input(yyscanner);
2470#endif
2471 }
2472
2474 yyg->yy_c_buf_p = yyg->yytext_ptr + offset;
2475 break;
2476 }
2477 }
2478 }
2479
2480 c = *(unsigned char *) yyg->yy_c_buf_p; /* cast for 8-bit char's */
2481 *yyg->yy_c_buf_p = '\0'; /* preserve yytext */
2483
2484 return c;
2485}
2486#endif /* ifndef YY_NO_INPUT */
2487
2488/** Immediately switch to a different input stream.
2489 * @param input_file A readable stream.
2490 * @param yyscanner The scanner object.
2491 * @note This function does not reset the start condition to @c INITIAL .
2492 */
2493 void ael_yyrestart (FILE * input_file , yyscan_t yyscanner)
2494{
2495 struct yyguts_t * yyg = (struct yyguts_t*)yyscanner;
2496
2497 if ( ! YY_CURRENT_BUFFER ){
2498 ael_yyensure_buffer_stack (yyscanner);
2501 }
2502
2503 ael_yy_init_buffer(YY_CURRENT_BUFFER,input_file ,yyscanner);
2504 ael_yy_load_buffer_state(yyscanner );
2505}
2506
2507/** Switch to a different input buffer.
2508 * @param new_buffer The new input buffer.
2509 * @param yyscanner The scanner object.
2510 */
2512{
2513 struct yyguts_t * yyg = (struct yyguts_t*)yyscanner;
2514
2515 /* TODO. We should be able to replace this entire function body
2516 * with
2517 * ael_yypop_buffer_state();
2518 * ael_yypush_buffer_state(new_buffer);
2519 */
2520 ael_yyensure_buffer_stack (yyscanner);
2521 if ( YY_CURRENT_BUFFER == new_buffer )
2522 return;
2523
2524 if ( YY_CURRENT_BUFFER )
2525 {
2526 /* Flush out information for old buffer. */
2530 }
2531
2532 YY_CURRENT_BUFFER_LVALUE = new_buffer;
2533 ael_yy_load_buffer_state(yyscanner );
2534
2535 /* We don't actually know whether we did this switch during
2536 * EOF (ael_yywrap()) processing, but the only time this flag
2537 * is looked at is after ael_yywrap() is called, so it's safe
2538 * to go ahead and always set it.
2539 */
2541}
2542
2543static void ael_yy_load_buffer_state (yyscan_t yyscanner)
2544{
2545 struct yyguts_t * yyg = (struct yyguts_t*)yyscanner;
2547 yyg->yytext_ptr = yyg->yy_c_buf_p = YY_CURRENT_BUFFER_LVALUE->yy_buf_pos;
2548 yyin = YY_CURRENT_BUFFER_LVALUE->yy_input_file;
2550}
2551
2552/** Allocate and initialize an input buffer state.
2553 * @param file A readable stream.
2554 * @param size The character buffer size in bytes. When in doubt, use @c YY_BUF_SIZE.
2555 * @param yyscanner The scanner object.
2556 * @return the allocated buffer state.
2557 */
2558 YY_BUFFER_STATE ael_yy_create_buffer (FILE * file, int size , yyscan_t yyscanner)
2559{
2561
2562 b = (YY_BUFFER_STATE) ael_yyalloc(sizeof( struct yy_buffer_state ) ,yyscanner );
2563 if ( ! b )
2564 YY_FATAL_ERROR( "out of dynamic memory in ael_yy_create_buffer()" );
2565
2566 b->yy_buf_size = size;
2567
2568 /* yy_ch_buf has to be 2 characters longer than the size given because
2569 * we need to put in 2 end-of-buffer characters.
2570 */
2571 b->yy_ch_buf = (char *) ael_yyalloc(b->yy_buf_size + 2 ,yyscanner );
2572 if ( ! b->yy_ch_buf )
2573 YY_FATAL_ERROR( "out of dynamic memory in ael_yy_create_buffer()" );
2574
2575 b->yy_is_our_buffer = 1;
2576
2577 ael_yy_init_buffer(b,file ,yyscanner);
2578
2579 return b;
2580}
2581
2582/** Destroy the buffer.
2583 * @param b a buffer created with ael_yy_create_buffer()
2584 * @param yyscanner The scanner object.
2585 */
2587{
2588 struct yyguts_t * yyg = (struct yyguts_t*)yyscanner;
2589
2590 if ( ! b )
2591 return;
2592
2593 if ( b == YY_CURRENT_BUFFER ) /* Not sure if we should pop here. */
2595
2596 if ( b->yy_is_our_buffer )
2597 ael_yyfree((void *) b->yy_ch_buf ,yyscanner );
2598
2599 ael_yyfree((void *) b ,yyscanner );
2600}
2601
2602#ifndef __cplusplus
2603extern int isatty (int );
2604#endif /* __cplusplus */
2605
2606/* Initializes or reinitializes a buffer.
2607 * This function is sometimes called more than once on the same buffer,
2608 * such as during a ael_yyrestart() or at EOF.
2609 */
2610 static void ael_yy_init_buffer (YY_BUFFER_STATE b, FILE * file , yyscan_t yyscanner)
2611
2612{
2613 int oerrno = errno;
2614 struct yyguts_t * yyg = (struct yyguts_t*)yyscanner;
2615
2616 ael_yy_flush_buffer(b ,yyscanner);
2617
2618 b->yy_input_file = file;
2619 b->yy_fill_buffer = 1;
2620
2621 /* If b is the current buffer, then ael_yy_init_buffer was _probably_
2622 * called from ael_yyrestart() or through yy_get_next_buffer.
2623 * In that case, we don't want to reset the lineno or column.
2624 */
2625 if (b != YY_CURRENT_BUFFER){
2626 b->yy_bs_lineno = 1;
2627 b->yy_bs_column = 0;
2628 }
2629
2630 b->yy_is_interactive = file ? (isatty( fileno(file) ) > 0) : 0;
2631
2632 errno = oerrno;
2633}
2634
2635/** Discard all buffered characters. On the next scan, YY_INPUT will be called.
2636 * @param b the buffer state to be flushed, usually @c YY_CURRENT_BUFFER.
2637 * @param yyscanner The scanner object.
2638 */
2640{
2641 struct yyguts_t * yyg = (struct yyguts_t*)yyscanner;
2642 if ( ! b )
2643 return;
2644
2645 b->yy_n_chars = 0;
2646
2647 /* We always need two end-of-buffer characters. The first causes
2648 * a transition to the end-of-buffer state. The second causes
2649 * a jam in that state.
2650 */
2651 b->yy_ch_buf[0] = YY_END_OF_BUFFER_CHAR;
2652 b->yy_ch_buf[1] = YY_END_OF_BUFFER_CHAR;
2653
2654 b->yy_buf_pos = &b->yy_ch_buf[0];
2655
2656 b->yy_at_bol = 1;
2657 b->yy_buffer_status = YY_BUFFER_NEW;
2658
2659 if ( b == YY_CURRENT_BUFFER )
2660 ael_yy_load_buffer_state(yyscanner );
2661}
2662
2663/** Pushes the new state onto the stack. The new state becomes
2664 * the current state. This function will allocate the stack
2665 * if necessary.
2666 * @param new_buffer The new state.
2667 * @param yyscanner The scanner object.
2668 */
2670{
2671 struct yyguts_t * yyg = (struct yyguts_t*)yyscanner;
2672 if (new_buffer == NULL)
2673 return;
2674
2675 ael_yyensure_buffer_stack(yyscanner);
2676
2677 /* This block is copied from ael_yy_switch_to_buffer. */
2678 if ( YY_CURRENT_BUFFER )
2679 {
2680 /* Flush out information for old buffer. */
2684 }
2685
2686 /* Only push if top exists. Otherwise, replace top. */
2689 YY_CURRENT_BUFFER_LVALUE = new_buffer;
2690
2691 /* copied from ael_yy_switch_to_buffer. */
2692 ael_yy_load_buffer_state(yyscanner );
2694}
2695
2696/** Removes and deletes the top of the stack, if present.
2697 * The next element becomes the new top.
2698 * @param yyscanner The scanner object.
2699 */
2701{
2702 struct yyguts_t * yyg = (struct yyguts_t*)yyscanner;
2703 if (!YY_CURRENT_BUFFER)
2704 return;
2705
2708 if (yyg->yy_buffer_stack_top > 0)
2710
2711 if (YY_CURRENT_BUFFER) {
2712 ael_yy_load_buffer_state(yyscanner );
2714 }
2715}
2716
2717/* Allocates the stack if it does not exist.
2718 * Guarantees space for at least one push.
2719 */
2721{
2722 int num_to_alloc;
2723 struct yyguts_t * yyg = (struct yyguts_t*)yyscanner;
2724
2725 if (!yyg->yy_buffer_stack) {
2726
2727 /* First allocation is just for 2 elements, since we don't know if this
2728 * scanner will even need a stack. We use 2 instead of 1 to avoid an
2729 * immediate realloc on the next call.
2730 */
2731 num_to_alloc = 1;
2733 (num_to_alloc * sizeof(struct yy_buffer_state*)
2734 , yyscanner);
2735 if ( ! yyg->yy_buffer_stack )
2736 YY_FATAL_ERROR( "out of dynamic memory in ael_yyensure_buffer_stack()" );
2737
2738 memset(yyg->yy_buffer_stack, 0, num_to_alloc * sizeof(struct yy_buffer_state*));
2739
2740 yyg->yy_buffer_stack_max = num_to_alloc;
2742 return;
2743 }
2744
2746
2747 /* Increase the buffer to prepare for a possible push. */
2748 int grow_size = 8 /* arbitrary grow size */;
2749
2750 num_to_alloc = yyg->yy_buffer_stack_max + grow_size;
2753 num_to_alloc * sizeof(struct yy_buffer_state*)
2754 , yyscanner);
2755 if ( ! yyg->yy_buffer_stack )
2756 YY_FATAL_ERROR( "out of dynamic memory in ael_yyensure_buffer_stack()" );
2757
2758 /* zero only the new slots.*/
2759 memset(yyg->yy_buffer_stack + yyg->yy_buffer_stack_max, 0, grow_size * sizeof(struct yy_buffer_state*));
2760 yyg->yy_buffer_stack_max = num_to_alloc;
2761 }
2762}
2763
2764/** Setup the input buffer state to scan directly from a user-specified character buffer.
2765 * @param base the character buffer
2766 * @param size the size in bytes of the character buffer
2767 * @param yyscanner The scanner object.
2768 * @return the newly allocated buffer state object.
2769 */
2771{
2773
2774 if ( size < 2 ||
2775 base[size-2] != YY_END_OF_BUFFER_CHAR ||
2776 base[size-1] != YY_END_OF_BUFFER_CHAR )
2777 /* They forgot to leave room for the EOB's. */
2778 return 0;
2779
2780 b = (YY_BUFFER_STATE) ael_yyalloc(sizeof( struct yy_buffer_state ) ,yyscanner );
2781 if ( ! b )
2782 YY_FATAL_ERROR( "out of dynamic memory in ael_yy_scan_buffer()" );
2783
2784 b->yy_buf_size = size - 2; /* "- 2" to take care of EOB's */
2785 b->yy_buf_pos = b->yy_ch_buf = base;
2786 b->yy_is_our_buffer = 0;
2787 b->yy_input_file = 0;
2788 b->yy_n_chars = b->yy_buf_size;
2789 b->yy_is_interactive = 0;
2790 b->yy_at_bol = 1;
2791 b->yy_fill_buffer = 0;
2792 b->yy_buffer_status = YY_BUFFER_NEW;
2793
2794 ael_yy_switch_to_buffer(b ,yyscanner );
2795
2796 return b;
2797}
2798
2799/** Setup the input buffer state to scan a string. The next call to ael_yylex() will
2800 * scan from a @e copy of @a str.
2801 * @param yystr a NUL-terminated string to scan
2802 * @param yyscanner The scanner object.
2803 * @return the newly allocated buffer state object.
2804 * @note If you want to scan bytes that may contain NUL values, then use
2805 * ael_yy_scan_bytes() instead.
2806 */
2808{
2809
2810 return ael_yy_scan_bytes(yystr,strlen(yystr) ,yyscanner);
2811}
2812
2813/** Setup the input buffer state to scan the given bytes. The next call to ael_yylex() will
2814 * scan from a @e copy of @a bytes.
2815 * @param bytes the byte buffer to scan
2816 * @param len the number of bytes in the buffer pointed to by @a bytes.
2817 * @param yyscanner The scanner object.
2818 * @return the newly allocated buffer state object.
2819 */
2820YY_BUFFER_STATE ael_yy_scan_bytes (yyconst char * yybytes, int _yybytes_len , yyscan_t yyscanner)
2821{
2823 char *buf;
2824 yy_size_t n;
2825 int i;
2826
2827 /* Get memory for full buffer, including space for trailing EOB's. */
2828 n = _yybytes_len + 2;
2829 buf = (char *) ael_yyalloc(n ,yyscanner );
2830 if ( ! buf )
2831 YY_FATAL_ERROR( "out of dynamic memory in ael_yy_scan_bytes()" );
2832
2833 for ( i = 0; i < _yybytes_len; ++i )
2834 buf[i] = yybytes[i];
2835
2836 buf[_yybytes_len] = buf[_yybytes_len+1] = YY_END_OF_BUFFER_CHAR;
2837
2838 b = ael_yy_scan_buffer(buf,n ,yyscanner);
2839 if ( ! b )
2840 YY_FATAL_ERROR( "bad buffer in ael_yy_scan_bytes()" );
2841
2842 /* It's okay to grow etc. this buffer, and we should throw it
2843 * away when we're done.
2844 */
2845 b->yy_is_our_buffer = 1;
2846
2847 return b;
2848}
2849
2850#ifndef YY_EXIT_FAILURE
2851#define YY_EXIT_FAILURE 2
2852#endif
2853
2854static void yy_fatal_error (yyconst char* msg , yyscan_t yyscanner)
2855{
2856 (void) fprintf( stderr, "%s\n", msg );
2857 exit( YY_EXIT_FAILURE );
2858}
2859
2860/* Redefine yyless() so it works in section 3 code. */
2861
2862#undef yyless
2863#define yyless(n) \
2864 do \
2865 { \
2866 /* Undo effects of setting up yytext. */ \
2867 int yyless_macro_arg = (n); \
2868 YY_LESS_LINENO(yyless_macro_arg);\
2869 yytext[yyleng] = yyg->yy_hold_char; \
2870 yyg->yy_c_buf_p = yytext + yyless_macro_arg; \
2871 yyg->yy_hold_char = *yyg->yy_c_buf_p; \
2872 *yyg->yy_c_buf_p = '\0'; \
2873 yyleng = yyless_macro_arg; \
2874 } \
2875 while ( 0 )
2876
2877/* Accessor methods (get/set functions) to struct members. */
2878
2879/** Get the user-defined data for this scanner.
2880 * @param yyscanner The scanner object.
2881 */
2883{
2884 struct yyguts_t * yyg = (struct yyguts_t*)yyscanner;
2885 return yyextra;
2886}
2887
2888/** Get the current line number.
2889 * @param yyscanner The scanner object.
2890 */
2892{
2893 struct yyguts_t * yyg = (struct yyguts_t*)yyscanner;
2894
2895 if (! YY_CURRENT_BUFFER)
2896 return 0;
2897
2898 return yylineno;
2899}
2900
2901/** Get the current column number.
2902 * @param yyscanner The scanner object.
2903 */
2905{
2906 struct yyguts_t * yyg = (struct yyguts_t*)yyscanner;
2907
2908 if (! YY_CURRENT_BUFFER)
2909 return 0;
2910
2911 return yycolumn;
2912}
2913
2914/** Get the input stream.
2915 * @param yyscanner The scanner object.
2916 */
2917FILE *ael_yyget_in (yyscan_t yyscanner)
2918{
2919 struct yyguts_t * yyg = (struct yyguts_t*)yyscanner;
2920 return yyin;
2921}
2922
2923/** Get the output stream.
2924 * @param yyscanner The scanner object.
2925 */
2926FILE *ael_yyget_out (yyscan_t yyscanner)
2927{
2928 struct yyguts_t * yyg = (struct yyguts_t*)yyscanner;
2929 return yyout;
2930}
2931
2932/** Get the length of the current token.
2933 * @param yyscanner The scanner object.
2934 */
2936{
2937 struct yyguts_t * yyg = (struct yyguts_t*)yyscanner;
2938 return yyleng;
2939}
2940
2941/** Get the current token.
2942 * @param yyscanner The scanner object.
2943 */
2944
2945char *ael_yyget_text (yyscan_t yyscanner)
2946{
2947 struct yyguts_t * yyg = (struct yyguts_t*)yyscanner;
2948 return yytext;
2949}
2950
2951/** Set the user-defined data. This data is never touched by the scanner.
2952 * @param user_defined The data to be associated with this scanner.
2953 * @param yyscanner The scanner object.
2954 */
2955void ael_yyset_extra (YY_EXTRA_TYPE user_defined , yyscan_t yyscanner)
2956{
2957 struct yyguts_t * yyg = (struct yyguts_t*)yyscanner;
2958 yyextra = user_defined ;
2959}
2960
2961/** Set the current line number.
2962 * @param line_number
2963 * @param yyscanner The scanner object.
2964 */
2965void ael_yyset_lineno (int line_number , yyscan_t yyscanner)
2966{
2967 struct yyguts_t * yyg = (struct yyguts_t*)yyscanner;
2968
2969 /* lineno is only valid if an input buffer exists. */
2970 if (! YY_CURRENT_BUFFER )
2971 yy_fatal_error( "ael_yyset_lineno called with no buffer" , yyscanner);
2972
2973 yylineno = line_number;
2974}
2975
2976/** Set the current column.
2977 * @param line_number
2978 * @param yyscanner The scanner object.
2979 */
2980void ael_yyset_column (int column_no , yyscan_t yyscanner)
2981{
2982 struct yyguts_t * yyg = (struct yyguts_t*)yyscanner;
2983
2984 /* column is only valid if an input buffer exists. */
2985 if (! YY_CURRENT_BUFFER )
2986 yy_fatal_error( "ael_yyset_column called with no buffer" , yyscanner);
2987
2988 yycolumn = column_no;
2989}
2990
2991/** Set the input stream. This does not discard the current
2992 * input buffer.
2993 * @param in_str A readable stream.
2994 * @param yyscanner The scanner object.
2995 * @see ael_yy_switch_to_buffer
2996 */
2997void ael_yyset_in (FILE * in_str , yyscan_t yyscanner)
2998{
2999 struct yyguts_t * yyg = (struct yyguts_t*)yyscanner;
3000 yyin = in_str ;
3001}
3002
3003void ael_yyset_out (FILE * out_str , yyscan_t yyscanner)
3004{
3005 struct yyguts_t * yyg = (struct yyguts_t*)yyscanner;
3006 yyout = out_str ;
3007}
3008
3010{
3011 struct yyguts_t * yyg = (struct yyguts_t*)yyscanner;
3012 return yy_flex_debug;
3013}
3014
3015void ael_yyset_debug (int bdebug , yyscan_t yyscanner)
3016{
3017 struct yyguts_t * yyg = (struct yyguts_t*)yyscanner;
3018 yy_flex_debug = bdebug ;
3019}
3020
3021/* Accessor methods for yylval and yylloc */
3022
3024{
3025 struct yyguts_t * yyg = (struct yyguts_t*)yyscanner;
3026 return yylval;
3027}
3028
3029void ael_yyset_lval (YYSTYPE * yylval_param , yyscan_t yyscanner)
3030{
3031 struct yyguts_t * yyg = (struct yyguts_t*)yyscanner;
3032 yylval = yylval_param;
3033}
3034
3036{
3037 struct yyguts_t * yyg = (struct yyguts_t*)yyscanner;
3038 return yylloc;
3039}
3040
3041void ael_yyset_lloc (YYLTYPE * yylloc_param , yyscan_t yyscanner)
3042{
3043 struct yyguts_t * yyg = (struct yyguts_t*)yyscanner;
3044 yylloc = yylloc_param;
3045}
3046
3047/* User-visible API */
3048
3049/* ael_yylex_init is special because it creates the scanner itself, so it is
3050 * the ONLY reentrant function that doesn't take the scanner as the last argument.
3051 * That's why we explicitly handle the declaration, instead of using our macros.
3052 */
3053
3054int ael_yylex_init(yyscan_t* ptr_yy_globals)
3055
3056{
3057 if (ptr_yy_globals == NULL){
3058 errno = EINVAL;
3059 return 1;
3060 }
3061
3062 *ptr_yy_globals = (yyscan_t) ael_yyalloc ( sizeof( struct yyguts_t ), NULL );
3063
3064 if (*ptr_yy_globals == NULL){
3065 errno = ENOMEM;
3066 return 1;
3067 }
3068
3069 /* By setting to 0xAA, we expose bugs in yy_init_globals. Leave at 0x00 for releases. */
3070 memset(*ptr_yy_globals,0x00,sizeof(struct yyguts_t));
3071
3072 return yy_init_globals ( *ptr_yy_globals );
3073}
3074
3075/* ael_yylex_init_extra has the same functionality as ael_yylex_init, but follows the
3076 * convention of taking the scanner as the last argument. Note however, that
3077 * this is a *pointer* to a scanner, as it will be allocated by this call (and
3078 * is the reason, too, why this function also must handle its own declaration).
3079 * The user defined value in the first argument will be available to ael_yyalloc in
3080 * the yyextra field.
3081 */
3082
3083int ael_yylex_init_extra(YY_EXTRA_TYPE yy_user_defined,yyscan_t* ptr_yy_globals )
3084
3085{
3086 struct yyguts_t dummy_yyguts;
3087
3088 ael_yyset_extra (yy_user_defined, &dummy_yyguts);
3089
3090 if (ptr_yy_globals == NULL){
3091 errno = EINVAL;
3092 return 1;
3093 }
3094
3095 *ptr_yy_globals = (yyscan_t) ael_yyalloc ( sizeof( struct yyguts_t ), &dummy_yyguts );
3096
3097 if (*ptr_yy_globals == NULL){
3098 errno = ENOMEM;
3099 return 1;
3100 }
3101
3102 /* By setting to 0xAA, we expose bugs in
3103 yy_init_globals. Leave at 0x00 for releases. */
3104 memset(*ptr_yy_globals,0x00,sizeof(struct yyguts_t));
3105
3106 ael_yyset_extra (yy_user_defined, *ptr_yy_globals);
3107
3108 return yy_init_globals ( *ptr_yy_globals );
3109}
3110
3111static int yy_init_globals (yyscan_t yyscanner)
3112{
3113 struct yyguts_t * yyg = (struct yyguts_t*)yyscanner;
3114 /* Initialization is the same as for the non-reentrant scanner.
3115 * This function is called from ael_yylex_destroy(), so don't allocate here.
3116 */
3117
3118 yyg->yy_buffer_stack = 0;
3121 yyg->yy_c_buf_p = (char *) 0;
3122 yyg->yy_init = 0;
3123 yyg->yy_start = 0;
3124
3128
3129/* Defined in main.c */
3130#ifdef YY_STDINIT
3131 yyin = stdin;
3132 yyout = stdout;
3133#else
3134 yyin = (FILE *) 0;
3135 yyout = (FILE *) 0;
3136#endif
3137
3138 /* For future reference: Set errno on error, since we are called by
3139 * ael_yylex_init()
3140 */
3141 return 0;
3142}
3143
3144/* ael_yylex_destroy is for both reentrant and non-reentrant scanners. */
3146{
3147 struct yyguts_t * yyg = (struct yyguts_t*)yyscanner;
3148
3149 /* Pop the buffer stack, destroying each element. */
3150 while(YY_CURRENT_BUFFER){
3153 ael_yypop_buffer_state(yyscanner);
3154 }
3155
3156 /* Destroy the stack itself. */
3157 ael_yyfree(yyg->yy_buffer_stack ,yyscanner);
3159
3160 /* Destroy the start condition stack. */
3161 ael_yyfree(yyg->yy_start_stack ,yyscanner );
3163
3164 /* Reset the globals. This is important in a non-reentrant scanner so the next time
3165 * ael_yylex() is called, initialization will occur. */
3166 yy_init_globals( yyscanner);
3167
3168 /* Destroy the main struct (reentrant only). */
3169 ael_yyfree ( yyscanner , yyscanner );
3170 yyscanner = NULL;
3171 return 0;
3172}
3173
3174/*
3175 * Internal utility routines.
3176 */
3177
3178#ifndef yytext_ptr
3179static void yy_flex_strncpy (char* s1, yyconst char * s2, int n , yyscan_t yyscanner)
3180{
3181 register int i;
3182 for ( i = 0; i < n; ++i )
3183 s1[i] = s2[i];
3184}
3185#endif
3186
3187#ifdef YY_NEED_STRLEN
3188static int yy_flex_strlen (yyconst char * s , yyscan_t yyscanner)
3189{
3190 register int n;
3191 for ( n = 0; s[n]; ++n )
3192 ;
3193
3194 return n;
3195}
3196#endif
3197
3198void *ael_yyalloc (yy_size_t size , yyscan_t yyscanner)
3199{
3200 return (void *) malloc( size );
3201}
3202
3203void *ael_yyrealloc (void * ptr, yy_size_t size , yyscan_t yyscanner)
3204{
3205 /* The cast to (char *) in the following accommodates both
3206 * implementations that use char* generic pointers, and those
3207 * that use void* generic pointers. It works with the latter
3208 * because both ANSI C and C++ allow castless assignment from
3209 * any pointer type to void*, and deal with argument conversions
3210 * as though doing an assignment.
3211 */
3212 return (void *) realloc( (char *) ptr, size );
3213}
3214
3215#define YYTABLES_NAME "yytables"
3216
3217#line 659 "ael.flex"
3218
3219
3220
3221static void pbcpush(char x)
3222{
3223 pbcstack[pbcpos++] = x;
3224}
3225
3226void ael_yyfree(void *ptr, yyscan_t yyscanner)
3227{
3228 if (ptr)
3229 free( (char*) ptr );
3230}
3231
3232static int pbcpop(char x)
3233{
3234 if ( ( x == ')' && pbcstack[pbcpos-1] == '(' )
3235 || ( x == ']' && pbcstack[pbcpos-1] == '[' )
3236 || ( x == '}' && pbcstack[pbcpos-1] == '{' )) {
3237 pbcpos--;
3238 return 0;
3239 }
3240 return 1; /* error */
3241}
3242
3243static void pbcpush2(char x)
3244{
3245 pbcstack2[pbcpos2++] = x;
3246}
3247
3248static int pbcpop2(char x)
3249{
3250 if ( ( x == ')' && pbcstack2[pbcpos2-1] == '(' )
3251 || ( x == ']' && pbcstack2[pbcpos2-1] == '[' )
3252 || ( x == '}' && pbcstack2[pbcpos2-1] == '{' )) {
3253 pbcpos2--;
3254 return 0;
3255 }
3256 return 1; /* error */
3257}
3258
3259static void pbcpush3(char x)
3260{
3261 pbcstack3[pbcpos3++] = x;
3262}
3263
3264static int pbcpop3(char x)
3265{
3266 if ( ( x == ')' && pbcstack3[pbcpos3-1] == '(' )
3267 || ( x == ']' && pbcstack3[pbcpos3-1] == '[' )
3268 || ( x == '}' && pbcstack3[pbcpos3-1] == '{' )) {
3269 pbcpos3--;
3270 return 0;
3271 }
3272 return 1; /* error */
3273}
3274
3275static int c_prevword(void)
3276{
3277 char *c = prev_word;
3278 if (c == NULL)
3279 return 0;
3280 while ( *c ) {
3281 switch (*c) {
3282 case '{':
3283 case '[':
3284 case '(':
3285 pbcpush(*c);
3286 break;
3287 case '}':
3288 case ']':
3289 case ')':
3290 if (pbcpop(*c))
3291 return 1;
3292 break;
3293 }
3294 c++;
3295 }
3296 return 0;
3297}
3298
3299
3300/*
3301 * The following three functions, reset_*, are used in the bison
3302 * code to switch context. As a consequence, we need to
3303 * declare them global and add a prototype so that the
3304 * compiler does not complain.
3305 *
3306 * NOTE: yyg is declared because it is used in the BEGIN macros,
3307 * though that should be hidden as the macro changes
3308 * depending on the flex options that we use - in particular,
3309 * %reentrant changes the way the macro is declared;
3310 * without %reentrant, BEGIN uses yystart instead of yyg
3311 */
3312
3313void reset_parencount(yyscan_t yyscanner );
3315{
3316 struct yyguts_t * yyg = (struct yyguts_t*)yyscanner;
3317 parencount = 0;
3318 pbcpos = 0;
3319 pbcpush('('); /* push '(' so the last pcbpop (parencount= -1) will succeed */
3320 c_prevword();
3321 BEGIN(paren);
3322}
3323
3324void reset_semicount(yyscan_t yyscanner );
3326{
3327 struct yyguts_t * yyg = (struct yyguts_t*)yyscanner;
3328 pbcpos = 0;
3329 BEGIN(semic);
3330}
3331
3332void reset_argcount(yyscan_t yyscanner );
3333void reset_argcount(yyscan_t yyscanner )
3334{
3335 struct yyguts_t * yyg = (struct yyguts_t*)yyscanner;
3336 parencount = 0;
3337 pbcpos = 0;
3338 pbcpush('('); /* push '(' so the last pcbpop (parencount= -1) will succeed */
3339 c_prevword();
3340 BEGIN(argg);
3341}
3342
3343/* used elsewhere, but some local vars */
3344struct pval *ael2_parse(char *filename, int *errors)
3345{
3346 struct pval *pvalue;
3347 struct parse_io *io;
3348 char *buffer;
3349 struct stat stats;
3350 FILE *fin;
3351
3352 /* extern int ael_yydebug; */
3353
3354 io = calloc(sizeof(struct parse_io),1);
3355 /* reset the global counters */
3356 prev_word = 0;
3357 my_lineno = 1;
3359 my_col = 0;
3360 /* ael_yydebug = 1; */
3361 ael_yylex_init(&io->scanner);
3362 fin = fopen(filename,"r");
3363 if ( !fin ) {
3364 ast_log(LOG_ERROR,"File %s could not be opened\n", filename);
3365 *errors = 1;
3366 return 0;
3367 }
3368 if (my_file)
3369 free(my_file);
3370 my_file = strdup(filename);
3371 if (stat(filename, &stats)) {
3372 ast_log(LOG_WARNING, "failed to populate stats from file '%s'\n", filename);
3373 }
3374 buffer = (char*)malloc(stats.st_size+2);
3375 if (fread(buffer, 1, stats.st_size, fin) != stats.st_size) {
3376 ast_log(LOG_ERROR, "fread() failed: %s\n", strerror(errno));
3377 }
3378 buffer[stats.st_size]=0;
3379 fclose(fin);
3380
3381 ael_yy_scan_string (buffer ,io->scanner);
3382 ael_yyset_lineno(1 , io->scanner);
3383
3384 /* ael_yyset_in (fin , io->scanner); OLD WAY */
3385
3386 ael_yyparse(io);
3387
3388
3389 pvalue = io->pval;
3390 *errors = io->syntax_error_count;
3391
3392 ael_yylex_destroy(io->scanner);
3393 free(buffer);
3394 free(io);
3395
3396 return pvalue;
3397}
3398
3399static void setup_filestack(char *fnamebuf2, int fnamebuf_siz, glob_t *globbuf, int globpos, yyscan_t yyscanner, int create)
3400{
3401 struct yyguts_t * yyg = (struct yyguts_t*)yyscanner;
3402 int error, i;
3403 FILE *in1;
3404 char fnamebuf[2048];
3405
3406 if (globbuf && globbuf->gl_pathv && globbuf->gl_pathc > 0)
3407#if defined(STANDALONE) || defined(LOW_MEMORY) || defined(STANDALONE_AEL)
3408 strncpy(fnamebuf, globbuf->gl_pathv[globpos], fnamebuf_siz);
3409#else
3410 ast_copy_string(fnamebuf, globbuf->gl_pathv[globpos], fnamebuf_siz);
3411#endif
3412 else {
3413 ast_log(LOG_ERROR,"Include file name not present!\n");
3414 return;
3415 }
3416 for (i=0; i<include_stack_index; i++) {
3417 if ( !strcmp(fnamebuf,include_stack[i].fname )) {
3418 ast_log(LOG_ERROR,"File=%s, line=%d, column=%d: Nice Try!!! But %s has already been included (perhaps by another file), and would cause an infinite loop of file inclusions!!! Include directive ignored\n",
3419 my_file, my_lineno, my_col, fnamebuf);
3420 break;
3421 }
3422 }
3423 error = 1;
3424 if (i == include_stack_index)
3425 error = 0; /* we can use this file */
3426 if ( !error ) { /* valid file name */
3427 /* relative vs. absolute */
3428 if (fnamebuf[0] != '/')
3429 snprintf(fnamebuf2, fnamebuf_siz, "%s/%s", ast_config_AST_CONFIG_DIR, fnamebuf);
3430 else
3431#if defined(STANDALONE) || defined(LOW_MEMORY) || defined(STANDALONE_AEL)
3432 strncpy(fnamebuf2, fnamebuf, fnamebuf_siz);
3433#else
3434 ast_copy_string(fnamebuf2, fnamebuf, fnamebuf_siz);
3435#endif
3436 in1 = fopen( fnamebuf2, "r" );
3437
3438 if ( ! in1 ) {
3439 ast_log(LOG_ERROR,"File=%s, line=%d, column=%d: Couldn't find the include file: %s; ignoring the Include directive!\n", my_file, my_lineno, my_col, fnamebuf2);
3440 } else {
3441 char *buffer;
3442 struct stat stats;
3443 if (stat(fnamebuf2, &stats)) {
3444 ast_log(LOG_WARNING, "Failed to populate stats from file '%s'\n", fnamebuf2);
3445 }
3446 buffer = (char*)malloc(stats.st_size+1);
3447 if (fread(buffer, 1, stats.st_size, in1) != stats.st_size) {
3448 ast_log(LOG_ERROR, "fread() failed: %s\n", strerror(errno));
3449 }
3450 buffer[stats.st_size] = 0;
3451 ast_debug(1, " --Read in included file %s, %d chars\n",fnamebuf2, (int)stats.st_size);
3452 fclose(in1);
3456 }
3460 if (my_file)
3461 free(my_file);
3462 my_file = strdup(fnamebuf2);
3463 if (create)
3465
3467
3469 if (create)
3471 ael_yy_switch_to_buffer(ael_yy_scan_string (buffer ,yyscanner),yyscanner);
3472 free(buffer);
3473 my_lineno = 1;
3474 my_col = 1;
3475 BEGIN(INITIAL);
3476 }
3477 }
3478}
3479
@ KW_HINT
Definition: ael.tab.c:191
@ RP
Definition: ael.tab.c:166
@ KW_IGNOREPAT
Definition: ael.tab.c:176
@ KW_GLOBALS
Definition: ael.tab.c:175
@ KW_EXTEND
Definition: ael.tab.c:183
@ COLON
Definition: ael.tab.c:170
@ KW_IF
Definition: ael.tab.c:178
@ KW_FOR
Definition: ael.tab.c:192
@ LC
Definition: ael.tab.c:163
@ KW_BREAK
Definition: ael.tab.c:188
@ KW_ESWITCHES
Definition: ael.tab.c:199
@ LP
Definition: ael.tab.c:165
@ KW_RANDOM
Definition: ael.tab.c:181
@ KW_ABSTRACT
Definition: ael.tab.c:182
@ KW_GOTO
Definition: ael.tab.c:185
@ SEMI
Definition: ael.tab.c:167
@ EXTENMARK
Definition: ael.tab.c:184
@ KW_WHILE
Definition: ael.tab.c:193
@ KW_IFTIME
Definition: ael.tab.c:179
@ KW_RETURN
Definition: ael.tab.c:187
@ KW_CASE
Definition: ael.tab.c:194
@ AT
Definition: ael.tab.c:173
@ KW_CATCH
Definition: ael.tab.c:197
@ KW_MACRO
Definition: ael.tab.c:174
@ AMPER
Definition: ael.tab.c:171
@ EQ
Definition: ael.tab.c:168
@ BAR
Definition: ael.tab.c:172
@ KW_SWITCH
Definition: ael.tab.c:177
@ KW_CONTINUE
Definition: ael.tab.c:189
@ KW_PATTERN
Definition: ael.tab.c:195
@ KW_INCLUDES
Definition: ael.tab.c:200
@ KW_CONTEXT
Definition: ael.tab.c:162
@ KW_DEFAULT
Definition: ael.tab.c:196
@ RC
Definition: ael.tab.c:164
@ KW_ELSE
Definition: ael.tab.c:180
@ KW_REGEXTEN
Definition: ael.tab.c:190
@ KW_JUMP
Definition: ael.tab.c:186
@ KW_LOCAL
Definition: ael.tab.c:201
@ KW_SWITCHES
Definition: ael.tab.c:198
@ COMMA
Definition: ael.tab.c:169
static int pbcpos3
Definition: ael_lex.c:866
#define YY_NEW_FILE
Definition: ael_lex.c:158
static yyconst flex_int16_t yy_def[304]
Definition: ael_lex.c:479
int ael_yylex(YYSTYPE *yylval_param, YYLTYPE *yylloc_param, yyscan_t yyscanner)
static int my_col
Definition: ael_lex.c:876
FILE * ael_yyget_out(yyscan_t yyscanner)
Definition: ael_lex.c:2926
#define yytext
Definition: ael_lex.c:136
#define paren
Definition: ael_lex.c:962
#define yylloc
Definition: ael_lex.c:1026
static void ael_yy_init_buffer(YY_BUFFER_STATE b, FILE *file, yyscan_t yyscanner)
Definition: ael_lex.c:2610
unsigned char flex_uint8_t
Definition: ael_lex.c:57
void * yyscan_t
Definition: ael_lex.c:127
static yyconst flex_int16_t yy_accept[285]
Definition: ael_lex.c:365
char * prev_word
Definition: ael_lex.c:878
char * ael_yyget_text(yyscan_t yyscanner)
Definition: ael_lex.c:2945
static char pbcstack3[400]
Definition: ael_lex.c:865
void ael_yyset_debug(int debug_flag, yyscan_t yyscanner)
Definition: ael_lex.c:3015
void ael_yy_flush_buffer(YY_BUFFER_STATE b, yyscan_t yyscanner)
Definition: ael_lex.c:2639
void reset_semicount(yyscan_t yyscanner)
Definition: ael_lex.c:3325
unsigned char YY_CHAR
Definition: ael_lex.c:334
static int yy_init_globals(yyscan_t yyscanner)
Definition: ael_lex.c:3111
static yyconst flex_int16_t yy_nxt[1073]
Definition: ael_lex.c:517
static yyconst flex_int16_t yy_base[304]
Definition: ael_lex.c:441
static int my_lineno
Definition: ael_lex.c:875
#define STORE_LOC
Definition: ael_lex.c:948
#define curlystate
Definition: ael_lex.c:966
#define YY_EXTRA_TYPE
Definition: ael_lex.c:979
static int yy_get_next_buffer(yyscan_t yyscanner)
Definition: ael_lex.c:2183
short int flex_int16_t
Definition: ael_lex.c:55
static int pbcpop2(char x)
Definition: ael_lex.c:3248
#define yy_flex_debug
Definition: ael_lex.c:139
char * my_file
Definition: ael_lex.c:877
YY_EXTRA_TYPE ael_yyget_extra(yyscan_t yyscanner)
Definition: ael_lex.c:2882
int ael_yyget_leng(yyscan_t yyscanner)
Definition: ael_lex.c:2935
static void pbcpush(char x)
Definition: ael_lex.c:3221
unsigned int flex_uint32_t
Definition: ael_lex.c:59
static yy_state_type yy_try_NUL_trans(yy_state_type current_state, yyscan_t yyscanner)
Definition: ael_lex.c:2351
void ael_yyrestart(FILE *input_file, yyscan_t yyscanner)
Definition: ael_lex.c:2493
#define YY_BREAK
Definition: ael_lex.c:1192
#define comment
Definition: ael_lex.c:965
#define unput(c)
Definition: ael_lex.c:196
static char pbcstack[400]
Definition: ael_lex.c:847
static int pbcpop3(char x)
Definition: ael_lex.c:3264
struct yy_buffer_state * YY_BUFFER_STATE
Definition: ael_lex.c:173
void ael_yyset_in(FILE *in_str, yyscan_t yyscanner)
Definition: ael_lex.c:2997
#define yyout
Definition: ael_lex.c:133
FILE * ael_yyget_in(yyscan_t yyscanner)
Definition: ael_lex.c:2917
static void pbcwhere(const char *text, int *line, int *col)
Definition: ael_lex.c:923
#define YY_BUFFER_NEW
Definition: ael_lex.c:251
#define YY_RESTORE_YY_MORE_OFFSET
Definition: ael_lex.c:767
void ael_yy_delete_buffer(YY_BUFFER_STATE b, yyscan_t yyscanner)
Definition: ael_lex.c:2586
static void setup_filestack(char *fnamebuf, int fnamebuf_siz, glob_t *globbuf, int globpos, yyscan_t xscan, int create)
Definition: ael_lex.c:3399
static int input(yyscan_t yyscanner)
Definition: ael_lex.c:2417
#define semic
Definition: ael_lex.c:963
static struct stackelement include_stack[MAX_INCLUDE_DEPTH]
Definition: ael_lex.c:907
static void ael_yyensure_buffer_stack(yyscan_t yyscanner)
Definition: ael_lex.c:2720
#define YY_BUFFER_NORMAL
Definition: ael_lex.c:252
void ael_yyset_lval(YYSTYPE *yylval_param, yyscan_t yyscanner)
Definition: ael_lex.c:3029
int ael_yyparse(struct parse_io *)
#define MAX_INCLUDE_DEPTH
Definition: ael_lex.c:880
void ael_yypush_buffer_state(YY_BUFFER_STATE new_buffer, yyscan_t yyscanner)
Definition: ael_lex.c:2669
#define YY_MORE_ADJ
Definition: ael_lex.c:766
#define YY_RULE_SETUP
Definition: ael_lex.c:1195
#define STORE_POS
Definition: ael_lex.c:941
#define yyextra
Definition: ael_lex.c:134
int ael_yylex_destroy(yyscan_t yyscanner)
Definition: ael_lex.c:3145
register char * yy_bp
Definition: ael_lex.c:1203
#define yymore()
Definition: ael_lex.c:765
struct yyguts_t * yyg
Definition: ael_lex.c:1205
#define yylval
Definition: ael_lex.c:1024
signed char flex_int8_t
Definition: ael_lex.c:54
void ael_yyset_out(FILE *out_str, yyscan_t yyscanner)
Definition: ael_lex.c:3003
#define EOB_ACT_END_OF_FILE
Definition: ael_lex.c:177
register int yy_act
Definition: ael_lex.c:1204
static void yyunput(int c, char *buf_ptr, yyscan_t yyscanner)
#define YY_CURRENT_BUFFER_LVALUE
Definition: ael_lex.c:281
int flex_int32_t
Definition: ael_lex.c:56
YYSTYPE * ael_yyget_lval(yyscan_t yyscanner)
Definition: ael_lex.c:3023
#define ael_yywrap(n)
Definition: ael_lex.c:331
#define YY_START
Definition: ael_lex.c:151
#define GLOB_BRACE
Definition: ael_lex.c:831
YY_BUFFER_STATE ael_yy_create_buffer(FILE *file, int size, yyscan_t yyscanner)
Definition: ael_lex.c:2558
static int c_prevword(void)
Definition: ael_lex.c:3275
void ael_yypop_buffer_state(yyscan_t yyscanner)
Definition: ael_lex.c:2700
static char pbcstack2[400]
Definition: ael_lex.c:856
static void ael_yy_load_buffer_state(yyscan_t yyscanner)
Definition: ael_lex.c:2543
void ael_yyset_column(int column_no, yyscan_t yyscanner)
Definition: ael_lex.c:2980
static int pbcpos
Definition: ael_lex.c:848
YY_BUFFER_STATE ael_yy_scan_bytes(yyconst char *bytes, int len, yyscan_t yyscanner)
Definition: ael_lex.c:2820
int yy_state_type
Definition: ael_lex.c:336
static int parencount3
Definition: ael_lex.c:869
#define YY_CURRENT_BUFFER
Definition: ael_lex.c:274
#define yyconst
Definition: ael_lex.c:111
#define INITIAL
Definition: ael_lex.c:961
static int parencount2
Definition: ael_lex.c:860
static yyconst flex_int16_t yy_chk[1073]
Definition: ael_lex.c:639
#define yyin
Definition: ael_lex.c:132
YY_BUFFER_STATE ael_yy_scan_buffer(char *base, yy_size_t size, yyscan_t yyscanner)
Definition: ael_lex.c:2770
static void pbcpush2(char x)
Definition: ael_lex.c:3243
void reset_argcount(yyscan_t yyscanner)
Definition: ael_lex.c:3333
static void yy_fatal_error(yyconst char msg[], yyscan_t yyscanner)
#define YY_READ_BUF_SIZE
Definition: ael_lex.c:1103
#define YY_INPUT(buf, result, max_size)
Definition: ael_lex.c:1118
void * ael_yyrealloc(void *, yy_size_t, yyscan_t yyscanner)
Definition: ael_lex.c:3203
void ael_yy_switch_to_buffer(YY_BUFFER_STATE new_buffer, yyscan_t yyscanner)
Definition: ael_lex.c:2511
static void pbcpush3(char x)
Definition: ael_lex.c:3259
void * ael_yyalloc(yy_size_t, yyscan_t yyscanner)
Definition: ael_lex.c:3198
#define YY_END_OF_BUFFER
Definition: ael_lex.c:357
#define YY_STATE_EOF(state)
Definition: ael_lex.c:155
YY_BUFFER_STATE ael_yy_scan_string(yyconst char *yy_str, yyscan_t yyscanner)
Definition: ael_lex.c:2807
#define argg
Definition: ael_lex.c:964
int isatty(int)
static int parencount
Definition: ael_lex.c:851
#define GLOB_ABORTED
Definition: ael_lex.c:828
#define BEGIN
Definition: ael_lex.c:145
#define YY_END_OF_BUFFER_CHAR
Definition: ael_lex.c:160
static yyconst flex_int32_t yy_meta[50]
Definition: ael_lex.c:432
register char * yy_cp
Definition: ael_lex.c:1203
int ael_yylex_init(yyscan_t *scanner)
Definition: ael_lex.c:3054
#define YY_FATAL_ERROR(msg)
Definition: ael_lex.c:1165
YYLTYPE * ael_yyget_lloc(yyscan_t yyscanner)
Definition: ael_lex.c:3035
#define yyterminate()
Definition: ael_lex.c:1155
int ael_yyget_lineno(yyscan_t yyscanner)
Definition: ael_lex.c:2891
unsigned short int flex_uint16_t
Definition: ael_lex.c:58
int ael_yyget_debug(yyscan_t yyscanner)
Definition: ael_lex.c:3009
static yyconst flex_int32_t yy_ec[256]
Definition: ael_lex.c:400
static int include_stack_index
Definition: ael_lex.c:908
static int pbcpop(char x)
Definition: ael_lex.c:3232
#define GLOB_NOMAGIC
Definition: ael_lex.c:834
#define YY_DO_BEFORE_ACTION
Definition: ael_lex.c:348
struct pval * ael2_parse(char *filename, int *errors)
Definition: ael_lex.c:3344
void ael_yyset_lloc(YYLTYPE *yylloc_param, yyscan_t yyscanner)
Definition: ael_lex.c:3041
#define EOB_ACT_LAST_MATCH
Definition: ael_lex.c:178
size_t yy_size_t
Definition: ael_lex.c:200
#define YY_BUFFER_EOF_PENDING
Definition: ael_lex.c:263
#define yylineno
Definition: ael_lex.c:137
#define wordstate
Definition: ael_lex.c:967
int ael_yyget_column(yyscan_t yyscanner)
Definition: ael_lex.c:2904
void ael_yyset_extra(YY_EXTRA_TYPE user_defined, yyscan_t yyscanner)
Definition: ael_lex.c:2955
static int pbcpos2
Definition: ael_lex.c:857
#define yycolumn
Definition: ael_lex.c:138
#define EOB_ACT_CONTINUE_SCAN
Definition: ael_lex.c:176
#define brackstate
Definition: ael_lex.c:968
void reset_parencount(yyscan_t yyscanner)
Definition: ael_lex.c:3314
#define YY_DECL
Definition: ael_lex.c:1179
#define YY_BUF_SIZE
Definition: ael_lex.c:164
#define YY_EXIT_FAILURE
Definition: ael_lex.c:2851
static yy_state_type yy_get_previous_state(yyscan_t yyscanner)
Definition: ael_lex.c:2318
void ael_yyfree(void *, yyscan_t yyscanner)
Definition: ael_lex.c:3226
#define YY_SC_TO_UI(c)
Definition: ael_lex.c:122
#define yyleng
Definition: ael_lex.c:135
void ael_yyset_lineno(int line_number, yyscan_t yyscanner)
Definition: ael_lex.c:2965
int ael_yylex_init_extra(YY_EXTRA_TYPE user_defined, yyscan_t *scanner)
Definition: ael_lex.c:3083
Structures for AEL - the Asterisk extension language.
void * yyscan_t
Definition: ael_structs.h:71
char * text
Definition: app_queue.c:1639
unsigned char YY_CHAR
Definition: ast_expr2f.c:334
short int flex_int16_t
Definition: ast_expr2f.c:55
int flex_int32_t
Definition: ast_expr2f.c:56
int yy_state_type
Definition: ast_expr2f.c:336
size_t yy_size_t
Definition: ast_expr2f.c:200
Asterisk main include file. File version handling, generic pbx functions.
#define strdup(a)
Definition: astmm.h:163
#define realloc(a, b)
Definition: astmm.h:161
#define calloc(a, b)
Definition: astmm.h:155
#define ast_log
Definition: astobj2.c:42
static struct io_context * io
Definition: chan_ooh323.c:401
short word
int int32_t
Definition: db.h:60
__signed char int8_t
Definition: db.h:58
short int16_t
Definition: db.h:59
char buf[BUFSIZE]
Definition: eagi_proxy.c:66
static int len(struct ast_channel *chan, const char *cmd, char *data, char *buf, size_t buflen)
char * malloc()
void free()
Generic (perhaps overly so) hashtable implementation Hash Table support in Asterisk.
Support for logging to various files, console and syslog Configuration in file logger....
#define ast_debug(level,...)
Log a DEBUG message.
#define LOG_ERROR
#define LOG_WARNING
Asterisk locking-related definitions:
int errno
const char * ast_config_AST_CONFIG_DIR
Definition: options.c:151
#define NULL
Definition: resample.c:96
#define S_OR(a, b)
returns the equivalent of logic or for strings: first one if not empty, otherwise second one.
Definition: strings.h:80
void ast_copy_string(char *dst, const char *src, size_t size)
Size-limited null-terminating string copy.
Definition: strings.h:425
Definition: pval.h:49
char * filename
Definition: pval.h:55
int globbuf_pos
Definition: ael_lex.c:903
int lineno
Definition: ael_lex.c:900
YY_BUFFER_STATE bufstate
Definition: ael_lex.c:904
char * fname
Definition: ael_lex.c:899
glob_t globbuf
Definition: ael_lex.c:902
yy_size_t yy_buf_size
Definition: ast_expr2f.c:215
FILE * yy_input_file
Definition: ast_expr2f.c:207
char * yy_ch_buf
Definition: ast_expr2f.c:209
char * yy_buf_pos
Definition: ast_expr2f.c:210
flex_int32_t yy_nxt
Definition: ast_expr2f.c:363
flex_int32_t yy_verify
Definition: ast_expr2f.c:362
char yy_hold_char
Definition: ast_expr2f.c:632
FILE * yyout_r
Definition: ast_expr2f.c:628
yy_state_type yy_last_accepting_state
Definition: ast_expr2f.c:642
int yy_start
Definition: ast_expr2f.c:637
char * yytext_r
Definition: ast_expr2f.c:648
int yy_start_stack_ptr
Definition: ast_expr2f.c:639
FILE * yyin_r
Definition: ast_expr2f.c:628
size_t yy_buffer_stack_max
Definition: ast_expr2f.c:630
YY_BUFFER_STATE * yy_buffer_stack
Definition: ast_expr2f.c:631
int yy_more_len
Definition: ast_expr2f.c:650
int yy_did_buffer_switch_on_eof
Definition: ast_expr2f.c:638
YYSTYPE * yylval_r
Definition: ast_expr2f.c:652
int yy_more_flag
Definition: ast_expr2f.c:649
int yyleng_r
Definition: ast_expr2f.c:634
YYLTYPE * yylloc_r
Definition: ast_expr2f.c:654
int yy_flex_debug_r
Definition: ast_expr2f.c:646
YY_EXTRA_TYPE yyextra_r
Definition: ast_expr2f.c:625
int yy_n_chars
Definition: ast_expr2f.c:633
char * yy_c_buf_p
Definition: ast_expr2f.c:635
int * yy_start_stack
Definition: ast_expr2f.c:641
int yy_start_stack_depth
Definition: ast_expr2f.c:640
char * yy_last_accepting_cpos
Definition: ast_expr2f.c:643
size_t yy_buffer_stack_top
Definition: ast_expr2f.c:629
int yylineno_r
Definition: ast_expr2f.c:645
int yy_init
Definition: ast_expr2f.c:636
static struct test_val b
static struct test_val c
int error(const char *format,...)
Definition: utils/frame.c:999
Utility functions.