Check /etc/hosts before DNS when doing arp entry name lookup
This commit is contained in:
@@ -2,7 +2,11 @@
|
|||||||
|
|
||||||
[NEW FEATURES]
|
[NEW FEATURES]
|
||||||
|
|
||||||
*
|
* Support for Link Aggregation (port-channel, etherchannel, "trunking", etc)
|
||||||
|
|
||||||
|
[ENHANCEMENTS]
|
||||||
|
|
||||||
|
* [#82] Check /etc/hosts before DNS when doing arp entry name lookup
|
||||||
|
|
||||||
[BUG FIXES]
|
[BUG FIXES]
|
||||||
|
|
||||||
|
|||||||
@@ -22,6 +22,7 @@ no_index:
|
|||||||
requires:
|
requires:
|
||||||
Algorithm::Cron: 0.07
|
Algorithm::Cron: 0.07
|
||||||
AnyEvent: 7.05
|
AnyEvent: 7.05
|
||||||
|
AnyEvent::DNS::EtcHosts: 0
|
||||||
App::cpanminus: 1.6108
|
App::cpanminus: 1.6108
|
||||||
App::local::lib::helper: 0.07
|
App::local::lib::helper: 0.07
|
||||||
Archive::Extract: 0
|
Archive::Extract: 0
|
||||||
@@ -50,7 +51,7 @@ requires:
|
|||||||
Plack: 1.0023
|
Plack: 1.0023
|
||||||
Plack::Middleware::Expires: 0.03
|
Plack::Middleware::Expires: 0.03
|
||||||
Role::Tiny: 1.002005
|
Role::Tiny: 1.002005
|
||||||
SNMP::Info: 3.1
|
SNMP::Info: 3.11
|
||||||
SQL::Translator: 0.11016
|
SQL::Translator: 0.11016
|
||||||
Socket6: 0.23
|
Socket6: 0.23
|
||||||
Starman: 0.4008
|
Starman: 0.4008
|
||||||
|
|||||||
@@ -6,6 +6,7 @@ all_from 'lib/App/Netdisco.pm';
|
|||||||
|
|
||||||
requires 'Algorithm::Cron' => 0.07;
|
requires 'Algorithm::Cron' => 0.07;
|
||||||
requires 'AnyEvent' => 7.05;
|
requires 'AnyEvent' => 7.05;
|
||||||
|
requires 'AnyEvent::DNS::EtcHosts' => 0;
|
||||||
requires 'App::cpanminus' => 1.6108;
|
requires 'App::cpanminus' => 1.6108;
|
||||||
requires 'App::local::lib::helper' => 0.07;
|
requires 'App::local::lib::helper' => 0.07;
|
||||||
requires 'Archive::Extract' => 0;
|
requires 'Archive::Extract' => 0;
|
||||||
@@ -36,7 +37,7 @@ requires 'Plack::Middleware::Expires' => 0.03;
|
|||||||
requires 'Role::Tiny' => 1.002005;
|
requires 'Role::Tiny' => 1.002005;
|
||||||
requires 'Socket6' => 0.23;
|
requires 'Socket6' => 0.23;
|
||||||
requires 'Starman' => 0.4008;
|
requires 'Starman' => 0.4008;
|
||||||
requires 'SNMP::Info' => 3.10;
|
requires 'SNMP::Info' => 3.11;
|
||||||
requires 'SQL::Translator' => 0.11016;
|
requires 'SQL::Translator' => 0.11016;
|
||||||
requires 'Template' => 2.24;
|
requires 'Template' => 2.24;
|
||||||
requires 'Template::Plugin::CSV' => 0.04;
|
requires 'Template::Plugin::CSV' => 0.04;
|
||||||
|
|||||||
@@ -4,6 +4,7 @@ use strict;
|
|||||||
use warnings FATAL => 'all';
|
use warnings FATAL => 'all';
|
||||||
|
|
||||||
use Net::DNS;
|
use Net::DNS;
|
||||||
|
use AnyEvent::DNS::EtcHosts;
|
||||||
use AnyEvent::DNS;
|
use AnyEvent::DNS;
|
||||||
|
|
||||||
use base 'Exporter';
|
use base 'Exporter';
|
||||||
|
|||||||
@@ -91,7 +91,7 @@ sub check_acl {
|
|||||||
next unless $device->in_storage;
|
next unless $device->in_storage;
|
||||||
|
|
||||||
# lazy version of vendor: and model:
|
# lazy version of vendor: and model:
|
||||||
if ($device->can($prop) and defined $device->prop
|
if ($device->can($prop) and defined $device->$prop
|
||||||
and $device->$prop =~ m/^$match$/) {
|
and $device->$prop =~ m/^$match$/) {
|
||||||
return 1;
|
return 1;
|
||||||
}
|
}
|
||||||
|
|||||||
Reference in New Issue
Block a user