db/pgbackrest
1
0
Fork 0
mirror of https://github.com/pgbackrest/pgbackrest.git synced 2025-01-30 05:39:12 +02:00
Code Issues Releases Activity

Set the backup label

Browse Source
This commit is contained in:
David Steele 2014-01-03 20:10:53 -05:00
parent 78457a2f42
commit 6379b723de
1 changed files with 25 additions and 36 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

61
pg_backrest.pl
View File

@ -724,6 +724,29 @@ if ($strOperation eq "backup")
&log(INFO, 'Last backup: ' . $strBackupLastPath);
}
# Create the path for the new backup
my $strBackupPath;
if ($strType eq "full" || !defined($strBackupLastPath))
{
$strBackupPath = date_string_get() . "F";
}
else
{
$strBackupPath = substr($strBackupLastPath, 0, 16);
$strBackupPath .= "_" . date_string_get();
if ($strType eq "differential")
{
$strBackupPath .= "D";
}
else
{
$strBackupPath .= "I";
}
}
# Build backup tmp and config
my $strBackupTmpPath = "${strBackupClusterPath}/backup.tmp";
my $strBackupConfFile = "${strBackupTmpPath}/backup.manifest";
@ -749,7 +772,7 @@ if ($strOperation eq "backup")
my %oBackupManifest;
# Start backup
my $strLabel = "test_label";
my $strLabel = $strBackupPath;
my $strArchiveStart = trim(execute($strCommandPsql .
" -c \"copy (select pg_xlogfile_name(xlog) from pg_start_backup('${strLabel}') as xlog) to stdout\" postgres"));
@ -785,39 +808,5 @@ if ($strOperation eq "backup")
backup_manifest_load($strBackupConfFile);
# Rename the backup tmp path to complete the backup
my $strBackupPath = "${strBackupClusterPath}/";
if ($strType eq "full" || !defined($strBackupLastPath))
{
$strBackupPath .= date_string_get() . "F";
}
else
{
$strBackupPath .= substr($strBackupLastPath, 0, 16);
# # If the last backup was incremental then strip off the last part
# if ($strBackupLastPath =~ /^[0-F]{8}\-[0-F]{6}F(\_[0-F]{8}\-[0-F]{6}D){0,1}\_[0-F]{8}\-[0-F]{6}I$/)
# {
# $strBackupPath .= substr($strBackupLastPath, 0, length($strBackupLastPath) - 17);
# }
# else
# {
# $strBackupPath .= $strBackupLastPath;
# }
$strBackupPath .= "_" . date_string_get();
if ($strType eq "differential")
{
$strBackupPath .= "D";
}
else
{
$strBackupPath .= "I";
}
}
rename($strBackupTmpPath, $strBackupPath) or die &log(ERROR, "unable to ${strBackupTmpPath} rename to ${strBackupPath}");
#print "$strBackupPath\n";
# !!! Still not sure about format, probably YYYYMMDDTHH24MMSS
rename($strBackupTmpPath, "${strBackupClusterPath}/${strBackupPath}") or die &log(ERROR, "unable to ${strBackupTmpPath} rename to ${strBackupPath}");
}