1#!/bin/sh
2# 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.
5GIT_DIR=$(git rev-parse --git-dir 2>/dev/null) || :;
6get_data_source () {
8 case "$1" in
9 */*)
10 echo ''
11 ;;
12 .)
13 echo self
14 ;;
15 *)
16 if test "$(git config --get "remote.$1.url")"
17 then
18 echo config
19 elif 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}
30get_remote_url () {
32 data_source=$(get_data_source "$1")
33 case "$data_source" in
34 '')
35 echo "$1"
36 ;;
37 self)
38 echo "$1"
39 ;;
40 config)
41 git config --get "remote.$1.url"
42 ;;
43 remotes)
44 sed -ne '/^URL: */{
45 s///p
46 q
47 }' "$GIT_DIR/remotes/$1"
48 ;;
49 branches)
50 sed -e 's/#.*//' "$GIT_DIR/branches/$1"
51 ;;
52 *)
53 die "internal error: get-remote-url $1" ;;
54 esac
55}
56get_default_remote () {
58 curr_branch=$(git symbolic-ref -q HEAD | sed -e 's|^refs/heads/||')
59 origin=$(git config --get "branch.$curr_branch.remote")
60 echo ${origin:-origin}
61}
62get_remote_default_refs_for_push () {
64 data_source=$(get_data_source "$1")
65 case "$data_source" in
66 '' | branches | self)
67 ;; # no default push mapping, just send matching refs.
68 config)
69 git config --get-all "remote.$1.push" ;;
70 remotes)
71 sed -ne '/^Push: */{
72 s///p
73 }' "$GIT_DIR/remotes/$1" ;;
74 *)
75 die "internal error: get-remote-default-ref-for-push $1" ;;
76 esac
77}
78# Called from canon_refs_list_for_fetch -d "$remote", which
80# is called from get_remote_default_refs_for_fetch to grok
81# refspecs that are retrieved from the configuration, but not
82# from get_remote_refs_for_fetch when it deals with refspecs
83# supplied on the command line. $ls_remote_result has the list
84# of refs available at remote.
85#
86# The first token returned is either "explicit" or "glob"; this
87# is to help prevent randomly "globbed" ref from being chosen as
88# a merge candidate
89expand_refs_wildcard () {
90 echo "$ls_remote_result" |
91 git fetch--tool expand-refs-wildcard "-" "$@"
92}
93# Subroutine to canonicalize remote:local notation.
95canon_refs_list_for_fetch () {
96 # If called from get_remote_default_refs_for_fetch
97 # leave the branches in branch.${curr_branch}.merge alone,
98 # or the first one otherwise; add prefix . to the rest
99 # to prevent the secondary branches to be merged by default.
100 merge_branches=
101 curr_branch=
102 if test "$1" = "-d"
103 then
104 shift ; remote="$1" ; shift
105 set $(expand_refs_wildcard "$remote" "$@")
106 is_explicit="$1"
107 shift
108 if test "$remote" = "$(get_default_remote)"
109 then
110 curr_branch=$(git symbolic-ref -q HEAD | \
111 sed -e 's|^refs/heads/||')
112 merge_branches=$(git config \
113 --get-all "branch.${curr_branch}.merge")
114 fi
115 if test -z "$merge_branches" && test $is_explicit != explicit
116 then
117 merge_branches=..this.will.never.match.any.ref..
118 fi
119 fi
120 for ref
121 do
122 force=
123 case "$ref" in
124 +*)
125 ref=$(expr "z$ref" : 'z+\(.*\)')
126 force=+
127 ;;
128 esac
129 expr "z$ref" : 'z.*:' >/dev/null || ref="${ref}:"
130 remote=$(expr "z$ref" : 'z\([^:]*\):')
131 local=$(expr "z$ref" : 'z[^:]*:\(.*\)')
132 dot_prefix=.
133 if test -z "$merge_branches"
134 then
135 merge_branches=$remote
136 dot_prefix=
137 else
138 for merge_branch in $merge_branches
139 do
140 [ "$remote" = "$merge_branch" ] &&
141 dot_prefix= && break
142 done
143 fi
144 case "$remote" in
145 '' | HEAD ) remote=HEAD ;;
146 refs/*) ;;
147 heads/* | tags/* | remotes/* ) remote="refs/$remote" ;;
148 *) remote="refs/heads/$remote" ;;
149 esac
150 case "$local" in
151 '') local= ;;
152 refs/*) ;;
153 heads/* | tags/* | remotes/* ) local="refs/$local" ;;
154 *) local="refs/heads/$local" ;;
155 esac
156 if local_ref_name=$(expr "z$local" : 'zrefs/\(.*\)')
158 then
159 git check-ref-format "$local_ref_name" ||
160 die "* refusing to create funny ref '$local_ref_name' locally"
161 fi
162 echo "${dot_prefix}${force}${remote}:${local}"
163 done
164}
165# Returns list of src: (no store), or src:dst (store)
167get_remote_default_refs_for_fetch () {
168 data_source=$(get_data_source "$1")
169 case "$data_source" in
170 '')
171 echo "HEAD:" ;;
172 self)
173 canon_refs_list_for_fetch -d "$1" \
174 $(git for-each-ref --format='%(refname):')
175 ;;
176 config)
177 canon_refs_list_for_fetch -d "$1" \
178 $(git config --get-all "remote.$1.fetch") ;;
179 branches)
180 remote_branch=$(sed -ne '/#/s/.*#//p' "$GIT_DIR/branches/$1")
181 case "$remote_branch" in '') remote_branch=master ;; esac
182 echo "refs/heads/${remote_branch}:refs/heads/$1"
183 ;;
184 remotes)
185 canon_refs_list_for_fetch -d "$1" $(sed -ne '/^Pull: */{
186 s///p
187 }' "$GIT_DIR/remotes/$1")
188 ;;
189 *)
190 die "internal error: get-remote-default-ref-for-fetch $1" ;;
191 esac
192}
193get_remote_refs_for_push () {
195 case "$#" in
196 0) die "internal error: get-remote-refs-for-push." ;;
197 1) get_remote_default_refs_for_push "$@" ;;
198 *) shift; echo "$@" ;;
199 esac
200}
201get_remote_refs_for_fetch () {
203 case "$#" in
204 0)
205 die "internal error: get-remote-refs-for-fetch." ;;
206 1)
207 get_remote_default_refs_for_fetch "$@" ;;
208 *)
209 shift
210 tag_just_seen=
211 for ref
212 do
213 if test "$tag_just_seen"
214 then
215 echo "refs/tags/${ref}:refs/tags/${ref}"
216 tag_just_seen=
217 continue
218 else
219 case "$ref" in
220 tag)
221 tag_just_seen=yes
222 continue
223 ;;
224 esac
225 fi
226 canon_refs_list_for_fetch "$ref"
227 done
228 ;;
229 esac
230}
231resolve_alternates () {
233 # original URL (xxx.git)
234 top_=`expr "z$1" : 'z\([^:]*:/*[^/]*\)/'`
235 while read path
236 do
237 case "$path" in
238 \#* | '')
239 continue ;;
240 /*)
241 echo "$top_$path/" ;;
242 ../*)
243 # relative -- ugly but seems to work.
244 echo "$1/objects/$path/" ;;
245 *)
246 # exit code may not be caught by the reader.
247 echo "bad alternate: $path"
248 exit 1 ;;
249 esac
250 done
251}
252get_uploadpack () {
254 data_source=$(get_data_source "$1")
255 case "$data_source" in
256 config)
257 uplp=$(git config --get "remote.$1.uploadpack")
258 echo ${uplp:-git-upload-pack}
259 ;;
260 *)
261 echo "git-upload-pack"
262 ;;
263 esac
264}