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 +----------------------------------------------------------------------+
23 # include <winsock2.h>
26 #include <curl/curl.h>
30 #include "php_http_api.h"
31 #include "php_http_curl_api.h"
32 #include "php_http_std_defs.h"
34 #include "phpstr/phpstr.h"
36 ZEND_DECLARE_MODULE_GLOBALS(http
)
38 #if LIBCURL_VERSION_NUM >= 0x070c01
39 # define http_curl_reset(ch) curl_easy_reset(ch)
41 # define http_curl_reset(ch)
44 #if LIBCURL_VERSION_NUM < 0x070c00
45 # define curl_easy_strerror(code) "unkown error"
48 #define http_curl_startup(ch, clean_curl, URL, options) \
50 if (!(ch = curl_easy_init())) { \
51 php_error_docref(NULL TSRMLS_CC, E_WARNING, "Could not initialize curl"); \
56 http_curl_reset(ch); \
58 http_curl_setopts(ch, URL, options);
60 #define http_curl_perform(ch, clean_curl) \
63 if (CURLE_OK != (result = curl_easy_perform(ch))) { \
64 http_curl_cleanup(ch, clean_curl); \
65 php_error_docref(NULL TSRMLS_CC, E_WARNING, "Could not perform request: %s", curl_easy_strerror(result)); \
70 #define http_curl_cleanup(ch, clean_curl) \
71 phpstr_dtor(&HTTP_G(curlbuf)); \
72 zend_llist_clean(&HTTP_G(to_free)); \
74 curl_easy_cleanup(ch); \
78 #define http_curl_copybuf(d, l) \
79 phpstr_data(&HTTP_G(curlbuf), d, l)
81 #define http_curl_copystr(s) _http_curl_copystr((s) TSRMLS_CC)
82 static inline char *_http_curl_copystr(const char *str TSRMLS_DC
);
84 #define http_curl_setopts(c, u, o) _http_curl_setopts((c), (u), (o) TSRMLS_CC)
85 static void _http_curl_setopts(CURL
*ch
, const char *url
, HashTable
*options TSRMLS_DC
);
87 #define http_curl_getopt(o, k) _http_curl_getopt((o), (k) TSRMLS_CC, 0)
88 #define http_curl_getopt1(o, k, t1) _http_curl_getopt((o), (k) TSRMLS_CC, 1, (t1))
89 #define http_curl_getopt2(o, k, t1, t2) _http_curl_getopt((o), (k) TSRMLS_CC, 2, (t1), (t2))
90 static inline zval
*_http_curl_getopt(HashTable
*options
, char *key TSRMLS_DC
, int checks
, ...);
92 static size_t http_curl_body_callback(char *, size_t, size_t, void *);
93 static size_t http_curl_hdrs_callback(char *, size_t, size_t, void *);
95 #define http_curl_getinfo(c, h) _http_curl_getinfo((c), (h) TSRMLS_CC)
96 static inline void _http_curl_getinfo(CURL
*ch
, HashTable
*info TSRMLS_DC
);
98 /* {{{ static inline char *http_curl_copystr(char *) */
99 static inline char *_http_curl_copystr(const char *str TSRMLS_DC
)
101 char *new_str
= estrdup(str
);
102 zend_llist_add_element(&HTTP_G(to_free
), &new_str
);
107 /* {{{ static size_t http_curl_body_callback(char *, size_t, size_t, void *) */
108 static size_t http_curl_body_callback(char *buf
, size_t len
, size_t n
, void *s
)
112 phpstr_append(&HTTP_G(curlbuf
), buf
, len
*= n
);
117 /* {{{ static size_t http_curl_hdrs_callback(char *, size_t, size_t, void *) */
118 static size_t http_curl_hdrs_callback(char *buf
, size_t len
, size_t n
, void *s
)
122 /* discard previous headers */
123 if (HTTP_G(curlbuf
).used
&& (!strncmp(buf
, "HTTP/1.", sizeof("HTTP/1.") - 1))) {
124 phpstr_free(&HTTP_G(curlbuf
));
127 phpstr_append(&HTTP_G(curlbuf
), buf
, len
*= n
);
132 /* {{{ static inline zval *http_curl_getopt(HashTable *, char *, int, ...) */
133 static inline zval
*_http_curl_getopt(HashTable
*options
, char *key TSRMLS_DC
, int checks
, ...)
139 if (SUCCESS
!= zend_hash_find(options
, key
, strlen(key
) + 1, (void **) &zoption
)) {
146 va_start(types
, checks
);
147 for (i
= 0; i
< checks
; ++i
) {
148 if ((va_arg(types
, int)) == (Z_TYPE_PP(zoption
))) {
158 /* {{{ static void http_curl_setopts(CURL *, char *, HashTable *) */
159 static void _http_curl_setopts(CURL
*ch
, const char *url
, HashTable
*options TSRMLS_DC
)
162 zend_bool range_req
= 0;
164 #define HTTP_CURL_OPT(OPTION, p) curl_easy_setopt(ch, CURLOPT_##OPTION, (p))
166 /* standard options */
167 HTTP_CURL_OPT(URL
, url
);
168 HTTP_CURL_OPT(HEADER
, 0);
169 HTTP_CURL_OPT(FILETIME
, 1);
170 HTTP_CURL_OPT(NOPROGRESS
, 1);
171 HTTP_CURL_OPT(AUTOREFERER
, 1);
172 HTTP_CURL_OPT(WRITEFUNCTION
, http_curl_body_callback
);
173 HTTP_CURL_OPT(HEADERFUNCTION
, http_curl_hdrs_callback
);
174 #if defined(ZTS) && (LIBCURL_VERSION_NUM >= 0x070a00)
175 HTTP_CURL_OPT(NOSIGNAL
, 1);
178 if ((!options
) || (1 > zend_hash_num_elements(options
))) {
183 if (zoption
= http_curl_getopt1(options
, "proxyhost", IS_STRING
)) {
184 HTTP_CURL_OPT(PROXY
, http_curl_copystr(Z_STRVAL_P(zoption
)));
186 if (zoption
= http_curl_getopt1(options
, "proxyport", IS_LONG
)) {
187 HTTP_CURL_OPT(PROXYPORT
, Z_LVAL_P(zoption
));
190 if (zoption
= http_curl_getopt1(options
, "proxyauth", IS_STRING
)) {
191 HTTP_CURL_OPT(PROXYUSERPWD
, http_curl_copystr(Z_STRVAL_P(zoption
)));
193 #if LIBCURL_VERSION_NUM >= 0x070a07
195 if (zoption
= http_curl_getopt1(options
, "proxyauthtype", IS_LONG
)) {
196 HTTP_CURL_OPT(PROXYAUTH
, Z_LVAL_P(zoption
));
201 /* outgoing interface */
202 if (zoption
= http_curl_getopt1(options
, "interface", IS_STRING
)) {
203 HTTP_CURL_OPT(INTERFACE
, http_curl_copystr(Z_STRVAL_P(zoption
)));
207 if (zoption
= http_curl_getopt1(options
, "port", IS_LONG
)) {
208 HTTP_CURL_OPT(PORT
, Z_LVAL_P(zoption
));
212 if (zoption
= http_curl_getopt1(options
, "httpauth", IS_STRING
)) {
213 HTTP_CURL_OPT(USERPWD
, http_curl_copystr(Z_STRVAL_P(zoption
)));
215 #if LIBCURL_VERSION_NUM >= 0x070a06
216 if (zoption
= http_curl_getopt1(options
, "httpauthtype", IS_LONG
)) {
217 HTTP_CURL_OPT(HTTPAUTH
, Z_LVAL_P(zoption
));
221 /* compress, empty string enables deflate and gzip */
222 if (zoption
= http_curl_getopt2(options
, "compress", IS_LONG
, IS_BOOL
)) {
223 if (Z_LVAL_P(zoption
)) {
224 HTTP_CURL_OPT(ENCODING
, "");
228 /* redirects, defaults to 0 */
229 if (zoption
= http_curl_getopt1(options
, "redirect", IS_LONG
)) {
230 HTTP_CURL_OPT(FOLLOWLOCATION
, Z_LVAL_P(zoption
) ? 1 : 0);
231 HTTP_CURL_OPT(MAXREDIRS
, Z_LVAL_P(zoption
));
232 if (zoption
= http_curl_getopt2(options
, "unrestrictedauth", IS_LONG
, IS_BOOL
)) {
233 HTTP_CURL_OPT(UNRESTRICTED_AUTH
, Z_LVAL_P(zoption
));
236 HTTP_CURL_OPT(FOLLOWLOCATION
, 0);
240 if (zoption
= http_curl_getopt1(options
, "referer", IS_STRING
)) {
241 HTTP_CURL_OPT(REFERER
, http_curl_copystr(Z_STRVAL_P(zoption
)));
244 /* useragent, default "PECL::HTTP/version (PHP/version)" */
245 if (zoption
= http_curl_getopt1(options
, "useragent", IS_STRING
)) {
246 HTTP_CURL_OPT(USERAGENT
, http_curl_copystr(Z_STRVAL_P(zoption
)));
248 HTTP_CURL_OPT(USERAGENT
,
249 "PECL::HTTP/" HTTP_PEXT_VERSION
" (PHP/" PHP_VERSION
")");
252 /* additional headers, array('name' => 'value') */
253 if (zoption
= http_curl_getopt1(options
, "headers", IS_ARRAY
)) {
256 struct curl_slist
*headers
= NULL
;
258 FOREACH_KEY(zoption
, header_key
, header_idx
) {
261 if (SUCCESS
== zend_hash_get_current_data(Z_ARRVAL_P(zoption
), (void **) &header_val
)) {
262 char header
[1024] = {0};
263 snprintf(header
, 1023, "%s: %s", header_key
, Z_STRVAL_PP(header_val
));
264 headers
= curl_slist_append(headers
, http_curl_copystr(header
));
273 HTTP_CURL_OPT(HTTPHEADER
, headers
);
277 /* cookies, array('name' => 'value') */
278 if (zoption
= http_curl_getopt1(options
, "cookies", IS_ARRAY
)) {
279 char *cookie_key
= NULL
;
281 phpstr
*qstr
= phpstr_new();
283 FOREACH_KEY(zoption
, cookie_key
, cookie_idx
) {
286 if (SUCCESS
== zend_hash_get_current_data(Z_ARRVAL_P(zoption
), (void **) &cookie_val
)) {
287 phpstr_appendf(qstr
, "%s=%s; ", cookie_key
, Z_STRVAL_PP(cookie_val
));
297 HTTP_CURL_OPT(COOKIE
, http_curl_copystr(qstr
->data
));
303 if (zoption
= http_curl_getopt1(options
, "cookiestore", IS_STRING
)) {
304 HTTP_CURL_OPT(COOKIEFILE
, http_curl_copystr(Z_STRVAL_P(zoption
)));
305 HTTP_CURL_OPT(COOKIEJAR
, http_curl_copystr(Z_STRVAL_P(zoption
)));
309 if (zoption
= http_curl_getopt1(options
, "resume", IS_LONG
)) {
311 HTTP_CURL_OPT(RESUME_FROM
, Z_LVAL_P(zoption
));
315 if (zoption
= http_curl_getopt1(options
, "maxfilesize", IS_LONG
)) {
316 HTTP_CURL_OPT(MAXFILESIZE
, Z_LVAL_P(zoption
));
320 if (zoption
= http_curl_getopt1(options
, "lastmodified", IS_LONG
)) {
321 HTTP_CURL_OPT(TIMECONDITION
, range_req
? CURL_TIMECOND_IFUNMODSINCE
: CURL_TIMECOND_IFMODSINCE
);
322 HTTP_CURL_OPT(TIMEVALUE
, Z_LVAL_P(zoption
));
326 if (zoption
= http_curl_getopt1(options
, "timeout", IS_LONG
)) {
327 HTTP_CURL_OPT(TIMEOUT
, Z_LVAL_P(zoption
));
331 if (zoption
= http_curl_getopt1(options
, "connecttimeout", IS_LONG
)) {
332 HTTP_CURL_OPT(CONNECTTIMEOUT
, Z_LVAL_P(zoption
));
336 if (zoption
= http_curl_getopt1(options
, "ssl", IS_ARRAY
)) {
341 #define HTTP_CURL_OPT_STRING(keyname) HTTP_CURL_OPT_STRING_EX(keyname, keyname)
342 #define HTTP_CURL_OPT_SSL_STRING(keyname) HTTP_CURL_OPT_STRING_EX(keyname, SSL##keyname)
343 #define HTTP_CURL_OPT_SSL_STRING_(keyname) HTTP_CURL_OPT_STRING_EX(keyname, SSL_##keyname)
344 #define HTTP_CURL_OPT_STRING_EX(keyname, optname) \
345 if (!strcasecmp(key, #keyname)) { \
346 convert_to_string_ex(param); \
347 HTTP_CURL_OPT(optname, Z_STRVAL_PP(param)); \
351 #define HTTP_CURL_OPT_LONG(keyname) HTTP_OPT_SSL_LONG_EX(keyname, keyname)
352 #define HTTP_CURL_OPT_SSL_LONG(keyname) HTTP_CURL_OPT_LONG_EX(keyname, SSL##keyname)
353 #define HTTP_CURL_OPT_SSL_LONG_(keyname) HTTP_CURL_OPT_LONG_EX(keyname, SSL_##keyname)
354 #define HTTP_CURL_OPT_LONG_EX(keyname, optname) \
355 if (!strcasecmp(key, #keyname)) { \
356 convert_to_long_ex(param); \
357 HTTP_CURL_OPT(optname, Z_LVAL_PP(param)); \
362 FOREACH_KEYVAL(zoption
, key
, idx
, param
) {
364 HTTP_CURL_OPT_SSL_STRING(CERT
);
365 #if LIBCURL_VERSION_NUM >= 0x070903
366 HTTP_CURL_OPT_SSL_STRING(CERTTYPE
);
368 HTTP_CURL_OPT_SSL_STRING(CERTPASSWD
);
370 HTTP_CURL_OPT_SSL_STRING(KEY
);
371 HTTP_CURL_OPT_SSL_STRING(KEYTYPE
);
372 HTTP_CURL_OPT_SSL_STRING(KEYPASSWD
);
374 HTTP_CURL_OPT_SSL_STRING(ENGINE
);
375 HTTP_CURL_OPT_SSL_LONG(VERSION
);
377 HTTP_CURL_OPT_SSL_LONG_(VERIFYPEER
);
378 HTTP_CURL_OPT_SSL_LONG_(VERIFYHOST
);
379 HTTP_CURL_OPT_SSL_STRING_(CIPHER_LIST
);
382 HTTP_CURL_OPT_STRING(CAINFO
);
383 #if LIBCURL_VERSION_NUM >= 0x070908
384 HTTP_CURL_OPT_STRING(CAPATH
);
386 HTTP_CURL_OPT_STRING(RANDOM_FILE
);
387 HTTP_CURL_OPT_STRING(EGDSOCKET
);
397 /* {{{ static inline http_curl_getinfo(CURL, HashTable *) */
398 static inline void _http_curl_getinfo(CURL
*ch
, HashTable
*info TSRMLS_DC
)
401 Z_ARRVAL(array
) = info
;
403 #define HTTP_CURL_INFO(I) HTTP_CURL_INFO_EX(I, I)
404 #define HTTP_CURL_INFO_EX(I, X) \
405 switch (CURLINFO_ ##I & ~CURLINFO_MASK) \
407 case CURLINFO_STRING: \
410 if (CURLE_OK == curl_easy_getinfo(ch, CURLINFO_ ##I, &c)) { \
411 add_assoc_string(&array, pretty_key(http_curl_copystr(#X), sizeof(#X)-1, 0, 0), c ? c : "", 1); \
416 case CURLINFO_DOUBLE: \
419 if (CURLE_OK == curl_easy_getinfo(ch, CURLINFO_ ##I, &d)) { \
420 add_assoc_double(&array, pretty_key(http_curl_copystr(#X), sizeof(#X)-1, 0, 0), d); \
425 case CURLINFO_LONG: \
428 if (CURLE_OK == curl_easy_getinfo(ch, CURLINFO_ ##I, &l)) { \
429 add_assoc_long(&array, pretty_key(http_curl_copystr(#X), sizeof(#X)-1, 0, 0), l); \
435 HTTP_CURL_INFO(EFFECTIVE_URL
);
437 #if LIBCURL_VERSION_NUM >= 0x070a07
438 HTTP_CURL_INFO(RESPONSE_CODE
);
440 HTTP_CURL_INFO_EX(HTTP_CODE
, RESPONSE_CODE
);
442 HTTP_CURL_INFO(HTTP_CONNECTCODE
);
444 #if LIBCURL_VERSION_NUM >= 0x070500
445 HTTP_CURL_INFO(FILETIME
);
447 HTTP_CURL_INFO(TOTAL_TIME
);
448 HTTP_CURL_INFO(NAMELOOKUP_TIME
);
449 HTTP_CURL_INFO(CONNECT_TIME
);
450 HTTP_CURL_INFO(PRETRANSFER_TIME
);
451 HTTP_CURL_INFO(STARTTRANSFER_TIME
);
452 #if LIBCURL_VERSION_NUM >= 0x070907
453 HTTP_CURL_INFO(REDIRECT_TIME
);
454 HTTP_CURL_INFO(REDIRECT_COUNT
);
457 HTTP_CURL_INFO(SIZE_UPLOAD
);
458 HTTP_CURL_INFO(SIZE_DOWNLOAD
);
459 HTTP_CURL_INFO(SPEED_DOWNLOAD
);
460 HTTP_CURL_INFO(SPEED_UPLOAD
);
462 HTTP_CURL_INFO(HEADER_SIZE
);
463 HTTP_CURL_INFO(REQUEST_SIZE
);
465 HTTP_CURL_INFO(SSL_VERIFYRESULT
);
466 #if LIBCURL_VERSION_NUM >= 0x070c03
467 /*HTTP_CURL_INFO(SSL_ENGINES);
468 todo: CURLINFO_SLIST */
471 HTTP_CURL_INFO(CONTENT_LENGTH_DOWNLOAD
);
472 HTTP_CURL_INFO(CONTENT_LENGTH_UPLOAD
);
473 HTTP_CURL_INFO(CONTENT_TYPE
);
475 #if LIBCURL_VERSION_NUM >= 0x070a03
476 /*HTTP_CURL_INFO(PRIVATE);*/
479 #if LIBCURL_VERSION_NUM >= 0x070a08
480 HTTP_CURL_INFO(HTTPAUTH_AVAIL
);
481 HTTP_CURL_INFO(PROXYAUTH_AVAIL
);
484 #if LIBCURL_VERSION_NUM >= 0x070c02
485 /*HTTP_CURL_INFO(OS_ERRNO);*/
488 #if LIBCURL_VERSION_NUM >= 0x070c03
489 HTTP_CURL_INFO(NUM_CONNECTS
);
494 /* {{{ STATUS http_get_ex(CURL *, char *, HashTable *, HashTable *, char **, size_t *) */
495 PHP_HTTP_API STATUS
_http_get_ex(CURL
*ch
, const char *URL
, HashTable
*options
,
496 HashTable
*info
, char **data
, size_t *data_len TSRMLS_DC
)
498 zend_bool clean_curl
= 0;
500 http_curl_startup(ch
, clean_curl
, URL
, options
);
501 curl_easy_setopt(ch
, CURLOPT_HTTPGET
, 1);
502 http_curl_perform(ch
, clean_curl
);
505 http_curl_getinfo(ch
, info
);
508 http_curl_copybuf(data
, data_len
);
509 http_curl_cleanup(ch
, clean_curl
);
514 /* {{{ STATUS http_head_ex(CURL *, char *, HashTable *, HashTable *, char **data, size_t *) */
515 PHP_HTTP_API STATUS
_http_head_ex(CURL
*ch
, const char *URL
, HashTable
*options
,
516 HashTable
*info
, char **data
, size_t *data_len TSRMLS_DC
)
518 zend_bool clean_curl
= 0;
520 http_curl_startup(ch
, clean_curl
, URL
, options
);
521 curl_easy_setopt(ch
, CURLOPT_NOBODY
, 1);
522 http_curl_perform(ch
, clean_curl
);
525 http_curl_getinfo(ch
, info
);
528 http_curl_copybuf(data
, data_len
);
529 http_curl_cleanup(ch
, clean_curl
);
534 /* {{{ STATUS http_post_data_ex(CURL *, char *, char *, size_t, HashTable *, HashTable *, char **, size_t *) */
535 PHP_HTTP_API STATUS
_http_post_data_ex(CURL
*ch
, const char *URL
, char *postdata
,
536 size_t postdata_len
, HashTable
*options
, HashTable
*info
, char **data
,
537 size_t *data_len TSRMLS_DC
)
539 zend_bool clean_curl
= 0;
541 http_curl_startup(ch
, clean_curl
, URL
, options
);
542 curl_easy_setopt(ch
, CURLOPT_POST
, 1);
543 curl_easy_setopt(ch
, CURLOPT_POSTFIELDS
, postdata
);
544 curl_easy_setopt(ch
, CURLOPT_POSTFIELDSIZE
, postdata_len
);
545 http_curl_perform(ch
, clean_curl
);
548 http_curl_getinfo(ch
, info
);
551 http_curl_copybuf(data
, data_len
);
552 http_curl_cleanup(ch
, clean_curl
);
558 /* {{{ STATUS http_post_array_ex(CURL *, char *, HashTable *, HashTable *, HashTable *, char **, size_t *) */
559 PHP_HTTP_API STATUS
_http_post_array_ex(CURL
*ch
, const char *URL
, HashTable
*postarray
,
560 HashTable
*options
, HashTable
*info
, char **data
, size_t *data_len TSRMLS_DC
)
566 if (SUCCESS
!= http_urlencode_hash_ex(postarray
, 1, NULL
, 0, &encoded
, &encoded_len
)) {
567 php_error_docref(NULL TSRMLS_CC
, E_WARNING
, "Could not encode post data");
571 status
= http_post_data_ex(ch
, URL
, encoded
, encoded_len
, options
, info
, data
, data_len
);
578 /* {{{ STATUS http_post_curldata_ex(CURL *, char *, curl_httppost *, HashTable *, HashTable *, char **, size_t *) */
579 PHP_HTTP_API STATUS
_http_post_curldata_ex(CURL
*ch
, const char *URL
,
580 struct curl_httppost
*curldata
, HashTable
*options
, HashTable
*info
,
581 char **data
, size_t *data_len TSRMLS_DC
)
583 zend_bool clean_curl
= 0;
585 http_curl_startup(ch
, clean_curl
, URL
, options
);
586 curl_easy_setopt(ch
, CURLOPT_POST
, 1);
587 curl_easy_setopt(ch
, CURLOPT_HTTPPOST
, curldata
);
588 http_curl_perform(ch
, clean_curl
);
591 http_curl_getinfo(ch
, info
);
594 http_curl_copybuf(data
, data_len
);
595 http_curl_cleanup(ch
, clean_curl
);
606 * vim600: noet sw=4 ts=4 fdm=marker
607 * vim<600: noet sw=4 ts=4