#364 expire_nodeip_freshness setting to revert expire to ND1 behavior [skip ci]

Changes

@@ -3,6 +3,7 @@
   [BUG FIXES]
 
   * #367 buttons in the neighbourmap have an incorrect height
+  * #364 expire_nodeip_freshness setting to revert expire to ND1 behavior
 
 2.038032 - 2018-01-28
 

lib/App/Netdisco/Worker/Plugin/Expire.pm

@@ -23,6 +23,14 @@ register_worker({ phase => 'main' }, sub {
 
   if (setting('expire_nodes') and setting('expire_nodes') > 0) {
       schema('netdisco')->txn_do(sub {
+        my $freshness = ((defined setting('expire_nodeip_freshness'))
+          ? setting('expire_nodeip_freshness') : setting('expire_nodes'));
+        if ($freshness) {
+          schema('netdisco')->resultset('NodeIp')->search({
+            time_last => \[q/< (now() - ?::interval)/, ($freshness * 86400)],
+          })->delete();
+        }
+
         schema('netdisco')->resultset('Node')->search({
           time_last => \[q/< (now() - ?::interval)/,
               (setting('expire_nodes') * 86400)],
@@ -32,6 +40,14 @@ register_worker({ phase => 'main' }, sub {
 
   if (setting('expire_nodes_archive') and setting('expire_nodes_archive') > 0) {
       schema('netdisco')->txn_do(sub {
+        my $freshness = ((defined setting('expire_nodeip_freshness'))
+          ? setting('expire_nodeip_freshness') : setting('expire_nodes_archive'));
+        if ($freshness) {
+          schema('netdisco')->resultset('NodeIp')->search({
+            time_last => \[q/< (now() - ?::interval)/, ($freshness * 86400)],
+          })->delete();
+        }
+
         schema('netdisco')->resultset('Node')->search({
           -not_bool => 'active',
           time_last => \[q/< (now() - ?::interval)/,

share/config.yml

@@ -235,6 +235,7 @@ expire_devices: 60
 expire_nodes: 90
 expire_nodes_archive: 60
 expire_jobs: 14
+expire_nodeip_freshness: null
 store_wireless_clients: true
 store_modules: true
 ignore_interfaces: