From c04b5b04de96942e11cdd58bb37849600937e854 Mon Sep 17 00:00:00 2001 From: Alexandre Derumier Date: Tue, 21 Aug 2012 12:21:50 +0200 Subject: [PATCH] implement phase2_cleanup Signed-off-by: Alexandre Derumier --- PVE/QemuMigrate.pm | 17 +++++++++++++++++ 1 file changed, 17 insertions(+) diff --git a/PVE/QemuMigrate.pm b/PVE/QemuMigrate.pm index 18b7feee..83bd9c96 100644 --- a/PVE/QemuMigrate.pm +++ b/PVE/QemuMigrate.pm @@ -369,6 +369,23 @@ sub phase2 { } } +sub phase2_cleanup { + my ($self, $vmid, $err) = @_; + + $self->log('info', "aborting phase 2 - cleanup resources"); + + my $conf = $self->{vmconf}; + delete $conf->{lock}; + eval { PVE::QemuServer::update_config_nolock($vmid, $conf, 1) }; + if (my $err = $@) { + $self->log('err', $err); + } + + ## fixme : vm_stop_cleanup on target vm + + +} + sub phase3 { my ($self, $vmid) = @_;