From d560409207cc810b6fe27a16fd8220f569b09a43 Mon Sep 17 00:00:00 2001
From: Alexandre Derumier <aderumier@odiso.com>
Date: Thu, 14 Feb 2013 11:58:54 +0100
Subject: [PATCH] forbid offline migration of a non shared volume if it's a
 clone

Signed-off-by: Alexandre Derumier <aderumier@odiso.com>
---
 PVE/QemuMigrate.pm | 6 ++++++
 1 file changed, 6 insertions(+)

diff --git a/PVE/QemuMigrate.pm b/PVE/QemuMigrate.pm
index fb23d81b..3d096532 100644
--- a/PVE/QemuMigrate.pm
+++ b/PVE/QemuMigrate.pm
@@ -245,6 +245,12 @@ sub sync_disks {
 
 	    die "can't migrate '$volid' - storagy type '$scfg->{type}' not supported\n"
 		if $scfg->{type} ne 'dir';
+
+	    #if file, check if a backing file exist
+	    if(($scfg->{type} eq 'dir') && (!$sharedvm)){
+		my (undef, undef, undef, $parent) = PVE::Storage::volume_size_info($self->{storecfg}, $volid, 1);
+		die "can't migrate '$volid' as it's a clone of '$parent'";
+	    }
 	}
 
 	foreach my $volid (keys %$volhash) {