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-2014, 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
;
51 } php_http_params_state_t
;
53 static inline void sanitize_escaped(zval
*zv
)
55 if (Z_STRVAL_P(zv
)[0] == '"' && Z_STRVAL_P(zv
)[Z_STRLEN_P(zv
) - 1] == '"') {
56 size_t deq_len
= Z_STRLEN_P(zv
) - 2;
57 char *deq
= estrndup(Z_STRVAL_P(zv
) + 1, deq_len
);
60 ZVAL_STR(zv
, php_http_cs2zs(deq
, deq_len
));
63 php_stripcslashes(Z_STR_P(zv
));
66 static inline zend_string
*quote_string(zend_string
*zs
, zend_bool force
)
68 size_t len
= (zs
)->len
;
70 #if PHP_VERSION_ID < 70300
71 zs
= php_addcslashes(zs
, 0, ZEND_STRL("\0..\37\173\\\""));
73 zs
= php_addcslashes(zs
, ZEND_STRL("\0..\37\173\\\""));
76 if (force
|| len
!= (zs
)->len
|| strpbrk((zs
)->val
, "()<>@,;:\"[]?={} ")) {
77 int len
= (zs
)->len
+ 2;
79 zs
= zend_string_extend(zs
, len
, 0);
81 memmove(&(zs
)->val
[1], (zs
)->val
, (zs
)->len
);
83 (zs
)->val
[len
-1] = '"';
84 (zs
)->val
[len
] = '\0';
86 zend_string_forget_hash_val(zs
);
92 /* if (Z_TYPE_P(zv) == IS_STRING) {
93 size_t len = Z_STRLEN_P(zv);
94 zend_string *stripped = php_addcslashes(Z_STR_P(zv), 0,
95 ZEND_STRL("\0..\37\173\\\""));
97 if (len != stripped->len || strpbrk(stripped->val, "()<>@,;:\"[]?={} ")) {
98 size_t len = stripped->len + 2;
99 char *str = emalloc(len + 1);
102 memcpy(&str[1], stripped->val, stripped->len);
107 zend_string_release(stripped);
108 ZVAL_STR(zv, php_http_cs2zs(str, len));
111 ZVAL_STR(zv, stripped);
115 static inline void prepare_escaped(zval
*zv
)
117 if (Z_TYPE_P(zv
) == IS_STRING
) {
118 zend_string
*str
= quote_string(Z_STR_P(zv
), 0);
124 ZVAL_EMPTY_STRING(zv
);
128 static inline void sanitize_urlencoded(zval
*zv
)
130 Z_STRLEN_P(zv
) = php_url_decode(Z_STRVAL_P(zv
), Z_STRLEN_P(zv
));
133 static inline void prepare_urlencoded(zval
*zv
)
135 zend_string
*str
= php_raw_url_encode(Z_STRVAL_P(zv
), Z_STRLEN_P(zv
));
141 static void sanitize_dimension(zval
*zv
)
143 zval arr
, tmp
, *cur
= &arr
;
144 char *var
= NULL
, *ptr
= Z_STRVAL_P(zv
), *end
= Z_STRVAL_P(zv
) + Z_STRLEN_P(zv
);
156 if (++level
> PG(max_input_nesting_level
)) {
158 php_error_docref(NULL
, E_WARNING
, "Max input nesting level of %ld exceeded", (long) PG(max_input_nesting_level
));
161 if (ptr
- var
== 0) {
170 convert_to_array(cur
);
175 cur
= zend_symtable_str_update(Z_ARRVAL_P(cur
), var
, ptr
- var
, &tmp
);
178 cur
= zend_hash_next_index_insert(Z_ARRVAL_P(cur
), &tmp
);
188 if (zend_hash_num_elements(Z_ARRVAL(arr
))) {
190 ZVAL_COPY_VALUE(zv
, &arr
);
196 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
);
197 static inline void shift_val(php_http_buffer_t
*buf
, zval
*zvalue
, const char *vss
, size_t vsl
, unsigned flags
);
199 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
)
201 HashTable
*ht
= HASH_OF(zvalue
);
202 php_http_arrkey_t key
;
204 php_http_buffer_t prefix
;
206 if (!HT_IS_RECURSIVE(ht
)) {
207 HT_PROTECT_RECURSION(ht
);
208 php_http_buffer_init(&prefix
);
209 php_http_buffer_append(&prefix
, keybuf
->data
, keybuf
->used
);
211 ZEND_HASH_FOREACH_KEY_VAL_IND(ht
, key
.h
, key
.key
, val
)
213 if (key
.key
&& !*key
.key
->val
) {
214 /* only public properties */
218 php_http_buffer_appends(&prefix
, "[");
220 php_http_buffer_append(&prefix
, key
.key
->val
, key
.key
->len
);
222 php_http_buffer_appendf(&prefix
, "%lu", key
.h
);
224 php_http_buffer_appends(&prefix
, "]");
226 if (Z_TYPE_P(val
) == IS_ARRAY
|| Z_TYPE_P(val
) == IS_OBJECT
) {
227 prepare_dimension(buf
, &prefix
, val
, pss
, psl
, vss
, vsl
, flags
);
229 zend_string
*cpy
= zval_get_string(val
);
233 shift_key(buf
, prefix
.data
, prefix
.used
, pss
, psl
, flags
);
234 shift_val(buf
, &tmp
, vss
, vsl
, flags
);
235 zend_string_release(cpy
);
238 php_http_buffer_cut(&prefix
, keybuf
->used
, prefix
.used
- keybuf
->used
);
240 ZEND_HASH_FOREACH_END();
241 HT_UNPROTECT_RECURSION(ht
);
243 php_http_buffer_dtor(&prefix
);
247 static inline void sanitize_key(unsigned flags
, const char *str
, size_t len
, zval
*zv
, zend_bool
*rfc5987
)
250 zend_string
*zs
= zend_string_init(str
, len
, 0);
253 ZVAL_STR(zv
, php_trim(zs
, NULL
, 0, 3));
254 zend_string_release(zs
);
256 if (flags
& PHP_HTTP_PARAMS_ESCAPED
) {
257 sanitize_escaped(zv
);
260 if (!Z_STRLEN_P(zv
)) {
264 if (flags
& PHP_HTTP_PARAMS_RFC5987
) {
265 eos
= &Z_STRVAL_P(zv
)[Z_STRLEN_P(zv
)-1];
273 if (flags
& PHP_HTTP_PARAMS_URLENCODED
) {
274 sanitize_urlencoded(zv
);
277 if (flags
& PHP_HTTP_PARAMS_DIMENSION
) {
278 sanitize_dimension(zv
);
282 static inline void sanitize_rfc5987(zval
*zv
, char **language
, zend_bool
*latin1
)
287 * iso-8850-1'de'bl%f6der%20schei%df%21
288 * utf-8'de-DE'bl%c3%b6der%20schei%c3%9f%21
291 switch (Z_STRVAL_P(zv
)[0]) {
294 if (!strncasecmp(Z_STRVAL_P(zv
), "iso-8859-1", lenof("iso-8859-1"))) {
296 ptr
= Z_STRVAL_P(zv
) + lenof("iso-8859-1");
302 if (!strncasecmp(Z_STRVAL_P(zv
), "utf-8", lenof("utf-8"))) {
304 ptr
= Z_STRVAL_P(zv
) + lenof("utf-8");
312 /* extract language */
314 for (*language
= ++ptr
; *ptr
&& *ptr
!= '\''; ++ptr
);
319 *language
= estrndup(*language
, ptr
- *language
);
322 ptr
= estrdup(++ptr
);
324 ZVAL_STR(zv
, php_http_cs2zs(ptr
, strlen(ptr
)));
328 static inline void sanitize_rfc5988(char *str
, size_t len
, zval
*zv
)
330 zend_string
*zs
= zend_string_init(str
, len
, 0);
333 ZVAL_STR(zv
, php_trim(zs
, " ><", 3, 3));
334 zend_string_release(zs
);
337 static inline void prepare_rfc5988(zval
*zv
)
339 if (Z_TYPE_P(zv
) != IS_STRING
) {
341 ZVAL_EMPTY_STRING(zv
);
345 static void utf8encode(zval
*zv
)
348 unsigned char *ptr
= (unsigned char *) Z_STRVAL_P(zv
);
351 if (*ptr
++ >= 0x80) {
357 ptr
= safe_emalloc(1, len
, 1);
358 for (len
= 0, pos
= 0; len
<= Z_STRLEN_P(zv
); ++len
, ++pos
) {
359 ptr
[pos
] = Z_STRVAL_P(zv
)[len
];
360 if ((ptr
[pos
]) >= 0x80) {
361 ptr
[pos
+ 1] = 0x80 | (ptr
[pos
] & 0x3f);
362 ptr
[pos
] = 0xc0 | ((ptr
[pos
] >> 6) & 0x1f);
367 ZVAL_STR(zv
, php_http_cs2zs((char *) ptr
, pos
-1));
370 static inline void sanitize_value(unsigned flags
, const char *str
, size_t len
, zval
*zv
, zend_bool rfc5987
)
372 char *language
= NULL
;
373 zend_bool latin1
= 0;
374 zend_string
*zs
= zend_string_init(str
, len
, 0);
377 ZVAL_STR(zv
, php_trim(zs
, NULL
, 0, 3));
378 zend_string_release(zs
);
381 sanitize_rfc5987(zv
, &language
, &latin1
);
384 if (flags
& PHP_HTTP_PARAMS_ESCAPED
) {
385 sanitize_escaped(zv
);
388 if ((flags
& PHP_HTTP_PARAMS_URLENCODED
) || (rfc5987
&& language
)) {
389 sanitize_urlencoded(zv
);
392 if (rfc5987
&& language
) {
399 ZVAL_COPY_VALUE(&tmp
, zv
);
401 add_assoc_zval(zv
, language
, &tmp
);
406 static inline void prepare_key(unsigned flags
, char *old_key
, size_t old_len
, char **new_key
, size_t *new_len
)
410 ZVAL_STRINGL(&zv
, old_key
, old_len
);
412 if (flags
& PHP_HTTP_PARAMS_URLENCODED
) {
413 prepare_urlencoded(&zv
);
416 if (flags
& PHP_HTTP_PARAMS_ESCAPED
) {
417 if (flags
& PHP_HTTP_PARAMS_RFC5988
) {
418 prepare_rfc5988(&zv
);
420 prepare_escaped(&zv
);
424 *new_key
= estrndup(Z_STRVAL(zv
), Z_STRLEN(zv
));
425 *new_len
= Z_STRLEN(zv
);
429 static inline void prepare_value(unsigned flags
, zval
*zv
)
431 if (flags
& PHP_HTTP_PARAMS_URLENCODED
) {
432 prepare_urlencoded(zv
);
435 if (flags
& PHP_HTTP_PARAMS_ESCAPED
) {
440 static void merge_param(HashTable
*params
, zval
*zdata
, zval
**current_param
, zval
**current_args
)
442 zval
*ptr
, *zdata_ptr
;
443 php_http_arrkey_t hkey
= {0};
448 INIT_PZVAL_ARRAY(&tmp
, params
);
449 fprintf(stderr
, "params = ");
450 zend_print_zval_r(&tmp
, 1);
451 fprintf(stderr
, "\n");
455 zend_hash_get_current_key(Z_ARRVAL_P(zdata
), &hkey
.key
, &hkey
.h
);
457 if ((hkey
.key
&& !zend_hash_exists(params
, hkey
.key
))
458 || (!hkey
.key
&& !zend_hash_index_exists(params
, hkey
.h
))
460 zval tmp
, arg
, *args
;
462 /* create the entry if it doesn't exist */
463 ptr
= zend_hash_get_current_data(Z_ARRVAL_P(zdata
));
466 add_assoc_zval_ex(&tmp
, ZEND_STRL("value"), ptr
);
469 args
= zend_hash_str_update(Z_ARRVAL(tmp
), "arguments", lenof("arguments"), &arg
);
470 *current_args
= args
;
473 ptr
= zend_hash_update(params
, hkey
.key
, &tmp
);
475 ptr
= zend_hash_index_update(params
, hkey
.h
, &tmp
);
480 ptr
= zend_hash_find(params
, hkey
.key
);
482 ptr
= zend_hash_index_find(params
, hkey
.h
);
487 if (Z_TYPE_P(ptr
) == IS_ARRAY
488 && (ptr
= zend_hash_str_find(Z_ARRVAL_P(ptr
), "value", lenof("value")))
489 && (zdata_ptr
= zend_hash_get_current_data(Z_ARRVAL_P(zdata_ptr
)))
492 * params = [arr => [value => [0 => 1]]]
494 * zdata = [arr => [0 => NULL]]
499 while (Z_TYPE_P(zdata_ptr
) == IS_ARRAY
&& (test_ptr
= zend_hash_get_current_data(Z_ARRVAL_P(zdata_ptr
)))) {
500 if (Z_TYPE_P(test_ptr
) == IS_ARRAY
&& Z_TYPE_P(ptr
) == IS_ARRAY
) {
503 /* now find key in ptr */
504 if (HASH_KEY_IS_STRING
== zend_hash_get_current_key(Z_ARRVAL_P(zdata_ptr
), &hkey
.key
, &hkey
.h
)) {
505 if ((ptr
= zend_hash_find(Z_ARRVAL_P(ptr
), hkey
.key
))) {
506 zdata_ptr
= test_ptr
;
509 Z_TRY_ADDREF_P(test_ptr
);
510 ptr
= zend_hash_update(Z_ARRVAL_P(ptr
), hkey
.key
, test_ptr
);
514 if ((ptr
= zend_hash_index_find(Z_ARRVAL_P(ptr
), hkey
.h
))) {
515 zdata_ptr
= test_ptr
;
518 Z_TRY_ADDREF_P(test_ptr
);
519 ptr
= zend_hash_index_update(Z_ARRVAL_P(ptr
), hkey
.h
, test_ptr
);
523 Z_TRY_ADDREF_P(test_ptr
);
524 ptr
= zend_hash_next_index_insert(Z_ARRVAL_P(ptr
), test_ptr
);
529 /* this is the leaf */
530 Z_TRY_ADDREF_P(test_ptr
);
531 if (Z_TYPE_P(ptr
) != IS_ARRAY
) {
535 if (HASH_KEY_IS_STRING
== zend_hash_get_current_key(Z_ARRVAL_P(zdata_ptr
), &hkey
.key
, &hkey
.h
)) {
536 ptr
= zend_hash_update(Z_ARRVAL_P(ptr
), hkey
.key
, test_ptr
);
538 ptr
= zend_hash_index_update(Z_ARRVAL_P(ptr
), hkey
.h
, test_ptr
);
540 ptr
= zend_hash_next_index_insert(Z_ARRVAL_P(ptr
), test_ptr
);
550 while (Z_TYPE_P(ptr
) == IS_ARRAY
) {
551 zval
*tmp
= zend_hash_get_current_data(Z_ARRVAL_P(ptr
));
559 *current_param
= ptr
;
562 static void push_param(HashTable
*params
, php_http_params_state_t
*state
, const php_http_params_opts_t
*opts
)
564 if (state
->val
.str
) {
565 if (!state
->current
.val
) {
567 } else if (0 < (state
->val
.len
= state
->input
.str
- state
->val
.str
)) {
568 sanitize_value(opts
->flags
, state
->val
.str
, state
->val
.len
, state
->current
.val
, state
->rfc5987
);
570 ZVAL_EMPTY_STRING(state
->current
.val
);
573 } else if (state
->arg
.str
) {
574 if (0 < (state
->arg
.len
= state
->input
.str
- state
->arg
.str
)) {
576 zend_bool rfc5987
= 0;
579 sanitize_key(opts
->flags
, state
->arg
.str
, state
->arg
.len
, &key
, &rfc5987
);
580 state
->rfc5987
= rfc5987
;
581 if (Z_TYPE(key
) == IS_STRING
&& Z_STRLEN(key
)) {
587 if ((rfc
= zend_hash_str_find(Z_ARRVAL_P(state
->current
.args
), ZEND_STRL("*rfc5987*")))) {
588 state
->current
.val
= zend_symtable_str_update(Z_ARRVAL_P(rfc
), Z_STRVAL(key
), Z_STRLEN(key
), &val
);
592 array_init_size(&tmp
, 1);
593 state
->current
.val
= zend_symtable_str_update(Z_ARRVAL(tmp
), Z_STRVAL(key
), Z_STRLEN(key
), &val
);
594 zend_symtable_str_update(Z_ARRVAL_P(state
->current
.args
), ZEND_STRL("*rfc5987*"), &tmp
);
597 state
->current
.val
= zend_symtable_str_update(Z_ARRVAL_P(state
->current
.args
), Z_STRVAL(key
), Z_STRLEN(key
), &val
);
602 } else if (state
->param
.str
) {
603 if (0 < (state
->param
.len
= state
->input
.str
- state
->param
.str
)) {
604 zval prm
, arg
, val
, key
;
605 zend_bool rfc5987
= 0;
608 if (opts
->flags
& PHP_HTTP_PARAMS_RFC5988
) {
609 sanitize_rfc5988(state
->param
.str
, state
->param
.len
, &key
);
611 sanitize_key(opts
->flags
, state
->param
.str
, state
->param
.len
, &key
, &rfc5987
);
612 state
->rfc5987
= rfc5987
;
614 if (Z_TYPE(key
) == IS_ARRAY
) {
615 merge_param(params
, &key
, &state
->current
.val
, &state
->current
.args
);
616 } else if (Z_TYPE(key
) == IS_STRING
&& Z_STRLEN(key
)) {
617 // FIXME: array_init_size(&prm, 2);
620 if (!Z_ISUNDEF(opts
->defval
)) {
621 ZVAL_COPY_VALUE(&val
, &opts
->defval
);
622 zval_copy_ctor(&val
);
626 if (rfc5987
&& (opts
->flags
& PHP_HTTP_PARAMS_RFC5987
)) {
627 state
->current
.val
= zend_hash_str_update(Z_ARRVAL(prm
), "*rfc5987*", lenof("*rfc5987*"), &val
);
629 state
->current
.val
= zend_hash_str_update(Z_ARRVAL(prm
), "value", lenof("value"), &val
);
631 // FIXME: array_init_size(&arg, 3);
633 state
->current
.args
= zend_hash_str_update(Z_ARRVAL(prm
), "arguments", lenof("arguments"), &arg
);
634 state
->current
.param
= zend_symtable_str_update(params
, Z_STRVAL(key
), Z_STRLEN(key
), &prm
);
641 static inline zend_bool
check_str(const char *chk_str
, size_t chk_len
, const char *sep_str
, size_t sep_len
) {
642 return 0 < sep_len
&& chk_len
>= sep_len
&& *chk_str
== *sep_str
&& !memcmp(chk_str
+ 1, sep_str
+ 1, sep_len
- 1);
645 static size_t check_sep(php_http_params_state_t
*state
, php_http_params_token_t
**separators
)
647 php_http_params_token_t
**sep
= separators
;
649 if (state
->quotes
|| state
->escape
) {
653 if (sep
) while (*sep
) {
654 if (check_str(state
->input
.str
, state
->input
.len
, (*sep
)->str
, (*sep
)->len
)) {
662 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
)
666 state
->input
.str
+= skip
;
667 state
->input
.len
-= skip
;
669 while ( (param
&& (sep_len
= check_sep(state
, param
)))
670 || (arg
&& (sep_len
= check_sep(state
, arg
)))
671 || (val
&& (sep_len
= check_sep(state
, val
)))
673 state
->input
.str
+= sep_len
;
674 state
->input
.len
-= sep_len
;
678 HashTable
*php_http_params_parse(HashTable
*params
, const php_http_params_opts_t
*opts
)
680 php_http_params_state_t state
= {{NULL
,0}, {NULL
,0}, {NULL
,0}, {NULL
,0}, {NULL
,NULL
,NULL
}, 0, 0};
682 state
.input
.str
= opts
->input
.str
;
683 state
.input
.len
= opts
->input
.len
;
686 ALLOC_HASHTABLE(params
);
687 ZEND_INIT_SYMTABLE(params
);
690 while (state
.input
.len
) {
691 if ((opts
->flags
& PHP_HTTP_PARAMS_RFC5988
) && !state
.arg
.str
) {
692 if (*state
.input
.str
== '<') {
694 } else if (*state
.input
.str
== '>') {
697 } else if (*state
.input
.str
== '"' && !state
.escape
) {
698 state
.quotes
= !state
.quotes
;
700 state
.escape
= (*state
.input
.str
== '\\');
703 if (!state
.param
.str
) {
705 skip_sep(0, &state
, opts
->param
, opts
->arg
, opts
->val
);
706 state
.param
.str
= state
.input
.str
;
709 /* are we at a param separator? */
710 if (0 < (sep_len
= check_sep(&state
, opts
->param
))) {
711 push_param(params
, &state
, opts
);
713 skip_sep(sep_len
, &state
, opts
->param
, opts
->arg
, opts
->val
);
715 /* start off with a new param */
716 state
.param
.str
= state
.input
.str
;
718 state
.arg
.str
= NULL
;
720 state
.val
.str
= NULL
;
726 /* are we at an arg separator? */
727 if (0 < (sep_len
= check_sep(&state
, opts
->arg
))) {
728 push_param(params
, &state
, opts
);
730 skip_sep(sep_len
, &state
, NULL
, opts
->arg
, opts
->val
);
732 /* continue with a new arg */
733 state
.arg
.str
= state
.input
.str
;
735 state
.val
.str
= NULL
;
741 /* are we at a val separator? */
742 if (0 < (sep_len
= check_sep(&state
, opts
->val
))) {
743 /* only handle separator if we're not already reading in a val */
744 if (!state
.val
.str
) {
745 push_param(params
, &state
, opts
);
747 skip_sep(sep_len
, &state
, NULL
, NULL
, opts
->val
);
749 state
.val
.str
= state
.input
.str
;
757 if (state
.input
.len
) {
763 push_param(params
, &state
, opts
);
768 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
)
774 php_http_buffer_append(buf
, ass
, asl
);
777 prepare_key(flags
, key_str
, key_len
, &str
, &len
);
778 php_http_buffer_append(buf
, str
, len
);
782 static inline void shift_rfc5987(php_http_buffer_t
*buf
, zval
*zvalue
, const char *vss
, size_t vsl
, unsigned flags
)
784 HashTable
*ht
= HASH_OF(zvalue
);
787 php_http_arrkey_t key
= {0};
789 if ((zdata
= zend_hash_get_current_data(ht
))
790 && HASH_KEY_NON_EXISTENT
!= zend_hash_get_current_key(ht
, &key
.key
, &key
.h
)
792 php_http_arrkey_stringify(&key
, NULL
);
793 php_http_buffer_appendf(buf
, "*%.*sutf-8'%.*s'",
794 (int) (vsl
> INT_MAX
? INT_MAX
: vsl
), vss
,
795 (int) (key
.key
->len
> INT_MAX
? INT_MAX
: key
.key
->len
), key
.key
->val
);
796 php_http_arrkey_dtor(&key
);
798 if (Z_TYPE_P(zdata
) == IS_INDIRECT
) {
799 zdata
= Z_INDIRECT_P(zdata
);
801 zs
= zval_get_string(zdata
);
803 prepare_value(flags
| PHP_HTTP_PARAMS_URLENCODED
, &tmp
);
804 php_http_buffer_append(buf
, Z_STRVAL(tmp
), Z_STRLEN(tmp
));
809 static inline void shift_rfc5988(php_http_buffer_t
*buf
, char *key_str
, size_t key_len
, const char *ass
, size_t asl
, unsigned flags
)
815 php_http_buffer_append(buf
, ass
, asl
);
818 prepare_key(flags
, key_str
, key_len
, &str
, &len
);
819 php_http_buffer_appends(buf
, "<");
820 php_http_buffer_append(buf
, str
, len
);
821 php_http_buffer_appends(buf
, ">");
825 static inline void shift_rfc5988_val(php_http_buffer_t
*buf
, zval
*zv
, const char *vss
, size_t vsl
, unsigned flags
)
827 zend_string
*str
, *zs
= zval_get_string(zv
);
829 str
= quote_string(zs
, 1);
830 zend_string_release(zs
);
832 php_http_buffer_append(buf
, vss
, vsl
);
833 php_http_buffer_append(buf
, str
->val
, str
->len
);
834 zend_string_release(str
);
837 static inline void shift_val(php_http_buffer_t
*buf
, zval
*zvalue
, const char *vss
, size_t vsl
, unsigned flags
)
842 switch (Z_TYPE_P(zvalue
)) {
847 php_http_buffer_append(buf
, vss
, vsl
);
848 php_http_buffer_appends(buf
, "0");
852 zs
= zval_get_string(zvalue
);
855 prepare_value(flags
, &tmp
);
856 php_http_buffer_append(buf
, vss
, vsl
);
857 php_http_buffer_append(buf
, Z_STRVAL(tmp
), Z_STRLEN(tmp
));
864 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
)
866 if (Z_TYPE_P(zvalue
) == IS_ARRAY
|| Z_TYPE_P(zvalue
) == IS_OBJECT
) {
867 php_http_arrkey_t key
;
868 HashTable
*ht
= HASH_OF(zvalue
);
870 zend_bool rfc5987
= !strcmp(key_str
, "*rfc5987*");
873 shift_key(buf
, key_str
, key_len
, ass
, asl
, flags
);
875 ZEND_HASH_FOREACH_KEY_VAL_IND(ht
, key
.h
, key
.key
, val
)
877 /* did you mean recursion? */
878 php_http_arrkey_stringify(&key
, NULL
);
879 if (rfc5987
&& (Z_TYPE_P(val
) == IS_ARRAY
|| Z_TYPE_P(val
) == IS_OBJECT
)) {
880 shift_key(buf
, key
.key
->val
, key
.key
->len
, ass
, asl
, flags
);
881 shift_rfc5987(buf
, val
, vss
, vsl
, flags
);
883 shift_arg(buf
, key
.key
->val
, key
.key
->len
, val
, ass
, asl
, vss
, vsl
, flags
);
885 php_http_arrkey_dtor(&key
);
887 ZEND_HASH_FOREACH_END();
889 shift_key(buf
, key_str
, key_len
, ass
, asl
, flags
);
891 if (flags
& PHP_HTTP_PARAMS_RFC5988
) {
895 case lenof("anchor"):
896 /* some args must be quoted */
897 if (0 <= php_http_select_str(key_str
, 3, "rel", "title", "anchor")) {
898 shift_rfc5988_val(buf
, zvalue
, vss
, vsl
, flags
);
905 shift_val(buf
, zvalue
, vss
, vsl
, flags
);
909 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
, zend_bool rfc5987
)
911 if (Z_TYPE_P(zvalue
) == IS_ARRAY
|| Z_TYPE_P(zvalue
) == IS_OBJECT
) {
912 /* treat as arguments, unless we care for dimensions or rfc5987 */
913 if (flags
& PHP_HTTP_PARAMS_DIMENSION
) {
914 php_http_buffer_t
*keybuf
= php_http_buffer_from_string(key_str
, key_len
);
915 prepare_dimension(buf
, keybuf
, zvalue
, pss
, psl
, vss
, vsl
, flags
);
916 php_http_buffer_free(&keybuf
);
917 } else if (rfc5987
) {
918 shift_key(buf
, key_str
, key_len
, pss
, psl
, flags
);
919 shift_rfc5987(buf
, zvalue
, vss
, vsl
, flags
);
921 shift_arg(buf
, key_str
, key_len
, zvalue
, ass
, asl
, vss
, vsl
, flags
);
924 if (flags
& PHP_HTTP_PARAMS_RFC5988
) {
925 shift_rfc5988(buf
, key_str
, key_len
, pss
, psl
, flags
);
927 shift_key(buf
, key_str
, key_len
, pss
, psl
, flags
);
929 shift_val(buf
, zvalue
, vss
, vsl
, flags
);
933 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
)
936 php_http_arrkey_t key
;
937 zend_bool rfc5987
= 0;
940 buf
= php_http_buffer_init(NULL
);
943 ZEND_HASH_FOREACH_KEY_VAL(params
, key
.h
, key
.key
, zparam
)
945 zval
*zvalue
, *zargs
;
947 if (Z_TYPE_P(zparam
) != IS_ARRAY
) {
950 if (!(zvalue
= zend_hash_str_find(Z_ARRVAL_P(zparam
), ZEND_STRL("value")))) {
951 if (!(zvalue
= zend_hash_str_find(Z_ARRVAL_P(zparam
), ZEND_STRL("*rfc5987*")))) {
959 php_http_arrkey_stringify(&key
, NULL
);
960 shift_param(buf
, key
.key
->val
, key
.key
->len
, zvalue
, pss
, psl
, ass
, asl
, vss
, vsl
, flags
, rfc5987
);
961 php_http_arrkey_dtor(&key
);
963 if (Z_TYPE_P(zparam
) == IS_ARRAY
) {
964 zval
*tmp
= zend_hash_str_find(Z_ARRVAL_P(zparam
), ZEND_STRL("arguments"));
968 } else if (zvalue
== zparam
) {
975 if (Z_TYPE_P(zvalue
) == IS_ARRAY
) {
976 ZEND_HASH_FOREACH_KEY_VAL(Z_ARRVAL_P(zvalue
), key
.h
, key
.key
, zargs
)
978 if (zvalue
== zparam
&& key
.key
&& zend_string_equals_literal(key
.key
, "value")) {
982 php_http_arrkey_stringify(&key
, NULL
);
983 shift_arg(buf
, key
.key
->val
, key
.key
->len
, zargs
, ass
, asl
, vss
, vsl
, flags
);
984 php_http_arrkey_dtor(&key
);
986 ZEND_HASH_FOREACH_END();
989 ZEND_HASH_FOREACH_END();
991 php_http_buffer_shrink(buf
);
992 php_http_buffer_fix(buf
);
997 php_http_params_token_t
**php_http_params_separator_init(zval
*zv
)
1000 php_http_params_token_t
**ret
, **tmp
;
1006 ZVAL_DUP(&ztmp
, zv
);
1008 convert_to_array(zv
);
1010 ret
= ecalloc(zend_hash_num_elements(Z_ARRVAL_P(zv
)) + 1, sizeof(*ret
));
1013 ZEND_HASH_FOREACH_VAL(Z_ARRVAL_P(zv
), sep
)
1015 zend_string
*zs
= zval_get_string(sep
);
1018 *tmp
= emalloc(sizeof(**tmp
));
1019 (*tmp
)->str
= estrndup(zs
->val
, (*tmp
)->len
= zs
->len
);
1022 zend_string_release(zs
);
1024 ZEND_HASH_FOREACH_END();
1026 zval_ptr_dtor(&ztmp
);
1032 void php_http_params_separator_free(php_http_params_token_t
**separator
)
1034 php_http_params_token_t
**sep
= separator
;
1037 PTR_FREE((*sep
)->str
);
1045 static zend_class_entry
*php_http_params_class_entry
;
1046 zend_class_entry
*php_http_params_get_class_entry(void)
1048 return php_http_params_class_entry
;
1051 ZEND_BEGIN_ARG_INFO_EX(ai_HttpParams___construct
, 0, 0, 0)
1052 ZEND_ARG_INFO(0, params
)
1053 ZEND_ARG_INFO(0, param_sep
)
1054 ZEND_ARG_INFO(0, arg_sep
)
1055 ZEND_ARG_INFO(0, val_sep
)
1056 ZEND_ARG_INFO(0, flags
)
1057 ZEND_END_ARG_INFO();
1058 PHP_METHOD(HttpParams
, __construct
)
1060 zval
*zparams
= NULL
, *param_sep
= NULL
, *arg_sep
= NULL
, *val_sep
= NULL
;
1061 zend_long flags
= PHP_HTTP_PARAMS_DEFAULT
;
1062 zend_error_handling zeh
;
1065 php_http_expect(SUCCESS
== zend_parse_parameters(ZEND_NUM_ARGS(), "|z!/z/z/z/l", &zparams
, ¶m_sep
, &arg_sep
, &val_sep
, &flags
), invalid_arg
, return);
1067 zend_replace_error_handling(EH_THROW
, php_http_get_exception_runtime_class_entry(), &zeh
);
1069 switch (ZEND_NUM_ARGS()) {
1071 zend_update_property_long(php_http_params_class_entry
, getThis(), ZEND_STRL("flags"), flags
);
1074 zend_update_property(php_http_params_class_entry
, getThis(), ZEND_STRL("val_sep"), val_sep
);
1077 zend_update_property(php_http_params_class_entry
, getThis(), ZEND_STRL("arg_sep"), arg_sep
);
1080 zend_update_property(php_http_params_class_entry
, getThis(), ZEND_STRL("param_sep"), param_sep
);
1085 switch (Z_TYPE_P(zparams
)) {
1088 convert_to_array(zparams
);
1089 zend_update_property(php_http_params_class_entry
, getThis(), ZEND_STRL("params"), zparams
);
1092 zs
= zval_get_string(zparams
);
1096 php_http_params_opts_t opts
= {
1098 php_http_params_separator_init(zend_read_property(php_http_params_class_entry
, getThis(), ZEND_STRL("param_sep"), 0, &tmp
)),
1099 php_http_params_separator_init(zend_read_property(php_http_params_class_entry
, getThis(), ZEND_STRL("arg_sep"), 0, &tmp
)),
1100 php_http_params_separator_init(zend_read_property(php_http_params_class_entry
, getThis(), ZEND_STRL("val_sep"), 0, &tmp
)),
1105 php_http_params_parse(Z_ARRVAL(tmp
), &opts
);
1106 zend_update_property(php_http_params_class_entry
, getThis(), ZEND_STRL("params"), &tmp
);
1107 zval_ptr_dtor(&tmp
);
1109 php_http_params_separator_free(opts
.param
);
1110 php_http_params_separator_free(opts
.arg
);
1111 php_http_params_separator_free(opts
.val
);
1113 zend_string_release(zs
);
1120 zend_update_property(php_http_params_class_entry
, getThis(), ZEND_STRL("params"), &tmp
);
1121 zval_ptr_dtor(&tmp
);
1124 zend_restore_error_handling(&zeh
);
1127 ZEND_BEGIN_ARG_INFO_EX(ai_HttpParams_toArray
, 0, 0, 0)
1128 ZEND_END_ARG_INFO();
1129 PHP_METHOD(HttpParams
, toArray
)
1131 zval zparams_tmp
, *zparams
;
1133 if (SUCCESS
!= zend_parse_parameters_none()) {
1136 zparams
= zend_read_property(php_http_params_class_entry
, getThis(), ZEND_STRL("params"), 0, &zparams_tmp
);
1137 RETURN_ZVAL(zparams
, 1, 0);
1140 ZEND_BEGIN_ARG_INFO_EX(ai_HttpParams_toString
, 0, 0, 0)
1141 ZEND_END_ARG_INFO();
1142 PHP_METHOD(HttpParams
, toString
)
1144 zval
*tmp
, *zparams
, *zpsep
, *zasep
, *zvsep
;
1145 zval zparams_tmp
, flags_tmp
, psep_tmp
, asep_tmp
, vsep_tmp
;
1146 zend_string
*psep
, *asep
, *vsep
;
1148 php_http_buffer_t buf
;
1150 zparams
= zend_read_property(php_http_params_class_entry
, getThis(), ZEND_STRL("params"), 0, &zparams_tmp
);
1151 convert_to_array_ex(zparams
);
1152 flags
= zval_get_long(zend_read_property(php_http_params_class_entry
, getThis(), ZEND_STRL("flags"), 0, &flags_tmp
));
1154 zpsep
= zend_read_property(php_http_params_class_entry
, getThis(), ZEND_STRL("param_sep"), 0, &psep_tmp
);
1155 if (Z_TYPE_P(zpsep
) == IS_ARRAY
&& (tmp
= zend_hash_get_current_data(Z_ARRVAL_P(zpsep
)))) {
1156 psep
= zval_get_string(tmp
);
1158 psep
= zval_get_string(zpsep
);
1160 zasep
= zend_read_property(php_http_params_class_entry
, getThis(), ZEND_STRL("arg_sep"), 0, &asep_tmp
);
1161 if (Z_TYPE_P(zasep
) == IS_ARRAY
&& (tmp
= zend_hash_get_current_data(Z_ARRVAL_P(zasep
)))) {
1162 asep
= zval_get_string(tmp
);
1164 asep
= zval_get_string(zasep
);
1166 zvsep
= zend_read_property(php_http_params_class_entry
, getThis(), ZEND_STRL("val_sep"), 0, &vsep_tmp
);
1167 if (Z_TYPE_P(zvsep
) == IS_ARRAY
&& (tmp
= zend_hash_get_current_data(Z_ARRVAL_P(zvsep
)))) {
1168 vsep
= zval_get_string(tmp
);
1170 vsep
= zval_get_string(zvsep
);
1173 php_http_buffer_init(&buf
);
1174 php_http_params_to_string(&buf
, Z_ARRVAL_P(zparams
), psep
->val
, psep
->len
, asep
->val
, asep
->len
, vsep
->val
, vsep
->len
, flags
);
1176 zend_string_release(psep
);
1177 zend_string_release(asep
);
1178 zend_string_release(vsep
);
1180 RETVAL_STR(php_http_cs2zs(buf
.data
, buf
.used
));
1183 ZEND_BEGIN_ARG_INFO_EX(ai_HttpParams_offsetExists
, 0, 0, 1)
1184 ZEND_ARG_INFO(0, name
)
1185 ZEND_END_ARG_INFO();
1186 PHP_METHOD(HttpParams
, offsetExists
)
1189 zval zparams_tmp
, *zparam
, *zparams
;
1191 if (SUCCESS
!= zend_parse_parameters(ZEND_NUM_ARGS(), "S", &name
)) {
1195 zparams
= zend_read_property(php_http_params_class_entry
, getThis(), ZEND_STRL("params"), 0, &zparams_tmp
);
1197 if (Z_TYPE_P(zparams
) == IS_ARRAY
&& (zparam
= zend_symtable_find(Z_ARRVAL_P(zparams
), name
))) {
1198 RETVAL_BOOL(Z_TYPE_P(zparam
) != IS_NULL
);
1204 ZEND_BEGIN_ARG_INFO_EX(ai_HttpParams_offsetGet
, 0, 0, 1)
1205 ZEND_ARG_INFO(0, name
)
1206 ZEND_END_ARG_INFO();
1207 PHP_METHOD(HttpParams
, offsetGet
)
1210 zval zparams_tmp
, *zparam
, *zparams
;
1212 if (SUCCESS
!= zend_parse_parameters(ZEND_NUM_ARGS(), "S", &name
)) {
1216 zparams
= zend_read_property(php_http_params_class_entry
, getThis(), ZEND_STRL("params"), 0, &zparams_tmp
);
1218 if (Z_TYPE_P(zparams
) == IS_ARRAY
&& (zparam
= zend_symtable_find(Z_ARRVAL_P(zparams
), name
))) {
1219 RETVAL_ZVAL(zparam
, 1, 0);
1223 ZEND_BEGIN_ARG_INFO_EX(ai_HttpParams_offsetUnset
, 0, 0, 1)
1224 ZEND_ARG_INFO(0, name
)
1225 ZEND_END_ARG_INFO();
1226 PHP_METHOD(HttpParams
, offsetUnset
)
1229 zval zparams_tmp
, *zparams
;
1231 if (SUCCESS
!= zend_parse_parameters(ZEND_NUM_ARGS(), "S", &name
)) {
1235 zparams
= zend_read_property(php_http_params_class_entry
, getThis(), ZEND_STRL("params"), 0, &zparams_tmp
);
1237 if (Z_TYPE_P(zparams
) == IS_ARRAY
) {
1238 zend_symtable_del(Z_ARRVAL_P(zparams
), name
);
1242 ZEND_BEGIN_ARG_INFO_EX(ai_HttpParams_offsetSet
, 0, 0, 2)
1243 ZEND_ARG_INFO(0, name
)
1244 ZEND_ARG_INFO(0, value
)
1245 ZEND_END_ARG_INFO();
1246 PHP_METHOD(HttpParams
, offsetSet
)
1249 zval zparams_tmp
, *zparam
, *zparams
, *nvalue
;
1251 if (SUCCESS
!= zend_parse_parameters(ZEND_NUM_ARGS(), "Sz", &name
, &nvalue
)) {
1255 zparams
= zend_read_property(php_http_params_class_entry
, getThis(), ZEND_STRL("params"), 0, &zparams_tmp
);
1256 convert_to_array(zparams
);
1259 if (Z_TYPE_P(nvalue
) == IS_ARRAY
) {
1260 if ((zparam
= zend_symtable_find(Z_ARRVAL_P(zparams
), name
))) {
1261 convert_to_array(zparam
);
1262 array_join(Z_ARRVAL_P(nvalue
), Z_ARRVAL_P(zparam
), 0, 0);
1264 Z_TRY_ADDREF_P(nvalue
);
1265 add_assoc_zval_ex(zparams
, name
->val
, name
->len
, nvalue
);
1270 if ((zparam
= zend_symtable_find(Z_ARRVAL_P(zparams
), name
))) {
1271 ZVAL_DUP(&tmp
, zparam
);
1272 convert_to_array(&tmp
);
1277 Z_TRY_ADDREF_P(nvalue
);
1278 add_assoc_zval_ex(&tmp
, ZEND_STRL("value"), nvalue
);
1279 add_assoc_zval_ex(zparams
, name
->val
, name
->len
, &tmp
);
1283 zend_string
*zs
= zval_get_string(nvalue
);
1286 add_assoc_bool_ex(&arr
, ZEND_STRL("value"), 1);
1287 add_assoc_zval_ex(zparams
, zs
->val
, zs
->len
, &arr
);
1288 zend_string_release(zs
);
1292 static zend_function_entry php_http_params_methods
[] = {
1293 PHP_ME(HttpParams
, __construct
, ai_HttpParams___construct
, ZEND_ACC_PUBLIC
|ZEND_ACC_FINAL
)
1295 PHP_ME(HttpParams
, toArray
, ai_HttpParams_toArray
, ZEND_ACC_PUBLIC
)
1296 PHP_ME(HttpParams
, toString
, ai_HttpParams_toString
, ZEND_ACC_PUBLIC
)
1297 ZEND_MALIAS(HttpParams
, __toString
, toString
, ai_HttpParams_toString
, ZEND_ACC_PUBLIC
)
1299 PHP_ME(HttpParams
, offsetExists
, ai_HttpParams_offsetExists
, ZEND_ACC_PUBLIC
)
1300 PHP_ME(HttpParams
, offsetUnset
, ai_HttpParams_offsetUnset
, ZEND_ACC_PUBLIC
)
1301 PHP_ME(HttpParams
, offsetSet
, ai_HttpParams_offsetSet
, ZEND_ACC_PUBLIC
)
1302 PHP_ME(HttpParams
, offsetGet
, ai_HttpParams_offsetGet
, ZEND_ACC_PUBLIC
)
1304 EMPTY_FUNCTION_ENTRY
1307 PHP_MINIT_FUNCTION(http_params
)
1309 zend_class_entry ce
= {0};
1311 INIT_NS_CLASS_ENTRY(ce
, "http", "Params", php_http_params_methods
);
1312 php_http_params_class_entry
= zend_register_internal_class(&ce
);
1313 php_http_params_class_entry
->create_object
= php_http_params_object_new
;
1314 zend_class_implements(php_http_params_class_entry
, 1, zend_ce_arrayaccess
);
1316 zend_declare_class_constant_stringl(php_http_params_class_entry
, ZEND_STRL("DEF_PARAM_SEP"), ZEND_STRL(","));
1317 zend_declare_class_constant_stringl(php_http_params_class_entry
, ZEND_STRL("DEF_ARG_SEP"), ZEND_STRL(";"));
1318 zend_declare_class_constant_stringl(php_http_params_class_entry
, ZEND_STRL("DEF_VAL_SEP"), ZEND_STRL("="));
1319 zend_declare_class_constant_stringl(php_http_params_class_entry
, ZEND_STRL("COOKIE_PARAM_SEP"), ZEND_STRL(""));
1321 zend_declare_class_constant_long(php_http_params_class_entry
, ZEND_STRL("PARSE_RAW"), PHP_HTTP_PARAMS_RAW
);
1322 zend_declare_class_constant_long(php_http_params_class_entry
, ZEND_STRL("PARSE_ESCAPED"), PHP_HTTP_PARAMS_ESCAPED
);
1323 zend_declare_class_constant_long(php_http_params_class_entry
, ZEND_STRL("PARSE_URLENCODED"), PHP_HTTP_PARAMS_URLENCODED
);
1324 zend_declare_class_constant_long(php_http_params_class_entry
, ZEND_STRL("PARSE_DIMENSION"), PHP_HTTP_PARAMS_DIMENSION
);
1325 zend_declare_class_constant_long(php_http_params_class_entry
, ZEND_STRL("PARSE_RFC5987"), PHP_HTTP_PARAMS_RFC5987
);
1326 zend_declare_class_constant_long(php_http_params_class_entry
, ZEND_STRL("PARSE_RFC5988"), PHP_HTTP_PARAMS_RFC5988
);
1327 zend_declare_class_constant_long(php_http_params_class_entry
, ZEND_STRL("PARSE_DEFAULT"), PHP_HTTP_PARAMS_DEFAULT
);
1328 zend_declare_class_constant_long(php_http_params_class_entry
, ZEND_STRL("PARSE_QUERY"), PHP_HTTP_PARAMS_QUERY
);
1330 zend_declare_property_null(php_http_params_class_entry
, ZEND_STRL("params"), ZEND_ACC_PUBLIC
);
1331 zend_declare_property_stringl(php_http_params_class_entry
, ZEND_STRL("param_sep"), ZEND_STRL(","), ZEND_ACC_PUBLIC
);
1332 zend_declare_property_stringl(php_http_params_class_entry
, ZEND_STRL("arg_sep"), ZEND_STRL(";"), ZEND_ACC_PUBLIC
);
1333 zend_declare_property_stringl(php_http_params_class_entry
, ZEND_STRL("val_sep"), ZEND_STRL("="), ZEND_ACC_PUBLIC
);
1334 zend_declare_property_long(php_http_params_class_entry
, ZEND_STRL("flags"), PHP_HTTP_PARAMS_DEFAULT
, ZEND_ACC_PUBLIC
);
1344 * vim600: noet sw=4 ts=4 fdm=marker
1345 * vim<600: noet sw=4 ts=4