proxmox-mirrors/qemu-server
1
0
Fork 0
mirror of https://git.proxmox.com/git/qemu-server synced 2025-08-07 07:02:09 +00:00
Code Issues Actions Packages Projects Releases Wiki Activity

cleanup previous commit

Browse Source
This commit is contained in:
Dietmar Maurer 2014-01-10 13:09:19 +01:00
parent a89fded11f
commit 8b8345f3ac
1 changed files with 15 additions and 15 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

16
PVE/QemuServer.pm
View File

@ -3094,11 +3094,10 @@ sub qga_unfreezefs {
#need to impplement call to qemu-ga #need to impplement call to qemu-ga
} }
sub PVE::QemuServer::set_migration_caps { sub set_migration_caps {
my ($vmid) = @_; my ($vmid) = @_;
my @capabilities = (); my $cap_ref = [];
my $cap_ref = \@capabilities;
my $enabled_cap = { my $enabled_cap = {
"auto-converge" => 1, "auto-converge" => 1,
@ -3107,17 +3106,18 @@ sub PVE::QemuServer::set_migration_caps {
"zero-blocks" => 0, "zero-blocks" => 0,
}; };
my $supported_capabilities = PVE::QemuServer::vm_mon_cmd_nocheck($vmid, "query-migrate-capabilities"); my $supported_capabilities = vm_mon_cmd_nocheck($vmid, "query-migrate-capabilities");
for my $supported_capability (@$supported_capabilities) { for my $supported_capability (@$supported_capabilities) {
if ($enabled_cap->{$supported_capability->{capability}} eq 1) { if ($enabled_cap->{$supported_capability->{capability}} eq 1) {
my $capability->{capability} = $supported_capability->{capability}; push @$cap_ref, {
$capability->{state} = JSON::true; capability => $supported_capability->{capability},
push(@$cap_ref,$capability); state => JSON::true,
};
} }
} }
PVE::QemuServer::vm_mon_cmd_nocheck($vmid, "migrate-set-capabilities", capabilities => $cap_ref); vm_mon_cmd_nocheck($vmid, "migrate-set-capabilities", capabilities => $cap_ref);
} }
sub vm_start { sub vm_start {