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