tyler.durden/centreon-plugins
1
0
Fork 0
mirror of https://github.com/centreon/centreon-plugins.git synced 2025-07-27 23:54:18 +02:00
Code Issues Packages Projects Releases Wiki Activity

Fix #6106

Browse Source
This commit is contained in:
Quentin Garnier 2015-01-26 16:06:12 +01:00
parent f0b2dc9a4b
commit 6f6efc23d2
1 changed files with 44 additions and 27 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

71
centreon/common/emc/navisphere/mode/cache.pm
View File

@ -71,7 +71,9 @@ sub new {
$self->{version} = '1.0'; $self->{version} = '1.0';
$options{options}->add_options(arguments => $options{options}->add_options(arguments =>
{ {
"threshold-overload:s@" => { name => 'threshold_overload' }, "cache-command:s" => { name => 'cache_command', default => 'getcache' },
"cache-options:s" => { name => 'cache_options', default => '-pdp -state -mirror' },
"threshold-overload:s@" => { name => 'threshold_overload' },
"warning:s" => { name => 'warning', }, "warning:s" => { name => 'warning', },
"critical:s" => { name => 'critical', }, "critical:s" => { name => 'critical', },
}); });
@ -136,26 +138,30 @@ sub run {
#SP Read Cache State Enabled #SP Read Cache State Enabled
#SP Write Cache State Enabled #SP Write Cache State Enabled
#Write Cache Mirrored: YES #Write Cache Mirrored: YES
my $response = $clariion->execute_command(cmd => 'getcache -pdp -state -mirror'); my $response = $clariion->execute_command(cmd => $self->{option_results}->{cache_command} . ' ' . $self->{option_results}->{cache_options});
chomp $response; chomp $response;
if ($response !~ /^SP Read Cache State\s+(.*)/im) { my ($read_cache_state, $write_cache_state);
if ($response !~ /^SP Read Cache State(\s+|:\s+)(.*)/im) {
$self->{output}->output_add(severity => 'UNKNOWN', $self->{output}->output_add(severity => 'UNKNOWN',
short_msg => 'Cannot find cache informations.'); short_msg => 'Cannot find cache informations.');
$self->{output}->display(); $self->{output}->display();
$self->{output}->exit(); $self->{output}->exit();
} }
my $read_cache_state = $1; $read_cache_state = $2;
$response =~ /^SP Write Cache State\s+(.*)\s*$/im; $response =~ /^SP Write Cache State(\s+|:\s+)(.*)\s*$/im;
my $write_cache_state = $1; $write_cache_state = $2;
$response =~ /^Write Cache Mirrored:\s+(.*)\s*$/im; my ($write_cache_mirror, $dirty_prct);
my $write_cache_mirror = $1; if ($response =~ /^Write Cache Mirrored:\s+(.*)\s*$/im) {
$write_cache_mirror = $1;
$response =~ /^Prct.*?=\s+(\S+)/im; }
my $dirty_prct = $1;
if ($response =~ /^Prct.*?=\s+(\S+)/im) {
$dirty_prct = $1;
}
$self->{output}->output_add(severity => $self->get_severity(value => $read_cache_state, $self->{output}->output_add(severity => $self->get_severity(value => $read_cache_state,
label => 'read_cache'), label => 'read_cache'),
short_msg => sprintf("Read cache state is '%s'", short_msg => sprintf("Read cache state is '%s'",
@ -164,23 +170,26 @@ sub run {
label => 'write_cache'), label => 'write_cache'),
short_msg => sprintf("Write cache state is '%s'", short_msg => sprintf("Write cache state is '%s'",
$write_cache_state)); $write_cache_state));
$self->{output}->output_add(severity => $self->get_severity(value => $write_cache_mirror, if (defined($write_cache_mirror)) {
label => 'write_mirror'), $self->{output}->output_add(severity => $self->get_severity(value => $write_cache_mirror,
short_msg => sprintf("Write cache mirror is '%s'", label => 'write_mirror'),
$write_cache_mirror)); short_msg => sprintf("Write cache mirror is '%s'",
$write_cache_mirror));
my $exit = $self->{perfdata}->threshold_check(value => $dirty_prct,
threshold => [ { label => 'critical', 'exit_litteral' => 'critical' }, { label => 'warning', exit_litteral => 'warning' } ]);
if (!$self->{output}->is_status(value => $exit, compare => 'ok', litteral => 1)) {
$self->{output}->output_add(severity => $exit,
short_msg => sprintf("Dirty Cache Pages is %s %%", $dirty_prct));
} }
$self->{output}->perfdata_add(label => 'dirty_cache', unit => '%', if (defined($dirty_prct)) {
value => $dirty_prct, my $exit = $self->{perfdata}->threshold_check(value => $dirty_prct,
warning => $self->{perfdata}->get_perfdata_for_output(label => 'warning'), threshold => [ { label => 'critical', 'exit_litteral' => 'critical' }, { label => 'warning', exit_litteral => 'warning' } ]);
critical => $self->{perfdata}->get_perfdata_for_output(label => 'critical'), if (!$self->{output}->is_status(value => $exit, compare => 'ok', litteral => 1)) {
min => 0, max => 100); $self->{output}->output_add(severity => $exit,
short_msg => sprintf("Dirty Cache Pages is %s %%", $dirty_prct));
}
$self->{output}->perfdata_add(label => 'dirty_cache', unit => '%',
value => $dirty_prct,
warning => $self->{perfdata}->get_perfdata_for_output(label => 'warning'),
critical => $self->{perfdata}->get_perfdata_for_output(label => 'critical'),
min => 0, max => 100);
}
$self->{output}->display(); $self->{output}->display();
$self->{output}->exit(); $self->{output}->exit();
} }
@ -195,6 +204,14 @@ Check status of the read and write cache.
=over 8 =over 8
=item B<--cache-command>
Set cache command (Default: 'getcache').
=item B<--cache-options>
Set option for cache command (Default: '-pdp -state -mirror').
=item B<--warning> =item B<--warning>
Threshold warning in percent (for dirty cache). Threshold warning in percent (for dirty cache).