Pass what storage ID is being used to vzdump hook scripts

Signed-off-by: Mark Casey <markc@unifiedgroup.com>

diff --git a/PVE/VZDump.pm b/PVE/VZDump.pm
index e74993820a80a0d96defe1628cacfb92c5fb6bfc..0bef3fdf420bf716475d5205e8975964b9a0793d 100644 (file)
--- a/PVE/VZDump.pm
+++ b/PVE/VZDump.pm
@@ -646,7 +646,7 @@ sub run_hook_script {
 
     local %ENV;
 
-    foreach my $ek (qw(vmtype dumpdir hostname tarfile logfile)) {
+    foreach my $ek (qw(vmtype dumpdir hostname tarfile logfile storeid)) {
        $ENV{uc($ek)} = $task->{$ek} if $task->{$ek};
     }
 
@@ -764,7 +764,7 @@ sub exec_backup_task {
            die "unable to create log file '$tmplog'";
 
        $task->{dumpdir} = $opts->{dumpdir};
-
+       $task->{storeid} = $opts->{storage};
        $task->{tmplog} = $tmplog;
 
        unlink $logfile;

diff --git a/vzdump-hook-script.pl b/vzdump-hook-script.pl
index 27075dccdd145c641d780a2f4443e3dd2ec339b4..b345677ceed290d7e2bdd8f0f5635d2875fa597e 100755 (executable)
--- a/vzdump-hook-script.pl
+++ b/vzdump-hook-script.pl
@@ -29,6 +29,8 @@ if ($phase eq 'job-start' ||
 
     my $dumpdir = $ENV{DUMPDIR};
 
+    my $storeid = $ENV{STOREID};
+
     my $hostname = $ENV{HOSTNAME};
 
     # tarfile is only available in phase 'backup-end'