enhance netgear readynas plugin

This commit is contained in:
garnier-quentin 2019-01-09 15:58:47 +01:00
parent 32c8603efd
commit 658cfa0773
6 changed files with 126 additions and 157 deletions

View File

@ -28,22 +28,22 @@ use warnings;
my ($mapping, $oid_diskTable); my ($mapping, $oid_diskTable);
my $mapping_v6 = { my $mapping_v6 = {
diskState => { oid => '.1.3.6.1.4.1.4526.22.3.1.9' }, 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' }, 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 $oid_diskTable_v6 = '.1.3.6.1.4.1.4526.22.3';
my $mapping_v4 = { my $mapping_v4 = {
diskState => { oid => '.1.3.6.1.4.1.4526.18.3.1.4' }, 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' }, 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'; my $oid_diskTable_v4 = '.1.3.6.1.4.1.4526.18.3';
sub load { sub load {
my ($self) = @_; my ($self) = @_;
$mapping = $self->{mib_ver} == 4 ? $mapping_v4 : $mapping_v6; $mapping = $self->{mib_ver} == 4 ? $mapping_v4 : $mapping_v6;
$oid_diskTable = $self->{mib_ver} == 4 ? $oid_diskTable_v4 : $oid_diskTable_v6; $oid_diskTable = $self->{mib_ver} == 4 ? $oid_diskTable_v4 : $oid_diskTable_v6;
push @{$self->{request}}, { oid => $oid_diskTable }; push @{$self->{request}}, { oid => $oid_diskTable };
} }
@ -51,7 +51,7 @@ sub load {
sub check { sub check {
my ($self) = @_; my ($self) = @_;
$self->{output}->output_add(long_msg => "Checking disk"); $self->{output}->output_add(long_msg => "checking disks");
$self->{components}->{disk} = {name => 'disk', total => 0, skip => 0}; $self->{components}->{disk} = {name => 'disk', total => 0, skip => 0};
return if ($self->check_filter(section => 'disk')); return if ($self->check_filter(section => 'disk'));
@ -63,18 +63,17 @@ sub check {
next if ($self->check_filter(section => 'disk', instance => $instance)); next if ($self->check_filter(section => 'disk', instance => $instance));
$self->{components}->{disk}->{total}++; $self->{components}->{disk}->{total}++;
my $temperature_string = defined($result->{diskTemperature}) && $result->{diskTemperature} != -1 ? " (temperature $result->{diskTemperature}" : ''; my $temperature_string = defined($result->{diskTemperature}) && $result->{diskTemperature} != -1 ? " (temperature $result->{diskTemperature}" : '';
my $temperature_unit = $temperature_string ne '' && $self->{mib_ver} == 6 ? 'C)' : ''; my $temperature_unit = $temperature_string ne '' && $self->{mib_ver} == 6 ? 'C)' : '';
$temperature_unit = $temperature_string ne '' && $self->{mib_ver} == 4 ? 'F)' : ''; $temperature_unit = $temperature_string ne '' && $self->{mib_ver} == 4 ? 'F)' : '';
$self->{output}->output_add(long_msg => sprintf("disk '%s'%s%s status is %s.", $self->{output}->output_add(long_msg => sprintf("disk '%s' status is %s [temperature: %s%s]",
$instance, $temperature_string, $temperature_unit, $result->{diskState})); $instance, $result->{diskState}, $temperature_string, $temperature_unit));
my $exit = $self->get_severity(section => 'disk', value => $result->{diskState}); my $exit = $self->get_severity(section => 'disk', value => $result->{diskState});
if (!$self->{output}->is_status(value => $exit, compare => 'ok', litteral => 1)) { if (!$self->{output}->is_status(value => $exit, compare => 'ok', litteral => 1)) {
$self->{output}->output_add(severity => $exit, $self->{output}->output_add(severity => $exit,
short_msg => sprintf("Disk '%s'%s%s status is %s", $instance, $temperature_string, $temperature_unit, $result->{diskState})); short_msg => sprintf("Disk '%s' status is %s", $instance, $result->{diskState}));
} }
} }
} }

View File

@ -33,15 +33,15 @@ my $mapping_v6 = {
my $oid_fanTable_v6 = '.1.3.6.1.4.1.4526.22.4'; my $oid_fanTable_v6 = '.1.3.6.1.4.1.4526.22.4';
my $mapping_v4 = { my $mapping_v4 = {
fanRPM => { oid => '.1.3.6.1.4.1.4526.18.4.1.2' }, 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'; my $oid_fanTable_v4 = '.1.3.6.1.4.1.4526.18.4';
sub load { sub load {
my ($self) = @_; my ($self) = @_;
$mapping = $self->{mib_ver} == 4 ? $mapping_v4 : $mapping_v6; $mapping = $self->{mib_ver} == 4 ? $mapping_v4 : $mapping_v6;
$oid_fanTable = $self->{mib_ver} == 4 ? $oid_fanTable_v4 : $oid_fanTable_v6; $oid_fanTable = $self->{mib_ver} == 4 ? $oid_fanTable_v4 : $oid_fanTable_v6;
push @{$self->{request}}, { oid => $oid_fanTable }; push @{$self->{request}}, { oid => $oid_fanTable };
} }
@ -49,43 +49,48 @@ sub load {
sub check { sub check {
my ($self) = @_; my ($self) = @_;
$self->{output}->output_add(long_msg => "Checking fan"); $self->{output}->output_add(long_msg => "checking fan");
$self->{components}->{fan} = {name => 'fan', total => 0, skip => 0}; $self->{components}->{fan} = {name => 'fan', total => 0, skip => 0};
return if ($self->check_filter(section => 'fan')); return if ($self->check_filter(section => 'fan'));
if ($self->{mib_ver} == 6){ if ($self->{mib_ver} == 6) {
foreach my $oid ($self->{snmp}->oid_lex_sort(keys %{$self->{results}->{$oid_fanTable}})) { foreach my $oid ($self->{snmp}->oid_lex_sort(keys %{$self->{results}->{$oid_fanTable}})) {
next if ($oid !~ /^$mapping->{fanStatus}->{oid}\.(\d+)/); next if ($oid !~ /^$mapping->{fanStatus}->{oid}\.(\d+)/);
my $instance = $1; my $instance = $1;
my $result = $self->{snmp}->map_instance(mapping => $mapping, results => $self->{results}->{$oid_fanTable}, instance => $instance); my $result = $self->{snmp}->map_instance(mapping => $mapping, results => $self->{results}->{$oid_fanTable}, instance => $instance);
next if ($self->check_filter(section => 'fan', instance => $instance)); next if ($self->check_filter(section => 'fan', instance => $instance));
$self->{components}->{fan}->{total}++; $self->{components}->{fan}->{total}++;
$self->{output}->output_add(long_msg => sprintf("fan '%s' status is %s.", $instance, $result->{fanStatus})); $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}); my $exit = $self->get_severity(label => 'default', section => 'fan', value => $result->{fanStatus});
if (!$self->{output}->is_status(value => $exit, compare => 'ok', litteral => 1)) { if (!$self->{output}->is_status(value => $exit, compare => 'ok', litteral => 1)) {
$self->{output}->output_add(severity => $exit, $self->{output}->output_add(severity => $exit,
short_msg => sprintf("fan '%s' status is %s", $instance, $result->{fanStatus})); short_msg => sprintf("fan '%s' status is %s", $instance, $result->{fanStatus}));
} }
} }
}elsif ($self->{mib_ver} == 4){ return ;
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)); foreach my $oid ($self->{snmp}->oid_lex_sort(keys %{$self->{results}->{$oid_fanTable}})) {
$self->{components}->{fan}->{total}++; 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);
$self->{output}->output_add(long_msg => sprintf("fan '%s' rpm is %s.", $instance, $result->{fanRPM})); next if ($self->check_filter(section => 'fan', instance => $instance));
my ($exit) = $self->get_severity_numeric(section => 'fan', instance => $instance, value => $result->{fanRPM}); $self->{components}->{fan}->{total}++;
if (!$self->{output}->is_status(value => $exit, compare => 'ok', litteral => 1)) {
$self->{output}->output_add(severity => $exit, $self->{output}->output_add(long_msg => sprintf("fan '%s' rpm is %s.", $instance, $result->{fanRPM}));
short_msg => sprintf("fan '%s' rpm is %s", $instance, $result->{fanRPM})); my ($exit, $warn, $crit) = $self->get_severity_numeric(section => 'fan', instance => $instance, value => $result->{fanRPM});
} if (!$self->{output}->is_status(value => $exit, compare => 'ok', litteral => 1)) {
$self->{output}->perfdata_add(label => "fan_" . $instance, unit => 'RPM', value => $result->{fanRPM}); $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},
warning => $warn,
critical => $crit);
} }
} }

View File

@ -40,8 +40,8 @@ my $oid_psuTable_v4 = '.1.3.6.1.4.1.4526.18.8';
sub load { sub load {
my ($self) = @_; my ($self) = @_;
$mapping = $self->{mib_ver} == 4 ? $mapping_v4 : $mapping_v6; $mapping = $self->{mib_ver} == 4 ? $mapping_v4 : $mapping_v6;
$oid_psuTable = $self->{mib_ver} == 4 ? $oid_psuTable_v4 : $oid_psuTable_v6; $oid_psuTable = $self->{mib_ver} == 4 ? $oid_psuTable_v4 : $oid_psuTable_v6;
push @{$self->{request}}, { oid => $oid_psuTable }; push @{$self->{request}}, { oid => $oid_psuTable };
} }
@ -49,7 +49,7 @@ sub load {
sub check { sub check {
my ($self) = @_; my ($self) = @_;
$self->{output}->output_add(long_msg => "Checking power supply"); $self->{output}->output_add(long_msg => "checking power supply");
$self->{components}->{psu} = {name => 'psu', total => 0, skip => 0}; $self->{components}->{psu} = {name => 'psu', total => 0, skip => 0};
return if ($self->check_filter(section => 'psu')); return if ($self->check_filter(section => 'psu'));
@ -63,7 +63,7 @@ sub check {
$self->{output}->output_add(long_msg => sprintf("power supply '%s' status is %s.", $self->{output}->output_add(long_msg => sprintf("power supply '%s' status is %s.",
$instance, $result->{psuStatus})); $instance, $result->{psuStatus}));
my $exit = $self->get_severity(section => 'psu', value => $result->{psuStatus}); my $exit = $self->get_severity(section => 'psu', value => $result->{psuStatus});
if (!$self->{output}->is_status(value => $exit, compare => 'ok', litteral => 1)) { if (!$self->{output}->is_status(value => $exit, compare => 'ok', litteral => 1)) {
$self->{output}->output_add(severity => $exit, $self->{output}->output_add(severity => $exit,
short_msg => sprintf("Power Supply '%s' status is %s.", $instance, $result->{psuStatus})); short_msg => sprintf("Power Supply '%s' status is %s.", $instance, $result->{psuStatus}));

View File

@ -29,22 +29,22 @@ my ($mapping, $oid_temperatureTable);
my $mapping_v6 = { my $mapping_v6 = {
temperatureValue => { oid => '.1.3.6.1.4.1.4526.22.5.1.2' }, 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' }, 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' }, 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 $oid_temperatureTable_v6 = '.1.3.6.1.4.1.4526.22.5';
my $mapping_v4 = { my $mapping_v4 = {
temperatureValue => { oid => '.1.3.6.1.4.1.4526.18.5.1.2' }, 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' }, 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'; my $oid_temperatureTable_v4 = '.1.3.6.1.4.1.4526.18.5';
sub load { sub load {
my ($self) = @_; my ($self) = @_;
$mapping = $self->{mib_ver} == 4 ? $mapping_v4 : $mapping_v6; $mapping = $self->{mib_ver} == 4 ? $mapping_v4 : $mapping_v6;
$oid_temperatureTable = $self->{mib_ver} == 4 ? $oid_temperatureTable_v4 : $oid_temperatureTable_v6; $oid_temperatureTable = $self->{mib_ver} == 4 ? $oid_temperatureTable_v4 : $oid_temperatureTable_v6;
push @{$self->{request}}, { oid => $oid_temperatureTable }; push @{$self->{request}}, { oid => $oid_temperatureTable };
} }
@ -52,70 +52,39 @@ sub load {
sub check { sub check {
my ($self) = @_; my ($self) = @_;
$self->{output}->output_add(long_msg => "Checking temperatures"); $self->{output}->output_add(long_msg => "checking temperatures");
$self->{components}->{temperature} = {name => 'temperatures', total => 0, skip => 0}; $self->{components}->{temperature} = { name => 'temperatures', total => 0, skip => 0 };
return if ($self->check_filter(section => 'temperature')); return if ($self->check_filter(section => 'temperature'));
foreach my $oid ($self->{snmp}->oid_lex_sort(keys %{$self->{results}->{$oid_temperatureTable}})) { foreach my $oid ($self->{snmp}->oid_lex_sort(keys %{$self->{results}->{$oid_temperatureTable}})) {
next if ($oid !~ /^$mapping->{temperatureValue}->{oid}\.(.*)$/); next if ($oid !~ /^$mapping->{temperatureValue}->{oid}\.(.*)$/);
my $instance = $1; my $instance = $1;
my $result = $self->{snmp}->map_instance(mapping => $mapping, results => $self->{results}->{$oid_temperatureTable}, instance => $instance); my $result = $self->{snmp}->map_instance(mapping => $mapping, results => $self->{results}->{$oid_temperatureTable}, instance => $instance);
$instance .= "_" . $result->{temperatureType} if (defined($result->{temperatureType}));
next if ($self->check_filter(section => 'temperature', instance => $instance)); next if ($self->check_filter(section => 'temperature', instance => $instance));
$self->{components}->{temperature}->{total}++; $self->{components}->{temperature}->{total}++;
my $temperatureMax_string = defined($result->{temperatureMax}) && $result->{temperatureMax} != -1 ? " ($result->{temperatureMax} max)" : ''; my $temperatureMax_string = defined($result->{temperatureMax}) && $result->{temperatureMax} != -1 ? " ($result->{temperatureMax} max)" : '';
my $temperatureMax_unit = defined($result->{temperatureMax}) && $self->{mib_ver} == 6 ? 'C' : 'F'; my $temperatureMax_unit = defined($result->{temperatureMax}) && $self->{mib_ver} == 6 ? 'C' : 'F';
if ($self->{mib_ver} == 6){ $self->{output}->output_add(long_msg => sprintf("temperature '%s' status is %s [value = %s%s]",
$self->{output}->output_add(long_msg => sprintf("'%s' %s temperature is %d%s%s.", $instance, $result->{temperatureStatus}, $result->{temperatureValue}, $temperatureMax_unit));
$instance, $result->{temperatureType}, $result->{temperatureValue}, my $exit = $self->get_severity(label => 'default', section => 'temperature', value => $result->{temperatureStatus});
$temperatureMax_unit, $temperatureMax_string)); if (!$self->{output}->is_status(value => $exit, compare => 'ok', litteral => 1)) {
$self->{output}->output_add(severity => $exit,
short_msg => sprintf("Temperature '%s' status is %s.", $instance, $result->{temperatureStatus}));
}
if (defined($result->{temperatureValue}) && $result->{temperatureValue} != -1) { my ($exit2, $warn, $crit) = $self->get_severity_numeric(section => 'temperature', instance => $instance, value => $result->{temperatureValue});
my ($exit, $warn, $crit, $checked) = $self->get_severity_numeric(section => 'temperature', instance => $instance, value => $result->{temperatureValue}); if (!$self->{output}->is_status(value => $exit2, compare => 'ok', litteral => 1)) {
if ($checked == 0) { $self->{output}->output_add(severity => $exit2,
my $crit_th = $result->{temperatureMax} != -1 ? $result->{temperatureMax} : ''; short_msg => sprintf("Temperature '%s' is %s%s", $instance, $result->{temperatureValue}, $temperatureMax_unit));
my $warn_th = $crit_th ne '' ? $crit_th-10 : ''; }
$self->{perfdata}->threshold_validate(label => 'warning-temperature-instance-' . $instance, value => $warn_th); $self->{output}->perfdata_add(label => "temp_" . $instance, unit => $temperatureMax_unit,
$self->{perfdata}->threshold_validate(label => 'critical-temperature-instance-' . $instance, value => $crit_th); value => $result->{temperatureValue},
$warn = $self->{perfdata}->get_perfdata_for_output(label => 'warning-temperature-instance-' . $instance); warning => $warn,
$crit = $self->{perfdata}->get_perfdata_for_output(label => 'critical-temperature-instance-' . $instance); critical => $crit);
}
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});
}
} }
} }

View File

@ -42,8 +42,8 @@ my $oid_volumeTable_v4 = '.1.3.6.1.4.1.4526.18.7';
sub load { sub load {
my ($self) = @_; my ($self) = @_;
$mapping = $self->{mib_ver} == 4 ? $mapping_v4 : $mapping_v6; $mapping = $self->{mib_ver} == 4 ? $mapping_v4 : $mapping_v6;
$oid_volumeTable = $self->{mib_ver} == 4 ? $oid_volumeTable_v4 : $oid_volumeTable_v6; $oid_volumeTable = $self->{mib_ver} == 4 ? $oid_volumeTable_v4 : $oid_volumeTable_v6;
push @{$self->{request}}, { oid => $oid_volumeTable }; push @{$self->{request}}, { oid => $oid_volumeTable };
} }
@ -51,7 +51,7 @@ sub load {
sub check { sub check {
my ($self) = @_; my ($self) = @_;
$self->{output}->output_add(long_msg => "Checking volume"); $self->{output}->output_add(long_msg => "checking volume");
$self->{components}->{volume} = {name => 'volume', total => 0, skip => 0}; $self->{components}->{volume} = {name => 'volume', total => 0, skip => 0};
return if ($self->check_filter(section => 'volume')); return if ($self->check_filter(section => 'volume'));

View File

@ -33,32 +33,31 @@ sub set_system {
$self->{regexp_threshold_overload_check_section_option} = '^(fan|psu|disk|volume|temperature)$'; $self->{regexp_threshold_overload_check_section_option} = '^(fan|psu|disk|volume|temperature)$';
$self->{regexp_threshold_numeric_check_section_option} = '^(fan|temperature)$'; $self->{regexp_threshold_numeric_check_section_option} = '^(fan|temperature)$';
$self->{cb_hook1} = 'init_mib_ver'; $self->{cb_hook1} = 'init_mib_ver';
$self->{cb_hook2} = 'snmp_execute'; $self->{cb_hook2} = 'snmp_execute';
$self->{thresholds} = { $self->{thresholds} = {
# fan, temperature (v4)
default => [ default => [
['Normal', 'OK'], ['Normal', 'OK'],
['Ok', 'OK'], ['Ok', 'OK'],
['Unknown', 'CRITICAL'], ['Unknown', 'CRITICAL'],
['Failed', 'CRITICAL'], ['Failed', 'CRITICAL'],
], ],
disk => [ disk => [
['Online', 'OK'], ['Online', 'OK'],
['Ok', 'OK'], ['Ok', 'OK'],
['Unknown', 'OK'], ['Unknown', 'OK'],
['Offline', 'CRITICAL'], ['Offline', 'CRITICAL'],
], ],
psu => [ psu => [
['On', 'OK'], ['On', 'OK'],
['Ok', 'OK'], ['Ok', 'OK'],
['Off', 'CRITICAL'], ['Off', 'CRITICAL'],
['Unknown', 'CRITICAL'] ['Unknown', 'CRITICAL']
], ],
volume => [ volume => [
['Redundant', 'OK'], ['Redundant', 'OK'],
['Ok', 'OK'], ['Ok', 'OK'],
['Unprotected', 'WARNING'], ['Unprotected', 'WARNING'],
['Degraded', 'CRITICAL'], ['Degraded', 'CRITICAL'],
['Dead', 'CRITICAL'], ['Dead', 'CRITICAL'],
@ -73,21 +72,20 @@ sub set_system {
sub init_mib_ver { sub init_mib_ver {
my ($self, %options) = @_; my ($self, %options) = @_;
# make the difference between READYNASOS-MIB (v6) and READYNAS-MIB (v4) # 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_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 $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]); my $result = $options{snmp}->get_leef(oids => [$oid_MgrSoftwareVersion_v4, $oid_MgrSoftwareVersion_v6]);
$self->{mib_ver} = defined($result->{$oid_MgrSoftwareVersion_v4}) ? 4 : 6; $self->{mib_ver} = defined($result->{$oid_MgrSoftwareVersion_v4}) ? 4 : 6;
} }
sub snmp_execute { sub snmp_execute {
my ($self, %options) = @_; my ($self, %options) = @_;
$self->{snmp} = $options{snmp}; $self->{snmp} = $options{snmp};
$self->{results} = $self->{snmp}->get_multiple_table(oids => $self->{request}); $self->{results} = $self->{snmp}->get_multiple_table(oids => $self->{request});
} }
sub new { sub new {
@ -96,11 +94,9 @@ sub new {
bless $self, $class; bless $self, $class;
$self->{version} = '1.0'; $self->{version} = '1.0';
$options{options}->add_options(arguments =>
# In v4, fanRPM must be >0 {
$options{options}->add_options(arguments => { });
"critical:s@" => { name => 'critical', default => ['fan,.*,1:'] },
});
return $self; return $self;
} }
@ -138,12 +134,12 @@ Example: --threshold-overload='psu,CRITICAL,^(?!(on)$)'
=item B<--warning> =item B<--warning>
Set warning threshold for temperatures (syntax: type,instance,threshold) Set warning threshold for temperatures, fan (syntax: type,instance,threshold)
Example: --warning='xxxxx,.*,30' Example: --warning='xxxxx,.*,30'
=item B<--critical> =item B<--critical>
Set critical threshold for temperatures (syntax: type,instance,threshold) Set critical threshold for temperatures, fan (syntax: type,instance,threshold)
Example: --critical='xxxxx,.*,40' Example: --critical='xxxxx,.*,40'
=back =back