You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
128 lines
2.7 KiB
128 lines
2.7 KiB
#!/bin/sh |
|
# |
|
# Copyright (c) 2005 Junio C Hamano |
|
# |
|
|
|
test_description='git-pack-object |
|
|
|
' |
|
. ./test-lib.sh |
|
|
|
TRASH=`pwd` |
|
|
|
test_expect_success \ |
|
'setup' \ |
|
'rm -f .git/index* |
|
for i in a b c |
|
do |
|
dd if=/dev/zero bs=4k count=1 | tr "\\0" $i >$i && |
|
git-update-cache --add $i || exit |
|
done && |
|
cat c >d && echo foo >>d && git-update-cache --add d && |
|
tree=`git-write-tree` && |
|
commit=`git-commit-tree $tree </dev/null` && { |
|
echo $tree && |
|
echo $commit && |
|
git-ls-tree $tree | sed -e "s/.* \\([0-9a-f]*\\) .*/\\1/" |
|
} >obj-list && { |
|
git-diff-tree --root -p $commit && |
|
while read object |
|
do |
|
t=`git-cat-file -t $object` && |
|
git-cat-file $t $object || exit 1 |
|
done <obj-list |
|
} >expect' |
|
|
|
test_expect_success \ |
|
'pack without delta' \ |
|
'git-pack-objects --window=0 test-1 <obj-list' |
|
|
|
rm -fr .git2 |
|
mkdir .git2 |
|
|
|
test_expect_success \ |
|
'unpack without delta' \ |
|
'GIT_OBJECT_DIRECTORY=.git2/objects && |
|
export GIT_OBJECT_DIRECTORY && |
|
git-init-db && |
|
git-unpack-objects test-1' |
|
|
|
unset GIT_OBJECT_DIRECTORY |
|
cd $TRASH/.git2 |
|
|
|
test_expect_success \ |
|
'check unpack without delta' \ |
|
'(cd ../.git && find objects -type f -print) | |
|
while read path |
|
do |
|
cmp $path ../.git/$path || { |
|
echo $path differs. |
|
exit 1 |
|
} |
|
done' |
|
cd $TRASH |
|
|
|
test_expect_success \ |
|
'pack with delta' \ |
|
'pwd && |
|
git-pack-objects test-2 <obj-list' |
|
|
|
rm -fr .git2 |
|
mkdir .git2 |
|
|
|
test_expect_success \ |
|
'unpack with delta' \ |
|
'GIT_OBJECT_DIRECTORY=.git2/objects && |
|
export GIT_OBJECT_DIRECTORY && |
|
git-init-db && |
|
git-unpack-objects test-2' |
|
|
|
unset GIT_OBJECT_DIRECTORY |
|
cd $TRASH/.git2 |
|
test_expect_success \ |
|
'check unpack with delta' \ |
|
'(cd ../.git && find objects -type f -print) | |
|
while read path |
|
do |
|
cmp $path ../.git/$path || { |
|
echo $path differs. |
|
exit 1 |
|
} |
|
done' |
|
cd $TRASH |
|
|
|
rm -fr .git2 |
|
mkdir .git2 |
|
|
|
test_expect_success \ |
|
'use packed objects' \ |
|
'GIT_OBJECT_DIRECTORY=.git2/objects && |
|
export GIT_OBJECT_DIRECTORY && |
|
git-init-db && |
|
cp test-1.pack test-1.idx .git2/objects/pack && { |
|
git-diff-tree --root -p $commit && |
|
while read object |
|
do |
|
t=`git-cat-file -t $object` && |
|
git-cat-file $t $object || exit 1 |
|
done <obj-list |
|
} >current && |
|
diff expect current' |
|
|
|
|
|
test_expect_success \ |
|
'use packed deltified objects' \ |
|
'GIT_OBJECT_DIRECTORY=.git2/objects && |
|
export GIT_OBJECT_DIRECTORY && |
|
rm -f .git2/objects/pack/test-?.idx && |
|
cp test-2.pack test-2.idx .git2/objects/pack && { |
|
git-diff-tree --root -p $commit && |
|
while read object |
|
do |
|
t=`git-cat-file -t $object` && |
|
git-cat-file $t $object || exit 1 |
|
done <obj-list |
|
} >current && |
|
diff expect current' |
|
|
|
test_done
|
|
|