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"
39 syncrepl_del_nonpresent( LDAP *, Operation * );
41 /* callback functions */
42 static int cookie_callback( struct slap_op *, struct slap_rep * );
43 static int dn_callback( struct slap_op *, struct slap_rep * );
44 static int nonpresent_callback( struct slap_op *, struct slap_rep * );
45 static int null_callback( struct slap_op *, struct slap_rep * );
46 static int contextcsn_callback( Operation*, SlapReply* );
48 static AttributeDescription **sync_descs;
50 struct runqueue_s syncrepl_rq;
55 sync_descs = ch_malloc( 4 * sizeof( AttributeDescription * ));
56 sync_descs[0] = slap_schema.si_ad_objectClass;
57 sync_descs[1] = slap_schema.si_ad_structuralObjectClass;
58 sync_descs[2] = slap_schema.si_ad_entryCSN;
75 BerElement *sync_ber = NULL;
76 struct berval *sync_bvalp = NULL;
80 struct timeval timeout;
82 /* setup LDAP SYNC control */
83 sync_ber = ber_alloc_t( LBER_USE_DER );
84 ber_set_option( sync_ber, LBER_OPT_BER_MEMCTX, NULL );
86 if ( si->syncCookie ) {
87 ber_printf( sync_ber, "{eO}", abs(si->type), si->syncCookie );
89 ber_printf( sync_ber, "{e}", abs(si->type) );
92 if ( ber_flatten( sync_ber, &sync_bvalp ) == LBER_ERROR ) {
93 ber_free( sync_ber, 1 );
96 ber_free( sync_ber, 1 );
98 ctrls = (LDAPControl**) sl_calloc( 3, sizeof(LDAPControl*), NULL );
100 c[0].ldctl_oid = LDAP_CONTROL_SYNC;
101 c[0].ldctl_value = (*sync_bvalp);
102 c[0].ldctl_iscritical = si->type < 0;
106 c[1].ldctl_oid = LDAP_CONTROL_PROXY_AUTHZ;
107 c[1].ldctl_value.bv_val = si->authzId;
108 c[1].ldctl_value.bv_len = strlen( si->authzId );
109 c[1].ldctl_iscritical = 1;
117 err = ldap_set_option( ld, LDAP_OPT_SERVER_CONTROLS, ctrls );
119 ber_bvfree( sync_bvalp );
122 if ( err != LDAP_OPT_SUCCESS )
123 fprintf( stderr, "Could not set controls : %d\n", err );
125 timeout.tv_sec = si->tlimit > 0 ? si->tlimit : 1;
127 rc = ldap_search_ext( ld, si->base, si->scope, si->filterstr,
128 si->attrs, si->attrsonly, sctrls, cctrls,
129 si->tlimit < 0 ? NULL : &timeout,
130 si->slimit, msgidp );
140 struct re_s* rtask = arg;
141 syncinfo_t *si = ( syncinfo_t * ) rtask->arg;
142 Backend *be = si->be;
144 SlapReply rs = {REP_RESULT};
147 LDAPControl **sctrls = NULL;
148 LDAPControl **rctrls = NULL;
149 LDAPControl *rctrlp = NULL;
150 BerElement *sync_ber = NULL;
151 struct berval *sync_bvalp = NULL;
153 BerElement *ctrl_ber = NULL;
154 BerElement *res_ber = NULL;
157 LDAPMessage *res = NULL;
158 LDAPMessage *msg = NULL;
162 int nresponses, nreferences, nextended, npartial;
163 int nresponses_psearch;
165 int cancel_msgid = -1;
167 struct berval *retdata = NULL;
169 int sync_info_arrived = 0;
173 struct berval syncUUID = { 0, NULL };
174 struct berval syncCookie = { 0, NULL };
175 struct berval syncCookie_req = { 0, NULL };
180 int syncinfo_arrived = 0;
183 AttributeDescription** descs = NULL;
195 struct berval base_bv = { 0, NULL };
196 struct berval pbase = { 0, NULL };
197 struct berval nbase = { 0, NULL };
198 struct berval sub_bv = { 0, NULL };
199 struct berval psubrdn = { 0, NULL };
200 struct berval nsubrdn = { 0, NULL };
201 struct berval psub = { 0, NULL };
202 struct berval nsub = { 0, NULL };
204 Modifications *modlist = NULL;
205 Modifications *ml, *mlnext;
206 char *def_filter_str = NULL;
211 struct timeval *tout_p = NULL;
212 struct timeval tout = { 10, 0 };
215 LDAP_LOG ( OPERATION, DETAIL1, "do_syncrepl\n", 0, 0, 0 );
217 Debug( LDAP_DEBUG_TRACE, "=>do_syncrepl\n", 0, 0, 0 );
223 if ( abs(si->type) != LDAP_SYNC_REFRESH_ONLY &&
224 abs(si->type) != LDAP_SYNC_REFRESH_AND_PERSIST ) {
228 si->sync_mode = LDAP_SYNC_STATE_MODE;
230 /* Init connection to master */
232 rc = ldap_initialize( &ld, si->provideruri );
233 if ( rc != LDAP_SUCCESS ) {
235 LDAP_LOG( OPERATION, ERR, "do_syncrepl: "
236 "ldap_initialize failed (%s)\n",
237 si->provideruri, 0, 0 );
239 Debug( LDAP_DEBUG_ANY, "do_syncrepl: "
240 "ldap_initialize failed (%s)\n",
241 si->provideruri, 0, 0 );
245 op.o_protocol = LDAP_VERSION3;
246 ldap_set_option( ld, LDAP_OPT_PROTOCOL_VERSION, &op.o_protocol );
251 rc = ldap_start_tls_s( ld, NULL, NULL );
252 if( rc != LDAP_SUCCESS ) {
254 LDAP_LOG ( OPERATION, ERR, "do_syncrepl: "
255 "%s: ldap_start_tls failed (%d)\n",
256 si->tls == TLS_CRITICAL ? "Error" : "Warning",
259 Debug( LDAP_DEBUG_ANY,
260 "%s: ldap_start_tls failed (%d)\n",
261 si->tls == TLS_CRITICAL ? "Error" : "Warning",
264 if( si->tls == TLS_CRITICAL )
269 if ( si->bindmethod == LDAP_AUTH_SASL ) {
270 #ifdef HAVE_CYRUS_SASL
273 if ( si->secprops != NULL ) {
274 int err = ldap_set_option( ld,
275 LDAP_OPT_X_SASL_SECPROPS, si->secprops);
277 if( err != LDAP_OPT_SUCCESS ) {
279 LDAP_LOG ( OPERATION, ERR, "do_bind: Error: "
280 "ldap_set_option(%s,SECPROPS,\"%s\") failed!\n",
281 si->provideruri, si->secprops, 0 );
283 Debug( LDAP_DEBUG_ANY, "Error: ldap_set_option "
284 "(%s,SECPROPS,\"%s\") failed!\n",
285 si->provideruri, si->secprops, NULL );
291 defaults = lutil_sasl_defaults( ld,
298 rc = ldap_sasl_interactive_bind_s( ld,
306 /* FIXME : different error behaviors according to
308 2) on err policy : exit, retry, backoff ...
310 if ( rc != LDAP_SUCCESS ) {
312 LDAP_LOG ( OPERATION, ERR, "do_syncrepl: "
313 "ldap_sasl_interactive_bind_s failed (%d)\n",
316 Debug( LDAP_DEBUG_ANY, "do_syncrepl: "
317 "ldap_sasl_interactive_bind_s failed (%d)\n",
322 #else /* HAVE_CYRUS_SASL */
323 fprintf( stderr, "not compiled with SASL support\n" );
327 rc = ldap_bind_s( ld, si->binddn, si->passwd, si->bindmethod );
328 if ( rc != LDAP_SUCCESS ) {
330 LDAP_LOG ( OPERATION, ERR, "do_syncrepl: "
331 "ldap_bind_s failed (%d)\n", rc, 0, 0 );
333 Debug( LDAP_DEBUG_ANY, "do_syncrepl: "
334 "ldap_bind_s failed (%d)\n", rc, 0, 0 );
340 /* set thread context in syncinfo */
343 /* set memory context */
344 #define SLAB_SIZE 1048576
346 memctx = sl_mem_create( memsiz, ctx );
347 op.o_tmpmemctx = memctx;
348 op.o_tmpmfuncs = &sl_mfuncs;
351 op.o_tag = LDAP_REQ_SEARCH;
352 op.o_dn = si->updatedn;
353 op.o_ndn = si->updatedn;
355 op.o_time = slap_get_time();
356 op.o_managedsait = 1;
357 op.o_threadctx = si->ctx;
360 op.o_connid = op.o_conn->c_connid;
361 op.ors_scope = LDAP_SCOPE_BASE;
362 op.ors_deref = LDAP_DEREF_NEVER;
365 op.ors_attrsonly = 0;
367 op.ors_filter = str2filter_x( &op, def_filter_str = "(objectClass=*)" );
368 ber_str2bv( def_filter_str, 0, 0, &op.ors_filterstr );
371 conn.c_send_ldap_result = slap_send_ldap_result;
372 conn.c_send_search_entry = slap_send_search_entry;
373 conn.c_send_search_reference = slap_send_search_reference;
375 /* get syncrepl cookie of shadow replica from subentry */
376 ber_str2bv( si->base, 0, 0, &base_bv );
377 dnPrettyNormal( 0, &base_bv, &pbase, &nbase, op.o_tmpmemctx );
379 sprintf( substr, "cn=syncrepl%d", si->id );
380 ber_str2bv( substr, 0, 0, &sub_bv );
381 dnPrettyNormal( 0, &sub_bv, &psubrdn, &nsubrdn, op.o_tmpmemctx );
383 build_new_dn( &op.o_req_dn, &pbase, &psubrdn, op.o_tmpmemctx );
384 build_new_dn( &op.o_req_ndn, &nbase, &nsubrdn, op.o_tmpmemctx );
386 /* set callback function */
387 cb.sc_response = cookie_callback;
390 /* search subentry to retrieve cookie */
391 si->syncCookie = NULL;
392 be->be_search( &op, &rs );
394 ber_dupbv( &syncCookie_req, si->syncCookie );
396 psub = be->be_nsuffix[0];
398 for ( n = 0; si->attrs[ n ] != NULL; n++ ) ;
401 /* Delete Attributes */
403 for ( i = 0; descs[i] != NULL; i++ ) {
404 for ( j = 0; si->attrs[j] != NULL; j++ ) {
405 if ( !strcmp( si->attrs[j], descs[i]->ad_cname.bv_val )) {
406 ch_free( si->attrs[j] );
407 for ( k = j; si->attrs[k] != NULL; k++ ) {
408 si->attrs[k] = si->attrs[k+1];
413 for ( n = 0; si->attrs[ n ] != NULL; n++ );
414 tmp = ( char ** ) ch_realloc( si->attrs, ( n + 4 ) * sizeof( char * ));
417 LDAP_LOG( OPERATION, ERR, "out of memory\n", 0,0,0 );
419 Debug( LDAP_DEBUG_ANY, "out of memory\n", 0,0,0 );
423 tmp = ( char ** ) ch_realloc( si->attrs, 5 * sizeof( char * ));
426 LDAP_LOG( OPERATION, ERR, "out of memory\n", 0,0,0 );
428 Debug( LDAP_DEBUG_ANY, "out of memory\n", 0,0,0 );
431 tmp[ n++ ] = ch_strdup( "*" );
439 for ( i = 0; descs[ i ] != NULL; i++ ) {
440 si->attrs[ n++ ] = ch_strdup ( descs[i]->ad_cname.bv_val );
441 si->attrs[ n ] = NULL;
444 rc = ldap_sync_search( si, ld, NULL, NULL, &msgid );
445 if( rc != LDAP_SUCCESS ) {
446 fprintf( stderr, "syncrepl: ldap_search_ext: %s (%d)\n",
447 ldap_err2string( rc ), rc );
451 if ( abs(si->type) == LDAP_SYNC_REFRESH_AND_PERSIST ){
457 while (( rc = ldap_result( ld, LDAP_RES_ANY, LDAP_MSG_ONE, tout_p, &res )) >= 0 ) {
460 if ( slapd_abrupt_shutdown ) {
467 for ( msg = ldap_first_message( ld, res );
469 msg = ldap_next_message( ld, msg ) )
471 syncCookie.bv_len = 0; syncCookie.bv_val = NULL;
472 switch( ldap_msgtype( msg ) ) {
473 case LDAP_RES_SEARCH_ENTRY:
474 entry = syncrepl_message_to_entry( si, ld, &op, msg,
475 &modlist, &syncstate, &syncUUID, &syncCookie );
476 rc_efree = syncrepl_entry( si, ld, &op, entry, modlist,
477 syncstate, &syncUUID, &syncCookie, !syncinfo_arrived );
478 if ( syncCookie.bv_len ) {
479 syncrepl_updateCookie( si, ld, &op, &psub, &syncCookie );
483 for ( ml = modlist; ml != NULL; ml = mlnext ) {
484 mlnext = ml->sml_next;
489 case LDAP_RES_SEARCH_REFERENCE:
491 LDAP_LOG( OPERATION, ERR,
492 "do_syncrepl : reference received\n", 0, 0, 0 );
494 Debug( LDAP_DEBUG_ANY,
495 "do_syncrepl : reference received\n", 0, 0, 0 );
499 case LDAP_RES_SEARCH_RESULT:
500 ldap_parse_result( ld, msg, &err, NULL, NULL, NULL, &rctrls, 0 );
503 ctrl_ber = ber_alloc_t( LBER_USE_DER );
504 ber_set_option( ctrl_ber, LBER_OPT_BER_MEMCTX, &op.o_tmpmemctx );
505 ber_write( ctrl_ber, rctrlp->ldctl_value.bv_val, rctrlp->ldctl_value.bv_len, 0 );
506 ber_reset( ctrl_ber, 1 );
508 ber_scanf( ctrl_ber, "{" /*"}"*/);
509 if ( ber_peek_tag( ctrl_ber, &len )
510 == LDAP_SYNC_TAG_COOKIE ) {
511 ber_scanf( ctrl_ber, "o", &syncCookie );
514 value_match( &match, slap_schema.si_ad_entryCSN,
515 slap_schema.si_ad_entryCSN->ad_type->sat_ordering,
516 SLAP_MR_VALUE_OF_ATTRIBUTE_SYNTAX,
517 &syncCookie_req, &syncCookie, &text );
518 if (si->type == LDAP_SYNC_REFRESH_AND_PERSIST) {
519 /* FIXME : different error behaviors according to
520 1) err code : LDAP_BUSY ...
521 2) on err policy : stop service, stop sync, retry
523 if ( syncCookie.bv_len && match < 0) {
524 syncrepl_updateCookie( si, ld, &op, &psub, &syncCookie );
527 ber_free( ctrl_ber, 1 );
530 /* FIXME : different error behaviors according to
531 1) err code : LDAP_BUSY ...
532 2) on err policy : stop service, stop sync, retry
534 if ( syncCookie.bv_len && match < 0 ) {
535 syncrepl_updateCookie( si, ld, &op, &psub, &syncCookie);
537 if ( si->sync_mode == LDAP_SYNC_STATE_MODE && match < 0 ) {
538 syncrepl_del_nonpresent( ld, &op );
541 ber_free( ctrl_ber, 1 );
546 case LDAP_RES_INTERMEDIATE:
547 rc = ldap_parse_intermediate( ld, msg,
548 &retoid, &retdata, NULL, 0 );
549 if ( !rc && !strcmp( retoid, LDAP_SYNC_INFO ) ) {
550 sync_info_arrived = 1;
551 res_ber = ber_init( retdata );
552 ber_scanf( res_ber, "{e" /*"}"*/, &syncstate );
554 if ( ber_peek_tag( res_ber, &len )
555 == LDAP_SYNC_TAG_COOKIE ) {
556 ber_scanf( res_ber, /*"{"*/ "o}", &syncCookie );
558 if ( syncstate == LDAP_SYNC_NEW_COOKIE ) {
560 LDAP_LOG( OPERATION, ERR,
561 "do_syncrepl : cookie required\n", 0, 0, 0 );
563 Debug( LDAP_DEBUG_ANY,
564 "do_syncrepl : cookie required\n", 0, 0, 0 );
569 value_match( &match, slap_schema.si_ad_entryCSN,
570 slap_schema.si_ad_entryCSN->ad_type->sat_ordering,
571 SLAP_MR_VALUE_OF_ATTRIBUTE_SYNTAX,
572 &syncCookie_req, &syncCookie, &text );
574 if ( syncCookie.bv_len && match < 0 ) {
575 syncrepl_updateCookie( si, ld, &op, &psub, &syncCookie);
578 if ( syncstate == LDAP_SYNC_STATE_MODE_DONE ) {
580 syncrepl_del_nonpresent( ld, &op );
582 si->sync_mode = LDAP_SYNC_LOG_MODE;
583 } else if ( syncstate == LDAP_SYNC_LOG_MODE_DONE ) {
584 si->sync_mode = LDAP_SYNC_PERSIST_MODE;
585 } else if ( syncstate == LDAP_SYNC_REFRESH_DONE ) {
586 si->sync_mode = LDAP_SYNC_PERSIST_MODE;
587 } else if ( syncstate != LDAP_SYNC_NEW_COOKIE ||
588 syncstate != LDAP_SYNC_LOG_MODE_DONE ) {
590 LDAP_LOG( OPERATION, ERR,
591 "do_syncrepl : unknown sync info\n", 0, 0, 0 );
593 Debug( LDAP_DEBUG_ANY,
594 "do_syncrepl : unknown sync info\n", 0, 0, 0 );
598 ldap_memfree( retoid );
599 ber_bvfree( retdata );
600 ber_free( res_ber, 1 );
604 LDAP_LOG( OPERATION, ERR,"do_syncrepl :"
605 " unknown intermediate "
606 "response\n", 0, 0, 0 );
608 Debug( LDAP_DEBUG_ANY, "do_syncrepl : "
609 "unknown intermediate response (%d)\n",
612 ldap_memfree( retoid );
613 ber_bvfree( retdata );
619 LDAP_LOG( OPERATION, ERR, "do_syncrepl : "
620 "unknown message\n", 0, 0, 0 );
622 Debug( LDAP_DEBUG_ANY, "do_syncrepl : "
623 "unknown message\n", 0, 0, 0 );
636 ldap_get_option( ld, LDAP_OPT_ERROR_NUMBER, &errno );
637 errstr = ldap_err2string( errno );
640 LDAP_LOG( OPERATION, ERR,
641 "do_syncrepl : %s\n", errstr, 0, 0 );
643 Debug( LDAP_DEBUG_ANY,
644 "do_syncrepl : %s\n", errstr, 0, 0 );
649 if ( syncCookie.bv_val )
650 ch_free( syncCookie.bv_val );
651 if ( syncCookie_req.bv_val )
652 ch_free( syncCookie_req.bv_val );
653 if ( syncUUID.bv_val )
654 ch_free( syncUUID.bv_val );
661 ldap_pvt_thread_mutex_lock( &syncrepl_rq.rq_mutex );
662 ldap_pvt_runqueue_stoptask( &syncrepl_rq, rtask );
663 if ( si->type == LDAP_SYNC_REFRESH_ONLY ) {
664 ldap_pvt_runqueue_resched( &syncrepl_rq, rtask );
666 ldap_pvt_runqueue_remove( &syncrepl_rq, rtask );
668 ldap_pvt_thread_mutex_unlock( &syncrepl_rq.rq_mutex );
674 syncrepl_message_to_entry(
679 Modifications **modlist,
681 struct berval *syncUUID,
682 struct berval *syncCookie
686 BerElement *ber = NULL;
688 struct berval bv = {0, NULL};
691 Modifications **modtail = modlist;
692 Backend *be = op->o_bd;
695 char txtbuf[SLAP_TEXT_BUFLEN];
696 size_t textlen = sizeof txtbuf;
698 struct berval **bvals = NULL;
700 struct berval bdn = {0, NULL};
702 struct berval empty_bv = { 0, NULL };
708 LDAPControl** rctrls = NULL;
709 BerElement* ctrl_ber;
713 Modifications *ml = NULL;
714 AttributeDescription** descs;
719 if ( ldap_msgtype( msg ) != LDAP_RES_SEARCH_ENTRY ) {
721 LDAP_LOG( OPERATION, ERR,
722 "Message type should be entry (%d)", ldap_msgtype( msg ), 0, 0 );
724 Debug( LDAP_DEBUG_ANY,
725 "Message type should be entry (%d)", ldap_msgtype( msg ), 0, 0 );
730 op->o_tag = LDAP_REQ_ADD;
732 rc = ldap_get_dn_ber( ld, msg, &ber, &bdn );
734 if ( rc != LDAP_SUCCESS ) {
736 LDAP_LOG( OPERATION, ERR,
737 "syncrepl_message_to_entry : dn get failed (%d)", rc, 0, 0 );
739 Debug( LDAP_DEBUG_ANY,
740 "syncrepl_message_to_entry : dn get failed (%d)", rc, 0, 0 );
745 e = ( Entry * ) ch_calloc( 1, sizeof( Entry ));
746 dnPrettyNormal( NULL, &bdn, &e->e_name, &e->e_nname, NULL );
750 while ( ber_remaining( ber ) ) {
751 tag = ber_scanf( ber, "{mW}", &tmp.sml_type, &tmp.sml_values );
753 if ( tag == LBER_ERROR ) break;
754 if ( tmp.sml_type.bv_val == NULL ) break;
756 mod = (Modifications *) ch_malloc( sizeof( Modifications ));
758 mod->sml_op = LDAP_MOD_REPLACE;
759 mod->sml_next = NULL;
760 mod->sml_desc = NULL;
761 mod->sml_type = tmp.sml_type;
762 mod->sml_bvalues = tmp.sml_bvalues;
763 mod->sml_nvalues = NULL;
766 modtail = &mod->sml_next;
769 if ( ber_scanf( ber, "}") == LBER_ERROR ) {
771 LDAP_LOG( OPERATION, ERR,
772 "syncrepl_message_to_entry: ber_scanf failed\n", 0, 0, 0 );
774 Debug( LDAP_DEBUG_ANY, "syncrepl_message_to_entry: ber_scanf failed\n",
781 tmpber = ldap_get_message_ber( msg );
782 ber = ber_dup( tmpber );
784 ber_scanf( ber, "{xx" );
786 rc = ldap_int_get_controls( ber, &rctrls );
788 if ( rc != LDAP_SUCCESS ) {
790 LDAP_LOG( OPERATION, ERR,
791 "syncrepl_message_to_entry : control get failed (%d)", rc, 0, 0 );
793 Debug( LDAP_DEBUG_ANY,
794 "syncrepl_message_to_entry : control get failed (%d)", rc, 0, 0 );
801 ctrl_ber = ber_alloc_t( LBER_USE_DER );
802 ber_set_option( ctrl_ber, LBER_OPT_BER_MEMCTX, &op->o_tmpmemctx );
803 ber_write( ctrl_ber, rctrlp->ldctl_value.bv_val, rctrlp->ldctl_value.bv_len, 0 );
804 ber_reset( ctrl_ber, 1 );
805 ber_scanf( ctrl_ber, "{eo", syncstate, syncUUID );
806 if ( ber_peek_tag( ctrl_ber, &len ) == LDAP_SYNC_TAG_COOKIE ) {
807 ber_scanf( ctrl_ber, "o}", syncCookie );
809 ber_free( ctrl_ber, 1 );
812 LDAP_LOG( OPERATION, ERR,"syncrepl_message_to_entry : "
813 " rctrls absent\n", 0, 0, 0 );
815 Debug( LDAP_DEBUG_ANY, "syncrepl_message_to_entry :"
816 " rctrls absent\n", 0, 0, 0 );
820 if ( *syncstate == LDAP_SYNC_PRESENT ) {
823 } else if ( *syncstate == LDAP_SYNC_DELETE ) {
827 if ( *modlist == NULL ) {
829 LDAP_LOG( OPERATION, ERR,
830 "syncrepl_message_to_entry: no attributes\n", 0, 0, 0 );
832 Debug( LDAP_DEBUG_ANY, "syncrepl_message_to_entry: no attributes\n",
838 while ( ml != NULL ) {
839 AttributeDescription *ad = NULL;
840 rc = slap_bv2ad( &ml->sml_type, &ml->sml_desc, &text );
842 if( rc != LDAP_SUCCESS ) {
852 rc = slap_mods_check( *modlist, 1, &text, txtbuf, textlen, NULL );
854 if ( rc != LDAP_SUCCESS ) {
856 LDAP_LOG( OPERATION, ERR,
857 "syncrepl_message_to_entry: mods check (%s)\n", text, 0, 0 );
859 Debug( LDAP_DEBUG_ANY, "syncrepl_message_to_entry: mods check (%s)\n",
865 rc = slap_mods2entry( *modlist, &e, 1, 1, &text, txtbuf, textlen);
866 if( rc != LDAP_SUCCESS ) {
868 LDAP_LOG( OPERATION, ERR,
869 "syncrepl_message_to_entry: mods2entry (%s)\n", text, 0, 0 );
871 Debug( LDAP_DEBUG_ANY, "syncrepl_message_to_entry: mods2entry (%s)\n",
884 syncuuid_cmp( const void* v_uuid1, const void* v_uuid2 )
886 const struct berval *uuid1 = v_uuid1;
887 const struct berval *uuid2 = v_uuid2;
888 int rc = uuid1->bv_len - uuid2->bv_len;
890 return ( strcmp( uuid1->bv_val, uuid2->bv_val ) );
899 Modifications* modlist,
901 struct berval* syncUUID,
902 struct berval* syncCookie,
906 Backend *be = op->o_bd;
908 struct berval csn_bv = {0, NULL};
909 struct berval *syncuuid_bv = NULL;
910 char csnbuf[ LDAP_LUTIL_CSNSTR_BUFSIZE ];
912 SlapReply rs = {REP_RESULT};
913 int rc = LDAP_SUCCESS;
915 struct berval base_bv = {0, NULL};
923 ( syncstate == LDAP_SYNC_PRESENT || syncstate == LDAP_SYNC_ADD )) {
924 syncuuid_bv = ber_dupbv( NULL, syncUUID );
925 avl_insert( &si->presentlist, (caddr_t) syncuuid_bv,
926 syncuuid_cmp, avl_dup_error );
929 if ( syncstate == LDAP_SYNC_PRESENT ) {
936 filterstr = (char *) sl_malloc( strlen("entryUUID=") + syncUUID->bv_len + 1,
938 strcpy( filterstr, "entryUUID=" );
939 strcat( filterstr, syncUUID->bv_val );
942 si->syncUUID = syncUUID;
943 si->syncUUID_ndn = NULL;
945 filter = str2filter( filterstr );
946 ber_str2bv( filterstr, strlen(filterstr), 1, &op->ors_filterstr );
947 ch_free( filterstr );
948 op->ors_filter = filter;
949 op->ors_scope = LDAP_SCOPE_SUBTREE;
951 /* get syncrepl cookie of shadow replica from subentry */
952 ber_str2bv( si->base, strlen(si->base), 1, &base_bv );
953 dnPrettyNormal( 0, &base_bv, &op->o_req_dn, &op->o_req_ndn, op->o_tmpmemctx );
954 ch_free( base_bv.bv_val );
956 /* set callback function */
957 op->o_callback = &cb;
958 cb.sc_response = dn_callback;
961 si->syncUUID_ndn = NULL;
963 rc = be->be_search( op, &rs );
965 ch_free( op->o_req_dn.bv_val );
966 ch_free( op->o_req_ndn.bv_val );
967 filter_free( op->ors_filter );
968 ch_free( op->ors_filterstr.bv_val );
970 cb.sc_response = null_callback;
973 if ( rc == LDAP_SUCCESS && si->syncUUID_ndn && si->sync_mode != LDAP_SYNC_LOG_MODE ) {
974 op->o_req_dn = *si->syncUUID_ndn;
975 op->o_req_ndn = *si->syncUUID_ndn;
976 op->o_tag = LDAP_REQ_DELETE;
977 rc = be->be_delete( op, &rs );
980 if ( si->syncUUID_ndn ) {
981 ber_bvfree( si->syncUUID_ndn );
984 switch ( syncstate ) {
986 case LDAP_SYNC_MODIFY :
988 if ( rc == LDAP_SUCCESS ||
989 rc == LDAP_REFERRAL ||
990 rc == LDAP_NO_SUCH_OBJECT ) {
992 attr_delete( &e->e_attrs, slap_schema.si_ad_entryUUID );
993 attr_merge_normalize_one( e, slap_schema.si_ad_entryUUID, syncUUID, op->o_tmpmemctx );
995 op->o_tag = LDAP_REQ_ADD;
997 op->o_req_dn = e->e_name;
998 op->o_req_ndn = e->e_nname;
999 rc = be->be_add( op, &rs );
1001 if ( rc != LDAP_SUCCESS ) {
1002 if ( rc == LDAP_ALREADY_EXISTS ) {
1003 op->o_tag = LDAP_REQ_MODIFY;
1004 op->orm_modlist = modlist;
1005 op->o_req_dn = e->e_name;
1006 op->o_req_ndn = e->e_nname;
1007 rc = be->be_modify( op, &rs );
1009 if ( rc != LDAP_SUCCESS ) {
1011 LDAP_LOG( OPERATION, ERR,
1012 "syncrepl_entry : be_modify failed (%d)\n",
1015 Debug( LDAP_DEBUG_ANY,
1016 "syncrepl_entry : be_modify failed (%d)\n",
1022 } else if ( rc == LDAP_REFERRAL ||
1023 rc == LDAP_NO_SUCH_OBJECT ) {
1024 syncrepl_add_glue( si, ld, op, e,
1026 syncUUID, syncCookie);
1031 LDAP_LOG( OPERATION, ERR,
1032 "syncrepl_entry : be_add failed (%d)\n",
1035 Debug( LDAP_DEBUG_ANY,
1036 "syncrepl_entry : be_add failed (%d)\n",
1044 be_entry_release_w( op, e );
1049 LDAP_LOG( OPERATION, ERR,
1050 "syncrepl_entry : be_search failed (%d)\n", rc, 0, 0 );
1052 Debug( LDAP_DEBUG_ANY,
1053 "syncrepl_entry : be_search failed (%d)\n", rc, 0, 0 );
1059 case LDAP_SYNC_DELETE :
1060 if ( si->sync_mode == LDAP_SYNC_LOG_MODE ) {
1061 op->o_req_dn = *si->syncUUID_ndn;
1062 op->o_req_ndn = *si->syncUUID_ndn;
1063 op->o_tag = LDAP_REQ_DELETE;
1064 rc = be->be_delete( op, &rs );
1066 /* Already deleted otherwise */
1071 LDAP_LOG( OPERATION, ERR,
1072 "syncrepl_entry : unknown syncstate\n", 0, 0, 0 );
1074 Debug( LDAP_DEBUG_ANY,
1075 "syncrepl_entry : unknown syncstate\n", 0, 0, 0 );
1082 syncrepl_del_nonpresent(
1087 Backend* be = op->o_bd;
1088 syncinfo_t *si = op->o_si;
1090 struct berval base_bv = {0, NULL};
1092 SlapReply rs = {REP_RESULT};
1093 struct berval filterstr_bv = {0, NULL};
1094 struct nonpresent_entry *np_list, *np_prev;
1096 ber_str2bv( si->base, strlen(si->base), 1, &base_bv );
1097 dnPrettyNormal(0, &base_bv, &op->o_req_dn, &op->o_req_ndn, op->o_tmpmemctx );
1098 ch_free( base_bv.bv_val );
1100 filter = str2filter( si->filterstr );
1102 cb.sc_response = nonpresent_callback;
1105 op->o_callback = &cb;
1106 op->o_tag = LDAP_REQ_SEARCH;
1107 op->ors_scope = si->scope;
1108 op->ors_deref = LDAP_DEREF_NEVER;
1111 op->ors_attrsonly = 0;
1112 op->ors_attrs = NULL;
1113 op->ors_filter = filter;
1114 ber_str2bv( si->filterstr, strlen( si->filterstr ), 1, &op->ors_filterstr );
1116 be->be_search( op, &rs );
1118 if ( !LDAP_LIST_EMPTY( &si->nonpresentlist ) ) {
1119 np_list = LDAP_LIST_FIRST( &si->nonpresentlist );
1120 while ( np_list != NULL ) {
1121 LDAP_LIST_REMOVE( np_list, np_link );
1123 np_list = LDAP_LIST_NEXT( np_list, np_link );
1124 op->o_tag = LDAP_REQ_DELETE;
1125 op->o_callback = &cb;
1126 cb.sc_response = null_callback;
1128 op->o_req_dn = *np_prev->dn;
1129 op->o_req_ndn = *np_prev->ndn;
1130 op->o_bd->be_delete( op, &rs );
1131 ber_bvfree( np_prev->dn );
1132 ber_bvfree( np_prev->ndn );
1133 op->o_req_dn.bv_val = NULL;
1134 op->o_req_ndn.bv_val = NULL;
1139 if ( op->o_req_dn.bv_val )
1140 ch_free( op->o_req_dn.bv_val );
1141 if ( op->o_req_ndn.bv_val )
1142 ch_free( op->o_req_ndn.bv_val );
1143 filter_free( op->ors_filter );
1144 ch_free( op->ors_filterstr.bv_val );
1156 Modifications* modlist,
1158 struct berval* syncUUID,
1159 struct berval* syncCookie
1162 Backend *be = op->o_bd;
1163 struct berval uuid_bv = {0, NULL};
1167 char uuidbuf[ LDAP_LUTIL_UUIDSTR_BUFSIZE ];
1170 struct berval dn = {0, NULL};
1171 struct berval pdn = {0, NULL};
1172 struct berval ndn = {0, NULL};
1173 struct berval rdn = {0, NULL};
1175 SlapReply rs = {REP_RESULT};
1176 Connection *conn = op->o_conn;
1179 op->o_tag = LDAP_REQ_ADD;
1180 op->o_callback = &cb;
1181 cb.sc_response = null_callback;
1184 ber_dupbv( &dn, &e->e_nname );
1185 ber_dupbv( &pdn, &e->e_nname );
1188 while ( !be_issuffix ( be, &pdn )) {
1189 dnParent( &dn, &pdn );
1190 dn.bv_val = pdn.bv_val;
1191 dn.bv_len = pdn.bv_len;
1196 for ( i = 0; i <= levels; i++ ) {
1197 glue = (Entry*) ch_calloc( 1, sizeof(Entry) );
1198 ber_dupbv( &dn, &e->e_nname );
1202 for ( k = 0; k < j; k++ ) {
1203 dnParent( &dn, &pdn );
1204 dn.bv_val = pdn.bv_val;
1205 dn.bv_len = pdn.bv_len;
1208 dnPrettyNormal( 0, &dn, &pdn, &ndn, op->o_tmpmemctx );
1209 ber_dupbv( &glue->e_name, &pdn );
1210 ber_dupbv( &glue->e_nname, &ndn );
1212 ch_free( pdn.bv_val );
1213 ch_free( ndn.bv_val );
1215 a = ch_calloc( 1, sizeof( Attribute ));
1216 a->a_desc = slap_schema.si_ad_objectClass;
1218 a->a_vals = ch_calloc( 3, sizeof( struct berval ));
1219 ber_str2bv( "top", strlen("top"), 1, &a->a_vals[0] );
1220 ber_str2bv( "glue", strlen("glue"), 1, &a->a_vals[1] );
1221 a->a_vals[2].bv_len = 0;
1222 a->a_vals[2].bv_val = NULL;
1224 a->a_nvals = ch_calloc( 3, sizeof( struct berval ));
1225 ber_str2bv( "top", strlen("top"), 1, &a->a_nvals[0] );
1226 ber_str2bv( "glue", strlen("glue"), 1, &a->a_nvals[1] );
1227 a->a_nvals[2].bv_len = 0;
1228 a->a_nvals[2].bv_val = NULL;
1230 a->a_next = glue->e_attrs;
1233 a = ch_calloc( 1, sizeof( Attribute ));
1234 a->a_desc = slap_schema.si_ad_structuralObjectClass;
1236 a->a_vals = ch_calloc( 2, sizeof( struct berval ));
1237 ber_str2bv( "glue", strlen("glue"), 1, &a->a_vals[0] );
1238 a->a_vals[1].bv_len = 0;
1239 a->a_vals[1].bv_val = NULL;
1241 a->a_nvals = ch_calloc( 2, sizeof( struct berval ));
1242 ber_str2bv( "glue", strlen("glue"), 1, &a->a_nvals[0] );
1243 a->a_nvals[1].bv_len = 0;
1244 a->a_nvals[1].bv_val = NULL;
1246 a->a_next = glue->e_attrs;
1249 if ( !strcmp( e->e_nname.bv_val, glue->e_nname.bv_val )) {
1250 op->o_req_dn = e->e_name;
1251 op->o_req_ndn = e->e_nname;
1253 rc = be->be_add ( op, &rs );
1254 if ( rc == LDAP_SUCCESS )
1255 be_entry_release_w( op, e );
1260 op->o_req_dn = glue->e_name;
1261 op->o_req_ndn = glue->e_nname;
1263 rc = be->be_add ( op, &rs );
1264 if ( rc == LDAP_SUCCESS ) {
1265 be_entry_release_w( op, glue );
1267 /* incl. ALREADY EXIST */
1277 syncrepl_updateCookie(
1282 struct berval *syncCookie
1285 Backend *be = op->o_bd;
1287 Modifications *mlnext;
1289 Modifications *modlist;
1290 Modifications **modtail = &modlist;
1292 struct berval* ocbva = NULL;
1293 struct berval* cnbva = NULL;
1294 struct berval* ssbva = NULL;
1295 struct berval* scbva = NULL;
1300 char txtbuf[SLAP_TEXT_BUFLEN];
1301 size_t textlen = sizeof txtbuf;
1306 struct berval sub_bv = { 0, NULL };
1307 struct berval psubrdn = { 0, NULL };
1310 SlapReply rs = {REP_RESULT};
1312 ocbva = ( struct berval * ) ch_calloc( 4, sizeof( struct berval ));
1313 cnbva = ( struct berval * ) ch_calloc( 2, sizeof( struct berval ));
1314 ssbva = ( struct berval * ) ch_calloc( 2, sizeof( struct berval ));
1315 scbva = ( struct berval * ) ch_calloc( 2, sizeof( struct berval ));
1317 /* update in memory cookie */
1318 if ( si->syncCookie != NULL ) {
1319 ber_bvfree( si->syncCookie );
1321 si->syncCookie = ber_dupbv( NULL, syncCookie );
1322 ber_str2bv( "top", strlen("top"), 1, &ocbva[0] );
1323 ber_str2bv( "subentry", strlen("subentry"), 1, &ocbva[1] );
1324 ber_str2bv( "syncConsumerSubentry",
1325 strlen("syncConsumerSubentry"), 1, &ocbva[2] );
1326 mod = (Modifications *) ch_calloc( 1, sizeof( Modifications ));
1327 mod->sml_op = LDAP_MOD_REPLACE;
1328 ber_str2bv( "objectClass", strlen("objectClass"), 1, &mod->sml_type );
1329 mod->sml_bvalues = ocbva;
1331 modtail = &mod->sml_next;
1333 sprintf( substr, "syncrepl%d", si->id );
1334 sprintf( rdnstr, "cn=%s", substr );
1335 ber_str2bv( substr, strlen( substr ), 1, &cnbva[0] );
1336 ber_str2bv( rdnstr, strlen( rdnstr ), 1, &psubrdn );
1337 mod = (Modifications *) ch_calloc( 1, sizeof( Modifications ));
1338 mod->sml_op = LDAP_MOD_REPLACE;
1339 ber_str2bv( "cn", strlen("cn"), 1, &mod->sml_type );
1340 mod->sml_bvalues = cnbva;
1342 modtail = &mod->sml_next;
1344 ber_dupbv( &scbva[0], si->syncCookie );
1345 mod = (Modifications *) ch_calloc( 1, sizeof( Modifications ));
1346 mod->sml_op = LDAP_MOD_REPLACE;
1347 ber_str2bv( "syncreplCookie", strlen("syncreplCookie"),
1348 1, &mod->sml_type );
1349 mod->sml_bvalues = scbva;
1351 modtail = &mod->sml_next;
1353 ber_str2bv( "{}", strlen("{}"), 1, &ssbva[0] );
1354 mod = (Modifications *) ch_calloc( 1, sizeof( Modifications ));
1355 mod->sml_op = LDAP_MOD_REPLACE;
1356 ber_str2bv( "subtreeSpecification",
1357 strlen("subtreeSpecification"), 1, &mod->sml_type );
1358 mod->sml_bvalues = ssbva;
1360 modtail = &mod->sml_next;
1362 rc = slap_mods_check( modlist, 1, &text, txtbuf, textlen, NULL );
1364 if ( rc != LDAP_SUCCESS ) {
1366 LDAP_LOG( OPERATION, ERR,
1367 "syncrepl_updateCookie: mods check (%s)\n", text, 0, 0 );
1369 Debug( LDAP_DEBUG_ANY, "syncrepl_updateCookie: mods check (%s)\n",
1374 op->o_tag = LDAP_REQ_ADD;
1375 rc = slap_mods_opattrs( op, modlist, modtail,
1376 &text,txtbuf, textlen );
1378 for ( ml = modlist; ml != NULL; ml = mlnext ) {
1379 mlnext = ml->sml_next;
1380 ml->sml_op = LDAP_MOD_REPLACE;
1383 if( rc != LDAP_SUCCESS ) {
1385 LDAP_LOG( OPERATION, ERR,
1386 "syncrepl_updateCookie: mods opattrs (%s)\n", text, 0, 0 );
1388 Debug( LDAP_DEBUG_ANY, "syncrepl_updateCookie: mods opattrs (%s)\n",
1393 e = ( Entry * ) ch_calloc( 1, sizeof( Entry ));
1395 build_new_dn( &sub_bv, pdn, &psubrdn, NULL );
1396 dnPrettyNormal( NULL, &sub_bv, &e->e_name, &e->e_nname, NULL );
1397 ch_free( sub_bv.bv_val );
1398 ch_free( psubrdn.bv_val );
1402 rc = slap_mods2entry( modlist, &e, 1, 1, &text, txtbuf, textlen );
1404 if( rc != LDAP_SUCCESS ) {
1406 LDAP_LOG( OPERATION, ERR,
1407 "syncrepl_updateCookie: mods2entry (%s)\n", text, 0, 0 );
1409 Debug( LDAP_DEBUG_ANY, "syncrepl_updateCookie: mods2entry (%s)\n",
1414 cb.sc_response = null_callback;
1417 op->o_callback = &cb;
1418 op->o_req_dn = e->e_name;
1419 op->o_req_ndn = e->e_nname;
1421 /* update persistent cookie */
1422 update_cookie_retry:
1423 op->o_tag = LDAP_REQ_MODIFY;
1424 op->orm_modlist = modlist;
1425 rc = be->be_modify( op, &rs );
1427 if ( rc != LDAP_SUCCESS ) {
1428 if ( rc == LDAP_REFERRAL ||
1429 rc == LDAP_NO_SUCH_OBJECT ) {
1430 op->o_tag = LDAP_REQ_ADD;
1432 rc = be->be_add( op, &rs );
1433 if ( rc != LDAP_SUCCESS ) {
1434 if ( rc == LDAP_ALREADY_EXISTS ) {
1435 goto update_cookie_retry;
1436 } else if ( rc == LDAP_REFERRAL ||
1437 rc == LDAP_NO_SUCH_OBJECT ) {
1439 LDAP_LOG( OPERATION, ERR,
1440 "cookie will be non-persistent\n",
1443 Debug( LDAP_DEBUG_ANY,
1444 "cookie will be non-persistent\n",
1449 LDAP_LOG( OPERATION, ERR,
1450 "be_add failed (%d)\n",
1453 Debug( LDAP_DEBUG_ANY,
1454 "be_add failed (%d)\n",
1459 be_entry_release_w( op, e );
1464 LDAP_LOG( OPERATION, ERR,
1465 "be_modify failed (%d)\n", rc, 0, 0 );
1467 Debug( LDAP_DEBUG_ANY,
1468 "be_modify failed (%d)\n", rc, 0, 0 );
1478 for ( ml = modlist; ml != NULL; ml = mlnext ) {
1479 mlnext = ml->sml_next;
1487 avl_ber_bvfree( void *bv )
1492 if ( ((struct berval *)bv)->bv_val != NULL ) {
1493 ber_memfree ( ((struct berval *)bv)->bv_val );
1495 ber_memfree ( (char *) bv );
1504 syncinfo_t *si = op->o_callback->sc_private;
1507 if ( rs->sr_type != REP_SEARCH ) return LDAP_SUCCESS;
1509 a = attr_find( rs->sr_entry->e_attrs, slap_schema.si_ad_syncreplCookie );
1512 si->syncCookie = NULL;
1514 si->syncCookie = ber_dupbv( NULL, &a->a_vals[0] );
1516 return LDAP_SUCCESS;
1525 syncinfo_t *si = op->o_callback->sc_private;
1527 if ( rs->sr_type == REP_SEARCH ) {
1528 if ( si->syncUUID_ndn != NULL ) {
1530 LDAP_LOG( OPERATION, ERR,
1531 "dn_callback : multiple entries match dn\n", 0, 0, 0 );
1533 Debug( LDAP_DEBUG_ANY,
1534 "dn_callback : multiple entries match dn\n", 0, 0, 0 );
1537 if ( rs->sr_entry == NULL ) {
1538 si->syncUUID_ndn = NULL;
1540 si->syncUUID_ndn = ber_dupbv( NULL, &rs->sr_entry->e_nname );
1545 return LDAP_SUCCESS;
1549 nonpresent_callback(
1554 syncinfo_t *si = op->o_callback->sc_private;
1557 struct berval* present_uuid = NULL;
1559 SlapReply rs_cb = {REP_RESULT};
1560 struct nonpresent_entry *np_entry;
1562 if ( rs->sr_type == REP_RESULT ) {
1563 count = avl_free( si->presentlist, avl_ber_bvfree );
1564 si->presentlist = NULL;
1565 return LDAP_SUCCESS;
1566 } else if ( rs->sr_type == REP_SEARCH ) {
1567 a = attr_find( rs->sr_entry->e_attrs, slap_schema.si_ad_entryUUID );
1572 present_uuid = avl_find( si->presentlist, &a->a_vals[0], syncuuid_cmp );
1574 if ( present_uuid == NULL ) {
1575 np_entry = (struct nonpresent_entry *)
1576 ch_calloc( 1, sizeof( struct nonpresent_entry ));
1577 np_entry->dn = ber_dupbv( NULL, &rs->sr_entry->e_name );
1578 np_entry->ndn = ber_dupbv( NULL, &rs->sr_entry->e_nname );
1579 LDAP_LIST_INSERT_HEAD( &si->nonpresentlist, np_entry, np_link );
1581 avl_delete( &si->presentlist,
1582 &a->a_vals[0], syncuuid_cmp );
1584 return LDAP_SUCCESS;
1586 return LDAP_SUCCESS;
1597 syncinfo_t *si = op->o_callback->sc_private;
1599 if ( rs->sr_err != LDAP_SUCCESS &&
1600 rs->sr_err != LDAP_REFERRAL &&
1601 rs->sr_err != LDAP_ALREADY_EXISTS &&
1602 rs->sr_err != LDAP_NO_SUCH_OBJECT ) {
1604 LDAP_LOG( OPERATION, ERR,
1605 "null_callback : error code 0x%x\n",
1608 Debug( LDAP_DEBUG_ANY,
1609 "null_callback : error code 0x%x\n",
1613 return LDAP_SUCCESS;
1618 str2clist( char ***out, char *in, const char *brkstr )
1627 /* find last element in list */
1628 for (i = 0; *out && *out[i]; i++);
1630 /* protect the input string from strtok */
1631 str = ch_strdup( in );
1633 if ( *str == '\0' ) {
1638 /* Count words in string */
1640 for ( s = str; *s; s++ ) {
1641 if ( strchr( brkstr, *s ) != NULL ) {
1646 *out = ch_realloc( *out, ( i + j + 1 ) * sizeof( char * ) );
1648 for ( s = ldap_pvt_strtok( str, brkstr, &lasts );
1650 s = ldap_pvt_strtok( NULL, brkstr, &lasts ) )
1652 *new = ch_strdup( s );