From bc998e2007b09ea1bd82276fe243f95a7e1c9687 Mon Sep 17 00:00:00 2001
From: "Kim B. Heino" <b@bbbs.net>
Date: Thu, 1 Apr 2021 16:38:22 +0300
Subject: [PATCH] dhcp-pool: increase warning limit to 90

DHCP pools grow very slowly. Warning at 75 is way too early, 90 seems
to be good value.

Also return pools at sorted order.
---
 plugins/dhcp/dhcp-pool | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/plugins/dhcp/dhcp-pool b/plugins/dhcp/dhcp-pool
index 42868054..a58a019e 100755
--- a/plugins/dhcp/dhcp-pool
+++ b/plugins/dhcp/dhcp-pool
@@ -66,11 +66,11 @@ elsif ( defined $ARGV[0] and $ARGV[0] eq "config" ) {
     %pools = determine_pools();
 
     # Print a label for each pool
-    foreach $start (keys %pools) {
+    foreach $start (sort (keys %pools)) {
 	$label = ip2string($start);
 	$label =~ s/\./\_/g;
 	print "_$label.label Pool " . ip2string($start) . " - " . ip2string($start + $pools{$start} - 1) . "\n";
-	print "_$label.warning 75\n";
+	print "_$label.warning 90\n";
 	print "_$label.critical 100\n";
     }
 }