Same module with added -i option for selection of RAID interface

#! /usr/bin/perl
# $Id: check_mpt.pl,v 0.2 2012/04/17 11:17:49 Exp $
#
# check_mpt.pl Copyright (C) 2006 Claudio Messineo
# version 0.2 modified by Marko Stojanovic – Added -i switch for selecting raid interface
#
#
# 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

use strict;
use English;
use Getopt::Long;
use vars qw($PROGNAME);
use lib “/usr/local/nagios/libexec” ;
use utils qw (%ERRORS &print_revision &support);

sub print_help ();
sub print_usage ();

my ($opt_h, $opt_V, $opt_c, $opt_i);
my ($result, $message, $mpt_path, $num_raid, $enabled ,$raidno);

$PROGNAME=”check_mpt”;
$mpt_path=”sudo /usr/sbin/mpt-status”;
$num_raid=2;
$enabled=1;
$raidno=0;

Getopt::Long::Configure(‘bundling’);
GetOptions(
“V” => $opt_V, “version” => $opt_V,
“h” => $opt_h, “help” => $opt_h,
“c=n” => $opt_c, “num_raid=n” => $opt_c,
“i=n” => $opt_i
);

if ($opt_V) {
print_revision($PROGNAME, ‘$Id: check_mpt.pl,v 0.2 2012/04/17 15:17:49 Exp $’);
exit $ERRORS{‘OK’};
}

if ($opt_h) {
print_help();
exit $ERRORS{‘OK’};
}

sub print_usage () {
print “Usage:n”;
print ” $PROGNAME n”;
print ” $PROGNAME [-h | –help]n”;
print ” $PROGNAME [-V | –version]n”;
print ” $PROGNAME n”;
}

sub print_help () {
print_revision($PROGNAME, ‘$Id: check_mpt.pl,v 0.1 2006/05/16 15:17:49 Exp $’);
print “Copyright (c) 2006 Claudio Messineo claudio@__no__spam__zero.it (s/__no__spam__//)nn”;
print_usage();
print “n”;
support();
}

if($opt_c =~ /^([0-9]+)$/){
$num_raid = $1;
}

if($opt_i =~ /^([0-9]+)$/){
$raidno = $1;
# print “OPT IS $opt_i n”;
# print “RAIDNO IS $raidno n”;
}

if ( ! open( MPT_STAT, ” $mpt_path -i $raidno | ” ) ) {
print “ERROR: could not open $mpt_path n”;
exit $ERRORS{‘UNKNOWN’};
}
else {
while () {
# print “$raidno n”;
if ( $_ =~ m/ENABLED/ ) {
$enabled–;
}
if ( $_ =~ m/ONLINE/ ) {
$num_raid–;
}
next;
}
if (($num_raid==0) and ($enabled==0)) {
print “Mpt-status OKn”;
exit $ERRORS{‘OK’};
}
else {
print “Mpt-status Alertn”;
exit $ERRORS{‘WARNING’};
}
}