3 * Replication Engine which uses the LDAP Sync protocol
5 /* Copyright (c) 2003 by International Business Machines, Inc.
7 * International Business Machines, Inc. (hereinafter called IBM) grants
8 * permission under its copyrights to use, copy, modify, and distribute this
9 * Software with or without fee, provided that the above copyright notice and
10 * all paragraphs of this notice appear in all copies, and that the name of IBM
11 * not be used in connection with the marketing of any product incorporating
12 * the Software or modifications thereof, without specific, written prior
15 * THE SOFTWARE IS PROVIDED "AS IS", AND IBM DISCLAIMS ALL WARRANTIES,
16 * INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A
17 * PARTICULAR PURPOSE. IN NO EVENT SHALL IBM BE LIABLE FOR ANY SPECIAL,
18 * DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER ARISING
19 * OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE, EVEN
20 * IF IBM IS APPRISED OF THE POSSIBILITY OF SUCH DAMAGES.
27 #include <ac/string.h>
28 #include <ac/socket.h>
34 #include "lutil_ldap.h"
41 syncrepl_message_to_entry ( LDAP *, Operation *, LDAPMessage *,
42 Modifications **, int*, struct berval *, struct berval * );
45 syncrepl_entry( LDAP *, Operation*, Entry*, Modifications*,
46 int, struct berval*, struct berval*, int );
49 syncrepl_del_nonpresent( LDAP *, Operation * );
52 syncrepl_add_glue( LDAP *, Operation*, Entry*, Modifications*, int,
53 struct berval*, struct berval* );
56 syncrepl_updateCookie( LDAP *, Operation *, struct berval *, struct berval * );
59 slap_mods_check_syncrepl( Operation *, Modifications **,
60 const char **, char *, size_t, void *ctx );
63 slap_mods_opattrs_syncrepl( Operation *, Modifications *, Modifications **,
64 const char **, char *, size_t );
67 slap_mods2entry_syncrepl( Modifications *, Entry **, int,
68 const char **, char *, size_t );
70 /* callback functions */
71 static int cookie_callback( struct slap_op *, struct slap_rep * );
72 static int dn_callback( struct slap_op *, struct slap_rep * );
73 static int nonpresent_callback( struct slap_op *, struct slap_rep * );
74 static int null_callback( struct slap_op *, struct slap_rep * );
76 static AttributeDescription **add_descs;
77 static AttributeDescription **add_descs_lastmod;
78 static AttributeDescription **del_descs;
79 static AttributeDescription **del_descs_lastmod;
81 struct runqueue_s syncrepl_rq;
86 add_descs = ch_malloc( 2 * sizeof( AttributeDescription * ));
87 add_descs[0] = slap_schema.si_ad_objectClass;
90 add_descs_lastmod = ch_malloc( 7 * sizeof( AttributeDescription * ));
91 add_descs_lastmod[0] = slap_schema.si_ad_objectClass;
92 add_descs_lastmod[1] = slap_schema.si_ad_creatorsName;
93 add_descs_lastmod[2] = slap_schema.si_ad_modifiersName;
94 add_descs_lastmod[3] = slap_schema.si_ad_createTimestamp;
95 add_descs_lastmod[4] = slap_schema.si_ad_modifyTimestamp;
96 add_descs_lastmod[5] = slap_schema.si_ad_entryCSN;
97 add_descs_lastmod[6] = NULL;
99 del_descs = ch_malloc( 9 * sizeof( AttributeDescription * ));
100 del_descs[0] = slap_schema.si_ad_structuralObjectClass;
101 del_descs[1] = slap_schema.si_ad_subschemaSubentry;
102 del_descs[2] = slap_schema.si_ad_hasSubordinates;
103 del_descs[3] = slap_schema.si_ad_creatorsName;
104 del_descs[4] = slap_schema.si_ad_modifiersName;
105 del_descs[5] = slap_schema.si_ad_createTimestamp;
106 del_descs[6] = slap_schema.si_ad_modifyTimestamp;
107 del_descs[7] = slap_schema.si_ad_entryCSN;
110 del_descs_lastmod = ch_malloc( 4 * sizeof( AttributeDescription * ));
111 del_descs_lastmod[0] = slap_schema.si_ad_structuralObjectClass;
112 del_descs_lastmod[1] = slap_schema.si_ad_subschemaSubentry;
113 del_descs_lastmod[2] = slap_schema.si_ad_hasSubordinates;
114 del_descs_lastmod[3] = NULL;
122 struct re_s* rtask = arg;
123 Backend *be = rtask->arg;
124 syncinfo_t *si = ( syncinfo_t * ) be->syncinfo;
126 SlapReply rs = {REP_RESULT};
129 LDAPControl **sctrls = NULL;
130 LDAPControl **rctrls = NULL;
131 LDAPControl *rctrlp = NULL;
132 BerElement *sync_ber = NULL;
133 struct berval *sync_bvalp = NULL;
135 BerElement *ctrl_ber = NULL;
136 BerElement *res_ber = NULL;
139 LDAPMessage *res = NULL;
140 LDAPMessage *msg = NULL;
144 int nresponses, nreferences, nextended, npartial;
145 int nresponses_psearch;
147 int cancel_msgid = -1;
149 struct berval *retdata = NULL;
151 int sync_info_arrived = 0;
155 struct berval syncUUID = { 0, NULL };
156 struct berval syncCookie = { 0, NULL };
161 int syncinfo_arrived = 0;
162 int cancel_response = 0;
165 AttributeDescription** descs = NULL;
177 struct berval base_bv = { 0, NULL };
178 struct berval pbase = { 0, NULL };
179 struct berval nbase = { 0, NULL };
180 struct berval sub_bv = { 0, NULL };
181 struct berval psubrdn = { 0, NULL };
182 struct berval nsubrdn = { 0, NULL };
183 struct berval psub = { 0, NULL };
184 struct berval nsub = { 0, NULL };
186 Modifications *modlist = NULL;
187 Modifications *ml, *mlnext;
188 char *def_filter_str = NULL;
191 LDAP_LOG ( OPERATION, DETAIL1, "do_syncrepl\n", 0, 0, 0 );
193 Debug( LDAP_DEBUG_TRACE, "=>do_syncrepl\n", 0, 0, 0 );
199 if ( abs(si->type) != LDAP_SYNC_REFRESH_ONLY &&
200 abs(si->type) != LDAP_SYNC_REFRESH_AND_PERSIST ) {
204 /* Init connection to master */
206 if ( ldap_is_ldap_url( si->masteruri )) {
207 rc = ldap_initialize( &ld, si->masteruri );
208 if ( rc != LDAP_SUCCESS ) {
210 LDAP_LOG( OPERATION, ERR, "do_syncrepl: "
211 "ldap_initialize failed (%s)\n",
212 si->masteruri, 0, 0 );
214 Debug( LDAP_DEBUG_ANY, "do_syncrepl: "
215 "ldap_initialize failed (%s)\n",
216 si->masteruri, 0, 0 );
220 ld = ldap_init( si->mastername, si->masterport );
223 LDAP_LOG( OPERATION, ERR, "do_syncrepl: "
224 "ldap_init failed (%s:%s)\n",
225 si->mastername, si->masterport, 0 );
227 Debug( LDAP_DEBUG_ANY, "do_syncrepl: "
228 "ldap_init failed (%s:%s)\n",
229 si->mastername, si->masterport, 0 );
234 op.o_protocol = LDAP_VERSION3;
235 ldap_set_option( ld, LDAP_OPT_PROTOCOL_VERSION, &op.o_protocol );
240 rc = ldap_start_tls_s( ld, NULL, NULL );
241 if( rc != LDAP_SUCCESS ) {
243 LDAP_LOG ( OPERATION, ERR, "do_syncrepl: "
244 "%s: ldap_start_tls failed (%d)\n",
245 si->tls == TLS_CRITICAL ? "Error" : "Warning",
248 Debug( LDAP_DEBUG_ANY,
249 "%s: ldap_start_tls failed (%d)\n",
250 si->tls == TLS_CRITICAL ? "Error" : "Warning",
253 if( si->tls == TLS_CRITICAL )
258 if ( si->bindmethod == LDAP_AUTH_SASL ) {
259 #ifdef HAVE_CYRUS_SASL
262 if ( si->secprops != NULL ) {
263 int err = ldap_set_option( ld,
264 LDAP_OPT_X_SASL_SECPROPS, si->secprops);
266 if( err != LDAP_OPT_SUCCESS ) {
268 LDAP_LOG ( OPERATION, ERR, "do_bind: Error: "
269 "ldap_set_option(%s,SECPROPS,\"%s\") failed!\n",
270 si->mastername, si->secprops, 0 );
272 Debug( LDAP_DEBUG_ANY, "Error: ldap_set_option "
273 "(%s,SECPROPS,\"%s\") failed!\n",
274 si->mastername, si->secprops, NULL );
280 defaults = lutil_sasl_defaults( ld,
287 rc = ldap_sasl_interactive_bind_s( ld,
295 if ( rc != LDAP_SUCCESS ) {
297 LDAP_LOG ( OPERATION, ERR, "do_syncrepl: "
298 "ldap_sasl_interactive_bind_s failed (%d)\n",
301 Debug( LDAP_DEBUG_ANY, "do_syncrepl: "
302 "ldap_sasl_interactive_bind_s failed (%d)\n",
307 #else /* HAVE_CYRUS_SASL */
308 fprintf( stderr, "not compiled with SASL support\n" );
312 rc = ldap_bind_s( ld, si->binddn, si->passwd, si->bindmethod );
313 if ( rc != LDAP_SUCCESS ) {
315 LDAP_LOG ( OPERATION, ERR, "do_syncrepl: "
316 "ldap_bind_s failed (%d)\n", rc, 0, 0 );
318 Debug( LDAP_DEBUG_ANY, "do_syncrepl: "
319 "ldap_bind_s failed (%d)\n", rc, 0, 0 );
327 op.o_tmpmemctx = NULL; /* FIXME : to use per-thread mem context */
328 op.o_tag = LDAP_REQ_SEARCH;
329 op.o_dn = si->updatedn;
330 op.o_ndn = si->updatedn;
332 op.o_time = slap_get_time();
333 op.o_managedsait = 1;
334 op.o_threadctx = si->ctx;
337 op.o_connid = op.o_conn->c_connid;
338 op.ors_scope = LDAP_SCOPE_BASE;
339 op.ors_deref = LDAP_DEREF_NEVER;
342 op.ors_attrsonly = 0;
344 op.ors_filter = str2filter( def_filter_str = "(objectClass=*)" );
345 ber_str2bv( def_filter_str, strlen( def_filter_str ), 1,
349 conn.c_send_ldap_result = slap_send_ldap_result;
350 conn.c_send_search_entry = slap_send_search_entry;
351 conn.c_send_search_reference = slap_send_search_reference;
353 /* get syncrepl cookie of shadow replica from subentry */
354 ber_str2bv( si->base, strlen(si->base), 1, &base_bv );
355 dnPrettyNormal( 0, &base_bv, &pbase, &nbase, op.o_tmpmemctx );
357 sprintf( substr, "cn=syncrepl%d", si->id );
358 ber_str2bv( substr, strlen(substr), 1, &sub_bv );
359 dnPrettyNormal( 0, &sub_bv, &psubrdn, &nsubrdn, op.o_tmpmemctx );
361 build_new_dn( &op.o_req_dn, &pbase, &psubrdn );
362 build_new_dn( &op.o_req_ndn, &nbase, &nsubrdn );
364 ch_free( base_bv.bv_val );
365 ch_free( pbase.bv_val );
366 ch_free( nbase.bv_val );
367 ch_free( sub_bv.bv_val );
368 ch_free( psubrdn.bv_val );
369 ch_free( nsubrdn.bv_val );
371 /* set callback function */
372 cb.sc_response = cookie_callback;
375 /* search subentry to retrieve cookie */
376 si->syncCookie = NULL;
377 be->be_search( &op, &rs );
379 ch_free( op.o_req_dn.bv_val );
380 ch_free( op.o_req_ndn.bv_val );
381 filter_free( op.ors_filter );
382 ch_free( op.ors_filterstr.bv_val );
384 psub = be->be_nsuffix[0];
386 /* setup LDAP SYNC control */
387 sync_ber = ber_alloc_t( LBER_USE_DER );
388 ber_set_option( sync_ber, LBER_OPT_BER_MEMCTX, op.o_tmpmemctx );
390 if ( si->syncCookie ) {
391 ber_printf( sync_ber, "{eO}", abs(si->type), si->syncCookie );
393 ber_printf( sync_ber, "{e}", abs(si->type) );
396 if ( ber_flatten( sync_ber, &sync_bvalp ) == LBER_ERROR ) {
397 ber_free( sync_ber, 1 );
400 ber_free( sync_ber, 1 );
402 sctrls = (LDAPControl**) sl_calloc( 3, sizeof(LDAPControl*), op.o_tmpmemctx );
404 c[0].ldctl_oid = LDAP_CONTROL_SYNC;
405 c[0].ldctl_value = (*sync_bvalp);
406 c[0].ldctl_iscritical = si->type < 0;
410 c[1].ldctl_oid = LDAP_CONTROL_PROXY_AUTHZ;
411 c[1].ldctl_value.bv_val = si->authzId;
412 c[1].ldctl_value.bv_len = strlen( si->authzId );
413 c[1].ldctl_iscritical = 1;
421 err = ldap_set_option( ld, LDAP_OPT_SERVER_CONTROLS, sctrls );
423 ber_bvfree( sync_bvalp );
426 if ( err != LDAP_OPT_SUCCESS )
427 fprintf( stderr, "Could not set controls : %d\n", err );
429 /* Delete Attributes */
430 if ( si->lastmod == LASTMOD_REQ ) {
431 descs = del_descs_lastmod;
436 for ( i = 0; descs[i] != NULL; i++ ) {
437 for ( j = 0; si->attrs[j] != NULL; j++ ) {
438 if ( !strcmp( si->attrs[j], descs[i]->ad_cname.bv_val )) {
439 ch_free( si->attrs[j] );
440 for ( k = j; si->attrs[k] != NULL; k++ ) {
441 si->attrs[k] = si->attrs[k+1];
449 for ( n = 0; si->attrs[ n ] != NULL; n++ ) ;
451 if ( si->lastmod == LASTMOD_REQ ) {
452 descs = add_descs_lastmod;
457 for ( i = 0; descs[i] != NULL; i++ ) {
458 tmp = ( char ** ) ch_realloc( si->attrs,
459 ( n + 2 ) * sizeof( char * ));
462 LDAP_LOG( OPERATION, ERR, "out of memory\n", 0,0,0 );
464 Debug( LDAP_DEBUG_ANY, "out of memory\n", 0,0,0 );
468 si->attrs[ n++ ] = ch_strdup ( descs[i]->ad_cname.bv_val );
469 si->attrs[ n ] = NULL;
472 /* Send LDAP SYNC search */
474 rc = ldap_search_ext( ld, si->base, si->scope, si->filterstr,
475 si->attrs, si->attrsonly, NULL, NULL,
478 if( rc != LDAP_SUCCESS ) {
479 fprintf( stderr, "syncrepl: ldap_search_ext: %s (%d)\n",
480 ldap_err2string( rc ), rc );
484 while (( rc = ldap_result( ld, LDAP_RES_ANY, LDAP_MSG_ONE, NULL, &res )) > 0 ) {
486 for ( msg = ldap_first_message( ld, res );
488 msg = ldap_next_message( ld, msg ) )
490 switch( ldap_msgtype( msg ) ) {
491 case LDAP_RES_SEARCH_ENTRY:
492 entry = syncrepl_message_to_entry( ld, &op, msg,
493 &modlist, &syncstate, &syncUUID, &syncCookie );
494 rc_efree = syncrepl_entry( ld, &op, entry, modlist,
495 syncstate, &syncUUID, &syncCookie, !syncinfo_arrived );
496 if ( syncCookie.bv_len ) {
497 syncrepl_updateCookie( ld, &op, &psub, &syncCookie );
501 for ( ml = modlist; ml != NULL; ml = mlnext ) {
502 mlnext = ml->sml_next;
507 case LDAP_RES_SEARCH_REFERENCE:
509 LDAP_LOG( OPERATION, ERR,
510 "do_syncrepl : reference received\n", 0, 0, 0 );
512 Debug( LDAP_DEBUG_ANY,
513 "do_syncrepl : reference received\n", 0, 0, 0 );
517 case LDAP_RES_SEARCH_RESULT:
518 ldap_parse_result( ld, msg, &err, NULL, NULL, NULL, &rctrls, 0 );
521 ctrl_ber = ber_alloc_t( LBER_USE_DER );
522 ber_set_option( ctrl_ber, LBER_OPT_BER_MEMCTX, op.o_tmpmemctx );
523 ber_write( ctrl_ber, rctrlp->ldctl_value.bv_val, rctrlp->ldctl_value.bv_len, 0 );
524 ber_reset( ctrl_ber, 1 );
526 ber_scanf( ctrl_ber, "{" );
527 if ( ber_peek_tag( ctrl_ber, &len )
528 == LDAP_SYNC_TAG_COOKIE ) {
529 ber_scanf( ctrl_ber, "o", &syncCookie );
532 if (si->type == LDAP_SYNC_REFRESH_AND_PERSIST) {
533 if ( cancel_response ) {
534 if ( syncCookie.bv_len ) {
535 ber_bvfree( si->syncCookie );
536 si->syncCookie = ber_dupbv( NULL, &syncCookie );
539 ber_free( ctrl_ber, 1 );
544 ber_free( ctrl_ber, 1 );
548 if ( syncCookie.bv_len ) {
549 syncrepl_updateCookie( ld, &op, &psub, &syncCookie );
551 syncrepl_del_nonpresent( ld, &op );
553 ber_free( ctrl_ber, 1 );
558 case LDAP_RES_INTERMEDIATE_RESP:
559 ldap_parse_intermediate_resp_result( ld, msg,
560 &retoid, &retdata, 0 );
561 if ( !strcmp( retoid, LDAP_SYNC_INFO ) ) {
562 sync_info_arrived = 1;
563 res_ber = ber_init( retdata );
564 ber_scanf( res_ber, "{e", &syncstate );
566 if ( syncstate == LDAP_SYNC_REFRESH_DONE ) {
567 syncrepl_del_nonpresent( ld, &op );
568 } else if ( syncstate != LDAP_SYNC_NEW_COOKIE ) {
570 LDAP_LOG( OPERATION, ERR,
571 "do_syncrepl : unknown sync info\n", 0, 0, 0 );
573 Debug( LDAP_DEBUG_ANY,
574 "do_syncrepl : unknown sync info\n", 0, 0, 0 );
578 if ( ber_peek_tag( res_ber, &len )
579 == LDAP_SYNC_TAG_COOKIE ) {
580 ber_scanf( res_ber, "o}", &syncCookie );
581 if ( syncCookie.bv_len ) {
582 ber_bvfree( si->syncCookie );
583 si->syncCookie = ber_dupbv( NULL, &syncCookie );
586 if ( syncstate == LDAP_SYNC_NEW_COOKIE ) {
588 LDAP_LOG( OPERATION, ERR,
589 "do_syncrepl : cookie required\n", 0, 0, 0 );
591 Debug( LDAP_DEBUG_ANY,
592 "do_syncrepl : cookie required\n", 0, 0, 0 );
597 ldap_memfree( retoid );
598 ber_bvfree( retdata );
599 ber_free( res_ber, 1 );
603 LDAP_LOG( OPERATION, ERR,"do_syncrepl :"
604 " unknown intermediate "
605 "response\n", 0, 0, 0 );
607 Debug( LDAP_DEBUG_ANY, "do_syncrepl : "
608 "unknown intermediate "
609 "response\n", 0, 0, 0 );
611 ldap_memfree( retoid );
612 ber_bvfree( retdata );
618 LDAP_LOG( OPERATION, ERR, "do_syncrepl : "
619 "unknown message\n", 0, 0, 0 );
621 Debug( LDAP_DEBUG_ANY, "do_syncrepl : "
622 "unknown message\n", 0, 0, 0 );
633 LDAP_LOG( OPERATION, ERR,
634 "do_syncrepl : unknown result\n", 0, 0, 0 );
636 Debug( LDAP_DEBUG_ANY,
637 "do_syncrepl : unknown result\n", 0, 0, 0 );
642 if ( syncCookie.bv_val )
643 ch_free( syncCookie.bv_val );
644 if ( syncUUID.bv_val )
645 ch_free( syncUUID.bv_val );
651 ldap_pvt_thread_mutex_lock( &syncrepl_rq.rq_mutex );
652 ldap_pvt_runqueue_stoptask( &syncrepl_rq, rtask );
653 if ( si->type == LDAP_SYNC_REFRESH_ONLY ) {
654 ldap_pvt_runqueue_resched( &syncrepl_rq, rtask );
656 ldap_pvt_runqueue_remove( &syncrepl_rq, rtask );
658 ldap_pvt_thread_mutex_unlock( &syncrepl_rq.rq_mutex );
664 syncrepl_message_to_entry(
668 Modifications **modlist,
670 struct berval *syncUUID,
671 struct berval *syncCookie
675 BerElement *ber = NULL;
677 struct berval bv = {0, NULL};
680 Modifications **modtail = modlist;
681 Backend *be = op->o_bd;
684 char txtbuf[SLAP_TEXT_BUFLEN];
685 size_t textlen = sizeof txtbuf;
687 struct berval **bvals = NULL;
689 struct berval bdn = {0, NULL};
691 struct berval empty_bv = { 0, NULL };
695 syncinfo_t *si = ( syncinfo_t * ) be->syncinfo;
699 LDAPControl** rctrls = NULL;
700 BerElement* ctrl_ber;
706 if ( ldap_msgtype( msg ) != LDAP_RES_SEARCH_ENTRY ) {
708 LDAP_LOG( OPERATION, ERR,
709 "Message type should be entry (%d)", ldap_msgtype( msg ), 0, 0 );
711 Debug( LDAP_DEBUG_ANY,
712 "Message type should be entry (%d)", ldap_msgtype( msg ), 0, 0 );
717 op->o_tag = LDAP_REQ_ADD;
719 rc = ldap_get_dn_ber( ld, msg, &ber, &bdn );
721 if ( rc != LDAP_SUCCESS ) {
723 LDAP_LOG( OPERATION, ERR,
724 "syncrepl_message_to_entry : dn get failed (%d)", rc, 0, 0 );
726 Debug( LDAP_DEBUG_ANY,
727 "syncrepl_message_to_entry : dn get failed (%d)", rc, 0, 0 );
732 e = ( Entry * ) ch_calloc( 1, sizeof( Entry ));
733 dnPrettyNormal( NULL, &bdn, &e->e_name, &e->e_nname, op->o_tmpmemctx );
737 while ( ber_remaining( ber ) ) {
738 tag = ber_scanf( ber, "{mW}", &tmp.sml_type, &tmp.sml_values );
740 if ( tag == LBER_ERROR ) break;
741 if ( tmp.sml_type.bv_val == NULL ) break;
743 mod = (Modifications *) ch_malloc( sizeof( Modifications ));
745 mod->sml_op = LDAP_MOD_REPLACE;
746 mod->sml_next = NULL;
747 mod->sml_desc = NULL;
748 mod->sml_type = tmp.sml_type;
749 mod->sml_bvalues = tmp.sml_bvalues;
750 mod->sml_nvalues = tmp.sml_bvalues;
753 modtail = &mod->sml_next;
756 if ( ber_scanf( ber, "}") == LBER_ERROR ) {
758 LDAP_LOG( OPERATION, ERR,
759 "syncrepl_message_to_entry: ber_scanf failed\n", 0, 0, 0 );
761 Debug( LDAP_DEBUG_ANY, "syncrepl_message_to_entry: ber_scanf failed\n",
768 tmpber = ldap_get_message_ber( msg );
769 ber = ber_dup( tmpber );
771 ber_scanf( ber, "{xx" );
773 rc = ldap_int_get_controls( ber, &rctrls );
775 if ( rc != LDAP_SUCCESS ) {
777 LDAP_LOG( OPERATION, ERR,
778 "syncrepl_message_to_entry : control get failed (%d)", rc, 0, 0 );
780 Debug( LDAP_DEBUG_ANY,
781 "syncrepl_message_to_entry : control get failed (%d)", rc, 0, 0 );
788 ctrl_ber = ber_alloc_t( LBER_USE_DER );
789 ber_set_option( ctrl_ber, LBER_OPT_BER_MEMCTX, op->o_tmpmemctx );
790 ber_write( ctrl_ber, rctrlp->ldctl_value.bv_val, rctrlp->ldctl_value.bv_len, 0 );
791 ber_reset( ctrl_ber, 1 );
792 ber_scanf( ctrl_ber, "{eo", syncstate, syncUUID );
793 if ( ber_peek_tag( ctrl_ber, &len ) == LDAP_SYNC_TAG_COOKIE ) {
794 ber_scanf( ctrl_ber, "o}", syncCookie );
796 ber_free( ctrl_ber, 1 );
799 LDAP_LOG( OPERATION, ERR,"syncrepl_message_to_entry : "
800 " rctrls absent\n", 0, 0, 0 );
802 Debug( LDAP_DEBUG_ANY, "syncrepl_message_to_entry :"
803 " rctrls absent\n", 0, 0, 0 );
807 if ( *syncstate == LDAP_SYNC_PRESENT ) {
812 if ( *modlist == NULL ) {
814 LDAP_LOG( OPERATION, ERR,
815 "syncrepl_message_to_entry: no attributes\n", 0, 0, 0 );
817 Debug( LDAP_DEBUG_ANY, "syncrepl_message_to_entry: no attributes\n",
822 rc = slap_mods_check_syncrepl( op, modlist, &text, txtbuf, textlen, NULL );
824 if ( rc != LDAP_SUCCESS ) {
826 LDAP_LOG( OPERATION, ERR,
827 "syncrepl_message_to_entry: mods check (%s)\n", text, 0, 0 );
829 Debug( LDAP_DEBUG_ANY, "syncrepl_message_to_entry: mods check (%s)\n",
835 rc = slap_mods_opattrs_syncrepl( op, *modlist, modtail,
836 &text,txtbuf, textlen );
838 if( rc != LDAP_SUCCESS ) {
840 LDAP_LOG( OPERATION, ERR,
841 "syncrepl_message_to_entry: mods opattrs (%s)\n", text, 0, 0 );
843 Debug( LDAP_DEBUG_ANY, "syncrepl_message_to_entry: mods opattrs (%s)\n",
849 rc = slap_mods2entry_syncrepl( *modlist, &e, 1, &text, txtbuf, textlen );
850 if( rc != LDAP_SUCCESS ) {
852 LDAP_LOG( OPERATION, ERR,
853 "syncrepl_message_to_entry: mods2entry (%s)\n", text, 0, 0 );
855 Debug( LDAP_DEBUG_ANY, "syncrepl_message_to_entry: mods2entry (%s)\n",
868 syncuuid_cmp( const void* v_uuid1, const void* v_uuid2 )
870 const struct berval *uuid1 = v_uuid1;
871 const struct berval *uuid2 = v_uuid2;
872 int rc = uuid1->bv_len - uuid2->bv_len;
874 return ( strcmp( uuid1->bv_val, uuid2->bv_val ) );
882 Modifications* modlist,
884 struct berval* syncUUID,
885 struct berval* syncCookie,
889 Backend *be = op->o_bd;
890 syncinfo_t *si = ( syncinfo_t * ) be->syncinfo;
892 struct berval csn_bv = {0, NULL};
893 struct berval *syncuuid_bv = NULL;
894 char csnbuf[ LDAP_LUTIL_CSNSTR_BUFSIZE ];
896 SlapReply rs = {REP_RESULT};
897 int rc = LDAP_SUCCESS;
899 struct berval base_bv = {0, NULL};
907 ( syncstate == LDAP_SYNC_PRESENT || syncstate == LDAP_SYNC_ADD )) {
908 syncuuid_bv = ber_dupbv( NULL, syncUUID );
909 avl_insert( &si->presentlist, (caddr_t) syncuuid_bv,
910 syncuuid_cmp, avl_dup_error );
913 if ( syncstate == LDAP_SYNC_PRESENT ) {
920 if ( !attr_find( e->e_attrs, slap_schema.si_ad_entryUUID )) {
921 attr_merge_one( e, slap_schema.si_ad_entryUUID, syncUUID, syncUUID );
924 filterstr = (char *) sl_malloc( strlen("entryUUID=") + syncUUID->bv_len + 1, op->o_tmpmemctx );
925 strcpy( filterstr, "entryUUID=" );
926 strcat( filterstr, syncUUID->bv_val );
929 si->syncUUID = syncUUID;
930 si->syncUUID_ndn = NULL;
932 filter = str2filter( filterstr );
933 ber_str2bv( filterstr, strlen(filterstr), 1, &op->ors_filterstr );
934 ch_free( filterstr );
935 op->ors_filter = filter;
936 op->ors_scope = LDAP_SCOPE_SUBTREE;
938 /* get syncrepl cookie of shadow replica from subentry */
939 ber_str2bv( si->base, strlen(si->base), 1, &base_bv );
940 dnPrettyNormal( 0, &base_bv, &op->o_req_dn, &op->o_req_ndn, op->o_tmpmemctx );
941 ch_free( base_bv.bv_val );
943 /* set callback function */
944 op->o_callback = &cb;
945 cb.sc_response = dn_callback;
948 be->be_search( op, &rs );
950 ch_free( op->o_req_dn.bv_val );
951 ch_free( op->o_req_ndn.bv_val );
952 filter_free( op->ors_filter );
953 ch_free( op->ors_filterstr.bv_val );
955 cb.sc_response = null_callback;
957 if ( si->syncUUID_ndn )
958 printf("syncUUID_ndn = %s\n", si->syncUUID_ndn );
960 switch ( syncstate ) {
962 case LDAP_SYNC_MODIFY :
966 if ( si->syncUUID_ndn ) {
967 op->o_req_dn = *si->syncUUID_ndn;
968 op->o_req_ndn = *si->syncUUID_ndn;
969 op->o_tag = LDAP_REQ_DELETE;
970 rc = be->be_delete( op, &rs );
973 if ( rc == LDAP_SUCCESS ||
974 rc == LDAP_REFERRAL ||
975 rc == LDAP_NO_SUCH_OBJECT ||
976 rc == DB_NOTFOUND ) {
977 op->o_tag = LDAP_REQ_ADD;
979 op->o_req_dn = e->e_name;
980 op->o_req_ndn = e->e_nname;
981 rc = be->be_add( op, &rs );
982 if ( rc != LDAP_SUCCESS ) {
983 if ( rc == LDAP_ALREADY_EXISTS ) {
985 LDAP_LOG( OPERATION, ERR,
986 "be_add failed : already exists (%d)\n",
989 Debug( LDAP_DEBUG_ANY,
990 "be_add failed : already exists (%d)\n",
993 } else if ( rc == LDAP_REFERRAL ||
994 rc == LDAP_NO_SUCH_OBJECT ||
995 rc == DB_NOTFOUND ) {
996 syncrepl_add_glue(ld, op, e,
998 syncUUID, syncCookie);
1001 LDAP_LOG( OPERATION, ERR,
1002 "be_add failed (%d)\n",
1005 Debug( LDAP_DEBUG_ANY,
1006 "be_add failed (%d)\n",
1015 LDAP_LOG( OPERATION, ERR,
1016 "be_modify/be_delete failed (%d)\n", rc, 0, 0 );
1018 Debug( LDAP_DEBUG_ANY,
1019 "be_modify/be_delete failed (%d)\n", rc, 0, 0 );
1025 case LDAP_SYNC_DELETE :
1026 op->o_tag = LDAP_REQ_DELETE;
1027 be->be_delete( op, &rs );
1032 LDAP_LOG( OPERATION, ERR,
1033 "unknown syncstate\n", 0, 0, 0 );
1035 Debug( LDAP_DEBUG_ANY,
1036 "unknown syncstate\n", 0, 0, 0 );
1043 syncrepl_del_nonpresent(
1048 Backend* be = op->o_bd;
1049 syncinfo_t *si = ( syncinfo_t * ) be->syncinfo;
1051 struct berval base_bv = {0, NULL};
1053 SlapReply rs = {REP_RESULT};
1054 struct berval filterstr_bv = {0, NULL};
1055 struct nonpresent_entry *np_list, *np_prev;
1057 ber_str2bv( si->base, strlen(si->base), 1, &base_bv );
1058 dnPrettyNormal(0, &base_bv, &op->o_req_dn, &op->o_req_ndn, op->o_tmpmemctx );
1059 ch_free( base_bv.bv_val );
1061 filter = str2filter( si->filterstr );
1063 cb.sc_response = nonpresent_callback;
1066 op->o_callback = &cb;
1067 op->o_tag = LDAP_REQ_SEARCH;
1068 op->ors_scope = si->scope;
1069 op->ors_deref = LDAP_DEREF_NEVER;
1070 op->ors_slimit = -1;
1071 op->ors_tlimit = -1;
1072 op->ors_attrsonly = 0;
1073 op->ors_attrs = NULL;
1074 op->ors_filter = filter;
1075 ber_str2bv( si->filterstr, strlen( si->filterstr ), 1, &op->ors_filterstr );
1077 be->be_search( op, &rs );
1079 if ( !LDAP_LIST_EMPTY( &si->nonpresentlist ) ) {
1080 np_list = LDAP_LIST_FIRST( &si->nonpresentlist );
1081 while ( np_list != NULL ) {
1082 LDAP_LIST_REMOVE( np_list, np_link );
1084 np_list = LDAP_LIST_NEXT( np_list, np_link );
1085 op->o_tag = LDAP_REQ_DELETE;
1086 op->o_callback = &cb;
1087 cb.sc_response = null_callback;
1089 op->o_req_dn = *np_prev->dn;
1090 op->o_req_ndn = *np_prev->ndn;
1091 op->o_bd->be_delete( op, &rs );
1092 ber_bvfree( np_prev->dn );
1093 ber_bvfree( np_prev->ndn );
1094 op->o_req_dn.bv_val = NULL;
1095 op->o_req_ndn.bv_val = NULL;
1100 if ( op->o_req_dn.bv_val )
1101 ch_free( op->o_req_dn.bv_val );
1102 if ( op->o_req_ndn.bv_val )
1103 ch_free( op->o_req_ndn.bv_val );
1104 filter_free( op->ors_filter );
1105 ch_free( op->ors_filterstr.bv_val );
1114 Modifications* modlist,
1116 struct berval* syncUUID,
1117 struct berval* syncCookie
1120 Backend *be = op->o_bd;
1121 syncinfo_t *si = op->o_callback->sc_private;
1122 struct berval uuid_bv = {0, NULL};
1126 char uuidbuf[ LDAP_LUTIL_UUIDSTR_BUFSIZE ];
1129 struct berval dn = {0, NULL};
1130 struct berval pdn = {0, NULL};
1131 struct berval ndn = {0, NULL};
1132 struct berval rdn = {0, NULL};
1134 SlapReply rs = {REP_RESULT};
1135 Connection *conn = op->o_conn;
1137 op->o_tag = LDAP_REQ_ADD;
1138 op->o_callback = &cb;
1139 cb.sc_response = null_callback;
1142 ber_dupbv( &dn, &e->e_nname );
1143 ber_dupbv( &pdn, &e->e_nname );
1145 while ( !be_issuffix ( be, &pdn )) {
1146 dnParent( &dn, &pdn );
1147 ch_free( dn.bv_val );
1148 ber_dupbv( &dn, &pdn );
1152 for ( i = 0; i <= levels; i++ ) {
1153 glue = (Entry*) ch_calloc( 1, sizeof(Entry) );
1154 ch_free( dn.bv_val );
1155 ch_free( pdn.bv_val );
1156 ber_dupbv( &dn, &e->e_nname );
1157 ber_dupbv( &pdn, &e->e_nname );
1159 for ( k = 0; k < j; k++ ) {
1160 dnParent( &dn, &pdn );
1161 ch_free( dn.bv_val );
1162 ber_dupbv( &dn, &pdn );
1165 dnPrettyNormal( 0, &dn, &pdn, &ndn, op->o_tmpmemctx );
1166 ber_dupbv( &glue->e_name, &pdn );
1167 ber_dupbv( &glue->e_nname, &ndn );
1168 ch_free( dn.bv_val );
1169 ch_free( pdn.bv_val );
1170 ch_free( ndn.bv_val );
1172 a = ch_calloc( 1, sizeof( Attribute ));
1173 a->a_desc = slap_schema.si_ad_objectClass;
1174 a->a_vals = ch_calloc( 3, sizeof( struct berval ));
1175 ber_str2bv( "top", strlen("top"), 1, &a->a_vals[0] );
1176 ber_str2bv( "glue", strlen("glue"), 1, &a->a_vals[1] );
1177 a->a_vals[2].bv_len = 0;
1178 a->a_vals[2].bv_val = NULL;
1179 a->a_next = glue->e_attrs;
1182 a = ch_calloc( 1, sizeof( Attribute ));
1183 a->a_desc = slap_schema.si_ad_structuralObjectClass;
1184 a->a_vals = ch_calloc( 2, sizeof( struct berval ));
1185 ber_str2bv( "glue", strlen("glue"), 1, &a->a_vals[0] );
1186 a->a_vals[1].bv_len = 0;
1187 a->a_vals[1].bv_val = NULL;
1188 a->a_next = glue->e_attrs;
1191 if ( !strcmp( e->e_nname.bv_val, glue->e_nname.bv_val )) {
1192 op->o_req_dn = e->e_name;
1193 op->o_req_ndn = e->e_nname;
1195 rc = be->be_add ( op, &rs );
1196 if ( rc == LDAP_SUCCESS )
1197 be_entry_release_w( op, e );
1202 op->o_req_dn = glue->e_name;
1203 op->o_req_ndn = glue->e_nname;
1205 rc = be->be_add ( op, &rs );
1206 if ( rc == LDAP_SUCCESS ) {
1207 be_entry_release_w( op, glue );
1209 /* incl. ALREADY EXIST */
1219 syncrepl_updateCookie(
1223 struct berval *syncCookie
1226 Backend *be = op->o_bd;
1227 syncinfo_t *si = ( syncinfo_t * ) be->syncinfo;
1229 Modifications *mlnext;
1231 Modifications *modlist;
1232 Modifications **modtail = &modlist;
1234 struct berval* ocbva = NULL;
1235 struct berval* cnbva = NULL;
1236 struct berval* ssbva = NULL;
1237 struct berval* scbva = NULL;
1242 char txtbuf[SLAP_TEXT_BUFLEN];
1243 size_t textlen = sizeof txtbuf;
1248 struct berval sub_bv = { 0, NULL };
1249 struct berval psubrdn = { 0, NULL };
1252 SlapReply rs = {REP_RESULT};
1254 ocbva = ( struct berval * ) ch_calloc( 4, sizeof( struct berval ));
1255 cnbva = ( struct berval * ) ch_calloc( 2, sizeof( struct berval ));
1256 ssbva = ( struct berval * ) ch_calloc( 2, sizeof( struct berval ));
1257 scbva = ( struct berval * ) ch_calloc( 2, sizeof( struct berval ));
1259 /* update in memory cookie */
1260 if ( si->syncCookie != NULL ) {
1261 ber_bvfree( si->syncCookie );
1263 si->syncCookie = ber_dupbv( NULL, syncCookie );
1264 ber_str2bv( "top", strlen("top"), 1, &ocbva[0] );
1265 ber_str2bv( "subentry", strlen("subentry"), 1, &ocbva[1] );
1266 ber_str2bv( "syncConsumerSubentry",
1267 strlen("syncConsumerSubentry"), 1, &ocbva[2] );
1268 ocbva[3].bv_len = 0;
1269 ocbva[3].bv_val = NULL;
1271 mod = (Modifications *) ch_malloc( sizeof( Modifications ));
1272 mod->sml_op = LDAP_MOD_REPLACE;
1273 mod->sml_next = NULL;
1274 mod->sml_desc = NULL;
1275 ber_str2bv( "objectClass", strlen("objectClass"), 1, &mod->sml_type );
1276 mod->sml_bvalues = ocbva;
1277 mod->sml_nvalues = ocbva;
1279 modtail = &mod->sml_next;
1281 sprintf( substr, "syncrepl%d", si->id );
1282 sprintf( rdnstr, "cn=%s", substr );
1283 ber_str2bv( substr, strlen( substr ), 1, &cnbva[0] );
1284 ber_str2bv( rdnstr, strlen( rdnstr ), 1, &psubrdn );
1285 cnbva[1].bv_len = 0;
1286 cnbva[1].bv_val = NULL;
1287 mod = (Modifications *) ch_malloc( sizeof( Modifications ));
1288 mod->sml_op = LDAP_MOD_REPLACE;
1289 mod->sml_next = NULL;
1290 mod->sml_desc = NULL;
1291 ber_str2bv( "cn", strlen("cn"), 1, &mod->sml_type );
1292 mod->sml_bvalues = cnbva;
1293 mod->sml_nvalues = cnbva;
1295 modtail = &mod->sml_next;
1297 ber_dupbv( &scbva[0], si->syncCookie );
1298 scbva[1].bv_len = 0;
1299 scbva[1].bv_val = NULL;
1300 mod = (Modifications *) ch_malloc( sizeof( Modifications ));
1301 mod->sml_op = LDAP_MOD_REPLACE;
1302 mod->sml_next = NULL;
1303 mod->sml_desc = NULL;
1304 ber_str2bv( "syncreplCookie", strlen("syncreplCookie"),
1305 1, &mod->sml_type );
1306 mod->sml_bvalues = scbva;
1307 mod->sml_nvalues = scbva;
1309 modtail = &mod->sml_next;
1311 ber_str2bv( "{}", strlen("{}"), 1, &ssbva[0] );
1312 ssbva[1].bv_len = 0;
1313 ssbva[1].bv_val = NULL;
1314 mod = (Modifications *) ch_malloc( sizeof( Modifications ));
1315 mod->sml_op = LDAP_MOD_REPLACE;
1316 mod->sml_next = NULL;
1317 mod->sml_desc = NULL;
1318 ber_str2bv( "subtreeSpecification",
1319 strlen("subtreeSpecification"), 1, &mod->sml_type );
1320 mod->sml_bvalues = ssbva;
1321 mod->sml_nvalues = ssbva;
1323 modtail = &mod->sml_next;
1325 rc = slap_mods_check_syncrepl( op, &modlist, &text, txtbuf, textlen, NULL );
1327 if ( rc != LDAP_SUCCESS ) {
1329 LDAP_LOG( OPERATION, ERR,
1330 "syncrepl_updateCookie: mods check (%s)\n", text, 0, 0 );
1332 Debug( LDAP_DEBUG_ANY, "syncrepl_updateCookie: mods check (%s)\n",
1337 op->o_tag = LDAP_REQ_ADD;
1338 rc = slap_mods_opattrs_syncrepl( op, modlist, modtail, &text,txtbuf, textlen );
1340 if( rc != LDAP_SUCCESS ) {
1342 LDAP_LOG( OPERATION, ERR,
1343 "syncrepl_updateCookie: mods opattrs (%s)\n", text, 0, 0 );
1345 Debug( LDAP_DEBUG_ANY, "syncrepl_updateCookie: mods opattrs (%s)\n",
1350 e = ( Entry * ) ch_calloc( 1, sizeof( Entry ));
1352 build_new_dn( &sub_bv, pdn, &psubrdn );
1353 dnPrettyNormal( NULL, &sub_bv, &e->e_name, &e->e_nname, op->o_tmpmemctx );
1354 ch_free( sub_bv.bv_val );
1355 ch_free( psubrdn.bv_val );
1359 rc = slap_mods2entry_syncrepl( modlist, &e, 1, &text, txtbuf, textlen );
1361 if( rc != LDAP_SUCCESS ) {
1363 LDAP_LOG( OPERATION, ERR,
1364 "syncrepl_updateCookie: mods2entry (%s)\n", text, 0, 0 );
1366 Debug( LDAP_DEBUG_ANY, "syncrepl_updateCookie: mods2entry (%s)\n",
1371 cb.sc_response = null_callback;
1374 op->o_callback = &cb;
1375 op->o_req_dn = e->e_name;
1376 op->o_req_ndn = e->e_nname;
1378 /* update persistent cookie */
1379 update_cookie_retry:
1380 op->o_tag = LDAP_REQ_MODIFY;
1381 op->orm_modlist = modlist;
1382 rc = be->be_modify( op, &rs );
1383 if ( rc != LDAP_SUCCESS ) {
1384 if ( rc == LDAP_REFERRAL ||
1385 rc == LDAP_NO_SUCH_OBJECT ||
1386 rc == DB_NOTFOUND ) {
1387 op->o_tag = LDAP_REQ_ADD;
1389 rc = be->be_add( op, &rs );
1390 if ( rc != LDAP_SUCCESS ) {
1391 if ( rc == LDAP_ALREADY_EXISTS ) {
1392 goto update_cookie_retry;
1393 } else if ( rc == LDAP_REFERRAL ||
1394 rc == LDAP_NO_SUCH_OBJECT ||
1395 rc == DB_NOTFOUND ) {
1397 LDAP_LOG( OPERATION, ERR,
1398 "cookie will be non-persistent\n",
1401 Debug( LDAP_DEBUG_ANY,
1402 "cookie will be non-persistent\n",
1407 LDAP_LOG( OPERATION, ERR,
1408 "be_add failed (%d)\n",
1411 Debug( LDAP_DEBUG_ANY,
1412 "be_add failed (%d)\n",
1421 LDAP_LOG( OPERATION, ERR,
1422 "be_modify failed (%d)\n", rc, 0, 0 );
1424 Debug( LDAP_DEBUG_ANY,
1425 "be_modify failed (%d)\n", rc, 0, 0 );
1435 for ( ml = modlist; ml != NULL; ml = mlnext ) {
1436 mlnext = ml->sml_next;
1445 int slap_mods_check_syncrepl(
1447 Modifications **mlp,
1454 Backend *be = op->o_bd;
1455 syncinfo_t *si = ( syncinfo_t * ) be->syncinfo;
1456 AttributeDescription** descs;
1458 Modifications *prevml = NULL;
1459 Modifications *nextml = NULL;
1460 Modifications *ml = *mlp;
1462 while ( ml != NULL ) {
1463 AttributeDescription *ad = NULL;
1465 /* convert to attribute description */
1466 rc = slap_bv2ad( &ml->sml_type, &ml->sml_desc, text );
1468 if( rc != LDAP_SUCCESS ) {
1469 snprintf( textbuf, textlen, "%s: %s",
1470 ml->sml_type.bv_val, *text );
1477 if ( si->lastmod == LASTMOD_REQ ) {
1478 descs = del_descs_lastmod;
1483 for ( i = 0; descs[i] != NULL; i++ ) {
1484 if ( ad == descs[i] ) {
1485 if ( prevml == NULL ) {
1486 mlp = &ml->sml_next;
1489 prevml->sml_next = ml->sml_next;
1491 slap_mod_free( &ml->sml_mod, 0 );
1492 nextml = ml->sml_next;
1499 if( slap_syntax_is_binary( ad->ad_type->sat_syntax )
1500 && !slap_ad_is_binary( ad )) {
1501 /* attribute requires binary transfer */
1502 snprintf( textbuf, textlen,
1503 "%s: requires ;binary transfer",
1504 ml->sml_type.bv_val );
1506 return LDAP_UNDEFINED_TYPE;
1509 if( !slap_syntax_is_binary( ad->ad_type->sat_syntax )
1510 && slap_ad_is_binary( ad )) {
1511 /* attribute requires binary transfer */
1512 snprintf( textbuf, textlen,
1513 "%s: disallows ;binary transfer",
1514 ml->sml_type.bv_val );
1516 return LDAP_UNDEFINED_TYPE;
1519 if( slap_ad_is_tag_range( ad )) {
1520 /* attribute requires binary transfer */
1521 snprintf( textbuf, textlen,
1522 "%s: inappropriate use of tag range option",
1523 ml->sml_type.bv_val );
1525 return LDAP_UNDEFINED_TYPE;
1528 if ( is_at_obsolete( ad->ad_type ) &&
1529 ( ml->sml_op == LDAP_MOD_ADD || ml->sml_values != NULL ) ) {
1531 * attribute is obsolete,
1532 * only allow replace/delete with no values
1534 snprintf( textbuf, textlen,
1535 "%s: attribute is obsolete",
1536 ml->sml_type.bv_val );
1538 return LDAP_CONSTRAINT_VIOLATION;
1544 if( ml->sml_values != NULL ) {
1546 slap_syntax_validate_func *validate =
1547 ad->ad_type->sat_syntax->ssyn_validate;
1548 slap_syntax_transform_func *pretty =
1549 ad->ad_type->sat_syntax->ssyn_pretty;
1551 if( !pretty && !validate ) {
1552 *text = "no validator for syntax";
1553 snprintf( textbuf, textlen,
1554 "%s: no validator for syntax %s",
1555 ml->sml_type.bv_val,
1556 ad->ad_type->sat_syntax->ssyn_oid );
1558 return LDAP_INVALID_SYNTAX;
1562 * check that each value is valid per syntax
1563 * and pretty if appropriate
1565 for( nvals = 0; ml->sml_values[nvals].bv_val; nvals++ ) {
1566 struct berval pval = {0, NULL};
1568 rc = pretty( ad->ad_type->sat_syntax,
1569 &ml->sml_values[nvals], &pval, ctx );
1571 rc = validate( ad->ad_type->sat_syntax,
1572 &ml->sml_values[nvals] );
1576 snprintf( textbuf, textlen,
1577 "%s: value #%ld invalid per syntax",
1578 ml->sml_type.bv_val, (long) nvals );
1580 return LDAP_INVALID_SYNTAX;
1584 ber_memfree( ml->sml_values[nvals].bv_val );
1585 ml->sml_values[nvals] = pval;
1590 * a rough single value check... an additional check is needed
1591 * to catch add of single value to existing single valued attribute
1593 if ((ml->sml_op == LDAP_MOD_ADD || ml->sml_op == LDAP_MOD_REPLACE)
1594 && nvals > 1 && is_at_single_value( ad->ad_type )) {
1595 snprintf( textbuf, textlen,
1596 "%s: multiple values provided",
1597 ml->sml_type.bv_val );
1599 return LDAP_CONSTRAINT_VIOLATION;
1602 if( nvals && ad->ad_type->sat_equality &&
1603 ad->ad_type->sat_equality->smr_normalize ) {
1604 ml->sml_nvalues = ch_malloc( (nvals+1)*sizeof(struct berval) );
1605 for( nvals = 0; ml->sml_values[nvals].bv_val; nvals++ ) {
1606 rc = ad->ad_type->sat_equality->smr_normalize( 0,
1607 ad->ad_type->sat_syntax, ad->ad_type->sat_equality,
1608 &ml->sml_values[nvals], &ml->sml_nvalues[nvals], ctx );
1611 LDAP_LOG( OPERATION, DETAIL1,
1612 "str2entry: NULL (ssyn_normalize %d)\n", rc, 0, 0 );
1614 Debug( LDAP_DEBUG_ANY,
1615 "<= str2entry NULL (ssyn_normalize %d)\n", rc, 0, 0 );
1617 snprintf( textbuf, textlen,
1618 "%s: value #%ld normalization failed",
1619 ml->sml_type.bv_val, (long) nvals );
1624 ml->sml_nvalues[nvals].bv_val = NULL;
1625 ml->sml_nvalues[nvals].bv_len = 0;
1632 return LDAP_SUCCESS;
1636 int slap_mods_opattrs_syncrepl(
1638 Modifications *mods,
1639 Modifications **modtail,
1641 char *textbuf, size_t textlen )
1643 struct berval name = {0, NULL};
1644 struct berval timestamp = {0, NULL};
1645 struct berval csn = {0, NULL};
1646 struct berval nname = {0, NULL};
1647 char timebuf[ LDAP_LUTIL_GENTIME_BUFSIZE ];
1648 char csnbuf[ LDAP_LUTIL_CSNSTR_BUFSIZE ];
1650 Backend *be = op->o_bd;
1651 syncinfo_t *si = ( syncinfo_t * ) be->syncinfo;
1653 int mop = LDAP_MOD_REPLACE;
1655 assert( modtail != NULL );
1656 assert( *modtail == NULL );
1658 if( si->lastmod == LASTMOD_GEN ) {
1660 time_t now = slap_get_time();
1662 ldap_pvt_thread_mutex_lock( &gmtime_mutex );
1663 ltm = gmtime( &now );
1664 lutil_gentime( timebuf, sizeof(timebuf), ltm );
1666 csn.bv_len = lutil_csnstr( csnbuf, sizeof( csnbuf ), 0, 0 );
1667 ldap_pvt_thread_mutex_unlock( &gmtime_mutex );
1668 csn.bv_val = csnbuf;
1670 timestamp.bv_val = timebuf;
1671 timestamp.bv_len = strlen(timebuf);
1673 if( op->o_dn.bv_len == 0 ) {
1674 name.bv_val = SLAPD_ANONYMOUS;
1675 name.bv_len = sizeof(SLAPD_ANONYMOUS)-1;
1683 if( op->o_tag == LDAP_REQ_ADD ) {
1684 struct berval tmpval = {0, NULL};
1686 if( global_schemacheck ) {
1687 int rc = mods_structural_class( mods, &tmpval,
1688 text, textbuf, textlen );
1689 if( rc != LDAP_SUCCESS ) {
1693 mod = (Modifications *) ch_malloc( sizeof( Modifications ) );
1695 mod->sml_type.bv_val = NULL;
1696 mod->sml_desc = slap_schema.si_ad_structuralObjectClass;
1697 mod->sml_values = (BerVarray) ch_malloc( 2 * sizeof( struct berval ) );
1698 ber_dupbv( &mod->sml_values[0], &tmpval );
1699 mod->sml_values[1].bv_len = 0;
1700 mod->sml_values[1].bv_val = NULL;
1701 assert( mod->sml_values[0].bv_val );
1702 mod->sml_nvalues = (BerVarray) ch_malloc( 2 * sizeof( struct berval ) );
1703 ber_dupbv( &mod->sml_nvalues[0], &tmpval );
1704 mod->sml_nvalues[1].bv_len = 0;
1705 mod->sml_nvalues[1].bv_val = NULL;
1706 assert( mod->sml_nvalues[0].bv_val );
1708 modtail = &mod->sml_next;
1711 if( si->lastmod == LASTMOD_GEN ) {
1712 mod = (Modifications *) ch_malloc( sizeof( Modifications ) );
1714 mod->sml_type.bv_val = NULL;
1715 mod->sml_desc = slap_schema.si_ad_creatorsName;
1716 mod->sml_values = (BerVarray) ch_malloc( 2 * sizeof( struct berval ) );
1717 ber_dupbv( &mod->sml_values[0], &name );
1718 mod->sml_values[1].bv_len = 0;
1719 mod->sml_values[1].bv_val = NULL;
1720 assert( mod->sml_values[0].bv_val );
1721 mod->sml_nvalues = (BerVarray) ch_malloc( 2 * sizeof( struct berval ) );
1722 ber_dupbv( &mod->sml_nvalues[0], &nname );
1723 mod->sml_nvalues[1].bv_len = 0;
1724 mod->sml_nvalues[1].bv_val = NULL;
1725 assert( mod->sml_nvalues[0].bv_val );
1727 modtail = &mod->sml_next;
1729 mod = (Modifications *) ch_malloc( sizeof( Modifications ) );
1731 mod->sml_type.bv_val = NULL;
1732 mod->sml_desc = slap_schema.si_ad_createTimestamp;
1733 mod->sml_values = (BerVarray) ch_malloc( 2 * sizeof( struct berval ) );
1734 ber_dupbv( &mod->sml_values[0], ×tamp );
1735 mod->sml_values[1].bv_len = 0;
1736 mod->sml_values[1].bv_val = NULL;
1737 assert( mod->sml_values[0].bv_val );
1738 mod->sml_nvalues = NULL;
1740 modtail = &mod->sml_next;
1744 if( si->lastmod == LASTMOD_GEN ) {
1745 mod = (Modifications *) ch_malloc( sizeof( Modifications ) );
1747 mod->sml_type.bv_val = NULL;
1748 mod->sml_desc = slap_schema.si_ad_entryCSN;
1749 mod->sml_values = (BerVarray) ch_malloc( 2 * sizeof( struct berval ) );
1750 ber_dupbv( &mod->sml_values[0], &csn );
1751 mod->sml_values[1].bv_len = 0;
1752 mod->sml_values[1].bv_val = NULL;
1753 assert( mod->sml_values[0].bv_val );
1754 mod->sml_nvalues = NULL;
1756 modtail = &mod->sml_next;
1758 mod = (Modifications *) ch_malloc( sizeof( Modifications ) );
1760 mod->sml_type.bv_val = NULL;
1761 mod->sml_desc = slap_schema.si_ad_modifiersName;
1762 mod->sml_values = (BerVarray) ch_malloc( 2 * sizeof( struct berval ) );
1763 ber_dupbv( &mod->sml_values[0], &name );
1764 mod->sml_values[1].bv_len = 0;
1765 mod->sml_values[1].bv_val = NULL;
1766 assert( mod->sml_values[0].bv_val );
1767 mod->sml_nvalues = (BerVarray) ch_malloc( 2 * sizeof( struct berval ) );
1768 ber_dupbv( &mod->sml_nvalues[0], &nname );
1769 mod->sml_nvalues[1].bv_len = 0;
1770 mod->sml_nvalues[1].bv_val = NULL;
1771 assert( mod->sml_nvalues[0].bv_val );
1773 modtail = &mod->sml_next;
1775 mod = (Modifications *) ch_malloc( sizeof( Modifications ) );
1777 mod->sml_type.bv_val = NULL;
1778 mod->sml_desc = slap_schema.si_ad_modifyTimestamp;
1779 mod->sml_values = (BerVarray) ch_malloc( 2 * sizeof( struct berval ) );
1780 ber_dupbv( &mod->sml_values[0], ×tamp );
1781 mod->sml_values[1].bv_len = 0;
1782 mod->sml_values[1].bv_val = NULL;
1783 assert( mod->sml_values[0].bv_val );
1784 mod->sml_nvalues = NULL;
1786 modtail = &mod->sml_next;
1790 return LDAP_SUCCESS;
1795 int slap_mods2entry_syncrepl(
1796 Modifications *mods,
1800 char *textbuf, size_t textlen )
1802 Attribute **tail = &(*e)->e_attrs;
1803 assert( *tail == NULL );
1807 for( ; mods != NULL; mods = mods->sml_next ) {
1810 assert( mods->sml_desc != NULL );
1812 attr = attr_find( (*e)->e_attrs, mods->sml_desc );
1814 if( attr != NULL ) {
1815 #define SLURPD_FRIENDLY
1816 #ifdef SLURPD_FRIENDLY
1820 snprintf( textbuf, textlen,
1821 "attribute '%s' provided more than once",
1822 mods->sml_desc->ad_cname.bv_val );
1823 return LDAP_TYPE_OR_VALUE_EXISTS;
1826 for( i=0; attr->a_vals[i].bv_val; i++ ) {
1829 for( j=0; mods->sml_values[j].bv_val; j++ ) {
1834 attr->a_vals = ch_realloc( attr->a_vals,
1835 sizeof( struct berval ) * (i+j) );
1837 /* should check for duplicates */
1839 AC_MEMCPY( &attr->a_vals[i], mods->sml_values,
1840 sizeof( struct berval ) * j );
1842 if( attr->a_nvals ) {
1843 attr->a_nvals = ch_realloc( attr->a_nvals,
1844 sizeof( struct berval ) * (i+j) );
1846 AC_MEMCPY( &attr->a_nvals[i], mods->sml_nvalues,
1847 sizeof( struct berval ) * j );
1849 /* trim the mods array */
1850 ch_free( mods->sml_nvalues );
1851 mods->sml_nvalues = NULL;
1856 snprintf( textbuf, textlen,
1857 "attribute '%s' provided more than once",
1858 mods->sml_desc->ad_cname.bv_val );
1859 return LDAP_TYPE_OR_VALUE_EXISTS;
1863 if( mods->sml_values[1].bv_val != NULL ) {
1864 /* check for duplicates */
1866 MatchingRule *mr = mods->sml_desc->ad_type->sat_equality;
1868 /* check if the values we're adding already exist */
1869 if( mr == NULL || !mr->smr_match ) {
1870 for ( i = 0; mods->sml_bvalues[i].bv_val != NULL; i++ ) {
1871 /* test asserted values against themselves */
1872 for( j = 0; j < i; j++ ) {
1873 if ( bvmatch( &mods->sml_bvalues[i],
1874 &mods->sml_bvalues[j] ) ) {
1875 /* value exists already */
1876 snprintf( textbuf, textlen,
1877 "%s: value #%d provided more than once",
1878 mods->sml_desc->ad_cname.bv_val, j );
1879 return LDAP_TYPE_OR_VALUE_EXISTS;
1886 const char *text = NULL;
1887 char textbuf[ SLAP_TEXT_BUFLEN ] = { '\0' };
1889 rc = modify_check_duplicates( mods->sml_desc, mr,
1890 NULL, mods->sml_bvalues, 0,
1891 &text, textbuf, sizeof( textbuf ) );
1893 if ( rc != LDAP_SUCCESS ) {
1899 attr = ch_calloc( 1, sizeof(Attribute) );
1901 /* move ad to attr structure */
1902 attr->a_desc = mods->sml_desc;
1904 /* move values to attr structure */
1905 /* should check for duplicates */
1906 attr->a_vals = mods->sml_values;
1908 attr->a_nvals = mods->sml_nvalues;
1911 tail = &attr->a_next;
1914 return LDAP_SUCCESS;
1918 avl_ber_bvfree( void *bv )
1923 if ( ((struct berval *)bv)->bv_val != NULL ) {
1924 ber_memfree ( ((struct berval *)bv)->bv_val );
1926 ber_memfree ( (char *) bv );
1935 syncinfo_t *si = op->o_callback->sc_private;
1938 if ( rs->sr_type != REP_SEARCH ) return LDAP_SUCCESS;
1940 a = attr_find( rs->sr_entry->e_attrs, slap_schema.si_ad_syncreplCookie );
1943 si->syncCookie = NULL;
1945 si->syncCookie = ber_dupbv( NULL, &a->a_vals[0] );
1947 return LDAP_SUCCESS;
1956 syncinfo_t *si = op->o_callback->sc_private;
1958 if ( rs->sr_type == REP_SEARCH ) {
1959 si->syncUUID_ndn = &rs->sr_entry->e_nname;
1962 return LDAP_SUCCESS;
1966 nonpresent_callback(
1971 syncinfo_t *si = op->o_callback->sc_private;
1974 struct berval* present_uuid = NULL;
1976 SlapReply rs_cb = {REP_RESULT};
1977 struct nonpresent_entry *np_entry;
1979 if ( rs->sr_type == REP_RESULT ) {
1980 count = avl_free( si->presentlist, avl_ber_bvfree );
1981 return LDAP_SUCCESS;
1982 } else if ( rs->sr_type == REP_SEARCH ) {
1983 a = attr_find( rs->sr_entry->e_attrs, slap_schema.si_ad_entryUUID );
1988 present_uuid = avl_find( si->presentlist, &a->a_vals[0], syncuuid_cmp );
1990 if ( present_uuid == NULL ) {
1991 np_entry = (struct nonpresent_entry *)
1992 ch_calloc( 1, sizeof( struct nonpresent_entry ));
1993 np_entry->dn = ber_dupbv( NULL, &rs->sr_entry->e_name );
1994 np_entry->ndn = ber_dupbv( NULL, &rs->sr_entry->e_nname );
1995 LDAP_LIST_INSERT_HEAD( &si->nonpresentlist, np_entry, np_link );
1997 avl_delete( &si->presentlist,
1998 &a->a_vals[0], syncuuid_cmp );
2000 return LDAP_SUCCESS;
2002 return LDAP_SUCCESS;
2013 if ( rs->sr_err != LDAP_SUCCESS &&
2014 rs->sr_err != LDAP_REFERRAL &&
2015 rs->sr_err != LDAP_ALREADY_EXISTS &&
2016 rs->sr_err != LDAP_NO_SUCH_OBJECT &&
2017 rs->sr_err != DB_NOTFOUND ) {
2019 LDAP_LOG( OPERATION, ERR,
2020 "null_callback : error code 0x%x\n",
2023 Debug( LDAP_DEBUG_ANY,
2024 "null_callback : error code 0x%x\n",
2028 return LDAP_SUCCESS;
2033 str2clist( char **out, char *in, const char *brkstr )
2042 /* find last element in list */
2043 for (i = 0; out && out[i]; i++);
2045 /* protect the input string from strtok */
2046 str = ch_strdup( in );
2048 /* Count words in string */
2050 for ( s = str; *s; s++ ) {
2051 if ( strchr( brkstr, *s ) != NULL ) {
2056 out = ch_realloc( out, ( i + j + 1 ) * sizeof( char * ) );
2058 for ( s = ldap_pvt_strtok( str, brkstr, &lasts );
2060 s = ldap_pvt_strtok( NULL, brkstr, &lasts ) )
2062 *new = ch_strdup( s );