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

destroy old data when restore with --force

Browse Source
This commit is contained in:
Dietmar Maurer 2011-10-18 07:42:29 +02:00
parent 3e16d5fc60
commit a6af7b3e35
2 changed files with 9 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
PVE/API2/Qemu.pm
View File

@ -142,6 +142,9 @@ __PACKAGE__->register_method({
die "unable to restore vm $vmid: vm is running\n"
if PVE::QemuServer::check_running($vmid);
# destroy existing data - keep empty config
PVE::QemuServer::destroy_vm($storecfg, $vmid, 1);
}
my $realcmd = sub {

8
PVE/QemuServer.pm
View File

@ -1339,7 +1339,7 @@ sub unlink_image {
}
sub destroy_vm {
my ($storecfg, $vmid) = @_;
my ($storecfg, $vmid, $keep_empty_config) = @_;
my $conffile = config_file($vmid);
@ -1362,7 +1362,11 @@ sub destroy_vm {
PVE::Storage::vdisk_free($storecfg, $volid);
});
unlink $conffile;
if ($keep_empty_config) {
PVE::Tools::file_set_contents($conffile, "mem: 128\n");
} else {
unlink $conffile;
}
# also remove unused disk
eval {