projects / m6w6 / ext-http / blob
? search:


3408812f179373b9fcb929e28bb9080cbdf2851d
[m6w6/ext-http] / http_request_api.c
1 /*
2 +--------------------------------------------------------------------+
3 | PECL :: http |
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-2005, Michael Wallner <mike@php.net> |
10 +--------------------------------------------------------------------+
11 */
12
13 /* $Id$ */
14
15 #ifdef HAVE_CONFIG_H
16 # include "config.h"
17 #endif
18
19 #define HTTP_WANT_CURL
20 #include "php_http.h"
21
22 #ifdef HTTP_HAVE_CURL
23
24 #include "php_http_api.h"
25 #include "php_http_request_api.h"
26 #include "php_http_url_api.h"
27
28 #ifdef ZEND_ENGINE_2
29 # include "php_http_request_object.h"
30 #endif
31
32 ZEND_EXTERN_MODULE_GLOBALS(http);
33
34 /* {{{ cruft for thread safe SSL crypto locks */
35 #if defined(ZTS) && defined(HTTP_HAVE_SSL)
36 # ifdef PHP_WIN32
37 # define HTTP_NEED_SSL_TSL
38 # define HTTP_NEED_OPENSSL_TSL
39 # include <openssl/crypto.h>
40 # else /* !PHP_WIN32 */
41 # if defined(HTTP_HAVE_OPENSSL)
42 # if defined(HAVE_OPENSSL_CRYPTO_H)
43 # define HTTP_NEED_SSL_TSL
44 # define HTTP_NEED_OPENSSL_TSL
45 # include <openssl/crypto.h>
46 # else
47 # warning \
48 "libcurl was compiled with OpenSSL support, but configure could not find " \
49 "openssl/crypto.h; thus no SSL crypto locking callbacks will be set, which may " \
50 "cause random crashes on SSL requests"
51 # endif
52 # elif defined(HTTP_HAVE_GNUTLS)
53 # if defined(HAVE_GCRYPT_H)
54 # define HTTP_NEED_SSL_TSL
55 # define HTTP_NEED_GNUTLS_TSL
56 # include <gcrypt.h>
57 # else
58 # warning \
59 "libcurl was compiled with GnuTLS support, but configure could not find " \
60 "gcrypt.h; thus no SSL crypto locking callbacks will be set, which may " \
61 "cause random crashes on SSL requests"
62 # endif
63 # else
64 # warning \
65 "libcurl was compiled with SSL support, but configure could not determine which" \
66 "library was used; thus no SSL crypto locking callbacks will be set, which may " \
67 "cause random crashes on SSL requests"
68 # endif /* HTTP_HAVE_OPENSSL || HTTP_HAVE_GNUTLS */
69 # endif /* PHP_WIN32 */
70 #endif /* ZTS && HTTP_HAVE_SSL */
71
72 #ifdef HTTP_NEED_SSL_TSL
73 static inline void http_ssl_init(void);
74 static inline void http_ssl_cleanup(void);
75 #endif
76 /* }}} */
77
78 /* {{{ MINIT */
79 PHP_MINIT_FUNCTION(http_request)
80 {
81 #ifdef HTTP_NEED_SSL_TSL
82 http_ssl_init();
83 #endif
84
85 if (CURLE_OK != curl_global_init(CURL_GLOBAL_ALL)) {
86 return FAILURE;
87 }
88
89 HTTP_LONG_CONSTANT("HTTP_AUTH_BASIC", CURLAUTH_BASIC);
90 HTTP_LONG_CONSTANT("HTTP_AUTH_DIGEST", CURLAUTH_DIGEST);
91 HTTP_LONG_CONSTANT("HTTP_AUTH_NTLM", CURLAUTH_NTLM);
92 HTTP_LONG_CONSTANT("HTTP_AUTH_ANY", CURLAUTH_ANY);
93
94 return SUCCESS;
95 }
96 /* }}} */
97
98 /* {{{ MSHUTDOWN */
99 PHP_MSHUTDOWN_FUNCTION(http_request)
100 {
101 curl_global_cleanup();
102 #ifdef HTTP_NEED_SSL_TSL
103 http_ssl_cleanup();
104 #endif
105 return SUCCESS;
106 }
107 /* }}} */
108
109 /* {{{ MACROS */
110 #ifndef HAVE_CURL_EASY_STRERROR
111 # define curl_easy_strerror(dummy) "unkown error"
112 #endif
113
114 #define HTTP_CURL_INFO(I) HTTP_CURL_INFO_EX(I, I)
115 #define HTTP_CURL_INFO_EX(I, X) \
116 switch (CURLINFO_ ##I & ~CURLINFO_MASK) \
117 { \
118 case CURLINFO_STRING: \
119 { \
120 char *c; \
121 if (CURLE_OK == curl_easy_getinfo(request->ch, CURLINFO_ ##I, &c)) { \
122 char *key = estrndup(#X, lenof(#X)); \
123 add_assoc_string(&array, pretty_key(key, lenof(#X), 0, 0), c ? c : "", 1); \
124 efree(key); \
125 } \
126 } \
127 break; \
128 \
129 case CURLINFO_DOUBLE: \
130 { \
131 double d; \
132 if (CURLE_OK == curl_easy_getinfo(request->ch, CURLINFO_ ##I, &d)) { \
133 char *key = estrndup(#X, lenof(#X)); \
134 add_assoc_double(&array, pretty_key(key, lenof(#X), 0, 0), d); \
135 efree(key); \
136 } \
137 } \
138 break; \
139 \
140 case CURLINFO_LONG: \
141 { \
142 long l; \
143 if (CURLE_OK == curl_easy_getinfo(request->ch, CURLINFO_ ##I, &l)) { \
144 char *key = estrndup(#X, lenof(#X)); \
145 add_assoc_long(&array, pretty_key(key, lenof(#X), 0, 0), l); \
146 efree(key); \
147 } \
148 } \
149 break; \
150 \
151 case CURLINFO_SLIST: \
152 { \
153 struct curl_slist *l, *p; \
154 if (CURLE_OK == curl_easy_getinfo(request->ch, CURLINFO_ ##I, &l)) { \
155 zval *subarray; \
156 char *key = estrndup(#X, lenof(#X)); \
157 MAKE_STD_ZVAL(subarray); \
158 array_init(subarray); \
159 for (p = l; p; p = p->next) { \
160 add_next_index_string(subarray, p->data, 1); \
161 } \
162 add_assoc_zval(&array, pretty_key(key, lenof(#X), 0, 0), subarray); \
163 curl_slist_free_all(l); \
164 efree(key); \
165 } \
166 } \
167 }
168
169 #define HTTP_CURL_OPT(OPTION, p) curl_easy_setopt(request->ch, CURLOPT_##OPTION, (p))
170 #define HTTP_CURL_OPT_STRING(keyname) HTTP_CURL_OPT_STRING_EX(keyname, keyname)
171 #define HTTP_CURL_OPT_SSL_STRING(keyname) HTTP_CURL_OPT_STRING_EX(keyname, SSL##keyname)
172 #define HTTP_CURL_OPT_SSL_STRING_(keyname) HTTP_CURL_OPT_STRING_EX(keyname, SSL_##keyname)
173 #define HTTP_CURL_OPT_STRING_EX(keyname, optname) \
174 if (!strcasecmp(key, #keyname)) { \
175 convert_to_string(*param); \
176 HTTP_CURL_OPT(optname, Z_STRVAL_PP(param)); \
177 key = NULL; \
178 continue; \
179 }
180 #define HTTP_CURL_OPT_LONG(keyname) HTTP_OPT_SSL_LONG_EX(keyname, keyname)
181 #define HTTP_CURL_OPT_SSL_LONG(keyname) HTTP_CURL_OPT_LONG_EX(keyname, SSL##keyname)
182 #define HTTP_CURL_OPT_SSL_LONG_(keyname) HTTP_CURL_OPT_LONG_EX(keyname, SSL_##keyname)
183 #define HTTP_CURL_OPT_LONG_EX(keyname, optname) \
184 if (!strcasecmp(key, #keyname)) { \
185 convert_to_long(*param); \
186 HTTP_CURL_OPT(optname, Z_LVAL_PP(param)); \
187 key = NULL; \
188 continue; \
189 }
190 /* }}} */
191
192 /* {{{ forward declarations */
193 #define http_request_option(r, o, k, t) _http_request_option_ex((r), (o), (k), sizeof(k), (t) TSRMLS_CC)
194 #define http_request_option_ex(r, o, k, l, t) _http_request_option_ex((r), (o), (k), (l), (t) TSRMLS_CC)
195 static inline zval *_http_request_option_ex(http_request *request, HashTable *options, char *key, size_t keylen, int type TSRMLS_DC);
196
197 static size_t http_curl_read_callback(void *, size_t, size_t, void *);
198 static int http_curl_progress_callback(void *, double, double, double, double);
199 static int http_curl_raw_callback(CURL *, curl_infotype, char *, size_t, void *);
200 static int http_curl_dummy_callback(char *data, size_t n, size_t l, void *s) { return n*l; }
201 static curlioerr http_curl_ioctl_callback(CURL *, curliocmd, void *);
202 /* }}} */
203
204 /* {{{ http_request *http_request_init(http_request *) */
205 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)
206 {
207 http_request *r;
208
209 if (request) {
210 r = request;
211 } else {
212 r = emalloc_rel(sizeof(http_request));
213 }
214 memset(r, 0, sizeof(http_request));
215
216 r->ch = ch;
217 r->url = (url && *url) ? estrdup(url) : NULL;
218 r->meth = (meth > 0) ? meth : HTTP_GET;
219
220 phpstr_init(&r->conv.request);
221 phpstr_init_ex(&r->conv.response, HTTP_CURLBUF_SIZE, 0);
222 phpstr_init(&r->_cache.cookies);
223 zend_hash_init(&r->_cache.options, 0, NULL, ZVAL_PTR_DTOR, 0);
224
225 TSRMLS_SET_CTX(r->tsrm_ls);
226
227 return r;
228 }
229 /* }}} */
230
231 /* {{{ void http_request_dtor(http_request *) */
232 PHP_HTTP_API void _http_request_dtor(http_request *request)
233 {
234 TSRMLS_FETCH_FROM_CTX(request->tsrm_ls);
235
236 if (request->ch) {
237 /* avoid nasty segfaults with already cleaned up callbacks */
238 curl_easy_setopt(request->ch, CURLOPT_NOPROGRESS, 1);
239 curl_easy_setopt(request->ch, CURLOPT_PROGRESSFUNCTION, NULL);
240 curl_easy_setopt(request->ch, CURLOPT_VERBOSE, 0);
241 curl_easy_setopt(request->ch, CURLOPT_DEBUGFUNCTION, NULL);
242 curl_easy_cleanup(request->ch);
243 request->ch = NULL;
244 }
245
246 http_request_reset(request);
247
248 phpstr_dtor(&request->_cache.cookies);
249 zend_hash_destroy(&request->_cache.options);
250 if (request->_cache.headers) {
251 curl_slist_free_all(request->_cache.headers);
252 request->_cache.headers = NULL;
253 }
254 if (request->_progress_callback) {
255 zval_ptr_dtor(&request->_progress_callback);
256 request->_progress_callback = NULL;
257 }
258 }
259 /* }}} */
260
261 /* {{{ void http_request_free(http_request **) */
262 PHP_HTTP_API void _http_request_free(http_request **request)
263 {
264 if (*request) {
265 TSRMLS_FETCH_FROM_CTX((*request)->tsrm_ls);
266 http_request_body_free(&(*request)->body);
267 http_request_dtor(*request);
268 efree(*request);
269 *request = NULL;
270 }
271 }
272 /* }}} */
273
274 /* {{{ void http_request_reset(http_request *) */
275 PHP_HTTP_API void _http_request_reset(http_request *request)
276 {
277 TSRMLS_FETCH_FROM_CTX(request->tsrm_ls);
278 STR_SET(request->url, NULL);
279 request->conv.last_type = 0;
280 phpstr_dtor(&request->conv.request);
281 phpstr_dtor(&request->conv.response);
282 http_request_body_dtor(request->body);
283 }
284 /* }}} */
285
286 /* {{{ void http_request_defaults(http_request *) */
287 PHP_HTTP_API void _http_request_defaults(http_request *request)
288 {
289 if (request->ch) {
290 #ifdef HAVE_CURL_EASY_RESET
291 curl_easy_reset(request->ch);
292 #endif
293 #if defined(ZTS)
294 HTTP_CURL_OPT(NOSIGNAL, 1);
295 #endif
296 HTTP_CURL_OPT(PRIVATE, request);
297 HTTP_CURL_OPT(ERRORBUFFER, request->_error);
298 HTTP_CURL_OPT(HEADER, 0);
299 HTTP_CURL_OPT(FILETIME, 1);
300 HTTP_CURL_OPT(AUTOREFERER, 1);
301 HTTP_CURL_OPT(VERBOSE, 1);
302 HTTP_CURL_OPT(HEADERFUNCTION, NULL);
303 HTTP_CURL_OPT(DEBUGFUNCTION, http_curl_raw_callback);
304 HTTP_CURL_OPT(READFUNCTION, http_curl_read_callback);
305 HTTP_CURL_OPT(IOCTLFUNCTION, http_curl_ioctl_callback);
306 HTTP_CURL_OPT(WRITEFUNCTION, http_curl_dummy_callback);
307 HTTP_CURL_OPT(PROGRESSFUNCTION, NULL);
308 HTTP_CURL_OPT(URL, NULL);
309 HTTP_CURL_OPT(NOPROGRESS, 1);
310 HTTP_CURL_OPT(PROXY, NULL);
311 HTTP_CURL_OPT(PROXYPORT, 0);
312 HTTP_CURL_OPT(PROXYUSERPWD, NULL);
313 HTTP_CURL_OPT(PROXYAUTH, 0);
314 HTTP_CURL_OPT(INTERFACE, NULL);
315 HTTP_CURL_OPT(PORT, 0);
316 HTTP_CURL_OPT(USERPWD, NULL);
317 HTTP_CURL_OPT(HTTPAUTH, 0);
318 HTTP_CURL_OPT(ENCODING, 0);
319 HTTP_CURL_OPT(FOLLOWLOCATION, 0);
320 HTTP_CURL_OPT(UNRESTRICTED_AUTH, 0);
321 HTTP_CURL_OPT(REFERER, NULL);
322 HTTP_CURL_OPT(USERAGENT, "PECL::HTTP/" PHP_EXT_HTTP_VERSION " (PHP/" PHP_VERSION ")");
323 HTTP_CURL_OPT(HTTPHEADER, NULL);
324 HTTP_CURL_OPT(COOKIE, NULL);
325 HTTP_CURL_OPT(COOKIEFILE, NULL);
326 HTTP_CURL_OPT(COOKIEJAR, NULL);
327 HTTP_CURL_OPT(RESUME_FROM, 0);
328 HTTP_CURL_OPT(MAXFILESIZE, 0);
329 HTTP_CURL_OPT(TIMECONDITION, 0);
330 HTTP_CURL_OPT(TIMEVALUE, 0);
331 HTTP_CURL_OPT(TIMEOUT, 0);
332 HTTP_CURL_OPT(CONNECTTIMEOUT, 3);
333 HTTP_CURL_OPT(SSLCERT, NULL);
334 HTTP_CURL_OPT(SSLCERTTYPE, NULL);
335 HTTP_CURL_OPT(SSLCERTPASSWD, NULL);
336 HTTP_CURL_OPT(SSLKEY, NULL);
337 HTTP_CURL_OPT(SSLKEYTYPE, NULL);
338 HTTP_CURL_OPT(SSLKEYPASSWD, NULL);
339 HTTP_CURL_OPT(SSLENGINE, NULL);
340 HTTP_CURL_OPT(SSLVERSION, 0);
341 HTTP_CURL_OPT(SSL_VERIFYPEER, 0);
342 HTTP_CURL_OPT(SSL_VERIFYHOST, 0);
343 HTTP_CURL_OPT(SSL_CIPHER_LIST, NULL);
344 HTTP_CURL_OPT(CAINFO, NULL);
345 HTTP_CURL_OPT(CAPATH, NULL);
346 HTTP_CURL_OPT(RANDOM_FILE, NULL);
347 HTTP_CURL_OPT(EGDSOCKET, NULL);
348 HTTP_CURL_OPT(POSTFIELDS, NULL);
349 HTTP_CURL_OPT(POSTFIELDSIZE, 0);
350 HTTP_CURL_OPT(HTTPPOST, NULL);
351 HTTP_CURL_OPT(IOCTLDATA, NULL);
352 HTTP_CURL_OPT(READDATA, NULL);
353 HTTP_CURL_OPT(INFILESIZE, 0);
354 #if 0
355 HTTP_CURL_OPT(IGNORE_CONTENT_ENCODING, 1);
356 #endif
357 }
358 }
359 /* }}} */
360
361 PHP_HTTP_API void _http_request_set_progress_callback(http_request *request, zval *cb)
362 {
363 TSRMLS_FETCH_FROM_CTX(request->tsrm_ls);
364
365 if (request->_progress_callback) {
366 zval_ptr_dtor(&request->_progress_callback);
367 }
368 if (cb) {
369 ZVAL_ADDREF(cb);
370 }
371 request->_progress_callback = cb;
372 }
373
374 /* {{{ STATUS http_request_prepare(http_request *, HashTable *) */
375 PHP_HTTP_API STATUS _http_request_prepare(http_request *request, HashTable *options)
376 {
377 zval *zoption;
378 zend_bool range_req = 0;
379
380 TSRMLS_FETCH_FROM_CTX(request->tsrm_ls);
381
382 HTTP_CHECK_CURL_INIT(request->ch, curl_easy_init(), return FAILURE);
383
384 http_request_defaults(request);
385
386 /* set options */
387 HTTP_CURL_OPT(DEBUGDATA, request);
388 HTTP_CURL_OPT(URL, request->url);
389
390 /* progress callback */
391 if ((zoption = http_request_option(request, options, "onprogress", 0))) {
392 HTTP_CURL_OPT(NOPROGRESS, 0);
393 HTTP_CURL_OPT(PROGRESSDATA, request);
394 HTTP_CURL_OPT(PROGRESSFUNCTION, http_curl_progress_callback);
395 http_request_set_progress_callback(request, zoption);
396 }
397
398 /* proxy */
399 if ((zoption = http_request_option(request, options, "proxyhost", IS_STRING))) {
400 HTTP_CURL_OPT(PROXY, Z_STRVAL_P(zoption));
401 /* port */
402 if ((zoption = http_request_option(request, options, "proxyport", IS_LONG))) {
403 HTTP_CURL_OPT(PROXYPORT, Z_LVAL_P(zoption));
404 }
405 /* user:pass */
406 if ((zoption = http_request_option(request, options, "proxyauth", IS_STRING))) {
407 HTTP_CURL_OPT(PROXYUSERPWD, Z_STRVAL_P(zoption));
408 }
409 /* auth method */
410 if ((zoption = http_request_option(request, options, "proxyauthtype", IS_LONG))) {
411 HTTP_CURL_OPT(PROXYAUTH, Z_LVAL_P(zoption));
412 }
413 }
414
415 /* outgoing interface */
416 if ((zoption = http_request_option(request, options, "interface", IS_STRING))) {
417 HTTP_CURL_OPT(INTERFACE, Z_STRVAL_P(zoption));
418 }
419
420 /* another port */
421 if ((zoption = http_request_option(request, options, "port", IS_LONG))) {
422 HTTP_CURL_OPT(PORT, Z_LVAL_P(zoption));
423 }
424
425 /* auth */
426 if ((zoption = http_request_option(request, options, "httpauth", IS_STRING))) {
427 HTTP_CURL_OPT(USERPWD, Z_STRVAL_P(zoption));
428 }
429 if ((zoption = http_request_option(request, options, "httpauthtype", IS_LONG))) {
430 HTTP_CURL_OPT(HTTPAUTH, Z_LVAL_P(zoption));
431 }
432
433 /* compress, empty string enables all supported if libcurl was build with zlib support */
434 if ((zoption = http_request_option(request, options, "compress", IS_BOOL)) && Z_LVAL_P(zoption)) {
435 #ifdef HTTP_HAVE_CURL_ZLIB
436 HTTP_CURL_OPT(ENCODING, "gzip, deflate");
437 #else
438 HTTP_CURL_OPT(ENCODING, "gzip;q=1.0, deflate;q=0.5, *;q=0.1");
439 #endif
440 }
441
442 /* redirects, defaults to 0 */
443 if ((zoption = http_request_option(request, options, "redirect", IS_LONG))) {
444 HTTP_CURL_OPT(FOLLOWLOCATION, Z_LVAL_P(zoption) ? 1 : 0);
445 HTTP_CURL_OPT(MAXREDIRS, Z_LVAL_P(zoption));
446 if ((zoption = http_request_option(request, options, "unrestrictedauth", IS_BOOL))) {
447 HTTP_CURL_OPT(UNRESTRICTED_AUTH, Z_LVAL_P(zoption));
448 }
449 }
450
451 /* referer */
452 if ((zoption = http_request_option(request, options, "referer", IS_STRING))) {
453 HTTP_CURL_OPT(REFERER, Z_STRVAL_P(zoption));
454 }
455
456 /* useragent, default "PECL::HTTP/version (PHP/version)" */
457 if ((zoption = http_request_option(request, options, "useragent", IS_STRING))) {
458 HTTP_CURL_OPT(USERAGENT, Z_STRVAL_P(zoption));
459 }
460
461 /* additional headers, array('name' => 'value') */
462 if ((zoption = http_request_option(request, options, "headers", IS_ARRAY))) {
463 char *header_key;
464 ulong header_idx;
465 HashPosition pos;
466
467 if (request->_cache.headers) {
468 curl_slist_free_all(request->_cache.headers);
469 request->_cache.headers = NULL;
470 }
471
472 FOREACH_KEY(pos, zoption, header_key, header_idx) {
473 if (header_key) {
474 zval **header_val;
475 if (SUCCESS == zend_hash_get_current_data_ex(Z_ARRVAL_P(zoption), (void **) &header_val, &pos)) {
476 char header[1024] = {0};
477 zval *cpy, *val = convert_to_type_ex(IS_STRING, *header_val, &cpy);
478
479 snprintf(header, 1023, "%s: %s", header_key, Z_STRVAL_P(val));
480 request->_cache.headers = curl_slist_append(request->_cache.headers, header);
481
482 if (cpy) {
483 zval_ptr_dtor(&cpy);
484 }
485 }
486
487 /* reset */
488 header_key = NULL;
489 }
490 }
491 }
492
493 /* cookies, array('name' => 'value') */
494 if ((zoption = http_request_option(request, options, "cookies", IS_ARRAY))) {
495 char *cookie_key = NULL;
496 ulong cookie_idx = 0;
497 HashPosition pos;
498
499 phpstr_dtor(&request->_cache.cookies);
500
501 FOREACH_KEY(pos, zoption, cookie_key, cookie_idx) {
502 if (cookie_key) {
503 zval **cookie_val;
504 if (SUCCESS == zend_hash_get_current_data_ex(Z_ARRVAL_P(zoption), (void **) &cookie_val, &pos)) {
505 zval *cpy, *val = convert_to_type_ex(IS_STRING, *cookie_val, &cpy);
506
507 phpstr_appendf(&request->_cache.cookies, "%s=%s; ", cookie_key, Z_STRVAL_P(val));
508
509 if (cpy) {
510 zval_ptr_dtor(&cpy);
511 }
512 }
513
514 /* reset */
515 cookie_key = NULL;
516 }
517 }
518
519 if (request->_cache.cookies.used) {
520 phpstr_fix(&request->_cache.cookies);
521 HTTP_CURL_OPT(COOKIE, request->_cache.cookies.data);
522 }
523 }
524
525 /* session cookies */
526 if ((zoption = http_request_option(request, options, "cookiesession", IS_BOOL))) {
527 if (Z_LVAL_P(zoption)) {
528 /* accept cookies for this session */
529 HTTP_CURL_OPT(COOKIEFILE, "");
530 } else {
531 /* reset session cookies */
532 HTTP_CURL_OPT(COOKIESESSION, 1);
533 }
534 }
535
536 /* cookiestore, read initial cookies from that file and store cookies back into that file */
537 if ((zoption = http_request_option(request, options, "cookiestore", IS_STRING)) && Z_STRLEN_P(zoption)) {
538 HTTP_CURL_OPT(COOKIEFILE, Z_STRVAL_P(zoption));
539 HTTP_CURL_OPT(COOKIEJAR, Z_STRVAL_P(zoption));
540 }
541
542 /* resume */
543 if ((zoption = http_request_option(request, options, "resume", IS_LONG)) && (Z_LVAL_P(zoption) != 0)) {
544 range_req = 1;
545 HTTP_CURL_OPT(RESUME_FROM, Z_LVAL_P(zoption));
546 }
547
548 /* maxfilesize */
549 if ((zoption = http_request_option(request, options, "maxfilesize", IS_LONG))) {
550 HTTP_CURL_OPT(MAXFILESIZE, Z_LVAL_P(zoption));
551 }
552
553 /* lastmodified */
554 if ((zoption = http_request_option(request, options, "lastmodified", IS_LONG))) {
555 if (Z_LVAL_P(zoption)) {
556 if (Z_LVAL_P(zoption) > 0) {
557 HTTP_CURL_OPT(TIMEVALUE, Z_LVAL_P(zoption));
558 } else {
559 HTTP_CURL_OPT(TIMEVALUE, time(NULL) + Z_LVAL_P(zoption));
560 }
561 HTTP_CURL_OPT(TIMECONDITION, range_req ? CURL_TIMECOND_IFUNMODSINCE : CURL_TIMECOND_IFMODSINCE);
562 } else {
563 HTTP_CURL_OPT(TIMECONDITION, CURL_TIMECOND_NONE);
564 }
565 }
566
567 /* timeout, defaults to 0 */
568 if ((zoption = http_request_option(request, options, "timeout", IS_LONG))) {
569 HTTP_CURL_OPT(TIMEOUT, Z_LVAL_P(zoption));
570 }
571
572 /* connecttimeout, defaults to 3 */
573 if ((zoption = http_request_option(request, options, "connecttimeout", IS_LONG))) {
574 HTTP_CURL_OPT(CONNECTTIMEOUT, Z_LVAL_P(zoption));
575 }
576
577 /* ssl */
578 if ((zoption = http_request_option(request, options, "ssl", IS_ARRAY))) {
579 ulong idx;
580 char *key = NULL;
581 zval **param;
582 HashPosition pos;
583
584 FOREACH_KEYVAL(pos, zoption, key, idx, param) {
585 if (key) {
586 HTTP_CURL_OPT_SSL_STRING(CERT);
587 HTTP_CURL_OPT_SSL_STRING(CERTTYPE);
588 HTTP_CURL_OPT_SSL_STRING(CERTPASSWD);
589
590 HTTP_CURL_OPT_SSL_STRING(KEY);
591 HTTP_CURL_OPT_SSL_STRING(KEYTYPE);
592 HTTP_CURL_OPT_SSL_STRING(KEYPASSWD);
593
594 HTTP_CURL_OPT_SSL_STRING(ENGINE);
595 HTTP_CURL_OPT_SSL_LONG(VERSION);
596
597 HTTP_CURL_OPT_SSL_LONG_(VERIFYPEER);
598 HTTP_CURL_OPT_SSL_LONG_(VERIFYHOST);
599 HTTP_CURL_OPT_SSL_STRING_(CIPHER_LIST);
600
601 HTTP_CURL_OPT_STRING(CAINFO);
602 HTTP_CURL_OPT_STRING(CAPATH);
603 HTTP_CURL_OPT_STRING(RANDOM_FILE);
604 HTTP_CURL_OPT_STRING(EGDSOCKET);
605
606 /* reset key */
607 key = NULL;
608 }
609 }
610 }
611
612 /* request method */
613 switch (request->meth)
614 {
615 case HTTP_GET:
616 curl_easy_setopt(request->ch, CURLOPT_HTTPGET, 1);
617 break;
618
619 case HTTP_HEAD:
620 curl_easy_setopt(request->ch, CURLOPT_NOBODY, 1);
621 break;
622
623 case HTTP_POST:
624 curl_easy_setopt(request->ch, CURLOPT_POST, 1);
625 break;
626
627 case HTTP_PUT:
628 curl_easy_setopt(request->ch, CURLOPT_UPLOAD, 1);
629 break;
630
631 default:
632 if (http_request_method_exists(0, request->meth, NULL)) {
633 curl_easy_setopt(request->ch, CURLOPT_CUSTOMREQUEST, http_request_method_name(request->meth));
634 } else {
635 http_error_ex(HE_WARNING, HTTP_E_REQUEST_METHOD, "Unsupported request method: %d (%s)", request->meth, request->url);
636 return FAILURE;
637 }
638 break;
639 }
640
641 /* attach request body */
642 if (request->body && (request->meth != HTTP_GET) && (request->meth != HTTP_HEAD)) {
643 switch (request->body->type)
644 {
645 case HTTP_REQUEST_BODY_CSTRING:
646 curl_easy_setopt(request->ch, CURLOPT_POSTFIELDS, request->body->data);
647 curl_easy_setopt(request->ch, CURLOPT_POSTFIELDSIZE, request->body->size);
648 break;
649
650 case HTTP_REQUEST_BODY_CURLPOST:
651 curl_easy_setopt(request->ch, CURLOPT_HTTPPOST, (struct curl_httppost *) request->body->data);
652 break;
653
654 case HTTP_REQUEST_BODY_UPLOADFILE:
655 curl_easy_setopt(request->ch, CURLOPT_IOCTLDATA, request);
656 curl_easy_setopt(request->ch, CURLOPT_READDATA, request);
657 curl_easy_setopt(request->ch, CURLOPT_INFILESIZE, request->body->size);
658 break;
659
660 default:
661 /* shouldn't ever happen */
662 http_error_ex(HE_ERROR, 0, "Unknown request body type: %d (%s)", request->body->type, request->url);
663 return FAILURE;
664 break;
665 }
666 }
667
668 return SUCCESS;
669 }
670 /* }}} */
671
672 /* {{{ void http_request_exec(http_request *) */
673 PHP_HTTP_API void _http_request_exec(http_request *request)
674 {
675 CURLcode result;
676 TSRMLS_FETCH_FROM_CTX(request->tsrm_ls);
677
678 if (CURLE_OK != (result = curl_easy_perform(request->ch))) {
679 http_error_ex(HE_WARNING, HTTP_E_REQUEST, "%s; %s (%s)", curl_easy_strerror(result), request->_error, request->url);
680 }
681 }
682 /* }}} */
683
684 /* {{{ void http_request_info(http_request *, HashTable *) */
685 PHP_HTTP_API void _http_request_info(http_request *request, HashTable *info)
686 {
687 zval array;
688 INIT_ZARR(array, info);
689
690 HTTP_CURL_INFO(EFFECTIVE_URL);
691 HTTP_CURL_INFO(RESPONSE_CODE);
692 HTTP_CURL_INFO_EX(HTTP_CONNECTCODE, connect_code);
693 HTTP_CURL_INFO(FILETIME);
694 HTTP_CURL_INFO(TOTAL_TIME);
695 HTTP_CURL_INFO(NAMELOOKUP_TIME);
696 HTTP_CURL_INFO(CONNECT_TIME);
697 HTTP_CURL_INFO(PRETRANSFER_TIME);
698 HTTP_CURL_INFO(STARTTRANSFER_TIME);
699 HTTP_CURL_INFO(REDIRECT_TIME);
700 HTTP_CURL_INFO(REDIRECT_COUNT);
701 HTTP_CURL_INFO(SIZE_UPLOAD);
702 HTTP_CURL_INFO(SIZE_DOWNLOAD);
703 HTTP_CURL_INFO(SPEED_DOWNLOAD);
704 HTTP_CURL_INFO(SPEED_UPLOAD);
705 HTTP_CURL_INFO(HEADER_SIZE);
706 HTTP_CURL_INFO(REQUEST_SIZE);
707 HTTP_CURL_INFO(SSL_VERIFYRESULT);
708 HTTP_CURL_INFO(SSL_ENGINES);
709 HTTP_CURL_INFO(CONTENT_LENGTH_DOWNLOAD);
710 HTTP_CURL_INFO(CONTENT_LENGTH_UPLOAD);
711 HTTP_CURL_INFO(CONTENT_TYPE);
712 /*HTTP_CURL_INFO(PRIVATE);*/
713 HTTP_CURL_INFO(HTTPAUTH_AVAIL);
714 HTTP_CURL_INFO(PROXYAUTH_AVAIL);
715 /*HTTP_CURL_INFO(OS_ERRNO);*/
716 HTTP_CURL_INFO(NUM_CONNECTS);
717 #if LIBCURL_VERSION_NUM >= 0x070e01
718 HTTP_CURL_INFO_EX(COOKIELIST, cookies);
719 #endif
720 }
721 /* }}} */
722
723 /* {{{ static size_t http_curl_read_callback(void *, size_t, size_t, void *) */
724 static size_t http_curl_read_callback(void *data, size_t len, size_t n, void *ctx)
725 {
726 http_request *request = (http_request *) ctx;
727 TSRMLS_FETCH_FROM_CTX(request->tsrm_ls);
728
729 if (request->body == NULL || request->body->type != HTTP_REQUEST_BODY_UPLOADFILE) {
730 return 0;
731 }
732 return php_stream_read((php_stream *) request->body->data, data, len * n);
733 }
734 /* }}} */
735
736 /* {{{ static int http_curl_progress_callback(void *, double, double, double, double) */
737 static int http_curl_progress_callback(void *ctx, double dltotal, double dlnow, double ultotal, double ulnow)
738 {
739 int rc;
740 zval *params_pass[4], params_local[4], retval;
741 http_request *request = (http_request *) ctx;
742 TSRMLS_FETCH_FROM_CTX(request->tsrm_ls);
743
744 params_pass[0] = &params_local[0];
745 params_pass[1] = &params_local[1];
746 params_pass[2] = &params_local[2];
747 params_pass[3] = &params_local[3];
748
749 INIT_PZVAL(params_pass[0]);
750 INIT_PZVAL(params_pass[1]);
751 INIT_PZVAL(params_pass[2]);
752 INIT_PZVAL(params_pass[3]);
753 ZVAL_DOUBLE(params_pass[0], dltotal);
754 ZVAL_DOUBLE(params_pass[1], dlnow);
755 ZVAL_DOUBLE(params_pass[2], ultotal);
756 ZVAL_DOUBLE(params_pass[3], ulnow);
757
758 INIT_PZVAL(&retval);
759 ZVAL_NULL(&retval);
760 rc = call_user_function(EG(function_table), NULL, request->_progress_callback, &retval, 4, params_pass TSRMLS_CC);
761 zval_dtor(&retval);
762 return rc;
763 }
764 /* }}} */
765
766 /* {{{ static curlioerr http_curl_ioctl_callback(CURL *, curliocmd, void *) */
767 static curlioerr http_curl_ioctl_callback(CURL *ch, curliocmd cmd, void *ctx)
768 {
769 http_request *request = (http_request *) ctx;
770 TSRMLS_FETCH_FROM_CTX(request->tsrm_ls);
771
772 if (cmd != CURLIOCMD_RESTARTREAD) {
773 return CURLIOE_UNKNOWNCMD;
774 }
775 if ( request->body == NULL ||
776 request->body->type != HTTP_REQUEST_BODY_UPLOADFILE ||
777 SUCCESS != php_stream_rewind((php_stream *) request->body->data)) {
778 return CURLIOE_FAILRESTART;
779 }
780 return CURLIOE_OK;
781 }
782 /* }}} */
783
784 /* {{{ static int http_curl_raw_callback(CURL *, curl_infotype, char *, size_t, void *) */
785 static int http_curl_raw_callback(CURL *ch, curl_infotype type, char *data, size_t length, void *ctx)
786 {
787 http_request *request = (http_request *) ctx;
788
789 switch (type)
790 {
791 case CURLINFO_DATA_IN:
792 if (request->conv.last_type == CURLINFO_HEADER_IN) {
793 phpstr_appends(&request->conv.response, HTTP_CRLF);
794 }
795 case CURLINFO_HEADER_IN:
796 phpstr_append(&request->conv.response, data, length);
797 break;
798 case CURLINFO_DATA_OUT:
799 if (request->conv.last_type == CURLINFO_HEADER_OUT) {
800 phpstr_appends(&request->conv.request, HTTP_CRLF);
801 }
802 case CURLINFO_HEADER_OUT:
803 phpstr_append(&request->conv.request, data, length);
804 break;
805 default:
806 #if 0
807 fprintf(stderr, "## ", type);
808 if (!type) {
809 fprintf(stderr, "%s", data);
810 } else {
811 ulong i;
812 for (i = 1; i <= length; ++i) {
813 fprintf(stderr, "%02X ", data[i-1] & 0xFF);
814 if (!(i % 20)) {
815 fprintf(stderr, "\n## ");
816 }
817 }
818 fprintf(stderr, "\n");
819 }
820 if (data[length-1] != 0xa) {
821 fprintf(stderr, "\n");
822 }
823 #endif
824 break;
825 }
826
827 if (type) {
828 request->conv.last_type = type;
829 }
830 return 0;
831 }
832 /* }}} */
833
834 /* {{{ static inline zval *http_request_option(http_request *, HashTable *, char *, size_t, int) */
835 static inline zval *_http_request_option_ex(http_request *r, HashTable *options, char *key, size_t keylen, int type TSRMLS_DC)
836 {
837 zval **zoption;
838 #ifdef ZEND_ENGINE_2
839 ulong h = zend_get_hash_value(key, keylen);
840 #endif
841
842 if (!options ||
843 #ifdef ZEND_ENGINE_2
844 (SUCCESS != zend_hash_quick_find(options, key, keylen, h, (void **) &zoption))
845 #else
846 (SUCCESS != zend_hash_find(options, key, keylen, (void **) &zoption))
847 #endif
848 ) {
849 return NULL;
850 }
851
852 if (Z_TYPE_PP(zoption) != type) {
853 switch (type)
854 {
855 case IS_BOOL: convert_to_boolean_ex(zoption); break;
856 case IS_LONG: convert_to_long_ex(zoption); break;
857 case IS_DOUBLE: convert_to_double_ex(zoption); break;
858 case IS_STRING: convert_to_string_ex(zoption); break;
859 case IS_ARRAY: convert_to_array_ex(zoption); break;
860 case IS_OBJECT: convert_to_object_ex(zoption); break;
861 default:
862 break;
863 }
864 }
865
866 ZVAL_ADDREF(*zoption);
867 #ifdef ZEND_ENGINE_2
868 _zend_hash_quick_add_or_update(&r->_cache.options, key, keylen, h, zoption, sizeof(zval *), NULL,
869 zend_hash_quick_exists(&r->_cache.options, key, keylen, h)?HASH_UPDATE:HASH_ADD ZEND_FILE_LINE_CC);
870 #else
871 zend_hash_add_or_update(&r->_cache.options, key, keylen, zoption, sizeof(zval *), NULL,
872 zend_hash_exists(&r->_cache.options, key, keylen)?HASH_UPDATE:HASH_ADD);
873 #endif
874
875 return *zoption;
876 }
877 /* }}} */
878
879 #ifdef HTTP_NEED_OPENSSL_TSL
880 /* {{{ */
881 static MUTEX_T *http_openssl_tsl = NULL;
882
883 static void http_ssl_lock(int mode, int n, const char * file, int line)
884 {
885 if (mode & CRYPTO_LOCK) {
886 tsrm_mutex_lock(http_openssl_tsl[n]);
887 } else {
888 tsrm_mutex_unlock(http_openssl_tsl[n]);
889 }
890 }
891
892 static ulong http_ssl_id(void)
893 {
894 return (ulong) tsrm_thread_id();
895 }
896
897 static inline void http_ssl_init(void)
898 {
899 int i, c = CRYPTO_num_locks();
900
901 http_openssl_tsl = malloc(c * sizeof(MUTEX_T));
902
903 for (i = 0; i < c; ++i) {
904 http_openssl_tsl[i] = tsrm_mutex_alloc();
905 }
906
907 CRYPTO_set_id_callback(http_ssl_id);
908 CRYPTO_set_locking_callback(http_ssl_lock);
909 }
910
911 static inline void http_ssl_cleanup(void)
912 {
913 if (http_openssl_tsl) {
914 int i, c = CRYPTO_num_locks();
915
916 CRYPTO_set_id_callback(NULL);
917 CRYPTO_set_locking_callback(NULL);
918
919 for (i = 0; i < c; ++i) {
920 tsrm_mutex_free(http_openssl_tsl[i]);
921 }
922
923 free(http_openssl_tsl);
924 http_openssl_tsl = NULL;
925 }
926 }
927 #endif /* HTTP_NEED_OPENSSL_TSL */
928 /* }}} */
929
930 #ifdef HTTP_NEED_GNUTLS_TSL
931 /* {{{ */
932 static int http_ssl_mutex_create(void **m)
933 {
934 if (*((MUTEX_T *) m) = tsrm_mutex_alloc()) {
935 return SUCCESS;
936 } else {
937 return FAILURE;
938 }
939 }
940
941 static int http_ssl_mutex_destroy(void **m)
942 {
943 tsrm_mutex_free(*((MUTEX_T *) m));
944 return SUCCESS;
945 }
946
947 static int http_ssl_mutex_lock(void **m)
948 {
949 return tsrm_mutex_lock(*((MUTEX_T *) m));
950 }
951
952 static int http_ssl_mutex_unlock(void **m)
953 {
954 return tsrm_mutex_unlock(*((MUTEX_T *) m));
955 }
956
957 static struct gcry_thread_cbs http_gnutls_tsl = {
958 GCRY_THREAD_OPTIONS_USER,
959 NULL,
960 http_ssl_mutex_create,
961 http_ssl_mutex_destroy,
962 http_ssl_mutex_lock,
963 http_ssl_mutex_unlock
964 };
965
966 static inline void http_ssl_init(void)
967 {
968 gcry_control(GCRYCTL_SET_THREAD_CBS, &http_gnutls_tsl);
969 }
970
971 static inline void http_ssl_cleanup(void)
972 {
973 return;
974 }
975 #endif /* HTTP_NEED_GNUTLS_TSL */
976 /* }}} */
977
978 #endif /* HTTP_HAVE_CURL */
979
980 /*
981 * Local variables:
982 * tab-width: 4
983 * c-basic-offset: 4
984 * End:
985 * vim600: noet sw=4 ts=4 fdm=marker
986 * vim<600: noet sw=4 ts=4
987 */
988
Extended HTTP Support