From 10e0a53b3cd2014be50b98b41fe4821ee0017829 Mon Sep 17 00:00:00 2001 From: Andrey Pazychev Date: Sun, 17 May 2020 16:53:28 +0300 Subject: [PATCH] Added Eltex DSLAM 35265.1.28 --- lib/SNMP/Info.pm | 2 +- lib/SNMP/Info/Layer3/Eltex.pm | 24 ++++++++++++++++++------ 2 files changed, 19 insertions(+), 7 deletions(-) diff --git a/lib/SNMP/Info.pm b/lib/SNMP/Info.pm index f5df303e..5f26165e 100644 --- a/lib/SNMP/Info.pm +++ b/lib/SNMP/Info.pm @@ -25,7 +25,7 @@ our ($VERSION, %FUNCS, %GLOBALS, %MIBS, %MUNGE, $AUTOLOAD, $INIT, $DEBUG, %SPEED_MAP, $NOSUCH, $BIGINT, $REPEATERS); -$VERSION = '3.70-135.20.5.2'; +$VERSION = '3.70-135.20.5.3'; =head1 NAME diff --git a/lib/SNMP/Info/Layer3/Eltex.pm b/lib/SNMP/Info/Layer3/Eltex.pm index 35a2a18c..0d4dd82e 100644 --- a/lib/SNMP/Info/Layer3/Eltex.pm +++ b/lib/SNMP/Info/Layer3/Eltex.pm @@ -21,13 +21,16 @@ $VERSION = '3.70-135'; %GLOBALS = ( %SNMP::Info::Layer3::GLOBALS, - 'model_oid_mes' => 'mib-2.47.1.1.1.1.13.67108992', + 'model_oid_mes' => 'mib-2.47.1.1.1.1.13.67108992', #'hw_oid' => 'mib-2.47.1.1.1.1.8.67108992', - 'model_oid' => 'iso.0.8802.1.1.2.1.3.4.0', - 'hw_oid' => 'iso.0.8802.1.1.2.1.5.4795.1.2.2.0', - 'serial_oid' => 'mib-2.47.1.1.1.1.11.67108992', - 'serial_oid_22' => 'enterprises.35265.1.22.1.18.4.0', - 'os_ver_oid' => 'mib-2.47.1.1.1.1.10.67108992', + 'model_oid' => 'iso.0.8802.1.1.2.1.3.4.0', + 'model_oid_1_28' => 'enterprises.35265.4.2.0', + 'hw_oid' => 'iso.0.8802.1.1.2.1.5.4795.1.2.2.0', + 'serial_oid' => 'mib-2.47.1.1.1.1.11.67108992', + 'serial_oid_22' => 'enterprises.35265.1.22.1.18.4.0', + 'serial_oid_1_28' => 'enterprises.35265.4.3.0', + 'os_ver_oid' => 'mib-2.47.1.1.1.1.10.67108992', + 'os_ver_oid_1_28' => 'enterprises.35265.4.5.0', 'bootrom_oid' => 'mib-2.47.1.1.1.1.9.67108992', #'serial_oid_140' => '', 'os_ver_oid_140' => 'mib-2.47.1.1.1.1.9.1', @@ -51,6 +54,9 @@ sub model { $descr =~ /Eltex\s(.*)\ssoftware\sversion\s(.*)\sbuild\s(\d+)/; return $1; } + elsif ($id =~ /35265\.1\.28/) { + return $obj->model_oid_1_28; + } elsif (defined $model and $model !~ /MES\d+/) { $model = $obj->model_oid_mes . ' ' . $obj->model_oid || undef; } @@ -81,6 +87,9 @@ sub os_ver { $os_ver = $obj->os_ver_oid_140; return $os_ver; } + if ($id =~ /35265\.1\.28/) { + return $obj->os_ver_oid_1_28; + } elsif ($id =~ /35265\.1\.(24|43|30|120|5[2,4]|74|8[1,9])$/) { $os_ver = $obj->os_ver_oid; $bootrom = $obj->bootrom_oid; @@ -103,6 +112,9 @@ sub serial { if ($id =~ /35265\.(140|158)$/) { return; } + elsif ($id =~ /35265\.1\.28/) { + return $obj->serial_oid_1_28; + } elsif ($id =~ /35265\.1\.(24|43|30|120|5[2,4]|74|8[1,9]])$/) { $serial = $obj->serial_oid; }