Nagios

From Teknologisk videncenter
Revision as of 20:54, 14 May 2009 by Heth (talk | contribs)
Jump to: navigation, search

check sensor example program

Script

Configured on FreeBSD file /usr/local/libexec/nagios/check_humidity

#!/usr/bin/perl
if (scalar(@ARGV) != 2) {
        print "Usage: $0 humidity_minimum humidity_maximum\n";
        exit 3;
}
my $hum_min = shift;
my $hum_max = shift;

open(TEMP, "/usr/bin/temp |");
while(my $line = <TEMP>) {
        if ($line =~ m/Humidity.+?(\d+)/ ) {
                my $humidity = $1;
                if ($humidity < $hum_min) {
                  print "Humidity is low under $hum_min% and now $humidity%\n";
                  exit 1;
                }
                if ($humidity > $hum_max) {
                  print "Humidity is high over $hum_max% and now $humidity%\n";
                  exit 2;
                }
                print "Humidity is OK. Now at $humidity%\n";
                exit 0;
        }
}

Links