Cheshire Cat Software

$head_lines .= <<ECHO
#.....................................................................
# Radio information
#

ECHO
;
my ($hostoid) = snmpget($router_connect,'sysObjectID');
if ($hostoid eq "1.3.6.1.4.1.841.201") {

my $target_name = $router_name ."rssi";

$target_lines .= <<RSSI
Target[$target_name]: statRSL.0&statRSL.0:$router_connect
MaxBytes[$target_name]: 1
routers.cgi*ShortDesc[$target_name]: RSSI
routers.cgi*Options[$target_name]: nototal
bb*host[$target_name]: $router_name
bb*svc[$target_name]: rssi
bb*red[$target_name]: -80:-40
bb*yellow[$target_name]: -70:-50
Options[$target_name]: gauge, unknaszero, noi, nopercent
Directory[$target_name]: $directory_name
WithPeak[$target_name]: wmy
YLegend[$target_name]: dB
ShortLegend[$target_name]: dB
Legend1[$target_name]: RSSI
Legend2[$target_name]: RSSI
LegendI[$target_name]: dB:
LegendO[$target_name]: dB:
Title[$target_name]: $sysname
PageTop[$target_name]: <H1>$sysname Signal Strength</H1>
<TABLE>
<TR><TD>System:</TD><TD>$sysname </TD></TR>
<TR><TD>Location:</TD><TD>$syslocation </TD></TR>
</TABLE>
RSSI
;
my $target_name = $router_name ."txpwr";

$target_lines .= <<TXPWR
Target[$target_name]: statTxPower.0&statTxPower.0:$router_connect
MaxBytes[$target_name]: 60
routers.cgi*ShortDesc[$target_name]: TxPwr
routers.cgi*Options[$target_name]: nototal
bb*host[$target_name]: $router_name
bb*svc[$target_name]: rssi
bb*red[$target_name]: 20:60
bb*yellow[$target_name]: 30:50
Options[$target_name]: gauge, unknaszero, noi, nopercent
Directory[$target_name]: $directory_name
WithPeak[$target_name]: wmy
YLegend[$target_name]: dB
ShortLegend[$target_name]: dB
Legend1[$target_name]: TxPwr
Legend2[$target_name]: TxPwr
LegendI[$target_name]: dB:
LegendO[$target_name]: dB:
Title[$target_name]: $sysname
PageTop[$target_name]: <H1>$sysname Signal Strength</H1>
<TABLE>
<TR><TD>System:</TD><TD>$sysname </TD></TR>
<TR><TD>Location:</TD><TD>$syslocation </TD></TR>
</TABLE>
TXPWR
;
}
elsif ($hostoid eq "1.3.6.1.4.1.11898.2.4.9") {
snmpMIB_to_OID("/usr/share/snmp/mibs/orinoco.mib");
my $target_name = $router_name ."rssi";

$target_lines .= <<RSSI
Target[$target_name]: oriWORPIfStatTableAverageLocalSignal.3&oriWORPIfStatTableAverageRemoteSignal.3:$router_connect
MaxBytes[$target_name]: 1
routers.cgi*ShortDesc[$target_name]: RSSI
routers.cgi*Options[$target_name]: nototal
bb*host[$target_name]: $router_name
bb*svc[$target_name]: rssi
bb*red[$target_name]: -80:-40
bb*yellow[$target_name]: -70:-50
Options[$target_name]: gauge, unknaszero, noi, nopercent
Directory[$target_name]: $directory_name
WithPeak[$target_name]: wmy
YLegend[$target_name]: dB
ShortLegend[$target_name]: dB
Legend1[$target_name]: RSSI
Legend2[$target_name]: RSSI
LegendI[$target_name]: dB:
LegendO[$target_name]: dB:
Title[$target_name]: $sysname
PageTop[$target_name]: <H1>$sysname Signal Strength</H1>
<TABLE>
<TR><TD>System:</TD><TD>$sysname </TD></TR>
<TR><TD>Location:</TD><TD>$syslocation </TD></TR>
</TABLE>
RSSI
;
}
else {
snmpMIB_to_OID("/usr/share/snmp/mibs/stratum100.mib");
my $target_name = $router_name ."idu";

$target_lines .= <<IDU
Target[$target_name]: iduTemperature.0&oduTemperature.0:$router_connect * 9 / 5 + 32
MaxBytes[$target_name]: 185
routers.cgi*ShortDesc[$target_name]: Temperature
routers.cgi*Options[$target_name]: nototal
bb*host[$target_name]: $router_name
bb*svc[$target_name]: temp
bb*red[$target_name]: 120
bb*yellow[$target_name]: 110
Options[$target_name]: gauge, unknaszero
Directory[$target_name]: $directory_name
WithPeak[$target_name]: wmy
YLegend[$target_name]: F
ShortLegend[$target_name]: F
Legend1[$target_name]: Indoor Unit Temp
Legend2[$target_name]: Outdoor Unit Temp
LegendI[$target_name]: F :
LegendO[$target_name]: F :
Title[$target_name]: $sysname
PageTop[$target_name]: <H1>$sysname Unit Temperature</H1>
<TABLE>
<TR><TD>System:</TD><TD>$sysname </TD></TR>
<TR><TD>Location:</TD><TD>$syslocation </TD></TR>
</TABLE>
IDU
;
my $target_name = $router_name ."rssi";

$target_lines .= <<RSSI
Target[$target_name]: rssi.0&rssi.0:$router_connect / 10
MaxBytes[$target_name]: 1
routers.cgi*ShortDesc[$target_name]: RSSI
routers.cgi*Options[$target_name]: nototal
bb*host[$target_name]: $router_name
bb*svc[$target_name]: rssi
bb*red[$target_name]: -80:-40
bb*yellow[$target_name]: -70:-50
Options[$target_name]: gauge, unknaszero, noi, nopercent
Directory[$target_name]: $directory_name
WithPeak[$target_name]: wmy
YLegend[$target_name]: dB
ShortLegend[$target_name]: dB
Legend1[$target_name]: RSSI
Legend2[$target_name]: RSSI
LegendI[$target_name]: dB:
LegendO[$target_name]: dB:
Title[$target_name]: $sysname
PageTop[$target_name]: <H1>$sysname Signal Strength</H1>
<TABLE>
<TR><TD>System:</TD><TD>$sysname </TD></TR>
<TR><TD>Location:</TD><TD>$syslocation </TD></TR>
</TABLE>
RSSI
;
}