gitweb: Add mod_perl version string to "generator" meta header
[git/dscho.git] / fetch-pack.c
blob92322cf4da39434d44e4aa52fa0c3f735b22d752
1 #include "cache.h"
2 #include "refs.h"
3 #include "pkt-line.h"
4 #include "commit.h"
5 #include "tag.h"
6 #include "exec_cmd.h"
7 #include "sideband.h"
9 static int keep_pack;
10 static int quiet;
11 static int verbose;
12 static int fetch_all;
13 static const char fetch_pack_usage[] =
14 "git-fetch-pack [--all] [-q] [-v] [-k] [--thin] [--exec=upload-pack] [host:]directory <refs>...";
15 static const char *exec = "git-upload-pack";
17 #define COMPLETE (1U << 0)
18 #define COMMON (1U << 1)
19 #define COMMON_REF (1U << 2)
20 #define SEEN (1U << 3)
21 #define POPPED (1U << 4)
24 * After sending this many "have"s if we do not get any new ACK , we
25 * give up traversing our history.
27 #define MAX_IN_VAIN 256
29 static struct commit_list *rev_list;
30 static int non_common_revs, multi_ack, use_thin_pack, use_sideband;
32 static void rev_list_push(struct commit *commit, int mark)
34 if (!(commit->object.flags & mark)) {
35 commit->object.flags |= mark;
37 if (!(commit->object.parsed))
38 parse_commit(commit);
40 insert_by_date(commit, &rev_list);
42 if (!(commit->object.flags & COMMON))
43 non_common_revs++;
47 static int rev_list_insert_ref(const char *path, const unsigned char *sha1, int flag, void *cb_data)
49 struct object *o = deref_tag(parse_object(sha1), path, 0);
51 if (o && o->type == OBJ_COMMIT)
52 rev_list_push((struct commit *)o, SEEN);
54 return 0;
58 This function marks a rev and its ancestors as common.
59 In some cases, it is desirable to mark only the ancestors (for example
60 when only the server does not yet know that they are common).
63 static void mark_common(struct commit *commit,
64 int ancestors_only, int dont_parse)
66 if (commit != NULL && !(commit->object.flags & COMMON)) {
67 struct object *o = (struct object *)commit;
69 if (!ancestors_only)
70 o->flags |= COMMON;
72 if (!(o->flags & SEEN))
73 rev_list_push(commit, SEEN);
74 else {
75 struct commit_list *parents;
77 if (!ancestors_only && !(o->flags & POPPED))
78 non_common_revs--;
79 if (!o->parsed && !dont_parse)
80 parse_commit(commit);
82 for (parents = commit->parents;
83 parents;
84 parents = parents->next)
85 mark_common(parents->item, 0, dont_parse);
91 Get the next rev to send, ignoring the common.
94 static const unsigned char* get_rev(void)
96 struct commit *commit = NULL;
98 while (commit == NULL) {
99 unsigned int mark;
100 struct commit_list* parents;
102 if (rev_list == NULL || non_common_revs == 0)
103 return NULL;
105 commit = rev_list->item;
106 if (!(commit->object.parsed))
107 parse_commit(commit);
108 commit->object.flags |= POPPED;
109 if (!(commit->object.flags & COMMON))
110 non_common_revs--;
112 parents = commit->parents;
114 if (commit->object.flags & COMMON) {
115 /* do not send "have", and ignore ancestors */
116 commit = NULL;
117 mark = COMMON | SEEN;
118 } else if (commit->object.flags & COMMON_REF)
119 /* send "have", and ignore ancestors */
120 mark = COMMON | SEEN;
121 else
122 /* send "have", also for its ancestors */
123 mark = SEEN;
125 while (parents) {
126 if (!(parents->item->object.flags & SEEN))
127 rev_list_push(parents->item, mark);
128 if (mark & COMMON)
129 mark_common(parents->item, 1, 0);
130 parents = parents->next;
133 rev_list = rev_list->next;
136 return commit->object.sha1;
139 static int find_common(int fd[2], unsigned char *result_sha1,
140 struct ref *refs)
142 int fetching;
143 int count = 0, flushes = 0, retval;
144 const unsigned char *sha1;
145 unsigned in_vain = 0;
146 int got_continue = 0;
148 for_each_ref(rev_list_insert_ref, NULL);
150 fetching = 0;
151 for ( ; refs ; refs = refs->next) {
152 unsigned char *remote = refs->old_sha1;
153 struct object *o;
156 * If that object is complete (i.e. it is an ancestor of a
157 * local ref), we tell them we have it but do not have to
158 * tell them about its ancestors, which they already know
159 * about.
161 * We use lookup_object here because we are only
162 * interested in the case we *know* the object is
163 * reachable and we have already scanned it.
165 if (((o = lookup_object(remote)) != NULL) &&
166 (o->flags & COMPLETE)) {
167 continue;
170 if (!fetching)
171 packet_write(fd[1], "want %s%s%s%s%s%s\n",
172 sha1_to_hex(remote),
173 (multi_ack ? " multi_ack" : ""),
174 (use_sideband == 2 ? " side-band-64k" : ""),
175 (use_sideband == 1 ? " side-band" : ""),
176 (use_thin_pack ? " thin-pack" : ""),
177 " ofs-delta");
178 else
179 packet_write(fd[1], "want %s\n", sha1_to_hex(remote));
180 fetching++;
182 packet_flush(fd[1]);
183 if (!fetching)
184 return 1;
186 flushes = 0;
187 retval = -1;
188 while ((sha1 = get_rev())) {
189 packet_write(fd[1], "have %s\n", sha1_to_hex(sha1));
190 if (verbose)
191 fprintf(stderr, "have %s\n", sha1_to_hex(sha1));
192 in_vain++;
193 if (!(31 & ++count)) {
194 int ack;
196 packet_flush(fd[1]);
197 flushes++;
200 * We keep one window "ahead" of the other side, and
201 * will wait for an ACK only on the next one
203 if (count == 32)
204 continue;
206 do {
207 ack = get_ack(fd[0], result_sha1);
208 if (verbose && ack)
209 fprintf(stderr, "got ack %d %s\n", ack,
210 sha1_to_hex(result_sha1));
211 if (ack == 1) {
212 flushes = 0;
213 multi_ack = 0;
214 retval = 0;
215 goto done;
216 } else if (ack == 2) {
217 struct commit *commit =
218 lookup_commit(result_sha1);
219 mark_common(commit, 0, 1);
220 retval = 0;
221 in_vain = 0;
222 got_continue = 1;
224 } while (ack);
225 flushes--;
226 if (got_continue && MAX_IN_VAIN < in_vain) {
227 if (verbose)
228 fprintf(stderr, "giving up\n");
229 break; /* give up */
233 done:
234 packet_write(fd[1], "done\n");
235 if (verbose)
236 fprintf(stderr, "done\n");
237 if (retval != 0) {
238 multi_ack = 0;
239 flushes++;
241 while (flushes || multi_ack) {
242 int ack = get_ack(fd[0], result_sha1);
243 if (ack) {
244 if (verbose)
245 fprintf(stderr, "got ack (%d) %s\n", ack,
246 sha1_to_hex(result_sha1));
247 if (ack == 1)
248 return 0;
249 multi_ack = 1;
250 continue;
252 flushes--;
254 return retval;
257 static struct commit_list *complete;
259 static int mark_complete(const char *path, const unsigned char *sha1, int flag, void *cb_data)
261 struct object *o = parse_object(sha1);
263 while (o && o->type == OBJ_TAG) {
264 struct tag *t = (struct tag *) o;
265 if (!t->tagged)
266 break; /* broken repository */
267 o->flags |= COMPLETE;
268 o = parse_object(t->tagged->sha1);
270 if (o && o->type == OBJ_COMMIT) {
271 struct commit *commit = (struct commit *)o;
272 commit->object.flags |= COMPLETE;
273 insert_by_date(commit, &complete);
275 return 0;
278 static void mark_recent_complete_commits(unsigned long cutoff)
280 while (complete && cutoff <= complete->item->date) {
281 if (verbose)
282 fprintf(stderr, "Marking %s as complete\n",
283 sha1_to_hex(complete->item->object.sha1));
284 pop_most_recent_commit(&complete, COMPLETE);
288 static void filter_refs(struct ref **refs, int nr_match, char **match)
290 struct ref **return_refs;
291 struct ref *newlist = NULL;
292 struct ref **newtail = &newlist;
293 struct ref *ref, *next;
294 struct ref *fastarray[32];
296 if (nr_match && !fetch_all) {
297 if (ARRAY_SIZE(fastarray) < nr_match)
298 return_refs = xcalloc(nr_match, sizeof(struct ref *));
299 else {
300 return_refs = fastarray;
301 memset(return_refs, 0, sizeof(struct ref *) * nr_match);
304 else
305 return_refs = NULL;
307 for (ref = *refs; ref; ref = next) {
308 next = ref->next;
309 if (!memcmp(ref->name, "refs/", 5) &&
310 check_ref_format(ref->name + 5))
311 ; /* trash */
312 else if (fetch_all) {
313 *newtail = ref;
314 ref->next = NULL;
315 newtail = &ref->next;
316 continue;
318 else {
319 int order = path_match(ref->name, nr_match, match);
320 if (order) {
321 return_refs[order-1] = ref;
322 continue; /* we will link it later */
325 free(ref);
328 if (!fetch_all) {
329 int i;
330 for (i = 0; i < nr_match; i++) {
331 ref = return_refs[i];
332 if (ref) {
333 *newtail = ref;
334 ref->next = NULL;
335 newtail = &ref->next;
338 if (return_refs != fastarray)
339 free(return_refs);
341 *refs = newlist;
344 static int everything_local(struct ref **refs, int nr_match, char **match)
346 struct ref *ref;
347 int retval;
348 unsigned long cutoff = 0;
350 track_object_refs = 0;
351 save_commit_buffer = 0;
353 for (ref = *refs; ref; ref = ref->next) {
354 struct object *o;
356 o = parse_object(ref->old_sha1);
357 if (!o)
358 continue;
360 /* We already have it -- which may mean that we were
361 * in sync with the other side at some time after
362 * that (it is OK if we guess wrong here).
364 if (o->type == OBJ_COMMIT) {
365 struct commit *commit = (struct commit *)o;
366 if (!cutoff || cutoff < commit->date)
367 cutoff = commit->date;
371 for_each_ref(mark_complete, NULL);
372 if (cutoff)
373 mark_recent_complete_commits(cutoff);
376 * Mark all complete remote refs as common refs.
377 * Don't mark them common yet; the server has to be told so first.
379 for (ref = *refs; ref; ref = ref->next) {
380 struct object *o = deref_tag(lookup_object(ref->old_sha1),
381 NULL, 0);
383 if (!o || o->type != OBJ_COMMIT || !(o->flags & COMPLETE))
384 continue;
386 if (!(o->flags & SEEN)) {
387 rev_list_push((struct commit *)o, COMMON_REF | SEEN);
389 mark_common((struct commit *)o, 1, 1);
393 filter_refs(refs, nr_match, match);
395 for (retval = 1, ref = *refs; ref ; ref = ref->next) {
396 const unsigned char *remote = ref->old_sha1;
397 unsigned char local[20];
398 struct object *o;
400 o = lookup_object(remote);
401 if (!o || !(o->flags & COMPLETE)) {
402 retval = 0;
403 if (!verbose)
404 continue;
405 fprintf(stderr,
406 "want %s (%s)\n", sha1_to_hex(remote),
407 ref->name);
408 continue;
411 hashcpy(ref->new_sha1, local);
412 if (!verbose)
413 continue;
414 fprintf(stderr,
415 "already have %s (%s)\n", sha1_to_hex(remote),
416 ref->name);
418 return retval;
421 static pid_t setup_sideband(int fd[2], int xd[2])
423 pid_t side_pid;
425 if (!use_sideband) {
426 fd[0] = xd[0];
427 fd[1] = xd[1];
428 return 0;
430 /* xd[] is talking with upload-pack; subprocess reads from
431 * xd[0], spits out band#2 to stderr, and feeds us band#1
432 * through our fd[0].
434 if (pipe(fd) < 0)
435 die("fetch-pack: unable to set up pipe");
436 side_pid = fork();
437 if (side_pid < 0)
438 die("fetch-pack: unable to fork off sideband demultiplexer");
439 if (!side_pid) {
440 /* subprocess */
441 close(fd[0]);
442 if (xd[0] != xd[1])
443 close(xd[1]);
444 if (recv_sideband("fetch-pack", xd[0], fd[1], 2))
445 exit(1);
446 exit(0);
448 close(xd[0]);
449 close(fd[1]);
450 fd[1] = xd[1];
451 return side_pid;
454 static int get_pack(int xd[2], const char **argv)
456 int status;
457 pid_t pid, side_pid;
458 int fd[2];
460 side_pid = setup_sideband(fd, xd);
461 pid = fork();
462 if (pid < 0)
463 die("fetch-pack: unable to fork off %s", argv[0]);
464 if (!pid) {
465 dup2(fd[0], 0);
466 close(fd[0]);
467 close(fd[1]);
468 execv_git_cmd(argv);
469 die("%s exec failed", argv[0]);
471 close(fd[0]);
472 close(fd[1]);
473 while (waitpid(pid, &status, 0) < 0) {
474 if (errno != EINTR)
475 die("waiting for %s: %s", argv[0], strerror(errno));
477 if (WIFEXITED(status)) {
478 int code = WEXITSTATUS(status);
479 if (code)
480 die("%s died with error code %d", argv[0], code);
481 return 0;
483 if (WIFSIGNALED(status)) {
484 int sig = WTERMSIG(status);
485 die("%s died of signal %d", argv[0], sig);
487 die("%s died of unnatural causes %d", argv[0], status);
490 static int explode_rx_pack(int xd[2])
492 const char *argv[3] = { "unpack-objects", quiet ? "-q" : NULL, NULL };
493 return get_pack(xd, argv);
496 static int keep_rx_pack(int xd[2])
498 const char *argv[6];
499 char keep_arg[256];
500 int n = 0;
502 argv[n++] = "index-pack";
503 argv[n++] = "--stdin";
504 if (!quiet)
505 argv[n++] = "-v";
506 if (use_thin_pack)
507 argv[n++] = "--fix-thin";
508 if (keep_pack > 1) {
509 int s = sprintf(keep_arg, "--keep=fetch-pack %i on ", getpid());
510 if (gethostname(keep_arg + s, sizeof(keep_arg) - s))
511 strcpy(keep_arg + s, "localhost");
512 argv[n++] = keep_arg;
514 argv[n] = NULL;
515 return get_pack(xd, argv);
518 static int fetch_pack(int fd[2], int nr_match, char **match)
520 struct ref *ref;
521 unsigned char sha1[20];
522 int status;
524 get_remote_heads(fd[0], &ref, 0, NULL, 0);
525 if (server_supports("multi_ack")) {
526 if (verbose)
527 fprintf(stderr, "Server supports multi_ack\n");
528 multi_ack = 1;
530 if (server_supports("side-band-64k")) {
531 if (verbose)
532 fprintf(stderr, "Server supports side-band-64k\n");
533 use_sideband = 2;
535 else if (server_supports("side-band")) {
536 if (verbose)
537 fprintf(stderr, "Server supports side-band\n");
538 use_sideband = 1;
540 if (!ref) {
541 packet_flush(fd[1]);
542 die("no matching remote head");
544 if (everything_local(&ref, nr_match, match)) {
545 packet_flush(fd[1]);
546 goto all_done;
548 if (find_common(fd, sha1, ref) < 0)
549 if (keep_pack != 1)
550 /* When cloning, it is not unusual to have
551 * no common commit.
553 fprintf(stderr, "warning: no common commits\n");
555 status = (keep_pack) ? keep_rx_pack(fd) : explode_rx_pack(fd);
556 if (status)
557 die("git-fetch-pack: fetch failed.");
559 all_done:
560 while (ref) {
561 printf("%s %s\n",
562 sha1_to_hex(ref->old_sha1), ref->name);
563 ref = ref->next;
565 return 0;
568 static int remove_duplicates(int nr_heads, char **heads)
570 int src, dst;
572 for (src = dst = 0; src < nr_heads; src++) {
573 /* If heads[src] is different from any of
574 * heads[0..dst], push it in.
576 int i;
577 for (i = 0; i < dst; i++) {
578 if (!strcmp(heads[i], heads[src]))
579 break;
581 if (i < dst)
582 continue;
583 if (src != dst)
584 heads[dst] = heads[src];
585 dst++;
587 heads[dst] = 0;
588 return dst;
591 int main(int argc, char **argv)
593 int i, ret, nr_heads;
594 char *dest = NULL, **heads;
595 int fd[2];
596 pid_t pid;
598 setup_git_directory();
600 nr_heads = 0;
601 heads = NULL;
602 for (i = 1; i < argc; i++) {
603 char *arg = argv[i];
605 if (*arg == '-') {
606 if (!strncmp("--exec=", arg, 7)) {
607 exec = arg + 7;
608 continue;
610 if (!strcmp("--quiet", arg) || !strcmp("-q", arg)) {
611 quiet = 1;
612 continue;
614 if (!strcmp("--keep", arg) || !strcmp("-k", arg)) {
615 keep_pack++;
616 continue;
618 if (!strcmp("--thin", arg)) {
619 use_thin_pack = 1;
620 continue;
622 if (!strcmp("--all", arg)) {
623 fetch_all = 1;
624 continue;
626 if (!strcmp("-v", arg)) {
627 verbose = 1;
628 continue;
630 usage(fetch_pack_usage);
632 dest = arg;
633 heads = argv + i + 1;
634 nr_heads = argc - i - 1;
635 break;
637 if (!dest)
638 usage(fetch_pack_usage);
639 pid = git_connect(fd, dest, exec);
640 if (pid < 0)
641 return 1;
642 if (heads && nr_heads)
643 nr_heads = remove_duplicates(nr_heads, heads);
644 ret = fetch_pack(fd, nr_heads, heads);
645 close(fd[0]);
646 close(fd[1]);
647 ret |= finish_connect(pid);
649 if (!ret && nr_heads) {
650 /* If the heads to pull were given, we should have
651 * consumed all of them by matching the remote.
652 * Otherwise, 'git-fetch remote no-such-ref' would
653 * silently succeed without issuing an error.
655 for (i = 0; i < nr_heads; i++)
656 if (heads[i] && heads[i][0]) {
657 error("no such remote ref %s", heads[i]);
658 ret = 1;
662 return !!ret;