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