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