From cb2b8d0beb17f64ed057aa3c3bc083305afcfd37 Mon Sep 17 00:00:00 2001
From: garnier-quentin <qgarnier@centreon.com>
Date: Mon, 20 Jul 2015 17:38:56 +0200
Subject: [PATCH] + Fix checkpoint hardware (Ref #87)

---
 network/checkpoint/mode/components/fan.pm         | 2 +-
 network/checkpoint/mode/components/temperature.pm | 2 +-
 network/checkpoint/mode/components/voltage.pm     | 2 +-
 3 files changed, 3 insertions(+), 3 deletions(-)

diff --git a/network/checkpoint/mode/components/fan.pm b/network/checkpoint/mode/components/fan.pm
index e6e09643a..7980fc6c6 100644
--- a/network/checkpoint/mode/components/fan.pm
+++ b/network/checkpoint/mode/components/fan.pm
@@ -70,7 +70,7 @@ sub check {
         my $result = $self->{snmp}->map_instance(mapping => $mapping, results => $self->{results}->{$oid_fanSpeedSensorEntry}, instance => $instance);
     
         next if ($self->check_exclude(section => 'fan', instance => $instance));
-        next if ($result->{fanSpeedSensorName} !~ /^[0-9a-zA-Z ]$/); # sometimes there is some wrong values in hex 
+        next if ($result->{fanSpeedSensorName} !~ /^[0-9a-zA-Z ]+$/); # sometimes there is some wrong values in hex 
 
         $self->{components}->{fan}->{total}++;
         $self->{output}->output_add(long_msg => sprintf("Fan '%s' sensor out of range status is '%s'",
diff --git a/network/checkpoint/mode/components/temperature.pm b/network/checkpoint/mode/components/temperature.pm
index 6efee51ff..ac1f143b0 100644
--- a/network/checkpoint/mode/components/temperature.pm
+++ b/network/checkpoint/mode/components/temperature.pm
@@ -70,7 +70,7 @@ sub check {
         my $result = $self->{snmp}->map_instance(mapping => $mapping, results => $self->{results}->{$oid_tempertureSensorEntry}, instance => $instance);
 
         next if ($self->check_exclude(section => 'temperature', instance => $instance));
-        next if ($result->{tempertureSensorName} !~ /^[0-9a-zA-Z ]$/); # sometimes there is some wrong values in hex 
+        next if ($result->{tempertureSensorName} !~ /^[0-9a-zA-Z ]+$/); # sometimes there is some wrong values in hex 
     	
         $self->{components}->{temperature}->{total}++;
         $self->{output}->output_add(long_msg => sprintf("Temperature '%s' sensor out of range status is '%s' [instance: %s]",
diff --git a/network/checkpoint/mode/components/voltage.pm b/network/checkpoint/mode/components/voltage.pm
index c1edd376f..ae4fd366d 100644
--- a/network/checkpoint/mode/components/voltage.pm
+++ b/network/checkpoint/mode/components/voltage.pm
@@ -70,7 +70,7 @@ sub check {
         my $result = $self->{snmp}->map_instance(mapping => $mapping, results => $self->{results}->{$oid_voltageSensorEntry}, instance => $instance);
     
         next if ($self->check_exclude(section => 'voltage', instance => $instance));
-        next if ($result->{voltageSensorName} !~ /^[0-9a-zA-Z ]$/); # sometimes there is some wrong values in hex 
+        next if ($result->{voltageSensorName} !~ /^[0-9a-zA-Z ]+$/); # sometimes there is some wrong values in hex 
      
         $self->{components}->{voltage}->{total}++;
         $self->{output}->output_add(long_msg => sprintf("Voltage '%s' sensor out of range status is '%s' [instance: %s]",