migrate: improve cleanup_remotedisks

to also handle cases where disk allocation failed in the remote
vm_start, and we only have a bitmap but no target drive information.

Signed-off-by: Fabian Grünbichler <f.gruenbichler@proxmox.com>

diff --git a/PVE/QemuMigrate.pm b/PVE/QemuMigrate.pm
index 80978b946f032df96a92ec7ee41e6222dd019e86..579be0eb197bf7c8c2b967c79975070f0b1264a8 100644 (file)
--- a/PVE/QemuMigrate.pm
+++ b/PVE/QemuMigrate.pm
@@ -550,7 +550,10 @@ sub cleanup_remotedisks {
     my ($self) = @_;
 
     foreach my $target_drive (keys %{$self->{target_drive}}) {
-       my $drive = PVE::QemuServer::parse_drive($target_drive, $self->{target_drive}->{$target_drive}->{drivestr});
+       my $drivestr = $self->{target_drive}->{$target_drive}->{drivestr};
+       next if !defined($drivestr);
+
+       my $drive = PVE::QemuServer::parse_drive($target_drive, $drivestr);
 
        # don't clean up replicated disks!
        next if defined($self->{replicated_volumes}->{$drive->{file}});