1 /* modrdn.c - bdb backend modrdn routine */
4 * Copyright 1998-2003 The OpenLDAP Foundation, All Rights Reserved.
5 * COPYING RESTRICTIONS APPLY, see COPYRIGHT file
11 #include <ac/string.h>
17 bdb_modrdn( Operation *op, SlapReply *rs )
19 struct bdb_info *bdb = (struct bdb_info *) op->o_bd->be_private;
20 AttributeDescription *children = slap_schema.si_ad_children;
21 AttributeDescription *entry = slap_schema.si_ad_entry;
22 struct berval p_dn, p_ndn;
23 struct berval new_dn = {0, NULL}, new_ndn = {0, NULL};
27 EntryInfo *ei = NULL, *eip = NULL, *nei = NULL, *neip = NULL;
28 /* LDAP v2 supporting correct attribute handling. */
29 LDAPRDN new_rdn = NULL;
30 LDAPRDN old_rdn = NULL;
31 char textbuf[SLAP_TEXT_BUFLEN];
32 size_t textlen = sizeof textbuf;
33 DB_TXN *ltid = NULL, *lt2;
34 struct bdb_op_info opinfo;
39 Entry *np = NULL; /* newSuperior Entry */
40 struct berval *np_dn = NULL; /* newSuperior dn */
41 struct berval *np_ndn = NULL; /* newSuperior ndn */
42 struct berval *new_parent_dn = NULL; /* np_dn, p_dn, or NULL */
44 /* Used to interface with bdb_modify_internal() */
45 Modifications *mod = NULL; /* Used to delete old rdn */
47 int manageDSAit = get_manageDSAit( op );
50 DB_LOCK lock, plock, nplock;
58 struct psid_entry *pm_list, *pm_prev;
62 LDAP_LOG ( OPERATION, ENTRY, "==>bdb_modrdn(%s,%s,%s)\n",
63 op->o_req_dn.bv_val,op->oq_modrdn.rs_newrdn.bv_val,
64 op->oq_modrdn.rs_newSup ? op->oq_modrdn.rs_newSup->bv_val : "NULL" );
66 Debug( LDAP_DEBUG_TRACE, "==>bdb_modrdn(%s,%s,%s)\n",
67 op->o_req_dn.bv_val,op->oq_modrdn.rs_newrdn.bv_val,
68 op->oq_modrdn.rs_newSup ? op->oq_modrdn.rs_newSup->bv_val : "NULL" );
72 retry: /* transaction retry */
74 bdb_unlocked_cache_return_entry_w(&bdb->bi_cache, e);
78 bdb_unlocked_cache_return_entry_r(&bdb->bi_cache, p);
82 bdb_unlocked_cache_return_entry_r(&bdb->bi_cache, np);
86 LDAP_LOG ( OPERATION, DETAIL1, "==>bdb_modrdn: retrying...\n", 0, 0, 0);
88 Debug( LDAP_DEBUG_TRACE, "==>bdb_modrdn: retrying...\n", 0, 0, 0 );
92 pm_list = LDAP_LIST_FIRST(&op->o_pm_list);
93 while ( pm_list != NULL ) {
94 LDAP_LIST_REMOVE ( pm_list, ps_link );
96 pm_list = LDAP_LIST_NEXT ( pm_list, ps_link );
101 rs->sr_err = TXN_ABORT( ltid );
103 op->o_private = NULL;
104 op->o_do_not_cache = opinfo.boi_acl_cache;
105 if( rs->sr_err != 0 ) {
106 rs->sr_err = LDAP_OTHER;
107 rs->sr_text = "internal error";
110 bdb_trans_backoff( ++num_retries );
111 ldap_pvt_thread_yield();
114 /* begin transaction */
115 rs->sr_err = TXN_BEGIN( bdb->bi_dbenv, NULL, <id,
116 bdb->bi_db_opflags );
118 if( rs->sr_err != 0 ) {
120 LDAP_LOG ( OPERATION, ERR,
121 "==>bdb_modrdn: txn_begin failed: %s (%d)\n",
122 db_strerror(rs->sr_err), rs->sr_err, 0 );
124 Debug( LDAP_DEBUG_TRACE,
125 "bdb_delete: txn_begin failed: %s (%d)\n",
126 db_strerror(rs->sr_err), rs->sr_err, 0 );
128 rs->sr_err = LDAP_OTHER;
129 rs->sr_text = "internal error";
133 locker = TXN_ID ( ltid );
135 opinfo.boi_bdb = op->o_bd;
136 opinfo.boi_txn = ltid;
137 opinfo.boi_locker = locker;
139 opinfo.boi_acl_cache = op->o_do_not_cache;
140 op->o_private = &opinfo;
143 rs->sr_err = bdb_dn2entry( op, ltid, &op->o_req_ndn, &ei, 1,
146 switch( rs->sr_err ) {
150 case DB_LOCK_DEADLOCK:
151 case DB_LOCK_NOTGRANTED:
154 rs->sr_text = "ldap server busy";
157 rs->sr_err = LDAP_OTHER;
158 rs->sr_text = "internal error";
164 if ( rs->sr_err == DB_NOTFOUND || !e ||
165 ( !manageDSAit && is_entry_glue( e ))) {
166 if( e != NULL && !is_entry_glue( e )) {
168 if ( rs->sr_err == DB_NOTFOUND ) {
171 rs->sr_matched = ch_strdup( e->e_dn );
172 rs->sr_ref = is_entry_referral( e )
173 ? get_entry_referrals( op, e )
175 bdb_unlocked_cache_return_entry_r( &bdb->bi_cache, e);
180 BerVarray deref = op->o_bd->syncinfo ?
181 op->o_bd->syncinfo->provideruri_bv : default_referral;
183 BerVarray deref = default_referral;
185 rs->sr_ref = referral_rewrite( deref, NULL, &op->o_req_dn, LDAP_SCOPE_DEFAULT );
188 rs->sr_err = LDAP_REFERRAL;
189 send_ldap_result( op, rs );
191 ber_bvarray_free( rs->sr_ref );
192 free( (char *)rs->sr_matched );
194 rs->sr_matched = NULL;
199 if ( get_assert( op ) &&
200 ( test_filter( op, e, get_assertion( op )) != LDAP_COMPARE_TRUE ))
202 rs->sr_err = LDAP_ASSERTION_FAILED;
206 /* check write on old entry */
207 rs->sr_err = access_allowed( op, e, entry, NULL, ACL_WRITE, NULL );
208 if ( ! rs->sr_err ) {
209 switch( opinfo.boi_err ) {
210 case DB_LOCK_DEADLOCK:
211 case DB_LOCK_NOTGRANTED:
216 LDAP_LOG ( OPERATION, ERR,
217 "==>bdb_modrdn: no access to entry\n", 0, 0, 0 );
219 Debug( LDAP_DEBUG_TRACE, "no access to entry\n", 0,
222 rs->sr_text = "no write access to old entry";
223 rs->sr_err = LDAP_INSUFFICIENT_ACCESS;
228 rs->sr_err = bdb_cache_children( op, ltid, e );
229 if ( rs->sr_err != DB_NOTFOUND ) {
230 switch( rs->sr_err ) {
231 case DB_LOCK_DEADLOCK:
232 case DB_LOCK_NOTGRANTED:
236 LDAP_LOG ( OPERATION, DETAIL1,
237 "<=- bdb_modrdn: non-leaf %s\n", op->o_req_dn.bv_val, 0, 0 );
239 Debug(LDAP_DEBUG_ARGS,
240 "<=- bdb_modrdn: non-leaf %s\n",
241 op->o_req_dn.bv_val, 0, 0);
243 rs->sr_err = LDAP_NOT_ALLOWED_ON_NONLEAF;
244 rs->sr_text = "subtree rename not supported";
248 LDAP_LOG ( OPERATION, ERR,
249 "<=- bdb_modrdn: has_children failed %s (%d)\n",
250 db_strerror(rs->sr_err), rs->sr_err, 0 );
252 Debug(LDAP_DEBUG_ARGS,
253 "<=- bdb_modrdn: has_children failed: %s (%d)\n",
254 db_strerror(rs->sr_err), rs->sr_err, 0 );
256 rs->sr_err = LDAP_OTHER;
257 rs->sr_text = "internal error";
261 ei->bei_state |= CACHE_ENTRY_NO_KIDS;
263 if (!manageDSAit && is_entry_referral( e ) ) {
264 /* parent is a referral, don't allow add */
265 rs->sr_ref = get_entry_referrals( op, e );
268 LDAP_LOG ( OPERATION, DETAIL1,
269 "==>bdb_modrdn: entry %s is referral \n", e->e_dn, 0, 0 );
271 Debug( LDAP_DEBUG_TRACE, "bdb_modrdn: entry %s is referral\n",
275 rs->sr_err = LDAP_REFERRAL,
276 rs->sr_matched = e->e_name.bv_val;
277 send_ldap_result( op, rs );
279 ber_bvarray_free( rs->sr_ref );
281 rs->sr_matched = NULL;
285 if ( be_issuffix( op->o_bd, &e->e_nname ) ) {
286 p_ndn = slap_empty_bv;
288 dnParent( &e->e_nname, &p_ndn );
291 if ( p_ndn.bv_len != 0 ) {
292 /* Make sure parent entry exist and we can write its
295 eip = ei->bei_parent;
296 rs->sr_err = bdb_cache_find_id( op, ltid,
297 eip->bei_id, &eip, 0, locker, &plock );
299 switch( rs->sr_err ) {
303 case DB_LOCK_DEADLOCK:
304 case DB_LOCK_NOTGRANTED:
307 rs->sr_text = "ldap server busy";
310 rs->sr_err = LDAP_OTHER;
311 rs->sr_text = "internal error";
318 LDAP_LOG ( OPERATION, ERR,
319 "==>bdb_modrdn: parent does not exist\n", 0, 0, 0 );
321 Debug( LDAP_DEBUG_TRACE, "bdb_modrdn: parent does not exist\n",
324 rs->sr_err = LDAP_OTHER;
325 rs->sr_text = "old entry's parent does not exist";
329 /* check parent for "children" acl */
330 rs->sr_err = access_allowed( op, p,
331 children, NULL, ACL_WRITE, NULL );
333 if ( ! rs->sr_err ) {
334 switch( opinfo.boi_err ) {
335 case DB_LOCK_DEADLOCK:
336 case DB_LOCK_NOTGRANTED:
340 rs->sr_err = LDAP_INSUFFICIENT_ACCESS;
342 LDAP_LOG ( OPERATION, ERR,
343 "==>bdb_modrdn: no access to parent\n", 0, 0, 0 );
345 Debug( LDAP_DEBUG_TRACE, "no access to parent\n", 0,
348 rs->sr_text = "no write access to old parent's children";
353 LDAP_LOG ( OPERATION, DETAIL1,
354 "==>bdb_modrdn: wr to children %s is OK\n", p_ndn.bv_val, 0, 0 );
356 Debug( LDAP_DEBUG_TRACE,
357 "bdb_modrdn: wr to children of entry %s OK\n",
358 p_ndn.bv_val, 0, 0 );
361 if ( p_ndn.bv_val == slap_empty_bv.bv_val ) {
362 p_dn = slap_empty_bv;
364 dnParent( &e->e_name, &p_dn );
368 LDAP_LOG ( OPERATION, DETAIL1,
369 "==>bdb_modrdn: parent dn=%s\n", p_dn.bv_val, 0, 0 );
371 Debug( LDAP_DEBUG_TRACE,
372 "bdb_modrdn: parent dn=%s\n",
377 /* no parent, modrdn entry directly under root */
378 isroot = be_isroot( op->o_bd, &op->o_ndn );
380 if ( be_issuffix( op->o_bd, (struct berval *)&slap_empty_bv )
381 || be_isupdate( op->o_bd, &op->o_ndn ) ) {
383 p = (Entry *)&slap_entry_root;
385 /* check parent for "children" acl */
386 rs->sr_err = access_allowed( op, p,
387 children, NULL, ACL_WRITE, NULL );
391 if ( ! rs->sr_err ) {
392 switch( opinfo.boi_err ) {
393 case DB_LOCK_DEADLOCK:
394 case DB_LOCK_NOTGRANTED:
398 rs->sr_err = LDAP_INSUFFICIENT_ACCESS;
400 LDAP_LOG ( OPERATION, ERR,
401 "==>bdb_modrdn: no access to parent\n", 0, 0, 0 );
403 Debug( LDAP_DEBUG_TRACE,
404 "no access to parent\n",
407 rs->sr_text = "no write access to old parent";
412 LDAP_LOG ( OPERATION, DETAIL1,
413 "==>bdb_modrdn: wr to children of entry \"%s\" OK\n",
416 Debug( LDAP_DEBUG_TRACE,
417 "bdb_modrdn: wr to children of entry \"\" OK\n",
425 LDAP_LOG ( OPERATION, DETAIL1,
426 "==>bdb_modrdn: parent dn=\"\" \n", 0, 0, 0 );
428 Debug( LDAP_DEBUG_TRACE,
429 "bdb_modrdn: parent dn=\"\"\n",
435 LDAP_LOG ( OPERATION, ERR,
436 "==>bdb_modrdn: no parent, not root &\"\" is not "
437 "suffix\n", 0, 0, 0 );
439 Debug( LDAP_DEBUG_TRACE,
440 "bdb_modrdn: no parent, not root "
441 "& \"\" is not suffix\n",
444 rs->sr_text = "no write access to old parent";
445 rs->sr_err = LDAP_INSUFFICIENT_ACCESS;
451 new_parent_dn = &p_dn; /* New Parent unless newSuperior given */
453 if ( op->oq_modrdn.rs_newSup != NULL ) {
455 LDAP_LOG ( OPERATION, DETAIL1,
456 "==>bdb_modrdn: new parent \"%s\" requested...\n",
457 op->oq_modrdn.rs_newSup->bv_val, 0, 0 );
459 Debug( LDAP_DEBUG_TRACE,
460 "bdb_modrdn: new parent \"%s\" requested...\n",
461 op->oq_modrdn.rs_newSup->bv_val, 0, 0 );
464 /* newSuperior == oldParent? */
465 if( dn_match( &p_ndn, op->oq_modrdn.rs_nnewSup ) ) {
467 LDAP_LOG( BACK_BDB, INFO, "bdb_back_modrdn: "
468 "new parent \"%s\" same as the old parent \"%s\"\n",
469 op->oq_modrdn.rs_newSup->bv_val, p_dn.bv_val, 0 );
471 Debug( LDAP_DEBUG_TRACE, "bdb_back_modrdn: "
472 "new parent \"%s\" same as the old parent \"%s\"\n",
473 op->oq_modrdn.rs_newSup->bv_val, p_dn.bv_val, 0 );
475 op->oq_modrdn.rs_newSup = NULL; /* ignore newSuperior */
479 if ( op->oq_modrdn.rs_newSup != NULL ) {
480 if ( op->oq_modrdn.rs_newSup->bv_len ) {
481 np_dn = op->oq_modrdn.rs_newSup;
482 np_ndn = op->oq_modrdn.rs_nnewSup;
484 /* newSuperior == oldParent?, if so ==> ERROR */
485 /* newSuperior == entry being moved?, if so ==> ERROR */
486 /* Get Entry with dn=newSuperior. Does newSuperior exist? */
488 rs->sr_err = bdb_dn2entry( op, ltid, np_ndn,
489 &neip, 0, locker, &nplock );
491 switch( rs->sr_err ) {
492 case 0: np = neip->bei_e;
495 case DB_LOCK_DEADLOCK:
496 case DB_LOCK_NOTGRANTED:
499 rs->sr_text = "ldap server busy";
502 rs->sr_err = LDAP_OTHER;
503 rs->sr_text = "internal error";
509 LDAP_LOG ( OPERATION, DETAIL1,
510 "==>bdb_modrdn: newSup(ndn=%s) not here!\n",
511 np_ndn->bv_val, 0, 0 );
513 Debug( LDAP_DEBUG_TRACE,
514 "bdb_modrdn: newSup(ndn=%s) not here!\n",
515 np_ndn->bv_val, 0, 0);
517 rs->sr_text = "new superior not found";
518 rs->sr_err = LDAP_OTHER;
523 LDAP_LOG ( OPERATION, DETAIL1,
524 "==>bdb_modrdn: wr to new parent OK np=%p, id=%ld\n",
525 (void *) np, (long) np->e_id, 0 );
527 Debug( LDAP_DEBUG_TRACE,
528 "bdb_modrdn: wr to new parent OK np=%p, id=%ld\n",
529 (void *) np, (long) np->e_id, 0 );
532 /* check newSuperior for "children" acl */
533 rs->sr_err = access_allowed( op, np, children,
534 NULL, ACL_WRITE, NULL );
537 switch( opinfo.boi_err ) {
538 case DB_LOCK_DEADLOCK:
539 case DB_LOCK_NOTGRANTED:
544 LDAP_LOG ( OPERATION, DETAIL1,
545 "==>bdb_modrdn: no wr to newSup children\n", 0, 0, 0 );
547 Debug( LDAP_DEBUG_TRACE,
548 "bdb_modrdn: no wr to newSup children\n",
551 rs->sr_text = "no write access to new superior's children";
552 rs->sr_err = LDAP_INSUFFICIENT_ACCESS;
557 if ( is_entry_alias( np ) ) {
558 /* parent is an alias, don't allow add */
560 LDAP_LOG ( OPERATION, DETAIL1,
561 "==>bdb_modrdn: entry is alias\n", 0, 0, 0 );
563 Debug( LDAP_DEBUG_TRACE, "bdb_modrdn: entry is alias\n",
566 rs->sr_text = "new superior is an alias";
567 rs->sr_err = LDAP_ALIAS_PROBLEM;
572 if ( is_entry_referral( np ) ) {
573 /* parent is a referral, don't allow add */
575 LDAP_LOG ( OPERATION, DETAIL1,
576 "==>bdb_modrdn: entry is referral\n", 0, 0, 0 );
578 Debug( LDAP_DEBUG_TRACE, "bdb_modrdn: entry is referral\n",
581 rs->sr_text = "new superior is a referral";
582 rs->sr_err = LDAP_OTHER;
587 if ( isroot == -1 ) {
588 isroot = be_isroot( op->o_bd, &op->o_ndn );
593 /* no parent, modrdn entry directly under root */
595 if ( be_issuffix( op->o_bd, (struct berval *)&slap_empty_bv )
596 || be_isupdate( op->o_bd, &op->o_ndn ) ) {
597 np = (Entry *)&slap_entry_root;
599 /* check parent for "children" acl */
600 rs->sr_err = access_allowed( op, np,
601 children, NULL, ACL_WRITE, NULL );
605 if ( ! rs->sr_err ) {
606 switch( opinfo.boi_err ) {
607 case DB_LOCK_DEADLOCK:
608 case DB_LOCK_NOTGRANTED:
612 rs->sr_err = LDAP_INSUFFICIENT_ACCESS;
614 LDAP_LOG ( OPERATION, ERR,
615 "==>bdb_modrdn: no access to superior\n", 0, 0, 0 );
617 Debug( LDAP_DEBUG_TRACE,
618 "no access to new superior\n",
621 rs->sr_text = "no write access to new superior's children";
626 LDAP_LOG ( OPERATION, DETAIL1,
627 "bdb_modrdn: wr to children entry \"\" OK\n", 0, 0, 0 );
629 Debug( LDAP_DEBUG_TRACE,
630 "bdb_modrdn: wr to children of entry \"\" OK\n",
636 LDAP_LOG ( OPERATION, ERR,
637 "bdb_modrdn: new superior=\"\", not root & \"\" "
638 "is not suffix\n", 0, 0, 0 );
640 Debug( LDAP_DEBUG_TRACE,
641 "bdb_modrdn: new superior=\"\", not root "
642 "& \"\" is not suffix\n",
645 rs->sr_text = "no write access to new superior's children";
646 rs->sr_err = LDAP_INSUFFICIENT_ACCESS;
652 LDAP_LOG ( OPERATION, DETAIL1,
653 "bdb_modrdn: new superior=\"\"\n", 0, 0, 0 );
655 Debug( LDAP_DEBUG_TRACE,
656 "bdb_modrdn: new superior=\"\"\n",
662 LDAP_LOG ( OPERATION, DETAIL1,
663 "bdb_modrdn: wr to new parent's children OK\n", 0, 0, 0 );
665 Debug( LDAP_DEBUG_TRACE,
666 "bdb_modrdn: wr to new parent's children OK\n",
670 new_parent_dn = np_dn;
673 /* Build target dn and make sure target entry doesn't exist already. */
674 if (!new_dn.bv_val) build_new_dn( &new_dn, new_parent_dn, &op->oq_modrdn.rs_newrdn );
676 if (!new_ndn.bv_val) {
677 struct berval bv = {0, NULL};
678 dnNormalize( 0, NULL, NULL, &new_dn, &bv, op->o_tmpmemctx );
679 ber_dupbv( &new_ndn, &bv );
683 LDAP_LOG ( OPERATION, RESULTS,
684 "bdb_modrdn: new ndn=%s\n", new_ndn.bv_val, 0, 0 );
686 Debug( LDAP_DEBUG_TRACE, "bdb_modrdn: new ndn=%s\n",
687 new_ndn.bv_val, 0, 0 );
690 /* Shortcut the search */
691 nei = neip ? neip : eip;
692 rs->sr_err = bdb_cache_find_ndn ( op, ltid, &new_ndn, &nei, locker );
693 if ( nei ) bdb_cache_entryinfo_unlock( nei );
694 switch( rs->sr_err ) {
695 case DB_LOCK_DEADLOCK:
696 case DB_LOCK_NOTGRANTED:
701 rs->sr_err = LDAP_ALREADY_EXISTS;
704 rs->sr_err = LDAP_OTHER;
705 rs->sr_text = "internal error";
709 /* Get attribute type and attribute value of our new rdn, we will
710 * need to add that to our new entry
712 if ( !new_rdn && ldap_bv2rdn_x( &op->oq_modrdn.rs_newrdn, &new_rdn, (char **)&rs->sr_text,
713 LDAP_DN_FORMAT_LDAP, op->o_tmpmemctx ) )
716 LDAP_LOG ( OPERATION, ERR,
717 "bdb_modrdn: can't figure out "
718 "type(s)/values(s) of newrdn\n",
721 Debug( LDAP_DEBUG_TRACE,
722 "bdb_modrdn: can't figure out "
723 "type(s)/values(s) of newrdn\n",
726 rs->sr_err = LDAP_INVALID_DN_SYNTAX;
727 rs->sr_text = "unknown type(s) used in RDN";
732 LDAP_LOG ( OPERATION, RESULTS,
733 "bdb_modrdn: new_rdn_type=\"%s\", "
734 "new_rdn_val=\"%s\"\n",
735 new_rdn[ 0 ]->la_attr.bv_val,
736 new_rdn[ 0 ]->la_value.bv_val, 0 );
738 Debug( LDAP_DEBUG_TRACE,
739 "bdb_modrdn: new_rdn_type=\"%s\", "
740 "new_rdn_val=\"%s\"\n",
741 new_rdn[ 0 ]->la_attr.bv_val,
742 new_rdn[ 0 ]->la_value.bv_val, 0 );
745 if ( op->oq_modrdn.rs_deleteoldrdn ) {
746 if ( !old_rdn && ldap_bv2rdn_x( &op->o_req_dn, &old_rdn, (char **)&rs->sr_text,
747 LDAP_DN_FORMAT_LDAP, op->o_tmpmemctx ) )
750 LDAP_LOG ( OPERATION, ERR,
751 "bdb_modrdn: can't figure out "
752 "type(s)/values(s) of old_rdn\n",
755 Debug( LDAP_DEBUG_TRACE,
756 "bdb_modrdn: can't figure out "
757 "the old_rdn type(s)/value(s)\n",
760 rs->sr_err = LDAP_OTHER;
761 rs->sr_text = "cannot parse RDN from old DN";
766 /* prepare modlist of modifications from old/new rdn */
768 rs->sr_err = slap_modrdn2mods( op, rs, e, old_rdn, new_rdn, &mod );
769 if ( rs->sr_err != LDAP_SUCCESS ) {
774 /* nested transaction */
775 rs->sr_err = TXN_BEGIN( bdb->bi_dbenv, ltid, <2,
776 bdb->bi_db_opflags );
778 if( rs->sr_err != 0 ) {
780 LDAP_LOG ( OPERATION, ERR,
781 "bdb_modrdn: txn_begin(2) failed: %s (%d)\n", db_strerror(rs->sr_err), rs->sr_err, 0 );
783 Debug( LDAP_DEBUG_TRACE,
784 "bdb_modrdn: txn_begin(2) failed: %s (%d)\n",
785 db_strerror(rs->sr_err), rs->sr_err, 0 );
787 rs->sr_err = LDAP_OTHER;
788 rs->sr_text = "internal error";
797 rs->sr_err = bdb_dn2id_delete( op, lt2, eip, e );
798 if ( rs->sr_err != 0 ) {
800 LDAP_LOG ( OPERATION, ERR,
801 "<=- bdb_modrdn: dn2id del failed: %s (%d)\n",
802 db_strerror(rs->sr_err), rs->sr_err, 0 );
804 Debug(LDAP_DEBUG_TRACE,
805 "<=- bdb_modrdn: dn2id del failed: %s (%d)\n",
806 db_strerror(rs->sr_err), rs->sr_err, 0 );
808 switch( rs->sr_err ) {
809 case DB_LOCK_DEADLOCK:
810 case DB_LOCK_NOTGRANTED:
813 rs->sr_err = LDAP_OTHER;
814 rs->sr_text = "DN index delete fail";
818 /* Binary format uses a single contiguous block, cannot
819 * free individual fields. But if a previous modrdn has
820 * already happened, must free the names. The frees are
821 * done in bdb_cache_modrdn().
823 if( e->e_nname.bv_val < e->e_bv.bv_val || e->e_nname.bv_val >
824 e->e_bv.bv_val + e->e_bv.bv_len ) {
825 e->e_name.bv_val = NULL;
826 e->e_nname.bv_val = NULL;
829 e->e_nname = new_ndn;
830 new_dn.bv_val = NULL;
831 new_ndn.bv_val = NULL;
834 rs->sr_err = bdb_dn2id_add( op, lt2, neip ? neip : eip, e );
835 if ( rs->sr_err != 0 ) {
837 LDAP_LOG ( OPERATION, ERR,
838 "<=- bdb_modrdn: dn2id add failed: %s (%d)\n",
839 db_strerror(rs->sr_err), rs->sr_err, 0 );
841 Debug(LDAP_DEBUG_TRACE,
842 "<=- bdb_modrdn: dn2id add failed: %s (%d)\n",
843 db_strerror(rs->sr_err), rs->sr_err, 0 );
845 switch( rs->sr_err ) {
846 case DB_LOCK_DEADLOCK:
847 case DB_LOCK_NOTGRANTED:
850 rs->sr_err = LDAP_OTHER;
851 rs->sr_text = "DN index add failed";
856 if ( rs->sr_err == LDAP_SUCCESS && !op->o_noop ) {
857 LDAP_LIST_FOREACH ( ps_list, &bdb->bi_psearch_list, o_ps_link ) {
858 bdb_psearch( op, rs, ps_list, e, LDAP_PSEARCH_BY_PREMODIFY );
864 rs->sr_err = bdb_modify_internal( op, lt2, &mod[0], e,
865 &rs->sr_text, textbuf, textlen );
867 if( rs->sr_err != LDAP_SUCCESS ) {
869 LDAP_LOG ( OPERATION, ERR,
870 "<=- bdb_modrdn: modify failed: %s (%d)\n",
871 db_strerror(rs->sr_err), rs->sr_err, 0 );
873 Debug(LDAP_DEBUG_TRACE,
874 "<=- bdb_modrdn: modify failed: %s (%d)\n",
875 db_strerror(rs->sr_err), rs->sr_err, 0 );
877 if ( ( rs->sr_err == LDAP_INSUFFICIENT_ACCESS ) && opinfo.boi_err ) {
878 rs->sr_err = opinfo.boi_err;
880 switch( rs->sr_err ) {
881 case DB_LOCK_DEADLOCK:
882 case DB_LOCK_NOTGRANTED:
889 rs->sr_err = bdb_id2entry_update( op->o_bd, lt2, e );
890 if ( rs->sr_err != 0 ) {
892 LDAP_LOG ( OPERATION, ERR,
893 "<=- bdb_modrdn: id2entry failed: %s (%d)\n",
894 db_strerror(rs->sr_err), rs->sr_err, 0 );
896 Debug(LDAP_DEBUG_TRACE,
897 "<=- bdb_modrdn: id2entry failed: %s (%d)\n",
898 db_strerror(rs->sr_err), rs->sr_err, 0 );
900 switch( rs->sr_err ) {
901 case DB_LOCK_DEADLOCK:
902 case DB_LOCK_NOTGRANTED:
905 rs->sr_err = LDAP_OTHER;
906 rs->sr_text = "entry update failed";
909 if ( TXN_COMMIT( lt2, 0 ) != 0 ) {
910 rs->sr_err = LDAP_OTHER;
911 rs->sr_text = "txn_commit(2) failed";
916 if(( rs->sr_err=TXN_ABORT( ltid )) != 0 ) {
917 rs->sr_text = "txn_abort (no-op) failed";
920 rs->sr_err = LDAP_SUCCESS;
924 char gid[DB_XIDDATASIZE];
926 snprintf( gid, sizeof( gid ), "%s-%08lx-%08lx",
927 bdb_uuid.bv_val, (long) op->o_connid, (long) op->o_opid );
929 if(( rs->sr_err=TXN_PREPARE( ltid, gid )) != 0 ) {
930 rs->sr_text = "txn_prepare failed";
932 bdb_cache_modrdn( save, &op->orr_nnewrdn, e, neip,
933 bdb->bi_dbenv, locker, &lock );
934 if(( rs->sr_err=TXN_COMMIT( ltid, 0 )) != 0 ) {
935 rs->sr_text = "txn_commit failed";
937 rs->sr_err = LDAP_SUCCESS;
943 op->o_private = NULL;
945 if( rs->sr_err == LDAP_SUCCESS ) {
947 LDAP_LOG ( OPERATION, RESULTS,
948 "bdb_modrdn: rdn modified%s id=%08lx dn=\"%s\"\n",
949 op->o_noop ? " (no-op)" : "", e->e_id, e->e_dn );
951 Debug(LDAP_DEBUG_TRACE,
952 "bdb_modrdn: rdn modified%s id=%08lx dn=\"%s\"\n",
953 op->o_noop ? " (no-op)" : "", e->e_id, e->e_dn );
958 LDAP_LOG ( OPERATION, RESULTS, "bdb_modrdn: %s : %s (%d)\n",
959 rs->sr_text, db_strerror(rs->sr_err), rs->sr_err );
961 Debug( LDAP_DEBUG_TRACE, "bdb_add: %s : %s (%d)\n",
962 rs->sr_text, db_strerror(rs->sr_err), rs->sr_err );
964 rs->sr_err = LDAP_OTHER;
968 send_ldap_result( op, rs );
971 if ( rs->sr_err == LDAP_SUCCESS && !op->o_noop ) {
972 /* Loop through in-scope entries for each psearch spec */
973 LDAP_LIST_FOREACH ( ps_list, &bdb->bi_psearch_list, o_ps_link ) {
974 bdb_psearch( op, rs, ps_list, e, LDAP_PSEARCH_BY_MODIFY );
976 pm_list = LDAP_LIST_FIRST(&op->o_pm_list);
977 while ( pm_list != NULL ) {
978 bdb_psearch(op, rs, pm_list->ps_op,
979 e, LDAP_PSEARCH_BY_SCOPEOUT);
981 LDAP_LIST_REMOVE ( pm_list, ps_link );
982 pm_list = LDAP_LIST_NEXT ( pm_list, ps_link );
988 if( rs->sr_err == LDAP_SUCCESS && bdb->bi_txn_cp ) {
989 ldap_pvt_thread_yield();
990 TXN_CHECKPOINT( bdb->bi_dbenv,
991 bdb->bi_txn_cp_kbyte, bdb->bi_txn_cp_min, 0 );
995 if( new_dn.bv_val != NULL ) free( new_dn.bv_val );
996 if( new_ndn.bv_val != NULL ) free( new_ndn.bv_val );
998 /* LDAP v2 supporting correct attribute handling. */
999 if ( new_rdn != NULL ) {
1000 ldap_rdnfree_x( new_rdn, op->o_tmpmemctx );
1002 if ( old_rdn != NULL ) {
1003 ldap_rdnfree_x( old_rdn, op->o_tmpmemctx );
1007 for (; mod; mod=tmp ) {
1008 tmp = mod->sml_next;
1009 if ( mod->sml_nvalues ) free( mod->sml_nvalues[0].bv_val );
1014 /* LDAP v3 Support */
1016 /* free new parent and reader lock */
1017 bdb_unlocked_cache_return_entry_r(&bdb->bi_cache, np);
1021 /* free parent and reader lock */
1022 bdb_unlocked_cache_return_entry_r(&bdb->bi_cache, p);
1027 bdb_unlocked_cache_return_entry_w( &bdb->bi_cache, e);
1030 if( ltid != NULL ) {
1032 pm_list = LDAP_LIST_FIRST(&op->o_pm_list);
1033 while ( pm_list != NULL ) {
1034 LDAP_LIST_REMOVE ( pm_list, ps_link );
1036 pm_list = LDAP_LIST_NEXT ( pm_list, ps_link );
1041 op->o_private = NULL;
1044 return ( ( rs->sr_err == LDAP_SUCCESS ) ? noop : rs->sr_err );