vzdump: example hook script: avoid undef warnings

Some environment variables are undef in certain scenarios.

Signed-off-by: Fabian Ebner <f.ebner@proxmox.com>
This commit is contained in:
Fabian Ebner 2022-01-17 12:35:58 +01:00 committed by Fabian Grünbichler
parent 831f991aeb
commit fd12db5bb6

View File

@ -15,11 +15,16 @@ if ($phase eq 'job-start' ||
$phase eq 'job-end' ||
$phase eq 'job-abort') {
# undef for Proxmox Backup Server storages
my $dumpdir = $ENV{DUMPDIR};
# undef when --dumpdir is used directly
my $storeid = $ENV{STOREID};
print "HOOK-ENV: dumpdir=$dumpdir;storeid=$storeid\n";
print "HOOK-ENV: ";
print "dumpdir=$dumpdir;" if defined($dumpdir);
print "storeid=$storeid;" if defined($storeid);
print "\n";
# do what you want
@ -37,8 +42,10 @@ if ($phase eq 'job-start' ||
my $vmtype = $ENV{VMTYPE}; # lxc/qemu
# undef for Proxmox Backup Server storages
my $dumpdir = $ENV{DUMPDIR};
# undef when --dumpdir is used directly
my $storeid = $ENV{STOREID};
my $hostname = $ENV{HOSTNAME};
@ -47,9 +54,14 @@ if ($phase eq 'job-start' ||
my $target = $ENV{TARGET};
# logfile is only available in phase 'log-end'
# undef for Proxmox Backup Server storages
my $logfile = $ENV{LOGFILE};
print "HOOK-ENV: vmtype=$vmtype;dumpdir=$dumpdir;storeid=$storeid;hostname=$hostname;target=$target;logfile=$logfile\n";
print "HOOK-ENV: ";
for my $var (qw(vmtype dumpdir storeid hostname target logfile)) {
print "$var=$ENV{uc($var)};" if defined($ENV{uc($var)});
}
print "\n";
# example: copy resulting backup file to another host using scp
if ($phase eq 'backup-end') {