[pve-devel] [PATCH qemu-server] do not add unused disk when already as unused on another storage

Dominik Csapak d.csapak at proxmox.com
Mon Nov 13 12:09:11 CET 2017


when having an unused disk on a storage for which there are multiple
definitions, we added it again on another storage when that storage
was alphabetically before the already existing one

this happens for example when using our automatically generated
ceph storages: 'pool_ct' and 'pool_vm' and having a vm with
an unused disk

with this patch, we also leave the unused disks in the hash

Signed-off-by: Dominik Csapak <d.csapak at proxmox.com>
---
 PVE/QemuServer.pm | 18 ++++++++++++++----
 1 file changed, 14 insertions(+), 4 deletions(-)

diff --git a/PVE/QemuServer.pm b/PVE/QemuServer.pm
index 97f0f9d..1bba38d 100644
--- a/PVE/QemuServer.pm
+++ b/PVE/QemuServer.pm
@@ -5393,8 +5393,15 @@ sub update_disksize {
 	}
     }
 
+    # we reuse the used(path) hashes
+    # for duplicate unused disks
+    # note: this does not duplicate the hash,
+    # we only use a different name for clarity
+    my $referenced = $used;
+    my $referencedpath = $usedpath;
+
     # remove 'unusedX' entry if volume is used
-    foreach my $opt (keys %$conf) {
+    foreach my $opt (sort keys %$conf) {
 	next if $opt !~ m/^unused\d+$/;
 	my $volid = $conf->{$opt};
 	my $path = $volid_hash->{$volid}->{path} if $volid_hash->{$volid};
@@ -5402,17 +5409,20 @@ sub update_disksize {
 	    $changes = 1;
 	    delete $conf->{$opt};
 	}
+
+	$referenced->{$volid} = 1;
+	$referencedpath->{$path} = 1 if $path;
     }
 
     foreach my $volid (sort keys %$volid_hash) {
 	next if $volid =~ m/vm-$vmid-state-/;
-	next if $used->{$volid};
+	next if $referenced->{$volid};
 	my $path = $volid_hash->{$volid}->{path};
 	next if !$path; # just to be sure
-	next if $usedpath->{$path};
+	next if $referencedpath->{$path};
 	$changes = 1;
 	PVE::QemuConfig->add_unused_volume($conf, $volid);
-	$usedpath->{$path} = 1; # avoid to add more than once (aliases)
+	$referencedpath->{$path} = 1; # avoid to add more than once (aliases)
     }
 
     return $changes;
-- 
2.11.0





More information about the pve-devel mailing list