1 /* index.c - routines for dealing with attribute indexes */
4 * Copyright 1998-2000 The OpenLDAP Foundation, All Rights Reserved.
5 * COPYING RESTRICTIONS APPLY, see COPYRIGHT file
12 #include <ac/string.h>
13 #include <ac/socket.h>
16 #include "back-ldbm.h"
18 static slap_mask_t index_mask(
20 AttributeDescription *desc,
27 /* we do not support indexing of binary attributes */
28 if( slap_ad_is_binary( desc ) ) return 0;
30 attr_mask( be->be_private, desc->ad_cname.bv_val, &mask );
33 *atname = desc->ad_cname.bv_val;
34 *dbname = desc->ad_cname.bv_val;
38 if( slap_ad_is_lang( desc ) ) {
39 /* has language tag */
40 attr_mask( be->be_private, desc->ad_type->sat_cname, &mask );
42 if( mask & SLAP_INDEX_AUTO_LANG ) {
43 *atname = desc->ad_cname.bv_val;
44 *dbname = desc->ad_type->sat_cname;
47 if( mask & SLAP_INDEX_LANG ) {
48 *atname = desc->ad_type->sat_cname;
49 *dbname = desc->ad_type->sat_cname;
54 /* see if supertype defined mask for its subtypes */
55 for( at = desc->ad_type; at != NULL ; at = at->sat_sup ) {
56 attr_mask( be->be_private, at->sat_cname, &mask );
58 if( mask & SLAP_INDEX_AUTO_SUBTYPES ) {
59 *atname = desc->ad_type->sat_cname;
60 *dbname = at->sat_cname;
63 if( mask & SLAP_INDEX_SUBTYPES ) {
64 *atname = at->sat_cname;
65 *dbname = at->sat_cname;
77 AttributeDescription *desc,
81 struct berval **prefixp )
87 mask = index_mask( be, desc, &dbname, &atname );
90 return LDAP_INAPPROPRIATE_MATCHING;
94 case LDAP_FILTER_PRESENT:
95 if( IS_SLAP_INDEX( mask, SLAP_INDEX_PRESENT ) ) {
100 case LDAP_FILTER_APPROX:
101 if( IS_SLAP_INDEX( mask, SLAP_INDEX_APPROX ) ) {
106 case LDAP_FILTER_EQUALITY:
107 if( IS_SLAP_INDEX( mask, SLAP_INDEX_EQUALITY ) ) {
112 case LDAP_FILTER_SUBSTRINGS:
113 if( IS_SLAP_INDEX( mask, SLAP_INDEX_SUBSTR ) ) {
122 return LDAP_INAPPROPRIATE_MATCHING;
126 *prefixp = ber_bvstrdup( atname );
135 struct berval **vals,
143 AttributeDescription *ad = NULL;
144 struct berval **keys;
145 struct berval prefix;
149 rc = slap_str2ad( atname, &ad, &text );
151 if( rc != LDAP_SUCCESS ) return rc;
153 prefix.bv_val = atname;
154 prefix.bv_len = strlen( atname );
156 db = ldbm_cache_open( be, dbname, LDBM_SUFFIX, LDBM_WRCREAT );
160 LDAP_LOG(( "index", LDAP_LEVEL_ERR,
161 "index_read: Could not open db %s%s\n",
162 dbname, LDBM_SUFFIX ));
164 Debug( LDAP_DEBUG_ANY,
165 "<= index_read NULL (could not open %s%s)\n",
166 dbname, LDBM_SUFFIX, 0 );
172 if( IS_SLAP_INDEX( mask, SLAP_INDEX_PRESENT ) ) {
173 key_change( be, db, &prefix, id, op );
176 if( IS_SLAP_INDEX( mask, SLAP_INDEX_EQUALITY ) ) {
177 rc = ad->ad_type->sat_equality->smr_indexer(
178 LDAP_FILTER_EQUALITY,
180 ad->ad_type->sat_syntax,
181 ad->ad_type->sat_equality,
182 &prefix, vals, &keys );
184 if( rc == LDAP_SUCCESS && keys != NULL ) {
185 for( i=0; keys[i] != NULL; i++ ) {
186 key_change( be, db, keys[i], id, op );
188 ber_bvecfree( keys );
192 if( IS_SLAP_INDEX( mask, SLAP_INDEX_APPROX ) ) {
193 rc = ad->ad_type->sat_approx->smr_indexer(
196 ad->ad_type->sat_syntax,
197 ad->ad_type->sat_approx,
198 &prefix, vals, &keys );
200 if( rc == LDAP_SUCCESS && keys != NULL ) {
201 for( i=0; keys[i] != NULL; i++ ) {
202 key_change( be, db, keys[i], id, op );
204 ber_bvecfree( keys );
208 if( IS_SLAP_INDEX( mask, SLAP_INDEX_SUBSTR ) ) {
209 rc = ad->ad_type->sat_substr->smr_indexer(
210 LDAP_FILTER_SUBSTRINGS,
212 ad->ad_type->sat_syntax,
213 ad->ad_type->sat_substr,
214 &prefix, vals, &keys );
216 if( rc == LDAP_SUCCESS && keys != NULL ) {
217 for( i=0; keys[i] != NULL; i++ ) {
218 key_change( be, db, keys[i], id, op );
220 ber_bvecfree( keys );
224 ldbm_cache_close( be, db );
228 static int index_at_values(
232 struct berval **vals,
239 slap_mask_t tmpmask = 0;
242 if( type->sat_sup ) {
244 (void) index_at_values( be,
250 attr_mask( be->be_private, type->sat_cname, &mask );
253 *dbnamep = type->sat_cname;
254 } else if ( tmpmask & SLAP_INDEX_AUTO_SUBTYPES ) {
259 indexer( be, *dbnamep,
267 size_t tlen = strlen( type->sat_cname );
268 size_t llen = lang->bv_len;
269 char *lname = ch_malloc( tlen + llen + sizeof(";") );
271 sprintf( lname, "%s;%s", type->sat_cname, lang->bv_val );
273 attr_mask( be->be_private, lname, &tmpmask );
277 } else if ( mask & SLAP_INDEX_AUTO_LANG ) {
282 if( dbname != NULL ) {
283 indexer( be, dbname, lname,
296 AttributeDescription *desc,
297 struct berval **vals,
304 if( slap_ad_is_binary( desc ) ) {
305 /* binary attributes have no index capabilities */
309 (void) index_at_values( be,
310 desc->ad_type, &desc->ad_lang,
327 LDAP_LOG(( "index", LDAP_LEVEL_ENTRY,
328 "index_entry: %s (%s)%ld\n",
329 op == SLAP_INDEX_ADD_OP ? "add" : "del",
332 Debug( LDAP_DEBUG_TRACE, "=> index_entry_%s( %ld, \"%s\" )\n",
333 op == SLAP_INDEX_ADD_OP ? "add" : "del",
338 /* add each attribute to the indexes */
339 for ( ; ap != NULL; ap = ap->a_next ) {
340 index_values( be, ap->a_desc, ap->a_vals, e->e_id, op );
344 LDAP_LOG(( "index", LDAP_LEVEL_ENTRY,
345 "index_entry: success\n" ));
347 Debug( LDAP_DEBUG_TRACE, "<= index_entry_%s( %ld, \"%s\" ) success\n",
348 op == SLAP_INDEX_ADD_OP ? "add" : "del",