diff options
Diffstat (limited to 'contrib')
| -rw-r--r-- | contrib/check_lmmon.pl | 19 |
1 files changed, 19 insertions, 0 deletions
diff --git a/contrib/check_lmmon.pl b/contrib/check_lmmon.pl new file mode 100644 index 00000000..bf4b4386 --- /dev/null +++ b/contrib/check_lmmon.pl @@ -0,0 +1,19 @@ +#!/usr/bin/perl +# NetSaint Temp warning script +# Written by: Nathan LeSueur + +if ($#ARGV < 1) { +print "Usage: $0 <critical temp> <warning temp> <normal temp>\n"; +exit; } $crit = shift; $warn = shift; $norm = shift; if ($warn > +$crit) { print "Warning level cannot be greater than critical +level!\n"; exit; } @b = qx{/usr/local/bin/lmmon -s}; foreach(@b) { @c += split(/ \/ /, $_); $d = $c[1]; } @e = split(/F/, $d); $f = $e[0]; + +$status = "$f degrees F\n"; + +if($f >= $crit) {print "CRITICAL - $status"; exit 2;} +if($f >= $warn) {print "WARNING - $status"; exit 1;} +if($f <= $norm && $f != 0) {print "OK - $status"; exit 0;} +else{print "UNKNOWN - unable to access smb\n"; exit (-1);} + + |