to 0xd7 to allow correct protocol_version >= 27 md4 checksums to be
written. Old cached checksum files have a first byte 0xd6 and are
now considered to be uncached. They will be automatically updated
- as needed.
+ as needed. This avoids the cached checksum warnings in beta2.
* BackupPC_tarPCCopy now handles all file types correctly. Reported
by George Avrunin.
+* Fixed BackupPC_nightly to finish pending deletes before renaming
+ pool chains.
+
* Fixes for rsync restore where hardlink is to file outside of the
top-level restore directory. Reported by George Avrunin, who helped
with debugging.
#
#========================================================================
#
-# Version 3.0.0beta2, released 11 Nov 2006.
+# Version 3.0.0beta3, released 3 Dec 2006.
#
# See http://backuppc.sourceforge.net.
#
$dirCnt++ if ( ($i % 16) == 0
&& -d "$TopDir/$pool/$hexChars[int($i / 16)]" );
+ #
+ # We need to process all pending deletes before we do the
+ # renames
+ #
+ if ( @PendingDelete ) {
+ sleep(1);
+ processPendingDeletes(1);
+ }
+
#
# Now make sure that files with repeated checksums are still
# sequentially numbered
}
}
-sleep(10);
+sleep(1);
processPendingDeletes(1);
###########################################################################
#
#========================================================================
#
-# Version 3.0.0beta2, released 11 Nov 2006.
+# Version 3.0.0beta3, released 3 Dec 2006.
#
# See http://backuppc.sourceforge.net.
#
return -3 if ( read($fh, $data, 1) != 1 );
my $ret;
- if ( $data eq chr(0x78) && $doCache > 0
+ if ( ($data eq chr(0x78) || $data eq chr(0xd6)) && $doCache > 0
&& $checksumSeed == RSYNC_CSUMSEED_CACHE ) {
#
# RSYNC_CSUMSEED_CACHE (32761) is the magic number that
$blockSize
|| BackupPC::Xfer::RsyncDigest->blockSize(
$fileSize, $defBlkSize),
- $checksumSeed, $dg->{protocol_version});
+ $checksumSeed, 0, $dg->{protocol_version});
if ( $ret < 0 ) {
&$Log("digestAdd($fileName) failed ($ret)");
}
#
sub logHandlerSet
{
- my($sub) = @_;
+ my($dg, $sub) = @_;
$Log = $sub;
}
umask(0022);
-my $Version = "3.0.0beta2";
-my $ReleaseDate = "18 Nov 2006";
+my $Version = "3.0.0beta3";
+my $ReleaseDate = "3 Dec 2006";
my $DistDir = "dist/BackupPC-$Version";
my @PerlSrc = qw(