Merge branch 'sg/lock-file-commit-error' into maint
[git/git.git] / builtin / fast-export.c
1 /*
2 * "git fast-export" builtin command
3 *
4 * Copyright (C) 2007 Johannes E. Schindelin
5 */
6 #include "builtin.h"
7 #include "cache.h"
8 #include "refs.h"
9 #include "commit.h"
10 #include "object.h"
11 #include "tag.h"
12 #include "diff.h"
13 #include "diffcore.h"
14 #include "log-tree.h"
15 #include "revision.h"
16 #include "decorate.h"
17 #include "string-list.h"
18 #include "utf8.h"
19 #include "parse-options.h"
20 #include "quote.h"
21 #include "remote.h"
22 #include "blob.h"
23
24 static const char *fast_export_usage[] = {
25 N_("git fast-export [rev-list-opts]"),
26 NULL
27 };
28
29 static int progress;
30 static enum { ABORT, VERBATIM, WARN, WARN_STRIP, STRIP } signed_tag_mode = ABORT;
31 static enum { ERROR, DROP, REWRITE } tag_of_filtered_mode = ERROR;
32 static int fake_missing_tagger;
33 static int use_done_feature;
34 static int no_data;
35 static int full_tree;
36 static struct string_list extra_refs = STRING_LIST_INIT_NODUP;
37 static struct refspec *refspecs;
38 static int refspecs_nr;
39 static int anonymize;
40
41 static int parse_opt_signed_tag_mode(const struct option *opt,
42 const char *arg, int unset)
43 {
44 if (unset || !strcmp(arg, "abort"))
45 signed_tag_mode = ABORT;
46 else if (!strcmp(arg, "verbatim") || !strcmp(arg, "ignore"))
47 signed_tag_mode = VERBATIM;
48 else if (!strcmp(arg, "warn"))
49 signed_tag_mode = WARN;
50 else if (!strcmp(arg, "warn-strip"))
51 signed_tag_mode = WARN_STRIP;
52 else if (!strcmp(arg, "strip"))
53 signed_tag_mode = STRIP;
54 else
55 return error("Unknown signed-tags mode: %s", arg);
56 return 0;
57 }
58
59 static int parse_opt_tag_of_filtered_mode(const struct option *opt,
60 const char *arg, int unset)
61 {
62 if (unset || !strcmp(arg, "abort"))
63 tag_of_filtered_mode = ERROR;
64 else if (!strcmp(arg, "drop"))
65 tag_of_filtered_mode = DROP;
66 else if (!strcmp(arg, "rewrite"))
67 tag_of_filtered_mode = REWRITE;
68 else
69 return error("Unknown tag-of-filtered mode: %s", arg);
70 return 0;
71 }
72
73 static struct decoration idnums;
74 static uint32_t last_idnum;
75
76 static int has_unshown_parent(struct commit *commit)
77 {
78 struct commit_list *parent;
79
80 for (parent = commit->parents; parent; parent = parent->next)
81 if (!(parent->item->object.flags & SHOWN) &&
82 !(parent->item->object.flags & UNINTERESTING))
83 return 1;
84 return 0;
85 }
86
87 struct anonymized_entry {
88 struct hashmap_entry hash;
89 const char *orig;
90 size_t orig_len;
91 const char *anon;
92 size_t anon_len;
93 };
94
95 static int anonymized_entry_cmp(const void *va, const void *vb,
96 const void *data)
97 {
98 const struct anonymized_entry *a = va, *b = vb;
99 return a->orig_len != b->orig_len ||
100 memcmp(a->orig, b->orig, a->orig_len);
101 }
102
103 /*
104 * Basically keep a cache of X->Y so that we can repeatedly replace
105 * the same anonymized string with another. The actual generation
106 * is farmed out to the generate function.
107 */
108 static const void *anonymize_mem(struct hashmap *map,
109 void *(*generate)(const void *, size_t *),
110 const void *orig, size_t *len)
111 {
112 struct anonymized_entry key, *ret;
113
114 if (!map->cmpfn)
115 hashmap_init(map, anonymized_entry_cmp, 0);
116
117 hashmap_entry_init(&key, memhash(orig, *len));
118 key.orig = orig;
119 key.orig_len = *len;
120 ret = hashmap_get(map, &key, NULL);
121
122 if (!ret) {
123 ret = xmalloc(sizeof(*ret));
124 hashmap_entry_init(&ret->hash, key.hash.hash);
125 ret->orig = xstrdup(orig);
126 ret->orig_len = *len;
127 ret->anon = generate(orig, len);
128 ret->anon_len = *len;
129 hashmap_put(map, ret);
130 }
131
132 *len = ret->anon_len;
133 return ret->anon;
134 }
135
136 /*
137 * We anonymize each component of a path individually,
138 * so that paths a/b and a/c will share a common root.
139 * The paths are cached via anonymize_mem so that repeated
140 * lookups for "a" will yield the same value.
141 */
142 static void anonymize_path(struct strbuf *out, const char *path,
143 struct hashmap *map,
144 void *(*generate)(const void *, size_t *))
145 {
146 while (*path) {
147 const char *end_of_component = strchrnul(path, '/');
148 size_t len = end_of_component - path;
149 const char *c = anonymize_mem(map, generate, path, &len);
150 strbuf_add(out, c, len);
151 path = end_of_component;
152 if (*path)
153 strbuf_addch(out, *path++);
154 }
155 }
156
157 /* Since intptr_t is C99, we do not use it here */
158 static inline uint32_t *mark_to_ptr(uint32_t mark)
159 {
160 return ((uint32_t *)NULL) + mark;
161 }
162
163 static inline uint32_t ptr_to_mark(void * mark)
164 {
165 return (uint32_t *)mark - (uint32_t *)NULL;
166 }
167
168 static inline void mark_object(struct object *object, uint32_t mark)
169 {
170 add_decoration(&idnums, object, mark_to_ptr(mark));
171 }
172
173 static inline void mark_next_object(struct object *object)
174 {
175 mark_object(object, ++last_idnum);
176 }
177
178 static int get_object_mark(struct object *object)
179 {
180 void *decoration = lookup_decoration(&idnums, object);
181 if (!decoration)
182 return 0;
183 return ptr_to_mark(decoration);
184 }
185
186 static void show_progress(void)
187 {
188 static int counter = 0;
189 if (!progress)
190 return;
191 if ((++counter % progress) == 0)
192 printf("progress %d objects\n", counter);
193 }
194
195 /*
196 * Ideally we would want some transformation of the blob data here
197 * that is unreversible, but would still be the same size and have
198 * the same data relationship to other blobs (so that we get the same
199 * delta and packing behavior as the original). But the first and last
200 * requirements there are probably mutually exclusive, so let's take
201 * the easy way out for now, and just generate arbitrary content.
202 *
203 * There's no need to cache this result with anonymize_mem, since
204 * we already handle blob content caching with marks.
205 */
206 static char *anonymize_blob(unsigned long *size)
207 {
208 static int counter;
209 struct strbuf out = STRBUF_INIT;
210 strbuf_addf(&out, "anonymous blob %d", counter++);
211 *size = out.len;
212 return strbuf_detach(&out, NULL);
213 }
214
215 static void export_blob(const unsigned char *sha1)
216 {
217 unsigned long size;
218 enum object_type type;
219 char *buf;
220 struct object *object;
221 int eaten;
222
223 if (no_data)
224 return;
225
226 if (is_null_sha1(sha1))
227 return;
228
229 object = lookup_object(sha1);
230 if (object && object->flags & SHOWN)
231 return;
232
233 if (anonymize) {
234 buf = anonymize_blob(&size);
235 object = (struct object *)lookup_blob(sha1);
236 eaten = 0;
237 } else {
238 buf = read_sha1_file(sha1, &type, &size);
239 if (!buf)
240 die ("Could not read blob %s", sha1_to_hex(sha1));
241 if (check_sha1_signature(sha1, buf, size, typename(type)) < 0)
242 die("sha1 mismatch in blob %s", sha1_to_hex(sha1));
243 object = parse_object_buffer(sha1, type, size, buf, &eaten);
244 }
245
246 if (!object)
247 die("Could not read blob %s", sha1_to_hex(sha1));
248
249 mark_next_object(object);
250
251 printf("blob\nmark :%"PRIu32"\ndata %lu\n", last_idnum, size);
252 if (size && fwrite(buf, size, 1, stdout) != 1)
253 die_errno ("Could not write blob '%s'", sha1_to_hex(sha1));
254 printf("\n");
255
256 show_progress();
257
258 object->flags |= SHOWN;
259 if (!eaten)
260 free(buf);
261 }
262
263 static int depth_first(const void *a_, const void *b_)
264 {
265 const struct diff_filepair *a = *((const struct diff_filepair **)a_);
266 const struct diff_filepair *b = *((const struct diff_filepair **)b_);
267 const char *name_a, *name_b;
268 int len_a, len_b, len;
269 int cmp;
270
271 name_a = a->one ? a->one->path : a->two->path;
272 name_b = b->one ? b->one->path : b->two->path;
273
274 len_a = strlen(name_a);
275 len_b = strlen(name_b);
276 len = (len_a < len_b) ? len_a : len_b;
277
278 /* strcmp will sort 'd' before 'd/e', we want 'd/e' before 'd' */
279 cmp = memcmp(name_a, name_b, len);
280 if (cmp)
281 return cmp;
282 cmp = len_b - len_a;
283 if (cmp)
284 return cmp;
285 /*
286 * Move 'R'ename entries last so that all references of the file
287 * appear in the output before it is renamed (e.g., when a file
288 * was copied and renamed in the same commit).
289 */
290 return (a->status == 'R') - (b->status == 'R');
291 }
292
293 static void print_path_1(const char *path)
294 {
295 int need_quote = quote_c_style(path, NULL, NULL, 0);
296 if (need_quote)
297 quote_c_style(path, NULL, stdout, 0);
298 else if (strchr(path, ' '))
299 printf("\"%s\"", path);
300 else
301 printf("%s", path);
302 }
303
304 static void *anonymize_path_component(const void *path, size_t *len)
305 {
306 static int counter;
307 struct strbuf out = STRBUF_INIT;
308 strbuf_addf(&out, "path%d", counter++);
309 return strbuf_detach(&out, len);
310 }
311
312 static void print_path(const char *path)
313 {
314 if (!anonymize)
315 print_path_1(path);
316 else {
317 static struct hashmap paths;
318 static struct strbuf anon = STRBUF_INIT;
319
320 anonymize_path(&anon, path, &paths, anonymize_path_component);
321 print_path_1(anon.buf);
322 strbuf_reset(&anon);
323 }
324 }
325
326 static void *generate_fake_sha1(const void *old, size_t *len)
327 {
328 static uint32_t counter = 1; /* avoid null sha1 */
329 unsigned char *out = xcalloc(20, 1);
330 put_be32(out + 16, counter++);
331 return out;
332 }
333
334 static const unsigned char *anonymize_sha1(const unsigned char *sha1)
335 {
336 static struct hashmap sha1s;
337 size_t len = 20;
338 return anonymize_mem(&sha1s, generate_fake_sha1, sha1, &len);
339 }
340
341 static void show_filemodify(struct diff_queue_struct *q,
342 struct diff_options *options, void *data)
343 {
344 int i;
345
346 /*
347 * Handle files below a directory first, in case they are all deleted
348 * and the directory changes to a file or symlink.
349 */
350 qsort(q->queue, q->nr, sizeof(q->queue[0]), depth_first);
351
352 for (i = 0; i < q->nr; i++) {
353 struct diff_filespec *ospec = q->queue[i]->one;
354 struct diff_filespec *spec = q->queue[i]->two;
355
356 switch (q->queue[i]->status) {
357 case DIFF_STATUS_DELETED:
358 printf("D ");
359 print_path(spec->path);
360 putchar('\n');
361 break;
362
363 case DIFF_STATUS_COPIED:
364 case DIFF_STATUS_RENAMED:
365 printf("%c ", q->queue[i]->status);
366 print_path(ospec->path);
367 putchar(' ');
368 print_path(spec->path);
369 putchar('\n');
370
371 if (!hashcmp(ospec->sha1, spec->sha1) &&
372 ospec->mode == spec->mode)
373 break;
374 /* fallthrough */
375
376 case DIFF_STATUS_TYPE_CHANGED:
377 case DIFF_STATUS_MODIFIED:
378 case DIFF_STATUS_ADDED:
379 /*
380 * Links refer to objects in another repositories;
381 * output the SHA-1 verbatim.
382 */
383 if (no_data || S_ISGITLINK(spec->mode))
384 printf("M %06o %s ", spec->mode,
385 sha1_to_hex(anonymize ?
386 anonymize_sha1(spec->sha1) :
387 spec->sha1));
388 else {
389 struct object *object = lookup_object(spec->sha1);
390 printf("M %06o :%d ", spec->mode,
391 get_object_mark(object));
392 }
393 print_path(spec->path);
394 putchar('\n');
395 break;
396
397 default:
398 die("Unexpected comparison status '%c' for %s, %s",
399 q->queue[i]->status,
400 ospec->path ? ospec->path : "none",
401 spec->path ? spec->path : "none");
402 }
403 }
404 }
405
406 static const char *find_encoding(const char *begin, const char *end)
407 {
408 const char *needle = "\nencoding ";
409 char *bol, *eol;
410
411 bol = memmem(begin, end ? end - begin : strlen(begin),
412 needle, strlen(needle));
413 if (!bol)
414 return git_commit_encoding;
415 bol += strlen(needle);
416 eol = strchrnul(bol, '\n');
417 *eol = '\0';
418 return bol;
419 }
420
421 static void *anonymize_ref_component(const void *old, size_t *len)
422 {
423 static int counter;
424 struct strbuf out = STRBUF_INIT;
425 strbuf_addf(&out, "ref%d", counter++);
426 return strbuf_detach(&out, len);
427 }
428
429 static const char *anonymize_refname(const char *refname)
430 {
431 /*
432 * If any of these prefixes is found, we will leave it intact
433 * so that tags remain tags and so forth.
434 */
435 static const char *prefixes[] = {
436 "refs/heads/",
437 "refs/tags/",
438 "refs/remotes/",
439 "refs/"
440 };
441 static struct hashmap refs;
442 static struct strbuf anon = STRBUF_INIT;
443 int i;
444
445 /*
446 * We also leave "master" as a special case, since it does not reveal
447 * anything interesting.
448 */
449 if (!strcmp(refname, "refs/heads/master"))
450 return refname;
451
452 strbuf_reset(&anon);
453 for (i = 0; i < ARRAY_SIZE(prefixes); i++) {
454 if (skip_prefix(refname, prefixes[i], &refname)) {
455 strbuf_addstr(&anon, prefixes[i]);
456 break;
457 }
458 }
459
460 anonymize_path(&anon, refname, &refs, anonymize_ref_component);
461 return anon.buf;
462 }
463
464 /*
465 * We do not even bother to cache commit messages, as they are unlikely
466 * to be repeated verbatim, and it is not that interesting when they are.
467 */
468 static char *anonymize_commit_message(const char *old)
469 {
470 static int counter;
471 return xstrfmt("subject %d\n\nbody\n", counter++);
472 }
473
474 static struct hashmap idents;
475 static void *anonymize_ident(const void *old, size_t *len)
476 {
477 static int counter;
478 struct strbuf out = STRBUF_INIT;
479 strbuf_addf(&out, "User %d <user%d@example.com>", counter, counter);
480 counter++;
481 return strbuf_detach(&out, len);
482 }
483
484 /*
485 * Our strategy here is to anonymize the names and email addresses,
486 * but keep timestamps intact, as they influence things like traversal
487 * order (and by themselves should not be too revealing).
488 */
489 static void anonymize_ident_line(const char **beg, const char **end)
490 {
491 static struct strbuf buffers[] = { STRBUF_INIT, STRBUF_INIT };
492 static unsigned which_buffer;
493
494 struct strbuf *out;
495 struct ident_split split;
496 const char *end_of_header;
497
498 out = &buffers[which_buffer++];
499 which_buffer %= ARRAY_SIZE(buffers);
500 strbuf_reset(out);
501
502 /* skip "committer", "author", "tagger", etc */
503 end_of_header = strchr(*beg, ' ');
504 if (!end_of_header)
505 die("BUG: malformed line fed to anonymize_ident_line: %.*s",
506 (int)(*end - *beg), *beg);
507 end_of_header++;
508 strbuf_add(out, *beg, end_of_header - *beg);
509
510 if (!split_ident_line(&split, end_of_header, *end - end_of_header) &&
511 split.date_begin) {
512 const char *ident;
513 size_t len;
514
515 len = split.mail_end - split.name_begin;
516 ident = anonymize_mem(&idents, anonymize_ident,
517 split.name_begin, &len);
518 strbuf_add(out, ident, len);
519 strbuf_addch(out, ' ');
520 strbuf_add(out, split.date_begin, split.tz_end - split.date_begin);
521 } else {
522 strbuf_addstr(out, "Malformed Ident <malformed@example.com> 0 -0000");
523 }
524
525 *beg = out->buf;
526 *end = out->buf + out->len;
527 }
528
529 static void handle_commit(struct commit *commit, struct rev_info *rev)
530 {
531 int saved_output_format = rev->diffopt.output_format;
532 const char *commit_buffer;
533 const char *author, *author_end, *committer, *committer_end;
534 const char *encoding, *message;
535 char *reencoded = NULL;
536 struct commit_list *p;
537 const char *refname;
538 int i;
539
540 rev->diffopt.output_format = DIFF_FORMAT_CALLBACK;
541
542 parse_commit_or_die(commit);
543 commit_buffer = get_commit_buffer(commit, NULL);
544 author = strstr(commit_buffer, "\nauthor ");
545 if (!author)
546 die ("Could not find author in commit %s",
547 sha1_to_hex(commit->object.sha1));
548 author++;
549 author_end = strchrnul(author, '\n');
550 committer = strstr(author_end, "\ncommitter ");
551 if (!committer)
552 die ("Could not find committer in commit %s",
553 sha1_to_hex(commit->object.sha1));
554 committer++;
555 committer_end = strchrnul(committer, '\n');
556 message = strstr(committer_end, "\n\n");
557 encoding = find_encoding(committer_end, message);
558 if (message)
559 message += 2;
560
561 if (commit->parents &&
562 get_object_mark(&commit->parents->item->object) != 0 &&
563 !full_tree) {
564 parse_commit_or_die(commit->parents->item);
565 diff_tree_sha1(commit->parents->item->tree->object.sha1,
566 commit->tree->object.sha1, "", &rev->diffopt);
567 }
568 else
569 diff_root_tree_sha1(commit->tree->object.sha1,
570 "", &rev->diffopt);
571
572 /* Export the referenced blobs, and remember the marks. */
573 for (i = 0; i < diff_queued_diff.nr; i++)
574 if (!S_ISGITLINK(diff_queued_diff.queue[i]->two->mode))
575 export_blob(diff_queued_diff.queue[i]->two->sha1);
576
577 refname = commit->util;
578 if (anonymize) {
579 refname = anonymize_refname(refname);
580 anonymize_ident_line(&committer, &committer_end);
581 anonymize_ident_line(&author, &author_end);
582 }
583
584 mark_next_object(&commit->object);
585 if (anonymize)
586 reencoded = anonymize_commit_message(message);
587 else if (!is_encoding_utf8(encoding))
588 reencoded = reencode_string(message, "UTF-8", encoding);
589 if (!commit->parents)
590 printf("reset %s\n", refname);
591 printf("commit %s\nmark :%"PRIu32"\n%.*s\n%.*s\ndata %u\n%s",
592 refname, last_idnum,
593 (int)(author_end - author), author,
594 (int)(committer_end - committer), committer,
595 (unsigned)(reencoded
596 ? strlen(reencoded) : message
597 ? strlen(message) : 0),
598 reencoded ? reencoded : message ? message : "");
599 free(reencoded);
600 unuse_commit_buffer(commit, commit_buffer);
601
602 for (i = 0, p = commit->parents; p; p = p->next) {
603 int mark = get_object_mark(&p->item->object);
604 if (!mark)
605 continue;
606 if (i == 0)
607 printf("from :%d\n", mark);
608 else
609 printf("merge :%d\n", mark);
610 i++;
611 }
612
613 if (full_tree)
614 printf("deleteall\n");
615 log_tree_diff_flush(rev);
616 rev->diffopt.output_format = saved_output_format;
617
618 printf("\n");
619
620 show_progress();
621 }
622
623 static void *anonymize_tag(const void *old, size_t *len)
624 {
625 static int counter;
626 struct strbuf out = STRBUF_INIT;
627 strbuf_addf(&out, "tag message %d", counter++);
628 return strbuf_detach(&out, len);
629 }
630
631 static void handle_tail(struct object_array *commits, struct rev_info *revs)
632 {
633 struct commit *commit;
634 while (commits->nr) {
635 commit = (struct commit *)commits->objects[commits->nr - 1].item;
636 if (has_unshown_parent(commit))
637 return;
638 handle_commit(commit, revs);
639 commits->nr--;
640 }
641 }
642
643 static void handle_tag(const char *name, struct tag *tag)
644 {
645 unsigned long size;
646 enum object_type type;
647 char *buf;
648 const char *tagger, *tagger_end, *message;
649 size_t message_size = 0;
650 struct object *tagged;
651 int tagged_mark;
652 struct commit *p;
653
654 /* Trees have no identifier in fast-export output, thus we have no way
655 * to output tags of trees, tags of tags of trees, etc. Simply omit
656 * such tags.
657 */
658 tagged = tag->tagged;
659 while (tagged->type == OBJ_TAG) {
660 tagged = ((struct tag *)tagged)->tagged;
661 }
662 if (tagged->type == OBJ_TREE) {
663 warning("Omitting tag %s,\nsince tags of trees (or tags of tags of trees, etc.) are not supported.",
664 sha1_to_hex(tag->object.sha1));
665 return;
666 }
667
668 buf = read_sha1_file(tag->object.sha1, &type, &size);
669 if (!buf)
670 die ("Could not read tag %s", sha1_to_hex(tag->object.sha1));
671 message = memmem(buf, size, "\n\n", 2);
672 if (message) {
673 message += 2;
674 message_size = strlen(message);
675 }
676 tagger = memmem(buf, message ? message - buf : size, "\ntagger ", 8);
677 if (!tagger) {
678 if (fake_missing_tagger)
679 tagger = "tagger Unspecified Tagger "
680 "<unspecified-tagger> 0 +0000";
681 else
682 tagger = "";
683 tagger_end = tagger + strlen(tagger);
684 } else {
685 tagger++;
686 tagger_end = strchrnul(tagger, '\n');
687 if (anonymize)
688 anonymize_ident_line(&tagger, &tagger_end);
689 }
690
691 if (anonymize) {
692 name = anonymize_refname(name);
693 if (message) {
694 static struct hashmap tags;
695 message = anonymize_mem(&tags, anonymize_tag,
696 message, &message_size);
697 }
698 }
699
700 /* handle signed tags */
701 if (message) {
702 const char *signature = strstr(message,
703 "\n-----BEGIN PGP SIGNATURE-----\n");
704 if (signature)
705 switch(signed_tag_mode) {
706 case ABORT:
707 die ("Encountered signed tag %s; use "
708 "--signed-tags=<mode> to handle it.",
709 sha1_to_hex(tag->object.sha1));
710 case WARN:
711 warning ("Exporting signed tag %s",
712 sha1_to_hex(tag->object.sha1));
713 /* fallthru */
714 case VERBATIM:
715 break;
716 case WARN_STRIP:
717 warning ("Stripping signature from tag %s",
718 sha1_to_hex(tag->object.sha1));
719 /* fallthru */
720 case STRIP:
721 message_size = signature + 1 - message;
722 break;
723 }
724 }
725
726 /* handle tag->tagged having been filtered out due to paths specified */
727 tagged = tag->tagged;
728 tagged_mark = get_object_mark(tagged);
729 if (!tagged_mark) {
730 switch(tag_of_filtered_mode) {
731 case ABORT:
732 die ("Tag %s tags unexported object; use "
733 "--tag-of-filtered-object=<mode> to handle it.",
734 sha1_to_hex(tag->object.sha1));
735 case DROP:
736 /* Ignore this tag altogether */
737 return;
738 case REWRITE:
739 if (tagged->type != OBJ_COMMIT) {
740 die ("Tag %s tags unexported %s!",
741 sha1_to_hex(tag->object.sha1),
742 typename(tagged->type));
743 }
744 p = (struct commit *)tagged;
745 for (;;) {
746 if (p->parents && p->parents->next)
747 break;
748 if (p->object.flags & UNINTERESTING)
749 break;
750 if (!(p->object.flags & TREESAME))
751 break;
752 if (!p->parents)
753 die ("Can't find replacement commit for tag %s\n",
754 sha1_to_hex(tag->object.sha1));
755 p = p->parents->item;
756 }
757 tagged_mark = get_object_mark(&p->object);
758 }
759 }
760
761 if (starts_with(name, "refs/tags/"))
762 name += 10;
763 printf("tag %s\nfrom :%d\n%.*s%sdata %d\n%.*s\n",
764 name, tagged_mark,
765 (int)(tagger_end - tagger), tagger,
766 tagger == tagger_end ? "" : "\n",
767 (int)message_size, (int)message_size, message ? message : "");
768 }
769
770 static struct commit *get_commit(struct rev_cmdline_entry *e, char *full_name)
771 {
772 switch (e->item->type) {
773 case OBJ_COMMIT:
774 return (struct commit *)e->item;
775 case OBJ_TAG: {
776 struct tag *tag = (struct tag *)e->item;
777
778 /* handle nested tags */
779 while (tag && tag->object.type == OBJ_TAG) {
780 parse_object(tag->object.sha1);
781 string_list_append(&extra_refs, full_name)->util = tag;
782 tag = (struct tag *)tag->tagged;
783 }
784 if (!tag)
785 die("Tag %s points nowhere?", e->name);
786 return (struct commit *)tag;
787 break;
788 }
789 default:
790 return NULL;
791 }
792 }
793
794 static void get_tags_and_duplicates(struct rev_cmdline_info *info)
795 {
796 int i;
797
798 for (i = 0; i < info->nr; i++) {
799 struct rev_cmdline_entry *e = info->rev + i;
800 unsigned char sha1[20];
801 struct commit *commit;
802 char *full_name;
803
804 if (e->flags & UNINTERESTING)
805 continue;
806
807 if (dwim_ref(e->name, strlen(e->name), sha1, &full_name) != 1)
808 continue;
809
810 if (refspecs) {
811 char *private;
812 private = apply_refspecs(refspecs, refspecs_nr, full_name);
813 if (private) {
814 free(full_name);
815 full_name = private;
816 }
817 }
818
819 commit = get_commit(e, full_name);
820 if (!commit) {
821 warning("%s: Unexpected object of type %s, skipping.",
822 e->name,
823 typename(e->item->type));
824 continue;
825 }
826
827 switch(commit->object.type) {
828 case OBJ_COMMIT:
829 break;
830 case OBJ_BLOB:
831 export_blob(commit->object.sha1);
832 continue;
833 default: /* OBJ_TAG (nested tags) is already handled */
834 warning("Tag points to object of unexpected type %s, skipping.",
835 typename(commit->object.type));
836 continue;
837 }
838
839 /*
840 * This ref will not be updated through a commit, lets make
841 * sure it gets properly updated eventually.
842 */
843 if (commit->util || commit->object.flags & SHOWN)
844 string_list_append(&extra_refs, full_name)->util = commit;
845 if (!commit->util)
846 commit->util = full_name;
847 }
848 }
849
850 static void handle_tags_and_duplicates(void)
851 {
852 struct commit *commit;
853 int i;
854
855 for (i = extra_refs.nr - 1; i >= 0; i--) {
856 const char *name = extra_refs.items[i].string;
857 struct object *object = extra_refs.items[i].util;
858 switch (object->type) {
859 case OBJ_TAG:
860 handle_tag(name, (struct tag *)object);
861 break;
862 case OBJ_COMMIT:
863 if (anonymize)
864 name = anonymize_refname(name);
865 /* create refs pointing to already seen commits */
866 commit = (struct commit *)object;
867 printf("reset %s\nfrom :%d\n\n", name,
868 get_object_mark(&commit->object));
869 show_progress();
870 break;
871 }
872 }
873 }
874
875 static void export_marks(char *file)
876 {
877 unsigned int i;
878 uint32_t mark;
879 struct object_decoration *deco = idnums.hash;
880 FILE *f;
881 int e = 0;
882
883 f = fopen(file, "w");
884 if (!f)
885 die_errno("Unable to open marks file %s for writing.", file);
886
887 for (i = 0; i < idnums.size; i++) {
888 if (deco->base && deco->base->type == 1) {
889 mark = ptr_to_mark(deco->decoration);
890 if (fprintf(f, ":%"PRIu32" %s\n", mark,
891 sha1_to_hex(deco->base->sha1)) < 0) {
892 e = 1;
893 break;
894 }
895 }
896 deco++;
897 }
898
899 e |= ferror(f);
900 e |= fclose(f);
901 if (e)
902 error("Unable to write marks file %s.", file);
903 }
904
905 static void import_marks(char *input_file)
906 {
907 char line[512];
908 FILE *f = fopen(input_file, "r");
909 if (!f)
910 die_errno("cannot read '%s'", input_file);
911
912 while (fgets(line, sizeof(line), f)) {
913 uint32_t mark;
914 char *line_end, *mark_end;
915 unsigned char sha1[20];
916 struct object *object;
917 struct commit *commit;
918 enum object_type type;
919
920 line_end = strchr(line, '\n');
921 if (line[0] != ':' || !line_end)
922 die("corrupt mark line: %s", line);
923 *line_end = '\0';
924
925 mark = strtoumax(line + 1, &mark_end, 10);
926 if (!mark || mark_end == line + 1
927 || *mark_end != ' ' || get_sha1_hex(mark_end + 1, sha1))
928 die("corrupt mark line: %s", line);
929
930 if (last_idnum < mark)
931 last_idnum = mark;
932
933 type = sha1_object_info(sha1, NULL);
934 if (type < 0)
935 die("object not found: %s", sha1_to_hex(sha1));
936
937 if (type != OBJ_COMMIT)
938 /* only commits */
939 continue;
940
941 commit = lookup_commit(sha1);
942 if (!commit)
943 die("not a commit? can't happen: %s", sha1_to_hex(sha1));
944
945 object = &commit->object;
946
947 if (object->flags & SHOWN)
948 error("Object %s already has a mark", sha1_to_hex(sha1));
949
950 mark_object(object, mark);
951
952 object->flags |= SHOWN;
953 }
954 fclose(f);
955 }
956
957 static void handle_deletes(void)
958 {
959 int i;
960 for (i = 0; i < refspecs_nr; i++) {
961 struct refspec *refspec = &refspecs[i];
962 if (*refspec->src)
963 continue;
964
965 printf("reset %s\nfrom %s\n\n",
966 refspec->dst, sha1_to_hex(null_sha1));
967 }
968 }
969
970 int cmd_fast_export(int argc, const char **argv, const char *prefix)
971 {
972 struct rev_info revs;
973 struct object_array commits = OBJECT_ARRAY_INIT;
974 struct commit *commit;
975 char *export_filename = NULL, *import_filename = NULL;
976 uint32_t lastimportid;
977 struct string_list refspecs_list = STRING_LIST_INIT_NODUP;
978 struct option options[] = {
979 OPT_INTEGER(0, "progress", &progress,
980 N_("show progress after <n> objects")),
981 OPT_CALLBACK(0, "signed-tags", &signed_tag_mode, N_("mode"),
982 N_("select handling of signed tags"),
983 parse_opt_signed_tag_mode),
984 OPT_CALLBACK(0, "tag-of-filtered-object", &tag_of_filtered_mode, N_("mode"),
985 N_("select handling of tags that tag filtered objects"),
986 parse_opt_tag_of_filtered_mode),
987 OPT_STRING(0, "export-marks", &export_filename, N_("file"),
988 N_("Dump marks to this file")),
989 OPT_STRING(0, "import-marks", &import_filename, N_("file"),
990 N_("Import marks from this file")),
991 OPT_BOOL(0, "fake-missing-tagger", &fake_missing_tagger,
992 N_("Fake a tagger when tags lack one")),
993 OPT_BOOL(0, "full-tree", &full_tree,
994 N_("Output full tree for each commit")),
995 OPT_BOOL(0, "use-done-feature", &use_done_feature,
996 N_("Use the done feature to terminate the stream")),
997 OPT_BOOL(0, "no-data", &no_data, N_("Skip output of blob data")),
998 OPT_STRING_LIST(0, "refspec", &refspecs_list, N_("refspec"),
999 N_("Apply refspec to exported refs")),
1000 OPT_BOOL(0, "anonymize", &anonymize, N_("anonymize output")),
1001 OPT_END()
1002 };
1003
1004 if (argc == 1)
1005 usage_with_options (fast_export_usage, options);
1006
1007 /* we handle encodings */
1008 git_config(git_default_config, NULL);
1009
1010 init_revisions(&revs, prefix);
1011 revs.topo_order = 1;
1012 revs.show_source = 1;
1013 revs.rewrite_parents = 1;
1014 argc = parse_options(argc, argv, prefix, options, fast_export_usage,
1015 PARSE_OPT_KEEP_ARGV0 | PARSE_OPT_KEEP_UNKNOWN);
1016 argc = setup_revisions(argc, argv, &revs, NULL);
1017 if (argc > 1)
1018 usage_with_options (fast_export_usage, options);
1019
1020 if (refspecs_list.nr) {
1021 const char **refspecs_str;
1022 int i;
1023
1024 refspecs_str = xmalloc(sizeof(*refspecs_str) * refspecs_list.nr);
1025 for (i = 0; i < refspecs_list.nr; i++)
1026 refspecs_str[i] = refspecs_list.items[i].string;
1027
1028 refspecs_nr = refspecs_list.nr;
1029 refspecs = parse_fetch_refspec(refspecs_nr, refspecs_str);
1030
1031 string_list_clear(&refspecs_list, 1);
1032 free(refspecs_str);
1033 }
1034
1035 if (use_done_feature)
1036 printf("feature done\n");
1037
1038 if (import_filename)
1039 import_marks(import_filename);
1040 lastimportid = last_idnum;
1041
1042 if (import_filename && revs.prune_data.nr)
1043 full_tree = 1;
1044
1045 get_tags_and_duplicates(&revs.cmdline);
1046
1047 if (prepare_revision_walk(&revs))
1048 die("revision walk setup failed");
1049 revs.diffopt.format_callback = show_filemodify;
1050 DIFF_OPT_SET(&revs.diffopt, RECURSIVE);
1051 while ((commit = get_revision(&revs))) {
1052 if (has_unshown_parent(commit)) {
1053 add_object_array(&commit->object, NULL, &commits);
1054 }
1055 else {
1056 handle_commit(commit, &revs);
1057 handle_tail(&commits, &revs);
1058 }
1059 }
1060
1061 handle_tags_and_duplicates();
1062 handle_deletes();
1063
1064 if (export_filename && lastimportid != last_idnum)
1065 export_marks(export_filename);
1066
1067 if (use_done_feature)
1068 printf("done\n");
1069
1070 free_refspec(refspecs_nr, refspecs);
1071
1072 return 0;
1073 }