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