X-Git-Url: https://git.sur5r.net/?a=blobdiff_plain;f=servers%2Fslapd%2Fsasl.c;h=13088088afe0de9f69dfad6fecea924867969f29;hb=804490a8b12a94a19e7c1a8710a7d8a2fb7d5477;hp=f9a083d9d161aada218ed88092f87665285cb5ed;hpb=b057507e2337252f5524dad73b5e2c4d4c1c6f51;p=openldap diff --git a/servers/slapd/sasl.c b/servers/slapd/sasl.c index f9a083d9d1..13088088af 100644 --- a/servers/slapd/sasl.c +++ b/servers/slapd/sasl.c @@ -44,6 +44,171 @@ static sasl_security_properties_t sasl_secprops; +int slap_sasl_config( int cargc, char **cargv, char *line, + const char *fname, int lineno ) +{ + /* set SASL proxy authorization policy */ + if ( strcasecmp( cargv[0], "sasl-authz-policy" ) == 0 ) { + if ( cargc != 2 ) { +#ifdef NEW_LOGGING + LDAP_LOG(( "config", LDAP_LEVEL_CRIT, + "%s: line %d: missing policy in \"sasl-authz-policy \" line\n", + fname, lineno )); +#else + Debug( LDAP_DEBUG_ANY, + "%s: line %d: missing policy in \"sasl-authz-policy \" line\n", + fname, lineno, 0 ); +#endif + + return( 1 ); + } + if ( slap_sasl_setpolicy( cargv[1] ) ) { +#ifdef NEW_LOGGING + LDAP_LOG(( "config", LDAP_LEVEL_CRIT, + "%s: line %d: unable " + "to parse value \"%s\" " + "in \"sasl-authz-policy " + "\" line.\n", + fname, lineno, cargv[1] )); +#else + Debug( LDAP_DEBUG_ANY, + "%s: line %d: unable " + "to parse value \"%s\" " + "in \"sasl-authz-policy " + "\" line\n", + fname, lineno, cargv[1] ); +#endif + return( 1 ); + } + + + /* set SASL host */ + } else if ( strcasecmp( cargv[0], "sasl-host" ) == 0 ) { + if ( cargc < 2 ) { +#ifdef NEW_LOGGING + LDAP_LOG(( "config", LDAP_LEVEL_CRIT, + "%s: line %d: missing host in \"sasl-host \" line\n", + fname, lineno )); +#else + Debug( LDAP_DEBUG_ANY, + "%s: line %d: missing host in \"sasl-host \" line\n", + fname, lineno, 0 ); +#endif + + return( 1 ); + } + + if ( global_host != NULL ) { +#ifdef NEW_LOGGING + LDAP_LOG(( "config", LDAP_LEVEL_CRIT, + "%s: line %d: already set sasl-host!\n", + fname, lineno )); +#else + Debug( LDAP_DEBUG_ANY, + "%s: line %d: already set sasl-host!\n", + fname, lineno, 0 ); +#endif + + return 1; + + } else { + global_host = ch_strdup( cargv[1] ); + } + + /* set SASL realm */ + } else if ( strcasecmp( cargv[0], "sasl-realm" ) == 0 ) { + if ( cargc < 2 ) { +#ifdef NEW_LOGGING + LDAP_LOG(( "config", LDAP_LEVEL_CRIT, + "%s: line %d: missing realm in \"sasl-realm \" line.\n", + fname, lineno )); +#else + Debug( LDAP_DEBUG_ANY, + "%s: line %d: missing realm in \"sasl-realm \" line\n", + fname, lineno, 0 ); +#endif + + return( 1 ); + } + + if ( global_realm != NULL ) { +#ifdef NEW_LOGGING + LDAP_LOG(( "config", LDAP_LEVEL_CRIT, + "%s: line %d: already set sasl-realm!\n", + fname, lineno )); +#else + Debug( LDAP_DEBUG_ANY, + "%s: line %d: already set sasl-realm!\n", + fname, lineno, 0 ); +#endif + + return 1; + + } else { + global_realm = ch_strdup( cargv[1] ); + } + + } else if ( !strcasecmp( cargv[0], "sasl-regexp" ) + || !strcasecmp( cargv[0], "saslregexp" ) ) + { + int rc; + if ( cargc != 3 ) { +#ifdef NEW_LOGGING + LDAP_LOG(( "config", LDAP_LEVEL_CRIT, + "%s: line %d: need 2 args in " + "\"saslregexp \"\n", + fname, lineno )); +#else + Debug( LDAP_DEBUG_ANY, + "%s: line %d: need 2 args in \"saslregexp \"\n", + fname, lineno, 0 ); +#endif + + return( 1 ); + } + rc = slap_sasl_regexp_config( cargv[1], cargv[2] ); + if ( rc ) { + return rc; + } + + /* SASL security properties */ + } else if ( strcasecmp( cargv[0], "sasl-secprops" ) == 0 ) { + char *txt; + + if ( cargc < 2 ) { +#ifdef NEW_LOGGING + LDAP_LOG(( "config", LDAP_LEVEL_CRIT, + "%s: line %d: missing flags in " + "\"sasl-secprops \" line\n", + fname, lineno )); +#else + Debug( LDAP_DEBUG_ANY, + "%s: line %d: missing flags in \"sasl-secprops \" line\n", + fname, lineno, 0 ); +#endif + + return 1; + } + + txt = slap_sasl_secprops( cargv[1] ); + if ( txt != NULL ) { +#ifdef NEW_LOGGING + LDAP_LOG(( "config", LDAP_LEVEL_CRIT, + "%s: line %d sasl-secprops: %s\n", + fname, lineno, txt )); +#else + Debug( LDAP_DEBUG_ANY, + "%s: line %d: sasl-secprops: %s\n", + fname, lineno, txt ); +#endif + + return 1; + } + } + + return LDAP_SUCCESS; +} + static int slap_sasl_log( void *context, @@ -176,7 +341,11 @@ int slap_sasl_getdn( Connection *conn, char *id, int len, ctx = conn->c_sasl_context; - /* An authcID needs to be converted to authzID form */ + /* An authcID needs to be converted to authzID form. Set the + * values directly into *dn; they will be normalized later. (and + * normalizing always makes a new copy.) An ID from a TLS certificate + * is already normalized, so copy it and skip normalization. + */ if( flags & FLAG_GETDN_AUTHCID ) { #ifdef HAVE_TLS if( conn->c_is_tls && conn->c_sasl_bind_mech.bv_len == ext_bv.bv_len @@ -184,28 +353,31 @@ int slap_sasl_getdn( Connection *conn, char *id, int len, /* X.509 DN is already normalized */ do_norm = 0; is_dn = SET_DN; + ber_str2bv( id, len, 1, dn ); } else #endif { /* convert to u: form */ is_dn = SET_U; + dn->bv_val = id; + dn->bv_len = len; } - ber_str2bv( id, len, 1, dn ); } if( !is_dn ) { if( !strncasecmp( id, "u:", sizeof("u:")-1 )) { is_dn = SET_U; - ber_str2bv( id+2, len-2, 1, dn ); + dn->bv_val = id+2; + dn->bv_len = len-2; } else if ( !strncasecmp( id, "dn:", sizeof("dn:")-1) ) { is_dn = SET_DN; - ber_str2bv( id+3, len-3, 1, dn ); + dn->bv_val = id+3; + dn->bv_len = len-3; } } - /* An authzID must be properly prefixed */ - if( (flags & FLAG_GETDN_AUTHZID) && !is_dn ) { - free( dn->bv_val ); + /* No other possibilities from here */ + if( !is_dn ) { dn->bv_val = NULL; dn->bv_len = 0; return( LDAP_INAPPROPRIATE_AUTH ); @@ -232,24 +404,24 @@ int slap_sasl_getdn( Connection *conn, char *id, int len, c1 = dn->bv_val; dn->bv_val = ch_malloc( len+1 ); p = slap_strcopy( dn->bv_val, "uid=" ); - p = slap_strcopy( p, c1 ); - ch_free( c1 ); + p = slap_strncopy( p, c1, dn->bv_len ); if( realm ) { + int rlen = dn->bv_len - ( realm - c1 ); p = slap_strcopy( p, ",cn=" ); - p = slap_strcopy( p, realm ); + p = slap_strncopy( p, realm, rlen ); realm[-1] = '@'; } else if( user_realm && *user_realm ) { p = slap_strcopy( p, ",cn=" ); p = slap_strcopy( p, user_realm ); } + if( conn->c_sasl_bind_mech.bv_len ) { p = slap_strcopy( p, ",cn=" ); p = slap_strcopy( p, conn->c_sasl_bind_mech.bv_val ); } p = slap_strcopy( p, ",cn=auth" ); dn->bv_len = p - dn->bv_val; - is_dn = SET_DN; #ifdef NEW_LOGGING LDAP_LOG(( "sasl", LDAP_LEVEL_ENTRY, @@ -259,27 +431,14 @@ int slap_sasl_getdn( Connection *conn, char *id, int len, #endif } - /* DN strings that are a cn=auth identity to run through regexp */ - if( is_dn == SET_DN ) - { - slap_sasl2dn( conn, dn, &dn2 ); - if( dn2.bv_val ) { - ch_free( dn->bv_val ); - *dn = dn2; - do_norm = 0; /* slap_sasl2dn normalizes */ -#ifdef NEW_LOGGING - LDAP_LOG(( "sasl", LDAP_LEVEL_ENTRY, - "slap_sasl_getdn: dn:id converted to %s.\n", dn->bv_val )); -#else - Debug( LDAP_DEBUG_TRACE, "getdn: dn:id converted to %s\n", - dn->bv_val, 0, 0 ); -#endif - } - } - + /* All strings are in DN form now. Normalize if needed. */ if ( do_norm ) { rc = dnNormalize2( NULL, dn, &dn2 ); - free(dn->bv_val); + + /* User DNs were constructed above and must be freed now */ + if ( is_dn == SET_U ) + ch_free( dn->bv_val ); + if ( rc != LDAP_SUCCESS ) { dn->bv_val = NULL; dn->bv_len = 0; @@ -288,6 +447,20 @@ int slap_sasl_getdn( Connection *conn, char *id, int len, *dn = dn2; } + /* Run thru regexp */ + slap_sasl2dn( conn, dn, &dn2 ); + if( dn2.bv_val ) { + ch_free( dn->bv_val ); + *dn = dn2; +#ifdef NEW_LOGGING + LDAP_LOG(( "sasl", LDAP_LEVEL_ENTRY, + "slap_sasl_getdn: dn:id converted to %s.\n", dn->bv_val )); +#else + Debug( LDAP_DEBUG_TRACE, "getdn: dn:id converted to %s\n", + dn->bv_val, 0, 0 ); +#endif + } + return( LDAP_SUCCESS ); } @@ -302,9 +475,9 @@ slap_auxprop_lookup( const char *user, unsigned ulen) { - int rc; + int rc, i, last; struct berval dn; - const struct propval *list, *cur; + const struct propval *list; BerVarray vals, bv; AttributeDescription *ad; const char *text; @@ -312,25 +485,29 @@ slap_auxprop_lookup( list = sparams->utils->prop_get( sparams->propctx ); /* Find our DN first */ - for( cur = list; cur->name; cur++ ) { - if ( cur->name[0] == '*' ) { + for( i = 0, last = 0; list[i].name; i++ ) { + if ( list[i].name[0] == '*' ) { if ( (flags & SASL_AUXPROP_AUTHZID) && - !strcmp( cur->name, slap_propnames[1] ) ) { - if ( cur->values && cur->values[0] ) - AC_MEMCPY( &dn, cur->values[0], sizeof( dn ) ); + !strcmp( list[i].name, slap_propnames[1] ) ) { + if ( list[i].values && list[i].values[0] ) + AC_MEMCPY( &dn, list[i].values[0], sizeof( dn ) ); + if ( !last ) last = i; break; } - if ( !strcmp( cur->name, slap_propnames[0] ) ) { - AC_MEMCPY( &dn, cur->values[0], sizeof( dn ) ); - if ( !(flags & SASL_AUXPROP_AUTHZID) ) - break; + if ( !strcmp( list[i].name, slap_propnames[0] ) ) { + if ( !last ) last = i; + if ( list[i].values && list[i].values[0] ) { + AC_MEMCPY( &dn, list[i].values[0], sizeof( dn ) ); + if ( !(flags & SASL_AUXPROP_AUTHZID) ) + break; + } } } } /* Now fetch the rest */ - for( cur = list; cur->name; cur++ ) { - const char *name = cur->name; + for( i = 0; i < last; i++ ) { + const char *name = list[i].name; if ( name[0] == '*' ) { if ( flags & SASL_AUXPROP_AUTHZID ) continue; @@ -338,9 +515,9 @@ slap_auxprop_lookup( } else if ( !(flags & SASL_AUXPROP_AUTHZID ) ) continue; - if ( cur->values ) { + if ( list[i].values ) { if ( !(flags & SASL_AUXPROP_OVERRIDE) ) continue; - sparams->utils->prop_erase( sparams->propctx, cur->name ); + sparams->utils->prop_erase( sparams->propctx, list[i].name ); } ad = NULL; rc = slap_str2ad( name, &ad, &text ); @@ -358,7 +535,7 @@ slap_auxprop_lookup( rc = backend_attribute( NULL,NULL,NULL,NULL, &dn, ad, &vals ); if ( rc != LDAP_SUCCESS ) continue; for ( bv = vals; bv->bv_val; bv++ ) { - sparams->utils->prop_set( sparams->propctx, cur->name, + sparams->utils->prop_set( sparams->propctx, list[i].name, bv->bv_val, bv->bv_len ); } ber_bvarray_free( vals ); @@ -479,8 +656,9 @@ slap_sasl_canonicalize( { Connection *conn = (Connection *)context; struct propctx *props = sasl_auxprop_getctx( sconn ); + struct propval auxvals[3]; struct berval dn; - int rc; + int rc, which; const char *names[2]; *out_len = 0; @@ -499,20 +677,37 @@ slap_sasl_canonicalize( in ? in : "" ); #endif + /* If name is too big, just truncate. We don't care, we're + * using DNs, not the usernames. + */ if ( inlen > out_max ) - return SASL_BUFOVER; + inlen = out_max-1; + + /* See if we need to add request, can only do it once */ + prop_getnames( props, slap_propnames, auxvals ); + if ( !auxvals[0].name ) + prop_request( props, slap_propnames ); + + if ( flags & SASL_CU_AUTHID ) + which = 0; + else + which = 1; + + /* Already been here? */ + if ( auxvals[which].values ) + goto done; if ( flags == SASL_CU_AUTHZID ) { /* If we got unqualified authzid's, they probably came from SASL - * itself just passing the authcid to us. Ignore it. + * itself just passing the authcid to us. Look inside the oparams + * structure to see if that's true. (HACK: the out_len pointer is + * the address of a member of a sasl_out_params_t structure...) */ - if (strncasecmp(in, "u:", 2) && strncasecmp(in, "dn:", 3)) { - AC_MEMCPY( out, in, inlen ); - out[inlen] = '\0'; - *out_len = inlen; - - return SASL_OK; - } + sasl_out_params_t dummy; + int offset = (void *)&dummy.ulen - (void *)&dummy.authid; + char **authid = (void *)out_len - offset; + if ( *authid && !strcmp( in, *authid ) ) + goto done; } rc = slap_sasl_getdn( conn, (char *)in, inlen, (char *)user_realm, &dn, @@ -522,33 +717,26 @@ slap_sasl_canonicalize( return SASL_NOAUTHZ; } - AC_MEMCPY( out, in, inlen ); - out[inlen] = '\0'; - - *out_len = inlen; - - if ( flags & SASL_CU_AUTHID ) - names[0] = slap_propnames[0]; - else - names[0] = slap_propnames[1]; + names[0] = slap_propnames[which]; names[1] = NULL; - sasl_auxprop_request( sconn, names ); prop_set( props, names[0], (char *)&dn, sizeof( dn ) ); #ifdef NEW_LOGGING LDAP_LOG(( "sasl", LDAP_LEVEL_ENTRY, "slap_sasl_canonicalize: conn %d %s=\"%s\"\n", conn ? conn->c_connid : -1, - (flags & SASL_CU_AUTHID) ? "authcDN" : "authzDN", - dn.bv_val )); + names[0]+1, dn.bv_val )); #else Debug( LDAP_DEBUG_ARGS, "SASL Canonicalize [conn=%ld]: " "%s=\"%s\"\n", conn ? conn->c_connid : -1, - (flags & SASL_CU_AUTHID) ? "authcDN" : "authzDN", - dn.bv_val ); + names[0]+1, dn.bv_val ); #endif +done: AC_MEMCPY( out, in, inlen ); + out[inlen] = '\0'; + + *out_len = inlen; return SASL_OK; } @@ -579,17 +767,26 @@ slap_sasl_authorize( "authcid=\"%s\" authzid=\"%s\"\n", conn ? conn->c_connid : -1, auth_identity, requested_user ); #endif + if ( conn->c_sasl_dn.bv_val ) { + ch_free( conn->c_sasl_dn.bv_val ); + conn->c_sasl_dn.bv_val = NULL; + conn->c_sasl_dn.bv_len = 0; + } prop_getnames( props, slap_propnames, auxvals ); + AC_MEMCPY( &authcDN, auxvals[0].values[0], sizeof(authcDN) ); + /* Nothing to do if no authzID was given */ - if ( !auxvals[1].name ) + if ( !auxvals[1].name || !auxvals[1].values ) { + conn->c_sasl_dn = authcDN; return SASL_OK; + } - AC_MEMCPY( &authcDN, auxvals[0].values[0], sizeof(authcDN) ); AC_MEMCPY( &authzDN, auxvals[1].values[0], sizeof(authzDN) ); rc = slap_sasl_authorized( &authcDN, &authzDN ); + ch_free( authcDN.bv_val ); if ( rc != LDAP_SUCCESS ) { #ifdef NEW_LOGGING LDAP_LOG(( "sasl", LDAP_LEVEL_INFO, @@ -602,9 +799,12 @@ slap_sasl_authorize( #endif sasl_seterror( sconn, 0, "not authorized" ); + ch_free( authzDN.bv_val ); return SASL_NOAUTHZ; } + conn->c_sasl_dn = authzDN; + #ifdef NEW_LOGGING LDAP_LOG(( "sasl", LDAP_LEVEL_ENTRY, "slap_sasl_authorize: conn %d authorization allowed\n", @@ -626,11 +826,16 @@ slap_sasl_authorize( const char **errstr) { struct berval authcDN, authzDN; - int rc: + int rc; Connection *conn = context; char *realm; *user = NULL; + if ( conn->c_sasl_dn.bv_val ) { + ch_free( conn->c_sasl_dn.bv_val ); + conn->c_sasl_dn.bv_val = NULL; + conn->c_sasl_dn.bv_len = 0; + } #ifdef NEW_LOGGING LDAP_LOG(( "sasl", LDAP_LEVEL_ENTRY, @@ -677,7 +882,7 @@ slap_sasl_authorize( "Using authcDN=%s\n", (long) (conn ? conn->c_connid : -1), authcDN.bv_val,0 ); #endif - *user = authcDN.bv_val; + conn->c_sasl_dn = authcDN; *errstr = NULL; return SASL_OK; } @@ -689,6 +894,7 @@ slap_sasl_authorize( } rc = slap_sasl_authorized( &authcDN, &authzDN ); + ch_free( authcDN.bv_val ); if( rc ) { #ifdef NEW_LOGGING LDAP_LOG(( "sasl", LDAP_LEVEL_INFO, @@ -701,7 +907,6 @@ slap_sasl_authorize( #endif *errstr = "not authorized"; - ch_free( authcDN.bv_val ); ch_free( authzDN.bv_val ); return SASL_NOAUTHZ; } @@ -716,9 +921,7 @@ slap_sasl_authorize( (long) (conn ? conn->c_connid : -1), 0, 0 ); #endif - - ch_free( authcDN.bv_val ); - *user = authzDN.bv_val; + conn->c_sasl_dn = authzDN; *errstr = NULL; return SASL_OK; } @@ -1146,18 +1349,11 @@ int slap_sasl_bind( response.bv_len = reslen; if ( sc == SASL_OK ) { -#if SASL_VERSION_MAJOR >= 2 - struct propctx *props = sasl_auxprop_getctx( ctx ); - struct propval vals[3]; sasl_ssf_t *ssf = NULL; - prop_getnames( props, slap_propnames, vals ); - - AC_MEMCPY( edn, vals[0].values[0], sizeof(*edn) ); - if ( vals[1].name ) { - ch_free( edn->bv_val ); - AC_MEMCPY( edn, vals[1].values[0], sizeof(*edn) ); - } + *edn = conn->c_sasl_dn; + conn->c_sasl_dn.bv_val = NULL; + conn->c_sasl_dn.bv_len = 0; rc = LDAP_SUCCESS; @@ -1173,46 +1369,6 @@ int slap_sasl_bind( send_ldap_sasl( conn, op, rc, NULL, NULL, NULL, NULL, response.bv_len ? &response : NULL ); -#else - char *username = NULL; - - sc = sasl_getprop( ctx, - SASL_USERNAME, (SASL_CONST void **)&username ); - - if ( sc != SASL_OK ) { -#ifdef NEW_LOGGING - LDAP_LOG(( "sasl", LDAP_LEVEL_ERR, - "slap_sasl_bind: getprop(USERNAME) failed: %d\n", sc )); -#else - Debug(LDAP_DEBUG_TRACE, - "slap_sasl_bind: getprop(USERNAME) failed!\n", - 0, 0, 0); -#endif - - - send_ldap_result( conn, op, rc = slap_sasl_err2ldap( sc ), - NULL, "no SASL username", NULL, NULL ); - - } else { - sasl_ssf_t *ssf = NULL; - - rc = LDAP_SUCCESS; - ber_str2bv( username, 0, 1, edn ); - - (void) sasl_getprop( ctx, SASL_SSF, (void *)&ssf ); - *ssfp = ssf ? *ssf : 0; - - if( *ssfp ) { - ldap_pvt_thread_mutex_lock( &conn->c_mutex ); - conn->c_sasl_layers++; - ldap_pvt_thread_mutex_unlock( &conn->c_mutex ); - } - - send_ldap_sasl( conn, op, rc, - NULL, NULL, NULL, NULL, - response.bv_len ? &response : NULL ); - } -#endif } else if ( sc == SASL_CONTINUE ) { send_ldap_sasl( conn, op, rc = LDAP_SASL_BIND_IN_PROGRESS, @@ -1258,3 +1414,90 @@ char* slap_sasl_secprops( const char *in ) return "SASL not supported"; #endif } + +#ifdef HAVE_CYRUS_SASL +int +slap_sasl_setpass( + Connection *conn, + Operation *op, + const char *reqoid, + struct berval *reqdata, + char **rspoid, + struct berval **rspdata, + LDAPControl *** rspctrls, + const char **text ) +{ + int rc; + struct berval id = { 0, NULL }; /* needs to come from connection */ + struct berval new = { 0, NULL }; + struct berval old = { 0, NULL }; + + assert( reqoid != NULL ); + assert( strcmp( LDAP_EXOP_MODIFY_PASSWD, reqoid ) == 0 ); + + rc = sasl_getprop( conn->c_sasl_context, SASL_USERNAME, + (SASL_CONST void **)&id.bv_val ); + + if( rc != SASL_OK ) { + *text = "unable to retrieve SASL username"; + rc = LDAP_OTHER; + goto done; + } + +#ifdef NEW_LOGGING + LDAP_LOG(( "backend", LDAP_LEVEL_ENTRY, + "slap_sasl_setpass: \"%s\"\n", + id.bv_val ? id.bv_val : "" )); +#else + Debug( LDAP_DEBUG_ARGS, "==> ldbm_back_exop_passwd: \"%s\"\n", + id.bv_val ? id.bv_val : "", 0, 0 ); +#endif + + rc = slap_passwd_parse( reqdata, + NULL, &old, &new, text ); + + if( rc != LDAP_SUCCESS ) { + goto done; + } + + if( new.bv_len == 0 ) { + slap_passwd_generate(&new); + + if( new.bv_len == 0 ) { + *text = "password generation failed."; + rc = LDAP_OTHER; + goto done; + } + + *rspdata = slap_passwd_return( &new ); + } + +#if SASL_VERSION_MAJOR < 2 + rc = sasl_setpass( conn->c_sasl_context, + id.bv_val, new.bv_val, new.bv_len, 0, text ); +#else + rc = sasl_setpass( conn->c_sasl_context, id.bv_val, + old.bv_val, old.bv_len, new.bv_val, new.bv_len, 0 ); + if( rc != SASL_OK ) { + *text = sasl_errdetail( conn->c_sasl_context ); + } +#endif + switch(rc) { + case SASL_OK: + rc = LDAP_SUCCESS; + break; + + case SASL_NOCHANGE: + case SASL_NOMECH: + case SASL_DISABLED: + case SASL_PWLOCK: + case SASL_FAIL: + case SASL_BADPARAM: + default: + rc = LDAP_OTHER; + } + +done: + return rc; +} +#endif