Diff for /servers/slapd/filter.c between versions 1.134.2.2 and 1.159

version 1.134.2.2, 2007/02/13 20:22:18 version 1.159, 2011/01/29 11:29:20
Line 1 Line 1
 /* filter.c - routines for parsing and dealing with filters */  /* filter.c - routines for parsing and dealing with filters */
 /* $OpenLDAP: pkg/ldap/servers/slapd/filter.c,v 1.140 2007/01/02 19:01:04 kurt Exp $ */  /* $OpenLDAP: pkg/ldap/servers/slapd/filter.c,v 1.158 2011/01/12 13:41:34 hallvard Exp $ */
 /* This work is part of OpenLDAP Software <http://www.openldap.org/>.  /* This work is part of OpenLDAP Software <http://www.openldap.org/>.
  *   *
  * Copyright 1998-2007 The OpenLDAP Foundation.   * Copyright 1998-2011 The OpenLDAP Foundation.
  * All rights reserved.   * All rights reserved.
  *   *
  * Redistribution and use in source and binary forms, with or without   * Redistribution and use in source and binary forms, with or without
Line 32 Line 32
 #include <ac/string.h>  #include <ac/string.h>
   
 #include "slap.h"  #include "slap.h"
   #include "lutil.h"
   
   const Filter *slap_filter_objectClass_pres;
   const struct berval *slap_filterstr_objectClass_pres;
   
 static int      get_filter_list(  static int      get_filter_list(
         Operation *op,          Operation *op,
Line 57  static int get_simple_vrFilter( Line 61  static int get_simple_vrFilter(
         const char **text );          const char **text );
   
 int  int
   filter_init( void )
   {
           static Filter filter_objectClass_pres = { LDAP_FILTER_PRESENT };
           static struct berval filterstr_objectClass_pres = BER_BVC("(objectClass=*)");
   
           filter_objectClass_pres.f_desc = slap_schema.si_ad_objectClass;
   
           slap_filter_objectClass_pres = &filter_objectClass_pres;
           slap_filterstr_objectClass_pres = &filterstr_objectClass_pres;
   
           return 0;
   }
   
   void
   filter_destroy( void )
   {
           return;
   }
   
   int
 get_filter(  get_filter(
         Operation *op,          Operation *op,
         BerElement *ber,          BerElement *ber,
Line 324  get_ssa( Line 348  get_ssa(
 {  {
         ber_tag_t       tag;          ber_tag_t       tag;
         ber_len_t       len;          ber_len_t       len;
         ber_tag_t       rc;          int     rc;
         struct berval desc, value, nvalue;          struct berval desc, value, nvalue;
         char            *last;          char            *last;
         SubstringsAssertion ssa;          SubstringsAssertion ssa;
Line 361  get_ssa( Line 385  get_ssa(
   
         rc = LDAP_PROTOCOL_ERROR;          rc = LDAP_PROTOCOL_ERROR;
   
           /* If there is no substring matching rule, there's nothing
            * we can do with this filter. But we continue to parse it
            * for logging purposes.
            */
           if ( ssa.sa_desc->ad_type->sat_substr == NULL ) {
                   f->f_choice |= SLAPD_FILTER_UNDEFINED;
                   Debug( LDAP_DEBUG_FILTER,
                   "get_ssa: no substring matching rule for attributeType %s\n",
                           desc.bv_val, 0, 0 );
           }
   
         for ( tag = ber_first_element( ber, &len, &last );          for ( tag = ber_first_element( ber, &len, &last );
                 tag != LBER_DEFAULT;                  tag != LBER_DEFAULT;
                 tag = ber_next_element( ber, &len, last ) )                  tag = ber_next_element( ber, &len, last ) )
         {          {
                 unsigned usage;                  unsigned usage;
   
                 rc = ber_scanf( ber, "m", &value );                  if ( ber_scanf( ber, "m", &value ) == LBER_ERROR ) {
                 if ( rc == LBER_ERROR ) {  
                         rc = SLAPD_DISCONNECT;                          rc = SLAPD_DISCONNECT;
                         goto return_error;                          goto return_error;
                 }                  }
Line 420  get_ssa( Line 454  get_ssa(
                 rc = asserted_value_validate_normalize(                  rc = asserted_value_validate_normalize(
                         ssa.sa_desc, ssa.sa_desc->ad_type->sat_equality,                          ssa.sa_desc, ssa.sa_desc->ad_type->sat_equality,
                         usage, &value, &nvalue, text, op->o_tmpmemctx );                          usage, &value, &nvalue, text, op->o_tmpmemctx );
                 if( rc != LDAP_SUCCESS ) goto return_error;                  if( rc != LDAP_SUCCESS ) {
                           f->f_choice |= SLAPD_FILTER_UNDEFINED;
                           Debug( LDAP_DEBUG_FILTER,
                           "get_ssa: illegal value for attributeType %s (%d) %s\n",
                                   desc.bv_val, rc, *text );
                           ber_dupbv_x( &nvalue, &value, op->o_tmpmemctx );
                   }
   
                 switch ( tag ) {                  switch ( tag ) {
                 case LDAP_SUBSTRING_INITIAL:                  case LDAP_SUBSTRING_INITIAL:
Line 454  return_error: Line 494  return_error:
                         return rc;                          return rc;
                 }                  }
   
                   *text = NULL;
                 rc = LDAP_SUCCESS;                  rc = LDAP_SUCCESS;
         }          }
   
Line 467  return_error: Line 508  return_error:
 }  }
   
 void  void
 filter_free_x( Operation *op, Filter *f )  filter_free_x( Operation *op, Filter *f, int freeme )
 {  {
         Filter  *p, *next;          Filter  *p, *next;
   
Line 479  filter_free_x( Operation *op, Filter *f Line 520  filter_free_x( Operation *op, Filter *f
   
         switch ( f->f_choice ) {          switch ( f->f_choice ) {
         case LDAP_FILTER_PRESENT:          case LDAP_FILTER_PRESENT:
                   if ( f->f_desc->ad_flags & SLAP_DESC_TEMPORARY )
                           op->o_tmpfree( f->f_desc, op->o_tmpmemctx );
                 break;                  break;
   
         case LDAP_FILTER_EQUALITY:          case LDAP_FILTER_EQUALITY:
Line 506  filter_free_x( Operation *op, Filter *f Line 549  filter_free_x( Operation *op, Filter *f
         case LDAP_FILTER_NOT:          case LDAP_FILTER_NOT:
                 for ( p = f->f_list; p != NULL; p = next ) {                  for ( p = f->f_list; p != NULL; p = next ) {
                         next = p->f_next;                          next = p->f_next;
                         filter_free_x( op, p );                          filter_free_x( op, p, 1 );
                 }                  }
                 break;                  break;
   
Line 523  filter_free_x( Operation *op, Filter *f Line 566  filter_free_x( Operation *op, Filter *f
                 break;                  break;
         }          }
   
         op->o_tmpfree( f, op->o_tmpmemctx );          if ( freeme ) {
                   op->o_tmpfree( f, op->o_tmpmemctx );
           }
 }  }
   
 void  void
Line 535  filter_free( Filter *f ) Line 580  filter_free( Filter *f )
         op.o_hdr = &ohdr;          op.o_hdr = &ohdr;
         op.o_tmpmemctx = slap_sl_context( f );          op.o_tmpmemctx = slap_sl_context( f );
         op.o_tmpmfuncs = &slap_sl_mfuncs;          op.o_tmpmfuncs = &slap_sl_mfuncs;
         filter_free_x( &op, f );          filter_free_x( &op, f, 1 );
 }  }
   
 void  void
 filter2bv_x( Operation *op, Filter *f, struct berval *fstr )  filter2bv_x( Operation *op, Filter *f, struct berval *fstr )
 {  {
           return filter2bv_undef_x( op, f, 0, fstr );
   }
   
   void
   filter2bv_undef_x( Operation *op, Filter *f, int noundef, struct berval *fstr )
   {
         int             i;          int             i;
         Filter          *p;          Filter          *p;
         struct berval   tmp;          struct berval   tmp, value;
         static struct berval          static struct berval
                         ber_bvfalse = BER_BVC( "(?=false)" ),                          ber_bvfalse = BER_BVC( "(?=false)" ),
                         ber_bvtrue = BER_BVC( "(?=true)" ),                          ber_bvtrue = BER_BVC( "(?=true)" ),
Line 553  filter2bv_x( Operation *op, Filter *f, s Line 604  filter2bv_x( Operation *op, Filter *f, s
                         ber_bvnone = BER_BVC( "(?=none)" );                          ber_bvnone = BER_BVC( "(?=none)" );
         ber_len_t       len;          ber_len_t       len;
         ber_tag_t       choice;          ber_tag_t       choice;
         int undef;          int undef, undef2;
         char *sign;          char *sign;
   
         if ( f == NULL ) {          if ( f == NULL ) {
Line 562  filter2bv_x( Operation *op, Filter *f, s Line 613  filter2bv_x( Operation *op, Filter *f, s
         }          }
   
         undef = f->f_choice & SLAPD_FILTER_UNDEFINED;          undef = f->f_choice & SLAPD_FILTER_UNDEFINED;
           undef2 = (undef && !noundef);
         choice = f->f_choice & SLAPD_FILTER_MASK;          choice = f->f_choice & SLAPD_FILTER_MASK;
   
         switch ( choice ) {          switch ( choice ) {
Line 582  filter2bv_x( Operation *op, Filter *f, s Line 634  filter2bv_x( Operation *op, Filter *f, s
                 sign = "~=";                  sign = "~=";
   
 simple:  simple:
                 filter_escape_value_x( &f->f_av_value, &tmp, op->o_tmpmemctx );                  value = f->f_av_value;
                   if ( f->f_av_desc->ad_type->sat_equality &&
                           !undef &&
                           ( f->f_av_desc->ad_type->sat_equality->smr_usage & SLAP_MR_MUTATION_NORMALIZER ))
                   {
                           f->f_av_desc->ad_type->sat_equality->smr_normalize(
                                   (SLAP_MR_DENORMALIZE|SLAP_MR_VALUE_OF_ASSERTION_SYNTAX),
                                   NULL, NULL, &f->f_av_value, &value, op->o_tmpmemctx );
                   }
   
                   filter_escape_value_x( &value, &tmp, op->o_tmpmemctx );
                 /* NOTE: tmp can legitimately be NULL (meaning empty)                   /* NOTE: tmp can legitimately be NULL (meaning empty) 
                  * since in a Filter values in AVAs are supposed                   * since in a Filter values in AVAs are supposed
                  * to have been normalized, meaning that an empty value                   * to have been normalized, meaning that an empty value
                  * is legal for that attribute's syntax */                   * is legal for that attribute's syntax */
   
                 fstr->bv_len += f->f_av_desc->ad_cname.bv_len + tmp.bv_len;                  fstr->bv_len += f->f_av_desc->ad_cname.bv_len + tmp.bv_len;
                 if ( undef )                  if ( undef2 )
                         fstr->bv_len++;                          fstr->bv_len++;
                 fstr->bv_val = op->o_tmpalloc( fstr->bv_len + 1, op->o_tmpmemctx );                  fstr->bv_val = op->o_tmpalloc( fstr->bv_len + 1, op->o_tmpmemctx );
   
                 snprintf( fstr->bv_val, fstr->bv_len + 1, "(%s%s%s%s)",                  snprintf( fstr->bv_val, fstr->bv_len + 1, "(%s%s%s%s)",
                         undef ? "?" : "",                          undef2 ? "?" : "",
                         f->f_av_desc->ad_cname.bv_val, sign,                          f->f_av_desc->ad_cname.bv_val, sign,
                         tmp.bv_len ? tmp.bv_val : "" );                          tmp.bv_len ? tmp.bv_val : "" );
   
                   if ( value.bv_val != f->f_av_value.bv_val ) {
                           ber_memfree_x( value.bv_val, op->o_tmpmemctx );
                   }
   
                 ber_memfree_x( tmp.bv_val, op->o_tmpmemctx );                  ber_memfree_x( tmp.bv_val, op->o_tmpmemctx );
                 break;                  break;
   
         case LDAP_FILTER_SUBSTRINGS:          case LDAP_FILTER_SUBSTRINGS:
                 fstr->bv_len = f->f_sub_desc->ad_cname.bv_len +                  fstr->bv_len = f->f_sub_desc->ad_cname.bv_len +
                         STRLENOF("(=*)");                          STRLENOF("(=*)");
                 if ( undef )                  if ( undef2 )
                         fstr->bv_len++;                          fstr->bv_len++;
                 fstr->bv_val = op->o_tmpalloc( fstr->bv_len + 128, op->o_tmpmemctx );                  fstr->bv_val = op->o_tmpalloc( fstr->bv_len + 128, op->o_tmpmemctx );
   
                 snprintf( fstr->bv_val, fstr->bv_len + 1, "(%s%s=*)",                  snprintf( fstr->bv_val, fstr->bv_len + 1, "(%s%s=*)",
                         undef ? "?" : "",                          undef2 ? "?" : "",
                         f->f_sub_desc->ad_cname.bv_val );                          f->f_sub_desc->ad_cname.bv_val );
   
                 if ( f->f_sub_initial.bv_val != NULL ) {                  if ( f->f_sub_initial.bv_val != NULL ) {
Line 618  simple: Line 684  simple:
                         len = fstr->bv_len;                          len = fstr->bv_len;
   
                         filter_escape_value_x( &f->f_sub_initial, &tmp, op->o_tmpmemctx );                          filter_escape_value_x( &f->f_sub_initial, &tmp, op->o_tmpmemctx );
                         tmplen = tmp.bv_len ? tmp.bv_len : STRLENOF( "(null)" );                          tmplen = tmp.bv_len;
   
                         fstr->bv_len += tmplen;                          fstr->bv_len += tmplen;
                         fstr->bv_val = op->o_tmprealloc( fstr->bv_val,                          fstr->bv_val = op->o_tmprealloc( fstr->bv_val,
                                 fstr->bv_len + 1, op->o_tmpmemctx );                                  fstr->bv_len + 1, op->o_tmpmemctx );
   
                         snprintf( &fstr->bv_val[len-2],                          snprintf( &fstr->bv_val[len - 2],
                                 tmplen + STRLENOF( /*(*/ "*)" ) + 1,                                  tmplen + STRLENOF( /*(*/ "*)" ) + 1,
                                 /* "(attr=" */ "%s*)",                                  /* "(attr=" */ "%s*)",
                                 tmp.bv_len ? tmp.bv_val : "(null)");                                  tmp.bv_len ? tmp.bv_val : "");
   
                         ber_memfree_x( tmp.bv_val, op->o_tmpmemctx );                          ber_memfree_x( tmp.bv_val, op->o_tmpmemctx );
                 }                  }
Line 639  simple: Line 705  simple:
                                 len = fstr->bv_len;                                  len = fstr->bv_len;
                                 filter_escape_value_x( &f->f_sub_any[i],                                  filter_escape_value_x( &f->f_sub_any[i],
                                         &tmp, op->o_tmpmemctx );                                          &tmp, op->o_tmpmemctx );
                                 tmplen = tmp.bv_len ? tmp.bv_len : STRLENOF( "(null)" );                                  tmplen = tmp.bv_len;
   
                                 fstr->bv_len += tmplen + STRLENOF( /*(*/ ")" );                                  fstr->bv_len += tmplen + STRLENOF( /*(*/ ")" );
                                 fstr->bv_val = op->o_tmprealloc( fstr->bv_val,                                  fstr->bv_val = op->o_tmprealloc( fstr->bv_val,
                                         fstr->bv_len + 1, op->o_tmpmemctx );                                          fstr->bv_len + 1, op->o_tmpmemctx );
   
                                 snprintf( &fstr->bv_val[len-1],                                  snprintf( &fstr->bv_val[len - 1],
                                         tmplen + STRLENOF( /*(*/ "*)" ) + 1,                                          tmplen + STRLENOF( /*(*/ "*)" ) + 1,
                                         /* "(attr=[init]*[any*]" */ "%s*)",                                          /* "(attr=[init]*[any*]" */ "%s*)",
                                         tmp.bv_len ? tmp.bv_val : "(null)");                                          tmp.bv_len ? tmp.bv_val : "");
                                 ber_memfree_x( tmp.bv_val, op->o_tmpmemctx );                                  ber_memfree_x( tmp.bv_val, op->o_tmpmemctx );
                         }                          }
                 }                  }
Line 659  simple: Line 725  simple:
                         len = fstr->bv_len;                          len = fstr->bv_len;
   
                         filter_escape_value_x( &f->f_sub_final, &tmp, op->o_tmpmemctx );                          filter_escape_value_x( &f->f_sub_final, &tmp, op->o_tmpmemctx );
                         tmplen = tmp.bv_len ? tmp.bv_len : STRLENOF( "(null)" );                          tmplen = tmp.bv_len;
   
                         fstr->bv_len += tmplen;                          fstr->bv_len += tmplen;
                         fstr->bv_val = op->o_tmprealloc( fstr->bv_val,                          fstr->bv_val = op->o_tmprealloc( fstr->bv_val,
                                 fstr->bv_len + 1, op->o_tmpmemctx );                                  fstr->bv_len + 1, op->o_tmpmemctx );
   
                         snprintf( &fstr->bv_val[len-1],                          snprintf( &fstr->bv_val[len - 1],
                                 tmplen + STRLENOF( /*(*/ ")" ) + 1,                                  tmplen + STRLENOF( /*(*/ ")" ) + 1,
                                 /* "(attr=[init*][any*]" */ "%s)",                                  /* "(attr=[init*][any*]" */ "%s)",
                                 tmp.bv_len ? tmp.bv_val : "(null)");                                  tmp.bv_len ? tmp.bv_val : "");
   
                         ber_memfree_x( tmp.bv_val, op->o_tmpmemctx );                          ber_memfree_x( tmp.bv_val, op->o_tmpmemctx );
                 }                  }
Line 678  simple: Line 744  simple:
         case LDAP_FILTER_PRESENT:          case LDAP_FILTER_PRESENT:
                 fstr->bv_len = f->f_desc->ad_cname.bv_len +                  fstr->bv_len = f->f_desc->ad_cname.bv_len +
                         STRLENOF("(=*)");                          STRLENOF("(=*)");
                 if ( undef )                  if ( undef2 )
                         fstr->bv_len++;                          fstr->bv_len++;
   
                 fstr->bv_val = op->o_tmpalloc( fstr->bv_len + 1, op->o_tmpmemctx );                  fstr->bv_val = op->o_tmpalloc( fstr->bv_len + 1, op->o_tmpmemctx );
   
                 snprintf( fstr->bv_val, fstr->bv_len + 1, "(%s%s=*)",                  snprintf( fstr->bv_val, fstr->bv_len + 1, "(%s%s=*)",
                         undef ? "?" : "",                          undef2 ? "?" : "",
                         f->f_desc->ad_cname.bv_val );                          f->f_desc->ad_cname.bv_val );
                 break;                  break;
   
Line 701  simple: Line 767  simple:
                 for ( p = f->f_list; p != NULL; p = p->f_next ) {                  for ( p = f->f_list; p != NULL; p = p->f_next ) {
                         len = fstr->bv_len;                          len = fstr->bv_len;
   
                         filter2bv_x( op, p, &tmp );                          filter2bv_undef_x( op, p, noundef, &tmp );
                                                   
                         fstr->bv_len += tmp.bv_len;                          fstr->bv_len += tmp.bv_len;
                         fstr->bv_val = op->o_tmprealloc( fstr->bv_val, fstr->bv_len + 1,                          fstr->bv_val = op->o_tmprealloc( fstr->bv_val, fstr->bv_len + 1,
Line 733  simple: Line 799  simple:
                 }                  }
                                   
                 fstr->bv_len = ad.bv_len +                  fstr->bv_len = ad.bv_len +
                           ( undef2 ? 1 : 0 ) +
                         ( f->f_mr_dnattrs ? STRLENOF(":dn") : 0 ) +                          ( f->f_mr_dnattrs ? STRLENOF(":dn") : 0 ) +
                         ( f->f_mr_rule_text.bv_len ? f->f_mr_rule_text.bv_len+1 : 0 ) +                          ( f->f_mr_rule_text.bv_len ? f->f_mr_rule_text.bv_len + STRLENOF(":") : 0 ) +
                         tmp.bv_len + STRLENOF("(:=)");                          tmp.bv_len + STRLENOF("(:=)");
                 fstr->bv_val = op->o_tmpalloc( fstr->bv_len + 1, op->o_tmpmemctx );                  fstr->bv_val = op->o_tmpalloc( fstr->bv_len + 1, op->o_tmpmemctx );
   
                 snprintf( fstr->bv_val, fstr->bv_len + 1, "(%s%s%s%s%s:=%s)",                  snprintf( fstr->bv_val, fstr->bv_len + 1, "(%s%s%s%s%s:=%s)",
                         undef ? "?" : "",                          undef2 ? "?" : "",
                         ad.bv_val,                          ad.bv_val,
                         f->f_mr_dnattrs ? ":dn" : "",                          f->f_mr_dnattrs ? ":dn" : "",
                         f->f_mr_rule_text.bv_len ? ":" : "",                          f->f_mr_rule_text.bv_len ? ":" : "",
Line 779  simple: Line 846  simple:
 void  void
 filter2bv( Filter *f, struct berval *fstr )  filter2bv( Filter *f, struct berval *fstr )
 {  {
           return filter2bv_undef( f, 0, fstr );
   }
   
   void
   filter2bv_undef( Filter *f, int noundef, struct berval *fstr )
   {
         Operation op;          Operation op;
         Opheader ohdr;          Opheader ohdr;
   
Line 786  filter2bv( Filter *f, struct berval *fst Line 859  filter2bv( Filter *f, struct berval *fst
         op.o_tmpmemctx = NULL;          op.o_tmpmemctx = NULL;
         op.o_tmpmfuncs = &ch_mfuncs;          op.o_tmpmfuncs = &ch_mfuncs;
   
         filter2bv_x( &op, f, fstr );          filter2bv_undef_x( &op, f, noundef, fstr );
 }  }
   
 Filter *  Filter *

Removed from v.1.134.2.2  
changed lines
  Added in v.1.159


______________
© Copyright 1998-2020, OpenLDAP Foundation, info@OpenLDAP.org