zend_language_parser.y 61 KB

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071727374757677787980818283848586878889909192939495969798991001011021031041051061071081091101111121131141151161171181191201211221231241251261271281291301311321331341351361371381391401411421431441451461471481491501511521531541551561571581591601611621631641651661671681691701711721731741751761771781791801811821831841851861871881891901911921931941951961971981992002012022032042052062072082092102112122132142152162172182192202212222232242252262272282292302312322332342352362372382392402412422432442452462472482492502512522532542552562572582592602612622632642652662672682692702712722732742752762772782792802812822832842852862872882892902912922932942952962972982993003013023033043053063073083093103113123133143153163173183193203213223233243253263273283293303313323333343353363373383393403413423433443453463473483493503513523533543553563573583593603613623633643653663673683693703713723733743753763773783793803813823833843853863873883893903913923933943953963973983994004014024034044054064074084094104114124134144154164174184194204214224234244254264274284294304314324334344354364374384394404414424434444454464474484494504514524534544554564574584594604614624634644654664674684694704714724734744754764774784794804814824834844854864874884894904914924934944954964974984995005015025035045055065075085095105115125135145155165175185195205215225235245255265275285295305315325335345355365375385395405415425435445455465475485495505515525535545555565575585595605615625635645655665675685695705715725735745755765775785795805815825835845855865875885895905915925935945955965975985996006016026036046056066076086096106116126136146156166176186196206216226236246256266276286296306316326336346356366376386396406416426436446456466476486496506516526536546556566576586596606616626636646656666676686696706716726736746756766776786796806816826836846856866876886896906916926936946956966976986997007017027037047057067077087097107117127137147157167177187197207217227237247257267277287297307317327337347357367377387397407417427437447457467477487497507517527537547557567577587597607617627637647657667677687697707717727737747757767777787797807817827837847857867877887897907917927937947957967977987998008018028038048058068078088098108118128138148158168178188198208218228238248258268278288298308318328338348358368378388398408418428438448458468478488498508518528538548558568578588598608618628638648658668678688698708718728738748758768778788798808818828838848858868878888898908918928938948958968978988999009019029039049059069079089099109119129139149159169179189199209219229239249259269279289299309319329339349359369379389399409419429439449459469479489499509519529539549559569579589599609619629639649659669679689699709719729739749759769779789799809819829839849859869879889899909919929939949959969979989991000100110021003100410051006100710081009101010111012101310141015101610171018101910201021102210231024102510261027102810291030103110321033103410351036103710381039104010411042104310441045104610471048104910501051105210531054105510561057105810591060106110621063106410651066106710681069107010711072107310741075107610771078107910801081108210831084108510861087108810891090109110921093109410951096109710981099110011011102110311041105110611071108110911101111111211131114111511161117111811191120112111221123112411251126112711281129113011311132113311341135113611371138113911401141114211431144114511461147114811491150115111521153115411551156115711581159116011611162116311641165116611671168116911701171117211731174117511761177117811791180118111821183118411851186118711881189119011911192119311941195119611971198119912001201120212031204120512061207120812091210121112121213121412151216121712181219122012211222122312241225122612271228122912301231123212331234123512361237123812391240124112421243124412451246124712481249125012511252125312541255125612571258125912601261126212631264126512661267126812691270127112721273127412751276127712781279128012811282128312841285128612871288128912901291129212931294129512961297129812991300130113021303130413051306130713081309131013111312131313141315131613171318131913201321132213231324132513261327132813291330133113321333133413351336133713381339134013411342134313441345134613471348134913501351135213531354135513561357135813591360136113621363136413651366136713681369137013711372137313741375
  1. %{
  2. /*
  3. +----------------------------------------------------------------------+
  4. | Zend Engine |
  5. +----------------------------------------------------------------------+
  6. | Copyright (c) 1998-2016 Zend Technologies Ltd. (http://www.zend.com) |
  7. +----------------------------------------------------------------------+
  8. | This source file is subject to version 2.00 of the Zend license, |
  9. | that is bundled with this package in the file LICENSE, and is |
  10. | available through the world-wide-web at the following url: |
  11. | http://www.zend.com/license/2_00.txt. |
  12. | If you did not receive a copy of the Zend license and are unable to |
  13. | obtain it through the world-wide-web, please send a note to |
  14. | license@zend.com so we can mail you a copy immediately. |
  15. +----------------------------------------------------------------------+
  16. | Authors: Andi Gutmans <andi@zend.com> |
  17. | Zeev Suraski <zeev@zend.com> |
  18. +----------------------------------------------------------------------+
  19. */
  20. /* $Id$ */
  21. /*
  22. * LALR shift/reduce conflicts and how they are resolved:
  23. *
  24. * - 2 shift/reduce conflicts due to the dangling elseif/else ambiguity. Solved by shift.
  25. *
  26. */
  27. #include "zend_compile.h"
  28. #include "zend.h"
  29. #include "zend_list.h"
  30. #include "zend_globals.h"
  31. #include "zend_API.h"
  32. #include "zend_constants.h"
  33. #define YYSIZE_T size_t
  34. #define yytnamerr zend_yytnamerr
  35. static YYSIZE_T zend_yytnamerr(char*, const char*);
  36. #define YYERROR_VERBOSE
  37. #define YYSTYPE znode
  38. %}
  39. %pure_parser
  40. %expect 3
  41. %code requires {
  42. #ifdef ZTS
  43. # define YYPARSE_PARAM tsrm_ls
  44. # define YYLEX_PARAM tsrm_ls
  45. #endif
  46. }
  47. %token END 0 "end of file"
  48. %left T_INCLUDE T_INCLUDE_ONCE T_EVAL T_REQUIRE T_REQUIRE_ONCE
  49. %token T_INCLUDE "include (T_INCLUDE)"
  50. %token T_INCLUDE_ONCE "include_once (T_INCLUDE_ONCE)"
  51. %token T_EVAL "eval (T_EVAL)"
  52. %token T_REQUIRE "require (T_REQUIRE)"
  53. %token T_REQUIRE_ONCE "require_once (T_REQUIRE_ONCE)"
  54. %left ','
  55. %left T_LOGICAL_OR
  56. %token T_LOGICAL_OR "or (T_LOGICAL_OR)"
  57. %left T_LOGICAL_XOR
  58. %token T_LOGICAL_XOR "xor (T_LOGICAL_XOR)"
  59. %left T_LOGICAL_AND
  60. %token T_LOGICAL_AND "and (T_LOGICAL_AND)"
  61. %right T_PRINT
  62. %token T_PRINT "print (T_PRINT)"
  63. %right T_YIELD
  64. %token T_YIELD "yield (T_YIELD)"
  65. %left '=' T_PLUS_EQUAL T_MINUS_EQUAL T_MUL_EQUAL T_DIV_EQUAL T_CONCAT_EQUAL T_MOD_EQUAL T_AND_EQUAL T_OR_EQUAL T_XOR_EQUAL T_SL_EQUAL T_SR_EQUAL T_POW_EQUAL
  66. %token T_PLUS_EQUAL "+= (T_PLUS_EQUAL)"
  67. %token T_MINUS_EQUAL "-= (T_MINUS_EQUAL)"
  68. %token T_MUL_EQUAL "*= (T_MUL_EQUAL)"
  69. %token T_DIV_EQUAL "/= (T_DIV_EQUAL)"
  70. %token T_CONCAT_EQUAL ".= (T_CONCAT_EQUAL)"
  71. %token T_MOD_EQUAL "%= (T_MOD_EQUAL)"
  72. %token T_AND_EQUAL "&= (T_AND_EQUAL)"
  73. %token T_OR_EQUAL "|= (T_OR_EQUAL)"
  74. %token T_XOR_EQUAL "^= (T_XOR_EQUAL)"
  75. %token T_SL_EQUAL "<<= (T_SL_EQUAL)"
  76. %token T_SR_EQUAL ">>= (T_SR_EQUAL)"
  77. %left '?' ':'
  78. %left T_BOOLEAN_OR
  79. %token T_BOOLEAN_OR "|| (T_BOOLEAN_OR)"
  80. %left T_BOOLEAN_AND
  81. %token T_BOOLEAN_AND "&& (T_BOOLEAN_AND)"
  82. %left '|'
  83. %left '^'
  84. %left '&'
  85. %nonassoc T_IS_EQUAL T_IS_NOT_EQUAL T_IS_IDENTICAL T_IS_NOT_IDENTICAL
  86. %token T_IS_EQUAL "== (T_IS_EQUAL)"
  87. %token T_IS_NOT_EQUAL "!= (T_IS_NOT_EQUAL)"
  88. %token T_IS_IDENTICAL "=== (T_IS_IDENTICAL)"
  89. %token T_IS_NOT_IDENTICAL "!== (T_IS_NOT_IDENTICAL)"
  90. %nonassoc '<' T_IS_SMALLER_OR_EQUAL '>' T_IS_GREATER_OR_EQUAL
  91. %token T_IS_SMALLER_OR_EQUAL "<= (T_IS_SMALLER_OR_EQUAL)"
  92. %token T_IS_GREATER_OR_EQUAL ">= (T_IS_GREATER_OR_EQUAL)"
  93. %left T_SL T_SR
  94. %token T_SL "<< (T_SL)"
  95. %token T_SR ">> (T_SR)"
  96. %left '+' '-' '.'
  97. %left '*' '/' '%'
  98. %right '!'
  99. %nonassoc T_INSTANCEOF
  100. %token T_INSTANCEOF "instanceof (T_INSTANCEOF)"
  101. %right '~' T_INC T_DEC T_INT_CAST T_DOUBLE_CAST T_STRING_CAST T_ARRAY_CAST T_OBJECT_CAST T_BOOL_CAST T_UNSET_CAST '@'
  102. %right T_POW
  103. %token T_INC "++ (T_INC)"
  104. %token T_DEC "-- (T_DEC)"
  105. %token T_INT_CAST "(int) (T_INT_CAST)"
  106. %token T_DOUBLE_CAST "(double) (T_DOUBLE_CAST)"
  107. %token T_STRING_CAST "(string) (T_STRING_CAST)"
  108. %token T_ARRAY_CAST "(array) (T_ARRAY_CAST)"
  109. %token T_OBJECT_CAST "(object) (T_OBJECT_CAST)"
  110. %token T_BOOL_CAST "(bool) (T_BOOL_CAST)"
  111. %token T_UNSET_CAST "(unset) (T_UNSET_CAST)"
  112. %right '['
  113. %nonassoc T_NEW T_CLONE
  114. %token T_NEW "new (T_NEW)"
  115. %token T_CLONE "clone (T_CLONE)"
  116. %token T_EXIT "exit (T_EXIT)"
  117. %token T_IF "if (T_IF)"
  118. %left T_ELSEIF
  119. %token T_ELSEIF "elseif (T_ELSEIF)"
  120. %left T_ELSE
  121. %token T_ELSE "else (T_ELSE)"
  122. %left T_ENDIF
  123. %token T_ENDIF "endif (T_ENDIF)"
  124. %token T_LNUMBER "integer number (T_LNUMBER)"
  125. %token T_DNUMBER "floating-point number (T_DNUMBER)"
  126. %token T_STRING "identifier (T_STRING)"
  127. %token T_STRING_VARNAME "variable name (T_STRING_VARNAME)"
  128. %token T_VARIABLE "variable (T_VARIABLE)"
  129. %token T_NUM_STRING "number (T_NUM_STRING)"
  130. %token T_INLINE_HTML
  131. %token T_CHARACTER
  132. %token T_BAD_CHARACTER
  133. %token T_ENCAPSED_AND_WHITESPACE "quoted-string and whitespace (T_ENCAPSED_AND_WHITESPACE)"
  134. %token T_CONSTANT_ENCAPSED_STRING "quoted-string (T_CONSTANT_ENCAPSED_STRING)"
  135. %token T_ECHO "echo (T_ECHO)"
  136. %token T_DO "do (T_DO)"
  137. %token T_WHILE "while (T_WHILE)"
  138. %token T_ENDWHILE "endwhile (T_ENDWHILE)"
  139. %token T_FOR "for (T_FOR)"
  140. %token T_ENDFOR "endfor (T_ENDFOR)"
  141. %token T_FOREACH "foreach (T_FOREACH)"
  142. %token T_ENDFOREACH "endforeach (T_ENDFOREACH)"
  143. %token T_DECLARE "declare (T_DECLARE)"
  144. %token T_ENDDECLARE "enddeclare (T_ENDDECLARE)"
  145. %token T_AS "as (T_AS)"
  146. %token T_SWITCH "switch (T_SWITCH)"
  147. %token T_ENDSWITCH "endswitch (T_ENDSWITCH)"
  148. %token T_CASE "case (T_CASE)"
  149. %token T_DEFAULT "default (T_DEFAULT)"
  150. %token T_BREAK "break (T_BREAK)"
  151. %token T_CONTINUE "continue (T_CONTINUE)"
  152. %token T_GOTO "goto (T_GOTO)"
  153. %token T_FUNCTION "function (T_FUNCTION)"
  154. %token T_CONST "const (T_CONST)"
  155. %token T_RETURN "return (T_RETURN)"
  156. %token T_TRY "try (T_TRY)"
  157. %token T_CATCH "catch (T_CATCH)"
  158. %token T_FINALLY "finally (T_FINALLY)"
  159. %token T_THROW "throw (T_THROW)"
  160. %token T_USE "use (T_USE)"
  161. %token T_INSTEADOF "insteadof (T_INSTEADOF)"
  162. %token T_GLOBAL "global (T_GLOBAL)"
  163. %right T_STATIC T_ABSTRACT T_FINAL T_PRIVATE T_PROTECTED T_PUBLIC
  164. %token T_STATIC "static (T_STATIC)"
  165. %token T_ABSTRACT "abstract (T_ABSTRACT)"
  166. %token T_FINAL "final (T_FINAL)"
  167. %token T_PRIVATE "private (T_PRIVATE)"
  168. %token T_PROTECTED "protected (T_PROTECTED)"
  169. %token T_PUBLIC "public (T_PUBLIC)"
  170. %token T_VAR "var (T_VAR)"
  171. %token T_UNSET "unset (T_UNSET)"
  172. %token T_ISSET "isset (T_ISSET)"
  173. %token T_EMPTY "empty (T_EMPTY)"
  174. %token T_HALT_COMPILER "__halt_compiler (T_HALT_COMPILER)"
  175. %token T_CLASS "class (T_CLASS)"
  176. %token T_TRAIT "trait (T_TRAIT)"
  177. %token T_INTERFACE "interface (T_INTERFACE)"
  178. %token T_EXTENDS "extends (T_EXTENDS)"
  179. %token T_IMPLEMENTS "implements (T_IMPLEMENTS)"
  180. %token T_OBJECT_OPERATOR "-> (T_OBJECT_OPERATOR)"
  181. %token T_DOUBLE_ARROW "=> (T_DOUBLE_ARROW)"
  182. %token T_LIST "list (T_LIST)"
  183. %token T_ARRAY "array (T_ARRAY)"
  184. %token T_CALLABLE "callable (T_CALLABLE)"
  185. %token T_CLASS_C "__CLASS__ (T_CLASS_C)"
  186. %token T_TRAIT_C "__TRAIT__ (T_TRAIT_C)"
  187. %token T_METHOD_C "__METHOD__ (T_METHOD_C)"
  188. %token T_FUNC_C "__FUNCTION__ (T_FUNC_C)"
  189. %token T_LINE "__LINE__ (T_LINE)"
  190. %token T_FILE "__FILE__ (T_FILE)"
  191. %token T_COMMENT "comment (T_COMMENT)"
  192. %token T_DOC_COMMENT "doc comment (T_DOC_COMMENT)"
  193. %token T_OPEN_TAG "open tag (T_OPEN_TAG)"
  194. %token T_OPEN_TAG_WITH_ECHO "open tag with echo (T_OPEN_TAG_WITH_ECHO)"
  195. %token T_CLOSE_TAG "close tag (T_CLOSE_TAG)"
  196. %token T_WHITESPACE "whitespace (T_WHITESPACE)"
  197. %token T_START_HEREDOC "heredoc start (T_START_HEREDOC)"
  198. %token T_END_HEREDOC "heredoc end (T_END_HEREDOC)"
  199. %token T_DOLLAR_OPEN_CURLY_BRACES "${ (T_DOLLAR_OPEN_CURLY_BRACES)"
  200. %token T_CURLY_OPEN "{$ (T_CURLY_OPEN)"
  201. %token T_PAAMAYIM_NEKUDOTAYIM ":: (T_PAAMAYIM_NEKUDOTAYIM)"
  202. %token T_NAMESPACE "namespace (T_NAMESPACE)"
  203. %token T_NS_C "__NAMESPACE__ (T_NS_C)"
  204. %token T_DIR "__DIR__ (T_DIR)"
  205. %token T_NS_SEPARATOR "\\ (T_NS_SEPARATOR)"
  206. %token T_ELLIPSIS "... (T_ELLIPSIS)"
  207. %token T_POW "** (T_POW)"
  208. %token T_POW_EQUAL "**= (T_POW_EQUAL)"
  209. %% /* Rules */
  210. start:
  211. top_statement_list { zend_do_end_compilation(TSRMLS_C); }
  212. ;
  213. top_statement_list:
  214. top_statement_list { zend_do_extended_info(TSRMLS_C); } top_statement { HANDLE_INTERACTIVE(); }
  215. | /* empty */
  216. ;
  217. namespace_name:
  218. T_STRING { $$ = $1; }
  219. | namespace_name T_NS_SEPARATOR T_STRING { zend_do_build_namespace_name(&$$, &$1, &$3 TSRMLS_CC); }
  220. ;
  221. top_statement:
  222. statement { zend_verify_namespace(TSRMLS_C); }
  223. | function_declaration_statement { zend_verify_namespace(TSRMLS_C); zend_do_early_binding(TSRMLS_C); }
  224. | class_declaration_statement { zend_verify_namespace(TSRMLS_C); zend_do_early_binding(TSRMLS_C); }
  225. | T_HALT_COMPILER '(' ')' ';' { zend_do_halt_compiler_register(TSRMLS_C); YYACCEPT; }
  226. | T_NAMESPACE namespace_name ';' { zend_do_begin_namespace(&$2, 0 TSRMLS_CC); }
  227. | T_NAMESPACE namespace_name '{' { zend_do_begin_namespace(&$2, 1 TSRMLS_CC); }
  228. top_statement_list '}' { zend_do_end_namespace(TSRMLS_C); }
  229. | T_NAMESPACE '{' { zend_do_begin_namespace(NULL, 1 TSRMLS_CC); }
  230. top_statement_list '}' { zend_do_end_namespace(TSRMLS_C); }
  231. | T_USE use_declarations ';' { zend_verify_namespace(TSRMLS_C); }
  232. | T_USE T_FUNCTION use_function_declarations ';' { zend_verify_namespace(TSRMLS_C); }
  233. | T_USE T_CONST use_const_declarations ';' { zend_verify_namespace(TSRMLS_C); }
  234. | constant_declaration ';' { zend_verify_namespace(TSRMLS_C); }
  235. ;
  236. use_declarations:
  237. use_declarations ',' use_declaration
  238. | use_declaration
  239. ;
  240. use_declaration:
  241. namespace_name { zend_do_use(&$1, NULL TSRMLS_CC); }
  242. | namespace_name T_AS T_STRING { zend_do_use(&$1, &$3 TSRMLS_CC); }
  243. | T_NS_SEPARATOR namespace_name { zend_do_use(&$2, NULL TSRMLS_CC); }
  244. | T_NS_SEPARATOR namespace_name T_AS T_STRING { zend_do_use(&$2, &$4 TSRMLS_CC); }
  245. ;
  246. use_function_declarations:
  247. use_function_declarations ',' use_function_declaration
  248. | use_function_declaration
  249. ;
  250. use_function_declaration:
  251. namespace_name { zend_do_use_function(&$1, NULL TSRMLS_CC); }
  252. | namespace_name T_AS T_STRING { zend_do_use_function(&$1, &$3 TSRMLS_CC); }
  253. | T_NS_SEPARATOR namespace_name { zend_do_use_function(&$2, NULL TSRMLS_CC); }
  254. | T_NS_SEPARATOR namespace_name T_AS T_STRING { zend_do_use_function(&$2, &$4 TSRMLS_CC); }
  255. ;
  256. use_const_declarations:
  257. use_const_declarations ',' use_const_declaration
  258. | use_const_declaration
  259. ;
  260. use_const_declaration:
  261. namespace_name { zend_do_use_const(&$1, NULL TSRMLS_CC); }
  262. | namespace_name T_AS T_STRING { zend_do_use_const(&$1, &$3 TSRMLS_CC); }
  263. | T_NS_SEPARATOR namespace_name { zend_do_use_const(&$2, NULL TSRMLS_CC); }
  264. | T_NS_SEPARATOR namespace_name T_AS T_STRING { zend_do_use_const(&$2, &$4 TSRMLS_CC); }
  265. ;
  266. constant_declaration:
  267. constant_declaration ',' T_STRING '=' static_scalar { zend_do_declare_constant(&$3, &$5 TSRMLS_CC); }
  268. | T_CONST T_STRING '=' static_scalar { zend_do_declare_constant(&$2, &$4 TSRMLS_CC); }
  269. ;
  270. inner_statement_list:
  271. inner_statement_list { zend_do_extended_info(TSRMLS_C); } inner_statement { HANDLE_INTERACTIVE(); }
  272. | /* empty */
  273. ;
  274. inner_statement:
  275. statement
  276. | function_declaration_statement
  277. | class_declaration_statement
  278. | T_HALT_COMPILER '(' ')' ';' { zend_error_noreturn(E_COMPILE_ERROR, "__HALT_COMPILER() can only be used from the outermost scope"); }
  279. ;
  280. statement:
  281. unticked_statement { DO_TICKS(); }
  282. | T_STRING ':' { zend_do_label(&$1 TSRMLS_CC); }
  283. ;
  284. unticked_statement:
  285. '{' inner_statement_list '}'
  286. | T_IF parenthesis_expr { zend_do_if_cond(&$2, &$1 TSRMLS_CC); } statement { zend_do_if_after_statement(&$1, 1 TSRMLS_CC); } elseif_list else_single { zend_do_if_end(TSRMLS_C); }
  287. | T_IF parenthesis_expr ':' { zend_do_if_cond(&$2, &$1 TSRMLS_CC); } inner_statement_list { zend_do_if_after_statement(&$1, 1 TSRMLS_CC); } new_elseif_list new_else_single T_ENDIF ';' { zend_do_if_end(TSRMLS_C); }
  288. | T_WHILE { $1.u.op.opline_num = get_next_op_number(CG(active_op_array)); } parenthesis_expr { zend_do_while_cond(&$3, &$$ TSRMLS_CC); } while_statement { zend_do_while_end(&$1, &$4 TSRMLS_CC); }
  289. | T_DO { $1.u.op.opline_num = get_next_op_number(CG(active_op_array)); zend_do_do_while_begin(TSRMLS_C); } statement T_WHILE { $4.u.op.opline_num = get_next_op_number(CG(active_op_array)); } parenthesis_expr ';' { zend_do_do_while_end(&$1, &$4, &$6 TSRMLS_CC); }
  290. | T_FOR
  291. '('
  292. for_expr
  293. ';' { zend_do_free(&$3 TSRMLS_CC); $4.u.op.opline_num = get_next_op_number(CG(active_op_array)); }
  294. for_expr
  295. ';' { zend_do_extended_info(TSRMLS_C); zend_do_for_cond(&$6, &$7 TSRMLS_CC); }
  296. for_expr
  297. ')' { zend_do_free(&$9 TSRMLS_CC); zend_do_for_before_statement(&$4, &$7 TSRMLS_CC); }
  298. for_statement { zend_do_for_end(&$7 TSRMLS_CC); }
  299. | T_SWITCH parenthesis_expr { zend_do_switch_cond(&$2 TSRMLS_CC); } switch_case_list { zend_do_switch_end(&$4 TSRMLS_CC); }
  300. | T_BREAK ';' { zend_do_brk_cont(ZEND_BRK, NULL TSRMLS_CC); }
  301. | T_BREAK expr ';' { zend_do_brk_cont(ZEND_BRK, &$2 TSRMLS_CC); }
  302. | T_CONTINUE ';' { zend_do_brk_cont(ZEND_CONT, NULL TSRMLS_CC); }
  303. | T_CONTINUE expr ';' { zend_do_brk_cont(ZEND_CONT, &$2 TSRMLS_CC); }
  304. | T_RETURN ';' { zend_do_return(NULL, 0 TSRMLS_CC); }
  305. | T_RETURN expr_without_variable ';' { zend_do_return(&$2, 0 TSRMLS_CC); }
  306. | T_RETURN variable ';' { zend_do_return(&$2, 1 TSRMLS_CC); }
  307. | yield_expr ';' { zend_do_free(&$1 TSRMLS_CC); }
  308. | T_GLOBAL global_var_list ';'
  309. | T_STATIC static_var_list ';'
  310. | T_ECHO echo_expr_list ';'
  311. | T_INLINE_HTML { zend_do_echo(&$1 TSRMLS_CC); }
  312. | expr ';' { zend_do_free(&$1 TSRMLS_CC); }
  313. | T_UNSET '(' unset_variables ')' ';'
  314. | T_FOREACH '(' variable T_AS
  315. { zend_do_foreach_begin(&$1, &$2, &$3, &$4, 1 TSRMLS_CC); }
  316. foreach_variable foreach_optional_arg ')' { zend_do_foreach_cont(&$1, &$2, &$4, &$6, &$7 TSRMLS_CC); }
  317. foreach_statement { zend_do_foreach_end(&$1, &$4 TSRMLS_CC); }
  318. | T_FOREACH '(' expr_without_variable T_AS
  319. { zend_do_foreach_begin(&$1, &$2, &$3, &$4, 0 TSRMLS_CC); }
  320. foreach_variable foreach_optional_arg ')' { zend_do_foreach_cont(&$1, &$2, &$4, &$6, &$7 TSRMLS_CC); }
  321. foreach_statement { zend_do_foreach_end(&$1, &$4 TSRMLS_CC); }
  322. | T_DECLARE { $1.u.op.opline_num = get_next_op_number(CG(active_op_array)); zend_do_declare_begin(TSRMLS_C); } '(' declare_list ')' declare_statement { zend_do_declare_end(&$1 TSRMLS_CC); }
  323. | ';' /* empty statement */
  324. | T_TRY { zend_do_try(&$1 TSRMLS_CC); } '{' inner_statement_list '}'
  325. catch_statement { zend_do_bind_catch(&$1, &$6 TSRMLS_CC); }
  326. finally_statement { zend_do_end_finally(&$1, &$6, &$8 TSRMLS_CC); }
  327. | T_THROW expr ';' { zend_do_throw(&$2 TSRMLS_CC); }
  328. | T_GOTO T_STRING ';' { zend_do_goto(&$2 TSRMLS_CC); }
  329. ;
  330. catch_statement:
  331. /* empty */ { $$.op_type = IS_UNUSED; }
  332. | T_CATCH '(' { zend_initialize_try_catch_element(&$1 TSRMLS_CC); }
  333. fully_qualified_class_name { zend_do_first_catch(&$2 TSRMLS_CC); }
  334. T_VARIABLE ')' { zend_do_begin_catch(&$1, &$4, &$6, &$2 TSRMLS_CC); }
  335. '{' inner_statement_list '}' { zend_do_end_catch(&$1 TSRMLS_CC); }
  336. additional_catches { zend_do_mark_last_catch(&$2, &$13 TSRMLS_CC); $$ = $1;}
  337. finally_statement:
  338. /* empty */ { $$.op_type = IS_UNUSED; }
  339. | T_FINALLY { zend_do_finally(&$1 TSRMLS_CC); } '{' inner_statement_list '}' { $$ = $1; }
  340. ;
  341. additional_catches:
  342. non_empty_additional_catches { $$ = $1; }
  343. | /* empty */ { $$.u.op.opline_num = -1; }
  344. ;
  345. non_empty_additional_catches:
  346. additional_catch { $$ = $1; }
  347. | non_empty_additional_catches additional_catch { $$ = $2; }
  348. ;
  349. additional_catch:
  350. T_CATCH '(' fully_qualified_class_name { $$.u.op.opline_num = get_next_op_number(CG(active_op_array)); } T_VARIABLE ')' { zend_do_begin_catch(&$1, &$3, &$5, NULL TSRMLS_CC); } '{' inner_statement_list '}' { zend_do_end_catch(&$1 TSRMLS_CC); }
  351. ;
  352. unset_variables:
  353. unset_variable
  354. | unset_variables ',' unset_variable
  355. ;
  356. unset_variable:
  357. variable { zend_do_end_variable_parse(&$1, BP_VAR_UNSET, 0 TSRMLS_CC); zend_do_unset(&$1 TSRMLS_CC); }
  358. ;
  359. function_declaration_statement:
  360. unticked_function_declaration_statement { DO_TICKS(); }
  361. ;
  362. class_declaration_statement:
  363. unticked_class_declaration_statement { DO_TICKS(); }
  364. ;
  365. is_reference:
  366. /* empty */ { $$.op_type = 0; }
  367. | '&' { $$.op_type = 1; }
  368. ;
  369. is_variadic:
  370. /* empty */ { $$.op_type = 0; }
  371. | T_ELLIPSIS { $$.op_type = 1; }
  372. ;
  373. unticked_function_declaration_statement:
  374. function is_reference T_STRING { zend_do_begin_function_declaration(&$1, &$3, 0, $2.op_type, NULL TSRMLS_CC); }
  375. '(' parameter_list ')'
  376. '{' inner_statement_list '}' { zend_do_end_function_declaration(&$1 TSRMLS_CC); }
  377. ;
  378. unticked_class_declaration_statement:
  379. class_entry_type T_STRING extends_from
  380. { zend_do_begin_class_declaration(&$1, &$2, &$3 TSRMLS_CC); }
  381. implements_list
  382. '{'
  383. class_statement_list
  384. '}' { zend_do_end_class_declaration(&$1, &$3 TSRMLS_CC); }
  385. | interface_entry T_STRING
  386. { zend_do_begin_class_declaration(&$1, &$2, NULL TSRMLS_CC); }
  387. interface_extends_list
  388. '{'
  389. class_statement_list
  390. '}' { zend_do_end_class_declaration(&$1, NULL TSRMLS_CC); }
  391. ;
  392. class_entry_type:
  393. T_CLASS { $$.u.op.opline_num = CG(zend_lineno); $$.EA = 0; }
  394. | T_ABSTRACT T_CLASS { $$.u.op.opline_num = CG(zend_lineno); $$.EA = ZEND_ACC_EXPLICIT_ABSTRACT_CLASS; }
  395. | T_TRAIT { $$.u.op.opline_num = CG(zend_lineno); $$.EA = ZEND_ACC_TRAIT; }
  396. | T_FINAL T_CLASS { $$.u.op.opline_num = CG(zend_lineno); $$.EA = ZEND_ACC_FINAL_CLASS; }
  397. ;
  398. extends_from:
  399. /* empty */ { $$.op_type = IS_UNUSED; }
  400. | T_EXTENDS fully_qualified_class_name { zend_do_fetch_class(&$$, &$2 TSRMLS_CC); }
  401. ;
  402. interface_entry:
  403. T_INTERFACE { $$.u.op.opline_num = CG(zend_lineno); $$.EA = ZEND_ACC_INTERFACE; }
  404. ;
  405. interface_extends_list:
  406. /* empty */
  407. | T_EXTENDS interface_list
  408. ;
  409. implements_list:
  410. /* empty */
  411. | T_IMPLEMENTS interface_list
  412. ;
  413. interface_list:
  414. fully_qualified_class_name { zend_do_implements_interface(&$1 TSRMLS_CC); }
  415. | interface_list ',' fully_qualified_class_name { zend_do_implements_interface(&$3 TSRMLS_CC); }
  416. ;
  417. foreach_optional_arg:
  418. /* empty */ { $$.op_type = IS_UNUSED; }
  419. | T_DOUBLE_ARROW foreach_variable { $$ = $2; }
  420. ;
  421. foreach_variable:
  422. variable { zend_check_writable_variable(&$1); $$ = $1; }
  423. | '&' variable { zend_check_writable_variable(&$2); $$ = $2; $$.EA |= ZEND_PARSED_REFERENCE_VARIABLE; }
  424. | T_LIST '(' { zend_do_list_init(TSRMLS_C); } assignment_list ')' { $$ = $1; $$.EA = ZEND_PARSED_LIST_EXPR; }
  425. ;
  426. for_statement:
  427. statement
  428. | ':' inner_statement_list T_ENDFOR ';'
  429. ;
  430. foreach_statement:
  431. statement
  432. | ':' inner_statement_list T_ENDFOREACH ';'
  433. ;
  434. declare_statement:
  435. statement
  436. | ':' inner_statement_list T_ENDDECLARE ';'
  437. ;
  438. declare_list:
  439. T_STRING '=' static_scalar { zend_do_declare_stmt(&$1, &$3 TSRMLS_CC); }
  440. | declare_list ',' T_STRING '=' static_scalar { zend_do_declare_stmt(&$3, &$5 TSRMLS_CC); }
  441. ;
  442. switch_case_list:
  443. '{' case_list '}' { $$ = $2; }
  444. | '{' ';' case_list '}' { $$ = $3; }
  445. | ':' case_list T_ENDSWITCH ';' { $$ = $2; }
  446. | ':' ';' case_list T_ENDSWITCH ';' { $$ = $3; }
  447. ;
  448. case_list:
  449. /* empty */ { $$.op_type = IS_UNUSED; }
  450. | case_list T_CASE expr case_separator { zend_do_extended_info(TSRMLS_C); zend_do_case_before_statement(&$1, &$2, &$3 TSRMLS_CC); } inner_statement_list { zend_do_case_after_statement(&$$, &$2 TSRMLS_CC); $$.op_type = IS_CONST; }
  451. | case_list T_DEFAULT case_separator { zend_do_extended_info(TSRMLS_C); zend_do_default_before_statement(&$1, &$2 TSRMLS_CC); } inner_statement_list { zend_do_case_after_statement(&$$, &$2 TSRMLS_CC); $$.op_type = IS_CONST; }
  452. ;
  453. case_separator:
  454. ':'
  455. | ';'
  456. ;
  457. while_statement:
  458. statement
  459. | ':' inner_statement_list T_ENDWHILE ';'
  460. ;
  461. elseif_list:
  462. /* empty */
  463. | elseif_list T_ELSEIF parenthesis_expr { zend_do_if_cond(&$3, &$2 TSRMLS_CC); } statement { zend_do_if_after_statement(&$2, 0 TSRMLS_CC); }
  464. ;
  465. new_elseif_list:
  466. /* empty */
  467. | new_elseif_list T_ELSEIF parenthesis_expr ':' { zend_do_if_cond(&$3, &$2 TSRMLS_CC); } inner_statement_list { zend_do_if_after_statement(&$2, 0 TSRMLS_CC); }
  468. ;
  469. else_single:
  470. /* empty */
  471. | T_ELSE statement
  472. ;
  473. new_else_single:
  474. /* empty */
  475. | T_ELSE ':' inner_statement_list
  476. ;
  477. parameter_list:
  478. non_empty_parameter_list
  479. | /* empty */
  480. ;
  481. non_empty_parameter_list:
  482. parameter
  483. | non_empty_parameter_list ',' parameter
  484. ;
  485. parameter:
  486. optional_class_type is_reference is_variadic T_VARIABLE
  487. { zend_do_receive_param(ZEND_RECV, &$4, NULL, &$1, $2.op_type, $3.op_type TSRMLS_CC); }
  488. | optional_class_type is_reference is_variadic T_VARIABLE '=' static_scalar
  489. { zend_do_receive_param(ZEND_RECV_INIT, &$4, &$6, &$1, $2.op_type, $3.op_type TSRMLS_CC); }
  490. ;
  491. optional_class_type:
  492. /* empty */ { $$.op_type = IS_UNUSED; }
  493. | T_ARRAY { $$.op_type = IS_CONST; Z_TYPE($$.u.constant)=IS_ARRAY; }
  494. | T_CALLABLE { $$.op_type = IS_CONST; Z_TYPE($$.u.constant)=IS_CALLABLE; }
  495. | fully_qualified_class_name { $$ = $1; }
  496. ;
  497. function_call_parameter_list:
  498. '(' ')' { Z_LVAL($$.u.constant) = 0; }
  499. | '(' non_empty_function_call_parameter_list ')' { $$ = $2; }
  500. | '(' yield_expr ')' { zend_do_pass_param(&$2, ZEND_SEND_VAL TSRMLS_CC); }
  501. ;
  502. non_empty_function_call_parameter_list:
  503. function_call_parameter
  504. | non_empty_function_call_parameter_list ',' function_call_parameter
  505. ;
  506. function_call_parameter:
  507. expr_without_variable { zend_do_pass_param(&$1, ZEND_SEND_VAL TSRMLS_CC); }
  508. | variable { zend_do_pass_param(&$1, ZEND_SEND_VAR TSRMLS_CC); }
  509. | '&' w_variable { zend_do_pass_param(&$2, ZEND_SEND_REF TSRMLS_CC); }
  510. | T_ELLIPSIS expr { zend_do_unpack_params(&$2 TSRMLS_CC); }
  511. ;
  512. global_var_list:
  513. global_var_list ',' global_var { zend_do_fetch_global_variable(&$3, NULL, ZEND_FETCH_GLOBAL_LOCK TSRMLS_CC); }
  514. | global_var { zend_do_fetch_global_variable(&$1, NULL, ZEND_FETCH_GLOBAL_LOCK TSRMLS_CC); }
  515. ;
  516. global_var:
  517. T_VARIABLE { $$ = $1; }
  518. | '$' r_variable { $$ = $2; }
  519. | '$' '{' expr '}' { $$ = $3; }
  520. ;
  521. static_var_list:
  522. static_var_list ',' T_VARIABLE { zend_do_fetch_static_variable(&$3, NULL, ZEND_FETCH_STATIC TSRMLS_CC); }
  523. | static_var_list ',' T_VARIABLE '=' static_scalar { zend_do_fetch_static_variable(&$3, &$5, ZEND_FETCH_STATIC TSRMLS_CC); }
  524. | T_VARIABLE { zend_do_fetch_static_variable(&$1, NULL, ZEND_FETCH_STATIC TSRMLS_CC); }
  525. | T_VARIABLE '=' static_scalar { zend_do_fetch_static_variable(&$1, &$3, ZEND_FETCH_STATIC TSRMLS_CC); }
  526. ;
  527. class_statement_list:
  528. class_statement_list class_statement
  529. | /* empty */
  530. ;
  531. class_statement:
  532. variable_modifiers { CG(access_type) = Z_LVAL($1.u.constant); } class_variable_declaration ';'
  533. | class_constant_declaration ';'
  534. | trait_use_statement
  535. | method_modifiers function is_reference T_STRING { zend_do_begin_function_declaration(&$2, &$4, 1, $3.op_type, &$1 TSRMLS_CC); }
  536. '(' parameter_list ')'
  537. method_body { zend_do_abstract_method(&$4, &$1, &$9 TSRMLS_CC); zend_do_end_function_declaration(&$2 TSRMLS_CC); }
  538. ;
  539. trait_use_statement:
  540. T_USE trait_list trait_adaptations
  541. ;
  542. trait_list:
  543. fully_qualified_class_name { zend_do_use_trait(&$1 TSRMLS_CC); }
  544. | trait_list ',' fully_qualified_class_name { zend_do_use_trait(&$3 TSRMLS_CC); }
  545. ;
  546. trait_adaptations:
  547. ';'
  548. | '{' trait_adaptation_list '}'
  549. ;
  550. trait_adaptation_list:
  551. /* empty */
  552. | non_empty_trait_adaptation_list
  553. ;
  554. non_empty_trait_adaptation_list:
  555. trait_adaptation_statement
  556. | non_empty_trait_adaptation_list trait_adaptation_statement
  557. ;
  558. trait_adaptation_statement:
  559. trait_precedence ';'
  560. | trait_alias ';'
  561. ;
  562. trait_precedence:
  563. trait_method_reference_fully_qualified T_INSTEADOF trait_reference_list { zend_add_trait_precedence(&$1, &$3 TSRMLS_CC); }
  564. ;
  565. trait_reference_list:
  566. fully_qualified_class_name { zend_resolve_class_name(&$1 TSRMLS_CC); zend_init_list(&$$.u.op.ptr, Z_STRVAL($1.u.constant) TSRMLS_CC); }
  567. | trait_reference_list ',' fully_qualified_class_name { zend_resolve_class_name(&$3 TSRMLS_CC); zend_add_to_list(&$1.u.op.ptr, Z_STRVAL($3.u.constant) TSRMLS_CC); $$ = $1; }
  568. ;
  569. trait_method_reference:
  570. T_STRING { zend_prepare_reference(&$$, NULL, &$1 TSRMLS_CC); }
  571. | trait_method_reference_fully_qualified { $$ = $1; }
  572. ;
  573. trait_method_reference_fully_qualified:
  574. fully_qualified_class_name T_PAAMAYIM_NEKUDOTAYIM T_STRING { zend_prepare_reference(&$$, &$1, &$3 TSRMLS_CC); }
  575. ;
  576. trait_alias:
  577. trait_method_reference T_AS trait_modifiers T_STRING { zend_add_trait_alias(&$1, &$3, &$4 TSRMLS_CC); }
  578. | trait_method_reference T_AS member_modifier { zend_add_trait_alias(&$1, &$3, NULL TSRMLS_CC); }
  579. ;
  580. trait_modifiers:
  581. /* empty */ { Z_LVAL($$.u.constant) = 0x0; } /* No change of methods visibility */
  582. | member_modifier { $$ = $1; } /* REM: Keep in mind, there are not only visibility modifiers */
  583. ;
  584. method_body:
  585. ';' /* abstract method */ { Z_LVAL($$.u.constant) = ZEND_ACC_ABSTRACT; }
  586. | '{' inner_statement_list '}' { Z_LVAL($$.u.constant) = 0; }
  587. ;
  588. variable_modifiers:
  589. non_empty_member_modifiers { $$ = $1; }
  590. | T_VAR { Z_LVAL($$.u.constant) = ZEND_ACC_PUBLIC; }
  591. ;
  592. method_modifiers:
  593. /* empty */ { Z_LVAL($$.u.constant) = ZEND_ACC_PUBLIC; }
  594. | non_empty_member_modifiers { $$ = $1; if (!(Z_LVAL($$.u.constant) & ZEND_ACC_PPP_MASK)) { Z_LVAL($$.u.constant) |= ZEND_ACC_PUBLIC; } }
  595. ;
  596. non_empty_member_modifiers:
  597. member_modifier { $$ = $1; }
  598. | non_empty_member_modifiers member_modifier { Z_LVAL($$.u.constant) = zend_do_verify_access_types(&$1, &$2); }
  599. ;
  600. member_modifier:
  601. T_PUBLIC { Z_LVAL($$.u.constant) = ZEND_ACC_PUBLIC; }
  602. | T_PROTECTED { Z_LVAL($$.u.constant) = ZEND_ACC_PROTECTED; }
  603. | T_PRIVATE { Z_LVAL($$.u.constant) = ZEND_ACC_PRIVATE; }
  604. | T_STATIC { Z_LVAL($$.u.constant) = ZEND_ACC_STATIC; }
  605. | T_ABSTRACT { Z_LVAL($$.u.constant) = ZEND_ACC_ABSTRACT; }
  606. | T_FINAL { Z_LVAL($$.u.constant) = ZEND_ACC_FINAL; }
  607. ;
  608. class_variable_declaration:
  609. class_variable_declaration ',' T_VARIABLE { zend_do_declare_property(&$3, NULL, CG(access_type) TSRMLS_CC); }
  610. | class_variable_declaration ',' T_VARIABLE '=' static_scalar { zend_do_declare_property(&$3, &$5, CG(access_type) TSRMLS_CC); }
  611. | T_VARIABLE { zend_do_declare_property(&$1, NULL, CG(access_type) TSRMLS_CC); }
  612. | T_VARIABLE '=' static_scalar { zend_do_declare_property(&$1, &$3, CG(access_type) TSRMLS_CC); }
  613. ;
  614. class_constant_declaration:
  615. class_constant_declaration ',' T_STRING '=' static_scalar { zend_do_declare_class_constant(&$3, &$5 TSRMLS_CC); }
  616. | T_CONST T_STRING '=' static_scalar { zend_do_declare_class_constant(&$2, &$4 TSRMLS_CC); }
  617. ;
  618. echo_expr_list:
  619. echo_expr_list ',' expr { zend_do_echo(&$3 TSRMLS_CC); }
  620. | expr { zend_do_echo(&$1 TSRMLS_CC); }
  621. ;
  622. for_expr:
  623. /* empty */ { $$.op_type = IS_CONST; Z_TYPE($$.u.constant) = IS_BOOL; Z_LVAL($$.u.constant) = 1; }
  624. | non_empty_for_expr { $$ = $1; }
  625. ;
  626. non_empty_for_expr:
  627. non_empty_for_expr ',' { zend_do_free(&$1 TSRMLS_CC); } expr { $$ = $4; }
  628. | expr { $$ = $1; }
  629. ;
  630. chaining_method_or_property:
  631. chaining_method_or_property variable_property { $$.EA = $2.EA; }
  632. | variable_property { $$.EA = $1.EA; }
  633. ;
  634. chaining_dereference:
  635. chaining_dereference '[' dim_offset ']' { fetch_array_dim(&$$, &$1, &$3 TSRMLS_CC); }
  636. | '[' dim_offset ']' { zend_do_pop_object(&$1 TSRMLS_CC); fetch_array_dim(&$$, &$1, &$2 TSRMLS_CC); }
  637. ;
  638. chaining_instance_call:
  639. chaining_dereference { zend_do_push_object(&$1 TSRMLS_CC); } chaining_method_or_property { $$ = $3; }
  640. | chaining_dereference { zend_do_push_object(&$1 TSRMLS_CC); $$ = $1; }
  641. | chaining_method_or_property { $$ = $1; }
  642. ;
  643. instance_call:
  644. /* empty */ { $$ = $0; }
  645. | { zend_do_push_object(&$0 TSRMLS_CC); zend_do_begin_variable_parse(TSRMLS_C); }
  646. chaining_instance_call { zend_do_pop_object(&$$ TSRMLS_CC); zend_do_end_variable_parse(&$2, BP_VAR_R, 0 TSRMLS_CC); }
  647. ;
  648. new_expr:
  649. T_NEW class_name_reference { zend_do_extended_fcall_begin(TSRMLS_C); zend_do_begin_new_object(&$1, &$2 TSRMLS_CC); } ctor_arguments { zend_do_end_new_object(&$$, &$1 TSRMLS_CC); zend_do_extended_fcall_end(TSRMLS_C);}
  650. ;
  651. expr_without_variable:
  652. T_LIST '(' { zend_do_list_init(TSRMLS_C); } assignment_list ')' '=' expr { zend_do_list_end(&$$, &$7 TSRMLS_CC); }
  653. | variable '=' expr { zend_check_writable_variable(&$1); zend_do_assign(&$$, &$1, &$3 TSRMLS_CC); }
  654. | variable '=' '&' variable { zend_check_writable_variable(&$1); zend_do_end_variable_parse(&$4, BP_VAR_W, 1 TSRMLS_CC); zend_do_end_variable_parse(&$1, BP_VAR_W, 0 TSRMLS_CC); zend_do_assign_ref(&$$, &$1, &$4 TSRMLS_CC); }
  655. | variable '=' '&' T_NEW class_name_reference { zend_error(E_DEPRECATED, "Assigning the return value of new by reference is deprecated"); zend_check_writable_variable(&$1); zend_do_extended_fcall_begin(TSRMLS_C); zend_do_begin_new_object(&$4, &$5 TSRMLS_CC); } ctor_arguments { zend_do_end_new_object(&$3, &$4 TSRMLS_CC); zend_do_extended_fcall_end(TSRMLS_C); zend_do_end_variable_parse(&$1, BP_VAR_W, 0 TSRMLS_CC); $3.EA = ZEND_PARSED_NEW; zend_do_assign_ref(&$$, &$1, &$3 TSRMLS_CC); }
  656. | T_CLONE expr { zend_do_clone(&$$, &$2 TSRMLS_CC); }
  657. | variable T_PLUS_EQUAL expr { zend_check_writable_variable(&$1); zend_do_end_variable_parse(&$1, BP_VAR_RW, 0 TSRMLS_CC); zend_do_binary_assign_op(ZEND_ASSIGN_ADD, &$$, &$1, &$3 TSRMLS_CC); }
  658. | variable T_MINUS_EQUAL expr { zend_check_writable_variable(&$1); zend_do_end_variable_parse(&$1, BP_VAR_RW, 0 TSRMLS_CC); zend_do_binary_assign_op(ZEND_ASSIGN_SUB, &$$, &$1, &$3 TSRMLS_CC); }
  659. | variable T_MUL_EQUAL expr { zend_check_writable_variable(&$1); zend_do_end_variable_parse(&$1, BP_VAR_RW, 0 TSRMLS_CC); zend_do_binary_assign_op(ZEND_ASSIGN_MUL, &$$, &$1, &$3 TSRMLS_CC); }
  660. | variable T_POW_EQUAL expr { zend_check_writable_variable(&$1); zend_do_end_variable_parse(&$1, BP_VAR_RW, 0 TSRMLS_CC); zend_do_binary_assign_op(ZEND_ASSIGN_POW, &$$, &$1, &$3 TSRMLS_CC); }
  661. | variable T_DIV_EQUAL expr { zend_check_writable_variable(&$1); zend_do_end_variable_parse(&$1, BP_VAR_RW, 0 TSRMLS_CC); zend_do_binary_assign_op(ZEND_ASSIGN_DIV, &$$, &$1, &$3 TSRMLS_CC); }
  662. | variable T_CONCAT_EQUAL expr { zend_check_writable_variable(&$1); zend_do_end_variable_parse(&$1, BP_VAR_RW, 0 TSRMLS_CC); zend_do_binary_assign_op(ZEND_ASSIGN_CONCAT, &$$, &$1, &$3 TSRMLS_CC); }
  663. | variable T_MOD_EQUAL expr { zend_check_writable_variable(&$1); zend_do_end_variable_parse(&$1, BP_VAR_RW, 0 TSRMLS_CC); zend_do_binary_assign_op(ZEND_ASSIGN_MOD, &$$, &$1, &$3 TSRMLS_CC); }
  664. | variable T_AND_EQUAL expr { zend_check_writable_variable(&$1); zend_do_end_variable_parse(&$1, BP_VAR_RW, 0 TSRMLS_CC); zend_do_binary_assign_op(ZEND_ASSIGN_BW_AND, &$$, &$1, &$3 TSRMLS_CC); }
  665. | variable T_OR_EQUAL expr { zend_check_writable_variable(&$1); zend_do_end_variable_parse(&$1, BP_VAR_RW, 0 TSRMLS_CC); zend_do_binary_assign_op(ZEND_ASSIGN_BW_OR, &$$, &$1, &$3 TSRMLS_CC); }
  666. | variable T_XOR_EQUAL expr { zend_check_writable_variable(&$1); zend_do_end_variable_parse(&$1, BP_VAR_RW, 0 TSRMLS_CC); zend_do_binary_assign_op(ZEND_ASSIGN_BW_XOR, &$$, &$1, &$3 TSRMLS_CC); }
  667. | variable T_SL_EQUAL expr { zend_check_writable_variable(&$1); zend_do_end_variable_parse(&$1, BP_VAR_RW, 0 TSRMLS_CC); zend_do_binary_assign_op(ZEND_ASSIGN_SL, &$$, &$1, &$3 TSRMLS_CC); }
  668. | variable T_SR_EQUAL expr { zend_check_writable_variable(&$1); zend_do_end_variable_parse(&$1, BP_VAR_RW, 0 TSRMLS_CC); zend_do_binary_assign_op(ZEND_ASSIGN_SR, &$$, &$1, &$3 TSRMLS_CC); }
  669. | rw_variable T_INC { zend_do_post_incdec(&$$, &$1, ZEND_POST_INC TSRMLS_CC); }
  670. | T_INC rw_variable { zend_do_pre_incdec(&$$, &$2, ZEND_PRE_INC TSRMLS_CC); }
  671. | rw_variable T_DEC { zend_do_post_incdec(&$$, &$1, ZEND_POST_DEC TSRMLS_CC); }
  672. | T_DEC rw_variable { zend_do_pre_incdec(&$$, &$2, ZEND_PRE_DEC TSRMLS_CC); }
  673. | expr T_BOOLEAN_OR { zend_do_boolean_or_begin(&$1, &$2 TSRMLS_CC); } expr { zend_do_boolean_or_end(&$$, &$1, &$4, &$2 TSRMLS_CC); }
  674. | expr T_BOOLEAN_AND { zend_do_boolean_and_begin(&$1, &$2 TSRMLS_CC); } expr { zend_do_boolean_and_end(&$$, &$1, &$4, &$2 TSRMLS_CC); }
  675. | expr T_LOGICAL_OR { zend_do_boolean_or_begin(&$1, &$2 TSRMLS_CC); } expr { zend_do_boolean_or_end(&$$, &$1, &$4, &$2 TSRMLS_CC); }
  676. | expr T_LOGICAL_AND { zend_do_boolean_and_begin(&$1, &$2 TSRMLS_CC); } expr { zend_do_boolean_and_end(&$$, &$1, &$4, &$2 TSRMLS_CC); }
  677. | expr T_LOGICAL_XOR expr { zend_do_binary_op(ZEND_BOOL_XOR, &$$, &$1, &$3 TSRMLS_CC); }
  678. | expr '|' expr { zend_do_binary_op(ZEND_BW_OR, &$$, &$1, &$3 TSRMLS_CC); }
  679. | expr '&' expr { zend_do_binary_op(ZEND_BW_AND, &$$, &$1, &$3 TSRMLS_CC); }
  680. | expr '^' expr { zend_do_binary_op(ZEND_BW_XOR, &$$, &$1, &$3 TSRMLS_CC); }
  681. | expr '.' expr { zend_do_binary_op(ZEND_CONCAT, &$$, &$1, &$3 TSRMLS_CC); }
  682. | expr '+' expr { zend_do_binary_op(ZEND_ADD, &$$, &$1, &$3 TSRMLS_CC); }
  683. | expr '-' expr { zend_do_binary_op(ZEND_SUB, &$$, &$1, &$3 TSRMLS_CC); }
  684. | expr '*' expr { zend_do_binary_op(ZEND_MUL, &$$, &$1, &$3 TSRMLS_CC); }
  685. | expr T_POW expr { zend_do_binary_op(ZEND_POW, &$$, &$1, &$3 TSRMLS_CC); }
  686. | expr '/' expr { zend_do_binary_op(ZEND_DIV, &$$, &$1, &$3 TSRMLS_CC); }
  687. | expr '%' expr { zend_do_binary_op(ZEND_MOD, &$$, &$1, &$3 TSRMLS_CC); }
  688. | expr T_SL expr { zend_do_binary_op(ZEND_SL, &$$, &$1, &$3 TSRMLS_CC); }
  689. | expr T_SR expr { zend_do_binary_op(ZEND_SR, &$$, &$1, &$3 TSRMLS_CC); }
  690. | '+' expr %prec T_INC { ZVAL_LONG(&$1.u.constant, 0); if ($2.op_type == IS_CONST) { add_function(&$2.u.constant, &$1.u.constant, &$2.u.constant TSRMLS_CC); $$ = $2; } else { $1.op_type = IS_CONST; INIT_PZVAL(&$1.u.constant); zend_do_binary_op(ZEND_ADD, &$$, &$1, &$2 TSRMLS_CC); } }
  691. | '-' expr %prec T_INC { ZVAL_LONG(&$1.u.constant, 0); if ($2.op_type == IS_CONST) { sub_function(&$2.u.constant, &$1.u.constant, &$2.u.constant TSRMLS_CC); $$ = $2; } else { $1.op_type = IS_CONST; INIT_PZVAL(&$1.u.constant); zend_do_binary_op(ZEND_SUB, &$$, &$1, &$2 TSRMLS_CC); } }
  692. | '!' expr { zend_do_unary_op(ZEND_BOOL_NOT, &$$, &$2 TSRMLS_CC); }
  693. | '~' expr { zend_do_unary_op(ZEND_BW_NOT, &$$, &$2 TSRMLS_CC); }
  694. | expr T_IS_IDENTICAL expr { zend_do_binary_op(ZEND_IS_IDENTICAL, &$$, &$1, &$3 TSRMLS_CC); }
  695. | expr T_IS_NOT_IDENTICAL expr { zend_do_binary_op(ZEND_IS_NOT_IDENTICAL, &$$, &$1, &$3 TSRMLS_CC); }
  696. | expr T_IS_EQUAL expr { zend_do_binary_op(ZEND_IS_EQUAL, &$$, &$1, &$3 TSRMLS_CC); }
  697. | expr T_IS_NOT_EQUAL expr { zend_do_binary_op(ZEND_IS_NOT_EQUAL, &$$, &$1, &$3 TSRMLS_CC); }
  698. | expr '<' expr { zend_do_binary_op(ZEND_IS_SMALLER, &$$, &$1, &$3 TSRMLS_CC); }
  699. | expr T_IS_SMALLER_OR_EQUAL expr { zend_do_binary_op(ZEND_IS_SMALLER_OR_EQUAL, &$$, &$1, &$3 TSRMLS_CC); }
  700. | expr '>' expr { zend_do_binary_op(ZEND_IS_SMALLER, &$$, &$3, &$1 TSRMLS_CC); }
  701. | expr T_IS_GREATER_OR_EQUAL expr { zend_do_binary_op(ZEND_IS_SMALLER_OR_EQUAL, &$$, &$3, &$1 TSRMLS_CC); }
  702. | expr T_INSTANCEOF class_name_reference { zend_do_instanceof(&$$, &$1, &$3, 0 TSRMLS_CC); }
  703. | parenthesis_expr { $$ = $1; }
  704. | new_expr { $$ = $1; }
  705. | '(' new_expr ')' { $$ = $2; } instance_call { $$ = $5; }
  706. | expr '?' { zend_do_begin_qm_op(&$1, &$2 TSRMLS_CC); }
  707. expr ':' { zend_do_qm_true(&$4, &$2, &$5 TSRMLS_CC); }
  708. expr { zend_do_qm_false(&$$, &$7, &$2, &$5 TSRMLS_CC); }
  709. | expr '?' ':' { zend_do_jmp_set(&$1, &$2, &$3 TSRMLS_CC); }
  710. expr { zend_do_jmp_set_else(&$$, &$5, &$2, &$3 TSRMLS_CC); }
  711. | internal_functions_in_yacc { $$ = $1; }
  712. | T_INT_CAST expr { zend_do_cast(&$$, &$2, IS_LONG TSRMLS_CC); }
  713. | T_DOUBLE_CAST expr { zend_do_cast(&$$, &$2, IS_DOUBLE TSRMLS_CC); }
  714. | T_STRING_CAST expr { zend_do_cast(&$$, &$2, IS_STRING TSRMLS_CC); }
  715. | T_ARRAY_CAST expr { zend_do_cast(&$$, &$2, IS_ARRAY TSRMLS_CC); }
  716. | T_OBJECT_CAST expr { zend_do_cast(&$$, &$2, IS_OBJECT TSRMLS_CC); }
  717. | T_BOOL_CAST expr { zend_do_cast(&$$, &$2, IS_BOOL TSRMLS_CC); }
  718. | T_UNSET_CAST expr { zend_do_cast(&$$, &$2, IS_NULL TSRMLS_CC); }
  719. | T_EXIT exit_expr { zend_do_exit(&$$, &$2 TSRMLS_CC); }
  720. | '@' { zend_do_begin_silence(&$1 TSRMLS_CC); } expr { zend_do_end_silence(&$1 TSRMLS_CC); $$ = $3; }
  721. | scalar { $$ = $1; }
  722. | combined_scalar_offset { zend_do_end_variable_parse(&$1, BP_VAR_R, 0 TSRMLS_CC); }
  723. | combined_scalar { $$ = $1; }
  724. | '`' backticks_expr '`' { zend_do_shell_exec(&$$, &$2 TSRMLS_CC); }
  725. | T_PRINT expr { zend_do_print(&$$, &$2 TSRMLS_CC); }
  726. | T_YIELD { zend_do_yield(&$$, NULL, NULL, 0 TSRMLS_CC); }
  727. | function is_reference { zend_do_begin_lambda_function_declaration(&$$, &$1, $2.op_type, 0 TSRMLS_CC); }
  728. '(' parameter_list ')' lexical_vars
  729. '{' inner_statement_list '}' { zend_do_end_function_declaration(&$1 TSRMLS_CC); $$ = $3; }
  730. | T_STATIC function is_reference { zend_do_begin_lambda_function_declaration(&$$, &$2, $3.op_type, 1 TSRMLS_CC); }
  731. '(' parameter_list ')' lexical_vars
  732. '{' inner_statement_list '}' { zend_do_end_function_declaration(&$2 TSRMLS_CC); $$ = $4; }
  733. ;
  734. yield_expr:
  735. T_YIELD expr_without_variable { zend_do_yield(&$$, &$2, NULL, 0 TSRMLS_CC); }
  736. | T_YIELD variable { zend_do_yield(&$$, &$2, NULL, 1 TSRMLS_CC); }
  737. | T_YIELD expr T_DOUBLE_ARROW expr_without_variable { zend_do_yield(&$$, &$4, &$2, 0 TSRMLS_CC); }
  738. | T_YIELD expr T_DOUBLE_ARROW variable { zend_do_yield(&$$, &$4, &$2, 1 TSRMLS_CC); }
  739. ;
  740. combined_scalar_offset:
  741. combined_scalar '[' dim_offset ']' { zend_do_begin_variable_parse(TSRMLS_C); fetch_array_dim(&$$, &$1, &$3 TSRMLS_CC); }
  742. | combined_scalar_offset '[' dim_offset ']' { fetch_array_dim(&$$, &$1, &$3 TSRMLS_CC); }
  743. | T_CONSTANT_ENCAPSED_STRING '[' dim_offset ']' { $1.EA = 0; zend_do_begin_variable_parse(TSRMLS_C); fetch_array_dim(&$$, &$1, &$3 TSRMLS_CC); }
  744. | general_constant '[' dim_offset ']' { zend_do_begin_variable_parse(TSRMLS_C); fetch_array_dim(&$$, &$1, &$3 TSRMLS_CC); }
  745. ;
  746. combined_scalar:
  747. T_ARRAY '(' array_pair_list ')' { $$ = $3; }
  748. | '[' array_pair_list ']' { $$ = $2; }
  749. ;
  750. function:
  751. T_FUNCTION { $$.u.op.opline_num = CG(zend_lineno); }
  752. ;
  753. lexical_vars:
  754. /* empty */
  755. | T_USE '(' lexical_var_list ')'
  756. ;
  757. lexical_var_list:
  758. lexical_var_list ',' T_VARIABLE { zend_do_fetch_lexical_variable(&$3, 0 TSRMLS_CC); }
  759. | lexical_var_list ',' '&' T_VARIABLE { zend_do_fetch_lexical_variable(&$4, 1 TSRMLS_CC); }
  760. | T_VARIABLE { zend_do_fetch_lexical_variable(&$1, 0 TSRMLS_CC); }
  761. | '&' T_VARIABLE { zend_do_fetch_lexical_variable(&$2, 1 TSRMLS_CC); }
  762. ;
  763. function_call:
  764. namespace_name { $$.u.op.opline_num = zend_do_begin_function_call(&$1, 1 TSRMLS_CC); }
  765. function_call_parameter_list { zend_do_end_function_call(&$1, &$$, 0, $2.u.op.opline_num TSRMLS_CC); zend_do_extended_fcall_end(TSRMLS_C); }
  766. | T_NAMESPACE T_NS_SEPARATOR namespace_name { $1.op_type = IS_CONST; ZVAL_EMPTY_STRING(&$1.u.constant); zend_do_build_namespace_name(&$1, &$1, &$3 TSRMLS_CC); $$.u.op.opline_num = zend_do_begin_function_call(&$1, 0 TSRMLS_CC); }
  767. function_call_parameter_list { zend_do_end_function_call(&$1, &$$, 0, $4.u.op.opline_num TSRMLS_CC); zend_do_extended_fcall_end(TSRMLS_C); }
  768. | T_NS_SEPARATOR namespace_name { $$.u.op.opline_num = zend_do_begin_function_call(&$2, 0 TSRMLS_CC); }
  769. function_call_parameter_list { zend_do_end_function_call(&$2, &$$, 0, $3.u.op.opline_num TSRMLS_CC); zend_do_extended_fcall_end(TSRMLS_C); }
  770. | class_name T_PAAMAYIM_NEKUDOTAYIM variable_name { $$.u.op.opline_num = zend_do_begin_class_member_function_call(&$1, &$3 TSRMLS_CC); }
  771. function_call_parameter_list { zend_do_end_function_call($4.u.op.opline_num?NULL:&$3, &$$, $4.u.op.opline_num, $4.u.op.opline_num TSRMLS_CC); zend_do_extended_fcall_end(TSRMLS_C);}
  772. | class_name T_PAAMAYIM_NEKUDOTAYIM variable_without_objects { zend_do_end_variable_parse(&$3, BP_VAR_R, 0 TSRMLS_CC); zend_do_begin_class_member_function_call(&$1, &$3 TSRMLS_CC); }
  773. function_call_parameter_list { zend_do_end_function_call(NULL, &$$, 1, 1 TSRMLS_CC); zend_do_extended_fcall_end(TSRMLS_C);}
  774. | variable_class_name T_PAAMAYIM_NEKUDOTAYIM variable_name { zend_do_begin_class_member_function_call(&$1, &$3 TSRMLS_CC); }
  775. function_call_parameter_list { zend_do_end_function_call(NULL, &$$, 1, 1 TSRMLS_CC); zend_do_extended_fcall_end(TSRMLS_C);}
  776. | variable_class_name T_PAAMAYIM_NEKUDOTAYIM variable_without_objects { zend_do_end_variable_parse(&$3, BP_VAR_R, 0 TSRMLS_CC); zend_do_begin_class_member_function_call(&$1, &$3 TSRMLS_CC); }
  777. function_call_parameter_list { zend_do_end_function_call(NULL, &$$, 1, 1 TSRMLS_CC); zend_do_extended_fcall_end(TSRMLS_C);}
  778. | variable_without_objects { zend_do_end_variable_parse(&$1, BP_VAR_R, 0 TSRMLS_CC); zend_do_begin_dynamic_function_call(&$1, 0 TSRMLS_CC); }
  779. function_call_parameter_list { zend_do_end_function_call(&$1, &$$, 0, 1 TSRMLS_CC); zend_do_extended_fcall_end(TSRMLS_C);}
  780. ;
  781. class_name:
  782. T_STATIC { $$.op_type = IS_CONST; ZVAL_STRINGL(&$$.u.constant, "static", sizeof("static")-1, 1);}
  783. | namespace_name { $$ = $1; }
  784. | T_NAMESPACE T_NS_SEPARATOR namespace_name { $$.op_type = IS_CONST; ZVAL_EMPTY_STRING(&$$.u.constant); zend_do_build_namespace_name(&$$, &$$, &$3 TSRMLS_CC); }
  785. | T_NS_SEPARATOR namespace_name { char *tmp = estrndup(Z_STRVAL($2.u.constant), Z_STRLEN($2.u.constant)+1); memcpy(&(tmp[1]), Z_STRVAL($2.u.constant), Z_STRLEN($2.u.constant)+1); tmp[0] = '\\'; efree(Z_STRVAL($2.u.constant)); Z_STRVAL($2.u.constant) = tmp; ++Z_STRLEN($2.u.constant); $$ = $2; }
  786. ;
  787. fully_qualified_class_name:
  788. namespace_name { $$ = $1; }
  789. | T_NAMESPACE T_NS_SEPARATOR namespace_name { $$.op_type = IS_CONST; ZVAL_EMPTY_STRING(&$$.u.constant); zend_do_build_namespace_name(&$$, &$$, &$3 TSRMLS_CC); }
  790. | T_NS_SEPARATOR namespace_name { char *tmp = estrndup(Z_STRVAL($2.u.constant), Z_STRLEN($2.u.constant)+1); memcpy(&(tmp[1]), Z_STRVAL($2.u.constant), Z_STRLEN($2.u.constant)+1); tmp[0] = '\\'; efree(Z_STRVAL($2.u.constant)); Z_STRVAL($2.u.constant) = tmp; ++Z_STRLEN($2.u.constant); $$ = $2; }
  791. ;
  792. class_name_reference:
  793. class_name { zend_do_fetch_class(&$$, &$1 TSRMLS_CC); }
  794. | dynamic_class_name_reference { zend_do_end_variable_parse(&$1, BP_VAR_R, 0 TSRMLS_CC); zend_do_fetch_class(&$$, &$1 TSRMLS_CC); }
  795. ;
  796. dynamic_class_name_reference:
  797. base_variable T_OBJECT_OPERATOR { zend_do_push_object(&$1 TSRMLS_CC); }
  798. object_property { zend_do_push_object(&$4 TSRMLS_CC); } dynamic_class_name_variable_properties
  799. { zend_do_pop_object(&$$ TSRMLS_CC); $$.EA = ZEND_PARSED_MEMBER; }
  800. | base_variable { $$ = $1; }
  801. ;
  802. dynamic_class_name_variable_properties:
  803. dynamic_class_name_variable_properties dynamic_class_name_variable_property
  804. | /* empty */
  805. ;
  806. dynamic_class_name_variable_property:
  807. T_OBJECT_OPERATOR object_property { zend_do_push_object(&$2 TSRMLS_CC); }
  808. ;
  809. exit_expr:
  810. /* empty */ { memset(&$$, 0, sizeof(znode)); $$.op_type = IS_UNUSED; }
  811. | '(' ')' { memset(&$$, 0, sizeof(znode)); $$.op_type = IS_UNUSED; }
  812. | parenthesis_expr { $$ = $1; }
  813. ;
  814. backticks_expr:
  815. /* empty */ { ZVAL_EMPTY_STRING(&$$.u.constant); INIT_PZVAL(&$$.u.constant); $$.op_type = IS_CONST; }
  816. | T_ENCAPSED_AND_WHITESPACE { $$ = $1; }
  817. | encaps_list { $$ = $1; }
  818. ;
  819. ctor_arguments:
  820. /* empty */ { Z_LVAL($$.u.constant) = 0; }
  821. | function_call_parameter_list { $$ = $1; }
  822. ;
  823. common_scalar:
  824. T_LNUMBER { $$ = $1; }
  825. | T_DNUMBER { $$ = $1; }
  826. | T_CONSTANT_ENCAPSED_STRING { $$ = $1; }
  827. | T_LINE { $$ = $1; }
  828. | T_FILE { $$ = $1; }
  829. | T_DIR { $$ = $1; }
  830. | T_TRAIT_C { $$ = $1; }
  831. | T_METHOD_C { $$ = $1; }
  832. | T_FUNC_C { $$ = $1; }
  833. | T_NS_C { $$ = $1; }
  834. | T_START_HEREDOC T_ENCAPSED_AND_WHITESPACE T_END_HEREDOC { $$ = $2; }
  835. | T_START_HEREDOC T_END_HEREDOC { ZVAL_EMPTY_STRING(&$$.u.constant); INIT_PZVAL(&$$.u.constant); $$.op_type = IS_CONST; }
  836. ;
  837. static_class_constant:
  838. class_name T_PAAMAYIM_NEKUDOTAYIM T_STRING { zend_do_fetch_constant(&$$, &$1, &$3, ZEND_CT, 0 TSRMLS_CC); }
  839. ;
  840. static_scalar: /* compile-time evaluated scalars */
  841. static_scalar_value { zend_do_constant_expression(&$$, $1.u.ast TSRMLS_CC); }
  842. ;
  843. static_scalar_value:
  844. common_scalar { $$.u.ast = zend_ast_create_constant(&$1.u.constant); }
  845. | static_class_name_scalar { $$.u.ast = zend_ast_create_constant(&$1.u.constant); }
  846. | namespace_name { zend_do_fetch_constant(&$$, NULL, &$1, ZEND_CT, 1 TSRMLS_CC); $$.u.ast = zend_ast_create_constant(&$$.u.constant); }
  847. | T_NAMESPACE T_NS_SEPARATOR namespace_name { $$.op_type = IS_CONST; ZVAL_EMPTY_STRING(&$$.u.constant); zend_do_build_namespace_name(&$$, &$$, &$3 TSRMLS_CC); $3 = $$; zend_do_fetch_constant(&$$, NULL, &$3, ZEND_CT, 0 TSRMLS_CC); $$.u.ast = zend_ast_create_constant(&$$.u.constant); }
  848. | T_NS_SEPARATOR namespace_name { char *tmp = estrndup(Z_STRVAL($2.u.constant), Z_STRLEN($2.u.constant)+1); memcpy(&(tmp[1]), Z_STRVAL($2.u.constant), Z_STRLEN($2.u.constant)+1); tmp[0] = '\\'; efree(Z_STRVAL($2.u.constant)); Z_STRVAL($2.u.constant) = tmp; ++Z_STRLEN($2.u.constant); zend_do_fetch_constant(&$$, NULL, &$2, ZEND_CT, 0 TSRMLS_CC); $$.u.ast = zend_ast_create_constant(&$$.u.constant); }
  849. | T_ARRAY '(' static_array_pair_list ')' { $$ = $3; }
  850. | '[' static_array_pair_list ']' { $$ = $2; }
  851. | static_class_constant { $$.u.ast = zend_ast_create_constant(&$1.u.constant); }
  852. | T_CLASS_C { $$.u.ast = zend_ast_create_constant(&$1.u.constant); }
  853. | static_operation { $$ = $1; }
  854. ;
  855. static_operation:
  856. static_scalar_value '[' static_scalar_value ']' { $$.u.ast = zend_ast_create_binary(ZEND_FETCH_DIM_R, $1.u.ast, $3.u.ast); }
  857. | static_scalar_value '+' static_scalar_value { $$.u.ast = zend_ast_create_binary(ZEND_ADD, $1.u.ast, $3.u.ast); }
  858. | static_scalar_value '-' static_scalar_value { $$.u.ast = zend_ast_create_binary(ZEND_SUB, $1.u.ast, $3.u.ast); }
  859. | static_scalar_value '*' static_scalar_value { $$.u.ast = zend_ast_create_binary(ZEND_MUL, $1.u.ast, $3.u.ast); }
  860. | static_scalar_value T_POW static_scalar_value { $$.u.ast = zend_ast_create_binary(ZEND_POW, $1.u.ast, $3.u.ast); }
  861. | static_scalar_value '/' static_scalar_value { $$.u.ast = zend_ast_create_binary(ZEND_DIV, $1.u.ast, $3.u.ast); }
  862. | static_scalar_value '%' static_scalar_value { $$.u.ast = zend_ast_create_binary(ZEND_MOD, $1.u.ast, $3.u.ast); }
  863. | '!' static_scalar_value { $$.u.ast = zend_ast_create_unary(ZEND_BOOL_NOT, $2.u.ast); }
  864. | '~' static_scalar_value { $$.u.ast = zend_ast_create_unary(ZEND_BW_NOT, $2.u.ast); }
  865. | static_scalar_value '|' static_scalar_value { $$.u.ast = zend_ast_create_binary(ZEND_BW_OR, $1.u.ast, $3.u.ast); }
  866. | static_scalar_value '&' static_scalar_value { $$.u.ast = zend_ast_create_binary(ZEND_BW_AND, $1.u.ast, $3.u.ast); }
  867. | static_scalar_value '^' static_scalar_value { $$.u.ast = zend_ast_create_binary(ZEND_BW_XOR, $1.u.ast, $3.u.ast); }
  868. | static_scalar_value T_SL static_scalar_value { $$.u.ast = zend_ast_create_binary(ZEND_SL, $1.u.ast, $3.u.ast); }
  869. | static_scalar_value T_SR static_scalar_value { $$.u.ast = zend_ast_create_binary(ZEND_SR, $1.u.ast, $3.u.ast); }
  870. | static_scalar_value '.' static_scalar_value { $$.u.ast = zend_ast_create_binary(ZEND_CONCAT, $1.u.ast, $3.u.ast); }
  871. | static_scalar_value T_LOGICAL_XOR static_scalar_value { $$.u.ast = zend_ast_create_binary(ZEND_BOOL_XOR, $1.u.ast, $3.u.ast); }
  872. | static_scalar_value T_LOGICAL_AND static_scalar_value { $$.u.ast = zend_ast_create_binary(ZEND_BOOL_AND, $1.u.ast, $3.u.ast); }
  873. | static_scalar_value T_LOGICAL_OR static_scalar_value { $$.u.ast = zend_ast_create_binary(ZEND_BOOL_OR, $1.u.ast, $3.u.ast); }
  874. | static_scalar_value T_BOOLEAN_AND static_scalar_value { $$.u.ast = zend_ast_create_binary(ZEND_BOOL_AND, $1.u.ast, $3.u.ast); }
  875. | static_scalar_value T_BOOLEAN_OR static_scalar_value { $$.u.ast = zend_ast_create_binary(ZEND_BOOL_OR, $1.u.ast, $3.u.ast); }
  876. | static_scalar_value T_IS_IDENTICAL static_scalar_value { $$.u.ast = zend_ast_create_binary(ZEND_IS_IDENTICAL, $1.u.ast, $3.u.ast); }
  877. | static_scalar_value T_IS_NOT_IDENTICAL static_scalar_value { $$.u.ast = zend_ast_create_binary(ZEND_IS_NOT_IDENTICAL, $1.u.ast, $3.u.ast); }
  878. | static_scalar_value T_IS_EQUAL static_scalar_value { $$.u.ast = zend_ast_create_binary(ZEND_IS_EQUAL, $1.u.ast, $3.u.ast); }
  879. | static_scalar_value T_IS_NOT_EQUAL static_scalar_value { $$.u.ast = zend_ast_create_binary(ZEND_IS_NOT_EQUAL, $1.u.ast, $3.u.ast); }
  880. | static_scalar_value '<' static_scalar_value { $$.u.ast = zend_ast_create_binary(ZEND_IS_SMALLER, $1.u.ast, $3.u.ast); }
  881. | static_scalar_value '>' static_scalar_value { $$.u.ast = zend_ast_create_binary(ZEND_IS_SMALLER, $3.u.ast, $1.u.ast); }
  882. | static_scalar_value T_IS_SMALLER_OR_EQUAL static_scalar_value { $$.u.ast = zend_ast_create_binary(ZEND_IS_SMALLER_OR_EQUAL, $1.u.ast, $3.u.ast); }
  883. | static_scalar_value T_IS_GREATER_OR_EQUAL static_scalar_value { $$.u.ast = zend_ast_create_binary(ZEND_IS_SMALLER_OR_EQUAL, $3.u.ast, $1.u.ast); }
  884. | static_scalar_value '?' ':' static_scalar_value { $$.u.ast = zend_ast_create_ternary(ZEND_SELECT, $1.u.ast, NULL, $4.u.ast); }
  885. | static_scalar_value '?' static_scalar_value ':' static_scalar_value { $$.u.ast = zend_ast_create_ternary(ZEND_SELECT, $1.u.ast, $3.u.ast, $5.u.ast); }
  886. | '+' static_scalar_value { $$.u.ast = zend_ast_create_unary(ZEND_UNARY_PLUS, $2.u.ast); }
  887. | '-' static_scalar_value { $$.u.ast = zend_ast_create_unary(ZEND_UNARY_MINUS, $2.u.ast); }
  888. | '(' static_scalar_value ')' { $$ = $2; }
  889. ;
  890. general_constant:
  891. class_constant { $$ = $1; }
  892. | namespace_name { zend_do_fetch_constant(&$$, NULL, &$1, ZEND_RT, 1 TSRMLS_CC); }
  893. | T_NAMESPACE T_NS_SEPARATOR namespace_name { $$.op_type = IS_CONST; ZVAL_EMPTY_STRING(&$$.u.constant); zend_do_build_namespace_name(&$$, &$$, &$3 TSRMLS_CC); $3 = $$; zend_do_fetch_constant(&$$, NULL, &$3, ZEND_RT, 0 TSRMLS_CC); }
  894. | T_NS_SEPARATOR namespace_name { char *tmp = estrndup(Z_STRVAL($2.u.constant), Z_STRLEN($2.u.constant)+1); memcpy(&(tmp[1]), Z_STRVAL($2.u.constant), Z_STRLEN($2.u.constant)+1); tmp[0] = '\\'; efree(Z_STRVAL($2.u.constant)); Z_STRVAL($2.u.constant) = tmp; ++Z_STRLEN($2.u.constant); zend_do_fetch_constant(&$$, NULL, &$2, ZEND_RT, 0 TSRMLS_CC); }
  895. ;
  896. scalar:
  897. T_STRING_VARNAME { $$ = $1; }
  898. | general_constant { $$ = $1; }
  899. | class_name_scalar { $$ = $1; }
  900. | common_scalar { $$ = $1; }
  901. | '"' encaps_list '"' { $$ = $2; }
  902. | T_START_HEREDOC encaps_list T_END_HEREDOC { $$ = $2; }
  903. | T_CLASS_C { if (Z_TYPE($1.u.constant) == IS_CONSTANT) {zend_do_fetch_constant(&$$, NULL, &$1, ZEND_RT, 1 TSRMLS_CC);} else {$$ = $1;} }
  904. ;
  905. static_array_pair_list:
  906. /* empty */ { $$.op_type = IS_CONST; INIT_PZVAL(&$$.u.constant); array_init(&$$.u.constant); $$.u.ast = zend_ast_create_constant(&$$.u.constant); }
  907. | non_empty_static_array_pair_list possible_comma { zend_ast_dynamic_shrink(&$1.u.ast); $$ = $1; }
  908. ;
  909. possible_comma:
  910. /* empty */
  911. | ','
  912. ;
  913. non_empty_static_array_pair_list:
  914. non_empty_static_array_pair_list ',' static_scalar_value T_DOUBLE_ARROW static_scalar_value { zend_ast_dynamic_add(&$$.u.ast, $3.u.ast); zend_ast_dynamic_add(&$$.u.ast, $5.u.ast); }
  915. | non_empty_static_array_pair_list ',' static_scalar_value { zend_ast_dynamic_add(&$$.u.ast, NULL); zend_ast_dynamic_add(&$$.u.ast, $3.u.ast); }
  916. | static_scalar_value T_DOUBLE_ARROW static_scalar_value { $$.u.ast = zend_ast_create_dynamic(ZEND_INIT_ARRAY); zend_ast_dynamic_add(&$$.u.ast, $1.u.ast); zend_ast_dynamic_add(&$$.u.ast, $3.u.ast); }
  917. | static_scalar_value { $$.u.ast = zend_ast_create_dynamic(ZEND_INIT_ARRAY); zend_ast_dynamic_add(&$$.u.ast, NULL); zend_ast_dynamic_add(&$$.u.ast, $1.u.ast); }
  918. ;
  919. expr:
  920. r_variable { $$ = $1; }
  921. | expr_without_variable { $$ = $1; }
  922. ;
  923. parenthesis_expr:
  924. '(' expr ')' { $$ = $2; }
  925. | '(' yield_expr ')' { $$ = $2; }
  926. ;
  927. r_variable:
  928. variable { zend_do_end_variable_parse(&$1, BP_VAR_R, 0 TSRMLS_CC); $$ = $1; }
  929. ;
  930. w_variable:
  931. variable { zend_do_end_variable_parse(&$1, BP_VAR_W, 0 TSRMLS_CC); $$ = $1;
  932. zend_check_writable_variable(&$1); }
  933. ;
  934. rw_variable:
  935. variable { zend_do_end_variable_parse(&$1, BP_VAR_RW, 0 TSRMLS_CC); $$ = $1;
  936. zend_check_writable_variable(&$1); }
  937. ;
  938. variable:
  939. base_variable_with_function_calls T_OBJECT_OPERATOR { zend_do_push_object(&$1 TSRMLS_CC); }
  940. object_property { zend_do_push_object(&$4 TSRMLS_CC); } method_or_not variable_properties
  941. { zend_do_pop_object(&$$ TSRMLS_CC); $$.EA = $1.EA | ($7.EA ? $7.EA : $6.EA); }
  942. | base_variable_with_function_calls { $$ = $1; }
  943. ;
  944. variable_properties:
  945. variable_properties variable_property { $$.EA = $2.EA; }
  946. | /* empty */ { $$.EA = 0; }
  947. ;
  948. variable_property:
  949. T_OBJECT_OPERATOR object_property { zend_do_push_object(&$2 TSRMLS_CC); } method_or_not { $$.EA = $4.EA; }
  950. ;
  951. array_method_dereference:
  952. array_method_dereference '[' dim_offset ']' { fetch_array_dim(&$$, &$1, &$3 TSRMLS_CC); }
  953. | method '[' dim_offset ']' { $1.EA = ZEND_PARSED_METHOD_CALL; fetch_array_dim(&$$, &$1, &$3 TSRMLS_CC); }
  954. ;
  955. method:
  956. { zend_do_pop_object(&$$ TSRMLS_CC); zend_do_begin_method_call(&$$ TSRMLS_CC); }
  957. function_call_parameter_list { zend_do_end_function_call(&$1, &$$, 1, 1 TSRMLS_CC); zend_do_extended_fcall_end(TSRMLS_C); }
  958. ;
  959. method_or_not:
  960. method { $$ = $1; $$.EA = ZEND_PARSED_METHOD_CALL; zend_do_push_object(&$$ TSRMLS_CC); }
  961. | array_method_dereference { $$ = $1; zend_do_push_object(&$$ TSRMLS_CC); }
  962. | /* empty */ { $$.EA = ZEND_PARSED_MEMBER; }
  963. ;
  964. variable_without_objects:
  965. reference_variable { $$ = $1; }
  966. | simple_indirect_reference reference_variable { zend_do_indirect_references(&$$, &$1, &$2 TSRMLS_CC); }
  967. ;
  968. static_member:
  969. class_name T_PAAMAYIM_NEKUDOTAYIM variable_without_objects { $$ = $3; zend_do_fetch_static_member(&$$, &$1 TSRMLS_CC); }
  970. | variable_class_name T_PAAMAYIM_NEKUDOTAYIM variable_without_objects { $$ = $3; zend_do_fetch_static_member(&$$, &$1 TSRMLS_CC); }
  971. ;
  972. variable_class_name:
  973. reference_variable { zend_do_end_variable_parse(&$1, BP_VAR_R, 0 TSRMLS_CC); $$=$1;; }
  974. ;
  975. array_function_dereference:
  976. array_function_dereference '[' dim_offset ']' { fetch_array_dim(&$$, &$1, &$3 TSRMLS_CC); }
  977. | function_call { zend_do_begin_variable_parse(TSRMLS_C); $1.EA = ZEND_PARSED_FUNCTION_CALL; }
  978. '[' dim_offset ']' { fetch_array_dim(&$$, &$1, &$4 TSRMLS_CC); }
  979. ;
  980. base_variable_with_function_calls:
  981. base_variable { $$ = $1; }
  982. | array_function_dereference { $$ = $1; }
  983. | function_call { zend_do_begin_variable_parse(TSRMLS_C); $$ = $1; $$.EA = ZEND_PARSED_FUNCTION_CALL; }
  984. ;
  985. base_variable:
  986. reference_variable { $$ = $1; $$.EA = ZEND_PARSED_VARIABLE; }
  987. | simple_indirect_reference reference_variable { zend_do_indirect_references(&$$, &$1, &$2 TSRMLS_CC); $$.EA = ZEND_PARSED_VARIABLE; }
  988. | static_member { $$ = $1; $$.EA = ZEND_PARSED_STATIC_MEMBER; }
  989. ;
  990. reference_variable:
  991. reference_variable '[' dim_offset ']' { fetch_array_dim(&$$, &$1, &$3 TSRMLS_CC); }
  992. | reference_variable '{' expr '}' { fetch_string_offset(&$$, &$1, &$3 TSRMLS_CC); }
  993. | compound_variable { zend_do_begin_variable_parse(TSRMLS_C); fetch_simple_variable(&$$, &$1, 1 TSRMLS_CC); }
  994. ;
  995. compound_variable:
  996. T_VARIABLE { $$ = $1; }
  997. | '$' '{' expr '}' { $$ = $3; }
  998. ;
  999. dim_offset:
  1000. /* empty */ { $$.op_type = IS_UNUSED; }
  1001. | expr { $$ = $1; }
  1002. ;
  1003. object_property:
  1004. object_dim_list { $$ = $1; }
  1005. | variable_without_objects { zend_do_end_variable_parse(&$1, BP_VAR_R, 0 TSRMLS_CC); } { znode tmp_znode; zend_do_pop_object(&tmp_znode TSRMLS_CC); zend_do_fetch_property(&$$, &tmp_znode, &$1 TSRMLS_CC);}
  1006. ;
  1007. object_dim_list:
  1008. object_dim_list '[' dim_offset ']' { fetch_array_dim(&$$, &$1, &$3 TSRMLS_CC); }
  1009. | object_dim_list '{' expr '}' { fetch_string_offset(&$$, &$1, &$3 TSRMLS_CC); }
  1010. | variable_name { znode tmp_znode; zend_do_pop_object(&tmp_znode TSRMLS_CC); zend_do_fetch_property(&$$, &tmp_znode, &$1 TSRMLS_CC);}
  1011. ;
  1012. variable_name:
  1013. T_STRING { $$ = $1; }
  1014. | '{' expr '}' { $$ = $2; }
  1015. ;
  1016. simple_indirect_reference:
  1017. '$' { Z_LVAL($$.u.constant) = 1; }
  1018. | simple_indirect_reference '$' { Z_LVAL($$.u.constant)++; }
  1019. ;
  1020. assignment_list:
  1021. assignment_list ',' assignment_list_element
  1022. | assignment_list_element
  1023. ;
  1024. assignment_list_element:
  1025. variable { zend_do_add_list_element(&$1 TSRMLS_CC); }
  1026. | T_LIST '(' { zend_do_new_list_begin(TSRMLS_C); } assignment_list ')' { zend_do_new_list_end(TSRMLS_C); }
  1027. | /* empty */ { zend_do_add_list_element(NULL TSRMLS_CC); }
  1028. ;
  1029. array_pair_list:
  1030. /* empty */ { zend_do_init_array(&$$, NULL, NULL, 0 TSRMLS_CC); }
  1031. | non_empty_array_pair_list possible_comma { $$ = $1; }
  1032. ;
  1033. non_empty_array_pair_list:
  1034. non_empty_array_pair_list ',' expr T_DOUBLE_ARROW expr { zend_do_add_array_element(&$$, &$5, &$3, 0 TSRMLS_CC); }
  1035. | non_empty_array_pair_list ',' expr { zend_do_add_array_element(&$$, &$3, NULL, 0 TSRMLS_CC); }
  1036. | expr T_DOUBLE_ARROW expr { zend_do_init_array(&$$, &$3, &$1, 0 TSRMLS_CC); }
  1037. | expr { zend_do_init_array(&$$, &$1, NULL, 0 TSRMLS_CC); }
  1038. | non_empty_array_pair_list ',' expr T_DOUBLE_ARROW '&' w_variable { zend_do_add_array_element(&$$, &$6, &$3, 1 TSRMLS_CC); }
  1039. | non_empty_array_pair_list ',' '&' w_variable { zend_do_add_array_element(&$$, &$4, NULL, 1 TSRMLS_CC); }
  1040. | expr T_DOUBLE_ARROW '&' w_variable { zend_do_init_array(&$$, &$4, &$1, 1 TSRMLS_CC); }
  1041. | '&' w_variable { zend_do_init_array(&$$, &$2, NULL, 1 TSRMLS_CC); }
  1042. ;
  1043. encaps_list:
  1044. encaps_list encaps_var { zend_do_end_variable_parse(&$2, BP_VAR_R, 0 TSRMLS_CC); zend_do_add_variable(&$$, &$1, &$2 TSRMLS_CC); }
  1045. | encaps_list T_ENCAPSED_AND_WHITESPACE { zend_do_add_string(&$$, &$1, &$2 TSRMLS_CC); }
  1046. | encaps_var { zend_do_end_variable_parse(&$1, BP_VAR_R, 0 TSRMLS_CC); zend_do_add_variable(&$$, NULL, &$1 TSRMLS_CC); }
  1047. | T_ENCAPSED_AND_WHITESPACE encaps_var { zend_do_add_string(&$$, NULL, &$1 TSRMLS_CC); zend_do_end_variable_parse(&$2, BP_VAR_R, 0 TSRMLS_CC); zend_do_add_variable(&$$, &$$, &$2 TSRMLS_CC); }
  1048. ;
  1049. encaps_var:
  1050. T_VARIABLE { zend_do_begin_variable_parse(TSRMLS_C); fetch_simple_variable(&$$, &$1, 1 TSRMLS_CC); }
  1051. | T_VARIABLE '[' { zend_do_begin_variable_parse(TSRMLS_C); } encaps_var_offset ']' { fetch_array_begin(&$$, &$1, &$4 TSRMLS_CC); }
  1052. | T_VARIABLE T_OBJECT_OPERATOR T_STRING { zend_do_begin_variable_parse(TSRMLS_C); fetch_simple_variable(&$2, &$1, 1 TSRMLS_CC); zend_do_fetch_property(&$$, &$2, &$3 TSRMLS_CC); }
  1053. | T_DOLLAR_OPEN_CURLY_BRACES expr '}' { zend_do_begin_variable_parse(TSRMLS_C); fetch_simple_variable(&$$, &$2, 1 TSRMLS_CC); }
  1054. | T_DOLLAR_OPEN_CURLY_BRACES T_STRING_VARNAME '[' expr ']' '}' { zend_do_begin_variable_parse(TSRMLS_C); fetch_array_begin(&$$, &$2, &$4 TSRMLS_CC); }
  1055. | T_CURLY_OPEN variable '}' { $$ = $2; }
  1056. ;
  1057. encaps_var_offset:
  1058. T_STRING { $$ = $1; }
  1059. | T_NUM_STRING { $$ = $1; }
  1060. | T_VARIABLE { fetch_simple_variable(&$$, &$1, 1 TSRMLS_CC); }
  1061. ;
  1062. internal_functions_in_yacc:
  1063. T_ISSET '(' isset_variables ')' { $$ = $3; }
  1064. | T_EMPTY '(' variable ')' { zend_do_isset_or_isempty(ZEND_ISEMPTY, &$$, &$3 TSRMLS_CC); }
  1065. | T_EMPTY '(' expr_without_variable ')' { zend_do_unary_op(ZEND_BOOL_NOT, &$$, &$3 TSRMLS_CC); }
  1066. | T_INCLUDE expr { zend_do_include_or_eval(ZEND_INCLUDE, &$$, &$2 TSRMLS_CC); }
  1067. | T_INCLUDE_ONCE expr { zend_do_include_or_eval(ZEND_INCLUDE_ONCE, &$$, &$2 TSRMLS_CC); }
  1068. | T_EVAL '(' expr ')' { zend_do_include_or_eval(ZEND_EVAL, &$$, &$3 TSRMLS_CC); }
  1069. | T_REQUIRE expr { zend_do_include_or_eval(ZEND_REQUIRE, &$$, &$2 TSRMLS_CC); }
  1070. | T_REQUIRE_ONCE expr { zend_do_include_or_eval(ZEND_REQUIRE_ONCE, &$$, &$2 TSRMLS_CC); }
  1071. ;
  1072. isset_variables:
  1073. isset_variable { $$ = $1; }
  1074. | isset_variables ',' { zend_do_boolean_and_begin(&$1, &$2 TSRMLS_CC); } isset_variable { zend_do_boolean_and_end(&$$, &$1, &$4, &$2 TSRMLS_CC); }
  1075. ;
  1076. isset_variable:
  1077. variable { zend_do_isset_or_isempty(ZEND_ISSET, &$$, &$1 TSRMLS_CC); }
  1078. | expr_without_variable { zend_error_noreturn(E_COMPILE_ERROR, "Cannot use isset() on the result of an expression (you can use \"null !== expression\" instead)"); }
  1079. ;
  1080. class_constant:
  1081. class_name T_PAAMAYIM_NEKUDOTAYIM T_STRING { zend_do_fetch_constant(&$$, &$1, &$3, ZEND_RT, 0 TSRMLS_CC); }
  1082. | variable_class_name T_PAAMAYIM_NEKUDOTAYIM T_STRING { zend_do_fetch_constant(&$$, &$1, &$3, ZEND_RT, 0 TSRMLS_CC); }
  1083. ;
  1084. static_class_name_scalar:
  1085. class_name T_PAAMAYIM_NEKUDOTAYIM T_CLASS { zend_do_resolve_class_name(&$$, &$1, 1 TSRMLS_CC); }
  1086. ;
  1087. class_name_scalar:
  1088. class_name T_PAAMAYIM_NEKUDOTAYIM T_CLASS { zend_do_resolve_class_name(&$$, &$1, 0 TSRMLS_CC); }
  1089. ;
  1090. %%
  1091. /* Copy to YYRES the contents of YYSTR after stripping away unnecessary
  1092. quotes and backslashes, so that it's suitable for yyerror. The
  1093. heuristic is that double-quoting is unnecessary unless the string
  1094. contains an apostrophe, a comma, or backslash (other than
  1095. backslash-backslash). YYSTR is taken from yytname. If YYRES is
  1096. null, do not copy; instead, return the length of what the result
  1097. would have been. */
  1098. static YYSIZE_T zend_yytnamerr(char *yyres, const char *yystr)
  1099. {
  1100. if (!yyres) {
  1101. return yystrlen(yystr);
  1102. }
  1103. {
  1104. TSRMLS_FETCH();
  1105. if (CG(parse_error) == 0) {
  1106. char buffer[120];
  1107. const unsigned char *end, *str, *tok1 = NULL, *tok2 = NULL;
  1108. unsigned int len = 0, toklen = 0, yystr_len;
  1109. CG(parse_error) = 1;
  1110. if (LANG_SCNG(yy_text)[0] == 0 &&
  1111. LANG_SCNG(yy_leng) == 1 &&
  1112. memcmp(yystr, "\"end of file\"", sizeof("\"end of file\"") - 1) == 0) {
  1113. yystpcpy(yyres, "end of file");
  1114. return sizeof("end of file")-1;
  1115. }
  1116. str = LANG_SCNG(yy_text);
  1117. end = memchr(str, '\n', LANG_SCNG(yy_leng));
  1118. yystr_len = yystrlen(yystr);
  1119. if ((tok1 = memchr(yystr, '(', yystr_len)) != NULL
  1120. && (tok2 = zend_memrchr(yystr, ')', yystr_len)) != NULL) {
  1121. toklen = (tok2 - tok1) + 1;
  1122. } else {
  1123. tok1 = tok2 = NULL;
  1124. toklen = 0;
  1125. }
  1126. if (end == NULL) {
  1127. len = LANG_SCNG(yy_leng) > 30 ? 30 : LANG_SCNG(yy_leng);
  1128. } else {
  1129. len = (end - str) > 30 ? 30 : (end - str);
  1130. }
  1131. if (toklen) {
  1132. snprintf(buffer, sizeof(buffer), "'%.*s' %.*s", len, str, toklen, tok1);
  1133. } else {
  1134. snprintf(buffer, sizeof(buffer), "'%.*s'", len, str);
  1135. }
  1136. yystpcpy(yyres, buffer);
  1137. return len + (toklen ? toklen + 1 : 0) + 2;
  1138. }
  1139. }
  1140. if (*yystr == '"') {
  1141. YYSIZE_T yyn = 0;
  1142. const char *yyp = yystr;
  1143. for (; *++yyp != '"'; ++yyn) {
  1144. yyres[yyn] = *yyp;
  1145. }
  1146. yyres[yyn] = '\0';
  1147. return yyn;
  1148. }
  1149. yystpcpy(yyres, yystr);
  1150. return strlen(yystr);
  1151. }
  1152. /*
  1153. * Local variables:
  1154. * tab-width: 4
  1155. * c-basic-offset: 4
  1156. * indent-tabs-mode: t
  1157. * End:
  1158. */