Monitoring/MyMonPlugins
1
0
Fork 0
Code Issues Pull requests Projects Releases Wiki Activity

check_junos_vc: Added 'version' check.

Browse source 
… which checks the version of all physically connected members to be equal.
This commit is contained in:
Sebastian Harl 2011-07-06 11:46:34 +02:00
parent a2c2f4844e
commit 6db7b3357f
1 changed files with 101 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

102
check_junos_vc.pl
View file

@ -46,7 +46,7 @@ use JUNOS::Device;
binmode STDOUT, ":utf8"; binmode STDOUT, ":utf8";
my $valid_checks = "members_count|master|backup|interfaces"; my $valid_checks = "members_count|master|backup|interfaces|version";
my $plugin = Nagios::Plugin->new( my $plugin = Nagios::Plugin->new(
plugin => 'check_junos_vc', plugin => 'check_junos_vc',
@ -85,6 +85,8 @@ The following checks are available:
thresholds have been specified, also check the number of VCP interfaces thresholds have been specified, also check the number of VCP interfaces
against the thresholds. against the thresholds.
* version: Check the version of all physically connected members.
Warning and critical thresholds may be specified in the format documented at Warning and critical thresholds may be specified in the format documented at
http://nagiosplug.sourceforge.net/developer-guidelines.html#THRESHOLDFORMAT.", http://nagiosplug.sourceforge.net/developer-guidelines.html#THRESHOLDFORMAT.",
); );
@ -399,6 +401,63 @@ foreach my $check (@{$conf{'checks'}}) {
threshold => undef, threshold => undef,
); );
} }
elsif ($check->{'name'} eq 'version') {
my %versions = get_versions($junos);
my @v_keys = keys %versions;
my $first = undef;
my @base_mismatch = ();
my %mismatches = ();
foreach my $k (@v_keys) {
my $base = $versions{$k}->{'base'};
my $other = $versions{$k}->{'other'};
foreach my $o (keys %$other) {
if ($other->{$o} ne $base) {
$mismatches{$k}->{$base} = 1;
$mismatches{$k}->{$other->{$o}} = 1;
}
}
}
$first = shift @v_keys;
$first = $versions{$first};
foreach my $k (@v_keys) {
if ($first->{'base'} ne $versions{$k}->{'base'}) {
push @base_mismatch, $k;
}
}
if (scalar @base_mismatch) {
my @first_match = grep {
$versions{$_}->{'base'} eq $first->{'base'}
} keys %versions;
my %mismatches = ();
foreach my $m (@base_mismatch) {
push @{$mismatches{$versions{$m}->{'base'}}}, $m;
}
$plugin->add_message(CRITICAL, "version mismatch detected: "
. $first->{'base'} . " @ ("
. join(", ", @first_match) . ") != "
. join(" != ", map {
$_ . " @ (" . join(", ", @{$mismatches{$_}}) . ")"
} keys %mismatches));
}
elsif (scalar(keys %mismatches)) {
$plugin->add_message(WARNING, "version mismatches detected: "
. join(" / ", map {
"$_: " . join(" != ", keys %{$mismatches{$_}})
} keys %mismatches));
}
else {
$plugin->add_message(OK, "all members at version "
. $first->{'base'});
}
}
} }
# add total numbers to perfdata to ease graphing stuff # add total numbers to perfdata to ease graphing stuff
@ -534,6 +593,47 @@ sub get_vc_interfaces
return @ifaces; return @ifaces;
} }
sub get_versions
{
my $device = shift;
my %versions = ();
my $cmd = "show version";
my $res = send_command($device, $cmd);
my @v = ();
if (! ref $res) {
$plugin->die($res);
}
@v = $res->getElementsByTagName('multi-routing-engine-item');
foreach my $i (@v) {
my $name = get_obj_element($i, 're-name');
my @infos = $i->getElementsByTagName('software-information');
@infos = $infos[0]->getElementsByTagName('package-information');
foreach my $j (@infos) {
my $comment = get_obj_element($j, 'comment');
my ($desc, $version);
$comment =~ m/^(.*) \[([^]]+)\]$/;
$desc = $1;
$version = $2;
if ($desc eq "JUNOS Base OS boot") {
$versions{$name}->{'base'} = $version;
}
else {
$versions{$name}->{'other'}->{$desc} = $version;
}
}
}
return %versions;
}
sub add_arg sub add_arg
{ {
my $plugin = shift; my $plugin = shift;