- added http_get_request_body()
[m6w6/ext-http] / http_methods.c
index e06f34078521155fc777944afde0c4dfb135d176..c18e5aec630aa7603f5e678ab23296862ed82b81 100644 (file)
 #endif
 
 #include "php.h"
+#include "php_streams.h"
+
 #include "php_http.h"
 #include "php_http_std_defs.h"
 #include "php_http_api.h"
 #include "php_http_cache_api.h"
-#include "php_http_curl_api.h"
+#include "php_http_request_api.h"
+#include "php_http_request_pool_api.h"
 #include "php_http_date_api.h"
 #include "php_http_headers_api.h"
 #include "php_http_message_api.h"
 #include "php_http_message_object.h"
 #include "php_http_response_object.h"
 #include "php_http_request_object.h"
+#include "php_http_requestpool_object.h"
 #include "php_http_exception_object.h"
 
 #ifdef ZEND_ENGINE_2
 
+#include "missing.h"
+
+ZEND_EXTERN_MODULE_GLOBALS(http)
+
 /* {{{ HttpResponse */
 
 /* {{{ proto void HttpResponse::__construct(bool cache, bool gzip)
@@ -92,13 +100,15 @@ PHP_METHOD(HttpResponse, setCache)
  */
 PHP_METHOD(HttpResponse, getCache)
 {
-       zval *do_cache = NULL;
-       getObject(http_response_object, obj);
-
        NO_ARGS;
 
-       do_cache = GET_PROP(obj, cache);
-       RETURN_BOOL(Z_LVAL_P(do_cache));
+       IF_RETVAL_USED {
+               zval *do_cache = NULL;
+               getObject(http_response_object, obj);
+
+               do_cache = GET_PROP(obj, cache);
+               RETURN_BOOL(Z_LVAL_P(do_cache));
+       }
 }
 /* }}}*/
 
@@ -126,13 +136,15 @@ PHP_METHOD(HttpResponse, setGzip)
  */
 PHP_METHOD(HttpResponse, getGzip)
 {
-       zval *do_gzip = NULL;
-       getObject(http_response_object, obj);
-
        NO_ARGS;
 
-       do_gzip = GET_PROP(obj, gzip);
-       RETURN_BOOL(Z_LVAL_P(do_gzip));
+       IF_RETVAL_USED {
+               zval *do_gzip;
+               getObject(http_response_object, obj);
+
+               do_gzip = GET_PROP(obj, gzip);
+               RETURN_BOOL(Z_LVAL_P(do_gzip));
+       }
 }
 /* }}} */
 
@@ -169,13 +181,15 @@ PHP_METHOD(HttpResponse, setCacheControl)
  */
 PHP_METHOD(HttpResponse, getCacheControl)
 {
-       zval *ccontrol;
-       getObject(http_response_object, obj);
-
        NO_ARGS;
 
-       ccontrol = GET_PROP(obj, cacheControl);
-       RETURN_STRINGL(Z_STRVAL_P(ccontrol), Z_STRLEN_P(ccontrol), 1);
+       IF_RETVAL_USED {
+               zval *ccontrol;
+               getObject(http_response_object, obj);
+
+               ccontrol = GET_PROP(obj, cacheControl);
+               RETURN_STRINGL(Z_STRVAL_P(ccontrol), Z_STRLEN_P(ccontrol), 1);
+       }
 }
 /* }}} */
 
@@ -210,13 +224,15 @@ PHP_METHOD(HttpResponse, setContentType)
  */
 PHP_METHOD(HttpResponse, getContentType)
 {
-       zval *ctype;
-       getObject(http_response_object, obj);
-
        NO_ARGS;
 
-       ctype = GET_PROP(obj, contentType);
-       RETURN_STRINGL(Z_STRVAL_P(ctype), Z_STRLEN_P(ctype), 1);
+       IF_RETVAL_USED {
+               zval *ctype;
+               getObject(http_response_object, obj);
+
+               ctype = GET_PROP(obj, contentType);
+               RETURN_STRINGL(Z_STRVAL_P(ctype), Z_STRLEN_P(ctype), 1);
+       }
 }
 /* }}} */
 
@@ -256,20 +272,19 @@ PHP_METHOD(HttpResponse, setContentDisposition)
  */
 PHP_METHOD(HttpResponse, getContentDisposition)
 {
-       zval *file;
-       zval *is_inline;
-       getObject(http_response_object, obj);
+       NO_ARGS;
 
-       if (ZEND_NUM_ARGS()) {
-               WRONG_PARAM_COUNT;
-       }
+       IF_RETVAL_USED {
+               zval *file, *is_inline;
+               getObject(http_response_object, obj);
 
-       file = GET_PROP(obj, dispoFile);
-       is_inline = GET_PROP(obj, dispoInline);
+               file = GET_PROP(obj, dispoFile);
+               is_inline = GET_PROP(obj, dispoInline);
 
-       array_init(return_value);
-       add_assoc_stringl(return_value, "filename", Z_STRVAL_P(file), Z_STRLEN_P(file), 1);
-       add_assoc_bool(return_value, "inline", Z_LVAL_P(is_inline));
+               array_init(return_value);
+               add_assoc_stringl(return_value, "filename", Z_STRVAL_P(file), Z_STRLEN_P(file), 1);
+               add_assoc_bool(return_value, "inline", Z_LVAL_P(is_inline));
+       }
 }
 /* }}} */
 
@@ -298,13 +313,79 @@ PHP_METHOD(HttpResponse, setETag)
  */
 PHP_METHOD(HttpResponse, getETag)
 {
-       zval *etag;
-       getObject(http_response_object, obj);
+       NO_ARGS;
+
+       IF_RETVAL_USED {
+               zval *etag;
+               getObject(http_response_object, obj);
 
+               etag = GET_PROP(obj, eTag);
+               RETURN_STRINGL(Z_STRVAL_P(etag), Z_STRLEN_P(etag), 1);
+       }
+}
+/* }}} */
+
+/* {{{ proto void HttpResponse::setThrottleDelay(double seconds)
+ *
+ */
+PHP_METHOD(HttpResponse, setThrottleDelay)
+{
+       double seconds;
+
+       if (SUCCESS == zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "d", &seconds)) {
+               getObject(http_response_object, obj);
+
+               UPD_PROP(obj, double, throttleDelay, seconds);
+       }
+}
+/* }}} */
+
+/* {{{ proto double HttpResponse::getThrottleDelay()
+ *
+ */
+PHP_METHOD(HttpResponse, getThrottleDelay)
+{
+       NO_ARGS;
+
+       IF_RETVAL_USED {
+               zval *seconds;
+               getObject(http_response_object, obj);
+
+               seconds = GET_PROP(obj, throttleDelay);
+               RETURN_DOUBLE(Z_DVAL_P(seconds));
+       }
+}
+/* }}} */
+
+/* {{{ proto void HttpResponse::setSendBuffersize(long bytes)
+ *
+ */
+PHP_METHOD(HttpResponse, setSendBuffersize)
+{
+       long bytes;
+
+       if (SUCCESS == zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "l", &bytes)) {
+               getObject(http_response_object, obj);
+
+               UPD_PROP(obj, long, sendBuffersize, bytes);
+       }
+}
+/* }}} */
+
+/* {{{ proto long HttpResponse::getSendBuffersize()
+ *
+ */
+PHP_METHOD(HttpResponse, getSendBuffersize)
+{
        NO_ARGS;
 
-       etag = GET_PROP(obj, eTag);
-       RETURN_STRINGL(Z_STRVAL_P(etag), Z_STRLEN_P(etag), 1);
+       IF_RETVAL_USED {
+               zval *bytes;
+               getObject(http_response_object, obj);
+
+               bytes = GET_PROP(obj, sendBuffersize);
+               RETURN_LONG(Z_LVAL_P(bytes));
+       }
 }
 /* }}} */
 
@@ -335,13 +416,15 @@ PHP_METHOD(HttpResponse, setData)
  */
 PHP_METHOD(HttpResponse, getData)
 {
-       zval *the_data;
-       getObject(http_response_object, obj);
-
        NO_ARGS;
 
-       the_data = GET_PROP(obj, data);
-       RETURN_STRINGL(Z_STRVAL_P(the_data), Z_STRLEN_P(the_data), 1);
+       IF_RETVAL_USED {
+               zval *the_data;
+               getObject(http_response_object, obj);
+
+               the_data = GET_PROP(obj, data);
+               RETURN_STRINGL(Z_STRVAL_P(the_data), Z_STRLEN_P(the_data), 1);
+       }
 }
 /* }}} */
 
@@ -374,13 +457,15 @@ PHP_METHOD(HttpResponse, setStream)
  */
 PHP_METHOD(HttpResponse, getStream)
 {
-       zval *the_stream;
-       getObject(http_response_object, obj);
-
        NO_ARGS;
 
-       the_stream = GET_PROP(obj, stream);
-       RETURN_RESOURCE(Z_LVAL_P(the_stream));
+       IF_RETVAL_USED {
+               zval *the_stream;
+               getObject(http_response_object, obj);
+
+               the_stream = GET_PROP(obj, stream);
+               RETURN_RESOURCE(Z_LVAL_P(the_stream));
+       }
 }
 /* }}} */
 
@@ -412,17 +497,19 @@ PHP_METHOD(HttpResponse, setFile)
  */
 PHP_METHOD(HttpResponse, getFile)
 {
-       zval *the_file;
-       getObject(http_response_object, obj);
-
        NO_ARGS;
 
-       the_file = GET_PROP(obj, file);
-       RETURN_STRINGL(Z_STRVAL_P(the_file), Z_STRLEN_P(the_file), 1);
+       IF_RETVAL_USED {
+               zval *the_file;
+               getObject(http_response_object, obj);
+
+               the_file = GET_PROP(obj, file);
+               RETURN_STRINGL(Z_STRVAL_P(the_file), Z_STRLEN_P(the_file), 1);
+       }
 }
 /* }}} */
 
-/* {{{ proto bool HttpResponse::send()
+/* {{{ proto bool HttpResponse::send([bool clean_ob = true])
  *
  * Finally send the entity.
  *
@@ -439,14 +526,24 @@ PHP_METHOD(HttpResponse, getFile)
  */
 PHP_METHOD(HttpResponse, send)
 {
+       zend_bool clean_ob = 1;
        zval *do_cache, *do_gzip;
        getObject(http_response_object, obj);
 
-       NO_ARGS;
+       if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "|b", &clean_ob)) {
+               RETURN_FALSE;
+       }
 
        do_cache = GET_PROP(obj, cache);
        do_gzip  = GET_PROP(obj, gzip);
 
+       if (clean_ob) {
+               /* interrupt on-the-fly etag generation */
+               HTTP_G(etag).started = 0;
+               /* discard previous output buffers */
+               php_end_ob_buffers(0 TSRMLS_CC);
+       }
+
        /* gzip */
        if (Z_LVAL_P(do_gzip)) {
                php_start_ob_buffer_named("ob_gzhandler", 0, 1 TSRMLS_CC);
@@ -454,6 +551,8 @@ PHP_METHOD(HttpResponse, send)
 
        /* caching */
        if (Z_LVAL_P(do_cache)) {
+               char *cc_hdr;
+               int cc_len;
                zval *cctrl, *etag, *lmod, *ccraw;
 
                etag  = GET_PROP(obj, eTag);
@@ -462,14 +561,17 @@ PHP_METHOD(HttpResponse, send)
                ccraw = GET_PROP(obj, raw_cache_header);
 
                if (Z_LVAL_P(ccraw)) {
-                       http_cache_etag(Z_STRVAL_P(etag), Z_STRLEN_P(etag), Z_STRVAL_P(cctrl), Z_STRLEN_P(cctrl));
-                       http_cache_last_modified(Z_LVAL_P(lmod), Z_LVAL_P(lmod) ? Z_LVAL_P(lmod) : time(NULL), Z_STRVAL_P(cctrl), Z_STRLEN_P(cctrl));
+                       cc_hdr = Z_STRVAL_P(cctrl);
+                       cc_len = Z_STRLEN_P(cctrl);
                } else {
                        char cc_header[42] = {0};
                        sprintf(cc_header, "%s, must-revalidate, max-age=0", Z_STRVAL_P(cctrl));
-                       http_cache_etag(Z_STRVAL_P(etag), Z_STRLEN_P(etag), cc_header, strlen(cc_header));
-                       http_cache_last_modified(Z_LVAL_P(lmod), Z_LVAL_P(lmod) ? Z_LVAL_P(lmod) : time(NULL), cc_header, strlen(cc_header));
+                       cc_hdr = cc_header;
+                       cc_len = Z_STRLEN_P(cctrl) + lenof(", must-revalidate, max-age=0");
                }
+
+               http_cache_etag(Z_STRVAL_P(etag), Z_STRLEN_P(etag), cc_hdr, cc_len);
+               http_cache_last_modified(Z_LVAL_P(lmod), Z_LVAL_P(lmod) ? Z_LVAL_P(lmod) : time(NULL), cc_hdr, cc_len);
        }
 
        /* content type */
@@ -478,7 +580,7 @@ PHP_METHOD(HttpResponse, send)
                if (Z_STRLEN_P(ctype)) {
                        http_send_content_type(Z_STRVAL_P(ctype), Z_STRLEN_P(ctype));
                } else {
-                       http_send_content_type("application/x-octetstream", sizeof("application/x-octetstream") - 1);
+                       http_send_content_type("application/x-octetstream", lenof("application/x-octetstream"));
                }
        }
 
@@ -491,6 +593,15 @@ PHP_METHOD(HttpResponse, send)
                }
        }
 
+       /* throttling */
+       {
+               zval *send_buffersize, *throttle_delay;
+               send_buffersize = GET_PROP(obj, sendBuffersize);
+               throttle_delay  = GET_PROP(obj, throttleDelay);
+               HTTP_G(send).buffer_size    = Z_LVAL_P(send_buffersize);
+               HTTP_G(send).throttle_delay = Z_DVAL_P(throttle_delay);
+       }
+
        /* send */
        {
                zval *send_mode = GET_PROP(obj, send_mode);
@@ -523,30 +634,6 @@ PHP_METHOD(HttpResponse, send)
 
 /* {{{ HttpMessage */
 
-/* {{{ proto static HttpMessage HttpMessage::fromString(string raw_message)
- *
- * Create an HttpMessage object from a string.
- */
-PHP_METHOD(HttpMessage, fromString)
-{
-       char *string = NULL;
-       int length = 0;
-       http_message *msg = NULL;
-       http_message_object obj;
-
-       if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "s", &string, &length)) {
-               RETURN_NULL();
-       }
-
-       if (!(msg = http_message_parse(string, length))) {
-               RETURN_NULL();
-       }
-
-       Z_TYPE_P(return_value) = IS_OBJECT;
-       return_value->value.obj = http_message_object_from_msg(msg);
-}
-/* }}} */
-
 /* {{{ proto void HttpMessage::__construct([string message])
  *
  * Instantiate a new HttpMessage object.
@@ -571,18 +658,41 @@ PHP_METHOD(HttpMessage, __construct)
 }
 /* }}} */
 
+/* {{{ proto static HttpMessage HttpMessage::fromString(string raw_message)
+ *
+ * Create an HttpMessage object from a string.
+ */
+PHP_METHOD(HttpMessage, fromString)
+{
+       char *string = NULL;
+       int length = 0;
+       http_message *msg = NULL;
+
+       if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "s", &string, &length)) {
+               RETURN_NULL();
+       }
+
+       if (!(msg = http_message_parse(string, length))) {
+               RETURN_NULL();
+       }
+
+       Z_TYPE_P(return_value) = IS_OBJECT;
+       return_value->value.obj = http_message_object_from_msg(msg);
+}
+/* }}} */
+
 /* {{{ proto string HttpMessage::getBody()
  *
  * Get the body of the parsed Message.
  */
 PHP_METHOD(HttpMessage, getBody)
 {
-       zval *body;
-       getObject(http_message_object, obj);
-
        NO_ARGS;
 
-       RETURN_PHPSTR(&obj->message->body, PHPSTR_FREE_NOT, 1);
+       IF_RETVAL_USED {
+               getObject(http_message_object, obj);
+               RETURN_PHPSTR(&obj->message->body, PHPSTR_FREE_NOT, 1);
+       }
 }
 /* }}} */
 
@@ -592,14 +702,16 @@ PHP_METHOD(HttpMessage, getBody)
  */
 PHP_METHOD(HttpMessage, getHeaders)
 {
-       zval headers;
-       getObject(http_message_object, obj);
-
        NO_ARGS;
 
-       Z_ARRVAL(headers) = &obj->message->hdrs;
-       array_init(return_value);
-       array_copy(&headers, return_value);
+       IF_RETVAL_USED {
+               zval headers;
+               getObject(http_message_object, obj);
+
+               Z_ARRVAL(headers) = &obj->message->hdrs;
+               array_init(return_value);
+               array_copy(&headers, return_value);
+       }
 }
 /* }}} */
 
@@ -651,11 +763,12 @@ PHP_METHOD(HttpMessage, addHeaders)
  */
 PHP_METHOD(HttpMessage, getType)
 {
-       getObject(http_message_object, obj);
-
        NO_ARGS;
 
-       RETURN_LONG(obj->message->type);
+       IF_RETVAL_USED {
+               getObject(http_message_object, obj);
+               RETURN_LONG(obj->message->type);
+       }
 }
 /* }}} */
 
@@ -681,16 +794,18 @@ PHP_METHOD(HttpMessage, setType)
  */
 PHP_METHOD(HttpMessage, getResponseCode)
 {
-       getObject(http_message_object, obj);
-
        NO_ARGS;
 
-       if (!HTTP_MSG_TYPE(RESPONSE, obj->message)) {
-               http_error(E_NOTICE, HTTP_E_MSG, "HttpMessage is not of type HTTP_MSG_RESPONSE");
-               RETURN_NULL();
-       }
+       IF_RETVAL_USED {
+               getObject(http_message_object, obj);
 
-       RETURN_LONG(obj->message->info.response.code);
+               if (!HTTP_MSG_TYPE(RESPONSE, obj->message)) {
+                       http_error(E_NOTICE, HTTP_E_MSG, "HttpMessage is not of type HTTP_MSG_RESPONSE");
+                       RETURN_NULL();
+               }
+
+               RETURN_LONG(obj->message->info.response.code);
+       }
 }
 /* }}} */
 
@@ -705,7 +820,7 @@ PHP_METHOD(HttpMessage, setResponseCode)
        long code;
        getObject(http_message_object, obj);
 
-       if (obj->message->type != HTTP_MSG_RESPONSE) {
+       if (!HTTP_MSG_TYPE(RESPONSE, obj->message)) {
                http_error(E_WARNING, HTTP_E_MSG, "HttpMessage is not of type HTTP_MSG_RESPONSE");
                RETURN_FALSE;
        }
@@ -730,16 +845,18 @@ PHP_METHOD(HttpMessage, setResponseCode)
  */
 PHP_METHOD(HttpMessage, getRequestMethod)
 {
-       getObject(http_message_object, obj);
-
        NO_ARGS;
 
-       if (obj->message->type != HTTP_MSG_REQUEST) {
-               http_error(E_NOTICE, HTTP_E_MSG, "HttpMessage is not of type HTTP_MSG_REQUEST");
-               RETURN_NULL();
-       }
+       IF_RETVAL_USED {
+               getObject(http_message_object, obj);
 
-       RETURN_STRING(obj->message->info.request.method, 1);
+               if (!HTTP_MSG_TYPE(REQUEST, obj->message)) {
+                       http_error(E_NOTICE, HTTP_E_MSG, "HttpMessage is not of type HTTP_MSG_REQUEST");
+                       RETURN_NULL();
+               }
+
+               RETURN_STRING(obj->message->info.request.method, 1);
+       }
 }
 /* }}} */
 
@@ -754,7 +871,7 @@ PHP_METHOD(HttpMessage, setRequestMethod)
        int method_len;
        getObject(http_message_object, obj);
 
-       if (obj->message->type != HTTP_MSG_REQUEST) {
+       if (!HTTP_MSG_TYPE(REQUEST, obj->message)) {
                http_error(E_WARNING, HTTP_E_MSG, "HttpMessage is not of type HTTP_MSG_REQUEST");
                RETURN_FALSE;
        }
@@ -771,10 +888,7 @@ PHP_METHOD(HttpMessage, setRequestMethod)
                RETURN_FALSE;
        }
 
-       if (obj->message->info.request.method) {
-               efree(obj->message->info.request.method);
-       }
-       obj->message->info.request.method = estrndup(method, method_len);
+       STR_SET(obj->message->info.request.method, estrndup(method, method_len));
        RETURN_TRUE;
 }
 /* }}} */
@@ -785,17 +899,18 @@ PHP_METHOD(HttpMessage, setRequestMethod)
  */
 PHP_METHOD(HttpMessage, getRequestUri)
 {
-       zval *uri;
-       getObject(http_message_object, obj);
-
        NO_ARGS;
 
-       if (obj->message->type != HTTP_MSG_REQUEST) {
-               http_error(E_WARNING, HTTP_E_MSG, "HttpMessage is not of type HTTP_MSG_REQUEST");
-               RETURN_NULL();
-       }
+       IF_RETVAL_USED {
+               getObject(http_message_object, obj);
+
+               if (!HTTP_MSG_TYPE(REQUEST, obj->message)) {
+                       http_error(E_WARNING, HTTP_E_MSG, "HttpMessage is not of type HTTP_MSG_REQUEST");
+                       RETURN_NULL();
+               }
 
-       RETURN_STRING(obj->message->info.request.URI, 1);
+               RETURN_STRING(obj->message->info.request.URI, 1);
+       }
 }
 /* }}} */
 
@@ -811,7 +926,7 @@ PHP_METHOD(HttpMessage, setRequestUri)
        int URIlen;
        getObject(http_message_object, obj);
 
-       if (obj->message->type != HTTP_MSG_REQUEST) {
+       if (!HTTP_MSG_TYPE(REQUEST, obj->message)) {
                http_error(E_WARNING, HTTP_E_MSG, "HttpMessage is not of type HTTP_MSG_REQUEST");
                RETURN_FALSE;
        }
@@ -823,10 +938,7 @@ PHP_METHOD(HttpMessage, setRequestUri)
                RETURN_FALSE;
        }
 
-       if (obj->message->info.request.URI) {
-               efree(obj->message->info.request.URI);
-       }
-       obj->message->info.request.URI = estrndup(URI, URIlen);
+       STR_SET(obj->message->info.request.URI, estrndup(URI, URIlen));
        RETURN_TRUE;
 }
 /* }}} */
@@ -837,28 +949,30 @@ PHP_METHOD(HttpMessage, setRequestUri)
  */
 PHP_METHOD(HttpMessage, getHttpVersion)
 {
-       char ver[4] = {0};
-       float version;
-       getObject(http_message_object, obj);
-
        NO_ARGS;
 
-       switch (obj->message->type)
-       {
-               case HTTP_MSG_RESPONSE:
-                       version = obj->message->info.response.http_version;
-               break;
+       IF_RETVAL_USED {
+               char ver[4] = {0};
+               float version;
+               getObject(http_message_object, obj);
 
-               case HTTP_MSG_REQUEST:
-                       version = obj->message->info.request.http_version;
-               break;
+               switch (obj->message->type)
+               {
+                       case HTTP_MSG_RESPONSE:
+                               version = obj->message->info.response.http_version;
+                       break;
 
-               case HTTP_MSG_NONE:
-               default:
-                       RETURN_NULL();
+                       case HTTP_MSG_REQUEST:
+                               version = obj->message->info.request.http_version;
+                       break;
+
+                       case HTTP_MSG_NONE:
+                       default:
+                               RETURN_NULL();
+               }
+               sprintf(ver, "%1.1f", version);
+               RETURN_STRINGL(ver, 3, 1);
        }
-       sprintf(ver, "%1.1f", version);
-       RETURN_STRINGL(ver, 3, 1);
 }
 /* }}} */
 
@@ -870,26 +984,26 @@ PHP_METHOD(HttpMessage, getHttpVersion)
 PHP_METHOD(HttpMessage, setHttpVersion)
 {
        char v[4];
-       zval *zv, *version;
+       zval *zv;
        getObject(http_message_object, obj);
 
        if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "z/", &zv)) {
                return;
        }
 
-       if (obj->message->type == HTTP_MSG_NONE) {
+       if (HTTP_MSG_TYPE(NONE, obj->message)) {
                http_error(E_WARNING, HTTP_E_MSG, "Message is neither of type HTTP_MSG_RESPONSE nor HTTP_MSG_REQUEST");
                RETURN_FALSE;
        }
 
-       convert_to_double_ex(&zv);
+       convert_to_double(zv);
        sprintf(v, "%1.1f", Z_DVAL_P(zv));
        if (strcmp(v, "1.0") && strcmp(v, "1.1")) {
                http_error_ex(E_WARNING, HTTP_E_PARAM, "Invalid HTTP protocol version (1.0 or 1.1): %s", v);
                RETURN_FALSE;
        }
 
-       if (obj->message->type == HTTP_MSG_RESPONSE) {
+       if (HTTP_MSG_TYPE(RESPONSE, obj->message)) {
                obj->message->info.response.http_version = (float) Z_DVAL_P(zv);
        } else {
                obj->message->info.request.http_version = (float) Z_DVAL_P(zv);
@@ -904,14 +1018,16 @@ PHP_METHOD(HttpMessage, setHttpVersion)
  */
 PHP_METHOD(HttpMessage, getParentMessage)
 {
-       getObject(http_message_object, obj);
-
        NO_ARGS;
 
-       if (obj->message->parent) {
-               RETVAL_OBJVAL(obj->parent);
-       } else {
-               RETVAL_NULL();
+       IF_RETVAL_USED {
+               getObject(http_message_object, obj);
+
+               if (obj->message->parent) {
+                       RETVAL_OBJVAL(obj->parent);
+               } else {
+                       RETVAL_NULL();
+               }
        }
 }
 /* }}} */
@@ -936,21 +1052,23 @@ PHP_METHOD(HttpMessage, send)
  */
 PHP_METHOD(HttpMessage, toString)
 {
-       char *string;
-       size_t length;
-       zend_bool include_parent = 1;
-       getObject(http_message_object, obj);
+       IF_RETVAL_USED {
+               char *string;
+               size_t length;
+               zend_bool include_parent = 1;
+               getObject(http_message_object, obj);
 
-       if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "|b", &include_parent)) {
-               RETURN_FALSE;
-       }
+               if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "|b", &include_parent)) {
+                       RETURN_FALSE;
+               }
 
-       if (include_parent) {
-               http_message_serialize(obj->message, &string, &length);
-       } else {
-               http_message_tostring(obj->message, &string, &length);
+               if (include_parent) {
+                       http_message_serialize(obj->message, &string, &length);
+               } else {
+                       http_message_tostring(obj->message, &string, &length);
+               }
+               RETURN_STRINGL(string, length, 0);
        }
-       RETURN_STRINGL(string, length, 0);
 }
 /* }}} */
 
@@ -976,7 +1094,7 @@ PHP_METHOD(HttpRequest, __construct)
                INIT_PARR(obj, options);
                INIT_PARR(obj, responseInfo);
                INIT_PARR(obj, responseData);
-               INIT_PARR(obj, postData);
+               INIT_PARR(obj, postFields);
                INIT_PARR(obj, postFiles);
 
                if (URL) {
@@ -1003,7 +1121,7 @@ PHP_METHOD(HttpRequest, __destruct)
        FREE_PARR(obj, options);
        FREE_PARR(obj, responseInfo);
        FREE_PARR(obj, responseData);
-       FREE_PARR(obj, postData);
+       FREE_PARR(obj, postFields);
        FREE_PARR(obj, postFiles);
 }
 /* }}} */
@@ -1015,7 +1133,7 @@ PHP_METHOD(HttpRequest, __destruct)
 PHP_METHOD(HttpRequest, setOptions)
 {
        char *key = NULL;
-       long idx = 0;
+       ulong idx = 0;
        zval *opts, *old_opts, **opt;
        getObject(http_request_object, obj);
 
@@ -1059,14 +1177,16 @@ PHP_METHOD(HttpRequest, setOptions)
  */
 PHP_METHOD(HttpRequest, getOptions)
 {
-       zval *opts;
-       getObject(http_request_object, obj);
-
        NO_ARGS;
 
-       opts = GET_PROP(obj, options);
-       array_init(return_value);
-       array_copy(opts, return_value);
+       IF_RETVAL_USED {
+               zval *opts;
+               getObject(http_request_object, obj);
+
+               opts = GET_PROP(obj, options);
+               array_init(return_value);
+               array_copy(opts, return_value);
+       }
 }
 /* }}} */
 
@@ -1117,17 +1237,19 @@ PHP_METHOD(HttpRequest, setSslOptions)
  */
 PHP_METHOD(HttpRequest, getSslOptions)
 {
-       zval *opts, **ssl_options;
-       getObject(http_request_object, obj);
-
        NO_ARGS;
 
-       opts = GET_PROP(obj, options);
+       IF_RETVAL_USED {
+               zval *opts, **ssl_options;
+               getObject(http_request_object, obj);
+
+               opts = GET_PROP(obj, options);
 
-       array_init(return_value);
+               array_init(return_value);
 
-       if (SUCCESS == zend_hash_find(Z_ARRVAL_P(opts), "ssl", sizeof("ssl"), (void **) &ssl_options)) {
-               array_copy(*ssl_options, return_value);
+               if (SUCCESS == zend_hash_find(Z_ARRVAL_P(opts), "ssl", sizeof("ssl"), (void **) &ssl_options)) {
+                       array_copy(*ssl_options, return_value);
+               }
        }
 }
 /* }}} */
@@ -1180,17 +1302,19 @@ PHP_METHOD(HttpRequest, addHeaders)
  */
 PHP_METHOD(HttpRequest, getHeaders)
 {
-       zval *opts, **headers;
-       getObject(http_request_object, obj);
-
        NO_ARGS;
 
-       opts = GET_PROP(obj, options);
+       IF_RETVAL_USED {
+               zval *opts, **headers;
+               getObject(http_request_object, obj);
 
-       array_init(return_value);
+               opts = GET_PROP(obj, options);
 
-       if (SUCCESS == zend_hash_find(Z_ARRVAL_P(opts), "headers", sizeof("headers"), (void **) &headers)) {
-               array_copy(*headers, return_value);
+               array_init(return_value);
+
+               if (SUCCESS == zend_hash_find(Z_ARRVAL_P(opts), "headers", sizeof("headers"), (void **) &headers)) {
+                       array_copy(*headers, return_value);
+               }
        }
 }
 /* }}} */
@@ -1243,17 +1367,19 @@ PHP_METHOD(HttpRequest, addCookies)
  */
 PHP_METHOD(HttpRequest, getCookies)
 {
-       zval *opts, **cookies;
-       getObject(http_request_object, obj);
-
        NO_ARGS;
 
-       opts = GET_PROP(obj, options);
+       IF_RETVAL_USED {
+               zval *opts, **cookies;
+               getObject(http_request_object, obj);
 
-       array_init(return_value);
+               opts = GET_PROP(obj, options);
 
-       if (SUCCESS == zend_hash_find(Z_ARRVAL_P(opts), "cookies", sizeof("cookies"), (void **) &cookies)) {
-               array_copy(*cookies, return_value);
+               array_init(return_value);
+
+               if (SUCCESS == zend_hash_find(Z_ARRVAL_P(opts), "cookies", sizeof("cookies"), (void **) &cookies)) {
+                       array_copy(*cookies, return_value);
+               }
        }
 }
 /* }}} */
@@ -1298,13 +1424,15 @@ PHP_METHOD(HttpRequest, setURL)
  */
 PHP_METHOD(HttpRequest, getURL)
 {
-       zval *URL;
-       getObject(http_request_object, obj);
-
        NO_ARGS;
 
-       URL = GET_PROP(obj, url);
-       RETURN_STRINGL(Z_STRVAL_P(URL), Z_STRLEN_P(URL), 1);
+       IF_RETVAL_USED {
+               zval *URL;
+               getObject(http_request_object, obj);
+
+               URL = GET_PROP(obj, url);
+               RETURN_STRINGL(Z_STRVAL_P(URL), Z_STRLEN_P(URL), 1);
+       }
 }
 /* }}} */
 
@@ -1333,13 +1461,15 @@ PHP_METHOD(HttpRequest, setMethod)
  */
 PHP_METHOD(HttpRequest, getMethod)
 {
-       zval *meth;
-       getObject(http_request_object, obj);
-
        NO_ARGS;
 
-       meth = GET_PROP(obj, method);
-       RETURN_LONG(Z_LVAL_P(meth));
+       IF_RETVAL_USED {
+               zval *meth;
+               getObject(http_request_object, obj);
+
+               meth = GET_PROP(obj, method);
+               RETURN_LONG(Z_LVAL_P(meth));
+       }
 }
 /* }}} */
 
@@ -1374,13 +1504,15 @@ PHP_METHOD(HttpRequest, setContentType)
  */
 PHP_METHOD(HttpRequest, getContentType)
 {
-       zval *ctype;
-       getObject(http_request_object, obj);
-
        NO_ARGS;
 
-       ctype = GET_PROP(obj, contentType);
-       RETURN_STRINGL(Z_STRVAL_P(ctype), Z_STRLEN_P(ctype), 1);
+       IF_RETVAL_USED {
+               zval *ctype;
+               getObject(http_request_object, obj);
+
+               ctype = GET_PROP(obj, contentType);
+               RETURN_STRINGL(Z_STRVAL_P(ctype), Z_STRLEN_P(ctype), 1);
+       }
 }
 /* }}} */
 
@@ -1421,13 +1553,15 @@ PHP_METHOD(HttpRequest, setQueryData)
  */
 PHP_METHOD(HttpRequest, getQueryData)
 {
-       zval *qdata;
-       getObject(http_request_object, obj);
-
        NO_ARGS;
 
-       qdata = GET_PROP(obj, queryData);
-       RETURN_STRINGL(Z_STRVAL_P(qdata), Z_STRLEN_P(qdata), 1);
+       IF_RETVAL_USED {
+               zval *qdata;
+               getObject(http_request_object, obj);
+
+               qdata = GET_PROP(obj, queryData);
+               RETURN_STRINGL(Z_STRVAL_P(qdata), Z_STRLEN_P(qdata), 1);
+       }
 }
 /* }}} */
 
@@ -1474,12 +1608,12 @@ PHP_METHOD(HttpRequest, unsetQueryData)
 }
 /* }}} */
 
-/* {{{ proto bool HttpRequest::addPostData(array post_data)
+/* {{{ proto bool HttpRequest::addPostFields(array post_data)
  *
  * Adds POST data entries.
  * Affects only POST requests.
  */
-PHP_METHOD(HttpRequest, addPostData)
+PHP_METHOD(HttpRequest, addPostFields)
 {
        zval *post, *post_data;
        getObject(http_request_object, obj);
@@ -1488,20 +1622,20 @@ PHP_METHOD(HttpRequest, addPostData)
                RETURN_FALSE;
        }
 
-       post = GET_PROP(obj, postData);
+       post = GET_PROP(obj, postFields);
        array_merge(post_data, post);
 
        RETURN_TRUE;
 }
 /* }}} */
 
-/* {{{ proto bool HttpRequest::setPostData(array post_data)
+/* {{{ proto bool HttpRequest::setPostFields(array post_data)
  *
  * Set the POST data entries.
  * Overwrites previously set POST data.
  * Affects only POST requests.
  */
-PHP_METHOD(HttpRequest, setPostData)
+PHP_METHOD(HttpRequest, setPostFields)
 {
        zval *post, *post_data;
        getObject(http_request_object, obj);
@@ -1510,7 +1644,7 @@ PHP_METHOD(HttpRequest, setPostData)
                RETURN_FALSE;
        }
 
-       post = GET_PROP(obj, postData);
+       post = GET_PROP(obj, postFields);
        zend_hash_clean(Z_ARRVAL_P(post));
        array_copy(post_data, post);
 
@@ -1518,36 +1652,38 @@ PHP_METHOD(HttpRequest, setPostData)
 }
 /* }}}*/
 
-/* {{{ proto array HttpRequest::getPostData()
+/* {{{ proto array HttpRequest::getPostFields()
  *
  * Get previously set POST data.
  */
-PHP_METHOD(HttpRequest, getPostData)
+PHP_METHOD(HttpRequest, getPostFields)
 {
-       zval *post_data;
-       getObject(http_request_object, obj);
-
        NO_ARGS;
 
-       post_data = GET_PROP(obj, postData);
-       array_init(return_value);
-       array_copy(post_data, return_value);
+       IF_RETVAL_USED {
+               zval *post_data;
+               getObject(http_request_object, obj);
+
+               post_data = GET_PROP(obj, postFields);
+               array_init(return_value);
+               array_copy(post_data, return_value);
+       }
 }
 /* }}} */
 
-/* {{{ proto void HttpRequest::unsetPostData()
+/* {{{ proto void HttpRequest::unsetPostFields()
  *
  * Clean POST data entires.
  * Affects only POST requests.
  */
-PHP_METHOD(HttpRequest, unsetPostData)
+PHP_METHOD(HttpRequest, unsetPostFields)
 {
        zval *post_data;
        getObject(http_request_object, obj);
 
        NO_ARGS;
 
-       post_data = GET_PROP(obj, postData);
+       post_data = GET_PROP(obj, postFields);
        zend_hash_clean(Z_ARRVAL_P(post_data));
 }
 /* }}} */
@@ -1592,21 +1728,46 @@ PHP_METHOD(HttpRequest, addPostFile)
 }
 /* }}} */
 
+/* {{{ proto bool HttpRequest::setPostFiles()
+ *
+ * Set files to post.
+ * Overwrites previously set post files.
+ * Affects only POST requests.
+ */
+PHP_METHOD(HttpRequest, setPostFiles)
+{
+       zval *files, *pFiles;
+       getObject(http_request_object, obj);
+
+       if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "a", &files)) {
+               RETURN_FALSE;
+       }
+
+       pFiles = GET_PROP(obj, postFiles);
+       zend_hash_clean(Z_ARRVAL_P(pFiles));
+       array_copy(files, pFiles);
+
+       RETURN_TRUE;
+}
+/* }}} */
+
 /* {{{ proto array HttpRequest::getPostFiles()
  *
  * Get all previously added POST files.
  */
 PHP_METHOD(HttpRequest, getPostFiles)
 {
-       zval *files;
-       getObject(http_request_object, obj);
-
        NO_ARGS;
 
-       files = GET_PROP(obj, postFiles);
+       IF_RETVAL_USED {
+               zval *files;
+               getObject(http_request_object, obj);
 
-       array_init(return_value);
-       array_copy(files, return_value);
+               files = GET_PROP(obj, postFiles);
+
+               array_init(return_value);
+               array_copy(files, return_value);
+       }
 }
 /* }}} */
 
@@ -1627,20 +1788,75 @@ PHP_METHOD(HttpRequest, unsetPostFiles)
 }
 /* }}} */
 
+/* {{{ proto bool HttpRequest::SetPutFile(string file)
+ *
+ * Set file to put.
+ * Affects only PUT requests.
+ */
+PHP_METHOD(HttpRequest, setPutFile)
+{
+       char *file;
+       int file_len;
+       getObject(http_request_object, obj);
+
+       if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "s", &file, &file_len)) {
+               RETURN_FALSE;
+       }
+
+       UPD_PROP(obj, string, putFile, file);
+       RETURN_TRUE;
+}
+/* }}} */
+
+/* {{{ proto string HttpRequest::getPutFile()
+ *
+ * Get previously set put file.
+ */
+PHP_METHOD(HttpRequest, getPutFile)
+{
+       NO_ARGS;
+
+       IF_RETVAL_USED {
+               zval *putfile;
+               getObject(http_request_object, obj);
+
+               putfile = GET_PROP(obj, putFile);
+               RETVAL_STRINGL(Z_STRVAL_P(putfile), Z_STRLEN_P(putfile), 1);
+       }
+}
+/* }}} */
+
+/* {{{ proto void HttpRequest::unsetPutFile()
+ *
+ * Unset file to put.
+ * Affects only PUT requests.
+ */
+PHP_METHOD(HttpRequest, unsetPutFile)
+{
+       getObject(http_request_object, obj);
+
+       NO_ARGS;
+
+       UPD_PROP(obj, string, putFile, "");
+}
+/* }}} */
+
 /* {{{ proto array HttpRequest::getResponseData()
  *
  * Get all response data after the request has been sent.
  */
 PHP_METHOD(HttpRequest, getResponseData)
 {
-       zval *data;
-       getObject(http_request_object, obj);
-
        NO_ARGS;
 
-       data = GET_PROP(obj, responseData);
-       array_init(return_value);
-       array_copy(data, return_value);
+       IF_RETVAL_USED {
+               zval *data;
+               getObject(http_request_object, obj);
+
+               data = GET_PROP(obj, responseData);
+               array_init(return_value);
+               array_copy(data, return_value);
+       }
 }
 /* }}} */
 
@@ -1650,27 +1866,29 @@ PHP_METHOD(HttpRequest, getResponseData)
  */
 PHP_METHOD(HttpRequest, getResponseHeader)
 {
-       zval *data, **headers, **header;
-       char *header_name = NULL;
-       int header_len = 0;
-       getObject(http_response_object, obj);
+       IF_RETVAL_USED {
+               zval *data, **headers, **header;
+               char *header_name = NULL;
+               int header_len = 0;
+               getObject(http_response_object, obj);
 
-       if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "|s", &header_name, &header_len)) {
-               RETURN_FALSE;
-       }
+               if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "|s", &header_name, &header_len)) {
+                       RETURN_FALSE;
+               }
 
-       data = GET_PROP(obj, responseData);
-       if (SUCCESS != zend_hash_find(Z_ARRVAL_P(data), "headers", sizeof("headers"), (void **) &headers)) {
-               RETURN_FALSE;
-       }
+               data = GET_PROP(obj, responseData);
+               if (SUCCESS != zend_hash_find(Z_ARRVAL_P(data), "headers", sizeof("headers"), (void **) &headers)) {
+                       RETURN_FALSE;
+               }
 
-       if (!header_len || !header_name) {
-               array_init(return_value);
-               array_copy(*headers, return_value);
-       } else if (SUCCESS == zend_hash_find(Z_ARRVAL_PP(headers), pretty_key(header_name, header_len, 1, 1), header_len + 1, (void **) &header)) {
-               RETURN_STRINGL(Z_STRVAL_PP(header), Z_STRLEN_PP(header), 1);
-       } else {
-               RETURN_FALSE;
+               if (!header_len || !header_name) {
+                       array_init(return_value);
+                       array_copy(*headers, return_value);
+               } else if (SUCCESS == zend_hash_find(Z_ARRVAL_PP(headers), pretty_key(header_name, header_len, 1, 1), header_len + 1, (void **) &header)) {
+                       RETURN_STRINGL(Z_STRVAL_PP(header), Z_STRLEN_PP(header), 1);
+               } else {
+                       RETURN_FALSE;
+               }
        }
 }
 /* }}} */
@@ -1681,35 +1899,61 @@ PHP_METHOD(HttpRequest, getResponseHeader)
  */
 PHP_METHOD(HttpRequest, getResponseCookie)
 {
-       zval *data, **headers;
-       char *cookie_name = NULL;
-       int cookie_len = 0;
-       getObject(http_request_object, obj);
-
-       if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "|s", &cookie_name, &cookie_len)) {
-               RETURN_FALSE;
-       }
+       IF_RETVAL_USED {
+               zval *data, **headers;
+               char *cookie_name = NULL;
+               int cookie_len = 0;
+               getObject(http_request_object, obj);
 
-       array_init(return_value);
-
-       data = GET_PROP(obj, responseData);
-       if (SUCCESS == zend_hash_find(Z_ARRVAL_P(data), "headers", sizeof("headers"), (void **) &headers)) {
-               ulong idx = 0;
-               char *key = NULL;
-               zval **header = NULL;
+               if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "|s", &cookie_name, &cookie_len)) {
+                       RETURN_FALSE;
+               }
 
-               FOREACH_HASH_KEYVAL(Z_ARRVAL_PP(headers), key, idx, header) {
-                       if (key && !strcasecmp(key, "Set-Cookie")) {
-                               /* several cookies? */
-                               if (Z_TYPE_PP(header) == IS_ARRAY) {
-                                       zval **cookie;
+               array_init(return_value);
 
-                                       FOREACH_HASH_VAL(Z_ARRVAL_PP(header), cookie) {
+               data = GET_PROP(obj, responseData);
+               if (SUCCESS == zend_hash_find(Z_ARRVAL_P(data), "headers", sizeof("headers"), (void **) &headers)) {
+                       ulong idx = 0;
+                       char *key = NULL;
+                       zval **header = NULL;
+
+                       FOREACH_HASH_KEYVAL(Z_ARRVAL_PP(headers), key, idx, header) {
+                               if (key && !strcasecmp(key, "Set-Cookie")) {
+                                       /* several cookies? */
+                                       if (Z_TYPE_PP(header) == IS_ARRAY) {
+                                               zval **cookie;
+
+                                               FOREACH_HASH_VAL(Z_ARRVAL_PP(header), cookie) {
+                                                       zval *cookie_hash;
+                                                       MAKE_STD_ZVAL(cookie_hash);
+                                                       array_init(cookie_hash);
+
+                                                       if (SUCCESS == http_parse_cookie(Z_STRVAL_PP(cookie), Z_ARRVAL_P(cookie_hash))) {
+                                                               if (!cookie_len) {
+                                                                       add_next_index_zval(return_value, cookie_hash);
+                                                               } else {
+                                                                       zval **name;
+
+                                                                       if (    (SUCCESS == zend_hash_find(Z_ARRVAL_P(cookie_hash), "name", sizeof("name"), (void **) &name)) &&
+                                                                                       (!strcmp(Z_STRVAL_PP(name), cookie_name))) {
+                                                                               add_next_index_zval(return_value, cookie_hash);
+                                                                               return; /* <<< FOUND >>> */
+                                                                       } else {
+                                                                               zval_dtor(cookie_hash);
+                                                                               efree(cookie_hash);
+                                                                       }
+                                                               }
+                                                       } else {
+                                                               zval_dtor(cookie_hash);
+                                                               efree(cookie_hash);
+                                                       }
+                                               }
+                                       } else {
                                                zval *cookie_hash;
                                                MAKE_STD_ZVAL(cookie_hash);
                                                array_init(cookie_hash);
 
-                                               if (SUCCESS == http_parse_cookie(Z_STRVAL_PP(cookie), Z_ARRVAL_P(cookie_hash))) {
+                                               if (SUCCESS == http_parse_cookie(Z_STRVAL_PP(header), Z_ARRVAL_P(cookie_hash))) {
                                                        if (!cookie_len) {
                                                                add_next_index_zval(return_value, cookie_hash);
                                                        } else {
@@ -1718,7 +1962,6 @@ PHP_METHOD(HttpRequest, getResponseCookie)
                                                                if (    (SUCCESS == zend_hash_find(Z_ARRVAL_P(cookie_hash), "name", sizeof("name"), (void **) &name)) &&
                                                                                (!strcmp(Z_STRVAL_PP(name), cookie_name))) {
                                                                        add_next_index_zval(return_value, cookie_hash);
-                                                                       return; /* <<< FOUND >>> */
                                                                } else {
                                                                        zval_dtor(cookie_hash);
                                                                        efree(cookie_hash);
@@ -1729,34 +1972,11 @@ PHP_METHOD(HttpRequest, getResponseCookie)
                                                        efree(cookie_hash);
                                                }
                                        }
-                               } else {
-                                       zval *cookie_hash;
-                                       MAKE_STD_ZVAL(cookie_hash);
-                                       array_init(cookie_hash);
-
-                                       if (SUCCESS == http_parse_cookie(Z_STRVAL_PP(header), Z_ARRVAL_P(cookie_hash))) {
-                                               if (!cookie_len) {
-                                                       add_next_index_zval(return_value, cookie_hash);
-                                               } else {
-                                                       zval **name;
-
-                                                       if (    (SUCCESS == zend_hash_find(Z_ARRVAL_P(cookie_hash), "name", sizeof("name"), (void **) &name)) &&
-                                                                       (!strcmp(Z_STRVAL_PP(name), cookie_name))) {
-                                                               add_next_index_zval(return_value, cookie_hash);
-                                                       } else {
-                                                               zval_dtor(cookie_hash);
-                                                               efree(cookie_hash);
-                                                       }
-                                               }
-                                       } else {
-                                               zval_dtor(cookie_hash);
-                                               efree(cookie_hash);
-                                       }
+                                       break;
                                }
-                               break;
+                               /* reset key */
+                               key = NULL;
                        }
-                       /* reset key */
-                       key = NULL;
                }
        }
 }
@@ -1768,16 +1988,18 @@ PHP_METHOD(HttpRequest, getResponseCookie)
  */
 PHP_METHOD(HttpRequest, getResponseBody)
 {
-       zval *data, **body;
-       getObject(http_request_object, obj);
-
        NO_ARGS;
 
-       data = GET_PROP(obj, responseData);
-       if (SUCCESS == zend_hash_find(Z_ARRVAL_P(data), "body", sizeof("body"), (void **) &body)) {
-               RETURN_STRINGL(Z_STRVAL_PP(body), Z_STRLEN_PP(body), 1);
-       } else {
-               RETURN_FALSE;
+       IF_RETVAL_USED {
+               zval *data, **body;
+               getObject(http_request_object, obj);
+
+               data = GET_PROP(obj, responseData);
+               if (SUCCESS == zend_hash_find(Z_ARRVAL_P(data), "body", sizeof("body"), (void **) &body)) {
+                       RETURN_STRINGL(Z_STRVAL_PP(body), Z_STRLEN_PP(body), 1);
+               } else {
+                       RETURN_FALSE;
+               }
        }
 }
 /* }}} */
@@ -1788,13 +2010,15 @@ PHP_METHOD(HttpRequest, getResponseBody)
  */
 PHP_METHOD(HttpRequest, getResponseCode)
 {
-       zval *code;
-       getObject(http_request_object, obj);
-
        NO_ARGS;
 
-       code = GET_PROP(obj, responseCode);
-       RETURN_LONG(Z_LVAL_P(code));
+       IF_RETVAL_USED {
+               zval *code;
+               getObject(http_request_object, obj);
+
+               code = GET_PROP(obj, responseCode);
+               RETURN_LONG(Z_LVAL_P(code));
+       }
 }
 /* }}} */
 
@@ -1805,27 +2029,29 @@ PHP_METHOD(HttpRequest, getResponseCode)
  */
 PHP_METHOD(HttpRequest, getResponseInfo)
 {
-       zval *info, **infop;
-       char *info_name = NULL;
-       int info_len = 0;
-       getObject(http_request_object, obj);
+       IF_RETVAL_USED {
+               zval *info, **infop;
+               char *info_name = NULL;
+               int info_len = 0;
+               getObject(http_request_object, obj);
 
-       if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "|s", &info_name, &info_len)) {
-               RETURN_FALSE;
-       }
+               if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "|s", &info_name, &info_len)) {
+                       RETURN_FALSE;
+               }
 
-       info = GET_PROP(obj, responseInfo);
+               info = GET_PROP(obj, responseInfo);
 
-       if (info_len && info_name) {
-               if (SUCCESS == zend_hash_find(Z_ARRVAL_P(info), pretty_key(info_name, info_len, 0, 0), info_len + 1, (void **) &infop)) {
-                       RETURN_ZVAL(*infop, 1, ZVAL_PTR_DTOR);
+               if (info_len && info_name) {
+                       if (SUCCESS == zend_hash_find(Z_ARRVAL_P(info), pretty_key(info_name, info_len, 0, 0), info_len + 1, (void **) &infop)) {
+                               RETURN_ZVAL(*infop, 1, ZVAL_PTR_DTOR);
+                       } else {
+                               http_error_ex(E_NOTICE, HTTP_E_PARAM, "Could not find response info named %s", info_name);
+                               RETURN_FALSE;
+                       }
                } else {
-                       http_error_ex(E_NOTICE, HTTP_E_PARAM, "Could not find response info named %s", info_name);
-                       RETURN_FALSE;
+                       array_init(return_value);
+                       array_copy(info, return_value);
                }
-       } else {
-               array_init(return_value);
-               array_copy(info, return_value);
        }
 }
 /* }}}*/
@@ -1836,17 +2062,21 @@ PHP_METHOD(HttpRequest, getResponseInfo)
  */
 PHP_METHOD(HttpRequest, getResponseMessage)
 {
-       zval *message;
-       getObject(http_request_object, obj);
-
        NO_ARGS;
 
-       message = GET_PROP(obj, responseMessage);
-       Z_TYPE_P(return_value) = IS_OBJECT;
-       return_value->is_ref = 1;
-       return_value->value.obj = message->value.obj;
-       zval_add_ref(&return_value);
+       IF_RETVAL_USED {
+               zval *message;
+               getObject(http_request_object, obj);
+
+               message = GET_PROP(obj, responseMessage);
+               if (Z_TYPE_P(message) == IS_OBJECT) {
+                       RETVAL_OBJECT(message);
+               } else {
+                       RETURN_NULL();
+               }
+       }
 }
+/* }}} */
 
 /* {{{ proto bool HttpRequest::send()
  *
@@ -1874,7 +2104,7 @@ PHP_METHOD(HttpRequest, getResponseMessage)
  * <?php
  * $r = new HttpRequest('http://example.com/form.php', HTTP_POST);
  * $r->setOptions(array('cookies' => array('lang' => 'de')));
- * $r->addPostData(array('user' => 'mike', 'pass' => 's3c|r3t'));
+ * $r->addpostFields(array('user' => 'mike', 'pass' => 's3c|r3t'));
  * $r->addPostFile('image', 'profile.jpg', 'image/jpeg');
  * if ($r->send()) {
  *     echo $r->getResponseBody();
@@ -1885,149 +2115,218 @@ PHP_METHOD(HttpRequest, getResponseMessage)
 PHP_METHOD(HttpRequest, send)
 {
        STATUS status = FAILURE;
-       zval *meth, *URL, *qdata, *opts, *info, *resp;
-       char *request_uri;
+       http_request_body body = {0};
        getObject(http_request_object, obj);
 
        NO_ARGS;
 
        SET_EH_THROW_HTTP();
 
-       if ((!obj->ch) && (!(obj->ch = curl_easy_init()))) {
-               http_error(E_WARNING, HTTP_E_CURL, "Could not initilaize curl");
+       if (obj->pool) {
+               http_error(E_WARNING, HTTP_E_CURL, "You cannot call HttpRequest::send() while attached to an HttpRequestPool");
                RETURN_FALSE;
        }
 
-       meth  = GET_PROP(obj, method);
-       URL   = GET_PROP(obj, url);
-       qdata = GET_PROP(obj, queryData);
-       opts  = GET_PROP(obj, options);
-       info  = GET_PROP(obj, responseInfo);
-       resp  = GET_PROP(obj, responseData);
+       if (SUCCESS == (status = http_request_object_requesthandler(obj, getThis(), &body))) {
+               status = http_request_exec(obj->ch, NULL);
+       }
+       http_request_body_dtor(&body);
 
-       // HTTP_URI_MAXLEN+1 long char *
-       request_uri = http_absolute_uri_ex(Z_STRVAL_P(URL), Z_STRLEN_P(URL), NULL, 0, NULL, 0, 0);
+       /* final data handling */
+       if (SUCCESS == status) {
+               status = http_request_object_responsehandler(obj, getThis());
+       }
 
-       if (Z_STRLEN_P(qdata) && (strlen(request_uri) < HTTP_URI_MAXLEN)) {
-               if (!strchr(request_uri, '?')) {
-                       strcat(request_uri, "?");
-               } else {
-                       strcat(request_uri, "&");
+       SET_EH_NORMAL();
+       RETURN_SUCCESS(status);
+}
+/* }}} */
+
+/* {{{ HttpRequestPool */
+
+/* {{{ proto void HttpRequestPool::__construct([HttpRequest request[, ...]])
+ *
+ * Instantiate a new HttpRequestPool object.  An HttpRequestPool is
+ * able to send several HttpRequests in parallel.
+ *
+ * Example:
+ * <pre>
+ * <?php
+ *     $urls = array('www.php.net', 'pecl.php.net', 'pear.php.net')
+ *     $pool = new HttpRequestPool;
+ *     foreach ($urls as $url) {
+ *         $req[$url] = new HttpRequest("http://$url", HTTP_HEAD);
+ *         $pool->attach($req[$url]);
+ *     }
+ *     $pool->send();
+ *     foreach ($urls as $url) {
+ *         printf("%s (%s) is %s\n",
+ *             $url, $req[$url]->getResponseInfo('effective_url'),
+ *             $r->getResponseCode() == 200 ? 'alive' : 'not alive'
+ *         );
+ *     }
+ * ?>
+ * </pre>
+ */
+PHP_METHOD(HttpRequestPool, __construct)
+{
+       int argc = ZEND_NUM_ARGS();
+       zval ***argv = safe_emalloc(argc, sizeof(zval *), 0);
+       getObject(http_requestpool_object, obj);
+
+       if (SUCCESS == zend_get_parameters_array_ex(argc, argv)) {
+               int i;
+
+               for (i = 0; i < argc; ++i) {
+                       if (Z_TYPE_PP(argv[i]) == IS_OBJECT && instanceof_function(Z_OBJCE_PP(argv[i]), http_request_object_ce TSRMLS_CC)) {
+                               http_request_pool_attach(&obj->pool, *(argv[i]));
+                       }
                }
-               strncat(request_uri, Z_STRVAL_P(qdata), HTTP_URI_MAXLEN - strlen(request_uri));
        }
+       efree(argv);
+}
+/* }}} */
 
-       switch (Z_LVAL_P(meth))
-       {
-               case HTTP_GET:
-                       status = http_get_ex(obj->ch, request_uri, Z_ARRVAL_P(opts), Z_ARRVAL_P(info), &obj->response);
-               break;
+/* {{{ proto void HttpRequestPool::__destruct()
+ *
+ * Clean up HttpRequestPool object.
+ */
+PHP_METHOD(HttpRequestPool, __destruct)
+{
+       getObject(http_requestpool_object, obj);
 
-               case HTTP_HEAD:
-                       status = http_head_ex(obj->ch, request_uri, Z_ARRVAL_P(opts), Z_ARRVAL_P(info), &obj->response);
-               break;
+       NO_ARGS;
 
-               case HTTP_POST:
-                       {
-                               zval *post_files, *post_data;
-
-                               post_files = GET_PROP(obj, postFiles);
-                               post_data  = GET_PROP(obj, postData);
-
-                               if (!zend_hash_num_elements(Z_ARRVAL_P(post_files))) {
-
-                                       /* urlencoded post */
-                                       status = http_post_array_ex(obj->ch, request_uri, Z_ARRVAL_P(post_data), Z_ARRVAL_P(opts), Z_ARRVAL_P(info), &obj->response);
-
-                               } else {
-
-                                       /*
-                                        * multipart post
-                                        */
-                                       char *key = NULL;
-                                       long idx;
-                                       zval **data;
-                                       struct curl_httppost *http_post_data[2] = {NULL, NULL};
-
-                                       /* normal data */
-                                       FOREACH_KEYVAL(post_data, key, idx, data) {
-                                               if (key) {
-                                                       convert_to_string_ex(data);
-                                                       curl_formadd(&http_post_data[0], &http_post_data[1],
-                                                               CURLFORM_COPYNAME,                      key,
-                                                               CURLFORM_COPYCONTENTS,          Z_STRVAL_PP(data),
-                                                               CURLFORM_CONTENTSLENGTH,        Z_STRLEN_PP(data),
-                                                               CURLFORM_END
-                                                       );
-
-                                                       /* reset */
-                                                       key = NULL;
-                                               }
-                                       }
+       http_request_pool_detach_all(&obj->pool);
+}
+/* }}} */
 
-                                       /* file data */
-                                       FOREACH_VAL(post_files, data) {
-                                               zval **file, **type, **name;
+/* {{{ proto void HttpRequestPool::reset()
+ *
+ * Detach all attached HttpRequest objects.
+ */
+PHP_METHOD(HttpRequestPool, reset)
+{
+       getObject(http_requestpool_object, obj);
 
-                                               if (    SUCCESS == zend_hash_find(Z_ARRVAL_PP(data), "name", sizeof("name"), (void **) &name) &&
-                                                               SUCCESS == zend_hash_find(Z_ARRVAL_PP(data), "type", sizeof("type"), (void **) &type) &&
-                                                               SUCCESS == zend_hash_find(Z_ARRVAL_PP(data), "file", sizeof("file"), (void **) &file)) {
+       NO_ARGS;
 
-                                                       curl_formadd(&http_post_data[0], &http_post_data[1],
-                                                               CURLFORM_COPYNAME,              Z_STRVAL_PP(name),
-                                                               CURLFORM_FILE,                  Z_STRVAL_PP(file),
-                                                               CURLFORM_CONTENTTYPE,   Z_STRVAL_PP(type),
-                                                               CURLFORM_END
-                                                       );
-                                               }
-                                       }
+       http_request_pool_detach_all(&obj->pool);
+}
 
-                                       status = http_post_curldata_ex(obj->ch, request_uri, http_post_data[0], Z_ARRVAL_P(opts), Z_ARRVAL_P(info), &obj->response);
-                                       curl_formfree(http_post_data[0]);
-                               }
-                       }
-               break;
+/* {{{ proto bool HttpRequestPool::attach(HttpRequest request)
+ *
+ * Attach an HttpRequest object to this HttpRequestPool.
+ * NOTE: set all options prior attaching!
+ */
+PHP_METHOD(HttpRequestPool, attach)
+{
+       zval *request;
+       STATUS status = FAILURE;
+       getObject(http_requestpool_object, obj);
 
-               default:
-               break;
+       SET_EH_THROW_HTTP();
+       if (SUCCESS == zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "O", &request, http_request_object_ce)) {
+               status = http_request_pool_attach(&obj->pool, request);
        }
+       SET_EH_NORMAL();
+       RETURN_SUCCESS(status);
+}
+/* }}} */
 
-       efree(request_uri);
+/* {{{ proto bool HttpRequestPool::detach(HttpRequest request)
+ *
+ * Detach an HttpRequest object from this HttpRequestPool.
+ */
+PHP_METHOD(HttpRequestPool, detach)
+{
+       zval *request;
+       STATUS status = FAILURE;
+       getObject(http_requestpool_object, obj);
 
-       /* final data handling */
-       if (status == SUCCESS) {
-               http_message *msg;
+       SET_EH_THROW_HTTP();
+       if (SUCCESS == zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "O", &request, http_request_object_ce)) {
+               status = http_request_pool_detach(&obj->pool, request);
+       }
+       SET_EH_NORMAL();
+       RETURN_SUCCESS(status);
+}
+/* }}} */
+
+/* {{{ proto bool HttpRequestPool::send()
+ *
+ * Send all attached HttpRequest objects in parallel.
+ */
+PHP_METHOD(HttpRequestPool, send)
+{
+       STATUS status;
+       getObject(http_requestpool_object, obj);
+
+       NO_ARGS;
+
+       SET_EH_THROW_HTTP();
+       status = http_request_pool_send(&obj->pool);
+       SET_EH_NORMAL();
+
+       RETURN_SUCCESS(status);
+}
+/* }}} */
 
-               if (msg = http_message_parse(PHPSTR_VAL(&obj->response), PHPSTR_LEN(&obj->response))) {
-                       zval *headers, *message;
-                       char *body;
-                       size_t body_len;
+/* {{{ proto protected bool HttpRequestPool::socketSend()
+ *
+ * Usage:
+ * <pre>
+ * <?php
+ *     while ($pool->socketSend()) {
+ *         do_something_else();
+ *         if (!$pool->socketSelect()) {
+ *             die('Socket error');
+ *         }
+ *     }
+ *     $pool->socketRead();
+ * ?>
+ * </pre>
+ */
+PHP_METHOD(HttpRequestPool, socketSend)
+{
+       getObject(http_requestpool_object, obj);
 
-                       UPD_PROP(obj, long, responseCode, msg->info.response.code);
+       NO_ARGS;
 
-                       MAKE_STD_ZVAL(headers)
-                       array_init(headers);
+       RETURN_BOOL(0 < http_request_pool_perform(&obj->pool));
+}
+/* }}} */
 
-                       zend_hash_copy(Z_ARRVAL_P(headers), &msg->hdrs, (copy_ctor_func_t) zval_add_ref, NULL, sizeof(zval *));
-                       phpstr_data(PHPSTR(msg), &body, &body_len);
+/* {{{ proto protected bool HttpRequestPool::socketSelect()
+ *
+ * See HttpRequestPool::socketSend().
+ */
+PHP_METHOD(HttpRequestPool, socketSelect)
+{
+       getObject(http_requestpool_object, obj);
 
-                       add_assoc_zval(resp, "headers", headers);
-                       add_assoc_stringl(resp, "body", body, body_len, 0);
+       NO_ARGS;
 
-                       message = GET_PROP(obj, responseMessage);
-                       zval_dtor(message);
-                       Z_TYPE_P(message)  = IS_OBJECT;
-                       message->value.obj = http_message_object_from_msg(msg);
-                       SET_PROP(obj, responseMessage, message);
-               } else {
-                       status = FAILURE;
-               }
-       }
+       RETURN_SUCCESS(http_request_pool_select(&obj->pool));
+}
+/* }}} */
 
-       SET_EH_NORMAL();
-       RETURN_SUCCESS(status);
+/* {{{ proto protected void HttpRequestPool::socketRead()
+ *
+ * See HttpRequestPool::socketSend().
+ */
+PHP_METHOD(HttpRequestPool, socketRead)
+{
+       getObject(http_requestpool_object, obj);
+
+       NO_ARGS;
+
+       zend_llist_apply(&obj->pool.handles, (llist_apply_func_t) http_request_pool_responsehandler TSRMLS_CC);
 }
 /* }}} */
+
+/* }}} */
+
 /* }}} */
 #endif /* HTTP_HAVE_CURL */