Fix exclusion of long file names when extracting from pax format archives.
* src/list.c (read_and): Call decode_header before attempting name_match. (list_archive): Remove call to decode_header. * src/compare.c (diff_archive): Remove call to decode_header. * src/extract.c (extract_archive): Likewise. * test/exclude06.at: New test case. * tests/testsuite.at: Include exclude06.at. * tests/Makefile.am (TESTSUITE_AT): Add exclude06.at.
This commit is contained in:
@@ -66,6 +66,7 @@ TESTSUITE_AT = \
|
||||
exclude03.at\
|
||||
exclude04.at\
|
||||
exclude05.at\
|
||||
exclude06.at\
|
||||
extrac01.at\
|
||||
extrac02.at\
|
||||
extrac03.at\
|
||||
|
||||
47
tests/exclude06.at
Normal file
47
tests/exclude06.at
Normal file
@@ -0,0 +1,47 @@
|
||||
# Process this file with autom4te to create testsuite. -*- Autotest -*-
|
||||
# Copyright (C) 2010 Free Software Foundation, Inc.
|
||||
|
||||
# This program 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, or (at your option)
|
||||
# any later version.
|
||||
|
||||
# This program 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/>.
|
||||
|
||||
# Tar 1.23 would fail to exclude names longer that 100 characters from
|
||||
# pax format archives.
|
||||
#
|
||||
# Reported-by: Matthew Peterson <mrpeterson2@gmail.com>
|
||||
# References: <AANLkTin0teb1dcl0HCNquHxvN4HQnJmP6aK7CJCqy0sd@mail.gmail.com>
|
||||
# http://lists.gnu.org/archive/html/help-tar/2010-06/msg00000.html
|
||||
|
||||
AT_SETUP([exclude: long files in pax archives])
|
||||
AT_KEYWORDS([exclude exclude06])
|
||||
|
||||
m4_define([test_base_dir],[one/two/three/four/five/six/seven/eight/nine/ten/eleven/twelve/thirteen/fourteen/fifteen/sixteen/seventeen])
|
||||
|
||||
AT_TAR_CHECK([
|
||||
AT_TAR_MKHIER(test_base_dir)
|
||||
genfile --length 20 -f test_base_dir[/1.txt]
|
||||
genfile --length 20 -f test_base_dir[/1.c]
|
||||
|
||||
tar cf archive.tar test_base_dir
|
||||
mkdir out
|
||||
tar -C out -xf archive.tar --exclude='*.txt'
|
||||
find out -type f
|
||||
],
|
||||
[0],
|
||||
[[out/]test_base_dir[/1.c]
|
||||
],
|
||||
[],
|
||||
[],
|
||||
[],
|
||||
[pax])
|
||||
|
||||
AT_CLEANUP
|
||||
@@ -130,6 +130,7 @@ m4_include([exclude02.at])
|
||||
m4_include([exclude03.at])
|
||||
m4_include([exclude04.at])
|
||||
m4_include([exclude05.at])
|
||||
m4_include([exclude06.at])
|
||||
|
||||
m4_include([delete01.at])
|
||||
m4_include([delete02.at])
|
||||
|
||||
Reference in New Issue
Block a user