From 8d1fb71c763f34f3c7ab3e0fc1f04775dd5f7fcc Mon Sep 17 00:00:00 2001
From: "Eric A. Miller" <jeneric@users.noreply.github.com>
Date: Thu, 19 Apr 2018 00:16:56 -0400
Subject: [PATCH] =?UTF-8?q?#401=C2=A0Autodiscovery=20via=20EIGRP=20peers?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

---
 Changes                                             |  6 ++++++
 .../Worker/Plugin/Discover/Neighbors/Routed.pm      | 13 ++++++++-----
 2 files changed, 14 insertions(+), 5 deletions(-)

diff --git a/Changes b/Changes
index a4f83340..6e1cf030 100644
--- a/Changes
+++ b/Changes
@@ -1,3 +1,9 @@
+2.039022
+
+  [NEW FEATURES]
+
+  * #401 Autodiscovery via EIGRP peers
+
 2.039022 - 2018-04-18
 
   [BUG FIXES]
diff --git a/lib/App/Netdisco/Worker/Plugin/Discover/Neighbors/Routed.pm b/lib/App/Netdisco/Worker/Plugin/Discover/Neighbors/Routed.pm
index 26aa71cd..2b6a24be 100644
--- a/lib/App/Netdisco/Worker/Plugin/Discover/Neighbors/Routed.pm
+++ b/lib/App/Netdisco/Worker/Plugin/Discover/Neighbors/Routed.pm
@@ -16,14 +16,17 @@ register_worker({ phase => 'main', driver => 'snmp' }, sub {
   my $snmp = App::Netdisco::Transport::SNMP->reader_for($device)
     or return Status->defer("discover failed: could not SNMP connect to $device");
 
-  my $ospf_peers = $snmp->ospf_peers || {};
-  my $bgp_peers  = $snmp->bgp_peer_addr || {};
+  my $ospf_peers  = $snmp->ospf_peers || {};
+  my $bgp_peers   = $snmp->bgp_peer_addr || {};
+  my $eigrp_peers = $snmp->eigrp_peers || {};
 
-  return Status->info(" [$device] neigh - no BGP or OSPF peers")
-    unless ((scalar values %$ospf_peers) or (scalar values %$bgp_peers));
+  return Status->info(" [$device] neigh - no BGP, OSPF, or EIGRP peers")
+    unless ((scalar values %$ospf_peers) or (scalar values %$bgp_peers)
+            or (scalar values %$eigrp_peers));
 
   my $count = 0;
-  foreach my $ip ((values %$ospf_peers), (values %$bgp_peers)) {
+  foreach my $ip ((values %$ospf_peers), (values %$bgp_peers),
+                  (values %$eigrp_peers)) {
     my $peer = get_device($ip);
     next if $peer->in_storage or not is_discoverable($peer);
     next if vars->{'queued'}->{$ip};