add new ber dump routine (behind NEW_LOGGING)

[openldap] / servers / slapd / passwd.c

diff --git a/servers/slapd/passwd.c b/servers/slapd/passwd.c
index d4ed75fe25b7caea77258f070343c08ce2bdc554..63110da27139c33830be51c5fdc79db42bb7c1ed 100644 (file)
--- a/servers/slapd/passwd.c
+++ b/servers/slapd/passwd.c
@@ -1,7 +1,7 @@
 /* bind.c - ldbm backend bind and unbind routines */
 /* $OpenLDAP$ */
 /*
- * Copyright 1998-1999 The OpenLDAP Foundation, All Rights Reserved.
+ * Copyright 1998-2000 The OpenLDAP Foundation, All Rights Reserved.
  * COPYING RESTRICTIONS APPLY, see COPYRIGHT file
  */
 
@@ -19,14 +19,13 @@
 #include <lutil.h>
 
 int passwd_extop(
-       SLAP_EXTOP_CALLBACK_FN ext_callback,
        Connection *conn, Operation *op,
-       char *reqoid,
+       const char *reqoid,
        struct berval *reqdata,
        char **rspoid,
        struct berval **rspdata,
        LDAPControl ***rspctrls,
-       char **text,
+       const char **text,
        struct berval ***refs )
 {
        int rc;
@@ -35,14 +34,13 @@ int passwd_extop(
        assert( strcmp( LDAP_EXOP_X_MODIFY_PASSWD, reqoid ) == 0 );
 
        if( op->o_dn == NULL || op->o_dn[0] == '\0' ) {
-               *text = ch_strdup("only authenicated users may change passwords");
+               *text = "only authenicated users may change passwords";
                return LDAP_STRONG_AUTH_REQUIRED;
        }
 
-       if( conn->c_authz_backend != NULL && conn->c_authz_backend->be_extended )
-       {
-               if( global_readonly || conn->c_authz_backend->be_readonly ) {
-                       *text = ch_strdup("authorization database is read only");
+       if( conn->c_authz_backend != NULL && conn->c_authz_backend->be_extended ) {
+               if( conn->c_authz_backend->be_restrictops & SLAP_RESTRICT_OP_MODIFY ) {
+                       *text = "authorization database is read only";
                        rc = LDAP_UNWILLING_TO_PERFORM;
 
                } else if( conn->c_authz_backend->be_update_ndn != NULL ) {
@@ -59,7 +57,7 @@ int passwd_extop(
                }
 
        } else {
-               *text = ch_strdup("operation not supported for current user");
+               *text = "operation not supported for current user";
                rc = LDAP_UNWILLING_TO_PERFORM;
        }
 
@@ -68,9 +66,9 @@ int passwd_extop(
 
 int slap_passwd_parse( struct berval *reqdata,
        struct berval **id,
-       struct berval **old,
-       struct berval **new,
-       char **text )
+       struct berval **oldpass,
+       struct berval **newpass,
+       const char **text )
 {
        int rc = LDAP_SUCCESS;
        ber_tag_t tag;
@@ -86,7 +84,7 @@ int slap_passwd_parse( struct berval *reqdata,
        if( ber == NULL ) {
                Debug( LDAP_DEBUG_TRACE, "slap_passwd_parse: ber_init failed\n",
                        0, 0, 0 );
-               *text = ch_strdup("password decoding error");
+               *text = "password decoding error";
                return LDAP_PROTOCOL_ERROR;
        }
 
@@ -117,7 +115,7 @@ int slap_passwd_parse( struct berval *reqdata,
        }
 
        if( tag == LDAP_TAG_EXOP_X_MODIFY_PASSWD_OLD ) {
-               if( old == NULL ) {
+               if( oldpass == NULL ) {
                        Debug( LDAP_DEBUG_TRACE, "slap_passwd_parse: OLD not allowed.\n",
                                0, 0, 0 );
                        *text = "use bind to verify old password";
@@ -125,7 +123,7 @@ int slap_passwd_parse( struct berval *reqdata,
                        goto done;
                }
 
-               tag = ber_scanf( ber, "O", old );
+               tag = ber_scanf( ber, "O", oldpass );
 
                if( tag == LBER_ERROR ) {
                        Debug( LDAP_DEBUG_TRACE, "slap_passwd_parse: ID parse failed.\n",
@@ -137,7 +135,7 @@ int slap_passwd_parse( struct berval *reqdata,
        }
 
        if( tag == LDAP_TAG_EXOP_X_MODIFY_PASSWD_NEW ) {
-               if( new == NULL ) {
+               if( newpass == NULL ) {
                        Debug( LDAP_DEBUG_TRACE, "slap_passwd_parse: NEW not allowed.\n",
                                0, 0, 0 );
                        *text = "user specified passwords disallowed";
@@ -145,7 +143,7 @@ int slap_passwd_parse( struct berval *reqdata,
                        goto done;
                }
 
-               tag = ber_scanf( ber, "O", new );
+               tag = ber_scanf( ber, "O", newpass );
 
                if( tag == LBER_ERROR ) {
                        Debug( LDAP_DEBUG_TRACE, "slap_passwd_parse: OLD parse failed.\n",
@@ -162,7 +160,7 @@ decoding_error:
                        "slap_passwd_parse: decoding error, len=%ld\n",
                        (long) len, 0, 0 );
 
-               *text = ch_strdup("data decoding error");
+               *text = "data decoding error";
                rc = LDAP_PROTOCOL_ERROR;
        }
 
@@ -173,14 +171,14 @@ done:
                        *id = NULL;
                }
 
-               if( old != NULL ) {
-                       ber_bvfree( *old );
-                       *old = NULL;
+               if( oldpass != NULL ) {
+                       ber_bvfree( *oldpass );
+                       *oldpass = NULL;
                }
 
-               if( new != NULL ) {
-                       ber_bvfree( *new );
-                       *new = NULL;
+               if( newpass != NULL ) {
+                       ber_bvfree( *newpass );
+                       *newpass = NULL;
                }
        }
 
@@ -202,7 +200,7 @@ struct berval * slap_passwd_return(
 
        if( ber == NULL ) return NULL;
        
-       rc = ber_printf( ber, "{tO}",
+       rc = ber_printf( ber, "{tON}",
                LDAP_TAG_EXOP_X_MODIFY_PASSWD_GEN, cred );
 
        if( rc == -1 ) {
@@ -219,28 +217,35 @@ struct berval * slap_passwd_return(
 
 int
 slap_passwd_check(
+       Connection *conn,
        Attribute *a,
        struct berval *cred )
 {
        int     i;
-       for ( i = 0; a->a_vals[i] != NULL; i++ ) {
-               int result;
+       int result = 1;
 
-#ifdef SLAPD_CRYPT
-               ldap_pvt_thread_mutex_lock( &crypt_mutex );
+#if defined( SLAPD_CRYPT ) || defined( SLAPD_SPASSWD )
+       ldap_pvt_thread_mutex_lock( &passwd_mutex );
+#ifdef SLAPD_SPASSWD
+       lutil_passwd_sasl_conn = conn->c_sasl_context;
 #endif
-
-               result = lutil_passwd( a->a_vals[i], cred, NULL );
-
-#ifdef SLAPD_CRYPT
-               ldap_pvt_thread_mutex_unlock( &crypt_mutex );
 #endif
 
-               if( !result )
-                       return result;
+       for ( i = 0; a->a_vals[i] != NULL; i++ ) {
+               if( !lutil_passwd( a->a_vals[i], cred, NULL ) ) {
+                       result = 0;
+                       break;
+               }
        }
 
-       return( 1 );
+#if defined( SLAPD_CRYPT ) || defined( SLAPD_SPASSWD )
+#ifdef SLAPD_SPASSWD
+       lutil_passwd_sasl_conn = NULL;
+#endif
+       ldap_pvt_thread_mutex_unlock( &passwd_mutex );
+#endif
+
+       return result;
 }
 
 struct berval * slap_passwd_generate( void )
@@ -261,14 +266,14 @@ struct berval * slap_passwd_hash(
 
        struct berval *new;
 
-#ifdef SLAPD_CRYPT
-       ldap_pvt_thread_mutex_lock( &crypt_mutex );
+#if defined( SLAPD_CRYPT ) || defined( SLAPD_SPASSWD )
+       ldap_pvt_thread_mutex_lock( &passwd_mutex );
 #endif
 
        new = lutil_passwd_hash( cred , hash );
        
-#ifdef SLAPD_CRYPT
-       ldap_pvt_thread_mutex_unlock( &crypt_mutex );
+#if defined( SLAPD_CRYPT ) || defined( SLAPD_SPASSWD )
+       ldap_pvt_thread_mutex_unlock( &passwd_mutex );
 #endif
 
        return new;