]> git.sur5r.net Git - openldap/blob - servers/slapd/back-bdb/search.c
93a8714d333da7e171823432c364c5240f704177
[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                         }
1223                         e = NULL;
1224                         rs->sr_entry = NULL;
1225                 }
1226
1227                 ldap_pvt_thread_yield();
1228         }
1229
1230         if (!IS_PSEARCH) {
1231                 if ( sop->o_sync_mode & SLAP_SYNC_REFRESH ) {
1232                         rs->sr_err = LDAP_SUCCESS;
1233                         rs->sr_rspoid = LDAP_SYNC_INFO;
1234                         rs->sr_ctrls = NULL;
1235                         bdb_send_ldap_intermediate( sop, rs,
1236                                 LDAP_SYNC_STATE_MODE_DONE, search_context_csn );
1237
1238                         /* If changelog is supported, this is where to process it */
1239         
1240                         if ( sop->o_sync_mode & SLAP_SYNC_PERSIST ) {
1241                                 /* refreshAndPersist mode */
1242                                 bdb_send_ldap_intermediate( sop, rs,
1243                                         LDAP_SYNC_LOG_MODE_DONE, search_context_csn );
1244                         } else {
1245                                 /* refreshOnly mode */
1246                                 bdb_build_sync_done_ctrl( sop, rs, ctrls,
1247                                         num_ctrls++, 1, search_context_csn );
1248                                 rs->sr_ctrls = ctrls;
1249                                 rs->sr_ref = rs->sr_v2ref;
1250                                 rs->sr_err = (rs->sr_v2ref == NULL) ? LDAP_SUCCESS : LDAP_REFERRAL;
1251                                 send_ldap_result( sop, rs );
1252                                 if ( ctrls[num_ctrls-1]->ldctl_value.bv_val != NULL ) {
1253                                         ch_free( ctrls[num_ctrls-1]->ldctl_value.bv_val );
1254                                 }
1255                                 ch_free( ctrls[--num_ctrls] );
1256                                 ctrls[num_ctrls] = NULL;
1257                         }
1258                 } else {
1259                         rs->sr_ctrls = NULL;
1260                         rs->sr_ref = rs->sr_v2ref;
1261                         rs->sr_err = (rs->sr_v2ref == NULL) ? LDAP_SUCCESS : LDAP_REFERRAL;
1262                         send_ldap_result( sop, rs );
1263                 }
1264         }
1265
1266         rs->sr_err = LDAP_SUCCESS;
1267
1268 done:
1269         if( !IS_PSEARCH && e != NULL ) {
1270                 /* free reader lock */
1271                 bdb_cache_return_entry_r ( bdb->bi_dbenv, &bdb->bi_cache, e, &lock );
1272         }
1273
1274         LOCK_ID_FREE (bdb->bi_dbenv, locker );
1275
1276         ber_bvfree( search_context_csn );
1277
1278         if( rs->sr_v2ref ) {
1279                 ber_bvarray_free( rs->sr_v2ref );
1280                 rs->sr_v2ref = NULL;
1281         }
1282         if( realbase.bv_val ) ch_free( realbase.bv_val );
1283
1284         return rs->sr_err;
1285 }
1286
1287
1288 static int base_candidate(
1289         BackendDB       *be,
1290         Entry   *e,
1291         ID              *ids )
1292 {
1293 #ifdef NEW_LOGGING
1294         LDAP_LOG ( OPERATION, ENTRY,
1295                 "base_candidate: base: \"%s\" (0x%08lx)\n",
1296                 e->e_nname.bv_val, (long) e->e_id, 0);
1297 #else
1298         Debug(LDAP_DEBUG_ARGS, "base_candidates: base: \"%s\" (0x%08lx)\n",
1299                 e->e_nname.bv_val, (long) e->e_id, 0);
1300 #endif
1301
1302         ids[0] = 1;
1303         ids[1] = e->e_id;
1304         return 0;
1305 }
1306
1307 /* Look for "objectClass Present" in this filter.
1308  * Also count depth of filter tree while we're at it.
1309  */
1310 static int oc_filter(
1311         Filter *f,
1312         int cur,
1313         int *max
1314 )
1315 {
1316         int rc = 0;
1317
1318         if( cur > *max ) *max = cur;
1319
1320         switch(f->f_choice) {
1321         case LDAP_FILTER_PRESENT:
1322                 if (f->f_desc == slap_schema.si_ad_objectClass) {
1323                         rc = 1;
1324                 }
1325                 break;
1326
1327         case LDAP_FILTER_AND:
1328         case LDAP_FILTER_OR:
1329                 cur++;
1330                 for (f=f->f_and; f; f=f->f_next) {
1331                         (void) oc_filter(f, cur, max);
1332                 }
1333                 break;
1334
1335         default:
1336                 break;
1337         }
1338         return rc;
1339 }
1340
1341 static void search_stack_free( void *key, void *data )
1342 {
1343         ber_memfree_x(data, NULL);
1344 }
1345
1346 static void *search_stack(
1347         Operation *op
1348 )
1349 {
1350         struct bdb_info *bdb = (struct bdb_info *) op->o_bd->be_private;
1351         void *ret = NULL;
1352
1353         if ( op->o_threadctx ) {
1354                 ldap_pvt_thread_pool_getkey( op->o_threadctx, search_stack,
1355                         &ret, NULL );
1356         } else {
1357                 ret = bdb->bi_search_stack;
1358         }
1359
1360         if ( !ret ) {
1361                 ret = ch_malloc( bdb->bi_search_stack_depth * BDB_IDL_UM_SIZE
1362                         * sizeof( ID ) );
1363                 if ( op->o_threadctx ) {
1364                         ldap_pvt_thread_pool_setkey( op->o_threadctx, search_stack,
1365                                 ret, search_stack_free );
1366                 } else {
1367                         bdb->bi_search_stack = ret;
1368                 }
1369         }
1370         return ret;
1371 }
1372
1373 static int search_candidates(
1374         Operation *stackop,
1375         Operation *op,
1376         SlapReply *rs,
1377         Entry *e,
1378         u_int32_t locker,
1379         ID      *ids,
1380         ID      *scopes )
1381 {
1382         struct bdb_info *bdb = (struct bdb_info *) op->o_bd->be_private;
1383         int rc, depth = 1;
1384         Filter          f, rf, xf, nf;
1385         ID              *stack;
1386         AttributeAssertion aa_ref;
1387 #ifdef BDB_SUBENTRIES
1388         Filter  sf;
1389         AttributeAssertion aa_subentry;
1390 #endif
1391
1392         /*
1393          * This routine takes as input a filter (user-filter)
1394          * and rewrites it as follows:
1395          *      (&(scope=DN)[(objectClass=subentry)]
1396          *              (|[(objectClass=referral)(objectClass=alias)](user-filter))
1397          */
1398
1399 #ifdef NEW_LOGGING
1400         LDAP_LOG ( OPERATION, ENTRY,
1401                 "search_candidates: base=\"%s\" (0x%08lx) scope=%d\n", 
1402                 e->e_nname.bv_val, (long) e->e_id, op->oq_search.rs_scope);
1403 #else
1404         Debug(LDAP_DEBUG_TRACE,
1405                 "search_candidates: base=\"%s\" (0x%08lx) scope=%d\n",
1406                 e->e_nname.bv_val, (long) e->e_id, op->oq_search.rs_scope );
1407 #endif
1408
1409         xf.f_or = op->oq_search.rs_filter;
1410         xf.f_choice = LDAP_FILTER_OR;
1411         xf.f_next = NULL;
1412
1413         /* If the user's filter uses objectClass=*,
1414          * these clauses are redundant.
1415          */
1416         if (!oc_filter(op->oq_search.rs_filter, 1, &depth)
1417                 && !get_subentries_visibility(op)
1418                 && !is_sync_protocol(op) )
1419         {
1420                 if( !get_manageDSAit(op) && !get_domainScope(op) ) {
1421                         /* match referral objects */
1422                         struct berval bv_ref = { sizeof("referral")-1, "referral" };
1423                         rf.f_choice = LDAP_FILTER_EQUALITY;
1424                         rf.f_ava = &aa_ref;
1425                         rf.f_av_desc = slap_schema.si_ad_objectClass;
1426                         rf.f_av_value = bv_ref;
1427                         rf.f_next = xf.f_or;
1428                         xf.f_or = &rf;
1429                         depth++;
1430                 }
1431         }
1432
1433         f.f_next = NULL;
1434         f.f_choice = LDAP_FILTER_AND;
1435         f.f_and = &nf;
1436         /* Dummy; we compute scope separately now */
1437         nf.f_choice = SLAPD_FILTER_COMPUTED;
1438         nf.f_result = LDAP_SUCCESS;
1439         nf.f_next = xf.f_or == op->oq_search.rs_filter
1440                 ? op->oq_search.rs_filter : &xf ;
1441         /* Filter depth increased again, adding dummy clause */
1442         depth++;
1443
1444 #ifdef BDB_SUBENTRIES
1445         if( get_subentries_visibility( op ) ) {
1446                 struct berval bv_subentry = { sizeof("SUBENTRY")-1, "SUBENTRY" };
1447                 sf.f_choice = LDAP_FILTER_EQUALITY;
1448                 sf.f_ava = &aa_subentry;
1449                 sf.f_av_desc = slap_schema.si_ad_objectClass;
1450                 sf.f_av_value = bv_subentry;
1451                 sf.f_next = nf.f_next;
1452                 nf.f_next = &sf;
1453         }
1454 #endif
1455
1456         /* Allocate IDL stack, plus 1 more for former tmp */
1457         if ( depth+1 > bdb->bi_search_stack_depth ) {
1458                 stack = ch_malloc( (depth + 1) * BDB_IDL_UM_SIZE * sizeof( ID ) );
1459         } else {
1460                 stack = search_stack( stackop );
1461         }
1462
1463         if( op->ors_deref & LDAP_DEREF_SEARCHING ) {
1464                 rc = search_aliases( op, rs, e, locker, ids, scopes, stack );
1465         } else {
1466                 rc = bdb_dn2idl( op, e, ids, stack );
1467         }
1468
1469         if ( rc == LDAP_SUCCESS ) {
1470                 rc = bdb_filter_candidates( op, &f, ids,
1471                         stack, stack+BDB_IDL_UM_SIZE );
1472         }
1473
1474         if ( depth+1 > bdb->bi_search_stack_depth ) {
1475                 ch_free( stack );
1476         }
1477
1478         if( rc ) {
1479 #ifdef NEW_LOGGING
1480                 LDAP_LOG ( OPERATION, DETAIL1,
1481                         "bdb_search_candidates: failed (rc=%d)\n", rc, 0, 0  );
1482 #else
1483                 Debug(LDAP_DEBUG_TRACE,
1484                         "bdb_search_candidates: failed (rc=%d)\n",
1485                         rc, NULL, NULL );
1486 #endif
1487
1488         } else {
1489 #ifdef NEW_LOGGING
1490                 LDAP_LOG ( OPERATION, DETAIL1,
1491                         "bdb_search_candidates: id=%ld first=%ld last=%ld\n",
1492                         (long) ids[0], (long) BDB_IDL_FIRST(ids), 
1493                         (long) BDB_IDL_LAST(ids));
1494 #else
1495                 Debug(LDAP_DEBUG_TRACE,
1496                         "bdb_search_candidates: id=%ld first=%ld last=%ld\n",
1497                         (long) ids[0],
1498                         (long) BDB_IDL_FIRST(ids),
1499                         (long) BDB_IDL_LAST(ids) );
1500 #endif
1501         }
1502
1503         return rc;
1504 }
1505
1506 #ifdef LDAP_CONTROL_PAGEDRESULTS
1507 static void
1508 send_pagerequest_response( 
1509         Operation       *op,
1510         SlapReply       *rs,
1511         ID              lastid,
1512         int             tentries )
1513 {
1514         LDAPControl     ctrl, *ctrls[2];
1515         char berbuf[LBER_ELEMENT_SIZEOF];
1516         BerElement      *ber = (BerElement *)berbuf;
1517         struct berval   cookie = { 0, NULL };
1518         PagedResultsCookie respcookie;
1519
1520 #ifdef NEW_LOGGING
1521         LDAP_LOG ( OPERATION, ENTRY,
1522                 "send_pagerequest_response: lastid: (0x%08lx) "
1523                 "nentries: (0x%081x)\n", 
1524                 lastid, rs->sr_nentries, NULL );
1525 #else
1526         Debug(LDAP_DEBUG_ARGS, "send_pagerequest_response: lastid: (0x%08lx) "
1527                         "nentries: (0x%081x)\n", lastid, rs->sr_nentries, NULL );
1528 #endif
1529
1530         ctrl.ldctl_value.bv_val = NULL;
1531         ctrls[0] = &ctrl;
1532         ctrls[1] = NULL;
1533
1534         ber_init2( ber, NULL, LBER_USE_DER );
1535
1536         respcookie = ( PagedResultsCookie )lastid;
1537         op->o_conn->c_pagedresults_state.ps_cookie = respcookie;
1538         cookie.bv_len = sizeof( respcookie );
1539         cookie.bv_val = (char *)&respcookie;
1540
1541         /*
1542          * FIXME: we should consider sending an estimate of the entries
1543          * left, after appropriate security check is done
1544          */
1545         ber_printf( ber, "{iO}", tentries, &cookie ); 
1546
1547         if ( ber_flatten2( ber, &ctrls[0]->ldctl_value, 0 ) == -1 ) {
1548                 goto done;
1549         }
1550
1551         ctrls[0]->ldctl_oid = LDAP_CONTROL_PAGEDRESULTS;
1552         ctrls[0]->ldctl_iscritical = 0;
1553
1554         rs->sr_ctrls = ctrls;
1555         rs->sr_err = LDAP_SUCCESS;
1556         send_ldap_result( op, rs );
1557
1558 done:
1559         (void) ber_free_buf( ber );
1560 }                       
1561 #endif
1562
1563 int
1564 bdb_build_sync_state_ctrl(
1565         Operation       *op,
1566         SlapReply       *rs,
1567         Entry           *e,
1568         int                     entry_sync_state,
1569         LDAPControl     **ctrls,
1570         int                     num_ctrls,
1571         int                     send_cookie,
1572         struct berval   *csn)
1573 {
1574         Attribute* a;
1575         int ret;
1576         int res;
1577         const char *text = NULL;
1578
1579         char berbuf[LBER_ELEMENT_SIZEOF];
1580         BerElement *ber = (BerElement *)berbuf;
1581
1582         struct berval entryuuid_bv      = { 0, NULL };
1583
1584         ber_init2( ber, 0, LBER_USE_DER );
1585
1586         ctrls[num_ctrls] = ch_malloc ( sizeof ( LDAPControl ) );
1587
1588         for ( a = e->e_attrs; a != NULL; a = a->a_next ) {
1589                 AttributeDescription *desc = a->a_desc;
1590                 if ( desc == slap_schema.si_ad_entryUUID ) {
1591                         ber_dupbv( &entryuuid_bv, &a->a_vals[0] );
1592                 }
1593         }
1594
1595         if ( send_cookie && csn ) {
1596                 ber_printf( ber, "{eOON}",
1597                         entry_sync_state, &entryuuid_bv, csn );
1598         } else {
1599                 ber_printf( ber, "{eON}",
1600                         entry_sync_state, &entryuuid_bv );
1601         }
1602
1603         ch_free( entryuuid_bv.bv_val );
1604         entryuuid_bv.bv_val = NULL;
1605
1606         ctrls[num_ctrls]->ldctl_oid = LDAP_CONTROL_SYNC_STATE;
1607         ctrls[num_ctrls]->ldctl_iscritical = op->o_sync;
1608         ret = ber_flatten2( ber, &ctrls[num_ctrls]->ldctl_value, 1 );
1609
1610         ber_free_buf( ber );
1611
1612         if ( ret < 0 ) {
1613 #ifdef NEW_LOGGING
1614                 LDAP_LOG ( OPERATION, RESULTS, 
1615                         "bdb_build_sync_ctrl: ber_flatten2 failed\n",
1616                         0, 0, 0 );
1617 #else
1618                 Debug( LDAP_DEBUG_TRACE,
1619                         "bdb_build_sync_ctrl: ber_flatten2 failed\n",
1620                         0, 0, 0 );
1621 #endif
1622                 send_ldap_error( op, rs, LDAP_OTHER, "internal error" );
1623                 return ret;
1624         }
1625
1626         return LDAP_SUCCESS;
1627 }
1628
1629 int
1630 bdb_build_sync_done_ctrl(
1631         Operation       *op,
1632         SlapReply       *rs,
1633         LDAPControl     **ctrls,
1634         int             num_ctrls,
1635         int             send_cookie,
1636         struct berval   *csn )
1637 {
1638         int ret;
1639         char berbuf[LBER_ELEMENT_SIZEOF];
1640         BerElement *ber = (BerElement *)berbuf;
1641
1642         ber_init2( ber, NULL, LBER_USE_DER );
1643
1644         ctrls[num_ctrls] = ch_malloc ( sizeof ( LDAPControl ) );
1645
1646         if ( send_cookie && csn ) {
1647                 ber_printf( ber, "{ON}", csn );
1648         } else {
1649                 ber_printf( ber, "{N}" );
1650         }
1651
1652         ctrls[num_ctrls]->ldctl_oid = LDAP_CONTROL_SYNC_DONE;
1653         ctrls[num_ctrls]->ldctl_iscritical = op->o_sync;
1654         ret = ber_flatten2( ber, &ctrls[num_ctrls]->ldctl_value, 1 );
1655
1656         ber_free_buf( ber );
1657
1658         if ( ret < 0 ) {
1659 #ifdef NEW_LOGGING
1660                 LDAP_LOG ( OPERATION, RESULTS, 
1661                         "bdb_build_sync_done_ctrl: ber_flatten2 failed\n",
1662                         0, 0, 0 );
1663 #else
1664                 Debug( LDAP_DEBUG_TRACE,
1665                         "bdb_build_sync_done_ctrl: ber_flatten2 failed\n",
1666                         0, 0, 0 );
1667 #endif
1668                 send_ldap_error( op, rs, LDAP_OTHER, "internal error" );
1669                 return ret;
1670         }
1671
1672         return LDAP_SUCCESS;
1673 }
1674
1675 int
1676 bdb_send_ldap_intermediate(
1677         Operation   *op,
1678         SlapReply   *rs,
1679         int         state,
1680         struct berval *cookie )
1681 {
1682         char berbuf[LBER_ELEMENT_SIZEOF];
1683         BerElement *ber = (BerElement *)berbuf;
1684         struct berval rspdata;
1685
1686         int ret;
1687
1688         ber_init2( ber, NULL, LBER_USE_DER );
1689
1690         if ( cookie == NULL ) {
1691                 ber_printf( ber, "{eN}", state );
1692         } else {
1693                 ber_printf( ber, "{eON}", state, cookie );
1694         }
1695
1696         ret = ber_flatten2( ber, &rspdata, 0 );
1697
1698         if ( ret < 0 ) {
1699 #ifdef NEW_LOGGING
1700                 LDAP_LOG ( OPERATION, RESULTS, 
1701                         "bdb_send_ldap_intermediate: ber_flatten2 failed\n",
1702                         0, 0, 0 );
1703 #else
1704                 Debug( LDAP_DEBUG_TRACE,
1705                         "bdb_send_ldap_intermediate: ber_flatten2 failed\n",
1706                         0, 0, 0 );
1707 #endif
1708                 send_ldap_error( op, rs, LDAP_OTHER, "internal error" );
1709                 return ret;
1710         }
1711
1712         rs->sr_rspdata = &rspdata;
1713         send_ldap_intermediate( op, rs );
1714         rs->sr_rspdata = NULL;
1715         ber_free_buf( ber );
1716
1717         return LDAP_SUCCESS;
1718 }