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 | Authors: Rasmus Lerdorf <rasmus@php.net> |
16 | Derick Rethans <derick@php.net> |
17 | Pierre-A. Joye <pierre@php.net> |
18 | Ilia Alshanetsky <iliaa@php.net> |
19 +----------------------------------------------------------------------+
20 */
21
22 /* $Id: 5b79667bd9a68977a9b4f7505223a8e216e04908 $ */
23
24 #ifdef HAVE_CONFIG_H
25 #include "config.h"
26 #endif
27
28 #include "php_filter.h"
29
30 ZEND_DECLARE_MODULE_GLOBALS(filter)
31
32 #include "filter_private.h"
33
34 typedef struct filter_list_entry {
35 const char *name;
36 int id;
37 void (*function)(PHP_INPUT_FILTER_PARAM_DECL);
38 } filter_list_entry;
39
40 /* {{{ filter_list */
41 static const filter_list_entry filter_list[] = {
42 { "int", FILTER_VALIDATE_INT, php_filter_int },
43 { "boolean", FILTER_VALIDATE_BOOLEAN, php_filter_boolean },
44 { "float", FILTER_VALIDATE_FLOAT, php_filter_float },
45
46 { "validate_regexp", FILTER_VALIDATE_REGEXP, php_filter_validate_regexp },
47 { "validate_url", FILTER_VALIDATE_URL, php_filter_validate_url },
48 { "validate_email", FILTER_VALIDATE_EMAIL, php_filter_validate_email },
49 { "validate_ip", FILTER_VALIDATE_IP, php_filter_validate_ip },
50 { "validate_mac", FILTER_VALIDATE_MAC, php_filter_validate_mac },
51
52 { "string", FILTER_SANITIZE_STRING, php_filter_string },
53 { "stripped", FILTER_SANITIZE_STRING, php_filter_string },
54 { "encoded", FILTER_SANITIZE_ENCODED, php_filter_encoded },
55 { "special_chars", FILTER_SANITIZE_SPECIAL_CHARS, php_filter_special_chars },
56 { "full_special_chars", FILTER_SANITIZE_FULL_SPECIAL_CHARS, php_filter_full_special_chars },
57 { "unsafe_raw", FILTER_UNSAFE_RAW, php_filter_unsafe_raw },
58 { "email", FILTER_SANITIZE_EMAIL, php_filter_email },
59 { "url", FILTER_SANITIZE_URL, php_filter_url },
60 { "number_int", FILTER_SANITIZE_NUMBER_INT, php_filter_number_int },
61 { "number_float", FILTER_SANITIZE_NUMBER_FLOAT, php_filter_number_float },
62 { "magic_quotes", FILTER_SANITIZE_MAGIC_QUOTES, php_filter_magic_quotes },
63
64 { "callback", FILTER_CALLBACK, php_filter_callback },
65 };
66 /* }}} */
67
68 #ifndef PARSE_ENV
69 #define PARSE_ENV 4
70 #endif
71
72 #ifndef PARSE_SERVER
73 #define PARSE_SERVER 5
74 #endif
75
76 #ifndef PARSE_SESSION
77 #define PARSE_SESSION 6
78 #endif
79
80 static unsigned int php_sapi_filter(int arg, char *var, char **val, unsigned int val_len, unsigned int *new_val_len TSRMLS_DC);
81 static unsigned int php_sapi_filter_init(TSRMLS_D);
82
83 /* {{{ arginfo */
84 ZEND_BEGIN_ARG_INFO_EX(arginfo_filter_input, 0, 0, 2)
85 ZEND_ARG_INFO(0, type)
86 ZEND_ARG_INFO(0, variable_name)
87 ZEND_ARG_INFO(0, filter)
88 ZEND_ARG_INFO(0, options)
89 ZEND_END_ARG_INFO()
90
91 ZEND_BEGIN_ARG_INFO_EX(arginfo_filter_var, 0, 0, 1)
92 ZEND_ARG_INFO(0, variable)
93 ZEND_ARG_INFO(0, filter)
94 ZEND_ARG_INFO(0, options)
95 ZEND_END_ARG_INFO()
96
97 ZEND_BEGIN_ARG_INFO_EX(arginfo_filter_input_array, 0, 0, 1)
98 ZEND_ARG_INFO(0, type)
99 ZEND_ARG_INFO(0, definition)
100 ZEND_ARG_INFO(0, add_empty)
101 ZEND_END_ARG_INFO()
102
103 ZEND_BEGIN_ARG_INFO_EX(arginfo_filter_var_array, 0, 0, 1)
104 ZEND_ARG_INFO(0, data)
105 ZEND_ARG_INFO(0, definition)
106 ZEND_ARG_INFO(0, add_empty)
107 ZEND_END_ARG_INFO()
108
109 ZEND_BEGIN_ARG_INFO(arginfo_filter_list, 0)
110 ZEND_END_ARG_INFO()
111
112 ZEND_BEGIN_ARG_INFO_EX(arginfo_filter_has_var, 0, 0, 2)
113 ZEND_ARG_INFO(0, type)
114 ZEND_ARG_INFO(0, variable_name)
115 ZEND_END_ARG_INFO()
116
117 ZEND_BEGIN_ARG_INFO_EX(arginfo_filter_id, 0, 0, 1)
118 ZEND_ARG_INFO(0, filtername)
119 ZEND_END_ARG_INFO()
120 /* }}} */
121
122 /* {{{ filter_functions[]
123 */
124 static const zend_function_entry filter_functions[] = {
125 PHP_FE(filter_input, arginfo_filter_input)
126 PHP_FE(filter_var, arginfo_filter_var)
127 PHP_FE(filter_input_array, arginfo_filter_input_array)
128 PHP_FE(filter_var_array, arginfo_filter_var_array)
129 PHP_FE(filter_list, arginfo_filter_list)
130 PHP_FE(filter_has_var, arginfo_filter_has_var)
131 PHP_FE(filter_id, arginfo_filter_id)
132 PHP_FE_END
133 };
134 /* }}} */
135
136 /* {{{ filter_module_entry
137 */
138 zend_module_entry filter_module_entry = {
139 #if ZEND_MODULE_API_NO >= 20010901
140 STANDARD_MODULE_HEADER,
141 #endif
142 "filter",
143 filter_functions,
144 PHP_MINIT(filter),
145 PHP_MSHUTDOWN(filter),
146 NULL,
147 PHP_RSHUTDOWN(filter),
148 PHP_MINFO(filter),
149 "0.11.0",
150 STANDARD_MODULE_PROPERTIES
151 };
152 /* }}} */
153
154 #ifdef COMPILE_DL_FILTER
155 ZEND_GET_MODULE(filter)
156 #endif
157
PHP_INI_MH(UpdateDefaultFilter)158 static PHP_INI_MH(UpdateDefaultFilter) /* {{{ */
159 {
160 int i, size = sizeof(filter_list) / sizeof(filter_list_entry);
161
162 for (i = 0; i < size; ++i) {
163 if ((strcasecmp(new_value, filter_list[i].name) == 0)) {
164 IF_G(default_filter) = filter_list[i].id;
165 return SUCCESS;
166 }
167 }
168 /* Fallback to the default filter */
169 IF_G(default_filter) = FILTER_DEFAULT;
170 return SUCCESS;
171 }
172 /* }}} */
173
174 /* {{{ PHP_INI
175 */
PHP_INI_MH(OnUpdateFlags)176 static PHP_INI_MH(OnUpdateFlags)
177 {
178 if (!new_value) {
179 IF_G(default_filter_flags) = FILTER_FLAG_NO_ENCODE_QUOTES;
180 } else {
181 IF_G(default_filter_flags) = atoi(new_value);
182 }
183 return SUCCESS;
184 }
185
186 PHP_INI_BEGIN()
187 STD_PHP_INI_ENTRY("filter.default", "unsafe_raw", PHP_INI_SYSTEM|PHP_INI_PERDIR, UpdateDefaultFilter, default_filter, zend_filter_globals, filter_globals)
188 PHP_INI_ENTRY("filter.default_flags", NULL, PHP_INI_SYSTEM|PHP_INI_PERDIR, OnUpdateFlags)
PHP_INI_END()189 PHP_INI_END()
190 /* }}} */
191
192 static void php_filter_init_globals(zend_filter_globals *filter_globals) /* {{{ */
193 {
194 filter_globals->post_array = NULL;
195 filter_globals->get_array = NULL;
196 filter_globals->cookie_array = NULL;
197 filter_globals->env_array = NULL;
198 filter_globals->server_array = NULL;
199 filter_globals->session_array = NULL;
200 filter_globals->default_filter = FILTER_DEFAULT;
201 }
202 /* }}} */
203
204 #define PARSE_REQUEST 99
205
206 /* {{{ PHP_MINIT_FUNCTION
207 */
PHP_MINIT_FUNCTION(filter)208 PHP_MINIT_FUNCTION(filter)
209 {
210 ZEND_INIT_MODULE_GLOBALS(filter, php_filter_init_globals, NULL);
211
212 REGISTER_INI_ENTRIES();
213
214 REGISTER_LONG_CONSTANT("INPUT_POST", PARSE_POST, CONST_CS | CONST_PERSISTENT);
215 REGISTER_LONG_CONSTANT("INPUT_GET", PARSE_GET, CONST_CS | CONST_PERSISTENT);
216 REGISTER_LONG_CONSTANT("INPUT_COOKIE", PARSE_COOKIE, CONST_CS | CONST_PERSISTENT);
217 REGISTER_LONG_CONSTANT("INPUT_ENV", PARSE_ENV, CONST_CS | CONST_PERSISTENT);
218 REGISTER_LONG_CONSTANT("INPUT_SERVER", PARSE_SERVER, CONST_CS | CONST_PERSISTENT);
219 REGISTER_LONG_CONSTANT("INPUT_SESSION", PARSE_SESSION, CONST_CS | CONST_PERSISTENT);
220 REGISTER_LONG_CONSTANT("INPUT_REQUEST", PARSE_REQUEST, CONST_CS | CONST_PERSISTENT);
221
222 REGISTER_LONG_CONSTANT("FILTER_FLAG_NONE", FILTER_FLAG_NONE, CONST_CS | CONST_PERSISTENT);
223
224 REGISTER_LONG_CONSTANT("FILTER_REQUIRE_SCALAR", FILTER_REQUIRE_SCALAR, CONST_CS | CONST_PERSISTENT);
225 REGISTER_LONG_CONSTANT("FILTER_REQUIRE_ARRAY", FILTER_REQUIRE_ARRAY, CONST_CS | CONST_PERSISTENT);
226 REGISTER_LONG_CONSTANT("FILTER_FORCE_ARRAY", FILTER_FORCE_ARRAY, CONST_CS | CONST_PERSISTENT);
227 REGISTER_LONG_CONSTANT("FILTER_NULL_ON_FAILURE", FILTER_NULL_ON_FAILURE, CONST_CS | CONST_PERSISTENT);
228
229 REGISTER_LONG_CONSTANT("FILTER_VALIDATE_INT", FILTER_VALIDATE_INT, CONST_CS | CONST_PERSISTENT);
230 REGISTER_LONG_CONSTANT("FILTER_VALIDATE_BOOLEAN", FILTER_VALIDATE_BOOLEAN, CONST_CS | CONST_PERSISTENT);
231 REGISTER_LONG_CONSTANT("FILTER_VALIDATE_FLOAT", FILTER_VALIDATE_FLOAT, CONST_CS | CONST_PERSISTENT);
232
233 REGISTER_LONG_CONSTANT("FILTER_VALIDATE_REGEXP", FILTER_VALIDATE_REGEXP, CONST_CS | CONST_PERSISTENT);
234 REGISTER_LONG_CONSTANT("FILTER_VALIDATE_URL", FILTER_VALIDATE_URL, CONST_CS | CONST_PERSISTENT);
235 REGISTER_LONG_CONSTANT("FILTER_VALIDATE_EMAIL", FILTER_VALIDATE_EMAIL, CONST_CS | CONST_PERSISTENT);
236 REGISTER_LONG_CONSTANT("FILTER_VALIDATE_IP", FILTER_VALIDATE_IP, CONST_CS | CONST_PERSISTENT);
237 REGISTER_LONG_CONSTANT("FILTER_VALIDATE_MAC", FILTER_VALIDATE_MAC, CONST_CS | CONST_PERSISTENT);
238
239 REGISTER_LONG_CONSTANT("FILTER_DEFAULT", FILTER_DEFAULT, CONST_CS | CONST_PERSISTENT);
240 REGISTER_LONG_CONSTANT("FILTER_UNSAFE_RAW", FILTER_UNSAFE_RAW, CONST_CS | CONST_PERSISTENT);
241
242 REGISTER_LONG_CONSTANT("FILTER_SANITIZE_STRING", FILTER_SANITIZE_STRING, CONST_CS | CONST_PERSISTENT);
243 REGISTER_LONG_CONSTANT("FILTER_SANITIZE_STRIPPED", FILTER_SANITIZE_STRING, CONST_CS | CONST_PERSISTENT);
244 REGISTER_LONG_CONSTANT("FILTER_SANITIZE_ENCODED", FILTER_SANITIZE_ENCODED, CONST_CS | CONST_PERSISTENT);
245 REGISTER_LONG_CONSTANT("FILTER_SANITIZE_SPECIAL_CHARS", FILTER_SANITIZE_SPECIAL_CHARS, CONST_CS | CONST_PERSISTENT);
246 REGISTER_LONG_CONSTANT("FILTER_SANITIZE_FULL_SPECIAL_CHARS", FILTER_SANITIZE_FULL_SPECIAL_CHARS, CONST_CS | CONST_PERSISTENT);
247 REGISTER_LONG_CONSTANT("FILTER_SANITIZE_EMAIL", FILTER_SANITIZE_EMAIL, CONST_CS | CONST_PERSISTENT);
248 REGISTER_LONG_CONSTANT("FILTER_SANITIZE_URL", FILTER_SANITIZE_URL, CONST_CS | CONST_PERSISTENT);
249 REGISTER_LONG_CONSTANT("FILTER_SANITIZE_NUMBER_INT", FILTER_SANITIZE_NUMBER_INT, CONST_CS | CONST_PERSISTENT);
250 REGISTER_LONG_CONSTANT("FILTER_SANITIZE_NUMBER_FLOAT", FILTER_SANITIZE_NUMBER_FLOAT, CONST_CS | CONST_PERSISTENT);
251 REGISTER_LONG_CONSTANT("FILTER_SANITIZE_MAGIC_QUOTES", FILTER_SANITIZE_MAGIC_QUOTES, CONST_CS | CONST_PERSISTENT);
252
253 REGISTER_LONG_CONSTANT("FILTER_CALLBACK", FILTER_CALLBACK, CONST_CS | CONST_PERSISTENT);
254
255 REGISTER_LONG_CONSTANT("FILTER_FLAG_ALLOW_OCTAL", FILTER_FLAG_ALLOW_OCTAL, CONST_CS | CONST_PERSISTENT);
256 REGISTER_LONG_CONSTANT("FILTER_FLAG_ALLOW_HEX", FILTER_FLAG_ALLOW_HEX, CONST_CS | CONST_PERSISTENT);
257
258 REGISTER_LONG_CONSTANT("FILTER_FLAG_STRIP_LOW", FILTER_FLAG_STRIP_LOW, CONST_CS | CONST_PERSISTENT);
259 REGISTER_LONG_CONSTANT("FILTER_FLAG_STRIP_HIGH", FILTER_FLAG_STRIP_HIGH, CONST_CS | CONST_PERSISTENT);
260 REGISTER_LONG_CONSTANT("FILTER_FLAG_STRIP_BACKTICK", FILTER_FLAG_STRIP_BACKTICK, CONST_CS | CONST_PERSISTENT);
261 REGISTER_LONG_CONSTANT("FILTER_FLAG_ENCODE_LOW", FILTER_FLAG_ENCODE_LOW, CONST_CS | CONST_PERSISTENT);
262 REGISTER_LONG_CONSTANT("FILTER_FLAG_ENCODE_HIGH", FILTER_FLAG_ENCODE_HIGH, CONST_CS | CONST_PERSISTENT);
263 REGISTER_LONG_CONSTANT("FILTER_FLAG_ENCODE_AMP", FILTER_FLAG_ENCODE_AMP, CONST_CS | CONST_PERSISTENT);
264 REGISTER_LONG_CONSTANT("FILTER_FLAG_NO_ENCODE_QUOTES", FILTER_FLAG_NO_ENCODE_QUOTES, CONST_CS | CONST_PERSISTENT);
265 REGISTER_LONG_CONSTANT("FILTER_FLAG_EMPTY_STRING_NULL", FILTER_FLAG_EMPTY_STRING_NULL, CONST_CS | CONST_PERSISTENT);
266
267 REGISTER_LONG_CONSTANT("FILTER_FLAG_ALLOW_FRACTION", FILTER_FLAG_ALLOW_FRACTION, CONST_CS | CONST_PERSISTENT);
268 REGISTER_LONG_CONSTANT("FILTER_FLAG_ALLOW_THOUSAND", FILTER_FLAG_ALLOW_THOUSAND, CONST_CS | CONST_PERSISTENT);
269 REGISTER_LONG_CONSTANT("FILTER_FLAG_ALLOW_SCIENTIFIC", FILTER_FLAG_ALLOW_SCIENTIFIC, CONST_CS | CONST_PERSISTENT);
270
271 REGISTER_LONG_CONSTANT("FILTER_FLAG_SCHEME_REQUIRED", FILTER_FLAG_SCHEME_REQUIRED, CONST_CS | CONST_PERSISTENT);
272 REGISTER_LONG_CONSTANT("FILTER_FLAG_HOST_REQUIRED", FILTER_FLAG_HOST_REQUIRED, CONST_CS | CONST_PERSISTENT);
273 REGISTER_LONG_CONSTANT("FILTER_FLAG_PATH_REQUIRED", FILTER_FLAG_PATH_REQUIRED, CONST_CS | CONST_PERSISTENT);
274 REGISTER_LONG_CONSTANT("FILTER_FLAG_QUERY_REQUIRED", FILTER_FLAG_QUERY_REQUIRED, CONST_CS | CONST_PERSISTENT);
275
276 REGISTER_LONG_CONSTANT("FILTER_FLAG_IPV4", FILTER_FLAG_IPV4, CONST_CS | CONST_PERSISTENT);
277 REGISTER_LONG_CONSTANT("FILTER_FLAG_IPV6", FILTER_FLAG_IPV6, CONST_CS | CONST_PERSISTENT);
278 REGISTER_LONG_CONSTANT("FILTER_FLAG_NO_RES_RANGE", FILTER_FLAG_NO_RES_RANGE, CONST_CS | CONST_PERSISTENT);
279 REGISTER_LONG_CONSTANT("FILTER_FLAG_NO_PRIV_RANGE", FILTER_FLAG_NO_PRIV_RANGE, CONST_CS | CONST_PERSISTENT);
280
281 sapi_register_input_filter(php_sapi_filter, php_sapi_filter_init TSRMLS_CC);
282
283 return SUCCESS;
284 }
285 /* }}} */
286
287 /* {{{ PHP_MSHUTDOWN_FUNCTION
288 */
PHP_MSHUTDOWN_FUNCTION(filter)289 PHP_MSHUTDOWN_FUNCTION(filter)
290 {
291 UNREGISTER_INI_ENTRIES();
292
293 return SUCCESS;
294 }
295 /* }}} */
296
297 /* {{{ PHP_RSHUTDOWN_FUNCTION
298 */
299 #define VAR_ARRAY_COPY_DTOR(a) \
300 if (IF_G(a)) { \
301 zval_ptr_dtor(&IF_G(a)); \
302 IF_G(a) = NULL; \
303 }
304
PHP_RSHUTDOWN_FUNCTION(filter)305 PHP_RSHUTDOWN_FUNCTION(filter)
306 {
307 VAR_ARRAY_COPY_DTOR(get_array)
308 VAR_ARRAY_COPY_DTOR(post_array)
309 VAR_ARRAY_COPY_DTOR(cookie_array)
310 VAR_ARRAY_COPY_DTOR(server_array)
311 VAR_ARRAY_COPY_DTOR(env_array)
312 VAR_ARRAY_COPY_DTOR(session_array)
313 return SUCCESS;
314 }
315 /* }}} */
316
317 /* {{{ PHP_MINFO_FUNCTION
318 */
PHP_MINFO_FUNCTION(filter)319 PHP_MINFO_FUNCTION(filter)
320 {
321 php_info_print_table_start();
322 php_info_print_table_row( 2, "Input Validation and Filtering", "enabled" );
323 php_info_print_table_row( 2, "Revision", "$Id: 5b79667bd9a68977a9b4f7505223a8e216e04908 $");
324 php_info_print_table_end();
325
326 DISPLAY_INI_ENTRIES();
327 }
328 /* }}} */
329
php_find_filter(long id)330 static filter_list_entry php_find_filter(long id) /* {{{ */
331 {
332 int i, size = sizeof(filter_list) / sizeof(filter_list_entry);
333
334 for (i = 0; i < size; ++i) {
335 if (filter_list[i].id == id) {
336 return filter_list[i];
337 }
338 }
339 /* Fallback to "string" filter */
340 for (i = 0; i < size; ++i) {
341 if (filter_list[i].id == FILTER_DEFAULT) {
342 return filter_list[i];
343 }
344 }
345 /* To shut up GCC */
346 return filter_list[0];
347 }
348 /* }}} */
349
php_sapi_filter_init(TSRMLS_D)350 static unsigned int php_sapi_filter_init(TSRMLS_D)
351 {
352 IF_G(get_array) = NULL;
353 IF_G(post_array) = NULL;
354 IF_G(cookie_array) = NULL;
355 IF_G(server_array) = NULL;
356 IF_G(env_array) = NULL;
357 IF_G(session_array) = NULL;
358 return SUCCESS;
359 }
360
php_zval_filter(zval ** value,long filter,long flags,zval * options,char * charset,zend_bool copy TSRMLS_DC)361 static void php_zval_filter(zval **value, long filter, long flags, zval *options, char* charset, zend_bool copy TSRMLS_DC) /* {{{ */
362 {
363 filter_list_entry filter_func;
364
365 filter_func = php_find_filter(filter);
366
367 if (!filter_func.id) {
368 /* Find default filter */
369 filter_func = php_find_filter(FILTER_DEFAULT);
370 }
371
372 if (copy) {
373 SEPARATE_ZVAL(value);
374 }
375
376 /* #49274, fatal error with object without a toString method
377 Fails nicely instead of getting a recovarable fatal error. */
378 if (Z_TYPE_PP(value) == IS_OBJECT) {
379 zend_class_entry *ce;
380
381 ce = Z_OBJCE_PP(value);
382 if (!ce->__tostring) {
383 zval_dtor(*value);
384 /* #67167: doesn't return null on failure for objects */
385 if (flags & FILTER_NULL_ON_FAILURE) {
386 ZVAL_NULL(*value);
387 } else {
388 ZVAL_FALSE(*value);
389 }
390 goto handle_default;
391 }
392 }
393
394 /* Here be strings */
395 convert_to_string(*value);
396
397 filter_func.function(*value, flags, options, charset TSRMLS_CC);
398
399 handle_default:
400 if (
401 options && (Z_TYPE_P(options) == IS_ARRAY || Z_TYPE_P(options) == IS_OBJECT) &&
402 ((flags & FILTER_NULL_ON_FAILURE && Z_TYPE_PP(value) == IS_NULL) ||
403 (!(flags & FILTER_NULL_ON_FAILURE) && Z_TYPE_PP(value) == IS_BOOL && Z_LVAL_PP(value) == 0)) &&
404 zend_hash_exists(HASH_OF(options), "default", sizeof("default"))
405 ) {
406 zval **tmp;
407 if (zend_hash_find(HASH_OF(options), "default", sizeof("default"), (void **)&tmp) == SUCCESS) {
408 MAKE_COPY_ZVAL(tmp, *value);
409 }
410 }
411 }
412 /* }}} */
413
php_sapi_filter(int arg,char * var,char ** val,unsigned int val_len,unsigned int * new_val_len TSRMLS_DC)414 static unsigned int php_sapi_filter(int arg, char *var, char **val, unsigned int val_len, unsigned int *new_val_len TSRMLS_DC) /* {{{ */
415 {
416 zval new_var, raw_var;
417 zval *array_ptr = NULL, *orig_array_ptr = NULL;
418 int retval = 0;
419
420 assert(*val != NULL);
421
422 #define PARSE_CASE(s,a,t) \
423 case s: \
424 if (!IF_G(a)) { \
425 ALLOC_ZVAL(array_ptr); \
426 array_init(array_ptr); \
427 INIT_PZVAL(array_ptr); \
428 IF_G(a) = array_ptr; \
429 } else { \
430 array_ptr = IF_G(a); \
431 } \
432 orig_array_ptr = PG(http_globals)[t]; \
433 break;
434
435 switch (arg) {
436 PARSE_CASE(PARSE_POST, post_array, TRACK_VARS_POST)
437 PARSE_CASE(PARSE_GET, get_array, TRACK_VARS_GET)
438 PARSE_CASE(PARSE_COOKIE, cookie_array, TRACK_VARS_COOKIE)
439 PARSE_CASE(PARSE_SERVER, server_array, TRACK_VARS_SERVER)
440 PARSE_CASE(PARSE_ENV, env_array, TRACK_VARS_ENV)
441
442 case PARSE_STRING: /* PARSE_STRING is used by parse_str() function */
443 retval = 1;
444 break;
445 }
446
447 /*
448 * According to rfc2965, more specific paths are listed above the less specific ones.
449 * If we encounter a duplicate cookie name, we should skip it, since it is not possible
450 * to have the same (plain text) cookie name for the same path and we should not overwrite
451 * more specific cookies with the less specific ones.
452 */
453 if (arg == PARSE_COOKIE && orig_array_ptr && zend_symtable_exists(Z_ARRVAL_P(orig_array_ptr), var, strlen(var)+1)) {
454 return 0;
455 }
456
457 if (array_ptr) {
458 /* Store the RAW variable internally */
459 Z_STRLEN(raw_var) = val_len;
460 Z_STRVAL(raw_var) = estrndup(*val, val_len);
461 Z_TYPE(raw_var) = IS_STRING;
462
463 php_register_variable_ex(var, &raw_var, array_ptr TSRMLS_CC);
464 }
465
466 if (val_len) {
467 /* Register mangled variable */
468 Z_STRLEN(new_var) = val_len;
469 Z_TYPE(new_var) = IS_STRING;
470
471 if (IF_G(default_filter) != FILTER_UNSAFE_RAW) {
472 zval *tmp_new_var = &new_var;
473 Z_STRVAL(new_var) = estrndup(*val, val_len);
474 INIT_PZVAL(tmp_new_var);
475 php_zval_filter(&tmp_new_var, IF_G(default_filter), IF_G(default_filter_flags), NULL, NULL/*charset*/, 0 TSRMLS_CC);
476 } else {
477 Z_STRVAL(new_var) = estrndup(*val, val_len);
478 }
479 } else { /* empty string */
480 ZVAL_EMPTY_STRING(&new_var);
481 }
482
483 if (orig_array_ptr) {
484 php_register_variable_ex(var, &new_var, orig_array_ptr TSRMLS_CC);
485 }
486
487 if (retval) {
488 if (new_val_len) {
489 *new_val_len = Z_STRLEN(new_var);
490 }
491 efree(*val);
492 if (Z_STRLEN(new_var)) {
493 *val = estrndup(Z_STRVAL(new_var), Z_STRLEN(new_var));
494 } else {
495 *val = estrdup("");
496 }
497 zval_dtor(&new_var);
498 }
499
500 return retval;
501 }
502 /* }}} */
503
php_zval_filter_recursive(zval ** value,long filter,long flags,zval * options,char * charset,zend_bool copy TSRMLS_DC)504 static void php_zval_filter_recursive(zval **value, long filter, long flags, zval *options, char *charset, zend_bool copy TSRMLS_DC) /* {{{ */
505 {
506 if (Z_TYPE_PP(value) == IS_ARRAY) {
507 zval **element;
508 HashPosition pos;
509
510 if (Z_ARRVAL_PP(value)->nApplyCount > 1) {
511 return;
512 }
513
514 for (zend_hash_internal_pointer_reset_ex(Z_ARRVAL_PP(value), &pos);
515 zend_hash_get_current_data_ex(Z_ARRVAL_PP(value), (void **) &element, &pos) == SUCCESS;
516 zend_hash_move_forward_ex(Z_ARRVAL_PP(value), &pos)
517 ) {
518 SEPARATE_ZVAL_IF_NOT_REF(element);
519 if (Z_TYPE_PP(element) == IS_ARRAY) {
520 Z_ARRVAL_PP(element)->nApplyCount++;
521 php_zval_filter_recursive(element, filter, flags, options, charset, copy TSRMLS_CC);
522 Z_ARRVAL_PP(element)->nApplyCount--;
523 } else {
524 php_zval_filter(element, filter, flags, options, charset, copy TSRMLS_CC);
525 }
526 }
527 } else {
528 php_zval_filter(value, filter, flags, options, charset, copy TSRMLS_CC);
529 }
530 }
531 /* }}} */
532
php_filter_get_storage(long arg TSRMLS_DC)533 static zval *php_filter_get_storage(long arg TSRMLS_DC)/* {{{ */
534
535 {
536 zval *array_ptr = NULL;
537
538 switch (arg) {
539 case PARSE_GET:
540 array_ptr = IF_G(get_array);
541 break;
542 case PARSE_POST:
543 array_ptr = IF_G(post_array);
544 break;
545 case PARSE_COOKIE:
546 array_ptr = IF_G(cookie_array);
547 break;
548 case PARSE_SERVER:
549 if (PG(auto_globals_jit)) {
550 zend_is_auto_global("_SERVER", sizeof("_SERVER")-1 TSRMLS_CC);
551 }
552 array_ptr = IF_G(server_array);
553 break;
554 case PARSE_ENV:
555 if (PG(auto_globals_jit)) {
556 zend_is_auto_global("_ENV", sizeof("_ENV")-1 TSRMLS_CC);
557 }
558 array_ptr = IF_G(env_array) ? IF_G(env_array) : PG(http_globals)[TRACK_VARS_ENV];
559 break;
560 case PARSE_SESSION:
561 /* FIXME: Implement session source */
562 php_error_docref(NULL TSRMLS_CC, E_WARNING, "INPUT_SESSION is not yet implemented");
563 break;
564 case PARSE_REQUEST:
565 /* FIXME: Implement request source */
566 php_error_docref(NULL TSRMLS_CC, E_WARNING, "INPUT_REQUEST is not yet implemented");
567 break;
568 }
569
570 return array_ptr;
571 }
572 /* }}} */
573
574 /* {{{ proto mixed filter_has_var(constant type, string variable_name)
575 * Returns true if the variable with the name 'name' exists in source.
576 */
PHP_FUNCTION(filter_has_var)577 PHP_FUNCTION(filter_has_var)
578 {
579 long arg;
580 char *var;
581 int var_len;
582 zval *array_ptr = NULL;
583
584 if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "ls", &arg, &var, &var_len) == FAILURE) {
585 RETURN_FALSE;
586 }
587
588 array_ptr = php_filter_get_storage(arg TSRMLS_CC);
589
590 if (array_ptr && HASH_OF(array_ptr) && zend_hash_exists(HASH_OF(array_ptr), var, var_len + 1)) {
591 RETURN_TRUE;
592 }
593
594 RETURN_FALSE;
595 }
596 /* }}} */
597
php_filter_call(zval ** filtered,long filter,zval ** filter_args,const int copy,long filter_flags TSRMLS_DC)598 static void php_filter_call(zval **filtered, long filter, zval **filter_args, const int copy, long filter_flags TSRMLS_DC) /* {{{ */
599 {
600 zval *options = NULL;
601 zval **option;
602 char *charset = NULL;
603
604 if (filter_args && Z_TYPE_PP(filter_args) != IS_ARRAY) {
605 long lval;
606
607 PHP_FILTER_GET_LONG_OPT(filter_args, lval);
608
609 if (filter != -1) { /* handler for array apply */
610 /* filter_args is the filter_flags */
611 filter_flags = lval;
612
613 if (!(filter_flags & FILTER_REQUIRE_ARRAY || filter_flags & FILTER_FORCE_ARRAY)) {
614 filter_flags |= FILTER_REQUIRE_SCALAR;
615 }
616 } else {
617 filter = lval;
618 }
619 } else if (filter_args) {
620 if (zend_hash_find(HASH_OF(*filter_args), "filter", sizeof("filter"), (void **)&option) == SUCCESS) {
621 PHP_FILTER_GET_LONG_OPT(option, filter);
622 }
623
624 if (zend_hash_find(HASH_OF(*filter_args), "flags", sizeof("flags"), (void **)&option) == SUCCESS) {
625 PHP_FILTER_GET_LONG_OPT(option, filter_flags);
626
627 if (!(filter_flags & FILTER_REQUIRE_ARRAY || filter_flags & FILTER_FORCE_ARRAY)) {
628 filter_flags |= FILTER_REQUIRE_SCALAR;
629 }
630 }
631
632 if (zend_hash_find(HASH_OF(*filter_args), "options", sizeof("options"), (void **)&option) == SUCCESS) {
633 if (filter != FILTER_CALLBACK) {
634 if (Z_TYPE_PP(option) == IS_ARRAY) {
635 options = *option;
636 }
637 } else {
638 options = *option;
639 filter_flags = 0;
640 }
641 }
642 }
643
644 if (Z_TYPE_PP(filtered) == IS_ARRAY) {
645 if (filter_flags & FILTER_REQUIRE_SCALAR) {
646 if (copy) {
647 SEPARATE_ZVAL(filtered);
648 }
649 zval_dtor(*filtered);
650 if (filter_flags & FILTER_NULL_ON_FAILURE) {
651 ZVAL_NULL(*filtered);
652 } else {
653 ZVAL_FALSE(*filtered);
654 }
655 return;
656 }
657 php_zval_filter_recursive(filtered, filter, filter_flags, options, charset, copy TSRMLS_CC);
658 return;
659 }
660 if (filter_flags & FILTER_REQUIRE_ARRAY) {
661 if (copy) {
662 SEPARATE_ZVAL(filtered);
663 }
664 zval_dtor(*filtered);
665 if (filter_flags & FILTER_NULL_ON_FAILURE) {
666 ZVAL_NULL(*filtered);
667 } else {
668 ZVAL_FALSE(*filtered);
669 }
670 return;
671 }
672
673 php_zval_filter(filtered, filter, filter_flags, options, charset, copy TSRMLS_CC);
674 if (filter_flags & FILTER_FORCE_ARRAY) {
675 zval *tmp;
676
677 ALLOC_ZVAL(tmp);
678 MAKE_COPY_ZVAL(filtered, tmp);
679
680 zval_dtor(*filtered);
681
682 array_init(*filtered);
683 add_next_index_zval(*filtered, tmp);
684 }
685 }
686 /* }}} */
687
php_filter_array_handler(zval * input,zval ** op,zval * return_value,zend_bool add_empty TSRMLS_DC)688 static void php_filter_array_handler(zval *input, zval **op, zval *return_value, zend_bool add_empty TSRMLS_DC) /* {{{ */
689 {
690 char *arg_key;
691 uint arg_key_len;
692 ulong index;
693 HashPosition pos;
694 zval **tmp, **arg_elm;
695
696 if (!op) {
697 zval_dtor(return_value);
698 MAKE_COPY_ZVAL(&input, return_value);
699 php_filter_call(&return_value, FILTER_DEFAULT, NULL, 0, FILTER_REQUIRE_ARRAY TSRMLS_CC);
700 } else if (Z_TYPE_PP(op) == IS_LONG) {
701 zval_dtor(return_value);
702 MAKE_COPY_ZVAL(&input, return_value);
703 php_filter_call(&return_value, Z_LVAL_PP(op), NULL, 0, FILTER_REQUIRE_ARRAY TSRMLS_CC);
704 } else if (Z_TYPE_PP(op) == IS_ARRAY) {
705 array_init(return_value);
706
707 zend_hash_internal_pointer_reset(Z_ARRVAL_PP(op));
708 for (zend_hash_internal_pointer_reset_ex(Z_ARRVAL_PP(op), &pos);
709 zend_hash_get_current_data_ex(Z_ARRVAL_PP(op), (void **) &arg_elm, &pos) == SUCCESS;
710 zend_hash_move_forward_ex(Z_ARRVAL_PP(op), &pos))
711 {
712 if (zend_hash_get_current_key_ex(Z_ARRVAL_PP(op), &arg_key, &arg_key_len, &index, 0, &pos) != HASH_KEY_IS_STRING) {
713 php_error_docref(NULL TSRMLS_CC, E_WARNING, "Numeric keys are not allowed in the definition array");
714 zval_dtor(return_value);
715 RETURN_FALSE;
716 }
717 if (arg_key_len < 2) {
718 php_error_docref(NULL TSRMLS_CC, E_WARNING, "Empty keys are not allowed in the definition array");
719 zval_dtor(return_value);
720 RETURN_FALSE;
721 }
722 if (zend_hash_find(Z_ARRVAL_P(input), arg_key, arg_key_len, (void **)&tmp) != SUCCESS) {
723 if (add_empty) {
724 add_assoc_null_ex(return_value, arg_key, arg_key_len);
725 }
726 } else {
727 zval *nval;
728
729 ALLOC_ZVAL(nval);
730 MAKE_COPY_ZVAL(tmp, nval);
731
732 php_filter_call(&nval, -1, arg_elm, 0, FILTER_REQUIRE_SCALAR TSRMLS_CC);
733 add_assoc_zval_ex(return_value, arg_key, arg_key_len, nval);
734 }
735 }
736 } else {
737 RETURN_FALSE;
738 }
739 }
740 /* }}} */
741
742 /* {{{ proto mixed filter_input(constant type, string variable_name [, long filter [, mixed options]])
743 * Returns the filtered variable 'name'* from source `type`.
744 */
PHP_FUNCTION(filter_input)745 PHP_FUNCTION(filter_input)
746 {
747 long fetch_from, filter = FILTER_DEFAULT;
748 zval **filter_args = NULL, **tmp;
749 zval *input = NULL;
750 char *var;
751 int var_len;
752
753 if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "ls|lZ", &fetch_from, &var, &var_len, &filter, &filter_args) == FAILURE) {
754 return;
755 }
756
757 if (!PHP_FILTER_ID_EXISTS(filter)) {
758 RETURN_FALSE;
759 }
760
761 input = php_filter_get_storage(fetch_from TSRMLS_CC);
762
763 if (!input || !HASH_OF(input) || zend_hash_find(HASH_OF(input), var, var_len + 1, (void **)&tmp) != SUCCESS) {
764 long filter_flags = 0;
765 zval **option, **opt, **def;
766 if (filter_args) {
767 if (Z_TYPE_PP(filter_args) == IS_LONG) {
768 filter_flags = Z_LVAL_PP(filter_args);
769 } else if (Z_TYPE_PP(filter_args) == IS_ARRAY && zend_hash_find(HASH_OF(*filter_args), "flags", sizeof("flags"), (void **)&option) == SUCCESS) {
770 PHP_FILTER_GET_LONG_OPT(option, filter_flags);
771 }
772 if (Z_TYPE_PP(filter_args) == IS_ARRAY &&
773 zend_hash_find(HASH_OF(*filter_args), "options", sizeof("options"), (void **)&opt) == SUCCESS &&
774 Z_TYPE_PP(opt) == IS_ARRAY &&
775 zend_hash_find(HASH_OF(*opt), "default", sizeof("default"), (void **)&def) == SUCCESS
776 ) {
777 MAKE_COPY_ZVAL(def, return_value);
778 return;
779 }
780 }
781
782 /* The FILTER_NULL_ON_FAILURE flag inverts the usual return values of
783 * the function: normally when validation fails false is returned, and
784 * when the input value doesn't exist NULL is returned. With the flag
785 * set, NULL and false should be returned, respectively. Ergo, although
786 * the code below looks incorrect, it's actually right. */
787 if (filter_flags & FILTER_NULL_ON_FAILURE) {
788 RETURN_FALSE;
789 } else {
790 RETURN_NULL();
791 }
792 }
793
794 MAKE_COPY_ZVAL(tmp, return_value);
795
796 php_filter_call(&return_value, filter, filter_args, 1, FILTER_REQUIRE_SCALAR TSRMLS_CC);
797 }
798 /* }}} */
799
800 /* {{{ proto mixed filter_var(mixed variable [, long filter [, mixed options]])
801 * Returns the filtered version of the variable.
802 */
PHP_FUNCTION(filter_var)803 PHP_FUNCTION(filter_var)
804 {
805 long filter = FILTER_DEFAULT;
806 zval **filter_args = NULL, *data;
807
808 if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "z/|lZ", &data, &filter, &filter_args) == FAILURE) {
809 return;
810 }
811
812 if (!PHP_FILTER_ID_EXISTS(filter)) {
813 RETURN_FALSE;
814 }
815
816 MAKE_COPY_ZVAL(&data, return_value);
817
818 php_filter_call(&return_value, filter, filter_args, 1, FILTER_REQUIRE_SCALAR TSRMLS_CC);
819 }
820 /* }}} */
821
822 /* {{{ proto mixed filter_input_array(constant type, [, mixed options [, bool add_empty]]])
823 * Returns an array with all arguments defined in 'definition'.
824 */
PHP_FUNCTION(filter_input_array)825 PHP_FUNCTION(filter_input_array)
826 {
827 long fetch_from;
828 zval *array_input = NULL, **op = NULL;
829 zend_bool add_empty = 1;
830
831 if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "l|Zb", &fetch_from, &op, &add_empty) == FAILURE) {
832 return;
833 }
834
835 if (op
836 && (Z_TYPE_PP(op) != IS_ARRAY)
837 && (Z_TYPE_PP(op) == IS_LONG && !PHP_FILTER_ID_EXISTS(Z_LVAL_PP(op)))
838 ) {
839 RETURN_FALSE;
840 }
841
842 array_input = php_filter_get_storage(fetch_from TSRMLS_CC);
843
844 if (!array_input || !HASH_OF(array_input)) {
845 long filter_flags = 0;
846 zval **option;
847 if (op) {
848 if (Z_TYPE_PP(op) == IS_LONG) {
849 filter_flags = Z_LVAL_PP(op);
850 } else if (Z_TYPE_PP(op) == IS_ARRAY && zend_hash_find(HASH_OF(*op), "flags", sizeof("flags"), (void **)&option) == SUCCESS) {
851 PHP_FILTER_GET_LONG_OPT(option, filter_flags);
852 }
853 }
854
855 /* The FILTER_NULL_ON_FAILURE flag inverts the usual return values of
856 * the function: normally when validation fails false is returned, and
857 * when the input value doesn't exist NULL is returned. With the flag
858 * set, NULL and false should be returned, respectively. Ergo, although
859 * the code below looks incorrect, it's actually right. */
860 if (filter_flags & FILTER_NULL_ON_FAILURE) {
861 RETURN_FALSE;
862 } else {
863 RETURN_NULL();
864 }
865 }
866
867 php_filter_array_handler(array_input, op, return_value, add_empty TSRMLS_CC);
868 }
869 /* }}} */
870
871 /* {{{ proto mixed filter_var_array(array data, [, mixed options [, bool add_empty]]])
872 * Returns an array with all arguments defined in 'definition'.
873 */
PHP_FUNCTION(filter_var_array)874 PHP_FUNCTION(filter_var_array)
875 {
876 zval *array_input = NULL, **op = NULL;
877 zend_bool add_empty = 1;
878
879 if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "a|Zb", &array_input, &op, &add_empty) == FAILURE) {
880 return;
881 }
882
883 if (op
884 && (Z_TYPE_PP(op) != IS_ARRAY)
885 && (Z_TYPE_PP(op) == IS_LONG && !PHP_FILTER_ID_EXISTS(Z_LVAL_PP(op)))
886 ) {
887 RETURN_FALSE;
888 }
889
890 php_filter_array_handler(array_input, op, return_value, add_empty TSRMLS_CC);
891 }
892 /* }}} */
893
894 /* {{{ proto filter_list()
895 * Returns a list of all supported filters */
PHP_FUNCTION(filter_list)896 PHP_FUNCTION(filter_list)
897 {
898 int i, size = sizeof(filter_list) / sizeof(filter_list_entry);
899
900 if (zend_parse_parameters_none() == FAILURE) {
901 return;
902 }
903
904 array_init(return_value);
905 for (i = 0; i < size; ++i) {
906 add_next_index_string(return_value, (char *)filter_list[i].name, 1);
907 }
908 }
909 /* }}} */
910
911 /* {{{ proto filter_id(string filtername)
912 * Returns the filter ID belonging to a named filter */
PHP_FUNCTION(filter_id)913 PHP_FUNCTION(filter_id)
914 {
915 int i, filter_len;
916 int size = sizeof(filter_list) / sizeof(filter_list_entry);
917 char *filter;
918
919 if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "s", &filter, &filter_len) == FAILURE) {
920 return;
921 }
922
923 for (i = 0; i < size; ++i) {
924 if (strcmp(filter_list[i].name, filter) == 0) {
925 RETURN_LONG(filter_list[i].id);
926 }
927 }
928
929 RETURN_FALSE;
930 }
931 /* }}} */
932
933 /*
934 * Local variables:
935 * tab-width: 4
936 * c-basic-offset: 4
937 * End:
938 * vim600: noet sw=4 ts=4 fdm=marker
939 * vim<600: noet sw=4 ts=4
940 */
941