135/snmp-info
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

doc updates, fix namespace snmp_connect_ip()

Browse Source
This commit is contained in:
Eric Miller
2006-04-07 02:31:20 +00:00
parent f0e0b9063c
commit 8bed2081b9
1 changed files with 32 additions and 17 deletions
Download Patch File Download Diff File Expand all files Collapse all files

49
Info.pm
View File

@@ -34,8 +34,11 @@ SNMP::Info - Version 1.0
=head1 AUTHOR
SNMP::Info was created at UCSC for the netdisco project (www.netdisco.org)
and is written and maintained by Max Baker.
and was orginally written by Max Baker.
Currently being maintained by team of Open Source authors headed by Eric Miller
and Bill Fenner.
=head1 SYNOPSIS
use SNMP::Info;
@@ -72,16 +75,22 @@ and is written and maintained by Max Baker.
# Print out physical port name, not snmp iid
my $port = $interfaces->{$iid};
print "$port: ";
print "$duplex duplex" if defined $duplex;
# The CDP Table has table entries different than the interface tables.
# So we use c_if to get the map from cdp table to interface table.
my %c_map = reverse %$c_if;
my $c_key = $c_map{$iid};
unless (defined $c_key) {
print "\n\n";
next;
}
my $neighbor_ip = $c_ip->{$c_key};
my $neighbor_port = $c_port->{$c_key};
print "$port: $duplex duplex";
print " connected to $neighbor_ip / $neighbor_port\n" if defined $remote_ip;
print " connected to $neighbor_ip / $neighbor_port\n" if defined $neighbor_ip;
print "\n";
}
@@ -219,7 +228,7 @@ BRIDGE-MIB (RFC1286). QBRIDGE-MIB. Inherited by devices with Layer2 support.
=item SNMP::Info::CDP
CISCO-CDP-MIB. Cisco Discovery Protocol (CDP) Support. Inherited by devices serving Layer2 or Layer3.
CISCO-CDP-MIB. Cisco Discovery Protocol (CDP) Support. Inherited by Cisco and HP devices.
=item SNMP::Info::CiscoImage
@@ -341,9 +350,9 @@ Depreciated. Use BayStack.
=item SNMP::Info::Layer2::Baystack
Subclass for Nortel/Bay Baystack switches. This includes 303, 304, 350, 380,
410, 420, 425, 450, 460, 470, 5510, 5520, 5530, Business Policy Switch (BPS) and
probably others.
Subclass for Nortel/Bay Ethernet Switch/Baystack switches. This includes 303,
304, 350, 380, 410, 420, 425, 450, 460, 470, 5510, 5520, 5530, Business Policy
Switch (BPS) and probably others.
=item SNMP::Info::Layer2::C1900
@@ -414,8 +423,8 @@ Subclass for Nortel Alteon Ace Director series L2-7 switches.
=item SNMP::Info::Layer3::BayRS
Subclass for Nortel BayRS routers. This includes BCN, BLN, ASN, ARN,
and AN routers.
Subclass for Nortel Multiprotocol/BayRS routers. This includes BCN, BLN, ASN,
ARN, AN, 2430, and 5430 routers.
=item SNMP::Info::Layer3::C3550
@@ -436,7 +445,7 @@ This is a simple wrapper around Layer3 for IOS devices. It adds on CiscoVTP.
=item SNMP::Info::Layer3::Contivity
Subclass for Nortel Contivity VPN concentrators.
Subclass for Nortel Contivity/VPN Routers.
=item SNMP::Info::Layer3::Extreme
@@ -452,13 +461,18 @@ Requires FOUNDRY-SN-ROOT-MIB.
See SNMP::Info::Layer3::Foundry for more info.
=item SNMP::Info::Layer3::Passport
=item SNMP::Info::Layer3::Juniper
Subclass for Nortel Passport 8000 series and Accelar series switches.
Subclass for Juniper devices.
=item SNMP::Info::Layer3::N1600
Subclass for Nortel 1600 series switches.
Subclass for Nortel Ethernet Routing Switch 1600 series.
=item SNMP::Info::Layer3::Passport
Subclass for Nortel Ethernet Routing Switch/Passport 8000 series and Accelar
series switches.
=back
@@ -468,7 +482,7 @@ Subclass for Nortel 1600 series switches.
Thanks for testing and coding help (in no particular order) to :
Andy Ford, Brian Wilson, Jean-Philippe Luiggi, D<>na Watanabe, Bradley Baetz,
Eric Miller, and people listed on the Netdisco README!
Mike Hunter, Justin Hunter, Brian Chow and people listed on the Netdisco README!
=head1 USAGE
@@ -788,12 +802,13 @@ Algorithm for Subclass Detection:
Cisco Generic L3 IOS device -> SNMP::Info::Layer3::Cisco
Extreme -> SNMP::Info::Layer3::Extreme
Foundry -> SNMP::Info::Layer3::Foundry
Juniper -> SNMP::Info::Layer3::Juniper
Nortel Passport/Accelar LAN -> SNMP::Info::Layer3::Passport
Nortel/Bay Baystack -> SNMP::Info::Layer2::Baystack
Alteon Ace Director -> SNMP::Info::Layer3::AlteonAD
Nortel Contivity -> SNMP::Info::Layer3::Contivity
Nortel BayRS Router -> SNMP::Info::Layer3::BayRS
Elsif Layer2 (no Layer3) -> SNMP::Info::Layer2
Elsif Layer2 (no Layer3) -> SNMP::Info::Layer2
Aironet - IOS Devices -> SNMP::Info::Layer2::Aironet
Catalyst 1900 -> SNMP::Info::Layer2::C1900
Catalyst 2900XL,2950,3500XL -> SNMP::Info::Layer2::C2900
@@ -2580,13 +2595,13 @@ sub _show_attr {
return $store->{$attr};
}
=item _snmp_connect_ip()
=item $info->snmp_connect_ip()
Returns true or false based upon snmp connectivity to an IP.
=cut
sub _snmp_connect_ip {
sub snmp_connect_ip {
my $self = shift;
my $ip = shift;
my $ver = $self->snmp_ver();