| Rev 6 |
|
Rev 8 |
| Line 44... |
|
Line 44... |
"NetGear" => [[1,2,3,4,5,6,7,8,9,10,11,12], |
|
"NetGear" => [[1,2,3,4,5,6,7,8,9,10,11,12], |
], |
|
], |
"SignaMax_065-7851"=> [[1,3,5,7,9,11,13,15,17,19,21,23], |
|
"SignaMax_065-7851"=> [[1,3,5,7,9,11,13,15,17,19,21,23], |
[2,4,6,8,10,12,14,16,18,20,22,24], |
|
[2,4,6,8,10,12,14,16,18,20,22,24], |
], |
|
], |
"AL11FIDU" => [[14,15,0,0], |
|
"HuaS5624P" => [[4227625,4227641,4227657,4227673,4227689,4227705,4227721,4227737,4227753,4227769,4227785,4227801,0,0,0,0], |
| |
|
[4227633,4227649,4227665,4227681,4227697,4227713,4227729,4227745,4227761,4227777,4227793,4227809,4227817,4227825,4227833,4227841], |
| |
|
], |
| |
|
"C4900MNFX1" => [[63,64,65,66,67,68,69,70,71,72,73,74,75,76,77,78,79,80,81,82,54,90,121,0], |
| |
|
[132,133,134,135,136,137,138,139,140,141,142,143,144,145,146,147,55,56,57,58,59,60,61,62], |
| |
|
], |
| |
|
"C4900MNFX2" => [[60,61,62,63,64,65,66,67,68,69,70,71,72,73,74,75,76,77,78,79,51,87,123,0], |
| |
|
[133,134,135,136,137,138,139,140,141,142,143,144,145,146,147,148,52,53,54,55,56,57,58,59], |
| |
|
], |
| |
|
"AL11FIDU" => [[14,15,0,0], |
[6,7,10,11], |
|
[6,7,10,11], |
], |
|
], |
); |
|
); |
|
|
|
my @ports = (); |
|
my @ports = (); |
| Line 210... |
|
Line 219... |
my $macip = ""; |
|
my $macip = ""; |
my @row = (); |
|
my @row = (); |
|
|
|
print "<b>$desc</b> $myip"; |
|
print "<b>$desc</b> $myip"; |
|
|
|
my $speedall = `$snmpwalk -Os -c $com -v 1 $myip .1.3.6.1.2.1.2.2.1.5`; |
|
my $speedall = `$snmpwalk -Os -c $com -v 2c $myip .1.3.6.1.2.1.2.2.1.5`; |
my $adminstatusall = `$snmpwalk -Os -c $com -v 1 $myip .1.3.6.1.2.1.2.2.1.7`; |
|
my $adminstatusall = `$snmpwalk -Os -c $com -v 2c $myip .1.3.6.1.2.1.2.2.1.7`; |
my $operstatusall = `$snmpwalk -Os -c $com -v 1 $myip .1.3.6.1.2.1.2.2.1.8`; |
|
my $operstatusall = `$snmpwalk -Os -c $com -v 2c $myip .1.3.6.1.2.1.2.2.1.8`; |
my $mactable = `$snmpwalk -Os -c $com -v 1 $myip .1.3.6.1.2.1.17.4.3.1.1`; |
|
my $mactable = `$snmpwalk -Os -c $com -v 2c $myip atPhysAddress`; |
my $mactableport = `$snmpwalk -Os -c $com -v 1 $myip .1.3.6.1.2.1.17.4.3.1.2`; |
|
my $mactableport = `$snmpwalk -Os -c $com -v 2c $myip ipNetToMediaIfIndex`; |
my $dhcpdconf = `wget -t 1 -T 1 http://$dhcp/cgi-bin/dhcp.cgi -q -O -`; |
|
my $dhcpdconf = `wget -t 1 -T 1 http://$dhcp/cgi-bin/dhcp.cgi -q -O -`; |
# $arpn = `wget -t 1 -T 1 http://$dhcp/cgi-bin/arpn.cgi -q -O -`; |
|
# $arpn = `wget -t 1 -T 1 http://$dhcp/cgi-bin/arpn.cgi -q -O -`; |
|
|
|
foreach (split("\n",$operstatusall)) { |
|
foreach (split("\n",$operstatusall)) { |
s/^ifOperStatus\.([0-9]+) = INTEGER: (.*)$/$1 $2/; |
|
s/^ifOperStatus\.([0-9]+) = INTEGER: (.*)$/$1 $2/; |
