===================================================================
RCS file: /cvs/nagios/check_hw_sensors/check_hw_sensors,v
retrieving revision 1.19
retrieving revision 1.20
diff -u -r1.19 -r1.20
--- nagios/check_hw_sensors/check_hw_sensors	2006/12/04 23:33:53	1.19
+++ nagios/check_hw_sensors/check_hw_sensors	2006/12/05 00:17:47	1.20
@@ -1,5 +1,5 @@
 #!/usr/bin/perl -T
-# $RedRiver: check_hw_sensors,v 1.18 2006/12/02 02:15:17 andrew Exp $
+# $RedRiver: check_hw_sensors,v 1.19 2006/12/04 23:33:53 andrew Exp $
 ########################################################################
 # check_hw_sensors *** A nagios check for OpenBSD hw.sensors
 # 
@@ -16,8 +16,8 @@
 use constant NAGIOS_OUTPUT => 1;
 
 use POSIX;
+use Config;
 use lib "/usr/local/libexec/nagios";
-use lib '.';
 use utils qw($TIMEOUT %ERRORS &print_revision &support);
 
 use Getopt::Long;
@@ -29,6 +29,7 @@
 my $GETCAP = '/usr/bin/getcap';
 my $BASE   = 'hw.sensors';
 my $DEFAULT_CONFIG = '/etc/sensorsd.conf';
+my $OSVer = $Config{'osvers'} || 0;
 
 my $state = 'UNKNOWN'; # tells whether the it is warning, critical, or OK
 my %states; # This stores the count of states;
@@ -116,7 +117,7 @@
 }
 
 if ($opt_V) {
-	print_revision($PROGNAME,'$Revision: 1.19 $ ');
+	print_revision($PROGNAME,'$Revision: 1.20 $ ');
 	exit $ERRORS{'OK'};
 }
 
@@ -158,18 +159,20 @@
 
 	$source = $o[0];
 	$descr  = $o[1];
-	$type   = $o[-2] if @o >= 4;
-	$data   = $o[-1];
 
-	$status = $o[2] if ($type && @o == 5) || @o == 4;
-
-	unless ($type) {
+	if ($OSVer >= 4.0) {
+		$data   = $o[2];
+		$status = $o[3];
 		foreach my $t (@Type_Map) {
 			if ($data =~ /$t->{'regex'}/) {
 				$type = $t->{'type'};
 				last;
 			}
 		}
+	}  else {
+		$data   = $o[-1];
+		$status = $o[2] if @o == 5;
+		$type   = $o[-2];
 	}
 
 	$type ||= 'unknown';
@@ -309,25 +312,25 @@
 	return $result unless ref $sensor eq 'HASH';
 	$check = parse_check($sensor->{'type'}, $check) if $check;
 
-	unless ($check) {
-		if ($sensor->{'status'}) {
-			# It looks like doing this should be safe, from 
-			# src/sbin/sysctl/sysctl.c
-			$result = $sensor->{'status'} 
-		} else {
-			return undef;
-		}
-		return $result;
-	}
+	# It looks like doing this should be safe, from 
+	# src/sbin/sysctl/sysctl.c
+	return $sensor->{'status'} unless $check;
 
 	return undef if $check eq 'IGNORE';
 
 	$result = 'OK';
 	foreach my $code ('warn', 'crit') {
 		if (
-			$sensor->{'type'} eq 'volts_dc' ||
 			$sensor->{'type'} eq 'fanrpm'   ||
-			$sensor->{'type'} eq 'raw'
+			$sensor->{'type'} eq 'volts_dc' ||
+			$sensor->{'type'} eq 'amps'     ||
+			$sensor->{'type'} eq 'watthour' ||
+			$sensor->{'type'} eq 'amphour'  ||
+			$sensor->{'type'} eq 'integer'  ||
+			$sensor->{'type'} eq 'raw'      ||
+			$sensor->{'type'} eq 'percent'  ||
+			$sensor->{'type'} eq 'lux'      ||
+			$sensor->{'type'} eq 'timedelta'
 		) {
 			my $data = $sensor->{'data'};
 			$data =~ s/[^\d\.]//g;
@@ -479,6 +482,11 @@
 			}
 
 		} else {
+			print STDERR 'Unknown Sensor Type: ',
+			    $sensor->{'id'},
+			    '=',
+			    $sensor->{'type'},
+			    "\n";
 			$result = 'UNKNOWN';
 		}
 
@@ -516,17 +524,18 @@
 An ENTRY depends on the type.  The descriptions in sensorsd.conf(5)
 can be used when appropriate, or you can use the following:
 
-    volts_dc, fanrpm or raw - Anything that includes digits.
-    Both the value of the check and the value of the sensor
-    response that are not either a digit or period are stripped
-    and then the two resultant values are compared.
+    fanrpm, volts_dc, amps, watthour, amphour, integer (raw), percent,
+    lux or timedelta - Anything that includes digits.  Both the value of
+    the check and the value of the sensor response that are not either a
+    digit or period are stripped and then the two resultant values are
+    compared.
 
     temp - Can be as above, but if the entry has an F in it,
     it compares farenheit, otherwise it uses celcius.
 
     indicator or drive - does a case sensitive match of each
     entry in the comma separated list and if it does not match
-    any of the entries, it matches the status.
+    any of the entries, it sets the status.
 
 The entries 'crit' or 'warn' (or the -c or -w on the command line)
 may be a RANGE or a comma separated list of acceptable values.
@@ -547,6 +556,6 @@
 
 EOL
 
-        print_revision($PROGNAME, '$Revision: 1.19 $');
+        print_revision($PROGNAME, '$Revision: 1.20 $');
 }