
SNMP::Info::Layer3::Tasman - SNMP Interface to Avaya Secure Routers

Eric Miller

# Let SNMP::Info determine the correct subclass for you.
my $tasman = new SNMP::Info(
AutoSpecify => 1,
Debug => 1,
# These arguments are passed directly to SNMP::Session
DestHost => 'myswitch',
Community => 'public',
Version => 2
)
or die "Can't connect to DestHost.\n";
my $class = $tasman->class();
print "SNMP::Info determined this device to fall under subclass : $class\n";

Subclass for Avaya Secure Routers
See "Required MIBs" in SNMP::Info::Layer3 for its own MIB requirements.
See "Required MIBs" in SNMP::Info::MAU for its own MIB requirements.

These are methods that return scalar values from SNMP
Returns 'avaya'
Tries to get the model from nnchassisModel and if not available cross references $tasman->id() to NT-ENTERPRISE-DATA-MIB.
Substitutes 'SR' for 'ntSecureRouter' in the name for readability.
Returns 'tasman'
Grabs the os version from nnsysVersion
(nnenvPwrsupType.1)
(nnenvPwrsupStatus.1)
(nnenvPwrsupType.2)
(nnenvPwrsupStatus.2)
(nnsysVersion.0)
(nnchassisModel.0)
(nnchassisOperStatus.0)
(nnchassisSerialNumber.0)
Tries both (nnchassisOperStatus) and (nnchassisSerialNumber) as oid was redefined between versions.
See documentation in "GLOBALS" in SNMP::Info::Layer3 for details.
See documentation in "GLOBALS" in SNMP::Info::MAU for details.

These are methods that return tables of information in the form of a reference to a hash.
Returns reference to hash of iid to administrative duplex setting.
First checks for fixed gigabit ports which are always full duplex. Next checks the port administrative speed (portAdminSpeed) which if set to autonegotiate then the duplex will also autonegotiate, otherwise it uses the reported port duplex (portDuplex).
Returns reference to hash of iid to administrative speed setting.
portAdminSpeed
See documentation in "TABLE METHODS" in SNMP::Info::Layer3 for details.
See documentation in "TABLE METHODS" in SNMP::Info::MAU for details.