pike.git / lib / modules / Protocols.pmod / LDAP.pmod / client.pike

version» Context lines:

pike.git/lib/modules/Protocols.pmod/LDAP.pmod/client.pike:1:   #pike __REAL_VERSION__      // LDAP client protocol implementation for Pike.   // - // $Id: client.pike,v 1.107 2007/05/23 14:54:23 mast Exp $ + // $Id: client.pike,v 1.108 2007/10/08 15:59:04 mast Exp $   //   // Honza Petrous, hop@unibase.cz   //   // ----------------------------------------------------------------------   //   // History:   //   // v0.0 1998-05-25 Starting up!   // v1.0 1998-06-21 Core functions (open, bind, unbind, delete, add,   // compare, search), only V2 operations,
pike.git/lib/modules/Protocols.pmod/LDAP.pmod/client.pike:366:    }    DWRITE(sprintf("result.create: rawres=%O\n",rawres[lastel]));       // The last element of 'rawres' is result itself    resultcode = ASN1_DECODE_RESULTCODE(rawres[lastel]);    DWRITE(sprintf("result.create: code=%d\n",resultcode));    resultstring = ASN1_DECODE_RESULTSTRING(rawres[lastel]);    if (resultstring == "")    resultstring = 0;    else if (ldap_version >= 3) -  resultstring = utf8_to_string (resultstring); +  if (mixed err = catch (resultstring = utf8_to_string (resultstring))) +  DWRITE (sprintf ("Failed to decode result string %O: %s", +  resultstring, describe_error (err)));    DWRITE(sprintf("result.create: str=%O\n",resultstring));   #ifdef V3_REFERRALS    // referral (v3 mode)    if(resultcode == 10) {    referrals = ({});    foreach(ASN1_DECODE_RESULTREFS(rawres[lastel]), object ref1)    referrals += ({ ref1->value });    DWRITE(sprintf("result.create: refs=%O\n",referrals));    }   #endif
pike.git/lib/modules/Protocols.pmod/LDAP.pmod/client.pike:652: Inside #if undefined(PARSE_RFCS)
   //! @[Protocol.LDAP.parse_ldap_url].    //!    //! @param context    //! TLS context of connection    //!    //! @seealso    //! @[LDAP.client.bind], @[LDAP.client.search]    void create(string|mapping(string:mixed)|void url, object|void context)    {    -  info = ([ "code_revision" : ("$Revision: 1.107 $"/" ")[1] ]); +  info = ([ "code_revision" : ("$Revision: 1.108 $"/" ")[1] ]);       if(!url || !sizeof(url))    url = LDAP_DEFAULT_URL;       if (mappingp (url))    lauth = url;    else    lauth = parse_ldap_url(url);       if(!stringp(lauth->scheme) ||