diff options
Diffstat (limited to 'ext/mbstring/mb_gpc.c')
-rw-r--r-- | ext/mbstring/mb_gpc.c | 398 |
1 files changed, 398 insertions, 0 deletions
diff --git a/ext/mbstring/mb_gpc.c b/ext/mbstring/mb_gpc.c new file mode 100644 index 0000000..5ecc8f3 --- /dev/null +++ b/ext/mbstring/mb_gpc.c @@ -0,0 +1,398 @@ +/* + +----------------------------------------------------------------------+ + | PHP Version 5 | + +----------------------------------------------------------------------+ + | Copyright (c) 1997-2013 The PHP Group | + +----------------------------------------------------------------------+ + | This source file is subject to version 3.01 of the PHP license, | + | that is bundled with this package in the file LICENSE, and is | + | available through the world-wide-web at the following url: | + | http://www.php.net/license/3_01.txt | + | If you did not receive a copy of the PHP license and are unable to | + | obtain it through the world-wide-web, please send a note to | + | license@php.net so we can mail you a copy immediately. | + +----------------------------------------------------------------------+ + | Author: Rui Hirokawa <hirokawa@php.net> | + | Moriyoshi Koizumi <moriyoshi@php.net> | + +----------------------------------------------------------------------+ + */ + +/* $Id$ */ + +/* {{{ includes */ +#ifdef HAVE_CONFIG_H +#include "config.h" +#endif + +#include "php.h" +#include "php_ini.h" +#include "php_variables.h" +#include "libmbfl/mbfl/mbfilter_pass.h" +#include "mbstring.h" +#include "ext/standard/php_string.h" +#include "ext/standard/php_mail.h" +#include "ext/standard/url.h" +#include "main/php_output.h" +#include "ext/standard/info.h" + +#include "php_variables.h" +#include "php_globals.h" +#include "rfc1867.h" +#include "php_content_types.h" +#include "SAPI.h" +#include "TSRM.h" + +#include "mb_gpc.h" +/* }}} */ + +#if HAVE_MBSTRING + +ZEND_EXTERN_MODULE_GLOBALS(mbstring) + +/* {{{ MBSTRING_API SAPI_TREAT_DATA_FUNC(mbstr_treat_data) + * http input processing */ +MBSTRING_API SAPI_TREAT_DATA_FUNC(mbstr_treat_data) +{ + char *res = NULL, *separator=NULL; + const char *c_var; + zval *array_ptr; + int free_buffer=0; + const mbfl_encoding *detected; + php_mb_encoding_handler_info_t info; + + if (arg != PARSE_STRING) { + char *value = MBSTRG(internal_encoding_name); + _php_mb_ini_mbstring_internal_encoding_set(value, value ? strlen(value): 0 TSRMLS_CC); + } + + if (!MBSTRG(encoding_translation)) { + php_default_treat_data(arg, str, destArray TSRMLS_CC); + return; + } + + switch (arg) { + case PARSE_POST: + case PARSE_GET: + case PARSE_COOKIE: + ALLOC_ZVAL(array_ptr); + array_init(array_ptr); + INIT_PZVAL(array_ptr); + switch (arg) { + case PARSE_POST: + PG(http_globals)[TRACK_VARS_POST] = array_ptr; + break; + case PARSE_GET: + PG(http_globals)[TRACK_VARS_GET] = array_ptr; + break; + case PARSE_COOKIE: + PG(http_globals)[TRACK_VARS_COOKIE] = array_ptr; + break; + } + break; + default: + array_ptr=destArray; + break; + } + + if (arg==PARSE_POST) { + sapi_handle_post(array_ptr TSRMLS_CC); + return; + } + + if (arg == PARSE_GET) { /* GET data */ + c_var = SG(request_info).query_string; + if (c_var && *c_var) { + res = (char *) estrdup(c_var); + free_buffer = 1; + } else { + free_buffer = 0; + } + } else if (arg == PARSE_COOKIE) { /* Cookie data */ + c_var = SG(request_info).cookie_data; + if (c_var && *c_var) { + res = (char *) estrdup(c_var); + free_buffer = 1; + } else { + free_buffer = 0; + } + } else if (arg == PARSE_STRING) { /* String data */ + res = str; + free_buffer = 1; + } + + if (!res) { + return; + } + + switch (arg) { + case PARSE_POST: + case PARSE_GET: + case PARSE_STRING: + separator = (char *) estrdup(PG(arg_separator).input); + break; + case PARSE_COOKIE: + separator = ";\0"; + break; + } + + switch(arg) { + case PARSE_POST: + MBSTRG(http_input_identify_post) = NULL; + break; + case PARSE_GET: + MBSTRG(http_input_identify_get) = NULL; + break; + case PARSE_COOKIE: + MBSTRG(http_input_identify_cookie) = NULL; + break; + case PARSE_STRING: + MBSTRG(http_input_identify_string) = NULL; + break; + } + + info.data_type = arg; + info.separator = separator; + info.report_errors = 0; + info.to_encoding = MBSTRG(internal_encoding); + info.to_language = MBSTRG(language); + info.from_encodings = MBSTRG(http_input_list); + info.num_from_encodings = MBSTRG(http_input_list_size); + info.from_language = MBSTRG(language); + + MBSTRG(illegalchars) = 0; + + detected = _php_mb_encoding_handler_ex(&info, array_ptr, res TSRMLS_CC); + MBSTRG(http_input_identify) = detected; + + if (detected) { + switch(arg){ + case PARSE_POST: + MBSTRG(http_input_identify_post) = detected; + break; + case PARSE_GET: + MBSTRG(http_input_identify_get) = detected; + break; + case PARSE_COOKIE: + MBSTRG(http_input_identify_cookie) = detected; + break; + case PARSE_STRING: + MBSTRG(http_input_identify_string) = detected; + break; + } + } + + if (arg != PARSE_COOKIE) { + efree(separator); + } + + if (free_buffer) { + efree(res); + } +} +/* }}} */ + +/* {{{ mbfl_no_encoding _php_mb_encoding_handler_ex() */ +const mbfl_encoding *_php_mb_encoding_handler_ex(const php_mb_encoding_handler_info_t *info, zval *arg, char *res TSRMLS_DC) +{ + char *var, *val; + const char *s1, *s2; + char *strtok_buf = NULL, **val_list = NULL; + zval *array_ptr = (zval *) arg; + int n, num, *len_list = NULL; + unsigned int val_len, new_val_len; + mbfl_string string, resvar, resval; + const mbfl_encoding *from_encoding = NULL; + mbfl_encoding_detector *identd = NULL; + mbfl_buffer_converter *convd = NULL; + + mbfl_string_init_set(&string, info->to_language, info->to_encoding->no_encoding); + mbfl_string_init_set(&resvar, info->to_language, info->to_encoding->no_encoding); + mbfl_string_init_set(&resval, info->to_language, info->to_encoding->no_encoding); + + if (!res || *res == '\0') { + goto out; + } + + /* count the variables(separators) contained in the "res". + * separator may contain multiple separator chars. + */ + num = 1; + for (s1=res; *s1 != '\0'; s1++) { + for (s2=info->separator; *s2 != '\0'; s2++) { + if (*s1 == *s2) { + num++; + } + } + } + num *= 2; /* need space for variable name and value */ + + val_list = (char **)ecalloc(num, sizeof(char *)); + len_list = (int *)ecalloc(num, sizeof(int)); + + /* split and decode the query */ + n = 0; + strtok_buf = NULL; + var = php_strtok_r(res, info->separator, &strtok_buf); + while (var) { + val = strchr(var, '='); + if (val) { /* have a value */ + len_list[n] = php_url_decode(var, val-var); + val_list[n] = var; + n++; + + *val++ = '\0'; + val_list[n] = val; + len_list[n] = php_url_decode(val, strlen(val)); + } else { + len_list[n] = php_url_decode(var, strlen(var)); + val_list[n] = var; + n++; + + val_list[n] = ""; + len_list[n] = 0; + } + n++; + var = php_strtok_r(NULL, info->separator, &strtok_buf); + } + + if (n > (PG(max_input_vars) * 2)) { + php_error_docref(NULL TSRMLS_CC, E_WARNING, "Input variables exceeded %ld. To increase the limit change max_input_vars in php.ini.", PG(max_input_vars)); + goto out; + } + + num = n; /* make sure to process initilized vars only */ + + /* initialize converter */ + if (info->num_from_encodings <= 0) { + from_encoding = &mbfl_encoding_pass; + } else if (info->num_from_encodings == 1) { + from_encoding = info->from_encodings[0]; + } else { + /* auto detect */ + from_encoding = NULL; + identd = mbfl_encoding_detector_new2(info->from_encodings, info->num_from_encodings, MBSTRG(strict_detection)); + if (identd != NULL) { + n = 0; + while (n < num) { + string.val = (unsigned char *)val_list[n]; + string.len = len_list[n]; + if (mbfl_encoding_detector_feed(identd, &string)) { + break; + } + n++; + } + from_encoding = mbfl_encoding_detector_judge2(identd); + mbfl_encoding_detector_delete(identd); + } + if (!from_encoding) { + if (info->report_errors) { + php_error_docref(NULL TSRMLS_CC, E_WARNING, "Unable to detect encoding"); + } + from_encoding = &mbfl_encoding_pass; + } + } + + convd = NULL; + if (from_encoding != &mbfl_encoding_pass) { + convd = mbfl_buffer_converter_new2(from_encoding, info->to_encoding, 0); + if (convd != NULL) { + mbfl_buffer_converter_illegal_mode(convd, MBSTRG(current_filter_illegal_mode)); + mbfl_buffer_converter_illegal_substchar(convd, MBSTRG(current_filter_illegal_substchar)); + } else { + if (info->report_errors) { + php_error_docref(NULL TSRMLS_CC, E_WARNING, "Unable to create converter"); + } + goto out; + } + } + + /* convert encoding */ + string.no_encoding = from_encoding->no_encoding; + + n = 0; + while (n < num) { + string.val = (unsigned char *)val_list[n]; + string.len = len_list[n]; + if (convd != NULL && mbfl_buffer_converter_feed_result(convd, &string, &resvar) != NULL) { + var = (char *)resvar.val; + } else { + var = val_list[n]; + } + n++; + string.val = (unsigned char *)val_list[n]; + string.len = len_list[n]; + if (convd != NULL && mbfl_buffer_converter_feed_result(convd, &string, &resval) != NULL) { + val = (char *)resval.val; + val_len = resval.len; + } else { + val = val_list[n]; + val_len = len_list[n]; + } + n++; + /* we need val to be emalloc()ed */ + val = estrndup(val, val_len); + if (sapi_module.input_filter(info->data_type, var, &val, val_len, &new_val_len TSRMLS_CC)) { + /* add variable to symbol table */ + php_register_variable_safe(var, val, new_val_len, array_ptr TSRMLS_CC); + } + efree(val); + + if (convd != NULL){ + mbfl_string_clear(&resvar); + mbfl_string_clear(&resval); + } + } + +out: + if (convd != NULL) { + MBSTRG(illegalchars) += mbfl_buffer_illegalchars(convd); + mbfl_buffer_converter_delete(convd); + } + if (val_list != NULL) { + efree((void *)val_list); + } + if (len_list != NULL) { + efree((void *)len_list); + } + + return from_encoding; +} +/* }}} */ + +/* {{{ SAPI_POST_HANDLER_FUNC(php_mb_post_handler) */ +SAPI_POST_HANDLER_FUNC(php_mb_post_handler) +{ + const mbfl_encoding *detected; + php_mb_encoding_handler_info_t info; + + MBSTRG(http_input_identify_post) = NULL; + + info.data_type = PARSE_POST; + info.separator = "&"; + info.report_errors = 0; + info.to_encoding = MBSTRG(internal_encoding); + info.to_language = MBSTRG(language); + info.from_encodings = MBSTRG(http_input_list); + info.num_from_encodings = MBSTRG(http_input_list_size); + info.from_language = MBSTRG(language); + + detected = _php_mb_encoding_handler_ex(&info, arg, SG(request_info).post_data TSRMLS_CC); + + MBSTRG(http_input_identify) = detected; + if (detected) { + MBSTRG(http_input_identify_post) = detected; + } +} +/* }}} */ + +#endif /* HAVE_MBSTRING */ + +/* + * Local variables: + * tab-width: 4 + * c-basic-offset: 4 + * End: + * vim600: fdm=marker + * vim: noet sw=4 ts=4 + */ + |