Andrew's git - gitweb.git/blob - git-parse-remote.sh

   1#!/bin/sh
   2
   3. git-sh-setup || die "Not a git archive"
   4
   5get_data_source () {
   6        case "$1" in
   7        */*)
   8                # Not so fast.  This could be the partial URL shorthand...
   9                token=$(expr "$1" : '\([^/]*\)/')
  10                remainder=$(expr "$1" : '[^/]*/\(.*\)')
  11                if test -f "$GIT_DIR/branches/$token"
  12                then
  13                        echo branches-partial
  14                else
  15                        echo ''
  16                fi
  17                ;;
  18        *)
  19                if test -f "$GIT_DIR/remotes/$1"
  20                then
  21                        echo remotes
  22                elif test -f "$GIT_DIR/branches/$1"
  23                then
  24                        echo branches
  25                else
  26                        echo ''
  27                fi ;;
  28        esac
  29}
  30
  31get_remote_url () {
  32        data_source=$(get_data_source "$1")
  33        case "$data_source" in
  34        '')
  35                echo "$1" ;;
  36        remotes)
  37                sed -ne '/^URL: */{
  38                        s///p
  39                        q
  40                }' "$GIT_DIR/remotes/$1" ;;
  41        branches)
  42                sed -e 's/#.*//' "$GIT_DIR/branches/$1" ;;
  43        branches-partial)
  44                token=$(expr "$1" : '\([^/]*\)/')
  45                remainder=$(expr "$1" : '[^/]*/\(.*\)')
  46                url=$(sed -e 's/#.*//' "$GIT_DIR/branches/$token")
  47                echo "$url/$remainder"
  48                ;;
  49        *)
  50                die "internal error: get-remote-url $1" ;;
  51        esac
  52}
  53
  54get_remote_default_refs_for_push () {
  55        data_source=$(get_data_source "$1")
  56        case "$data_source" in
  57        '' | branches | branches-partial)
  58                ;; # no default push mapping, just send matching refs.
  59        remotes)
  60                sed -ne '/^Push: */{
  61                        s///p
  62                }' "$GIT_DIR/remotes/$1" ;;
  63        *)
  64                die "internal error: get-remote-default-ref-for-push $1" ;;
  65        esac
  66}
  67
  68# Subroutine to canonicalize remote:local notation.
  69canon_refs_list_for_fetch () {
  70        # Leave only the first one alone; add prefix . to the rest
  71        # to prevent the secondary branches to be merged by default.
  72        dot_prefix=
  73        for ref
  74        do
  75                force=
  76                case "$ref" in
  77                +*)
  78                        ref=$(expr "$ref" : '\+\(.*\)')
  79                        force=+
  80                        ;;
  81                esac
  82                expr "$ref" : '.*:' >/dev/null || ref="${ref}:"
  83                remote=$(expr "$ref" : '\([^:]*\):')
  84                local=$(expr "$ref" : '[^:]*:\(.*\)')
  85                case "$remote" in
  86                '') remote=HEAD ;;
  87                refs/heads/* | refs/tags/*) ;;
  88                heads/* | tags/* ) remote="refs/$remote" ;;
  89                *) remote="refs/heads/$remote" ;;
  90                esac
  91                case "$local" in
  92                '') local= ;;
  93                refs/heads/* | refs/tags/*) ;;
  94                heads/* | tags/* ) local="refs/$local" ;;
  95                *) local="refs/heads/$local" ;;
  96                esac
  97                echo "${dot_prefix}${force}${remote}:${local}"
  98                dot_prefix=.
  99        done
 100}
 101
 102# Returns list of src: (no store), or src:dst (store)
 103get_remote_default_refs_for_fetch () {
 104        data_source=$(get_data_source "$1")
 105        case "$data_source" in
 106        '' | branches-partial)
 107                echo "HEAD:" ;;
 108        branches)
 109                remote_branch=$(sed -ne '/#/s/.*#//p' "$GIT_DIR/branches/$1")
 110                case "$remote_branch" in '') remote_branch=master ;; esac
 111                echo "refs/heads/${remote_branch}:refs/heads/$1"
 112                ;;
 113        remotes)
 114                # This prefixes the second and later default refspecs
 115                # with a '.', to signal git-fetch to mark them
 116                # not-for-merge.
 117                canon_refs_list_for_fetch $(sed -ne '/^Pull: */{
 118                                                s///p
 119                                        }' "$GIT_DIR/remotes/$1")
 120                ;;
 121        *)
 122                die "internal error: get-remote-default-ref-for-push $1" ;;
 123        esac
 124}
 125
 126get_remote_refs_for_push () {
 127        case "$#" in
 128        0) die "internal error: get-remote-refs-for-push." ;;
 129        1) get_remote_default_refs_for_push "$@" ;;
 130        *) shift; echo "$@" ;;
 131        esac
 132}
 133
 134get_remote_refs_for_fetch () {
 135        case "$#" in
 136        0)
 137            die "internal error: get-remote-refs-for-fetch." ;;
 138        1)
 139            get_remote_default_refs_for_fetch "$@" ;;
 140        *)
 141            shift
 142            tag_just_seen=
 143            for ref
 144            do
 145                if test "$tag_just_seen"
 146                then
 147                    echo "refs/tags/${ref}:refs/tags/${ref}"
 148                    tag_just_seen=
 149                    continue
 150                else
 151                    case "$ref" in
 152                    tag)
 153                        tag_just_seen=yes
 154                        continue
 155                        ;;
 156                    esac
 157                fi
 158                canon_refs_list_for_fetch "$ref"
 159            done
 160            ;;
 161        esac
 162}
 163
 164resolve_alternates () {
 165        # original URL (xxx.git)
 166        top_=`expr "$1" : '\([^:]*:/*[^/]*\)/'`
 167        while read path
 168        do
 169                case "$path" in
 170                \#* | '')
 171                        continue ;;
 172                /*)
 173                        echo "$top_$path/" ;;
 174                ../*)
 175                        # relative -- ugly but seems to work.
 176                        echo "$1/objects/$path/" ;;
 177                *)
 178                        # exit code may not be caught by the reader.
 179                        echo "bad alternate: $path"
 180                        exit 1 ;;
 181                esac
 182        done
 183}