gitattributes
[m6w6/ext-http] / php_http_client_curl.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-2014, Michael Wallner <mike@php.net> |
10 +--------------------------------------------------------------------+
11 */
12
13 #include "php_http_api.h"
14 #include "php_http_client.h"
15
16 #if PHP_HTTP_HAVE_CURL
17
18 #if PHP_HTTP_HAVE_EVENT
19 # if !PHP_HTTP_HAVE_EVENT2 && /* just be really sure */ !(LIBEVENT_VERSION_NUMBER >= 0x02000000)
20 # include <event.h>
21 # define event_base_new event_init
22 # define event_assign(e, b, s, a, cb, d) do {\
23 event_set(e, s, a, cb, d); \
24 event_base_set(b, e); \
25 } while(0)
26 # else
27 # if PHP_HTTP_HAVE_EVENT2
28 # include <event2/event.h>
29 # include <event2/event_struct.h>
30 # else
31 # error "libevent presence is unknown"
32 # endif
33 # endif
34 # ifndef DBG_EVENTS
35 # define DBG_EVENTS 0
36 # endif
37 #endif
38
39 typedef struct php_http_client_curl {
40 CURLM *handle;
41
42 int unfinished; /* int because of curl_multi_perform() */
43
44 #if PHP_HTTP_HAVE_EVENT
45 struct event *timeout;
46 unsigned useevents:1;
47 #endif
48 } php_http_client_curl_t;
49
50 typedef struct php_http_client_curl_handler {
51 CURL *handle;
52 php_resource_factory_t *rf;
53 php_http_client_t *client;
54 php_http_client_progress_state_t progress;
55
56 php_http_client_enqueue_t queue;
57
58 struct {
59 php_http_message_parser_t *parser;
60 php_http_message_t *message;
61 php_http_buffer_t *buffer;
62 } request;
63
64 struct {
65 php_http_message_parser_t *parser;
66 php_http_message_t *message;
67 php_http_buffer_t *buffer;
68 } response;
69
70 struct {
71 HashTable cache;
72
73 struct curl_slist *headers;
74 struct curl_slist *resolve;
75 php_http_buffer_t cookies;
76 php_http_buffer_t ranges;
77
78 long redirects;
79 unsigned range_request:1;
80 unsigned encode_cookies:1;
81
82 struct {
83 uint count;
84 double delay;
85 } retry;
86
87 } options;
88
89 } php_http_client_curl_handler_t;
90
91 typedef struct php_http_curle_storage {
92 char *url;
93 char *cookiestore;
94 char errorbuffer[0x100];
95 } php_http_curle_storage_t;
96
97 static inline php_http_curle_storage_t *php_http_curle_get_storage(CURL *ch) {
98 php_http_curle_storage_t *st = NULL;
99
100 curl_easy_getinfo(ch, CURLINFO_PRIVATE, &st);
101
102 if (!st) {
103 st = pecalloc(1, sizeof(*st), 1);
104 curl_easy_setopt(ch, CURLOPT_PRIVATE, st);
105 curl_easy_setopt(ch, CURLOPT_ERRORBUFFER, st->errorbuffer);
106 }
107
108 return st;
109 }
110
111 static void *php_http_curle_ctor(void *opaque, void *init_arg TSRMLS_DC)
112 {
113 void *ch;
114
115 if ((ch = curl_easy_init())) {
116 php_http_curle_get_storage(ch);
117 return ch;
118 }
119 return NULL;
120 }
121
122 static void *php_http_curle_copy(void *opaque, void *handle TSRMLS_DC)
123 {
124 void *ch;
125
126 if ((ch = curl_easy_duphandle(handle))) {
127 curl_easy_reset(ch);
128 php_http_curle_get_storage(ch);
129 return ch;
130 }
131 return NULL;
132 }
133
134 static void php_http_curle_dtor(void *opaque, void *handle TSRMLS_DC)
135 {
136 php_http_curle_storage_t *st = php_http_curle_get_storage(handle);
137
138 curl_easy_cleanup(handle);
139
140 if (st) {
141 if (st->url) {
142 pefree(st->url, 1);
143 }
144 if (st->cookiestore) {
145 pefree(st->cookiestore, 1);
146 }
147 pefree(st, 1);
148 }
149 }
150
151 static php_resource_factory_ops_t php_http_curle_resource_factory_ops = {
152 php_http_curle_ctor,
153 php_http_curle_copy,
154 php_http_curle_dtor
155 };
156
157 static void *php_http_curlm_ctor(void *opaque, void *init_arg TSRMLS_DC)
158 {
159 return curl_multi_init();
160 }
161
162 static void php_http_curlm_dtor(void *opaque, void *handle TSRMLS_DC)
163 {
164 curl_multi_cleanup(handle);
165 }
166
167 static php_resource_factory_ops_t php_http_curlm_resource_factory_ops = {
168 php_http_curlm_ctor,
169 NULL,
170 php_http_curlm_dtor
171 };
172
173 /* curl callbacks */
174
175 static size_t php_http_curle_read_callback(void *data, size_t len, size_t n, void *ctx)
176 {
177 php_http_message_body_t *body = ctx;
178
179 if (body && body->stream_id) {
180 php_stream *s = php_http_message_body_stream(body);
181
182 if (s) {
183 TSRMLS_FETCH_FROM_CTX(body->ts);
184 return php_stream_read(s, data, len * n);
185 } else abort();
186 }
187 return 0;
188 }
189
190 static int php_http_curle_progress_callback(void *ctx, double dltotal, double dlnow, double ultotal, double ulnow)
191 {
192 php_http_client_curl_handler_t *h = ctx;
193 zend_bool update = 0;
194
195 if (h->progress.dl.total != dltotal
196 || h->progress.dl.now != dlnow
197 || h->progress.ul.total != ultotal
198 || h->progress.ul.now != ulnow
199 ) {
200 update = 1;
201
202 h->progress.dl.total = dltotal;
203 h->progress.dl.now = dlnow;
204 h->progress.ul.total = ultotal;
205 h->progress.ul.now = ulnow;
206 }
207
208 if (update && h->client->callback.progress.func) {
209 h->client->callback.progress.func(h->client->callback.progress.arg, h->client, &h->queue, &h->progress);
210 }
211
212 return 0;
213 }
214
215 static curlioerr php_http_curle_ioctl_callback(CURL *ch, curliocmd cmd, void *ctx)
216 {
217 php_http_message_body_t *body = ctx;
218
219 if (cmd != CURLIOCMD_RESTARTREAD) {
220 return CURLIOE_UNKNOWNCMD;
221 }
222
223 if (body) {
224 TSRMLS_FETCH_FROM_CTX(body->ts);
225
226 if (SUCCESS == php_stream_rewind(php_http_message_body_stream(body))) {
227 return CURLIOE_OK;
228 }
229 }
230
231 return CURLIOE_FAILRESTART;
232 }
233
234 static int php_http_curle_raw_callback(CURL *ch, curl_infotype type, char *data, size_t length, void *ctx)
235 {
236 php_http_client_curl_handler_t *h = ctx;
237 unsigned flags = 0;
238
239 /* catch progress */
240 switch (type) {
241 case CURLINFO_TEXT:
242 if (data[0] == '-') {
243 } else if (php_memnstr(data, ZEND_STRL("Adding handle:"), data + length)) {
244 h->progress.info = "setup";
245 } else if (php_memnstr(data, ZEND_STRL("addHandle"), data + length)) {
246 h->progress.info = "setup";
247 } else if (php_memnstr(data, ZEND_STRL("About to connect"), data + length)) {
248 h->progress.info = "resolve";
249 } else if (php_memnstr(data, ZEND_STRL("Trying"), data + length)) {
250 h->progress.info = "connect";
251 } else if (php_memnstr(data, ZEND_STRL("Found bundle for host"), data + length)) {
252 h->progress.info = "connect";
253 } else if (php_memnstr(data, ZEND_STRL("Connected"), data + length)) {
254 h->progress.info = "connected";
255 } else if (php_memnstr(data, ZEND_STRL("Re-using existing connection!"), data + length)) {
256 h->progress.info = "connected";
257 } else if (php_memnstr(data, ZEND_STRL("blacklisted"), data + length)) {
258 h->progress.info = "blacklist check";
259 } else if (php_memnstr(data, ZEND_STRL("SSL"), data + length)) {
260 h->progress.info = "ssl negotiation";
261 } else if (php_memnstr(data, ZEND_STRL("left intact"), data + length)) {
262 h->progress.info = "not disconnected";
263 } else if (php_memnstr(data, ZEND_STRL("closed"), data + length)) {
264 h->progress.info = "disconnected";
265 } else if (php_memnstr(data, ZEND_STRL("Issue another request"), data + length)) {
266 h->progress.info = "redirect";
267 } else if (php_memnstr(data, ZEND_STRL("Operation timed out"), data + length)) {
268 h->progress.info = "timeout";
269 } else {
270 #if PHP_DEBUG
271 h->progress.info = data;
272 #endif
273 }
274 if (h->client->callback.progress.func) {
275 h->client->callback.progress.func(h->client->callback.progress.arg, h->client, &h->queue, &h->progress);
276 }
277 break;
278 case CURLINFO_HEADER_OUT:
279 case CURLINFO_DATA_OUT:
280 case CURLINFO_SSL_DATA_OUT:
281 h->progress.info = "send";
282 break;
283 case CURLINFO_HEADER_IN:
284 case CURLINFO_DATA_IN:
285 case CURLINFO_SSL_DATA_IN:
286 h->progress.info = "receive";
287 break;
288 default:
289 break;
290 }
291 /* process data */
292 switch (type) {
293 case CURLINFO_HEADER_IN:
294 case CURLINFO_DATA_IN:
295 php_http_buffer_append(h->response.buffer, data, length);
296
297 if (h->options.redirects) {
298 flags |= PHP_HTTP_MESSAGE_PARSER_EMPTY_REDIRECTS;
299 }
300
301 if (PHP_HTTP_MESSAGE_PARSER_STATE_FAILURE == php_http_message_parser_parse(h->response.parser, h->response.buffer, flags, &h->response.message)) {
302 return -1;
303 }
304 break;
305
306 case CURLINFO_HEADER_OUT:
307 case CURLINFO_DATA_OUT:
308 php_http_buffer_append(h->request.buffer, data, length);
309
310 if (PHP_HTTP_MESSAGE_PARSER_STATE_FAILURE == php_http_message_parser_parse(h->request.parser, h->request.buffer, flags, &h->request.message)) {
311 return -1;
312 }
313 break;
314 default:
315 break;
316 }
317
318 #if 0
319 /* debug */
320 _dpf(type, data, length);
321 #endif
322
323 return 0;
324 }
325
326 static int php_http_curle_dummy_callback(char *data, size_t n, size_t l, void *s)
327 {
328 return n*l;
329 }
330
331 static STATUS php_http_curle_get_info(CURL *ch, HashTable *info)
332 {
333 char *c;
334 long l;
335 double d;
336 struct curl_slist *s, *p;
337 zval *subarray, array;
338 INIT_PZVAL_ARRAY(&array, info);
339
340 /* BEGIN::CURLINFO */
341 if (CURLE_OK == curl_easy_getinfo(ch, CURLINFO_EFFECTIVE_URL, &c)) {
342 add_assoc_string_ex(&array, "effective_url", sizeof("effective_url"), c ? c : "", 1);
343 }
344 if (CURLE_OK == curl_easy_getinfo(ch, CURLINFO_RESPONSE_CODE, &l)) {
345 add_assoc_long_ex(&array, "response_code", sizeof("response_code"), l);
346 }
347 if (CURLE_OK == curl_easy_getinfo(ch, CURLINFO_TOTAL_TIME, &d)) {
348 add_assoc_double_ex(&array, "total_time", sizeof("total_time"), d);
349 }
350 if (CURLE_OK == curl_easy_getinfo(ch, CURLINFO_NAMELOOKUP_TIME, &d)) {
351 add_assoc_double_ex(&array, "namelookup_time", sizeof("namelookup_time"), d);
352 }
353 if (CURLE_OK == curl_easy_getinfo(ch, CURLINFO_CONNECT_TIME, &d)) {
354 add_assoc_double_ex(&array, "connect_time", sizeof("connect_time"), d);
355 }
356 if (CURLE_OK == curl_easy_getinfo(ch, CURLINFO_PRETRANSFER_TIME, &d)) {
357 add_assoc_double_ex(&array, "pretransfer_time", sizeof("pretransfer_time"), d);
358 }
359 if (CURLE_OK == curl_easy_getinfo(ch, CURLINFO_SIZE_UPLOAD, &d)) {
360 add_assoc_double_ex(&array, "size_upload", sizeof("size_upload"), d);
361 }
362 if (CURLE_OK == curl_easy_getinfo(ch, CURLINFO_SIZE_DOWNLOAD, &d)) {
363 add_assoc_double_ex(&array, "size_download", sizeof("size_download"), d);
364 }
365 if (CURLE_OK == curl_easy_getinfo(ch, CURLINFO_SPEED_DOWNLOAD, &d)) {
366 add_assoc_double_ex(&array, "speed_download", sizeof("speed_download"), d);
367 }
368 if (CURLE_OK == curl_easy_getinfo(ch, CURLINFO_SPEED_UPLOAD, &d)) {
369 add_assoc_double_ex(&array, "speed_upload", sizeof("speed_upload"), d);
370 }
371 if (CURLE_OK == curl_easy_getinfo(ch, CURLINFO_HEADER_SIZE, &l)) {
372 add_assoc_long_ex(&array, "header_size", sizeof("header_size"), l);
373 }
374 if (CURLE_OK == curl_easy_getinfo(ch, CURLINFO_REQUEST_SIZE, &l)) {
375 add_assoc_long_ex(&array, "request_size", sizeof("request_size"), l);
376 }
377 if (CURLE_OK == curl_easy_getinfo(ch, CURLINFO_SSL_VERIFYRESULT, &l)) {
378 add_assoc_long_ex(&array, "ssl_verifyresult", sizeof("ssl_verifyresult"), l);
379 }
380 if (CURLE_OK == curl_easy_getinfo(ch, CURLINFO_FILETIME, &l)) {
381 add_assoc_long_ex(&array, "filetime", sizeof("filetime"), l);
382 }
383 if (CURLE_OK == curl_easy_getinfo(ch, CURLINFO_CONTENT_LENGTH_DOWNLOAD, &d)) {
384 add_assoc_double_ex(&array, "content_length_download", sizeof("content_length_download"), d);
385 }
386 if (CURLE_OK == curl_easy_getinfo(ch, CURLINFO_CONTENT_LENGTH_UPLOAD, &d)) {
387 add_assoc_double_ex(&array, "content_length_upload", sizeof("content_length_upload"), d);
388 }
389 if (CURLE_OK == curl_easy_getinfo(ch, CURLINFO_STARTTRANSFER_TIME, &d)) {
390 add_assoc_double_ex(&array, "starttransfer_time", sizeof("starttransfer_time"), d);
391 }
392 if (CURLE_OK == curl_easy_getinfo(ch, CURLINFO_CONTENT_TYPE, &c)) {
393 add_assoc_string_ex(&array, "content_type", sizeof("content_type"), c ? c : "", 1);
394 }
395 if (CURLE_OK == curl_easy_getinfo(ch, CURLINFO_REDIRECT_TIME, &d)) {
396 add_assoc_double_ex(&array, "redirect_time", sizeof("redirect_time"), d);
397 }
398 if (CURLE_OK == curl_easy_getinfo(ch, CURLINFO_REDIRECT_COUNT, &l)) {
399 add_assoc_long_ex(&array, "redirect_count", sizeof("redirect_count"), l);
400 }
401 if (CURLE_OK == curl_easy_getinfo(ch, CURLINFO_HTTP_CONNECTCODE, &l)) {
402 add_assoc_long_ex(&array, "connect_code", sizeof("connect_code"), l);
403 }
404 if (CURLE_OK == curl_easy_getinfo(ch, CURLINFO_HTTPAUTH_AVAIL, &l)) {
405 add_assoc_long_ex(&array, "httpauth_avail", sizeof("httpauth_avail"), l);
406 }
407 if (CURLE_OK == curl_easy_getinfo(ch, CURLINFO_PROXYAUTH_AVAIL, &l)) {
408 add_assoc_long_ex(&array, "proxyauth_avail", sizeof("proxyauth_avail"), l);
409 }
410 if (CURLE_OK == curl_easy_getinfo(ch, CURLINFO_OS_ERRNO, &l)) {
411 add_assoc_long_ex(&array, "os_errno", sizeof("os_errno"), l);
412 }
413 if (CURLE_OK == curl_easy_getinfo(ch, CURLINFO_NUM_CONNECTS, &l)) {
414 add_assoc_long_ex(&array, "num_connects", sizeof("num_connects"), l);
415 }
416 if (CURLE_OK == curl_easy_getinfo(ch, CURLINFO_SSL_ENGINES, &s)) {
417 MAKE_STD_ZVAL(subarray);
418 array_init(subarray);
419 for (p = s; p; p = p->next) {
420 if (p->data) {
421 add_next_index_string(subarray, p->data, 1);
422 }
423 }
424 add_assoc_zval_ex(&array, "ssl_engines", sizeof("ssl_engines"), subarray);
425 curl_slist_free_all(s);
426 }
427 if (CURLE_OK == curl_easy_getinfo(ch, CURLINFO_COOKIELIST, &s)) {
428 MAKE_STD_ZVAL(subarray);
429 array_init(subarray);
430 for (p = s; p; p = p->next) {
431 if (p->data) {
432 add_next_index_string(subarray, p->data, 1);
433 }
434 }
435 add_assoc_zval_ex(&array, "cookies", sizeof("cookies"), subarray);
436 curl_slist_free_all(s);
437 }
438 if (CURLE_OK == curl_easy_getinfo(ch, CURLINFO_REDIRECT_URL, &c)) {
439 add_assoc_string_ex(&array, "redirect_url", sizeof("redirect_url"), c ? c : "", 1);
440 }
441 #if PHP_HTTP_CURL_VERSION(7,19,0)
442 if (CURLE_OK == curl_easy_getinfo(ch, CURLINFO_PRIMARY_IP, &c)) {
443 add_assoc_string_ex(&array, "primary_ip", sizeof("primary_ip"), c ? c : "", 1);
444 }
445 #endif
446 #if PHP_HTTP_CURL_VERSION(7,19,0)
447 if (CURLE_OK == curl_easy_getinfo(ch, CURLINFO_APPCONNECT_TIME, &d)) {
448 add_assoc_double_ex(&array, "appconnect_time", sizeof("appconnect_time"), d);
449 }
450 #endif
451 #if PHP_HTTP_CURL_VERSION(7,19,4)
452 if (CURLE_OK == curl_easy_getinfo(ch, CURLINFO_CONDITION_UNMET, &l)) {
453 add_assoc_long_ex(&array, "condition_unmet", sizeof("condition_unmet"), l);
454 }
455 #endif
456 #if PHP_HTTP_CURL_VERSION(7,21,0)
457 if (CURLE_OK == curl_easy_getinfo(ch, CURLINFO_PRIMARY_PORT, &l)) {
458 add_assoc_long_ex(&array, "primary_port", sizeof("primary_port"), l);
459 }
460 #endif
461 #if PHP_HTTP_CURL_VERSION(7,21,0)
462 if (CURLE_OK == curl_easy_getinfo(ch, CURLINFO_LOCAL_IP, &c)) {
463 add_assoc_string_ex(&array, "local_ip", sizeof("local_ip"), c ? c : "", 1);
464 }
465 #endif
466 #if PHP_HTTP_CURL_VERSION(7,21,0)
467 if (CURLE_OK == curl_easy_getinfo(ch, CURLINFO_LOCAL_PORT, &l)) {
468 add_assoc_long_ex(&array, "local_port", sizeof("local_port"), l);
469 }
470 #endif
471
472 /* END::CURLINFO */
473
474 #if PHP_HTTP_CURL_VERSION(7,19,1) && defined(PHP_HTTP_HAVE_OPENSSL)
475 {
476 int i;
477 zval *ci_array;
478 struct curl_certinfo *ci;
479 char *colon, *keyname;
480
481 if (CURLE_OK == curl_easy_getinfo(ch, CURLINFO_CERTINFO, &ci)) {
482 MAKE_STD_ZVAL(ci_array);
483 array_init(ci_array);
484
485 for (i = 0; i < ci->num_of_certs; ++i) {
486 s = ci->certinfo[i];
487
488 MAKE_STD_ZVAL(subarray);
489 array_init(subarray);
490 for (p = s; p; p = p->next) {
491 if (p->data) {
492 if ((colon = strchr(p->data, ':'))) {
493 keyname = estrndup(p->data, colon - p->data);
494 add_assoc_string_ex(subarray, keyname, colon - p->data + 1, colon + 1, 1);
495 efree(keyname);
496 } else {
497 add_next_index_string(subarray, p->data, 1);
498 }
499 }
500 }
501 add_next_index_zval(ci_array, subarray);
502 }
503 add_assoc_zval_ex(&array, "certinfo", sizeof("certinfo"), ci_array);
504 }
505 }
506 #endif
507 add_assoc_string_ex(&array, "error", sizeof("error"), php_http_curle_get_storage(ch)->errorbuffer, 1);
508
509 return SUCCESS;
510 }
511
512 static int compare_queue(php_http_client_enqueue_t *e, void *handle)
513 {
514 return handle == ((php_http_client_curl_handler_t *) e->opaque)->handle;
515 }
516
517 static void php_http_curlm_responsehandler(php_http_client_t *context)
518 {
519 int remaining = 0;
520 php_http_client_enqueue_t *enqueue;
521 php_http_client_curl_t *curl = context->ctx;
522 TSRMLS_FETCH_FROM_CTX(context->ts);
523
524 do {
525 CURLMsg *msg = curl_multi_info_read(curl->handle, &remaining);
526
527 if (msg && CURLMSG_DONE == msg->msg) {
528 if (CURLE_OK != msg->data.result) {
529 php_http_curle_storage_t *st = php_http_curle_get_storage(msg->easy_handle);
530 php_error_docref(NULL TSRMLS_CC, E_WARNING, "%s; %s (%s)", curl_easy_strerror(msg->data.result), STR_PTR(st->errorbuffer), STR_PTR(st->url));
531 }
532
533 if ((enqueue = php_http_client_enqueued(context, msg->easy_handle, compare_queue))) {
534 php_http_client_curl_handler_t *handler = enqueue->opaque;
535
536 context->callback.response.func(context->callback.response.arg, context, &handler->queue, &handler->request.message, &handler->response.message);
537 }
538 }
539 } while (remaining);
540 }
541
542 #if PHP_HTTP_HAVE_EVENT
543
544 typedef struct php_http_curlm_event {
545 struct event evnt;
546 php_http_client_t *context;
547 } php_http_curlm_event_t;
548
549 static inline int etoca(short action) {
550 switch (action & (EV_READ|EV_WRITE)) {
551 case EV_READ:
552 return CURL_CSELECT_IN;
553 break;
554 case EV_WRITE:
555 return CURL_CSELECT_OUT;
556 break;
557 case EV_READ|EV_WRITE:
558 return CURL_CSELECT_IN|CURL_CSELECT_OUT;
559 break;
560 default:
561 return 0;
562 }
563 }
564
565 static void php_http_curlm_timeout_callback(int socket, short action, void *event_data)
566 {
567 php_http_client_t *context = event_data;
568 php_http_client_curl_t *curl = context->ctx;
569
570 #if DBG_EVENTS
571 fprintf(stderr, "T");
572 #endif
573 if (curl->useevents) {
574 CURLMcode rc;
575 TSRMLS_FETCH_FROM_CTX(context->ts);
576
577 /* ignore and use -1,0 on timeout */
578 (void) socket;
579 (void) action;
580
581 while (CURLM_CALL_MULTI_PERFORM == (rc = curl_multi_socket_action(curl->handle, CURL_SOCKET_TIMEOUT, 0, &curl->unfinished)));
582
583 if (CURLM_OK != rc) {
584 php_error_docref(NULL TSRMLS_CC, E_WARNING, "%s", curl_multi_strerror(rc));
585 }
586
587 php_http_curlm_responsehandler(context);
588 }
589 }
590
591 static void php_http_curlm_event_callback(int socket, short action, void *event_data)
592 {
593 php_http_client_t *context = event_data;
594 php_http_client_curl_t *curl = context->ctx;
595
596 #if DBG_EVENTS
597 fprintf(stderr, "E");
598 #endif
599 if (curl->useevents) {
600 CURLMcode rc = CURLM_OK;
601 TSRMLS_FETCH_FROM_CTX(context->ts);
602
603 while (CURLM_CALL_MULTI_PERFORM == (rc = curl_multi_socket_action(curl->handle, socket, etoca(action), &curl->unfinished)));
604
605 if (CURLM_OK != rc) {
606 php_error_docref(NULL TSRMLS_CC, E_WARNING, "%s", curl_multi_strerror(rc));
607 }
608
609 php_http_curlm_responsehandler(context);
610
611 /* remove timeout if there are no transfers left */
612 if (!curl->unfinished && event_initialized(curl->timeout) && event_pending(curl->timeout, EV_TIMEOUT, NULL)) {
613 event_del(curl->timeout);
614 }
615 }
616 }
617
618 static int php_http_curlm_socket_callback(CURL *easy, curl_socket_t sock, int action, void *socket_data, void *assign_data)
619 {
620 php_http_client_t *context = socket_data;
621 php_http_client_curl_t *curl = context->ctx;
622
623 #if DBG_EVENTS
624 fprintf(stderr, "S");
625 #endif
626 if (curl->useevents) {
627 int events = EV_PERSIST;
628 php_http_curlm_event_t *ev = assign_data;
629 TSRMLS_FETCH_FROM_CTX(context->ts);
630
631 if (!ev) {
632 ev = ecalloc(1, sizeof(php_http_curlm_event_t));
633 ev->context = context;
634 curl_multi_assign(curl->handle, sock, ev);
635 } else {
636 event_del(&ev->evnt);
637 }
638
639 switch (action) {
640 case CURL_POLL_IN:
641 events |= EV_READ;
642 break;
643 case CURL_POLL_OUT:
644 events |= EV_WRITE;
645 break;
646 case CURL_POLL_INOUT:
647 events |= EV_READ|EV_WRITE;
648 break;
649
650 case CURL_POLL_REMOVE:
651 efree(ev);
652 /* no break */
653 case CURL_POLL_NONE:
654 return 0;
655
656 default:
657 php_error_docref(NULL TSRMLS_CC, E_WARNING, "Unknown socket action %d", action);
658 return -1;
659 }
660
661 event_assign(&ev->evnt, PHP_HTTP_G->curl.event_base, sock, events, php_http_curlm_event_callback, context);
662 event_add(&ev->evnt, NULL);
663 }
664
665 return 0;
666 }
667
668 static void php_http_curlm_timer_callback(CURLM *multi, long timeout_ms, void *timer_data)
669 {
670 php_http_client_t *context = timer_data;
671 php_http_client_curl_t *curl = context->ctx;
672
673 #if DBG_EVENTS
674 fprintf(stderr, "\ntimer <- timeout_ms: %ld\n", timeout_ms);
675 #endif
676 if (curl->useevents) {
677
678 if (timeout_ms < 0) {
679 php_http_curlm_timeout_callback(CURL_SOCKET_TIMEOUT, /*EV_READ|EV_WRITE*/0, context);
680 } else if (timeout_ms > 0 || !event_initialized(curl->timeout) || !event_pending(curl->timeout, EV_TIMEOUT, NULL)) {
681 struct timeval timeout;
682 TSRMLS_FETCH_FROM_CTX(context->ts);
683
684 if (!event_initialized(curl->timeout)) {
685 event_assign(curl->timeout, PHP_HTTP_G->curl.event_base, CURL_SOCKET_TIMEOUT, 0, php_http_curlm_timeout_callback, context);
686 } else if (event_pending(curl->timeout, EV_TIMEOUT, NULL)) {
687 event_del(curl->timeout);
688 }
689
690 timeout.tv_sec = timeout_ms / 1000;
691 timeout.tv_usec = (timeout_ms % 1000) * 1000;
692
693 event_add(curl->timeout, &timeout);
694 }
695 }
696 }
697
698 #endif /* HAVE_EVENT */
699
700 /* curl options */
701
702 static php_http_options_t php_http_curle_options;
703
704 #define PHP_HTTP_CURLE_OPTION_CHECK_STRLEN 0x0001
705 #define PHP_HTTP_CURLE_OPTION_CHECK_BASEDIR 0x0002
706 #define PHP_HTTP_CURLE_OPTION_TRANSFORM_MS 0x0004
707
708 static STATUS php_http_curle_option_set_ssl_verifyhost(php_http_option_t *opt, zval *val, void *userdata)
709 {
710 php_http_client_curl_handler_t *curl = userdata;
711 CURL *ch = curl->handle;
712
713 if (CURLE_OK != curl_easy_setopt(ch, CURLOPT_SSL_VERIFYHOST, Z_BVAL_P(val) ? 2 : 0)) {
714 return FAILURE;
715 }
716 return SUCCESS;
717 }
718
719 static STATUS php_http_curle_option_set_cookiestore(php_http_option_t *opt, zval *val, void *userdata)
720 {
721 php_http_client_curl_handler_t *curl = userdata;
722 CURL *ch = curl->handle;
723
724 if (val) {
725 php_http_curle_storage_t *storage = php_http_curle_get_storage(curl->handle);
726
727 if (storage->cookiestore) {
728 pefree(storage->cookiestore, 1);
729 }
730 storage->cookiestore = pestrndup(Z_STRVAL_P(val), Z_STRLEN_P(val), 1);
731 if ( CURLE_OK != curl_easy_setopt(ch, CURLOPT_COOKIEFILE, storage->cookiestore)
732 || CURLE_OK != curl_easy_setopt(ch, CURLOPT_COOKIEJAR, storage->cookiestore)
733 ) {
734 return FAILURE;
735 }
736 }
737 return SUCCESS;
738 }
739
740 static STATUS php_http_curle_option_set_cookies(php_http_option_t *opt, zval *val, void *userdata)
741 {
742 php_http_client_curl_handler_t *curl = userdata;
743 CURL *ch = curl->handle;
744 TSRMLS_FETCH_FROM_CTX(curl->client->ts);
745
746 if (val && Z_TYPE_P(val) != IS_NULL) {
747 if (curl->options.encode_cookies) {
748 if (SUCCESS == php_http_url_encode_hash_ex(HASH_OF(val), &curl->options.cookies, ZEND_STRL(";"), ZEND_STRL("="), NULL, 0 TSRMLS_CC)) {
749 php_http_buffer_fix(&curl->options.cookies);
750 if (CURLE_OK != curl_easy_setopt(ch, CURLOPT_COOKIE, curl->options.cookies.data)) {
751 return FAILURE;
752 }
753 } else {
754 return FAILURE;
755 }
756 } else {
757 HashPosition pos;
758 php_http_array_hashkey_t cookie_key = php_http_array_hashkey_init(0);
759 zval **cookie_val;
760
761 FOREACH_KEYVAL(pos, val, cookie_key, cookie_val) {
762 zval *zv = php_http_ztyp(IS_STRING, *cookie_val);
763
764 php_http_array_hashkey_stringify(&cookie_key);
765 php_http_buffer_appendf(&curl->options.cookies, "%s=%s; ", cookie_key.str, Z_STRVAL_P(zv));
766 php_http_array_hashkey_stringfree(&cookie_key);
767
768 zval_ptr_dtor(&zv);
769 }
770
771 php_http_buffer_fix(&curl->options.cookies);
772 if (curl->options.cookies.used) {
773 if (CURLE_OK != curl_easy_setopt(ch, CURLOPT_COOKIE, curl->options.cookies.data)) {
774 return FAILURE;
775 }
776 }
777 }
778 }
779 return SUCCESS;
780 }
781
782 static STATUS php_http_curle_option_set_encodecookies(php_http_option_t *opt, zval *val, void *userdata)
783 {
784 php_http_client_curl_handler_t *curl = userdata;
785
786 curl->options.encode_cookies = Z_BVAL_P(val);
787 return SUCCESS;
788 }
789
790 static STATUS php_http_curle_option_set_lastmodified(php_http_option_t *opt, zval *val, void *userdata)
791 {
792 php_http_client_curl_handler_t *curl = userdata;
793 CURL *ch = curl->handle;
794 TSRMLS_FETCH_FROM_CTX(curl->client->ts);
795
796 if (Z_LVAL_P(val)) {
797 if (Z_LVAL_P(val) > 0) {
798 if (CURLE_OK != curl_easy_setopt(ch, CURLOPT_TIMEVALUE, Z_LVAL_P(val))) {
799 return FAILURE;
800 }
801 } else {
802 if (CURLE_OK != curl_easy_setopt(ch, CURLOPT_TIMEVALUE, (long) PHP_HTTP_G->env.request.time + Z_LVAL_P(val))) {
803 return FAILURE;
804 }
805 }
806 if (CURLE_OK != curl_easy_setopt(ch, CURLOPT_TIMECONDITION, (long) (curl->options.range_request ? CURL_TIMECOND_IFUNMODSINCE : CURL_TIMECOND_IFMODSINCE))) {
807 return FAILURE;
808 }
809 } else {
810 if ( CURLE_OK != curl_easy_setopt(ch, CURLOPT_TIMEVALUE, 0)
811 || CURLE_OK != curl_easy_setopt(ch, CURLOPT_TIMECONDITION, 0)
812 ) {
813 return FAILURE;
814 }
815 }
816 return SUCCESS;
817 }
818
819 static STATUS php_http_curle_option_set_compress(php_http_option_t *opt, zval *val, void *userdata)
820 {
821 php_http_client_curl_handler_t *curl = userdata;
822
823 if (Z_BVAL_P(val)) {
824 curl->options.headers = curl_slist_append(curl->options.headers, "Accept-Encoding: gzip;q=1.0,deflate;q=0.5");
825 }
826 return SUCCESS;
827 }
828
829 static STATUS php_http_curle_option_set_etag(php_http_option_t *opt, zval *val, void *userdata)
830 {
831 php_http_client_curl_handler_t *curl = userdata;
832 php_http_buffer_t header;
833 zend_bool is_quoted = !((Z_STRVAL_P(val)[0] != '"') || (Z_STRVAL_P(val)[Z_STRLEN_P(val)-1] != '"'));
834
835 php_http_buffer_init(&header);
836 php_http_buffer_appendf(&header, is_quoted?"%s: %s":"%s: \"%s\"", curl->options.range_request?"If-Match":"If-None-Match", Z_STRVAL_P(val));
837 php_http_buffer_fix(&header);
838 curl->options.headers = curl_slist_append(curl->options.headers, header.data);
839 php_http_buffer_dtor(&header);
840 return SUCCESS;
841 }
842
843 static STATUS php_http_curle_option_set_range(php_http_option_t *opt, zval *val, void *userdata)
844 {
845 php_http_client_curl_handler_t *curl = userdata;
846 CURL *ch = curl->handle;
847 TSRMLS_FETCH_FROM_CTX(curl->client->ts);
848
849 php_http_buffer_reset(&curl->options.ranges);
850
851 if (val && Z_TYPE_P(val) != IS_NULL) {
852 HashPosition pos;
853 zval **rr, **rb, **re;
854
855 FOREACH_VAL(pos, val, rr) {
856 if (Z_TYPE_PP(rr) == IS_ARRAY) {
857 if (2 == php_http_array_list(Z_ARRVAL_PP(rr) TSRMLS_CC, 2, &rb, &re)) {
858 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))) &&
859 ((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)))) {
860 zval *rbl = php_http_ztyp(IS_LONG, *rb);
861 zval *rel = php_http_ztyp(IS_LONG, *re);
862
863 if ((Z_LVAL_P(rbl) >= 0) && (Z_LVAL_P(rel) >= 0)) {
864 php_http_buffer_appendf(&curl->options.ranges, "%ld-%ld,", Z_LVAL_P(rbl), Z_LVAL_P(rel));
865 }
866 zval_ptr_dtor(&rbl);
867 zval_ptr_dtor(&rel);
868 }
869
870 }
871 }
872 }
873
874 if (curl->options.ranges.used) {
875 curl->options.range_request = 1;
876 /* ditch last comma */
877 curl->options.ranges.data[curl->options.ranges.used - 1] = '\0';
878 }
879 }
880
881 if (CURLE_OK != curl_easy_setopt(ch, CURLOPT_RANGE, curl->options.ranges.data)) {
882 return FAILURE;
883 }
884 return SUCCESS;
885 }
886
887 static STATUS php_http_curle_option_set_resume(php_http_option_t *opt, zval *val, void *userdata)
888 {
889 php_http_client_curl_handler_t *curl = userdata;
890 CURL *ch = curl->handle;
891
892 if (Z_LVAL_P(val) > 0) {
893 curl->options.range_request = 1;
894 }
895 if (CURLE_OK != curl_easy_setopt(ch, CURLOPT_RESUME_FROM, Z_LVAL_P(val))) {
896 return FAILURE;
897 }
898 return SUCCESS;
899 }
900
901 static STATUS php_http_curle_option_set_retrydelay(php_http_option_t *opt, zval *val, void *userdata)
902 {
903 php_http_client_curl_handler_t *curl = userdata;
904
905 curl->options.retry.delay = Z_DVAL_P(val);
906 return SUCCESS;
907 }
908
909 static STATUS php_http_curle_option_set_retrycount(php_http_option_t *opt, zval *val, void *userdata)
910 {
911 php_http_client_curl_handler_t *curl = userdata;
912
913 curl->options.retry.count = Z_LVAL_P(val);
914 return SUCCESS;
915 }
916
917 static STATUS php_http_curle_option_set_redirect(php_http_option_t *opt, zval *val, void *userdata)
918 {
919 php_http_client_curl_handler_t *curl = userdata;
920 CURL *ch = curl->handle;
921
922 if ( CURLE_OK != curl_easy_setopt(ch, CURLOPT_FOLLOWLOCATION, Z_LVAL_P(val) ? 1L : 0L)
923 || CURLE_OK != curl_easy_setopt(ch, CURLOPT_MAXREDIRS, curl->options.redirects = Z_LVAL_P(val))
924 ) {
925 return FAILURE;
926 }
927 return SUCCESS;
928 }
929
930 static STATUS php_http_curle_option_set_portrange(php_http_option_t *opt, zval *val, void *userdata)
931 {
932 php_http_client_curl_handler_t *curl = userdata;
933 CURL *ch = curl->handle;
934 long localport = 0, localportrange = 0;
935 TSRMLS_FETCH_FROM_CTX(curl->client->ts);
936
937 if (val && Z_TYPE_P(val) != IS_NULL) {
938 zval **z_port_start, *zps_copy = NULL, **z_port_end, *zpe_copy = NULL;
939
940 switch (php_http_array_list(Z_ARRVAL_P(val) TSRMLS_CC, 2, &z_port_start, &z_port_end)) {
941 case 2:
942 zps_copy = php_http_ztyp(IS_LONG, *z_port_start);
943 zpe_copy = php_http_ztyp(IS_LONG, *z_port_end);
944 localportrange = labs(Z_LVAL_P(zps_copy)-Z_LVAL_P(zpe_copy))+1L;
945 /* no break */
946 case 1:
947 if (!zps_copy) {
948 zps_copy = php_http_ztyp(IS_LONG, *z_port_start);
949 }
950 localport = (zpe_copy && Z_LVAL_P(zpe_copy) > 0) ? MIN(Z_LVAL_P(zps_copy), Z_LVAL_P(zpe_copy)) : Z_LVAL_P(zps_copy);
951 zval_ptr_dtor(&zps_copy);
952 if (zpe_copy) {
953 zval_ptr_dtor(&zpe_copy);
954 }
955 break;
956 default:
957 break;
958 }
959 }
960 if ( CURLE_OK != curl_easy_setopt(ch, CURLOPT_LOCALPORT, localport)
961 || CURLE_OK != curl_easy_setopt(ch, CURLOPT_LOCALPORTRANGE, localportrange)
962 ) {
963 return FAILURE;
964 }
965 return SUCCESS;
966 }
967
968 #if PHP_HTTP_CURL_VERSION(7,21,3)
969 static STATUS php_http_curle_option_set_resolve(php_http_option_t *opt, zval *val, void *userdata)
970 {
971 php_http_client_curl_handler_t *curl = userdata;
972 CURL *ch = curl->handle;
973 TSRMLS_FETCH_FROM_CTX(curl->client->ts);
974
975 if (val && Z_TYPE_P(val) != IS_NULL) {
976 php_http_array_hashkey_t key = php_http_array_hashkey_init(0);
977 HashPosition pos;
978 zval **data;
979
980 FOREACH_KEYVAL(pos, val, key, data) {
981 zval *cpy = php_http_ztyp(IS_STRING, *data);
982 curl->options.resolve = curl_slist_append(curl->options.resolve, Z_STRVAL_P(cpy));
983 zval_ptr_dtor(&cpy);
984 }
985
986 if (CURLE_OK != curl_easy_setopt(ch, CURLOPT_RESOLVE, curl->options.resolve)) {
987 return FAILURE;
988 }
989 } else {
990 if (CURLE_OK != curl_easy_setopt(ch, CURLOPT_RESOLVE, NULL)) {
991 return FAILURE;
992 }
993 }
994 return SUCCESS;
995 }
996 #endif
997
998 static void php_http_curle_options_init(php_http_options_t *registry TSRMLS_DC)
999 {
1000 php_http_option_t *opt;
1001
1002 /* proxy */
1003 if ((opt = php_http_option_register(registry, ZEND_STRL("proxyhost"), CURLOPT_PROXY, IS_STRING))) {
1004 opt->flags |= PHP_HTTP_CURLE_OPTION_CHECK_STRLEN;
1005 }
1006 php_http_option_register(registry, ZEND_STRL("proxytype"), CURLOPT_PROXYTYPE, IS_LONG);
1007 php_http_option_register(registry, ZEND_STRL("proxyport"), CURLOPT_PROXYPORT, IS_LONG);
1008 if ((opt = php_http_option_register(registry, ZEND_STRL("proxyauth"), CURLOPT_PROXYUSERPWD, IS_STRING))) {
1009 opt->flags |= PHP_HTTP_CURLE_OPTION_CHECK_STRLEN;
1010 }
1011 if ((opt = php_http_option_register(registry, ZEND_STRL("proxyauthtype"), CURLOPT_PROXYAUTH, IS_LONG))) {
1012 Z_LVAL(opt->defval) = CURLAUTH_ANYSAFE;
1013 }
1014 php_http_option_register(registry, ZEND_STRL("proxytunnel"), CURLOPT_HTTPPROXYTUNNEL, IS_BOOL);
1015 #if PHP_HTTP_CURL_VERSION(7,19,4)
1016 php_http_option_register(registry, ZEND_STRL("noproxy"), CURLOPT_NOPROXY, IS_STRING);
1017 #endif
1018
1019 /* dns */
1020 if ((opt = php_http_option_register(registry, ZEND_STRL("dns_cache_timeout"), CURLOPT_DNS_CACHE_TIMEOUT, IS_LONG))) {
1021 Z_LVAL(opt->defval) = 60;
1022 }
1023 php_http_option_register(registry, ZEND_STRL("ipresolve"), CURLOPT_IPRESOLVE, IS_LONG);
1024 #if PHP_HTTP_CURL_VERSION(7,21,3)
1025 if ((opt = php_http_option_register(registry, ZEND_STRL("resolve"), CURLOPT_RESOLVE, IS_ARRAY))) {
1026 opt->setter = php_http_curle_option_set_resolve;
1027 }
1028 #endif
1029 #if PHP_HTTP_CURL_VERSION(7,24,0)
1030 if ((opt = php_http_option_register(registry, ZEND_STRL("dns_servers"), CURLOPT_DNS_SERVERS, IS_STRING))) {
1031 opt->flags |= PHP_HTTP_CURLE_OPTION_CHECK_STRLEN;
1032 }
1033 #endif
1034
1035 /* limits */
1036 php_http_option_register(registry, ZEND_STRL("low_speed_limit"), CURLOPT_LOW_SPEED_LIMIT, IS_LONG);
1037 php_http_option_register(registry, ZEND_STRL("low_speed_time"), CURLOPT_LOW_SPEED_TIME, IS_LONG);
1038
1039 /* LSF weirdance
1040 php_http_option_register(registry, ZEND_STRL("max_send_speed"), CURLOPT_MAX_SEND_SPEED_LARGE, IS_LONG);
1041 php_http_option_register(registry, ZEND_STRL("max_recv_speed"), CURLOPT_MAX_RECV_SPEED_LARGE, IS_LONG);
1042 */
1043
1044 /* connection handling */
1045 /* crashes
1046 if ((opt = php_http_option_register(registry, ZEND_STRL("maxconnects"), CURLOPT_MAXCONNECTS, IS_LONG))) {
1047 Z_LVAL(opt->defval) = 5;
1048 }
1049 */
1050 php_http_option_register(registry, ZEND_STRL("fresh_connect"), CURLOPT_FRESH_CONNECT, IS_BOOL);
1051 php_http_option_register(registry, ZEND_STRL("forbid_reuse"), CURLOPT_FORBID_REUSE, IS_BOOL);
1052
1053 /* outgoing interface */
1054 php_http_option_register(registry, ZEND_STRL("interface"), CURLOPT_INTERFACE, IS_STRING);
1055 if ((opt = php_http_option_register(registry, ZEND_STRL("portrange"), CURLOPT_LOCALPORT, IS_ARRAY))) {
1056 opt->setter = php_http_curle_option_set_portrange;
1057 }
1058
1059 /* another endpoint port */
1060 php_http_option_register(registry, ZEND_STRL("port"), CURLOPT_PORT, IS_LONG);
1061
1062 /* RFC4007 zone_id */
1063 #if PHP_HTTP_CURL_VERSION(7,19,0)
1064 php_http_option_register(registry, ZEND_STRL("address_scope"), CURLOPT_ADDRESS_SCOPE, IS_LONG);
1065 #endif
1066
1067 /* auth */
1068 if ((opt = php_http_option_register(registry, ZEND_STRL("httpauth"), CURLOPT_USERPWD, IS_STRING))) {
1069 opt->flags |= PHP_HTTP_CURLE_OPTION_CHECK_STRLEN;
1070 }
1071 if ((opt = php_http_option_register(registry, ZEND_STRL("httpauthtype"), CURLOPT_HTTPAUTH, IS_LONG))) {
1072 Z_LVAL(opt->defval) = CURLAUTH_ANYSAFE;
1073 }
1074
1075 /* redirects */
1076 if ((opt = php_http_option_register(registry, ZEND_STRL("redirect"), CURLOPT_FOLLOWLOCATION, IS_LONG))) {
1077 opt->setter = php_http_curle_option_set_redirect;
1078 }
1079 php_http_option_register(registry, ZEND_STRL("unrestricted_auth"), CURLOPT_UNRESTRICTED_AUTH, IS_BOOL);
1080 #if PHP_HTTP_CURL_VERSION(7,19,1)
1081 php_http_option_register(registry, ZEND_STRL("postredir"), CURLOPT_POSTREDIR, IS_LONG);
1082 #endif
1083
1084 /* retries */
1085 if ((opt = php_http_option_register(registry, ZEND_STRL("retrycount"), 0, IS_LONG))) {
1086 opt->setter = php_http_curle_option_set_retrycount;
1087 }
1088 if ((opt = php_http_option_register(registry, ZEND_STRL("retrydelay"), 0, IS_DOUBLE))) {
1089 opt->setter = php_http_curle_option_set_retrydelay;
1090 }
1091
1092 /* referer */
1093 if ((opt = php_http_option_register(registry, ZEND_STRL("referer"), CURLOPT_REFERER, IS_STRING))) {
1094 opt->flags |= PHP_HTTP_CURLE_OPTION_CHECK_STRLEN;
1095 }
1096 if ((opt = php_http_option_register(registry, ZEND_STRL("autoreferer"), CURLOPT_AUTOREFERER, IS_BOOL))) {
1097 ZVAL_BOOL(&opt->defval, 1);
1098 }
1099
1100 /* useragent */
1101 if ((opt = php_http_option_register(registry, ZEND_STRL("useragent"), CURLOPT_USERAGENT, IS_STRING))) {
1102 /* don't check strlen, to allow sending no useragent at all */
1103 ZVAL_STRING(&opt->defval, "PECL::HTTP/" PHP_PECL_HTTP_VERSION " (PHP/" PHP_VERSION ")", 0);
1104 }
1105
1106 /* resume */
1107 if ((opt = php_http_option_register(registry, ZEND_STRL("resume"), CURLOPT_RESUME_FROM, IS_LONG))) {
1108 opt->setter = php_http_curle_option_set_resume;
1109 }
1110 /* ranges */
1111 if ((opt = php_http_option_register(registry, ZEND_STRL("range"), CURLOPT_RANGE, IS_ARRAY))) {
1112 opt->setter = php_http_curle_option_set_range;
1113 }
1114
1115 /* etag */
1116 if ((opt = php_http_option_register(registry, ZEND_STRL("etag"), 0, IS_STRING))) {
1117 opt->flags |= PHP_HTTP_CURLE_OPTION_CHECK_STRLEN;
1118 opt->setter = php_http_curle_option_set_etag;
1119 }
1120
1121 /* compression */
1122 if ((opt = php_http_option_register(registry, ZEND_STRL("compress"), 0, IS_BOOL))) {
1123 opt->setter = php_http_curle_option_set_compress;
1124 }
1125
1126 /* lastmodified */
1127 if ((opt = php_http_option_register(registry, ZEND_STRL("lastmodified"), 0, IS_LONG))) {
1128 opt->setter = php_http_curle_option_set_lastmodified;
1129 }
1130
1131 /* cookies */
1132 if ((opt = php_http_option_register(registry, ZEND_STRL("encodecookies"), 0, IS_BOOL))) {
1133 opt->setter = php_http_curle_option_set_encodecookies;
1134 ZVAL_BOOL(&opt->defval, 1);
1135 }
1136 if ((opt = php_http_option_register(registry, ZEND_STRL("cookies"), 0, IS_ARRAY))) {
1137 opt->setter = php_http_curle_option_set_cookies;
1138 }
1139
1140 /* cookiesession, don't load session cookies from cookiestore */
1141 php_http_option_register(registry, ZEND_STRL("cookiesession"), CURLOPT_COOKIESESSION, IS_BOOL);
1142 /* cookiestore, read initial cookies from that file and store cookies back into that file */
1143 if ((opt = php_http_option_register(registry, ZEND_STRL("cookiestore"), 0, IS_STRING))) {
1144 opt->flags |= PHP_HTTP_CURLE_OPTION_CHECK_STRLEN;
1145 opt->flags |= PHP_HTTP_CURLE_OPTION_CHECK_BASEDIR;
1146 opt->setter = php_http_curle_option_set_cookiestore;
1147 }
1148
1149 /* maxfilesize */
1150 php_http_option_register(registry, ZEND_STRL("maxfilesize"), CURLOPT_MAXFILESIZE, IS_LONG);
1151
1152 /* http protocol version */
1153 php_http_option_register(registry, ZEND_STRL("protocol"), CURLOPT_HTTP_VERSION, IS_LONG);
1154
1155 /* timeouts */
1156 if ((opt = php_http_option_register(registry, ZEND_STRL("timeout"), CURLOPT_TIMEOUT_MS, IS_DOUBLE))) {
1157 opt->flags |= PHP_HTTP_CURLE_OPTION_TRANSFORM_MS;
1158 }
1159 if ((opt = php_http_option_register(registry, ZEND_STRL("connecttimeout"), CURLOPT_CONNECTTIMEOUT_MS, IS_DOUBLE))) {
1160 opt->flags |= PHP_HTTP_CURLE_OPTION_TRANSFORM_MS;
1161 Z_DVAL(opt->defval) = 3;
1162 }
1163
1164 /* tcp */
1165 #if PHP_HTTP_CURL_VERSION(7,25,0)
1166 php_http_option_register(registry, ZEND_STRL("tcp_keepalive"), CURLOPT_TCP_KEEPALIVE, IS_BOOL);
1167 if ((opt = php_http_option_register(registry, ZEND_STRL("tcp_keepidle"), CURLOPT_TCP_KEEPIDLE, IS_LONG))) {
1168 Z_LVAL(opt->defval) = 60;
1169 }
1170 if ((opt = php_http_option_register(registry, ZEND_STRL("tcp_keepintvl"), CURLOPT_TCP_KEEPINTVL, IS_LONG))) {
1171 Z_LVAL(opt->defval) = 60;
1172 }
1173 #endif
1174
1175 /* ssl */
1176 if ((opt = php_http_option_register(registry, ZEND_STRL("ssl"), 0, IS_ARRAY))) {
1177 registry = &opt->suboptions;
1178
1179 if ((opt = php_http_option_register(registry, ZEND_STRL("cert"), CURLOPT_SSLCERT, IS_STRING))) {
1180 opt->flags |= PHP_HTTP_CURLE_OPTION_CHECK_STRLEN;
1181 opt->flags |= PHP_HTTP_CURLE_OPTION_CHECK_BASEDIR;
1182 }
1183 php_http_option_register(registry, ZEND_STRL("certtype"), CURLOPT_SSLCERTTYPE, IS_STRING);
1184
1185 if ((opt = php_http_option_register(registry, ZEND_STRL("key"), CURLOPT_SSLKEY, IS_STRING))) {
1186 opt->flags |= PHP_HTTP_CURLE_OPTION_CHECK_STRLEN;
1187 opt->flags |= PHP_HTTP_CURLE_OPTION_CHECK_BASEDIR;
1188 }
1189 php_http_option_register(registry, ZEND_STRL("keytype"), CURLOPT_SSLKEYTYPE, IS_STRING);
1190 php_http_option_register(registry, ZEND_STRL("keypasswd"), CURLOPT_SSLKEYPASSWD, IS_STRING);
1191 php_http_option_register(registry, ZEND_STRL("engine"), CURLOPT_SSLENGINE, IS_STRING);
1192 php_http_option_register(registry, ZEND_STRL("version"), CURLOPT_SSLVERSION, IS_LONG);
1193 if ((opt = php_http_option_register(registry, ZEND_STRL("verifypeer"), CURLOPT_SSL_VERIFYPEER, IS_BOOL))) {
1194 ZVAL_BOOL(&opt->defval, 1);
1195 }
1196 if ((opt = php_http_option_register(registry, ZEND_STRL("verifyhost"), CURLOPT_SSL_VERIFYHOST, IS_BOOL))) {
1197 ZVAL_BOOL(&opt->defval, 1);
1198 opt->setter = php_http_curle_option_set_ssl_verifyhost;
1199 }
1200 php_http_option_register(registry, ZEND_STRL("cipher_list"), CURLOPT_SSL_CIPHER_LIST, IS_STRING);
1201 if ((opt = php_http_option_register(registry, ZEND_STRL("cainfo"), CURLOPT_CAINFO, IS_STRING))) {
1202 opt->flags |= PHP_HTTP_CURLE_OPTION_CHECK_STRLEN;
1203 opt->flags |= PHP_HTTP_CURLE_OPTION_CHECK_BASEDIR;
1204 #ifdef PHP_HTTP_CURL_CAINFO
1205 ZVAL_STRING(&opt->defval, PHP_HTTP_CURL_CAINFO, 0);
1206 #endif
1207 }
1208 if ((opt = php_http_option_register(registry, ZEND_STRL("capath"), CURLOPT_CAPATH, IS_STRING))) {
1209 opt->flags |= PHP_HTTP_CURLE_OPTION_CHECK_STRLEN;
1210 opt->flags |= PHP_HTTP_CURLE_OPTION_CHECK_BASEDIR;
1211 }
1212 if ((opt = php_http_option_register(registry, ZEND_STRL("random_file"), CURLOPT_RANDOM_FILE, IS_STRING))) {
1213 opt->flags |= PHP_HTTP_CURLE_OPTION_CHECK_STRLEN;
1214 opt->flags |= PHP_HTTP_CURLE_OPTION_CHECK_BASEDIR;
1215 }
1216 if ((opt = php_http_option_register(registry, ZEND_STRL("egdsocket"), CURLOPT_EGDSOCKET, IS_STRING))) {
1217 opt->flags |= PHP_HTTP_CURLE_OPTION_CHECK_STRLEN;
1218 opt->flags |= PHP_HTTP_CURLE_OPTION_CHECK_BASEDIR;
1219 }
1220 #if PHP_HTTP_CURL_VERSION(7,19,0)
1221 if ((opt = php_http_option_register(registry, ZEND_STRL("issuercert"), CURLOPT_ISSUERCERT, IS_STRING))) {
1222 opt->flags |= PHP_HTTP_CURLE_OPTION_CHECK_STRLEN;
1223 opt->flags |= PHP_HTTP_CURLE_OPTION_CHECK_BASEDIR;
1224 }
1225 # ifdef PHP_HTTP_HAVE_OPENSSL
1226 if ((opt = php_http_option_register(registry, ZEND_STRL("crlfile"), CURLOPT_CRLFILE, IS_STRING))) {
1227 opt->flags |= PHP_HTTP_CURLE_OPTION_CHECK_STRLEN;
1228 opt->flags |= PHP_HTTP_CURLE_OPTION_CHECK_BASEDIR;
1229 }
1230 # endif
1231 #endif
1232 #if PHP_HTTP_CURL_VERSION(7,19,1) && defined(PHP_HTTP_HAVE_OPENSSL)
1233 php_http_option_register(registry, ZEND_STRL("certinfo"), CURLOPT_CERTINFO, IS_BOOL);
1234 #endif
1235 }
1236 }
1237
1238 static zval *php_http_curle_get_option(php_http_option_t *opt, HashTable *options, void *userdata)
1239 {
1240 php_http_client_curl_handler_t *curl = userdata;
1241 zval *option;
1242
1243 if ((option = php_http_option_get(opt, options, NULL))) {
1244 option = php_http_ztyp(opt->type, option);
1245 zend_hash_quick_update(&curl->options.cache, opt->name.s, opt->name.l, opt->name.h, &option, sizeof(zval *), NULL);
1246 }
1247 return option;
1248 }
1249
1250 static STATUS php_http_curle_set_option(php_http_option_t *opt, zval *val, void *userdata)
1251 {
1252 php_http_client_curl_handler_t *curl = userdata;
1253 CURL *ch = curl->handle;
1254 zval tmp;
1255 STATUS rv = SUCCESS;
1256 TSRMLS_FETCH_FROM_CTX(curl->client->ts);
1257
1258 if (!val) {
1259 val = &opt->defval;
1260 }
1261
1262 switch (opt->type) {
1263 case IS_BOOL:
1264 if (opt->setter) {
1265 rv = opt->setter(opt, val, curl);
1266 } else if (CURLE_OK != curl_easy_setopt(ch, opt->option, (long) Z_BVAL_P(val))) {
1267 rv = FAILURE;
1268 }
1269 break;
1270
1271 case IS_LONG:
1272 if (opt->setter) {
1273 rv = opt->setter(opt, val, curl);
1274 } else if (CURLE_OK != curl_easy_setopt(ch, opt->option, Z_LVAL_P(val))) {
1275 rv = FAILURE;
1276 }
1277 break;
1278
1279 case IS_STRING:
1280 if (!(opt->flags & PHP_HTTP_CURLE_OPTION_CHECK_STRLEN) || Z_STRLEN_P(val)) {
1281 if (!(opt->flags & PHP_HTTP_CURLE_OPTION_CHECK_BASEDIR) || !Z_STRVAL_P(val) || SUCCESS == php_check_open_basedir(Z_STRVAL_P(val) TSRMLS_CC)) {
1282 if (opt->setter) {
1283 rv = opt->setter(opt, val, curl);
1284 } else if (CURLE_OK != curl_easy_setopt(ch, opt->option, Z_STRVAL_P(val))) {
1285 rv = FAILURE;
1286 }
1287 }
1288 }
1289 break;
1290
1291 case IS_DOUBLE:
1292 if (opt->flags & PHP_HTTP_CURLE_OPTION_TRANSFORM_MS) {
1293 tmp = *val;
1294 Z_DVAL(tmp) *= 1000;
1295 val = &tmp;
1296 }
1297 if (opt->setter) {
1298 rv = opt->setter(opt, val, curl);
1299 } else if (CURLE_OK != curl_easy_setopt(ch, opt->option, (long) Z_DVAL_P(val))) {
1300 rv = FAILURE;
1301 }
1302 break;
1303
1304 case IS_ARRAY:
1305 if (opt->setter) {
1306 rv = opt->setter(opt, val, curl);
1307 } else if (Z_TYPE_P(val) != IS_NULL) {
1308 rv = php_http_options_apply(&opt->suboptions, Z_ARRVAL_P(val), curl);
1309 }
1310 break;
1311
1312 default:
1313 if (opt->setter) {
1314 rv = opt->setter(opt, val, curl);
1315 } else {
1316 rv = FAILURE;
1317 }
1318 break;
1319 }
1320 if (rv != SUCCESS) {
1321 php_error_docref(NULL TSRMLS_CC, E_NOTICE, "Could not set option %s", opt->name.s);
1322 }
1323 return rv;
1324 }
1325
1326
1327 /* client ops */
1328
1329 static STATUS php_http_client_curl_handler_reset(php_http_client_curl_handler_t *curl)
1330 {
1331 CURL *ch = curl->handle;
1332 php_http_curle_storage_t *st;
1333
1334 if ((st = php_http_curle_get_storage(ch))) {
1335 if (st->url) {
1336 pefree(st->url, 1);
1337 st->url = NULL;
1338 }
1339 if (st->cookiestore) {
1340 pefree(st->cookiestore, 1);
1341 st->cookiestore = NULL;
1342 }
1343 st->errorbuffer[0] = '\0';
1344 }
1345
1346 curl_easy_setopt(ch, CURLOPT_URL, NULL);
1347 /* libcurl < 7.19.6 does not clear auth info with USERPWD set to NULL */
1348 #if PHP_HTTP_CURL_VERSION(7,19,1)
1349 curl_easy_setopt(ch, CURLOPT_PROXYUSERNAME, NULL);
1350 curl_easy_setopt(ch, CURLOPT_PROXYPASSWORD, NULL);
1351 curl_easy_setopt(ch, CURLOPT_USERNAME, NULL);
1352 curl_easy_setopt(ch, CURLOPT_PASSWORD, NULL);
1353 #endif
1354
1355 #if PHP_HTTP_CURL_VERSION(7,21,3)
1356 if (curl->options.resolve) {
1357 curl_slist_free_all(curl->options.resolve);
1358 curl->options.resolve = NULL;
1359 }
1360 #endif
1361 curl->options.retry.count = 0;
1362 curl->options.retry.delay = 0;
1363 curl->options.redirects = 0;
1364 curl->options.encode_cookies = 1;
1365
1366 if (curl->options.headers) {
1367 curl_slist_free_all(curl->options.headers);
1368 curl->options.headers = NULL;
1369 }
1370
1371 php_http_buffer_reset(&curl->options.cookies);
1372 php_http_buffer_reset(&curl->options.ranges);
1373
1374 return SUCCESS;
1375 }
1376
1377 static php_http_client_curl_handler_t *php_http_client_curl_handler_init(php_http_client_t *h, php_resource_factory_t *rf)
1378 {
1379 void *handle;
1380 php_http_client_curl_handler_t *handler;
1381 TSRMLS_FETCH_FROM_CTX(h->ts);
1382
1383 if (!(handle = php_resource_factory_handle_ctor(rf, NULL TSRMLS_CC))) {
1384 php_error_docref(NULL TSRMLS_CC, E_WARNING, "Failed to initialize curl handle");
1385 return NULL;
1386 }
1387
1388 handler = ecalloc(1, sizeof(*handler));
1389 handler->rf = rf;
1390 handler->client = h;
1391 handler->handle = handle;
1392 handler->request.buffer = php_http_buffer_init(NULL);
1393 handler->request.parser = php_http_message_parser_init(NULL TSRMLS_CC);
1394 handler->request.message = php_http_message_init(NULL, 0, NULL TSRMLS_CC);
1395 handler->response.buffer = php_http_buffer_init(NULL);
1396 handler->response.parser = php_http_message_parser_init(NULL TSRMLS_CC);
1397 handler->response.message = php_http_message_init(NULL, 0, NULL TSRMLS_CC);
1398 php_http_buffer_init(&handler->options.cookies);
1399 php_http_buffer_init(&handler->options.ranges);
1400 zend_hash_init(&handler->options.cache, 0, NULL, ZVAL_PTR_DTOR, 0);
1401
1402 #if defined(ZTS)
1403 curl_easy_setopt(handle, CURLOPT_NOSIGNAL, 1L);
1404 #endif
1405 curl_easy_setopt(handle, CURLOPT_HEADER, 0L);
1406 curl_easy_setopt(handle, CURLOPT_FILETIME, 1L);
1407 curl_easy_setopt(handle, CURLOPT_AUTOREFERER, 1L);
1408 curl_easy_setopt(handle, CURLOPT_VERBOSE, 1L);
1409 curl_easy_setopt(handle, CURLOPT_NOPROGRESS, 0L);
1410 curl_easy_setopt(handle, CURLOPT_HEADERFUNCTION, NULL);
1411 curl_easy_setopt(handle, CURLOPT_WRITEFUNCTION, php_http_curle_dummy_callback);
1412 curl_easy_setopt(handle, CURLOPT_DEBUGFUNCTION, php_http_curle_raw_callback);
1413 curl_easy_setopt(handle, CURLOPT_READFUNCTION, php_http_curle_read_callback);
1414 curl_easy_setopt(handle, CURLOPT_IOCTLFUNCTION, php_http_curle_ioctl_callback);
1415 curl_easy_setopt(handle, CURLOPT_PROGRESSFUNCTION, php_http_curle_progress_callback);
1416 curl_easy_setopt(handle, CURLOPT_DEBUGDATA, handler);
1417 curl_easy_setopt(handle, CURLOPT_PROGRESSDATA, handler);
1418
1419 php_http_client_curl_handler_reset(handler);
1420
1421 return handler;
1422 }
1423
1424
1425 static STATUS php_http_client_curl_handler_prepare(php_http_client_curl_handler_t *curl, php_http_client_enqueue_t *enqueue)
1426 {
1427 size_t body_size;
1428 php_http_message_t *msg = enqueue->request;
1429 php_http_curle_storage_t *storage = php_http_curle_get_storage(curl->handle);
1430 TSRMLS_FETCH_FROM_CTX(curl->client->ts);
1431
1432 /* request url */
1433 if (!PHP_HTTP_INFO(msg).request.url) {
1434 php_error_docref(NULL TSRMLS_CC, E_WARNING, "Cannot request empty URL");
1435 return FAILURE;
1436 }
1437 storage->errorbuffer[0] = '\0';
1438 if (storage->url) {
1439 pefree(storage->url, 1);
1440 }
1441 storage->url = pestrdup(PHP_HTTP_INFO(msg).request.url, 1);
1442 curl_easy_setopt(curl->handle, CURLOPT_URL, storage->url);
1443
1444 /* request method */
1445 switch (php_http_select_str(PHP_HTTP_INFO(msg).request.method, 4, "GET", "HEAD", "POST", "PUT")) {
1446 case 0:
1447 curl_easy_setopt(curl->handle, CURLOPT_HTTPGET, 1L);
1448 break;
1449
1450 case 1:
1451 curl_easy_setopt(curl->handle, CURLOPT_NOBODY, 1L);
1452 break;
1453
1454 case 2:
1455 curl_easy_setopt(curl->handle, CURLOPT_POST, 1L);
1456 break;
1457
1458 case 3:
1459 curl_easy_setopt(curl->handle, CURLOPT_UPLOAD, 1L);
1460 break;
1461
1462 default: {
1463 if (PHP_HTTP_INFO(msg).request.method) {
1464 curl_easy_setopt(curl->handle, CURLOPT_CUSTOMREQUEST, PHP_HTTP_INFO(msg).request.method);
1465 } else {
1466 php_error_docref(NULL TSRMLS_CC, E_WARNING, "Cannot use empty request method");
1467 return FAILURE;
1468 }
1469 break;
1470 }
1471 }
1472
1473 /* request headers */
1474 php_http_message_update_headers(msg);
1475 if (zend_hash_num_elements(&msg->hdrs)) {
1476 php_http_array_hashkey_t header_key = php_http_array_hashkey_init(0);
1477 zval **header_val;
1478 HashPosition pos;
1479 php_http_buffer_t header;
1480
1481 php_http_buffer_init(&header);
1482 FOREACH_HASH_KEYVAL(pos, &msg->hdrs, header_key, header_val) {
1483 if (header_key.type == HASH_KEY_IS_STRING) {
1484 zval *header_cpy = php_http_ztyp(IS_STRING, *header_val);
1485
1486 php_http_buffer_appendf(&header, "%s: %s", header_key.str, Z_STRVAL_P(header_cpy));
1487 php_http_buffer_fix(&header);
1488 curl->options.headers = curl_slist_append(curl->options.headers, header.data);
1489 php_http_buffer_reset(&header);
1490
1491 zval_ptr_dtor(&header_cpy);
1492 }
1493 }
1494 php_http_buffer_dtor(&header);
1495 }
1496 curl_easy_setopt(curl->handle, CURLOPT_HTTPHEADER, curl->options.headers);
1497
1498 /* attach request body */
1499 if ((body_size = php_http_message_body_size(msg->body))) {
1500 /* RFC2616, section 4.3 (para. 4) states that »a message-body MUST NOT be included in a request if the
1501 * specification of the request method (section 5.1.1) does not allow sending an entity-body in request.«
1502 * Following the clause in section 5.1.1 (para. 2) that request methods »MUST be implemented with the
1503 * same semantics as those specified in section 9« reveal that not any single defined HTTP/1.1 method
1504 * does not allow a request body.
1505 */
1506 php_stream_rewind(php_http_message_body_stream(msg->body));
1507 curl_easy_setopt(curl->handle, CURLOPT_IOCTLDATA, msg->body);
1508 curl_easy_setopt(curl->handle, CURLOPT_READDATA, msg->body);
1509 curl_easy_setopt(curl->handle, CURLOPT_INFILESIZE, body_size);
1510 curl_easy_setopt(curl->handle, CURLOPT_POSTFIELDSIZE, body_size);
1511 } else {
1512 curl_easy_setopt(curl->handle, CURLOPT_IOCTLDATA, NULL);
1513 curl_easy_setopt(curl->handle, CURLOPT_READDATA, NULL);
1514 curl_easy_setopt(curl->handle, CURLOPT_INFILESIZE, 0L);
1515 curl_easy_setopt(curl->handle, CURLOPT_POSTFIELDSIZE, 0L);
1516 }
1517
1518 php_http_options_apply(&php_http_curle_options, enqueue->options, curl);
1519
1520 return SUCCESS;
1521 }
1522
1523 static void php_http_client_curl_handler_dtor(php_http_client_curl_handler_t *handler)
1524 {
1525 TSRMLS_FETCH_FROM_CTX(handler->client->ts);
1526
1527 curl_easy_setopt(handler->handle, CURLOPT_NOPROGRESS, 1L);
1528 curl_easy_setopt(handler->handle, CURLOPT_PROGRESSFUNCTION, NULL);
1529 curl_easy_setopt(handler->handle, CURLOPT_VERBOSE, 0L);
1530 curl_easy_setopt(handler->handle, CURLOPT_DEBUGFUNCTION, NULL);
1531
1532 php_resource_factory_handle_dtor(handler->rf, handler->handle TSRMLS_CC);
1533 php_resource_factory_free(&handler->rf);
1534
1535 php_http_message_parser_free(&handler->request.parser);
1536 php_http_message_free(&handler->request.message);
1537 php_http_buffer_free(&handler->request.buffer);
1538 php_http_message_parser_free(&handler->response.parser);
1539 php_http_message_free(&handler->response.message);
1540 php_http_buffer_free(&handler->response.buffer);
1541 php_http_buffer_dtor(&handler->options.ranges);
1542 php_http_buffer_dtor(&handler->options.cookies);
1543 zend_hash_destroy(&handler->options.cache);
1544
1545 if (handler->options.headers) {
1546 curl_slist_free_all(handler->options.headers);
1547 handler->options.headers = NULL;
1548 }
1549
1550 efree(handler);
1551 }
1552
1553 static php_http_client_t *php_http_client_curl_init(php_http_client_t *h, void *handle)
1554 {
1555 php_http_client_curl_t *curl;
1556 TSRMLS_FETCH_FROM_CTX(h->ts);
1557
1558 if (!handle && !(handle = php_resource_factory_handle_ctor(h->rf, NULL TSRMLS_CC))) {
1559 php_error_docref(NULL TSRMLS_CC, E_WARNING, "Failed to initialize curl handle");
1560 return NULL;
1561 }
1562
1563 curl = ecalloc(1, sizeof(*curl));
1564 curl->handle = handle;
1565 curl->unfinished = 0;
1566 h->ctx = curl;
1567
1568 return h;
1569 }
1570
1571 static void php_http_client_curl_dtor(php_http_client_t *h)
1572 {
1573 php_http_client_curl_t *curl = h->ctx;
1574 TSRMLS_FETCH_FROM_CTX(h->ts);
1575
1576 #if PHP_HTTP_HAVE_EVENT
1577 if (curl->timeout) {
1578 efree(curl->timeout);
1579 curl->timeout = NULL;
1580 }
1581 #endif
1582 curl->unfinished = 0;
1583
1584 php_resource_factory_handle_dtor(h->rf, curl->handle TSRMLS_CC);
1585
1586 efree(curl);
1587 h->ctx = NULL;
1588 }
1589
1590 static void queue_dtor(php_http_client_enqueue_t *e)
1591 {
1592 php_http_client_curl_handler_t *handler = e->opaque;
1593
1594 if (handler->queue.dtor) {
1595 e->opaque = handler->queue.opaque;
1596 handler->queue.dtor(e);
1597 }
1598 php_http_client_curl_handler_dtor(handler);
1599 }
1600
1601 static php_resource_factory_t *create_rf(const char *url TSRMLS_DC)
1602 {
1603 php_url *purl;
1604 php_resource_factory_t *rf = NULL;
1605
1606 if (!url || !*url) {
1607 php_error_docref(NULL TSRMLS_CC, E_WARNING, "Cannot request empty URL");
1608 return NULL;
1609 }
1610
1611 purl = php_url_parse(url);
1612
1613 if (!purl) {
1614 php_error_docref(NULL TSRMLS_CC, E_WARNING, "Could not parse URL '%s'", url);
1615 return NULL;
1616 } else {
1617 char *id_str = NULL;
1618 size_t id_len = spprintf(&id_str, 0, "%s:%d", STR_PTR(purl->host), purl->port ? purl->port : 80);
1619 php_persistent_handle_factory_t *pf = php_persistent_handle_concede(NULL, ZEND_STRL("http\\Client\\Curl\\Request"), id_str, id_len, NULL, NULL TSRMLS_CC);
1620
1621 if (pf) {
1622 rf = php_resource_factory_init(NULL, php_persistent_handle_get_resource_factory_ops(), pf, (void (*)(void*)) php_persistent_handle_abandon);
1623 }
1624
1625 php_url_free(purl);
1626 efree(id_str);
1627 }
1628
1629 if (!rf) {
1630 rf = php_resource_factory_init(NULL, &php_http_curle_resource_factory_ops, NULL, NULL);
1631 }
1632
1633 return rf;
1634 }
1635
1636 static STATUS php_http_client_curl_enqueue(php_http_client_t *h, php_http_client_enqueue_t *enqueue)
1637 {
1638 CURLMcode rs;
1639 php_http_client_curl_t *curl = h->ctx;
1640 php_http_client_curl_handler_t *handler;
1641 php_http_client_progress_state_t *progress;
1642 php_resource_factory_t *rf;
1643 TSRMLS_FETCH_FROM_CTX(h->ts);
1644
1645 rf = create_rf(enqueue->request->http.info.request.url TSRMLS_CC);
1646 if (!rf) {
1647 return FAILURE;
1648 }
1649
1650 handler = php_http_client_curl_handler_init(h, rf);
1651 if (!handler) {
1652 return FAILURE;
1653 }
1654
1655 if (SUCCESS != php_http_client_curl_handler_prepare(handler, enqueue)) {
1656 php_http_client_curl_handler_dtor(handler);
1657 return FAILURE;
1658 }
1659
1660 handler->queue = *enqueue;
1661 enqueue->opaque = handler;
1662 enqueue->dtor = queue_dtor;
1663
1664 if (CURLM_OK == (rs = curl_multi_add_handle(curl->handle, handler->handle))) {
1665 zend_llist_add_element(&h->requests, enqueue);
1666 ++curl->unfinished;
1667
1668 if (h->callback.progress.func && SUCCESS == php_http_client_getopt(h, PHP_HTTP_CLIENT_OPT_PROGRESS_INFO, enqueue->request, &progress)) {
1669 progress->info = "start";
1670 h->callback.progress.func(h->callback.progress.arg, h, &handler->queue, progress);
1671 progress->started = 1;
1672 }
1673
1674 return SUCCESS;
1675 } else {
1676 php_error_docref(NULL TSRMLS_CC, E_WARNING, "Could not enqueue request: %s", curl_multi_strerror(rs));
1677 return FAILURE;
1678 }
1679 }
1680
1681 static STATUS php_http_client_curl_dequeue(php_http_client_t *h, php_http_client_enqueue_t *enqueue)
1682 {
1683 CURLMcode rs;
1684 php_http_client_curl_t *curl = h->ctx;
1685 php_http_client_curl_handler_t *handler = enqueue->opaque;
1686 TSRMLS_FETCH_FROM_CTX(h->ts);
1687
1688 if (CURLM_OK == (rs = curl_multi_remove_handle(curl->handle, handler->handle))) {
1689 zend_llist_del_element(&h->requests, handler->handle, (int (*)(void *, void *)) compare_queue);
1690 return SUCCESS;
1691 } else {
1692 php_error_docref(NULL TSRMLS_CC, E_WARNING, "Could not dequeue request: %s", curl_multi_strerror(rs));
1693 }
1694
1695 return FAILURE;
1696 }
1697
1698 static void php_http_client_curl_reset(php_http_client_t *h)
1699 {
1700 zend_llist_element *next_el, *this_el;
1701
1702 for (this_el = h->requests.head; this_el; this_el = next_el) {
1703 next_el = this_el->next;
1704 php_http_client_curl_dequeue(h, (void *) this_el->data);
1705 }
1706 }
1707
1708 #ifdef PHP_WIN32
1709 # define SELECT_ERROR SOCKET_ERROR
1710 #else
1711 # define SELECT_ERROR -1
1712 #endif
1713
1714 static STATUS php_http_client_curl_wait(php_http_client_t *h, struct timeval *custom_timeout)
1715 {
1716 int MAX;
1717 fd_set R, W, E;
1718 struct timeval timeout;
1719 php_http_client_curl_t *curl = h->ctx;
1720
1721 #if PHP_HTTP_HAVE_EVENT
1722 if (curl->useevents) {
1723 TSRMLS_FETCH_FROM_CTX(h->ts);
1724
1725 php_error_docref(NULL TSRMLS_CC, E_WARNING, "not implemented");
1726 return FAILURE;
1727 }
1728 #endif
1729
1730 FD_ZERO(&R);
1731 FD_ZERO(&W);
1732 FD_ZERO(&E);
1733
1734 if (CURLM_OK == curl_multi_fdset(curl->handle, &R, &W, &E, &MAX)) {
1735 if (custom_timeout && timerisset(custom_timeout)) {
1736 timeout = *custom_timeout;
1737 } else {
1738 long max_tout = 1000;
1739
1740 if ((CURLM_OK == curl_multi_timeout(curl->handle, &max_tout)) && (max_tout > 0)) {
1741 timeout.tv_sec = max_tout / 1000;
1742 timeout.tv_usec = (max_tout % 1000) * 1000;
1743 } else {
1744 timeout.tv_sec = 0;
1745 timeout.tv_usec = 1000;
1746 }
1747 }
1748
1749 if (MAX == -1) {
1750 php_http_sleep((double) timeout.tv_sec + (double) (timeout.tv_usec / PHP_HTTP_MCROSEC));
1751 return SUCCESS;
1752 } else if (SELECT_ERROR != select(MAX + 1, &R, &W, &E, &timeout)) {
1753 return SUCCESS;
1754 }
1755 }
1756 return FAILURE;
1757 }
1758
1759 static int php_http_client_curl_once(php_http_client_t *h)
1760 {
1761 php_http_client_curl_t *curl = h->ctx;
1762
1763 #if PHP_HTTP_HAVE_EVENT
1764 if (curl->useevents) {
1765 TSRMLS_FETCH_FROM_CTX(h->ts);
1766 php_error_docref(NULL TSRMLS_CC, E_WARNING, "not implemented");
1767 return FAILURE;
1768 }
1769 #endif
1770
1771 while (CURLM_CALL_MULTI_PERFORM == curl_multi_perform(curl->handle, &curl->unfinished));
1772
1773 php_http_curlm_responsehandler(h);
1774
1775 return curl->unfinished;
1776
1777 }
1778
1779 static STATUS php_http_client_curl_exec(php_http_client_t *h)
1780 {
1781 #if PHP_HTTP_HAVE_EVENT
1782 php_http_client_curl_t *curl = h->ctx;
1783 #endif
1784 TSRMLS_FETCH_FROM_CTX(h->ts);
1785
1786 #if PHP_HTTP_HAVE_EVENT
1787 if (curl->useevents) {
1788 php_http_curlm_timeout_callback(CURL_SOCKET_TIMEOUT, /*EV_READ|EV_WRITE*/0, h);
1789 do {
1790 int ev_rc = event_base_dispatch(PHP_HTTP_G->curl.event_base);
1791
1792 #if DBG_EVENTS
1793 fprintf(stderr, "%c", "X.0"[ev_rc+1]);
1794 #endif
1795
1796 if (ev_rc < 0) {
1797 php_error_docref(NULL TSRMLS_CC, E_ERROR, "Error in event_base_dispatch()");
1798 return FAILURE;
1799 }
1800 } while (curl->unfinished);
1801 } else
1802 #endif
1803 {
1804 while (php_http_client_curl_once(h)) {
1805 if (SUCCESS != php_http_client_curl_wait(h, NULL)) {
1806 #ifdef PHP_WIN32
1807 /* see http://msdn.microsoft.com/library/en-us/winsock/winsock/windows_sockets_error_codes_2.asp */
1808 php_error_docref(NULL TSRMLS_CC, E_WARNING, "WinSock error: %d", WSAGetLastError());
1809 #else
1810 php_error_docref(NULL TSRMLS_CC, E_WARNING, "%s", strerror(errno));
1811 #endif
1812 return FAILURE;
1813 }
1814 }
1815 }
1816
1817 return SUCCESS;
1818 }
1819
1820 static STATUS php_http_client_curl_setopt(php_http_client_t *h, php_http_client_setopt_opt_t opt, void *arg)
1821 {
1822 php_http_client_curl_t *curl = h->ctx;
1823
1824 switch (opt) {
1825 case PHP_HTTP_CLIENT_OPT_ENABLE_PIPELINING:
1826 if (CURLM_OK != curl_multi_setopt(curl->handle, CURLMOPT_PIPELINING, (long) *((zend_bool *) arg))) {
1827 return FAILURE;
1828 }
1829 break;
1830
1831 case PHP_HTTP_CLIENT_OPT_USE_EVENTS:
1832 #if PHP_HTTP_HAVE_EVENT
1833 if ((curl->useevents = *((zend_bool *) arg))) {
1834 if (!curl->timeout) {
1835 curl->timeout = ecalloc(1, sizeof(struct event));
1836 }
1837 curl_multi_setopt(curl->handle, CURLMOPT_SOCKETDATA, h);
1838 curl_multi_setopt(curl->handle, CURLMOPT_SOCKETFUNCTION, php_http_curlm_socket_callback);
1839 curl_multi_setopt(curl->handle, CURLMOPT_TIMERDATA, h);
1840 curl_multi_setopt(curl->handle, CURLMOPT_TIMERFUNCTION, php_http_curlm_timer_callback);
1841 } else {
1842 curl_multi_setopt(curl->handle, CURLMOPT_SOCKETDATA, NULL);
1843 curl_multi_setopt(curl->handle, CURLMOPT_SOCKETFUNCTION, NULL);
1844 curl_multi_setopt(curl->handle, CURLMOPT_TIMERDATA, NULL);
1845 curl_multi_setopt(curl->handle, CURLMOPT_TIMERFUNCTION, NULL);
1846 }
1847 break;
1848 #endif
1849
1850 default:
1851 return FAILURE;
1852 }
1853 return SUCCESS;
1854 }
1855
1856 static STATUS php_http_client_curl_getopt(php_http_client_t *h, php_http_client_getopt_opt_t opt, void *arg, void **res)
1857 {
1858 php_http_client_enqueue_t *enqueue;
1859
1860 switch (opt) {
1861 case PHP_HTTP_CLIENT_OPT_PROGRESS_INFO:
1862 if ((enqueue = php_http_client_enqueued(h, arg, NULL))) {
1863 php_http_client_curl_handler_t *handler = enqueue->opaque;
1864
1865 *((php_http_client_progress_state_t **) res) = &handler->progress;
1866 return SUCCESS;
1867 }
1868 break;
1869
1870 case PHP_HTTP_CLIENT_OPT_TRANSFER_INFO:
1871 if ((enqueue = php_http_client_enqueued(h, arg, NULL))) {
1872 php_http_client_curl_handler_t *handler = enqueue->opaque;
1873
1874 php_http_curle_get_info(handler->handle, *(HashTable **) res);
1875 return SUCCESS;
1876 }
1877 break;
1878
1879 default:
1880 break;
1881 }
1882
1883 return FAILURE;
1884 }
1885
1886 static php_http_client_ops_t php_http_client_curl_ops = {
1887 &php_http_curlm_resource_factory_ops,
1888 php_http_client_curl_init,
1889 NULL /* copy */,
1890 php_http_client_curl_dtor,
1891 php_http_client_curl_reset,
1892 php_http_client_curl_exec,
1893 php_http_client_curl_wait,
1894 php_http_client_curl_once,
1895 php_http_client_curl_enqueue,
1896 php_http_client_curl_dequeue,
1897 php_http_client_curl_setopt,
1898 php_http_client_curl_getopt
1899 };
1900
1901 php_http_client_ops_t *php_http_client_curl_get_ops(void)
1902 {
1903 return &php_http_client_curl_ops;
1904 }
1905
1906 PHP_MINIT_FUNCTION(http_client_curl)
1907 {
1908 php_http_options_t *options;
1909 php_http_client_driver_t driver = {
1910 ZEND_STRL("curl"),
1911 &php_http_client_curl_ops
1912 };
1913
1914 if (SUCCESS != php_http_client_driver_add(&driver)) {
1915 return FAILURE;
1916 }
1917
1918 if (SUCCESS != php_persistent_handle_provide(ZEND_STRL("http\\Client\\Curl"), &php_http_curlm_resource_factory_ops, NULL, NULL TSRMLS_CC)) {
1919 return FAILURE;
1920 }
1921 if (SUCCESS != php_persistent_handle_provide(ZEND_STRL("http\\Client\\Curl\\Request"), &php_http_curle_resource_factory_ops, NULL, NULL TSRMLS_CC)) {
1922 return FAILURE;
1923 }
1924
1925 if ((options = php_http_options_init(&php_http_curle_options, 1))) {
1926 options->getter = php_http_curle_get_option;
1927 options->setter = php_http_curle_set_option;
1928
1929 php_http_curle_options_init(options TSRMLS_CC);
1930 }
1931
1932 /*
1933 * HTTP Protocol Version Constants
1934 */
1935 REGISTER_NS_LONG_CONSTANT("http\\Client\\Curl", "HTTP_VERSION_1_0", CURL_HTTP_VERSION_1_0, CONST_CS|CONST_PERSISTENT);
1936 REGISTER_NS_LONG_CONSTANT("http\\Client\\Curl", "HTTP_VERSION_1_1", CURL_HTTP_VERSION_1_1, CONST_CS|CONST_PERSISTENT);
1937 REGISTER_NS_LONG_CONSTANT("http\\Client\\Curl", "HTTP_VERSION_ANY", CURL_HTTP_VERSION_NONE, CONST_CS|CONST_PERSISTENT);
1938
1939 /*
1940 * SSL Version Constants
1941 */
1942 REGISTER_NS_LONG_CONSTANT("http\\Client\\Curl", "SSL_VERSION_TLSv1", CURL_SSLVERSION_TLSv1, CONST_CS|CONST_PERSISTENT);
1943 REGISTER_NS_LONG_CONSTANT("http\\Client\\Curl", "SSL_VERSION_SSLv2", CURL_SSLVERSION_SSLv2, CONST_CS|CONST_PERSISTENT);
1944 REGISTER_NS_LONG_CONSTANT("http\\Client\\Curl", "SSL_VERSION_SSLv3", CURL_SSLVERSION_SSLv3, CONST_CS|CONST_PERSISTENT);
1945 REGISTER_NS_LONG_CONSTANT("http\\Client\\Curl", "SSL_VERSION_ANY", CURL_SSLVERSION_DEFAULT, CONST_CS|CONST_PERSISTENT);
1946
1947 /*
1948 * DNS IPvX resolving
1949 */
1950 REGISTER_NS_LONG_CONSTANT("http\\Client\\Curl", "IPRESOLVE_V4", CURL_IPRESOLVE_V4, CONST_CS|CONST_PERSISTENT);
1951 REGISTER_NS_LONG_CONSTANT("http\\Client\\Curl", "IPRESOLVE_V6", CURL_IPRESOLVE_V6, CONST_CS|CONST_PERSISTENT);
1952 REGISTER_NS_LONG_CONSTANT("http\\Client\\Curl", "IPRESOLVE_ANY", CURL_IPRESOLVE_WHATEVER, CONST_CS|CONST_PERSISTENT);
1953
1954 /*
1955 * Auth Constants
1956 */
1957 REGISTER_NS_LONG_CONSTANT("http\\Client\\Curl", "AUTH_BASIC", CURLAUTH_BASIC, CONST_CS|CONST_PERSISTENT);
1958 REGISTER_NS_LONG_CONSTANT("http\\Client\\Curl", "AUTH_DIGEST", CURLAUTH_DIGEST, CONST_CS|CONST_PERSISTENT);
1959 #if PHP_HTTP_CURL_VERSION(7,19,3)
1960 REGISTER_NS_LONG_CONSTANT("http\\Client\\Curl", "AUTH_DIGEST_IE", CURLAUTH_DIGEST_IE, CONST_CS|CONST_PERSISTENT);
1961 #endif
1962 REGISTER_NS_LONG_CONSTANT("http\\Client\\Curl", "AUTH_NTLM", CURLAUTH_NTLM, CONST_CS|CONST_PERSISTENT);
1963 REGISTER_NS_LONG_CONSTANT("http\\Client\\Curl", "AUTH_GSSNEG", CURLAUTH_GSSNEGOTIATE, CONST_CS|CONST_PERSISTENT);
1964 REGISTER_NS_LONG_CONSTANT("http\\Client\\Curl", "AUTH_ANY", CURLAUTH_ANY, CONST_CS|CONST_PERSISTENT);
1965
1966 /*
1967 * Proxy Type Constants
1968 */
1969 REGISTER_NS_LONG_CONSTANT("http\\Client\\Curl", "PROXY_SOCKS4", CURLPROXY_SOCKS4, CONST_CS|CONST_PERSISTENT);
1970 REGISTER_NS_LONG_CONSTANT("http\\Client\\Curl", "PROXY_SOCKS4A", CURLPROXY_SOCKS5, CONST_CS|CONST_PERSISTENT);
1971 REGISTER_NS_LONG_CONSTANT("http\\Client\\Curl", "PROXY_SOCKS5_HOSTNAME", CURLPROXY_SOCKS5, CONST_CS|CONST_PERSISTENT);
1972 REGISTER_NS_LONG_CONSTANT("http\\Client\\Curl", "PROXY_SOCKS5", CURLPROXY_SOCKS5, CONST_CS|CONST_PERSISTENT);
1973 REGISTER_NS_LONG_CONSTANT("http\\Client\\Curl", "PROXY_HTTP", CURLPROXY_HTTP, CONST_CS|CONST_PERSISTENT);
1974 # if PHP_HTTP_CURL_VERSION(7,19,4)
1975 REGISTER_NS_LONG_CONSTANT("http\\Client\\Curl", "PROXY_HTTP_1_0", CURLPROXY_HTTP_1_0, CONST_CS|CONST_PERSISTENT);
1976 # endif
1977
1978 /*
1979 * Post Redirection Constants
1980 */
1981 #if PHP_HTTP_CURL_VERSION(7,19,1)
1982 REGISTER_NS_LONG_CONSTANT("http\\Client\\Curl", "POSTREDIR_301", CURL_REDIR_POST_301, CONST_CS|CONST_PERSISTENT);
1983 REGISTER_NS_LONG_CONSTANT("http\\Client\\Curl", "POSTREDIR_302", CURL_REDIR_POST_302, CONST_CS|CONST_PERSISTENT);
1984 REGISTER_NS_LONG_CONSTANT("http\\Client\\Curl", "POSTREDIR_ALL", CURL_REDIR_POST_ALL, CONST_CS|CONST_PERSISTENT);
1985 #endif
1986
1987 return SUCCESS;
1988 }
1989
1990 PHP_MSHUTDOWN_FUNCTION(http_client_curl)
1991 {
1992 php_persistent_handle_cleanup(ZEND_STRL("http\\Client\\Curl"), NULL, 0 TSRMLS_CC);
1993 php_persistent_handle_cleanup(ZEND_STRL("http\\Client\\Curl\\Request"), NULL, 0 TSRMLS_CC);
1994
1995 php_http_options_dtor(&php_http_curle_options);
1996
1997 return SUCCESS;
1998 }
1999
2000 #if PHP_HTTP_HAVE_EVENT
2001 PHP_RINIT_FUNCTION(http_client_curl)
2002 {
2003 if (!PHP_HTTP_G->curl.event_base && !(PHP_HTTP_G->curl.event_base = event_base_new())) {
2004 return FAILURE;
2005 }
2006 return SUCCESS;
2007 }
2008 PHP_RSHUTDOWN_FUNCTION(http_client_curl)
2009 {
2010 if (PHP_HTTP_G->curl.event_base) {
2011 event_base_free(PHP_HTTP_G->curl.event_base);
2012 PHP_HTTP_G->curl.event_base = NULL;
2013 }
2014 return SUCCESS;
2015 }
2016 #endif /* PHP_HTTP_HAVE_EVENT */
2017
2018 #endif /* PHP_HTTP_HAVE_CURL */
2019
2020 /*
2021 * Local variables:
2022 * tab-width: 4
2023 * c-basic-offset: 4
2024 * End:
2025 * vim600: noet sw=4 ts=4 fdm=marker
2026 * vim<600: noet sw=4 ts=4
2027 */