Merge branch 'sb/test-bitmap-free-at-end' into maint
[alt-git.git] / reachable.c
blob69fa6851da8a37540da66faf96c7bc878fdc53c9
1 #include "cache.h"
2 #include "refs.h"
3 #include "tag.h"
4 #include "commit.h"
5 #include "blob.h"
6 #include "diff.h"
7 #include "revision.h"
8 #include "reachable.h"
9 #include "cache-tree.h"
10 #include "progress.h"
11 #include "list-objects.h"
13 struct connectivity_progress {
14 struct progress *progress;
15 unsigned long count;
18 static void update_progress(struct connectivity_progress *cp)
20 cp->count++;
21 if ((cp->count & 1023) == 0)
22 display_progress(cp->progress, cp->count);
25 static int add_one_ref(const char *path, const unsigned char *sha1, int flag, void *cb_data)
27 struct object *object = parse_object_or_die(sha1, path);
28 struct rev_info *revs = (struct rev_info *)cb_data;
30 add_pending_object(revs, object, "");
32 return 0;
36 * The traversal will have already marked us as SEEN, so we
37 * only need to handle any progress reporting here.
39 static void mark_object(struct object *obj, const struct name_path *path,
40 const char *name, void *data)
42 update_progress(data);
45 static void mark_commit(struct commit *c, void *data)
47 mark_object(&c->object, NULL, NULL, data);
50 struct recent_data {
51 struct rev_info *revs;
52 unsigned long timestamp;
55 static void add_recent_object(const unsigned char *sha1,
56 unsigned long mtime,
57 struct recent_data *data)
59 struct object *obj;
60 enum object_type type;
62 if (mtime <= data->timestamp)
63 return;
66 * We do not want to call parse_object here, because
67 * inflating blobs and trees could be very expensive.
68 * However, we do need to know the correct type for
69 * later processing, and the revision machinery expects
70 * commits and tags to have been parsed.
72 type = sha1_object_info(sha1, NULL);
73 if (type < 0)
74 die("unable to get object info for %s", sha1_to_hex(sha1));
76 switch (type) {
77 case OBJ_TAG:
78 case OBJ_COMMIT:
79 obj = parse_object_or_die(sha1, NULL);
80 break;
81 case OBJ_TREE:
82 obj = (struct object *)lookup_tree(sha1);
83 break;
84 case OBJ_BLOB:
85 obj = (struct object *)lookup_blob(sha1);
86 break;
87 default:
88 die("unknown object type for %s: %s",
89 sha1_to_hex(sha1), typename(type));
92 if (!obj)
93 die("unable to lookup %s", sha1_to_hex(sha1));
95 add_pending_object(data->revs, obj, "");
98 static int add_recent_loose(const unsigned char *sha1,
99 const char *path, void *data)
101 struct stat st;
102 struct object *obj = lookup_object(sha1);
104 if (obj && obj->flags & SEEN)
105 return 0;
107 if (stat(path, &st) < 0) {
109 * It's OK if an object went away during our iteration; this
110 * could be due to a simultaneous repack. But anything else
111 * we should abort, since we might then fail to mark objects
112 * which should not be pruned.
114 if (errno == ENOENT)
115 return 0;
116 return error("unable to stat %s: %s",
117 sha1_to_hex(sha1), strerror(errno));
120 add_recent_object(sha1, st.st_mtime, data);
121 return 0;
124 static int add_recent_packed(const unsigned char *sha1,
125 struct packed_git *p, uint32_t pos,
126 void *data)
128 struct object *obj = lookup_object(sha1);
130 if (obj && obj->flags & SEEN)
131 return 0;
132 add_recent_object(sha1, p->mtime, data);
133 return 0;
136 int add_unseen_recent_objects_to_traversal(struct rev_info *revs,
137 unsigned long timestamp)
139 struct recent_data data;
140 int r;
142 data.revs = revs;
143 data.timestamp = timestamp;
145 r = for_each_loose_object(add_recent_loose, &data,
146 FOR_EACH_OBJECT_LOCAL_ONLY);
147 if (r)
148 return r;
149 return for_each_packed_object(add_recent_packed, &data,
150 FOR_EACH_OBJECT_LOCAL_ONLY);
153 void mark_reachable_objects(struct rev_info *revs, int mark_reflog,
154 unsigned long mark_recent,
155 struct progress *progress)
157 struct connectivity_progress cp;
160 * Set up revision parsing, and mark us as being interested
161 * in all object types, not just commits.
163 revs->tag_objects = 1;
164 revs->blob_objects = 1;
165 revs->tree_objects = 1;
167 /* Add all refs from the index file */
168 add_index_objects_to_pending(revs, 0);
170 /* Add all external refs */
171 for_each_ref(add_one_ref, revs);
173 /* detached HEAD is not included in the list above */
174 head_ref(add_one_ref, revs);
176 /* Add all reflog info */
177 if (mark_reflog)
178 add_reflogs_to_pending(revs, 0);
180 cp.progress = progress;
181 cp.count = 0;
184 * Set up the revision walk - this will move all commits
185 * from the pending list to the commit walking list.
187 if (prepare_revision_walk(revs))
188 die("revision walk setup failed");
189 traverse_commit_list(revs, mark_commit, mark_object, &cp);
191 if (mark_recent) {
192 revs->ignore_missing_links = 1;
193 if (add_unseen_recent_objects_to_traversal(revs, mark_recent))
194 die("unable to mark recent objects");
195 if (prepare_revision_walk(revs))
196 die("revision walk setup failed");
197 traverse_commit_list(revs, mark_commit, mark_object, &cp);
200 display_progress(cp.progress, cp.count);