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

release 2.046004

Browse Source
This commit is contained in:
Oliver Gorwits
2020-10-17 14:28:53 +01:00
parent 64d65c72ee
commit 2b72233738
15 changed files with 25 additions and 19 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
Changes
View File

@@ -1,3 +1,9 @@
2.046004 - 2020-10-17
[ENHANCEMENTS]
* #748 even safer calls to NetAddr::MAC->new()
2.046003 - 2020-10-17
[NEW FEATURES]

4
META.json
View File

@@ -128,7 +128,7 @@
"provides" : {
"App::Netdisco" : {
"file" : "lib/App/Netdisco.pm",
"version" : "2.046003"
"version" : "2.046004"
},
"App::Netdisco::AnyEvent::Nbtstat" : {
"file" : "lib/App/Netdisco/AnyEvent/Nbtstat.pm"
@@ -840,6 +840,6 @@
"x_IRC" : "irc://irc.freenode.org/#netdisco",
"x_MailingList" : "https://lists.sourceforge.net/lists/listinfo/netdisco-users"
},
"version" : "2.046003",
"version" : "2.046004",
"x_serialization_backend" : "JSON::PP version 2.97001"
}

4
META.yml
View File

@@ -23,7 +23,7 @@ name: App-Netdisco
provides:
App::Netdisco:
file: lib/App/Netdisco.pm
version: '2.046003'
version: '2.046004'
App::Netdisco::AnyEvent::Nbtstat:
file: lib/App/Netdisco/AnyEvent/Nbtstat.pm
App::Netdisco::Backend::Job:
@@ -579,5 +579,5 @@ resources:
homepage: http://netdisco.org/
license: http://opensource.org/licenses/BSD-3-Clause
repository: https://github.com/netdisco/netdisco
version: '2.046003'
version: '2.046004'
x_serialization_backend: 'CPAN::Meta::YAML version 0.018'

2
lib/App/Netdisco.pm
View File

@@ -4,7 +4,7 @@ use strict;
use warnings;
use 5.010_000;
our $VERSION = '2.046003';
our $VERSION = '2.046004';
use App::Netdisco::Configuration;
=head1 NAME

2
lib/App/Netdisco/DB/Result/DevicePort.pm
View File

@@ -418,7 +418,7 @@ Returns the C<mac> column instantiated into a L<NetAddr::MAC> object.
=cut
sub net_mac { return NetAddr::MAC->new(mac => (shift)->mac) }
sub net_mac { return NetAddr::MAC->new(mac => ((shift)->mac) || '') }
=head2 last_comment

2
lib/App/Netdisco/DB/Result/Node.pm
View File

@@ -193,6 +193,6 @@ Returns the C<mac> column instantiated into a L<NetAddr::MAC> object.
=cut
sub net_mac { return NetAddr::MAC->new(mac => (shift)->mac) }
sub net_mac { return NetAddr::MAC->new(mac => ((shift)->mac) || '') }
1;

2
lib/App/Netdisco/DB/Result/NodeIp.pm
View File

@@ -221,6 +221,6 @@ Returns the C<mac> column instantiated into a L<NetAddr::MAC> object.
=cut
sub net_mac { return NetAddr::MAC->new(mac => (shift)->mac) }
sub net_mac { return NetAddr::MAC->new(mac => ((shift)->mac) || '') }
1;

2
lib/App/Netdisco/DB/Result/NodeNbt.pm
View File

@@ -178,6 +178,6 @@ Returns the C<mac> column instantiated into a L<NetAddr::MAC> object.
=cut
sub net_mac { return NetAddr::MAC->new(mac => (shift)->mac) }
sub net_mac { return NetAddr::MAC->new(mac => ((shift)->mac) || '') }
1;

2
lib/App/Netdisco/DB/Result/NodeWireless.pm
View File

@@ -87,6 +87,6 @@ Returns the C<mac> column instantiated into a L<NetAddr::MAC> object.
=cut
sub net_mac { return NetAddr::MAC->new(mac => (shift)->mac) }
sub net_mac { return NetAddr::MAC->new(mac => ((shift)->mac) || '') }
1;

4
lib/App/Netdisco/DB/ResultSet/Device.pm
View File

@@ -288,7 +288,7 @@ sub search_by_field {
}
# get IEEE MAC format
my $mac = NetAddr::MAC->new(mac => $p->{mac});
my $mac = NetAddr::MAC->new(mac => ($p->{mac} || ''));
undef $mac if
($mac and $mac->as_ieee
and (($mac->as_ieee eq '00:00:00:00:00:00')
@@ -401,7 +401,7 @@ sub search_fuzzy {
}
# get IEEE MAC format
my $mac = NetAddr::MAC->new(mac => $q);
my $mac = NetAddr::MAC->new(mac => ($q || ''));
undef $mac if
($mac and $mac->as_ieee
and (($mac->as_ieee eq '00:00:00:00:00:00')

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

@@ -68,7 +68,7 @@ sub check_mac {
my ($node, $device, $port_macs) = @_;
return 0 if !$node;
my $mac = NetAddr::MAC->new(mac => $node);
my $mac = NetAddr::MAC->new(mac => ($node || ''));
my $devip = ($device ? (ref $device ? $device->ip : $device) : '');
$port_macs ||= {};
@@ -168,7 +168,7 @@ sub store_arp {
my ($hash_ref, $now) = @_;
$now ||= 'now()';
my $ip = $hash_ref->{'ip'};
my $mac = NetAddr::MAC->new(mac => $hash_ref->{'node'});
my $mac = NetAddr::MAC->new(mac => ($hash_ref->{'node'} || ''));
my $name = $hash_ref->{'dns'};
return if !defined $mac or $mac->errstr;

2
lib/App/Netdisco/Web/Plugin/Search/Node.pm
View File

@@ -69,7 +69,7 @@ get '/ajax/content/search/node' => require_login sub {
my $agenot = param('age_invert') || '0';
my ( $start, $end ) = param('daterange') =~ m/(\d+-\d+-\d+)/gmx;
my $mac = NetAddr::MAC->new(mac => $node);
my $mac = NetAddr::MAC->new(mac => ($node || ''));
undef $mac if
($mac and $mac->as_ieee
and (($mac->as_ieee eq '00:00:00:00:00:00')

2
lib/App/Netdisco/Web/Plugin/Search/Port.pm
View File

@@ -60,7 +60,7 @@ get '/ajax/content/search/port' => require_login sub {
}
else {
my ( $likeval, $likeclause ) = sql_match($q);
my $mac = NetAddr::MAC->new(mac => $q);
my $mac = NetAddr::MAC->new(mac => ($q || ''));
undef $mac if
($mac and $mac->as_ieee

2
lib/App/Netdisco/Web/Search.pm
View File

@@ -38,7 +38,7 @@ get '/search' => require_login sub {
else {
my $nd = $s->resultset('Device')->search_fuzzy($q);
my ($likeval, $likeclause) = sql_match($q);
my $mac = NetAddr::MAC->new(mac => $q);
my $mac = NetAddr::MAC->new(mac => ($q || ''));
undef $mac if
($mac and $mac->as_ieee

4
lib/App/Netdisco/Worker/Plugin/Discover/Neighbors.pm
View File

@@ -203,7 +203,7 @@ sub store_neighbors {
}
if (!defined $neigh) {
my $mac = NetAddr::MAC->new(mac => $remote_id);
my $mac = NetAddr::MAC->new(mac => ($remote_id || ''));
if ($mac and not $mac->errstr) {
$neigh = $devices->single({mac => $mac->as_ieee});
}
@@ -214,7 +214,7 @@ sub store_neighbors {
# "myswitchname(012345-012345)"
if (!defined $neigh) {
(my $tmpid = $remote_id) =~ s/.*\(([0-9a-f]{6})-([0-9a-f]{6})\).*/$1$2/;
my $mac = NetAddr::MAC->new(mac => $tmpid);
my $mac = NetAddr::MAC->new(mac => ($tmpid || ''));
if ($mac and not $mac->errstr) {
debug sprintf
' [%s] neigh - trying to find neighbor %s by MAC %s',