/[BackupPC]/trunk/bin/BackupPC_incPartsUpdate
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Diff of /trunk/bin/BackupPC_incPartsUpdate

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 264 by dpavlin, Tue Dec 13 00:10:47 2005 UTC revision 265 by dpavlin, Tue Dec 13 00:10:48 2005 UTC
# Line 114  sub tar_check($$$$) { Line 114  sub tar_check($$$$) {
114    
115                  if (my $row = $sth_md5->fetchrow_hashref) {                  if (my $row = $sth_md5->fetchrow_hashref) {
116                          return if (                          return if (
117                                  $row->{tar_size} == $tar_size &&                                  $row->{tar_size} >= $tar_size &&
118                                  $row->{size} == $size &&                                  $row->{size} == $size &&
119                                  $row->{md5} eq $md5 &&                                  $row->{md5} eq $md5 &&
120                                  $row->{items} == $items                                  $row->{items} == $items
# Line 177  sub tar_check($$$$) { Line 177  sub tar_check($$$$) {
177                  }                  }
178    
179                  my $md5 = read_file( $md5_path ) || die "can't read md5sum file $md5_path: $!";                  my $md5 = read_file( $md5_path ) || die "can't read md5sum file $md5_path: $!";
180                    $md5 =~ s#\s.*$##;
181    
182                  my $part_nr = 1;                  my $part_nr = 1;
183                  $part_nr = $1 if ($tarfilename =~ m#/(\d+)\.tar\.gz#);                  $part_nr = $1 if ($tarfilename =~ m#/(\d+)\.tar\.gz#);
Legend:
Removed from v.264  
changed lines
  Added in v.265
  ViewVC Help
Powered by ViewVC 1.1.26