]> git.sur5r.net Git - openldap/blob - servers/slapd/back-bdb/search.c
7e37aca4055504b78d5577c0c3c22b75ff664ed8
[openldap] / servers / slapd / back-bdb / search.c
1 /* search.c - search operation */
2 /* $OpenLDAP$ */
3 /*
4  * Copyright 1998-2003 The OpenLDAP Foundation, All Rights Reserved.
5  * COPYING RESTRICTIONS APPLY, see COPYRIGHT file
6  */
7
8 #include "portable.h"
9
10 #include <stdio.h>
11 #include <ac/string.h>
12
13 #include "back-bdb.h"
14 #include "idl.h"
15 #include "external.h"
16
17 static int base_candidate(
18         BackendDB       *be,
19         Entry   *e,
20         ID              *ids );
21
22 static int search_candidates(
23         Operation *stackop,     /* op with the current threadctx/slab cache */
24         Operation *sop,         /* search op */
25         SlapReply *rs,
26         Entry *e,
27         u_int32_t locker,
28         ID      *ids,
29         ID      *scopes );
30
31 static void send_pagerequest_response( 
32         Operation *op,
33         SlapReply *rs,
34         ID  lastid,
35         int tentries );
36
37 /* Dereference aliases for a single alias entry. Return the final
38  * dereferenced entry on success, NULL on any failure.
39  */
40 static Entry * deref_base (
41         Operation *op,
42         SlapReply *rs,
43         Entry *e,
44         Entry **matched,
45         u_int32_t locker,
46         DB_LOCK *lock,
47         ID      *tmp,
48         ID      *visited )
49 {
50         struct bdb_info *bdb = (struct bdb_info *) op->o_bd->be_private;
51         struct berval ndn;
52         EntryInfo *ei;
53         DB_LOCK lockr;
54
55         rs->sr_err = LDAP_ALIAS_DEREF_PROBLEM;
56         rs->sr_text = "maximum deref depth exceeded";
57
58         while (BDB_IDL_N(tmp) < op->o_bd->be_max_deref_depth) {
59
60                 /* Remember the last entry we looked at, so we can
61                  * report broken links
62                  */
63                 *matched = e;
64
65                 /* If this is part of a subtree or onelevel search,
66                  * have we seen this ID before? If so, quit.
67                  */
68                 if ( visited && bdb_idl_insert( visited, e->e_id ) ) {
69                         e = NULL;
70                         break;
71                 }
72
73                 /* If we've seen this ID during this deref iteration,
74                  * we've hit a loop.
75                  */
76                 if ( bdb_idl_insert( tmp, e->e_id ) ) {
77                         rs->sr_err = LDAP_ALIAS_PROBLEM;
78                         rs->sr_text = "circular alias";
79                         e = NULL;
80                         break;
81                 }
82
83                 /* If there was a problem getting the aliasedObjectName,
84                  * get_alias_dn will have set the error status.
85                  */
86                 if ( get_alias_dn(e, &ndn, &rs->sr_err, &rs->sr_text) ) {
87                         e = NULL;
88                         break;
89                 }
90
91                 rs->sr_err = bdb_dn2entry( op, NULL, &ndn, &ei,
92                         0, locker, &lockr );
93
94                 if ( ei ) e = ei->bei_e;
95                 else    e = NULL;
96
97                 if (!e) {
98                         rs->sr_err = LDAP_ALIAS_PROBLEM;
99                         rs->sr_text = "aliasedObject not found";
100                         break;
101                 }
102
103                 /* Free the previous entry, continue to work with the
104                  * one we just retrieved.
105                  */
106                 bdb_cache_return_entry_r( bdb->bi_dbenv, &bdb->bi_cache,
107                         *matched, lock);
108                 *lock = lockr;
109
110                 /* We found a regular entry. Return this to the caller. The
111                  * entry is still locked for Read.
112                  */
113                 if (!is_entry_alias(e)) {
114                         rs->sr_err = LDAP_SUCCESS;
115                         rs->sr_text = NULL;
116                         break;
117                 }
118         }
119         return e;
120 }
121
122 /* Look for and dereference all aliases within the search scope. Adds
123  * the dereferenced entries to the "ids" list. Requires "stack" to be
124  * able to hold 8 levels of DB_SIZE IDLs. Of course we're hardcoded to
125  * require a minimum of 8 UM_SIZE IDLs so this is never a problem.
126  */
127 static int search_aliases(
128         Operation *op,
129         SlapReply *rs,
130         Entry *e,
131         u_int32_t locker,
132         ID *ids,
133         ID *scopes,
134         ID *stack
135 )
136 {
137         struct bdb_info *bdb = (struct bdb_info *) op->o_bd->be_private;
138         ID *aliases, *curscop, *subscop, *visited, *newsubs, *oldsubs, *tmp;
139         ID cursora, ida, cursoro, ido, *subscop2;
140         Entry *matched, *a;
141         EntryInfo *ei;
142         struct berval bv_alias = { sizeof("alias")-1, "alias" };
143         AttributeAssertion aa_alias;
144         Filter  af;
145         DB_LOCK locka, lockr;
146         int first = 1;
147
148         aliases = stack;        /* IDL of all aliases in the database */
149         curscop = aliases + BDB_IDL_DB_SIZE;    /* Aliases in the current scope */
150         subscop = curscop + BDB_IDL_DB_SIZE;    /* The current scope */
151         visited = subscop + BDB_IDL_DB_SIZE;    /* IDs we've seen in this search */
152         newsubs = visited + BDB_IDL_DB_SIZE;    /* New subtrees we've added */
153         oldsubs = newsubs + BDB_IDL_DB_SIZE;    /* Subtrees added previously */
154         tmp = oldsubs + BDB_IDL_DB_SIZE;        /* Scratch space for deref_base() */
155
156         /* A copy of subscop, because subscop gets clobbered by
157          * the bdb_idl_union/intersection routines
158          */
159         subscop2 = tmp + BDB_IDL_DB_SIZE;
160
161         af.f_choice = LDAP_FILTER_EQUALITY;
162         af.f_ava = &aa_alias;
163         af.f_av_desc = slap_schema.si_ad_objectClass;
164         af.f_av_value = bv_alias;
165         af.f_next = NULL;
166
167         /* Find all aliases in database */
168         BDB_IDL_ZERO( aliases );
169         rs->sr_err = bdb_filter_candidates( op, &af, aliases,
170                 curscop, visited );
171         if (rs->sr_err != LDAP_SUCCESS) {
172                 return rs->sr_err;
173         }
174         oldsubs[0] = 1;
175         oldsubs[1] = e->e_id;
176
177         BDB_IDL_ZERO( ids );
178         BDB_IDL_ZERO( visited );
179         BDB_IDL_ZERO( newsubs );
180
181         cursoro = 0;
182         ido = bdb_idl_first( oldsubs, &cursoro );
183
184         for (;;) {
185                 /* Set curscop to only the aliases in the current scope. Start with
186                  * all the aliases, obtain the IDL for the current scope, and then
187                  * get the intersection of these two IDLs. Add the current scope
188                  * to the cumulative list of candidates.
189                  */
190                 BDB_IDL_CPY( curscop, aliases );
191                 rs->sr_err = bdb_dn2idl( op, e, subscop,
192                                         subscop2+BDB_IDL_DB_SIZE );
193                 if (first) {
194                         first = 0;
195                 } else {
196                         bdb_cache_return_entry_r (bdb->bi_dbenv, &bdb->bi_cache, e, &locka);
197                 }
198                 BDB_IDL_CPY(subscop2, subscop);
199                 rs->sr_err = bdb_idl_intersection(curscop, subscop);
200                 bdb_idl_union( ids, subscop2 );
201
202                 /* Dereference all of the aliases in the current scope. */
203                 cursora = 0;
204                 for (ida = bdb_idl_first(curscop, &cursora); ida != NOID;
205                         ida = bdb_idl_next(curscop, &cursora))
206                 {
207                         ei = NULL;
208                         rs->sr_err = bdb_cache_find_id(op, NULL,
209                                 ida, &ei, 0, locker, &lockr );
210                         if (rs->sr_err != LDAP_SUCCESS) {
211                                 continue;
212                         }
213                         a = ei->bei_e;
214
215                         /* This should only happen if the curscop IDL has maxed out and
216                          * turned into a range that spans IDs indiscriminately
217                          */
218                         if (!is_entry_alias(a)) {
219                                 bdb_cache_return_entry_r (bdb->bi_dbenv, &bdb->bi_cache,
220                                         a, &lockr);
221                                 continue;
222                         }
223
224                         /* Actually dereference the alias */
225                         BDB_IDL_ZERO(tmp);
226                         a = deref_base( op, rs, a, &matched, locker, &lockr,
227                                 tmp, visited );
228                         if (a) {
229                                 /* If the target was not already in our current candidates,
230                                  * make note of it in the newsubs list. Also
231                                  * set it in the scopes list so that bdb_search
232                                  * can check it.
233                                  */
234                                 if (bdb_idl_insert(ids, a->e_id) == 0) {
235                                         bdb_idl_insert(newsubs, a->e_id);
236                                         bdb_idl_insert(scopes, a->e_id);
237                                 }
238                                 bdb_cache_return_entry_r( bdb->bi_dbenv, &bdb->bi_cache,
239                                         a, &lockr);
240
241                         } else if (matched) {
242                                 /* Alias could not be dereferenced, or it deref'd to
243                                  * an ID we've already seen. Ignore it.
244                                  */
245                                 bdb_cache_return_entry_r( bdb->bi_dbenv, &bdb->bi_cache,
246                                         matched, &lockr );
247                                 rs->sr_text = NULL;
248                         }
249                 }
250                 /* If this is a OneLevel search, we're done; oldsubs only had one
251                  * ID in it. For a Subtree search, oldsubs may be a list of scope IDs.
252                  */
253                 if (op->ors_scope != LDAP_SCOPE_SUBTREE) break;
254 nextido:
255                 ido = bdb_idl_next( oldsubs, &cursoro );
256                 
257                 /* If we're done processing the old scopes, did we add any new
258                  * scopes in this iteration? If so, go back and do those now.
259                  */
260                 if (ido == NOID) {
261                         if (BDB_IDL_IS_ZERO(newsubs)) break;
262                         BDB_IDL_CPY(oldsubs, newsubs);
263                         BDB_IDL_ZERO(newsubs);
264                         cursoro = 0;
265                         ido = bdb_idl_first( oldsubs, &cursoro );
266                 }
267
268                 /* Find the entry corresponding to the next scope. If it can't
269                  * be found, ignore it and move on. This should never happen;
270                  * we should never see the ID of an entry that doesn't exist.
271                  * Set the name so that the scope's IDL can be retrieved.
272                  */
273                 ei = NULL;
274                 rs->sr_err = bdb_cache_find_id(op, NULL, ido, &ei,
275                         0, locker, &locka );
276                 if (rs->sr_err != LDAP_SUCCESS) goto nextido;
277                 e = ei->bei_e;
278         }
279         return rs->sr_err;
280 }
281
282 static
283 int is_sync_protocol( Operation *op )
284 {
285         if ( op->o_sync_mode & SLAP_SYNC_REFRESH_AND_PERSIST )
286                 return 1;
287         return 0;
288 }
289         
290 #define IS_BDB_REPLACE(type) (( type == LDAP_PSEARCH_BY_DELETE ) || \
291         ( type == LDAP_PSEARCH_BY_SCOPEOUT ))
292 #define IS_PSEARCH (op != sop)
293
294 int
295 bdb_abandon( Operation *op, SlapReply *rs )
296 {
297         Operation       *ps_list;
298         struct bdb_info *bdb = (struct bdb_info *) op->o_bd->be_private;
299
300         LDAP_LIST_FOREACH ( ps_list, &bdb->bi_psearch_list, o_ps_link ) {
301                 if ( ps_list->o_connid == op->o_connid ) {
302                         if ( ps_list->o_msgid == op->oq_abandon.rs_msgid ) {
303                                 ps_list->o_abandon = 1;
304                                 LDAP_LIST_REMOVE( ps_list, o_ps_link );
305                                 slap_op_free ( ps_list );
306                                 return LDAP_SUCCESS;
307                         }
308                 }
309         }
310         return LDAP_UNAVAILABLE;
311 }
312
313 int
314 bdb_cancel( Operation *op, SlapReply *rs )
315 {
316         Operation       *ps_list;
317         struct bdb_info *bdb = (struct bdb_info *) op->o_bd->be_private;
318
319         LDAP_LIST_FOREACH ( ps_list, &bdb->bi_psearch_list, o_ps_link ) {
320                 if ( ps_list->o_connid == op->o_connid ) {
321                         if ( ps_list->o_msgid == op->oq_cancel.rs_msgid ) {
322                                 ps_list->o_cancel = SLAP_CANCEL_DONE;
323                                 LDAP_LIST_REMOVE( ps_list, o_ps_link );
324
325                                 rs->sr_err = LDAP_CANCELLED;
326                                 send_ldap_result( ps_list, rs );
327
328                                 if ( ps_list->o_tmpmemctx ) {
329                                         sl_mem_destroy( NULL, ps_list->o_tmpmemctx );
330                                 }
331
332                                 slap_op_free ( ps_list );
333                                 return LDAP_SUCCESS;
334                         }
335                 }
336         }
337         return LDAP_UNAVAILABLE;
338 }
339
340 int bdb_search( Operation *op, SlapReply *rs )
341 {
342         return bdb_do_search( op, rs, op, NULL, 0 );
343 }
344
345 /* For persistent searches, op is the currently executing operation,
346  * sop is the persistent search. For regular searches, sop = op.
347  */
348 int
349 bdb_do_search( Operation *op, SlapReply *rs, Operation *sop,
350         Entry *ps_e, int ps_type )
351 {
352         struct bdb_info *bdb = (struct bdb_info *) op->o_bd->be_private;
353         time_t          stoptime;
354         ID              id, cursor;
355         ID              candidates[BDB_IDL_UM_SIZE];
356         ID              scopes[BDB_IDL_DB_SIZE];
357         Entry           *e = NULL, base;
358         Entry   *matched = NULL;
359         EntryInfo       *ei;
360         struct berval   realbase = { 0, NULL };
361         int             manageDSAit;
362         int             tentries = 0;
363         ID              lastid = NOID;
364         AttributeName   *attrs;
365
366         Filter          contextcsnand, contextcsnle, cookief, csnfnot, csnfeq, csnfand, csnfge;
367         Filter          omitcsnf, omitcsnfle;
368         AttributeAssertion aa_ge, aa_eq, aa_le;
369         int             entry_count = 0;
370         struct berval *search_context_csn = NULL;
371         DB_LOCK         ctxcsn_lock;
372         LDAPControl     *ctrls[SLAP_MAX_RESPONSE_CONTROLS];
373         int             num_ctrls = 0;
374         AttributeName   uuid_attr[2];
375         int             rc_sync = 0;
376         int             entry_sync_state = -1;
377         AttributeName   null_attr;
378         int             no_sync_state_change = 0;
379         struct slap_limits_set *limit = NULL;
380         int isroot = 0;
381
382         u_int32_t       locker = 0;
383         DB_LOCK         lock;
384
385 #ifdef NEW_LOGGING
386         LDAP_LOG( OPERATION, ENTRY, "bdb_back_search\n", 0, 0, 0 );
387 #else
388         Debug( LDAP_DEBUG_TRACE, "=> bdb_back_search\n",
389                 0, 0, 0);
390 #endif
391         attrs = sop->oq_search.rs_attrs;
392
393         /* psearch needs to be registered before refresh begins */
394         /* psearch and refresh transmission is serialized in send_ldap_ber() */
395         if ( !IS_PSEARCH && sop->o_sync_mode & SLAP_SYNC_PERSIST ) {
396                 LDAP_LIST_INSERT_HEAD( &bdb->bi_psearch_list, sop, o_ps_link );
397         }
398         null_attr.an_desc = NULL;
399         null_attr.an_oc = NULL;
400         null_attr.an_name.bv_len = 0;
401         null_attr.an_name.bv_val = NULL;
402
403         for( num_ctrls = 0; num_ctrls < SLAP_MAX_RESPONSE_CONTROLS; num_ctrls++ ) {
404                 ctrls[num_ctrls] = NULL;
405         }
406         num_ctrls = 0;
407
408         if ( IS_PSEARCH && IS_BDB_REPLACE(ps_type)) {
409                 attrs = uuid_attr;
410                 attrs[0].an_desc = NULL;
411                 attrs[0].an_oc = NULL;
412                 attrs[0].an_name.bv_len = 0;
413                 attrs[0].an_name.bv_val = NULL;
414         }
415
416         manageDSAit = get_manageDSAit( sop );
417
418         /* Sync control overrides manageDSAit */
419
420         if ( !IS_PSEARCH && sop->o_sync_mode & SLAP_SYNC_REFRESH ) {
421                 if ( manageDSAit == SLAP_NO_CONTROL )
422                         manageDSAit = SLAP_CRITICAL_CONTROL;
423         } else if ( IS_PSEARCH ) {
424                 if ( manageDSAit == SLAP_NO_CONTROL )
425                         manageDSAit = SLAP_CRITICAL_CONTROL;
426         }
427
428         rs->sr_err = LOCK_ID (bdb->bi_dbenv, &locker );
429
430         switch(rs->sr_err) {
431         case 0:
432                 break;
433         default:
434                 send_ldap_error( sop, rs, LDAP_OTHER, "internal error" );
435                 return rs->sr_err;
436         }
437
438         if ( sop->o_req_ndn.bv_len == 0 ) {
439                 /* DIT root special case */
440                 e = (Entry *) &slap_entry_root;
441                 rs->sr_err = LDAP_SUCCESS;
442         } else {
443 dn2entry_retry:
444                 /* get entry with reader lock */
445                 rs->sr_err = bdb_dn2entry( op, NULL, &sop->o_req_ndn, &ei,
446                         1, locker, &lock );
447         }
448
449         switch(rs->sr_err) {
450         case DB_NOTFOUND:
451                 matched = ei->bei_e; break;
452         case 0:
453                 e = ei->bei_e; break;
454         case LDAP_BUSY:
455                 send_ldap_error( sop, rs, LDAP_BUSY, "ldap server busy" );
456                 LOCK_ID_FREE (bdb->bi_dbenv, locker );
457                 return LDAP_BUSY;
458         case DB_LOCK_DEADLOCK:
459         case DB_LOCK_NOTGRANTED:
460                 goto dn2entry_retry;
461         default:
462                 send_ldap_error( sop, rs, LDAP_OTHER, "internal error" );
463                 LOCK_ID_FREE (bdb->bi_dbenv, locker );
464                 return rs->sr_err;
465         }
466
467         if ( e && (op->ors_deref & LDAP_DEREF_FINDING) && is_entry_alias(e) ) {
468                 BDB_IDL_ZERO(candidates);
469                 e = deref_base( op, rs, e, &matched, locker, &lock,
470                         candidates, NULL );
471         }
472
473         if ( e == NULL ) {
474                 struct berval matched_dn = { 0, NULL };
475
476                 if ( matched != NULL ) {
477                         BerVarray erefs;
478                         ber_dupbv( &matched_dn, &matched->e_name );
479
480                         erefs = is_entry_referral( matched )
481                                 ? get_entry_referrals( op, matched )
482                                 : NULL;
483
484                         bdb_cache_return_entry_r (bdb->bi_dbenv, &bdb->bi_cache,
485                                 matched, &lock);
486                         matched = NULL;
487
488                         if( erefs ) {
489                                 rs->sr_ref = referral_rewrite( erefs, &matched_dn,
490                                         &sop->o_req_dn, sop->oq_search.rs_scope );
491                                 ber_bvarray_free( erefs );
492                         }
493
494                 } else {
495                         rs->sr_ref = referral_rewrite( default_referral,
496                                 NULL, &sop->o_req_dn, sop->oq_search.rs_scope );
497                 }
498
499                 rs->sr_err = LDAP_REFERRAL;
500                 rs->sr_matched = matched_dn.bv_val;
501                 send_ldap_result( sop, rs );
502
503                 LOCK_ID_FREE (bdb->bi_dbenv, locker );
504                 if ( rs->sr_ref ) {
505                         ber_bvarray_free( rs->sr_ref );
506                         rs->sr_ref = NULL;
507                 }
508                 if ( matched_dn.bv_val ) {
509                         ber_memfree( matched_dn.bv_val );
510                         rs->sr_matched = NULL;
511                 }
512                 return rs->sr_err;
513         }
514
515         if (!manageDSAit && e != &slap_entry_root && is_entry_referral( e ) ) {
516                 /* entry is a referral, don't allow add */
517                 struct berval matched_dn;
518                 BerVarray erefs;
519                 
520                 ber_dupbv( &matched_dn, &e->e_name );
521                 erefs = get_entry_referrals( op, e );
522
523                 bdb_cache_return_entry_r( bdb->bi_dbenv, &bdb->bi_cache, e, &lock );
524                 e = NULL;
525
526                 if( erefs ) {
527                         rs->sr_ref = referral_rewrite( erefs, &matched_dn,
528                                 &sop->o_req_dn, sop->oq_search.rs_scope );
529                         ber_bvarray_free( erefs );
530                 }
531
532 #ifdef NEW_LOGGING
533                 LDAP_LOG ( OPERATION, RESULTS, 
534                         "bdb_search: entry is referral\n", 0, 0, 0 );
535 #else
536                 Debug( LDAP_DEBUG_TRACE, "bdb_search: entry is referral\n",
537                         0, 0, 0 );
538 #endif
539
540                 if (!rs->sr_ref) rs->sr_text = "bad_referral object";
541                 rs->sr_err = LDAP_REFERRAL;
542                 rs->sr_matched = matched_dn.bv_val;
543                 send_ldap_result( sop, rs );
544
545                 LOCK_ID_FREE (bdb->bi_dbenv, locker );
546                 ber_bvarray_free( rs->sr_ref );
547                 rs->sr_ref = NULL;
548                 ber_memfree( matched_dn.bv_val );
549                 rs->sr_matched = NULL;
550                 return 1;
551         }
552
553         if ( get_assert( op ) &&
554                 ( test_filter( op, e, get_assertion( op )) != LDAP_COMPARE_TRUE ))
555         {
556                 rs->sr_err = LDAP_ASSERTION_FAILED;
557                 send_ldap_result( sop, rs );
558                 return 1;
559         }
560
561         /* if not root, get appropriate limits */
562         if ( be_isroot( op->o_bd, &sop->o_ndn ) ) {
563                 isroot = 1;
564         } else {
565                 ( void ) get_limits( op->o_bd, &sop->o_ndn, &limit );
566         }
567
568         /* The time/size limits come first because they require very little
569          * effort, so there's no chance the candidates are selected and then 
570          * the request is not honored only because of time/size constraints */
571
572         /* if no time limit requested, use soft limit (unless root!) */
573         if ( isroot ) {
574                 if ( sop->oq_search.rs_tlimit == 0 ) {
575                         sop->oq_search.rs_tlimit = -1;  /* allow root to set no limit */
576                 }
577
578                 if ( sop->oq_search.rs_slimit == 0 ) {
579                         sop->oq_search.rs_slimit = -1;
580                 }
581
582         } else {
583                 /* if no limit is required, use soft limit */
584                 if ( sop->oq_search.rs_tlimit <= 0 ) {
585                         sop->oq_search.rs_tlimit = limit->lms_t_soft;
586
587                 /* if requested limit higher than hard limit, abort */
588                 } else if ( sop->oq_search.rs_tlimit > limit->lms_t_hard ) {
589                         /* no hard limit means use soft instead */
590                         if ( limit->lms_t_hard == 0
591                                         && limit->lms_t_soft > -1
592                                         && sop->oq_search.rs_tlimit > limit->lms_t_soft ) {
593                                 sop->oq_search.rs_tlimit = limit->lms_t_soft;
594
595                         /* positive hard limit means abort */
596                         } else if ( limit->lms_t_hard > 0 ) {
597                                 rs->sr_err = LDAP_ADMINLIMIT_EXCEEDED;
598                                 send_ldap_result( sop, rs );
599                                 rs->sr_err = LDAP_SUCCESS;
600                                 goto done;
601                         }
602                 
603                         /* negative hard limit means no limit */
604                 }
605                 
606                 /* if no limit is required, use soft limit */
607                 if ( sop->oq_search.rs_slimit <= 0 ) {
608                         if ( get_pagedresults(sop) && limit->lms_s_pr != 0 ) {
609                                 sop->oq_search.rs_slimit = limit->lms_s_pr;
610                         } else {
611                                 sop->oq_search.rs_slimit = limit->lms_s_soft;
612                         }
613
614                 /* if requested limit higher than hard limit, abort */
615                 } else if ( sop->oq_search.rs_slimit > limit->lms_s_hard ) {
616                         /* no hard limit means use soft instead */
617                         if ( limit->lms_s_hard == 0
618                                         && limit->lms_s_soft > -1
619                                         && sop->oq_search.rs_slimit > limit->lms_s_soft ) {
620                                 sop->oq_search.rs_slimit = limit->lms_s_soft;
621
622                         /* positive hard limit means abort */
623                         } else if ( limit->lms_s_hard > 0 ) {
624                                 rs->sr_err = LDAP_ADMINLIMIT_EXCEEDED;
625                                 send_ldap_result( sop, rs );
626                                 rs->sr_err = LDAP_SUCCESS;      
627                                 goto done;
628                         }
629                         
630                         /* negative hard limit means no limit */
631                 }
632         }
633
634         /* compute it anyway; root does not use it */
635         stoptime = op->o_time + sop->oq_search.rs_tlimit;
636
637         /* need normalized dn below */
638         ber_dupbv( &realbase, &e->e_nname );
639
640         /* Copy info to base, must free entry before accessing the database
641          * in search_candidates, to avoid deadlocks.
642          */
643         base.e_private = e->e_private;
644         base.e_nname = realbase;
645         base.e_id = e->e_id;
646
647         if ( e != &slap_entry_root ) {
648                 bdb_cache_return_entry_r(bdb->bi_dbenv, &bdb->bi_cache, e, &lock);
649         }
650         e = NULL;
651
652         rs->sr_err = bdb_get_commit_csn( sop, rs, &search_context_csn, locker, &ctxcsn_lock );
653
654         if ( rs->sr_err != LDAP_SUCCESS ) {
655                 send_ldap_error( sop, rs, rs->sr_err, "error in csn management in search" );
656                 goto done;
657         }
658
659         /* select candidates */
660         if ( sop->oq_search.rs_scope == LDAP_SCOPE_BASE ) {
661                 rs->sr_err = base_candidate( op->o_bd, &base, candidates );
662
663         } else {
664                 BDB_IDL_ZERO( candidates );
665                 BDB_IDL_ZERO( scopes );
666                 rs->sr_err = search_candidates( op, sop, rs, &base, locker, candidates, scopes );
667         }
668
669         if ( sop->o_sync_mode != SLAP_SYNC_NONE ) {
670                 bdb_cache_entry_db_unlock( bdb->bi_dbenv, &ctxcsn_lock );
671         }
672
673         /* start cursor at beginning of candidates.
674          */
675         cursor = 0;
676         if (IS_PSEARCH) {
677                 if ( !BDB_IDL_IS_RANGE( candidates ) ) {
678                         cursor = bdb_idl_search( candidates, ps_e->e_id );
679                         if ( candidates[cursor] != ps_e->e_id ) {
680                                 rs->sr_err = LDAP_SUCCESS;
681                                 goto done;
682                         }
683                 } else {
684                         if ( ps_e->e_id < BDB_IDL_RANGE_FIRST(candidates)
685                            || ps_e->e_id > BDB_IDL_RANGE_LAST(candidates)){
686                                 rs->sr_err = LDAP_SUCCESS;
687                                 goto done;
688                         }
689                 }
690                 candidates[0] = 1;
691                 candidates[1] = ps_e->e_id;
692         }
693
694         if ( candidates[0] == 0 ) {
695 #ifdef NEW_LOGGING
696                 LDAP_LOG ( OPERATION, RESULTS,
697                         "bdb_search: no candidates\n", 0, 0, 0 );
698 #else
699                 Debug( LDAP_DEBUG_TRACE, "bdb_search: no candidates\n",
700                         0, 0, 0 );
701 #endif
702
703                 rs->sr_err = LDAP_SUCCESS;
704                 rs->sr_entry = NULL;
705                 send_ldap_result( sop, rs );
706                 goto done;
707         }
708
709         /* if not root and candidates exceed to-be-checked entries, abort */
710         if ( !isroot && limit->lms_s_unchecked != -1 ) {
711                 if ( BDB_IDL_N(candidates) > (unsigned) limit->lms_s_unchecked ) {
712                         rs->sr_err = LDAP_ADMINLIMIT_EXCEEDED;
713                         send_ldap_result( sop, rs );
714                         rs->sr_err = LDAP_SUCCESS;
715                         goto done;
716                 }
717         }
718
719         if ( isroot || !limit->lms_s_pr_hide ) {
720                 tentries = BDB_IDL_N(candidates);
721         }
722
723 #ifdef LDAP_CONTROL_PAGEDRESULTS
724         if ( get_pagedresults(sop) ) {
725                 if ( sop->o_pagedresults_state.ps_cookie == 0 ) {
726                         id = 0;
727                 } else {
728                         if ( sop->o_pagedresults_size == 0 ) {
729                                 rs->sr_err = LDAP_SUCCESS;
730                                 rs->sr_text = "search abandoned by pagedResult size=0";
731                                 send_ldap_result( sop, rs );
732                                 goto done;
733                         }
734                         for ( id = bdb_idl_first( candidates, &cursor );
735                                 id != NOID && id <= (ID)( sop->o_pagedresults_state.ps_cookie );
736                                 id = bdb_idl_next( candidates, &cursor ) );
737                 }
738                 if ( cursor == NOID ) {
739 #ifdef NEW_LOGGING
740                         LDAP_LOG ( OPERATION, RESULTS, 
741                                 "bdb_search: no paged results candidates\n", 
742                         0, 0, 0 );
743 #else
744                         Debug( LDAP_DEBUG_TRACE, 
745                                 "bdb_search: no paged results candidates\n",
746                                 0, 0, 0 );
747 #endif
748                         send_pagerequest_response( sop, rs, lastid, 0 );
749
750                         rs->sr_err = LDAP_OTHER;
751                         goto done;
752                 }
753                 goto loop_begin;
754         }
755 #endif
756
757         if ( (sop->o_sync_mode & SLAP_SYNC_REFRESH) || IS_PSEARCH )
758         {
759                 MatchingRule    *mr;
760                 const char              *text;
761                 int                             match;
762
763                 cookief.f_choice = LDAP_FILTER_AND;
764                 cookief.f_and = &csnfnot;
765                 cookief.f_next = NULL;
766
767                 csnfnot.f_choice = LDAP_FILTER_NOT;
768                 csnfnot.f_not = &csnfeq;
769                 csnfnot.f_next = &csnfand;
770
771                 csnfeq.f_choice = LDAP_FILTER_EQUALITY;
772                 csnfeq.f_ava = &aa_eq;
773                 csnfeq.f_av_desc = slap_schema.si_ad_entryCSN;
774                 csnfeq.f_av_value = sop->o_sync_state;
775
776                 csnfand.f_choice = LDAP_FILTER_AND;
777                 csnfand.f_and = &csnfge;
778                 csnfand.f_next = NULL;
779
780                 csnfge.f_choice = LDAP_FILTER_GE;
781                 csnfge.f_ava = &aa_ge;
782                 csnfge.f_av_desc = slap_schema.si_ad_entryCSN;
783                 csnfge.f_av_value = sop->o_sync_state;
784
785                 if ( search_context_csn && !IS_PSEARCH ) {
786                         csnfge.f_next = &contextcsnand;
787
788                         contextcsnand.f_choice = LDAP_FILTER_AND;
789                         contextcsnand.f_and = &contextcsnle;
790                         contextcsnand.f_next = NULL;
791         
792                         contextcsnle.f_choice = LDAP_FILTER_LE;
793                         contextcsnle.f_ava = &aa_le;
794                         contextcsnle.f_av_desc = slap_schema.si_ad_entryCSN;
795                         contextcsnle.f_av_value = *search_context_csn;
796                         contextcsnle.f_next = sop->oq_search.rs_filter;
797
798                         mr = slap_schema.si_ad_entryCSN->ad_type->sat_ordering;
799                         if ( sop->o_sync_state.bv_len != 0 ) {
800                                 value_match( &match, slap_schema.si_ad_entryCSN, mr,
801                                                         SLAP_MR_VALUE_OF_ATTRIBUTE_SYNTAX,
802                                                         &sop->o_sync_state, search_context_csn, &text );
803                         } else {
804                                 match = -1;
805                         }
806                         no_sync_state_change = !match;
807                 } else {
808                         csnfge.f_next = sop->oq_search.rs_filter;
809                 }
810         }
811
812         for ( id = bdb_idl_first( candidates, &cursor );
813                 id != NOID;
814                 id = bdb_idl_next( candidates, &cursor ) )
815         {
816                 int             scopeok = 0;
817
818 loop_begin:
819                 /* check for abandon */
820                 if ( sop->o_abandon ) {
821                         rs->sr_err = LDAP_SUCCESS;
822                         goto done;
823                 }
824
825 #ifdef LDAP_EXOP_X_CANCEL
826                 if ( sop->o_cancel ) {
827                         assert( sop->o_cancel == SLAP_CANCEL_REQ );
828                         rs->sr_err = LDAP_CANCELLED;
829                         send_ldap_result( sop, rs );
830                         sop->o_cancel = SLAP_CANCEL_ACK;
831                         rs->sr_err = LDAP_SUCCESS;
832                         goto done;
833                 }
834 #endif
835
836                 /* check time limit */
837                 if ( sop->oq_search.rs_tlimit != -1 && slap_get_time() > stoptime ) {
838                         rs->sr_err = LDAP_TIMELIMIT_EXCEEDED;
839                         rs->sr_ref = rs->sr_v2ref;
840                         send_ldap_result( sop, rs );
841                         rs->sr_err = LDAP_SUCCESS;
842                         goto done;
843                 }
844
845
846                 if (!IS_PSEARCH) {
847 id2entry_retry:
848                         /* get the entry with reader lock */
849                         ei = NULL;
850                         rs->sr_err = bdb_cache_find_id( op, NULL,
851                                 id, &ei, 0, locker, &lock );
852
853                         if (rs->sr_err == LDAP_BUSY) {
854                                 rs->sr_text = "ldap server busy";
855                                 send_ldap_result( sop, rs );
856                                 goto done;
857
858                         } else if ( rs->sr_err == DB_LOCK_DEADLOCK
859                                 || rs->sr_err == DB_LOCK_NOTGRANTED )
860                         {
861                                 goto id2entry_retry;    
862                         }
863
864                         if ( ei && rs->sr_err == LDAP_SUCCESS ) {
865                                 e = ei->bei_e;
866                         } else {
867                                 e = NULL;
868                         }
869
870                         if ( e == NULL ) {
871                                 if( !BDB_IDL_IS_RANGE(candidates) ) {
872                                         /* only complain for non-range IDLs */
873 #ifdef NEW_LOGGING
874                                         LDAP_LOG ( OPERATION, RESULTS,
875                                                 "bdb_search: candidate %ld not found\n",
876                                                 (long) id, 0, 0);
877 #else
878                                         Debug( LDAP_DEBUG_TRACE,
879                                                 "bdb_search: candidate %ld not found\n",
880                                                 (long) id, 0, 0 );
881 #endif
882                                 }
883
884                                 goto loop_continue;
885                         }
886                 } else {
887                         e = ps_e;
888                 }
889
890                 rs->sr_entry = e;
891 #ifdef BDB_SUBENTRIES
892                 /* FIXME: send all but syncrepl
893                 if ( !is_sync_protocol( sop ) ) {
894                 */
895                         if ( is_entry_subentry( e ) ) {
896                                 if( sop->oq_search.rs_scope != LDAP_SCOPE_BASE ) {
897                                         if(!get_subentries_visibility( sop )) {
898                                                 /* only subentries are visible */
899                                                 goto loop_continue;
900                                         }
901
902                                 } else if ( get_subentries( sop ) &&
903                                         !get_subentries_visibility( sop ))
904                                 {
905                                         /* only subentries are visible */
906                                         goto loop_continue;
907                                 }
908
909                         } else if ( get_subentries_visibility( sop )) {
910                                 /* only subentries are visible */
911                                 goto loop_continue;
912                         }
913                 /*
914                 }
915                 */
916 #endif
917
918                 /* Does this candidate actually satisfy the search scope?
919                  *
920                  * Note that we don't lock access to the bei_parent pointer.
921                  * Since only leaf nodes can be deleted, the parent of any
922                  * node will always be a valid node. Also since we have
923                  * a Read lock on the data, it cannot be renamed out of the
924                  * scope while we are looking at it, and unless we're using
925                  * BDB_HIER, its parents cannot be moved either.
926                  */
927                 switch( sop->ors_scope ) {
928                 case LDAP_SCOPE_BASE:
929                         /* This is always true, yes? */
930                         if ( id == base.e_id )
931                                 scopeok = 1;
932                         break;
933                 case LDAP_SCOPE_ONELEVEL:
934                         if ( ei->bei_parent->bei_id == base.e_id )
935                                 scopeok = 1;
936                         break;
937                 case LDAP_SCOPE_SUBTREE:
938                         { EntryInfo *tmp;
939                         for ( tmp = BEI(e); tmp->bei_parent;
940                                 tmp = tmp->bei_parent ) {
941                                 if ( tmp->bei_id == base.e_id ) {
942                                         scopeok = 1;
943                                         break;
944                                 }
945                         } }
946                         break;
947                 }
948
949 #ifdef BDB_ALIASES
950                 /* aliases were already dereferenced in candidate list */
951                 if ( sop->ors_deref & LDAP_DEREF_SEARCHING ) {
952                         /* but if the search base is an alias, and we didn't
953                          * deref it when finding, return it.
954                          */
955                         if ( is_entry_alias(e) &&
956                                 ((sop->ors_deref & LDAP_DEREF_FINDING)
957                                   || !bvmatch(&e->e_nname, &op->o_req_ndn)))
958                         {
959                                 goto loop_continue;
960                         }
961
962                         /* scopes is only non-empty for onelevel or subtree */
963                         if ( !scopeok && BDB_IDL_N(scopes) ) {
964                                 unsigned x;
965                                 if ( sop->ors_scope == LDAP_SCOPE_ONELEVEL ) {
966                                         x = bdb_idl_search( scopes,
967                                                 e->e_id );
968                                         if ( scopes[x] == e->e_id )
969                                                 scopeok = 1;
970                                 } else {
971                                 /* subtree, walk up the tree */
972                                         EntryInfo *tmp = BEI(e);
973                                         for (;tmp->bei_parent;
974                                                 tmp=tmp->bei_parent) {
975                                                 x = bdb_idl_search(
976                                                         scopes, tmp->bei_id );
977                                                 if ( scopes[x] == tmp->bei_id ) {
978                                                         scopeok = 1;
979                                                         break;
980                                                 }
981                                         }
982                                 }
983                         }
984                 }
985 #endif
986
987                 /* Not in scope, ignore it */
988                 if ( !scopeok ) {
989 #ifdef NEW_LOGGING
990                         LDAP_LOG ( OPERATION, RESULTS,
991                                 "bdb_search: %ld scope not okay\n",
992                                 (long) id, 0, 0);
993 #else
994                         Debug( LDAP_DEBUG_TRACE,
995                                 "bdb_search: %ld scope not okay\n",
996                                 (long) id, 0, 0 );
997 #endif
998                         goto loop_continue;
999                 }
1000
1001                 /*
1002                  * if it's a referral, add it to the list of referrals. only do
1003                  * this for non-base searches, and don't check the filter
1004                  * explicitly here since it's only a candidate anyway.
1005                  */
1006                 if ( !manageDSAit && sop->oq_search.rs_scope != LDAP_SCOPE_BASE
1007                         && is_entry_referral( e ) )
1008                 {
1009                         BerVarray erefs = get_entry_referrals( sop, e );
1010                         rs->sr_ref = referral_rewrite( erefs,
1011                                 &e->e_name, NULL,
1012                                 sop->oq_search.rs_scope == LDAP_SCOPE_SUBTREE
1013                                         ? LDAP_SCOPE_SUBTREE
1014                                         : LDAP_SCOPE_BASE );
1015
1016                         send_search_reference( sop, rs );
1017
1018                         ber_bvarray_free( rs->sr_ref );
1019                         ber_bvarray_free( erefs );
1020                         rs->sr_ref = NULL;
1021
1022                         goto loop_continue;
1023                 }
1024
1025                 if ( !manageDSAit && is_entry_glue( e )) {
1026                         goto loop_continue;
1027                 }
1028
1029                 /* if it matches the filter and scope, send it */
1030                 if (IS_PSEARCH) {
1031                         if (ps_type != LDAP_PSEARCH_BY_SCOPEOUT) {
1032                                 rs->sr_err = test_filter( sop, rs->sr_entry, &cookief );
1033                         } else {
1034                                 rs->sr_err = LDAP_COMPARE_TRUE;
1035                         }
1036                 } else {
1037                         if ( sop->o_sync_mode & SLAP_SYNC_REFRESH ) {
1038                                 rc_sync = test_filter( sop, rs->sr_entry, &cookief );
1039                                 rs->sr_err = test_filter( sop,
1040                                         rs->sr_entry, &contextcsnand );
1041                                 if ( rs->sr_err == LDAP_COMPARE_TRUE ) {
1042                                         if ( rc_sync == LDAP_COMPARE_TRUE ) {
1043                                                 if ( no_sync_state_change ) {
1044 #ifdef NEW_LOGGING
1045                                                         LDAP_LOG ( OPERATION, RESULTS,
1046                                                                 "bdb_search: error in context csn management\n",
1047                                                                 0, 0, 0 );
1048 #else
1049                                                         Debug( LDAP_DEBUG_TRACE,
1050                                                                 "bdb_search: error in context csn management\n",
1051                                                                 0, 0, 0 );
1052 #endif
1053                                                 }
1054                                                 entry_sync_state = LDAP_SYNC_ADD;
1055                                         } else {
1056                                                 if ( no_sync_state_change ) {
1057                                                         goto loop_continue;
1058                                                 }
1059                                                 entry_sync_state = LDAP_SYNC_PRESENT;
1060                                         }
1061                                 }
1062                         } else {
1063                                 rs->sr_err = test_filter( sop,
1064                                         rs->sr_entry, sop->oq_search.rs_filter );
1065                         }
1066                 }
1067
1068                 if ( rs->sr_err == LDAP_COMPARE_TRUE ) {
1069                         /* check size limit */
1070                         if ( --sop->oq_search.rs_slimit == -1 ) {
1071                                 if (!IS_PSEARCH) {
1072                                         bdb_cache_return_entry_r( bdb->bi_dbenv,
1073                                                 &bdb->bi_cache, e, &lock );
1074                                 }
1075                                 e = NULL;
1076                                 rs->sr_entry = NULL;
1077                                 rs->sr_err = LDAP_SIZELIMIT_EXCEEDED;
1078                                 rs->sr_ref = rs->sr_v2ref;
1079                                 send_ldap_result( sop, rs );
1080                                 rs->sr_err = LDAP_SUCCESS;
1081                                 goto done;
1082                         }
1083
1084 #ifdef LDAP_CONTROL_PAGEDRESULTS
1085                         if ( get_pagedresults(sop) ) {
1086                                 if ( rs->sr_nentries >= sop->o_pagedresults_size ) {
1087                                         send_pagerequest_response( sop, rs,
1088                                                 lastid, tentries );
1089                                         goto done;
1090                                 }
1091                                 lastid = id;
1092                         }
1093 #endif
1094
1095                         if (e) {
1096                                 /* safe default */
1097                                 int result = -1;
1098                                 
1099 #if 0   /* noop is masked SLAP_CTRL_UPDATE */
1100                                 if( op->o_noop ) {
1101                                         result = 0;
1102                                 } else
1103 #endif
1104                                 if (IS_PSEARCH) {
1105                                         int premodify_found = 0;
1106                                         int entry_sync_state;
1107
1108                                         if ( ps_type == LDAP_PSEARCH_BY_ADD ||
1109                                                  ps_type == LDAP_PSEARCH_BY_DELETE ||
1110                                                  ps_type == LDAP_PSEARCH_BY_MODIFY ||
1111                                                  ps_type == LDAP_PSEARCH_BY_SCOPEOUT )
1112                                         {
1113                                                 if ( ps_type == LDAP_PSEARCH_BY_MODIFY ) {
1114                                                         struct psid_entry* psid_e;
1115                                                         LDAP_LIST_FOREACH( psid_e,
1116                                                                 &op->o_pm_list, ps_link)
1117                                                         {
1118                                                                 if( psid_e->ps_op == sop ) {
1119                                                                         premodify_found = 1;
1120                                                                         LDAP_LIST_REMOVE(psid_e, ps_link);
1121                                                                         break;
1122                                                                 }
1123                                                         }
1124                                                         if (psid_e != NULL) free (psid_e);
1125                                                 }
1126                                                 if ( ps_type == LDAP_PSEARCH_BY_ADD ) {
1127                                                         entry_sync_state = LDAP_SYNC_ADD;
1128                                                 } else if ( ps_type == LDAP_PSEARCH_BY_DELETE ) {
1129                                                         entry_sync_state = LDAP_SYNC_DELETE;
1130                                                 } else if ( ps_type == LDAP_PSEARCH_BY_MODIFY ) {
1131                                                         if ( premodify_found ) {
1132                                                                 entry_sync_state = LDAP_SYNC_MODIFY;
1133                                                         } else {
1134                                                                 entry_sync_state = LDAP_SYNC_ADD;
1135                                                         }
1136                                                 } else if ( ps_type == LDAP_PSEARCH_BY_SCOPEOUT )
1137                                                         entry_sync_state = LDAP_SYNC_DELETE;
1138                                                 else {
1139                                                         rs->sr_err = LDAP_OTHER;
1140                                                         goto done;
1141                                                 }
1142                                                 rs->sr_err = bdb_build_sync_state_ctrl( sop,
1143                                                         rs, e, entry_sync_state, ctrls,
1144                                                         num_ctrls++, 1, search_context_csn );
1145                                                 if ( rs->sr_err != LDAP_SUCCESS ) goto done;
1146                                                 rs->sr_attrs = attrs;
1147                                                 rs->sr_ctrls = ctrls;
1148                                                 result = send_search_entry( sop, rs );
1149                                                 ch_free( ctrls[num_ctrls-1]->ldctl_value.bv_val );
1150                                                 ch_free( ctrls[--num_ctrls] );
1151                                                 ctrls[num_ctrls] = NULL;
1152                                                 rs->sr_ctrls = NULL;
1153
1154                                         } else if ( ps_type == LDAP_PSEARCH_BY_PREMODIFY ) {
1155                                                 struct psid_entry* psid_e;
1156                                                 psid_e = (struct psid_entry *) calloc (1,
1157                                                         sizeof(struct psid_entry));
1158                                                 psid_e->ps_op = sop;
1159                                                 LDAP_LIST_INSERT_HEAD( &op->o_pm_list,
1160                                                         psid_e, ps_link );
1161
1162                                         } else {
1163                                                 printf("Error !\n");
1164                                         }
1165                                 } else {
1166                                         if ( sop->o_sync_mode & SLAP_SYNC_REFRESH ) {
1167                                                 rs->sr_err = bdb_build_sync_state_ctrl( sop,
1168                                                         rs, e, entry_sync_state, ctrls,
1169                                                         num_ctrls++, 0, search_context_csn );
1170                                                 if ( rs->sr_err != LDAP_SUCCESS ) goto done;
1171
1172                                                 rs->sr_ctrls = ctrls;
1173                                                 if ( rc_sync == LDAP_COMPARE_TRUE ) { /* ADD */
1174                                                         rs->sr_attrs = sop->oq_search.rs_attrs;
1175                                                 } else { /* PRESENT */
1176                                                         rs->sr_attrs = &null_attr;
1177                                                 }
1178                                                 result = send_search_entry( sop, rs );
1179                                                 ch_free( ctrls[num_ctrls-1]->ldctl_value.bv_val );
1180                                                 ch_free( ctrls[--num_ctrls] );
1181                                                 ctrls[num_ctrls] = NULL;
1182                                                 rs->sr_ctrls = NULL;
1183                                         } else {
1184                                                 rs->sr_attrs = sop->oq_search.rs_attrs;
1185                                                 rs->sr_ctrls = NULL;
1186                                                 result = send_search_entry( sop, rs );
1187                                         }
1188                                 }
1189
1190                                 switch (result) {
1191                                 case 0:         /* entry sent ok */
1192                                         break;
1193                                 case 1:         /* entry not sent */
1194                                         break;
1195                                 case -1:        /* connection closed */
1196                                         if (!IS_PSEARCH)
1197                                         bdb_cache_return_entry_r(bdb->bi_dbenv,
1198                                                 &bdb->bi_cache, e, &lock);
1199                                         e = NULL;
1200                                         rs->sr_entry = NULL;
1201                                         rs->sr_err = LDAP_OTHER;
1202                                         goto done;
1203                                 }
1204                         }
1205                 } else {
1206 #ifdef NEW_LOGGING
1207                         LDAP_LOG ( OPERATION, RESULTS,
1208                                 "bdb_search: %ld does not match filter\n", (long) id, 0, 0);
1209 #else
1210                         Debug( LDAP_DEBUG_TRACE,
1211                                 "bdb_search: %ld does not match filter\n",
1212                                 (long) id, 0, 0 );
1213 #endif
1214                 }
1215
1216 loop_continue:
1217                 if( e != NULL ) {
1218                         /* free reader lock */
1219                         if (!IS_PSEARCH) {
1220                                 bdb_cache_return_entry_r( bdb->bi_dbenv,
1221                                         &bdb->bi_cache, e , &lock );
1222                                 if ( sop->o_nocaching ) {
1223                                         bdb_cache_delete_entry( bdb, ei, locker, &lock );
1224                                 }
1225                         }
1226                         e = NULL;
1227                         rs->sr_entry = NULL;
1228                 }
1229
1230                 ldap_pvt_thread_yield();
1231         }
1232
1233         if (!IS_PSEARCH) {
1234                 if ( sop->o_sync_mode & SLAP_SYNC_REFRESH ) {
1235                         rs->sr_err = LDAP_SUCCESS;
1236                         rs->sr_rspoid = LDAP_SYNC_INFO;
1237                         rs->sr_ctrls = NULL;
1238                         bdb_send_ldap_intermediate( sop, rs,
1239                                 LDAP_SYNC_STATE_MODE_DONE, search_context_csn );
1240
1241                         /* If changelog is supported, this is where to process it */
1242         
1243                         if ( sop->o_sync_mode & SLAP_SYNC_PERSIST ) {
1244                                 /* refreshAndPersist mode */
1245                                 bdb_send_ldap_intermediate( sop, rs,
1246                                         LDAP_SYNC_LOG_MODE_DONE, search_context_csn );
1247                         } else {
1248                                 /* refreshOnly mode */
1249                                 bdb_build_sync_done_ctrl( sop, rs, ctrls,
1250                                         num_ctrls++, 1, search_context_csn );
1251                                 rs->sr_ctrls = ctrls;
1252                                 rs->sr_ref = rs->sr_v2ref;
1253                                 rs->sr_err = (rs->sr_v2ref == NULL) ? LDAP_SUCCESS : LDAP_REFERRAL;
1254                                 send_ldap_result( sop, rs );
1255                                 if ( ctrls[num_ctrls-1]->ldctl_value.bv_val != NULL ) {
1256                                         ch_free( ctrls[num_ctrls-1]->ldctl_value.bv_val );
1257                                 }
1258                                 ch_free( ctrls[--num_ctrls] );
1259                                 ctrls[num_ctrls] = NULL;
1260                         }
1261                 } else {
1262                         rs->sr_ctrls = NULL;
1263                         rs->sr_ref = rs->sr_v2ref;
1264                         rs->sr_err = (rs->sr_v2ref == NULL) ? LDAP_SUCCESS : LDAP_REFERRAL;
1265                         send_ldap_result( sop, rs );
1266                 }
1267         }
1268
1269         rs->sr_err = LDAP_SUCCESS;
1270
1271 done:
1272         if( !IS_PSEARCH && e != NULL ) {
1273                 /* free reader lock */
1274                 bdb_cache_return_entry_r ( bdb->bi_dbenv, &bdb->bi_cache, e, &lock );
1275         }
1276
1277         LOCK_ID_FREE (bdb->bi_dbenv, locker );
1278
1279         ber_bvfree( search_context_csn );
1280
1281         if( rs->sr_v2ref ) {
1282                 ber_bvarray_free( rs->sr_v2ref );
1283                 rs->sr_v2ref = NULL;
1284         }
1285         if( realbase.bv_val ) ch_free( realbase.bv_val );
1286
1287         return rs->sr_err;
1288 }
1289
1290
1291 static int base_candidate(
1292         BackendDB       *be,
1293         Entry   *e,
1294         ID              *ids )
1295 {
1296 #ifdef NEW_LOGGING
1297         LDAP_LOG ( OPERATION, ENTRY,
1298                 "base_candidate: base: \"%s\" (0x%08lx)\n",
1299                 e->e_nname.bv_val, (long) e->e_id, 0);
1300 #else
1301         Debug(LDAP_DEBUG_ARGS, "base_candidates: base: \"%s\" (0x%08lx)\n",
1302                 e->e_nname.bv_val, (long) e->e_id, 0);
1303 #endif
1304
1305         ids[0] = 1;
1306         ids[1] = e->e_id;
1307         return 0;
1308 }
1309
1310 /* Look for "objectClass Present" in this filter.
1311  * Also count depth of filter tree while we're at it.
1312  */
1313 static int oc_filter(
1314         Filter *f,
1315         int cur,
1316         int *max
1317 )
1318 {
1319         int rc = 0;
1320
1321         if( cur > *max ) *max = cur;
1322
1323         switch(f->f_choice) {
1324         case LDAP_FILTER_PRESENT:
1325                 if (f->f_desc == slap_schema.si_ad_objectClass) {
1326                         rc = 1;
1327                 }
1328                 break;
1329
1330         case LDAP_FILTER_AND:
1331         case LDAP_FILTER_OR:
1332                 cur++;
1333                 for (f=f->f_and; f; f=f->f_next) {
1334                         (void) oc_filter(f, cur, max);
1335                 }
1336                 break;
1337
1338         default:
1339                 break;
1340         }
1341         return rc;
1342 }
1343
1344 static void search_stack_free( void *key, void *data )
1345 {
1346         ber_memfree_x(data, NULL);
1347 }
1348
1349 static void *search_stack(
1350         Operation *op
1351 )
1352 {
1353         struct bdb_info *bdb = (struct bdb_info *) op->o_bd->be_private;
1354         void *ret = NULL;
1355
1356         if ( op->o_threadctx ) {
1357                 ldap_pvt_thread_pool_getkey( op->o_threadctx, search_stack,
1358                         &ret, NULL );
1359         } else {
1360                 ret = bdb->bi_search_stack;
1361         }
1362
1363         if ( !ret ) {
1364                 ret = ch_malloc( bdb->bi_search_stack_depth * BDB_IDL_UM_SIZE
1365                         * sizeof( ID ) );
1366                 if ( op->o_threadctx ) {
1367                         ldap_pvt_thread_pool_setkey( op->o_threadctx, search_stack,
1368                                 ret, search_stack_free );
1369                 } else {
1370                         bdb->bi_search_stack = ret;
1371                 }
1372         }
1373         return ret;
1374 }
1375
1376 static int search_candidates(
1377         Operation *stackop,
1378         Operation *op,
1379         SlapReply *rs,
1380         Entry *e,
1381         u_int32_t locker,
1382         ID      *ids,
1383         ID      *scopes )
1384 {
1385         struct bdb_info *bdb = (struct bdb_info *) op->o_bd->be_private;
1386         int rc, depth = 1;
1387         Filter          f, rf, xf, nf;
1388         ID              *stack;
1389         AttributeAssertion aa_ref;
1390 #ifdef BDB_SUBENTRIES
1391         Filter  sf;
1392         AttributeAssertion aa_subentry;
1393 #endif
1394
1395         /*
1396          * This routine takes as input a filter (user-filter)
1397          * and rewrites it as follows:
1398          *      (&(scope=DN)[(objectClass=subentry)]
1399          *              (|[(objectClass=referral)(objectClass=alias)](user-filter))
1400          */
1401
1402 #ifdef NEW_LOGGING
1403         LDAP_LOG ( OPERATION, ENTRY,
1404                 "search_candidates: base=\"%s\" (0x%08lx) scope=%d\n", 
1405                 e->e_nname.bv_val, (long) e->e_id, op->oq_search.rs_scope);
1406 #else
1407         Debug(LDAP_DEBUG_TRACE,
1408                 "search_candidates: base=\"%s\" (0x%08lx) scope=%d\n",
1409                 e->e_nname.bv_val, (long) e->e_id, op->oq_search.rs_scope );
1410 #endif
1411
1412         xf.f_or = op->oq_search.rs_filter;
1413         xf.f_choice = LDAP_FILTER_OR;
1414         xf.f_next = NULL;
1415
1416         /* If the user's filter uses objectClass=*,
1417          * these clauses are redundant.
1418          */
1419         if (!oc_filter(op->oq_search.rs_filter, 1, &depth)
1420                 && !get_subentries_visibility(op)
1421                 && !is_sync_protocol(op) )
1422         {
1423                 if( !get_manageDSAit(op) && !get_domainScope(op) ) {
1424                         /* match referral objects */
1425                         struct berval bv_ref = { sizeof("referral")-1, "referral" };
1426                         rf.f_choice = LDAP_FILTER_EQUALITY;
1427                         rf.f_ava = &aa_ref;
1428                         rf.f_av_desc = slap_schema.si_ad_objectClass;
1429                         rf.f_av_value = bv_ref;
1430                         rf.f_next = xf.f_or;
1431                         xf.f_or = &rf;
1432                         depth++;
1433                 }
1434         }
1435
1436         f.f_next = NULL;
1437         f.f_choice = LDAP_FILTER_AND;
1438         f.f_and = &nf;
1439         /* Dummy; we compute scope separately now */
1440         nf.f_choice = SLAPD_FILTER_COMPUTED;
1441         nf.f_result = LDAP_SUCCESS;
1442         nf.f_next = xf.f_or == op->oq_search.rs_filter
1443                 ? op->oq_search.rs_filter : &xf ;
1444         /* Filter depth increased again, adding dummy clause */
1445         depth++;
1446
1447 #ifdef BDB_SUBENTRIES
1448         if( get_subentries_visibility( op ) ) {
1449                 struct berval bv_subentry = { sizeof("SUBENTRY")-1, "SUBENTRY" };
1450                 sf.f_choice = LDAP_FILTER_EQUALITY;
1451                 sf.f_ava = &aa_subentry;
1452                 sf.f_av_desc = slap_schema.si_ad_objectClass;
1453                 sf.f_av_value = bv_subentry;
1454                 sf.f_next = nf.f_next;
1455                 nf.f_next = &sf;
1456         }
1457 #endif
1458
1459         /* Allocate IDL stack, plus 1 more for former tmp */
1460         if ( depth+1 > bdb->bi_search_stack_depth ) {
1461                 stack = ch_malloc( (depth + 1) * BDB_IDL_UM_SIZE * sizeof( ID ) );
1462         } else {
1463                 stack = search_stack( stackop );
1464         }
1465
1466         if( op->ors_deref & LDAP_DEREF_SEARCHING ) {
1467                 rc = search_aliases( op, rs, e, locker, ids, scopes, stack );
1468         } else {
1469                 rc = bdb_dn2idl( op, e, ids, stack );
1470         }
1471
1472         if ( rc == LDAP_SUCCESS ) {
1473                 rc = bdb_filter_candidates( op, &f, ids,
1474                         stack, stack+BDB_IDL_UM_SIZE );
1475         }
1476
1477         if ( depth+1 > bdb->bi_search_stack_depth ) {
1478                 ch_free( stack );
1479         }
1480
1481         if( rc ) {
1482 #ifdef NEW_LOGGING
1483                 LDAP_LOG ( OPERATION, DETAIL1,
1484                         "bdb_search_candidates: failed (rc=%d)\n", rc, 0, 0  );
1485 #else
1486                 Debug(LDAP_DEBUG_TRACE,
1487                         "bdb_search_candidates: failed (rc=%d)\n",
1488                         rc, NULL, NULL );
1489 #endif
1490
1491         } else {
1492 #ifdef NEW_LOGGING
1493                 LDAP_LOG ( OPERATION, DETAIL1,
1494                         "bdb_search_candidates: id=%ld first=%ld last=%ld\n",
1495                         (long) ids[0], (long) BDB_IDL_FIRST(ids), 
1496                         (long) BDB_IDL_LAST(ids));
1497 #else
1498                 Debug(LDAP_DEBUG_TRACE,
1499                         "bdb_search_candidates: id=%ld first=%ld last=%ld\n",
1500                         (long) ids[0],
1501                         (long) BDB_IDL_FIRST(ids),
1502                         (long) BDB_IDL_LAST(ids) );
1503 #endif
1504         }
1505
1506         return rc;
1507 }
1508
1509 #ifdef LDAP_CONTROL_PAGEDRESULTS
1510 static void
1511 send_pagerequest_response( 
1512         Operation       *op,
1513         SlapReply       *rs,
1514         ID              lastid,
1515         int             tentries )
1516 {
1517         LDAPControl     ctrl, *ctrls[2];
1518         BerElementBuffer berbuf;
1519         BerElement      *ber = (BerElement *)&berbuf;
1520         struct berval   cookie = { 0, NULL };
1521         PagedResultsCookie respcookie;
1522
1523 #ifdef NEW_LOGGING
1524         LDAP_LOG ( OPERATION, ENTRY,
1525                 "send_pagerequest_response: lastid: (0x%08lx) "
1526                 "nentries: (0x%081x)\n", 
1527                 lastid, rs->sr_nentries, NULL );
1528 #else
1529         Debug(LDAP_DEBUG_ARGS, "send_pagerequest_response: lastid: (0x%08lx) "
1530                         "nentries: (0x%081x)\n", lastid, rs->sr_nentries, NULL );
1531 #endif
1532
1533         ctrl.ldctl_value.bv_val = NULL;
1534         ctrls[0] = &ctrl;
1535         ctrls[1] = NULL;
1536
1537         ber_init2( ber, NULL, LBER_USE_DER );
1538
1539         respcookie = ( PagedResultsCookie )lastid;
1540         op->o_conn->c_pagedresults_state.ps_cookie = respcookie;
1541         cookie.bv_len = sizeof( respcookie );
1542         cookie.bv_val = (char *)&respcookie;
1543
1544         /*
1545          * FIXME: we should consider sending an estimate of the entries
1546          * left, after appropriate security check is done
1547          */
1548         ber_printf( ber, "{iO}", tentries, &cookie ); 
1549
1550         if ( ber_flatten2( ber, &ctrls[0]->ldctl_value, 0 ) == -1 ) {
1551                 goto done;
1552         }
1553
1554         ctrls[0]->ldctl_oid = LDAP_CONTROL_PAGEDRESULTS;
1555         ctrls[0]->ldctl_iscritical = 0;
1556
1557         rs->sr_ctrls = ctrls;
1558         rs->sr_err = LDAP_SUCCESS;
1559         send_ldap_result( op, rs );
1560
1561 done:
1562         (void) ber_free_buf( ber );
1563 }                       
1564 #endif
1565
1566 int
1567 bdb_build_sync_state_ctrl(
1568         Operation       *op,
1569         SlapReply       *rs,
1570         Entry           *e,
1571         int                     entry_sync_state,
1572         LDAPControl     **ctrls,
1573         int                     num_ctrls,
1574         int                     send_cookie,
1575         struct berval   *csn)
1576 {
1577         Attribute* a;
1578         int ret;
1579         int res;
1580         const char *text = NULL;
1581
1582         BerElementBuffer berbuf;
1583         BerElement *ber = (BerElement *)&berbuf;
1584
1585         struct berval entryuuid_bv      = { 0, NULL };
1586
1587         ber_init2( ber, 0, LBER_USE_DER );
1588
1589         ctrls[num_ctrls] = ch_malloc ( sizeof ( LDAPControl ) );
1590
1591         for ( a = e->e_attrs; a != NULL; a = a->a_next ) {
1592                 AttributeDescription *desc = a->a_desc;
1593                 if ( desc == slap_schema.si_ad_entryUUID ) {
1594                         ber_dupbv( &entryuuid_bv, &a->a_vals[0] );
1595                 }
1596         }
1597
1598         if ( send_cookie && csn ) {
1599                 ber_printf( ber, "{eOON}",
1600                         entry_sync_state, &entryuuid_bv, csn );
1601         } else {
1602                 ber_printf( ber, "{eON}",
1603                         entry_sync_state, &entryuuid_bv );
1604         }
1605
1606         ch_free( entryuuid_bv.bv_val );
1607         entryuuid_bv.bv_val = NULL;
1608
1609         ctrls[num_ctrls]->ldctl_oid = LDAP_CONTROL_SYNC_STATE;
1610         ctrls[num_ctrls]->ldctl_iscritical = op->o_sync;
1611         ret = ber_flatten2( ber, &ctrls[num_ctrls]->ldctl_value, 1 );
1612
1613         ber_free_buf( ber );
1614
1615         if ( ret < 0 ) {
1616 #ifdef NEW_LOGGING
1617                 LDAP_LOG ( OPERATION, RESULTS, 
1618                         "bdb_build_sync_ctrl: ber_flatten2 failed\n",
1619                         0, 0, 0 );
1620 #else
1621                 Debug( LDAP_DEBUG_TRACE,
1622                         "bdb_build_sync_ctrl: ber_flatten2 failed\n",
1623                         0, 0, 0 );
1624 #endif
1625                 send_ldap_error( op, rs, LDAP_OTHER, "internal error" );
1626                 return ret;
1627         }
1628
1629         return LDAP_SUCCESS;
1630 }
1631
1632 int
1633 bdb_build_sync_done_ctrl(
1634         Operation       *op,
1635         SlapReply       *rs,
1636         LDAPControl     **ctrls,
1637         int             num_ctrls,
1638         int             send_cookie,
1639         struct berval   *csn )
1640 {
1641         int ret;
1642         BerElementBuffer berbuf;
1643         BerElement *ber = (BerElement *)&berbuf;
1644
1645         ber_init2( ber, NULL, LBER_USE_DER );
1646
1647         ctrls[num_ctrls] = ch_malloc ( sizeof ( LDAPControl ) );
1648
1649         if ( send_cookie && csn ) {
1650                 ber_printf( ber, "{ON}", csn );
1651         } else {
1652                 ber_printf( ber, "{N}" );
1653         }
1654
1655         ctrls[num_ctrls]->ldctl_oid = LDAP_CONTROL_SYNC_DONE;
1656         ctrls[num_ctrls]->ldctl_iscritical = op->o_sync;
1657         ret = ber_flatten2( ber, &ctrls[num_ctrls]->ldctl_value, 1 );
1658
1659         ber_free_buf( ber );
1660
1661         if ( ret < 0 ) {
1662 #ifdef NEW_LOGGING
1663                 LDAP_LOG ( OPERATION, RESULTS, 
1664                         "bdb_build_sync_done_ctrl: ber_flatten2 failed\n",
1665                         0, 0, 0 );
1666 #else
1667                 Debug( LDAP_DEBUG_TRACE,
1668                         "bdb_build_sync_done_ctrl: ber_flatten2 failed\n",
1669                         0, 0, 0 );
1670 #endif
1671                 send_ldap_error( op, rs, LDAP_OTHER, "internal error" );
1672                 return ret;
1673         }
1674
1675         return LDAP_SUCCESS;
1676 }
1677
1678 int
1679 bdb_send_ldap_intermediate(
1680         Operation   *op,
1681         SlapReply   *rs,
1682         int         state,
1683         struct berval *cookie )
1684 {
1685         BerElementBuffer berbuf;
1686         BerElement *ber = (BerElement *)&berbuf;
1687         struct berval rspdata;
1688
1689         int ret;
1690
1691         ber_init2( ber, NULL, LBER_USE_DER );
1692
1693         if ( cookie == NULL ) {
1694                 ber_printf( ber, "{eN}", state );
1695         } else {
1696                 ber_printf( ber, "{eON}", state, cookie );
1697         }
1698
1699         ret = ber_flatten2( ber, &rspdata, 0 );
1700
1701         if ( ret < 0 ) {
1702 #ifdef NEW_LOGGING
1703                 LDAP_LOG ( OPERATION, RESULTS, 
1704                         "bdb_send_ldap_intermediate: ber_flatten2 failed\n",
1705                         0, 0, 0 );
1706 #else
1707                 Debug( LDAP_DEBUG_TRACE,
1708                         "bdb_send_ldap_intermediate: ber_flatten2 failed\n",
1709                         0, 0, 0 );
1710 #endif
1711                 send_ldap_error( op, rs, LDAP_OTHER, "internal error" );
1712                 return ret;
1713         }
1714
1715         rs->sr_rspdata = &rspdata;
1716         send_ldap_intermediate( op, rs );
1717         rs->sr_rspdata = NULL;
1718         ber_free_buf( ber );
1719
1720         return LDAP_SUCCESS;
1721 }