135/snmp-info
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Mark extremeware_i_vlan(), extremeware_i_vlan_membership(), xos_i_vlan(), and xos_i_vlan_membership() as private, external API is i_vlan() and i_vlan_membership(). POD updates.

Browse Source
This commit is contained in:
Eric A. Miller
2013-02-10 12:58:22 -05:00
parent b7a135db10
commit 2ac4e65827
1 changed files with 13 additions and 8 deletions
Download Patch File Download Diff File Expand all files Collapse all files

21
Info/Layer3/Extreme.pm
View File

@@ -389,17 +389,17 @@ sub i_vlan {
return $q_bridge if (keys %$q_bridge); return $q_bridge if (keys %$q_bridge);
# Next we try extremeVlanOpaqueTable # Next we try extremeVlanOpaqueTable
my $xos = $extreme->xos_i_vlan($partial); my $xos = $extreme->_xos_i_vlan($partial);
return $xos if (keys %$xos); return $xos if (keys %$xos);
# Try older ifStack method # Try older ifStack method
my $extremeware = $extreme->extremeware_i_vlan($partial); my $extremeware = $extreme->_extremeware_i_vlan($partial);
return $extremeware if (keys %$extremeware); return $extremeware if (keys %$extremeware);
return; return;
} }
sub xos_i_vlan { sub _xos_i_vlan {
my $extreme = shift; my $extreme = shift;
my $partial = shift; my $partial = shift;
@@ -434,7 +434,7 @@ sub xos_i_vlan {
return $i_vlan; return $i_vlan;
} }
sub extremeware_i_vlan { sub _extremeware_i_vlan {
my $extreme = shift; my $extreme = shift;
my $partial = shift; my $partial = shift;
my $stack = $extreme->ifStackStatus($partial); my $stack = $extreme->ifStackStatus($partial);
@@ -468,17 +468,17 @@ sub i_vlan_membership {
return $q_bridge if (keys $q_bridge); return $q_bridge if (keys $q_bridge);
# Next we try extremeVlanOpaqueTable # Next we try extremeVlanOpaqueTable
my $xos = $extreme->xos_i_vlan_membership($partial); my $xos = $extreme->_xos_i_vlan_membership($partial);
return $xos if (keys $xos); return $xos if (keys $xos);
# Try older ifStack method # Try older ifStack method
my $extremeware = $extreme->extremeware_i_vlan_membership($partial); my $extremeware = $extreme->_extremeware_i_vlan_membership($partial);
return $extremeware if (keys $extremeware); return $extremeware if (keys $extremeware);
return; return;
} }
sub xos_i_vlan_membership { sub _xos_i_vlan_membership {
my $extreme = shift; my $extreme = shift;
my $partial = shift; my $partial = shift;
@@ -518,7 +518,7 @@ sub xos_i_vlan_membership {
return $i_vlan_membership; return $i_vlan_membership;
} }
sub extremeware_i_vlan_membership { sub _extremeware_i_vlan_membership {
my $extreme = shift; my $extreme = shift;
my $partial = shift; my $partial = shift;
my $stack = $extreme->ifStackStatus($partial); my $stack = $extreme->ifStackStatus($partial);
@@ -912,6 +912,11 @@ Ignores VLAN meta interfaces and loopback
(C<extremeFdbMacFdbStatus>) (C<extremeFdbMacFdbStatus>)
=item $extreme->lldp_if()
Returns the mapping to the SNMP Interface Table. Extreme LLDP uses the
bridge index rather than ifIndex.
=item $extreme->i_vlan() =item $extreme->i_vlan()
Returns a mapping between C<ifIndex> and the VLAN. Returns a mapping between C<ifIndex> and the VLAN.