add php_http_message_zip(): merge request/response messages for history
[m6w6/ext-http] / php_http_message.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 zend_bool php_http_message_info_callback(php_http_message_t **message, HashTable **headers, php_http_info_t *info TSRMLS_DC)
16 {
17 php_http_message_t *old = *message;
18
19 /* advance message */
20 if (!old || old->type || zend_hash_num_elements(&old->hdrs) || PHP_HTTP_BUFFER_LEN(old)) {
21 (*message) = php_http_message_init(NULL, 0 TSRMLS_CC);
22 (*message)->parent = old;
23 if (headers) {
24 (*headers) = &((*message)->hdrs);
25 }
26 }
27
28 if (info) {
29 php_http_message_set_info(*message, info);
30 }
31
32 return old != *message;
33 }
34
35 PHP_HTTP_API php_http_message_t *php_http_message_init(php_http_message_t *message, php_http_message_type_t type TSRMLS_DC)
36 {
37 if (!message) {
38 message = emalloc(sizeof(*message));
39 }
40 memset(message, 0, sizeof(*message));
41 TSRMLS_SET_CTX(message->ts);
42
43 php_http_message_set_type(message, type);
44 message->http.version.major = 1;
45 message->http.version.minor = 1;
46 zend_hash_init(&message->hdrs, 0, NULL, ZVAL_PTR_DTOR, 0);
47 php_http_message_body_init(&message->body, NULL TSRMLS_CC);
48
49 return message;
50 }
51
52 PHP_HTTP_API php_http_message_t *php_http_message_init_env(php_http_message_t *message, php_http_message_type_t type TSRMLS_DC)
53 {
54 int free_msg = !message;
55 zval *sval, tval;
56 php_http_message_body_t *mbody;
57
58 message = php_http_message_init(message, type TSRMLS_CC);
59
60 switch (type) {
61 case PHP_HTTP_REQUEST:
62 if ((sval = php_http_env_get_server_var(ZEND_STRL("SERVER_PROTOCOL"), 1 TSRMLS_CC)) && !strncmp(Z_STRVAL_P(sval), "HTTP/", lenof("HTTP/"))) {
63 php_http_version_parse(&message->http.version, Z_STRVAL_P(sval) TSRMLS_CC);
64 }
65 if ((sval = php_http_env_get_server_var(ZEND_STRL("REQUEST_METHOD"), 1 TSRMLS_CC))) {
66 message->http.info.request.method = estrdup(Z_STRVAL_P(sval));
67 }
68 if ((sval = php_http_env_get_server_var(ZEND_STRL("REQUEST_URI"), 1 TSRMLS_CC))) {
69 message->http.info.request.url = estrdup(Z_STRVAL_P(sval));
70 }
71
72 php_http_env_get_request_headers(&message->hdrs TSRMLS_CC);
73
74 if ((mbody = php_http_env_get_request_body(TSRMLS_C))) {
75 php_http_message_body_dtor(&message->body);
76 php_http_message_body_copy(mbody, &message->body, 0);
77 }
78 break;
79
80 case PHP_HTTP_RESPONSE:
81 if (!SG(sapi_headers).http_status_line || !php_http_info_parse((php_http_info_t *) &message->http, SG(sapi_headers).http_status_line TSRMLS_CC)) {
82 if (!(message->http.info.response.code = SG(sapi_headers).http_response_code)) {
83 message->http.info.response.code = 200;
84 }
85 message->http.info.response.status = estrdup(php_http_env_get_response_status_for_code(message->http.info.response.code));
86 }
87
88 php_http_env_get_response_headers(&message->hdrs TSRMLS_CC);
89
90 if (php_output_get_level(TSRMLS_C)) {
91 if (php_output_get_status(TSRMLS_C) & PHP_OUTPUT_SENT) {
92 php_http_error(HE_WARNING, PHP_HTTP_E_RUNTIME, "Could not fetch response body, output has already been sent at %s:%d", php_output_get_start_filename(TSRMLS_C), php_output_get_start_lineno(TSRMLS_C));
93 goto error;
94 } else if (SUCCESS != php_output_get_contents(&tval TSRMLS_CC)) {
95 php_http_error(HE_WARNING, PHP_HTTP_E_RUNTIME, "Could not fetch response body");
96 goto error;
97 } else {
98 php_http_message_body_append(&message->body, Z_STRVAL(tval), Z_STRLEN(tval));
99 zval_dtor(&tval);
100 }
101 }
102 break;
103
104 default:
105 error:
106 if (free_msg) {
107 php_http_message_free(&message);
108 } else {
109 message = NULL;
110 }
111 break;
112 }
113
114 return message;
115 }
116
117 PHP_HTTP_API php_http_message_t *php_http_message_parse(php_http_message_t *msg, const char *str, size_t len TSRMLS_DC)
118 {
119 php_http_message_parser_t p;
120 php_http_buffer_t buf;
121 int free_msg;
122
123 php_http_buffer_from_string_ex(&buf, str, len);
124 php_http_message_parser_init(&p TSRMLS_CC);
125
126 if ((free_msg = !msg)) {
127 msg = php_http_message_init(NULL, 0 TSRMLS_CC);
128 }
129
130 if (FAILURE == php_http_message_parser_parse(&p, &buf, PHP_HTTP_MESSAGE_PARSER_CLEANUP, &msg)) {
131 if (free_msg) {
132 php_http_message_free(&msg);
133 }
134 msg = NULL;
135 }
136
137 php_http_message_parser_dtor(&p);
138 php_http_buffer_dtor(&buf);
139
140 return msg;
141 }
142
143 PHP_HTTP_API zval *php_http_message_header(php_http_message_t *msg, char *key_str, size_t key_len, int join)
144 {
145 zval *ret = NULL, **header;
146 char *key = php_http_pretty_key(estrndup(key_str, key_len), key_len, 1, 1);
147
148 if (SUCCESS == zend_symtable_find(&msg->hdrs, key, key_len + 1, (void *) &header)) {
149 if (join && Z_TYPE_PP(header) == IS_ARRAY) {
150 zval *header_str, **val;
151 HashPosition pos;
152 php_http_buffer_t str;
153 TSRMLS_FETCH_FROM_CTX(msg->ts);
154
155 php_http_buffer_init(&str);
156 MAKE_STD_ZVAL(header_str);
157 FOREACH_VAL(pos, *header, val) {
158 zval *strval = php_http_ztyp(IS_STRING, *val);
159 php_http_buffer_appendf(&str, PHP_HTTP_BUFFER_LEN(&str) ? ", %s":"%s", Z_STRVAL_P(strval));
160 zval_ptr_dtor(&strval);
161 }
162 php_http_buffer_fix(&str);
163 ZVAL_STRINGL(header_str, PHP_HTTP_BUFFER_VAL(&str), PHP_HTTP_BUFFER_LEN(&str), 0);
164 ret = header_str;
165 } else {
166 Z_ADDREF_PP(header);
167 ret = *header;
168 }
169 }
170
171 efree(key);
172
173 return ret;
174 }
175
176 PHP_HTTP_API zend_bool php_http_message_is_multipart(php_http_message_t *msg, char **boundary)
177 {
178 zval *ct = php_http_message_header(msg, ZEND_STRL("Content-Type"), 1);
179 zend_bool is_multipart = 0;
180 TSRMLS_FETCH_FROM_CTX(msg->ts);
181
182 if (ct) {
183 php_http_params_opts_t popts;
184 HashTable params;
185
186 ZEND_INIT_SYMTABLE(&params);
187 php_http_params_opts_default_get(&popts);
188 popts.input.str = Z_STRVAL_P(ct);
189 popts.input.len = Z_STRLEN_P(ct);
190
191 if (php_http_params_parse(&params, &popts TSRMLS_CC)) {
192 zval **cur, **arg;
193 char *ct_str;
194
195 zend_hash_internal_pointer_reset(&params);
196
197 if (SUCCESS == zend_hash_get_current_data(&params, (void *) &cur)
198 && Z_TYPE_PP(cur) == IS_ARRAY
199 && HASH_KEY_IS_STRING == zend_hash_get_current_key(&params, &ct_str, NULL, 0)
200 ) {
201 if (php_http_match(ct_str, "multipart", PHP_HTTP_MATCH_WORD)) {
202 is_multipart = 1;
203
204 /* get boundary */
205 if (boundary
206 && SUCCESS == zend_hash_find(Z_ARRVAL_PP(cur), ZEND_STRS("arguments"), (void *) &arg)
207 && Z_TYPE_PP(arg) == IS_ARRAY
208 ) {
209 zval **val;
210 HashPosition pos;
211 php_http_array_hashkey_t key = php_http_array_hashkey_init(0);
212
213 FOREACH_KEYVAL(pos, *arg, key, val) {
214 if (key.type == HASH_KEY_IS_STRING && !strcasecmp(key.str, "boundary")) {
215 zval *bnd = php_http_ztyp(IS_STRING, *val);
216
217 if (Z_STRLEN_P(bnd)) {
218 *boundary = estrndup(Z_STRVAL_P(bnd), Z_STRLEN_P(bnd));
219 }
220 zval_ptr_dtor(&bnd);
221 }
222 }
223 }
224 }
225 }
226 }
227 zend_hash_destroy(&params);
228 zval_ptr_dtor(&ct);
229 }
230
231 return is_multipart;
232 }
233
234 /* */
235 PHP_HTTP_API void php_http_message_set_type(php_http_message_t *message, php_http_message_type_t type)
236 {
237 /* just act if different */
238 if (type != message->type) {
239
240 /* free request info */
241 switch (message->type) {
242 case PHP_HTTP_REQUEST:
243 STR_FREE(message->http.info.request.method);
244 STR_FREE(message->http.info.request.url);
245 break;
246
247 case PHP_HTTP_RESPONSE:
248 STR_FREE(message->http.info.response.status);
249 break;
250
251 default:
252 break;
253 }
254
255 message->type = type;
256 memset(&message->http, 0, sizeof(message->http));
257 }
258 }
259
260 PHP_HTTP_API void php_http_message_set_info(php_http_message_t *message, php_http_info_t *info)
261 {
262 php_http_message_set_type(message, info->type);
263 message->http.version = info->http.version;
264 switch (message->type) {
265 case PHP_HTTP_REQUEST:
266 STR_SET(PHP_HTTP_INFO(message).request.url, PHP_HTTP_INFO(info).request.url ? estrdup(PHP_HTTP_INFO(info).request.url) : NULL);
267 STR_SET(PHP_HTTP_INFO(message).request.method, PHP_HTTP_INFO(info).request.method ? estrdup(PHP_HTTP_INFO(info).request.method) : NULL);
268 break;
269
270 case PHP_HTTP_RESPONSE:
271 PHP_HTTP_INFO(message).response.code = PHP_HTTP_INFO(info).response.code;
272 STR_SET(PHP_HTTP_INFO(message).response.status, PHP_HTTP_INFO(info).response.status ? estrdup(PHP_HTTP_INFO(info).response.status) : NULL);
273 break;
274
275 default:
276 break;
277 }
278 }
279
280 PHP_HTTP_API void php_http_message_update_headers(php_http_message_t *msg)
281 {
282 zval *h;
283 size_t size;
284 TSRMLS_FETCH_FROM_CTX(msg->ts);
285
286 if ((size = php_http_message_body_size(&msg->body))) {
287 MAKE_STD_ZVAL(h);
288 ZVAL_LONG(h, size);
289 zend_hash_update(&msg->hdrs, "Content-Length", sizeof("Content-Length"), &h, sizeof(zval *), NULL);
290
291 if (msg->body.boundary) {
292 char *str;
293 size_t len;
294
295 if (!(h = php_http_message_header(msg, ZEND_STRL("Content-Type"), 1))) {
296 len = spprintf(&str, 0, "multipart/form-data; boundary=\"%s\"", msg->body.boundary);
297 MAKE_STD_ZVAL(h);
298 ZVAL_STRINGL(h, str, len, 0);
299 zend_hash_update(&msg->hdrs, "Content-Type", sizeof("Content-Type"), &h, sizeof(zval *), NULL);
300 } else if (!php_http_match(Z_STRVAL_P(h), "boundary=", PHP_HTTP_MATCH_WORD)) {
301 zval_dtor(h);
302 Z_STRLEN_P(h) = spprintf(&Z_STRVAL_P(h), 0, "%s; boundary=\"%s\"", Z_STRVAL_P(h), msg->body.boundary);
303 zend_hash_update(&msg->hdrs, "Content-Type", sizeof("Content-Type"), &h, sizeof(zval *), NULL);
304 } else {
305 zval_ptr_dtor(&h);
306 }
307 }
308 }
309 }
310 static inline void message_headers(php_http_message_t *msg, php_http_buffer_t *str)
311 {
312 php_http_array_hashkey_t key = php_http_array_hashkey_init(0);
313 HashPosition pos1;
314 zval **header;
315 TSRMLS_FETCH_FROM_CTX(msg->ts);
316
317 switch (msg->type) {
318 case PHP_HTTP_REQUEST:
319 php_http_buffer_appendf(str, PHP_HTTP_INFO_REQUEST_FMT_ARGS(&msg->http, PHP_HTTP_CRLF));
320 break;
321
322 case PHP_HTTP_RESPONSE:
323 php_http_buffer_appendf(str, PHP_HTTP_INFO_RESPONSE_FMT_ARGS(&msg->http, PHP_HTTP_CRLF));
324 break;
325
326 default:
327 break;
328 }
329
330 php_http_message_update_headers(msg);
331
332 FOREACH_HASH_KEYVAL(pos1, &msg->hdrs, key, header) {
333 if (key.type == HASH_KEY_IS_STRING) {
334 HashPosition pos2;
335 zval **single_header;
336
337 switch (Z_TYPE_PP(header)) {
338 case IS_BOOL:
339 php_http_buffer_appendf(str, "%s: %s" PHP_HTTP_CRLF, key.str, Z_BVAL_PP(header)?"true":"false");
340 break;
341
342 case IS_LONG:
343 php_http_buffer_appendf(str, "%s: %ld" PHP_HTTP_CRLF, key.str, Z_LVAL_PP(header));
344 break;
345
346 case IS_DOUBLE:
347 php_http_buffer_appendf(str, "%s: %F" PHP_HTTP_CRLF, key.str, Z_DVAL_PP(header));
348 break;
349
350 case IS_STRING:
351 if (Z_STRVAL_PP(header)[Z_STRLEN_PP(header)-1] == '\r') fprintf(stderr, "DOH!\n");
352 php_http_buffer_appendf(str, "%s: %s" PHP_HTTP_CRLF, key.str, Z_STRVAL_PP(header));
353 break;
354
355 case IS_ARRAY:
356 FOREACH_VAL(pos2, *header, single_header) {
357 switch (Z_TYPE_PP(single_header)) {
358 case IS_BOOL:
359 php_http_buffer_appendf(str, "%s: %s" PHP_HTTP_CRLF, key.str, Z_BVAL_PP(single_header)?"true":"false");
360 break;
361
362 case IS_LONG:
363 php_http_buffer_appendf(str, "%s: %ld" PHP_HTTP_CRLF, key.str, Z_LVAL_PP(single_header));
364 break;
365
366 case IS_DOUBLE:
367 php_http_buffer_appendf(str, "%s: %F" PHP_HTTP_CRLF, key.str, Z_DVAL_PP(single_header));
368 break;
369
370 case IS_STRING:
371 php_http_buffer_appendf(str, "%s: %s" PHP_HTTP_CRLF, key.str, Z_STRVAL_PP(single_header));
372 break;
373 }
374 }
375 break;
376 }
377 }
378 }
379 }
380
381 PHP_HTTP_API void php_http_message_to_callback(php_http_message_t *msg, php_http_pass_callback_t cb, void *cb_arg)
382 {
383 php_http_buffer_t str;
384
385 php_http_buffer_init_ex(&str, 0x1000, 0);
386 message_headers(msg, &str);
387 cb(cb_arg, PHP_HTTP_BUFFER_VAL(&str), PHP_HTTP_BUFFER_LEN(&str));
388 php_http_buffer_dtor(&str);
389
390 if (php_http_message_body_size(&msg->body)) {
391 cb(cb_arg, ZEND_STRL(PHP_HTTP_CRLF));
392 php_http_message_body_to_callback(&msg->body, cb, cb_arg, 0, 0);
393 }
394 }
395
396 PHP_HTTP_API void php_http_message_to_string(php_http_message_t *msg, char **string, size_t *length)
397 {
398 php_http_buffer_t str;
399 char *data;
400
401 php_http_buffer_init_ex(&str, 0x1000, 0);
402 message_headers(msg, &str);
403 if (php_http_message_body_size(&msg->body)) {
404 php_http_buffer_appends(&str, PHP_HTTP_CRLF);
405 php_http_message_body_to_callback(&msg->body, (php_http_pass_callback_t) php_http_buffer_append, &str, 0, 0);
406 }
407
408 data = php_http_buffer_data(&str, string, length);
409 if (!string) {
410 efree(data);
411 }
412
413 php_http_buffer_dtor(&str);
414 }
415
416 PHP_HTTP_API void php_http_message_serialize(php_http_message_t *message, char **string, size_t *length)
417 {
418 char *buf;
419 php_http_buffer_t str;
420 php_http_message_t *msg;
421
422 php_http_buffer_init(&str);
423
424 msg = message = php_http_message_reverse(message);
425 do {
426 php_http_message_to_callback(message, (php_http_pass_callback_t) php_http_buffer_append, &str);
427 php_http_buffer_appends(&str, PHP_HTTP_CRLF);
428 } while ((message = message->parent));
429 php_http_message_reverse(msg);
430
431 buf = php_http_buffer_data(&str, string, length);
432 if (!string) {
433 efree(buf);
434 }
435
436 php_http_buffer_dtor(&str);
437 }
438
439 PHP_HTTP_API php_http_message_t *php_http_message_reverse(php_http_message_t *msg)
440 {
441 int i, c = 0;
442
443 php_http_message_count(c, msg);
444
445 if (c > 1) {
446 php_http_message_t *tmp = msg, **arr;
447
448 arr = ecalloc(c, sizeof(**arr));
449 for (i = 0; i < c; ++i) {
450 arr[i] = tmp;
451 tmp = tmp->parent;
452 }
453 arr[0]->parent = NULL;
454 for (i = 0; i < c-1; ++i) {
455 arr[i+1]->parent = arr[i];
456 }
457
458 msg = arr[c-1];
459 efree(arr);
460 }
461
462 return msg;
463 }
464
465 PHP_HTTP_API php_http_message_t *php_http_message_zip(php_http_message_t *one, php_http_message_t *two)
466 {
467 php_http_message_t *dst = php_http_message_copy(one, NULL), *src = php_http_message_copy(two, NULL), *tmp_dst, *tmp_src, *ret = dst;
468
469 while(dst && src) {
470 tmp_dst = dst->parent;
471 tmp_src = src->parent;
472 dst->parent = src;
473 if (tmp_dst) {
474 src->parent = tmp_dst;
475 }
476 src = tmp_src;
477 dst = tmp_dst;
478 }
479
480 return ret;
481 }
482
483 PHP_HTTP_API php_http_message_t *php_http_message_copy_ex(php_http_message_t *from, php_http_message_t *to, zend_bool parents)
484 {
485 php_http_message_t *temp, *copy = NULL;
486 php_http_info_t info;
487 TSRMLS_FETCH_FROM_CTX(from->ts);
488
489 if (from) {
490 info.type = from->type;
491 info.http = from->http;
492
493 copy = temp = php_http_message_init(to, 0 TSRMLS_CC);
494 php_http_message_set_info(temp, &info);
495 zend_hash_copy(&temp->hdrs, &from->hdrs, (copy_ctor_func_t) zval_add_ref, NULL, sizeof(zval *));
496 php_http_message_body_copy(&from->body, &temp->body, 1);
497
498 if (parents) while (from->parent) {
499 info.type = from->parent->type;
500 info.http = from->parent->http;
501
502 temp->parent = php_http_message_init(NULL, 0 TSRMLS_CC);
503 php_http_message_set_info(temp->parent, &info);
504 zend_hash_copy(&temp->parent->hdrs, &from->parent->hdrs, (copy_ctor_func_t) zval_add_ref, NULL, sizeof(zval *));
505 php_http_message_body_copy(&from->parent->body, &temp->parent->body, 1);
506
507 temp = temp->parent;
508 from = from->parent;
509 }
510 }
511
512 return copy;
513 }
514
515 PHP_HTTP_API php_http_message_t *php_http_message_copy(php_http_message_t *from, php_http_message_t *to)
516 {
517 return php_http_message_copy_ex(from, to, 1);
518 }
519
520 PHP_HTTP_API void php_http_message_dtor(php_http_message_t *message)
521 {
522 if (message) {
523 zend_hash_destroy(&message->hdrs);
524 php_http_message_body_dtor(&message->body);
525
526 switch (message->type) {
527 case PHP_HTTP_REQUEST:
528 STR_SET(message->http.info.request.method, NULL);
529 STR_SET(message->http.info.request.url, NULL);
530 break;
531
532 case PHP_HTTP_RESPONSE:
533 STR_SET(message->http.info.response.status, NULL);
534 break;
535
536 default:
537 break;
538 }
539 }
540 }
541
542 PHP_HTTP_API void php_http_message_free(php_http_message_t **message)
543 {
544 if (*message) {
545 if ((*message)->parent) {
546 php_http_message_free(&(*message)->parent);
547 }
548 php_http_message_dtor(*message);
549 efree(*message);
550 *message = NULL;
551 }
552 }
553
554 #define PHP_HTTP_BEGIN_ARGS(method, req_args) PHP_HTTP_BEGIN_ARGS_EX(HttpMessage, method, 0, req_args)
555 #define PHP_HTTP_EMPTY_ARGS(method) PHP_HTTP_EMPTY_ARGS_EX(HttpMessage, method, 0)
556 #define PHP_HTTP_MESSAGE_ME(method, visibility) PHP_ME(HttpMessage, method, PHP_HTTP_ARGS(HttpMessage, method), visibility)
557
558 PHP_HTTP_BEGIN_ARGS(__construct, 0)
559 PHP_HTTP_ARG_VAL(message, 0)
560 PHP_HTTP_END_ARGS;
561
562 PHP_HTTP_EMPTY_ARGS(getBody);
563 PHP_HTTP_BEGIN_ARGS(setBody, 1)
564 PHP_HTTP_ARG_VAL(body, 0)
565 PHP_HTTP_END_ARGS;
566
567 PHP_HTTP_BEGIN_ARGS(addBody, 1)
568 PHP_HTTP_ARG_VAL(body, 0)
569 PHP_HTTP_END_ARGS;
570
571 PHP_HTTP_BEGIN_ARGS(getHeader, 1)
572 PHP_HTTP_ARG_VAL(header, 0)
573 PHP_HTTP_END_ARGS;
574
575 PHP_HTTP_BEGIN_ARGS(setHeader, 1)
576 PHP_HTTP_ARG_VAL(header, 0)
577 PHP_HTTP_ARG_VAL(value, 0)
578 PHP_HTTP_END_ARGS;
579
580 PHP_HTTP_BEGIN_ARGS(addHeader, 2)
581 PHP_HTTP_ARG_VAL(header, 0)
582 PHP_HTTP_ARG_VAL(value, 0)
583 PHP_HTTP_END_ARGS;
584
585 PHP_HTTP_EMPTY_ARGS(getHeaders);
586 PHP_HTTP_BEGIN_ARGS(setHeaders, 1)
587 PHP_HTTP_ARG_VAL(headers, 0)
588 PHP_HTTP_END_ARGS;
589
590 PHP_HTTP_BEGIN_ARGS(addHeaders, 1)
591 PHP_HTTP_ARG_VAL(headers, 0)
592 PHP_HTTP_ARG_VAL(append, 0)
593 PHP_HTTP_END_ARGS;
594
595 PHP_HTTP_EMPTY_ARGS(getType);
596 PHP_HTTP_BEGIN_ARGS(setType, 1)
597 PHP_HTTP_ARG_VAL(type, 0)
598 PHP_HTTP_END_ARGS;
599
600 PHP_HTTP_EMPTY_ARGS(getInfo);
601 PHP_HTTP_BEGIN_ARGS(setInfo, 1)
602 PHP_HTTP_ARG_VAL(http_info, 0)
603 PHP_HTTP_END_ARGS;
604
605 PHP_HTTP_EMPTY_ARGS(getResponseCode);
606 PHP_HTTP_BEGIN_ARGS(setResponseCode, 1)
607 PHP_HTTP_ARG_VAL(response_code, 0)
608 PHP_HTTP_END_ARGS;
609
610 PHP_HTTP_EMPTY_ARGS(getResponseStatus);
611 PHP_HTTP_BEGIN_ARGS(setResponseStatus, 1)
612 PHP_HTTP_ARG_VAL(response_status, 0)
613 PHP_HTTP_END_ARGS;
614
615 PHP_HTTP_EMPTY_ARGS(getRequestMethod);
616 PHP_HTTP_BEGIN_ARGS(setRequestMethod, 1)
617 PHP_HTTP_ARG_VAL(request_method, 0)
618 PHP_HTTP_END_ARGS;
619
620 PHP_HTTP_EMPTY_ARGS(getRequestUrl);
621 PHP_HTTP_BEGIN_ARGS(setRequestUrl, 1)
622 PHP_HTTP_ARG_VAL(url, 0)
623 PHP_HTTP_END_ARGS;
624
625 PHP_HTTP_EMPTY_ARGS(getHttpVersion);
626 PHP_HTTP_BEGIN_ARGS(setHttpVersion, 1)
627 PHP_HTTP_ARG_VAL(http_version, 0)
628 PHP_HTTP_END_ARGS;
629
630 PHP_HTTP_EMPTY_ARGS(getParentMessage);
631 PHP_HTTP_EMPTY_ARGS(__toString);
632 PHP_HTTP_BEGIN_ARGS(toString, 0)
633 PHP_HTTP_ARG_VAL(include_parent, 0)
634 PHP_HTTP_END_ARGS;
635 PHP_HTTP_BEGIN_ARGS(toCallback, 1)
636 PHP_HTTP_ARG_VAL(callback, 0)
637 PHP_HTTP_END_ARGS;
638 PHP_HTTP_BEGIN_ARGS(toStream, 1)
639 PHP_HTTP_ARG_VAL(stream, 0)
640 PHP_HTTP_END_ARGS;
641
642 PHP_HTTP_EMPTY_ARGS(count);
643
644 PHP_HTTP_EMPTY_ARGS(serialize);
645 PHP_HTTP_BEGIN_ARGS(unserialize, 1)
646 PHP_HTTP_ARG_VAL(serialized, 0)
647 PHP_HTTP_END_ARGS;
648
649 PHP_HTTP_EMPTY_ARGS(rewind);
650 PHP_HTTP_EMPTY_ARGS(valid);
651 PHP_HTTP_EMPTY_ARGS(key);
652 PHP_HTTP_EMPTY_ARGS(current);
653 PHP_HTTP_EMPTY_ARGS(next);
654
655 PHP_HTTP_EMPTY_ARGS(detach);
656 PHP_HTTP_BEGIN_ARGS(prepend, 1)
657 PHP_HTTP_ARG_OBJ(http\\Message, message, 0)
658 PHP_HTTP_END_ARGS;
659 PHP_HTTP_EMPTY_ARGS(reverse);
660
661 PHP_HTTP_BEGIN_ARGS(isMultipart, 0)
662 PHP_HTTP_ARG_VAL(boundary, 1)
663 PHP_HTTP_END_ARGS;
664 PHP_HTTP_EMPTY_ARGS(splitMultipartBody);
665
666 static zval *php_http_message_object_read_prop(zval *object, zval *member, int type, const zend_literal *literal_key TSRMLS_DC);
667 static void php_http_message_object_write_prop(zval *object, zval *member, zval *value, const zend_literal *literal_key TSRMLS_DC);
668 static zval **php_http_message_object_get_prop_ptr(zval *object, zval *member, const zend_literal *literal_key TSRMLS_DC);
669 static HashTable *php_http_message_object_get_props(zval *object TSRMLS_DC);
670
671 static zend_class_entry *php_http_message_class_entry;
672
673 zend_class_entry *php_http_message_get_class_entry(void)
674 {
675 return php_http_message_class_entry;
676 }
677
678 static zend_function_entry php_http_message_method_entry[] = {
679 PHP_HTTP_MESSAGE_ME(__construct, ZEND_ACC_PUBLIC|ZEND_ACC_CTOR)
680 PHP_HTTP_MESSAGE_ME(getBody, ZEND_ACC_PUBLIC)
681 PHP_HTTP_MESSAGE_ME(setBody, ZEND_ACC_PUBLIC)
682 PHP_HTTP_MESSAGE_ME(addBody, ZEND_ACC_PUBLIC)
683 PHP_HTTP_MESSAGE_ME(getHeader, ZEND_ACC_PUBLIC)
684 PHP_HTTP_MESSAGE_ME(setHeader, ZEND_ACC_PUBLIC)
685 PHP_HTTP_MESSAGE_ME(addHeader, ZEND_ACC_PUBLIC)
686 PHP_HTTP_MESSAGE_ME(getHeaders, ZEND_ACC_PUBLIC)
687 PHP_HTTP_MESSAGE_ME(setHeaders, ZEND_ACC_PUBLIC)
688 PHP_HTTP_MESSAGE_ME(addHeaders, ZEND_ACC_PUBLIC)
689 PHP_HTTP_MESSAGE_ME(getType, ZEND_ACC_PUBLIC)
690 PHP_HTTP_MESSAGE_ME(setType, ZEND_ACC_PUBLIC)
691 PHP_HTTP_MESSAGE_ME(getInfo, ZEND_ACC_PUBLIC)
692 PHP_HTTP_MESSAGE_ME(setInfo, ZEND_ACC_PUBLIC)
693 PHP_HTTP_MESSAGE_ME(getResponseCode, ZEND_ACC_PUBLIC)
694 PHP_HTTP_MESSAGE_ME(setResponseCode, ZEND_ACC_PUBLIC)
695 PHP_HTTP_MESSAGE_ME(getResponseStatus, ZEND_ACC_PUBLIC)
696 PHP_HTTP_MESSAGE_ME(setResponseStatus, ZEND_ACC_PUBLIC)
697 PHP_HTTP_MESSAGE_ME(getRequestMethod, ZEND_ACC_PUBLIC)
698 PHP_HTTP_MESSAGE_ME(setRequestMethod, ZEND_ACC_PUBLIC)
699 PHP_HTTP_MESSAGE_ME(getRequestUrl, ZEND_ACC_PUBLIC)
700 PHP_HTTP_MESSAGE_ME(setRequestUrl, ZEND_ACC_PUBLIC)
701 PHP_HTTP_MESSAGE_ME(getHttpVersion, ZEND_ACC_PUBLIC)
702 PHP_HTTP_MESSAGE_ME(setHttpVersion, ZEND_ACC_PUBLIC)
703 PHP_HTTP_MESSAGE_ME(getParentMessage, ZEND_ACC_PUBLIC)
704 PHP_HTTP_MESSAGE_ME(toString, ZEND_ACC_PUBLIC)
705 PHP_HTTP_MESSAGE_ME(toCallback, ZEND_ACC_PUBLIC)
706 PHP_HTTP_MESSAGE_ME(toStream, ZEND_ACC_PUBLIC)
707
708 /* implements Countable */
709 PHP_HTTP_MESSAGE_ME(count, ZEND_ACC_PUBLIC)
710
711 /* implements Serializable */
712 PHP_HTTP_MESSAGE_ME(serialize, ZEND_ACC_PUBLIC)
713 PHP_HTTP_MESSAGE_ME(unserialize, ZEND_ACC_PUBLIC)
714
715 /* implements Iterator */
716 PHP_HTTP_MESSAGE_ME(rewind, ZEND_ACC_PUBLIC)
717 PHP_HTTP_MESSAGE_ME(valid, ZEND_ACC_PUBLIC)
718 PHP_HTTP_MESSAGE_ME(current, ZEND_ACC_PUBLIC)
719 PHP_HTTP_MESSAGE_ME(key, ZEND_ACC_PUBLIC)
720 PHP_HTTP_MESSAGE_ME(next, ZEND_ACC_PUBLIC)
721
722 ZEND_MALIAS(HttpMessage, __toString, toString, PHP_HTTP_ARGS(HttpMessage, __toString), ZEND_ACC_PUBLIC)
723
724 PHP_HTTP_MESSAGE_ME(detach, ZEND_ACC_PUBLIC)
725 PHP_HTTP_MESSAGE_ME(prepend, ZEND_ACC_PUBLIC)
726 PHP_HTTP_MESSAGE_ME(reverse, ZEND_ACC_PUBLIC)
727
728 PHP_HTTP_MESSAGE_ME(isMultipart, ZEND_ACC_PUBLIC)
729 PHP_HTTP_MESSAGE_ME(splitMultipartBody, ZEND_ACC_PUBLIC)
730
731 EMPTY_FUNCTION_ENTRY
732 };
733 static zend_object_handlers php_http_message_object_handlers;
734 static HashTable php_http_message_object_prophandlers;
735
736 typedef void (*php_http_message_object_prophandler_func_t)(php_http_message_object_t *o, zval *v TSRMLS_DC);
737
738 typedef struct php_http_message_object_prophandler {
739 php_http_message_object_prophandler_func_t read;
740 php_http_message_object_prophandler_func_t write;
741 } php_http_message_object_prophandler_t;
742
743 static STATUS php_http_message_object_add_prophandler(const char *prop_str, size_t prop_len, php_http_message_object_prophandler_func_t read, php_http_message_object_prophandler_func_t write) {
744 php_http_message_object_prophandler_t h = { read, write };
745 return zend_hash_add(&php_http_message_object_prophandlers, prop_str, prop_len + 1, (void *) &h, sizeof(h), NULL);
746 }
747 /*
748 static int php_http_message_object_has_prophandler(const char *prop_str, size_t prop_len) {
749 return zend_hash_exists(&php_http_message_object_prophandlers, prop_str, prop_len + 1);
750 }
751 */
752 static STATUS php_http_message_object_get_prophandler(const char *prop_str, size_t prop_len, php_http_message_object_prophandler_t **handler) {
753 return zend_hash_find(&php_http_message_object_prophandlers, prop_str, prop_len + 1, (void *) handler);
754 }
755 static void php_http_message_object_prophandler_get_type(php_http_message_object_t *obj, zval *return_value TSRMLS_DC) {
756 RETVAL_LONG(obj->message->type);
757 }
758 static void php_http_message_object_prophandler_set_type(php_http_message_object_t *obj, zval *value TSRMLS_DC) {
759 zval *cpy = php_http_ztyp(IS_LONG, value);
760 php_http_message_set_type(obj->message, Z_LVAL_P(cpy));
761 zval_ptr_dtor(&cpy);
762 }
763 static void php_http_message_object_prophandler_get_request_method(php_http_message_object_t *obj, zval *return_value TSRMLS_DC) {
764 if (PHP_HTTP_MESSAGE_TYPE(REQUEST, obj->message) && obj->message->http.info.request.method) {
765 RETVAL_STRING(obj->message->http.info.request.method, 1);
766 } else {
767 RETVAL_NULL();
768 }
769 }
770 static void php_http_message_object_prophandler_set_request_method(php_http_message_object_t *obj, zval *value TSRMLS_DC) {
771 if (PHP_HTTP_MESSAGE_TYPE(REQUEST, obj->message)) {
772 zval *cpy = php_http_ztyp(IS_STRING, value);
773 STR_SET(obj->message->http.info.request.method, estrndup(Z_STRVAL_P(cpy), Z_STRLEN_P(cpy)));
774 zval_ptr_dtor(&cpy);
775 }
776 }
777 static void php_http_message_object_prophandler_get_request_url(php_http_message_object_t *obj, zval *return_value TSRMLS_DC) {
778 if (PHP_HTTP_MESSAGE_TYPE(REQUEST, obj->message) && obj->message->http.info.request.url) {
779 RETVAL_STRING(obj->message->http.info.request.url, 1);
780 } else {
781 RETVAL_NULL();
782 }
783 }
784 static void php_http_message_object_prophandler_set_request_url(php_http_message_object_t *obj, zval *value TSRMLS_DC) {
785 if (PHP_HTTP_MESSAGE_TYPE(REQUEST, obj->message)) {
786 zval *cpy = php_http_ztyp(IS_STRING, value);
787 STR_SET(obj->message->http.info.request.url, estrndup(Z_STRVAL_P(cpy), Z_STRLEN_P(cpy)));
788 zval_ptr_dtor(&cpy);
789 }
790 }
791 static void php_http_message_object_prophandler_get_response_status(php_http_message_object_t *obj, zval *return_value TSRMLS_DC) {
792 if (PHP_HTTP_MESSAGE_TYPE(RESPONSE, obj->message) && obj->message->http.info.response.status) {
793 RETVAL_STRING(obj->message->http.info.response.status, 1);
794 } else {
795 RETVAL_NULL();
796 }
797 }
798 static void php_http_message_object_prophandler_set_response_status(php_http_message_object_t *obj, zval *value TSRMLS_DC) {
799 if (PHP_HTTP_MESSAGE_TYPE(RESPONSE, obj->message)) {
800 zval *cpy = php_http_ztyp(IS_STRING, value);
801 STR_SET(obj->message->http.info.response.status, estrndup(Z_STRVAL_P(cpy), Z_STRLEN_P(cpy)));
802 zval_ptr_dtor(&cpy);
803 }
804 }
805 static void php_http_message_object_prophandler_get_response_code(php_http_message_object_t *obj, zval *return_value TSRMLS_DC) {
806 if (PHP_HTTP_MESSAGE_TYPE(RESPONSE, obj->message)) {
807 RETVAL_LONG(obj->message->http.info.response.code);
808 } else {
809 RETVAL_NULL();
810 }
811 }
812 static void php_http_message_object_prophandler_set_response_code(php_http_message_object_t *obj, zval *value TSRMLS_DC) {
813 if (PHP_HTTP_MESSAGE_TYPE(RESPONSE, obj->message)) {
814 zval *cpy = php_http_ztyp(IS_LONG, value);
815 obj->message->http.info.response.code = Z_LVAL_P(cpy);
816 STR_SET(obj->message->http.info.response.status, estrdup(php_http_env_get_response_status_for_code(obj->message->http.info.response.code)));
817 zval_ptr_dtor(&cpy);
818 }
819 }
820 static void php_http_message_object_prophandler_get_http_version(php_http_message_object_t *obj, zval *return_value TSRMLS_DC) {
821 char *version_str;
822 size_t version_len;
823
824 php_http_version_to_string(&obj->message->http.version, &version_str, &version_len, NULL, NULL TSRMLS_CC);
825 RETVAL_STRINGL(version_str, version_len, 0);
826 }
827 static void php_http_message_object_prophandler_set_http_version(php_http_message_object_t *obj, zval *value TSRMLS_DC) {
828 zval *cpy = php_http_ztyp(IS_STRING, value);
829 php_http_version_parse(&obj->message->http.version, Z_STRVAL_P(cpy) TSRMLS_CC);
830 zval_ptr_dtor(&cpy);
831 }
832 static void php_http_message_object_prophandler_get_headers(php_http_message_object_t *obj, zval *return_value TSRMLS_DC) {
833 array_init(return_value);
834 zend_hash_copy(Z_ARRVAL_P(return_value), &obj->message->hdrs, (copy_ctor_func_t) zval_add_ref, NULL, sizeof(zval *));
835 }
836 static void php_http_message_object_prophandler_set_headers(php_http_message_object_t *obj, zval *value TSRMLS_DC) {
837 zval *cpy = php_http_ztyp(IS_ARRAY, value);
838
839 zend_hash_clean(&obj->message->hdrs);
840 zend_hash_copy(&obj->message->hdrs, Z_ARRVAL_P(cpy), (copy_ctor_func_t) zval_add_ref, NULL, sizeof(zval *));
841 zval_ptr_dtor(&cpy);
842 }
843 static void php_http_message_object_prophandler_get_body(php_http_message_object_t *obj, zval *return_value TSRMLS_DC) {
844 if (obj->body.handle) {
845 RETVAL_OBJVAL(obj->body, 1);
846 } else {
847 RETVAL_NULL();
848 }
849 }
850 static void php_http_message_object_prophandler_set_body(php_http_message_object_t *obj, zval *value TSRMLS_DC) {
851 php_http_message_object_set_body(obj, value TSRMLS_CC);
852 }
853 static void php_http_message_object_prophandler_get_parent_message(php_http_message_object_t *obj, zval *return_value TSRMLS_DC) {
854 if (obj->message->parent) {
855 RETVAL_OBJVAL(obj->parent, 1);
856 } else {
857 RETVAL_NULL();
858 }
859 }
860 static void php_http_message_object_prophandler_set_parent_message(php_http_message_object_t *obj, zval *value TSRMLS_DC) {
861 if (Z_TYPE_P(value) == IS_OBJECT && instanceof_function(Z_OBJCE_P(value), php_http_message_class_entry TSRMLS_CC)) {
862 if (obj->message->parent) {
863 zend_objects_store_del_ref_by_handle(obj->parent.handle TSRMLS_CC);
864 }
865 Z_OBJ_ADDREF_P(value);
866 obj->parent = Z_OBJVAL_P(value);
867 }
868 }
869
870 PHP_MINIT_FUNCTION(http_message)
871 {
872 PHP_HTTP_REGISTER_CLASS(http, Message, http_message, php_http_object_get_class_entry(), 0);
873 php_http_message_class_entry->create_object = php_http_message_object_new;
874 memcpy(&php_http_message_object_handlers, zend_get_std_object_handlers(), sizeof(zend_object_handlers));
875 php_http_message_object_handlers.clone_obj = php_http_message_object_clone;
876 php_http_message_object_handlers.read_property = php_http_message_object_read_prop;
877 php_http_message_object_handlers.write_property = php_http_message_object_write_prop;
878 php_http_message_object_handlers.get_properties = php_http_message_object_get_props;
879 php_http_message_object_handlers.get_property_ptr_ptr = php_http_message_object_get_prop_ptr;
880
881 zend_class_implements(php_http_message_class_entry TSRMLS_CC, 3, spl_ce_Countable, zend_ce_serializable, zend_ce_iterator);
882
883 zend_hash_init(&php_http_message_object_prophandlers, 9, NULL, NULL, 1);
884 zend_declare_property_long(php_http_message_class_entry, ZEND_STRL("type"), PHP_HTTP_NONE, ZEND_ACC_PROTECTED TSRMLS_CC);
885 php_http_message_object_add_prophandler(ZEND_STRL("type"), php_http_message_object_prophandler_get_type, php_http_message_object_prophandler_set_type);
886 zend_declare_property_string(php_http_message_class_entry, ZEND_STRL("body"), "", ZEND_ACC_PROTECTED TSRMLS_CC);
887 php_http_message_object_add_prophandler(ZEND_STRL("body"), php_http_message_object_prophandler_get_body, php_http_message_object_prophandler_set_body);
888 zend_declare_property_string(php_http_message_class_entry, ZEND_STRL("requestMethod"), "", ZEND_ACC_PROTECTED TSRMLS_CC);
889 php_http_message_object_add_prophandler(ZEND_STRL("requestMethod"), php_http_message_object_prophandler_get_request_method, php_http_message_object_prophandler_set_request_method);
890 zend_declare_property_string(php_http_message_class_entry, ZEND_STRL("requestUrl"), "", ZEND_ACC_PROTECTED TSRMLS_CC);
891 php_http_message_object_add_prophandler(ZEND_STRL("requestUrl"), php_http_message_object_prophandler_get_request_url, php_http_message_object_prophandler_set_request_url);
892 zend_declare_property_string(php_http_message_class_entry, ZEND_STRL("responseStatus"), "", ZEND_ACC_PROTECTED TSRMLS_CC);
893 php_http_message_object_add_prophandler(ZEND_STRL("responseStatus"), php_http_message_object_prophandler_get_response_status, php_http_message_object_prophandler_set_response_status);
894 zend_declare_property_long(php_http_message_class_entry, ZEND_STRL("responseCode"), 0, ZEND_ACC_PROTECTED TSRMLS_CC);
895 php_http_message_object_add_prophandler(ZEND_STRL("responseCode"), php_http_message_object_prophandler_get_response_code, php_http_message_object_prophandler_set_response_code);
896 zend_declare_property_null(php_http_message_class_entry, ZEND_STRL("httpVersion"), ZEND_ACC_PROTECTED TSRMLS_CC);
897 php_http_message_object_add_prophandler(ZEND_STRL("httpVersion"), php_http_message_object_prophandler_get_http_version, php_http_message_object_prophandler_set_http_version);
898 zend_declare_property_null(php_http_message_class_entry, ZEND_STRL("headers"), ZEND_ACC_PROTECTED TSRMLS_CC);
899 php_http_message_object_add_prophandler(ZEND_STRL("headers"), php_http_message_object_prophandler_get_headers, php_http_message_object_prophandler_set_headers);
900 zend_declare_property_null(php_http_message_class_entry, ZEND_STRL("parentMessage"), ZEND_ACC_PROTECTED TSRMLS_CC);
901 php_http_message_object_add_prophandler(ZEND_STRL("parentMessage"), php_http_message_object_prophandler_get_parent_message, php_http_message_object_prophandler_set_parent_message);
902
903 zend_declare_class_constant_long(php_http_message_class_entry, ZEND_STRL("TYPE_NONE"), PHP_HTTP_NONE TSRMLS_CC);
904 zend_declare_class_constant_long(php_http_message_class_entry, ZEND_STRL("TYPE_REQUEST"), PHP_HTTP_REQUEST TSRMLS_CC);
905 zend_declare_class_constant_long(php_http_message_class_entry, ZEND_STRL("TYPE_RESPONSE"), PHP_HTTP_RESPONSE TSRMLS_CC);
906
907 return SUCCESS;
908 }
909
910 PHP_MSHUTDOWN_FUNCTION(http_message)
911 {
912 zend_hash_destroy(&php_http_message_object_prophandlers);
913
914 return SUCCESS;
915 }
916
917 void php_http_message_object_reverse(zval *this_ptr, zval *return_value TSRMLS_DC)
918 {
919 int i = 0;
920 php_http_message_object_t *obj = zend_object_store_get_object(getThis() TSRMLS_CC);
921
922 /* count */
923 php_http_message_count(i, obj->message);
924
925 if (i > 1) {
926 zend_object_value *ovalues = NULL;
927 php_http_message_object_t **objects = NULL;
928 int last = i - 1;
929
930 objects = ecalloc(i, sizeof(**objects));
931 ovalues = ecalloc(i, sizeof(*ovalues));
932
933 /* we are the first message */
934 objects[0] = obj;
935 ovalues[0] = getThis()->value.obj;
936
937 /* fetch parents */
938 for (i = 1; obj->parent.handle; ++i) {
939 ovalues[i] = obj->parent;
940 objects[i] = obj = zend_object_store_get_object_by_handle(obj->parent.handle TSRMLS_CC);
941 }
942
943 /* reorder parents */
944 for (last = --i; i; --i) {
945 objects[i]->message->parent = objects[i-1]->message;
946 objects[i]->parent = ovalues[i-1];
947 }
948
949 objects[0]->message->parent = NULL;
950 objects[0]->parent.handle = 0;
951 objects[0]->parent.handlers = NULL;
952
953 /* add ref, because we previously have not been a parent message */
954 Z_OBJ_ADDREF_P(getThis());
955 RETVAL_OBJVAL(ovalues[last], 1);
956
957 efree(objects);
958 efree(ovalues);
959 } else {
960 RETURN_ZVAL(getThis(), 1, 0);
961 }
962 }
963
964 void php_http_message_object_prepend(zval *this_ptr, zval *prepend, zend_bool top TSRMLS_DC)
965 {
966 zval m;
967 php_http_message_t *save_parent_msg = NULL;
968 zend_object_value save_parent_obj = {0, NULL};
969 php_http_message_object_t *obj = zend_object_store_get_object(this_ptr TSRMLS_CC);
970 php_http_message_object_t *prepend_obj = zend_object_store_get_object(prepend TSRMLS_CC);
971
972 INIT_PZVAL(&m);
973 m.type = IS_OBJECT;
974
975 if (!top) {
976 save_parent_obj = obj->parent;
977 save_parent_msg = obj->message->parent;
978 } else {
979 /* iterate to the most parent object */
980 while (obj->parent.handle) {
981 m.value.obj = obj->parent;
982 obj = zend_object_store_get_object(&m TSRMLS_CC);
983 }
984 }
985
986 /* prepend */
987 obj->parent = prepend->value.obj;
988 obj->message->parent = prepend_obj->message;
989
990 /* add ref */
991 zend_objects_store_add_ref(prepend TSRMLS_CC);
992 while (prepend_obj->parent.handle) {
993 m.value.obj = prepend_obj->parent;
994 zend_objects_store_add_ref(&m TSRMLS_CC);
995 prepend_obj = zend_object_store_get_object(&m TSRMLS_CC);
996 }
997
998 if (!top) {
999 prepend_obj->parent = save_parent_obj;
1000 prepend_obj->message->parent = save_parent_msg;
1001 }
1002 }
1003
1004 STATUS php_http_message_object_set_body(php_http_message_object_t *msg_obj, zval *zbody TSRMLS_DC)
1005 {
1006 zval *tmp = NULL;
1007 php_stream *s;
1008 zend_object_value ov;
1009 php_http_message_body_t *body;
1010 php_http_message_body_object_t *body_obj;
1011
1012 switch (Z_TYPE_P(zbody)) {
1013 case IS_RESOURCE:
1014 php_stream_from_zval_no_verify(s, &zbody);
1015 if (!s) {
1016 php_http_error(HE_THROW, PHP_HTTP_E_CLIENT, "not a valid stream resource");
1017 return FAILURE;
1018 }
1019
1020 is_resource:
1021
1022 body = php_http_message_body_init(NULL, s TSRMLS_CC);
1023 if (SUCCESS != php_http_new(&ov, php_http_message_body_get_class_entry(), (php_http_new_t) php_http_message_body_object_new_ex, NULL, body, NULL TSRMLS_CC)) {
1024 php_http_message_body_free(&body);
1025 return FAILURE;
1026 }
1027 MAKE_STD_ZVAL(tmp);
1028 ZVAL_OBJVAL(tmp, ov, 0);
1029 zbody = tmp;
1030 break;
1031
1032 case IS_OBJECT:
1033 if (instanceof_function(Z_OBJCE_P(zbody), php_http_message_body_get_class_entry() TSRMLS_CC)) {
1034 Z_OBJ_ADDREF_P(zbody);
1035 break;
1036 }
1037 /* no break */
1038
1039 default:
1040 tmp = php_http_ztyp(IS_STRING, zbody);
1041 s = php_stream_temp_new();
1042 php_stream_write(s, Z_STRVAL_P(tmp), Z_STRLEN_P(tmp));
1043 zval_ptr_dtor(&tmp);
1044 tmp = NULL;
1045 goto is_resource;
1046
1047 }
1048
1049 body_obj = zend_object_store_get_object(zbody TSRMLS_CC);
1050
1051 if (msg_obj->body.handle) {
1052 zend_objects_store_del_ref_by_handle(msg_obj->body.handle TSRMLS_CC);
1053 php_http_message_body_dtor(&msg_obj->message->body);
1054 }
1055
1056 php_http_message_body_copy(body_obj->body, &msg_obj->message->body, 0);
1057 msg_obj->body = Z_OBJVAL_P(zbody);
1058
1059 if (tmp) {
1060 zval_ptr_dtor(&tmp);
1061 }
1062
1063 return SUCCESS;
1064 }
1065
1066 zend_object_value php_http_message_object_new(zend_class_entry *ce TSRMLS_DC)
1067 {
1068 return php_http_message_object_new_ex(ce, NULL, NULL TSRMLS_CC);
1069 }
1070
1071 zend_object_value php_http_message_object_new_ex(zend_class_entry *ce, php_http_message_t *msg, php_http_message_object_t **ptr TSRMLS_DC)
1072 {
1073 zend_object_value ov;
1074 php_http_message_object_t *o;
1075
1076 o = ecalloc(1, sizeof(php_http_message_object_t));
1077 zend_object_std_init((zend_object *) o, ce TSRMLS_CC);
1078 object_properties_init((zend_object *) o, ce);
1079
1080 if (ptr) {
1081 *ptr = o;
1082 }
1083
1084 if (msg) {
1085 o->message = msg;
1086 if (msg->parent) {
1087 o->parent = php_http_message_object_new_ex(ce, msg->parent, NULL TSRMLS_CC);
1088 }
1089 o->body = php_http_message_body_object_new_ex(php_http_message_body_get_class_entry(), php_http_message_body_copy(&msg->body, NULL, 0), NULL TSRMLS_CC);
1090 }
1091
1092 ov.handle = zend_objects_store_put((zend_object *) o, NULL, php_http_message_object_free, NULL TSRMLS_CC);
1093 ov.handlers = &php_http_message_object_handlers;
1094
1095 return ov;
1096 }
1097
1098 zend_object_value php_http_message_object_clone(zval *this_ptr TSRMLS_DC)
1099 {
1100 zend_object_value new_ov;
1101 php_http_message_object_t *new_obj = NULL;
1102 php_http_message_object_t *old_obj = zend_object_store_get_object(this_ptr TSRMLS_CC);
1103
1104 new_ov = php_http_message_object_new_ex(old_obj->zo.ce, php_http_message_copy(old_obj->message, NULL), &new_obj TSRMLS_CC);
1105 zend_objects_clone_members(&new_obj->zo, new_ov, &old_obj->zo, Z_OBJ_HANDLE_P(this_ptr) TSRMLS_CC);
1106
1107 return new_ov;
1108 }
1109
1110 void php_http_message_object_free(void *object TSRMLS_DC)
1111 {
1112 php_http_message_object_t *o = (php_http_message_object_t *) object;
1113
1114 if (o->iterator) {
1115 zval_ptr_dtor(&o->iterator);
1116 o->iterator = NULL;
1117 }
1118 if (o->message) {
1119 /* do NOT free recursivly */
1120 php_http_message_dtor(o->message);
1121 efree(o->message);
1122 o->message = NULL;
1123 }
1124 if (o->parent.handle) {
1125 zend_objects_store_del_ref_by_handle(o->parent.handle TSRMLS_CC);
1126 }
1127 if (o->body.handle) {
1128 zend_objects_store_del_ref_by_handle(o->body.handle TSRMLS_CC);
1129 }
1130 zend_object_std_dtor((zend_object *) o TSRMLS_CC);
1131 efree(o);
1132 }
1133
1134
1135 static zval **php_http_message_object_get_prop_ptr(zval *object, zval *member, const zend_literal *literal_key TSRMLS_DC)
1136 {
1137 php_http_message_object_prophandler_t *handler;
1138 zval *copy = php_http_ztyp(IS_STRING, member);
1139
1140 if (SUCCESS == php_http_message_object_get_prophandler(Z_STRVAL_P(copy), Z_STRLEN_P(copy), &handler)) {
1141 zval_ptr_dtor(&copy);
1142 return &php_http_property_proxy_init(NULL, object, member, NULL TSRMLS_CC)->myself;
1143 }
1144 zval_ptr_dtor(&copy);
1145
1146 return zend_get_std_object_handlers()->get_property_ptr_ptr(object, member, literal_key TSRMLS_CC);
1147 }
1148
1149 static zval *php_http_message_object_read_prop(zval *object, zval *member, int type, const zend_literal *literal_key TSRMLS_DC)
1150 {
1151 php_http_message_object_t *obj = zend_object_store_get_object(object TSRMLS_CC);
1152 php_http_message_object_prophandler_t *handler;
1153 zval *return_value, *copy = php_http_ztyp(IS_STRING, member);
1154
1155 if (SUCCESS == php_http_message_object_get_prophandler(Z_STRVAL_P(copy), Z_STRLEN_P(copy), &handler)) {
1156 if (type == BP_VAR_R) {
1157 ALLOC_ZVAL(return_value);
1158 Z_SET_REFCOUNT_P(return_value, 0);
1159 Z_UNSET_ISREF_P(return_value);
1160
1161 handler->read(obj, return_value TSRMLS_CC);
1162 } else {
1163 zend_error(E_ERROR, "Cannot access HttpMessage properties by reference or array key/index");
1164 return_value = NULL;
1165 }
1166 } else {
1167 return_value = zend_get_std_object_handlers()->read_property(object, member, type, literal_key TSRMLS_CC);
1168 }
1169
1170 zval_ptr_dtor(&copy);
1171
1172 return return_value;
1173 }
1174
1175 static void php_http_message_object_write_prop(zval *object, zval *member, zval *value, const zend_literal *literal_key TSRMLS_DC)
1176 {
1177 php_http_message_object_t *obj = zend_object_store_get_object(object TSRMLS_CC);
1178 php_http_message_object_prophandler_t *handler;
1179 zval *copy = php_http_ztyp(IS_STRING, member);
1180
1181 if (SUCCESS == php_http_message_object_get_prophandler(Z_STRVAL_P(copy), Z_STRLEN_P(copy), &handler)) {
1182 handler->write(obj, value TSRMLS_CC);
1183 } else {
1184 zend_get_std_object_handlers()->write_property(object, member, value, literal_key TSRMLS_CC);
1185 }
1186
1187 zval_ptr_dtor(&copy);
1188 }
1189
1190
1191 static HashTable *php_http_message_object_get_props(zval *object TSRMLS_DC)
1192 {
1193 zval *headers;
1194 php_http_message_object_t *obj = zend_object_store_get_object(object TSRMLS_CC);
1195 php_http_message_t *msg = obj->message;
1196 HashTable *props = zend_get_std_object_handlers()->get_properties(object TSRMLS_CC);
1197 zval array, *parent, *body;
1198 char *version;
1199
1200 INIT_PZVAL_ARRAY(&array, props);
1201
1202 #define ASSOC_PROP(array, ptype, name, val) \
1203 { \
1204 char *m_prop_name; \
1205 int m_prop_len; \
1206 zend_mangle_property_name(&m_prop_name, &m_prop_len, "*", 1, name, lenof(name), 0); \
1207 add_assoc_ ##ptype## _ex(&array, m_prop_name, sizeof(name)+3, val); \
1208 efree(m_prop_name); \
1209 }
1210 #define ASSOC_STRING(array, name, val) ASSOC_STRINGL(array, name, val, strlen(val))
1211 #define ASSOC_STRINGL(array, name, val, len) ASSOC_STRINGL_EX(array, name, val, len, 1)
1212 #define ASSOC_STRINGL_EX(array, name, val, len, cpy) \
1213 { \
1214 char *m_prop_name; \
1215 int m_prop_len; \
1216 zend_mangle_property_name(&m_prop_name, &m_prop_len, "*", 1, name, lenof(name), 0); \
1217 add_assoc_stringl_ex(&array, m_prop_name, sizeof(name)+3, val, len, cpy); \
1218 efree(m_prop_name); \
1219 }
1220
1221 ASSOC_PROP(array, long, "type", msg->type);
1222 ASSOC_STRINGL_EX(array, "httpVersion", version, spprintf(&version, 0, "%u.%u", msg->http.version.major, msg->http.version.minor), 0);
1223
1224 switch (msg->type) {
1225 case PHP_HTTP_REQUEST:
1226 ASSOC_PROP(array, long, "responseCode", 0);
1227 ASSOC_STRINGL(array, "responseStatus", "", 0);
1228 ASSOC_STRING(array, "requestMethod", STR_PTR(msg->http.info.request.method));
1229 ASSOC_STRING(array, "requestUrl", STR_PTR(msg->http.info.request.url));
1230 break;
1231
1232 case PHP_HTTP_RESPONSE:
1233 ASSOC_PROP(array, long, "responseCode", msg->http.info.response.code);
1234 ASSOC_STRING(array, "responseStatus", STR_PTR(msg->http.info.response.status));
1235 ASSOC_STRINGL(array, "requestMethod", "", 0);
1236 ASSOC_STRINGL(array, "requestUrl", "", 0);
1237 break;
1238
1239 case PHP_HTTP_NONE:
1240 default:
1241 ASSOC_PROP(array, long, "responseCode", 0);
1242 ASSOC_STRINGL(array, "responseStatus", "", 0);
1243 ASSOC_STRINGL(array, "requestMethod", "", 0);
1244 ASSOC_STRINGL(array, "requestUrl", "", 0);
1245 break;
1246 }
1247
1248 MAKE_STD_ZVAL(headers);
1249 array_init(headers);
1250 zend_hash_copy(Z_ARRVAL_P(headers), &msg->hdrs, (copy_ctor_func_t) zval_add_ref, NULL, sizeof(zval *));
1251 ASSOC_PROP(array, zval, "headers", headers);
1252
1253 MAKE_STD_ZVAL(body);
1254 if (!obj->body.handle) {
1255 php_http_new(&obj->body, php_http_message_body_get_class_entry(), (php_http_new_t) php_http_message_body_object_new_ex, NULL, (void *) php_http_message_body_copy(&obj->message->body, NULL, 0), NULL TSRMLS_CC);
1256 }
1257 ZVAL_OBJVAL(body, obj->body, 1);
1258 ASSOC_PROP(array, zval, "body", body);
1259
1260 MAKE_STD_ZVAL(parent);
1261 if (msg->parent) {
1262 ZVAL_OBJVAL(parent, obj->parent, 1);
1263 } else {
1264 ZVAL_NULL(parent);
1265 }
1266 ASSOC_PROP(array, zval, "parentMessage", parent);
1267
1268 return props;
1269 }
1270
1271 /* PHP */
1272
1273 PHP_METHOD(HttpMessage, __construct)
1274 {
1275 zval *zmessage = NULL;
1276 php_http_message_t *msg = NULL;
1277 php_http_message_object_t *obj = zend_object_store_get_object(getThis() TSRMLS_CC);
1278
1279 with_error_handling(EH_THROW, php_http_exception_get_class_entry()) {
1280 if (SUCCESS == zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "|z!", &zmessage) && zmessage) {
1281 if (Z_TYPE_P(zmessage) == IS_RESOURCE) {
1282 php_stream *s;
1283 php_http_message_parser_t p;
1284
1285 php_stream_from_zval(s, &zmessage);
1286 if (s && php_http_message_parser_init(&p TSRMLS_CC)) {
1287 php_http_message_parser_parse_stream(&p, s, &msg);
1288 php_http_message_parser_dtor(&p);
1289 }
1290 } else {
1291 zmessage = php_http_ztyp(IS_STRING, zmessage);
1292 msg = php_http_message_parse(NULL, Z_STRVAL_P(zmessage), Z_STRLEN_P(zmessage) TSRMLS_CC);
1293 zval_ptr_dtor(&zmessage);
1294 }
1295
1296 if (msg) {
1297 php_http_message_dtor(obj->message);
1298 obj->message = msg;
1299 if (obj->message->parent) {
1300 obj->parent = php_http_message_object_new_ex(Z_OBJCE_P(getThis()), obj->message->parent, NULL TSRMLS_CC);
1301 }
1302 } else {
1303 php_http_error(HE_THROW, PHP_HTTP_E_MESSAGE, "could not parse message: %.*s", 25, Z_STRVAL_P(zmessage));
1304 }
1305 }
1306 if (!obj->message) {
1307 obj->message = php_http_message_init(NULL, 0 TSRMLS_CC);
1308 }
1309 } end_error_handling();
1310
1311 }
1312
1313 PHP_METHOD(HttpMessage, getBody)
1314 {
1315 with_error_handling(EH_THROW, php_http_exception_get_class_entry()) {
1316 if (SUCCESS == zend_parse_parameters_none()) {
1317 php_http_message_object_t *obj = zend_object_store_get_object(getThis() TSRMLS_CC);
1318
1319 if (!obj->message) {
1320 obj->message = php_http_message_init(NULL, 0 TSRMLS_CC);
1321 }
1322
1323 if (obj->body.handle || SUCCESS == php_http_new(&obj->body, php_http_message_body_get_class_entry(), (php_http_new_t) php_http_message_body_object_new_ex, NULL, (void *) php_http_message_body_copy(&obj->message->body, NULL, 0), NULL TSRMLS_CC)) {
1324 RETVAL_OBJVAL(obj->body, 1);
1325 }
1326 }
1327 } end_error_handling();
1328 }
1329
1330 PHP_METHOD(HttpMessage, setBody)
1331 {
1332 zval *zbody;
1333
1334 if (SUCCESS == zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "O", &zbody, php_http_message_body_get_class_entry())) {
1335 php_http_message_object_t *obj = zend_object_store_get_object(getThis() TSRMLS_CC);
1336 php_http_message_body_object_t *body_obj = zend_object_store_get_object(zbody TSRMLS_CC);
1337
1338 if (!obj->message) {
1339 obj->message = php_http_message_init(NULL, 0 TSRMLS_CC);
1340 }
1341 php_http_message_object_prophandler_set_body(obj, zbody TSRMLS_CC);
1342 }
1343 RETVAL_ZVAL(getThis(), 1, 0);
1344 }
1345
1346 PHP_METHOD(HttpMessage, addBody)
1347 {
1348 zval *new_body;
1349
1350 if (SUCCESS == zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "O", &new_body, php_http_message_body_get_class_entry())) {
1351 php_http_message_body_object_t *old_obj = zend_object_store_get_object(getThis() TSRMLS_CC);
1352 php_http_message_body_object_t *new_obj = zend_object_store_get_object(new_body TSRMLS_CC);
1353
1354 php_http_message_body_to_callback(old_obj->body, (php_http_pass_callback_t) php_http_message_body_append, new_obj->body, 0, 0);
1355 }
1356 RETVAL_ZVAL(getThis(), 1, 0);
1357 }
1358
1359
1360 PHP_METHOD(HttpMessage, getHeader)
1361 {
1362 char *header_str;
1363 int header_len;
1364
1365 if (SUCCESS == zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "s", &header_str, &header_len)) {
1366 php_http_message_object_t *obj = zend_object_store_get_object(getThis() TSRMLS_CC);
1367 zval *header;
1368
1369 if (!obj->message) {
1370 obj->message = php_http_message_init(NULL, 0 TSRMLS_CC);
1371 }
1372
1373 if ((header = php_http_message_header(obj->message, header_str, header_len, 0))) {
1374 RETURN_ZVAL(header, 1, 1);
1375 }
1376 }
1377 RETURN_FALSE;
1378 }
1379
1380 PHP_METHOD(HttpMessage, getHeaders)
1381 {
1382 if (SUCCESS == zend_parse_parameters_none()) {
1383 php_http_message_object_t *obj = zend_object_store_get_object(getThis() TSRMLS_CC);
1384
1385 if (!obj->message) {
1386 obj->message = php_http_message_init(NULL, 0 TSRMLS_CC);
1387 }
1388
1389 array_init(return_value);
1390 array_copy(&obj->message->hdrs, Z_ARRVAL_P(return_value));
1391 }
1392 }
1393
1394 PHP_METHOD(HttpMessage, setHeader)
1395 {
1396 zval *zvalue = NULL;
1397 char *name_str;
1398 int name_len;
1399
1400 if (SUCCESS == zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "s|z!", &name_str, &name_len, &zvalue)) {
1401 php_http_message_object_t *obj = zend_object_store_get_object(getThis() TSRMLS_CC);
1402 char *name = php_http_pretty_key(estrndup(name_str, name_len), name_len, 1, 1);
1403
1404 if (!obj->message) {
1405 obj->message = php_http_message_init(NULL, 0 TSRMLS_CC);
1406 }
1407
1408 if (!zvalue) {
1409 zend_symtable_del(&obj->message->hdrs, name, name_len + 1);
1410 } else {
1411 Z_ADDREF_P(zvalue);
1412 zend_symtable_update(&obj->message->hdrs, name, name_len + 1, &zvalue, sizeof(void *), NULL);
1413 }
1414 efree(name);
1415 }
1416 RETVAL_ZVAL(getThis(), 1, 0);
1417 }
1418
1419 PHP_METHOD(HttpMessage, setHeaders)
1420 {
1421 zval *new_headers = NULL;
1422
1423 if (SUCCESS == zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "a/!", &new_headers)) {
1424 php_http_message_object_t *obj = zend_object_store_get_object(getThis() TSRMLS_CC);
1425
1426 if (!obj->message) {
1427 obj->message = php_http_message_init(NULL, 0 TSRMLS_CC);
1428 }
1429
1430 zend_hash_clean(&obj->message->hdrs);
1431 if (new_headers) {
1432 array_join(Z_ARRVAL_P(new_headers), &obj->message->hdrs, 0, ARRAY_JOIN_PRETTIFY|ARRAY_JOIN_STRONLY);
1433 }
1434 }
1435 RETVAL_ZVAL(getThis(), 1, 0);
1436 }
1437
1438 PHP_METHOD(HttpMessage, addHeader)
1439 {
1440 zval *zvalue;
1441 char *name_str;
1442 int name_len;
1443
1444 if (SUCCESS == zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "sz", &name_str, &name_len, &zvalue)) {
1445 php_http_message_object_t *obj = zend_object_store_get_object(getThis() TSRMLS_CC);
1446 char *name = php_http_pretty_key(estrndup(name_str, name_len), name_len, 1, 1);
1447 zval *header;
1448
1449 if (!obj->message) {
1450 obj->message = php_http_message_init(NULL, 0 TSRMLS_CC);
1451 }
1452
1453 Z_ADDREF_P(zvalue);
1454 if ((header = php_http_message_header(obj->message, name, name_len, 0))) {
1455 convert_to_array(header);
1456 zend_hash_next_index_insert(Z_ARRVAL_P(header), &zvalue, sizeof(void *), NULL);
1457 } else {
1458 zend_symtable_update(&obj->message->hdrs, name, name_len + 1, &zvalue, sizeof(void *), NULL);
1459 }
1460 efree(name);
1461 }
1462 RETVAL_ZVAL(getThis(), 1, 0);
1463 }
1464
1465 PHP_METHOD(HttpMessage, addHeaders)
1466 {
1467 zval *new_headers;
1468 zend_bool append = 0;
1469
1470 if (SUCCESS == zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "a|b", &new_headers, &append)) {
1471 php_http_message_object_t *obj = zend_object_store_get_object(getThis() TSRMLS_CC);
1472
1473 if (!obj->message) {
1474 obj->message = php_http_message_init(NULL, 0 TSRMLS_CC);
1475 }
1476
1477 array_join(Z_ARRVAL_P(new_headers), &obj->message->hdrs, append, ARRAY_JOIN_STRONLY|ARRAY_JOIN_PRETTIFY);
1478 }
1479 RETVAL_ZVAL(getThis(), 1, 0);
1480 }
1481
1482 PHP_METHOD(HttpMessage, getType)
1483 {
1484 if (SUCCESS == zend_parse_parameters_none()) {
1485 php_http_message_object_t *obj = zend_object_store_get_object(getThis() TSRMLS_CC);
1486
1487 if (!obj->message) {
1488 obj->message = php_http_message_init(NULL, 0 TSRMLS_CC);
1489 }
1490
1491 RETURN_LONG(obj->message->type);
1492 }
1493 }
1494
1495 PHP_METHOD(HttpMessage, setType)
1496 {
1497 long type;
1498
1499 if (SUCCESS == zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "l", &type)) {
1500 php_http_message_object_t *obj = zend_object_store_get_object(getThis() TSRMLS_CC);
1501
1502 if (!obj->message) {
1503 obj->message = php_http_message_init(NULL, 0 TSRMLS_CC);
1504 }
1505
1506 php_http_message_set_type(obj->message, type);
1507 }
1508 RETVAL_ZVAL(getThis(), 1, 0);
1509 }
1510
1511 PHP_METHOD(HttpMessage, getInfo)
1512 {
1513 if (SUCCESS == zend_parse_parameters_none()) {
1514 php_http_message_object_t *obj = zend_object_store_get_object(getThis() TSRMLS_CC);
1515
1516 if (!obj->message) {
1517 obj->message = php_http_message_init(NULL, 0 TSRMLS_CC);
1518 }
1519
1520 switch (obj->message->type) {
1521 case PHP_HTTP_REQUEST:
1522 Z_STRLEN_P(return_value) = spprintf(&Z_STRVAL_P(return_value), 0, PHP_HTTP_INFO_REQUEST_FMT_ARGS(&obj->message->http, ""));
1523 break;
1524 case PHP_HTTP_RESPONSE:
1525 Z_STRLEN_P(return_value) = spprintf(&Z_STRVAL_P(return_value), 0, PHP_HTTP_INFO_RESPONSE_FMT_ARGS(&obj->message->http, ""));
1526 break;
1527 default:
1528 RETURN_NULL();
1529 break;
1530 }
1531 Z_TYPE_P(return_value) = IS_STRING;
1532 return;
1533 }
1534 RETURN_FALSE;
1535 }
1536
1537 PHP_METHOD(HttpMessage, setInfo)
1538 {
1539 char *str;
1540 int len;
1541 php_http_info_t inf;
1542
1543 if ( SUCCESS == zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "s", &str, &len)
1544 && php_http_info_parse(&inf, str TSRMLS_CC)) {
1545 php_http_message_object_t *obj = zend_object_store_get_object(getThis() TSRMLS_CC);
1546
1547 if (!obj->message) {
1548 obj->message = php_http_message_init(NULL, 0 TSRMLS_CC);
1549 }
1550
1551 php_http_message_set_info(obj->message, &inf);
1552 php_http_info_dtor(&inf);
1553 }
1554 RETVAL_ZVAL(getThis(), 1, 0);
1555 }
1556
1557 PHP_METHOD(HttpMessage, getHttpVersion)
1558 {
1559 if (SUCCESS == zend_parse_parameters_none()) {
1560 char *str;
1561 size_t len;
1562 php_http_message_object_t *obj = zend_object_store_get_object(getThis() TSRMLS_CC);
1563
1564 if (!obj->message) {
1565 obj->message = php_http_message_init(NULL, 0 TSRMLS_CC);
1566 }
1567
1568 php_http_version_to_string(&obj->message->http.version, &str, &len, NULL, NULL TSRMLS_CC);
1569 RETURN_STRINGL(str, len, 0);
1570 }
1571
1572 RETURN_FALSE;
1573 }
1574
1575 PHP_METHOD(HttpMessage, setHttpVersion)
1576 {
1577 char *v_str;
1578 int v_len;
1579
1580 if (SUCCESS == zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "s", &v_str, &v_len)) {
1581 php_http_version_t version;
1582 php_http_message_object_t *obj = zend_object_store_get_object(getThis() TSRMLS_CC);
1583
1584 if (!obj->message) {
1585 obj->message = php_http_message_init(NULL, 0 TSRMLS_CC);
1586 }
1587
1588 if (php_http_version_parse(&version, v_str TSRMLS_CC)) {
1589 obj->message->http.version = version;
1590 }
1591 }
1592 RETVAL_ZVAL(getThis(), 1, 0);
1593 }
1594
1595 PHP_METHOD(HttpMessage, getResponseCode)
1596 {
1597 if (SUCCESS == zend_parse_parameters_none()) {
1598 php_http_message_object_t *obj = zend_object_store_get_object(getThis() TSRMLS_CC);
1599
1600 if (!obj->message) {
1601 obj->message = php_http_message_init(NULL, 0 TSRMLS_CC);
1602 }
1603
1604 PHP_HTTP_MESSAGE_TYPE_CHECK(RESPONSE, obj->message, RETURN_FALSE);
1605 RETURN_LONG(obj->message->http.info.response.code);
1606 }
1607 RETURN_FALSE;
1608 }
1609
1610 PHP_METHOD(HttpMessage, setResponseCode)
1611 {
1612 long code;
1613 zend_bool strict = 1;
1614
1615 if (SUCCESS == zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "l|b", &code, &strict)) {
1616 php_http_message_object_t *obj = zend_object_store_get_object(getThis() TSRMLS_CC);
1617
1618 if (!obj->message) {
1619 obj->message = php_http_message_init(NULL, 0 TSRMLS_CC);
1620 }
1621
1622 PHP_HTTP_MESSAGE_TYPE_CHECK(RESPONSE, obj->message, RETURN_FALSE);
1623 if (strict && (code < 100 || code > 599)) {
1624 php_http_error(HE_WARNING, PHP_HTTP_E_INVALID_PARAM, "Invalid response code (100-599): %ld", code);
1625 RETURN_FALSE;
1626 }
1627
1628 obj->message->http.info.response.code = code;
1629 STR_SET(obj->message->http.info.response.status, estrdup(php_http_env_get_response_status_for_code(code)));
1630 }
1631 RETVAL_ZVAL(getThis(), 1, 0);
1632 }
1633
1634 PHP_METHOD(HttpMessage, getResponseStatus)
1635 {
1636 if (SUCCESS == zend_parse_parameters_none()) {
1637 php_http_message_object_t *obj = zend_object_store_get_object(getThis() TSRMLS_CC);
1638
1639 if (!obj->message) {
1640 obj->message = php_http_message_init(NULL, 0 TSRMLS_CC);
1641 }
1642
1643 PHP_HTTP_MESSAGE_TYPE_CHECK(RESPONSE, obj->message, RETURN_FALSE);
1644 if (obj->message->http.info.response.status) {
1645 RETURN_STRING(obj->message->http.info.response.status, 1);
1646 } else {
1647 RETURN_EMPTY_STRING();
1648 }
1649 }
1650
1651 RETURN_FALSE;
1652 }
1653
1654 PHP_METHOD(HttpMessage, setResponseStatus)
1655 {
1656 char *status;
1657 int status_len;
1658
1659 if (SUCCESS == zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "s", &status, &status_len)) {
1660 php_http_message_object_t *obj = zend_object_store_get_object(getThis() TSRMLS_CC);
1661
1662 if (!obj->message) {
1663 obj->message = php_http_message_init(NULL, 0 TSRMLS_CC);
1664 }
1665
1666 PHP_HTTP_MESSAGE_TYPE_CHECK(RESPONSE, obj->message, RETURN_FALSE);
1667 STR_SET(obj->message->http.info.response.status, estrndup(status, status_len));
1668 }
1669 RETVAL_ZVAL(getThis(), 1, 0);
1670 }
1671
1672 PHP_METHOD(HttpMessage, getRequestMethod)
1673 {
1674 if (SUCCESS == zend_parse_parameters_none()) {
1675 php_http_message_object_t *obj = zend_object_store_get_object(getThis() TSRMLS_CC);
1676
1677 if (!obj->message) {
1678 obj->message = php_http_message_init(NULL, 0 TSRMLS_CC);
1679 }
1680
1681 PHP_HTTP_MESSAGE_TYPE_CHECK(REQUEST, obj->message, RETURN_FALSE);
1682 if (obj->message->http.info.request.method) {
1683 RETURN_STRING(obj->message->http.info.request.method, 1);
1684 } else {
1685 RETURN_EMPTY_STRING();
1686 }
1687 }
1688
1689 RETURN_FALSE;
1690 }
1691
1692 PHP_METHOD(HttpMessage, setRequestMethod)
1693 {
1694 char *method;
1695 int method_len;
1696
1697 if (SUCCESS == zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "s", &method, &method_len)) {
1698 php_http_message_object_t *obj = zend_object_store_get_object(getThis() TSRMLS_CC);
1699
1700 if (!obj->message) {
1701 obj->message = php_http_message_init(NULL, 0 TSRMLS_CC);
1702 }
1703
1704 PHP_HTTP_MESSAGE_TYPE_CHECK(REQUEST, obj->message, RETURN_FALSE);
1705 if (method_len < 1) {
1706 php_http_error(HE_WARNING, PHP_HTTP_E_INVALID_PARAM, "Cannot set HttpMessage::requestMethod to an empty string");
1707 RETURN_FALSE;
1708 }
1709
1710 STR_SET(obj->message->http.info.request.method, estrndup(method, method_len));
1711 }
1712 RETVAL_ZVAL(getThis(), 1, 0);
1713 }
1714
1715 PHP_METHOD(HttpMessage, getRequestUrl)
1716 {
1717 if (SUCCESS == zend_parse_parameters_none()) {
1718 php_http_message_object_t *obj = zend_object_store_get_object(getThis() TSRMLS_CC);
1719
1720 if (!obj->message) {
1721 obj->message = php_http_message_init(NULL, 0 TSRMLS_CC);
1722 }
1723
1724 PHP_HTTP_MESSAGE_TYPE_CHECK(REQUEST, obj->message, RETURN_FALSE);
1725 if (obj->message->http.info.request.url) {
1726 RETURN_STRING(obj->message->http.info.request.url, 1);
1727 } else {
1728 RETURN_EMPTY_STRING();
1729 }
1730 }
1731
1732 RETURN_FALSE;
1733 }
1734
1735 PHP_METHOD(HttpMessage, setRequestUrl)
1736 {
1737 char *url_str;
1738 int url_len;
1739
1740 if (SUCCESS == zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "s", &url_str, &url_len)) {
1741 php_http_message_object_t *obj = zend_object_store_get_object(getThis() TSRMLS_CC);
1742
1743 if (!obj->message) {
1744 obj->message = php_http_message_init(NULL, 0 TSRMLS_CC);
1745 }
1746
1747 PHP_HTTP_MESSAGE_TYPE_CHECK(REQUEST, obj->message, RETURN_FALSE);
1748 if (url_len < 1) {
1749 php_http_error(HE_WARNING, PHP_HTTP_E_INVALID_PARAM, "Cannot set HttpMessage::requestUrl to an empty string");
1750 RETURN_FALSE;
1751 }
1752 STR_SET(obj->message->http.info.request.url, estrndup(url_str, url_len));
1753 }
1754 RETVAL_ZVAL(getThis(), 1, 0);
1755 }
1756
1757
1758 PHP_METHOD(HttpMessage, getParentMessage)
1759 {
1760 with_error_handling(EH_THROW, php_http_exception_get_class_entry()) {
1761 if (SUCCESS == zend_parse_parameters_none()) {
1762 php_http_message_object_t *obj = zend_object_store_get_object(getThis() TSRMLS_CC);
1763
1764 if (!obj->message) {
1765 obj->message = php_http_message_init(NULL, 0 TSRMLS_CC);
1766 }
1767
1768 if (obj->message->parent) {
1769 RETVAL_OBJVAL(obj->parent, 1);
1770 } else {
1771 php_http_error(HE_WARNING, PHP_HTTP_E_RUNTIME, "HttpMessage does not have a parent message");
1772 }
1773 }
1774 } end_error_handling();
1775 }
1776
1777 PHP_METHOD(HttpMessage, toString)
1778 {
1779 zend_bool include_parent = 0;
1780
1781 if (SUCCESS == zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "|b", &include_parent)) {
1782 php_http_message_object_t *obj = zend_object_store_get_object(getThis() TSRMLS_CC);
1783 char *string;
1784 size_t length;
1785
1786 if (!obj->message) {
1787 obj->message = php_http_message_init(NULL, 0 TSRMLS_CC);
1788 }
1789
1790 if (include_parent) {
1791 php_http_message_serialize(obj->message, &string, &length);
1792 } else {
1793 php_http_message_to_string(obj->message, &string, &length);
1794 }
1795 if (string) {
1796 RETURN_STRINGL(string, length, 0);
1797 }
1798 }
1799 RETURN_EMPTY_STRING();
1800 }
1801
1802 PHP_METHOD(HttpMessage, toStream)
1803 {
1804 zval *zstream;
1805
1806 if (SUCCESS == zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "r", &zstream)) {
1807 php_http_message_object_t *obj = zend_object_store_get_object(getThis() TSRMLS_CC);
1808 php_stream *s;
1809
1810 php_stream_from_zval(s, &zstream);
1811
1812 if (!obj->message) {
1813 obj->message = php_http_message_init(NULL, 0 TSRMLS_CC);
1814 }
1815
1816 php_http_message_to_callback(obj->message, (php_http_pass_callback_t) _php_stream_write, s);
1817 }
1818 }
1819
1820 PHP_METHOD(HttpMessage, toCallback)
1821 {
1822 php_http_pass_fcall_arg_t fcd;
1823
1824 if (SUCCESS == zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "f", &fcd.fci, &fcd.fcc)) {
1825 php_http_message_object_t *obj = zend_object_store_get_object(getThis() TSRMLS_CC);
1826
1827 fcd.fcz = getThis();
1828 Z_ADDREF_P(fcd.fcz);
1829 TSRMLS_SET_CTX(fcd.ts);
1830
1831 php_http_message_to_callback(obj->message, php_http_pass_fcall_callback, &fcd);
1832 zend_fcall_info_args_clear(&fcd.fci, 1);
1833
1834 zval_ptr_dtor(&fcd.fcz);
1835 RETURN_TRUE;
1836 }
1837 RETURN_FALSE;
1838 }
1839
1840 PHP_METHOD(HttpMessage, serialize)
1841 {
1842 if (SUCCESS == zend_parse_parameters_none()) {
1843 php_http_message_object_t *obj = zend_object_store_get_object(getThis() TSRMLS_CC);
1844 char *string;
1845 size_t length;
1846
1847 if (!obj->message) {
1848 obj->message = php_http_message_init(NULL, 0 TSRMLS_CC);
1849 }
1850
1851 php_http_message_serialize(obj->message, &string, &length);
1852 RETURN_STRINGL(string, length, 0);
1853 }
1854 RETURN_EMPTY_STRING();
1855 }
1856
1857 PHP_METHOD(HttpMessage, unserialize)
1858 {
1859 int length;
1860 char *serialized;
1861
1862 if (SUCCESS == zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "s", &serialized, &length)) {
1863 php_http_message_object_t *obj = zend_object_store_get_object(getThis() TSRMLS_CC);
1864 php_http_message_t *msg;
1865
1866 if (obj->message) {
1867 php_http_message_dtor(obj->message);
1868 efree(obj->message);
1869 }
1870 if ((msg = php_http_message_parse(NULL, serialized, (size_t) length TSRMLS_CC))) {
1871 obj->message = msg;
1872 } else {
1873 obj->message = php_http_message_init(NULL, 0 TSRMLS_CC);
1874 php_http_error(HE_ERROR, PHP_HTTP_E_RUNTIME, "Could not unserialize HttpMessage");
1875 }
1876 }
1877 }
1878
1879 PHP_METHOD(HttpMessage, detach)
1880 {
1881 with_error_handling(EH_THROW, php_http_exception_get_class_entry()) {
1882 if (SUCCESS == zend_parse_parameters_none()) {
1883 php_http_message_object_t *obj = zend_object_store_get_object(getThis() TSRMLS_CC);
1884
1885 if (!obj->message) {
1886 obj->message = php_http_message_init(NULL, 0 TSRMLS_CC);
1887 }
1888
1889 RETVAL_OBJVAL(php_http_message_object_new_ex(obj->zo.ce, php_http_message_copy(obj->message, NULL), NULL TSRMLS_CC), 0);
1890 }
1891 } end_error_handling();
1892 }
1893
1894 PHP_METHOD(HttpMessage, prepend)
1895 {
1896 zval *prepend;
1897 zend_bool top = 1;
1898
1899 if (SUCCESS == zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "O|b", &prepend, php_http_message_class_entry, &top)) {
1900 php_http_message_t *msg[2];
1901 php_http_message_object_t *obj = zend_object_store_get_object(getThis() TSRMLS_CC);
1902 php_http_message_object_t *prepend_obj = zend_object_store_get_object(prepend TSRMLS_CC);
1903
1904 if (!obj->message) {
1905 obj->message = php_http_message_init(NULL, 0 TSRMLS_CC);
1906 }
1907 if (!prepend_obj->message) {
1908 prepend_obj->message = php_http_message_init(NULL, 0 TSRMLS_CC);
1909 }
1910
1911 /* safety check */
1912 for (msg[0] = obj->message; msg[0]; msg[0] = msg[0]->parent) {
1913 for (msg[1] = prepend_obj->message; msg[1]; msg[1] = msg[1]->parent) {
1914 if (msg[0] == msg[1]) {
1915 php_http_error(HE_THROW, PHP_HTTP_E_INVALID_PARAM, "Cannot prepend a message located within the same message chain");
1916 return;
1917 }
1918 }
1919 }
1920
1921 php_http_message_object_prepend(getThis(), prepend, top TSRMLS_CC);
1922 }
1923 }
1924
1925 PHP_METHOD(HttpMessage, reverse)
1926 {
1927 if (SUCCESS == zend_parse_parameters_none()) {
1928 php_http_message_object_reverse(getThis(), return_value TSRMLS_CC);
1929 }
1930 }
1931
1932 PHP_METHOD(HttpMessage, isMultipart)
1933 {
1934 zval *zboundary = NULL;
1935
1936 if (SUCCESS == zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "|z", &zboundary)) {
1937 php_http_message_object_t *obj = zend_object_store_get_object(getThis() TSRMLS_CC);
1938 char *boundary = NULL;
1939
1940 RETVAL_BOOL(php_http_message_is_multipart(obj->message, zboundary ? &boundary : NULL));
1941
1942 if (zboundary && boundary) {
1943 zval_dtor(zboundary);
1944 ZVAL_STRING(zboundary, boundary, 0);
1945 }
1946 }
1947 }
1948
1949 PHP_METHOD(HttpMessage, splitMultipartBody)
1950 {
1951 if (SUCCESS == zend_parse_parameters_none()) {
1952 php_http_message_object_t *obj = zend_object_store_get_object(getThis() TSRMLS_CC);
1953 char *boundary = NULL;
1954
1955 if (php_http_message_is_multipart(obj->message, &boundary)) {
1956 php_http_message_t *msg;
1957
1958 if ((msg = php_http_message_body_split(&obj->message->body, boundary))) {
1959 RETVAL_OBJVAL(php_http_message_object_new_ex(php_http_message_class_entry, msg, NULL TSRMLS_CC), 0);
1960 }
1961 }
1962 STR_FREE(boundary);
1963 }
1964 }
1965
1966 PHP_METHOD(HttpMessage, count)
1967 {
1968 if (SUCCESS == zend_parse_parameters_none()) {
1969 long i = 0;
1970 php_http_message_object_t *obj = zend_object_store_get_object(getThis() TSRMLS_CC);
1971
1972 if (!obj->message) {
1973 obj->message = php_http_message_init(NULL, 0 TSRMLS_CC);
1974 }
1975
1976 php_http_message_count(i, obj->message);
1977 RETURN_LONG(i);
1978 }
1979 RETURN_FALSE;
1980 }
1981
1982 PHP_METHOD(HttpMessage, rewind)
1983 {
1984 if (SUCCESS == zend_parse_parameters_none()) {
1985 zval *zobj = getThis();
1986 php_http_message_object_t *obj = zend_object_store_get_object(zobj TSRMLS_CC);
1987
1988 if (obj->iterator) {
1989 zval_ptr_dtor(&obj->iterator);
1990 }
1991 Z_ADDREF_P(zobj);
1992 obj->iterator = zobj;
1993 }
1994 }
1995
1996 PHP_METHOD(HttpMessage, valid)
1997 {
1998 if (SUCCESS == zend_parse_parameters_none()) {
1999 php_http_message_object_t *obj = zend_object_store_get_object(getThis() TSRMLS_CC);
2000
2001 RETURN_BOOL(obj->iterator != NULL);
2002 }
2003 }
2004
2005 PHP_METHOD(HttpMessage, next)
2006 {
2007 if (SUCCESS == zend_parse_parameters_none()) {
2008 php_http_message_object_t *obj = zend_object_store_get_object(getThis() TSRMLS_CC);
2009
2010 if (obj->iterator) {
2011 php_http_message_object_t *itr = zend_object_store_get_object(obj->iterator TSRMLS_CC);
2012
2013 if (itr && itr->parent.handle) {
2014 zval *old = obj->iterator;
2015 MAKE_STD_ZVAL(obj->iterator);
2016 ZVAL_OBJVAL(obj->iterator, itr->parent, 1);
2017 zval_ptr_dtor(&old);
2018 } else {
2019 zval_ptr_dtor(&obj->iterator);
2020 obj->iterator = NULL;
2021 }
2022 }
2023 }
2024 }
2025
2026 PHP_METHOD(HttpMessage, key)
2027 {
2028 if (SUCCESS == zend_parse_parameters_none()) {
2029 php_http_message_object_t *obj = zend_object_store_get_object(getThis() TSRMLS_CC);
2030
2031 RETURN_LONG(obj->iterator ? obj->iterator->value.obj.handle:0);
2032 }
2033 }
2034
2035 PHP_METHOD(HttpMessage, current)
2036 {
2037 if (SUCCESS == zend_parse_parameters_none()) {
2038 php_http_message_object_t *obj = zend_object_store_get_object(getThis() TSRMLS_CC);
2039
2040 if (obj->iterator) {
2041 RETURN_ZVAL(obj->iterator, 1, 0);
2042 }
2043 }
2044 }
2045
2046 /*
2047 * Local variables:
2048 * tab-width: 4
2049 * c-basic-offset: 4
2050 * End:
2051 * vim600: noet sw=4 ts=4 fdm=marker
2052 * vim<600: noet sw=4 ts=4
2053 */
2054