1 /* modrdn.c - bdb backend modrdn routine */
3 /* This work is part of OpenLDAP Software <http://www.openldap.org/>.
5 * Copyright 2000-2004 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;
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 );
103 pm_list = LDAP_LIST_FIRST(&op->o_pm_list);
104 while ( pm_list != NULL ) {
105 LDAP_LIST_REMOVE ( pm_list, ps_link );
107 pm_list = LDAP_LIST_NEXT ( pm_list, ps_link );
111 rs->sr_err = TXN_ABORT( ltid );
113 op->o_private = NULL;
114 op->o_do_not_cache = opinfo.boi_acl_cache;
115 if( rs->sr_err != 0 ) {
116 rs->sr_err = LDAP_OTHER;
117 rs->sr_text = "internal error";
122 ldap_pvt_thread_yield();
123 bdb_trans_backoff( ++num_retries );
126 /* begin transaction */
127 rs->sr_err = TXN_BEGIN( bdb->bi_dbenv, NULL, <id,
128 bdb->bi_db_opflags );
130 if( rs->sr_err != 0 ) {
131 Debug( LDAP_DEBUG_TRACE,
132 LDAP_XSTRING(bdb_modrdn) ": txn_begin failed: "
133 "%s (%d)\n", db_strerror(rs->sr_err), rs->sr_err, 0 );
134 rs->sr_err = LDAP_OTHER;
135 rs->sr_text = "internal error";
139 locker = TXN_ID ( ltid );
141 opinfo.boi_bdb = op->o_bd;
142 opinfo.boi_txn = ltid;
143 opinfo.boi_locker = locker;
145 opinfo.boi_acl_cache = op->o_do_not_cache;
146 op->o_private = &opinfo;
149 rs->sr_err = bdb_dn2entry( op, ltid, &op->o_req_ndn, &ei, 1,
152 switch( rs->sr_err ) {
156 case DB_LOCK_DEADLOCK:
157 case DB_LOCK_NOTGRANTED:
160 rs->sr_text = "ldap server busy";
163 rs->sr_err = LDAP_OTHER;
164 rs->sr_text = "internal error";
169 /* FIXME: dn2entry() should return non-glue entry */
170 if (( rs->sr_err == DB_NOTFOUND ) ||
171 ( !manageDSAit && e && is_entry_glue( e )))
173 BerVarray deref = NULL;
175 rs->sr_matched = ch_strdup( e->e_dn );
176 rs->sr_ref = is_entry_referral( e )
177 ? get_entry_referrals( op, e )
179 bdb_unlocked_cache_return_entry_r( &bdb->bi_cache, e);
183 if ( !LDAP_STAILQ_EMPTY( &op->o_bd->be_syncinfo )) {
185 LDAP_STAILQ_FOREACH( si, &op->o_bd->be_syncinfo, si_next ) {
187 ber_dupbv( &tmpbv, &si->si_provideruri_bv[0] );
188 ber_bvarray_add( &deref, &tmpbv );
191 deref = default_referral;
193 rs->sr_ref = referral_rewrite( deref, NULL, &op->o_req_dn,
194 LDAP_SCOPE_DEFAULT );
197 rs->sr_err = LDAP_REFERRAL;
198 send_ldap_result( op, rs );
200 ber_bvarray_free( rs->sr_ref );
201 if ( deref != default_referral ) {
202 ber_bvarray_free( deref );
204 free( (char *)rs->sr_matched );
206 rs->sr_matched = NULL;
211 if ( get_assert( op ) &&
212 ( test_filter( op, e, get_assertion( op )) != LDAP_COMPARE_TRUE ))
214 rs->sr_err = LDAP_ASSERTION_FAILED;
218 /* check write on old entry */
219 rs->sr_err = access_allowed( op, e, entry, NULL, ACL_WRITE, NULL );
220 if ( ! rs->sr_err ) {
221 switch( opinfo.boi_err ) {
222 case DB_LOCK_DEADLOCK:
223 case DB_LOCK_NOTGRANTED:
227 Debug( LDAP_DEBUG_TRACE, "no access to entry\n", 0,
229 rs->sr_text = "no write access to old entry";
230 rs->sr_err = LDAP_INSUFFICIENT_ACCESS;
235 rs->sr_err = bdb_cache_children( op, ltid, e );
236 if ( rs->sr_err != DB_NOTFOUND ) {
237 switch( rs->sr_err ) {
238 case DB_LOCK_DEADLOCK:
239 case DB_LOCK_NOTGRANTED:
242 Debug(LDAP_DEBUG_ARGS,
243 "<=- " LDAP_XSTRING(bdb_modrdn)
245 op->o_req_dn.bv_val, 0, 0);
246 rs->sr_err = LDAP_NOT_ALLOWED_ON_NONLEAF;
247 rs->sr_text = "subtree rename not supported";
250 Debug(LDAP_DEBUG_ARGS,
251 "<=- " LDAP_XSTRING(bdb_modrdn)
252 ": has_children failed: %s (%d)\n",
253 db_strerror(rs->sr_err), rs->sr_err, 0 );
254 rs->sr_err = LDAP_OTHER;
255 rs->sr_text = "internal error";
259 ei->bei_state |= CACHE_ENTRY_NO_KIDS;
262 if (!manageDSAit && is_entry_referral( e ) ) {
263 /* parent is a referral, don't allow add */
264 rs->sr_ref = get_entry_referrals( op, e );
266 Debug( LDAP_DEBUG_TRACE, LDAP_XSTRING(bdb_modrdn)
267 ": entry %s is referral\n", e->e_dn, 0, 0 );
269 rs->sr_err = LDAP_REFERRAL,
270 rs->sr_matched = e->e_name.bv_val;
271 send_ldap_result( op, rs );
273 ber_bvarray_free( rs->sr_ref );
275 rs->sr_matched = NULL;
279 if ( be_issuffix( op->o_bd, &e->e_nname ) ) {
280 p_ndn = slap_empty_bv;
282 dnParent( &e->e_nname, &p_ndn );
285 if ( p_ndn.bv_len != 0 ) {
286 /* Make sure parent entry exist and we can write its
289 eip = ei->bei_parent;
290 rs->sr_err = bdb_cache_find_id( op, ltid,
291 eip->bei_id, &eip, 0, locker, &plock );
293 switch( rs->sr_err ) {
297 case DB_LOCK_DEADLOCK:
298 case DB_LOCK_NOTGRANTED:
301 rs->sr_text = "ldap server busy";
304 rs->sr_err = LDAP_OTHER;
305 rs->sr_text = "internal error";
311 Debug( LDAP_DEBUG_TRACE, LDAP_XSTRING(bdb_modrdn)
312 ": parent does not exist\n", 0, 0, 0);
313 rs->sr_err = LDAP_OTHER;
314 rs->sr_text = "old entry's parent does not exist";
318 /* check parent for "children" acl */
319 rs->sr_err = access_allowed( op, p,
320 children, NULL, ACL_WRITE, NULL );
322 if ( ! rs->sr_err ) {
323 switch( opinfo.boi_err ) {
324 case DB_LOCK_DEADLOCK:
325 case DB_LOCK_NOTGRANTED:
329 rs->sr_err = LDAP_INSUFFICIENT_ACCESS;
330 Debug( LDAP_DEBUG_TRACE, "no access to parent\n", 0,
332 rs->sr_text = "no write access to old parent's children";
336 Debug( LDAP_DEBUG_TRACE,
337 LDAP_XSTRING(bdb_modrdn) ": wr to children "
338 "of entry %s OK\n", p_ndn.bv_val, 0, 0 );
340 if ( p_ndn.bv_val == slap_empty_bv.bv_val ) {
341 p_dn = slap_empty_bv;
343 dnParent( &e->e_name, &p_dn );
346 Debug( LDAP_DEBUG_TRACE,
347 LDAP_XSTRING(bdb_modrdn) ": parent dn=%s\n",
351 /* no parent, modrdn entry directly under root */
352 isroot = be_isroot( op );
354 if ( be_issuffix( op->o_bd, (struct berval *)&slap_empty_bv )
355 || be_shadow_update( op ) ) {
357 p = (Entry *)&slap_entry_root;
359 /* check parent for "children" acl */
360 rs->sr_err = access_allowed( op, p,
361 children, NULL, ACL_WRITE, NULL );
365 if ( ! rs->sr_err ) {
366 switch( opinfo.boi_err ) {
367 case DB_LOCK_DEADLOCK:
368 case DB_LOCK_NOTGRANTED:
372 rs->sr_err = LDAP_INSUFFICIENT_ACCESS;
373 Debug( LDAP_DEBUG_TRACE,
374 "no access to parent\n",
376 rs->sr_text = "no write access to old parent";
380 Debug( LDAP_DEBUG_TRACE,
381 LDAP_XSTRING(bdb_modrdn)
382 ": wr to children of entry \"\" OK\n",
388 Debug( LDAP_DEBUG_TRACE,
389 LDAP_XSTRING(bdb_modrdn)
390 ": parent dn=\"\"\n",
394 Debug( LDAP_DEBUG_TRACE,
395 LDAP_XSTRING(bdb_modrdn)
396 ": no parent, not root "
397 "& \"\" is not suffix\n",
399 rs->sr_text = "no write access to old parent";
400 rs->sr_err = LDAP_INSUFFICIENT_ACCESS;
406 new_parent_dn = &p_dn; /* New Parent unless newSuperior given */
408 if ( op->oq_modrdn.rs_newSup != NULL ) {
409 Debug( LDAP_DEBUG_TRACE,
410 LDAP_XSTRING(bdb_modrdn)
411 ": new parent \"%s\" requested...\n",
412 op->oq_modrdn.rs_newSup->bv_val, 0, 0 );
414 /* newSuperior == oldParent? */
415 if( dn_match( &p_ndn, op->oq_modrdn.rs_nnewSup ) ) {
416 Debug( LDAP_DEBUG_TRACE, "bdb_back_modrdn: "
417 "new parent \"%s\" same as the old parent \"%s\"\n",
418 op->oq_modrdn.rs_newSup->bv_val, p_dn.bv_val, 0 );
419 op->oq_modrdn.rs_newSup = NULL; /* ignore newSuperior */
423 if ( op->oq_modrdn.rs_newSup != NULL ) {
424 if ( op->oq_modrdn.rs_newSup->bv_len ) {
425 np_dn = op->oq_modrdn.rs_newSup;
426 np_ndn = op->oq_modrdn.rs_nnewSup;
428 /* newSuperior == oldParent?, if so ==> ERROR */
429 /* newSuperior == entry being moved?, if so ==> ERROR */
430 /* Get Entry with dn=newSuperior. Does newSuperior exist? */
432 rs->sr_err = bdb_dn2entry( op, ltid, np_ndn,
433 &neip, 0, locker, &nplock );
435 switch( rs->sr_err ) {
436 case 0: np = neip->bei_e;
439 case DB_LOCK_DEADLOCK:
440 case DB_LOCK_NOTGRANTED:
443 rs->sr_text = "ldap server busy";
446 rs->sr_err = LDAP_OTHER;
447 rs->sr_text = "internal error";
452 Debug( LDAP_DEBUG_TRACE,
453 LDAP_XSTRING(bdb_modrdn)
454 ": newSup(ndn=%s) not here!\n",
455 np_ndn->bv_val, 0, 0);
456 rs->sr_text = "new superior not found";
457 rs->sr_err = LDAP_OTHER;
461 Debug( LDAP_DEBUG_TRACE,
462 LDAP_XSTRING(bdb_modrdn)
463 ": wr to new parent OK np=%p, id=%ld\n",
464 (void *) np, (long) np->e_id, 0 );
466 /* check newSuperior for "children" acl */
467 rs->sr_err = access_allowed( op, np, children,
468 NULL, ACL_WRITE, NULL );
471 switch( opinfo.boi_err ) {
472 case DB_LOCK_DEADLOCK:
473 case DB_LOCK_NOTGRANTED:
477 Debug( LDAP_DEBUG_TRACE,
478 LDAP_XSTRING(bdb_modrdn)
479 ": no wr to newSup children\n",
481 rs->sr_text = "no write access to new superior's children";
482 rs->sr_err = LDAP_INSUFFICIENT_ACCESS;
486 if ( is_entry_alias( np ) ) {
487 /* parent is an alias, don't allow add */
488 Debug( LDAP_DEBUG_TRACE,
489 LDAP_XSTRING(bdb_modrdn)
490 ": entry is alias\n",
492 rs->sr_text = "new superior is an alias";
493 rs->sr_err = LDAP_ALIAS_PROBLEM;
497 if ( is_entry_referral( np ) ) {
498 /* parent is a referral, don't allow add */
499 Debug( LDAP_DEBUG_TRACE,
500 LDAP_XSTRING(bdb_modrdn)
501 ": entry is referral\n",
503 rs->sr_text = "new superior is a referral";
504 rs->sr_err = LDAP_OTHER;
509 if ( isroot == -1 ) {
510 isroot = be_isroot( op );
515 /* no parent, modrdn entry directly under root */
517 if ( be_issuffix( op->o_bd, (struct berval *)&slap_empty_bv )
518 || be_isupdate( op ) ) {
519 np = (Entry *)&slap_entry_root;
521 /* check parent for "children" acl */
522 rs->sr_err = access_allowed( op, np,
523 children, NULL, ACL_WRITE, NULL );
527 if ( ! rs->sr_err ) {
528 switch( opinfo.boi_err ) {
529 case DB_LOCK_DEADLOCK:
530 case DB_LOCK_NOTGRANTED:
534 rs->sr_err = LDAP_INSUFFICIENT_ACCESS;
535 Debug( LDAP_DEBUG_TRACE,
536 "no access to new superior\n",
539 "no write access to new superior's children";
543 Debug( LDAP_DEBUG_TRACE,
544 LDAP_XSTRING(bdb_modrdn)
546 "of entry \"\" OK\n",
550 Debug( LDAP_DEBUG_TRACE,
551 LDAP_XSTRING(bdb_modrdn)
552 ": new superior=\"\", not root "
553 "& \"\" is not suffix\n",
555 rs->sr_text = "no write access to new superior's children";
556 rs->sr_err = LDAP_INSUFFICIENT_ACCESS;
561 Debug( LDAP_DEBUG_TRACE,
562 LDAP_XSTRING(bdb_modrdn)
563 ": new superior=\"\"\n",
567 Debug( LDAP_DEBUG_TRACE,
568 LDAP_XSTRING(bdb_modrdn)
569 ": wr to new parent's children OK\n",
572 new_parent_dn = np_dn;
575 /* Build target dn and make sure target entry doesn't exist already. */
576 if (!new_dn.bv_val) {
577 build_new_dn( &new_dn, new_parent_dn, &op->oq_modrdn.rs_newrdn, NULL );
580 if (!new_ndn.bv_val) {
581 struct berval bv = {0, NULL};
582 dnNormalize( 0, NULL, NULL, &new_dn, &bv, op->o_tmpmemctx );
583 ber_dupbv( &new_ndn, &bv );
586 Debug( LDAP_DEBUG_TRACE, LDAP_XSTRING(bdb_modrdn) ": new ndn=%s\n",
587 new_ndn.bv_val, 0, 0 );
589 /* Shortcut the search */
590 nei = neip ? neip : eip;
591 rs->sr_err = bdb_cache_find_ndn ( op, ltid, &new_ndn, &nei );
592 if ( nei ) bdb_cache_entryinfo_unlock( nei );
593 switch( rs->sr_err ) {
594 case DB_LOCK_DEADLOCK:
595 case DB_LOCK_NOTGRANTED:
600 rs->sr_err = LDAP_ALREADY_EXISTS;
603 rs->sr_err = LDAP_OTHER;
604 rs->sr_text = "internal error";
608 /* Get attribute type and attribute value of our new rdn, we will
609 * need to add that to our new entry
611 if ( !new_rdn && ldap_bv2rdn_x( &op->oq_modrdn.rs_newrdn, &new_rdn,
612 (char **)&rs->sr_text, LDAP_DN_FORMAT_LDAP, op->o_tmpmemctx ) )
614 Debug( LDAP_DEBUG_TRACE,
615 LDAP_XSTRING(bdb_modrdn) ": can't figure out "
616 "type(s)/values(s) of newrdn\n",
618 rs->sr_err = LDAP_INVALID_DN_SYNTAX;
619 rs->sr_text = "unknown type(s) used in RDN";
623 Debug( LDAP_DEBUG_TRACE,
624 LDAP_XSTRING(bdb_modrdn)
625 ": new_rdn_type=\"%s\", new_rdn_val=\"%s\"\n",
626 new_rdn[ 0 ]->la_attr.bv_val,
627 new_rdn[ 0 ]->la_value.bv_val, 0 );
629 if ( op->oq_modrdn.rs_deleteoldrdn ) {
630 if ( !old_rdn && ldap_bv2rdn_x( &op->o_req_dn, &old_rdn,
631 (char **)&rs->sr_text, LDAP_DN_FORMAT_LDAP, op->o_tmpmemctx ) )
633 Debug( LDAP_DEBUG_TRACE,
634 LDAP_XSTRING(bdb_modrdn) ": can't figure out "
635 "the old_rdn type(s)/value(s)\n",
637 rs->sr_err = LDAP_OTHER;
638 rs->sr_text = "cannot parse RDN from old DN";
643 /* prepare modlist of modifications from old/new rdn */
645 rs->sr_err = slap_modrdn2mods( op, rs, e, old_rdn, new_rdn, &mod );
646 if ( rs->sr_err != LDAP_SUCCESS ) {
651 if( op->o_preread ) {
652 if( preread_ctrl == NULL ) {
653 preread_ctrl = &ctrls[num_ctrls++];
654 ctrls[num_ctrls] = NULL;
656 if( slap_read_controls( op, rs, e,
657 &slap_pre_read_bv, preread_ctrl ) )
659 Debug( LDAP_DEBUG_TRACE,
660 "<=- " LDAP_XSTRING(bdb_modrdn)
661 ": post-read failed!\n", 0, 0, 0 );
666 /* nested transaction */
667 rs->sr_err = TXN_BEGIN( bdb->bi_dbenv, ltid, <2, bdb->bi_db_opflags );
669 if( rs->sr_err != 0 ) {
670 Debug( LDAP_DEBUG_TRACE,
671 LDAP_XSTRING(bdb_modrdn)
672 ": txn_begin(2) failed: %s (%d)\n",
673 db_strerror(rs->sr_err), rs->sr_err, 0 );
674 rs->sr_err = LDAP_OTHER;
675 rs->sr_text = "internal error";
680 rs->sr_err = bdb_dn2id_delete( op, lt2, eip, e );
681 if ( rs->sr_err != 0 ) {
682 Debug(LDAP_DEBUG_TRACE,
683 "<=- " LDAP_XSTRING(bdb_modrdn)
684 ": dn2id del failed: %s (%d)\n",
685 db_strerror(rs->sr_err), rs->sr_err, 0 );
686 switch( rs->sr_err ) {
687 case DB_LOCK_DEADLOCK:
688 case DB_LOCK_NOTGRANTED:
691 rs->sr_err = LDAP_OTHER;
692 rs->sr_text = "DN index delete fail";
696 /* copy the entry, then override some fields */
698 dummy.e_name = new_dn;
699 dummy.e_nname = new_ndn;
700 dummy.e_attrs = NULL;
703 rs->sr_err = bdb_dn2id_add( op, lt2, neip ? neip : eip, &dummy );
704 if ( rs->sr_err != 0 ) {
705 Debug(LDAP_DEBUG_TRACE,
706 "<=- " LDAP_XSTRING(bdb_modrdn)
707 ": dn2id add failed: %s (%d)\n",
708 db_strerror(rs->sr_err), rs->sr_err, 0 );
709 switch( rs->sr_err ) {
710 case DB_LOCK_DEADLOCK:
711 case DB_LOCK_NOTGRANTED:
714 rs->sr_err = LDAP_OTHER;
715 rs->sr_text = "DN index add failed";
719 dummy.e_attrs = e->e_attrs;
721 if ( rs->sr_err == LDAP_SUCCESS && !op->o_noop && !op->o_no_psearch ) {
722 ldap_pvt_thread_rdwr_wlock( &bdb->bi_pslist_rwlock );
723 LDAP_LIST_FOREACH ( ps_list, &bdb->bi_psearch_list, o_ps_link ) {
724 rc = bdb_psearch( op, rs, ps_list, &dummy, LDAP_PSEARCH_BY_PREMODIFY );
726 Debug( LDAP_DEBUG_TRACE,
727 LDAP_XSTRING(bdb_modrdn)
728 ": persistent search failed (%d,%d)\n",
732 ldap_pvt_thread_rdwr_wunlock( &bdb->bi_pslist_rwlock );
737 rs->sr_err = bdb_modify_internal( op, lt2, &mod[0], &dummy,
738 &rs->sr_text, textbuf, textlen );
739 if( rs->sr_err != LDAP_SUCCESS ) {
740 Debug(LDAP_DEBUG_TRACE,
741 "<=- " LDAP_XSTRING(bdb_modrdn)
742 ": modify failed: %s (%d)\n",
743 db_strerror(rs->sr_err), rs->sr_err, 0 );
744 if ( ( rs->sr_err == LDAP_INSUFFICIENT_ACCESS ) && opinfo.boi_err ) {
745 rs->sr_err = opinfo.boi_err;
747 if ( dummy.e_attrs == e->e_attrs ) dummy.e_attrs = NULL;
748 switch( rs->sr_err ) {
749 case DB_LOCK_DEADLOCK:
750 case DB_LOCK_NOTGRANTED:
757 rs->sr_err = bdb_id2entry_update( op->o_bd, lt2, &dummy );
758 if ( rs->sr_err != 0 ) {
759 Debug(LDAP_DEBUG_TRACE,
760 "<=- " LDAP_XSTRING(bdb_modrdn)
761 ": id2entry failed: %s (%d)\n",
762 db_strerror(rs->sr_err), rs->sr_err, 0 );
763 switch( rs->sr_err ) {
764 case DB_LOCK_DEADLOCK:
765 case DB_LOCK_NOTGRANTED:
768 rs->sr_err = LDAP_OTHER;
769 rs->sr_text = "entry update failed";
773 if ( p_ndn.bv_len != 0 ) {
774 parent_is_glue = is_entry_glue(p);
775 rs->sr_err = bdb_cache_children( op, lt2, p );
776 if ( rs->sr_err != DB_NOTFOUND ) {
777 switch( rs->sr_err ) {
778 case DB_LOCK_DEADLOCK:
779 case DB_LOCK_NOTGRANTED:
784 Debug(LDAP_DEBUG_ARGS,
785 "<=- " LDAP_XSTRING(bdb_modrdn)
786 ": has_children failed: %s (%d)\n",
787 db_strerror(rs->sr_err), rs->sr_err, 0 );
788 rs->sr_err = LDAP_OTHER;
789 rs->sr_text = "internal error";
794 bdb_unlocked_cache_return_entry_r(&bdb->bi_cache, p);
798 if ( TXN_COMMIT( lt2, 0 ) != 0 ) {
799 rs->sr_err = LDAP_OTHER;
800 rs->sr_text = "txn_commit(2) failed";
804 if ( LDAP_STAILQ_EMPTY( &op->o_bd->be_syncinfo )) {
805 rc = bdb_csn_commit( op, rs, ltid, ei, &suffix_ei,
806 &ctxcsn_e, &ctxcsn_added, locker );
815 if( op->o_postread ) {
816 if( postread_ctrl == NULL ) {
817 postread_ctrl = &ctrls[num_ctrls++];
818 ctrls[num_ctrls] = NULL;
820 if( slap_read_controls( op, rs, &dummy,
821 &slap_post_read_bv, postread_ctrl ) )
823 Debug( LDAP_DEBUG_TRACE,
824 "<=- " LDAP_XSTRING(bdb_modrdn)
825 ": post-read failed!\n", 0, 0, 0 );
831 if(( rs->sr_err=TXN_ABORT( ltid )) != 0 ) {
832 rs->sr_text = "txn_abort (no-op) failed";
834 rs->sr_err = LDAP_SUCCESS;
839 rc = bdb_cache_modrdn( e, &op->orr_nnewrdn, &dummy, neip,
840 bdb->bi_dbenv, locker, &lock );
842 case DB_LOCK_DEADLOCK:
843 case DB_LOCK_NOTGRANTED:
846 dummy.e_attrs = NULL;
847 new_dn.bv_val = NULL;
848 new_ndn.bv_val = NULL;
850 if ( LDAP_STAILQ_EMPTY( &op->o_bd->be_syncinfo )) {
851 if ( ctxcsn_added ) {
852 bdb_cache_add( bdb, suffix_ei, ctxcsn_e,
853 (struct berval *)&slap_ldapsync_cn_bv, locker );
857 if ( rs->sr_err == LDAP_SUCCESS ) {
858 /* Loop through in-scope entries for each psearch spec */
859 ldap_pvt_thread_rdwr_wlock( &bdb->bi_pslist_rwlock );
860 LDAP_LIST_FOREACH ( ps_list, &bdb->bi_psearch_list, o_ps_link ) {
861 rc = bdb_psearch( op, rs, ps_list, e, LDAP_PSEARCH_BY_MODIFY );
863 Debug( LDAP_DEBUG_TRACE,
864 LDAP_XSTRING(bdb_modrdn)
865 ": persistent search failed "
870 pm_list = LDAP_LIST_FIRST(&op->o_pm_list);
871 while ( pm_list != NULL ) {
872 rc = bdb_psearch(op, rs, pm_list->ps_op,
873 e, LDAP_PSEARCH_BY_SCOPEOUT);
875 Debug( LDAP_DEBUG_TRACE,
876 LDAP_XSTRING(bdb_modrdn)
877 ": persistent search failed "
882 LDAP_LIST_REMOVE ( pm_list, ps_link );
883 pm_list = LDAP_LIST_NEXT ( pm_list, ps_link );
886 ldap_pvt_thread_rdwr_wunlock( &bdb->bi_pslist_rwlock );
889 if(( rs->sr_err=TXN_COMMIT( ltid, 0 )) != 0 ) {
890 rs->sr_text = "txn_commit failed";
892 rs->sr_err = LDAP_SUCCESS;
897 op->o_private = NULL;
899 if( rs->sr_err != LDAP_SUCCESS ) {
900 Debug( LDAP_DEBUG_TRACE,
901 LDAP_XSTRING(bdb_modrdn) ": %s : %s (%d)\n",
902 rs->sr_text, db_strerror(rs->sr_err), rs->sr_err );
903 rs->sr_err = LDAP_OTHER;
908 Debug(LDAP_DEBUG_TRACE,
909 LDAP_XSTRING(bdb_modrdn)
910 ": rdn modified%s id=%08lx dn=\"%s\"\n",
911 op->o_noop ? " (no-op)" : "",
912 dummy.e_id, op->o_req_dn.bv_val );
914 if( num_ctrls ) rs->sr_ctrls = ctrls;
917 if ( dummy.e_attrs ) {
918 attrs_free( dummy.e_attrs );
920 send_ldap_result( op, rs );
922 if( rs->sr_err == LDAP_SUCCESS && bdb->bi_txn_cp ) {
923 ldap_pvt_thread_yield();
924 TXN_CHECKPOINT( bdb->bi_dbenv,
925 bdb->bi_txn_cp_kbyte, bdb->bi_txn_cp_min, 0 );
928 if ( rs->sr_err == LDAP_SUCCESS && parent_is_glue && parent_is_leaf ) {
929 op->o_delete_glue_parent = 1;
933 if( new_dn.bv_val != NULL ) free( new_dn.bv_val );
934 if( new_ndn.bv_val != NULL ) free( new_ndn.bv_val );
936 /* LDAP v2 supporting correct attribute handling. */
937 if ( new_rdn != NULL ) {
938 ldap_rdnfree_x( new_rdn, op->o_tmpmemctx );
940 if ( old_rdn != NULL ) {
941 ldap_rdnfree_x( old_rdn, op->o_tmpmemctx );
945 for (; mod; mod=tmp ) {
947 /* slap_modrdn2mods does things one way,
948 * slap_mods_opattrs does it differently
950 if ( mod->sml_op != SLAP_MOD_SOFTADD &&
951 mod->sml_op != LDAP_MOD_DELETE ) break;
952 if ( mod->sml_nvalues ) free( mod->sml_nvalues[0].bv_val );
955 slap_mods_free( mod );
958 /* LDAP v3 Support */
960 /* free new parent and reader lock */
961 bdb_unlocked_cache_return_entry_r(&bdb->bi_cache, np);
965 /* free parent and reader lock */
966 bdb_unlocked_cache_return_entry_r(&bdb->bi_cache, p);
971 bdb_unlocked_cache_return_entry_w( &bdb->bi_cache, e);
975 pm_list = LDAP_LIST_FIRST(&op->o_pm_list);
976 while ( pm_list != NULL ) {
977 LDAP_LIST_REMOVE ( pm_list, ps_link );
979 pm_list = LDAP_LIST_NEXT ( pm_list, ps_link );
983 op->o_private = NULL;
986 if( preread_ctrl != NULL ) {
987 slap_sl_free( (*preread_ctrl)->ldctl_value.bv_val, op->o_tmpmemctx );
988 slap_sl_free( *preread_ctrl, op->o_tmpmemctx );
990 if( postread_ctrl != NULL ) {
991 slap_sl_free( (*postread_ctrl)->ldctl_value.bv_val, op->o_tmpmemctx );
992 slap_sl_free( *postread_ctrl, op->o_tmpmemctx );