]> git.sur5r.net Git - openldap/blob - servers/slapd/back-bdb/modify.c
Happy New Year (belated)
[openldap] / servers / slapd / back-bdb / modify.c
1 /* modify.c - bdb backend modify routine */
2 /* $OpenLDAP$ */
3 /* This work is part of OpenLDAP Software <http://www.openldap.org/>.
4  *
5  * Copyright 2000-2008 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 #include <ac/time.h>
22
23 #include "back-bdb.h"
24
25 static struct berval scbva[] = {
26         BER_BVC("glue"),
27         BER_BVNULL
28 };
29
30 int bdb_modify_internal(
31         Operation *op,
32         DB_TXN *tid,
33         Modifications *modlist,
34         Entry *e,
35         const char **text,
36         char *textbuf,
37         size_t textlen )
38 {
39         int rc, err;
40         Modification    *mod;
41         Modifications   *ml;
42         Attribute       *save_attrs;
43         Attribute       *ap;
44         int                     glue_attr_delete = 0;
45         int                     got_delete;
46         AttrInfo *ai;
47
48         Debug( LDAP_DEBUG_TRACE, "bdb_modify_internal: 0x%08lx: %s\n",
49                 e->e_id, e->e_dn, 0);
50
51         if ( !acl_check_modlist( op, e, modlist )) {
52                 return LDAP_INSUFFICIENT_ACCESS;
53         }
54
55         /* save_attrs will be disposed of by bdb_cache_modify */
56         save_attrs = e->e_attrs;
57         e->e_attrs = attrs_dup( e->e_attrs );
58
59         for ( ml = modlist; ml != NULL; ml = ml->sml_next ) {
60                 int match;
61                 mod = &ml->sml_mod;
62                 switch( mod->sm_op ) {
63                 case LDAP_MOD_ADD:
64                 case LDAP_MOD_REPLACE:
65                         if ( mod->sm_desc == slap_schema.si_ad_structuralObjectClass ) {
66                                 value_match( &match, slap_schema.si_ad_structuralObjectClass,
67                                         slap_schema.si_ad_structuralObjectClass->
68                                                 ad_type->sat_equality,
69                                         SLAP_MR_VALUE_OF_ATTRIBUTE_SYNTAX,
70                                         &mod->sm_values[0], &scbva[0], text );
71                                 if ( !match ) glue_attr_delete = 1;
72                         }
73                 }
74                 if ( glue_attr_delete )
75                         break;
76         }
77
78         if ( glue_attr_delete ) {
79                 Attribute       **app = &e->e_attrs;
80                 while ( *app != NULL ) {
81                         if ( !is_at_operational( (*app)->a_desc->ad_type )) {
82                                 Attribute *save = *app;
83                                 *app = (*app)->a_next;
84                                 attr_free( save );
85                                 continue;
86                         }
87                         app = &(*app)->a_next;
88                 }
89         }
90
91         for ( ml = modlist; ml != NULL; ml = ml->sml_next ) {
92                 struct berval ix_at;
93                 mod = &ml->sml_mod;
94                 got_delete = 0;
95
96                 switch ( mod->sm_op ) {
97                 case LDAP_MOD_ADD:
98                         Debug(LDAP_DEBUG_ARGS,
99                                 "bdb_modify_internal: add %s\n",
100                                 mod->sm_desc->ad_cname.bv_val, 0, 0);
101                         err = modify_add_values( e, mod, get_permissiveModify(op),
102                                 text, textbuf, textlen );
103                         if( err != LDAP_SUCCESS ) {
104                                 Debug(LDAP_DEBUG_ARGS, "bdb_modify_internal: %d %s\n",
105                                         err, *text, 0);
106                         }
107                         break;
108
109                 case LDAP_MOD_DELETE:
110                         if ( glue_attr_delete ) {
111                                 err = LDAP_SUCCESS;
112                                 break;
113                         }
114
115                         Debug(LDAP_DEBUG_ARGS,
116                                 "bdb_modify_internal: delete %s\n",
117                                 mod->sm_desc->ad_cname.bv_val, 0, 0);
118                         err = modify_delete_values( e, mod, get_permissiveModify(op),
119                                 text, textbuf, textlen );
120                         assert( err != LDAP_TYPE_OR_VALUE_EXISTS );
121                         if( err != LDAP_SUCCESS ) {
122                                 Debug(LDAP_DEBUG_ARGS, "bdb_modify_internal: %d %s\n",
123                                         err, *text, 0);
124                         } else {
125                                 got_delete = 1;
126                         }
127                         break;
128
129                 case LDAP_MOD_REPLACE:
130                         Debug(LDAP_DEBUG_ARGS,
131                                 "bdb_modify_internal: replace %s\n",
132                                 mod->sm_desc->ad_cname.bv_val, 0, 0);
133                         err = modify_replace_values( e, mod, get_permissiveModify(op),
134                                 text, textbuf, textlen );
135                         if( err != LDAP_SUCCESS ) {
136                                 Debug(LDAP_DEBUG_ARGS, "bdb_modify_internal: %d %s\n",
137                                         err, *text, 0);
138                         } else {
139                                 got_delete = 1;
140                         }
141                         break;
142
143                 case LDAP_MOD_INCREMENT:
144                         Debug(LDAP_DEBUG_ARGS,
145                                 "bdb_modify_internal: increment %s\n",
146                                 mod->sm_desc->ad_cname.bv_val, 0, 0);
147                         err = modify_increment_values( e, mod, get_permissiveModify(op),
148                                 text, textbuf, textlen );
149                         if( err != LDAP_SUCCESS ) {
150                                 Debug(LDAP_DEBUG_ARGS,
151                                         "bdb_modify_internal: %d %s\n",
152                                         err, *text, 0);
153                         } else {
154                                 got_delete = 1;
155                         }
156                         break;
157
158                 case SLAP_MOD_SOFTADD:
159                         Debug(LDAP_DEBUG_ARGS,
160                                 "bdb_modify_internal: softadd %s\n",
161                                 mod->sm_desc->ad_cname.bv_val, 0, 0);
162                         /* Avoid problems in index_add_mods()
163                          * We need to add index if necessary.
164                          */
165                         mod->sm_op = LDAP_MOD_ADD;
166
167                         err = modify_add_values( e, mod, get_permissiveModify(op),
168                                 text, textbuf, textlen );
169
170                         mod->sm_op = SLAP_MOD_SOFTADD;
171
172                         if ( err == LDAP_TYPE_OR_VALUE_EXISTS ) {
173                                 err = LDAP_SUCCESS;
174                         }
175
176                         if( err != LDAP_SUCCESS ) {
177                                 Debug(LDAP_DEBUG_ARGS, "bdb_modify_internal: %d %s\n",
178                                         err, *text, 0);
179                         }
180                         break;
181
182                 default:
183                         Debug(LDAP_DEBUG_ANY, "bdb_modify_internal: invalid op %d\n",
184                                 mod->sm_op, 0, 0);
185                         *text = "Invalid modify operation";
186                         err = LDAP_OTHER;
187                         Debug(LDAP_DEBUG_ARGS, "bdb_modify_internal: %d %s\n",
188                                 err, *text, 0);
189                 }
190
191                 if ( err != LDAP_SUCCESS ) {
192                         attrs_free( e->e_attrs );
193                         e->e_attrs = save_attrs;
194                         /* unlock entry, delete from cache */
195                         return err; 
196                 }
197
198                 /* If objectClass was modified, reset the flags */
199                 if ( mod->sm_desc == slap_schema.si_ad_objectClass ) {
200                         e->e_ocflags = 0;
201                 }
202
203                 if ( glue_attr_delete ) e->e_ocflags = 0;
204
205                 /* check if modified attribute was indexed
206                  * but not in case of NOOP... */
207                 ai = bdb_index_mask( op->o_bd, mod->sm_desc, &ix_at );
208                 if ( ai && !op->o_noop ) {
209                         if ( got_delete ) {
210                                 struct berval ix2;
211
212                                 ap = attr_find( save_attrs, mod->sm_desc );
213                                 if ( ap ) ap->a_flags |= SLAP_ATTR_IXDEL;
214
215                                 /* Find all other attrs that index to same slot */
216                                 for ( ap = e->e_attrs; ap; ap=ap->a_next ) {
217                                         ai = bdb_index_mask( op->o_bd, ap->a_desc, &ix2 );
218                                         if ( ai && ix2.bv_val == ix_at.bv_val )
219                                                 ap->a_flags |= SLAP_ATTR_IXADD;
220                                 }
221                         } else {
222                                 ap = attr_find( e->e_attrs, mod->sm_desc );
223                                 if ( ap ) ap->a_flags |= SLAP_ATTR_IXADD;
224                         }
225                 }
226         }
227
228         /* check that the entry still obeys the schema */
229         rc = entry_schema_check( op, e, save_attrs, get_relax(op), 0,
230                 text, textbuf, textlen );
231         if ( rc != LDAP_SUCCESS || op->o_noop ) {
232                 attrs_free( e->e_attrs );
233                 /* clear the indexing flags */
234                 for ( ap = save_attrs; ap != NULL; ap = ap->a_next ) {
235                         ap->a_flags &= ~(SLAP_ATTR_IXADD|SLAP_ATTR_IXDEL);
236                 }
237                 e->e_attrs = save_attrs;
238
239                 if ( rc != LDAP_SUCCESS ) {
240                         Debug( LDAP_DEBUG_ANY,
241                                 "entry failed schema check: %s\n",
242                                 *text, 0, 0 );
243                 }
244
245                 /* if NOOP then silently revert to saved attrs */
246                 return rc;
247         }
248
249         /* update the indices of the modified attributes */
250
251         /* start with deleting the old index entries */
252         for ( ap = save_attrs; ap != NULL; ap = ap->a_next ) {
253                 if ( ap->a_flags & SLAP_ATTR_IXDEL ) {
254                         struct berval *vals;
255                         Attribute *a2;
256                         ap->a_flags &= ~SLAP_ATTR_IXDEL;
257                         a2 = attr_find( e->e_attrs, ap->a_desc );
258                         if ( a2 ) {
259                                 /* need to detect which values were deleted */
260                                 int i, j;
261                                 struct berval tmp;
262                                 j = ap->a_numvals;
263                                 for ( i=0; i<j; ) {
264                                         rc = attr_valfind( a2, SLAP_MR_ASSERTED_VALUE_NORMALIZED_MATCH,
265                                                 &ap->a_nvals[i], NULL, op->o_tmpmemctx );
266                                         /* Move deleted values to end of array */
267                                         if ( rc == LDAP_NO_SUCH_ATTRIBUTE ) {
268                                                 j--;
269                                                 if ( i != j ) {
270                                                         tmp = ap->a_nvals[j];
271                                                         ap->a_nvals[j] = ap->a_nvals[i];
272                                                         ap->a_nvals[i] = tmp;
273                                                         tmp = ap->a_vals[j];
274                                                         ap->a_vals[j] = ap->a_vals[i];
275                                                         ap->a_vals[i] = tmp;
276                                                 }
277                                                 continue;
278                                         }
279                                         i++;
280                                 }
281                                 vals = &ap->a_nvals[j];
282                         } else {
283                                 /* attribute was completely deleted */
284                                 vals = ap->a_nvals;
285                         }
286                         if ( !BER_BVISEMPTY( vals )) {
287                                 rc = bdb_index_values( op, tid, ap->a_desc,
288                                         vals, e->e_id, SLAP_INDEX_DELETE_OP );
289                                 if ( rc != LDAP_SUCCESS ) {
290                                         attrs_free( e->e_attrs );
291                                         e->e_attrs = save_attrs;
292                                         Debug( LDAP_DEBUG_ANY,
293                                                    "Attribute index delete failure",
294                                                    0, 0, 0 );
295                                         return rc;
296                                 }
297                         }
298                 }
299         }
300
301         /* add the new index entries */
302         for ( ap = e->e_attrs; ap != NULL; ap = ap->a_next ) {
303                 if (ap->a_flags & SLAP_ATTR_IXADD) {
304                         ap->a_flags &= ~SLAP_ATTR_IXADD;
305                         rc = bdb_index_values( op, tid, ap->a_desc,
306                                 ap->a_nvals,
307                                 e->e_id, SLAP_INDEX_ADD_OP );
308                         if ( rc != LDAP_SUCCESS ) {
309                                 attrs_free( e->e_attrs );
310                                 e->e_attrs = save_attrs;
311                                 Debug( LDAP_DEBUG_ANY,
312                                        "Attribute index add failure",
313                                        0, 0, 0 );
314                                 return rc;
315                         }
316                 }
317         }
318
319         return rc;
320 }
321
322
323 int
324 bdb_modify( Operation *op, SlapReply *rs )
325 {
326         struct bdb_info *bdb = (struct bdb_info *) op->o_bd->be_private;
327         Entry           *e = NULL;
328         EntryInfo       *ei = NULL;
329         int             manageDSAit = get_manageDSAit( op );
330         char textbuf[SLAP_TEXT_BUFLEN];
331         size_t textlen = sizeof textbuf;
332         DB_TXN  *ltid = NULL, *lt2;
333         struct bdb_op_info opinfo = {0};
334         Entry           dummy = {0};
335         int                     fakeroot = 0;
336
337         BDB_LOCKER      locker = 0;
338         DB_LOCK         lock;
339
340         int             num_retries = 0;
341
342         LDAPControl **preread_ctrl = NULL;
343         LDAPControl **postread_ctrl = NULL;
344         LDAPControl *ctrls[SLAP_MAX_RESPONSE_CONTROLS];
345         int num_ctrls = 0;
346
347         int rc;
348
349 #ifdef LDAP_X_TXN
350         int settle = 0;
351 #endif
352
353         Debug( LDAP_DEBUG_ARGS, LDAP_XSTRING(bdb_modify) ": %s\n",
354                 op->o_req_dn.bv_val, 0, 0 );
355
356 #ifdef LDAP_X_TXN
357         if( op->o_txnSpec ) {
358                 /* acquire connection lock */
359                 ldap_pvt_thread_mutex_lock( &op->o_conn->c_mutex );
360                 if( op->o_conn->c_txn == CONN_TXN_INACTIVE ) {
361                         rs->sr_text = "invalid transaction identifier";
362                         rs->sr_err = LDAP_X_TXN_ID_INVALID;
363                         goto txnReturn;
364                 } else if( op->o_conn->c_txn == CONN_TXN_SETTLE ) {
365                         settle=1;
366                         goto txnReturn;
367                 }
368
369                 if( op->o_conn->c_txn_backend == NULL ) {
370                         op->o_conn->c_txn_backend = op->o_bd;
371
372                 } else if( op->o_conn->c_txn_backend != op->o_bd ) {
373                         rs->sr_text = "transaction cannot span multiple database contexts";
374                         rs->sr_err = LDAP_AFFECTS_MULTIPLE_DSAS;
375                         goto txnReturn;
376                 }
377
378                 /* insert operation into transaction */
379
380                 rs->sr_text = "transaction specified";
381                 rs->sr_err = LDAP_X_TXN_SPECIFY_OKAY;
382
383 txnReturn:
384                 /* release connection lock */
385                 ldap_pvt_thread_mutex_unlock( &op->o_conn->c_mutex );
386
387                 if( !settle ) {
388                         send_ldap_result( op, rs );
389                         return rs->sr_err;
390                 }
391         }
392 #endif
393
394         ctrls[num_ctrls] = NULL;
395
396         slap_mods_opattrs( op, &op->orm_modlist, 1 );
397
398         if( 0 ) {
399 retry:  /* transaction retry */
400                 if ( dummy.e_attrs ) {
401                         attrs_free( dummy.e_attrs );
402                         dummy.e_attrs = NULL;
403                 }
404                 if( e != NULL ) {
405                         bdb_unlocked_cache_return_entry_w(&bdb->bi_cache, e);
406                         e = NULL;
407                 }
408                 Debug(LDAP_DEBUG_TRACE,
409                         LDAP_XSTRING(bdb_modify) ": retrying...\n", 0, 0, 0);
410
411                 rs->sr_err = TXN_ABORT( ltid );
412                 ltid = NULL;
413                 op->o_private = NULL;
414                 op->o_do_not_cache = opinfo.boi_acl_cache;
415                 if( rs->sr_err != 0 ) {
416                         rs->sr_err = LDAP_OTHER;
417                         rs->sr_text = "internal error";
418                         goto return_results;
419                 }
420                 if ( op->o_abandon ) {
421                         rs->sr_err = SLAPD_ABANDON;
422                         goto return_results;
423                 }
424                 bdb_trans_backoff( ++num_retries );
425         }
426
427         /* begin transaction */
428         rs->sr_err = TXN_BEGIN( bdb->bi_dbenv, NULL, &ltid, 
429                 bdb->bi_db_opflags );
430         rs->sr_text = NULL;
431         if( rs->sr_err != 0 ) {
432                 Debug( LDAP_DEBUG_TRACE,
433                         LDAP_XSTRING(bdb_modify) ": txn_begin failed: "
434                         "%s (%d)\n", db_strerror(rs->sr_err), rs->sr_err, 0 );
435                 rs->sr_err = LDAP_OTHER;
436                 rs->sr_text = "internal error";
437                 goto return_results;
438         }
439
440         locker = TXN_ID ( ltid );
441
442         opinfo.boi_bdb = op->o_bd;
443         opinfo.boi_txn = ltid;
444         opinfo.boi_err = 0;
445         opinfo.boi_acl_cache = op->o_do_not_cache;
446         op->o_private = &opinfo;
447
448         /* get entry or ancestor */
449         rs->sr_err = bdb_dn2entry( op, ltid, &op->o_req_ndn, &ei, 1,
450                 locker, &lock );
451
452         if ( rs->sr_err != 0 ) {
453                 Debug( LDAP_DEBUG_TRACE,
454                         LDAP_XSTRING(bdb_modify) ": dn2entry failed (%d)\n",
455                         rs->sr_err, 0, 0 );
456                 switch( rs->sr_err ) {
457                 case DB_LOCK_DEADLOCK:
458                 case DB_LOCK_NOTGRANTED:
459                         goto retry;
460                 case DB_NOTFOUND:
461                         if ( BER_BVISEMPTY( &op->o_req_ndn )) {
462                                 struct berval gluebv = BER_BVC("glue");
463                                 e = ch_calloc( 1, sizeof(Entry));
464                                 e->e_name.bv_val = ch_strdup( "" );
465                                 ber_dupbv( &e->e_nname, &e->e_name );
466                                 attr_merge_one( e, slap_schema.si_ad_objectClass,
467                                         &gluebv, NULL );
468                                 attr_merge_one( e, slap_schema.si_ad_structuralObjectClass,
469                                         &gluebv, NULL );
470                                 e->e_private = ei;
471                                 fakeroot = 1;
472                                 rs->sr_err = 0;
473                         }
474                         break;
475                 case LDAP_BUSY:
476                         rs->sr_text = "ldap server busy";
477                         goto return_results;
478                 default:
479                         rs->sr_err = LDAP_OTHER;
480                         rs->sr_text = "internal error";
481                         goto return_results;
482                 }
483         }
484
485         if ( !fakeroot ) {
486                 e = ei->bei_e;
487         }
488
489         /* acquire and lock entry */
490         /* FIXME: dn2entry() should return non-glue entry */
491         if (( rs->sr_err == DB_NOTFOUND ) ||
492                 ( !manageDSAit && e && is_entry_glue( e )))
493         {
494                 if ( e != NULL ) {
495                         rs->sr_matched = ch_strdup( e->e_dn );
496                         rs->sr_ref = is_entry_referral( e )
497                                 ? get_entry_referrals( op, e )
498                                 : NULL;
499                         bdb_unlocked_cache_return_entry_r (&bdb->bi_cache, e);
500                         e = NULL;
501
502                 } else {
503                         rs->sr_ref = referral_rewrite( default_referral, NULL,
504                                 &op->o_req_dn, LDAP_SCOPE_DEFAULT );
505                 }
506
507                 rs->sr_err = LDAP_REFERRAL;
508                 send_ldap_result( op, rs );
509
510                 if ( rs->sr_ref != default_referral ) {
511                         ber_bvarray_free( rs->sr_ref );
512                 }
513                 free( (char *)rs->sr_matched );
514                 rs->sr_ref = NULL;
515                 rs->sr_matched = NULL;
516
517                 goto done;
518         }
519
520         if ( !manageDSAit && is_entry_referral( e ) ) {
521                 /* entry is a referral, don't allow modify */
522                 rs->sr_ref = get_entry_referrals( op, e );
523
524                 Debug( LDAP_DEBUG_TRACE,
525                         LDAP_XSTRING(bdb_modify) ": entry is referral\n",
526                         0, 0, 0 );
527
528                 rs->sr_err = LDAP_REFERRAL;
529                 rs->sr_matched = e->e_name.bv_val;
530                 send_ldap_result( op, rs );
531
532                 ber_bvarray_free( rs->sr_ref );
533                 rs->sr_ref = NULL;
534                 rs->sr_matched = NULL;
535                 goto done;
536         }
537
538         if ( get_assert( op ) &&
539                 ( test_filter( op, e, get_assertion( op )) != LDAP_COMPARE_TRUE ))
540         {
541                 rs->sr_err = LDAP_ASSERTION_FAILED;
542                 goto return_results;
543         }
544
545         if( op->o_preread ) {
546                 if( preread_ctrl == NULL ) {
547                         preread_ctrl = &ctrls[num_ctrls++];
548                         ctrls[num_ctrls] = NULL;
549                 }
550                 if ( slap_read_controls( op, rs, e,
551                         &slap_pre_read_bv, preread_ctrl ) )
552                 {
553                         Debug( LDAP_DEBUG_TRACE,
554                                 "<=- " LDAP_XSTRING(bdb_modify) ": pre-read "
555                                 "failed!\n", 0, 0, 0 );
556                         if ( op->o_preread & SLAP_CONTROL_CRITICAL ) {
557                                 /* FIXME: is it correct to abort
558                                  * operation if control fails? */
559                                 goto return_results;
560                         }
561                 }
562         }
563
564         /* nested transaction */
565         rs->sr_err = TXN_BEGIN( bdb->bi_dbenv, ltid, &lt2, bdb->bi_db_opflags );
566         rs->sr_text = NULL;
567         if( rs->sr_err != 0 ) {
568                 Debug( LDAP_DEBUG_TRACE,
569                         LDAP_XSTRING(bdb_modify) ": txn_begin(2) failed: " "%s (%d)\n",
570                         db_strerror(rs->sr_err), rs->sr_err, 0 );
571                 rs->sr_err = LDAP_OTHER;
572                 rs->sr_text = "internal error";
573                 goto return_results;
574         }
575         /* Modify the entry */
576         dummy = *e;
577         rs->sr_err = bdb_modify_internal( op, lt2, op->orm_modlist,
578                 &dummy, &rs->sr_text, textbuf, textlen );
579
580         if( rs->sr_err != LDAP_SUCCESS ) {
581                 Debug( LDAP_DEBUG_TRACE,
582                         LDAP_XSTRING(bdb_modify) ": modify failed (%d)\n",
583                         rs->sr_err, 0, 0 );
584                 if ( (rs->sr_err == LDAP_INSUFFICIENT_ACCESS) && opinfo.boi_err ) {
585                         rs->sr_err = opinfo.boi_err;
586                 }
587                 /* Only free attrs if they were dup'd.  */
588                 if ( dummy.e_attrs == e->e_attrs ) dummy.e_attrs = NULL;
589                 switch( rs->sr_err ) {
590                 case DB_LOCK_DEADLOCK:
591                 case DB_LOCK_NOTGRANTED:
592                         goto retry;
593                 }
594                 goto return_results;
595         }
596
597         /* change the entry itself */
598         rs->sr_err = bdb_id2entry_update( op->o_bd, lt2, &dummy );
599         if ( rs->sr_err != 0 ) {
600                 Debug( LDAP_DEBUG_TRACE,
601                         LDAP_XSTRING(bdb_modify) ": id2entry update failed " "(%d)\n",
602                         rs->sr_err, 0, 0 );
603                 switch( rs->sr_err ) {
604                 case DB_LOCK_DEADLOCK:
605                 case DB_LOCK_NOTGRANTED:
606                         goto retry;
607                 }
608                 rs->sr_text = "entry update failed";
609                 goto return_results;
610         }
611
612         if ( TXN_COMMIT( lt2, 0 ) != 0 ) {
613                 rs->sr_err = LDAP_OTHER;
614                 rs->sr_text = "txn_commit(2) failed";
615                 goto return_results;
616         }
617
618         if( op->o_postread ) {
619                 if( postread_ctrl == NULL ) {
620                         postread_ctrl = &ctrls[num_ctrls++];
621                         ctrls[num_ctrls] = NULL;
622                 }
623                 if( slap_read_controls( op, rs, &dummy,
624                         &slap_post_read_bv, postread_ctrl ) )
625                 {
626                         Debug( LDAP_DEBUG_TRACE,
627                                 "<=- " LDAP_XSTRING(bdb_modify)
628                                 ": post-read failed!\n", 0, 0, 0 );
629                         if ( op->o_postread & SLAP_CONTROL_CRITICAL ) {
630                                 /* FIXME: is it correct to abort
631                                  * operation if control fails? */
632                                 goto return_results;
633                         }
634                 }
635         }
636
637         if( op->o_noop ) {
638                 if ( ( rs->sr_err = TXN_ABORT( ltid ) ) != 0 ) {
639                         rs->sr_text = "txn_abort (no-op) failed";
640                 } else {
641                         rs->sr_err = LDAP_X_NO_OPERATION;
642                         ltid = NULL;
643                         /* Only free attrs if they were dup'd.  */
644                         if ( dummy.e_attrs == e->e_attrs ) dummy.e_attrs = NULL;
645                         goto return_results;
646                 }
647         } else {
648                 /* may have changed in bdb_modify_internal() */
649                 e->e_ocflags = dummy.e_ocflags;
650                 if ( fakeroot ) {
651                         e->e_private = NULL;
652                         entry_free( e );
653                         e = NULL;
654                         attrs_free( dummy.e_attrs );
655
656                 } else {
657                         rc = bdb_cache_modify( bdb, e, dummy.e_attrs, locker, &lock );
658                         switch( rc ) {
659                         case DB_LOCK_DEADLOCK:
660                         case DB_LOCK_NOTGRANTED:
661                                 goto retry;
662                         }
663                 }
664                 dummy.e_attrs = NULL;
665
666                 rs->sr_err = TXN_COMMIT( ltid, 0 );
667         }
668         ltid = NULL;
669         op->o_private = NULL;
670
671         if( rs->sr_err != 0 ) {
672                 Debug( LDAP_DEBUG_TRACE,
673                         LDAP_XSTRING(bdb_modify) ": txn_%s failed: %s (%d)\n",
674                         op->o_noop ? "abort (no-op)" : "commit",
675                         db_strerror(rs->sr_err), rs->sr_err );
676                 rs->sr_err = LDAP_OTHER;
677                 rs->sr_text = "commit failed";
678
679                 goto return_results;
680         }
681
682         Debug( LDAP_DEBUG_TRACE,
683                 LDAP_XSTRING(bdb_modify) ": updated%s id=%08lx dn=\"%s\"\n",
684                 op->o_noop ? " (no-op)" : "",
685                 dummy.e_id, op->o_req_dn.bv_val );
686
687         rs->sr_err = LDAP_SUCCESS;
688         rs->sr_text = NULL;
689         if( num_ctrls ) rs->sr_ctrls = ctrls;
690
691 return_results:
692         if( dummy.e_attrs ) {
693                 attrs_free( dummy.e_attrs );
694         }
695         send_ldap_result( op, rs );
696
697         if( rs->sr_err == LDAP_SUCCESS && bdb->bi_txn_cp_kbyte ) {
698                 TXN_CHECKPOINT( bdb->bi_dbenv,
699                         bdb->bi_txn_cp_kbyte, bdb->bi_txn_cp_min, 0 );
700         }
701
702 done:
703         slap_graduate_commit_csn( op );
704
705         if( ltid != NULL ) {
706                 TXN_ABORT( ltid );
707         }
708         op->o_private = NULL;
709
710         if( e != NULL ) {
711                 bdb_unlocked_cache_return_entry_w (&bdb->bi_cache, e);
712         }
713
714         if( preread_ctrl != NULL && (*preread_ctrl) != NULL ) {
715                 slap_sl_free( (*preread_ctrl)->ldctl_value.bv_val, op->o_tmpmemctx );
716                 slap_sl_free( *preread_ctrl, op->o_tmpmemctx );
717         }
718         if( postread_ctrl != NULL && (*postread_ctrl) != NULL ) {
719                 slap_sl_free( (*postread_ctrl)->ldctl_value.bv_val, op->o_tmpmemctx );
720                 slap_sl_free( *postread_ctrl, op->o_tmpmemctx );
721         }
722
723         rs->sr_text = NULL;
724
725         return rs->sr_err;
726 }