2 +----------------------------------------------------------------------+
4 +----------------------------------------------------------------------+
5 | This source file is subject to version 3.0 of the PHP license, that |
6 | is bundled with this package in the file LICENSE, and is available |
7 | through the world-wide-web at http://www.php.net/license/3_0.txt. |
8 | If you did not receive a copy of the PHP license and are unable to |
9 | obtain it through the world-wide-web, please send a note to |
10 | license@php.net so we can mail you a copy immediately. |
11 +----------------------------------------------------------------------+
12 | Copyright (c) 2004-2005 Michael Wallner <mike@php.net> |
13 +----------------------------------------------------------------------+
24 #include "php_http_std_defs.h"
25 #include "php_http_api.h"
26 #include "php_http_cache_api.h"
27 #include "php_http_curl_api.h"
28 #include "php_http_date_api.h"
29 #include "php_http_headers_api.h"
30 #include "php_http_message_api.h"
31 #include "php_http_send_api.h"
32 #include "php_http_url_api.h"
34 #include "php_http_message_object.h"
35 #include "php_http_response_object.h"
36 #include "php_http_request_object.h"
37 #include "php_http_exception_object.h"
41 /* {{{ HttpResponse */
43 /* {{{ proto void HttpResponse::__construct(bool cache, bool gzip)
45 * Instantiates a new HttpResponse object, which can be used to send
46 * any data/resource/file to an HTTP client with caching and multiple
47 * ranges/resuming support.
49 * NOTE: GZIPping is not implemented yet.
51 PHP_METHOD(HttpResponse
, __construct
)
53 zend_bool do_cache
= 0, do_gzip
= 0;
54 getObject(http_response_object
, obj
);
57 if (SUCCESS
== zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "|bb", &do_cache
, &do_gzip
)) {
58 UPD_PROP(obj
, long, cache
, do_cache
);
59 UPD_PROP(obj
, long, gzip
, do_gzip
);
65 /* {{{ proto bool HttpResponse::setCache(bool cache)
67 * Whether it sould be attempted to cache the entitity.
68 * This will result in necessary caching headers and checks of clients
69 * "If-Modified-Since" and "If-None-Match" headers. If one of those headers
70 * matches a "304 Not Modified" status code will be issued.
72 * NOTE: If you're using sessions, be shure that you set session.cache_limiter
73 * to something more appropriate than "no-cache"!
75 PHP_METHOD(HttpResponse
, setCache
)
77 zend_bool do_cache
= 0;
78 getObject(http_response_object
, obj
);
80 if (SUCCESS
!= zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "b", &do_cache
)) {
84 UPD_PROP(obj
, long, cache
, do_cache
);
89 /* {{{ proto bool HttpResponse::getCache()
91 * Get current caching setting.
93 PHP_METHOD(HttpResponse
, getCache
)
95 zval
*do_cache
= NULL
;
96 getObject(http_response_object
, obj
);
100 do_cache
= GET_PROP(obj
, cache
);
101 RETURN_BOOL(Z_LVAL_P(do_cache
));
105 /* {{{ proto bool HttpResponse::setGzip(bool gzip)
107 * Enable on-thy-fly gzipping of the sent entity. NOT IMPLEMENTED YET.
109 PHP_METHOD(HttpResponse
, setGzip
)
111 zend_bool do_gzip
= 0;
112 getObject(http_response_object
, obj
);
114 if (SUCCESS
!= zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "b", &do_gzip
)) {
118 UPD_PROP(obj
, long, gzip
, do_gzip
);
123 /* {{{ proto bool HttpResponse::getGzip()
125 * Get current gzipping setting.
127 PHP_METHOD(HttpResponse
, getGzip
)
129 zval
*do_gzip
= NULL
;
130 getObject(http_response_object
, obj
);
134 do_gzip
= GET_PROP(obj
, gzip
);
135 RETURN_BOOL(Z_LVAL_P(do_gzip
));
139 /* {{{ proto bool HttpResponse::setCacheControl(string control[, bool raw = false])
141 * Set a custom cache-control header, usually being "private" or "public"; if
142 * $raw is set to true the header will be sent as-is.
144 PHP_METHOD(HttpResponse
, setCacheControl
)
149 getObject(http_response_object
, obj
);
151 if (SUCCESS
!= zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "s|b", &ccontrol
, &cc_len
, &raw
)) {
155 if ((!raw
) && (strcmp(ccontrol
, "public") && strcmp(ccontrol
, "private") && strcmp(ccontrol
, "no-cache"))) {
156 http_error_ex(E_WARNING
, HTTP_E_PARAM
, "Cache-Control '%s' doesn't match public, private or no-cache", ccontrol
);
160 UPD_PROP(obj
, long, raw_cache_header
, raw
);
161 UPD_PROP(obj
, string
, cacheControl
, ccontrol
);
166 /* {{{ proto string HttpResponse::getCacheControl()
168 * Get current Cache-Control header setting.
170 PHP_METHOD(HttpResponse
, getCacheControl
)
173 getObject(http_response_object
, obj
);
177 ccontrol
= GET_PROP(obj
, cacheControl
);
178 RETURN_STRINGL(Z_STRVAL_P(ccontrol
), Z_STRLEN_P(ccontrol
), 1);
182 /* {{{ proto bool HttpResponse::setContentType(string content_type)
184 * Set the content-type of the sent entity.
186 PHP_METHOD(HttpResponse
, setContentType
)
190 getObject(http_response_object
, obj
);
192 if (SUCCESS
!= zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "s", &ctype
, &ctype_len
)) {
196 if (!strchr(ctype
, '/')) {
197 http_error_ex(E_WARNING
, HTTP_E_PARAM
, "Content type '%s' doesn't seem to contain a primary and a secondary part", ctype
);
201 UPD_PROP(obj
, string
, contentType
, ctype
);
207 /* {{{ proto string HttpResponse::getContentType()
209 * Get current Content-Type header setting.
211 PHP_METHOD(HttpResponse
, getContentType
)
214 getObject(http_response_object
, obj
);
218 ctype
= GET_PROP(obj
, contentType
);
219 RETURN_STRINGL(Z_STRVAL_P(ctype
), Z_STRLEN_P(ctype
), 1);
223 /* {{{ proto bool HttpResponse::setContentDisposition(string filename[, bool inline = false])
225 * Set the Content-Disposition of the sent entity. This setting aims to suggest
226 * the receiveing user agent how to handle the sent entity; usually the client
227 * will show the user a "Save As..." popup.
229 PHP_METHOD(HttpResponse
, setContentDisposition
)
233 zend_bool is_inline
= 0;
234 getObject(http_response_object
, obj
);
236 if (SUCCESS
!= zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "s|b", &file
, &file_len
, &is_inline
)) {
240 UPD_PROP(obj
, string
, dispoFile
, file
);
241 UPD_PROP(obj
, long, dispoInline
, is_inline
);
246 /* {{{ proto array HttpResponse::getContentDisposition()
248 * Get current Content-Disposition setting.
249 * Will return an associative array like:
252 * 'filename' => 'foo.bar',
257 PHP_METHOD(HttpResponse
, getContentDisposition
)
261 getObject(http_response_object
, obj
);
263 if (ZEND_NUM_ARGS()) {
267 file
= GET_PROP(obj
, dispoFile
);
268 is_inline
= GET_PROP(obj
, dispoInline
);
270 array_init(return_value
);
271 add_assoc_stringl(return_value
, "filename", Z_STRVAL_P(file
), Z_STRLEN_P(file
), 1);
272 add_assoc_bool(return_value
, "inline", Z_LVAL_P(is_inline
));
276 /* {{{ proto bool HttpResponse::setETag(string etag)
278 * Set a custom ETag. Use this only if you know what you're doing.
280 PHP_METHOD(HttpResponse
, setETag
)
284 getObject(http_response_object
, obj
);
286 if (SUCCESS
!= zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "s", &etag
, &etag_len
)) {
290 UPD_PROP(obj
, string
, eTag
, etag
);
295 /* {{{ proto string HttpResponse::getETag()
297 * Get the previously set custom ETag.
299 PHP_METHOD(HttpResponse
, getETag
)
302 getObject(http_response_object
, obj
);
306 etag
= GET_PROP(obj
, eTag
);
307 RETURN_STRINGL(Z_STRVAL_P(etag
), Z_STRLEN_P(etag
), 1);
311 /* {{{ proto bool HttpResponse::setData(string data)
313 * Set the data to be sent.
315 PHP_METHOD(HttpResponse
, setData
)
318 getObject(http_response_object
, obj
);
320 if (SUCCESS
!= zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "z/", &the_data
)) {
324 convert_to_string_ex(&the_data
);
325 SET_PROP(obj
, data
, the_data
);
326 UPD_PROP(obj
, long, lastModified
, http_last_modified(the_data
, SEND_DATA
));
327 UPD_PROP(obj
, long, send_mode
, SEND_DATA
);
332 /* {{{ proto string HttpResponse::getData()
334 * Get the previously set data to be sent.
336 PHP_METHOD(HttpResponse
, getData
)
339 getObject(http_response_object
, obj
);
343 the_data
= GET_PROP(obj
, data
);
344 RETURN_STRINGL(Z_STRVAL_P(the_data
), Z_STRLEN_P(the_data
), 1);
348 /* {{{ proto bool HttpResponse::setStream(resource stream)
350 * Set the resource to be sent.
352 PHP_METHOD(HttpResponse
, setStream
)
355 php_stream
*the_real_stream
;
356 getObject(http_response_object
, obj
);
358 if (SUCCESS
!= zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "r", &the_stream
)) {
362 php_stream_from_zval(the_real_stream
, &the_stream
);
364 SET_PROP(obj
, stream
, the_stream
);
365 UPD_PROP(obj
, long, lastModified
, http_last_modified(the_real_stream
, SEND_RSRC
));
366 UPD_PROP(obj
, long, send_mode
, SEND_RSRC
);
371 /* {{{ proto resource HttpResponse::getStream()
373 * Get the previously set resource to be sent.
375 PHP_METHOD(HttpResponse
, getStream
)
378 getObject(http_response_object
, obj
);
382 the_stream
= GET_PROP(obj
, stream
);
383 RETURN_RESOURCE(Z_LVAL_P(the_stream
));
387 /* {{{ proto bool HttpResponse::setFile(string file)
389 * Set the file to be sent.
391 PHP_METHOD(HttpResponse
, setFile
)
394 getObject(http_response_object
, obj
);
396 if (SUCCESS
!= zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "z", &the_file
)) {
400 convert_to_string_ex(&the_file
);
402 UPD_PROP(obj
, string
, file
, Z_STRVAL_P(the_file
));
403 UPD_PROP(obj
, long, lastModified
, http_last_modified(the_file
, -1));
404 UPD_PROP(obj
, long, send_mode
, -1);
409 /* {{{ proto string HttpResponse::getFile()
411 * Get the previously set file to be sent.
413 PHP_METHOD(HttpResponse
, getFile
)
416 getObject(http_response_object
, obj
);
420 the_file
= GET_PROP(obj
, file
);
421 RETURN_STRINGL(Z_STRVAL_P(the_file
), Z_STRLEN_P(the_file
), 1);
425 /* {{{ proto bool HttpResponse::send()
427 * Finally send the entity.
432 * $r = new HttpResponse(true);
433 * $r->setFile('../hidden/contract.pdf');
434 * $r->setContentType('application/pdf');
440 PHP_METHOD(HttpResponse
, send
)
442 zval
*do_cache
, *do_gzip
;
443 getObject(http_response_object
, obj
);
447 do_cache
= GET_PROP(obj
, cache
);
448 do_gzip
= GET_PROP(obj
, gzip
);
451 if (Z_LVAL_P(do_gzip
)) {
452 php_start_ob_buffer_named("ob_gzhandler", 0, 1 TSRMLS_CC
);
456 if (Z_LVAL_P(do_cache
)) {
457 zval
*cctrl
, *etag
, *lmod
, *ccraw
;
459 etag
= GET_PROP(obj
, eTag
);
460 lmod
= GET_PROP(obj
, lastModified
);
461 cctrl
= GET_PROP(obj
, cacheControl
);
462 ccraw
= GET_PROP(obj
, raw_cache_header
);
464 if (Z_LVAL_P(ccraw
)) {
465 http_cache_etag(Z_STRVAL_P(etag
), Z_STRLEN_P(etag
), Z_STRVAL_P(cctrl
), Z_STRLEN_P(cctrl
));
466 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
));
468 char cc_header
[42] = {0};
469 sprintf(cc_header
, "%s, must-revalidate, max-age=0", Z_STRVAL_P(cctrl
));
470 http_cache_etag(Z_STRVAL_P(etag
), Z_STRLEN_P(etag
), cc_header
, strlen(cc_header
));
471 http_cache_last_modified(Z_LVAL_P(lmod
), Z_LVAL_P(lmod
) ? Z_LVAL_P(lmod
) : time(NULL
), cc_header
, strlen(cc_header
));
477 zval
*ctype
= GET_PROP(obj
, contentType
);
478 if (Z_STRLEN_P(ctype
)) {
479 http_send_content_type(Z_STRVAL_P(ctype
), Z_STRLEN_P(ctype
));
481 http_send_content_type("application/x-octetstream", sizeof("application/x-octetstream") - 1);
485 /* content disposition */
487 zval
*dispo_file
= GET_PROP(obj
, dispoFile
);
488 if (Z_STRLEN_P(dispo_file
)) {
489 zval
*dispo_inline
= GET_PROP(obj
, dispoInline
);
490 http_send_content_disposition(Z_STRVAL_P(dispo_file
), Z_STRLEN_P(dispo_file
), (zend_bool
) Z_LVAL_P(dispo_inline
));
496 zval
*send_mode
= GET_PROP(obj
, send_mode
);
497 switch (Z_LVAL_P(send_mode
))
501 zval
*zdata
= GET_PROP(obj
, data
);
502 RETURN_SUCCESS(http_send_data(Z_STRVAL_P(zdata
), Z_STRLEN_P(zdata
)));
507 php_stream
*the_real_stream
;
508 zval
*the_stream
= GET_PROP(obj
, stream
);
509 php_stream_from_zval(the_real_stream
, &the_stream
);
510 RETURN_SUCCESS(http_send_stream(the_real_stream
));
515 zval
*zfile
= GET_PROP(obj
, file
);
516 RETURN_SUCCESS(http_send_file(Z_STRVAL_P(zfile
)));
524 /* {{{ HttpMessage */
526 /* {{{ proto static HttpMessage HttpMessage::fromString(string raw_message)
528 * Create an HttpMessage object from a string.
530 PHP_METHOD(HttpMessage
, fromString
)
534 http_message
*msg
= NULL
;
535 http_message_object obj
;
537 if (SUCCESS
!= zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "s", &string
, &length
)) {
541 if (!(msg
= http_message_parse(string
, length
))) {
545 Z_TYPE_P(return_value
) = IS_OBJECT
;
546 return_value
->value
.obj
= http_message_object_from_msg(msg
);
550 /* {{{ proto void HttpMessage::__construct([string message])
552 * Instantiate a new HttpMessage object.
554 PHP_METHOD(HttpMessage
, __construct
)
556 char *message
= NULL
;
558 getObject(http_message_object
, obj
);
561 if (SUCCESS
== zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "|s", &message
, &length
) && message
&& length
) {
562 if (obj
->message
= http_message_parse(message
, length
)) {
563 if (obj
->message
->parent
) {
564 obj
->parent
= http_message_object_from_msg(obj
->message
->parent
);
567 } else if (!obj
->message
) {
568 obj
->message
= http_message_new();
574 /* {{{ proto string HttpMessage::getBody()
576 * Get the body of the parsed Message.
578 PHP_METHOD(HttpMessage
, getBody
)
581 getObject(http_message_object
, obj
);
585 RETURN_PHPSTR(&obj
->message
->body
, PHPSTR_FREE_NOT
, 1);
589 /* {{{ proto array HttpMessage::getHeaders()
591 * Get Message Headers.
593 PHP_METHOD(HttpMessage
, getHeaders
)
596 getObject(http_message_object
, obj
);
600 Z_ARRVAL(headers
) = &obj
->message
->hdrs
;
601 array_init(return_value
);
602 array_copy(&headers
, return_value
);
606 /* {{{ proto void HttpMessage::setHeaders(array headers)
610 PHP_METHOD(HttpMessage
, setHeaders
)
612 zval
*new_headers
, old_headers
;
613 getObject(http_message_object
, obj
);
615 if (SUCCESS
!= zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "a/", &new_headers
)) {
619 zend_hash_clean(&obj
->message
->hdrs
);
620 Z_ARRVAL(old_headers
) = &obj
->message
->hdrs
;
621 array_copy(new_headers
, &old_headers
);
625 /* {{{ proto void HttpMessage::addHeaders(array headers[, bool append = false])
627 * Add headers. If append is true, headers with the same name will be separated, else overwritten.
629 PHP_METHOD(HttpMessage
, addHeaders
)
631 zval old_headers
, *new_headers
;
632 zend_bool append
= 0;
633 getObject(http_message_object
, obj
);
635 if (SUCCESS
!= zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "a|b", &new_headers
, &append
)) {
639 Z_ARRVAL(old_headers
) = &obj
->message
->hdrs
;
641 array_append(new_headers
, &old_headers
);
643 array_merge(new_headers
, &old_headers
);
648 /* {{{ proto long HttpMessage::getType()
650 * Get Message Type. (HTTP_MSG_NONE|HTTP_MSG_REQUEST|HTTP_MSG_RESPONSE)
652 PHP_METHOD(HttpMessage
, getType
)
654 getObject(http_message_object
, obj
);
658 RETURN_LONG(obj
->message
->type
);
662 /* {{{ proto void HttpMessage::setType(long type)
664 * Set Message Type. (HTTP_MSG_NONE|HTTP_MSG_REQUEST|HTTP_MSG_RESPONSE)
666 PHP_METHOD(HttpMessage
, setType
)
669 getObject(http_message_object
, obj
);
671 if (SUCCESS
!= zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "l", &type
)) {
674 http_message_set_type(obj
->message
, type
);
678 /* {{{ proto long HttpMessage::getResponseCode()
680 * Get the Response Code of the Message.
682 PHP_METHOD(HttpMessage
, getResponseCode
)
684 getObject(http_message_object
, obj
);
688 if (!HTTP_MSG_TYPE(RESPONSE
, obj
->message
)) {
689 http_error(E_NOTICE
, HTTP_E_MSG
, "HttpMessage is not of type HTTP_MSG_RESPONSE");
693 RETURN_LONG(obj
->message
->info
.response
.code
);
697 /* {{{ proto bool HttpMessage::setResponseCode(long code)
699 * Set the response code of an HTTP Response Message.
700 * Returns false if the Message is not of type HTTP_MSG_RESPONSE,
701 * or if the response code is out of range (100-510).
703 PHP_METHOD(HttpMessage
, setResponseCode
)
706 getObject(http_message_object
, obj
);
708 if (obj
->message
->type
!= HTTP_MSG_RESPONSE
) {
709 http_error(E_WARNING
, HTTP_E_MSG
, "HttpMessage is not of type HTTP_MSG_RESPONSE");
713 if (SUCCESS
!= zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "l", &code
)) {
716 if (code
< 100 || code
> 510) {
717 http_error_ex(E_WARNING
, HTTP_E_PARAM
, "Invalid response code (100-510): %ld", code
);
721 obj
->message
->info
.response
.code
= code
;
726 /* {{{ proto string HttpMessage::getRequestMethod()
728 * Get the Request Method of the Message.
729 * Returns false if the Message is not of type HTTP_MSG_REQUEST.
731 PHP_METHOD(HttpMessage
, getRequestMethod
)
733 getObject(http_message_object
, obj
);
737 if (obj
->message
->type
!= HTTP_MSG_REQUEST
) {
738 http_error(E_NOTICE
, HTTP_E_MSG
, "HttpMessage is not of type HTTP_MSG_REQUEST");
742 RETURN_STRING(obj
->message
->info
.request
.method
, 1);
746 /* {{{ proto bool HttpMessage::setRequestMethod(string method)
748 * Set the Request Method of the HTTP Message.
749 * Returns false if the Message is not of type HTTP_MSG_REQUEST.
751 PHP_METHOD(HttpMessage
, setRequestMethod
)
755 getObject(http_message_object
, obj
);
757 if (obj
->message
->type
!= HTTP_MSG_REQUEST
) {
758 http_error(E_WARNING
, HTTP_E_MSG
, "HttpMessage is not of type HTTP_MSG_REQUEST");
762 if (SUCCESS
!= zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "s", &method
, &method_len
)) {
765 if (method_len
< 1) {
766 http_error(E_WARNING
, HTTP_E_PARAM
, "Cannot set HttpMessage::requestMethod to an empty string");
769 if (SUCCESS
!= http_check_method(method
)) {
770 http_error_ex(E_WARNING
, HTTP_E_PARAM
, "Unkown request method: %s", method
);
774 if (obj
->message
->info
.request
.method
) {
775 efree(obj
->message
->info
.request
.method
);
777 obj
->message
->info
.request
.method
= estrndup(method
, method_len
);
782 /* {{{ proto string HttpMessage::getRequestUri()
784 * Get the Request URI of the Message.
786 PHP_METHOD(HttpMessage
, getRequestUri
)
789 getObject(http_message_object
, obj
);
793 if (obj
->message
->type
!= HTTP_MSG_REQUEST
) {
794 http_error(E_WARNING
, HTTP_E_MSG
, "HttpMessage is not of type HTTP_MSG_REQUEST");
798 RETURN_STRING(obj
->message
->info
.request
.URI
, 1);
802 /* {{{ proto bool HttpMessage::setRequestUri(string URI)
804 * Set the Request URI of the HTTP Message.
805 * Returns false if the Message is not of type HTTP_MSG_REQUEST,
806 * or if paramtere URI was empty.
808 PHP_METHOD(HttpMessage
, setRequestUri
)
812 getObject(http_message_object
, obj
);
814 if (obj
->message
->type
!= HTTP_MSG_REQUEST
) {
815 http_error(E_WARNING
, HTTP_E_MSG
, "HttpMessage is not of type HTTP_MSG_REQUEST");
818 if (SUCCESS
!= zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "s", &URI
, &URIlen
)) {
822 http_error(E_WARNING
, HTTP_E_PARAM
, "Cannot set HttpMessage::requestUri to an empty string");
826 if (obj
->message
->info
.request
.URI
) {
827 efree(obj
->message
->info
.request
.URI
);
829 obj
->message
->info
.request
.URI
= estrndup(URI
, URIlen
);
834 /* {{{ proto string HttpMessage::getHttpVersion()
836 * Get the HTTP Protocol Version of the Message.
838 PHP_METHOD(HttpMessage
, getHttpVersion
)
842 getObject(http_message_object
, obj
);
846 switch (obj
->message
->type
)
848 case HTTP_MSG_RESPONSE
:
849 version
= obj
->message
->info
.response
.http_version
;
852 case HTTP_MSG_REQUEST
:
853 version
= obj
->message
->info
.request
.http_version
;
860 sprintf(ver
, "%1.1f", version
);
861 RETURN_STRINGL(ver
, 3, 1);
865 /* {{{ proto bool HttpMessage::setHttpVersion(string version)
867 * Set the HTTP Protocol version of the Message.
868 * Returns false if version is invalid (1.0 and 1.1).
870 PHP_METHOD(HttpMessage
, setHttpVersion
)
874 getObject(http_message_object
, obj
);
876 if (SUCCESS
!= zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "z/", &zv
)) {
880 if (obj
->message
->type
== HTTP_MSG_NONE
) {
881 http_error(E_WARNING
, HTTP_E_MSG
, "Message is neither of type HTTP_MSG_RESPONSE nor HTTP_MSG_REQUEST");
885 convert_to_double_ex(&zv
);
886 sprintf(v
, "%1.1f", Z_DVAL_P(zv
));
887 if (strcmp(v
, "1.0") && strcmp(v
, "1.1")) {
888 http_error_ex(E_WARNING
, HTTP_E_PARAM
, "Invalid HTTP protocol version (1.0 or 1.1): %s", v
);
892 if (obj
->message
->type
== HTTP_MSG_RESPONSE
) {
893 obj
->message
->info
.response
.http_version
= (float) Z_DVAL_P(zv
);
895 obj
->message
->info
.request
.http_version
= (float) Z_DVAL_P(zv
);
901 /* {{{ proto HttpMessage HttpMessage::getParentMessage()
903 * Get parent Message.
905 PHP_METHOD(HttpMessage
, getParentMessage
)
907 getObject(http_message_object
, obj
);
911 if (obj
->message
->parent
) {
912 RETVAL_OBJVAL(obj
->parent
);
919 /* {{{ proto bool HttpMessage::send()
921 * Send the Message according to its type as Response or Request.
923 PHP_METHOD(HttpMessage
, send
)
925 getObject(http_message_object
, obj
);
929 RETURN_SUCCESS(http_message_send(obj
->message
));
933 /* {{{ proto string HttpMessage::toString([bool include_parent = true])
935 * Get the string representation of the Message.
937 PHP_METHOD(HttpMessage
, toString
)
941 zend_bool include_parent
= 1;
942 getObject(http_message_object
, obj
);
944 if (SUCCESS
!= zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "|b", &include_parent
)) {
948 if (include_parent
) {
949 http_message_serialize(obj
->message
, &string
, &length
);
951 http_message_tostring(obj
->message
, &string
, &length
);
953 RETURN_STRINGL(string
, length
, 0);
959 #ifdef HTTP_HAVE_CURL
960 /* {{{ HttpRequest */
962 /* {{{ proto void HttpRequest::__construct([string url[, long request_method = HTTP_GET]])
964 * Instantiate a new HttpRequest object which can be used to issue HEAD, GET
965 * and POST (including posting files) HTTP requests.
967 PHP_METHOD(HttpRequest
, __construct
)
972 getObject(http_request_object
, obj
);
975 if (SUCCESS
== zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "|sl", &URL
, &URL_len
, &meth
)) {
976 INIT_PARR(obj
, options
);
977 INIT_PARR(obj
, responseInfo
);
978 INIT_PARR(obj
, responseData
);
979 INIT_PARR(obj
, postData
);
980 INIT_PARR(obj
, postFiles
);
983 UPD_PROP(obj
, string
, url
, URL
);
986 UPD_PROP(obj
, long, method
, meth
);
993 /* {{{ proto void HttpRequest::__destruct()
995 * Destroys the HttpRequest object.
997 PHP_METHOD(HttpRequest
, __destruct
)
999 getObject(http_request_object
, obj
);
1003 FREE_PARR(obj
, options
);
1004 FREE_PARR(obj
, responseInfo
);
1005 FREE_PARR(obj
, responseData
);
1006 FREE_PARR(obj
, postData
);
1007 FREE_PARR(obj
, postFiles
);
1011 /* {{{ proto bool HttpRequest::setOptions(array options)
1013 * Set the request options to use. See http_get() for a full list of available options.
1015 PHP_METHOD(HttpRequest
, setOptions
)
1019 zval
*opts
, *old_opts
, **opt
;
1020 getObject(http_request_object
, obj
);
1022 if (SUCCESS
!= zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "a/", &opts
)) {
1026 old_opts
= GET_PROP(obj
, options
);
1028 /* headers and cookies need extra attention -- thus cannot use array_merge() directly */
1029 FOREACH_KEYVAL(opts
, key
, idx
, opt
) {
1031 if (!strcmp(key
, "headers")) {
1033 if (SUCCESS
== zend_hash_find(Z_ARRVAL_P(old_opts
), "headers", sizeof("headers"), (void **) &headers
)) {
1034 array_merge(*opt
, *headers
);
1037 } else if (!strcmp(key
, "cookies")) {
1039 if (SUCCESS
== zend_hash_find(Z_ARRVAL_P(old_opts
), "cookies", sizeof("cookies"), (void **) &cookies
)) {
1040 array_merge(*opt
, *cookies
);
1045 add_assoc_zval(old_opts
, key
, *opt
);
1056 /* {{{ proto array HttpRequest::getOptions()
1058 * Get current set options.
1060 PHP_METHOD(HttpRequest
, getOptions
)
1063 getObject(http_request_object
, obj
);
1067 opts
= GET_PROP(obj
, options
);
1068 array_init(return_value
);
1069 array_copy(opts
, return_value
);
1073 /* {{{ proto void HttpRequest::unsetOptions()
1075 * Unset all options/headers/cookies.
1077 PHP_METHOD(HttpRequest
, unsetOptions
)
1079 getObject(http_request_object
, obj
);
1083 FREE_PARR(obj
, options
);
1084 INIT_PARR(obj
, options
);
1088 /* {{{ proto bool HttpRequest::setSslOptions(array options)
1090 * Set additional SSL options.
1092 PHP_METHOD(HttpRequest
, setSslOptions
)
1094 zval
*opts
, *old_opts
, **ssl_options
;
1095 getObject(http_request_object
, obj
);
1097 if (SUCCESS
!= zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "a/", &opts
)) {
1101 old_opts
= GET_PROP(obj
, options
);
1103 if (SUCCESS
== zend_hash_find(Z_ARRVAL_P(old_opts
), "ssl", sizeof("ssl"), (void **) &ssl_options
)) {
1104 array_merge(opts
, *ssl_options
);
1106 zval_add_ref(&opts
);
1107 add_assoc_zval(old_opts
, "ssl", opts
);
1114 /* {{{ proto array HttpRequest::getSslOtpions()
1116 * Get previously set SSL options.
1118 PHP_METHOD(HttpRequest
, getSslOptions
)
1120 zval
*opts
, **ssl_options
;
1121 getObject(http_request_object
, obj
);
1125 opts
= GET_PROP(obj
, options
);
1127 array_init(return_value
);
1129 if (SUCCESS
== zend_hash_find(Z_ARRVAL_P(opts
), "ssl", sizeof("ssl"), (void **) &ssl_options
)) {
1130 array_copy(*ssl_options
, return_value
);
1135 /* {{{ proto void HttpRequest::unsetSslOptions()
1137 * Unset previously set SSL options.
1139 PHP_METHOD(HttpRequest
, unsetSslOptions
)
1142 getObject(http_request_object
, obj
);
1146 opts
= GET_PROP(obj
, options
);
1147 zend_hash_del(Z_ARRVAL_P(opts
), "ssl", sizeof("ssl"));
1151 /* {{{ proto bool HttpRequest::addHeaders(array headers)
1153 * Add request header name/value pairs.
1155 PHP_METHOD(HttpRequest
, addHeaders
)
1157 zval
*opts
, **headers
, *new_headers
;
1158 getObject(http_request_object
, obj
);
1160 if (SUCCESS
!= zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "a/", &new_headers
)) {
1164 opts
= GET_PROP(obj
, options
);
1166 if (SUCCESS
== zend_hash_find(Z_ARRVAL_P(opts
), "headers", sizeof("headers"), (void **) &headers
)) {
1167 array_merge(new_headers
, *headers
);
1169 zval_add_ref(&new_headers
);
1170 add_assoc_zval(opts
, "headers", new_headers
);
1177 /* {{{ proto array HttpRequest::getHeaders()
1179 * Get previously set request headers.
1181 PHP_METHOD(HttpRequest
, getHeaders
)
1183 zval
*opts
, **headers
;
1184 getObject(http_request_object
, obj
);
1188 opts
= GET_PROP(obj
, options
);
1190 array_init(return_value
);
1192 if (SUCCESS
== zend_hash_find(Z_ARRVAL_P(opts
), "headers", sizeof("headers"), (void **) &headers
)) {
1193 array_copy(*headers
, return_value
);
1198 /* {{{ proto void HttpRequest::unsetHeaders()
1200 * Unset previously set request headers.
1202 PHP_METHOD(HttpRequest
, unsetHeaders
)
1205 getObject(http_request_object
, obj
);
1209 opts
= GET_PROP(obj
, options
);
1210 zend_hash_del(Z_ARRVAL_P(opts
), "headers", sizeof("headers"));
1214 /* {{{ proto bool HttpRequest::addCookies(array cookies)
1218 PHP_METHOD(HttpRequest
, addCookies
)
1220 zval
*opts
, **cookies
, *new_cookies
;
1221 getObject(http_request_object
, obj
);
1223 if (SUCCESS
!= zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "a/", &new_cookies
)) {
1227 opts
= GET_PROP(obj
, options
);
1229 if (SUCCESS
== zend_hash_find(Z_ARRVAL_P(opts
), "cookies", sizeof("cookies"), (void **) &cookies
)) {
1230 array_merge(new_cookies
, *cookies
);
1232 zval_add_ref(&new_cookies
);
1233 add_assoc_zval(opts
, "cookies", new_cookies
);
1240 /* {{{ proto array HttpRequest::getCookies()
1242 * Get previously set cookies.
1244 PHP_METHOD(HttpRequest
, getCookies
)
1246 zval
*opts
, **cookies
;
1247 getObject(http_request_object
, obj
);
1251 opts
= GET_PROP(obj
, options
);
1253 array_init(return_value
);
1255 if (SUCCESS
== zend_hash_find(Z_ARRVAL_P(opts
), "cookies", sizeof("cookies"), (void **) &cookies
)) {
1256 array_copy(*cookies
, return_value
);
1261 /* {{{ proto void HttpRequest::unsetCookies()
1264 PHP_METHOD(HttpRequest
, unsetCookies
)
1267 getObject(http_request_object
, obj
);
1271 opts
= GET_PROP(obj
, options
);
1272 zend_hash_del(Z_ARRVAL_P(opts
), "cookies", sizeof("cookies"));
1276 /* {{{ proto bool HttpRequest::setURL(string url)
1278 * Set the request URL.
1280 PHP_METHOD(HttpRequest
, setURL
)
1284 getObject(http_request_object
, obj
);
1286 if (SUCCESS
!= zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "s", &URL
, &URL_len
)) {
1290 UPD_PROP(obj
, string
, url
, URL
);
1295 /* {{{ proto string HttpRequest::getUrl()
1297 * Get the previously set request URL.
1299 PHP_METHOD(HttpRequest
, getURL
)
1302 getObject(http_request_object
, obj
);
1306 URL
= GET_PROP(obj
, url
);
1307 RETURN_STRINGL(Z_STRVAL_P(URL
), Z_STRLEN_P(URL
), 1);
1311 /* {{{ proto bool HttpRequest::setMethod(long request_method)
1313 * Set the request methods; one of the <tt>HTTP_HEAD</tt>, <tt>HTTP_GET</tt> or
1314 * <tt>HTTP_POST</tt> constants.
1316 PHP_METHOD(HttpRequest
, setMethod
)
1319 getObject(http_request_object
, obj
);
1321 if (SUCCESS
!= zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "l", &meth
)) {
1325 UPD_PROP(obj
, long, method
, meth
);
1330 /* {{{ proto long HttpRequest::getMethod()
1332 * Get the previously set request method.
1334 PHP_METHOD(HttpRequest
, getMethod
)
1337 getObject(http_request_object
, obj
);
1341 meth
= GET_PROP(obj
, method
);
1342 RETURN_LONG(Z_LVAL_P(meth
));
1346 /* {{{ proto bool HttpRequest::setContentType(string content_type)
1348 * Set the content type the post request should have.
1349 * Use this only if you know what you're doing.
1351 PHP_METHOD(HttpRequest
, setContentType
)
1355 getObject(http_request_object
, obj
);
1357 if (SUCCESS
!= zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "s", &ctype
, &ct_len
)) {
1361 if (!strchr(ctype
, '/')) {
1362 http_error_ex(E_WARNING
, HTTP_E_PARAM
, "Content-Type '%s' doesn't seem to contain a primary and a secondary part", ctype
);
1366 UPD_PROP(obj
, string
, contentType
, ctype
);
1371 /* {{{ proto string HttpRequest::getContentType()
1373 * Get the previously content type.
1375 PHP_METHOD(HttpRequest
, getContentType
)
1378 getObject(http_request_object
, obj
);
1382 ctype
= GET_PROP(obj
, contentType
);
1383 RETURN_STRINGL(Z_STRVAL_P(ctype
), Z_STRLEN_P(ctype
), 1);
1387 /* {{{ proto bool HttpRequest::setQueryData(mixed query_data)
1389 * Set the URL query parameters to use.
1390 * Overwrites previously set query parameters.
1391 * Affects any request types.
1393 PHP_METHOD(HttpRequest
, setQueryData
)
1396 char *query_data
= NULL
;
1397 getObject(http_request_object
, obj
);
1399 if (SUCCESS
!= zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "z", &qdata
)) {
1403 if ((Z_TYPE_P(qdata
) == IS_ARRAY
) || (Z_TYPE_P(qdata
) == IS_OBJECT
)) {
1404 if (SUCCESS
!= http_urlencode_hash(HASH_OF(qdata
), &query_data
)) {
1407 UPD_PROP(obj
, string
, queryData
, query_data
);
1412 convert_to_string(qdata
);
1413 UPD_PROP(obj
, string
, queryData
, Z_STRVAL_P(qdata
));
1418 /* {{{ proto string HttpRequest::getQueryData()
1420 * Get the current query data in form of an urlencoded query string.
1422 PHP_METHOD(HttpRequest
, getQueryData
)
1425 getObject(http_request_object
, obj
);
1429 qdata
= GET_PROP(obj
, queryData
);
1430 RETURN_STRINGL(Z_STRVAL_P(qdata
), Z_STRLEN_P(qdata
), 1);
1434 /* {{{ proto bool HttpRequest::addQueryData(array query_params)
1436 * Add parameters to the query parameter list.
1437 * Affects any request type.
1439 PHP_METHOD(HttpRequest
, addQueryData
)
1441 zval
*qdata
, *old_qdata
;
1442 char *query_data
= NULL
;
1443 getObject(http_request_object
, obj
);
1445 if (SUCCESS
!= zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "a", &qdata
)) {
1449 old_qdata
= GET_PROP(obj
, queryData
);
1451 if (SUCCESS
!= http_urlencode_hash_ex(HASH_OF(qdata
), 1, Z_STRVAL_P(old_qdata
), Z_STRLEN_P(old_qdata
), &query_data
, NULL
)) {
1455 UPD_PROP(obj
, string
, queryData
, query_data
);
1462 /* {{{ proto void HttpRequest::unsetQueryData()
1464 * Clean the query parameters.
1465 * Affects any request type.
1467 PHP_METHOD(HttpRequest
, unsetQueryData
)
1469 getObject(http_request_object
, obj
);
1473 UPD_PROP(obj
, string
, queryData
, "");
1477 /* {{{ proto bool HttpRequest::addPostData(array post_data)
1479 * Adds POST data entries.
1480 * Affects only POST requests.
1482 PHP_METHOD(HttpRequest
, addPostData
)
1484 zval
*post
, *post_data
;
1485 getObject(http_request_object
, obj
);
1487 if (SUCCESS
!= zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "a", &post_data
)) {
1491 post
= GET_PROP(obj
, postData
);
1492 array_merge(post_data
, post
);
1498 /* {{{ proto bool HttpRequest::setPostData(array post_data)
1500 * Set the POST data entries.
1501 * Overwrites previously set POST data.
1502 * Affects only POST requests.
1504 PHP_METHOD(HttpRequest
, setPostData
)
1506 zval
*post
, *post_data
;
1507 getObject(http_request_object
, obj
);
1509 if (SUCCESS
!= zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "a", &post_data
)) {
1513 post
= GET_PROP(obj
, postData
);
1514 zend_hash_clean(Z_ARRVAL_P(post
));
1515 array_copy(post_data
, post
);
1521 /* {{{ proto array HttpRequest::getPostData()
1523 * Get previously set POST data.
1525 PHP_METHOD(HttpRequest
, getPostData
)
1528 getObject(http_request_object
, obj
);
1532 post_data
= GET_PROP(obj
, postData
);
1533 array_init(return_value
);
1534 array_copy(post_data
, return_value
);
1538 /* {{{ proto void HttpRequest::unsetPostData()
1540 * Clean POST data entires.
1541 * Affects only POST requests.
1543 PHP_METHOD(HttpRequest
, unsetPostData
)
1546 getObject(http_request_object
, obj
);
1550 post_data
= GET_PROP(obj
, postData
);
1551 zend_hash_clean(Z_ARRVAL_P(post_data
));
1555 /* {{{ proto bool HttpRequest::addPostFile(string name, string file[, string content_type = "application/x-octetstream"])
1557 * Add a file to the POST request.
1558 * Affects only POST requests.
1560 PHP_METHOD(HttpRequest
, addPostFile
)
1562 zval
*files
, *entry
;
1563 char *name
, *file
, *type
= NULL
;
1564 int name_len
, file_len
, type_len
= 0;
1565 getObject(http_request_object
, obj
);
1567 if (SUCCESS
!= zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "ss|s", &name
, &name_len
, &file
, &file_len
, &type
, &type_len
)) {
1572 if (!strchr(type
, '/')) {
1573 http_error_ex(E_WARNING
, HTTP_E_PARAM
, "Content-Type '%s' doesn't seem to contain a primary and a secondary part", type
);
1577 type
= "application/x-octetstream";
1578 type_len
= sizeof("application/x-octetstream") - 1;
1581 MAKE_STD_ZVAL(entry
);
1584 add_assoc_stringl(entry
, "name", name
, name_len
, 1);
1585 add_assoc_stringl(entry
, "type", type
, type_len
, 1);
1586 add_assoc_stringl(entry
, "file", file
, file_len
, 1);
1588 files
= GET_PROP(obj
, postFiles
);
1589 add_next_index_zval(files
, entry
);
1595 /* {{{ proto array HttpRequest::getPostFiles()
1597 * Get all previously added POST files.
1599 PHP_METHOD(HttpRequest
, getPostFiles
)
1602 getObject(http_request_object
, obj
);
1606 files
= GET_PROP(obj
, postFiles
);
1608 array_init(return_value
);
1609 array_copy(files
, return_value
);
1613 /* {{{ proto void HttpRequest::unsetPostFiles()
1615 * Unset the POST files list.
1616 * Affects only POST requests.
1618 PHP_METHOD(HttpRequest
, unsetPostFiles
)
1621 getObject(http_request_object
, obj
);
1625 files
= GET_PROP(obj
, postFiles
);
1626 zend_hash_clean(Z_ARRVAL_P(files
));
1630 /* {{{ proto array HttpRequest::getResponseData()
1632 * Get all response data after the request has been sent.
1634 PHP_METHOD(HttpRequest
, getResponseData
)
1637 getObject(http_request_object
, obj
);
1641 data
= GET_PROP(obj
, responseData
);
1642 array_init(return_value
);
1643 array_copy(data
, return_value
);
1647 /* {{{ proto mixed HttpRequest::getResponseHeader([string name])
1649 * Get response header(s) after the request has been sent.
1651 PHP_METHOD(HttpRequest
, getResponseHeader
)
1653 zval
*data
, **headers
, **header
;
1654 char *header_name
= NULL
;
1656 getObject(http_response_object
, obj
);
1658 if (SUCCESS
!= zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "|s", &header_name
, &header_len
)) {
1662 data
= GET_PROP(obj
, responseData
);
1663 if (SUCCESS
!= zend_hash_find(Z_ARRVAL_P(data
), "headers", sizeof("headers"), (void **) &headers
)) {
1667 if (!header_len
|| !header_name
) {
1668 array_init(return_value
);
1669 array_copy(*headers
, return_value
);
1670 } else if (SUCCESS
== zend_hash_find(Z_ARRVAL_PP(headers
), pretty_key(header_name
, header_len
, 1, 1), header_len
+ 1, (void **) &header
)) {
1671 RETURN_STRINGL(Z_STRVAL_PP(header
), Z_STRLEN_PP(header
), 1);
1678 /* {{{ proto array HttpRequest::getResponseCookie([string name])
1680 * Get response cookie(s) after the request has been sent.
1682 PHP_METHOD(HttpRequest
, getResponseCookie
)
1684 zval
*data
, **headers
;
1685 char *cookie_name
= NULL
;
1687 getObject(http_request_object
, obj
);
1689 if (SUCCESS
!= zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "|s", &cookie_name
, &cookie_len
)) {
1693 array_init(return_value
);
1695 data
= GET_PROP(obj
, responseData
);
1696 if (SUCCESS
== zend_hash_find(Z_ARRVAL_P(data
), "headers", sizeof("headers"), (void **) &headers
)) {
1699 zval
**header
= NULL
;
1701 FOREACH_HASH_KEYVAL(Z_ARRVAL_PP(headers
), key
, idx
, header
) {
1702 if (key
&& !strcasecmp(key
, "Set-Cookie")) {
1703 /* several cookies? */
1704 if (Z_TYPE_PP(header
) == IS_ARRAY
) {
1707 FOREACH_HASH_VAL(Z_ARRVAL_PP(header
), cookie
) {
1709 MAKE_STD_ZVAL(cookie_hash
);
1710 array_init(cookie_hash
);
1712 if (SUCCESS
== http_parse_cookie(Z_STRVAL_PP(cookie
), Z_ARRVAL_P(cookie_hash
))) {
1714 add_next_index_zval(return_value
, cookie_hash
);
1718 if ( (SUCCESS
== zend_hash_find(Z_ARRVAL_P(cookie_hash
), "name", sizeof("name"), (void **) &name
)) &&
1719 (!strcmp(Z_STRVAL_PP(name
), cookie_name
))) {
1720 add_next_index_zval(return_value
, cookie_hash
);
1721 return; /* <<< FOUND >>> */
1723 zval_dtor(cookie_hash
);
1728 zval_dtor(cookie_hash
);
1734 MAKE_STD_ZVAL(cookie_hash
);
1735 array_init(cookie_hash
);
1737 if (SUCCESS
== http_parse_cookie(Z_STRVAL_PP(header
), Z_ARRVAL_P(cookie_hash
))) {
1739 add_next_index_zval(return_value
, cookie_hash
);
1743 if ( (SUCCESS
== zend_hash_find(Z_ARRVAL_P(cookie_hash
), "name", sizeof("name"), (void **) &name
)) &&
1744 (!strcmp(Z_STRVAL_PP(name
), cookie_name
))) {
1745 add_next_index_zval(return_value
, cookie_hash
);
1747 zval_dtor(cookie_hash
);
1752 zval_dtor(cookie_hash
);
1765 /* {{{ proto string HttpRequest::getResponseBody()
1767 * Get the response body after the request has been sent.
1769 PHP_METHOD(HttpRequest
, getResponseBody
)
1772 getObject(http_request_object
, obj
);
1776 data
= GET_PROP(obj
, responseData
);
1777 if (SUCCESS
== zend_hash_find(Z_ARRVAL_P(data
), "body", sizeof("body"), (void **) &body
)) {
1778 RETURN_STRINGL(Z_STRVAL_PP(body
), Z_STRLEN_PP(body
), 1);
1785 /* {{{ proto int HttpRequest::getResponseCode()
1787 * Get the response code after the request has been sent.
1789 PHP_METHOD(HttpRequest
, getResponseCode
)
1792 getObject(http_request_object
, obj
);
1796 code
= GET_PROP(obj
, responseCode
);
1797 RETURN_LONG(Z_LVAL_P(code
));
1801 /* {{{ proto array HttpRequest::getResponseInfo([string name])
1803 * Get response info after the request has been sent.
1804 * See http_get() for a full list of returned info.
1806 PHP_METHOD(HttpRequest
, getResponseInfo
)
1808 zval
*info
, **infop
;
1809 char *info_name
= NULL
;
1811 getObject(http_request_object
, obj
);
1813 if (SUCCESS
!= zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "|s", &info_name
, &info_len
)) {
1817 info
= GET_PROP(obj
, responseInfo
);
1819 if (info_len
&& info_name
) {
1820 if (SUCCESS
== zend_hash_find(Z_ARRVAL_P(info
), pretty_key(info_name
, info_len
, 0, 0), info_len
+ 1, (void **) &infop
)) {
1821 RETURN_ZVAL(*infop
, 1, ZVAL_PTR_DTOR
);
1823 http_error_ex(E_NOTICE
, HTTP_E_PARAM
, "Could not find response info named %s", info_name
);
1827 array_init(return_value
);
1828 array_copy(info
, return_value
);
1833 /* {{{ proto HttpMessage HttpRequest::getResponseMessage()
1835 * Get the full response as HttpMessage object.
1837 PHP_METHOD(HttpRequest
, getResponseMessage
)
1840 getObject(http_request_object
, obj
);
1844 message
= GET_PROP(obj
, responseMessage
);
1845 Z_TYPE_P(return_value
) = IS_OBJECT
;
1846 return_value
->is_ref
= 1;
1847 return_value
->value
.obj
= message
->value
.obj
;
1848 zval_add_ref(&return_value
);
1851 /* {{{ proto bool HttpRequest::send()
1853 * Send the HTTP request.
1858 * $r = new HttpRequest('http://example.com/feed.rss', HTTP_GET);
1859 * $r->setOptions(array('lastmodified' => filemtime('local.rss')));
1860 * $r->addQueryData(array('category' => 3));
1863 * if ($r->getResponseCode() == 200) {
1864 * file_put_contents('local.rss', $r->getResponseBody());
1866 * } catch (HttpException $ex) {
1875 * $r = new HttpRequest('http://example.com/form.php', HTTP_POST);
1876 * $r->setOptions(array('cookies' => array('lang' => 'de')));
1877 * $r->addPostData(array('user' => 'mike', 'pass' => 's3c|r3t'));
1878 * $r->addPostFile('image', 'profile.jpg', 'image/jpeg');
1880 * echo $r->getResponseBody();
1885 PHP_METHOD(HttpRequest
, send
)
1887 STATUS status
= FAILURE
;
1888 zval
*meth
, *URL
, *qdata
, *opts
, *info
, *resp
;
1890 getObject(http_request_object
, obj
);
1894 SET_EH_THROW_HTTP();
1896 if ((!obj
->ch
) && (!(obj
->ch
= curl_easy_init()))) {
1897 http_error(E_WARNING
, HTTP_E_CURL
, "Could not initilaize curl");
1901 meth
= GET_PROP(obj
, method
);
1902 URL
= GET_PROP(obj
, url
);
1903 qdata
= GET_PROP(obj
, queryData
);
1904 opts
= GET_PROP(obj
, options
);
1905 info
= GET_PROP(obj
, responseInfo
);
1906 resp
= GET_PROP(obj
, responseData
);
1908 // HTTP_URI_MAXLEN+1 long char *
1909 request_uri
= http_absolute_uri_ex(Z_STRVAL_P(URL
), Z_STRLEN_P(URL
), NULL
, 0, NULL
, 0, 0);
1911 if (Z_STRLEN_P(qdata
) && (strlen(request_uri
) < HTTP_URI_MAXLEN
)) {
1912 if (!strchr(request_uri
, '?')) {
1913 strcat(request_uri
, "?");
1915 strcat(request_uri
, "&");
1917 strncat(request_uri
, Z_STRVAL_P(qdata
), HTTP_URI_MAXLEN
- strlen(request_uri
));
1920 switch (Z_LVAL_P(meth
))
1923 status
= http_get_ex(obj
->ch
, request_uri
, Z_ARRVAL_P(opts
), Z_ARRVAL_P(info
), &obj
->response
);
1927 status
= http_head_ex(obj
->ch
, request_uri
, Z_ARRVAL_P(opts
), Z_ARRVAL_P(info
), &obj
->response
);
1932 zval
*post_files
, *post_data
;
1934 post_files
= GET_PROP(obj
, postFiles
);
1935 post_data
= GET_PROP(obj
, postData
);
1937 if (!zend_hash_num_elements(Z_ARRVAL_P(post_files
))) {
1939 /* urlencoded post */
1940 status
= http_post_array_ex(obj
->ch
, request_uri
, Z_ARRVAL_P(post_data
), Z_ARRVAL_P(opts
), Z_ARRVAL_P(info
), &obj
->response
);
1950 struct curl_httppost
*http_post_data
[2] = {NULL
, NULL
};
1953 FOREACH_KEYVAL(post_data
, key
, idx
, data
) {
1955 convert_to_string_ex(data
);
1956 curl_formadd(&http_post_data
[0], &http_post_data
[1],
1957 CURLFORM_COPYNAME
, key
,
1958 CURLFORM_COPYCONTENTS
, Z_STRVAL_PP(data
),
1959 CURLFORM_CONTENTSLENGTH
, Z_STRLEN_PP(data
),
1969 FOREACH_VAL(post_files
, data
) {
1970 zval
**file
, **type
, **name
;
1972 if ( SUCCESS
== zend_hash_find(Z_ARRVAL_PP(data
), "name", sizeof("name"), (void **) &name
) &&
1973 SUCCESS
== zend_hash_find(Z_ARRVAL_PP(data
), "type", sizeof("type"), (void **) &type
) &&
1974 SUCCESS
== zend_hash_find(Z_ARRVAL_PP(data
), "file", sizeof("file"), (void **) &file
)) {
1976 curl_formadd(&http_post_data
[0], &http_post_data
[1],
1977 CURLFORM_COPYNAME
, Z_STRVAL_PP(name
),
1978 CURLFORM_FILE
, Z_STRVAL_PP(file
),
1979 CURLFORM_CONTENTTYPE
, Z_STRVAL_PP(type
),
1985 status
= http_post_curldata_ex(obj
->ch
, request_uri
, http_post_data
[0], Z_ARRVAL_P(opts
), Z_ARRVAL_P(info
), &obj
->response
);
1986 curl_formfree(http_post_data
[0]);
1997 /* final data handling */
1998 if (status
== SUCCESS
) {
2001 if (msg
= http_message_parse(PHPSTR_VAL(&obj
->response
), PHPSTR_LEN(&obj
->response
))) {
2002 zval
*headers
, *message
;
2006 UPD_PROP(obj
, long, responseCode
, msg
->info
.response
.code
);
2008 MAKE_STD_ZVAL(headers
)
2009 array_init(headers
);
2011 zend_hash_copy(Z_ARRVAL_P(headers
), &msg
->hdrs
, (copy_ctor_func_t
) zval_add_ref
, NULL
, sizeof(zval
*));
2012 phpstr_data(PHPSTR(msg
), &body
, &body_len
);
2014 add_assoc_zval(resp
, "headers", headers
);
2015 add_assoc_stringl(resp
, "body", body
, body_len
, 0);
2017 message
= GET_PROP(obj
, responseMessage
);
2019 Z_TYPE_P(message
) = IS_OBJECT
;
2020 message
->value
.obj
= http_message_object_from_msg(msg
);
2021 SET_PROP(obj
, responseMessage
, message
);
2028 RETURN_SUCCESS(status
);
2032 #endif /* HTTP_HAVE_CURL */
2034 #endif /* ZEND_ENGINE_2 */
2041 * vim600: noet sw=4 ts=4 fdm=marker
2042 * vim<600: noet sw=4 ts=4