submodule: Use cat instead of echo to avoid DOS line-endings
[git/dscho.git] / http.c
blob12987ad416367ac1eb82d33562402a09fa48f91d
1 #include "http.h"
2 #include "pack.h"
3 #include "sideband.h"
4 #include "run-command.h"
5 #include "url.h"
6 #include "credential.h"
7 #include "exec_cmd.h"
9 int data_received;
10 int active_requests;
11 int http_is_verbose;
12 size_t http_post_buffer = 16 * LARGE_PACKET_MAX;
14 #if LIBCURL_VERSION_NUM >= 0x070a06
15 #define LIBCURL_CAN_HANDLE_AUTH_ANY
16 #endif
18 static int min_curl_sessions = 1;
19 static int curl_session_count;
20 #ifdef USE_CURL_MULTI
21 static int max_requests = -1;
22 static CURLM *curlm;
23 #endif
24 #ifndef NO_CURL_EASY_DUPHANDLE
25 static CURL *curl_default;
26 #endif
28 #define PREV_BUF_SIZE 4096
29 #define RANGE_HEADER_SIZE 30
31 char curl_errorstr[CURL_ERROR_SIZE];
33 static int curl_ssl_verify = -1;
34 static const char *ssl_cert;
35 #if LIBCURL_VERSION_NUM >= 0x070903
36 static const char *ssl_key;
37 #endif
38 #if LIBCURL_VERSION_NUM >= 0x070908
39 static const char *ssl_capath;
40 #endif
41 static const char *ssl_cainfo;
42 static long curl_low_speed_limit = -1;
43 static long curl_low_speed_time = -1;
44 static int curl_ftp_no_epsv;
45 static const char *curl_http_proxy;
46 static const char *curl_cookie_file;
47 static struct credential http_auth;
48 static const char *user_agent;
50 #if LIBCURL_VERSION_NUM >= 0x071700
51 /* Use CURLOPT_KEYPASSWD as is */
52 #elif LIBCURL_VERSION_NUM >= 0x070903
53 #define CURLOPT_KEYPASSWD CURLOPT_SSLKEYPASSWD
54 #else
55 #define CURLOPT_KEYPASSWD CURLOPT_SSLCERTPASSWD
56 #endif
58 static struct credential cert_auth;
59 static int ssl_cert_password_required;
61 static struct curl_slist *pragma_header;
62 static struct curl_slist *no_pragma_header;
64 static struct active_request_slot *active_queue_head;
66 size_t fread_buffer(char *ptr, size_t eltsize, size_t nmemb, void *buffer_)
68 size_t size = eltsize * nmemb;
69 struct buffer *buffer = buffer_;
71 if (size > buffer->buf.len - buffer->posn)
72 size = buffer->buf.len - buffer->posn;
73 memcpy(ptr, buffer->buf.buf + buffer->posn, size);
74 buffer->posn += size;
76 return size;
79 #ifndef NO_CURL_IOCTL
80 curlioerr ioctl_buffer(CURL *handle, int cmd, void *clientp)
82 struct buffer *buffer = clientp;
84 switch (cmd) {
85 case CURLIOCMD_NOP:
86 return CURLIOE_OK;
88 case CURLIOCMD_RESTARTREAD:
89 buffer->posn = 0;
90 return CURLIOE_OK;
92 default:
93 return CURLIOE_UNKNOWNCMD;
96 #endif
98 size_t fwrite_buffer(char *ptr, size_t eltsize, size_t nmemb, void *buffer_)
100 size_t size = eltsize * nmemb;
101 struct strbuf *buffer = buffer_;
103 strbuf_add(buffer, ptr, size);
104 data_received++;
105 return size;
108 size_t fwrite_null(char *ptr, size_t eltsize, size_t nmemb, void *strbuf)
110 data_received++;
111 return eltsize * nmemb;
114 #ifdef USE_CURL_MULTI
115 static void process_curl_messages(void)
117 int num_messages;
118 struct active_request_slot *slot;
119 CURLMsg *curl_message = curl_multi_info_read(curlm, &num_messages);
121 while (curl_message != NULL) {
122 if (curl_message->msg == CURLMSG_DONE) {
123 int curl_result = curl_message->data.result;
124 slot = active_queue_head;
125 while (slot != NULL &&
126 slot->curl != curl_message->easy_handle)
127 slot = slot->next;
128 if (slot != NULL) {
129 curl_multi_remove_handle(curlm, slot->curl);
130 slot->curl_result = curl_result;
131 finish_active_slot(slot);
132 } else {
133 fprintf(stderr, "Received DONE message for unknown request!\n");
135 } else {
136 fprintf(stderr, "Unknown CURL message received: %d\n",
137 (int)curl_message->msg);
139 curl_message = curl_multi_info_read(curlm, &num_messages);
142 #endif
144 static int git_config_path(const char **result,
145 const char *var, const char *value)
147 if (git_config_string(result, var, value))
148 return 1;
149 #ifdef __MINGW32__
150 if (**result == '/')
151 *result = system_path((*result) + 1);
152 #endif
153 return 0;
156 static int http_options(const char *var, const char *value, void *cb)
158 if (!strcmp("http.sslverify", var)) {
159 curl_ssl_verify = git_config_bool(var, value);
160 return 0;
162 if (!strcmp("http.sslcert", var))
163 return git_config_path(&ssl_cert, var, value);
164 #if LIBCURL_VERSION_NUM >= 0x070903
165 if (!strcmp("http.sslkey", var))
166 return git_config_path(&ssl_key, var, value);
167 #endif
168 #if LIBCURL_VERSION_NUM >= 0x070908
169 if (!strcmp("http.sslcapath", var))
170 return git_config_path(&ssl_capath, var, value);
171 #endif
172 if (!strcmp("http.sslcainfo", var))
173 return git_config_path(&ssl_cainfo, var, value);
174 if (!strcmp("http.sslcertpasswordprotected", var)) {
175 if (git_config_bool(var, value))
176 ssl_cert_password_required = 1;
177 return 0;
179 if (!strcmp("http.minsessions", var)) {
180 min_curl_sessions = git_config_int(var, value);
181 #ifndef USE_CURL_MULTI
182 if (min_curl_sessions > 1)
183 min_curl_sessions = 1;
184 #endif
185 return 0;
187 #ifdef USE_CURL_MULTI
188 if (!strcmp("http.maxrequests", var)) {
189 max_requests = git_config_int(var, value);
190 return 0;
192 #endif
193 if (!strcmp("http.lowspeedlimit", var)) {
194 curl_low_speed_limit = (long)git_config_int(var, value);
195 return 0;
197 if (!strcmp("http.lowspeedtime", var)) {
198 curl_low_speed_time = (long)git_config_int(var, value);
199 return 0;
202 if (!strcmp("http.noepsv", var)) {
203 curl_ftp_no_epsv = git_config_bool(var, value);
204 return 0;
206 if (!strcmp("http.proxy", var))
207 return git_config_string(&curl_http_proxy, var, value);
209 if (!strcmp("http.cookiefile", var))
210 return git_config_string(&curl_cookie_file, var, value);
212 if (!strcmp("http.postbuffer", var)) {
213 http_post_buffer = git_config_int(var, value);
214 if (http_post_buffer < LARGE_PACKET_MAX)
215 http_post_buffer = LARGE_PACKET_MAX;
216 return 0;
219 if (!strcmp("http.useragent", var))
220 return git_config_string(&user_agent, var, value);
222 /* Fall back on the default ones */
223 return git_default_config(var, value, cb);
226 static void init_curl_http_auth(CURL *result)
228 if (http_auth.username) {
229 struct strbuf up = STRBUF_INIT;
230 credential_fill(&http_auth, NULL);
231 strbuf_addf(&up, "%s:%s",
232 http_auth.username, http_auth.password);
233 curl_easy_setopt(result, CURLOPT_USERPWD,
234 strbuf_detach(&up, NULL));
238 static int has_cert_password(void)
240 if (ssl_cert == NULL || ssl_cert_password_required != 1)
241 return 0;
242 if (!cert_auth.description)
243 cert_auth.description = "certificate";
244 if (!cert_auth.unique) {
245 struct strbuf unique = STRBUF_INIT;
246 strbuf_addf(&unique, "cert:%s", ssl_cert);
247 cert_auth.unique = strbuf_detach(&unique, NULL);
249 if (!cert_auth.username)
250 cert_auth.username = xstrdup("");
251 credential_fill(&cert_auth, NULL);
252 return 1;
255 static CURL *get_curl_handle(void)
257 CURL *result = curl_easy_init();
259 if (!curl_ssl_verify) {
260 curl_easy_setopt(result, CURLOPT_SSL_VERIFYPEER, 0);
261 curl_easy_setopt(result, CURLOPT_SSL_VERIFYHOST, 0);
262 } else {
263 /* Verify authenticity of the peer's certificate */
264 curl_easy_setopt(result, CURLOPT_SSL_VERIFYPEER, 1);
265 /* The name in the cert must match whom we tried to connect */
266 curl_easy_setopt(result, CURLOPT_SSL_VERIFYHOST, 2);
269 #if LIBCURL_VERSION_NUM >= 0x070907
270 curl_easy_setopt(result, CURLOPT_NETRC, CURL_NETRC_OPTIONAL);
271 #endif
272 #ifdef LIBCURL_CAN_HANDLE_AUTH_ANY
273 curl_easy_setopt(result, CURLOPT_HTTPAUTH, CURLAUTH_ANY);
274 #endif
276 init_curl_http_auth(result);
278 if (ssl_cert != NULL)
279 curl_easy_setopt(result, CURLOPT_SSLCERT, ssl_cert);
280 if (has_cert_password())
281 curl_easy_setopt(result, CURLOPT_KEYPASSWD, cert_auth.password);
282 #if LIBCURL_VERSION_NUM >= 0x070903
283 if (ssl_key != NULL)
284 curl_easy_setopt(result, CURLOPT_SSLKEY, ssl_key);
285 #endif
286 #if LIBCURL_VERSION_NUM >= 0x070908
287 if (ssl_capath != NULL)
288 curl_easy_setopt(result, CURLOPT_CAPATH, ssl_capath);
289 #endif
290 if (ssl_cainfo != NULL)
291 curl_easy_setopt(result, CURLOPT_CAINFO, ssl_cainfo);
292 curl_easy_setopt(result, CURLOPT_FAILONERROR, 1);
294 if (curl_low_speed_limit > 0 && curl_low_speed_time > 0) {
295 curl_easy_setopt(result, CURLOPT_LOW_SPEED_LIMIT,
296 curl_low_speed_limit);
297 curl_easy_setopt(result, CURLOPT_LOW_SPEED_TIME,
298 curl_low_speed_time);
301 curl_easy_setopt(result, CURLOPT_FOLLOWLOCATION, 1);
302 #if LIBCURL_VERSION_NUM >= 0x071301
303 curl_easy_setopt(result, CURLOPT_POSTREDIR, CURL_REDIR_POST_ALL);
304 #elif LIBCURL_VERSION_NUM >= 0x071101
305 curl_easy_setopt(result, CURLOPT_POST301, 1);
306 #endif
308 if (getenv("GIT_CURL_VERBOSE"))
309 curl_easy_setopt(result, CURLOPT_VERBOSE, 1);
311 curl_easy_setopt(result, CURLOPT_USERAGENT,
312 user_agent ? user_agent : GIT_HTTP_USER_AGENT);
314 if (curl_ftp_no_epsv)
315 curl_easy_setopt(result, CURLOPT_FTP_USE_EPSV, 0);
317 if (curl_http_proxy)
318 curl_easy_setopt(result, CURLOPT_PROXY, curl_http_proxy);
320 return result;
323 static void http_auth_init(const char *url)
325 const char *at, *colon, *cp, *slash, *host, *proto_end;
326 struct strbuf unique = STRBUF_INIT;
328 proto_end = strstr(url, "://");
329 if (!proto_end)
330 return;
333 * Ok, the URL looks like "proto://something". Which one?
334 * "proto://<user>:<pass>@<host>/...",
335 * "proto://<user>@<host>/...", or just
336 * "proto://<host>/..."?
338 cp = proto_end + 3;
339 at = strchr(cp, '@');
340 colon = strchr(cp, ':');
341 slash = strchrnul(cp, '/');
343 if (!at || slash <= at) {
344 /* No credentials, but we may have to ask for some later */
345 host = cp;
347 else if (!colon || at <= colon) {
348 /* Only username */
349 http_auth.username = url_decode_mem(cp, at - cp);
350 host = at + 1;
351 } else {
352 http_auth.username = url_decode_mem(cp, colon - cp);
353 http_auth.password = url_decode_mem(colon + 1, at - (colon + 1));
354 host = at + 1;
357 http_auth.description = url_decode_mem(host, slash - host);
359 strbuf_add(&unique, url, proto_end - url);
360 strbuf_addch(&unique, ':');
361 strbuf_addstr(&unique, http_auth.description);
362 http_auth.unique = strbuf_detach(&unique, NULL);
365 static void set_from_env(const char **var, const char *envname)
367 const char *val = getenv(envname);
368 if (val)
369 *var = val;
372 void http_init(struct remote *remote)
374 char *low_speed_limit;
375 char *low_speed_time;
377 http_is_verbose = 0;
379 git_config(http_options, NULL);
381 curl_global_init(CURL_GLOBAL_ALL);
383 if (remote && remote->http_proxy)
384 curl_http_proxy = xstrdup(remote->http_proxy);
386 pragma_header = curl_slist_append(pragma_header, "Pragma: no-cache");
387 no_pragma_header = curl_slist_append(no_pragma_header, "Pragma:");
389 #ifdef USE_CURL_MULTI
391 char *http_max_requests = getenv("GIT_HTTP_MAX_REQUESTS");
392 if (http_max_requests != NULL)
393 max_requests = atoi(http_max_requests);
396 curlm = curl_multi_init();
397 if (curlm == NULL) {
398 fprintf(stderr, "Error creating curl multi handle.\n");
399 exit(1);
401 #endif
403 if (getenv("GIT_SSL_NO_VERIFY"))
404 curl_ssl_verify = 0;
406 set_from_env(&ssl_cert, "GIT_SSL_CERT");
407 #if LIBCURL_VERSION_NUM >= 0x070903
408 set_from_env(&ssl_key, "GIT_SSL_KEY");
409 #endif
410 #if LIBCURL_VERSION_NUM >= 0x070908
411 set_from_env(&ssl_capath, "GIT_SSL_CAPATH");
412 #endif
413 set_from_env(&ssl_cainfo, "GIT_SSL_CAINFO");
415 set_from_env(&user_agent, "GIT_HTTP_USER_AGENT");
417 low_speed_limit = getenv("GIT_HTTP_LOW_SPEED_LIMIT");
418 if (low_speed_limit != NULL)
419 curl_low_speed_limit = strtol(low_speed_limit, NULL, 10);
420 low_speed_time = getenv("GIT_HTTP_LOW_SPEED_TIME");
421 if (low_speed_time != NULL)
422 curl_low_speed_time = strtol(low_speed_time, NULL, 10);
424 if (curl_ssl_verify == -1)
425 curl_ssl_verify = 1;
427 curl_session_count = 0;
428 #ifdef USE_CURL_MULTI
429 if (max_requests < 1)
430 max_requests = DEFAULT_MAX_REQUESTS;
431 #endif
433 if (getenv("GIT_CURL_FTP_NO_EPSV"))
434 curl_ftp_no_epsv = 1;
436 if (remote && remote->url && remote->url[0]) {
437 http_auth_init(remote->url[0]);
438 if (!ssl_cert_password_required &&
439 getenv("GIT_SSL_CERT_PASSWORD_PROTECTED") &&
440 !prefixcmp(remote->url[0], "https://"))
441 ssl_cert_password_required = 1;
444 #ifndef NO_CURL_EASY_DUPHANDLE
445 curl_default = get_curl_handle();
446 #endif
449 void http_cleanup(void)
451 struct active_request_slot *slot = active_queue_head;
453 while (slot != NULL) {
454 struct active_request_slot *next = slot->next;
455 if (slot->curl != NULL) {
456 #ifdef USE_CURL_MULTI
457 curl_multi_remove_handle(curlm, slot->curl);
458 #endif
459 curl_easy_cleanup(slot->curl);
461 free(slot);
462 slot = next;
464 active_queue_head = NULL;
466 #ifndef NO_CURL_EASY_DUPHANDLE
467 curl_easy_cleanup(curl_default);
468 #endif
470 #ifdef USE_CURL_MULTI
471 curl_multi_cleanup(curlm);
472 #endif
473 curl_global_cleanup();
475 curl_slist_free_all(pragma_header);
476 pragma_header = NULL;
478 curl_slist_free_all(no_pragma_header);
479 no_pragma_header = NULL;
481 if (curl_http_proxy) {
482 free((void *)curl_http_proxy);
483 curl_http_proxy = NULL;
486 if (cert_auth.password) {
487 memset(cert_auth.password, 0, strlen(cert_auth.password));
488 free(cert_auth.password);
489 cert_auth.password = NULL;
491 ssl_cert_password_required = 0;
494 struct active_request_slot *get_active_slot(void)
496 struct active_request_slot *slot = active_queue_head;
497 struct active_request_slot *newslot;
499 #ifdef USE_CURL_MULTI
500 int num_transfers;
502 /* Wait for a slot to open up if the queue is full */
503 while (active_requests >= max_requests) {
504 curl_multi_perform(curlm, &num_transfers);
505 if (num_transfers < active_requests)
506 process_curl_messages();
508 #endif
510 while (slot != NULL && slot->in_use)
511 slot = slot->next;
513 if (slot == NULL) {
514 newslot = xmalloc(sizeof(*newslot));
515 newslot->curl = NULL;
516 newslot->in_use = 0;
517 newslot->next = NULL;
519 slot = active_queue_head;
520 if (slot == NULL) {
521 active_queue_head = newslot;
522 } else {
523 while (slot->next != NULL)
524 slot = slot->next;
525 slot->next = newslot;
527 slot = newslot;
530 if (slot->curl == NULL) {
531 #ifdef NO_CURL_EASY_DUPHANDLE
532 slot->curl = get_curl_handle();
533 #else
534 slot->curl = curl_easy_duphandle(curl_default);
535 #endif
536 curl_session_count++;
539 active_requests++;
540 slot->in_use = 1;
541 slot->local = NULL;
542 slot->results = NULL;
543 slot->finished = NULL;
544 slot->callback_data = NULL;
545 slot->callback_func = NULL;
546 curl_easy_setopt(slot->curl, CURLOPT_COOKIEFILE, curl_cookie_file);
547 curl_easy_setopt(slot->curl, CURLOPT_HTTPHEADER, pragma_header);
548 curl_easy_setopt(slot->curl, CURLOPT_ERRORBUFFER, curl_errorstr);
549 curl_easy_setopt(slot->curl, CURLOPT_CUSTOMREQUEST, NULL);
550 curl_easy_setopt(slot->curl, CURLOPT_READFUNCTION, NULL);
551 curl_easy_setopt(slot->curl, CURLOPT_WRITEFUNCTION, NULL);
552 curl_easy_setopt(slot->curl, CURLOPT_POSTFIELDS, NULL);
553 curl_easy_setopt(slot->curl, CURLOPT_UPLOAD, 0);
554 curl_easy_setopt(slot->curl, CURLOPT_HTTPGET, 1);
556 return slot;
559 int start_active_slot(struct active_request_slot *slot)
561 #ifdef USE_CURL_MULTI
562 CURLMcode curlm_result = curl_multi_add_handle(curlm, slot->curl);
563 int num_transfers;
565 if (curlm_result != CURLM_OK &&
566 curlm_result != CURLM_CALL_MULTI_PERFORM) {
567 active_requests--;
568 slot->in_use = 0;
569 return 0;
573 * We know there must be something to do, since we just added
574 * something.
576 curl_multi_perform(curlm, &num_transfers);
577 #endif
578 return 1;
581 #ifdef USE_CURL_MULTI
582 struct fill_chain {
583 void *data;
584 int (*fill)(void *);
585 struct fill_chain *next;
588 static struct fill_chain *fill_cfg;
590 void add_fill_function(void *data, int (*fill)(void *))
592 struct fill_chain *new = xmalloc(sizeof(*new));
593 struct fill_chain **linkp = &fill_cfg;
594 new->data = data;
595 new->fill = fill;
596 new->next = NULL;
597 while (*linkp)
598 linkp = &(*linkp)->next;
599 *linkp = new;
602 void fill_active_slots(void)
604 struct active_request_slot *slot = active_queue_head;
606 while (active_requests < max_requests) {
607 struct fill_chain *fill;
608 for (fill = fill_cfg; fill; fill = fill->next)
609 if (fill->fill(fill->data))
610 break;
612 if (!fill)
613 break;
616 while (slot != NULL) {
617 if (!slot->in_use && slot->curl != NULL
618 && curl_session_count > min_curl_sessions) {
619 curl_easy_cleanup(slot->curl);
620 slot->curl = NULL;
621 curl_session_count--;
623 slot = slot->next;
627 void step_active_slots(void)
629 int num_transfers;
630 CURLMcode curlm_result;
632 do {
633 curlm_result = curl_multi_perform(curlm, &num_transfers);
634 } while (curlm_result == CURLM_CALL_MULTI_PERFORM);
635 if (num_transfers < active_requests) {
636 process_curl_messages();
637 fill_active_slots();
640 #endif
642 void run_active_slot(struct active_request_slot *slot)
644 #ifdef USE_CURL_MULTI
645 long last_pos = 0;
646 long current_pos;
647 fd_set readfds;
648 fd_set writefds;
649 fd_set excfds;
650 int max_fd;
651 struct timeval select_timeout;
652 int finished = 0;
654 slot->finished = &finished;
655 while (!finished) {
656 data_received = 0;
657 step_active_slots();
659 if (!data_received && slot->local != NULL) {
660 current_pos = ftell(slot->local);
661 if (current_pos > last_pos)
662 data_received++;
663 last_pos = current_pos;
666 if (slot->in_use && !data_received) {
667 max_fd = 0;
668 FD_ZERO(&readfds);
669 FD_ZERO(&writefds);
670 FD_ZERO(&excfds);
671 select_timeout.tv_sec = 0;
672 select_timeout.tv_usec = 50000;
673 select(max_fd, &readfds, &writefds,
674 &excfds, &select_timeout);
677 #else
678 while (slot->in_use) {
679 slot->curl_result = curl_easy_perform(slot->curl);
680 finish_active_slot(slot);
682 #endif
685 static void closedown_active_slot(struct active_request_slot *slot)
687 active_requests--;
688 slot->in_use = 0;
691 static void release_active_slot(struct active_request_slot *slot)
693 closedown_active_slot(slot);
694 if (slot->curl && curl_session_count > min_curl_sessions) {
695 #ifdef USE_CURL_MULTI
696 curl_multi_remove_handle(curlm, slot->curl);
697 #endif
698 curl_easy_cleanup(slot->curl);
699 slot->curl = NULL;
700 curl_session_count--;
702 #ifdef USE_CURL_MULTI
703 fill_active_slots();
704 #endif
707 void finish_active_slot(struct active_request_slot *slot)
709 closedown_active_slot(slot);
710 curl_easy_getinfo(slot->curl, CURLINFO_HTTP_CODE, &slot->http_code);
712 if (slot->finished != NULL)
713 (*slot->finished) = 1;
715 /* Store slot results so they can be read after the slot is reused */
716 if (slot->results != NULL) {
717 slot->results->curl_result = slot->curl_result;
718 slot->results->http_code = slot->http_code;
721 /* Run callback if appropriate */
722 if (slot->callback_func != NULL)
723 slot->callback_func(slot->callback_data);
726 void finish_all_active_slots(void)
728 struct active_request_slot *slot = active_queue_head;
730 while (slot != NULL)
731 if (slot->in_use) {
732 run_active_slot(slot);
733 slot = active_queue_head;
734 } else {
735 slot = slot->next;
739 /* Helpers for modifying and creating URLs */
740 static inline int needs_quote(int ch)
742 if (((ch >= 'A') && (ch <= 'Z'))
743 || ((ch >= 'a') && (ch <= 'z'))
744 || ((ch >= '0') && (ch <= '9'))
745 || (ch == '/')
746 || (ch == '-')
747 || (ch == '.'))
748 return 0;
749 return 1;
752 static inline int hex(int v)
754 if (v < 10)
755 return '0' + v;
756 else
757 return 'A' + v - 10;
760 static char *quote_ref_url(const char *base, const char *ref)
762 struct strbuf buf = STRBUF_INIT;
763 const char *cp;
764 int ch;
766 end_url_with_slash(&buf, base);
768 for (cp = ref; (ch = *cp) != 0; cp++)
769 if (needs_quote(ch))
770 strbuf_addf(&buf, "%%%02x", ch);
771 else
772 strbuf_addch(&buf, *cp);
774 return strbuf_detach(&buf, NULL);
777 void append_remote_object_url(struct strbuf *buf, const char *url,
778 const char *hex,
779 int only_two_digit_prefix)
781 end_url_with_slash(buf, url);
783 strbuf_addf(buf, "objects/%.*s/", 2, hex);
784 if (!only_two_digit_prefix)
785 strbuf_addf(buf, "%s", hex+2);
788 char *get_remote_object_url(const char *url, const char *hex,
789 int only_two_digit_prefix)
791 struct strbuf buf = STRBUF_INIT;
792 append_remote_object_url(&buf, url, hex, only_two_digit_prefix);
793 return strbuf_detach(&buf, NULL);
796 /* http_request() targets */
797 #define HTTP_REQUEST_STRBUF 0
798 #define HTTP_REQUEST_FILE 1
800 static int http_request(const char *url, void *result, int target, int options)
802 struct active_request_slot *slot;
803 struct slot_results results;
804 struct curl_slist *headers = NULL;
805 struct strbuf buf = STRBUF_INIT;
806 int ret;
808 slot = get_active_slot();
809 slot->results = &results;
810 curl_easy_setopt(slot->curl, CURLOPT_HTTPGET, 1);
812 if (result == NULL) {
813 curl_easy_setopt(slot->curl, CURLOPT_NOBODY, 1);
814 } else {
815 curl_easy_setopt(slot->curl, CURLOPT_NOBODY, 0);
816 curl_easy_setopt(slot->curl, CURLOPT_FILE, result);
818 if (target == HTTP_REQUEST_FILE) {
819 long posn = ftell(result);
820 curl_easy_setopt(slot->curl, CURLOPT_WRITEFUNCTION,
821 fwrite);
822 if (posn > 0) {
823 strbuf_addf(&buf, "Range: bytes=%ld-", posn);
824 headers = curl_slist_append(headers, buf.buf);
825 strbuf_reset(&buf);
827 slot->local = result;
828 } else
829 curl_easy_setopt(slot->curl, CURLOPT_WRITEFUNCTION,
830 fwrite_buffer);
833 strbuf_addstr(&buf, "Pragma:");
834 if (options & HTTP_NO_CACHE)
835 strbuf_addstr(&buf, " no-cache");
837 headers = curl_slist_append(headers, buf.buf);
839 curl_easy_setopt(slot->curl, CURLOPT_URL, url);
840 curl_easy_setopt(slot->curl, CURLOPT_HTTPHEADER, headers);
842 if (start_active_slot(slot)) {
843 run_active_slot(slot);
844 if (results.curl_result == CURLE_OK)
845 ret = HTTP_OK;
846 else if (missing_target(&results))
847 ret = HTTP_MISSING_TARGET;
848 else if (results.http_code == 401) {
849 if (http_auth.username) {
850 credential_reject(&http_auth, NULL);
851 ret = HTTP_NOAUTH;
852 } else {
853 credential_fill(&http_auth, NULL);
854 init_curl_http_auth(slot->curl);
855 ret = HTTP_REAUTH;
857 } else
858 ret = HTTP_ERROR;
859 } else {
860 error("Unable to start HTTP request for %s", url);
861 ret = HTTP_START_FAILED;
864 slot->local = NULL;
865 curl_slist_free_all(headers);
866 strbuf_release(&buf);
868 return ret;
871 static int http_request_reauth(const char *url, void *result, int target,
872 int options)
874 int ret = http_request(url, result, target, options);
875 if (ret != HTTP_REAUTH)
876 return ret;
877 return http_request(url, result, target, options);
880 int http_get_strbuf(const char *url, struct strbuf *result, int options)
882 return http_request_reauth(url, result, HTTP_REQUEST_STRBUF, options);
886 * Downloads an url and stores the result in the given file.
888 * If a previous interrupted download is detected (i.e. a previous temporary
889 * file is still around) the download is resumed.
891 static int http_get_file(const char *url, const char *filename, int options)
893 int ret;
894 struct strbuf tmpfile = STRBUF_INIT;
895 FILE *result;
897 strbuf_addf(&tmpfile, "%s.temp", filename);
898 result = fopen(tmpfile.buf, "a");
899 if (! result) {
900 error("Unable to open local file %s", tmpfile.buf);
901 ret = HTTP_ERROR;
902 goto cleanup;
905 ret = http_request_reauth(url, result, HTTP_REQUEST_FILE, options);
906 fclose(result);
908 if ((ret == HTTP_OK) && move_temp_to_file(tmpfile.buf, filename))
909 ret = HTTP_ERROR;
910 cleanup:
911 strbuf_release(&tmpfile);
912 return ret;
915 int http_error(const char *url, int ret)
917 /* http_request has already handled HTTP_START_FAILED. */
918 if (ret != HTTP_START_FAILED)
919 error("%s while accessing %s\n", curl_errorstr, url);
921 return ret;
924 int http_fetch_ref(const char *base, struct ref *ref)
926 char *url;
927 struct strbuf buffer = STRBUF_INIT;
928 int ret = -1;
930 url = quote_ref_url(base, ref->name);
931 if (http_get_strbuf(url, &buffer, HTTP_NO_CACHE) == HTTP_OK) {
932 strbuf_rtrim(&buffer);
933 if (buffer.len == 40)
934 ret = get_sha1_hex(buffer.buf, ref->old_sha1);
935 else if (!prefixcmp(buffer.buf, "ref: ")) {
936 ref->symref = xstrdup(buffer.buf + 5);
937 ret = 0;
941 strbuf_release(&buffer);
942 free(url);
943 return ret;
946 /* Helpers for fetching packs */
947 static char *fetch_pack_index(unsigned char *sha1, const char *base_url)
949 char *url, *tmp;
950 struct strbuf buf = STRBUF_INIT;
952 if (http_is_verbose)
953 fprintf(stderr, "Getting index for pack %s\n", sha1_to_hex(sha1));
955 end_url_with_slash(&buf, base_url);
956 strbuf_addf(&buf, "objects/pack/pack-%s.idx", sha1_to_hex(sha1));
957 url = strbuf_detach(&buf, NULL);
959 strbuf_addf(&buf, "%s.temp", sha1_pack_index_name(sha1));
960 tmp = strbuf_detach(&buf, NULL);
962 if (http_get_file(url, tmp, 0) != HTTP_OK) {
963 error("Unable to get pack index %s\n", url);
964 free(tmp);
965 tmp = NULL;
968 free(url);
969 return tmp;
972 static int fetch_and_setup_pack_index(struct packed_git **packs_head,
973 unsigned char *sha1, const char *base_url)
975 struct packed_git *new_pack;
976 char *tmp_idx = NULL;
977 int ret;
979 if (has_pack_index(sha1)) {
980 new_pack = parse_pack_index(sha1, NULL);
981 if (!new_pack)
982 return -1; /* parse_pack_index() already issued error message */
983 goto add_pack;
986 tmp_idx = fetch_pack_index(sha1, base_url);
987 if (!tmp_idx)
988 return -1;
990 new_pack = parse_pack_index(sha1, tmp_idx);
991 if (!new_pack) {
992 unlink(tmp_idx);
993 free(tmp_idx);
995 return -1; /* parse_pack_index() already issued error message */
998 ret = verify_pack_index(new_pack);
999 if (!ret) {
1000 close_pack_index(new_pack);
1001 ret = move_temp_to_file(tmp_idx, sha1_pack_index_name(sha1));
1003 free(tmp_idx);
1004 if (ret)
1005 return -1;
1007 add_pack:
1008 new_pack->next = *packs_head;
1009 *packs_head = new_pack;
1010 return 0;
1013 int http_get_info_packs(const char *base_url, struct packed_git **packs_head)
1015 int ret = 0, i = 0;
1016 char *url, *data;
1017 struct strbuf buf = STRBUF_INIT;
1018 unsigned char sha1[20];
1020 end_url_with_slash(&buf, base_url);
1021 strbuf_addstr(&buf, "objects/info/packs");
1022 url = strbuf_detach(&buf, NULL);
1024 ret = http_get_strbuf(url, &buf, HTTP_NO_CACHE);
1025 if (ret != HTTP_OK)
1026 goto cleanup;
1028 data = buf.buf;
1029 while (i < buf.len) {
1030 switch (data[i]) {
1031 case 'P':
1032 i++;
1033 if (i + 52 <= buf.len &&
1034 !prefixcmp(data + i, " pack-") &&
1035 !prefixcmp(data + i + 46, ".pack\n")) {
1036 get_sha1_hex(data + i + 6, sha1);
1037 fetch_and_setup_pack_index(packs_head, sha1,
1038 base_url);
1039 i += 51;
1040 break;
1042 default:
1043 while (i < buf.len && data[i] != '\n')
1044 i++;
1046 i++;
1049 cleanup:
1050 free(url);
1051 return ret;
1054 void release_http_pack_request(struct http_pack_request *preq)
1056 if (preq->packfile != NULL) {
1057 fclose(preq->packfile);
1058 preq->packfile = NULL;
1059 preq->slot->local = NULL;
1061 if (preq->range_header != NULL) {
1062 curl_slist_free_all(preq->range_header);
1063 preq->range_header = NULL;
1065 preq->slot = NULL;
1066 free(preq->url);
1069 int finish_http_pack_request(struct http_pack_request *preq)
1071 struct packed_git **lst;
1072 struct packed_git *p = preq->target;
1073 char *tmp_idx;
1074 struct child_process ip;
1075 const char *ip_argv[8];
1077 close_pack_index(p);
1079 fclose(preq->packfile);
1080 preq->packfile = NULL;
1081 preq->slot->local = NULL;
1083 lst = preq->lst;
1084 while (*lst != p)
1085 lst = &((*lst)->next);
1086 *lst = (*lst)->next;
1088 tmp_idx = xstrdup(preq->tmpfile);
1089 strcpy(tmp_idx + strlen(tmp_idx) - strlen(".pack.temp"),
1090 ".idx.temp");
1092 ip_argv[0] = "index-pack";
1093 ip_argv[1] = "-o";
1094 ip_argv[2] = tmp_idx;
1095 ip_argv[3] = preq->tmpfile;
1096 ip_argv[4] = NULL;
1098 memset(&ip, 0, sizeof(ip));
1099 ip.argv = ip_argv;
1100 ip.git_cmd = 1;
1101 ip.no_stdin = 1;
1102 ip.no_stdout = 1;
1104 if (run_command(&ip)) {
1105 unlink(preq->tmpfile);
1106 unlink(tmp_idx);
1107 free(tmp_idx);
1108 return -1;
1111 unlink(sha1_pack_index_name(p->sha1));
1113 if (move_temp_to_file(preq->tmpfile, sha1_pack_name(p->sha1))
1114 || move_temp_to_file(tmp_idx, sha1_pack_index_name(p->sha1))) {
1115 free(tmp_idx);
1116 return -1;
1119 install_packed_git(p);
1120 free(tmp_idx);
1121 return 0;
1124 struct http_pack_request *new_http_pack_request(
1125 struct packed_git *target, const char *base_url)
1127 long prev_posn = 0;
1128 char range[RANGE_HEADER_SIZE];
1129 struct strbuf buf = STRBUF_INIT;
1130 struct http_pack_request *preq;
1132 preq = xcalloc(1, sizeof(*preq));
1133 preq->target = target;
1135 end_url_with_slash(&buf, base_url);
1136 strbuf_addf(&buf, "objects/pack/pack-%s.pack",
1137 sha1_to_hex(target->sha1));
1138 preq->url = strbuf_detach(&buf, NULL);
1140 snprintf(preq->tmpfile, sizeof(preq->tmpfile), "%s.temp",
1141 sha1_pack_name(target->sha1));
1142 preq->packfile = fopen(preq->tmpfile, "a");
1143 if (!preq->packfile) {
1144 error("Unable to open local file %s for pack",
1145 preq->tmpfile);
1146 goto abort;
1149 preq->slot = get_active_slot();
1150 preq->slot->local = preq->packfile;
1151 curl_easy_setopt(preq->slot->curl, CURLOPT_FILE, preq->packfile);
1152 curl_easy_setopt(preq->slot->curl, CURLOPT_WRITEFUNCTION, fwrite);
1153 curl_easy_setopt(preq->slot->curl, CURLOPT_URL, preq->url);
1154 curl_easy_setopt(preq->slot->curl, CURLOPT_HTTPHEADER,
1155 no_pragma_header);
1158 * If there is data present from a previous transfer attempt,
1159 * resume where it left off
1161 prev_posn = ftell(preq->packfile);
1162 if (prev_posn>0) {
1163 if (http_is_verbose)
1164 fprintf(stderr,
1165 "Resuming fetch of pack %s at byte %ld\n",
1166 sha1_to_hex(target->sha1), prev_posn);
1167 sprintf(range, "Range: bytes=%ld-", prev_posn);
1168 preq->range_header = curl_slist_append(NULL, range);
1169 curl_easy_setopt(preq->slot->curl, CURLOPT_HTTPHEADER,
1170 preq->range_header);
1173 return preq;
1175 abort:
1176 free(preq->url);
1177 free(preq);
1178 return NULL;
1181 /* Helpers for fetching objects (loose) */
1182 static size_t fwrite_sha1_file(char *ptr, size_t eltsize, size_t nmemb,
1183 void *data)
1185 unsigned char expn[4096];
1186 size_t size = eltsize * nmemb;
1187 int posn = 0;
1188 struct http_object_request *freq =
1189 (struct http_object_request *)data;
1190 do {
1191 ssize_t retval = xwrite(freq->localfile,
1192 (char *) ptr + posn, size - posn);
1193 if (retval < 0)
1194 return posn;
1195 posn += retval;
1196 } while (posn < size);
1198 freq->stream.avail_in = size;
1199 freq->stream.next_in = (void *)ptr;
1200 do {
1201 freq->stream.next_out = expn;
1202 freq->stream.avail_out = sizeof(expn);
1203 freq->zret = git_inflate(&freq->stream, Z_SYNC_FLUSH);
1204 git_SHA1_Update(&freq->c, expn,
1205 sizeof(expn) - freq->stream.avail_out);
1206 } while (freq->stream.avail_in && freq->zret == Z_OK);
1207 data_received++;
1208 return size;
1211 struct http_object_request *new_http_object_request(const char *base_url,
1212 unsigned char *sha1)
1214 char *hex = sha1_to_hex(sha1);
1215 char *filename;
1216 char prevfile[PATH_MAX];
1217 int prevlocal;
1218 char prev_buf[PREV_BUF_SIZE];
1219 ssize_t prev_read = 0;
1220 long prev_posn = 0;
1221 char range[RANGE_HEADER_SIZE];
1222 struct curl_slist *range_header = NULL;
1223 struct http_object_request *freq;
1225 freq = xcalloc(1, sizeof(*freq));
1226 hashcpy(freq->sha1, sha1);
1227 freq->localfile = -1;
1229 filename = sha1_file_name(sha1);
1230 snprintf(freq->tmpfile, sizeof(freq->tmpfile),
1231 "%s.temp", filename);
1233 snprintf(prevfile, sizeof(prevfile), "%s.prev", filename);
1234 unlink_or_warn(prevfile);
1235 rename(freq->tmpfile, prevfile);
1236 unlink_or_warn(freq->tmpfile);
1238 if (freq->localfile != -1)
1239 error("fd leakage in start: %d", freq->localfile);
1240 freq->localfile = open(freq->tmpfile,
1241 O_WRONLY | O_CREAT | O_EXCL, 0666);
1243 * This could have failed due to the "lazy directory creation";
1244 * try to mkdir the last path component.
1246 if (freq->localfile < 0 && errno == ENOENT) {
1247 char *dir = strrchr(freq->tmpfile, '/');
1248 if (dir) {
1249 *dir = 0;
1250 mkdir(freq->tmpfile, 0777);
1251 *dir = '/';
1253 freq->localfile = open(freq->tmpfile,
1254 O_WRONLY | O_CREAT | O_EXCL, 0666);
1257 if (freq->localfile < 0) {
1258 error("Couldn't create temporary file %s: %s",
1259 freq->tmpfile, strerror(errno));
1260 goto abort;
1263 git_inflate_init(&freq->stream);
1265 git_SHA1_Init(&freq->c);
1267 freq->url = get_remote_object_url(base_url, hex, 0);
1270 * If a previous temp file is present, process what was already
1271 * fetched.
1273 prevlocal = open(prevfile, O_RDONLY);
1274 if (prevlocal != -1) {
1275 do {
1276 prev_read = xread(prevlocal, prev_buf, PREV_BUF_SIZE);
1277 if (prev_read>0) {
1278 if (fwrite_sha1_file(prev_buf,
1280 prev_read,
1281 freq) == prev_read) {
1282 prev_posn += prev_read;
1283 } else {
1284 prev_read = -1;
1287 } while (prev_read > 0);
1288 close(prevlocal);
1290 unlink_or_warn(prevfile);
1293 * Reset inflate/SHA1 if there was an error reading the previous temp
1294 * file; also rewind to the beginning of the local file.
1296 if (prev_read == -1) {
1297 memset(&freq->stream, 0, sizeof(freq->stream));
1298 git_inflate_init(&freq->stream);
1299 git_SHA1_Init(&freq->c);
1300 if (prev_posn>0) {
1301 prev_posn = 0;
1302 lseek(freq->localfile, 0, SEEK_SET);
1303 if (ftruncate(freq->localfile, 0) < 0) {
1304 error("Couldn't truncate temporary file %s: %s",
1305 freq->tmpfile, strerror(errno));
1306 goto abort;
1311 freq->slot = get_active_slot();
1313 curl_easy_setopt(freq->slot->curl, CURLOPT_FILE, freq);
1314 curl_easy_setopt(freq->slot->curl, CURLOPT_WRITEFUNCTION, fwrite_sha1_file);
1315 curl_easy_setopt(freq->slot->curl, CURLOPT_ERRORBUFFER, freq->errorstr);
1316 curl_easy_setopt(freq->slot->curl, CURLOPT_URL, freq->url);
1317 curl_easy_setopt(freq->slot->curl, CURLOPT_HTTPHEADER, no_pragma_header);
1320 * If we have successfully processed data from a previous fetch
1321 * attempt, only fetch the data we don't already have.
1323 if (prev_posn>0) {
1324 if (http_is_verbose)
1325 fprintf(stderr,
1326 "Resuming fetch of object %s at byte %ld\n",
1327 hex, prev_posn);
1328 sprintf(range, "Range: bytes=%ld-", prev_posn);
1329 range_header = curl_slist_append(range_header, range);
1330 curl_easy_setopt(freq->slot->curl,
1331 CURLOPT_HTTPHEADER, range_header);
1334 return freq;
1336 abort:
1337 free(freq->url);
1338 free(freq);
1339 return NULL;
1342 void process_http_object_request(struct http_object_request *freq)
1344 if (freq->slot == NULL)
1345 return;
1346 freq->curl_result = freq->slot->curl_result;
1347 freq->http_code = freq->slot->http_code;
1348 freq->slot = NULL;
1351 int finish_http_object_request(struct http_object_request *freq)
1353 struct stat st;
1355 close(freq->localfile);
1356 freq->localfile = -1;
1358 process_http_object_request(freq);
1360 if (freq->http_code == 416) {
1361 warning("requested range invalid; we may already have all the data.");
1362 } else if (freq->curl_result != CURLE_OK) {
1363 if (stat(freq->tmpfile, &st) == 0)
1364 if (st.st_size == 0)
1365 unlink_or_warn(freq->tmpfile);
1366 return -1;
1369 git_inflate_end(&freq->stream);
1370 git_SHA1_Final(freq->real_sha1, &freq->c);
1371 if (freq->zret != Z_STREAM_END) {
1372 unlink_or_warn(freq->tmpfile);
1373 return -1;
1375 if (hashcmp(freq->sha1, freq->real_sha1)) {
1376 unlink_or_warn(freq->tmpfile);
1377 return -1;
1379 freq->rename =
1380 move_temp_to_file(freq->tmpfile, sha1_file_name(freq->sha1));
1382 return freq->rename;
1385 void abort_http_object_request(struct http_object_request *freq)
1387 unlink_or_warn(freq->tmpfile);
1389 release_http_object_request(freq);
1392 void release_http_object_request(struct http_object_request *freq)
1394 if (freq->localfile != -1) {
1395 close(freq->localfile);
1396 freq->localfile = -1;
1398 if (freq->url != NULL) {
1399 free(freq->url);
1400 freq->url = NULL;
1402 if (freq->slot != NULL) {
1403 freq->slot->callback_func = NULL;
1404 freq->slot->callback_data = NULL;
1405 release_active_slot(freq->slot);
1406 freq->slot = NULL;