POD coverage

This commit is contained in:
Eric Miller
2008-07-19 02:41:59 +00:00
parent 03785c4365
commit ecb26a8b68
9 changed files with 205 additions and 7 deletions

View File

@@ -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<SNMP::Info::EtherLike/"GLOBALS"> 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<SNMP::Info::EtherLike/"GLOBALS"> 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<ifIndex> 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<SNMP::Info::Entity/"TABLE METHODS"> for details.
See documentation in L<SNMP::Info::EtherLike/"TABLE METHODS"> 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

View File

@@ -214,6 +214,10 @@ Returns IP Address of Managed Device.
Tries to cull out C<AT-nnnnX> out of the description field.
=item $allied->mac()
Returns device MAC.
=back
=head2 Globals imported from SNMP::Info::Layer2

View File

@@ -330,6 +330,18 @@ to return depending on which it is.
Removes C<sreg-> from the model name
=item $baystack->os()
Returns 'bay'.
=item $bay->os_ver()
Returns the os version extracted from C<sysDescr>.
=item $bay->os_bin()
Returns the firmware version extracted from C<sysDescr>.
=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

View File

@@ -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

View File

@@ -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<portName>
=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

View File

@@ -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<dot1dStpPortState>)
=item $foundry->i_vlan()
Returns a mapping between C<ifIndex> and the PVID or default VLAN.
=back

View File

@@ -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<HP-VLAN>.
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

View File

@@ -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

View File

@@ -274,6 +274,10 @@ Returns EIGRP peer IP addresses
(C<cEigrpPeerAddr>)
=item $cisco->i_vlan()
Returns a mapping between C<ifIndex> and the PVID or default VLAN.
=back
=head2 Table Methods imported from SNMP::Info::CiscoVTP