version 1.43, 2010/04/27 19:43:40 |
version 1.45, 2010/04/27 20:09:11 |
|
|
#!/usr/bin/perl -T |
#!/usr/bin/perl -T |
# $RedRiver: check_hw_sensors,v 1.41 2009/11/12 18:53:52 andrew Exp $ |
# $AFresh1: check_hw_sensors,v 1.41 2009/11/12 18:53:52 andrew Exp $ |
######################################################################## |
######################################################################## |
# check_hw_sensors *** A nagios check for OpenBSD sysctl hw.sensors |
# check_hw_sensors *** A nagios check for OpenBSD sysctl hw.sensors |
# |
# |
|
|
my $type = $sensor->{'type'}; |
my $type = $sensor->{'type'}; |
if (first { $type eq $_ } |
if (first { $type eq $_ } |
qw( |
qw( |
fan fanrpm |
temp |
volt volts_dc |
fan fanrpm |
amps watthour amphour |
volt acvolt volts_dc |
integer raw percent |
resistance |
lux temp timedelta |
power watt current amps |
humidity frequency angle |
watthour amphour |
|
raw |
|
integer percent |
|
illuminance lux |
|
timedelta |
|
humidity frequency angle |
) |
) |
) |
) |
{ |
{ |