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

Correct device serial number reporting for Cisco Nexus 5k switches with software version >= 7

Browse Source
This commit is contained in:
Alexander Hartmaier
2016-04-27 16:54:02 +02:00
parent 48dfb9bd08
commit 7deea96bc3
2 changed files with 44 additions and 8 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
ChangeLog
View File

@@ -1,5 +1,10 @@
SNMP::Info - Friendly OO-style interface to Network devices using SNMP.
[BUG FIXES]
* Correct device serial number reporting for Cisco Nexus 5k switches with
software version >= 7
version 3.32 (2016-04-26)
[ENHANCEMENTS]

47
Info/Layer3/Nexus.pm
View File

@@ -80,18 +80,49 @@ sub os_ver {
return $descr;
}
sub _get_snmpid_chassis {
my $self = shift;
my $snmpid_chassis;
my $position;
my $entity_entry = $self->e_class;
for ( keys %$entity_entry ) {
# filter by class, chassis is 3
if ( $entity_entry->{$_} == 3 ) {
print " SNMP::Info::Layer3::Nexus::_get_snmpid_chassis() - ",
"chassis with id $_ found, position ",
$self->snmpinfo->e_pos->{$_}
if $self->debug();
# and if it's the topmost one
if ( !defined $position
|| $self->e_pos->{$_} < $position ) {
$snmpid_chassis = $_;
$position = $self->e_pos->{$_};
}
}
}
if ( defined $snmpid_chassis && defined $position ) {
print " SNMP::Info::Layer3::Nexus::_get_snmpid_chassis() - ",
"chassis with id $snmpid_chassis, position $position selected";
}
else {
print " SNMP::Info::Layer3::Nexus::_get_snmpid_chassis() - ",
"no chassis found";
}
return $snmpid_chassis;
}
sub serial {
my $nexus = shift;
my $e_parent = $nexus->e_parent();
my $snmpid_chassis = $nexus->_get_snmpid_chassis;
return $nexus->e_serial($snmpid_chassis)->{$snmpid_chassis}
if defined $snmpid_chassis;
foreach my $iid ( keys %$e_parent ) {
my $parent = $e_parent->{$iid};
if ( $parent eq '0' ) {
my $serial = $nexus->e_serial($iid);
return $serial->{$iid};
}
}
return;
}