X-Git-Url: https://git.m6w6.name/?p=m6w6%2Fext-http;a=blobdiff_plain;f=http_methods.c;h=c18e5aec630aa7603f5e678ab23296862ed82b81;hp=715d904ae495daebdc3e0c66406f142526e8776d;hb=e47ee304be6758fbbfd238476f8a6bda9090fe12;hpb=2214902cf967c3aaf8e8493295f1ac43831ed015 diff --git a/http_methods.c b/http_methods.c index 715d904..c18e5ae 100644 --- a/http_methods.c +++ b/http_methods.c @@ -1,3984 +1,2343 @@ /* - +----------------------------------------------------------------------+ - | PECL :: http | - +----------------------------------------------------------------------+ - | This source file is subject to version 3.0 of the PHP license, that | - | is bundled with this package in the file LICENSE, and is available | - | through the world-wide-web at http://www.php.net/license/3_0.txt. | - | If you did not receive a copy of the PHP license and are unable to | - | obtain it through the world-wide-web, please send a note to | - | license@php.net so we can mail you a copy immediately. | - +----------------------------------------------------------------------+ - | Copyright (c) 2004-2005 Michael Wallner | - +----------------------------------------------------------------------+ - */ - - /* $Id$ */ - - #ifdef HAVE_CONFIG_H - # include "config.h" - #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_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_send_api.h" - #include "php_http_url_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) - * - * Instantiates a new HttpResponse object, which can be used to send - * any data/resource/file to an HTTP client with caching and multiple - * ranges/resuming support. - * - * NOTE: GZIPping is not implemented yet. - */ - PHP_METHOD(HttpResponse, __construct) - { - zend_bool do_cache = 0, do_gzip = 0; - getObject(http_response_object, obj); - - SET_EH_THROW_HTTP(); - if (SUCCESS == zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "|bb", &do_cache, &do_gzip)) { - UPD_PROP(obj, long, cache, do_cache); - UPD_PROP(obj, long, gzip, do_gzip); - } - SET_EH_NORMAL(); - } - /* }}} */ - - /* {{{ proto bool HttpResponse::setCache(bool cache) - * - * Whether it sould be attempted to cache the entitity. - * This will result in necessary caching headers and checks of clients - * "If-Modified-Since" and "If-None-Match" headers. If one of those headers - * matches a "304 Not Modified" status code will be issued. - * - * NOTE: If you're using sessions, be shure that you set session.cache_limiter - * to something more appropriate than "no-cache"! - */ - PHP_METHOD(HttpResponse, setCache) - { - zend_bool do_cache = 0; - getObject(http_response_object, obj); - - if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "b", &do_cache)) { - RETURN_FALSE; - } - - UPD_PROP(obj, long, cache, do_cache); - RETURN_TRUE; - } - /* }}} */ - - /* {{{ proto bool HttpResponse::getCache() - * - * Get current caching setting. - */ - PHP_METHOD(HttpResponse, getCache) - { - - zval *do_cache = NULL; - - getObject(http_response_object, obj); - - - NO_ARGS; + 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)); - + do_cache = GET_PROP(obj, cache); + RETURN_BOOL(Z_LVAL_P(do_cache)); + } } - /* }}}*/ - - /* {{{ proto bool HttpResponse::setGzip(bool gzip) - * - * Enable on-thy-fly gzipping of the sent entity. NOT IMPLEMENTED YET. - */ - PHP_METHOD(HttpResponse, setGzip) - { - zend_bool do_gzip = 0; - getObject(http_response_object, obj); - - if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "b", &do_gzip)) { - RETURN_FALSE; - } - - UPD_PROP(obj, long, gzip, do_gzip); - RETURN_TRUE; - } - /* }}} */ - - /* {{{ proto bool HttpResponse::getGzip() - * - * Get current gzipping setting. - */ - PHP_METHOD(HttpResponse, getGzip) - { - - zval *do_gzip = NULL; - - getObject(http_response_object, obj); - - - NO_ARGS; + IF_RETVAL_USED { + zval *do_gzip; + getObject(http_response_object, obj); - - do_gzip = GET_PROP(obj, gzip); - - RETURN_BOOL(Z_LVAL_P(do_gzip)); - + do_gzip = GET_PROP(obj, gzip); + RETURN_BOOL(Z_LVAL_P(do_gzip)); + } } - /* }}} */ - - /* {{{ proto bool HttpResponse::setCacheControl(string control[, bool raw = false]) - * - * Set a custom cache-control header, usually being "private" or "public"; if - * $raw is set to true the header will be sent as-is. - */ - PHP_METHOD(HttpResponse, setCacheControl) - { - char *ccontrol; - int cc_len; - zend_bool raw = 0; - getObject(http_response_object, obj); - - if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "s|b", &ccontrol, &cc_len, &raw)) { - RETURN_FALSE; - } - - if ((!raw) && (strcmp(ccontrol, "public") && strcmp(ccontrol, "private") && strcmp(ccontrol, "no-cache"))) { - http_error_ex(E_WARNING, HTTP_E_PARAM, "Cache-Control '%s' doesn't match public, private or no-cache", ccontrol); - RETURN_FALSE; - } - - UPD_PROP(obj, long, raw_cache_header, raw); - UPD_PROP(obj, string, cacheControl, ccontrol); - RETURN_TRUE; - } - /* }}} */ - - /* {{{ proto string HttpResponse::getCacheControl() - * - * Get current Cache-Control header setting. - */ - PHP_METHOD(HttpResponse, getCacheControl) - { - - zval *ccontrol; - - getObject(http_response_object, obj); - - - NO_ARGS; + 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); - + ccontrol = GET_PROP(obj, cacheControl); + RETURN_STRINGL(Z_STRVAL_P(ccontrol), Z_STRLEN_P(ccontrol), 1); + } } - /* }}} */ - - /* {{{ proto bool HttpResponse::setContentType(string content_type) - * - * Set the content-type of the sent entity. - */ - PHP_METHOD(HttpResponse, setContentType) - { - char *ctype; - int ctype_len; - getObject(http_response_object, obj); - - if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "s", &ctype, &ctype_len)) { - RETURN_FALSE; - } - - if (!strchr(ctype, '/')) { - http_error_ex(E_WARNING, HTTP_E_PARAM, "Content type '%s' doesn't seem to contain a primary and a secondary part", ctype); - RETURN_FALSE; - } - - UPD_PROP(obj, string, contentType, ctype); - - RETURN_TRUE; - } - /* }}} */ - - /* {{{ proto string HttpResponse::getContentType() - * - * Get current Content-Type header setting. - */ - PHP_METHOD(HttpResponse, getContentType) - { - - zval *ctype; - - getObject(http_response_object, obj); - - - NO_ARGS; + 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); - + ctype = GET_PROP(obj, contentType); + RETURN_STRINGL(Z_STRVAL_P(ctype), Z_STRLEN_P(ctype), 1); + } } - /* }}} */ - - /* {{{ proto bool HttpResponse::setContentDisposition(string filename[, bool inline = false]) - * - * Set the Content-Disposition of the sent entity. This setting aims to suggest - * the receiveing user agent how to handle the sent entity; usually the client - * will show the user a "Save As..." popup. - */ - PHP_METHOD(HttpResponse, setContentDisposition) - { - char *file; - int file_len; - zend_bool is_inline = 0; - getObject(http_response_object, obj); - - if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "s|b", &file, &file_len, &is_inline)) { - RETURN_FALSE; - } - - UPD_PROP(obj, string, dispoFile, file); - UPD_PROP(obj, long, dispoInline, is_inline); - RETURN_TRUE; - } - /* }}} */ - - /* {{{ proto array HttpResponse::getContentDisposition() - * - * Get current Content-Disposition setting. - * Will return an associative array like: - * 
-
  * array(
-
  *     'filename' => 'foo.bar',
-
  *     'inline'   => false
-
  * )
-
  *
- */ - PHP_METHOD(HttpResponse, getContentDisposition) - { + NO_ARGS; - zval *file; - - zval *is_inline; - - getObject(http_response_object, obj); - - - - if (ZEND_NUM_ARGS()) { + IF_RETVAL_USED { + zval *file, *is_inline; + getObject(http_response_object, obj); - WRONG_PARAM_COUNT; + 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)); } - - - - 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)); - } - /* }}} */ - - /* {{{ proto bool HttpResponse::setETag(string etag) - * - * Set a custom ETag. Use this only if you know what you're doing. - */ - PHP_METHOD(HttpResponse, setETag) - { - char *etag; - int etag_len; - getObject(http_response_object, obj); - - if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "s", &etag, &etag_len)) { - RETURN_FALSE; - } - - UPD_PROP(obj, string, eTag, etag); - RETURN_TRUE; - } - /* }}} */ - - /* {{{ proto string HttpResponse::getETag() - * - * Get the previously set custom ETag. - */ - PHP_METHOD(HttpResponse, getETag) - { + NO_ARGS; - zval *etag; + IF_RETVAL_USED { + zval *etag; + getObject(http_response_object, obj); - 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)); + } +} +/* }}} */ - etag = GET_PROP(obj, eTag); +/* {{{ proto void HttpResponse::setSendBuffersize(long bytes) + * + */ +PHP_METHOD(HttpResponse, setSendBuffersize) +{ + long bytes; - RETURN_STRINGL(Z_STRVAL_P(etag), Z_STRLEN_P(etag), 1); + 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; + IF_RETVAL_USED { + zval *bytes; + getObject(http_response_object, obj); -/* {{{ proto bool HttpResponse::setData(string data) + bytes = GET_PROP(obj, sendBuffersize); + RETURN_LONG(Z_LVAL_P(bytes)); + } +} +/* }}} */ +/* {{{ proto bool HttpResponse::setData(string data) * - * Set the data to be sent. - */ - PHP_METHOD(HttpResponse, setData) - { - zval *the_data; - getObject(http_response_object, obj); - - if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "z/", &the_data)) { - RETURN_FALSE; - } - - convert_to_string_ex(&the_data); - SET_PROP(obj, data, the_data); - UPD_PROP(obj, long, lastModified, http_last_modified(the_data, SEND_DATA)); - UPD_PROP(obj, long, send_mode, SEND_DATA); - RETURN_TRUE; - } - /* }}} */ - - /* {{{ proto string HttpResponse::getData() - * - * Get the previously set data to be sent. - */ - PHP_METHOD(HttpResponse, getData) - { - - zval *the_data; - - getObject(http_response_object, obj); - - - NO_ARGS; + 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); - + the_data = GET_PROP(obj, data); + RETURN_STRINGL(Z_STRVAL_P(the_data), Z_STRLEN_P(the_data), 1); + } } - /* }}} */ - - /* {{{ proto bool HttpResponse::setStream(resource stream) - * - * Set the resource to be sent. - */ - PHP_METHOD(HttpResponse, setStream) - { - zval *the_stream; - php_stream *the_real_stream; - getObject(http_response_object, obj); - - if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "r", &the_stream)) { - RETURN_FALSE; - } - - php_stream_from_zval(the_real_stream, &the_stream); - - SET_PROP(obj, stream, the_stream); - UPD_PROP(obj, long, lastModified, http_last_modified(the_real_stream, SEND_RSRC)); - UPD_PROP(obj, long, send_mode, SEND_RSRC); - RETURN_TRUE; - } - /* }}} */ - - /* {{{ proto resource HttpResponse::getStream() - * - * Get the previously set resource to be sent. - */ - PHP_METHOD(HttpResponse, getStream) - { - - zval *the_stream; - - getObject(http_response_object, obj); - - - NO_ARGS; + IF_RETVAL_USED { + zval *the_stream; + getObject(http_response_object, obj); - - the_stream = GET_PROP(obj, stream); - - RETURN_RESOURCE(Z_LVAL_P(the_stream)); - + the_stream = GET_PROP(obj, stream); + RETURN_RESOURCE(Z_LVAL_P(the_stream)); + } } - /* }}} */ - - /* {{{ proto bool HttpResponse::setFile(string file) - * - * Set the file to be sent. - */ - PHP_METHOD(HttpResponse, setFile) - { - zval *the_file; - getObject(http_response_object, obj); - - if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "z", &the_file)) { - RETURN_FALSE; - } - - convert_to_string_ex(&the_file); - - UPD_PROP(obj, string, file, Z_STRVAL_P(the_file)); - UPD_PROP(obj, long, lastModified, http_last_modified(the_file, -1)); - UPD_PROP(obj, long, send_mode, -1); - RETURN_TRUE; - } - /* }}} */ - - /* {{{ proto string HttpResponse::getFile() - * - * Get the previously set file to be sent. - */ - PHP_METHOD(HttpResponse, getFile) - { - - zval *the_file; - - getObject(http_response_object, obj); - - - NO_ARGS; + 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); - + 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. - * - * Example: - * 
-
  * setFile('../hidden/contract.pdf');
-
  * $r->setContentType('application/pdf');
-
  * $r->send();
-
  * ?>
-
  *
- * - */ - 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); - } - - /* caching */ - if (Z_LVAL_P(do_cache)) { - + char *cc_hdr; + int cc_len; zval *cctrl, *etag, *lmod, *ccraw; - - etag = GET_PROP(obj, eTag); - lmod = GET_PROP(obj, lastModified); - cctrl = GET_PROP(obj, cacheControl); - 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 */ - { - zval *ctype = GET_PROP(obj, contentType); - 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")); } - } - - /* content disposition */ - { - zval *dispo_file = GET_PROP(obj, dispoFile); - if (Z_STRLEN_P(dispo_file)) { - zval *dispo_inline = GET_PROP(obj, dispoInline); - http_send_content_disposition(Z_STRVAL_P(dispo_file), Z_STRLEN_P(dispo_file), (zend_bool) Z_LVAL_P(dispo_inline)); - } - } - + /* 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); - switch (Z_LVAL_P(send_mode)) - { - case SEND_DATA: - { - zval *zdata = GET_PROP(obj, data); - RETURN_SUCCESS(http_send_data(Z_STRVAL_P(zdata), Z_STRLEN_P(zdata))); - } - - case SEND_RSRC: - { - php_stream *the_real_stream; - zval *the_stream = GET_PROP(obj, stream); - php_stream_from_zval(the_real_stream, &the_stream); - RETURN_SUCCESS(http_send_stream(the_real_stream)); - } - - default: - { - zval *zfile = GET_PROP(obj, file); - RETURN_SUCCESS(http_send_file(Z_STRVAL_P(zfile))); - } - } - } - } - /* }}} */ - /* }}} */ - - /* {{{ 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. - */ - PHP_METHOD(HttpMessage, __construct) - { - char *message = NULL; - int length = 0; - getObject(http_message_object, obj); - - SET_EH_THROW_HTTP(); - if (SUCCESS == zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "|s", &message, &length) && message && length) { - if (obj->message = http_message_parse(message, length)) { - if (obj->message->parent) { - obj->parent = http_message_object_from_msg(obj->message->parent); - } - } - } else if (!obj->message) { - obj->message = http_message_new(); - } - SET_EH_NORMAL(); - } - /* }}} */ +/* {{{ 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(); + } -/* {{{ proto string HttpMessage::getBody() + 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); + } } - /* }}} */ - - /* {{{ proto array HttpMessage::getHeaders() - * - * Get Message Headers. - */ - PHP_METHOD(HttpMessage, getHeaders) - { - - zval headers; - - getObject(http_message_object, obj); - - - NO_ARGS; + 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); - + Z_ARRVAL(headers) = &obj->message->hdrs; + array_init(return_value); + array_copy(&headers, return_value); + } } - /* }}} */ - - /* {{{ proto void HttpMessage::setHeaders(array headers) - * - * Sets new headers. - */ - PHP_METHOD(HttpMessage, setHeaders) - { - zval *new_headers, old_headers; - getObject(http_message_object, obj); - - if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "a/", &new_headers)) { - return; - } - - zend_hash_clean(&obj->message->hdrs); - Z_ARRVAL(old_headers) = &obj->message->hdrs; - array_copy(new_headers, &old_headers); - } - /* }}} */ - - /* {{{ proto void HttpMessage::addHeaders(array headers[, bool append = false]) - * - * Add headers. If append is true, headers with the same name will be separated, else overwritten. - */ - PHP_METHOD(HttpMessage, addHeaders) - { - zval old_headers, *new_headers; - zend_bool append = 0; - getObject(http_message_object, obj); - - if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "a|b", &new_headers, &append)) { - return; - } - - Z_ARRVAL(old_headers) = &obj->message->hdrs; - if (append) { - array_append(new_headers, &old_headers); - } else { - array_merge(new_headers, &old_headers); - } - } - /* }}} */ - - /* {{{ proto long HttpMessage::getType() - * - * Get Message Type. (HTTP_MSG_NONE|HTTP_MSG_REQUEST|HTTP_MSG_RESPONSE) - */ - 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); + } } - /* }}} */ - - /* {{{ proto void HttpMessage::setType(long type) - * - * Set Message Type. (HTTP_MSG_NONE|HTTP_MSG_REQUEST|HTTP_MSG_RESPONSE) - */ - PHP_METHOD(HttpMessage, setType) - { - long type; - getObject(http_message_object, obj); - - if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "l", &type)) { - return; - } - http_message_set_type(obj->message, type); - } - /* }}} */ - - /* {{{ proto long HttpMessage::getResponseCode() - * - * Get the Response Code of the Message. - */ - PHP_METHOD(HttpMessage, getResponseCode) - { - - getObject(http_message_object, obj); - - - NO_ARGS; + IF_RETVAL_USED { + getObject(http_message_object, obj); + 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 (!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); } - - - - RETURN_LONG(obj->message->info.response.code); - } - /* }}} */ - - /* {{{ proto bool HttpMessage::setResponseCode(long code) - * - * Set the response code of an HTTP Response Message. - * Returns false if the Message is not of type HTTP_MSG_RESPONSE, - * or if the response code is out of range (100-510). - */ - 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; - } - - if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "l", &code)) { - RETURN_FALSE; - } - if (code < 100 || code > 510) { - http_error_ex(E_WARNING, HTTP_E_PARAM, "Invalid response code (100-510): %ld", code); - RETURN_FALSE; - } - - obj->message->info.response.code = code; - RETURN_TRUE; - } - /* }}} */ - - /* {{{ proto string HttpMessage::getRequestMethod() - * - * Get the Request Method of the Message. - * Returns false if the Message is not of type HTTP_MSG_REQUEST. - */ - PHP_METHOD(HttpMessage, getRequestMethod) - { - - getObject(http_message_object, obj); - - - NO_ARGS; + IF_RETVAL_USED { + getObject(http_message_object, obj); + if (!HTTP_MSG_TYPE(REQUEST, obj->message)) { + http_error(E_NOTICE, HTTP_E_MSG, "HttpMessage is not of type HTTP_MSG_REQUEST"); + RETURN_NULL(); + } - if (obj->message->type != HTTP_MSG_REQUEST) { - - 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); } - - - - RETURN_STRING(obj->message->info.request.method, 1); - } - /* }}} */ - - /* {{{ proto bool HttpMessage::setRequestMethod(string method) - * - * Set the Request Method of the HTTP Message. - * Returns false if the Message is not of type HTTP_MSG_REQUEST. - */ - PHP_METHOD(HttpMessage, setRequestMethod) - { - char *method; - 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; - } - - if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "s", &method, &method_len)) { - RETURN_FALSE; - } - if (method_len < 1) { - http_error(E_WARNING, HTTP_E_PARAM, "Cannot set HttpMessage::requestMethod to an empty string"); - RETURN_FALSE; - } - if (SUCCESS != http_check_method(method)) { - http_error_ex(E_WARNING, HTTP_E_PARAM, "Unkown request method: %s", method); - 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; - } - /* }}} */ - - /* {{{ proto string HttpMessage::getRequestUri() - * - * Get the Request URI of the Message. - */ - PHP_METHOD(HttpMessage, getRequestUri) - { - - zval *uri; - - getObject(http_message_object, obj); - - - NO_ARGS; + 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(); + } - if (obj->message->type != HTTP_MSG_REQUEST) { - - 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); - } - /* }}} */ - - /* {{{ proto bool HttpMessage::setRequestUri(string URI) - * - * Set the Request URI of the HTTP Message. - * Returns false if the Message is not of type HTTP_MSG_REQUEST, - * or if paramtere URI was empty. - */ - PHP_METHOD(HttpMessage, setRequestUri) - { - char *URI; - 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; - } - if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "s", &URI, &URIlen)) { - RETURN_FALSE; - } - if (URIlen < 1) { - http_error(E_WARNING, HTTP_E_PARAM, "Cannot set HttpMessage::requestUri to an empty string"); - 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; - } - /* }}} */ - - /* {{{ proto string HttpMessage::getHttpVersion() - * - * Get the HTTP Protocol Version of the Message. - */ - PHP_METHOD(HttpMessage, getHttpVersion) - { - - char ver[4] = {0}; - - float version; - - getObject(http_message_object, obj); - - - NO_ARGS; + IF_RETVAL_USED { + char ver[4] = {0}; + float version; + getObject(http_message_object, obj); + switch (obj->message->type) + { + case HTTP_MSG_RESPONSE: + version = obj->message->info.response.http_version; + break; - switch (obj->message->type) - - { - - case HTTP_MSG_RESPONSE: - - version = obj->message->info.response.http_version; - - break; - - - - case HTTP_MSG_REQUEST: - - version = obj->message->info.request.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); - } - /* }}} */ - - /* {{{ proto bool HttpMessage::setHttpVersion(string version) - * - * Set the HTTP Protocol version of the Message. - * Returns false if version is invalid (1.0 and 1.1). - */ - 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); - } - RETURN_TRUE; - } - /* }}} */ - - /* {{{ proto HttpMessage HttpMessage::getParentMessage() - * - * Get parent Message. - */ - PHP_METHOD(HttpMessage, getParentMessage) - { + NO_ARGS; - 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(); + } } - } - /* }}} */ - - /* {{{ proto bool HttpMessage::send() - * - * Send the Message according to its type as Response or Request. - */ - PHP_METHOD(HttpMessage, send) - { - getObject(http_message_object, obj); - - NO_ARGS; - - RETURN_SUCCESS(http_message_send(obj->message)); - } - /* }}} */ - - /* {{{ proto string HttpMessage::toString([bool include_parent = true]) - * - * Get the string representation of the Message. - */ - PHP_METHOD(HttpMessage, toString) - { + IF_RETVAL_USED { + char *string; + size_t length; + zend_bool include_parent = 1; + getObject(http_message_object, obj); - 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 (include_parent) { - - http_message_serialize(obj->message, &string, &length); - - } else { - - http_message_tostring(obj->message, &string, &length); + 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); + } + RETURN_STRINGL(string, length, 0); } - - RETURN_STRINGL(string, length, 0); - } - /* }}} */ - - /* }}} */ - - #ifdef HTTP_HAVE_CURL - /* {{{ HttpRequest */ - - /* {{{ proto void HttpRequest::__construct([string url[, long request_method = HTTP_GET]]) - * - * Instantiate a new HttpRequest object which can be used to issue HEAD, GET - * and POST (including posting files) HTTP requests. - */ - PHP_METHOD(HttpRequest, __construct) - { - char *URL = NULL; - int URL_len; - long meth = -1; - getObject(http_request_object, obj); - - SET_EH_THROW_HTTP(); - if (SUCCESS == zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "|sl", &URL, &URL_len, &meth)) { - 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) { - UPD_PROP(obj, string, url, URL); - } - if (meth > -1) { - UPD_PROP(obj, long, method, meth); - } - } - SET_EH_NORMAL(); - } - /* }}} */ - - /* {{{ proto void HttpRequest::__destruct() - * - * Destroys the HttpRequest object. - */ - PHP_METHOD(HttpRequest, __destruct) - { - getObject(http_request_object, obj); - - NO_ARGS; - - FREE_PARR(obj, options); - FREE_PARR(obj, responseInfo); - FREE_PARR(obj, responseData); - - FREE_PARR(obj, postData); - + FREE_PARR(obj, postFields); FREE_PARR(obj, postFiles); - } - /* }}} */ - - /* {{{ proto bool HttpRequest::setOptions(array options) - * - * Set the request options to use. See http_get() for a full list of available options. - */ - PHP_METHOD(HttpRequest, setOptions) - { - char *key = NULL; - - long idx = 0; - + ulong idx = 0; zval *opts, *old_opts, **opt; - getObject(http_request_object, obj); - - if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "a/", &opts)) { - RETURN_FALSE; - } - - old_opts = GET_PROP(obj, options); - - /* headers and cookies need extra attention -- thus cannot use array_merge() directly */ - FOREACH_KEYVAL(opts, key, idx, opt) { - if (key) { - if (!strcmp(key, "headers")) { - zval **headers; - if (SUCCESS == zend_hash_find(Z_ARRVAL_P(old_opts), "headers", sizeof("headers"), (void **) &headers)) { - array_merge(*opt, *headers); - continue; - } - } else if (!strcmp(key, "cookies")) { - zval **cookies; - if (SUCCESS == zend_hash_find(Z_ARRVAL_P(old_opts), "cookies", sizeof("cookies"), (void **) &cookies)) { - array_merge(*opt, *cookies); - continue; - } - } - zval_add_ref(opt); - add_assoc_zval(old_opts, key, *opt); - - /* reset */ - key = NULL; - } - } - - RETURN_TRUE; - } - /* }}} */ - - /* {{{ proto array HttpRequest::getOptions() - * - * Get current set options. - */ - PHP_METHOD(HttpRequest, getOptions) - { - - zval *opts; - - getObject(http_request_object, obj); - - - NO_ARGS; + IF_RETVAL_USED { + zval *opts; + getObject(http_request_object, obj); - - opts = GET_PROP(obj, options); - - array_init(return_value); - - array_copy(opts, return_value); - + opts = GET_PROP(obj, options); + array_init(return_value); + array_copy(opts, return_value); + } } - /* }}} */ - - /* {{{ proto void HttpRequest::unsetOptions() - * - * Unset all options/headers/cookies. - */ - PHP_METHOD(HttpRequest, unsetOptions) - { - getObject(http_request_object, obj); - - NO_ARGS; - - FREE_PARR(obj, options); - INIT_PARR(obj, options); - } - /* }}} */ - - /* {{{ proto bool HttpRequest::setSslOptions(array options) - * - * Set additional SSL options. - */ - PHP_METHOD(HttpRequest, setSslOptions) - { - zval *opts, *old_opts, **ssl_options; - getObject(http_request_object, obj); - - if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "a/", &opts)) { - RETURN_FALSE; - } - - old_opts = GET_PROP(obj, options); - - if (SUCCESS == zend_hash_find(Z_ARRVAL_P(old_opts), "ssl", sizeof("ssl"), (void **) &ssl_options)) { - array_merge(opts, *ssl_options); - } else { - zval_add_ref(&opts); - add_assoc_zval(old_opts, "ssl", opts); - } - - RETURN_TRUE; - } - /* }}} */ - - /* {{{ proto array HttpRequest::getSslOtpions() - * - * Get previously set SSL options. - */ - PHP_METHOD(HttpRequest, getSslOptions) - { - - zval *opts, **ssl_options; - - getObject(http_request_object, obj); - - - NO_ARGS; + IF_RETVAL_USED { + zval *opts, **ssl_options; + getObject(http_request_object, obj); + opts = GET_PROP(obj, options); - opts = GET_PROP(obj, options); - - - - 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); + 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); + } } - } - /* }}} */ - - /* {{{ proto void HttpRequest::unsetSslOptions() - * - * Unset previously set SSL options. - */ - PHP_METHOD(HttpRequest, unsetSslOptions) - { - zval *opts; - getObject(http_request_object, obj); - - - NO_ARGS; - - + NO_ARGS; opts = GET_PROP(obj, options); - zend_hash_del(Z_ARRVAL_P(opts), "ssl", sizeof("ssl")); - } - /* }}} */ - - /* {{{ proto bool HttpRequest::addHeaders(array headers) - * - * Add request header name/value pairs. - */ - PHP_METHOD(HttpRequest, addHeaders) - { - zval *opts, **headers, *new_headers; - getObject(http_request_object, obj); - - if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "a/", &new_headers)) { - RETURN_FALSE; - } - - opts = GET_PROP(obj, options); - - if (SUCCESS == zend_hash_find(Z_ARRVAL_P(opts), "headers", sizeof("headers"), (void **) &headers)) { - array_merge(new_headers, *headers); - } else { - zval_add_ref(&new_headers); - add_assoc_zval(opts, "headers", new_headers); - } - - RETURN_TRUE; - } - /* }}} */ - - /* {{{ proto array HttpRequest::getHeaders() - * - * Get previously set request headers. - */ - PHP_METHOD(HttpRequest, getHeaders) - { - - zval *opts, **headers; - - getObject(http_request_object, obj); - - - NO_ARGS; + IF_RETVAL_USED { + zval *opts, **headers; + getObject(http_request_object, obj); + opts = GET_PROP(obj, options); - opts = GET_PROP(obj, options); - - - - array_init(return_value); - - - - 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); + } } - } - /* }}} */ - - /* {{{ proto void HttpRequest::unsetHeaders() - * - * Unset previously set request headers. - */ - PHP_METHOD(HttpRequest, unsetHeaders) - { - zval *opts; - getObject(http_request_object, obj); - - NO_ARGS; - - opts = GET_PROP(obj, options); - zend_hash_del(Z_ARRVAL_P(opts), "headers", sizeof("headers")); - } - /* }}} */ - - /* {{{ proto bool HttpRequest::addCookies(array cookies) - * - * Add cookies. - */ - PHP_METHOD(HttpRequest, addCookies) - { - zval *opts, **cookies, *new_cookies; - getObject(http_request_object, obj); - - if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "a/", &new_cookies)) { - RETURN_FALSE; - } - - opts = GET_PROP(obj, options); - - if (SUCCESS == zend_hash_find(Z_ARRVAL_P(opts), "cookies", sizeof("cookies"), (void **) &cookies)) { - array_merge(new_cookies, *cookies); - } else { - zval_add_ref(&new_cookies); - add_assoc_zval(opts, "cookies", new_cookies); - } - - RETURN_TRUE; - } - /* }}} */ - - /* {{{ proto array HttpRequest::getCookies() - * - * Get previously set cookies. - */ - PHP_METHOD(HttpRequest, getCookies) - { - - zval *opts, **cookies; - - getObject(http_request_object, obj); - - - NO_ARGS; + IF_RETVAL_USED { + zval *opts, **cookies; + getObject(http_request_object, obj); + opts = GET_PROP(obj, options); - opts = GET_PROP(obj, options); - - - - array_init(return_value); - - - - 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); + } } - } - /* }}} */ - - /* {{{ proto void HttpRequest::unsetCookies() - * - */ - PHP_METHOD(HttpRequest, unsetCookies) - { - zval *opts; - getObject(http_request_object, obj); - - NO_ARGS; - - opts = GET_PROP(obj, options); - zend_hash_del(Z_ARRVAL_P(opts), "cookies", sizeof("cookies")); - } - /* }}} */ - - /* {{{ proto bool HttpRequest::setURL(string url) - * - * Set the request URL. - */ - PHP_METHOD(HttpRequest, setURL) - { - char *URL = NULL; - int URL_len; - getObject(http_request_object, obj); - - if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "s", &URL, &URL_len)) { - RETURN_FALSE; - } - - UPD_PROP(obj, string, url, URL); - RETURN_TRUE; - } - /* }}} */ - - /* {{{ proto string HttpRequest::getUrl() - * - * Get the previously set request URL. - */ - PHP_METHOD(HttpRequest, getURL) - { - - zval *URL; - - getObject(http_request_object, obj); - - - NO_ARGS; + 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); - + URL = GET_PROP(obj, url); + RETURN_STRINGL(Z_STRVAL_P(URL), Z_STRLEN_P(URL), 1); + } } - /* }}} */ - - /* {{{ proto bool HttpRequest::setMethod(long request_method) - * - * Set the request methods; one of the HTTP_HEAD, HTTP_GET or - * HTTP_POST constants. - */ - PHP_METHOD(HttpRequest, setMethod) - { - long meth; - getObject(http_request_object, obj); - - if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "l", &meth)) { - RETURN_FALSE; - } - - UPD_PROP(obj, long, method, meth); - RETURN_TRUE; - } - /* }}} */ - - /* {{{ proto long HttpRequest::getMethod() - * - * Get the previously set request method. - */ - PHP_METHOD(HttpRequest, getMethod) - { - - zval *meth; - - getObject(http_request_object, obj); - - - NO_ARGS; + IF_RETVAL_USED { + zval *meth; + getObject(http_request_object, obj); - - meth = GET_PROP(obj, method); - - RETURN_LONG(Z_LVAL_P(meth)); - + meth = GET_PROP(obj, method); + RETURN_LONG(Z_LVAL_P(meth)); + } } - /* }}} */ - - /* {{{ proto bool HttpRequest::setContentType(string content_type) - * - * Set the content type the post request should have. - * Use this only if you know what you're doing. - */ - PHP_METHOD(HttpRequest, setContentType) - { - char *ctype; - int ct_len; - getObject(http_request_object, obj); - - if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "s", &ctype, &ct_len)) { - RETURN_FALSE; - } - - if (!strchr(ctype, '/')) { - http_error_ex(E_WARNING, HTTP_E_PARAM, "Content-Type '%s' doesn't seem to contain a primary and a secondary part", ctype); - RETURN_FALSE; - } - - UPD_PROP(obj, string, contentType, ctype); - RETURN_TRUE; - } - /* }}} */ - - /* {{{ proto string HttpRequest::getContentType() - * - * Get the previously content type. - */ - PHP_METHOD(HttpRequest, getContentType) - { - - zval *ctype; - - getObject(http_request_object, obj); - - - NO_ARGS; + 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); - + ctype = GET_PROP(obj, contentType); + RETURN_STRINGL(Z_STRVAL_P(ctype), Z_STRLEN_P(ctype), 1); + } } - /* }}} */ - - /* {{{ proto bool HttpRequest::setQueryData(mixed query_data) - * - * Set the URL query parameters to use. - * Overwrites previously set query parameters. - * Affects any request types. - */ - PHP_METHOD(HttpRequest, setQueryData) - { - zval *qdata; - char *query_data = NULL; - getObject(http_request_object, obj); - - if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "z", &qdata)) { - RETURN_FALSE; - } - - if ((Z_TYPE_P(qdata) == IS_ARRAY) || (Z_TYPE_P(qdata) == IS_OBJECT)) { - if (SUCCESS != http_urlencode_hash(HASH_OF(qdata), &query_data)) { - RETURN_FALSE; - } - UPD_PROP(obj, string, queryData, query_data); - efree(query_data); - RETURN_TRUE; - } - - convert_to_string(qdata); - UPD_PROP(obj, string, queryData, Z_STRVAL_P(qdata)); - RETURN_TRUE; - } - /* }}} */ - - /* {{{ proto string HttpRequest::getQueryData() - * - * Get the current query data in form of an urlencoded query string. - */ - PHP_METHOD(HttpRequest, getQueryData) - { - - zval *qdata; - - getObject(http_request_object, obj); - - - NO_ARGS; + 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); - + qdata = GET_PROP(obj, queryData); + RETURN_STRINGL(Z_STRVAL_P(qdata), Z_STRLEN_P(qdata), 1); + } } - /* }}} */ - - /* {{{ proto bool HttpRequest::addQueryData(array query_params) - * - * Add parameters to the query parameter list. - * Affects any request type. - */ - PHP_METHOD(HttpRequest, addQueryData) - { - zval *qdata, *old_qdata; - char *query_data = NULL; - getObject(http_request_object, obj); - - if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "a", &qdata)) { - RETURN_FALSE; - } - - old_qdata = GET_PROP(obj, queryData); - - if (SUCCESS != http_urlencode_hash_ex(HASH_OF(qdata), 1, Z_STRVAL_P(old_qdata), Z_STRLEN_P(old_qdata), &query_data, NULL)) { - RETURN_FALSE; - } - - UPD_PROP(obj, string, queryData, query_data); - efree(query_data); - - RETURN_TRUE; - } - /* }}} */ - - /* {{{ proto void HttpRequest::unsetQueryData() - * - * Clean the query parameters. - * Affects any request type. - */ - PHP_METHOD(HttpRequest, unsetQueryData) - { - getObject(http_request_object, obj); - - NO_ARGS; - - UPD_PROP(obj, string, queryData, ""); - } - /* }}} */ - - -/* {{{ 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); - - if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "a", &post_data)) { - 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); - - if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "a", &post_data)) { - RETURN_FALSE; - } - - - post = GET_PROP(obj, postData); - + post = GET_PROP(obj, postFields); zend_hash_clean(Z_ARRVAL_P(post)); - array_copy(post_data, post); - - RETURN_TRUE; - } - /* }}}*/ - - -/* {{{ 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; + IF_RETVAL_USED { + zval *post_data; + getObject(http_request_object, obj); - - post_data = GET_PROP(obj, postData); - - array_init(return_value); - - array_copy(post_data, return_value); - + 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)); - } - /* }}} */ - - /* {{{ proto bool HttpRequest::addPostFile(string name, string file[, string content_type = "application/x-octetstream"]) - * - * Add a file to the POST request. - * Affects only POST requests. - */ - PHP_METHOD(HttpRequest, addPostFile) - { - zval *files, *entry; - char *name, *file, *type = NULL; - int name_len, file_len, type_len = 0; - getObject(http_request_object, obj); - - if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "ss|s", &name, &name_len, &file, &file_len, &type, &type_len)) { - RETURN_FALSE; - } - - if (type_len) { - if (!strchr(type, '/')) { - http_error_ex(E_WARNING, HTTP_E_PARAM, "Content-Type '%s' doesn't seem to contain a primary and a secondary part", type); - RETURN_FALSE; - } - } else { - type = "application/x-octetstream"; - type_len = sizeof("application/x-octetstream") - 1; - } - - MAKE_STD_ZVAL(entry); - array_init(entry); - - add_assoc_stringl(entry, "name", name, name_len, 1); - add_assoc_stringl(entry, "type", type, type_len, 1); - add_assoc_stringl(entry, "file", file, file_len, 1); - - files = GET_PROP(obj, postFiles); - add_next_index_zval(files, entry); - - RETURN_TRUE; - } - /* }}} */ +/* {{{ 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); -/* {{{ proto array HttpRequest::getPostFiles() + 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; + IF_RETVAL_USED { + zval *files; + getObject(http_request_object, obj); + files = GET_PROP(obj, postFiles); - files = GET_PROP(obj, postFiles); - - - - array_init(return_value); - - array_copy(files, return_value); - + array_init(return_value); + array_copy(files, return_value); + } } - /* }}} */ - - /* {{{ proto void HttpRequest::unsetPostFiles() - * - * Unset the POST files list. - * Affects only POST requests. - */ - PHP_METHOD(HttpRequest, unsetPostFiles) - { - zval *files; - getObject(http_request_object, obj); - - NO_ARGS; - - files = GET_PROP(obj, postFiles); - zend_hash_clean(Z_ARRVAL_P(files)); - } - /* }}} */ - - -/* {{{ proto array HttpRequest::getResponseData() - +/* {{{ proto bool HttpRequest::SetPutFile(string file) * - - * Get all response data after the request has been sent. - + * Set file to put. + * Affects only PUT requests. */ - -PHP_METHOD(HttpRequest, getResponseData) - +PHP_METHOD(HttpRequest, setPutFile) { - - zval *data; - + 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); + } +} +/* }}} */ - data = GET_PROP(obj, responseData); - - array_init(return_value); +/* {{{ proto void HttpRequest::unsetPutFile() + * + * Unset file to put. + * Affects only PUT requests. + */ +PHP_METHOD(HttpRequest, unsetPutFile) +{ + getObject(http_request_object, obj); - array_copy(data, return_value); + 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) +{ + NO_ARGS; + IF_RETVAL_USED { + zval *data; + getObject(http_request_object, obj); -/* {{{ proto mixed HttpRequest::getResponseHeader([string name]) + data = GET_PROP(obj, responseData); + array_init(return_value); + array_copy(data, return_value); + } +} +/* }}} */ +/* {{{ proto mixed HttpRequest::getResponseHeader([string name]) * - * Get response header(s) after the request has been sent. - */ - PHP_METHOD(HttpRequest, getResponseHeader) - { + IF_RETVAL_USED { + zval *data, **headers, **header; + char *header_name = NULL; + int header_len = 0; + getObject(http_response_object, obj); - 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; - - } - - - - 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 { + if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "|s", &header_name, &header_len)) { + RETURN_FALSE; + } - 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; + } } - } - /* }}} */ - - /* {{{ proto array HttpRequest::getResponseCookie([string name]) - * - * Get response cookie(s) after the request has been sent. - */ - PHP_METHOD(HttpRequest, getResponseCookie) - { + IF_RETVAL_USED { + zval *data, **headers; + char *cookie_name = NULL; + int cookie_len = 0; + getObject(http_request_object, obj); - 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; - - } - - - - 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; - - - - 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; - - + if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "|s", &cookie_name, &cookie_len)) { + RETURN_FALSE; + } - FOREACH_HASH_VAL(Z_ARRVAL_PP(header), cookie) { + 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; + + 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 { - 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(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; - } - } - } - /* }}} */ - - /* {{{ proto string HttpRequest::getResponseBody() - * - * Get the response body after the request has been sent. - */ - PHP_METHOD(HttpRequest, getResponseBody) - { - - zval *data, **body; - - getObject(http_request_object, obj); - - - NO_ARGS; + 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; - + 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; + } } - } - /* }}} */ - - /* {{{ proto int HttpRequest::getResponseCode() - * - * Get the response code after the request has been sent. - */ - PHP_METHOD(HttpRequest, getResponseCode) - { - - zval *code; - - getObject(http_request_object, obj); - - - NO_ARGS; + IF_RETVAL_USED { + zval *code; + getObject(http_request_object, obj); - - code = GET_PROP(obj, responseCode); - - RETURN_LONG(Z_LVAL_P(code)); - + code = GET_PROP(obj, responseCode); + RETURN_LONG(Z_LVAL_P(code)); + } } - /* }}} */ - - /* {{{ proto array HttpRequest::getResponseInfo([string name]) + * + * Get response info after the request has been sent. + * See http_get() for a full list of returned info. + */ +PHP_METHOD(HttpRequest, getResponseInfo) +{ + IF_RETVAL_USED { + zval *info, **infop; + char *info_name = NULL; + int info_len = 0; + getObject(http_request_object, obj); - * - - * Get response info after the request has been sent. - - * See http_get() for a full list of returned info. - - */ - -PHP_METHOD(HttpRequest, getResponseInfo) - -{ - - 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; - - } - - - - 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); - - } else { - - http_error_ex(E_NOTICE, HTTP_E_PARAM, "Could not find response info named %s", info_name); - + if (SUCCESS != zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "|s", &info_name, &info_len)) { RETURN_FALSE; - } - } else { - - array_init(return_value); - - array_copy(info, return_value); + 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); + } else { + http_error_ex(E_NOTICE, HTTP_E_PARAM, "Could not find response info named %s", info_name); + RETURN_FALSE; + } + } else { + array_init(return_value); + array_copy(info, return_value); + } } - } - /* }}}*/ - - /* {{{ proto HttpMessage HttpRequest::getResponseMessage() - * - * Get the full response as HttpMessage object. - */ - PHP_METHOD(HttpRequest, getResponseMessage) - { - - zval *message; - - getObject(http_request_object, obj); - - - NO_ARGS; + IF_RETVAL_USED { + zval *message; + getObject(http_request_object, obj); - - 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); - + message = GET_PROP(obj, responseMessage); + if (Z_TYPE_P(message) == IS_OBJECT) { + RETVAL_OBJECT(message); + } else { + RETURN_NULL(); + } + } } - - +/* }}} */ /* {{{ proto bool HttpRequest::send() - * - * Send the HTTP request. - * - * GET example: - * 
-
  * setOptions(array('lastmodified' => filemtime('local.rss')));
-
  * $r->addQueryData(array('category' => 3));
-
  * try {
-
  *     $r->send();
-
  *     if ($r->getResponseCode() == 200) {
-
  *         file_put_contents('local.rss', $r->getResponseBody());
-
  *    }
-
  * } catch (HttpException $ex) {
-
  *     echo $ex;
-
  * }
-
  * ?>
-
  *
- * - * POST example: - * 
-
  * 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();
-
  * }
-
  * ?>
-
  *
- */ - 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); - - - - // 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); - - - - if (Z_STRLEN_P(qdata) && (strlen(request_uri) < HTTP_URI_MAXLEN)) { - - if (!strchr(request_uri, '?')) { - - strcat(request_uri, "?"); - - } else { - - strcat(request_uri, "&"); - - } - - strncat(request_uri, Z_STRVAL_P(qdata), HTTP_URI_MAXLEN - strlen(request_uri)); - + if (SUCCESS == (status = http_request_object_requesthandler(obj, getThis(), &body))) { + status = http_request_exec(obj->ch, NULL); } + http_request_body_dtor(&body); + /* final data handling */ + if (SUCCESS == status) { + status = http_request_object_responsehandler(obj, getThis()); + } + SET_EH_NORMAL(); + RETURN_SUCCESS(status); +} +/* }}} */ - switch (Z_LVAL_P(meth)) - - { - - case HTTP_GET: - - case HTTP_HEAD: - - status = http_request_ex(obj->ch, Z_LVAL_P(meth), request_uri, NULL, Z_ARRVAL_P(opts), Z_ARRVAL_P(info), &obj->response); - - break; - - - - case HTTP_PUT: - - break; - - - - case HTTP_POST: - - default: - - { - - http_request_body body; - - zval *fields = GET_PROP(obj, postData), *files = GET_PROP(obj, postFiles); - - - - if (SUCCESS == (status = http_request_body_fill(&body, Z_ARRVAL_P(fields), Z_ARRVAL_P(files)))) { +/* {{{ HttpRequestPool */ - status = http_request_ex(obj->ch, Z_LVAL_P(meth), request_uri, &body, Z_ARRVAL_P(opts), Z_ARRVAL_P(info), &obj->response); +/* {{{ proto void HttpRequestPool::__construct([HttpRequest request[, ...]]) + * + * Instantiate a new HttpRequestPool object. An HttpRequestPool is + * able to send several HttpRequests in parallel. + * + * Example: + * 
+ * 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'
+ *         );
+ *     }
+ * ?>
+ *
+ */ +PHP_METHOD(HttpRequestPool, __construct) +{ + int argc = ZEND_NUM_ARGS(); + zval ***argv = safe_emalloc(argc, sizeof(zval *), 0); + getObject(http_requestpool_object, obj); - http_request_body_dtor(&body); + 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])); } - } - - break; - } + efree(argv); +} +/* }}} */ +/* {{{ proto void HttpRequestPool::__destruct() + * + * Clean up HttpRequestPool object. + */ +PHP_METHOD(HttpRequestPool, __destruct) +{ + getObject(http_requestpool_object, obj); + NO_ARGS; - efree(request_uri); - - - - /* final data handling */ - - if (status == SUCCESS) { - - http_message *msg; - - - - if (msg = http_message_parse(PHPSTR_VAL(&obj->response), PHPSTR_LEN(&obj->response))) { - - zval *headers, *message; - - char *body; - - size_t body_len; - - - - UPD_PROP(obj, long, responseCode, msg->info.response.code); - - - - MAKE_STD_ZVAL(headers) - - array_init(headers); - - - - 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); + http_request_pool_detach_all(&obj->pool); +} +/* }}} */ +/* {{{ proto void HttpRequestPool::reset() + * + * Detach all attached HttpRequest objects. + */ +PHP_METHOD(HttpRequestPool, reset) +{ + getObject(http_requestpool_object, obj); + NO_ARGS; - add_assoc_zval(resp, "headers", headers); + http_request_pool_detach_all(&obj->pool); +} - add_assoc_stringl(resp, "body", body, body_len, 0); +/* {{{ 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); + 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); +} +/* }}} */ +/* {{{ 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); - message = GET_PROP(obj, responseMessage); + 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); +} +/* }}} */ - zval_dtor(message); +/* {{{ proto bool HttpRequestPool::send() + * + * Send all attached HttpRequest objects in parallel. + */ +PHP_METHOD(HttpRequestPool, send) +{ + STATUS status; + getObject(http_requestpool_object, obj); - Z_TYPE_P(message) = IS_OBJECT; + NO_ARGS; - message->value.obj = http_message_object_from_msg(msg); + SET_EH_THROW_HTTP(); + status = http_request_pool_send(&obj->pool); + SET_EH_NORMAL(); - SET_PROP(obj, responseMessage, message); + RETURN_SUCCESS(status); +} +/* }}} */ - } else { +/* {{{ proto protected bool HttpRequestPool::socketSend() + * + * Usage: + * 
+ * socketSend()) {
+ *         do_something_else();
+ *         if (!$pool->socketSelect()) {
+ *             die('Socket error');
+ *         }
+ *     }
+ *     $pool->socketRead();
+ * ?>
+ *
+ */ +PHP_METHOD(HttpRequestPool, socketSend) +{ + getObject(http_requestpool_object, obj); - status = FAILURE; + NO_ARGS; - } + RETURN_BOOL(0 < http_request_pool_perform(&obj->pool)); +} +/* }}} */ - } +/* {{{ proto protected bool HttpRequestPool::socketSelect() + * + * See HttpRequestPool::socketSend(). + */ +PHP_METHOD(HttpRequestPool, socketSelect) +{ + getObject(http_requestpool_object, obj); + NO_ARGS; + RETURN_SUCCESS(http_request_pool_select(&obj->pool)); +} +/* }}} */ - SET_EH_NORMAL(); +/* {{{ proto protected void HttpRequestPool::socketRead() + * + * See HttpRequestPool::socketSend(). + */ +PHP_METHOD(HttpRequestPool, socketRead) +{ + getObject(http_requestpool_object, obj); - RETURN_SUCCESS(status); + NO_ARGS; + zend_llist_apply(&obj->pool.handles, (llist_apply_func_t) http_request_pool_responsehandler TSRMLS_CC); } - /* }}} */ /* }}} */ +/* }}} */ #endif /* HTTP_HAVE_CURL */ - - #endif /* ZEND_ENGINE_2 */ - - /* - * Local variables: - * tab-width: 4 - * c-basic-offset: 4 - * End: - * vim600: noet sw=4 ts=4 fdm=marker - * vim<600: noet sw=4 ts=4 - */