]>
Commit | Line | Data |
---|---|---|
1 | #!/bin/sh | |
2 | # | |
3 | # Copyright (c) 2005, Linus Torvalds | |
4 | # Copyright (c) 2005, Junio C Hamano | |
5 | # | |
6 | # Clone a repository into a different directory that does not yet exist. | |
7 | ||
8 | # See git-sh-setup why. | |
9 | unset CDPATH | |
10 | ||
11 | usage() { | |
12 | echo >&2 "* git clone [-l [-s]] [-q] [-u <upload-pack>] [-n] <repo> <dir>" | |
13 | exit 1 | |
14 | } | |
15 | ||
16 | get_repo_base() { | |
17 | (cd "$1" && (cd .git ; pwd)) 2> /dev/null | |
18 | } | |
19 | ||
20 | if [ -n "$GIT_SSL_NO_VERIFY" ]; then | |
21 | curl_extra_args="-k" | |
22 | fi | |
23 | ||
24 | http_fetch () { | |
25 | # $1 = Remote, $2 = Local | |
26 | curl -nsf $curl_extra_args "$1" >"$2" | |
27 | } | |
28 | ||
29 | clone_dumb_http () { | |
30 | # $1 - remote, $2 - local | |
31 | cd "$2" && | |
32 | clone_tmp='.git/clone-tmp' && | |
33 | mkdir -p "$clone_tmp" || exit 1 | |
34 | http_fetch "$1/info/refs" "$clone_tmp/refs" && | |
35 | http_fetch "$1/objects/info/packs" "$clone_tmp/packs" || { | |
36 | echo >&2 "Cannot get remote repository information. | |
37 | Perhaps git-update-server-info needs to be run there?" | |
38 | exit 1; | |
39 | } | |
40 | while read type name | |
41 | do | |
42 | case "$type" in | |
43 | P) ;; | |
44 | *) continue ;; | |
45 | esac && | |
46 | ||
47 | idx=`expr "$name" : '\(.*\)\.pack'`.idx | |
48 | http_fetch "$1/objects/pack/$name" ".git/objects/pack/$name" && | |
49 | http_fetch "$1/objects/pack/$idx" ".git/objects/pack/$idx" && | |
50 | git-verify-pack ".git/objects/pack/$idx" || exit 1 | |
51 | done <"$clone_tmp/packs" | |
52 | ||
53 | while read sha1 refname | |
54 | do | |
55 | name=`expr "$refname" : 'refs/\(.*\)'` && | |
56 | case "$name" in | |
57 | *^*) ;; | |
58 | *) | |
59 | git-http-fetch -v -a -w "$name" "$name" "$1/" || exit 1 | |
60 | esac | |
61 | done <"$clone_tmp/refs" | |
62 | rm -fr "$clone_tmp" | |
63 | } | |
64 | ||
65 | quiet= | |
66 | use_local=no | |
67 | local_shared=no | |
68 | no_checkout= | |
69 | upload_pack= | |
70 | while | |
71 | case "$#,$1" in | |
72 | 0,*) break ;; | |
73 | *,-n) no_checkout=yes ;; | |
74 | *,-l|*,--l|*,--lo|*,--loc|*,--loca|*,--local) use_local=yes ;; | |
75 | *,-s|*,--s|*,--sh|*,--sha|*,--shar|*,--share|*,--shared) | |
76 | local_shared=yes ;; | |
77 | *,-q|*,--quiet) quiet=-q ;; | |
78 | 1,-u|1,--upload-pack) usage ;; | |
79 | *,-u|*,--upload-pack) | |
80 | shift | |
81 | upload_pack="--exec=$1" ;; | |
82 | *,-*) usage ;; | |
83 | *) break ;; | |
84 | esac | |
85 | do | |
86 | shift | |
87 | done | |
88 | ||
89 | # Turn the source into an absolute path if | |
90 | # it is local | |
91 | repo="$1" | |
92 | local=no | |
93 | if base=$(get_repo_base "$repo"); then | |
94 | repo="$base" | |
95 | local=yes | |
96 | fi | |
97 | ||
98 | dir="$2" | |
99 | mkdir "$dir" && | |
100 | D=$( | |
101 | (cd "$dir" && git-init-db && pwd) | |
102 | ) && | |
103 | test -d "$D" || usage | |
104 | ||
105 | # We do local magic only when the user tells us to. | |
106 | case "$local,$use_local" in | |
107 | yes,yes) | |
108 | ( cd "$repo/objects" ) || { | |
109 | echo >&2 "-l flag seen but $repo is not local." | |
110 | exit 1 | |
111 | } | |
112 | ||
113 | case "$local_shared" in | |
114 | no) | |
115 | # See if we can hardlink and drop "l" if not. | |
116 | sample_file=$(cd "$repo" && \ | |
117 | find objects -type f -print | sed -e 1q) | |
118 | ||
119 | # objects directory should not be empty since we are cloning! | |
120 | test -f "$repo/$sample_file" || exit | |
121 | ||
122 | l= | |
123 | if ln "$repo/$sample_file" "$D/.git/objects/sample" 2>/dev/null | |
124 | then | |
125 | l=l | |
126 | fi && | |
127 | rm -f "$D/.git/objects/sample" && | |
128 | cd "$repo" && | |
129 | find objects -type f -print | | |
130 | cpio -puamd$l "$D/.git/" || exit 1 | |
131 | ;; | |
132 | yes) | |
133 | mkdir -p "$D/.git/objects/info" | |
134 | { | |
135 | test -f "$repo/objects/info/alternates" && | |
136 | cat "$repo/objects/info/alternates"; | |
137 | echo "$repo/objects" | |
138 | } >"$D/.git/objects/info/alternates" | |
139 | ;; | |
140 | esac | |
141 | ||
142 | # Make a duplicate of refs and HEAD pointer | |
143 | HEAD= | |
144 | if test -f "$repo/HEAD" | |
145 | then | |
146 | HEAD=HEAD | |
147 | fi | |
148 | (cd "$repo" && tar cf - refs $HEAD) | | |
149 | (cd "$D/.git" && tar xf -) || exit 1 | |
150 | ;; | |
151 | *) | |
152 | case "$repo" in | |
153 | rsync://*) | |
154 | rsync $quiet -av --ignore-existing \ | |
155 | --exclude info "$repo/objects/" "$D/.git/objects/" && | |
156 | rsync $quiet -av --ignore-existing \ | |
157 | --exclude info "$repo/refs/" "$D/.git/refs/" || exit | |
158 | ||
159 | # Look at objects/info/alternates for rsync -- http will | |
160 | # support it natively and git native ones will do it on the | |
161 | # remote end. Not having that file is not a crime. | |
162 | rsync -q "$repo/objects/info/alternates" \ | |
163 | "$D/.git/TMP_ALT" 2>/dev/null || | |
164 | rm -f "$D/.git/TMP_ALT" | |
165 | if test -f "$D/.git/TMP_ALT" | |
166 | then | |
167 | ( cd $D && | |
168 | . git-parse-remote && | |
169 | resolve_alternates "$repo" <"./.git/TMP_ALT" ) | | |
170 | while read alt | |
171 | do | |
172 | case "$alt" in 'bad alternate: '*) die "$alt";; esac | |
173 | case "$quiet" in | |
174 | '') echo >&2 "Getting alternate: $alt" ;; | |
175 | esac | |
176 | rsync $quiet -av --ignore-existing \ | |
177 | --exclude info "$alt" "$D/.git/objects" || exit | |
178 | done | |
179 | rm -f "$D/.git/TMP_ALT" | |
180 | fi | |
181 | ;; | |
182 | http://*) | |
183 | clone_dumb_http "$repo" "$D" | |
184 | ;; | |
185 | *) | |
186 | cd "$D" && case "$upload_pack" in | |
187 | '') git-clone-pack $quiet "$repo" ;; | |
188 | *) git-clone-pack $quiet "$upload_pack" "$repo" ;; | |
189 | esac | |
190 | ;; | |
191 | esac | |
192 | ;; | |
193 | esac | |
194 | ||
195 | cd $D || exit | |
196 | ||
197 | if test -f ".git/HEAD" | |
198 | then | |
199 | head_points_at=`git-symbolic-ref HEAD` | |
200 | case "$head_points_at" in | |
201 | refs/heads/*) | |
202 | head_points_at=`expr "$head_points_at" : 'refs/heads/\(.*\)'` | |
203 | mkdir -p .git/remotes && | |
204 | echo >.git/remotes/origin \ | |
205 | "URL: $repo | |
206 | Pull: $head_points_at:origin" | |
207 | cp ".git/refs/heads/$head_points_at" .git/refs/heads/origin | |
208 | esac | |
209 | ||
210 | case "$no_checkout" in | |
211 | '') | |
212 | git checkout | |
213 | esac | |
214 | fi |