X-Git-Url: https://git.proxmox.com/?p=pve-access-control.git;a=blobdiff_plain;f=PVE%2FAuth%2FAD.pm;fp=PVE%2FAuth%2FAD.pm;h=e03d04c8b367b83ad2cc33bbdcc7767675f53154;hp=d33d3933b62adf38569bb9bfef015fc6b69edaa4;hb=8b600c4d27080bb3ebbc2bd7acaba425267f8d84;hpb=085f3e07e1eabcff7cd5db5e66e882ab23df093b diff --git a/PVE/Auth/AD.pm b/PVE/Auth/AD.pm index d33d393..e03d04c 100755 --- a/PVE/Auth/AD.pm +++ b/PVE/Auth/AD.pm @@ -4,6 +4,7 @@ use strict; use warnings; use PVE::Auth::Plugin; use Net::LDAP; +use Net::IP; use base qw(PVE::Auth::Plugin); @@ -16,14 +17,14 @@ sub properties { server1 => { description => "Server IP address (or DNS name)", type => 'string', - pattern => '[\w\d]+(.[\w\d]+)*', + format => 'address', maxLength => 256, }, server2 => { description => "Fallback Server IP address (or DNS name)", type => 'string', optional => 1, - pattern => '[\w\d]+(.[\w\d]+)*', + format => 'address', maxLength => 256, }, secure => { @@ -80,6 +81,7 @@ my $authenticate_user_ad = sub { my $default_port = $config->{secure} ? 636: 389; my $port = $config->{port} ? $config->{port} : $default_port; my $scheme = $config->{secure} ? 'ldaps' : 'ldap'; + $server = "[$server]" if Net::IP::ip_is_ipv6($server); my $conn_string = "$scheme://${server}:$port"; my $ldap = Net::LDAP->new($conn_string) || die "$@\n";