mirror of
https://github.com/thomas-krenn/check_lsi_raid.git
synced 2026-02-24 12:48:42 +01:00
7d77d1a985
- Added default temperature values for controller and physical devices as global variable - Updated the displayUsage-function: added global variables, fixed typos and missing line break - Updated the displayHelp-function: fixed missing line break - Fixed wrong output because of missing whitespaces in getControllerStatus and getBBUStatus - Added global temperature variables to MAIN-function
964 lines
38 KiB
Perl
964 lines
38 KiB
Perl
#!/usr/bin/perl -w
|
|
# ======================================================================================
|
|
# $Id: check_lsi_raid | Thu May 2 20:38:21 2013 +0200 | Alexander Scheipner $
|
|
# check_lsi_raid: Nagios/Icinga plugin to check LSI Raid Controller status
|
|
# --------------------------------------------------------------------------------------
|
|
# Created as part of a semester project at the University of Applied Sciences Hagenberg
|
|
# (http://www.fh-ooe.at/en/hagenberg-campus/)
|
|
#
|
|
# Copyright (c) 2013:
|
|
# Grubhofer Martin (s1110239013@students.fh-hagenberg.at)
|
|
# Scheipner Alexander (s1110239032@students.fh-hagenberg.at)
|
|
# Werner Sebastian (s1110239038@students.fh-hagenberg.at)
|
|
#
|
|
# 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 3 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; if not, see <http://www.gnu.org/licenses/>.
|
|
# ======================================================================================
|
|
use strict;
|
|
use warnings;
|
|
use Getopt::Long qw(:config no_ignore_case);
|
|
use feature qw/switch/; #später durch nachfolgende Zeile ersetzen, da wir noch mit Perl 5 arbeiten!
|
|
#use Switch 'Perl6';
|
|
|
|
our $VERBOSITY = 0;
|
|
our $VERSION = "0.3";
|
|
our $NAME = "check_lsi_raid: Nagios/Icinga plugin to check LSI Raid Controller status";
|
|
our $C_TEMP_WARNING = 60;
|
|
our $C_TEMP_CRITICAL = 65;
|
|
our $PD_TEMP_WARNING = 40;
|
|
our $PD_TEMP_CRITICAL = 45;
|
|
|
|
use constant {
|
|
STATE_OK => 0,
|
|
STATE_WARNING => 1,
|
|
STATE_CRITICAL => 2,
|
|
STATE_UNKNOWN => 3,
|
|
};
|
|
|
|
# Always return the highest state level
|
|
sub getExitState {
|
|
my $returnState = STATE_OK;
|
|
# check if no state is NULL
|
|
if (!defined($_[0]) || !defined($_[1])) {
|
|
$returnState = STATE_UNKNOWN;
|
|
}
|
|
# check previous state
|
|
if ($_[0] > $returnState) {
|
|
$returnState = $_[0];
|
|
}
|
|
# check upcoming state
|
|
if ($_[1] > $returnState) {
|
|
$returnState = $_[1];
|
|
}
|
|
return $returnState;
|
|
}
|
|
|
|
# Explains the Usage of the plugin, also which options take which values
|
|
sub displayUsage {
|
|
print "Usage: \n";
|
|
print " [ -h | --help ]\n Display this help page\n";
|
|
print " [ -v | -vv | -vvv | --verbose ]\n Sets the verbosity level.\n no -v is the normal single line output for Nagios/Icinga\n -v is a more detailed version but still usable in Nagios.\n -vv is a multiline output for debugging configuration errors or more detailed information.\n -vvv is for plugin problem diagnosis.\n For further information please visit: http://nagiosplug.sourceforge.net/developer-guidelines.html#AEN39\n";
|
|
print " [ -V --version ]\n Displays the Version of the tk-lsi-plugin and the version of StorCLI\n";
|
|
print " [ -C <Controller Number> | --controller <Controller Number> ]\n Specifies a Controller number, defaults to 0\n";
|
|
print " [ -EID | --enclosure ]\n Specifies one or more Enclosures, defaults to all\n Takes either an integer as additional argument (>=0) or a comma seperated list(0,1,2,3,...)\n";
|
|
print " [ -LD | --logicaldevice ]\n Specifies one or more Logical Devices, defaults to all\n Takes either an integer as additional argument (>=0) or a comma seperated list(0,1,2,3,...)\n";
|
|
print " [ -PD | --physicaldevice ]\n Specifies one or more Physical Devices, defaults to all\n Takes either an integer as additional argument (>=0) or a comma seperated list(0,1,2,3,...)\n";
|
|
print " [ -Tw | --temperature-warn ]\n Specifies the RAID-Controller temperature warning range, default is ${C_TEMP_WARNING}C or more\n";
|
|
print " [ -Tc | --temperature-critical ]\n Specifies the RAID-Controller temperature critical error range, default is ${C_TEMP_CRITICAL}C or more\n";
|
|
print " [ -PDTw | --physicaldevicetemperature-warn ]\n Specifies the disk temperature warning range, default is ${PD_TEMP_WARNING}C or more\n";
|
|
print " [ -PDTc | --physicaldevicetemperature-critical ]\n Specifies the disk temperature critical error range, default is ${PD_TEMP_CRITICAL}C or more\n";
|
|
print " [ -p <path> | --path <path>]\n Specifies the path to StorCLI, default is /usr/bin/storcli or C:\\Programme\\...\\storcli.exe\n";
|
|
print " [ -b <0/1> | BBU <0/1> ]\n Boolean Value which specifies if an Battery Backup Unit is present (1 is present/0 is not present). Default is 1\n This option is only needed if you have an LSI-Raid Controller without a Battery Backup Unit.\n";
|
|
}
|
|
|
|
# Displays a short Help text for the user
|
|
# TODO: ADD URL and Mailing List
|
|
sub displayHelp {
|
|
print $NAME . " Version: " . $VERSION ."\n";
|
|
print "Copyright (C) 2009-2013 Thomas-Krenn.AG\n";
|
|
print "Current updates available at http://www.thomas-krenn.com/en/oss/<NOT HERE YET!!!!!!>/\n";
|
|
print "This Nagios/Icinga Plugin checks LSI RAID-Controllers for Controller, \nPhysical-Device and Logical Device warnings and errors.\n";
|
|
print "In order for this plugin to work properly you need to add the \nnagios-user to your sudoers file (or create a new one in /etc/sudoers.d/)\n";
|
|
displayUsage();
|
|
print "Further information about this plugin can be found at
|
|
http://www.thomas-krenn.com/en/oss/<NOT THERE YET!>
|
|
Send email to the <NOT THERE YET!>-plugin-user mailing list if you have questions regarding
|
|
use of this software, to submit patches, or suggest improvements.
|
|
The mailing list is available at http://lists.thomas-krenn.com/\n";
|
|
exit(STATE_OK);
|
|
}
|
|
|
|
# Prints the Name, Version of the Plugin
|
|
# Also Prints the version of StorCLI
|
|
sub displayVersion {
|
|
my $sudo = $_[0];
|
|
my $storcli = $_[1];
|
|
my @storcliVersion = `$sudo $storcli -v`;
|
|
print $NAME . "\nVersion: ". $VERSION . "\n\n";
|
|
foreach my $line (@storcliVersion){
|
|
if($line =~ /^\s*Storage/) {
|
|
$line =~ s/^\s+|\s+$//g;
|
|
print $line;
|
|
}
|
|
}
|
|
print "\n";
|
|
exit(STATE_OK);
|
|
}
|
|
|
|
# Returns information about:
|
|
# - Controller status and controller temperature
|
|
sub getControllerStatus {
|
|
my $sudo = $_[0];
|
|
my $storcli = $_[1];
|
|
my $controller = $_[2];
|
|
my @temperature_w = @{($_[3])};
|
|
my @temperature_c = @{($_[4])};
|
|
|
|
my $command = "$sudo $storcli /c$controller show all";
|
|
my $status = 0; # Return Status
|
|
my $statusMessage = ''; # Return String
|
|
|
|
my @output = `$command`;
|
|
|
|
if($output[1] eq "Status = Success\n") {
|
|
foreach my $line (@output) {
|
|
my $first;
|
|
my $last;
|
|
my $temp;
|
|
my $crit = 0;
|
|
if($line =~ /^([a-zA-Z0-9]*)/) {
|
|
$first = $1;
|
|
if($line =~ /([a-zA-Z0-9]*)$/) {
|
|
$last = $1;
|
|
given($first) {
|
|
when("Controller") {
|
|
if($line =~ /\s+([a-zA-Z0-9]*)/) {
|
|
given($1) {
|
|
when("Status") {
|
|
if($last ne "OK") {
|
|
$status = getExitState($status, STATE_WARNING);
|
|
$statusMessage .= "Ctrl. status not optimal, ";
|
|
}
|
|
}
|
|
when("must") {
|
|
if($last ne "No") {
|
|
$status = getExitState($status, STATE_CRITICAL);
|
|
$statusMessage .= "Ctrl. needs reboot, ";
|
|
}
|
|
}
|
|
when("has") {
|
|
if($last ne "No") {
|
|
$status = getExitState($status, STATE_WARNING);
|
|
$statusMessage .= "Ctrl. booted in safe mode, ";
|
|
}
|
|
}
|
|
when("temperature") {
|
|
$temp = $last;
|
|
if($temperature_w[0] eq "in") {
|
|
if(($temp >= $temperature_w[1]) && ($temp <= $temperature_w[2])) {
|
|
# is in warn range, so also check if in critical error range
|
|
if($temperature_c[0] eq "in") {
|
|
if(($temp >= $temperature_c[1]) && ($temp <= $temperature_c[2])) {
|
|
# critical error
|
|
$crit = 1;
|
|
$status = getExitState($status, STATE_CRITICAL);
|
|
if ($VERBOSITY == 0) {$statusMessage .= "Ctrl. temp. critical, "; }
|
|
if ($VERBOSITY == 1) {$statusMessage .= "Ctrl. temp. is critical (${temp}C), "; }
|
|
if ($VERBOSITY >= 2) {$statusMessage .= "Controller temperature is critical (${temp}C), "; }
|
|
}
|
|
} else {
|
|
if(($temp < $temperature_c[1]) || ($temp > $temperature_c[2])) {
|
|
# critical error
|
|
$crit = 1;
|
|
$status = getExitState($status, STATE_CRITICAL);
|
|
if ($VERBOSITY == 0) {$statusMessage .= "Ctrl. temp. critical, "; }
|
|
if ($VERBOSITY == 1) {$statusMessage .= "Ctrl. temp. is critical (${temp}C), "; }
|
|
if ($VERBOSITY >= 2) {$statusMessage .= "Controller temperature is critical (${temp}C), "; }
|
|
}
|
|
}
|
|
if($crit eq 0) { # only warn if not already given a critical error
|
|
$status = getExitState($status, STATE_WARNING);
|
|
if ($VERBOSITY == 0) {$statusMessage .= "Ctrl. temp. warning, "; }
|
|
if ($VERBOSITY == 1) {$statusMessage .= "Ctrl. temp. warning (${temp}C), "; }
|
|
if ($VERBOSITY >= 2) {$statusMessage .= "Controller temperature warning (${temp}C), "; }
|
|
}
|
|
}
|
|
} else {
|
|
if(($temp < $temperature_w[1]) || ($temp > $temperature_w[2])) {
|
|
# is in warn range, so also check if in critical error range
|
|
if($temperature_c[0] eq "in") {
|
|
if(($temp >= $temperature_c[1]) && ($temp <= $temperature_c[2])) {
|
|
# critical error
|
|
$crit = 1;
|
|
$status = getExitState($status, STATE_CRITICAL);
|
|
if ($VERBOSITY == 0) {$statusMessage .= "Ctrl. temp. critical, "; }
|
|
if ($VERBOSITY == 1) {$statusMessage .= "Ctrl. temp. is critical (${temp}C), "; }
|
|
if ($VERBOSITY >= 2) {$statusMessage .= "Controller temperature is critical (${temp}C), "; }
|
|
}
|
|
} else {
|
|
if(($temp < $temperature_c[1]) || ($temp > $temperature_c[2])) {
|
|
# critical error
|
|
$crit = 1;
|
|
$status = getExitState($status, STATE_CRITICAL);
|
|
if ($VERBOSITY == 0) {$statusMessage .= "Ctrl. temp. critical, "; }
|
|
if ($VERBOSITY == 1) {$statusMessage .= "Ctrl. temp. is critical (${temp}C), "; }
|
|
if ($VERBOSITY >= 2) {$statusMessage .= "Controller temperature is critical (${temp}C), "; }
|
|
}
|
|
}
|
|
if($crit eq 0) { # only warn if not already given a critical error
|
|
$status = getExitState($status, STATE_WARNING);
|
|
if ($VERBOSITY == 0) {$statusMessage .= "Ctrl. temp. warning, "; }
|
|
if ($VERBOSITY == 1) {$statusMessage .= "Ctrl. temp. warning (${temp}C), "; }
|
|
if ($VERBOSITY >= 2) {$statusMessage .= "Controller temperature warning (${temp}C), "; }
|
|
}
|
|
}
|
|
}
|
|
}
|
|
}
|
|
}
|
|
}
|
|
when("ROC") {
|
|
if($line =~ /\s+([a-zA-Z0-9]*)/) {
|
|
if($1 eq "temperature") {
|
|
$temp = $last;
|
|
if($temperature_w[0] eq "in") {
|
|
if(($temp >= $temperature_w[1]) && ($temp <= $temperature_w[2])) {
|
|
# is in warn range, so also check if in critical error range
|
|
if($temperature_c[0] eq "in") {
|
|
if(($temp >= $temperature_c[1]) && ($temp <= $temperature_c[2])) {
|
|
# critical error
|
|
$crit = 1;
|
|
$status = getExitState($status, STATE_CRITICAL);
|
|
if ($VERBOSITY == 0) {$statusMessage .= "ROC temp. critical, "; }
|
|
if ($VERBOSITY == 1) {$statusMessage .= "ROC temp. is critical (${temp}C), "; }
|
|
if ($VERBOSITY >= 2) {$statusMessage .= "ROC temperature is critical (${temp}C), "; }
|
|
}
|
|
} else {
|
|
if(($temp < $temperature_c[1]) || ($temp > $temperature_c[2])) {
|
|
# critical error
|
|
$crit = 1;
|
|
$status = getExitState($status, STATE_CRITICAL);
|
|
if ($VERBOSITY == 0) {$statusMessage .= "ROC temp. critical, "; }
|
|
if ($VERBOSITY == 1) {$statusMessage .= "ROC temp. is critical (${temp}C), "; }
|
|
if ($VERBOSITY >= 2) {$statusMessage .= "ROC temperature is critical (${temp}C), "; }
|
|
}
|
|
}
|
|
if($crit eq 0) { # only warn if not already given a critical error
|
|
$status = getExitState($status, STATE_WARNING);
|
|
if ($VERBOSITY == 0) {$statusMessage .= "ROC temp. warning, "; }
|
|
if ($VERBOSITY == 1) {$statusMessage .= "ROC temp. warning (${temp}C), "; }
|
|
if ($VERBOSITY >= 2) {$statusMessage .= "ROC temperature warning (${temp}C), "; }
|
|
}
|
|
}
|
|
} else {
|
|
if(($temp < $temperature_w[1]) || ($temp > $temperature_w[2])) {
|
|
# is in warn range, so also check if in critical error range
|
|
if($temperature_c[0] eq "in") {
|
|
if(($temp >= $temperature_c[1]) && ($temp <= $temperature_c[2])) {
|
|
# critical error
|
|
$crit = 1;
|
|
$status = getExitState($status, STATE_CRITICAL);
|
|
if ($VERBOSITY == 0) {$statusMessage .= "ROC temp. critical, "; }
|
|
if ($VERBOSITY == 1) {$statusMessage .= "ROC temp. is critical (${temp}C), "; }
|
|
if ($VERBOSITY >= 2) {$statusMessage .= "ROC temperature is critical (${temp}C), "; }
|
|
}
|
|
} else {
|
|
if(($temp < $temperature_c[1]) || ($temp > $temperature_c[2])) {
|
|
# critical error
|
|
$crit = 1;
|
|
$status = getExitState($status, STATE_CRITICAL);
|
|
if ($VERBOSITY == 0) {$statusMessage .= "ROC temp. critical, "; }
|
|
if ($VERBOSITY == 1) {$statusMessage .= "ROC temp. is critical (${temp}C), "; }
|
|
if ($VERBOSITY >= 2) {$statusMessage .= "ROC temperature is critical (${temp}C), "; }
|
|
}
|
|
}
|
|
if($crit eq 0) { # only warn if not already given a critical error
|
|
$status = getExitState($status, STATE_WARNING);
|
|
if ($VERBOSITY == 0) {$statusMessage .= "ROC temp. warning, "; }
|
|
if ($VERBOSITY == 1) {$statusMessage .= "ROC temp. warning (${temp}C), "; }
|
|
if ($VERBOSITY >= 2) {$statusMessage .= "ROC temperature warning (${temp}C), "; }
|
|
}
|
|
}
|
|
}
|
|
}
|
|
}
|
|
}
|
|
when("Memory") {
|
|
if($line =~ /(\s+[a-zA-Z0-9]*)/) {
|
|
given($1) {
|
|
when("Correctable") {
|
|
if($last ne "0") {
|
|
$status = getExitState($status, STATE_WARNING);
|
|
$statusMessage .= "Memory correctable errors detected, ";
|
|
}
|
|
}
|
|
when("Uncorrectable") {
|
|
if($last ne "0") {
|
|
$status = getExitState($status, STATE_CRITICAL);
|
|
$statusMessage .= "Memory uncorrectable errors detected, ";
|
|
}
|
|
}
|
|
}
|
|
}
|
|
}
|
|
when("Failed") {
|
|
if($last ne "No") {
|
|
$status = getExitState($status, STATE_WARNING);
|
|
$statusMessage .= "Failed to get lock key on bootup, ";
|
|
}
|
|
}
|
|
when("A") {
|
|
if($last ne "No") {
|
|
$status = getExitState($status, STATE_WARNING);
|
|
$statusMessage .= "A rollback operation is in progress, ";
|
|
}
|
|
}
|
|
}
|
|
}
|
|
}
|
|
}
|
|
return ($status, $statusMessage);
|
|
} else {
|
|
print "Invalid StorCLI command!";
|
|
exit(STATE_UNKNOWN);
|
|
}
|
|
}
|
|
|
|
# Returns information about:
|
|
# - Logical device status
|
|
sub getLogicalDeviceStatus {
|
|
my $sudo = $_[0];
|
|
my $storcli = $_[1];
|
|
my $controller = $_[2];
|
|
my @logDevices = @{($_[3])};
|
|
my $action = $_[4];
|
|
|
|
my $command = "$sudo $storcli /c$controller ";
|
|
my $status = 0; # Return Status
|
|
my $statusMessage = ''; # Return String
|
|
|
|
given(scalar(@logDevices)) {
|
|
when(0) { $command .= "/vall"; }
|
|
when(1) { $command .= "/v$logDevices[0]"; }
|
|
default { $command .= "/v".join(",", @logDevices); }
|
|
}
|
|
$command .= " show $action";
|
|
my @output = `$command`;
|
|
|
|
if($output[1] eq "Status = Success\n") {
|
|
if($action eq "all") {
|
|
my $output_dev = -1;
|
|
my $flag = -1;
|
|
foreach my $line (@output) {
|
|
if($flag > 0) {
|
|
$flag--;
|
|
} elsif($line =~ /^\/c$controller\/v([0-9]*)/) {
|
|
$output_dev = $1;
|
|
$flag = 6;
|
|
}
|
|
if($flag eq 0) {
|
|
$flag = -1;
|
|
my @values = split(' ',$line);
|
|
if($values[2] ne "Optl") {
|
|
if($values[4] eq "Yes") {
|
|
$status = getExitState($status, STATE_WARNING);
|
|
if ($VERBOSITY == 0) {$statusMessage .= "Virtual disk state not optimal, "; }
|
|
if ($VERBOSITY >= 1) {$statusMessage .= "Virtual disk $output_dev state not optimal ($values[2]), "; }
|
|
} else {
|
|
$status = getExitState($status, STATE_CRITICAL);
|
|
if ($VERBOSITY == 0) {$statusMessage .= "Virtual disk not consistant, "; }
|
|
if ($VERBOSITY >= 1) {$statusMessage .= "Virtual disk $output_dev is not consistant (state $values[2]), "; }
|
|
}
|
|
}
|
|
else {
|
|
if($values[4] ne "Yes") {
|
|
$status = getExitState($status, STATE_WARNING);
|
|
if ($VERBOSITY == 0) {$statusMessage .= "Virtual disk state optimal, but not consistent, "; }
|
|
if ($VERBOSITY >= 1) {$statusMessage .= "Virtual disk $output_dev state optimal, but not consistent, "; }
|
|
}
|
|
}
|
|
}
|
|
}
|
|
} elsif($action eq "init") {
|
|
my $output_dev = -1;
|
|
my $flag = -1;
|
|
foreach my $line (@output) {
|
|
if($flag > 0 ) {
|
|
$flag--;
|
|
} elsif($line =~ /^VD\ Operation\ Status\ :/) {
|
|
$flag = 6;
|
|
}
|
|
if($flag eq 0) {
|
|
my @values = split(' ',$line);
|
|
if($values[0] =~ /^[0-9]*$/) {
|
|
if($values[3] ne "Not") {
|
|
$status = getExitState($status, STATE_WARNING);
|
|
if ($VERBOSITY == 0) {$statusMessage .= "Virtual disk initialization in progress, "; }
|
|
if ($VERBOSITY >= 1) {$statusMessage .= "Virtual disk $values[0] initialization in progress ($values[2] %), "; }
|
|
}
|
|
} else {
|
|
last;
|
|
}
|
|
}
|
|
}
|
|
}
|
|
return ($status, $statusMessage);
|
|
} else {
|
|
print "Invalid StorCLI command!";
|
|
exit(STATE_UNKNOWN);
|
|
}
|
|
}
|
|
|
|
# Returns information about:
|
|
# - Physical device status
|
|
sub getPhysDeviceStatus {
|
|
my $sudo = $_[0];
|
|
my $storcli = $_[1];
|
|
my $controller = $_[2];
|
|
my @enclosures = @{($_[3])};
|
|
my @physDevices = @{($_[4])};
|
|
my @physicalDeviceTemperature_w = @{($_[5])};
|
|
my @physicalDeviceTemperature_c = @{($_[6])};
|
|
my $action = $_[7];
|
|
|
|
my $command = "$sudo $storcli /c$controller";
|
|
my $status = 0;
|
|
my $statusMessage = '';
|
|
|
|
given(scalar(@enclosures)) {
|
|
when(0) { $command .= "/eall"; }
|
|
when(1) { $command .= "/e$enclosures[0]"; }
|
|
default { $command .= "/e".join(",", @enclosures); }
|
|
}
|
|
given(scalar(@physDevices)) {
|
|
when(0) { $command .= "/sall"; }
|
|
when(1) { $command .= "/s$physDevices[0]"; }
|
|
default { $command .= "/s".join(",", @physDevices); }
|
|
}
|
|
$command .= " show $action";
|
|
my @output = `$command`;
|
|
|
|
if($output[1] eq "Status = Success\n") {
|
|
if($action eq "all") {
|
|
my $output_enc = -1;
|
|
my $output_dev = -1;
|
|
my $flag = -1;
|
|
foreach my $line (@output) {
|
|
if($flag > 0) {
|
|
$flag--;
|
|
} elsif($line =~ /^Drive\s\/c$controller\/e([0-9]*)\/s([0-9]*)\s\:/) {
|
|
# Check the overall drive state
|
|
$output_enc = $1;
|
|
$output_dev = $2;
|
|
$flag = 6;
|
|
} elsif($line =~ /^Drive\s\/c$controller\/e([0-9]*)\/s([0-9]*)\sState\s\:/) {
|
|
# Check the drive state in block Detailed information
|
|
$output_enc = $1;
|
|
$output_dev = $2;
|
|
$flag = 1;
|
|
} elsif($flag eq 0 && index($line, " ") eq -1) {
|
|
# Detect the end of the block which was last checked
|
|
$flag = -1;
|
|
} elsif($flag eq 0) {
|
|
my @values = split(' ',$line);
|
|
if($values[0] =~ /^[0-9]*:[0-9]*/) {
|
|
# Check the overall drive state
|
|
if($values[2] eq "Offln") {
|
|
$status = getExitState($status, STATE_WARNING);
|
|
if ($VERBOSITY == 0) {$statusMessage .= "Physical drive is offline, "; }
|
|
if ($VERBOSITY >= 1) {$statusMessage .= "Physical drive $output_dev in enclosure $output_enc is offline, "; }
|
|
} elsif($values[2] eq "UBad") {
|
|
$status = getExitState($status, STATE_CRITICAL);
|
|
if ($VERBOSITY == 0) {$statusMessage .= "Physical drive state is Unconfigured Bad, "; }
|
|
if ($VERBOSITY >= 1) {$statusMessage .= "Physical drive $output_dev state in enclosure $output_enc is Unconfigured Bad, "; }
|
|
}
|
|
} elsif($values[0] =~ /^[a-zA-Z\.]*/) {
|
|
# Check the drive state in block Detailed information
|
|
given($values[0]) {
|
|
when("Shield") {
|
|
if($values[3] ne "0") {
|
|
$status = getExitState($status, STATE_WARNING);
|
|
if ($VERBOSITY == 0) {$statusMessage .= "Shield counter (phys. drive) not 0, "; }
|
|
if ($VERBOSITY == 1) {$statusMessage .= "Physical drive $output_dev: shield counter not 0, "; }
|
|
if ($VERBOSITY >= 2) {$statusMessage .= "Physical drive $output_dev in enclosure $output_enc: shield counter not 0, "; }
|
|
}
|
|
}
|
|
when("Media") {
|
|
if($values[4] ne "0") {
|
|
$status = getExitState($status, STATE_WARNING);
|
|
if ($VERBOSITY == 0) {$statusMessage .= "Media error count (phys. drive) not 0, "; }
|
|
if ($VERBOSITY == 1) {$statusMessage .= "Physical drive $output_dev: media error count not 0, "; }
|
|
if ($VERBOSITY >= 2) {$statusMessage .= "Physical drive $output_dev in enclosure $output_enc: media error count not 0, "; }
|
|
}
|
|
}
|
|
when("Other") {
|
|
if($values[4] ne "0") {
|
|
$status = getExitState($status, STATE_WARNING);
|
|
if ($VERBOSITY == 0) {$statusMessage .= "Other error count (phys. drive) not 0, "; }
|
|
if ($VERBOSITY == 1) {$statusMessage .= "Physical drive $output_dev: media error count not 0, "; }
|
|
if ($VERBOSITY >= 2) {$statusMessage .= "Physical drive $output_dev in enclosure $output_enc: media error count not 0, "; }
|
|
}
|
|
}
|
|
when("Drive") {
|
|
chop($values[3]);
|
|
my $temp = $values[3];
|
|
my $crit = 0;
|
|
# check for warn range
|
|
if($physicalDeviceTemperature_w[0] eq "in") {
|
|
if(($temp >= $physicalDeviceTemperature_w[1]) && ($temp <= $physicalDeviceTemperature_w[2])) {
|
|
# is in warn range, so also check if in critical error range
|
|
if($physicalDeviceTemperature_c[0] eq "in") {
|
|
if(($temp >= $physicalDeviceTemperature_c[1]) && ($temp <= $physicalDeviceTemperature_c[2])) {
|
|
# critical error
|
|
$crit = 1;
|
|
$status = getExitState($status, STATE_CRITICAL);
|
|
if ($VERBOSITY == 0) {$statusMessage .= "Phys. drive temperature critical, "; }
|
|
if ($VERBOSITY == 1) {$statusMessage .= "Physical drive $output_dev: temperature is ${temp}C, "; }
|
|
if ($VERBOSITY >= 2) {$statusMessage .= "Physical drive $output_dev in enclosure $output_enc: temperature is ${temp}C, "; }
|
|
}
|
|
} else {
|
|
if(($temp < $physicalDeviceTemperature_c[1]) || ($temp > $physicalDeviceTemperature_c[2])) {
|
|
# critical error
|
|
$crit = 1;
|
|
$status = getExitState($status, STATE_CRITICAL);
|
|
if ($VERBOSITY == 0) {$statusMessage .= "Phys. drive temperature critical, "; }
|
|
if ($VERBOSITY == 1) {$statusMessage .= "Physical drive $output_dev: temperature is ${temp}C, "; }
|
|
if ($VERBOSITY >= 2) {$statusMessage .= "Physical drive $output_dev in enclosure $output_enc: temperature is ${temp}C, "; }
|
|
}
|
|
}
|
|
if($crit eq 0) { # only warn if not already given a critical error
|
|
$status = getExitState($status, STATE_WARNING);
|
|
if ($VERBOSITY == 0) {$statusMessage .= "Phys. drive temperature warning, "; }
|
|
if ($VERBOSITY == 1) {$statusMessage .= "Physical drive $output_dev: temperature is ${temp}C, "; }
|
|
if ($VERBOSITY >= 2) {$statusMessage .= "Physical drive $output_dev in enclosure $output_enc: temperature is ${temp}C, "; }
|
|
}
|
|
}
|
|
} else {
|
|
if(($temp < $physicalDeviceTemperature_w[1]) || ($temp > $physicalDeviceTemperature_w[2])) {
|
|
# is in warn range, so also check if in critical error range
|
|
if($physicalDeviceTemperature_c[0] eq "in") {
|
|
if(($temp >= $physicalDeviceTemperature_c[1]) && ($temp <= $physicalDeviceTemperature_c[2])) {
|
|
# critical error
|
|
$crit = 1;
|
|
$status = getExitState($status, STATE_CRITICAL);
|
|
if ($VERBOSITY == 0) {$statusMessage .= "Phys. drive temperature critical, "; }
|
|
if ($VERBOSITY == 1) {$statusMessage .= "Physical drive $output_dev: temperature is ${temp}C, "; }
|
|
if ($VERBOSITY >= 2) {$statusMessage .= "Physical drive $output_dev in enclosure $output_enc: temperature is ${temp}C, "; }
|
|
}
|
|
} else {
|
|
if(($temp < $physicalDeviceTemperature_c[1]) || ($temp > $physicalDeviceTemperature_c[2])) {
|
|
# critical error
|
|
$crit = 1;
|
|
$status = getExitState($status, STATE_CRITICAL);
|
|
if ($VERBOSITY == 0) {$statusMessage .= "Phys. drive temperature critical, "; }
|
|
if ($VERBOSITY == 1) {$statusMessage .= "Physical drive $output_dev: temperature is ${temp}C, "; }
|
|
if ($VERBOSITY >= 2) {$statusMessage .= "Physical drive $output_dev in enclosure $output_enc: temperature is ${temp}C, "; }
|
|
}
|
|
}
|
|
if($crit eq 0) { # only warn if not already given a critical error
|
|
$status = getExitState($status, STATE_WARNING);
|
|
if ($VERBOSITY == 0) {$statusMessage .= "Phys. drive temperature warning, "; }
|
|
if ($VERBOSITY == 1) {$statusMessage .= "Physical drive $output_dev: temperature is ${temp}C, "; }
|
|
if ($VERBOSITY >= 2) {$statusMessage .= "Physical drive $output_dev in enclosure $output_enc: temperature is ${temp}C, "; }
|
|
}
|
|
}
|
|
}
|
|
}
|
|
when("Predictive") {
|
|
if($values[4] ne "0") {
|
|
$status = getExitState($status, STATE_WARNING);
|
|
if ($VERBOSITY == 0) {$statusMessage .= "Phys. drive Predictive Fail Count not 0, "; }
|
|
if ($VERBOSITY == 1) {$statusMessage .= "Physical drive $output_dev: Predictive Fail Count not 0, "; }
|
|
if ($VERBOSITY >= 2) {$statusMessage .= "Physical drive $output_dev in enclosure $output_enc: Predictive Fail Count not 0, "; }
|
|
}
|
|
}
|
|
when("S.M.A.R.T") {
|
|
if($values[6] ne "No") {
|
|
$status = getExitState($status, STATE_WARNING);
|
|
if ($VERBOSITY == 0) {$statusMessage .= "S.M.A.R.T alert flagged by drive, "; }
|
|
if ($VERBOSITY == 1) {$statusMessage .= "Physical drive $output_dev: S.M.A.R.T alert flagged, "; }
|
|
if ($VERBOSITY >= 2) {$statusMessage .= "Physical drive $output_dev in enclosure $output_enc: S.M.A.R.T alert flagged, "; }
|
|
}
|
|
}
|
|
}
|
|
} else {
|
|
$flag = -1;
|
|
}
|
|
}
|
|
}
|
|
} else {
|
|
# Check initialization or rebuild output
|
|
my $output_enc = -1;
|
|
my $output_dev = -1;
|
|
foreach my $line (@output) {
|
|
if($line =~ /^\/c$controller\/e([0-9]*)\/s([0-9]*)/) {
|
|
$output_enc = $1;
|
|
$output_dev = $2;
|
|
}
|
|
if(($output_enc ne -1) && ($output_dev ne -1)) {
|
|
if($line =~ /^\/c$controller$output_enc$output_dev\s*([\-]{1}|[0-9\%]*)\s*([\w\s]*)$/) { # gets status and percentage
|
|
if($2 ne "Not in progress") {
|
|
$status = getExitState($status, STATE_WARNING);
|
|
if ($VERBOSITY == 0) {$statusMessage .= "Phys. drive: $action in progress, "; }
|
|
if ($VERBOSITY == 1) {$statusMessage .= "Physical drive $output_dev: $action in progress, "; }
|
|
if ($VERBOSITY >= 2) {$statusMessage .= "Physical drive $output_dev in enclosure $output_enc: $action in progress (percentage: $1), "; }
|
|
}
|
|
}
|
|
}
|
|
}
|
|
}
|
|
return ($status, $statusMessage);
|
|
} else {
|
|
print "Invalid StorCLI command!";
|
|
exit(STATE_UNKNOWN);
|
|
}
|
|
}
|
|
|
|
# Returns information about:
|
|
# - Battery Backup Unit status
|
|
# - Temperature, Battery status, voltage
|
|
sub getBBUStatus {
|
|
my $sudo = $_[0];
|
|
my $storcli = $_[1];
|
|
my $controller = $_[2];
|
|
|
|
my $command = "$sudo $storcli /c$controller/bbu show status";
|
|
my $status = 0;
|
|
my $statusMessage = '';
|
|
|
|
my @output = `$command`;
|
|
|
|
if($output[1] eq "Status = Success\n") {
|
|
my $blockid = 0;
|
|
foreach my $line (@output) {
|
|
my $first;
|
|
my $last;
|
|
if($line =~ /^([a-zA-Z0-9]*)/) {
|
|
$first = $1;
|
|
if($first eq 'BBU_Info' || $first eq 'BBU_Firmware_Status' || $first eq 'GasGaugeStatus') {
|
|
$blockid++;
|
|
}
|
|
if($line =~ /([a-zA-Z0-9]*)$/) {
|
|
$last = $1;
|
|
# Check BBU_Info block
|
|
if ($blockid eq 1) {
|
|
given($first) {
|
|
when("Battery") {
|
|
if($line =~ /\s+([a-zA-Z0-9]*)/) {
|
|
given($1) {
|
|
when("State") {
|
|
if($last ne "Optimal") {
|
|
$status = getExitState($status, STATE_WARNING);
|
|
$statusMessage .= "BBU state not optimal, ";
|
|
}
|
|
}
|
|
}
|
|
}
|
|
}
|
|
}
|
|
}
|
|
# Check BBU_Firmware_Status
|
|
if ($blockid eq 2) {
|
|
given($first) {
|
|
when("Temperature") {
|
|
if($last ne "OK") {
|
|
$status = getExitState($status, STATE_CRITICAL);
|
|
if ($VERBOSITY == 0) {$statusMessage .= "BBU temp. critical, "; }
|
|
if ($VERBOSITY >= 1) {$statusMessage .= "BBU Temperature critical, "; }
|
|
}
|
|
}
|
|
when("Battery") {
|
|
if($line =~ /\s+([a-zA-Z0-9]*)/) {
|
|
given($1) {
|
|
when("State") {
|
|
if($last ne "Optimal") {
|
|
$status = getExitState($status, STATE_WARNING);
|
|
$statusMessage .= "BBU state not optimal, ";
|
|
}
|
|
}
|
|
when("Pack") {
|
|
if($last ne "No") {
|
|
$status = getExitState($status, STATE_CRITICAL);
|
|
$statusMessage .= "BBU pack missing, ";
|
|
}
|
|
}
|
|
when("Replacement") {
|
|
if($last ne "No") {
|
|
$status = getExitState($status, STATE_WARNING);
|
|
$statusMessage .= "BBU replacement required, ";
|
|
}
|
|
}
|
|
}
|
|
}
|
|
}
|
|
when("Voltage") {
|
|
if($last ne "OK") {
|
|
$status = getExitState($status, STATE_CRITICAL);
|
|
$statusMessage .= "BBU voltage not ok, ";
|
|
}
|
|
}
|
|
when("Learn") {
|
|
if($last ne "OK") {
|
|
$status = getExitState($status, STATE_WARNING);
|
|
$statusMessage .= "BBU learn cycle status not ok, ";
|
|
}
|
|
}
|
|
when("I2C") {
|
|
if($last ne "No") {
|
|
$status = getExitState($status, STATE_CRITICAL);
|
|
$statusMessage .= "BBU I2C errors, ";
|
|
}
|
|
}
|
|
when("Remaining") {
|
|
if($last ne "No") {
|
|
$status = getExitState($status, STATE_WARNING);
|
|
if ($VERBOSITY == 0) {$statusMessage .= "BBU capacity low, "; }
|
|
if ($VERBOSITY >= 1) {$statusMessage .= "BBU remaining capacity is low, "; }
|
|
}
|
|
}
|
|
}
|
|
}
|
|
# Check GasGaugeStatus
|
|
if ($blockid eq 3) {
|
|
given($first) {
|
|
when("Over") {
|
|
if($line =~ /\s+([a-zA-Z0-9]*)/) {
|
|
if($1 eq "Temperature") {
|
|
if($last ne "No") {
|
|
$status = getExitState($status, STATE_CRITICAL);
|
|
if ($VERBOSITY == 0) {$statusMessage .= "BBU temp. critical, "; }
|
|
if ($VERBOSITY >= 1) {$statusMessage .= "BBU Temperature critical, "; }
|
|
}
|
|
} elsif($1 eq "Charged") {
|
|
if($last ne "No") {
|
|
$status = getExitState($status, STATE_CRITICAL);
|
|
$statusMessage .= "BBU over charged, ";
|
|
}
|
|
}
|
|
}
|
|
}
|
|
}
|
|
}
|
|
}
|
|
}
|
|
}
|
|
return ($status, $statusMessage);
|
|
} else {
|
|
print "Invalid StorCLI command!";
|
|
exit(STATE_UNKNOWN);
|
|
}
|
|
}
|
|
|
|
# Nagios development guidelines: temperature threshold sheme
|
|
# http://nagiosplug.sourceforge.net/developer-guidelines.html#THRESHOLDFORMAT
|
|
# Returns a temperature range (array) in or out which a temperature should be
|
|
# Array content: ("in" or "out", range from, range to)
|
|
# Example ranges:
|
|
# Generate an alert if x...
|
|
# -Tw 10 < 0 or > 10, (outside the range of {0 .. 10})
|
|
# -Tw 10: < 10, (outside {10 .. inf})
|
|
# -Tw ~:10 > 10, (outside the range of {-inf .. 10})
|
|
# -Tw 10:20 < 10 or > 20, (outside the range of {10 .. 20})
|
|
# -Tw @10:20 >= 10 and <= 20, (inside the range of {10 .. 20})
|
|
sub getThresholds {
|
|
my @thresholds = @{($_[0])};
|
|
my $default = $_[1];
|
|
|
|
if(scalar(@thresholds) eq 0) {
|
|
return @thresholds = ("out", -273, $default);
|
|
}
|
|
if(substr($thresholds[0], 0, 1) eq "@") {
|
|
if($thresholds[0] =~ /^\@([0-9]*)\:([0-9]*)$/) {
|
|
@thresholds = ("in", $1, $2);
|
|
} else {
|
|
print "Invalid temperature parameter!";
|
|
exit(STATE_UNKNOWN);
|
|
}
|
|
} elsif(substr($thresholds[0], 0, 1) eq "~") {
|
|
if($thresholds[0] =~ /^\~\:([0-9]*)$/) {
|
|
@thresholds = ("out", -273, $1);
|
|
} else {
|
|
print "Invalid temperature parameter!";
|
|
exit(STATE_UNKNOWN);
|
|
}
|
|
} elsif(index($thresholds[0], ":") ne -1) {
|
|
if($thresholds[0] =~ /^([0-9]*)\:([0-9]{1,3})$/) {
|
|
@thresholds = ("out", $1, $2);
|
|
} elsif($thresholds[0] =~ /^([0-9]*)\:$/) {
|
|
@thresholds = ("in", -273, ($1 - 1));
|
|
} else {
|
|
print "Invalid temperature parameter!";
|
|
exit(STATE_UNKNOWN);
|
|
}
|
|
} else {
|
|
@thresholds = ("out", 0, $thresholds[0]);
|
|
}
|
|
if(($thresholds[1] =~ /^(-?[0-9]*)$/) && ($thresholds[2] =~ /^(-?[0-9]*)$/)) {
|
|
return @thresholds;
|
|
} else {
|
|
print "Invalid temperature parameter!";
|
|
exit(STATE_UNKNOWN);
|
|
}
|
|
}
|
|
|
|
MAIN: {
|
|
my $sudo = '';
|
|
my $storcli = '';
|
|
my $controller = 0;
|
|
my @enclosures;
|
|
my @logDevices;
|
|
my @physDevices;
|
|
my @temperature_w;
|
|
my @temperature_c;
|
|
my @physicalDeviceTemperature_w;
|
|
my @physicalDeviceTemperature_c;
|
|
my $bbu = 1;
|
|
my $platform = $^O;
|
|
my $statusMessage = '';
|
|
|
|
# Check platform
|
|
if ($platform eq 'linux') {
|
|
chomp($sudo = `which sudo`);
|
|
if ($storcli eq '') {
|
|
if ( -e '/opt/MegaRAID/storcli/storcli64') {
|
|
$storcli = '/opt/MegaRAID/storcli/storcli64'
|
|
}
|
|
elsif ( -e '/opt/MegaRAID/storcli/storcli') {
|
|
$storcli = '/opt/MegaRAID/storcli/storcli'
|
|
}
|
|
else {
|
|
chomp($storcli= `which storcli`);
|
|
}
|
|
}
|
|
unless ( -e $storcli && -x $sudo ) {
|
|
print "No sudo rights or StorCLI not found!\n";
|
|
exit(STATE_UNKNOWN);
|
|
}
|
|
} else {
|
|
eval('use File::Which');
|
|
$sudo = '';
|
|
if ($storcli eq '') {
|
|
if (defined(which( 'storcli64.exe' )) ) {
|
|
$storcli = which( 'storcli64.exe' );
|
|
} elsif (defined(which( 'storcli.exe' ))) {
|
|
$storcli = which( 'storcli.exe' );
|
|
}
|
|
}
|
|
unless ( -e $storcli ) {
|
|
print "StorCLI not found!\n";
|
|
exit(STATE_UNKNOWN);
|
|
}
|
|
}
|
|
|
|
if ( !(GetOptions(
|
|
'h|help' => sub {displayHelp();},
|
|
'v|verbose' => sub {$VERBOSITY = 1 },
|
|
'vv' => sub {$VERBOSITY = 2},
|
|
'vvv' => sub {$VERBOSITY = 3},
|
|
'V|version' => sub {displayVersion($sudo, $storcli);},
|
|
'C|controller=i' => \$controller,
|
|
'EID|enclosure=s' => \@enclosures,
|
|
'LD|logicaldevice=s' => \@logDevices,
|
|
'PD|physicaldevice=s' => \@physDevices,
|
|
'Tw|temperature-warn=s' => \@temperature_w,
|
|
'Tc|temperature-critical=s' => \@temperature_c,
|
|
'PDTw|physicaldevicetemperature-warn=s' => \@physicalDeviceTemperature_w,
|
|
'PDTc|physicaldevicetemperature-critical=s' => \@physicalDeviceTemperature_c,
|
|
'p|path=s' => \$storcli,
|
|
'b|BBU=i' => \$bbu
|
|
))) {
|
|
print $NAME . " Version: " . $VERSION ."\n";
|
|
displayUsage();
|
|
exit(STATE_UNKNOWN);
|
|
}
|
|
|
|
# Input validation
|
|
my @controllerVersion = `$sudo $storcli /c$controller show all`;
|
|
if($controllerVersion[2] eq "Description = Controller $controller not found\n") {
|
|
print "Invalid controller number, device not found!\n";
|
|
exit(STATE_UNKNOWN);
|
|
}
|
|
if(($bbu ne "1") && ($bbu ne "0")) {
|
|
print "Invalid BBU parameter, must be 0 or 1!\n";
|
|
exit(STATE_UNKNOWN);
|
|
} else {
|
|
if($bbu eq "1") {
|
|
my @bbucheck = `$sudo $storcli /c$controller/bbu show`;
|
|
my $flag = 0;
|
|
my $found = 0;
|
|
foreach my $line (@bbucheck) {
|
|
if($flag > 0) {
|
|
$flag--;
|
|
} elsif($line =~ /^([a-zA-Z]*)/) {
|
|
if($1 eq "Model") {
|
|
$flag = 2;
|
|
}
|
|
}
|
|
if($flag eq 0) {
|
|
my @values = split(' ', $line);
|
|
if(defined($values[6])) {
|
|
if($values[6] =~ /^([0-9]{4}\/[0-9]{2}\/[0-9]{2})$/) {
|
|
$found = 1;
|
|
}
|
|
}
|
|
}
|
|
}
|
|
if($found eq 0) {
|
|
print "No battery backup unit found for controller $controller!";
|
|
exit(STATE_UNKNOWN);
|
|
}
|
|
}
|
|
}
|
|
@enclosures = split(/,/,join(',', @enclosures));
|
|
@logDevices = split(/,/,join(',', @logDevices));
|
|
@physDevices = split(/,/,join(',', @physDevices));
|
|
@temperature_w = getThresholds(\@temperature_w, $C_TEMP_WARNING);
|
|
@temperature_c = getThresholds(\@temperature_c, $C_TEMP_CRITICAL);
|
|
@physicalDeviceTemperature_w = getThresholds(\@physicalDeviceTemperature_w, $PD_TEMP_WARNING);
|
|
@physicalDeviceTemperature_c = getThresholds(\@physicalDeviceTemperature_c, $PD_TEMP_CRITICAL);
|
|
|
|
# Set exit status
|
|
my $exitstatus = 0;
|
|
my $newexitstatus = 0;
|
|
my $newstatusMessage = '';
|
|
($newexitstatus, $statusMessage) = getControllerStatus($sudo, $storcli, $controller, \@temperature_w, \@temperature_c);
|
|
$newstatusMessage .= $statusMessage;
|
|
$exitstatus = getExitState($newexitstatus, $exitstatus);
|
|
($newexitstatus, $statusMessage) = getLogicalDeviceStatus($sudo, $storcli, $controller, \@logDevices, "init");
|
|
$newstatusMessage .= $statusMessage;
|
|
$exitstatus = getExitState($newexitstatus, $exitstatus);
|
|
($newexitstatus, $statusMessage) = getLogicalDeviceStatus($sudo, $storcli, $controller, \@logDevices, "all");
|
|
$newstatusMessage .= $statusMessage;
|
|
$exitstatus = getExitState($newexitstatus, $exitstatus);
|
|
($newexitstatus, $statusMessage) = getPhysDeviceStatus($sudo, $storcli, $controller, \@enclosures, \@physDevices, \@physicalDeviceTemperature_w, \@physicalDeviceTemperature_c, "initialization");
|
|
$newstatusMessage .= $statusMessage;
|
|
$exitstatus = getExitState($newexitstatus, $exitstatus);
|
|
($newexitstatus, $statusMessage) = getPhysDeviceStatus($sudo, $storcli, $controller, \@enclosures, \@physDevices, \@physicalDeviceTemperature_w, \@physicalDeviceTemperature_c, "rebuild");
|
|
$newstatusMessage .= $statusMessage;
|
|
$exitstatus = getExitState($newexitstatus, $exitstatus);
|
|
($newexitstatus, $statusMessage) = getPhysDeviceStatus($sudo, $storcli, $controller, \@enclosures, \@physDevices, \@physicalDeviceTemperature_w, \@physicalDeviceTemperature_c, "all");
|
|
$newstatusMessage .= $statusMessage;
|
|
$exitstatus = getExitState($newexitstatus, $exitstatus);
|
|
if($bbu) {
|
|
($newexitstatus, $statusMessage) = getBBUStatus($sudo, $storcli, $controller);
|
|
$newstatusMessage .= $statusMessage;
|
|
$exitstatus = getExitState($newexitstatus, $exitstatus);
|
|
}
|
|
given($exitstatus) {
|
|
when(0) { print "LSIRAID OK (Ctrl #$controller)\n"; }
|
|
when(1) { chop($newstatusMessage); chop($newstatusMessage); print "LSIRAID WARNING (Ctrl #$controller): [$newstatusMessage]\n"; }
|
|
when(2) { chop($newstatusMessage); chop($newstatusMessage); print "LSIRAID CRITICAL (Ctrl #$controller): [$newstatusMessage]\n"; }
|
|
}
|
|
exit($exitstatus);
|
|
}
|