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.74 2005/03/10 19:10:55 mast Exp $ + // $Id: client.pike,v 1.75 2005/03/10 19:23:02 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:107:    string ldap_basedn = ""; // baseDN    int ldap_scope = 0; // 0: base, 1: onelevel, 2: subtree    int ldap_deref = 0; // 0: ...    int ldap_sizelimit = 0;    int ldap_timelimit = 0;    mapping lauth = ([]);    object last_rv = 0; // last returned value    }      static function(string:string) get_attr_decoder (string attr, - #ifdef DEBUG -  void|int nowarn - #endif -  ) +  DO_IF_DEBUG (void|int nowarn))   {    if (mapping(string:mixed) attr_descr = get_attr_type_descr (attr)) {    if (function(string:string) decoder =    Protocols.LDAP.syntax_decode_fns[attr_descr->syntax_oid])    return decoder;   #ifdef DEBUG    else if (!Protocols.LDAP.get_constant_name (attr_descr->syntax_oid))    werror ("Warning: Unknown syntax %O for attribute %O - "    "binary content assumed.\n", attr_descr->syntax_oid, attr);   #endif
pike.git/lib/modules/Protocols.pmod/LDAP.pmod/client.pike:450: Inside #if undefined(PARSE_RFCS)
   //! 2255.    //!    //! @param context    //! TLS context of connection    //!    //! @seealso    //! @[LDAP.client.bind], @[LDAP.client.search]    void create(string|void url, object|void context)    {    -  info = ([ "code_revision" : ("$Revision: 1.74 $"/" ")[1] ]); +  info = ([ "code_revision" : ("$Revision: 1.75 $"/" ")[1] ]);       if(!url || !sizeof(url))    url = LDAP_DEFAULT_URL;       lauth = parse_url(url);       if(!stringp(lauth->scheme) ||    ((lauth->scheme != "ldap")   #if constant(SSL.Cipher.CipherAlgorithm)    && (lauth->scheme != "ldaps")
pike.git/lib/modules/Protocols.pmod/LDAP.pmod/client.pike:990:    "supportedLDAPVersion",    // Also get any user attributes the server wishes to pass.    "*"    }));       foreach (indices (root_dse), string attr)    // Microsoft AD has several attributes in its root DSE that    // they haven't bothered to include in their schema. Send    // the nowarn flag to get_attr_encoder to avoid complaints    // about that. -  if (function(string:string) decoder = get_attr_decoder (attr, - #ifdef DEBUG -  1 - #endif -  )) +  if (function(string:string) decoder = +  get_attr_decoder (attr, DO_IF_DEBUG (1)))    root_dse[attr] = map (root_dse[attr], decoder);    });    }       return root_dse;   }      static object make_control (string control_type, void|string value,    void|int critical)   {