| version 1.42, 2009/11/24 17:54:54 |
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 |
| # |
# |
|
|
| regex => qr/\sraw$/xms, |
regex => qr/\sraw$/xms, |
| }, |
}, |
| { type => 'percent', |
{ type => 'percent', |
| regex => qr/\s\%$/xms, |
regex => qr/\d\%$/xms, |
| }, |
}, |
| { type => 'lux', |
{ type => 'lux', |
| regex => qr/\slx$/xms, |
regex => qr/\slx$/xms, |
|
|
| { type => 'timedelta', |
{ type => 'timedelta', |
| regex => qr/\ssecs$/xms, |
regex => qr/\ssecs$/xms, |
| }, |
}, |
| |
# These below are newer than TYPE_MAP is ever used, so really, useless |
| |
{ type => 'humidity', |
| |
regex => qr/\d\%$/xms, |
| |
}, |
| |
{ type => 'frequency', |
| |
regex => qr/\s Hz$/xms, |
| |
}, |
| |
{ type => 'angle', |
| |
regex => qr/\s degrees$/xms, |
| |
}, |
| ); |
); |
| |
|
| my $CHECK_SENSOR = $BASE; |
my $CHECK_SENSOR = $BASE; |
|
|
| 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 |
| |
watthour amphour |
| |
raw |
| |
integer percent |
| |
illuminance lux |
| |
timedelta |
| |
humidity frequency angle |
| ) |
) |
| ) |
) |
| { |
{ |
![[BACK]](/icons/cvsweb/back.gif){kind=icon}
Return to check_hw_sensors CVS log ![[TXT]](/icons/cvsweb/text.gif){kind=icon}
![[DIR]](/icons/cvsweb/dir.gif){kind=icon}
Up to [local] / nagios / check_hw_sensors