X-Git-Url: https://git.sur5r.net/?a=blobdiff_plain;f=servers%2Fslapd%2Fstr2filter.c;h=4ce084aad5d52477094cdaac1a35a6f4714345b9;hb=fa856463fe9a5577bb992affca98d27db90487d2;hp=d0cd38f1e91cecfc6293da7f3ab5fe6294029508;hpb=185ff129b59340698f32e9e8ecf26c21fb58b446;p=openldap diff --git a/servers/slapd/str2filter.c b/servers/slapd/str2filter.c index d0cd38f1e9..4ce084aad5 100644 --- a/servers/slapd/str2filter.c +++ b/servers/slapd/str2filter.c @@ -1,8 +1,27 @@ -/* str2filter.c - parse an rfc 1588 string filter */ +/* str2filter.c - parse an RFC 2554 string filter */ /* $OpenLDAP$ */ -/* - * Copyright 1998-2000 The OpenLDAP Foundation, All Rights Reserved. - * COPYING RESTRICTIONS APPLY, see COPYRIGHT file +/* This work is part of OpenLDAP Software . + * + * Copyright 1998-2004 The OpenLDAP Foundation. + * All rights reserved. + * + * Redistribution and use in source and binary forms, with or without + * modification, are permitted only as authorized by the OpenLDAP + * Public License. + * + * A copy of this license is available in the file LICENSE in the + * top-level directory of the distribution or, alternatively, at + * . + */ +/* Portions Copyright (c) 1995 Regents of the University of Michigan. + * All rights reserved. + * + * Redistribution and use in source and binary forms are permitted + * provided that this notice is preserved and that due credit is given + * to the University of Michigan at Ann Arbor. The name of the University + * may not be used to endorse or promote products derived from this + * software without specific prior written permission. This software + * is provided ``as is'' without express or implied warranty. */ #include "portable.h" @@ -16,342 +35,59 @@ #include "slap.h" #include +#if 0 /* unused */ static char *find_matching_paren( const char *s ); +#endif /* unused */ static Filter *str2list( const char *str, long unsigned int ftype); static Filter *str2simple( const char *str); static int str2subvals( const char *val, Filter *f); Filter * -str2filter( const char *str ) +str2filter_x( Operation *op, const char *str ) { + int rc; Filter *f = NULL; - char *end, *freeme; + BerElementBuffer berbuf; + BerElement *ber = (BerElement *)&berbuf; + const char *text = NULL; #ifdef NEW_LOGGING - LDAP_LOG(( "filter", LDAP_LEVEL_ENTRY, - "str2filter: \"%s\"\n", str )); + LDAP_LOG( FILTER, ENTRY, "str2filter: \"%s\"\n", str, 0, 0 ); #else Debug( LDAP_DEBUG_FILTER, "str2filter \"%s\"\n", str, 0, 0 ); #endif - if ( str == NULL || *str == '\0' ) { - return( NULL ); - } - - str = freeme = ch_strdup( str ); - - switch ( *str ) { - case '(': - if ( (end = find_matching_paren( str )) == NULL ) { - filter_free( f ); - free( freeme ); - return( NULL ); - } - *end = '\0'; - - str++; - switch ( *str ) { - case '&': -#ifdef NEW_LOGGING - LDAP_LOG(( "filter", LDAP_LEVEL_DETAIL1, - "str2filter: AND\n" )); -#else - Debug( LDAP_DEBUG_FILTER, "str2filter: AND\n", - 0, 0, 0 ); -#endif - - - str++; - f = str2list( str, LDAP_FILTER_AND ); - break; - - case '|': -#ifdef NEW_LOGGING - LDAP_LOG(( "filter", LDAP_LEVEL_DETAIL1, - "str2filter: OR\n" )); -#else - Debug( LDAP_DEBUG_FILTER, "put_filter: OR\n", - 0, 0, 0 ); -#endif - - - str++; - f = str2list( str, LDAP_FILTER_OR ); - break; - - case '!': -#ifdef NEW_LOGGING - LDAP_LOG(( "filter", LDAP_LEVEL_DETAIL1, - "str2filter: NOT\n" )); -#else - Debug( LDAP_DEBUG_FILTER, "put_filter: NOT\n", - 0, 0, 0 ); -#endif - - - str++; - f = str2list( str, LDAP_FILTER_NOT ); - break; - - default: -#ifdef NEW_LOGGING - LDAP_LOG(( "filter", LDAP_LEVEL_DETAIL1, - "str2filter: simple\n" )); -#else - Debug( LDAP_DEBUG_FILTER, "str2filter: simple\n", - 0, 0, 0 ); -#endif - - - f = str2simple( str ); - break; - } - *end = ')'; - break; - - default: /* assume it's a simple type=value filter */ -#ifdef NEW_LOGGING - LDAP_LOG(( "filter", LDAP_LEVEL_DETAIL1, - "str2filter: default\n" )); -#else - Debug( LDAP_DEBUG_FILTER, "str2filter: default\n", 0, 0, - 0 ); -#endif - - - f = str2simple( str ); - break; - } - - free( freeme ); - return( f ); -} - -/* - * Put a list of filters like this "(filter1)(filter2)..." - */ - -static Filter * -str2list( const char *str, unsigned long ftype ) -{ - Filter *f; - Filter **fp; - char *next; - char save; - -#ifdef NEW_LOGGING - LDAP_LOG(( "filter", LDAP_LEVEL_ENTRY, - "str2list: \"%s\"\n", str )); -#else - Debug( LDAP_DEBUG_FILTER, "str2list \"%s\"\n", str, 0, 0 ); -#endif - - - f = (Filter *) ch_calloc( 1, sizeof(Filter) ); - f->f_choice = ftype; - fp = &f->f_list; - - while ( *str ) { - while ( *str && isspace( (unsigned char) *str ) ) - str++; - if ( *str == '\0' ) - break; - - if ( (next = find_matching_paren( str )) == NULL ) { - filter_free( f ); - return( NULL ); - } - save = *++next; - *next = '\0'; - - /* now we have "(filter)" with str pointing to it */ - if ( (*fp = str2filter( str )) == NULL ) { - filter_free( f ); - *next = save; - return( NULL ); - } - *next = save; - - str = next; - fp = &(*fp)->f_next; - } - *fp = NULL; - - return( f ); -} - -static Filter * -str2simple( const char *str ) -{ - Filter *f; - char *s; - char *value, savechar; - int rc; - const char *text; - -#ifdef NEW_LOGGING - LDAP_LOG(( "filter", LDAP_LEVEL_ENTRY, - "str2simple: \"%s\"\n", str )); -#else - Debug( LDAP_DEBUG_FILTER, "str2simple \"%s\"\n", str, 0, 0 ); -#endif - - - if ( (s = strchr( str, '=' )) == NULL ) { - return( NULL ); - } - value = &s[1]; - - *s-- = '\0'; /* we shouldn't be mucking with str */ - savechar = *s; - - f = (Filter *) ch_calloc( 1, sizeof(Filter) ); - - switch ( *s ) { - case '<': - f->f_choice = LDAP_FILTER_LE; - *s = '\0'; - break; - case '>': - f->f_choice = LDAP_FILTER_GE; - *s = '\0'; - break; - case '~': - f->f_choice = LDAP_FILTER_APPROX; - *s = '\0'; - break; - case ':': - f->f_choice = LDAP_FILTER_EXT; - *s = '\0'; return NULL; - break; - - default: - if ( ldap_pvt_find_wildcard( value ) == NULL ) { - f->f_choice = LDAP_FILTER_EQUALITY; - } else if ( strcmp( value, "*" ) == 0 ) { - f->f_choice = LDAP_FILTER_PRESENT; - } else { - f->f_choice = LDAP_FILTER_SUBSTRINGS; - f->f_sub = ch_calloc( 1, sizeof( SubstringsAssertion ) ); - rc = slap_str2ad( str, &f->f_sub_desc, &text ); - if( rc != LDAP_SUCCESS ) { - filter_free( f ); - *(value-1) = '='; - return NULL; - } - if ( str2subvals( value, f ) != 0 ) { - filter_free( f ); - *(value-1) = '='; - return( NULL ); - } - *(value-1) = '='; - return( f ); - } - break; } - if ( f->f_choice == LDAP_FILTER_PRESENT ) { - rc = slap_str2ad( str, &f->f_desc, &text ); - if( rc != LDAP_SUCCESS ) { - filter_free( f ); - *(value-1) = '='; - return NULL; - } - } else { - char *tmp; - - f->f_ava = ch_calloc( 1, sizeof( AttributeAssertion ) ); - f->f_av_desc = NULL; - rc = slap_str2ad( str, &f->f_av_desc, &text ); - if( rc != LDAP_SUCCESS ) { - filter_free( f ); - *(value-1) = '='; - return NULL; - } - - tmp = ch_strdup( value ); - ldap_pvt_filter_value_unescape( tmp ); - ber_str2bv( tmp, 0, 0, &f->f_av_value ); + ber_init2( ber, NULL, LBER_USE_DER ); + if ( op->o_tmpmemctx ) { + ber_set_option( ber, LBER_OPT_BER_MEMCTX, &op->o_tmpmemctx ); } - *s = savechar; - *(value-1) = '='; - - return( f ); -} - -static int -str2subvals( const char *in, Filter *f ) -{ - char *nextstar, *val, *freeme; - int gotstar; - -#ifdef NEW_LOGGING - LDAP_LOG(( "filter", LDAP_LEVEL_ENTRY, - "str2subvals: \"%s\"\n", in )); -#else - Debug( LDAP_DEBUG_FILTER, "str2subvals \"%s\"\n", in, 0, 0 ); -#endif - - - if( in == NULL ) return 0; - - val = freeme = ch_strdup( in ); - gotstar = 0; - - while ( *val ) { - if ( (nextstar = ldap_pvt_find_wildcard( val )) != NULL ) - *nextstar++ = '\0'; - - ldap_pvt_filter_value_unescape( val ); - - if ( gotstar == 0 ) { - ber_str2bv( val, 0, 1, &f->f_sub_initial ); + rc = ldap_pvt_put_filter( ber, str ); + if( rc < 0 ) { + goto done; + } - } else if ( nextstar == NULL ) { - ber_str2bv( val, 0, 1, &f->f_sub_final ); + ber_reset( ber, 1 ); - } else { - charray_add( (char ***) &f->f_sub_any, (char *) ber_bvstrdup( val ) ); - } + rc = get_filter( op, ber, &f, &text ); - gotstar = 1; - val = nextstar; - } +done: + ber_free_buf( ber ); - free( freeme ); - return( 0 ); + return f; } -/* - * find_matching_paren - return a pointer to the right paren in s matching - * the left paren to which *s currently points - */ - -static char * -find_matching_paren( const char *s ) +Filter * +str2filter( const char *str ) { - int balance, escape; + Operation op = {0}; - balance = 0; - escape = 0; - for ( ; *s; s++ ) { - if ( escape == 0 ) { - if ( *s == '(' ) - balance++; - else if ( *s == ')' ) - balance--; - } - if ( balance == 0 ) { - return (char *) s; - } - if ( *s == '\\' && ! escape ) - escape = 1; - else - escape = 0; - } + op.o_tmpmemctx = NULL; + op.o_tmpmfuncs = &ch_mfuncs; - return NULL; + return str2filter_x( &op, str ); }