SNMP::Info::Layer3::AlteonAD - SNMP Interface to Nortel Alteon Layer 2-7 Switches.
Eric Miller
# Let SNMP::Info determine the correct subclass for you. my $alteon = new SNMP::Info( AutoSpecify => 1, Debug => 1, DestHost => 'myswitch', Community => 'public', Version => 2 ) or die "Can't connect to DestHost.\n"; my $class = $alteon->class(); print "SNMP::Info determined this device to fall under subclass : $class\n";
Abstraction subclass for Nortel Alteon Series Layer 2-7 load balancing switches and Nortel BladeCenter Layer2-3 GbE Switch Modules.
For speed or debugging purposes you can call the subclass directly, but not after determining a more specific class using the method above.
my $alteon = new SNMP::Info::Layer3::AlteonAD(...);
See "Required MIBs" in SNMP::Info::Layer3 for its own MIB requirements.
These are methods that return scalar value from SNMP
Returns model type. Checks $alteon->id() against the ALTEON-ROOT-MIB and then parses out aceswitch, replaces acedirector with AD, and replaces copperModule/fiberModule with BladeCenter GbESM.
aceswitch
acedirector
Returns 'nortel'
Returns 'alteon'
Returns the software version reported by agSoftwareVersion
agSoftwareVersion
(agTftpAction)
agTftpAction
(agTftpServer)
agTftpServer
(agTftpCfgFileName)
agTftpCfgFileName
(agTftpLastActionStatus)
agTftpLastActionStatus
See documentation in "GLOBALS" in SNMP::Info::Layer3 for details.
These are methods that return tables of information in the form of a reference to a hash.
Returns reference to the map between IID and physical port.
Utilizes description for network interfaces. Ports are determined by formula (ifIndex mod 256).
ifIndex mod 256
Returns reference to hash. Maps port operational duplexes to IIDs.
Returns reference to hash. Maps port admin duplexes to IIDs.
Returns a mapping between ifIndex and the PVID or default VLAN.
ifIndex
Returns reference to hash of arrays: key = ifIndex, value = array of VLAN IDs. These are the VLANs which are members of the egress list for the port.
Example: my $interfaces = $alteon->interfaces(); my $vlans = $alteon->i_vlan_membership(); foreach my $iid (sort keys %$interfaces) { my $port = $interfaces->{$iid}; my $vlan = join(',', sort(@{$vlans->{$iid}})); print "Port: $port VLAN: $vlan\n"; }
Returns VLAN IDs
Human-entered name for vlans.
Maps (agPortCurCfgPortName) to port and returns the human set port name if exists.
agPortCurCfgPortName
Returns a mapping between ifIndex and the Bridge Table.
See documentation in "TABLE METHODS" in SNMP::Info::Layer3 for details.
To install SNMP::Info, copy and paste the appropriate command in to your terminal.
cpanm
cpanm SNMP::Info
CPAN shell
perl -MCPAN -e shell install SNMP::Info
For more information on module installation, please visit the detailed CPAN module installation guide.