add vm_mon_cmd and vm_mon_cmd_nocheck wrapper

Signed-off-by: Alexandre Derumier <aderumier@odiso.com>
This commit is contained in:
Alexandre Derumier 2012-06-25 10:02:47 +02:00 committed by Dietmar Maurer
parent d967756b10
commit 0eedc444b7

View File

@ -2824,6 +2824,24 @@ sub vm_monitor_command {
return $res;
}
sub vm_mon_cmd {
my ($vmid, $execute, %params) = @_;
my $cmd = {};
$cmd->{execute} = $execute;
$cmd->{arguments} = \%params;
vm_qmp_command($vmid,$cmd);
}
sub vm_mon_cmd_nocheck {
my ($vmid, $execute, %params) = @_;
my $cmd = {};
$cmd->{execute} = $execute;
$cmd->{arguments} = \%params;
vm_qmp_command($vmid,$cmd,1);
}
sub vm_qmp_command {
my ($vmid, $cmd, $nocheck) = @_;