PageRenderTime 55ms CodeModel.GetById 14ms RepoModel.GetById 1ms app.codeStats 1ms

/php5/ext/mbstring/mbstring.c

http://github.com/vpj/PHP-Extension-API
C | 4894 lines | 3937 code | 551 blank | 406 comment | 1119 complexity | 5d03371e366ee3b8905913514bf2535b MD5 | raw file
Possible License(s): MPL-2.0-no-copyleft-exception, LGPL-2.1, BSD-3-Clause

Large files files are truncated, but you can click here to view the full file

    

  1. /*
    2. 

  2.    +----------------------------------------------------------------------+
    3. 

  3.    | PHP Version 5                                                        |
    4. 

  4.    +----------------------------------------------------------------------+
    5. 

  5.    | Copyright (c) 1997-2009 The PHP Group                                |
    6. 

  6.    +----------------------------------------------------------------------+
    7. 

  7.    | This source file is subject to version 3.01 of the PHP license,      |
    8. 

  8.    | that is bundled with this package in the file LICENSE, and is        |
    9. 

  9.    | available through the world-wide-web at the following url:           |
    10. 

  10.    | http://www.php.net/license/3_01.txt                                  |
    11. 

  11.    | If you did not receive a copy of the PHP license and are unable to   |
    12. 

  12.    | obtain it through the world-wide-web, please send a note to          |
    13. 

  13.    | license@php.net so we can mail you a copy immediately.               |
    14. 

  14.    +----------------------------------------------------------------------+
    15. 

  15.    | Author: Tsukada Takuya <tsukada@fminn.nagano.nagano.jp>              |
    16. 

  16.    |         Rui Hirokawa <hirokawa@php.net>                              |
    17. 

  17.    +----------------------------------------------------------------------+
    18. 

  18.  */
    19. 

  19. 

  20. /* $Id: mbstring.c,v 1.224.2.22.2.25.2.53 2009/04/20 16:07:59 jani Exp $ */
    21. 

  21. 

  22. /*
    23. 

  23.  * PHP 4 Multibyte String module "mbstring"
    24. 

  24.  *
    25. 

  25.  * History:
    26. 

  26.  *   2000.5.19  Release php-4.0RC2_jstring-1.0
    27. 

  27.  *   2001.4.1   Release php4_jstring-1.0.91
    28. 

  28.  *   2001.4.30  Release php4_jstring-1.1 (contribute to The PHP Group)
    29. 

  29.  *   2001.5.1   Renamed from jstring to mbstring (hirokawa@php.net)
    30. 

  30.  */
    31. 

  31. 

  32. /*
    33. 

  33.  * PHP3 Internationalization support program.
    34. 

  34.  *
    35. 

  35.  * Copyright (c) 1999,2000 by the PHP3 internationalization team.
    36. 

  36.  * All rights reserved.
    37. 

  37.  *
    38. 

  38.  * See README_PHP3-i18n-ja for more detail.
    39. 

  39.  *
    40. 

  40.  * Authors:
    41. 

  41.  *    Hironori Sato <satoh@jpnnet.com>
    42. 

  42.  *    Shigeru Kanemoto <sgk@happysize.co.jp>
    43. 

  43.  *    Tsukada Takuya <tsukada@fminn.nagano.nagano.jp>
    44. 

  44.  *    Rui Hirokawa <rui_hirokawa@ybb.ne.jp>
    45. 

  45.  */
    46. 

  46. 

  47. /* {{{ includes */
    48. 

  48. #ifdef HAVE_CONFIG_H
    49. 

  49. #include "config.h"
    50. 

  50. #endif
    51. 

  51. 

  52. #include "php.h"
    53. 

  53. #include "php_ini.h"
    54. 

  54. #include "php_variables.h"
    55. 

  55. #include "mbstring.h"
    56. 

  56. #include "ext/standard/php_string.h"
    57. 

  57. #include "ext/standard/php_mail.h"
    58. 

  58. #include "ext/standard/exec.h"
    59. 

  59. #include "ext/standard/php_smart_str.h"
    60. 

  60. #include "ext/standard/url.h"
    61. 

  61. #include "main/php_output.h"
    62. 

  62. #include "ext/standard/info.h"
    63. 

  63. 

  64. #include "libmbfl/mbfl/mbfl_allocators.h"
    65. 

  65. 

  66. #include "php_variables.h"
    67. 

  67. #include "php_globals.h"
    68. 

  68. #include "rfc1867.h"
    69. 

  69. #include "php_content_types.h"
    70. 

  70. #include "SAPI.h"
    71. 

  71. #include "php_unicode.h"
    72. 

  72. #include "TSRM.h"
    73. 

  73. 

  74. #include "mb_gpc.h"
    75. 

  75. 

  76. #if HAVE_MBREGEX
    77. 

  77. #include "php_mbregex.h"
    78. 

  78. #endif
    79. 

  79. 

  80. #ifdef ZEND_MULTIBYTE
    81. 

  81. #include "zend_multibyte.h"
    82. 

  82. #endif /* ZEND_MULTIBYTE */
    83. 

  83. 

  84. #if HAVE_ONIG
    85. 

  85. #include "php_onig_compat.h"
    86. 

  86. #include <oniguruma.h>
    87. 

  87. #undef UChar
    88. 

  88. #elif HAVE_PCRE || HAVE_BUNDLED_PCRE
    89. 

  89. #include "ext/pcre/php_pcre.h"
    90. 

  90. #endif
    91. 

  91. /* }}} */
    92. 

  92. 

  93. #if HAVE_MBSTRING
    94. 

  94. 

  95. /* {{{ prototypes */
    96. 

  96. ZEND_DECLARE_MODULE_GLOBALS(mbstring)
    97. 

  97. static PHP_GINIT_FUNCTION(mbstring);
    98. 

  98. static PHP_GSHUTDOWN_FUNCTION(mbstring);
    99. 

  99. /* }}} */
    100. 

  100. 

  101. /* {{{ php_mb_default_identify_list */
    102. 

  102. typedef struct _php_mb_nls_ident_list {
    103. 

  103. 	enum mbfl_no_language lang;
    104. 

  104. 	const enum mbfl_no_encoding* list;
    105. 

  105. 	int list_size;
    106. 

  106. } php_mb_nls_ident_list;
    107. 

  107. 

  108. static const enum mbfl_no_encoding php_mb_default_identify_list_ja[] = {
    109. 

  109. 	mbfl_no_encoding_ascii,
    110. 

  110. 	mbfl_no_encoding_jis,
    111. 

  111. 	mbfl_no_encoding_utf8,
    112. 

  112. 	mbfl_no_encoding_euc_jp,
    113. 

  113. 	mbfl_no_encoding_sjis
    114. 

  114. };
    115. 

  115. 

  116. static const enum mbfl_no_encoding php_mb_default_identify_list_cn[] = {
    117. 

  117. 	mbfl_no_encoding_ascii,
    118. 

  118. 	mbfl_no_encoding_utf8,
    119. 

  119. 	mbfl_no_encoding_euc_cn,
    120. 

  120. 	mbfl_no_encoding_cp936
    121. 

  121. };
    122. 

  122. 

  123. static const enum mbfl_no_encoding php_mb_default_identify_list_tw_hk[] = {
    124. 

  124. 	mbfl_no_encoding_ascii,
    125. 

  125. 	mbfl_no_encoding_utf8,
    126. 

  126. 	mbfl_no_encoding_euc_tw,
    127. 

  127. 	mbfl_no_encoding_big5
    128. 

  128. };
    129. 

  129. 

  130. static const enum mbfl_no_encoding php_mb_default_identify_list_kr[] = {
    131. 

  131. 	mbfl_no_encoding_ascii,
    132. 

  132. 	mbfl_no_encoding_utf8,
    133. 

  133. 	mbfl_no_encoding_euc_kr,
    134. 

  134. 	mbfl_no_encoding_uhc
    135. 

  135. };
    136. 

  136. 

  137. static const enum mbfl_no_encoding php_mb_default_identify_list_ru[] = {
    138. 

  138. 	mbfl_no_encoding_ascii,
    139. 

  139. 	mbfl_no_encoding_utf8,
    140. 

  140. 	mbfl_no_encoding_koi8r,
    141. 

  141. 	mbfl_no_encoding_cp1251,
    142. 

  142. 	mbfl_no_encoding_cp866
    143. 

  143. };
    144. 

  144. 

  145. static const enum mbfl_no_encoding php_mb_default_identify_list_hy[] = {
    146. 

  146. 	mbfl_no_encoding_ascii,
    147. 

  147. 	mbfl_no_encoding_utf8,
    148. 

  148. 	mbfl_no_encoding_armscii8
    149. 

  149. };
    150. 

  150. 

  151. static const enum mbfl_no_encoding php_mb_default_identify_list_tr[] = {
    152. 

  152. 	mbfl_no_encoding_ascii,
    153. 

  153. 	mbfl_no_encoding_utf8,
    154. 

  154. 	mbfl_no_encoding_cp1254,
    155. 

  155. 	mbfl_no_encoding_8859_9
    156. 

  156. };
    157. 

  157. 

  158. static const enum mbfl_no_encoding php_mb_default_identify_list_ua[] = {
    159. 

  159. 	mbfl_no_encoding_ascii,
    160. 

  160. 	mbfl_no_encoding_utf8,
    161. 

  161. 	mbfl_no_encoding_koi8u
    162. 

  162. };
    163. 

  163. 

  164. static const enum mbfl_no_encoding php_mb_default_identify_list_neut[] = {
    165. 

  165. 	mbfl_no_encoding_ascii,
    166. 

  166. 	mbfl_no_encoding_utf8
    167. 

  167. };
    168. 

  168. 

  169. 

  170. static const php_mb_nls_ident_list php_mb_default_identify_list[] = {
    171. 

  171. 	{ mbfl_no_language_japanese, php_mb_default_identify_list_ja, sizeof(php_mb_default_identify_list_ja) / sizeof(php_mb_default_identify_list_ja[0]) },
    172. 

  172. 	{ mbfl_no_language_korean, php_mb_default_identify_list_kr, sizeof(php_mb_default_identify_list_kr) / sizeof(php_mb_default_identify_list_kr[0]) },
    173. 

  173. 	{ mbfl_no_language_traditional_chinese, php_mb_default_identify_list_tw_hk, sizeof(php_mb_default_identify_list_tw_hk) / sizeof(php_mb_default_identify_list_tw_hk[0]) },
    174. 

  174. 	{ mbfl_no_language_simplified_chinese, php_mb_default_identify_list_cn, sizeof(php_mb_default_identify_list_cn) / sizeof(php_mb_default_identify_list_cn[0]) },
    175. 

  175. 	{ mbfl_no_language_russian, php_mb_default_identify_list_ru, sizeof(php_mb_default_identify_list_ru) / sizeof(php_mb_default_identify_list_ru[0]) },
    176. 

  176. 	{ mbfl_no_language_armenian, php_mb_default_identify_list_hy, sizeof(php_mb_default_identify_list_hy) / sizeof(php_mb_default_identify_list_hy[0]) },
    177. 

  177. 	{ mbfl_no_language_turkish, php_mb_default_identify_list_tr, sizeof(php_mb_default_identify_list_tr) / sizeof(php_mb_default_identify_list_tr[0]) },
    178. 

  178. 	{ mbfl_no_language_ukrainian, php_mb_default_identify_list_ua, sizeof(php_mb_default_identify_list_ua) / sizeof(php_mb_default_identify_list_ua[0]) },
    179. 

  179. 	{ mbfl_no_language_neutral, php_mb_default_identify_list_neut, sizeof(php_mb_default_identify_list_neut) / sizeof(php_mb_default_identify_list_neut[0]) }
    180. 

  180. };
    181. 

  181. 

  182. /* }}} */
    183. 

  183. 

  184. /* {{{ mb_overload_def mb_ovld[] */
    185. 

  185. static const struct mb_overload_def mb_ovld[] = {
    186. 

  186. 	{MB_OVERLOAD_MAIL, "mail", "mb_send_mail", "mb_orig_mail"},
    187. 

  187. 	{MB_OVERLOAD_STRING, "strlen", "mb_strlen", "mb_orig_strlen"},
    188. 

  188. 	{MB_OVERLOAD_STRING, "strpos", "mb_strpos", "mb_orig_strpos"},
    189. 

  189. 	{MB_OVERLOAD_STRING, "strrpos", "mb_strrpos", "mb_orig_strrpos"},
    190. 

  190. 	{MB_OVERLOAD_STRING, "stripos", "mb_stripos", "mb_orig_stripos"},
    191. 

  191. 	{MB_OVERLOAD_STRING, "strripos", "mb_strripos", "mb_orig_stripos"},
    192. 

  192. 	{MB_OVERLOAD_STRING, "strstr", "mb_strstr", "mb_orig_strstr"},
    193. 

  193. 	{MB_OVERLOAD_STRING, "strrchr", "mb_strrchr", "mb_orig_strrchr"},
    194. 

  194. 	{MB_OVERLOAD_STRING, "stristr", "mb_stristr", "mb_orig_stristr"},
    195. 

  195. 	{MB_OVERLOAD_STRING, "substr", "mb_substr", "mb_orig_substr"},
    196. 

  196. 	{MB_OVERLOAD_STRING, "strtolower", "mb_strtolower", "mb_orig_strtolower"},
    197. 

  197. 	{MB_OVERLOAD_STRING, "strtoupper", "mb_strtoupper", "mb_orig_strtoupper"},
    198. 

  198. 	{MB_OVERLOAD_STRING, "substr_count", "mb_substr_count", "mb_orig_substr_count"},
    199. 

  199. #if HAVE_MBREGEX
    200. 

  200. 	{MB_OVERLOAD_REGEX, "ereg", "mb_ereg", "mb_orig_ereg"},
    201. 

  201. 	{MB_OVERLOAD_REGEX, "eregi", "mb_eregi", "mb_orig_eregi"},
    202. 

  202. 	{MB_OVERLOAD_REGEX, "ereg_replace", "mb_ereg_replace", "mb_orig_ereg_replace"},
    203. 

  203. 	{MB_OVERLOAD_REGEX, "eregi_replace", "mb_eregi_replace", "mb_orig_eregi_replace"},
    204. 

  204. 	{MB_OVERLOAD_REGEX, "split", "mb_split", "mb_orig_split"},
    205. 

  205. #endif
    206. 

  206. 	{0, NULL, NULL, NULL}
    207. 

  207. }; 
    208. 

  208. /* }}} */
    209. 

  209. 

  210. /* {{{ arginfo */
    211. 

  211. ZEND_BEGIN_ARG_INFO_EX(arginfo_mb_language, 0, 0, 0)
    212. 

  212. 	ZEND_ARG_INFO(0, language)
    213. 

  213. ZEND_END_ARG_INFO()
    214. 

  214. 

  215. ZEND_BEGIN_ARG_INFO_EX(arginfo_mb_internal_encoding, 0, 0, 0)
    216. 

  216. 	ZEND_ARG_INFO(0, encoding)
    217. 

  217. ZEND_END_ARG_INFO()
    218. 

  218. 

  219. ZEND_BEGIN_ARG_INFO_EX(arginfo_mb_http_input, 0, 0, 0)
    220. 

  220. 	ZEND_ARG_INFO(0, type)
    221. 

  221. ZEND_END_ARG_INFO()
    222. 

  222. 

  223. ZEND_BEGIN_ARG_INFO_EX(arginfo_mb_http_output, 0, 0, 0)
    224. 

  224. 	ZEND_ARG_INFO(0, encoding)
    225. 

  225. ZEND_END_ARG_INFO()
    226. 

  226. 

  227. ZEND_BEGIN_ARG_INFO_EX(arginfo_mb_detect_order, 0, 0, 0)
    228. 

  228. 	ZEND_ARG_INFO(0, encoding)
    229. 

  229. ZEND_END_ARG_INFO()
    230. 

  230. 

  231. ZEND_BEGIN_ARG_INFO_EX(arginfo_mb_substitute_character, 0, 0, 0)
    232. 

  232. 	ZEND_ARG_INFO(0, substchar)
    233. 

  233. ZEND_END_ARG_INFO()
    234. 

  234. 

  235. ZEND_BEGIN_ARG_INFO_EX(arginfo_mb_preferred_mime_name, 0, 0, 1)
    236. 

  236. 	ZEND_ARG_INFO(0, encoding)
    237. 

  237. ZEND_END_ARG_INFO()
    238. 

  238. 

  239. ZEND_BEGIN_ARG_INFO_EX(arginfo_mb_parse_str, 0, 0, 1)
    240. 

  240. 	ZEND_ARG_INFO(0, encoded_string)
    241. 

  241. 	ZEND_ARG_INFO(1, result)
    242. 

  242. ZEND_END_ARG_INFO()
    243. 

  243. 

  244. ZEND_BEGIN_ARG_INFO_EX(arginfo_mb_output_handler, 0, 0, 2)
    245. 

  245. 	ZEND_ARG_INFO(0, contents)
    246. 

  246. 	ZEND_ARG_INFO(0, status)
    247. 

  247. ZEND_END_ARG_INFO()
    248. 

  248. 

  249. ZEND_BEGIN_ARG_INFO_EX(arginfo_mb_strlen, 0, 0, 1)
    250. 

  250. 	ZEND_ARG_INFO(0, str)
    251. 

  251. 	ZEND_ARG_INFO(0, encoding)
    252. 

  252. ZEND_END_ARG_INFO()
    253. 

  253. 

  254. ZEND_BEGIN_ARG_INFO_EX(arginfo_mb_strpos, 0, 0, 2)
    255. 

  255. 	ZEND_ARG_INFO(0, haystack)
    256. 

  256. 	ZEND_ARG_INFO(0, needle)
    257. 

  257. 	ZEND_ARG_INFO(0, offset)
    258. 

  258. 	ZEND_ARG_INFO(0, encoding)
    259. 

  259. ZEND_END_ARG_INFO()
    260. 

  260. 

  261. ZEND_BEGIN_ARG_INFO_EX(arginfo_mb_strrpos, 0, 0, 2)
    262. 

  262. 	ZEND_ARG_INFO(0, haystack)
    263. 

  263. 	ZEND_ARG_INFO(0, needle)
    264. 

  264. 	ZEND_ARG_INFO(0, offset)
    265. 

  265. 	ZEND_ARG_INFO(0, encoding)
    266. 

  266. ZEND_END_ARG_INFO()
    267. 

  267. 

  268. ZEND_BEGIN_ARG_INFO_EX(arginfo_mb_stripos, 0, 0, 2)
    269. 

  269. 	ZEND_ARG_INFO(0, haystack)
    270. 

  270. 	ZEND_ARG_INFO(0, needle)
    271. 

  271. 	ZEND_ARG_INFO(0, offset)
    272. 

  272. 	ZEND_ARG_INFO(0, encoding)
    273. 

  273. ZEND_END_ARG_INFO()
    274. 

  274. 

  275. ZEND_BEGIN_ARG_INFO_EX(arginfo_mb_strripos, 0, 0, 2)
    276. 

  276. 	ZEND_ARG_INFO(0, haystack)
    277. 

  277. 	ZEND_ARG_INFO(0, needle)
    278. 

  278. 	ZEND_ARG_INFO(0, offset)
    279. 

  279. 	ZEND_ARG_INFO(0, encoding)
    280. 

  280. ZEND_END_ARG_INFO()
    281. 

  281. 

  282. ZEND_BEGIN_ARG_INFO_EX(arginfo_mb_strstr, 0, 0, 2)
    283. 

  283. 	ZEND_ARG_INFO(0, haystack)
    284. 

  284. 	ZEND_ARG_INFO(0, needle)
    285. 

  285. 	ZEND_ARG_INFO(0, part)
    286. 

  286. 	ZEND_ARG_INFO(0, encoding)
    287. 

  287. ZEND_END_ARG_INFO()
    288. 

  288. 

  289. ZEND_BEGIN_ARG_INFO_EX(arginfo_mb_strrchr, 0, 0, 2)
    290. 

  290. 	ZEND_ARG_INFO(0, haystack)
    291. 

  291. 	ZEND_ARG_INFO(0, needle)
    292. 

  292. 	ZEND_ARG_INFO(0, part)
    293. 

  293. 	ZEND_ARG_INFO(0, encoding)
    294. 

  294. ZEND_END_ARG_INFO()
    295. 

  295. 

  296. ZEND_BEGIN_ARG_INFO_EX(arginfo_mb_stristr, 0, 0, 2)
    297. 

  297. 	ZEND_ARG_INFO(0, haystack)
    298. 

  298. 	ZEND_ARG_INFO(0, needle)
    299. 

  299. 	ZEND_ARG_INFO(0, part)
    300. 

  300. 	ZEND_ARG_INFO(0, encoding)
    301. 

  301. ZEND_END_ARG_INFO()
    302. 

  302. 

  303. ZEND_BEGIN_ARG_INFO_EX(arginfo_mb_strrichr, 0, 0, 2)
    304. 

  304. 	ZEND_ARG_INFO(0, haystack)
    305. 

  305. 	ZEND_ARG_INFO(0, needle)
    306. 

  306. 	ZEND_ARG_INFO(0, part)
    307. 

  307. 	ZEND_ARG_INFO(0, encoding)
    308. 

  308. ZEND_END_ARG_INFO()
    309. 

  309. 

  310. ZEND_BEGIN_ARG_INFO_EX(arginfo_mb_substr_count, 0, 0, 2)
    311. 

  311. 	ZEND_ARG_INFO(0, haystack)
    312. 

  312. 	ZEND_ARG_INFO(0, needle)
    313. 

  313. 	ZEND_ARG_INFO(0, encoding)
    314. 

  314. ZEND_END_ARG_INFO()
    315. 

  315. 

  316. ZEND_BEGIN_ARG_INFO_EX(arginfo_mb_substr, 0, 0, 2)
    317. 

  317. 	ZEND_ARG_INFO(0, str)
    318. 

  318. 	ZEND_ARG_INFO(0, start)
    319. 

  319. 	ZEND_ARG_INFO(0, length)
    320. 

  320. 	ZEND_ARG_INFO(0, encoding)
    321. 

  321. ZEND_END_ARG_INFO()
    322. 

  322. 

  323. ZEND_BEGIN_ARG_INFO_EX(arginfo_mb_strcut, 0, 0, 2)
    324. 

  324. 	ZEND_ARG_INFO(0, str)
    325. 

  325. 	ZEND_ARG_INFO(0, start)
    326. 

  326. 	ZEND_ARG_INFO(0, length)
    327. 

  327. 	ZEND_ARG_INFO(0, encoding)
    328. 

  328. ZEND_END_ARG_INFO()
    329. 

  329. 

  330. ZEND_BEGIN_ARG_INFO_EX(arginfo_mb_strwidth, 0, 0, 1)
    331. 

  331. 	ZEND_ARG_INFO(0, str)
    332. 

  332. 	ZEND_ARG_INFO(0, encoding)
    333. 

  333. ZEND_END_ARG_INFO()
    334. 

  334. 

  335. ZEND_BEGIN_ARG_INFO_EX(arginfo_mb_strimwidth, 0, 0, 3)
    336. 

  336. 	ZEND_ARG_INFO(0, str)
    337. 

  337. 	ZEND_ARG_INFO(0, start)
    338. 

  338. 	ZEND_ARG_INFO(0, width)
    339. 

  339. 	ZEND_ARG_INFO(0, trimmarker)
    340. 

  340. 	ZEND_ARG_INFO(0, encoding)
    341. 

  341. ZEND_END_ARG_INFO()
    342. 

  342. 

  343. ZEND_BEGIN_ARG_INFO_EX(arginfo_mb_convert_encoding, 0, 0, 2)
    344. 

  344. 	ZEND_ARG_INFO(0, str)
    345. 

  345. 	ZEND_ARG_INFO(0, to)
    346. 

  346. 	ZEND_ARG_INFO(0, from)
    347. 

  347. ZEND_END_ARG_INFO()
    348. 

  348. 

  349. ZEND_BEGIN_ARG_INFO_EX(arginfo_mb_convert_case, 0, 0, 2)
    350. 

  350. 	ZEND_ARG_INFO(0, sourcestring)
    351. 

  351. 	ZEND_ARG_INFO(0, mode)
    352. 

  352. 	ZEND_ARG_INFO(0, encoding)
    353. 

  353. ZEND_END_ARG_INFO()
    354. 

  354. 

  355. ZEND_BEGIN_ARG_INFO_EX(arginfo_mb_strtoupper, 0, 0, 1)
    356. 

  356. 	ZEND_ARG_INFO(0, sourcestring)
    357. 

  357. 	ZEND_ARG_INFO(0, encoding)
    358. 

  358. ZEND_END_ARG_INFO()
    359. 

  359. 

  360. ZEND_BEGIN_ARG_INFO_EX(arginfo_mb_strtolower, 0, 0, 1)
    361. 

  361. 	ZEND_ARG_INFO(0, sourcestring)
    362. 

  362. 	ZEND_ARG_INFO(0, encoding)
    363. 

  363. ZEND_END_ARG_INFO()
    364. 

  364. 

  365. ZEND_BEGIN_ARG_INFO_EX(arginfo_mb_detect_encoding, 0, 0, 1)
    366. 

  366. 	ZEND_ARG_INFO(0, str)
    367. 

  367. 	ZEND_ARG_INFO(0, encoding_list)
    368. 

  368. 	ZEND_ARG_INFO(0, strict)
    369. 

  369. ZEND_END_ARG_INFO()
    370. 

  370. 

  371. ZEND_BEGIN_ARG_INFO(arginfo_mb_list_encodings, 0)
    372. 

  372. ZEND_END_ARG_INFO()
    373. 

  373. 

  374. ZEND_BEGIN_ARG_INFO_EX(arginfo_mb_encoding_aliases, 0, 0, 1)
    375. 

  375. 	ZEND_ARG_INFO(0, encoding)
    376. 

  376. ZEND_END_ARG_INFO()
    377. 

  377. 

  378. ZEND_BEGIN_ARG_INFO_EX(arginfo_mb_encode_mimeheader, 0, 0, 1)
    379. 

  379. 	ZEND_ARG_INFO(0, str)
    380. 

  380. 	ZEND_ARG_INFO(0, charset)
    381. 

  381. 	ZEND_ARG_INFO(0, transfer)
    382. 

  382. 	ZEND_ARG_INFO(0, linefeed)
    383. 

  383. 	ZEND_ARG_INFO(0, indent)
    384. 

  384. ZEND_END_ARG_INFO()
    385. 

  385. 

  386. ZEND_BEGIN_ARG_INFO_EX(arginfo_mb_decode_mimeheader, 0, 0, 1)
    387. 

  387. 	ZEND_ARG_INFO(0, string)
    388. 

  388. ZEND_END_ARG_INFO()
    389. 

  389. 

  390. ZEND_BEGIN_ARG_INFO_EX(arginfo_mb_convert_kana, 0, 0, 1)
    391. 

  391. 	ZEND_ARG_INFO(0, str)
    392. 

  392. 	ZEND_ARG_INFO(0, option)
    393. 

  393. 	ZEND_ARG_INFO(0, encoding)
    394. 

  394. ZEND_END_ARG_INFO()
    395. 

  395. 

  396. ZEND_BEGIN_ARG_INFO_EX(arginfo_mb_convert_variables, 1, 0, 3)
    397. 

  397. 	ZEND_ARG_INFO(0, to)
    398. 

  398. 	ZEND_ARG_INFO(0, from)
    399. 

  399. 	ZEND_ARG_INFO(1, ...)
    400. 

  400. ZEND_END_ARG_INFO()
    401. 

  401. 

  402. ZEND_BEGIN_ARG_INFO_EX(arginfo_mb_encode_numericentity, 0, 0, 2)
    403. 

  403. 	ZEND_ARG_INFO(0, string)
    404. 

  404. 	ZEND_ARG_INFO(0, convmap)
    405. 

  405. 	ZEND_ARG_INFO(0, encoding)
    406. 

  406. ZEND_END_ARG_INFO()
    407. 

  407. 

  408. ZEND_BEGIN_ARG_INFO_EX(arginfo_mb_decode_numericentity, 0, 0, 2)
    409. 

  409. 	ZEND_ARG_INFO(0, string)
    410. 

  410. 	ZEND_ARG_INFO(0, convmap)
    411. 

  411. 	ZEND_ARG_INFO(0, encoding)
    412. 

  412. ZEND_END_ARG_INFO()
    413. 

  413. 

  414. ZEND_BEGIN_ARG_INFO_EX(arginfo_mb_send_mail, 0, 0, 3)
    415. 

  415. 	ZEND_ARG_INFO(0, to)
    416. 

  416. 	ZEND_ARG_INFO(0, subject)
    417. 

  417. 	ZEND_ARG_INFO(0, message)
    418. 

  418. 	ZEND_ARG_INFO(0, additional_headers)
    419. 

  419. 	ZEND_ARG_INFO(0, additional_parameters)
    420. 

  420. ZEND_END_ARG_INFO()
    421. 

  421. 

  422. ZEND_BEGIN_ARG_INFO_EX(arginfo_mb_get_info, 0, 0, 0)
    423. 

  423. 	ZEND_ARG_INFO(0, type)
    424. 

  424. ZEND_END_ARG_INFO()
    425. 

  425. 

  426. ZEND_BEGIN_ARG_INFO_EX(arginfo_mb_check_encoding, 0, 0, 0)
    427. 

  427. 	ZEND_ARG_INFO(0, var)
    428. 

  428. 	ZEND_ARG_INFO(0, encoding)
    429. 

  429. ZEND_END_ARG_INFO()
    430. 

  430. 

  431. ZEND_BEGIN_ARG_INFO_EX(arginfo_mb_regex_encoding, 0, 0, 0)
    432. 

  432. 	ZEND_ARG_INFO(0, encoding)
    433. 

  433. ZEND_END_ARG_INFO()
    434. 

  434. 

  435. ZEND_BEGIN_ARG_INFO_EX(arginfo_mb_ereg, 0, 0, 2)
    436. 

  436. 	ZEND_ARG_INFO(0, pattern)
    437. 

  437. 	ZEND_ARG_INFO(0, string)
    438. 

  438. 	ZEND_ARG_INFO(1, registers)
    439. 

  439. ZEND_END_ARG_INFO()
    440. 

  440. 

  441. ZEND_BEGIN_ARG_INFO_EX(arginfo_mb_eregi, 0, 0, 2)
    442. 

  442. 	ZEND_ARG_INFO(0, pattern)
    443. 

  443. 	ZEND_ARG_INFO(0, string)
    444. 

  444. 	ZEND_ARG_INFO(1, registers)
    445. 

  445. ZEND_END_ARG_INFO()
    446. 

  446. 

  447. ZEND_BEGIN_ARG_INFO_EX(arginfo_mb_ereg_replace, 0, 0, 3)
    448. 

  448. 	ZEND_ARG_INFO(0, pattern)
    449. 

  449. 	ZEND_ARG_INFO(0, replacement)
    450. 

  450. 	ZEND_ARG_INFO(0, string)
    451. 

  451. 	ZEND_ARG_INFO(0, option)
    452. 

  452. ZEND_END_ARG_INFO()
    453. 

  453. 

  454. ZEND_BEGIN_ARG_INFO_EX(arginfo_mb_eregi_replace, 0, 0, 3)
    455. 

  455. 	ZEND_ARG_INFO(0, pattern)
    456. 

  456. 	ZEND_ARG_INFO(0, replacement)
    457. 

  457. 	ZEND_ARG_INFO(0, string)
    458. 

  458. ZEND_END_ARG_INFO()
    459. 

  459. 

  460. ZEND_BEGIN_ARG_INFO_EX(arginfo_mb_split, 0, 0, 2)
    461. 

  461. 	ZEND_ARG_INFO(0, pattern)
    462. 

  462. 	ZEND_ARG_INFO(0, string)
    463. 

  463. 	ZEND_ARG_INFO(0, limit)
    464. 

  464. ZEND_END_ARG_INFO()
    465. 

  465. 

  466. ZEND_BEGIN_ARG_INFO_EX(arginfo_mb_ereg_match, 0, 0, 2)
    467. 

  467. 	ZEND_ARG_INFO(0, pattern)
    468. 

  468. 	ZEND_ARG_INFO(0, string)
    469. 

  469. 	ZEND_ARG_INFO(0, option)
    470. 

  470. ZEND_END_ARG_INFO()
    471. 

  471. 

  472. ZEND_BEGIN_ARG_INFO_EX(arginfo_mb_ereg_search, 0, 0, 0)
    473. 

  473. 	ZEND_ARG_INFO(0, pattern)
    474. 

  474. 	ZEND_ARG_INFO(0, option)
    475. 

  475. ZEND_END_ARG_INFO()
    476. 

  476. 

  477. ZEND_BEGIN_ARG_INFO_EX(arginfo_mb_ereg_search_pos, 0, 0, 0)
    478. 

  478. 	ZEND_ARG_INFO(0, pattern)
    479. 

  479. 	ZEND_ARG_INFO(0, option)
    480. 

  480. ZEND_END_ARG_INFO()
    481. 

  481. 

  482. ZEND_BEGIN_ARG_INFO_EX(arginfo_mb_ereg_search_regs, 0, 0, 0)
    483. 

  483. 	ZEND_ARG_INFO(0, pattern)
    484. 

  484. 	ZEND_ARG_INFO(0, option)
    485. 

  485. ZEND_END_ARG_INFO()
    486. 

  486. 

  487. ZEND_BEGIN_ARG_INFO_EX(arginfo_mb_ereg_search_init, 0, 0, 1)
    488. 

  488. 	ZEND_ARG_INFO(0, string)
    489. 

  489. 	ZEND_ARG_INFO(0, pattern)
    490. 

  490. 	ZEND_ARG_INFO(0, option)
    491. 

  491. ZEND_END_ARG_INFO()
    492. 

  492. 

  493. ZEND_BEGIN_ARG_INFO(arginfo_mb_ereg_search_getregs, 0)
    494. 

  494. ZEND_END_ARG_INFO()
    495. 

  495. 

  496. ZEND_BEGIN_ARG_INFO(arginfo_mb_ereg_search_getpos, 0)
    497. 

  497. ZEND_END_ARG_INFO()
    498. 

  498. 

  499. ZEND_BEGIN_ARG_INFO_EX(arginfo_mb_ereg_search_setpos, 0, 0, 1)
    500. 

  500. 	ZEND_ARG_INFO(0, position)
    501. 

  501. ZEND_END_ARG_INFO()
    502. 

  502. 

  503. ZEND_BEGIN_ARG_INFO_EX(arginfo_mb_regex_set_options, 0, 0, 0)
    504. 

  504. 	ZEND_ARG_INFO(0, options)
    505. 

  505. ZEND_END_ARG_INFO()
    506. 

  506. /* }}} */
    507. 

  507. 

  508. /* {{{ zend_function_entry mbstring_functions[] */
    509. 

  509. const zend_function_entry mbstring_functions[] = {
    510. 

  510. 	PHP_FE(mb_convert_case,			arginfo_mb_convert_case)
    511. 

  511. 	PHP_FE(mb_strtoupper,			arginfo_mb_strtoupper)
    512. 

  512. 	PHP_FE(mb_strtolower,			arginfo_mb_strtolower)
    513. 

  513. 	PHP_FE(mb_language,				arginfo_mb_language)
    514. 

  514. 	PHP_FE(mb_internal_encoding,	arginfo_mb_internal_encoding)
    515. 

  515. 	PHP_FE(mb_http_input,			arginfo_mb_http_input)
    516. 

  516. 	PHP_FE(mb_http_output,			arginfo_mb_http_output)
    517. 

  517. 	PHP_FE(mb_detect_order,			arginfo_mb_detect_order)
    518. 

  518. 	PHP_FE(mb_substitute_character,	arginfo_mb_substitute_character)
    519. 

  519. 	PHP_FE(mb_parse_str,			arginfo_mb_parse_str)
    520. 

  520. 	PHP_FE(mb_output_handler,		arginfo_mb_output_handler)
    521. 

  521. 	PHP_FE(mb_preferred_mime_name,	arginfo_mb_preferred_mime_name)
    522. 

  522. 	PHP_FE(mb_strlen,				arginfo_mb_strlen)
    523. 

  523. 	PHP_FE(mb_strpos,				arginfo_mb_strpos)
    524. 

  524. 	PHP_FE(mb_strrpos,				arginfo_mb_strrpos)
    525. 

  525. 	PHP_FE(mb_stripos,				arginfo_mb_stripos)
    526. 

  526. 	PHP_FE(mb_strripos,				arginfo_mb_strripos)
    527. 

  527. 	PHP_FE(mb_strstr,				arginfo_mb_strstr)
    528. 

  528. 	PHP_FE(mb_strrchr,				arginfo_mb_strrchr)
    529. 

  529. 	PHP_FE(mb_stristr,				arginfo_mb_stristr)
    530. 

  530. 	PHP_FE(mb_strrichr,				arginfo_mb_strrichr)
    531. 

  531. 	PHP_FE(mb_substr_count,			arginfo_mb_substr_count)
    532. 

  532. 	PHP_FE(mb_substr,				arginfo_mb_substr)
    533. 

  533. 	PHP_FE(mb_strcut,				arginfo_mb_strcut)
    534. 

  534. 	PHP_FE(mb_strwidth,				arginfo_mb_strwidth)
    535. 

  535. 	PHP_FE(mb_strimwidth,			arginfo_mb_strimwidth)
    536. 

  536. 	PHP_FE(mb_convert_encoding,		arginfo_mb_convert_encoding)
    537. 

  537. 	PHP_FE(mb_detect_encoding,		arginfo_mb_detect_encoding)
    538. 

  538. 	PHP_FE(mb_list_encodings,		arginfo_mb_list_encodings)
    539. 

  539. 	PHP_FE(mb_encoding_aliases,		arginfo_mb_encoding_aliases)
    540. 

  540. 	PHP_FE(mb_convert_kana,			arginfo_mb_convert_kana)
    541. 

  541. 	PHP_FE(mb_encode_mimeheader,	arginfo_mb_encode_mimeheader)
    542. 

  542. 	PHP_FE(mb_decode_mimeheader,	arginfo_mb_decode_mimeheader)
    543. 

  543. 	PHP_FE(mb_convert_variables,	arginfo_mb_convert_variables)
    544. 

  544. 	PHP_FE(mb_encode_numericentity,	arginfo_mb_encode_numericentity)
    545. 

  545. 	PHP_FE(mb_decode_numericentity,	arginfo_mb_decode_numericentity)
    546. 

  546. 	PHP_FE(mb_send_mail,			arginfo_mb_send_mail)
    547. 

  547. 	PHP_FE(mb_get_info,				arginfo_mb_get_info)
    548. 

  548. 	PHP_FE(mb_check_encoding,		arginfo_mb_check_encoding)
    549. 

  549. #if HAVE_MBREGEX
    550. 

  550. 	PHP_MBREGEX_FUNCTION_ENTRIES
    551. 

  551. #endif
    552. 

  552. 	{ NULL, NULL, NULL }
    553. 

  553. };
    554. 

  554. /* }}} */
    555. 

  555. 

  556. /* {{{ zend_module_entry mbstring_module_entry */
    557. 

  557. zend_module_entry mbstring_module_entry = {
    558. 

  558.     STANDARD_MODULE_HEADER,
    559. 

  559. 	"mbstring",
    560. 

  560. 	mbstring_functions,
    561. 

  561. 	PHP_MINIT(mbstring),
    562. 

  562. 	PHP_MSHUTDOWN(mbstring),
    563. 

  563. 	PHP_RINIT(mbstring),
    564. 

  564. 	PHP_RSHUTDOWN(mbstring),
    565. 

  565. 	PHP_MINFO(mbstring),
    566. 

  566.     NO_VERSION_YET,
    567. 

  567.     PHP_MODULE_GLOBALS(mbstring),
    568. 

  568.     PHP_GINIT(mbstring),
    569. 

  569.     PHP_GSHUTDOWN(mbstring),
    570. 

  570.     NULL,
    571. 

  571. 	STANDARD_MODULE_PROPERTIES_EX
    572. 

  572. };
    573. 

  573. /* }}} */
    574. 

  574. 

  575. /* {{{ static sapi_post_entry php_post_entries[] */
    576. 

  576. static sapi_post_entry php_post_entries[] = {
    577. 

  577. 	{ DEFAULT_POST_CONTENT_TYPE, sizeof(DEFAULT_POST_CONTENT_TYPE)-1, sapi_read_standard_form_data,	php_std_post_handler },
    578. 

  578. 	{ MULTIPART_CONTENT_TYPE,    sizeof(MULTIPART_CONTENT_TYPE)-1,    NULL,                         rfc1867_post_handler },
    579. 

  579. 	{ NULL, 0, NULL, NULL }
    580. 

  580. };
    581. 

  581. /* }}} */
    582. 

  582. 

  583. #ifdef COMPILE_DL_MBSTRING
    584. 

  584. ZEND_GET_MODULE(mbstring)
    585. 

  585. #endif
    586. 

  586. 

  587. /* {{{ allocators */
    588. 

  588. static void *_php_mb_allocators_malloc(unsigned int sz)
    589. 

  589. {
    590. 

  590. 	return emalloc(sz);
    591. 

  591. }
    592. 

  592. 

  593. static void *_php_mb_allocators_realloc(void *ptr, unsigned int sz)
    594. 

  594. {
    595. 

  595. 	return erealloc(ptr, sz);
    596. 

  596. }
    597. 

  597. 

  598. static void *_php_mb_allocators_calloc(unsigned int nelems, unsigned int szelem)
    599. 

  599. {
    600. 

  600. 	return ecalloc(nelems, szelem);
    601. 

  601. }
    602. 

  602. 

  603. static void _php_mb_allocators_free(void *ptr)
    604. 

  604. {
    605. 

  605. 	efree(ptr);
    606. 

  606. } 
    607. 

  607. 

  608. static void *_php_mb_allocators_pmalloc(unsigned int sz)
    609. 

  609. {
    610. 

  610. 	return pemalloc(sz, 1);
    611. 

  611. }
    612. 

  612. 

  613. static void *_php_mb_allocators_prealloc(void *ptr, unsigned int sz)
    614. 

  614. {
    615. 

  615. 	return perealloc(ptr, sz, 1);
    616. 

  616. }
    617. 

  617. 

  618. static void _php_mb_allocators_pfree(void *ptr)
    619. 

  619. {
    620. 

  620. 	pefree(ptr, 1);
    621. 

  621. } 
    622. 

  622. 

  623. static mbfl_allocators _php_mb_allocators = {
    624. 

  624. 	_php_mb_allocators_malloc,
    625. 

  625. 	_php_mb_allocators_realloc,
    626. 

  626. 	_php_mb_allocators_calloc,
    627. 

  627. 	_php_mb_allocators_free,
    628. 

  628. 	_php_mb_allocators_pmalloc,
    629. 

  629. 	_php_mb_allocators_prealloc,
    630. 

  630. 	_php_mb_allocators_pfree
    631. 

  631. };
    632. 

  632. /* }}} */
    633. 

  633. 

  634. /* {{{ static sapi_post_entry mbstr_post_entries[] */
    635. 

  635. static sapi_post_entry mbstr_post_entries[] = {
    636. 

  636. 	{ DEFAULT_POST_CONTENT_TYPE, sizeof(DEFAULT_POST_CONTENT_TYPE)-1, sapi_read_standard_form_data, php_mb_post_handler },
    637. 

  637. 	{ MULTIPART_CONTENT_TYPE,    sizeof(MULTIPART_CONTENT_TYPE)-1,    NULL,                         rfc1867_post_handler },
    638. 

  638. 	{ NULL, 0, NULL, NULL }
    639. 

  639. };
    640. 

  640. /* }}} */
    641. 

  641. 

  642. /* {{{ static int php_mb_parse_encoding_list()
    643. 

  643.  *  Return 0 if input contains any illegal encoding, otherwise 1.
    644. 

  644.  *  Even if any illegal encoding is detected the result may contain a list 
    645. 

  645.  *  of parsed encodings.
    646. 

  646.  */
    647. 

  647. static int
    648. 

  648. php_mb_parse_encoding_list(const char *value, int value_length, enum mbfl_no_encoding **return_list, int *return_size, int persistent TSRMLS_DC)
    649. 

  649. {
    650. 

  650. 	int n, l, size, bauto, ret = 1;
    651. 

  651. 	char *p, *p1, *p2, *endp, *tmpstr;
    652. 

  652. 	enum mbfl_no_encoding no_encoding;
    653. 

  653. 	enum mbfl_no_encoding *src, *entry, *list;
    654. 

  654. 

  655. 	list = NULL;
    656. 

  656. 	if (value == NULL || value_length <= 0) {
    657. 

  657. 		if (return_list) {
    658. 

  658. 			*return_list = NULL;
    659. 

  659. 		}
    660. 

  660. 		if (return_size) {
    661. 

  661. 			*return_size = 0;
    662. 

  662. 		}
    663. 

  663. 		return 0;
    664. 

  664. 	} else {
    665. 

  665. 		enum mbfl_no_encoding *identify_list;
    666. 

  666. 		int identify_list_size;
    667. 

  667. 

  668. 		identify_list = MBSTRG(default_detect_order_list);
    669. 

  669. 		identify_list_size = MBSTRG(default_detect_order_list_size);
    670. 

  670. 

  671. 		/* copy the value string for work */
    672. 

  672. 		if (value[0]=='"' && value[value_length-1]=='"' && value_length>2) {
    673. 

  673. 			tmpstr = (char *)estrndup(value+1, value_length-2);
    674. 

  674. 			value_length -= 2;
    675. 

  675. 		}
    676. 

  676. 		else
    677. 

  677. 			tmpstr = (char *)estrndup(value, value_length);
    678. 

  678. 		if (tmpstr == NULL) {
    679. 

  679. 			return 0;
    680. 

  680. 		}
    681. 

  681. 		/* count the number of listed encoding names */
    682. 

  682. 		endp = tmpstr + value_length;
    683. 

  683. 		n = 1;
    684. 

  684. 		p1 = tmpstr;
    685. 

  685. 		while ((p2 = php_memnstr(p1, ",", 1, endp)) != NULL) {
    686. 

  686. 			p1 = p2 + 1;
    687. 

  687. 			n++;
    688. 

  688. 		}
    689. 

  689. 		size = n + identify_list_size;
    690. 

  690. 		/* make list */
    691. 

  691. 		list = (enum mbfl_no_encoding *)pecalloc(size, sizeof(int), persistent);
    692. 

  692. 		if (list != NULL) {
    693. 

  693. 			entry = list;
    694. 

  694. 			n = 0;
    695. 

  695. 			bauto = 0;
    696. 

  696. 			p1 = tmpstr;
    697. 

  697. 			do {
    698. 

  698. 				p2 = p = php_memnstr(p1, ",", 1, endp);
    699. 

  699. 				if (p == NULL) {
    700. 

  700. 					p = endp;
    701. 

  701. 				}
    702. 

  702. 				*p = '\0';
    703. 

  703. 				/* trim spaces */
    704. 

  704. 				while (p1 < p && (*p1 == ' ' || *p1 == '\t')) {
    705. 

  705. 					p1++;
    706. 

  706. 				}
    707. 

  707. 				p--;
    708. 

  708. 				while (p > p1 && (*p == ' ' || *p == '\t')) {
    709. 

  709. 					*p = '\0';
    710. 

  710. 					p--;
    711. 

  711. 				}
    712. 

  712. 				/* convert to the encoding number and check encoding */
    713. 

  713. 				if (strcasecmp(p1, "auto") == 0) {
    714. 

  714. 					if (!bauto) {
    715. 

  715. 						bauto = 1;
    716. 

  716. 						l = identify_list_size;
    717. 

  717. 						src = identify_list;
    718. 

  718. 						while (l > 0) {
    719. 

  719. 							*entry++ = *src++;
    720. 

  720. 							l--;
    721. 

  721. 							n++;
    722. 

  722. 						}
    723. 

  723. 					}
    724. 

  724. 				} else {
    725. 

  725. 					no_encoding = mbfl_name2no_encoding(p1);
    726. 

  726. 					if (no_encoding != mbfl_no_encoding_invalid) {
    727. 

  727. 						*entry++ = no_encoding;
    728. 

  728. 						n++;
    729. 

  729. 					} else {
    730. 

  730. 						ret = 0;
    731. 

  731. 					}
    732. 

  732. 				}
    733. 

  733. 				p1 = p2 + 1;
    734. 

  734. 			} while (n < size && p2 != NULL);
    735. 

  735. 			if (n > 0) {
    736. 

  736. 				if (return_list) {
    737. 

  737. 					*return_list = list;
    738. 

  738. 				} else {
    739. 

  739. 					pefree(list, persistent);
    740. 

  740. 				}
    741. 

  741. 			} else {
    742. 

  742. 				pefree(list, persistent);
    743. 

  743. 				if (return_list) {
    744. 

  744. 					*return_list = NULL;
    745. 

  745. 				}
    746. 

  746. 				ret = 0;
    747. 

  747. 			}
    748. 

  748. 			if (return_size) {
    749. 

  749. 				*return_size = n;
    750. 

  750. 			}
    751. 

  751. 		} else {
    752. 

  752. 			if (return_list) {
    753. 

  753. 				*return_list = NULL;
    754. 

  754. 			}
    755. 

  755. 			if (return_size) {
    756. 

  756. 				*return_size = 0;
    757. 

  757. 			}
    758. 

  758. 			ret = 0;
    759. 

  759. 		}
    760. 

  760. 		efree(tmpstr);
    761. 

  761. 	}
    762. 

  762. 

  763. 	return ret;
    764. 

  764. }
    765. 

  765. /* }}} */
    766. 

  766. 

  767. /* {{{ MBSTRING_API php_mb_check_encoding_list */
    768. 

  768. MBSTRING_API int php_mb_check_encoding_list(const char *encoding_list TSRMLS_DC) {
    769. 

  769. 	return php_mb_parse_encoding_list(encoding_list, strlen(encoding_list), NULL, NULL, 0 TSRMLS_CC);	
    770. 

  770. }
    771. 

  771. /* }}} */
    772. 

  772. 

  773. /* {{{ static int php_mb_parse_encoding_array()
    774. 

  774.  *  Return 0 if input contains any illegal encoding, otherwise 1.
    775. 

  775.  *  Even if any illegal encoding is detected the result may contain a list 
    776. 

  776.  *  of parsed encodings.
    777. 

  777.  */
    778. 

  778. static int
    779. 

  779. php_mb_parse_encoding_array(zval *array, enum mbfl_no_encoding **return_list, int *return_size, int persistent TSRMLS_DC)
    780. 

  780. {
    781. 

  781. 	zval **hash_entry;
    782. 

  782. 	HashTable *target_hash;
    783. 

  783. 	int i, n, l, size, bauto,ret = 1;
    784. 

  784. 	enum mbfl_no_encoding no_encoding;
    785. 

  785. 	enum mbfl_no_encoding *src, *list, *entry;
    786. 

  786. 

  787. 	list = NULL;
    788. 

  788. 	if (Z_TYPE_P(array) == IS_ARRAY) {
    789. 

  789. 		enum mbfl_no_encoding *identify_list;
    790. 

  790. 		int identify_list_size;
    791. 

  791. 

  792. 		identify_list = MBSTRG(default_detect_order_list);
    793. 

  793. 		identify_list_size = MBSTRG(default_detect_order_list_size);
    794. 

  794. 

  795. 		target_hash = Z_ARRVAL_P(array);
    796. 

  796. 		zend_hash_internal_pointer_reset(target_hash);
    797. 

  797. 		i = zend_hash_num_elements(target_hash);
    798. 

  798. 		size = i + identify_list_size;
    799. 

  799. 		list = (enum mbfl_no_encoding *)pecalloc(size, sizeof(int), persistent);
    800. 

  800. 		if (list != NULL) {
    801. 

  801. 			entry = list;
    802. 

  802. 			bauto = 0;
    803. 

  803. 			n = 0;
    804. 

  804. 			while (i > 0) {
    805. 

  805. 				if (zend_hash_get_current_data(target_hash, (void **) &hash_entry) == FAILURE) {
    806. 

  806. 					break;
    807. 

  807. 				}
    808. 

  808. 				convert_to_string_ex(hash_entry);
    809. 

  809. 				if (strcasecmp(Z_STRVAL_PP(hash_entry), "auto") == 0) {
    810. 

  810. 					if (!bauto) {
    811. 

  811. 						bauto = 1;
    812. 

  812. 						l = identify_list_size; 
    813. 

  813. 						src = identify_list;
    814. 

  814. 						while (l > 0) {
    815. 

  815. 							*entry++ = *src++;
    816. 

  816. 							l--;
    817. 

  817. 							n++;
    818. 

  818. 						}
    819. 

  819. 					}
    820. 

  820. 				} else {
    821. 

  821. 					no_encoding = mbfl_name2no_encoding(Z_STRVAL_PP(hash_entry));
    822. 

  822. 					if (no_encoding != mbfl_no_encoding_invalid) {
    823. 

  823. 						*entry++ = no_encoding;
    824. 

  824. 						n++;
    825. 

  825. 					} else {
    826. 

  826. 						ret = 0;
    827. 

  827. 					}
    828. 

  828. 				}
    829. 

  829. 				zend_hash_move_forward(target_hash);
    830. 

  830. 				i--;
    831. 

  831. 			}
    832. 

  832. 			if (n > 0) {
    833. 

  833. 				if (return_list) {
    834. 

  834. 					*return_list = list;
    835. 

  835. 				} else {
    836. 

  836. 					pefree(list, persistent);
    837. 

  837. 				}
    838. 

  838. 			} else {
    839. 

  839. 				pefree(list, persistent);
    840. 

  840. 				if (return_list) {
    841. 

  841. 					*return_list = NULL;
    842. 

  842. 				}
    843. 

  843. 				ret = 0;
    844. 

  844. 			}
    845. 

  845. 			if (return_size) {
    846. 

  846. 				*return_size = n;
    847. 

  847. 			}
    848. 

  848. 		} else {
    849. 

  849. 			if (return_list) {
    850. 

  850. 				*return_list = NULL;
    851. 

  851. 			}
    852. 

  852. 			if (return_size) {
    853. 

  853. 				*return_size = 0;
    854. 

  854. 			}
    855. 

  855. 			ret = 0;
    856. 

  856. 		}
    857. 

  857. 	}
    858. 

  858. 

  859. 	return ret;
    860. 

  860. }
    861. 

  861. /* }}} */
    862. 

  862. 

  863. static void *_php_mb_compile_regex(const char *pattern TSRMLS_DC);
    864. 

  864. static int _php_mb_match_regex(void *opaque, const char *str, size_t str_len);
    865. 

  865. static void _php_mb_free_regex(void *opaque);
    866. 

  866. 

  867. #if HAVE_ONIG
    868. 

  868. /* {{{ _php_mb_compile_regex */
    869. 

  869. void *_php_mb_compile_regex(const char *pattern TSRMLS_DC)
    870. 

  870. {
    871. 

  871. 	php_mb_regex_t *retval;
    872. 

  872. 	OnigErrorInfo err_info;
    873. 

  873. 	int err_code;
    874. 

  874. 

  875. 	if ((err_code = onig_new(&retval,
    876. 

  876. 			(const OnigUChar *)pattern,
    877. 

  877. 			(const OnigUChar *)pattern + strlen(pattern),
    878. 

  878. 			ONIG_OPTION_IGNORECASE | ONIG_OPTION_DONT_CAPTURE_GROUP,
    879. 

  879. 			ONIG_ENCODING_ASCII, &OnigSyntaxPerl, &err_info))) {
    880. 

  880. 		OnigUChar err_str[ONIG_MAX_ERROR_MESSAGE_LEN];
    881. 

  881. 		onig_error_code_to_str(err_str, err_code, err_info);
    882. 

  882. 		php_error_docref(NULL TSRMLS_CC, E_WARNING, "%s: %s", pattern, err_str);
    883. 

  883. 		retval = NULL;
    884. 

  884. 	}
    885. 

  885. 	return retval;
    886. 

  886. }
    887. 

  887. /* }}} */
    888. 

  888. 

  889. /* {{{ _php_mb_match_regex */
    890. 

  890. int _php_mb_match_regex(void *opaque, const char *str, size_t str_len)
    891. 

  891. {
    892. 

  892. 	return onig_search((php_mb_regex_t *)opaque, (const OnigUChar *)str,
    893. 

  893. 			(const OnigUChar*)str + str_len, (const OnigUChar *)str,
    894. 

  894. 			(const OnigUChar*)str + str_len, NULL, ONIG_OPTION_NONE) >= 0;
    895. 

  895. }
    896. 

  896. /* }}} */
    897. 

  897. 

  898. /* {{{ _php_mb_free_regex */
    899. 

  899. void _php_mb_free_regex(void *opaque)
    900. 

  900. {
    901. 

  901. 	onig_free((php_mb_regex_t *)opaque);
    902. 

  902. }
    903. 

  903. /* }}} */
    904. 

  904. #elif HAVE_PCRE || HAVE_BUNDLED_PCRE
    905. 

  905. /* {{{ _php_mb_compile_regex */
    906. 

  906. void *_php_mb_compile_regex(const char *pattern TSRMLS_DC)
    907. 

  907. {
    908. 

  908. 	pcre *retval;
    909. 

  909. 	const char *err_str;
    910. 

  910. 	int err_offset;
    911. 

  911. 

  912. 	if (!(retval = pcre_compile(pattern,
    913. 

  913. 			PCRE_CASELESS, &err_str, &err_offset, NULL))) {
    914. 

  914. 		php_error_docref(NULL TSRMLS_CC, E_WARNING, "%s (offset=%d): %s", pattern, err_offset, err_str);
    915. 

  915. 	}
    916. 

  916. 	return retval;
    917. 

  917. }
    918. 

  918. /* }}} */
    919. 

  919. 

  920. /* {{{ _php_mb_match_regex */
    921. 

  921. int _php_mb_match_regex(void *opaque, const char *str, size_t str_len)
    922. 

  922. {
    923. 

  923. 	return pcre_exec((pcre *)opaque, NULL, str, (int)str_len, 0,
    924. 

  924. 			0, NULL, 0) >= 0;
    925. 

  925. }
    926. 

  926. /* }}} */
    927. 

  927. 

  928. /* {{{ _php_mb_free_regex */
    929. 

  929. void _php_mb_free_regex(void *opaque)
    930. 

  930. {
    931. 

  931. 	pcre_free(opaque);
    932. 

  932. }
    933. 

  933. /* }}} */
    934. 

  934. #endif
    935. 

  935. 

  936. /* {{{ php_mb_nls_get_default_detect_order_list */
    937. 

  937. static int php_mb_nls_get_default_detect_order_list(enum mbfl_no_language lang, enum mbfl_no_encoding **plist, int* plist_size)
    938. 

  938. {
    939. 

  939. 	size_t i;
    940. 

  940. 

  941. 	*plist = (enum mbfl_no_encoding *) php_mb_default_identify_list_neut;
    942. 

  942. 	*plist_size = sizeof(php_mb_default_identify_list_neut) / sizeof(php_mb_default_identify_list_neut[0]);
    943. 

  943. 

  944. 	for (i = 0; i < sizeof(php_mb_default_identify_list) / sizeof(php_mb_default_identify_list[0]); i++) {
    945. 

  945. 		if (php_mb_default_identify_list[i].lang == lang) {
    946. 

  946. 			*plist = (enum mbfl_no_encoding *)php_mb_default_identify_list[i].list;
    947. 

  947. 			*plist_size = php_mb_default_identify_list[i].list_size;
    948. 

  948. 			return 1;
    949. 

  949. 		}
    950. 

  950. 	}
    951. 

  951. 	return 0;
    952. 

  952. }
    953. 

  953. /* }}} */
    954. 

  954. 

  955. /* {{{ php.ini directive handler */
    956. 

  956. /* {{{ static PHP_INI_MH(OnUpdate_mbstring_language) */
    957. 

  957. static PHP_INI_MH(OnUpdate_mbstring_language)
    958. 

  958. {
    959. 

  959. 	enum mbfl_no_language no_language;
    960. 

  960. 

  961. 	no_language = mbfl_name2no_language(new_value);
    962. 

  962. 	if (no_language == mbfl_no_language_invalid) {
    963. 

  963. 		MBSTRG(language) = mbfl_no_language_neutral;
    964. 

  964. 		return FAILURE;
    965. 

  965. 	}
    966. 

  966. 	MBSTRG(language) = no_language;
    967. 

  967. 	php_mb_nls_get_default_detect_order_list(no_language, &MBSTRG(default_detect_order_list), &MBSTRG(default_detect_order_list_size));
    968. 

  968. 	return SUCCESS;
    969. 

  969. }
    970. 

  970. /* }}} */
    971. 

  971. 

  972. /* {{{ static PHP_INI_MH(OnUpdate_mbstring_detect_order) */
    973. 

  973. static PHP_INI_MH(OnUpdate_mbstring_detect_order)
    974. 

  974. {
    975. 

  975. 	enum mbfl_no_encoding *list;
    976. 

  976. 	int size;
    977. 

  977. 

  978. 	if (php_mb_parse_encoding_list(new_value, new_value_length, &list, &size, 1 TSRMLS_CC)) {
    979. 

  979. 		if (MBSTRG(detect_order_list)) {
    980. 

  980. 			free(MBSTRG(detect_order_list));
    981. 

  981. 		}
    982. 

  982. 		MBSTRG(detect_order_list) = list;
    983. 

  983. 		MBSTRG(detect_order_list_size) = size;
    984. 

  984. 	} else {
    985. 

  985. 		if (MBSTRG(detect_order_list)) {
    986. 

  986. 			free(MBSTRG(detect_order_list));
    987. 

  987. 			MBSTRG(detect_order_list) = NULL;
    988. 

  988. 		}
    989. 

  989. 		return FAILURE;
    990. 

  990. 	}
    991. 

  991. 

  992. 	return SUCCESS;
    993. 

  993. }
    994. 

  994. /* }}} */
    995. 

  995. 

  996. /* {{{ static PHP_INI_MH(OnUpdate_mbstring_http_input) */
    997. 

  997. static PHP_INI_MH(OnUpdate_mbstring_http_input)
    998. 

  998. {
    999. 

  999. 	enum mbfl_no_encoding *list;
    1000. 

  1000. 	int size;
    1001. 

  1001. 

  1002. 	if (php_mb_parse_encoding_list(new_value, new_value_length, &list, &size, 1 TSRMLS_CC)) {
    1003. 

  1003. 		if (MBSTRG(http_input_list)) {
    1004. 

  1004. 			free(MBSTRG(http_input_list));
    1005. 

  1005. 		}
    1006. 

  1006. 		MBSTRG(http_input_list) = list;
    1007. 

  1007. 		MBSTRG(http_input_list_size) = size;
    1008. 

  1008. 	} else {
    1009. 

  1009. 		if (MBSTRG(http_input_list)) {
    1010. 

  1010. 			free(MBSTRG(http_input_list));
    1011. 

  1011. 			MBSTRG(http_input_list) = NULL;
    1012. 

  1012. 		}
    1013. 

  1013. 		MBSTRG(http_input_list_size) = 0;
    1014. 

  1014. 		return FAILURE;
    1015. 

  1015. 	}
    1016. 

  1016. 

  1017. 	return SUCCESS;
    1018. 

  1018. }
    1019. 

  1019. /* }}} */
    1020. 

  1020. 

  1021. /* {{{ static PHP_INI_MH(OnUpdate_mbstring_http_output) */
    1022. 

  1022. static PHP_INI_MH(OnUpdate_mbstring_http_output)
    1023. 

  1023. {
    1024. 

  1024. 	enum mbfl_no_encoding no_encoding;
    1025. 

  1025. 

  1026. 	no_encoding = mbfl_name2no_encoding(new_value);
    1027. 

  1027. 	if (no_encoding != mbfl_no_encoding_invalid) {
    1028. 

  1028. 		MBSTRG(http_output_encoding) = no_encoding;
    1029. 

  1029. 		MBSTRG(current_http_output_encoding) = no_encoding;
    1030. 

  1030. 	} else {
    1031. 

  1031. 		MBSTRG(http_output_encoding) = mbfl_no_encoding_pass;
    1032. 

  1032. 		MBSTRG(current_http_output_encoding) = mbfl_no_encoding_pass;
    1033. 

  1033. 		if (new_value != NULL && new_value_length > 0) {
    1034. 

  1034. 			return FAILURE;
    1035. 

  1035. 		}
    1036. 

  1036. 	}
    1037. 

  1037. 

  1038. 	return SUCCESS;
    1039. 

  1039. }
    1040. 

  1040. /* }}} */
    1041. 

  1041. 

  1042. /* {{{ static _php_mb_ini_mbstring_internal_encoding_set */
    1043. 

  1043. int _php_mb_ini_mbstring_internal_encoding_set(const char *new_value, uint new_value_length TSRMLS_DC)
    1044. 

  1044. {
    1045. 

  1045. 	enum mbfl_no_encoding no_encoding;
    1046. 

  1046.   	const char *enc_name = NULL;
    1047. 

  1047.   	uint enc_name_len = 0;
    1048. 

  1048.    
    1049. 

  1049.   	no_encoding = new_value ? mbfl_name2no_encoding(new_value):
    1050. 

  1050.   				mbfl_no_encoding_invalid;
    1051. 

  1051. 	if (no_encoding != mbfl_no_encoding_invalid) {
    1052. 

  1052.   		enc_name = new_value;
    1053. 

  1053.   		enc_name_len = new_value_length;
    1054. 

  1054.   	} else {
    1055. 

  1055.   		switch (MBSTRG(language)) {
    1056. 

  1056.   			case mbfl_no_language_uni:
    1057. 

  1057.   				enc_name = "UTF-8";
    1058. 

  1058.   				enc_name_len = sizeof("UTF-8") - 1;
    1059. 

  1059.   				break;
    1060. 

  1060.   			case mbfl_no_language_japanese:
    1061. 

  1061.   				enc_name = "EUC-JP";
    1062. 

  1062.   				enc_name_len = sizeof("EUC-JP") - 1;
    1063. 

  1063.   				break;
    1064. 

  1064.   			case mbfl_no_language_korean:
    1065. 

  1065.   				enc_name = "EUC-KR";
    1066. 

  1066.   				enc_name_len = sizeof("EUC-KR") - 1;
    1067. 

  1067.   				break;
    1068. 

  1068.   			case mbfl_no_language_simplified_chinese:
    1069. 

  1069.   				enc_name = "EUC-CN";
    1070. 

  1070.   				enc_name_len = sizeof("EUC-CN") - 1;
    1071. 

  1071.   				break;
    1072. 

  1072.   			case mbfl_no_language_traditional_chinese:
    1073. 

  1073.   				enc_name = "EUC-TW";
    1074. 

  1074.   				enc_name_len = sizeof("EUC-TW") - 1;
    1075. 

  1075.   				break;
    1076. 

  1076.   			case mbfl_no_language_russian:
    1077. 

  1077.   				enc_name = "KOI8-R";
    1078. 

  1078.   				enc_name_len = sizeof("KOI8-R") - 1;
    1079. 

  1079.   				break;
    1080. 

  1080.   			case mbfl_no_language_german:
    1081. 

  1081.   				enc_name = "ISO-8859-15";
    1082. 

  1082.   				enc_name_len = sizeof("ISO-8859-15") - 1;
    1083. 

  1083.   				break;
    1084. 

  1084.   			case mbfl_no_language_armenian:
    1085. 

  1085.   				enc_name = "ArmSCII-8";
    1086. 

  1086.   				enc_name_len = sizeof("ArmSCII-8") - 1;
    1087. 

  1087.   				break;
    1088. 

  1088.   			case mbfl_no_language_turkish:
    1089. 

  1089.   				enc_name = "ISO-8859-9";
    1090. 

  1090.   				enc_name_len = sizeof("ISO-8859-9") - 1;
    1091. 

  1091.   				break;
    1092. 

  1092.   			default:
    1093. 

  1093.   				enc_name = "ISO-8859-1";
    1094. 

  1094.   				enc_name_len = sizeof("ISO-8859-1") - 1;
    1095. 

  1095.   				break;
    1096. 

  1096.   		}
    1097. 

  1097.   		no_encoding = mbfl_name2no_encoding(enc_name);
    1098. 

  1098.   	}
    1099. 

  1099. 	MBSTRG(internal_encoding) = no_encoding;
    1100. 

  1100. 	MBSTRG(current_internal_encoding) = no_encoding;
    1101. 

  1101. #if HAVE_MBREGEX
    1102. 

  1102. 	{
    1103. 

  1103. 		const char *enc_name = new_value;
    1104. 

  1104. 		if (FAILURE == php_mb_regex_set_default_mbctype(enc_name TSRMLS_CC)) {
    1105. 

  1105. 			/* falls back to EUC-JP if an unknown encoding name is given */
    1106. 

  1106. 			enc_name = "EUC-JP";
    1107. 

  1107. 			php_mb_regex_set_default_mbctype(enc_name TSRMLS_CC);
    1108. 

  1108. 		}
    1109. 

  1109. 		php_mb_regex_set_mbctype(new_value TSRMLS_CC);
    1110. 

  1110. 	}
    1111. 

  1111. #endif
    1112. 

  1112. 	return SUCCESS;
    1113. 

  1113. }
    1114. 

  1114. /* }}} */
    1115. 

  1115. 

  1116. /* {{{ static PHP_INI_MH(OnUpdate_mbstring_internal_encoding) */
    1117. 

  1117. static PHP_INI_MH(OnUpdate_mbstring_internal_encoding)
    1118. 

  1118. {
    1119. 

  1119. 	if (stage == PHP_INI_STAGE_STARTUP || stage == PHP_INI_STAGE_SHUTDOWN
    1120. 

  1120. 			|| stage == PHP_INI_STAGE_RUNTIME) {
    1121. 

  1121. 		return _php_mb_ini_mbstring_internal_encoding_set(new_value, new_value_length TSRMLS_CC);
    1122. 

  1122. 	} else {
    1123. 

  1123. 		/* the corresponding mbstring globals needs to be set according to the
    1124. 

  1124. 		 * ini value in the later stage because it never falls back to the
    1125. 

  1125. 		 * default value if 1. no value for mbstring.internal_encoding is given,
    1126. 

  1126. 		 * 2. mbstring.language directive is processed in per-dir or runtime
    1127. 

  1127. 		 * context and 3. call to the handler for mbstring.language is done
    1128. 

  1128. 		 * after mbstring.internal_encoding is handled. */
    1129. 

  1129. 		return SUCCESS;
    1130. 

  1130. 	}
    1131. 

  1131. }
    1132. 

  1132. /* }}} */
    1133. 

  1133. 

  1134. #ifdef ZEND_MULTIBYTE
    1135. 

  1135. /* {{{ static PHP_INI_MH(OnUpdate_mbstring_script_encoding) */
    1136. 

  1136. static PHP_INI_MH(OnUpdate_mbstring_script_encoding)
    1137. 

  1137. {
    1138. 

  1138. 	int *list, size;
    1139. 

  1139. 

  1140. 	if (php_mb_parse_encoding_list(new_value, new_value_length, &list, &size, 1 TSRMLS_CC)) {
    1141. 

  1141. 		if (MBSTRG(script_encoding_list) != NULL) {
    1142. 

  1142. 			free(MBSTRG(script_encoding_list));
    1143. 

  1143. 		}
    1144. 

  1144. 		MBSTRG(script_encoding_list) = list;
    1145. 

  1145. 		MBSTRG(script_encoding_list_size) = size;
    1146. 

  1146. 	} else {
    1147. 

  1147. 		if (MBSTRG(script_encoding_list) != NULL) {
    1148. 

  1148. 			free(MBSTRG(script_encoding_list));
    1149. 

  1149. 		}
    1150. 

  1150. 		MBSTRG(script_encoding_list) = NULL;
    1151. 

  1151. 		MBSTRG(script_encoding_list_size) = 0;
    1152. 

  1152. 		return FAILURE;
    1153. 

  1153. 	}
    1154. 

  1154. 

  1155. 	return SUCCESS;
    1156. 

  1156. }
    1157. 

  1157. /* }}} */
    1158. 

  1158. #endif /* ZEND_MULTIBYTE */
    1159. 

  1159. 

  1160. /* {{{ static PHP_INI_MH(OnUpdate_mbstring_substitute_character) */
    1161. 

  1161. static PHP_INI_MH(OnUpdate_mbstring_substitute_character)
    1162. 

  1162. {
    1163. 

  1163. 	int c;
    1164. 

  1164. 	char *endptr = NULL;
    1165. 

  1165. 

  1166. 	if (new_value != NULL) {
    1167. 

  1167. 		if (strcasecmp("none", new_value) == 0) {
    1168. 

  1168. 			MBSTRG(filter_illegal_mode) = MBFL_OUTPUTFILTER_ILLEGAL_MODE_NONE;
    1169. 

  1169. 			MBSTRG(current_filter_illegal_mode) = MBFL_OUTPUTFILTER_ILLEGAL_MODE_NONE;
    1170. 

  1170. 		} else if (strcasecmp("long", new_value) == 0) {
    1171. 

  1171. 			MBSTRG(filter_illegal_mode) = MBFL_OUTPUTFILTER_ILLEGAL_MODE_LONG;
    1172. 

  1172. 			MBSTRG(current_filter_illegal_mode) = MBFL_OUTPUTFILTER_ILLEGAL_MODE_LONG;
    1173. 

  1173. 		} else if (strcasecmp("entity", new_value) == 0) {
    1174. 

  1174. 			MBSTRG(filter_illegal_mode) = MBFL_OUTPUTFILTER_ILLEGAL_MODE_ENTITY;
    1175. 

  1175. 			MBSTRG(current_filter_illegal_mode) = MBFL_OUTPUTFILTER_ILLEGAL_MODE_ENTITY;
    1176. 

  1176. 		} else {
    1177. 

  1177. 			MBSTRG(filter_illegal_mode) = MBFL_OUTPUTFILTER_ILLEGAL_MODE_CHAR;
    1178. 

  1178. 			MBSTRG(current_filter_illegal_mode) = MBFL_OUTPUTFILTER_ILLEGAL_MODE_CHAR;
    1179. 

  1179. 			if (new_value_length >0) {
    1180. 

  1180. 				c = strtol(new_value, &endptr, 0);
    1181. 

  1181. 				if (*endptr == '\0') {
    1182. 

  1182. 					MBSTRG(filter_illegal_substchar) = c;
    1183. 

  1183. 					MBSTRG(current_filter_illegal_substchar) = c;
    1184. 

  1184. 				}
    1185. 

  1185. 			}
    1186. 

  1186. 		}
    1187. 

  1187. 	} else {
    1188. 

  1188. 		MBSTRG(filter_illegal_mode) = MBFL_OUTPUTFILTER_ILLEGAL_MODE_CHAR;
    1189. 

  1189. 		MBSTRG(current_filter_illegal_mode) = MBFL_OUTPUTFILTER_ILLEGAL_MODE_CHAR;
    1190. 

  1190. 		MBSTRG(filter_illegal_substchar) = 0x3f;	/* '?' */
    1191. 

  1191. 		MBSTRG(current_filter_illegal_substchar) = 0x3f;	/* '?' */
    1192. 

  1192. 	}
    1193. 

  1193. 

  1194. 	return SUCCESS;
    1195. 

  1195. }
    1196. 

  1196. /* }}} */
    1197. 

  1197. 

  1198. /* {{{ static PHP_INI_MH(OnUpdate_mbstring_encoding_translation) */
    1199. 

  1199. static PHP_INI_MH(OnUpdate_mbstring_encoding_translation)
    1200. 

  1200. {
    1201. 

  1201. 	if (new_value == NULL) {
    1202. 

  1202. 	   return FAILURE;
    1203. 

  1203. 	}
    1204. 

  1204. 

  1205. 	OnUpdateBool(entry, new_value, new_value_length, mh_arg1, mh_arg2, mh_arg3, stage TSRMLS_CC);
    1206. 

  1206. 

  1207. 	if (MBSTRG(encoding_translation)) {
    1208. 

  1208. 		sapi_unregister_post_entry(php_post_entries TSRMLS_CC);
    1209. 

  1209. 		sapi_register_post_entries(mbstr_post_entries TSRMLS_CC);
    1210. 

  1210. 	} else {
    1211. 

  1211. 		sapi_unregister_post_entry(mbstr_post_entries TSRMLS_CC);
    1212. 

  1212. 		sapi_register_post_entries(php_post_entries TSRMLS_CC);
    1213. 

  1213. 	}
    1214. 

  1214. 

  1215. 	return SUCCESS;
    1216. 

  1216. }
    1217. 

  1217. /* }}} */
    1218. 

  1218. 

  1219. /* {{{ static PHP_INI_MH(OnUpdate_mbstring_http_output_conv_mimetypes */
    1220. 

  1220. static PHP_INI_MH(OnUpdate_mbstring_http_output_conv_mimetypes)
    1221. 

  1221. {
    1222. 

  1222. 	zval tmp;
    1223. 

  1223. 	void *re = NULL;
    1224. 

  1224. 

  1225. 	if (!new_value) {
    1226. 

  1226. 		new_value = entry->orig_value;
    1227. 

  1227. 		new_value_length = entry->orig_value_length;
    1228. 

  1228. 	}
    1229. 

  1229. 	php_trim(new_value, new_value_length, NULL, 0, &tmp, 3 TSRMLS_CC);
    1230. 

  1230. 

  1231. 	if (Z_STRLEN(tmp) > 0) {
    1232. 

  1232. 		if (!(re = _php_mb_compile_regex(Z_STRVAL(tmp) TSRMLS_CC))) {
    1233. 

  1233. 			zval_dtor(&tmp);
    1234. 

  1234. 			return FAILURE;
    1235. 

  1235. 		}
    1236. 

  1236. 	}
    1237. 

  1237. 

  1238. 	if (MBSTRG(http_output_conv_mimetypes)) {
    1239. 

  1239. 		_php_mb_free_regex(MBSTRG(http_output_conv_mimetypes));
    1240. 

  1240. 	}
    1241. 

  1241. 

  1242. 	MBSTRG(http_output_conv_mimetypes) = re;
    1243. 

  1243. 

  1244. 	zval_dtor(&tmp);
    1245. 

  1245. 	return SUCCESS;
    1246. 

  1246. }
    1247. 

  1247. /* }}} */
    1248. 

  1248. /* }}} */
    1249. 

  1249. 

  1250. /* {{{ php.ini directive registration */
    1251. 

  1251. PHP_INI_BEGIN()
    1252. 

  1252. 	PHP_INI_ENTRY("mbstring.language", "neutral", PHP_INI_ALL, OnUpdate_mbstring_language)
    1253. 

  1253. 	PHP_INI_ENTRY("mbstring.detect_order", NULL, PHP_INI_ALL, OnUpdate_mbstring_detect_order)
    1254. 

  1254. 	PHP_INI_ENTRY("mbstring.http_input", "pass", PHP_INI_ALL, OnUpdate_mbstring_http_input)
    1255. 

  1255. 	PHP_INI_ENTRY("mbstring.http_output", "pass", PHP_INI_ALL, OnUpdate_mbstring_http_output)
    1256. 

  1256. 	PHP_INI_ENTRY("mbstring.internal_encoding", NULL, PHP_INI_ALL, OnUpdate_mbstring_internal_encoding)
    1257. 

  1257. #ifdef ZEND_MULTIBYTE
    1258. 

  1258. 	PHP_INI_ENTRY("mbstring.script_encoding", NULL, PHP_INI_ALL, OnUpdate_mbstring_script_encoding)
    1259. 

  1259. #endif /* ZEND_MULTIBYTE */
    1260. 

  1260. 	PHP_INI_ENTRY("mbstring.substitute_character", NULL, PHP_INI_ALL, OnUpdate_mbstring_substitute_character)
    1261. 

  1261. 	STD_PHP_INI_ENTRY("mbstring.func_overload", "0", 
    1262. 

  1262. 	PHP_INI_SYSTEM, OnUpdateLong, func_overload, zend_mbstring_globals, mbstring_globals)
    1263. 

  1263. 

  1264. 	STD_PHP_INI_BOOLEAN("mbstring.encoding_translation", "0",
    1265. 

  1265. 		PHP_INI_SYSTEM | PHP_INI_PERDIR,
    1266. 

  1266. 		OnUpdate_mbstring_encoding_translation, 
    1267. 

  1267. 		encoding_translation, zend_mbstring_globals, mbstring_globals)					 
    1268. 

  1268. 	PHP_INI_ENTRY("mbstring.http_output_conv_mimetypes",
    1269. 

  1269. 		"^(text/|application/xhtml\\+xml)",
    1270. 

  1270. 		PHP_INI_ALL,
    1271. 

  1271. 		OnUpdate_mbstring_http_output_conv_mimetypes)
    1272. 

  1272. 

  1273. 	STD_PHP_INI_BOOLEAN("mbstring.strict_detection", "0",
    1274. 

  1274. 		PHP_INI_ALL,
    1275. 

  1275. 		OnUpdateLong,
    1276. 

  1276. 		strict_detection, zend_mbstring_globals, mbstring_globals)
    1277. 

  1277. PHP_INI_END()
    1278. 

  1278. /* }}} */
    1279. 

  1279. 

  1280. /* {{{ module global initialize handler */
    1281. 

  1281. static PHP_GINIT_FUNCTION(mbstring)
    1282. 

  1282. {
    1283. 

  1283. 	mbstring_globals->language = mbfl_no_language_uni;
    1284. 

  1284. 	mbstring_globals->internal_encoding = mbfl_no_encoding_invalid;
    1285. 

  1285. 	mbstring_globals->current_internal_encoding = mbstring_globals->internal_encoding;
    1286. 

  1286. #ifdef ZEND_MULTIBYTE
    1287. 

  1287. 	mbstring_globals->script_encoding_list = NULL;
    1288. 

  1288. 	mbstring_globals->script_encoding_list_size = 0;
    1289. 

  1289. #endif /* ZEND_MULTIBYTE */
    1290. 

  1290. 	mbstring_globals->http_output_encoding = mbfl_no_encoding_pass;
    1291. 

  1291. 	mbstring_globals->current_http_output_encoding = mbfl_no_encoding_pass;
    1292. 

  1292. 	mbstring_globals->http_input_identify = mbfl_no_encoding_invalid;
    1293. 

  1293. 	mbstring_globals->http_input_identify_get = mbfl_no_encoding_invalid;
    1294. 

  1294. 	mbstring_globals->http_input_identify_post = mbfl_no_encoding_invalid;
    1295. 

  1295. 	mbstring_globals->http_input_identify_cookie = mbfl_no_encoding_invalid;
    1296. 

  1296. 	mbstring_globals->http_input_identify_string = mbfl_no_encoding_invalid;
    1297. 

  1297. 	mbstring_globals->http_input_list = NULL;
    1298. 

  1298. 	mbstring_globals->http_input_list_size = 0;
    1299. 

  1299. 	mbstring_globals->detect_order_list = NULL;
    1300. 

  1300. 	mbstring_globals->detect_order_list_size = 0;
    1301. 

  1301. 	mbstring_globals->current_detect_order_list = NULL;
    1302. 

  1302. 	mbstring_globals->current_detect_order_list_size = 0;
    1303. 

  1303. 	mbstring_globals->default_detect_order_list = (enum mbfl_no_encoding *) php_mb_default_identify_list_neut;
    1304. 

  1304. 	mbstring_globals->default_detect_order_list_size = sizeof(php_mb_default_identify_list_neut) / sizeof(php_mb_default_identify_list_neut[0]);
    1305. 

  1305. 	mbstring_globals->filter_illegal_mode = MBFL_OUTPUTFILTER_ILLEGAL_MODE_CHAR;
    1306. 

  1306. 	mbstring_globals->filter_illegal_substchar = 0x3f;	/* '?' */
    1307. 

  1307. 	mbstring_globals->current_filter_illegal_mode = MBFL_OUTPUTFILTER_ILLEGAL_MODE_CHAR;
    1308. 

  1308. 	mbstring_globals->current_filter_illegal_substchar = 0x3f;	/* '?' */
    1309. 

  1309. 	mbstring_globals->illegalchars = 0;
    1310. 

  1310. 	mbstring_globals->func_overload = 0;
    1311. 

  1311. 	mbstring_globals->encoding_translation = 0;
    1312. 

  1312. 	mbstring_globals->strict_detection = 0;
    1313. 

  1313. 	mbstring_globals->outconv = NULL;
    1314. 

  1314. 	mbstring_globals->http_output_conv_mimetypes = NULL;
    1315. 

  1315. #if HAVE_MBREGEX
    1316. 

  1316. 	mbstring_globals->mb_regex_globals = php_mb_regex_globals_alloc(TSRMLS_C);
    1317. 

  1317. #endif
    1318. 

  1318. }
    1319. 

  1319. /* }}} */
    1320. 

  1320. 

  1321. /* {{{ PHP_GSHUTDOWN_FUNCTION */
    1322. 

  1322. static PHP_GSHUTDOWN_FUNCTION(mbstring)
    1323. 

  1323. {
    1324. 

  1324. 	if (mbstring_globals->http_input_list) {
    1325. 

  1325. 		free(mbstring_globals->http_input_list);
    1326. 

  1326. 	}
    1327. 

  1327. #ifdef ZEND_MULTIBYTE
    1328. 

  1328. 	if (mbstring_globals->script_encoding_list) {
    1329. 

  1329. 		free(mbstring_globals->script_encoding_list);
    1330. 

  1330. 	}
    1331. 

  1331. #endif /* ZEND_MULTIBYTE */
    1332. 

  1332. 	if (mbstring_globals->detect_order_list) {
    1333. 

  1333. 		free(mbstring_globals->detect_order_list);
    1334. 

  1334. 	}
    1335. 

  1335. 	if (mbstring_globals->http_output_conv_mimetypes) {
    1336. 

  1336. 		_php_mb_free_regex(mbstring_globals->http_output_conv_mimetypes);
    1337. 

  1337. 	}
    1338. 

  1338. #if HAVE_MBREGEX
    1339. 

  1339. 	php_mb_regex_globals_free(mbstring_globals->mb_regex_globals TSRMLS_CC);
    1340. 

  1340. #endif
    1341. 

  1341. }
    1342. 

  1342. /* }}} */
    1343. 

  1343. 

  1344. /* {{{ PHP_MINIT_FUNCTION(mbstring) */
    1345. 

  1345. PHP_MINIT_FUNCTION(mbstring)
    1346. 

  1346. {
    1347. 

  1347. 	__mbfl_allocators = &_php_mb_allocators;
    1348. 

  1348. 

  1349. 	REGISTER_INI_ENTRIES();
    1350. 

  1350. 

  1351. 	/* This is a global handler. Should not be set in a per-request handler. */
    1352. 

  1352. 	sapi_register_treat_data(mbstr_treat_data);
    1353. 

  1353. 

  1354. 	/* Post handlers are stored in the thread-local context. */
    1355. 

  1355. 	if (MBSTRG(encoding_translation)) {
    1356. 

  1356. 		sapi_register_post_entries(mbstr_post_entries TSRMLS_CC);
    1357. 

  1357. 	}
    1358. 

  1358. 

  1359. 	REGISTER_LONG_CONSTANT("MB_OVERLOAD_MAIL", MB_OVERLOAD_MAIL, CONST_CS | CONST_PERSISTENT);
    1360. 

  1360. 	REGISTER_LONG_CONSTANT("MB_OVERLOAD_STRING", MB_OVERLOAD_STRING, CONST_CS | CONST_PERSISTENT);
    1361. 

  1361. 	REGISTER_LONG_CONSTANT("MB_OVERLOAD_REGEX", MB_OVERLOAD_REGEX, CONST_CS | CONST_PERSISTENT);
    1362. 

  1362. 

  1363. 	REGISTER_LONG_CONSTANT("MB_CASE_UPPER", PHP_UNICODE_CASE_UPPER, CONST_CS | CONST_PERSISTENT);
    1364. 

  1364. 	REGISTER_LONG_CONSTANT("MB_CASE_LOWER", PHP_UNICODE_CASE_LOWER, CONST_CS | CONST_PERSISTENT);
    1365. 

  1365. 	REGISTER_LONG_CONSTANT("MB_CASE_TITLE", PHP_UNICODE_CASE_TITLE, CONST_CS | CONST_PERSISTENT);
    1366. 

  1366. 

  1367. #if HAVE_MBREGEX
    1368. 

  1368. 	PHP_MINIT(mb_regex) (INIT_FUNC_ARGS_PASSTHRU);
    1369. 

  1369. #endif
    1370. 

  1370. 	return SUCCESS;
    1371. 

  1371. }
    1372. 

  1372. /* }}} */
    1373. 

  1373. 

  1374. /* {{{ PHP_MSHUTDOWN_FUNCTION(mbstring) */
    1375. 

  1375. PHP_MSHUTDOWN_FUNCTION(mbstring)
    1376. 

  1376. {
    1377. 

  1377. 	UNREGISTER_INI_ENTRIES();
    1378. 

  1378. 	
    1379. 

  1379. #if HAVE_MBREGEX
    1380. 

  1380. 	PHP_MSHUTDOWN(mb_regex) (INIT_FUNC_ARGS_PASSTHRU);
    1381. 

  1381. #endif
    1382. 

  1382. 

  1383. 	return SUCCESS;
    1384. 

  1384. }
    1385. 

  1385. /* }}} */
    1386. 

  1386. 

  1387. /* {{{ PHP_RINIT_FUNCTION(mbstring) */
    1388. 

  1388. PHP_RINIT_FUNCTION(mbstring)
    1389. 

  1389. {
    1390. 

  1390. 	int n;
    1391. 

  1391. 	enum mbfl_no_encoding *list=NULL, *entry;
    1392. 

  1392. 	zend_function *func, *orig;
    1393. 

  1393. 	const struct mb_overload_def *p;
    1394. 

  1394. 

  1395. 	MBSTRG(current_internal_encoding) = MBSTRG(internal_encoding);
    1396. 

  1396. 	MBSTRG(current_http_output_encoding) = MBSTRG(http_output_encoding);
    1397. 

  1397. 	MBSTRG(current_filter_illegal_mode) = MBSTRG(filter_illegal_mode);
    1398. 

  1398. 	MBSTRG(current_filter_illegal_substchar) = MBSTRG(filter_illegal_substchar);
    1399. 

  1399. 

  1400. 	MBSTRG(illegalchars) = 0;
    1401. 

  1401. 

  1402. 	n = 0;
    1403. 

  1403. 	if (MBSTRG(detect_order_list)) {
    1404. 

  1404. 		list = MBSTRG(detect_order_list);
    1405. 

  1405. 		n = MBSTRG(detect_order_list_size);
    1406. 

  1406. 	}
    1407. 

  1407. 	if (n <= 0) {
    1408. 

  1408. 		list = MBSTRG(default_detect_order_list);
    1409. 

  1409. 		n = MBSTRG(default_detect_order_list_size);
    1410. 

  1410. 	}
    1411. 

  1411. 	entry = (enum mbfl_no_encoding *)safe_emalloc(n, sizeof(int), 0);
    1412. 

  1412. 	MBSTRG(current_detect_order_list) = entry;
    1413. 

  1413. 	MBSTRG(current_detect_order_list_size) = n;
    1414. 

  1414. 	while (n > 0) {
    1415. 

  1415. 		*entry++ = *list++;
    1416. 

  1416. 		n--;
    1417. 

  1417. 	}
    1418. 

  1418. 

  1419.  	/* override original function. */
    1420. 

  1420. 	if (MBSTRG(func_overload)){
    1421. 

  1421. 		p = &(mb_ovld[0]);
    1422. 

  1422. 		
    1423. 

  1423. 		while (p->type > 0) {
    1424. 

  1424. 			if ((MBSTRG(func_overload) & p->type) == p->type && 
    1425. 

  1425. 				zend_hash_find(EG(function_table), p->save_func,
    1426. 

  1426. 					strlen(p->save_func)+1, (void **)&orig) != SUCCESS) {
    1427. 

  1427. 

  1428. 				zend_hash_find(EG(function_table), p->ovld_func, strlen(p->ovld_func)+1 , (void **)&func);
    1429. 

  1429. 				
    1430. 

  1430. 				if (zend_hash_find(EG(function_table), p->orig_func, strlen(p->orig_func)+1, (void **)&orig) != SUCCESS) {
    1431. 

  1431. 					php_error_docref("ref.mbstring" TSRMLS_CC, E_WARNING, "mbstring couldn't find function %s.", p->orig_func);
    1432. 

  1432. 					return FAILURE;
    1433. 

  1433. 				} else {
    1434. 

  1434. 					zend_hash_add(EG(function_table), p->save_func, strlen(p->save_func)+1, orig, sizeof(zend_function), NULL);
    1435. 

  1435. 

  1436. 					if (zend_hash_update(EG(function_table), p->orig_func, strlen(p->orig_func)+1, func, sizeof(zend_function), 
    1437. 

  1437. 						NULL) == FAILURE) {
    1438. 

  1438. 						php_error_docref("ref.mbstring" TSRMLS_CC, E_WARNING, "mbstring couldn't replace function %s.", p->orig_func);
    1439. 

  1439. 						return FAILURE;
    1440. 

  1440. 					}
    1441. 

  1441. 				}
    1442. 

  1442. 			}
    1443. 

  1443. 			p++;
    1444. 

  1444. 		}
    1445. 

  1445. 	}
    1446. 

  1446. #if HAVE_MBREGEX
    1447. 

  1447. 	PHP_RINIT(mb_regex) (INIT_FUNC_ARGS_PASSTHRU);
    1448. 

  1448. #endif
    1449. 

  1449. #ifdef ZEND_MULTIBYTE
    1450. 

  1450. 	zend_multibyte_set_internal_encoding(mbfl_no_encoding2name(MBSTRG(internal_encoding)) TSRMLS_CC);
    1451. 

  1451. 	php_mb_set_zend_encoding(TSRMLS_C);
    1452. 

  1452. #endif /* ZEND_MULTIBYTE */
    1453. 

  1453. 

  1454. 	return SUCCESS;
    1455. 

  1455. }
    1456. 

  1456. /* }}} */
    1457. 

  1457. 

  1458. /* {{{ PHP_RSHUTDOWN_FUNCTION(mbstring) */
    1459. 

  1459. PHP_RSHUTDOWN_FUNCTION(mbstring)
    1460. 

  1460. {
    1461. 

  1461. 	const struct mb_overload_def *p;
    1462. 

  1462. 	zend_function *orig;
    1463. 

  1463. 

  1464. 	if (MBSTRG(current_detect_order_list) != NULL) {
    1465. 

  1465. 		efree(MBSTRG(current_detect_order_list));
    1466. 

  1466. 		MBSTRG(current_detect_order_list) = NULL;
    1467. 

  1467. 		MBSTRG(current_detect_order_list_size) = 0;
    1468. 

  1468. 	}
    1469. 

  1469. 	if (MBSTRG(outconv) != NULL) {
    1470. 

  1470. 		MBSTRG(illegalchars) += mbfl_buffer_illegalchars(MBSTRG(outconv));
    1471. 

  1471. 		mbfl_buffer_converter_delete(MBSTRG(outconv));
    1472. 

  1472. 		MBSTRG(outconv) = NULL;
    1473. 

  1473. 	}
    1474. 

  1474. 

  1475. 	/* clear http input identification. */
    1476. 

  1476. 	MBSTRG(http_input_identify) = mbfl_no_encoding_invalid;
    1477. 

  1477. 	MBSTRG(http_input_identify_post) = mbfl_no_encoding_invalid;
    1478. 

  1478. 	MBSTRG(http_input_identify_get) = mbfl_no_encoding_invalid;
    1479. 

  1479. 	MBSTRG(http_input_identify_cookie) = mbfl_no_encoding_invalid;
    1480. 

  1480. 	MBSTRG(http_input_identify_string) = mbfl_no_encoding_invalid;
    1481. 

  1481. 

  1482.  	/*  clear overloaded function. */
    1483. 

  1483. 	if (MBSTRG(func_overload)){
    1484. 

  1484. 		p = &(mb_ovld[0]);
    1485. 

  1485. 		while (p->type > 0) {
    1486. 

  1486. 			if ((MBSTRG(func_overload) & p->type) == p->type && 
    1487. 

  1487. 				zend_hash_find(EG(function_table), p->save_func,
    1488. 

  1488. 							   strlen(p->save_func)+1, (void **)&orig) == SUCCESS) {
    1489. 

  1489. 				
    1490. 

  1490. 				zend_hash_update(EG(function_table), p->orig_func, strlen(p->orig_func)+1, orig, sizeof(zend_function), NULL);
    1491. 

  1491. 				zend_hash_del(EG(function_table), p->save_func, strlen(p->save_func)+1);
    1492. 

  1492. 			}
    1493. 

  1493. 			p++;
    1494. 

  1494. 		}
    1495. 

  1495. 	}
    1496. 

  1496. 

  1497. #if HAVE_MBREGEX
    1498. 

  1498. 	PHP_RSHUTDOWN(mb_regex) (INIT_FUNC_ARGS_PASSTHRU);
    1499. 

  1499. #endif
    1500. 

  1500. 

  1501. 	return SUCCESS;
    1502. 

  1502. }
    1503. 

  1503. /* }}} */
    1504. 

  1504. 

  1505. /* {{{ PHP_MINFO_FUNCTION(mbstring) */
    1506. 

  1506. PHP_MINFO_FUNCTION(mbstring)
    1507. 

  1507. {
    1508. 

  1508. 	php_info_print_table_start();
    1509. 

  1509. 	php_info_print_table_row(2, "Multibyte Support", "enabled");
    1510. 

  1510. 	php_info_print_table_row(2, "Multibyte string engine", "libmbfl");
    1511. 

  1511. 	php_info_print_table_row(2, "HTTP input encoding translation", MBSTRG(encoding_translation) ? "enabled": "disabled");	
    1512. 

  1512. 	php_info_print_table_end();
    1513. 

  1513. 

  1514. 	php_info_print_table_start();
    1515. 

  1515. 	php_info_print_table_header(1, "mbstring extension makes use of \"streamable kanji code filter and converter\", which is distributed under the GNU Lesser General Public License version 2.1.");
    1516. 

  1516. 	php_info_print_table_end();
    1517. 

  1517. 

  1518. #if HAVE_MBREGEX
    1519. 

  1519. 	PHP_MINFO(mb_regex)(ZEND_MODULE_INFO_FUNC_ARGS_PASSTHRU);
    1520. 

  1520. #endif
    1521. 

  1521. 

  1522. 	DISPLAY_INI_ENTRIES();
    1523. 

  1523. }
    1524. 

  1524. /* }}} */
    1525. 

  1525. 

  1526. /* {{{ proto string mb_language([string language])
    1527. 

  1527.    Sets the current language or Returns the current language as a string */
    1528. 

  1528. PHP_FUNCTION(mb_language)
    1529. 

  1529. {
    1530. 

  1530. 	char *name = NULL;
    1531. 

  1531. 	int name_len = 0;
    1532. 

  1532. 

  1533. 	if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "|s", &name, &name_len) == FAILURE) {
    1534. 

  1534. 		return;
    1535. 

  1535. 	}
    1536. 

  1536. 	if (name == NULL) {
    1537. 

  1537. 		RETVAL_STRING((char *)mbfl_no_language2name(MBSTRG(language)), 1);
    1538. 

  1538. 	} else {
    1539. 

  1539. 		if (FAILURE == zend_alter_ini_entry(
    1540. 

  1540. 				"mbstring.language", sizeof("mbstring.language"),
    1541. 

  1541. 				name, name_len, PHP_INI_USER, PHP_INI_STAGE_RUNTIME)) {
    1542. 

  1542. 			php_error_docref(NULL TSRMLS_CC, E_WARNING, "Unknown language \"%s\"", name);
    1543. 

  1543. 			RETVAL_FALSE;
    1544. 

  1544. 		} else {
    1545. 

  1545. 			RETVAL_TRUE;
    1546. 

  1546. 		}
    1547. 

  1547. 	}
    1548. 

  1548. }
    1549. 

  1549. /* }}} */
    1550. 

  1550. 

  1551. /* {{{ proto string mb_internal_encoding([string encoding])
    1552. 

  1552.    Sets the current internal encoding or Returns the current internal encoding as a string */
    1553. 

  1553. PHP_FUNCTION(mb_internal_encoding)
    1554. 

  1554. {
    1555. 

  1555. 	char *name = NULL;
    1556. 

  1556. 	int name_len;
    1557. 

  1557. 	enum mbfl_no_encoding no_encoding;
    1558. 

  1558. 

  1559. 	if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "|s", &name, &name_len) == FAILURE) {
    1560. 

  1560. 		RETURN_FALSE;
    1561. 

  1561. 	}
    1562. 

  1562. 	if (name == NULL) {
    1563. 

  1563. 		name = (char *)mbfl_no_encoding2name(MBSTRG(current_internal_encoding));
    1564. 

  1564. 		if (name != NULL) {
    1565. 

  1565. 			RETURN_STRING(name, 1);
    1566. 

  1566. 		} else {
    1567. 

  1567. 			RETURN_FALSE;
    1568. 

  1568. 		}
    1569. 

  1569. 	} else {
    1570. 

  1570. 		no_encoding = mbfl_name2no_encoding(name);
    1571. 

  1571. 		if (no_encoding == mbfl_no_encoding_invalid) {
    1572. 

  1572. 			php_error_docref(NULL TSRMLS_CC, E_WARNING, "Unknown encoding \"%s\"", name);
    1573. 

  1573. 			RETURN_FALSE;
    1574. 

  1574. 		} else {
    1575. 

  1575. 			MBSTRG(current_internal_encoding) = no_encoding;
    1576. 

  1576. #ifdef ZEND_MULTIBYTE
    1577. 

  1577. 			/* TODO: make independent from mbstring.encoding_translation? */
    1578. 

  1578. 			if (MBSTRG(encoding_translation)) {
    1579. 

  1579. 				zend_multibyte_set_internal_encoding(name TSRMLS_CC);
    1580. 

  1580. 			}
    1581. 

  1581. #endif /* ZEND_MULTIBYTE */
    1582. 

  1582. 			RETURN_TRUE;
    1583. 

  1583. 		}
    1584. 

  1584. 	}
    1585. 

  1585. }
    1586. 

  1586. /* }}} */
    1587. 

  1587. 

  1588. /* {{{ proto mixed mb_http_input([string type])
    1589. 

  1589.    Returns the input encoding */
    1590. 

  1590. PHP_FUNCTION(mb_http_input)
    1591. 

  1591. {
    1592. 

  1592. 	char *typ = NULL;
    1593. 

  1593. 	int typ_len;
    1594. 

  1594. 	int retname, n;
    1595. 

  1595. 	char *name, *list, *temp;
    1596. 

  1596. 	enum mbfl_no_encoding *entry;
    1597. 

  1597. 	enum mbfl_no_encoding result = mbfl_no_encoding_invalid;
    1598. 

  1598. 

  1599. 	retname = 1;
    1600. 

  1600.  	if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "|s", &typ, &typ_len) == FAILURE) {
    1601. 

  1601.  		RETURN_FALSE;
    1602. 

  1602.  	}
    1603. 

  1603.  	if (typ == NULL) {
    1604. 

  1604.  		result = MBSTRG(http_input_identify);
    1605. 

  1605.  	} else {
    1606. 

  1606.  		switch (*typ) {
    1607. 

  1607. 		case 'G':
    1608. 

  1608. 		case 'g':
    1609. 

  1609. 			result = MBSTRG(http_input_identify_get);
    1610. 

  1610. 			break;
    1611. 

  1611. 		case 'P':
    1612. 

  1612. 		case 'p':
    1613. 

  1613. 			result = MBSTRG(http_input_identify_post);
    1614. 

  1614. 			break;
    1615. 

  1615. 		case 'C':
    1616. 

  1616. 		case 'c':
    1617. 

  1617. 			result = MBSTRG(http_input_identify_cookie);
    1618. 

  1618. 			break;
    1619. 

  1619. 		case 'S':
    1620. 

  1620. 		case 's':
    1621. 

  1621. 			result = MBSTRG(http_input_identify_string);
    1622. 

  1622. 			break;
    1623. 

  1623. 		case 'I':
    1624. 

  1624. 		case 'i':
    1625. 

  1625. 			array_init(return_value);
    1626. 

  1626. 			entry = MBSTRG(http_input_list);
    1627. 

  1627. 			n = MBSTRG(http_input_list_size);
    1628. 

  1628. 			while (n > 0) {
    1629. 

  1629. 				name = (char *)mbfl_no_encoding2name(*entry);
    1630. 

  1630. 				if (name) {
    1631. 

  1631. 					add_next_index_string(return_value, name, 1);
    1632. 

  1632. 				}
    1633. 

  1633. 				entry++;
    1634. 

  1634. 				n--;
    1635. 

  1635. 			}
    1636. 

  1636. 			retname = 0;
    1637. 

  1637. 			break;
    1638. 

  1638. 		case 'L':
    1639. 

  1639. 		case 'l':
    1640. 

  1640. 			entry = MBSTRG(http_input_list);
    1641. 

  1641. 			n = MBSTRG(http_input_list_size);
    1642. 

  1642. 			list = NULL;
    1643. 

  1643. 			while (n > 0) {
    1644. 

  1644. 				name = (char *)mbfl_no_encoding2name(*entry);
    1645. 

  1645. 				if (name) {
    1646. 

  1646. 					if (list) {
    1647. 

  1647. 						temp = list;
    1648. 

  1648. 						spprintf(&list, 0, "%s,%s", temp, name);
    1649. 

  1649. 						efree(temp);
    1650. 

  1650. 						if (!list) { 
    1651. 

  1651. 							break;
    1652. 

  1652. 						}
    1653. 

  1653. 					} else {
    1654. 

  1654. 						list = estrdup(name);
    1655. 

  1655. 					}
    1656. 

  1656. 				}
    1657. 

  1657. 				entry++;
    1658. 

  1658. 				n--;
    1659. 

  1659. 			}
    1660. 

  1660. 			if (!list) {
    1661. 

  1661. 				RETURN_FALSE;
    1662. 

  1662. 			}
    1663. 

  1663. 			RETVAL_STRING(list, 0);
    1664. 

  1664. 			retname = 0;
    1665. 

  1665. 			break;
    1666. 

  1666. 		default:
    1667. 

  1667. 			result = MBSTRG(http_input_identify);
    1668. 

  1668. 			break;
    1669. 

  1669. 		}
    1670. 

  1670. 	}
    1671. 

  1671. 

  1672. 	if (retname) {
    1673. 

  1673. 		if (result != mbfl_no_encoding_invalid &&
    1674. 

  1674. …
    1675.

Large files files are truncated, but you can click here to view the full file