db/pgbackrest
1
0
Fork 0
mirror of https://github.com/pgbackrest/pgbackrest.git synced 2025-03-05 15:05:48 +02:00
Code Issues Releases Activity

Working on archive log copy

Browse Source
This commit is contained in:
David Steele 2014-01-11 02:16:14 -05:00
parent 387439ac8e
commit 3ed83e78f2
1 changed files with 17 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

23
pg_backrest.pl
View File

@ -683,10 +683,13 @@ sub archive_list_get
my $iStopMajor = hex substr($strArchiveStop, 8, 8);
my $iStopMinor = hex substr($strArchiveStop, 16, 8);
while (!($iStartMajor == $iStopMajor && $iStartMinor == $iStopMinor))
do
{
if ($iArchiveIdx != 0)
$stryArchive[$iArchiveIdx] = uc(sprintf("${strTimeline}%08x%08x", $iStartMajor, $iStartMinor));
if ($strArchiveStart ne $strArchiveStop)
{
$iArchiveIdx += 1;
$iStartMinor += 1;
if ($iStartMinor == 256)
@ -695,11 +698,9 @@ sub archive_list_get
$iStartMinor = 0;
}
}
$stryArchive[$iArchiveIdx] = uc(sprintf("${strTimeline}%08x%08x", $iStartMajor, $iStartMinor));
$iArchiveIdx += 1;
}
while !($iStartMajor == $iStopMajor && $iStartMinor == $iStopMinor);
return @stryArchive;
}
@ -973,6 +974,8 @@ if ($strOperation eq "backup")
# Perform the backup
backup($strCommandChecksum, $strCommandCompress, $strCommandDecompress, $strCommandCopy, $strClusterDataPath,
$strBackupTmpPath, \%oBackupManifest);
# sleep(30);
# Stop backup
my $strArchiveStop = trim(execute($strCommandPsql .
@ -1002,6 +1005,14 @@ if ($strOperation eq "backup")
}
# Fetch the archive logs and put them in pg_xlog
my @stryArchive = archive_list_get($strArchiveStart, $strArchiveStop);
foreach my $strArchive (@stryArchive)
{
print "archive: $strArchive\n";
# need to put the copy logic here
}
# Need a function for create an array of archive log names from strArchiveBegin and strArchiveEnd
# !!! do it