The London Perl and Raku Workshop takes place on 26th Oct 2024. If your company depends on Perl, please consider sponsoring and/or attending.

NAME

SNMP::Info::Layer3::AlteonAD - SNMP Interface to Radware Alteon ADC Switches.

AUTHOR

Eric Miller

SYNOPSIS

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

DESCRIPTION

Abstraction subclass for Radware Alteon Series ADC 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(...);

Inherited Classes

SNMP::Info::Layer3

Required MIBs

ALTEON-ROOT-MIB
ALTEON-TIGON-SWITCH-MIB
ALTEON-TS-PHYSICAL-MIB
ALTEON-TS-NETWORK-MIB
ALTEON-CS-PHYSICAL-MIB
ALTEON-CHEETAH-SWITCH-MIB
ALTEON-CHEETAH-NETWORK-MIB
Inherited Classes' MIBs

See "Required MIBs" in SNMP::Info::Layer3 for its own MIB requirements.

GLOBALS

These are methods that return scalar value from SNMP

$alteon->model()

Returns model type. Checks $alteon->id() against the ALTEON-ROOT-MIB and then parses out aceswitch, aws, and ods replaces acedirector with AD, and replaces copperModule/fiberModule with BladeCenter GbESM.

$alteon->vendor()

Returns 'radware'

$alteon->os()

Returns 'alteon'

$alteon->os_ver()

Returns the software version reported by agSoftwareVersion

$alteon->tftp_action()

(agTftpAction)

$alteon->tftp_host()

(agTftpServer)

$alteon->tftp_file()

(agTftpCfgFileName)

$alteon->tftp_result()

(agTftpLastActionStatus)

$alteon->fan()

(hwFanStatus)

$alteon->ps1_status()

Returns status of primary power supply

$alteon->ps2_status()

Returns status of redundant power supply

Globals imported from SNMP::Info::Layer3

See documentation in "GLOBALS" in SNMP::Info::Layer3 for details.

TABLE METHODS

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

Overrides

$alteon->interfaces()

Returns reference to the map between IID and physical port.

Utilizes description for network interfaces. Ports are determined by formula (ifIndex mod 256).

$alteon->i_duplex()

Returns reference to hash. Maps port operational duplexes to IIDs.

$alteon->i_duplex_admin()

Returns reference to hash. Maps port admin duplexes to IIDs.

$alteon->i_vlan()

Returns a mapping between ifIndex and the PVID or default VLAN.

$alteon->i_vlan_membership()

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";
}
$alteon->i_vlan_membership_untagged()

Returns reference to hash of arrays: key = ifIndex, value = array of VLAN IDs. These are the VLANs which are members of the untagged egress list for the port.

$alteon->v_index()

Returns VLAN IDs

$alteon->v_name()

Human-entered name for vlans.

$alteon->i_name()

Maps (agPortCurCfgPortName) to port and returns the human set port name if exists.

$alteon->bp_index()

Returns a mapping between ifIndex and the Bridge Table.

Table Methods imported from SNMP::Info::Layer3

See documentation in "TABLE METHODS" in SNMP::Info::Layer3 for details.