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