Diff for /servers/slapd/filter.c between versions 1.13.4.9 and 1.14

version 1.13.4.9, 2001/08/31 20:24:17 version 1.14, 1999/08/02 03:29:35
Line 1 Line 1
 /* filter.c - routines for parsing and dealing with filters */  /* filter.c - routines for parsing and dealing with filters */
 /* $OpenLDAP$ */  
 /*  
  * Copyright 1998-2000 The OpenLDAP Foundation, All Rights Reserved.  
  * COPYING RESTRICTIONS APPLY, see COPYRIGHT file  
  */  
   
 #include "portable.h"  #include "portable.h"
   
Line 14 Line 9
   
 #include "slap.h"  #include "slap.h"
   
 static int      get_filter_list(  static int      get_filter_list(Connection *conn, BerElement *ber, Filter **f, char **fstr);
         Connection *conn,  static int      get_substring_filter(Connection *conn, BerElement *ber, Filter *f, char **fstr);
         BerElement *ber,  
         Filter **f,  
         char **fstr,  
         const char **text );  
   
 static int      get_substring_filter(  
         Connection *conn,  
         BerElement *ber,  
         Filter *f,  
         char **fstr,  
         const char **text );  
   
 static int filter_escape_value(  
         struct berval *in,  
         struct berval *out );  
   
 int  int
 get_filter(  get_filter( Connection *conn, BerElement *ber, Filter **filt, char **fstr )
         Connection *conn,  
         BerElement *ber,  
         Filter **filt,  
         char **fstr,  
         const char **text )  
 {  {
         ber_tag_t       tag;  
         ber_len_t       len;          ber_len_t       len;
         int             err;          int             err;
         Filter          *f;          Filter          *f;
         char            *ftmp = NULL;          char            *ftmp;
         struct berval escaped;  
   
         Debug( LDAP_DEBUG_FILTER, "begin get_filter\n", 0, 0, 0 );          Debug( LDAP_DEBUG_FILTER, "begin get_filter\n", 0, 0, 0 );
   
Line 82  get_filter( Line 55  get_filter(
          *           *
          */           */
   
         tag = ber_peek_tag( ber, &len );  
   
         if( tag == LBER_ERROR ) {  
                 *text = "error decoding filter";  
                 return SLAPD_DISCONNECT;  
         }  
   
         f = (Filter *) ch_malloc( sizeof(Filter) );          f = (Filter *) ch_malloc( sizeof(Filter) );
         f->f_next = NULL;          f->f_next = NULL;
   
         err = LDAP_SUCCESS;          err = LDAP_SUCCESS;
         *fstr = NULL;          *fstr = NULL;
         f->f_choice = tag;           f->f_choice = ber_peek_tag( ber, &len );
   
         switch ( f->f_choice ) {          switch ( f->f_choice ) {
         case LDAP_FILTER_EQUALITY:          case LDAP_FILTER_EQUALITY:
                 Debug( LDAP_DEBUG_FILTER, "EQUALITY\n", 0, 0, 0 );                  Debug( LDAP_DEBUG_FILTER, "EQUALITY\n", 0, 0, 0 );
                   if ( (err = get_ava( ber, &f->f_ava )) == LDAP_SUCCESS ) {
                 err = get_ava( ber, &f->f_ava, SLAP_MR_EQUALITY, text );                          *fstr = ch_malloc(4 + strlen( f->f_avtype ) +
                 if ( err != LDAP_SUCCESS ) {                              f->f_avvalue.bv_len);
                         break;                          sprintf( *fstr, "(%s=%s)", f->f_avtype,
                               f->f_avvalue.bv_val );
                 }                  }
   
                 assert( f->f_ava != NULL );  
   
                 filter_escape_value( f->f_av_value, &escaped );  
   
                 *fstr = ch_malloc( sizeof("(=)")  
                         + f->f_av_desc->ad_cname->bv_len  
                         + escaped.bv_len );  
   
                 sprintf( *fstr, "(%s=%s)",  
                         f->f_av_desc->ad_cname->bv_val,  
                     escaped.bv_val );  
   
                 ber_memfree( escaped.bv_val );  
                 break;                  break;
   
         case LDAP_FILTER_SUBSTRINGS:          case LDAP_FILTER_SUBSTRINGS:
                 Debug( LDAP_DEBUG_FILTER, "SUBSTRINGS\n", 0, 0, 0 );                  Debug( LDAP_DEBUG_FILTER, "SUBSTRINGS\n", 0, 0, 0 );
                 err = get_substring_filter( conn, ber, f, fstr, text );                  err = get_substring_filter( conn, ber, f, fstr );
                 break;                  break;
   
         case LDAP_FILTER_GE:          case LDAP_FILTER_GE:
                 Debug( LDAP_DEBUG_FILTER, "GE\n", 0, 0, 0 );                  Debug( LDAP_DEBUG_FILTER, "GE\n", 0, 0, 0 );
                   if ( (err = get_ava( ber, &f->f_ava )) == LDAP_SUCCESS ) {
                 err = get_ava( ber, &f->f_ava, SLAP_MR_ORDERING, text );                          *fstr = ch_malloc(5 + strlen( f->f_avtype ) +
                 if ( err != LDAP_SUCCESS ) {                              f->f_avvalue.bv_len);
                         break;                          sprintf( *fstr, "(%s>=%s)", f->f_avtype,
                               f->f_avvalue.bv_val );
                 }                  }
   
                 filter_escape_value( f->f_av_value, &escaped );  
   
                 *fstr = ch_malloc( sizeof("(>=)")  
                         + f->f_av_desc->ad_cname->bv_len  
                         + escaped.bv_len );  
   
                 sprintf( *fstr, "(%s>=%s)",  
                         f->f_av_desc->ad_cname->bv_val,  
                     escaped.bv_val );  
   
                 ber_memfree( escaped.bv_val );  
                 break;                  break;
   
         case LDAP_FILTER_LE:          case LDAP_FILTER_LE:
                 Debug( LDAP_DEBUG_FILTER, "LE\n", 0, 0, 0 );                  Debug( LDAP_DEBUG_FILTER, "LE\n", 0, 0, 0 );
                   if ( (err = get_ava( ber, &f->f_ava )) == LDAP_SUCCESS ) {
                 err = get_ava( ber, &f->f_ava, SLAP_MR_ORDERING, text );                          *fstr = ch_malloc(5 + strlen( f->f_avtype ) +
                 if ( err != LDAP_SUCCESS ) {                              f->f_avvalue.bv_len);
                         break;                          sprintf( *fstr, "(%s<=%s)", f->f_avtype,
                               f->f_avvalue.bv_val );
                 }                  }
   
   
                 filter_escape_value( f->f_av_value, &escaped );  
   
                 *fstr = ch_malloc( sizeof("(<=)")  
                         + f->f_av_desc->ad_cname->bv_len  
                         + escaped.bv_len );  
   
                 sprintf( *fstr, "(%s<=%s)",  
                         f->f_av_desc->ad_cname->bv_val,  
                     escaped.bv_val );  
   
                 ber_memfree( escaped.bv_val );  
                 break;                  break;
   
         case LDAP_FILTER_PRESENT: {          case LDAP_FILTER_PRESENT:
                 struct berval type;  
   
                 Debug( LDAP_DEBUG_FILTER, "PRESENT\n", 0, 0, 0 );                  Debug( LDAP_DEBUG_FILTER, "PRESENT\n", 0, 0, 0 );
                   if ( ber_scanf( ber, "a", &f->f_type ) == LBER_ERROR ) {
                 if ( ber_scanf( ber, "o", &type ) == LBER_ERROR ) {                          err = -1;
                         err = SLAPD_DISCONNECT;                  } else {
                         *text = "error decoding filter";                          err = LDAP_SUCCESS;
                         break;                          attr_normalize( f->f_type );
                 }                          *fstr = ch_malloc( 5 + strlen( f->f_type ) );
                           sprintf( *fstr, "(%s=*)", f->f_type );
                 f->f_desc = NULL;  
                 err = slap_bv2ad( &type, &f->f_desc, text );  
   
                 if( err != LDAP_SUCCESS ) {  
                         ch_free( type.bv_val );  
                         break;  
                 }                  }
                   break;
                 ch_free( type.bv_val );  
   
                 *fstr = ch_malloc( sizeof("(=*)")  
                         + f->f_desc->ad_cname->bv_len );  
                 sprintf( *fstr, "(%s=*)",  
                         f->f_desc->ad_cname->bv_val );  
   
                 } break;  
   
         case LDAP_FILTER_APPROX:          case LDAP_FILTER_APPROX:
                 Debug( LDAP_DEBUG_FILTER, "APPROX\n", 0, 0, 0 );                  Debug( LDAP_DEBUG_FILTER, "APPROX\n", 0, 0, 0 );
                   if ( (err = get_ava( ber, &f->f_ava )) == LDAP_SUCCESS ) {
                 err = get_ava( ber, &f->f_ava, SLAP_MR_EQUALITY_APPROX, text );                          *fstr = ch_malloc(5 + strlen( f->f_avtype ) +
                 if ( err != LDAP_SUCCESS ) {                              f->f_avvalue.bv_len);
                         break;                          sprintf( *fstr, "(%s~=%s)", f->f_avtype,
                               f->f_avvalue.bv_val );
                 }                  }
   
                 filter_escape_value( f->f_av_value, &escaped );  
   
                 *fstr = ch_malloc( sizeof("(~=)")  
                         + f->f_av_desc->ad_cname->bv_len  
                         + escaped.bv_len );  
   
                 sprintf( *fstr, "(%s~=%s)",  
                         f->f_av_desc->ad_cname->bv_val,  
                     escaped.bv_val );  
   
                 ber_memfree( escaped.bv_val );  
                 break;                  break;
   
         case LDAP_FILTER_AND:          case LDAP_FILTER_AND:
                 Debug( LDAP_DEBUG_FILTER, "AND\n", 0, 0, 0 );                  Debug( LDAP_DEBUG_FILTER, "AND\n", 0, 0, 0 );
                 err = get_filter_list( conn, ber, &f->f_and, &ftmp, text );                  if ( (err = get_filter_list( conn, ber, &f->f_and, &ftmp ))
                 if ( err != LDAP_SUCCESS ) {                      == LDAP_SUCCESS ) {
                         break;                          if (ftmp == NULL) ftmp = ch_strdup("");
                           *fstr = ch_malloc( 4 + strlen( ftmp ) );
                           sprintf( *fstr, "(&%s)", ftmp );
                           free( ftmp );
                 }                  }
                 *fstr = ch_malloc( sizeof("(&)")  
                         + ( ftmp == NULL ? 0 : strlen( ftmp ) ) );  
                 sprintf( *fstr, "(&%s)",  
                         ftmp == NULL ? "" : ftmp );  
                 break;                  break;
   
         case LDAP_FILTER_OR:          case LDAP_FILTER_OR:
                 Debug( LDAP_DEBUG_FILTER, "OR\n", 0, 0, 0 );                  Debug( LDAP_DEBUG_FILTER, "OR\n", 0, 0, 0 );
                 err = get_filter_list( conn, ber, &f->f_and, &ftmp, text );                  if ( (err = get_filter_list( conn, ber, &f->f_or, &ftmp ))
                 if ( err != LDAP_SUCCESS ) {                      == LDAP_SUCCESS ) {
                         break;                          if (ftmp == NULL) ftmp = ch_strdup("");
                           *fstr = ch_malloc( 4 + strlen( ftmp ) );
                           sprintf( *fstr, "(|%s)", ftmp );
                           free( ftmp );
                 }                  }
                 *fstr = ch_malloc( sizeof("(!)")  
                         + ( ftmp == NULL ? 0 : strlen( ftmp ) ) );  
                 sprintf( *fstr, "(|%s)",  
                         ftmp == NULL ? "" : ftmp );  
                 break;                  break;
   
         case LDAP_FILTER_NOT:          case LDAP_FILTER_NOT:
                 Debug( LDAP_DEBUG_FILTER, "NOT\n", 0, 0, 0 );                  Debug( LDAP_DEBUG_FILTER, "NOT\n", 0, 0, 0 );
                 (void) ber_skip_tag( ber, &len );                  (void) ber_skip_tag( ber, &len );
                 err = get_filter( conn, ber, &f->f_not, &ftmp, text );                  if ( (err = get_filter( conn, ber, &f->f_not, &ftmp )) == LDAP_SUCCESS ) {
                 if ( err != LDAP_SUCCESS ) {                          if (ftmp == NULL) ftmp = ch_strdup("");
                         break;                          *fstr = ch_malloc( 4 + strlen( ftmp ) );
                           sprintf( *fstr, "(!%s)", ftmp );
                           free( ftmp );
                 }                  }
                 *fstr = ch_malloc( sizeof("(!)")  
                         + ( ftmp == NULL ? 0 : strlen( ftmp ) ) );  
                 sprintf( *fstr, "(!%s)",  
                         ftmp == NULL ? "" : ftmp );  
                 break;                  break;
   
         case LDAP_FILTER_EXT:          case LBER_DEFAULT:
                 /* not yet implemented */                  Debug( LDAP_DEBUG_ANY, "decoding filter error\n",
                 Debug( LDAP_DEBUG_ANY, "extensible match not yet implemented.\n",  
                        0, 0, 0 );                         0, 0, 0 );
                 (void) ber_skip_tag( ber, &len );                  err = -1;
                 f->f_choice = SLAPD_FILTER_COMPUTED;  
                 f->f_result = SLAPD_COMPARE_UNDEFINED;  
                 *fstr = ch_strdup( "(extended)" );  
                 break;                  break;
   
         default:          default:
                 (void) ber_scanf( ber, "x" ); /* skip the element */                  Debug( LDAP_DEBUG_ANY, "unknown filter type %lu\n",
                 Debug( LDAP_DEBUG_ANY, "get_filter: unknown filter type=%lu\n",  
                        f->f_choice, 0, 0 );                         f->f_choice, 0, 0 );
                 f->f_choice = SLAPD_FILTER_COMPUTED;                  err = LDAP_PROTOCOL_ERROR;
                 f->f_result = SLAPD_COMPARE_UNDEFINED;  
                 *fstr = ch_strdup( "(undefined)" );  
                 break;                  break;
         }          }
   
         free( ftmp );  
   
         if ( err != LDAP_SUCCESS ) {          if ( err != LDAP_SUCCESS ) {
                   free( (char *) f );
                 if ( *fstr != NULL ) {                  if ( *fstr != NULL ) {
                         free( *fstr );                          free( *fstr );
                 }                  }
   
                 if( err != SLAPD_DISCONNECT ) {  
                         /* ignore error */  
                         f->f_choice = SLAPD_FILTER_COMPUTED;  
                         f->f_result = SLAPD_COMPARE_UNDEFINED;  
                         *fstr = ch_strdup( "(badfilter)" );  
                         err = LDAP_SUCCESS;  
                         *filt = f;  
   
                 } else {  
                         free(f);  
                 }  
         } else {          } else {
                 *filt = f;                  *filt = f;
         }          }
Line 301  get_filter( Line 180  get_filter(
 }  }
   
 static int  static int
 get_filter_list( Connection *conn, BerElement *ber,  get_filter_list( Connection *conn, BerElement *ber, Filter **f, char **fstr )
         Filter **f, char **fstr,  
         const char **text )  
 {  {
         Filter          **new;          Filter          **new;
         int             err;          int             err;
Line 318  get_filter_list( Connection *conn, BerEl Line 195  get_filter_list( Connection *conn, BerEl
         for ( tag = ber_first_element( ber, &len, &last ); tag != LBER_DEFAULT;          for ( tag = ber_first_element( ber, &len, &last ); tag != LBER_DEFAULT;
             tag = ber_next_element( ber, &len, last ) )              tag = ber_next_element( ber, &len, last ) )
         {          {
                 err = get_filter( conn, ber, new, &ftmp, text );                  if ( (err = get_filter( conn, ber, new, &ftmp )) != LDAP_SUCCESS )
                 if ( err != LDAP_SUCCESS )  
                         return( err );                          return( err );
   
                 if ( *fstr == NULL ) {                  if ( *fstr == NULL ) {
                         *fstr = ftmp;                          *fstr = ftmp;
                 } else {                  } else {
Line 343  get_substring_filter( Line 218  get_substring_filter(
     Connection  *conn,      Connection  *conn,
     BerElement  *ber,      BerElement  *ber,
     Filter      *f,      Filter      *f,
     char        **fstr,      char        **fstr
         const char      **text  
 )  )
 {  {
         ber_tag_t       tag;          ber_tag_t       tag;
         ber_len_t       len;          ber_len_t       len;
         ber_tag_t       rc;          ber_tag_t       rc;
         struct berval *value;          char            *val, *last;
         struct berval escaped;          int             syntax;
         char            *last;  
         struct berval type;  
         struct berval *nvalue;  
         *text = "error decoding filter";  
   
         Debug( LDAP_DEBUG_FILTER, "begin get_substring_filter\n", 0, 0, 0 );          Debug( LDAP_DEBUG_FILTER, "begin get_substring_filter\n", 0, 0, 0 );
   
         if ( ber_scanf( ber, "{o" /*}*/, &type ) == LBER_ERROR ) {          if ( ber_scanf( ber, "{a" /*}*/, &f->f_sub_type ) == LBER_ERROR ) {
                 return SLAPD_DISCONNECT;                  return( -1 );
         }  
   
         f->f_sub = ch_calloc( 1, sizeof(SubstringsAssertion) );  
         f->f_sub_desc = NULL;  
         rc = slap_bv2ad( &type, &f->f_sub_desc, text );  
   
         ch_free( type.bv_val );  
   
         if( rc != LDAP_SUCCESS ) {  
                 text = NULL;  
                 ch_free( f->f_sub );  
                 f->f_choice = SLAPD_FILTER_COMPUTED;  
                 f->f_result = SLAPD_COMPARE_UNDEFINED;  
                 *fstr = ch_strdup( "(undefined)" );  
                 return LDAP_SUCCESS;  
         }          }
           attr_normalize( f->f_sub_type );
           syntax = attr_syntax( f->f_sub_type );
         f->f_sub_initial = NULL;          f->f_sub_initial = NULL;
         f->f_sub_any = NULL;          f->f_sub_any = NULL;
         f->f_sub_final = NULL;          f->f_sub_final = NULL;
   
         if( fstr ) {          *fstr = ch_malloc( strlen( f->f_sub_type ) + 3 );
                 *fstr = ch_malloc( sizeof("(=" /*)*/) +          sprintf( *fstr, "(%s=", f->f_sub_type );
                         f->f_sub_desc->ad_cname->bv_len );  
                 sprintf( *fstr, "(%s=" /*)*/, f->f_sub_desc->ad_cname->bv_val );  
         }  
   
         for ( tag = ber_first_element( ber, &len, &last ); tag != LBER_DEFAULT;          for ( tag = ber_first_element( ber, &len, &last ); tag != LBER_DEFAULT;
             tag = ber_next_element( ber, &len, last ) )              tag = ber_next_element( ber, &len, last ) )
         {          {
                 unsigned usage;                  rc = ber_scanf( ber, "a", &val );
   
                 rc = ber_scanf( ber, "O", &value );  
                 if ( rc == LBER_ERROR ) {                  if ( rc == LBER_ERROR ) {
                         rc = SLAPD_DISCONNECT;                          return( -1 );
                         goto return_error;  
                 }  
   
                 if ( value == NULL || value->bv_len == 0 ) {  
                         ber_bvfree( value );  
                         rc = LDAP_INVALID_SYNTAX;  
                         goto return_error;  
                 }   
   
                 switch ( tag ) {  
                 case LDAP_SUBSTRING_INITIAL:  
                         usage = SLAP_MR_SUBSTR_INITIAL;  
                         break;  
   
                 case LDAP_SUBSTRING_ANY:  
                         usage = SLAP_MR_SUBSTR_ANY;  
                         break;  
   
                 case LDAP_SUBSTRING_FINAL:  
                         usage = SLAP_MR_SUBSTR_FINAL;  
                         break;  
   
                 default:  
                         rc = LDAP_PROTOCOL_ERROR;  
   
                         Debug( LDAP_DEBUG_FILTER,  
                                 "  unknown substring choice=%ld\n",  
                                 (long) tag, 0, 0 );  
   
                         ber_bvfree( value );  
                         goto return_error;  
                 }                  }
                   if ( val == NULL || *val == '\0' ) {
                 rc = value_normalize( f->f_sub_desc, usage, value, &nvalue, text );                          if ( val != NULL ) {
                 ber_bvfree( value );                                  free( val );
                           }
                 if( rc != LDAP_SUCCESS ) {                          return( LDAP_INVALID_SYNTAX );
                         goto return_error;  
                 }                  }
                   value_normalize( val, syntax );
                 value = nvalue;  
   
                 rc = LDAP_PROTOCOL_ERROR;  
   
                 switch ( tag ) {                  switch ( tag ) {
                 case LDAP_SUBSTRING_INITIAL:                  case LDAP_SUBSTRING_INITIAL:
                         Debug( LDAP_DEBUG_FILTER, "  INITIAL\n", 0, 0, 0 );                          Debug( LDAP_DEBUG_FILTER, "  INITIAL\n", 0, 0, 0 );
                         if ( f->f_sub_initial != NULL                          if ( f->f_sub_initial != NULL ) {
                                 || f->f_sub_any != NULL                                   return( LDAP_PROTOCOL_ERROR );
                                 || f->f_sub_final != NULL )  
                         {  
                                 ber_bvfree( value );  
                                 goto return_error;  
                         }  
   
                         f->f_sub_initial = value;  
   
                         if( fstr ) {  
                                 filter_escape_value( value, &escaped );  
                                 *fstr = ch_realloc( *fstr,  
                                         strlen( *fstr ) + escaped.bv_len + 1 );  
                                 strcat( *fstr, escaped.bv_val );  
                                 ber_memfree( escaped.bv_val );  
                         }                          }
                           f->f_sub_initial = val;
                           *fstr = ch_realloc( *fstr, strlen( *fstr ) +
                               strlen( val ) + 1 );
                           strcat( *fstr, val );
                         break;                          break;
   
                 case LDAP_SUBSTRING_ANY:                  case LDAP_SUBSTRING_ANY:
                         Debug( LDAP_DEBUG_FILTER, "  ANY\n", 0, 0, 0 );                          Debug( LDAP_DEBUG_FILTER, "  ANY\n", 0, 0, 0 );
                           charray_add( &f->f_sub_any, val );
                         if ( f->f_sub_final != NULL ) {                          *fstr = ch_realloc( *fstr, strlen( *fstr ) +
                                 ber_bvfree( value );                              strlen( val ) + 2 );
                                 goto return_error;                          strcat( *fstr, "*" );
                         }                          strcat( *fstr, val );
   
                         if( ber_bvecadd( &f->f_sub_any, value ) < 0 ) {  
                                 ber_bvfree( value );  
                                 goto return_error;  
                         }  
   
                         if( fstr ) {  
                                 filter_escape_value( value, &escaped );  
                                 *fstr = ch_realloc( *fstr,  
                                         strlen( *fstr ) + escaped.bv_len + 2 );  
                                 strcat( *fstr, "*" );  
                                 strcat( *fstr, escaped.bv_val );  
                                 ber_memfree( escaped.bv_val );  
                         }  
                         break;                          break;
   
                 case LDAP_SUBSTRING_FINAL:                  case LDAP_SUBSTRING_FINAL:
                         Debug( LDAP_DEBUG_FILTER, "  FINAL\n", 0, 0, 0 );                          Debug( LDAP_DEBUG_FILTER, "  FINAL\n", 0, 0, 0 );
   
                         if ( f->f_sub_final != NULL ) {                          if ( f->f_sub_final != NULL ) {
                                 ber_bvfree( value );                                  return( LDAP_PROTOCOL_ERROR );
                                 goto return_error;  
                         }  
   
                         f->f_sub_final = value;  
   
                         if( fstr ) {  
                                 filter_escape_value( value, &escaped );  
                                 *fstr = ch_realloc( *fstr,  
                                         strlen( *fstr ) + escaped.bv_len + 2 );  
                                 strcat( *fstr, "*" );  
                                 strcat( *fstr, escaped.bv_val );  
                                 ber_memfree( escaped.bv_val );  
                         }                          }
                           f->f_sub_final = val;
                           *fstr = ch_realloc( *fstr, strlen( *fstr ) +
                               strlen( val ) + 2 );
                           strcat( *fstr, "*" );
                           strcat( *fstr, val );
                         break;                          break;
   
                 default:                  default:
                         Debug( LDAP_DEBUG_FILTER,                          Debug( LDAP_DEBUG_FILTER, "  unknown type\n", tag, 0,
                                 "  unknown substring type=%ld\n",                              0 );
                                 (long) tag, 0, 0 );                          return( LDAP_PROTOCOL_ERROR );
   
                         ber_bvfree( value );  
   
 return_error:  
                         Debug( LDAP_DEBUG_FILTER, "  error=%ld\n",  
                                 (long) rc, 0, 0 );  
   
                         if( fstr ) {  
                                 free( *fstr );  
                                 *fstr = NULL;  
                         }  
   
                         ad_free( f->f_sub_desc, 1 );  
                         ber_bvfree( f->f_sub_initial );  
                         ber_bvecfree( f->f_sub_any );  
                         ber_bvfree( f->f_sub_final );  
                         ch_free( f->f_sub );  
                         return rc;  
                 }                  }
         }          }
           *fstr = ch_realloc( *fstr, strlen( *fstr ) + 3 );
         if( fstr ) {          if ( f->f_sub_final == NULL ) {
                 *fstr = ch_realloc( *fstr, strlen( *fstr ) + 3 );                  strcat( *fstr, "*" );
                 if ( f->f_sub_final == NULL ) {  
                         strcat( *fstr, "*" );  
                 }  
                 strcat( *fstr, /*(*/ ")" );  
         }          }
           strcat( *fstr, ")" );
   
         Debug( LDAP_DEBUG_FILTER, "end get_substring_filter\n", 0, 0, 0 );          Debug( LDAP_DEBUG_FILTER, "end get_substring_filter\n", 0, 0, 0 );
         return( LDAP_SUCCESS );          return( LDAP_SUCCESS );
Line 552  filter_free( Filter *f ) Line 314  filter_free( Filter *f )
         }          }
   
         switch ( f->f_choice ) {          switch ( f->f_choice ) {
         case LDAP_FILTER_PRESENT:  
                 ad_free( f->f_desc, 1 );  
                 break;  
   
         case LDAP_FILTER_EQUALITY:          case LDAP_FILTER_EQUALITY:
         case LDAP_FILTER_GE:          case LDAP_FILTER_GE:
         case LDAP_FILTER_LE:          case LDAP_FILTER_LE:
         case LDAP_FILTER_APPROX:          case LDAP_FILTER_APPROX:
                 ava_free( f->f_ava, 1 );                  ava_free( &f->f_ava, 0 );
                 break;                  break;
   
         case LDAP_FILTER_SUBSTRINGS:          case LDAP_FILTER_SUBSTRINGS:
                 ad_free( f->f_sub_desc, 1 );                  if ( f->f_sub_type != NULL ) {
                           free( f->f_sub_type );
                   }
                 if ( f->f_sub_initial != NULL ) {                  if ( f->f_sub_initial != NULL ) {
                         ber_bvfree( f->f_sub_initial );                          free( f->f_sub_initial );
                 }                  }
                 ber_bvecfree( f->f_sub_any );                  charray_free( f->f_sub_any );
                 if ( f->f_sub_final != NULL ) {                  if ( f->f_sub_final != NULL ) {
                         ber_bvfree( f->f_sub_final );                          free( f->f_sub_final );
                   }
                   break;
   
           case LDAP_FILTER_PRESENT:
                   if ( f->f_type != NULL ) {
                           free( f->f_type );
                 }                  }
                 ch_free( f->f_sub );  
                 break;                  break;
   
         case LDAP_FILTER_AND:          case LDAP_FILTER_AND:
Line 584  filter_free( Filter *f ) Line 349  filter_free( Filter *f )
                 }                  }
                 break;                  break;
   
         case SLAPD_FILTER_COMPUTED:  
                 break;  
   
         default:          default:
                 Debug( LDAP_DEBUG_ANY, "filter_free: unknown filter type=%lu\n",                  Debug( LDAP_DEBUG_ANY, "unknown filter type %lu\n",
                        f->f_choice, 0, 0 );                         f->f_choice, 0, 0 );
                 break;                  break;
         }          }
   
         free( f );          free( f );
 }  }
   
 #ifdef LDAP_DEBUG  #ifdef LDAP_DEBUG
   
 void  void
 filter_print( Filter *f )  filter_print( Filter *f )
 {  {
         int     i;          int     i;
         Filter  *p;          Filter  *p;
         struct berval escaped;  
   
         if ( f == NULL ) {          if ( f == NULL ) {
                 fprintf( stderr, "No filter!" );                  fprintf( stderr, "NULL" );
         }          }
   
         switch ( f->f_choice ) {          switch ( f->f_choice ) {
         case LDAP_FILTER_EQUALITY:          case LDAP_FILTER_EQUALITY:
                 filter_escape_value( f->f_av_value, &escaped );                  fprintf( stderr, "(%s=%s)", f->f_ava.ava_type,
                 fprintf( stderr, "(%s=%s)",                      f->f_ava.ava_value.bv_val );
                         f->f_av_desc->ad_cname->bv_val,  
                     escaped.bv_val );  
                 ber_memfree( escaped.bv_val );  
                 break;                  break;
   
         case LDAP_FILTER_GE:          case LDAP_FILTER_GE:
                 filter_escape_value( f->f_av_value, &escaped );                  fprintf( stderr, "(%s>=%s)", f->f_ava.ava_type,
                 fprintf( stderr, "(%s>=%s)",                      f->f_ava.ava_value.bv_val );
                         f->f_av_desc->ad_cname->bv_val,  
                     escaped.bv_val );  
                 ber_memfree( escaped.bv_val );  
                 break;                  break;
   
         case LDAP_FILTER_LE:          case LDAP_FILTER_LE:
                 filter_escape_value( f->f_av_value, &escaped );                  fprintf( stderr, "(%s<=%s)", f->f_ava.ava_type,
                 fprintf( stderr, "(%s<=%s)",                      f->f_ava.ava_value.bv_val );
                         f->f_ava->aa_desc->ad_cname->bv_val,  
                     escaped.bv_val );  
                 ber_memfree( escaped.bv_val );  
                 break;                  break;
   
         case LDAP_FILTER_APPROX:          case LDAP_FILTER_APPROX:
                 filter_escape_value( f->f_av_value, &escaped );                  fprintf( stderr, "(%s~=%s)", f->f_ava.ava_type,
                 fprintf( stderr, "(%s~=%s)",                      f->f_ava.ava_value.bv_val );
                         f->f_ava->aa_desc->ad_cname->bv_val,  
                     escaped.bv_val );  
                 ber_memfree( escaped.bv_val );  
                 break;                  break;
   
         case LDAP_FILTER_SUBSTRINGS:          case LDAP_FILTER_SUBSTRINGS:
                 fprintf( stderr, "(%s=" /*)*/,                  fprintf( stderr, "(%s=", f->f_sub_type );
                         f->f_sub_desc->ad_cname->bv_val );  
                 if ( f->f_sub_initial != NULL ) {                  if ( f->f_sub_initial != NULL ) {
                         filter_escape_value( f->f_sub_initial, &escaped );                          fprintf( stderr, "%s", f->f_sub_initial );
                         fprintf( stderr, "%s",  
                                 escaped.bv_val );  
                         ber_memfree( escaped.bv_val );  
                 }                  }
                 if ( f->f_sub_any != NULL ) {                  if ( f->f_sub_any != NULL ) {
                         for ( i = 0; f->f_sub_any[i] != NULL; i++ ) {                          for ( i = 0; f->f_sub_any[i] != NULL; i++ ) {
                                 filter_escape_value( f->f_sub_any[i], &escaped );                                  fprintf( stderr, "*%s", f->f_sub_any[i] );
                                 fprintf( stderr, "*%s",  
                                         escaped.bv_val );  
                                 ber_memfree( escaped.bv_val );  
                         }                          }
                 }                  }
                   charray_free( f->f_sub_any );
                 if ( f->f_sub_final != NULL ) {                  if ( f->f_sub_final != NULL ) {
                         filter_escape_value( f->f_sub_final, &escaped );                          fprintf( stderr, "*%s", f->f_sub_final );
                         fprintf( stderr,  
                                 "*%s", escaped.bv_val );  
                         ber_memfree( escaped.bv_val );  
                 }                  }
                 fprintf( stderr, /*(*/ ")" );  
                 break;                  break;
   
         case LDAP_FILTER_PRESENT:          case LDAP_FILTER_PRESENT:
                 fprintf( stderr, "(%s=*)",                  fprintf( stderr, "%s=*", f->f_type );
                         f->f_desc->ad_cname->bv_val );  
                 break;                  break;
   
         case LDAP_FILTER_AND:          case LDAP_FILTER_AND:
         case LDAP_FILTER_OR:          case LDAP_FILTER_OR:
         case LDAP_FILTER_NOT:          case LDAP_FILTER_NOT:
                 fprintf( stderr, "(%c" /*)*/,                  fprintf( stderr, "(%c", f->f_choice == LDAP_FILTER_AND ? '&' :
                         f->f_choice == LDAP_FILTER_AND ? '&' :  
                     f->f_choice == LDAP_FILTER_OR ? '|' : '!' );                      f->f_choice == LDAP_FILTER_OR ? '|' : '!' );
                 for ( p = f->f_list; p != NULL; p = p->f_next ) {                  for ( p = f->f_list; p != NULL; p = p->f_next ) {
                         filter_print( p );                          filter_print( p );
                 }                  }
                 fprintf( stderr, /*(*/ ")" );                  fprintf( stderr, ")" );
                 break;  
   
         case SLAPD_FILTER_COMPUTED:  
                 fprintf( stderr, "(?=%s)",  
                         f->f_result == LDAP_COMPARE_FALSE ? "false" :  
                         f->f_result == LDAP_COMPARE_TRUE ? "true" :  
                         f->f_result == SLAPD_COMPARE_UNDEFINED ? "undefined" :  
                         "error" );  
                 break;                  break;
   
         default:          default:
                 fprintf( stderr, "(unknown-filter=%lu)", f->f_choice );                  fprintf( stderr, "unknown type %lu", f->f_choice );
                 break;                  break;
         }          }
 }  }
   
 #endif /* ldap_debug */  #endif /* ldap_debug */
   
 int filter_escape_value(  
         struct berval *in,  
         struct berval *out )  
 {  
         ber_len_t i;  
         assert( in );  
         assert( out );  
   
         out->bv_val = (char *) ch_malloc( ( in->bv_len * 3 ) + 1 );  
         out->bv_len = 0;  
   
         for( i=0; i < in->bv_len ; i++ ) {  
                 if( FILTER_ESCAPE(in->bv_val[i]) ) {  
                         out->bv_val[out->bv_len++] = SLAP_ESCAPE_CHAR;  
                         out->bv_val[out->bv_len++] = SLAP_ESCAPE_HI( in->bv_val[i] );  
                         out->bv_val[out->bv_len++] = SLAP_ESCAPE_LO( in->bv_val[i] );  
                 } else {  
                         out->bv_val[out->bv_len++] = in->bv_val[i];  
                 }  
         }  
   
         out->bv_val[out->bv_len] = '\0';  
         return LDAP_SUCCESS;  
 }  

Removed from v.1.13.4.9  
changed lines
  Added in v.1.14


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