http-walker.c

   1 #include "cache.h"
   2 #include "commit.h"
   3 #include "walker.h"
   4 #include "http.h"
   5
   6 struct alt_base {
   7         char *base;
   8         int got_indices;
   9         struct packed_git *packs;
  10         struct alt_base *next;
  11 };
  12
  13 enum object_request_state {
  14         WAITING,
  15         ABORTED,
  16         ACTIVE,
  17         COMPLETE
  18 };
  19
  20 struct object_request {
  21         struct walker *walker;
  22         unsigned char sha1[20];
  23         struct alt_base *repo;
  24         enum object_request_state state;
  25         struct http_object_request *req;
  26         struct object_request *next;
  27 };
  28
  29 struct alternates_request {
  30         struct walker *walker;
  31         const char *base;
  32         char *url;
  33         struct strbuf *buffer;
  34         struct active_request_slot *slot;
  35         int http_specific;
  36 };
  37
  38 struct walker_data {
  39         const char *url;
  40         int got_alternates;
  41         struct alt_base *alt;
  42 };
  43
  44 static struct object_request *object_queue_head;
  45
  46 static void fetch_alternates(struct walker *walker, const char *base);
  47
  48 static void process_object_response(void *callback_data);
  49
  50 static void start_object_request(struct walker *walker,
  51                                  struct object_request *obj_req)
  52 {
  53         struct active_request_slot *slot;
  54         struct http_object_request *req;
  55
  56         req = new_http_object_request(obj_req->repo->base, obj_req->sha1);
  57         if (req == NULL) {
  58                 obj_req->state = ABORTED;
  59                 return;
  60         }
  61         obj_req->req = req;
  62
  63         slot = req->slot;
  64         slot->callback_func = process_object_response;
  65         slot->callback_data = obj_req;
  66
  67         /* Try to get the request started, abort the request on error */
  68         obj_req->state = ACTIVE;
  69         if (!start_active_slot(slot)) {
  70                 obj_req->state = ABORTED;
  71                 release_http_object_request(req);
  72                 return;
  73         }
  74 }
  75
  76 static void finish_object_request(struct object_request *obj_req)
  77 {
  78         if (finish_http_object_request(obj_req->req))
  79                 return;
  80
  81         if (obj_req->req->rename == 0)
  82                 walker_say(obj_req->walker, "got %s\n", sha1_to_hex(obj_req->sha1));
  83 }
  84
  85 static void process_object_response(void *callback_data)
  86 {
  87         struct object_request *obj_req =
  88                 (struct object_request *)callback_data;
  89         struct walker *walker = obj_req->walker;
  90         struct walker_data *data = walker->data;
  91         struct alt_base *alt = data->alt;
  92
  93         process_http_object_request(obj_req->req);
  94         obj_req->state = COMPLETE;
  95
  96         /* Use alternates if necessary */
  97         if (missing_target(obj_req->req)) {
  98                 fetch_alternates(walker, alt->base);
  99                 if (obj_req->repo->next != NULL) {
 100                         obj_req->repo =
 101                                 obj_req->repo->next;
 102                         release_http_object_request(obj_req->req);
 103                         start_object_request(walker, obj_req);
 104                         return;
 105                 }
 106         }
 107
 108         finish_object_request(obj_req);
 109 }
 110
 111 static void release_object_request(struct object_request *obj_req)
 112 {
 113         struct object_request *entry = object_queue_head;
 114
 115         if (obj_req->req !=NULL && obj_req->req->localfile != -1)
 116                 error("fd leakage in release: %d", obj_req->req->localfile);
 117         if (obj_req == object_queue_head) {
 118                 object_queue_head = obj_req->next;
 119         } else {
 120                 while (entry->next != NULL && entry->next != obj_req)
 121                         entry = entry->next;
 122                 if (entry->next == obj_req)
 123                         entry->next = entry->next->next;
 124         }
 125
 126         free(obj_req);
 127 }
 128
 129 #ifdef USE_CURL_MULTI
 130 static int fill_active_slot(struct walker *walker)
 131 {
 132         struct object_request *obj_req;
 133
 134         for (obj_req = object_queue_head; obj_req; obj_req = obj_req->next) {
 135                 if (obj_req->state == WAITING) {
 136                         if (has_sha1_file(obj_req->sha1))
 137                                 obj_req->state = COMPLETE;
 138                         else {
 139                                 start_object_request(walker, obj_req);
 140                                 return 1;
 141                         }
 142                 }
 143         }
 144         return 0;
 145 }
 146 #endif
 147
 148 static void prefetch(struct walker *walker, unsigned char *sha1)
 149 {
 150         struct object_request *newreq;
 151         struct object_request *tail;
 152         struct walker_data *data = walker->data;
 153
 154         newreq = xmalloc(sizeof(*newreq));
 155         newreq->walker = walker;
 156         hashcpy(newreq->sha1, sha1);
 157         newreq->repo = data->alt;
 158         newreq->state = WAITING;
 159         newreq->req = NULL;
 160         newreq->next = NULL;
 161
 162         http_is_verbose = walker->get_verbosely;
 163
 164         if (object_queue_head == NULL) {
 165                 object_queue_head = newreq;
 166         } else {
 167                 tail = object_queue_head;
 168                 while (tail->next != NULL)
 169                         tail = tail->next;
 170                 tail->next = newreq;
 171         }
 172
 173 #ifdef USE_CURL_MULTI
 174         fill_active_slots();
 175         step_active_slots();
 176 #endif
 177 }
 178
 179 static void process_alternates_response(void *callback_data)
 180 {
 181         struct alternates_request *alt_req =
 182                 (struct alternates_request *)callback_data;
 183         struct walker *walker = alt_req->walker;
 184         struct walker_data *cdata = walker->data;
 185         struct active_request_slot *slot = alt_req->slot;
 186         struct alt_base *tail = cdata->alt;
 187         const char *base = alt_req->base;
 188         static const char null_byte = '\0';
 189         char *data;
 190         int i = 0;
 191
 192         if (alt_req->http_specific) {
 193                 if (slot->curl_result != CURLE_OK ||
 194                     !alt_req->buffer->len) {
 195
 196                         /* Try reusing the slot to get non-http alternates */
 197                         alt_req->http_specific = 0;
 198                         sprintf(alt_req->url, "%s/objects/info/alternates",
 199                                 base);
 200                         curl_easy_setopt(slot->curl, CURLOPT_URL,
 201                                          alt_req->url);
 202                         active_requests++;
 203                         slot->in_use = 1;
 204                         if (slot->finished != NULL)
 205                                 (*slot->finished) = 0;
 206                         if (!start_active_slot(slot)) {
 207                                 cdata->got_alternates = -1;
 208                                 slot->in_use = 0;
 209                                 if (slot->finished != NULL)
 210                                         (*slot->finished) = 1;
 211                         }
 212                         return;
 213                 }
 214         } else if (slot->curl_result != CURLE_OK) {
 215                 if (!missing_target(slot)) {
 216                         cdata->got_alternates = -1;
 217                         return;
 218                 }
 219         }
 220
 221         fwrite_buffer(&null_byte, 1, 1, alt_req->buffer);
 222         alt_req->buffer->len--;
 223         data = alt_req->buffer->buf;
 224
 225         while (i < alt_req->buffer->len) {
 226                 int posn = i;
 227                 while (posn < alt_req->buffer->len && data[posn] != '\n')
 228                         posn++;
 229                 if (data[posn] == '\n') {
 230                         int okay = 0;
 231                         int serverlen = 0;
 232                         struct alt_base *newalt;
 233                         char *target = NULL;
 234                         if (data[i] == '/') {
 235                                 /*
 236                                  * This counts
 237                                  * http://git.host/pub/scm/linux.git/
 238                                  * -----------here^
 239                                  * so memcpy(dst, base, serverlen) will
 240                                  * copy up to "...git.host".
 241                                  */
 242                                 const char *colon_ss = strstr(base,"://");
 243                                 if (colon_ss) {
 244                                         serverlen = (strchr(colon_ss + 3, '/')
 245                                                      - base);
 246                                         okay = 1;
 247                                 }
 248                         } else if (!memcmp(data + i, "../", 3)) {
 249                                 /*
 250                                  * Relative URL; chop the corresponding
 251                                  * number of subpath from base (and ../
 252                                  * from data), and concatenate the result.
 253                                  *
 254                                  * The code first drops ../ from data, and
 255                                  * then drops one ../ from data and one path
 256                                  * from base.  IOW, one extra ../ is dropped
 257                                  * from data than path is dropped from base.
 258                                  *
 259                                  * This is not wrong.  The alternate in
 260                                  *     http://git.host/pub/scm/linux.git/
 261                                  * to borrow from
 262                                  *     http://git.host/pub/scm/linus.git/
 263                                  * is ../../linus.git/objects/.  You need
 264                                  * two ../../ to borrow from your direct
 265                                  * neighbour.
 266                                  */
 267                                 i += 3;
 268                                 serverlen = strlen(base);
 269                                 while (i + 2 < posn &&
 270                                        !memcmp(data + i, "../", 3)) {
 271                                         do {
 272                                                 serverlen--;
 273                                         } while (serverlen &&
 274                                                  base[serverlen - 1] != '/');
 275                                         i += 3;
 276                                 }
 277                                 /* If the server got removed, give up. */
 278                                 okay = strchr(base, ':') - base + 3 <
 279                                        serverlen;
 280                         } else if (alt_req->http_specific) {
 281                                 char *colon = strchr(data + i, ':');
 282                                 char *slash = strchr(data + i, '/');
 283                                 if (colon && slash && colon < data + posn &&
 284                                     slash < data + posn && colon < slash) {
 285                                         okay = 1;
 286                                 }
 287                         }
 288                         /* skip "objects\n" at end */
 289                         if (okay) {
 290                                 target = xmalloc(serverlen + posn - i - 6);
 291                                 memcpy(target, base, serverlen);
 292                                 memcpy(target + serverlen, data + i,
 293                                        posn - i - 7);
 294                                 target[serverlen + posn - i - 7] = 0;
 295                                 if (walker->get_verbosely)
 296                                         fprintf(stderr,
 297                                                 "Also look at %s\n", target);
 298                                 newalt = xmalloc(sizeof(*newalt));
 299                                 newalt->next = NULL;
 300                                 newalt->base = target;
 301                                 newalt->got_indices = 0;
 302                                 newalt->packs = NULL;
 303
 304                                 while (tail->next != NULL)
 305                                         tail = tail->next;
 306                                 tail->next = newalt;
 307                         }
 308                 }
 309                 i = posn + 1;
 310         }
 311
 312         cdata->got_alternates = 1;
 313 }
 314
 315 static void fetch_alternates(struct walker *walker, const char *base)
 316 {
 317         struct strbuf buffer = STRBUF_INIT;
 318         char *url;
 319         struct active_request_slot *slot;
 320         struct alternates_request alt_req;
 321         struct walker_data *cdata = walker->data;
 322
 323         /*
 324          * If another request has already started fetching alternates,
 325          * wait for them to arrive and return to processing this request's
 326          * curl message
 327          */
 328 #ifdef USE_CURL_MULTI
 329         while (cdata->got_alternates == 0) {
 330                 step_active_slots();
 331         }
 332 #endif
 333
 334         /* Nothing to do if they've already been fetched */
 335         if (cdata->got_alternates == 1)
 336                 return;
 337
 338         /* Start the fetch */
 339         cdata->got_alternates = 0;
 340
 341         if (walker->get_verbosely)
 342                 fprintf(stderr, "Getting alternates list for %s\n", base);
 343
 344         url = xmalloc(strlen(base) + 31);
 345         sprintf(url, "%s/objects/info/http-alternates", base);
 346
 347         /*
 348          * Use a callback to process the result, since another request
 349          * may fail and need to have alternates loaded before continuing
 350          */
 351         slot = get_active_slot();
 352         slot->callback_func = process_alternates_response;
 353         alt_req.walker = walker;
 354         slot->callback_data = &alt_req;
 355
 356         curl_easy_setopt(slot->curl, CURLOPT_FILE, &buffer);
 357         curl_easy_setopt(slot->curl, CURLOPT_WRITEFUNCTION, fwrite_buffer);
 358         curl_easy_setopt(slot->curl, CURLOPT_URL, url);
 359
 360         alt_req.base = base;
 361         alt_req.url = url;
 362         alt_req.buffer = &buffer;
 363         alt_req.http_specific = 1;
 364         alt_req.slot = slot;
 365
 366         if (start_active_slot(slot))
 367                 run_active_slot(slot);
 368         else
 369                 cdata->got_alternates = -1;
 370
 371         strbuf_release(&buffer);
 372         free(url);
 373 }
 374
 375 static int fetch_indices(struct walker *walker, struct alt_base *repo)
 376 {
 377         int ret;
 378
 379         if (repo->got_indices)
 380                 return 0;
 381
 382         if (walker->get_verbosely)
 383                 fprintf(stderr, "Getting pack list for %s\n", repo->base);
 384
 385         switch (http_get_info_packs(repo->base, &repo->packs)) {
 386         case HTTP_OK:
 387         case HTTP_MISSING_TARGET:
 388                 repo->got_indices = 1;
 389                 ret = 0;
 390                 break;
 391         default:
 392                 repo->got_indices = 0;
 393                 ret = -1;
 394         }
 395
 396         return ret;
 397 }
 398
 399 static int fetch_pack(struct walker *walker, struct alt_base *repo, unsigned char *sha1)
 400 {
 401         struct packed_git *target;
 402         int ret;
 403         struct slot_results results;
 404         struct http_pack_request *preq;
 405
 406         if (fetch_indices(walker, repo))
 407                 return -1;
 408         target = find_sha1_pack(sha1, repo->packs);
 409         if (!target)
 410                 return -1;
 411
 412         if (walker->get_verbosely) {
 413                 fprintf(stderr, "Getting pack %s\n",
 414                         sha1_to_hex(target->sha1));
 415                 fprintf(stderr, " which contains %s\n",
 416                         sha1_to_hex(sha1));
 417         }
 418
 419         preq = new_http_pack_request(target, repo->base);
 420         if (preq == NULL)
 421                 goto abort;
 422         preq->lst = &repo->packs;
 423         preq->slot->results = &results;
 424
 425         if (start_active_slot(preq->slot)) {
 426                 run_active_slot(preq->slot);
 427                 if (results.curl_result != CURLE_OK) {
 428                         error("Unable to get pack file %s\n%s", preq->url,
 429                               curl_errorstr);
 430                         goto abort;
 431                 }
 432         } else {
 433                 error("Unable to start request");
 434                 goto abort;
 435         }
 436
 437         ret = finish_http_pack_request(preq);
 438         release_http_pack_request(preq);
 439         if (ret)
 440                 return ret;
 441
 442         return 0;
 443
 444 abort:
 445         return -1;
 446 }
 447
 448 static void abort_object_request(struct object_request *obj_req)
 449 {
 450         release_object_request(obj_req);
 451 }
 452
 453 static int fetch_object(struct walker *walker, struct alt_base *repo, unsigned char *sha1)
 454 {
 455         char *hex = sha1_to_hex(sha1);
 456         int ret = 0;
 457         struct object_request *obj_req = object_queue_head;
 458         struct http_object_request *req;
 459
 460         while (obj_req != NULL && hashcmp(obj_req->sha1, sha1))
 461                 obj_req = obj_req->next;
 462         if (obj_req == NULL)
 463                 return error("Couldn't find request for %s in the queue", hex);
 464
 465         if (has_sha1_file(obj_req->sha1)) {
 466                 if (obj_req->req != NULL)
 467                         abort_http_object_request(obj_req->req);
 468                 abort_object_request(obj_req);
 469                 return 0;
 470         }
 471
 472 #ifdef USE_CURL_MULTI
 473         while (obj_req->state == WAITING)
 474                 step_active_slots();
 475 #else
 476         start_object_request(walker, obj_req);
 477 #endif
 478
 479         /*
 480          * obj_req->req might change when fetching alternates in the callback
 481          * process_object_response; therefore, the "shortcut" variable, req,
 482          * is used only after we're done with slots.
 483          */
 484         while (obj_req->state == ACTIVE)
 485                 run_active_slot(obj_req->req->slot);
 486
 487         req = obj_req->req;
 488
 489         if (req->localfile != -1) {
 490                 close(req->localfile);
 491                 req->localfile = -1;
 492         }
 493
 494         if (obj_req->state == ABORTED) {
 495                 ret = error("Request for %s aborted", hex);
 496         } else if (req->curl_result != CURLE_OK &&
 497                    req->http_code != 416) {
 498                 if (missing_target(req))
 499                         ret = -1; /* Be silent, it is probably in a pack. */
 500                 else
 501                         ret = error("%s (curl_result = %d, http_code = %ld, sha1 = %s)",
 502                                     req->errorstr, req->curl_result,
 503                                     req->http_code, hex);
 504         } else if (req->zret != Z_STREAM_END) {
 505                 walker->corrupt_object_found++;
 506                 ret = error("File %s (%s) corrupt", hex, req->url);
 507         } else if (hashcmp(obj_req->sha1, req->real_sha1)) {
 508                 ret = error("File %s has bad hash", hex);
 509         } else if (req->rename < 0) {
 510                 ret = error("unable to write sha1 filename %s",
 511                             sha1_file_name(req->sha1));
 512         }
 513
 514         release_http_object_request(req);
 515         release_object_request(obj_req);
 516         return ret;
 517 }
 518
 519 static int fetch(struct walker *walker, unsigned char *sha1)
 520 {
 521         struct walker_data *data = walker->data;
 522         struct alt_base *altbase = data->alt;
 523
 524         if (!fetch_object(walker, altbase, sha1))
 525                 return 0;
 526         while (altbase) {
 527                 if (!fetch_pack(walker, altbase, sha1))
 528                         return 0;
 529                 fetch_alternates(walker, data->alt->base);
 530                 altbase = altbase->next;
 531         }
 532         return error("Unable to find %s under %s", sha1_to_hex(sha1),
 533                      data->alt->base);
 534 }
 535
 536 static int fetch_ref(struct walker *walker, struct ref *ref)
 537 {
 538         struct walker_data *data = walker->data;
 539         return http_fetch_ref(data->alt->base, ref);
 540 }
 541
 542 static void cleanup(struct walker *walker)
 543 {
 544         struct walker_data *data = walker->data;
 545         struct alt_base *alt, *alt_next;
 546
 547         if (data) {
 548                 alt = data->alt;
 549                 while (alt) {
 550                         alt_next = alt->next;
 551
 552                         free(alt->base);
 553                         free(alt);
 554
 555                         alt = alt_next;
 556                 }
 557                 free(data);
 558                 walker->data = NULL;
 559         }
 560 }
 561
 562 struct walker *get_http_walker(const char *url)
 563 {
 564         char *s;
 565         struct walker_data *data = xmalloc(sizeof(struct walker_data));
 566         struct walker *walker = xmalloc(sizeof(struct walker));
 567
 568         data->alt = xmalloc(sizeof(*data->alt));
 569         data->alt->base = xmalloc(strlen(url) + 1);
 570         strcpy(data->alt->base, url);
 571         for (s = data->alt->base + strlen(data->alt->base) - 1; *s == '/'; --s)
 572                 *s = 0;
 573
 574         data->alt->got_indices = 0;
 575         data->alt->packs = NULL;
 576         data->alt->next = NULL;
 577         data->got_alternates = -1;
 578
 579         walker->corrupt_object_found = 0;
 580         walker->fetch = fetch;
 581         walker->fetch_ref = fetch_ref;
 582         walker->prefetch = prefetch;
 583         walker->cleanup = cleanup;
 584         walker->data = data;
 585
 586 #ifdef USE_CURL_MULTI
 587         add_fill_function(walker, (int (*)(void *)) fill_active_slot);
 588 #endif
 589
 590         return walker;
 591 }