From b10b922aa06fefe7bb1111fd7c3e2645965c54fd Mon Sep 17 00:00:00 2001
From: Oliver Gorwits <oliver@cpan.org>
Date: Wed, 11 Apr 2012 14:47:35 +0100
Subject: [PATCH] [2993691] Support for SonicWALL devices in new class
 L3::SonicWALL (phishphreek)

---
 ChangeLog        | 1 +
 DeviceMatrix.txt | 6 ++++++
 Info.pm          | 8 ++++++++
 3 files changed, 15 insertions(+)

diff --git a/ChangeLog b/ChangeLog
index 695435d3..fdd2204a 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -4,6 +4,7 @@ version 2.07 ()
 
     [NEW FEATURES]
     * Basic support for APC UPS devices
+    * [2993691] Support for SonicWALL devices in new class L3::SonicWALL (phishphreek)
 
     [BUG FIXES]
 
diff --git a/DeviceMatrix.txt b/DeviceMatrix.txt
index 00b645a3..2792c14d 100644
--- a/DeviceMatrix.txt
+++ b/DeviceMatrix.txt
@@ -837,6 +837,12 @@ device: AP-1000,AP-2000,AP-4000
 
 device: WavePOINT-II
 
+# 
+# SonicWALL
+# 
+device-vendor: SonicWALL
+class: Layer3::SonicWALL
+
 #
 # Sun
 #
diff --git a/Info.pm b/Info.pm
index 203de0b0..bb557e0a 100644
--- a/Info.pm
+++ b/Info.pm
@@ -762,6 +762,11 @@ Subclass for FreeBSD-Based Firewalls using Pf /Pf Sense
 
 See documentation in L<SNMP::Info::Layer3::Pf> for details.
 
+=item SNMP::Info::Layer3::SonicWALL
+
+Subclass for generic SonicWALL devices. See documentation in
+L<SNMP::Info::Layer3::SonicWALL> for details.
+
 =item SNMP::Info::Layer3::Sun
 
 Subclass for Generic Sun Routers running SunOS.
@@ -1341,6 +1346,9 @@ sub device_type {
         # Nortel Contivity
         $objtype = 'SNMP::Info::Layer3::Contivity' if $desc =~ /(\bCES\b|\bNVR\sV\d)/;
 
+        # SonicWALL
+        $objtype = 'SNMP::Info::Layer3::SonicWALL' if $desc =~ /SonicWALL/i;
+
         # Allied Telesyn Layer2 managed switches. They report they have L3 support
         $objtype = 'SNMP::Info::Layer2::Allied'
             if ( $desc =~ /Allied.*AT-80\d{2}\S*/i );