[2993691] Support for SonicWALL devices in new class L3::SonicWALL (phishphreek)
This commit is contained in:
@@ -4,6 +4,7 @@ version 2.07 ()
|
|||||||
|
|
||||||
[NEW FEATURES]
|
[NEW FEATURES]
|
||||||
* Basic support for APC UPS devices
|
* Basic support for APC UPS devices
|
||||||
|
* [2993691] Support for SonicWALL devices in new class L3::SonicWALL (phishphreek)
|
||||||
|
|
||||||
[BUG FIXES]
|
[BUG FIXES]
|
||||||
|
|
||||||
|
|||||||
@@ -837,6 +837,12 @@ device: AP-1000,AP-2000,AP-4000
|
|||||||
|
|
||||||
device: WavePOINT-II
|
device: WavePOINT-II
|
||||||
|
|
||||||
|
#
|
||||||
|
# SonicWALL
|
||||||
|
#
|
||||||
|
device-vendor: SonicWALL
|
||||||
|
class: Layer3::SonicWALL
|
||||||
|
|
||||||
#
|
#
|
||||||
# Sun
|
# Sun
|
||||||
#
|
#
|
||||||
|
|||||||
8
Info.pm
8
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.
|
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
|
=item SNMP::Info::Layer3::Sun
|
||||||
|
|
||||||
Subclass for Generic Sun Routers running SunOS.
|
Subclass for Generic Sun Routers running SunOS.
|
||||||
@@ -1341,6 +1346,9 @@ sub device_type {
|
|||||||
# Nortel Contivity
|
# Nortel Contivity
|
||||||
$objtype = 'SNMP::Info::Layer3::Contivity' if $desc =~ /(\bCES\b|\bNVR\sV\d)/;
|
$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
|
# Allied Telesyn Layer2 managed switches. They report they have L3 support
|
||||||
$objtype = 'SNMP::Info::Layer2::Allied'
|
$objtype = 'SNMP::Info::Layer2::Allied'
|
||||||
if ( $desc =~ /Allied.*AT-80\d{2}\S*/i );
|
if ( $desc =~ /Allied.*AT-80\d{2}\S*/i );
|
||||||
|
|||||||
Reference in New Issue
Block a user