2 +--------------------------------------------------------------------+
4 +--------------------------------------------------------------------+
5 | Redistribution and use in source and binary forms, with or without |
6 | modification, are permitted provided that the conditions mentioned |
7 | in the accompanying LICENSE file are met. |
8 +--------------------------------------------------------------------+
9 | Copyright (c) 2004-2007, Michael Wallner <mike@php.net> |
10 +--------------------------------------------------------------------+
15 #define HTTP_WANT_SAPI
16 #define HTTP_WANT_CURL
21 #include "php_http_api.h"
22 #include "php_http_persistent_handle_api.h"
23 #include "php_http_request_api.h"
24 #include "php_http_url_api.h"
27 # include "php_http_request_object.h"
30 #include "php_http_request_int.h"
32 /* {{{ cruft for thread safe SSL crypto locks */
33 #ifdef HTTP_NEED_OPENSSL_TSL
34 static MUTEX_T
*http_openssl_tsl
= NULL
;
36 static void http_openssl_thread_lock(int mode
, int n
, const char * file
, int line
)
38 if (mode
& CRYPTO_LOCK
) {
39 tsrm_mutex_lock(http_openssl_tsl
[n
]);
41 tsrm_mutex_unlock(http_openssl_tsl
[n
]);
45 static ulong
http_openssl_thread_id(void)
47 return (ulong
) tsrm_thread_id();
50 #ifdef HTTP_NEED_GNUTLS_TSL
51 static int http_gnutls_mutex_create(void **m
)
53 if (*((MUTEX_T
*) m
) = tsrm_mutex_alloc()) {
60 static int http_gnutls_mutex_destroy(void **m
)
62 tsrm_mutex_free(*((MUTEX_T
*) m
));
66 static int http_gnutls_mutex_lock(void **m
)
68 return tsrm_mutex_lock(*((MUTEX_T
*) m
));
71 static int http_gnutls_mutex_unlock(void **m
)
73 return tsrm_mutex_unlock(*((MUTEX_T
*) m
));
76 static struct gcry_thread_cbs http_gnutls_tsl
= {
77 GCRY_THREAD_OPTION_USER
,
79 http_gnutls_mutex_create
,
80 http_gnutls_mutex_destroy
,
81 http_gnutls_mutex_lock
,
82 http_gnutls_mutex_unlock
87 /* safe curl wrappers */
88 #define init_curl_storage(ch) \
90 http_request_storage *st = pecalloc(1, sizeof(http_request_storage), 1); \
91 curl_easy_setopt(ch, CURLOPT_PRIVATE, st); \
92 curl_easy_setopt(ch, CURLOPT_ERRORBUFFER, st->errorbuffer); \
95 static void *safe_curl_init(void)
99 if ((ch
= curl_easy_init())) {
100 init_curl_storage(ch
);
105 static void *safe_curl_copy(void *p
)
109 if ((ch
= curl_easy_duphandle(p
))) {
110 init_curl_storage(ch
);
115 static void safe_curl_dtor(void *p
) {
116 http_request_storage
*st
= http_request_storage_get(p
);
118 curl_easy_cleanup(p
);
124 if (st
->cookiestore
) {
125 pefree(st
->cookiestore
, 1);
133 PHP_MINIT_FUNCTION(http_request
)
135 #ifdef HTTP_NEED_OPENSSL_TSL
136 /* mod_ssl, libpq or ext/curl might already have set thread lock callbacks */
137 if (!CRYPTO_get_id_callback()) {
138 int i
, c
= CRYPTO_num_locks();
140 http_openssl_tsl
= malloc(c
* sizeof(MUTEX_T
));
142 for (i
= 0; i
< c
; ++i
) {
143 http_openssl_tsl
[i
] = tsrm_mutex_alloc();
146 CRYPTO_set_id_callback(http_openssl_thread_id
);
147 CRYPTO_set_locking_callback(http_openssl_thread_lock
);
150 #ifdef HTTP_NEED_GNUTLS_TSL
151 gcry_control(GCRYCTL_SET_THREAD_CBS
, &http_gnutls_tsl
);
154 if (CURLE_OK
!= curl_global_init(CURL_GLOBAL_ALL
)) {
158 if (SUCCESS
!= http_persistent_handle_provide("http_request", safe_curl_init
, safe_curl_dtor
, safe_curl_copy
)) {
162 HTTP_LONG_CONSTANT("HTTP_AUTH_BASIC", CURLAUTH_BASIC
);
163 HTTP_LONG_CONSTANT("HTTP_AUTH_DIGEST", CURLAUTH_DIGEST
);
164 HTTP_LONG_CONSTANT("HTTP_AUTH_NTLM", CURLAUTH_NTLM
);
165 HTTP_LONG_CONSTANT("HTTP_AUTH_GSSNEG", CURLAUTH_GSSNEGOTIATE
);
166 HTTP_LONG_CONSTANT("HTTP_AUTH_ANY", CURLAUTH_ANY
);
168 HTTP_LONG_CONSTANT("HTTP_VERSION_NONE", CURL_HTTP_VERSION_NONE
); /* to be removed */
169 HTTP_LONG_CONSTANT("HTTP_VERSION_1_0", CURL_HTTP_VERSION_1_0
);
170 HTTP_LONG_CONSTANT("HTTP_VERSION_1_1", CURL_HTTP_VERSION_1_1
);
171 HTTP_LONG_CONSTANT("HTTP_VERSION_ANY", CURL_HTTP_VERSION_NONE
);
173 HTTP_LONG_CONSTANT("HTTP_SSL_VERSION_TLSv1", CURL_SSLVERSION_TLSv1
);
174 HTTP_LONG_CONSTANT("HTTP_SSL_VERSION_SSLv2", CURL_SSLVERSION_SSLv2
);
175 HTTP_LONG_CONSTANT("HTTP_SSL_VERSION_SSLv3", CURL_SSLVERSION_SSLv3
);
176 HTTP_LONG_CONSTANT("HTTP_SSL_VERSION_ANY", CURL_SSLVERSION_DEFAULT
);
178 HTTP_LONG_CONSTANT("HTTP_IPRESOLVE_V4", CURL_IPRESOLVE_V4
);
179 HTTP_LONG_CONSTANT("HTTP_IPRESOLVE_V6", CURL_IPRESOLVE_V6
);
180 HTTP_LONG_CONSTANT("HTTP_IPRESOLVE_ANY", CURL_IPRESOLVE_WHATEVER
);
182 #if HTTP_CURL_VERSION(7,15,2)
183 HTTP_LONG_CONSTANT("HTTP_PROXY_SOCKS4", CURLPROXY_SOCKS4
);
185 HTTP_LONG_CONSTANT("HTTP_PROXY_SOCKS5", CURLPROXY_SOCKS5
);
186 HTTP_LONG_CONSTANT("HTTP_PROXY_HTTP", CURLPROXY_HTTP
);
192 PHP_MSHUTDOWN_FUNCTION(http_request
)
194 curl_global_cleanup();
195 #ifdef HTTP_NEED_OPENSSL_TSL
196 if (http_openssl_tsl
) {
197 int i
, c
= CRYPTO_num_locks();
199 CRYPTO_set_id_callback(NULL
);
200 CRYPTO_set_locking_callback(NULL
);
202 for (i
= 0; i
< c
; ++i
) {
203 tsrm_mutex_free(http_openssl_tsl
[i
]);
206 free(http_openssl_tsl
);
207 http_openssl_tsl
= NULL
;
214 /* {{{ forward declarations */
215 #define http_request_option(r, o, k, t) _http_request_option_ex((r), (o), (k), sizeof(k), (t) TSRMLS_CC)
216 #define http_request_option_ex(r, o, k, l, t) _http_request_option_ex((r), (o), (k), (l), (t) TSRMLS_CC)
217 static inline zval
*_http_request_option_ex(http_request
*request
, HashTable
*options
, char *key
, size_t keylen
, int type TSRMLS_DC
);
218 #define http_request_option_cache(r, k, z) _http_request_option_cache_ex((r), (k), sizeof(k), 0, (z) TSRMLS_CC)
219 #define http_request_option_cache_ex(r, k, kl, h, z) _http_request_option_cache_ex((r), (k), (kl), (h), (z) TSRMLS_CC)
220 static inline zval
*_http_request_option_cache_ex(http_request
*r
, char *key
, size_t keylen
, ulong h
, zval
*opt TSRMLS_DC
);
222 #define http_request_cookies_enabled(r) _http_request_cookies_enabled((r))
223 static inline int _http_request_cookies_enabled(http_request
*r
);
225 static size_t http_curl_read_callback(void *, size_t, size_t, void *);
226 static int http_curl_progress_callback(void *, double, double, double, double);
227 static int http_curl_raw_callback(CURL
*, curl_infotype
, char *, size_t, void *);
228 static int http_curl_dummy_callback(char *data
, size_t n
, size_t l
, void *s
) { return n
*l
; }
229 static curlioerr
http_curl_ioctl_callback(CURL
*, curliocmd
, void *);
232 /* {{{ CURL *http_curl_init(http_request *) */
233 PHP_HTTP_API CURL
* _http_curl_init_ex(CURL
*ch
, http_request
*request TSRMLS_DC
)
235 if (ch
|| (SUCCESS
== http_persistent_handle_acquire("http_request", &ch
))) {
237 curl_easy_setopt(ch
, CURLOPT_NOSIGNAL
, 1L);
239 curl_easy_setopt(ch
, CURLOPT_HEADER
, 0L);
240 curl_easy_setopt(ch
, CURLOPT_FILETIME
, 1L);
241 curl_easy_setopt(ch
, CURLOPT_AUTOREFERER
, 1L);
242 curl_easy_setopt(ch
, CURLOPT_VERBOSE
, 1L);
243 curl_easy_setopt(ch
, CURLOPT_HEADERFUNCTION
, NULL
);
244 curl_easy_setopt(ch
, CURLOPT_DEBUGFUNCTION
, http_curl_raw_callback
);
245 curl_easy_setopt(ch
, CURLOPT_READFUNCTION
, http_curl_read_callback
);
246 curl_easy_setopt(ch
, CURLOPT_IOCTLFUNCTION
, http_curl_ioctl_callback
);
247 curl_easy_setopt(ch
, CURLOPT_WRITEFUNCTION
, http_curl_dummy_callback
);
251 curl_easy_setopt(ch
, CURLOPT_DEBUGDATA
, request
);
253 /* attach curl handle */
255 /* set defaults (also in http_request_reset()) */
256 http_request_defaults(request
);
264 /* {{{ CURL *http_curl_copy(CURL *) */
265 PHP_HTTP_API CURL
*_http_curl_copy(CURL
*ch TSRMLS_DC
)
269 if (SUCCESS
== http_persistent_handle_accrete("http_request", ch
, ©
)) {
276 /* {{{ void http_curl_free(CURL **) */
277 PHP_HTTP_API
void _http_curl_free(CURL
**ch TSRMLS_DC
)
280 curl_easy_setopt(*ch
, CURLOPT_NOPROGRESS
, 1L);
281 curl_easy_setopt(*ch
, CURLOPT_PROGRESSFUNCTION
, NULL
);
282 curl_easy_setopt(*ch
, CURLOPT_VERBOSE
, 0L);
283 curl_easy_setopt(*ch
, CURLOPT_DEBUGFUNCTION
, NULL
);
285 http_persistent_handle_release("http_request", ch
);
290 /* {{{ http_request *http_request_init(http_request *) */
291 PHP_HTTP_API http_request
*_http_request_init_ex(http_request
*request
, CURL
*ch
, http_request_method meth
, const char *url ZEND_FILE_LINE_DC ZEND_FILE_LINE_ORIG_DC TSRMLS_DC
)
298 r
= emalloc_rel(sizeof(http_request
));
300 memset(r
, 0, sizeof(http_request
));
303 r
->url
= (url
) ? http_absolute_url(url
) : NULL
;
304 r
->meth
= (meth
> 0) ? meth
: HTTP_GET
;
306 phpstr_init(&r
->conv
.request
);
307 phpstr_init_ex(&r
->conv
.response
, HTTP_CURLBUF_SIZE
, 0);
308 phpstr_init(&r
->_cache
.cookies
);
309 zend_hash_init(&r
->_cache
.options
, 0, NULL
, ZVAL_PTR_DTOR
, 0);
311 TSRMLS_SET_CTX(r
->tsrm_ls
);
317 /* {{{ void http_request_dtor(http_request *) */
318 PHP_HTTP_API
void _http_request_dtor(http_request
*request
)
320 TSRMLS_FETCH_FROM_CTX(request
->tsrm_ls
);
322 http_request_reset(request
);
323 http_curl_free(&request
->ch
);
325 phpstr_dtor(&request
->_cache
.cookies
);
326 zend_hash_destroy(&request
->_cache
.options
);
327 if (request
->_cache
.headers
) {
328 curl_slist_free_all(request
->_cache
.headers
);
329 request
->_cache
.headers
= NULL
;
331 if (request
->_progress_callback
) {
332 zval_ptr_dtor(&request
->_progress_callback
);
333 request
->_progress_callback
= NULL
;
338 /* {{{ void http_request_free(http_request **) */
339 PHP_HTTP_API
void _http_request_free(http_request
**request
)
342 TSRMLS_FETCH_FROM_CTX((*request
)->tsrm_ls
);
343 http_request_body_free(&(*request
)->body
);
344 http_request_dtor(*request
);
351 /* {{{ void http_request_reset(http_request *) */
352 PHP_HTTP_API
void _http_request_reset(http_request
*request
)
354 TSRMLS_FETCH_FROM_CTX(request
->tsrm_ls
);
355 STR_SET(request
->url
, NULL
);
356 request
->conv
.last_type
= 0;
357 phpstr_dtor(&request
->conv
.request
);
358 phpstr_dtor(&request
->conv
.response
);
359 http_request_body_dtor(request
->body
);
360 http_request_defaults(request
);
363 http_request_storage
*st
= http_request_storage_get(request
->ch
);
370 if (st
->cookiestore
) {
371 pefree(st
->cookiestore
, 1);
372 st
->cookiestore
= NULL
;
374 st
->errorbuffer
[0] = '\0';
380 /* {{{ STATUS http_request_enable_cookies(http_request *) */
381 PHP_HTTP_API STATUS
_http_request_enable_cookies(http_request
*request
)
384 TSRMLS_FETCH_FROM_CTX(request
->tsrm_ls
);
386 HTTP_CHECK_CURL_INIT(request
->ch
, http_curl_init_ex(request
->ch
, request
), initialized
= 0);
387 if (initialized
&& (http_request_cookies_enabled(request
) || (CURLE_OK
== curl_easy_setopt(request
->ch
, CURLOPT_COOKIEFILE
, "")))) {
390 http_error(HE_WARNING
, HTTP_E_REQUEST
, "Could not enable cookies for this session");
395 /* {{{ STATUS http_request_reset_cookies(http_request *, int) */
396 PHP_HTTP_API STATUS
_http_request_reset_cookies(http_request
*request
, int session_only
)
399 TSRMLS_FETCH_FROM_CTX(request
->tsrm_ls
);
401 HTTP_CHECK_CURL_INIT(request
->ch
, http_curl_init_ex(request
->ch
, request
), initialized
= 0);
403 if (!http_request_cookies_enabled(request
)) {
404 if (SUCCESS
!= http_request_enable_cookies(request
)) {
409 #if HTTP_CURL_VERSION(7,15,4)
410 if (CURLE_OK
== curl_easy_setopt(request
->ch
, CURLOPT_COOKIELIST
, "SESS")) {
414 http_error(HE_WARNING
, HTTP_E_REQUEST
, "Could not reset session cookies (need libcurl >= v7.15.4)");
417 #if HTTP_CURL_VERSION(7,14,1)
418 if (CURLE_OK
== curl_easy_setopt(request
->ch
, CURLOPT_COOKIELIST
, "ALL")) {
422 http_error(HE_WARNING
, HTTP_E_REQUEST
, "Could not reset cookies (need libcurl >= v7.14.1)");
430 PHP_HTTP_API STATUS
_http_request_flush_cookies(http_request
*request
)
433 TSRMLS_FETCH_FROM_CTX(request
->tsrm_ls
);
435 HTTP_CHECK_CURL_INIT(request
->ch
, http_curl_init_ex(request
->ch
, request
), initialized
= 0);
437 if (!http_request_cookies_enabled(request
)) {
440 #if HTTP_CURL_VERSION(7,17,1)
441 if (CURLE_OK
== curl_easy_setopt(request
->ch
, CURLOPT_COOKIELIST
, "FLUSH")) {
445 http_error(HE_WARNING
, HTTP_E_REQUEST
, "Could not flush cookies (need libcurl >= v7.17.1)");
451 /* {{{ void http_request_defaults(http_request *) */
452 PHP_HTTP_API
void _http_request_defaults(http_request
*request
)
455 HTTP_CURL_OPT(CURLOPT_PROGRESSFUNCTION
, NULL
);
456 HTTP_CURL_OPT(CURLOPT_URL
, NULL
);
457 HTTP_CURL_OPT(CURLOPT_NOPROGRESS
, 1L);
458 HTTP_CURL_OPT(CURLOPT_PROXY
, NULL
);
459 HTTP_CURL_OPT(CURLOPT_PROXYPORT
, 0L);
460 HTTP_CURL_OPT(CURLOPT_PROXYTYPE
, 0L);
461 /* libcurl < 7.19.6 does not clear auth info with USERPWD set to NULL */
462 HTTP_CURL_OPT(CURLOPT_PROXYUSERNAME
, NULL
);
463 HTTP_CURL_OPT(CURLOPT_PROXYPASSWORD
, NULL
);
464 HTTP_CURL_OPT(CURLOPT_PROXYAUTH
, 0L);
465 HTTP_CURL_OPT(CURLOPT_DNS_CACHE_TIMEOUT
, 60L);
466 HTTP_CURL_OPT(CURLOPT_IPRESOLVE
, 0);
467 HTTP_CURL_OPT(CURLOPT_LOW_SPEED_LIMIT
, 0L);
468 HTTP_CURL_OPT(CURLOPT_LOW_SPEED_TIME
, 0L);
469 #if HTTP_CURL_VERSION(7,15,5)
471 HTTP_CURL_OPT(CURLOPT_MAX_SEND_SPEED_LARGE, (curl_off_t) 0);
472 HTTP_CURL_OPT(CURLOPT_MAX_RECV_SPEED_LARGE, (curl_off_t) 0);
476 HTTP_CURL_OPT(CURLOPT_MAXCONNECTS, 5L); */
477 HTTP_CURL_OPT(CURLOPT_FRESH_CONNECT
, 0L);
478 HTTP_CURL_OPT(CURLOPT_FORBID_REUSE
, 0L);
479 HTTP_CURL_OPT(CURLOPT_INTERFACE
, NULL
);
480 HTTP_CURL_OPT(CURLOPT_PORT
, 0L);
481 #if HTTP_CURL_VERSION(7,19,0)
482 HTTP_CURL_OPT(CURLOPT_ADDRESS_SCOPE
, 0L);
484 #if HTTP_CURL_VERSION(7,15,2)
485 HTTP_CURL_OPT(CURLOPT_LOCALPORT
, 0L);
486 HTTP_CURL_OPT(CURLOPT_LOCALPORTRANGE
, 0L);
488 /* libcurl < 7.19.6 does not clear auth info with USERPWD set to NULL */
489 HTTP_CURL_OPT(CURLOPT_USERNAME
, NULL
);
490 HTTP_CURL_OPT(CURLOPT_PASSWORD
, NULL
);
491 HTTP_CURL_OPT(CURLOPT_HTTPAUTH
, 0L);
492 HTTP_CURL_OPT(CURLOPT_ENCODING
, NULL
);
493 #if HTTP_CURL_VERSION(7,16,2)
494 /* we do this ourself anyway */
495 HTTP_CURL_OPT(CURLOPT_HTTP_CONTENT_DECODING
, 0L);
496 HTTP_CURL_OPT(CURLOPT_HTTP_TRANSFER_DECODING
, 0L);
498 HTTP_CURL_OPT(CURLOPT_FOLLOWLOCATION
, 0L);
499 HTTP_CURL_OPT(CURLOPT_UNRESTRICTED_AUTH
, 0L);
500 HTTP_CURL_OPT(CURLOPT_REFERER
, NULL
);
501 HTTP_CURL_OPT(CURLOPT_USERAGENT
, "PECL::HTTP/" PHP_HTTP_VERSION
" (PHP/" PHP_VERSION
")");
502 HTTP_CURL_OPT(CURLOPT_HTTPHEADER
, NULL
);
503 HTTP_CURL_OPT(CURLOPT_COOKIE
, NULL
);
504 HTTP_CURL_OPT(CURLOPT_COOKIESESSION
, 0L);
505 HTTP_CURL_OPT(CURLOPT_COOKIEFILE
, NULL
);
506 HTTP_CURL_OPT(CURLOPT_COOKIEJAR
, NULL
);
507 #if HTTP_CURL_VERSION(7,14,1)
508 HTTP_CURL_OPT(CURLOPT_COOKIELIST
, NULL
);
510 HTTP_CURL_OPT(CURLOPT_RANGE
, NULL
);
511 HTTP_CURL_OPT(CURLOPT_RESUME_FROM
, 0L);
512 HTTP_CURL_OPT(CURLOPT_MAXFILESIZE
, 0L);
513 HTTP_CURL_OPT(CURLOPT_TIMECONDITION
, 0L);
514 HTTP_CURL_OPT(CURLOPT_TIMEVALUE
, 0L);
515 HTTP_CURL_OPT(CURLOPT_TIMEOUT
, 0L);
516 HTTP_CURL_OPT(CURLOPT_CONNECTTIMEOUT
, 3);
517 HTTP_CURL_OPT(CURLOPT_SSLCERT
, NULL
);
518 HTTP_CURL_OPT(CURLOPT_SSLCERTTYPE
, NULL
);
519 HTTP_CURL_OPT(CURLOPT_SSLCERTPASSWD
, NULL
);
520 HTTP_CURL_OPT(CURLOPT_SSLKEY
, NULL
);
521 HTTP_CURL_OPT(CURLOPT_SSLKEYTYPE
, NULL
);
522 HTTP_CURL_OPT(CURLOPT_SSLKEYPASSWD
, NULL
);
523 HTTP_CURL_OPT(CURLOPT_SSLENGINE
, NULL
);
524 HTTP_CURL_OPT(CURLOPT_SSLVERSION
, 0L);
525 HTTP_CURL_OPT(CURLOPT_SSL_VERIFYPEER
, 0L);
526 HTTP_CURL_OPT(CURLOPT_SSL_VERIFYHOST
, 0L);
527 HTTP_CURL_OPT(CURLOPT_SSL_CIPHER_LIST
, NULL
);
528 #ifdef HTTP_CURL_CAINFO
529 HTTP_CURL_OPT(CURLOPT_CAINFO
, HTTP_CURL_CAINFO
);
531 HTTP_CURL_OPT(CURLOPT_CAINFO
, NULL
);
533 HTTP_CURL_OPT(CURLOPT_CAPATH
, NULL
);
534 HTTP_CURL_OPT(CURLOPT_RANDOM_FILE
, NULL
);
535 HTTP_CURL_OPT(CURLOPT_EGDSOCKET
, NULL
);
536 HTTP_CURL_OPT(CURLOPT_POSTFIELDS
, NULL
);
537 HTTP_CURL_OPT(CURLOPT_POSTFIELDSIZE
, 0L);
538 HTTP_CURL_OPT(CURLOPT_HTTPPOST
, NULL
);
539 HTTP_CURL_OPT(CURLOPT_IOCTLDATA
, NULL
);
540 HTTP_CURL_OPT(CURLOPT_READDATA
, NULL
);
541 HTTP_CURL_OPT(CURLOPT_INFILESIZE
, 0L);
542 HTTP_CURL_OPT(CURLOPT_HTTP_VERSION
, CURL_HTTP_VERSION_NONE
);
543 HTTP_CURL_OPT(CURLOPT_CUSTOMREQUEST
, NULL
);
544 HTTP_CURL_OPT(CURLOPT_NOBODY
, 0L);
545 HTTP_CURL_OPT(CURLOPT_POST
, 0L);
546 HTTP_CURL_OPT(CURLOPT_UPLOAD
, 0L);
547 HTTP_CURL_OPT(CURLOPT_HTTPGET
, 1L);
552 PHP_HTTP_API
void _http_request_set_progress_callback(http_request
*request
, zval
*cb
)
554 if (request
->_progress_callback
) {
555 zval_ptr_dtor(&request
->_progress_callback
);
557 if ((request
->_progress_callback
= cb
)) {
559 HTTP_CURL_OPT(CURLOPT_NOPROGRESS
, 0);
560 HTTP_CURL_OPT(CURLOPT_PROGRESSDATA
, request
);
561 HTTP_CURL_OPT(CURLOPT_PROGRESSFUNCTION
, http_curl_progress_callback
);
563 HTTP_CURL_OPT(CURLOPT_NOPROGRESS
, 1);
564 HTTP_CURL_OPT(CURLOPT_PROGRESSDATA
, NULL
);
565 HTTP_CURL_OPT(CURLOPT_PROGRESSFUNCTION
, NULL
);
569 /* {{{ STATUS http_request_prepare(http_request *, HashTable *) */
570 PHP_HTTP_API STATUS
_http_request_prepare(http_request
*request
, HashTable
*options
)
573 zend_bool range_req
= 0;
574 http_request_storage
*storage
;
576 TSRMLS_FETCH_FROM_CTX(request
->tsrm_ls
);
578 HTTP_CHECK_CURL_INIT(request
->ch
, http_curl_init(request
), return FAILURE
);
580 if (!(storage
= http_request_storage_get(request
->ch
))) {
583 storage
->errorbuffer
[0] = '\0';
586 pefree(storage
->url
, 1);
588 storage
->url
= pestrdup(request
->url
, 1);
589 HTTP_CURL_OPT(CURLOPT_URL
, storage
->url
);
591 /* progress callback */
592 if ((zoption
= http_request_option(request
, options
, "onprogress", -1))) {
593 http_request_set_progress_callback(request
, zoption
);
597 if ((zoption
= http_request_option(request
, options
, "proxyhost", IS_STRING
))) {
598 HTTP_CURL_OPT(CURLOPT_PROXY
, Z_STRVAL_P(zoption
));
600 if ((zoption
= http_request_option(request
, options
, "proxytype", IS_LONG
))) {
601 HTTP_CURL_OPT(CURLOPT_PROXYTYPE
, Z_LVAL_P(zoption
));
604 if ((zoption
= http_request_option(request
, options
, "proxyport", IS_LONG
))) {
605 HTTP_CURL_OPT(CURLOPT_PROXYPORT
, Z_LVAL_P(zoption
));
608 if ((zoption
= http_request_option(request
, options
, "proxyauth", IS_STRING
)) && Z_STRLEN_P(zoption
)) {
609 HTTP_CURL_OPT(CURLOPT_PROXYUSERPWD
, Z_STRVAL_P(zoption
));
612 if ((zoption
= http_request_option(request
, options
, "proxyauthtype", IS_LONG
))) {
613 HTTP_CURL_OPT(CURLOPT_PROXYAUTH
, Z_LVAL_P(zoption
));
618 if ((zoption
= http_request_option(request
, options
, "dns_cache_timeout", IS_LONG
))) {
619 HTTP_CURL_OPT(CURLOPT_DNS_CACHE_TIMEOUT
, Z_LVAL_P(zoption
));
621 if ((zoption
= http_request_option(request
, options
, "ipresolve", IS_LONG
)) && Z_LVAL_P(zoption
)) {
622 HTTP_CURL_OPT(CURLOPT_IPRESOLVE
, Z_LVAL_P(zoption
));
626 if ((zoption
= http_request_option(request
, options
, "low_speed_limit", IS_LONG
))) {
627 HTTP_CURL_OPT(CURLOPT_LOW_SPEED_LIMIT
, Z_LVAL_P(zoption
));
629 if ((zoption
= http_request_option(request
, options
, "low_speed_time", IS_LONG
))) {
630 HTTP_CURL_OPT(CURLOPT_LOW_SPEED_TIME
, Z_LVAL_P(zoption
));
632 #if HTTP_CURL_VERSION(7,15,5)
634 if ((zoption = http_request_option(request, options, "max_send_speed", IS_LONG))) {
635 HTTP_CURL_OPT(CURLOPT_MAX_SEND_SPEED_LARGE, (curl_off_t) Z_LVAL_P(zoption));
637 if ((zoption = http_request_option(request, options, "max_recv_speed", IS_LONG))) {
638 HTTP_CURL_OPT(CURLOPT_MAX_RECV_SPEED_LARGE, (curl_off_t) Z_LVAL_P(zoption));
643 if ((zoption = http_request_option(request, options, "maxconnects", IS_LONG))) {
644 HTTP_CURL_OPT(CURLOPT_MAXCONNECTS, Z_LVAL_P(zoption));
646 if ((zoption
= http_request_option(request
, options
, "fresh_connect", IS_BOOL
)) && Z_BVAL_P(zoption
)) {
647 HTTP_CURL_OPT(CURLOPT_FRESH_CONNECT
, 1L);
649 if ((zoption
= http_request_option(request
, options
, "forbid_reuse", IS_BOOL
)) && Z_BVAL_P(zoption
)) {
650 HTTP_CURL_OPT(CURLOPT_FORBID_REUSE
, 1L);
653 /* outgoing interface */
654 if ((zoption
= http_request_option(request
, options
, "interface", IS_STRING
))) {
655 HTTP_CURL_OPT(CURLOPT_INTERFACE
, Z_STRVAL_P(zoption
));
657 #if HTTP_CURL_VERSION(7,15,2)
658 if ((zoption
= http_request_option(request
, options
, "portrange", IS_ARRAY
))) {
661 zend_hash_internal_pointer_reset(Z_ARRVAL_P(zoption
));
662 if (SUCCESS
== zend_hash_get_current_data(Z_ARRVAL_P(zoption
), (void *) &prs
)) {
663 zend_hash_move_forward(Z_ARRVAL_P(zoption
));
664 if (SUCCESS
== zend_hash_get_current_data(Z_ARRVAL_P(zoption
), (void *) &pre
)) {
665 zval
*prs_cpy
= http_zsep(IS_LONG
, *prs
);
666 zval
*pre_cpy
= http_zsep(IS_LONG
, *pre
);
668 if (Z_LVAL_P(prs_cpy
) && Z_LVAL_P(pre_cpy
)) {
669 HTTP_CURL_OPT(CURLOPT_LOCALPORT
, MIN(Z_LVAL_P(prs_cpy
), Z_LVAL_P(pre_cpy
)));
670 HTTP_CURL_OPT(CURLOPT_LOCALPORTRANGE
, labs(Z_LVAL_P(prs_cpy
)-Z_LVAL_P(pre_cpy
))+1L);
672 zval_ptr_dtor(&prs_cpy
);
673 zval_ptr_dtor(&pre_cpy
);
681 if ((zoption
= http_request_option(request
, options
, "port", IS_LONG
))) {
682 HTTP_CURL_OPT(CURLOPT_PORT
, Z_LVAL_P(zoption
));
686 if ((zoption
= http_request_option(request
, options
, "httpauth", IS_STRING
)) && Z_STRLEN_P(zoption
)) {
687 HTTP_CURL_OPT(CURLOPT_USERPWD
, Z_STRVAL_P(zoption
));
689 if ((zoption
= http_request_option(request
, options
, "httpauthtype", IS_LONG
))) {
690 HTTP_CURL_OPT(CURLOPT_HTTPAUTH
, Z_LVAL_P(zoption
));
693 /* redirects, defaults to 0 */
694 if ((zoption
= http_request_option(request
, options
, "redirect", IS_LONG
))) {
695 HTTP_CURL_OPT(CURLOPT_FOLLOWLOCATION
, Z_LVAL_P(zoption
) ? 1L : 0L);
696 HTTP_CURL_OPT(CURLOPT_MAXREDIRS
, Z_LVAL_P(zoption
));
697 if ((zoption
= http_request_option(request
, options
, "unrestrictedauth", IS_BOOL
))) {
698 HTTP_CURL_OPT(CURLOPT_UNRESTRICTED_AUTH
, Z_LVAL_P(zoption
));
702 /* retries, defaults to 0 */
703 if ((zoption
= http_request_option(request
, options
, "retrycount", IS_LONG
))) {
704 request
->_retry
.count
= Z_LVAL_P(zoption
);
705 if ((zoption
= http_request_option(request
, options
, "retrydelay", IS_DOUBLE
))) {
706 request
->_retry
.delay
= Z_DVAL_P(zoption
);
708 request
->_retry
.delay
= 0;
711 request
->_retry
.count
= 0;
715 if ((zoption
= http_request_option(request
, options
, "referer", IS_STRING
)) && Z_STRLEN_P(zoption
)) {
716 HTTP_CURL_OPT(CURLOPT_REFERER
, Z_STRVAL_P(zoption
));
719 /* useragent, default "PECL::HTTP/version (PHP/version)" */
720 if ((zoption
= http_request_option(request
, options
, "useragent", IS_STRING
))) {
721 /* allow to send no user agent, not even default one */
722 if (Z_STRLEN_P(zoption
)) {
723 HTTP_CURL_OPT(CURLOPT_USERAGENT
, Z_STRVAL_P(zoption
));
725 HTTP_CURL_OPT(CURLOPT_USERAGENT
, NULL
);
730 if ((zoption
= http_request_option(request
, options
, "resume", IS_LONG
)) && (Z_LVAL_P(zoption
) > 0)) {
732 HTTP_CURL_OPT(CURLOPT_RESUME_FROM
, Z_LVAL_P(zoption
));
734 /* or range of kind array(array(0,499), array(100,1499)) */
735 else if ((zoption
= http_request_option(request
, options
, "range", IS_ARRAY
)) && zend_hash_num_elements(Z_ARRVAL_P(zoption
))) {
736 HashPosition pos1
, pos2
;
737 zval
**rr
, **rb
, **re
;
741 FOREACH_VAL(pos1
, zoption
, rr
) {
742 if (Z_TYPE_PP(rr
) == IS_ARRAY
) {
743 zend_hash_internal_pointer_reset_ex(Z_ARRVAL_PP(rr
), &pos2
);
744 if (SUCCESS
== zend_hash_get_current_data_ex(Z_ARRVAL_PP(rr
), (void *) &rb
, &pos2
)) {
745 zend_hash_move_forward_ex(Z_ARRVAL_PP(rr
), &pos2
);
746 if (SUCCESS
== zend_hash_get_current_data_ex(Z_ARRVAL_PP(rr
), (void *) &re
, &pos2
)) {
747 if ( ((Z_TYPE_PP(rb
) == IS_LONG
) || ((Z_TYPE_PP(rb
) == IS_STRING
) && is_numeric_string(Z_STRVAL_PP(rb
), Z_STRLEN_PP(rb
), NULL
, NULL
, 1))) &&
748 ((Z_TYPE_PP(re
) == IS_LONG
) || ((Z_TYPE_PP(re
) == IS_STRING
) && is_numeric_string(Z_STRVAL_PP(re
), Z_STRLEN_PP(re
), NULL
, NULL
, 1)))) {
749 zval
*rbl
= http_zsep(IS_LONG
, *rb
);
750 zval
*rel
= http_zsep(IS_LONG
, *re
);
752 if ((Z_LVAL_P(rbl
) >= 0) && (Z_LVAL_P(rel
) >= 0)) {
753 phpstr_appendf(&rs
, "%ld-%ld,", Z_LVAL_P(rbl
), Z_LVAL_P(rel
));
763 if (PHPSTR_LEN(&rs
)) {
766 /* ditch last comma */
767 PHPSTR_VAL(&rs
)[PHPSTR_LEN(&rs
)-- -1] = '\0';
769 MAKE_STD_ZVAL(cached_range
);
770 ZVAL_STRINGL(cached_range
, PHPSTR_VAL(&rs
), PHPSTR_LEN(&rs
), 0);
771 HTTP_CURL_OPT(CURLOPT_RANGE
, Z_STRVAL_P(http_request_option_cache(request
, "range", cached_range
)));
772 zval_ptr_dtor(&cached_range
);
776 /* additional headers, array('name' => 'value') */
777 if (request
->_cache
.headers
) {
778 curl_slist_free_all(request
->_cache
.headers
);
779 request
->_cache
.headers
= NULL
;
781 if ((zoption
= http_request_option(request
, options
, "headers", IS_ARRAY
))) {
782 HashKey header_key
= initHashKey(0);
786 FOREACH_KEYVAL(pos
, zoption
, header_key
, header_val
) {
787 if (header_key
.type
== HASH_KEY_IS_STRING
) {
789 zval
*header_cpy
= http_zsep(IS_STRING
, *header_val
);
791 if (!strcasecmp(header_key
.str
, "range")) {
794 snprintf(header
, sizeof(header
), "%s: %s", header_key
.str
, Z_STRVAL_P(header_cpy
));
795 request
->_cache
.headers
= curl_slist_append(request
->_cache
.headers
, header
);
796 zval_ptr_dtor(&header_cpy
);
801 if ((zoption
= http_request_option(request
, options
, "etag", IS_STRING
)) && Z_STRLEN_P(zoption
)) {
802 char match_header
[1024], *quoted_etag
= NULL
;
804 if ((Z_STRVAL_P(zoption
)[0] != '"') || (Z_STRVAL_P(zoption
)[Z_STRLEN_P(zoption
)-1] != '"')) {
805 spprintf("ed_etag
, 0, "\"%s\"", Z_STRVAL_P(zoption
));
807 snprintf(match_header
, sizeof(match_header
), "%s: %s", range_req
?"If-Match":"If-None-Match", quoted_etag
?quoted_etag
:Z_STRVAL_P(zoption
));
808 request
->_cache
.headers
= curl_slist_append(request
->_cache
.headers
, match_header
);
809 STR_FREE(quoted_etag
);
812 if ((zoption
= http_request_option(request
, options
, "compress", IS_BOOL
)) && Z_LVAL_P(zoption
)) {
813 request
->_cache
.headers
= curl_slist_append(request
->_cache
.headers
, "Accept-Encoding: gzip;q=1.0,deflate;q=0.5");
815 HTTP_CURL_OPT(CURLOPT_HTTPHEADER
, request
->_cache
.headers
);
818 if ((zoption
= http_request_option(request
, options
, "lastmodified", IS_LONG
))) {
819 if (Z_LVAL_P(zoption
)) {
820 if (Z_LVAL_P(zoption
) > 0) {
821 HTTP_CURL_OPT(CURLOPT_TIMEVALUE
, Z_LVAL_P(zoption
));
823 HTTP_CURL_OPT(CURLOPT_TIMEVALUE
, (long) HTTP_G
->request
.time
+ Z_LVAL_P(zoption
));
825 HTTP_CURL_OPT(CURLOPT_TIMECONDITION
, (long) (range_req
? CURL_TIMECOND_IFUNMODSINCE
: CURL_TIMECOND_IFMODSINCE
));
827 HTTP_CURL_OPT(CURLOPT_TIMECONDITION
, CURL_TIMECOND_NONE
);
831 /* cookies, array('name' => 'value') */
832 if ((zoption
= http_request_option(request
, options
, "cookies", IS_ARRAY
))) {
833 phpstr_dtor(&request
->_cache
.cookies
);
834 if (zend_hash_num_elements(Z_ARRVAL_P(zoption
))) {
835 zval
*urlenc_cookies
= NULL
;
836 /* check whether cookies should not be urlencoded; default is to urlencode them */
837 if ((!(urlenc_cookies
= http_request_option(request
, options
, "encodecookies", IS_BOOL
))) || Z_BVAL_P(urlenc_cookies
)) {
838 if (SUCCESS
== http_urlencode_hash_recursive(HASH_OF(zoption
), &request
->_cache
.cookies
, "; ", lenof("; "), NULL
, 0)) {
839 phpstr_fix(&request
->_cache
.cookies
);
840 HTTP_CURL_OPT(CURLOPT_COOKIE
, request
->_cache
.cookies
.data
);
844 HashKey cookie_key
= initHashKey(0);
847 FOREACH_KEYVAL(pos
, zoption
, cookie_key
, cookie_val
) {
848 if (cookie_key
.type
== HASH_KEY_IS_STRING
) {
849 zval
*val
= http_zsep(IS_STRING
, *cookie_val
);
850 phpstr_appendf(&request
->_cache
.cookies
, "%s=%s; ", cookie_key
.str
, Z_STRVAL_P(val
));
855 phpstr_fix(&request
->_cache
.cookies
);
856 if (PHPSTR_LEN(&request
->_cache
.cookies
)) {
857 HTTP_CURL_OPT(CURLOPT_COOKIE
, PHPSTR_VAL(&request
->_cache
.cookies
));
863 /* don't load session cookies from cookiestore */
864 if ((zoption
= http_request_option(request
, options
, "cookiesession", IS_BOOL
)) && Z_BVAL_P(zoption
)) {
865 HTTP_CURL_OPT(CURLOPT_COOKIESESSION
, 1L);
868 /* cookiestore, read initial cookies from that file and store cookies back into that file */
869 if ((zoption
= http_request_option(request
, options
, "cookiestore", IS_STRING
))) {
870 if (Z_STRLEN_P(zoption
)) {
871 HTTP_CHECK_OPEN_BASEDIR(Z_STRVAL_P(zoption
), return FAILURE
);
873 if (storage
->cookiestore
) {
874 pefree(storage
->cookiestore
, 1);
876 storage
->cookiestore
= pestrndup(Z_STRVAL_P(zoption
), Z_STRLEN_P(zoption
), 1);
877 HTTP_CURL_OPT(CURLOPT_COOKIEFILE
, storage
->cookiestore
);
878 HTTP_CURL_OPT(CURLOPT_COOKIEJAR
, storage
->cookiestore
);
882 if ((zoption
= http_request_option(request
, options
, "maxfilesize", IS_LONG
))) {
883 HTTP_CURL_OPT(CURLOPT_MAXFILESIZE
, Z_LVAL_P(zoption
));
887 if ((zoption
= http_request_option(request
, options
, "protocol", IS_LONG
))) {
888 HTTP_CURL_OPT(CURLOPT_HTTP_VERSION
, Z_LVAL_P(zoption
));
891 #if HTTP_CURL_VERSION(7,16,2)
892 /* timeout, defaults to 0 */
893 if ((zoption
= http_request_option(request
, options
, "timeout", IS_DOUBLE
))) {
894 HTTP_CURL_OPT(CURLOPT_TIMEOUT_MS
, (long)(Z_DVAL_P(zoption
)*1000));
896 /* connecttimeout, defaults to 0 */
897 if ((zoption
= http_request_option(request
, options
, "connecttimeout", IS_DOUBLE
))) {
898 HTTP_CURL_OPT(CURLOPT_CONNECTTIMEOUT_MS
, (long)(Z_DVAL_P(zoption
)*1000));
901 /* timeout, defaults to 0 */
902 if ((zoption
= http_request_option(request
, options
, "timeout", IS_LONG
))) {
903 HTTP_CURL_OPT(CURLOPT_TIMEOUT
, Z_LVAL_P(zoption
));
905 /* connecttimeout, defaults to 0 */
906 if ((zoption
= http_request_option(request
, options
, "connecttimeout", IS_LONG
))) {
907 HTTP_CURL_OPT(CURLOPT_CONNECTTIMEOUT
, Z_LVAL_P(zoption
));
912 if ((zoption
= http_request_option(request
, options
, "ssl", IS_ARRAY
))) {
913 HashKey key
= initHashKey(0);
917 FOREACH_KEYVAL(pos
, zoption
, key
, param
) {
918 if (key
.type
== HASH_KEY_IS_STRING
) {
919 HTTP_CURL_OPT_STRING(CURLOPT_SSLCERT
, 0, 1);
920 HTTP_CURL_OPT_STRING(CURLOPT_SSLCERTTYPE
, 0, 0);
921 HTTP_CURL_OPT_STRING(CURLOPT_SSLCERTPASSWD
, 0, 0);
923 HTTP_CURL_OPT_STRING(CURLOPT_SSLKEY
, 0, 0);
924 HTTP_CURL_OPT_STRING(CURLOPT_SSLKEYTYPE
, 0, 0);
925 HTTP_CURL_OPT_STRING(CURLOPT_SSLKEYPASSWD
, 0, 0);
927 HTTP_CURL_OPT_STRING(CURLOPT_SSLENGINE
, 0, 0);
928 HTTP_CURL_OPT_LONG(CURLOPT_SSLVERSION
, 0);
930 HTTP_CURL_OPT_LONG(CURLOPT_SSL_VERIFYPEER
, 1);
931 HTTP_CURL_OPT_LONG(CURLOPT_SSL_VERIFYHOST
, 1);
932 HTTP_CURL_OPT_STRING(CURLOPT_SSL_CIPHER_LIST
, 1, 0);
934 HTTP_CURL_OPT_STRING(CURLOPT_CAINFO
, -3, 1);
935 HTTP_CURL_OPT_STRING(CURLOPT_CAPATH
, -3, 1);
936 HTTP_CURL_OPT_STRING(CURLOPT_RANDOM_FILE
, -3, 1);
937 HTTP_CURL_OPT_STRING(CURLOPT_EGDSOCKET
, -3, 1);
943 switch (request
->meth
) {
945 HTTP_CURL_OPT(CURLOPT_HTTPGET
, 1L);
949 HTTP_CURL_OPT(CURLOPT_NOBODY
, 1L);
953 HTTP_CURL_OPT(CURLOPT_POST
, 1L);
957 HTTP_CURL_OPT(CURLOPT_UPLOAD
, 1L);
961 if (http_request_method_exists(0, request
->meth
, NULL
)) {
962 HTTP_CURL_OPT(CURLOPT_CUSTOMREQUEST
, http_request_method_name(request
->meth
));
964 http_error_ex(HE_WARNING
, HTTP_E_REQUEST_METHOD
, "Unsupported request method: %d (%s)", request
->meth
, request
->url
);
970 /* attach request body */
971 if (request
->body
&& (request
->meth
!= HTTP_GET
) && (request
->meth
!= HTTP_HEAD
) && (request
->meth
!= HTTP_OPTIONS
)) {
972 switch (request
->body
->type
) {
973 case HTTP_REQUEST_BODY_EMPTY
:
977 case HTTP_REQUEST_BODY_CURLPOST
:
978 HTTP_CURL_OPT(CURLOPT_HTTPPOST
, (struct curl_httppost
*) request
->body
->data
);
981 case HTTP_REQUEST_BODY_CSTRING
:
982 if (request
->meth
!= HTTP_PUT
) {
983 HTTP_CURL_OPT(CURLOPT_POSTFIELDS
, request
->body
->data
);
984 HTTP_CURL_OPT(CURLOPT_POSTFIELDSIZE
, request
->body
->size
);
987 /* fallthrough, PUT/UPLOAD _needs_ READDATA */
988 case HTTP_REQUEST_BODY_UPLOADFILE
:
989 HTTP_CURL_OPT(CURLOPT_IOCTLDATA
, request
);
990 HTTP_CURL_OPT(CURLOPT_READDATA
, request
);
991 HTTP_CURL_OPT(CURLOPT_INFILESIZE
, request
->body
->size
);
995 /* shouldn't ever happen */
996 http_error_ex(HE_ERROR
, 0, "Unknown request body type: %d (%s)", request
->body
->type
, request
->url
);
1005 /* {{{ void http_request_exec(http_request *) */
1006 PHP_HTTP_API
void _http_request_exec(http_request
*request
)
1010 TSRMLS_FETCH_FROM_CTX(request
->tsrm_ls
);
1013 if (CURLE_OK
!= (result
= curl_easy_perform(request
->ch
))) {
1014 http_error_ex(HE_WARNING
, HTTP_E_REQUEST
, "%s; %s (%s)", curl_easy_strerror(result
), http_request_storage_get(request
->ch
)->errorbuffer
, request
->url
);
1016 if (request
->_retry
.count
> tries
++) {
1018 case CURLE_COULDNT_RESOLVE_PROXY
:
1019 case CURLE_COULDNT_RESOLVE_HOST
:
1020 case CURLE_COULDNT_CONNECT
:
1021 case CURLE_WRITE_ERROR
:
1022 case CURLE_READ_ERROR
:
1023 case CURLE_OPERATION_TIMEDOUT
:
1024 case CURLE_SSL_CONNECT_ERROR
:
1025 case CURLE_GOT_NOTHING
:
1026 case CURLE_SSL_ENGINE_SETFAILED
:
1027 case CURLE_SEND_ERROR
:
1028 case CURLE_RECV_ERROR
:
1029 case CURLE_SSL_ENGINE_INITFAILED
:
1030 case CURLE_LOGIN_DENIED
:
1031 if (request
->_retry
.delay
>= HTTP_DIFFSEC
) {
1032 http_sleep(request
->_retry
.delay
);
1043 /* {{{ static size_t http_curl_read_callback(void *, size_t, size_t, void *) */
1044 static size_t http_curl_read_callback(void *data
, size_t len
, size_t n
, void *ctx
)
1046 http_request
*request
= (http_request
*) ctx
;
1047 TSRMLS_FETCH_FROM_CTX(request
->tsrm_ls
);
1049 if (request
->body
) {
1050 switch (request
->body
->type
) {
1051 case HTTP_REQUEST_BODY_CSTRING
:
1053 size_t out
= MIN(len
* n
, request
->body
->size
- request
->body
->priv
);
1056 memcpy(data
, ((char *) request
->body
->data
) + request
->body
->priv
, out
);
1057 request
->body
->priv
+= out
;
1063 case HTTP_REQUEST_BODY_UPLOADFILE
:
1064 return php_stream_read((php_stream
*) request
->body
->data
, data
, len
* n
);
1071 /* {{{ static int http_curl_progress_callback(void *, double, double, double, double) */
1072 static int http_curl_progress_callback(void *ctx
, double dltotal
, double dlnow
, double ultotal
, double ulnow
)
1074 zval
*param
, retval
;
1075 http_request
*request
= (http_request
*) ctx
;
1076 TSRMLS_FETCH_FROM_CTX(request
->tsrm_ls
);
1078 INIT_PZVAL(&retval
);
1081 MAKE_STD_ZVAL(param
);
1083 add_assoc_double(param
, "dltotal", dltotal
);
1084 add_assoc_double(param
, "dlnow", dlnow
);
1085 add_assoc_double(param
, "ultotal", ultotal
);
1086 add_assoc_double(param
, "ulnow", ulnow
);
1088 with_error_handling(EH_NORMAL
, NULL
) {
1089 request
->_in_progress_cb
= 1;
1090 call_user_function(EG(function_table
), NULL
, request
->_progress_callback
, &retval
, 1, ¶m TSRMLS_CC
);
1091 request
->_in_progress_cb
= 0;
1092 } end_error_handling();
1094 zval_ptr_dtor(¶m
);
1101 /* {{{ static curlioerr http_curl_ioctl_callback(CURL *, curliocmd, void *) */
1102 static curlioerr
http_curl_ioctl_callback(CURL
*ch
, curliocmd cmd
, void *ctx
)
1104 http_request
*request
= (http_request
*) ctx
;
1105 TSRMLS_FETCH_FROM_CTX(request
->tsrm_ls
);
1107 if (cmd
!= CURLIOCMD_RESTARTREAD
) {
1108 return CURLIOE_UNKNOWNCMD
;
1111 if (request
->body
) {
1112 switch (request
->body
->type
) {
1113 case HTTP_REQUEST_BODY_CSTRING
:
1114 request
->body
->priv
= 0;
1118 case HTTP_REQUEST_BODY_UPLOADFILE
:
1119 if (SUCCESS
== php_stream_rewind((php_stream
*) request
->body
->data
)) {
1126 return CURLIOE_FAILRESTART
;
1130 /* {{{ static int http_curl_raw_callback(CURL *, curl_infotype, char *, size_t, void *) */
1131 static int http_curl_raw_callback(CURL
*ch
, curl_infotype type
, char *data
, size_t length
, void *ctx
)
1133 http_request
*request
= (http_request
*) ctx
;
1135 #define EMPTY_HEADER(d, l) (!l || (l == 1 && d[0] == '\n') || (l == 2 && d[0] == '\r' && d[1] == '\n'))
1137 case CURLINFO_DATA_IN
:
1138 if (request
->conv
.last_type
== CURLINFO_HEADER_IN
) {
1139 phpstr_appends(&request
->conv
.response
, HTTP_CRLF
);
1141 phpstr_append(&request
->conv
.response
, data
, length
);
1143 case CURLINFO_HEADER_IN
:
1144 if (!EMPTY_HEADER(data
, length
)) {
1145 phpstr_append(&request
->conv
.response
, data
, length
);
1148 case CURLINFO_DATA_OUT
:
1149 case CURLINFO_HEADER_OUT
:
1150 phpstr_append(&request
->conv
.request
, data
, length
);
1158 const char _sym
[] = "><><><";
1160 for (fprintf(stderr
, "%c ", _sym
[type
-1]); length
--; data
++) {
1161 fprintf(stderr
, HTTP_IS_CTYPE(print
, *data
)?"%c":"\\x%02X", (int) *data
);
1162 if (*data
== '\n' && length
) {
1163 fprintf(stderr
, "\n%c ", _sym
[type
-1]);
1166 fprintf(stderr
, "\n");
1168 fprintf(stderr
, "# %s", data
);
1174 request
->conv
.last_type
= type
;
1180 /* {{{ static inline zval *http_request_option(http_request *, HashTable *, char *, size_t, int) */
1181 static inline zval
*_http_request_option_ex(http_request
*r
, HashTable
*options
, char *key
, size_t keylen
, int type TSRMLS_DC
)
1185 ulong h
= zend_hash_func(key
, keylen
);
1187 if (SUCCESS
== zend_hash_quick_find(options
, key
, keylen
, h
, (void *) &zoption
)) {
1188 zval
*option
, *cached
;
1190 option
= http_zsep(type
, *zoption
);
1191 cached
= http_request_option_cache_ex(r
, key
, keylen
, h
, option
);
1193 zval_ptr_dtor(&option
);
1202 /* {{{ static inline zval *http_request_option_cache(http_request *, char *key, zval *) */
1203 static inline zval
*_http_request_option_cache_ex(http_request
*r
, char *key
, size_t keylen
, ulong h
, zval
*opt TSRMLS_DC
)
1208 zend_hash_quick_update(&r
->_cache
.options
, key
, keylen
, h
, &opt
, sizeof(zval
*), NULL
);
1210 zend_hash_update(&r
->_cache
.options
, key
, keylen
, &opt
, sizeof(zval
*), NULL
);
1217 /* {{{ static inline int http_request_cookies_enabled(http_request *) */
1218 static inline int _http_request_cookies_enabled(http_request
*request
) {
1219 http_request_storage
*st
;
1221 if (request
->ch
&& (st
= http_request_storage_get(request
->ch
)) && st
->cookiestore
) {
1222 /* cookies are enabled */
1229 #endif /* HTTP_HAVE_CURL */
1236 * vim600: noet sw=4 ts=4 fdm=marker
1237 * vim<600: noet sw=4 ts=4