2 * Copyright 1998-2003 The OpenLDAP Foundation, All Rights Reserved.
3 * COPYING RESTRICTIONS APPLY, see COPYRIGHT file
5 * Copyright 2001, Pierangelo Masarati, All rights reserved. <ando@sys-net.it>
7 * This work has been developed to fulfill the requirements
8 * of SysNet s.n.c. <http:www.sys-net.it> and it has been donated
9 * to the OpenLDAP Foundation in the hope that it may be useful
10 * to the Open Source community, but WITHOUT ANY WARRANTY.
12 * Permission is granted to anyone to use this software for any purpose
13 * on any computer system, and to alter it and redistribute it, subject
14 * to the following restrictions:
16 * 1. The author and SysNet s.n.c. are not responsible for the consequences
17 * of use of this software, no matter how awful, even if they arise from
20 * 2. The origin of this software must not be misrepresented, either by
21 * explicit claim or by omission. Since few users ever read sources,
22 * credits should appear in the documentation.
24 * 3. Altered versions must be plainly marked as such, and must not be
25 * misrepresented as being the original software. Since few users
26 * ever read sources, credits should appear in the documentation.
27 * SysNet s.n.c. cannot be responsible for the consequences of the
30 * 4. This notice may not be removed or altered.
33 * This software is based on the backend back-ldap, implemented
34 * by Howard Chu <hyc@highlandsun.com>, and modified by Mark Valence
35 * <kurash@sassafras.com>, Pierangelo Masarati <ando@sys-net.it> and other
36 * contributors. The contribution of the original software to the present
37 * implementation is acknowledged in this copyright statement.
39 * A special acknowledgement goes to Howard for the overall architecture
40 * (and for borrowing large pieces of code), and to Mark, who implemented
41 * from scratch the attribute/objectclass mapping.
43 * The original copyright statement follows.
45 * Copyright 1999, Howard Chu, All rights reserved. <hyc@highlandsun.com>
47 * Permission is granted to anyone to use this software for any purpose
48 * on any computer system, and to alter it and redistribute it, subject
49 * to the following restrictions:
51 * 1. The author is not responsible for the consequences of use of this
52 * software, no matter how awful, even if they arise from flaws in it.
54 * 2. The origin of this software must not be misrepresented, either by
55 * explicit claim or by omission. Since few users ever read sources,
56 * credits should appear in the documentation.
58 * 3. Altered versions must be plainly marked as such, and must not be
59 * misrepresented as being the original software. Since few users
60 * ever read sources, credits should appear in the
63 * 4. This notice may not be removed or altered.
71 #include <ac/string.h>
72 #include <ac/socket.h>
75 #include "../back-ldap/back-ldap.h"
76 #include "back-meta.h"
85 AttributeAssertion *ava
88 struct metainfo *li = ( struct metainfo * )be->be_private;
90 struct metasingleconn *lsc;
91 char *match = NULL, *err = NULL, *mmatch = NULL;
92 int candidates = 0, last = 0, i, count, rc;
93 int cres = LDAP_SUCCESS, rres = LDAP_SUCCESS;
96 lc = meta_back_getconn( li, conn, op, META_OP_ALLOW_MULTIPLE,
98 if ( !lc || !meta_back_dobind( lc, op ) ) {
99 send_ldap_result( conn, op, LDAP_OTHER,
100 NULL, NULL, NULL, NULL );
104 msgid = ch_calloc( sizeof( int ), li->ntargets );
105 if ( msgid == NULL ) {
110 * start an asynchronous compare for each candidate target
112 for ( i = 0, lsc = lc->conns; !META_LAST(lsc); ++i, ++lsc ) {
114 struct berval mapped_attr = ava->aa_desc->ad_cname;
115 struct berval mapped_value = ava->aa_value;
117 if ( lsc->candidate != META_CANDIDATE ) {
123 * Rewrite the compare dn, if needed
125 switch ( rewrite_session( li->targets[ i ]->rwinfo,
127 dn->bv_val, conn, &mdn ) ) {
128 case REWRITE_REGEXEC_OK:
130 mdn = ( char * )dn->bv_val;
133 LDAP_LOG( BACK_META, DETAIL1,
134 "[rw] compareDn: \"%s\" -> \"%s\"\n", dn->bv_val, mdn, 0 );
135 #else /* !NEW_LOGGING */
136 Debug( LDAP_DEBUG_ARGS,
137 "rw> compareDn: \"%s\" -> \"%s\"\n%s",
138 dn->bv_val, mdn, "" );
139 #endif /* !NEW_LOGGING */
142 case REWRITE_REGEXEC_UNWILLING:
143 send_ldap_result( conn, op, LDAP_UNWILLING_TO_PERFORM,
144 NULL, "Operation not allowed",
148 case REWRITE_REGEXEC_ERR:
149 send_ldap_result( conn, op, LDAP_OTHER,
150 NULL, "Rewrite error",
156 * if attr is objectClass, try to remap the value
158 if ( ava->aa_desc == slap_schema.si_ad_objectClass ) {
159 ldap_back_map( &li->targets[ i ]->oc_map,
160 &ava->aa_value, &mapped_value,
163 if ( mapped_value.bv_val == NULL || mapped_value.bv_val[0] == '\0' ) {
167 * else try to remap the attribute
170 ldap_back_map( &li->targets[ i ]->at_map,
171 &ava->aa_desc->ad_cname, &mapped_attr,
173 if ( mapped_attr.bv_val == NULL || mapped_attr.bv_val[0] == '\0' ) {
179 * the compare op is spawned across the targets and the first
180 * that returns determines the result; a constraint on unicity
181 * of the result ought to be enforced
183 msgid[ i ] = ldap_compare( lc->conns[ i ].ld, mdn,
184 mapped_attr.bv_val, mapped_value.bv_val );
185 if ( mdn != dn->bv_val ) {
188 if ( mapped_attr.bv_val != ava->aa_desc->ad_cname.bv_val ) {
189 free( mapped_attr.bv_val );
191 if ( mapped_value.bv_val != ava->aa_value.bv_val ) {
192 free( mapped_value.bv_val );
195 if ( msgid[ i ] == -1 ) {
205 for ( rc = 0, count = 0; candidates > 0; ) {
208 * FIXME: should we check for abandon?
210 for ( i = 0, lsc = lc->conns; !META_LAST(lsc); lsc++, i++ ) {
212 LDAPMessage *res = NULL;
214 if ( msgid[ i ] == -1 ) {
218 lrc = ldap_result( lsc->ld, msgid[ i ],
223 * FIXME: should we yield?
229 } else if ( lrc == LDAP_RES_COMPARE ) {
236 cres = ldap_result2error( lsc->ld, res, 1 );
238 case LDAP_COMPARE_TRUE:
239 case LDAP_COMPARE_FALSE:
242 * true or flase, got it;
243 * sending to cache ...
245 if ( li->cache.ttl != META_DNCACHE_DISABLED ) {
246 ( void )meta_dncache_update_entry( &li->cache, ndn, i );
254 rres = ldap_back_map_result( cres );
259 ldap_get_option( lsc->ld,
260 LDAP_OPT_ERROR_STRING, &err );
262 if ( match != NULL ) {
265 ldap_get_option( lsc->ld,
266 LDAP_OPT_MATCHED_DN, &match );
288 * Rewrite the matched portion of the search base, if required
290 * FIXME: only the last one gets caught!
293 if ( match != NULL ) {
299 * the result of the compare is assigned to the res code
300 * that will be returned
304 } else if ( match != NULL ) {
307 * At least one compare failed with matched portion,
308 * and none was successful
310 switch ( rewrite_session( li->targets[ last ]->rwinfo,
311 "matchedDn", match, conn, &mmatch ) ) {
312 case REWRITE_REGEXEC_OK:
313 if ( mmatch == NULL ) {
314 mmatch = ( char * )match;
317 LDAP_LOG( BACK_META, DETAIL1,
318 "[rw] matchedDn: \"%s\" -> \"%s\"\n", match, mmatch, 0 );
319 #else /* !NEW_LOGGING */
320 Debug( LDAP_DEBUG_ARGS, "rw> matchedDn:"
321 " \"%s\" -> \"%s\"\n%s",
323 #endif /* !NEW_LOGGING */
327 case REWRITE_REGEXEC_UNWILLING:
328 send_ldap_result( conn, op, LDAP_UNWILLING_TO_PERFORM,
329 NULL, "Operation not allowed",
334 case REWRITE_REGEXEC_ERR:
335 send_ldap_result( conn, op, LDAP_OTHER,
336 NULL, "Rewrite error",
343 send_ldap_result( conn, op, rres, mmatch, err, NULL, NULL );
346 if ( match != NULL ) {
347 if ( mmatch != match ) {