changeset 80:4e3f87470426

Only execute maintenance procedures every 5 minutes or so.
author Matti Hamalainen <ccr@tnsp.org>
date Sat, 29 Aug 2009 06:10:50 +0300
parents 9095db0fad8f
children f6cc54356339
files maltfilter
diffstat 1 files changed, 3 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/maltfilter	Sat Aug 29 05:24:31 2009 +0300
+++ b/maltfilter	Sat Aug 29 06:10:50 2009 +0300
@@ -13,7 +13,7 @@
 use LWP::UserAgent;
 use IO::Seekable;
 
-my $progversion = "0.18.0";
+my $progversion = "0.18.1";
 my $progbanner =
 "Malicious Attack Livid Termination Filter daemon (maltfilter) v$progversion\n".
 "Programmed by Matti 'ccr' Hamalainen <ccr\@tnsp.org>\n".
@@ -1104,11 +1104,12 @@
     foreach my $filename (keys %filehandles) {
       seek($filehandles{$filename}, $filepos{$filename}, 0);
     }
-    if ($counter < 0 || $counter++ >= 30) {
+    if ($counter < 0 || $counter >= (60*5)) {
       # Every once in a while, execute maintenance functions
       $counter = 0;
       malt_maintenance();
     }
+    $counter++;
   }
 }