archive info: keep some basic strictness

we want to enforce at least the strictness that our tools can do
something with a backup archive..

Signed-off-by: Thomas Lamprecht <t.lamprecht@proxmox.com>
This commit is contained in:
Thomas Lamprecht
2020-05-15 19:18:22 +02:00
parent bf5af0fbf5
commit 5029f978c3
2 changed files with 5 additions and 9 deletions

View File

@ -1394,13 +1394,9 @@ sub archive_info {
my $info;
my $volid = basename($archive);
if ($volid =~ /\.(tgz$|tar|vma)(?:\.(${\PVE::Storage::Plugin::COMPRESSOR_RE}))?$/) {
$info = decompressor_info($1, $2);
$info->{type} = 'unknown';
if ($volid =~ /vzdump-(lxc|openvz|qemu)-\d+-(?:\d{4})_(?:\d{2})_(?:\d{2})-(?:\d{2})_(?:\d{2})_(?:\d{2})/) {
$info->{type} = $1;
}
if ($volid =~ /vzdump-(lxc|openvz|qemu)-\d+-.+\.(tgz$|tar|vma)(?:\.(${\PVE::Storage::Plugin::COMPRESSOR_RE}))?$/) {
$info = decompressor_info($2, $3);
$info->{type} = $1;
} else {
die "ERROR: couldn't determine archive info from '$archive'\n";
}

View File

@ -40,9 +40,9 @@ my $tests = [
},
{
description => 'Backup archive, none, tgz',
archive => "backup/whatever-the-name_is_here.tgz",
archive => "backup/vzdump-qemu-$vmid-whatever-the-name_is_here.tgz",
expected => {
'type' => 'unknown',
'type' => 'qemu',
'format' => 'tar',
'decompressor' => ['tar', '-z'],
'compression' => 'gz',