michael/webmin
1
0
Fork 0
mirror of https://github.com/webmin/webmin.git synced 2026-03-11 05:12:03 +00:00
Code Issues Actions 1 Packages Projects Releases Wiki Activity

Add check for non public IP API

Browse Source
This commit is contained in:
Ilia Ross
2026-03-10 13:49:03 +02:00
parent c0900ffaf8
commit b8481cc1e5
2 changed files with 29 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
WebminCore.pm
View File

File diff suppressed because one or more lines are too long

28
web-lib-funcs.pl
View File

@@ -726,7 +726,35 @@ return 0 if ($empty > 1 && !($_[0] =~ /^::/ && $empty == 2));
return 1;
}
=head2 is_non_public_ipaddress(ip)
Returns 1 if an IP is non-public (private, local, link-local, reserved,
multicast), otherwise 0.
=cut
sub is_non_public_ipaddress
{
my ($ip) = @_;
if (&check_ipaddress($ip)) {
my @o = split(/\./, $ip);
return 1 if ($o[0] == 0 || $o[0] == 10 || $o[0] == 127);
return 1 if ($o[0] == 169 && $o[1] == 254);
return 1 if ($o[0] == 172 && $o[1] >= 16 && $o[1] <= 31);
return 1 if ($o[0] == 192 && $o[1] == 168);
return 1 if ($o[0] == 100 && $o[1] >= 64 && $o[1] <= 127);
return 1 if ($o[0] >= 224);
}
elsif (&check_ip6address($ip)) {
my $l = lc($ip);
return 1 if ($l eq "::1" || $l eq "::");
return 1 if ($l =~ /^fe[89ab]/);
return 1 if ($l =~ /^f[cd]/);
if ($l =~ /^::ffff:(\d+\.\d+\.\d+\.\d+)$/) {
return &is_non_public_ipaddress($1);
}
}
return 0;
}
=head2 generate_icon(image, title, link, [href], [width], [height], [before-title], [after-title])