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 +----------------------------------------------------------------------+
19 #define ZEND_INCLUDE_FULL_WINDOWS_HEADERS
28 #include "ext/standard/info.h"
29 #include "ext/session/php_session.h"
30 #include "ext/standard/php_string.h"
31 #include "ext/standard/php_smart_str.h"
36 #include "php_http_api.h"
39 # include "ext/standard/php_http.h"
45 # include <winsock2.h>
46 # include <sys/types.h>
49 # include <curl/curl.h>
52 # ifdef ZEND_BEGIN_ARG_INFO
53 ZEND_BEGIN_ARG_INFO(http_request_info_ref_3
, 0)
59 ZEND_BEGIN_ARG_INFO(http_request_info_ref_4
, 0)
66 static unsigned char http_request_info_ref_3
[] = {3, BYREF_NONE
, BYREF_NONE
, BYREF_FORCE
};
67 static unsigned char http_request_info_ref_4
[] = {4, BYREF_NONE
, BYREF_NONE
, BYREF_NONE
, BYREF_FORCE
};
71 #endif /* HTTP_HAVE_CURL */
73 ZEND_DECLARE_MODULE_GLOBALS(http
)
75 #ifdef COMPILE_DL_HTTP
79 /* {{{ http_functions[] */
80 function_entry http_functions
[] = {
81 PHP_FE(http_date
, NULL
)
82 PHP_FE(http_absolute_uri
, NULL
)
83 PHP_FE(http_negotiate_language
, NULL
)
84 PHP_FE(http_negotiate_charset
, NULL
)
85 PHP_FE(http_redirect
, NULL
)
86 PHP_FE(http_send_status
, NULL
)
87 PHP_FE(http_send_last_modified
, NULL
)
88 PHP_FE(http_match_modified
, NULL
)
89 PHP_FE(http_match_etag
, NULL
)
90 PHP_FE(http_cache_last_modified
, NULL
)
91 PHP_FE(http_cache_etag
, NULL
)
92 PHP_FE(http_content_type
, NULL
)
93 PHP_FE(http_content_disposition
, NULL
)
94 PHP_FE(http_send_data
, NULL
)
95 PHP_FE(http_send_file
, NULL
)
96 PHP_FE(http_send_stream
, NULL
)
97 PHP_FE(http_chunked_decode
, NULL
)
98 PHP_FE(http_split_response
, NULL
)
99 PHP_FE(http_parse_headers
, NULL
)
100 PHP_FE(http_get_request_headers
, NULL
)
101 #ifdef HTTP_HAVE_CURL
102 PHP_FE(http_get
, http_request_info_ref_3
)
103 PHP_FE(http_head
, http_request_info_ref_3
)
104 PHP_FE(http_post_data
, http_request_info_ref_4
)
105 PHP_FE(http_post_array
, http_request_info_ref_4
)
107 PHP_FE(http_auth_basic
, NULL
)
108 PHP_FE(http_auth_basic_cb
, NULL
)
109 #ifndef ZEND_ENGINE_2
110 PHP_FE(http_build_query
, NULL
)
112 PHP_FE(ob_httpetaghandler
, NULL
)
117 #define RETURN_SUCCESS(v) RETURN_BOOL(SUCCESS == (v))
118 #define HASH_ORNULL(z) ((z) ? Z_ARRVAL_P(z) : NULL)
122 # define HTTP_REGISTER_CLASS_EX(classname, name, parent, flags) \
124 zend_class_entry ce; \
125 INIT_CLASS_ENTRY(ce, #classname, name## _class_methods); \
126 ce.create_object = name## _new_object; \
127 name## _ce = zend_register_internal_class_ex(&ce, parent, NULL TSRMLS_CC); \
128 name## _ce->ce_flags |= flags; \
129 memcpy(& name## _object_handlers, zend_get_std_object_handlers(), sizeof(zend_object_handlers)); \
130 name## _object_handlers.clone_obj = NULL; \
131 name## _declare_default_properties(name## _ce); \
134 # define HTTP_REGISTER_CLASS(classname, name, parent, flags) \
136 zend_class_entry ce; \
137 INIT_CLASS_ENTRY(ce, #classname, name## _class_methods); \
138 ce.create_object = NULL; \
139 name## _ce = zend_register_internal_class_ex(&ce, parent, NULL TSRMLS_CC); \
140 name## _ce->ce_flags |= flags; \
143 # define getObject(t, o) t * o = ((t *) zend_object_store_get_object(getThis() TSRMLS_CC))
144 # define OBJ_PROP(o) o->zo.properties
145 # define DCL_PROP(a, t, n, v) zend_declare_property_ ##t(ce, (#n), sizeof(#n), (v), (ZEND_ACC_ ##a) TSRMLS_CC)
146 # define UPD_PROP(o, t, n, v) zend_update_property_ ##t(o->zo.ce, getThis(), (#n), sizeof(#n), (v) TSRMLS_CC)
147 # define SET_PROP(o, n, z) zend_update_property(o->zo.ce, getThis(), (#n), sizeof(#n), (z) TSRMLS_CC)
148 # define GET_PROP(o, n) zend_read_property(o->zo.ce, getThis(), (#n), sizeof(#n), 0 TSRMLS_CC)
152 zend_class_entry
*httpi_ce
;
154 #define HTTPi_ME(me, al, ai) ZEND_FENTRY(me, ZEND_FN(al), ai, ZEND_ACC_PUBLIC | ZEND_ACC_STATIC)
156 zend_function_entry httpi_class_methods
[] = {
157 HTTPi_ME(date
, http_date
, NULL
)
158 HTTPi_ME(absoluteURI
, http_absolute_uri
, NULL
)
159 HTTPi_ME(negotiateLanguage
, http_negotiate_language
, NULL
)
160 HTTPi_ME(negotiateCharset
, http_negotiate_charset
, NULL
)
161 HTTPi_ME(redirect
, http_redirect
, NULL
)
162 HTTPi_ME(sendStatus
, http_send_status
, NULL
)
163 HTTPi_ME(sendLastModified
, http_send_last_modified
, NULL
)
164 HTTPi_ME(matchModified
, http_match_modified
, NULL
)
165 HTTPi_ME(matchEtag
, http_match_etag
, NULL
)
166 HTTPi_ME(cacheLastModified
, http_cache_last_modified
, NULL
)
167 HTTPi_ME(cacheEtag
, http_cache_etag
, NULL
)
168 HTTPi_ME(chunkedDecode
, http_chunked_decode
, NULL
)
169 HTTPi_ME(splitResponse
, http_split_response
, NULL
)
170 HTTPi_ME(parseHeaders
, http_parse_headers
, NULL
)
171 HTTPi_ME(getRequestHeaders
, http_get_request_headers
, NULL
)
172 #ifdef HTTP_HAVE_CURL
173 HTTPi_ME(get
, http_get
, http_request_info_ref_3
)
174 HTTPi_ME(head
, http_head
, http_request_info_ref_3
)
175 HTTPi_ME(postData
, http_post_data
, http_request_info_ref_4
)
176 HTTPi_ME(postArray
, http_post_array
, http_request_info_ref_4
)
178 HTTPi_ME(authBasic
, http_auth_basic
, NULL
)
179 HTTPi_ME(authBasicCallback
, http_auth_basic_cb
, NULL
)
184 /* {{{ HTTPi_Response */
186 zend_class_entry
*httpi_response_ce
;
187 static zend_object_handlers httpi_response_object_handlers
;
191 } httpi_response_object
;
193 #define httpi_response_declare_default_properties(ce) _httpi_response_declare_default_properties(ce TSRMLS_CC)
194 static inline void _httpi_response_declare_default_properties(zend_class_entry
*ce TSRMLS_DC
)
196 DCL_PROP(PROTECTED
, string
, contentType
, "application/x-octetstream");
197 DCL_PROP(PROTECTED
, string
, eTag
, "");
198 DCL_PROP(PROTECTED
, string
, dispoFile
, "");
199 DCL_PROP(PROTECTED
, string
, cacheControl
, "public");
200 DCL_PROP(PROTECTED
, string
, data
, "");
201 DCL_PROP(PROTECTED
, string
, file
, "");
202 DCL_PROP(PROTECTED
, long, stream
, 0);
203 DCL_PROP(PROTECTED
, long, size
, 0);
204 DCL_PROP(PROTECTED
, long, lastModified
, 0);
205 DCL_PROP(PROTECTED
, long, dispoInline
, 0);
206 DCL_PROP(PROTECTED
, long, cache
, 0);
207 DCL_PROP(PROTECTED
, long, gzip
, 0);
209 DCL_PROP(PRIVATE
, long, raw_cache_header
, 0);
210 DCL_PROP(PRIVATE
, long, send_mode
, -1);
213 #define httpi_response_destroy_object _httpi_response_destroy_object
214 void _httpi_response_destroy_object(void *object
, zend_object_handle handle TSRMLS_DC
)
216 httpi_response_object
*o
= object
;
218 zend_hash_destroy(OBJ_PROP(o
));
219 FREE_HASHTABLE(OBJ_PROP(o
));
224 #define httpi_response_new_object _httpi_response_new_object
225 zend_object_value
_httpi_response_new_object(zend_class_entry
*ce TSRMLS_DC
)
227 zend_object_value ov
;
228 httpi_response_object
*o
;
230 o
= ecalloc(sizeof(httpi_response_object
), 1);
233 ALLOC_HASHTABLE(OBJ_PROP(o
));
234 zend_hash_init(OBJ_PROP(o
), 0, NULL
, ZVAL_PTR_DTOR
, 0);
235 zend_hash_copy(OBJ_PROP(o
), &ce
->default_properties
, (copy_ctor_func_t
) zval_add_ref
, NULL
, sizeof(zval
*));
237 ov
.handle
= zend_objects_store_put(o
, httpi_response_destroy_object
, NULL
, NULL TSRMLS_CC
);
238 ov
.handlers
= &httpi_response_object_handlers
;
243 zend_function_entry httpi_response_class_methods
[] = {
244 PHP_ME(HTTPi_Response
, __construct
, NULL
, ZEND_ACC_PUBLIC
|ZEND_ACC_CTOR
)
245 /* PHP_ME(HTTPi_Response, __destruct, NULL, ZEND_ACC_PUBLIC|ZEND_ACC_DTOR)
247 PHP_ME(HTTPi_Response
, setETag
, NULL
, ZEND_ACC_PUBLIC
)
248 PHP_ME(HTTPi_Response
, getETag
, NULL
, ZEND_ACC_PUBLIC
)
250 PHP_ME(HTTPi_Response
, setContentDisposition
, NULL
, ZEND_ACC_PUBLIC
)
251 PHP_ME(HTTPi_Response
, getContentDisposition
, NULL
, ZEND_ACC_PUBLIC
)
253 PHP_ME(HTTPi_Response
, setContentType
, NULL
, ZEND_ACC_PUBLIC
)
254 PHP_ME(HTTPi_Response
, getContentType
, NULL
, ZEND_ACC_PUBLIC
)
256 PHP_ME(HTTPi_Response
, setCache
, NULL
, ZEND_ACC_PUBLIC
)
257 PHP_ME(HTTPi_Response
, getCache
, NULL
, ZEND_ACC_PUBLIC
)
259 PHP_ME(HTTPi_Response
, setCacheControl
, NULL
, ZEND_ACC_PUBLIC
)
260 PHP_ME(HTTPi_Response
, getCacheControl
, NULL
, ZEND_ACC_PUBLIC
)
262 PHP_ME(HTTPi_Response
, setGzip
, NULL
, ZEND_ACC_PUBLIC
)
263 PHP_ME(HTTPi_Response
, getGzip
, NULL
, ZEND_ACC_PUBLIC
)
265 PHP_ME(HTTPi_Response
, setData
, NULL
, ZEND_ACC_PUBLIC
)
266 PHP_ME(HTTPi_Response
, getData
, NULL
, ZEND_ACC_PUBLIC
)
268 PHP_ME(HTTPi_Response
, setFile
, NULL
, ZEND_ACC_PUBLIC
)
269 PHP_ME(HTTPi_Response
, getFile
, NULL
, ZEND_ACC_PUBLIC
)
271 PHP_ME(HTTPi_Response
, setStream
, NULL
, ZEND_ACC_PUBLIC
)
272 PHP_ME(HTTPi_Response
, getStream
, NULL
, ZEND_ACC_PUBLIC
)
274 PHP_ME(HTTPi_Response
, send
, NULL
, ZEND_ACC_PUBLIC
)
276 PHP_ME(HTTPi_Response
, getSize
, NULL
, ZEND_ACC_PUBLIC
)
281 /* {{{ proto void HTTPi_Response::__construct(bool cache, bool gzip)
284 PHP_METHOD(HTTPi_Response
, __construct
)
286 zend_bool do_cache
= 0, do_gzip
= 0;
287 getObject(httpi_response_object
, obj
);
289 if (SUCCESS
!= zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "|bb", &do_cache
, &do_gzip
)) {
294 UPD_PROP(obj
, long, cache
, do_cache
);
295 UPD_PROP(obj
, long, gzip
, do_gzip
);
299 /* {{{ proto bool HTTPi_Response::setCache(bool cache)
302 PHP_METHOD(HTTPi_Response
, setCache
)
304 zend_bool do_cache
= 0;
305 getObject(httpi_response_object
, obj
);
307 if (SUCCESS
!= zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "b", &do_cache
)) {
311 UPD_PROP(obj
, long, cache
, do_cache
);
316 /* {{{ proto bool HTTPi_Response::getCache()
319 PHP_METHOD(HTTPi_Response
, getCache
)
321 zval
*do_cache
= NULL
;
322 getObject(httpi_response_object
, obj
);
324 if (ZEND_NUM_ARGS()) {
328 do_cache
= GET_PROP(obj
, cache
);
329 RETURN_BOOL(Z_LVAL_P(do_cache
));
333 /* {{{ proto bool HTTPi_Response::setGzip(bool gzip)
336 PHP_METHOD(HTTPi_Response
, setGzip
)
338 zend_bool do_gzip
= 0;
339 getObject(httpi_response_object
, obj
);
341 if (SUCCESS
!= zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "b", &do_gzip
)) {
345 UPD_PROP(obj
, long, gzip
, do_gzip
);
350 /* {{{ proto bool HTTPi_Response::getGzip()
353 PHP_METHOD(HTTPi_Response
, getGzip
)
355 zval
*do_gzip
= NULL
;
356 getObject(httpi_response_object
, obj
);
358 if (ZEND_NUM_ARGS()) {
362 do_gzip
= GET_PROP(obj
, gzip
);
363 RETURN_BOOL(Z_LVAL_P(do_gzip
));
367 /* {{{ proto bool HTTPi_Response::setCacheControl(string control[, bool raw = false])
370 PHP_METHOD(HTTPi_Response
, setCacheControl
)
375 getObject(httpi_response_object
, obj
);
377 if (SUCCESS
!= zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "s|b", &ccontrol
, &cc_len
, &raw
)) {
381 if ((!raw
) && (strcmp(ccontrol
, "public") && strcmp(ccontrol
, "private") && strcmp(ccontrol
, "no-cache"))) {
382 php_error_docref(NULL TSRMLS_CC
, E_WARNING
, "Cache-Control '%s' doesn't match public, private or no-cache", ccontrol
);
386 UPD_PROP(obj
, long, raw_cache_header
, raw
);
387 UPD_PROP(obj
, string
, cacheControl
, ccontrol
);
392 /* {{{ proto string HTTPi_Response::getCacheControl()
395 PHP_METHOD(HTTPi_Response
, getCacheControl
)
398 getObject(httpi_response_object
, obj
);
400 if (ZEND_NUM_ARGS()) {
404 ccontrol
= GET_PROP(obj
, cacheControl
);
405 RETURN_STRINGL(Z_STRVAL_P(ccontrol
), Z_STRLEN_P(ccontrol
), 1);
409 /* {{{ proto bool HTTPi::setContentType(string content_type)
412 PHP_METHOD(HTTPi_Response
, setContentType
)
416 getObject(httpi_response_object
, obj
);
418 if (SUCCESS
!= zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "s", &ctype
, &ctype_len
)) {
422 if (!strchr(ctype
, '/')) {
423 php_error_docref(NULL TSRMLS_CC
, E_WARNING
, "Content type '%s' doesn't seem to contain a primary and secondary part", ctype
);
427 UPD_PROP(obj
, string
, contentType
, ctype
);
429 efree(HTTP_G(ctype
));
431 HTTP_G(ctype
) = estrndup(ctype
, ctype_len
);
436 /* {{{ proto string HTTPi_Response::getContentType()
439 PHP_METHOD(HTTPi_Response
, getContentType
)
442 getObject(httpi_response_object
, obj
);
444 if (ZEND_NUM_ARGS()) {
448 ctype
= GET_PROP(obj
, contentType
);
449 RETURN_STRINGL(Z_STRVAL_P(ctype
), Z_STRLEN_P(ctype
), 1);
453 /* {{{ proto bool HTTPi_Response::setContentDisposition(string filename[, bool inline = false])
456 PHP_METHOD(HTTPi_Response
, setContentDisposition
)
460 zend_bool is_inline
= 0;
461 getObject(httpi_response_object
, obj
);
463 if (SUCCESS
!= zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "s|b", &file
, &file_len
, &is_inline
)) {
467 UPD_PROP(obj
, string
, dispoFile
, file
);
468 UPD_PROP(obj
, long, dispoInline
, is_inline
);
473 /* {{{ proto array HTTPi_Response::getContentDisposition()
476 PHP_METHOD(HTTPi_Response
, getContentDisposition
)
480 getObject(httpi_response_object
, obj
);
482 if (ZEND_NUM_ARGS()) {
486 file
= GET_PROP(obj
, dispoFile
);
487 is_inline
= GET_PROP(obj
, dispoInline
);
489 array_init(return_value
);
490 add_assoc_stringl(return_value
, "filename", Z_STRVAL_P(file
), Z_STRLEN_P(file
), 1);
491 add_assoc_bool(return_value
, "inline", Z_LVAL_P(is_inline
));
495 /* {{{ proto bool HTTPi_Response::setETag(string etag)
498 PHP_METHOD(HTTPi_Response
, setETag
)
502 getObject(httpi_response_object
, obj
);
504 if (SUCCESS
!= zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "s", &etag
, &etag_len
)) {
508 UPD_PROP(obj
, string
, eTag
, etag
);
513 /* {{{ proto string HTTPi_Response::getETag()
516 PHP_METHOD(HTTPi_Response
, getETag
)
519 getObject(httpi_response_object
, obj
);
521 if (ZEND_NUM_ARGS()) {
525 etag
= GET_PROP(obj
, eTag
);
526 RETURN_STRINGL(Z_STRVAL_P(etag
), Z_STRLEN_P(etag
), 1);
530 /* {{{ proto bool HTTPi_Response::setData(string data)
533 PHP_METHOD(HTTPi_Response
, setData
)
537 getObject(httpi_response_object
, obj
);
539 if (SUCCESS
!= zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "z", &the_data
)) {
543 convert_to_string_ex(&the_data
);
544 etag
= http_etag(Z_STRVAL_P(the_data
), Z_STRLEN_P(the_data
), SEND_DATA
);
545 SET_PROP(obj
, data
, the_data
);
546 UPD_PROP(obj
, string
, eTag
, etag
);
547 UPD_PROP(obj
, long, size
, Z_STRLEN_P(the_data
));
548 UPD_PROP(obj
, long, lastModified
, time(NULL
));
549 UPD_PROP(obj
, long, send_mode
, SEND_DATA
);
555 /* {{{ proto string HTTPi_Response::getData()
558 PHP_METHOD(HTTPi_Response
, getData
)
561 getObject(httpi_response_object
, obj
);
563 if (ZEND_NUM_ARGS()) {
567 the_data
= GET_PROP(obj
, data
);
568 RETURN_STRINGL(Z_STRVAL_P(the_data
), Z_STRLEN_P(the_data
), 1);
572 /* {{{ proto bool HTTPi_Response::setStream(resource stream)
575 PHP_METHOD(HTTPi_Response
, setStream
)
578 php_stream
*the_real_stream
;
580 getObject(httpi_response_object
, obj
);
582 if (SUCCESS
!= zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "r", &the_stream
)) {
586 php_stream_from_zval(the_real_stream
, &the_stream
);
587 etag
= http_etag(the_real_stream
, 0, SEND_RSRC
);
589 SET_PROP(obj
, stream
, the_stream
);
590 UPD_PROP(obj
, string
, eTag
, etag
);
591 UPD_PROP(obj
, long, size
, HTTP_G(ssb
).sb
.st_size
);
592 UPD_PROP(obj
, long, lastModified
, HTTP_G(ssb
).sb
.st_mtime
);
593 UPD_PROP(obj
, long, send_mode
, SEND_RSRC
);
599 /* {{{ proto resource HTTPi_Response::getStream()
602 PHP_METHOD(HTTPi_Response
, getStream
)
605 getObject(httpi_response_object
, obj
);
607 if (ZEND_NUM_ARGS()) {
611 the_stream
= GET_PROP(obj
, stream
);
612 RETURN_RESOURCE(Z_LVAL_P(the_stream
));
616 /* {{{ proto bool HTTPi_Response::setFile(string file)
619 PHP_METHOD(HTTPi_Response
, setFile
)
624 getObject(httpi_response_object
, obj
);
626 if (SUCCESS
!= zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "s", &the_file
, &file_len
)) {
630 php_stat(the_file
, file_len
, FS_SIZE
, &fsize TSRMLS_CC
);
631 php_stat(the_file
, file_len
, FS_MTIME
, &fmtime TSRMLS_CC
);
633 UPD_PROP(obj
, string
, file
, the_file
);
634 UPD_PROP(obj
, long, size
, Z_LVAL(fsize
));
635 UPD_PROP(obj
, long, lastModified
, Z_LVAL(fmtime
));
636 UPD_PROP(obj
, long, send_mode
, -1);
641 /* {{{ proto string HTTPi_Response::getFile()
644 PHP_METHOD(HTTPi_Response
, getFile
)
647 getObject(httpi_response_object
, obj
);
649 if (ZEND_NUM_ARGS()) {
653 the_file
= GET_PROP(obj
, file
);
654 RETURN_STRINGL(Z_STRVAL_P(the_file
), Z_STRLEN_P(the_file
), 1);
658 /* {{{ proto int HTTPi_Response::getSize()
661 PHP_METHOD(HTTPi_Response
, getSize
)
664 getObject(httpi_response_object
, obj
);
666 if (ZEND_NUM_ARGS()) {
670 the_size
= GET_PROP(obj
, size
);
671 RETURN_LONG(Z_LVAL_P(the_size
));
675 PHP_METHOD(HTTPi_Response
, send
)
678 getObject(httpi_response_object
, obj
);
680 do_cache
= GET_PROP(obj
, cache
);
683 if (Z_LVAL_P(do_cache
)) {
686 zval
*ccontrol
= GET_PROP(obj
, cacheControl
);
687 if (Z_STRLEN_P(ccontrol
)) {
689 zval
*cc_raw
= GET_PROP(obj
, raw_cache_header
);
690 if (Z_LVAL_P(cc_raw
)) {
691 cc_header
= ecalloc(sizeof("Cache-Control: ") + Z_STRLEN_P(ccontrol
), 1);
692 sprintf(cc_header
, "Cache-Control: %s", Z_STRVAL_P(ccontrol
));
694 cc_header
= ecalloc(sizeof("Cache-Control: , must-revalidate, max-age=0") + Z_STRLEN_P(ccontrol
), 1);
695 sprintf(cc_header
, "Cache-Control: %s, must-revalidate, max-age=0", Z_STRVAL_P(ccontrol
));
697 http_send_header(cc_header
);
700 http_send_header("Cache-Control: public, must-revalidate, max-age=0");
705 zval
*etag
= GET_PROP(obj
, eTag
);
706 if (Z_STRLEN_P(etag
)) {
707 if ((!http_is_range_request()) && http_etag_match("HTTP_IF_NONE_MATCH", Z_STRVAL_P(etag
))) {
708 http_send_status(304);
711 http_send_etag(Z_STRVAL_P(etag
), Z_STRLEN_P(etag
));
715 HTTP_G(etag
) = estrndup(Z_STRVAL_P(etag
), Z_STRLEN_P(etag
));
720 zval
*lmod
= GET_PROP(obj
, lastModified
);
721 if (Z_LVAL_P(lmod
)) {
722 if (http_modified_match("HTTP_IF_MODIFIED_SINCE", Z_LVAL_P(lmod
))) {
723 http_send_status(304);
726 http_send_last_modified(Z_LVAL_P(lmod
));
727 HTTP_G(lmod
) = Z_LVAL_P(lmod
);
729 time_t t
= time(NULL
);
730 http_send_last_modified(t
);
741 zval
*ctype
= GET_PROP(obj
, contentType
);
742 if (Z_STRLEN_P(ctype
)) {
743 char *ctype_header
= ecalloc(sizeof("Content-Type: ") + Z_STRLEN_P(ctype
), 1);
744 sprintf(ctype_header
, "Content-Type: %s", Z_STRVAL_P(ctype
));
745 http_send_header(ctype_header
);
748 efree(HTTP_G(ctype
));
750 HTTP_G(ctype
) = estrndup(Z_STRVAL_P(ctype
), Z_STRLEN_P(ctype
));
752 http_send_header("Content-Type: application/x-octetstream");
754 efree(HTTP_G(ctype
));
756 HTTP_G(ctype
) = estrdup("application/x-octetstream");
760 /* content disposition */
762 zval
*dispo_file
= GET_PROP(obj
, dispoFile
);
763 if (Z_STRLEN_P(dispo_file
)) {
765 zval
*dispo_inline
= GET_PROP(obj
, dispoInline
);
766 if (Z_LVAL_P(dispo_inline
)) {
767 dispo_header
= ecalloc(sizeof("Content-Disposition: inline; filename=\"\"") + Z_STRLEN_P(dispo_file
), 1);
768 sprintf(dispo_header
, "Content-Disposition: inline; filename=\"%s\"", Z_STRVAL_P(dispo_file
));
770 dispo_header
= ecalloc(sizeof("Content-Disposition: attachment; filename=\"\"") + Z_STRLEN_P(dispo_file
), 1);
771 sprintf(dispo_header
, "Content-Disposition: attachment; filename=\"%s\"", Z_STRVAL_P(dispo_file
));
773 http_send_header(dispo_header
);
780 zval
*send_mode
= GET_PROP(obj
, send_mode
);
781 switch (Z_LVAL_P(send_mode
))
785 RETURN_SUCCESS(http_send_data(GET_PROP(obj
, data
)));
790 php_stream
*the_real_stream
;
791 zval
*the_stream
= GET_PROP(obj
, stream
);
792 php_stream_from_zval(the_real_stream
, &the_stream
);
793 RETURN_SUCCESS(http_send_stream(the_real_stream
));
798 RETURN_SUCCESS(http_send_file(GET_PROP(obj
, file
)));
804 #endif /* ZEND_ENGINE_2 */
806 /* {{{ http_module_entry */
807 zend_module_entry http_module_entry
= {
808 #if ZEND_MODULE_API_NO >= 20010901
809 STANDARD_MODULE_HEADER
,
818 #if ZEND_MODULE_API_NO >= 20010901
819 PHP_EXT_HTTP_VERSION
,
821 STANDARD_MODULE_PROPERTIES
825 /* {{{ proto string http_date([int timestamp])
827 * This function returns a valid HTTP date regarding RFC 822/1123
828 * looking like: "Wed, 22 Dec 2004 11:34:47 GMT"
831 PHP_FUNCTION(http_date
)
835 if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "|l", &t
) != SUCCESS
) {
840 t
= (long) time(NULL
);
843 RETURN_STRING(http_date(t
), 0);
847 /* {{{ proto string http_absolute_uri(string url[, string proto])
849 * This function returns an absolute URI constructed from url.
850 * If the url is already abolute but a different proto was supplied,
851 * only the proto part of the URI will be updated. If url has no
852 * path specified, the path of the current REQUEST_URI will be taken.
853 * The host will be taken either from the Host HTTP header of the client
854 * the SERVER_NAME or just localhost if prior are not available.
858 * url = "page.php" => http://www.example.com/current/path/page.php
859 * url = "/page.php" => http://www.example.com/page.php
860 * url = "/page.php", proto = "https" => https://www.example.com/page.php
864 PHP_FUNCTION(http_absolute_uri
)
866 char *url
= NULL
, *proto
= NULL
;
867 int url_len
= 0, proto_len
= 0;
869 if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "s|s", &url
, &url_len
, &proto
, &proto_len
) != SUCCESS
) {
873 RETURN_STRING(http_absolute_uri(url
, proto
), 0);
877 /* {{{ proto string http_negotiate_language(array supported[, string default = 'en-US'])
879 * This function negotiates the clients preferred language based on its
880 * Accept-Language HTTP header. It returns the negotiated language or
881 * the default language if none match.
883 * The qualifier is recognized and languages without qualifier are rated highest.
885 * The supported parameter is expected to be an array having
886 * the supported languages as array values.
900 * include './langs/'. http_negotiate_language($langs) .'.php';
905 PHP_FUNCTION(http_negotiate_language
)
911 if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "a|s", &supported
, &def
, &def_len
) != SUCCESS
) {
919 RETURN_STRING(http_negotiate_language(supported
, def
), 0);
923 /* {{{ proto string http_negotiate_charset(array supported[, string default = 'iso-8859-1'])
925 * This function negotiates the clients preferred charset based on its
926 * Accept-Charset HTTP header. It returns the negotiated charset or
927 * the default charset if none match.
929 * The qualifier is recognized and charset without qualifier are rated highest.
931 * The supported parameter is expected to be an array having
932 * the supported charsets as array values.
938 * 'iso-8859-1', // default
943 * $pref = http_negotiate_charset($charsets);
944 * if (!strcmp($pref, 'iso-8859-1')) {
945 * iconv_set_encoding('internal_encoding', 'iso-8859-1');
946 * iconv_set_encoding('output_encoding', $pref);
947 * ob_start('ob_iconv_handler');
952 PHP_FUNCTION(http_negotiate_charset
)
958 if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "a|s", &supported
, &def
, &def_len
) != SUCCESS
) {
966 RETURN_STRING(http_negotiate_charset(supported
, def
), 0);
970 /* {{{ proto bool http_send_status(int status)
972 * Send HTTP status code.
975 PHP_FUNCTION(http_send_status
)
979 if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "l", &status
) != SUCCESS
) {
982 if (status
< 100 || status
> 510) {
983 php_error_docref(NULL TSRMLS_CC
, E_WARNING
, "Invalid HTTP status code (100-510): %d", status
);
987 RETURN_SUCCESS(http_send_status(status
));
991 /* {{{ proto bool http_send_last_modified([int timestamp])
993 * This converts the given timestamp to a valid HTTP date and
994 * sends it as "Last-Modified" HTTP header. If timestamp is
995 * omitted, current time is sent.
998 PHP_FUNCTION(http_send_last_modified
)
1002 if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "|l", &t
) != SUCCESS
) {
1007 t
= (long) time(NULL
);
1010 RETURN_SUCCESS(http_send_last_modified(t
));
1014 /* {{{ proto bool http_match_modified([int timestamp])
1016 * Matches the given timestamp against the clients "If-Modified-Since" resp.
1017 * "If-Unmodified-Since" HTTP headers.
1020 PHP_FUNCTION(http_match_modified
)
1024 if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "|l", &t
) != SUCCESS
) {
1028 // current time if not supplied (senseless though)
1030 t
= (long) time(NULL
);
1033 RETURN_BOOL(http_modified_match("HTTP_IF_MODIFIED_SINCE", t
) || http_modified_match("HTTP_IF_UNMODIFIED_SINCE", t
));
1037 /* {{{ proto bool http_match_etag(string etag)
1039 * This matches the given ETag against the clients
1040 * "If-Match" resp. "If-None-Match" HTTP headers.
1043 PHP_FUNCTION(http_match_etag
)
1048 if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "s", &etag
, &etag_len
) != SUCCESS
) {
1052 RETURN_BOOL(http_etag_match("HTTP_IF_NONE_MATCH", etag
) || http_etag_match("HTTP_IF_MATCH", etag
));
1056 /* {{{ proto bool http_cache_last_modified([int timestamp_or_expires]])
1058 * If timestamp_or_exires is greater than 0, it is handled as timestamp
1059 * and will be sent as date of last modification. If it is 0 or omitted,
1060 * the current time will be sent as Last-Modified date. If it's negative,
1061 * it is handled as expiration time in seconds, which means that if the
1062 * requested last modification date is not between the calculated timespan,
1063 * the Last-Modified header is updated and the actual body will be sent.
1066 PHP_FUNCTION(http_cache_last_modified
)
1068 long last_modified
= 0, send_modified
= 0, t
;
1071 if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "|l", &last_modified
) != SUCCESS
) {
1075 t
= (long) time(NULL
);
1078 if (!last_modified
) {
1079 /* does the client have? (att: caching "forever") */
1080 if (zlm
= http_get_server_var("HTTP_IF_MODIFIED_SINCE")) {
1081 last_modified
= send_modified
= http_parse_date(Z_STRVAL_P(zlm
));
1082 /* send current time */
1086 /* negative value is supposed to be expiration time */
1087 } else if (last_modified
< 0) {
1090 /* send supplied time explicitly */
1092 send_modified
= last_modified
;
1095 http_send_header("Cache-Control: private, must-revalidate, max-age=0");
1097 if (http_modified_match("HTTP_IF_MODIFIED_SINCE", last_modified
)) {
1098 if (SUCCESS
== http_send_status(304)) {
1101 php_error_docref(NULL TSRMLS_CC
, E_WARNING
, "Could not send 304 Not Modified");
1105 RETURN_SUCCESS(http_send_last_modified(send_modified
));
1109 /* {{{ proto bool http_cache_etag([string etag])
1111 * This function attempts to cache the HTTP body based on an ETag,
1112 * either supplied or generated through calculation of the MD5
1113 * checksum of the output (uses output buffering).
1115 * If clients "If-None-Match" header matches the supplied/calculated
1116 * ETag, the body is considered cached on the clients side and
1117 * a "304 Not Modified" status code is issued.
1120 PHP_FUNCTION(http_cache_etag
)
1125 if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "|s", &etag
, &etag_len
) != SUCCESS
) {
1129 http_send_header("Cache-Control: private, must-revalidate, max-age=0");
1132 http_send_etag(etag
, etag_len
);
1133 if (http_etag_match("HTTP_IF_NONE_MATCH", etag
)) {
1134 if (SUCCESS
== http_send_status(304)) {
1137 php_error_docref(NULL TSRMLS_CC
, E_WARNING
, "Could not send 304 Not Modified");
1143 /* if no etag is given and we didn't already start ob_etaghandler -- start it */
1144 if (!HTTP_G(etag_started
)) {
1145 RETURN_BOOL(HTTP_G(etag_started
) = (SUCCESS
== http_start_ob_handler(_http_ob_etaghandler
, "ob_etaghandler", 4096, 1)));
1151 /* {{{ proto string ob_httpetaghandler(string data, int mode)
1153 * For use with ob_start().
1154 * Note that this has to be started as first output buffer.
1155 * WARNING: Don't use with http_send_*().
1157 PHP_FUNCTION(ob_httpetaghandler
)
1163 if (SUCCESS
!= zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "sl", &data
, &data_len
, &mode
)) {
1167 if (mode
& PHP_OUTPUT_HANDLER_START
) {
1168 if (HTTP_G(etag_started
)) {
1169 php_error_docref(NULL TSRMLS_CC
, E_WARNING
, "ob_httpetaghandler can only be used once");
1170 RETURN_STRINGL(data
, data_len
, 1);
1172 http_send_header("Cache-Control: private, must-revalidate, max-age=0");
1173 HTTP_G(etag_started
) = 1;
1176 if (OG(ob_nesting_level
) > 1) {
1177 php_error_docref(NULL TSRMLS_CC
, E_WARNING
, "ob_httpetaghandler must be started prior to other output buffers");
1178 RETURN_STRINGL(data
, data_len
, 1);
1181 Z_TYPE_P(return_value
) = IS_STRING
;
1182 http_ob_etaghandler(data
, data_len
, &Z_STRVAL_P(return_value
), &Z_STRLEN_P(return_value
), mode
);
1186 /* {{{ proto void http_redirect([string url[, array params[, bool session,[ bool permanent]]]])
1188 * Redirect to a given url.
1189 * The supplied url will be expanded with http_absolute_uri(), the params array will
1190 * be treated with http_build_query() and the session identification will be appended
1191 * if session is true.
1193 * Depending on permanent the redirection will be issued with a permanent
1194 * ("301 Moved Permanently") or a temporary ("302 Found") redirection
1197 * To be RFC compliant, "Redirecting to <a>URI</a>." will be displayed,
1198 * if the client doesn't redirect immediatly.
1200 PHP_FUNCTION(http_redirect
)
1203 zend_bool session
= 0, permanent
= 0;
1204 zval
*params
= NULL
;
1205 smart_str qstr
= {0};
1206 char *url
, *URI
, LOC
[HTTP_URI_MAXLEN
+ 9], RED
[HTTP_URI_MAXLEN
* 2 + 34];
1208 if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "|sa!/bb", &url
, &url_len
, ¶ms
, &session
, &permanent
) != SUCCESS
) {
1212 /* append session info */
1213 if (session
&& (PS(session_status
) == php_session_active
)) {
1215 MAKE_STD_ZVAL(params
);
1218 if (add_assoc_string(params
, PS(session_name
), PS(id
), 1) != SUCCESS
) {
1219 php_error_docref(NULL TSRMLS_CC
, E_WARNING
, "Could not append session information");
1223 /* treat params array with http_build_query() */
1225 if (php_url_encode_hash_ex(Z_ARRVAL_P(params
), &qstr
, NULL
,0,NULL
,0,NULL
,0,NULL TSRMLS_CC
) != SUCCESS
) {
1229 php_error_docref(NULL TSRMLS_CC
, E_WARNING
, "Could not encode query parameters");
1235 URI
= http_absolute_uri(url
, NULL
);
1237 snprintf(LOC
, HTTP_URI_MAXLEN
+ strlen("Location: "), "Location: %s?%s", URI
, qstr
.c
);
1238 sprintf(RED
, "Redirecting to <a href=\"%s?%s\">%s?%s</a>.\n", URI
, qstr
.c
, URI
, qstr
.c
);
1241 snprintf(LOC
, HTTP_URI_MAXLEN
+ strlen("Location: "), "Location: %s", URI
);
1242 sprintf(RED
, "Redirecting to <a href=\"%s\">%s</a>.\n", URI
, URI
);
1246 if ((SUCCESS
== http_send_header(LOC
)) && (SUCCESS
== http_send_status((permanent
? 301 : 302)))) {
1247 php_body_write(RED
, strlen(RED
) TSRMLS_CC
);
1254 /* {{{ proto bool http_send_data(string data)
1256 * Sends raw data with support for (multiple) range requests.
1259 PHP_FUNCTION(http_send_data
)
1263 if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "z", &zdata
) != SUCCESS
) {
1267 convert_to_string_ex(&zdata
);
1268 http_send_header("Accept-Ranges: bytes");
1269 RETURN_SUCCESS(http_send_data(zdata
));
1273 /* {{{ proto bool http_send_file(string file)
1275 * Sends a file with support for (multiple) range requests.
1278 PHP_FUNCTION(http_send_file
)
1282 if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "z", &zfile
) != SUCCESS
) {
1286 convert_to_string_ex(&zfile
);
1287 http_send_header("Accept-Ranges: bytes");
1288 RETURN_SUCCESS(http_send_file(zfile
));
1292 /* {{{ proto bool http_send_stream(resource stream)
1294 * Sends an already opened stream with support for (multiple) range requests.
1297 PHP_FUNCTION(http_send_stream
)
1302 if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "r", &zstream
) != SUCCESS
) {
1306 php_stream_from_zval(file
, &zstream
);
1307 http_send_header("Accept-Ranges: bytes");
1308 RETURN_SUCCESS(http_send_stream(file
));
1312 /* {{{ proto bool http_content_type([string content_type = 'application/x-octetstream'])
1314 * Sets the content type.
1317 PHP_FUNCTION(http_content_type
)
1319 char *ct
, *content_type
;
1322 if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "|s", &ct
, &ct_len
) != SUCCESS
) {
1327 RETURN_SUCCESS(http_send_header("Content-Type: application/x-octetstream"));
1330 /* remember for multiple ranges */
1331 if (HTTP_G(ctype
)) {
1332 efree(HTTP_G(ctype
));
1334 HTTP_G(ctype
) = estrndup(ct
, ct_len
);
1336 content_type
= (char *) emalloc(strlen("Content-Type: ") + ct_len
+ 1);
1337 sprintf(content_type
, "Content-Type: %s", ct
);
1339 RETVAL_BOOL(SUCCESS
== http_send_header(content_type
));
1340 efree(content_type
);
1344 /* {{{ proto bool http_content_disposition(string filename[, bool inline = false])
1346 * Set the Content Disposition. The Content-Disposition header is very useful
1347 * if the data actually sent came from a file or something similar, that should
1348 * be "saved" by the client/user (i.e. by browsers "Save as..." popup window).
1351 PHP_FUNCTION(http_content_disposition
)
1353 char *filename
, *header
;
1355 zend_bool send_inline
= 0;
1357 if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "s|b", &filename
, &f_len
, &send_inline
) != SUCCESS
) {
1362 header
= (char *) emalloc(strlen("Content-Disposition: inline; filename=\"\"") + f_len
+ 1);
1363 sprintf(header
, "Content-Disposition: inline; filename=\"%s\"", filename
);
1365 header
= (char *) emalloc(strlen("Content-Disposition: attachment; filename=\"\"") + f_len
+ 1);
1366 sprintf(header
, "Content-Disposition: attachment; filename=\"%s\"", filename
);
1369 RETVAL_BOOL(SUCCESS
== http_send_header(header
));
1374 /* {{{ proto string http_chunked_decode(string encoded)
1376 * This function decodes a string that was HTTP-chunked encoded.
1377 * Returns false on failure.
1379 PHP_FUNCTION(http_chunked_decode
)
1381 char *encoded
= NULL
, *decoded
= NULL
;
1382 int encoded_len
= 0, decoded_len
= 0;
1384 if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "s", &encoded
, &encoded_len
) != SUCCESS
) {
1388 if (SUCCESS
== http_chunked_decode(encoded
, encoded_len
, &decoded
, &decoded_len
)) {
1389 RETURN_STRINGL(decoded
, decoded_len
, 0);
1396 /* {{{ proto array http_split_response(string http_response)
1398 * This function splits an HTTP response into an array with headers and the
1399 * content body. The returned array may look simliar to the following example:
1405 * 'Status' => '200 Ok',
1406 * 'Content-Type' => 'text/plain',
1407 * 'Content-Language' => 'en-US'
1409 * 1 => "Hello World!"
1414 PHP_FUNCTION(http_split_response
)
1416 zval
*zresponse
, *zbody
, *zheaders
;
1418 if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "z", &zresponse
) != SUCCESS
) {
1422 convert_to_string_ex(&zresponse
);
1424 MAKE_STD_ZVAL(zbody
);
1425 MAKE_STD_ZVAL(zheaders
);
1426 array_init(zheaders
);
1428 if (SUCCESS
!= http_split_response(zresponse
, zheaders
, zbody
)) {
1429 php_error_docref(NULL TSRMLS_CC
, E_WARNING
, "Could not parse HTTP response");
1433 array_init(return_value
);
1434 add_index_zval(return_value
, 0, zheaders
);
1435 add_index_zval(return_value
, 1, zbody
);
1439 /* {{{ proto array http_parse_headers(string header)
1442 PHP_FUNCTION(http_parse_headers
)
1444 char *header
, *rnrn
;
1447 if (SUCCESS
!= zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "s", &header
, &header_len
)) {
1451 array_init(return_value
);
1453 if (rnrn
= strstr(header
, HTTP_CRLF HTTP_CRLF
)) {
1454 header_len
= rnrn
- header
+ 2;
1456 if (SUCCESS
!= http_parse_headers(header
, header_len
, return_value
)) {
1457 php_error_docref(NULL TSRMLS_CC
, E_WARNING
, "Could not parse HTTP header");
1458 zval_dtor(return_value
);
1464 /* {{{ proto array http_get_request_headers(void)
1467 PHP_FUNCTION(http_get_request_headers
)
1469 if (ZEND_NUM_ARGS()) {
1473 array_init(return_value
);
1474 http_get_request_headers(return_value
);
1479 #ifdef HTTP_HAVE_CURL
1481 /* {{{ proto string http_get(string url[, array options[, array &info]])
1483 * Performs an HTTP GET request on the supplied url.
1485 * The second parameter is expected to be an associative
1486 * array where the following keys will be recognized:
1488 * - redirect: int, whether and how many redirects to follow
1489 * - unrestrictedauth: bool, whether to continue sending credentials on
1490 * redirects to a different host
1491 * - proxyhost: string, proxy host in "host[:port]" format
1492 * - proxyport: int, use another proxy port as specified in proxyhost
1493 * - proxyauth: string, proxy credentials in "user:pass" format
1494 * - proxyauthtype: int, HTTP_AUTH_BASIC and/or HTTP_AUTH_NTLM
1495 * - httpauth: string, http credentials in "user:pass" format
1496 * - httpauthtype: int, HTTP_AUTH_BASIC, DIGEST and/or NTLM
1497 * - compress: bool, whether to allow gzip/deflate content encoding
1498 * (defaults to true)
1499 * - port: int, use another port as specified in the url
1500 * - referer: string, the referer to sends
1501 * - useragent: string, the user agent to send
1502 * (defaults to PECL::HTTP/version (PHP/version)))
1503 * - headers: array, list of custom headers as associative array
1504 * like array("header" => "value")
1505 * - cookies: array, list of cookies as associative array
1506 * like array("cookie" => "value")
1507 * - cookiestore: string, path to a file where cookies are/will be stored
1510 * The optional third parameter will be filled with some additional information
1511 * in form af an associative array, if supplied, like the following example:
1515 * 'effective_url' => 'http://localhost',
1516 * 'response_code' => 403,
1517 * 'total_time' => 0.017,
1518 * 'namelookup_time' => 0.013,
1519 * 'connect_time' => 0.014,
1520 * 'pretransfer_time' => 0.014,
1521 * 'size_upload' => 0,
1522 * 'size_download' => 202,
1523 * 'speed_download' => 11882,
1524 * 'speed_upload' => 0,
1525 * 'header_size' => 145,
1526 * 'request_size' => 62,
1527 * 'ssl_verifyresult' => 0,
1529 * 'content_length_download' => 202,
1530 * 'content_length_upload' => 0,
1531 * 'starttransfer_time' => 0.017,
1532 * 'content_type' => 'text/html; charset=iso-8859-1',
1533 * 'redirect_time' => 0,
1534 * 'redirect_count' => 0,
1536 * 'http_connectcode' => 0,
1537 * 'httpauth_avail' => 0,
1538 * 'proxyauth_avail' => 0,
1543 PHP_FUNCTION(http_get
)
1545 char *URL
, *data
= NULL
;
1546 size_t data_len
= 0;
1548 zval
*options
= NULL
, *info
= NULL
;
1550 if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "s|a/!z", &URL
, &URL_len
, &options
, &info
) != SUCCESS
) {
1559 if (SUCCESS
== http_get(URL
, HASH_ORNULL(options
), HASH_ORNULL(info
), &data
, &data_len
)) {
1560 RETURN_STRINGL(data
, data_len
, 0);
1567 /* {{{ proto string http_head(string url[, array options[, array &info]])
1569 * Performs an HTTP HEAD request on the suppied url.
1570 * Returns the HTTP response as string.
1571 * See http_get() for a full list of available options.
1573 PHP_FUNCTION(http_head
)
1575 char *URL
, *data
= NULL
;
1576 size_t data_len
= 0;
1578 zval
*options
= NULL
, *info
= NULL
;
1580 if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "s|a/!z", &URL
, &URL_len
, &options
, &info
) != SUCCESS
) {
1589 if (SUCCESS
== http_head(URL
, HASH_ORNULL(options
), HASH_ORNULL(info
), &data
, &data_len
)) {
1590 RETURN_STRINGL(data
, data_len
, 0);
1597 /* {{{ proto string http_post_data(string url, string data[, array options[, &info]])
1599 * Performs an HTTP POST request, posting data.
1600 * Returns the HTTP response as string.
1601 * See http_get() for a full list of available options.
1603 PHP_FUNCTION(http_post_data
)
1605 char *URL
, *postdata
, *data
= NULL
;
1606 size_t data_len
= 0;
1607 int postdata_len
, URL_len
;
1608 zval
*options
= NULL
, *info
= NULL
;
1610 if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "ss|a/!z", &URL
, &URL_len
, &postdata
, &postdata_len
, &options
, &info
) != SUCCESS
) {
1619 if (SUCCESS
== http_post_data(URL
, postdata
, (size_t) postdata_len
, HASH_ORNULL(options
), HASH_ORNULL(info
), &data
, &data_len
)) {
1620 RETURN_STRINGL(data
, data_len
, 0);
1627 /* {{{ proto string http_post_array(string url, array data[, array options[, array &info]])
1629 * Performs an HTTP POST request, posting www-form-urlencoded array data.
1630 * Returns the HTTP response as string.
1631 * See http_get() for a full list of available options.
1633 PHP_FUNCTION(http_post_array
)
1635 char *URL
, *data
= NULL
;
1636 size_t data_len
= 0;
1638 zval
*options
= NULL
, *info
= NULL
, *postdata
;
1640 if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "sa|a/!z", &URL
, &URL_len
, &postdata
, &options
, &info
) != SUCCESS
) {
1649 if (SUCCESS
== http_post_array(URL
, Z_ARRVAL_P(postdata
), HASH_ORNULL(options
), HASH_ORNULL(info
), &data
, &data_len
)) {
1650 RETURN_STRINGL(data
, data_len
, 0);
1661 /* {{{ proto bool http_auth_basic(string user, string pass[, string realm = "Restricted"])
1666 * if (!http_auth_basic('mike', 's3c|r3t')) {
1667 * die('<h1>Authorization failed!</h1>');
1672 PHP_FUNCTION(http_auth_basic
)
1674 char *realm
= NULL
, *user
, *pass
, *suser
, *spass
;
1675 int r_len
, u_len
, p_len
;
1677 if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "ss|s", &user
, &u_len
, &pass
, &p_len
, &realm
, &r_len
) != SUCCESS
) {
1682 realm
= "Restricted";
1685 if (SUCCESS
!= http_auth_credentials(&suser
, &spass
)) {
1686 http_auth_header("Basic", realm
);
1690 if (strcasecmp(suser
, user
)) {
1691 http_auth_header("Basic", realm
);
1695 if (strcmp(spass
, pass
)) {
1696 http_auth_header("Basic", realm
);
1704 /* {{{ proto bool http_auth_basic_cb(mixed callback[, string realm = "Restricted"])
1709 * function auth_cb($user, $pass)
1712 * $query = 'SELECT pass FROM users WHERE user='. $db->quoteSmart($user);
1713 * if (strlen($realpass = $db->getOne($query)) {
1714 * return $pass === $realpass;
1719 * if (!http_auth_basic_cb('auth_cb')) {
1720 * die('<h1>Authorization failed</h1>');
1725 PHP_FUNCTION(http_auth_basic_cb
)
1728 char *realm
= NULL
, *user
, *pass
;
1731 if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "z|s", &cb
, &realm
, &r_len
) != SUCCESS
) {
1736 realm
= "Restricted";
1739 if (SUCCESS
!= http_auth_credentials(&user
, &pass
)) {
1740 http_auth_header("Basic", realm
);
1744 zval
*zparams
[2] = {NULL
, NULL
}, retval
;
1747 MAKE_STD_ZVAL(zparams
[0]);
1748 MAKE_STD_ZVAL(zparams
[1]);
1749 ZVAL_STRING(zparams
[0], user
, 0);
1750 ZVAL_STRING(zparams
[1], pass
, 0);
1752 if (SUCCESS
== call_user_function(EG(function_table
), NULL
, cb
,
1753 &retval
, 2, zparams TSRMLS_CC
)) {
1754 result
= Z_LVAL(retval
);
1763 http_auth_header("Basic", realm
);
1766 RETURN_BOOL(result
);
1772 /* {{{ php_http_init_globals(zend_http_globals *) */
1773 static void php_http_init_globals(zend_http_globals
*http_globals
)
1775 http_globals
->etag_started
= 0;
1776 http_globals
->ctype
= NULL
;
1777 http_globals
->etag
= NULL
;
1778 http_globals
->lmod
= 0;
1779 #ifdef HTTP_HAVE_CURL
1780 http_globals
->curlbuf
.body
.data
= NULL
;
1781 http_globals
->curlbuf
.body
.used
= 0;
1782 http_globals
->curlbuf
.body
.free
= 0;
1783 http_globals
->curlbuf
.hdrs
.data
= NULL
;
1784 http_globals
->curlbuf
.hdrs
.used
= 0;
1785 http_globals
->curlbuf
.hdrs
.free
= 0;
1787 http_globals
->allowed_methods
= NULL
;
1791 /* {{{ static inline STATUS http_check_allowed_methods(char *, int) */
1792 #define http_check_allowed_methods(m, l) _http_check_allowed_methods((m), (l) TSRMLS_CC)
1793 static inline void _http_check_allowed_methods(char *methods
, int length TSRMLS_DC
)
1795 if (length
&& SG(request_info
).request_method
&& (!strstr(methods
, SG(request_info
).request_method
))) {
1796 char *allow_header
= emalloc(length
+ sizeof("Allow: "));
1797 sprintf(allow_header
, "Allow: %s", methods
);
1798 http_send_header(allow_header
);
1799 efree(allow_header
);
1800 http_send_status(405);
1807 PHP_INI_MH(update_allowed_methods
)
1809 http_check_allowed_methods(new_value
, new_value_length
);
1810 return OnUpdateString(entry
, new_value
, new_value_length
, mh_arg1
, mh_arg2
, mh_arg3
, stage TSRMLS_CC
);
1814 STD_PHP_INI_ENTRY("http.allowed_methods", "OPTIONS,GET,HEAD,POST,PUT,DELETE,TRACE,CONNECT", PHP_INI_ALL
, update_allowed_methods
, allowed_methods
, zend_http_globals
, http_globals
)
1818 /* {{{ PHP_MINIT_FUNCTION */
1819 PHP_MINIT_FUNCTION(http
)
1821 ZEND_INIT_MODULE_GLOBALS(http
, php_http_init_globals
, NULL
);
1822 REGISTER_INI_ENTRIES();
1824 #ifdef HTTP_HAVE_CURL
1825 REGISTER_LONG_CONSTANT("HTTP_AUTH_BASIC", CURLAUTH_BASIC
, CONST_CS
| CONST_PERSISTENT
);
1826 REGISTER_LONG_CONSTANT("HTTP_AUTH_DIGEST", CURLAUTH_DIGEST
, CONST_CS
| CONST_PERSISTENT
);
1827 REGISTER_LONG_CONSTANT("HTTP_AUTH_NTLM", CURLAUTH_NTLM
, CONST_CS
| CONST_PERSISTENT
);
1830 #ifdef ZEND_ENGINE_2
1832 REGISTER_LONG_CONSTANT("HTTP_GET", HTTP_GET, CONST_CS | CONST_PERSISTENT);
1833 REGISTER_LONG_CONSTANT("HTTP_HEAD", HTTP_HEAD, CONST_CS | CONST_PERSISTENT);
1834 REGISTER_LONG_CONSTANT("HTTP_POST", HTTP_POST, CONST_CS | CONST_PERSISTENT);
1836 HTTP_REGISTER_CLASS(HTTPi
, httpi
, NULL
, ZEND_ACC_FINAL_CLASS
);
1837 HTTP_REGISTER_CLASS_EX(HTTPi_Response
, httpi_response
, NULL
, 0);
1843 /* {{{ PHP_MSHUTDOWN_FUNCTION */
1844 PHP_MSHUTDOWN_FUNCTION(http
)
1846 UNREGISTER_INI_ENTRIES();
1851 /* {{{ PHP_RINIT_FUNCTION */
1852 PHP_RINIT_FUNCTION(http
)
1854 char *allowed_methods
= INI_STR("http.allowed_methods");
1855 http_check_allowed_methods(allowed_methods
, strlen(allowed_methods
));
1860 /* {{{ PHP_RSHUTDOWN_FUNCTION */
1861 PHP_RSHUTDOWN_FUNCTION(http
)
1863 HTTP_G(etag_started
) = 0;
1867 efree(HTTP_G(etag
));
1868 HTTP_G(etag
) = NULL
;
1871 if (HTTP_G(ctype
)) {
1872 efree(HTTP_G(ctype
));
1873 HTTP_G(ctype
) = NULL
;
1875 #ifdef HTTP_HAVE_CURL
1876 if (HTTP_G(curlbuf
).body
.data
) {
1877 efree(HTTP_G(curlbuf
).body
.data
);
1878 HTTP_G(curlbuf
).body
.data
= NULL
;
1880 if (HTTP_G(curlbuf
).hdrs
.data
) {
1881 efree(HTTP_G(curlbuf
).hdrs
.data
);
1882 HTTP_G(curlbuf
).hdrs
.data
= NULL
;
1889 /* {{{ PHP_MINFO_FUNCTION */
1890 PHP_MINFO_FUNCTION(http
)
1892 php_info_print_table_start();
1893 php_info_print_table_header(2, "Extended HTTP support", "enabled");
1894 php_info_print_table_row(2, "Version:", PHP_EXT_HTTP_VERSION
);
1895 php_info_print_table_row(2, "cURL convenience functions:",
1896 #ifdef HTTP_HAVE_CURL
1902 php_info_print_table_end();
1904 DISPLAY_INI_ENTRIES();
1913 * vim600: noet sw=4 ts=4 fdm=marker
1914 * vim<600: noet sw=4 ts=4