mingw: prepare the TMPDIR environment variable for shell scripts
[git/git-svn.git] / reachable.c
blob43616d49c7f88166d2fa2f009ca5b926d751ab0b
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 struct object_id *oid,
26 int flag, void *cb_data)
28 struct rev_info *revs = (struct rev_info *)cb_data;
29 struct object *object;
31 if ((flag & REF_ISSYMREF) && (flag & REF_ISBROKEN)) {
32 warning("symbolic ref is dangling: %s", path);
33 return 0;
36 object = parse_object_or_die(oid->hash, path);
37 add_pending_object(revs, object, "");
39 return 0;
43 * The traversal will have already marked us as SEEN, so we
44 * only need to handle any progress reporting here.
46 static void mark_object(struct object *obj, const struct name_path *path,
47 const char *name, void *data)
49 update_progress(data);
52 static void mark_commit(struct commit *c, void *data)
54 mark_object(&c->object, NULL, NULL, data);
57 struct recent_data {
58 struct rev_info *revs;
59 unsigned long timestamp;
62 static void add_recent_object(const unsigned char *sha1,
63 unsigned long mtime,
64 struct recent_data *data)
66 struct object *obj;
67 enum object_type type;
69 if (mtime <= data->timestamp)
70 return;
73 * We do not want to call parse_object here, because
74 * inflating blobs and trees could be very expensive.
75 * However, we do need to know the correct type for
76 * later processing, and the revision machinery expects
77 * commits and tags to have been parsed.
79 type = sha1_object_info(sha1, NULL);
80 if (type < 0)
81 die("unable to get object info for %s", sha1_to_hex(sha1));
83 switch (type) {
84 case OBJ_TAG:
85 case OBJ_COMMIT:
86 obj = parse_object_or_die(sha1, NULL);
87 break;
88 case OBJ_TREE:
89 obj = (struct object *)lookup_tree(sha1);
90 break;
91 case OBJ_BLOB:
92 obj = (struct object *)lookup_blob(sha1);
93 break;
94 default:
95 die("unknown object type for %s: %s",
96 sha1_to_hex(sha1), typename(type));
99 if (!obj)
100 die("unable to lookup %s", sha1_to_hex(sha1));
102 add_pending_object(data->revs, obj, "");
105 static int add_recent_loose(const unsigned char *sha1,
106 const char *path, void *data)
108 struct stat st;
109 struct object *obj = lookup_object(sha1);
111 if (obj && obj->flags & SEEN)
112 return 0;
114 if (stat(path, &st) < 0) {
116 * It's OK if an object went away during our iteration; this
117 * could be due to a simultaneous repack. But anything else
118 * we should abort, since we might then fail to mark objects
119 * which should not be pruned.
121 if (errno == ENOENT)
122 return 0;
123 return error("unable to stat %s: %s",
124 sha1_to_hex(sha1), strerror(errno));
127 add_recent_object(sha1, st.st_mtime, data);
128 return 0;
131 static int add_recent_packed(const unsigned char *sha1,
132 struct packed_git *p, uint32_t pos,
133 void *data)
135 struct object *obj = lookup_object(sha1);
137 if (obj && obj->flags & SEEN)
138 return 0;
139 add_recent_object(sha1, p->mtime, data);
140 return 0;
143 int add_unseen_recent_objects_to_traversal(struct rev_info *revs,
144 unsigned long timestamp)
146 struct recent_data data;
147 int r;
149 data.revs = revs;
150 data.timestamp = timestamp;
152 r = for_each_loose_object(add_recent_loose, &data,
153 FOR_EACH_OBJECT_LOCAL_ONLY);
154 if (r)
155 return r;
156 return for_each_packed_object(add_recent_packed, &data,
157 FOR_EACH_OBJECT_LOCAL_ONLY);
160 void mark_reachable_objects(struct rev_info *revs, int mark_reflog,
161 unsigned long mark_recent,
162 struct progress *progress)
164 struct connectivity_progress cp;
167 * Set up revision parsing, and mark us as being interested
168 * in all object types, not just commits.
170 revs->tag_objects = 1;
171 revs->blob_objects = 1;
172 revs->tree_objects = 1;
174 /* Add all refs from the index file */
175 add_index_objects_to_pending(revs, 0);
177 /* Add all external refs */
178 for_each_ref(add_one_ref, revs);
180 /* detached HEAD is not included in the list above */
181 head_ref(add_one_ref, revs);
183 /* Add all reflog info */
184 if (mark_reflog)
185 add_reflogs_to_pending(revs, 0);
187 cp.progress = progress;
188 cp.count = 0;
191 * Set up the revision walk - this will move all commits
192 * from the pending list to the commit walking list.
194 if (prepare_revision_walk(revs))
195 die("revision walk setup failed");
196 traverse_commit_list(revs, mark_commit, mark_object, &cp);
198 if (mark_recent) {
199 revs->ignore_missing_links = 1;
200 if (add_unseen_recent_objects_to_traversal(revs, mark_recent))
201 die("unable to mark recent objects");
202 if (prepare_revision_walk(revs))
203 die("revision walk setup failed");
204 traverse_commit_list(revs, mark_commit, mark_object, &cp);
207 display_progress(cp.progress, cp.count);