Support retrieving sensors thresholds and fix sensors conf

This commit is contained in:
Daniel Berteaud 2013-04-16 10:53:06 +02:00
parent 105b0d2d82
commit 9980952270
2 changed files with 26 additions and 7 deletions

View File

@ -3,4 +3,4 @@
UserParameter=hardware.sensor.discovery,/var/lib/zabbix/bin/disco_sensors
# Sensors
UserParameter=hardware.sensor[*],/usr/bin/sudo /var/lib/zabbix/bin/check_sensors $1
UserParameter=hardware.sensor[*],/usr/bin/sudo /var/lib/zabbix/bin/check_sensors_sudo $1 $2

View File

@ -1,13 +1,10 @@
#!/usr/bin/perl -w
my $what = $ARGV[0];
my $thres = $ARGV[1];
unless (defined $what){
print <<"EOF";
Usage: $0 sensor_name
EOF
usage();
exit(1);
}
@ -19,7 +16,29 @@ my $ret = 'ZBX_NOTSUPPORTED';
foreach (<SENSORS>){
next unless (/^$what(\s+)?=(\s+)?(.*)!(\-?\d+)!(\-?\d+)$/);
my $cmd = $3;
$ret = `$cmd`;
my $high = $4;
my $low = $5;
if (!defined $thres){
$ret = `$cmd`;
}
elsif ($thres eq 'high'){
$ret = $high
}
elsif ($thres eq 'low'){
$ret = $low;
}
else {
usage();
exit(1);
}
}
print $ret;
exit(0);
sub usage {
print <<"EOF";
Usage: $0 sensor_name [high|low]
EOF
}