From 3fd9f1deda02363299aa541309ec781383d01d5d Mon Sep 17 00:00:00 2001
From: Andrey Pazychev <anp135@yandex.ru>
Date: Mon, 18 May 2020 00:34:24 +0300
Subject: [PATCH] Raisecom 886 RC1

---
 lib/SNMP/Info/Layer3/Raisecom.pm | 13 ++++++++-----
 1 file changed, 8 insertions(+), 5 deletions(-)

diff --git a/lib/SNMP/Info/Layer3/Raisecom.pm b/lib/SNMP/Info/Layer3/Raisecom.pm
index c66a6cc1..a7a012d0 100755
--- a/lib/SNMP/Info/Layer3/Raisecom.pm
+++ b/lib/SNMP/Info/Layer3/Raisecom.pm
@@ -64,13 +64,13 @@ sub os_ver {
         $obj->brom_oid_41752 =~ /.*_BOOT_(.*)_(\d+)/;
         $brom = $1 . ' (' . $2 . ')';
     }
-    elsif ($id =~ /886\.6\.140$/) {
+    elsif ($id =~ /886\.6\.(140|150)$/) {
         $obj->os_ver_oid_886_6_140 =~ /ROS_(.*)\.ISCOM.*\.(\d*\.+\d*)/;
         $os_ver = $1 . ' (' . $2 . ')';
         $obj->brom_oid_886_6_140 =~ /Bootstrap_([\d\W]+)\.ISCOM.*\.(\d*\.+\d*)/;
         $brom = $1 . ' (' . $2 . ')';
     }
-    elsif ($id =~ /886\.6\.191$/) {
+    elsif ($id =~ /886\.6\.(191|21[3,4])$/) {
         $obj->os_ver_oid_886_6_140 =~ /(\d*\.+\d*)\(Compiled/;
         $os_ver = $1;
         $brom = $obj->brom_oid_886_6_140;
@@ -102,7 +102,7 @@ sub model {
     elsif ($id =~ /41752\.26\.502/) {
         return $obj->model_oid_41752 . ' HW:' . $obj->hvver;
     }
-    elsif ($id =~ /886\.6\.(140|191)$/) {
+    elsif ($id =~ /886\.6\.(140|191|150|21[3,4])$/) {
         return $obj->model_oid_886_6_140 . ' HW:' . $obj->hvver;
     }
     return $obj->SUPER::model();
@@ -115,7 +115,7 @@ sub serial {
     if ($id =~ /41752\.26\.502/) {
         return $obj->serial_oid_41752;
     }
-    elsif ($id =~ /886\.6\.(140|191)$/) {
+    elsif ($id =~ /886\.6\.(140|191|150|21[3,4])$/) {
         return $obj->serial_oid_886_6_140;
     }
     return $obj->SUPER::serial;
@@ -128,10 +128,13 @@ sub hvver {
         $obj->hw_oid_41752 =~ /.*\sversion\s(.*)/;
         return $1;
     }
-    elsif ($id =~ /886\.6\.(140|191)$/) {
+    elsif ($id =~ /886\.6\.(140|150)$/) {
         $obj->hw_oid_886_6_140 =~ /Hardware\s.*\sVersion\s(.*)/;
         return $1;
     }
+    elsif ($id =~ /886\.6\.(21[3,4]|191)$/) {
+        return $obj->hw_oid_886_6_140;
+    }
 
     return $obj->SUPER::hvver()
 }