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