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

clean up check_mac() interface (ml-cms)

Browse Source
This commit is contained in:
Oliver Gorwits
2018-04-18 19:23:43 +01:00
parent e0d75c3cba
commit 2caae8a642
7 changed files with 20 additions and 13 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
lib/App/Netdisco/Util/Nbtstat.pm
View File

@@ -116,7 +116,7 @@ sub _filter_nbname {
my $mac = $node_status->{'mac_address'} || '';
unless ( check_mac( $ip, $mac ) ) {
unless ( check_mac( $mac, $ip ) ) {
# Just assume it's the last MAC we saw this IP at.
my $node_ip = schema('netdisco')->resultset('NodeIp')

15
lib/App/Netdisco/Util/Node.pm
View File

@@ -28,11 +28,10 @@ subroutines.
=head1 EXPORT_OK
=head2 check_mac( $device, $node, $port_macs? )
=head2 check_mac( $node, $device?, $port_macs? )
Given a Device database object and a MAC address, perform various sanity
checks which need to be done before writing an ARP/Neighbor entry to the
database storage.
Given a MAC address, perform various sanity checks which need to be done
before writing an ARP/Neighbor entry to the database storage.
Returns false, and might log a debug level message, if the checks fail.
@@ -50,6 +49,8 @@ MAC address is not all-zero, broadcast, CLIP, VRRP or HSRP
=back
Optionally pass a Device instance or IP to use in logging.
Optionally pass a cached set of Device port MAC addresses as the third
argument, in which case an additional check is added:
@@ -64,11 +65,11 @@ MAC address does not belong to an interface on any known Device
=cut
sub check_mac {
my ($device, $node, $port_macs) = @_;
return 0 if !$device or !$node;
my ($node, $port_macs, $device) = @_;
return 0 if !$node;
my $mac = NetAddr::MAC->new(mac => $node);
my $devip = (ref $device ? $device->ip : '');
my $devip = ($device ? (ref $device ? $device->ip : $device) : '');
$port_macs ||= {};
# incomplete MAC addresses (BayRS frame relay DLCI, etc)