]> git.sur5r.net Git - openldap/blob - servers/slapd/mr.c
8e0f932c5641dccb3490ebea61126a8591741cc9
[openldap] / servers / slapd / mr.c
1 /* mr.c - routines to manage matching rule definitions */
2 /* $OpenLDAP$ */
3 /*
4  * Copyright 1998-2000 The OpenLDAP Foundation, All Rights Reserved.
5  * COPYING RESTRICTIONS APPLY, see COPYRIGHT file
6  */
7
8 #include "portable.h"
9
10 #include <stdio.h>
11
12 #include <ac/ctype.h>
13 #include <ac/string.h>
14 #include <ac/socket.h>
15
16 #include "slap.h"
17 #include "ldap_pvt.h"
18
19
20 struct mindexrec {
21         char            *mir_name;
22         MatchingRule    *mir_mr;
23 };
24
25 static Avlnode  *mr_index = NULL;
26 static MatchingRule *mr_list = NULL;
27
28 static int
29 mr_index_cmp(
30     struct mindexrec    *mir1,
31     struct mindexrec    *mir2
32 )
33 {
34         return (strcmp( mir1->mir_name, mir2->mir_name ));
35 }
36
37 static int
38 mr_index_name_cmp(
39     char                *name,
40     struct mindexrec    *mir
41 )
42 {
43         return (strcmp( name, mir->mir_name ));
44 }
45
46 MatchingRule *
47 mr_find( const char *mrname )
48 {
49         struct mindexrec        *mir = NULL;
50
51         if ( (mir = (struct mindexrec *) avl_find( mr_index, mrname,
52             (AVL_CMP) mr_index_name_cmp )) != NULL ) {
53                 return( mir->mir_mr );
54         }
55         return( NULL );
56 }
57
58 static int
59 mr_insert(
60     MatchingRule        *smr,
61     const char          **err
62 )
63 {
64         MatchingRule            **mrp;
65         struct mindexrec        *mir;
66         char                    **names;
67
68         mrp = &mr_list;
69         while ( *mrp != NULL ) {
70                 mrp = &(*mrp)->smr_next;
71         }
72         *mrp = smr;
73
74         if ( smr->smr_oid ) {
75                 mir = (struct mindexrec *)
76                         ch_calloc( 1, sizeof(struct mindexrec) );
77                 mir->mir_name = smr->smr_oid;
78                 mir->mir_mr = smr;
79                 if ( avl_insert( &mr_index, (caddr_t) mir,
80                                  (AVL_CMP) mr_index_cmp,
81                                  (AVL_DUP) avl_dup_error ) ) {
82                         *err = smr->smr_oid;
83                         ldap_memfree(mir);
84                         return SLAP_SCHERR_DUP_RULE;
85                 }
86                 /* FIX: temporal consistency check */
87                 mr_find(mir->mir_name);
88         }
89         if ( (names = smr->smr_names) ) {
90                 while ( *names ) {
91                         mir = (struct mindexrec *)
92                                 ch_calloc( 1, sizeof(struct mindexrec) );
93                         mir->mir_name = ch_strdup(*names);
94                         mir->mir_mr = smr;
95                         if ( avl_insert( &mr_index, (caddr_t) mir,
96                                          (AVL_CMP) mr_index_cmp,
97                                          (AVL_DUP) avl_dup_error ) ) {
98                                 *err = *names;
99                                 ldap_memfree(mir);
100                                 return SLAP_SCHERR_DUP_RULE;
101                         }
102                         /* FIX: temporal consistency check */
103                         mr_find(mir->mir_name);
104                         names++;
105                 }
106         }
107         return 0;
108 }
109
110 int
111 mr_add(
112     LDAP_MATCHING_RULE          *mr,
113         unsigned usage,
114         slap_mr_convert_func *convert,
115         slap_mr_normalize_func *normalize,
116     slap_mr_match_func  *match,
117         slap_mr_indexer_func *indexer,
118     slap_mr_filter_func *filter,
119     const char          **err
120 )
121 {
122         MatchingRule    *smr;
123         Syntax          *syn;
124         int             code;
125
126         smr = (MatchingRule *) ch_calloc( 1, sizeof(MatchingRule) );
127         memcpy( &smr->smr_mrule, mr, sizeof(LDAP_MATCHING_RULE));
128
129         smr->smr_usage = usage;
130         smr->smr_convert = convert;
131         smr->smr_normalize = normalize;
132         smr->smr_match = match;
133         smr->smr_indexer = indexer;
134         smr->smr_filter = filter;
135
136         if ( smr->smr_syntax_oid ) {
137                 if ( (syn = syn_find(smr->smr_syntax_oid)) ) {
138                         smr->smr_syntax = syn;
139                 } else {
140                         *err = smr->smr_syntax_oid;
141                         return SLAP_SCHERR_SYN_NOT_FOUND;
142                 }
143         } else {
144                 *err = "";
145                 return SLAP_SCHERR_MR_INCOMPLETE;
146         }
147         code = mr_insert(smr,err);
148         return code;
149 }
150
151
152 int
153 register_matching_rule(
154         char * desc,
155         unsigned usage,
156         slap_mr_convert_func *convert,
157         slap_mr_normalize_func *normalize,
158         slap_mr_match_func *match,
159         slap_mr_indexer_func *indexer,
160         slap_mr_filter_func *filter )
161 {
162         LDAP_MATCHING_RULE *mr;
163         int             code;
164         const char      *err;
165
166         if( usage == SLAP_MR_NONE ) {
167                 Debug( LDAP_DEBUG_ANY, "register_matching_rule: not usable %s\n",
168                     desc, 0, 0 );
169                 return -1;
170         }
171
172         mr = ldap_str2matchingrule( desc, &code, &err, LDAP_SCHEMA_ALLOW_ALL);
173         if ( !mr ) {
174                 Debug( LDAP_DEBUG_ANY, "Error in register_matching_rule: %s before %s in %s\n",
175                     ldap_scherr2str(code), err, desc );
176                 return( -1 );
177         }
178
179         code = mr_add( mr, usage,
180                 convert, normalize, match, indexer, filter,
181                 &err );
182
183         if ( code ) {
184                 Debug( LDAP_DEBUG_ANY, "Error in register_syntax: %s for %s in %s\n",
185                     scherr2str(code), err, desc );
186                 return( -1 );
187         }
188
189         return( 0 );
190 }
191
192
193 #if defined( SLAPD_SCHEMA_DN )
194
195 int mr_schema_info( Entry *e )
196 {
197         struct berval   val;
198         struct berval   *vals[2];
199         MatchingRule    *mr;
200
201 #ifdef SLAPD_SCHEMA_NOT_COMPAT
202         AttributeDescription *ad_matchingRules = slap_schema.si_ad_matchingRules;
203 #else
204         char *ad_matchingRules = "matchingRules";
205 #endif
206
207         vals[0] = &val;
208         vals[1] = NULL;
209
210         for ( mr = mr_list; mr; mr = mr->smr_next ) {
211                 val.bv_val = ldap_matchingrule2str( &mr->smr_mrule );
212
213                 if ( val.bv_val == NULL ) {
214                         return -1;
215                 }
216
217                 val.bv_len = strlen( val.bv_val );
218 #if 0
219                 Debug( LDAP_DEBUG_TRACE, "Merging mr [%ld] %s\n",
220                (long) val.bv_len, val.bv_val, 0 );
221 #endif
222                 attr_merge( e, ad_matchingRules, vals );
223                 ldap_memfree( val.bv_val );
224         }
225         return 0;
226 }
227
228 #endif