~ttx/openldap/lucid-gssapi-495418

« back to all changes in this revision

Viewing changes to servers/slapd/overlays/syncprov.c

  • Committer: Bazaar Package Importer
  • Author(s): Mathias Gug
  • Date: 2008-07-10 14:45:49 UTC
  • Revision ID: james.westby@ubuntu.com-20080710144549-wck73med0e72gfyo
Tags: upstream-2.4.10
ImportĀ upstreamĀ versionĀ 2.4.10

Show diffs side-by-side

added added

removed removed

Lines of Context:
 
1
/* $OpenLDAP: pkg/ldap/servers/slapd/overlays/syncprov.c,v 1.147.2.29 2008/05/29 22:57:32 quanah Exp $ */
 
2
/* syncprov.c - syncrepl provider */
 
3
/* This work is part of OpenLDAP Software <http://www.openldap.org/>.
 
4
 *
 
5
 * Copyright 2004-2008 The OpenLDAP Foundation.
 
6
 * All rights reserved.
 
7
 *
 
8
 * Redistribution and use in source and binary forms, with or without
 
9
 * modification, are permitted only as authorized by the OpenLDAP
 
10
 * Public License.
 
11
 *
 
12
 * A copy of this license is available in the file LICENSE in the
 
13
 * top-level directory of the distribution or, alternatively, at
 
14
 * <http://www.OpenLDAP.org/license.html>.
 
15
 */
 
16
/* ACKNOWLEDGEMENTS:
 
17
 * This work was initially developed by Howard Chu for inclusion in
 
18
 * OpenLDAP Software.
 
19
 */
 
20
 
 
21
#include "portable.h"
 
22
 
 
23
#ifdef SLAPD_OVER_SYNCPROV
 
24
 
 
25
#include <ac/string.h>
 
26
#include "lutil.h"
 
27
#include "slap.h"
 
28
#include "config.h"
 
29
#include "ldap_rq.h"
 
30
 
 
31
/* A modify request on a particular entry */
 
32
typedef struct modinst {
 
33
        struct modinst *mi_next;
 
34
        Operation *mi_op;
 
35
} modinst;
 
36
 
 
37
typedef struct modtarget {
 
38
        struct modinst *mt_mods;
 
39
        struct modinst *mt_tail;
 
40
        Operation *mt_op;
 
41
        ldap_pvt_thread_mutex_t mt_mutex;
 
42
} modtarget;
 
43
 
 
44
/* A queued result of a persistent search */
 
45
typedef struct syncres {
 
46
        struct syncres *s_next;
 
47
        struct berval s_dn;
 
48
        struct berval s_ndn;
 
49
        struct berval s_uuid;
 
50
        struct berval s_csn;
 
51
        char s_mode;
 
52
        char s_isreference;
 
53
} syncres;
 
54
 
 
55
/* Record of a persistent search */
 
56
typedef struct syncops {
 
57
        struct syncops *s_next;
 
58
        struct berval   s_base;         /* ndn of search base */
 
59
        ID              s_eid;          /* entryID of search base */
 
60
        Operation       *s_op;          /* search op */
 
61
        int             s_rid;
 
62
        int             s_sid;
 
63
        struct berval s_filterstr;
 
64
        int             s_flags;        /* search status */
 
65
#define PS_IS_REFRESHING        0x01
 
66
#define PS_IS_DETACHED          0x02
 
67
#define PS_WROTE_BASE           0x04
 
68
#define PS_FIND_BASE            0x08
 
69
#define PS_FIX_FILTER           0x10
 
70
 
 
71
        int             s_inuse;        /* reference count */
 
72
        struct syncres *s_res;
 
73
        struct syncres *s_restail;
 
74
        struct re_s     *s_qtask;       /* task for playing psearch responses */
 
75
#define RUNQ_INTERVAL   36000   /* a long time */
 
76
        ldap_pvt_thread_mutex_t s_mutex;
 
77
} syncops;
 
78
 
 
79
/* A received sync control */
 
80
typedef struct sync_control {
 
81
        struct sync_cookie sr_state;
 
82
        int sr_rhint;
 
83
} sync_control;
 
84
 
 
85
#if 0 /* moved back to slap.h */
 
86
#define o_sync  o_ctrlflag[slap_cids.sc_LDAPsync]
 
87
#endif
 
88
/* o_sync_mode uses data bits of o_sync */
 
89
#define o_sync_mode     o_ctrlflag[slap_cids.sc_LDAPsync]
 
90
 
 
91
#define SLAP_SYNC_NONE                                  (LDAP_SYNC_NONE<<SLAP_CONTROL_SHIFT)
 
92
#define SLAP_SYNC_REFRESH                               (LDAP_SYNC_REFRESH_ONLY<<SLAP_CONTROL_SHIFT)
 
93
#define SLAP_SYNC_PERSIST                               (LDAP_SYNC_RESERVED<<SLAP_CONTROL_SHIFT)
 
94
#define SLAP_SYNC_REFRESH_AND_PERSIST   (LDAP_SYNC_REFRESH_AND_PERSIST<<SLAP_CONTROL_SHIFT)
 
95
 
 
96
/* Record of which searches matched at premodify step */
 
97
typedef struct syncmatches {
 
98
        struct syncmatches *sm_next;
 
99
        syncops *sm_op;
 
100
} syncmatches;
 
101
 
 
102
/* Session log data */
 
103
typedef struct slog_entry {
 
104
        struct slog_entry *se_next;
 
105
        struct berval se_uuid;
 
106
        struct berval se_csn;
 
107
        int     se_sid;
 
108
        ber_tag_t       se_tag;
 
109
} slog_entry;
 
110
 
 
111
typedef struct sessionlog {
 
112
        struct berval   sl_mincsn;
 
113
        int             sl_num;
 
114
        int             sl_size;
 
115
        slog_entry *sl_head;
 
116
        slog_entry *sl_tail;
 
117
        ldap_pvt_thread_mutex_t sl_mutex;
 
118
} sessionlog;
 
119
 
 
120
/* The main state for this overlay */
 
121
typedef struct syncprov_info_t {
 
122
        syncops         *si_ops;
 
123
        BerVarray       si_ctxcsn;      /* ldapsync context */
 
124
        int             *si_sids;
 
125
        int             si_numcsns;
 
126
        int             si_chkops;      /* checkpointing info */
 
127
        int             si_chktime;
 
128
        int             si_numops;      /* number of ops since last checkpoint */
 
129
        int             si_nopres;      /* Skip present phase */
 
130
        int             si_usehint;     /* use reload hint */
 
131
        time_t  si_chklast;     /* time of last checkpoint */
 
132
        Avlnode *si_mods;       /* entries being modified */
 
133
        sessionlog      *si_logs;
 
134
        ldap_pvt_thread_rdwr_t  si_csn_rwlock;
 
135
        ldap_pvt_thread_mutex_t si_ops_mutex;
 
136
        ldap_pvt_thread_mutex_t si_mods_mutex;
 
137
} syncprov_info_t;
 
138
 
 
139
typedef struct opcookie {
 
140
        slap_overinst *son;
 
141
        syncmatches *smatches;
 
142
        struct berval sdn;      /* DN of entry, for deletes */
 
143
        struct berval sndn;
 
144
        struct berval suuid;    /* UUID of entry */
 
145
        struct berval sctxcsn;
 
146
        int sreference; /* Is the entry a reference? */
 
147
} opcookie;
 
148
 
 
149
typedef struct fbase_cookie {
 
150
        struct berval *fdn;     /* DN of a modified entry, for scope testing */
 
151
        syncops *fss;   /* persistent search we're testing against */
 
152
        int fbase;      /* if TRUE we found the search base and it's still valid */
 
153
        int fscope;     /* if TRUE then fdn is within the psearch scope */
 
154
} fbase_cookie;
 
155
 
 
156
static AttributeName csn_anlist[3];
 
157
static AttributeName uuid_anlist[2];
 
158
 
 
159
/* Build a LDAPsync intermediate state control */
 
160
static int
 
161
syncprov_state_ctrl(
 
162
        Operation       *op,
 
163
        SlapReply       *rs,
 
164
        Entry           *e,
 
165
        int             entry_sync_state,
 
166
        LDAPControl     **ctrls,
 
167
        int             num_ctrls,
 
168
        int             send_cookie,
 
169
        struct berval   *cookie )
 
170
{
 
171
        Attribute* a;
 
172
        int ret;
 
173
 
 
174
        BerElementBuffer berbuf;
 
175
        BerElement *ber = (BerElement *)&berbuf;
 
176
 
 
177
        struct berval   entryuuid_bv = BER_BVNULL;
 
178
 
 
179
        ber_init2( ber, 0, LBER_USE_DER );
 
180
        ber_set_option( ber, LBER_OPT_BER_MEMCTX, &op->o_tmpmemctx );
 
181
 
 
182
        ctrls[num_ctrls] = op->o_tmpalloc( sizeof ( LDAPControl ), op->o_tmpmemctx );
 
183
 
 
184
        for ( a = e->e_attrs; a != NULL; a = a->a_next ) {
 
185
                AttributeDescription *desc = a->a_desc;
 
186
                if ( desc == slap_schema.si_ad_entryUUID ) {
 
187
                        entryuuid_bv = a->a_nvals[0];
 
188
                        break;
 
189
                }
 
190
        }
 
191
 
 
192
        /* FIXME: what if entryuuid is NULL or empty ? */
 
193
 
 
194
        if ( send_cookie && cookie ) {
 
195
                ber_printf( ber, "{eOON}",
 
196
                        entry_sync_state, &entryuuid_bv, cookie );
 
197
        } else {
 
198
                ber_printf( ber, "{eON}",
 
199
                        entry_sync_state, &entryuuid_bv );
 
200
        }
 
201
 
 
202
        ctrls[num_ctrls]->ldctl_oid = LDAP_CONTROL_SYNC_STATE;
 
203
        ctrls[num_ctrls]->ldctl_iscritical = (op->o_sync == SLAP_CONTROL_CRITICAL);
 
204
        ret = ber_flatten2( ber, &ctrls[num_ctrls]->ldctl_value, 1 );
 
205
 
 
206
        ber_free_buf( ber );
 
207
 
 
208
        if ( ret < 0 ) {
 
209
                Debug( LDAP_DEBUG_TRACE,
 
210
                        "slap_build_sync_ctrl: ber_flatten2 failed\n",
 
211
                        0, 0, 0 );
 
212
                send_ldap_error( op, rs, LDAP_OTHER, "internal error" );
 
213
                return ret;
 
214
        }
 
215
 
 
216
        return LDAP_SUCCESS;
 
217
}
 
218
 
 
219
/* Build a LDAPsync final state control */
 
220
static int
 
221
syncprov_done_ctrl(
 
222
        Operation       *op,
 
223
        SlapReply       *rs,
 
224
        LDAPControl     **ctrls,
 
225
        int                     num_ctrls,
 
226
        int                     send_cookie,
 
227
        struct berval *cookie,
 
228
        int                     refreshDeletes )
 
229
{
 
230
        int ret;
 
231
        BerElementBuffer berbuf;
 
232
        BerElement *ber = (BerElement *)&berbuf;
 
233
 
 
234
        ber_init2( ber, NULL, LBER_USE_DER );
 
235
        ber_set_option( ber, LBER_OPT_BER_MEMCTX, &op->o_tmpmemctx );
 
236
 
 
237
        ctrls[num_ctrls] = op->o_tmpalloc( sizeof ( LDAPControl ), op->o_tmpmemctx );
 
238
 
 
239
        ber_printf( ber, "{" );
 
240
        if ( send_cookie && cookie ) {
 
241
                ber_printf( ber, "O", cookie );
 
242
        }
 
243
        if ( refreshDeletes == LDAP_SYNC_REFRESH_DELETES ) {
 
244
                ber_printf( ber, "b", refreshDeletes );
 
245
        }
 
246
        ber_printf( ber, "N}" );
 
247
 
 
248
        ctrls[num_ctrls]->ldctl_oid = LDAP_CONTROL_SYNC_DONE;
 
249
        ctrls[num_ctrls]->ldctl_iscritical = (op->o_sync == SLAP_CONTROL_CRITICAL);
 
250
        ret = ber_flatten2( ber, &ctrls[num_ctrls]->ldctl_value, 1 );
 
251
 
 
252
        ber_free_buf( ber );
 
253
 
 
254
        if ( ret < 0 ) {
 
255
                Debug( LDAP_DEBUG_TRACE,
 
256
                        "syncprov_done_ctrl: ber_flatten2 failed\n",
 
257
                        0, 0, 0 );
 
258
                send_ldap_error( op, rs, LDAP_OTHER, "internal error" );
 
259
                return ret;
 
260
        }
 
261
 
 
262
        return LDAP_SUCCESS;
 
263
}
 
264
 
 
265
static int
 
266
syncprov_sendinfo(
 
267
        Operation       *op,
 
268
        SlapReply       *rs,
 
269
        int                     type,
 
270
        struct berval *cookie,
 
271
        int                     refreshDone,
 
272
        BerVarray       syncUUIDs,
 
273
        int                     refreshDeletes )
 
274
{
 
275
        BerElementBuffer berbuf;
 
276
        BerElement *ber = (BerElement *)&berbuf;
 
277
        struct berval rspdata;
 
278
 
 
279
        int ret;
 
280
 
 
281
        ber_init2( ber, NULL, LBER_USE_DER );
 
282
        ber_set_option( ber, LBER_OPT_BER_MEMCTX, &op->o_tmpmemctx );
 
283
 
 
284
        if ( type ) {
 
285
                switch ( type ) {
 
286
                case LDAP_TAG_SYNC_NEW_COOKIE:
 
287
                        ber_printf( ber, "tO", type, cookie );
 
288
                        break;
 
289
                case LDAP_TAG_SYNC_REFRESH_DELETE:
 
290
                case LDAP_TAG_SYNC_REFRESH_PRESENT:
 
291
                        ber_printf( ber, "t{", type );
 
292
                        if ( cookie ) {
 
293
                                ber_printf( ber, "O", cookie );
 
294
                        }
 
295
                        if ( refreshDone == 0 ) {
 
296
                                ber_printf( ber, "b", refreshDone );
 
297
                        }
 
298
                        ber_printf( ber, "N}" );
 
299
                        break;
 
300
                case LDAP_TAG_SYNC_ID_SET:
 
301
                        ber_printf( ber, "t{", type );
 
302
                        if ( cookie ) {
 
303
                                ber_printf( ber, "O", cookie );
 
304
                        }
 
305
                        if ( refreshDeletes == 1 ) {
 
306
                                ber_printf( ber, "b", refreshDeletes );
 
307
                        }
 
308
                        ber_printf( ber, "[W]", syncUUIDs );
 
309
                        ber_printf( ber, "N}" );
 
310
                        break;
 
311
                default:
 
312
                        Debug( LDAP_DEBUG_TRACE,
 
313
                                "syncprov_sendinfo: invalid syncinfo type (%d)\n",
 
314
                                type, 0, 0 );
 
315
                        return LDAP_OTHER;
 
316
                }
 
317
        }
 
318
 
 
319
        ret = ber_flatten2( ber, &rspdata, 0 );
 
320
 
 
321
        if ( ret < 0 ) {
 
322
                Debug( LDAP_DEBUG_TRACE,
 
323
                        "syncprov_sendinfo: ber_flatten2 failed\n",
 
324
                        0, 0, 0 );
 
325
                send_ldap_error( op, rs, LDAP_OTHER, "internal error" );
 
326
                return ret;
 
327
        }
 
328
 
 
329
        rs->sr_rspoid = LDAP_SYNC_INFO;
 
330
        rs->sr_rspdata = &rspdata;
 
331
        send_ldap_intermediate( op, rs );
 
332
        rs->sr_rspdata = NULL;
 
333
        ber_free_buf( ber );
 
334
 
 
335
        return LDAP_SUCCESS;
 
336
}
 
337
 
 
338
/* Find a modtarget in an AVL tree */
 
339
static int
 
340
sp_avl_cmp( const void *c1, const void *c2 )
 
341
{
 
342
        const modtarget *m1, *m2;
 
343
        int rc;
 
344
 
 
345
        m1 = c1; m2 = c2;
 
346
        rc = m1->mt_op->o_req_ndn.bv_len - m2->mt_op->o_req_ndn.bv_len;
 
347
 
 
348
        if ( rc ) return rc;
 
349
        return ber_bvcmp( &m1->mt_op->o_req_ndn, &m2->mt_op->o_req_ndn );
 
350
}
 
351
 
 
352
/* syncprov_findbase:
 
353
 *   finds the true DN of the base of a search (with alias dereferencing) and
 
354
 * checks to make sure the base entry doesn't get replaced with a different
 
355
 * entry (e.g., swapping trees via ModDN, or retargeting an alias). If a
 
356
 * change is detected, any persistent search on this base must be terminated /
 
357
 * reloaded.
 
358
 *   On the first call, we just save the DN and entryID. On subsequent calls
 
359
 * we compare the DN and entryID with the saved values.
 
360
 */
 
361
static int
 
362
findbase_cb( Operation *op, SlapReply *rs )
 
363
{
 
364
        slap_callback *sc = op->o_callback;
 
365
 
 
366
        if ( rs->sr_type == REP_SEARCH && rs->sr_err == LDAP_SUCCESS ) {
 
367
                fbase_cookie *fc = sc->sc_private;
 
368
 
 
369
                /* If no entryID, we're looking for the first time.
 
370
                 * Just store whatever we got.
 
371
                 */
 
372
                if ( fc->fss->s_eid == NOID ) {
 
373
                        fc->fbase = 2;
 
374
                        fc->fss->s_eid = rs->sr_entry->e_id;
 
375
                        ber_dupbv( &fc->fss->s_base, &rs->sr_entry->e_nname );
 
376
 
 
377
                } else if ( rs->sr_entry->e_id == fc->fss->s_eid &&
 
378
                        dn_match( &rs->sr_entry->e_nname, &fc->fss->s_base )) {
 
379
 
 
380
                /* OK, the DN is the same and the entryID is the same. */
 
381
                        fc->fbase = 1;
 
382
                }
 
383
        }
 
384
        if ( rs->sr_err != LDAP_SUCCESS ) {
 
385
                Debug( LDAP_DEBUG_ANY, "findbase failed! %d\n", rs->sr_err,0,0 );
 
386
        }
 
387
        return LDAP_SUCCESS;
 
388
}
 
389
 
 
390
static Filter generic_filter = { LDAP_FILTER_PRESENT, { 0 }, NULL };
 
391
static struct berval generic_filterstr = BER_BVC("(objectclass=*)");
 
392
 
 
393
static int
 
394
syncprov_findbase( Operation *op, fbase_cookie *fc )
 
395
{
 
396
        opcookie *opc = op->o_callback->sc_private;
 
397
        slap_overinst *on = opc->son;
 
398
 
 
399
        /* Use basic parameters from syncrepl search, but use
 
400
         * current op's threadctx / tmpmemctx
 
401
         */
 
402
        ldap_pvt_thread_mutex_lock( &fc->fss->s_mutex );
 
403
        if ( fc->fss->s_flags & PS_FIND_BASE ) {
 
404
                slap_callback cb = {0};
 
405
                Operation fop;
 
406
                SlapReply frs = { REP_RESULT };
 
407
                int rc;
 
408
 
 
409
                fc->fss->s_flags ^= PS_FIND_BASE;
 
410
                ldap_pvt_thread_mutex_unlock( &fc->fss->s_mutex );
 
411
 
 
412
                fop = *fc->fss->s_op;
 
413
 
 
414
                fop.o_bd = fop.o_bd->bd_self;
 
415
                fop.o_hdr = op->o_hdr;
 
416
                fop.o_time = op->o_time;
 
417
                fop.o_tincr = op->o_tincr;
 
418
 
 
419
                cb.sc_response = findbase_cb;
 
420
                cb.sc_private = fc;
 
421
 
 
422
                fop.o_sync_mode = 0;    /* turn off sync mode */
 
423
                fop.o_managedsait = SLAP_CONTROL_CRITICAL;
 
424
                fop.o_callback = &cb;
 
425
                fop.o_tag = LDAP_REQ_SEARCH;
 
426
                fop.ors_scope = LDAP_SCOPE_BASE;
 
427
                fop.ors_limit = NULL;
 
428
                fop.ors_slimit = 1;
 
429
                fop.ors_tlimit = SLAP_NO_LIMIT;
 
430
                fop.ors_attrs = slap_anlist_no_attrs;
 
431
                fop.ors_attrsonly = 1;
 
432
                fop.ors_filter = &generic_filter;
 
433
                fop.ors_filterstr = generic_filterstr;
 
434
 
 
435
                rc = fop.o_bd->be_search( &fop, &frs );
 
436
        } else {
 
437
                ldap_pvt_thread_mutex_unlock( &fc->fss->s_mutex );
 
438
                fc->fbase = 1;
 
439
        }
 
440
 
 
441
        /* After the first call, see if the fdn resides in the scope */
 
442
        if ( fc->fbase == 1 ) {
 
443
                switch ( fc->fss->s_op->ors_scope ) {
 
444
                case LDAP_SCOPE_BASE:
 
445
                        fc->fscope = dn_match( fc->fdn, &fc->fss->s_base );
 
446
                        break;
 
447
                case LDAP_SCOPE_ONELEVEL: {
 
448
                        struct berval pdn;
 
449
                        dnParent( fc->fdn, &pdn );
 
450
                        fc->fscope = dn_match( &pdn, &fc->fss->s_base );
 
451
                        break; }
 
452
                case LDAP_SCOPE_SUBTREE:
 
453
                        fc->fscope = dnIsSuffix( fc->fdn, &fc->fss->s_base );
 
454
                        break;
 
455
                case LDAP_SCOPE_SUBORDINATE:
 
456
                        fc->fscope = dnIsSuffix( fc->fdn, &fc->fss->s_base ) &&
 
457
                                !dn_match( fc->fdn, &fc->fss->s_base );
 
458
                        break;
 
459
                }
 
460
        }
 
461
 
 
462
        if ( fc->fbase )
 
463
                return LDAP_SUCCESS;
 
464
 
 
465
        /* If entryID has changed, then the base of this search has
 
466
         * changed. Invalidate the psearch.
 
467
         */
 
468
        return LDAP_NO_SUCH_OBJECT;
 
469
}
 
470
 
 
471
/* syncprov_findcsn:
 
472
 *   This function has three different purposes, but they all use a search
 
473
 * that filters on entryCSN so they're combined here.
 
474
 * 1: at startup time, after a contextCSN has been read from the database,
 
475
 * we search for all entries with CSN >= contextCSN in case the contextCSN
 
476
 * was not checkpointed at the previous shutdown.
 
477
 *
 
478
 * 2: when the current contextCSN is known and we have a sync cookie, we search
 
479
 * for one entry with CSN = the cookie CSN. If not found, try <= cookie CSN.
 
480
 * If an entry is found, the cookie CSN is valid, otherwise it is stale.
 
481
 *
 
482
 * 3: during a refresh phase, we search for all entries with CSN <= the cookie
 
483
 * CSN, and generate Present records for them. We always collect this result
 
484
 * in SyncID sets, even if there's only one match.
 
485
 */
 
486
typedef enum find_csn_t {
 
487
        FIND_MAXCSN     = 1,
 
488
        FIND_CSN        = 2,
 
489
        FIND_PRESENT    = 3
 
490
} find_csn_t;
 
491
 
 
492
static int
 
493
findmax_cb( Operation *op, SlapReply *rs )
 
494
{
 
495
        if ( rs->sr_type == REP_SEARCH && rs->sr_err == LDAP_SUCCESS ) {
 
496
                struct berval *maxcsn = op->o_callback->sc_private;
 
497
                Attribute *a = attr_find( rs->sr_entry->e_attrs,
 
498
                        slap_schema.si_ad_entryCSN );
 
499
 
 
500
                if ( a && ber_bvcmp( &a->a_vals[0], maxcsn ) > 0 &&
 
501
                        slap_parse_csn_sid( &a->a_vals[0] ) == slap_serverID ) {
 
502
                        maxcsn->bv_len = a->a_vals[0].bv_len;
 
503
                        strcpy( maxcsn->bv_val, a->a_vals[0].bv_val );
 
504
                }
 
505
        }
 
506
        return LDAP_SUCCESS;
 
507
}
 
508
 
 
509
static int
 
510
findcsn_cb( Operation *op, SlapReply *rs )
 
511
{
 
512
        slap_callback *sc = op->o_callback;
 
513
 
 
514
        /* We just want to know that at least one exists, so it's OK if
 
515
         * we exceed the unchecked limit.
 
516
         */
 
517
        if ( rs->sr_err == LDAP_ADMINLIMIT_EXCEEDED ||
 
518
                (rs->sr_type == REP_SEARCH && rs->sr_err == LDAP_SUCCESS )) {
 
519
                sc->sc_private = (void *)1;
 
520
        }
 
521
        return LDAP_SUCCESS;
 
522
}
 
523
 
 
524
/* Build a list of entryUUIDs for sending in a SyncID set */
 
525
 
 
526
#define UUID_LEN        16
 
527
 
 
528
typedef struct fpres_cookie {
 
529
        int num;
 
530
        BerVarray uuids;
 
531
        char *last;
 
532
} fpres_cookie;
 
533
 
 
534
static int
 
535
findpres_cb( Operation *op, SlapReply *rs )
 
536
{
 
537
        slap_callback *sc = op->o_callback;
 
538
        fpres_cookie *pc = sc->sc_private;
 
539
        Attribute *a;
 
540
        int ret = SLAP_CB_CONTINUE;
 
541
 
 
542
        switch ( rs->sr_type ) {
 
543
        case REP_SEARCH:
 
544
                a = attr_find( rs->sr_entry->e_attrs, slap_schema.si_ad_entryUUID );
 
545
                if ( a ) {
 
546
                        pc->uuids[pc->num].bv_val = pc->last;
 
547
                        AC_MEMCPY( pc->uuids[pc->num].bv_val, a->a_nvals[0].bv_val,
 
548
                                pc->uuids[pc->num].bv_len );
 
549
                        pc->num++;
 
550
                        pc->last = pc->uuids[pc->num].bv_val;
 
551
                        pc->uuids[pc->num].bv_val = NULL;
 
552
                }
 
553
                ret = LDAP_SUCCESS;
 
554
                if ( pc->num != SLAP_SYNCUUID_SET_SIZE )
 
555
                        break;
 
556
                /* FALLTHRU */
 
557
        case REP_RESULT:
 
558
                ret = rs->sr_err;
 
559
                if ( pc->num ) {
 
560
                        ret = syncprov_sendinfo( op, rs, LDAP_TAG_SYNC_ID_SET, NULL,
 
561
                                0, pc->uuids, 0 );
 
562
                        pc->uuids[pc->num].bv_val = pc->last;
 
563
                        pc->num = 0;
 
564
                        pc->last = pc->uuids[0].bv_val;
 
565
                }
 
566
                break;
 
567
        default:
 
568
                break;
 
569
        }
 
570
        return ret;
 
571
}
 
572
 
 
573
static int
 
574
syncprov_findcsn( Operation *op, find_csn_t mode )
 
575
{
 
576
        slap_overinst           *on = (slap_overinst *)op->o_bd->bd_info;
 
577
        syncprov_info_t         *si = on->on_bi.bi_private;
 
578
 
 
579
        slap_callback cb = {0};
 
580
        Operation fop;
 
581
        SlapReply frs = { REP_RESULT };
 
582
        char buf[LDAP_LUTIL_CSNSTR_BUFSIZE + STRLENOF("(entryCSN<=)")];
 
583
        char cbuf[LDAP_LUTIL_CSNSTR_BUFSIZE];
 
584
        struct berval maxcsn;
 
585
        Filter cf;
 
586
        AttributeAssertion eq = ATTRIBUTEASSERTION_INIT;
 
587
        fpres_cookie pcookie;
 
588
        sync_control *srs = NULL;
 
589
        struct slap_limits_set fc_limits;
 
590
        int i, rc = LDAP_SUCCESS, findcsn_retry = 1;
 
591
        int maxid;
 
592
 
 
593
        if ( mode != FIND_MAXCSN ) {
 
594
                srs = op->o_controls[slap_cids.sc_LDAPsync];
 
595
        }
 
596
 
 
597
        fop = *op;
 
598
        fop.o_sync_mode &= SLAP_CONTROL_MASK;   /* turn off sync_mode */
 
599
        /* We want pure entries, not referrals */
 
600
        fop.o_managedsait = SLAP_CONTROL_CRITICAL;
 
601
 
 
602
        cf.f_ava = &eq;
 
603
        cf.f_av_desc = slap_schema.si_ad_entryCSN;
 
604
        BER_BVZERO( &cf.f_av_value );
 
605
        cf.f_next = NULL;
 
606
 
 
607
        fop.o_callback = &cb;
 
608
        fop.ors_limit = NULL;
 
609
        fop.ors_tlimit = SLAP_NO_LIMIT;
 
610
        fop.ors_filter = &cf;
 
611
        fop.ors_filterstr.bv_val = buf;
 
612
 
 
613
again:
 
614
        switch( mode ) {
 
615
        case FIND_MAXCSN:
 
616
                cf.f_choice = LDAP_FILTER_GE;
 
617
                /* If there are multiple CSNs, use the one with our serverID */
 
618
                for ( i=0; i<si->si_numcsns; i++) {
 
619
                        if ( slap_serverID == si->si_sids[i] ) {
 
620
                                maxid = i;
 
621
                                break;
 
622
                        }
 
623
                }
 
624
                if ( i == si->si_numcsns ) {
 
625
                        /* No match: this is multimaster, and none of the content in the DB
 
626
                         * originated locally. Treat like no CSN.
 
627
                         */
 
628
                        return LDAP_NO_SUCH_OBJECT;
 
629
                }
 
630
                cf.f_av_value = si->si_ctxcsn[maxid];
 
631
                fop.ors_filterstr.bv_len = snprintf( buf, sizeof( buf ),
 
632
                        "(entryCSN>=%s)", cf.f_av_value.bv_val );
 
633
                if ( fop.ors_filterstr.bv_len < 0 || fop.ors_filterstr.bv_len >= sizeof( buf ) ) {
 
634
                        return LDAP_OTHER;
 
635
                }
 
636
                fop.ors_attrsonly = 0;
 
637
                fop.ors_attrs = csn_anlist;
 
638
                fop.ors_slimit = SLAP_NO_LIMIT;
 
639
                cb.sc_private = &maxcsn;
 
640
                cb.sc_response = findmax_cb;
 
641
                strcpy( cbuf, cf.f_av_value.bv_val );
 
642
                maxcsn.bv_val = cbuf;
 
643
                maxcsn.bv_len = cf.f_av_value.bv_len;
 
644
                break;
 
645
        case FIND_CSN:
 
646
                if ( BER_BVISEMPTY( &cf.f_av_value )) {
 
647
                        cf.f_av_value = srs->sr_state.ctxcsn[0];
 
648
                        /* If there are multiple CSNs, use the smallest */
 
649
                        for ( i=1; i<srs->sr_state.numcsns; i++ ) {
 
650
                                if ( ber_bvcmp( &cf.f_av_value, &srs->sr_state.ctxcsn[i] )
 
651
                                        > 0 ) {
 
652
                                        cf.f_av_value = srs->sr_state.ctxcsn[i];
 
653
                                }
 
654
                        }
 
655
                }
 
656
                /* Look for exact match the first time */
 
657
                if ( findcsn_retry ) {
 
658
                        cf.f_choice = LDAP_FILTER_EQUALITY;
 
659
                        fop.ors_filterstr.bv_len = snprintf( buf, sizeof( buf ),
 
660
                                "(entryCSN=%s)", cf.f_av_value.bv_val );
 
661
                /* On retry, look for <= */
 
662
                } else {
 
663
                        cf.f_choice = LDAP_FILTER_LE;
 
664
                        fop.ors_limit = &fc_limits;
 
665
                        memset( &fc_limits, 0, sizeof( fc_limits ));
 
666
                        fc_limits.lms_s_unchecked = 1;
 
667
                        fop.ors_filterstr.bv_len = snprintf( buf, sizeof( buf ),
 
668
                                "(entryCSN<=%s)", cf.f_av_value.bv_val );
 
669
                }
 
670
                if ( fop.ors_filterstr.bv_len < 0 || fop.ors_filterstr.bv_len >= sizeof( buf ) ) {
 
671
                        return LDAP_OTHER;
 
672
                }
 
673
                fop.ors_attrsonly = 1;
 
674
                fop.ors_attrs = slap_anlist_no_attrs;
 
675
                fop.ors_slimit = 1;
 
676
                cb.sc_private = NULL;
 
677
                cb.sc_response = findcsn_cb;
 
678
                break;
 
679
        case FIND_PRESENT:
 
680
                fop.ors_filter = op->ors_filter;
 
681
                fop.ors_filterstr = op->ors_filterstr;
 
682
                fop.ors_attrsonly = 0;
 
683
                fop.ors_attrs = uuid_anlist;
 
684
                fop.ors_slimit = SLAP_NO_LIMIT;
 
685
                cb.sc_private = &pcookie;
 
686
                cb.sc_response = findpres_cb;
 
687
                pcookie.num = 0;
 
688
 
 
689
                /* preallocate storage for a full set */
 
690
                pcookie.uuids = op->o_tmpalloc( (SLAP_SYNCUUID_SET_SIZE+1) *
 
691
                        sizeof(struct berval) + SLAP_SYNCUUID_SET_SIZE * UUID_LEN,
 
692
                        op->o_tmpmemctx );
 
693
                pcookie.last = (char *)(pcookie.uuids + SLAP_SYNCUUID_SET_SIZE+1);
 
694
                pcookie.uuids[0].bv_val = pcookie.last;
 
695
                pcookie.uuids[0].bv_len = UUID_LEN;
 
696
                for (i=1; i<SLAP_SYNCUUID_SET_SIZE; i++) {
 
697
                        pcookie.uuids[i].bv_val = pcookie.uuids[i-1].bv_val + UUID_LEN;
 
698
                        pcookie.uuids[i].bv_len = UUID_LEN;
 
699
                }
 
700
                break;
 
701
        }
 
702
 
 
703
        fop.o_bd->bd_info = (BackendInfo *)on->on_info;
 
704
        fop.o_bd->be_search( &fop, &frs );
 
705
        fop.o_bd->bd_info = (BackendInfo *)on;
 
706
 
 
707
        switch( mode ) {
 
708
        case FIND_MAXCSN:
 
709
                if ( ber_bvcmp( &si->si_ctxcsn[maxid], &maxcsn )) {
 
710
                        ber_bvreplace( &si->si_ctxcsn[maxid], &maxcsn );
 
711
                        si->si_numops++;        /* ensure a checkpoint */
 
712
                }
 
713
                break;
 
714
        case FIND_CSN:
 
715
                /* If matching CSN was not found, invalidate the context. */
 
716
                if ( !cb.sc_private ) {
 
717
                        /* If we didn't find an exact match, then try for <= */
 
718
                        if ( findcsn_retry ) {
 
719
                                findcsn_retry = 0;
 
720
                                goto again;
 
721
                        }
 
722
                        rc = LDAP_NO_SUCH_OBJECT;
 
723
                }
 
724
                break;
 
725
        case FIND_PRESENT:
 
726
                op->o_tmpfree( pcookie.uuids, op->o_tmpmemctx );
 
727
                break;
 
728
        }
 
729
 
 
730
        return rc;
 
731
}
 
732
 
 
733
static void
 
734
syncprov_free_syncop( syncops *so )
 
735
{
 
736
        syncres *sr, *srnext;
 
737
        GroupAssertion *ga, *gnext;
 
738
 
 
739
        ldap_pvt_thread_mutex_lock( &so->s_mutex );
 
740
        if ( --so->s_inuse > 0 ) {
 
741
                ldap_pvt_thread_mutex_unlock( &so->s_mutex );
 
742
                return;
 
743
        }
 
744
        if ( so->s_qtask ) {
 
745
                ldap_pvt_thread_mutex_lock( &slapd_rq.rq_mutex );
 
746
                if ( ldap_pvt_runqueue_isrunning( &slapd_rq, so->s_qtask ) )
 
747
                        ldap_pvt_runqueue_stoptask( &slapd_rq, so->s_qtask );
 
748
                ldap_pvt_runqueue_remove( &slapd_rq, so->s_qtask );
 
749
                ldap_pvt_thread_mutex_unlock( &slapd_rq.rq_mutex );
 
750
        }
 
751
        ldap_pvt_thread_mutex_unlock( &so->s_mutex );
 
752
        if ( so->s_flags & PS_IS_DETACHED ) {
 
753
                filter_free( so->s_op->ors_filter );
 
754
                for ( ga = so->s_op->o_groups; ga; ga=gnext ) {
 
755
                        gnext = ga->ga_next;
 
756
                        ch_free( ga );
 
757
                }
 
758
                ch_free( so->s_op );
 
759
        }
 
760
        ch_free( so->s_base.bv_val );
 
761
        for ( sr=so->s_res; sr; sr=srnext ) {
 
762
                srnext = sr->s_next;
 
763
                ch_free( sr );
 
764
        }
 
765
        ldap_pvt_thread_mutex_destroy( &so->s_mutex );
 
766
        ch_free( so );
 
767
}
 
768
 
 
769
/* Send a persistent search response */
 
770
static int
 
771
syncprov_sendresp( Operation *op, opcookie *opc, syncops *so,
 
772
        Entry **e, int mode )
 
773
{
 
774
        slap_overinst *on = opc->son;
 
775
 
 
776
        SlapReply rs = { REP_SEARCH };
 
777
        LDAPControl *ctrls[2];
 
778
        struct berval cookie, csns[2];
 
779
        Entry e_uuid = {0};
 
780
        Attribute a_uuid = {0};
 
781
 
 
782
        if ( so->s_op->o_abandon )
 
783
                return SLAPD_ABANDON;
 
784
 
 
785
        ctrls[1] = NULL;
 
786
        csns[0] = opc->sctxcsn;
 
787
        BER_BVZERO( &csns[1] );
 
788
        slap_compose_sync_cookie( op, &cookie, csns, so->s_rid, so->s_sid );
 
789
 
 
790
        Debug( LDAP_DEBUG_SYNC, "syncprov_sendresp: cookie=%s\n", cookie.bv_val, 0, 0 );
 
791
 
 
792
        e_uuid.e_attrs = &a_uuid;
 
793
        a_uuid.a_desc = slap_schema.si_ad_entryUUID;
 
794
        a_uuid.a_nvals = &opc->suuid;
 
795
        rs.sr_err = syncprov_state_ctrl( op, &rs, &e_uuid,
 
796
                mode, ctrls, 0, 1, &cookie );
 
797
        op->o_tmpfree( cookie.bv_val, op->o_tmpmemctx );
 
798
 
 
799
        rs.sr_ctrls = ctrls;
 
800
        op->o_bd->bd_info = (BackendInfo *)on->on_info;
 
801
        switch( mode ) {
 
802
        case LDAP_SYNC_ADD:
 
803
                rs.sr_entry = *e;
 
804
                if ( rs.sr_entry->e_private )
 
805
                        rs.sr_flags = REP_ENTRY_MUSTRELEASE;
 
806
                if ( opc->sreference ) {
 
807
                        rs.sr_ref = get_entry_referrals( op, rs.sr_entry );
 
808
                        rs.sr_err = send_search_reference( op, &rs );
 
809
                        ber_bvarray_free( rs.sr_ref );
 
810
                        if ( !rs.sr_entry )
 
811
                                *e = NULL;
 
812
                        break;
 
813
                }
 
814
                /* fallthru */
 
815
        case LDAP_SYNC_MODIFY:
 
816
                rs.sr_entry = *e;
 
817
                if ( rs.sr_entry->e_private )
 
818
                        rs.sr_flags = REP_ENTRY_MUSTRELEASE;
 
819
                rs.sr_attrs = op->ors_attrs;
 
820
                rs.sr_err = send_search_entry( op, &rs );
 
821
                if ( !rs.sr_entry )
 
822
                        *e = NULL;
 
823
                break;
 
824
        case LDAP_SYNC_DELETE:
 
825
                e_uuid.e_attrs = NULL;
 
826
                e_uuid.e_name = opc->sdn;
 
827
                e_uuid.e_nname = opc->sndn;
 
828
                rs.sr_entry = &e_uuid;
 
829
                if ( opc->sreference ) {
 
830
                        struct berval bv = BER_BVNULL;
 
831
                        rs.sr_ref = &bv;
 
832
                        rs.sr_err = send_search_reference( op, &rs );
 
833
                } else {
 
834
                        rs.sr_err = send_search_entry( op, &rs );
 
835
                }
 
836
                break;
 
837
        default:
 
838
                assert(0);
 
839
        }
 
840
        /* In case someone else freed it already? */
 
841
        if ( rs.sr_ctrls ) {
 
842
                op->o_tmpfree( rs.sr_ctrls[0], op->o_tmpmemctx );
 
843
                rs.sr_ctrls = NULL;
 
844
        }
 
845
 
 
846
        return rs.sr_err;
 
847
}
 
848
 
 
849
/* Play back queued responses */
 
850
static int
 
851
syncprov_qplay( Operation *op, struct re_s *rtask )
 
852
{
 
853
        syncops *so = rtask->arg;
 
854
        slap_overinst *on = LDAP_SLIST_FIRST(&so->s_op->o_extra)->oe_key;
 
855
        syncres *sr;
 
856
        Entry *e;
 
857
        opcookie opc;
 
858
        int rc = 0;
 
859
 
 
860
        opc.son = on;
 
861
 
 
862
        for (;;) {
 
863
                ldap_pvt_thread_mutex_lock( &so->s_mutex );
 
864
                sr = so->s_res;
 
865
                if ( sr )
 
866
                        so->s_res = sr->s_next;
 
867
                if ( !so->s_res )
 
868
                        so->s_restail = NULL;
 
869
                /* Exit loop with mutex held */
 
870
                if ( !sr || so->s_op->o_abandon )
 
871
                        break;
 
872
                ldap_pvt_thread_mutex_unlock( &so->s_mutex );
 
873
 
 
874
                opc.sdn = sr->s_dn;
 
875
                opc.sndn = sr->s_ndn;
 
876
                opc.suuid = sr->s_uuid;
 
877
                opc.sctxcsn = sr->s_csn;
 
878
                opc.sreference = sr->s_isreference;
 
879
                e = NULL;
 
880
 
 
881
                if ( sr->s_mode != LDAP_SYNC_DELETE ) {
 
882
                        rc = overlay_entry_get_ov( op, &opc.sndn, NULL, NULL, 0, &e, on );
 
883
                        if ( rc ) {
 
884
                                Debug( LDAP_DEBUG_SYNC, "syncprov_qplay: failed to get %s, "
 
885
                                        "error (%d), ignoring...\n", opc.sndn.bv_val, rc, 0 );
 
886
                                ch_free( sr );
 
887
                                rc = 0;
 
888
                                continue;
 
889
                        }
 
890
                }
 
891
                rc = syncprov_sendresp( op, &opc, so, &e, sr->s_mode );
 
892
 
 
893
                if ( e ) {
 
894
                        overlay_entry_release_ov( op, e, 0, on );
 
895
                }
 
896
 
 
897
                ch_free( sr );
 
898
 
 
899
                if ( rc ) {
 
900
                        /* Exit loop with mutex held */
 
901
                        ldap_pvt_thread_mutex_lock( &so->s_mutex );
 
902
                        break;
 
903
                }
 
904
        }
 
905
 
 
906
        /* wait until we get explicitly scheduled again */
 
907
        ldap_pvt_thread_mutex_lock( &slapd_rq.rq_mutex );
 
908
        ldap_pvt_runqueue_stoptask( &slapd_rq, rtask );
 
909
        if ( rc == 0 ) {
 
910
                ldap_pvt_runqueue_resched( &slapd_rq, rtask, 1 );
 
911
        } else {
 
912
                /* bail out on any error */
 
913
                ldap_pvt_runqueue_remove( &slapd_rq, rtask );
 
914
        }
 
915
        ldap_pvt_thread_mutex_unlock( &slapd_rq.rq_mutex );
 
916
        ldap_pvt_thread_mutex_unlock( &so->s_mutex );
 
917
        return rc;
 
918
}
 
919
 
 
920
/* runqueue task for playing back queued responses */
 
921
static void *
 
922
syncprov_qtask( void *ctx, void *arg )
 
923
{
 
924
        struct re_s *rtask = arg;
 
925
        syncops *so = rtask->arg;
 
926
        OperationBuffer opbuf;
 
927
        Operation *op;
 
928
        BackendDB be;
 
929
        int rc;
 
930
 
 
931
        op = &opbuf.ob_op;
 
932
        *op = *so->s_op;
 
933
        op->o_hdr = &opbuf.ob_hdr;
 
934
        op->o_controls = opbuf.ob_controls;
 
935
        memset( op->o_controls, 0, sizeof(opbuf.ob_controls) );
 
936
 
 
937
        *op->o_hdr = *so->s_op->o_hdr;
 
938
 
 
939
        op->o_tmpmemctx = slap_sl_mem_create(SLAP_SLAB_SIZE, SLAP_SLAB_STACK, ctx, 1);
 
940
        op->o_tmpmfuncs = &slap_sl_mfuncs;
 
941
        op->o_threadctx = ctx;
 
942
 
 
943
        /* syncprov_qplay expects a fake db */
 
944
        be = *so->s_op->o_bd;
 
945
        be.be_flags |= SLAP_DBFLAG_OVERLAY;
 
946
        op->o_bd = &be;
 
947
        LDAP_SLIST_FIRST(&op->o_extra) = NULL;
 
948
        op->o_callback = NULL;
 
949
 
 
950
        rc = syncprov_qplay( op, rtask );
 
951
 
 
952
        /* decrement use count... */
 
953
        syncprov_free_syncop( so );
 
954
 
 
955
#if 0   /* FIXME: connection_close isn't exported from slapd.
 
956
                 * should it be?
 
957
                 */
 
958
        if ( rc ) {
 
959
                ldap_pvt_thread_mutex_lock( &op->o_conn->c_mutex );
 
960
                if ( connection_state_closing( op->o_conn )) {
 
961
                        connection_close( op->o_conn );
 
962
                }
 
963
                ldap_pvt_thread_mutex_unlock( &op->o_conn->c_mutex );
 
964
        }
 
965
#endif
 
966
        return NULL;
 
967
}
 
968
 
 
969
/* Start the task to play back queued psearch responses */
 
970
static void
 
971
syncprov_qstart( syncops *so )
 
972
{
 
973
        int wake=0;
 
974
        ldap_pvt_thread_mutex_lock( &slapd_rq.rq_mutex );
 
975
        if ( !so->s_qtask ) {
 
976
                so->s_qtask = ldap_pvt_runqueue_insert( &slapd_rq, RUNQ_INTERVAL,
 
977
                        syncprov_qtask, so, "syncprov_qtask",
 
978
                        so->s_op->o_conn->c_peer_name.bv_val );
 
979
                ++so->s_inuse;
 
980
                wake = 1;
 
981
        } else {
 
982
                if (!ldap_pvt_runqueue_isrunning( &slapd_rq, so->s_qtask ) &&
 
983
                        !so->s_qtask->next_sched.tv_sec ) {
 
984
                        so->s_qtask->interval.tv_sec = 0;
 
985
                        ldap_pvt_runqueue_resched( &slapd_rq, so->s_qtask, 0 );
 
986
                        so->s_qtask->interval.tv_sec = RUNQ_INTERVAL;
 
987
                        ++so->s_inuse;
 
988
                        wake = 1;
 
989
                }
 
990
        }
 
991
        ldap_pvt_thread_mutex_unlock( &slapd_rq.rq_mutex );
 
992
        if ( wake )
 
993
                slap_wake_listener();
 
994
}
 
995
 
 
996
/* Queue a persistent search response */
 
997
static int
 
998
syncprov_qresp( opcookie *opc, syncops *so, int mode )
 
999
{
 
1000
        syncres *sr;
 
1001
        int sid, srsize;
 
1002
 
 
1003
        /* Don't send changes back to their originator */
 
1004
        sid = slap_parse_csn_sid( &opc->sctxcsn );
 
1005
        if ( sid >= 0 && sid == so->s_sid )
 
1006
                return LDAP_SUCCESS;
 
1007
 
 
1008
        srsize = sizeof(syncres) + opc->suuid.bv_len + 1 +
 
1009
                opc->sdn.bv_len + 1 + opc->sndn.bv_len + 1;
 
1010
        if ( opc->sctxcsn.bv_len )
 
1011
                srsize += opc->sctxcsn.bv_len + 1;
 
1012
        sr = ch_malloc( srsize );
 
1013
        sr->s_next = NULL;
 
1014
        sr->s_dn.bv_val = (char *)(sr + 1);
 
1015
        sr->s_dn.bv_len = opc->sdn.bv_len;
 
1016
        sr->s_mode = mode;
 
1017
        sr->s_isreference = opc->sreference;
 
1018
        sr->s_ndn.bv_val = lutil_strcopy( sr->s_dn.bv_val,
 
1019
                 opc->sdn.bv_val ) + 1;
 
1020
        sr->s_ndn.bv_len = opc->sndn.bv_len;
 
1021
        sr->s_uuid.bv_val = lutil_strcopy( sr->s_ndn.bv_val,
 
1022
                 opc->sndn.bv_val ) + 1;
 
1023
        sr->s_uuid.bv_len = opc->suuid.bv_len;
 
1024
        AC_MEMCPY( sr->s_uuid.bv_val, opc->suuid.bv_val, opc->suuid.bv_len );
 
1025
        if ( opc->sctxcsn.bv_len ) {
 
1026
                sr->s_csn.bv_val = sr->s_uuid.bv_val + sr->s_uuid.bv_len + 1;
 
1027
                strcpy( sr->s_csn.bv_val, opc->sctxcsn.bv_val );
 
1028
        } else {
 
1029
                sr->s_csn.bv_val = NULL;
 
1030
        }
 
1031
        sr->s_csn.bv_len = opc->sctxcsn.bv_len;
 
1032
 
 
1033
        ldap_pvt_thread_mutex_lock( &so->s_mutex );
 
1034
        if ( !so->s_res ) {
 
1035
                so->s_res = sr;
 
1036
        } else {
 
1037
                so->s_restail->s_next = sr;
 
1038
        }
 
1039
        so->s_restail = sr;
 
1040
 
 
1041
        /* If the base of the psearch was modified, check it next time round */
 
1042
        if ( so->s_flags & PS_WROTE_BASE ) {
 
1043
                so->s_flags ^= PS_WROTE_BASE;
 
1044
                so->s_flags |= PS_FIND_BASE;
 
1045
        }
 
1046
        if ( so->s_flags & PS_IS_DETACHED ) {
 
1047
                syncprov_qstart( so );
 
1048
        }
 
1049
        ldap_pvt_thread_mutex_unlock( &so->s_mutex );
 
1050
        return LDAP_SUCCESS;
 
1051
}
 
1052
 
 
1053
static int
 
1054
syncprov_drop_psearch( syncops *so, int lock )
 
1055
{
 
1056
        if ( so->s_flags & PS_IS_DETACHED ) {
 
1057
                if ( lock )
 
1058
                        ldap_pvt_thread_mutex_lock( &so->s_op->o_conn->c_mutex );
 
1059
                so->s_op->o_conn->c_n_ops_executing--;
 
1060
                so->s_op->o_conn->c_n_ops_completed++;
 
1061
                LDAP_STAILQ_REMOVE( &so->s_op->o_conn->c_ops, so->s_op, Operation,
 
1062
                        o_next );
 
1063
                if ( lock )
 
1064
                        ldap_pvt_thread_mutex_unlock( &so->s_op->o_conn->c_mutex );
 
1065
        }
 
1066
        syncprov_free_syncop( so );
 
1067
 
 
1068
        return 0;
 
1069
}
 
1070
 
 
1071
static int
 
1072
syncprov_ab_cleanup( Operation *op, SlapReply *rs )
 
1073
{
 
1074
        slap_callback *sc = op->o_callback;
 
1075
        op->o_callback = sc->sc_next;
 
1076
        syncprov_drop_psearch( op->o_callback->sc_private, 0 );
 
1077
        op->o_tmpfree( sc, op->o_tmpmemctx );
 
1078
        return 0;
 
1079
}
 
1080
 
 
1081
static int
 
1082
syncprov_op_abandon( Operation *op, SlapReply *rs )
 
1083
{
 
1084
        slap_overinst           *on = (slap_overinst *)op->o_bd->bd_info;
 
1085
        syncprov_info_t         *si = on->on_bi.bi_private;
 
1086
        syncops *so, *soprev;
 
1087
 
 
1088
        ldap_pvt_thread_mutex_lock( &si->si_ops_mutex );
 
1089
        for ( so=si->si_ops, soprev = (syncops *)&si->si_ops; so;
 
1090
                soprev=so, so=so->s_next ) {
 
1091
                if ( so->s_op->o_connid == op->o_connid &&
 
1092
                        so->s_op->o_msgid == op->orn_msgid ) {
 
1093
                                so->s_op->o_abandon = 1;
 
1094
                                soprev->s_next = so->s_next;
 
1095
                                break;
 
1096
                }
 
1097
        }
 
1098
        ldap_pvt_thread_mutex_unlock( &si->si_ops_mutex );
 
1099
        if ( so ) {
 
1100
                /* Is this really a Cancel exop? */
 
1101
                if ( op->o_tag != LDAP_REQ_ABANDON ) {
 
1102
                        so->s_op->o_cancel = SLAP_CANCEL_ACK;
 
1103
                        rs->sr_err = LDAP_CANCELLED;
 
1104
                        send_ldap_result( so->s_op, rs );
 
1105
                        if ( so->s_flags & PS_IS_DETACHED ) {
 
1106
                                slap_callback *cb;
 
1107
                                cb = op->o_tmpcalloc( 1, sizeof(slap_callback), op->o_tmpmemctx );
 
1108
                                cb->sc_cleanup = syncprov_ab_cleanup;
 
1109
                                cb->sc_next = op->o_callback;
 
1110
                                cb->sc_private = so;
 
1111
                                return SLAP_CB_CONTINUE;
 
1112
                        }
 
1113
                }
 
1114
                syncprov_drop_psearch( so, 0 );
 
1115
        }
 
1116
        return SLAP_CB_CONTINUE;
 
1117
}
 
1118
 
 
1119
/* Find which persistent searches are affected by this operation */
 
1120
static void
 
1121
syncprov_matchops( Operation *op, opcookie *opc, int saveit )
 
1122
{
 
1123
        slap_overinst *on = opc->son;
 
1124
        syncprov_info_t         *si = on->on_bi.bi_private;
 
1125
 
 
1126
        fbase_cookie fc;
 
1127
        syncops *ss, *sprev, *snext;
 
1128
        Entry *e = NULL;
 
1129
        Attribute *a;
 
1130
        int rc;
 
1131
        struct berval newdn;
 
1132
        int freefdn = 0;
 
1133
        BackendDB *b0 = op->o_bd, db;
 
1134
 
 
1135
        fc.fdn = &op->o_req_ndn;
 
1136
        /* compute new DN */
 
1137
        if ( op->o_tag == LDAP_REQ_MODRDN && !saveit ) {
 
1138
                struct berval pdn;
 
1139
                if ( op->orr_nnewSup ) pdn = *op->orr_nnewSup;
 
1140
                else dnParent( fc.fdn, &pdn );
 
1141
                build_new_dn( &newdn, &pdn, &op->orr_nnewrdn, op->o_tmpmemctx );
 
1142
                fc.fdn = &newdn;
 
1143
                freefdn = 1;
 
1144
        }
 
1145
        if ( op->o_tag != LDAP_REQ_ADD ) {
 
1146
                if ( !SLAP_ISOVERLAY( op->o_bd )) {
 
1147
                        db = *op->o_bd;
 
1148
                        op->o_bd = &db;
 
1149
                }
 
1150
                rc = overlay_entry_get_ov( op, fc.fdn, NULL, NULL, 0, &e, on );
 
1151
                /* If we're sending responses now, make a copy and unlock the DB */
 
1152
                if ( e && !saveit ) {
 
1153
                        Entry *e2 = entry_dup( e );
 
1154
                        overlay_entry_release_ov( op, e, 0, on );
 
1155
                        e = e2;
 
1156
                }
 
1157
                if ( rc ) {
 
1158
                        op->o_bd = b0;
 
1159
                        return;
 
1160
                }
 
1161
        } else {
 
1162
                e = op->ora_e;
 
1163
        }
 
1164
 
 
1165
        if ( saveit || op->o_tag == LDAP_REQ_ADD ) {
 
1166
                ber_dupbv_x( &opc->sdn, &e->e_name, op->o_tmpmemctx );
 
1167
                ber_dupbv_x( &opc->sndn, &e->e_nname, op->o_tmpmemctx );
 
1168
                opc->sreference = is_entry_referral( e );
 
1169
                a = attr_find( e->e_attrs, slap_schema.si_ad_entryUUID );
 
1170
                if ( a )
 
1171
                        ber_dupbv_x( &opc->suuid, &a->a_nvals[0], op->o_tmpmemctx );
 
1172
        } else if ( op->o_tag == LDAP_REQ_MODRDN && !saveit ) {
 
1173
                op->o_tmpfree( opc->sndn.bv_val, op->o_tmpmemctx );
 
1174
                op->o_tmpfree( opc->sdn.bv_val, op->o_tmpmemctx );
 
1175
                ber_dupbv_x( &opc->sdn, &e->e_name, op->o_tmpmemctx );
 
1176
                ber_dupbv_x( &opc->sndn, &e->e_nname, op->o_tmpmemctx );
 
1177
        }
 
1178
 
 
1179
        ldap_pvt_thread_mutex_lock( &si->si_ops_mutex );
 
1180
        for (ss = si->si_ops, sprev = (syncops *)&si->si_ops; ss;
 
1181
                sprev = ss, ss=snext)
 
1182
        {
 
1183
                Operation op2;
 
1184
                syncmatches *sm;
 
1185
                int found = 0;
 
1186
 
 
1187
                snext = ss->s_next;
 
1188
                if ( ss->s_op->o_abandon )
 
1189
                        continue;
 
1190
 
 
1191
                /* validate base */
 
1192
                fc.fss = ss;
 
1193
                fc.fbase = 0;
 
1194
                fc.fscope = 0;
 
1195
 
 
1196
                /* If the base of the search is missing, signal a refresh */
 
1197
                rc = syncprov_findbase( op, &fc );
 
1198
                if ( rc != LDAP_SUCCESS ) {
 
1199
                        SlapReply rs = {REP_RESULT};
 
1200
                        send_ldap_error( ss->s_op, &rs, LDAP_SYNC_REFRESH_REQUIRED,
 
1201
                                "search base has changed" );
 
1202
                        sprev->s_next = snext;
 
1203
                        syncprov_drop_psearch( ss, 1 );
 
1204
                        ss = sprev;
 
1205
                        continue;
 
1206
                }
 
1207
 
 
1208
 
 
1209
                /* If we're sending results now, look for this op in old matches */
 
1210
                if ( !saveit ) {
 
1211
                        syncmatches *old;
 
1212
 
 
1213
                        /* Did we modify the search base? */
 
1214
                        if ( dn_match( &op->o_req_ndn, &ss->s_base )) {
 
1215
                                ldap_pvt_thread_mutex_lock( &ss->s_mutex );
 
1216
                                ss->s_flags |= PS_WROTE_BASE;
 
1217
                                ldap_pvt_thread_mutex_unlock( &ss->s_mutex );
 
1218
                        }
 
1219
 
 
1220
                        for ( sm=opc->smatches, old=(syncmatches *)&opc->smatches; sm;
 
1221
                                old=sm, sm=sm->sm_next ) {
 
1222
                                if ( sm->sm_op == ss ) {
 
1223
                                        found = 1;
 
1224
                                        old->sm_next = sm->sm_next;
 
1225
                                        op->o_tmpfree( sm, op->o_tmpmemctx );
 
1226
                                        break;
 
1227
                                }
 
1228
                        }
 
1229
                }
 
1230
 
 
1231
                if ( fc.fscope ) {
 
1232
                        op2 = *ss->s_op;
 
1233
                        op2.o_hdr = op->o_hdr;
 
1234
                        op2.o_extra = op->o_extra;
 
1235
                }
 
1236
 
 
1237
                /* check if current o_req_dn is in scope and matches filter */
 
1238
                if ( fc.fscope && test_filter( &op2, e, ss->s_op->ors_filter ) ==
 
1239
                        LDAP_COMPARE_TRUE ) {
 
1240
                        if ( saveit ) {
 
1241
                                sm = op->o_tmpalloc( sizeof(syncmatches), op->o_tmpmemctx );
 
1242
                                sm->sm_next = opc->smatches;
 
1243
                                sm->sm_op = ss;
 
1244
                                ldap_pvt_thread_mutex_lock( &ss->s_mutex );
 
1245
                                ++ss->s_inuse;
 
1246
                                ldap_pvt_thread_mutex_unlock( &ss->s_mutex );
 
1247
                                opc->smatches = sm;
 
1248
                        } else {
 
1249
                                /* if found send UPDATE else send ADD */
 
1250
                                syncprov_qresp( opc, ss,
 
1251
                                        found ? LDAP_SYNC_MODIFY : LDAP_SYNC_ADD );
 
1252
                        }
 
1253
                } else if ( !saveit && found ) {
 
1254
                        /* send DELETE */
 
1255
                        syncprov_qresp( opc, ss, LDAP_SYNC_DELETE );
 
1256
                }
 
1257
        }
 
1258
        ldap_pvt_thread_mutex_unlock( &si->si_ops_mutex );
 
1259
 
 
1260
        if ( op->o_tag != LDAP_REQ_ADD && e ) {
 
1261
                if ( !SLAP_ISOVERLAY( op->o_bd )) {
 
1262
                        op->o_bd = &db;
 
1263
                }
 
1264
                overlay_entry_release_ov( op, e, 0, on );
 
1265
                op->o_bd = b0;
 
1266
        }
 
1267
        if ( freefdn ) {
 
1268
                op->o_tmpfree( fc.fdn->bv_val, op->o_tmpmemctx );
 
1269
        }
 
1270
        op->o_bd = b0;
 
1271
}
 
1272
 
 
1273
static int
 
1274
syncprov_op_cleanup( Operation *op, SlapReply *rs )
 
1275
{
 
1276
        slap_callback *cb = op->o_callback;
 
1277
        opcookie *opc = cb->sc_private;
 
1278
        slap_overinst *on = opc->son;
 
1279
        syncprov_info_t         *si = on->on_bi.bi_private;
 
1280
        syncmatches *sm, *snext;
 
1281
        modtarget *mt, mtdummy;
 
1282
 
 
1283
        for (sm = opc->smatches; sm; sm=snext) {
 
1284
                snext = sm->sm_next;
 
1285
                syncprov_free_syncop( sm->sm_op );
 
1286
                op->o_tmpfree( sm, op->o_tmpmemctx );
 
1287
        }
 
1288
 
 
1289
        /* Remove op from lock table */
 
1290
        mtdummy.mt_op = op;
 
1291
        ldap_pvt_thread_mutex_lock( &si->si_mods_mutex );
 
1292
        mt = avl_find( si->si_mods, &mtdummy, sp_avl_cmp );
 
1293
        if ( mt ) {
 
1294
                modinst *mi = mt->mt_mods;
 
1295
 
 
1296
                /* If there are more, promote the next one */
 
1297
                ldap_pvt_thread_mutex_lock( &mt->mt_mutex );
 
1298
                if ( mi->mi_next ) {
 
1299
                        mt->mt_mods = mi->mi_next;
 
1300
                        mt->mt_op = mt->mt_mods->mi_op;
 
1301
                        ldap_pvt_thread_mutex_unlock( &mt->mt_mutex );
 
1302
                } else {
 
1303
                        avl_delete( &si->si_mods, mt, sp_avl_cmp );
 
1304
                        ldap_pvt_thread_mutex_unlock( &mt->mt_mutex );
 
1305
                        ldap_pvt_thread_mutex_destroy( &mt->mt_mutex );
 
1306
                        ch_free( mt );
 
1307
                }
 
1308
        }
 
1309
        ldap_pvt_thread_mutex_unlock( &si->si_mods_mutex );
 
1310
        if ( !BER_BVISNULL( &opc->suuid ))
 
1311
                op->o_tmpfree( opc->suuid.bv_val, op->o_tmpmemctx );
 
1312
        if ( !BER_BVISNULL( &opc->sndn ))
 
1313
                op->o_tmpfree( opc->sndn.bv_val, op->o_tmpmemctx );
 
1314
        if ( !BER_BVISNULL( &opc->sdn ))
 
1315
                op->o_tmpfree( opc->sdn.bv_val, op->o_tmpmemctx );
 
1316
        op->o_callback = cb->sc_next;
 
1317
        op->o_tmpfree(cb, op->o_tmpmemctx);
 
1318
 
 
1319
        return 0;
 
1320
}
 
1321
 
 
1322
static void
 
1323
syncprov_checkpoint( Operation *op, SlapReply *rs, slap_overinst *on )
 
1324
{
 
1325
        syncprov_info_t *si = (syncprov_info_t *)on->on_bi.bi_private;
 
1326
        Modifications mod;
 
1327
        Operation opm;
 
1328
        SlapReply rsm = { 0 };
 
1329
        slap_callback cb = {0};
 
1330
        BackendDB be;
 
1331
 
 
1332
        mod.sml_numvals = si->si_numcsns;
 
1333
        mod.sml_values = si->si_ctxcsn;
 
1334
        mod.sml_nvalues = NULL;
 
1335
        mod.sml_desc = slap_schema.si_ad_contextCSN;
 
1336
        mod.sml_op = LDAP_MOD_REPLACE;
 
1337
        mod.sml_flags = 0;
 
1338
        mod.sml_next = NULL;
 
1339
 
 
1340
        cb.sc_response = slap_null_cb;
 
1341
        opm = *op;
 
1342
        opm.o_tag = LDAP_REQ_MODIFY;
 
1343
        opm.o_callback = &cb;
 
1344
        opm.orm_modlist = &mod;
 
1345
        opm.orm_no_opattrs = 1;
 
1346
        if ( SLAP_GLUE_SUBORDINATE( op->o_bd )) {
 
1347
                be = *on->on_info->oi_origdb;
 
1348
                opm.o_bd = &be;
 
1349
        }
 
1350
        opm.o_req_dn = opm.o_bd->be_suffix[0];
 
1351
        opm.o_req_ndn = opm.o_bd->be_nsuffix[0];
 
1352
        opm.o_bd->bd_info = on->on_info->oi_orig;
 
1353
        opm.o_managedsait = SLAP_CONTROL_NONCRITICAL;
 
1354
        opm.o_no_schema_check = 1;
 
1355
        opm.o_bd->be_modify( &opm, &rsm );
 
1356
        if ( mod.sml_next != NULL ) {
 
1357
                slap_mods_free( mod.sml_next, 1 );
 
1358
        }
 
1359
}
 
1360
 
 
1361
static void
 
1362
syncprov_add_slog( Operation *op )
 
1363
{
 
1364
        opcookie *opc = op->o_callback->sc_private;
 
1365
        slap_overinst *on = opc->son;
 
1366
        syncprov_info_t         *si = on->on_bi.bi_private;
 
1367
        sessionlog *sl;
 
1368
        slog_entry *se;
 
1369
 
 
1370
        sl = si->si_logs;
 
1371
        {
 
1372
                /* Allocate a record. UUIDs are not NUL-terminated. */
 
1373
                se = ch_malloc( sizeof( slog_entry ) + opc->suuid.bv_len + 
 
1374
                        op->o_csn.bv_len + 1 );
 
1375
                se->se_next = NULL;
 
1376
                se->se_tag = op->o_tag;
 
1377
 
 
1378
                se->se_uuid.bv_val = (char *)(&se[1]);
 
1379
                AC_MEMCPY( se->se_uuid.bv_val, opc->suuid.bv_val, opc->suuid.bv_len );
 
1380
                se->se_uuid.bv_len = opc->suuid.bv_len;
 
1381
 
 
1382
                se->se_csn.bv_val = se->se_uuid.bv_val + opc->suuid.bv_len;
 
1383
                AC_MEMCPY( se->se_csn.bv_val, op->o_csn.bv_val, op->o_csn.bv_len );
 
1384
                se->se_csn.bv_val[op->o_csn.bv_len] = '\0';
 
1385
                se->se_csn.bv_len = op->o_csn.bv_len;
 
1386
                se->se_sid = slap_parse_csn_sid( &se->se_csn );
 
1387
 
 
1388
                ldap_pvt_thread_mutex_lock( &sl->sl_mutex );
 
1389
                if ( sl->sl_head ) {
 
1390
                        sl->sl_tail->se_next = se;
 
1391
                } else {
 
1392
                        sl->sl_head = se;
 
1393
                }
 
1394
                sl->sl_tail = se;
 
1395
                sl->sl_num++;
 
1396
                while ( sl->sl_num > sl->sl_size ) {
 
1397
                        se = sl->sl_head;
 
1398
                        sl->sl_head = se->se_next;
 
1399
                        strcpy( sl->sl_mincsn.bv_val, se->se_csn.bv_val );
 
1400
                        sl->sl_mincsn.bv_len = se->se_csn.bv_len;
 
1401
                        ch_free( se );
 
1402
                        sl->sl_num--;
 
1403
                }
 
1404
                ldap_pvt_thread_mutex_unlock( &sl->sl_mutex );
 
1405
        }
 
1406
}
 
1407
 
 
1408
/* Just set a flag if we found the matching entry */
 
1409
static int
 
1410
playlog_cb( Operation *op, SlapReply *rs )
 
1411
{
 
1412
        if ( rs->sr_type == REP_SEARCH ) {
 
1413
                op->o_callback->sc_private = (void *)1;
 
1414
        }
 
1415
        return rs->sr_err;
 
1416
}
 
1417
 
 
1418
/* enter with sl->sl_mutex locked, release before returning */
 
1419
static void
 
1420
syncprov_playlog( Operation *op, SlapReply *rs, sessionlog *sl,
 
1421
        sync_control *srs, BerVarray ctxcsn, int numcsns, int *sids )
 
1422
{
 
1423
        slap_overinst           *on = (slap_overinst *)op->o_bd->bd_info;
 
1424
        slog_entry *se;
 
1425
        int i, j, ndel, num, nmods, mmods;
 
1426
        char cbuf[LDAP_LUTIL_CSNSTR_BUFSIZE];
 
1427
        BerVarray uuids;
 
1428
        struct berval delcsn[2];
 
1429
 
 
1430
        if ( !sl->sl_num ) {
 
1431
                ldap_pvt_thread_mutex_unlock( &sl->sl_mutex );
 
1432
                return;
 
1433
        }
 
1434
 
 
1435
        num = sl->sl_num;
 
1436
        i = 0;
 
1437
        nmods = 0;
 
1438
 
 
1439
        uuids = op->o_tmpalloc( (num+1) * sizeof( struct berval ) +
 
1440
                num * UUID_LEN, op->o_tmpmemctx );
 
1441
        uuids[0].bv_val = (char *)(uuids + num + 1);
 
1442
 
 
1443
        delcsn[0].bv_len = 0;
 
1444
        delcsn[0].bv_val = cbuf;
 
1445
        BER_BVZERO(&delcsn[1]);
 
1446
 
 
1447
        /* Make a copy of the relevant UUIDs. Put the Deletes up front
 
1448
         * and everything else at the end. Do this first so we can
 
1449
         * unlock the list mutex.
 
1450
         */
 
1451
        Debug( LDAP_DEBUG_SYNC, "srs csn %s\n",
 
1452
                srs->sr_state.ctxcsn[0].bv_val, 0, 0 );
 
1453
        for ( se=sl->sl_head; se; se=se->se_next ) {
 
1454
                int k;
 
1455
                Debug( LDAP_DEBUG_SYNC, "log csn %s\n", se->se_csn.bv_val, 0, 0 );
 
1456
                ndel = 1;
 
1457
                for ( k=0; k<srs->sr_state.numcsns; k++ ) {
 
1458
                        if ( se->se_sid == srs->sr_state.sids[k] ) {
 
1459
                                ndel = ber_bvcmp( &se->se_csn, &srs->sr_state.ctxcsn[k] );
 
1460
                                break;
 
1461
                        }
 
1462
                }
 
1463
                if ( ndel <= 0 ) {
 
1464
                        Debug( LDAP_DEBUG_SYNC, "cmp %d, too old\n", ndel, 0, 0 );
 
1465
                        continue;
 
1466
                }
 
1467
                ndel = 0;
 
1468
                for ( k=0; k<numcsns; k++ ) {
 
1469
                        if ( se->se_sid == sids[k] ) {
 
1470
                                ndel = ber_bvcmp( &se->se_csn, &ctxcsn[k] );
 
1471
                                break;
 
1472
                        }
 
1473
                }
 
1474
                if ( ndel > 0 ) {
 
1475
                        Debug( LDAP_DEBUG_SYNC, "cmp %d, too new\n", ndel, 0, 0 );
 
1476
                        break;
 
1477
                }
 
1478
                if ( se->se_tag == LDAP_REQ_DELETE ) {
 
1479
                        j = i;
 
1480
                        i++;
 
1481
                        AC_MEMCPY( cbuf, se->se_csn.bv_val, se->se_csn.bv_len );
 
1482
                        delcsn[0].bv_len = se->se_csn.bv_len;
 
1483
                        delcsn[0].bv_val[delcsn[0].bv_len] = '\0';
 
1484
                } else {
 
1485
                        nmods++;
 
1486
                        j = num - nmods;
 
1487
                }
 
1488
                uuids[j].bv_val = uuids[0].bv_val + (j * UUID_LEN);
 
1489
                AC_MEMCPY(uuids[j].bv_val, se->se_uuid.bv_val, UUID_LEN);
 
1490
                uuids[j].bv_len = UUID_LEN;
 
1491
        }
 
1492
        ldap_pvt_thread_mutex_unlock( &sl->sl_mutex );
 
1493
 
 
1494
        ndel = i;
 
1495
 
 
1496
        /* Zero out unused slots */
 
1497
        for ( i=ndel; i < num - nmods; i++ )
 
1498
                uuids[i].bv_len = 0;
 
1499
 
 
1500
        /* Mods must be validated to see if they belong in this delete set.
 
1501
         */
 
1502
 
 
1503
        mmods = nmods;
 
1504
        /* Strip any duplicates */
 
1505
        for ( i=0; i<nmods; i++ ) {
 
1506
                for ( j=0; j<ndel; j++ ) {
 
1507
                        if ( bvmatch( &uuids[j], &uuids[num - 1 - i] )) {
 
1508
                                uuids[num - 1 - i].bv_len = 0;
 
1509
                                mmods --;
 
1510
                                break;
 
1511
                        }
 
1512
                }
 
1513
                if ( uuids[num - 1 - i].bv_len == 0 ) continue;
 
1514
                for ( j=0; j<i; j++ ) {
 
1515
                        if ( bvmatch( &uuids[num - 1 - j], &uuids[num - 1 - i] )) {
 
1516
                                uuids[num - 1 - i].bv_len = 0;
 
1517
                                mmods --;
 
1518
                                break;
 
1519
                        }
 
1520
                }
 
1521
        }
 
1522
 
 
1523
        if ( mmods ) {
 
1524
                Operation fop;
 
1525
                SlapReply frs = { REP_RESULT };
 
1526
                int rc;
 
1527
                Filter mf, af;
 
1528
                AttributeAssertion eq = ATTRIBUTEASSERTION_INIT;
 
1529
                slap_callback cb = {0};
 
1530
 
 
1531
                fop = *op;
 
1532
 
 
1533
                fop.o_sync_mode = 0;
 
1534
                fop.o_callback = &cb;
 
1535
                fop.ors_limit = NULL;
 
1536
                fop.ors_tlimit = SLAP_NO_LIMIT;
 
1537
                fop.ors_attrs = slap_anlist_all_attributes;
 
1538
                fop.ors_attrsonly = 0;
 
1539
                fop.o_managedsait = SLAP_CONTROL_CRITICAL;
 
1540
 
 
1541
                af.f_choice = LDAP_FILTER_AND;
 
1542
                af.f_next = NULL;
 
1543
                af.f_and = &mf;
 
1544
                mf.f_choice = LDAP_FILTER_EQUALITY;
 
1545
                mf.f_ava = &eq;
 
1546
                mf.f_av_desc = slap_schema.si_ad_entryUUID;
 
1547
                mf.f_next = fop.ors_filter;
 
1548
 
 
1549
                fop.ors_filter = &af;
 
1550
 
 
1551
                cb.sc_response = playlog_cb;
 
1552
                fop.o_bd->bd_info = (BackendInfo *)on->on_info;
 
1553
 
 
1554
                for ( i=ndel; i<num; i++ ) {
 
1555
                        if ( uuids[i].bv_len == 0 ) continue;
 
1556
 
 
1557
                        mf.f_av_value = uuids[i];
 
1558
                        cb.sc_private = NULL;
 
1559
                        fop.ors_slimit = 1;
 
1560
                        frs.sr_nentries = 0;
 
1561
                        rc = fop.o_bd->be_search( &fop, &frs );
 
1562
 
 
1563
                        /* If entry was not found, add to delete list */
 
1564
                        if ( !cb.sc_private ) {
 
1565
                                uuids[ndel++] = uuids[i];
 
1566
                        }
 
1567
                }
 
1568
                fop.o_bd->bd_info = (BackendInfo *)on;
 
1569
        }
 
1570
        if ( ndel ) {
 
1571
                struct berval cookie;
 
1572
 
 
1573
                if ( delcsn[0].bv_len ) {
 
1574
                        slap_compose_sync_cookie( op, &cookie, delcsn, srs->sr_state.rid,
 
1575
                                srs->sr_state.sid );
 
1576
                }
 
1577
 
 
1578
                Debug( LDAP_DEBUG_SYNC, "syncprov_playlog: cookie=%s\n", cookie.bv_val, 0, 0 );
 
1579
 
 
1580
                uuids[ndel].bv_val = NULL;
 
1581
                syncprov_sendinfo( op, rs, LDAP_TAG_SYNC_ID_SET,
 
1582
                        delcsn[0].bv_len ? &cookie : NULL, 0, uuids, 1 );
 
1583
                op->o_tmpfree( cookie.bv_val, op->o_tmpmemctx );
 
1584
        }
 
1585
        op->o_tmpfree( uuids, op->o_tmpmemctx );
 
1586
}
 
1587
 
 
1588
static int
 
1589
syncprov_op_response( Operation *op, SlapReply *rs )
 
1590
{
 
1591
        opcookie *opc = op->o_callback->sc_private;
 
1592
        slap_overinst *on = opc->son;
 
1593
        syncprov_info_t         *si = on->on_bi.bi_private;
 
1594
        syncmatches *sm;
 
1595
 
 
1596
        if ( rs->sr_err == LDAP_SUCCESS )
 
1597
        {
 
1598
                struct berval maxcsn = BER_BVNULL;
 
1599
                char cbuf[LDAP_LUTIL_CSNSTR_BUFSIZE];
 
1600
                int do_check = 0, have_psearches;
 
1601
 
 
1602
                /* Update our context CSN */
 
1603
                cbuf[0] = '\0';
 
1604
                ldap_pvt_thread_rdwr_wlock( &si->si_csn_rwlock );
 
1605
                slap_get_commit_csn( op, &maxcsn );
 
1606
                if ( BER_BVISNULL( &maxcsn ) && SLAP_GLUE_SUBORDINATE( op->o_bd )) {
 
1607
                        /* syncrepl queues the CSN values in the db where
 
1608
                         * it is configured , not where the changes are made.
 
1609
                         * So look for a value in the glue db if we didn't
 
1610
                         * find any in this db.
 
1611
                         */
 
1612
                        BackendDB *be = op->o_bd;
 
1613
                        op->o_bd = select_backend( &be->be_nsuffix[0], 1);
 
1614
                        slap_get_commit_csn( op, &maxcsn );
 
1615
                        op->o_bd = be;
 
1616
                }
 
1617
                if ( !BER_BVISNULL( &maxcsn ) ) {
 
1618
                        int i, sid;
 
1619
                        strcpy( cbuf, maxcsn.bv_val );
 
1620
                        sid = slap_parse_csn_sid( &maxcsn );
 
1621
                        for ( i=0; i<si->si_numcsns; i++ ) {
 
1622
                                if ( sid == si->si_sids[i] ) {
 
1623
                                        if ( ber_bvcmp( &maxcsn, &si->si_ctxcsn[i] ) > 0 ) {
 
1624
                                                ber_bvreplace( &si->si_ctxcsn[i], &maxcsn );
 
1625
                                        }
 
1626
                                        break;
 
1627
                                }
 
1628
                        }
 
1629
                        /* It's a new SID for us */
 
1630
                        if ( i == si->si_numcsns ) {
 
1631
                                value_add_one( &si->si_ctxcsn, &maxcsn );
 
1632
                                si->si_numcsns++;
 
1633
                                si->si_sids = ch_realloc( si->si_sids, si->si_numcsns *
 
1634
                                        sizeof(int));
 
1635
                                si->si_sids[i] = sid;
 
1636
                        }
 
1637
                } else {
 
1638
                        /* internal ops that aren't meant to be replicated */
 
1639
                        ldap_pvt_thread_rdwr_wunlock( &si->si_csn_rwlock );
 
1640
                        return SLAP_CB_CONTINUE;
 
1641
                }
 
1642
 
 
1643
                /* Don't do any processing for consumer contextCSN updates */
 
1644
                if ( SLAP_SYNC_SHADOW( op->o_bd ) && 
 
1645
                        op->o_msgid == SLAP_SYNC_UPDATE_MSGID ) {
 
1646
                        ldap_pvt_thread_rdwr_wunlock( &si->si_csn_rwlock );
 
1647
                        return SLAP_CB_CONTINUE;
 
1648
                }
 
1649
 
 
1650
                si->si_numops++;
 
1651
                if ( si->si_chkops || si->si_chktime ) {
 
1652
                        if ( si->si_chkops && si->si_numops >= si->si_chkops ) {
 
1653
                                do_check = 1;
 
1654
                                si->si_numops = 0;
 
1655
                        }
 
1656
                        if ( si->si_chktime &&
 
1657
                                (op->o_time - si->si_chklast >= si->si_chktime )) {
 
1658
                                if ( si->si_chklast ) {
 
1659
                                        do_check = 1;
 
1660
                                        si->si_chklast = op->o_time;
 
1661
                                } else {
 
1662
                                        si->si_chklast = 1;
 
1663
                                }
 
1664
                        }
 
1665
                }
 
1666
                ldap_pvt_thread_rdwr_wunlock( &si->si_csn_rwlock );
 
1667
 
 
1668
                if ( do_check ) {
 
1669
                        ldap_pvt_thread_rdwr_rlock( &si->si_csn_rwlock );
 
1670
                        syncprov_checkpoint( op, rs, on );
 
1671
                        ldap_pvt_thread_rdwr_runlock( &si->si_csn_rwlock );
 
1672
                }
 
1673
 
 
1674
                opc->sctxcsn.bv_len = maxcsn.bv_len;
 
1675
                opc->sctxcsn.bv_val = cbuf;
 
1676
 
 
1677
                /* Handle any persistent searches */
 
1678
                ldap_pvt_thread_mutex_lock( &si->si_ops_mutex );
 
1679
                have_psearches = ( si->si_ops != NULL );
 
1680
                ldap_pvt_thread_mutex_unlock( &si->si_ops_mutex );
 
1681
                if ( have_psearches ) {
 
1682
                        switch(op->o_tag) {
 
1683
                        case LDAP_REQ_ADD:
 
1684
                        case LDAP_REQ_MODIFY:
 
1685
                        case LDAP_REQ_MODRDN:
 
1686
                        case LDAP_REQ_EXTENDED:
 
1687
                                syncprov_matchops( op, opc, 0 );
 
1688
                                break;
 
1689
                        case LDAP_REQ_DELETE:
 
1690
                                /* for each match in opc->smatches:
 
1691
                                 *   send DELETE msg
 
1692
                                 */
 
1693
                                for ( sm = opc->smatches; sm; sm=sm->sm_next ) {
 
1694
                                        if ( sm->sm_op->s_op->o_abandon )
 
1695
                                                continue;
 
1696
                                        syncprov_qresp( opc, sm->sm_op, LDAP_SYNC_DELETE );
 
1697
                                }
 
1698
                                break;
 
1699
                        }
 
1700
                }
 
1701
 
 
1702
                /* Add any log records */
 
1703
                if ( si->si_logs && op->o_tag != LDAP_REQ_ADD ) {
 
1704
                        syncprov_add_slog( op );
 
1705
                }
 
1706
 
 
1707
        }
 
1708
        return SLAP_CB_CONTINUE;
 
1709
}
 
1710
 
 
1711
/* We don't use a subentry to store the context CSN any more.
 
1712
 * We expose the current context CSN as an operational attribute
 
1713
 * of the suffix entry.
 
1714
 */
 
1715
static int
 
1716
syncprov_op_compare( Operation *op, SlapReply *rs )
 
1717
{
 
1718
        slap_overinst           *on = (slap_overinst *)op->o_bd->bd_info;
 
1719
        syncprov_info_t         *si = on->on_bi.bi_private;
 
1720
        int rc = SLAP_CB_CONTINUE;
 
1721
 
 
1722
        if ( dn_match( &op->o_req_ndn, op->o_bd->be_nsuffix ) &&
 
1723
                op->oq_compare.rs_ava->aa_desc == slap_schema.si_ad_contextCSN )
 
1724
        {
 
1725
                Entry e = {0};
 
1726
                Attribute a = {0};
 
1727
 
 
1728
                e.e_name = op->o_bd->be_suffix[0];
 
1729
                e.e_nname = op->o_bd->be_nsuffix[0];
 
1730
                e.e_attrs = &a;
 
1731
 
 
1732
                a.a_desc = slap_schema.si_ad_contextCSN;
 
1733
 
 
1734
                ldap_pvt_thread_rdwr_rlock( &si->si_csn_rwlock );
 
1735
 
 
1736
                a.a_vals = si->si_ctxcsn;
 
1737
                a.a_nvals = a.a_vals;
 
1738
 
 
1739
                rs->sr_err = access_allowed( op, &e, op->oq_compare.rs_ava->aa_desc,
 
1740
                        &op->oq_compare.rs_ava->aa_value, ACL_COMPARE, NULL );
 
1741
                if ( ! rs->sr_err ) {
 
1742
                        rs->sr_err = LDAP_INSUFFICIENT_ACCESS;
 
1743
                        goto return_results;
 
1744
                }
 
1745
 
 
1746
                if ( get_assert( op ) &&
 
1747
                        ( test_filter( op, &e, get_assertion( op ) ) != LDAP_COMPARE_TRUE ) )
 
1748
                {
 
1749
                        rs->sr_err = LDAP_ASSERTION_FAILED;
 
1750
                        goto return_results;
 
1751
                }
 
1752
 
 
1753
 
 
1754
                rs->sr_err = LDAP_COMPARE_FALSE;
 
1755
 
 
1756
                if ( attr_valfind( &a,
 
1757
                        SLAP_MR_ATTRIBUTE_VALUE_NORMALIZED_MATCH |
 
1758
                                SLAP_MR_ASSERTED_VALUE_NORMALIZED_MATCH,
 
1759
                                &op->oq_compare.rs_ava->aa_value, NULL, op->o_tmpmemctx ) == 0 )
 
1760
                {
 
1761
                        rs->sr_err = LDAP_COMPARE_TRUE;
 
1762
                }
 
1763
 
 
1764
return_results:;
 
1765
 
 
1766
                ldap_pvt_thread_rdwr_runlock( &si->si_csn_rwlock );
 
1767
 
 
1768
                send_ldap_result( op, rs );
 
1769
 
 
1770
                if( rs->sr_err == LDAP_COMPARE_FALSE || rs->sr_err == LDAP_COMPARE_TRUE ) {
 
1771
                        rs->sr_err = LDAP_SUCCESS;
 
1772
                }
 
1773
                rc = rs->sr_err;
 
1774
        }
 
1775
 
 
1776
        return rc;
 
1777
}
 
1778
 
 
1779
static int
 
1780
syncprov_op_mod( Operation *op, SlapReply *rs )
 
1781
{
 
1782
        slap_overinst           *on = (slap_overinst *)op->o_bd->bd_info;
 
1783
        syncprov_info_t         *si = on->on_bi.bi_private;
 
1784
        slap_callback *cb;
 
1785
        opcookie *opc;
 
1786
        int have_psearches, cbsize;
 
1787
 
 
1788
        ldap_pvt_thread_mutex_lock( &si->si_ops_mutex );
 
1789
        have_psearches = ( si->si_ops != NULL );
 
1790
        ldap_pvt_thread_mutex_unlock( &si->si_ops_mutex );
 
1791
 
 
1792
        cbsize = sizeof(slap_callback) + sizeof(opcookie) +
 
1793
                (have_psearches ? sizeof(modinst) : 0 );
 
1794
 
 
1795
        cb = op->o_tmpcalloc(1, cbsize, op->o_tmpmemctx);
 
1796
        opc = (opcookie *)(cb+1);
 
1797
        opc->son = on;
 
1798
        cb->sc_response = syncprov_op_response;
 
1799
        cb->sc_cleanup = syncprov_op_cleanup;
 
1800
        cb->sc_private = opc;
 
1801
        cb->sc_next = op->o_callback;
 
1802
        op->o_callback = cb;
 
1803
 
 
1804
        /* If there are active persistent searches, lock this operation.
 
1805
         * See seqmod.c for the locking logic on its own.
 
1806
         */
 
1807
        if ( have_psearches ) {
 
1808
                modtarget *mt, mtdummy;
 
1809
                modinst *mi;
 
1810
 
 
1811
                mi = (modinst *)(opc+1);
 
1812
                mi->mi_op = op;
 
1813
 
 
1814
                /* See if we're already modifying this entry... */
 
1815
                mtdummy.mt_op = op;
 
1816
                ldap_pvt_thread_mutex_lock( &si->si_mods_mutex );
 
1817
                mt = avl_find( si->si_mods, &mtdummy, sp_avl_cmp );
 
1818
                if ( mt ) {
 
1819
                        ldap_pvt_thread_mutex_lock( &mt->mt_mutex );
 
1820
                        ldap_pvt_thread_mutex_unlock( &si->si_mods_mutex );
 
1821
                        mt->mt_tail->mi_next = mi;
 
1822
                        mt->mt_tail = mi;
 
1823
                        /* wait for this op to get to head of list */
 
1824
                        while ( mt->mt_mods != mi ) {
 
1825
                                ldap_pvt_thread_mutex_unlock( &mt->mt_mutex );
 
1826
                                /* FIXME: if dynamic config can delete overlays or
 
1827
                                 * databases we'll have to check for cleanup here.
 
1828
                                 * Currently it's not an issue because there are
 
1829
                                 * no dynamic config deletes...
 
1830
                                 */
 
1831
                                if ( !ldap_pvt_thread_pool_pausecheck( &connection_pool ))
 
1832
                                        ldap_pvt_thread_yield();
 
1833
                                ldap_pvt_thread_mutex_lock( &mt->mt_mutex );
 
1834
 
 
1835
                                /* clean up if the caller is giving up */
 
1836
                                if ( op->o_abandon ) {
 
1837
                                        modinst *m2;
 
1838
                                        for ( m2 = mt->mt_mods; m2->mi_next != mi;
 
1839
                                                m2 = m2->mi_next );
 
1840
                                        m2->mi_next = mi->mi_next;
 
1841
                                        if ( mt->mt_tail == mi ) mt->mt_tail = m2;
 
1842
                                        op->o_tmpfree( cb, op->o_tmpmemctx );
 
1843
                                        ldap_pvt_thread_mutex_unlock( &mt->mt_mutex );
 
1844
                                        return SLAPD_ABANDON;
 
1845
                                }
 
1846
                        }
 
1847
                        ldap_pvt_thread_mutex_unlock( &mt->mt_mutex );
 
1848
                } else {
 
1849
                        /* Record that we're modifying this entry now */
 
1850
                        mt = ch_malloc( sizeof(modtarget) );
 
1851
                        mt->mt_mods = mi;
 
1852
                        mt->mt_tail = mi;
 
1853
                        mt->mt_op = mi->mi_op;
 
1854
                        ldap_pvt_thread_mutex_init( &mt->mt_mutex );
 
1855
                        avl_insert( &si->si_mods, mt, sp_avl_cmp, avl_dup_error );
 
1856
                        ldap_pvt_thread_mutex_unlock( &si->si_mods_mutex );
 
1857
                }
 
1858
        }
 
1859
 
 
1860
        if (( have_psearches || si->si_logs ) && op->o_tag != LDAP_REQ_ADD )
 
1861
                syncprov_matchops( op, opc, 1 );
 
1862
 
 
1863
        return SLAP_CB_CONTINUE;
 
1864
}
 
1865
 
 
1866
static int
 
1867
syncprov_op_extended( Operation *op, SlapReply *rs )
 
1868
{
 
1869
        if ( exop_is_write( op ))
 
1870
                return syncprov_op_mod( op, rs );
 
1871
 
 
1872
        return SLAP_CB_CONTINUE;
 
1873
}
 
1874
 
 
1875
typedef struct searchstate {
 
1876
        slap_overinst *ss_on;
 
1877
        syncops *ss_so;
 
1878
        BerVarray ss_ctxcsn;
 
1879
        int *ss_sids;
 
1880
        int ss_numcsns;
 
1881
#define SS_PRESENT      0x01
 
1882
#define SS_CHANGED      0x02
 
1883
        int ss_flags;
 
1884
} searchstate;
 
1885
 
 
1886
static int
 
1887
syncprov_search_cleanup( Operation *op, SlapReply *rs )
 
1888
{
 
1889
        if ( rs->sr_ctrls ) {
 
1890
                op->o_tmpfree( rs->sr_ctrls[0], op->o_tmpmemctx );
 
1891
                op->o_tmpfree( rs->sr_ctrls, op->o_tmpmemctx );
 
1892
                rs->sr_ctrls = NULL;
 
1893
        }
 
1894
        return 0;
 
1895
}
 
1896
 
 
1897
typedef struct SyncOperationBuffer {
 
1898
        Operation               sob_op;
 
1899
        Opheader                sob_hdr;
 
1900
        OpExtra                 sob_oe;
 
1901
        AttributeName   sob_extra;      /* not always present */
 
1902
        /* Further data allocated here */
 
1903
} SyncOperationBuffer;
 
1904
 
 
1905
static void
 
1906
syncprov_detach_op( Operation *op, syncops *so, slap_overinst *on )
 
1907
{
 
1908
        SyncOperationBuffer *sopbuf2;
 
1909
        Operation *op2;
 
1910
        int i, alen = 0;
 
1911
        size_t size;
 
1912
        char *ptr;
 
1913
        GroupAssertion *g1, *g2;
 
1914
 
 
1915
        /* count the search attrs */
 
1916
        for (i=0; op->ors_attrs && !BER_BVISNULL( &op->ors_attrs[i].an_name ); i++) {
 
1917
                alen += op->ors_attrs[i].an_name.bv_len + 1;
 
1918
        }
 
1919
        /* Make a new copy of the operation */
 
1920
        size = offsetof( SyncOperationBuffer, sob_extra ) +
 
1921
                (i ? ( (i+1) * sizeof(AttributeName) + alen) : 0) +
 
1922
                op->o_req_dn.bv_len + 1 +
 
1923
                op->o_req_ndn.bv_len + 1 +
 
1924
                op->o_ndn.bv_len + 1 +
 
1925
                so->s_filterstr.bv_len + 1;
 
1926
        sopbuf2 = ch_calloc( 1, size );
 
1927
        op2 = &sopbuf2->sob_op;
 
1928
        op2->o_hdr = &sopbuf2->sob_hdr;
 
1929
        LDAP_SLIST_FIRST(&op2->o_extra) = &sopbuf2->sob_oe;
 
1930
 
 
1931
        /* Copy the fields we care about explicitly, leave the rest alone */
 
1932
        *op2->o_hdr = *op->o_hdr;
 
1933
        op2->o_tag = op->o_tag;
 
1934
        op2->o_time = op->o_time;
 
1935
        op2->o_bd = on->on_info->oi_origdb;
 
1936
        op2->o_request = op->o_request;
 
1937
        LDAP_SLIST_FIRST(&op2->o_extra)->oe_key = on;
 
1938
        LDAP_SLIST_NEXT(LDAP_SLIST_FIRST(&op2->o_extra), oe_next) = NULL;
 
1939
 
 
1940
        ptr = (char *) sopbuf2 + offsetof( SyncOperationBuffer, sob_extra );
 
1941
        if ( i ) {
 
1942
                op2->ors_attrs = (AttributeName *) ptr;
 
1943
                ptr = (char *) &op2->ors_attrs[i+1];
 
1944
                for (i=0; !BER_BVISNULL( &op->ors_attrs[i].an_name ); i++) {
 
1945
                        op2->ors_attrs[i] = op->ors_attrs[i];
 
1946
                        op2->ors_attrs[i].an_name.bv_val = ptr;
 
1947
                        ptr = lutil_strcopy( ptr, op->ors_attrs[i].an_name.bv_val ) + 1;
 
1948
                }
 
1949
                BER_BVZERO( &op2->ors_attrs[i].an_name );
 
1950
        }
 
1951
 
 
1952
        op2->o_authz = op->o_authz;
 
1953
        op2->o_ndn.bv_val = ptr;
 
1954
        ptr = lutil_strcopy(ptr, op->o_ndn.bv_val) + 1;
 
1955
        op2->o_dn = op2->o_ndn;
 
1956
        op2->o_req_dn.bv_len = op->o_req_dn.bv_len;
 
1957
        op2->o_req_dn.bv_val = ptr;
 
1958
        ptr = lutil_strcopy(ptr, op->o_req_dn.bv_val) + 1;
 
1959
        op2->o_req_ndn.bv_len = op->o_req_ndn.bv_len;
 
1960
        op2->o_req_ndn.bv_val = ptr;
 
1961
        ptr = lutil_strcopy(ptr, op->o_req_ndn.bv_val) + 1;
 
1962
        op2->ors_filterstr.bv_val = ptr;
 
1963
        strcpy( ptr, so->s_filterstr.bv_val );
 
1964
        op2->ors_filterstr.bv_len = so->s_filterstr.bv_len;
 
1965
 
 
1966
        /* Skip the AND/GE clause that we stuck on in front */
 
1967
        if ( so->s_flags & PS_FIX_FILTER ) {
 
1968
                op2->ors_filter = op->ors_filter->f_and->f_next;
 
1969
                so->s_flags ^= PS_FIX_FILTER;
 
1970
        } else {
 
1971
                op2->ors_filter = op->ors_filter;
 
1972
        }
 
1973
        op2->ors_filter = filter_dup( op2->ors_filter, NULL );
 
1974
        so->s_op = op2;
 
1975
 
 
1976
        /* Copy any cached group ACLs individually */
 
1977
        op2->o_groups = NULL;
 
1978
        for ( g1=op->o_groups; g1; g1=g1->ga_next ) {
 
1979
                g2 = ch_malloc( sizeof(GroupAssertion) + g1->ga_len );
 
1980
                *g2 = *g1;
 
1981
                strcpy( g2->ga_ndn, g1->ga_ndn );
 
1982
                g2->ga_next = op2->o_groups;
 
1983
                op2->o_groups = g2;
 
1984
        }
 
1985
        /* Don't allow any further group caching */
 
1986
        op2->o_do_not_cache = 1;
 
1987
 
 
1988
        /* Add op2 to conn so abandon will find us */
 
1989
        op->o_conn->c_n_ops_executing++;
 
1990
        op->o_conn->c_n_ops_completed--;
 
1991
        LDAP_STAILQ_INSERT_TAIL( &op->o_conn->c_ops, op2, o_next );
 
1992
        so->s_flags |= PS_IS_DETACHED;
 
1993
 
 
1994
        /* Prevent anyone else from trying to send a result for this op */
 
1995
        op->o_abandon = 1;
 
1996
}
 
1997
 
 
1998
static int
 
1999
syncprov_search_response( Operation *op, SlapReply *rs )
 
2000
{
 
2001
        searchstate *ss = op->o_callback->sc_private;
 
2002
        slap_overinst *on = ss->ss_on;
 
2003
        syncprov_info_t *si = (syncprov_info_t *)on->on_bi.bi_private;
 
2004
        sync_control *srs = op->o_controls[slap_cids.sc_LDAPsync];
 
2005
 
 
2006
        if ( rs->sr_type == REP_SEARCH || rs->sr_type == REP_SEARCHREF ) {
 
2007
                Attribute *a;
 
2008
                /* If we got a referral without a referral object, there's
 
2009
                 * something missing that we cannot replicate. Just ignore it.
 
2010
                 * The consumer will abort because we didn't send the expected
 
2011
                 * control.
 
2012
                 */
 
2013
                if ( !rs->sr_entry ) {
 
2014
                        assert( rs->sr_entry != NULL );
 
2015
                        Debug( LDAP_DEBUG_ANY, "bogus referral in context\n",0,0,0 );
 
2016
                        return SLAP_CB_CONTINUE;
 
2017
                }
 
2018
                a = attr_find( rs->sr_entry->e_attrs, slap_schema.si_ad_entryCSN );
 
2019
                if ( a == NULL && rs->sr_operational_attrs != NULL ) {
 
2020
                        a = attr_find( rs->sr_operational_attrs, slap_schema.si_ad_entryCSN );
 
2021
                }
 
2022
                if ( a ) {
 
2023
                        int i, sid;
 
2024
                        sid = slap_parse_csn_sid( &a->a_nvals[0] );
 
2025
 
 
2026
                        /* Don't send changed entries back to the originator */
 
2027
                        if ( sid == srs->sr_state.sid && srs->sr_state.numcsns ) {
 
2028
                                Debug( LDAP_DEBUG_SYNC,
 
2029
                                        "Entry %s changed by peer, ignored\n",
 
2030
                                        rs->sr_entry->e_name.bv_val, 0, 0 );
 
2031
                                return LDAP_SUCCESS;
 
2032
                        }
 
2033
 
 
2034
                        /* If not a persistent search */
 
2035
                        if ( !ss->ss_so ) {
 
2036
                                /* Make sure entry is less than the snapshot'd contextCSN */
 
2037
                                for ( i=0; i<ss->ss_numcsns; i++ ) {
 
2038
                                        if ( sid == ss->ss_sids[i] && ber_bvcmp( &a->a_nvals[0],
 
2039
                                                &ss->ss_ctxcsn[i] ) > 0 ) {
 
2040
                                                Debug( LDAP_DEBUG_SYNC,
 
2041
                                                        "Entry %s CSN %s greater than snapshot %s\n",
 
2042
                                                        rs->sr_entry->e_name.bv_val,
 
2043
                                                        a->a_nvals[0].bv_val,
 
2044
                                                        ss->ss_ctxcsn[i].bv_val );
 
2045
                                                return LDAP_SUCCESS;
 
2046
                                        }
 
2047
                                }
 
2048
                        }
 
2049
 
 
2050
                        /* Don't send old entries twice */
 
2051
                        if ( srs->sr_state.ctxcsn ) {
 
2052
                                for ( i=0; i<srs->sr_state.numcsns; i++ ) {
 
2053
                                        if ( sid == srs->sr_state.sids[i] &&
 
2054
                                                ber_bvcmp( &a->a_nvals[0],
 
2055
                                                        &srs->sr_state.ctxcsn[i] )<= 0 ) {
 
2056
                                                Debug( LDAP_DEBUG_SYNC,
 
2057
                                                        "Entry %s CSN %s older or equal to ctx %s\n",
 
2058
                                                        rs->sr_entry->e_name.bv_val,
 
2059
                                                        a->a_nvals[0].bv_val,
 
2060
                                                        srs->sr_state.ctxcsn[i].bv_val );
 
2061
                                                return LDAP_SUCCESS;
 
2062
                                        }
 
2063
                                }
 
2064
                        }
 
2065
                }
 
2066
                rs->sr_ctrls = op->o_tmpalloc( sizeof(LDAPControl *)*2,
 
2067
                        op->o_tmpmemctx );
 
2068
                rs->sr_ctrls[1] = NULL;
 
2069
                /* If we're in delta-sync mode, always send a cookie */
 
2070
                if ( si->si_nopres && si->si_usehint && a ) {
 
2071
                        struct berval cookie;
 
2072
                        slap_compose_sync_cookie( op, &cookie, a->a_nvals, srs->sr_state.rid, srs->sr_state.sid );
 
2073
                        rs->sr_err = syncprov_state_ctrl( op, rs, rs->sr_entry,
 
2074
                                LDAP_SYNC_ADD, rs->sr_ctrls, 0, 1, &cookie );
 
2075
                } else {
 
2076
                        rs->sr_err = syncprov_state_ctrl( op, rs, rs->sr_entry,
 
2077
                                LDAP_SYNC_ADD, rs->sr_ctrls, 0, 0, NULL );
 
2078
                }
 
2079
        } else if ( rs->sr_type == REP_RESULT && rs->sr_err == LDAP_SUCCESS ) {
 
2080
                struct berval cookie;
 
2081
 
 
2082
                if ( ss->ss_flags & SS_CHANGED ) {
 
2083
                        slap_compose_sync_cookie( op, &cookie, ss->ss_ctxcsn,
 
2084
                                srs->sr_state.rid, srs->sr_state.sid );
 
2085
 
 
2086
                        Debug( LDAP_DEBUG_SYNC, "syncprov_search_response: cookie=%s\n", cookie.bv_val, 0, 0 );
 
2087
                }
 
2088
 
 
2089
                /* Is this a regular refresh?
 
2090
                 * Note: refresh never gets here if there were no changes
 
2091
                 */
 
2092
                if ( !ss->ss_so ) {
 
2093
                        rs->sr_ctrls = op->o_tmpalloc( sizeof(LDAPControl *)*2,
 
2094
                                op->o_tmpmemctx );
 
2095
                        rs->sr_ctrls[1] = NULL;
 
2096
                        rs->sr_err = syncprov_done_ctrl( op, rs, rs->sr_ctrls,
 
2097
                                0, 1, &cookie, ( ss->ss_flags & SS_PRESENT ) ?  LDAP_SYNC_REFRESH_PRESENTS :
 
2098
                                        LDAP_SYNC_REFRESH_DELETES );
 
2099
                        op->o_tmpfree( cookie.bv_val, op->o_tmpmemctx );
 
2100
                } else {
 
2101
                /* It's RefreshAndPersist, transition to Persist phase */
 
2102
                        syncprov_sendinfo( op, rs, ( ss->ss_flags & SS_PRESENT ) ?
 
2103
                                LDAP_TAG_SYNC_REFRESH_PRESENT : LDAP_TAG_SYNC_REFRESH_DELETE,
 
2104
                                ( ss->ss_flags & SS_CHANGED ) ? &cookie : NULL,
 
2105
                                1, NULL, 0 );
 
2106
                        if ( ss->ss_flags & SS_CHANGED )
 
2107
                                op->o_tmpfree( cookie.bv_val, op->o_tmpmemctx );
 
2108
 
 
2109
                        /* Detach this Op from frontend control */
 
2110
                        ldap_pvt_thread_mutex_lock( &ss->ss_so->s_mutex );
 
2111
                        ldap_pvt_thread_mutex_lock( &op->o_conn->c_mutex );
 
2112
 
 
2113
                        /* But not if this connection was closed along the way */
 
2114
                        if ( op->o_abandon ) {
 
2115
                                ldap_pvt_thread_mutex_unlock( &op->o_conn->c_mutex );
 
2116
                                ldap_pvt_thread_mutex_unlock( &ss->ss_so->s_mutex );
 
2117
                                /* syncprov_ab_cleanup will free this syncop */
 
2118
                                return SLAPD_ABANDON;
 
2119
 
 
2120
                        } else {
 
2121
                                /* Turn off the refreshing flag */
 
2122
                                ss->ss_so->s_flags ^= PS_IS_REFRESHING;
 
2123
 
 
2124
                                syncprov_detach_op( op, ss->ss_so, on );
 
2125
 
 
2126
                                ldap_pvt_thread_mutex_unlock( &op->o_conn->c_mutex );
 
2127
 
 
2128
                                /* If there are queued responses, fire them off */
 
2129
                                if ( ss->ss_so->s_res )
 
2130
                                        syncprov_qstart( ss->ss_so );
 
2131
                        }
 
2132
                        ldap_pvt_thread_mutex_unlock( &ss->ss_so->s_mutex );
 
2133
 
 
2134
                        return LDAP_SUCCESS;
 
2135
                }
 
2136
        }
 
2137
 
 
2138
        return SLAP_CB_CONTINUE;
 
2139
}
 
2140
 
 
2141
static int
 
2142
syncprov_op_search( Operation *op, SlapReply *rs )
 
2143
{
 
2144
        slap_overinst           *on = (slap_overinst *)op->o_bd->bd_info;
 
2145
        syncprov_info_t         *si = (syncprov_info_t *)on->on_bi.bi_private;
 
2146
        slap_callback   *cb;
 
2147
        int gotstate = 0, changed = 0, do_present = 0;
 
2148
        syncops *sop = NULL;
 
2149
        searchstate *ss;
 
2150
        sync_control *srs;
 
2151
        BerVarray ctxcsn;
 
2152
        int i, *sids, numcsns;
 
2153
        struct berval mincsn;
 
2154
 
 
2155
        if ( !(op->o_sync_mode & SLAP_SYNC_REFRESH) ) return SLAP_CB_CONTINUE;
 
2156
 
 
2157
        if ( op->ors_deref & LDAP_DEREF_SEARCHING ) {
 
2158
                send_ldap_error( op, rs, LDAP_PROTOCOL_ERROR, "illegal value for derefAliases" );
 
2159
                return rs->sr_err;
 
2160
        }
 
2161
 
 
2162
        srs = op->o_controls[slap_cids.sc_LDAPsync];
 
2163
        op->o_managedsait = SLAP_CONTROL_NONCRITICAL;
 
2164
 
 
2165
        /* If this is a persistent search, set it up right away */
 
2166
        if ( op->o_sync_mode & SLAP_SYNC_PERSIST ) {
 
2167
                syncops so = {0};
 
2168
                fbase_cookie fc;
 
2169
                opcookie opc;
 
2170
                slap_callback sc;
 
2171
 
 
2172
                fc.fss = &so;
 
2173
                fc.fbase = 0;
 
2174
                so.s_eid = NOID;
 
2175
                so.s_op = op;
 
2176
                so.s_flags = PS_IS_REFRESHING | PS_FIND_BASE;
 
2177
                /* syncprov_findbase expects to be called as a callback... */
 
2178
                sc.sc_private = &opc;
 
2179
                opc.son = on;
 
2180
                ldap_pvt_thread_mutex_init( &so.s_mutex );
 
2181
                cb = op->o_callback;
 
2182
                op->o_callback = &sc;
 
2183
                rs->sr_err = syncprov_findbase( op, &fc );
 
2184
                op->o_callback = cb;
 
2185
                ldap_pvt_thread_mutex_destroy( &so.s_mutex );
 
2186
 
 
2187
                if ( rs->sr_err != LDAP_SUCCESS ) {
 
2188
                        send_ldap_result( op, rs );
 
2189
                        return rs->sr_err;
 
2190
                }
 
2191
                sop = ch_malloc( sizeof( syncops ));
 
2192
                *sop = so;
 
2193
                ldap_pvt_thread_mutex_init( &sop->s_mutex );
 
2194
                sop->s_rid = srs->sr_state.rid;
 
2195
                sop->s_sid = srs->sr_state.sid;
 
2196
                sop->s_inuse = 1;
 
2197
 
 
2198
                ldap_pvt_thread_mutex_lock( &si->si_ops_mutex );
 
2199
                sop->s_next = si->si_ops;
 
2200
                si->si_ops = sop;
 
2201
                ldap_pvt_thread_mutex_unlock( &si->si_ops_mutex );
 
2202
        }
 
2203
 
 
2204
        /* snapshot the ctxcsn */
 
2205
        ldap_pvt_thread_rdwr_rlock( &si->si_csn_rwlock );
 
2206
        numcsns = si->si_numcsns;
 
2207
        if ( numcsns ) {
 
2208
                ber_bvarray_dup_x( &ctxcsn, si->si_ctxcsn, op->o_tmpmemctx );
 
2209
                sids = op->o_tmpalloc( numcsns * sizeof(int), op->o_tmpmemctx );
 
2210
                for ( i=0; i<numcsns; i++ )
 
2211
                        sids[i] = si->si_sids[i];
 
2212
        } else {
 
2213
                ctxcsn = NULL;
 
2214
                sids = NULL;
 
2215
        }
 
2216
        ldap_pvt_thread_rdwr_runlock( &si->si_csn_rwlock );
 
2217
        
 
2218
        /* If we have a cookie, handle the PRESENT lookups */
 
2219
        if ( srs->sr_state.ctxcsn ) {
 
2220
                sessionlog *sl;
 
2221
                int i, j;
 
2222
 
 
2223
                /* If we don't have any CSN of our own yet, pretend nothing
 
2224
                 * has changed.
 
2225
                 */
 
2226
                if ( !numcsns )
 
2227
                        goto no_change;
 
2228
 
 
2229
                if ( !si->si_nopres )
 
2230
                        do_present = SS_PRESENT;
 
2231
 
 
2232
                /* If there are SIDs we don't recognize in the cookie, drop them */
 
2233
                for (i=0; i<srs->sr_state.numcsns; ) {
 
2234
                        for (j=0; j<numcsns; j++) {
 
2235
                                if ( srs->sr_state.sids[i] == sids[j] ) {
 
2236
                                        break;
 
2237
                                }
 
2238
                        }
 
2239
                        /* not found */
 
2240
                        if ( j == numcsns ) {
 
2241
                                struct berval tmp = srs->sr_state.ctxcsn[i];
 
2242
                                j = srs->sr_state.numcsns - 1;
 
2243
                                srs->sr_state.ctxcsn[i] = srs->sr_state.ctxcsn[j];
 
2244
                                tmp.bv_len = 0;
 
2245
                                srs->sr_state.ctxcsn[j] = tmp;
 
2246
                                srs->sr_state.numcsns = j;
 
2247
                                srs->sr_state.sids[i] = srs->sr_state.sids[j];
 
2248
                                continue;
 
2249
                        }
 
2250
                        i++;
 
2251
                }
 
2252
 
 
2253
                /* Find the smallest CSN */
 
2254
                mincsn = srs->sr_state.ctxcsn[0];
 
2255
                for ( i=1; i<srs->sr_state.numcsns; i++ ) {
 
2256
                        if ( ber_bvcmp( &mincsn, &srs->sr_state.ctxcsn[i] ) > 0 )
 
2257
                                mincsn = srs->sr_state.ctxcsn[i];
 
2258
                }
 
2259
 
 
2260
                /* If nothing has changed, shortcut it */
 
2261
                if ( srs->sr_state.numcsns == numcsns ) {
 
2262
                        int i, j;
 
2263
                        for ( i=0; i<srs->sr_state.numcsns; i++ ) {
 
2264
                                for ( j=0; j<numcsns; j++ ) {
 
2265
                                        if ( srs->sr_state.sids[i] != sids[j] )
 
2266
                                                continue;
 
2267
                                        if ( !bvmatch( &srs->sr_state.ctxcsn[i], &ctxcsn[j] ))
 
2268
                                                changed = SS_CHANGED;
 
2269
                                        break;
 
2270
                                }
 
2271
                                if ( changed )
 
2272
                                        break;
 
2273
                        }
 
2274
                        if ( !changed ) {
 
2275
                                do_present = 0;
 
2276
no_change:              if ( !(op->o_sync_mode & SLAP_SYNC_PERSIST) ) {
 
2277
                                        LDAPControl     *ctrls[2];
 
2278
 
 
2279
                                        ctrls[0] = NULL;
 
2280
                                        ctrls[1] = NULL;
 
2281
                                        syncprov_done_ctrl( op, rs, ctrls, 0, 0,
 
2282
                                                NULL, LDAP_SYNC_REFRESH_DELETES );
 
2283
                                        rs->sr_ctrls = ctrls;
 
2284
                                        rs->sr_err = LDAP_SUCCESS;
 
2285
                                        send_ldap_result( op, rs );
 
2286
                                        rs->sr_ctrls = NULL;
 
2287
                                        return rs->sr_err;
 
2288
                                }
 
2289
                                goto shortcut;
 
2290
                        }
 
2291
                } else {
 
2292
                        /* consumer doesn't have the right number of CSNs */
 
2293
                        changed = SS_CHANGED;
 
2294
                }
 
2295
                /* Do we have a sessionlog for this search? */
 
2296
                sl=si->si_logs;
 
2297
                if ( sl ) {
 
2298
                        ldap_pvt_thread_mutex_lock( &sl->sl_mutex );
 
2299
                        /* Are there any log entries, and is the consumer state
 
2300
                         * present in the session log?
 
2301
                         */
 
2302
                        if ( sl->sl_num > 0 && ber_bvcmp( &mincsn, &sl->sl_mincsn ) >= 0 ) {
 
2303
                                do_present = 0;
 
2304
                                /* mutex is unlocked in playlog */
 
2305
                                syncprov_playlog( op, rs, sl, srs, ctxcsn, numcsns, sids );
 
2306
                        } else {
 
2307
                                ldap_pvt_thread_mutex_unlock( &sl->sl_mutex );
 
2308
                        }
 
2309
                }
 
2310
                /* Is the CSN still present in the database? */
 
2311
                if ( syncprov_findcsn( op, FIND_CSN ) != LDAP_SUCCESS ) {
 
2312
                        /* No, so a reload is required */
 
2313
                        /* the 2.2 consumer doesn't send this hint */
 
2314
                        if ( si->si_usehint && srs->sr_rhint == 0 ) {
 
2315
                                if ( ctxcsn )
 
2316
                                        ber_bvarray_free_x( ctxcsn, op->o_tmpmemctx );
 
2317
                                if ( sids )
 
2318
                                        op->o_tmpfree( sids, op->o_tmpmemctx );
 
2319
                                send_ldap_error( op, rs, LDAP_SYNC_REFRESH_REQUIRED, "sync cookie is stale" );
 
2320
                                return rs->sr_err;
 
2321
                        }
 
2322
                } else {
 
2323
                        gotstate = 1;
 
2324
                        /* If changed and doing Present lookup, send Present UUIDs */
 
2325
                        if ( do_present && syncprov_findcsn( op, FIND_PRESENT ) !=
 
2326
                                LDAP_SUCCESS ) {
 
2327
                                if ( ctxcsn )
 
2328
                                        ber_bvarray_free_x( ctxcsn, op->o_tmpmemctx );
 
2329
                                if ( sids )
 
2330
                                        op->o_tmpfree( sids, op->o_tmpmemctx );
 
2331
                                send_ldap_result( op, rs );
 
2332
                                return rs->sr_err;
 
2333
                        }
 
2334
                }
 
2335
        } else {
 
2336
                /* No consumer state, assume something has changed */
 
2337
                changed = SS_CHANGED;
 
2338
        }
 
2339
 
 
2340
shortcut:
 
2341
        /* Append CSN range to search filter, save original filter
 
2342
         * for persistent search evaluation
 
2343
         */
 
2344
        if ( sop ) {
 
2345
                sop->s_filterstr= op->ors_filterstr;
 
2346
        }
 
2347
 
 
2348
        /* If something changed, find the changes */
 
2349
        if ( gotstate && changed ) {
 
2350
                Filter *fand, *fava;
 
2351
 
 
2352
                fand = op->o_tmpalloc( sizeof(Filter), op->o_tmpmemctx );
 
2353
                fand->f_choice = LDAP_FILTER_AND;
 
2354
                fand->f_next = NULL;
 
2355
                fava = op->o_tmpalloc( sizeof(Filter), op->o_tmpmemctx );
 
2356
                fand->f_and = fava;
 
2357
                fava->f_choice = LDAP_FILTER_GE;
 
2358
                fava->f_ava = op->o_tmpalloc( sizeof(AttributeAssertion), op->o_tmpmemctx );
 
2359
                fava->f_ava->aa_desc = slap_schema.si_ad_entryCSN;
 
2360
#ifdef LDAP_COMP_MATCH
 
2361
                fava->f_ava->aa_cf = NULL;
 
2362
#endif
 
2363
                ber_dupbv_x( &fava->f_ava->aa_value, &mincsn, op->o_tmpmemctx );
 
2364
                fava->f_next = op->ors_filter;
 
2365
                op->ors_filter = fand;
 
2366
                filter2bv_x( op, op->ors_filter, &op->ors_filterstr );
 
2367
                if ( sop )
 
2368
                        sop->s_flags |= PS_FIX_FILTER;
 
2369
        }
 
2370
 
 
2371
        /* Let our callback add needed info to returned entries */
 
2372
        cb = op->o_tmpcalloc(1, sizeof(slap_callback)+sizeof(searchstate), op->o_tmpmemctx);
 
2373
        ss = (searchstate *)(cb+1);
 
2374
        ss->ss_on = on;
 
2375
        ss->ss_so = sop;
 
2376
        ss->ss_flags = do_present | changed;
 
2377
        ss->ss_ctxcsn = ctxcsn;
 
2378
        ss->ss_numcsns = numcsns;
 
2379
        ss->ss_sids = sids;
 
2380
        cb->sc_response = syncprov_search_response;
 
2381
        cb->sc_cleanup = syncprov_search_cleanup;
 
2382
        cb->sc_private = ss;
 
2383
        cb->sc_next = op->o_callback;
 
2384
        op->o_callback = cb;
 
2385
 
 
2386
        /* If this is a persistent search and no changes were reported during
 
2387
         * the refresh phase, just invoke the response callback to transition
 
2388
         * us into persist phase
 
2389
         */
 
2390
        if ( !changed ) {
 
2391
                rs->sr_err = LDAP_SUCCESS;
 
2392
                rs->sr_nentries = 0;
 
2393
                send_ldap_result( op, rs );
 
2394
                return rs->sr_err;
 
2395
        }
 
2396
        return SLAP_CB_CONTINUE;
 
2397
}
 
2398
 
 
2399
static int
 
2400
syncprov_operational(
 
2401
        Operation *op,
 
2402
        SlapReply *rs )
 
2403
{
 
2404
        slap_overinst           *on = (slap_overinst *)op->o_bd->bd_info;
 
2405
        syncprov_info_t         *si = (syncprov_info_t *)on->on_bi.bi_private;
 
2406
 
 
2407
        /* This prevents generating unnecessarily; frontend will strip
 
2408
         * any statically stored copy.
 
2409
         */
 
2410
        if ( op->o_sync != SLAP_CONTROL_NONE )
 
2411
                return SLAP_CB_CONTINUE;
 
2412
 
 
2413
        if ( rs->sr_entry &&
 
2414
                dn_match( &rs->sr_entry->e_nname, op->o_bd->be_nsuffix )) {
 
2415
 
 
2416
                if ( SLAP_OPATTRS( rs->sr_attr_flags ) ||
 
2417
                        ad_inlist( slap_schema.si_ad_contextCSN, rs->sr_attrs )) {
 
2418
                        Attribute *a, **ap = NULL;
 
2419
 
 
2420
                        for ( a=rs->sr_entry->e_attrs; a; a=a->a_next ) {
 
2421
                                if ( a->a_desc == slap_schema.si_ad_contextCSN )
 
2422
                                        break;
 
2423
                        }
 
2424
 
 
2425
                        ldap_pvt_thread_rdwr_rlock( &si->si_csn_rwlock );
 
2426
                        if ( si->si_ctxcsn ) {
 
2427
                                if ( !a ) {
 
2428
                                        for ( ap = &rs->sr_operational_attrs; *ap;
 
2429
                                                ap=&(*ap)->a_next );
 
2430
 
 
2431
                                        a = attr_alloc( slap_schema.si_ad_contextCSN );
 
2432
                                        *ap = a;
 
2433
                                }
 
2434
 
 
2435
                                if ( !ap ) {
 
2436
                                        if ( !(rs->sr_flags & REP_ENTRY_MODIFIABLE) ) {
 
2437
                                                Entry *e = entry_dup( rs->sr_entry );
 
2438
                                                if ( rs->sr_flags & REP_ENTRY_MUSTRELEASE ) {
 
2439
                                                        overlay_entry_release_ov( op, rs->sr_entry, 0, on );
 
2440
                                                        rs->sr_flags ^= REP_ENTRY_MUSTRELEASE;
 
2441
                                                } else if ( rs->sr_flags & REP_ENTRY_MUSTBEFREED ) {
 
2442
                                                        entry_free( rs->sr_entry );
 
2443
                                                }
 
2444
                                                rs->sr_entry = e;
 
2445
                                                rs->sr_flags |=
 
2446
                                                        REP_ENTRY_MODIFIABLE|REP_ENTRY_MUSTBEFREED;
 
2447
                                                a = attr_find( rs->sr_entry->e_attrs,
 
2448
                                                        slap_schema.si_ad_contextCSN );
 
2449
                                        }
 
2450
                                        if ( a->a_nvals != a->a_vals ) {
 
2451
                                                ber_bvarray_free( a->a_nvals );
 
2452
                                        }
 
2453
                                        a->a_nvals = NULL;
 
2454
                                        ber_bvarray_free( a->a_vals );
 
2455
                                        a->a_vals = NULL;
 
2456
                                        a->a_numvals = 0;
 
2457
                                }
 
2458
                                attr_valadd( a, si->si_ctxcsn, si->si_ctxcsn, si->si_numcsns );
 
2459
                        }
 
2460
                        ldap_pvt_thread_rdwr_runlock( &si->si_csn_rwlock );
 
2461
                }
 
2462
        }
 
2463
        return SLAP_CB_CONTINUE;
 
2464
}
 
2465
 
 
2466
enum {
 
2467
        SP_CHKPT = 1,
 
2468
        SP_SESSL,
 
2469
        SP_NOPRES,
 
2470
        SP_USEHINT
 
2471
};
 
2472
 
 
2473
static ConfigDriver sp_cf_gen;
 
2474
 
 
2475
static ConfigTable spcfg[] = {
 
2476
        { "syncprov-checkpoint", "ops> <minutes", 3, 3, 0, ARG_MAGIC|SP_CHKPT,
 
2477
                sp_cf_gen, "( OLcfgOvAt:1.1 NAME 'olcSpCheckpoint' "
 
2478
                        "DESC 'ContextCSN checkpoint interval in ops and minutes' "
 
2479
                        "SYNTAX OMsDirectoryString SINGLE-VALUE )", NULL, NULL },
 
2480
        { "syncprov-sessionlog", "ops", 2, 2, 0, ARG_INT|ARG_MAGIC|SP_SESSL,
 
2481
                sp_cf_gen, "( OLcfgOvAt:1.2 NAME 'olcSpSessionlog' "
 
2482
                        "DESC 'Session log size in ops' "
 
2483
                        "SYNTAX OMsInteger SINGLE-VALUE )", NULL, NULL },
 
2484
        { "syncprov-nopresent", NULL, 2, 2, 0, ARG_ON_OFF|ARG_MAGIC|SP_NOPRES,
 
2485
                sp_cf_gen, "( OLcfgOvAt:1.3 NAME 'olcSpNoPresent' "
 
2486
                        "DESC 'Omit Present phase processing' "
 
2487
                        "SYNTAX OMsBoolean SINGLE-VALUE )", NULL, NULL },
 
2488
        { "syncprov-reloadhint", NULL, 2, 2, 0, ARG_ON_OFF|ARG_MAGIC|SP_USEHINT,
 
2489
                sp_cf_gen, "( OLcfgOvAt:1.4 NAME 'olcSpReloadHint' "
 
2490
                        "DESC 'Observe Reload Hint in Request control' "
 
2491
                        "SYNTAX OMsBoolean SINGLE-VALUE )", NULL, NULL },
 
2492
        { NULL, NULL, 0, 0, 0, ARG_IGNORED }
 
2493
};
 
2494
 
 
2495
static ConfigOCs spocs[] = {
 
2496
        { "( OLcfgOvOc:1.1 "
 
2497
                "NAME 'olcSyncProvConfig' "
 
2498
                "DESC 'SyncRepl Provider configuration' "
 
2499
                "SUP olcOverlayConfig "
 
2500
                "MAY ( olcSpCheckpoint $ olcSpSessionlog $ olcSpNoPresent ) )",
 
2501
                        Cft_Overlay, spcfg },
 
2502
        { NULL, 0, NULL }
 
2503
};
 
2504
 
 
2505
static int
 
2506
sp_cf_gen(ConfigArgs *c)
 
2507
{
 
2508
        slap_overinst           *on = (slap_overinst *)c->bi;
 
2509
        syncprov_info_t         *si = (syncprov_info_t *)on->on_bi.bi_private;
 
2510
        int rc = 0;
 
2511
 
 
2512
        if ( c->op == SLAP_CONFIG_EMIT ) {
 
2513
                switch ( c->type ) {
 
2514
                case SP_CHKPT:
 
2515
                        if ( si->si_chkops || si->si_chktime ) {
 
2516
                                struct berval bv;
 
2517
                                bv.bv_len = snprintf( c->cr_msg, sizeof( c->cr_msg ),
 
2518
                                        "%d %d", si->si_chkops, si->si_chktime );
 
2519
                                if ( bv.bv_len < 0 || bv.bv_len >= sizeof( c->cr_msg ) ) {
 
2520
                                        rc = 1;
 
2521
                                } else {
 
2522
                                        bv.bv_val = c->cr_msg;
 
2523
                                        value_add_one( &c->rvalue_vals, &bv );
 
2524
                                }
 
2525
                        } else {
 
2526
                                rc = 1;
 
2527
                        }
 
2528
                        break;
 
2529
                case SP_SESSL:
 
2530
                        if ( si->si_logs ) {
 
2531
                                c->value_int = si->si_logs->sl_size;
 
2532
                        } else {
 
2533
                                rc = 1;
 
2534
                        }
 
2535
                        break;
 
2536
                case SP_NOPRES:
 
2537
                        if ( si->si_nopres ) {
 
2538
                                c->value_int = 1;
 
2539
                        } else {
 
2540
                                rc = 1;
 
2541
                        }
 
2542
                        break;
 
2543
                case SP_USEHINT:
 
2544
                        if ( si->si_usehint ) {
 
2545
                                c->value_int = 1;
 
2546
                        } else {
 
2547
                                rc = 1;
 
2548
                        }
 
2549
                        break;
 
2550
                }
 
2551
                return rc;
 
2552
        } else if ( c->op == LDAP_MOD_DELETE ) {
 
2553
                switch ( c->type ) {
 
2554
                case SP_CHKPT:
 
2555
                        si->si_chkops = 0;
 
2556
                        si->si_chktime = 0;
 
2557
                        break;
 
2558
                case SP_SESSL:
 
2559
                        if ( si->si_logs )
 
2560
                                si->si_logs->sl_size = 0;
 
2561
                        else
 
2562
                                rc = LDAP_NO_SUCH_ATTRIBUTE;
 
2563
                        break;
 
2564
                case SP_NOPRES:
 
2565
                        if ( si->si_nopres )
 
2566
                                si->si_nopres = 0;
 
2567
                        else
 
2568
                                rc = LDAP_NO_SUCH_ATTRIBUTE;
 
2569
                        break;
 
2570
                case SP_USEHINT:
 
2571
                        if ( si->si_usehint )
 
2572
                                si->si_usehint = 0;
 
2573
                        else
 
2574
                                rc = LDAP_NO_SUCH_ATTRIBUTE;
 
2575
                        break;
 
2576
                }
 
2577
                return rc;
 
2578
        }
 
2579
        switch ( c->type ) {
 
2580
        case SP_CHKPT:
 
2581
                if ( lutil_atoi( &si->si_chkops, c->argv[1] ) != 0 ) {
 
2582
                        snprintf( c->cr_msg, sizeof( c->cr_msg ), "%s unable to parse checkpoint ops # \"%s\"",
 
2583
                                c->argv[0], c->argv[1] );
 
2584
                        Debug( LDAP_DEBUG_CONFIG|LDAP_DEBUG_NONE,
 
2585
                                "%s: %s\n", c->log, c->cr_msg, 0 );
 
2586
                        return ARG_BAD_CONF;
 
2587
                }
 
2588
                if ( si->si_chkops <= 0 ) {
 
2589
                        snprintf( c->cr_msg, sizeof( c->cr_msg ), "%s invalid checkpoint ops # \"%d\"",
 
2590
                                c->argv[0], si->si_chkops );
 
2591
                        Debug( LDAP_DEBUG_CONFIG|LDAP_DEBUG_NONE,
 
2592
                                "%s: %s\n", c->log, c->cr_msg, 0 );
 
2593
                        return ARG_BAD_CONF;
 
2594
                }
 
2595
                if ( lutil_atoi( &si->si_chktime, c->argv[2] ) != 0 ) {
 
2596
                        snprintf( c->cr_msg, sizeof( c->cr_msg ), "%s unable to parse checkpoint time \"%s\"",
 
2597
                                c->argv[0], c->argv[1] );
 
2598
                        Debug( LDAP_DEBUG_CONFIG|LDAP_DEBUG_NONE,
 
2599
                                "%s: %s\n", c->log, c->cr_msg, 0 );
 
2600
                        return ARG_BAD_CONF;
 
2601
                }
 
2602
                if ( si->si_chktime <= 0 ) {
 
2603
                        snprintf( c->cr_msg, sizeof( c->cr_msg ), "%s invalid checkpoint time \"%d\"",
 
2604
                                c->argv[0], si->si_chkops );
 
2605
                        Debug( LDAP_DEBUG_CONFIG|LDAP_DEBUG_NONE,
 
2606
                                "%s: %s\n", c->log, c->cr_msg, 0 );
 
2607
                        return ARG_BAD_CONF;
 
2608
                }
 
2609
                si->si_chktime *= 60;
 
2610
                break;
 
2611
        case SP_SESSL: {
 
2612
                sessionlog *sl;
 
2613
                int size = c->value_int;
 
2614
 
 
2615
                if ( size < 0 ) {
 
2616
                        snprintf( c->cr_msg, sizeof( c->cr_msg ), "%s size %d is negative",
 
2617
                                c->argv[0], size );
 
2618
                        Debug( LDAP_DEBUG_CONFIG|LDAP_DEBUG_NONE,
 
2619
                                "%s: %s\n", c->log, c->cr_msg, 0 );
 
2620
                        return ARG_BAD_CONF;
 
2621
                }
 
2622
                sl = si->si_logs;
 
2623
                if ( !sl ) {
 
2624
                        sl = ch_malloc( sizeof( sessionlog ) + LDAP_LUTIL_CSNSTR_BUFSIZE );
 
2625
                        sl->sl_mincsn.bv_val = (char *)(sl+1);
 
2626
                        sl->sl_mincsn.bv_len = 0;
 
2627
                        sl->sl_num = 0;
 
2628
                        sl->sl_head = sl->sl_tail = NULL;
 
2629
                        ldap_pvt_thread_mutex_init( &sl->sl_mutex );
 
2630
                        si->si_logs = sl;
 
2631
                }
 
2632
                sl->sl_size = size;
 
2633
                }
 
2634
                break;
 
2635
        case SP_NOPRES:
 
2636
                si->si_nopres = c->value_int;
 
2637
                break;
 
2638
        case SP_USEHINT:
 
2639
                si->si_usehint = c->value_int;
 
2640
                break;
 
2641
        }
 
2642
        return rc;
 
2643
}
 
2644
 
 
2645
/* ITS#3456 we cannot run this search on the main thread, must use a
 
2646
 * child thread in order to insure we have a big enough stack.
 
2647
 */
 
2648
static void *
 
2649
syncprov_db_otask(
 
2650
        void *ptr
 
2651
)
 
2652
{
 
2653
        syncprov_findcsn( ptr, FIND_MAXCSN );
 
2654
        return NULL;
 
2655
}
 
2656
 
 
2657
/* Read any existing contextCSN from the underlying db.
 
2658
 * Then search for any entries newer than that. If no value exists,
 
2659
 * just generate it. Cache whatever result.
 
2660
 */
 
2661
static int
 
2662
syncprov_db_open(
 
2663
        BackendDB *be,
 
2664
        ConfigReply *cr
 
2665
)
 
2666
{
 
2667
        slap_overinst   *on = (slap_overinst *) be->bd_info;
 
2668
        syncprov_info_t *si = (syncprov_info_t *)on->on_bi.bi_private;
 
2669
 
 
2670
        Connection conn = { 0 };
 
2671
        OperationBuffer opbuf;
 
2672
        Operation *op;
 
2673
        Entry *e = NULL;
 
2674
        Attribute *a;
 
2675
        int rc;
 
2676
        void *thrctx = NULL;
 
2677
 
 
2678
        if ( !SLAP_LASTMOD( be )) {
 
2679
                Debug( LDAP_DEBUG_ANY,
 
2680
                        "syncprov_db_open: invalid config, lastmod must be enabled\n", 0, 0, 0 );
 
2681
                return -1;
 
2682
        }
 
2683
 
 
2684
        if ( slapMode & SLAP_TOOL_MODE ) {
 
2685
                return 0;
 
2686
        }
 
2687
 
 
2688
        rc = overlay_register_control( be, LDAP_CONTROL_SYNC );
 
2689
        if ( rc ) {
 
2690
                return rc;
 
2691
        }
 
2692
 
 
2693
        thrctx = ldap_pvt_thread_pool_context();
 
2694
        connection_fake_init( &conn, &opbuf, thrctx );
 
2695
        op = &opbuf.ob_op;
 
2696
        op->o_bd = be;
 
2697
        op->o_dn = be->be_rootdn;
 
2698
        op->o_ndn = be->be_rootndn;
 
2699
 
 
2700
        rc = overlay_entry_get_ov( op, be->be_nsuffix, NULL,
 
2701
                slap_schema.si_ad_contextCSN, 0, &e, on );
 
2702
 
 
2703
        if ( e ) {
 
2704
                ldap_pvt_thread_t tid;
 
2705
 
 
2706
                a = attr_find( e->e_attrs, slap_schema.si_ad_contextCSN );
 
2707
                if ( a ) {
 
2708
                        ber_bvarray_dup_x( &si->si_ctxcsn, a->a_vals, NULL );
 
2709
                        si->si_numcsns = a->a_numvals;
 
2710
                        si->si_sids = slap_parse_csn_sids( si->si_ctxcsn, a->a_numvals, NULL );
 
2711
                }
 
2712
                overlay_entry_release_ov( op, e, 0, on );
 
2713
                if ( si->si_ctxcsn ) {
 
2714
                        op->o_req_dn = be->be_suffix[0];
 
2715
                        op->o_req_ndn = be->be_nsuffix[0];
 
2716
                        op->ors_scope = LDAP_SCOPE_SUBTREE;
 
2717
                        ldap_pvt_thread_create( &tid, 0, syncprov_db_otask, op );
 
2718
                        ldap_pvt_thread_join( tid, NULL );
 
2719
                }
 
2720
        }
 
2721
 
 
2722
        /* Didn't find a contextCSN, should we generate one? */
 
2723
        if ( !si->si_ctxcsn ) {
 
2724
                char csnbuf[ LDAP_LUTIL_CSNSTR_BUFSIZE ];
 
2725
                struct berval csn;
 
2726
 
 
2727
                if ( SLAP_SYNC_SHADOW( op->o_bd )) {
 
2728
                /* If we're also a consumer, then don't generate anything.
 
2729
                 * Wait for our provider to send it to us, or for a local
 
2730
                 * modify if we have multimaster.
 
2731
                 */
 
2732
                        goto out;
 
2733
                }
 
2734
                csn.bv_val = csnbuf;
 
2735
                csn.bv_len = sizeof( csnbuf );
 
2736
                slap_get_csn( op, &csn, 0 );
 
2737
                value_add_one( &si->si_ctxcsn, &csn );
 
2738
                si->si_numcsns = 1;
 
2739
                si->si_sids = ch_malloc( sizeof(int) );
 
2740
                si->si_sids[0] = slap_serverID;
 
2741
 
 
2742
                /* make sure we do a checkpoint on close */
 
2743
                si->si_numops++;
 
2744
        }
 
2745
 
 
2746
out:
 
2747
        op->o_bd->bd_info = (BackendInfo *)on;
 
2748
        return 0;
 
2749
}
 
2750
 
 
2751
/* Write the current contextCSN into the underlying db.
 
2752
 */
 
2753
static int
 
2754
syncprov_db_close(
 
2755
        BackendDB *be,
 
2756
        ConfigReply *cr
 
2757
)
 
2758
{
 
2759
    slap_overinst   *on = (slap_overinst *) be->bd_info;
 
2760
    syncprov_info_t *si = (syncprov_info_t *)on->on_bi.bi_private;
 
2761
 
 
2762
        if ( slapMode & SLAP_TOOL_MODE ) {
 
2763
                return 0;
 
2764
        }
 
2765
        if ( si->si_numops ) {
 
2766
                Connection conn = {0};
 
2767
                OperationBuffer opbuf;
 
2768
                Operation *op;
 
2769
                SlapReply rs = {REP_RESULT};
 
2770
                void *thrctx;
 
2771
 
 
2772
                thrctx = ldap_pvt_thread_pool_context();
 
2773
                connection_fake_init( &conn, &opbuf, thrctx );
 
2774
                op = &opbuf.ob_op;
 
2775
                op->o_bd = be;
 
2776
                op->o_dn = be->be_rootdn;
 
2777
                op->o_ndn = be->be_rootndn;
 
2778
                syncprov_checkpoint( op, &rs, on );
 
2779
        }
 
2780
 
 
2781
    return 0;
 
2782
}
 
2783
 
 
2784
static int
 
2785
syncprov_db_init(
 
2786
        BackendDB *be,
 
2787
        ConfigReply *cr
 
2788
)
 
2789
{
 
2790
        slap_overinst   *on = (slap_overinst *)be->bd_info;
 
2791
        syncprov_info_t *si;
 
2792
 
 
2793
        if ( SLAP_ISGLOBALOVERLAY( be ) ) {
 
2794
                Debug( LDAP_DEBUG_ANY,
 
2795
                        "syncprov must be instantiated within a database.\n",
 
2796
                        0, 0, 0 );
 
2797
                return 1;
 
2798
        }
 
2799
 
 
2800
        si = ch_calloc(1, sizeof(syncprov_info_t));
 
2801
        on->on_bi.bi_private = si;
 
2802
        ldap_pvt_thread_rdwr_init( &si->si_csn_rwlock );
 
2803
        ldap_pvt_thread_mutex_init( &si->si_ops_mutex );
 
2804
        ldap_pvt_thread_mutex_init( &si->si_mods_mutex );
 
2805
 
 
2806
        csn_anlist[0].an_desc = slap_schema.si_ad_entryCSN;
 
2807
        csn_anlist[0].an_name = slap_schema.si_ad_entryCSN->ad_cname;
 
2808
        csn_anlist[1].an_desc = slap_schema.si_ad_entryUUID;
 
2809
        csn_anlist[1].an_name = slap_schema.si_ad_entryUUID->ad_cname;
 
2810
 
 
2811
        uuid_anlist[0].an_desc = slap_schema.si_ad_entryUUID;
 
2812
        uuid_anlist[0].an_name = slap_schema.si_ad_entryUUID->ad_cname;
 
2813
 
 
2814
        return 0;
 
2815
}
 
2816
 
 
2817
static int
 
2818
syncprov_db_destroy(
 
2819
        BackendDB *be,
 
2820
        ConfigReply *cr
 
2821
)
 
2822
{
 
2823
        slap_overinst   *on = (slap_overinst *)be->bd_info;
 
2824
        syncprov_info_t *si = (syncprov_info_t *)on->on_bi.bi_private;
 
2825
 
 
2826
        if ( si ) {
 
2827
                if ( si->si_logs ) {
 
2828
                        slog_entry *se = si->si_logs->sl_head;
 
2829
 
 
2830
                        while ( se ) {
 
2831
                                slog_entry *se_next = se->se_next;
 
2832
                                ch_free( se );
 
2833
                                se = se_next;
 
2834
                        }
 
2835
                                
 
2836
                        ch_free( si->si_logs );
 
2837
                }
 
2838
                if ( si->si_ctxcsn )
 
2839
                        ber_bvarray_free( si->si_ctxcsn );
 
2840
                if ( si->si_sids )
 
2841
                        ch_free( si->si_sids );
 
2842
                ldap_pvt_thread_mutex_destroy( &si->si_mods_mutex );
 
2843
                ldap_pvt_thread_mutex_destroy( &si->si_ops_mutex );
 
2844
                ldap_pvt_thread_rdwr_destroy( &si->si_csn_rwlock );
 
2845
                ch_free( si );
 
2846
        }
 
2847
 
 
2848
        return 0;
 
2849
}
 
2850
 
 
2851
static int syncprov_parseCtrl (
 
2852
        Operation *op,
 
2853
        SlapReply *rs,
 
2854
        LDAPControl *ctrl )
 
2855
{
 
2856
        ber_tag_t tag;
 
2857
        BerElementBuffer berbuf;
 
2858
        BerElement *ber = (BerElement *)&berbuf;
 
2859
        ber_int_t mode;
 
2860
        ber_len_t len;
 
2861
        struct berval cookie = BER_BVNULL;
 
2862
        sync_control *sr;
 
2863
        int rhint = 0;
 
2864
 
 
2865
        if ( op->o_sync != SLAP_CONTROL_NONE ) {
 
2866
                rs->sr_text = "Sync control specified multiple times";
 
2867
                return LDAP_PROTOCOL_ERROR;
 
2868
        }
 
2869
 
 
2870
        if ( op->o_pagedresults != SLAP_CONTROL_NONE ) {
 
2871
                rs->sr_text = "Sync control specified with pagedResults control";
 
2872
                return LDAP_PROTOCOL_ERROR;
 
2873
        }
 
2874
 
 
2875
        if ( BER_BVISNULL( &ctrl->ldctl_value ) ) {
 
2876
                rs->sr_text = "Sync control value is absent";
 
2877
                return LDAP_PROTOCOL_ERROR;
 
2878
        }
 
2879
 
 
2880
        if ( BER_BVISEMPTY( &ctrl->ldctl_value ) ) {
 
2881
                rs->sr_text = "Sync control value is empty";
 
2882
                return LDAP_PROTOCOL_ERROR;
 
2883
        }
 
2884
 
 
2885
        /* Parse the control value
 
2886
         *      syncRequestValue ::= SEQUENCE {
 
2887
         *              mode   ENUMERATED {
 
2888
         *                      -- 0 unused
 
2889
         *                      refreshOnly             (1),
 
2890
         *                      -- 2 reserved
 
2891
         *                      refreshAndPersist       (3)
 
2892
         *              },
 
2893
         *              cookie  syncCookie OPTIONAL
 
2894
         *      }
 
2895
         */
 
2896
 
 
2897
        ber_init2( ber, &ctrl->ldctl_value, 0 );
 
2898
 
 
2899
        if ( (tag = ber_scanf( ber, "{i" /*}*/, &mode )) == LBER_ERROR ) {
 
2900
                rs->sr_text = "Sync control : mode decoding error";
 
2901
                return LDAP_PROTOCOL_ERROR;
 
2902
        }
 
2903
 
 
2904
        switch( mode ) {
 
2905
        case LDAP_SYNC_REFRESH_ONLY:
 
2906
                mode = SLAP_SYNC_REFRESH;
 
2907
                break;
 
2908
        case LDAP_SYNC_REFRESH_AND_PERSIST:
 
2909
                mode = SLAP_SYNC_REFRESH_AND_PERSIST;
 
2910
                break;
 
2911
        default:
 
2912
                rs->sr_text = "Sync control : unknown update mode";
 
2913
                return LDAP_PROTOCOL_ERROR;
 
2914
        }
 
2915
 
 
2916
        tag = ber_peek_tag( ber, &len );
 
2917
 
 
2918
        if ( tag == LDAP_TAG_SYNC_COOKIE ) {
 
2919
                if (( ber_scanf( ber, /*{*/ "m", &cookie )) == LBER_ERROR ) {
 
2920
                        rs->sr_text = "Sync control : cookie decoding error";
 
2921
                        return LDAP_PROTOCOL_ERROR;
 
2922
                }
 
2923
                tag = ber_peek_tag( ber, &len );
 
2924
        }
 
2925
        if ( tag == LDAP_TAG_RELOAD_HINT ) {
 
2926
                if (( ber_scanf( ber, /*{*/ "b", &rhint )) == LBER_ERROR ) {
 
2927
                        rs->sr_text = "Sync control : rhint decoding error";
 
2928
                        return LDAP_PROTOCOL_ERROR;
 
2929
                }
 
2930
        }
 
2931
        if (( ber_scanf( ber, /*{*/ "}")) == LBER_ERROR ) {
 
2932
                        rs->sr_text = "Sync control : decoding error";
 
2933
                        return LDAP_PROTOCOL_ERROR;
 
2934
        }
 
2935
        sr = op->o_tmpcalloc( 1, sizeof(struct sync_control), op->o_tmpmemctx );
 
2936
        sr->sr_rhint = rhint;
 
2937
        if (!BER_BVISNULL(&cookie)) {
 
2938
                ber_dupbv_x( &sr->sr_state.octet_str, &cookie, op->o_tmpmemctx );
 
2939
                /* If parse fails, pretend no cookie was sent */
 
2940
                if ( slap_parse_sync_cookie( &sr->sr_state, op->o_tmpmemctx ) ||
 
2941
                        sr->sr_state.rid == -1 ) {
 
2942
                        if ( sr->sr_state.ctxcsn ) {
 
2943
                                ber_bvarray_free_x( sr->sr_state.ctxcsn, op->o_tmpmemctx );
 
2944
                                sr->sr_state.ctxcsn = NULL;
 
2945
                        }
 
2946
                        sr->sr_state.numcsns = 0;
 
2947
                }
 
2948
        }
 
2949
 
 
2950
        op->o_controls[slap_cids.sc_LDAPsync] = sr;
 
2951
 
 
2952
        op->o_sync = ctrl->ldctl_iscritical
 
2953
                ? SLAP_CONTROL_CRITICAL
 
2954
                : SLAP_CONTROL_NONCRITICAL;
 
2955
 
 
2956
        op->o_sync_mode |= mode;        /* o_sync_mode shares o_sync */
 
2957
 
 
2958
        return LDAP_SUCCESS;
 
2959
}
 
2960
 
 
2961
/* This overlay is set up for dynamic loading via moduleload. For static
 
2962
 * configuration, you'll need to arrange for the slap_overinst to be
 
2963
 * initialized and registered by some other function inside slapd.
 
2964
 */
 
2965
 
 
2966
static slap_overinst            syncprov;
 
2967
 
 
2968
int
 
2969
syncprov_initialize()
 
2970
{
 
2971
        int rc;
 
2972
 
 
2973
        rc = register_supported_control( LDAP_CONTROL_SYNC,
 
2974
                SLAP_CTRL_SEARCH, NULL,
 
2975
                syncprov_parseCtrl, &slap_cids.sc_LDAPsync );
 
2976
        if ( rc != LDAP_SUCCESS ) {
 
2977
                Debug( LDAP_DEBUG_ANY,
 
2978
                        "syncprov_init: Failed to register control %d\n", rc, 0, 0 );
 
2979
                return rc;
 
2980
        }
 
2981
 
 
2982
        syncprov.on_bi.bi_type = "syncprov";
 
2983
        syncprov.on_bi.bi_db_init = syncprov_db_init;
 
2984
        syncprov.on_bi.bi_db_destroy = syncprov_db_destroy;
 
2985
        syncprov.on_bi.bi_db_open = syncprov_db_open;
 
2986
        syncprov.on_bi.bi_db_close = syncprov_db_close;
 
2987
 
 
2988
        syncprov.on_bi.bi_op_abandon = syncprov_op_abandon;
 
2989
        syncprov.on_bi.bi_op_cancel = syncprov_op_abandon;
 
2990
 
 
2991
        syncprov.on_bi.bi_op_add = syncprov_op_mod;
 
2992
        syncprov.on_bi.bi_op_compare = syncprov_op_compare;
 
2993
        syncprov.on_bi.bi_op_delete = syncprov_op_mod;
 
2994
        syncprov.on_bi.bi_op_modify = syncprov_op_mod;
 
2995
        syncprov.on_bi.bi_op_modrdn = syncprov_op_mod;
 
2996
        syncprov.on_bi.bi_op_search = syncprov_op_search;
 
2997
        syncprov.on_bi.bi_extended = syncprov_op_extended;
 
2998
        syncprov.on_bi.bi_operational = syncprov_operational;
 
2999
 
 
3000
        syncprov.on_bi.bi_cf_ocs = spocs;
 
3001
 
 
3002
        generic_filter.f_desc = slap_schema.si_ad_objectClass;
 
3003
 
 
3004
        rc = config_register_schema( spcfg, spocs );
 
3005
        if ( rc ) return rc;
 
3006
 
 
3007
        return overlay_register( &syncprov );
 
3008
}
 
3009
 
 
3010
#if SLAPD_OVER_SYNCPROV == SLAPD_MOD_DYNAMIC
 
3011
int
 
3012
init_module( int argc, char *argv[] )
 
3013
{
 
3014
        return syncprov_initialize();
 
3015
}
 
3016
#endif /* SLAPD_OVER_SYNCPROV == SLAPD_MOD_DYNAMIC */
 
3017
 
 
3018
#endif /* defined(SLAPD_OVER_SYNCPROV) */