sitesummary-nodes: Add support for fetching configuration from

/etc/sitesummary/sitesummary-nodes.conf, and make it possible to
configure the nagios warning and critical levels for ping checks.

1 files changed, 19 insertions, 6 deletions

diff --git a/sitesummary-nodes b/sitesummary-nodes
index 2ff836c..c97dbae 100755
--- a/sitesummary-nodes
+++ b/sitesummary-nodes
@@ -10,6 +10,7 @@ use SiteSummary;
 use Getopt::Std;
 use Socket;
 use File::Temp qw(tempfile);
+use vars qw($npingwarn $npingwarnp $npingcrit $npingcritp);
 
 sub usage {
     print <<EOF;
@@ -22,11 +23,17 @@ Usage: $0 [-hmnw]
 EOF
 }
 
+$npingwarn = 100.0;
+$npingwarnp = 20; # percent
+$npingcrit = 500.0;
+$npingcritp = 60; # percent
+
 # Idea for way to provide overrides for the functions in this script
-#eval 'require "/etc/sitesummary/sitesummary-nodes-override"';
-#if ($@ && $@ !~ qr{^Can't locate /etc/sitesummary/sitesummary-nodes-override}) {
-#    die $@;
-#};
+my $conffile = "/etc/sitesummary/sitesummary-nodes.conf";
+eval 'require "$conffile"';
+if ($@ && $@ !~ qr{^Can't locate $conffile}) {
+    die $@;
+};
 
 my %opts;
 getopts("hmnw", \%opts) || (usage(), exit(1));
@@ -315,7 +322,10 @@ sub generate_nagios_config {
             $hosts{$defaultroute} = $defaultroute;
             $hostgroup{"router"} = 1;
             print_nagios_service_check(0, $defaultroute, "ping",
-                                       "check_ping", "100.0,20%!500.0,60%");
+                                       "check_ping",
+                                       sprintf("%.1f,%d%%!%.1f,%d%%",
+                                               $npingwarn, $npingwarnp,
+                                               $npingcrit, $npingcritp));
         }
 
         my %switch = get_switch_info($hostid);
@@ -336,7 +346,10 @@ sub generate_nagios_config {
 
         # first, check ping to see if the other checks should be performed
         print_nagios_service_check(0, $hostname, "ping",
-                                   "check_ping", "100.0,20%!500.0,60%");
+                                   "check_ping",
+                                   sprintf("%.1f,%d%%!%.1f,%d%%",
+                                           $npingwarn, $npingwarnp,
+                                           $npingcrit, $npingcritp));
 
         my %tcpservices =
         (