[thirdparty/git.git] / http.c

#include "http.h"

int data_received;
int active_requests = 0;

#ifdef USE_CURL_MULTI
int max_requests = -1;
CURLM *curlm;
#endif
#ifndef NO_CURL_EASY_DUPHANDLE
CURL *curl_default;
#endif
char curl_errorstr[CURL_ERROR_SIZE];

int curl_ssl_verify = -1;
char *ssl_cert = NULL;
#if LIBCURL_VERSION_NUM >= 0x070902
char *ssl_key = NULL;
#endif
#if LIBCURL_VERSION_NUM >= 0x070908
char *ssl_capath = NULL;
#endif
char *ssl_cainfo = NULL;
long curl_low_speed_limit = -1;
long curl_low_speed_time = -1;
int curl_ftp_no_epsv = 0;
char *curl_http_proxy = NULL;

struct curl_slist *pragma_header;

struct active_request_slot *active_queue_head = NULL;

size_t fread_buffer(void *ptr, size_t eltsize, size_t nmemb,
			   struct buffer *buffer)
{
	size_t size = eltsize * nmemb;
	if (size > buffer->size - buffer->posn)
		size = buffer->size - buffer->posn;
	memcpy(ptr, (char *) buffer->buffer + buffer->posn, size);
	buffer->posn += size;
	return size;
}

size_t fwrite_buffer(const void *ptr, size_t eltsize,
			    size_t nmemb, struct buffer *buffer)
{
	size_t size = eltsize * nmemb;
	if (size > buffer->size - buffer->posn) {
		buffer->size = buffer->size * 3 / 2;
		if (buffer->size < buffer->posn + size)
			buffer->size = buffer->posn + size;
		buffer->buffer = xrealloc(buffer->buffer, buffer->size);
	}
	memcpy((char *) buffer->buffer + buffer->posn, ptr, size);
	buffer->posn += size;
	data_received++;
	return size;
}

size_t fwrite_null(const void *ptr, size_t eltsize,
			  size_t nmemb, struct buffer *buffer)
{
	data_received++;
	return eltsize * nmemb;
}

static void finish_active_slot(struct active_request_slot *slot);

#ifdef USE_CURL_MULTI
static void process_curl_messages(void)
{
	int num_messages;
	struct active_request_slot *slot;
	CURLMsg *curl_message = curl_multi_info_read(curlm, &num_messages);

	while (curl_message != NULL) {
		if (curl_message->msg == CURLMSG_DONE) {
			int curl_result = curl_message->data.result;
			slot = active_queue_head;
			while (slot != NULL &&
			       slot->curl != curl_message->easy_handle)
				slot = slot->next;
			if (slot != NULL) {
				curl_multi_remove_handle(curlm, slot->curl);
				slot->curl_result = curl_result;
				finish_active_slot(slot);
			} else {
				fprintf(stderr, "Received DONE message for unknown request!\n");
			}
		} else {
			fprintf(stderr, "Unknown CURL message received: %d\n",
				(int)curl_message->msg);
		}
		curl_message = curl_multi_info_read(curlm, &num_messages);
	}
}
#endif

static int http_options(const char *var, const char *value)
{
	if (!strcmp("http.sslverify", var)) {
		if (curl_ssl_verify == -1) {
			curl_ssl_verify = git_config_bool(var, value);
		}
		return 0;
	}

	if (!strcmp("http.sslcert", var)) {
		if (ssl_cert == NULL) {
			ssl_cert = xmalloc(strlen(value)+1);
			strcpy(ssl_cert, value);
		}
		return 0;
	}
#if LIBCURL_VERSION_NUM >= 0x070902
	if (!strcmp("http.sslkey", var)) {
		if (ssl_key == NULL) {
			ssl_key = xmalloc(strlen(value)+1);
			strcpy(ssl_key, value);
		}
		return 0;
	}
#endif
#if LIBCURL_VERSION_NUM >= 0x070908
	if (!strcmp("http.sslcapath", var)) {
		if (ssl_capath == NULL) {
			ssl_capath = xmalloc(strlen(value)+1);
			strcpy(ssl_capath, value);
		}
		return 0;
	}
#endif
	if (!strcmp("http.sslcainfo", var)) {
		if (ssl_cainfo == NULL) {
			ssl_cainfo = xmalloc(strlen(value)+1);
			strcpy(ssl_cainfo, value);
		}
		return 0;
	}

#ifdef USE_CURL_MULTI
	if (!strcmp("http.maxrequests", var)) {
		if (max_requests == -1)
			max_requests = git_config_int(var, value);
		return 0;
	}
#endif

	if (!strcmp("http.lowspeedlimit", var)) {
		if (curl_low_speed_limit == -1)
			curl_low_speed_limit = (long)git_config_int(var, value);
		return 0;
	}
	if (!strcmp("http.lowspeedtime", var)) {
		if (curl_low_speed_time == -1)
			curl_low_speed_time = (long)git_config_int(var, value);
		return 0;
	}

	if (!strcmp("http.noepsv", var)) {
		curl_ftp_no_epsv = git_config_bool(var, value);
		return 0;
	}
	if (!strcmp("http.proxy", var)) {
		if (curl_http_proxy == NULL) {
			curl_http_proxy = xmalloc(strlen(value)+1);
			strcpy(curl_http_proxy, value);
		}
		return 0;
	}

	/* Fall back on the default ones */
	return git_default_config(var, value);
}

static CURL* get_curl_handle(void)
{
	CURL* result = curl_easy_init();

	curl_easy_setopt(result, CURLOPT_SSL_VERIFYPEER, curl_ssl_verify);
#if LIBCURL_VERSION_NUM >= 0x070907
	curl_easy_setopt(result, CURLOPT_NETRC, CURL_NETRC_OPTIONAL);
#endif

	if (ssl_cert != NULL)
		curl_easy_setopt(result, CURLOPT_SSLCERT, ssl_cert);
#if LIBCURL_VERSION_NUM >= 0x070902
	if (ssl_key != NULL)
		curl_easy_setopt(result, CURLOPT_SSLKEY, ssl_key);
#endif
#if LIBCURL_VERSION_NUM >= 0x070908
	if (ssl_capath != NULL)
		curl_easy_setopt(result, CURLOPT_CAPATH, ssl_capath);
#endif
	if (ssl_cainfo != NULL)
		curl_easy_setopt(result, CURLOPT_CAINFO, ssl_cainfo);
	curl_easy_setopt(result, CURLOPT_FAILONERROR, 1);

	if (curl_low_speed_limit > 0 && curl_low_speed_time > 0) {
		curl_easy_setopt(result, CURLOPT_LOW_SPEED_LIMIT,
				 curl_low_speed_limit);
		curl_easy_setopt(result, CURLOPT_LOW_SPEED_TIME,
				 curl_low_speed_time);
	}

	curl_easy_setopt(result, CURLOPT_FOLLOWLOCATION, 1);

	if (getenv("GIT_CURL_VERBOSE"))
		curl_easy_setopt(result, CURLOPT_VERBOSE, 1);

	curl_easy_setopt(result, CURLOPT_USERAGENT, GIT_USER_AGENT);

	if (curl_ftp_no_epsv)
		curl_easy_setopt(result, CURLOPT_FTP_USE_EPSV, 0);

	if (curl_http_proxy)
		curl_easy_setopt(result, CURLOPT_PROXY, curl_http_proxy);

	return result;
}

void http_init(void)
{
	char *low_speed_limit;
	char *low_speed_time;

	curl_global_init(CURL_GLOBAL_ALL);

	pragma_header = curl_slist_append(pragma_header, "Pragma: no-cache");

#ifdef USE_CURL_MULTI
	{
		char *http_max_requests = getenv("GIT_HTTP_MAX_REQUESTS");
		if (http_max_requests != NULL)
			max_requests = atoi(http_max_requests);
	}

	curlm = curl_multi_init();
	if (curlm == NULL) {
		fprintf(stderr, "Error creating curl multi handle.\n");
		exit(1);
	}
#endif

	if (getenv("GIT_SSL_NO_VERIFY"))
		curl_ssl_verify = 0;

	ssl_cert = getenv("GIT_SSL_CERT");
#if LIBCURL_VERSION_NUM >= 0x070902
	ssl_key = getenv("GIT_SSL_KEY");
#endif
#if LIBCURL_VERSION_NUM >= 0x070908
	ssl_capath = getenv("GIT_SSL_CAPATH");
#endif
	ssl_cainfo = getenv("GIT_SSL_CAINFO");

	low_speed_limit = getenv("GIT_HTTP_LOW_SPEED_LIMIT");
	if (low_speed_limit != NULL)
		curl_low_speed_limit = strtol(low_speed_limit, NULL, 10);
	low_speed_time = getenv("GIT_HTTP_LOW_SPEED_TIME");
	if (low_speed_time != NULL)
		curl_low_speed_time = strtol(low_speed_time, NULL, 10);

	git_config(http_options);

	if (curl_ssl_verify == -1)
		curl_ssl_verify = 1;

#ifdef USE_CURL_MULTI
	if (max_requests < 1)
		max_requests = DEFAULT_MAX_REQUESTS;
#endif

	if (getenv("GIT_CURL_FTP_NO_EPSV"))
		curl_ftp_no_epsv = 1;

#ifndef NO_CURL_EASY_DUPHANDLE
	curl_default = get_curl_handle();
#endif
}

void http_cleanup(void)
{
	struct active_request_slot *slot = active_queue_head;
#ifdef USE_CURL_MULTI
	char *wait_url;
#endif

	while (slot != NULL) {
		struct active_request_slot *next = slot->next;
#ifdef USE_CURL_MULTI
		if (slot->in_use) {
			curl_easy_getinfo(slot->curl,
					  CURLINFO_EFFECTIVE_URL,
					  &wait_url);
			fprintf(stderr, "Waiting for %s\n", wait_url);
			run_active_slot(slot);
		}
#endif
		if (slot->curl != NULL)
			curl_easy_cleanup(slot->curl);
		free(slot);
		slot = next;
	}
	active_queue_head = NULL;

#ifndef NO_CURL_EASY_DUPHANDLE
	curl_easy_cleanup(curl_default);
#endif

#ifdef USE_CURL_MULTI
	curl_multi_cleanup(curlm);
#endif
	curl_global_cleanup();

	curl_slist_free_all(pragma_header);
	pragma_header = NULL;
}

struct active_request_slot *get_active_slot(void)
{
	struct active_request_slot *slot = active_queue_head;
	struct active_request_slot *newslot;

#ifdef USE_CURL_MULTI
	int num_transfers;

	/* Wait for a slot to open up if the queue is full */
	while (active_requests >= max_requests) {
		curl_multi_perform(curlm, &num_transfers);
		if (num_transfers < active_requests) {
			process_curl_messages();
		}
	}
#endif

	while (slot != NULL && slot->in_use) {
		slot = slot->next;
	}
	if (slot == NULL) {
		newslot = xmalloc(sizeof(*newslot));
		newslot->curl = NULL;
		newslot->in_use = 0;
		newslot->next = NULL;

		slot = active_queue_head;
		if (slot == NULL) {
			active_queue_head = newslot;
		} else {
			while (slot->next != NULL) {
				slot = slot->next;
			}
			slot->next = newslot;
		}
		slot = newslot;
	}

	if (slot->curl == NULL) {
#ifdef NO_CURL_EASY_DUPHANDLE
		slot->curl = get_curl_handle();
#else
		slot->curl = curl_easy_duphandle(curl_default);
#endif
	}

	active_requests++;
	slot->in_use = 1;
	slot->local = NULL;
	slot->results = NULL;
	slot->finished = NULL;
	slot->callback_data = NULL;
	slot->callback_func = NULL;
	curl_easy_setopt(slot->curl, CURLOPT_HTTPHEADER, NULL);
	curl_easy_setopt(slot->curl, CURLOPT_HTTPHEADER, pragma_header);
	curl_easy_setopt(slot->curl, CURLOPT_ERRORBUFFER, curl_errorstr);
	curl_easy_setopt(slot->curl, CURLOPT_CUSTOMREQUEST, NULL);
	curl_easy_setopt(slot->curl, CURLOPT_READFUNCTION, NULL);
	curl_easy_setopt(slot->curl, CURLOPT_WRITEFUNCTION, NULL);
	curl_easy_setopt(slot->curl, CURLOPT_UPLOAD, 0);
	curl_easy_setopt(slot->curl, CURLOPT_HTTPGET, 1);

	return slot;
}

int start_active_slot(struct active_request_slot *slot)
{
#ifdef USE_CURL_MULTI
	CURLMcode curlm_result = curl_multi_add_handle(curlm, slot->curl);
	int num_transfers;

	if (curlm_result != CURLM_OK &&
	    curlm_result != CURLM_CALL_MULTI_PERFORM) {
		active_requests--;
		slot->in_use = 0;
		return 0;
	}

	/*
	 * We know there must be something to do, since we just added
	 * something.
	 */
	curl_multi_perform(curlm, &num_transfers);
#endif
	return 1;
}

#ifdef USE_CURL_MULTI
struct fill_chain {
	void *data;
	int (*fill)(void *);
	struct fill_chain *next;
};

static struct fill_chain *fill_cfg = NULL;

void add_fill_function(void *data, int (*fill)(void *))
{
	struct fill_chain *new = malloc(sizeof(*new));
	struct fill_chain **linkp = &fill_cfg;
	new->data = data;
	new->fill = fill;
	new->next = NULL;
	while (*linkp)
		linkp = &(*linkp)->next;
	*linkp = new;
}

void fill_active_slots(void)
{
	struct active_request_slot *slot = active_queue_head;

	while (active_requests < max_requests) {
		struct fill_chain *fill;
		for (fill = fill_cfg; fill; fill = fill->next)
			if (fill->fill(fill->data))
				break;

		if (!fill)
			break;
	}

	while (slot != NULL) {
		if (!slot->in_use && slot->curl != NULL) {
			curl_easy_cleanup(slot->curl);
			slot->curl = NULL;
		}
		slot = slot->next;
	}
}

void step_active_slots(void)
{
	int num_transfers;
	CURLMcode curlm_result;

	do {
		curlm_result = curl_multi_perform(curlm, &num_transfers);
	} while (curlm_result == CURLM_CALL_MULTI_PERFORM);
	if (num_transfers < active_requests) {
		process_curl_messages();
		fill_active_slots();
	}
}
#endif

void run_active_slot(struct active_request_slot *slot)
{
#ifdef USE_CURL_MULTI
	long last_pos = 0;
	long current_pos;
	fd_set readfds;
	fd_set writefds;
	fd_set excfds;
	int max_fd;
	struct timeval select_timeout;
	int finished = 0;

	slot->finished = &finished;
	while (!finished) {
		data_received = 0;
		step_active_slots();

		if (!data_received && slot->local != NULL) {
			current_pos = ftell(slot->local);
			if (current_pos > last_pos)
				data_received++;
			last_pos = current_pos;
		}

		if (slot->in_use && !data_received) {
			max_fd = 0;
			FD_ZERO(&readfds);
			FD_ZERO(&writefds);
			FD_ZERO(&excfds);
			select_timeout.tv_sec = 0;
			select_timeout.tv_usec = 50000;
			select(max_fd, &readfds, &writefds,
			       &excfds, &select_timeout);
		}
	}
#else
	while (slot->in_use) {
		slot->curl_result = curl_easy_perform(slot->curl);
		finish_active_slot(slot);
	}
#endif
}

static void closedown_active_slot(struct active_request_slot *slot)
{
        active_requests--;
        slot->in_use = 0;
}

void release_active_slot(struct active_request_slot *slot)
{
	closedown_active_slot(slot);
	if (slot->curl) {
#ifdef USE_CURL_MULTI
		curl_multi_remove_handle(curlm, slot->curl);
#endif
		curl_easy_cleanup(slot->curl);
		slot->curl = NULL;
	}
#ifdef USE_CURL_MULTI
	fill_active_slots();
#endif
}

static void finish_active_slot(struct active_request_slot *slot)
{
	closedown_active_slot(slot);
        curl_easy_getinfo(slot->curl, CURLINFO_HTTP_CODE, &slot->http_code);

	if (slot->finished != NULL)
		(*slot->finished) = 1;

	/* Store slot results so they can be read after the slot is reused */
	if (slot->results != NULL) {
		slot->results->curl_result = slot->curl_result;
		slot->results->http_code = slot->http_code;
	}

        /* Run callback if appropriate */
        if (slot->callback_func != NULL) {
                slot->callback_func(slot->callback_data);
        }
}

void finish_all_active_slots(void)
{
	struct active_request_slot *slot = active_queue_head;

	while (slot != NULL)
		if (slot->in_use) {
			run_active_slot(slot);
			slot = active_queue_head;
		} else {
			slot = slot->next;
		}
}
Commit	Line	Data
29508e1e NH	1	#include "http.h"
	2
	3	int data_received;
	4	int active_requests = 0;
	5
	6	#ifdef USE_CURL_MULTI
	7	int max_requests = -1;
	8	CURLM *curlm;
	9	#endif
	10	#ifndef NO_CURL_EASY_DUPHANDLE
	11	CURL *curl_default;
	12	#endif
	13	char curl_errorstr[CURL_ERROR_SIZE];
	14
	15	int curl_ssl_verify = -1;
	16	char *ssl_cert = NULL;
	17	#if LIBCURL_VERSION_NUM >= 0x070902
	18	char *ssl_key = NULL;
	19	#endif
	20	#if LIBCURL_VERSION_NUM >= 0x070908
	21	char *ssl_capath = NULL;
	22	#endif
	23	char *ssl_cainfo = NULL;
	24	long curl_low_speed_limit = -1;
	25	long curl_low_speed_time = -1;
3ea099d4	26	int curl_ftp_no_epsv = 0;
9c5665aa	27	char *curl_http_proxy = NULL;
29508e1e NH	28
29508e1e NH	29	struct curl_slist *pragma_header;
29508e1e NH	30
	31	struct active_request_slot *active_queue_head = NULL;
	32
	33	size_t fread_buffer(void *ptr, size_t eltsize, size_t nmemb,
	34	struct buffer *buffer)
	35	{
	36	size_t size = eltsize * nmemb;
	37	if (size > buffer->size - buffer->posn)
	38	size = buffer->size - buffer->posn;
1d7f171c	39	memcpy(ptr, (char *) buffer->buffer + buffer->posn, size);
29508e1e NH	40	buffer->posn += size;
	41	return size;
	42	}
	43
	44	size_t fwrite_buffer(const void *ptr, size_t eltsize,
	45	size_t nmemb, struct buffer *buffer)
	46	{
	47	size_t size = eltsize * nmemb;
	48	if (size > buffer->size - buffer->posn) {
	49	buffer->size = buffer->size * 3 / 2;
	50	if (buffer->size < buffer->posn + size)
	51	buffer->size = buffer->posn + size;
	52	buffer->buffer = xrealloc(buffer->buffer, buffer->size);
	53	}
1d7f171c	54	memcpy((char *) buffer->buffer + buffer->posn, ptr, size);
29508e1e NH	55	buffer->posn += size;
	56	data_received++;
	57	return size;
	58	}
	59
	60	size_t fwrite_null(const void *ptr, size_t eltsize,
	61	size_t nmemb, struct buffer *buffer)
	62	{
	63	data_received++;
	64	return eltsize * nmemb;
	65	}
	66
	67	static void finish_active_slot(struct active_request_slot *slot);
	68
	69	#ifdef USE_CURL_MULTI
	70	static void process_curl_messages(void)
	71	{
	72	int num_messages;
	73	struct active_request_slot *slot;
	74	CURLMsg *curl_message = curl_multi_info_read(curlm, &num_messages);
	75
	76	while (curl_message != NULL) {
	77	if (curl_message->msg == CURLMSG_DONE) {
	78	int curl_result = curl_message->data.result;
	79	slot = active_queue_head;
	80	while (slot != NULL &&
	81	slot->curl != curl_message->easy_handle)
	82	slot = slot->next;
	83	if (slot != NULL) {
	84	curl_multi_remove_handle(curlm, slot->curl);
	85	slot->curl_result = curl_result;
	86	finish_active_slot(slot);
	87	} else {
	88	fprintf(stderr, "Received DONE message for unknown request!\n");
	89	}
	90	} else {
	91	fprintf(stderr, "Unknown CURL message received: %d\n",
	92	(int)curl_message->msg);
	93	}
	94	curl_message = curl_multi_info_read(curlm, &num_messages);
	95	}
	96	}
	97	#endif
	98
	99	static int http_options(const char var, const char value)
	100	{
	101	if (!strcmp("http.sslverify", var)) {
	102	if (curl_ssl_verify == -1) {
	103	curl_ssl_verify = git_config_bool(var, value);
	104	}
	105	return 0;
	106	}
	107
	108	if (!strcmp("http.sslcert", var)) {
	109	if (ssl_cert == NULL) {
	110	ssl_cert = xmalloc(strlen(value)+1);
	111	strcpy(ssl_cert, value);
	112	}
	113	return 0;
	114	}
	115	#if LIBCURL_VERSION_NUM >= 0x070902
	116	if (!strcmp("http.sslkey", var)) {
	117	if (ssl_key == NULL) {
	118	ssl_key = xmalloc(strlen(value)+1);
119	strcpy(ssl_key, value);
120	}
121	return 0;
122	}
123	#endif
124	#if LIBCURL_VERSION_NUM >= 0x070908
125	if (!strcmp("http.sslcapath", var)) {
126	if (ssl_capath == NULL) {
127	ssl_capath = xmalloc(strlen(value)+1);
128	strcpy(ssl_capath, value);
129	}
130	return 0;
131	}
132	#endif
133	if (!strcmp("http.sslcainfo", var)) {
134	if (ssl_cainfo == NULL) {
135	ssl_cainfo = xmalloc(strlen(value)+1);
136	strcpy(ssl_cainfo, value);
137	}
138	return 0;
139	}
140
a6080a0a	141	#ifdef USE_CURL_MULTI
29508e1e NH	142	if (!strcmp("http.maxrequests", var)) {
	143	if (max_requests == -1)
	144	max_requests = git_config_int(var, value);
	145	return 0;
	146	}
	147	#endif
	148
	149	if (!strcmp("http.lowspeedlimit", var)) {
	150	if (curl_low_speed_limit == -1)
	151	curl_low_speed_limit = (long)git_config_int(var, value);
	152	return 0;
	153	}
	154	if (!strcmp("http.lowspeedtime", var)) {
	155	if (curl_low_speed_time == -1)
	156	curl_low_speed_time = (long)git_config_int(var, value);
	157	return 0;
	158	}
	159
3ea099d4 SK	160	if (!strcmp("http.noepsv", var)) {
	161	curl_ftp_no_epsv = git_config_bool(var, value);
	162	return 0;
	163	}
9c5665aa SV	164	if (!strcmp("http.proxy", var)) {
	165	if (curl_http_proxy == NULL) {
	166	curl_http_proxy = xmalloc(strlen(value)+1);
	167	strcpy(curl_http_proxy, value);
	168	}
	169	return 0;
	170	}
3ea099d4	171
29508e1e NH	172	/* Fall back on the default ones */
	173	return git_default_config(var, value);
	174	}
	175
11979b98 JH	176	static CURL* get_curl_handle(void)
	177	{
	178	CURL* result = curl_easy_init();
	179
	180	curl_easy_setopt(result, CURLOPT_SSL_VERIFYPEER, curl_ssl_verify);
	181	#if LIBCURL_VERSION_NUM >= 0x070907
	182	curl_easy_setopt(result, CURLOPT_NETRC, CURL_NETRC_OPTIONAL);
	183	#endif
	184
	185	if (ssl_cert != NULL)
	186	curl_easy_setopt(result, CURLOPT_SSLCERT, ssl_cert);
	187	#if LIBCURL_VERSION_NUM >= 0x070902
	188	if (ssl_key != NULL)
	189	curl_easy_setopt(result, CURLOPT_SSLKEY, ssl_key);
	190	#endif
	191	#if LIBCURL_VERSION_NUM >= 0x070908
	192	if (ssl_capath != NULL)
	193	curl_easy_setopt(result, CURLOPT_CAPATH, ssl_capath);
	194	#endif
	195	if (ssl_cainfo != NULL)
	196	curl_easy_setopt(result, CURLOPT_CAINFO, ssl_cainfo);
	197	curl_easy_setopt(result, CURLOPT_FAILONERROR, 1);
	198
	199	if (curl_low_speed_limit > 0 && curl_low_speed_time > 0) {
	200	curl_easy_setopt(result, CURLOPT_LOW_SPEED_LIMIT,
	201	curl_low_speed_limit);
	202	curl_easy_setopt(result, CURLOPT_LOW_SPEED_TIME,
	203	curl_low_speed_time);
	204	}
	205
	206	curl_easy_setopt(result, CURLOPT_FOLLOWLOCATION, 1);
	207
7982d74e MW	208	if (getenv("GIT_CURL_VERBOSE"))
	209	curl_easy_setopt(result, CURLOPT_VERBOSE, 1);
	210
20fc9bc5 NH	211	curl_easy_setopt(result, CURLOPT_USERAGENT, GIT_USER_AGENT);
20fc9bc5 NH	212
3ea099d4 SK	213	if (curl_ftp_no_epsv)
	214	curl_easy_setopt(result, CURLOPT_FTP_USE_EPSV, 0);
	215
9c5665aa SV	216	if (curl_http_proxy)
	217	curl_easy_setopt(result, CURLOPT_PROXY, curl_http_proxy);
	218
11979b98 JH	219	return result;
	220	}
	221
29508e1e NH	222	void http_init(void)
	223	{
	224	char *low_speed_limit;
	225	char *low_speed_time;
	226
	227	curl_global_init(CURL_GLOBAL_ALL);
	228
	229	pragma_header = curl_slist_append(pragma_header, "Pragma: no-cache");
29508e1e NH	230
	231	#ifdef USE_CURL_MULTI
	232	{
	233	char *http_max_requests = getenv("GIT_HTTP_MAX_REQUESTS");
	234	if (http_max_requests != NULL)
	235	max_requests = atoi(http_max_requests);
	236	}
	237
	238	curlm = curl_multi_init();
	239	if (curlm == NULL) {
	240	fprintf(stderr, "Error creating curl multi handle.\n");
	241	exit(1);
	242	}
	243	#endif
	244
	245	if (getenv("GIT_SSL_NO_VERIFY"))
	246	curl_ssl_verify = 0;
	247
	248	ssl_cert = getenv("GIT_SSL_CERT");
	249	#if LIBCURL_VERSION_NUM >= 0x070902
	250	ssl_key = getenv("GIT_SSL_KEY");
	251	#endif
	252	#if LIBCURL_VERSION_NUM >= 0x070908
	253	ssl_capath = getenv("GIT_SSL_CAPATH");
	254	#endif
	255	ssl_cainfo = getenv("GIT_SSL_CAINFO");
	256
	257	low_speed_limit = getenv("GIT_HTTP_LOW_SPEED_LIMIT");
	258	if (low_speed_limit != NULL)
	259	curl_low_speed_limit = strtol(low_speed_limit, NULL, 10);
	260	low_speed_time = getenv("GIT_HTTP_LOW_SPEED_TIME");
	261	if (low_speed_time != NULL)
	262	curl_low_speed_time = strtol(low_speed_time, NULL, 10);
	263
	264	git_config(http_options);
	265
	266	if (curl_ssl_verify == -1)
	267	curl_ssl_verify = 1;
	268
	269	#ifdef USE_CURL_MULTI
	270	if (max_requests < 1)
	271	max_requests = DEFAULT_MAX_REQUESTS;
	272	#endif
	273
3ea099d4 SK	274	if (getenv("GIT_CURL_FTP_NO_EPSV"))
	275	curl_ftp_no_epsv = 1;
	276
29508e1e NH	277	#ifndef NO_CURL_EASY_DUPHANDLE
	278	curl_default = get_curl_handle();
	279	#endif
	280	}
	281
	282	void http_cleanup(void)
	283	{
	284	struct active_request_slot *slot = active_queue_head;
	285	#ifdef USE_CURL_MULTI
	286	char *wait_url;
29508e1e NH	287	#endif
	288
	289	while (slot != NULL) {
3278cd0a	290	struct active_request_slot *next = slot->next;
29508e1e NH	291	#ifdef USE_CURL_MULTI
	292	if (slot->in_use) {
	293	curl_easy_getinfo(slot->curl,
	294	CURLINFO_EFFECTIVE_URL,
	295	&wait_url);
	296	fprintf(stderr, "Waiting for %s\n", wait_url);
	297	run_active_slot(slot);
	298	}
	299	#endif
	300	if (slot->curl != NULL)
	301	curl_easy_cleanup(slot->curl);
3278cd0a SP	302	free(slot);
3278cd0a SP	303	slot = next;
29508e1e	304	}
3278cd0a	305	active_queue_head = NULL;
29508e1e NH	306
	307	#ifndef NO_CURL_EASY_DUPHANDLE
	308	curl_easy_cleanup(curl_default);
	309	#endif
	310
	311	#ifdef USE_CURL_MULTI
	312	curl_multi_cleanup(curlm);
	313	#endif
	314	curl_global_cleanup();
b3ca4e4e NH	315
b3ca4e4e NH	316	curl_slist_free_all(pragma_header);
3278cd0a	317	pragma_header = NULL;
29508e1e NH	318	}
29508e1e NH	319
29508e1e NH	320	struct active_request_slot *get_active_slot(void)
	321	{
	322	struct active_request_slot *slot = active_queue_head;
	323	struct active_request_slot *newslot;
	324
	325	#ifdef USE_CURL_MULTI
	326	int num_transfers;
	327
	328	/* Wait for a slot to open up if the queue is full */
	329	while (active_requests >= max_requests) {
	330	curl_multi_perform(curlm, &num_transfers);
	331	if (num_transfers < active_requests) {
	332	process_curl_messages();
	333	}
	334	}
	335	#endif
	336
	337	while (slot != NULL && slot->in_use) {
	338	slot = slot->next;
	339	}
	340	if (slot == NULL) {
	341	newslot = xmalloc(sizeof(*newslot));
	342	newslot->curl = NULL;
	343	newslot->in_use = 0;
	344	newslot->next = NULL;
	345
	346	slot = active_queue_head;
	347	if (slot == NULL) {
	348	active_queue_head = newslot;
	349	} else {
	350	while (slot->next != NULL) {
	351	slot = slot->next;
	352	}
	353	slot->next = newslot;
	354	}
	355	slot = newslot;
	356	}
	357
	358	if (slot->curl == NULL) {
	359	#ifdef NO_CURL_EASY_DUPHANDLE
	360	slot->curl = get_curl_handle();
	361	#else
	362	slot->curl = curl_easy_duphandle(curl_default);
	363	#endif
	364	}
	365
	366	active_requests++;
	367	slot->in_use = 1;
	368	slot->local = NULL;
c8568e13	369	slot->results = NULL;
baa7b67d	370	slot->finished = NULL;
29508e1e NH	371	slot->callback_data = NULL;
29508e1e NH	372	slot->callback_func = NULL;
9094950d	373	curl_easy_setopt(slot->curl, CURLOPT_HTTPHEADER, NULL);
29508e1e	374	curl_easy_setopt(slot->curl, CURLOPT_HTTPHEADER, pragma_header);
29508e1e	375	curl_easy_setopt(slot->curl, CURLOPT_ERRORBUFFER, curl_errorstr);
9094950d NH	376	curl_easy_setopt(slot->curl, CURLOPT_CUSTOMREQUEST, NULL);
	377	curl_easy_setopt(slot->curl, CURLOPT_READFUNCTION, NULL);
	378	curl_easy_setopt(slot->curl, CURLOPT_WRITEFUNCTION, NULL);
	379	curl_easy_setopt(slot->curl, CURLOPT_UPLOAD, 0);
	380	curl_easy_setopt(slot->curl, CURLOPT_HTTPGET, 1);
29508e1e NH	381
	382	return slot;
	383	}
	384
	385	int start_active_slot(struct active_request_slot *slot)
	386	{
	387	#ifdef USE_CURL_MULTI
	388	CURLMcode curlm_result = curl_multi_add_handle(curlm, slot->curl);
45c17412	389	int num_transfers;
29508e1e NH	390
	391	if (curlm_result != CURLM_OK &&
	392	curlm_result != CURLM_CALL_MULTI_PERFORM) {
	393	active_requests--;
	394	slot->in_use = 0;
	395	return 0;
	396	}
45c17412 DB	397
	398	/*
	399	* We know there must be something to do, since we just added
	400	* something.
	401	*/
	402	curl_multi_perform(curlm, &num_transfers);
29508e1e NH	403	#endif
	404	return 1;
	405	}
	406
	407	#ifdef USE_CURL_MULTI
fc57b6aa DB	408	struct fill_chain {
	409	void *data;
	410	int (fill)(void );
	411	struct fill_chain *next;
	412	};
	413
	414	static struct fill_chain *fill_cfg = NULL;
	415
	416	void add_fill_function(void data, int (fill)(void *))
	417	{
	418	struct fill_chain new = malloc(sizeof(new));
	419	struct fill_chain **linkp = &fill_cfg;
	420	new->data = data;
	421	new->fill = fill;
	422	new->next = NULL;
	423	while (*linkp)
	424	linkp = &(*linkp)->next;
	425	*linkp = new;
	426	}
	427
45c17412 DB	428	void fill_active_slots(void)
	429	{
	430	struct active_request_slot *slot = active_queue_head;
	431
fc57b6aa DB	432	while (active_requests < max_requests) {
	433	struct fill_chain *fill;
	434	for (fill = fill_cfg; fill; fill = fill->next)
	435	if (fill->fill(fill->data))
	436	break;
	437
	438	if (!fill)
45c17412	439	break;
fc57b6aa	440	}
45c17412 DB	441
	442	while (slot != NULL) {
	443	if (!slot->in_use && slot->curl != NULL) {
	444	curl_easy_cleanup(slot->curl);
	445	slot->curl = NULL;
	446	}
	447	slot = slot->next;
	448	}
	449	}
	450
29508e1e NH	451	void step_active_slots(void)
	452	{
	453	int num_transfers;
	454	CURLMcode curlm_result;
	455
	456	do {
	457	curlm_result = curl_multi_perform(curlm, &num_transfers);
	458	} while (curlm_result == CURLM_CALL_MULTI_PERFORM);
	459	if (num_transfers < active_requests) {
	460	process_curl_messages();
	461	fill_active_slots();
	462	}
	463	}
	464	#endif
	465
	466	void run_active_slot(struct active_request_slot *slot)
	467	{
	468	#ifdef USE_CURL_MULTI
	469	long last_pos = 0;
	470	long current_pos;
	471	fd_set readfds;
	472	fd_set writefds;
	473	fd_set excfds;
	474	int max_fd;
	475	struct timeval select_timeout;
baa7b67d	476	int finished = 0;
29508e1e	477
baa7b67d NH	478	slot->finished = &finished;
baa7b67d NH	479	while (!finished) {
29508e1e NH	480	data_received = 0;
	481	step_active_slots();
	482
	483	if (!data_received && slot->local != NULL) {
	484	current_pos = ftell(slot->local);
	485	if (current_pos > last_pos)
	486	data_received++;
	487	last_pos = current_pos;
	488	}
	489
	490	if (slot->in_use && !data_received) {
	491	max_fd = 0;
	492	FD_ZERO(&readfds);
	493	FD_ZERO(&writefds);
	494	FD_ZERO(&excfds);
	495	select_timeout.tv_sec = 0;
	496	select_timeout.tv_usec = 50000;
	497	select(max_fd, &readfds, &writefds,
	498	&excfds, &select_timeout);
	499	}
	500	}
	501	#else
	502	while (slot->in_use) {
	503	slot->curl_result = curl_easy_perform(slot->curl);
	504	finish_active_slot(slot);
	505	}
	506	#endif
	507	}
	508
53f31389	509	static void closedown_active_slot(struct active_request_slot *slot)
29508e1e NH	510	{
	511	active_requests--;
	512	slot->in_use = 0;
53f31389 MW	513	}
	514
	515	void release_active_slot(struct active_request_slot *slot)
	516	{
	517	closedown_active_slot(slot);
	518	if (slot->curl) {
b3ca4e4e	519	#ifdef USE_CURL_MULTI
53f31389	520	curl_multi_remove_handle(curlm, slot->curl);
b3ca4e4e	521	#endif
53f31389 MW	522	curl_easy_cleanup(slot->curl);
	523	slot->curl = NULL;
	524	}
b3ca4e4e	525	#ifdef USE_CURL_MULTI
53f31389	526	fill_active_slots();
b3ca4e4e	527	#endif
53f31389 MW	528	}
	529
	530	static void finish_active_slot(struct active_request_slot *slot)
	531	{
	532	closedown_active_slot(slot);
29508e1e	533	curl_easy_getinfo(slot->curl, CURLINFO_HTTP_CODE, &slot->http_code);
c8568e13	534
baa7b67d NH	535	if (slot->finished != NULL)
	536	(*slot->finished) = 1;
	537
c8568e13 NH	538	/* Store slot results so they can be read after the slot is reused */
	539	if (slot->results != NULL) {
	540	slot->results->curl_result = slot->curl_result;
	541	slot->results->http_code = slot->http_code;
	542	}
	543
29508e1e NH	544	/* Run callback if appropriate */
	545	if (slot->callback_func != NULL) {
	546	slot->callback_func(slot->callback_data);
	547	}
	548	}
	549
	550	void finish_all_active_slots(void)
	551	{
	552	struct active_request_slot *slot = active_queue_head;
	553
	554	while (slot != NULL)
	555	if (slot->in_use) {
	556	run_active_slot(slot);
	557	slot = active_queue_head;
	558	} else {
	559	slot = slot->next;
	560	}
	561	}