1#include "cache.h"
2#include "lockfile.h"
3#include "commit.h"
4#include "tag.h"
5#include "pkt-line.h"
6#include "remote.h"
7#include "refs.h"
8#include "sha1-array.h"
9#include "diff.h"
10#include "revision.h"
11#include "commit-slab.h"
12#include "sigchain.h"
13
14static int is_shallow = -1;
15static struct stat_validity shallow_stat;
16static char *alternate_shallow_file;
17
18void set_alternate_shallow_file(const char *path, int override)
19{
20 if (is_shallow != -1)
21 die("BUG: is_repository_shallow must not be called before set_alternate_shallow_file");
22 if (alternate_shallow_file && !override)
23 return;
24 free(alternate_shallow_file);
25 alternate_shallow_file = xstrdup_or_null(path);
26}
27
28int register_shallow(const unsigned char *sha1)
29{
30 struct commit_graft *graft =
31 xmalloc(sizeof(struct commit_graft));
32 struct commit *commit = lookup_commit(sha1);
33
34 hashcpy(graft->oid.hash, sha1);
35 graft->nr_parent = -1;
36 if (commit && commit->object.parsed)
37 commit->parents = NULL;
38 return register_commit_graft(graft, 0);
39}
40
41int is_repository_shallow(void)
42{
43 FILE *fp;
44 char buf[1024];
45 const char *path = alternate_shallow_file;
46
47 if (is_shallow >= 0)
48 return is_shallow;
49
50 if (!path)
51 path = git_path("shallow");
52 /*
53 * fetch-pack sets '--shallow-file ""' as an indicator that no
54 * shallow file should be used. We could just open it and it
55 * will likely fail. But let's do an explicit check instead.
56 */
57 if (!*path || (fp = fopen(path, "r")) == NULL) {
58 stat_validity_clear(&shallow_stat);
59 is_shallow = 0;
60 return is_shallow;
61 }
62 stat_validity_update(&shallow_stat, fileno(fp));
63 is_shallow = 1;
64
65 while (fgets(buf, sizeof(buf), fp)) {
66 unsigned char sha1[20];
67 if (get_sha1_hex(buf, sha1))
68 die("bad shallow line: %s", buf);
69 register_shallow(sha1);
70 }
71 fclose(fp);
72 return is_shallow;
73}
74
75struct commit_list *get_shallow_commits(struct object_array *heads, int depth,
76 int shallow_flag, int not_shallow_flag)
77{
78 int i = 0, cur_depth = 0;
79 struct commit_list *result = NULL;
80 struct object_array stack = OBJECT_ARRAY_INIT;
81 struct commit *commit = NULL;
82 struct commit_graft *graft;
83
84 while (commit || i < heads->nr || stack.nr) {
85 struct commit_list *p;
86 if (!commit) {
87 if (i < heads->nr) {
88 commit = (struct commit *)
89 deref_tag(heads->objects[i++].item, NULL, 0);
90 if (!commit || commit->object.type != OBJ_COMMIT) {
91 commit = NULL;
92 continue;
93 }
94 if (!commit->util)
95 commit->util = xmalloc(sizeof(int));
96 *(int *)commit->util = 0;
97 cur_depth = 0;
98 } else {
99 commit = (struct commit *)
100 stack.objects[--stack.nr].item;
101 cur_depth = *(int *)commit->util;
102 }
103 }
104 parse_commit_or_die(commit);
105 cur_depth++;
106 if ((depth != INFINITE_DEPTH && cur_depth >= depth) ||
107 (is_repository_shallow() && !commit->parents &&
108 (graft = lookup_commit_graft(commit->object.sha1)) != NULL &&
109 graft->nr_parent < 0)) {
110 commit_list_insert(commit, &result);
111 commit->object.flags |= shallow_flag;
112 commit = NULL;
113 continue;
114 }
115 commit->object.flags |= not_shallow_flag;
116 for (p = commit->parents, commit = NULL; p; p = p->next) {
117 if (!p->item->util) {
118 int *pointer = xmalloc(sizeof(int));
119 p->item->util = pointer;
120 *pointer = cur_depth;
121 } else {
122 int *pointer = p->item->util;
123 if (cur_depth >= *pointer)
124 continue;
125 *pointer = cur_depth;
126 }
127 if (p->next)
128 add_object_array(&p->item->object,
129 NULL, &stack);
130 else {
131 commit = p->item;
132 cur_depth = *(int *)commit->util;
133 }
134 }
135 }
136
137 return result;
138}
139
140static void check_shallow_file_for_update(void)
141{
142 if (is_shallow == -1)
143 die("BUG: shallow must be initialized by now");
144
145 if (!stat_validity_check(&shallow_stat, git_path("shallow")))
146 die("shallow file has changed since we read it");
147}
148
149#define SEEN_ONLY 1
150#define VERBOSE 2
151
152struct write_shallow_data {
153 struct strbuf *out;
154 int use_pack_protocol;
155 int count;
156 unsigned flags;
157};
158
159static int write_one_shallow(const struct commit_graft *graft, void *cb_data)
160{
161 struct write_shallow_data *data = cb_data;
162 const char *hex = oid_to_hex(&graft->oid);
163 if (graft->nr_parent != -1)
164 return 0;
165 if (data->flags & SEEN_ONLY) {
166 struct commit *c = lookup_commit(graft->oid.hash);
167 if (!c || !(c->object.flags & SEEN)) {
168 if (data->flags & VERBOSE)
169 printf("Removing %s from .git/shallow\n",
170 sha1_to_hex(c->object.sha1));
171 return 0;
172 }
173 }
174 data->count++;
175 if (data->use_pack_protocol)
176 packet_buf_write(data->out, "shallow %s", hex);
177 else {
178 strbuf_addstr(data->out, hex);
179 strbuf_addch(data->out, '\n');
180 }
181 return 0;
182}
183
184static int write_shallow_commits_1(struct strbuf *out, int use_pack_protocol,
185 const struct sha1_array *extra,
186 unsigned flags)
187{
188 struct write_shallow_data data;
189 int i;
190 data.out = out;
191 data.use_pack_protocol = use_pack_protocol;
192 data.count = 0;
193 data.flags = flags;
194 for_each_commit_graft(write_one_shallow, &data);
195 if (!extra)
196 return data.count;
197 for (i = 0; i < extra->nr; i++) {
198 strbuf_addstr(out, sha1_to_hex(extra->sha1[i]));
199 strbuf_addch(out, '\n');
200 data.count++;
201 }
202 return data.count;
203}
204
205int write_shallow_commits(struct strbuf *out, int use_pack_protocol,
206 const struct sha1_array *extra)
207{
208 return write_shallow_commits_1(out, use_pack_protocol, extra, 0);
209}
210
211static struct strbuf temporary_shallow = STRBUF_INIT;
212
213static void remove_temporary_shallow(void)
214{
215 if (temporary_shallow.len) {
216 unlink_or_warn(temporary_shallow.buf);
217 strbuf_reset(&temporary_shallow);
218 }
219}
220
221static void remove_temporary_shallow_on_signal(int signo)
222{
223 remove_temporary_shallow();
224 sigchain_pop(signo);
225 raise(signo);
226}
227
228const char *setup_temporary_shallow(const struct sha1_array *extra)
229{
230 struct strbuf sb = STRBUF_INIT;
231 int fd;
232
233 if (temporary_shallow.len)
234 die("BUG: attempt to create two temporary shallow files");
235
236 if (write_shallow_commits(&sb, 0, extra)) {
237 strbuf_addstr(&temporary_shallow, git_path("shallow_XXXXXX"));
238 fd = xmkstemp(temporary_shallow.buf);
239
240 atexit(remove_temporary_shallow);
241 sigchain_push_common(remove_temporary_shallow_on_signal);
242
243 if (write_in_full(fd, sb.buf, sb.len) != sb.len)
244 die_errno("failed to write to %s",
245 temporary_shallow.buf);
246 close(fd);
247 strbuf_release(&sb);
248 return temporary_shallow.buf;
249 }
250 /*
251 * is_repository_shallow() sees empty string as "no shallow
252 * file".
253 */
254 return temporary_shallow.buf;
255}
256
257void setup_alternate_shallow(struct lock_file *shallow_lock,
258 const char **alternate_shallow_file,
259 const struct sha1_array *extra)
260{
261 struct strbuf sb = STRBUF_INIT;
262 int fd;
263
264 fd = hold_lock_file_for_update(shallow_lock, git_path("shallow"),
265 LOCK_DIE_ON_ERROR);
266 check_shallow_file_for_update();
267 if (write_shallow_commits(&sb, 0, extra)) {
268 if (write_in_full(fd, sb.buf, sb.len) != sb.len)
269 die_errno("failed to write to %s",
270 shallow_lock->filename.buf);
271 *alternate_shallow_file = shallow_lock->filename.buf;
272 } else
273 /*
274 * is_repository_shallow() sees empty string as "no
275 * shallow file".
276 */
277 *alternate_shallow_file = "";
278 strbuf_release(&sb);
279}
280
281static int advertise_shallow_grafts_cb(const struct commit_graft *graft, void *cb)
282{
283 int fd = *(int *)cb;
284 if (graft->nr_parent == -1)
285 packet_write(fd, "shallow %s\n", oid_to_hex(&graft->oid));
286 return 0;
287}
288
289void advertise_shallow_grafts(int fd)
290{
291 if (!is_repository_shallow())
292 return;
293 for_each_commit_graft(advertise_shallow_grafts_cb, &fd);
294}
295
296/*
297 * mark_reachable_objects() should have been run prior to this and all
298 * reachable commits marked as "SEEN".
299 */
300void prune_shallow(int show_only)
301{
302 static struct lock_file shallow_lock;
303 struct strbuf sb = STRBUF_INIT;
304 int fd;
305
306 if (show_only) {
307 write_shallow_commits_1(&sb, 0, NULL, SEEN_ONLY | VERBOSE);
308 strbuf_release(&sb);
309 return;
310 }
311 fd = hold_lock_file_for_update(&shallow_lock, git_path("shallow"),
312 LOCK_DIE_ON_ERROR);
313 check_shallow_file_for_update();
314 if (write_shallow_commits_1(&sb, 0, NULL, SEEN_ONLY)) {
315 if (write_in_full(fd, sb.buf, sb.len) != sb.len)
316 die_errno("failed to write to %s",
317 shallow_lock.filename.buf);
318 commit_lock_file(&shallow_lock);
319 } else {
320 unlink(git_path("shallow"));
321 rollback_lock_file(&shallow_lock);
322 }
323 strbuf_release(&sb);
324}
325
326struct trace_key trace_shallow = TRACE_KEY_INIT(SHALLOW);
327
328/*
329 * Step 1, split sender shallow commits into "ours" and "theirs"
330 * Step 2, clean "ours" based on .git/shallow
331 */
332void prepare_shallow_info(struct shallow_info *info, struct sha1_array *sa)
333{
334 int i;
335 trace_printf_key(&trace_shallow, "shallow: prepare_shallow_info\n");
336 memset(info, 0, sizeof(*info));
337 info->shallow = sa;
338 if (!sa)
339 return;
340 info->ours = xmalloc(sizeof(*info->ours) * sa->nr);
341 info->theirs = xmalloc(sizeof(*info->theirs) * sa->nr);
342 for (i = 0; i < sa->nr; i++) {
343 if (has_sha1_file(sa->sha1[i])) {
344 struct commit_graft *graft;
345 graft = lookup_commit_graft(sa->sha1[i]);
346 if (graft && graft->nr_parent < 0)
347 continue;
348 info->ours[info->nr_ours++] = i;
349 } else
350 info->theirs[info->nr_theirs++] = i;
351 }
352}
353
354void clear_shallow_info(struct shallow_info *info)
355{
356 free(info->ours);
357 free(info->theirs);
358}
359
360/* Step 4, remove non-existent ones in "theirs" after getting the pack */
361
362void remove_nonexistent_theirs_shallow(struct shallow_info *info)
363{
364 unsigned char (*sha1)[20] = info->shallow->sha1;
365 int i, dst;
366 trace_printf_key(&trace_shallow, "shallow: remove_nonexistent_theirs_shallow\n");
367 for (i = dst = 0; i < info->nr_theirs; i++) {
368 if (i != dst)
369 info->theirs[dst] = info->theirs[i];
370 if (has_sha1_file(sha1[info->theirs[i]]))
371 dst++;
372 }
373 info->nr_theirs = dst;
374}
375
376define_commit_slab(ref_bitmap, uint32_t *);
377
378struct paint_info {
379 struct ref_bitmap ref_bitmap;
380 unsigned nr_bits;
381 char **slab;
382 char *free, *end;
383 unsigned slab_count;
384};
385
386static uint32_t *paint_alloc(struct paint_info *info)
387{
388 unsigned nr = (info->nr_bits + 31) / 32;
389 unsigned size = nr * sizeof(uint32_t);
390 void *p;
391 if (!info->slab_count || info->free + size > info->end) {
392 info->slab_count++;
393 REALLOC_ARRAY(info->slab, info->slab_count);
394 info->free = xmalloc(COMMIT_SLAB_SIZE);
395 info->slab[info->slab_count - 1] = info->free;
396 info->end = info->free + COMMIT_SLAB_SIZE;
397 }
398 p = info->free;
399 info->free += size;
400 return p;
401}
402
403/*
404 * Given a commit SHA-1, walk down to parents until either SEEN,
405 * UNINTERESTING or BOTTOM is hit. Set the id-th bit in ref_bitmap for
406 * all walked commits.
407 */
408static void paint_down(struct paint_info *info, const unsigned char *sha1,
409 int id)
410{
411 unsigned int i, nr;
412 struct commit_list *head = NULL;
413 int bitmap_nr = (info->nr_bits + 31) / 32;
414 int bitmap_size = bitmap_nr * sizeof(uint32_t);
415 uint32_t *tmp = xmalloc(bitmap_size); /* to be freed before return */
416 uint32_t *bitmap = paint_alloc(info);
417 struct commit *c = lookup_commit_reference_gently(sha1, 1);
418 if (!c)
419 return;
420 memset(bitmap, 0, bitmap_size);
421 bitmap[id / 32] |= (1 << (id % 32));
422 commit_list_insert(c, &head);
423 while (head) {
424 struct commit_list *p;
425 struct commit *c = head->item;
426 uint32_t **refs = ref_bitmap_at(&info->ref_bitmap, c);
427
428 p = head;
429 head = head->next;
430 free(p);
431
432 /* XXX check "UNINTERESTING" from pack bitmaps if available */
433 if (c->object.flags & (SEEN | UNINTERESTING))
434 continue;
435 else
436 c->object.flags |= SEEN;
437
438 if (*refs == NULL)
439 *refs = bitmap;
440 else {
441 memcpy(tmp, *refs, bitmap_size);
442 for (i = 0; i < bitmap_nr; i++)
443 tmp[i] |= bitmap[i];
444 if (memcmp(tmp, *refs, bitmap_size)) {
445 *refs = paint_alloc(info);
446 memcpy(*refs, tmp, bitmap_size);
447 }
448 }
449
450 if (c->object.flags & BOTTOM)
451 continue;
452
453 if (parse_commit(c))
454 die("unable to parse commit %s",
455 sha1_to_hex(c->object.sha1));
456
457 for (p = c->parents; p; p = p->next) {
458 uint32_t **p_refs = ref_bitmap_at(&info->ref_bitmap,
459 p->item);
460 if (p->item->object.flags & SEEN)
461 continue;
462 if (*p_refs == NULL || *p_refs == *refs)
463 *p_refs = *refs;
464 commit_list_insert(p->item, &head);
465 }
466 }
467
468 nr = get_max_object_index();
469 for (i = 0; i < nr; i++) {
470 struct object *o = get_indexed_object(i);
471 if (o && o->type == OBJ_COMMIT)
472 o->flags &= ~SEEN;
473 }
474
475 free(tmp);
476}
477
478static int mark_uninteresting(const char *refname,
479 const unsigned char *sha1,
480 int flags, void *cb_data)
481{
482 struct commit *commit = lookup_commit_reference_gently(sha1, 1);
483 if (!commit)
484 return 0;
485 commit->object.flags |= UNINTERESTING;
486 mark_parents_uninteresting(commit);
487 return 0;
488}
489
490static void post_assign_shallow(struct shallow_info *info,
491 struct ref_bitmap *ref_bitmap,
492 int *ref_status);
493/*
494 * Step 6(+7), associate shallow commits with new refs
495 *
496 * info->ref must be initialized before calling this function.
497 *
498 * If used is not NULL, it's an array of info->shallow->nr
499 * bitmaps. The n-th bit set in the m-th bitmap if ref[n] needs the
500 * m-th shallow commit from info->shallow.
501 *
502 * If used is NULL, "ours" and "theirs" are updated. And if ref_status
503 * is not NULL it's an array of ref->nr ints. ref_status[i] is true if
504 * the ref needs some shallow commits from either info->ours or
505 * info->theirs.
506 */
507void assign_shallow_commits_to_refs(struct shallow_info *info,
508 uint32_t **used, int *ref_status)
509{
510 unsigned char (*sha1)[20] = info->shallow->sha1;
511 struct sha1_array *ref = info->ref;
512 unsigned int i, nr;
513 int *shallow, nr_shallow = 0;
514 struct paint_info pi;
515 struct each_ref_fn_sha1_adapter wrapped_mark_uninteresting =
516 {mark_uninteresting, NULL};
517
518 trace_printf_key(&trace_shallow, "shallow: assign_shallow_commits_to_refs\n");
519 shallow = xmalloc(sizeof(*shallow) * (info->nr_ours + info->nr_theirs));
520 for (i = 0; i < info->nr_ours; i++)
521 shallow[nr_shallow++] = info->ours[i];
522 for (i = 0; i < info->nr_theirs; i++)
523 shallow[nr_shallow++] = info->theirs[i];
524
525 /*
526 * Prepare the commit graph to track what refs can reach what
527 * (new) shallow commits.
528 */
529 nr = get_max_object_index();
530 for (i = 0; i < nr; i++) {
531 struct object *o = get_indexed_object(i);
532 if (!o || o->type != OBJ_COMMIT)
533 continue;
534
535 o->flags &= ~(UNINTERESTING | BOTTOM | SEEN);
536 }
537
538 memset(&pi, 0, sizeof(pi));
539 init_ref_bitmap(&pi.ref_bitmap);
540 pi.nr_bits = ref->nr;
541
542 /*
543 * "--not --all" to cut short the traversal if new refs
544 * connect to old refs. If not (e.g. force ref updates) it'll
545 * have to go down to the current shallow commits.
546 */
547 head_ref(each_ref_fn_adapter, &wrapped_mark_uninteresting);
548 for_each_ref(each_ref_fn_adapter, &wrapped_mark_uninteresting);
549
550 /* Mark potential bottoms so we won't go out of bound */
551 for (i = 0; i < nr_shallow; i++) {
552 struct commit *c = lookup_commit(sha1[shallow[i]]);
553 c->object.flags |= BOTTOM;
554 }
555
556 for (i = 0; i < ref->nr; i++)
557 paint_down(&pi, ref->sha1[i], i);
558
559 if (used) {
560 int bitmap_size = ((pi.nr_bits + 31) / 32) * sizeof(uint32_t);
561 memset(used, 0, sizeof(*used) * info->shallow->nr);
562 for (i = 0; i < nr_shallow; i++) {
563 const struct commit *c = lookup_commit(sha1[shallow[i]]);
564 uint32_t **map = ref_bitmap_at(&pi.ref_bitmap, c);
565 if (*map)
566 used[shallow[i]] = xmemdupz(*map, bitmap_size);
567 }
568 /*
569 * unreachable shallow commits are not removed from
570 * "ours" and "theirs". The user is supposed to run
571 * step 7 on every ref separately and not trust "ours"
572 * and "theirs" any more.
573 */
574 } else
575 post_assign_shallow(info, &pi.ref_bitmap, ref_status);
576
577 clear_ref_bitmap(&pi.ref_bitmap);
578 for (i = 0; i < pi.slab_count; i++)
579 free(pi.slab[i]);
580 free(pi.slab);
581 free(shallow);
582}
583
584struct commit_array {
585 struct commit **commits;
586 int nr, alloc;
587};
588
589static int add_ref(const char *refname,
590 const unsigned char *sha1, int flags, void *cb_data)
591{
592 struct commit_array *ca = cb_data;
593 ALLOC_GROW(ca->commits, ca->nr + 1, ca->alloc);
594 ca->commits[ca->nr] = lookup_commit_reference_gently(sha1, 1);
595 if (ca->commits[ca->nr])
596 ca->nr++;
597 return 0;
598}
599
600static void update_refstatus(int *ref_status, int nr, uint32_t *bitmap)
601{
602 int i;
603 if (!ref_status)
604 return;
605 for (i = 0; i < nr; i++)
606 if (bitmap[i / 32] & (1 << (i % 32)))
607 ref_status[i]++;
608}
609
610/*
611 * Step 7, reachability test on "ours" at commit level
612 */
613static void post_assign_shallow(struct shallow_info *info,
614 struct ref_bitmap *ref_bitmap,
615 int *ref_status)
616{
617 unsigned char (*sha1)[20] = info->shallow->sha1;
618 struct commit *c;
619 uint32_t **bitmap;
620 int dst, i, j;
621 int bitmap_nr = (info->ref->nr + 31) / 32;
622 struct commit_array ca;
623 struct each_ref_fn_sha1_adapter wrapped_add_ref =
624 {add_ref, &ca};
625
626 trace_printf_key(&trace_shallow, "shallow: post_assign_shallow\n");
627 if (ref_status)
628 memset(ref_status, 0, sizeof(*ref_status) * info->ref->nr);
629
630 /* Remove unreachable shallow commits from "theirs" */
631 for (i = dst = 0; i < info->nr_theirs; i++) {
632 if (i != dst)
633 info->theirs[dst] = info->theirs[i];
634 c = lookup_commit(sha1[info->theirs[i]]);
635 bitmap = ref_bitmap_at(ref_bitmap, c);
636 if (!*bitmap)
637 continue;
638 for (j = 0; j < bitmap_nr; j++)
639 if (bitmap[0][j]) {
640 update_refstatus(ref_status, info->ref->nr, *bitmap);
641 dst++;
642 break;
643 }
644 }
645 info->nr_theirs = dst;
646
647 memset(&ca, 0, sizeof(ca));
648 head_ref(each_ref_fn_adapter, &wrapped_add_ref);
649 for_each_ref(each_ref_fn_adapter, &wrapped_add_ref);
650
651 /* Remove unreachable shallow commits from "ours" */
652 for (i = dst = 0; i < info->nr_ours; i++) {
653 if (i != dst)
654 info->ours[dst] = info->ours[i];
655 c = lookup_commit(sha1[info->ours[i]]);
656 bitmap = ref_bitmap_at(ref_bitmap, c);
657 if (!*bitmap)
658 continue;
659 for (j = 0; j < bitmap_nr; j++)
660 if (bitmap[0][j] &&
661 /* Step 7, reachability test at commit level */
662 !in_merge_bases_many(c, ca.nr, ca.commits)) {
663 update_refstatus(ref_status, info->ref->nr, *bitmap);
664 dst++;
665 break;
666 }
667 }
668 info->nr_ours = dst;
669
670 free(ca.commits);
671}
672
673/* (Delayed) step 7, reachability test at commit level */
674int delayed_reachability_test(struct shallow_info *si, int c)
675{
676 if (si->need_reachability_test[c]) {
677 struct commit *commit = lookup_commit(si->shallow->sha1[c]);
678
679 if (!si->commits) {
680 struct commit_array ca;
681 struct each_ref_fn_sha1_adapter wrapped_add_ref =
682 {add_ref, &ca};
683
684 memset(&ca, 0, sizeof(ca));
685 head_ref(each_ref_fn_adapter, &wrapped_add_ref);
686 for_each_ref(each_ref_fn_adapter, &wrapped_add_ref);
687 si->commits = ca.commits;
688 si->nr_commits = ca.nr;
689 }
690
691 si->reachable[c] = in_merge_bases_many(commit,
692 si->nr_commits,
693 si->commits);
694 si->need_reachability_test[c] = 0;
695 }
696 return si->reachable[c];
697}