Diff for /servers/slapd/filter.c between versions 1.13.4.7 and 1.26

version 1.13.4.7, 2001/06/02 00:47:49 version 1.26, 2000/04/11 23:39:52
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.13.4.6 2000/10/11 02:43:58 kurt Exp $ */  /* $OpenLDAP: pkg/ldap/servers/slapd/filter.c,v 1.25 2000/03/01 21:59:34 kurt Exp $ */
 /*  /*
  * Copyright 1998-2000 The OpenLDAP Foundation, All Rights Reserved.   * Copyright 1998-1999 The OpenLDAP Foundation, All Rights Reserved.
  * COPYING RESTRICTIONS APPLY, see COPYRIGHT file   * COPYING RESTRICTIONS APPLY, see COPYRIGHT file
  */   */
   
Line 19  static int get_filter_list( Line 19  static int get_filter_list(
         BerElement *ber,          BerElement *ber,
         Filter **f,          Filter **f,
         char **fstr,          char **fstr,
         const char **text );          char **text );
   
 static int      get_substring_filter(  static int      get_substring_filter(
         Connection *conn,          Connection *conn,
         BerElement *ber,          BerElement *ber,
         Filter *f,          Filter *f,
         char **fstr,          char **fstr,
         const char **text );          char **text );
   
 static int filter_escape_value(  
         struct berval *in,  
         struct berval *out );  
   
 int  int
 get_filter(  get_filter(
Line 38  get_filter( Line 33  get_filter(
         BerElement *ber,          BerElement *ber,
         Filter **filt,          Filter **filt,
         char **fstr,          char **fstr,
         const char **text )          char **text )
 {  {
         ber_tag_t       tag;          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 97  get_filter( Line 91  get_filter(
         f->f_choice = tag;           f->f_choice = tag; 
   
         switch ( f->f_choice ) {          switch ( f->f_choice ) {
   #ifdef SLAPD_SCHEMA_NOT_COMPAT
           /* not yet implemented */
   #else
         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 );                          *text = "error decoding filter";
                 if ( err != LDAP_SUCCESS ) {  
                         break;                          break;
                 }                  }
                   *fstr = ch_malloc(4 + strlen( f->f_avtype ) +
                 assert( f->f_ava != NULL );                      f->f_avvalue.bv_len);
                   sprintf( *fstr, "(%s=%s)", f->f_avtype,
                 filter_escape_value( f->f_av_value, &escaped );                      f->f_avvalue.bv_val );
   
                 *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:
Line 127  get_filter( Line 113  get_filter(
   
         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 );                          *text = "decoding filter error";
                 if ( err != LDAP_SUCCESS ) {  
                         break;                          break;
                 }                  }
                   *fstr = ch_malloc(5 + strlen( f->f_avtype ) +
                 filter_escape_value( f->f_av_value, &escaped );                      f->f_avvalue.bv_len);
                   sprintf( *fstr, "(%s>=%s)", f->f_avtype,
                 *fstr = ch_malloc( sizeof("(>=)")                      f->f_avvalue.bv_val );
                         + 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 );                          *text = "error decoding filter";
                 if ( err != LDAP_SUCCESS ) {  
                         break;                          break;
                 }                  }
                   *fstr = ch_malloc(5 + strlen( f->f_avtype ) +
                       f->f_avvalue.bv_len);
                 filter_escape_value( f->f_av_value, &escaped );                  sprintf( *fstr, "(%s<=%s)", f->f_avtype,
                       f->f_avvalue.bv_val );
                 *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 = SLAPD_DISCONNECT;                          err = SLAPD_DISCONNECT;
                         *text = "error decoding filter";                          *text = "error decoding filter";
                         break;                          break;
                 }                  }
   
                 f->f_desc = NULL;                  err = LDAP_SUCCESS;
                 err = slap_bv2ad( &type, &f->f_desc, text );                  attr_normalize( f->f_type );
                   *fstr = ch_malloc( 5 + strlen( f->f_type ) );
                 if( err != LDAP_SUCCESS ) {                  sprintf( *fstr, "(%s=*)", f->f_type );
                         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 );                          *text = "error decoding filter";
                 if ( err != LDAP_SUCCESS ) {  
                         break;                          break;
                 }                  }
                   *fstr = ch_malloc(5 + strlen( f->f_avtype ) +
                 filter_escape_value( f->f_av_value, &escaped );                      f->f_avvalue.bv_len);
                   sprintf( *fstr, "(%s~=%s)", f->f_avtype,
                 *fstr = ch_malloc( sizeof("(~=)")                      f->f_avvalue.bv_val );
                         + 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;
   #endif
   
         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 );
Line 223  get_filter( Line 168  get_filter(
                 if ( err != LDAP_SUCCESS ) {                  if ( err != LDAP_SUCCESS ) {
                         break;                          break;
                 }                  }
                 *fstr = ch_malloc( sizeof("(&)")                  if (ftmp == NULL) ftmp = ch_strdup("");
                         + ( ftmp == NULL ? 0 : strlen( ftmp ) ) );                  *fstr = ch_malloc( 4 + strlen( ftmp ) );
                 sprintf( *fstr, "(&%s)",                  sprintf( *fstr, "(&%s)", ftmp );
                         ftmp == NULL ? "" : ftmp );                  free( ftmp );
                 break;                  break;
   
         case LDAP_FILTER_OR:          case LDAP_FILTER_OR:
Line 235  get_filter( Line 180  get_filter(
                 if ( err != LDAP_SUCCESS ) {                  if ( err != LDAP_SUCCESS ) {
                         break;                          break;
                 }                  }
                 *fstr = ch_malloc( sizeof("(!)")                  if (ftmp == NULL) ftmp = ch_strdup("");
                         + ( ftmp == NULL ? 0 : strlen( ftmp ) ) );                  *fstr = ch_malloc( 4 + strlen( ftmp ) );
                 sprintf( *fstr, "(|%s)",                  sprintf( *fstr, "(|%s)", ftmp );
                         ftmp == NULL ? "" : ftmp );                  free( ftmp );
                 break;                  break;
   
         case LDAP_FILTER_NOT:          case LDAP_FILTER_NOT:
Line 248  get_filter( Line 193  get_filter(
                 if ( err != LDAP_SUCCESS ) {                  if ( err != LDAP_SUCCESS ) {
                         break;                          break;
                 }                  }
                 *fstr = ch_malloc( sizeof("(!)")                  if (ftmp == NULL) ftmp = ch_strdup("");
                         + ( ftmp == NULL ? 0 : strlen( ftmp ) ) );                  *fstr = ch_malloc( 4 + strlen( ftmp ) );
                 sprintf( *fstr, "(!%s)",                  sprintf( *fstr, "(!%s)", ftmp );
                         ftmp == NULL ? "" : ftmp );                  free( ftmp );
                 break;                  break;
   
         case LDAP_FILTER_EXT:          case LDAP_FILTER_EXT:
                 /* not yet implemented */                  /* not yet implemented */
                 Debug( LDAP_DEBUG_ANY, "extensible match not yet implemented.\n",                  Debug( LDAP_DEBUG_ANY, "extensible match not yet implemented.\n",
                        0, 0, 0 );                         f->f_choice, 0, 0 );
                 (void) ber_skip_tag( ber, &len );                  err = LDAP_PROTOCOL_ERROR;
                 f->f_choice = SLAPD_FILTER_COMPUTED;                  *text = "extensible match not yet implemented";
                 f->f_result = SLAPD_COMPARE_UNDEFINED;  
                 *fstr = ch_strdup( "(extended)" );  
                 break;                  break;
   
         default:          default:
                 (void) ber_skip_tag( ber, &len );                  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;                  *text = "unknown filter type";
                 *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 229  get_filter(
 }  }
   
 static int  static int
 get_filter_list( Connection *conn, BerElement *ber,  get_filter_list( Connection *conn, BerElement *ber, Filter **f, char **fstr, char **text )
         Filter **f, char **fstr,  
         const char **text )  
 {  {
         Filter          **new;          Filter          **new;
         int             err;          int             err;
Line 338  get_filter_list( Connection *conn, BerEl Line 264  get_filter_list( Connection *conn, BerEl
         return( LDAP_SUCCESS );          return( LDAP_SUCCESS );
 }  }
   
   #ifndef SLAPD_SCHEMA_NOT_COMPAT
   
 static int  static int
 get_substring_filter(  get_substring_filter(
     Connection  *conn,      Connection  *conn,
     BerElement  *ber,      BerElement  *ber,
     Filter      *f,      Filter      *f,
     char        **fstr,      char        **fstr,
         const char      **text          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;          struct berval *val;
         struct berval escaped;  
         char            *last;          char            *last;
         struct berval type;          int             syntax;
         struct berval *nvalue;  
         *text = "error decoding filter";          *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 SLAPD_DISCONNECT;
         }          }
   
         f->f_sub = ch_calloc( 1, sizeof(SubstringsAssertion) );  #ifdef SLAPD_SCHEMA_NOT_COMPAT
         f->f_sub_desc = NULL;          /* not yet implemented */
         rc = slap_bv2ad( &type, &f->f_sub_desc, text );  #else
           attr_normalize( f->f_sub_type );
         ch_free( type.bv_val );  
           /* should get real syntax and see if we have a substring matching rule */
         if( rc != LDAP_SUCCESS ) {          syntax = attr_syntax( f->f_sub_type );
                 text = NULL;  #endif
                 ch_free( f->f_sub );  
                 f->f_choice = SLAPD_FILTER_COMPUTED;  
                 f->f_result = SLAPD_COMPARE_UNDEFINED;  
                 *fstr = ch_strdup( "(undefined)" );  
                 return LDAP_SUCCESS;  
         }  
   
         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 ) {          if( fstr ) {
                 *fstr = ch_malloc( sizeof("(=" /*)*/) +                  *fstr = ch_malloc( strlen( f->f_sub_type ) + 3 );
                         f->f_sub_desc->ad_cname->bv_len );                  sprintf( *fstr, "(%s=" /*)*/, f->f_sub_type );
                 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, "O", &val );
   
                 rc = ber_scanf( ber, "O", &value );  
                 if ( rc == LBER_ERROR ) {                  if ( rc == LBER_ERROR ) {
                         rc = SLAPD_DISCONNECT;                          rc = SLAPD_DISCONNECT;
                         goto return_error;                          goto return_error;
                 }                  }
   
                 if ( value == NULL || value->bv_len == 0 ) {                  if ( val == NULL || val->bv_len == 0 ) {
                         ber_bvfree( value );                          ber_bvfree( val );
                         rc = LDAP_INVALID_SYNTAX;                          rc = LDAP_INVALID_SYNTAX;
                         goto return_error;                          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;  
                 }  
   
                 rc = value_normalize( f->f_sub_desc, usage, value, &nvalue, text );  
                 ber_bvfree( value );  
   
                 if( rc != LDAP_SUCCESS ) {  
                         goto return_error;  
                 }  
   
                 value = nvalue;  
   
                 rc = LDAP_PROTOCOL_ERROR;                  rc = LDAP_PROTOCOL_ERROR;
   
   #ifdef SLAPD_SCHEMA_NOT_COMPAT
                   /* not yet implemented */
   #else
                   /* we should call a substring syntax normalization routine */
                   value_normalize( val->bv_val, syntax );
                   /* this is bogus, value_normalize should take a berval */
                   val->bv_len = strlen( val->bv_val );
   #endif
   
                 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                                   ber_bvfree( val );
                                 || f->f_sub_final != NULL )  
                         {  
                                 ber_bvfree( value );  
                                 goto return_error;                                  goto return_error;
                         }                          }
                           f->f_sub_initial = val;
                         f->f_sub_initial = value;  
   
                         if( fstr ) {                          if( fstr ) {
                                 filter_escape_value( value, &escaped );  
                                 *fstr = ch_realloc( *fstr,                                  *fstr = ch_realloc( *fstr,
                                         strlen( *fstr ) + escaped.bv_len + 1 );                                          strlen( *fstr ) + val->bv_len + 1 );
                                 strcat( *fstr, escaped.bv_val );                                  strcat( *fstr, val->bv_val );
                                 ber_memfree( escaped.bv_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 );
                           if( ber_bvecadd( &f->f_sub_any, val ) < 0 ) {
                         if ( f->f_sub_final != NULL ) {                                  ber_bvfree( val );
                                 ber_bvfree( value );  
                                 goto return_error;  
                         }  
   
                         if( ber_bvecadd( &f->f_sub_any, value ) < 0 ) {  
                                 ber_bvfree( value );  
                                 goto return_error;                                  goto return_error;
                         }                          }
   
                         if( fstr ) {                          if( fstr ) {
                                 filter_escape_value( value, &escaped );  
                                 *fstr = ch_realloc( *fstr,                                  *fstr = ch_realloc( *fstr,
                                         strlen( *fstr ) + escaped.bv_len + 2 );                                          strlen( *fstr ) + val->bv_len + 2 );
                                 strcat( *fstr, "*" );                                  strcat( *fstr, "*" );
                                 strcat( *fstr, escaped.bv_val );                                  strcat( *fstr, val->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 );                                  ber_bvfree( val );
                                 goto return_error;                                  goto return_error;
                         }                          }
                           f->f_sub_final = val;
                         f->f_sub_final = value;  
   
                         if( fstr ) {                          if( fstr ) {
                                 filter_escape_value( value, &escaped );  
                                 *fstr = ch_realloc( *fstr,                                  *fstr = ch_realloc( *fstr,
                                         strlen( *fstr ) + escaped.bv_len + 2 );                                          strlen( *fstr ) + val->bv_len + 2 );
                                 strcat( *fstr, "*" );                                  strcat( *fstr, "*" );
                                 strcat( *fstr, escaped.bv_val );                                  strcat( *fstr, val->bv_val );
                                 ber_memfree( escaped.bv_val );  
                         }                          }
                         break;                          break;
   
                 default:                  default:
                         Debug( LDAP_DEBUG_FILTER,                          Debug( LDAP_DEBUG_FILTER, "  unknown type=%ld\n",
                                 "  unknown substring type=%ld\n",  
                                 (long) tag, 0, 0 );                                  (long) tag, 0, 0 );
   
                         ber_bvfree( value );                          ber_bvfree( val );
   
 return_error:  return_error:
                         Debug( LDAP_DEBUG_FILTER, "  error=%ld\n",                          Debug( LDAP_DEBUG_FILTER, "  error=%ld\n",
Line 521  return_error: Line 396  return_error:
                                 *fstr = NULL;                                  *fstr = NULL;
                         }                          }
   
                         ad_free( f->f_sub_desc, 1 );                          ch_free( f->f_sub_type );
                         ber_bvfree( f->f_sub_initial );                          ber_bvfree( f->f_sub_initial );
                         ber_bvecfree( f->f_sub_any );                          ber_bvecfree( f->f_sub_any );
                         ber_bvfree( f->f_sub_final );                          ber_bvfree( f->f_sub_final );
                         ch_free( f->f_sub );  
                         return rc;                          return rc;
                 }                  }
         }          }
Line 542  return_error: Line 416  return_error:
         return( LDAP_SUCCESS );          return( LDAP_SUCCESS );
 }  }
   
   #endif /* not compat */
   
 void  void
 filter_free( Filter *f )  filter_free( Filter *f )
 {  {
Line 553  filter_free( Filter *f ) Line 429  filter_free( Filter *f )
   
         switch ( f->f_choice ) {          switch ( f->f_choice ) {
         case LDAP_FILTER_PRESENT:          case LDAP_FILTER_PRESENT:
   #ifdef SLAPD_SCHEMA_NOT_COMPAT
                 ad_free( f->f_desc, 1 );                  ad_free( f->f_desc, 1 );
   #else
                   if ( f->f_type != NULL ) {
                           free( f->f_type );
                   }
   #endif
                 break;                  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:
   #ifdef SLAPD_SCHEMA_NOT_COMPAT
                 ava_free( f->f_ava, 1 );                  ava_free( f->f_ava, 1 );
   #else
                   ava_free( &f->f_ava, 0 );
   #endif
                 break;                  break;
   
         case LDAP_FILTER_SUBSTRINGS:          case LDAP_FILTER_SUBSTRINGS:
   #ifdef SLAPD_SCHEMA_NOT_COMPAT
                 ad_free( f->f_sub_desc, 1 );                  ad_free( f->f_sub_desc, 1 );
                 if ( f->f_sub_initial != NULL ) {                  if ( f->f_sub_initial != NULL ) {
                         ber_bvfree( f->f_sub_initial );                          ber_bvfree( f->f_sub_initial );
Line 572  filter_free( Filter *f ) Line 459  filter_free( Filter *f )
                 if ( f->f_sub_final != NULL ) {                  if ( f->f_sub_final != NULL ) {
                         ber_bvfree( f->f_sub_final );                          ber_bvfree( f->f_sub_final );
                 }                  }
   #else
                   if ( f->f_sub_type != NULL ) {
                           free( f->f_sub_type );
                   }
                   if ( f->f_sub_initial != NULL ) {
                           ber_bvfree( f->f_sub_initial );
                   }
                   ber_bvecfree( f->f_sub_any );
                   if ( f->f_sub_final != NULL ) {
                           ber_bvfree( f->f_sub_final );
                   }
   #endif
                 break;                  break;
   
         case LDAP_FILTER_AND:          case LDAP_FILTER_AND:
Line 587  filter_free( Filter *f ) Line 486  filter_free( Filter *f )
                 break;                  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;
         }          }
Line 596  filter_free( Filter *f ) Line 495  filter_free( Filter *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, "No filter!" );
Line 609  filter_print( Filter *f ) Line 508  filter_print( Filter *f )
   
         switch ( f->f_choice ) {          switch ( f->f_choice ) {
         case LDAP_FILTER_EQUALITY:          case LDAP_FILTER_EQUALITY:
                 filter_escape_value( f->f_av_value, &escaped );  #ifdef SLAPD_SCHEMA_NOT_COMPAT
                 fprintf( stderr, "(%s=%s)",                  fprintf( stderr, "(%s=%s)",
                         f->f_av_desc->ad_cname->bv_val,                          f->f_ava->aa_desc->ad_cname,
                     escaped.bv_val );                      f->f_ava->aa_value->bv_val );
                 ber_memfree( escaped.bv_val );  #else
                   fprintf( stderr, "(%s=%s)", f->f_ava.ava_type,
                       f->f_ava.ava_value.bv_val );
   #endif
                 break;                  break;
   
         case LDAP_FILTER_GE:          case LDAP_FILTER_GE:
                 filter_escape_value( f->f_av_value, &escaped );  #ifdef SLAPD_SCHEMA_NOT_COMPAT
                 fprintf( stderr, "(%s>=%s)",                  fprintf( stderr, "(%s>=%s)",
                         f->f_av_desc->ad_cname->bv_val,                          f->f_ava->aa_desc->ad_cname,
                     escaped.bv_val );                      f->f_ava->aa_value->bv_val );
                 ber_memfree( escaped.bv_val );  #else
                   fprintf( stderr, "(%s>=%s)", f->f_ava.ava_type,
                       f->f_ava.ava_value.bv_val );
   #endif
                 break;                  break;
   
         case LDAP_FILTER_LE:          case LDAP_FILTER_LE:
                 filter_escape_value( f->f_av_value, &escaped );  #ifdef SLAPD_SCHEMA_NOT_COMPAT
                 fprintf( stderr, "(%s<=%s)",                  fprintf( stderr, "(%s<=%s)",
                         f->f_ava->aa_desc->ad_cname->bv_val,                          f->f_ava->aa_desc->ad_cname,
                     escaped.bv_val );                      f->f_ava->aa_value->bv_val );
                 ber_memfree( escaped.bv_val );  #else
                   fprintf( stderr, "(%s<=%s)", f->f_ava.ava_type,
                       f->f_ava.ava_value.bv_val );
   #endif
                 break;                  break;
   
         case LDAP_FILTER_APPROX:          case LDAP_FILTER_APPROX:
                 filter_escape_value( f->f_av_value, &escaped );  #ifdef SLAPD_SCHEMA_NOT_COMPAT
                 fprintf( stderr, "(%s~=%s)",                  fprintf( stderr, "(%s~=%s)",
                         f->f_ava->aa_desc->ad_cname->bv_val,                          f->f_ava->aa_desc->ad_cname,
                     escaped.bv_val );                      f->f_ava->aa_value->bv_val );
                 ber_memfree( escaped.bv_val );  #else
                   fprintf( stderr, "(%s~=%s)", f->f_ava.ava_type,
                       f->f_ava.ava_value.bv_val );
   #endif
                 break;                  break;
   
         case LDAP_FILTER_SUBSTRINGS:          case LDAP_FILTER_SUBSTRINGS:
                 fprintf( stderr, "(%s=" /*)*/,  #ifdef SLAPD_SCHEMA_NOT_COMPAT
                         f->f_sub_desc->ad_cname->bv_val );                  fprintf( stderr, "(%s=" /*)*/, f->f_sub_desc->ad_cname );
   #else
                   fprintf( stderr, "(%s=" /*)*/, f->f_sub_type );
   #endif
                 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->bv_val );
                         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]->bv_val );
                                 fprintf( stderr, "*%s",  
                                         escaped.bv_val );  
                                 ber_memfree( escaped.bv_val );  
                         }                          }
                 }                  }
                 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->bv_val );
                         fprintf( stderr,  
                                 "*%s", escaped.bv_val );  
                         ber_memfree( escaped.bv_val );  
                 }                  }
                 fprintf( stderr, /*(*/ ")" );                  fprintf( stderr, /*(*/ ")" );
                 break;                  break;
   
         case LDAP_FILTER_PRESENT:          case LDAP_FILTER_PRESENT:
   #ifdef SLAPD_SCHEMA_NOT_COMPAT
                 fprintf( stderr, "(%s=*)",                  fprintf( stderr, "(%s=*)",
                         f->f_desc->ad_cname->bv_val );                          f->f_desc->ad_cname );
   #else
                   fprintf( stderr, "(%s=*)", f->f_type );
   #endif
                 break;                  break;
   
         case LDAP_FILTER_AND:          case LDAP_FILTER_AND:
Line 684  filter_print( Filter *f ) Line 593  filter_print( Filter *f )
                 break;                  break;
   
         case SLAPD_FILTER_COMPUTED:          case SLAPD_FILTER_COMPUTED:
                 fprintf( stderr, "(?=%s)",                  fprintf( stderr, "(%s)",
                         f->f_result == LDAP_COMPARE_FALSE ? "false" :                          f->f_result == LDAP_COMPARE_FALSE ? "false" :
                         f->f_result == LDAP_COMPARE_TRUE ? "true" :                          f->f_result == LDAP_COMPARE_TRUE ? "true" :
                         f->f_result == SLAPD_COMPARE_UNDEFINED ? "undefined" :                          f->f_result == SLAPD_COMPARE_UNDEFINED ? "undefined" :
Line 692  filter_print( Filter *f ) Line 601  filter_print( Filter *f )
                 break;                  break;
   
         default:          default:
                 fprintf( stderr, "(unknown-filter=%lu)", f->f_choice );                  fprintf( stderr, "(unknown filter %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.7  
changed lines
  Added in v.1.26


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