Andrew's git - gitweb.git/blob

   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.
   9unset CDPATH
  10
  11usage() {
  12        echo >&2 "Usage: $0 [--bare] [-l [-s]] [-q] [-u <upload-pack>] [-o <name>] [-n] <repo> [<dir>]"
  13        exit 1
  14}
  15
  16get_repo_base() {
  17        (cd "$1" && (cd .git ; pwd)) 2> /dev/null
  18}
  19
  20if [ -n "$GIT_SSL_NO_VERIFY" ]; then
  21    curl_extra_args="-k"
  22fi
  23
  24http_fetch () {
  25        # $1 = Remote, $2 = Local
  26        curl -nsfL $curl_extra_args "$1" >"$2"
  27}
  28
  29clone_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                echo >&2 "Cannot get remote repository information.
  36Perhaps git-update-server-info needs to be run there?"
  37                exit 1;
  38        }
  39        while read sha1 refname
  40        do
  41                name=`expr "$refname" : 'refs/\(.*\)'` &&
  42                case "$name" in
  43                *^*)    ;;
  44                *)
  45                        git-http-fetch -v -a -w "$name" "$name" "$1/" || exit 1
  46                esac
  47        done <"$clone_tmp/refs"
  48        rm -fr "$clone_tmp"
  49}
  50
  51quiet=
  52use_local=no
  53local_shared=no
  54no_checkout=
  55upload_pack=
  56bare=
  57origin=origin
  58origin_override=
  59while
  60        case "$#,$1" in
  61        0,*) break ;;
  62        *,-n|*,--no|*,--no-|*,--no-c|*,--no-ch|*,--no-che|*,--no-chec|\
  63        *,--no-check|*,--no-checko|*,--no-checkou|*,--no-checkout)
  64          no_checkout=yes ;;
  65        *,--na|*,--nak|*,--nake|*,--naked|\
  66        *,-b|*,--b|*,--ba|*,--bar|*,--bare) bare=yes ;;
  67        *,-l|*,--l|*,--lo|*,--loc|*,--loca|*,--local) use_local=yes ;;
  68        *,-s|*,--s|*,--sh|*,--sha|*,--shar|*,--share|*,--shared) 
  69          local_shared=yes; use_local=yes ;;
  70        *,-q|*,--quiet) quiet=-q ;;
  71        1,-o) usage;;
  72        *,-o)
  73                git-check-ref-format "$2" || {
  74                    echo >&2 "'$2' is not suitable for a branch name"
  75                    exit 1
  76                }
  77                test -z "$origin_override" || {
  78                    echo >&2 "Do not give more than one -o options."
  79                    exit 1
  80                }
  81                origin_override=yes
  82                origin="$2"; shift
  83                ;;
  84        1,-u|1,--upload-pack) usage ;;
  85        *,-u|*,--upload-pack)
  86                shift
  87                upload_pack="--exec=$1" ;;
  88        *,-*) usage ;;
  89        *) break ;;
  90        esac
  91do
  92        shift
  93done
  94
  95# --bare implies --no-checkout
  96if test yes = "$bare"
  97then
  98        if test yes = "$origin_override"
  99        then
 100                echo >&2 '--bare and -o $origin options are incompatible.'
 101                exit 1
 102        fi
 103        no_checkout=yes
 104fi
 105
 106# Turn the source into an absolute path if
 107# it is local
 108repo="$1"
 109local=no
 110if base=$(get_repo_base "$repo"); then
 111        repo="$base"
 112        local=yes
 113fi
 114
 115dir="$2"
 116# Try using "humanish" part of source repo if user didn't specify one
 117[ -z "$dir" ] && dir=$(echo "$repo" | sed -e 's|/$||' -e 's|:*/*\.git$||' -e 's|.*[/:]||g')
 118[ -e "$dir" ] && echo "$dir already exists." && usage
 119mkdir -p "$dir" &&
 120D=$(cd "$dir" && pwd) &&
 121trap 'err=$?; cd ..; rm -r "$D"; exit $err' exit
 122case "$bare" in
 123yes) GIT_DIR="$D" ;;
 124*) GIT_DIR="$D/.git" ;;
 125esac && export GIT_DIR && git-init-db || usage
 126case "$bare" in
 127yes)
 128        GIT_DIR="$D" ;;
 129*)
 130        GIT_DIR="$D/.git" ;;
 131esac
 132
 133# We do local magic only when the user tells us to.
 134case "$local,$use_local" in
 135yes,yes)
 136        ( cd "$repo/objects" ) || {
 137                echo >&2 "-l flag seen but $repo is not local."
 138                exit 1
 139        }
 140
 141        case "$local_shared" in
 142        no)
 143            # See if we can hardlink and drop "l" if not.
 144            sample_file=$(cd "$repo" && \
 145                          find objects -type f -print | sed -e 1q)
 146
 147            # objects directory should not be empty since we are cloning!
 148            test -f "$repo/$sample_file" || exit
 149
 150            l=
 151            if ln "$repo/$sample_file" "$GIT_DIR/objects/sample" 2>/dev/null
 152            then
 153                    l=l
 154            fi &&
 155            rm -f "$GIT_DIR/objects/sample" &&
 156            cd "$repo" &&
 157            find objects -depth -print | cpio -pumd$l "$GIT_DIR/" || exit 1
 158            ;;
 159        yes)
 160            mkdir -p "$GIT_DIR/objects/info"
 161            {
 162                test -f "$repo/objects/info/alternates" &&
 163                cat "$repo/objects/info/alternates";
 164                echo "$repo/objects"
 165            } >"$GIT_DIR/objects/info/alternates"
 166            ;;
 167        esac
 168
 169        # Make a duplicate of refs and HEAD pointer
 170        HEAD=
 171        if test -f "$repo/HEAD"
 172        then
 173                HEAD=HEAD
 174        fi
 175        (cd "$repo" && tar cf - refs $HEAD) |
 176        (cd "$GIT_DIR" && tar xf -) || exit 1
 177        ;;
 178*)
 179        case "$repo" in
 180        rsync://*)
 181                rsync $quiet -av --ignore-existing  \
 182                        --exclude info "$repo/objects/" "$GIT_DIR/objects/" &&
 183                rsync $quiet -av --ignore-existing  \
 184                        --exclude info "$repo/refs/" "$GIT_DIR/refs/" || exit
 185
 186                # Look at objects/info/alternates for rsync -- http will
 187                # support it natively and git native ones will do it on the
 188                # remote end.  Not having that file is not a crime.
 189                rsync -q "$repo/objects/info/alternates" \
 190                        "$GIT_DIR/TMP_ALT" 2>/dev/null ||
 191                        rm -f "$GIT_DIR/TMP_ALT"
 192                if test -f "$GIT_DIR/TMP_ALT"
 193                then
 194                    ( cd "$D" &&
 195                      . git-parse-remote &&
 196                      resolve_alternates "$repo" <"$GIT_DIR/TMP_ALT" ) |
 197                    while read alt
 198                    do
 199                        case "$alt" in 'bad alternate: '*) die "$alt";; esac
 200                        case "$quiet" in
 201                        '')     echo >&2 "Getting alternate: $alt" ;;
 202                        esac
 203                        rsync $quiet -av --ignore-existing  \
 204                            --exclude info "$alt" "$GIT_DIR/objects" || exit
 205                    done
 206                    rm -f "$GIT_DIR/TMP_ALT"
 207                fi
 208                ;;
 209        http://*)
 210                if test -z "@@NO_CURL@@"
 211                then
 212                        clone_dumb_http "$repo" "$D"
 213                else
 214                        echo >&2 "http transport not supported, rebuild Git with curl support"
 215                        exit 1
 216                fi
 217                ;;
 218        *)
 219                cd "$D" && case "$upload_pack" in
 220                '') git-clone-pack $quiet "$repo" ;;
 221                *) git-clone-pack $quiet "$upload_pack" "$repo" ;;
 222                esac || {
 223                        echo >&2 "clone-pack from '$repo' failed."
 224                        exit 1
 225                }
 226                ;;
 227        esac
 228        ;;
 229esac
 230
 231cd "$D" || exit
 232
 233if test -f "$GIT_DIR/HEAD" && test -z "$bare"
 234then
 235        head_points_at=`git-symbolic-ref HEAD`
 236        case "$head_points_at" in
 237        refs/heads/*)
 238                head_points_at=`expr "$head_points_at" : 'refs/heads/\(.*\)'`
 239                mkdir -p "$GIT_DIR/remotes" &&
 240                echo >"$GIT_DIR/remotes/origin" \
 241                "URL: $repo
 242Pull: $head_points_at:$origin" &&
 243                git-update-ref "refs/heads/$origin" $(git-rev-parse HEAD) &&
 244                (cd "$GIT_DIR" && find "refs/heads" -type f -print) |
 245                while read ref
 246                do
 247                        head=`expr "$ref" : 'refs/heads/\(.*\)'` &&
 248                        test "$head_points_at" = "$head" ||
 249                        test "$origin" = "$head" ||
 250                        echo "Pull: ${head}:${head}"
 251                done >>"$GIT_DIR/remotes/origin"
 252        esac
 253
 254        case "$no_checkout" in
 255        '')
 256                git-read-tree -m -u -v HEAD HEAD
 257        esac
 258fi
 259
 260trap - exit
 261