git-parse-remote.sh

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