Adding support for CISCO-STP-EXTENSIONS-MIB (ID 1872450)

Info/Bridge.pm

@@ -55,9 +55,11 @@ $VERSION = '2.00';
     'b_type'  => 'dot1dBaseType',
 
     # Spanning Tree Protocol
-    'stp_ver'  => 'dot1dStpProtocolSpecification',
+    'stp_ver'       => 'dot1dStpProtocolSpecification',
-    'stp_time' => 'dot1dStpTimeSinceTopologyChange',
+    'stp_time'      => 'dot1dStpTimeSinceTopologyChange',
-    'stp_root' => 'dot1dStpDesignatedRoot',
+    'stp_root'      => 'dot1dStpDesignatedRoot',
+    'stp_root_port' => 'dot1dStpRootPort',
+    'stp_priority'  => 'dot1dStpPriority',
 
     # Q-BRIDGE-MIB
     'qb_vlans_max'       => 'dot1qMaxSupportedVlans',

Info/Layer3/C3550.pm

@@ -41,6 +41,9 @@ use SNMP::Info::CiscoImage;
 use SNMP::Info::CiscoPortSecurity;
 use SNMP::Info::CiscoPower;
 use SNMP::Info::Layer3;
+use SNMP::Info::CiscoStpExtensions;
+
+use vars qw/$VERSION %GLOBALS %MIBS %FUNCS %MUNGE/;
 
 @SNMP::Info::Layer3::C3550::ISA
     = qw/SNMP::Info::CiscoVTP SNMP::Info::CiscoStack
@@ -48,10 +51,10 @@ use SNMP::Info::Layer3;
     SNMP::Info::CiscoPortSecurity
     SNMP::Info::CiscoImage SNMP::Info::CiscoPower
     SNMP::Info::Layer3
+    SNMP::Info::CiscoStpExtensions
     Exporter/;
-@SNMP::Info::Layer3::C3550::EXPORT_OK = qw//;
 
-use vars qw/$VERSION %GLOBALS %MIBS %FUNCS %MUNGE/;
+@SNMP::Info::Layer3::C3550::EXPORT_OK = qw//;
 
 $VERSION = '2.00';
 
@@ -60,10 +63,13 @@ $VERSION = '2.00';
     %SNMP::Info::CiscoPortSecurity::MIBS, %SNMP::Info::CiscoImage::MIBS,
     %SNMP::Info::CiscoStats::MIBS,        %SNMP::Info::CDP::MIBS,
     %SNMP::Info::CiscoStack::MIBS,        %SNMP::Info::CiscoVTP::MIBS,
+    %SNMP::Info::CiscoStpExtensions::MIBS,
 );
 
+
 %GLOBALS = (
     %SNMP::Info::Layer3::GLOBALS,
+    %SNMP::Info::CiscoStpExtensions::GLOBALS,
     %SNMP::Info::CiscoPower::GLOBALS,
     %SNMP::Info::CiscoPortSecurity::GLOBALS,
     %SNMP::Info::CiscoImage::GLOBALS,
@@ -79,12 +85,13 @@ $VERSION = '2.00';
     %SNMP::Info::CiscoPortSecurity::FUNCS, %SNMP::Info::CiscoImage::FUNCS,
     %SNMP::Info::CiscoStats::FUNCS,        %SNMP::Info::CDP::FUNCS,
     %SNMP::Info::CiscoStack::FUNCS,        %SNMP::Info::CiscoVTP::FUNCS,
+    %SNMP::Info::CiscoStpExtensions::FUNCS,
 );
 
 %MUNGE = (
-
     # Inherit all the built in munging
     %SNMP::Info::Layer3::MUNGE,
+    %SNMP::Info::CiscoStpExtensions::MUNGE,
     %SNMP::Info::CiscoPower::MUNGE,
     %SNMP::Info::CiscoPortSecurity::MUNGE,
     %SNMP::Info::CiscoImage::MUNGE,
@@ -263,6 +270,8 @@ after determining a more specific class using the method above.
 
 =item SNMP::Info::Layer3
 
+=item SNMP::Info::CiscoSTPExtensions
+
 =item SNMP::Info::CiscoPower
 
 =item SNMP::Info::CiscoPortSecurity
@@ -287,6 +296,8 @@ after determining a more specific class using the method above.
 
 See L<SNMP::Info::Layer3/"Required MIBs"> for its own MIB requirements.
 
+See L<SNMP::Info::CiscoStpExtensions/"Required MIBs"> for its own MIB requirements.
+
 See L<SNMP::Info::CiscoPower/"Required MIBs"> for its own MIB requirements.
 
 See L<SNMP::Info::CiscoPortSecurity/"Required MIBs"> for its own MIB
@@ -335,6 +346,10 @@ Returns 1.  Use vlan indexing.
 
 See documentation in L<SNMP::Info::Layer3/"GLOBALS"> for details.
 
+=head2 Globals imported from SNMP::Info::CiscoStpExtensions
+
+See documentation in L<SNMP::Info::CiscoStpExtensions/"GLOBALS"> for details.
+
 =head2 Globals imported from SNMP::Info::CiscoPower
 
 See documentation in L<SNMP::Info::CiscoPower/"GLOBALS"> for details.
@@ -412,6 +427,10 @@ Crosses $c3550->p_port() with $c3550->p_duplex() to utilize port C<ifIndex>.
 
 See documentation in L<SNMP::Info::Layer3/"TABLE METHODS"> for details.
 
+=head2 Table Methods imported from SNMP::Info::CiscoStpExtensions
+
+See documentation in L<SNMP::Info::CiscoStpExtensions/"TABLE METHODS"> for details.
+
 =head2 Table Methods imported from SNMP::Info::CiscoPower
 
 See documentation in L<SNMP::Info::CiscoPower/"TABLE METHODS"> for details.

Info/Layer3/C6500.pm

@@ -41,6 +41,9 @@ use SNMP::Info::CiscoPortSecurity;
 use SNMP::Info::CiscoConfig;
 use SNMP::Info::CiscoPower;
 use SNMP::Info::Layer3;
+use SNMP::Info::CiscoStpExtensions;
+
+use vars qw/$VERSION %GLOBALS %MIBS %FUNCS %MUNGE/;
 
 @SNMP::Info::Layer3::C6500::ISA
     = qw/SNMP::Info::CiscoVTP SNMP::Info::CiscoStack
@@ -50,7 +53,9 @@ use SNMP::Info::Layer3;
     SNMP::Info::CiscoConfig
     SNMP::Info::CiscoPower
     SNMP::Info::Layer3
+    SNMP::Info::CiscoStpExtensions
     Exporter/;
+
 @SNMP::Info::Layer3::C6500::EXPORT_OK = qw//;
 
 use vars qw/$VERSION %GLOBALS %MIBS %FUNCS %MUNGE/;
@@ -62,7 +67,7 @@ $VERSION = '2.00';
     %SNMP::Info::CiscoConfig::MIBS, %SNMP::Info::CiscoPortSecurity::MIBS,
     %SNMP::Info::CiscoImage::MIBS,  %SNMP::Info::CiscoStats::MIBS,
     %SNMP::Info::CDP::MIBS,         %SNMP::Info::CiscoStack::MIBS,
-    %SNMP::Info::CiscoVTP::MIBS,
+    %SNMP::Info::CiscoVTP::MIBS,    %SNMP::Info::CiscoStpExtensions::MIBS,
 );
 
 %GLOBALS = (
@@ -75,6 +80,7 @@ $VERSION = '2.00';
     %SNMP::Info::CDP::GLOBALS,
     %SNMP::Info::CiscoStack::GLOBALS,
     %SNMP::Info::CiscoVTP::GLOBALS,
+    %SNMP::Info::CiscoStpExtensions::GLOBALS,
 );
 
 %FUNCS = (
@@ -82,15 +88,16 @@ $VERSION = '2.00';
     %SNMP::Info::CiscoConfig::FUNCS, %SNMP::Info::CiscoPortSecurity::FUNCS,
     %SNMP::Info::CiscoImage::FUNCS,  %SNMP::Info::CiscoStats::FUNCS,
     %SNMP::Info::CDP::FUNCS,         %SNMP::Info::CiscoStack::FUNCS,
-    %SNMP::Info::CiscoVTP::FUNCS,
+    %SNMP::Info::CiscoVTP::FUNCS,    %SNMP::Info::CiscoStpExtensions::FUNCS,
 );
 
+
 %MUNGE = (
     %SNMP::Info::Layer3::MUNGE,      %SNMP::Info::CiscoPower::MUNGE,
     %SNMP::Info::CiscoConfig::MUNGE, %SNMP::Info::CiscoPortSecurity::MUNGE,
     %SNMP::Info::CiscoImage::MUNGE,  %SNMP::Info::CiscoStats::MUNGE,
     %SNMP::Info::CDP::MUNGE,         %SNMP::Info::CiscoStack::MUNGE,
-    %SNMP::Info::CiscoVTP::MUNGE,
+    %SNMP::Info::CiscoVTP::MUNGE,    %SNMP::Info::CiscoStpExtensions::MUNGE,
 );
 
 sub vendor {
@@ -184,6 +191,7 @@ sub set_i_duplex_admin {
     }
 }
 
+
 1;
 __END__
 
@@ -247,6 +255,8 @@ after determining a more specific class using the method above.
 
 =item SNMP::Info::Layer3
 
+=item SNMP::Info::CiscoStpExtensions
+
 =back
 
 =head2 Required MIBs
@@ -274,6 +284,8 @@ See L<SNMP::Info::CiscoPower/"Required MIBs"> for its own MIB requirements.
 
 See L<SNMP::Info::Layer3/"Required MIBs"> for its own MIB requirements.
 
+See L<SNMP::Info::CiscoStpExtensions/"Required MIBs"> for its own MIB requirements.
+
 =back
 
 =head1 GLOBALS
@@ -328,6 +340,10 @@ See documentation in L<SNMP::Info::CiscoPower/"GLOBALS"> for details.
 
 See documentation in L<SNMP::Info::Layer3/"GLOBALS"> for details.
 
+=head2 Globals imported from SNMP::Info::CiscoStpExtensions
+
+See documentation in L<SNMP::Info::CiscoStpExtensions/"GLOBALS"> for details.
+
 =head1 TABLE METHODS
 
 These are methods that return tables of information in the form of a reference
@@ -406,9 +422,13 @@ See documentation in L<SNMP::Info::CiscoConfig/"TABLE METHODS"> for details.
 
 See documentation in L<SNMP::Info::CiscoPower/"TABLE METHODS"> for details.
 
+=head2 Table Methods imported from SNMP::Info::CiscoStpExtensions
+
 =head2 Table Methods imported from SNMP::Info::Layer3
 
 See documentation in L<SNMP::Info::Layer3/"TABLE METHODS"> for details.
 
+See documentation in L<SNMP::Info::CiscoStpExtensions/"TABLE METHODS"> for details.
+
 =cut