projects / m6w6 / ext-http / blob
? search:


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