2 /* This work is part of OpenLDAP Software <http://www.openldap.org/>.
4 * Copyright 1999-2004 The OpenLDAP Foundation.
5 * Portions Copyright 1999 Dmitry Kovalev.
8 * Redistribution and use in source and binary forms, with or without
9 * modification, are permitted only as authorized by the OpenLDAP
12 * A copy of this license is available in the file LICENSE in the
13 * top-level directory of the distribution or, alternatively, at
14 * <http://www.OpenLDAP.org/license.html>.
17 * This work was initially developed by Dmitry Kovalev for inclusion
18 * by OpenLDAP Software.
26 #include <sys/types.h>
27 #include "ac/string.h"
30 #include "proto-sql.h"
37 static char *controls[] = {
38 #if 0 /* needs updating */
39 #ifdef LDAP_CONTROL_NOOP
41 #endif /* LDAP_CONTROL_NOOP */
43 #ifdef LDAP_CONTROL_VALUESRETURNFILTER
44 LDAP_CONTROL_VALUESRETURNFILTER,
45 #endif /* LDAP_CONTROL_VALUESRETURNFILTER */
49 bi->bi_controls = controls;
51 Debug( LDAP_DEBUG_TRACE,"==>sql_back_initialize()\n", 0, 0, 0 );
58 bi->bi_db_init = backsql_db_init;
59 bi->bi_db_config = backsql_db_config;
60 bi->bi_db_open = backsql_db_open;
61 bi->bi_db_close = backsql_db_close;
62 bi->bi_db_destroy = backsql_db_destroy;
64 bi->bi_op_abandon = 0;
65 bi->bi_op_compare = backsql_compare;
66 bi->bi_op_bind = backsql_bind;
68 bi->bi_op_search = backsql_search;
69 bi->bi_op_modify = backsql_modify;
70 bi->bi_op_modrdn = backsql_modrdn;
71 bi->bi_op_add = backsql_add;
72 bi->bi_op_delete = backsql_delete;
74 bi->bi_chk_referrals = 0;
75 bi->bi_operational = backsql_operational;
77 bi->bi_connection_init = 0;
78 bi->bi_connection_destroy = backsql_connection_destroy;
80 Debug( LDAP_DEBUG_TRACE,"<==sql_back_initialize()\n", 0, 0, 0 );
89 Debug( LDAP_DEBUG_TRACE, "==>backsql_destroy()\n", 0, 0, 0 );
90 Debug( LDAP_DEBUG_TRACE, "<==backsql_destroy()\n", 0, 0, 0 );
100 Debug( LDAP_DEBUG_TRACE, "==>backsql_db_init()\n", 0, 0, 0 );
101 bi = (backsql_info *)ch_calloc( 1, sizeof( backsql_info ) );
102 memset( bi, '\0', sizeof( backsql_info ) );
103 ldap_pvt_thread_mutex_init( &bi->sql_dbconn_mutex );
104 ldap_pvt_thread_mutex_init( &bi->sql_schema_mutex );
105 backsql_init_db_env( bi );
108 Debug( LDAP_DEBUG_TRACE, "<==backsql_db_init()\n", 0, 0, 0 );
116 backsql_info *bi = (backsql_info*)bd->be_private;
118 Debug( LDAP_DEBUG_TRACE, "==>backsql_db_destroy()\n", 0, 0, 0 );
119 ldap_pvt_thread_mutex_lock( &bi->sql_dbconn_mutex );
120 backsql_free_db_env( bi );
121 ldap_pvt_thread_mutex_unlock( &bi->sql_dbconn_mutex );
122 ldap_pvt_thread_mutex_destroy( &bi->sql_dbconn_mutex );
123 ldap_pvt_thread_mutex_lock( &bi->sql_schema_mutex );
124 backsql_destroy_schema_map( bi );
125 ldap_pvt_thread_mutex_unlock( &bi->sql_schema_mutex );
126 ldap_pvt_thread_mutex_destroy( &bi->sql_schema_mutex );
127 free( bi->sql_dbname );
128 free( bi->sql_dbuser );
129 if ( bi->sql_dbpasswd ) {
130 free( bi->sql_dbpasswd );
132 if ( bi->sql_dbhost ) {
133 free( bi->sql_dbhost );
135 if ( bi->sql_upper_func.bv_val ) {
136 free( bi->sql_upper_func.bv_val );
137 free( bi->sql_upper_func_open.bv_val );
138 free( bi->sql_upper_func_close.bv_val );
141 free( bi->sql_subtree_cond.bv_val );
142 free( bi->sql_oc_query );
143 free( bi->sql_at_query );
144 free( bi->sql_insentry_query );
145 free( bi->sql_delentry_query );
146 free( bi->sql_delobjclasses_query );
147 free( bi->sql_delreferrals_query );
149 if ( bi->sql_baseObject ) {
150 entry_free( bi->sql_baseObject );
155 Debug( LDAP_DEBUG_TRACE, "<==backsql_db_destroy()\n", 0, 0, 0 );
163 backsql_info *bi = (backsql_info*)bd->be_private;
166 struct berbuf bb = BB_NULL;
168 Operation otmp = { 0 };
170 Debug( LDAP_DEBUG_TRACE, "==>backsql_db_open(): "
171 "testing RDBMS connection\n", 0, 0, 0 );
172 if ( bi->sql_dbname == NULL ) {
173 Debug( LDAP_DEBUG_TRACE, "backsql_db_open(): "
174 "datasource name not specified "
175 "(use \"dbname\" directive in slapd.conf)\n", 0, 0, 0 );
179 if ( bi->sql_concat_func == NULL ) {
180 Debug( LDAP_DEBUG_TRACE, "backsql_db_open(): "
181 "concat func not specified (use \"concat_pattern\" "
182 "directive in slapd.conf)\n", 0, 0, 0 );
184 if ( backsql_split_pattern( backsql_def_concat_func,
185 &bi->sql_concat_func, 2 ) ) {
186 Debug( LDAP_DEBUG_TRACE, "backsql_db_open(): "
187 "unable to parse pattern \"%s\"",
188 backsql_def_concat_func, 0, 0 );
194 * Prepare cast string as required
196 if ( bi->sql_upper_func.bv_val ) {
199 if ( BACKSQL_UPPER_NEEDS_CAST( bi ) ) {
200 snprintf( buf, sizeof( buf ),
201 "%s(cast (" /* ? as varchar(%d))) */ ,
202 bi->sql_upper_func.bv_val );
203 ber_str2bv( buf, 0, 1, &bi->sql_upper_func_open );
205 snprintf( buf, sizeof( buf ),
206 /* (cast(? */ " as varchar(%d)))",
207 BACKSQL_MAX_DN_LEN );
208 ber_str2bv( buf, 0, 1, &bi->sql_upper_func_close );
211 snprintf( buf, sizeof( buf ), "%s(" /* ?) */ ,
212 bi->sql_upper_func.bv_val );
213 ber_str2bv( buf, 0, 1, &bi->sql_upper_func_open );
215 ber_str2bv( /* (? */ ")", 0, 1, &bi->sql_upper_func_close );
219 /* normalize filter values only if necessary */
220 bi->sql_caseIgnoreMatch = mr_find( "caseIgnoreMatch" );
221 assert( bi->sql_caseIgnoreMatch );
223 bi->sql_telephoneNumberMatch = mr_find( "telephoneNumberMatch" );
224 assert( bi->sql_telephoneNumberMatch );
226 if ( bi->sql_dbuser == NULL ) {
227 Debug( LDAP_DEBUG_TRACE, "backsql_db_open(): "
228 "user name not specified "
229 "(use \"dbuser\" directive in slapd.conf)\n", 0, 0, 0 );
233 if ( bi->sql_subtree_cond.bv_val == NULL ) {
235 * Prepare concat function for subtree search condition
237 struct berval concat;
238 struct berval values[] = {
243 struct berbuf bb = BB_NULL;
245 if ( backsql_prepare_pattern( bi->sql_concat_func, values,
247 Debug( LDAP_DEBUG_TRACE, "backsql_db_open(): "
248 "unable to prepare CONCAT pattern", 0, 0, 0 );
252 Debug( LDAP_DEBUG_TRACE, "backsql_db_open(): "
253 "subtree search SQL condition not specified "
254 "(use \"subtree_cond\" directive in slapd.conf)\n",
257 if ( bi->sql_upper_func.bv_val ) {
260 * UPPER(ldap_entries.dn) LIKE UPPER(CONCAT('%',?))
263 backsql_strfcat( &bb, "blbbb",
265 (ber_len_t)STRLENOF( "(ldap_entries.dn) LIKE " ),
266 "(ldap_entries.dn) LIKE ",
267 &bi->sql_upper_func_open,
269 &bi->sql_upper_func_close );
274 * ldap_entries.dn LIKE CONCAT('%',?)
277 backsql_strfcat( &bb, "lb",
278 (ber_len_t)STRLENOF( "ldap_entries.dn LIKE " ),
279 "ldap_entries.dn LIKE ",
283 bi->sql_subtree_cond = bb.bb_val;
285 Debug( LDAP_DEBUG_TRACE, "backsql_db_open(): "
286 "setting \"%s\" as default\n",
287 bi->sql_subtree_cond.bv_val, 0, 0 );
290 if ( bi->sql_children_cond.bv_val == NULL ) {
291 struct berbuf bb = BB_NULL;
293 if ( bi->sql_upper_func.bv_val ) {
296 * UPPER(ldap_entries.dn) LIKE UPPER(CONCAT('%,',?))
299 backsql_strfcat( &bb, "blbl",
301 (ber_len_t)STRLENOF( "(ldap_entries.dn)=" ),
302 "(ldap_entries.dn)=",
304 (ber_len_t)STRLENOF( "(?)" ), "(?)" );
309 * ldap_entries.dn LIKE CONCAT('%,',?)
312 backsql_strfcat( &bb, "l",
313 (ber_len_t)STRLENOF( "ldap_entries.dn=?" ),
314 "ldap_entries.dn=?");
317 bi->sql_children_cond = bb.bb_val;
319 Debug( LDAP_DEBUG_TRACE, "backsql_db_open(): "
320 "setting \"%s\" as default\n",
321 bi->sql_children_cond.bv_val, 0, 0 );
324 if ( bi->sql_oc_query == NULL ) {
325 if ( BACKSQL_CREATE_NEEDS_SELECT( bi ) ) {
327 ch_strdup( backsql_def_needs_select_oc_query );
330 bi->sql_oc_query = ch_strdup( backsql_def_oc_query );
333 Debug( LDAP_DEBUG_TRACE, "backsql_db_open(): "
334 "objectclass mapping SQL statement not specified "
335 "(use \"oc_query\" directive in slapd.conf)\n",
337 Debug( LDAP_DEBUG_TRACE, "backsql_db_open(): "
338 "setting \"%s\" by default\n", bi->sql_oc_query, 0, 0 );
341 if ( bi->sql_at_query == NULL ) {
342 Debug( LDAP_DEBUG_TRACE, "backsql_db_open(): "
343 "attribute mapping SQL statement not specified "
344 "(use \"at_query\" directive in slapd.conf)\n",
346 Debug(LDAP_DEBUG_TRACE, "backsql_db_open(): "
347 "setting \"%s\" by default\n",
348 backsql_def_at_query, 0, 0 );
349 bi->sql_at_query = ch_strdup( backsql_def_at_query );
352 if ( bi->sql_insentry_query == NULL ) {
353 Debug( LDAP_DEBUG_TRACE, "backsql_db_open(): "
354 "entry insertion SQL statement not specified "
355 "(use \"insentry_query\" directive in slapd.conf)\n",
357 Debug(LDAP_DEBUG_TRACE, "backsql_db_open(): "
358 "setting \"%s\" by default\n",
359 backsql_def_insentry_query, 0, 0 );
360 bi->sql_insentry_query = ch_strdup( backsql_def_insentry_query );
363 if ( bi->sql_delentry_query == NULL ) {
364 Debug( LDAP_DEBUG_TRACE, "backsql_db_open(): "
365 "entry deletion SQL statement not specified "
366 "(use \"delentry_query\" directive in slapd.conf)\n",
368 Debug( LDAP_DEBUG_TRACE, "backsql_db_open(): "
369 "setting \"%s\" by default\n",
370 backsql_def_delentry_query, 0, 0 );
371 bi->sql_delentry_query = ch_strdup( backsql_def_delentry_query );
374 if ( bi->sql_delobjclasses_query == NULL ) {
375 Debug( LDAP_DEBUG_TRACE, "backsql_db_open(): "
376 "objclasses deletion SQL statement not specified "
377 "(use \"delobjclasses_query\" directive in slapd.conf)\n",
379 Debug( LDAP_DEBUG_TRACE, "backsql_db_open(): "
380 "setting \"%s\" by default\n",
381 backsql_def_delobjclasses_query, 0, 0 );
382 bi->sql_delobjclasses_query = ch_strdup( backsql_def_delobjclasses_query );
385 if ( bi->sql_delreferrals_query == NULL ) {
386 Debug( LDAP_DEBUG_TRACE, "backsql_db_open(): "
387 "referrals deletion SQL statement not specified "
388 "(use \"delreferrals_query\" directive in slapd.conf)\n",
390 Debug( LDAP_DEBUG_TRACE, "backsql_db_open(): "
391 "setting \"%s\" by default\n",
392 backsql_def_delreferrals_query, 0, 0 );
393 bi->sql_delreferrals_query = ch_strdup( backsql_def_delreferrals_query );
396 otmp.o_connid = (unsigned long)(-1);
398 if ( backsql_get_db_conn( &otmp, &dbh ) != LDAP_SUCCESS ) {
399 Debug( LDAP_DEBUG_TRACE, "backsql_db_open(): "
400 "connection failed, exiting\n", 0, 0, 0 );
405 * Prepare ID selection query
407 bi->sql_id_query = NULL;
410 if ( bi->sql_upper_func.bv_val == NULL ) {
411 backsql_strcat( &bb, backsql_id_query, "dn=?", NULL );
414 if ( BACKSQL_HAS_LDAPINFO_DN_RU( bi ) ) {
415 backsql_strcat( &bb, backsql_id_query,
418 if ( BACKSQL_USE_REVERSE_DN( bi ) ) {
419 backsql_strfcat( &bb, "sbl",
422 (ber_len_t)STRLENOF( "(dn)=?" ), "(dn)=?" );
424 backsql_strfcat( &bb, "sblbcb",
427 (ber_len_t)STRLENOF( "(dn)=" ), "(dn)=",
428 &bi->sql_upper_func_open,
430 &bi->sql_upper_func_close );
434 bi->sql_id_query = bb.bb_val.bv_val;
437 * Prepare children ID selection query
439 bi->sql_has_children_query = NULL;
441 bb.bb_val.bv_val = NULL;
442 bb.bb_val.bv_len = 0;
444 backsql_strfcat( &bb, "sb",
445 "SELECT COUNT(distinct subordinates.id) FROM ldap_entries,ldap_entries subordinates WHERE subordinates.parent=ldap_entries.id AND ",
447 &bi->sql_children_cond );
448 bi->sql_has_children_query = bb.bb_val.bv_val;
450 backsql_free_db_conn( &otmp );
451 if ( !BACKSQL_SCHEMA_LOADED( bi ) ) {
452 Debug( LDAP_DEBUG_TRACE, "backsql_db_open(): "
453 "test failed, schema map not loaded - exiting\n",
458 Debug( LDAP_DEBUG_TRACE, "<==backsql_db_open(): "
459 "test succeeded, schema map loaded\n", 0, 0, 0 );
467 Debug( LDAP_DEBUG_TRACE, "==>backsql_db_close()\n", 0, 0, 0 );
468 Debug( LDAP_DEBUG_TRACE, "<==backsql_db_close()\n", 0, 0, 0 );
473 backsql_connection_destroy( Backend *bd, Connection *c )
477 o.o_connid = c->c_connid;
479 Debug( LDAP_DEBUG_TRACE, "==>backsql_connection_destroy()\n", 0, 0, 0 );
480 backsql_free_db_conn( &o );
481 Debug( LDAP_DEBUG_TRACE, "<==backsql_connection_destroy()\n", 0, 0, 0 );
486 #if SLAPD_SQL == SLAPD_MOD_DYNAMIC
489 init_module( int argc, char *argv[] )
493 memset( &bi, '\0', sizeof( bi ) );
495 bi.bi_init = sql_back_initialize;
502 #endif /* SLAPD_SQL == SLAPD_MOD_DYNAMIC */
504 #endif /* SLAPD_SQL */