1 /* add.c - ldap BerkeleyDB back-end add 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_add(Operation *op, SlapReply *rs )
19 struct bdb_info *bdb = (struct bdb_info *) op->o_bd->be_private;
23 char textbuf[SLAP_TEXT_BUFLEN];
24 size_t textlen = sizeof textbuf;
25 AttributeDescription *children = slap_schema.si_ad_children;
26 AttributeDescription *entry = slap_schema.si_ad_entry;
27 DB_TXN *ltid = NULL, *lt2;
28 struct bdb_op_info opinfo;
40 EntryInfo *suffix_ei = NULL;
44 LDAPControl *ctrls[SLAP_MAX_RESPONSE_CONTROLS];
48 LDAP_LOG ( OPERATION, ARGS, "==> bdb_add: %s\n", op->oq_add.rs_e->e_name.bv_val, 0, 0 );
50 Debug(LDAP_DEBUG_ARGS, "==> bdb_add: %s\n", op->oq_add.rs_e->e_name.bv_val, 0, 0);
53 /* check entry's schema */
54 rs->sr_err = entry_schema_check( op->o_bd, op->oq_add.rs_e, NULL, &rs->sr_text, textbuf, textlen );
55 if ( rs->sr_err != LDAP_SUCCESS ) {
57 LDAP_LOG ( OPERATION, ERR,
58 "bdb_add: entry failed schema check: %s (%d)\n", rs->sr_text, rs->sr_err, 0 );
60 Debug( LDAP_DEBUG_TRACE,
61 "bdb_add: entry failed schema check: %s (%d)\n",
62 rs->sr_text, rs->sr_err, 0 );
68 subentry = is_entry_subentry( op->oq_add.rs_e );
72 * acquire an ID outside of the operation transaction
73 * to avoid serializing adds.
75 rs->sr_err = bdb_next_id( op->o_bd, NULL, &op->oq_add.rs_e->e_id );
76 if( rs->sr_err != 0 ) {
78 LDAP_LOG ( OPERATION, ERR,
79 "bdb_add: next_id failed (%d)\n", rs->sr_err, 0, 0 );
81 Debug( LDAP_DEBUG_TRACE,
82 "bdb_add: next_id failed (%d)\n", rs->sr_err, 0, 0 );
84 rs->sr_err = LDAP_OTHER;
85 rs->sr_text = "internal error";
90 retry: /* transaction retry */
92 /* free parent and reader lock */
93 bdb_unlocked_cache_return_entry_r( &bdb->bi_cache, p );
96 rs->sr_err = TXN_ABORT( ltid );
99 op->o_do_not_cache = opinfo.boi_acl_cache;
100 if( rs->sr_err != 0 ) {
101 rs->sr_err = LDAP_OTHER;
102 rs->sr_text = "internal error";
105 ldap_pvt_thread_yield();
106 bdb_trans_backoff( ++num_retries );
109 /* begin transaction */
110 rs->sr_err = TXN_BEGIN( bdb->bi_dbenv, NULL, <id,
111 bdb->bi_db_opflags );
113 if( rs->sr_err != 0 ) {
115 LDAP_LOG ( OPERATION, ERR,
116 "bdb_add: txn_begin failed: %s (%d)\n", db_strerror(rs->sr_err), rs->sr_err, 0 );
118 Debug( LDAP_DEBUG_TRACE,
119 "bdb_add: txn_begin failed: %s (%d)\n",
120 db_strerror(rs->sr_err), rs->sr_err, 0 );
122 rs->sr_err = LDAP_OTHER;
123 rs->sr_text = "internal error";
127 locker = TXN_ID ( ltid );
129 opinfo.boi_bdb = op->o_bd;
130 opinfo.boi_txn = ltid;
131 opinfo.boi_locker = locker;
133 opinfo.boi_acl_cache = op->o_do_not_cache;
134 op->o_private = &opinfo;
137 * Get the parent dn and see if the corresponding entry exists.
139 if ( be_issuffix( op->o_bd, &op->oq_add.rs_e->e_nname ) ) {
142 dnParent( &op->oq_add.rs_e->e_nname, &pdn );
145 /* get entry or parent */
146 rs->sr_err = bdb_dn2entry( op, ltid, &op->ora_e->e_nname, &ei,
148 switch( rs->sr_err ) {
150 rs->sr_err = LDAP_ALREADY_EXISTS;
154 case DB_LOCK_DEADLOCK:
155 case DB_LOCK_NOTGRANTED:
158 rs->sr_text = "ldap server busy";
161 rs->sr_err = LDAP_OTHER;
162 rs->sr_text = "internal error";
168 if ( !bvmatch( &pdn, &p->e_nname ) ) {
169 rs->sr_matched = ber_strdup_x( p->e_name.bv_val,
171 rs->sr_ref = is_entry_referral( p )
172 ? get_entry_referrals( op, p )
174 bdb_unlocked_cache_return_entry_r( &bdb->bi_cache, p );
177 LDAP_LOG ( OPERATION, DETAIL1,
178 "bdb_add: parent does not exist\n", 0, 0, 0 );
180 Debug( LDAP_DEBUG_TRACE, "bdb_add: parent does not exist\n",
184 rs->sr_err = LDAP_REFERRAL;
185 send_ldap_result( op, rs );
187 ber_bvarray_free( rs->sr_ref );
188 op->o_tmpfree( (char *)rs->sr_matched, op->o_tmpmemctx );
190 rs->sr_matched = NULL;
195 rs->sr_err = access_allowed( op, p,
196 children, NULL, ACL_WRITE, NULL );
198 if ( ! rs->sr_err ) {
199 switch( opinfo.boi_err ) {
200 case DB_LOCK_DEADLOCK:
201 case DB_LOCK_NOTGRANTED:
206 LDAP_LOG ( OPERATION, DETAIL1,
207 "bdb_add: no write access to parent\n", 0, 0, 0 );
209 Debug( LDAP_DEBUG_TRACE, "bdb_add: no write access to parent\n",
212 rs->sr_err = LDAP_INSUFFICIENT_ACCESS;
213 rs->sr_text = "no write access to parent";
214 goto return_results;;
217 #ifdef BDB_SUBENTRIES
218 if ( is_entry_subentry( p ) ) {
219 /* parent is a subentry, don't allow add */
221 LDAP_LOG ( OPERATION, DETAIL1,
222 "bdb_add: parent is subentry\n", 0, 0, 0 );
224 Debug( LDAP_DEBUG_TRACE, "bdb_add: parent is subentry\n",
227 rs->sr_err = LDAP_OBJECT_CLASS_VIOLATION;
228 rs->sr_text = "parent is a subentry";
229 goto return_results;;
233 if ( is_entry_alias( p ) ) {
234 /* parent is an alias, don't allow add */
236 LDAP_LOG ( OPERATION, DETAIL1,
237 "bdb_add: parent is alias\n", 0, 0, 0 );
239 Debug( LDAP_DEBUG_TRACE, "bdb_add: parent is alias\n",
242 rs->sr_err = LDAP_ALIAS_PROBLEM;
243 rs->sr_text = "parent is an alias";
244 goto return_results;;
248 if ( is_entry_referral( p ) ) {
249 /* parent is a referral, don't allow add */
250 rs->sr_matched = p->e_name.bv_val;
251 rs->sr_ref = get_entry_referrals( op, p );
254 LDAP_LOG ( OPERATION, DETAIL1,
255 "bdb_add: parent is referral\n", 0, 0, 0 );
257 Debug( LDAP_DEBUG_TRACE, "bdb_add: parent is referral\n",
261 rs->sr_err = LDAP_REFERRAL;
262 send_ldap_result( op, rs );
264 ber_bvarray_free( rs->sr_ref );
265 bdb_unlocked_cache_return_entry_r( &bdb->bi_cache, p );
267 rs->sr_matched = NULL;
272 #ifdef BDB_SUBENTRIES
275 /* parent must be an administrative point of the required kind */
279 /* free parent and reader lock */
280 bdb_unlocked_cache_return_entry_r( &bdb->bi_cache, p );
286 * if not attempting to add entry at suffix or with parent ""
288 if (( !be_isroot( op->o_bd, &op->o_ndn ) || pdn.bv_len > 0 )
289 && !is_entry_glue( op->oq_add.rs_e ))
292 LDAP_LOG ( OPERATION, DETAIL1, "bdb_add: %s denied\n",
293 pdn.bv_len == 0 ? "suffix" : "entry at root", 0, 0 );
295 Debug( LDAP_DEBUG_TRACE, "bdb_add: %s denied\n",
296 pdn.bv_len == 0 ? "suffix" : "entry at root",
299 rs->sr_err = LDAP_NO_SUCH_OBJECT;
304 if ( get_assert( op ) &&
305 ( test_filter( op, op->oq_add.rs_e, get_assertion( op ))
306 != LDAP_COMPARE_TRUE ))
308 rs->sr_err = LDAP_ASSERTION_FAILED;
312 rs->sr_err = access_allowed( op, op->oq_add.rs_e,
313 entry, NULL, ACL_WRITE, NULL );
315 if ( ! rs->sr_err ) {
316 switch( opinfo.boi_err ) {
317 case DB_LOCK_DEADLOCK:
318 case DB_LOCK_NOTGRANTED:
323 LDAP_LOG ( OPERATION, DETAIL1,
324 "bdb_add: no write access to entry\n", 0, 0, 0 );
326 Debug( LDAP_DEBUG_TRACE, "bdb_add: no write access to entry\n",
329 rs->sr_err = LDAP_INSUFFICIENT_ACCESS;
330 rs->sr_text = "no write access to entry";
331 goto return_results;;
335 if( op->o_postread ) {
336 if ( slap_read_controls( op, rs, op->oq_add.rs_e,
337 &slap_post_read_bv, &ctrls[num_ctrls] ) )
340 LDAP_LOG ( OPERATION, DETAIL1,
341 "<=- bdb_add: post-read failed!\n", 0, 0, 0 );
343 Debug( LDAP_DEBUG_TRACE,
344 "<=- bdb_add: post-read failed!\n", 0, 0, 0 );
348 ctrls[++num_ctrls] = NULL;
351 /* nested transaction */
352 rs->sr_err = TXN_BEGIN( bdb->bi_dbenv, ltid, <2,
353 bdb->bi_db_opflags );
355 if( rs->sr_err != 0 ) {
357 LDAP_LOG ( OPERATION, ERR,
358 "bdb_add: txn_begin(2) failed: %s (%d)\n", db_strerror(rs->sr_err), rs->sr_err, 0 );
360 Debug( LDAP_DEBUG_TRACE,
361 "bdb_add: txn_begin(2) failed: %s (%d)\n",
362 db_strerror(rs->sr_err), rs->sr_err, 0 );
364 rs->sr_err = LDAP_OTHER;
365 rs->sr_text = "internal error";
370 rs->sr_err = bdb_dn2id_add( op, lt2, ei, op->oq_add.rs_e );
371 if ( rs->sr_err != 0 ) {
373 LDAP_LOG ( OPERATION, ERR,
374 "bdb_add: dn2id_add failed: %s (%d)\n", db_strerror(rs->sr_err), rs->sr_err, 0 );
376 Debug( LDAP_DEBUG_TRACE, "bdb_add: dn2id_add failed: %s (%d)\n",
377 db_strerror(rs->sr_err), rs->sr_err, 0 );
380 switch( rs->sr_err ) {
381 case DB_LOCK_DEADLOCK:
382 case DB_LOCK_NOTGRANTED:
385 rs->sr_err = LDAP_ALREADY_EXISTS;
388 rs->sr_err = LDAP_OTHER;
394 rs->sr_err = bdb_id2entry_add( op->o_bd, lt2, op->oq_add.rs_e );
395 if ( rs->sr_err != 0 ) {
397 LDAP_LOG ( OPERATION, ERR, "bdb_add: id2entry_add failed\n", 0, 0, 0 );
399 Debug( LDAP_DEBUG_TRACE, "bdb_add: id2entry_add failed\n",
402 switch( rs->sr_err ) {
403 case DB_LOCK_DEADLOCK:
404 case DB_LOCK_NOTGRANTED:
407 rs->sr_err = LDAP_OTHER;
409 rs->sr_text = "entry store failed";
413 /* attribute indexes */
414 rs->sr_err = bdb_index_entry_add( op, lt2, op->oq_add.rs_e );
415 if ( rs->sr_err != LDAP_SUCCESS ) {
417 LDAP_LOG ( OPERATION, ERR,
418 "bdb_add: index_entry_add failed\n", 0, 0, 0 );
420 Debug( LDAP_DEBUG_TRACE, "bdb_add: index_entry_add failed\n",
423 switch( rs->sr_err ) {
424 case DB_LOCK_DEADLOCK:
425 case DB_LOCK_NOTGRANTED:
428 rs->sr_err = LDAP_OTHER;
430 rs->sr_text = "index generation failed";
433 if ( TXN_COMMIT( lt2, 0 ) != 0 ) {
434 rs->sr_err = LDAP_OTHER;
435 rs->sr_text = "txn_commit(2) failed";
439 if ( !op->o_bd->be_syncinfo ) {
440 rc = bdb_csn_commit( op, rs, ltid, ei, &suffix_ei,
441 &ctxcsn_e, &ctxcsn_added, locker );
451 if (( rs->sr_err=TXN_ABORT( ltid )) != 0 ) {
452 rs->sr_text = "txn_abort (no-op) failed";
455 rs->sr_err = LDAP_SUCCESS;
459 char gid[DB_XIDDATASIZE];
461 memset( gid, 0, sizeof(gid) );
462 snprintf( gid, sizeof( gid ), "%s-%08lx-%08lx",
463 bdb_uuid.bv_val, (long) op->o_connid, (long) op->o_opid );
465 if (( rs->sr_err=TXN_PREPARE( ltid, gid )) != 0 ) {
466 rs->sr_text = "txn_prepare failed";
472 nrdn.bv_val = op->ora_e->e_nname.bv_val;
473 nrdn.bv_len = pdn.bv_val - nrdn.bv_val - 1;
475 nrdn = op->ora_e->e_nname;
478 bdb_cache_add( bdb, ei, op->oq_add.rs_e, &nrdn, locker );
480 if ( suffix_ei == NULL ) {
481 suffix_ei = op->oq_add.rs_e->e_private;
484 if ( !op->o_bd->be_syncinfo ) {
485 if ( ctxcsn_added ) {
486 bdb_cache_add( bdb, suffix_ei, ctxcsn_e, (struct berval *)&slap_ldapsync_cn_bv, locker );
490 if(( rs->sr_err=TXN_COMMIT( ltid, 0 )) != 0 ) {
491 rs->sr_text = "txn_commit failed";
493 rs->sr_err = LDAP_SUCCESS;
499 op->o_private = NULL;
501 if (rs->sr_err != LDAP_SUCCESS) {
503 LDAP_LOG ( OPERATION, ERR,
504 "bdb_add: %s : %s (%d)\n", rs->sr_text,
505 db_strerror(rs->sr_err), rs->sr_err );
507 Debug( LDAP_DEBUG_TRACE, "bdb_add: %s : %s (%d)\n",
508 rs->sr_text, db_strerror(rs->sr_err), rs->sr_err );
510 rs->sr_err = LDAP_OTHER;
515 LDAP_LOG ( OPERATION, RESULTS,
516 "bdb_add: added%s id=%08lx dn=\"%s\"\n",
517 op->o_noop ? " (no-op)" : "",
518 op->oq_add.rs_e->e_id, op->oq_add.rs_e->e_dn );
520 Debug(LDAP_DEBUG_TRACE, "bdb_add: added%s id=%08lx dn=\"%s\"\n",
521 op->o_noop ? " (no-op)" : "",
522 op->oq_add.rs_e->e_id, op->oq_add.rs_e->e_dn );
526 if( num_ctrls ) rs->sr_ctrls = ctrls;
529 send_ldap_result( op, rs );
531 if ( rs->sr_err == LDAP_SUCCESS && !noop && !op->o_no_psearch ) {
532 LDAP_LIST_FOREACH ( ps_list, &bdb->bi_psearch_list, o_ps_link ) {
533 bdb_psearch( op, rs, ps_list, op->oq_add.rs_e, LDAP_PSEARCH_BY_ADD );
537 if( rs->sr_err == LDAP_SUCCESS && bdb->bi_txn_cp ) {
538 ldap_pvt_thread_yield();
539 TXN_CHECKPOINT( bdb->bi_dbenv,
540 bdb->bi_txn_cp_kbyte, bdb->bi_txn_cp_min, 0 );
546 op->o_private = NULL;
549 return ( ( rs->sr_err == LDAP_SUCCESS ) ? noop : rs->sr_err );