135/netdisco
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

fix undefined key in Discover

Browse Source
This commit is contained in:
Oliver Gorwits
2014-05-22 16:52:20 +01:00
parent 123c48a576
commit 2d180b1f16
2 changed files with 3 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

1
Netdisco/Changes
View File

@@ -3,6 +3,7 @@
[BUG FIXES] [BUG FIXES]
* Unrouted VLAN interfaces have numbers on Cisco - ignore them * Unrouted VLAN interfaces have numbers on Cisco - ignore them
* fix undefined key in Discover
2.027005_001 - 2014-05-21 2.027005_001 - 2014-05-21

4
Netdisco/lib/App/Netdisco/Core/Discover.pm
View File

@@ -652,13 +652,13 @@ sub store_neighbors {
my $c_cap = $snmp->c_cap; my $c_cap = $snmp->c_cap;
foreach my $entry (List::MoreUtils::uniq( (keys %$c_ip), (keys %$c_cap) )) { foreach my $entry (List::MoreUtils::uniq( (keys %$c_ip), (keys %$c_cap) )) {
my $port = $interfaces->{ $c_if->{$entry} }; if (!defined $c_if->{$entry} or !defined $interfaces->{ $c_if->{$entry} }) {
if (!defined $port) {
debug sprintf ' [%s] neigh - port for IID:%s not resolved, skipping', debug sprintf ' [%s] neigh - port for IID:%s not resolved, skipping',
$device->ip, $entry; $device->ip, $entry;
next; next;
} }
my $port = $interfaces->{ $c_if->{$entry} };
my $portrow = schema('netdisco')->resultset('DevicePort') my $portrow = schema('netdisco')->resultset('DevicePort')
->single({ip => $device->ip, port => $port}); ->single({ip => $device->ip, port => $port});