git-clone: fix --bare over dumb-http
[git.git] / t / t5500-fetch-pack.sh
1 #!/bin/sh
2 #
3 # Copyright (c) 2005 Johannes Schindelin
4 #
5
6 test_description='Testing multi_ack pack fetching
7
8 '
9 . ./test-lib.sh
10
11 # Test fetch-pack/upload-pack pair.
12
13 # Some convenience functions
14
15 add () {
16         name=$1
17         text="$@"
18         branch=`echo $name | sed -e 's/^\(.\).*$/\1/'`
19         parents=""
20
21         shift
22         while test $1; do
23                 parents="$parents -p $1"
24                 shift
25         done
26
27         echo "$text" > test.txt
28         git-update-index --add test.txt
29         tree=$(git-write-tree)
30         # make sure timestamps are in correct order
31         sec=$(($sec+1))
32         commit=$(echo "$text" | GIT_AUTHOR_DATE=$sec \
33                 git-commit-tree $tree $parents 2>>log2.txt)
34         export $name=$commit
35         echo $commit > .git/refs/heads/$branch
36         eval ${branch}TIP=$commit
37 }
38
39 count_objects () {
40         ls .git/objects/??/* 2>>log2.txt | wc -l | tr -d " "
41 }
42
43 test_expect_object_count () {
44         message=$1
45         count=$2
46
47         output="$(count_objects)"
48         test_expect_success \
49                 "new object count $message" \
50                 "test $count = $output"
51 }
52
53 pull_to_client () {
54         number=$1
55         heads=$2
56         count=$3
57         no_strict_count_check=$4
58
59         cd client
60         test_expect_success "$number pull" \
61                 "git-fetch-pack -k -v .. $heads"
62         case "$heads" in *A*) echo $ATIP > .git/refs/heads/A;; esac
63         case "$heads" in *B*) echo $BTIP > .git/refs/heads/B;; esac
64         git-symbolic-ref HEAD refs/heads/`echo $heads | sed -e 's/^\(.\).*$/\1/'`
65
66         test_expect_success "fsck" 'git-fsck-objects --full > fsck.txt 2>&1'
67
68         test_expect_success 'check downloaded results' \
69         'mv .git/objects/pack/pack-* . &&
70          p=`ls -1 pack-*.pack` &&
71          git-unpack-objects <$p &&
72          git-fsck-objects --full'
73
74         test_expect_success "new object count after $number pull" \
75         'idx=`echo pack-*.idx` &&
76          pack_count=`git-show-index <$idx | wc -l` &&
77          test $pack_count = $count'
78         test -z "$pack_count" && pack_count=0
79         if [ -z "$no_strict_count_check" ]; then
80                 test_expect_success "minimal count" "test $count = $pack_count"
81         else
82                 test $count != $pack_count && \
83                         echo "WARNING: $pack_count objects transmitted, only $count of which were needed"
84         fi
85         rm -f pack-*
86         cd ..
87 }
88
89 # Here begins the actual testing
90
91 # A1 - ... - A20 - A21
92 #    \
93 #      B1  -   B2 - .. - B70
94
95 # client pulls A20, B1. Then tracks only B. Then pulls A.
96
97 (
98         mkdir client &&
99         cd client &&
100         git-init-db 2>> log2.txt
101 )
102
103 add A1
104
105 prev=1; cur=2; while [ $cur -le 10 ]; do
106         add A$cur $(eval echo \$A$prev)
107         prev=$cur
108         cur=$(($cur+1))
109 done
110
111 add B1 $A1
112
113 echo $ATIP > .git/refs/heads/A
114 echo $BTIP > .git/refs/heads/B
115 git-symbolic-ref HEAD refs/heads/B
116
117 pull_to_client 1st "B A" $((11*3))
118
119 add A11 $A10
120
121 prev=1; cur=2; while [ $cur -le 65 ]; do
122         add B$cur $(eval echo \$B$prev)
123         prev=$cur
124         cur=$(($cur+1))
125 done
126
127 pull_to_client 2nd "B" $((64*3))
128
129 pull_to_client 3rd "A" $((1*3)) # old fails
130
131 test_done