diff options
author | Holger Weiss <holger@zedat.fu-berlin.de> | 2013-09-02 13:16:24 +0200 |
---|---|---|
committer | Holger Weiss <holger@zedat.fu-berlin.de> | 2013-09-02 13:16:24 +0200 |
commit | b15adb7762b6caaecaa83637abfcf5fdb4802092 (patch) | |
tree | 64eddbe2aa1a7f98a140be0f7973f05d7a781ae0 /contrib/check_wave.pl | |
parent | c4d5882b9e1d07c7b61091062b7d085fa5f00284 (diff) | |
download | monitoring-plugins-b15adb7762b6caaecaa83637abfcf5fdb4802092.tar.gz |
Remove "contrib" plugins
These days, sites such as "Nagios Exchange" are a much better place for
publishing plugins not maintained by the Plugins Development Team.
Diffstat (limited to 'contrib/check_wave.pl')
-rw-r--r-- | contrib/check_wave.pl | 77 |
1 files changed, 0 insertions, 77 deletions
diff --git a/contrib/check_wave.pl b/contrib/check_wave.pl deleted file mode 100644 index 56b59fe0..00000000 --- a/contrib/check_wave.pl +++ /dev/null @@ -1,77 +0,0 @@ -#!/usr/bin/perl - -# CHECK_WAVE.PL -# Plugin to test signal strength on Speedlan wireless equipment -# Contributed by Jeffry Blank - -$Host=$ARGV[0]; -$sig_crit=$ARGV[1]; -$sig_warn=$ARGV[2]; - - - - -$low1 = `snmpget $Host public .1.3.6.1.4.1.74.2.21.1.2.1.8.1`; -@test=split(/ /,$low1); -$low1=@test[2]; - - -$med1 = `snmpget $Host public .1.3.6.1.4.1.74.2.21.1.2.1.9.1`; -@test=split(/ /,$med1); -$med1=@test[2]; - - -$high1 = `snmpget $Host public .1.3.6.1.4.1.74.2.21.1.2.1.10.1`; -@test=split(/ /,$high1); -$high1=@test[2]; - -sleep(2); - - - -$snr = `snmpget $Host public .1.3.6.1.4.1.762.2.5.2.1.17.1`; -@test=split(/ /,$snr); -$snr=@test[2]; -$snr=int($snr*25); -$low2 = `snmpget $Host public .1.3.6.1.4.1.74.2.21.1.2.1.8.1`; -@test=split(/ /,$low2); -$low2=@test[2]; - - -$med2 = `snmpget $Host public .1.3.6.1.4.1.74.2.21.1.2.1.9.1`; -@test=split(/ /,$med2); -$med2=@test[2]; - - -$high2 = `snmpget $Host public .1.3.6.1.4.1.74.2.21.1.2.1.10.1`; -@test=split(/ /,$high2); -$high2=@test[2]; - - - -$low=$low2-$low1; -$med=$med2-$med1; -$high=$high2-$high1; - -$tot=$low+$med+$high; - - -if ($tot==0) - { - $ss=0; - } -else - { - $lowavg=$low/$tot; - $medavg=$med/$tot; - $highavg=$high/$tot; - $ss=($medavg*50)+($highavg*100); - } -printf("Signal Strength at: %3.0f%, SNR at $snr%",$ss); -#print "Signal Strength at: $ss%, SNR at $snr%"; -if ($ss<$sig_crit) - {exit(2)} -if ($ss<$sig_warn) - {exit(1)} - -exit(0); |