[pve-devel] [PATCH v2 container 2/2] Refactor has_feature

Fabian Grünbichler f.gruenbichler at proxmox.com
Fri Feb 26 09:19:44 CET 2016


add unused running flag for signature compatibility to
QemuServer.pm
add backup_only flag to replace former feature workaround,
needed to skip backup=no mountpoints if called from VZDump.
---
 src/PVE/LXC.pm        | 14 +++++---------
 src/PVE/VZDump/LXC.pm |  2 +-
 2 files changed, 6 insertions(+), 10 deletions(-)

diff --git a/src/PVE/LXC.pm b/src/PVE/LXC.pm
index 2480040..503a57f 100644
--- a/src/PVE/LXC.pm
+++ b/src/PVE/LXC.pm
@@ -1824,10 +1824,8 @@ sub snapshot_prepare {
 	    if defined($conf->{snapshots}->{$snapname});
 
 	my $storecfg = PVE::Storage::config();
-
-	# workaround until mp snapshots are implemented
-	my $feature = $snapname eq 'vzdump' ? 'vzdump' : 'snapshot';
-	die "snapshot feature is not available\n" if !has_feature($feature, $conf, $storecfg);
+	die "snapshot feature is not available\n"
+	    if !has_feature('snapshot', $conf, $storecfg, undef, undef, $snapname eq 'vzdump');
 
 	$snap = $conf->{snapshots}->{$snapname} = {};
 
@@ -1879,19 +1877,17 @@ sub snapshot_commit {
 }
 
 sub has_feature {
-    my ($feature, $conf, $storecfg, $snapname) = @_;
+    my ($feature, $conf, $storecfg, $snapname, $running, $backup_only) = @_;
     
     my $err;
-    my $vzdump = $feature eq 'vzdump';
-    $feature = 'snapshot' if $vzdump;
 
     foreach_mountpoint($conf, sub {
 	my ($ms, $mountpoint) = @_;
 
 	return if $err; # skip further test
-	return if $vzdump && $ms ne 'rootfs' && !$mountpoint->{backup};
+	return if $backup_only && $ms ne 'rootfs' && !$mountpoint->{backup};
 	
-	$err = 1 if !PVE::Storage::volume_has_feature($storecfg, $feature, $mountpoint->{volume}, $snapname);
+	$err = 1 if !PVE::Storage::volume_has_feature($storecfg, $feature, $mountpoint->{volume}, $snapname, $running);
     });
 
     return $err ? 0 : 1;
diff --git a/src/PVE/VZDump/LXC.pm b/src/PVE/VZDump/LXC.pm
index 7269ce8..effd0ec 100644
--- a/src/PVE/VZDump/LXC.pm
+++ b/src/PVE/VZDump/LXC.pm
@@ -131,7 +131,7 @@ sub prepare {
     });
 
     if ($mode eq 'snapshot') {
-	if (!PVE::LXC::has_feature('vzdump', $conf, $storage_cfg)) {
+	if (!PVE::LXC::has_feature('snapshot', $conf, $storage_cfg, undef, undef, 1)) {
 	    die "mode failure - some volumes do not support snapshots\n";
 	}
 
-- 
2.1.4





More information about the pve-devel mailing list