these can just as well be `die` statements right there, there is no complicated
cleanup that would warrant a goto statement..

Signed-off-by: Fabian Grünbichler <f.gruenbich...@proxmox.com>
---
 src/PVE/Storage/Plugin.pm | 12 ++++++------
 1 file changed, 6 insertions(+), 6 deletions(-)

diff --git a/src/PVE/Storage/Plugin.pm b/src/PVE/Storage/Plugin.pm
index b5a54c1..f8dc9a2 100644
--- a/src/PVE/Storage/Plugin.pm
+++ b/src/PVE/Storage/Plugin.pm
@@ -1586,13 +1586,14 @@ sub read_common_header($) {
 # Export a volume into a file handle as a stream of desired format.
 sub volume_export {
     my ($class, $scfg, $storeid, $fh, $volname, $format, $snapshot, 
$base_snapshot, $with_snapshots) = @_;
+    my $unsupported = "volume export format $format not available for 
$class\n";
     if ($scfg->{path} && !defined($snapshot) && !defined($base_snapshot)) {
        my $file = $class->path($scfg, $volname, $storeid)
-           or goto unsupported;
+           or die $unsupported;
        my ($size, $file_format) = file_size_info($file);
 
        if ($format eq 'raw+size') {
-           goto unsupported if $with_snapshots || $file_format eq 'subvol';
+           die $unsupported if $with_snapshots || $file_format eq 'subvol';
            write_common_header($fh, $size);
            if ($file_format eq 'raw') {
                run_command(['dd', "if=$file", "bs=4k", "status=progress"], 
output => '>&'.fileno($fh));
@@ -1603,20 +1604,19 @@ sub volume_export {
            return;
        } elsif ($format =~ /^(qcow2|vmdk)\+size$/) {
            my $data_format = $1;
-           goto unsupported if !$with_snapshots || $file_format ne 
$data_format;
+           die $unsupported if !$with_snapshots || $file_format ne 
$data_format;
            write_common_header($fh, $size);
            run_command(['dd', "if=$file", "bs=4k", "status=progress"], output 
=> '>&'.fileno($fh));
            return;
        } elsif ($format eq 'tar+size') {
-           goto unsupported if $file_format ne 'subvol';
+           die $unsupported if $file_format ne 'subvol';
            write_common_header($fh, $size);
            run_command(['tar', @COMMON_TAR_FLAGS, '-cf', '-', '-C', $file, 
'.'],
                        output => '>&'.fileno($fh));
            return;
        }
     }
- unsupported:
-    die "volume export format $format not available for $class";
+    die $unsupported;
 }
 
 sub volume_export_formats {
-- 
2.39.2



_______________________________________________
pve-devel mailing list
pve-devel@lists.proxmox.com
https://lists.proxmox.com/cgi-bin/mailman/listinfo/pve-devel

Reply via email to