Refactored ACL support with multi-object compare
Squashed commit of the following:
commit 4081e22202693bd7c4ea00e95daad8e628c6fd5a
Author: Oliver Gorwits <oliver@cpan.org>
Date: Mon May 29 21:02:07 2023 +0100
large rename of check_acl* to acl_matches*
commit 3cfa284ddd24d68765c255578cc5c184afbdcd83
Author: Oliver Gorwits <oliver@cpan.org>
Date: Fri May 19 20:39:03 2023 +0100
update permission doc
commit 8c7bb93cc5e9fafb770f98f446e45cbd94b14894
Author: Oliver Gorwits <oliver@cpan.org>
Date: Wed May 17 21:50:07 2023 +0100
migrate most check_acl_only to acl_matches_only
commit c47f699f2a22f08f2f3e093ed0f24c891e6f9a82
Author: Oliver Gorwits <oliver@cpan.org>
Date: Wed May 17 21:39:19 2023 +0100
rename check_acl* to be acl_matches*
commit a884a22c3ab1f3262118c3a47ed8e25b0b0a7336
Author: Oliver Gorwits <oliver@cpan.org>
Date: Sun May 14 16:50:42 2023 +0100
update macsuck_no_deviceports to use acl_matches
commit 8c256af728721329b64d071fa529dfc844073ac6
Author: Oliver Gorwits <oliver@cpan.org>
Date: Sun May 7 22:54:33 2023 +0100
update hide_deviceports to use acl_matches multi @things
commit cd5d9978aba1da459be4fed4500f395df13f7784
Author: Oliver Gorwits <oliver@cpan.org>
Date: Sun May 7 22:53:38 2023 +0100
check_acl fix to allow all @things to offer a property before fallback to missing as empty string
commit 1a3ab9a7646e9f994f03126d45fc36e9e5a13ed5
Author: Oliver Gorwits <oliver@cpan.org>
Date: Tue May 2 15:31:17 2023 +0100
add ignore_deviceports to portproperties discover; improve comments
commit 51385ce89458dc939587dae902fda431719c22c9
Merge: b97c07d2 3f8ffe78
Author: Oliver Gorwits <oliver@cpan.org>
Date: Tue May 2 15:21:48 2023 +0100
Merge branch 'master' into og-acl_multidict
commit b97c07d237d750c1d9eb3095d8ff3908512eac2a
Author: Oliver Gorwits <oliver@cpan.org>
Date: Sat Mar 25 14:37:53 2023 +0000
add support for arrayref of items, and unblessed hash, to check_acl
This commit is contained in:
@@ -2,7 +2,7 @@ package App::Netdisco::Util::Device;
|
||||
|
||||
use Dancer qw/:syntax :script/;
|
||||
use Dancer::Plugin::DBIC 'schema';
|
||||
use App::Netdisco::Util::Permission qw/check_acl_no check_acl_only/;
|
||||
use App::Netdisco::Util::Permission qw/acl_matches acl_matches_only/;
|
||||
|
||||
use File::Spec::Functions qw(catdir catfile);
|
||||
use File::Path 'make_path';
|
||||
@@ -184,10 +184,10 @@ sub is_discoverable {
|
||||
if (match_to_setting($remote_type, 'discover_no_type'));
|
||||
|
||||
return _bail_msg("is_discoverable: $device matched discover_no")
|
||||
if check_acl_no($device, 'discover_no');
|
||||
if acl_matches($device, 'discover_no');
|
||||
|
||||
return _bail_msg("is_discoverable: $device failed to match discover_only")
|
||||
unless check_acl_only($device, 'discover_only');
|
||||
unless acl_matches_only($device, 'discover_only');
|
||||
|
||||
return 1;
|
||||
}
|
||||
@@ -236,14 +236,14 @@ sub is_arpnipable {
|
||||
|
||||
return _bail_msg("is_arpnipable: $device has no layer 3 capability")
|
||||
if ($device->in_storage() and not ($device->has_layer(3)
|
||||
or check_acl_no($device, 'force_arpnip')
|
||||
or check_acl_no($device, 'ignore_layers')));
|
||||
or acl_matches($device, 'force_arpnip')
|
||||
or acl_matches($device, 'ignore_layers')));
|
||||
|
||||
return _bail_msg("is_arpnipable: $device matched arpnip_no")
|
||||
if check_acl_no($device, 'arpnip_no');
|
||||
if acl_matches($device, 'arpnip_no');
|
||||
|
||||
return _bail_msg("is_arpnipable: $device failed to match arpnip_only")
|
||||
unless check_acl_only($device, 'arpnip_only');
|
||||
unless acl_matches_only($device, 'arpnip_only');
|
||||
|
||||
return 1;
|
||||
}
|
||||
@@ -292,17 +292,17 @@ sub is_macsuckable {
|
||||
|
||||
return _bail_msg("is_macsuckable: $device has no layer 2 capability")
|
||||
if ($device->in_storage() and not ($device->has_layer(2)
|
||||
or check_acl_no($device, 'force_macsuck')
|
||||
or check_acl_no($device, 'ignore_layers')));
|
||||
or acl_matches($device, 'force_macsuck')
|
||||
or acl_matches($device, 'ignore_layers')));
|
||||
|
||||
return _bail_msg("is_macsuckable: $device matched macsuck_no")
|
||||
if check_acl_no($device, 'macsuck_no');
|
||||
if acl_matches($device, 'macsuck_no');
|
||||
|
||||
return _bail_msg("is_macsuckable: $device matched macsuck_unsupported")
|
||||
if check_acl_no($device, 'macsuck_unsupported');
|
||||
if acl_matches($device, 'macsuck_unsupported');
|
||||
|
||||
return _bail_msg("is_macsuckable: $device failed to match macsuck_only")
|
||||
unless check_acl_only($device, 'macsuck_only');
|
||||
unless acl_matches_only($device, 'macsuck_only');
|
||||
|
||||
return 1;
|
||||
}
|
||||
|
||||
Reference in New Issue
Block a user