X-Git-Url: https://git.sur5r.net/?a=blobdiff_plain;f=servers%2Fslapd%2Fat.c;h=44ec64c2e0499b4ddfea3fa46d0c428e0bb8014e;hb=f38e72b26c4a245dc0aa43c0f6310f20ae3fd9cc;hp=d0b3e241d77f6dc95f46529dd4eee5019e222d0d;hpb=152829be87dbff64388e3771807dad467e2d1401;p=openldap diff --git a/servers/slapd/at.c b/servers/slapd/at.c index d0b3e241d7..44ec64c2e0 100644 --- a/servers/slapd/at.c +++ b/servers/slapd/at.c @@ -1,9 +1,18 @@ +/* at.c - routines for dealing with attribute types */ /* $OpenLDAP$ */ -/* - * Copyright 1998-2003 The OpenLDAP Foundation, All Rights Reserved. - * COPYING RESTRICTIONS APPLY, see COPYRIGHT file +/* This work is part of OpenLDAP Software . + * + * Copyright 1998-2005 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 + * . */ -/* at.c - routines for dealing with attribute types */ #include "portable.h" @@ -15,7 +24,6 @@ #include #include -#include "ldap_pvt.h" #include "slap.h" @@ -49,42 +57,38 @@ struct aindexrec { }; static Avlnode *attr_index = NULL; -static LDAP_SLIST_HEAD(ATList, slap_attribute_type) attr_list - = LDAP_SLIST_HEAD_INITIALIZER(&attr_list); +static Avlnode *attr_cache = NULL; +static LDAP_STAILQ_HEAD(ATList, slap_attribute_type) attr_list + = LDAP_STAILQ_HEAD_INITIALIZER(attr_list); + +int at_oc_cache; static int attr_index_cmp( const void *v_air1, - const void *v_air2 -) + const void *v_air2 ) { const struct aindexrec *air1 = v_air1; const struct aindexrec *air2 = v_air2; int i = air1->air_name.bv_len - air2->air_name.bv_len; - if (i) - return i; + if (i) return i; return (strcasecmp( air1->air_name.bv_val, air2->air_name.bv_val )); } static int attr_index_name_cmp( const void *v_type, - const void *v_air -) + const void *v_air ) { const struct berval *type = v_type; const struct aindexrec *air = v_air; int i = type->bv_len - air->air_name.bv_len; - if (i) - return i; - return (strncasecmp( type->bv_val, air->air_name.bv_val, - type->bv_len )); + if (i) return i; + return (strncasecmp( type->bv_val, air->air_name.bv_val, type->bv_len )); } AttributeType * -at_find( - const char *name -) +at_find( const char *name ) { struct berval bv; @@ -95,22 +99,29 @@ at_find( } AttributeType * -at_bvfind( - struct berval *name -) +at_bvfind( struct berval *name ) { struct aindexrec *air; + if ( attr_cache ) { + air = avl_find( attr_cache, name, attr_index_name_cmp ); + if ( air ) return air->air_at; + } + air = avl_find( attr_index, name, attr_index_name_cmp ); + if ( air && ( slapMode & SLAP_TOOL_MODE ) && at_oc_cache ) { + avl_insert( &attr_cache, (caddr_t) air, + attr_index_cmp, avl_dup_error ); + } + return air != NULL ? air->air_at : NULL; } int at_append_to_list( AttributeType *sat, - AttributeType ***listp -) + AttributeType ***listp ) { AttributeType **list; AttributeType **list1; @@ -146,8 +157,7 @@ at_append_to_list( int at_delete_from_list( int pos, - AttributeType ***listp -) + AttributeType ***listp ) { AttributeType **list; AttributeType **list1; @@ -179,8 +189,7 @@ at_delete_from_list( int at_find_in_list( AttributeType *sat, - AttributeType **list -) + AttributeType **list ) { int i; @@ -201,11 +210,35 @@ at_destroy( void ) AttributeType *a; avl_free(attr_index, ldap_memfree); - while( !LDAP_SLIST_EMPTY(&attr_list) ) { - a = LDAP_SLIST_FIRST(&attr_list); - LDAP_SLIST_REMOVE_HEAD(&attr_list, sat_next); + while( !LDAP_STAILQ_EMPTY(&attr_list) ) { + a = LDAP_STAILQ_FIRST(&attr_list); + LDAP_STAILQ_REMOVE_HEAD(&attr_list, sat_next); + + if ( a->sat_equality ) { + MatchingRule *mr; - if (a->sat_subtypes) ldap_memfree(a->sat_subtypes); + mr = mr_find( a->sat_equality->smr_oid ); + assert( mr != NULL ); + if ( mr != a->sat_equality ) { + ch_free( a->sat_equality ); + a->sat_equality = NULL; + } + } + + assert( a->sat_syntax != NULL ); + if ( a->sat_syntax != NULL ) { + Syntax *syn; + + syn = syn_find( a->sat_syntax->ssyn_oid ); + assert( syn != NULL ); + if ( syn != a->sat_syntax ) { + ch_free( a->sat_syntax ); + a->sat_syntax = NULL; + } + } + + if ( a->sat_oidmacro ) ldap_memfree( a->sat_oidmacro ); + if ( a->sat_subtypes ) ldap_memfree( a->sat_subtypes ); ad_destroy(a->sat_ad); ldap_pvt_thread_mutex_destroy(&a->sat_ad_mutex); ldap_attributetype_free((LDAPAttributeType *)a); @@ -219,9 +252,9 @@ at_destroy( void ) int at_start( AttributeType **at ) { - assert( at ); + assert( at != NULL ); - *at = LDAP_SLIST_FIRST(&attr_list); + *at = LDAP_STAILQ_FIRST(&attr_list); return (*at != NULL); } @@ -229,40 +262,87 @@ at_start( AttributeType **at ) int at_next( AttributeType **at ) { - assert( at ); + assert( at != NULL ); #if 1 /* pedantic check */ { AttributeType *tmp = NULL; - LDAP_SLIST_FOREACH(tmp,&attr_list,sat_next) { + LDAP_STAILQ_FOREACH(tmp,&attr_list,sat_next) { if ( tmp == *at ) { break; } } - assert( tmp ); + assert( tmp != NULL ); } #endif - *at = LDAP_SLIST_NEXT(*at,sat_next); + *at = LDAP_STAILQ_NEXT(*at,sat_next); return (*at != NULL); } - + +/* + * check whether the two attributeTypes actually __are__ identical, + * or rather inconsistent + */ +static int +at_check_dup( + AttributeType *sat, + AttributeType *new_sat ) +{ + if ( new_sat->sat_oid != NULL ) { + if ( sat->sat_oid == NULL ) { + return SLAP_SCHERR_ATTR_INCONSISTENT; + } + + if ( strcmp( sat->sat_oid, new_sat->sat_oid ) != 0 ) { + return SLAP_SCHERR_ATTR_INCONSISTENT; + } + + } else { + if ( sat->sat_oid != NULL ) { + return SLAP_SCHERR_ATTR_INCONSISTENT; + } + } + + if ( new_sat->sat_names ) { + int i; + + if ( sat->sat_names == NULL ) { + return SLAP_SCHERR_ATTR_INCONSISTENT; + } + + for ( i = 0; new_sat->sat_names[ i ]; i++ ) { + if ( sat->sat_names[ i ] == NULL ) { + return SLAP_SCHERR_ATTR_INCONSISTENT; + } + + if ( strcasecmp( sat->sat_names[ i ], + new_sat->sat_names[ i ] ) != 0 ) + { + return SLAP_SCHERR_ATTR_INCONSISTENT; + } + } + } else { + if ( sat->sat_names != NULL ) { + return SLAP_SCHERR_ATTR_INCONSISTENT; + } + } + + return SLAP_SCHERR_ATTR_DUP; +} static int at_insert( AttributeType *sat, - const char **err -) + const char **err ) { struct aindexrec *air; char **names; - LDAP_SLIST_NEXT( sat, sat_next ) = NULL; - LDAP_SLIST_INSERT_HEAD( &attr_list, sat, sat_next ); if ( sat->sat_oid ) { air = (struct aindexrec *) @@ -271,16 +351,27 @@ at_insert( air->air_name.bv_len = strlen(sat->sat_oid); air->air_at = sat; if ( avl_insert( &attr_index, (caddr_t) air, - attr_index_cmp, avl_dup_error ) ) { + attr_index_cmp, avl_dup_error ) ) + { + AttributeType *old_sat; + int rc; + *err = sat->sat_oid; - ldap_memfree(air); - return SLAP_SCHERR_ATTR_DUP; + + old_sat = at_bvfind( &air->air_name ); + assert( old_sat != NULL ); + rc = at_check_dup( old_sat, sat ); + + ldap_memfree( air ); + + return rc; } /* FIX: temporal consistency check */ - at_bvfind(&air->air_name); + at_bvfind( &air->air_name ); } - if ( (names = sat->sat_names) ) { + names = sat->sat_names; + if ( names ) { while ( *names ) { air = (struct aindexrec *) ch_calloc( 1, sizeof(struct aindexrec) ); @@ -288,10 +379,20 @@ at_insert( air->air_name.bv_len = strlen(*names); air->air_at = sat; if ( avl_insert( &attr_index, (caddr_t) air, - attr_index_cmp, avl_dup_error ) ) { + attr_index_cmp, avl_dup_error ) ) + { + AttributeType *old_sat; + int rc; + *err = *names; + + old_sat = at_bvfind( &air->air_name ); + assert( old_sat != NULL ); + rc = at_check_dup( old_sat, sat ); + ldap_memfree(air); - return SLAP_SCHERR_ATTR_DUP; + + return rc; } /* FIX: temporal consistency check */ at_bvfind(&air->air_name); @@ -299,14 +400,17 @@ at_insert( } } + LDAP_STAILQ_INSERT_TAIL( &attr_list, sat, sat_next ); + return 0; } int at_add( - LDAPAttributeType *at, - const char **err -) + LDAPAttributeType *at, + int user, + AttributeType **rsat, + const char **err ) { AttributeType *sat; MatchingRule *mr; @@ -315,6 +419,7 @@ at_add( int code; char *cname; char *oid; + char *oidm = NULL; if ( !OID_LEADCHAR( at->at_oid[0] )) { /* Expand OID macros */ @@ -324,7 +429,7 @@ at_add( return SLAP_SCHERR_OIDM; } if ( oid != at->at_oid ) { - ldap_memfree( at->at_oid ); + oidm = at->at_oid; at->at_oid = oid; } } @@ -386,6 +491,7 @@ at_add( sat->sat_cname.bv_val = cname; sat->sat_cname.bv_len = strlen( cname ); + sat->sat_oidmacro = oidm; ldap_pvt_thread_mutex_init(&sat->sat_ad_mutex); if ( at->at_sup_oid ) { @@ -393,28 +499,33 @@ at_add( if ( supsat == NULL ) { *err = at->at_sup_oid; - return SLAP_SCHERR_ATTR_NOT_FOUND; + code = SLAP_SCHERR_ATTR_NOT_FOUND; + goto error_return; } sat->sat_sup = supsat; if ( at_append_to_list(sat, &supsat->sat_subtypes) ) { - return SLAP_SCHERR_OUTOFMEM; + code = SLAP_SCHERR_OUTOFMEM; + goto error_return; } if ( sat->sat_usage != supsat->sat_usage ) { /* subtypes must have same usage as their SUP */ - return SLAP_SCHERR_ATTR_BAD_USAGE; + code = SLAP_SCHERR_ATTR_BAD_USAGE; + goto error_return; } if ( supsat->sat_obsolete && !sat->sat_obsolete ) { /* subtypes must be obsolete if super is */ - return SLAP_SCHERR_ATTR_BAD_SUP; + code = SLAP_SCHERR_ATTR_BAD_SUP; + goto error_return; } if ( sat->sat_flags & SLAP_AT_FINAL ) { /* cannot subtype a "final" attribute type */ - return SLAP_SCHERR_ATTR_BAD_SUP; + code = SLAP_SCHERR_ATTR_BAD_SUP; + goto error_return; } } @@ -431,21 +542,47 @@ at_add( sat->sat_substr = sat->sat_sup->sat_substr; } + /* + * check for X-ORDERED attributes + */ + if ( sat->sat_extensions ) { + for (i=0; sat->sat_extensions[i]; i++) { + if (!strcasecmp( sat->sat_extensions[i]->lsei_name, + "X-ORDERED" ) && sat->sat_extensions[i]->lsei_values ) { + if ( !strcasecmp( sat->sat_extensions[i]->lsei_values[0], + "VALUES" )) { + sat->sat_flags |= SLAP_AT_ORDERED_VAL; + break; + } else if ( !strcasecmp( sat->sat_extensions[i]->lsei_values[0], + "SIBLINGS" )) { + sat->sat_flags |= SLAP_AT_ORDERED_SIB; + break; + } + } + } + } + + if ( !user ) + sat->sat_flags |= SLAP_AT_HARDCODE; + if ( at->at_syntax_oid ) { syn = syn_find(sat->sat_syntax_oid); if ( syn == NULL ) { *err = sat->sat_syntax_oid; - return SLAP_SCHERR_SYN_NOT_FOUND; + code = SLAP_SCHERR_SYN_NOT_FOUND; + goto error_return; } if( sat->sat_syntax != NULL && sat->sat_syntax != syn ) { - return SLAP_SCHERR_ATTR_BAD_SUP; + code = SLAP_SCHERR_ATTR_BAD_SUP; + goto error_return; } sat->sat_syntax = syn; } else if ( sat->sat_syntax == NULL ) { - return SLAP_SCHERR_ATTR_INCOMPLETE; + code = SLAP_SCHERR_ATTR_INCOMPLETE; + goto error_return; } if ( sat->sat_equality_oid ) { @@ -453,18 +590,21 @@ at_add( if( mr == NULL ) { *err = sat->sat_equality_oid; - return SLAP_SCHERR_MR_NOT_FOUND; + code = SLAP_SCHERR_MR_NOT_FOUND; + goto error_return; } if(( mr->smr_usage & SLAP_MR_EQUALITY ) != SLAP_MR_EQUALITY ) { *err = sat->sat_equality_oid; - return SLAP_SCHERR_ATTR_BAD_MR; + code = SLAP_SCHERR_ATTR_BAD_MR; + goto error_return; } if( sat->sat_syntax != mr->smr_syntax ) { if( mr->smr_compat_syntaxes == NULL ) { *err = sat->sat_equality_oid; - return SLAP_SCHERR_ATTR_BAD_MR; + code = SLAP_SCHERR_ATTR_BAD_MR; + goto error_return; } for(i=0; mr->smr_compat_syntaxes[i]; i++) { @@ -476,7 +616,8 @@ at_add( if( i >= 0 ) { *err = sat->sat_equality_oid; - return SLAP_SCHERR_ATTR_BAD_MR; + code = SLAP_SCHERR_ATTR_BAD_MR; + goto error_return; } } @@ -487,25 +628,29 @@ at_add( if ( sat->sat_ordering_oid ) { if( !sat->sat_equality ) { *err = sat->sat_ordering_oid; - return SLAP_SCHERR_ATTR_BAD_MR; + code = SLAP_SCHERR_ATTR_BAD_MR; + goto error_return; } mr = mr_find(sat->sat_ordering_oid); if( mr == NULL ) { *err = sat->sat_ordering_oid; - return SLAP_SCHERR_MR_NOT_FOUND; + code = SLAP_SCHERR_MR_NOT_FOUND; + goto error_return; } if(( mr->smr_usage & SLAP_MR_ORDERING ) != SLAP_MR_ORDERING ) { *err = sat->sat_ordering_oid; - return SLAP_SCHERR_ATTR_BAD_MR; + code = SLAP_SCHERR_ATTR_BAD_MR; + goto error_return; } if( sat->sat_syntax != mr->smr_syntax ) { if( mr->smr_compat_syntaxes == NULL ) { *err = sat->sat_ordering_oid; - return SLAP_SCHERR_ATTR_BAD_MR; + code = SLAP_SCHERR_ATTR_BAD_MR; + goto error_return; } for(i=0; mr->smr_compat_syntaxes[i]; i++) { @@ -517,7 +662,8 @@ at_add( if( i >= 0 ) { *err = sat->sat_ordering_oid; - return SLAP_SCHERR_ATTR_BAD_MR; + code = SLAP_SCHERR_ATTR_BAD_MR; + goto error_return; } } @@ -527,22 +673,25 @@ at_add( if ( sat->sat_substr_oid ) { if( !sat->sat_equality ) { *err = sat->sat_substr_oid; - return SLAP_SCHERR_ATTR_BAD_MR; + code = SLAP_SCHERR_ATTR_BAD_MR; + goto error_return; } mr = mr_find(sat->sat_substr_oid); if( mr == NULL ) { *err = sat->sat_substr_oid; - return SLAP_SCHERR_MR_NOT_FOUND; + code = SLAP_SCHERR_MR_NOT_FOUND; + goto error_return; } if(( mr->smr_usage & SLAP_MR_SUBSTR ) != SLAP_MR_SUBSTR ) { *err = sat->sat_substr_oid; - return SLAP_SCHERR_ATTR_BAD_MR; + code = SLAP_SCHERR_ATTR_BAD_MR; + goto error_return; } - /* due to funky LDAP builtin substring rules, we + /* due to funky LDAP builtin substring rules, * we check against the equality rule assertion * syntax and compat syntaxes instead of those * associated with the substrings rule. @@ -550,7 +699,8 @@ at_add( if( sat->sat_syntax != sat->sat_equality->smr_syntax ) { if( sat->sat_equality->smr_compat_syntaxes == NULL ) { *err = sat->sat_substr_oid; - return SLAP_SCHERR_ATTR_BAD_MR; + code = SLAP_SCHERR_ATTR_BAD_MR; + goto error_return; } for(i=0; sat->sat_equality->smr_compat_syntaxes[i]; i++) { @@ -564,14 +714,31 @@ at_add( if( i >= 0 ) { *err = sat->sat_substr_oid; - return SLAP_SCHERR_ATTR_BAD_MR; + code = SLAP_SCHERR_ATTR_BAD_MR; + goto error_return; } } sat->sat_substr = mr; } - code = at_insert(sat,err); + code = at_insert( sat, err ); + if ( code != 0 ) { +error_return:; + if ( sat ) { + ldap_pvt_thread_mutex_destroy( &sat->sat_ad_mutex ); + ch_free( sat ); + } + + if ( oidm ) { + SLAP_FREE( at->at_oid ); + at->at_oid = oidm; + } + + } else if ( rsat ) { + *rsat = sat; + } + return code; } @@ -594,32 +761,85 @@ at_index_print( void ) } #endif +void +at_unparse( BerVarray *res, AttributeType *start, AttributeType *end, int sys ) +{ + AttributeType *at; + int i, num; + struct berval bv, *bva = NULL, idx; + char ibuf[32]; + + if ( !start ) + start = LDAP_STAILQ_FIRST( &attr_list ); + + /* count the result size */ + i = 0; + for ( at=start; at; at=LDAP_STAILQ_NEXT(at, sat_next)) { + if ( sys && !(at->sat_flags & SLAP_AT_HARDCODE)) continue; + i++; + if ( at == end ) break; + } + if (!i) return; + + num = i; + bva = ch_malloc( (num+1) * sizeof(struct berval) ); + BER_BVZERO( bva ); + idx.bv_val = ibuf; + if ( sys ) { + idx.bv_len = 0; + ibuf[0] = '\0'; + } + i = 0; + for ( at=start; at; at=LDAP_STAILQ_NEXT(at, sat_next)) { + LDAPAttributeType lat, *latp; + if ( sys && !(at->sat_flags & SLAP_AT_HARDCODE)) continue; + if ( at->sat_oidmacro ) { + lat = at->sat_atype; + lat.at_oid = at->sat_oidmacro; + latp = ⪫ + } else { + latp = &at->sat_atype; + } + if ( ldap_attributetype2bv( latp, &bv ) == NULL ) { + ber_bvarray_free( bva ); + } + if ( !sys ) { + idx.bv_len = sprintf(idx.bv_val, "{%d}", i); + } + bva[i].bv_len = idx.bv_len + bv.bv_len; + bva[i].bv_val = ch_malloc( bva[i].bv_len + 1 ); + strcpy( bva[i].bv_val, ibuf ); + strcpy( bva[i].bv_val + idx.bv_len, bv.bv_val ); + i++; + bva[i].bv_val = NULL; + ldap_memfree( bv.bv_val ); + if ( at == end ) break; + } + *res = bva; +} + int at_schema_info( Entry *e ) { - struct berval vals[2]; - AttributeType *at; - AttributeDescription *ad_attributeTypes = slap_schema.si_ad_attributeTypes; + AttributeType *at; + struct berval val; + struct berval nval; - vals[1].bv_val = NULL; - - LDAP_SLIST_FOREACH(at,&attr_list,sat_next) { + LDAP_STAILQ_FOREACH(at,&attr_list,sat_next) { if( at->sat_flags & SLAP_AT_HIDE ) continue; - if ( ldap_attributetype2bv( &at->sat_atype, vals ) == NULL ) { + if ( ldap_attributetype2bv( &at->sat_atype, &val ) == NULL ) { return -1; } -#ifdef SLAP_NVALUES - if( attr_merge( e, ad_attributeTypes, vals, NULL /* FIXME */ ) ) -#else - if( attr_merge( e, ad_attributeTypes, vals ) ) -#endif + ber_str2bv( at->sat_oid, 0, 0, &nval ); + + if( attr_merge_one( e, ad_attributeTypes, &val, &nval ) ) { return -1; } - ldap_memfree( vals[0].bv_val ); + ldap_memfree( val.bv_val ); } return 0; }