diff --git a/Info/Layer2/Aironet.pm b/Info/Layer2/Aironet.pm index 6be40a26..d7a3fb8b 100644 --- a/Info/Layer2/Aironet.pm +++ b/Info/Layer2/Aironet.pm @@ -445,7 +445,11 @@ Adds info from method e_descr() from SNMP::Info::Entity =item $aironet->vendor() - Returns 'cisco' :) +Returns 'cisco' + +=item $aironet->description() + +System description =back @@ -463,6 +467,26 @@ See documentation in L for details. =head1 TABLE METHODS +=over + +=item $aironet->cd11_port() + +Returns radio interfaces. + +=item $aironet->cd11_mac() + +Returns radio interface MAC addresses. + +=item $aironet->cd11_ssid() + +Returns radio interface ssid. + +=item $aironet->dot11_cur_tx_pwr_mw() + +Current transmit power, in milliwatts, of the radio interface. + +=back + =head2 Overrides =over @@ -471,11 +495,42 @@ See documentation in L for details. Uses the i_description() field. +=item $aironet->i_mac() + +MAC address of the interface. Note this is just the MAC of the port, not +anything connected to it. + =item $aironet->i_duplex() Crosses information from SNMP::Info::EtherLike to get duplex info for interfaces. +=item $aironet->bp_index() + +Returns reference to hash of bridge port table entries map back to interface +identifier (iid) + +=item $aironet->fw_mac() + +Returns reference to hash of forwarding table MAC Addresses + +=item $aironet->fw_port() + +Returns reference to hash of forwarding table entries port interface +identifier (iid) + +=item $aironet->i_vlan() + +Returns a mapping between C and the PVID or default VLAN. + +=item $aironet->v_index() + +Returns VLAN IDs + +=item $aironet->v_name() + +Returns VLAN names + =back =head2 Table Methods imported from SNMP::Info::Layer2 @@ -490,4 +545,14 @@ See documentation in L for details. See documentation in L for details. +=head1 Data Munging Callback Subroutines + +=over + +=item $aironet->munge_cd11_txrate() + +Converts units of half a megabit to human readable string. + +=back + =cut diff --git a/Info/Layer2/Allied.pm b/Info/Layer2/Allied.pm index 6faf333d..1985e8d1 100644 --- a/Info/Layer2/Allied.pm +++ b/Info/Layer2/Allied.pm @@ -214,6 +214,10 @@ Returns IP Address of Managed Device. Tries to cull out C out of the description field. +=item $allied->mac() + +Returns device MAC. + =back =head2 Globals imported from SNMP::Info::Layer2 diff --git a/Info/Layer2/Bay.pm b/Info/Layer2/Bay.pm index 9f31f853..841af94f 100644 --- a/Info/Layer2/Bay.pm +++ b/Info/Layer2/Bay.pm @@ -330,6 +330,18 @@ to return depending on which it is. Removes C from the model name +=item $baystack->os() + +Returns 'bay'. + +=item $bay->os_ver() + +Returns the os version extracted from C. + +=item $bay->os_bin() + +Returns the firmware version extracted from C. + =item $bay->cdp_id() Returns the IP that the device is sending out for its Nmm topology info. @@ -404,6 +416,14 @@ devices. Use the data from the Layer2 Topology Table below to dig deeper. +=item $bay->c_port() + +Returns reference to hash. Key: IID, Value: Remote port (interfaces) + +=item $bay->c_platform() + +Returns reference to hash. Key: IID, Value: Remote device type + =item $bay->port() Returns reference to hash. Key: port.1 Value: port diff --git a/Info/Layer2/C1900.pm b/Info/Layer2/C1900.pm index e8edd660..6fe3997e 100644 --- a/Info/Layer2/C1900.pm +++ b/Info/Layer2/C1900.pm @@ -359,6 +359,10 @@ Returns 'cisco' :) =over +=item $c1900->cisco_comm_indexing() + +Returns 1. Use vlan indexing. + =item $c1900->bulkwalk_no Return C<1>. Bulkwalk is turned off for this class. @@ -390,6 +394,10 @@ to a hash. =over +=item $c1900->interfaces() + +Returns reference to the map between IID and physical Port. + =item $c1900->i_duplex() Returns reference to map of IIDs to current link duplex diff --git a/Info/Layer2/Catalyst.pm b/Info/Layer2/Catalyst.pm index cb712637..481c6fad 100644 --- a/Info/Layer2/Catalyst.pm +++ b/Info/Layer2/Catalyst.pm @@ -289,6 +289,10 @@ it grabs $cat->m_swver()->{1} and uses that. Returns 'cisco' +=item $cat->cisco_comm_indexing() + +Returns 1. Use vlan indexing. + =back =head2 Global Methods imported from SNMP::Info::CiscoStack @@ -334,6 +338,10 @@ Returns reference to hash of iid to human set name. C +=item $cat->i_physical() + +Returns a map to IID for ports that are physical ports, not vlans, etc. + =item $cat->bp_index() Returns reference to hash of bridge port table entries map back to interface diff --git a/Info/Layer2/Foundry.pm b/Info/Layer2/Foundry.pm index 03a99d73..ff21047b 100644 --- a/Info/Layer2/Foundry.pm +++ b/Info/Layer2/Foundry.pm @@ -221,8 +221,24 @@ Max Baker This module is Deprecated. Please use Layer3::Foundry instead. + # Let SNMP::Info determine the correct subclass for you. + my $foundry = new SNMP::Info( + AutoSpecify => 1, + Debug => 1, + DestHost => 'myswitch', + Community => 'public', + Version => 1 + ) + or die "Can't connect to DestHost.\n"; + + my $class = $foundry->class(); + + print "SNMP::Info determined this device to fall under subclass : $class\n"; + =head1 DESCRIPTION +This module is Deprecated. Please use Layer3::Foundry instead. + This module provides support for Foundry EdgeIron Switches =head2 Inherited Classes @@ -253,7 +269,25 @@ These are methods that return scalar value from SNMP =over -=item todo +=item $foundry->model() + +Returns model type. + +=item $foundry->vendor() + +Returns 'foundry' + +=item $foundry->os() + +Returns 'foundry' + +=item $foundry->os_ver() + +Returns the software version + +=item $foundry->serial() + +Returns the serial number =back @@ -274,7 +308,38 @@ to a hash. =over -=item todo2 +=item $foundry->interfaces() + +Returns reference to hash of interface names to iids. + +=item $foundry->i_ignore() + +Returns reference to hash of interfaces to be ignored. + +Ignores interfaces with descriptions of tunnel,loopback,null + +=item $foundry->i_duplex() + +Returns reference to hash of interface link duplex status. + +Crosses $foundry->sw_duplex() with $foundry->sw_index() + +=item $foundry->i_duplex_admin() + +Returns reference to hash of interface administrative duplex status. + +=item $foundry->stp_p_state() + +"The port's current state as defined by application of the Spanning Tree +Protocol. + +Skipped if device is an EdgeIron 24G due to reports of hangs. + +(C) + +=item $foundry->i_vlan() + +Returns a mapping between C and the PVID or default VLAN. =back diff --git a/Info/Layer2/HP.pm b/Info/Layer2/HP.pm index 75df74cc..906812cf 100644 --- a/Info/Layer2/HP.pm +++ b/Info/Layer2/HP.pm @@ -328,20 +328,20 @@ sub slots { sub fan { my $hp = shift; - return &sensor($hp, 'fan'); + return &_sensor($hp, 'fan'); } sub ps1_status { my $hp = shift; - return &sensor($hp, 'power', '^power supply 1') || &sensor($hp, 'power', '^power supply sensor'); + return &_sensor($hp, 'power', '^power supply 1') || &_sensor($hp, 'power', '^power supply sensor'); } sub ps2_status { my $hp = shift; - return &sensor($hp, 'power', '^power supply 2') || &sensor($hp, 'power', '^redundant'); + return &_sensor($hp, 'power', '^power supply 2') || &_sensor($hp, 'power', '^redundant'); } -sub sensor { +sub _sensor { my $hp = shift; my $search_type = shift || 'fan'; my $search_name = shift || ''; @@ -801,6 +801,18 @@ Returns number of entries in $hp->e_name that have 'slot' in them. hp +=item $hp->fan() + +Returns fan status + +=item $hp->ps1_status() + +Power supply 1 status + +=item $hp->ps2_status() + +Power supply 2 status + =back =head2 Globals imported from SNMP::Info::Layer2 @@ -867,6 +879,14 @@ older devices looks in F. print "Port: $port VLAN: $vlan\n"; } +=item $hp->v_index() + +Returns VLAN IDs + +=item $hp->v_name() + +Returns VLAN names + =item $hp->bp_index() Returns reference to hash of bridge port table entries map back to interface diff --git a/Info/Layer2/ZyXEL_DSLAM.pm b/Info/Layer2/ZyXEL_DSLAM.pm index f78523f3..b3f257ce 100644 --- a/Info/Layer2/ZyXEL_DSLAM.pm +++ b/Info/Layer2/ZyXEL_DSLAM.pm @@ -194,6 +194,10 @@ Returns IP Address of DSLAM. Tries to cull out model out of the description field. +=item $zyxel->layers() + +Returns 00000011. + =back =head2 Global Methods imported from SNMP::Info::Layer2 diff --git a/Info/Layer3/Cisco.pm b/Info/Layer3/Cisco.pm index 8424af89..de176ccf 100644 --- a/Info/Layer3/Cisco.pm +++ b/Info/Layer3/Cisco.pm @@ -274,6 +274,10 @@ Returns EIGRP peer IP addresses (C) +=item $cisco->i_vlan() + +Returns a mapping between C and the PVID or default VLAN. + =back =head2 Table Methods imported from SNMP::Info::CiscoVTP