diff --git a/network/alcatel/isam/snmp/mode/components/cardtemperature.pm b/network/alcatel/isam/snmp/mode/components/cardtemperature.pm new file mode 100644 index 000000000..feda91d07 --- /dev/null +++ b/network/alcatel/isam/snmp/mode/components/cardtemperature.pm @@ -0,0 +1,71 @@ +# +# Copyright 2017 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. +# + +package network::alcatel::isam::snmp::mode::components::cardtemperature; + +use strict; +use warnings; +use network::alcatel::isam::snmp::mode::components::resources qw($mapping_slot); + +my $oid_eqptBoardThermalSensorActualTemperature = '.1.3.6.1.4.1.637.61.1.23.10.1.2'; + +sub load { + my ($self) = @_; + + push @{$self->{request}}, { oid => $oid_eqptBoardThermalSensorActualTemperature }; +} + +sub check { + my ($self) = @_; + + $self->{output}->output_add(long_msg => "Checking card temperatures"); + $self->{components}->{cardtemperature} = {name => 'card temperatures', total => 0, skip => 0}; + return if ($self->check_filter(section => 'cardtemperature')); + + foreach my $oid ($self->{snmp}->oid_lex_sort(keys %{$self->{results}->{$oid_eqptBoardThermalSensorActualTemperature}})) { + $oid =~ /^$oid_eqptBoardThermalSensorActualTemperature\.(.*?)\.(.*?)$/; + my ($slot_id, $thermal_id) = ($1, $2); + + my $temperature = $self->{results}->{$oid_eqptBoardThermalSensorActualTemperature}->{$oid}; + my $result = $self->{snmp}->map_instance(mapping => $mapping_slot, results => + { %{$self->{results}->{$mapping_slot->{eqptSlotActualType}->{oid}}}, %{$self->{results}->{$mapping_slot->{eqptBoardInventorySerialNumber}->{oid}}} }, instance => $slot_id); + + next if ($self->check_filter(section => 'cardtemperature', instance => $slot_id . '.' . $thermal_id)); + + my $name = $result->{eqptSlotActualType} . '/' . $result->{eqptBoardInventorySerialNumber} . '/' . $thermal_id; + $self->{components}->{cardtemperature}->{total}++; + $self->{output}->output_add(long_msg => sprintf("card '%s' temperature is %s C [instance = %s]", + $name, $temperature, $slot_id . '.' . $thermal_id)); + + my ($exit, $warn, $crit, $checked) = $self->get_severity_numeric(section => 'cardtemperature', instance => $slot_id . '.' . $thermal_id, value => $temperature); + if (!$self->{output}->is_status(value => $exit, compare => 'ok', litteral => 1)) { + $self->{output}->output_add(severity => $exit, + short_msg => sprintf("Card '%s' temperature is %s C", $name, $temperature)); + } + $self->{output}->perfdata_add(label => 'cardtemperature_' . $name, + unit => 'C', + value => $temperature, + warning => $warn, + critical => $crit + ); + } +} + +1; \ No newline at end of file diff --git a/network/alcatel/isam/snmp/mode/components/resources.pm b/network/alcatel/isam/snmp/mode/components/resources.pm new file mode 100644 index 000000000..bcf5b478c --- /dev/null +++ b/network/alcatel/isam/snmp/mode/components/resources.pm @@ -0,0 +1,37 @@ +# +# Copyright 2017 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. +# + +package network::alcatel::isam::snmp::mode::components::resources; + +use strict; +use warnings; +use Exporter; + +our $mapping_slot; + +our @ISA = qw(Exporter); +our @EXPORT_OK = qw($mapping_slot); + +$mapping_slot = { + eqptSlotActualType => { oid => '.1.3.6.1.4.1.637.61.1.23.3.1.3' }, + eqptBoardInventorySerialNumber => { oid => '.1.3.6.1.4.1.637.61.1.23.3.1.19' }, +}; + +1; \ No newline at end of file diff --git a/network/alcatel/isam/snmp/mode/hardware.pm b/network/alcatel/isam/snmp/mode/hardware.pm new file mode 100644 index 000000000..b5134f905 --- /dev/null +++ b/network/alcatel/isam/snmp/mode/hardware.pm @@ -0,0 +1,115 @@ +# +# Copyright 2017 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. +# + +package network::alcatel::isam::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} = '^(cardtemperature)$'; + $self->{regexp_threshold_numeric_check_section_option} = '^(cardtemperature)$'; + + $self->{cb_hook2} = 'snmp_execute'; + + $self->{thresholds} = { + psu => [ + ['notPresent', 'OK'], + ['presentOK', 'OK'], + ['presentPowerOff', 'WARNING'], + ['presentNotOK', 'CRITICAL'], + ], + }; + + $self->{components_path} = 'network::alcatel::isam::snmp::mode::components'; + $self->{components_module} = ['cardtemperature']; +} + +sub snmp_execute { + my ($self, %options) = @_; + + $self->{snmp} = $options{snmp}; + my $oid_eqptSlotActualType = '.1.3.6.1.4.1.637.61.1.23.3.1.3'; + my $oid_eqptBoardInventorySerialNumber = '.1.3.6.1.4.1.637.61.1.23.3.1.19'; + push @{$self->{request}}, { oid => $oid_eqptSlotActualType }, { oid => $oid_eqptBoardInventorySerialNumber }; + $self->{results} = $self->{snmp}->get_multiple_table(oids => $self->{request}); +} + +sub new { + my ($class, %options) = @_; + my $self = $class->SUPER::new(package => __PACKAGE__, %options, no_absent => 1); + bless $self, $class; + + $self->{version} = '1.0'; + $options{options}->add_options(arguments => + { + }); + + return $self; +} + +1; + +__END__ + +=head1 MODE + +Check Hardware. + +=over 8 + +=item B<--component> + +Which component to check (Default: '.*'). +Can be: 'cardtemperature'. + +=item B<--filter> + +Exclude some parts (comma seperated list) (Example: --filter=fan --filter=psu) +Can also exclude specific instance: --filter=fan,101 + +=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,^(?!(presentOK)$)' + +=item B<--warning> + +Set warning threshold for 'temperature', 'fan', 'psu.fan', 'psu' (syntax: type,regexp,threshold) +Example: --warning='psu.fan,1.1,5000' + +=item B<--critical> + +Set critical threshold for 'temperature', 'fan', 'psu.fan', 'psu' (syntax: type,regexp,threshold) +Example: --critical='psu,.*,200' + +=back + +=cut \ No newline at end of file diff --git a/network/alcatel/isam/snmp/plugin.pm b/network/alcatel/isam/snmp/plugin.pm index 08d469401..4121197b2 100644 --- a/network/alcatel/isam/snmp/plugin.pm +++ b/network/alcatel/isam/snmp/plugin.pm @@ -31,6 +31,7 @@ sub new { $self->{version} = '1.0'; %{$self->{modes}} = ( + 'hardware' => 'network::alcatel::isam::snmp::mode::hardware', 'vlan-traffic' => 'network::alcatel::isam::snmp::mode::vlantraffic', );