1 /* modrdn.c - bdb backend modrdn routine */
3 /* This work is part of OpenLDAP Software <http://www.openldap.org/>.
5 * Copyright 2000-2005 The OpenLDAP Foundation.
8 * Redistribution and use in source and binary forms, with or without
9 * modification, are permitted only as authorized by the OpenLDAP
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>.
20 #include <ac/string.h>
25 bdb_modrdn( Operation *op, SlapReply *rs )
27 struct bdb_info *bdb = (struct bdb_info *) op->o_bd->be_private;
28 AttributeDescription *children = slap_schema.si_ad_children;
29 AttributeDescription *entry = slap_schema.si_ad_entry;
30 struct berval p_dn, p_ndn;
31 struct berval new_dn = {0, NULL}, new_ndn = {0, NULL};
35 EntryInfo *ei = NULL, *eip = NULL, *nei = NULL, *neip = NULL;
36 /* LDAP v2 supporting correct attribute handling. */
37 LDAPRDN new_rdn = NULL;
38 LDAPRDN old_rdn = NULL;
39 char textbuf[SLAP_TEXT_BUFLEN];
40 size_t textlen = sizeof textbuf;
41 DB_TXN *ltid = NULL, *lt2;
42 struct bdb_op_info opinfo = {0};
47 Entry *np = NULL; /* newSuperior Entry */
48 struct berval *np_dn = NULL; /* newSuperior dn */
49 struct berval *np_ndn = NULL; /* newSuperior ndn */
50 struct berval *new_parent_dn = NULL; /* np_dn, p_dn, or NULL */
52 /* Used to interface with bdb_modify_internal() */
53 Modifications *mod = NULL; /* Used to delete old rdn */
55 int manageDSAit = get_manageDSAit( op );
58 DB_LOCK lock, plock, nplock;
62 LDAPControl **preread_ctrl = NULL;
63 LDAPControl **postread_ctrl = NULL;
64 LDAPControl *ctrls[SLAP_MAX_RESPONSE_CONTROLS];
68 struct psid_entry *pm_list, *pm_prev;
74 int parent_is_glue = 0;
75 int parent_is_leaf = 0;
77 ctrls[num_ctrls] = NULL;
79 Debug( LDAP_DEBUG_TRACE, "==>" LDAP_XSTRING(bdb_modrdn) "(%s,%s,%s)\n",
80 op->o_req_dn.bv_val,op->oq_modrdn.rs_newrdn.bv_val,
81 op->oq_modrdn.rs_newSup ? op->oq_modrdn.rs_newSup->bv_val : "NULL" );
84 retry: /* transaction retry */
85 if ( dummy.e_attrs ) {
86 attrs_free( dummy.e_attrs );
90 bdb_unlocked_cache_return_entry_w(&bdb->bi_cache, e);
94 bdb_unlocked_cache_return_entry_r(&bdb->bi_cache, p);
98 bdb_unlocked_cache_return_entry_r(&bdb->bi_cache, np);
101 Debug( LDAP_DEBUG_TRACE, "==>" LDAP_XSTRING(bdb_modrdn)
102 ": retrying...\n", 0, 0, 0 );
104 rs->sr_err = TXN_ABORT( ltid );
106 op->o_private = NULL;
107 op->o_do_not_cache = opinfo.boi_acl_cache;
108 if( rs->sr_err != 0 ) {
109 rs->sr_err = LDAP_OTHER;
110 rs->sr_text = "internal error";
115 ldap_pvt_thread_yield();
116 bdb_trans_backoff( ++num_retries );
119 /* begin transaction */
120 rs->sr_err = TXN_BEGIN( bdb->bi_dbenv, NULL, <id,
121 bdb->bi_db_opflags );
123 if( rs->sr_err != 0 ) {
124 Debug( LDAP_DEBUG_TRACE,
125 LDAP_XSTRING(bdb_modrdn) ": txn_begin failed: "
126 "%s (%d)\n", db_strerror(rs->sr_err), rs->sr_err, 0 );
127 rs->sr_err = LDAP_OTHER;
128 rs->sr_text = "internal error";
132 locker = TXN_ID ( ltid );
134 opinfo.boi_bdb = op->o_bd;
135 opinfo.boi_txn = ltid;
136 opinfo.boi_locker = locker;
138 opinfo.boi_acl_cache = op->o_do_not_cache;
139 op->o_private = &opinfo;
142 rs->sr_err = bdb_dn2entry( op, ltid, &op->o_req_ndn, &ei, 1,
145 switch( rs->sr_err ) {
149 case DB_LOCK_DEADLOCK:
150 case DB_LOCK_NOTGRANTED:
153 rs->sr_text = "ldap server busy";
156 rs->sr_err = LDAP_OTHER;
157 rs->sr_text = "internal error";
162 /* FIXME: dn2entry() should return non-glue entry */
163 if (( rs->sr_err == DB_NOTFOUND ) ||
164 ( !manageDSAit && e && is_entry_glue( e )))
167 rs->sr_matched = ch_strdup( e->e_dn );
168 rs->sr_ref = is_entry_referral( e )
169 ? get_entry_referrals( op, e )
171 bdb_unlocked_cache_return_entry_r( &bdb->bi_cache, e);
175 rs->sr_ref = referral_rewrite( default_referral, NULL,
176 &op->o_req_dn, LDAP_SCOPE_DEFAULT );
179 rs->sr_err = LDAP_REFERRAL;
180 send_ldap_result( op, rs );
182 ber_bvarray_free( rs->sr_ref );
183 free( (char *)rs->sr_matched );
185 rs->sr_matched = NULL;
190 if ( get_assert( op ) &&
191 ( test_filter( op, e, get_assertion( op )) != LDAP_COMPARE_TRUE ))
193 rs->sr_err = LDAP_ASSERTION_FAILED;
197 /* check write on old entry */
198 rs->sr_err = access_allowed( op, e, entry, NULL, ACL_WRITE, NULL );
199 if ( ! rs->sr_err ) {
200 switch( opinfo.boi_err ) {
201 case DB_LOCK_DEADLOCK:
202 case DB_LOCK_NOTGRANTED:
206 Debug( LDAP_DEBUG_TRACE, "no access to entry\n", 0,
208 rs->sr_text = "no write access to old entry";
209 rs->sr_err = LDAP_INSUFFICIENT_ACCESS;
214 rs->sr_err = bdb_cache_children( op, ltid, e );
215 if ( rs->sr_err != DB_NOTFOUND ) {
216 switch( rs->sr_err ) {
217 case DB_LOCK_DEADLOCK:
218 case DB_LOCK_NOTGRANTED:
221 Debug(LDAP_DEBUG_ARGS,
222 "<=- " LDAP_XSTRING(bdb_modrdn)
224 op->o_req_dn.bv_val, 0, 0);
225 rs->sr_err = LDAP_NOT_ALLOWED_ON_NONLEAF;
226 rs->sr_text = "subtree rename not supported";
229 Debug(LDAP_DEBUG_ARGS,
230 "<=- " LDAP_XSTRING(bdb_modrdn)
231 ": has_children failed: %s (%d)\n",
232 db_strerror(rs->sr_err), rs->sr_err, 0 );
233 rs->sr_err = LDAP_OTHER;
234 rs->sr_text = "internal error";
238 ei->bei_state |= CACHE_ENTRY_NO_KIDS;
241 if (!manageDSAit && is_entry_referral( e ) ) {
242 /* parent is a referral, don't allow add */
243 rs->sr_ref = get_entry_referrals( op, e );
245 Debug( LDAP_DEBUG_TRACE, LDAP_XSTRING(bdb_modrdn)
246 ": entry %s is referral\n", e->e_dn, 0, 0 );
248 rs->sr_err = LDAP_REFERRAL,
249 rs->sr_matched = e->e_name.bv_val;
250 send_ldap_result( op, rs );
252 ber_bvarray_free( rs->sr_ref );
254 rs->sr_matched = NULL;
258 if ( be_issuffix( op->o_bd, &e->e_nname ) ) {
259 p_ndn = slap_empty_bv;
261 dnParent( &e->e_nname, &p_ndn );
264 if ( p_ndn.bv_len != 0 ) {
265 /* Make sure parent entry exist and we can write its
268 eip = ei->bei_parent;
269 rs->sr_err = bdb_cache_find_id( op, ltid,
270 eip->bei_id, &eip, 0, locker, &plock );
272 switch( rs->sr_err ) {
276 case DB_LOCK_DEADLOCK:
277 case DB_LOCK_NOTGRANTED:
280 rs->sr_text = "ldap server busy";
283 rs->sr_err = LDAP_OTHER;
284 rs->sr_text = "internal error";
290 Debug( LDAP_DEBUG_TRACE, LDAP_XSTRING(bdb_modrdn)
291 ": parent does not exist\n", 0, 0, 0);
292 rs->sr_err = LDAP_OTHER;
293 rs->sr_text = "old entry's parent does not exist";
297 /* check parent for "children" acl */
298 rs->sr_err = access_allowed( op, p,
299 children, NULL, ACL_WRITE, NULL );
301 if ( ! rs->sr_err ) {
302 switch( opinfo.boi_err ) {
303 case DB_LOCK_DEADLOCK:
304 case DB_LOCK_NOTGRANTED:
308 rs->sr_err = LDAP_INSUFFICIENT_ACCESS;
309 Debug( LDAP_DEBUG_TRACE, "no access to parent\n", 0,
311 rs->sr_text = "no write access to old parent's children";
315 Debug( LDAP_DEBUG_TRACE,
316 LDAP_XSTRING(bdb_modrdn) ": wr to children "
317 "of entry %s OK\n", p_ndn.bv_val, 0, 0 );
319 if ( p_ndn.bv_val == slap_empty_bv.bv_val ) {
320 p_dn = slap_empty_bv;
322 dnParent( &e->e_name, &p_dn );
325 Debug( LDAP_DEBUG_TRACE,
326 LDAP_XSTRING(bdb_modrdn) ": parent dn=%s\n",
330 /* no parent, modrdn entry directly under root */
331 isroot = be_isroot( op );
333 if ( be_issuffix( op->o_bd, (struct berval *)&slap_empty_bv )
334 || be_shadow_update( op ) ) {
336 p = (Entry *)&slap_entry_root;
338 /* check parent for "children" acl */
339 rs->sr_err = access_allowed( op, p,
340 children, NULL, ACL_WRITE, NULL );
344 if ( ! rs->sr_err ) {
345 switch( opinfo.boi_err ) {
346 case DB_LOCK_DEADLOCK:
347 case DB_LOCK_NOTGRANTED:
351 rs->sr_err = LDAP_INSUFFICIENT_ACCESS;
352 Debug( LDAP_DEBUG_TRACE,
353 "no access to parent\n",
355 rs->sr_text = "no write access to old parent";
359 Debug( LDAP_DEBUG_TRACE,
360 LDAP_XSTRING(bdb_modrdn)
361 ": wr to children of entry \"\" OK\n",
367 Debug( LDAP_DEBUG_TRACE,
368 LDAP_XSTRING(bdb_modrdn)
369 ": parent dn=\"\"\n",
373 Debug( LDAP_DEBUG_TRACE,
374 LDAP_XSTRING(bdb_modrdn)
375 ": no parent, not root "
376 "& \"\" is not suffix\n",
378 rs->sr_text = "no write access to old parent";
379 rs->sr_err = LDAP_INSUFFICIENT_ACCESS;
385 new_parent_dn = &p_dn; /* New Parent unless newSuperior given */
387 if ( op->oq_modrdn.rs_newSup != NULL ) {
388 Debug( LDAP_DEBUG_TRACE,
389 LDAP_XSTRING(bdb_modrdn)
390 ": new parent \"%s\" requested...\n",
391 op->oq_modrdn.rs_newSup->bv_val, 0, 0 );
393 /* newSuperior == oldParent? */
394 if( dn_match( &p_ndn, op->oq_modrdn.rs_nnewSup ) ) {
395 Debug( LDAP_DEBUG_TRACE, "bdb_back_modrdn: "
396 "new parent \"%s\" same as the old parent \"%s\"\n",
397 op->oq_modrdn.rs_newSup->bv_val, p_dn.bv_val, 0 );
398 op->oq_modrdn.rs_newSup = NULL; /* ignore newSuperior */
402 if ( op->oq_modrdn.rs_newSup != NULL ) {
403 if ( op->oq_modrdn.rs_newSup->bv_len ) {
404 np_dn = op->oq_modrdn.rs_newSup;
405 np_ndn = op->oq_modrdn.rs_nnewSup;
407 /* newSuperior == oldParent?, if so ==> ERROR */
408 /* newSuperior == entry being moved?, if so ==> ERROR */
409 /* Get Entry with dn=newSuperior. Does newSuperior exist? */
411 rs->sr_err = bdb_dn2entry( op, ltid, np_ndn,
412 &neip, 0, locker, &nplock );
414 switch( rs->sr_err ) {
415 case 0: np = neip->bei_e;
418 case DB_LOCK_DEADLOCK:
419 case DB_LOCK_NOTGRANTED:
422 rs->sr_text = "ldap server busy";
425 rs->sr_err = LDAP_OTHER;
426 rs->sr_text = "internal error";
431 Debug( LDAP_DEBUG_TRACE,
432 LDAP_XSTRING(bdb_modrdn)
433 ": newSup(ndn=%s) not here!\n",
434 np_ndn->bv_val, 0, 0);
435 rs->sr_text = "new superior not found";
436 rs->sr_err = LDAP_OTHER;
440 Debug( LDAP_DEBUG_TRACE,
441 LDAP_XSTRING(bdb_modrdn)
442 ": wr to new parent OK np=%p, id=%ld\n",
443 (void *) np, (long) np->e_id, 0 );
445 /* check newSuperior for "children" acl */
446 rs->sr_err = access_allowed( op, np, children,
447 NULL, ACL_WRITE, NULL );
450 switch( opinfo.boi_err ) {
451 case DB_LOCK_DEADLOCK:
452 case DB_LOCK_NOTGRANTED:
456 Debug( LDAP_DEBUG_TRACE,
457 LDAP_XSTRING(bdb_modrdn)
458 ": no wr to newSup children\n",
460 rs->sr_text = "no write access to new superior's children";
461 rs->sr_err = LDAP_INSUFFICIENT_ACCESS;
465 if ( is_entry_alias( np ) ) {
466 /* parent is an alias, don't allow add */
467 Debug( LDAP_DEBUG_TRACE,
468 LDAP_XSTRING(bdb_modrdn)
469 ": entry is alias\n",
471 rs->sr_text = "new superior is an alias";
472 rs->sr_err = LDAP_ALIAS_PROBLEM;
476 if ( is_entry_referral( np ) ) {
477 /* parent is a referral, don't allow add */
478 Debug( LDAP_DEBUG_TRACE,
479 LDAP_XSTRING(bdb_modrdn)
480 ": entry is referral\n",
482 rs->sr_text = "new superior is a referral";
483 rs->sr_err = LDAP_OTHER;
488 if ( isroot == -1 ) {
489 isroot = be_isroot( op );
494 /* no parent, modrdn entry directly under root */
496 if ( be_issuffix( op->o_bd, (struct berval *)&slap_empty_bv )
497 || be_isupdate( op ) ) {
498 np = (Entry *)&slap_entry_root;
500 /* check parent for "children" acl */
501 rs->sr_err = access_allowed( op, np,
502 children, NULL, ACL_WRITE, NULL );
506 if ( ! rs->sr_err ) {
507 switch( opinfo.boi_err ) {
508 case DB_LOCK_DEADLOCK:
509 case DB_LOCK_NOTGRANTED:
513 rs->sr_err = LDAP_INSUFFICIENT_ACCESS;
514 Debug( LDAP_DEBUG_TRACE,
515 "no access to new superior\n",
518 "no write access to new superior's children";
522 Debug( LDAP_DEBUG_TRACE,
523 LDAP_XSTRING(bdb_modrdn)
525 "of entry \"\" OK\n",
529 Debug( LDAP_DEBUG_TRACE,
530 LDAP_XSTRING(bdb_modrdn)
531 ": new superior=\"\", not root "
532 "& \"\" is not suffix\n",
534 rs->sr_text = "no write access to new superior's children";
535 rs->sr_err = LDAP_INSUFFICIENT_ACCESS;
540 Debug( LDAP_DEBUG_TRACE,
541 LDAP_XSTRING(bdb_modrdn)
542 ": new superior=\"\"\n",
546 Debug( LDAP_DEBUG_TRACE,
547 LDAP_XSTRING(bdb_modrdn)
548 ": wr to new parent's children OK\n",
551 new_parent_dn = np_dn;
554 /* Build target dn and make sure target entry doesn't exist already. */
555 if (!new_dn.bv_val) {
556 build_new_dn( &new_dn, new_parent_dn, &op->oq_modrdn.rs_newrdn, NULL );
559 if (!new_ndn.bv_val) {
560 struct berval bv = {0, NULL};
561 dnNormalize( 0, NULL, NULL, &new_dn, &bv, op->o_tmpmemctx );
562 ber_dupbv( &new_ndn, &bv );
565 Debug( LDAP_DEBUG_TRACE, LDAP_XSTRING(bdb_modrdn) ": new ndn=%s\n",
566 new_ndn.bv_val, 0, 0 );
568 /* Shortcut the search */
569 nei = neip ? neip : eip;
570 rs->sr_err = bdb_cache_find_ndn ( op, ltid, &new_ndn, &nei );
571 if ( nei ) bdb_cache_entryinfo_unlock( nei );
572 switch( rs->sr_err ) {
573 case DB_LOCK_DEADLOCK:
574 case DB_LOCK_NOTGRANTED:
579 rs->sr_err = LDAP_ALREADY_EXISTS;
582 rs->sr_err = LDAP_OTHER;
583 rs->sr_text = "internal error";
587 /* Get attribute type and attribute value of our new rdn, we will
588 * need to add that to our new entry
590 if ( !new_rdn && ldap_bv2rdn_x( &op->oq_modrdn.rs_newrdn, &new_rdn,
591 (char **)&rs->sr_text, LDAP_DN_FORMAT_LDAP, op->o_tmpmemctx ) )
593 Debug( LDAP_DEBUG_TRACE,
594 LDAP_XSTRING(bdb_modrdn) ": can't figure out "
595 "type(s)/values(s) of newrdn\n",
597 rs->sr_err = LDAP_INVALID_DN_SYNTAX;
598 rs->sr_text = "unknown type(s) used in RDN";
602 Debug( LDAP_DEBUG_TRACE,
603 LDAP_XSTRING(bdb_modrdn)
604 ": new_rdn_type=\"%s\", new_rdn_val=\"%s\"\n",
605 new_rdn[ 0 ]->la_attr.bv_val,
606 new_rdn[ 0 ]->la_value.bv_val, 0 );
608 if ( op->oq_modrdn.rs_deleteoldrdn ) {
609 if ( !old_rdn && ldap_bv2rdn_x( &op->o_req_dn, &old_rdn,
610 (char **)&rs->sr_text, LDAP_DN_FORMAT_LDAP, op->o_tmpmemctx ) )
612 Debug( LDAP_DEBUG_TRACE,
613 LDAP_XSTRING(bdb_modrdn) ": can't figure out "
614 "the old_rdn type(s)/value(s)\n",
616 rs->sr_err = LDAP_OTHER;
617 rs->sr_text = "cannot parse RDN from old DN";
622 /* prepare modlist of modifications from old/new rdn */
624 rs->sr_err = slap_modrdn2mods( op, rs, e, old_rdn, new_rdn, &mod );
625 if ( rs->sr_err != LDAP_SUCCESS ) {
630 if( op->o_preread ) {
631 if( preread_ctrl == NULL ) {
632 preread_ctrl = &ctrls[num_ctrls++];
633 ctrls[num_ctrls] = NULL;
635 if( slap_read_controls( op, rs, e,
636 &slap_pre_read_bv, preread_ctrl ) )
638 Debug( LDAP_DEBUG_TRACE,
639 "<=- " LDAP_XSTRING(bdb_modrdn)
640 ": post-read failed!\n", 0, 0, 0 );
645 /* nested transaction */
646 rs->sr_err = TXN_BEGIN( bdb->bi_dbenv, ltid, <2, bdb->bi_db_opflags );
648 if( rs->sr_err != 0 ) {
649 Debug( LDAP_DEBUG_TRACE,
650 LDAP_XSTRING(bdb_modrdn)
651 ": txn_begin(2) failed: %s (%d)\n",
652 db_strerror(rs->sr_err), rs->sr_err, 0 );
653 rs->sr_err = LDAP_OTHER;
654 rs->sr_text = "internal error";
659 rs->sr_err = bdb_dn2id_delete( op, lt2, eip, e );
660 if ( rs->sr_err != 0 ) {
661 Debug(LDAP_DEBUG_TRACE,
662 "<=- " LDAP_XSTRING(bdb_modrdn)
663 ": dn2id del failed: %s (%d)\n",
664 db_strerror(rs->sr_err), rs->sr_err, 0 );
665 switch( rs->sr_err ) {
666 case DB_LOCK_DEADLOCK:
667 case DB_LOCK_NOTGRANTED:
670 rs->sr_err = LDAP_OTHER;
671 rs->sr_text = "DN index delete fail";
675 /* copy the entry, then override some fields */
677 dummy.e_name = new_dn;
678 dummy.e_nname = new_ndn;
679 dummy.e_attrs = NULL;
682 rs->sr_err = bdb_dn2id_add( op, lt2, neip ? neip : eip, &dummy );
683 if ( rs->sr_err != 0 ) {
684 Debug(LDAP_DEBUG_TRACE,
685 "<=- " LDAP_XSTRING(bdb_modrdn)
686 ": dn2id add failed: %s (%d)\n",
687 db_strerror(rs->sr_err), rs->sr_err, 0 );
688 switch( rs->sr_err ) {
689 case DB_LOCK_DEADLOCK:
690 case DB_LOCK_NOTGRANTED:
693 rs->sr_err = LDAP_OTHER;
694 rs->sr_text = "DN index add failed";
698 dummy.e_attrs = e->e_attrs;
701 rs->sr_err = bdb_modify_internal( op, lt2, &mod[0], &dummy,
702 &rs->sr_text, textbuf, textlen );
703 if( rs->sr_err != LDAP_SUCCESS ) {
704 Debug(LDAP_DEBUG_TRACE,
705 "<=- " LDAP_XSTRING(bdb_modrdn)
706 ": modify failed: %s (%d)\n",
707 db_strerror(rs->sr_err), rs->sr_err, 0 );
708 if ( ( rs->sr_err == LDAP_INSUFFICIENT_ACCESS ) && opinfo.boi_err ) {
709 rs->sr_err = opinfo.boi_err;
711 if ( dummy.e_attrs == e->e_attrs ) dummy.e_attrs = NULL;
712 switch( rs->sr_err ) {
713 case DB_LOCK_DEADLOCK:
714 case DB_LOCK_NOTGRANTED:
721 rs->sr_err = bdb_id2entry_update( op->o_bd, lt2, &dummy );
722 if ( rs->sr_err != 0 ) {
723 Debug(LDAP_DEBUG_TRACE,
724 "<=- " LDAP_XSTRING(bdb_modrdn)
725 ": id2entry failed: %s (%d)\n",
726 db_strerror(rs->sr_err), rs->sr_err, 0 );
727 switch( rs->sr_err ) {
728 case DB_LOCK_DEADLOCK:
729 case DB_LOCK_NOTGRANTED:
732 rs->sr_err = LDAP_OTHER;
733 rs->sr_text = "entry update failed";
737 if ( p_ndn.bv_len != 0 ) {
738 parent_is_glue = is_entry_glue(p);
739 rs->sr_err = bdb_cache_children( op, lt2, p );
740 if ( rs->sr_err != DB_NOTFOUND ) {
741 switch( rs->sr_err ) {
742 case DB_LOCK_DEADLOCK:
743 case DB_LOCK_NOTGRANTED:
748 Debug(LDAP_DEBUG_ARGS,
749 "<=- " LDAP_XSTRING(bdb_modrdn)
750 ": has_children failed: %s (%d)\n",
751 db_strerror(rs->sr_err), rs->sr_err, 0 );
752 rs->sr_err = LDAP_OTHER;
753 rs->sr_text = "internal error";
758 bdb_unlocked_cache_return_entry_r(&bdb->bi_cache, p);
762 if ( TXN_COMMIT( lt2, 0 ) != 0 ) {
763 rs->sr_err = LDAP_OTHER;
764 rs->sr_text = "txn_commit(2) failed";
768 if( op->o_postread ) {
769 if( postread_ctrl == NULL ) {
770 postread_ctrl = &ctrls[num_ctrls++];
771 ctrls[num_ctrls] = NULL;
773 if( slap_read_controls( op, rs, &dummy,
774 &slap_post_read_bv, postread_ctrl ) )
776 Debug( LDAP_DEBUG_TRACE,
777 "<=- " LDAP_XSTRING(bdb_modrdn)
778 ": post-read failed!\n", 0, 0, 0 );
784 if(( rs->sr_err=TXN_ABORT( ltid )) != 0 ) {
785 rs->sr_text = "txn_abort (no-op) failed";
787 rs->sr_err = LDAP_SUCCESS;
792 rc = bdb_cache_modrdn( e, &op->orr_nnewrdn, &dummy, neip,
793 bdb->bi_dbenv, locker, &lock );
795 case DB_LOCK_DEADLOCK:
796 case DB_LOCK_NOTGRANTED:
799 dummy.e_attrs = NULL;
800 new_dn.bv_val = NULL;
801 new_ndn.bv_val = NULL;
803 if(( rs->sr_err=TXN_COMMIT( ltid, 0 )) != 0 ) {
804 rs->sr_text = "txn_commit failed";
806 rs->sr_err = LDAP_SUCCESS;
811 op->o_private = NULL;
813 if( rs->sr_err != LDAP_SUCCESS ) {
814 Debug( LDAP_DEBUG_TRACE,
815 LDAP_XSTRING(bdb_modrdn) ": %s : %s (%d)\n",
816 rs->sr_text, db_strerror(rs->sr_err), rs->sr_err );
817 rs->sr_err = LDAP_OTHER;
822 Debug(LDAP_DEBUG_TRACE,
823 LDAP_XSTRING(bdb_modrdn)
824 ": rdn modified%s id=%08lx dn=\"%s\"\n",
825 op->o_noop ? " (no-op)" : "",
826 dummy.e_id, op->o_req_dn.bv_val );
828 if( num_ctrls ) rs->sr_ctrls = ctrls;
831 if ( dummy.e_attrs ) {
832 attrs_free( dummy.e_attrs );
834 send_ldap_result( op, rs );
836 if( rs->sr_err == LDAP_SUCCESS && bdb->bi_txn_cp ) {
837 ldap_pvt_thread_yield();
838 TXN_CHECKPOINT( bdb->bi_dbenv,
839 bdb->bi_txn_cp_kbyte, bdb->bi_txn_cp_min, 0 );
842 if ( rs->sr_err == LDAP_SUCCESS && parent_is_glue && parent_is_leaf ) {
843 op->o_delete_glue_parent = 1;
847 if( new_dn.bv_val != NULL ) free( new_dn.bv_val );
848 if( new_ndn.bv_val != NULL ) free( new_ndn.bv_val );
850 /* LDAP v2 supporting correct attribute handling. */
851 if ( new_rdn != NULL ) {
852 ldap_rdnfree_x( new_rdn, op->o_tmpmemctx );
854 if ( old_rdn != NULL ) {
855 ldap_rdnfree_x( old_rdn, op->o_tmpmemctx );
859 for (; mod; mod=tmp ) {
861 /* slap_modrdn2mods does things one way,
862 * slap_mods_opattrs does it differently
864 if ( mod->sml_op != SLAP_MOD_SOFTADD &&
865 mod->sml_op != LDAP_MOD_DELETE ) break;
866 if ( mod->sml_nvalues ) free( mod->sml_nvalues[0].bv_val );
869 slap_mods_free( mod );
872 /* LDAP v3 Support */
874 /* free new parent and reader lock */
875 bdb_unlocked_cache_return_entry_r(&bdb->bi_cache, np);
879 /* free parent and reader lock */
880 bdb_unlocked_cache_return_entry_r(&bdb->bi_cache, p);
885 bdb_unlocked_cache_return_entry_w( &bdb->bi_cache, e);
890 op->o_private = NULL;
893 if( preread_ctrl != NULL ) {
894 slap_sl_free( (*preread_ctrl)->ldctl_value.bv_val, op->o_tmpmemctx );
895 slap_sl_free( *preread_ctrl, op->o_tmpmemctx );
897 if( postread_ctrl != NULL ) {
898 slap_sl_free( (*postread_ctrl)->ldctl_value.bv_val, op->o_tmpmemctx );
899 slap_sl_free( *postread_ctrl, op->o_tmpmemctx );