1 /* filterentry.c - apply a filter to an entry */
4 * Copyright 1998-2000 The OpenLDAP Foundation, All Rights Reserved.
5 * COPYING RESTRICTIONS APPLY, see COPYRIGHT file
12 #include <ac/socket.h>
13 #include <ac/string.h>
18 static int test_filter_and( Backend *be,
19 Connection *conn, Operation *op,
20 Entry *e, Filter *flist );
21 static int test_filter_or( Backend *be,
22 Connection *conn, Operation *op,
23 Entry *e, Filter *flist );
24 static int test_substrings_filter( Backend *be,
25 Connection *conn, Operation *op,
27 static int test_ava_filter( Backend *be,
28 Connection *conn, Operation *op,
29 Entry *e, AttributeAssertion *ava, int type );
30 static int test_mra_filter( Backend *be,
31 Connection *conn, Operation *op,
32 Entry *e, MatchingRuleAssertion *mra );
33 static int test_presence_filter( Backend *be,
34 Connection *conn, Operation *op,
35 Entry *e, AttributeDescription *desc );
39 * test_filter - test a filter against a single entry.
41 * LDAP_COMPARE_TRUE filter matched
42 * LDAP_COMPARE_FALSE filter did not match
43 * SLAPD_COMPARE_UNDEFINED filter is undefined
44 * or an ldap result code indicating error
59 LDAP_LOG(( "filter", LDAP_LEVEL_ENTRY,
60 "test_filter: begin\n" ));
62 Debug( LDAP_DEBUG_FILTER, "=> test_filter\n", 0, 0, 0 );
66 switch ( f->f_choice ) {
67 case SLAPD_FILTER_COMPUTED:
69 LDAP_LOG(( "filter", LDAP_LEVEL_DETAIL1,
70 "test_filter: COMPUTED %s (%d)\n",
71 f->f_result == LDAP_COMPARE_FALSE ? "false" :
72 f->f_result == LDAP_COMPARE_TRUE ? "true" :
73 f->f_result == SLAPD_COMPARE_UNDEFINED ? "undefined" :
77 Debug( LDAP_DEBUG_FILTER, " COMPUTED %s (%d)\n",
78 f->f_result == LDAP_COMPARE_FALSE ? "false" :
79 f->f_result == LDAP_COMPARE_TRUE ? "true" :
80 f->f_result == SLAPD_COMPARE_UNDEFINED ? "undefined" : "error",
87 case LDAP_FILTER_EQUALITY:
89 LDAP_LOG(( "filter", LDAP_LEVEL_DETAIL1,
90 "test_filter: EQUALITY\n" ));
92 Debug( LDAP_DEBUG_FILTER, " EQUALITY\n", 0, 0, 0 );
95 rc = test_ava_filter( be, conn, op, e, f->f_ava,
96 LDAP_FILTER_EQUALITY );
99 case LDAP_FILTER_SUBSTRINGS:
101 LDAP_LOG(( "filter", LDAP_LEVEL_DETAIL1,
102 "test_filter SUBSTRINGS\n" ));
104 Debug( LDAP_DEBUG_FILTER, " SUBSTRINGS\n", 0, 0, 0 );
107 rc = test_substrings_filter( be, conn, op, e, f );
111 rc = test_ava_filter( be, conn, op, e, f->f_ava,
116 rc = test_ava_filter( be, conn, op, e, f->f_ava,
120 case LDAP_FILTER_PRESENT:
122 LDAP_LOG(( "filter", LDAP_LEVEL_DETAIL1,
123 "test_filter: PRESENT\n" ));
125 Debug( LDAP_DEBUG_FILTER, " PRESENT\n", 0, 0, 0 );
128 rc = test_presence_filter( be, conn, op, e, f->f_desc );
131 case LDAP_FILTER_APPROX:
133 LDAP_LOG(( "filter", LDAP_LEVEL_DETAIL1,
134 "test_filter: APPROX\n" ));
136 Debug( LDAP_DEBUG_FILTER, " APPROX\n", 0, 0, 0 );
138 rc = test_ava_filter( be, conn, op, e, f->f_ava,
139 LDAP_FILTER_APPROX );
142 case LDAP_FILTER_AND:
144 LDAP_LOG(( "filter", LDAP_LEVEL_DETAIL1,
145 "test_filter: AND\n" ));
147 Debug( LDAP_DEBUG_FILTER, " AND\n", 0, 0, 0 );
150 rc = test_filter_and( be, conn, op, e, f->f_and );
155 LDAP_LOG(( "filter", LDAP_LEVEL_DETAIL1,
156 "test_filter: OR\n" ));
158 Debug( LDAP_DEBUG_FILTER, " OR\n", 0, 0, 0 );
161 rc = test_filter_or( be, conn, op, e, f->f_or );
164 case LDAP_FILTER_NOT:
166 LDAP_LOG(( "filter", LDAP_LEVEL_DETAIL1,
167 "test_filter: NOT\n" ));
169 Debug( LDAP_DEBUG_FILTER, " NOT\n", 0, 0, 0 );
172 rc = test_filter( be, conn, op, e, f->f_not );
174 /* Flip true to false and false to true
175 * but leave Undefined alone.
178 case LDAP_COMPARE_TRUE:
179 rc = LDAP_COMPARE_FALSE;
181 case LDAP_COMPARE_FALSE:
182 rc = LDAP_COMPARE_TRUE;
187 case LDAP_FILTER_EXT:
189 LDAP_LOG(( "filter", LDAP_LEVEL_DETAIL1,
190 "test_filter: EXT\n" ));
192 Debug( LDAP_DEBUG_FILTER, " EXT\n", 0, 0, 0 );
195 rc = test_mra_filter( be, conn, op, e, f->f_mra );
200 LDAP_LOG(( "filter", LDAP_LEVEL_INFO,
201 "test_filter: unknown filter type %lu\n",
204 Debug( LDAP_DEBUG_ANY, " unknown filter type %lu\n",
208 rc = LDAP_PROTOCOL_ERROR;
212 LDAP_LOG(( "filter", LDAP_LEVEL_ENTRY,
213 "test_filter: return=%d\n", rc ));
215 Debug( LDAP_DEBUG_FILTER, "<= test_filter %d\n", rc, 0, 0 );
221 static int test_mra_filter(
226 MatchingRuleAssertion *mra )
231 if( !access_allowed( be, conn, op, e,
232 mra->ma_desc, mra->ma_value, ACL_SEARCH ) )
234 return LDAP_INSUFFICIENT_ACCESS;
237 if( strcmp(mra->ma_rule->smr_syntax->ssyn_oid,
238 mra->ma_desc->ad_type->sat_syntax->ssyn_oid) != 0)
240 return LDAP_INVALID_SYNTAX;
243 if( mra->ma_rule == NULL )
245 return LDAP_INAPPROPRIATE_MATCHING;
248 for(a = attrs_find( e->e_attrs, mra->ma_desc );
250 a = attrs_find( a->a_next, mra->ma_desc ) )
252 for ( i = 0; a->a_vals[i] != NULL; i++ ) {
257 rc = value_match( &ret, a->a_desc, mra->ma_rule, 0,
258 a->a_vals[i], mra->ma_value,
261 if( rc != LDAP_SUCCESS ) {
266 return LDAP_COMPARE_TRUE;
271 return LDAP_COMPARE_FALSE;
280 AttributeAssertion *ava,
287 if ( !access_allowed( be, conn, op, e,
288 ava->aa_desc, ava->aa_value, ACL_SEARCH ) )
290 return LDAP_INSUFFICIENT_ACCESS;
293 for(a = attrs_find( e->e_attrs, ava->aa_desc );
295 a = attrs_find( a->a_next, ava->aa_desc ) )
300 case LDAP_FILTER_APPROX:
301 mr = a->a_desc->ad_type->sat_approx;
302 if( mr != NULL ) break;
304 /* use EQUALITY matching rule if no APPROX rule */
306 case LDAP_FILTER_EQUALITY:
307 mr = a->a_desc->ad_type->sat_equality;
312 mr = a->a_desc->ad_type->sat_ordering;
323 for ( i = 0; a->a_vals[i] != NULL; i++ ) {
328 rc = value_match( &ret, a->a_desc, mr, 0,
329 a->a_vals[i], ava->aa_value,
332 if( rc != LDAP_SUCCESS ) {
337 case LDAP_FILTER_EQUALITY:
338 case LDAP_FILTER_APPROX:
340 return LDAP_COMPARE_TRUE;
346 return LDAP_COMPARE_TRUE;
352 return LDAP_COMPARE_TRUE;
359 return( LDAP_COMPARE_FALSE );
364 test_presence_filter(
369 AttributeDescription *desc
372 if ( !access_allowed( be, conn, op, e, desc, NULL, ACL_SEARCH ) )
374 return LDAP_INSUFFICIENT_ACCESS;
377 return attrs_find( e->e_attrs, desc ) != NULL
378 ? LDAP_COMPARE_TRUE : LDAP_COMPARE_FALSE;
392 int rtn = LDAP_COMPARE_TRUE; /* True if empty */
395 LDAP_LOG(( "filter", LDAP_LEVEL_ENTRY,
396 "test_filter_and: begin\n" ));
398 Debug( LDAP_DEBUG_FILTER, "=> test_filter_and\n", 0, 0, 0 );
402 for ( f = flist; f != NULL; f = f->f_next ) {
403 int rc = test_filter( be, conn, op, e, f );
405 if ( rc == LDAP_COMPARE_FALSE ) {
406 /* filter is False */
411 if ( rc != LDAP_COMPARE_TRUE ) {
412 /* filter is Undefined unless later elements are False */
418 LDAP_LOG(( "filter", LDAP_LEVEL_ENTRY,
419 "test_filter_and: rc=%d\n", rtn ));
421 Debug( LDAP_DEBUG_FILTER, "<= test_filter_and %d\n", rtn, 0, 0 );
437 int rtn = LDAP_COMPARE_FALSE; /* False if empty */
440 LDAP_LOG(( "filter", LDAP_LEVEL_ENTRY,
441 "test_filter_or: begin\n" ));
443 Debug( LDAP_DEBUG_FILTER, "=> test_filter_or\n", 0, 0, 0 );
447 for ( f = flist; f != NULL; f = f->f_next ) {
448 int rc = test_filter( be, conn, op, e, f );
450 if ( rc == LDAP_COMPARE_TRUE ) {
456 if ( rc != LDAP_COMPARE_FALSE ) {
457 /* filter is Undefined unless later elements are True */
463 LDAP_LOG(( "filter", LDAP_LEVEL_ENTRY,
464 "test_filter_or: result=%d\n", rtn ));
466 Debug( LDAP_DEBUG_FILTER, "<= test_filter_or %d\n", rtn, 0, 0 );
474 test_substrings_filter(
485 LDAP_LOG(( "filter", LDAP_LEVEL_ENTRY,
486 "test_substrings_filter: begin\n" ));
488 Debug( LDAP_DEBUG_FILTER, "begin test_substrings_filter\n", 0, 0, 0 );
492 if ( !access_allowed( be, conn, op, e,
493 f->f_sub_desc, NULL, ACL_SEARCH ) )
495 return LDAP_INSUFFICIENT_ACCESS;
498 for(a = attrs_find( e->e_attrs, f->f_sub_desc );
500 a = attrs_find( a->a_next, f->f_sub_desc ) )
503 MatchingRule *mr = a->a_desc->ad_type->sat_substr;
509 for ( i = 0; a->a_vals[i] != NULL; i++ ) {
514 rc = value_match( &ret, a->a_desc, mr, 0,
515 a->a_vals[i], f->f_sub,
518 if( rc != LDAP_SUCCESS ) {
523 return LDAP_COMPARE_TRUE;
529 LDAP_LOG(( "filter", LDAP_LEVEL_ENTRY,
530 "test_substrings_filter: return FALSE\n" ));
532 Debug( LDAP_DEBUG_FILTER, "end test_substrings_filter 1\n", 0, 0, 0 );
535 return LDAP_COMPARE_FALSE;