fix memset arg order
[m6w6/ext-http] / php_http_env_response.c
index 2f147554dc1d988e3d2b13deaaff2745dca024f7..43a7ea1c86f909f81e7ded17492679cff454bea3 100644 (file)
@@ -6,20 +6,13 @@
     | modification, are permitted provided that the conditions mentioned |
     | in the accompanying LICENSE file are met.                          |
     +--------------------------------------------------------------------+
-    | Copyright (c) 2004-2010, Michael Wallner <mike@php.net>            |
+    | Copyright (c) 2004-2011, Michael Wallner <mike@php.net>            |
     +--------------------------------------------------------------------+
 */
 
-/* $Id $ */
+#include "php_http_api.h"
 
-#include "php_http.h"
-
-#include <main/SAPI.h>
-#include <ext/date/php_date.h>
-#include <ext/standard/php_string.h>
-
-
-static void set_option(zval *options, const char *name_str, size_t name_len, int type, const void *value_ptr, size_t value_len TSRMLS_DC)
+static void set_option(zval *options, const char *name_str, size_t name_len, int type, void *value_ptr, size_t value_len TSRMLS_DC)
 {
        if (Z_TYPE_P(options) == IS_OBJECT) {
                /* stupid non-const api */
@@ -35,6 +28,9 @@ static void set_option(zval *options, const char *name_str, size_t name_len, int
                                case IS_STRING:
                                        zend_update_property_stringl(Z_OBJCE_P(options), options, name, name_len, value_ptr, value_len TSRMLS_CC);
                                        break;
+                               case IS_OBJECT:
+                                       zend_update_property(Z_OBJCE_P(options), options, name, name_len, value_ptr TSRMLS_CC);
+                                       break;
                        }
                } else {
                        zend_update_property_null(Z_OBJCE_P(options), options, name, name_len TSRMLS_CC);
@@ -54,6 +50,10 @@ static void set_option(zval *options, const char *name_str, size_t name_len, int
                                        char *value = estrndup(value_ptr, value_len);
                                        add_assoc_stringl_ex(options, name_str, name_len + 1, value, value_len, 0);
                                        break;
+                               case IS_OBJECT:
+                                       Z_ADDREF_P(value_ptr);
+                                       add_assoc_zval_ex(options, name_str, name_len + 1, value_ptr);
+                                       break;
                                }
                        }
                } else {
@@ -70,7 +70,7 @@ static zval *get_option(zval *options, const char *name_str, size_t name_len TSR
                val = zend_read_property(Z_OBJCE_P(options), options, name, name_len, 0 TSRMLS_CC);
                efree(name);
        } else {
-               if (SUCCESS == zend_hash_find(Z_ARRVAL_P(options), name_str, name_len + 1, (void *) &valptr)) {
+               if (SUCCESS == zend_symtable_find(Z_ARRVAL_P(options), name_str, name_len + 1, (void *) &valptr)) {
                        val = *valptr;
                } else {
                        val = NULL;
@@ -81,23 +81,50 @@ static zval *get_option(zval *options, const char *name_str, size_t name_len TSR
        }
        return val;
 }
+static php_http_message_body_t *get_body(zval *options TSRMLS_DC)
+{
+       zval *zbody;
+       php_http_message_body_t *body = NULL;
+
+       if ((zbody = get_option(options, ZEND_STRL("body") TSRMLS_CC))) {
+               if ((Z_TYPE_P(zbody) == IS_OBJECT) && instanceof_function(Z_OBJCE_P(zbody), php_http_message_body_get_class_entry() TSRMLS_CC)) {
+                       php_http_message_body_object_t *body_obj = zend_object_store_get_object(zbody TSRMLS_CC);
 
-PHP_HTTP_API php_http_cache_status_t php_http_env_is_response_cached_by_etag(zval *options, const char *header_str, size_t header_len TSRMLS_DC)
+                       body = body_obj->body;
+               }
+               zval_ptr_dtor(&zbody);
+       }
+
+       return body;
+}
+static php_http_message_t *get_request(zval *options TSRMLS_DC)
 {
-       int ret, free_etag = 0;
-       char *header, *etag;
-       zval *zetag, *zbody = NULL;
+       zval *zrequest;
+       php_http_message_t *request = NULL;
+
+       if ((zrequest = get_option(options, ZEND_STRL("request") TSRMLS_CC))) {
+               if (Z_TYPE_P(zrequest) == IS_OBJECT && instanceof_function(Z_OBJCE_P(zrequest), php_http_message_get_class_entry() TSRMLS_CC)) {
+                       php_http_message_object_t *request_obj = zend_object_store_get_object(zrequest TSRMLS_CC);
 
-       if (    !(header = php_http_env_get_request_header(header_str, header_len TSRMLS_CC))
-       ||              !(zbody = get_option(options, ZEND_STRL("body") TSRMLS_CC))
-       ||              !(Z_TYPE_P(zbody) == IS_OBJECT)
-       ||              !instanceof_function(Z_OBJCE_P(zbody), php_http_message_body_class_entry TSRMLS_CC)
-       ) {
-               STR_FREE(header);
-               if (zbody) {
-                       zval_ptr_dtor(&zbody);
+                       request = request_obj->message;
                }
-               return PHP_HTTP_CACHE_NO;
+               zval_ptr_dtor(&zrequest);
+       }
+
+       return request;
+}
+
+PHP_HTTP_API php_http_cache_status_t php_http_env_is_response_cached_by_etag(zval *options, const char *header_str, size_t header_len, php_http_message_t *request TSRMLS_DC)
+{
+       php_http_cache_status_t ret = PHP_HTTP_CACHE_NO;
+       int free_etag = 0;
+       char *header = NULL, *etag;
+       php_http_message_body_t *body;
+       zval *zetag;
+
+
+       if (!(body = get_body(options TSRMLS_CC))) {
+               return ret;
        }
 
        if ((zetag = get_option(options, ZEND_STRL("etag") TSRMLS_CC))) {
@@ -108,46 +135,37 @@ PHP_HTTP_API php_http_cache_status_t php_http_env_is_response_cached_by_etag(zva
 
        if (zetag && Z_STRLEN_P(zetag)) {
                etag = Z_STRVAL_P(zetag);
-       } else {
-               etag = php_http_message_body_etag(((php_http_message_body_object_t *) zend_object_store_get_object(zbody TSRMLS_CC))->body);
+       } else if ((etag = php_http_message_body_etag(body))) {
                set_option(options, ZEND_STRL("etag"), IS_STRING, etag, strlen(etag) TSRMLS_CC);
                free_etag = 1;
        }
 
-       if (zbody) {
-               zval_ptr_dtor(&zbody);
-       }
-
        if (zetag) {
                zval_ptr_dtor(&zetag);
        }
 
-       ret = php_http_match(header, etag, PHP_HTTP_MATCH_WORD);
+       if (etag && (header = php_http_env_get_request_header(header_str, header_len, NULL, request TSRMLS_CC))) {
+               ret = php_http_match(header, etag, PHP_HTTP_MATCH_WORD)  ? PHP_HTTP_CACHE_HIT : PHP_HTTP_CACHE_MISS;
+       }
 
        if (free_etag) {
                efree(etag);
        }
-       efree(header);
 
-       return ret ? PHP_HTTP_CACHE_HIT : PHP_HTTP_CACHE_MISS;
+       STR_FREE(header);
+       return ret;
 }
 
-PHP_HTTP_API php_http_cache_status_t php_http_env_is_response_cached_by_last_modified(zval *options, const char *header_str, size_t header_len TSRMLS_DC)
+PHP_HTTP_API php_http_cache_status_t php_http_env_is_response_cached_by_last_modified(zval *options, const char *header_str, size_t header_len, php_http_message_t *request TSRMLS_DC)
 {
+       php_http_cache_status_t ret = PHP_HTTP_CACHE_NO;
        char *header;
        time_t ums, lm = 0;
-       zval *zbody = NULL, *zlm;
+       php_http_message_body_t *body;
+       zval *zlm;
 
-       if (    !(header = php_http_env_get_request_header(header_str, header_len TSRMLS_CC))
-       ||              !(zbody = get_option(options, ZEND_STRL("body") TSRMLS_CC))
-       ||              !(Z_TYPE_P(zbody) == IS_OBJECT)
-       ||              !instanceof_function(Z_OBJCE_P(zbody), php_http_message_body_class_entry TSRMLS_CC)
-       ) {
-               STR_FREE(header);
-               if (zbody) {
-                       zval_ptr_dtor(&zbody);
-               }
-               return PHP_HTTP_CACHE_NO;
+       if (!(body = get_body(options TSRMLS_CC))) {
+               return ret;
        }
 
        if ((zlm = get_option(options, ZEND_STRL("lastModified") TSRMLS_CC))) {
@@ -159,7 +177,7 @@ PHP_HTTP_API php_http_cache_status_t php_http_env_is_response_cached_by_last_mod
        if (zlm && Z_LVAL_P(zlm) > 0) {
                lm = Z_LVAL_P(zlm);
        } else {
-               lm = php_http_message_body_mtime(((php_http_message_body_object_t *) zend_object_store_get_object(zbody TSRMLS_CC))->body);
+               lm = php_http_message_body_mtime(body);
                set_option(options, ZEND_STRL("lastModified"), IS_LONG, &lm, 0 TSRMLS_CC);
        }
 
@@ -167,31 +185,49 @@ PHP_HTTP_API php_http_cache_status_t php_http_env_is_response_cached_by_last_mod
                zval_ptr_dtor(&zlm);
        }
 
-       ums = php_parse_date(header, NULL);
-       efree(header);
+       if ((header = php_http_env_get_request_header(header_str, header_len, NULL, request TSRMLS_CC))) {
+               ums = php_parse_date(header, NULL);
 
-       if (ums > 0 && ums <= lm) {
-               return PHP_HTTP_CACHE_HIT;
-       } else {
-               return PHP_HTTP_CACHE_MISS;
+               if (ums > 0 && ums >= lm) {
+                       ret = PHP_HTTP_CACHE_HIT;
+               } else {
+                       ret = PHP_HTTP_CACHE_MISS;
+               }
+       }
+
+       STR_FREE(header);
+       return ret;
+}
+
+static zend_bool php_http_env_response_is_cacheable(php_http_env_response_t *r, php_http_message_t *request)
+{
+       TSRMLS_FETCH_FROM_CTX(r->ts);
+
+       if (r->ops->get_status(r) >= 400) {
+               return 0;
+       }
+
+       if (php_http_env_got_request_header(ZEND_STRL("Authorizsation"), request TSRMLS_CC)) {
+               return 0;
+       }
+
+       if (-1 == php_http_select_str(php_http_env_get_request_method(request TSRMLS_CC), 2, "HEAD", "GET")) {
+               return 0;
        }
+
+       return 1;
 }
 
-static size_t output(void *context, const char *buf, size_t len TSRMLS_DC)
+static size_t output(void *context, char *buf, size_t len TSRMLS_DC)
 {
        php_http_env_response_t *r = context;
 
-       PHPWRITE(buf, len);
+       r->ops->write(r, buf, len);
 
        /*      we really only need to flush when throttling is enabled,
                because we push the data as fast as possible anyway if not */
        if (r->throttle.delay >= PHP_HTTP_DIFFSEC) {
-               if (php_output_get_level(TSRMLS_C)) {
-                       php_output_flush_all(TSRMLS_C);
-               }
-               if (!(php_output_get_status(TSRMLS_C) & PHP_OUTPUT_IMPLICITFLUSH)) {
-                       sapi_flush(TSRMLS_C);
-               }
+               r->ops->flush(r);
                php_http_sleep(r->throttle.delay);
        }
        return len;
@@ -200,8 +236,8 @@ static size_t output(void *context, const char *buf, size_t len TSRMLS_DC)
 #define php_http_env_response_send_done(r) php_http_env_response_send_data((r), NULL, 0)
 static STATUS php_http_env_response_send_data(php_http_env_response_t *r, const char *buf, size_t len)
 {
-       TSRMLS_FETCH_FROM_CTX(r->ts);
        size_t chunk = r->throttle.chunk ? r->throttle.chunk : PHP_HTTP_SENDBUF_SIZE;
+       TSRMLS_FETCH_FROM_CTX(r->ts);
 
        if (r->content.encoder) {
                char *enc_str = NULL;
@@ -228,15 +264,21 @@ static STATUS php_http_env_response_send_data(php_http_env_response_t *r, const
        return SUCCESS;
 }
 
-PHP_HTTP_API php_http_env_response_t *php_http_env_response_init(php_http_env_response_t *r, zval *options TSRMLS_DC)
+PHP_HTTP_API php_http_env_response_t *php_http_env_response_init(php_http_env_response_t *r, zval *options, php_http_env_response_ops_t *ops, void *init_arg TSRMLS_DC)
 {
-       php_http_env_response_t *free_r = NULL;
+       zend_bool free_r;
 
-       if (!r) {
-               r = free_r = emalloc(sizeof(*r));
+       if ((free_r = !r)) {
+               r = emalloc(sizeof(*r));
        }
        memset(r, 0, sizeof(*r));
 
+       if (ops) {
+               r->ops = ops;
+       } else {
+               r->ops = php_http_env_response_get_sapi_ops();
+       }
+
        r->buffer = php_http_buffer_init(NULL);
 
        Z_ADDREF_P(options);
@@ -244,11 +286,23 @@ PHP_HTTP_API php_http_env_response_t *php_http_env_response_init(php_http_env_re
 
        TSRMLS_SET_CTX(r->ts);
 
+       if (r->ops->init && (SUCCESS != r->ops->init(r, init_arg))) {
+               if (free_r) {
+                       php_http_env_response_free(&r);
+               } else {
+                       php_http_env_response_dtor(r);
+                       r = NULL;
+               }
+       }
+
        return r;
 }
 
 PHP_HTTP_API void php_http_env_response_dtor(php_http_env_response_t *r)
 {
+       if (r->ops->dtor) {
+               r->ops->dtor(r);
+       }
        php_http_buffer_free(&r->buffer);
        zval_ptr_dtor(&r->options);
        STR_FREE(r->content.type);
@@ -267,7 +321,7 @@ PHP_HTTP_API void php_http_env_response_free(php_http_env_response_t **r)
        }
 }
 
-static STATUS php_http_env_response_send_head(php_http_env_response_t *r)
+static STATUS php_http_env_response_send_head(php_http_env_response_t *r, php_http_message_t *request)
 {
        STATUS ret = SUCCESS;
        zval *zoption, *options = r->options;
@@ -282,7 +336,7 @@ static STATUS php_http_env_response_send_head(php_http_env_response_t *r)
 
                zval_ptr_dtor(&zoption);
                if (Z_LVAL_P(zoption_copy) > 0) {
-                       ret = php_http_env_set_response_code(Z_LVAL_P(zoption_copy) TSRMLS_CC);
+                       ret = r->ops->set_status(r, Z_LVAL_P(zoption_copy));
                }
                zval_ptr_dtor(&zoption_copy);
        }
@@ -297,7 +351,7 @@ static STATUS php_http_env_response_send_head(php_http_env_response_t *r)
 
                zval_ptr_dtor(&zoption);
                if (Z_STRLEN_P(zoption_copy) && php_http_version_parse(&v, Z_STRVAL_P(zoption_copy) TSRMLS_CC)) {
-                       ret = php_http_env_set_response_protocol_version(&v TSRMLS_CC);
+                       ret = r->ops->set_protocol_version(r, &v);
                        php_http_version_dtor(&v);
                }
                zval_ptr_dtor(&zoption_copy);
@@ -309,17 +363,7 @@ static STATUS php_http_env_response_send_head(php_http_env_response_t *r)
 
        if ((zoption = get_option(options, ZEND_STRL("headers") TSRMLS_CC))) {
                if (Z_TYPE_P(zoption) == IS_ARRAY) {
-                       zval **val;
-                       HashPosition pos;
-                       php_http_array_hashkey_t key = php_http_array_hashkey_init(0);
-
-                       FOREACH_KEYVAL(pos, zoption, key, val) {
-                               if (key.type == HASH_KEY_IS_STRING) {
-                                       if (SUCCESS != (ret = php_http_env_set_response_header_value(0, key.str, key.len - 1, *val, 1 TSRMLS_CC))) {
-                                               break;
-                                       }
-                               }
-                       }
+                       php_http_headers_to_callback(Z_ARRVAL_P(zoption), 0, (php_http_pass_format_callback_t) r->ops->set_header, r TSRMLS_CC);
                }
                zval_ptr_dtor(&zoption);
        }
@@ -334,7 +378,7 @@ static STATUS php_http_env_response_send_head(php_http_env_response_t *r)
                zval_ptr_dtor(&zoption);
                if (Z_STRLEN_P(zoption_copy)) {
                        PHP_HTTP_CHECK_CONTENT_TYPE(Z_STRVAL_P(zoption_copy), ret = FAILURE) else {
-                               if (SUCCESS == (ret = php_http_env_set_response_header_format(0, 1 TSRMLS_CC, "Content-Type: %.*s", Z_STRLEN_P(zoption_copy), Z_STRVAL_P(zoption_copy)))) {
+                               if (SUCCESS == (ret = r->ops->set_header(r, "Content-Type: %.*s", Z_STRLEN_P(zoption_copy), Z_STRVAL_P(zoption_copy)))) {
                                        r->content.type = estrndup(Z_STRVAL_P(zoption_copy), Z_STRLEN_P(zoption_copy));
                                }
                        }
@@ -350,20 +394,22 @@ static STATUS php_http_env_response_send_head(php_http_env_response_t *r)
                if (zend_hash_num_elements(&r->range.values) == 1) {
                        zval **range, **begin, **end;
 
-                       if (SUCCESS != zend_hash_index_find(&r->range.values, 0, (void *) &range)
-                       ||      SUCCESS != zend_hash_index_find(Z_ARRVAL_PP(range), 0, (void *) &begin)
-                       ||      SUCCESS != zend_hash_index_find(Z_ARRVAL_PP(range), 1, (void *) &end)
+                       if (    1 == php_http_array_list(&r->range.values TSRMLS_CC, 1, &range)
+                               &&      2 == php_http_array_list(Z_ARRVAL_PP(range) TSRMLS_CC, 2, &begin, &end)
                        ) {
+                               if (SUCCESS == (ret = r->ops->set_status(r, 206))) {
+                                       ret = r->ops->set_header(r, "Content-Range: bytes %ld-%ld/%zu", Z_LVAL_PP(begin), Z_LVAL_PP(end), r->content.length);
+                               }
+                       } else {
                                /* this should never happen */
                                zend_hash_destroy(&r->range.values);
-                               php_http_env_set_response_code(500 TSRMLS_CC);
                                ret = FAILURE;
-                       } else {
-                               ret = php_http_env_set_response_header_format(206, 1 TSRMLS_CC, "Content-Range: bytes %ld-%ld/%zu", Z_LVAL_PP(begin), Z_LVAL_PP(end), r->content.length);
                        }
                } else {
                        php_http_boundary(r->range.boundary, sizeof(r->range.boundary) TSRMLS_CC);
-                       ret = php_http_env_set_response_header_format(206, 1 TSRMLS_CC, "Content-Type: multipart/byteranges; boundary=%s", r->range.boundary);
+                       if (SUCCESS == (ret = r->ops->set_status(r, 206))) {
+                               ret = r->ops->set_header(r, "Content-Type: multipart/byteranges; boundary=%s", r->range.boundary);
+                       }
                }
        } else {
                if ((zoption = get_option(options, ZEND_STRL("cacheControl") TSRMLS_CC))) {
@@ -371,7 +417,7 @@ static STATUS php_http_env_response_send_head(php_http_env_response_t *r)
 
                        zval_ptr_dtor(&zoption);
                        if (Z_STRLEN_P(zoption_copy)) {
-                               ret = php_http_env_set_response_header_format(0, 1 TSRMLS_CC, "Cache-Control: %.*s", Z_STRLEN_P(zoption_copy), Z_STRVAL_P(zoption_copy) TSRMLS_CC);
+                               ret = r->ops->set_header(r, "Cache-Control: %.*s", Z_STRLEN_P(zoption_copy), Z_STRVAL_P(zoption_copy));
                        }
                        zval_ptr_dtor(&zoption_copy);
                }
@@ -382,46 +428,18 @@ static STATUS php_http_env_response_send_head(php_http_env_response_t *r)
 
                if ((zoption = get_option(options, ZEND_STRL("contentDisposition") TSRMLS_CC))) {
                        zval *zoption_copy = php_http_ztyp(IS_ARRAY, zoption);
-                       zval **zdisposition, **zfilename = NULL;
+                       php_http_buffer_t buf;
 
-                       zval_ptr_dtor(&zoption);
-                       if (SUCCESS == zend_hash_find(Z_ARRVAL_P(zoption_copy), ZEND_STRS("disposition"), (void *) &zdisposition)) {
-                               zval *zdisposition_copy = php_http_ztyp(IS_LONG, *zdisposition);
-                               char *tmp = NULL;
-
-                               switch (Z_LVAL_P(zdisposition_copy)) {
-                                       case PHP_HTTP_CONTENT_DISPOSITION_NONE:
-                                               ret = php_http_env_set_response_header_value(0, ZEND_STRL("Content-Disposition"), NULL, 1 TSRMLS_CC);
-                                       case PHP_HTTP_CONTENT_DISPOSITION_INLINE:
-                                               tmp = "inline";
-                                               break;
-                                       case PHP_HTTP_CONTENT_DISPOSITION_ATTACHMENT:
-                                               tmp = "attachment";
-                                               break;
+                       php_http_buffer_init(&buf);
+                       if (php_http_params_to_string(&buf, Z_ARRVAL_P(zoption_copy), ZEND_STRL(","), ZEND_STRL(";"), ZEND_STRL("="), PHP_HTTP_PARAMS_DEFAULT TSRMLS_CC)) {
+                               if (buf.used) {
+                                       ret = r->ops->set_header(r, "Content-Disposition: %.*s", buf.used, buf.data);
                                }
-
-                               if (tmp) {
-                                       if (SUCCESS != zend_hash_find(Z_ARRVAL_P(zoption_copy), ZEND_STRS("filename"), (void *) &zfilename)) {
-                                               ret = php_http_env_set_response_header_format(0, 1 TSRMLS_CC, "Content-Disposition: %s", tmp);
-                                       } else {
-                                               zval *zfilename_copy = php_http_ztyp(IS_STRING, *zfilename);
-
-                                               if (!Z_STRLEN_P(zfilename_copy)) {
-                                                       ret = php_http_env_set_response_header_format(0, 1 TSRMLS_CC, "Content-Disposition: %s", tmp);
-                                               } else {
-                                                       int new_f_len;
-                                                       char *new_f_str = php_addslashes(estrndup(Z_STRVAL_P(zfilename_copy), Z_STRLEN_P(zfilename_copy)), Z_STRLEN_P(zfilename_copy), &new_f_len, 0 TSRMLS_CC);
-
-                                                       ret = php_http_env_set_response_header_format(0, 1 TSRMLS_CC, "Content-Disposition: %s; filename=\"%.*s\"", tmp, new_f_len, new_f_str);
-                                                       STR_FREE(new_f_str);
-                                               }
-
-                                               zval_ptr_dtor(&zfilename_copy);
-                                       }
-                               }
-                               zval_ptr_dtor(&zdisposition_copy);
                        }
+
+                       php_http_buffer_dtor(&buf);
                        zval_ptr_dtor(&zoption_copy);
+                       zval_ptr_dtor(&zoption);
                }
 
                if (ret != SUCCESS) {
@@ -442,7 +460,7 @@ static STATUS php_http_env_response_send_head(php_http_env_response_t *r)
                                        add_next_index_stringl(&zsupported, ZEND_STRL("gzip"), 1);
                                        add_next_index_stringl(&zsupported, ZEND_STRL("deflate"), 1);
 
-                                       if ((result = php_http_negotiate_encoding(Z_ARRVAL(zsupported) TSRMLS_CC))) {
+                                       if ((result = php_http_negotiate_encoding(Z_ARRVAL(zsupported), request TSRMLS_CC))) {
                                                char *key_str = NULL;
                                                uint key_len = 0;
 
@@ -451,21 +469,21 @@ static STATUS php_http_env_response_send_head(php_http_env_response_t *r)
                                                        if (!strcmp(key_str, "gzip")) {
                                                                if (!(r->content.encoder = php_http_encoding_stream_init(NULL, php_http_encoding_stream_get_deflate_ops(), PHP_HTTP_DEFLATE_TYPE_GZIP TSRMLS_CC))) {
                                                                        ret = FAILURE;
-                                                               } else if (SUCCESS == (ret = php_http_env_set_response_header(0, ZEND_STRL("Content-Encoding: gzip"), 1 TSRMLS_CC))) {
+                                                               } else if (SUCCESS == (ret = r->ops->set_header(r, "Content-Encoding: gzip"))) {
                                                                        r->content.encoding = estrndup(key_str, key_len - 1);
                                                                }
                                                        } else if (!strcmp(key_str, "deflate")) {
                                                                if (!(r->content.encoder = php_http_encoding_stream_init(NULL, php_http_encoding_stream_get_deflate_ops(), PHP_HTTP_DEFLATE_TYPE_ZLIB TSRMLS_CC))) {
                                                                        ret = FAILURE;
-                                                               } else if (SUCCESS == (ret = php_http_env_set_response_header(0, ZEND_STRL("Content-Encoding: deflate"), 1 TSRMLS_CC))) {
+                                                               } else if (SUCCESS == (ret = r->ops->set_header(r, "Content-Encoding: deflate"))) {
                                                                        r->content.encoding = estrndup(key_str, key_len - 1);
                                                                }
                                                        } else {
-                                                               ret = php_http_env_set_response_header_value(0, ZEND_STRL("Content-Encoding"), NULL, 0 TSRMLS_CC);
+                                                               ret = r->ops->del_header(r, ZEND_STRL("Content-Encoding"));
                                                        }
 
                                                        if (SUCCESS == ret) {
-                                                               ret = php_http_env_set_response_header(0, ZEND_STRL("Vary: Accept-Encoding"), 0 TSRMLS_CC);
+                                                               ret = r->ops->add_header(r, "Vary: Accept-Encoding");
                                                        }
                                                }
 
@@ -478,7 +496,7 @@ static STATUS php_http_env_response_send_head(php_http_env_response_t *r)
 
                                case PHP_HTTP_CONTENT_ENCODING_NONE:
                                default:
-                                       ret = php_http_env_set_response_header_value(0, ZEND_STRL("Content-Encoding"), NULL, 0 TSRMLS_CC);
+                                       ret = r->ops->del_header(r, ZEND_STRL("Content-Encoding"));
                                        break;
                        }
                        zval_ptr_dtor(&zoption_copy);
@@ -488,37 +506,47 @@ static STATUS php_http_env_response_send_head(php_http_env_response_t *r)
                        return ret;
                }
 
-               switch (php_http_env_is_response_cached_by_etag(options, ZEND_STRL("If-None-Match") TSRMLS_CC)) {
-                       case PHP_HTTP_CACHE_MISS:
-                               break;
-
-                       case PHP_HTTP_CACHE_NO:
-                               if (PHP_HTTP_CACHE_HIT != php_http_env_is_response_cached_by_last_modified(options, ZEND_STRL("If-Modified-Since") TSRMLS_CC)) {
+               if (php_http_env_response_is_cacheable(r, request)) {
+                       switch (php_http_env_is_response_cached_by_etag(options, ZEND_STRL("If-None-Match"), request TSRMLS_CC)) {
+                               case PHP_HTTP_CACHE_MISS:
                                        break;
-                               }
 
-                       case PHP_HTTP_CACHE_HIT:
-                               ret = php_http_env_set_response_code(304 TSRMLS_CC);
-                               r->done = 1;
-                               break;
-               }
+                               case PHP_HTTP_CACHE_NO:
+                                       if (PHP_HTTP_CACHE_HIT != php_http_env_is_response_cached_by_last_modified(options, ZEND_STRL("If-Modified-Since"), request TSRMLS_CC)) {
+                                               break;
+                                       }
+                                       /*  no break */
 
-               if ((zoption = get_option(options, ZEND_STRL("etag") TSRMLS_CC))) {
-                       ret = php_http_env_set_response_header_value(0, ZEND_STRL("ETag"), zoption, 1 TSRMLS_CC);
-                       zval_ptr_dtor(&zoption);
-               }
-               if ((zoption = get_option(options, ZEND_STRL("lastModified") TSRMLS_CC))) {
-                       zval *zoption_copy = php_http_ztyp(IS_LONG, zoption);
+                               case PHP_HTTP_CACHE_HIT:
+                                       ret = r->ops->set_status(r, 304);
+                                       r->done = 1;
+                                       break;
+                       }
 
-                       zval_ptr_dtor(&zoption);
-                       if (Z_LVAL_P(zoption_copy)) {
-                               char *date = php_format_date(ZEND_STRL(PHP_HTTP_DATE_FORMAT), Z_LVAL_P(zoption_copy), 0 TSRMLS_CC);
-                               if (date) {
-                                       ret = php_http_env_set_response_header_format(0, 1 TSRMLS_CC, "Last-Modified: %s", date);
-                                       efree(date);
+                       if ((zoption = get_option(options, ZEND_STRL("etag") TSRMLS_CC))) {
+                               zval *zoption_copy = php_http_ztyp(IS_STRING, zoption);
+
+                               zval_ptr_dtor(&zoption);
+                               if (*Z_STRVAL_P(zoption_copy) != '"' && strncmp(Z_STRVAL_P(zoption_copy), "W/\"", 3)) {
+                                       ret = r->ops->set_header(r, "ETag: \"%s\"", Z_STRVAL_P(zoption_copy));
+                               } else {
+                                       ret = r->ops->set_header(r, "ETag: %s", Z_STRVAL_P(zoption_copy));
                                }
+                               zval_ptr_dtor(&zoption_copy);
+                       }
+                       if ((zoption = get_option(options, ZEND_STRL("lastModified") TSRMLS_CC))) {
+                               zval *zoption_copy = php_http_ztyp(IS_LONG, zoption);
+
+                               zval_ptr_dtor(&zoption);
+                               if (Z_LVAL_P(zoption_copy)) {
+                                       char *date = php_format_date(ZEND_STRL(PHP_HTTP_DATE_FORMAT), Z_LVAL_P(zoption_copy), 0 TSRMLS_CC);
+                                       if (date) {
+                                               ret = r->ops->set_header(r, "Last-Modified: %s", date);
+                                               efree(date);
+                                       }
+                               }
+                               zval_ptr_dtor(&zoption_copy);
                        }
-                       zval_ptr_dtor(&zoption_copy);
                }
        }
 
@@ -528,39 +556,48 @@ static STATUS php_http_env_response_send_head(php_http_env_response_t *r)
 static STATUS php_http_env_response_send_body(php_http_env_response_t *r)
 {
        STATUS ret = SUCCESS;
-       zval *zbody;
+       zval *zoption;
+       php_http_message_body_t *body;
        TSRMLS_FETCH_FROM_CTX(r->ts);
 
        if (r->done) {
                return ret;
        }
 
-       if (    (zbody = get_option(r->options, ZEND_STRL("body") TSRMLS_CC))
-       &&              (Z_TYPE_P(zbody) == IS_OBJECT)
-       &&              instanceof_function(Z_OBJCE_P(zbody), php_http_message_body_class_entry TSRMLS_CC)
-       ) {
-               php_http_message_body_object_t *obj = zend_object_store_get_object(zbody TSRMLS_CC);
+       if ((body = get_body(r->options TSRMLS_CC))) {
+               if ((zoption = get_option(r->options, ZEND_STRL("throttleDelay") TSRMLS_CC))) {
+                       if (Z_TYPE_P(zoption) == IS_DOUBLE) {
+                               r->throttle.delay =  Z_DVAL_P(zoption);
+                       }
+                       zval_ptr_dtor(&zoption);
+               }
+               if ((zoption = get_option(r->options, ZEND_STRL("throttleChunk") TSRMLS_CC))) {
+                       if (Z_TYPE_P(zoption) == IS_LONG) {
+                               r->throttle.chunk = Z_LVAL_P(zoption);
+                       }
+                       zval_ptr_dtor(&zoption);
+               }
 
                if (r->range.status == PHP_HTTP_RANGE_OK) {
                        if (zend_hash_num_elements(&r->range.values) == 1) {
                                /* single range */
                                zval **range, **begin, **end;
 
-                               if (SUCCESS != zend_hash_index_find(&r->range.values, 0, (void *) &range)
-                               ||      SUCCESS != zend_hash_index_find(Z_ARRVAL_PP(range), 0, (void *) &begin)
-                               ||      SUCCESS != zend_hash_index_find(Z_ARRVAL_PP(range), 1, (void *) &end)
+                               if (    1 == php_http_array_list(&r->range.values TSRMLS_CC, 1, &range)
+                                       &&      2 == php_http_array_list(Z_ARRVAL_PP(range) TSRMLS_CC, 2, &begin, &end)
                                ) {
-                                       /* this should never happen */
-                                       zend_hash_destroy(&r->range.values);
-                                       php_http_env_set_response_code(500 TSRMLS_CC);
-                                       ret = FAILURE;
-                               } else {
                                        /* send chunk */
-                                       php_http_message_body_to_callback(obj->body, (php_http_pass_callback_t) php_http_env_response_send_data, r, Z_LVAL_PP(begin), Z_LVAL_PP(end) - Z_LVAL_PP(begin) + 1);
+                                       php_http_message_body_to_callback(body, (php_http_pass_callback_t) php_http_env_response_send_data, r, Z_LVAL_PP(begin), Z_LVAL_PP(end) - Z_LVAL_PP(begin) + 1);
                                        php_http_env_response_send_done(r);
                                        zend_hash_destroy(&r->range.values);
                                        ret = SUCCESS;
+                               } else {
+                                       /* this should never happen */
+                                       zend_hash_destroy(&r->range.values);
+                                       r->ops->set_status(r, 500);
+                                       ret = FAILURE;
                                }
+
                        } else {
                                /* send multipart/byte-ranges message */
                                HashPosition pos;
@@ -569,12 +606,7 @@ static STATUS php_http_env_response_send_body(php_http_env_response_t *r)
                                FOREACH_HASH_VAL(pos, &r->range.values, chunk) {
                                        zval **begin, **end;
 
-                                       if (IS_ARRAY == Z_TYPE_PP(chunk)
-                                       &&      SUCCESS == zend_hash_index_find(Z_ARRVAL_PP(chunk), 0, (void *) &begin)
-                                       &&      IS_LONG == Z_TYPE_PP(begin)
-                                       &&      SUCCESS == zend_hash_index_find(Z_ARRVAL_PP(chunk), 1, (void *) &end)
-                                       &&      IS_LONG == Z_TYPE_PP(end)
-                                       ) {
+                                       if (2 == php_http_array_list(Z_ARRVAL_PP(chunk) TSRMLS_CC, 2, &begin, &end)) {
                                                php_http_buffer_appendf(r->buffer,
                                                                PHP_HTTP_CRLF
                                                                "--%s" PHP_HTTP_CRLF
@@ -587,7 +619,7 @@ static STATUS php_http_env_response_send_body(php_http_env_response_t *r)
                                                                Z_LVAL_PP(end),
                                                                r->content.length
                                                );
-                                               php_http_message_body_to_callback(obj->body, (php_http_pass_callback_t) php_http_env_response_send_data, r, Z_LVAL_PP(begin), Z_LVAL_PP(end) - Z_LVAL_PP(begin) + 1);
+                                               php_http_message_body_to_callback(body, (php_http_pass_callback_t) php_http_env_response_send_data, r, Z_LVAL_PP(begin), Z_LVAL_PP(end) - Z_LVAL_PP(begin) + 1);
                                        }
                                }
                                php_http_buffer_appendf(r->buffer, PHP_HTTP_CRLF "--%s--", r->range.boundary);
@@ -596,36 +628,30 @@ static STATUS php_http_env_response_send_body(php_http_env_response_t *r)
                        }
 
                } else {
-                       php_http_message_body_to_callback(obj->body, (php_http_pass_callback_t) php_http_env_response_send_data, r, 0, 0);
+                       php_http_message_body_to_callback(body, (php_http_pass_callback_t) php_http_env_response_send_data, r, 0, 0);
                        php_http_env_response_send_done(r);
                }
        }
-       if (zbody) {
-               zval_ptr_dtor(&zbody);
-       }
        return ret;
 }
 
 PHP_HTTP_API STATUS php_http_env_response_send(php_http_env_response_t *r)
 {
-       zval *zbody;
+       php_http_message_t *request;
+       php_http_message_body_t *body;
        TSRMLS_FETCH_FROM_CTX(r->ts);
 
-       /* check for ranges */
-       if (    (zbody = get_option(r->options, ZEND_STRL("body") TSRMLS_CC))
-       &&              (Z_TYPE_P(zbody) == IS_OBJECT)
-       &&              instanceof_function(Z_OBJCE_P(zbody), php_http_message_body_class_entry TSRMLS_CC)
-       ) {
-               php_http_message_body_object_t *obj = zend_object_store_get_object(zbody TSRMLS_CC);
+       request = get_request(r->options TSRMLS_CC);
 
-               r->content.length = php_http_message_body_size(obj->body);
-               zval_ptr_dtor(&zbody);
+       /* check for ranges */
+       if ((body = get_body(r->options TSRMLS_CC))) {
+               r->content.length = php_http_message_body_size(body);
 
-               if (SUCCESS != php_http_env_set_response_header(0, ZEND_STRL("Accept-Ranges: bytes"), 1 TSRMLS_CC)) {
+               if (SUCCESS != r->ops->set_header(r, "Accept-Ranges: bytes")) {
                        return FAILURE;
                } else {
                        zend_hash_init(&r->range.values, 0, NULL, ZVAL_PTR_DTOR, 0);
-                       r->range.status = php_http_env_get_request_ranges(&r->range.values, r->content.length TSRMLS_CC);
+                       r->range.status = php_http_env_get_request_ranges(&r->range.values, r->content.length, request TSRMLS_CC);
 
                        switch (r->range.status) {
                                case PHP_HTTP_RANGE_NO:
@@ -633,54 +659,398 @@ PHP_HTTP_API STATUS php_http_env_response_send(php_http_env_response_t *r)
                                        break;
 
                                case PHP_HTTP_RANGE_ERR:
-                                       if (php_http_env_got_request_header(ZEND_STRL("If-Range") TSRMLS_CC)) {
+                                       if (php_http_env_got_request_header(ZEND_STRL("If-Range"), request TSRMLS_CC)) {
                                                r->range.status = PHP_HTTP_RANGE_NO;
                                                zend_hash_destroy(&r->range.values);
                                        } else {
                                                r->done = 1;
                                                zend_hash_destroy(&r->range.values);
-                                               if (SUCCESS != php_http_env_set_response_header_format(416, 1 TSRMLS_CC, "Content-Range: bytes */%zu", r->content.length)) {
+                                               if (SUCCESS != r->ops->set_status(r, 416)) {
+                                                       return FAILURE;
+                                               }
+                                               if (SUCCESS != r->ops->set_header(r, "Content-Range: bytes */%zu", r->content.length)) {
                                                        return FAILURE;
                                                }
                                        }
                                        break;
 
                                case PHP_HTTP_RANGE_OK:
-                                       if (PHP_HTTP_CACHE_MISS == php_http_env_is_response_cached_by_etag(r->options, ZEND_STRL("If-Range") TSRMLS_CC)
-                                       ||      PHP_HTTP_CACHE_MISS == php_http_env_is_response_cached_by_last_modified(r->options, ZEND_STRL("If-Range") TSRMLS_CC)
+                                       if (PHP_HTTP_CACHE_MISS == php_http_env_is_response_cached_by_etag(r->options, ZEND_STRL("If-Range"), request TSRMLS_CC)
+                                       ||      PHP_HTTP_CACHE_MISS == php_http_env_is_response_cached_by_last_modified(r->options, ZEND_STRL("If-Range"), request TSRMLS_CC)
                                        ) {
                                                r->range.status = PHP_HTTP_RANGE_NO;
                                                zend_hash_destroy(&r->range.values);
                                                break;
                                        }
-                                       if (PHP_HTTP_CACHE_MISS == php_http_env_is_response_cached_by_etag(r->options, ZEND_STRL("If-Match") TSRMLS_CC)
-                                       ||      PHP_HTTP_CACHE_MISS == php_http_env_is_response_cached_by_last_modified(r->options, ZEND_STRL("If-Unmodified-Since") TSRMLS_CC)
-                                       ||      PHP_HTTP_CACHE_MISS == php_http_env_is_response_cached_by_last_modified(r->options, ZEND_STRL("Unless-Modified-Since") TSRMLS_CC)
+                                       if (PHP_HTTP_CACHE_MISS == php_http_env_is_response_cached_by_etag(r->options, ZEND_STRL("If-Match"), request TSRMLS_CC)
+                                       ||      PHP_HTTP_CACHE_MISS == php_http_env_is_response_cached_by_last_modified(r->options, ZEND_STRL("If-Unmodified-Since"), request TSRMLS_CC)
+                                       ||      PHP_HTTP_CACHE_MISS == php_http_env_is_response_cached_by_last_modified(r->options, ZEND_STRL("Unless-Modified-Since"), request TSRMLS_CC)
                                        ) {
                                                r->done = 1;
                                                zend_hash_destroy(&r->range.values);
-                                               if (SUCCESS != php_http_env_set_response_code(412 TSRMLS_CC)) {
+                                               if (SUCCESS != r->ops->set_status(r, 412)) {
                                                        return FAILURE;
                                                }
                                                break;
                                        }
+
+                                       break;
                        }
                }
-       } else if (zbody) {
-               zval_ptr_dtor(&zbody);
        }
 
-       if (SUCCESS != php_http_env_response_send_head(r)) {
+       if (SUCCESS != php_http_env_response_send_head(r, request)) {
                return FAILURE;
        }
 
        if (SUCCESS != php_http_env_response_send_body(r)) {
                return FAILURE;
        }
+
+       if (SUCCESS != r->ops->finish(r)) {
+               return FAILURE;
+       }
+
        return SUCCESS;
 }
 
-zend_class_entry *php_http_env_response_class_entry;
+static long php_http_env_response_sapi_get_status(php_http_env_response_t *r)
+{
+       TSRMLS_FETCH_FROM_CTX(r->ts);
+
+       return php_http_env_get_response_code(TSRMLS_C);
+}
+static STATUS php_http_env_response_sapi_set_status(php_http_env_response_t *r, long http_code)
+{
+       TSRMLS_FETCH_FROM_CTX(r->ts);
+
+       return php_http_env_set_response_code(http_code TSRMLS_CC);
+}
+static STATUS php_http_env_response_sapi_set_protocol_version(php_http_env_response_t *r, php_http_version_t *v)
+{
+       TSRMLS_FETCH_FROM_CTX(r->ts);
+
+       return php_http_env_set_response_protocol_version(v TSRMLS_CC);
+}
+static STATUS php_http_env_response_sapi_set_header(php_http_env_response_t *r, const char *fmt, ...)
+{
+       STATUS ret;
+       va_list args;
+       TSRMLS_FETCH_FROM_CTX(r->ts);
+
+       va_start(args, fmt);
+       ret = php_http_env_set_response_header_va(0, 1, fmt, args TSRMLS_CC);
+       va_end(args);
+
+       return ret;
+}
+static STATUS php_http_env_response_sapi_add_header(php_http_env_response_t *r, const char *fmt, ...)
+{
+       STATUS ret;
+       va_list args;
+       TSRMLS_FETCH_FROM_CTX(r->ts);
+
+       va_start(args, fmt);
+       ret = php_http_env_set_response_header_va(0, 0, fmt, args TSRMLS_CC);
+       va_end(args);
+
+       return ret;
+}
+static STATUS php_http_env_response_sapi_del_header(php_http_env_response_t *r, const char *header_str, size_t header_len)
+{
+       TSRMLS_FETCH_FROM_CTX(r->ts);
+
+       return php_http_env_set_response_header_value(0, header_str, header_len, NULL, 1 TSRMLS_CC);
+}
+static STATUS php_http_env_response_sapi_write(php_http_env_response_t *r, const char *data_str, size_t data_len)
+{
+       TSRMLS_FETCH_FROM_CTX(r->ts);
+
+       if (0 < PHPWRITE(data_str, data_len)) {
+               return SUCCESS;
+       }
+       return FAILURE;
+}
+static STATUS php_http_env_response_sapi_flush(php_http_env_response_t *r)
+{
+       TSRMLS_FETCH_FROM_CTX(r->ts);
+
+#if PHP_VERSION_ID >= 50400
+       if (php_output_get_level(TSRMLS_C)) {
+               php_output_flush_all(TSRMLS_C);
+       }
+       if (!(php_output_get_status(TSRMLS_C) & PHP_OUTPUT_IMPLICITFLUSH)) {
+               sapi_flush(TSRMLS_C);
+       }
+#else
+       php_end_ob_buffer(1, 1 TSRMLS_CC);
+       sapi_flush(TSRMLS_C);
+#endif
+
+       return SUCCESS;
+}
+static STATUS php_http_env_response_sapi_finish(php_http_env_response_t *r)
+{
+       return SUCCESS;
+}
+
+static php_http_env_response_ops_t php_http_env_response_sapi_ops = {
+       NULL,
+       NULL,
+       php_http_env_response_sapi_get_status,
+       php_http_env_response_sapi_set_status,
+       php_http_env_response_sapi_set_protocol_version,
+       php_http_env_response_sapi_set_header,
+       php_http_env_response_sapi_add_header,
+       php_http_env_response_sapi_del_header,
+       php_http_env_response_sapi_write,
+       php_http_env_response_sapi_flush,
+       php_http_env_response_sapi_finish
+};
+
+PHP_HTTP_API php_http_env_response_ops_t *php_http_env_response_get_sapi_ops(void)
+{
+       return &php_http_env_response_sapi_ops;
+}
+
+typedef struct php_http_env_response_stream_ctx {
+       HashTable header;
+       php_http_version_t version;
+       long status_code;
+
+       php_stream *stream;
+
+       unsigned started:1;
+       unsigned finished:1;
+} php_http_env_response_stream_ctx_t;
+
+static STATUS php_http_env_response_stream_init(php_http_env_response_t *r, void *init_arg)
+{
+       php_http_env_response_stream_ctx_t *ctx;
+       TSRMLS_FETCH_FROM_CTX(r->ts);
+
+       ctx = ecalloc(1, sizeof(*ctx));
+
+       ctx->stream = init_arg;
+       if (SUCCESS != zend_list_addref(ctx->stream->rsrc_id)) {
+               efree(ctx);
+               return FAILURE;
+       }
+       zend_hash_init(&ctx->header, 0, NULL, ZVAL_PTR_DTOR, 0);
+       php_http_version_init(&ctx->version, 1, 1 TSRMLS_CC);
+       ctx->status_code = 200;
+
+       r->ctx = ctx;
+
+       return SUCCESS;
+}
+static void php_http_env_response_stream_dtor(php_http_env_response_t *r)
+{
+       php_http_env_response_stream_ctx_t *ctx = r->ctx;
+       TSRMLS_FETCH_FROM_CTX(r->ts);
+
+       zend_hash_destroy(&ctx->header);
+       zend_list_delete(ctx->stream->rsrc_id);
+       efree(ctx);
+       r->ctx = NULL;
+}
+static void php_http_env_response_stream_header(php_http_env_response_stream_ctx_t *ctx, HashTable *header TSRMLS_DC)
+{
+       HashPosition pos;
+       zval **val;
+
+       FOREACH_HASH_VAL(pos, &ctx->header, val) {
+               if (Z_TYPE_PP(val) == IS_ARRAY) {
+                       php_http_env_response_stream_header(ctx, Z_ARRVAL_PP(val) TSRMLS_CC);
+               } else {
+                       php_stream_write(ctx->stream, Z_STRVAL_PP(val), Z_STRLEN_PP(val));
+                       php_stream_write_string(ctx->stream, PHP_HTTP_CRLF);
+               }
+       }
+}
+static STATUS php_http_env_response_stream_start(php_http_env_response_stream_ctx_t *ctx TSRMLS_DC)
+{
+       if (ctx->started || ctx->finished) {
+               return FAILURE;
+       }
+
+       php_stream_printf(ctx->stream TSRMLS_CC, "HTTP/%u.%u %ld %s" PHP_HTTP_CRLF, ctx->version.major, ctx->version.minor, ctx->status_code, php_http_env_get_response_status_for_code(ctx->status_code));
+       php_http_env_response_stream_header(ctx, &ctx->header TSRMLS_CC);
+       php_stream_write_string(ctx->stream, PHP_HTTP_CRLF);
+       ctx->started = 1;
+       return SUCCESS;
+}
+static long php_http_env_response_stream_get_status(php_http_env_response_t *r)
+{
+       php_http_env_response_stream_ctx_t *ctx = r->ctx;
+
+       return ctx->status_code;
+}
+static STATUS php_http_env_response_stream_set_status(php_http_env_response_t *r, long http_code)
+{
+       php_http_env_response_stream_ctx_t *stream_ctx = r->ctx;
+
+       if (stream_ctx->started || stream_ctx->finished) {
+               return FAILURE;
+       }
+
+       stream_ctx->status_code = http_code;
+
+       return SUCCESS;
+}
+static STATUS php_http_env_response_stream_set_protocol_version(php_http_env_response_t *r, php_http_version_t *v)
+{
+       php_http_env_response_stream_ctx_t *stream_ctx = r->ctx;
+
+       if (stream_ctx->started || stream_ctx->finished) {
+               return FAILURE;
+       }
+
+       memcpy(&stream_ctx->version, v, sizeof(stream_ctx->version));
+
+       return SUCCESS;
+}
+static STATUS php_http_env_response_stream_set_header_ex(php_http_env_response_t *r, zend_bool replace, const char *fmt, va_list argv)
+{
+       php_http_env_response_stream_ctx_t *stream_ctx = r->ctx;
+       char *header_end, *header_str = NULL;
+       size_t header_len = 0;
+       zval *zheader, **zheader_ptr;
+
+       if (stream_ctx->started || stream_ctx->finished) {
+               return FAILURE;
+       }
+
+       header_len = vspprintf(&header_str, 0, fmt, argv);
+
+       if (!(header_end = strchr(header_str, ':'))) {
+               efree(header_str);
+               return FAILURE;
+       }
+
+       *header_end = '\0';
+
+       if (!replace && (SUCCESS == zend_hash_find(&stream_ctx->header, header_str, header_end - header_str + 1, (void *) &zheader_ptr))) {
+               convert_to_array(*zheader_ptr);
+               *header_end = ':';
+               return add_next_index_stringl(*zheader_ptr, header_str, header_len, 0);
+       } else {
+               MAKE_STD_ZVAL(zheader);
+               ZVAL_STRINGL(zheader, header_str, header_len, 0);
+
+               if (SUCCESS != zend_hash_update(&stream_ctx->header, header_str, header_end - header_str + 1, (void *) &zheader, sizeof(zval *), NULL)) {
+                       zval_ptr_dtor(&zheader);
+                       return FAILURE;
+               }
+
+               *header_end = ':';
+               return SUCCESS;
+       }
+}
+static STATUS php_http_env_response_stream_set_header(php_http_env_response_t *r, const char *fmt, ...)
+{
+       STATUS ret;
+       va_list argv;
+
+       va_start(argv, fmt);
+       ret = php_http_env_response_stream_set_header_ex(r, 1, fmt, argv);
+       va_end(argv);
+
+       return ret;
+}
+static STATUS php_http_env_response_stream_add_header(php_http_env_response_t *r, const char *fmt, ...)
+{
+       STATUS ret;
+       va_list argv;
+
+       va_start(argv, fmt);
+       ret = php_http_env_response_stream_set_header_ex(r, 0, fmt, argv);
+       va_end(argv);
+
+       return ret;
+}
+static STATUS php_http_env_response_stream_del_header(php_http_env_response_t *r, const char *header_str, size_t header_len)
+{
+       php_http_env_response_stream_ctx_t *stream_ctx = r->ctx;
+
+       if (stream_ctx->started || stream_ctx->finished) {
+               return FAILURE;
+       }
+
+       zend_hash_del(&stream_ctx->header, header_str, header_len + 1);
+       return SUCCESS;
+}
+static STATUS php_http_env_response_stream_write(php_http_env_response_t *r, const char *data_str, size_t data_len)
+{
+       php_http_env_response_stream_ctx_t *stream_ctx = r->ctx;
+       TSRMLS_FETCH_FROM_CTX(r->ts);
+
+       if (stream_ctx->finished) {
+               return FAILURE;
+       }
+       if (!stream_ctx->started) {
+               if (SUCCESS != php_http_env_response_stream_start(stream_ctx TSRMLS_CC)) {
+                       return FAILURE;
+               }
+       }
+
+       php_stream_write(stream_ctx->stream, data_str, data_len);
+
+       return SUCCESS;
+}
+static STATUS php_http_env_response_stream_flush(php_http_env_response_t *r)
+{
+       php_http_env_response_stream_ctx_t *stream_ctx = r->ctx;
+       TSRMLS_FETCH_FROM_CTX(r->ts);
+
+       if (stream_ctx->finished) {
+               return FAILURE;
+       }
+       if (!stream_ctx->started) {
+               if (SUCCESS != php_http_env_response_stream_start(stream_ctx TSRMLS_CC)) {
+                       return FAILURE;
+               }
+       }
+
+       return php_stream_flush(stream_ctx->stream);
+}
+static STATUS php_http_env_response_stream_finish(php_http_env_response_t *r)
+{
+       php_http_env_response_stream_ctx_t *stream_ctx = r->ctx;
+       TSRMLS_FETCH_FROM_CTX(r->ts);
+
+       if (stream_ctx->finished) {
+               return FAILURE;
+       }
+       if (!stream_ctx->started) {
+               if (SUCCESS != php_http_env_response_stream_start(stream_ctx TSRMLS_CC)) {
+                       return FAILURE;
+               }
+       }
+
+       stream_ctx->finished = 1;
+
+       return SUCCESS;
+}
+
+static php_http_env_response_ops_t php_http_env_response_stream_ops = {
+       php_http_env_response_stream_init,
+       php_http_env_response_stream_dtor,
+       php_http_env_response_stream_get_status,
+       php_http_env_response_stream_set_status,
+       php_http_env_response_stream_set_protocol_version,
+       php_http_env_response_stream_set_header,
+       php_http_env_response_stream_add_header,
+       php_http_env_response_stream_del_header,
+       php_http_env_response_stream_write,
+       php_http_env_response_stream_flush,
+       php_http_env_response_stream_finish
+};
+
+PHP_HTTP_API php_http_env_response_ops_t *php_http_env_response_get_stream_ops(void)
+{
+       return &php_http_env_response_stream_ops;
+}
 
 #undef PHP_HTTP_BEGIN_ARGS
 #undef PHP_HTTP_EMPTY_ARGS
@@ -690,6 +1060,15 @@ zend_class_entry *php_http_env_response_class_entry;
 
 PHP_HTTP_EMPTY_ARGS(__construct);
 
+PHP_HTTP_BEGIN_ARGS(__invoke, 1)
+       PHP_HTTP_ARG_VAL(ob_string, 0)
+       PHP_HTTP_ARG_VAL(ob_flags, 0)
+PHP_HTTP_END_ARGS;
+
+PHP_HTTP_BEGIN_ARGS(setEnvRequest, 1)
+       PHP_HTTP_ARG_OBJ(http\\Message, env_request, 1)
+PHP_HTTP_END_ARGS;
+
 PHP_HTTP_BEGIN_ARGS(setContentType, 1)
        PHP_HTTP_ARG_VAL(content_type, 0)
 PHP_HTTP_END_ARGS;
@@ -699,8 +1078,7 @@ PHP_HTTP_BEGIN_ARGS(setContentEncoding, 1)
 PHP_HTTP_END_ARGS;
 
 PHP_HTTP_BEGIN_ARGS(setContentDisposition, 1)
-       PHP_HTTP_ARG_VAL(content_disposition, 0)
-       PHP_HTTP_ARG_VAL(filename, 0)
+       PHP_HTTP_ARG_ARR(disposition_params, 1, 0)
 PHP_HTTP_END_ARGS;
 
 PHP_HTTP_BEGIN_ARGS(setCacheControl, 1)
@@ -730,9 +1108,17 @@ PHP_HTTP_END_ARGS;
 
 PHP_HTTP_EMPTY_ARGS(send);
 
+static zend_class_entry *php_http_env_response_class_entry;
 
-zend_function_entry php_http_env_response_method_entry[] = {
+zend_class_entry *php_http_env_response_get_class_entry(void)
+{
+       return php_http_env_response_class_entry;
+}
+
+static zend_function_entry php_http_env_response_method_entry[] = {
        PHP_HTTP_ENV_RESPONSE_ME(__construct, ZEND_ACC_PUBLIC|ZEND_ACC_CTOR)
+       PHP_HTTP_ENV_RESPONSE_ME(__invoke, ZEND_ACC_PUBLIC)
+       PHP_HTTP_ENV_RESPONSE_ME(setEnvRequest, ZEND_ACC_PUBLIC)
        PHP_HTTP_ENV_RESPONSE_ME(setContentType, ZEND_ACC_PUBLIC)
        PHP_HTTP_ENV_RESPONSE_ME(setContentDisposition, ZEND_ACC_PUBLIC)
        PHP_HTTP_ENV_RESPONSE_ME(setContentEncoding, ZEND_ACC_PUBLIC)
@@ -748,21 +1134,56 @@ zend_function_entry php_http_env_response_method_entry[] = {
        EMPTY_FUNCTION_ENTRY
 };
 
+#define PHP_HTTP_ENV_RESPONSE_OBJECT_INIT(obj) \
+       do { \
+               if (!obj->message) { \
+                       obj->message = php_http_message_init_env(NULL, PHP_HTTP_RESPONSE TSRMLS_CC); \
+               } \
+       } while (0)
 
 PHP_METHOD(HttpEnvResponse, __construct)
 {
-       with_error_handling(EH_THROW, php_http_exception_class_entry) {
-               if (SUCCESS == zend_parse_parameters_none()) {
-                       php_http_message_object_t *obj = zend_object_store_get_object(getThis() TSRMLS_CC);
+       with_error_handling(EH_THROW, php_http_exception_get_class_entry()) {
+               php_http_message_object_t *obj = zend_object_store_get_object(getThis() TSRMLS_CC);
 
-                       with_error_handling(EH_THROW, php_http_exception_class_entry) {
+               if (SUCCESS == zend_parse_parameters_none()) {
+                       with_error_handling(EH_THROW, php_http_exception_get_class_entry()) {
                                obj->message = php_http_message_init_env(obj->message, PHP_HTTP_RESPONSE TSRMLS_CC);
                        } end_error_handling();
                }
+               PHP_HTTP_ENV_RESPONSE_OBJECT_INIT(obj);
        } end_error_handling();
 
 }
 
+PHP_METHOD(HttpEnvResponse, __invoke)
+{
+       char *ob_str;
+       int ob_len;
+       long ob_flags = 0;
+
+       if (SUCCESS == zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "s|l", &ob_str, &ob_len, &ob_flags)) {
+               php_http_message_object_t *obj = zend_object_store_get_object(getThis() TSRMLS_CC);
+
+               PHP_HTTP_ENV_RESPONSE_OBJECT_INIT(obj);
+
+               if (obj->body.handle || SUCCESS == php_http_new(&obj->body, php_http_message_body_get_class_entry(), (php_http_new_t) php_http_message_body_object_new_ex, NULL, (void *) php_http_message_body_init(&obj->message->body, NULL TSRMLS_CC), NULL TSRMLS_CC)) {
+                       php_http_message_body_append(obj->message->body, ob_str, ob_len);
+                       RETURN_TRUE;
+               }
+               RETURN_FALSE;
+       }
+}
+
+PHP_METHOD(HttpEnvResponse, setEnvRequest)
+{
+       zval *env_req = NULL;
+
+       if (SUCCESS == zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "|O", &env_req, php_http_message_get_class_entry())) {
+               set_option(getThis(), ZEND_STRL("request"), IS_OBJECT, env_req, 0 TSRMLS_CC);
+       }
+}
+
 PHP_METHOD(HttpEnvResponse, setContentType)
 {
        char *ct_str = NULL;
@@ -775,21 +1196,10 @@ PHP_METHOD(HttpEnvResponse, setContentType)
 
 PHP_METHOD(HttpEnvResponse, setContentDisposition)
 {
-       long cd;
-       char *file_str = NULL;
-       int file_len = 0;
-
-       if (SUCCESS == zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "l|s!", &cd, &file_str, &file_len)) {
-               zval *arr;
+       zval *zdisposition;
 
-               MAKE_STD_ZVAL(arr);
-               array_init(arr);
-               add_assoc_long_ex(arr, ZEND_STRS("disposition"), cd);
-               if (file_len) {
-                       add_assoc_stringl_ex(arr, ZEND_STRS("filename"), file_str, file_len, 1);
-               }
-               zend_update_property(Z_OBJCE_P(getThis()), getThis(), ZEND_STRL("contentDisposition"), arr TSRMLS_CC);
-               zval_ptr_dtor(&arr);
+       if (SUCCESS == zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "a", &zdisposition)) {
+               zend_update_property(Z_OBJCE_P(getThis()), getThis(), ZEND_STRL("contentDisposition"), zdisposition TSRMLS_CC);
        }
 }
 
@@ -831,7 +1241,8 @@ PHP_METHOD(HttpEnvResponse, isCachedByLastModified)
                        header_name_str = "If-Modified-Since";
                        header_name_len = lenof("If-Modified-Since");
                }
-               RETURN_LONG(php_http_env_is_response_cached_by_last_modified(getThis(), header_name_str, header_name_len TSRMLS_CC));
+
+               RETURN_LONG(php_http_env_is_response_cached_by_last_modified(getThis(), header_name_str, header_name_len, get_request(getThis() TSRMLS_CC) TSRMLS_CC));
        }
        RETURN_FALSE;
 }
@@ -856,7 +1267,7 @@ PHP_METHOD(HttpEnvResponse, isCachedByEtag)
                        header_name_str = "If-None-Match";
                        header_name_len = lenof("If-None-Match");
                }
-               RETURN_LONG(php_http_env_is_response_cached_by_etag(getThis(), header_name_str, header_name_len TSRMLS_CC));
+               RETURN_LONG(php_http_env_is_response_cached_by_etag(getThis(), header_name_str, header_name_len, get_request(getThis() TSRMLS_CC) TSRMLS_CC));
        }
        RETURN_FALSE;
 }
@@ -867,10 +1278,8 @@ PHP_METHOD(HttpEnvResponse, setThrottleRate)
        double delay = 1;
 
        if (SUCCESS == zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "l|d", &chunk_size, &delay)) {
-               long chunk_size_long = (long) chunk_size;
-
                set_option(getThis(), ZEND_STRL("throttleDelay"), IS_DOUBLE, &delay, 0 TSRMLS_CC);
-               set_option(getThis(), ZEND_STRL("throttleChunk"), IS_LONG, &chunk_size_long, 0 TSRMLS_CC);
+               set_option(getThis(), ZEND_STRL("throttleChunk"), IS_LONG, &chunk_size, 0 TSRMLS_CC);
                RETURN_TRUE;
        }
        RETURN_FALSE;
@@ -878,26 +1287,37 @@ PHP_METHOD(HttpEnvResponse, setThrottleRate)
 
 PHP_METHOD(HttpEnvResponse, send)
 {
+       zval *zstream = NULL;
+       php_stream *s = NULL;
+
        RETVAL_FALSE;
 
-       if (SUCCESS == zend_parse_parameters_none()) {
-               php_http_env_response_t *r = php_http_env_response_init(NULL, getThis() TSRMLS_CC);
+       if (SUCCESS == zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "|r", &zstream)) {
+               if (zstream) {
+                       php_stream_from_zval_no_verify(s, &zstream);
 
-               if (r) {
-                       RETVAL_SUCCESS(php_http_env_response_send(r));
-               }
+                       if (s) {
+                               php_http_env_response_t *r;
+
+                               if ((r = php_http_env_response_init(NULL, getThis(), php_http_env_response_get_stream_ops(), s TSRMLS_CC))) {
+                                       RETVAL_SUCCESS(php_http_env_response_send(r));
+                                       php_http_env_response_free(&r);
+                               }
+                       }
+               } else {
+                       php_http_env_response_t r;
 
-               php_http_env_response_free(&r);
+                       if (php_http_env_response_init(&r, getThis(), NULL, NULL TSRMLS_CC)) {
+                               RETVAL_SUCCESS(php_http_env_response_send(&r));
+                               php_http_env_response_dtor(&r);
+                       }
+               }
        }
 }
 
 PHP_MINIT_FUNCTION(http_env_response)
 {
-       PHP_HTTP_REGISTER_CLASS(http\\env, Response, http_env_response, php_http_message_class_entry, 0);
-
-       zend_declare_class_constant_long(php_http_env_response_class_entry, ZEND_STRL("CONTENT_DISPOSITION_NONE"), PHP_HTTP_CONTENT_DISPOSITION_NONE TSRMLS_CC);
-       zend_declare_class_constant_long(php_http_env_response_class_entry, ZEND_STRL("CONTENT_DISPOSITION_INLINE"), PHP_HTTP_CONTENT_DISPOSITION_INLINE TSRMLS_CC);
-       zend_declare_class_constant_long(php_http_env_response_class_entry, ZEND_STRL("CONTENT_DISPOSITION_ATTACHMENT"), PHP_HTTP_CONTENT_DISPOSITION_ATTACHMENT TSRMLS_CC);
+       PHP_HTTP_REGISTER_CLASS(http\\Env, Response, http_env_response, php_http_message_get_class_entry(), 0);
 
        zend_declare_class_constant_long(php_http_env_response_class_entry, ZEND_STRL("CONTENT_ENCODING_NONE"), PHP_HTTP_CONTENT_ENCODING_NONE TSRMLS_CC);
        zend_declare_class_constant_long(php_http_env_response_class_entry, ZEND_STRL("CONTENT_ENCODING_GZIP"), PHP_HTTP_CONTENT_ENCODING_GZIP TSRMLS_CC);
@@ -906,6 +1326,7 @@ PHP_MINIT_FUNCTION(http_env_response)
        zend_declare_class_constant_long(php_http_env_response_class_entry, ZEND_STRL("CACHE_HIT"), PHP_HTTP_CACHE_HIT TSRMLS_CC);
        zend_declare_class_constant_long(php_http_env_response_class_entry, ZEND_STRL("CACHE_MISS"), PHP_HTTP_CACHE_MISS TSRMLS_CC);
 
+       zend_declare_property_null(php_http_env_response_class_entry, ZEND_STRL("request"), ZEND_ACC_PROTECTED TSRMLS_CC);
        zend_declare_property_null(php_http_env_response_class_entry, ZEND_STRL("contentType"), ZEND_ACC_PROTECTED TSRMLS_CC);
        zend_declare_property_null(php_http_env_response_class_entry, ZEND_STRL("contentDisposition"), ZEND_ACC_PROTECTED TSRMLS_CC);
        zend_declare_property_null(php_http_env_response_class_entry, ZEND_STRL("contentEncoding"), ZEND_ACC_PROTECTED TSRMLS_CC);