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