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