Merge branch 'jc/addi-color'
[git/haiku.git] / http.c
blobe4aa9c19dbe7fd2ed948d5cca255a7db44a9472f
1 #include "http.h"
3 int data_received;
4 int active_requests = 0;
6 #ifdef USE_CURL_MULTI
7 int max_requests = -1;
8 CURLM *curlm;
9 #endif
10 #ifndef NO_CURL_EASY_DUPHANDLE
11 CURL *curl_default;
12 #endif
13 char curl_errorstr[CURL_ERROR_SIZE];
15 int curl_ssl_verify = -1;
16 char *ssl_cert = NULL;
17 #if LIBCURL_VERSION_NUM >= 0x070902
18 char *ssl_key = NULL;
19 #endif
20 #if LIBCURL_VERSION_NUM >= 0x070908
21 char *ssl_capath = NULL;
22 #endif
23 char *ssl_cainfo = NULL;
24 long curl_low_speed_limit = -1;
25 long curl_low_speed_time = -1;
26 int curl_ftp_no_epsv = 0;
27 char *curl_http_proxy = NULL;
29 struct curl_slist *pragma_header;
31 struct active_request_slot *active_queue_head = NULL;
33 size_t fread_buffer(void *ptr, size_t eltsize, size_t nmemb,
34 struct buffer *buffer)
36 size_t size = eltsize * nmemb;
37 if (size > buffer->size - buffer->posn)
38 size = buffer->size - buffer->posn;
39 memcpy(ptr, (char *) buffer->buffer + buffer->posn, size);
40 buffer->posn += size;
41 return size;
44 size_t fwrite_buffer(const void *ptr, size_t eltsize,
45 size_t nmemb, struct buffer *buffer)
47 size_t size = eltsize * nmemb;
48 if (size > buffer->size - buffer->posn) {
49 buffer->size = buffer->size * 3 / 2;
50 if (buffer->size < buffer->posn + size)
51 buffer->size = buffer->posn + size;
52 buffer->buffer = xrealloc(buffer->buffer, buffer->size);
54 memcpy((char *) buffer->buffer + buffer->posn, ptr, size);
55 buffer->posn += size;
56 data_received++;
57 return size;
60 size_t fwrite_null(const void *ptr, size_t eltsize,
61 size_t nmemb, struct buffer *buffer)
63 data_received++;
64 return eltsize * nmemb;
67 static void finish_active_slot(struct active_request_slot *slot);
69 #ifdef USE_CURL_MULTI
70 static void process_curl_messages(void)
72 int num_messages;
73 struct active_request_slot *slot;
74 CURLMsg *curl_message = curl_multi_info_read(curlm, &num_messages);
76 while (curl_message != NULL) {
77 if (curl_message->msg == CURLMSG_DONE) {
78 int curl_result = curl_message->data.result;
79 slot = active_queue_head;
80 while (slot != NULL &&
81 slot->curl != curl_message->easy_handle)
82 slot = slot->next;
83 if (slot != NULL) {
84 curl_multi_remove_handle(curlm, slot->curl);
85 slot->curl_result = curl_result;
86 finish_active_slot(slot);
87 } else {
88 fprintf(stderr, "Received DONE message for unknown request!\n");
90 } else {
91 fprintf(stderr, "Unknown CURL message received: %d\n",
92 (int)curl_message->msg);
94 curl_message = curl_multi_info_read(curlm, &num_messages);
97 #endif
99 static int http_options(const char *var, const char *value)
101 if (!strcmp("http.sslverify", var)) {
102 if (curl_ssl_verify == -1) {
103 curl_ssl_verify = git_config_bool(var, value);
105 return 0;
108 if (!strcmp("http.sslcert", var)) {
109 if (ssl_cert == NULL) {
110 ssl_cert = xmalloc(strlen(value)+1);
111 strcpy(ssl_cert, value);
113 return 0;
115 #if LIBCURL_VERSION_NUM >= 0x070902
116 if (!strcmp("http.sslkey", var)) {
117 if (ssl_key == NULL) {
118 ssl_key = xmalloc(strlen(value)+1);
119 strcpy(ssl_key, value);
121 return 0;
123 #endif
124 #if LIBCURL_VERSION_NUM >= 0x070908
125 if (!strcmp("http.sslcapath", var)) {
126 if (ssl_capath == NULL) {
127 ssl_capath = xmalloc(strlen(value)+1);
128 strcpy(ssl_capath, value);
130 return 0;
132 #endif
133 if (!strcmp("http.sslcainfo", var)) {
134 if (ssl_cainfo == NULL) {
135 ssl_cainfo = xmalloc(strlen(value)+1);
136 strcpy(ssl_cainfo, value);
138 return 0;
141 #ifdef USE_CURL_MULTI
142 if (!strcmp("http.maxrequests", var)) {
143 if (max_requests == -1)
144 max_requests = git_config_int(var, value);
145 return 0;
147 #endif
149 if (!strcmp("http.lowspeedlimit", var)) {
150 if (curl_low_speed_limit == -1)
151 curl_low_speed_limit = (long)git_config_int(var, value);
152 return 0;
154 if (!strcmp("http.lowspeedtime", var)) {
155 if (curl_low_speed_time == -1)
156 curl_low_speed_time = (long)git_config_int(var, value);
157 return 0;
160 if (!strcmp("http.noepsv", var)) {
161 curl_ftp_no_epsv = git_config_bool(var, value);
162 return 0;
164 if (!strcmp("http.proxy", var)) {
165 if (curl_http_proxy == NULL) {
166 curl_http_proxy = xmalloc(strlen(value)+1);
167 strcpy(curl_http_proxy, value);
169 return 0;
172 /* Fall back on the default ones */
173 return git_default_config(var, value);
176 static CURL* get_curl_handle(void)
178 CURL* result = curl_easy_init();
180 curl_easy_setopt(result, CURLOPT_SSL_VERIFYPEER, curl_ssl_verify);
181 #if LIBCURL_VERSION_NUM >= 0x070907
182 curl_easy_setopt(result, CURLOPT_NETRC, CURL_NETRC_OPTIONAL);
183 #endif
185 if (ssl_cert != NULL)
186 curl_easy_setopt(result, CURLOPT_SSLCERT, ssl_cert);
187 #if LIBCURL_VERSION_NUM >= 0x070902
188 if (ssl_key != NULL)
189 curl_easy_setopt(result, CURLOPT_SSLKEY, ssl_key);
190 #endif
191 #if LIBCURL_VERSION_NUM >= 0x070908
192 if (ssl_capath != NULL)
193 curl_easy_setopt(result, CURLOPT_CAPATH, ssl_capath);
194 #endif
195 if (ssl_cainfo != NULL)
196 curl_easy_setopt(result, CURLOPT_CAINFO, ssl_cainfo);
197 curl_easy_setopt(result, CURLOPT_FAILONERROR, 1);
199 if (curl_low_speed_limit > 0 && curl_low_speed_time > 0) {
200 curl_easy_setopt(result, CURLOPT_LOW_SPEED_LIMIT,
201 curl_low_speed_limit);
202 curl_easy_setopt(result, CURLOPT_LOW_SPEED_TIME,
203 curl_low_speed_time);
206 curl_easy_setopt(result, CURLOPT_FOLLOWLOCATION, 1);
208 if (getenv("GIT_CURL_VERBOSE"))
209 curl_easy_setopt(result, CURLOPT_VERBOSE, 1);
211 curl_easy_setopt(result, CURLOPT_USERAGENT, GIT_USER_AGENT);
213 if (curl_ftp_no_epsv)
214 curl_easy_setopt(result, CURLOPT_FTP_USE_EPSV, 0);
216 if (curl_http_proxy)
217 curl_easy_setopt(result, CURLOPT_PROXY, curl_http_proxy);
219 return result;
222 void http_init(void)
224 char *low_speed_limit;
225 char *low_speed_time;
227 curl_global_init(CURL_GLOBAL_ALL);
229 pragma_header = curl_slist_append(pragma_header, "Pragma: no-cache");
231 #ifdef USE_CURL_MULTI
233 char *http_max_requests = getenv("GIT_HTTP_MAX_REQUESTS");
234 if (http_max_requests != NULL)
235 max_requests = atoi(http_max_requests);
238 curlm = curl_multi_init();
239 if (curlm == NULL) {
240 fprintf(stderr, "Error creating curl multi handle.\n");
241 exit(1);
243 #endif
245 if (getenv("GIT_SSL_NO_VERIFY"))
246 curl_ssl_verify = 0;
248 ssl_cert = getenv("GIT_SSL_CERT");
249 #if LIBCURL_VERSION_NUM >= 0x070902
250 ssl_key = getenv("GIT_SSL_KEY");
251 #endif
252 #if LIBCURL_VERSION_NUM >= 0x070908
253 ssl_capath = getenv("GIT_SSL_CAPATH");
254 #endif
255 ssl_cainfo = getenv("GIT_SSL_CAINFO");
257 low_speed_limit = getenv("GIT_HTTP_LOW_SPEED_LIMIT");
258 if (low_speed_limit != NULL)
259 curl_low_speed_limit = strtol(low_speed_limit, NULL, 10);
260 low_speed_time = getenv("GIT_HTTP_LOW_SPEED_TIME");
261 if (low_speed_time != NULL)
262 curl_low_speed_time = strtol(low_speed_time, NULL, 10);
264 git_config(http_options);
266 if (curl_ssl_verify == -1)
267 curl_ssl_verify = 1;
269 #ifdef USE_CURL_MULTI
270 if (max_requests < 1)
271 max_requests = DEFAULT_MAX_REQUESTS;
272 #endif
274 if (getenv("GIT_CURL_FTP_NO_EPSV"))
275 curl_ftp_no_epsv = 1;
277 #ifndef NO_CURL_EASY_DUPHANDLE
278 curl_default = get_curl_handle();
279 #endif
282 void http_cleanup(void)
284 struct active_request_slot *slot = active_queue_head;
285 #ifdef USE_CURL_MULTI
286 char *wait_url;
287 #endif
289 while (slot != NULL) {
290 struct active_request_slot *next = slot->next;
291 #ifdef USE_CURL_MULTI
292 if (slot->in_use) {
293 curl_easy_getinfo(slot->curl,
294 CURLINFO_EFFECTIVE_URL,
295 &wait_url);
296 fprintf(stderr, "Waiting for %s\n", wait_url);
297 run_active_slot(slot);
299 #endif
300 if (slot->curl != NULL)
301 curl_easy_cleanup(slot->curl);
302 free(slot);
303 slot = next;
305 active_queue_head = NULL;
307 #ifndef NO_CURL_EASY_DUPHANDLE
308 curl_easy_cleanup(curl_default);
309 #endif
311 #ifdef USE_CURL_MULTI
312 curl_multi_cleanup(curlm);
313 #endif
314 curl_global_cleanup();
316 curl_slist_free_all(pragma_header);
317 pragma_header = NULL;
320 struct active_request_slot *get_active_slot(void)
322 struct active_request_slot *slot = active_queue_head;
323 struct active_request_slot *newslot;
325 #ifdef USE_CURL_MULTI
326 int num_transfers;
328 /* Wait for a slot to open up if the queue is full */
329 while (active_requests >= max_requests) {
330 curl_multi_perform(curlm, &num_transfers);
331 if (num_transfers < active_requests) {
332 process_curl_messages();
335 #endif
337 while (slot != NULL && slot->in_use) {
338 slot = slot->next;
340 if (slot == NULL) {
341 newslot = xmalloc(sizeof(*newslot));
342 newslot->curl = NULL;
343 newslot->in_use = 0;
344 newslot->next = NULL;
346 slot = active_queue_head;
347 if (slot == NULL) {
348 active_queue_head = newslot;
349 } else {
350 while (slot->next != NULL) {
351 slot = slot->next;
353 slot->next = newslot;
355 slot = newslot;
358 if (slot->curl == NULL) {
359 #ifdef NO_CURL_EASY_DUPHANDLE
360 slot->curl = get_curl_handle();
361 #else
362 slot->curl = curl_easy_duphandle(curl_default);
363 #endif
366 active_requests++;
367 slot->in_use = 1;
368 slot->local = NULL;
369 slot->results = NULL;
370 slot->finished = NULL;
371 slot->callback_data = NULL;
372 slot->callback_func = NULL;
373 curl_easy_setopt(slot->curl, CURLOPT_HTTPHEADER, NULL);
374 curl_easy_setopt(slot->curl, CURLOPT_HTTPHEADER, pragma_header);
375 curl_easy_setopt(slot->curl, CURLOPT_ERRORBUFFER, curl_errorstr);
376 curl_easy_setopt(slot->curl, CURLOPT_CUSTOMREQUEST, NULL);
377 curl_easy_setopt(slot->curl, CURLOPT_READFUNCTION, NULL);
378 curl_easy_setopt(slot->curl, CURLOPT_WRITEFUNCTION, NULL);
379 curl_easy_setopt(slot->curl, CURLOPT_UPLOAD, 0);
380 curl_easy_setopt(slot->curl, CURLOPT_HTTPGET, 1);
382 return slot;
385 int start_active_slot(struct active_request_slot *slot)
387 #ifdef USE_CURL_MULTI
388 CURLMcode curlm_result = curl_multi_add_handle(curlm, slot->curl);
389 int num_transfers;
391 if (curlm_result != CURLM_OK &&
392 curlm_result != CURLM_CALL_MULTI_PERFORM) {
393 active_requests--;
394 slot->in_use = 0;
395 return 0;
399 * We know there must be something to do, since we just added
400 * something.
402 curl_multi_perform(curlm, &num_transfers);
403 #endif
404 return 1;
407 #ifdef USE_CURL_MULTI
408 struct fill_chain {
409 void *data;
410 int (*fill)(void *);
411 struct fill_chain *next;
414 static struct fill_chain *fill_cfg = NULL;
416 void add_fill_function(void *data, int (*fill)(void *))
418 struct fill_chain *new = malloc(sizeof(*new));
419 struct fill_chain **linkp = &fill_cfg;
420 new->data = data;
421 new->fill = fill;
422 new->next = NULL;
423 while (*linkp)
424 linkp = &(*linkp)->next;
425 *linkp = new;
428 void fill_active_slots(void)
430 struct active_request_slot *slot = active_queue_head;
432 while (active_requests < max_requests) {
433 struct fill_chain *fill;
434 for (fill = fill_cfg; fill; fill = fill->next)
435 if (fill->fill(fill->data))
436 break;
438 if (!fill)
439 break;
442 while (slot != NULL) {
443 if (!slot->in_use && slot->curl != NULL) {
444 curl_easy_cleanup(slot->curl);
445 slot->curl = NULL;
447 slot = slot->next;
451 void step_active_slots(void)
453 int num_transfers;
454 CURLMcode curlm_result;
456 do {
457 curlm_result = curl_multi_perform(curlm, &num_transfers);
458 } while (curlm_result == CURLM_CALL_MULTI_PERFORM);
459 if (num_transfers < active_requests) {
460 process_curl_messages();
461 fill_active_slots();
464 #endif
466 void run_active_slot(struct active_request_slot *slot)
468 #ifdef USE_CURL_MULTI
469 long last_pos = 0;
470 long current_pos;
471 fd_set readfds;
472 fd_set writefds;
473 fd_set excfds;
474 int max_fd;
475 struct timeval select_timeout;
476 int finished = 0;
478 slot->finished = &finished;
479 while (!finished) {
480 data_received = 0;
481 step_active_slots();
483 if (!data_received && slot->local != NULL) {
484 current_pos = ftell(slot->local);
485 if (current_pos > last_pos)
486 data_received++;
487 last_pos = current_pos;
490 if (slot->in_use && !data_received) {
491 max_fd = 0;
492 FD_ZERO(&readfds);
493 FD_ZERO(&writefds);
494 FD_ZERO(&excfds);
495 select_timeout.tv_sec = 0;
496 select_timeout.tv_usec = 50000;
497 select(max_fd, &readfds, &writefds,
498 &excfds, &select_timeout);
501 #else
502 while (slot->in_use) {
503 slot->curl_result = curl_easy_perform(slot->curl);
504 finish_active_slot(slot);
506 #endif
509 static void closedown_active_slot(struct active_request_slot *slot)
511 active_requests--;
512 slot->in_use = 0;
515 void release_active_slot(struct active_request_slot *slot)
517 closedown_active_slot(slot);
518 if (slot->curl) {
519 #ifdef USE_CURL_MULTI
520 curl_multi_remove_handle(curlm, slot->curl);
521 #endif
522 curl_easy_cleanup(slot->curl);
523 slot->curl = NULL;
525 #ifdef USE_CURL_MULTI
526 fill_active_slots();
527 #endif
530 static void finish_active_slot(struct active_request_slot *slot)
532 closedown_active_slot(slot);
533 curl_easy_getinfo(slot->curl, CURLINFO_HTTP_CODE, &slot->http_code);
535 if (slot->finished != NULL)
536 (*slot->finished) = 1;
538 /* Store slot results so they can be read after the slot is reused */
539 if (slot->results != NULL) {
540 slot->results->curl_result = slot->curl_result;
541 slot->results->http_code = slot->http_code;
544 /* Run callback if appropriate */
545 if (slot->callback_func != NULL) {
546 slot->callback_func(slot->callback_data);
550 void finish_all_active_slots(void)
552 struct active_request_slot *slot = active_queue_head;
554 while (slot != NULL)
555 if (slot->in_use) {
556 run_active_slot(slot);
557 slot = active_queue_head;
558 } else {
559 slot = slot->next;