Proxmox/pve-common
5
0
Fork 0
mirror of git://git.proxmox.com/git/pve-common.git synced 2025-01-25 18:03:33 +03:00
Code Releases Activity

Modified IPv4 validation function, included Net::IP

Browse Source 
Signed-off-by: Damien PIQUET <piqudam@gmail.com>
This commit is contained in:
Damien PIQUET 2013-02-23 12:21:09 +01:00 committed by Dietmar Maurer
parent a13c6f08a3
commit 23b5624575
1 changed files with 3 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
data/PVE/JSONSchema.pm
View File

@ -8,6 +8,7 @@ use Devel::Cycle -quiet; # todo: remove?
use PVE::Tools qw(split_list);
use PVE::Exception qw(raise);
use HTTP::Status qw(:constants);
use Net::IP qw(:PROC);
use base 'Exporter';
@ -140,11 +141,8 @@ register_format('ipv4', \&pve_verify_ipv4);
sub pve_verify_ipv4 {
my ($ipv4, $noerr) = @_;
if ($ipv4 !~ m/^(\d{1,3})\.(\d{1,3})\.(\d{1,3})\.(\d{1,3})$/ ||
!(($1 > 0) && ($1 < 255) &&
($2 <= 255) && ($3 <= 255) &&
($4 > 0) && ($4 < 255))) {
return undef if $noerr;
if (!Net::IP::ip_is_ipv4($ipv4)) {
return undef if $noerr;
die "value does not look like a valid IP address\n";
}
return $ipv4;