123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263 |
- # Process this file with autom4te to create testsuite. -*- Autotest -*-
- # Test suite for GNU tar.
- # Copyright 2004-2023 Free Software Foundation, Inc.
- # This file is part of GNU tar.
- # GNU tar is free software; you can redistribute it and/or modify
- # it under the terms of the GNU General Public License as published by
- # the Free Software Foundation; either version 3 of the License, or
- # (at your option) any later version.
- # GNU tar is distributed in the hope that it will be useful,
- # but WITHOUT ANY WARRANTY; without even the implied warranty of
- # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
- # GNU General Public License for more details.
- # You should have received a copy of the GNU General Public License
- # along with this program. If not, see <http://www.gnu.org/licenses/>.
- # Test multivolume dumps from pipes.
- AT_SETUP([multivolume dumps from pipes])
- AT_KEYWORDS([multivolume multiv multiv01 chdir])
- # Fixme: should be configurable
- # TRUSS=truss -o /tmp/tr
- # TRUSS=strace
- AT_TAR_CHECK([
- exec <&-
- genfile --length 7168 --file file1
- for block in " 1" " 2" " 3" " 4" " 5" " 6" " 7" " 8" \
- " 9" "10" "11" "12" "13" "14" "15" "16" ; do \
- echo "file2 block ${block} bla!bla!bla!bla!bla!bla!bla!bla!bla!bla!bla!bla"
- for count in 2 3 4 5 6 7 8 ; do
- echo "bla!bla!bla!bla!bla!bla!bla!bla!bla!bla!bla!bla!bla!bla!bla!bla"
- done
- done >file2
- if test $TEST_TAR_FORMAT = pax; then
- TAPE_LENGTH=11
- else
- TAPE_LENGTH=10
- fi
- tar -c --multi-volume --tape-length=$TAPE_LENGTH \
- -f t1-pipe.tar -f t2-pipe.tar ./file1 ./file2 || exit 1
- mkdir extract-dir-pipe
- dd bs=4096 count=$TAPE_LENGTH if=t2-pipe.tar 2>/dev/null |
- PATH=$PATH ${TRUSS} tar -f t1-pipe.tar -f - \
- -C extract-dir-pipe -x --multi-volume --warning=no-timestamp \
- --tape-length=$TAPE_LENGTH --read-full-records || exit 1
- cmp file1 extract-dir-pipe/file1
- cmp file2 extract-dir-pipe/file2
- ],
- [0],
- [],[],[],[],[gnu, oldgnu, pax])
- AT_CLEANUP
|