diff options
| -rw-r--r-- | src/PVE/Network/SDN/SubnetPlugin.pm | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/src/PVE/Network/SDN/SubnetPlugin.pm b/src/PVE/Network/SDN/SubnetPlugin.pm index 107e2f7..81adc88 100644 --- a/src/PVE/Network/SDN/SubnetPlugin.pm +++ b/src/PVE/Network/SDN/SubnetPlugin.pm @@ -88,9 +88,13 @@ sub validate_dhcp_ranges { my $start_ip = Net::IP->new($dhcp_start); raise_param_exc({ 'dhcp-range' => "start-address is not a valid IP $dhcp_start" }) if !$start_ip; + raise_param_exc({ 'dhcp-range' => "start-address must be a singular IP" }) if $start_ip->size() != 1; + $dhcp_range->{'start-address'} = $start_ip->ip(); my $end_ip = Net::IP->new($dhcp_end); raise_param_exc({ 'dhcp-range' => "end-address is not a valid IP $dhcp_end" }) if !$end_ip; + raise_param_exc({ 'dhcp-range' => "end-address must be a singular IP" }) if $end_ip->size() != 1; + $dhcp_range->{'end-address'} = $end_ip->ip(); if ($start_ip->bincomp('gt', $end_ip)) { raise_param_exc({ 'dhcp-range' => "start-address $dhcp_start must be smaller than end-address $dhcp_end" }) |