Merge branch 'jk/maint-cleanup-after-exec-failure'
[git] / builtin-tag.c
1 /*
2  * Builtin "git tag"
3  *
4  * Copyright (c) 2007 Kristian Høgsberg <krh@redhat.com>,
5  *                    Carlos Rica <jasampler@gmail.com>
6  * Based on git-tag.sh and mktag.c by Linus Torvalds.
7  */
8
9 #include "cache.h"
10 #include "builtin.h"
11 #include "refs.h"
12 #include "tag.h"
13 #include "run-command.h"
14 #include "parse-options.h"
15
16 static const char * const git_tag_usage[] = {
17         "git tag [-a|-s|-u <key-id>] [-f] [-m <msg>|-F <file>] <tagname> [<head>]",
18         "git tag -d <tagname>...",
19         "git tag -l [-n[<num>]] [<pattern>]",
20         "git tag -v <tagname>...",
21         NULL
22 };
23
24 static char signingkey[1000];
25
26 struct tag_filter {
27         const char *pattern;
28         int lines;
29         struct commit_list *with_commit;
30 };
31
32 #define PGP_SIGNATURE "-----BEGIN PGP SIGNATURE-----"
33
34 static int show_reference(const char *refname, const unsigned char *sha1,
35                           int flag, void *cb_data)
36 {
37         struct tag_filter *filter = cb_data;
38
39         if (!fnmatch(filter->pattern, refname, 0)) {
40                 int i;
41                 unsigned long size;
42                 enum object_type type;
43                 char *buf, *sp, *eol;
44                 size_t len;
45
46                 if (filter->with_commit) {
47                         struct commit *commit;
48
49                         commit = lookup_commit_reference_gently(sha1, 1);
50                         if (!commit)
51                                 return 0;
52                         if (!is_descendant_of(commit, filter->with_commit))
53                                 return 0;
54                 }
55
56                 if (!filter->lines) {
57                         printf("%s\n", refname);
58                         return 0;
59                 }
60                 printf("%-15s ", refname);
61
62                 buf = read_sha1_file(sha1, &type, &size);
63                 if (!buf || !size)
64                         return 0;
65
66                 /* skip header */
67                 sp = strstr(buf, "\n\n");
68                 if (!sp) {
69                         free(buf);
70                         return 0;
71                 }
72                 /* only take up to "lines" lines, and strip the signature */
73                 for (i = 0, sp += 2;
74                                 i < filter->lines && sp < buf + size &&
75                                 prefixcmp(sp, PGP_SIGNATURE "\n");
76                                 i++) {
77                         if (i)
78                                 printf("\n    ");
79                         eol = memchr(sp, '\n', size - (sp - buf));
80                         len = eol ? eol - sp : size - (sp - buf);
81                         fwrite(sp, len, 1, stdout);
82                         if (!eol)
83                                 break;
84                         sp = eol + 1;
85                 }
86                 putchar('\n');
87                 free(buf);
88         }
89
90         return 0;
91 }
92
93 static int list_tags(const char *pattern, int lines,
94                         struct commit_list *with_commit)
95 {
96         struct tag_filter filter;
97
98         if (pattern == NULL)
99                 pattern = "*";
100
101         filter.pattern = pattern;
102         filter.lines = lines;
103         filter.with_commit = with_commit;
104
105         for_each_tag_ref(show_reference, (void *) &filter);
106
107         return 0;
108 }
109
110 typedef int (*each_tag_name_fn)(const char *name, const char *ref,
111                                 const unsigned char *sha1);
112
113 static int for_each_tag_name(const char **argv, each_tag_name_fn fn)
114 {
115         const char **p;
116         char ref[PATH_MAX];
117         int had_error = 0;
118         unsigned char sha1[20];
119
120         for (p = argv; *p; p++) {
121                 if (snprintf(ref, sizeof(ref), "refs/tags/%s", *p)
122                                         >= sizeof(ref)) {
123                         error("tag name too long: %.*s...", 50, *p);
124                         had_error = 1;
125                         continue;
126                 }
127                 if (!resolve_ref(ref, sha1, 1, NULL)) {
128                         error("tag '%s' not found.", *p);
129                         had_error = 1;
130                         continue;
131                 }
132                 if (fn(*p, ref, sha1))
133                         had_error = 1;
134         }
135         return had_error;
136 }
137
138 static int delete_tag(const char *name, const char *ref,
139                                 const unsigned char *sha1)
140 {
141         if (delete_ref(ref, sha1, 0))
142                 return 1;
143         printf("Deleted tag '%s'\n", name);
144         return 0;
145 }
146
147 static int verify_tag(const char *name, const char *ref,
148                                 const unsigned char *sha1)
149 {
150         const char *argv_verify_tag[] = {"git-verify-tag",
151                                         "-v", "SHA1_HEX", NULL};
152         argv_verify_tag[2] = sha1_to_hex(sha1);
153
154         if (run_command_v_opt(argv_verify_tag, 0))
155                 return error("could not verify the tag '%s'", name);
156         return 0;
157 }
158
159 static int do_sign(struct strbuf *buffer)
160 {
161         struct child_process gpg;
162         const char *args[4];
163         char *bracket;
164         int len;
165         int i, j;
166
167         if (!*signingkey) {
168                 if (strlcpy(signingkey, git_committer_info(IDENT_ERROR_ON_NO_NAME),
169                                 sizeof(signingkey)) > sizeof(signingkey) - 1)
170                         return error("committer info too long.");
171                 bracket = strchr(signingkey, '>');
172                 if (bracket)
173                         bracket[1] = '\0';
174         }
175
176         /* When the username signingkey is bad, program could be terminated
177          * because gpg exits without reading and then write gets SIGPIPE. */
178         signal(SIGPIPE, SIG_IGN);
179
180         memset(&gpg, 0, sizeof(gpg));
181         gpg.argv = args;
182         gpg.in = -1;
183         gpg.out = -1;
184         args[0] = "gpg";
185         args[1] = "-bsau";
186         args[2] = signingkey;
187         args[3] = NULL;
188
189         if (start_command(&gpg))
190                 return error("could not run gpg.");
191
192         if (write_in_full(gpg.in, buffer->buf, buffer->len) != buffer->len) {
193                 close(gpg.in);
194                 close(gpg.out);
195                 finish_command(&gpg);
196                 return error("gpg did not accept the tag data");
197         }
198         close(gpg.in);
199         len = strbuf_read(buffer, gpg.out, 1024);
200         close(gpg.out);
201
202         if (finish_command(&gpg) || !len || len < 0)
203                 return error("gpg failed to sign the tag");
204
205         /* Strip CR from the line endings, in case we are on Windows. */
206         for (i = j = 0; i < buffer->len; i++)
207                 if (buffer->buf[i] != '\r') {
208                         if (i != j)
209                                 buffer->buf[j] = buffer->buf[i];
210                         j++;
211                 }
212         strbuf_setlen(buffer, j);
213
214         return 0;
215 }
216
217 static const char tag_template[] =
218         "\n"
219         "#\n"
220         "# Write a tag message\n"
221         "#\n";
222
223 static void set_signingkey(const char *value)
224 {
225         if (strlcpy(signingkey, value, sizeof(signingkey)) >= sizeof(signingkey))
226                 die("signing key value too long (%.10s...)", value);
227 }
228
229 static int git_tag_config(const char *var, const char *value, void *cb)
230 {
231         if (!strcmp(var, "user.signingkey")) {
232                 if (!value)
233                         return config_error_nonbool(var);
234                 set_signingkey(value);
235                 return 0;
236         }
237
238         return git_default_config(var, value, cb);
239 }
240
241 static void write_tag_body(int fd, const unsigned char *sha1)
242 {
243         unsigned long size;
244         enum object_type type;
245         char *buf, *sp, *eob;
246         size_t len;
247
248         buf = read_sha1_file(sha1, &type, &size);
249         if (!buf)
250                 return;
251         /* skip header */
252         sp = strstr(buf, "\n\n");
253
254         if (!sp || !size || type != OBJ_TAG) {
255                 free(buf);
256                 return;
257         }
258         sp += 2; /* skip the 2 LFs */
259         eob = strstr(sp, "\n" PGP_SIGNATURE "\n");
260         if (eob)
261                 len = eob - sp;
262         else
263                 len = buf + size - sp;
264         write_or_die(fd, sp, len);
265
266         free(buf);
267 }
268
269 static int build_tag_object(struct strbuf *buf, int sign, unsigned char *result)
270 {
271         if (sign && do_sign(buf) < 0)
272                 return error("unable to sign the tag");
273         if (write_sha1_file(buf->buf, buf->len, tag_type, result) < 0)
274                 return error("unable to write tag file");
275         return 0;
276 }
277
278 static void create_tag(const unsigned char *object, const char *tag,
279                        struct strbuf *buf, int message, int sign,
280                        unsigned char *prev, unsigned char *result)
281 {
282         enum object_type type;
283         char header_buf[1024];
284         int header_len;
285         char *path = NULL;
286
287         type = sha1_object_info(object, NULL);
288         if (type <= OBJ_NONE)
289             die("bad object type.");
290
291         header_len = snprintf(header_buf, sizeof(header_buf),
292                           "object %s\n"
293                           "type %s\n"
294                           "tag %s\n"
295                           "tagger %s\n\n",
296                           sha1_to_hex(object),
297                           typename(type),
298                           tag,
299                           git_committer_info(IDENT_ERROR_ON_NO_NAME));
300
301         if (header_len > sizeof(header_buf) - 1)
302                 die("tag header too big.");
303
304         if (!message) {
305                 int fd;
306
307                 /* write the template message before editing: */
308                 path = git_pathdup("TAG_EDITMSG");
309                 fd = open(path, O_CREAT | O_TRUNC | O_WRONLY, 0600);
310                 if (fd < 0)
311                         die("could not create file '%s': %s",
312                                                 path, strerror(errno));
313
314                 if (!is_null_sha1(prev))
315                         write_tag_body(fd, prev);
316                 else
317                         write_or_die(fd, tag_template, strlen(tag_template));
318                 close(fd);
319
320                 if (launch_editor(path, buf, NULL)) {
321                         fprintf(stderr,
322                         "Please supply the message using either -m or -F option.\n");
323                         exit(1);
324                 }
325         }
326
327         stripspace(buf, 1);
328
329         if (!message && !buf->len)
330                 die("no tag message?");
331
332         strbuf_insert(buf, 0, header_buf, header_len);
333
334         if (build_tag_object(buf, sign, result) < 0) {
335                 if (path)
336                         fprintf(stderr, "The tag message has been left in %s\n",
337                                 path);
338                 exit(128);
339         }
340         if (path) {
341                 unlink(path);
342                 free(path);
343         }
344 }
345
346 struct msg_arg {
347         int given;
348         struct strbuf buf;
349 };
350
351 static int parse_msg_arg(const struct option *opt, const char *arg, int unset)
352 {
353         struct msg_arg *msg = opt->value;
354
355         if (!arg)
356                 return -1;
357         if (msg->buf.len)
358                 strbuf_addstr(&(msg->buf), "\n\n");
359         strbuf_addstr(&(msg->buf), arg);
360         msg->given = 1;
361         return 0;
362 }
363
364 int cmd_tag(int argc, const char **argv, const char *prefix)
365 {
366         struct strbuf buf = STRBUF_INIT;
367         unsigned char object[20], prev[20];
368         char ref[PATH_MAX];
369         const char *object_ref, *tag;
370         struct ref_lock *lock;
371
372         int annotate = 0, sign = 0, force = 0, lines = -1,
373                 list = 0, delete = 0, verify = 0;
374         const char *msgfile = NULL, *keyid = NULL;
375         struct msg_arg msg = { 0, STRBUF_INIT };
376         struct commit_list *with_commit = NULL;
377         struct option options[] = {
378                 OPT_BOOLEAN('l', NULL, &list, "list tag names"),
379                 { OPTION_INTEGER, 'n', NULL, &lines, NULL,
380                                 "print n lines of each tag message",
381                                 PARSE_OPT_OPTARG, NULL, 1 },
382                 OPT_BOOLEAN('d', NULL, &delete, "delete tags"),
383                 OPT_BOOLEAN('v', NULL, &verify, "verify tags"),
384
385                 OPT_GROUP("Tag creation options"),
386                 OPT_BOOLEAN('a', NULL, &annotate,
387                                         "annotated tag, needs a message"),
388                 OPT_CALLBACK('m', NULL, &msg, "msg",
389                              "message for the tag", parse_msg_arg),
390                 OPT_STRING('F', NULL, &msgfile, "file", "message in a file"),
391                 OPT_BOOLEAN('s', NULL, &sign, "annotated and GPG-signed tag"),
392                 OPT_STRING('u', NULL, &keyid, "key-id",
393                                         "use another key to sign the tag"),
394                 OPT_BOOLEAN('f', NULL, &force, "replace the tag if exists"),
395
396                 OPT_GROUP("Tag listing options"),
397                 {
398                         OPTION_CALLBACK, 0, "contains", &with_commit, "commit",
399                         "print only tags that contain the commit",
400                         PARSE_OPT_LASTARG_DEFAULT,
401                         parse_opt_with_commit, (intptr_t)"HEAD",
402                 },
403                 OPT_END()
404         };
405
406         git_config(git_tag_config, NULL);
407
408         argc = parse_options(argc, argv, options, git_tag_usage, 0);
409         msgfile = parse_options_fix_filename(prefix, msgfile);
410
411         if (keyid) {
412                 sign = 1;
413                 set_signingkey(keyid);
414         }
415         if (sign)
416                 annotate = 1;
417         if (argc == 0 && !(delete || verify))
418                 list = 1;
419
420         if ((annotate || msg.given || msgfile || force) &&
421             (list || delete || verify))
422                 usage_with_options(git_tag_usage, options);
423
424         if (list + delete + verify > 1)
425                 usage_with_options(git_tag_usage, options);
426         if (list)
427                 return list_tags(argv[0], lines == -1 ? 0 : lines,
428                                  with_commit);
429         if (lines != -1)
430                 die("-n option is only allowed with -l.");
431         if (with_commit)
432                 die("--contains option is only allowed with -l.");
433         if (delete)
434                 return for_each_tag_name(argv, delete_tag);
435         if (verify)
436                 return for_each_tag_name(argv, verify_tag);
437
438         if (msg.given || msgfile) {
439                 if (msg.given && msgfile)
440                         die("only one -F or -m option is allowed.");
441                 annotate = 1;
442                 if (msg.given)
443                         strbuf_addbuf(&buf, &(msg.buf));
444                 else {
445                         if (!strcmp(msgfile, "-")) {
446                                 if (strbuf_read(&buf, 0, 1024) < 0)
447                                         die("cannot read %s", msgfile);
448                         } else {
449                                 if (strbuf_read_file(&buf, msgfile, 1024) < 0)
450                                         die("could not open or read '%s': %s",
451                                                 msgfile, strerror(errno));
452                         }
453                 }
454         }
455
456         tag = argv[0];
457
458         object_ref = argc == 2 ? argv[1] : "HEAD";
459         if (argc > 2)
460                 die("too many params");
461
462         if (get_sha1(object_ref, object))
463                 die("Failed to resolve '%s' as a valid ref.", object_ref);
464
465         if (snprintf(ref, sizeof(ref), "refs/tags/%s", tag) > sizeof(ref) - 1)
466                 die("tag name too long: %.*s...", 50, tag);
467         if (check_ref_format(ref))
468                 die("'%s' is not a valid tag name.", tag);
469
470         if (!resolve_ref(ref, prev, 1, NULL))
471                 hashclr(prev);
472         else if (!force)
473                 die("tag '%s' already exists", tag);
474
475         if (annotate)
476                 create_tag(object, tag, &buf, msg.given || msgfile,
477                            sign, prev, object);
478
479         lock = lock_any_ref_for_update(ref, prev, 0);
480         if (!lock)
481                 die("%s: cannot lock the ref", ref);
482         if (write_ref_sha1(lock, object, NULL) < 0)
483                 die("%s: cannot update the ref", ref);
484
485         strbuf_release(&buf);
486         return 0;
487 }