]> git.sur5r.net Git - openldap/blobdiff - servers/slapd/back-ldbm/passwd.c
In DN_SUBTREE use idl_allids instead of explicit malloc.
[openldap] / servers / slapd / back-ldbm / passwd.c
index 355405bbda2890335bdc1d974e83f7407bd7147e..58d545283290db421167b2a0bd91cd1e7cac3eb9 100644 (file)
@@ -1,7 +1,7 @@
-/* extended.c - ldbm backend extended routines */
+/* passwd.c - ldbm backend password routines */
 /* $OpenLDAP$ */
 /*
- * Copyright 1998-1999 The OpenLDAP Foundation, All Rights Reserved.
+ * Copyright 1998-2002 The OpenLDAP Foundation, All Rights Reserved.
  * COPYING RESTRICTIONS APPLY, see COPYRIGHT file
  */
 
@@ -21,88 +21,166 @@ ldbm_back_exop_passwd(
     Backend            *be,
     Connection         *conn,
     Operation          *op,
-       char            *oid,
+       const char              *reqoid,
     struct berval      *reqdata,
+       char                    **rspoid,
     struct berval      **rspdata,
-       char**  text
+       LDAPControl             *** rspctrls,
+       const char              **text,
+    BerVarray *refs
 )
 {
        struct ldbminfo *li = (struct ldbminfo *) be->be_private;
-       int rc = LDAP_OPERATIONS_ERROR;
-       Entry *e;
-       struct berval *cred = NULL;
+       int rc;
+       Entry *e = NULL;
+       struct berval hash = { 0, NULL };
 
-       assert( oid != NULL );
-       assert( strcmp( LDAP_EXOP_X_MODIFY_PASSWD, oid ) == 0 );
+       struct berval id = { 0, NULL };
+       struct berval new = { 0, NULL };
 
-       Debug( LDAP_DEBUG_ARGS, "==> ldbm_back_exop_passwd: dn: %s\n",
-               op->o_dn, 0, 0 );
+       struct berval dn;
+       struct berval ndn;
 
+       assert( reqoid != NULL );
+       assert( strcmp( LDAP_EXOP_X_MODIFY_PASSWD, reqoid ) == 0 );
 
-       cred = slap_passwd_generate( reqdata );
-       if( cred == NULL || cred->bv_len == 0 ) {
-               *text = ch_strdup("password generation failed");
-               return LDAP_OPERATIONS_ERROR;
+       rc = slap_passwd_parse( reqdata,
+               &id, NULL, &new, text );
+
+#ifdef NEW_LOGGING
+       LDAP_LOG(( "backend", LDAP_LEVEL_ENTRY,
+                  "ldbm_back_exop_passwd: \"%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
+
+
+       if( rc != LDAP_SUCCESS ) {
+               goto done;
        }
 
-       Debug( LDAP_DEBUG_TRACE, "passwd: %s\n", cred->bv_val, 0, 0 );
+       if( new.bv_len == 0 ) {
+               slap_passwd_generate(&new);
 
-       e = dn2entry_w( be, op->o_ndn, NULL );
+               if( new.bv_len == 0 ) {
+                       *text = "password generation failed.";
+                       rc = LDAP_OTHER;
+                       goto done;
+               }
+               
+               *rspdata = slap_passwd_return( &new );
+       }
 
-       if( e == NULL ) {
-               *text = ch_strdup("could not locate authorization entry");
-               return LDAP_OPERATIONS_ERROR;
+       slap_passwd_hash( &new, &hash );
+
+       if( hash.bv_len == 0 ) {
+               *text = "password hash failed";
+               rc = LDAP_OTHER;
+               goto done;
+       }
+
+       if( id.bv_len ) {
+               dn = id;
+       } else {
+               dn = op->o_dn;
        }
 
-       if( ! access_allowed( be, conn, op, e, "entry", NULL, ACL_WRITE ) ) {
-               *text = ch_strdup("access to authorization entry denied");
-               rc = LDAP_INSUFFICIENT_ACCESS;
+#ifdef NEW_LOGGING
+       LDAP_LOG(( "backend", LDAP_LEVEL_DETAIL1,
+               "ldbm_back_exop_passwd: \"%s\"%s\n",
+               dn.bv_val, id.bv_len ? " (proxy)" : "" ));
+#else
+       Debug( LDAP_DEBUG_TRACE, "passwd: \"%s\"%s\n",
+               dn.bv_val, id.bv_len ? " (proxy)" : "", 0 );
+#endif
+
+       if( dn.bv_len == 0 ) {
+               *text = "No password is associated with the Root DSE";
+               rc = LDAP_OPERATIONS_ERROR;
+               goto done;
+       }
+
+       rc = dnNormalize2( NULL, &dn, &ndn );
+       if( rc != LDAP_SUCCESS ) {
+               *text = "Invalid DN";
+               goto done;
+       }
+
+       e = dn2entry_w( be, &ndn, NULL );
+       if( e == NULL ) {
+               *text = "could not locate authorization entry";
+               rc = LDAP_NO_SUCH_OBJECT;
                goto done;
        }
 
        if( is_entry_alias( e ) ) {
                /* entry is an alias, don't allow operation */
-               *text = ch_strdup("authorization entry is alias");
+               *text = "authorization entry is alias";
                rc = LDAP_ALIAS_PROBLEM;
                goto done;
        }
 
+       rc = LDAP_OPERATIONS_ERROR;
+
        if( is_entry_referral( e ) ) {
                /* entry is an referral, don't allow operation */
-               *text = ch_strdup("authorization entry is referral");
+               *text = "authorization entry is referral";
                goto done;
        }
 
        {
-               LDAPModList ml;
-               struct berval *vals[2];
+               Modifications ml;
+               struct berval vals[2];
+               char textbuf[SLAP_TEXT_BUFLEN]; /* non-returnable */
 
-               vals[0] = cred;
-               vals[1] = NULL;
+               vals[0] = hash;
+               vals[1].bv_val = NULL;
 
-               ml.ml_type = ch_strdup("userPassword");
-               ml.ml_bvalues = vals;
-               ml.ml_op = LDAP_MOD_REPLACE | LDAP_MOD_BVALUES;
-               ml.ml_next = NULL;
+               ml.sml_desc = slap_schema.si_ad_userPassword;
+               ml.sml_bvalues = vals;
+               ml.sml_op = LDAP_MOD_REPLACE;
+               ml.sml_next = NULL;
 
                rc = ldbm_modify_internal( be,
-                       conn, op, op->o_ndn, &ml, e );
+                       conn, op, op->o_ndn.bv_val, &ml, e, text, textbuf, 
+                       sizeof( textbuf ) );
 
-               ch_free(ml.ml_type);
-       }
+               /* FIXME: ldbm_modify_internal may set *text = textbuf,
+                * which is BAD */
+               if ( *text == textbuf ) {
+                       *text = NULL;
+               }
+
+               if( rc ) {
+                       /* cannot return textbuf */
+                       *text = "entry modify failed";
+                       goto done;
+               }
 
-       if( rc == LDAP_SUCCESS ) {
                /* change the entry itself */
                if( id2entry_add( be, e ) != 0 ) {
-                       rc = LDAP_OPERATIONS_ERROR;
+                       *text = "entry update failed";
+                       rc = LDAP_OTHER;
+               }
+
+               if( rc == LDAP_SUCCESS ) {
+                       replog( be, op, &e->e_name, &e->e_nname, &ml );
                }
        }
-       
+
 done:
-       cache_return_entry_w( &li->li_cache, e );
+       if( e != NULL ) {
+               cache_return_entry_w( &li->li_cache, e );
+       }
+
+       if( hash.bv_val != NULL ) {
+               free( hash.bv_val );
+       }
 
-       if( cred != NULL ) {
-               ber_bvfree( cred );
+       if( ndn.bv_val != NULL ) {
+               free( ndn.bv_val );
        }
 
        return rc;