migrate: aquire guest_migration_lock during

To block replication jobs.

diff --git a/src/PVE/API2/LXC.pm b/src/PVE/API2/LXC.pm
index a23b944a3c3cd6e09137eb2f40aff94390a3fab1..8db4fab08448e5406486d4055bd36b528443e522 100644 (file)
--- a/src/PVE/API2/LXC.pm
+++ b/src/PVE/API2/LXC.pm
@@ -17,6 +17,7 @@ use PVE::ReplicationConfig;
 use PVE::LXC;
 use PVE::LXC::Create;
 use PVE::LXC::Migrate;
+use PVE::GuestHelpers;
 use PVE::API2::LXC::Config;
 use PVE::API2::LXC::Status;
 use PVE::API2::LXC::Snapshot;
@@ -927,15 +928,19 @@ __PACKAGE__->register_method({
 
        } else {
 
-           my $realcmd = sub {
-               my $upid = shift;
+           my $code = sub {
+               my $realcmd = sub {
+                   my $upid = shift;
 
-               PVE::LXC::Migrate->migrate($target, $targetip, $vmid, $param);
+                   PVE::LXC::Migrate->migrate($target, $targetip, $vmid, $param);
 
-               return;
+                   return;
+               };
+
+               return $rpcenv->fork_worker('vzmigrate', $vmid, $authuser, $realcmd);
            };
 
-           return $rpcenv->fork_worker('vzmigrate', $vmid, $authuser, $realcmd);
+           return PVE::GuestHelpers::guest_migration_lock($vmid, 10, $code);
        }
     }});