vm_shutdown: request 'stopped' state for HA enabled VMs

This commit is contained in:
Dietmar Maurer 2016-11-23 08:03:08 +01:00
parent 29ddbe702b
commit ae849692d9

View File

@ -1959,6 +1959,27 @@ __PACKAGE__->register_method({
} }
} }
if (PVE::HA::Config::vm_is_ha_managed($vmid) &&
($rpcenv->{type} ne 'ha')) {
my $hacmd = sub {
my $upid = shift;
my $service = "vm:$vmid";
my $cmd = ['ha-manager', 'set', $service, '--state', 'stopped'];
print "Executing HA stop for VM $vmid\n";
PVE::Tools::run_command($cmd);
return;
};
return $rpcenv->fork_worker('hastop', $vmid, $authuser, $hacmd);
} else {
my $realcmd = sub { my $realcmd = sub {
my $upid = shift; my $upid = shift;
@ -1971,6 +1992,7 @@ __PACKAGE__->register_method({
}; };
return $rpcenv->fork_worker('qmshutdown', $vmid, $authuser, $realcmd); return $rpcenv->fork_worker('qmshutdown', $vmid, $authuser, $realcmd);
}
}}); }});
__PACKAGE__->register_method({ __PACKAGE__->register_method({