proxmox-mirrors/pve-common
1
0
Fork 0
mirror of https://git.proxmox.com/git/pve-common synced 2025-08-07 14:19:13 +00:00
Code Issues Actions Packages Projects Releases Wiki Activity

add additional methods for IP address verification

Browse Source
This commit is contained in:
Dietmar Maurer 2015-04-23 08:19:03 +02:00
parent c70c3bbc83
commit ed5880acdc
1 changed files with 25 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

28
src/PVE/JSONSchema.pm
View File

@ -147,13 +147,35 @@ register_format('ipv4', \&pve_verify_ipv4);
sub pve_verify_ipv4 { sub pve_verify_ipv4 {
my ($ipv4, $noerr) = @_; my ($ipv4, $noerr) = @_;
if (!Net::IP::ip_is_ipv4($ipv4)) { if ($ipv4 !~ m/^(?:$IPV4RE)$/) {
return undef if $noerr; return undef if $noerr;
die "value does not look like a valid IP address\n"; die "value does not look like a valid IPv4 address\n";
} }
return $ipv4; return $ipv4;
} }
register_format('ipv6', \&pve_verify_ipv6);
sub pve_verify_ipv4 {
my ($ipv6, $noerr) = @_;
if ($ipv6 !~ m/^(?:$IPV6RE)$/) {
return undef if $noerr;
die "value does not look like a valid IPv6 address\n";
}
return $ipv6;
}
register_format('ip', \&pve_verify_ip);
sub pve_verify_ip {
my ($ip, $noerr) = @_;
if ($ip !~ m/^(?:(?:$IPV4RE)|(?:$IPV6RE))$/) {
return undef if $noerr;
die "value does not look like a valid IP address\n";
}
return $ip;
}
my $ipv4_mask_hash = { my $ipv4_mask_hash = {
'128.0.0.0' => 1, '128.0.0.0' => 1,
'192.0.0.0' => 2, '192.0.0.0' => 2,