2 +--------------------------------------------------------------------+
4 +--------------------------------------------------------------------+
5 | Redistribution and use in source and binary forms, with or without |
6 | modification, are permitted provided that the conditions mentioned |
7 | in the accompanying LICENSE file are met. |
8 +--------------------------------------------------------------------+
9 | Copyright (c) 2004-2013, Michael Wallner <mike@php.net> |
10 +--------------------------------------------------------------------+
13 #include "php_http_api.h"
15 static php_http_params_token_t def_param_sep
= {",", 1}, *def_param_sep_ptr
[] = {&def_param_sep
, NULL
};
16 static php_http_params_token_t def_arg_sep
= {";", 1}, *def_arg_sep_ptr
[] = {&def_arg_sep
, NULL
};
17 static php_http_params_token_t def_val_sep
= {"=", 1}, *def_val_sep_ptr
[] = {&def_val_sep
, NULL
};
18 static php_http_params_opts_t def_opts
= {
24 PHP_HTTP_PARAMS_DEFAULT
27 php_http_params_opts_t
*php_http_params_opts_default_get(php_http_params_opts_t
*opts
)
30 opts
= emalloc(sizeof(*opts
));
33 memcpy(opts
, &def_opts
, sizeof(def_opts
));
38 typedef struct php_http_params_state
{
39 php_http_params_token_t input
;
40 php_http_params_token_t param
;
41 php_http_params_token_t arg
;
42 php_http_params_token_t val
;
50 } php_http_params_state_t
;
52 static inline void sanitize_default(zval
*zv TSRMLS_DC
)
54 if (Z_STRVAL_P(zv
)[0] == '"' && Z_STRVAL_P(zv
)[Z_STRLEN_P(zv
) - 1] == '"') {
55 size_t deq_len
= Z_STRLEN_P(zv
) - 2;
56 char *deq
= estrndup(Z_STRVAL_P(zv
) + 1, deq_len
);
59 ZVAL_STRINGL(zv
, deq
, deq_len
, 0);
62 php_stripslashes(Z_STRVAL_P(zv
), &Z_STRLEN_P(zv
) TSRMLS_CC
);
65 static inline void prepare_default(zval
*zv TSRMLS_DC
)
67 if (Z_TYPE_P(zv
) == IS_STRING
) {
68 int len
= Z_STRLEN_P(zv
);
70 Z_STRVAL_P(zv
) = php_addslashes(Z_STRVAL_P(zv
), Z_STRLEN_P(zv
), &Z_STRLEN_P(zv
), 1 TSRMLS_CC
);
72 if (len
!= Z_STRLEN_P(zv
)) {
74 int len
= Z_STRLEN_P(zv
) + 2;
75 char *str
= emalloc(len
+ 1);
78 memcpy(&str
[1], Z_STRVAL_P(zv
), Z_STRLEN_P(zv
));
83 ZVAL_STRINGL(zv
, str
, len
, 0);
87 ZVAL_EMPTY_STRING(zv
);
91 static inline void sanitize_urlencoded(zval
*zv TSRMLS_DC
)
93 Z_STRLEN_P(zv
) = php_raw_url_decode(Z_STRVAL_P(zv
), Z_STRLEN_P(zv
));
96 static inline void prepare_urlencoded(zval
*zv TSRMLS_DC
)
99 char *str
= php_url_encode(Z_STRVAL_P(zv
), Z_STRLEN_P(zv
), &len
);
102 ZVAL_STRINGL(zv
, str
, len
, 0);
105 static void sanitize_dimension(zval
*zv TSRMLS_DC
)
107 zval
*arr
= NULL
, *tmp
= NULL
, **cur
= NULL
;
108 char *var
= NULL
, *ptr
= Z_STRVAL_P(zv
), *end
= Z_STRVAL_P(zv
) + Z_STRLEN_P(zv
);
122 if (++level
> PG(max_input_nesting_level
)) {
124 php_error_docref(NULL TSRMLS_CC
, E_WARNING
, "Max input nesting level of %ld exceeded", (long) PG(max_input_nesting_level
));
127 if (ptr
- var
== 0) {
137 convert_to_array(*cur
);
142 zend_symtable_update(Z_ARRVAL_PP(cur
), var
, ptr
- var
+ 1, (void *) &tmp
, sizeof(zval
*), (void *) &cur
);
145 zend_hash_next_index_insert(Z_ARRVAL_PP(cur
), (void *) &tmp
, sizeof(zval
*), (void *) &cur
);
155 if (zend_hash_num_elements(Z_ARRVAL_P(arr
))) {
157 #if PHP_VERSION_ID >= 50400
158 ZVAL_COPY_VALUE(zv
, arr
);
160 zv
->value
= arr
->value
;
161 Z_TYPE_P(zv
) = Z_TYPE_P(arr
);
169 static inline void shift_key(php_http_buffer_t
*buf
, char *key_str
, size_t key_len
, const char *ass
, size_t asl
, unsigned flags TSRMLS_DC
);
170 static inline void shift_val(php_http_buffer_t
*buf
, zval
*zvalue
, const char *vss
, size_t vsl
, unsigned flags TSRMLS_DC
);
172 static void prepare_dimension(php_http_buffer_t
*buf
, php_http_buffer_t
*keybuf
, zval
*zvalue
, const char *pss
, size_t psl
, const char *vss
, size_t vsl
, unsigned flags TSRMLS_DC
)
174 HashTable
*ht
= HASH_OF(zvalue
);
176 php_http_array_hashkey_t key
= php_http_array_hashkey_init(0);
178 php_http_buffer_t prefix
;
180 if (!ht
->nApplyCount
++) {
181 php_http_buffer_init(&prefix
);
182 php_http_buffer_append(&prefix
, keybuf
->data
, keybuf
->used
);
184 FOREACH_HASH_KEYVAL(pos
, ht
, key
, val
) {
185 if (key
.type
== HASH_KEY_IS_STRING
&& !*key
.str
) {
186 /* only public properties */
190 php_http_buffer_appends(&prefix
, "[");
191 if (key
.type
== HASH_KEY_IS_STRING
) {
192 php_http_buffer_append(&prefix
, key
.str
, key
.len
- 1);
194 php_http_buffer_appendf(&prefix
, "%lu", key
.num
);
196 php_http_buffer_appends(&prefix
, "]");
198 if (Z_TYPE_PP(val
) == IS_ARRAY
|| Z_TYPE_PP(val
) == IS_OBJECT
) {
199 prepare_dimension(buf
, &prefix
, *val
, pss
, psl
, vss
, vsl
, flags TSRMLS_CC
);
201 zval
*cpy
= php_http_ztyp(IS_STRING
, *val
);
203 shift_key(buf
, prefix
.data
, prefix
.used
, pss
, psl
, flags TSRMLS_CC
);
204 shift_val(buf
, cpy
, vss
, vsl
, flags TSRMLS_CC
);
208 php_http_buffer_cut(&prefix
, keybuf
->used
, prefix
.used
- keybuf
->used
);
210 php_http_buffer_dtor(&prefix
);
215 static inline void sanitize_key(unsigned flags
, char *str
, size_t len
, zval
*zv TSRMLS_DC
)
218 php_trim(str
, len
, NULL
, 0, zv
, 3 TSRMLS_CC
);
220 if (flags
& PHP_HTTP_PARAMS_DEFAULT
) {
221 sanitize_default(zv TSRMLS_CC
);
224 if (flags
& PHP_HTTP_PARAMS_URLENCODED
) {
225 sanitize_urlencoded(zv TSRMLS_CC
);
228 if (flags
& PHP_HTTP_PARAMS_DIMENSION
) {
229 sanitize_dimension(zv TSRMLS_CC
);
233 static inline void sanitize_value(unsigned flags
, char *str
, size_t len
, zval
*zv TSRMLS_DC
)
236 php_trim(str
, len
, NULL
, 0, zv
, 3 TSRMLS_CC
);
238 if (flags
& PHP_HTTP_PARAMS_DEFAULT
) {
239 sanitize_default(zv TSRMLS_CC
);
242 if (flags
& PHP_HTTP_PARAMS_URLENCODED
) {
243 sanitize_urlencoded(zv TSRMLS_CC
);
247 static inline void prepare_key(unsigned flags
, char *old_key
, size_t old_len
, char **new_key
, size_t *new_len TSRMLS_DC
)
252 ZVAL_STRINGL(&zv
, old_key
, old_len
, 1);
254 if (flags
& PHP_HTTP_PARAMS_URLENCODED
) {
255 prepare_urlencoded(&zv TSRMLS_CC
);
258 if (flags
& PHP_HTTP_PARAMS_DEFAULT
) {
259 prepare_default(&zv TSRMLS_CC
);
262 *new_key
= Z_STRVAL(zv
);
263 *new_len
= Z_STRLEN(zv
);
266 static inline void prepare_value(unsigned flags
, zval
*zv TSRMLS_DC
)
268 if (flags
& PHP_HTTP_PARAMS_URLENCODED
) {
269 prepare_urlencoded(zv TSRMLS_CC
);
272 if (flags
& PHP_HTTP_PARAMS_DEFAULT
) {
273 prepare_default(zv TSRMLS_CC
);
277 static void merge_param(HashTable
*params
, zval
*zdata
, zval
***current_param
, zval
***current_args TSRMLS_DC
)
279 zval
**ptr
, **zdata_ptr
;
280 php_http_array_hashkey_t hkey
= php_http_array_hashkey_init(0);
285 INIT_PZVAL_ARRAY(&tmp
, params
);
286 fprintf(stderr
, "params = ");
287 zend_print_zval_r(&tmp
, 1 TSRMLS_CC
);
288 fprintf(stderr
, "\n");
292 hkey
.type
= zend_hash_get_current_key_ex(Z_ARRVAL_P(zdata
), &hkey
.str
, &hkey
.len
, &hkey
.num
, hkey
.dup
, NULL
);
294 if ((hkey
.type
== HASH_KEY_IS_STRING
&& !zend_hash_exists(params
, hkey
.str
, hkey
.len
))
295 || (hkey
.type
== HASH_KEY_IS_LONG
&& !zend_hash_index_exists(params
, hkey
.num
))
297 zval
*tmp
, *arg
, **args
;
299 /* create the entry if it doesn't exist */
300 zend_hash_get_current_data(Z_ARRVAL_P(zdata
), (void *) &ptr
);
304 add_assoc_zval_ex(tmp
, ZEND_STRS("value"), *ptr
);
308 zend_hash_update(Z_ARRVAL_P(tmp
), "arguments", sizeof("arguments"), (void *) &arg
, sizeof(zval
*), (void *) &args
);
309 *current_args
= args
;
311 if (hkey
.type
== HASH_KEY_IS_STRING
) {
312 zend_hash_update(params
, hkey
.str
, hkey
.len
, (void *) &tmp
, sizeof(zval
*), (void *) &ptr
);
314 zend_hash_index_update(params
, hkey
.num
, (void *) &tmp
, sizeof(zval
*), (void *) &ptr
);
318 if (hkey
.type
== HASH_KEY_IS_STRING
) {
319 zend_hash_find(params
, hkey
.str
, hkey
.len
, (void *) &ptr
);
321 zend_hash_index_find(params
, hkey
.num
, (void *) &ptr
);
326 if (Z_TYPE_PP(ptr
) == IS_ARRAY
327 && SUCCESS
== zend_hash_find(Z_ARRVAL_PP(ptr
), "value", sizeof("value"), (void *) &ptr
)
328 && SUCCESS
== zend_hash_get_current_data(Z_ARRVAL_PP(zdata_ptr
), (void *) &zdata_ptr
)
331 * params = [arr => [value => [0 => 1]]]
333 * zdata = [arr => [0 => NULL]]
338 while (Z_TYPE_PP(zdata_ptr
) == IS_ARRAY
339 && SUCCESS
== zend_hash_get_current_data(Z_ARRVAL_PP(zdata_ptr
), (void *) &test_ptr
)
341 if (Z_TYPE_PP(test_ptr
) == IS_ARRAY
) {
343 /* now find key in ptr */
344 if (HASH_KEY_IS_STRING
== zend_hash_get_current_key_ex(Z_ARRVAL_PP(zdata_ptr
), &hkey
.str
, &hkey
.len
, &hkey
.num
, hkey
.dup
, NULL
)) {
345 if (SUCCESS
== zend_hash_find(Z_ARRVAL_PP(ptr
), hkey
.str
, hkey
.len
, (void *) &ptr
)) {
346 zdata_ptr
= test_ptr
;
348 Z_ADDREF_PP(test_ptr
);
349 zend_hash_update(Z_ARRVAL_PP(ptr
), hkey
.str
, hkey
.len
, (void *) test_ptr
, sizeof(zval
*), (void *) &ptr
);
353 if (SUCCESS
== zend_hash_index_find(Z_ARRVAL_PP(ptr
), hkey
.num
, (void *) &ptr
)) {
354 zdata_ptr
= test_ptr
;
355 } else if (hkey
.num
) {
356 Z_ADDREF_PP(test_ptr
);
357 zend_hash_index_update(Z_ARRVAL_PP(ptr
), hkey
.num
, (void *) test_ptr
, sizeof(zval
*), (void *) &ptr
);
360 Z_ADDREF_PP(test_ptr
);
361 zend_hash_next_index_insert(Z_ARRVAL_PP(ptr
), (void *) test_ptr
, sizeof(zval
*), (void *) &ptr
);
366 /* this is the leaf */
367 Z_ADDREF_PP(test_ptr
);
368 if (Z_TYPE_PP(ptr
) != IS_ARRAY
) {
372 if (HASH_KEY_IS_STRING
== zend_hash_get_current_key_ex(Z_ARRVAL_PP(zdata_ptr
), &hkey
.str
, &hkey
.len
, &hkey
.num
, hkey
.dup
, NULL
)) {
373 zend_hash_update(Z_ARRVAL_PP(ptr
), hkey
.str
, hkey
.len
, (void *) test_ptr
, sizeof(zval
*), (void *) &ptr
);
374 } else if (hkey
.num
) {
375 zend_hash_index_update(Z_ARRVAL_PP(ptr
), hkey
.num
, (void *) test_ptr
, sizeof(zval
*), (void *) &ptr
);
377 zend_hash_next_index_insert(Z_ARRVAL_PP(ptr
), (void *) test_ptr
, sizeof(zval
*), (void *) &ptr
);
387 while (Z_TYPE_PP(ptr
) == IS_ARRAY
&& SUCCESS
== zend_hash_get_current_data(Z_ARRVAL_PP(ptr
), (void *) &ptr
));
388 *current_param
= ptr
;
391 static void push_param(HashTable
*params
, php_http_params_state_t
*state
, const php_http_params_opts_t
*opts TSRMLS_DC
)
393 if (state
->val
.str
) {
394 if (0 < (state
->val
.len
= state
->input
.str
- state
->val
.str
)) {
395 sanitize_value(opts
->flags
, state
->val
.str
, state
->val
.len
, *(state
->current
.val
) TSRMLS_CC
);
397 } else if (state
->arg
.str
) {
398 if (0 < (state
->arg
.len
= state
->input
.str
- state
->arg
.str
)) {
403 sanitize_key(opts
->flags
, state
->arg
.str
, state
->arg
.len
, &key TSRMLS_CC
);
404 if (Z_TYPE(key
) == IS_STRING
&& Z_STRLEN(key
)) {
407 zend_symtable_update(Z_ARRVAL_PP(state
->current
.args
), Z_STRVAL(key
), Z_STRLEN(key
) + 1, (void *) &val
, sizeof(zval
*), (void *) &state
->current
.val
);
411 } else if (state
->param
.str
) {
412 if (0 < (state
->param
.len
= state
->input
.str
- state
->param
.str
)) {
413 zval
*prm
, *arg
, *val
, *key
;
417 sanitize_key(opts
->flags
, state
->param
.str
, state
->param
.len
, key TSRMLS_CC
);
418 if (Z_TYPE_P(key
) != IS_STRING
) {
419 merge_param(params
, key
, &state
->current
.val
, &state
->current
.args TSRMLS_CC
);
420 } else if (Z_STRLEN_P(key
)) {
426 ZVAL_COPY_VALUE(val
, opts
->defval
);
431 zend_hash_update(Z_ARRVAL_P(prm
), "value", sizeof("value"), (void *) &val
, sizeof(zval
*), (void *) &state
->current
.val
);
435 zend_hash_update(Z_ARRVAL_P(prm
), "arguments", sizeof("arguments"), (void *) &arg
, sizeof(zval
*), (void *) &state
->current
.args
);
437 zend_symtable_update(params
, Z_STRVAL_P(key
), Z_STRLEN_P(key
) + 1, (void *) &prm
, sizeof(zval
*), (void *) &state
->current
.param
);
444 static inline zend_bool
check_str(const char *chk_str
, size_t chk_len
, const char *sep_str
, size_t sep_len
) {
445 return 0 < sep_len
&& chk_len
>= sep_len
&& !memcmp(chk_str
, sep_str
, sep_len
);
448 static size_t check_sep(php_http_params_state_t
*state
, php_http_params_token_t
**separators
)
450 php_http_params_token_t
**sep
= separators
;
452 if (state
->quotes
|| state
->escape
) {
456 if (sep
) while (*sep
) {
457 if (check_str(state
->input
.str
, state
->input
.len
, (*sep
)->str
, (*sep
)->len
)) {
465 static void skip_sep(size_t skip
, php_http_params_state_t
*state
, php_http_params_token_t
**param
, php_http_params_token_t
**arg
, php_http_params_token_t
**val TSRMLS_DC
)
469 state
->input
.str
+= skip
;
470 state
->input
.len
-= skip
;
472 while ( (param
&& (sep_len
= check_sep(state
, param
)))
473 || (arg
&& (sep_len
= check_sep(state
, arg
)))
474 || (val
&& (sep_len
= check_sep(state
, val
)))
476 state
->input
.str
+= sep_len
;
477 state
->input
.len
-= sep_len
;
481 HashTable
*php_http_params_parse(HashTable
*params
, const php_http_params_opts_t
*opts TSRMLS_DC
)
483 php_http_params_state_t state
= {{NULL
,0}, {NULL
,0}, {NULL
,0}, {NULL
,0}, {NULL
,NULL
,NULL
}, 0, 0};
485 state
.input
.str
= opts
->input
.str
;
486 state
.input
.len
= opts
->input
.len
;
489 ALLOC_HASHTABLE(params
);
490 ZEND_INIT_SYMTABLE(params
);
493 while (state
.input
.len
) {
494 if (*state
.input
.str
== '"' && !state
.escape
) {
495 state
.quotes
= !state
.quotes
;
497 state
.escape
= (*state
.input
.str
== '\\');
500 if (!state
.param
.str
) {
502 skip_sep(0, &state
, opts
->param
, opts
->arg
, opts
->val TSRMLS_CC
);
503 state
.param
.str
= state
.input
.str
;
506 /* are we at a param separator? */
507 if (0 < (sep_len
= check_sep(&state
, opts
->param
))) {
508 push_param(params
, &state
, opts TSRMLS_CC
);
510 skip_sep(sep_len
, &state
, opts
->param
, opts
->arg
, opts
->val TSRMLS_CC
);
512 /* start off with a new param */
513 state
.param
.str
= state
.input
.str
;
515 state
.arg
.str
= NULL
;
517 state
.val
.str
= NULL
;
523 /* are we at an arg separator? */
524 if (0 < (sep_len
= check_sep(&state
, opts
->arg
))) {
525 push_param(params
, &state
, opts TSRMLS_CC
);
527 skip_sep(sep_len
, &state
, NULL
, opts
->arg
, opts
->val TSRMLS_CC
);
529 /* continue with a new arg */
530 state
.arg
.str
= state
.input
.str
;
532 state
.val
.str
= NULL
;
538 /* are we at a val separator? */
539 if (0 < (sep_len
= check_sep(&state
, opts
->val
))) {
540 /* only handle separator if we're not already reading in a val */
541 if (!state
.val
.str
) {
542 push_param(params
, &state
, opts TSRMLS_CC
);
544 skip_sep(sep_len
, &state
, NULL
, NULL
, opts
->val TSRMLS_CC
);
546 state
.val
.str
= state
.input
.str
;
554 if (state
.input
.len
) {
560 push_param(params
, &state
, opts TSRMLS_CC
);
565 static inline void shift_key(php_http_buffer_t
*buf
, char *key_str
, size_t key_len
, const char *ass
, size_t asl
, unsigned flags TSRMLS_DC
)
571 php_http_buffer_append(buf
, ass
, asl
);
574 prepare_key(flags
, key_str
, key_len
, &str
, &len TSRMLS_CC
);
575 php_http_buffer_append(buf
, str
, len
);
579 static inline void shift_val(php_http_buffer_t
*buf
, zval
*zvalue
, const char *vss
, size_t vsl
, unsigned flags TSRMLS_DC
)
581 if (Z_TYPE_P(zvalue
) != IS_BOOL
) {
582 zval
*tmp
= php_http_zsep(1, IS_STRING
, zvalue
);
584 prepare_value(flags
, tmp TSRMLS_CC
);
585 php_http_buffer_append(buf
, vss
, vsl
);
586 php_http_buffer_append(buf
, Z_STRVAL_P(tmp
), Z_STRLEN_P(tmp
));
589 } else if (!Z_BVAL_P(zvalue
)) {
590 php_http_buffer_append(buf
, vss
, vsl
);
591 php_http_buffer_appends(buf
, "0");
595 static void shift_arg(php_http_buffer_t
*buf
, char *key_str
, size_t key_len
, zval
*zvalue
, const char *ass
, size_t asl
, const char *vss
, size_t vsl
, unsigned flags TSRMLS_DC
)
597 if (Z_TYPE_P(zvalue
) == IS_ARRAY
|| Z_TYPE_P(zvalue
) == IS_OBJECT
) {
599 php_http_array_hashkey_t key
= php_http_array_hashkey_init(0);
602 shift_key(buf
, key_str
, key_len
, ass
, asl
, flags TSRMLS_CC
);
603 FOREACH_KEYVAL(pos
, zvalue
, key
, val
) {
604 /* did you mean recursion? */
605 php_http_array_hashkey_stringify(&key
);
606 shift_arg(buf
, key
.str
, key
.len
-1, *val
, ass
, asl
, vss
, vsl
, flags TSRMLS_CC
);
607 php_http_array_hashkey_stringfree(&key
);
610 shift_key(buf
, key_str
, key_len
, ass
, asl
, flags TSRMLS_CC
);
611 shift_val(buf
, zvalue
, vss
, vsl
, flags TSRMLS_CC
);
615 static void shift_param(php_http_buffer_t
*buf
, char *key_str
, size_t key_len
, zval
*zvalue
, const char *pss
, size_t psl
, const char *ass
, size_t asl
, const char *vss
, size_t vsl
, unsigned flags TSRMLS_DC
)
617 if (Z_TYPE_P(zvalue
) == IS_ARRAY
|| Z_TYPE_P(zvalue
) == IS_OBJECT
) {
618 /* treat as arguments, unless we care for dimensions */
619 if (flags
& PHP_HTTP_PARAMS_DIMENSION
) {
620 php_http_buffer_t
*keybuf
= php_http_buffer_from_string(key_str
, key_len
);
621 prepare_dimension(buf
, keybuf
, zvalue
, pss
, psl
, vss
, vsl
, flags TSRMLS_CC
);
622 php_http_buffer_free(&keybuf
);
624 shift_arg(buf
, key_str
, key_len
, zvalue
, ass
, asl
, vss
, vsl
, flags TSRMLS_CC
);
627 shift_key(buf
, key_str
, key_len
, pss
, psl
, flags TSRMLS_CC
);
628 shift_val(buf
, zvalue
, vss
, vsl
, flags TSRMLS_CC
);
632 php_http_buffer_t
*php_http_params_to_string(php_http_buffer_t
*buf
, HashTable
*params
, const char *pss
, size_t psl
, const char *ass
, size_t asl
, const char *vss
, size_t vsl
, unsigned flags TSRMLS_DC
)
635 HashPosition pos
, pos1
;
636 php_http_array_hashkey_t key
= php_http_array_hashkey_init(0), key1
= php_http_array_hashkey_init(0);
639 buf
= php_http_buffer_init(NULL
);
642 FOREACH_HASH_KEYVAL(pos
, params
, key
, zparam
) {
643 zval
**zvalue
, **zargs
;
645 if (Z_TYPE_PP(zparam
) != IS_ARRAY
|| SUCCESS
!= zend_hash_find(Z_ARRVAL_PP(zparam
), ZEND_STRS("value"), (void *) &zvalue
)) {
649 php_http_array_hashkey_stringify(&key
);
650 shift_param(buf
, key
.str
, key
.len
- 1, *zvalue
, pss
, psl
, ass
, asl
, vss
, vsl
, flags TSRMLS_CC
);
651 php_http_array_hashkey_stringfree(&key
);
653 if (Z_TYPE_PP(zparam
) == IS_ARRAY
&& SUCCESS
!= zend_hash_find(Z_ARRVAL_PP(zparam
), ZEND_STRS("arguments"), (void *) &zvalue
)) {
654 if (zvalue
== zparam
) {
660 if (Z_TYPE_PP(zvalue
) == IS_ARRAY
) {
661 FOREACH_KEYVAL(pos1
, *zvalue
, key1
, zargs
) {
662 if (zvalue
== zparam
&& key1
.type
== HASH_KEY_IS_STRING
&& !strcmp(key1
.str
, "value")) {
666 php_http_array_hashkey_stringify(&key1
);
667 shift_arg(buf
, key1
.str
, key1
.len
- 1, *zargs
, ass
, asl
, vss
, vsl
, flags TSRMLS_CC
);
668 php_http_array_hashkey_stringfree(&key1
);
673 php_http_buffer_shrink(buf
);
674 php_http_buffer_fix(buf
);
679 php_http_params_token_t
**php_http_params_separator_init(zval
*zv TSRMLS_DC
)
683 php_http_params_token_t
**ret
, **tmp
;
689 zv
= php_http_ztyp(IS_ARRAY
, zv
);
690 ret
= ecalloc(zend_hash_num_elements(Z_ARRVAL_P(zv
)) + 1, sizeof(*ret
));
693 FOREACH_VAL(pos
, zv
, sep
) {
694 zval
*zt
= php_http_ztyp(IS_STRING
, *sep
);
696 if (Z_STRLEN_P(zt
)) {
697 *tmp
= emalloc(sizeof(**tmp
));
698 (*tmp
)->str
= estrndup(Z_STRVAL_P(zt
), (*tmp
)->len
= Z_STRLEN_P(zt
));
709 void php_http_params_separator_free(php_http_params_token_t
**separator
)
711 php_http_params_token_t
**sep
= separator
;
714 STR_FREE((*sep
)->str
);
722 ZEND_BEGIN_ARG_INFO_EX(ai_HttpParams___construct
, 0, 0, 0)
723 ZEND_ARG_INFO(0, params
)
724 ZEND_ARG_INFO(0, param_sep
)
725 ZEND_ARG_INFO(0, arg_sep
)
726 ZEND_ARG_INFO(0, val_sep
)
727 ZEND_ARG_INFO(0, flags
)
729 PHP_METHOD(HttpParams
, __construct
)
731 zval
*zcopy
, *zparams
= NULL
, *param_sep
= NULL
, *arg_sep
= NULL
, *val_sep
= NULL
;
732 long flags
= PHP_HTTP_PARAMS_DEFAULT
;
733 zend_error_handling zeh
;
735 php_http_expect(SUCCESS
== zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "|z!/z/z/z/l", &zparams
, ¶m_sep
, &arg_sep
, &val_sep
, &flags
), invalid_arg
, return);
737 zend_replace_error_handling(EH_THROW
, php_http_exception_runtime_class_entry
, &zeh TSRMLS_CC
);
739 switch (ZEND_NUM_ARGS()) {
741 zend_update_property_long(php_http_params_class_entry
, getThis(), ZEND_STRL("flags"), flags TSRMLS_CC
);
744 zend_update_property(php_http_params_class_entry
, getThis(), ZEND_STRL("val_sep"), val_sep TSRMLS_CC
);
747 zend_update_property(php_http_params_class_entry
, getThis(), ZEND_STRL("arg_sep"), arg_sep TSRMLS_CC
);
750 zend_update_property(php_http_params_class_entry
, getThis(), ZEND_STRL("param_sep"), param_sep TSRMLS_CC
);
755 switch (Z_TYPE_P(zparams
)) {
758 zcopy
= php_http_zsep(1, IS_ARRAY
, zparams
);
759 zend_update_property(php_http_params_class_entry
, getThis(), ZEND_STRL("params"), zcopy TSRMLS_CC
);
760 zval_ptr_dtor(&zcopy
);
763 zcopy
= php_http_ztyp(IS_STRING
, zparams
);
764 if (Z_STRLEN_P(zcopy
)) {
765 php_http_params_opts_t opts
= {
766 {Z_STRVAL_P(zcopy
), Z_STRLEN_P(zcopy
)},
767 php_http_params_separator_init(zend_read_property(php_http_params_class_entry
, getThis(), ZEND_STRL("param_sep"), 0 TSRMLS_CC
) TSRMLS_CC
),
768 php_http_params_separator_init(zend_read_property(php_http_params_class_entry
, getThis(), ZEND_STRL("arg_sep"), 0 TSRMLS_CC
) TSRMLS_CC
),
769 php_http_params_separator_init(zend_read_property(php_http_params_class_entry
, getThis(), ZEND_STRL("val_sep"), 0 TSRMLS_CC
) TSRMLS_CC
),
773 MAKE_STD_ZVAL(zparams
);
775 php_http_params_parse(Z_ARRVAL_P(zparams
), &opts TSRMLS_CC
);
776 zend_update_property(php_http_params_class_entry
, getThis(), ZEND_STRL("params"), zparams TSRMLS_CC
);
777 zval_ptr_dtor(&zparams
);
779 php_http_params_separator_free(opts
.param
);
780 php_http_params_separator_free(opts
.arg
);
781 php_http_params_separator_free(opts
.val
);
783 zval_ptr_dtor(&zcopy
);
787 MAKE_STD_ZVAL(zparams
);
789 zend_update_property(php_http_params_class_entry
, getThis(), ZEND_STRL("params"), zparams TSRMLS_CC
);
790 zval_ptr_dtor(&zparams
);
793 zend_restore_error_handling(&zeh TSRMLS_CC
);
796 ZEND_BEGIN_ARG_INFO_EX(ai_HttpParams_toArray
, 0, 0, 0)
798 PHP_METHOD(HttpParams
, toArray
)
802 if (SUCCESS
!= zend_parse_parameters_none()) {
805 zparams
= zend_read_property(php_http_params_class_entry
, getThis(), ZEND_STRL("params"), 0 TSRMLS_CC
);
806 RETURN_ZVAL(zparams
, 1, 0);
809 ZEND_BEGIN_ARG_INFO_EX(ai_HttpParams_toString
, 0, 0, 0)
811 PHP_METHOD(HttpParams
, toString
)
813 zval
**tmp
, *zparams
, *zpsep
, *zasep
, *zvsep
, *zflags
;
814 php_http_buffer_t buf
;
816 zparams
= php_http_zsep(1, IS_ARRAY
, zend_read_property(php_http_params_class_entry
, getThis(), ZEND_STRL("params"), 0 TSRMLS_CC
));
817 zflags
= php_http_ztyp(IS_LONG
, zend_read_property(php_http_params_class_entry
, getThis(), ZEND_STRL("flags"), 0 TSRMLS_CC
));
819 zpsep
= zend_read_property(php_http_params_class_entry
, getThis(), ZEND_STRL("param_sep"), 0 TSRMLS_CC
);
820 if (Z_TYPE_P(zpsep
) == IS_ARRAY
&& SUCCESS
== zend_hash_get_current_data(Z_ARRVAL_P(zpsep
), (void *) &tmp
)) {
821 zpsep
= php_http_ztyp(IS_STRING
, *tmp
);
823 zpsep
= php_http_ztyp(IS_STRING
, zpsep
);
825 zasep
= zend_read_property(php_http_params_class_entry
, getThis(), ZEND_STRL("arg_sep"), 0 TSRMLS_CC
);
826 if (Z_TYPE_P(zasep
) == IS_ARRAY
&& SUCCESS
== zend_hash_get_current_data(Z_ARRVAL_P(zasep
), (void *) &tmp
)) {
827 zasep
= php_http_ztyp(IS_STRING
, *tmp
);
829 zasep
= php_http_ztyp(IS_STRING
, zasep
);
831 zvsep
= zend_read_property(php_http_params_class_entry
, getThis(), ZEND_STRL("val_sep"), 0 TSRMLS_CC
);
832 if (Z_TYPE_P(zvsep
) == IS_ARRAY
&& SUCCESS
== zend_hash_get_current_data(Z_ARRVAL_P(zvsep
), (void *) &tmp
)) {
833 zvsep
= php_http_ztyp(IS_STRING
, *tmp
);
835 zvsep
= php_http_ztyp(IS_STRING
, zvsep
);
838 php_http_buffer_init(&buf
);
839 php_http_params_to_string(&buf
, Z_ARRVAL_P(zparams
), Z_STRVAL_P(zpsep
), Z_STRLEN_P(zpsep
), Z_STRVAL_P(zasep
), Z_STRLEN_P(zasep
), Z_STRVAL_P(zvsep
), Z_STRLEN_P(zvsep
), Z_LVAL_P(zflags
) TSRMLS_CC
);
841 zval_ptr_dtor(&zparams
);
842 zval_ptr_dtor(&zpsep
);
843 zval_ptr_dtor(&zasep
);
844 zval_ptr_dtor(&zvsep
);
845 zval_ptr_dtor(&zflags
);
847 RETVAL_PHP_HTTP_BUFFER_VAL(&buf
);
850 ZEND_BEGIN_ARG_INFO_EX(ai_HttpParams_offsetExists
, 0, 0, 1)
851 ZEND_ARG_INFO(0, name
)
853 PHP_METHOD(HttpParams
, offsetExists
)
857 zval
**zparam
, *zparams
;
859 if (SUCCESS
!= zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "s", &name_str
, &name_len
)) {
863 zparams
= php_http_ztyp(IS_ARRAY
, zend_read_property(php_http_params_class_entry
, getThis(), ZEND_STRL("params"), 0 TSRMLS_CC
));
865 if (SUCCESS
== zend_symtable_find(Z_ARRVAL_P(zparams
), name_str
, name_len
+ 1, (void *) &zparam
)) {
866 RETVAL_BOOL(Z_TYPE_PP(zparam
) != IS_NULL
);
870 zval_ptr_dtor(&zparams
);
873 ZEND_BEGIN_ARG_INFO_EX(ai_HttpParams_offsetGet
, 0, 0, 1)
874 ZEND_ARG_INFO(0, name
)
876 PHP_METHOD(HttpParams
, offsetGet
)
880 zval
**zparam
, *zparams
;
882 if (SUCCESS
!= zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "s", &name_str
, &name_len
)) {
886 zparams
= php_http_ztyp(IS_ARRAY
, zend_read_property(php_http_params_class_entry
, getThis(), ZEND_STRL("params"), 0 TSRMLS_CC
));
888 if (SUCCESS
== zend_symtable_find(Z_ARRVAL_P(zparams
), name_str
, name_len
+ 1, (void *) &zparam
)) {
889 RETVAL_ZVAL(*zparam
, 1, 0);
892 zval_ptr_dtor(&zparams
);
895 ZEND_BEGIN_ARG_INFO_EX(ai_HttpParams_offsetUnset
, 0, 0, 1)
896 ZEND_ARG_INFO(0, name
)
898 PHP_METHOD(HttpParams
, offsetUnset
)
904 if (SUCCESS
!= zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "s", &name_str
, &name_len
)) {
908 zparams
= php_http_zsep(1, IS_ARRAY
, zend_read_property(php_http_params_class_entry
, getThis(), ZEND_STRL("params"), 0 TSRMLS_CC
));
910 zend_symtable_del(Z_ARRVAL_P(zparams
), name_str
, name_len
+ 1);
911 zend_update_property(php_http_params_class_entry
, getThis(), ZEND_STRL("params"), zparams TSRMLS_CC
);
913 zval_ptr_dtor(&zparams
);
916 ZEND_BEGIN_ARG_INFO_EX(ai_HttpParams_offsetSet
, 0, 0, 2)
917 ZEND_ARG_INFO(0, name
)
918 ZEND_ARG_INFO(0, value
)
920 PHP_METHOD(HttpParams
, offsetSet
)
925 zval
**zparam
, *zparams
;
927 if (SUCCESS
!= zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "sz", &name_str
, &name_len
, &nvalue
)) {
931 zparams
= php_http_zsep(1, IS_ARRAY
, zend_read_property(php_http_params_class_entry
, getThis(), ZEND_STRL("params"), 0 TSRMLS_CC
));
934 if (Z_TYPE_P(nvalue
) == IS_ARRAY
) {
937 if (SUCCESS
== zend_symtable_find(Z_ARRVAL_P(zparams
), name_str
, name_len
+ 1, (void *) &zparam
)) {
938 new_zparam
= php_http_zsep(1, IS_ARRAY
, *zparam
);
939 array_join(Z_ARRVAL_P(nvalue
), Z_ARRVAL_P(new_zparam
), 0, 0);
942 Z_ADDREF_P(new_zparam
);
944 add_assoc_zval_ex(zparams
, name_str
, name_len
+ 1, new_zparam
);
948 if (SUCCESS
== zend_symtable_find(Z_ARRVAL_P(zparams
), name_str
, name_len
+ 1, (void *) &zparam
)) {
949 tmp
= php_http_zsep(1, IS_ARRAY
, *zparam
);
956 add_assoc_zval_ex(tmp
, ZEND_STRS("value"), nvalue
);
957 add_assoc_zval_ex(zparams
, name_str
, name_len
+ 1, tmp
);
960 zval
*tmp
= php_http_ztyp(IS_STRING
, nvalue
), *arr
;
964 add_assoc_bool_ex(arr
, ZEND_STRS("value"), 1);
965 add_assoc_zval_ex(zparams
, Z_STRVAL_P(tmp
), Z_STRLEN_P(tmp
) + 1, arr
);
969 zend_update_property(php_http_params_class_entry
, getThis(), ZEND_STRL("params"), zparams TSRMLS_CC
);
970 zval_ptr_dtor(&zparams
);
973 static zend_function_entry php_http_params_methods
[] = {
974 PHP_ME(HttpParams
, __construct
, ai_HttpParams___construct
, ZEND_ACC_PUBLIC
|ZEND_ACC_CTOR
|ZEND_ACC_FINAL
)
976 PHP_ME(HttpParams
, toArray
, ai_HttpParams_toArray
, ZEND_ACC_PUBLIC
)
977 PHP_ME(HttpParams
, toString
, ai_HttpParams_toString
, ZEND_ACC_PUBLIC
)
978 ZEND_MALIAS(HttpParams
, __toString
, toString
, ai_HttpParams_toString
, ZEND_ACC_PUBLIC
)
980 PHP_ME(HttpParams
, offsetExists
, ai_HttpParams_offsetExists
, ZEND_ACC_PUBLIC
)
981 PHP_ME(HttpParams
, offsetUnset
, ai_HttpParams_offsetUnset
, ZEND_ACC_PUBLIC
)
982 PHP_ME(HttpParams
, offsetSet
, ai_HttpParams_offsetSet
, ZEND_ACC_PUBLIC
)
983 PHP_ME(HttpParams
, offsetGet
, ai_HttpParams_offsetGet
, ZEND_ACC_PUBLIC
)
988 zend_class_entry
*php_http_params_class_entry
;
990 PHP_MINIT_FUNCTION(http_params
)
992 zend_class_entry ce
= {0};
994 INIT_NS_CLASS_ENTRY(ce
, "http", "Params", php_http_params_methods
);
995 php_http_params_class_entry
= zend_register_internal_class(&ce TSRMLS_CC
);
996 php_http_params_class_entry
->create_object
= php_http_params_object_new
;
997 zend_class_implements(php_http_params_class_entry TSRMLS_CC
, 1, zend_ce_arrayaccess
);
999 zend_declare_class_constant_stringl(php_http_params_class_entry
, ZEND_STRL("DEF_PARAM_SEP"), ZEND_STRL(",") TSRMLS_CC
);
1000 zend_declare_class_constant_stringl(php_http_params_class_entry
, ZEND_STRL("DEF_ARG_SEP"), ZEND_STRL(";") TSRMLS_CC
);
1001 zend_declare_class_constant_stringl(php_http_params_class_entry
, ZEND_STRL("DEF_VAL_SEP"), ZEND_STRL("=") TSRMLS_CC
);
1002 zend_declare_class_constant_stringl(php_http_params_class_entry
, ZEND_STRL("COOKIE_PARAM_SEP"), ZEND_STRL("") TSRMLS_CC
);
1004 zend_declare_class_constant_long(php_http_params_class_entry
, ZEND_STRL("PARSE_RAW"), PHP_HTTP_PARAMS_RAW TSRMLS_CC
);
1005 zend_declare_class_constant_long(php_http_params_class_entry
, ZEND_STRL("PARSE_DEFAULT"), PHP_HTTP_PARAMS_DEFAULT TSRMLS_CC
);
1006 zend_declare_class_constant_long(php_http_params_class_entry
, ZEND_STRL("PARSE_URLENCODED"), PHP_HTTP_PARAMS_URLENCODED TSRMLS_CC
);
1007 zend_declare_class_constant_long(php_http_params_class_entry
, ZEND_STRL("PARSE_DIMENSION"), PHP_HTTP_PARAMS_DIMENSION TSRMLS_CC
);
1008 zend_declare_class_constant_long(php_http_params_class_entry
, ZEND_STRL("PARSE_QUERY"), PHP_HTTP_PARAMS_QUERY TSRMLS_CC
);
1010 zend_declare_property_null(php_http_params_class_entry
, ZEND_STRL("params"), ZEND_ACC_PUBLIC TSRMLS_CC
);
1011 zend_declare_property_stringl(php_http_params_class_entry
, ZEND_STRL("param_sep"), ZEND_STRL(","), ZEND_ACC_PUBLIC TSRMLS_CC
);
1012 zend_declare_property_stringl(php_http_params_class_entry
, ZEND_STRL("arg_sep"), ZEND_STRL(";"), ZEND_ACC_PUBLIC TSRMLS_CC
);
1013 zend_declare_property_stringl(php_http_params_class_entry
, ZEND_STRL("val_sep"), ZEND_STRL("="), ZEND_ACC_PUBLIC TSRMLS_CC
);
1014 zend_declare_property_long(php_http_params_class_entry
, ZEND_STRL("flags"), PHP_HTTP_PARAMS_DEFAULT
, ZEND_ACC_PUBLIC TSRMLS_CC
);
1024 * vim600: noet sw=4 ts=4 fdm=marker
1025 * vim<600: noet sw=4 ts=4