Merge branch 'v2.6.x'
[m6w6/ext-http] / src / php_http_params.c
1 /*
2 +--------------------------------------------------------------------+
3 | PECL :: http |
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 +--------------------------------------------------------------------+
11 */
12
13 #include "php_http_api.h"
14
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 = {
19 {NULL, 0},
20 def_param_sep_ptr,
21 def_arg_sep_ptr,
22 def_val_sep_ptr,
23 {{0}},
24 PHP_HTTP_PARAMS_DEFAULT
25 };
26
27 php_http_params_opts_t *php_http_params_opts_default_get(php_http_params_opts_t *opts)
28 {
29 if (!opts) {
30 opts = emalloc(sizeof(*opts));
31 }
32
33 memcpy(opts, &def_opts, sizeof(def_opts));
34
35 return opts;
36 }
37
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;
43 struct {
44 zval *param;
45 zval *args;
46 zval *val;
47 } current;
48 unsigned quotes:1;
49 unsigned escape:1;
50 unsigned rfc5987:1;
51 } php_http_params_state_t;
52
53 static inline void sanitize_escaped(zval *zv)
54 {
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);
58
59 zval_dtor(zv);
60 ZVAL_STR(zv, php_http_cs2zs(deq, deq_len));
61 }
62
63 php_stripcslashes(Z_STR_P(zv));
64 }
65
66 static inline void quote_string(zend_string **zs, zend_bool force)
67 {
68 int len = (*zs)->len;
69
70 *zs = php_addcslashes(*zs, 1, ZEND_STRL("\0..\37\173\\\""));
71
72 if (force || len != (*zs)->len || strpbrk((*zs)->val, "()<>@,;:\"[]?={} ")) {
73 int len = (*zs)->len + 2;
74
75 *zs = zend_string_extend(*zs, len, 0);
76
77 memmove(&(*zs)->val[1], (*zs)->val, (*zs)->len);
78 (*zs)->val[0] = '"';
79 (*zs)->val[len-1] = '"';
80 (*zs)->val[len] = '\0';
81
82 zend_string_forget_hash_val(*zs);
83 }
84 }
85
86 /* if (Z_TYPE_P(zv) == IS_STRING) {
87 size_t len = Z_STRLEN_P(zv);
88 zend_string *stripped = php_addcslashes(Z_STR_P(zv), 0,
89 ZEND_STRL("\0..\37\173\\\""));
90
91 if (len != stripped->len || strpbrk(stripped->val, "()<>@,;:\"[]?={} ")) {
92 size_t len = stripped->len + 2;
93 char *str = emalloc(len + 1);
94
95 str[0] = '"';
96 memcpy(&str[1], stripped->val, stripped->len);
97 str[len-1] = '"';
98 str[len] = '\0';
99
100 zval_dtor(zv);
101 zend_string_release(stripped);
102 ZVAL_STR(zv, php_http_cs2zs(str, len));
103 } else {
104 zval_dtor(zv);
105 ZVAL_STR(zv, stripped);
106 }
107 */
108
109 static inline void prepare_escaped(zval *zv)
110 {
111 if (Z_TYPE_P(zv) == IS_STRING) {
112 quote_string(&Z_STR_P(zv), 0);
113 } else {
114 zval_dtor(zv);
115 ZVAL_EMPTY_STRING(zv);
116 }
117 }
118
119 static inline void sanitize_urlencoded(zval *zv)
120 {
121 Z_STRLEN_P(zv) = php_raw_url_decode(Z_STRVAL_P(zv), Z_STRLEN_P(zv));
122 }
123
124 static inline void prepare_urlencoded(zval *zv)
125 {
126 zend_string *str = php_raw_url_encode(Z_STRVAL_P(zv), Z_STRLEN_P(zv));
127
128 zval_dtor(zv);
129 ZVAL_STR(zv, str);
130 }
131
132 static void sanitize_dimension(zval *zv)
133 {
134 zval arr, tmp, *cur = NULL;
135 char *var = NULL, *ptr = Z_STRVAL_P(zv), *end = Z_STRVAL_P(zv) + Z_STRLEN_P(zv);
136 long level = 0;
137
138 array_init(&arr);
139 cur = &arr;
140
141 while (ptr < end) {
142 if (!var) {
143 var = ptr;
144 }
145
146 switch (*ptr) {
147 case '[':
148 if (++level > PG(max_input_nesting_level)) {
149 zval_ptr_dtor(&arr);
150 php_error_docref(NULL, E_WARNING, "Max input nesting level of %ld exceeded", (long) PG(max_input_nesting_level));
151 return;
152 }
153 if (ptr - var == 0) {
154 ++var;
155 break;
156 }
157 /* no break */
158
159 case ']':
160
161 ZVAL_NULL(&tmp);
162 convert_to_array(cur);
163
164 if (ptr - var) {
165 char chr = *ptr;
166 *ptr = '\0';
167 cur = zend_symtable_str_update(Z_ARRVAL_P(cur), var, ptr - var, &tmp);
168 *ptr = chr;
169 } else {
170 cur = zend_hash_next_index_insert(Z_ARRVAL_P(cur), &tmp);
171 }
172
173 var = NULL;
174 break;
175 }
176
177 ++ptr;
178 }
179
180 if (zend_hash_num_elements(Z_ARRVAL(arr))) {
181 zval_dtor(zv);
182 ZVAL_COPY_VALUE(zv, &arr);
183 } else {
184 zval_ptr_dtor(&arr);
185 }
186 }
187
188 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);
189 static inline void shift_val(php_http_buffer_t *buf, zval *zvalue, const char *vss, size_t vsl, unsigned flags);
190
191 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)
192 {
193 HashTable *ht = HASH_OF(zvalue);
194 php_http_arrkey_t key;
195 zval *val;
196 php_http_buffer_t prefix;
197
198 if (!ZEND_HASH_GET_APPLY_COUNT(ht)) {
199 ZEND_HASH_INC_APPLY_COUNT(ht);
200 php_http_buffer_init(&prefix);
201 php_http_buffer_append(&prefix, keybuf->data, keybuf->used);
202
203 ZEND_HASH_FOREACH_KEY_VAL_IND(ht, key.h, key.key, val)
204 {
205 if (key.key && !*key.key->val) {
206 /* only public properties */
207 continue;
208 }
209
210 php_http_buffer_appends(&prefix, "[");
211 if (key.key) {
212 php_http_buffer_append(&prefix, key.key->val, key.key->len);
213 } else {
214 php_http_buffer_appendf(&prefix, "%lu", key.h);
215 }
216 php_http_buffer_appends(&prefix, "]");
217
218 if (Z_TYPE_P(val) == IS_ARRAY || Z_TYPE_P(val) == IS_OBJECT) {
219 prepare_dimension(buf, &prefix, val, pss, psl, vss, vsl, flags);
220 } else {
221 zend_string *cpy = zval_get_string(val);
222 zval tmp;
223
224 ZVAL_STR(&tmp, cpy);
225 shift_key(buf, prefix.data, prefix.used, pss, psl, flags);
226 shift_val(buf, &tmp, vss, vsl, flags);
227 zend_string_release(cpy);
228 }
229
230 php_http_buffer_cut(&prefix, keybuf->used, prefix.used - keybuf->used);
231 }
232 ZEND_HASH_FOREACH_END();
233 ZEND_HASH_DEC_APPLY_COUNT(ht);
234
235 php_http_buffer_dtor(&prefix);
236 }
237 }
238
239 static inline void sanitize_key(unsigned flags, const char *str, size_t len, zval *zv, zend_bool *rfc5987)
240 {
241 char *eos;
242 zend_string *zs = zend_string_init(str, len, 0);
243
244 zval_dtor(zv);
245 ZVAL_STR(zv, php_trim(zs, NULL, 0, 3));
246 zend_string_release(zs);
247
248 if (flags & PHP_HTTP_PARAMS_ESCAPED) {
249 sanitize_escaped(zv);
250 }
251
252 if (!Z_STRLEN_P(zv)) {
253 return;
254 }
255
256 if (flags & PHP_HTTP_PARAMS_RFC5987) {
257 eos = &Z_STRVAL_P(zv)[Z_STRLEN_P(zv)-1];
258 if (*eos == '*') {
259 *eos = '\0';
260 *rfc5987 = 1;
261 Z_STRLEN_P(zv) -= 1;
262 }
263 }
264
265 if (flags & PHP_HTTP_PARAMS_URLENCODED) {
266 sanitize_urlencoded(zv);
267 }
268
269 if (flags & PHP_HTTP_PARAMS_DIMENSION) {
270 sanitize_dimension(zv);
271 }
272 }
273
274 static inline void sanitize_rfc5987(zval *zv, char **language, zend_bool *latin1)
275 {
276 char *ptr;
277
278 /* examples:
279 * iso-8850-1'de'bl%f6der%20schei%df%21
280 * utf-8'de-DE'bl%c3%b6der%20schei%c3%9f%21
281 */
282
283 switch (Z_STRVAL_P(zv)[0]) {
284 case 'I':
285 case 'i':
286 if (!strncasecmp(Z_STRVAL_P(zv), "iso-8859-1", lenof("iso-8859-1"))) {
287 *latin1 = 1;
288 ptr = Z_STRVAL_P(zv) + lenof("iso-8859-1");
289 break;
290 }
291 /* no break */
292 case 'U':
293 case 'u':
294 if (!strncasecmp(Z_STRVAL_P(zv), "utf-8", lenof("utf-8"))) {
295 *latin1 = 0;
296 ptr = Z_STRVAL_P(zv) + lenof("utf-8");
297 break;
298 }
299 /* no break */
300 default:
301 return;
302 }
303
304 /* extract language */
305 if (*ptr == '\'') {
306 for (*language = ++ptr; *ptr && *ptr != '\''; ++ptr);
307 if (!*ptr) {
308 *language = NULL;
309 return;
310 }
311 *language = estrndup(*language, ptr - *language);
312
313 /* remainder */
314 ptr = estrdup(++ptr);
315 zval_dtor(zv);
316 ZVAL_STR(zv, php_http_cs2zs(ptr, strlen(ptr)));
317 }
318 }
319
320 static inline void sanitize_rfc5988(char *str, size_t len, zval *zv)
321 {
322 zend_string *zs = zend_string_init(str, len, 0);
323
324 zval_dtor(zv);
325 ZVAL_STR(zv, php_trim(zs, " ><", 3, 3));
326 zend_string_release(zs);
327 }
328
329 static inline void prepare_rfc5988(zval *zv)
330 {
331 if (Z_TYPE_P(zv) != IS_STRING) {
332 zval_dtor(zv);
333 ZVAL_EMPTY_STRING(zv);
334 }
335 }
336
337 static void utf8encode(zval *zv)
338 {
339 size_t pos, len = 0;
340 unsigned char *ptr = (unsigned char *) Z_STRVAL_P(zv);
341
342 while (*ptr) {
343 if (*ptr++ >= 0x80) {
344 ++len;
345 }
346 ++len;
347 }
348
349 ptr = safe_emalloc(1, len, 1);
350 for (len = 0, pos = 0; len <= Z_STRLEN_P(zv); ++len, ++pos) {
351 ptr[pos] = Z_STRVAL_P(zv)[len];
352 if ((ptr[pos]) >= 0x80) {
353 ptr[pos + 1] = 0x80 | (ptr[pos] & 0x3f);
354 ptr[pos] = 0xc0 | ((ptr[pos] >> 6) & 0x1f);
355 ++pos;
356 }
357 }
358 zval_dtor(zv);
359 ZVAL_STR(zv, php_http_cs2zs((char *) ptr, pos-1));
360 }
361
362 static inline void sanitize_value(unsigned flags, const char *str, size_t len, zval *zv, zend_bool rfc5987)
363 {
364 char *language = NULL;
365 zend_bool latin1 = 0;
366 zend_string *zs = zend_string_init(str, len, 0);
367
368 zval_dtor(zv);
369 ZVAL_STR(zv, php_trim(zs, NULL, 0, 3));
370 zend_string_release(zs);
371
372 if (rfc5987) {
373 sanitize_rfc5987(zv, &language, &latin1);
374 }
375
376 if (flags & PHP_HTTP_PARAMS_ESCAPED) {
377 sanitize_escaped(zv);
378 }
379
380 if ((flags & PHP_HTTP_PARAMS_URLENCODED) || (rfc5987 && language)) {
381 sanitize_urlencoded(zv);
382 }
383
384 if (rfc5987 && language) {
385 zval tmp;
386
387 if (latin1) {
388 utf8encode(zv);
389 }
390
391 ZVAL_COPY_VALUE(&tmp, zv);
392 array_init(zv);
393 add_assoc_zval(zv, language, &tmp);
394 efree(language);
395 }
396 }
397
398 static inline void prepare_key(unsigned flags, char *old_key, size_t old_len, char **new_key, size_t *new_len)
399 {
400 zval zv;
401
402 ZVAL_STRINGL(&zv, old_key, old_len);
403
404 if (flags & PHP_HTTP_PARAMS_URLENCODED) {
405 prepare_urlencoded(&zv);
406 }
407
408 if (flags & PHP_HTTP_PARAMS_ESCAPED) {
409 if (flags & PHP_HTTP_PARAMS_RFC5988) {
410 prepare_rfc5988(&zv);
411 } else {
412 prepare_escaped(&zv);
413 }
414 }
415
416 *new_key = estrndup(Z_STRVAL(zv), Z_STRLEN(zv));
417 *new_len = Z_STRLEN(zv);
418 zval_ptr_dtor(&zv);
419 }
420
421 static inline void prepare_value(unsigned flags, zval *zv)
422 {
423 if (flags & PHP_HTTP_PARAMS_URLENCODED) {
424 prepare_urlencoded(zv);
425 }
426
427 if (flags & PHP_HTTP_PARAMS_ESCAPED) {
428 prepare_escaped(zv);
429 }
430 }
431
432 static void merge_param(HashTable *params, zval *zdata, zval **current_param, zval **current_args)
433 {
434 zval *ptr, *zdata_ptr;
435 php_http_arrkey_t hkey = {0};
436
437 #if 0
438 {
439 zval tmp;
440 INIT_PZVAL_ARRAY(&tmp, params);
441 fprintf(stderr, "params = ");
442 zend_print_zval_r(&tmp, 1);
443 fprintf(stderr, "\n");
444 }
445 #endif
446
447 zend_hash_get_current_key(Z_ARRVAL_P(zdata), &hkey.key, &hkey.h);
448
449 if ((hkey.key && !zend_hash_exists(params, hkey.key))
450 || (!hkey.key && !zend_hash_index_exists(params, hkey.h))
451 ) {
452 zval tmp, arg, *args;
453
454 /* create the entry if it doesn't exist */
455 ptr = zend_hash_get_current_data(Z_ARRVAL_P(zdata));
456 Z_TRY_ADDREF_P(ptr);
457 array_init(&tmp);
458 add_assoc_zval_ex(&tmp, ZEND_STRL("value"), ptr);
459
460 array_init(&arg);
461 args = zend_hash_str_update(Z_ARRVAL(tmp), "arguments", lenof("arguments"), &arg);
462 *current_args = args;
463
464 if (hkey.key) {
465 ptr = zend_hash_update(params, hkey.key, &tmp);
466 } else {
467 ptr = zend_hash_index_update(params, hkey.h, &tmp);
468 }
469 } else {
470 /* merge */
471 if (hkey.key) {
472 ptr = zend_hash_find(params, hkey.key);
473 } else {
474 ptr = zend_hash_index_find(params, hkey.h);
475 }
476
477 zdata_ptr = zdata;
478
479 if (Z_TYPE_P(ptr) == IS_ARRAY
480 && (ptr = zend_hash_str_find(Z_ARRVAL_P(ptr), "value", lenof("value")))
481 && (zdata_ptr = zend_hash_get_current_data(Z_ARRVAL_P(zdata_ptr)))
482 ) {
483 /*
484 * params = [arr => [value => [0 => 1]]]
485 * ^- ptr
486 * zdata = [arr => [0 => NULL]]
487 * ^- zdata_ptr
488 */
489 zval *test_ptr;
490
491 while (Z_TYPE_P(zdata_ptr) == IS_ARRAY && (test_ptr = zend_hash_get_current_data(Z_ARRVAL_P(zdata_ptr)))) {
492 if (Z_TYPE_P(test_ptr) == IS_ARRAY && Z_TYPE_P(ptr) == IS_ARRAY) {
493 zval *tmp_ptr = ptr;
494
495 /* now find key in ptr */
496 if (HASH_KEY_IS_STRING == zend_hash_get_current_key(Z_ARRVAL_P(zdata_ptr), &hkey.key, &hkey.h)) {
497 if ((ptr = zend_hash_find(Z_ARRVAL_P(ptr), hkey.key))) {
498 zdata_ptr = test_ptr;
499 } else {
500 ptr = tmp_ptr;
501 Z_TRY_ADDREF_P(test_ptr);
502 ptr = zend_hash_update(Z_ARRVAL_P(ptr), hkey.key, test_ptr);
503 break;
504 }
505 } else {
506 if ((ptr = zend_hash_index_find(Z_ARRVAL_P(ptr), hkey.h))) {
507 zdata_ptr = test_ptr;
508 } else if (hkey.h) {
509 ptr = tmp_ptr;
510 Z_TRY_ADDREF_P(test_ptr);
511 ptr = zend_hash_index_update(Z_ARRVAL_P(ptr), hkey.h, test_ptr);
512 break;
513 } else {
514 ptr = tmp_ptr;
515 Z_TRY_ADDREF_P(test_ptr);
516 ptr = zend_hash_next_index_insert(Z_ARRVAL_P(ptr), test_ptr);
517 break;
518 }
519 }
520 } else {
521 /* this is the leaf */
522 Z_TRY_ADDREF_P(test_ptr);
523 if (Z_TYPE_P(ptr) != IS_ARRAY) {
524 zval_dtor(ptr);
525 array_init(ptr);
526 }
527 if (HASH_KEY_IS_STRING == zend_hash_get_current_key(Z_ARRVAL_P(zdata_ptr), &hkey.key, &hkey.h)) {
528 ptr = zend_hash_update(Z_ARRVAL_P(ptr), hkey.key, test_ptr);
529 } else if (hkey.h) {
530 ptr = zend_hash_index_update(Z_ARRVAL_P(ptr), hkey.h, test_ptr);
531 } else {
532 ptr = zend_hash_next_index_insert(Z_ARRVAL_P(ptr), test_ptr);
533 }
534 break;
535 }
536 }
537
538 }
539 }
540
541 /* bubble up */
542 while (Z_TYPE_P(ptr) == IS_ARRAY) {
543 zval *tmp = zend_hash_get_current_data(Z_ARRVAL_P(ptr));
544
545 if (tmp) {
546 ptr = tmp;
547 } else {
548 break;
549 }
550 }
551 *current_param = ptr;
552 }
553
554 static void push_param(HashTable *params, php_http_params_state_t *state, const php_http_params_opts_t *opts)
555 {
556 if (state->val.str) {
557 if (!state->current.val) {
558 return;
559 } else if (0 < (state->val.len = state->input.str - state->val.str)) {
560 sanitize_value(opts->flags, state->val.str, state->val.len, state->current.val, state->rfc5987);
561 } else {
562 ZVAL_EMPTY_STRING(state->current.val);
563 }
564 state->rfc5987 = 0;
565 } else if (state->arg.str) {
566 if (0 < (state->arg.len = state->input.str - state->arg.str)) {
567 zval val, key;
568 zend_bool rfc5987 = 0;
569
570 ZVAL_NULL(&key);
571 sanitize_key(opts->flags, state->arg.str, state->arg.len, &key, &rfc5987);
572 state->rfc5987 = rfc5987;
573 if (Z_TYPE(key) == IS_STRING && Z_STRLEN(key)) {
574 ZVAL_TRUE(&val);
575
576 if (rfc5987) {
577 zval *rfc;
578
579 if ((rfc = zend_hash_str_find(Z_ARRVAL_P(state->current.args), ZEND_STRL("*rfc5987*")))) {
580 state->current.val = zend_symtable_str_update(Z_ARRVAL_P(rfc), Z_STRVAL(key), Z_STRLEN(key), &val);
581 } else {
582 zval tmp;
583
584 array_init_size(&tmp, 1);
585 state->current.val = zend_symtable_str_update(Z_ARRVAL(tmp), Z_STRVAL(key), Z_STRLEN(key), &val);
586 zend_symtable_str_update(Z_ARRVAL_P(state->current.args), ZEND_STRL("*rfc5987*"), &tmp);
587 }
588 } else {
589 state->current.val = zend_symtable_str_update(Z_ARRVAL_P(state->current.args), Z_STRVAL(key), Z_STRLEN(key), &val);
590 }
591 }
592 zval_dtor(&key);
593 }
594 } else if (state->param.str) {
595 if (0 < (state->param.len = state->input.str - state->param.str)) {
596 zval prm, arg, val, key;
597 zend_bool rfc5987 = 0;
598
599 ZVAL_NULL(&key);
600 if (opts->flags & PHP_HTTP_PARAMS_RFC5988) {
601 sanitize_rfc5988(state->param.str, state->param.len, &key);
602 } else {
603 sanitize_key(opts->flags, state->param.str, state->param.len, &key, &rfc5987);
604 state->rfc5987 = rfc5987;
605 }
606 if (Z_TYPE(key) == IS_ARRAY) {
607 merge_param(params, &key, &state->current.val, &state->current.args);
608 } else if (Z_TYPE(key) == IS_STRING && Z_STRLEN(key)) {
609 // FIXME: array_init_size(&prm, 2);
610 array_init(&prm);
611
612 if (!Z_ISUNDEF(opts->defval)) {
613 ZVAL_COPY_VALUE(&val, &opts->defval);
614 zval_copy_ctor(&val);
615 } else {
616 ZVAL_TRUE(&val);
617 }
618 if (rfc5987 && (opts->flags & PHP_HTTP_PARAMS_RFC5987)) {
619 state->current.val = zend_hash_str_update(Z_ARRVAL(prm), "*rfc5987*", lenof("*rfc5987*"), &val);
620 } else {
621 state->current.val = zend_hash_str_update(Z_ARRVAL(prm), "value", lenof("value"), &val);
622 }
623 // FIXME: array_init_size(&arg, 3);
624 array_init(&arg);
625 state->current.args = zend_hash_str_update(Z_ARRVAL(prm), "arguments", lenof("arguments"), &arg);
626 state->current.param = zend_symtable_str_update(params, Z_STRVAL(key), Z_STRLEN(key), &prm);
627 }
628 zval_ptr_dtor(&key);
629 }
630 }
631 }
632
633 static inline zend_bool check_str(const char *chk_str, size_t chk_len, const char *sep_str, size_t sep_len) {
634 return 0 < sep_len && chk_len >= sep_len && *chk_str == *sep_str && !memcmp(chk_str + 1, sep_str + 1, sep_len - 1);
635 }
636
637 static size_t check_sep(php_http_params_state_t *state, php_http_params_token_t **separators)
638 {
639 php_http_params_token_t **sep = separators;
640
641 if (state->quotes || state->escape) {
642 return 0;
643 }
644
645 if (sep) while (*sep) {
646 if (check_str(state->input.str, state->input.len, (*sep)->str, (*sep)->len)) {
647 return (*sep)->len;
648 }
649 ++sep;
650 }
651 return 0;
652 }
653
654 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)
655 {
656 size_t sep_len;
657
658 state->input.str += skip;
659 state->input.len -= skip;
660
661 while ( (param && (sep_len = check_sep(state, param)))
662 || (arg && (sep_len = check_sep(state, arg)))
663 || (val && (sep_len = check_sep(state, val)))
664 ) {
665 state->input.str += sep_len;
666 state->input.len -= sep_len;
667 }
668 }
669
670 HashTable *php_http_params_parse(HashTable *params, const php_http_params_opts_t *opts)
671 {
672 php_http_params_state_t state = {{NULL,0}, {NULL,0}, {NULL,0}, {NULL,0}, {NULL,NULL,NULL}, 0, 0};
673
674 state.input.str = opts->input.str;
675 state.input.len = opts->input.len;
676
677 if (!params) {
678 ALLOC_HASHTABLE(params);
679 ZEND_INIT_SYMTABLE(params);
680 }
681
682 while (state.input.len) {
683 if ((opts->flags & PHP_HTTP_PARAMS_RFC5988) && !state.arg.str) {
684 if (*state.input.str == '<') {
685 state.quotes = 1;
686 } else if (*state.input.str == '>') {
687 state.quotes = 0;
688 }
689 } else if (*state.input.str == '"' && !state.escape) {
690 state.quotes = !state.quotes;
691 } else {
692 state.escape = (*state.input.str == '\\');
693 }
694
695 if (!state.param.str) {
696 /* initialize */
697 skip_sep(0, &state, opts->param, opts->arg, opts->val);
698 state.param.str = state.input.str;
699 } else {
700 size_t sep_len;
701 /* are we at a param separator? */
702 if (0 < (sep_len = check_sep(&state, opts->param))) {
703 push_param(params, &state, opts);
704
705 skip_sep(sep_len, &state, opts->param, opts->arg, opts->val);
706
707 /* start off with a new param */
708 state.param.str = state.input.str;
709 state.param.len = 0;
710 state.arg.str = NULL;
711 state.arg.len = 0;
712 state.val.str = NULL;
713 state.val.len = 0;
714
715 continue;
716
717 } else
718 /* are we at an arg separator? */
719 if (0 < (sep_len = check_sep(&state, opts->arg))) {
720 push_param(params, &state, opts);
721
722 skip_sep(sep_len, &state, NULL, opts->arg, opts->val);
723
724 /* continue with a new arg */
725 state.arg.str = state.input.str;
726 state.arg.len = 0;
727 state.val.str = NULL;
728 state.val.len = 0;
729
730 continue;
731
732 } else
733 /* are we at a val separator? */
734 if (0 < (sep_len = check_sep(&state, opts->val))) {
735 /* only handle separator if we're not already reading in a val */
736 if (!state.val.str) {
737 push_param(params, &state, opts);
738
739 skip_sep(sep_len, &state, NULL, NULL, opts->val);
740
741 state.val.str = state.input.str;
742 state.val.len = 0;
743
744 continue;
745 }
746 }
747 }
748
749 if (state.input.len) {
750 ++state.input.str;
751 --state.input.len;
752 }
753 }
754 /* finalize */
755 push_param(params, &state, opts);
756
757 return params;
758 }
759
760 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)
761 {
762 char *str;
763 size_t len;
764
765 if (buf->used) {
766 php_http_buffer_append(buf, ass, asl);
767 }
768
769 prepare_key(flags, key_str, key_len, &str, &len);
770 php_http_buffer_append(buf, str, len);
771 efree(str);
772 }
773
774 static inline void shift_rfc5987(php_http_buffer_t *buf, zval *zvalue, const char *vss, size_t vsl, unsigned flags)
775 {
776 HashTable *ht = HASH_OF(zvalue);
777 zval *zdata, tmp;
778 zend_string *zs;
779 php_http_arrkey_t key = {0};
780
781 if ((zdata = zend_hash_get_current_data(ht))
782 && HASH_KEY_NON_EXISTENT != zend_hash_get_current_key(ht, &key.key, &key.h)
783 ) {
784 php_http_arrkey_stringify(&key, NULL);
785 php_http_buffer_appendf(buf, "*%.*sutf-8'%.*s'",
786 (int) (vsl > INT_MAX ? INT_MAX : vsl), vss,
787 (int) (key.key->len > INT_MAX ? INT_MAX : key.key->len), key.key->val);
788 php_http_arrkey_dtor(&key);
789
790 if (Z_TYPE_P(zdata) == IS_INDIRECT) {
791 zdata = Z_INDIRECT_P(zdata);
792 }
793 zs = zval_get_string(zdata);
794 ZVAL_STR(&tmp, zs);
795 prepare_value(flags | PHP_HTTP_PARAMS_URLENCODED, &tmp);
796 php_http_buffer_append(buf, Z_STRVAL(tmp), Z_STRLEN(tmp));
797 zval_ptr_dtor(&tmp);
798 }
799 }
800
801 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)
802 {
803 char *str;
804 size_t len;
805
806 if (buf->used) {
807 php_http_buffer_append(buf, ass, asl);
808 }
809
810 prepare_key(flags, key_str, key_len, &str, &len);
811 php_http_buffer_appends(buf, "<");
812 php_http_buffer_append(buf, str, len);
813 php_http_buffer_appends(buf, ">");
814 efree(str);
815 }
816
817 static inline void shift_rfc5988_val(php_http_buffer_t *buf, zval *zv, const char *vss, size_t vsl, unsigned flags)
818 {
819 zend_string *zs = zval_get_string(zv);
820
821 quote_string(&zs, 1);
822 php_http_buffer_append(buf, vss, vsl);
823 php_http_buffer_append(buf, zs->val, zs->len);
824
825 zend_string_release(zs);
826 }
827
828 static inline void shift_val(php_http_buffer_t *buf, zval *zvalue, const char *vss, size_t vsl, unsigned flags)
829 {
830 zval tmp;
831 zend_string *zs;
832
833 switch (Z_TYPE_P(zvalue)) {
834 case IS_TRUE:
835 break;
836
837 case IS_FALSE:
838 php_http_buffer_append(buf, vss, vsl);
839 php_http_buffer_appends(buf, "0");
840 break;
841
842 default:
843 zs = zval_get_string(zvalue);
844
845 ZVAL_STR(&tmp, zs);
846 prepare_value(flags, &tmp);
847 php_http_buffer_append(buf, vss, vsl);
848 php_http_buffer_append(buf, Z_STRVAL(tmp), Z_STRLEN(tmp));
849
850 zval_ptr_dtor(&tmp);
851 break;
852 }
853 }
854
855 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)
856 {
857 if (Z_TYPE_P(zvalue) == IS_ARRAY || Z_TYPE_P(zvalue) == IS_OBJECT) {
858 php_http_arrkey_t key;
859 HashTable *ht = HASH_OF(zvalue);
860 zval *val;
861 zend_bool rfc5987 = !strcmp(key_str, "*rfc5987*");
862
863 if (!rfc5987) {
864 shift_key(buf, key_str, key_len, ass, asl, flags);
865 }
866 ZEND_HASH_FOREACH_KEY_VAL_IND(ht, key.h, key.key, val)
867 {
868 /* did you mean recursion? */
869 php_http_arrkey_stringify(&key, NULL);
870 if (rfc5987 && (Z_TYPE_P(val) == IS_ARRAY || Z_TYPE_P(val) == IS_OBJECT)) {
871 shift_key(buf, key.key->val, key.key->len, ass, asl, flags);
872 shift_rfc5987(buf, val, vss, vsl, flags);
873 } else {
874 shift_arg(buf, key.key->val, key.key->len, val, ass, asl, vss, vsl, flags);
875 }
876 php_http_arrkey_dtor(&key);
877 }
878 ZEND_HASH_FOREACH_END();
879 } else {
880 shift_key(buf, key_str, key_len, ass, asl, flags);
881
882 if (flags & PHP_HTTP_PARAMS_RFC5988) {
883 switch (key_len) {
884 case lenof("rel"):
885 case lenof("title"):
886 case lenof("anchor"):
887 /* some args must be quoted */
888 if (0 <= php_http_select_str(key_str, 3, "rel", "title", "anchor")) {
889 shift_rfc5988_val(buf, zvalue, vss, vsl, flags);
890 return;
891 }
892 break;
893 }
894 }
895
896 shift_val(buf, zvalue, vss, vsl, flags);
897 }
898 }
899
900 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)
901 {
902 if (Z_TYPE_P(zvalue) == IS_ARRAY || Z_TYPE_P(zvalue) == IS_OBJECT) {
903 /* treat as arguments, unless we care for dimensions or rfc5987 */
904 if (flags & PHP_HTTP_PARAMS_DIMENSION) {
905 php_http_buffer_t *keybuf = php_http_buffer_from_string(key_str, key_len);
906 prepare_dimension(buf, keybuf, zvalue, pss, psl, vss, vsl, flags);
907 php_http_buffer_free(&keybuf);
908 } else if (rfc5987) {
909 shift_key(buf, key_str, key_len, pss, psl, flags);
910 shift_rfc5987(buf, zvalue, vss, vsl, flags);
911 } else {
912 shift_arg(buf, key_str, key_len, zvalue, ass, asl, vss, vsl, flags);
913 }
914 } else {
915 if (flags & PHP_HTTP_PARAMS_RFC5988) {
916 shift_rfc5988(buf, key_str, key_len, pss, psl, flags);
917 } else {
918 shift_key(buf, key_str, key_len, pss, psl, flags);
919 }
920 shift_val(buf, zvalue, vss, vsl, flags);
921 }
922 }
923
924 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)
925 {
926 zval *zparam;
927 php_http_arrkey_t key;
928 zend_bool rfc5987 = 0;
929
930 if (!buf) {
931 buf = php_http_buffer_init(NULL);
932 }
933
934 ZEND_HASH_FOREACH_KEY_VAL(params, key.h, key.key, zparam)
935 {
936 zval *zvalue, *zargs;
937
938 if (Z_TYPE_P(zparam) != IS_ARRAY) {
939 zvalue = zparam;
940 } else {
941 if (!(zvalue = zend_hash_str_find(Z_ARRVAL_P(zparam), ZEND_STRL("value")))) {
942 if (!(zvalue = zend_hash_str_find(Z_ARRVAL_P(zparam), ZEND_STRL("*rfc5987*")))) {
943 zvalue = zparam;
944 } else {
945 rfc5987 = 1;
946 }
947 }
948 }
949
950 php_http_arrkey_stringify(&key, NULL);
951 shift_param(buf, key.key->val, key.key->len, zvalue, pss, psl, ass, asl, vss, vsl, flags, rfc5987);
952 php_http_arrkey_dtor(&key);
953
954 if (Z_TYPE_P(zparam) == IS_ARRAY) {
955 zval *tmp = zend_hash_str_find(Z_ARRVAL_P(zparam), ZEND_STRL("arguments"));
956
957 if (tmp) {
958 zvalue = tmp;
959 } else if (zvalue == zparam) {
960 continue;
961 } else {
962 zvalue = zparam;
963 }
964 }
965
966 if (Z_TYPE_P(zvalue) == IS_ARRAY) {
967 ZEND_HASH_FOREACH_KEY_VAL(Z_ARRVAL_P(zvalue), key.h, key.key, zargs)
968 {
969 if (zvalue == zparam && key.key && zend_string_equals_literal(key.key, "value")) {
970 continue;
971 }
972
973 php_http_arrkey_stringify(&key, NULL);
974 shift_arg(buf, key.key->val, key.key->len, zargs, ass, asl, vss, vsl, flags);
975 php_http_arrkey_dtor(&key);
976 }
977 ZEND_HASH_FOREACH_END();
978 }
979 }
980 ZEND_HASH_FOREACH_END();
981
982 php_http_buffer_shrink(buf);
983 php_http_buffer_fix(buf);
984
985 return buf;
986 }
987
988 php_http_params_token_t **php_http_params_separator_init(zval *zv)
989 {
990 zval *sep, ztmp;
991 php_http_params_token_t **ret, **tmp;
992
993 if (!zv) {
994 return NULL;
995 }
996
997 ZVAL_DUP(&ztmp, zv);
998 zv = &ztmp;
999 convert_to_array(zv);
1000
1001 ret = ecalloc(zend_hash_num_elements(Z_ARRVAL_P(zv)) + 1, sizeof(*ret));
1002
1003 tmp = ret;
1004 ZEND_HASH_FOREACH_VAL(Z_ARRVAL_P(zv), sep)
1005 {
1006 zend_string *zs = zval_get_string(sep);
1007
1008 if (zs->len) {
1009 *tmp = emalloc(sizeof(**tmp));
1010 (*tmp)->str = estrndup(zs->val, (*tmp)->len = zs->len);
1011 ++tmp;
1012 }
1013 zend_string_release(zs);
1014 }
1015 ZEND_HASH_FOREACH_END();
1016
1017 zval_ptr_dtor(&ztmp);
1018
1019 *tmp = NULL;
1020 return ret;
1021 }
1022
1023 void php_http_params_separator_free(php_http_params_token_t **separator)
1024 {
1025 php_http_params_token_t **sep = separator;
1026 if (sep) {
1027 while (*sep) {
1028 PTR_FREE((*sep)->str);
1029 efree(*sep);
1030 ++sep;
1031 }
1032 efree(separator);
1033 }
1034 }
1035
1036 static zend_class_entry *php_http_params_class_entry;
1037 zend_class_entry *php_http_params_get_class_entry(void)
1038 {
1039 return php_http_params_class_entry;
1040 }
1041
1042 ZEND_BEGIN_ARG_INFO_EX(ai_HttpParams___construct, 0, 0, 0)
1043 ZEND_ARG_INFO(0, params)
1044 ZEND_ARG_INFO(0, param_sep)
1045 ZEND_ARG_INFO(0, arg_sep)
1046 ZEND_ARG_INFO(0, val_sep)
1047 ZEND_ARG_INFO(0, flags)
1048 ZEND_END_ARG_INFO();
1049 PHP_METHOD(HttpParams, __construct)
1050 {
1051 zval *zparams = NULL, *param_sep = NULL, *arg_sep = NULL, *val_sep = NULL;
1052 zend_long flags = PHP_HTTP_PARAMS_DEFAULT;
1053 zend_error_handling zeh;
1054 zend_string *zs;
1055
1056 php_http_expect(SUCCESS == zend_parse_parameters(ZEND_NUM_ARGS(), "|z!/z/z/z/l", &zparams, &param_sep, &arg_sep, &val_sep, &flags), invalid_arg, return);
1057
1058 zend_replace_error_handling(EH_THROW, php_http_get_exception_runtime_class_entry(), &zeh);
1059 {
1060 switch (ZEND_NUM_ARGS()) {
1061 case 5:
1062 zend_update_property_long(php_http_params_class_entry, getThis(), ZEND_STRL("flags"), flags);
1063 /* no break */
1064 case 4:
1065 zend_update_property(php_http_params_class_entry, getThis(), ZEND_STRL("val_sep"), val_sep);
1066 /* no break */
1067 case 3:
1068 zend_update_property(php_http_params_class_entry, getThis(), ZEND_STRL("arg_sep"), arg_sep);
1069 /* no break */
1070 case 2:
1071 zend_update_property(php_http_params_class_entry, getThis(), ZEND_STRL("param_sep"), param_sep);
1072 /* no break */
1073 }
1074
1075 if (zparams) {
1076 switch (Z_TYPE_P(zparams)) {
1077 case IS_OBJECT:
1078 case IS_ARRAY:
1079 convert_to_array(zparams);
1080 zend_update_property(php_http_params_class_entry, getThis(), ZEND_STRL("params"), zparams);
1081 break;
1082 default:
1083 zs = zval_get_string(zparams);
1084 if (zs->len) {
1085 zval tmp;
1086
1087 php_http_params_opts_t opts = {
1088 {zs->val, zs->len},
1089 php_http_params_separator_init(zend_read_property(php_http_params_class_entry, getThis(), ZEND_STRL("param_sep"), 0, &tmp)),
1090 php_http_params_separator_init(zend_read_property(php_http_params_class_entry, getThis(), ZEND_STRL("arg_sep"), 0, &tmp)),
1091 php_http_params_separator_init(zend_read_property(php_http_params_class_entry, getThis(), ZEND_STRL("val_sep"), 0, &tmp)),
1092 {{0}}, flags
1093 };
1094
1095 array_init(&tmp);
1096 php_http_params_parse(Z_ARRVAL(tmp), &opts);
1097 zend_update_property(php_http_params_class_entry, getThis(), ZEND_STRL("params"), &tmp);
1098 zval_ptr_dtor(&tmp);
1099
1100 php_http_params_separator_free(opts.param);
1101 php_http_params_separator_free(opts.arg);
1102 php_http_params_separator_free(opts.val);
1103 }
1104 zend_string_release(zs);
1105 break;
1106 }
1107 } else {
1108 zval tmp;
1109
1110 array_init(&tmp);
1111 zend_update_property(php_http_params_class_entry, getThis(), ZEND_STRL("params"), &tmp);
1112 zval_ptr_dtor(&tmp);
1113 }
1114 }
1115 zend_restore_error_handling(&zeh);
1116 }
1117
1118 ZEND_BEGIN_ARG_INFO_EX(ai_HttpParams_toArray, 0, 0, 0)
1119 ZEND_END_ARG_INFO();
1120 PHP_METHOD(HttpParams, toArray)
1121 {
1122 zval zparams_tmp, *zparams;
1123
1124 if (SUCCESS != zend_parse_parameters_none()) {
1125 return;
1126 }
1127 zparams = zend_read_property(php_http_params_class_entry, getThis(), ZEND_STRL("params"), 0, &zparams_tmp);
1128 RETURN_ZVAL(zparams, 1, 0);
1129 }
1130
1131 ZEND_BEGIN_ARG_INFO_EX(ai_HttpParams_toString, 0, 0, 0)
1132 ZEND_END_ARG_INFO();
1133 PHP_METHOD(HttpParams, toString)
1134 {
1135 zval *tmp, *zparams, *zpsep, *zasep, *zvsep;
1136 zval zparams_tmp, flags_tmp, psep_tmp, asep_tmp, vsep_tmp;
1137 zend_string *psep, *asep, *vsep;
1138 long flags;
1139 php_http_buffer_t buf;
1140
1141 zparams = zend_read_property(php_http_params_class_entry, getThis(), ZEND_STRL("params"), 0, &zparams_tmp);
1142 convert_to_array_ex(zparams);
1143 flags = zval_get_long(zend_read_property(php_http_params_class_entry, getThis(), ZEND_STRL("flags"), 0, &flags_tmp));
1144
1145 zpsep = zend_read_property(php_http_params_class_entry, getThis(), ZEND_STRL("param_sep"), 0, &psep_tmp);
1146 if (Z_TYPE_P(zpsep) == IS_ARRAY && (tmp = zend_hash_get_current_data(Z_ARRVAL_P(zpsep)))) {
1147 psep = zval_get_string(tmp);
1148 } else {
1149 psep = zval_get_string(zpsep);
1150 }
1151 zasep = zend_read_property(php_http_params_class_entry, getThis(), ZEND_STRL("arg_sep"), 0, &asep_tmp);
1152 if (Z_TYPE_P(zasep) == IS_ARRAY && (tmp = zend_hash_get_current_data(Z_ARRVAL_P(zasep)))) {
1153 asep = zval_get_string(tmp);
1154 } else {
1155 asep = zval_get_string(zasep);
1156 }
1157 zvsep = zend_read_property(php_http_params_class_entry, getThis(), ZEND_STRL("val_sep"), 0, &vsep_tmp);
1158 if (Z_TYPE_P(zvsep) == IS_ARRAY && (tmp = zend_hash_get_current_data(Z_ARRVAL_P(zvsep)))) {
1159 vsep = zval_get_string(tmp);
1160 } else {
1161 vsep = zval_get_string(zvsep);
1162 }
1163
1164 php_http_buffer_init(&buf);
1165 php_http_params_to_string(&buf, Z_ARRVAL_P(zparams), psep->val, psep->len, asep->val, asep->len, vsep->val, vsep->len, flags);
1166
1167 zend_string_release(psep);
1168 zend_string_release(asep);
1169 zend_string_release(vsep);
1170
1171 RETVAL_STR(php_http_cs2zs(buf.data, buf.used));
1172 }
1173
1174 ZEND_BEGIN_ARG_INFO_EX(ai_HttpParams_offsetExists, 0, 0, 1)
1175 ZEND_ARG_INFO(0, name)
1176 ZEND_END_ARG_INFO();
1177 PHP_METHOD(HttpParams, offsetExists)
1178 {
1179 zend_string *name;
1180 zval zparams_tmp, *zparam, *zparams;
1181
1182 if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS(), "S", &name)) {
1183 return;
1184 }
1185
1186 zparams = zend_read_property(php_http_params_class_entry, getThis(), ZEND_STRL("params"), 0, &zparams_tmp);
1187
1188 if (Z_TYPE_P(zparams) == IS_ARRAY && (zparam = zend_symtable_find(Z_ARRVAL_P(zparams), name))) {
1189 RETVAL_BOOL(Z_TYPE_P(zparam) != IS_NULL);
1190 } else {
1191 RETVAL_FALSE;
1192 }
1193 }
1194
1195 ZEND_BEGIN_ARG_INFO_EX(ai_HttpParams_offsetGet, 0, 0, 1)
1196 ZEND_ARG_INFO(0, name)
1197 ZEND_END_ARG_INFO();
1198 PHP_METHOD(HttpParams, offsetGet)
1199 {
1200 zend_string *name;
1201 zval zparams_tmp, *zparam, *zparams;
1202
1203 if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS(), "S", &name)) {
1204 return;
1205 }
1206
1207 zparams = zend_read_property(php_http_params_class_entry, getThis(), ZEND_STRL("params"), 0, &zparams_tmp);
1208
1209 if (Z_TYPE_P(zparams) == IS_ARRAY && (zparam = zend_symtable_find(Z_ARRVAL_P(zparams), name))) {
1210 RETVAL_ZVAL(zparam, 1, 0);
1211 }
1212 }
1213
1214 ZEND_BEGIN_ARG_INFO_EX(ai_HttpParams_offsetUnset, 0, 0, 1)
1215 ZEND_ARG_INFO(0, name)
1216 ZEND_END_ARG_INFO();
1217 PHP_METHOD(HttpParams, offsetUnset)
1218 {
1219 zend_string *name;
1220 zval zparams_tmp, *zparams;
1221
1222 if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS(), "S", &name)) {
1223 return;
1224 }
1225
1226 zparams = zend_read_property(php_http_params_class_entry, getThis(), ZEND_STRL("params"), 0, &zparams_tmp);
1227
1228 if (Z_TYPE_P(zparams) == IS_ARRAY) {
1229 zend_symtable_del(Z_ARRVAL_P(zparams), name);
1230 }
1231 }
1232
1233 ZEND_BEGIN_ARG_INFO_EX(ai_HttpParams_offsetSet, 0, 0, 2)
1234 ZEND_ARG_INFO(0, name)
1235 ZEND_ARG_INFO(0, value)
1236 ZEND_END_ARG_INFO();
1237 PHP_METHOD(HttpParams, offsetSet)
1238 {
1239 zend_string *name;
1240 zval zparams_tmp, *zparam, *zparams, *nvalue;
1241
1242 if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS(), "Sz", &name, &nvalue)) {
1243 return;
1244 }
1245
1246 zparams = zend_read_property(php_http_params_class_entry, getThis(), ZEND_STRL("params"), 0, &zparams_tmp);
1247 convert_to_array(zparams);
1248
1249 if (name->len) {
1250 if (Z_TYPE_P(nvalue) == IS_ARRAY) {
1251 if ((zparam = zend_symtable_find(Z_ARRVAL_P(zparams), name))) {
1252 convert_to_array(zparam);
1253 array_join(Z_ARRVAL_P(nvalue), Z_ARRVAL_P(zparam), 0, 0);
1254 } else {
1255 Z_TRY_ADDREF_P(nvalue);
1256 add_assoc_zval_ex(zparams, name->val, name->len, nvalue);
1257 }
1258 } else {
1259 zval tmp;
1260
1261 if ((zparam = zend_symtable_find(Z_ARRVAL_P(zparams), name))) {
1262 ZVAL_DUP(&tmp, zparam);
1263 convert_to_array(&tmp);
1264 } else {
1265 array_init(&tmp);
1266 }
1267
1268 Z_TRY_ADDREF_P(nvalue);
1269 add_assoc_zval_ex(&tmp, ZEND_STRL("value"), nvalue);
1270 add_assoc_zval_ex(zparams, name->val, name->len, &tmp);
1271 }
1272 } else {
1273 zval arr;
1274 zend_string *zs = zval_get_string(nvalue);
1275
1276 array_init(&arr);
1277 add_assoc_bool_ex(&arr, ZEND_STRL("value"), 1);
1278 add_assoc_zval_ex(zparams, zs->val, zs->len, &arr);
1279 zend_string_release(zs);
1280 }
1281 }
1282
1283 static zend_function_entry php_http_params_methods[] = {
1284 PHP_ME(HttpParams, __construct, ai_HttpParams___construct, ZEND_ACC_PUBLIC|ZEND_ACC_CTOR|ZEND_ACC_FINAL)
1285
1286 PHP_ME(HttpParams, toArray, ai_HttpParams_toArray, ZEND_ACC_PUBLIC)
1287 PHP_ME(HttpParams, toString, ai_HttpParams_toString, ZEND_ACC_PUBLIC)
1288 ZEND_MALIAS(HttpParams, __toString, toString, ai_HttpParams_toString, ZEND_ACC_PUBLIC)
1289
1290 PHP_ME(HttpParams, offsetExists, ai_HttpParams_offsetExists, ZEND_ACC_PUBLIC)
1291 PHP_ME(HttpParams, offsetUnset, ai_HttpParams_offsetUnset, ZEND_ACC_PUBLIC)
1292 PHP_ME(HttpParams, offsetSet, ai_HttpParams_offsetSet, ZEND_ACC_PUBLIC)
1293 PHP_ME(HttpParams, offsetGet, ai_HttpParams_offsetGet, ZEND_ACC_PUBLIC)
1294
1295 EMPTY_FUNCTION_ENTRY
1296 };
1297
1298 PHP_MINIT_FUNCTION(http_params)
1299 {
1300 zend_class_entry ce = {0};
1301
1302 INIT_NS_CLASS_ENTRY(ce, "http", "Params", php_http_params_methods);
1303 php_http_params_class_entry = zend_register_internal_class(&ce);
1304 php_http_params_class_entry->create_object = php_http_params_object_new;
1305 zend_class_implements(php_http_params_class_entry, 1, zend_ce_arrayaccess);
1306
1307 zend_declare_class_constant_stringl(php_http_params_class_entry, ZEND_STRL("DEF_PARAM_SEP"), ZEND_STRL(","));
1308 zend_declare_class_constant_stringl(php_http_params_class_entry, ZEND_STRL("DEF_ARG_SEP"), ZEND_STRL(";"));
1309 zend_declare_class_constant_stringl(php_http_params_class_entry, ZEND_STRL("DEF_VAL_SEP"), ZEND_STRL("="));
1310 zend_declare_class_constant_stringl(php_http_params_class_entry, ZEND_STRL("COOKIE_PARAM_SEP"), ZEND_STRL(""));
1311
1312 zend_declare_class_constant_long(php_http_params_class_entry, ZEND_STRL("PARSE_RAW"), PHP_HTTP_PARAMS_RAW);
1313 zend_declare_class_constant_long(php_http_params_class_entry, ZEND_STRL("PARSE_ESCAPED"), PHP_HTTP_PARAMS_ESCAPED);
1314 zend_declare_class_constant_long(php_http_params_class_entry, ZEND_STRL("PARSE_URLENCODED"), PHP_HTTP_PARAMS_URLENCODED);
1315 zend_declare_class_constant_long(php_http_params_class_entry, ZEND_STRL("PARSE_DIMENSION"), PHP_HTTP_PARAMS_DIMENSION);
1316 zend_declare_class_constant_long(php_http_params_class_entry, ZEND_STRL("PARSE_RFC5987"), PHP_HTTP_PARAMS_RFC5987);
1317 zend_declare_class_constant_long(php_http_params_class_entry, ZEND_STRL("PARSE_RFC5988"), PHP_HTTP_PARAMS_RFC5988);
1318 zend_declare_class_constant_long(php_http_params_class_entry, ZEND_STRL("PARSE_DEFAULT"), PHP_HTTP_PARAMS_DEFAULT);
1319 zend_declare_class_constant_long(php_http_params_class_entry, ZEND_STRL("PARSE_QUERY"), PHP_HTTP_PARAMS_QUERY);
1320
1321 zend_declare_property_null(php_http_params_class_entry, ZEND_STRL("params"), ZEND_ACC_PUBLIC);
1322 zend_declare_property_stringl(php_http_params_class_entry, ZEND_STRL("param_sep"), ZEND_STRL(","), ZEND_ACC_PUBLIC);
1323 zend_declare_property_stringl(php_http_params_class_entry, ZEND_STRL("arg_sep"), ZEND_STRL(";"), ZEND_ACC_PUBLIC);
1324 zend_declare_property_stringl(php_http_params_class_entry, ZEND_STRL("val_sep"), ZEND_STRL("="), ZEND_ACC_PUBLIC);
1325 zend_declare_property_long(php_http_params_class_entry, ZEND_STRL("flags"), PHP_HTTP_PARAMS_DEFAULT, ZEND_ACC_PUBLIC);
1326
1327 return SUCCESS;
1328 }
1329
1330 /*
1331 * Local variables:
1332 * tab-width: 4
1333 * c-basic-offset: 4
1334 * End:
1335 * vim600: noet sw=4 ts=4 fdm=marker
1336 * vim<600: noet sw=4 ts=4
1337 */
1338