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