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


b767bbbb7e83d974b716ff19ed435068536c9150
[m6w6/ext-http] / php_http_cookie.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-2011, Michael Wallner <mike@php.net> |
10 +--------------------------------------------------------------------+
11 */
12
13 #include "php_http_api.h"
14
15 PHP_HTTP_API php_http_cookie_list_t *php_http_cookie_list_init(php_http_cookie_list_t *list TSRMLS_DC)
16 {
17 if (!list) {
18 list = emalloc(sizeof(*list));
19 }
20
21 zend_hash_init(&list->cookies, 0, NULL, ZVAL_PTR_DTOR, 0);
22 zend_hash_init(&list->extras, 0, NULL, ZVAL_PTR_DTOR, 0);
23
24 list->path = NULL;
25 list->domain = NULL;
26 list->expires = -1;
27 list->flags = 0;
28
29 TSRMLS_SET_CTX(list->ts);
30
31 return list;
32 }
33
34 PHP_HTTP_API php_http_cookie_list_t *php_http_cookie_list_copy(php_http_cookie_list_t *from, php_http_cookie_list_t *to)
35 {
36 TSRMLS_FETCH_FROM_CTX(from->ts);
37
38 to = php_http_cookie_list_init(to TSRMLS_CC);
39
40 array_copy(&from->cookies, &to->cookies);
41 array_copy(&from->extras, &to->extras);
42
43 STR_SET(to->path, from->path ? estrdup(from->path) : NULL);
44 STR_SET(to->domain, from->domain ? estrdup(from->domain) : NULL);
45 to->expires = from->expires;
46 to->flags = from->flags;
47
48 return to;
49 }
50
51 PHP_HTTP_API void php_http_cookie_list_dtor(php_http_cookie_list_t *list)
52 {
53 if (list) {
54 zend_hash_destroy(&list->cookies);
55 zend_hash_destroy(&list->extras);
56
57 STR_SET(list->path, NULL);
58 STR_SET(list->domain, NULL);
59 }
60 }
61
62
63
64 PHP_HTTP_API void php_http_cookie_list_free(php_http_cookie_list_t **list)
65 {
66 if (*list) {
67 php_http_cookie_list_dtor(*list);
68 efree(*list);
69 *list = NULL;
70 }
71 }
72
73
74
75 PHP_HTTP_API const char *php_http_cookie_list_get_cookie(php_http_cookie_list_t *list, const char *name, size_t name_len)
76 {
77 zval **cookie = NULL;
78 if ((SUCCESS != zend_symtable_find(&list->cookies, name, name_len + 1, (void *) &cookie)) || (Z_TYPE_PP(cookie) != IS_STRING)) {
79 return NULL;
80 }
81 return Z_STRVAL_PP(cookie);
82 }
83
84
85
86 PHP_HTTP_API const char *php_http_cookie_list_get_extra(php_http_cookie_list_t *list, const char *name, size_t name_len)
87 {
88 zval **extra = NULL;
89 if ((SUCCESS != zend_symtable_find(&list->extras, name, name_len + 1, (void *) &extra)) || (Z_TYPE_PP(extra) != IS_STRING)) {
90 return NULL;
91 }
92 return Z_STRVAL_PP(extra);
93 }
94
95
96
97 PHP_HTTP_API void php_http_cookie_list_add_cookie(php_http_cookie_list_t *list, const char *name, size_t name_len, const char *value, size_t value_len)
98 {
99 zval *cookie_value;
100
101 MAKE_STD_ZVAL(cookie_value);
102 ZVAL_STRINGL(cookie_value, estrndup(value, value_len), value_len, 0);
103 zend_symtable_update(&list->cookies, name, name_len + 1, (void *) &cookie_value, sizeof(zval *), NULL);
104 }
105
106
107
108 PHP_HTTP_API void php_http_cookie_list_add_extra(php_http_cookie_list_t *list, const char *name, size_t name_len, const char *value, size_t value_len)
109 {
110 zval *cookie_value;
111
112 MAKE_STD_ZVAL(cookie_value);
113 ZVAL_STRINGL(cookie_value, estrndup(value, value_len), value_len, 0);
114 zend_symtable_update(&list->extras, name, name_len + 1, (void *) &cookie_value, sizeof(zval *), NULL);
115 }
116
117 #define _KEY_IS(s) (key->len == sizeof(s) && !strncasecmp(key->str, (s), key->len))
118 static void add_entry(php_http_cookie_list_t *list, char **allowed_extras, long flags, php_http_array_hashkey_t *key, zval *val)
119 {
120 zval *arg = php_http_zsep(1, IS_STRING, val);
121
122 if (!(flags & PHP_HTTP_COOKIE_PARSE_RAW)) {
123 Z_STRLEN_P(arg) = php_raw_url_decode(Z_STRVAL_P(arg), Z_STRLEN_P(arg));
124 }
125
126 if _KEY_IS("path") {
127 STR_SET(list->path, estrndup(Z_STRVAL_P(arg), Z_STRLEN_P(arg)));
128 } else if _KEY_IS("domain") {
129 STR_SET(list->domain, estrndup(Z_STRVAL_P(arg), Z_STRLEN_P(arg)));
130 } else if _KEY_IS("expires") {
131 char *date = estrndup(Z_STRVAL_P(arg), Z_STRLEN_P(arg));
132 list->expires = php_parse_date(date, NULL);
133 efree(date);
134 } else if _KEY_IS("secure") {
135 list->flags |= PHP_HTTP_COOKIE_SECURE;
136 } else if _KEY_IS("httpOnly") {
137 list->flags |= PHP_HTTP_COOKIE_HTTPONLY;
138 } else {
139 /* check for extra */
140 if (allowed_extras) {
141 char **ae = allowed_extras;
142
143 php_http_array_hashkey_stringify(key);
144 for (; *ae; ++ae) {
145 if (!strncasecmp(key->str, *ae, key->len)) {
146 if (key->type == HASH_KEY_IS_LONG) {
147 zend_hash_index_update(&list->extras, key->num, (void *) &arg, sizeof(zval *), NULL);
148 } else {
149 zend_hash_update(&list->extras, key->str, key->len, (void *) &arg, sizeof(zval *), NULL);
150 }
151 php_http_array_hashkey_stringfree(key);
152 return;
153 }
154 }
155 php_http_array_hashkey_stringfree(key);
156 }
157
158 /* cookie */
159 if (key->type == HASH_KEY_IS_LONG) {
160 zend_hash_index_update(&list->cookies, key->num, (void *) &arg, sizeof(zval *), NULL);
161 } else {
162 zend_hash_update(&list->cookies, key->str, key->len, (void *) &arg, sizeof(zval *), NULL);
163 }
164 return;
165 }
166 zval_ptr_dtor(&arg);
167 }
168
169 PHP_HTTP_API php_http_cookie_list_t *php_http_cookie_list_parse(php_http_cookie_list_t *list, const char *str, size_t len, long flags, char **allowed_extras TSRMLS_DC)
170 {
171 php_http_params_opts_t opts;
172 HashTable params;
173 HashPosition pos1, pos2;
174 php_http_array_hashkey_t key = php_http_array_hashkey_init(0);
175 zval **param, **val, **args, **arg;
176
177 php_http_params_opts_default_get(&opts);
178 opts.input.str = estrndup(str, len);
179 opts.input.len = len;
180 opts.param = NULL;
181 zend_hash_init(&params, 10, NULL, ZVAL_PTR_DTOR, 0);
182 php_http_params_parse(&params, &opts TSRMLS_CC);
183 efree(opts.input.str);
184
185 list = php_http_cookie_list_init(list TSRMLS_CC);
186 FOREACH_HASH_KEYVAL(pos1, &params, key, param) {
187 if (Z_TYPE_PP(param) == IS_ARRAY) {
188 if (SUCCESS == zend_hash_find(Z_ARRVAL_PP(param), ZEND_STRS("value"), (void *) &val)) {
189 add_entry(list, NULL, flags, &key, *val);
190 }
191 if (SUCCESS == zend_hash_find(Z_ARRVAL_PP(param), ZEND_STRS("arguments"), (void *) &args) && Z_TYPE_PP(args) == IS_ARRAY) {
192 FOREACH_KEYVAL(pos2, *args, key, arg) {
193 add_entry(list, allowed_extras, flags, &key, *arg);
194 }
195 }
196 }
197 }
198 zend_hash_destroy(&params);
199
200 return list;
201 }
202
203
204 PHP_HTTP_API void php_http_cookie_list_to_struct(php_http_cookie_list_t *list, zval *strct)
205 {
206 zval array, *cookies, *extras;
207 TSRMLS_FETCH_FROM_CTX(list->ts);
208
209 INIT_PZVAL_ARRAY(&array, HASH_OF(strct));
210
211 MAKE_STD_ZVAL(cookies);
212 array_init(cookies);
213 zend_hash_copy(Z_ARRVAL_P(cookies), &list->cookies, (copy_ctor_func_t) zval_add_ref, NULL, sizeof(zval *));
214 add_assoc_zval(&array, "cookies", cookies);
215
216 MAKE_STD_ZVAL(extras);
217 array_init(extras);
218 zend_hash_copy(Z_ARRVAL_P(extras), &list->extras, (copy_ctor_func_t) zval_add_ref, NULL, sizeof(zval *));
219 add_assoc_zval(&array, "extras", extras);
220
221 add_assoc_long(&array, "flags", list->flags);
222 add_assoc_long(&array, "expires", (long) list->expires);
223 add_assoc_string(&array, "path", STR_PTR(list->path), 1);
224 add_assoc_string(&array, "domain", STR_PTR(list->domain), 1);
225 }
226
227 PHP_HTTP_API php_http_cookie_list_t *php_http_cookie_list_from_struct(php_http_cookie_list_t *list, zval *strct TSRMLS_DC)
228 {
229 zval **tmp, *cpy;
230 HashTable *ht = HASH_OF(strct);
231
232 list = php_http_cookie_list_init(list TSRMLS_CC);
233
234 if (SUCCESS == zend_hash_find(ht, "cookies", sizeof("cookies"), (void *) &tmp) && Z_TYPE_PP(tmp) == IS_ARRAY) {
235 zend_hash_copy(&list->cookies, Z_ARRVAL_PP(tmp), (copy_ctor_func_t) zval_add_ref, NULL, sizeof(zval *));
236 }
237 if (SUCCESS == zend_hash_find(ht, "extras", sizeof("extras"), (void *) &tmp) && Z_TYPE_PP(tmp) == IS_ARRAY) {
238 zend_hash_copy(&list->extras, Z_ARRVAL_PP(tmp), (copy_ctor_func_t) zval_add_ref, NULL, sizeof(zval *));
239 }
240 if (SUCCESS == zend_hash_find(ht, "flags", sizeof("flags"), (void *) &tmp)) {
241 cpy = php_http_ztyp(IS_LONG, *tmp);
242 list->flags = Z_LVAL_P(cpy);
243 zval_ptr_dtor(&cpy);
244 }
245 if (SUCCESS == zend_hash_find(ht, "expires", sizeof("expires"), (void *) &tmp)) {
246 if (Z_TYPE_PP(tmp) == IS_LONG) {
247 list->expires = Z_LVAL_PP(tmp);
248 } else {
249 long lval;
250
251 cpy = php_http_ztyp(IS_STRING, *tmp);
252 if (IS_LONG == is_numeric_string(Z_STRVAL_P(cpy), Z_STRLEN_P(cpy), &lval, NULL, 0)) {
253 list->expires = lval;
254 } else {
255 list->expires = php_parse_date(Z_STRVAL_P(cpy), NULL);
256 }
257
258 zval_ptr_dtor(&cpy);
259 }
260 }
261 if (SUCCESS == zend_hash_find(ht, "path", sizeof("path"), (void *) &tmp) && Z_TYPE_PP(tmp) == IS_STRING) {
262 list->path = estrndup(Z_STRVAL_PP(tmp), Z_STRLEN_PP(tmp));
263 }
264 if (SUCCESS == zend_hash_find(ht, "domain", sizeof("domain"), (void *) &tmp) && Z_TYPE_PP(tmp) == IS_STRING) {
265 list->domain = estrndup(Z_STRVAL_PP(tmp), Z_STRLEN_PP(tmp));
266 }
267
268 return list;
269 }
270
271
272
273 static inline void append_encoded(php_http_buffer_t *buf, const char *key, size_t key_len, const char *val, size_t val_len)
274 {
275 char *enc_str[2];
276 int enc_len[2];
277
278 enc_str[0] = php_raw_url_encode(key, key_len, &enc_len[0]);
279 enc_str[1] = php_raw_url_encode(val, val_len, &enc_len[1]);
280
281 php_http_buffer_append(buf, enc_str[0], enc_len[0]);
282 php_http_buffer_appends(buf, "=");
283 php_http_buffer_append(buf, enc_str[1], enc_len[1]);
284 php_http_buffer_appends(buf, "; ");
285
286 efree(enc_str[0]);
287 efree(enc_str[1]);
288 }
289
290
291
292 PHP_HTTP_API void php_http_cookie_list_to_string(php_http_cookie_list_t *list, char **str, size_t *len)
293 {
294 php_http_buffer_t buf;
295 zval **val;
296 php_http_array_hashkey_t key = php_http_array_hashkey_init(0);
297 HashPosition pos;
298 TSRMLS_FETCH_FROM_CTX(list->ts);
299
300 php_http_buffer_init(&buf);
301
302 FOREACH_HASH_KEYVAL(pos, &list->cookies, key, val) {
303 zval *tmp = php_http_ztyp(IS_STRING, *val);
304
305 php_http_array_hashkey_stringify(&key);
306 append_encoded(&buf, key.str, key.len-1, Z_STRVAL_P(tmp), Z_STRLEN_P(tmp));
307 php_http_array_hashkey_stringfree(&key);
308
309 zval_ptr_dtor(&tmp);
310 }
311
312 if (list->domain && *list->domain) {
313 php_http_buffer_appendf(&buf, "domain=%s; ", list->domain);
314 }
315 if (list->path && *list->path) {
316 php_http_buffer_appendf(&buf, "path=%s; ", list->path);
317 }
318 if (list->expires >= 0) {
319 char *date = php_format_date(ZEND_STRL(PHP_HTTP_DATE_FORMAT), list->expires, 0 TSRMLS_CC);
320 php_http_buffer_appendf(&buf, "expires=%s; ", date);
321 efree(date);
322 }
323
324 FOREACH_HASH_KEYVAL(pos, &list->extras, key, val) {
325 zval *tmp = php_http_ztyp(IS_STRING, *val);
326
327 php_http_array_hashkey_stringify(&key);
328 append_encoded(&buf, key.str, key.len-1, Z_STRVAL_P(tmp), Z_STRLEN_P(tmp));
329 php_http_array_hashkey_stringfree(&key);
330
331 zval_ptr_dtor(&tmp);
332 }
333
334 if (list->flags & PHP_HTTP_COOKIE_SECURE) {
335 php_http_buffer_appends(&buf, "secure; ");
336 }
337 if (list->flags & PHP_HTTP_COOKIE_HTTPONLY) {
338 php_http_buffer_appends(&buf, "httpOnly; ");
339 }
340
341 php_http_buffer_fix(&buf);
342 *str = buf.data;
343 *len = buf.used;
344 }
345
346 #define PHP_HTTP_BEGIN_ARGS(method, req_args) PHP_HTTP_BEGIN_ARGS_EX(HttpCookie, method, 0, req_args)
347 #define PHP_HTTP_EMPTY_ARGS(method) PHP_HTTP_EMPTY_ARGS_EX(HttpCookie, method, 0)
348 #define PHP_HTTP_COOKIE_ME(method, visibility) PHP_ME(HttpCookie, method, PHP_HTTP_ARGS(HttpCookie, method), visibility)
349
350 PHP_HTTP_BEGIN_ARGS(__construct, 0)
351 PHP_HTTP_ARG_VAL(cookie_string, 0)
352 PHP_HTTP_ARG_VAL(parser_flags, 0)
353 PHP_HTTP_ARG_VAL(allowed_extras, 0)
354 PHP_HTTP_END_ARGS;
355
356 PHP_HTTP_EMPTY_ARGS(toArray);
357 PHP_HTTP_EMPTY_ARGS(getCookies);
358 PHP_HTTP_EMPTY_ARGS(getExtras);
359 PHP_HTTP_EMPTY_ARGS(getDomain);
360 PHP_HTTP_EMPTY_ARGS(getPath);
361 PHP_HTTP_EMPTY_ARGS(getExpires);
362 PHP_HTTP_EMPTY_ARGS(getFlags);
363 PHP_HTTP_EMPTY_ARGS(toString);
364
365 PHP_HTTP_BEGIN_ARGS(setDomain, 0)
366 PHP_HTTP_ARG_VAL(value, 0)
367 PHP_HTTP_END_ARGS;
368 PHP_HTTP_BEGIN_ARGS(setPath, 0)
369 PHP_HTTP_ARG_VAL(value, 0)
370 PHP_HTTP_END_ARGS;
371 PHP_HTTP_BEGIN_ARGS(setExpires, 0)
372 PHP_HTTP_ARG_VAL(value, 0)
373 PHP_HTTP_END_ARGS;
374 PHP_HTTP_BEGIN_ARGS(setFlags, 0)
375 PHP_HTTP_ARG_VAL(value, 0)
376 PHP_HTTP_END_ARGS;
377
378 PHP_HTTP_BEGIN_ARGS(setCookies, 0)
379 PHP_HTTP_ARG_VAL(cookies, 0)
380 PHP_HTTP_END_ARGS;
381 PHP_HTTP_BEGIN_ARGS(addCookies, 1)
382 PHP_HTTP_ARG_VAL(cookies, 0)
383 PHP_HTTP_END_ARGS;
384 PHP_HTTP_BEGIN_ARGS(setExtras, 0)
385 PHP_HTTP_ARG_VAL(extras, 0)
386 PHP_HTTP_END_ARGS;
387 PHP_HTTP_BEGIN_ARGS(addExtras, 1)
388 PHP_HTTP_ARG_VAL(extras, 0)
389 PHP_HTTP_END_ARGS;
390 PHP_HTTP_BEGIN_ARGS(setCookie, 1)
391 PHP_HTTP_ARG_VAL(cookie_name, 0)
392 PHP_HTTP_ARG_VAL(cookie_value, 0)
393 PHP_HTTP_END_ARGS;
394 PHP_HTTP_BEGIN_ARGS(addCookie, 1)
395 PHP_HTTP_ARG_VAL(cookie_name, 0)
396 PHP_HTTP_ARG_VAL(cookie_value, 0)
397 PHP_HTTP_END_ARGS;
398 PHP_HTTP_BEGIN_ARGS(getCookie, 1)
399 PHP_HTTP_ARG_VAL(name, 0)
400 PHP_HTTP_END_ARGS;
401 PHP_HTTP_BEGIN_ARGS(setExtra, 1)
402 PHP_HTTP_ARG_VAL(extra_name, 0)
403 PHP_HTTP_ARG_VAL(extra_value, 0)
404 PHP_HTTP_END_ARGS;
405 PHP_HTTP_BEGIN_ARGS(addExtra, 1)
406 PHP_HTTP_ARG_VAL(extra_name, 0)
407 PHP_HTTP_ARG_VAL(extra_value, 0)
408 PHP_HTTP_END_ARGS;
409 PHP_HTTP_BEGIN_ARGS(getExtra, 1)
410 PHP_HTTP_ARG_VAL(name, 0)
411 PHP_HTTP_END_ARGS;
412
413 static zend_class_entry *php_http_cookie_class_entry;
414
415 zend_class_entry *php_http_cookie_get_class_entry(void)
416 {
417 return php_http_cookie_class_entry;
418 }
419
420 static zend_function_entry php_http_cookie_method_entry[] = {
421 PHP_HTTP_COOKIE_ME(__construct, ZEND_ACC_PUBLIC)
422 PHP_HTTP_COOKIE_ME(getCookies, ZEND_ACC_PUBLIC)
423 PHP_HTTP_COOKIE_ME(setCookies, ZEND_ACC_PUBLIC)
424 PHP_HTTP_COOKIE_ME(addCookies, ZEND_ACC_PUBLIC)
425 PHP_HTTP_COOKIE_ME(getCookie, ZEND_ACC_PUBLIC)
426 PHP_HTTP_COOKIE_ME(setCookie, ZEND_ACC_PUBLIC)
427 PHP_HTTP_COOKIE_ME(addCookie, ZEND_ACC_PUBLIC)
428
429 PHP_HTTP_COOKIE_ME(getExtras, ZEND_ACC_PUBLIC)
430 PHP_HTTP_COOKIE_ME(setExtras, ZEND_ACC_PUBLIC)
431 PHP_HTTP_COOKIE_ME(addExtras, ZEND_ACC_PUBLIC)
432 PHP_HTTP_COOKIE_ME(getExtra, ZEND_ACC_PUBLIC)
433 PHP_HTTP_COOKIE_ME(setExtra, ZEND_ACC_PUBLIC)
434 PHP_HTTP_COOKIE_ME(addExtra, ZEND_ACC_PUBLIC)
435
436 PHP_HTTP_COOKIE_ME(getDomain, ZEND_ACC_PUBLIC)
437 PHP_HTTP_COOKIE_ME(setDomain, ZEND_ACC_PUBLIC)
438 PHP_HTTP_COOKIE_ME(getPath, ZEND_ACC_PUBLIC)
439 PHP_HTTP_COOKIE_ME(setPath, ZEND_ACC_PUBLIC)
440 PHP_HTTP_COOKIE_ME(getExpires, ZEND_ACC_PUBLIC)
441 PHP_HTTP_COOKIE_ME(setExpires, ZEND_ACC_PUBLIC)
442 PHP_HTTP_COOKIE_ME(getFlags, ZEND_ACC_PUBLIC)
443 PHP_HTTP_COOKIE_ME(setFlags, ZEND_ACC_PUBLIC)
444
445 PHP_HTTP_COOKIE_ME(toArray, ZEND_ACC_PUBLIC)
446 PHP_HTTP_COOKIE_ME(toString, ZEND_ACC_PUBLIC)
447 ZEND_MALIAS(HttpCookie, __toString, toString, PHP_HTTP_ARGS(HttpCookie, toString), ZEND_ACC_PUBLIC)
448
449 EMPTY_FUNCTION_ENTRY
450 };
451 static zend_object_handlers php_http_cookie_object_handlers;
452
453 zend_object_value php_http_cookie_object_new(zend_class_entry *ce TSRMLS_DC)
454 {
455 return php_http_cookie_object_new_ex(ce, NULL, NULL TSRMLS_CC);
456 }
457
458 zend_object_value php_http_cookie_object_new_ex(zend_class_entry *ce, php_http_cookie_list_t *list, php_http_cookie_object_t **ptr TSRMLS_DC)
459 {
460 zend_object_value ov;
461 php_http_cookie_object_t *o;
462
463 o = ecalloc(sizeof(*o), 1);
464 zend_object_std_init((zend_object *) o, ce TSRMLS_CC);
465 object_properties_init((zend_object *) o, ce);
466
467 if (list) {
468 o->list = list;
469 }
470
471 if (ptr) {
472 *ptr = o;
473 }
474
475 ov.handle = zend_objects_store_put(o, NULL, php_http_cookie_object_free, NULL TSRMLS_CC);
476 ov.handlers = &php_http_cookie_object_handlers;
477
478 return ov;
479 }
480
481 zend_object_value php_http_cookie_object_clone(zval *this_ptr TSRMLS_DC)
482 {
483 php_http_cookie_object_t *new_obj, *old_obj = zend_object_store_get_object(getThis() TSRMLS_CC);
484 zend_object_value ov;
485
486 if (!old_obj->list) {
487 old_obj->list = php_http_cookie_list_init(NULL TSRMLS_CC);
488 }
489 ov = php_http_cookie_object_new_ex(old_obj->o.ce, php_http_cookie_list_copy(old_obj->list, NULL), &new_obj TSRMLS_CC);
490 zend_objects_clone_members((zend_object *) new_obj, ov, (zend_object *) old_obj, Z_OBJ_HANDLE_P(getThis()) TSRMLS_CC);
491
492 return ov;
493 }
494
495 void php_http_cookie_object_free(void *object TSRMLS_DC)
496 {
497 php_http_cookie_object_t *obj = object;
498
499 php_http_cookie_list_free(&obj->list);
500 zend_object_std_dtor((zend_object *) obj TSRMLS_CC);
501 efree(obj);
502 }
503
504 PHP_METHOD(HttpCookie, __construct)
505 {
506 with_error_handling(EH_THROW, php_http_exception_get_class_entry()) {
507 zval *zcookie = NULL;
508 long flags = 0;
509 HashTable *allowed_extras = NULL;
510
511 if (SUCCESS == zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "|z!lH", &zcookie, &flags, &allowed_extras)) {
512 if (zcookie) {
513 with_error_handling(EH_THROW, php_http_exception_get_class_entry()) {
514 char **ae = NULL;
515 php_http_cookie_object_t *obj = zend_object_store_get_object(getThis() TSRMLS_CC);
516
517 if (allowed_extras && zend_hash_num_elements(allowed_extras)) {
518 char **ae_ptr = safe_emalloc(zend_hash_num_elements(allowed_extras) + 1, sizeof(char *), 0);
519 HashPosition pos;
520 zval **val;
521
522 ae = ae_ptr;
523 FOREACH_HASH_VAL(pos, allowed_extras, val) {
524 zval *cpy = php_http_ztyp(IS_STRING, *val);
525
526 *ae_ptr++ = estrndup(Z_STRVAL_P(cpy), Z_STRLEN_P(cpy));
527 zval_ptr_dtor(&cpy);
528 }
529 *ae_ptr = NULL;
530 }
531
532 switch (Z_TYPE_P(zcookie)) {
533 case IS_OBJECT:
534 if (instanceof_function(Z_OBJCE_P(zcookie), php_http_cookie_class_entry TSRMLS_CC)) {
535 php_http_cookie_object_t *zco = zend_object_store_get_object(zcookie TSRMLS_CC);
536
537 if (zco->list) {
538 obj->list = php_http_cookie_list_copy(zco->list, NULL);
539 }
540 break;
541 }
542 /* no break */
543 case IS_ARRAY:
544 obj->list = php_http_cookie_list_from_struct(obj->list, zcookie TSRMLS_CC);
545 break;
546 default: {
547 zval *cpy = php_http_ztyp(IS_STRING, zcookie);
548
549 obj->list = php_http_cookie_list_parse(obj->list, Z_STRVAL_P(cpy), Z_STRLEN_P(cpy), flags, ae TSRMLS_CC);
550 zval_ptr_dtor(&cpy);
551 break;
552 }
553 }
554
555 if (ae) {
556 char **ae_ptr;
557
558 for (ae_ptr = ae; *ae_ptr; ++ae_ptr) {
559 efree(*ae_ptr);
560 }
561 efree(ae);
562 }
563 } end_error_handling();
564 }
565 }
566 } end_error_handling();
567 }
568
569 PHP_METHOD(HttpCookie, getCookies)
570 {
571 if (SUCCESS == zend_parse_parameters_none()) {
572 php_http_cookie_object_t *obj = zend_object_store_get_object(getThis() TSRMLS_CC);
573
574 if (!obj->list) {
575 obj->list = php_http_cookie_list_init(NULL TSRMLS_CC);
576 }
577 array_init(return_value);
578 array_copy(&obj->list->cookies, Z_ARRVAL_P(return_value));
579 return;
580 }
581 RETURN_FALSE;
582 }
583
584 PHP_METHOD(HttpCookie, setCookies)
585 {
586 HashTable *cookies = NULL;
587
588 if (SUCCESS == zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "|H", &cookies)) {
589 php_http_cookie_object_t *obj = zend_object_store_get_object(getThis() TSRMLS_CC);
590
591 if (!obj->list) {
592 obj->list = php_http_cookie_list_init(NULL TSRMLS_CC);
593 }
594 zend_hash_clean(&obj->list->cookies);
595 if (cookies) {
596 array_copy(cookies, &obj->list->cookies);
597 }
598 }
599 RETVAL_ZVAL(getThis(), 1, 0);
600 }
601
602 PHP_METHOD(HttpCookie, addCookies)
603 {
604 HashTable *cookies = NULL;
605
606 if (SUCCESS == zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "H", &cookies)) {
607 php_http_cookie_object_t *obj = zend_object_store_get_object(getThis() TSRMLS_CC);
608
609 if (!obj->list) {
610 obj->list = php_http_cookie_list_init(NULL TSRMLS_CC);
611 }
612 array_join(cookies, &obj->list->cookies, 1, ARRAY_JOIN_STRONLY);
613 }
614 RETVAL_ZVAL(getThis(), 1, 0);
615 }
616
617
618 PHP_METHOD(HttpCookie, getExtras)
619 {
620 if (SUCCESS == zend_parse_parameters_none()) {
621 php_http_cookie_object_t *obj = zend_object_store_get_object(getThis() TSRMLS_CC);
622
623 if (!obj->list) {
624 obj->list = php_http_cookie_list_init(NULL TSRMLS_CC);
625 }
626 array_init(return_value);
627 array_copy(&obj->list->extras, Z_ARRVAL_P(return_value));
628 return;
629 }
630 RETURN_FALSE;
631 }
632
633 PHP_METHOD(HttpCookie, setExtras)
634 {
635 HashTable *extras = NULL;
636
637 if (SUCCESS == zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "|H", &extras)) {
638 php_http_cookie_object_t *obj = zend_object_store_get_object(getThis() TSRMLS_CC);
639
640 if (!obj->list) {
641 obj->list = php_http_cookie_list_init(NULL TSRMLS_CC);
642 }
643 zend_hash_clean(&obj->list->extras);
644 if (extras) {
645 array_copy(extras, &obj->list->extras);
646 }
647 }
648 RETVAL_ZVAL(getThis(), 1, 0);
649 }
650
651 PHP_METHOD(HttpCookie, addExtras)
652 {
653 HashTable *extras = NULL;
654
655 if (SUCCESS == zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "H", &extras)) {
656 php_http_cookie_object_t *obj = zend_object_store_get_object(getThis() TSRMLS_CC);
657
658 if (!obj->list) {
659 obj->list = php_http_cookie_list_init(NULL TSRMLS_CC);
660 }
661 array_join(extras, &obj->list->extras, 1, ARRAY_JOIN_STRONLY);
662 }
663 RETVAL_ZVAL(getThis(), 1, 0);
664 }
665
666 PHP_METHOD(HttpCookie, getCookie)
667 {
668 char *name_str;
669 int name_len;
670
671 if (SUCCESS == zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "s", &name_str, &name_len)) {
672 php_http_cookie_object_t *obj = zend_object_store_get_object(getThis() TSRMLS_CC);
673 zval **zvalue;
674
675 if (!obj->list) {
676 obj->list = php_http_cookie_list_init(NULL TSRMLS_CC);
677 }
678 if (SUCCESS == zend_symtable_find(&obj->list->cookies, name_str, name_len + 1, (void *) &zvalue)) {
679 RETURN_ZVAL(*zvalue, 1, 0);
680 }
681 }
682 RETURN_FALSE;
683 }
684
685 PHP_METHOD(HttpCookie, setCookie)
686 {
687 char *name_str, *value_str = NULL;
688 int name_len, value_len = 0;
689
690 if (SUCCESS == zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "s|s!", &name_str, &name_len, &value_str, &value_len)) {
691 php_http_cookie_object_t *obj = zend_object_store_get_object(getThis() TSRMLS_CC);
692
693 if (!obj->list) {
694 obj->list = php_http_cookie_list_init(NULL TSRMLS_CC);
695 }
696 if (!value_str) {
697 zend_symtable_del(&obj->list->cookies, name_str, name_len + 1);
698 } else {
699 zval *zvalue;
700
701 MAKE_STD_ZVAL(zvalue);
702 ZVAL_STRINGL(zvalue, value_str, value_len, 1);
703 zend_symtable_update(&obj->list->cookies, name_str, name_len + 1, &zvalue, sizeof(zval *), NULL);
704 }
705 }
706 RETVAL_ZVAL(getThis(), 1, 0);
707 }
708
709 PHP_METHOD(HttpCookie, addCookie)
710 {
711 char *name_str, *value_str;
712 int name_len, value_len;
713
714 if (SUCCESS == zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "s|s", &name_str, &name_len, &value_str, &value_len)) {
715 php_http_cookie_object_t *obj = zend_object_store_get_object(getThis() TSRMLS_CC);
716 zval *zvalue;
717
718 if (!obj->list) {
719 obj->list = php_http_cookie_list_init(NULL TSRMLS_CC);
720 }
721 MAKE_STD_ZVAL(zvalue);
722 ZVAL_STRINGL(zvalue, value_str, value_len, 1);
723 zend_symtable_update(&obj->list->cookies, name_str, name_len + 1, &zvalue, sizeof(zval *), NULL);
724 }
725 RETVAL_ZVAL(getThis(), 1, 0);
726 }
727
728 PHP_METHOD(HttpCookie, getExtra)
729 {
730 char *name_str;
731 int name_len;
732
733 if (SUCCESS == zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "s", &name_str, &name_len)) {
734 php_http_cookie_object_t *obj = zend_object_store_get_object(getThis() TSRMLS_CC);
735 zval **zvalue;
736
737 if (!obj->list) {
738 obj->list = php_http_cookie_list_init(NULL TSRMLS_CC);
739 }
740 if (SUCCESS == zend_symtable_find(&obj->list->extras, name_str, name_len + 1, (void *) &zvalue)) {
741 RETURN_ZVAL(*zvalue, 1, 0);
742 }
743 }
744 RETURN_FALSE;
745 }
746
747 PHP_METHOD(HttpCookie, setExtra)
748 {
749 char *name_str, *value_str = NULL;
750 int name_len, value_len = 0;
751
752 if (SUCCESS == zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "s|s!", &name_str, &name_len, &value_str, &value_len)) {
753 php_http_cookie_object_t *obj = zend_object_store_get_object(getThis() TSRMLS_CC);
754
755 if (!obj->list) {
756 obj->list = php_http_cookie_list_init(NULL TSRMLS_CC);
757 }
758 if (!value_str) {
759 zend_symtable_del(&obj->list->extras, name_str, name_len + 1);
760 } else {
761 zval *zvalue;
762
763 MAKE_STD_ZVAL(zvalue);
764 ZVAL_STRINGL(zvalue, value_str, value_len, 1);
765 zend_symtable_update(&obj->list->extras, name_str, name_len + 1, &zvalue, sizeof(zval *), NULL);
766 }
767 }
768 RETVAL_ZVAL(getThis(), 1, 0);
769 }
770
771 PHP_METHOD(HttpCookie, addExtra)
772 {
773 char *name_str, *value_str;
774 int name_len, value_len;
775
776 if (SUCCESS == zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "s|s", &name_str, &name_len, &value_str, &value_len)) {
777 php_http_cookie_object_t *obj = zend_object_store_get_object(getThis() TSRMLS_CC);
778 zval *zvalue;
779
780 if (!obj->list) {
781 obj->list = php_http_cookie_list_init(NULL TSRMLS_CC);
782 }
783 MAKE_STD_ZVAL(zvalue);
784 ZVAL_STRINGL(zvalue, value_str, value_len, 1);
785 zend_symtable_update(&obj->list->extras, name_str, name_len + 1, &zvalue, sizeof(zval *), NULL);
786 }
787 RETVAL_ZVAL(getThis(), 1, 0);
788 }
789
790 PHP_METHOD(HttpCookie, getDomain)
791 {
792 if (SUCCESS == zend_parse_parameters_none()) {
793 php_http_cookie_object_t *obj = zend_object_store_get_object(getThis() TSRMLS_CC);
794
795 if (!obj->list) {
796 obj->list = php_http_cookie_list_init(NULL TSRMLS_CC);
797 }
798 if (obj->list->domain) {
799 RETURN_STRING(obj->list->domain, 1);
800 }
801 RETURN_NULL();
802 }
803 RETURN_FALSE;
804 }
805
806 PHP_METHOD(HttpCookie, setDomain)
807 {
808 char *domain_str = NULL;
809 int domain_len = 0;
810
811 if (SUCCESS == zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "|s!", &domain_str, &domain_len)) {
812 php_http_cookie_object_t *obj = zend_object_store_get_object(getThis() TSRMLS_CC);
813
814 if (!obj->list) {
815 obj->list = php_http_cookie_list_init(NULL TSRMLS_CC);
816 }
817 STR_SET(obj->list->domain, domain_str ? estrndup(domain_str, domain_len) : NULL);
818 }
819 RETVAL_ZVAL(getThis(), 1, 0);
820 }
821
822 PHP_METHOD(HttpCookie, getPath)
823 {
824 if (SUCCESS == zend_parse_parameters_none()) {
825 php_http_cookie_object_t *obj = zend_object_store_get_object(getThis() TSRMLS_CC);
826
827 if (!obj->list) {
828 obj->list = php_http_cookie_list_init(NULL TSRMLS_CC);
829 }
830 if (obj->list->path) {
831 RETURN_STRING(obj->list->path, 1);
832 }
833 RETURN_NULL();
834 }
835 RETURN_FALSE;
836 }
837
838 PHP_METHOD(HttpCookie, setPath)
839 {
840 char *path_str = NULL;
841 int path_len = 0;
842
843 if (SUCCESS == zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "|s!", &path_str, &path_len)) {
844 php_http_cookie_object_t *obj = zend_object_store_get_object(getThis() TSRMLS_CC);
845
846 if (!obj->list) {
847 obj->list = php_http_cookie_list_init(NULL TSRMLS_CC);
848 }
849 STR_SET(obj->list->path, path_str ? estrndup(path_str, path_len) : NULL);
850 }
851 RETVAL_ZVAL(getThis(), 1, 0);
852 }
853
854 PHP_METHOD(HttpCookie, getExpires)
855 {
856 if (SUCCESS == zend_parse_parameters_none()) {
857 php_http_cookie_object_t *obj = zend_object_store_get_object(getThis() TSRMLS_CC);
858
859 if (!obj->list) {
860 obj->list = php_http_cookie_list_init(NULL TSRMLS_CC);
861 }
862 RETURN_LONG(obj->list->expires);
863 }
864 RETURN_FALSE;
865 }
866
867 PHP_METHOD(HttpCookie, setExpires)
868 {
869 long ts = -1;
870
871 if (SUCCESS == zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "|l", &ts)) {
872 php_http_cookie_object_t *obj = zend_object_store_get_object(getThis() TSRMLS_CC);
873
874 if (!obj->list) {
875 obj->list = php_http_cookie_list_init(NULL TSRMLS_CC);
876 }
877 obj->list->expires = ts;
878 }
879 RETVAL_ZVAL(getThis(), 1, 0);
880 }
881
882 PHP_METHOD(HttpCookie, getFlags)
883 {
884 if (SUCCESS == zend_parse_parameters_none()) {
885 php_http_cookie_object_t *obj = zend_object_store_get_object(getThis() TSRMLS_CC);
886
887 if (!obj->list) {
888 obj->list = php_http_cookie_list_init(NULL TSRMLS_CC);
889 }
890 RETURN_LONG(obj->list->flags);
891 }
892 RETURN_FALSE;
893 }
894
895 PHP_METHOD(HttpCookie, setFlags)
896 {
897 long flags = 0;
898
899 if (SUCCESS == zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "|l", &flags)) {
900 php_http_cookie_object_t *obj = zend_object_store_get_object(getThis() TSRMLS_CC);
901
902 if (!obj->list) {
903 obj->list = php_http_cookie_list_init(NULL TSRMLS_CC);
904 }
905 obj->list->flags = flags;
906 }
907 RETVAL_ZVAL(getThis(), 1, 0);
908 }
909
910 PHP_METHOD(HttpCookie, toString)
911 {
912 if (SUCCESS == zend_parse_parameters_none()) {
913 php_http_cookie_object_t *obj = zend_object_store_get_object(getThis() TSRMLS_CC);
914 char *str;
915 size_t len;
916
917 if (!obj->list) {
918 obj->list = php_http_cookie_list_init(NULL TSRMLS_CC);
919 }
920 php_http_cookie_list_to_string(obj->list, &str, &len);
921 RETURN_STRINGL(str, len, 0);
922 }
923 RETURN_EMPTY_STRING();
924 }
925
926 PHP_METHOD(HttpCookie, toArray)
927 {
928 if (SUCCESS == zend_parse_parameters_none()) {
929 php_http_cookie_object_t *obj = zend_object_store_get_object(getThis() TSRMLS_CC);
930
931 if (!obj->list) {
932 obj->list = php_http_cookie_list_init(NULL TSRMLS_CC);
933 }
934 array_init(return_value);
935 php_http_cookie_list_to_struct(obj->list, return_value);
936 }
937 }
938
939 PHP_MINIT_FUNCTION(http_cookie)
940 {
941 PHP_HTTP_REGISTER_CLASS(http, Cookie, http_cookie, php_http_object_get_class_entry(), 0);
942 php_http_cookie_class_entry->create_object = php_http_cookie_object_new;
943 memcpy(&php_http_cookie_object_handlers, zend_get_std_object_handlers(), sizeof(zend_object_handlers));
944 php_http_cookie_object_handlers.clone_obj = php_http_cookie_object_clone;
945
946 zend_declare_class_constant_long(php_http_cookie_class_entry, ZEND_STRL("PARSE_RAW"), PHP_HTTP_COOKIE_PARSE_RAW TSRMLS_CC);
947 zend_declare_class_constant_long(php_http_cookie_class_entry, ZEND_STRL("SECURE"), PHP_HTTP_COOKIE_SECURE TSRMLS_CC);
948 zend_declare_class_constant_long(php_http_cookie_class_entry, ZEND_STRL("HTTPONLY"), PHP_HTTP_COOKIE_HTTPONLY TSRMLS_CC);
949
950 return SUCCESS;
951 }
952
953
954
955 /*
956 * Local variables:
957 * tab-width: 4
958 * c-basic-offset: 4
959 * End:
960 * vim600: noet sw=4 ts=4 fdm=marker
961 * vim<600: noet sw=4 ts=4
962 */
Extended HTTP Support