2 # Copyright (c) 2005 Linus Torvalds
4 . git-sh-setup || die
"Not a git archive"
7 echo >&2 "Usage: git-tag [-a | -s | -u <key-id>] [-f] [-m <msg>] <tagname> [<head>]"
16 while case "$#" in 0) break ;; esac
52 if [ -e "$GIT_DIR/refs/tags/$name" -a -z "$force" ]; then
53 die
"tag '$name' already exists"
56 git-check-ref-format
"tags/$name" ||
57 die
"we do not like '$name' as a tag name."
59 object
=$
(git-rev-parse
--verify --default HEAD
"$@") ||
exit 1
60 type=$
(git-cat-file
-t $object) ||
exit 1
61 tagger
=$
(git-var GIT_COMMITTER_IDENT
) ||
exit 1
62 : ${username:=$(expr "$tagger" : '\(.*>\)')}
64 trap 'rm -f "$GIT_DIR"/TAG_TMP* "$GIT_DIR"/TAG_FINALMSG "$GIT_DIR"/TAG_EDITMSG' 0
66 if [ "$annotate" ]; then
67 if [ -z "$message" ]; then
69 echo "# Write a tag message"
70 echo "#" ) > "$GIT_DIR"/TAG_EDITMSG
71 ${VISUAL:-${EDITOR:-vi}} "$GIT_DIR"/TAG_EDITMSG ||
exit
73 echo "$message" >"$GIT_DIR"/TAG_EDITMSG
76 grep -v '^#' <"$GIT_DIR"/TAG_EDITMSG |
77 git-stripspace
>"$GIT_DIR"/TAG_FINALMSG
79 [ -s "$GIT_DIR"/TAG_FINALMSG
] ||
{
80 echo >&2 "No tag message?"
84 ( echo -e "object $object\ntype $type\ntag $name\ntagger $tagger\n";
85 cat "$GIT_DIR"/TAG_FINALMSG
) >"$GIT_DIR"/TAG_TMP
86 rm -f "$GIT_DIR"/TAG_TMP.asc
"$GIT_DIR"/TAG_FINALMSG
87 if [ "$signed" ]; then
88 gpg
-bsa -u "$username" "$GIT_DIR"/TAG_TMP
&&
89 cat "$GIT_DIR"/TAG_TMP.asc
>>"$GIT_DIR"/TAG_TMP ||
90 die
"failed to sign the tag with GPG."
92 object
=$
(git-mktag
< "$GIT_DIR"/TAG_TMP
)
95 leading
=`expr "refs/tags/$name" : '\(.*\)/'` &&
96 mkdir
-p "$GIT_DIR/$leading" &&
97 echo $object > "$GIT_DIR/refs/tags/$name"