Re: Authen::SASL 2.13 infinite loop bug (resend?)

On Sat, Feb 13, 2010 at 9:35 AM, Forrest Cahoon
<[email protected]> wrote:
> On Fri, Feb 12, 2010 at 6:08 PM, Graham Barr <[email protected]> wrote:
>
>> In Net/LDAP.pm the bind sub we have
>>
>>    $passwd = {
>>      mechanism   => $sasl_conn->mechanism,
>>      credentials => (length($initial) ? $initial : undef)
>>    };
>>
>> what happens if you change that to be just  credentials => $initial,
>
> Here we go:
>
> Net::LDAP=HASH(0xc04818) sending:
>
> 30 2C 02 01 01 60 27 02 01 03 04 14 73 6E 3D 6D 0,...`'.....sn=m
> 73 69 53 63 72 69 70 74 73 2C 64 63 3D 44 54 43 siScripts,dc=DTC
> A3 0C 04 08 45 58 54 45 52 4E 41 4C 04 00 __ __ ....EXTERNAL..
>
> 0000   44: SEQUENCE {
> 0002    1:   INTEGER = 1
> 0005   39:   [APPLICATION 0] {
> 0007    1:     INTEGER = 3
> 000A   20:     STRING = 'sn=msiScripts,dc=DTC'
> 0020   12:     [CONTEXT 3] {
> 0022    8:       STRING = 'EXTERNAL'
> 002C    0:       STRING = ''
> 002E     :     }
> 002E     :   }
> 002E     : }
> Net::LDAP=HASH(0xc04818) received:
>
> 30 0C 02 01 01 61 07 0A 01 00 04 00 04 00 __ __ 0....a........
>
> 0000   12: SEQUENCE {
> 0002    1:   INTEGER = 1
> 0005    7:   [APPLICATION 1] {
> 0007    1:     ENUM = 0
> 000A    0:     STRING = ''
> 000C    0:     STRING = ''
> 000E     :   }
> 000E     : }
> success!
>
>> Graham
>
> Forrest
>

Just checking up ... did you ever make any changes based on this issue?

Forrest