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

Eltex added one more model suport

Browse Source
This commit is contained in:
Andrey Pazychev
2020-05-20 17:30:13 +03:00
parent 316a799fdb
commit bed7dac4ac
1 changed files with 8 additions and 18 deletions
Download Patch File Download Diff File Expand all files Collapse all files

26
lib/SNMP/Info/Layer3/Eltex.pm
View File

@@ -48,21 +48,8 @@ $VERSION = '3.70-135';
sub model { sub model {
my $obj = shift; my $obj = shift;
my $model; my $hw; my $model = $obj->description() || undef;
my $id = $obj->id(); my $hw = $obj->hwver() || undef;
$model = $obj->model_oid || undef;
$hw = $obj->hwver() || undef;
if ( $id =~ /35265\.1\.22/ ) {
my $descr = $obj->descr_oid;
$descr =~ /Eltex\s(.*)\ssoftware\sversion\s(.*)\sbuild\s(\d+)/;
return $1;
}
elsif ($id =~ /34300\.1\.6/ or $id =~ /35265\.1\.28/) {
return $obj->model_oid_mxa;
}
elsif (defined $model and $model !~ /MES\d+/) {
$model = $obj->model_oid_mes . ' ' . $obj->model_oid || undef;
}
if (defined $model and defined $hw) { if (defined $model and defined $hw) {
return $model . ' HW:' . $hw; return $model . ' HW:' . $hw;
@@ -91,8 +78,10 @@ sub os_ver {
$os_ver = $obj->os_ver_oid_140; $os_ver = $obj->os_ver_oid_140;
return $os_ver; return $os_ver;
} }
if ($id =~ /34300\.1\.6/ or $id =~ /35265\.1\.28$/) { if ($id =~ /34300\.1\.6/ or $id =~ /35265\.1\.(28$)|(21\.)/) {
return $obj->os_ver_oid_mxa; $os_ver = $obj->os_ver_oid_mxa;
$os_ver =~ s/^\s*Eltex\s*LTE\s*software\s*version\s*//;
return $os_ver;
} }
elsif ($id =~ /35265\.1\.(24|43|30|120|5[2,4]|74|8[1,9])$/) { elsif ($id =~ /35265\.1\.(24|43|30|120|5[2,4]|74|8[1,9])$/) {
$os_ver = $obj->os_ver_oid; $os_ver = $obj->os_ver_oid;
@@ -109,6 +98,7 @@ sub os_ver {
else { else {
return 'unknown'; return 'unknown';
} }
return $os_ver . ' bootrom: ' . $bootrom; return $os_ver . ' bootrom: ' . $bootrom;
} }
@@ -122,7 +112,7 @@ sub serial {
elsif ($id =~ /34300\.1\.6/ or $id =~ /35265\.1\.28$/) { elsif ($id =~ /34300\.1\.6/ or $id =~ /35265\.1\.28$/) {
return $obj->serial_oid_mxa; return $obj->serial_oid_mxa;
} }
elsif ($id =~ /35265\.1\.(24|43|30|120|5[2,4]|74|8[1,9]])$/) { elsif ($id =~ /35265\.1\.(24|43|30|120|5[2,4]|74|8[1,9])$/) {
$serial = $obj->serial_oid; $serial = $obj->serial_oid;
} }
elsif ( $id =~ /35265\.1\.22$/ ) { elsif ( $id =~ /35265\.1\.22$/ ) {