From 840d8a48bac7da0b7a8fb2c51a4d849b6134409d Mon Sep 17 00:00:00 2001
From: Bill Fenner <>
Date: Mon, 30 Jul 2007 15:27:35 +0000
Subject: [PATCH] Add PowerEthernet support.

---
 Info/Layer2.pm | 7 ++++++-
 Info/Layer3.pm | 8 +++++++-
 2 files changed, 13 insertions(+), 2 deletions(-)

diff --git a/Info/Layer2.pm b/Info/Layer2.pm
index 66a8d146..13c8a114 100644
--- a/Info/Layer2.pm
+++ b/Info/Layer2.pm
@@ -39,21 +39,24 @@ use Exporter;
 use SNMP::Info;
 use SNMP::Info::Bridge;
 use SNMP::Info::Entity;
+use SNMP::Info::PowerEthernet;
 
 use vars qw/$VERSION $DEBUG %GLOBALS %MIBS %FUNCS %PORTSTAT %MUNGE $INIT/;
 
-@SNMP::Info::Layer2::ISA = qw/SNMP::Info SNMP::Info::Bridge SNMP::Info::Entity Exporter/;
+@SNMP::Info::Layer2::ISA = qw/SNMP::Info SNMP::Info::Bridge SNMP::Info::Entity SNMP::Info::PowerEthernet Exporter/;
 @SNMP::Info::Layer2::EXPORT_OK = qw//;
 
 %MIBS = (   %SNMP::Info::MIBS, 
             %SNMP::Info::Bridge::MIBS,
             %SNMP::Info::Entity::MIBS,
+            %SNMP::Info::PowerEthernet::MIBS,
         );
 
 %GLOBALS = (
             %SNMP::Info::GLOBALS,
             %SNMP::Info::Bridge::GLOBALS,
             %SNMP::Info::Entity::GLOBALS,
+            %SNMP::Info::PowerEthernet::GLOBALS,
             'serial1'   => '.1.3.6.1.4.1.9.3.6.3.0', # OLD-CISCO-CHASSIS-MIB::chassisId.0
             );
 
@@ -61,6 +64,7 @@ use vars qw/$VERSION $DEBUG %GLOBALS %MIBS %FUNCS %PORTSTAT %MUNGE $INIT/;
             %SNMP::Info::FUNCS,
             %SNMP::Info::Bridge::FUNCS,
             %SNMP::Info::Entity::FUNCS,
+            %SNMP::Info::PowerEthernet::FUNCS,
            );
 
 %MUNGE = (
@@ -68,6 +72,7 @@ use vars qw/$VERSION $DEBUG %GLOBALS %MIBS %FUNCS %PORTSTAT %MUNGE $INIT/;
             %SNMP::Info::MUNGE,
             %SNMP::Info::Bridge::MUNGE,
             %SNMP::Info::Entity::MUNGE,
+            %SNMP::Info::PowerEthernet::MUNGE,
          );
 
 # Method OverRides
diff --git a/Info/Layer3.pm b/Info/Layer3.pm
index 16926eb2..0a9a2915 100644
--- a/Info/Layer3.pm
+++ b/Info/Layer3.pm
@@ -40,10 +40,12 @@ use SNMP::Info;
 use SNMP::Info::Bridge;
 use SNMP::Info::EtherLike;
 use SNMP::Info::Entity;
+use SNMP::Info::PowerEthernet;
 
 use vars qw/$VERSION %GLOBALS %FUNCS %MIBS %MUNGE/;
 
-@SNMP::Info::Layer3::ISA = qw/SNMP::Info::Entity SNMP::Info::EtherLike 
+@SNMP::Info::Layer3::ISA = qw/SNMP::Info::PowerEthernet
+                              SNMP::Info::Entity SNMP::Info::EtherLike 
                               SNMP::Info::Bridge SNMP::Info Exporter/;
 @SNMP::Info::Layer3::EXPORT_OK = qw//;
 
@@ -51,6 +53,7 @@ use vars qw/$VERSION %GLOBALS %FUNCS %MIBS %MUNGE/;
           %SNMP::Info::Bridge::MIBS,
           %SNMP::Info::EtherLike::MIBS,
           %SNMP::Info::Entity::MIBS,
+          %SNMP::Info::PowerEthernet::MIBS,
           'IP-MIB'      => 'ipNetToMediaIfIndex',
           'OSPF-MIB'    => 'ospfRouterId',
           'BGP4-MIB'    => 'bgpIdentifier',
@@ -62,6 +65,7 @@ use vars qw/$VERSION %GLOBALS %FUNCS %MIBS %MUNGE/;
             %SNMP::Info::Bridge::GLOBALS,
             %SNMP::Info::EtherLike::GLOBALS,
             %SNMP::Info::Entity::GLOBALS,
+            %SNMP::Info::PowerEthernet::GLOBALS,
             'mac'          => 'ifPhysAddress.1',
             'serial1'      => '.1.3.6.1.4.1.9.3.6.3.0', # OLD-CISCO-CHASSIS-MIB::chassisId.0
             'router_ip'    => 'ospfRouterId.0',
@@ -74,6 +78,7 @@ use vars qw/$VERSION %GLOBALS %FUNCS %MIBS %MUNGE/;
             %SNMP::Info::Bridge::FUNCS,
             %SNMP::Info::EtherLike::FUNCS,
             %SNMP::Info::Entity::FUNCS,
+            %SNMP::Info::PowerEthernet::FUNCS,
             # Obsolete Address Translation Table (ARP Cache)
             'old_at_index'   => 'atIfIndex',
             'old_at_paddr'   => 'atPhysAddress',
@@ -115,6 +120,7 @@ use vars qw/$VERSION %GLOBALS %FUNCS %MIBS %MUNGE/;
             %SNMP::Info::Bridge::MUNGE,
             %SNMP::Info::EtherLike::MUNGE,
             %SNMP::Info::Entity::MUNGE,
+            %SNMP::Info::PowerEthernet::MUNGE,
             'old_at_paddr' => \&SNMP::Info::munge_mac,
             'at_paddr'     => \&SNMP::Info::munge_mac,
          );