SNMP::Info::Layer3::Tasman(3pm)

NAME

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

AUTHOR

Eric Miller

SYNOPSIS

 # 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";

DESCRIPTION

Subclass for Avaya Secure Routers

GLOBALS

These are methods that return scalar values from SNMP

$tasman->vendor()

Returns 'avaya'

$tasman->model()

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.

$tasman->os()

Returns 'tasman'

$tasman->os_ver()

Grabs the os version from "nnsysVersion"

$tasman->ps1_type()

("nnenvPwrsupType.1")

$tasman->ps1_status()

("nnenvPwrsupStatus.1")

$tasman->ps2_type()

("nnenvPwrsupType.2")

$tasman->ps2_status()

("nnenvPwrsupStatus.2")

$tasman->nn_sys_ver()

("nnsysVersion.0")

$tasman->nn_ch_model()

("nnchassisModel.0")

$tasman->nn_ch_op_stat()

("nnchassisOperStatus.0")

$tasman->nn_ch_serial()

("nnchassisSerialNumber.0")

$tasman->serial()

Tries both ("nnchassisOperStatus") and ("nnchassisSerialNumber") as oid was redefined between versions.

TABLE METHODS

These are methods that return tables of information in the form of a reference to a hash.

$tasman->i_duplex_admin()

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").

$tasman->i_speed_admin()

Returns reference to hash of iid to administrative speed setting.

"portAdminSpeed"