]> git.sur5r.net Git - openldap/blobdiff - servers/slapd/back-bdb/modrdn.c
Set lock detector to DEFAULT, not NORUN.
[openldap] / servers / slapd / back-bdb / modrdn.c
index 24522e17e1d8db41680939f0b98fda87165d5156..d1398ab308dadafc4f13aa0965527760eed62231 100644 (file)
@@ -1,7 +1,7 @@
 /* modrdn.c - bdb backend modrdn routine */
 /* $OpenLDAP$ */
 /*
- * Copyright 1998-2000 The OpenLDAP Foundation, All Rights Reserved.
+ * Copyright 1998-2002 The OpenLDAP Foundation, All Rights Reserved.
  * COPYING RESTRICTIONS APPLY, see COPYRIGHT file
  */
 
 
 int
 bdb_modrdn(
-       Backend *be,
-       Connection      *conn,
-       Operation       *op,
-       const char      *dn,
-       const char      *ndn,
-       const char      *newrdn,
-       int             deleteoldrdn,
-       const char      *newSuperior
+    Backend    *be,
+    Connection *conn,
+    Operation  *op,
+    struct berval      *dn,
+    struct berval      *ndn,
+    struct berval      *newrdn,
+    struct berval      *nnewrdn,
+    int                deleteoldrdn,
+    struct berval      *newSuperior,
+    struct berval      *nnewSuperior
 )
 {
        struct bdb_info *bdb = (struct bdb_info *) be->be_private;
        AttributeDescription *children = slap_schema.si_ad_children;
-       char            *p_dn = NULL, *p_ndn = NULL;
-       char            *new_dn = NULL, *new_ndn = NULL;
+       struct berval   p_dn, p_ndn;
+       struct berval   new_dn = {0, NULL}, new_ndn = {0, NULL};
+       int             isroot = -1;
        Entry           *e, *p = NULL;
        Entry           *matched;
        int                     rc;
        const char *text;
        char textbuf[SLAP_TEXT_BUFLEN];
        size_t textlen = sizeof textbuf;
-       DB_TXN *        ltid;
+       DB_TXN *        ltid = NULL;
        struct bdb_op_info opinfo;
 
        ID                      id;
-       char            **new_rdn_vals = NULL;  /* Vals of new rdn */
-       char            **new_rdn_types = NULL; /* Types of new rdn */
        int             a_cnt, d_cnt;
-       char            *old_rdn = NULL;        /* Old rdn's attr type & val */
-       char            **old_rdn_types = NULL; /* Types of old rdn attr. */
-       char            **old_rdn_vals = NULL;  /* Old rdn attribute values */
+       LDAPRDN         *new_rdn = NULL;
+       LDAPRDN         *old_rdn = NULL;
 
        Entry           *np = NULL;                             /* newSuperior Entry */
-       char            *np_dn = NULL;                  /* newSuperior dn */
-       char            *np_ndn = NULL;                 /* newSuperior ndn */
-       char            *new_parent_dn = NULL;  /* np_dn, p_dn, or NULL */
+       struct berval   *np_dn = NULL;                  /* newSuperior dn */
+       struct berval   *np_ndn = NULL;                 /* newSuperior ndn */
+       struct berval   *new_parent_dn = NULL;  /* np_dn, p_dn, or NULL */
 
        /* Used to interface with bdb_modify_internal() */
        Modifications   *mod = NULL;            /* Used to delete old rdn */
@@ -57,15 +57,18 @@ bdb_modrdn(
        int             manageDSAit = get_manageDSAit( op );
 
        Debug( LDAP_DEBUG_TRACE, "==>bdb_modrdn(%s,%s,%s)\n",
-               dn, newrdn, (newSuperior ? newSuperior : "NULL") );
+               dn->bv_val, newrdn->bv_val,
+               newSuperior ? newSuperior->bv_val : "NULL" );
 
+#if 0
        if( newSuperior != NULL ) {
                rc = LDAP_UNWILLING_TO_PERFORM;
                text = "newSuperior not implemented (yet)";
                goto return_results;
        }
+#endif
 
-       if (0) {
+       if( 0 ) {
 retry: /* transaction retry */
                Debug( LDAP_DEBUG_TRACE, "==>bdb_modrdn: retrying...\n", 0, 0, 0 );
                rc = txn_abort( ltid );
@@ -76,19 +79,22 @@ retry:      /* transaction retry */
                        text = "internal error";
                        goto return_results;
                }
+               ldap_pvt_thread_yield();
        }
 
-
-       /* begin transaction */
-       rc = txn_begin( bdb->bi_dbenv, NULL, &ltid, 0 );
-       text = NULL;
-       if( rc != 0 ) {
-               Debug( LDAP_DEBUG_TRACE,
-                       "bdb_delete: txn_begin failed: %s (%d)\n",
-                       db_strerror(rc), rc, 0 );
-               rc = LDAP_OTHER;
-               text = "internal error";
-               goto return_results;
+       if( bdb->bi_txn ) {
+               /* begin transaction */
+               rc = txn_begin( bdb->bi_dbenv, NULL, &ltid, 
+                       bdb->bi_db_opflags );
+               text = NULL;
+               if( rc != 0 ) {
+                       Debug( LDAP_DEBUG_TRACE,
+                               "bdb_delete: txn_begin failed: %s (%d)\n",
+                               db_strerror(rc), rc, 0 );
+                       rc = LDAP_OTHER;
+                       text = "internal error";
+                       goto return_results;
+               }
        }
 
        opinfo.boi_bdb = be;
@@ -114,7 +120,7 @@ retry:      /* transaction retry */
 
        if ( e == NULL ) {
                char* matched_dn = NULL;
-               struct berval** refs = NULL;
+               BerVarray refs;
 
                if( matched != NULL ) {
                        matched_dn = strdup( matched->e_dn );
@@ -125,16 +131,15 @@ retry:    /* transaction retry */
                        matched = NULL;
 
                } else {
-                       refs = default_referral;
+                       refs = referral_rewrite( default_referral,
+                               NULL, dn, LDAP_SCOPE_DEFAULT );
                }
 
                send_ldap_result( conn, op, rc = LDAP_REFERRAL,
                        matched_dn, NULL, refs, NULL );
 
-               if ( matched != NULL ) {
-                       ber_bvecfree( refs );
-                       free( matched_dn );
-               }
+               ber_bvarray_free( refs );
+               free( matched_dn );
 
                goto done;
        }
@@ -142,26 +147,36 @@ retry:    /* transaction retry */
        if (!manageDSAit && is_entry_referral( e ) ) {
                /* parent is a referral, don't allow add */
                /* parent is an alias, don't allow add */
-               struct berval **refs = get_entry_referrals( be,
+               BerVarray refs = get_entry_referrals( be,
                        conn, op, e );
 
-               Debug( LDAP_DEBUG_TRACE, "bdb_modrdn: entry is referral\n",
-                       0, 0, 0 );
+               Debug( LDAP_DEBUG_TRACE, "bdb_modrdn: entry %s is referral\n",
+                       e->e_dn, 0, 0 );
 
                send_ldap_result( conn, op, rc = LDAP_REFERRAL,
                        e->e_dn, NULL, refs, NULL );
 
-               ber_bvecfree( refs );
+               ber_bvarray_free( refs );
                goto done;
        }
 
-       p_ndn = dn_parent( be, e->e_ndn );
-       if ( p_ndn != NULL && p_ndn[ 0 ] != '\0' ) {
+       if ( be_issuffix( be, e->e_nname.bv_val ) ) {
+               p_ndn.bv_len = 0;
+               p_ndn.bv_val = "";
+       } else {
+               rc = dnParent( e->e_nname.bv_val, (const char **)&p_ndn.bv_val );
+               if ( rc != LDAP_SUCCESS ) {
+                       text = "internal error";
+                       goto return_results;
+               }
+               p_ndn.bv_len = e->e_nname.bv_len - (p_ndn.bv_val - e->e_nname.bv_val);
+       }
+       np_ndn = &p_ndn;
+       if ( p_ndn.bv_len != 0 ) {
                /* Make sure parent entry exist and we can write its 
                 * children.
                 */
-
-               rc = bdb_dn2entry( be, ltid, p_ndn, &p, NULL, 0 );
+               rc = bdb_dn2entry( be, ltid, &p_ndn, &p, NULL, 0 );
 
                switch( rc ) {
                case 0:
@@ -196,98 +211,186 @@ retry:   /* transaction retry */
 
                Debug( LDAP_DEBUG_TRACE,
                        "bdb_modrdn: wr to children of entry %s OK\n",
-                       p_ndn, 0, 0 );
+                       p_ndn.bv_val, 0, 0 );
                
-               p_dn = dn_parent( be, e->e_dn );
+               if ( be_issuffix( be, e->e_name.bv_val ) ) {
+                       p_dn.bv_len = 0;
+                       p_dn.bv_val = "";
+               } else {
+                       rc = dnParent( e->e_name.bv_val, &p_dn.bv_val );
+                       if ( rc != LDAP_SUCCESS ) {
+                               text = "internal error";
+                               goto return_results;
+                       }
+                       p_dn.bv_len = e->e_name.bv_len - (p_dn.bv_val - e->e_name.bv_val);
+               }
 
                Debug( LDAP_DEBUG_TRACE,
                        "bdb_modrdn: parent dn=%s\n",
-                       p_dn, 0, 0 );
+                       p_dn.bv_val, 0, 0 );
 
        } else {
                /* no parent, modrdn entry directly under root */
-               if( ! be_isroot( be, op->o_ndn ) && !be_issuffix( be, "" ) ) {
-                       Debug( LDAP_DEBUG_TRACE,
-                               "bdb_modrdn: no parent, not root "
-                               "& \"\" is not suffix\n",
-                               0, 0, 0);
-                       rc = LDAP_INSUFFICIENT_ACCESS;
-                       goto return_results;
-               }
+               isroot = be_isroot( be, &op->o_ndn );
+               if ( ! isroot ) {
+                       if ( be_issuffix( be, "" ) || be_isupdate( be, &op->o_ndn ) ) {
 
-               Debug( LDAP_DEBUG_TRACE,
-                       "bdb_modrdn: no parent, locked root\n",
-                       0, 0, 0 );
+                               p = (Entry *)&slap_entry_root;
+
+                               /* check parent for "children" acl */
+                               rc = access_allowed( be, conn, op, p,
+                                       children, NULL, ACL_WRITE );
+
+                               p = NULL;
+
+                               if ( ! rc )
+                               {
+                                       Debug( LDAP_DEBUG_TRACE, 
+                                               "no access to parent\n", 
+                                               0, 0, 0 );
+                                       send_ldap_result( conn, op, 
+                                               LDAP_INSUFFICIENT_ACCESS,
+                                               NULL, NULL, NULL, NULL );
+                                       goto return_results;
+                               }
+
+                               Debug( LDAP_DEBUG_TRACE,
+                                       "bdb_modrdn: wr to children of entry \"\" OK\n",
+                                       0, 0, 0 );
+               
+                               p_dn.bv_val = "";
+                               p_dn.bv_len = 0;
+
+                               Debug( LDAP_DEBUG_TRACE,
+                                       "bdb_modrdn: parent dn=\"\"\n",
+                                       0, 0, 0 );
+
+                       } else {
+                               Debug( LDAP_DEBUG_TRACE,
+                                       "bdb_modrdn: no parent, not root "
+                                       "& \"\" is not suffix\n",
+                                       0, 0, 0);
+                               rc = LDAP_INSUFFICIENT_ACCESS;
+                               goto return_results;
+                       }
+               }
        }
 
-       new_parent_dn = p_dn;   /* New Parent unless newSuperior given */
+       new_parent_dn = &p_dn;  /* New Parent unless newSuperior given */
 
        if ( newSuperior != NULL ) {
                Debug( LDAP_DEBUG_TRACE, 
                        "bdb_modrdn: new parent \"%s\" requested...\n",
-                       newSuperior, 0, 0 );
-
-               np_dn = ch_strdup( newSuperior );
-               np_ndn = ch_strdup( np_dn );
-               (void) dn_normalize( np_ndn );
+                       newSuperior->bv_val, 0, 0 );
+
+               if ( newSuperior->bv_len ) {
+                       np_dn = newSuperior;
+                       np_ndn = nnewSuperior;
+
+                       /* newSuperior == oldParent?, if so ==> ERROR */
+                       /* newSuperior == entry being moved?, if so ==> ERROR */
+                       /* Get Entry with dn=newSuperior. Does newSuperior exist? */
+
+                       rc = bdb_dn2entry( be, ltid, nnewSuperior, &np, NULL, 0 );
+
+                       switch( rc ) {
+                       case 0:
+                       case DB_NOTFOUND:
+                               break;
+                       case DB_LOCK_DEADLOCK:
+                       case DB_LOCK_NOTGRANTED:
+                               goto retry;
+                       default:
+                               rc = LDAP_OTHER;
+                               text = "internal error";
+                               goto return_results;
+                       }
 
-               /* newSuperior == oldParent?, if so ==> ERROR */
-               /* newSuperior == entry being moved?, if so ==> ERROR */
-               /* Get Entry with dn=newSuperior. Does newSuperior exist? */
+                       if( np == NULL) {
+                               Debug( LDAP_DEBUG_TRACE,
+                                       "bdb_modrdn: newSup(ndn=%s) not here!\n",
+                                       np_ndn->bv_val, 0, 0);
+                               rc = LDAP_OTHER;
+                               goto return_results;
+                       }
 
-               rc = bdb_dn2entry( be, ltid, np_ndn, &np, NULL, 0 );
+                       Debug( LDAP_DEBUG_TRACE,
+                               "bdb_modrdn: wr to new parent OK np=%p, id=%ld\n",
+                               np, (long) np->e_id, 0 );
 
-               switch( rc ) {
-               case 0:
-               case DB_NOTFOUND:
-                       break;
-               case DB_LOCK_DEADLOCK:
-               case DB_LOCK_NOTGRANTED:
-                       goto retry;
-               default:
-                       rc = LDAP_OTHER;
-                       text = "internal error";
-                       goto return_results;
-               }
+                       /* check newSuperior for "children" acl */
+                       if ( !access_allowed( be, conn, op, np, children, NULL, ACL_WRITE ) ) {
+                               Debug( LDAP_DEBUG_TRACE,
+                                       "bdb_modrdn: no wr to newSup children\n",
+                                       0, 0, 0 );
+                               rc = LDAP_INSUFFICIENT_ACCESS;
+                               goto return_results;
+                       }
 
-               if( np == NULL) {
-                       Debug( LDAP_DEBUG_TRACE,
-                               "bdb_modrdn: newSup(ndn=%s) not here!\n",
-                               np_ndn, 0, 0);
-                       rc = LDAP_OTHER;
-                       goto return_results;
-               }
+                       if ( is_entry_alias( np ) ) {
+                               /* parent is an alias, don't allow add */
+                               Debug( LDAP_DEBUG_TRACE, "bdb_modrdn: entry is alias\n",
+                                       0, 0, 0 );
 
-               Debug( LDAP_DEBUG_TRACE,
-                       "bdb_modrdn: wr to new parent OK np=%p, id=%ld\n",
-                       np, (long) np->e_id, 0 );
+                               rc = LDAP_ALIAS_PROBLEM;
+                               goto return_results;
+                       }
 
-               /* check newSuperior for "children" acl */
-               if ( !access_allowed( be, conn, op, np, children, NULL, ACL_WRITE ) ) {
-                       Debug( LDAP_DEBUG_TRACE,
-                               "bdb_modrdn: no wr to newSup children\n",
-                               0, 0, 0 );
-                       rc = LDAP_INSUFFICIENT_ACCESS;
-                       goto return_results;
-               }
+                       if ( is_entry_referral( np ) ) {
+                               /* parent is a referral, don't allow add */
+                               Debug( LDAP_DEBUG_TRACE, "bdb_modrdn: entry is referral\n",
+                                       0, 0, 0 );
 
-               if ( is_entry_alias( np ) ) {
-                       /* entry is an alias, don't allow bind */
-                       Debug( LDAP_DEBUG_TRACE, "bdb_modrdn: entry is alias\n",
-                               0, 0, 0 );
+                               rc = LDAP_OPERATIONS_ERROR;
+                               goto return_results;
+                       }
 
-                       rc = LDAP_ALIAS_PROBLEM;
-                       goto return_results;
-               }
+               } else {
+                       if ( isroot == -1 ) {
+                               isroot = be_isroot( be, &op->o_ndn );
+                       }
+                       
+                       np_dn = NULL;
+
+                       /* no parent, modrdn entry directly under root */
+                       if ( ! isroot ) {
+                               if ( be_issuffix( be, "" ) || be_isupdate( be, &op->o_ndn ) ) {
+                                       np = (Entry *)&slap_entry_root;
+
+                                       /* check parent for "children" acl */
+                                       rc = access_allowed( be, conn, op, np,
+                                               children, NULL, ACL_WRITE );
+
+                                       np = NULL;
+
+                                       if ( ! rc )
+                                       {
+                                               Debug( LDAP_DEBUG_TRACE, 
+                                                       "no access to new superior\n", 
+                                                       0, 0, 0 );
+                                               send_ldap_result( conn, op, 
+                                                       LDAP_INSUFFICIENT_ACCESS,
+                                                       NULL, NULL, NULL, NULL );
+                                               goto return_results;
+                                       }
+
+                                       Debug( LDAP_DEBUG_TRACE,
+                                               "bdb_modrdn: wr to children of entry \"\" OK\n",
+                                               0, 0, 0 );
+               
+                               } else {
+                                       Debug( LDAP_DEBUG_TRACE,
+                                               "bdb_modrdn: new superior=\"\", not root "
+                                               "& \"\" is not suffix\n",
+                                               0, 0, 0);
+                                       rc = LDAP_INSUFFICIENT_ACCESS;
+                                       goto return_results;
+                               }
+                       }
 
-               if ( is_entry_referral( np ) ) {
-                       /* parent is a referral, don't allow add */
-                       /* parent is an alias, don't allow add */
-                       Debug( LDAP_DEBUG_TRACE, "bdb_modrdn: entry is referral\n",
+                       Debug( LDAP_DEBUG_TRACE,
+                               "bdb_modrdn: new superior=\"\"\n",
                                0, 0, 0 );
-
-                       rc = LDAP_OPERATIONS_ERROR;
-                       goto return_results;
                }
 
                Debug( LDAP_DEBUG_TRACE,
@@ -298,15 +401,14 @@ retry:    /* transaction retry */
        }
        
        /* Build target dn and make sure target entry doesn't exist already. */
-       build_new_dn( &new_dn, e->e_dn, new_parent_dn, newrdn ); 
+       build_new_dn( &new_dn, new_parent_dn, newrdn ); 
 
-       new_ndn = ch_strdup(new_dn);
-       (void) dn_normalize( new_ndn );
+       dnNormalize2( NULL, &new_dn, &new_ndn );
 
        Debug( LDAP_DEBUG_TRACE, "bdb_modrdn: new ndn=%s\n",
-               new_ndn, 0, 0 );
+               new_ndn.bv_val, 0, 0 );
 
-       rc = bdb_dn2id ( be, ltid, new_ndn, &id );
+       rc = bdb_dn2id ( be, ltid, &new_ndn, &id );
        switch( rc ) {
        case DB_LOCK_DEADLOCK:
        case DB_LOCK_NOTGRANTED:
@@ -324,13 +426,14 @@ retry:    /* transaction retry */
 
        Debug( LDAP_DEBUG_TRACE,
                "bdb_modrdn: new ndn=%s does not exist\n",
-               new_ndn, 0, 0 );
+               new_ndn.bv_val, 0, 0 );
 
        /* Get attribute type and attribute value of our new rdn, we will
         * need to add that to our new entry
         */
-
-       if ( rdn_attrs( newrdn, &new_rdn_types, &new_rdn_vals ) ) {
+       if ( ldap_str2rdn( newrdn->bv_val, &new_rdn, (char **)&text,
+               LDAP_DN_FORMAT_LDAP ) )
+       {
                Debug( LDAP_DEBUG_TRACE,
                        "bdb_modrdn: can't figure out type(s)/values(s) "
                        "of newrdn\n", 0, 0, 0 );
@@ -340,20 +443,12 @@ retry:    /* transaction retry */
        }
 
        Debug( LDAP_DEBUG_TRACE,
-               "bdb_modrdn: new_rdn_val=\"%s\", new_rdn_type=\"%s\"\n",
-               new_rdn_vals[ 0 ], new_rdn_types[ 0 ], 0 );
-
-       /* Retrieve the old rdn from the entry's dn */
-       if ( ( old_rdn = dn_rdn( be, dn ) ) == NULL ) {
-               Debug( LDAP_DEBUG_TRACE,
-                       "bdb_modrdn: can't figure out old_rdn from dn\n",
-                       0, 0, 0 );
-               rc = LDAP_OTHER;
-               text = "could not parse old DN";
-               goto return_results;            
-       }
+               "bdb_modrdn: new_rdn_type=\"%s\", new_rdn_val=\"%s\"\n",
+               new_rdn[0][0]->la_attr.bv_val, new_rdn[0][0]->la_value.bv_val, 0 );
 
-       if ( rdn_attrs( old_rdn, &old_rdn_types, &old_rdn_vals ) ) {
+       if ( ldap_str2rdn( dn->bv_val, &old_rdn, (char **)&text,
+               LDAP_DN_FORMAT_LDAP ) )
+       {
                Debug( LDAP_DEBUG_TRACE,
                        "bdb_back_modrdn: can't figure out the old_rdn "
                        "type(s)/value(s)\n", 0, 0, 0 );
@@ -361,7 +456,8 @@ retry:      /* transaction retry */
                text = "cannot parse RDN from old DN";
                goto return_results;            
        }
-       
+
+#if 0
        if ( newSuperior == NULL
                && charray_strcasecmp( ( const char ** )old_rdn_types, 
                                ( const char ** )new_rdn_types ) != 0 ) {
@@ -371,43 +467,41 @@ retry:    /* transaction retry */
                        "do not match\n", 
                        old_rdn_types[ 0 ], new_rdn_types[ 0 ], 0 );
        }               
+#endif
 
        /* Add new attribute values to the entry */
-       for ( a_cnt = 0; new_rdn_types[ a_cnt ]; a_cnt++ ) {
+       for ( a_cnt = 0; new_rdn[0][ a_cnt ]; a_cnt++ ) {
                int                     rc;
                AttributeDescription    *desc = NULL;
                Modifications           *mod_tmp;
-               struct berval           val;
 
-               rc = slap_str2ad( new_rdn_types[ a_cnt ], &desc, &text );
+               rc = slap_bv2ad( &new_rdn[0][ a_cnt ]->la_attr, &desc, &text );
 
                if ( rc != LDAP_SUCCESS ) {
                        Debug( LDAP_DEBUG_TRACE,
                                "bdb_modrdn: %s: %s (new)\n",
-                               text, new_rdn_types[ a_cnt ], 0 );
+                               text, new_rdn[0][ a_cnt ]->la_attr.bv_val, 0 );
                        goto return_results;            
                }
 
                /* ACL check of newly added attrs */
-               val.bv_val = new_rdn_vals[ a_cnt ];
-               val.bv_len = strlen( val.bv_val );
-               if ( !access_allowed( be, conn, op, p, 
-                               desc, &val, ACL_WRITE ) ) {
+               if ( !access_allowed( be, conn, op, e, desc,
+                       &new_rdn[0][ a_cnt ]->la_value, ACL_WRITE ) ) {
                        Debug( LDAP_DEBUG_TRACE,
                                "bdb_modrdn: access to attr \"%s\" "
                                "(new) not allowed\n", 
-                               new_rdn_types[ a_cnt ], 0, 0 );
-                       ad_free( desc, 1);
+                               new_rdn[0][ a_cnt ]->la_attr.bv_val, 0, 0 );
                        rc = LDAP_INSUFFICIENT_ACCESS;
                        goto return_results;
                }
 
                /* Apply modification */
-               mod_tmp = ( Modifications * )ch_malloc( sizeof( Modifications ) );
+               mod_tmp = ( Modifications * )ch_malloc( sizeof( Modifications )
+                       + 2 * sizeof( struct berval ) );
                mod_tmp->sml_desc = desc;
-               mod_tmp->sml_bvalues = ( struct berval ** )ch_malloc( 2*sizeof( struct berval * ) );
-               mod_tmp->sml_bvalues[ 0 ] = ber_bvstrdup( new_rdn_vals[ a_cnt ] );
-               mod_tmp->sml_bvalues[ 1 ] = NULL;
+               mod_tmp->sml_bvalues = ( BerVarray )( mod_tmp + 1 );
+               mod_tmp->sml_bvalues[ 0 ] = new_rdn[0][ a_cnt ]->la_value;
+               mod_tmp->sml_bvalues[ 1 ].bv_val = NULL;
                mod_tmp->sml_op = SLAP_MOD_SOFTADD;
                mod_tmp->sml_next = mod;
                mod = mod_tmp;
@@ -416,7 +510,7 @@ retry:      /* transaction retry */
        /* Remove old rdn value if required */
        if ( deleteoldrdn ) {
                /* Get value of old rdn */
-               if ( old_rdn_vals == NULL) {
+               if ( old_rdn == NULL) {
                        Debug( LDAP_DEBUG_TRACE,
                                "bdb_modrdn: can't figure out old RDN value(s) "
                                "from old RDN\n", 0, 0, 0 );
@@ -425,42 +519,39 @@ retry:    /* transaction retry */
                        goto return_results;            
                }
 
-               for ( d_cnt = 0; old_rdn_types[ d_cnt ]; d_cnt++ ) {
+               for ( d_cnt = 0; old_rdn[0][ d_cnt ]; d_cnt++ ) {
                        int                     rc;
                        AttributeDescription    *desc = NULL;
                        Modifications           *mod_tmp;
-                       struct berval           val;
 
-                       rc = slap_str2ad( old_rdn_types[ d_cnt ],
+                       rc = slap_bv2ad( &old_rdn[0][ d_cnt ]->la_attr,
                                        &desc, &text );
 
                        if ( rc != LDAP_SUCCESS ) {
                                Debug( LDAP_DEBUG_TRACE,
                                        "bdb_modrdn: %s: %s (old)\n",
-                                       text, old_rdn_types[ d_cnt ], 0 );
+                                       text, old_rdn[0][ d_cnt ]->la_attr.bv_val, 0 );
                                goto return_results;            
                        }
 
                        /* ACL check of newly added attrs */
-                       val.bv_val = new_rdn_vals[ d_cnt ];
-                       val.bv_len = strlen( val.bv_val );
-                       if ( !access_allowed( be, conn, op, p, 
-                                       desc, &val, ACL_WRITE ) ) {
+                       if ( !access_allowed( be, conn, op, e, desc,
+                               &old_rdn[0][d_cnt]->la_value, ACL_WRITE ) ) {
                                Debug( LDAP_DEBUG_TRACE,
                                        "bdb_modrdn: access to attr \"%s\" "
                                        "(old) not allowed\n", 
-                                       old_rdn_types[ d_cnt ], 0, 0 );
-                               ad_free( desc, 1);
+                                       old_rdn[0][ d_cnt ]->la_attr.bv_val, 0, 0 );
                                rc = LDAP_INSUFFICIENT_ACCESS;
                                goto return_results;
                        }
 
                        /* Apply modification */
-                       mod_tmp = ( Modifications * )ch_malloc( sizeof( Modifications ) );
+                       mod_tmp = ( Modifications * )ch_malloc( sizeof( Modifications )
+                               + 2 * sizeof ( struct berval ) );
                        mod_tmp->sml_desc = desc;
-                       mod_tmp->sml_bvalues = ( struct berval ** )ch_malloc( 2*sizeof( struct berval * ) );
-                       mod_tmp->sml_bvalues[ 0 ] = ber_bvstrdup( old_rdn_vals[ d_cnt ] );
-                       mod_tmp->sml_bvalues[ 1 ] = NULL;
+                       mod_tmp->sml_bvalues = ( BerVarray )(mod_tmp+1);
+                       mod_tmp->sml_bvalues[ 0 ] = old_rdn[0][ d_cnt ]->la_value;
+                       mod_tmp->sml_bvalues[ 1 ].bv_val = NULL;
                        mod_tmp->sml_op = LDAP_MOD_DELETE;
                        mod_tmp->sml_next = mod;
                        mod = mod_tmp;
@@ -468,7 +559,7 @@ retry:      /* transaction retry */
        }
        
        /* delete old one */
-       rc = bdb_dn2id_delete( be, ltid, e->e_ndn, e->e_id );
+       rc = bdb_dn2id_delete( be, ltid, p_ndn.bv_val, e );
        if ( rc != 0 ) {
                switch( rc ) {
                case DB_LOCK_DEADLOCK:
@@ -480,15 +571,15 @@ retry:    /* transaction retry */
                goto return_results;
        }
 
-       free( e->e_dn );
-       free( e->e_ndn );
-       e->e_dn = new_dn;
-       e->e_ndn = new_ndn;
-       new_dn = NULL;
-       new_ndn = NULL;
+       /* Binary format uses a single contiguous block, cannot
+        * free individual fields. Leave new_dn/new_ndn set so
+        * they can be individually freed later.
+        */
+       e->e_name = new_dn;
+       e->e_nname = new_ndn;
 
        /* add new one */
-       rc = bdb_dn2id_add( be, ltid, e->e_ndn, e->e_id );
+       rc = bdb_dn2id_add( be, ltid, np_ndn, e );
        if ( rc != 0 ) {
                switch( rc ) {
                case DB_LOCK_DEADLOCK:
@@ -513,10 +604,6 @@ retry:     /* transaction retry */
                goto return_results;
        }
        
-       /* NOTE: after this you must not free new_dn or new_ndn!
-        * They are used by cache.
-        */
-
        /* id2entry index */
        rc = bdb_id2entry_update( be, ltid, e );
        if ( rc != 0 ) {
@@ -530,7 +617,9 @@ retry:      /* transaction retry */
                goto return_results;
        }
 
-       rc = txn_commit( ltid, 0 );
+       if( bdb->bi_txn ) {
+               rc = txn_commit( ltid, 0 );
+       }
        ltid = NULL;
        op->o_private = NULL;
 
@@ -542,7 +631,7 @@ retry:      /* transaction retry */
                text = "commit failed";
        } else {
                Debug( LDAP_DEBUG_TRACE,
-                       "bdb_modrdn: added id=%08x dn=\"%s\"\n",
+                       "bdb_modrdn: added id=%08lx dn=\"%s\"\n",
                        e->e_id, e->e_dn, 0 );
                rc = LDAP_SUCCESS;
                text = NULL;
@@ -552,31 +641,28 @@ return_results:
        send_ldap_result( conn, op, rc,
                NULL, text, NULL, NULL );
 
-       if(rc == LDAP_SUCCESS && bdb->bi_txn_cp ) {
+       if( rc == LDAP_SUCCESS && bdb->bi_txn_cp ) {
                ldap_pvt_thread_yield();
-               txn_checkpoint( bdb->bi_dbenv,
+               TXN_CHECKPOINT( bdb->bi_dbenv,
                        bdb->bi_txn_cp_kbyte, bdb->bi_txn_cp_min, 0 );
        }
 
 done:
-       if( new_dn != NULL ) free( new_dn );
-       if( new_ndn != NULL ) free( new_ndn );
-
-       if( p_dn != NULL ) free( p_dn );
-       if( p_ndn != NULL ) free( p_ndn );
+       if( new_dn.bv_val != NULL ) free( new_dn.bv_val );
+       if( new_ndn.bv_val != NULL ) free( new_ndn.bv_val );
 
        /* LDAP v2 supporting correct attribute handling. */
-       if( new_rdn_types != NULL ) charray_free(new_rdn_types);
-       if( new_rdn_vals != NULL ) charray_free(new_rdn_vals);
-       if( old_rdn != NULL ) free(old_rdn);
-       if( old_rdn_types != NULL ) charray_free(old_rdn_types);
-       if( old_rdn_vals != NULL ) charray_free(old_rdn_vals);
-       if( mod != NULL ) slap_mods_free(mod);
+       if( new_rdn != NULL ) ldap_rdnfree( new_rdn );
+       if( old_rdn != NULL ) ldap_rdnfree( old_rdn );
+       if( mod != NULL ) {
+               Modifications *tmp;
+               for (; mod; mod=tmp ) {
+                       tmp = mod->sml_next;
+                       free( mod );
+               }
+       }
 
        /* LDAP v3 Support */
-       if ( np_dn != NULL ) free( np_dn );
-       if ( np_ndn != NULL ) free( np_ndn );
-
        if( np != NULL ) {
                /* free new parent and writer lock */
                bdb_entry_return( be, np );