1#!/bin/sh
2#
3# Copyright (c) 2005 Johannes Schindelin
4#
5
6test_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
15add () {
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
39count_objects () {
40 ls .git/objects/??/* 2>>log2.txt | wc -l | tr -d " "
41}
42
43test_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
53pull_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 2>> log2.txt
101)
102
103add A1
104
105prev=1; cur=2; while [ $cur -le 10 ]; do
106 add A$cur $(eval echo \$A$prev)
107 prev=$cur
108 cur=$(($cur+1))
109done
110
111add B1 $A1
112
113echo $ATIP > .git/refs/heads/A
114echo $BTIP > .git/refs/heads/B
115git-symbolic-ref HEAD refs/heads/B
116
117pull_to_client 1st "B A" $((11*3))
118
119add A11 $A10
120
121prev=1; cur=2; while [ $cur -le 65 ]; do
122 add B$cur $(eval echo \$B$prev)
123 prev=$cur
124 cur=$(($cur+1))
125done
126
127pull_to_client 2nd "B" $((64*3))
128
129pull_to_client 3rd "A" $((1*3)) # old fails
130
131test_expect_success "clone shallow" "git-clone --depth 2 . shallow"
132
133(cd shallow; git-count-objects -v) > count.shallow
134
135test_expect_success "clone shallow object count" \
136 "test \"in-pack: 18\" = \"$(grep in-pack count.shallow)\""
137
138count_output () {
139 sed -e '/^in-pack:/d' -e '/^packs:/d' -e '/: 0$/d' "$1"
140}
141
142test_expect_success "clone shallow object count (part 2)" '
143 test -z "$(count_output count.shallow)"
144'
145
146test_expect_success "fsck in shallow repo" \
147 "(cd shallow; git-fsck-objects --full)"
148
149#test_done; exit
150
151add B66 $B65
152add B67 $B66
153
154test_expect_success "pull in shallow repo" \
155 "(cd shallow; git pull .. B)"
156
157(cd shallow; git-count-objects -v) > count.shallow
158test_expect_success "clone shallow object count" \
159 "test \"count: 6\" = \"$(grep count count.shallow)\""
160
161add B68 $B67
162add B69 $B68
163
164test_expect_success "deepening pull in shallow repo" \
165 "(cd shallow; git pull --depth 4 .. B)"
166
167(cd shallow; git-count-objects -v) > count.shallow
168test_expect_success "clone shallow object count" \
169 "test \"count: 12\" = \"$(grep count count.shallow)\""
170
171test_expect_success "deepening fetch in shallow repo" \
172 "(cd shallow; git fetch --depth 4 .. A:A)"
173
174(cd shallow; git-count-objects -v) > count.shallow
175test_expect_success "clone shallow object count" \
176 "test \"count: 18\" = \"$(grep count count.shallow)\""
177
178test_expect_failure "pull in shallow repo with missing merge base" \
179 "(cd shallow; git pull --depth 4 .. A)"
180
181test_done