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
   8usage() {
   9        echo >&2 "* git clone [-l [-s]] [-q] [-u <upload-pack>] <repo> <dir>"
  10        exit 1
  11}
  12
  13get_repo_base() {
  14        (cd "$1" && (cd .git ; pwd)) 2> /dev/null
  15}
  16
  17quiet=
  18use_local=no
  19local_shared=no
  20upload_pack=
  21while
  22        case "$#,$1" in
  23        0,*) break ;;
  24        *,-l|*,--l|*,--lo|*,--loc|*,--loca|*,--local) use_local=yes ;;
  25        *,-s|*,--s|*,--sh|*,--sha|*,--shar|*,--share|*,--shared) 
  26          local_shared=yes ;;
  27        *,-q|*,--quiet) quiet=-q ;;
  28        1,-u|1,--upload-pack) usage ;;
  29        *,-u|*,--upload-pack)
  30                shift
  31                upload_pack="--exec=$1" ;;
  32        *,-*) usage ;;
  33        *) break ;;
  34        esac
  35do
  36        shift
  37done
  38
  39# Turn the source into an absolute path if
  40# it is local
  41repo="$1"
  42local=no
  43if base=$(get_repo_base "$repo"); then
  44        repo="$base"
  45        local=yes
  46fi
  47
  48dir="$2"
  49mkdir "$dir" &&
  50D=$(
  51        (cd "$dir" && git-init-db && pwd)
  52) &&
  53test -d "$D" || usage
  54
  55# We do local magic only when the user tells us to.
  56case "$local,$use_local" in
  57yes,yes)
  58        ( cd "$repo/objects" ) || {
  59                echo >&2 "-l flag seen but $repo is not local."
  60                exit 1
  61        }
  62
  63        case "$local_shared" in
  64        no)
  65            # See if we can hardlink and drop "l" if not.
  66            sample_file=$(cd "$repo" && \
  67                          find objects -type f -print | sed -e 1q)
  68
  69            # objects directory should not be empty since we are cloning!
  70            test -f "$repo/$sample_file" || exit
  71
  72            l=
  73            if ln "$repo/$sample_file" "$D/.git/objects/sample" 2>/dev/null
  74            then
  75                    l=l
  76            fi &&
  77            rm -f "$D/.git/objects/sample" &&
  78            cd "$repo" &&
  79            find objects -type f -print |
  80            cpio -puamd$l "$D/.git/" || exit 1
  81            ;;
  82        yes)
  83            mkdir -p "$D/.git/objects/info"
  84            {
  85                test -f "$repo/objects/info/alternates" &&
  86                cat "$repo/objects/info/alternates";
  87                echo "$repo/objects"
  88            } >"$D/.git/objects/info/alternates"
  89            ;;
  90        esac
  91
  92        # Make a duplicate of refs and HEAD pointer
  93        HEAD=
  94        if test -f "$repo/HEAD"
  95        then
  96                HEAD=HEAD
  97        fi
  98        tar Ccf "$repo" - refs $HEAD | tar Cxf "$D/.git" - || exit 1
  99        ;;
 100*)
 101        case "$repo" in
 102        rsync://*)
 103                rsync $quiet -avz --ignore-existing "$repo/objects/" "$D/.git/objects/" &&
 104                rsync $quiet -avz --ignore-existing "$repo/refs/" "$D/.git/refs/"
 105                ;;
 106        http://*)
 107                git-clone-dumb-http "$repo" "$D"
 108                case "$?" in
 109                2)
 110                        echo "Somebody should define smarter http server protocol" >&2
 111                        exit 1
 112                        ;;
 113                0)
 114                        ;;
 115                *)
 116                        exit
 117                esac
 118                ;;
 119        *)
 120                cd "$D" && case "$upload_pack" in
 121                '') git-clone-pack $quiet "$repo" ;;
 122                *) git-clone-pack $quiet "$upload_pack" "$repo" ;;
 123                esac
 124                ;;
 125        esac
 126        ;;
 127esac
 128
 129# Update origin.
 130mkdir -p "$D/.git/branches/" &&
 131rm -f "$D/.git/branches/origin" &&
 132echo "$repo" >"$D/.git/branches/origin"