[PATCH] Retire git-parse-remote.
[git] / git-parse-remote-script
1 #!/bin/sh
2
3 . git-sh-setup-script || die "Not a git archive"
4
5 get_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
31 get_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
54 get_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
69 canon_refs_list_for_fetch () {
70         for ref
71         do
72                 expr "$ref" : '.*:' >/dev/null || ref="${ref}:"
73                 remote=$(expr "$ref" : '\([^:]*\):')
74                 local=$(expr "$ref" : '[^:]*:\(.*\)')
75                 case "$remote" in
76                 '') remote=HEAD ;;
77                 *) remote="refs/heads/$remote" ;;
78                 esac
79                 case "$local" in
80                 '') local= ;;
81                 *) local="refs/heads/$local" ;;
82                 esac
83                 echo "${remote}:${local}"
84         done
85 }
86
87 # Returns list of src: (no store), or src:dst (store)
88 get_remote_default_refs_for_fetch () {
89         data_source=$(get_data_source "$1")
90         case "$data_source" in
91         '' | branches-partial)
92                 echo "HEAD:" ;;
93         branches)
94                 remote_branch=$(sed -ne '/#/s/.*#//p' "$GIT_DIR/branches/$1")
95                 case "$remote_branch" in '') remote_branch=master ;; esac
96                 echo "refs/heads/${remote_branch}:refs/heads/$1"
97                 ;;
98         remotes)
99                 canon_refs_list_for_fetch $(sed -ne '/^Pull: */{
100                                                 s///p
101                                         }' "$GIT_DIR/remotes/$1")
102                 ;;
103         *)
104                 die "internal error: get-remote-default-ref-for-push $1" ;;
105         esac
106 }
107
108 get_remote_refs_for_push () {
109         case "$#" in
110         0) die "internal error: get-remote-refs-for-push." ;;
111         1) get_remote_default_refs_for_push "$@" ;;
112         *) shift; echo "$@" ;;
113         esac
114 }
115
116 get_remote_refs_for_fetch () {
117         case "$#" in
118         0)
119             die "internal error: get-remote-refs-for-fetch." ;;
120         1)
121             get_remote_default_refs_for_fetch "$@" ;;
122         *)
123             shift
124             tag_just_seen=
125             for ref
126             do
127                 if test "$tag_just_seen"
128                 then
129                     echo "refs/tags/${ref}:refs/tags/${ref}"
130                     tag_just_seen=
131                     continue
132                 else
133                     case "$ref" in
134                     tag)
135                         tag_just_seen=yes
136                         continue
137                         ;;
138                     esac
139                 fi
140                 canon_refs_list_for_fetch "$ref"
141             done
142             ;;
143         esac
144 }