]>
git.proxmox.com Git - pve-manager.git/blob - vzdump-hook-script.pl
3 # example hook script for vzdump (--script option)
7 print "HOOK: " . join (' ', @ARGV) . "\n";
11 if ($phase eq 'job-start' ||
12 $phase eq 'job-end' ||
13 $phase eq 'job-abort') {
17 } elsif ($phase eq 'backup-start' ||
18 $phase eq 'backup-end' ||
19 $phase eq 'backup-abort' ||
20 $phase eq 'log-end' ||
21 $phase eq 'pre-stop' ||
22 $phase eq 'pre-restart') {
24 my $mode = shift; # stop/suspend/snapshot
28 my $vmtype = $ENV{VMTYPE
}; # openvz/qemu
30 my $dumpdir = $ENV{DUMPDIR
};
32 my $storeid = $ENV{STOREID
};
34 my $hostname = $ENV{HOSTNAME
};
36 # tarfile is only available in phase 'backup-end'
37 my $tarfile = $ENV{TARFILE
};
39 # logfile is only available in phase 'log-end'
40 my $logfile = $ENV{LOGFILE
};
42 print "HOOK-ENV: vmtype=$vmtype;dumpdir=$dumpdir;hostname=$hostname;tarfile=$tarfile;logfile=$logfile\n";
44 # example: copy resulting backup file to another host using scp
45 if ($phase eq 'backup-end') {
46 #system ("scp $tarfile backup-host:/backup-dir") == 0 ||
47 # die "copy tar file to backup-host failed";
50 # example: copy resulting log file to another host using scp
51 if ($phase eq 'log-end') {
52 #system ("scp $logfile backup-host:/backup-dir") == 0 ||
53 # die "copy log file to backup-host failed";
58 die "got unknown phase '$phase'";