live-restore: add more logging

To bring it better in line with regular restore, also log the
repository, the snapshot and the target for each drive.

While at it, adjust capitalization of existing log line and clean up
repeated '$1' use.

Signed-off-by: Stefan Reiter <s.reiter@proxmox.com>
This commit is contained in:
Stefan Reiter 2021-05-18 17:13:44 +02:00 committed by Thomas Lamprecht
parent 3ab0f9252a
commit 88cabb624d

View File

@ -6429,17 +6429,23 @@ sub restore_proxmox_backup_archive {
sub pbs_live_restore { sub pbs_live_restore {
my ($vmid, $conf, $storecfg, $restored_disks, $repo, $keyfile, $snap) = @_; my ($vmid, $conf, $storecfg, $restored_disks, $repo, $keyfile, $snap) = @_;
print "Starting VM for live-restore\n"; print "starting VM for live-restore\n";
print "repository: '$repo'\n";
print "snapshot: '$snap'\n";
my $pbs_backing = {}; my $pbs_backing = {};
for my $ds (keys %$restored_disks) { for my $ds (keys %$restored_disks) {
$ds =~ m/^drive-(.*)$/; $ds =~ m/^drive-(.*)$/;
$pbs_backing->{$1} = { my $confname = $1;
$pbs_backing->{$confname} = {
repository => $repo, repository => $repo,
snapshot => $snap, snapshot => $snap,
archive => "$ds.img.fidx", archive => "$ds.img.fidx",
}; };
$pbs_backing->{$1}->{keyfile} = $keyfile if -e $keyfile; $pbs_backing->{$confname}->{keyfile} = $keyfile if -e $keyfile;
my $drive = parse_drive($confname, $conf->{$confname});
print "restoring '$ds' to '$drive->{file}'\n";
} }
my $drives_streamed = 0; my $drives_streamed = 0;