convert migrate_set_speed monitor command to qmp

Signed-off-by: Alexandre Derumier <aderumier@odiso.com>
This commit is contained in:
Alexandre Derumier 2012-06-25 10:02:54 +02:00 committed by Dietmar Maurer
parent 988903cab5
commit 2f674c7a5f

View File

@ -2661,9 +2661,9 @@ sub vm_start {
# we set a very hight default of 8192m which is basically unlimited
my $migrate_speed = $defaults->{migrate_speed} || 8192;
$migrate_speed = $conf->{migrate_speed} || $migrate_speed;
$migrate_speed = $migrate_speed * 1048576;
eval {
my $cmd = "migrate_set_speed ${migrate_speed}m";
vm_monitor_command($vmid, $cmd);
vm_mon_cmd($vmid, "migrate_set_speed", value => $migrate_speed);
};
my $migrate_downtime = $defaults->{migrate_downtime};