Hello all,
I've googled around everywhere trying to find an answer here and came up
unsuccessful, so if anyone has had experience in this situation, I'd appreciate
help!
Basically, the issue that I'm having is that I have a couple of temperature
plugins that are reporting errors in Nagios and at the command line they're
exiting in 0:
check7204temp.pl - Return code of 255 is out of bounds
and
checkciscotemp.pl - Return code of 9 is out of bounds
If I run a "echo $?" at the command line after running the command
successfully, I get 0.
Thanks for any help anyone can provide!! My perms are 755 and nagios user owns
the plugins and I've run successfully with nagios user and got 0 output. I'm
really stumped!!
Here's the code for the plugins:
*******************************************
check7204temp.pl:
#!/usr/bin/perl -w
# check_ciscotemp.pl
#
# Copyright (C) 2000 Leland E. Vandervort <lel...@mmania.com> # # This program
is free software; you can redistribute it and/or # modify it under the terms of
the GNU General Public License # as published by the Free Software Foundation;
either version 2 # of the License, or (at your option) any later version.
#
# This program is distributed in the hope that it will be useful, # but WITHOUT
ANY WARRANTY; without even the implied warranty # of MERCHANTABILITY or FITNESS
FOR A PARTICULAR PURPOSE. See the # GNU General Public License for more details.
#
# you should have received a copy of the GNU General Public License # along
with this program (or with Nagios); if not, write to the # Free Software
Foundation, Inc., 59 Temple Place - Suite 330, # Boston, MA 02111-1307, USA
####################################
# Nagios pluging to check inlet and outlet temperatures on # Cisco router
platforms which support environmental monitoring # (7200, 7500, GSR12000...)
####################################
# default temperature thresholds are 30C for inlet, 40C outlet.
# if input or output is less than thresholds, returns OK # if equal to (the
temps don't change that rapidly) returns WARNING # if greater than threshold,
returns CRITICAL # if undetermined, or cannot access environmental, returns
UNKNOWN # (in accordance with the plugin coding guidelines)
####################################
use Net::SNMP;
use Getopt::Long;
#use strict;
&Getopt::Long::config('auto_abbrev');
#my $critical_vals;
#my $warning_vals;
#my $inlet_warn;
#my $outlet_warn;
#my $status;
my $response = "";
my $timeout = 10;
my $community = "blah";
my $port = 161;
my $INTAKE_TEMP = "1.3.6.1.4.1.9.9.13.1.3.1.3.1"; my $OUTLET_TEMP =
"1.3.6.1.4.1.9.9.13.1.3.1.3.3"; my $in_temp; my $out_temp; my $inlet_thresh =
30; my $outlet_thresh = 34; my $hostnm; #my $OID; #my $session; #my $state; #my
$error;
my %STATUSCODE = ( 'UNKNOWN' => '-1',
'OK' => '0',
'WARNING' => '1',
'CRITICAL' => '2');
my $state = "UNKNOWN";
　
$SIG{'ALRM'} = sub {
print "ERROR: No snmp response from $hostnm (sigALRM)\n";
exit($STATUSCODE{"UNKNOWN"});
};
Getopt::Long::Configure('bundling');
$status = GetOptions
("community=s", \$community,
"C=s", \$community,
"H=s", \$hostnm,
"hostname=s", \$hostnm,
"port=i", \$port,
"timeout=i", \$timeout,
"c=s", \$critical_vals,
"w=s", \$warning_vals,
"ithresh=i", \$inlet_thresh,
"othresh=i", \$outlet_thresh);
if($status == 0) {
&show_help;
}
unless (defined($hostnm)) {
$hostnm = shift || &show_help;
}
if (defined($critical_vals)) {
if ($critical_vals =~ m/^([0-9]+)[,:]([0-9]+)$/) {
($inlet_thresh,$outlet_thresh) = ($1, $2);
} else {
die "Cannot Parse Critical Thresholds\n";
}
}
if (defined($warning_vals)) {
if ($warning_vals =~ m/^([0-9]+)[:,]([0-9]+)$/) {
($inlet_warn,$outlet_warn) = ($1, $2);
} else {
die "Cannot Parse Warning Thresholds\n";
}
}else{
$inlet_warn=$inlet_thresh;
$outlet_warn=$outlet_thresh;
}
alarm($timeout);
$in_temp = &SNMPGET($INTAKE_TEMP);
$out_temp = &SNMPGET($OUTLET_TEMP);
if (($in_temp < $inlet_thresh) && ($out_temp < $outlet_thresh)) {
$state = "OK";
}
elsif (($in_temp == $inlet_thresh) || ($out_temp == $outlet_thresh)) {
if(($in_temp > $inlet_thresh) || ($out_temp > $outlet_thresh)) {
$state = "CRITICAL";
}
else {
$state = "WARNING";
}
}
elsif (($in_temp > $inlet_thresh) || ($out_temp > $outlet_thresh)) {
$state = "CRITICAL";
}
else {
$state = "WARNING";
}
print "$state Inlet Temp: $in_temp Outlet Temp: $out_temp\n";
exit($STATUSCODE{$state});
sub show_help {
printf("\nPerl envmon temperature plugin for Nagios\n");
printf("Usage:\n");
printf("
check_ciscotemp [options] <hostname>
Options:
-C snmp-community
-p snmp-port
-i input temperature threshold
-o output temperature threshold
");
printf("Copyright (C)2000 Leland E. Vandervort\n");
printf("check_ciscotemp comes with absolutely NO WARRANTY either implied or
explicit\n");
printf("This program is licensed under the terms of the\n");
printf("GNU General Public License\n(check source code for details)\n\n\n");
exit($STATUSCODE{"UNKNOWN"});
}
sub SNMPGET {
$OID = shift;
($session,$error) = Net::SNMP->session(
Hostname => $hostnm,
Community => $community,
Port => $port
);
if(!defined($session)) {
printf("$state %s\n", $error);
exit($STATUSCODE{$state});
}
if(!defined($response = $session->get_request($OID))) {
printf("$state %s\n", $session->error());
$session->close();
exit($STATUSCODE{$state});
}
$session->close();
return($response->{$OID});
}
*******************************************************
code for checkciscotemp.pl　
#!/usr/bin/perl -w
# check_ciscotemp.pl
#
# Copyright (C) 2000 Leland E. Vandervort <lel...@mmania.com> # # This program
is free software; you can redistribute it and/or # modify it under the terms of
the GNU General Public License # as published by the Free Software Foundation;
either version 2 # of the License, or (at your option) any later version.
#
# This program is distributed in the hope that it will be useful, # but WITHOUT
ANY WARRANTY; without even the implied warranty # of MERCHANTABILITY or FITNESS
FOR A PARTICULAR PURPOSE. See the # GNU General Public License for more details.
#
# you should have received a copy of the GNU General Public License # along
with this program (or with Nagios); if not, write to the # Free Software
Foundation, Inc., 59 Temple Place - Suite 330, # Boston, MA 02111-1307, USA
####################################
# Nagios pluging to check inlet and outlet temperatures on # Cisco router
platforms which support environmental monitoring # (7200, 7500, GSR12000...)
####################################
# default temperature thresholds are 30C for inlet, 40C outlet.
# if input or output is less than thresholds, returns OK # if equal to (the
temps don't change that rapidly) returns WARNING # if greater than threshold,
returns CRITICAL # if undetermined, or cannot access environmental, returns
UNKNOWN # (in accordance with the plugin coding guidelines)
####################################
use Net::SNMP;
use Getopt::Long;
#use strict;
&Getopt::Long::config('auto_abbrev');
#my $critical_vals;
#my $warning_vals;
#my $inlet_warn;
#my $outlet_warn;
#my $status;
my $response = "";
my $timeout = 10;
my $community = "blah";
my $port = 161;
my $INTAKE_TEMP = "1.3.6.1.4.1.9.9.13.1.3.1.3.1"; my $OUTLET_TEMP =
"1.3.6.1.4.1.9.9.13.1.3.1.3.3"; my $in_temp; my $out_temp; my $inlet_thresh =
22; my $outlet_thresh = 32; my $hostnm; #my $OID; #my $session; #my $state; #my
$error;
my %STATUSCODE = ( 'UNKNOWN' => '-1',
'OK' => '0',
'WARNING' => '1',
'CRITICAL' => '2');
my $state = "UNKNOWN";
　
$SIG{'ALRM'} = sub {
print "ERROR: No snmp response from $hostnm (sigALRM)\n";
exit($STATUSCODE{"UNKNOWN"});
};
Getopt::Long::Configure('bundling');
$status = GetOptions
("community=s", \$community,
"C=s", \$community,
"H=s", \$hostnm,
"hostname=s", \$hostnm,
"port=i", \$port,
"timeout=i", \$timeout,
"c=s", \$critical_vals,
"w=s", \$warning_vals,
"ithresh=i", \$inlet_thresh,
"othresh=i", \$outlet_thresh);
if($status == 0) {
&show_help;
}
unless (defined($hostnm)) {
$hostnm = shift || &show_help;
}
if (defined($critical_vals)) {
if ($critical_vals =~ m/^([0-9]+)[,:]([0-9]+)$/) {
($inlet_thresh,$outlet_thresh) = ($1, $2);
} else {
die "Cannot Parse Critical Thresholds\n";
}
}
if (defined($warning_vals)) {
if ($warning_vals =~ m/^([0-9]+)[:,]([0-9]+)$/) {
($inlet_warn,$outlet_warn) = ($1, $2);
} else {
die "Cannot Parse Warning Thresholds\n";
}
}else{
$inlet_warn=$inlet_thresh;
$outlet_warn=$outlet_thresh;
}
alarm($timeout);
$in_temp = &SNMPGET($INTAKE_TEMP);
$out_temp = &SNMPGET($OUTLET_TEMP);
if (($in_temp < $inlet_thresh) && ($out_temp < $outlet_thresh)) {
$state = "OK";
}
elsif (($in_temp == $inlet_thresh) || ($out_temp == $outlet_thresh)) {
if(($in_temp > $inlet_thresh) || ($out_temp > $outlet_thresh)) {
$state = "CRITICAL";
}
else {
$state = "WARNING";
}
}
elsif (($in_temp > $inlet_thresh) || ($out_temp > $outlet_thresh)) {
$state = "CRITICAL";
}
else {
$state = "WARNING";
}
print "$state Inlet Temp: $in_temp Outlet Temp: $out_temp\n";
exit($STATUSCODE{$state});
sub show_help {
printf("\nPerl envmon temperature plugin for Nagios\n");
printf("Usage:\n");
printf("
check_ciscotemp [options] <hostname>
Options:
-C snmp-community
-p snmp-port
-i input temperature threshold
-o output temperature threshold
");
printf("Copyright (C)2000 Leland E. Vandervort\n");
printf("check_ciscotemp comes with absolutely NO WARRANTY either implied or
explicit\n");
printf("This program is licensed under the terms of the\n");
printf("GNU General Public License\n(check source code for details)\n\n\n");
exit($STATUSCODE{"UNKNOWN"});
}
sub SNMPGET {
$OID = shift;
($session,$error) = Net::SNMP->session(
Hostname => $hostnm,
Community => $community,
Port => $port
);
if(!defined($session)) {
printf("$state %s\n", $error);
exit($STATUSCODE{$state});
}
if(!defined($response = $session->get_request($OID))) {
printf("$state %s\n", $session->error());
$session->close();
exit($STATUSCODE{$state});
}
$session->close();
return($response->{$OID});
}
*********************************************
Thanks,
Missy
------------------------------------------------------------------------------
This SF.net email is sponsored by
Make an app they can't live without
Enter the BlackBerry Developer Challenge
http://p.sf.net/sfu/RIM-dev2dev
_______________________________________________
Nagios-users mailing list
Nagios-users@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/nagios-users
::: Please include Nagios version, plugin version (-v) and OS when reporting
any issue.
::: Messages without supporting info will risk being sent to /dev/null
