Re: need help with perl-ldap 0.24 on NT over Cygwin

[Chris R. <chr...@me...>]

"Marshall.Andrew" <Mar...@ca...> wrote:
> When I make the change that Graham suggested, I see:
> <error msg>
> Error LDAP_OPERATIONS_ERROR:I/O Error Resource temporarily unavailable  at
> test1.pl line 11.
> </error msg>
> which, I'm afraid, doesn't help me much :-).
> Any suggestions?
> Thanks,
> adm
> 
> 
> 
> 
>      Graham Barr <gb...@po...>
>      01/08/01 09:27 AM
> 
>            To: Andrew Marshall/CTF@CTINTERNAL
>            cc: perl-ldap-dev<per...@li...>@INTERNET
>            Subject: Re: need help with perl-ldap 0.24 on NT over Cygwin
> 
> Well it would seem that there is a problem reading the packet which
> should be the response to the bind. Try changing line 11 to be
> 
>  die "Error ",ldap_error_name($mesg->code),": $@" if $mesg->code;
> 
> And see what you get.
> 
> Graham.
> 
> On Wed, Aug 01, 2001 at 09:01:37AM -0400, Marshall.Andrew wrote:
>> Howdy.  I am trying to use perl-ldap 0.24 to connect to a
>> Netscape Directory server running on a different system
>> and I can't get it to work.
>> When I run this script:
>> 
>> <script>
>> #!/usr/bin/perl
>> 
>> use Net::LDAP qw(:all);
>> use Net::LDAP::Util qw(ldap_error_text
>>                          ldap_error_name
>>                          ldap_error_desc
>>                         );
>> $ldap = Net::LDAP->new("172.16.17.150", debug => 12) or die "$@";
>> print STDERR "before bind.";
>> $mesg = $ldap->bind();
>> die "Error ",ldap_error_name($mesg->code) if $mesg->code;
>> print STDERR "bind okay.";
>> $mesg = $ldap->search (
>>                base   => "ou=People,o=Canada Trust,c=ca",
>>                         filter => "(uid=Marshall.Andrew)"
>>                 );
>> die "Error ",ldap_error_name($mesg->code) if $mesg->code;
>> $mesg->code && die $mesg->error;
>> $ldap->unbind;
>> </script>
>> 
>> Here's what I see:
>> <script log>
>> $ perl test1.pl
>> before bind.Net::LDAP=HASH(0xa011250) sending:
>> 0000 30   12: SEQUENCE {
>> 0002 02    1:   INTEGER = 1
>> 0005 60    7:   [APPLICATION 0] {
>> 0007 02    1:     INTEGER = 2
>> 000A 04    0:     STRING = ''
>> 000C 80    0:     [CONTEXT 0]
>> 000E        :   }
>> 000E        : }
>> Error LDAP_OPERATIONS_ERROR at test1.pl line 11.
>> </script log>
>> 
>> I can connect to the directory server just fine using Netscape's
>> ldapsearch tool.
>> I am running the Cygwin Unix tools on top of Windows NT 4.
>> The version of Perl I'm using is the latest one pointed to from
>> www.cygwin.com.  Here's what Perl tells me about itself:
>> 
>> <perl -V>
>> Summary of my perl5 (revision 5.0 version 6 subversion 1) configuration:
>>   Platform:
>>     osname=cygwin, osvers=1.1.6(0.3032), archname=cygwin
>>     uname='cygwin_nt-5.0 fifer 1.1.6(0.3032) 2000-11-21 21:00 i686
>>     unknown ' config_args='-de'
>>     hint=recommended, useposix=true, d_sigaction=define
>>     usethreads=undef use5005threads=undef useithreads=undef
>> usemultiplicity=undef
>>     useperlio=undef d_sfio=undef uselargefiles=define usesocks=undef
>>     use64bitint=undef use64bitall=undef uselongdouble=undef
>>   Compiler:
>>     cc='gcc', ccflags ='-DPERL_USE_SAFE_PUTENV -DHAS_SBRK_PROTO
>> -fno-strict-aliasing',
>>     optimize='-O2',
>>     cppflags='-DPERL_USE_SAFE_PUTENV -DHAS_SBRK_PROTO
>>     -fno-strict-aliasing' ccversion='', gccversion='2.95.2-5 19991024
>>     (cygwin experimental)', gccosandvers=''
>>     intsize=4, longsize=4, ptrsize=4, doublesize=8, byteorder=1234
>>     d_longlong=define, longlongsize=8, d_longdbl=define, longdblsize=12
>>     ivtype='long', ivsize=4, nvtype='double', nvsize=8, Off_t='off_t',
>> lseeksize=4
>>     alignbytes=8, usemymalloc=y, prototype=define
>>   Linker and Libraries:
>>     ld='ld2', ldflags =' -s -L/usr/local/lib'
>>     libpth=/usr/local/lib /usr/lib /lib
>>     libs=-lgdbm -lcrypt
>>     perllibs=-lcrypt
>>     libc=/usr/lib/libc.a, so=dll, useshrplib=true, libperl=libperl5_6_1.a
>>   Dynamic Linking:
>>     dlsrc=dl_dlopen.xs, dlext=dll, d_dlsymun=undef, ccdlflags=' -s'
>>     cccdlflags=' ', lddlflags=' -s -L/usr/local/lib'
>> 
>> 
>> Characteristics of this binary (from libperl):
>>   Compile-time options: USE_LARGE_FILES
>>   Locally applied patches:
>>      v5.6.1-TRIAL1
>>   Built under cygwin
>>   Compiled at Dec 21 2000 21:39:40
>>   @INC:
>>     /usr/lib/perl5/5.6.1/cygwin
>>     /usr/lib/perl5/5.6.1
>>     /usr/lib/perl5/site_perl/5.6.1/cygwin
>>     /usr/lib/perl5/site_perl/5.6.1
>>     /usr/lib/perl5/site_perl
>>     .
>> </perl -V>
>> 
>> I suspect I should be using a different Perl implementation or there's
>> something wrong with how I installed it (please be kind, I'm a Perl
>> novice). Any suggestions?
>> 
>> Thanks,
>> adm
>> 
>> Andrew D. Marshall
>> 
> 
> 
> 

Hasn't this kind of problem been seen before using NT versions of perl? I
don't remember the exact problem, but I'm sure threads were involved.

Cheers,

Chris