git.sur5r.net Git - openldap/blob - servers/slapd/back-bdb/modrdn.c

   1 /* modrdn.c - bdb backend modrdn routine */
   2 /* $OpenLDAP$ */
   3 /* This work is part of OpenLDAP Software <http://www.openldap.org/>.
   4  *
   5  * Copyright 2000-2004 The OpenLDAP Foundation.
   6  * All rights reserved.
   7  *
   8  * Redistribution and use in source and binary forms, with or without
   9  * modification, are permitted only as authorized by the OpenLDAP
  10  * Public License.
  11  *
  12  * A copy of this license is available in the file LICENSE in the
  13  * top-level directory of the distribution or, alternatively, at
  14  * <http://www.OpenLDAP.org/license.html>.
  15  */
  16
  17 #include "portable.h"
  18
  19 #include <stdio.h>
  20 #include <ac/string.h>
  21
  22 #include "back-bdb.h"
  23 #include "external.h"
  24
  25 int
  26 bdb_modrdn( Operation   *op, SlapReply *rs )
  27 {
  28         struct bdb_info *bdb = (struct bdb_info *) op->o_bd->be_private;
  29         AttributeDescription *children = slap_schema.si_ad_children;
  30         AttributeDescription *entry = slap_schema.si_ad_entry;
  31         struct berval   p_dn, p_ndn;
  32         struct berval   new_dn = {0, NULL}, new_ndn = {0, NULL};
  33         int             isroot = -1;
  34         Entry           *e = NULL;
  35         Entry           *p = NULL;
  36         EntryInfo       *ei = NULL, *eip = NULL, *nei = NULL, *neip = NULL;
  37         /* LDAP v2 supporting correct attribute handling. */
  38         LDAPRDN         new_rdn = NULL;
  39         LDAPRDN         old_rdn = NULL;
  40         char textbuf[SLAP_TEXT_BUFLEN];
  41         size_t textlen = sizeof textbuf;
  42         DB_TXN          *ltid = NULL, *lt2;
  43         struct bdb_op_info opinfo;
  44         Entry dummy = {0};
  45
  46         ID                      id;
  47
  48         Entry           *np = NULL;                     /* newSuperior Entry */
  49         struct berval   *np_dn = NULL;                  /* newSuperior dn */
  50         struct berval   *np_ndn = NULL;                 /* newSuperior ndn */
  51         struct berval   *new_parent_dn = NULL;  /* np_dn, p_dn, or NULL */
  52
  53         /* Used to interface with bdb_modify_internal() */
  54         Modifications   *mod = NULL;            /* Used to delete old rdn */
  55
  56         int             manageDSAit = get_manageDSAit( op );
  57
  58         u_int32_t       locker = 0;
  59         DB_LOCK         lock, plock, nplock;
  60
  61         int             num_retries = 0;
  62
  63         LDAPControl **preread_ctrl = NULL;
  64         LDAPControl **postread_ctrl = NULL;
  65         LDAPControl *ctrls[SLAP_MAX_RESPONSE_CONTROLS];
  66         int num_ctrls = 0;
  67
  68         Operation *ps_list;
  69         struct psid_entry *pm_list, *pm_prev;
  70         int     rc;
  71         EntryInfo       *suffix_ei;
  72         Entry           *ctxcsn_e;
  73         int                     ctxcsn_added = 0;
  74
  75         int parent_is_glue = 0;
  76         int parent_is_leaf = 0;
  77
  78         ctrls[num_ctrls] = NULL;
  79
  80 #ifdef NEW_LOGGING
  81         LDAP_LOG ( OPERATION, ENTRY, "==>bdb_modrdn(%s,%s,%s)\n",
  82                 op->o_req_dn.bv_val,op->oq_modrdn.rs_newrdn.bv_val,
  83                 op->oq_modrdn.rs_newSup ? op->oq_modrdn.rs_newSup->bv_val : "NULL" );
  84 #else
  85         Debug( LDAP_DEBUG_TRACE, "==>bdb_modrdn(%s,%s,%s)\n",
  86                 op->o_req_dn.bv_val,op->oq_modrdn.rs_newrdn.bv_val,
  87                 op->oq_modrdn.rs_newSup ? op->oq_modrdn.rs_newSup->bv_val : "NULL" );
  88 #endif
  89
  90         if( 0 ) {
  91 retry:  /* transaction retry */
  92                 if ( dummy.e_attrs ) {
  93                         attrs_free( dummy.e_attrs );
  94                         dummy.e_attrs = NULL;
  95                 }
  96                 if (e != NULL) {
  97                         bdb_unlocked_cache_return_entry_w(&bdb->bi_cache, e);
  98                         e = NULL;
  99                 }
 100                 if (p != NULL) {
 101                         bdb_unlocked_cache_return_entry_r(&bdb->bi_cache, p);
 102                         p = NULL;
 103                 }
 104                 if (np != NULL) {
 105                         bdb_unlocked_cache_return_entry_r(&bdb->bi_cache, np);
 106                         np = NULL;
 107                 }
 108 #ifdef NEW_LOGGING
 109                 LDAP_LOG ( OPERATION, DETAIL1, "==>bdb_modrdn: retrying...\n", 0, 0, 0);
 110 #else
 111                 Debug( LDAP_DEBUG_TRACE, "==>bdb_modrdn: retrying...\n", 0, 0, 0 );
 112 #endif
 113                 pm_list = LDAP_LIST_FIRST(&op->o_pm_list);
 114                 while ( pm_list != NULL ) {
 115                         LDAP_LIST_REMOVE ( pm_list, ps_link );
 116                         pm_prev = pm_list;
 117                         pm_list = LDAP_LIST_NEXT ( pm_list, ps_link );
 118                         ch_free( pm_prev );
 119                 }
 120
 121                 rs->sr_err = TXN_ABORT( ltid );
 122                 ltid = NULL;
 123                 op->o_private = NULL;
 124                 op->o_do_not_cache = opinfo.boi_acl_cache;
 125                 if( rs->sr_err != 0 ) {
 126                         rs->sr_err = LDAP_OTHER;
 127                         rs->sr_text = "internal error";
 128                         goto return_results;
 129                 }
 130                 parent_is_glue = 0;
 131                 parent_is_leaf = 0;
 132                 ldap_pvt_thread_yield();
 133                 bdb_trans_backoff( ++num_retries );
 134         }
 135
 136         /* begin transaction */
 137         rs->sr_err = TXN_BEGIN( bdb->bi_dbenv, NULL, &ltid,
 138                 bdb->bi_db_opflags );
 139         rs->sr_text = NULL;
 140         if( rs->sr_err != 0 ) {
 141 #ifdef NEW_LOGGING
 142                 LDAP_LOG ( OPERATION, ERR,
 143                         "==>bdb_modrdn: txn_begin failed: %s (%d)\n",
 144                         db_strerror(rs->sr_err), rs->sr_err, 0 );
 145 #else
 146                 Debug( LDAP_DEBUG_TRACE,
 147                         "bdb_delete: txn_begin failed: %s (%d)\n",
 148                         db_strerror(rs->sr_err), rs->sr_err, 0 );
 149 #endif
 150                 rs->sr_err = LDAP_OTHER;
 151                 rs->sr_text = "internal error";
 152                 goto return_results;
 153         }
 154
 155         locker = TXN_ID ( ltid );
 156
 157         opinfo.boi_bdb = op->o_bd;
 158         opinfo.boi_txn = ltid;
 159         opinfo.boi_locker = locker;
 160         opinfo.boi_err = 0;
 161         opinfo.boi_acl_cache = op->o_do_not_cache;
 162         op->o_private = &opinfo;
 163
 164         /* get entry */
 165         rs->sr_err = bdb_dn2entry( op, ltid, &op->o_req_ndn, &ei, 1,
 166                 locker, &lock );
 167
 168         switch( rs->sr_err ) {
 169         case 0:
 170         case DB_NOTFOUND:
 171                 break;
 172         case DB_LOCK_DEADLOCK:
 173         case DB_LOCK_NOTGRANTED:
 174                 goto retry;
 175         case LDAP_BUSY:
 176                 rs->sr_text = "ldap server busy";
 177                 goto return_results;
 178         default:
 179                 rs->sr_err = LDAP_OTHER;
 180                 rs->sr_text = "internal error";
 181                 goto return_results;
 182         }
 183
 184         e = ei->bei_e;
 185         /* FIXME: dn2entry() should return non-glue entry */
 186         if (( rs->sr_err == DB_NOTFOUND ) ||
 187                 ( !manageDSAit && e && is_entry_glue( e )))
 188         {
 189                 BerVarray deref = NULL;
 190                 if( e != NULL ) {
 191                         rs->sr_matched = ch_strdup( e->e_dn );
 192                         rs->sr_ref = is_entry_referral( e )
 193                                 ? get_entry_referrals( op, e )
 194                                 : NULL;
 195                         bdb_unlocked_cache_return_entry_r( &bdb->bi_cache, e);
 196                         e = NULL;
 197
 198                 } else {
 199                         if ( !LDAP_STAILQ_EMPTY( &op->o_bd->be_syncinfo )) {
 200                                 syncinfo_t *si;
 201                                 LDAP_STAILQ_FOREACH( si, &op->o_bd->be_syncinfo, si_next ) {
 202                                         struct berval tmpbv;
 203                                         ber_dupbv( &tmpbv, &si->si_provideruri_bv[0] );
 204                                         ber_bvarray_add( &deref, &tmpbv );
 205                 }
 206                         } else {
 207                                 deref = default_referral;
 208                         }
 209                         rs->sr_ref = referral_rewrite( deref, NULL, &op->o_req_dn,
 210                                         LDAP_SCOPE_DEFAULT );
 211                 }
 212
 213                 rs->sr_err = LDAP_REFERRAL;
 214                 send_ldap_result( op, rs );
 215
 216                 ber_bvarray_free( rs->sr_ref );
 217                 if ( deref != default_referral ) {
 218                         ber_bvarray_free( deref );
 219                 }
 220                 free( (char *)rs->sr_matched );
 221                 rs->sr_ref = NULL;
 222                 rs->sr_matched = NULL;
 223
 224                 goto done;
 225         }
 226
 227         if ( get_assert( op ) &&
 228                 ( test_filter( op, e, get_assertion( op )) != LDAP_COMPARE_TRUE ))
 229         {
 230                 rs->sr_err = LDAP_ASSERTION_FAILED;
 231                 goto return_results;
 232         }
 233
 234         /* check write on old entry */
 235         rs->sr_err = access_allowed( op, e, entry, NULL, ACL_WRITE, NULL );
 236         if ( ! rs->sr_err ) {
 237                 switch( opinfo.boi_err ) {
 238                 case DB_LOCK_DEADLOCK:
 239                 case DB_LOCK_NOTGRANTED:
 240                         goto retry;
 241                 }
 242
 243 #ifdef NEW_LOGGING
 244                 LDAP_LOG ( OPERATION, ERR,
 245                         "==>bdb_modrdn: no access to entry\n", 0, 0, 0 );
 246 #else
 247                 Debug( LDAP_DEBUG_TRACE, "no access to entry\n", 0,
 248                         0, 0 );
 249 #endif
 250                 rs->sr_text = "no write access to old entry";
 251                 rs->sr_err = LDAP_INSUFFICIENT_ACCESS;
 252                 goto return_results;
 253         }
 254
 255 #ifndef BDB_HIER
 256         rs->sr_err = bdb_cache_children( op, ltid, e );
 257         if ( rs->sr_err != DB_NOTFOUND ) {
 258                 switch( rs->sr_err ) {
 259                 case DB_LOCK_DEADLOCK:
 260                 case DB_LOCK_NOTGRANTED:
 261                         goto retry;
 262                 case 0:
 263 #ifdef NEW_LOGGING
 264                         LDAP_LOG ( OPERATION, DETAIL1,
 265                                 "<=- bdb_modrdn: non-leaf %s\n", op->o_req_dn.bv_val, 0, 0 );
 266 #else
 267                         Debug(LDAP_DEBUG_ARGS,
 268                                 "<=- bdb_modrdn: non-leaf %s\n",
 269                                 op->o_req_dn.bv_val, 0, 0);
 270 #endif
 271                         rs->sr_err = LDAP_NOT_ALLOWED_ON_NONLEAF;
 272                         rs->sr_text = "subtree rename not supported";
 273                         break;
 274                 default:
 275 #ifdef NEW_LOGGING
 276                         LDAP_LOG ( OPERATION, ERR,
 277                                 "<=- bdb_modrdn: has_children failed %s (%d)\n",
 278                                 db_strerror(rs->sr_err), rs->sr_err, 0 );
 279 #else
 280                         Debug(LDAP_DEBUG_ARGS,
 281                                 "<=- bdb_modrdn: has_children failed: %s (%d)\n",
 282                                 db_strerror(rs->sr_err), rs->sr_err, 0 );
 283 #endif
 284                         rs->sr_err = LDAP_OTHER;
 285                         rs->sr_text = "internal error";
 286                 }
 287                 goto return_results;
 288         }
 289         ei->bei_state |= CACHE_ENTRY_NO_KIDS;
 290 #endif
 291
 292         if (!manageDSAit && is_entry_referral( e ) ) {
 293                 /* parent is a referral, don't allow add */
 294                 rs->sr_ref = get_entry_referrals( op, e );
 295
 296 #ifdef NEW_LOGGING
 297                 LDAP_LOG ( OPERATION, DETAIL1,
 298                         "==>bdb_modrdn: entry %s is referral \n", e->e_dn, 0, 0 );
 299 #else
 300                 Debug( LDAP_DEBUG_TRACE, "bdb_modrdn: entry %s is referral\n",
 301                         e->e_dn, 0, 0 );
 302 #endif
 303
 304                 rs->sr_err = LDAP_REFERRAL,
 305                 rs->sr_matched = e->e_name.bv_val;
 306                 send_ldap_result( op, rs );
 307
 308                 ber_bvarray_free( rs->sr_ref );
 309                 rs->sr_ref = NULL;
 310                 rs->sr_matched = NULL;
 311                 goto done;
 312         }
 313
 314         if ( be_issuffix( op->o_bd, &e->e_nname ) ) {
 315                 p_ndn = slap_empty_bv;
 316         } else {
 317                 dnParent( &e->e_nname, &p_ndn );
 318         }
 319         np_ndn = &p_ndn;
 320         if ( p_ndn.bv_len != 0 ) {
 321                 /* Make sure parent entry exist and we can write its
 322                  * children.
 323                  */
 324                 eip = ei->bei_parent;
 325                 rs->sr_err = bdb_cache_find_id( op, ltid,
 326                         eip->bei_id, &eip, 0, locker, &plock );
 327
 328                 switch( rs->sr_err ) {
 329                 case 0:
 330                 case DB_NOTFOUND:
 331                         break;
 332                 case DB_LOCK_DEADLOCK:
 333                 case DB_LOCK_NOTGRANTED:
 334                         goto retry;
 335                 case LDAP_BUSY:
 336                         rs->sr_text = "ldap server busy";
 337                         goto return_results;
 338                 default:
 339                         rs->sr_err = LDAP_OTHER;
 340                         rs->sr_text = "internal error";
 341                         goto return_results;
 342                 }
 343
 344                 p = eip->bei_e;
 345                 if( p == NULL) {
 346 #ifdef NEW_LOGGING
 347                         LDAP_LOG ( OPERATION, ERR,
 348                                 "==>bdb_modrdn: parent does not exist\n", 0, 0, 0 );
 349 #else
 350                         Debug( LDAP_DEBUG_TRACE, "bdb_modrdn: parent does not exist\n",
 351                                 0, 0, 0);
 352 #endif
 353                         rs->sr_err = LDAP_OTHER;
 354                         rs->sr_text = "old entry's parent does not exist";
 355                         goto return_results;
 356                 }
 357
 358                 /* check parent for "children" acl */
 359                 rs->sr_err = access_allowed( op, p,
 360                         children, NULL, ACL_WRITE, NULL );
 361
 362                 if ( ! rs->sr_err ) {
 363                         switch( opinfo.boi_err ) {
 364                         case DB_LOCK_DEADLOCK:
 365                         case DB_LOCK_NOTGRANTED:
 366                                 goto retry;
 367                         }
 368
 369                         rs->sr_err = LDAP_INSUFFICIENT_ACCESS;
 370 #ifdef NEW_LOGGING
 371                         LDAP_LOG ( OPERATION, ERR,
 372                                 "==>bdb_modrdn: no access to parent\n", 0, 0, 0 );
 373 #else
 374                         Debug( LDAP_DEBUG_TRACE, "no access to parent\n", 0,
 375                                 0, 0 );
 376 #endif
 377                         rs->sr_text = "no write access to old parent's children";
 378                         goto return_results;
 379                 }
 380
 381 #ifdef NEW_LOGGING
 382                 LDAP_LOG ( OPERATION, DETAIL1,
 383                         "==>bdb_modrdn: wr to children %s is OK\n", p_ndn.bv_val, 0, 0 );
 384 #else
 385                 Debug( LDAP_DEBUG_TRACE,
 386                         "bdb_modrdn: wr to children of entry %s OK\n",
 387                         p_ndn.bv_val, 0, 0 );
 388 #endif
 389
 390                 if ( p_ndn.bv_val == slap_empty_bv.bv_val ) {
 391                         p_dn = slap_empty_bv;
 392                 } else {
 393                         dnParent( &e->e_name, &p_dn );
 394                 }
 395
 396 #ifdef NEW_LOGGING
 397                 LDAP_LOG ( OPERATION, DETAIL1,
 398                         "==>bdb_modrdn: parent dn=%s\n", p_dn.bv_val, 0, 0 );
 399 #else
 400                 Debug( LDAP_DEBUG_TRACE,
 401                         "bdb_modrdn: parent dn=%s\n",
 402                         p_dn.bv_val, 0, 0 );
 403 #endif
 404
 405         } else {
 406                 /* no parent, modrdn entry directly under root */
 407                 isroot = be_isroot( op );
 408                 if ( ! isroot ) {
 409                         if ( be_issuffix( op->o_bd, (struct berval *)&slap_empty_bv )
 410                                 || be_shadow_update( op ) ) {
 411
 412                                 p = (Entry *)&slap_entry_root;
 413
 414                                 /* check parent for "children" acl */
 415                                 rs->sr_err = access_allowed( op, p,
 416                                         children, NULL, ACL_WRITE, NULL );
 417
 418                                 p = NULL;
 419
 420                                 if ( ! rs->sr_err ) {
 421                                         switch( opinfo.boi_err ) {
 422                                         case DB_LOCK_DEADLOCK:
 423                                         case DB_LOCK_NOTGRANTED:
 424                                                 goto retry;
 425                                         }
 426
 427                                         rs->sr_err = LDAP_INSUFFICIENT_ACCESS;
 428 #ifdef NEW_LOGGING
 429                                         LDAP_LOG ( OPERATION, ERR,
 430                                                 "==>bdb_modrdn: no access to parent\n", 0, 0, 0 );
 431 #else
 432                                         Debug( LDAP_DEBUG_TRACE,
 433                                                 "no access to parent\n",
 434                                                 0, 0, 0 );
 435 #endif
 436                                         rs->sr_text = "no write access to old parent";
 437                                         goto return_results;
 438                                 }
 439
 440 #ifdef NEW_LOGGING
 441                                 LDAP_LOG ( OPERATION, DETAIL1,
 442                                         "==>bdb_modrdn: wr to children of entry \"%s\" OK\n",
 443                                         p_dn.bv_val, 0, 0 );
 444 #else
 445                                 Debug( LDAP_DEBUG_TRACE,
 446                                         "bdb_modrdn: wr to children of entry \"\" OK\n",
 447                                         0, 0, 0 );
 448 #endif
 449
 450                                 p_dn.bv_val = "";
 451                                 p_dn.bv_len = 0;
 452
 453 #ifdef NEW_LOGGING
 454                                 LDAP_LOG ( OPERATION, DETAIL1,
 455                                         "==>bdb_modrdn: parent dn=\"\" \n", 0, 0, 0 );
 456 #else
 457                                 Debug( LDAP_DEBUG_TRACE,
 458                                         "bdb_modrdn: parent dn=\"\"\n",
 459                                         0, 0, 0 );
 460 #endif
 461
 462                         } else {
 463 #ifdef NEW_LOGGING
 464                                 LDAP_LOG ( OPERATION, ERR,
 465                                         "==>bdb_modrdn: no parent, not root &\"\" is not "
 466                                         "suffix\n", 0, 0, 0 );
 467 #else
 468                                 Debug( LDAP_DEBUG_TRACE,
 469                                         "bdb_modrdn: no parent, not root "
 470                                         "& \"\" is not suffix\n",
 471                                         0, 0, 0);
 472 #endif
 473                                 rs->sr_text = "no write access to old parent";
 474                                 rs->sr_err = LDAP_INSUFFICIENT_ACCESS;
 475                                 goto return_results;
 476                         }
 477                 }
 478         }
 479
 480         new_parent_dn = &p_dn;  /* New Parent unless newSuperior given */
 481
 482         if ( op->oq_modrdn.rs_newSup != NULL ) {
 483 #ifdef NEW_LOGGING
 484                 LDAP_LOG ( OPERATION, DETAIL1,
 485                         "==>bdb_modrdn: new parent \"%s\" requested...\n",
 486                         op->oq_modrdn.rs_newSup->bv_val, 0, 0 );
 487 #else
 488                 Debug( LDAP_DEBUG_TRACE,
 489                         "bdb_modrdn: new parent \"%s\" requested...\n",
 490                         op->oq_modrdn.rs_newSup->bv_val, 0, 0 );
 491 #endif
 492
 493                 /*  newSuperior == oldParent? */
 494                 if( dn_match( &p_ndn, op->oq_modrdn.rs_nnewSup ) ) {
 495 #ifdef NEW_LOGGING
 496                         LDAP_LOG( BACK_BDB, INFO, "bdb_back_modrdn: "
 497                                 "new parent \"%s\" same as the old parent \"%s\"\n",
 498                                 op->oq_modrdn.rs_newSup->bv_val, p_dn.bv_val, 0 );
 499 #else
 500                         Debug( LDAP_DEBUG_TRACE, "bdb_back_modrdn: "
 501                                 "new parent \"%s\" same as the old parent \"%s\"\n",
 502                                 op->oq_modrdn.rs_newSup->bv_val, p_dn.bv_val, 0 );
 503 #endif
 504                         op->oq_modrdn.rs_newSup = NULL; /* ignore newSuperior */
 505                 }
 506         }
 507
 508         if ( op->oq_modrdn.rs_newSup != NULL ) {
 509                 if ( op->oq_modrdn.rs_newSup->bv_len ) {
 510                         np_dn = op->oq_modrdn.rs_newSup;
 511                         np_ndn = op->oq_modrdn.rs_nnewSup;
 512
 513                         /* newSuperior == oldParent?, if so ==> ERROR */
 514                         /* newSuperior == entry being moved?, if so ==> ERROR */
 515                         /* Get Entry with dn=newSuperior. Does newSuperior exist? */
 516
 517                         rs->sr_err = bdb_dn2entry( op, ltid, np_ndn,
 518                                 &neip, 0, locker, &nplock );
 519
 520                         switch( rs->sr_err ) {
 521                         case 0: np = neip->bei_e;
 522                         case DB_NOTFOUND:
 523                                 break;
 524                         case DB_LOCK_DEADLOCK:
 525                         case DB_LOCK_NOTGRANTED:
 526                                 goto retry;
 527                         case LDAP_BUSY:
 528                                 rs->sr_text = "ldap server busy";
 529                                 goto return_results;
 530                         default:
 531                                 rs->sr_err = LDAP_OTHER;
 532                                 rs->sr_text = "internal error";
 533                                 goto return_results;
 534                         }
 535
 536                         if( np == NULL) {
 537 #ifdef NEW_LOGGING
 538                                 LDAP_LOG ( OPERATION, DETAIL1,
 539                                         "==>bdb_modrdn: newSup(ndn=%s) not here!\n",
 540                                         np_ndn->bv_val, 0, 0 );
 541 #else
 542                                 Debug( LDAP_DEBUG_TRACE,
 543                                         "bdb_modrdn: newSup(ndn=%s) not here!\n",
 544                                         np_ndn->bv_val, 0, 0);
 545 #endif
 546                                 rs->sr_text = "new superior not found";
 547                                 rs->sr_err = LDAP_OTHER;
 548                                 goto return_results;
 549                         }
 550
 551 #ifdef NEW_LOGGING
 552                         LDAP_LOG ( OPERATION, DETAIL1,
 553                                 "==>bdb_modrdn: wr to new parent OK np=%p, id=%ld\n",
 554                                 (void *) np, (long) np->e_id, 0 );
 555 #else
 556                         Debug( LDAP_DEBUG_TRACE,
 557                                 "bdb_modrdn: wr to new parent OK np=%p, id=%ld\n",
 558                                 (void *) np, (long) np->e_id, 0 );
 559 #endif
 560
 561                         /* check newSuperior for "children" acl */
 562                         rs->sr_err = access_allowed( op, np, children,
 563                                 NULL, ACL_WRITE, NULL );
 564
 565                         if( ! rs->sr_err ) {
 566                                 switch( opinfo.boi_err ) {
 567                                 case DB_LOCK_DEADLOCK:
 568                                 case DB_LOCK_NOTGRANTED:
 569                                         goto retry;
 570                                 }
 571
 572 #ifdef NEW_LOGGING
 573                                 LDAP_LOG ( OPERATION, DETAIL1,
 574                                         "==>bdb_modrdn: no wr to newSup children\n", 0, 0, 0 );
 575 #else
 576                                 Debug( LDAP_DEBUG_TRACE,
 577                                         "bdb_modrdn: no wr to newSup children\n",
 578                                         0, 0, 0 );
 579 #endif
 580                                 rs->sr_text = "no write access to new superior's children";
 581                                 rs->sr_err = LDAP_INSUFFICIENT_ACCESS;
 582                                 goto return_results;
 583                         }
 584
 585 #ifdef BDB_ALIASES
 586                         if ( is_entry_alias( np ) ) {
 587                                 /* parent is an alias, don't allow add */
 588 #ifdef NEW_LOGGING
 589                                 LDAP_LOG ( OPERATION, DETAIL1,
 590                                         "==>bdb_modrdn: entry is alias\n", 0, 0, 0 );
 591 #else
 592                                 Debug( LDAP_DEBUG_TRACE, "bdb_modrdn: entry is alias\n",
 593                                         0, 0, 0 );
 594 #endif
 595                                 rs->sr_text = "new superior is an alias";
 596                                 rs->sr_err = LDAP_ALIAS_PROBLEM;
 597                                 goto return_results;
 598                         }
 599 #endif
 600
 601                         if ( is_entry_referral( np ) ) {
 602                                 /* parent is a referral, don't allow add */
 603 #ifdef NEW_LOGGING
 604                                 LDAP_LOG ( OPERATION, DETAIL1,
 605                                         "==>bdb_modrdn: entry is referral\n", 0, 0, 0 );
 606 #else
 607                                 Debug( LDAP_DEBUG_TRACE, "bdb_modrdn: entry is referral\n",
 608                                         0, 0, 0 );
 609 #endif
 610                                 rs->sr_text = "new superior is a referral";
 611                                 rs->sr_err = LDAP_OTHER;
 612                                 goto return_results;
 613                         }
 614
 615                 } else {
 616                         if ( isroot == -1 ) {
 617                                 isroot = be_isroot( op );
 618                         }
 619
 620                         np_dn = NULL;
 621
 622                         /* no parent, modrdn entry directly under root */
 623                         if ( ! isroot ) {
 624                                 if ( be_issuffix( op->o_bd, (struct berval *)&slap_empty_bv )
 625                                         || be_isupdate( op ) ) {
 626                                         np = (Entry *)&slap_entry_root;
 627
 628                                         /* check parent for "children" acl */
 629                                         rs->sr_err = access_allowed( op, np,
 630                                                 children, NULL, ACL_WRITE, NULL );
 631
 632                                         np = NULL;
 633
 634                                         if ( ! rs->sr_err ) {
 635                                                 switch( opinfo.boi_err ) {
 636                                                 case DB_LOCK_DEADLOCK:
 637                                                 case DB_LOCK_NOTGRANTED:
 638                                                         goto retry;
 639                                                 }
 640
 641                                                 rs->sr_err = LDAP_INSUFFICIENT_ACCESS;
 642 #ifdef NEW_LOGGING
 643                                                 LDAP_LOG ( OPERATION, ERR,
 644                                                         "==>bdb_modrdn: no access to superior\n", 0, 0, 0 );
 645 #else
 646                                                 Debug( LDAP_DEBUG_TRACE,
 647                                                         "no access to new superior\n",
 648                                                         0, 0, 0 );
 649 #endif
 650                                                 rs->sr_text =
 651                                                         "no write access to new superior's children";
 652                                                 goto return_results;
 653                                         }
 654
 655 #ifdef NEW_LOGGING
 656                                         LDAP_LOG ( OPERATION, DETAIL1,
 657                                                 "bdb_modrdn: wr to children entry \"\" OK\n", 0, 0, 0 );
 658 #else
 659                                         Debug( LDAP_DEBUG_TRACE,
 660                                                 "bdb_modrdn: wr to children of entry \"\" OK\n",
 661                                                 0, 0, 0 );
 662 #endif
 663
 664                                 } else {
 665 #ifdef NEW_LOGGING
 666                                         LDAP_LOG ( OPERATION, ERR,
 667                                                 "bdb_modrdn: new superior=\"\", not root & \"\" "
 668                                                 "is not suffix\n", 0, 0, 0 );
 669 #else
 670                                         Debug( LDAP_DEBUG_TRACE,
 671                                                 "bdb_modrdn: new superior=\"\", not root "
 672                                                 "& \"\" is not suffix\n",
 673                                                 0, 0, 0);
 674 #endif
 675                                         rs->sr_text = "no write access to new superior's children";
 676                                         rs->sr_err = LDAP_INSUFFICIENT_ACCESS;
 677                                         goto return_results;
 678                                 }
 679                         }
 680
 681 #ifdef NEW_LOGGING
 682                         LDAP_LOG ( OPERATION, DETAIL1,
 683                                 "bdb_modrdn: new superior=\"\"\n", 0, 0, 0 );
 684 #else
 685                         Debug( LDAP_DEBUG_TRACE,
 686                                 "bdb_modrdn: new superior=\"\"\n",
 687                                 0, 0, 0 );
 688 #endif
 689                 }
 690
 691 #ifdef NEW_LOGGING
 692                 LDAP_LOG ( OPERATION, DETAIL1,
 693                         "bdb_modrdn: wr to new parent's children OK\n", 0, 0, 0 );
 694 #else
 695                 Debug( LDAP_DEBUG_TRACE,
 696                         "bdb_modrdn: wr to new parent's children OK\n",
 697                         0, 0, 0 );
 698 #endif
 699
 700                 new_parent_dn = np_dn;
 701         }
 702
 703         /* Build target dn and make sure target entry doesn't exist already. */
 704         if (!new_dn.bv_val) {
 705                 build_new_dn( &new_dn, new_parent_dn, &op->oq_modrdn.rs_newrdn, NULL );
 706         }
 707
 708         if (!new_ndn.bv_val) {
 709                 struct berval bv = {0, NULL};
 710                 dnNormalize( 0, NULL, NULL, &new_dn, &bv, op->o_tmpmemctx );
 711                 ber_dupbv( &new_ndn, &bv );
 712         }
 713
 714 #ifdef NEW_LOGGING
 715         LDAP_LOG ( OPERATION, RESULTS,
 716                 "bdb_modrdn: new ndn=%s\n", new_ndn.bv_val, 0, 0 );
 717 #else
 718         Debug( LDAP_DEBUG_TRACE, "bdb_modrdn: new ndn=%s\n",
 719                 new_ndn.bv_val, 0, 0 );
 720 #endif
 721
 722         /* Shortcut the search */
 723         nei = neip ? neip : eip;
 724         rs->sr_err = bdb_cache_find_ndn ( op, ltid, &new_ndn, &nei );
 725         if ( nei ) bdb_cache_entryinfo_unlock( nei );
 726         switch( rs->sr_err ) {
 727         case DB_LOCK_DEADLOCK:
 728         case DB_LOCK_NOTGRANTED:
 729                 goto retry;
 730         case DB_NOTFOUND:
 731                 break;
 732         case 0:
 733                 rs->sr_err = LDAP_ALREADY_EXISTS;
 734                 goto return_results;
 735         default:
 736                 rs->sr_err = LDAP_OTHER;
 737                 rs->sr_text = "internal error";
 738                 goto return_results;
 739         }
 740
 741         /* Get attribute type and attribute value of our new rdn, we will
 742          * need to add that to our new entry
 743          */
 744         if ( !new_rdn && ldap_bv2rdn_x( &op->oq_modrdn.rs_newrdn, &new_rdn,
 745                 (char **)&rs->sr_text, LDAP_DN_FORMAT_LDAP, op->o_tmpmemctx ) )
 746         {
 747 #ifdef NEW_LOGGING
 748                 LDAP_LOG ( OPERATION, ERR,
 749                         "bdb_modrdn: can't figure out "
 750                         "type(s)/values(s) of newrdn\n",
 751                         0, 0, 0 );
 752 #else
 753                 Debug( LDAP_DEBUG_TRACE,
 754                         "bdb_modrdn: can't figure out "
 755                         "type(s)/values(s) of newrdn\n",
 756                         0, 0, 0 );
 757 #endif
 758                 rs->sr_err = LDAP_INVALID_DN_SYNTAX;
 759                 rs->sr_text = "unknown type(s) used in RDN";
 760                 goto return_results;
 761         }
 762
 763 #ifdef NEW_LOGGING
 764         LDAP_LOG ( OPERATION, RESULTS,
 765                 "bdb_modrdn: new_rdn_type=\"%s\", new_rdn_val=\"%s\"\n",
 766                 new_rdn[ 0 ]->la_attr.bv_val, new_rdn[ 0 ]->la_value.bv_val, 0 );
 767 #else
 768         Debug( LDAP_DEBUG_TRACE,
 769                 "bdb_modrdn: new_rdn_type=\"%s\", new_rdn_val=\"%s\"\n",
 770                 new_rdn[ 0 ]->la_attr.bv_val, new_rdn[ 0 ]->la_value.bv_val, 0 );
 771 #endif
 772
 773         if ( op->oq_modrdn.rs_deleteoldrdn ) {
 774                 if ( !old_rdn && ldap_bv2rdn_x( &op->o_req_dn, &old_rdn,
 775                         (char **)&rs->sr_text, LDAP_DN_FORMAT_LDAP, op->o_tmpmemctx ) )
 776                 {
 777 #ifdef NEW_LOGGING
 778                         LDAP_LOG ( OPERATION, ERR,
 779                                 "bdb_modrdn: can't figure out "
 780                                 "type(s)/values(s) of old_rdn\n",
 781                                 0, 0, 0 );
 782 #else
 783                         Debug( LDAP_DEBUG_TRACE,
 784                                 "bdb_modrdn: can't figure out "
 785                                 "the old_rdn type(s)/value(s)\n",
 786                                 0, 0, 0 );
 787 #endif
 788                         rs->sr_err = LDAP_OTHER;
 789                         rs->sr_text = "cannot parse RDN from old DN";
 790                         goto return_results;
 791                 }
 792         }
 793
 794         /* prepare modlist of modifications from old/new rdn */
 795         if (!mod) {
 796                 rs->sr_err = slap_modrdn2mods( op, rs, e, old_rdn, new_rdn, &mod );
 797                 if ( rs->sr_err != LDAP_SUCCESS ) {
 798                         goto return_results;
 799                 }
 800         }
 801
 802         if( op->o_preread ) {
 803                 if( preread_ctrl == NULL ) {
 804                         preread_ctrl = &ctrls[num_ctrls++];
 805                         ctrls[num_ctrls] = NULL;
 806                 }
 807                 if( slap_read_controls( op, rs, e,
 808                         &slap_pre_read_bv, preread_ctrl ) )
 809                 {
 810 #ifdef NEW_LOGGING
 811                         LDAP_LOG ( OPERATION, DETAIL1,
 812                                 "<=- bdb_modrdn: post-read failed!\n", 0, 0, 0 );
 813 #else
 814                         Debug( LDAP_DEBUG_TRACE,
 815                                 "<=- bdb_modrdn: post-read failed!\n", 0, 0, 0 );
 816 #endif
 817                         goto return_results;
 818                 }
 819         }
 820
 821         /* nested transaction */
 822         rs->sr_err = TXN_BEGIN( bdb->bi_dbenv, ltid, &lt2, bdb->bi_db_opflags );
 823         rs->sr_text = NULL;
 824         if( rs->sr_err != 0 ) {
 825 #ifdef NEW_LOGGING
 826                 LDAP_LOG ( OPERATION, ERR,
 827                         "bdb_modrdn: txn_begin(2) failed: %s (%d)\n",
 828                         db_strerror(rs->sr_err), rs->sr_err, 0 );
 829 #else
 830                 Debug( LDAP_DEBUG_TRACE,
 831                         "bdb_modrdn: txn_begin(2) failed: %s (%d)\n",
 832                         db_strerror(rs->sr_err), rs->sr_err, 0 );
 833 #endif
 834                 rs->sr_err = LDAP_OTHER;
 835                 rs->sr_text = "internal error";
 836                 goto return_results;
 837         }
 838
 839         /* delete old DN */
 840         rs->sr_err = bdb_dn2id_delete( op, lt2, eip, e );
 841         if ( rs->sr_err != 0 ) {
 842 #ifdef NEW_LOGGING
 843                 LDAP_LOG ( OPERATION, ERR,
 844                         "<=- bdb_modrdn: dn2id del failed: %s (%d)\n",
 845                         db_strerror(rs->sr_err), rs->sr_err, 0 );
 846 #else
 847                 Debug(LDAP_DEBUG_TRACE,
 848                         "<=- bdb_modrdn: dn2id del failed: %s (%d)\n",
 849                         db_strerror(rs->sr_err), rs->sr_err, 0 );
 850 #endif
 851                 switch( rs->sr_err ) {
 852                 case DB_LOCK_DEADLOCK:
 853                 case DB_LOCK_NOTGRANTED:
 854                         goto retry;
 855                 }
 856                 rs->sr_err = LDAP_OTHER;
 857                 rs->sr_text = "DN index delete fail";
 858                 goto return_results;
 859         }
 860
 861         /* copy the entry, then override some fields */
 862         dummy = *e;
 863         dummy.e_name = new_dn;
 864         dummy.e_nname = new_ndn;
 865         dummy.e_attrs = NULL;
 866
 867         /* add new DN */
 868         rs->sr_err = bdb_dn2id_add( op, lt2, neip ? neip : eip, &dummy );
 869         if ( rs->sr_err != 0 ) {
 870 #ifdef NEW_LOGGING
 871                 LDAP_LOG ( OPERATION, ERR,
 872                         "<=- bdb_modrdn: dn2id add failed: %s (%d)\n",
 873                         db_strerror(rs->sr_err), rs->sr_err, 0 );
 874 #else
 875                 Debug(LDAP_DEBUG_TRACE,
 876                         "<=- bdb_modrdn: dn2id add failed: %s (%d)\n",
 877                         db_strerror(rs->sr_err), rs->sr_err, 0 );
 878 #endif
 879                 switch( rs->sr_err ) {
 880                 case DB_LOCK_DEADLOCK:
 881                 case DB_LOCK_NOTGRANTED:
 882                         goto retry;
 883                 }
 884                 rs->sr_err = LDAP_OTHER;
 885                 rs->sr_text = "DN index add failed";
 886                 goto return_results;
 887         }
 888
 889         dummy.e_attrs = e->e_attrs;
 890
 891         if ( rs->sr_err == LDAP_SUCCESS && !op->o_noop && !op->o_no_psearch ) {
 892                 ldap_pvt_thread_rdwr_wlock( &bdb->bi_pslist_rwlock );
 893                 LDAP_LIST_FOREACH ( ps_list, &bdb->bi_psearch_list, o_ps_link ) {
 894                         rc = bdb_psearch( op, rs, ps_list, &dummy, LDAP_PSEARCH_BY_PREMODIFY );
 895                         if ( rc ) {
 896 #ifdef NEW_LOGGING
 897                                 LDAP_LOG ( OPERATION, ERR,
 898                                         "bdb_modrdn: persistent search failed (%d,%d)\n",
 899                                         rc, rs->sr_err, 0 );
 900 #else
 901                                 Debug( LDAP_DEBUG_TRACE,
 902                                         "bdb_modrdn: persistent search failed (%d,%d)\n",
 903                                         rc, rs->sr_err, 0 );
 904 #endif
 905                         }
 906                 }
 907                 ldap_pvt_thread_rdwr_wunlock( &bdb->bi_pslist_rwlock );
 908         }
 909
 910
 911         /* modify entry */
 912         rs->sr_err = bdb_modify_internal( op, lt2, &mod[0], &dummy,
 913                 &rs->sr_text, textbuf, textlen );
 914         if( rs->sr_err != LDAP_SUCCESS ) {
 915 #ifdef NEW_LOGGING
 916                 LDAP_LOG ( OPERATION, ERR,
 917                         "<=- bdb_modrdn: modify failed: %s (%d)\n",
 918                         db_strerror(rs->sr_err), rs->sr_err, 0 );
 919 #else
 920                 Debug(LDAP_DEBUG_TRACE,
 921                         "<=- bdb_modrdn: modify failed: %s (%d)\n",
 922                         db_strerror(rs->sr_err), rs->sr_err, 0 );
 923 #endif
 924                 if ( ( rs->sr_err == LDAP_INSUFFICIENT_ACCESS ) && opinfo.boi_err ) {
 925                         rs->sr_err = opinfo.boi_err;
 926                 }
 927                 if ( dummy.e_attrs == e->e_attrs ) dummy.e_attrs = NULL;
 928                 switch( rs->sr_err ) {
 929                 case DB_LOCK_DEADLOCK:
 930                 case DB_LOCK_NOTGRANTED:
 931                         goto retry;
 932                 }
 933                 goto return_results;
 934         }
 935
 936         /* id2entry index */
 937         rs->sr_err = bdb_id2entry_update( op->o_bd, lt2, &dummy );
 938         if ( rs->sr_err != 0 ) {
 939 #ifdef NEW_LOGGING
 940                 LDAP_LOG ( OPERATION, ERR,
 941                         "<=- bdb_modrdn: id2entry failed: %s (%d)\n",
 942                         db_strerror(rs->sr_err), rs->sr_err, 0 );
 943 #else
 944                 Debug(LDAP_DEBUG_TRACE,
 945                         "<=- bdb_modrdn: id2entry failed: %s (%d)\n",
 946                         db_strerror(rs->sr_err), rs->sr_err, 0 );
 947 #endif
 948                 switch( rs->sr_err ) {
 949                 case DB_LOCK_DEADLOCK:
 950                 case DB_LOCK_NOTGRANTED:
 951                         goto retry;
 952                 }
 953                 rs->sr_err = LDAP_OTHER;
 954                 rs->sr_text = "entry update failed";
 955                 goto return_results;
 956         }
 957
 958         if ( p_ndn.bv_len != 0 ) {
 959                 parent_is_glue = is_entry_glue(p);
 960                 rs->sr_err = bdb_cache_children( op, lt2, p );
 961                 if ( rs->sr_err != DB_NOTFOUND ) {
 962                         switch( rs->sr_err ) {
 963                         case DB_LOCK_DEADLOCK:
 964                         case DB_LOCK_NOTGRANTED:
 965                                 goto retry;
 966                         case 0:
 967                                 break;
 968                         default:
 969 #ifdef NEW_LOGGING
 970                                 LDAP_LOG ( OPERATION, ERR,
 971                                         "<=- bdb_modrdn: has_children failed %s (%d)\n",
 972                                         db_strerror(rs->sr_err), rs->sr_err, 0 );
 973 #else
 974                                 Debug(LDAP_DEBUG_ARGS,
 975                                         "<=- bdb_modrdn: has_children failed: %s (%d)\n",
 976                                         db_strerror(rs->sr_err), rs->sr_err, 0 );
 977 #endif
 978                                 rs->sr_err = LDAP_OTHER;
 979                                 rs->sr_text = "internal error";
 980                                 goto return_results;
 981                         }
 982                         parent_is_leaf = 1;
 983                 }
 984                 bdb_unlocked_cache_return_entry_r(&bdb->bi_cache, p);
 985                 p = NULL;
 986         }
 987
 988         if ( TXN_COMMIT( lt2, 0 ) != 0 ) {
 989                 rs->sr_err = LDAP_OTHER;
 990                 rs->sr_text = "txn_commit(2) failed";
 991                 goto return_results;
 992         }
 993
 994         if ( LDAP_STAILQ_EMPTY( &op->o_bd->be_syncinfo )) {
 995                 rc = bdb_csn_commit( op, rs, ltid, ei, &suffix_ei,
 996                         &ctxcsn_e, &ctxcsn_added, locker );
 997                 switch ( rc ) {
 998                 case BDB_CSN_ABORT :
 999                         goto return_results;
1000                 case BDB_CSN_RETRY :
1001                         goto retry;
1002                 }
1003         }
1004
1005         if( op->o_postread ) {
1006                 if( postread_ctrl == NULL ) {
1007                         postread_ctrl = &ctrls[num_ctrls++];
1008                         ctrls[num_ctrls] = NULL;
1009                 }
1010                 if( slap_read_controls( op, rs, &dummy,
1011                         &slap_post_read_bv, postread_ctrl ) )
1012                 {
1013 #ifdef NEW_LOGGING
1014                         LDAP_LOG ( OPERATION, DETAIL1,
1015                                 "<=- bdb_modrdn: post-read failed!\n", 0, 0, 0 );
1016 #else
1017                         Debug( LDAP_DEBUG_TRACE,
1018                                 "<=- bdb_modrdn: post-read failed!\n", 0, 0, 0 );
1019 #endif
1020                         goto return_results;
1021                 }
1022         }
1023
1024         if( op->o_noop ) {
1025                 if(( rs->sr_err=TXN_ABORT( ltid )) != 0 ) {
1026                         rs->sr_text = "txn_abort (no-op) failed";
1027                 } else {
1028                         rs->sr_err = LDAP_SUCCESS;
1029                         goto return_results;
1030                 }
1031
1032         } else {
1033                 rc = bdb_cache_modrdn( e, &op->orr_nnewrdn, &dummy, neip,
1034                         bdb->bi_dbenv, locker, &lock );
1035                 switch( rc ) {
1036                 case DB_LOCK_DEADLOCK:
1037                 case DB_LOCK_NOTGRANTED:
1038                         goto retry;
1039                 }
1040                 dummy.e_attrs = NULL;
1041                 new_dn.bv_val = NULL;
1042                 new_ndn.bv_val = NULL;
1043
1044                 if ( LDAP_STAILQ_EMPTY( &op->o_bd->be_syncinfo )) {
1045                         if ( ctxcsn_added ) {
1046                                 bdb_cache_add( bdb, suffix_ei, ctxcsn_e,
1047                                         (struct berval *)&slap_ldapsync_cn_bv, locker );
1048                         }
1049                 }
1050
1051                 if ( rs->sr_err == LDAP_SUCCESS ) {
1052                         /* Loop through in-scope entries for each psearch spec */
1053                         ldap_pvt_thread_rdwr_wlock( &bdb->bi_pslist_rwlock );
1054                         LDAP_LIST_FOREACH ( ps_list, &bdb->bi_psearch_list, o_ps_link ) {
1055                                 rc = bdb_psearch( op, rs, ps_list, e, LDAP_PSEARCH_BY_MODIFY );
1056                                 if ( rc ) {
1057 #ifdef NEW_LOGGING
1058                                         LDAP_LOG ( OPERATION, ERR,
1059                                                 "bdb_modrdn: persistent search failed (%d,%d)\n",
1060                                                 rc, rs->sr_err, 0 );
1061 #else
1062                                         Debug( LDAP_DEBUG_TRACE,
1063                                                 "bdb_modrdn: persistent search failed (%d,%d)\n",
1064                                                 rc, rs->sr_err, 0 );
1065 #endif
1066                         }
1067                         }
1068                         pm_list = LDAP_LIST_FIRST(&op->o_pm_list);
1069                         while ( pm_list != NULL ) {
1070                                 rc = bdb_psearch(op, rs, pm_list->ps_op,
1071                                                         e, LDAP_PSEARCH_BY_SCOPEOUT);
1072                                 if ( rc ) {
1073 #ifdef NEW_LOGGING
1074                                         LDAP_LOG ( OPERATION, ERR,
1075                                                 "bdb_modrdn: persistent search failed (%d,%d)\n",
1076                                                 rc, rs->sr_err, 0 );
1077 #else
1078                                         Debug( LDAP_DEBUG_TRACE,
1079                                                 "bdb_modrdn: persistent search failed (%d,%d)\n",
1080                                                 rc, rs->sr_err, 0 );
1081 #endif
1082                                 }
1083                                 pm_prev = pm_list;
1084                                 LDAP_LIST_REMOVE ( pm_list, ps_link );
1085                                 pm_list = LDAP_LIST_NEXT ( pm_list, ps_link );
1086                                 ch_free( pm_prev );
1087                         }
1088                         ldap_pvt_thread_rdwr_wunlock( &bdb->bi_pslist_rwlock );
1089                 }
1090
1091                 if(( rs->sr_err=TXN_COMMIT( ltid, 0 )) != 0 ) {
1092                         rs->sr_text = "txn_commit failed";
1093                 } else {
1094                         rs->sr_err = LDAP_SUCCESS;
1095                 }
1096         }
1097
1098         ltid = NULL;
1099         op->o_private = NULL;
1100
1101         if( rs->sr_err != LDAP_SUCCESS ) {
1102 #ifdef NEW_LOGGING
1103                 LDAP_LOG ( OPERATION, RESULTS, "bdb_modrdn: %s : %s (%d)\n",
1104                         rs->sr_text, db_strerror(rs->sr_err), rs->sr_err );
1105 #else
1106                 Debug( LDAP_DEBUG_TRACE, "bdb_add: %s : %s (%d)\n",
1107                         rs->sr_text, db_strerror(rs->sr_err), rs->sr_err );
1108 #endif
1109                 rs->sr_err = LDAP_OTHER;
1110
1111                 goto return_results;
1112         }
1113
1114 #ifdef NEW_LOGGING
1115         LDAP_LOG ( OPERATION, RESULTS,
1116                 "bdb_modrdn: rdn modified%s id=%08lx dn=\"%s\"\n",
1117                 op->o_noop ? " (no-op)" : "",
1118                 e->e_id, e->e_dn );
1119 #else
1120         Debug(LDAP_DEBUG_TRACE,
1121                 "bdb_modrdn: rdn modified%s id=%08lx dn=\"%s\"\n",
1122                 op->o_noop ? " (no-op)" : "",
1123                 e->e_id, e->e_dn );
1124 #endif
1125         rs->sr_text = NULL;
1126         if( num_ctrls ) rs->sr_ctrls = ctrls;
1127
1128 return_results:
1129         if ( dummy.e_attrs ) {
1130                 attrs_free( dummy.e_attrs );
1131         }
1132         send_ldap_result( op, rs );
1133
1134         if( rs->sr_err == LDAP_SUCCESS && bdb->bi_txn_cp ) {
1135                 ldap_pvt_thread_yield();
1136                 TXN_CHECKPOINT( bdb->bi_dbenv,
1137                         bdb->bi_txn_cp_kbyte, bdb->bi_txn_cp_min, 0 );
1138         }
1139
1140         if ( rs->sr_err == LDAP_SUCCESS && parent_is_glue && parent_is_leaf ) {
1141                 op->o_delete_glue_parent = 1;
1142         }
1143
1144 done:
1145         if( new_dn.bv_val != NULL ) free( new_dn.bv_val );
1146         if( new_ndn.bv_val != NULL ) free( new_ndn.bv_val );
1147
1148         /* LDAP v2 supporting correct attribute handling. */
1149         if ( new_rdn != NULL ) {
1150                 ldap_rdnfree_x( new_rdn, op->o_tmpmemctx );
1151         }
1152         if ( old_rdn != NULL ) {
1153                 ldap_rdnfree_x( old_rdn, op->o_tmpmemctx );
1154         }
1155         if( mod != NULL ) {
1156                 Modifications *tmp;
1157                 for (; mod; mod=tmp ) {
1158                         tmp = mod->sml_next;
1159                         /* slap_modrdn2mods does things one way,
1160                          * slap_mods_opattrs does it differently
1161                          */
1162                         if ( mod->sml_op != SLAP_MOD_SOFTADD &&
1163                                 mod->sml_op != LDAP_MOD_DELETE ) break;
1164                         if ( mod->sml_nvalues ) free( mod->sml_nvalues[0].bv_val );
1165                         free( mod );
1166                 }
1167                 slap_mods_free( mod );
1168         }
1169
1170         /* LDAP v3 Support */
1171         if( np != NULL ) {
1172                 /* free new parent and reader lock */
1173                 bdb_unlocked_cache_return_entry_r(&bdb->bi_cache, np);
1174         }
1175
1176         if( p != NULL ) {
1177                 /* free parent and reader lock */
1178                 bdb_unlocked_cache_return_entry_r(&bdb->bi_cache, p);
1179         }
1180
1181         /* free entry */
1182         if( e != NULL ) {
1183                 bdb_unlocked_cache_return_entry_w( &bdb->bi_cache, e);
1184         }
1185
1186         if( ltid != NULL ) {
1187                 pm_list = LDAP_LIST_FIRST(&op->o_pm_list);
1188                 while ( pm_list != NULL ) {
1189                         LDAP_LIST_REMOVE ( pm_list, ps_link );
1190                         pm_prev = pm_list;
1191                         pm_list = LDAP_LIST_NEXT ( pm_list, ps_link );
1192                         ch_free( pm_prev );
1193                 }
1194                 TXN_ABORT( ltid );
1195                 op->o_private = NULL;
1196         }
1197
1198         if( preread_ctrl != NULL ) {
1199                 slap_sl_free( (*preread_ctrl)->ldctl_value.bv_val, &op->o_tmpmemctx );
1200                 slap_sl_free( *preread_ctrl, &op->o_tmpmemctx );
1201         }
1202         if( postread_ctrl != NULL ) {
1203                 slap_sl_free( (*postread_ctrl)->ldctl_value.bv_val, &op->o_tmpmemctx );
1204                 slap_sl_free( *postread_ctrl, &op->o_tmpmemctx );
1205         }
1206         return rs->sr_err;
1207 }