]> git.sur5r.net Git - openldap/blob - servers/slapd/back-meta/init.c
proxy RFC4525 increment; bail out in case of unsupported extension (ITS#5912)
[openldap] / servers / slapd / back-meta / init.c
1 /* $OpenLDAP$ */
2 /* This work is part of OpenLDAP Software <http://www.openldap.org/>.
3  *
4  * Copyright 1999-2009 The OpenLDAP Foundation.
5  * Portions Copyright 2001-2003 Pierangelo Masarati.
6  * Portions Copyright 1999-2003 Howard Chu.
7  * All rights reserved.
8  *
9  * Redistribution and use in source and binary forms, with or without
10  * modification, are permitted only as authorized by the OpenLDAP
11  * Public License.
12  *
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>.
16  */
17
18 #include "portable.h"
19
20 #include <stdio.h>
21
22 #include <ac/string.h>
23 #include <ac/socket.h>
24
25 #include "slap.h"
26 #include "config.h"
27 #include "../back-ldap/back-ldap.h"
28 #include "back-meta.h"
29
30 int
31 meta_back_open(
32         BackendInfo     *bi )
33 {
34         /* FIXME: need to remove the pagedResults, and likely more... */
35         bi->bi_controls = slap_known_controls;
36
37         return 0;
38 }
39
40 int
41 meta_back_initialize(
42         BackendInfo     *bi )
43 {
44         bi->bi_flags =
45 #if 0
46         /* this is not (yet) set essentially because back-meta does not
47          * directly support extended operations... */
48 #ifdef LDAP_DYNAMIC_OBJECTS
49                 /* this is set because all the support a proxy has to provide
50                  * is the capability to forward the refresh exop, and to
51                  * pass thru entries that contain the dynamicObject class
52                  * and the entryTtl attribute */
53                 SLAP_BFLAG_DYNAMIC |
54 #endif /* LDAP_DYNAMIC_OBJECTS */
55 #endif
56
57                 /* back-meta recognizes RFC4525 increment;
58                  * let the remote server complain, if needed (ITS#5912) */
59                 SLAP_BFLAG_INCREMENT;
60
61         bi->bi_open = meta_back_open;
62         bi->bi_config = 0;
63         bi->bi_close = 0;
64         bi->bi_destroy = 0;
65
66         bi->bi_db_init = meta_back_db_init;
67         bi->bi_db_config = meta_back_db_config;
68         bi->bi_db_open = meta_back_db_open;
69         bi->bi_db_close = 0;
70         bi->bi_db_destroy = meta_back_db_destroy;
71
72         bi->bi_op_bind = meta_back_bind;
73         bi->bi_op_unbind = 0;
74         bi->bi_op_search = meta_back_search;
75         bi->bi_op_compare = meta_back_compare;
76         bi->bi_op_modify = meta_back_modify;
77         bi->bi_op_modrdn = meta_back_modrdn;
78         bi->bi_op_add = meta_back_add;
79         bi->bi_op_delete = meta_back_delete;
80         bi->bi_op_abandon = 0;
81
82         bi->bi_extended = 0;
83
84         bi->bi_chk_referrals = 0;
85
86         bi->bi_connection_init = 0;
87         bi->bi_connection_destroy = meta_back_conn_destroy;
88
89         return 0;
90 }
91
92 int
93 meta_back_db_init(
94         Backend         *be,
95         ConfigReply     *cr)
96 {
97         metainfo_t      *mi;
98         int             i;
99         BackendInfo     *bi;
100
101         bi = backend_info( "ldap" );
102         if ( !bi || !bi->bi_extra ) {
103                 Debug( LDAP_DEBUG_ANY,
104                         "meta_back_db_init: needs back-ldap\n",
105                         0, 0, 0 );
106                 return 1;
107         }
108
109         mi = ch_calloc( 1, sizeof( metainfo_t ) );
110         if ( mi == NULL ) {
111                 return -1;
112         }
113
114         /* set default flags */
115         mi->mi_flags =
116                 META_BACK_F_DEFER_ROOTDN_BIND;
117
118         /*
119          * At present the default is no default target;
120          * this may change
121          */
122         mi->mi_defaulttarget = META_DEFAULT_TARGET_NONE;
123         mi->mi_bind_timeout.tv_sec = 0;
124         mi->mi_bind_timeout.tv_usec = META_BIND_TIMEOUT;
125
126         mi->mi_rebind_f = meta_back_default_rebind;
127         mi->mi_urllist_f = meta_back_default_urllist;
128
129         ldap_pvt_thread_mutex_init( &mi->mi_conninfo.lai_mutex );
130         ldap_pvt_thread_mutex_init( &mi->mi_cache.mutex );
131
132         /* safe default */
133         mi->mi_nretries = META_RETRY_DEFAULT;
134         mi->mi_version = LDAP_VERSION3;
135
136         for ( i = LDAP_BACK_PCONN_FIRST; i < LDAP_BACK_PCONN_LAST; i++ ) {
137                 mi->mi_conn_priv[ i ].mic_num = 0;
138                 LDAP_TAILQ_INIT( &mi->mi_conn_priv[ i ].mic_priv );
139         }
140         mi->mi_conn_priv_max = LDAP_BACK_CONN_PRIV_DEFAULT;
141         
142         mi->mi_ldap_extra = (ldap_extra_t *)bi->bi_extra;
143
144         be->be_private = mi;
145
146         return 0;
147 }
148
149 int
150 meta_back_db_open(
151         Backend         *be,
152         ConfigReply     *cr )
153 {
154         metainfo_t      *mi = (metainfo_t *)be->be_private;
155
156         int             i,
157                         not_always = 0,
158                         not_always_anon_proxyauthz = 0,
159                         not_always_anon_non_prescriptive = 0,
160                         rc;
161
162         if ( mi->mi_ntargets == 0 ) {
163                 Debug( LDAP_DEBUG_ANY,
164                         "meta_back_db_open: no targets defined\n",
165                         0, 0, 0 );
166                 return 1;
167         }
168
169         for ( i = 0; i < mi->mi_ntargets; i++ ) {
170                 slap_bindconf   sb = { BER_BVNULL };
171                 metatarget_t    *mt = mi->mi_targets[ i ];
172
173                 ber_str2bv( mt->mt_uri, 0, 0, &sb.sb_uri );
174                 sb.sb_version = mt->mt_version;
175                 sb.sb_method = LDAP_AUTH_SIMPLE;
176                 BER_BVSTR( &sb.sb_binddn, "" );
177
178                 if ( META_BACK_TGT_T_F_DISCOVER( mt ) ) {
179                         rc = slap_discover_feature( &sb,
180                                         slap_schema.si_ad_supportedFeatures->ad_cname.bv_val,
181                                         LDAP_FEATURE_ABSOLUTE_FILTERS );
182                         if ( rc == LDAP_COMPARE_TRUE ) {
183                                 mt->mt_flags |= LDAP_BACK_F_T_F;
184                         }
185                 }
186
187                 if ( META_BACK_TGT_CANCEL_DISCOVER( mt ) ) {
188                         rc = slap_discover_feature( &sb,
189                                         slap_schema.si_ad_supportedExtension->ad_cname.bv_val,
190                                         LDAP_EXOP_CANCEL );
191                         if ( rc == LDAP_COMPARE_TRUE ) {
192                                 mt->mt_flags |= LDAP_BACK_F_CANCEL_EXOP;
193                         }
194                 }
195
196                 if ( not_always == 0 ) {
197                         if ( !( mt->mt_idassert_flags & LDAP_BACK_AUTH_OVERRIDE )
198                                 || mt->mt_idassert_authz != NULL )
199                         {
200                                 not_always = 1;
201                         }
202                 }
203
204                 if ( ( mt->mt_idassert_flags & LDAP_BACK_AUTH_AUTHZ_ALL )
205                         && !( mt->mt_idassert_flags & LDAP_BACK_AUTH_PRESCRIPTIVE ) )
206                 {
207                         Debug( LDAP_DEBUG_ANY, "meta_back_db_open(%s): "
208                                 "target #%d inconsistent idassert configuration "
209                                 "(likely authz=\"*\" used with \"non-prescriptive\" flag)\n",
210                                 be->be_suffix[ 0 ].bv_val, i, 0 );
211                         return 1;
212                 }
213
214                 if ( not_always_anon_proxyauthz == 0 ) {
215                         if ( !( mt->mt_idassert_flags & LDAP_BACK_AUTH_AUTHZ_ALL ) )
216                         {
217                                 not_always_anon_proxyauthz = 1;
218                         }
219                 }
220
221                 if ( not_always_anon_non_prescriptive == 0 ) {
222                         if ( ( mt->mt_idassert_flags & LDAP_BACK_AUTH_PRESCRIPTIVE ) )
223                         {
224                                 not_always_anon_non_prescriptive = 1;
225                         }
226                 }
227         }
228
229         if ( not_always == 0 ) {
230                 mi->mi_flags |= META_BACK_F_PROXYAUTHZ_ALWAYS;
231         }
232
233         if ( not_always_anon_proxyauthz == 0 ) {
234                 mi->mi_flags |= META_BACK_F_PROXYAUTHZ_ANON;
235
236         } else if ( not_always_anon_non_prescriptive == 0 ) {
237                 mi->mi_flags |= META_BACK_F_PROXYAUTHZ_NOANON;
238         }
239
240         return 0;
241 }
242
243 /*
244  * meta_back_conn_free()
245  *
246  * actually frees a connection; the reference count must be 0,
247  * and it must not (or no longer) be in the cache.
248  */
249 void
250 meta_back_conn_free( 
251         void            *v_mc )
252 {
253         metaconn_t              *mc = v_mc;
254         int                     ntargets;
255
256         assert( mc != NULL );
257         assert( mc->mc_refcnt == 0 );
258
259         /* at least one must be present... */
260         ntargets = mc->mc_info->mi_ntargets;
261         assert( ntargets > 0 );
262
263         for ( ; ntargets--; ) {
264                 (void)meta_clear_one_candidate( NULL, mc, ntargets );
265         }
266
267         if ( !BER_BVISNULL( &mc->mc_local_ndn ) ) {
268                 free( mc->mc_local_ndn.bv_val );
269         }
270
271         free( mc );
272 }
273
274 static void
275 mapping_free(
276         void            *v_mapping )
277 {
278         struct ldapmapping *mapping = v_mapping;
279         ch_free( mapping->src.bv_val );
280         ch_free( mapping->dst.bv_val );
281         ch_free( mapping );
282 }
283
284 static void
285 mapping_dst_free(
286         void            *v_mapping )
287 {
288         struct ldapmapping *mapping = v_mapping;
289
290         if ( BER_BVISEMPTY( &mapping->dst ) ) {
291                 mapping_free( &mapping[ -1 ] );
292         }
293 }
294
295 static void
296 target_free(
297         metatarget_t    *mt )
298 {
299         if ( mt->mt_uri ) {
300                 free( mt->mt_uri );
301                 ldap_pvt_thread_mutex_destroy( &mt->mt_uri_mutex );
302         }
303         if ( mt->mt_subtree_exclude ) {
304                 ber_bvarray_free( mt->mt_subtree_exclude );
305         }
306         if ( !BER_BVISNULL( &mt->mt_psuffix ) ) {
307                 free( mt->mt_psuffix.bv_val );
308         }
309         if ( !BER_BVISNULL( &mt->mt_nsuffix ) ) {
310                 free( mt->mt_nsuffix.bv_val );
311         }
312         if ( !BER_BVISNULL( &mt->mt_binddn ) ) {
313                 free( mt->mt_binddn.bv_val );
314         }
315         if ( !BER_BVISNULL( &mt->mt_bindpw ) ) {
316                 free( mt->mt_bindpw.bv_val );
317         }
318         if ( !BER_BVISNULL( &mt->mt_idassert_authcID ) ) {
319                 ch_free( mt->mt_idassert_authcID.bv_val );
320         }
321         if ( !BER_BVISNULL( &mt->mt_idassert_authcDN ) ) {
322                 ch_free( mt->mt_idassert_authcDN.bv_val );
323         }
324         if ( !BER_BVISNULL( &mt->mt_idassert_passwd ) ) {
325                 ch_free( mt->mt_idassert_passwd.bv_val );
326         }
327         if ( !BER_BVISNULL( &mt->mt_idassert_authzID ) ) {
328                 ch_free( mt->mt_idassert_authzID.bv_val );
329         }
330         if ( !BER_BVISNULL( &mt->mt_idassert_sasl_mech ) ) {
331                 ch_free( mt->mt_idassert_sasl_mech.bv_val );
332         }
333         if ( !BER_BVISNULL( &mt->mt_idassert_sasl_realm ) ) {
334                 ch_free( mt->mt_idassert_sasl_realm.bv_val );
335         }
336         if ( mt->mt_idassert_authz != NULL ) {
337                 ber_bvarray_free( mt->mt_idassert_authz );
338         }
339         if ( mt->mt_rwmap.rwm_rw ) {
340                 rewrite_info_delete( &mt->mt_rwmap.rwm_rw );
341         }
342         avl_free( mt->mt_rwmap.rwm_oc.remap, mapping_dst_free );
343         avl_free( mt->mt_rwmap.rwm_oc.map, mapping_free );
344         avl_free( mt->mt_rwmap.rwm_at.remap, mapping_dst_free );
345         avl_free( mt->mt_rwmap.rwm_at.map, mapping_free );
346
347         free( mt );
348 }
349
350 int
351 meta_back_db_destroy(
352         Backend         *be,
353         ConfigReply     *cr )
354 {
355         metainfo_t      *mi;
356
357         if ( be->be_private ) {
358                 int i;
359
360                 mi = ( metainfo_t * )be->be_private;
361
362                 /*
363                  * Destroy the connection tree
364                  */
365                 ldap_pvt_thread_mutex_lock( &mi->mi_conninfo.lai_mutex );
366
367                 if ( mi->mi_conninfo.lai_tree ) {
368                         avl_free( mi->mi_conninfo.lai_tree, meta_back_conn_free );
369                 }
370                 for ( i = LDAP_BACK_PCONN_FIRST; i < LDAP_BACK_PCONN_LAST; i++ ) {
371                         while ( !LDAP_TAILQ_EMPTY( &mi->mi_conn_priv[ i ].mic_priv ) ) {
372                                 metaconn_t      *mc = LDAP_TAILQ_FIRST( &mi->mi_conn_priv[ i ].mic_priv );
373
374                                 LDAP_TAILQ_REMOVE( &mi->mi_conn_priv[ i ].mic_priv, mc, mc_q );
375                                 meta_back_conn_free( mc );
376                         }
377                 }
378
379                 /*
380                  * Destroy the per-target stuff (assuming there's at
381                  * least one ...)
382                  */
383                 if ( mi->mi_targets != NULL ) {
384                         for ( i = 0; i < mi->mi_ntargets; i++ ) {
385                                 metatarget_t    *mt = mi->mi_targets[ i ];
386
387                                 if ( META_BACK_TGT_QUARANTINE( mt ) ) {
388                                         if ( mt->mt_quarantine.ri_num != mi->mi_quarantine.ri_num )
389                                         {
390                                                 mi->mi_ldap_extra->retry_info_destroy( &mt->mt_quarantine );
391                                         }
392
393                                         ldap_pvt_thread_mutex_destroy( &mt->mt_quarantine_mutex );
394                                 }
395
396                                 target_free( mt );
397                         }
398
399                         free( mi->mi_targets );
400                 }
401
402                 ldap_pvt_thread_mutex_lock( &mi->mi_cache.mutex );
403                 if ( mi->mi_cache.tree ) {
404                         avl_free( mi->mi_cache.tree, meta_dncache_free );
405                 }
406                 
407                 ldap_pvt_thread_mutex_unlock( &mi->mi_cache.mutex );
408                 ldap_pvt_thread_mutex_destroy( &mi->mi_cache.mutex );
409
410                 ldap_pvt_thread_mutex_unlock( &mi->mi_conninfo.lai_mutex );
411                 ldap_pvt_thread_mutex_destroy( &mi->mi_conninfo.lai_mutex );
412
413                 if ( mi->mi_candidates != NULL ) {
414                         ber_memfree_x( mi->mi_candidates, NULL );
415                 }
416
417                 if ( META_BACK_QUARANTINE( mi ) ) {
418                         mi->mi_ldap_extra->retry_info_destroy( &mi->mi_quarantine );
419                 }
420         }
421
422         free( be->be_private );
423         return 0;
424 }
425
426 #if SLAPD_META == SLAPD_MOD_DYNAMIC
427
428 /* conditionally define the init_module() function */
429 SLAP_BACKEND_INIT_MODULE( meta )
430
431 #endif /* SLAPD_META == SLAPD_MOD_DYNAMIC */
432
433