http.c

   1 #include "http.h"
   2
   3 int data_received;
   4 int active_requests = 0;
   5
   6 #ifdef USE_CURL_MULTI
   7 static int max_requests = -1;
   8 static CURLM *curlm;
   9 #endif
  10 #ifndef NO_CURL_EASY_DUPHANDLE
  11 static CURL *curl_default;
  12 #endif
  13 char curl_errorstr[CURL_ERROR_SIZE];
  14
  15 static int curl_ssl_verify = -1;
  16 static char *ssl_cert = NULL;
  17 #if LIBCURL_VERSION_NUM >= 0x070902
  18 static char *ssl_key = NULL;
  19 #endif
  20 #if LIBCURL_VERSION_NUM >= 0x070908
  21 static char *ssl_capath = NULL;
  22 #endif
  23 static char *ssl_cainfo = NULL;
  24 static long curl_low_speed_limit = -1;
  25 static long curl_low_speed_time = -1;
  26 static int curl_ftp_no_epsv = 0;
  27 static char *curl_http_proxy = NULL;
  28
  29 static struct curl_slist *pragma_header;
  30
  31 static 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;
  39         memcpy(ptr, (char *) buffer->buffer + buffer->posn, size);
  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         }
  54         memcpy((char *) buffer->buffer + buffer->posn, ptr, size);
  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
 141 #ifdef USE_CURL_MULTI
 142         if (!strcmp("http.maxrequests", var)) {
 143                 if (max_requests == -1)
 144                         max_requests = git_config_int(var, value);
 145                 return 0;
 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
 160         if (!strcmp("http.noepsv", var)) {
 161                 curl_ftp_no_epsv = git_config_bool(var, value);
 162                 return 0;
 163         }
 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         }
 171
 172         /* Fall back on the default ones */
 173         return git_default_config(var, value);
 174 }
 175
 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
 208         if (getenv("GIT_CURL_VERBOSE"))
 209                 curl_easy_setopt(result, CURLOPT_VERBOSE, 1);
 210
 211         curl_easy_setopt(result, CURLOPT_USERAGENT, GIT_USER_AGENT);
 212
 213         if (curl_ftp_no_epsv)
 214                 curl_easy_setopt(result, CURLOPT_FTP_USE_EPSV, 0);
 215
 216         if (curl_http_proxy)
 217                 curl_easy_setopt(result, CURLOPT_PROXY, curl_http_proxy);
 218
 219         return result;
 220 }
 221
 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");
 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
 274         if (getenv("GIT_CURL_FTP_NO_EPSV"))
 275                 curl_ftp_no_epsv = 1;
 276
 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;
 287 #endif
 288
 289         while (slot != NULL) {
 290                 struct active_request_slot *next = slot->next;
 291 #ifdef USE_CURL_MULTI
 292                 if (slot->in_use) {
 293                         curl_easy_getinfo(slot->curl,
 294                                           CURLINFO_EFFECTIVE_URL,
 295                                           &wait_url);
 296                         fprintf(stderr, "Waiting for %s\n", wait_url);
 297                         run_active_slot(slot);
 298                 }
 299 #endif
 300                 if (slot->curl != NULL)
 301                         curl_easy_cleanup(slot->curl);
 302                 free(slot);
 303                 slot = next;
 304         }
 305         active_queue_head = NULL;
 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();
 315
 316         curl_slist_free_all(pragma_header);
 317         pragma_header = NULL;
 318 }
 319
 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;
 369         slot->results = NULL;
 370         slot->finished = NULL;
 371         slot->callback_data = NULL;
 372         slot->callback_func = NULL;
 373         curl_easy_setopt(slot->curl, CURLOPT_HTTPHEADER, NULL);
 374         curl_easy_setopt(slot->curl, CURLOPT_HTTPHEADER, pragma_header);
 375         curl_easy_setopt(slot->curl, CURLOPT_ERRORBUFFER, curl_errorstr);
 376         curl_easy_setopt(slot->curl, CURLOPT_CUSTOMREQUEST, NULL);
 377         curl_easy_setopt(slot->curl, CURLOPT_READFUNCTION, NULL);
 378         curl_easy_setopt(slot->curl, CURLOPT_WRITEFUNCTION, NULL);
 379         curl_easy_setopt(slot->curl, CURLOPT_UPLOAD, 0);
 380         curl_easy_setopt(slot->curl, CURLOPT_HTTPGET, 1);
 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);
 389         int num_transfers;
 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         }
 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);
 403 #endif
 404         return 1;
 405 }
 406
 407 #ifdef USE_CURL_MULTI
 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
 428 void fill_active_slots(void)
 429 {
 430         struct active_request_slot *slot = active_queue_head;
 431
 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)
 439                         break;
 440         }
 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
 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;
 476         int finished = 0;
 477
 478         slot->finished = &finished;
 479         while (!finished) {
 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
 509 static void closedown_active_slot(struct active_request_slot *slot)
 510 {
 511         active_requests--;
 512         slot->in_use = 0;
 513 }
 514
 515 void release_active_slot(struct active_request_slot *slot)
 516 {
 517         closedown_active_slot(slot);
 518         if (slot->curl) {
 519 #ifdef USE_CURL_MULTI
 520                 curl_multi_remove_handle(curlm, slot->curl);
 521 #endif
 522                 curl_easy_cleanup(slot->curl);
 523                 slot->curl = NULL;
 524         }
 525 #ifdef USE_CURL_MULTI
 526         fill_active_slots();
 527 #endif
 528 }
 529
 530 static void finish_active_slot(struct active_request_slot *slot)
 531 {
 532         closedown_active_slot(slot);
 533         curl_easy_getinfo(slot->curl, CURLINFO_HTTP_CODE, &slot->http_code);
 534
 535         if (slot->finished != NULL)
 536                 (*slot->finished) = 1;
 537
 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
 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 }