1 #include "git-compat-util.h"
5 #include "run-command.h"
8 #include "credential.h"
12 #include "transport.h"
16 size_t http_post_buffer
= 16 * LARGE_PACKET_MAX
;
18 #if LIBCURL_VERSION_NUM >= 0x070a06
19 #define LIBCURL_CAN_HANDLE_AUTH_ANY
22 static int min_curl_sessions
= 1;
23 static int curl_session_count
;
25 static int max_requests
= -1;
28 #ifndef NO_CURL_EASY_DUPHANDLE
29 static CURL
*curl_default
;
32 #define PREV_BUF_SIZE 4096
34 char curl_errorstr
[CURL_ERROR_SIZE
];
36 static int curl_ssl_verify
= -1;
37 static int curl_ssl_try
;
38 static const char *ssl_cert
;
39 static const char *ssl_cipherlist
;
40 static const char *ssl_version
;
45 { "sslv2", CURL_SSLVERSION_SSLv2
},
46 { "sslv3", CURL_SSLVERSION_SSLv3
},
47 { "tlsv1", CURL_SSLVERSION_TLSv1
},
48 #if LIBCURL_VERSION_NUM >= 0x072200
49 { "tlsv1.0", CURL_SSLVERSION_TLSv1_0
},
50 { "tlsv1.1", CURL_SSLVERSION_TLSv1_1
},
51 { "tlsv1.2", CURL_SSLVERSION_TLSv1_2
},
54 #if LIBCURL_VERSION_NUM >= 0x070903
55 static const char *ssl_key
;
57 #if LIBCURL_VERSION_NUM >= 0x070908
58 static const char *ssl_capath
;
60 static const char *ssl_cainfo
;
61 static long curl_low_speed_limit
= -1;
62 static long curl_low_speed_time
= -1;
63 static int curl_ftp_no_epsv
;
64 static const char *curl_http_proxy
;
65 static const char *http_proxy_authmethod
;
69 } proxy_authmethods
[] = {
70 { "basic", CURLAUTH_BASIC
},
71 { "digest", CURLAUTH_DIGEST
},
72 { "negotiate", CURLAUTH_GSSNEGOTIATE
},
73 { "ntlm", CURLAUTH_NTLM
},
74 #ifdef LIBCURL_CAN_HANDLE_AUTH_ANY
75 { "anyauth", CURLAUTH_ANY
},
78 * CURLAUTH_DIGEST_IE has no corresponding command-line option in
79 * curl(1) and is not included in CURLAUTH_ANY, so we leave it out
83 static const char *curl_cookie_file
;
84 static int curl_save_cookies
;
85 struct credential http_auth
= CREDENTIAL_INIT
;
86 static int http_proactive_auth
;
87 static const char *user_agent
;
89 #if LIBCURL_VERSION_NUM >= 0x071700
90 /* Use CURLOPT_KEYPASSWD as is */
91 #elif LIBCURL_VERSION_NUM >= 0x070903
92 #define CURLOPT_KEYPASSWD CURLOPT_SSLKEYPASSWD
94 #define CURLOPT_KEYPASSWD CURLOPT_SSLCERTPASSWD
97 static struct credential cert_auth
= CREDENTIAL_INIT
;
98 static int ssl_cert_password_required
;
99 #ifdef LIBCURL_CAN_HANDLE_AUTH_ANY
100 static unsigned long http_auth_methods
= CURLAUTH_ANY
;
103 static struct curl_slist
*pragma_header
;
104 static struct curl_slist
*no_pragma_header
;
106 static struct active_request_slot
*active_queue_head
;
108 static char *cached_accept_language
;
110 size_t fread_buffer(char *ptr
, size_t eltsize
, size_t nmemb
, void *buffer_
)
112 size_t size
= eltsize
* nmemb
;
113 struct buffer
*buffer
= buffer_
;
115 if (size
> buffer
->buf
.len
- buffer
->posn
)
116 size
= buffer
->buf
.len
- buffer
->posn
;
117 memcpy(ptr
, buffer
->buf
.buf
+ buffer
->posn
, size
);
118 buffer
->posn
+= size
;
123 #ifndef NO_CURL_IOCTL
124 curlioerr
ioctl_buffer(CURL
*handle
, int cmd
, void *clientp
)
126 struct buffer
*buffer
= clientp
;
132 case CURLIOCMD_RESTARTREAD
:
137 return CURLIOE_UNKNOWNCMD
;
142 size_t fwrite_buffer(char *ptr
, size_t eltsize
, size_t nmemb
, void *buffer_
)
144 size_t size
= eltsize
* nmemb
;
145 struct strbuf
*buffer
= buffer_
;
147 strbuf_add(buffer
, ptr
, size
);
151 size_t fwrite_null(char *ptr
, size_t eltsize
, size_t nmemb
, void *strbuf
)
153 return eltsize
* nmemb
;
156 static void closedown_active_slot(struct active_request_slot
*slot
)
162 static void finish_active_slot(struct active_request_slot
*slot
)
164 closedown_active_slot(slot
);
165 curl_easy_getinfo(slot
->curl
, CURLINFO_HTTP_CODE
, &slot
->http_code
);
167 if (slot
->finished
!= NULL
)
168 (*slot
->finished
) = 1;
170 /* Store slot results so they can be read after the slot is reused */
171 if (slot
->results
!= NULL
) {
172 slot
->results
->curl_result
= slot
->curl_result
;
173 slot
->results
->http_code
= slot
->http_code
;
174 #if LIBCURL_VERSION_NUM >= 0x070a08
175 curl_easy_getinfo(slot
->curl
, CURLINFO_HTTPAUTH_AVAIL
,
176 &slot
->results
->auth_avail
);
178 slot
->results
->auth_avail
= 0;
182 /* Run callback if appropriate */
183 if (slot
->callback_func
!= NULL
)
184 slot
->callback_func(slot
->callback_data
);
187 #ifdef USE_CURL_MULTI
188 static void process_curl_messages(void)
191 struct active_request_slot
*slot
;
192 CURLMsg
*curl_message
= curl_multi_info_read(curlm
, &num_messages
);
194 while (curl_message
!= NULL
) {
195 if (curl_message
->msg
== CURLMSG_DONE
) {
196 int curl_result
= curl_message
->data
.result
;
197 slot
= active_queue_head
;
198 while (slot
!= NULL
&&
199 slot
->curl
!= curl_message
->easy_handle
)
202 curl_multi_remove_handle(curlm
, slot
->curl
);
203 slot
->curl_result
= curl_result
;
204 finish_active_slot(slot
);
206 fprintf(stderr
, "Received DONE message for unknown request!\n");
209 fprintf(stderr
, "Unknown CURL message received: %d\n",
210 (int)curl_message
->msg
);
212 curl_message
= curl_multi_info_read(curlm
, &num_messages
);
217 static int http_options(const char *var
, const char *value
, void *cb
)
219 if (!strcmp("http.sslverify", var
)) {
220 curl_ssl_verify
= git_config_bool(var
, value
);
223 if (!strcmp("http.sslcipherlist", var
))
224 return git_config_string(&ssl_cipherlist
, var
, value
);
225 if (!strcmp("http.sslversion", var
))
226 return git_config_string(&ssl_version
, var
, value
);
227 if (!strcmp("http.sslcert", var
))
228 return git_config_string(&ssl_cert
, var
, value
);
229 #if LIBCURL_VERSION_NUM >= 0x070903
230 if (!strcmp("http.sslkey", var
))
231 return git_config_string(&ssl_key
, var
, value
);
233 #if LIBCURL_VERSION_NUM >= 0x070908
234 if (!strcmp("http.sslcapath", var
))
235 return git_config_pathname(&ssl_capath
, var
, value
);
237 if (!strcmp("http.sslcainfo", var
))
238 return git_config_pathname(&ssl_cainfo
, var
, value
);
239 if (!strcmp("http.sslcertpasswordprotected", var
)) {
240 ssl_cert_password_required
= git_config_bool(var
, value
);
243 if (!strcmp("http.ssltry", var
)) {
244 curl_ssl_try
= git_config_bool(var
, value
);
247 if (!strcmp("http.minsessions", var
)) {
248 min_curl_sessions
= git_config_int(var
, value
);
249 #ifndef USE_CURL_MULTI
250 if (min_curl_sessions
> 1)
251 min_curl_sessions
= 1;
255 #ifdef USE_CURL_MULTI
256 if (!strcmp("http.maxrequests", var
)) {
257 max_requests
= git_config_int(var
, value
);
261 if (!strcmp("http.lowspeedlimit", var
)) {
262 curl_low_speed_limit
= (long)git_config_int(var
, value
);
265 if (!strcmp("http.lowspeedtime", var
)) {
266 curl_low_speed_time
= (long)git_config_int(var
, value
);
270 if (!strcmp("http.noepsv", var
)) {
271 curl_ftp_no_epsv
= git_config_bool(var
, value
);
274 if (!strcmp("http.proxy", var
))
275 return git_config_string(&curl_http_proxy
, var
, value
);
277 if (!strcmp("http.proxyauthmethod", var
))
278 return git_config_string(&http_proxy_authmethod
, var
, value
);
280 if (!strcmp("http.cookiefile", var
))
281 return git_config_string(&curl_cookie_file
, var
, value
);
282 if (!strcmp("http.savecookies", var
)) {
283 curl_save_cookies
= git_config_bool(var
, value
);
287 if (!strcmp("http.postbuffer", var
)) {
288 http_post_buffer
= git_config_int(var
, value
);
289 if (http_post_buffer
< LARGE_PACKET_MAX
)
290 http_post_buffer
= LARGE_PACKET_MAX
;
294 if (!strcmp("http.useragent", var
))
295 return git_config_string(&user_agent
, var
, value
);
297 /* Fall back on the default ones */
298 return git_default_config(var
, value
, cb
);
301 static void init_curl_http_auth(CURL
*result
)
303 if (!http_auth
.username
)
306 credential_fill(&http_auth
);
308 #if LIBCURL_VERSION_NUM >= 0x071301
309 curl_easy_setopt(result
, CURLOPT_USERNAME
, http_auth
.username
);
310 curl_easy_setopt(result
, CURLOPT_PASSWORD
, http_auth
.password
);
313 static struct strbuf up
= STRBUF_INIT
;
315 * Note that we assume we only ever have a single set of
316 * credentials in a given program run, so we do not have
317 * to worry about updating this buffer, only setting its
321 strbuf_addf(&up
, "%s:%s",
322 http_auth
.username
, http_auth
.password
);
323 curl_easy_setopt(result
, CURLOPT_USERPWD
, up
.buf
);
328 /* *var must be free-able */
329 static void var_override(const char **var
, char *value
)
333 *var
= xstrdup(value
);
337 static void init_curl_proxy_auth(CURL
*result
)
339 var_override(&http_proxy_authmethod
, getenv("GIT_HTTP_PROXY_AUTHMETHOD"));
341 #if LIBCURL_VERSION_NUM >= 0x070a07 /* CURLOPT_PROXYAUTH and CURLAUTH_ANY */
342 if (http_proxy_authmethod
) {
344 for (i
= 0; i
< ARRAY_SIZE(proxy_authmethods
); i
++) {
345 if (!strcmp(http_proxy_authmethod
, proxy_authmethods
[i
].name
)) {
346 curl_easy_setopt(result
, CURLOPT_PROXYAUTH
,
347 proxy_authmethods
[i
].curlauth_param
);
351 if (i
== ARRAY_SIZE(proxy_authmethods
)) {
352 warning("unsupported proxy authentication method %s: using anyauth",
353 http_proxy_authmethod
);
354 curl_easy_setopt(result
, CURLOPT_PROXYAUTH
, CURLAUTH_ANY
);
358 curl_easy_setopt(result
, CURLOPT_PROXYAUTH
, CURLAUTH_ANY
);
362 static int has_cert_password(void)
364 if (ssl_cert
== NULL
|| ssl_cert_password_required
!= 1)
366 if (!cert_auth
.password
) {
367 cert_auth
.protocol
= xstrdup("cert");
368 cert_auth
.username
= xstrdup("");
369 cert_auth
.path
= xstrdup(ssl_cert
);
370 credential_fill(&cert_auth
);
375 #if LIBCURL_VERSION_NUM >= 0x071900
376 static void set_curl_keepalive(CURL
*c
)
378 curl_easy_setopt(c
, CURLOPT_TCP_KEEPALIVE
, 1);
381 #elif LIBCURL_VERSION_NUM >= 0x071000
382 static int sockopt_callback(void *client
, curl_socket_t fd
, curlsocktype type
)
386 socklen_t len
= (socklen_t
)sizeof(ka
);
388 if (type
!= CURLSOCKTYPE_IPCXN
)
391 rc
= setsockopt(fd
, SOL_SOCKET
, SO_KEEPALIVE
, (void *)&ka
, len
);
393 warning("unable to set SO_KEEPALIVE on socket %s",
396 return 0; /* CURL_SOCKOPT_OK only exists since curl 7.21.5 */
399 static void set_curl_keepalive(CURL
*c
)
401 curl_easy_setopt(c
, CURLOPT_SOCKOPTFUNCTION
, sockopt_callback
);
405 static void set_curl_keepalive(CURL
*c
)
407 /* not supported on older curl versions */
411 static CURL
*get_curl_handle(void)
413 CURL
*result
= curl_easy_init();
414 long allowed_protocols
= 0;
417 die("curl_easy_init failed");
419 if (!curl_ssl_verify
) {
420 curl_easy_setopt(result
, CURLOPT_SSL_VERIFYPEER
, 0);
421 curl_easy_setopt(result
, CURLOPT_SSL_VERIFYHOST
, 0);
423 /* Verify authenticity of the peer's certificate */
424 curl_easy_setopt(result
, CURLOPT_SSL_VERIFYPEER
, 1);
425 /* The name in the cert must match whom we tried to connect */
426 curl_easy_setopt(result
, CURLOPT_SSL_VERIFYHOST
, 2);
429 #if LIBCURL_VERSION_NUM >= 0x070907
430 curl_easy_setopt(result
, CURLOPT_NETRC
, CURL_NETRC_OPTIONAL
);
432 #ifdef LIBCURL_CAN_HANDLE_AUTH_ANY
433 curl_easy_setopt(result
, CURLOPT_HTTPAUTH
, CURLAUTH_ANY
);
436 if (http_proactive_auth
)
437 init_curl_http_auth(result
);
439 if (getenv("GIT_SSL_VERSION"))
440 ssl_version
= getenv("GIT_SSL_VERSION");
441 if (ssl_version
&& *ssl_version
) {
443 for (i
= 0; i
< ARRAY_SIZE(sslversions
); i
++) {
444 if (!strcmp(ssl_version
, sslversions
[i
].name
)) {
445 curl_easy_setopt(result
, CURLOPT_SSLVERSION
,
446 sslversions
[i
].ssl_version
);
450 if (i
== ARRAY_SIZE(sslversions
))
451 warning("unsupported ssl version %s: using default",
455 if (getenv("GIT_SSL_CIPHER_LIST"))
456 ssl_cipherlist
= getenv("GIT_SSL_CIPHER_LIST");
457 if (ssl_cipherlist
!= NULL
&& *ssl_cipherlist
)
458 curl_easy_setopt(result
, CURLOPT_SSL_CIPHER_LIST
,
461 if (ssl_cert
!= NULL
)
462 curl_easy_setopt(result
, CURLOPT_SSLCERT
, ssl_cert
);
463 if (has_cert_password())
464 curl_easy_setopt(result
, CURLOPT_KEYPASSWD
, cert_auth
.password
);
465 #if LIBCURL_VERSION_NUM >= 0x070903
467 curl_easy_setopt(result
, CURLOPT_SSLKEY
, ssl_key
);
469 #if LIBCURL_VERSION_NUM >= 0x070908
470 if (ssl_capath
!= NULL
)
471 curl_easy_setopt(result
, CURLOPT_CAPATH
, ssl_capath
);
473 if (ssl_cainfo
!= NULL
)
474 curl_easy_setopt(result
, CURLOPT_CAINFO
, ssl_cainfo
);
476 if (curl_low_speed_limit
> 0 && curl_low_speed_time
> 0) {
477 curl_easy_setopt(result
, CURLOPT_LOW_SPEED_LIMIT
,
478 curl_low_speed_limit
);
479 curl_easy_setopt(result
, CURLOPT_LOW_SPEED_TIME
,
480 curl_low_speed_time
);
483 curl_easy_setopt(result
, CURLOPT_FOLLOWLOCATION
, 1);
484 curl_easy_setopt(result
, CURLOPT_MAXREDIRS
, 20);
485 #if LIBCURL_VERSION_NUM >= 0x071301
486 curl_easy_setopt(result
, CURLOPT_POSTREDIR
, CURL_REDIR_POST_ALL
);
487 #elif LIBCURL_VERSION_NUM >= 0x071101
488 curl_easy_setopt(result
, CURLOPT_POST301
, 1);
490 #if LIBCURL_VERSION_NUM >= 0x071304
491 if (is_transport_allowed("http"))
492 allowed_protocols
|= CURLPROTO_HTTP
;
493 if (is_transport_allowed("https"))
494 allowed_protocols
|= CURLPROTO_HTTPS
;
495 if (is_transport_allowed("ftp"))
496 allowed_protocols
|= CURLPROTO_FTP
;
497 if (is_transport_allowed("ftps"))
498 allowed_protocols
|= CURLPROTO_FTPS
;
499 curl_easy_setopt(result
, CURLOPT_REDIR_PROTOCOLS
, allowed_protocols
);
501 if (transport_restrict_protocols())
502 warning("protocol restrictions not applied to curl redirects because\n"
503 "your curl version is too old (>= 7.19.4)");
506 if (getenv("GIT_CURL_VERBOSE"))
507 curl_easy_setopt(result
, CURLOPT_VERBOSE
, 1);
509 curl_easy_setopt(result
, CURLOPT_USERAGENT
,
510 user_agent
? user_agent
: git_user_agent());
512 if (curl_ftp_no_epsv
)
513 curl_easy_setopt(result
, CURLOPT_FTP_USE_EPSV
, 0);
515 #ifdef CURLOPT_USE_SSL
517 curl_easy_setopt(result
, CURLOPT_USE_SSL
, CURLUSESSL_TRY
);
520 if (curl_http_proxy
) {
521 curl_easy_setopt(result
, CURLOPT_PROXY
, curl_http_proxy
);
522 #if LIBCURL_VERSION_NUM >= 0x071800
523 if (starts_with(curl_http_proxy
, "socks5"))
524 curl_easy_setopt(result
,
525 CURLOPT_PROXYTYPE
, CURLPROXY_SOCKS5
);
526 else if (starts_with(curl_http_proxy
, "socks4a"))
527 curl_easy_setopt(result
,
528 CURLOPT_PROXYTYPE
, CURLPROXY_SOCKS4A
);
529 else if (starts_with(curl_http_proxy
, "socks"))
530 curl_easy_setopt(result
,
531 CURLOPT_PROXYTYPE
, CURLPROXY_SOCKS4
);
534 init_curl_proxy_auth(result
);
536 set_curl_keepalive(result
);
541 static void set_from_env(const char **var
, const char *envname
)
543 const char *val
= getenv(envname
);
548 void http_init(struct remote
*remote
, const char *url
, int proactive_auth
)
550 char *low_speed_limit
;
551 char *low_speed_time
;
552 char *normalized_url
;
553 struct urlmatch_config config
= { STRING_LIST_INIT_DUP
};
555 config
.section
= "http";
557 config
.collect_fn
= http_options
;
558 config
.cascade_fn
= git_default_config
;
562 normalized_url
= url_normalize(url
, &config
.url
);
564 git_config(urlmatch_config_entry
, &config
);
565 free(normalized_url
);
567 if (curl_global_init(CURL_GLOBAL_ALL
) != CURLE_OK
)
568 die("curl_global_init failed");
570 http_proactive_auth
= proactive_auth
;
572 if (remote
&& remote
->http_proxy
)
573 curl_http_proxy
= xstrdup(remote
->http_proxy
);
576 var_override(&http_proxy_authmethod
, remote
->http_proxy_authmethod
);
578 pragma_header
= curl_slist_append(pragma_header
, "Pragma: no-cache");
579 no_pragma_header
= curl_slist_append(no_pragma_header
, "Pragma:");
581 #ifdef USE_CURL_MULTI
583 char *http_max_requests
= getenv("GIT_HTTP_MAX_REQUESTS");
584 if (http_max_requests
!= NULL
)
585 max_requests
= atoi(http_max_requests
);
588 curlm
= curl_multi_init();
590 die("curl_multi_init failed");
593 if (getenv("GIT_SSL_NO_VERIFY"))
596 set_from_env(&ssl_cert
, "GIT_SSL_CERT");
597 #if LIBCURL_VERSION_NUM >= 0x070903
598 set_from_env(&ssl_key
, "GIT_SSL_KEY");
600 #if LIBCURL_VERSION_NUM >= 0x070908
601 set_from_env(&ssl_capath
, "GIT_SSL_CAPATH");
603 set_from_env(&ssl_cainfo
, "GIT_SSL_CAINFO");
605 set_from_env(&user_agent
, "GIT_HTTP_USER_AGENT");
607 low_speed_limit
= getenv("GIT_HTTP_LOW_SPEED_LIMIT");
608 if (low_speed_limit
!= NULL
)
609 curl_low_speed_limit
= strtol(low_speed_limit
, NULL
, 10);
610 low_speed_time
= getenv("GIT_HTTP_LOW_SPEED_TIME");
611 if (low_speed_time
!= NULL
)
612 curl_low_speed_time
= strtol(low_speed_time
, NULL
, 10);
614 if (curl_ssl_verify
== -1)
617 curl_session_count
= 0;
618 #ifdef USE_CURL_MULTI
619 if (max_requests
< 1)
620 max_requests
= DEFAULT_MAX_REQUESTS
;
623 if (getenv("GIT_CURL_FTP_NO_EPSV"))
624 curl_ftp_no_epsv
= 1;
627 credential_from_url(&http_auth
, url
);
628 if (!ssl_cert_password_required
&&
629 getenv("GIT_SSL_CERT_PASSWORD_PROTECTED") &&
630 starts_with(url
, "https://"))
631 ssl_cert_password_required
= 1;
634 #ifndef NO_CURL_EASY_DUPHANDLE
635 curl_default
= get_curl_handle();
639 void http_cleanup(void)
641 struct active_request_slot
*slot
= active_queue_head
;
643 while (slot
!= NULL
) {
644 struct active_request_slot
*next
= slot
->next
;
645 if (slot
->curl
!= NULL
) {
646 #ifdef USE_CURL_MULTI
647 curl_multi_remove_handle(curlm
, slot
->curl
);
649 curl_easy_cleanup(slot
->curl
);
654 active_queue_head
= NULL
;
656 #ifndef NO_CURL_EASY_DUPHANDLE
657 curl_easy_cleanup(curl_default
);
660 #ifdef USE_CURL_MULTI
661 curl_multi_cleanup(curlm
);
663 curl_global_cleanup();
665 curl_slist_free_all(pragma_header
);
666 pragma_header
= NULL
;
668 curl_slist_free_all(no_pragma_header
);
669 no_pragma_header
= NULL
;
671 if (curl_http_proxy
) {
672 free((void *)curl_http_proxy
);
673 curl_http_proxy
= NULL
;
676 free((void *)http_proxy_authmethod
);
677 http_proxy_authmethod
= NULL
;
679 if (cert_auth
.password
!= NULL
) {
680 memset(cert_auth
.password
, 0, strlen(cert_auth
.password
));
681 free(cert_auth
.password
);
682 cert_auth
.password
= NULL
;
684 ssl_cert_password_required
= 0;
686 free(cached_accept_language
);
687 cached_accept_language
= NULL
;
690 struct active_request_slot
*get_active_slot(void)
692 struct active_request_slot
*slot
= active_queue_head
;
693 struct active_request_slot
*newslot
;
695 #ifdef USE_CURL_MULTI
698 /* Wait for a slot to open up if the queue is full */
699 while (active_requests
>= max_requests
) {
700 curl_multi_perform(curlm
, &num_transfers
);
701 if (num_transfers
< active_requests
)
702 process_curl_messages();
706 while (slot
!= NULL
&& slot
->in_use
)
710 newslot
= xmalloc(sizeof(*newslot
));
711 newslot
->curl
= NULL
;
713 newslot
->next
= NULL
;
715 slot
= active_queue_head
;
717 active_queue_head
= newslot
;
719 while (slot
->next
!= NULL
)
721 slot
->next
= newslot
;
726 if (slot
->curl
== NULL
) {
727 #ifdef NO_CURL_EASY_DUPHANDLE
728 slot
->curl
= get_curl_handle();
730 slot
->curl
= curl_easy_duphandle(curl_default
);
732 curl_session_count
++;
737 slot
->results
= NULL
;
738 slot
->finished
= NULL
;
739 slot
->callback_data
= NULL
;
740 slot
->callback_func
= NULL
;
741 curl_easy_setopt(slot
->curl
, CURLOPT_COOKIEFILE
, curl_cookie_file
);
742 if (curl_save_cookies
)
743 curl_easy_setopt(slot
->curl
, CURLOPT_COOKIEJAR
, curl_cookie_file
);
744 curl_easy_setopt(slot
->curl
, CURLOPT_HTTPHEADER
, pragma_header
);
745 curl_easy_setopt(slot
->curl
, CURLOPT_ERRORBUFFER
, curl_errorstr
);
746 curl_easy_setopt(slot
->curl
, CURLOPT_CUSTOMREQUEST
, NULL
);
747 curl_easy_setopt(slot
->curl
, CURLOPT_READFUNCTION
, NULL
);
748 curl_easy_setopt(slot
->curl
, CURLOPT_WRITEFUNCTION
, NULL
);
749 curl_easy_setopt(slot
->curl
, CURLOPT_POSTFIELDS
, NULL
);
750 curl_easy_setopt(slot
->curl
, CURLOPT_UPLOAD
, 0);
751 curl_easy_setopt(slot
->curl
, CURLOPT_HTTPGET
, 1);
752 curl_easy_setopt(slot
->curl
, CURLOPT_FAILONERROR
, 1);
753 curl_easy_setopt(slot
->curl
, CURLOPT_RANGE
, NULL
);
754 #ifdef LIBCURL_CAN_HANDLE_AUTH_ANY
755 curl_easy_setopt(slot
->curl
, CURLOPT_HTTPAUTH
, http_auth_methods
);
757 if (http_auth
.password
)
758 init_curl_http_auth(slot
->curl
);
763 int start_active_slot(struct active_request_slot
*slot
)
765 #ifdef USE_CURL_MULTI
766 CURLMcode curlm_result
= curl_multi_add_handle(curlm
, slot
->curl
);
769 if (curlm_result
!= CURLM_OK
&&
770 curlm_result
!= CURLM_CALL_MULTI_PERFORM
) {
777 * We know there must be something to do, since we just added
780 curl_multi_perform(curlm
, &num_transfers
);
785 #ifdef USE_CURL_MULTI
789 struct fill_chain
*next
;
792 static struct fill_chain
*fill_cfg
;
794 void add_fill_function(void *data
, int (*fill
)(void *))
796 struct fill_chain
*new = xmalloc(sizeof(*new));
797 struct fill_chain
**linkp
= &fill_cfg
;
802 linkp
= &(*linkp
)->next
;
806 void fill_active_slots(void)
808 struct active_request_slot
*slot
= active_queue_head
;
810 while (active_requests
< max_requests
) {
811 struct fill_chain
*fill
;
812 for (fill
= fill_cfg
; fill
; fill
= fill
->next
)
813 if (fill
->fill(fill
->data
))
820 while (slot
!= NULL
) {
821 if (!slot
->in_use
&& slot
->curl
!= NULL
822 && curl_session_count
> min_curl_sessions
) {
823 curl_easy_cleanup(slot
->curl
);
825 curl_session_count
--;
831 void step_active_slots(void)
834 CURLMcode curlm_result
;
837 curlm_result
= curl_multi_perform(curlm
, &num_transfers
);
838 } while (curlm_result
== CURLM_CALL_MULTI_PERFORM
);
839 if (num_transfers
< active_requests
) {
840 process_curl_messages();
846 void run_active_slot(struct active_request_slot
*slot
)
848 #ifdef USE_CURL_MULTI
853 struct timeval select_timeout
;
856 slot
->finished
= &finished
;
861 #if LIBCURL_VERSION_NUM >= 0x070f04
863 curl_multi_timeout(curlm
, &curl_timeout
);
864 if (curl_timeout
== 0) {
866 } else if (curl_timeout
== -1) {
867 select_timeout
.tv_sec
= 0;
868 select_timeout
.tv_usec
= 50000;
870 select_timeout
.tv_sec
= curl_timeout
/ 1000;
871 select_timeout
.tv_usec
= (curl_timeout
% 1000) * 1000;
874 select_timeout
.tv_sec
= 0;
875 select_timeout
.tv_usec
= 50000;
882 curl_multi_fdset(curlm
, &readfds
, &writefds
, &excfds
, &max_fd
);
885 * It can happen that curl_multi_timeout returns a pathologically
886 * long timeout when curl_multi_fdset returns no file descriptors
887 * to read. See commit message for more details.
890 (select_timeout
.tv_sec
> 0 ||
891 select_timeout
.tv_usec
> 50000)) {
892 select_timeout
.tv_sec
= 0;
893 select_timeout
.tv_usec
= 50000;
896 select(max_fd
+1, &readfds
, &writefds
, &excfds
, &select_timeout
);
900 while (slot
->in_use
) {
901 slot
->curl_result
= curl_easy_perform(slot
->curl
);
902 finish_active_slot(slot
);
907 static void release_active_slot(struct active_request_slot
*slot
)
909 closedown_active_slot(slot
);
910 if (slot
->curl
&& curl_session_count
> min_curl_sessions
) {
911 #ifdef USE_CURL_MULTI
912 curl_multi_remove_handle(curlm
, slot
->curl
);
914 curl_easy_cleanup(slot
->curl
);
916 curl_session_count
--;
918 #ifdef USE_CURL_MULTI
923 void finish_all_active_slots(void)
925 struct active_request_slot
*slot
= active_queue_head
;
929 run_active_slot(slot
);
930 slot
= active_queue_head
;
936 /* Helpers for modifying and creating URLs */
937 static inline int needs_quote(int ch
)
939 if (((ch
>= 'A') && (ch
<= 'Z'))
940 || ((ch
>= 'a') && (ch
<= 'z'))
941 || ((ch
>= '0') && (ch
<= '9'))
949 static char *quote_ref_url(const char *base
, const char *ref
)
951 struct strbuf buf
= STRBUF_INIT
;
955 end_url_with_slash(&buf
, base
);
957 for (cp
= ref
; (ch
= *cp
) != 0; cp
++)
959 strbuf_addf(&buf
, "%%%02x", ch
);
961 strbuf_addch(&buf
, *cp
);
963 return strbuf_detach(&buf
, NULL
);
966 void append_remote_object_url(struct strbuf
*buf
, const char *url
,
968 int only_two_digit_prefix
)
970 end_url_with_slash(buf
, url
);
972 strbuf_addf(buf
, "objects/%.*s/", 2, hex
);
973 if (!only_two_digit_prefix
)
974 strbuf_addf(buf
, "%s", hex
+2);
977 char *get_remote_object_url(const char *url
, const char *hex
,
978 int only_two_digit_prefix
)
980 struct strbuf buf
= STRBUF_INIT
;
981 append_remote_object_url(&buf
, url
, hex
, only_two_digit_prefix
);
982 return strbuf_detach(&buf
, NULL
);
985 static int handle_curl_result(struct slot_results
*results
)
988 * If we see a failing http code with CURLE_OK, we have turned off
989 * FAILONERROR (to keep the server's custom error response), and should
990 * translate the code into failure here.
992 if (results
->curl_result
== CURLE_OK
&&
993 results
->http_code
>= 400) {
994 results
->curl_result
= CURLE_HTTP_RETURNED_ERROR
;
996 * Normally curl will already have put the "reason phrase"
997 * from the server into curl_errorstr; unfortunately without
998 * FAILONERROR it is lost, so we can give only the numeric
1001 snprintf(curl_errorstr
, sizeof(curl_errorstr
),
1002 "The requested URL returned error: %ld",
1003 results
->http_code
);
1006 if (results
->curl_result
== CURLE_OK
) {
1007 credential_approve(&http_auth
);
1009 } else if (missing_target(results
))
1010 return HTTP_MISSING_TARGET
;
1011 else if (results
->http_code
== 401) {
1012 if (http_auth
.username
&& http_auth
.password
) {
1013 credential_reject(&http_auth
);
1016 #ifdef LIBCURL_CAN_HANDLE_AUTH_ANY
1017 http_auth_methods
&= ~CURLAUTH_GSSNEGOTIATE
;
1022 #if LIBCURL_VERSION_NUM >= 0x070c00
1023 if (!curl_errorstr
[0])
1024 strlcpy(curl_errorstr
,
1025 curl_easy_strerror(results
->curl_result
),
1026 sizeof(curl_errorstr
));
1032 int run_one_slot(struct active_request_slot
*slot
,
1033 struct slot_results
*results
)
1035 slot
->results
= results
;
1036 if (!start_active_slot(slot
)) {
1037 snprintf(curl_errorstr
, sizeof(curl_errorstr
),
1038 "failed to start HTTP request");
1039 return HTTP_START_FAILED
;
1042 run_active_slot(slot
);
1043 return handle_curl_result(results
);
1046 static CURLcode
curlinfo_strbuf(CURL
*curl
, CURLINFO info
, struct strbuf
*buf
)
1052 ret
= curl_easy_getinfo(curl
, info
, &ptr
);
1054 strbuf_addstr(buf
, ptr
);
1059 * Check for and extract a content-type parameter. "raw"
1060 * should be positioned at the start of the potential
1061 * parameter, with any whitespace already removed.
1063 * "name" is the name of the parameter. The value is appended
1066 static int extract_param(const char *raw
, const char *name
,
1069 size_t len
= strlen(name
);
1071 if (strncasecmp(raw
, name
, len
))
1079 while (*raw
&& !isspace(*raw
) && *raw
!= ';')
1080 strbuf_addch(out
, *raw
++);
1085 * Extract a normalized version of the content type, with any
1086 * spaces suppressed, all letters lowercased, and no trailing ";"
1089 * Note that we will silently remove even invalid whitespace. For
1090 * example, "text / plain" is specifically forbidden by RFC 2616,
1091 * but "text/plain" is the only reasonable output, and this keeps
1094 * If the "charset" argument is not NULL, store the value of any
1095 * charset parameter there.
1098 * "TEXT/PLAIN; charset=utf-8" -> "text/plain", "utf-8"
1099 * "text / plain" -> "text/plain"
1101 static void extract_content_type(struct strbuf
*raw
, struct strbuf
*type
,
1102 struct strbuf
*charset
)
1107 strbuf_grow(type
, raw
->len
);
1108 for (p
= raw
->buf
; *p
; p
++) {
1115 strbuf_addch(type
, tolower(*p
));
1121 strbuf_reset(charset
);
1123 while (isspace(*p
) || *p
== ';')
1125 if (!extract_param(p
, "charset", charset
))
1127 while (*p
&& !isspace(*p
))
1131 if (!charset
->len
&& starts_with(type
->buf
, "text/"))
1132 strbuf_addstr(charset
, "ISO-8859-1");
1135 static void write_accept_language(struct strbuf
*buf
)
1138 * MAX_DECIMAL_PLACES must not be larger than 3. If it is larger than
1139 * that, q-value will be smaller than 0.001, the minimum q-value the
1140 * HTTP specification allows. See
1141 * http://tools.ietf.org/html/rfc7231#section-5.3.1 for q-value.
1143 const int MAX_DECIMAL_PLACES
= 3;
1144 const int MAX_LANGUAGE_TAGS
= 1000;
1145 const int MAX_ACCEPT_LANGUAGE_HEADER_SIZE
= 4000;
1146 char **language_tags
= NULL
;
1148 const char *s
= get_preferred_languages();
1150 struct strbuf tag
= STRBUF_INIT
;
1152 /* Don't add Accept-Language header if no language is preferred. */
1157 * Split the colon-separated string of preferred languages into
1158 * language_tags array.
1161 /* collect language tag */
1162 for (; *s
&& (isalnum(*s
) || *s
== '_'); s
++)
1163 strbuf_addch(&tag
, *s
== '_' ? '-' : *s
);
1165 /* skip .codeset, @modifier and any other unnecessary parts */
1166 while (*s
&& *s
!= ':')
1171 REALLOC_ARRAY(language_tags
, num_langs
);
1172 language_tags
[num_langs
- 1] = strbuf_detach(&tag
, NULL
);
1173 if (num_langs
>= MAX_LANGUAGE_TAGS
- 1) /* -1 for '*' */
1178 /* write Accept-Language header into buf */
1180 int last_buf_len
= 0;
1186 REALLOC_ARRAY(language_tags
, num_langs
+ 1);
1187 language_tags
[num_langs
++] = "*"; /* it's OK; this won't be freed */
1189 /* compute decimal_places */
1190 for (max_q
= 1, decimal_places
= 0;
1191 max_q
< num_langs
&& decimal_places
<= MAX_DECIMAL_PLACES
;
1192 decimal_places
++, max_q
*= 10)
1195 xsnprintf(q_format
, sizeof(q_format
), ";q=0.%%0%dd", decimal_places
);
1197 strbuf_addstr(buf
, "Accept-Language: ");
1199 for (i
= 0; i
< num_langs
; i
++) {
1201 strbuf_addstr(buf
, ", ");
1203 strbuf_addstr(buf
, language_tags
[i
]);
1206 strbuf_addf(buf
, q_format
, max_q
- i
);
1208 if (buf
->len
> MAX_ACCEPT_LANGUAGE_HEADER_SIZE
) {
1209 strbuf_remove(buf
, last_buf_len
, buf
->len
- last_buf_len
);
1213 last_buf_len
= buf
->len
;
1217 /* free language tags -- last one is a static '*' */
1218 for (i
= 0; i
< num_langs
- 1; i
++)
1219 free(language_tags
[i
]);
1220 free(language_tags
);
1224 * Get an Accept-Language header which indicates user's preferred languages.
1228 * LANGUAGE=ko:en -> "Accept-Language: ko, en; q=0.9, *; q=0.1"
1229 * LANGUAGE=ko_KR.UTF-8:sr@latin -> "Accept-Language: ko-KR, sr; q=0.9, *; q=0.1"
1230 * LANGUAGE=ko LANG=en_US.UTF-8 -> "Accept-Language: ko, *; q=0.1"
1231 * LANGUAGE= LANG=en_US.UTF-8 -> "Accept-Language: en-US, *; q=0.1"
1232 * LANGUAGE= LANG=C -> ""
1234 static const char *get_accept_language(void)
1236 if (!cached_accept_language
) {
1237 struct strbuf buf
= STRBUF_INIT
;
1238 write_accept_language(&buf
);
1240 cached_accept_language
= strbuf_detach(&buf
, NULL
);
1243 return cached_accept_language
;
1246 static void http_opt_request_remainder(CURL
*curl
, off_t pos
)
1249 xsnprintf(buf
, sizeof(buf
), "%"PRIuMAX
"-", (uintmax_t)pos
);
1250 curl_easy_setopt(curl
, CURLOPT_RANGE
, buf
);
1253 /* http_request() targets */
1254 #define HTTP_REQUEST_STRBUF 0
1255 #define HTTP_REQUEST_FILE 1
1257 static int http_request(const char *url
,
1258 void *result
, int target
,
1259 const struct http_get_options
*options
)
1261 struct active_request_slot
*slot
;
1262 struct slot_results results
;
1263 struct curl_slist
*headers
= NULL
;
1264 struct strbuf buf
= STRBUF_INIT
;
1265 const char *accept_language
;
1268 slot
= get_active_slot();
1269 curl_easy_setopt(slot
->curl
, CURLOPT_HTTPGET
, 1);
1271 if (result
== NULL
) {
1272 curl_easy_setopt(slot
->curl
, CURLOPT_NOBODY
, 1);
1274 curl_easy_setopt(slot
->curl
, CURLOPT_NOBODY
, 0);
1275 curl_easy_setopt(slot
->curl
, CURLOPT_FILE
, result
);
1277 if (target
== HTTP_REQUEST_FILE
) {
1278 off_t posn
= ftello(result
);
1279 curl_easy_setopt(slot
->curl
, CURLOPT_WRITEFUNCTION
,
1282 http_opt_request_remainder(slot
->curl
, posn
);
1284 curl_easy_setopt(slot
->curl
, CURLOPT_WRITEFUNCTION
,
1288 accept_language
= get_accept_language();
1290 if (accept_language
)
1291 headers
= curl_slist_append(headers
, accept_language
);
1293 strbuf_addstr(&buf
, "Pragma:");
1294 if (options
&& options
->no_cache
)
1295 strbuf_addstr(&buf
, " no-cache");
1296 if (options
&& options
->keep_error
)
1297 curl_easy_setopt(slot
->curl
, CURLOPT_FAILONERROR
, 0);
1299 headers
= curl_slist_append(headers
, buf
.buf
);
1301 curl_easy_setopt(slot
->curl
, CURLOPT_URL
, url
);
1302 curl_easy_setopt(slot
->curl
, CURLOPT_HTTPHEADER
, headers
);
1303 curl_easy_setopt(slot
->curl
, CURLOPT_ENCODING
, "gzip");
1305 ret
= run_one_slot(slot
, &results
);
1307 if (options
&& options
->content_type
) {
1308 struct strbuf raw
= STRBUF_INIT
;
1309 curlinfo_strbuf(slot
->curl
, CURLINFO_CONTENT_TYPE
, &raw
);
1310 extract_content_type(&raw
, options
->content_type
,
1312 strbuf_release(&raw
);
1315 if (options
&& options
->effective_url
)
1316 curlinfo_strbuf(slot
->curl
, CURLINFO_EFFECTIVE_URL
,
1317 options
->effective_url
);
1319 curl_slist_free_all(headers
);
1320 strbuf_release(&buf
);
1326 * Update the "base" url to a more appropriate value, as deduced by
1327 * redirects seen when requesting a URL starting with "url".
1329 * The "asked" parameter is a URL that we asked curl to access, and must begin
1332 * The "got" parameter is the URL that curl reported to us as where we ended
1335 * Returns 1 if we updated the base url, 0 otherwise.
1337 * Our basic strategy is to compare "base" and "asked" to find the bits
1338 * specific to our request. We then strip those bits off of "got" to yield the
1339 * new base. So for example, if our base is "http://example.com/foo.git",
1340 * and we ask for "http://example.com/foo.git/info/refs", we might end up
1341 * with "https://other.example.com/foo.git/info/refs". We would want the
1342 * new URL to become "https://other.example.com/foo.git".
1344 * Note that this assumes a sane redirect scheme. It's entirely possible
1345 * in the example above to end up at a URL that does not even end in
1346 * "info/refs". In such a case we simply punt, as there is not much we can
1347 * do (and such a scheme is unlikely to represent a real git repository,
1348 * which means we are likely about to abort anyway).
1350 static int update_url_from_redirect(struct strbuf
*base
,
1352 const struct strbuf
*got
)
1357 if (!strcmp(asked
, got
->buf
))
1360 if (!skip_prefix(asked
, base
->buf
, &tail
))
1361 die("BUG: update_url_from_redirect: %s is not a superset of %s",
1364 tail_len
= strlen(tail
);
1366 if (got
->len
< tail_len
||
1367 strcmp(tail
, got
->buf
+ got
->len
- tail_len
))
1368 return 0; /* insane redirect scheme */
1371 strbuf_add(base
, got
->buf
, got
->len
- tail_len
);
1375 static int http_request_reauth(const char *url
,
1376 void *result
, int target
,
1377 struct http_get_options
*options
)
1379 int ret
= http_request(url
, result
, target
, options
);
1381 if (options
&& options
->effective_url
&& options
->base_url
) {
1382 if (update_url_from_redirect(options
->base_url
,
1383 url
, options
->effective_url
)) {
1384 credential_from_url(&http_auth
, options
->base_url
->buf
);
1385 url
= options
->effective_url
->buf
;
1389 if (ret
!= HTTP_REAUTH
)
1393 * If we are using KEEP_ERROR, the previous request may have
1394 * put cruft into our output stream; we should clear it out before
1395 * making our next request. We only know how to do this for
1396 * the strbuf case, but that is enough to satisfy current callers.
1398 if (options
&& options
->keep_error
) {
1400 case HTTP_REQUEST_STRBUF
:
1401 strbuf_reset(result
);
1404 die("BUG: HTTP_KEEP_ERROR is only supported with strbufs");
1408 credential_fill(&http_auth
);
1410 return http_request(url
, result
, target
, options
);
1413 int http_get_strbuf(const char *url
,
1414 struct strbuf
*result
,
1415 struct http_get_options
*options
)
1417 return http_request_reauth(url
, result
, HTTP_REQUEST_STRBUF
, options
);
1421 * Downloads a URL and stores the result in the given file.
1423 * If a previous interrupted download is detected (i.e. a previous temporary
1424 * file is still around) the download is resumed.
1426 static int http_get_file(const char *url
, const char *filename
,
1427 struct http_get_options
*options
)
1430 struct strbuf tmpfile
= STRBUF_INIT
;
1433 strbuf_addf(&tmpfile
, "%s.temp", filename
);
1434 result
= fopen(tmpfile
.buf
, "a");
1436 error("Unable to open local file %s", tmpfile
.buf
);
1441 ret
= http_request_reauth(url
, result
, HTTP_REQUEST_FILE
, options
);
1444 if (ret
== HTTP_OK
&& finalize_object_file(tmpfile
.buf
, filename
))
1447 strbuf_release(&tmpfile
);
1451 int http_fetch_ref(const char *base
, struct ref
*ref
)
1453 struct http_get_options options
= {0};
1455 struct strbuf buffer
= STRBUF_INIT
;
1458 options
.no_cache
= 1;
1460 url
= quote_ref_url(base
, ref
->name
);
1461 if (http_get_strbuf(url
, &buffer
, &options
) == HTTP_OK
) {
1462 strbuf_rtrim(&buffer
);
1463 if (buffer
.len
== 40)
1464 ret
= get_oid_hex(buffer
.buf
, &ref
->old_oid
);
1465 else if (starts_with(buffer
.buf
, "ref: ")) {
1466 ref
->symref
= xstrdup(buffer
.buf
+ 5);
1471 strbuf_release(&buffer
);
1476 /* Helpers for fetching packs */
1477 static char *fetch_pack_index(unsigned char *sha1
, const char *base_url
)
1480 struct strbuf buf
= STRBUF_INIT
;
1482 if (http_is_verbose
)
1483 fprintf(stderr
, "Getting index for pack %s\n", sha1_to_hex(sha1
));
1485 end_url_with_slash(&buf
, base_url
);
1486 strbuf_addf(&buf
, "objects/pack/pack-%s.idx", sha1_to_hex(sha1
));
1487 url
= strbuf_detach(&buf
, NULL
);
1489 strbuf_addf(&buf
, "%s.temp", sha1_pack_index_name(sha1
));
1490 tmp
= strbuf_detach(&buf
, NULL
);
1492 if (http_get_file(url
, tmp
, NULL
) != HTTP_OK
) {
1493 error("Unable to get pack index %s", url
);
1502 static int fetch_and_setup_pack_index(struct packed_git
**packs_head
,
1503 unsigned char *sha1
, const char *base_url
)
1505 struct packed_git
*new_pack
;
1506 char *tmp_idx
= NULL
;
1509 if (has_pack_index(sha1
)) {
1510 new_pack
= parse_pack_index(sha1
, sha1_pack_index_name(sha1
));
1512 return -1; /* parse_pack_index() already issued error message */
1516 tmp_idx
= fetch_pack_index(sha1
, base_url
);
1520 new_pack
= parse_pack_index(sha1
, tmp_idx
);
1525 return -1; /* parse_pack_index() already issued error message */
1528 ret
= verify_pack_index(new_pack
);
1530 close_pack_index(new_pack
);
1531 ret
= finalize_object_file(tmp_idx
, sha1_pack_index_name(sha1
));
1538 new_pack
->next
= *packs_head
;
1539 *packs_head
= new_pack
;
1543 int http_get_info_packs(const char *base_url
, struct packed_git
**packs_head
)
1545 struct http_get_options options
= {0};
1548 struct strbuf buf
= STRBUF_INIT
;
1549 unsigned char sha1
[20];
1551 end_url_with_slash(&buf
, base_url
);
1552 strbuf_addstr(&buf
, "objects/info/packs");
1553 url
= strbuf_detach(&buf
, NULL
);
1555 options
.no_cache
= 1;
1556 ret
= http_get_strbuf(url
, &buf
, &options
);
1561 while (i
< buf
.len
) {
1565 if (i
+ 52 <= buf
.len
&&
1566 starts_with(data
+ i
, " pack-") &&
1567 starts_with(data
+ i
+ 46, ".pack\n")) {
1568 get_sha1_hex(data
+ i
+ 6, sha1
);
1569 fetch_and_setup_pack_index(packs_head
, sha1
,
1575 while (i
< buf
.len
&& data
[i
] != '\n')
1586 void release_http_pack_request(struct http_pack_request
*preq
)
1588 if (preq
->packfile
!= NULL
) {
1589 fclose(preq
->packfile
);
1590 preq
->packfile
= NULL
;
1597 int finish_http_pack_request(struct http_pack_request
*preq
)
1599 struct packed_git
**lst
;
1600 struct packed_git
*p
= preq
->target
;
1603 struct child_process ip
= CHILD_PROCESS_INIT
;
1604 const char *ip_argv
[8];
1606 close_pack_index(p
);
1608 fclose(preq
->packfile
);
1609 preq
->packfile
= NULL
;
1613 lst
= &((*lst
)->next
);
1614 *lst
= (*lst
)->next
;
1616 if (!strip_suffix(preq
->tmpfile
, ".pack.temp", &len
))
1617 die("BUG: pack tmpfile does not end in .pack.temp?");
1618 tmp_idx
= xstrfmt("%.*s.idx.temp", (int)len
, preq
->tmpfile
);
1620 ip_argv
[0] = "index-pack";
1622 ip_argv
[2] = tmp_idx
;
1623 ip_argv
[3] = preq
->tmpfile
;
1631 if (run_command(&ip
)) {
1632 unlink(preq
->tmpfile
);
1638 unlink(sha1_pack_index_name(p
->sha1
));
1640 if (finalize_object_file(preq
->tmpfile
, sha1_pack_name(p
->sha1
))
1641 || finalize_object_file(tmp_idx
, sha1_pack_index_name(p
->sha1
))) {
1646 install_packed_git(p
);
1651 struct http_pack_request
*new_http_pack_request(
1652 struct packed_git
*target
, const char *base_url
)
1654 off_t prev_posn
= 0;
1655 struct strbuf buf
= STRBUF_INIT
;
1656 struct http_pack_request
*preq
;
1658 preq
= xcalloc(1, sizeof(*preq
));
1659 preq
->target
= target
;
1661 end_url_with_slash(&buf
, base_url
);
1662 strbuf_addf(&buf
, "objects/pack/pack-%s.pack",
1663 sha1_to_hex(target
->sha1
));
1664 preq
->url
= strbuf_detach(&buf
, NULL
);
1666 snprintf(preq
->tmpfile
, sizeof(preq
->tmpfile
), "%s.temp",
1667 sha1_pack_name(target
->sha1
));
1668 preq
->packfile
= fopen(preq
->tmpfile
, "a");
1669 if (!preq
->packfile
) {
1670 error("Unable to open local file %s for pack",
1675 preq
->slot
= get_active_slot();
1676 curl_easy_setopt(preq
->slot
->curl
, CURLOPT_FILE
, preq
->packfile
);
1677 curl_easy_setopt(preq
->slot
->curl
, CURLOPT_WRITEFUNCTION
, fwrite
);
1678 curl_easy_setopt(preq
->slot
->curl
, CURLOPT_URL
, preq
->url
);
1679 curl_easy_setopt(preq
->slot
->curl
, CURLOPT_HTTPHEADER
,
1683 * If there is data present from a previous transfer attempt,
1684 * resume where it left off
1686 prev_posn
= ftello(preq
->packfile
);
1688 if (http_is_verbose
)
1690 "Resuming fetch of pack %s at byte %"PRIuMAX
"\n",
1691 sha1_to_hex(target
->sha1
), (uintmax_t)prev_posn
);
1692 http_opt_request_remainder(preq
->slot
->curl
, prev_posn
);
1703 /* Helpers for fetching objects (loose) */
1704 static size_t fwrite_sha1_file(char *ptr
, size_t eltsize
, size_t nmemb
,
1707 unsigned char expn
[4096];
1708 size_t size
= eltsize
* nmemb
;
1710 struct http_object_request
*freq
=
1711 (struct http_object_request
*)data
;
1713 ssize_t retval
= xwrite(freq
->localfile
,
1714 (char *) ptr
+ posn
, size
- posn
);
1718 } while (posn
< size
);
1720 freq
->stream
.avail_in
= size
;
1721 freq
->stream
.next_in
= (void *)ptr
;
1723 freq
->stream
.next_out
= expn
;
1724 freq
->stream
.avail_out
= sizeof(expn
);
1725 freq
->zret
= git_inflate(&freq
->stream
, Z_SYNC_FLUSH
);
1726 git_SHA1_Update(&freq
->c
, expn
,
1727 sizeof(expn
) - freq
->stream
.avail_out
);
1728 } while (freq
->stream
.avail_in
&& freq
->zret
== Z_OK
);
1732 struct http_object_request
*new_http_object_request(const char *base_url
,
1733 unsigned char *sha1
)
1735 char *hex
= sha1_to_hex(sha1
);
1736 const char *filename
;
1737 char prevfile
[PATH_MAX
];
1739 char prev_buf
[PREV_BUF_SIZE
];
1740 ssize_t prev_read
= 0;
1741 off_t prev_posn
= 0;
1742 struct http_object_request
*freq
;
1744 freq
= xcalloc(1, sizeof(*freq
));
1745 hashcpy(freq
->sha1
, sha1
);
1746 freq
->localfile
= -1;
1748 filename
= sha1_file_name(sha1
);
1749 snprintf(freq
->tmpfile
, sizeof(freq
->tmpfile
),
1750 "%s.temp", filename
);
1752 snprintf(prevfile
, sizeof(prevfile
), "%s.prev", filename
);
1753 unlink_or_warn(prevfile
);
1754 rename(freq
->tmpfile
, prevfile
);
1755 unlink_or_warn(freq
->tmpfile
);
1757 if (freq
->localfile
!= -1)
1758 error("fd leakage in start: %d", freq
->localfile
);
1759 freq
->localfile
= open(freq
->tmpfile
,
1760 O_WRONLY
| O_CREAT
| O_EXCL
, 0666);
1762 * This could have failed due to the "lazy directory creation";
1763 * try to mkdir the last path component.
1765 if (freq
->localfile
< 0 && errno
== ENOENT
) {
1766 char *dir
= strrchr(freq
->tmpfile
, '/');
1769 mkdir(freq
->tmpfile
, 0777);
1772 freq
->localfile
= open(freq
->tmpfile
,
1773 O_WRONLY
| O_CREAT
| O_EXCL
, 0666);
1776 if (freq
->localfile
< 0) {
1777 error("Couldn't create temporary file %s: %s",
1778 freq
->tmpfile
, strerror(errno
));
1782 git_inflate_init(&freq
->stream
);
1784 git_SHA1_Init(&freq
->c
);
1786 freq
->url
= get_remote_object_url(base_url
, hex
, 0);
1789 * If a previous temp file is present, process what was already
1792 prevlocal
= open(prevfile
, O_RDONLY
);
1793 if (prevlocal
!= -1) {
1795 prev_read
= xread(prevlocal
, prev_buf
, PREV_BUF_SIZE
);
1797 if (fwrite_sha1_file(prev_buf
,
1800 freq
) == prev_read
) {
1801 prev_posn
+= prev_read
;
1806 } while (prev_read
> 0);
1809 unlink_or_warn(prevfile
);
1812 * Reset inflate/SHA1 if there was an error reading the previous temp
1813 * file; also rewind to the beginning of the local file.
1815 if (prev_read
== -1) {
1816 memset(&freq
->stream
, 0, sizeof(freq
->stream
));
1817 git_inflate_init(&freq
->stream
);
1818 git_SHA1_Init(&freq
->c
);
1821 lseek(freq
->localfile
, 0, SEEK_SET
);
1822 if (ftruncate(freq
->localfile
, 0) < 0) {
1823 error("Couldn't truncate temporary file %s: %s",
1824 freq
->tmpfile
, strerror(errno
));
1830 freq
->slot
= get_active_slot();
1832 curl_easy_setopt(freq
->slot
->curl
, CURLOPT_FILE
, freq
);
1833 curl_easy_setopt(freq
->slot
->curl
, CURLOPT_WRITEFUNCTION
, fwrite_sha1_file
);
1834 curl_easy_setopt(freq
->slot
->curl
, CURLOPT_ERRORBUFFER
, freq
->errorstr
);
1835 curl_easy_setopt(freq
->slot
->curl
, CURLOPT_URL
, freq
->url
);
1836 curl_easy_setopt(freq
->slot
->curl
, CURLOPT_HTTPHEADER
, no_pragma_header
);
1839 * If we have successfully processed data from a previous fetch
1840 * attempt, only fetch the data we don't already have.
1843 if (http_is_verbose
)
1845 "Resuming fetch of object %s at byte %"PRIuMAX
"\n",
1846 hex
, (uintmax_t)prev_posn
);
1847 http_opt_request_remainder(freq
->slot
->curl
, prev_posn
);
1858 void process_http_object_request(struct http_object_request
*freq
)
1860 if (freq
->slot
== NULL
)
1862 freq
->curl_result
= freq
->slot
->curl_result
;
1863 freq
->http_code
= freq
->slot
->http_code
;
1867 int finish_http_object_request(struct http_object_request
*freq
)
1871 close(freq
->localfile
);
1872 freq
->localfile
= -1;
1874 process_http_object_request(freq
);
1876 if (freq
->http_code
== 416) {
1877 warning("requested range invalid; we may already have all the data.");
1878 } else if (freq
->curl_result
!= CURLE_OK
) {
1879 if (stat(freq
->tmpfile
, &st
) == 0)
1880 if (st
.st_size
== 0)
1881 unlink_or_warn(freq
->tmpfile
);
1885 git_inflate_end(&freq
->stream
);
1886 git_SHA1_Final(freq
->real_sha1
, &freq
->c
);
1887 if (freq
->zret
!= Z_STREAM_END
) {
1888 unlink_or_warn(freq
->tmpfile
);
1891 if (hashcmp(freq
->sha1
, freq
->real_sha1
)) {
1892 unlink_or_warn(freq
->tmpfile
);
1896 finalize_object_file(freq
->tmpfile
, sha1_file_name(freq
->sha1
));
1898 return freq
->rename
;
1901 void abort_http_object_request(struct http_object_request
*freq
)
1903 unlink_or_warn(freq
->tmpfile
);
1905 release_http_object_request(freq
);
1908 void release_http_object_request(struct http_object_request
*freq
)
1910 if (freq
->localfile
!= -1) {
1911 close(freq
->localfile
);
1912 freq
->localfile
= -1;
1914 if (freq
->url
!= NULL
) {
1918 if (freq
->slot
!= NULL
) {
1919 freq
->slot
->callback_func
= NULL
;
1920 freq
->slot
->callback_data
= NULL
;
1921 release_active_slot(freq
->slot
);