diff --git a/hardware/pdu/apc/mode/humidity.pm b/hardware/pdu/apc/mode/humidity.pm new file mode 100644 index 000000000..d44269bf0 --- /dev/null +++ b/hardware/pdu/apc/mode/humidity.pm @@ -0,0 +1,158 @@ +################################################################################ +# Copyright 2005-2013 MERETHIS +# Centreon is developped by : Julien Mathis and Romain Le Merlus under +# GPL Licence 2.0. +# +# This program is free software; you can redistribute it and/or modify it under +# the terms of the GNU General Public License as published by the Free Software +# Foundation ; either version 2 of the License. +# +# This program is distributed in the hope that it will be useful, but WITHOUT ANY +# WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A +# PARTICULAR PURPOSE. See the GNU General Public License for more details. +# +# You should have received a copy of the GNU General Public License along with +# this program; if not, see . +# +# Linking this program statically or dynamically with other modules is making a +# combined work based on this program. Thus, the terms and conditions of the GNU +# General Public License cover the whole combination. +# +# As a special exception, the copyright holders of this program give MERETHIS +# permission to link this program with independent modules to produce an executable, +# regardless of the license terms of these independent modules, and to copy and +# distribute the resulting executable under terms of MERETHIS choice, provided that +# MERETHIS also meet, for each linked independent module, the terms and conditions +# of the license of that module. An independent module is a module which is not +# derived from this program. If you modify this program, you may extend this +# exception to your version of the program, but you are not obliged to do so. If you +# do not wish to do so, delete this exception statement from your version. +# +# For more information : contact@centreon.com +# Authors : Quentin Garnier +# +#################################################################################### + +package hardware::pdu::apc::mode::humidity; + +use base qw(centreon::plugins::mode); + +use strict; +use warnings; + +my %states = ( + 1 => ['notPresent', 'OK'], + 2 => ['belowMin', 'CRITICAL'], + 3 => ['belowLow', 'WARNING'], + 4 => ['normal', 'OK'], + 5 => ['aboveHigh', 'WARNING'], + 6 => ['aboveMax', 'CRITICAL'], +); + +my %type = ( + 1 => 'temperatureOnly', + 2 => 'temperatureHumidity' +); + +sub new { + my ($class, %options) = @_; + my $self = $class->SUPER::new(package => __PACKAGE__, %options); + bless $self, $class; + + $self->{version} = '1.0'; + $options{options}->add_options(arguments => + { + "warning:s" => { name => 'warning', }, + "critical:s" => { name => 'critical', }, + }); + + return $self; +} + +sub check_options { + my ($self, %options) = @_; + $self->SUPER::init(%options); + + if (($self->{perfdata}->threshold_validate(label => 'warning', value => $self->{option_results}->{warning})) == 0) { + $self->{output}->add_option_msg(short_msg => "Wrong warning threshold '" . $self->{option_results}->{warning} . "'."); + $self->{output}->option_exit(); + } + if (($self->{perfdata}->threshold_validate(label => 'critical', value => $self->{option_results}->{critical})) == 0) { + $self->{output}->add_option_msg(short_msg => "Wrong critical threshold '" . $self->{option_results}->{critical} . "'."); + $self->{output}->option_exit(); + } +} + +sub run { + my ($self, %options) = @_; + # $options{snmp} = snmp object + $self->{snmp} = $options{snmp}; + + my $oid_rPDU2SensorTempHumidityStatusName = '.1.3.6.1.4.1.318.1.1.26.10.2.2.1.3'; + my $oid_rPDU2SensorTempHumidityStatusNumber = '.1.3.6.1.4.1.318.1.1.26.10.2.2.1.4'; + my $oid_rPDU2SensorTempHumidityStatusType = '.1.3.6.1.4.1.318.1.1.26.10.2.2.1.5'; + my $oid_rPDU2SensorTempHumidityStatusRelativeHumidity = '.1.3.6.1.4.1.318.1.1.26.10.2.2.1.10'; + my $oid_rPDU2SensorTempHumidityStatusHumidityStatus = '.1.3.6.1.4.1.318.1.1.26.10.2.2.1.11'; + + $self->{results} = $self->{snmp}->get_multiple_table(oids => [ + { oid => $oid_rPDU2SensorTempHumidityStatusName }, + { oid => $oid_rPDU2SensorTempHumidityStatusNumber }, + { oid => $oid_rPDU2SensorTempHumidityStatusType }, + { oid => $oid_rPDU2SensorTempHumidityStatusRelativeHumidity }, + { oid => $oid_rPDU2SensorTempHumidityStatusHumidityStatus }, + ], + , nothing_quit => 1); + + + $self->{output}->output_add(severity => 'OK', + short_msg => 'All humidity sensors are ok'); + + foreach my $oid (keys %{$self->{results}->{ $oid_rPDU2SensorTempHumidityStatusName}}) { + $oid =~ /\.([0-9]+)$/; + my $instance = $1; + + next if ($self->{results}->{$oid_rPDU2SensorTempHumidityStatusType}->{$oid_rPDU2SensorTempHumidityStatusType . '.' . $instance} == 1); + + my $sensor_name = $self->{results}->{ $oid_rPDU2SensorTempHumidityStatusName}->{$oid}; + my $sensor_number = $self->{results}->{$oid_rPDU2SensorTempHumidityStatusNumber}->{$oid_rPDU2SensorTempHumidityStatusNumber . '.' . $instance}; + my $sensor_humidity = $self->{results}->{$oid_rPDU2SensorTempHumidityStatusRelativeHumidity}->{$oid_rPDU2SensorTempHumidityStatusRelativeHumidity . '.' . $instance}; + my $sensor_status = $self->{results}->{$oid_rPDU2SensorTempHumidityStatusHumidityStatus}->{$oid_rPDU2SensorTempHumidityStatusHumidityStatus . '.' . $instance}; + + $self->{output}->output_add(long_msg => sprintf("Humidity sensor #%d '%s' is '%d%%'", + $sensor_number, $sensor_name, $sensor_humidity)); + $self->{output}->perfdata_add(label => 'hum' . $sensor_number, + unit => '%', + value => $sensor_humidity, + warning => $self->{perfdata}->get_perfdata_for_output(label => 'warning'), + critical => $self->{perfdata}->get_perfdata_for_output(label => 'critical'), + min => 0, + max => 100); + + my $exit = $self->{perfdata}->threshold_check(value => $sensor_humidity, + 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("Temperature sensor #%d '%s' is '%d%%'", + $sensor_number, $sensor_name, $sensor_humidity)); + } + } + + $self->{output}->display(); + $self->{output}->exit(); +} + +1; + +__END__ + +=head1 MODE + +Check APC humidity sensors. + +=over 8 + +=back + +=cut + diff --git a/hardware/pdu/apc/mode/load.pm b/hardware/pdu/apc/mode/load.pm new file mode 100644 index 000000000..b676f342a --- /dev/null +++ b/hardware/pdu/apc/mode/load.pm @@ -0,0 +1,129 @@ +################################################################################ +# Copyright 2005-2013 MERETHIS +# Centreon is developped by : Julien Mathis and Romain Le Merlus under +# GPL Licence 2.0. +# +# This program is free software; you can redistribute it and/or modify it under +# the terms of the GNU General Public License as published by the Free Software +# Foundation ; either version 2 of the License. +# +# This program is distributed in the hope that it will be useful, but WITHOUT ANY +# WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A +# PARTICULAR PURPOSE. See the GNU General Public License for more details. +# +# You should have received a copy of the GNU General Public License along with +# this program; if not, see . +# +# Linking this program statically or dynamically with other modules is making a +# combined work based on this program. Thus, the terms and conditions of the GNU +# General Public License cover the whole combination. +# +# As a special exception, the copyright holders of this program give MERETHIS +# permission to link this program with independent modules to produce an executable, +# regardless of the license terms of these independent modules, and to copy and +# distribute the resulting executable under terms of MERETHIS choice, provided that +# MERETHIS also meet, for each linked independent module, the terms and conditions +# of the license of that module. An independent module is a module which is not +# derived from this program. If you modify this program, you may extend this +# exception to your version of the program, but you are not obliged to do so. If you +# do not wish to do so, delete this exception statement from your version. +# +# For more information : contact@centreon.com +# Authors : Quentin Garnier +# +#################################################################################### + +package hardware::pdu::apc::mode::load; + +use base qw(centreon::plugins::mode); + +use strict; +use warnings; + +my %states = ( + 1 => ['phaseLoadNormal', 'OK'], + 2 => ['phaseLoadLow', 'WARNING'], + 3 => ['phaseLoadNearOverload', 'WARNING'], + 4 => ['phaseLoadOverload', 'CRITICAL'], +); + +sub new { + my ($class, %options) = @_; + my $self = $class->SUPER::new(package => __PACKAGE__, %options); + bless $self, $class; + + $self->{version} = '1.0'; + $options{options}->add_options(arguments => + { + }); + + return $self; +} + +sub check_options { + my ($self, %options) = @_; + $self->SUPER::init(%options); +} + +sub run { + my ($self, %options) = @_; + # $options{snmp} = snmp object + $self->{snmp} = $options{snmp}; + + my $oid_rPDULoadStatusLoad = '.1.3.6.1.4.1.318.1.1.12.2.3.1.1.2'; + my $oid_rPDULoadStatusLoadState = '.1.3.6.1.4.1.318.1.1.12.2.3.1.1.3'; + my $oid_rPDULoadStatusPhaseNumber = '.1.3.6.1.4.1.318.1.1.12.2.3.1.1.4'; + my $oid_rPDULoadStatusBankNumber = '.1.3.6.1.4.1.318.1.1.12.2.3.1.1.5'; + + $self->{results} = $self->{snmp}->get_multiple_table(oids => [ + { oid => $oid_rPDULoadStatusLoad }, + { oid => $oid_rPDULoadStatusLoadState }, + { oid => $oid_rPDULoadStatusPhaseNumber }, + { oid => $oid_rPDULoadStatusBankNumber }, + ], + , nothing_quit => 1); + + + $self->{output}->output_add(severity => 'OK', + short_msg => 'All phases are ok'); + + foreach my $oid (keys %{$self->{results}->{$oid_rPDULoadStatusLoad}}) { + $oid =~ /\.([0-9]+)$/; + my $instance = $1; + + my $status_load = $self->{results}->{$oid_rPDULoadStatusLoad}->{$oid} / 10; + my $status_load_state = $self->{results}->{$oid_rPDULoadStatusLoadState}->{$oid_rPDULoadStatusLoadState . '.' . $instance}; + my $status_phase_number = $self->{results}->{$oid_rPDULoadStatusPhaseNumber}->{$oid_rPDULoadStatusPhaseNumber . '.' . $instance}; + my $status_bank_number = $self->{results}->{$oid_rPDULoadStatusBankNumber}->{$oid_rPDULoadStatusBankNumber . '.' . $instance}; + + $self->{output}->output_add(long_msg => sprintf("Phase state on Bank %s is '%s' [Load : %dA]", + $status_bank_number, ${$states{$status_load_state}}[0], $status_load)); + $self->{output}->perfdata_add(label => 'bank' . $status_bank_number, + value => $status_load, + unit => 'A', + min => 0); + if (${$states{$status_load_state}}[1] ne 'OK') { + $self->{output}->output_add(severity => ${$states{$status_load_state}}[1], + short_msg => sprintf("Phase state on Bank %s is '%s'", + $status_bank_number, ${$states{$status_load_state}}[0],)); + } + } + + $self->{output}->display(); + $self->{output}->exit(); +} + +1; + +__END__ + +=head1 MODE + +Check APC phase load. + +=over 8 + +=back + +=cut + diff --git a/hardware/pdu/apc/mode/outlet.pm b/hardware/pdu/apc/mode/outlet.pm new file mode 100644 index 000000000..d8aeed21c --- /dev/null +++ b/hardware/pdu/apc/mode/outlet.pm @@ -0,0 +1,172 @@ +################################################################################ +# Copyright 2005-2013 MERETHIS +# Centreon is developped by : Julien Mathis and Romain Le Merlus under +# GPL Licence 2.0. +# +# This program is free software; you can redistribute it and/or modify it under +# the terms of the GNU General Public License as published by the Free Software +# Foundation ; either version 2 of the License. +# +# This program is distributed in the hope that it will be useful, but WITHOUT ANY +# WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A +# PARTICULAR PURPOSE. See the GNU General Public License for more details. +# +# You should have received a copy of the GNU General Public License along with +# this program; if not, see . +# +# Linking this program statically or dynamically with other modules is making a +# combined work based on this program. Thus, the terms and conditions of the GNU +# General Public License cover the whole combination. +# +# As a special exception, the copyright holders of this program give MERETHIS +# permission to link this program with independent modules to produce an executable, +# regardless of the license terms of these independent modules, and to copy and +# distribute the resulting executable under terms of MERETHIS choice, provided that +# MERETHIS also meet, for each linked independent module, the terms and conditions +# of the license of that module. An independent module is a module which is not +# derived from this program. If you modify this program, you may extend this +# exception to your version of the program, but you are not obliged to do so. If you +# do not wish to do so, delete this exception statement from your version. +# +# For more information : contact@centreon.com +# Authors : Quentin Garnier +# +#################################################################################### + +package hardware::pdu::apc::mode::outlet; + +use base qw(centreon::plugins::mode); + +use strict; +use warnings; + +my $oid_rPDUOutletStatusOutletName = '.1.3.6.1.4.1.318.1.1.12.3.5.1.1.2'; +my $oid_rPDUOutletStatusOutletPhase = '.1.3.6.1.4.1.318.1.1.12.3.5.1.1.3'; +my $oid_rPDUOutletStatusOutletState = '.1.3.6.1.4.1.318.1.1.12.3.5.1.1.4'; +my $oid_rPDUOutletStatusOutletBank = '.1.3.6.1.4.1.318.1.1.12.3.5.1.1.6'; +my $oid_rPDUOutletStatusLoad = '.1.3.6.1.4.1.318.1.1.12.3.5.1.1.7'; + +my %states = ( + 1 => ['outletStatusOn', 'OK'], + 2 => ['outletStatusOff', 'CRITICAL'], +); + +my %phases = ( + 1 => '1', + 2 => '2', + 3 => '3', + 4 => '1-2', + 5 => '2-3', + 6 => '1-3', +); + +sub new { + my ($class, %options) = @_; + my $self = $class->SUPER::new(package => __PACKAGE__, %options); + bless $self, $class; + + $self->{version} = '1.0'; + $options{options}->add_options(arguments => + { + "name:s" => { name => 'name', }, + "regexp" => { name => 'use_regexp', }, + }); + $self->{outlet_selected} = []; + return $self; +} + +sub check_options { + my ($self, %options) = @_; + $self->SUPER::init(%options); +} + +sub manage_selection { + my ($self, %options) = @_; + + $self->{result_names} = $self->{snmp}->get_table(oid => $oid_rPDUOutletStatusOutletName, nothing_quit => 1); + + foreach my $oid ($self->{snmp}->oid_lex_sort(keys %{$self->{result_names}})) { + next if ($oid !~ /\.([0-9]+)$/); + my $instance = $1; + # Get all without a name + if (!defined($self->{option_results}->{name})) { + push @{$self->{outlet_selected}}, $instance; + next; + } + $self->{result_names}->{$oid} = $self->{output}->to_utf8($self->{result_names}->{$oid}); + if (!defined($self->{option_results}->{use_regexp}) && $self->{result_names}->{$oid} eq $self->{option_results}->{name}) { + push @{$self->{outlet_selected}}, $instance; + } + if (defined($self->{option_results}->{use_regexp}) && $self->{result_names}->{$oid} =~ /$self->{option_results}->{name}/) { + push @{$self->{outlet_selected}}, $instance; + } + } + if (scalar(@{$self->{outlet_selected}}) <= 0) { + $self->{output}->add_option_msg(short_msg => "No outlet found for name '" . $self->{option_results}->{name} . "'."); + $self->{output}->option_exit(); + } +} + +sub run { + my ($self, %options) = @_; + # $options{snmp} = snmp object + $self->{snmp} = $options{snmp}; + + $self->manage_selection(); + $self->{snmp}->load(oids => [$oid_rPDUOutletStatusOutletPhase, + $oid_rPDUOutletStatusOutletState, + $oid_rPDUOutletStatusOutletBank, + $oid_rPDUOutletStatusLoad], + instances => $self->{outlet_selected}); + my $result = $self->{snmp}->get_leef(); + if (!defined($self->{option_results}->{name}) || defined($self->{option_results}->{use_regexp})) { + $self->{output}->output_add(severity => 'OK', + short_msg => 'All outlets are ok.'); + } + + foreach my $instance (@{$self->{outlet_selected}}) { + my $outlet_name = $self->{result_names}->{$oid_rPDUOutletStatusOutletName . '.' . $instance}; + my $outlet_phase = $result->{$oid_rPDUOutletStatusOutletPhase . '.' . $instance}; + my $outlet_state = $result->{$oid_rPDUOutletStatusOutletState . '.' . $instance}; + my $outlet_bank = $result->{$oid_rPDUOutletStatusOutletBank . '.' . $instance}; + my $outlet_load = $result->{$oid_rPDUOutletStatusLoad . '.' . $instance} / 10; + + $self->{output}->output_add(long_msg => sprintf("Outlet %s '%s' state is '%s' [Bank : %d , Phase : %d] [Load : %dA]", $instance, $outlet_name, + ${$states{$outlet_state}}[0], $outlet_bank, $phases{$outlet_phase}, $outlet_load)); + if (defined($self->{option_results}->{name}) && !defined($self->{option_results}->{use_regexp})) { + $self->{output}->output_add(severity => ${$states{$outlet_state}}[1], + short_msg => sprintf("Outlet %s '%s' state is '%s' [Bank : %d , Phase : %d]", $instance, $outlet_name, + ${$states{$outlet_state}}[0], $outlet_bank, $phases{$outlet_phase})); + } elsif (${$states{$outlet_state}}[1] ne 'OK') { + $self->{output}->output_add(severity => ${$states{$outlet_state}}[1], + short_msg => sprintf("Outlet %s '%s' state is '%s' [Bank : %d , Phase : %d]", $instance, $outlet_name, + ${$states{$outlet_state}}[0], $outlet_bank, $phases{$outlet_phase})); + } + } + + $self->{output}->display(); + $self->{output}->exit(); +} + +1; + +__END__ + +=head1 MODE + +Check APC outlets. + +=over 8 + +=item B<--name> + +Set the outlet name. + +=item B<--regexp> + +Allows to use regexp to filter outlet (with option --name). + +=back + +=cut + diff --git a/hardware/pdu/apc/mode/psu.pm b/hardware/pdu/apc/mode/psu.pm new file mode 100644 index 000000000..7f601907b --- /dev/null +++ b/hardware/pdu/apc/mode/psu.pm @@ -0,0 +1,132 @@ +################################################################################ +# Copyright 2005-2013 MERETHIS +# Centreon is developped by : Julien Mathis and Romain Le Merlus under +# GPL Licence 2.0. +# +# This program is free software; you can redistribute it and/or modify it under +# the terms of the GNU General Public License as published by the Free Software +# Foundation ; either version 2 of the License. +# +# This program is distributed in the hope that it will be useful, but WITHOUT ANY +# WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A +# PARTICULAR PURPOSE. See the GNU General Public License for more details. +# +# You should have received a copy of the GNU General Public License along with +# this program; if not, see . +# +# Linking this program statically or dynamically with other modules is making a +# combined work based on this program. Thus, the terms and conditions of the GNU +# General Public License cover the whole combination. +# +# As a special exception, the copyright holders of this program give MERETHIS +# permission to link this program with independent modules to produce an executable, +# regardless of the license terms of these independent modules, and to copy and +# distribute the resulting executable under terms of MERETHIS choice, provided that +# MERETHIS also meet, for each linked independent module, the terms and conditions +# of the license of that module. An independent module is a module which is not +# derived from this program. If you modify this program, you may extend this +# exception to your version of the program, but you are not obliged to do so. If you +# do not wish to do so, delete this exception statement from your version. +# +# For more information : contact@centreon.com +# Authors : Quentin Garnier +# +#################################################################################### + +package hardware::pdu::apc::mode::psu; + +use base qw(centreon::plugins::mode); + +use strict; +use warnings; + +my %states_psu_1 = ( + 1 => ['powerSupplyOneOk', 'OK'], + 2 => ['powerSupplyOneFailed', 'CRITICAL'], +); + +my %states_psu_2 = ( + 1 => ['powerSupplyTwoOk', 'OK'], + 2 => ['powerSupplyTwoFailed', 'CRITICAL'], +); + +my %alarms_psu = ( + 1 => ['allAvailablePowerSuppliesOK', 'OK'], + 2 => ['powerSupplyOneFailed', 'CRITICAL'], + 3 => ['powerSupplyTwoFailed', 'CRITICAL'], + 4 => ['powerSupplyOneandTwoFailed', 'CRITICAL'], +); + +sub new { + my ($class, %options) = @_; + my $self = $class->SUPER::new(package => __PACKAGE__, %options); + bless $self, $class; + + $self->{version} = '1.0'; + $options{options}->add_options(arguments => + { + }); + + return $self; +} + +sub check_options { + my ($self, %options) = @_; + $self->SUPER::init(%options); +} + +sub run { + my ($self, %options) = @_; + # $options{snmp} = snmp object + $self->{snmp} = $options{snmp}; + + my $oid_rPDUPowerSupply1Status = '.1.3.6.1.4.1.318.1.1.12.4.1.1.0'; + my $oid_rPDUPowerSupply2Status = '.1.3.6.1.4.1.318.1.1.12.4.1.2.0'; + my $oid_rPDUPowerSupplyAlarm = '.1.3.6.1.4.1.318.1.1.12.4.1.3.0'; + + my $result = $self->{snmp}->get_leef(oids => [$oid_rPDUPowerSupply1Status, $oid_rPDUPowerSupply2Status, $oid_rPDUPowerSupplyAlarm], nothing_quit => 1); + + $self->{output}->output_add(severity => 'OK', + short_msg => 'All power supplies are ok'); + + my $psu_alarm = $result->{$oid_rPDUPowerSupplyAlarm}; + my $psu1_status = $result->{$oid_rPDUPowerSupply2Status}; + my $psu2_status = $result->{$oid_rPDUPowerSupplyAlarm}; + + $self->{output}->output_add(long_msg => sprintf("Power supply 1 state is '%s'", ${$states_psu_1{$psu1_status}}[0])); + $self->{output}->output_add(long_msg => sprintf("Power supply 2 state is '%s'", ${$states_psu_2{$psu2_status}}[0])); + + if (${$alarms_psu{$psu_alarm}}[1] ne 'OK') { + $self->{output}->output_add(severity => ${$alarms_psu{$psu_alarm}}[1], + short_msg => sprintf("Power supplies state is '%s'", + ${$alarms_psu{$psu_alarm}}[0])); + } + if (${$states_psu_1{$psu1_status}}[1] ne 'OK') { + $self->{output}->output_add(severity => ${$states_psu_1{$psu1_status}}[1], + short_msg => sprintf("Power supply 1 state is '%s'", + ${$states_psu_1{$psu1_status}}[0])); + } + if (${$states_psu_2{$psu2_status}}[1] ne 'OK') { + $self->{output}->output_add(severity => ${$states_psu_2{$psu2_status}}[1], + short_msg => sprintf("Power supply 2 state is '%s'", + ${$states_psu_2{$psu2_status}}[0])); + } + + $self->{output}->display(); + $self->{output}->exit(); +} + +1; + +__END__ + +=head1 MODE + +Check APC power supplies. + +=over 8 + +=back + +=cut + diff --git a/hardware/pdu/apc/mode/temperature.pm b/hardware/pdu/apc/mode/temperature.pm new file mode 100644 index 000000000..e1d3fa3be --- /dev/null +++ b/hardware/pdu/apc/mode/temperature.pm @@ -0,0 +1,154 @@ +################################################################################ +# Copyright 2005-2013 MERETHIS +# Centreon is developped by : Julien Mathis and Romain Le Merlus under +# GPL Licence 2.0. +# +# This program is free software; you can redistribute it and/or modify it under +# the terms of the GNU General Public License as published by the Free Software +# Foundation ; either version 2 of the License. +# +# This program is distributed in the hope that it will be useful, but WITHOUT ANY +# WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A +# PARTICULAR PURPOSE. See the GNU General Public License for more details. +# +# You should have received a copy of the GNU General Public License along with +# this program; if not, see . +# +# Linking this program statically or dynamically with other modules is making a +# combined work based on this program. Thus, the terms and conditions of the GNU +# General Public License cover the whole combination. +# +# As a special exception, the copyright holders of this program give MERETHIS +# permission to link this program with independent modules to produce an executable, +# regardless of the license terms of these independent modules, and to copy and +# distribute the resulting executable under terms of MERETHIS choice, provided that +# MERETHIS also meet, for each linked independent module, the terms and conditions +# of the license of that module. An independent module is a module which is not +# derived from this program. If you modify this program, you may extend this +# exception to your version of the program, but you are not obliged to do so. If you +# do not wish to do so, delete this exception statement from your version. +# +# For more information : contact@centreon.com +# Authors : Quentin Garnier +# +#################################################################################### + +package hardware::pdu::apc::mode::temperature; + +use base qw(centreon::plugins::mode); + +use strict; +use warnings; + +my %states = ( + 1 => ['notPresent', 'OK'], + 2 => ['belowMin', 'CRITICAL'], + 3 => ['belowLow', 'WARNING'], + 4 => ['normal', 'OK'], + 5 => ['aboveHigh', 'WARNING'], + 6 => ['aboveMax', 'CRITICAL'], +); + +my %type = ( + 1 => 'temperatureOnly', + 2 => 'temperatureHumidity' +); + +sub new { + my ($class, %options) = @_; + my $self = $class->SUPER::new(package => __PACKAGE__, %options); + bless $self, $class; + + $self->{version} = '1.0'; + $options{options}->add_options(arguments => + { + "warning:s" => { name => 'warning', }, + "critical:s" => { name => 'critical', }, + }); + + return $self; +} + +sub check_options { + my ($self, %options) = @_; + $self->SUPER::init(%options); + + if (($self->{perfdata}->threshold_validate(label => 'warning', value => $self->{option_results}->{warning})) == 0) { + $self->{output}->add_option_msg(short_msg => "Wrong warning threshold '" . $self->{option_results}->{warning} . "'."); + $self->{output}->option_exit(); + } + if (($self->{perfdata}->threshold_validate(label => 'critical', value => $self->{option_results}->{critical})) == 0) { + $self->{output}->add_option_msg(short_msg => "Wrong critical threshold '" . $self->{option_results}->{critical} . "'."); + $self->{output}->option_exit(); + } +} + +sub run { + my ($self, %options) = @_; + # $options{snmp} = snmp object + $self->{snmp} = $options{snmp}; + + my $oid_rPDU2SensorTempHumidityStatusName = '.1.3.6.1.4.1.318.1.1.26.10.2.2.1.3'; + my $oid_rPDU2SensorTempHumidityStatusNumber = '.1.3.6.1.4.1.318.1.1.26.10.2.2.1.4'; + my $oid_rPDU2SensorTempHumidityStatusType = '.1.3.6.1.4.1.318.1.1.26.10.2.2.1.5'; + my $oid_rPDU2SensorTempHumidityStatusTempC = '.1.3.6.1.4.1.318.1.1.26.10.2.2.1.8'; + my $oid_rPDU2SensorTempHumidityStatusTempStatus = '.1.3.6.1.4.1.318.1.1.26.10.2.2.1.9'; + + $self->{results} = $self->{snmp}->get_multiple_table(oids => [ + { oid => $oid_rPDU2SensorTempHumidityStatusName }, + { oid => $oid_rPDU2SensorTempHumidityStatusNumber }, + { oid => $oid_rPDU2SensorTempHumidityStatusTempC }, + { oid => $oid_rPDU2SensorTempHumidityStatusTempStatus }, + ], + , nothing_quit => 1); + + + $self->{output}->output_add(severity => 'OK', + short_msg => 'All temperature sensors are ok'); + + foreach my $oid (keys %{$self->{results}->{ $oid_rPDU2SensorTempHumidityStatusName}}) { + $oid =~ /\.([0-9]+)$/; + my $instance = $1; + + my $sensor_name = $self->{results}->{ $oid_rPDU2SensorTempHumidityStatusName}->{$oid}; + my $sensor_number = $self->{results}->{$oid_rPDU2SensorTempHumidityStatusNumber}->{$oid_rPDU2SensorTempHumidityStatusNumber . '.' . $instance}; + my $sensor_temperature = $self->{results}->{$oid_rPDU2SensorTempHumidityStatusTempC}->{$oid_rPDU2SensorTempHumidityStatusTempC . '.' . $instance} / 10; + my $sensor_status = $self->{results}->{$oid_rPDU2SensorTempHumidityStatusTempStatus}->{$oid_rPDU2SensorTempHumidityStatusTempStatus . '.' . $instance}; + + $self->{output}->output_add(long_msg => sprintf("Temperature sensor #%d '%s' is '%.1fC'", + $sensor_number, $sensor_name, $sensor_temperature)); + $self->{output}->perfdata_add(label => 'temp' . $sensor_number, + unit => 'C', + value => $sensor_temperature, + warning => $self->{perfdata}->get_perfdata_for_output(label => 'warning'), + critical => $self->{perfdata}->get_perfdata_for_output(label => 'critical'), + min => 0); + + my $exit = $self->{perfdata}->threshold_check(value => $sensor_temperature, + 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("Temperature sensor #%d '%s' is '%.1fC'", + $sensor_number, $sensor_name, $sensor_temperature)); + } + } + + $self->{output}->display(); + $self->{output}->exit(); +} + +1; + +__END__ + +=head1 MODE + +Check APC temperature sensors. + +=over 8 + +=back + +=cut + diff --git a/hardware/pdu/apc/plugin.pm b/hardware/pdu/apc/plugin.pm new file mode 100644 index 000000000..520e45cb2 --- /dev/null +++ b/hardware/pdu/apc/plugin.pm @@ -0,0 +1,68 @@ +################################################################################ +# Copyright 2005-2014 MERETHIS +# Centreon is developped by : Julien Mathis and Romain Le Merlus under +# GPL Licence 2.0. +# +# This program is free software; you can redistribute it and/or modify it under +# the terms of the GNU General Public License as published by the Free Software +# Foundation ; either version 2 of the License. +# +# This program is distributed in the hope that it will be useful, but WITHOUT ANY +# WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A +# PARTICULAR PURPOSE. See the GNU General Public License for more details. +# +# You should have received a copy of the GNU General Public License along with +# this program; if not, see . +# +# Linking this program statically or dynamically with other modules is making a +# combined work based on this program. Thus, the terms and conditions of the GNU +# General Public License cover the whole combination. +# +# As a special exception, the copyright holders of this program give MERETHIS +# permission to link this program with independent modules to produce an executable, +# regardless of the license terms of these independent modules, and to copy and +# distribute the resulting executable under terms of MERETHIS choice, provided that +# MERETHIS also meet, for each linked independent module, the terms and conditions +# of the license of that module. An independent module is a module which is not +# derived from this program. If you modify this program, you may extend this +# exception to your version of the program, but you are not obliged to do so. If you +# do not wish to do so, delete this exception statement from your version. +# +# For more information : contact@centreon.com +# Authors : Stéphane Duret +# +#################################################################################### + +package hardware::pdu::apc::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; + # $options->{options} = options object + + $self->{version} = '0.1'; + %{$self->{modes}} = ( + 'load' => 'hardware::pdu::apc::mode::load', + 'psu' => 'hardware::pdu::apc::mode::psu', + 'outlet' => 'hardware::pdu::apc::mode::outlet', + 'temperature' => 'hardware::pdu::apc::mode::temperature', + 'humidity' => 'hardware::pdu::apc::mode::humidity', + ); + + return $self; +} + +1; + +__END__ + +=head1 PLUGIN DESCRIPTION + +Check APC PDU in SNMP (PowerNet-MIB). + +=cut