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

api/resume: allow to resume 'to-disk suspended' VMs

Browse Source 
Signed-off-by: Thomas Lamprecht <t.lamprecht@proxmox.com>
Cc: Dominik Csapak <d.csapak@proxmox.com>
Reviewed-by: Dominik Csapak <d.csapak@proxmox.com>
Tested-by: Dominik CSapak <d.csapak@proxmox.com>
This commit is contained in:
Thomas Lamprecht 2019-03-19 12:57:08 +01:00
parent ccb2e2eaeb
commit cd9a035b56
1 changed files with 16 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

18
PVE/API2/Qemu.pm
View File

@ -2444,14 +2444,28 @@ __PACKAGE__->register_method({
my $nocheck = extract_param($param, 'nocheck'); my $nocheck = extract_param($param, 'nocheck');
die "VM $vmid not running\n" if !PVE::QemuServer::check_running($vmid, $nocheck); my $to_disk_suspended;
eval {
PVE::QemuConfig->lock_config($vmid, sub {
my $conf = PVE::QemuConfig->load_config($vmid);
$to_disk_suspended = PVE::QemuConfig->has_lock($conf, 'suspended');
});
};
die "VM $vmid not running\n"
if !$to_disk_suspended && !PVE::QemuServer::check_running($vmid, $nocheck);
my $realcmd = sub { my $realcmd = sub {
my $upid = shift; my $upid = shift;
syslog('info', "resume VM $vmid: $upid\n"); syslog('info', "resume VM $vmid: $upid\n");
PVE::QemuServer::vm_resume($vmid, $skiplock, $nocheck); if (!$to_disk_suspended) {
PVE::QemuServer::vm_resume($vmid, $skiplock, $nocheck);
} else {
my $storecfg = PVE::Storage::config();
PVE::QemuServer::vm_start($storecfg, $vmid, undef, $skiplock);
}
return; return;
}; };