Changeset 106

Timestamp:

Dec 12, 2011, 2:41:00 PM (13 years ago)

Author:

g7moreau

Message:

• Clean ref to float more than 3 mont old in certain case...

File:

• trunk/klask (modified) (2 diffs)

trunk/klask

@@ -843 +843 @@
 
    my $timestamp_barrier = 3600 * 24 * $days_to_clean;
+   my $timestamp_3month  = 3600 * 24 * 90;
 
    my %mactimedb = ();
@@ -878 +879 @@
             }
 
-         if ( $ip_timestamp - $mactimedb{$ip_mac}->{timestamp} > $timestamp_barrier
+         elsif ( $ip_timestamp - $mactimedb{$ip_mac}->{timestamp} > $timestamp_barrier
             and (
                not $ip_hostname_fq =~ m/^float/
                or $mactimedb{$ip_mac}->{hostname_fq} =~ m/^float/
+               )) {
+            print "remove ip ".$mactimedb{$ip_mac}->{ip}."\n" if $verbose;
+            delete $computerdb->{$mactimedb{$ip_mac}->{ip}};
+            $database_has_changed++;
+            }
+
+         elsif ( $mactimedb{$ip_mac}->{timestamp} > $ip_timestamp
+            and $timestamp - $mactimedb{$ip_mac}->{timestamp} > $timestamp_3month
+            and not $mactimedb{$ip_mac}->{hostname_fq} =~ m/^float/
+               )) {
+            print "remove ip $ip\n" if $verbose;
+            delete $computerdb->{$ip};
+            $database_has_changed++;
+            }
+
+         elsif (  $ip_timestamp > $mactimedb{$ip_mac}->{timestamp}
+            and $timestamp - $ip_timestamp > $timestamp_3month
+            and not $ip_hostname_fq =~ m/^float/
                )) {
             print "remove ip ".$mactimedb{$ip_mac}->{ip}."\n" if $verbose;