Andrew's git - gitweb.git/blob

   1#!/bin/sh
   2# Copyright (c) 2005 Linus Torvalds
   3
   4. git-sh-setup || die "Not a git archive"
   5
   6usage () {
   7    echo >&2 "Usage: git-tag [-a | -s | -u <key-id>] [-f] [-m <msg>] <tagname> [<head>]"
   8    exit 1
   9}
  10
  11annotate=
  12signed=
  13force=
  14message=
  15username=
  16while case "$#" in 0) break ;; esac
  17do
  18    case "$1" in
  19    -a)
  20        annotate=1
  21        ;;
  22    -s)
  23        annotate=1
  24        signed=1
  25        ;;
  26    -f)
  27        force=1
  28        ;;
  29    -m)
  30        annotate=1
  31        shift
  32        message="$1"
  33        ;;
  34    -u)
  35        annotate=1
  36        signed=1
  37        shift
  38        username="$1"
  39        ;;
  40    -*)
  41        usage
  42        ;;
  43    *)
  44        break
  45        ;;
  46    esac
  47    shift
  48done
  49
  50name="$1"
  51[ "$name" ] || usage
  52if [ -e "$GIT_DIR/refs/tags/$name" -a -z "$force" ]; then
  53    die "tag '$name' already exists"
  54fi
  55shift
  56git-check-ref-format "tags/$name" ||
  57        die "we do not like '$name' as a tag name."
  58
  59object=$(git-rev-parse --verify --default HEAD "$@") || exit 1
  60type=$(git-cat-file -t $object) || exit 1
  61tagger=$(git-var GIT_COMMITTER_IDENT) || exit 1
  62: ${username:=$(expr "$tagger" : '\(.*>\)')}
  63
  64trap 'rm -f "$GIT_DIR"/TAG_TMP* "$GIT_DIR"/TAG_FINALMSG "$GIT_DIR"/TAG_EDITMSG' 0
  65
  66if [ "$annotate" ]; then
  67    if [ -z "$message" ]; then
  68        ( echo "#"
  69          echo "# Write a tag message"
  70          echo "#" ) > "$GIT_DIR"/TAG_EDITMSG
  71        ${VISUAL:-${EDITOR:-vi}} "$GIT_DIR"/TAG_EDITMSG || exit
  72    else
  73        echo "$message" >"$GIT_DIR"/TAG_EDITMSG
  74    fi
  75
  76    grep -v '^#' <"$GIT_DIR"/TAG_EDITMSG |
  77    git-stripspace >"$GIT_DIR"/TAG_FINALMSG
  78
  79    [ -s "$GIT_DIR"/TAG_FINALMSG ] || {
  80        echo >&2 "No tag message?"
  81        exit 1
  82    }
  83
  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."
  91    fi
  92    object=$(git-mktag < "$GIT_DIR"/TAG_TMP)
  93fi
  94
  95leading=`expr "refs/tags/$name" : '\(.*\)/'` &&
  96mkdir -p "$GIT_DIR/$leading" &&
  97echo $object > "$GIT_DIR/refs/tags/$name"