From 98eceb7c57e5b01ddc12b28e1eeeecb687a7a8e8 Mon Sep 17 00:00:00 2001
From: Max Baker <>
Date: Sun, 7 Jun 2009 22:50:04 +0000
Subject: [PATCH] add cisco id by OID for vendor for some problem devices. c/o
 Sam Stickland

---
 Info/Layer3.pm | 5 +++++
 1 file changed, 5 insertions(+)

diff --git a/Info/Layer3.pm b/Info/Layer3.pm
index b2bfdf59..0f148219 100644
--- a/Info/Layer3.pm
+++ b/Info/Layer3.pm
@@ -286,7 +286,12 @@ sub vendor {
     my $l3 = shift;
 
     my $descr = $l3->description();
+    my $id = $l3->id();
 
+    # .1.3.6.1.4.1.9.1 is the CISCO-PRODUCTS-MIB
+    # .1.3.6.1.4.1.9.9.368.4 is an old tree that Cisco CSSs were numbered from
+    return 'cisco'   if $id =~ /^\Q.1.3.6.1.4.1.9.1.\E\d+$/;
+    return 'cisco'   if $id =~ /^\Q.1.3.6.1.4.1.9.9.368.4.\E\d+/;
     return 'cisco'   if ( $descr =~ /(cisco|\bios\b)/i );
     return 'foundry' if ( $descr =~ /foundry/i );