1 /* syncrepl.c -- Replication Engine which uses the LDAP Sync protocol */
3 /* This work is part of OpenLDAP Software <http://www.openldap.org/>.
5 * Copyright 2003-2006 The OpenLDAP Foundation.
6 * Portions Copyright 2003 by IBM Corporation.
7 * Portions Copyright 2003 by Howard Chu, Symas Corporation.
10 * Redistribution and use in source and binary forms, with or without
11 * modification, are permitted only as authorized by the OpenLDAP
14 * A copy of this license is available in the file LICENSE in the
15 * top-level directory of the distribution or, alternatively, at
16 * <http://www.OpenLDAP.org/license.html>.
23 #include <ac/string.h>
24 #include <ac/socket.h>
28 #include "lutil_ldap.h"
34 struct nonpresent_entry {
35 struct berval *npe_name;
36 struct berval *npe_nname;
37 LDAP_LIST_ENTRY(nonpresent_entry) npe_link;
40 #define SYNCDATA_DEFAULT 0 /* entries are plain LDAP entries */
41 #define SYNCDATA_ACCESSLOG 1 /* entries are accesslog format */
42 #define SYNCDATA_CHANGELOG 2 /* entries are changelog format */
44 #define SYNCLOG_LOGGING 0 /* doing a log-based update */
45 #define SYNCLOG_FALLBACK 1 /* doing a full refresh */
47 #define RETRYNUM_FOREVER (-1) /* retry forever */
48 #define RETRYNUM_TAIL (-2) /* end of retrynum array */
49 #define RETRYNUM_VALID(n) ((n) >= RETRYNUM_FOREVER) /* valid retrynum */
50 #define RETRYNUM_FINITE(n) ((n) > RETRYNUM_FOREVER) /* not forever */
52 typedef struct syncinfo_s {
53 struct slap_backend_db *si_be;
56 slap_bindconf si_bindconf;
57 struct berval si_base;
58 struct berval si_logbase;
59 struct berval si_filterstr;
60 struct berval si_logfilterstr;
64 AttributeName *si_anlist;
65 AttributeName *si_exanlist;
70 int si_schemachecking;
71 int si_type; /* the active type */
72 int si_ctype; /* the configured type */
74 time_t *si_retryinterval;
75 int *si_retrynum_init;
77 struct sync_cookie si_syncCookie;
82 int si_refreshPresent;
86 Avlnode *si_presentlist;
88 LDAP_LIST_HEAD(np, nonpresent_entry) si_nonpresentlist;
89 ldap_pvt_thread_mutex_t si_mutex;
92 static int syncuuid_cmp( const void *, const void * );
93 static void avl_ber_bvfree( void * );
94 static void syncrepl_del_nonpresent( Operation *, syncinfo_t *, BerVarray, struct berval * );
95 static int syncrepl_message_to_op(
96 syncinfo_t *, Operation *, LDAPMessage * );
97 static int syncrepl_message_to_entry(
98 syncinfo_t *, Operation *, LDAPMessage *,
99 Modifications **, Entry **, int );
100 static int syncrepl_entry(
101 syncinfo_t *, Operation*, Entry*,
102 Modifications**,int, struct berval*,
103 struct sync_cookie *,
105 static int syncrepl_updateCookie(
106 syncinfo_t *, Operation *, struct berval *,
107 struct sync_cookie * );
108 static struct berval * slap_uuidstr_from_normalized(
109 struct berval *, struct berval *, void * );
111 /* callback functions */
112 static int dn_callback( struct slap_op *, struct slap_rep * );
113 static int nonpresent_callback( struct slap_op *, struct slap_rep * );
114 static int null_callback( struct slap_op *, struct slap_rep * );
116 static AttributeDescription *sync_descs[4];
119 init_syncrepl(syncinfo_t *si)
122 char **attrs, **exattrs;
124 if ( !sync_descs[0] ) {
125 sync_descs[0] = slap_schema.si_ad_objectClass;
126 sync_descs[1] = slap_schema.si_ad_structuralObjectClass;
127 sync_descs[2] = slap_schema.si_ad_entryCSN;
128 sync_descs[3] = NULL;
131 if ( si->si_allattrs && si->si_allopattrs )
134 attrs = anlist2attrs( si->si_anlist );
137 if ( si->si_allattrs ) {
140 if ( !is_at_operational( at_find( attrs[i] ))) {
141 for ( j = i; attrs[j] != NULL; j++ ) {
144 attrs[j] = attrs[j+1];
150 attrs = ( char ** ) ch_realloc( attrs, (i + 2)*sizeof( char * ) );
151 attrs[i] = ch_strdup("*");
154 } else if ( si->si_allopattrs ) {
157 if ( is_at_operational( at_find( attrs[i] ))) {
158 for ( j = i; attrs[j] != NULL; j++ ) {
161 attrs[j] = attrs[j+1];
167 attrs = ( char ** ) ch_realloc( attrs, (i + 2)*sizeof( char * ) );
168 attrs[i] = ch_strdup("+");
172 for ( i = 0; sync_descs[i] != NULL; i++ ) {
175 if ( !strcmp( attrs[j], sync_descs[i]->ad_cname.bv_val )) {
176 for ( k = j; attrs[k] != NULL; k++ ) {
179 attrs[k] = attrs[k+1];
187 for ( n = 0; attrs[ n ] != NULL; n++ ) /* empty */;
189 if ( si->si_allopattrs ) {
190 attrs = ( char ** ) ch_realloc( attrs, (n + 2)*sizeof( char * ));
192 attrs = ( char ** ) ch_realloc( attrs, (n + 4)*sizeof( char * ));
195 if ( attrs == NULL ) {
196 Debug( LDAP_DEBUG_ANY, "out of memory\n", 0, 0, 0 );
200 if ( si->si_allopattrs ) {
201 attrs[n++] = ch_strdup( sync_descs[0]->ad_cname.bv_val );
203 for ( i = 0; sync_descs[ i ] != NULL; i++ ) {
204 attrs[ n++ ] = ch_strdup ( sync_descs[i]->ad_cname.bv_val );
212 if ( si->si_allattrs == si->si_allopattrs ) {
213 attrs = (char**) ch_malloc( 3 * sizeof(char*) );
214 attrs[i++] = ch_strdup( "*" );
215 attrs[i++] = ch_strdup( "+" );
216 } else if ( si->si_allattrs && !si->si_allopattrs ) {
217 for ( n = 0; sync_descs[ n ] != NULL; n++ ) ;
218 attrs = (char**) ch_malloc( (n+1)* sizeof(char*) );
219 attrs[i++] = ch_strdup( "*" );
220 for ( j = 1; sync_descs[ j ] != NULL; j++ ) {
221 attrs[i++] = ch_strdup ( sync_descs[j]->ad_cname.bv_val );
223 } else if ( !si->si_allattrs && si->si_allopattrs ) {
224 attrs = (char**) ch_malloc( 3 * sizeof(char*) );
225 attrs[i++] = ch_strdup( "+" );
226 attrs[i++] = ch_strdup( sync_descs[0]->ad_cname.bv_val );
231 si->si_attrs = attrs;
233 exattrs = anlist2attrs( si->si_exanlist );
236 for ( n = 0; exattrs[n] != NULL; n++ ) ;
238 for ( i = 0; sync_descs[i] != NULL; i++ ) {
240 while ( exattrs[j] != NULL ) {
241 if ( !strcmp( exattrs[j], sync_descs[i]->ad_cname.bv_val )) {
242 ch_free( exattrs[j] );
243 for ( k = j; exattrs[k] != NULL; k++ ) {
244 exattrs[k] = exattrs[k+1];
252 for ( i = 0; exattrs[i] != NULL; i++ ) {
253 for ( j = 0; si->si_anlist[j].an_name.bv_val; j++ ) {
255 if ( ( oc = si->si_anlist[j].an_oc ) ) {
257 while ( oc->soc_required[k] ) {
258 if ( !strcmp( exattrs[i],
259 oc->soc_required[k]->sat_cname.bv_val )) {
260 ch_free( exattrs[i] );
261 for ( l = i; exattrs[l]; l++ ) {
262 exattrs[l] = exattrs[l+1];
272 for ( i = 0; exattrs[i] != NULL; i++ ) ;
275 exattrs = (char **) ch_realloc( exattrs, (i + 1)*sizeof(char *));
278 si->si_exattrs = exattrs;
281 typedef struct logschema {
283 struct berval ls_req;
284 struct berval ls_mod;
285 struct berval ls_newRdn;
286 struct berval ls_delRdn;
287 struct berval ls_newSup;
290 static logschema changelog_sc = {
292 BER_BVC("changeType"),
295 BER_BVC("deleteOldRDN"),
296 BER_BVC("newSuperior")
299 static logschema accesslog_sc = {
303 BER_BVC("reqNewRDN"),
304 BER_BVC("reqDeleteOldRDN"),
305 BER_BVC("reqNewSuperior")
313 BerElementBuffer berbuf;
314 BerElement *ber = (BerElement *)&berbuf;
315 LDAPControl c[2], *ctrls[3];
316 struct timeval timeout;
321 char **attrs, *lattrs[8];
326 /* setup LDAP SYNC control */
327 ber_init2( ber, NULL, LBER_USE_DER );
328 ber_set_option( ber, LBER_OPT_BER_MEMCTX, &ctx );
330 /* If we're using a log but we have no state, then fallback to
331 * normal mode for a full refresh.
333 if ( si->si_syncdata && BER_BVISEMPTY( &si->si_syncCookie.ctxcsn ))
334 si->si_logstate = SYNCLOG_FALLBACK;
336 /* Use the log parameters if we're in log mode */
337 if ( si->si_syncdata && si->si_logstate == SYNCLOG_LOGGING ) {
339 if ( si->si_syncdata == SYNCDATA_ACCESSLOG )
343 lattrs[0] = ls->ls_dn.bv_val;
344 lattrs[1] = ls->ls_req.bv_val;
345 lattrs[2] = ls->ls_mod.bv_val;
346 lattrs[3] = ls->ls_newRdn.bv_val;
347 lattrs[4] = ls->ls_delRdn.bv_val;
348 lattrs[5] = ls->ls_newSup.bv_val;
349 lattrs[6] = slap_schema.si_ad_entryCSN->ad_cname.bv_val;
353 base = si->si_logbase.bv_val;
354 filter = si->si_logfilterstr.bv_val;
357 scope = LDAP_SCOPE_SUBTREE;
360 base = si->si_base.bv_val;
361 filter = si->si_filterstr.bv_val;
362 attrs = si->si_attrs;
363 attrsonly = si->si_attrsonly;
364 scope = si->si_scope;
366 if ( si->si_syncdata && si->si_logstate == SYNCLOG_FALLBACK ) {
367 si->si_type = LDAP_SYNC_REFRESH_ONLY;
369 si->si_type = si->si_ctype;
372 if ( !BER_BVISNULL( &si->si_syncCookie.octet_str ) )
374 ber_printf( ber, "{eOb}",
375 abs(si->si_type), &si->si_syncCookie.octet_str, rhint );
377 ber_printf( ber, "{eb}",
378 abs(si->si_type), rhint );
381 if ( (rc = ber_flatten2( ber, &c[0].ldctl_value, 0 )) == LBER_ERROR ) {
386 c[0].ldctl_oid = LDAP_CONTROL_SYNC;
387 c[0].ldctl_iscritical = si->si_type < 0;
390 if ( !BER_BVISNULL( &si->si_bindconf.sb_authzId ) ) {
391 c[1].ldctl_oid = LDAP_CONTROL_PROXY_AUTHZ;
392 c[1].ldctl_value = si->si_bindconf.sb_authzId;
393 c[1].ldctl_iscritical = 1;
400 timeout.tv_sec = si->si_tlimit;
403 rc = ldap_search_ext( si->si_ld, base, scope, filter, attrs, attrsonly,
404 ctrls, NULL, si->si_tlimit > 0 ? &timeout : NULL,
405 si->si_slimit, &msgid );
416 int cmdline_cookie_found = 0;
418 struct sync_cookie *sc = NULL;
424 psub = &si->si_be->be_nsuffix[0];
426 /* Init connection to master */
427 rc = ldap_initialize( &si->si_ld, si->si_bindconf.sb_uri.bv_val );
428 if ( rc != LDAP_SUCCESS ) {
429 Debug( LDAP_DEBUG_ANY,
430 "do_syncrep1: ldap_initialize failed (%s)\n",
431 si->si_bindconf.sb_uri.bv_val, 0, 0 );
435 op->o_protocol = LDAP_VERSION3;
436 ldap_set_option( si->si_ld, LDAP_OPT_PROTOCOL_VERSION,
437 (const void *)&op->o_protocol );
440 if ( si->si_bindconf.sb_tls_do_init ) {
441 rc = bindconf_tls_set( &si->si_bindconf, si->si_ld );
442 } else if ( si->si_bindconf.sb_tls_ctx ) {
443 rc = ldap_set_option( si->si_ld, LDAP_OPT_X_TLS_CTX,
444 si->si_bindconf.sb_tls_ctx );
447 Debug( LDAP_DEBUG_ANY,
448 "do_syncrep1: TLS context initialization failed\n", 0, 0, 0 );
455 if ( si->si_bindconf.sb_tls ) {
456 rc = ldap_start_tls_s( si->si_ld, NULL, NULL );
457 if( rc != LDAP_SUCCESS ) {
458 Debug( LDAP_DEBUG_ANY,
459 "%s: ldap_start_tls failed (%d)\n",
460 si->si_bindconf.sb_tls == SB_TLS_CRITICAL ? "Error" : "Warning",
462 if( si->si_bindconf.sb_tls == SB_TLS_CRITICAL ) goto done;
466 if ( si->si_bindconf.sb_method == LDAP_AUTH_SASL ) {
467 #ifdef HAVE_CYRUS_SASL
470 if ( si->si_bindconf.sb_secprops != NULL ) {
471 rc = ldap_set_option( si->si_ld,
472 LDAP_OPT_X_SASL_SECPROPS, si->si_bindconf.sb_secprops);
474 if( rc != LDAP_OPT_SUCCESS ) {
475 Debug( LDAP_DEBUG_ANY, "Error: ldap_set_option "
476 "(%s,SECPROPS,\"%s\") failed!\n",
477 si->si_bindconf.sb_uri.bv_val, si->si_bindconf.sb_secprops, 0 );
482 defaults = lutil_sasl_defaults( si->si_ld,
483 si->si_bindconf.sb_saslmech.bv_val,
484 si->si_bindconf.sb_realm.bv_val,
485 si->si_bindconf.sb_authcId.bv_val,
486 si->si_bindconf.sb_cred.bv_val,
487 si->si_bindconf.sb_authzId.bv_val );
489 rc = ldap_sasl_interactive_bind_s( si->si_ld,
490 si->si_bindconf.sb_binddn.bv_val,
491 si->si_bindconf.sb_saslmech.bv_val,
497 lutil_sasl_freedefs( defaults );
499 /* FIXME: different error behaviors according to
501 * 2) on err policy : exit, retry, backoff ...
503 if ( rc != LDAP_SUCCESS ) {
504 static struct berval bv_GSSAPI = BER_BVC( "GSSAPI" );
506 Debug( LDAP_DEBUG_ANY, "do_syncrep1: "
507 "ldap_sasl_interactive_bind_s failed (%d)\n",
510 /* FIXME (see above comment) */
511 /* if Kerberos credentials cache is not active, retry */
512 if ( ber_bvcmp( &si->si_bindconf.sb_saslmech, &bv_GSSAPI ) == 0 &&
513 rc == LDAP_LOCAL_ERROR )
515 rc = LDAP_SERVER_DOWN;
520 #else /* HAVE_CYRUS_SASL */
521 /* Should never get here, we trapped this at config time */
523 Debug( LDAP_DEBUG_SYNC, "not compiled with SASL support\n", 0, 0, 0 );
528 } else if ( si->si_bindconf.sb_method == LDAP_AUTH_SIMPLE ) {
529 rc = ldap_sasl_bind_s( si->si_ld,
530 si->si_bindconf.sb_binddn.bv_val, LDAP_SASL_SIMPLE,
531 &si->si_bindconf.sb_cred, NULL, NULL, NULL );
532 if ( rc != LDAP_SUCCESS ) {
533 Debug( LDAP_DEBUG_ANY, "do_syncrep1: "
534 "ldap_sasl_bind_s failed (%d)\n", rc, 0, 0 );
539 /* Set SSF to strongest of TLS, SASL SSFs */
542 op->o_transport_ssf = 0;
544 if ( ldap_get_option( si->si_ld, LDAP_OPT_X_TLS_SSL_CTX, &ssl )
545 == LDAP_SUCCESS && ssl != NULL )
547 op->o_tls_ssf = ldap_pvt_tls_get_strength( ssl );
549 #endif /* HAVE_TLS */
550 ldap_get_option( si->si_ld, LDAP_OPT_X_SASL_SSF, &op->o_sasl_ssf );
551 op->o_ssf = ( op->o_sasl_ssf > op->o_tls_ssf )
552 ? op->o_sasl_ssf : op->o_tls_ssf;
555 if ( BER_BVISNULL( &si->si_syncCookie.octet_str )) {
556 /* get contextCSN shadow replica from database */
557 BerVarray csn = NULL;
559 assert( si->si_rid < 1000 );
560 op->o_req_ndn = op->o_bd->be_nsuffix[0];
561 op->o_req_dn = op->o_req_ndn;
563 /* try to read stored contextCSN */
564 backend_attribute( op, NULL, &op->o_req_ndn,
565 slap_schema.si_ad_contextCSN, &csn, ACL_READ );
567 ch_free( si->si_syncCookie.ctxcsn.bv_val );
568 ber_dupbv( &si->si_syncCookie.ctxcsn, csn );
569 ber_bvarray_free_x( csn, op->o_tmpmemctx );
572 si->si_syncCookie.rid = si->si_rid;
574 LDAP_STAILQ_FOREACH( sc, &slap_sync_cookie, sc_next ) {
575 if ( si->si_rid == sc->rid ) {
576 cmdline_cookie_found = 1;
581 if ( cmdline_cookie_found ) {
582 /* cookie is supplied in the command line */
584 LDAP_STAILQ_REMOVE( &slap_sync_cookie, sc, sync_cookie, sc_next );
586 /* ctxcsn wasn't parsed yet, do it now */
587 slap_parse_sync_cookie( sc, op->o_tmpmemctx );
588 if ( BER_BVISNULL( &sc->ctxcsn ) ) {
589 /* if cmdline cookie does not have ctxcsn */
590 /* component, set it to an initial value */
591 slap_init_sync_cookie_ctxcsn( sc );
593 slap_sync_cookie_free( &si->si_syncCookie, 0 );
594 slap_dup_sync_cookie( &si->si_syncCookie, sc );
595 slap_sync_cookie_free( sc, 1 );
598 slap_compose_sync_cookie( NULL, &si->si_syncCookie.octet_str,
599 &si->si_syncCookie.ctxcsn, si->si_syncCookie.rid );
602 rc = ldap_sync_search( si, op->o_tmpmemctx );
604 if( rc != LDAP_SUCCESS ) {
605 Debug( LDAP_DEBUG_ANY, "do_syncrep1: "
606 "ldap_search_ext: %s (%d)\n", ldap_err2string( rc ), rc, 0 );
612 ldap_unbind_ext( si->si_ld, NULL, NULL );
625 LDAPControl **rctrls = NULL;
628 BerElementBuffer berbuf;
629 BerElement *ber = (BerElement *)&berbuf;
631 LDAPMessage *res = NULL;
632 LDAPMessage *msg = NULL;
635 struct berval *retdata = NULL;
640 struct berval syncUUID = BER_BVNULL;
641 struct sync_cookie syncCookie = { BER_BVNULL };
642 struct sync_cookie syncCookie_req = { BER_BVNULL };
643 struct berval cookie = BER_BVNULL;
649 Modifications *modlist = NULL;
654 struct timeval *tout_p = NULL;
655 struct timeval tout = { 0, 0 };
657 int refreshDeletes = 0;
659 BerVarray syncUUIDs = NULL;
662 if ( slapd_shutdown ) {
667 ber_init2( ber, NULL, LBER_USE_DER );
668 ber_set_option( ber, LBER_OPT_BER_MEMCTX, &op->o_tmpmemctx );
670 Debug( LDAP_DEBUG_TRACE, "=>do_syncrep2\n", 0, 0, 0 );
672 psub = &si->si_be->be_nsuffix[0];
674 slap_dup_sync_cookie( &syncCookie_req, &si->si_syncCookie );
676 if ( abs(si->si_type) == LDAP_SYNC_REFRESH_AND_PERSIST ) {
682 while (( rc = ldap_result( si->si_ld, LDAP_RES_ANY, LDAP_MSG_ONE,
683 tout_p, &res )) > 0 )
685 if ( slapd_shutdown ) {
689 for( msg = ldap_first_message( si->si_ld, res );
691 msg = ldap_next_message( si->si_ld, msg ) )
693 if ( slapd_shutdown ) {
697 switch( ldap_msgtype( msg ) ) {
698 case LDAP_RES_SEARCH_ENTRY:
699 ldap_get_entry_controls( si->si_ld, msg, &rctrls );
700 /* we can't work without the control */
702 Debug( LDAP_DEBUG_ANY, "do_syncrep2: "
703 "got search entry without "
704 "control\n", 0, 0, 0 );
709 ber_init2( ber, &rctrlp->ldctl_value, LBER_USE_DER );
710 ber_scanf( ber, "{em" /*"}"*/, &syncstate, &syncUUID );
711 /* FIXME: what if syncUUID is NULL or empty?
712 * (happens with back-sql...) */
713 if ( BER_BVISEMPTY( &syncUUID ) ) {
714 Debug( LDAP_DEBUG_ANY, "do_syncrep2: "
715 "got empty syncUUID\n", 0, 0, 0 );
716 ldap_controls_free( rctrls );
720 if ( ber_peek_tag( ber, &len ) == LDAP_TAG_SYNC_COOKIE ) {
721 ber_scanf( ber, /*"{"*/ "m}", &cookie );
722 if ( !BER_BVISNULL( &cookie ) ) {
723 ch_free( syncCookie.octet_str.bv_val );
724 ber_dupbv( &syncCookie.octet_str, &cookie );
726 if ( !BER_BVISNULL( &syncCookie.octet_str ) )
728 slap_parse_sync_cookie( &syncCookie, NULL );
732 if ( si->si_syncdata && si->si_logstate == SYNCLOG_LOGGING ) {
734 if (( rc = syncrepl_message_to_op( si, op, msg )) == LDAP_SUCCESS &&
735 !BER_BVISNULL( &syncCookie.ctxcsn ) ) {
736 rc = syncrepl_updateCookie( si, op, psub, &syncCookie );
738 } else if (( rc = syncrepl_message_to_entry( si, op, msg,
739 &modlist, &entry, syncstate )) == LDAP_SUCCESS ) {
740 if (( rc = syncrepl_entry( si, op, entry, &modlist,
741 syncstate, &syncUUID, &syncCookie_req,
742 &syncCookie.ctxcsn )) == LDAP_SUCCESS &&
743 !BER_BVISNULL( &syncCookie.ctxcsn ) ) {
744 rc = syncrepl_updateCookie( si, op, psub, &syncCookie );
747 ldap_controls_free( rctrls );
749 slap_mods_free( modlist, 1 );
755 case LDAP_RES_SEARCH_REFERENCE:
756 Debug( LDAP_DEBUG_ANY,
757 "do_syncrep2: reference received error\n", 0, 0, 0 );
760 case LDAP_RES_SEARCH_RESULT:
761 Debug( LDAP_DEBUG_SYNC,
762 "do_syncrep2: LDAP_RES_SEARCH_RESULT\n", 0, 0, 0 );
763 ldap_parse_result( si->si_ld, msg, &err, NULL, NULL, NULL,
765 #ifdef LDAP_X_SYNC_REFRESH_REQUIRED
766 if ( err == LDAP_X_SYNC_REFRESH_REQUIRED ) {
767 /* map old result code to registered code */
768 err = LDAP_SYNC_REFRESH_REQUIRED;
771 if ( err == LDAP_SYNC_REFRESH_REQUIRED ) {
772 if ( si->si_logstate == SYNCLOG_LOGGING ) {
773 si->si_logstate = SYNCLOG_FALLBACK;
780 ber_init2( ber, &rctrlp->ldctl_value, LBER_USE_DER );
782 ber_scanf( ber, "{" /*"}"*/);
783 if ( ber_peek_tag( ber, &len ) == LDAP_TAG_SYNC_COOKIE ) {
784 ber_scanf( ber, "m", &cookie );
785 if ( !BER_BVISNULL( &cookie ) ) {
786 ch_free( syncCookie.octet_str.bv_val );
787 ber_dupbv( &syncCookie.octet_str, &cookie);
789 if ( !BER_BVISNULL( &syncCookie.octet_str ) )
791 slap_parse_sync_cookie( &syncCookie, NULL );
794 if ( ber_peek_tag( ber, &len ) == LDAP_TAG_REFRESHDELETES )
796 ber_scanf( ber, "b", &refreshDeletes );
798 ber_scanf( ber, /*"{"*/ "}" );
800 if ( BER_BVISNULL( &syncCookie_req.ctxcsn )) {
802 } else if ( BER_BVISNULL( &syncCookie.ctxcsn )) {
805 value_match( &match, slap_schema.si_ad_entryCSN,
806 slap_schema.si_ad_entryCSN->ad_type->sat_ordering,
807 SLAP_MR_VALUE_OF_ATTRIBUTE_SYNTAX,
808 &syncCookie_req.ctxcsn, &syncCookie.ctxcsn,
811 if ( !BER_BVISNULL( &syncCookie.ctxcsn ) &&
812 match < 0 && err == LDAP_SUCCESS )
814 rc = syncrepl_updateCookie( si, op, psub, &syncCookie );
817 ldap_controls_free( rctrls );
819 if (si->si_type != LDAP_SYNC_REFRESH_AND_PERSIST) {
820 /* FIXME : different error behaviors according to
821 * 1) err code : LDAP_BUSY ...
822 * 2) on err policy : stop service, stop sync, retry
824 if ( refreshDeletes == 0 && match < 0 &&
825 err == LDAP_SUCCESS )
827 syncrepl_del_nonpresent( op, si, NULL, NULL );
829 avl_free( si->si_presentlist, avl_ber_bvfree );
830 si->si_presentlist = NULL;
833 if ( err == LDAP_SUCCESS
834 && si->si_logstate == SYNCLOG_FALLBACK ) {
835 si->si_logstate = SYNCLOG_LOGGING;
836 rc = LDAP_SYNC_REFRESH_REQUIRED;
843 case LDAP_RES_INTERMEDIATE:
844 rc = ldap_parse_intermediate( si->si_ld, msg,
845 &retoid, &retdata, NULL, 0 );
846 if ( !rc && !strcmp( retoid, LDAP_SYNC_INFO ) ) {
847 ber_init2( ber, retdata, LBER_USE_DER );
849 switch ( si_tag = ber_peek_tag( ber, &len )) {
851 case LDAP_TAG_SYNC_NEW_COOKIE:
852 Debug( LDAP_DEBUG_SYNC,
853 "do_syncrep2: %s - %s%s\n",
854 "LDAP_RES_INTERMEDIATE",
855 "NEW_COOKIE", "\n" );
856 ber_scanf( ber, "tm", &tag, &cookie );
858 case LDAP_TAG_SYNC_REFRESH_DELETE:
859 case LDAP_TAG_SYNC_REFRESH_PRESENT:
860 Debug( LDAP_DEBUG_SYNC,
861 "do_syncrep2: %s - %s%s\n",
862 "LDAP_RES_INTERMEDIATE",
863 si_tag == LDAP_TAG_SYNC_REFRESH_PRESENT ?
864 "REFRESH_PRESENT" : "REFRESH_DELETE",
866 if ( si_tag == LDAP_TAG_SYNC_REFRESH_DELETE ) {
867 si->si_refreshDelete = 1;
869 si->si_refreshPresent = 1;
871 ber_scanf( ber, "t{" /*"}"*/, &tag );
872 if ( ber_peek_tag( ber, &len ) == LDAP_TAG_SYNC_COOKIE )
874 ber_scanf( ber, "m", &cookie );
875 if ( !BER_BVISNULL( &cookie ) ) {
876 ch_free( syncCookie.octet_str.bv_val );
877 ber_dupbv( &syncCookie.octet_str, &cookie );
879 if ( !BER_BVISNULL( &syncCookie.octet_str ) )
881 slap_parse_sync_cookie( &syncCookie, NULL );
884 if ( ber_peek_tag( ber, &len ) ==
885 LDAP_TAG_REFRESHDONE )
887 ber_scanf( ber, "b", &refreshDone );
889 ber_scanf( ber, /*"{"*/ "}" );
891 case LDAP_TAG_SYNC_ID_SET:
892 Debug( LDAP_DEBUG_SYNC,
893 "do_syncrep2: %s - %s%s\n",
894 "LDAP_RES_INTERMEDIATE",
897 ber_scanf( ber, "t{" /*"}"*/, &tag );
898 if ( ber_peek_tag( ber, &len ) ==
899 LDAP_TAG_SYNC_COOKIE )
901 ber_scanf( ber, "m", &cookie );
902 if ( !BER_BVISNULL( &cookie ) ) {
903 ch_free( syncCookie.octet_str.bv_val );
904 ber_dupbv( &syncCookie.octet_str, &cookie );
906 if ( !BER_BVISNULL( &syncCookie.octet_str ) )
908 slap_parse_sync_cookie( &syncCookie, NULL );
911 if ( ber_peek_tag( ber, &len ) ==
912 LDAP_TAG_REFRESHDELETES )
914 ber_scanf( ber, "b", &refreshDeletes );
916 ber_scanf( ber, "[W]", &syncUUIDs );
917 ber_scanf( ber, /*"{"*/ "}" );
918 if ( refreshDeletes ) {
919 syncrepl_del_nonpresent( op, si, syncUUIDs,
920 &syncCookie.ctxcsn );
921 ber_bvarray_free_x( syncUUIDs, op->o_tmpmemctx );
923 for ( i = 0; !BER_BVISNULL( &syncUUIDs[i] ); i++ ) {
924 struct berval *syncuuid_bv;
925 syncuuid_bv = ber_dupbv( NULL, &syncUUIDs[i] );
926 slap_sl_free( syncUUIDs[i].bv_val,op->o_tmpmemctx );
927 avl_insert( &si->si_presentlist,
928 (caddr_t) syncuuid_bv,
929 syncuuid_cmp, avl_dup_error );
931 slap_sl_free( syncUUIDs, op->o_tmpmemctx );
935 Debug( LDAP_DEBUG_ANY,
936 "do_syncrep2 : unknown syncinfo tag (%ld)\n",
937 (long) si_tag, 0, 0 );
938 ldap_memfree( retoid );
939 ber_bvfree( retdata );
943 if ( BER_BVISNULL( &syncCookie_req.ctxcsn )) {
945 } else if ( BER_BVISNULL( &syncCookie.ctxcsn )) {
948 value_match( &match, slap_schema.si_ad_entryCSN,
949 slap_schema.si_ad_entryCSN->ad_type->sat_ordering,
950 SLAP_MR_VALUE_OF_ATTRIBUTE_SYNTAX,
951 &syncCookie_req.ctxcsn,
952 &syncCookie.ctxcsn, &text );
955 if ( !BER_BVISNULL( &syncCookie.ctxcsn ) &&
958 rc = syncrepl_updateCookie( si, op, psub, &syncCookie);
961 if ( si->si_refreshPresent == 1 ) {
963 syncrepl_del_nonpresent( op, si, NULL, NULL );
967 ldap_memfree( retoid );
968 ber_bvfree( retdata );
972 Debug( LDAP_DEBUG_ANY, "do_syncrep2 : "
973 "unknown intermediate response (%d)\n",
975 ldap_memfree( retoid );
976 ber_bvfree( retdata );
982 Debug( LDAP_DEBUG_ANY, "do_syncrep2 : "
983 "unknown message\n", 0, 0, 0 );
987 if ( !BER_BVISNULL( &syncCookie.octet_str )) {
988 slap_sync_cookie_free( &syncCookie_req, 0 );
989 slap_dup_sync_cookie( &syncCookie_req, &syncCookie );
990 slap_sync_cookie_free( &syncCookie, 0 );
1000 ldap_get_option( si->si_ld, LDAP_OPT_ERROR_NUMBER, &rc );
1001 errstr = ldap_err2string( rc );
1003 Debug( LDAP_DEBUG_ANY,
1004 "do_syncrep2 : %s\n", errstr, 0, 0 );
1008 slap_sync_cookie_free( &syncCookie, 0 );
1009 slap_sync_cookie_free( &syncCookie_req, 0 );
1011 if ( res ) ldap_msgfree( res );
1013 if ( rc && rc != LDAP_SYNC_REFRESH_REQUIRED && si->si_ld ) {
1014 if ( si->si_conn_setup ) {
1016 ldap_get_option( si->si_ld, LDAP_OPT_DESC, &s );
1017 connection_client_stop( s );
1018 si->si_conn_setup = 0;
1020 ldap_unbind_ext( si->si_ld, NULL, NULL );
1032 struct re_s* rtask = arg;
1033 syncinfo_t *si = ( syncinfo_t * ) rtask->arg;
1034 Connection conn = {0};
1035 OperationBuffer opbuf;
1037 int rc = LDAP_SUCCESS;
1043 Debug( LDAP_DEBUG_TRACE, "=>do_syncrepl\n", 0, 0, 0 );
1048 ldap_pvt_thread_mutex_lock( &si->si_mutex );
1050 switch( abs( si->si_type )) {
1051 case LDAP_SYNC_REFRESH_ONLY:
1052 case LDAP_SYNC_REFRESH_AND_PERSIST:
1055 ldap_pvt_thread_mutex_unlock( &si->si_mutex );
1059 if ( slapd_shutdown ) {
1061 if ( si->si_conn_setup ) {
1062 ldap_get_option( si->si_ld, LDAP_OPT_DESC, &s );
1063 connection_client_stop( s );
1064 si->si_conn_setup = 0;
1066 ldap_unbind_ext( si->si_ld, NULL, NULL );
1069 ldap_pvt_thread_mutex_unlock( &si->si_mutex );
1073 op = (Operation *) &opbuf;
1074 connection_fake_init( &conn, op, ctx );
1076 /* use global malloc for now */
1077 op->o_tmpmemctx = NULL;
1078 op->o_tmpmfuncs = &ch_mfuncs;
1080 op->o_managedsait = SLAP_CONTROL_NONCRITICAL;
1081 op->o_bd = be = si->si_be;
1082 op->o_dn = op->o_bd->be_rootdn;
1083 op->o_ndn = op->o_bd->be_rootndn;
1085 /* Establish session, do search */
1087 si->si_refreshDelete = 0;
1088 si->si_refreshPresent = 0;
1089 rc = do_syncrep1( op, si );
1093 /* Process results */
1094 if ( rc == LDAP_SUCCESS ) {
1095 ldap_get_option( si->si_ld, LDAP_OPT_DESC, &s );
1097 rc = do_syncrep2( op, si );
1098 if ( rc == LDAP_SYNC_REFRESH_REQUIRED ) {
1099 rc = ldap_sync_search( si, op->o_tmpmemctx );
1103 if ( abs(si->si_type) == LDAP_SYNC_REFRESH_AND_PERSIST ) {
1104 /* If we succeeded, enable the connection for further listening.
1105 * If we failed, tear down the connection and reschedule.
1107 if ( rc == LDAP_SUCCESS ) {
1108 if ( si->si_conn_setup ) {
1109 connection_client_enable( s );
1111 rc = connection_client_setup( s, do_syncrepl, arg );
1113 si->si_conn_setup = 1;
1115 } else if ( si->si_conn_setup ) {
1119 if ( rc == -2 ) rc = 0;
1123 /* At this point, we have 4 cases:
1124 * 1) for any hard failure, give up and remove this task
1125 * 2) for ServerDown, reschedule this task to run
1126 * 3) for Refresh and Success, reschedule to run
1127 * 4) for Persist and Success, reschedule to defer
1129 ldap_pvt_thread_mutex_lock( &slapd_rq.rq_mutex );
1131 if ( ldap_pvt_runqueue_isrunning( &slapd_rq, rtask )) {
1132 ldap_pvt_runqueue_stoptask( &slapd_rq, rtask );
1136 connection_client_stop( s );
1139 if ( rc == LDAP_SUCCESS ) {
1140 if ( si->si_type == LDAP_SYNC_REFRESH_ONLY ) {
1143 rtask->interval.tv_sec = si->si_interval;
1144 ldap_pvt_runqueue_resched( &slapd_rq, rtask, defer );
1145 if ( si->si_retrynum ) {
1146 for ( i = 0; si->si_retrynum_init[i] != RETRYNUM_TAIL; i++ ) {
1147 si->si_retrynum[i] = si->si_retrynum_init[i];
1149 si->si_retrynum[i] = RETRYNUM_TAIL;
1152 for ( i = 0; si->si_retrynum && si->si_retrynum[i] <= 0; i++ ) {
1153 if ( si->si_retrynum[i] == RETRYNUM_FOREVER || si->si_retrynum[i] == RETRYNUM_TAIL )
1157 if ( !si->si_retrynum || si->si_retrynum[i] == RETRYNUM_TAIL ) {
1158 ldap_pvt_runqueue_remove( &slapd_rq, rtask );
1159 } else if ( RETRYNUM_VALID( si->si_retrynum[i] ) ) {
1160 if ( si->si_retrynum[i] > 0 )
1161 si->si_retrynum[i]--;
1162 rtask->interval.tv_sec = si->si_retryinterval[i];
1163 ldap_pvt_runqueue_resched( &slapd_rq, rtask, 0 );
1164 slap_wake_listener();
1168 ldap_pvt_thread_mutex_unlock( &slapd_rq.rq_mutex );
1169 ldap_pvt_thread_mutex_unlock( &si->si_mutex );
1174 static slap_verbmasks modops[] = {
1175 { BER_BVC("add"), LDAP_REQ_ADD },
1176 { BER_BVC("delete"), LDAP_REQ_DELETE },
1177 { BER_BVC("modify"), LDAP_REQ_MODIFY },
1178 { BER_BVC("modrdn"), LDAP_REQ_MODRDN},
1182 static Modifications *
1183 syncrepl_accesslog_mods(
1190 AttributeDescription *ad;
1191 struct berval bv, bv2;
1193 Modifications *mod = NULL, *modlist = NULL, **modtail;
1198 for (i=0; !BER_BVISNULL( &vals[i] ); i++) {
1202 colon = ber_bvchr( &bv, ':' );
1204 continue; /* invalid */
1205 bv.bv_len = colon - bv.bv_val;
1206 if ( slap_bv2ad( &bv, &ad, &text )) {
1210 /* Ignore dynamically generated attrs */
1211 if ( ad->ad_type->sat_flags & SLAP_AT_DYNAMIC )
1213 /* Ignore excluded attrs */
1214 if ( ldap_charray_inlist( si->si_exattrs,
1215 ad->ad_type->sat_cname.bv_val ))
1219 case '+': op = LDAP_MOD_ADD; break;
1220 case '-': op = LDAP_MOD_DELETE; break;
1221 case '=': op = LDAP_MOD_REPLACE; break;
1222 case '#': op = LDAP_MOD_INCREMENT; break;
1226 if ( !mod || ad != mod->sml_desc || op != mod->sml_op ) {
1227 mod = (Modifications *) ch_malloc( sizeof( Modifications ));
1230 mod->sml_next = NULL;
1232 mod->sml_type = ad->ad_cname;
1233 mod->sml_values = NULL;
1234 mod->sml_nvalues = NULL;
1237 modtail = &mod->sml_next;
1239 if ( colon[2] == ' ' ) {
1240 bv.bv_val = colon + 3;
1241 bv.bv_len = vals[i].bv_len - ( bv.bv_val - vals[i].bv_val );
1242 ber_dupbv( &bv2, &bv );
1243 ber_bvarray_add( &mod->sml_values, &bv2 );
1249 static Modifications *
1250 syncrepl_changelog_mods(
1255 return NULL; /* FIXME */
1259 syncrepl_message_to_op(
1265 BerElement *ber = NULL;
1266 Modifications *modlist = NULL;
1268 SlapReply rs = { REP_RESULT };
1269 slap_callback cb = { NULL, null_callback, NULL, NULL };
1272 char txtbuf[SLAP_TEXT_BUFLEN];
1273 size_t textlen = sizeof txtbuf;
1275 struct berval bdn, dn = BER_BVNULL, ndn;
1276 struct berval bv, *bvals = NULL;
1277 struct berval rdn = BER_BVNULL, sup = BER_BVNULL,
1278 prdn = BER_BVNULL, nrdn = BER_BVNULL,
1279 psup = BER_BVNULL, nsup = BER_BVNULL;
1280 int rc, deleteOldRdn = 0;
1282 if ( ldap_msgtype( msg ) != LDAP_RES_SEARCH_ENTRY ) {
1283 Debug( LDAP_DEBUG_ANY,
1284 "Message type should be entry (%d)", ldap_msgtype( msg ), 0, 0 );
1288 if ( si->si_syncdata == SYNCDATA_ACCESSLOG )
1293 rc = ldap_get_dn_ber( si->si_ld, msg, &ber, &bdn );
1295 if ( rc != LDAP_SUCCESS ) {
1296 Debug( LDAP_DEBUG_ANY,
1297 "syncrepl_message_to_op : dn get failed (%d)", rc, 0, 0 );
1301 op->o_tag = LBER_DEFAULT;
1303 while (( rc = ldap_get_attribute_ber( si->si_ld, msg, ber, &bv, &bvals ))
1305 if ( bv.bv_val == NULL )
1308 if ( !ber_bvstrcasecmp( &bv, &ls->ls_dn )) {
1310 dnPrettyNormal( NULL, &bdn, &dn, &ndn, op->o_tmpmemctx );
1311 ber_dupbv( &op->o_req_dn, &dn );
1312 ber_dupbv( &op->o_req_ndn, &ndn );
1313 slap_sl_free( ndn.bv_val, op->o_tmpmemctx );
1314 slap_sl_free( dn.bv_val, op->o_tmpmemctx );
1315 } else if ( !ber_bvstrcasecmp( &bv, &ls->ls_req )) {
1316 int i = verb_to_mask( bvals[0].bv_val, modops );
1318 Debug( LDAP_DEBUG_ANY,
1319 "syncrepl_message_to_op : unknown op %s",
1320 bvals[0].bv_val, 0, 0 );
1325 op->o_tag = modops[i].mask;
1326 } else if ( !ber_bvstrcasecmp( &bv, &ls->ls_mod )) {
1327 /* Parse attribute into modlist */
1328 if ( si->si_syncdata == SYNCDATA_ACCESSLOG )
1329 modlist = syncrepl_accesslog_mods( si, bvals );
1331 modlist = syncrepl_changelog_mods( si, bvals );
1332 } else if ( !ber_bvstrcasecmp( &bv, &ls->ls_newRdn )) {
1334 } else if ( !ber_bvstrcasecmp( &bv, &ls->ls_delRdn )) {
1335 if ( !ber_bvstrcasecmp( &slap_true_bv, bvals ))
1337 } else if ( !ber_bvstrcasecmp( &bv, &ls->ls_newSup )) {
1339 } else if ( !ber_bvstrcasecmp( &bv,
1340 &slap_schema.si_ad_entryCSN->ad_cname )) {
1341 slap_queue_csn( op, bvals );
1346 /* If we didn't get a mod type or a target DN, bail out */
1347 if ( op->o_tag == LBER_DEFAULT || BER_BVISNULL( &dn )) {
1352 op->o_callback = &cb;
1354 switch( op->o_tag ) {
1356 case LDAP_REQ_MODIFY:
1357 /* If we didn't get required data, bail */
1358 if ( !modlist ) goto done;
1360 rc = slap_mods_check( modlist, &text, txtbuf, textlen, NULL );
1362 if ( rc != LDAP_SUCCESS ) {
1363 Debug( LDAP_DEBUG_ANY, "syncrepl_message_to_op: mods check (%s)\n",
1368 if ( op->o_tag == LDAP_REQ_ADD ) {
1369 op->ora_e = ( Entry * ) ch_calloc( 1, sizeof( Entry ) );
1370 op->ora_e->e_name = op->o_req_dn;
1371 op->ora_e->e_nname = op->o_req_ndn;
1372 rc = slap_mods2entry( modlist, &op->ora_e, 1, 0, &text, txtbuf, textlen);
1373 if( rc != LDAP_SUCCESS ) {
1374 Debug( LDAP_DEBUG_ANY, "syncrepl_message_to_op: mods2entry (%s)\n",
1377 rc = op->o_bd->be_add( op, &rs );
1378 Debug( LDAP_DEBUG_SYNC,
1379 "syncrepl_message_to_op: be_add %s (%d)\n",
1380 op->o_req_dn.bv_val, rc, 0 );
1382 be_entry_release_w( op, op->ora_e );
1384 op->orm_modlist = modlist;
1385 rc = op->o_bd->be_modify( op, &rs );
1386 Debug( LDAP_DEBUG_SYNC,
1387 "syncrepl_message_to_op: be_modify %s (%d)\n",
1388 op->o_req_dn.bv_val, rc, 0 );
1391 case LDAP_REQ_MODRDN:
1392 if ( BER_BVISNULL( &rdn )) goto done;
1394 if ( rdnPretty( NULL, &rdn, &prdn, NULL ))
1396 if ( rdnNormalize( 0, NULL, NULL, &rdn, &nrdn, NULL ))
1398 if ( !BER_BVISNULL( &sup )) {
1399 if ( dnPrettyNormal( NULL, &sup, &psup, &nsup, NULL ))
1401 op->orr_newSup = &psup;
1402 op->orr_nnewSup = ⊅
1404 op->orr_newrdn = prdn;
1405 op->orr_nnewrdn = nrdn;
1406 op->orr_deleteoldrdn = deleteOldRdn;
1407 op->orr_modlist = NULL;
1408 if ( slap_modrdn2mods( op, &rs ))
1410 rc = op->o_bd->be_modrdn( op, &rs );
1411 slap_mods_free( op->orr_modlist, 1 );
1412 Debug( LDAP_DEBUG_SYNC,
1413 "syncrepl_message_to_op: be_modrdn %s (%d)\n",
1414 op->o_req_dn.bv_val, rc, 0 );
1416 case LDAP_REQ_DELETE:
1417 rc = op->o_bd->be_delete( op, &rs );
1418 Debug( LDAP_DEBUG_SYNC,
1419 "syncrepl_message_to_op: be_delete %s (%d)\n",
1420 op->o_req_dn.bv_val, rc, 0 );
1424 slap_graduate_commit_csn( op );
1426 slap_mods_free( modlist, op->o_tag != LDAP_REQ_ADD );
1427 if ( !BER_BVISNULL( &rdn )) {
1428 if ( !BER_BVISNULL( &nsup ))
1429 ch_free( nsup.bv_val );
1430 if ( !BER_BVISNULL( &psup ))
1431 ch_free( psup.bv_val );
1432 if ( !BER_BVISNULL( &nrdn ))
1433 ch_free( nrdn.bv_val );
1434 if ( !BER_BVISNULL( &prdn ))
1435 ch_free( prdn.bv_val );
1437 ber_free ( ber, 0 );
1442 syncrepl_message_to_entry(
1446 Modifications **modlist,
1452 BerElement *ber = NULL;
1455 Modifications **modtail = modlist;
1458 char txtbuf[SLAP_TEXT_BUFLEN];
1459 size_t textlen = sizeof txtbuf;
1461 struct berval bdn = {0, NULL}, dn, ndn;
1466 if ( ldap_msgtype( msg ) != LDAP_RES_SEARCH_ENTRY ) {
1467 Debug( LDAP_DEBUG_ANY,
1468 "Message type should be entry (%d)", ldap_msgtype( msg ), 0, 0 );
1472 op->o_tag = LDAP_REQ_ADD;
1474 rc = ldap_get_dn_ber( si->si_ld, msg, &ber, &bdn );
1476 if ( rc != LDAP_SUCCESS ) {
1477 Debug( LDAP_DEBUG_ANY,
1478 "syncrepl_message_to_entry : dn get failed (%d)", rc, 0, 0 );
1482 dnPrettyNormal( NULL, &bdn, &dn, &ndn, op->o_tmpmemctx );
1483 ber_dupbv( &op->o_req_dn, &dn );
1484 ber_dupbv( &op->o_req_ndn, &ndn );
1485 slap_sl_free( ndn.bv_val, op->o_tmpmemctx );
1486 slap_sl_free( dn.bv_val, op->o_tmpmemctx );
1488 if ( syncstate == LDAP_SYNC_PRESENT || syncstate == LDAP_SYNC_DELETE ) {
1491 return LDAP_SUCCESS;
1494 if ( entry == NULL ) {
1498 e = ( Entry * ) ch_calloc( 1, sizeof( Entry ) );
1499 e->e_name = op->o_req_dn;
1500 e->e_nname = op->o_req_ndn;
1502 while ( ber_remaining( ber ) ) {
1503 if ( (ber_scanf( ber, "{mW}", &tmp.sml_type, &tmp.sml_values ) ==
1504 LBER_ERROR ) || BER_BVISNULL( &tmp.sml_type ) )
1509 mod = (Modifications *) ch_malloc( sizeof( Modifications ));
1511 mod->sml_op = LDAP_MOD_REPLACE;
1513 mod->sml_next = NULL;
1514 mod->sml_desc = NULL;
1515 mod->sml_type = tmp.sml_type;
1516 mod->sml_values = tmp.sml_values;
1517 mod->sml_nvalues = NULL;
1520 modtail = &mod->sml_next;
1523 if ( *modlist == NULL ) {
1524 Debug( LDAP_DEBUG_ANY, "syncrepl_message_to_entry: no attributes\n",
1530 rc = slap_mods_check( *modlist, &text, txtbuf, textlen, NULL );
1532 if ( rc != LDAP_SUCCESS ) {
1533 Debug( LDAP_DEBUG_ANY, "syncrepl_message_to_entry: mods check (%s)\n",
1538 /* Strip out dynamically generated attrs */
1539 for ( modtail = modlist; *modtail ; ) {
1541 if ( mod->sml_desc->ad_type->sat_flags & SLAP_AT_DYNAMIC ) {
1542 *modtail = mod->sml_next;
1543 slap_mod_free( &mod->sml_mod, 0 );
1546 modtail = &mod->sml_next;
1550 /* Strip out attrs in exattrs list */
1551 for ( modtail = modlist; *modtail ; ) {
1553 if ( ldap_charray_inlist( si->si_exattrs,
1554 mod->sml_desc->ad_type->sat_cname.bv_val )) {
1555 *modtail = mod->sml_next;
1556 slap_mod_free( &mod->sml_mod, 0 );
1559 modtail = &mod->sml_next;
1563 rc = slap_mods2entry( *modlist, &e, 1, 1, &text, txtbuf, textlen);
1564 if( rc != LDAP_SUCCESS ) {
1565 Debug( LDAP_DEBUG_ANY, "syncrepl_message_to_entry: mods2entry (%s)\n",
1570 ber_free ( ber, 0 );
1571 if ( rc != LDAP_SUCCESS ) {
1582 static struct berval generic_filterstr = BER_BVC("(objectclass=*)");
1584 /* During a refresh, we may get an LDAP_SYNC_ADD for an already existing
1585 * entry if a previous refresh was interrupted before sending us a new
1586 * context state. We try to compare the new entry to the existing entry
1587 * and ignore the new entry if they are the same.
1589 * Also, we may get an update where the entryDN has changed, due to
1590 * a ModDn on the provider. We detect this as well, so we can issue
1591 * the corresponding operation locally.
1593 * In the case of a modify, we get a list of all the attributes
1594 * in the original entry. Rather than deleting the entry and re-adding it,
1595 * we issue a Modify request that deletes all the attributes and adds all
1596 * the new ones. This avoids the issue of trying to delete/add a non-leaf
1599 * We don't try to otherwise distinguish ModDN from Modify; in the case of
1600 * a ModDN we will issue both operations on the local database.
1602 typedef struct dninfo {
1606 int renamed; /* Was an existing entry renamed? */
1607 int wasChanged; /* are the attributes changed? */
1608 int attrs; /* how many attribute types are in the ads list */
1609 AttributeDescription **ads;
1617 Modifications** modlist,
1619 struct berval* syncUUID,
1620 struct sync_cookie* syncCookie_req,
1621 struct berval* syncCSN )
1623 Backend *be = op->o_bd;
1624 slap_callback cb = { NULL, NULL, NULL, NULL };
1625 struct berval *syncuuid_bv = NULL;
1626 struct berval syncUUID_strrep = BER_BVNULL;
1627 struct berval uuid_bv = BER_BVNULL;
1629 SlapReply rs_search = {REP_RESULT};
1630 SlapReply rs_delete = {REP_RESULT};
1631 SlapReply rs_add = {REP_RESULT};
1632 SlapReply rs_modify = {REP_RESULT};
1634 #ifdef LDAP_COMP_MATCH
1635 AttributeAssertion ava = { NULL, BER_BVNULL, NULL };
1637 AttributeAssertion ava = { NULL, BER_BVNULL };
1639 int rc = LDAP_SUCCESS;
1641 struct berval pdn = BER_BVNULL;
1645 switch( syncstate ) {
1646 case LDAP_SYNC_PRESENT:
1647 Debug( LDAP_DEBUG_SYNC, "%s: %s\n",
1649 "LDAP_RES_SEARCH_ENTRY(LDAP_SYNC_PRESENT)", 0 );
1652 Debug( LDAP_DEBUG_SYNC, "%s: %s\n",
1654 "LDAP_RES_SEARCH_ENTRY(LDAP_SYNC_ADD)", 0 );
1656 case LDAP_SYNC_DELETE:
1657 Debug( LDAP_DEBUG_SYNC, "%s: %s\n",
1659 "LDAP_RES_SEARCH_ENTRY(LDAP_SYNC_DELETE)", 0 );
1661 case LDAP_SYNC_MODIFY:
1662 Debug( LDAP_DEBUG_SYNC, "%s: %s\n",
1664 "LDAP_RES_SEARCH_ENTRY(LDAP_SYNC_MODIFY)", 0 );
1667 Debug( LDAP_DEBUG_ANY, "%s: %s\n",
1669 "LDAP_RES_SEARCH_ENTRY(UNKNOWN syncstate)", 0 );
1672 if (( syncstate == LDAP_SYNC_PRESENT || syncstate == LDAP_SYNC_ADD )) {
1673 if ( !si->si_refreshPresent ) {
1674 syncuuid_bv = ber_dupbv( NULL, syncUUID );
1675 avl_insert( &si->si_presentlist, (caddr_t) syncuuid_bv,
1676 syncuuid_cmp, avl_dup_error );
1680 if ( syncstate == LDAP_SYNC_PRESENT ) {
1682 } else if ( syncstate != LDAP_SYNC_DELETE ) {
1683 if ( entry == NULL ) {
1688 f.f_choice = LDAP_FILTER_EQUALITY;
1690 ava.aa_desc = slap_schema.si_ad_entryUUID;
1691 ava.aa_value = *syncUUID;
1693 (void)slap_uuidstr_from_normalized( &syncUUID_strrep, syncUUID, op->o_tmpmemctx );
1694 if ( syncuuid_bv ) {
1695 Debug( LDAP_DEBUG_SYNC, "syncrepl_entry: inserted UUID %s\n",
1696 syncUUID_strrep.bv_val, 0, 0 );
1698 op->ors_filter = &f;
1700 op->ors_filterstr.bv_len = STRLENOF( "(entryUUID=)" ) + syncUUID_strrep.bv_len;
1701 op->ors_filterstr.bv_val = (char *) slap_sl_malloc(
1702 op->ors_filterstr.bv_len + 1, op->o_tmpmemctx );
1703 AC_MEMCPY( op->ors_filterstr.bv_val, "(entryUUID=", STRLENOF( "(entryUUID=" ) );
1704 AC_MEMCPY( &op->ors_filterstr.bv_val[STRLENOF( "(entryUUID=" )],
1705 syncUUID_strrep.bv_val, syncUUID_strrep.bv_len );
1706 op->ors_filterstr.bv_val[op->ors_filterstr.bv_len - 1] = ')';
1707 op->ors_filterstr.bv_val[op->ors_filterstr.bv_len] = '\0';
1709 op->o_tag = LDAP_REQ_SEARCH;
1710 op->ors_scope = LDAP_SCOPE_SUBTREE;
1711 op->ors_deref = LDAP_DEREF_NEVER;
1713 /* get the entry for this UUID */
1714 op->o_req_dn = si->si_base;
1715 op->o_req_ndn = si->si_base;
1717 op->o_time = slap_get_time();
1718 op->ors_tlimit = SLAP_NO_LIMIT;
1721 op->ors_attrs = slap_anlist_all_attributes;
1722 op->ors_attrsonly = 0;
1724 /* set callback function */
1725 op->o_callback = &cb;
1726 cb.sc_response = dn_callback;
1727 cb.sc_private = &dni;
1728 dni.new_entry = entry;
1730 if ( limits_check( op, &rs_search ) == 0 ) {
1731 rc = be->be_search( op, &rs_search );
1732 Debug( LDAP_DEBUG_SYNC,
1733 "syncrepl_entry: %s (%d)\n",
1734 "be_search", rc, 0 );
1737 if ( !BER_BVISNULL( &op->ors_filterstr ) ) {
1738 slap_sl_free( op->ors_filterstr.bv_val, op->o_tmpmemctx );
1741 cb.sc_response = null_callback;
1744 if ( entry && !BER_BVISNULL( &entry->e_name ) ) {
1745 Debug( LDAP_DEBUG_SYNC,
1746 "syncrepl_entry: %s\n",
1747 entry->e_name.bv_val, 0, 0 );
1749 Debug( LDAP_DEBUG_SYNC,
1750 "syncrepl_entry: %s\n",
1751 dni.dn.bv_val ? dni.dn.bv_val : "(null)", 0, 0 );
1754 if ( syncstate != LDAP_SYNC_DELETE ) {
1755 Attribute *a = attr_find( entry->e_attrs, slap_schema.si_ad_entryUUID );
1758 /* add if missing */
1759 attr_merge_one( entry, slap_schema.si_ad_entryUUID,
1760 &syncUUID_strrep, syncUUID );
1762 } else if ( !bvmatch( &a->a_nvals[0], syncUUID ) ) {
1763 /* replace only if necessary */
1764 if ( a->a_nvals != a->a_vals ) {
1765 ber_memfree( a->a_nvals[0].bv_val );
1766 ber_dupbv( &a->a_nvals[0], syncUUID );
1768 ber_memfree( a->a_vals[0].bv_val );
1769 ber_dupbv( &a->a_vals[0], &syncUUID_strrep );
1773 switch ( syncstate ) {
1775 case LDAP_SYNC_MODIFY:
1777 Attribute *a = attr_find( entry->e_attrs, slap_schema.si_ad_entryCSN );
1779 /* FIXME: op->o_csn is assumed to be
1780 * on the thread's slab; this needs
1781 * to be cleared ASAP.
1782 * What happens if already present?
1784 assert( BER_BVISNULL( &op->o_csn ) );
1785 op->o_csn = a->a_vals[0];
1789 if ( BER_BVISNULL( &dni.dn )) {
1791 op->o_req_dn = entry->e_name;
1792 op->o_req_ndn = entry->e_nname;
1793 op->o_tag = LDAP_REQ_ADD;
1796 rc = be->be_add( op, &rs_add );
1797 Debug( LDAP_DEBUG_SYNC,
1798 "syncrepl_entry: %s (%d)\n",
1800 switch ( rs_add.sr_err ) {
1802 be_entry_release_w( op, entry );
1807 /* we assume that LDAP_NO_SUCH_OBJECT is returned
1808 * only if the suffix entry is not present */
1809 case LDAP_NO_SUCH_OBJECT:
1810 rc = syncrepl_add_glue( op, entry );
1814 /* if an entry was added via syncrepl_add_glue(),
1815 * it likely has no entryUUID, so the previous
1816 * be_search() doesn't find it. In this case,
1817 * give syncrepl a chance to modify it. Also
1818 * allow for entries that were recreated with the
1819 * same DN but a different entryUUID.
1821 case LDAP_ALREADY_EXISTS:
1823 Operation op2 = *op;
1824 SlapReply rs2 = { 0 };
1825 slap_callback cb2 = { 0 };
1827 op2.o_tag = LDAP_REQ_SEARCH;
1828 op2.o_req_dn = entry->e_name;
1829 op2.o_req_ndn = entry->e_nname;
1830 op2.ors_scope = LDAP_SCOPE_BASE;
1831 op2.ors_deref = LDAP_DEREF_NEVER;
1832 op2.ors_attrs = slap_anlist_all_attributes;
1833 op2.ors_attrsonly = 0;
1834 op2.ors_limit = NULL;
1836 op2.ors_tlimit = SLAP_NO_LIMIT;
1838 f.f_choice = LDAP_FILTER_PRESENT;
1839 f.f_desc = slap_schema.si_ad_objectClass;
1840 op2.ors_filter = &f;
1841 op2.ors_filterstr = generic_filterstr;
1843 op2.o_callback = &cb2;
1844 cb2.sc_response = dn_callback;
1845 cb2.sc_private = &dni;
1847 rc = be->be_search( &op2, &rs2 );
1848 if ( rc ) goto done;
1856 Debug( LDAP_DEBUG_ANY,
1857 "syncrepl_entry : be_add failed (%d)\n",
1858 rs_add.sr_err, 0, 0 );
1864 op->o_req_dn = dni.dn;
1865 op->o_req_ndn = dni.ndn;
1866 if ( dni.renamed ) {
1867 struct berval noldp, newp, nnewp;
1869 op->o_tag = LDAP_REQ_MODRDN;
1870 dnRdn( &entry->e_name, &op->orr_newrdn );
1871 dnRdn( &entry->e_nname, &op->orr_nnewrdn );
1873 dnParent( &dni.ndn, &noldp );
1874 dnParent( &entry->e_nname, &nnewp );
1875 if ( !dn_match( &noldp, &nnewp )) {
1876 dnParent( &entry->e_name, &newp );
1877 op->orr_newSup = &newp;
1878 op->orr_nnewSup = &nnewp;
1880 op->orr_deleteoldrdn = 0;
1881 op->orr_modlist = NULL;
1882 if (( rc = slap_modrdn2mods( op, &rs_modify ))) {
1885 rc = be->be_modrdn( op, &rs_modify );
1886 slap_mods_free( op->orr_modlist, 1 );
1887 Debug( LDAP_DEBUG_SYNC,
1888 "syncrepl_entry: %s (%d)\n",
1889 "be_modrdn", rc, 0 );
1890 if ( rs_modify.sr_err == LDAP_SUCCESS ) {
1891 op->o_req_dn = entry->e_name;
1892 op->o_req_ndn = entry->e_nname;
1897 if ( dni.wasChanged ) {
1898 Modifications *mod, *modhead = NULL;
1899 Modifications *modtail = NULL;
1902 op->o_tag = LDAP_REQ_MODIFY;
1904 assert( *modlist != NULL );
1906 /* Delete all the old attrs */
1907 for ( i = 0; i < dni.attrs; i++ ) {
1908 mod = ch_malloc( sizeof( Modifications ) );
1909 mod->sml_op = LDAP_MOD_DELETE;
1911 mod->sml_desc = dni.ads[i];
1912 mod->sml_type = mod->sml_desc->ad_cname;
1913 mod->sml_values = NULL;
1914 mod->sml_nvalues = NULL;
1915 if ( !modhead ) modhead = mod;
1917 modtail->sml_next = mod;
1922 /* Append passed in list to ours */
1924 modtail->sml_next = *modlist;
1930 /* Find end of this list */
1931 for ( ; mod != NULL; mod = mod->sml_next ) {
1935 mod = (Modifications *)ch_calloc(1, sizeof(Modifications));
1936 mod->sml_op = LDAP_MOD_REPLACE;
1938 mod->sml_desc = slap_schema.si_ad_entryUUID;
1939 mod->sml_type = mod->sml_desc->ad_cname;
1940 ber_dupbv( &uuid_bv, &syncUUID_strrep );
1941 ber_bvarray_add( &mod->sml_values, &uuid_bv );
1942 ber_dupbv( &uuid_bv, syncUUID );
1943 ber_bvarray_add( &mod->sml_nvalues, &uuid_bv );
1944 modtail->sml_next = mod;
1946 op->o_tag = LDAP_REQ_MODIFY;
1947 op->orm_modlist = *modlist;
1949 rc = be->be_modify( op, &rs_modify );
1950 Debug( LDAP_DEBUG_SYNC,
1951 "syncrepl_entry: %s (%d)\n",
1952 "be_modify", rc, 0 );
1953 if ( rs_modify.sr_err != LDAP_SUCCESS ) {
1954 Debug( LDAP_DEBUG_ANY,
1955 "syncrepl_entry : be_modify failed (%d)\n",
1956 rs_modify.sr_err, 0, 0 );
1960 case LDAP_SYNC_DELETE :
1961 if ( !BER_BVISNULL( &dni.dn )) {
1962 op->o_req_dn = dni.dn;
1963 op->o_req_ndn = dni.ndn;
1964 op->o_tag = LDAP_REQ_DELETE;
1965 rc = be->be_delete( op, &rs_delete );
1966 Debug( LDAP_DEBUG_SYNC,
1967 "syncrepl_entry: %s (%d)\n",
1968 "be_delete", rc, 0 );
1970 while ( rs_delete.sr_err == LDAP_SUCCESS
1971 && op->o_delete_glue_parent ) {
1972 op->o_delete_glue_parent = 0;
1973 if ( !be_issuffix( op->o_bd, &op->o_req_ndn )) {
1974 slap_callback cb = { NULL };
1975 cb.sc_response = slap_null_cb;
1976 dnParent( &op->o_req_ndn, &pdn );
1978 op->o_req_ndn = pdn;
1979 op->o_callback = &cb;
1980 op->o_bd->be_delete( op, &rs_delete );
1989 Debug( LDAP_DEBUG_ANY,
1990 "syncrepl_entry : unknown syncstate\n", 0, 0, 0 );
1995 if ( !BER_BVISNULL( &syncUUID_strrep ) ) {
1996 slap_sl_free( syncUUID_strrep.bv_val, op->o_tmpmemctx );
1997 BER_BVZERO( &syncUUID_strrep );
2000 op->o_tmpfree( dni.ads, op->o_tmpmemctx );
2002 if ( !BER_BVISNULL( &dni.ndn ) ) {
2003 op->o_tmpfree( dni.ndn.bv_val, op->o_tmpmemctx );
2005 if ( !BER_BVISNULL( &dni.dn ) ) {
2006 op->o_tmpfree( dni.dn.bv_val, op->o_tmpmemctx );
2009 entry_free( entry );
2010 BER_BVZERO( &op->o_csn );
2014 static struct berval gcbva[] = {
2020 #define NP_DELETE_ONE 2
2023 syncrepl_del_nonpresent(
2027 struct berval *cookiecsn )
2029 Backend* be = op->o_bd;
2030 slap_callback cb = { NULL };
2031 SlapReply rs_search = {REP_RESULT};
2032 SlapReply rs_delete = {REP_RESULT};
2033 SlapReply rs_modify = {REP_RESULT};
2034 struct nonpresent_entry *np_list, *np_prev;
2036 AttributeName an[2];
2038 struct berval pdn = BER_BVNULL;
2041 op->o_req_dn = si->si_base;
2042 op->o_req_ndn = si->si_base;
2044 cb.sc_response = nonpresent_callback;
2047 op->o_callback = &cb;
2048 op->o_tag = LDAP_REQ_SEARCH;
2049 op->ors_scope = si->si_scope;
2050 op->ors_deref = LDAP_DEREF_NEVER;
2051 op->o_time = slap_get_time();
2052 op->ors_tlimit = SLAP_NO_LIMIT;
2057 #ifdef LDAP_COMP_MATCH
2058 AttributeAssertion eq = { NULL, BER_BVNULL, NULL };
2060 AttributeAssertion eq = { NULL, BER_BVNULL };
2064 op->ors_attrsonly = 1;
2065 op->ors_attrs = slap_anlist_no_attrs;
2066 op->ors_limit = NULL;
2067 op->ors_filter = &uf;
2070 uf.f_av_desc = slap_schema.si_ad_entryUUID;
2072 uf.f_choice = LDAP_FILTER_EQUALITY;
2073 si->si_refreshDelete |= NP_DELETE_ONE;
2075 for (i=0; uuids[i].bv_val; i++) {
2077 slap_uuidstr_from_normalized( &uf.f_av_value, &uuids[i],
2079 filter2bv_x( op, op->ors_filter, &op->ors_filterstr );
2080 uf.f_av_value = uuids[i];
2081 rc = be->be_search( op, &rs_search );
2082 op->o_tmpfree( op->ors_filterstr.bv_val, op->o_tmpmemctx );
2084 si->si_refreshDelete ^= NP_DELETE_ONE;
2086 memset( &an[0], 0, 2 * sizeof( AttributeName ) );
2087 an[0].an_name = slap_schema.si_ad_entryUUID->ad_cname;
2088 an[0].an_desc = slap_schema.si_ad_entryUUID;
2090 op->ors_slimit = SLAP_NO_LIMIT;
2091 op->ors_attrsonly = 0;
2092 op->ors_filter = str2filter_x( op, si->si_filterstr.bv_val );
2093 op->ors_filterstr = si->si_filterstr;
2094 op->o_nocaching = 1;
2096 if ( limits_check( op, &rs_search ) == 0 ) {
2097 rc = be->be_search( op, &rs_search );
2099 if ( op->ors_filter ) filter_free_x( op, op->ors_filter );
2102 op->o_nocaching = 0;
2104 if ( !LDAP_LIST_EMPTY( &si->si_nonpresentlist ) ) {
2106 if ( cookiecsn && !BER_BVISNULL( cookiecsn ))
2109 csn = si->si_syncCookie.ctxcsn;
2111 slap_queue_csn( op, &csn );
2113 np_list = LDAP_LIST_FIRST( &si->si_nonpresentlist );
2114 while ( np_list != NULL ) {
2115 LDAP_LIST_REMOVE( np_list, npe_link );
2117 np_list = LDAP_LIST_NEXT( np_list, npe_link );
2118 op->o_tag = LDAP_REQ_DELETE;
2119 op->o_callback = &cb;
2120 cb.sc_response = null_callback;
2122 op->o_req_dn = *np_prev->npe_name;
2123 op->o_req_ndn = *np_prev->npe_nname;
2124 rc = op->o_bd->be_delete( op, &rs_delete );
2125 Debug( LDAP_DEBUG_SYNC,
2126 "syncrepl_del_nonpresent: be_delete %s (%d)\n",
2127 op->o_req_dn.bv_val, rc, 0 );
2129 if ( rs_delete.sr_err == LDAP_NOT_ALLOWED_ON_NONLEAF ) {
2130 Modifications mod1, mod2;
2131 mod1.sml_op = LDAP_MOD_REPLACE;
2133 mod1.sml_desc = slap_schema.si_ad_objectClass;
2134 mod1.sml_type = mod1.sml_desc->ad_cname;
2135 mod1.sml_values = &gcbva[0];
2136 mod1.sml_nvalues = NULL;
2137 mod1.sml_next = &mod2;
2139 mod2.sml_op = LDAP_MOD_REPLACE;
2141 mod2.sml_desc = slap_schema.si_ad_structuralObjectClass;
2142 mod2.sml_type = mod2.sml_desc->ad_cname;
2143 mod2.sml_values = &gcbva[1];
2144 mod2.sml_nvalues = NULL;
2145 mod2.sml_next = NULL;
2147 op->o_tag = LDAP_REQ_MODIFY;
2148 op->orm_modlist = &mod1;
2150 rc = be->be_modify( op, &rs_modify );
2153 while ( rs_delete.sr_err == LDAP_SUCCESS &&
2154 op->o_delete_glue_parent ) {
2155 op->o_delete_glue_parent = 0;
2156 if ( !be_issuffix( op->o_bd, &op->o_req_ndn )) {
2157 slap_callback cb = { NULL };
2158 cb.sc_response = slap_null_cb;
2159 dnParent( &op->o_req_ndn, &pdn );
2161 op->o_req_ndn = pdn;
2162 op->o_callback = &cb;
2163 /* give it a root privil ? */
2164 op->o_bd->be_delete( op, &rs_delete );
2170 op->o_delete_glue_parent = 0;
2172 ber_bvfree( np_prev->npe_name );
2173 ber_bvfree( np_prev->npe_nname );
2177 slap_graduate_commit_csn( op );
2179 op->o_tmpfree( op->o_csn.bv_val, op->o_tmpmemctx );
2180 BER_BVZERO( &op->o_csn );
2191 Backend *be = op->o_bd;
2192 slap_callback cb = { NULL };
2197 struct berval dn = BER_BVNULL;
2198 struct berval ndn = BER_BVNULL;
2200 SlapReply rs_add = {REP_RESULT};
2201 struct berval ptr, nptr;
2204 op->o_tag = LDAP_REQ_ADD;
2205 op->o_callback = &cb;
2206 cb.sc_response = null_callback;
2207 cb.sc_private = NULL;
2212 /* count RDNs in suffix */
2213 if ( !BER_BVISEMPTY( &be->be_nsuffix[0] ) ) {
2214 for ( i = 0, ptr = be->be_nsuffix[0], comma = ptr.bv_val; comma != NULL; comma = ber_bvchr( &ptr, ',' ) ) {
2216 ptr.bv_len -= comma - ptr.bv_val;
2226 /* Start with BE suffix */
2228 for ( i = 0; i < suffrdns; i++ ) {
2229 comma = ber_bvrchr( &ptr, ',' );
2230 if ( comma != NULL ) {
2231 ptr.bv_len = comma - ptr.bv_val;
2238 if ( !BER_BVISEMPTY( &ptr ) ) {
2239 dn.bv_len -= ptr.bv_len + 1;
2240 dn.bv_val += ptr.bv_len + 1;
2243 /* the normalizedDNs are always the same length, no counting
2247 if ( ndn.bv_len > be->be_nsuffix[0].bv_len ) {
2248 ndn.bv_val += ndn.bv_len - be->be_nsuffix[0].bv_len;
2249 ndn.bv_len = be->be_nsuffix[0].bv_len;
2251 nptr.bv_len = ndn.bv_val - nptr.bv_val - 1;
2257 while ( ndn.bv_val > e->e_nname.bv_val ) {
2258 glue = (Entry *) ch_calloc( 1, sizeof(Entry) );
2259 ber_dupbv( &glue->e_name, &dn );
2260 ber_dupbv( &glue->e_nname, &ndn );
2262 a = ch_calloc( 1, sizeof( Attribute ));
2263 a->a_desc = slap_schema.si_ad_objectClass;
2265 a->a_vals = ch_calloc( 3, sizeof( struct berval ));
2266 ber_dupbv( &a->a_vals[0], &gcbva[0] );
2267 ber_dupbv( &a->a_vals[1], &gcbva[1] );
2268 ber_dupbv( &a->a_vals[2], &gcbva[2] );
2270 a->a_nvals = a->a_vals;
2272 a->a_next = glue->e_attrs;
2275 a = ch_calloc( 1, sizeof( Attribute ));
2276 a->a_desc = slap_schema.si_ad_structuralObjectClass;
2278 a->a_vals = ch_calloc( 2, sizeof( struct berval ));
2279 ber_dupbv( &a->a_vals[0], &gcbva[1] );
2280 ber_dupbv( &a->a_vals[1], &gcbva[2] );
2282 a->a_nvals = a->a_vals;
2284 a->a_next = glue->e_attrs;
2287 op->o_req_dn = glue->e_name;
2288 op->o_req_ndn = glue->e_nname;
2290 rc = be->be_add ( op, &rs_add );
2291 if ( rs_add.sr_err == LDAP_SUCCESS ) {
2292 be_entry_release_w( op, glue );
2294 /* incl. ALREADY EXIST */
2296 if ( rs_add.sr_err != LDAP_ALREADY_EXISTS ) {
2302 /* Move to next child */
2303 comma = ber_bvrchr( &ptr, ',' );
2304 if ( comma == NULL ) {
2307 ptr.bv_len = comma - ptr.bv_val;
2309 dn.bv_val = ++comma;
2310 dn.bv_len = e->e_name.bv_len - (dn.bv_val - e->e_name.bv_val);
2312 comma = ber_bvrchr( &nptr, ',' );
2313 assert( comma != NULL );
2314 nptr.bv_len = comma - nptr.bv_val;
2316 ndn.bv_val = ++comma;
2317 ndn.bv_len = e->e_nname.bv_len - (ndn.bv_val - e->e_nname.bv_val);
2320 op->o_req_dn = e->e_name;
2321 op->o_req_ndn = e->e_nname;
2323 rc = be->be_add ( op, &rs_add );
2324 if ( rs_add.sr_err == LDAP_SUCCESS ) {
2325 be_entry_release_w( op, e );
2334 syncrepl_updateCookie(
2338 struct sync_cookie *syncCookie )
2340 Backend *be = op->o_bd;
2341 Modifications mod = { { 0 } };
2342 struct berval vals[ 2 ];
2346 slap_callback cb = { NULL };
2347 SlapReply rs_modify = {REP_RESULT};
2349 mod.sml_op = LDAP_MOD_REPLACE;
2350 mod.sml_desc = slap_schema.si_ad_contextCSN;
2351 mod.sml_type = mod.sml_desc->ad_cname;
2352 mod.sml_values = vals;
2353 vals[0] = syncCookie->ctxcsn;
2354 BER_BVZERO( &vals[1] );
2356 slap_queue_csn( op, &syncCookie->ctxcsn );
2358 op->o_tag = LDAP_REQ_MODIFY;
2360 assert( si->si_rid < 1000 );
2362 cb.sc_response = null_callback;
2365 op->o_callback = &cb;
2366 op->o_req_dn = op->o_bd->be_suffix[0];
2367 op->o_req_ndn = op->o_bd->be_nsuffix[0];
2369 /* update contextCSN */
2370 op->o_msgid = SLAP_SYNC_UPDATE_MSGID;
2371 op->orm_modlist = &mod;
2372 rc = be->be_modify( op, &rs_modify );
2375 if ( rs_modify.sr_err == LDAP_SUCCESS ) {
2376 slap_sync_cookie_free( &si->si_syncCookie, 0 );
2377 slap_dup_sync_cookie( &si->si_syncCookie, syncCookie );
2379 Debug( LDAP_DEBUG_ANY,
2380 "be_modify failed (%d)\n", rs_modify.sr_err, 0, 0 );
2383 slap_graduate_commit_csn( op );
2385 op->o_tmpfree( op->o_csn.bv_val, op->o_tmpmemctx );
2386 BER_BVZERO( &op->o_csn );
2396 dninfo *dni = op->o_callback->sc_private;
2398 if ( rs->sr_type == REP_SEARCH ) {
2399 if ( !BER_BVISNULL( &dni->dn ) ) {
2400 Debug( LDAP_DEBUG_ANY,
2401 "dn_callback : consistency error - "
2402 "entryUUID is not unique\n", 0, 0, 0 );
2404 ber_dupbv_x( &dni->dn, &rs->sr_entry->e_name, op->o_tmpmemctx );
2405 ber_dupbv_x( &dni->ndn, &rs->sr_entry->e_nname, op->o_tmpmemctx );
2406 /* If there is a new entry, see if it differs from the old.
2407 * We compare the non-normalized values so that cosmetic changes
2408 * in the provider are always propagated.
2410 if ( dni->new_entry ) {
2411 Attribute *old, *new;
2414 /* Did the DN change? Note that we don't explicitly try to
2415 * discover if the deleteOldRdn argument applies here. It
2416 * would save an unnecessary Modify if we detected it, but
2417 * that's a fair amount of trouble to compare the two attr
2418 * lists in detail. (Just test normalized DN; we ignore
2419 * insignificant changes here.)
2421 if ( !dn_match( &rs->sr_entry->e_nname,
2422 &dni->new_entry->e_nname ) )
2427 for ( i = 0, old = rs->sr_entry->e_attrs;
2429 i++, old = old->a_next )
2434 /* We assume that attributes are saved in the same order
2435 * in the remote and local databases. So if we walk through
2436 * the attributeDescriptions one by one they should match in
2437 * lock step. If not, we signal a change. Otherwise we test
2440 for ( old = rs->sr_entry->e_attrs, new = dni->new_entry->e_attrs;
2442 old = old->a_next, new = new->a_next )
2444 if ( old->a_desc != new->a_desc ) {
2445 dni->wasChanged = 1;
2448 for ( i = 0; ; i++ ) {
2450 nold = BER_BVISNULL( &old->a_vals[i] );
2451 nnew = BER_BVISNULL( &new->a_vals[i] );
2452 /* If both are empty, stop looking */
2453 if ( nold && nnew ) {
2456 /* If they are different, stop looking */
2457 if ( nold != nnew ) {
2458 dni->wasChanged = 1;
2461 if ( ber_bvcmp( &old->a_vals[i], &new->a_vals[i] )) {
2462 dni->wasChanged = 1;
2466 if ( dni->wasChanged ) break;
2468 if ( dni->wasChanged ) {
2469 dni->ads = op->o_tmpalloc( dni->attrs *
2470 sizeof(AttributeDescription *), op->o_tmpmemctx );
2472 for ( old = rs->sr_entry->e_attrs; old; old = old->a_next ) {
2473 dni->ads[i] = old->a_desc;
2479 } else if ( rs->sr_type == REP_RESULT ) {
2480 if ( rs->sr_err == LDAP_SIZELIMIT_EXCEEDED ) {
2481 Debug( LDAP_DEBUG_ANY,
2482 "dn_callback : consistency error - "
2483 "entryUUID is not unique\n", 0, 0, 0 );
2487 return LDAP_SUCCESS;
2491 nonpresent_callback(
2495 syncinfo_t *si = op->o_callback->sc_private;
2498 struct berval* present_uuid = NULL;
2499 struct nonpresent_entry *np_entry;
2501 if ( rs->sr_type == REP_RESULT ) {
2502 count = avl_free( si->si_presentlist, avl_ber_bvfree );
2503 si->si_presentlist = NULL;
2505 } else if ( rs->sr_type == REP_SEARCH ) {
2506 if ( !(si->si_refreshDelete & NP_DELETE_ONE )) {
2507 a = attr_find( rs->sr_entry->e_attrs, slap_schema.si_ad_entryUUID );
2510 present_uuid = avl_find( si->si_presentlist, &a->a_nvals[0],
2513 Debug( LDAP_DEBUG_SYNC, "nonpresent_callback: UUID %s, dn %s, %sfound\n",
2514 a ? a->a_vals[0].bv_val : "<missing>", rs->sr_entry->e_name.bv_val, present_uuid ? "" : "not " );
2516 if ( a == NULL ) return 0;
2519 if ( present_uuid == NULL ) {
2520 np_entry = (struct nonpresent_entry *)
2521 ch_calloc( 1, sizeof( struct nonpresent_entry ));
2522 np_entry->npe_name = ber_dupbv( NULL, &rs->sr_entry->e_name );
2523 np_entry->npe_nname = ber_dupbv( NULL, &rs->sr_entry->e_nname );
2524 LDAP_LIST_INSERT_HEAD( &si->si_nonpresentlist, np_entry, npe_link );
2527 avl_delete( &si->si_presentlist,
2528 &a->a_nvals[0], syncuuid_cmp );
2529 ch_free( present_uuid->bv_val );
2530 ch_free( present_uuid );
2533 return LDAP_SUCCESS;
2541 if ( rs->sr_err != LDAP_SUCCESS &&
2542 rs->sr_err != LDAP_REFERRAL &&
2543 rs->sr_err != LDAP_ALREADY_EXISTS &&
2544 rs->sr_err != LDAP_NO_SUCH_OBJECT &&
2545 rs->sr_err != LDAP_NOT_ALLOWED_ON_NONLEAF )
2547 Debug( LDAP_DEBUG_ANY,
2548 "null_callback : error code 0x%x\n",
2551 return LDAP_SUCCESS;
2554 static struct berval *
2555 slap_uuidstr_from_normalized(
2556 struct berval* uuidstr,
2557 struct berval* normalized,
2561 unsigned char nibble;
2564 if ( normalized == NULL ) return NULL;
2565 if ( normalized->bv_len != 16 ) return NULL;
2570 new = (struct berval *)slap_sl_malloc( sizeof(struct berval), ctx );
2571 if ( new == NULL ) {
2578 if ( ( new->bv_val = slap_sl_malloc( new->bv_len + 1, ctx ) ) == NULL ) {
2579 if ( new != uuidstr ) {
2580 slap_sl_free( new, ctx );
2585 for ( i = 0; i < 16; i++ ) {
2586 if ( i == 4 || i == 6 || i == 8 || i == 10 ) {
2587 new->bv_val[(i<<1)+d] = '-';
2591 nibble = (normalized->bv_val[i] >> 4) & 0xF;
2592 if ( nibble < 10 ) {
2593 new->bv_val[(i<<1)+d] = nibble + '0';
2595 new->bv_val[(i<<1)+d] = nibble - 10 + 'a';
2598 nibble = (normalized->bv_val[i]) & 0xF;
2599 if ( nibble < 10 ) {
2600 new->bv_val[(i<<1)+d+1] = nibble + '0';
2602 new->bv_val[(i<<1)+d+1] = nibble - 10 + 'a';
2606 new->bv_val[new->bv_len] = '\0';
2611 syncuuid_cmp( const void* v_uuid1, const void* v_uuid2 )
2613 const struct berval *uuid1 = v_uuid1;
2614 const struct berval *uuid2 = v_uuid2;
2615 int rc = uuid1->bv_len - uuid2->bv_len;
2616 if ( rc ) return rc;
2617 return ( memcmp( uuid1->bv_val, uuid2->bv_val, uuid1->bv_len ) );
2621 avl_ber_bvfree( void *v_bv )
2623 struct berval *bv = (struct berval *)v_bv;
2625 if( v_bv == NULL ) return;
2626 if ( !BER_BVISNULL( bv ) ) {
2627 ch_free( bv->bv_val );
2629 ch_free( (char *) bv );
2633 syncinfo_free( syncinfo_t *sie )
2636 if ( sie->si_conn_setup ) {
2638 ldap_get_option( sie->si_ld, LDAP_OPT_DESC, &s );
2639 connection_client_stop( s );
2640 sie->si_conn_setup = 0;
2642 ldap_unbind_ext( sie->si_ld, NULL, NULL );
2645 /* re-fetch it, in case it was already removed */
2646 sie->si_re = ldap_pvt_runqueue_find( &slapd_rq, do_syncrepl, sie );
2648 if ( ldap_pvt_runqueue_isrunning( &slapd_rq, sie->si_re ) )
2649 ldap_pvt_runqueue_stoptask( &slapd_rq, sie->si_re );
2650 ldap_pvt_runqueue_remove( &slapd_rq, sie->si_re );
2653 ldap_pvt_thread_mutex_destroy( &sie->si_mutex );
2655 bindconf_free( &sie->si_bindconf );
2657 if ( sie->si_filterstr.bv_val ) {
2658 ch_free( sie->si_filterstr.bv_val );
2660 if ( sie->si_base.bv_val ) {
2661 ch_free( sie->si_base.bv_val );
2663 if ( sie->si_attrs ) {
2665 while ( sie->si_attrs[i] != NULL ) {
2666 ch_free( sie->si_attrs[i] );
2669 ch_free( sie->si_attrs );
2671 if ( sie->si_exattrs ) {
2673 while ( sie->si_exattrs[i] != NULL ) {
2674 ch_free( sie->si_exattrs[i] );
2677 ch_free( sie->si_exattrs );
2679 if ( sie->si_anlist ) {
2681 while ( sie->si_anlist[i].an_name.bv_val != NULL ) {
2682 ch_free( sie->si_anlist[i].an_name.bv_val );
2685 ch_free( sie->si_anlist );
2687 if ( sie->si_exanlist ) {
2689 while ( sie->si_exanlist[i].an_name.bv_val != NULL ) {
2690 ch_free( sie->si_exanlist[i].an_name.bv_val );
2693 ch_free( sie->si_exanlist );
2695 if ( sie->si_retryinterval ) {
2696 ch_free( sie->si_retryinterval );
2698 if ( sie->si_retrynum ) {
2699 ch_free( sie->si_retrynum );
2701 if ( sie->si_retrynum_init ) {
2702 ch_free( sie->si_retrynum_init );
2704 slap_sync_cookie_free( &sie->si_syncCookie, 0 );
2705 if ( sie->si_presentlist ) {
2706 avl_free( sie->si_presentlist, avl_ber_bvfree );
2708 while ( !LDAP_LIST_EMPTY( &sie->si_nonpresentlist )) {
2709 struct nonpresent_entry* npe;
2710 npe = LDAP_LIST_FIRST( &sie->si_nonpresentlist );
2711 LDAP_LIST_REMOVE( npe, npe_link );
2712 if ( npe->npe_name ) {
2713 if ( npe->npe_name->bv_val ) {
2714 ch_free( npe->npe_name->bv_val );
2716 ch_free( npe->npe_name );
2718 if ( npe->npe_nname ) {
2719 if ( npe->npe_nname->bv_val ) {
2720 ch_free( npe->npe_nname->bv_val );
2722 ch_free( npe->npe_nname );
2731 /* NOTE: used & documented in slapd.conf(5) */
2733 #define PROVIDERSTR "provider"
2734 #define SCHEMASTR "schemachecking"
2735 #define FILTERSTR "filter"
2736 #define SEARCHBASESTR "searchbase"
2737 #define SCOPESTR "scope"
2738 #define ATTRSONLYSTR "attrsonly"
2739 #define ATTRSSTR "attrs"
2740 #define TYPESTR "type"
2741 #define INTERVALSTR "interval"
2742 #define RETRYSTR "retry"
2743 #define SLIMITSTR "sizelimit"
2744 #define TLIMITSTR "timelimit"
2745 #define SYNCDATASTR "syncdata"
2747 /* FIXME: undocumented */
2748 #define LOGBASESTR "logbase"
2749 #define LOGFILTERSTR "logfilter"
2750 #define OLDAUTHCSTR "bindprincipal"
2751 #define EXATTRSSTR "exattrs"
2752 #define MANAGEDSAITSTR "manageDSAit"
2755 #define LASTMODSTR "lastmod"
2756 #define LMGENSTR "gen"
2757 #define LMNOSTR "no"
2758 #define LMREQSTR "req"
2759 #define SRVTABSTR "srvtab"
2760 #define SUFFIXSTR "suffix"
2763 #define GOT_ID 0x0001
2764 #define GOT_PROVIDER 0x0002
2765 #define GOT_BASE 0x0004
2768 #define GOT_ALL (GOT_ID|GOT_PROVIDER|GOT_BASE)
2774 { BER_BVC("base"), LDAP_SCOPE_BASE },
2775 { BER_BVC("one"), LDAP_SCOPE_ONELEVEL },
2776 { BER_BVC("onelevel"), LDAP_SCOPE_ONELEVEL }, /* OpenLDAP extension */
2777 { BER_BVC("children"), LDAP_SCOPE_SUBORDINATE },
2778 { BER_BVC("subord"), LDAP_SCOPE_SUBORDINATE },
2779 { BER_BVC("subordinate"), LDAP_SCOPE_SUBORDINATE },
2780 { BER_BVC("sub"), LDAP_SCOPE_SUBTREE },
2781 { BER_BVC("subtree"), LDAP_SCOPE_SUBTREE }, /* OpenLDAP extension */
2785 static slap_verbmasks datamodes[] = {
2786 { BER_BVC("default"), SYNCDATA_DEFAULT },
2787 { BER_BVC("accesslog"), SYNCDATA_ACCESSLOG },
2788 { BER_BVC("changelog"), SYNCDATA_CHANGELOG },
2793 parse_syncrepl_line(
2801 for ( i = 1; i < c->argc; i++ ) {
2802 if ( !strncasecmp( c->argv[ i ], IDSTR "=",
2803 STRLENOF( IDSTR "=" ) ) )
2806 /* '\0' string terminator accounts for '=' */
2807 val = c->argv[ i ] + STRLENOF( IDSTR "=" );
2808 if ( lutil_atoi( &tmp, val ) != 0 ) {
2809 snprintf( c->msg, sizeof( c->msg ),
2810 "Error: parse_syncrepl_line: "
2811 "unable to parse syncrepl id \"%s\"", val );
2812 Debug( LDAP_DEBUG_ANY, "%s: %s.\n", c->log, c->msg, 0 );
2815 if ( tmp >= 1000 || tmp < 0 ) {
2816 snprintf( c->msg, sizeof( c->msg ),
2817 "Error: parse_syncrepl_line: "
2818 "syncrepl id %d is out of range [0..999]", tmp );
2819 Debug( LDAP_DEBUG_ANY, "%s: %s.\n", c->log, c->msg, 0 );
2824 } else if ( !strncasecmp( c->argv[ i ], PROVIDERSTR "=",
2825 STRLENOF( PROVIDERSTR "=" ) ) )
2827 val = c->argv[ i ] + STRLENOF( PROVIDERSTR "=" );
2828 ber_str2bv( val, 0, 1, &si->si_bindconf.sb_uri );
2829 gots |= GOT_PROVIDER;
2830 } else if ( !strncasecmp( c->argv[ i ], SCHEMASTR "=",
2831 STRLENOF( SCHEMASTR "=" ) ) )
2833 val = c->argv[ i ] + STRLENOF( SCHEMASTR "=" );
2834 if ( !strncasecmp( val, "on", STRLENOF( "on" ) )) {
2835 si->si_schemachecking = 1;
2836 } else if ( !strncasecmp( val, "off", STRLENOF( "off" ) ) ) {
2837 si->si_schemachecking = 0;
2839 si->si_schemachecking = 1;
2841 } else if ( !strncasecmp( c->argv[ i ], FILTERSTR "=",
2842 STRLENOF( FILTERSTR "=" ) ) )
2844 val = c->argv[ i ] + STRLENOF( FILTERSTR "=" );
2845 if ( si->si_filterstr.bv_val )
2846 ch_free( si->si_filterstr.bv_val );
2847 ber_str2bv( val, 0, 1, &si->si_filterstr );
2848 } else if ( !strncasecmp( c->argv[ i ], LOGFILTERSTR "=",
2849 STRLENOF( LOGFILTERSTR "=" ) ) )
2851 val = c->argv[ i ] + STRLENOF( LOGFILTERSTR "=" );
2852 if ( si->si_logfilterstr.bv_val )
2853 ch_free( si->si_logfilterstr.bv_val );
2854 ber_str2bv( val, 0, 1, &si->si_logfilterstr );
2855 } else if ( !strncasecmp( c->argv[ i ], SEARCHBASESTR "=",
2856 STRLENOF( SEARCHBASESTR "=" ) ) )
2861 val = c->argv[ i ] + STRLENOF( SEARCHBASESTR "=" );
2862 if ( si->si_base.bv_val ) {
2863 ch_free( si->si_base.bv_val );
2865 ber_str2bv( val, 0, 0, &bv );
2866 rc = dnNormalize( 0, NULL, NULL, &bv, &si->si_base, NULL );
2867 if ( rc != LDAP_SUCCESS ) {
2868 snprintf( c->msg, sizeof( c->msg ),
2869 "Invalid base DN \"%s\": %d (%s)",
2870 val, rc, ldap_err2string( rc ) );
2871 Debug( LDAP_DEBUG_ANY, "%s: %s.\n", c->log, c->msg, 0 );
2875 } else if ( !strncasecmp( c->argv[ i ], LOGBASESTR "=",
2876 STRLENOF( LOGBASESTR "=" ) ) )
2881 val = c->argv[ i ] + STRLENOF( LOGBASESTR "=" );
2882 if ( si->si_logbase.bv_val ) {
2883 ch_free( si->si_logbase.bv_val );
2885 ber_str2bv( val, 0, 0, &bv );
2886 rc = dnNormalize( 0, NULL, NULL, &bv, &si->si_logbase, NULL );
2887 if ( rc != LDAP_SUCCESS ) {
2888 snprintf( c->msg, sizeof( c->msg ),
2889 "Invalid logbase DN \"%s\": %d (%s)",
2890 val, rc, ldap_err2string( rc ) );
2891 Debug( LDAP_DEBUG_ANY, "%s: %s.\n", c->log, c->msg, 0 );
2894 } else if ( !strncasecmp( c->argv[ i ], SCOPESTR "=",
2895 STRLENOF( SCOPESTR "=" ) ) )
2898 val = c->argv[ i ] + STRLENOF( SCOPESTR "=" );
2899 for ( j=0; !BER_BVISNULL(&scopes[j].key); j++ ) {
2900 if (!strcasecmp( val, scopes[j].key.bv_val )) {
2901 si->si_scope = scopes[j].val;
2905 if ( BER_BVISNULL(&scopes[j].key) ) {
2906 snprintf( c->msg, sizeof( c->msg ),
2907 "Error: parse_syncrepl_line: "
2908 "unknown scope \"%s\"", val);
2909 Debug( LDAP_DEBUG_ANY, "%s: %s.\n", c->log, c->msg, 0 );
2912 } else if ( !strncasecmp( c->argv[ i ], ATTRSONLYSTR,
2913 STRLENOF( ATTRSONLYSTR ) ) )
2915 si->si_attrsonly = 1;
2916 } else if ( !strncasecmp( c->argv[ i ], ATTRSSTR "=",
2917 STRLENOF( ATTRSSTR "=" ) ) )
2919 val = c->argv[ i ] + STRLENOF( ATTRSSTR "=" );
2920 if ( !strncasecmp( val, ":include:", STRLENOF(":include:") ) ) {
2922 attr_fname = ch_strdup( val + STRLENOF(":include:") );
2923 si->si_anlist = file2anlist( si->si_anlist, attr_fname, " ,\t" );
2924 if ( si->si_anlist == NULL ) {
2925 ch_free( attr_fname );
2928 si->si_anfile = attr_fname;
2930 char *str, *s, *next;
2931 char delimstr[] = " ,\t";
2932 str = ch_strdup( val );
2933 for ( s = ldap_pvt_strtok( str, delimstr, &next );
2935 s = ldap_pvt_strtok( NULL, delimstr, &next ) )
2937 if ( strlen(s) == 1 && *s == '*' ) {
2938 si->si_allattrs = 1;
2939 *(val + ( s - str )) = delimstr[0];
2941 if ( strlen(s) == 1 && *s == '+' ) {
2942 si->si_allopattrs = 1;
2943 *(val + ( s - str )) = delimstr[0];
2947 si->si_anlist = str2anlist( si->si_anlist, val, " ,\t" );
2948 if ( si->si_anlist == NULL ) {
2952 } else if ( !strncasecmp( c->argv[ i ], EXATTRSSTR "=",
2953 STRLENOF( EXATTRSSTR "=" ) ) )
2955 val = c->argv[ i ] + STRLENOF( EXATTRSSTR "=" );
2956 if ( !strncasecmp( val, ":include:", STRLENOF(":include:") )) {
2958 attr_fname = ch_strdup( val + STRLENOF(":include:") );
2959 si->si_exanlist = file2anlist(
2960 si->si_exanlist, attr_fname, " ,\t" );
2961 if ( si->si_exanlist == NULL ) {
2962 ch_free( attr_fname );
2965 ch_free( attr_fname );
2967 si->si_exanlist = str2anlist( si->si_exanlist, val, " ,\t" );
2968 if ( si->si_exanlist == NULL ) {
2972 } else if ( !strncasecmp( c->argv[ i ], TYPESTR "=",
2973 STRLENOF( TYPESTR "=" ) ) )
2975 val = c->argv[ i ] + STRLENOF( TYPESTR "=" );
2976 if ( !strncasecmp( val, "refreshOnly",
2977 STRLENOF("refreshOnly") ) )
2979 si->si_type = si->si_ctype = LDAP_SYNC_REFRESH_ONLY;
2980 } else if ( !strncasecmp( val, "refreshAndPersist",
2981 STRLENOF("refreshAndPersist") ) )
2983 si->si_type = si->si_ctype = LDAP_SYNC_REFRESH_AND_PERSIST;
2984 si->si_interval = 60;
2986 snprintf( c->msg, sizeof( c->msg ),
2987 "Error: parse_syncrepl_line: "
2988 "unknown sync type \"%s\"", val);
2989 Debug( LDAP_DEBUG_ANY, "%s: %s.\n", c->log, c->msg, 0 );
2992 } else if ( !strncasecmp( c->argv[ i ], INTERVALSTR "=",
2993 STRLENOF( INTERVALSTR "=" ) ) )
2995 val = c->argv[ i ] + STRLENOF( INTERVALSTR "=" );
2996 if ( si->si_type == LDAP_SYNC_REFRESH_AND_PERSIST ) {
2997 si->si_interval = 0;
2998 } else if ( strchr( val, ':' ) != NULL ) {
2999 char *next, *ptr = val;
3000 unsigned dd, hh, mm, ss;
3002 /* NOTE: the test for ptr[ 0 ] == '-'
3003 * should go before the call to strtoul() */
3004 dd = strtoul( ptr, &next, 10 );
3005 if ( ptr[ 0 ] == '-' || next == ptr || next[0] != ':' ) {
3006 snprintf( c->msg, sizeof( c->msg ),
3007 "Error: parse_syncrepl_line: "
3008 "invalid interval \"%s\", unable to parse days", val );
3009 Debug( LDAP_DEBUG_ANY, "%s: %s.\n", c->log, c->msg, 0 );
3013 hh = strtoul( ptr, &next, 10 );
3014 if ( ptr[ 0 ] == '-' || next == ptr || next[0] != ':' || hh > 24 ) {
3015 snprintf( c->msg, sizeof( c->msg ),
3016 "Error: parse_syncrepl_line: "
3017 "invalid interval \"%s\", unable to parse hours", val );
3018 Debug( LDAP_DEBUG_ANY, "%s: %s.\n", c->log, c->msg, 0 );
3022 mm = strtoul( ptr, &next, 10 );
3023 if ( ptr[ 0 ] == '-' || next == ptr || next[0] != ':' || mm > 60 ) {
3024 snprintf( c->msg, sizeof( c->msg ),
3025 "Error: parse_syncrepl_line: "
3026 "invalid interval \"%s\", unable to parse minutes", val );
3027 Debug( LDAP_DEBUG_ANY, "%s: %s.\n", c->log, c->msg, 0 );
3031 ss = strtoul( ptr, &next, 10 );
3032 if ( ptr[ 0 ] == '-' || next == ptr || next[0] != '\0' || ss > 60 ) {
3033 snprintf( c->msg, sizeof( c->msg ),
3034 "Error: parse_syncrepl_line: "
3035 "invalid interval \"%s\", unable to parse seconds", val );
3036 Debug( LDAP_DEBUG_ANY, "%s: %s.\n", c->log, c->msg, 0 );
3039 si->si_interval = (( dd * 24 + hh ) * 60 + mm ) * 60 + ss;
3043 if ( lutil_parse_time( val, &t ) != 0 ) {
3044 snprintf( c->msg, sizeof( c->msg ),
3045 "Error: parse_syncrepl_line: "
3046 "invalid interval \"%s\"", val );
3047 Debug( LDAP_DEBUG_ANY, "%s: %s.\n", c->log, c->msg, 0 );
3050 si->si_interval = (time_t)t;
3052 if ( si->si_interval < 0 ) {
3053 snprintf( c->msg, sizeof( c->msg ),
3054 "Error: parse_syncrepl_line: "
3055 "invalid interval \"%ld\"",
3056 (long) si->si_interval);
3057 Debug( LDAP_DEBUG_ANY, "%s: %s.\n", c->log, c->msg, 0 );
3060 } else if ( !strncasecmp( c->argv[ i ], RETRYSTR "=",
3061 STRLENOF( RETRYSTR "=" ) ) )
3066 val = c->argv[ i ] + STRLENOF( RETRYSTR "=" );
3067 retry_list = (char **) ch_calloc( 1, sizeof( char * ));
3068 retry_list[0] = NULL;
3070 slap_str2clist( &retry_list, val, " ,\t" );
3072 for ( k = 0; retry_list && retry_list[k]; k++ ) ;
3075 snprintf( c->msg, sizeof( c->msg ),
3076 "Error: incomplete syncrepl retry list" );
3077 Debug( LDAP_DEBUG_ANY, "%s: %s.\n", c->log, c->msg, 0 );
3078 for ( k = 0; retry_list && retry_list[k]; k++ ) {
3079 ch_free( retry_list[k] );
3081 ch_free( retry_list );
3084 si->si_retryinterval = (time_t *) ch_calloc( n + 1, sizeof( time_t ));
3085 si->si_retrynum = (int *) ch_calloc( n + 1, sizeof( int ));
3086 si->si_retrynum_init = (int *) ch_calloc( n + 1, sizeof( int ));
3087 for ( j = 0; j < n; j++ ) {
3089 if ( lutil_atoul( &t, retry_list[j*2] ) != 0 ) {
3090 snprintf( c->msg, sizeof( c->msg ),
3091 "Error: invalid retry interval \"%s\" (#%d)",
3092 retry_list[j*2], j );
3093 Debug( LDAP_DEBUG_ANY, "%s: %s.\n", c->log, c->msg, 0 );
3094 /* do some cleanup */
3097 si->si_retryinterval[j] = (time_t)t;
3098 if ( *retry_list[j*2+1] == '+' ) {
3099 si->si_retrynum_init[j] = RETRYNUM_FOREVER;
3100 si->si_retrynum[j] = RETRYNUM_FOREVER;
3104 if ( lutil_atoi( &si->si_retrynum_init[j], retry_list[j*2+1] ) != 0
3105 || si->si_retrynum_init[j] <= 0 )
3107 snprintf( c->msg, sizeof( c->msg ),
3108 "Error: invalid initial retry number \"%s\" (#%d)",
3109 retry_list[j*2+1], j );
3110 Debug( LDAP_DEBUG_ANY, "%s: %s.\n", c->log, c->msg, 0 );
3111 /* do some cleanup */
3114 if ( lutil_atoi( &si->si_retrynum[j], retry_list[j*2+1] ) != 0
3115 || si->si_retrynum[j] <= 0 )
3117 snprintf( c->msg, sizeof( c->msg ),
3118 "Error: invalid retry number \"%s\" (#%d)",
3119 retry_list[j*2+1], j );
3120 Debug( LDAP_DEBUG_ANY, "%s: %s.\n", c->log, c->msg, 0 );
3121 /* do some cleanup */
3126 si->si_retrynum_init[j] = RETRYNUM_TAIL;
3127 si->si_retrynum[j] = RETRYNUM_TAIL;
3128 si->si_retryinterval[j] = 0;
3130 for ( k = 0; retry_list && retry_list[k]; k++ ) {
3131 ch_free( retry_list[k] );
3133 ch_free( retry_list );
3134 } else if ( !strncasecmp( c->argv[ i ], MANAGEDSAITSTR "=",
3135 STRLENOF( MANAGEDSAITSTR "=" ) ) )
3137 val = c->argv[ i ] + STRLENOF( MANAGEDSAITSTR "=" );
3138 if ( lutil_atoi( &si->si_manageDSAit, val ) != 0
3139 || si->si_manageDSAit < 0 || si->si_manageDSAit > 1 )
3141 snprintf( c->msg, sizeof( c->msg ),
3142 "invalid manageDSAit value \"%s\".\n",
3144 Debug( LDAP_DEBUG_ANY, "%s: %s.\n", c->log, c->msg, 0 );
3147 } else if ( !strncasecmp( c->argv[ i ], SLIMITSTR "=",
3148 STRLENOF( SLIMITSTR "=") ) )
3150 val = c->argv[ i ] + STRLENOF( SLIMITSTR "=" );
3151 if ( strcasecmp( val, "unlimited" ) == 0 ) {
3154 } else if ( lutil_atoi( &si->si_slimit, val ) != 0 || si->si_slimit < 0 ) {
3155 snprintf( c->msg, sizeof( c->msg ),
3156 "invalid size limit value \"%s\".\n",
3158 Debug( LDAP_DEBUG_ANY, "%s: %s.\n", c->log, c->msg, 0 );
3161 } else if ( !strncasecmp( c->argv[ i ], TLIMITSTR "=",
3162 STRLENOF( TLIMITSTR "=" ) ) )
3164 val = c->argv[ i ] + STRLENOF( TLIMITSTR "=" );
3165 if ( strcasecmp( val, "unlimited" ) == 0 ) {
3168 } else if ( lutil_atoi( &si->si_tlimit, val ) != 0 || si->si_tlimit < 0 ) {
3169 snprintf( c->msg, sizeof( c->msg ),
3170 "invalid time limit value \"%s\".\n",
3172 Debug( LDAP_DEBUG_ANY, "%s: %s.\n", c->log, c->msg, 0 );
3175 } else if ( !strncasecmp( c->argv[ i ], SYNCDATASTR "=",
3176 STRLENOF( SYNCDATASTR "=" ) ) )
3178 val = c->argv[ i ] + STRLENOF( SYNCDATASTR "=" );
3179 si->si_syncdata = verb_to_mask( val, datamodes );
3180 } else if ( bindconf_parse( c->argv[i], &si->si_bindconf ) ) {
3181 snprintf( c->msg, sizeof( c->msg ),
3182 "Error: parse_syncrepl_line: "
3183 "unknown keyword \"%s\"\n", c->argv[ i ] );
3184 Debug( LDAP_DEBUG_ANY, "%s: %s.\n", c->log, c->msg, 0 );
3189 if ( gots != GOT_ALL ) {
3190 snprintf( c->msg, sizeof( c->msg ),
3191 "Error: Malformed \"syncrepl\" line in slapd config file, missing%s%s%s",
3192 gots & GOT_ID ? "" : " "IDSTR,
3193 gots & GOT_PROVIDER ? "" : " "PROVIDERSTR,
3194 gots & GOT_BASE ? "" : " "SEARCHBASESTR );
3195 Debug( LDAP_DEBUG_ANY, "%s: %s.\n", c->log, c->msg, 0 );
3209 if ( !( c->be->be_search && c->be->be_add && c->be->be_modify && c->be->be_delete ) ) {
3210 Debug( LDAP_DEBUG_ANY, "%s: database %s does not support operations "
3211 "required for syncrepl\n", c->log, c->be->be_type, 0 );
3214 si = (syncinfo_t *) ch_calloc( 1, sizeof( syncinfo_t ) );
3217 Debug( LDAP_DEBUG_ANY, "out of memory in add_syncrepl\n", 0, 0, 0 );
3221 si->si_bindconf.sb_tls = SB_TLS_OFF;
3222 si->si_bindconf.sb_method = LDAP_AUTH_SIMPLE;
3223 si->si_schemachecking = 0;
3224 ber_str2bv( "(objectclass=*)", STRLENOF("(objectclass=*)"), 1,
3225 &si->si_filterstr );
3226 si->si_base.bv_val = NULL;
3227 si->si_scope = LDAP_SCOPE_SUBTREE;
3228 si->si_attrsonly = 0;
3229 si->si_anlist = (AttributeName *) ch_calloc( 1, sizeof( AttributeName ));
3230 si->si_exanlist = (AttributeName *) ch_calloc( 1, sizeof( AttributeName ));
3231 si->si_attrs = NULL;
3232 si->si_allattrs = 0;
3233 si->si_allopattrs = 0;
3234 si->si_exattrs = NULL;
3235 si->si_type = si->si_ctype = LDAP_SYNC_REFRESH_ONLY;
3236 si->si_interval = 86400;
3237 si->si_retryinterval = NULL;
3238 si->si_retrynum_init = NULL;
3239 si->si_retrynum = NULL;
3240 si->si_manageDSAit = 0;
3243 si->si_conn_setup = 0;
3245 si->si_presentlist = NULL;
3246 LDAP_LIST_INIT( &si->si_nonpresentlist );
3247 ldap_pvt_thread_mutex_init( &si->si_mutex );
3249 rc = parse_syncrepl_line( c, si );
3253 init_syncrepl( si );
3254 si->si_re = ldap_pvt_runqueue_insert( &slapd_rq, si->si_interval,
3255 do_syncrepl, si, "do_syncrepl", c->be->be_suffix[0].bv_val );
3260 Debug( LDAP_DEBUG_ANY, "failed to add syncinfo\n", 0, 0, 0 );
3261 syncinfo_free( si );
3264 Debug( LDAP_DEBUG_CONFIG,
3265 "Config: ** successfully added syncrepl \"%s\"\n",
3266 BER_BVISNULL( &si->si_bindconf.sb_uri ) ?
3267 "(null)" : si->si_bindconf.sb_uri.bv_val, 0, 0 );
3268 if ( !si->si_schemachecking ) {
3269 SLAP_DBFLAGS(c->be) |= SLAP_DBFLAG_NO_SCHEMA_CHECK;
3271 c->be->be_syncinfo = si;
3277 syncrepl_unparse( syncinfo_t *si, struct berval *bv )
3279 struct berval bc, uri;
3280 char buf[BUFSIZ*2], *ptr;
3283 #define WHATSLEFT ( sizeof( buf ) - ( ptr - buf ) )
3287 /* temporarily inhibit bindconf from printing URI */
3288 uri = si->si_bindconf.sb_uri;
3289 BER_BVZERO( &si->si_bindconf.sb_uri );
3290 bindconf_unparse( &si->si_bindconf, &bc );
3291 si->si_bindconf.sb_uri = uri;
3294 ptr += snprintf( ptr, WHATSLEFT, IDSTR "=%03ld " PROVIDERSTR "=%s",
3295 si->si_rid, si->si_bindconf.sb_uri.bv_val );
3296 if ( ptr - buf >= sizeof( buf ) ) return;
3297 if ( !BER_BVISNULL( &bc )) {
3298 if ( WHATSLEFT <= bc.bv_len ) {
3302 ptr = lutil_strcopy( ptr, bc.bv_val );
3305 if ( !BER_BVISEMPTY( &si->si_filterstr )) {
3306 if ( WHATSLEFT <= STRLENOF( " " FILTERSTR "=\"" "\"" ) + si->si_filterstr.bv_len ) return;
3307 ptr = lutil_strcopy( ptr, " " FILTERSTR "=\"" );
3308 ptr = lutil_strcopy( ptr, si->si_filterstr.bv_val );
3311 if ( !BER_BVISNULL( &si->si_base )) {
3312 if ( WHATSLEFT <= STRLENOF( " " SEARCHBASESTR "=\"" "\"" ) + si->si_base.bv_len ) return;
3313 ptr = lutil_strcopy( ptr, " " SEARCHBASESTR "=\"" );
3314 ptr = lutil_strcopy( ptr, si->si_base.bv_val );
3317 if ( !BER_BVISEMPTY( &si->si_logfilterstr )) {
3318 if ( WHATSLEFT <= STRLENOF( " " LOGFILTERSTR "=\"" "\"" ) + si->si_logfilterstr.bv_len ) return;
3319 ptr = lutil_strcopy( ptr, " " LOGFILTERSTR "=\"" );
3320 ptr = lutil_strcopy( ptr, si->si_logfilterstr.bv_val );
3323 if ( !BER_BVISNULL( &si->si_logbase )) {
3324 if ( WHATSLEFT <= STRLENOF( " " LOGBASESTR "=\"" "\"" ) + si->si_logbase.bv_len ) return;
3325 ptr = lutil_strcopy( ptr, " " LOGBASESTR "=\"" );
3326 ptr = lutil_strcopy( ptr, si->si_logbase.bv_val );
3329 for (i=0; !BER_BVISNULL(&scopes[i].key);i++) {
3330 if ( si->si_scope == scopes[i].val ) {
3331 if ( WHATSLEFT <= STRLENOF( " " SCOPESTR "=" ) + scopes[i].key.bv_len ) return;
3332 ptr = lutil_strcopy( ptr, " " SCOPESTR "=" );
3333 ptr = lutil_strcopy( ptr, scopes[i].key.bv_val );
3337 if ( si->si_attrsonly ) {
3338 if ( WHATSLEFT <= STRLENOF( " " ATTRSONLYSTR "=\"" "\"" ) ) return;
3339 ptr = lutil_strcopy( ptr, " " ATTRSONLYSTR );
3341 if ( si->si_anfile ) {
3342 if ( WHATSLEFT <= STRLENOF( " " ATTRSSTR "=\":include:" "\"" ) + strlen( si->si_anfile ) ) return;
3343 ptr = lutil_strcopy( ptr, " " ATTRSSTR "=:include:\"" );
3344 ptr = lutil_strcopy( ptr, si->si_anfile );
3346 } else if ( si->si_allattrs || si->si_allopattrs ||
3347 ( si->si_anlist && !BER_BVISNULL(&si->si_anlist[0].an_name) ))
3351 if ( WHATSLEFT <= STRLENOF( " " ATTRSONLYSTR "=\"" "\"" ) ) return;
3352 ptr = lutil_strcopy( ptr, " " ATTRSSTR "=\"" );
3354 /* FIXME: add check for overflow */
3355 ptr = anlist_unparse( si->si_anlist, ptr, WHATSLEFT );
3356 if ( si->si_allattrs ) {
3357 if ( WHATSLEFT <= STRLENOF( ",*\"" ) ) return;
3358 if ( old != ptr ) *ptr++ = ',';
3361 if ( si->si_allopattrs ) {
3362 if ( WHATSLEFT <= STRLENOF( ",+\"" ) ) return;
3363 if ( old != ptr ) *ptr++ = ',';
3368 if ( si->si_exanlist && !BER_BVISNULL(&si->si_exanlist[0].an_name) ) {
3369 if ( WHATSLEFT <= STRLENOF( " " EXATTRSSTR "=" ) ) return;
3370 ptr = lutil_strcopy( ptr, " " EXATTRSSTR "=" );
3371 /* FIXME: add check for overflow */
3372 ptr = anlist_unparse( si->si_exanlist, ptr, WHATSLEFT );
3374 if ( WHATSLEFT <= STRLENOF( " " SCHEMASTR "=" ) + STRLENOF( "off" ) ) return;
3375 ptr = lutil_strcopy( ptr, " " SCHEMASTR "=" );
3376 ptr = lutil_strcopy( ptr, si->si_schemachecking ? "on" : "off" );
3378 if ( WHATSLEFT <= STRLENOF( " " TYPESTR "=" ) + STRLENOF( "refreshAndPersist" ) ) return;
3379 ptr = lutil_strcopy( ptr, " " TYPESTR "=" );
3380 ptr = lutil_strcopy( ptr, si->si_type == LDAP_SYNC_REFRESH_AND_PERSIST ?
3381 "refreshAndPersist" : "refreshOnly" );
3383 if ( si->si_type == LDAP_SYNC_REFRESH_ONLY ) {
3386 dd = si->si_interval;
3393 ptr = lutil_strcopy( ptr, " " INTERVALSTR "=" );
3394 ptr += snprintf( ptr, WHATSLEFT, "%02d:%02d:%02d:%02d", dd, hh, mm, ss );
3395 if ( ptr - buf >= sizeof( buf ) ) return;
3396 } else if ( si->si_retryinterval ) {
3398 if ( WHATSLEFT <= STRLENOF( " " RETRYSTR "=\"" "\"" ) ) return;
3399 ptr = lutil_strcopy( ptr, " " RETRYSTR "=\"" );
3400 for (i=0; si->si_retryinterval[i]; i++) {
3401 if ( space ) *ptr++ = ' ';
3403 ptr += snprintf( ptr, WHATSLEFT, "%ld ", (long) si->si_retryinterval[i] );
3404 if ( si->si_retrynum_init[i] == RETRYNUM_FOREVER )
3407 ptr += snprintf( ptr, WHATSLEFT, "%d", si->si_retrynum_init[i] );
3409 if ( WHATSLEFT <= STRLENOF( "\"" ) ) return;
3413 if ( si->si_slimit ) {
3414 if ( WHATSLEFT <= STRLENOF( " " SLIMITSTR "=" ) ) return;
3415 ptr = lutil_strcopy( ptr, " " SLIMITSTR "=" );
3416 ptr += snprintf( ptr, WHATSLEFT, "%d", si->si_slimit );
3419 if ( si->si_tlimit ) {
3420 if ( WHATSLEFT <= STRLENOF( " " TLIMITSTR "=" ) ) return;
3421 ptr = lutil_strcopy( ptr, " " TLIMITSTR "=" );
3422 ptr += snprintf( ptr, WHATSLEFT, "%d", si->si_tlimit );
3425 if ( si->si_syncdata ) {
3426 if ( enum_to_verb( datamodes, si->si_syncdata, &bc ) >= 0 ) {
3427 if ( WHATSLEFT <= STRLENOF( " " SYNCDATASTR "=" ) + bc.bv_len ) return;
3428 ptr = lutil_strcopy( ptr, " " SYNCDATASTR "=" );
3429 ptr = lutil_strcopy( ptr, bc.bv_val );
3432 bc.bv_len = ptr - buf;
3434 ber_dupbv( bv, &bc );
3438 syncrepl_config( ConfigArgs *c )
3440 if (c->op == SLAP_CONFIG_EMIT) {
3441 if ( c->be->be_syncinfo ) {
3443 syncrepl_unparse( c->be->be_syncinfo, &bv );
3444 ber_bvarray_add( &c->rvalue_vals, &bv );
3448 } else if ( c->op == LDAP_MOD_DELETE ) {
3449 if ( c->be->be_syncinfo ) {
3450 syncinfo_free( c->be->be_syncinfo );
3451 c->be->be_syncinfo = NULL;
3453 SLAP_DBFLAGS( c->be ) &= ~(SLAP_DBFLAG_SHADOW|SLAP_DBFLAG_SYNC_SHADOW);
3456 if ( SLAP_SHADOW( c->be ) ) {
3457 Debug(LDAP_DEBUG_ANY, "%s: "
3458 "syncrepl: database already shadowed.\n",
3461 } else if ( add_syncrepl( c ) ) {
3464 return config_sync_shadow( c );