Directory

Unfortunately ServerView does not support to check the RAID manager. So this monitor can' t check it.

Here is a hint how it can be done with a local check on a FUJITSU PRIMERGY.
It should be possible to do it with the tool amCLI from the ServerView package. It is located here "C:\Program Files (x86)\Fujitsu\ServerView Suite\RAID Manager\bin\"
Show all devices: amCLI.exe --list
Get status of a device: amCLI.exe --get 32/2 status

I had a small problem. The NSClient run as SYSTEM account, which is not CitrixAdministrator. I removed the lines 110-113 and everything seems to work. I'm not sure if this is special to my environment.
Line 110: If theFarm.WinFarmObject.IsCitrixAdministrator = 0 then

I had a problem with NSClient 0.4.172 which doesn' t like the perf data, because the perf data is not divided by a space. I added a space after every ';'
outputMessage=intSessions& " sesions - "& intActive& " active, "_
& intDisconnected& " disconnected. Number of users: "_
& numberOfUniqueUsers& ". |sessions_total="& intSessions& "; sessions_active="_
& intActive& "; sessions_disconnected="& intDisconnected& "; users="& numberOfUniqueUsers

You might get an error like:
check_flexlm_perf_data.plx: Possible unintended interpolation of @omega in string at ./check_flexlm_perf_data.plx line 61.
To fix this change line 86 from:
Luca.sassone@omega-sistemi.it
to
Luca.sassone@omega-sistemi.it



There is another bug in the script
99c99
< if ((@ARGV > 6)||(@ARGV eq "0"))
---
> if ((@ARGV > 8)||(@ARGV eq "0"))

ARGV has to be 8 instead of 6 if you use all parameters, like:
-H HOST -p PORT -f LIC -w WARN

Some kernel have a space after ':' in /proc/net/dev. This will be fixed with: "$line =~ s/:\s+/:/g;"
The patch will output average performance data.

--- check_iftraffic_nrpe.pl.orig 2012-05-23 12:01:51.000000000 +0200
+++ check_iftraffic_nrpe.pl 2012-05-23 12:21:09.000000000 +0200
@@ -95,6 +95,7 @@
}

$line =~ s/\s+/ /g;
+$line =~ s/:\s+/:/g;
@splitLine=split (/ /,$line);

(undef,$in_bytes)=split (/:/,$splitLine[1]);
@@ -175,6 +176,9 @@
my $in_prefix = "k";
my $out_prefix = "k";

+my $in_traffick = $in_traffic;
+my $out_traffick = $out_traffic;
+
if ( $in_traffic > 1024 ) {
$in_traffic = sprintf( "%.2f", $in_traffic / 1024 );
$in_prefix = "M";
@@ -190,7 +194,7 @@

my $exit_status = "OK";

-my $output = "Total RX Bytes: $in_bytes MB, Total TX Bytes: $out_bytes MB";
+my $output = "Total RX Bytes: $in_bytes MB, Total TX Bytes: $out_bytes MB ";
$output .=
"Average Traffic: $in_traffic "
. $in_prefix . "B/s ("
@@ -210,14 +214,14 @@
$exit_status = "WARNING";
}

-$output .= "$exit_status bandwidth utilization.\n"
+$output .= "$exit_status bandwidth utilization.\n"
if ( $exit_status ne "OK" );

#$output .=
#"| inUsage=$in_usage;$warn_usage;$crit_usage outUsage=$out_usage;$warn_usage;$crit_usage " . "inAbsolut=$in_traffic_absolut outAbsolut=$out_traffic_absolut\n";

$output .=
-"| inUsage=$in_usage;$warn_usage;$crit_usage;; outUsage=$out_usage;$warn_usage;$crit_usage;;\n";
+"| inUsage=$in_usage;$warn_usage;$crit_usage; outUsage=$out_usage;$warn_usage;$crit_usage; inAvg=$in_traffick;$warn_usage;$crit_usage; outAvg=$out_traffick;$warn_usage;$crit_usage;\n";


print $output;