root/ext/mbstring/mb_gpc.c

/* [<][>][^][v][top][bottom][index][help] */

DEFINITIONS

This source file includes following definitions.
  1. ZEND_EXTERN_MODULE_GLOBALS
  2. _php_mb_encoding_handler_ex
  3. SAPI_POST_HANDLER_FUNC

   1 /*
   2    +----------------------------------------------------------------------+
   3    | PHP Version 5                                                        |
   4    +----------------------------------------------------------------------+
   5    | Copyright (c) 1997-2016 The PHP Group                                |
   6    +----------------------------------------------------------------------+
   7    | This source file is subject to version 3.01 of the PHP license,      |
   8    | that is bundled with this package in the file LICENSE, and is        |
   9    | available through the world-wide-web at the following url:           |
  10    | http://www.php.net/license/3_01.txt                                  |
  11    | If you did not receive a copy of the PHP license and are unable to   |
  12    | obtain it through the world-wide-web, please send a note to          |
  13    | license@php.net so we can mail you a copy immediately.               |
  14    +----------------------------------------------------------------------+
  15    | Author: Rui Hirokawa <hirokawa@php.net>                              |
  16    |         Moriyoshi Koizumi <moriyoshi@php.net>                        |
  17    +----------------------------------------------------------------------+
  18  */
  19 
  20 /* $Id$ */
  21 
  22 /* {{{ includes */
  23 #ifdef HAVE_CONFIG_H
  24 #include "config.h"
  25 #endif
  26 
  27 #include "php.h"
  28 #include "php_ini.h"
  29 #include "php_variables.h"
  30 #include "libmbfl/mbfl/mbfilter_pass.h"
  31 #include "mbstring.h"
  32 #include "ext/standard/php_string.h"
  33 #include "ext/standard/php_mail.h"
  34 #include "ext/standard/url.h"
  35 #include "main/php_output.h"
  36 #include "ext/standard/info.h"
  37 
  38 #include "php_variables.h"
  39 #include "php_globals.h"
  40 #include "rfc1867.h"
  41 #include "php_content_types.h"
  42 #include "SAPI.h"
  43 #include "TSRM.h"
  44 
  45 #include "mb_gpc.h"
  46 /* }}} */
  47 
  48 #if HAVE_MBSTRING
  49 
  50 ZEND_EXTERN_MODULE_GLOBALS(mbstring)
  51 
  52 /* {{{ MBSTRING_API SAPI_TREAT_DATA_FUNC(mbstr_treat_data)
  53  * http input processing */
  54 MBSTRING_API SAPI_TREAT_DATA_FUNC(mbstr_treat_data)
  55 {
  56         char *res = NULL, *separator=NULL;
  57         const char *c_var;
  58         zval *array_ptr;
  59         int free_buffer=0;
  60         const mbfl_encoding *detected;
  61         php_mb_encoding_handler_info_t info;
  62 
  63         if (arg != PARSE_STRING) {
  64                 char *value = MBSTRG(internal_encoding_name);
  65                 _php_mb_ini_mbstring_internal_encoding_set(value, value ? strlen(value): 0 TSRMLS_CC);
  66         }
  67 
  68         if (!MBSTRG(encoding_translation)) {
  69                 php_default_treat_data(arg, str, destArray TSRMLS_CC);
  70                 return;
  71         }
  72 
  73         switch (arg) {
  74                 case PARSE_POST:
  75                 case PARSE_GET:
  76                 case PARSE_COOKIE:
  77                         ALLOC_ZVAL(array_ptr);
  78                         array_init(array_ptr);
  79                         INIT_PZVAL(array_ptr);
  80                         switch (arg) {
  81                                 case PARSE_POST:
  82                                         PG(http_globals)[TRACK_VARS_POST] = array_ptr;
  83                                         break;
  84                                 case PARSE_GET:
  85                                         PG(http_globals)[TRACK_VARS_GET] = array_ptr;
  86                                         break;
  87                                 case PARSE_COOKIE:
  88                                         PG(http_globals)[TRACK_VARS_COOKIE] = array_ptr;
  89                                         break;
  90                         }
  91                         break;
  92                 default:
  93                         array_ptr=destArray;
  94                         break;
  95         }
  96 
  97         if (arg==PARSE_POST) { 
  98                 sapi_handle_post(array_ptr TSRMLS_CC);
  99                 return;
 100         }
 101 
 102         if (arg == PARSE_GET) {         /* GET data */
 103                 c_var = SG(request_info).query_string;
 104                 if (c_var && *c_var) {
 105                         res = (char *) estrdup(c_var);
 106                         free_buffer = 1;
 107                 } else {
 108                         free_buffer = 0;
 109                 }
 110         } else if (arg == PARSE_COOKIE) {               /* Cookie data */
 111                 c_var = SG(request_info).cookie_data;
 112                 if (c_var && *c_var) {
 113                         res = (char *) estrdup(c_var);
 114                         free_buffer = 1;
 115                 } else {
 116                         free_buffer = 0;
 117                 }
 118         } else if (arg == PARSE_STRING) {               /* String data */
 119                 res = str;
 120                 free_buffer = 1;
 121         }
 122 
 123         if (!res) {
 124                 return;
 125         }
 126 
 127         switch (arg) {
 128         case PARSE_POST:
 129         case PARSE_GET:
 130         case PARSE_STRING:
 131                 separator = (char *) estrdup(PG(arg_separator).input);
 132                 break;
 133         case PARSE_COOKIE:
 134                 separator = ";\0";
 135                 break;
 136         }
 137         
 138         switch(arg) {
 139         case PARSE_POST:
 140                 MBSTRG(http_input_identify_post) = NULL;
 141                 break;
 142         case PARSE_GET:
 143                 MBSTRG(http_input_identify_get) = NULL;
 144                 break;
 145         case PARSE_COOKIE:
 146                 MBSTRG(http_input_identify_cookie) = NULL;
 147                 break;
 148         case PARSE_STRING:
 149                 MBSTRG(http_input_identify_string) = NULL;
 150                 break;
 151         }
 152 
 153         info.data_type              = arg;
 154         info.separator              = separator; 
 155         info.report_errors          = 0;
 156         info.to_encoding            = MBSTRG(internal_encoding);
 157         info.to_language            = MBSTRG(language);
 158         info.from_encodings         = MBSTRG(http_input_list);
 159         info.num_from_encodings     = MBSTRG(http_input_list_size); 
 160         info.from_language          = MBSTRG(language);
 161 
 162         MBSTRG(illegalchars) = 0;
 163 
 164         detected = _php_mb_encoding_handler_ex(&info, array_ptr, res TSRMLS_CC);
 165         MBSTRG(http_input_identify) = detected;
 166 
 167         if (detected) {
 168                 switch(arg){
 169                 case PARSE_POST:
 170                         MBSTRG(http_input_identify_post) = detected;
 171                         break;
 172                 case PARSE_GET:
 173                         MBSTRG(http_input_identify_get) = detected;
 174                         break;
 175                 case PARSE_COOKIE:
 176                         MBSTRG(http_input_identify_cookie) = detected;
 177                         break;
 178                 case PARSE_STRING:
 179                         MBSTRG(http_input_identify_string) = detected;
 180                         break;
 181                 }
 182         }
 183 
 184         if (arg != PARSE_COOKIE) {
 185                 efree(separator);
 186         }
 187 
 188         if (free_buffer) {
 189                 efree(res);
 190         }
 191 }
 192 /* }}} */
 193 
 194 /* {{{ mbfl_no_encoding _php_mb_encoding_handler_ex() */
 195 const mbfl_encoding *_php_mb_encoding_handler_ex(const php_mb_encoding_handler_info_t *info, zval *arg, char *res TSRMLS_DC)
 196 {
 197         char *var, *val;
 198         const char *s1, *s2;
 199         char *strtok_buf = NULL, **val_list = NULL;
 200         zval *array_ptr = (zval *) arg;
 201         int n, num, *len_list = NULL;
 202         unsigned int val_len, new_val_len;
 203         mbfl_string string, resvar, resval;
 204         const mbfl_encoding *from_encoding = NULL;
 205         mbfl_encoding_detector *identd = NULL; 
 206         mbfl_buffer_converter *convd = NULL;
 207 
 208         mbfl_string_init_set(&string, info->to_language, info->to_encoding->no_encoding);
 209         mbfl_string_init_set(&resvar, info->to_language, info->to_encoding->no_encoding);
 210         mbfl_string_init_set(&resval, info->to_language, info->to_encoding->no_encoding);
 211 
 212         if (!res || *res == '\0') {
 213                 goto out;
 214         }
 215         
 216         /* count the variables(separators) contained in the "res".
 217          * separator may contain multiple separator chars.
 218          */
 219         num = 1;
 220         for (s1=res; *s1 != '\0'; s1++) {
 221                 for (s2=info->separator; *s2 != '\0'; s2++) {
 222                         if (*s1 == *s2) {
 223                                 num++;
 224                         }       
 225                 }
 226         }
 227         num *= 2; /* need space for variable name and value */
 228         
 229         val_list = (char **)ecalloc(num, sizeof(char *));
 230         len_list = (int *)ecalloc(num, sizeof(int));
 231 
 232         /* split and decode the query */
 233         n = 0;
 234         strtok_buf = NULL;
 235         var = php_strtok_r(res, info->separator, &strtok_buf);
 236         while (var)  {
 237                 val = strchr(var, '=');
 238                 if (val) { /* have a value */
 239                         len_list[n] = php_url_decode(var, val-var);
 240                         val_list[n] = var;
 241                         n++;
 242                         
 243                         *val++ = '\0';
 244                         val_list[n] = val;
 245                         len_list[n] = php_url_decode(val, strlen(val));
 246                 } else {
 247                         len_list[n] = php_url_decode(var, strlen(var));
 248                         val_list[n] = var;
 249                         n++;
 250                         
 251                         val_list[n] = "";
 252                         len_list[n] = 0;
 253                 }
 254                 n++;
 255                 var = php_strtok_r(NULL, info->separator, &strtok_buf);
 256         } 
 257 
 258         if (n > (PG(max_input_vars) * 2)) {
 259                 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));
 260                 goto out;
 261         }
 262 
 263         num = n; /* make sure to process initialized vars only */
 264         
 265         /* initialize converter */
 266         if (info->num_from_encodings <= 0) {
 267                 from_encoding = &mbfl_encoding_pass;
 268         } else if (info->num_from_encodings == 1) {
 269                 from_encoding = info->from_encodings[0];
 270         } else {
 271                 /* auto detect */
 272                 from_encoding = NULL;
 273                 identd = mbfl_encoding_detector_new2(info->from_encodings, info->num_from_encodings, MBSTRG(strict_detection));
 274                 if (identd != NULL) {
 275                         n = 0;
 276                         while (n < num) {
 277                                 string.val = (unsigned char *)val_list[n];
 278                                 string.len = len_list[n];
 279                                 if (mbfl_encoding_detector_feed(identd, &string)) {
 280                                         break;
 281                                 }
 282                                 n++;
 283                         }
 284                         from_encoding = mbfl_encoding_detector_judge2(identd);
 285                         mbfl_encoding_detector_delete(identd);
 286                 }
 287                 if (!from_encoding) {
 288                         if (info->report_errors) {
 289                                 php_error_docref(NULL TSRMLS_CC, E_WARNING, "Unable to detect encoding");
 290                         }
 291                         from_encoding = &mbfl_encoding_pass;
 292                 }
 293         }
 294 
 295         convd = NULL;
 296         if (from_encoding != &mbfl_encoding_pass) {
 297                 convd = mbfl_buffer_converter_new2(from_encoding, info->to_encoding, 0);
 298                 if (convd != NULL) {
 299                         mbfl_buffer_converter_illegal_mode(convd, MBSTRG(current_filter_illegal_mode));
 300                         mbfl_buffer_converter_illegal_substchar(convd, MBSTRG(current_filter_illegal_substchar));
 301                 } else {
 302                         if (info->report_errors) {
 303                                 php_error_docref(NULL TSRMLS_CC, E_WARNING, "Unable to create converter");
 304                         }
 305                         goto out;
 306                 }
 307         }
 308 
 309         /* convert encoding */
 310         string.no_encoding = from_encoding->no_encoding;
 311 
 312         n = 0;
 313         while (n < num) {
 314                 string.val = (unsigned char *)val_list[n];
 315                 string.len = len_list[n];
 316                 if (convd != NULL && mbfl_buffer_converter_feed_result(convd, &string, &resvar) != NULL) {
 317                         var = (char *)resvar.val;
 318                 } else {
 319                         var = val_list[n];
 320                 }
 321                 n++;
 322                 string.val = (unsigned char *)val_list[n];
 323                 string.len = len_list[n];
 324                 if (convd != NULL && mbfl_buffer_converter_feed_result(convd, &string, &resval) != NULL) {
 325                         val = (char *)resval.val;
 326                         val_len = resval.len;
 327                 } else {
 328                         val = val_list[n];
 329                         val_len = len_list[n];
 330                 }
 331                 n++;
 332                 /* we need val to be emalloc()ed */
 333                 val = estrndup(val, val_len);
 334                 if (sapi_module.input_filter(info->data_type, var, &val, val_len, &new_val_len TSRMLS_CC)) {
 335                         /* add variable to symbol table */
 336                         php_register_variable_safe(var, val, new_val_len, array_ptr TSRMLS_CC);
 337                 }
 338                 efree(val);
 339                 
 340                 if (convd != NULL){
 341                         mbfl_string_clear(&resvar);
 342                         mbfl_string_clear(&resval);
 343                 }
 344         }
 345 
 346 out:
 347         if (convd != NULL) {
 348                 MBSTRG(illegalchars) += mbfl_buffer_illegalchars(convd);
 349                 mbfl_buffer_converter_delete(convd);
 350         }
 351         if (val_list != NULL) {
 352                 efree((void *)val_list);
 353         }
 354         if (len_list != NULL) {
 355                 efree((void *)len_list);
 356         }
 357 
 358         return from_encoding;
 359 }
 360 /* }}} */
 361 
 362 /* {{{ SAPI_POST_HANDLER_FUNC(php_mb_post_handler) */
 363 SAPI_POST_HANDLER_FUNC(php_mb_post_handler)
 364 {
 365         const mbfl_encoding *detected;
 366         php_mb_encoding_handler_info_t info;
 367         char *post_data_str = NULL;
 368 
 369         MBSTRG(http_input_identify_post) = NULL;
 370 
 371         info.data_type              = PARSE_POST;
 372         info.separator              = "&";
 373         info.report_errors          = 0;
 374         info.to_encoding            = MBSTRG(internal_encoding);
 375         info.to_language            = MBSTRG(language);
 376         info.from_encodings         = MBSTRG(http_input_list);
 377         info.num_from_encodings     = MBSTRG(http_input_list_size); 
 378         info.from_language          = MBSTRG(language);
 379 
 380         php_stream_rewind(SG(request_info).request_body);
 381         php_stream_copy_to_mem(SG(request_info).request_body, &post_data_str, PHP_STREAM_COPY_ALL, 0);
 382         detected = _php_mb_encoding_handler_ex(&info, arg, post_data_str TSRMLS_CC);
 383         STR_FREE(post_data_str);
 384 
 385         MBSTRG(http_input_identify) = detected;
 386         if (detected) {
 387                 MBSTRG(http_input_identify_post) = detected;
 388         }
 389 }
 390 /* }}} */
 391 
 392 #endif /* HAVE_MBSTRING */
 393 
 394 /*
 395  * Local variables:
 396  * tab-width: 4
 397  * c-basic-offset: 4
 398  * End:
 399  * vim600: fdm=marker
 400  * vim: noet sw=4 ts=4
 401  */
 402 

/* [<][>][^][v][top][bottom][index][help] */