ael_lex.c 101 KB

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