From edc0fe4fbeef058da91c96b3dbb09937f759b667 Mon Sep 17 00:00:00 2001 From: "Eric A. Miller" Date: Sat, 21 Jun 2014 11:35:03 -0400 Subject: [PATCH] Enterprise edition versions 8 and 9 of C1900 support aggregation and stp extensions --- Info/Layer2/C1900.pm | 44 +++++++++++++++++++++++++++++++++++++++----- 1 file changed, 39 insertions(+), 5 deletions(-) diff --git a/Info/Layer2/C1900.pm b/Info/Layer2/C1900.pm index 40d78794..439802e3 100644 --- a/Info/Layer2/C1900.pm +++ b/Info/Layer2/C1900.pm @@ -37,10 +37,12 @@ use Exporter; use SNMP::Info::CDP; use SNMP::Info::CiscoStats; use SNMP::Info::CiscoConfig; +use SNMP::Info::CiscoStpExtensions; +use SNMP::Info::CiscoAgg; use SNMP::Info::Layer2; @SNMP::Info::Layer2::C1900::ISA = qw/SNMP::Info::CDP SNMP::Info::CiscoStats - SNMP::Info::CiscoConfig SNMP::Info::Layer2 + SNMP::Info::CiscoConfig SNMP::Info::CiscoStpExtensions SNMP::Info::CiscoAgg SNMP::Info::Layer2 Exporter/; @SNMP::Info::Layer2::C1900::EXPORT_OK = qw//; @@ -50,6 +52,8 @@ $VERSION = '3.15'; %GLOBALS = ( %SNMP::Info::Layer2::GLOBALS, + %SNMP::Info::CiscoAgg::GLOBALS, + %SNMP::Info::CiscoStpExtensions::GLOBALS, %SNMP::Info::CiscoConfig::GLOBALS, %SNMP::Info::CiscoStats::GLOBALS, %SNMP::Info::CDP::GLOBALS, @@ -58,6 +62,8 @@ $VERSION = '3.15'; %FUNCS = ( %SNMP::Info::Layer2::FUNCS, + %SNMP::Info::CiscoAgg::FUNCS, + %SNMP::Info::CiscoStpExtensions::FUNCS, %SNMP::Info::CiscoConfig::FUNCS, %SNMP::Info::CiscoStats::FUNCS, %SNMP::Info::CDP::FUNCS, @@ -75,6 +81,8 @@ $VERSION = '3.15'; %MIBS = ( %SNMP::Info::Layer2::MIBS, + %SNMP::Info::CiscoAgg::MIBS, + %SNMP::Info::CiscoStpExtensions::MIBS, %SNMP::Info::CiscoConfig::MIBS, %SNMP::Info::CiscoStats::MIBS, %SNMP::Info::CDP::MIBS, @@ -84,8 +92,9 @@ $VERSION = '3.15'; ); %MUNGE = ( - %SNMP::Info::Layer2::MUNGE, %SNMP::Info::CiscoConfig::MUNGE, - %SNMP::Info::CiscoStats::MUNGE, %SNMP::Info::CDP::MUNGE, + %SNMP::Info::Layer2::MUNGE, %SNMP::Info::CiscoAgg::MUNGE, + %SNMP::Info::CiscoStpExtensions::MUNGE, %SNMP::Info::CiscoConfig::MUNGE, + %SNMP::Info::CiscoStats::MUNGE, %SNMP::Info::CDP::MUNGE, ); sub bulkwalk_no { return 1; } @@ -203,7 +212,8 @@ sub i_vlan { my $partial = shift; # Overlap allows more than one VLAN per port. Unable to determine default - my $overlap = $c1900->bridgeGroupAllowMembershipOverlap() + my $overlap + = $c1900->bridgeGroupAllowMembershipOverlap() || $c1900->vlanAllowMembershipOverlap() || 'disabled'; @@ -258,7 +268,7 @@ sub bp_index { my $if_index = $c1900->i_index($partial); my $index = $c1900->orig_bp_index($partial) || {}; foreach my $iid ( keys %$if_index ) { - $index->{$iid} = $iid if(!defined $index->{$iid}); + $index->{$iid} = $iid if ( !defined $index->{$iid} ); } return $index; } @@ -312,6 +322,10 @@ after determining a more specific class using the method above. =item SNMP::Info::CiscoConfig +=item SNMP::Info::CiscoStpExtensions + +=item SNMP::Info::CiscoAgg + =item SNMP::Info::Layer2 =back @@ -336,6 +350,10 @@ See L for its MIB requirements. See L for its MIB requirements. +See L for its MIB requirements. + +See L for its MIB requirements. + See L for its MIB requirements. =head1 GLOBALS @@ -394,6 +412,14 @@ See L for details. See L for details. +=head2 Globals imported from SNMP::Info::CiscoStpExtensions + +See L for details. + +=head2 Globals imported from SNMP::Info::CiscoAgg + +See L for details. + =head2 Globals imported from SNMP::Info::Layer2 See L for details. @@ -513,6 +539,14 @@ See L for details. See L for details. +=head2 Table Methods imported from SNMP::Info::CiscoStpExtensions + +See L for details. + +=head2 Table Methods imported from SNMP::Info::CiscoAgg + +See L for details. + =head2 Table Methods imported from SNMP::Info::Layer2 See L for details.