/source_maker/include/function_generation.php

https://bitbucket.org/lordgnu/wxphp · PHP · 1080 lines · 888 code · 132 blank · 60 comment · 54 complexity · a319effc234f32170e4b94f0d8d0fdb6 MD5 · raw file 

    

  1. <?php
    2. 

  2. /**
    3. 

  3.  * @author Jefferson González
    4. 

  4.  * 
    5. 

  5.  * @license 
    6. 

  6.  * This file is part of wxPHP check the LICENSE file for information.
    7. 

  7.  * 
    8. 

  8.  * @description
    9. 

  9.  * Functions to assist on the generation of code to wrap the wxWidgets
    10. 

  10.  * class methods and global functions.
    11. 

  11.  * 
    12. 

  12. */
    13. 

  13. 

  14. /**
    15. 

  15.  * Generates the parameters list code for a given class method or
    16. 

  16.  * function including its overloads
    17. 

  17.  * 
    18. 

  18.  * @param array $method_definitions Data for the method or function.
    19. 

  19.  * @param string $method_name Name of the function.
    20. 

  20.  * @param string $class_name Name of the parent class if applicable.
    21. 

  21.  * 
    22. 

  22.  * @return string Generated code ready to insert on the beginning 
    23. 

  23.  * of the PHP_METHOD or PHP_FUNCTION body
    24. 

  24.  */
    25. 

  25. function function_parameters($method_definitions, $method_name, $class_name=null)
    26. 

  26. {
    27. 

  27. 	//Positions on the array of function_data where parameters data is stored
    28. 

  28. 	$parameter_types = "parameters_type";
    29. 

  29. 	$parameter_names = "parameters_name";
    30. 

  30. 	$parameter_values = "parameters_default_value";
    31. 

  31. 	
    32. 

  32. 	$parameters = "";
    33. 

  33. 	
    34. 

  34. 	foreach($method_definitions as $declaration_index=>$declaration)
    35. 

  35. 	{
    36. 

  36. 		$parameters .= "//Parameters for overload $declaration_index\n\t";
    37. 

  37. 		foreach($declaration[$parameter_types] as $parameter_index=>$parameter_type)
    38. 

  38. 		{
    39. 

  39. 			$parameter_is_array = $declaration["parameters_is_array"][$parameter_index];
    40. 

  40. 			
    41. 

  41. 			$declaration_modifier = "";
    42. 

  42. 			$standard_parameter_type = parameter_type($parameter_type, $parameter_is_array, $method_name, $class_name, $declaration_modifier);
    43. 

  43. 			
    44. 

  44. 			switch($standard_parameter_type)
    45. 

  45. 			{
    46. 

  46. 				case	"bool":
    47. 

  47. 				{
    48. 

  48. 					switch($declaration_modifier)
    49. 

  49. 					{
    50. 

  50. 						case "pointer": //bool*
    51. 

  51. 							$parameters .= "bool* " . $declaration[$parameter_names][$parameter_index] . $declaration_index . ";\n";
    52. 

  52. 							$parameters .= "\tzval* " . $declaration[$parameter_names][$parameter_index] . $declaration_index . "_ref;\n";
    53. 

  53. 							break;
    54. 

  54. 							
    55. 

  55. 						case "const_pointer": //const bool* Array
    56. 

  56. 							$parameters .= "zval* " . $declaration[$parameter_names][$parameter_index] . $declaration_index . ";\n";
    57. 

  57. 							break;
    58. 

  58. 							
    59. 

  59. 						case "reference": //bool&
    60. 

  60. 							$parameters .= "bool " . $declaration[$parameter_names][$parameter_index] . $declaration_index . ";\n";
    61. 

  61. 							$parameters .= "\tzval* " . $declaration[$parameter_names][$parameter_index] . $declaration_index . "_ref;\n";
    62. 

  62. 							break;
    63. 

  63. 						
    64. 

  64. 						case "const_reference": //const bool&
    65. 

  65. 						case "none": //bool
    66. 

  66. 						case "const_none": //const bool
    67. 

  67. 							$parameters .= "bool " . $declaration[$parameter_names][$parameter_index] . $declaration_index . ";\n";
    68. 

  68. 							break;
    69. 

  69. 					}
    70. 

  70. 					break;
    71. 

  71. 				}	
    72. 

  72. 				case	"integer":
    73. 

  73. 				case	"class_enum":
    74. 

  74. 				case	"global_enum":
    75. 

  75. 				{
    76. 

  76. 					switch($declaration_modifier)
    77. 

  77. 					{
    78. 

  78. 						case "pointer": //long*
    79. 

  79. 							$parameters .= "long* " . $declaration[$parameter_names][$parameter_index] . $declaration_index . ";\n";
    80. 

  80. 							$parameters .= "\tzval* " . $declaration[$parameter_names][$parameter_index] . $declaration_index . "_ref;\n";
    81. 

  81. 							break;
    82. 

  82. 							
    83. 

  83. 						case "const_pointer": //const long* Array
    84. 

  84. 							$parameters .= "zval* " . $declaration[$parameter_names][$parameter_index] . $declaration_index . ";\n";
    85. 

  85. 							break;
    86. 

  86. 							
    87. 

  87. 						case "reference": //long&
    88. 

  88. 							$parameters .= "long " . $declaration[$parameter_names][$parameter_index] . $declaration_index . ";\n";
    89. 

  89. 							$parameters .= "\tzval* " . $declaration[$parameter_names][$parameter_index] . $declaration_index . "_ref;\n";
    90. 

  90. 							break;
    91. 

  91. 						
    92. 

  92. 						case "const_reference": //const long&
    93. 

  93. 						case "none": //long
    94. 

  94. 						case "const_none": //const long
    95. 

  95. 							$parameters .= "long " . $declaration[$parameter_names][$parameter_index] . $declaration_index . ";\n";
    96. 

  96. 							break;
    97. 

  97. 					}
    98. 

  98. 					break;
    99. 

  99. 				}
    100. 

  100. 				case	"float":
    101. 

  101. 				{
    102. 

  102. 					switch($declaration_modifier)
    103. 

  103. 					{
    104. 

  104. 						case "pointer": //double*
    105. 

  105. 							$parameters .= "double* " . $declaration[$parameter_names][$parameter_index] . $declaration_index . ";\n";
    106. 

  106. 							$parameters .= "\tzval* " . $declaration[$parameter_names][$parameter_index] . $declaration_index . "_ref;\n";
    107. 

  107. 							break;
    108. 

  108. 							
    109. 

  109. 						case "const_pointer": //const double* Array
    110. 

  110. 							$parameters .= "zval* " . $declaration[$parameter_names][$parameter_index] . $declaration_index . ";\n";
    111. 

  111. 							break;
    112. 

  112. 							
    113. 

  113. 						case "reference": //double&
    114. 

  114. 							$parameters .= "double " . $declaration[$parameter_names][$parameter_index] . $declaration_index . ";\n";
    115. 

  115. 							$parameters .= "\tzval* " . $declaration[$parameter_names][$parameter_index] . $declaration_index . "_ref;\n";
    116. 

  116. 							break;
    117. 

  117. 						
    118. 

  118. 						case "const_reference": //const double&
    119. 

  119. 						case "none": //double
    120. 

  120. 						case "const_none": //const double
    121. 

  121. 							$parameters .= "double " . $declaration[$parameter_names][$parameter_index] . $declaration_index . ";\n";
    122. 

  122. 							break;
    123. 

  123. 					}
    124. 

  124. 					break;
    125. 

  125. 				}
    126. 

  126. 				case	"characters":
    127. 

  127. 				{
    128. 

  128. 					switch($declaration_modifier)
    129. 

  129. 					{
    130. 

  130. 						case "pointer": //char* with reference
    131. 

  131. 							$parameters .= "char* " . $declaration[$parameter_names][$parameter_index] . $declaration_index . ";\n";
    132. 

  132. 							$parameters .= "\tlong " . $declaration[$parameter_names][$parameter_index] . "_len" . $declaration_index . ";\n";
    133. 

  133. 							$parameters .= "\tzval* " . $declaration[$parameter_names][$parameter_index] . $declaration_index . "_ref;\n";
    134. 

  134. 							break;
    135. 

  135. 						
    136. 

  136. 						case "const_pointer": //const char*
    137. 

  137. 							$parameters .= "char* " . $declaration[$parameter_names][$parameter_index] . $declaration_index . ";\n";
    138. 

  138. 							$parameters .= "\tlong " . $declaration[$parameter_names][$parameter_index] . "_len" . $declaration_index . ";\n";
    139. 

  139. 							break;
    140. 

  140. 							
    141. 

  141. 						case "reference": //char&
    142. 

  142. 							$parameters .= "\tlong " . $declaration[$parameter_names][$parameter_index] . $declaration_index . ";\n";
    143. 

  143. 							$parameters .= "\tzval* " . $declaration[$parameter_names][$parameter_index] . $declaration_index . "_ref;\n";
    144. 

  144. 							break;
    145. 

  145. 						
    146. 

  146. 						case "const_reference": //const char&
    147. 

  147. 						case "none": //char
    148. 

  148. 						case "const_none": //const char
    149. 

  149. 							$parameters .= "long " . $declaration[$parameter_names][$parameter_index] . $declaration_index . ";\n";
    150. 

  150. 							break;
    151. 

  151. 					}
    152. 

  152. 					break;
    153. 

  153. 				}
    154. 

  154. 				case	"void":
    155. 

  155. 				{
    156. 

  156. 					switch($declaration_modifier)
    157. 

  157. 					{
    158. 

  158. 						case "const_pointer_pointer": //const void**
    159. 

  159. 						case "pointer_pointer":
    160. 

  160. 						case "const_pointer": //const void*
    161. 

  161. 						case "pointer": //void*
    162. 

  162. 							$parameters .= "char* " . $declaration[$parameter_names][$parameter_index] . $declaration_index . ";\n";
    163. 

  163. 							$parameters .= "\tlong " . $declaration[$parameter_names][$parameter_index] . "_len" . $declaration_index . ";\n";
    164. 

  164. 							
    165. 

  165. 							if($declaration_modifier == "pointer" || $declaration_modifier == "pointer_pointer")
    166. 

  166. 								$parameters .= "\tzval* " . $declaration[$parameter_names][$parameter_index] . $declaration_index . "_ref;\n";
    167. 

  167. 								
    168. 

  168. 							break;
    169. 

  169. 					}
    170. 

  170. 					break;
    171. 

  171. 				}
    172. 

  172. 				case	"date":
    173. 

  173. 				{
    174. 

  174. 					switch($declaration_modifier)
    175. 

  175. 					{
    176. 

  176. 						case "pointer": //long*
    177. 

  177. 							$parameters .= "long " . $declaration[$parameter_names][$parameter_index] . $declaration_index . ";\n";
    178. 

  178. 							$parameters .= "\tzval* " . $declaration[$parameter_names][$parameter_index] . $declaration_index . "_ref;\n";
    179. 

  179. 							break;
    180. 

  180. 							
    181. 

  181. 						case "const_pointer": //const long* Array
    182. 

  182. 							$parameters .= "zval* " . $declaration[$parameter_names][$parameter_index] . $declaration_index . ";\n";
    183. 

  183. 							break;
    184. 

  184. 							
    185. 

  185. 						case "reference": //long&
    186. 

  186. 							$parameters .= "long " . $declaration[$parameter_names][$parameter_index] . $declaration_index . ";\n";
    187. 

  187. 							$parameters .= "\tzval* " . $declaration[$parameter_names][$parameter_index] . $declaration_index . "_ref;\n";
    188. 

  188. 							break;
    189. 

  189. 						
    190. 

  190. 						case "const_reference": //const long&
    191. 

  191. 						case "none": //long
    192. 

  192. 						case "const_none": //const long
    193. 

  193. 							$parameters .= "long " . $declaration[$parameter_names][$parameter_index] . $declaration_index . ";\n";
    194. 

  194. 							break;
    195. 

  195. 					}
    196. 

  196. 					break;
    197. 

  197. 				}	
    198. 

  198. 				case	"string":
    199. 

  199. 				{
    200. 

  200. 					switch($declaration_modifier)
    201. 

  201. 					{
    202. 

  202. 						case "pointer": //wxString*
    203. 

  203. 							$parameters .= "char* " . $declaration[$parameter_names][$parameter_index] . $declaration_index . ";\n";
    204. 

  204. 							$parameters .= "\tlong " . $declaration[$parameter_names][$parameter_index] . "_len" . $declaration_index . ";\n";
    205. 

  205. 							$parameters .= "\tzval* " . $declaration[$parameter_names][$parameter_index] . $declaration_index . "_ref;\n";
    206. 

  206. 							break;
    207. 

  207. 							
    208. 

  208. 						case "const_pointer": //const wxString* Array
    209. 

  209. 						case "const_reference_array": //const wxString&[]
    210. 

  210. 						case "const_none_array": //const wxString[]
    211. 

  211. 						case "none_array": //wxString[]
    212. 

  212. 							$parameters .= "zval* " . $declaration[$parameter_names][$parameter_index] . $declaration_index . ";\n";
    213. 

  213. 							break;
    214. 

  214. 							
    215. 

  215. 						case "reference": //wxString&
    216. 

  216. 							$parameters .= "char* " . $declaration[$parameter_names][$parameter_index] . $declaration_index . ";\n";
    217. 

  217. 							$parameters .= "\tlong " . $declaration[$parameter_names][$parameter_index] . "_len" . $declaration_index . ";\n";
    218. 

  218. 							$parameters .= "\tzval* " . $declaration[$parameter_names][$parameter_index] . $declaration_index . "_ref;\n";
    219. 

  219. 							break;
    220. 

  220. 						
    221. 

  221. 						case "const_reference": //const wxString&
    222. 

  222. 						case "none": //wxString
    223. 

  223. 						case "const_none": //const wxString
    224. 

  224. 							$parameters .= "char* " . $declaration[$parameter_names][$parameter_index] . $declaration_index . ";\n";
    225. 

  225. 							$parameters .= "\tlong " . $declaration[$parameter_names][$parameter_index] . "_len" . $declaration_index . ";\n";
    226. 

  226. 							break;
    227. 

  227. 					}
    228. 

  228. 					break;
    229. 

  229. 				}
    230. 

  230. 				case	"strings_array":
    231. 

  231. 				{
    232. 

  232. 					switch($declaration_modifier)
    233. 

  233. 					{
    234. 

  234. 						case "pointer": //wxArrayString*
    235. 

  235. 							die("Unhandled wxArrayString*");
    236. 

  236. 							break;
    237. 

  237. 							
    238. 

  238. 						case "const_pointer": //const wxArrayString* Array
    239. 

  239. 							die("Unhandled const wxArrayString*");
    240. 

  240. 							break;
    241. 

  241. 							
    242. 

  242. 						case "reference": //wxArrayString&
    243. 

  243. 							$parameters .= "zval* " . $declaration[$parameter_names][$parameter_index] . $declaration_index . " = 0;\n";
    244. 

  244. 							$parameters .= "\tzval* " . $declaration[$parameter_names][$parameter_index] . $declaration_index . "_ref;\n";
    245. 

  245. 							break;
    246. 

  246. 						
    247. 

  247. 						case "const_reference": //const wxArrayString&
    248. 

  248. 						case "none": //wxArrayString
    249. 

  249. 						case "const_none": //const wxArrayString
    250. 

  250. 							$parameters .= "zval* " . $declaration[$parameter_names][$parameter_index] . $declaration_index . " = 0;\n";
    251. 

  251. 							break;
    252. 

  252. 					}
    253. 

  253. 					break;
    254. 

  254. 				}	
    255. 

  255. 				case "object":
    256. 

  256. 				{
    257. 

  257. 					$parameters .= "zval* " . $declaration[$parameter_names][$parameter_index] . $declaration_index . " = 0;\n";
    258. 

  258. 					$parameters .= "\tvoid* object_pointer{$declaration_index}_{$parameter_index} = 0;\n";
    259. 

  259. 					break;
    260. 

  260. 				}	
    261. 

  261. 				default: 
    262. 

  262. 					ob_clean();
    263. 

  263. 					die("Unhandled type " . parameter_type($parameter_type, $parameter_is_array, $method_name, $class_name) . " on class '$class_name' at method '$method_name'\n");
    264. 

  264. 			}
    265. 

  265. 			
    266. 

  266. 			$parameters .= "\t";
    267. 

  267. 		}
    268. 

  268. 		
    269. 

  269. 		$parameters .= "bool overload{$declaration_index}_called = false;\n\t";
    270. 

  270. 	}
    271. 

  271. 	
    272. 

  272. 	return $parameters;
    273. 

  273. }
    274. 

  274. 

  275. 

  276. 

  277. /**
    278. 

  278.  * Generates the code that checks which of the method 
    279. 

  279.  * or function overloads was called
    280. 

  280.  * 
    281. 

  281.  * @param array $method_definitions Data for the function.
    282. 

  282.  * @param string $method_name Name of the function.
    283. 

  283.  * @param string $class_name Name of the parent class if applicable.
    284. 

  284.  * 
    285. 

  285.  * @return string Generated code ready to insert on the middle of 
    286. 

  286.  * the PHP_METHOD or PHP_FUNCTION body after the generated code of 
    287. 

  287.  * function_parameters()
    288. 

  288.  */
    289. 

  289. function function_called_overload($method_definitions, $method_name, $class_name=null)
    290. 

  290. {
    291. 

  291. 	//Positions on the array of function_data where parameters data is stored
    292. 

  292. 	$parameter_types = "parameters_type";
    293. 

  293. 	$parameter_names = "parameters_name";
    294. 

  294. 	$parameter_required = "parameters_required";
    295. 

  295. 	$parameter_values = "parameters_default_value";
    296. 

  296. 	
    297. 

  297. 	$called_overload = "";
    298. 

  298. 	
    299. 

  299. 	$declarations_count = count($method_definitions);
    300. 

  300. 	
    301. 

  301. 	foreach($method_definitions as $declaration_index=>$declaration)
    302. 

  302. 	{
    303. 

  303. 		$object_retrieve_code = "";
    304. 

  304. 		
    305. 

  305. 		$required_parameters = count($declaration[$parameter_required]);
    306. 

  306. 		$parameters_count = count($declaration[$parameter_types]);
    307. 

  307. 		
    308. 

  308. 		$clause = $required_parameters == $parameters_count ? "arguments_received == $required_parameters" : "arguments_received >= $required_parameters  && arguments_received <= $parameters_count";
    309. 

  309. 		
    310. 

  310. 		$called_overload .= "//Overload $declaration_index\n";
    311. 

  311. 		$called_overload .= "\toverload$declaration_index:\n";
    312. 

  312. 		$called_overload .= "\tif(!already_called && $clause)\n";
    313. 

  313. 		$called_overload .= "\t{\n";
    314. 

  314. 		
    315. 

  315. 		$zend_parse_parameters = "";
    316. 

  316. 		$zend_parse_parameters_string = "";
    317. 

  317. 		
    318. 

  318. 		$references_found = false;
    319. 

  319. 		$references_parameters_string = "";
    320. 

  320. 		$references_parameters = "";
    321. 

  321. 		
    322. 

  322. 		for($parameter_index=0; $parameter_index<$parameters_count; $parameter_index++)
    323. 

  323. 		{	
    324. 

  324. 			//Check if all parameters are optional
    325. 

  325. 			if($required_parameters == 0 && $parameters_count > 0 && $parameter_index == 0)
    326. 

  326. 			{
    327. 

  327. 				$zend_parse_parameters_string .= "|";
    328. 

  328. 				$references_parameters_string .= "|";
    329. 

  329. 			}
    330. 

  330. 			
    331. 

  331. 			$references_parameters_string .= "z";
    332. 

  332. 			
    333. 

  333. 			$parameter_is_array = $declaration["parameters_is_array"][$parameter_index];
    334. 

  334. 			
    335. 

  335. 			$declaration_modifier = "";
    336. 

  336. 			$standard_parameter_type = parameter_type($declaration[$parameter_types][$parameter_index], $parameter_is_array, $method_name, $class_name, $declaration_modifier);
    337. 

  337. 			$argument_parameter_type = str_replace(array("const ", "*", "&"), "", $declaration[$parameter_types][$parameter_index]);
    338. 

  338. 			
    339. 

  339. 			switch($standard_parameter_type)
    340. 

  340. 			{
    341. 

  341. 				case	"bool":
    342. 

  342. 				{
    343. 

  343. 					switch($declaration_modifier)
    344. 

  344. 					{
    345. 

  345. 						case "pointer": //bool*
    346. 

  346. 							$zend_parse_parameters_string .= "b";
    347. 

  347. 							$zend_parse_parameters .= $declaration[$parameter_names][$parameter_index] . $declaration_index . ", ";
    348. 

  348. 							$references_found = true;
    349. 

  349. 							$references_parameters .= "&" . $declaration[$parameter_names][$parameter_index] . $declaration_index . "_ref, ";
    350. 

  350. 							break;
    351. 

  351. 							
    352. 

  352. 						case "const_pointer": //const bool* Array
    353. 

  353. 							$zend_parse_parameters_string .= "a";
    354. 

  354. 							$zend_parse_parameters .= "&" . $declaration[$parameter_names][$parameter_index] . $declaration_index . ", ";
    355. 

  355. 							$references_parameters .= "&dummy, ";
    356. 

  356. 							break;
    357. 

  357. 							
    358. 

  358. 						case "reference": //bool&
    359. 

  359. 							$zend_parse_parameters_string .= "b";
    360. 

  360. 							$zend_parse_parameters .= "&" . $declaration[$parameter_names][$parameter_index] . $declaration_index . ", ";
    361. 

  361. 							$references_found = true;
    362. 

  362. 							$references_parameters .= "&" . $declaration[$parameter_names][$parameter_index] . $declaration_index . "_ref, ";
    363. 

  363. 							break;
    364. 

  364. 							
    365. 

  365. 						case "const_reference": //const bool&
    366. 

  366. 						case "none": //bool
    367. 

  367. 						case "const_none": //const bool
    368. 

  368. 							$zend_parse_parameters_string .= "b";
    369. 

  369. 							$zend_parse_parameters .= "&" . $declaration[$parameter_names][$parameter_index] . $declaration_index . ", ";
    370. 

  370. 							$references_parameters .= "&dummy, ";
    371. 

  371. 							break;
    372. 

  372. 					}
    373. 

  373. 					break;
    374. 

  374. 				}	
    375. 

  375. 				case	"integer":
    376. 

  376. 				case	"class_enum":
    377. 

  377. 				case	"global_enum":
    378. 

  378. 				{
    379. 

  379. 					switch($declaration_modifier)
    380. 

  380. 					{
    381. 

  381. 						case "pointer": //long*
    382. 

  382. 							$zend_parse_parameters_string .= "l";
    383. 

  383. 							$zend_parse_parameters .= $declaration[$parameter_names][$parameter_index] . $declaration_index . ", ";
    384. 

  384. 							$references_found = true;
    385. 

  385. 							$references_parameters .= "&" . $declaration[$parameter_names][$parameter_index] . $declaration_index . "_ref, ";
    386. 

  386. 							break;
    387. 

  387. 							
    388. 

  388. 						case "const_pointer": //const long* Array
    389. 

  389. 							$zend_parse_parameters_string .= "a";
    390. 

  390. 							$zend_parse_parameters .= "&" . $declaration[$parameter_names][$parameter_index] . $declaration_index . ", ";
    391. 

  391. 							$references_parameters .= "&dummy, ";
    392. 

  392. 							break;
    393. 

  393. 							
    394. 

  394. 						case "reference": //long&
    395. 

  395. 							$zend_parse_parameters_string .= "l";
    396. 

  396. 							$zend_parse_parameters .= "&" . $declaration[$parameter_names][$parameter_index] . $declaration_index . ", ";
    397. 

  397. 							$references_found = true;
    398. 

  398. 							$references_parameters .= "&" . $declaration[$parameter_names][$parameter_index] . $declaration_index . "_ref, ";
    399. 

  399. 							break;
    400. 

  400. 							
    401. 

  401. 						case "const_reference": //const long&
    402. 

  402. 						case "none": //long
    403. 

  403. 						case "const_none": //const long
    404. 

  404. 							$zend_parse_parameters_string .= "l";
    405. 

  405. 							$zend_parse_parameters .= "&" . $declaration[$parameter_names][$parameter_index] . $declaration_index . ", ";
    406. 

  406. 							$references_parameters .= "&dummy, ";
    407. 

  407. 							break;
    408. 

  408. 					}
    409. 

  409. 					break;
    410. 

  410. 				}
    411. 

  411. 				case	"float":
    412. 

  412. 				{
    413. 

  413. 					switch($declaration_modifier)
    414. 

  414. 					{
    415. 

  415. 						case "pointer": //double*
    416. 

  416. 							$zend_parse_parameters_string .= "d";
    417. 

  417. 							$zend_parse_parameters .= $declaration[$parameter_names][$parameter_index] . $declaration_index . ", ";
    418. 

  418. 							$references_found = true;
    419. 

  419. 							$references_parameters .= "&" . $declaration[$parameter_names][$parameter_index] . $declaration_index . "_ref, ";
    420. 

  420. 							break;
    421. 

  421. 							
    422. 

  422. 						case "const_pointer": //const double* Array
    423. 

  423. 							$zend_parse_parameters_string .= "a";
    424. 

  424. 							$zend_parse_parameters .= "&" . $declaration[$parameter_names][$parameter_index] . $declaration_index . ", ";
    425. 

  425. 							$references_parameters .= "&dummy, ";
    426. 

  426. 							break;
    427. 

  427. 							
    428. 

  428. 						case "reference": //double&
    429. 

  429. 							$zend_parse_parameters_string .= "d";
    430. 

  430. 							$zend_parse_parameters .= "&" . $declaration[$parameter_names][$parameter_index] . $declaration_index . ", ";
    431. 

  431. 							$references_found = true;
    432. 

  432. 							$references_parameters .= "&" . $declaration[$parameter_names][$parameter_index] . $declaration_index . "_ref, ";
    433. 

  433. 							break;
    434. 

  434. 							
    435. 

  435. 						case "const_reference": //const double&
    436. 

  436. 						case "none": //bool
    437. 

  437. 						case "const_none": //const double
    438. 

  438. 							$zend_parse_parameters_string .= "d";
    439. 

  439. 							$zend_parse_parameters .= "&" . $declaration[$parameter_names][$parameter_index] . $declaration_index . ", ";
    440. 

  440. 							$references_parameters .= "&dummy, ";
    441. 

  441. 							break;
    442. 

  442. 					}
    443. 

  443. 					break;
    444. 

  444. 				}
    445. 

  445. 				case	"characters":
    446. 

  446. 				{
    447. 

  447. 					switch($declaration_modifier)
    448. 

  448. 					{
    449. 

  449. 						case "pointer": //char*
    450. 

  450. 							$zend_parse_parameters_string .= "s";
    451. 

  451. 							$zend_parse_parameters .= "&" . $declaration[$parameter_names][$parameter_index] . $declaration_index . ", ";
    452. 

  452. 							$zend_parse_parameters .= "&" . $declaration[$parameter_names][$parameter_index] . "_len" . $declaration_index . ", ";
    453. 

  453. 							$references_found = true;
    454. 

  454. 							$references_parameters .= "&" . $declaration[$parameter_names][$parameter_index] . $declaration_index . "_ref, ";
    455. 

  455. 							break;
    456. 

  456. 							
    457. 

  457. 						case "const_pointer": //const char*
    458. 

  458. 							$zend_parse_parameters_string .= "s";
    459. 

  459. 							$zend_parse_parameters .= "&" . $declaration[$parameter_names][$parameter_index] . $declaration_index . ", ";
    460. 

  460. 							$zend_parse_parameters .= "&" . $declaration[$parameter_names][$parameter_index] . "_len" . $declaration_index . ", ";
    461. 

  461. 							$references_parameters .= "&dummy, ";
    462. 

  462. 							break;
    463. 

  463. 							
    464. 

  464. 						case "reference": //char&
    465. 

  465. 							$zend_parse_parameters_string .= "l";
    466. 

  466. 							$zend_parse_parameters .= "&" . $declaration[$parameter_names][$parameter_index] . $declaration_index . ", ";
    467. 

  467. 							$references_found = true;
    468. 

  468. 							$references_parameters .= "&" . $declaration[$parameter_names][$parameter_index] . $declaration_index . "_ref, ";
    469. 

  469. 							break;
    470. 

  470. 							
    471. 

  471. 						case "const_reference": //const char&
    472. 

  472. 						case "none": //char
    473. 

  473. 						case "const_none": //const char
    474. 

  474. 							$zend_parse_parameters_string .= "l";
    475. 

  475. 							$zend_parse_parameters .= "&" . $declaration[$parameter_names][$parameter_index] . $declaration_index . ", ";
    476. 

  476. 							$references_parameters .= "&dummy, ";
    477. 

  477. 							break;
    478. 

  478. 					}
    479. 

  479. 					break;
    480. 

  480. 				}
    481. 

  481. 				case	"void":
    482. 

  482. 				{
    483. 

  483. 					switch($declaration_modifier)
    484. 

  484. 					{		
    485. 

  485. 						case "pointer": //void*
    486. 

  486. 						case "pointer_pointer": //void**
    487. 

  487. 							$zend_parse_parameters_string .= "s";
    488. 

  488. 							$zend_parse_parameters .= "&" . $declaration[$parameter_names][$parameter_index] . $declaration_index . ", ";
    489. 

  489. 							$zend_parse_parameters .= "&" . $declaration[$parameter_names][$parameter_index] . "_len" . $declaration_index . ", ";
    490. 

  490. 							$references_found = true;
    491. 

  491. 							$references_parameters .= "&" . $declaration[$parameter_names][$parameter_index] . $declaration_index . "_ref, ";
    492. 

  492. 							break;
    493. 

  493. 							
    494. 

  494. 						case "const_pointer": //const void*
    495. 

  495. 						case "const_pointer_pointer": //const void**
    496. 

  496. 							$zend_parse_parameters_string .= "s";
    497. 

  497. 							$zend_parse_parameters .= "&" . $declaration[$parameter_names][$parameter_index] . $declaration_index . ", ";
    498. 

  498. 							$zend_parse_parameters .= "&" . $declaration[$parameter_names][$parameter_index] . "_len" . $declaration_index . ", ";
    499. 

  499. 							$references_parameters .= "&dummy, ";
    500. 

  500. 							break;
    501. 

  501. 					}
    502. 

  502. 					break;
    503. 

  503. 				}
    504. 

  504. 				case	"date":	
    505. 

  505. 				{
    506. 

  506. 					switch($declaration_modifier)
    507. 

  507. 					{
    508. 

  508. 						case "pointer": //long*
    509. 

  509. 							$zend_parse_parameters_string .= "l";
    510. 

  510. 							$zend_parse_parameters .= "&" . $declaration[$parameter_names][$parameter_index] . $declaration_index . ", ";
    511. 

  511. 							$references_found = true;
    512. 

  512. 							$references_parameters .= "&" . $declaration[$parameter_names][$parameter_index] . $declaration_index . "_ref, ";
    513. 

  513. 							break;
    514. 

  514. 							
    515. 

  515. 						case "const_pointer": //const long* Array
    516. 

  516. 							$zend_parse_parameters_string .= "a";
    517. 

  517. 							$zend_parse_parameters .= "&" . $declaration[$parameter_names][$parameter_index] . $declaration_index . ", ";
    518. 

  518. 							$references_parameters .= "&dummy, ";
    519. 

  519. 							break;
    520. 

  520. 							
    521. 

  521. 						case "reference": //long&
    522. 

  522. 							$zend_parse_parameters_string .= "l";
    523. 

  523. 							$zend_parse_parameters .= "&" . $declaration[$parameter_names][$parameter_index] . $declaration_index . ", ";
    524. 

  524. 							$references_found = true;
    525. 

  525. 							$references_parameters .= "&" . $declaration[$parameter_names][$parameter_index] . $declaration_index . "_ref, ";
    526. 

  526. 							break;
    527. 

  527. 							
    528. 

  528. 						case "const_reference": //const long&
    529. 

  529. 						case "none": //long
    530. 

  530. 						case "const_none": //const long
    531. 

  531. 							$zend_parse_parameters_string .= "l";
    532. 

  532. 							$zend_parse_parameters .= "&" . $declaration[$parameter_names][$parameter_index] . $declaration_index . ", ";
    533. 

  533. 							$references_parameters .= "&dummy, ";
    534. 

  534. 							break;
    535. 

  535. 					}
    536. 

  536. 					break;
    537. 

  537. 				}	
    538. 

  538. 				case	"string":
    539. 

  539. 				{
    540. 

  540. 					switch($declaration_modifier)
    541. 

  541. 					{
    542. 

  542. 						case "pointer": //wxString*
    543. 

  543. 							$zend_parse_parameters_string .= "s";
    544. 

  544. 							$zend_parse_parameters .= "&" . $declaration[$parameter_names][$parameter_index] . $declaration_index . ", ";
    545. 

  545. 							$zend_parse_parameters .= "&" . $declaration[$parameter_names][$parameter_index] . "_len" . $declaration_index . ", ";
    546. 

  546. 							$references_found = true;
    547. 

  547. 							$references_parameters .= "&" . $declaration[$parameter_names][$parameter_index] . $declaration_index . "_ref, ";
    548. 

  548. 							break;
    549. 

  549. 							
    550. 

  550. 						case "const_pointer": //const wxString* array
    551. 

  551. 						case "const_reference_array": //const wxString&[]
    552. 

  552. 						case "const_none_array": //const wxString[]
    553. 

  553. 						case "none_array": //wxString[]
    554. 

  554. 							$zend_parse_parameters_string .= "a";
    555. 

  555. 							$zend_parse_parameters .= "&" . $declaration[$parameter_names][$parameter_index] . $declaration_index . ", ";
    556. 

  556. 							$references_parameters .= "&dummy, ";
    557. 

  557. 							break;
    558. 

  558. 							
    559. 

  559. 						case "reference": //wxString&
    560. 

  560. 							$zend_parse_parameters_string .= "s";
    561. 

  561. 							$zend_parse_parameters .= "&" . $declaration[$parameter_names][$parameter_index] . $declaration_index . ", ";
    562. 

  562. 							$zend_parse_parameters .= "&" . $declaration[$parameter_names][$parameter_index] . "_len" . $declaration_index . ", ";
    563. 

  563. 							$references_found = true;
    564. 

  564. 							$references_parameters .= "&" . $declaration[$parameter_names][$parameter_index] . $declaration_index . "_ref, ";
    565. 

  565. 							break;
    566. 

  566. 							
    567. 

  567. 						case "const_reference": //const wxString&
    568. 

  568. 						case "none": //wxString
    569. 

  569. 						case "const_none": //const wxString
    570. 

  570. 							$zend_parse_parameters_string .= "s";
    571. 

  571. 							$zend_parse_parameters .= "&" . $declaration[$parameter_names][$parameter_index] . $declaration_index . ", ";
    572. 

  572. 							$zend_parse_parameters .= "&" . $declaration[$parameter_names][$parameter_index] . "_len" . $declaration_index . ", ";
    573. 

  573. 							$references_parameters .= "&dummy, ";
    574. 

  574. 							break;
    575. 

  575. 					}
    576. 

  576. 					break;
    577. 

  577. 				}	
    578. 

  578. 				case	"strings_array":
    579. 

  579. 				{
    580. 

  580. 					//wxArrayString
    581. 

  581. 					$zend_parse_parameters_string .= "a";
    582. 

  582. 					$zend_parse_parameters .= "&" . $declaration[$parameter_names][$parameter_index] . $declaration_index . ", ";
    583. 

  583. 					$references_parameters .= "&dummy, ";
    584. 

  584. 					break;
    585. 

  585. 				}	
    586. 

  586. 				case "object":
    587. 

  587. 				{
    588. 

  588. 					$zend_parse_parameters .= "&" . $declaration[$parameter_names][$parameter_index] . $declaration_index . ", ";
    589. 

  589. 					
    590. 

  590. 					$references_parameters .= "&dummy, ";
    591. 

  591. 					
    592. 

  592. 					$typeVerifierStr = array();
    593. 

  593. 					if($declaration_modifier == "pointer" || $declaration_modifier == "const_pointer" || $declaration_modifier == "const_pointer_pointer")
    594. 

  594. 					{
    595. 

  595. 						$zend_parse_parameters_string .= "z";
    596. 

  596. 						
    597. 

  597. 						$typeVerifier = derivationsOfClass($argument_parameter_type);
    598. 

  598. 						
    599. 

  599. 						foreach($typeVerifier as $argument_parent_class => $v)
    600. 

  600. 						{
    601. 

  601. 							$typeVerifierStr[] = "rsrc_type != le_".$argument_parent_class;
    602. 

  602. 						}
    603. 

  603. 						
    604. 

  604. 						$typeVerifierStr = trim(join(" && ", $typeVerifierStr));
    605. 

  605. 					}
    606. 

  606. 					else
    607. 

  607. 					{
    608. 

  608. 						$zend_parse_parameters_string .= "O";
    609. 

  609. 						$zend_parse_parameters .= "php_{$argument_parameter_type}_entry" . ", ";
    610. 

  610. 					}
    611. 

  611. 			
    612. 

  612. 					$object_retrieve_code .= "\t\t\tif(arguments_received >= ".($parameter_index+1)."){\n";
    613. 

  613. 					$object_retrieve_code .= "\t\t\t\tif(Z_TYPE_P(".$declaration[$parameter_names][$parameter_index] . $declaration_index.") == IS_OBJECT && zend_hash_find(Z_OBJPROP_P(".$declaration[$parameter_names][$parameter_index] . $declaration_index."), _wxResource , sizeof(_wxResource),  (void **)&tmp) == SUCCESS)\n";
    614. 

  614. 					$object_retrieve_code .= "\t\t\t\t{\n";
    615. 

  615. 					$object_retrieve_code .= "\t\t\t\t\tid_to_find = Z_RESVAL_P(*tmp);\n";
    616. 

  616. 					$object_retrieve_code .= "\t\t\t\t\tobject_pointer{$declaration_index}_{$parameter_index} = zend_list_find(id_to_find, &rsrc_type);\n";
    617. 

  617. 					$object_retrieve_code .= "\t\t\t\t\tif (!object_pointer{$declaration_index}_{$parameter_index} ";
    618. 

  618. 					if(trim($typeVerifierStr) != "") 
    619. 

  619. 					{
    620. 

  620. 						 $object_retrieve_code .= "|| ($typeVerifierStr)";
    621. 

  621. 					}
    622. 

  622. 					$object_retrieve_code .= ")\n";
    623. 

  623. 					$object_retrieve_code .= "\t\t\t\t\t{\n";
    624. 

  624. 					
    625. 

  625. 					if(($declaration_index+1) != $declarations_count && $declarations_count > 1)
    626. 

  626. 					{
    627. 

  627. 						$object_retrieve_code .= "\t\t\t\t\t\tgoto overload".($declaration_index+1).";\n";
    628. 

  628. 					}
    629. 

  629. 					else
    630. 

  630. 					{
    631. 

  631. 						$object_retrieve_code .= "\t\t\t\t\t\tzend_error(E_ERROR, \"Parameter $paramenter_index could not be retreived correctly.\");\n";
    632. 

  632. 					}
    633. 

  633. 					
    634. 

  634. 					$object_retrieve_code .= "\t\t\t\t\t}\n";
    635. 

  635. 					$object_retrieve_code .= "\t\t\t\t}\n";
    636. 

  636. 					$object_retrieve_code .= "\t\t\t\telse if(Z_TYPE_P(".$declaration[$parameter_names][$parameter_index] . $declaration_index.") != IS_NULL)\n";
    637. 

  637. 					$object_retrieve_code .= "\t\t\t\t{\n";
    638. 

  638. 					
    639. 

  639. 					if(($declaration_index+1) != $declarations_count && $declarations_count > 1)
    640. 

  640. 					{
    641. 

  641. 						$object_retrieve_code .= "\t\t\t\t\t\tgoto overload".($declaration_index+1).";\n";
    642. 

  642. 					}
    643. 

  643. 					else
    644. 

  644. 					{
    645. 

  645. 						$object_retrieve_code .= "\t\t\t\t\t\tzend_error(E_ERROR, \"Parameter $paramenter_index could not be retreived correctly.\");\n";
    646. 

  646. 					}
    647. 

  647. 					
    648. 

  648. 					$object_retrieve_code .= "\t\t\t\t}\n";
    649. 

  649. 					$object_retrieve_code .= "\t\t\t}\n\n";
    650. 

  650. 					break;
    651. 

  651. 				}
    652. 

  652. 			}
    653. 

  653. 			
    654. 

  654. 			//Check if all other parameters are optional
    655. 

  655. 			if($parameter_index == $required_parameters-1 && $required_parameters > 0 && $parameters_count > 1 && $required_parameters != $parameters_count)
    656. 

  656. 			{
    657. 

  657. 				$zend_parse_parameters_string .= "|";
    658. 

  658. 				$references_parameters_string .= "|";
    659. 

  659. 			}
    660. 

  660. 		}
    661. 

  661. 		
    662. 

  662. 		$called_overload .= "\t\t#ifdef USE_WXPHP_DEBUG\n";
    663. 

  663. 		$called_overload .= "\t\tphp_printf(\"Parameters received %d\\n\", arguments_received);\n";
    664. 

  664. 		$called_overload .= "\t\tphp_printf(\"Parsing parameters with '$zend_parse_parameters_string' (".trim($zend_parse_parameters, ", ").")\\n\");\n";
    665. 

  665. 		$called_overload .= "\t\t#endif\n";
    666. 

  666. 		
    667. 

  667. 		if($required_parameters == 0 && $parameters_count < 1)
    668. 

  668. 		{
    669. 

  669. 			$called_overload .= "\t\toverload{$declaration_index}_called = true;\n";
    670. 

  670. 			$called_overload .= "\t\talready_called = true;\n";
    671. 

  671. 		}
    672. 

  672. 		else
    673. 

  673. 		{
    674. 

  674. 			$called_overload .= "\t\tchar parse_parameters_string[] = \"$zend_parse_parameters_string\";\n";
    675. 

  675. 			$called_overload .= "\t\tif(zend_parse_parameters_ex(ZEND_PARSE_PARAMS_QUIET, arguments_received TSRMLS_CC, parse_parameters_string, ".trim($zend_parse_parameters, ", ")." ) == SUCCESS)\n";
    676. 

  676. 			$called_overload .= "\t\t{\n";
    677. 

  677. 			$called_overload .= $object_retrieve_code;
    678. 

  678. 			$called_overload .= "\t\t\toverload{$declaration_index}_called = true;\n";
    679. 

  679. 			$called_overload .= "\t\t\talready_called = true;\n";
    680. 

  680. 			
    681. 

  681. 			//Just get variables not originally parsed as zvals since they are references
    682. 

  682. 			if($references_found)
    683. 

  683. 			{
    684. 

  684. 				$called_overload .= "\n\t\t\tchar parse_references_string[] = \"$references_parameters_string\";\n";
    685. 

  685. 				$called_overload .= "\t\t\tzend_parse_parameters_ex(ZEND_PARSE_PARAMS_QUIET, arguments_received TSRMLS_CC, parse_references_string, ".trim($references_parameters, ", ")." );\n";
    686. 

  686. 			}
    687. 

  687. 			
    688. 

  688. 			$called_overload .= "\t\t}\n";
    689. 

  689. 		}
    690. 

  690. 		
    691. 

  691. 		$called_overload .= "\t}\n";
    692. 

  692. 		$called_overload .= "\n\t";
    693. 

  693. 	}
    694. 

  694. 	
    695. 

  695. 	return $called_overload;
    696. 

  696. }
    697. 

  697. 

  698. 

  699. 

  700. /**
    701. 

  701.  * Generates the code that calls a method, function or constructor 
    702. 

  702.  * and returns the data
    703. 

  703.  *
    704. 

  704.  * @param array $method_definitions Data for the method or function.
    705. 

  705.  * @param string $method_name Name of the function.
    706. 

  706.  * @param string $class_name Name of parent class if applicable
    707. 

  707.  * @param bool $is_constructor Flag to indicate if constructor or just a regular method.
    708. 

  708.  * 
    709. 

  709.  * @return string Generated code ready to insert on the end of 
    710. 

  710.  * the PHP_METHOD or PHP_FUNCTION body after the generated code of class_method_called_overload()
    711. 

  711.  */
    712. 

  712. function function_return($method_definitions, $method_name, $class_name=null, $is_constructor=false)
    713. 

  713. {
    714. 

  714. 	//Positions on the array of $method_definition where type and parameters data is stored
    715. 

  715. 	$function_return_types = "return_type";
    716. 

  716. 	$parameter_types = "parameters_type";
    717. 

  717. 	$parameter_names = "parameters_name";
    718. 

  718. 	$parameter_required = "parameters_required";
    719. 

  719. 	$parameter_values = "parameters_default_value";
    720. 

  720. 	
    721. 

  721. 	$return_called_overload = "";
    722. 

  722. 	
    723. 

  723. 	foreach($method_definitions as $declaration_index=>$declaration)
    724. 

  724. 	{
    725. 

  725. 		$return_called_overload .= "if(overload{$declaration_index}_called)\n";
    726. 

  726. 		$return_called_overload .= "\t{\n";
    727. 

  727. 	
    728. 

  728. 		$required_parameters = count($declaration[$parameter_required]);
    729. 

  729. 		$parameters_count = count($declaration[$parameter_types]);
    730. 

  730. 		
    731. 

  731. 		//Generate code for object arguments
    732. 

  732. 		foreach($declaration[$parameter_types] as $parameter_index=>$parameter_type)
    733. 

  733. 		{
    734. 

  734. 			$parameter_is_array = $declaration["parameters_is_array"][$parameter_index];
    735. 

  735. 			
    736. 

  736. 			$argument_type_modifier = "";
    737. 

  737. 			$standard_parameter_type = parameter_type($parameter_type, $parameter_is_array, $method_name, $class_name, $argument_type_modifier);
    738. 

  738. 			$plain_type = str_replace(array("const ", "&", "*"), "", $parameter_type);
    739. 

  739. 			
    740. 

  740. 			switch($standard_parameter_type)
    741. 

  741. 			{
    742. 

  742. 				case "bool":
    743. 

  743. 					switch($argument_type_modifier)
    744. 

  744. 					{
    745. 

  745. 						case  "const_pointer":
    746. 

  746. 							$return_called_overload .= tabs(2) . "int array_count{$declaration_index}_{$parameter_index} = 1;\n";
    747. 

  747. 							$return_called_overload .= tabs(2) . "HashTable* arr_hash{$declaration_index}_{$parameter_index};\n";
    748. 

  748. 							$return_called_overload .= tabs(2) . "if(arguments_received > $parameter_index)\n";
    749. 

  749. 							$return_called_overload .= tabs(2) . "{\n";
    750. 

  750. 							$return_called_overload .= tabs(3) . "arr_hash{$declaration_index}_{$parameter_index} = Z_ARRVAL_P(".$declaration[$parameter_names][$parameter_index] . $declaration_index.");\n";
    751. 

  751. 							$return_called_overload .= tabs(3) . "array_count{$declaration_index}_{$parameter_index} = zend_hash_num_elements(arr_hash{$declaration_index}_{$parameter_index});\n";
    752. 

  752. 							$return_called_overload .= tabs(2) . "}\n";
    753. 

  753. 							$return_called_overload .= tabs(2) . "bool* bools_array{$declaration_index}_{$parameter_index} = new bool[array_count{$declaration_index}_{$parameter_index}];\n";
    754. 

  754. 							$return_called_overload .= tabs(2) . "bool bools_continue{$declaration_index}_{$parameter_index} = true;\n\n";
    755. 

  755. 							break;
    756. 

  756. 					}
    757. 

  757. 					break;
    758. 

  758. 					
    759. 

  759. 				case "integer":
    760. 

  760. 					switch($argument_type_modifier)
    761. 

  761. 					{
    762. 

  762. 						case  "const_pointer":
    763. 

  763. 							$return_called_overload .= tabs(2) . "int array_count{$declaration_index}_{$parameter_index} = 1;\n";
    764. 

  764. 							$return_called_overload .= tabs(2) . "HashTable* arr_hash{$declaration_index}_{$parameter_index};\n";
    765. 

  765. 							$return_called_overload .= tabs(2) . "if(arguments_received > $parameter_index)\n";
    766. 

  766. 							$return_called_overload .= tabs(2) . "{\n";
    767. 

  767. 							$return_called_overload .= tabs(3) . "arr_hash{$declaration_index}_{$parameter_index} = Z_ARRVAL_P(".$declaration[$parameter_names][$parameter_index] . $declaration_index.");\n";
    768. 

  768. 							$return_called_overload .= tabs(3) . "array_count{$declaration_index}_{$parameter_index} = zend_hash_num_elements(arr_hash{$declaration_index}_{$parameter_index});\n";
    769. 

  769. 							$return_called_overload .= tabs(2) . "}\n";
    770. 

  770. 							$return_called_overload .= tabs(2) . "{$plain_type}* integers_array{$declaration_index}_{$parameter_index} = new {$plain_type}[array_count{$declaration_index}_{$parameter_index}];\n";
    771. 

  771. 							$return_called_overload .= tabs(2) . "bool integers_continue{$declaration_index}_{$parameter_index} = true;\n\n";
    772. 

  772. 							break;
    773. 

  773. 					}
    774. 

  774. 					break;
    775. 

  775. 					
    776. 

  776. 				case "float":
    777. 

  777. 					switch($argument_type_modifier)
    778. 

  778. 					{
    779. 

  779. 						case  "const_pointer":
    780. 

  780. 							$return_called_overload .= tabs(2) . "int array_count{$declaration_index}_{$parameter_index} = 1;\n";
    781. 

  781. 							$return_called_overload .= tabs(2) . "HashTable* arr_hash{$declaration_index}_{$parameter_index};\n";
    782. 

  782. 							$return_called_overload .= tabs(2) . "if(arguments_received > $parameter_index)\n";
    783. 

  783. 							$return_called_overload .= tabs(2) . "{\n";
    784. 

  784. 							$return_called_overload .= tabs(3) . "arr_hash{$declaration_index}_{$parameter_index} = Z_ARRVAL_P(".$declaration[$parameter_names][$parameter_index] . $declaration_index.");\n";
    785. 

  785. 							$return_called_overload .= tabs(3) . "array_count{$declaration_index}_{$parameter_index} = zend_hash_num_elements(arr_hash{$declaration_index}_{$parameter_index});\n";
    786. 

  786. 							$return_called_overload .= tabs(2) . "}\n";
    787. 

  787. 							$return_called_overload .= tabs(2) . "{$plain_type}* floats_array{$declaration_index}_{$parameter_index} = new {$plain_type}[array_count{$declaration_index}_{$parameter_index}];\n";
    788. 

  788. 							$return_called_overload .= tabs(2) . "bool floats_continue{$declaration_index}_{$parameter_index} = true;\n\n";
    789. 

  789. 							break;
    790. 

  790. 					}
    791. 

  791. 					break;
    792. 

  792. 					
    793. 

  793. 				case "string":
    794. 

  794. 					switch($argument_type_modifier)
    795. 

  795. 					{
    796. 

  796. 						case  "const_pointer": //const wxString* Array
    797. 

  797. 						case "const_reference_array": //const wxString&[]
    798. 

  798. 						case "const_none_array": //const wxString[]
    799. 

  799. 						case "none_array": //wxString[]
    800. 

  800. 							$return_called_overload .= tabs(2) . "int array_count{$declaration_index}_{$parameter_index} = 1;\n";
    801. 

  801. 							$return_called_overload .= tabs(2) . "HashTable* arr_hash{$declaration_index}_{$parameter_index};\n";
    802. 

  802. 							$return_called_overload .= tabs(2) . "if(arguments_received > $parameter_index)\n";
    803. 

  803. 							$return_called_overload .= tabs(2) . "{\n";
    804. 

  804. 							$return_called_overload .= tabs(3) . "arr_hash{$declaration_index}_{$parameter_index} = Z_ARRVAL_P(".$declaration[$parameter_names][$parameter_index] . $declaration_index.");\n";
    805. 

  805. 							$return_called_overload .= tabs(3) . "array_count{$declaration_index}_{$parameter_index} = zend_hash_num_elements(arr_hash{$declaration_index}_{$parameter_index});\n";
    806. 

  806. 							$return_called_overload .= tabs(2) . "}\n";
    807. 

  807. 							$return_called_overload .= tabs(2) . "wxString* strings_array{$declaration_index}_{$parameter_index} = new wxString[array_count{$declaration_index}_{$parameter_index}];\n";
    808. 

  808. 							$return_called_overload .= tabs(2) . "bool strings_continue{$declaration_index}_{$parameter_index} = true;\n\n";
    809. 

  809. 							break;
    810. 

  810. 					}
    811. 

  811. 					break;
    812. 

  812. 									
    813. 

  813. 				case "strings_array":
    814. 

  814. 					$return_called_overload .= tabs(2) . "wxArrayString strings_array{$declaration_index}_{$parameter_index};\n";
    815. 

  815. 					$return_called_overload .= tabs(2) . "bool strings_continue{$declaration_index}_{$parameter_index} = true;\n\n";
    816. 

  816. 					break;
    817. 

  817. 					
    818. 

  818. 				case "date":
    819. 

  819. 					switch($argument_type_modifier)
    820. 

  820. 					{
    821. 

  821. 						case  "const_pointer":
    822. 

  822. 							$return_called_overload .= tabs(2) . "int array_count{$declaration_index}_{$parameter_index} = 1;\n";
    823. 

  823. 							$return_called_overload .= tabs(2) . "HashTable* arr_hash{$declaration_index}_{$parameter_index};\n";
    824. 

  824. 							$return_called_overload .= tabs(2) . "if(arguments_received > $parameter_index)\n";
    825. 

  825. 							$return_called_overload .= tabs(2) . "{\n";
    826. 

  826. 							$return_called_overload .= tabs(3) . "arr_hash{$declaration_index}_{$parameter_index} = Z_ARRVAL_P(".$declaration[$parameter_names][$parameter_index] . $declaration_index.");\n";
    827. 

  827. 							$return_called_overload .= tabs(3) . "array_count{$declaration_index}_{$parameter_index} = zend_hash_num_elements(arr_hash{$declaration_index}_{$parameter_index});\n";
    828. 

  828. 							$return_called_overload .= tabs(2) . "}\n";
    829. 

  829. 							$return_called_overload .= tabs(2) . "wxDateTime* dates_array{$declaration_index}_{$parameter_index} = new wxDateTime[array_count{$declaration_index}_{$parameter_index}];\n";
    830. 

  830. 							$return_called_overload .= tabs(2) . "bool dates_continue{$declaration_index}_{$parameter_index} = true;\n\n";
    831. 

  831. 							break;
    832. 

  832. 					}
    833. 

  833. 					break;
    834. 

  834. 			}
    835. 

  835. 		}
    836. 

  836. 		
    837. 

  837. 		$return_called_overload .= "\t\tswitch(arguments_received)\n";
    838. 

  838. 		$return_called_overload .= "\t\t{\n";
    839. 

  839. 		
    840. 

  840. 		for($required_parameters; $required_parameters<=$parameters_count; $required_parameters++)
    841. 

  841. 		{	
    842. 

  842. 			$return_called_overload .= "\t\t\tcase $required_parameters:\n";
    843. 

  843. 			$return_called_overload .= "\t\t\t{\n";
    844. 

  844. 			$after_return_called_overload = ""; //Holds code that sets reference variables (* or &)
    845. 

  845. 			$after_constructor_called = ""; //Holds code to execute after a constructor was called
    846. 

  846. 			
    847. 

  847. 			$parameters_string = "";
    848. 

  848. 			
    849. 

  849. 			for($parameter_index=0; $parameter_index<$required_parameters; $parameter_index++)
    850. 

  850. 			{
    851. 

  851. 				$parameter_is_array = $declaration["parameters_is_array"][$parameter_index];
    852. 

  852. 				
    853. 

  853. 				$declaration_modifier = "";
    854. 

  854. 				$standard_parameter_type = parameter_type($declaration[$parameter_types][$parameter_index], $parameter_is_array, $method_name, $class_name, $declaration_modifier);
    855. 

  855. 				$argument_parameter_type = str_replace(array("const ", "*", "&"), "", $declaration[$parameter_types][$parameter_index]);
    856. 

  856. 				
    857. 

  857. 				//Holds the name of the variable passed to called function
    858. 

  858. 				$variable_name = $declaration[$parameter_names][$parameter_index] . $declaration_index;
    859. 

  859. 				
    860. 

  860. 				//Holds the name for the reference variable
    861. 

  861. 				$reference_name = $declaration[$parameter_names][$parameter_index] . $declaration_index . "_ref";
    862. 

  862. 				
    863. 

  863. 				switch($standard_parameter_type)
    864. 

  864. 				{
    865. 

  865. 					case	"bool":
    866. 

  866. 					{
    867. 

  867. 						switch($declaration_modifier)
    868. 

  868. 						{
    869. 

  869. 							case "pointer": //bool*
    870. 

  870. 								$parameters_string .= $variable_name . ", ";
    871. 

  871. 								break;
    872. 

  872. 								
    873. 

  873. 							case "const_pointer": //const bool* Array
    874. 

  874. 								$return_called_overload .= tabs(4) . "int array_index{$declaration_index}_{$parameter_index} = 0;\n";
    875. 

  875. 								$return_called_overload .= tabs(4) . "zval** temp_array_value{$declaration_index}_{$parameter_index} = 0;\n";
    876. 

  876. 								$return_called_overload .= tabs(4) . "while(bools_continue{$declaration_index}_{$parameter_index})\n";
    877. 

  877. 								$return_called_overload .= tabs(4) . "{\n";
    878. 

  878. 								$return_called_overload .= tabs(5) . "if(zend_hash_index_find(HASH_OF(".$variable_name."), array_index{$declaration_index}_{$parameter_index}, (void**)&temp_array_value{$declaration_index}_{$parameter_index}) == SUCCESS)\n";
    879. 

  879. 								$return_called_overload .= tabs(5) . "{\n";
    880. 

  880. 								$return_called_overload .= tabs(6) . "convert_to_boolean_ex(temp_array_value{$declaration_index}_{$parameter_index});\n";
    881. 

  881. 								$return_called_overload .= tabs(6) . "bools_array{$declaration_index}_{$parameter_index}[array_index{$declaration_index}_{$parameter_index}] = Z_BVAL_PP(temp_array_value{$declaration_index}_{$parameter_index});\n";
    882. 

  882. 								$return_called_overload .= tabs(6) . "array_index{$declaration_index}_{$parameter_index}++;\n";
    883. 

  883. 								$return_called_overload .= tabs(5) . "}\n";
    884. 

  884. 								$return_called_overload .= tabs(5) . "else\n";
    885. 

  885. 								$return_called_overload .= tabs(5) . "{\n";
    886. 

  886. 								$return_called_overload .= tabs(6) . "bools_continue{$declaration_index}_{$parameter_index} = false;\n";
    887. 

  887. 								$return_called_overload .= tabs(5) . "}\n";
    888. 

  888. 								$return_called_overload .= tabs(4) . "}\n";
    889. 

  889. 								
    890. 

  890. 								$parameters_string .= "bools_array{$declaration_index}_{$parameter_index}, ";
    891. 

  891. 								
    892. 

  892. 								$after_return_called_overload .= "\t\t\t\tdelete[] bools_array{$declaration_index}_{$parameter_index};\n";
    893. 

  893. 								break;
    894. 

  894. 								
    895. 

  895. 							case "reference": //bool&	
    896. 

  896. 								$parameters_string .= $variable_name . ", ";
    897. 

  897. 								break;
    898. 

  898. 								
    899. 

  899. 							case "const_reference": //const bool&
    900. 

  900. 							case "none": //bool
    901. 

  901. 							case "const_none": //const bool
    902. 

  902. 								$parameters_string .= $variable_name . ", ";
    903. 

  903. 								break;
    904. 

  904. 						}
    905. 

  905. 						
    906. 

  906. 						//Code to set references
    907. 

  907. 						switch($declaration_modifier)
    908. 

  908. 						{
    909. 

  909. 							case "pointer":
    910. 

  910. 								$after_return_called_overload .= "\t\t\t\tsize_t elements_returned{$declaration_index}_{$parameter_index} = sizeof($variable_name)/sizeof(*$variable_name);\n";
    911. 

  911. 								$after_return_called_overload .= "\t\t\t\tarray_init($reference_name);\n";
    912. 

  912. 								$after_return_called_overload .= "\t\t\t\tfor(size_t i=0; i<elements_returned{$declaration_index}_{$parameter_index}; i++)\n";
    913. 

  913. 								$after_return_called_overload .= "\t\t\t\t{\n";
    914. 

  914. 								$after_return_called_overload .= "\t\t\t\t\tadd_next_index_long($reference_name, {$variable_name}[i]);\n";
    915. 

  915. 								$after_return_called_overload .= "\t\t\t\t}\n";
    916. 

  916. 								break;
    917. 

  917. 								
    918. 

  918. 							case "reference":
    919. 

  919. 								$after_return_called_overload .= "\t\t\t\tZVAL_BOOL($reference_name, $variable_name);\n";
    920. 

  920. 								break;	
    921. 

  921. 						}
    922. 

  922. 						break;
    923. 

  923. 					}
    924. 

  924. 					case	"integer":
    925. 

  925. 					case	"class_enum":
    926. 

  926. 					case	"global_enum":
    927. 

  927. 					{
    928. 

  928. 						$integer_type = $class_enum.$declaration[$parameter_types][$parameter_index];
    929. 

  929. 						
    930. 

  930. 						if($enum_class = enum_parent_class($argument_parameter_type))
    931. 

  931. 						{
    932. 

  932. 							if("".strpos($integer_type, "$enum_class::")."" == "")
    933. 

  933. 								$integer_type = str_replace($argument_parameter_type, "$enum_class::$argument_parameter_type", $integer_type);
    934. 

  934. 						}
    935. 

  935. 							
    936. 

  936. 						switch($declaration_modifier)
    937. 

  937. 						{
    938. 

  938. 							case "pointer": //integer*
    939. 

  939. 								$parameters_string .= "(".$integer_type.") " . $variable_name . ", ";
    940. 

  940. 								break;
    941. 

  941. 								
    942. 

  942. 							case "const_pointer": //const integer* Array
    943. 

  943. 								$return_called_overload .= tabs(4) . "int array_index{$declaration_index}_{$parameter_index} = 0;\n";
    944. 

  944. 								$return_called_overload .= tabs(4) . "zval** temp_array_value{$declaration_index}_{$parameter_index} = 0;\n";
    945. 

  945. 								$return_called_overload .= tabs(4) . "while(integers_continue{$declaration_index}_{$parameter_index})\n";
    946. 

  946. 								$return_called_overload .= tabs(4) . "{\n";
    947. 

  947. 								$return_called_overload .= tabs(5) . "if(zend_hash_index_find(HASH_OF(".$variable_name."), array_index{$declaration_index}_{$parameter_index}, (void**)&temp_array_value{$declaration_index}_{$parameter_index}) == SUCCESS)\n";
    948. 

  948. 								$return_called_overload .= tabs(5) . "{\n";
    949. 

  949. 								$return_called_overload .= tabs(6) . "convert_to_long_ex(temp_array_value{$declaration_index}_{$parameter_index});\n";
    950. 

  950. 								$return_called_overload .= tabs(6) . "integers_array{$declaration_index}_{$parameter_index}[array_index{$declaration_index}_{$parameter_index}] = ($argument_parameter_type) Z_LVAL_PP(temp_array_value{$declaration_index}_{$parameter_index});\n";
    951. 

  951. 								$return_called_overload .= tabs(6) . "array_index{$declaration_index}_{$parameter_index}++;\n";
    952. 

  952. 								$return_called_overload .= tabs(5) . "}\n";
    953. 

  953. 								$return_called_overload .= tabs(5) . "else\n";
    954. 

  954. 								$return_called_overload .= tabs(5) . "{\n";
    955. 

  955. 								$return_called_overload .= tabs(6) . "integers_continue{$declaration_index}_{$parameter_index} = false;\n";
    956. 

  956. 								$return_called_overload .= tabs(5) . "}\n";
    957. 

  957. 								$return_called_overload .= tabs(4) . "}\n";
    958. 

  958. 								
    959. 

  959. 								$parameters_string .= "(".$integer_type.") " . "integers_array{$declaration_index}_{$parameter_index}, ";
    960. 

  960. 								
    961. 

  961. 								$after_return_called_overload .= "\t\t\t\tdelete[] integers_array{$declaration_index}_{$parameter_index};\n";
    962. 

  962. 								break;
    963. 

  963. 								
    964. 

  964. 							case "reference": //integer&	
    965. 

  965. 								$parameters_string .= "(".$integer_type.") " . $variable_name . ", ";
    966. 

  966. 								break;
    967. 

  967. 								
    968. 

  968. 							case "const_reference": //const integer&
    969. 

  969. 							case "none": //integer
    970. 

  970. 							case "const_none": //const integer
    971. 

  971. 								$parameters_string .= "(".$integer_type.") " . $variable_name . ", ";
    972. 

  972. 								break;
    973. 

  973. 						}
    974. 

  974. 						
    975. 

  975. 						//Code to set references
    976. 

  976. 						switch($declaration_modifier)
    977. 

  977. 						{
    978. 

  978. 							case "pointer":
    979. 

  979. 								$after_return_called_overload .= "\t\t\t\tsize_t elements_returned{$declaration_index}_{$parameter_index} = sizeof($variable_name)/sizeof(*$variable_name);\n";
    980. 

  980. 								$after_return_called_overload .= "\t\t\t\tarray_init($reference_name);\n";
    981. 

  981. 								$after_return_called_overload .= "\t\t\t\tfor(size_t i=0; i<elements_returned{$declaration_index}_{$parameter_index}; i++)\n";
    982. 

  982. 								$after_return_called_overload .= "\t\t\t\t{\n";
    983. 

  983. 								$after_return_called_overload .= "\t\t\t\t\tadd_next_index_long($reference_name, {$variable_name}[i]);\n";
    984. 

  984. 								$after_return_called_overload .= "\t\t\t\t}\n";
    985. 

  985. 								break;
    986. 

  986. 								
    987. 

  987. 							case "reference":
    988. 

  988. 								$after_return_called_overload .= "\t\t\t\tZVAL_LONG($reference_name, $variable_name);\n";
    989. 

  989. 								break;	
    990. 

  990. 						}
    991. 

  991. 						break;
    992. 

  992. 					}
    993. 

  993. 					case	"float":
    994. 

  994. 					{
    995. 

  995. 						switch($declaration_modifier)
    996. 

  996. 						{
    997. 

  997. 							case "pointer": //double*
    998. 

  998. 								$parameters_string .= $variable_name . ", ";
    999. 

  999. 								break;
    1000. 

  1000. 								
    1001. 

  1001. 							case "const_pointer": //const double* Array
    1002. 

  1002. 								$return_called_overload .= tabs(4) . "int array_index{$declaration_index}_{$parameter_index} = 0;\n";
    1003. 

  1003. 								$return_called_overload .= tabs(4) . "zval** temp_array_value{$declaration_index}_{$parameter_index} = 0;\n";
    1004. 

  1004. 								$return_called_overload .= tabs(4) . "while(floats_continue{$declaration_index}_{$parameter_index})\n";
    1005. 

  1005. 								$return_called_overload .= tabs(4) . "{\n";
    1006. 

  1006. 								$return_called_overload .= tabs(5) . "if(zend_hash_index_find(HASH_OF(".$variable_name."), array_index{$declaration_index}_{$parameter_index}, (void**)&temp_array_value{$declaration_index}_{$parameter_index}) == SUCCESS)\n";
    1007. 

  1007. 								$return_called_overload .= tabs(5) . "{\n";
    1008. 

  1008. 								$return_called_overload .= tabs(6) . "convert_to_double_ex(temp_array_value{$declaration_index}_{$parameter_index});\n";
    1009. 

  1009. 								$return_called_overload .= tabs(6) . "floats_array{$declaration_index}_{$parameter_index}[array_index{$declaration_index}_{$parameter_index}] = ($argument_parameter_type) Z_DVAL_PP(temp_array_value{$declaration_index}_{$parameter_index});\n";
    1010. 

  1010. 								$return_called_overload .= tabs(6) . "array_index{$declaration_index}_{$parameter_index}++;\n";
    1011. 

  1011. 								$return_called_overload .= tabs(5) . "}\n";
    1012. 

  1012. 								$return_called_overload .= tabs(5) . "else\n";
    1013. 

  1013. 								$return_called_overload .= tabs(5) . "{\n";
    1014. 

  1014. 								$return_called_overload .= tabs(6) . "floats_continue{$declaration_index}_{$parameter_index} = false;\n";
    1015. 

  1015. 								$return_called_overload .= tabs(5) . "}\n";
    1016. 

  1016. 								$return_called_overload .= tabs(4) . "}\n";
    1017. 

  1017. 								
    1018. 

  1018. 								$parameters_string .= "(".$declaration[$parameter_types][$parameter_index].") " . "floats_array{$declaration_index}_{$parameter_index}, ";
    1019. 

  1019. 								
    1020. 

  1020. 								$after_return_called_overload .= "\t\t\t\tdelete[] floats_array{$declaration_index}_{$parameter_index};\n";
    1021. 

  1021. 								break;
    1022. 

  1022. 								
    1023. 

  1023. 							case "reference": //double&	
    1024. 

  1024. 								$parameters_string .= $variable_name . ", ";
    1025. 

  1025. 								break;
    1026. 

  1026. 								
    1027. 

  1027. 							case "const_reference": //const double&
    1028. 

  1028. 							case "none": //double
    1029. 

  1029. 							case "const_none": //const double
    1030. 

  1030. 								$parameters_string .= $variable_name . ", ";
    1031. 

  1031. 								break;
    1032. 

  1032. 						}
    1033. 

  1033. 						
    1034. 

  1034. 						//Code to set references
    1035. 

  1035. 						switch($declaration_modifier)
    1036. 

  1036. 						{
    1037. 

  1037. 							case "pointer":
    1038. 

  1038. 								$after_return_called_overload .= "\t\t\t\tsize_t elements_returned{$declaration_index}_{$parameter_index} = sizeof($variable_name)/sizeof(*$variable_name);\n";
    1039. 

  1039. 								$after_return_called_overload .= "\t\t\t\tarray_init($reference_name);\n";
    1040. 

  1040. 								$after_return_called_overload .= "\t\t\t\tfor(size_t i=0; i<elements_returned{$declaration_index}_{$parameter_index}; i++)\n";
    1041. 

  1041. 								$after_return_called_overload .= "\t\t\t\t{\n";
    1042. 

  1042. 								$after_return_called_overload .= "\t\t\t\t\tadd_next_index_long($reference_name, {$variable_name}[i]);\n";
    1043. 

  1043. 								$after_return_called_overload .= "\t\t\t\t}\n";
    1044. 

  1044. 								break;
    1045. 

  1045. 								
    1046. 

  1046. 							case "reference":
    1047. 

  1047. 								$after_return_called_overload .= "\t\t\t\tZVAL_DOUBLE($reference_name, $variable_name);\n";
    1048. 

  1048. 								break;	
    1049. 

  1049. 						}
    1050. 

  1050. 						break;
    1051. 

  1051. 					}
    1052. 

  1052. 					case	"characters":
    1053. 

  1053. 					{
    1054. 

  1054. 						switch($declaration_modifier)
    1055. 

  1055. 						{
    1056. 

  1056. 							case "pointer": //char* Array with reference
    1057. 

  1057. 							case "const_pointer": //const char* Array
    1058. 

  1058. 								$parameters_string .= $variable_name . ", ";
    1059. 

  1059. 								break;
    1060. 

  1060. 								
    1061. 

  1061. 							case "reference": //char&	
    1062. 

  1062. 								$parameters_string .= "(".$declaration[$parameter_types][$parameter_index].") " . $variable_name . ", ";
    1063. 

  1063. 								break;
    1064. 

  1064. 								
    1065. 

  1065. 							case "const_reference": //const char&
    1066. 

  1066. 							case "none": //char
    1067. 

  1067. 							case "const_none": //const char
    1068. 

  1068. 								$parameters_string .= "(".$declaration[$parameter_types][$parameter_index].") " . $variable_name . ", ";
    1069. 

  1069. 								break;
    1070. 

  1070. 						}
    1071. 

  1071. 						
    1072. 

  1072. 						//Code to set references
    1073. 

  1073. 						switch($declaration_modifier)
    1074. 

  1074. 						{
    1075. 

  1075. 							case "pointer":
    1076. 

  1076. 								$after_return_called_overload .= "\t\t\t\tZVAL_STRING($reference_name, $variable_name, 1);\n";
    1077. 

  1077. 								break;
    1078. 

  1078. 								
    1079. 

  1079. 							case "reference":
    1080. 

  1080. 								$after_return_called_overload .= "\t\t\t\tZVAL_LON
    1081.