Rotek vendor UCN
This commit is contained in:
@@ -20,21 +20,22 @@ $VERSION = '3.70-135';
|
||||
|
||||
%GLOBALS = (
|
||||
%SNMP::Info::Layer3::GLOBALS,
|
||||
'model_oid' => 'mib-2.47.1.1.1.1.13.1',
|
||||
'model_oid_41752' => 'enterprises.41752.6.1.1.1.19.0',
|
||||
'model_oid' => 'mib-2.47.1.1.1.1.13.1',
|
||||
'model_oid_41752' => 'enterprises.41752.6.1.1.1.19.0',
|
||||
'model_oid_8886_6_140' => 'enterprises.8886.6.1.1.1.19.0',
|
||||
'serial_oid' => 'mib-2.47.1.1.1.1.11.1',
|
||||
'serial_oid_41752' => 'enterprises.41752.6.1.1.1.14.0',
|
||||
'serial_oid' => 'mib-2.47.1.1.1.1.11.1',
|
||||
'serial_oid_41752' => 'enterprises.41752.6.1.1.1.14.0',
|
||||
'serial_oid_8886_6_140' => 'enterprises.8886.6.1.1.1.14.0',
|
||||
'os_ver_oid' => 'mib-2.47.1.1.1.1.10.1',
|
||||
'os_ver_oid_41752' => 'enterprises.41752.6.1.1.1.1.0',
|
||||
'os_ver_oid' => 'mib-2.47.1.1.1.1.10.1',
|
||||
'os_ver_oid_41752' => 'enterprises.41752.6.1.1.1.1.0',
|
||||
'os_ver_oid_8886_6_140' => 'enterprises.8886.6.1.1.1.1.0',
|
||||
'brom_oid' => 'mib-2.47.1.1.1.1.9.1',
|
||||
'brom_oid_41752' => 'enterprises.41752.6.1.1.1.13.0',
|
||||
'brom_oid' => 'mib-2.47.1.1.1.1.9.1',
|
||||
'brom_oid_41752' => 'enterprises.41752.6.1.1.1.13.0',
|
||||
'brom_oid_8886_6_140' => 'enterprises.8886.6.1.1.1.13.0',
|
||||
'hw_oid' => 'mib-2.47.1.1.1.1.8.1',
|
||||
'hw_oid_41752' => 'enterprises.41752.6.1.1.1.2.0',
|
||||
'hw_oid_8886_6_140' => 'enterprises.8886.6.1.1.1.2.0',
|
||||
'hw_oid' => 'mib-2.47.1.1.1.1.8.1',
|
||||
'hw_oid_41752' => 'enterprises.41752.6.1.1.1.2.0',
|
||||
'hw_oid_8886_6_140' => 'enterprises.8886.6.1.1.1.2.0',
|
||||
'model_rotek' => 'enterprises.41752.3.1.1.1.3.0',
|
||||
);
|
||||
|
||||
%FUNCS = ( %SNMP::Info::Layer3::FUNCS, );
|
||||
@@ -42,6 +43,10 @@ $VERSION = '3.70-135';
|
||||
%MUNGE = ( %SNMP::Info::Layer3::MUNGE, );
|
||||
|
||||
sub vendor {
|
||||
my $obj = shift;
|
||||
if ($obj->id() =~ /41752$/) {
|
||||
return 'rotek';
|
||||
}
|
||||
return 'raisecom';
|
||||
}
|
||||
|
||||
@@ -51,6 +56,9 @@ sub os {
|
||||
if ($id =~ /41752\.26\.502/ or $id =~ /8886\.6/) {
|
||||
return 'ros';
|
||||
}
|
||||
elsif ($id =~ /41752$/) {
|
||||
return 'rotek';
|
||||
}
|
||||
return 'rcios';
|
||||
}
|
||||
|
||||
@@ -82,6 +90,11 @@ sub os_ver {
|
||||
}
|
||||
$brom = $obj->brom_oid_8886_6_140;
|
||||
}
|
||||
elsif ($id =~ /41752$/) {
|
||||
my $os_ver_oid = $obj->description();
|
||||
$os_ver_oid =~ /\,\s(.*)/;
|
||||
$os_ver = $1;
|
||||
}
|
||||
else {
|
||||
$os_ver = $obj->os_ver_oid || undef;
|
||||
$brom = $obj->brom_oid || undef;
|
||||
@@ -112,6 +125,9 @@ sub model {
|
||||
elsif ($id =~ /8886\.6\.(140|191|150|21[3,4])$/) {
|
||||
return $obj->model_oid_8886_6_140 . ' HW:' . $obj->hvver;
|
||||
}
|
||||
elsif ($id =~ /41752$/) {
|
||||
return $obj->model_rotek;
|
||||
}
|
||||
return $obj->SUPER::model();
|
||||
}
|
||||
|
||||
|
||||
Reference in New Issue
Block a user