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