Signed-off-by: Wolfgang Bumiller <w.bumil...@proxmox.com>
---
 PVE/QemuMigrate.pm | 7 +++++--
 1 file changed, 5 insertions(+), 2 deletions(-)

diff --git a/PVE/QemuMigrate.pm b/PVE/QemuMigrate.pm
index 6375a15..5b07c20 100644
--- a/PVE/QemuMigrate.pm
+++ b/PVE/QemuMigrate.pm
@@ -502,7 +502,10 @@ sub scan_local_volumes {
                # exceptions: 'zfspool' or 'qcow2' files (on directory storage)
 
                die "online storage migration not possible if snapshot 
exists\n" if $self->{running};
-               if (!($scfg->{type} eq 'zfspool' || 
$local_volumes->{$volid}->{format} eq 'qcow2')) {
+               if (!($scfg->{type} eq 'zfspool'
+                   || ($scfg->{type} eq 'btrfs' && 
$local_volumes->{$volid}->{format} eq 'raw')
+                   || $local_volumes->{$volid}->{format} eq 'qcow2'
+               )) {
                    die "non-migratable snapshot exists\n";
                }
            }
@@ -553,7 +556,7 @@ sub scan_local_volumes {
            my ($sid, $volname) = PVE::Storage::parse_volume_id($volid);
            my $scfg =  PVE::Storage::storage_config($storecfg, $sid);
 
-           my $migratable = $scfg->{type} =~ /^(?:dir|zfspool|lvmthin|lvm)$/;
+           my $migratable = $scfg->{type} =~ 
/^(?:dir|btrfs|zfspool|lvmthin|lvm)$/;
 
            die "can't migrate '$volid' - storage type '$scfg->{type}' not 
supported\n"
                if !$migratable;
-- 
2.30.2



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

Reply via email to