Now, I can use SASL/GSSAPI encryption to search AD successfully, though this may
not be a fine resolution.
I'm a tyro of PERL, and I'm not very familiar with PERL MODULE, so I can't explain the problems
and resolve it really. I'll decribe my modifications and hope someone can't explain it and resolve it;
In Net::LDAP::Bind::decode, use $sasl->tiesocket replace $sasl->securesocket, then the connection
will not be closed when BIND completed.
But after BIND success, the Net::LDAP module will complain the socket handle ($ldap->socket)
not a GLOB reference when it try to write data to the socket. finally, I find I can use $socket->{fh}.
But the new problem appear.
All the func call in Authen::SASL::Cyrus::Security will recur infinitely and the stack will overflow finally.
I have to use IO::Socket's send and recv funcs replace print and sysread call in READ and WRITE funcs
in Authen::SASL::Cyrus::Security .
I hope someone can upgade the Cyrus or LDAP modules to resolve this problems?
I have been having a discussion off list with someone about this very problem. Attached is a patch they came up with for Authen::SASL::GSSAPI. You will also need to fetch perl-ldap-0.30 which was uploaded yesterday
Graham.
Authen-SASL-Cyrus-0.07.patch
Description: application/text
