/[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 270 by dpavlin, Tue Dec 13 18:08:50 2005 UTC revision 274 by dpavlin, Tue Dec 13 22:38:09 2005 UTC
# Line 168  sub tar_check($$$$) { Line 168  sub tar_check($$$$) {
168                  my $size = (stat( "$tar_dir/$tarfilename" ))[7] || die "can't stat $tar_dir/$tarfilename";                  my $size = (stat( "$tar_dir/$tarfilename" ))[7] || die "can't stat $tar_dir/$tarfilename";
169    
170                  if ($size > $Conf{MaxArchiveSize}) {                  if ($size > $Conf{MaxArchiveSize}) {
171                          print STDERR " part bigger than media $size > $Conf{MaxArchiveSize} }}" if ($debug);                          print ", part bigger than media $size > $Conf{MaxArchiveSize}\n";
172                          $same = 0;                          return 0;
                         last;  
173                  }                  }
174    
175                  print ", $size bytes";                  print ", $size bytes";
# Line 191  sub tar_check($$$$) { Line 190  sub tar_check($$$$) {
190    
191                          if ($tar_size > $Conf{MaxArchiveFileSize}) {                          if ($tar_size > $Conf{MaxArchiveFileSize}) {
192                                  print ", part $tarfilename is too big $tar_size > $Conf{MaxArchiveFileSize}\n";                                  print ", part $tarfilename is too big $tar_size > $Conf{MaxArchiveFileSize}\n";
193                                  $same = 0;                                  return 0;
                                 last;  
194                          }                          }
195    
196                  }                  }
# Line 298  my $num_backups = $sth->rows; Line 296  my $num_backups = $sth->rows;
296  my $curr_backup = 1;  my $curr_backup = 1;
297    
298  while (my $row = $sth->fetchrow_hashref) {  while (my $row = $sth->fetchrow_hashref) {
299    
300            $curr_backup++;
301    
302          my $tar_file = BackupPC::SearchLib::getGzipName($row->{'host'}, $row->{'share'}, $row->{'num'});          my $tar_file = BackupPC::SearchLib::getGzipName($row->{'host'}, $row->{'share'}, $row->{'num'});
303    
304          # this will return -1 if file doesn't exist          # this will return -1 if file doesn't exist
# Line 313  while (my $row = $sth->fetchrow_hashref) Line 314  while (my $row = $sth->fetchrow_hashref)
314                  }                  }
315          }          }
316    
317          print curr_time, " $curr_backup/$num_backups ", $row->{'host'}, ":", $row->{'share'}, " #", $row->{'num'}, " -> $tar_file";          print curr_time, " creating $curr_backup/$num_backups ", $row->{'host'}, ":", $row->{'share'}, " #", $row->{'num'}, " -> $tar_file";
         $curr_backup++;  
318    
319          my $t = time();          my $t = time();
320    
Legend:
Removed from v.270  
changed lines
  Added in v.274
  ViewVC Help
Powered by ViewVC 1.1.26