2 /* This work is part of OpenLDAP Software <http://www.openldap.org/>.
4 * Copyright 1999-2006 The OpenLDAP Foundation.
5 * Portions Copyright 2001-2003 Pierangelo Masarati.
6 * Portions Copyright 1999-2003 Howard Chu.
9 * Redistribution and use in source and binary forms, with or without
10 * modification, are permitted only as authorized by the OpenLDAP
13 * A copy of this license is available in the file LICENSE in the
14 * top-level directory of the distribution or, alternatively, at
15 * <http://www.OpenLDAP.org/license.html>.
18 * This work was initially developed by the Howard Chu for inclusion
19 * in OpenLDAP Software and subsequently enhanced by Pierangelo
26 #include "ac/string.h"
29 #include "../back-ldap/back-ldap.h"
30 #include "back-meta.h"
33 * The meta-directory has one suffix, called <suffix>.
34 * It handles a pool of target servers, each with a branch suffix
35 * of the form <branch X>,<suffix>
37 * When the meta-directory receives a request with a dn that belongs
38 * to a branch, the corresponding target is invoked. When the dn
39 * does not belong to a specific branch, all the targets that
40 * are compatible with the dn are selected as candidates, and
41 * the request is spawned to all the candidate targets
43 * A request is characterized by a dn. The following cases are handled:
44 * - the dn is the suffix: <dn> == <suffix>,
45 * all the targets are candidates (search ...)
46 * - the dn is a branch suffix: <dn> == <branch X>,<suffix>, or
47 * - the dn is a subtree of a branch suffix:
48 * <dn> == <rdn>,<branch X>,<suffix>,
49 * the target is the only candidate.
51 * A possible extension will include the handling of multiple suffixes
56 * returns 1 if suffix is candidate for dn, otherwise 0
58 * Note: this function should never be called if dn is the <suffix>.
61 meta_back_is_candidate(
66 if ( dnIsSuffix( ndn, &mt->mt_nsuffix ) ) {
67 if ( mt->mt_subtree_exclude ) {
70 for ( i = 0; !BER_BVISNULL( &mt->mt_subtree_exclude[ i ] ); i++ ) {
71 if ( dnIsSuffix( ndn, &mt->mt_subtree_exclude[ i ] ) ) {
72 return META_NOT_CANDIDATE;
77 switch ( mt->mt_scope ) {
78 case LDAP_SCOPE_SUBTREE:
80 return META_CANDIDATE;
82 case LDAP_SCOPE_SUBORDINATE:
83 if ( ndn->bv_len > mt->mt_nsuffix.bv_len ) {
84 return META_CANDIDATE;
88 /* nearly useless; not allowed by config */
89 case LDAP_SCOPE_ONELEVEL:
90 if ( ndn->bv_len > mt->mt_nsuffix.bv_len ) {
91 struct berval rdn = *ndn;
93 rdn.bv_len -= mt->mt_nsuffix.bv_len
95 if ( dnIsOneLevelRDN( &rdn ) ) {
96 return META_CANDIDATE;
101 /* nearly useless; not allowed by config */
102 case LDAP_SCOPE_BASE:
103 if ( ndn->bv_len == mt->mt_nsuffix.bv_len ) {
104 return META_CANDIDATE;
109 return META_NOT_CANDIDATE;
112 if ( scope == LDAP_SCOPE_SUBTREE && dnIsSuffix( &mt->mt_nsuffix, ndn ) ) {
114 * suffix longer than dn, but common part matches
116 return META_CANDIDATE;
119 return META_NOT_CANDIDATE;
123 * meta_back_select_unique_candidate
125 * returns the index of the candidate in case it is unique, otherwise
126 * META_TARGET_NONE if none matches, or
127 * META_TARGET_MULTIPLE if more than one matches
128 * Note: ndn MUST be normalized.
131 meta_back_select_unique_candidate(
135 int i, candidate = META_TARGET_NONE;
137 for ( i = 0; i < mi->mi_ntargets; i++ ) {
138 metatarget_t *mt = mi->mi_targets[ i ];
140 if ( meta_back_is_candidate( mt, ndn, LDAP_SCOPE_BASE ) ) {
141 if ( candidate == META_TARGET_NONE ) {
145 return META_TARGET_MULTIPLE;
154 * meta_clear_unused_candidates
156 * clears all candidates except candidate
159 meta_clear_unused_candidates(
163 metainfo_t *mi = ( metainfo_t * )op->o_bd->be_private;
165 SlapReply *candidates = meta_back_candidates_get( op );
167 for ( i = 0; i < mi->mi_ntargets; ++i ) {
168 if ( i == candidate ) {
171 META_CANDIDATE_RESET( &candidates[ i ] );
178 * meta_clear_one_candidate
180 * clears the selected candidate
183 meta_clear_one_candidate(
184 metasingleconn_t *msc )
187 ldap_unbind_ext( msc->msc_ld, NULL, NULL );
191 if ( !BER_BVISNULL( &msc->msc_bound_ndn ) ) {
192 ber_memfree_x( msc->msc_bound_ndn.bv_val, NULL );
193 BER_BVZERO( &msc->msc_bound_ndn );
196 if ( !BER_BVISNULL( &msc->msc_cred ) ) {
197 memset( msc->msc_cred.bv_val, 0, msc->msc_cred.bv_len );
198 ber_memfree_x( msc->msc_cred.bv_val, NULL );
199 BER_BVZERO( &msc->msc_cred );
206 * meta_clear_candidates
208 * clears all candidates
211 meta_clear_candidates( Operation *op, metaconn_t *mc )
213 metainfo_t *mi = ( metainfo_t * )op->o_bd->be_private;
216 for ( c = 0; c < mi->mi_ntargets; c++ ) {
217 if ( mc->mc_conns[ c ].msc_ld != NULL ) {
218 meta_clear_one_candidate( &mc->mc_conns[ c ] );