D
Durairaj Avasi
the following is a simple script with tries to bind on a Active
Directory.
This is my program
use Net::LDAP qw(LDAP_SUCCESS LDAP_PROTOCOL_ERROR);
use Authen::SASL;
use Net::LDAP::Util qw(ldap_error_name ldap_error_text);
sub lConnect {
my $server = shift;
print " the server name is $server\n";
my $ldap = Net::LDAP->new($server, port=> 389, version => 3);
print "=== The error is $@ <====\n";
return($ldap);
}
my $ldap = &lConnect('111.11.11.1');
my $sasl = Authen::SASL->new(mechanism => 'DIGEST-MD5', password
=>'xyzabc');
my $isBinded = $ldap->bind ('cn=durairaj
avasi,ou=itdev,dc=cow,dc=net', sasl => $sasl, version => 3);#
print "ERROR detected: -> ", ldap_error_name($isBinded->code), " ",
ldap_error_text($isBinded->code);
the above program returns the following::
ERROR detected: -> LDAP_INVALID_CREDENTIALS The wrong password was
supplied or the SASL credentials could not be processed
if do a normal bind like
$ldab->bind($mydn, password=>$password, version => 3);
( NOTE without SASL )
i am getting the following error
ERROR detected: -> LDAP_STRONG_AUTH_REQUIRED The server requires
authentication
be performed with a SASL mechanism
Tested with windows 2000 and windows xp getting the same error msg.
I have installed 8xx-builds on Windows 2000 and windows xp and tested
on both ... i am facing same issue with both the application.
what i am doing wrong here.... some say that i should install
perl-cyrus-sasl-0.02... but i am unable to find that module for 8xx
environment
Directory.
This is my program
use Net::LDAP qw(LDAP_SUCCESS LDAP_PROTOCOL_ERROR);
use Authen::SASL;
use Net::LDAP::Util qw(ldap_error_name ldap_error_text);
sub lConnect {
my $server = shift;
print " the server name is $server\n";
my $ldap = Net::LDAP->new($server, port=> 389, version => 3);
print "=== The error is $@ <====\n";
return($ldap);
}
my $ldap = &lConnect('111.11.11.1');
my $sasl = Authen::SASL->new(mechanism => 'DIGEST-MD5', password
=>'xyzabc');
my $isBinded = $ldap->bind ('cn=durairaj
avasi,ou=itdev,dc=cow,dc=net', sasl => $sasl, version => 3);#
print "ERROR detected: -> ", ldap_error_name($isBinded->code), " ",
ldap_error_text($isBinded->code);
the above program returns the following::
ERROR detected: -> LDAP_INVALID_CREDENTIALS The wrong password was
supplied or the SASL credentials could not be processed
if do a normal bind like
$ldab->bind($mydn, password=>$password, version => 3);
( NOTE without SASL )
i am getting the following error
ERROR detected: -> LDAP_STRONG_AUTH_REQUIRED The server requires
authentication
be performed with a SASL mechanism
Tested with windows 2000 and windows xp getting the same error msg.
I have installed 8xx-builds on Windows 2000 and windows xp and tested
on both ... i am facing same issue with both the application.
what i am doing wrong here.... some say that i should install
perl-cyrus-sasl-0.02... but i am unable to find that module for 8xx
environment