upstream/monitoring-plugins
1
0
Fork 0
mirror of https://github.com/monitoring-plugins/monitoring-plugins.git synced 2026-06-08 16:26:23 -04:00
Code Issues Projects Releases Packages Wiki Activity Actions 6

Updated to use getopt (Christoph Maser)

Browse source 
git-svn-id: https://nagiosplug.svn.sourceforge.net/svnroot/nagiosplug/nagiosplug/trunk@69 f882894a-f735-0410-b71e-b25c423dba1c
This commit is contained in:
Ethan Galstad 2002-08-12 23:09:48 +00:00
parent cf34ddfdeb
commit 827e17f454
1 changed files with 28 additions and 16 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

44
contrib/check_disk_snmp.pl
View file

@ -2,25 +2,39 @@
# cm@financial.com 07/2002
use strict;
use Net::SNMP;
use Getopt::Std;
if ($#ARGV ne 3) {
print "Worng number of Arguments\n";
my %opts =(
u => 'nobody', # snmp user
l => 'authNoPriv', # snmp security level
a => 'MD5', # snmp authentication protocol
A => 'nopass', # authentication protocol pass phrase.
x => 'DES', # privacy protocol
m => 'localhost', # host
d => 1, # devicenumber
w => 70, # warnratio
c => 85, # critical ratio
h => 0,
);
getopts('m:u:l:a:A:x:d:w:c:h',\%opts);
if ( $opts{'h'} ) {
print "Usage: $0 [ -u <username> ] [ -l <snmp security level>] [ -a <snmp authentication protocol> ] [ -A <authentication protocol pass phrase> ] [ -x <snmp privacy protocol> ] [ -m <hostname>] [ -d <devicenumber> ] [ -w <warning ratio> ] [ -c <critical ratio ]\n";
exit 1;
}
my ($host, $device, $warnpercent, $errpercent) = @ARGV;
if ($warnpercent >= $errpercent) {
if ($opts{'w'} >= $opts{'c'}) {
print "Errorratio must be higher then Warnratio!\n";
exit 1;
}
my ($session, $error) = Net::SNMP->session(
-hostname => $host,
-hostname => $opts{'m'},
-nonblocking => 0x0,
-username => 'XXXXX',
-authpassword => 'XXXXXXXX',
-authprotocol => 'md5',
-username => $opts{'u'},
-authpassword => $opts{'A'},
-authprotocol => $opts{'a'},
-version => '3',
);
@ -31,10 +45,9 @@ if ($@) {
my $result=undef;
my $deviceSize=".1.3.6.1.2.1.25.2.3.1.5.$device";
my $deviceUsed=".1.3.6.1.2.1.25.2.3.1.6.$device";
#my $deviceName=".1.3.6.1.2.1.25.3.7.1.2.1536.$device";
my $deviceName=".1.3.6.1.2.1.25.2.3.1.3.$device";
my $deviceSize=".1.3.6.1.2.1.25.2.3.1.5.$opts{'d'}";
my $deviceUsed=".1.3.6.1.2.1.25.2.3.1.6.$opts{'d'}";
my $deviceName=".1.3.6.1.2.1.25.2.3.1.3.$opts{'d'}";
my @OID=($deviceSize, $deviceUsed, $deviceName);
$result = $session->get_request(
-varbindlist => \@OID,
@ -48,15 +61,14 @@ if (!defined($result)) {
my $ratio=$result->{$deviceUsed}*100/$result->{$deviceSize};
if ($ratio > $errpercent){
if ($ratio > $opts{'c'}){
printf("CRITICAL: %s usage %.2f%%\n", $result->{$deviceName}, $ratio);
exit 2;
}
if ($ratio > $warnpercent){
if ($ratio > $opts{'w'}){
printf("WARNING: %s usage %.2f%%\n", $result->{$deviceName}, $ratio);
exit 1;
}
printf("OK: %s usage %.2f%%\n", $result->{$deviceName}, $ratio);
exit 0;