Home | History | Annotate | Line # | Download | only in back-mdb
modrdn.c revision 1.1
      1 /*	$NetBSD: modrdn.c,v 1.1 2014/05/28 09:58:50 tron Exp $	*/
      2 
      3 /* modrdn.c - mdb backend modrdn routine */
      4 /* $OpenLDAP$ */
      5 /* This work is part of OpenLDAP Software <http://www.openldap.org/>.
      6  *
      7  * Copyright 2000-2014 The OpenLDAP Foundation.
      8  * All rights reserved.
      9  *
     10  * Redistribution and use in source and binary forms, with or without
     11  * modification, are permitted only as authorized by the OpenLDAP
     12  * Public License.
     13  *
     14  * A copy of this license is available in the file LICENSE in the
     15  * top-level directory of the distribution or, alternatively, at
     16  * <http://www.OpenLDAP.org/license.html>.
     17  */
     18 
     19 #include "portable.h"
     20 
     21 #include <stdio.h>
     22 #include <ac/string.h>
     23 
     24 #include "back-mdb.h"
     25 
     26 int
     27 mdb_modrdn( Operation	*op, SlapReply *rs )
     28 {
     29 	struct mdb_info *mdb = (struct mdb_info *) op->o_bd->be_private;
     30 	AttributeDescription *children = slap_schema.si_ad_children;
     31 	AttributeDescription *entry = slap_schema.si_ad_entry;
     32 	struct berval	p_dn, p_ndn;
     33 	struct berval	new_dn = {0, NULL}, new_ndn = {0, NULL};
     34 	Entry		*e = NULL;
     35 	Entry		*p = NULL;
     36 	/* LDAP v2 supporting correct attribute handling. */
     37 	char textbuf[SLAP_TEXT_BUFLEN];
     38 	size_t textlen = sizeof textbuf;
     39 	MDB_txn		*txn = NULL;
     40 	MDB_cursor	*mc;
     41 	struct mdb_op_info opinfo = {{{ 0 }}}, *moi = &opinfo;
     42 	Entry dummy = {0};
     43 
     44 	Entry		*np = NULL;			/* newSuperior Entry */
     45 	struct berval	*np_dn = NULL;			/* newSuperior dn */
     46 	struct berval	*np_ndn = NULL;			/* newSuperior ndn */
     47 	struct berval	*new_parent_dn = NULL;	/* np_dn, p_dn, or NULL */
     48 
     49 	int		manageDSAit = get_manageDSAit( op );
     50 
     51 	ID nid, nsubs;
     52 	LDAPControl **preread_ctrl = NULL;
     53 	LDAPControl **postread_ctrl = NULL;
     54 	LDAPControl *ctrls[SLAP_MAX_RESPONSE_CONTROLS];
     55 	int num_ctrls = 0;
     56 
     57 	int parent_is_glue = 0;
     58 	int parent_is_leaf = 0;
     59 
     60 #ifdef LDAP_X_TXN
     61 	int settle = 0;
     62 #endif
     63 
     64 	Debug( LDAP_DEBUG_TRACE, "==>" LDAP_XSTRING(mdb_modrdn) "(%s,%s,%s)\n",
     65 		op->o_req_dn.bv_val,op->oq_modrdn.rs_newrdn.bv_val,
     66 		op->oq_modrdn.rs_newSup ? op->oq_modrdn.rs_newSup->bv_val : "NULL" );
     67 
     68 #ifdef LDAP_X_TXN
     69 	if( op->o_txnSpec ) {
     70 		/* acquire connection lock */
     71 		ldap_pvt_thread_mutex_lock( &op->o_conn->c_mutex );
     72 		if( op->o_conn->c_txn == CONN_TXN_INACTIVE ) {
     73 			rs->sr_text = "invalid transaction identifier";
     74 			rs->sr_err = LDAP_X_TXN_ID_INVALID;
     75 			goto txnReturn;
     76 		} else if( op->o_conn->c_txn == CONN_TXN_SETTLE ) {
     77 			settle=1;
     78 			goto txnReturn;
     79 		}
     80 
     81 		if( op->o_conn->c_txn_backend == NULL ) {
     82 			op->o_conn->c_txn_backend = op->o_bd;
     83 
     84 		} else if( op->o_conn->c_txn_backend != op->o_bd ) {
     85 			rs->sr_text = "transaction cannot span multiple database contexts";
     86 			rs->sr_err = LDAP_AFFECTS_MULTIPLE_DSAS;
     87 			goto txnReturn;
     88 		}
     89 
     90 		/* insert operation into transaction */
     91 
     92 		rs->sr_text = "transaction specified";
     93 		rs->sr_err = LDAP_X_TXN_SPECIFY_OKAY;
     94 
     95 txnReturn:
     96 		/* release connection lock */
     97 		ldap_pvt_thread_mutex_unlock( &op->o_conn->c_mutex );
     98 
     99 		if( !settle ) {
    100 			send_ldap_result( op, rs );
    101 			return rs->sr_err;
    102 		}
    103 	}
    104 #endif
    105 
    106 	ctrls[num_ctrls] = NULL;
    107 
    108 	/* begin transaction */
    109 	rs->sr_err = mdb_opinfo_get( op, mdb, 0, &moi );
    110 	rs->sr_text = NULL;
    111 	if( rs->sr_err != 0 ) {
    112 		Debug( LDAP_DEBUG_TRACE,
    113 			LDAP_XSTRING(mdb_modrdn) ": txn_begin failed: "
    114 			"%s (%d)\n", mdb_strerror(rs->sr_err), rs->sr_err, 0 );
    115 		rs->sr_err = LDAP_OTHER;
    116 		rs->sr_text = "internal error";
    117 		goto return_results;
    118 	}
    119 	txn = moi->moi_txn;
    120 
    121 	slap_mods_opattrs( op, &op->orr_modlist, 1 );
    122 
    123 	if ( be_issuffix( op->o_bd, &op->o_req_ndn ) ) {
    124 #ifdef MDB_MULTIPLE_SUFFIXES
    125 		/* Allow renaming one suffix entry to another */
    126 		p_ndn = slap_empty_bv;
    127 #else
    128 		/* There can only be one suffix entry */
    129 		rs->sr_err = LDAP_NAMING_VIOLATION;
    130 		rs->sr_text = "cannot rename suffix entry";
    131 		goto return_results;
    132 #endif
    133 	} else {
    134 		dnParent( &op->o_req_ndn, &p_ndn );
    135 	}
    136 	np_ndn = &p_ndn;
    137 	/* Make sure parent entry exist and we can write its
    138 	 * children.
    139 	 */
    140 	rs->sr_err = mdb_cursor_open( txn, mdb->mi_dn2id, &mc );
    141 	if ( rs->sr_err != 0 ) {
    142 		Debug(LDAP_DEBUG_TRACE,
    143 			"<=- " LDAP_XSTRING(mdb_modrdn)
    144 			": cursor_open failed: %s (%d)\n",
    145 			mdb_strerror(rs->sr_err), rs->sr_err, 0 );
    146 		rs->sr_err = LDAP_OTHER;
    147 		rs->sr_text = "DN cursor_open failed";
    148 		goto return_results;
    149 	}
    150 	rs->sr_err = mdb_dn2entry( op, txn, mc, &p_ndn, &p, NULL, 0 );
    151 	switch( rs->sr_err ) {
    152 	case MDB_NOTFOUND:
    153 		Debug( LDAP_DEBUG_TRACE, LDAP_XSTRING(mdb_modrdn)
    154 			": parent does not exist\n", 0, 0, 0);
    155 		rs->sr_ref = referral_rewrite( default_referral, NULL,
    156 					&op->o_req_dn, LDAP_SCOPE_DEFAULT );
    157 		rs->sr_err = LDAP_REFERRAL;
    158 
    159 		send_ldap_result( op, rs );
    160 
    161 		ber_bvarray_free( rs->sr_ref );
    162 		goto done;
    163 	case 0:
    164 		break;
    165 	case LDAP_BUSY:
    166 		rs->sr_text = "ldap server busy";
    167 		goto return_results;
    168 	default:
    169 		rs->sr_err = LDAP_OTHER;
    170 		rs->sr_text = "internal error";
    171 		goto return_results;
    172 	}
    173 
    174 	/* check parent for "children" acl */
    175 	rs->sr_err = access_allowed( op, p,
    176 		children, NULL,
    177 		op->oq_modrdn.rs_newSup == NULL ?
    178 			ACL_WRITE : ACL_WDEL,
    179 		NULL );
    180 
    181 	if ( ! rs->sr_err ) {
    182 		rs->sr_err = LDAP_INSUFFICIENT_ACCESS;
    183 		Debug( LDAP_DEBUG_TRACE, "no access to parent\n", 0,
    184 			0, 0 );
    185 		rs->sr_text = "no write access to parent's children";
    186 		goto return_results;
    187 	}
    188 
    189 	Debug( LDAP_DEBUG_TRACE,
    190 		LDAP_XSTRING(mdb_modrdn) ": wr to children "
    191 		"of entry %s OK\n", p_ndn.bv_val, 0, 0 );
    192 
    193 	if ( p_ndn.bv_val == slap_empty_bv.bv_val ) {
    194 		p_dn = slap_empty_bv;
    195 	} else {
    196 		dnParent( &op->o_req_dn, &p_dn );
    197 	}
    198 
    199 	Debug( LDAP_DEBUG_TRACE,
    200 		LDAP_XSTRING(mdb_modrdn) ": parent dn=%s\n",
    201 		p_dn.bv_val, 0, 0 );
    202 
    203 	/* get entry */
    204 	rs->sr_err = mdb_dn2entry( op, txn, mc, &op->o_req_ndn, &e, &nsubs, 0 );
    205 	switch( rs->sr_err ) {
    206 	case MDB_NOTFOUND:
    207 		e = p;
    208 		p = NULL;
    209 	case 0:
    210 		break;
    211 	case LDAP_BUSY:
    212 		rs->sr_text = "ldap server busy";
    213 		goto return_results;
    214 	default:
    215 		rs->sr_err = LDAP_OTHER;
    216 		rs->sr_text = "internal error";
    217 		goto return_results;
    218 	}
    219 
    220 	/* FIXME: dn2entry() should return non-glue entry */
    221 	if (( rs->sr_err == MDB_NOTFOUND ) ||
    222 		( !manageDSAit && e && is_entry_glue( e )))
    223 	{
    224 		if( e != NULL ) {
    225 			rs->sr_matched = ch_strdup( e->e_dn );
    226 			if ( is_entry_referral( e )) {
    227 				BerVarray ref = get_entry_referrals( op, e );
    228 				rs->sr_ref = referral_rewrite( ref, &e->e_name,
    229 					&op->o_req_dn, LDAP_SCOPE_DEFAULT );
    230 				ber_bvarray_free( ref );
    231 			} else {
    232 				rs->sr_ref = NULL;
    233 			}
    234 			mdb_entry_return( op, e );
    235 			e = NULL;
    236 
    237 		} else {
    238 			rs->sr_ref = referral_rewrite( default_referral, NULL,
    239 					&op->o_req_dn, LDAP_SCOPE_DEFAULT );
    240 		}
    241 
    242 		rs->sr_err = LDAP_REFERRAL;
    243 		send_ldap_result( op, rs );
    244 
    245 		ber_bvarray_free( rs->sr_ref );
    246 		free( (char *)rs->sr_matched );
    247 		rs->sr_ref = NULL;
    248 		rs->sr_matched = NULL;
    249 
    250 		goto done;
    251 	}
    252 
    253 	if ( get_assert( op ) &&
    254 		( test_filter( op, e, get_assertion( op )) != LDAP_COMPARE_TRUE ))
    255 	{
    256 		rs->sr_err = LDAP_ASSERTION_FAILED;
    257 		goto return_results;
    258 	}
    259 
    260 	/* check write on old entry */
    261 	rs->sr_err = access_allowed( op, e, entry, NULL, ACL_WRITE, NULL );
    262 	if ( ! rs->sr_err ) {
    263 		Debug( LDAP_DEBUG_TRACE, "no access to entry\n", 0,
    264 			0, 0 );
    265 		rs->sr_text = "no write access to old entry";
    266 		rs->sr_err = LDAP_INSUFFICIENT_ACCESS;
    267 		goto return_results;
    268 	}
    269 
    270 	if (!manageDSAit && is_entry_referral( e ) ) {
    271 		/* entry is a referral, don't allow rename */
    272 		rs->sr_ref = get_entry_referrals( op, e );
    273 
    274 		Debug( LDAP_DEBUG_TRACE, LDAP_XSTRING(mdb_modrdn)
    275 			": entry %s is referral\n", e->e_dn, 0, 0 );
    276 
    277 		rs->sr_err = LDAP_REFERRAL,
    278 		rs->sr_matched = e->e_name.bv_val;
    279 		send_ldap_result( op, rs );
    280 
    281 		ber_bvarray_free( rs->sr_ref );
    282 		rs->sr_ref = NULL;
    283 		rs->sr_matched = NULL;
    284 		goto done;
    285 	}
    286 
    287 	new_parent_dn = &p_dn;	/* New Parent unless newSuperior given */
    288 
    289 	if ( op->oq_modrdn.rs_newSup != NULL ) {
    290 		Debug( LDAP_DEBUG_TRACE,
    291 			LDAP_XSTRING(mdb_modrdn)
    292 			": new parent \"%s\" requested...\n",
    293 			op->oq_modrdn.rs_newSup->bv_val, 0, 0 );
    294 
    295 		/*  newSuperior == oldParent? */
    296 		if( dn_match( &p_ndn, op->oq_modrdn.rs_nnewSup ) ) {
    297 			Debug( LDAP_DEBUG_TRACE, "mdb_back_modrdn: "
    298 				"new parent \"%s\" same as the old parent \"%s\"\n",
    299 				op->oq_modrdn.rs_newSup->bv_val, p_dn.bv_val, 0 );
    300 			op->oq_modrdn.rs_newSup = NULL; /* ignore newSuperior */
    301 		}
    302 	}
    303 
    304 	/* There's a MDB_MULTIPLE_SUFFIXES case here that this code doesn't
    305 	 * support. E.g., two suffixes dc=foo,dc=com and dc=bar,dc=net.
    306 	 * We do not allow modDN
    307 	 *   dc=foo,dc=com
    308 	 *    newrdn dc=bar
    309 	 *    newsup dc=net
    310 	 * and we probably should. But since MULTIPLE_SUFFIXES is deprecated
    311 	 * I'm ignoring this problem for now.
    312 	 */
    313 	if ( op->oq_modrdn.rs_newSup != NULL ) {
    314 		if ( op->oq_modrdn.rs_newSup->bv_len ) {
    315 			np_dn = op->oq_modrdn.rs_newSup;
    316 			np_ndn = op->oq_modrdn.rs_nnewSup;
    317 
    318 			/* newSuperior == oldParent? - checked above */
    319 			/* newSuperior == entry being moved?, if so ==> ERROR */
    320 			if ( dnIsSuffix( np_ndn, &e->e_nname )) {
    321 				rs->sr_err = LDAP_NO_SUCH_OBJECT;
    322 				rs->sr_text = "new superior not found";
    323 				goto return_results;
    324 			}
    325 			/* Get Entry with dn=newSuperior. Does newSuperior exist? */
    326 			rs->sr_err = mdb_dn2entry( op, txn, NULL, np_ndn, &np, NULL, 0 );
    327 
    328 			switch( rs->sr_err ) {
    329 			case 0:
    330 				break;
    331 			case MDB_NOTFOUND:
    332 				Debug( LDAP_DEBUG_TRACE,
    333 					LDAP_XSTRING(mdb_modrdn)
    334 					": newSup(ndn=%s) not here!\n",
    335 					np_ndn->bv_val, 0, 0);
    336 				rs->sr_text = "new superior not found";
    337 				rs->sr_err = LDAP_NO_SUCH_OBJECT;
    338 				goto return_results;
    339 			case LDAP_BUSY:
    340 				rs->sr_text = "ldap server busy";
    341 				goto return_results;
    342 			default:
    343 				rs->sr_err = LDAP_OTHER;
    344 				rs->sr_text = "internal error";
    345 				goto return_results;
    346 			}
    347 
    348 			/* check newSuperior for "children" acl */
    349 			rs->sr_err = access_allowed( op, np, children,
    350 				NULL, ACL_WADD, NULL );
    351 
    352 			if( ! rs->sr_err ) {
    353 				Debug( LDAP_DEBUG_TRACE,
    354 					LDAP_XSTRING(mdb_modrdn)
    355 					": no wr to newSup children\n",
    356 					0, 0, 0 );
    357 				rs->sr_text = "no write access to new superior's children";
    358 				rs->sr_err = LDAP_INSUFFICIENT_ACCESS;
    359 				goto return_results;
    360 			}
    361 
    362 			Debug( LDAP_DEBUG_TRACE,
    363 				LDAP_XSTRING(mdb_modrdn)
    364 				": wr to new parent OK np=%p, id=%ld\n",
    365 				(void *) np, (long) np->e_id, 0 );
    366 
    367 			if ( is_entry_alias( np ) ) {
    368 				/* parent is an alias, don't allow add */
    369 				Debug( LDAP_DEBUG_TRACE,
    370 					LDAP_XSTRING(mdb_modrdn)
    371 					": entry is alias\n",
    372 					0, 0, 0 );
    373 				rs->sr_text = "new superior is an alias";
    374 				rs->sr_err = LDAP_ALIAS_PROBLEM;
    375 				goto return_results;
    376 			}
    377 
    378 			if ( is_entry_referral( np ) ) {
    379 				/* parent is a referral, don't allow add */
    380 				Debug( LDAP_DEBUG_TRACE,
    381 					LDAP_XSTRING(mdb_modrdn)
    382 					": entry is referral\n",
    383 					0, 0, 0 );
    384 				rs->sr_text = "new superior is a referral";
    385 				rs->sr_err = LDAP_OTHER;
    386 				goto return_results;
    387 			}
    388 			new_parent_dn = &np->e_name;
    389 
    390 		} else {
    391 			np_dn = NULL;
    392 
    393 			/* no parent, modrdn entry directly under root */
    394 			if ( be_issuffix( op->o_bd, (struct berval *)&slap_empty_bv )
    395 				|| be_isupdate( op ) ) {
    396 				np = (Entry *)&slap_entry_root;
    397 
    398 				/* check parent for "children" acl */
    399 				rs->sr_err = access_allowed( op, np,
    400 					children, NULL, ACL_WADD, NULL );
    401 
    402 				np = NULL;
    403 
    404 				if ( ! rs->sr_err ) {
    405 					rs->sr_err = LDAP_INSUFFICIENT_ACCESS;
    406 					Debug( LDAP_DEBUG_TRACE,
    407 						"no access to new superior\n",
    408 						0, 0, 0 );
    409 					rs->sr_text =
    410 						"no write access to new superior's children";
    411 					goto return_results;
    412 				}
    413 			}
    414 		}
    415 
    416 		Debug( LDAP_DEBUG_TRACE,
    417 			LDAP_XSTRING(mdb_modrdn)
    418 			": wr to new parent's children OK\n",
    419 			0, 0, 0 );
    420 
    421 		new_parent_dn = np_dn;
    422 	}
    423 
    424 	/* Build target dn and make sure target entry doesn't exist already. */
    425 	if (!new_dn.bv_val) {
    426 		build_new_dn( &new_dn, new_parent_dn, &op->oq_modrdn.rs_newrdn, op->o_tmpmemctx );
    427 	}
    428 
    429 	if (!new_ndn.bv_val) {
    430 		dnNormalize( 0, NULL, NULL, &new_dn, &new_ndn, op->o_tmpmemctx );
    431 	}
    432 
    433 	Debug( LDAP_DEBUG_TRACE, LDAP_XSTRING(mdb_modrdn) ": new ndn=%s\n",
    434 		new_ndn.bv_val, 0, 0 );
    435 
    436 	/* Shortcut the search */
    437 	rs->sr_err = mdb_dn2id ( op, txn, NULL, &new_ndn, &nid, NULL, NULL, NULL );
    438 	switch( rs->sr_err ) {
    439 	case MDB_NOTFOUND:
    440 		break;
    441 	case 0:
    442 		/* Allow rename to same DN */
    443 		if ( nid == e->e_id )
    444 			break;
    445 		rs->sr_err = LDAP_ALREADY_EXISTS;
    446 		goto return_results;
    447 	default:
    448 		rs->sr_err = LDAP_OTHER;
    449 		rs->sr_text = "internal error";
    450 		goto return_results;
    451 	}
    452 
    453 	assert( op->orr_modlist != NULL );
    454 
    455 	if( op->o_preread ) {
    456 		if( preread_ctrl == NULL ) {
    457 			preread_ctrl = &ctrls[num_ctrls++];
    458 			ctrls[num_ctrls] = NULL;
    459 		}
    460 		if( slap_read_controls( op, rs, e,
    461 			&slap_pre_read_bv, preread_ctrl ) )
    462 		{
    463 			Debug( LDAP_DEBUG_TRACE,
    464 				"<=- " LDAP_XSTRING(mdb_modrdn)
    465 				": pre-read failed!\n", 0, 0, 0 );
    466 			if ( op->o_preread & SLAP_CONTROL_CRITICAL ) {
    467 				/* FIXME: is it correct to abort
    468 				 * operation if control fails? */
    469 				goto return_results;
    470 			}
    471 		}
    472 	}
    473 
    474 	/* delete old DN
    475 	 * If moving to a new parent, must delete current subtree count,
    476 	 * otherwise leave it unchanged since we'll be adding it right back.
    477 	 */
    478 	rs->sr_err = mdb_dn2id_delete( op, mc, e->e_id, np ? nsubs : 0 );
    479 	if ( rs->sr_err != 0 ) {
    480 		Debug(LDAP_DEBUG_TRACE,
    481 			"<=- " LDAP_XSTRING(mdb_modrdn)
    482 			": dn2id del failed: %s (%d)\n",
    483 			mdb_strerror(rs->sr_err), rs->sr_err, 0 );
    484 		rs->sr_err = LDAP_OTHER;
    485 		rs->sr_text = "DN index delete fail";
    486 		goto return_results;
    487 	}
    488 
    489 	/* copy the entry, then override some fields */
    490 	dummy = *e;
    491 	dummy.e_name = new_dn;
    492 	dummy.e_nname = new_ndn;
    493 	dummy.e_attrs = NULL;
    494 
    495 	/* add new DN */
    496 	rs->sr_err = mdb_dn2id_add( op, mc, mc, np ? np->e_id : p->e_id,
    497 		nsubs, np != NULL, &dummy );
    498 	if ( rs->sr_err != 0 ) {
    499 		Debug(LDAP_DEBUG_TRACE,
    500 			"<=- " LDAP_XSTRING(mdb_modrdn)
    501 			": dn2id add failed: %s (%d)\n",
    502 			mdb_strerror(rs->sr_err), rs->sr_err, 0 );
    503 		rs->sr_err = LDAP_OTHER;
    504 		rs->sr_text = "DN index add failed";
    505 		goto return_results;
    506 	}
    507 
    508 	dummy.e_attrs = e->e_attrs;
    509 
    510 	/* modify entry */
    511 	rs->sr_err = mdb_modify_internal( op, txn, op->orr_modlist, &dummy,
    512 		&rs->sr_text, textbuf, textlen );
    513 	if( rs->sr_err != LDAP_SUCCESS ) {
    514 		Debug(LDAP_DEBUG_TRACE,
    515 			"<=- " LDAP_XSTRING(mdb_modrdn)
    516 			": modify failed: %s (%d)\n",
    517 			mdb_strerror(rs->sr_err), rs->sr_err, 0 );
    518 		if ( dummy.e_attrs == e->e_attrs ) dummy.e_attrs = NULL;
    519 		goto return_results;
    520 	}
    521 
    522 	/* id2entry index */
    523 	rs->sr_err = mdb_id2entry_update( op, txn, NULL, &dummy );
    524 	if ( rs->sr_err != 0 ) {
    525 		Debug(LDAP_DEBUG_TRACE,
    526 			"<=- " LDAP_XSTRING(mdb_modrdn)
    527 			": id2entry failed: %s (%d)\n",
    528 			mdb_strerror(rs->sr_err), rs->sr_err, 0 );
    529 		rs->sr_err = LDAP_OTHER;
    530 		rs->sr_text = "entry update failed";
    531 		goto return_results;
    532 	}
    533 
    534 	if ( p_ndn.bv_len != 0 ) {
    535 		if ((parent_is_glue = is_entry_glue(p))) {
    536 			rs->sr_err = mdb_dn2id_children( op, txn, p );
    537 			if ( rs->sr_err != MDB_NOTFOUND ) {
    538 				switch( rs->sr_err ) {
    539 				case 0:
    540 					break;
    541 				default:
    542 					Debug(LDAP_DEBUG_ARGS,
    543 						"<=- " LDAP_XSTRING(mdb_modrdn)
    544 						": has_children failed: %s (%d)\n",
    545 						mdb_strerror(rs->sr_err), rs->sr_err, 0 );
    546 					rs->sr_err = LDAP_OTHER;
    547 					rs->sr_text = "internal error";
    548 					goto return_results;
    549 				}
    550 			} else {
    551 				parent_is_leaf = 1;
    552 			}
    553 		}
    554 		mdb_entry_return( op, p );
    555 		p = NULL;
    556 	}
    557 
    558 	if( op->o_postread ) {
    559 		if( postread_ctrl == NULL ) {
    560 			postread_ctrl = &ctrls[num_ctrls++];
    561 			ctrls[num_ctrls] = NULL;
    562 		}
    563 		if( slap_read_controls( op, rs, &dummy,
    564 			&slap_post_read_bv, postread_ctrl ) )
    565 		{
    566 			Debug( LDAP_DEBUG_TRACE,
    567 				"<=- " LDAP_XSTRING(mdb_modrdn)
    568 				": post-read failed!\n", 0, 0, 0 );
    569 			if ( op->o_postread & SLAP_CONTROL_CRITICAL ) {
    570 				/* FIXME: is it correct to abort
    571 				 * operation if control fails? */
    572 				goto return_results;
    573 			}
    574 		}
    575 	}
    576 
    577 	if( moi == &opinfo ) {
    578 		LDAP_SLIST_REMOVE( &op->o_extra, &opinfo.moi_oe, OpExtra, oe_next );
    579 		opinfo.moi_oe.oe_key = NULL;
    580 		if( op->o_noop ) {
    581 			mdb_txn_abort( txn );
    582 			rs->sr_err = LDAP_X_NO_OPERATION;
    583 			txn = NULL;
    584 			/* Only free attrs if they were dup'd.  */
    585 			if ( dummy.e_attrs == e->e_attrs ) dummy.e_attrs = NULL;
    586 			goto return_results;
    587 
    588 		} else {
    589 			if(( rs->sr_err=mdb_txn_commit( txn )) != 0 ) {
    590 				rs->sr_text = "txn_commit failed";
    591 			} else {
    592 				rs->sr_err = LDAP_SUCCESS;
    593 			}
    594 			txn = NULL;
    595 		}
    596 	}
    597 
    598 	if( rs->sr_err != LDAP_SUCCESS ) {
    599 		Debug( LDAP_DEBUG_ANY,
    600 			LDAP_XSTRING(mdb_modrdn) ": %s : %s (%d)\n",
    601 			rs->sr_text, mdb_strerror(rs->sr_err), rs->sr_err );
    602 		rs->sr_err = LDAP_OTHER;
    603 
    604 		goto return_results;
    605 	}
    606 
    607 	Debug(LDAP_DEBUG_TRACE,
    608 		LDAP_XSTRING(mdb_modrdn)
    609 		": rdn modified%s id=%08lx dn=\"%s\"\n",
    610 		op->o_noop ? " (no-op)" : "",
    611 		dummy.e_id, op->o_req_dn.bv_val );
    612 	rs->sr_text = NULL;
    613 	if( num_ctrls ) rs->sr_ctrls = ctrls;
    614 
    615 return_results:
    616 	if ( dummy.e_attrs ) {
    617 		attrs_free( dummy.e_attrs );
    618 	}
    619 	send_ldap_result( op, rs );
    620 
    621 #if 0
    622 	if( rs->sr_err == LDAP_SUCCESS && mdb->bi_txn_cp_kbyte ) {
    623 		TXN_CHECKPOINT( mdb->bi_dbenv,
    624 			mdb->bi_txn_cp_kbyte, mdb->bi_txn_cp_min, 0 );
    625 	}
    626 #endif
    627 
    628 	if ( rs->sr_err == LDAP_SUCCESS && parent_is_glue && parent_is_leaf ) {
    629 		op->o_delete_glue_parent = 1;
    630 	}
    631 
    632 done:
    633 	slap_graduate_commit_csn( op );
    634 
    635 	if( new_ndn.bv_val != NULL ) op->o_tmpfree( new_ndn.bv_val, op->o_tmpmemctx );
    636 	if( new_dn.bv_val != NULL ) op->o_tmpfree( new_dn.bv_val, op->o_tmpmemctx );
    637 
    638 	/* LDAP v3 Support */
    639 	if( np != NULL ) {
    640 		/* free new parent */
    641 		mdb_entry_return( op, np );
    642 	}
    643 
    644 	if( p != NULL ) {
    645 		/* free parent */
    646 		mdb_entry_return( op, p );
    647 	}
    648 
    649 	/* free entry */
    650 	if( e != NULL ) {
    651 		mdb_entry_return( op, e );
    652 	}
    653 
    654 	if( moi == &opinfo ) {
    655 		if( txn != NULL ) {
    656 			mdb_txn_abort( txn );
    657 		}
    658 		if ( opinfo.moi_oe.oe_key ) {
    659 			LDAP_SLIST_REMOVE( &op->o_extra, &opinfo.moi_oe, OpExtra, oe_next );
    660 		}
    661 	} else {
    662 		moi->moi_ref--;
    663 	}
    664 
    665 	if( preread_ctrl != NULL && (*preread_ctrl) != NULL ) {
    666 		slap_sl_free( (*preread_ctrl)->ldctl_value.bv_val, op->o_tmpmemctx );
    667 		slap_sl_free( *preread_ctrl, op->o_tmpmemctx );
    668 	}
    669 	if( postread_ctrl != NULL && (*postread_ctrl) != NULL ) {
    670 		slap_sl_free( (*postread_ctrl)->ldctl_value.bv_val, op->o_tmpmemctx );
    671 		slap_sl_free( *postread_ctrl, op->o_tmpmemctx );
    672 	}
    673 	return rs->sr_err;
    674 }
    675