Make "git-checkout" create files with O_EXCL
[git/gitweb.git] / git-clone-script
blobf92851ca4bd9fc662f8d0dda6c626ff4a6169f19
1 #!/bin/sh
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.
8 usage() {
9 echo >&2 "* git clone [-l] <repo> <dir>"
10 exit 1
13 get_repo_base() {
14 (cd "$1" && (cd .git ; pwd)) 2> /dev/null
17 quiet=
18 use_local=no
19 while
20 case "$#,$1" in
21 0,*) break ;;
22 *,-l|*,--l|*,--lo|*,--loc|*,--loca|*,--local) use_local=yes ;;
23 *,-q|*,--quiet) quiet=-q ;;
24 *,-*) usage ;;
25 *) break ;;
26 esac
28 shift
29 done
31 # Turn the source into an absolute path if
32 # it is local
33 repo="$1"
34 local=no
35 if base=$(get_repo_base "$repo"); then
36 repo="$base"
37 local=yes
40 dir="$2"
41 mkdir "$dir" &&
42 D=$(
43 (cd "$dir" && git-init-db && pwd)
44 ) &&
45 test -d "$D" || usage
47 # We do local magic only when the user tells us to.
48 case "$local,$use_local" in
49 yes,yes)
50 ( cd "$repo/objects" ) || {
51 echo >&2 "-l flag seen but $repo is not local."
52 exit 1
55 # See if we can hardlink and drop "l" if not.
56 sample_file=$(cd "$repo" && \
57 find objects -type f -print | sed -e 1q)
59 # objects directory should not be empty since we are cloning!
60 test -f "$repo/$sample_file" || exit
63 if ln "$repo/$sample_file" "$D/.git/objects/sample" 2>/dev/null
64 then
65 l=l
66 fi &&
67 rm -f "$D/.git/objects/sample" &&
68 cd "$repo" &&
69 find objects -type f -print |
70 cpio -puamd$l "$D/.git/" || exit 1
72 # Make a duplicate of refs and HEAD pointer
73 HEAD=
74 if test -f "$repo/HEAD"
75 then
76 HEAD=HEAD
78 tar Ccf "$repo" - refs $HEAD | tar Cxf "$D/.git" - || exit 1
79 exit 0
81 esac
83 case "$repo" in
84 rsync://*)
85 rsync $quiet -avz --ignore-existing "$repo/objects/" "$D/.git/objects/" &&
86 rsync $quiet -avz --ignore-existing "$repo/refs/" "$D/.git/refs/"
88 http://*)
89 echo "Somebody should add http fetch" >&2
90 exit 1
93 cd "$D" && git-clone-pack $quiet "$repo"
95 esac