entries. Catching SIGINT and SIGQUIT and sync HyperEstraier database.
git-svn-id: svn+ssh://llin/home/dpavlin/private/svn/BackupPC/trunk@97
8392b6e1-25fa-0310-8288-
cc32f8e212ea
use POSIX qw/strftime/;
use constant BPC_FTYPE_DIR => 5;
+use constant EST_SYNC_EVERY => 10000;
my $debug = 0;
$|=1;
my $hest_db;
+sub signal {
+ my($sig) = @_;
+ if ($hest_db) {
+ print "\nCaught a SIG$sig--syncing database and shutting down\n";
+ $hest_db->sync();
+ $hest_db->close();
+ }
+ exit(0);
+}
+
+$SIG{'INT'} = \&signal;
+$SIG{'QUIT'} = \&signal;
+
sub hest_update {
my ($host_id, $share_id, $num) = @_;
$max--;
}
+ if ($added % EST_SYNC_EVERY == 0) {
+ print "sync ";
+ $db->sync();
+ }
+
}
print "sync $added new files";