The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

SNMP::Info::Layer1::Allied - SNMP Interface to old Allied Hubs

DESCRIPTION

Provides abstraction to the configuration information obtainable from a Allied device through SNMP. See inherited classes' documentation for inherited methods.

Inherits from:

 SNMP::Info::Layer1

Required MIBs:

 ATI-MIB - Download for your device from http://www.allied-telesyn.com/allied/support/

 MIBs listed in SNMP::Info::Layer1

AUTHOR

Max Baker (max@warped.org)

SYNOPSIS

 my $allied = new SNMP::Info::Layer1::Allied(DestHost  => 'mycat1900' , 
                              Community => 'public' ); 

CREATING AN OBJECT

new SNMP::Info::Layer1::Allied()

Arguments passed to new() are passed on to SNMP::Session::new()

    my $allied = new SNMP::Info::Layer1::Allied(
        DestHost => $host,
        Community => 'public',
        Version => 3,...
        ) 
    die "Couldn't connect.\n" unless defined $allied;
$allied->session()

Sets or returns the SNMP::Session object

    # Get
    my $sess = $allied->session();

    # Set
    my $newsession = new SNMP::Session(...);
    $allied->session($newsession);

GLOBALS

$allied->vendor()

Returns 'allied' :)

$allied->root_ip()

Returns IP Address of Managed Hub.

(actualIpAddr)

$allied->model()

Trys to cull out AT-nnnnX out of the description field.

TABLE ENTRIES

Overrides

$allied->i_name()

Returns reference to map of IIDs to human-set port name.

$allied->i_up()

Returns reference to map of IIDs to link status. Changes the values of ati_up() to 'up' and 'down'.

Allied MIB

$allied->ati_p_name()

(portName)

$allied->ati_up()

(linkTestLED)