Andrew's git - gitweb.git/blob

   1#!/bin/sh
   2#
   3
   4usage () {
   5    echo >&2 "usage: $0 [--heads] [--tags] [-u|--upload-pack <upload-pack>]"
   6    echo >&2 "          <repository> <refs>..."
   7    exit 1;
   8}
   9
  10die () {
  11    echo >&2 "$*"
  12    exit 1
  13}
  14
  15exec=
  16while case "$#" in 0) break;; esac
  17do
  18  case "$1" in
  19  -h|--h|--he|--hea|--head|--heads)
  20  heads=heads; shift ;;
  21  -t|--t|--ta|--tag|--tags)
  22  tags=tags; shift ;;
  23  -u|--u|--up|--upl|--uploa|--upload|--upload-|--upload-p|--upload-pa|\
  24  --upload-pac|--upload-pack)
  25        shift
  26        exec="--upload-pack=$1"
  27        shift;;
  28  -u=*|--u=*|--up=*|--upl=*|--uplo=*|--uploa=*|--upload=*|\
  29  --upload-=*|--upload-p=*|--upload-pa=*|--upload-pac=*|--upload-pack=*)
  30        exec=--upload-pack=$(expr "z$1" : 'z-[^=]*=\(.*\)')
  31        shift;;
  32  --)
  33  shift; break ;;
  34  -*)
  35  usage ;;
  36  *)
  37  break ;;
  38  esac
  39done
  40
  41case "$#" in 0) usage ;; esac
  42
  43case ",$heads,$tags," in
  44,,,) heads=heads tags=tags other=other ;;
  45esac
  46
  47. git-parse-remote
  48peek_repo="$(get_remote_url "$@")"
  49shift
  50
  51tmp=.ls-remote-$$
  52trap "rm -fr $tmp-*" 0 1 2 3 15
  53tmpdir=$tmp-d
  54
  55case "$peek_repo" in
  56http://* | https://* | ftp://* )
  57        if [ -n "$GIT_SSL_NO_VERIFY" ]; then
  58            curl_extra_args="-k"
  59        fi
  60        if [ -n "$GIT_CURL_FTP_NO_EPSV" -o \
  61                "`git-config --bool http.noEPSV`" = true ]; then
  62                curl_extra_args="${curl_extra_args} --disable-epsv"
  63        fi
  64        curl -nsf $curl_extra_args --header "Pragma: no-cache" "$peek_repo/info/refs" ||
  65                echo "failed    slurping"
  66        ;;
  67
  68rsync://* )
  69        mkdir $tmpdir &&
  70        rsync -rlq "$peek_repo/HEAD" $tmpdir &&
  71        rsync -rq "$peek_repo/refs" $tmpdir || {
  72                echo "failed    slurping"
  73                exit
  74        }
  75        head=$(cat "$tmpdir/HEAD") &&
  76        case "$head" in
  77        ref:' '*)
  78                head=$(expr "z$head" : 'zref: \(.*\)') &&
  79                head=$(cat "$tmpdir/$head") || exit
  80        esac &&
  81        echo "$head     HEAD"
  82        (cd $tmpdir && find refs -type f) |
  83        while read path
  84        do
  85                cat "$tmpdir/$path" | tr -d '\012'
  86                echo "  $path"
  87        done &&
  88        rm -fr $tmpdir
  89        ;;
  90
  91* )
  92        git-peek-remote $exec "$peek_repo" ||
  93                echo "failed    slurping"
  94        ;;
  95esac |
  96sort -t '       ' -k 2 |
  97while read sha1 path
  98do
  99        case "$sha1" in
 100        failed)
 101                exit 1 ;;
 102        esac
 103        case "$path" in
 104        refs/heads/*)
 105                group=heads ;;
 106        refs/tags/*)
 107                group=tags ;;
 108        *)
 109                group=other ;;
 110        esac
 111        case ",$heads,$tags,$other," in
 112        *,$group,*)
 113                ;;
 114        *)
 115                continue;;
 116        esac
 117        case "$#" in
 118        0)
 119                match=yes ;;
 120        *)
 121                match=no
 122                for pat
 123                do
 124                        case "/$path" in
 125                        */$pat )
 126                                match=yes
 127                                break ;;
 128                        esac
 129                done
 130        esac
 131        case "$match" in
 132        no)
 133                continue ;;
 134        esac
 135        echo "$sha1     $path"
 136done