135/snmp-info
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

added C3500XL support

Browse Source
This commit is contained in:
Max Baker
2003-09-23 02:56:51 +00:00
parent 766f14d2bf
commit 054e27e827
3 changed files with 11 additions and 7 deletions
Download Patch File Download Diff File Expand all files Collapse all files

3
ChangeLog
View File

@@ -1,6 +1,9 @@
SNMP::Info - Perl5 OO Interface to Network Devices and SNMP MIBs SNMP::Info - Perl5 OO Interface to Network Devices and SNMP MIBs
ChangeLog $Id$ ChangeLog $Id$
version 0.8 ()
* Added C3500XL devices to the Layer2::C2900 class
version 0.7 (08/14/03) version 0.7 (08/14/03)
* Added Class for Catalyst 6500 Series - Layer3::C6500 * Added Class for Catalyst 6500 Series - Layer3::C6500
* Added CiscoVTP support to 3550,2900, and Catalyst classes * Added CiscoVTP support to 3550,2900, and Catalyst classes

4
DeviceMatrix.txt
View File

@@ -174,7 +174,8 @@ device: 2924CXLv
device-family: Catalyst 3500 XL device-family: Catalyst 3500 XL
portmac: yes portmac: yes
note: L2 only IOS devices macsuck: vlan
note: L2 only IOS devices - Just like Catalyst 2900 series from SNMP
class: Layer2 class: Layer2
device: 3508GXL device: 3508GXL
@@ -182,7 +183,6 @@ device: 3508GXL
device: 3524XL device: 3524XL
device: 3548XL device: 3548XL
macsuck: no
device-family: Catalyst 3550 device-family: Catalyst 3550
macsuck: vlan macsuck: vlan

11
Info.pm
View File

@@ -9,7 +9,7 @@
# See COPYRIGHT at bottom # See COPYRIGHT at bottom
package SNMP::Info; package SNMP::Info;
$VERSION = 0.7; $VERSION = 0.8;
use strict; use strict;
use Exporter; use Exporter;
@@ -29,7 +29,7 @@ SNMP::Info - Object Oriented Perl5 Interface to Network devices and MIBs through
=head1 VERSION =head1 VERSION
SNMP::Info - Version 0.7 SNMP::Info - Version 0.8
=head1 AUTHOR =head1 AUTHOR
@@ -348,7 +348,7 @@ Subclass for Cisco Catalyst 1900 and 1900c Devices running CatOS.
=item SNMP::Info::Layer2::C2900 =item SNMP::Info::Layer2::C2900
Subclass for Cisco Catalyst 2900 devices running IOS. Subclass for Cisco Catalyst 2900 and 3500XL devices running IOS.
=item SNMP::Info::Layer2::Catalyst =item SNMP::Info::Layer2::Catalyst
@@ -611,6 +611,7 @@ Algorithm for Subclass Detection:
Bay Networks -> SNMP::Info::Layer2::Bay Bay Networks -> SNMP::Info::Layer2::Bay
Catalyst 1900 -> SNMP::Info::Layer2::C1900 Catalyst 1900 -> SNMP::Info::Layer2::C1900
Catalyst 2900XL/2950(IOS) -> SNMP::Info::Layer2::C2900 Catalyst 2900XL/2950(IOS) -> SNMP::Info::Layer2::C2900
Catalyst 3500XL (3548) IOS -> SNMP::Info::Layer2::C2900
Catalyst 3550/3548 -> SNMP::Info::Layer3::C3550 Catalyst 3550/3548 -> SNMP::Info::Layer3::C3550
Catalyst WS-C 2926,5xxx -> SNMP::Info::Layer2::Catalyst Catalyst WS-C 2926,5xxx -> SNMP::Info::Layer2::Catalyst
HP Procurve -> SNMP::Info::Layer2::HP HP Procurve -> SNMP::Info::Layer2::HP
@@ -657,8 +658,8 @@ sub device_type {
# Catalyst 1900 series override # Catalyst 1900 series override
$objtype = 'SNMP::Info::Layer2::C1900' if ($desc =~ /catalyst/i and $desc =~ /\D19\d{2}/); $objtype = 'SNMP::Info::Layer2::C1900' if ($desc =~ /catalyst/i and $desc =~ /\D19\d{2}/);
# Catalyst 2900 (IOS) series override # Catalyst 2900 and 3500XL (IOS) series override
$objtype = 'SNMP::Info::Layer2::C2900' if ($desc =~ /(C2900XL|C2950)/ ); $objtype = 'SNMP::Info::Layer2::C2900' if ($desc =~ /(C2900XL|C2950|C3500XL)/ );
# Catalyst WS-C series override 2926,4k,5k,6k in Hybrid # Catalyst WS-C series override 2926,4k,5k,6k in Hybrid
$objtype = 'SNMP::Info::Layer2::Catalyst' if ($desc =~ /WS-C\d{4}/); $objtype = 'SNMP::Info::Layer2::Catalyst' if ($desc =~ /WS-C\d{4}/);