]> git.ipfire.org Git - thirdparty/git.git/blob - git-tag-script
[PATCH] Make curl fail on server error
[thirdparty/git.git] / git-tag-script
1 #!/bin/sh
2 # Copyright (c) 2005 Linus Torvalds
3
4 . git-sh-setup-script || die "Not a git archive"
5
6 usage () {
7 echo >&2 "Usage: git-tag-script [-a | -s] [-f] tagname"
8 exit 1
9 }
10
11 annotate=
12 signed=
13 force=
14 while case "$#" in 0) break ;; esac
15 do
16 case "$1" in
17 -a)
18 annotate=1
19 ;;
20 -s)
21 annotate=1
22 signed=1
23 ;;
24 -f)
25 force=1
26 ;;
27 -*)
28 usage
29 ;;
30 *)
31 break
32 ;;
33 esac
34 shift
35 done
36
37 name="$1"
38 [ "$name" ] || usage
39 if [ -e "$GIT_DIR/refs/tags/$name" -a -z "$force" ]; then
40 die "tag '$name' already exists"
41 fi
42 shift
43
44 object=$(git-rev-parse --verify --revs-only --default HEAD "$@") || exit 1
45 type=$(git-cat-file -t $object) || exit 1
46 tagger=$(git-var GIT_COMMITTER_IDENT) || exit 1
47
48 trap 'rm -f .tmp-tag* .tagmsg .editmsg' 0
49
50 if [ "$annotate" ]; then
51 ( echo "#"
52 echo "# Write a tag message"
53 echo "#" ) > .editmsg
54 ${VISUAL:-${EDITOR:-vi}} .editmsg || exit
55
56 grep -v '^#' < .editmsg | git-stripspace > .tagmsg
57
58 [ -s .tagmsg ] || exit
59
60 ( echo -e "object $object\ntype $type\ntag $name\ntagger $tagger\n"; cat .tagmsg ) > .tmp-tag
61 rm -f .tmp-tag.asc .tagmsg
62 if [ "$signed" ]; then
63 me=$(expr "$tagger" : '\(.*>\)') &&
64 gpg -bsa -u "$me" .tmp-tag &&
65 cat .tmp-tag.asc >>.tmp-tag ||
66 die "failed to sign the tag with GPG."
67 fi
68 object=$(git-mktag < .tmp-tag)
69 fi
70
71 mkdir -p "$GIT_DIR/refs/tags"
72 echo $object > "$GIT_DIR/refs/tags/$name"