Add new netgear readynas plugin #1164

To monitor Netgear ReadyNas with SNMP
This commit is contained in:
ArnoMLT 2018-10-11 10:34:40 +02:00
parent 49ddb8c893
commit 477fd9c13f
7 changed files with 653 additions and 0 deletions

View File

@ -0,0 +1,82 @@
#
# Copyright 2018 Centreon (http://www.centreon.com/)
#
# Centreon is a full-fledged industry-strength solution that meets
# the needs in IT infrastructure and application monitoring for
# service performance.
#
# Licensed under the Apache License, Version 2.0 (the "License");
# you may not use this file except in compliance with the License.
# You may obtain a copy of the License at
#
# http://www.apache.org/licenses/LICENSE-2.0
#
# Unless required by applicable law or agreed to in writing, software
# distributed under the License is distributed on an "AS IS" BASIS,
# WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
# See the License for the specific language governing permissions and
# limitations under the License.
#
# Author : ArnoMLT
#
package storage::netgear::readynas::snmp::mode::components::disk;
use strict;
use warnings;
my ($mapping, $oid_diskTable);
my $mapping_v6 = {
diskState => { oid => '.1.3.6.1.4.1.4526.22.3.1.9' },
diskTemperature => { oid => '.1.3.6.1.4.1.4526.22.3.1.10' },
};
my $oid_diskTable_v6 = '.1.3.6.1.4.1.4526.22.3';
my $mapping_v4 = {
diskState => { oid => '.1.3.6.1.4.1.4526.18.3.1.4' },
diskTemperature => { oid => '.1.3.6.1.4.1.4526.18.3.1.5' },
};
my $oid_diskTable_v4 = '.1.3.6.1.4.1.4526.18.3';
sub load {
my ($self) = @_;
$mapping = $self->{mib_ver} == 4 ? $mapping_v4 : $mapping_v6;
$oid_diskTable = $self->{mib_ver} == 4 ? $oid_diskTable_v4 : $oid_diskTable_v6;
push @{$self->{request}}, { oid => $oid_diskTable };
}
sub check {
my ($self) = @_;
$self->{output}->output_add(long_msg => "Checking disk");
$self->{components}->{disk} = {name => 'disk', total => 0, skip => 0};
return if ($self->check_filter(section => 'disk'));
foreach my $oid ($self->{snmp}->oid_lex_sort(keys %{$self->{results}->{$oid_diskTable}})) {
next if ($oid !~ /^$mapping->{diskState}->{oid}\.(\d+)/);
my $instance = $1;
my $result = $self->{snmp}->map_instance(mapping => $mapping, results => $self->{results}->{$oid_diskTable}, instance => $instance);
next if ($self->check_filter(section => 'disk', instance => $instance));
$self->{components}->{disk}->{total}++;
my $temperature_string = defined($result->{diskTemperature}) && $result->{diskTemperature} != -1 ? " (temperature $result->{diskTemperature}" : '';
my $temperature_unit = $temperature_string ne '' && $self->{mib_ver} == 6 ? 'C)' : '';
$temperature_unit = $temperature_string ne '' && $self->{mib_ver} == 4 ? 'F)' : '';
$self->{output}->output_add(long_msg => sprintf("disk '%s'%s%s status is %s.",
$instance, $temperature_string, $temperature_unit, $result->{diskState}));
my $exit = $self->get_severity(section => 'disk', value => $result->{diskState});
if (!$self->{output}->is_status(value => $exit, compare => 'ok', litteral => 1)) {
$self->{output}->output_add(severity => $exit,
short_msg => sprintf("Disk '%s'%s%s status is %s", $instance, $temperature_string, $temperature_unit, $result->{diskState}));
}
}
}
1;

View File

@ -0,0 +1,92 @@
#
# Copyright 2018 Centreon (http://www.centreon.com/)
#
# Centreon is a full-fledged industry-strength solution that meets
# the needs in IT infrastructure and application monitoring for
# service performance.
#
# Licensed under the Apache License, Version 2.0 (the "License");
# you may not use this file except in compliance with the License.
# You may obtain a copy of the License at
#
# http://www.apache.org/licenses/LICENSE-2.0
#
# Unless required by applicable law or agreed to in writing, software
# distributed under the License is distributed on an "AS IS" BASIS,
# WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
# See the License for the specific language governing permissions and
# limitations under the License.
#
# Author : ArnoMLT
#
package storage::netgear::readynas::snmp::mode::components::fan;
use strict;
use warnings;
my ($mapping, $oid_fanTable);
my $mapping_v6 = {
fanStatus => { oid => '.1.3.6.1.4.1.4526.22.4.1.3' },
};
my $oid_fanTable_v6 = '.1.3.6.1.4.1.4526.22.4';
my $mapping_v4 = {
fanRPM => { oid => '.1.3.6.1.4.1.4526.18.4.1.2' },
};
my $oid_fanTable_v4 = '.1.3.6.1.4.1.4526.18.4';
sub load {
my ($self) = @_;
$mapping = $self->{mib_ver} == 4 ? $mapping_v4 : $mapping_v6;
$oid_fanTable = $self->{mib_ver} == 4 ? $oid_fanTable_v4 : $oid_fanTable_v6;
push @{$self->{request}}, { oid => $oid_fanTable };
}
sub check {
my ($self) = @_;
$self->{output}->output_add(long_msg => "Checking fan");
$self->{components}->{fan} = {name => 'fan', total => 0, skip => 0};
return if ($self->check_filter(section => 'fan'));
if ($self->{mib_ver} == 6){
foreach my $oid ($self->{snmp}->oid_lex_sort(keys %{$self->{results}->{$oid_fanTable}})) {
next if ($oid !~ /^$mapping->{fanStatus}->{oid}\.(\d+)/);
my $instance = $1;
my $result = $self->{snmp}->map_instance(mapping => $mapping, results => $self->{results}->{$oid_fanTable}, instance => $instance);
next if ($self->check_filter(section => 'fan', instance => $instance));
$self->{components}->{fan}->{total}++;
$self->{output}->output_add(long_msg => sprintf("fan '%s' status is %s.", $instance, $result->{fanStatus}));
my $exit = $self->get_severity(label => 'default', section => 'fan', value => $result->{fanStatus});
if (!$self->{output}->is_status(value => $exit, compare => 'ok', litteral => 1)) {
$self->{output}->output_add(severity => $exit,
short_msg => sprintf("fan '%s' status is %s", $instance, $result->{fanStatus}));
}
}
}elsif ($self->{mib_ver} == 4){
foreach my $oid ($self->{snmp}->oid_lex_sort(keys %{$self->{results}->{$oid_fanTable}})) {
next if ($oid !~ /^$mapping->{fanRPM}->{oid}\.(\d+)/);
my $instance = $1;
my $result = $self->{snmp}->map_instance(mapping => $mapping, results => $self->{results}->{$oid_fanTable}, instance => $instance);
next if ($self->check_filter(section => 'fan', instance => $instance));
$self->{components}->{fan}->{total}++;
$self->{output}->output_add(long_msg => sprintf("fan '%s' rpm is %s.", $instance, $result->{fanRPM}));
my ($exit) = $self->get_severity_numeric(section => 'fan', instance => $instance, value => $result->{fanRPM});
if (!$self->{output}->is_status(value => $exit, compare => 'ok', litteral => 1)) {
$self->{output}->output_add(severity => $exit,
short_msg => sprintf("fan '%s' rpm is %s", $instance, $result->{fanRPM}));
}
$self->{output}->perfdata_add(label => "fan_" . $instance, unit => 'RPM', value => $result->{fanRPM});
}
}
}
1;

View File

@ -0,0 +1,74 @@
#
# Copyright 2018 Centreon (http://www.centreon.com/)
#
# Centreon is a full-fledged industry-strength solution that meets
# the needs in IT infrastructure and application monitoring for
# service performance.
#
# Licensed under the Apache License, Version 2.0 (the "License");
# you may not use this file except in compliance with the License.
# You may obtain a copy of the License at
#
# http://www.apache.org/licenses/LICENSE-2.0
#
# Unless required by applicable law or agreed to in writing, software
# distributed under the License is distributed on an "AS IS" BASIS,
# WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
# See the License for the specific language governing permissions and
# limitations under the License.
#
# Author : ArnoMLT
#
package storage::netgear::readynas::snmp::mode::components::psu;
use strict;
use warnings;
my ($mapping, $oid_psuTable);
my $mapping_v6 = {
psuStatus => { oid => '.1.3.6.1.4.1.4526.22.8.1.3' },
};
my $oid_psuTable_v6 = '.1.3.6.1.4.1.4526.22.8';
my $mapping_v4 = {
psuStatus => { oid => '.1.3.6.1.4.1.4526.18.8.1.3' },
};
my $oid_psuTable_v4 = '.1.3.6.1.4.1.4526.18.8';
sub load {
my ($self) = @_;
$mapping = $self->{mib_ver} == 4 ? $mapping_v4 : $mapping_v6;
$oid_psuTable = $self->{mib_ver} == 4 ? $oid_psuTable_v4 : $oid_psuTable_v6;
push @{$self->{request}}, { oid => $oid_psuTable };
}
sub check {
my ($self) = @_;
$self->{output}->output_add(long_msg => "Checking power supply");
$self->{components}->{psu} = {name => 'psu', total => 0, skip => 0};
return if ($self->check_filter(section => 'psu'));
foreach my $oid ($self->{snmp}->oid_lex_sort(keys %{$self->{results}->{$oid_psuTable}})) {
next if ($oid !~ /^$mapping->{psuStatus}->{oid}\.(\d+)/);
my $instance = $1;
my $result = $self->{snmp}->map_instance(mapping => $mapping, results => $self->{results}->{$oid_psuTable}, instance => $instance);
next if ($self->check_filter(section => 'psu', instance => $instance));
$self->{components}->{psu}->{total}++;
$self->{output}->output_add(long_msg => sprintf("power supply '%s' status is %s.",
$instance, $result->{psuStatus}));
my $exit = $self->get_severity(section => 'psu', value => $result->{psuStatus});
if (!$self->{output}->is_status(value => $exit, compare => 'ok', litteral => 1)) {
$self->{output}->output_add(severity => $exit,
short_msg => sprintf("Power Supply '%s' status is %s.", $instance, $result->{psuStatus}));
}
}
}
1;

View File

@ -0,0 +1,122 @@
#
# Copyright 2018 Centreon (http://www.centreon.com/)
#
# Centreon is a full-fledged industry-strength solution that meets
# the needs in IT infrastructure and application monitoring for
# service performance.
#
# Licensed under the Apache License, Version 2.0 (the "License");
# you may not use this file except in compliance with the License.
# You may obtain a copy of the License at
#
# http://www.apache.org/licenses/LICENSE-2.0
#
# Unless required by applicable law or agreed to in writing, software
# distributed under the License is distributed on an "AS IS" BASIS,
# WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
# See the License for the specific language governing permissions and
# limitations under the License.
#
# Author : ArnoMLT
#
package storage::netgear::readynas::snmp::mode::components::temperature;
use strict;
use warnings;
my ($mapping, $oid_temperatureTable);
my $mapping_v6 = {
temperatureValue => { oid => '.1.3.6.1.4.1.4526.22.5.1.2' },
temperatureType => { oid => '.1.3.6.1.4.1.4526.22.5.1.3' },
temperatureMax => { oid => '.1.3.6.1.4.1.4526.22.5.1.5' },
};
my $oid_temperatureTable_v6 = '.1.3.6.1.4.1.4526.22.5';
my $mapping_v4 = {
temperatureValue => { oid => '.1.3.6.1.4.1.4526.18.5.1.2' },
temperatureStatus => { oid => '.1.3.6.1.4.1.4526.18.5.1.3' },
};
my $oid_temperatureTable_v4 = '.1.3.6.1.4.1.4526.18.5';
sub load {
my ($self) = @_;
$mapping = $self->{mib_ver} == 4 ? $mapping_v4 : $mapping_v6;
$oid_temperatureTable = $self->{mib_ver} == 4 ? $oid_temperatureTable_v4 : $oid_temperatureTable_v6;
push @{$self->{request}}, { oid => $oid_temperatureTable };
}
sub check {
my ($self) = @_;
$self->{output}->output_add(long_msg => "Checking temperatures");
$self->{components}->{temperature} = {name => 'temperatures', total => 0, skip => 0};
return if ($self->check_filter(section => 'temperature'));
foreach my $oid ($self->{snmp}->oid_lex_sort(keys %{$self->{results}->{$oid_temperatureTable}})) {
next if ($oid !~ /^$mapping->{temperatureValue}->{oid}\.(.*)$/);
my $instance = $1;
my $result = $self->{snmp}->map_instance(mapping => $mapping, results => $self->{results}->{$oid_temperatureTable}, instance => $instance);
next if ($self->check_filter(section => 'temperature', instance => $instance));
$self->{components}->{temperature}->{total}++;
my $temperatureMax_string = defined($result->{temperatureMax}) && $result->{temperatureMax} != -1 ? " ($result->{temperatureMax} max)" : '';
my $temperatureMax_unit = defined($result->{temperatureMax}) && $self->{mib_ver} == 6 ? 'C' : 'F';
if ($self->{mib_ver} == 6){
$self->{output}->output_add(long_msg => sprintf("'%s' %s temperature is %d%s%s.",
$instance, $result->{temperatureType}, $result->{temperatureValue},
$temperatureMax_unit, $temperatureMax_string));
if (defined($result->{temperatureValue}) && $result->{temperatureValue} != -1) {
my ($exit, $warn, $crit, $checked) = $self->get_severity_numeric(section => 'temperature', instance => $instance, value => $result->{temperatureValue});
if ($checked == 0) {
my $crit_th = $result->{temperatureMax} != -1 ? $result->{temperatureMax} : '';
my $warn_th = $crit_th ne '' ? $crit_th-10 : '';
$self->{perfdata}->threshold_validate(label => 'warning-temperature-instance-' . $instance, value => $warn_th);
$self->{perfdata}->threshold_validate(label => 'critical-temperature-instance-' . $instance, value => $crit_th);
$warn = $self->{perfdata}->get_perfdata_for_output(label => 'warning-temperature-instance-' . $instance);
$crit = $self->{perfdata}->get_perfdata_for_output(label => 'critical-temperature-instance-' . $instance);
}
if (!$self->{output}->is_status(value => $exit, compare => 'ok', litteral => 1)) {
$self->{output}->output_add(severity => $exit,
short_msg => sprintf("Temperature '%s' %s is %s degree %s",
$instance, $result->{temperatureType}, $result->{temperatureValue}, $temperatureMax_unit));
}
$self->{output}->perfdata_add(label => "temp_" . $instance . "_" . $result->{temperatureType}, unit => $temperatureMax_unit,
value => $result->{temperatureValue},
warning => $warn,
critical => $crit);
}
}elsif ($self->{mib_ver} == 4){
$self->{output}->output_add(long_msg => sprintf("temperature '%s' (%dF) is %s.",
$instance, $result->{temperatureValue}, $result->{temperatureStatus}));
# check for warnings or criticals ?
my ($exit, $warn, $crit, $checked) = $self->get_severity_numeric(section => 'temperature', instance => $instance, value => $result->{temperatureValue});
if ($checked == 1) {
$self->{perfdata}->threshold_validate(label => 'warning-temperature-instance-' . $instance, value => $warn);
$self->{perfdata}->threshold_validate(label => 'critical-temperature-instance-' . $instance, value => $crit);
if (!$self->{output}->is_status(value => $exit, compare => 'ok', litteral => 1)) {
$self->{output}->output_add(severity => $exit,
short_msg => sprintf("Temperature '%s' (%s%s) is %s.", $instance, $result->{temperatureValue}, $temperatureMax_unit, $exit));
}
}else{
my $exit = $self->get_severity(label => 'default', section => 'temperature', value => $result->{temperatureStatus});
if (!$self->{output}->is_status(value => $exit, compare => 'ok', litteral => 1)) {
$self->{output}->output_add(severity => $exit,
short_msg => sprintf("Temperature '%s' (%s%s) is %s.", $instance, $result->{temperatureValue}, $temperatureMax_unit, $result->{temperatureStatus}));
}
}
$self->{output}->perfdata_add(label => "temp_" . $instance, unit => $temperatureMax_unit,
value => $result->{temperatureValue});
}
}
}
1;

View File

@ -0,0 +1,77 @@
#
# Copyright 2018 Centreon (http://www.centreon.com/)
#
# Centreon is a full-fledged industry-strength solution that meets
# the needs in IT infrastructure and application monitoring for
# service performance.
#
# Licensed under the Apache License, Version 2.0 (the "License");
# you may not use this file except in compliance with the License.
# You may obtain a copy of the License at
#
# http://www.apache.org/licenses/LICENSE-2.0
#
# Unless required by applicable law or agreed to in writing, software
# distributed under the License is distributed on an "AS IS" BASIS,
# WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
# See the License for the specific language governing permissions and
# limitations under the License.
#
# Author : ArnoMLT
#
package storage::netgear::readynas::snmp::mode::components::volume;
use strict;
use warnings;
my ($mapping, $oid_volumeTable);
my $mapping_v6 = {
volumeName => { oid => '.1.3.6.1.4.1.4526.22.7.1.2' },
volumeStatus => { oid => '.1.3.6.1.4.1.4526.22.7.1.4' },
};
my $oid_volumeTable_v6 = '.1.3.6.1.4.1.4526.22.7';
my $mapping_v4 = {
volumeName => { oid => '.1.3.6.1.4.1.4526.18.7.1.2' },
volumeStatus => { oid => '.1.3.6.1.4.1.4526.18.7.1.4' },
};
my $oid_volumeTable_v4 = '.1.3.6.1.4.1.4526.18.7';
sub load {
my ($self) = @_;
$mapping = $self->{mib_ver} == 4 ? $mapping_v4 : $mapping_v6;
$oid_volumeTable = $self->{mib_ver} == 4 ? $oid_volumeTable_v4 : $oid_volumeTable_v6;
push @{$self->{request}}, { oid => $oid_volumeTable };
}
sub check {
my ($self) = @_;
$self->{output}->output_add(long_msg => "Checking volume");
$self->{components}->{volume} = {name => 'volume', total => 0, skip => 0};
return if ($self->check_filter(section => 'volume'));
foreach my $oid ($self->{snmp}->oid_lex_sort(keys %{$self->{results}->{$oid_volumeTable}})) {
next if ($oid !~ /^$mapping->{volumeStatus}->{oid}\.(\d+)/);
my $instance = $1;
my $result = $self->{snmp}->map_instance(mapping => $mapping, results => $self->{results}->{$oid_volumeTable}, instance => $instance);
next if ($self->check_filter(section => 'volume', instance => $instance));
$self->{components}->{volume}->{total}++;
$self->{output}->output_add(long_msg => sprintf("volume '%s' status is %s [instance: %s]",
$result->{volumeName}, $result->{volumeStatus}, $instance));
my $exit = $self->get_severity(section => 'volume', value => $result->{volumeStatus});
if (!$self->{output}->is_status(value => $exit, compare => 'ok', litteral => 1)) {
$self->{output}->output_add(severity => $exit,
short_msg => sprintf("Volume '%s' status is %s",
$result->{volumeName}, $result->{volumeStatus}));
}
}
}
1;

View File

@ -0,0 +1,151 @@
#
# Copyright 2018 Centreon (http://www.centreon.com/)
#
# Centreon is a full-fledged industry-strength solution that meets
# the needs in IT infrastructure and application monitoring for
# service performance.
#
# Licensed under the Apache License, Version 2.0 (the "License");
# you may not use this file except in compliance with the License.
# You may obtain a copy of the License at
#
# http://www.apache.org/licenses/LICENSE-2.0
#
# Unless required by applicable law or agreed to in writing, software
# distributed under the License is distributed on an "AS IS" BASIS,
# WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
# See the License for the specific language governing permissions and
# limitations under the License.
#
# Author : ArnoMLT
#
package storage::netgear::readynas::snmp::mode::hardware;
use base qw(centreon::plugins::templates::hardware);
use strict;
use warnings;
sub set_system {
my ($self, %options) = @_;
$self->{regexp_threshold_overload_check_section_option} = '^(fan|psu|disk|volume|temperature)$';
$self->{regexp_threshold_numeric_check_section_option} = '^(fan|temperature)$';
$self->{cb_hook1} = 'init_mib_ver';
$self->{cb_hook2} = 'snmp_execute';
$self->{thresholds} = {
# fan, temperature (v4)
default => [
['Normal', 'OK'],
['Ok', 'OK'],
['Unknown', 'CRITICAL'],
['Failed', 'CRITICAL'],
],
disk => [
['Online', 'OK'],
['Ok', 'OK'],
['Unknown', 'OK'],
['Offline', 'CRITICAL'],
],
psu => [
['On', 'OK'],
['Ok', 'OK'],
['Off', 'CRITICAL'],
['Unknown', 'CRITICAL']
],
volume => [
['Redundant', 'OK'],
['Ok', 'OK'],
['Unprotected', 'WARNING'],
['Degraded', 'CRITICAL'],
['Dead', 'CRITICAL'],
['Unknown', 'CRITICAL'],
],
};
$self->{components_path} = 'storage::netgear::readynas::snmp::mode::components';
$self->{components_module} = ['psu', 'fan', 'disk', 'volume', 'temperature'];
}
sub init_mib_ver {
my ($self, %options) = @_;
# make the difference between READYNASOS-MIB (v6) and READYNAS-MIB (v4)
my $oid_MgrSoftwareVersion_v4 = '.1.3.6.1.4.1.4526.18.1.0';
my $oid_MgrSoftwareVersion_v6 = '.1.3.6.1.4.1.4526.22.1.0';
my $result = $options{snmp}->get_leef(oids => [$oid_MgrSoftwareVersion_v4, $oid_MgrSoftwareVersion_v6]);
$self->{mib_ver} = defined($result->{$oid_MgrSoftwareVersion_v4}) ? 4 : 6;
}
sub snmp_execute {
my ($self, %options) = @_;
$self->{snmp} = $options{snmp};
$self->{results} = $self->{snmp}->get_multiple_table(oids => $self->{request});
}
sub new {
my ($class, %options) = @_;
my $self = $class->SUPER::new(package => __PACKAGE__, %options);
bless $self, $class;
$self->{version} = '1.0';
# In v4, fanRPM must be >0
$options{options}->add_options(arguments => {
"critical:s@" => { name => 'critical', default => ['fan,.*,1:'] },
});
return $self;
}
1;
__END__
=head1 MODE
Check hardware (READYNASOS-MIB, READYNAS-MIB) (Fans, Power Supplies, Disk status, Volume status, Temperatures).
=over 8
=item B<--component>
Which component to check (Default: '.*').
Can be: 'psu', 'fan', 'disk', 'volume', 'temperature'.
=item B<--filter>
Exclude some parts (comma seperated list) (Example: --filter=psu)
Can also exclude specific instance: --filter=psu,1
=item B<--no-component>
Return an error if no compenents are checked.
If total (with skipped) is 0. (Default: 'critical' returns).
=item B<--threshold-overload>
Set to overload default threshold values (syntax: section,[instance,]status,regexp)
It used before default thresholds (order stays).
Example: --threshold-overload='psu,CRITICAL,^(?!(on)$)'
=item B<--warning>
Set warning threshold for temperatures (syntax: type,instance,threshold)
Example: --warning='xxxxx,.*,30'
=item B<--critical>
Set critical threshold for temperatures (syntax: type,instance,threshold)
Example: --critical='xxxxx,.*,40'
=back
=cut

View File

@ -0,0 +1,55 @@
#
# Copyright 2018 Centreon (http://www.centreon.com/)
#
# Centreon is a full-fledged industry-strength solution that meets
# the needs in IT infrastructure and application monitoring for
# service performance.
#
# Licensed under the Apache License, Version 2.0 (the "License");
# you may not use this file except in compliance with the License.
# You may obtain a copy of the License at
#
# http://www.apache.org/licenses/LICENSE-2.0
#
# Unless required by applicable law or agreed to in writing, software
# distributed under the License is distributed on an "AS IS" BASIS,
# WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
# See the License for the specific language governing permissions and
# limitations under the License.
#
# Author : ArnoMLT
#
package storage::netgear::readynas::snmp::plugin;
use strict;
use warnings;
use base qw(centreon::plugins::script_snmp);
sub new {
my ($class, %options) = @_;
my $self = $class->SUPER::new(package => __PACKAGE__, %options);
bless $self, $class;
$self->{version} = '1.0';
%{$self->{modes}} = (
'hardware' => 'storage::netgear::readynas::snmp::mode::hardware',
'cpu' => 'snmp_standard::mode::cpu',
'interfaces' => 'snmp_standard::mode::interfaces',
'memory' => 'snmp_standard::mode::memory',
'load' => 'snmp_standard::mode::loadaverage',
'storage' => 'snmp_standard::mode::storage',
);
return $self;
}
1;
__END__
=head1 PLUGIN DESCRIPTION
Check Netgear ReadyNas devices in SNMP.
=cut