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.
69 lines
1.7 KiB
69 lines
1.7 KiB
#!/bin/sh |
|
|
|
test_description='git mktree' |
|
|
|
. ./test-lib.sh |
|
|
|
test_expect_success setup ' |
|
for d in a a. a0 |
|
do |
|
mkdir "$d" && echo "$d/one" >"$d/one" && |
|
git add "$d" |
|
done && |
|
echo zero >one && |
|
git update-index --add --info-only one && |
|
git write-tree --missing-ok >tree.missing && |
|
git ls-tree $(cat tree.missing) >top.missing && |
|
git ls-tree -r $(cat tree.missing) >all.missing && |
|
echo one >one && |
|
git add one && |
|
git write-tree >tree && |
|
git ls-tree $(cat tree) >top && |
|
git ls-tree -r $(cat tree) >all && |
|
test_tick && |
|
git commit -q -m one && |
|
H=$(git rev-parse HEAD) && |
|
git update-index --add --cacheinfo 160000 $H sub && |
|
test_tick && |
|
git commit -q -m two && |
|
git rev-parse HEAD^{tree} >tree.withsub && |
|
git ls-tree HEAD >top.withsub && |
|
git ls-tree -r HEAD >all.withsub |
|
' |
|
|
|
test_expect_success 'ls-tree piped to mktree (1)' ' |
|
git mktree <top >actual && |
|
test_cmp tree actual |
|
' |
|
|
|
test_expect_success 'ls-tree piped to mktree (2)' ' |
|
git mktree <top.withsub >actual && |
|
test_cmp tree.withsub actual |
|
' |
|
|
|
test_expect_success 'ls-tree output in wrong order given to mktree (1)' ' |
|
perl -e "print reverse <>" <top | |
|
git mktree >actual && |
|
test_cmp tree actual |
|
' |
|
|
|
test_expect_success 'ls-tree output in wrong order given to mktree (2)' ' |
|
perl -e "print reverse <>" <top.withsub | |
|
git mktree >actual && |
|
test_cmp tree.withsub actual |
|
' |
|
|
|
test_expect_success 'allow missing object with --missing' ' |
|
git mktree --missing <top.missing >actual && |
|
test_cmp tree.missing actual |
|
' |
|
|
|
test_expect_success 'mktree refuses to read ls-tree -r output (1)' ' |
|
test_must_fail git mktree <all >actual |
|
' |
|
|
|
test_expect_success 'mktree refuses to read ls-tree -r output (2)' ' |
|
test_must_fail git mktree <all.withsub >actual |
|
' |
|
|
|
test_done
|
|
|