setup_git_env: convert die("BUG") to BUG()
[git] / walker.c
1 #include "cache.h"
2 #include "walker.h"
3 #include "commit.h"
4 #include "tree.h"
5 #include "tree-walk.h"
6 #include "tag.h"
7 #include "blob.h"
8 #include "refs.h"
9
10 static unsigned char current_commit_sha1[20];
11
12 void walker_say(struct walker *walker, const char *fmt, ...)
13 {
14         if (walker->get_verbosely) {
15                 va_list ap;
16                 va_start(ap, fmt);
17                 vfprintf(stderr, fmt, ap);
18                 va_end(ap);
19         }
20 }
21
22 static void report_missing(const struct object *obj)
23 {
24         fprintf(stderr, "Cannot obtain needed %s %s\n",
25                 obj->type ? typename(obj->type): "object",
26                 oid_to_hex(&obj->oid));
27         if (!is_null_sha1(current_commit_sha1))
28                 fprintf(stderr, "while processing commit %s.\n",
29                         sha1_to_hex(current_commit_sha1));
30 }
31
32 static int process(struct walker *walker, struct object *obj);
33
34 static int process_tree(struct walker *walker, struct tree *tree)
35 {
36         struct tree_desc desc;
37         struct name_entry entry;
38
39         if (parse_tree(tree))
40                 return -1;
41
42         init_tree_desc(&desc, tree->buffer, tree->size);
43         while (tree_entry(&desc, &entry)) {
44                 struct object *obj = NULL;
45
46                 /* submodule commits are not stored in the superproject */
47                 if (S_ISGITLINK(entry.mode))
48                         continue;
49                 if (S_ISDIR(entry.mode)) {
50                         struct tree *tree = lookup_tree(entry.oid->hash);
51                         if (tree)
52                                 obj = &tree->object;
53                 }
54                 else {
55                         struct blob *blob = lookup_blob(entry.oid->hash);
56                         if (blob)
57                                 obj = &blob->object;
58                 }
59                 if (!obj || process(walker, obj))
60                         return -1;
61         }
62         free_tree_buffer(tree);
63         return 0;
64 }
65
66 /* Remember to update object flag allocation in object.h */
67 #define COMPLETE        (1U << 0)
68 #define SEEN            (1U << 1)
69 #define TO_SCAN         (1U << 2)
70
71 static struct commit_list *complete = NULL;
72
73 static int process_commit(struct walker *walker, struct commit *commit)
74 {
75         if (parse_commit(commit))
76                 return -1;
77
78         while (complete && complete->item->date >= commit->date) {
79                 pop_most_recent_commit(&complete, COMPLETE);
80         }
81
82         if (commit->object.flags & COMPLETE)
83                 return 0;
84
85         hashcpy(current_commit_sha1, commit->object.oid.hash);
86
87         walker_say(walker, "walk %s\n", oid_to_hex(&commit->object.oid));
88
89         if (walker->get_tree) {
90                 if (process(walker, &commit->tree->object))
91                         return -1;
92                 if (!walker->get_all)
93                         walker->get_tree = 0;
94         }
95         if (walker->get_history) {
96                 struct commit_list *parents = commit->parents;
97                 for (; parents; parents = parents->next) {
98                         if (process(walker, &parents->item->object))
99                                 return -1;
100                 }
101         }
102         return 0;
103 }
104
105 static int process_tag(struct walker *walker, struct tag *tag)
106 {
107         if (parse_tag(tag))
108                 return -1;
109         return process(walker, tag->tagged);
110 }
111
112 static struct object_list *process_queue = NULL;
113 static struct object_list **process_queue_end = &process_queue;
114
115 static int process_object(struct walker *walker, struct object *obj)
116 {
117         if (obj->type == OBJ_COMMIT) {
118                 if (process_commit(walker, (struct commit *)obj))
119                         return -1;
120                 return 0;
121         }
122         if (obj->type == OBJ_TREE) {
123                 if (process_tree(walker, (struct tree *)obj))
124                         return -1;
125                 return 0;
126         }
127         if (obj->type == OBJ_BLOB) {
128                 return 0;
129         }
130         if (obj->type == OBJ_TAG) {
131                 if (process_tag(walker, (struct tag *)obj))
132                         return -1;
133                 return 0;
134         }
135         return error("Unable to determine requirements "
136                      "of type %s for %s",
137                      typename(obj->type), oid_to_hex(&obj->oid));
138 }
139
140 static int process(struct walker *walker, struct object *obj)
141 {
142         if (obj->flags & SEEN)
143                 return 0;
144         obj->flags |= SEEN;
145
146         if (has_object_file(&obj->oid)) {
147                 /* We already have it, so we should scan it now. */
148                 obj->flags |= TO_SCAN;
149         }
150         else {
151                 if (obj->flags & COMPLETE)
152                         return 0;
153                 walker->prefetch(walker, obj->oid.hash);
154         }
155
156         object_list_insert(obj, process_queue_end);
157         process_queue_end = &(*process_queue_end)->next;
158         return 0;
159 }
160
161 static int loop(struct walker *walker)
162 {
163         struct object_list *elem;
164
165         while (process_queue) {
166                 struct object *obj = process_queue->item;
167                 elem = process_queue;
168                 process_queue = elem->next;
169                 free(elem);
170                 if (!process_queue)
171                         process_queue_end = &process_queue;
172
173                 /* If we are not scanning this object, we placed it in
174                  * the queue because we needed to fetch it first.
175                  */
176                 if (! (obj->flags & TO_SCAN)) {
177                         if (walker->fetch(walker, obj->oid.hash)) {
178                                 report_missing(obj);
179                                 return -1;
180                         }
181                 }
182                 if (!obj->type)
183                         parse_object(obj->oid.hash);
184                 if (process_object(walker, obj))
185                         return -1;
186         }
187         return 0;
188 }
189
190 static int interpret_target(struct walker *walker, char *target, unsigned char *sha1)
191 {
192         if (!get_sha1_hex(target, sha1))
193                 return 0;
194         if (!check_refname_format(target, 0)) {
195                 struct ref *ref = alloc_ref(target);
196                 if (!walker->fetch_ref(walker, ref)) {
197                         hashcpy(sha1, ref->old_oid.hash);
198                         free(ref);
199                         return 0;
200                 }
201                 free(ref);
202         }
203         return -1;
204 }
205
206 static int mark_complete(const char *path, const struct object_id *oid,
207                          int flag, void *cb_data)
208 {
209         struct commit *commit = lookup_commit_reference_gently(oid->hash, 1);
210
211         if (commit) {
212                 commit->object.flags |= COMPLETE;
213                 commit_list_insert(commit, &complete);
214         }
215         return 0;
216 }
217
218 int walker_targets_stdin(char ***target, const char ***write_ref)
219 {
220         int targets = 0, targets_alloc = 0;
221         struct strbuf buf = STRBUF_INIT;
222         *target = NULL; *write_ref = NULL;
223         while (1) {
224                 char *rf_one = NULL;
225                 char *tg_one;
226
227                 if (strbuf_getline_lf(&buf, stdin) == EOF)
228                         break;
229                 tg_one = buf.buf;
230                 rf_one = strchr(tg_one, '\t');
231                 if (rf_one)
232                         *rf_one++ = 0;
233
234                 if (targets >= targets_alloc) {
235                         targets_alloc = targets_alloc ? targets_alloc * 2 : 64;
236                         REALLOC_ARRAY(*target, targets_alloc);
237                         REALLOC_ARRAY(*write_ref, targets_alloc);
238                 }
239                 (*target)[targets] = xstrdup(tg_one);
240                 (*write_ref)[targets] = xstrdup_or_null(rf_one);
241                 targets++;
242         }
243         strbuf_release(&buf);
244         return targets;
245 }
246
247 void walker_targets_free(int targets, char **target, const char **write_ref)
248 {
249         while (targets--) {
250                 free(target[targets]);
251                 if (write_ref)
252                         free((char *) write_ref[targets]);
253         }
254 }
255
256 int walker_fetch(struct walker *walker, int targets, char **target,
257                  const char **write_ref, const char *write_ref_log_details)
258 {
259         struct strbuf refname = STRBUF_INIT;
260         struct strbuf err = STRBUF_INIT;
261         struct ref_transaction *transaction = NULL;
262         unsigned char *sha1 = xmalloc(targets * 20);
263         char *msg = NULL;
264         int i, ret = -1;
265
266         save_commit_buffer = 0;
267
268         if (write_ref) {
269                 transaction = ref_transaction_begin(&err);
270                 if (!transaction) {
271                         error("%s", err.buf);
272                         goto done;
273                 }
274         }
275
276         if (!walker->get_recover) {
277                 for_each_ref(mark_complete, NULL);
278                 commit_list_sort_by_date(&complete);
279         }
280
281         for (i = 0; i < targets; i++) {
282                 if (interpret_target(walker, target[i], &sha1[20 * i])) {
283                         error("Could not interpret response from server '%s' as something to pull", target[i]);
284                         goto done;
285                 }
286                 if (process(walker, lookup_unknown_object(&sha1[20 * i])))
287                         goto done;
288         }
289
290         if (loop(walker))
291                 goto done;
292         if (!write_ref) {
293                 ret = 0;
294                 goto done;
295         }
296         if (write_ref_log_details) {
297                 msg = xstrfmt("fetch from %s", write_ref_log_details);
298         } else {
299                 msg = NULL;
300         }
301         for (i = 0; i < targets; i++) {
302                 if (!write_ref[i])
303                         continue;
304                 strbuf_reset(&refname);
305                 strbuf_addf(&refname, "refs/%s", write_ref[i]);
306                 if (ref_transaction_update(transaction, refname.buf,
307                                            &sha1[20 * i], NULL, 0,
308                                            msg ? msg : "fetch (unknown)",
309                                            &err)) {
310                         error("%s", err.buf);
311                         goto done;
312                 }
313         }
314         if (ref_transaction_commit(transaction, &err)) {
315                 error("%s", err.buf);
316                 goto done;
317         }
318
319         ret = 0;
320
321 done:
322         ref_transaction_free(transaction);
323         free(msg);
324         free(sha1);
325         strbuf_release(&err);
326         strbuf_release(&refname);
327         return ret;
328 }
329
330 void walker_free(struct walker *walker)
331 {
332         walker->cleanup(walker);
333         free(walker);
334 }