From 628bb7f231d6b012fb4141955f4fc6a706fe34c5 Mon Sep 17 00:00:00 2001 From: Dietmar Maurer Date: Tue, 23 May 2017 18:01:13 +0200 Subject: [PATCH] do not allow destroy if there are replication jobs --- PVE/API2/Qemu.pm | 5 +++++ 1 file changed, 5 insertions(+) diff --git a/PVE/API2/Qemu.pm b/PVE/API2/Qemu.pm index 33424589..bc9f7274 100644 --- a/PVE/API2/Qemu.pm +++ b/PVE/API2/Qemu.pm @@ -15,6 +15,7 @@ use PVE::Exception qw(raise raise_param_exc raise_perm_exc); use PVE::Storage; use PVE::JSONSchema qw(get_standard_option); use PVE::RESTHandler; +use PVE::ReplicationConfig; use PVE::QemuConfig; use PVE::QemuServer; use PVE::QemuMigrate; @@ -1279,6 +1280,10 @@ __PACKAGE__->register_method({ die "unable to remove VM $vmid - used in HA resources\n" if PVE::HA::Config::vm_is_ha_managed($vmid); + # do not allow destroy if there are replication jobs + my $repl_conf = PVE::ReplicationConfig->new(); + $repl_conf->check_for_existing_jobs($vmid); + # early tests (repeat after locking) die "VM $vmid is running - destroy failed\n" if PVE::QemuServer::check_running($vmid);