read_index(): fix reading extension size on BE 64-bit archs
[git/dscho.git] / http.c
blobd2c11aee9077e0834c5c56b1284df478eb8debbc
1 #include "http.h"
3 int data_received;
4 int active_requests = 0;
6 #ifdef USE_CURL_MULTI
7 static int max_requests = -1;
8 static CURLM *curlm;
9 #endif
10 #ifndef NO_CURL_EASY_DUPHANDLE
11 static CURL *curl_default;
12 #endif
13 char curl_errorstr[CURL_ERROR_SIZE];
15 static int curl_ssl_verify = -1;
16 static char *ssl_cert = NULL;
17 #if LIBCURL_VERSION_NUM >= 0x070902
18 static char *ssl_key = NULL;
19 #endif
20 #if LIBCURL_VERSION_NUM >= 0x070908
21 static char *ssl_capath = NULL;
22 #endif
23 static char *ssl_cainfo = NULL;
24 static long curl_low_speed_limit = -1;
25 static long curl_low_speed_time = -1;
26 static int curl_ftp_no_epsv = 0;
27 static char *curl_http_proxy = NULL;
29 static struct curl_slist *pragma_header;
31 static 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->buf.len - buffer->posn)
38 size = buffer->buf.len - buffer->posn;
39 memcpy(ptr, buffer->buf.buf + buffer->posn, size);
40 buffer->posn += size;
42 return size;
45 size_t fwrite_buffer(const void *ptr, size_t eltsize,
46 size_t nmemb, struct strbuf *buffer)
48 size_t size = eltsize * nmemb;
49 strbuf_add(buffer, ptr, size);
50 data_received++;
51 return size;
54 size_t fwrite_null(const void *ptr, size_t eltsize,
55 size_t nmemb, struct strbuf *buffer)
57 data_received++;
58 return eltsize * nmemb;
61 static void finish_active_slot(struct active_request_slot *slot);
63 #ifdef USE_CURL_MULTI
64 static void process_curl_messages(void)
66 int num_messages;
67 struct active_request_slot *slot;
68 CURLMsg *curl_message = curl_multi_info_read(curlm, &num_messages);
70 while (curl_message != NULL) {
71 if (curl_message->msg == CURLMSG_DONE) {
72 int curl_result = curl_message->data.result;
73 slot = active_queue_head;
74 while (slot != NULL &&
75 slot->curl != curl_message->easy_handle)
76 slot = slot->next;
77 if (slot != NULL) {
78 curl_multi_remove_handle(curlm, slot->curl);
79 slot->curl_result = curl_result;
80 finish_active_slot(slot);
81 } else {
82 fprintf(stderr, "Received DONE message for unknown request!\n");
84 } else {
85 fprintf(stderr, "Unknown CURL message received: %d\n",
86 (int)curl_message->msg);
88 curl_message = curl_multi_info_read(curlm, &num_messages);
91 #endif
93 static int http_options(const char *var, const char *value)
95 if (!strcmp("http.sslverify", var)) {
96 if (curl_ssl_verify == -1) {
97 curl_ssl_verify = git_config_bool(var, value);
99 return 0;
102 if (!strcmp("http.sslcert", var)) {
103 if (ssl_cert == NULL) {
104 ssl_cert = xmalloc(strlen(value)+1);
105 strcpy(ssl_cert, value);
107 return 0;
109 #if LIBCURL_VERSION_NUM >= 0x070902
110 if (!strcmp("http.sslkey", var)) {
111 if (ssl_key == NULL) {
112 ssl_key = xmalloc(strlen(value)+1);
113 strcpy(ssl_key, value);
115 return 0;
117 #endif
118 #if LIBCURL_VERSION_NUM >= 0x070908
119 if (!strcmp("http.sslcapath", var)) {
120 if (ssl_capath == NULL) {
121 ssl_capath = xmalloc(strlen(value)+1);
122 strcpy(ssl_capath, value);
124 return 0;
126 #endif
127 if (!strcmp("http.sslcainfo", var)) {
128 if (ssl_cainfo == NULL) {
129 ssl_cainfo = xmalloc(strlen(value)+1);
130 strcpy(ssl_cainfo, value);
132 return 0;
135 #ifdef USE_CURL_MULTI
136 if (!strcmp("http.maxrequests", var)) {
137 if (max_requests == -1)
138 max_requests = git_config_int(var, value);
139 return 0;
141 #endif
143 if (!strcmp("http.lowspeedlimit", var)) {
144 if (curl_low_speed_limit == -1)
145 curl_low_speed_limit = (long)git_config_int(var, value);
146 return 0;
148 if (!strcmp("http.lowspeedtime", var)) {
149 if (curl_low_speed_time == -1)
150 curl_low_speed_time = (long)git_config_int(var, value);
151 return 0;
154 if (!strcmp("http.noepsv", var)) {
155 curl_ftp_no_epsv = git_config_bool(var, value);
156 return 0;
158 if (!strcmp("http.proxy", var)) {
159 if (curl_http_proxy == NULL) {
160 curl_http_proxy = xmalloc(strlen(value)+1);
161 strcpy(curl_http_proxy, value);
163 return 0;
166 /* Fall back on the default ones */
167 return git_default_config(var, value);
170 static CURL* get_curl_handle(void)
172 CURL* result = curl_easy_init();
174 curl_easy_setopt(result, CURLOPT_SSL_VERIFYPEER, curl_ssl_verify);
175 #if LIBCURL_VERSION_NUM >= 0x070907
176 curl_easy_setopt(result, CURLOPT_NETRC, CURL_NETRC_OPTIONAL);
177 #endif
179 if (ssl_cert != NULL)
180 curl_easy_setopt(result, CURLOPT_SSLCERT, ssl_cert);
181 #if LIBCURL_VERSION_NUM >= 0x070902
182 if (ssl_key != NULL)
183 curl_easy_setopt(result, CURLOPT_SSLKEY, ssl_key);
184 #endif
185 #if LIBCURL_VERSION_NUM >= 0x070908
186 if (ssl_capath != NULL)
187 curl_easy_setopt(result, CURLOPT_CAPATH, ssl_capath);
188 #endif
189 if (ssl_cainfo != NULL)
190 curl_easy_setopt(result, CURLOPT_CAINFO, ssl_cainfo);
191 curl_easy_setopt(result, CURLOPT_FAILONERROR, 1);
193 if (curl_low_speed_limit > 0 && curl_low_speed_time > 0) {
194 curl_easy_setopt(result, CURLOPT_LOW_SPEED_LIMIT,
195 curl_low_speed_limit);
196 curl_easy_setopt(result, CURLOPT_LOW_SPEED_TIME,
197 curl_low_speed_time);
200 curl_easy_setopt(result, CURLOPT_FOLLOWLOCATION, 1);
202 if (getenv("GIT_CURL_VERBOSE"))
203 curl_easy_setopt(result, CURLOPT_VERBOSE, 1);
205 curl_easy_setopt(result, CURLOPT_USERAGENT, GIT_USER_AGENT);
207 if (curl_ftp_no_epsv)
208 curl_easy_setopt(result, CURLOPT_FTP_USE_EPSV, 0);
210 if (curl_http_proxy)
211 curl_easy_setopt(result, CURLOPT_PROXY, curl_http_proxy);
213 return result;
216 void http_init(void)
218 char *low_speed_limit;
219 char *low_speed_time;
221 curl_global_init(CURL_GLOBAL_ALL);
223 pragma_header = curl_slist_append(pragma_header, "Pragma: no-cache");
225 #ifdef USE_CURL_MULTI
227 char *http_max_requests = getenv("GIT_HTTP_MAX_REQUESTS");
228 if (http_max_requests != NULL)
229 max_requests = atoi(http_max_requests);
232 curlm = curl_multi_init();
233 if (curlm == NULL) {
234 fprintf(stderr, "Error creating curl multi handle.\n");
235 exit(1);
237 #endif
239 if (getenv("GIT_SSL_NO_VERIFY"))
240 curl_ssl_verify = 0;
242 ssl_cert = getenv("GIT_SSL_CERT");
243 #if LIBCURL_VERSION_NUM >= 0x070902
244 ssl_key = getenv("GIT_SSL_KEY");
245 #endif
246 #if LIBCURL_VERSION_NUM >= 0x070908
247 ssl_capath = getenv("GIT_SSL_CAPATH");
248 #endif
249 ssl_cainfo = getenv("GIT_SSL_CAINFO");
251 low_speed_limit = getenv("GIT_HTTP_LOW_SPEED_LIMIT");
252 if (low_speed_limit != NULL)
253 curl_low_speed_limit = strtol(low_speed_limit, NULL, 10);
254 low_speed_time = getenv("GIT_HTTP_LOW_SPEED_TIME");
255 if (low_speed_time != NULL)
256 curl_low_speed_time = strtol(low_speed_time, NULL, 10);
258 git_config(http_options);
260 if (curl_ssl_verify == -1)
261 curl_ssl_verify = 1;
263 #ifdef USE_CURL_MULTI
264 if (max_requests < 1)
265 max_requests = DEFAULT_MAX_REQUESTS;
266 #endif
268 if (getenv("GIT_CURL_FTP_NO_EPSV"))
269 curl_ftp_no_epsv = 1;
271 #ifndef NO_CURL_EASY_DUPHANDLE
272 curl_default = get_curl_handle();
273 #endif
276 void http_cleanup(void)
278 struct active_request_slot *slot = active_queue_head;
279 #ifdef USE_CURL_MULTI
280 char *wait_url;
281 #endif
283 while (slot != NULL) {
284 struct active_request_slot *next = slot->next;
285 #ifdef USE_CURL_MULTI
286 if (slot->in_use) {
287 curl_easy_getinfo(slot->curl,
288 CURLINFO_EFFECTIVE_URL,
289 &wait_url);
290 fprintf(stderr, "Waiting for %s\n", wait_url);
291 run_active_slot(slot);
293 #endif
294 if (slot->curl != NULL)
295 curl_easy_cleanup(slot->curl);
296 free(slot);
297 slot = next;
299 active_queue_head = NULL;
301 #ifndef NO_CURL_EASY_DUPHANDLE
302 curl_easy_cleanup(curl_default);
303 #endif
305 #ifdef USE_CURL_MULTI
306 curl_multi_cleanup(curlm);
307 #endif
308 curl_global_cleanup();
310 curl_slist_free_all(pragma_header);
311 pragma_header = NULL;
314 struct active_request_slot *get_active_slot(void)
316 struct active_request_slot *slot = active_queue_head;
317 struct active_request_slot *newslot;
319 #ifdef USE_CURL_MULTI
320 int num_transfers;
322 /* Wait for a slot to open up if the queue is full */
323 while (active_requests >= max_requests) {
324 curl_multi_perform(curlm, &num_transfers);
325 if (num_transfers < active_requests) {
326 process_curl_messages();
329 #endif
331 while (slot != NULL && slot->in_use) {
332 slot = slot->next;
334 if (slot == NULL) {
335 newslot = xmalloc(sizeof(*newslot));
336 newslot->curl = NULL;
337 newslot->in_use = 0;
338 newslot->next = NULL;
340 slot = active_queue_head;
341 if (slot == NULL) {
342 active_queue_head = newslot;
343 } else {
344 while (slot->next != NULL) {
345 slot = slot->next;
347 slot->next = newslot;
349 slot = newslot;
352 if (slot->curl == NULL) {
353 #ifdef NO_CURL_EASY_DUPHANDLE
354 slot->curl = get_curl_handle();
355 #else
356 slot->curl = curl_easy_duphandle(curl_default);
357 #endif
360 active_requests++;
361 slot->in_use = 1;
362 slot->local = NULL;
363 slot->results = NULL;
364 slot->finished = NULL;
365 slot->callback_data = NULL;
366 slot->callback_func = NULL;
367 curl_easy_setopt(slot->curl, CURLOPT_HTTPHEADER, pragma_header);
368 curl_easy_setopt(slot->curl, CURLOPT_ERRORBUFFER, curl_errorstr);
369 curl_easy_setopt(slot->curl, CURLOPT_CUSTOMREQUEST, NULL);
370 curl_easy_setopt(slot->curl, CURLOPT_READFUNCTION, NULL);
371 curl_easy_setopt(slot->curl, CURLOPT_WRITEFUNCTION, NULL);
372 curl_easy_setopt(slot->curl, CURLOPT_UPLOAD, 0);
373 curl_easy_setopt(slot->curl, CURLOPT_HTTPGET, 1);
375 return slot;
378 int start_active_slot(struct active_request_slot *slot)
380 #ifdef USE_CURL_MULTI
381 CURLMcode curlm_result = curl_multi_add_handle(curlm, slot->curl);
382 int num_transfers;
384 if (curlm_result != CURLM_OK &&
385 curlm_result != CURLM_CALL_MULTI_PERFORM) {
386 active_requests--;
387 slot->in_use = 0;
388 return 0;
392 * We know there must be something to do, since we just added
393 * something.
395 curl_multi_perform(curlm, &num_transfers);
396 #endif
397 return 1;
400 #ifdef USE_CURL_MULTI
401 struct fill_chain {
402 void *data;
403 int (*fill)(void *);
404 struct fill_chain *next;
407 static struct fill_chain *fill_cfg = NULL;
409 void add_fill_function(void *data, int (*fill)(void *))
411 struct fill_chain *new = malloc(sizeof(*new));
412 struct fill_chain **linkp = &fill_cfg;
413 new->data = data;
414 new->fill = fill;
415 new->next = NULL;
416 while (*linkp)
417 linkp = &(*linkp)->next;
418 *linkp = new;
421 void fill_active_slots(void)
423 struct active_request_slot *slot = active_queue_head;
425 while (active_requests < max_requests) {
426 struct fill_chain *fill;
427 for (fill = fill_cfg; fill; fill = fill->next)
428 if (fill->fill(fill->data))
429 break;
431 if (!fill)
432 break;
435 while (slot != NULL) {
436 if (!slot->in_use && slot->curl != NULL) {
437 curl_easy_cleanup(slot->curl);
438 slot->curl = NULL;
440 slot = slot->next;
444 void step_active_slots(void)
446 int num_transfers;
447 CURLMcode curlm_result;
449 do {
450 curlm_result = curl_multi_perform(curlm, &num_transfers);
451 } while (curlm_result == CURLM_CALL_MULTI_PERFORM);
452 if (num_transfers < active_requests) {
453 process_curl_messages();
454 fill_active_slots();
457 #endif
459 void run_active_slot(struct active_request_slot *slot)
461 #ifdef USE_CURL_MULTI
462 long last_pos = 0;
463 long current_pos;
464 fd_set readfds;
465 fd_set writefds;
466 fd_set excfds;
467 int max_fd;
468 struct timeval select_timeout;
469 int finished = 0;
471 slot->finished = &finished;
472 while (!finished) {
473 data_received = 0;
474 step_active_slots();
476 if (!data_received && slot->local != NULL) {
477 current_pos = ftell(slot->local);
478 if (current_pos > last_pos)
479 data_received++;
480 last_pos = current_pos;
483 if (slot->in_use && !data_received) {
484 max_fd = 0;
485 FD_ZERO(&readfds);
486 FD_ZERO(&writefds);
487 FD_ZERO(&excfds);
488 select_timeout.tv_sec = 0;
489 select_timeout.tv_usec = 50000;
490 select(max_fd, &readfds, &writefds,
491 &excfds, &select_timeout);
494 #else
495 while (slot->in_use) {
496 slot->curl_result = curl_easy_perform(slot->curl);
497 finish_active_slot(slot);
499 #endif
502 static void closedown_active_slot(struct active_request_slot *slot)
504 active_requests--;
505 slot->in_use = 0;
508 void release_active_slot(struct active_request_slot *slot)
510 closedown_active_slot(slot);
511 if (slot->curl) {
512 #ifdef USE_CURL_MULTI
513 curl_multi_remove_handle(curlm, slot->curl);
514 #endif
515 curl_easy_cleanup(slot->curl);
516 slot->curl = NULL;
518 #ifdef USE_CURL_MULTI
519 fill_active_slots();
520 #endif
523 static void finish_active_slot(struct active_request_slot *slot)
525 closedown_active_slot(slot);
526 curl_easy_getinfo(slot->curl, CURLINFO_HTTP_CODE, &slot->http_code);
528 if (slot->finished != NULL)
529 (*slot->finished) = 1;
531 /* Store slot results so they can be read after the slot is reused */
532 if (slot->results != NULL) {
533 slot->results->curl_result = slot->curl_result;
534 slot->results->http_code = slot->http_code;
537 /* Run callback if appropriate */
538 if (slot->callback_func != NULL) {
539 slot->callback_func(slot->callback_data);
543 void finish_all_active_slots(void)
545 struct active_request_slot *slot = active_queue_head;
547 while (slot != NULL)
548 if (slot->in_use) {
549 run_active_slot(slot);
550 slot = active_queue_head;
551 } else {
552 slot = slot->next;
556 static inline int needs_quote(int ch)
558 if (((ch >= 'A') && (ch <= 'Z'))
559 || ((ch >= 'a') && (ch <= 'z'))
560 || ((ch >= '0') && (ch <= '9'))
561 || (ch == '/')
562 || (ch == '-')
563 || (ch == '.'))
564 return 0;
565 return 1;
568 static inline int hex(int v)
570 if (v < 10) return '0' + v;
571 else return 'A' + v - 10;
574 static char *quote_ref_url(const char *base, const char *ref)
576 const char *cp;
577 char *dp, *qref;
578 int len, baselen, ch;
580 baselen = strlen(base);
581 len = baselen + 7; /* "/refs/" + NUL */
582 for (cp = ref; (ch = *cp) != 0; cp++, len++)
583 if (needs_quote(ch))
584 len += 2; /* extra two hex plus replacement % */
585 qref = xmalloc(len);
586 memcpy(qref, base, baselen);
587 memcpy(qref + baselen, "/refs/", 6);
588 for (cp = ref, dp = qref + baselen + 6; (ch = *cp) != 0; cp++) {
589 if (needs_quote(ch)) {
590 *dp++ = '%';
591 *dp++ = hex((ch >> 4) & 0xF);
592 *dp++ = hex(ch & 0xF);
594 else
595 *dp++ = ch;
597 *dp = 0;
599 return qref;
602 int http_fetch_ref(const char *base, const char *ref, unsigned char *sha1)
604 char *url;
605 struct strbuf buffer = STRBUF_INIT;
606 struct active_request_slot *slot;
607 struct slot_results results;
608 int ret;
610 url = quote_ref_url(base, ref);
611 slot = get_active_slot();
612 slot->results = &results;
613 curl_easy_setopt(slot->curl, CURLOPT_FILE, &buffer);
614 curl_easy_setopt(slot->curl, CURLOPT_WRITEFUNCTION, fwrite_buffer);
615 curl_easy_setopt(slot->curl, CURLOPT_HTTPHEADER, NULL);
616 curl_easy_setopt(slot->curl, CURLOPT_URL, url);
617 if (start_active_slot(slot)) {
618 run_active_slot(slot);
619 if (results.curl_result == CURLE_OK) {
620 strbuf_rtrim(&buffer);
621 if (buffer.len == 40)
622 ret = get_sha1_hex(buffer.buf, sha1);
623 else
624 ret = 1;
625 } else {
626 ret = error("Couldn't get %s for %s\n%s",
627 url, ref, curl_errorstr);
629 } else {
630 ret = error("Unable to start request");
633 strbuf_release(&buffer);
634 free(url);
635 return ret;