1 /* $NetBSD: config.c,v 1.3 2021/08/14 16:14:59 christos Exp $ */
2
3 /* config.c - ldap backend configuration file routine */
4 /* $OpenLDAP$ */
5 /* This work is part of OpenLDAP Software <http://www.openldap.org/>.
6 *
7 * Copyright 2003-2021 The OpenLDAP Foundation.
8 * Portions Copyright 1999-2003 Howard Chu.
9 * Portions Copyright 2000-2003 Pierangelo Masarati.
10 * All rights reserved.
11 *
12 * Redistribution and use in source and binary forms, with or without
13 * modification, are permitted only as authorized by the OpenLDAP
14 * Public License.
15 *
16 * A copy of this license is available in the file LICENSE in the
17 * top-level directory of the distribution or, alternatively, at
18 * <http://www.OpenLDAP.org/license.html>.
19 */
20 /* ACKNOWLEDGEMENTS:
21 * This work was initially developed by the Howard Chu for inclusion
22 * in OpenLDAP Software and subsequently enhanced by Pierangelo
23 * Masarati.
24 */
25
26 #include <sys/cdefs.h>
27 __RCSID("$NetBSD: config.c,v 1.3 2021/08/14 16:14:59 christos Exp $");
28
29 #include "portable.h"
30
31 #include <stdio.h>
32
33 #include <ac/string.h>
34 #include <ac/ctype.h>
35 #include <ac/socket.h>
36
37 #include "slap.h"
38 #include "slap-config.h"
39 #include "back-ldap.h"
40 #include "lutil.h"
41 #include "ldif.h"
42
43 static SLAP_EXTOP_MAIN_FN ldap_back_exop_whoami;
44
45 static ConfigDriver ldap_back_cf_gen;
46 static ConfigDriver ldap_pbind_cf_gen;
47
48 enum {
49 LDAP_BACK_CFG_URI = 1,
50 LDAP_BACK_CFG_TLS,
51 LDAP_BACK_CFG_ACL_BIND,
52 LDAP_BACK_CFG_IDASSERT_AUTHZFROM,
53 LDAP_BACK_CFG_IDASSERT_PASSTHRU,
54 LDAP_BACK_CFG_IDASSERT_BIND,
55 LDAP_BACK_CFG_REBIND,
56 LDAP_BACK_CFG_CHASE,
57 LDAP_BACK_CFG_T_F,
58 LDAP_BACK_CFG_WHOAMI,
59 LDAP_BACK_CFG_TIMEOUT,
60 LDAP_BACK_CFG_IDLE_TIMEOUT,
61 LDAP_BACK_CFG_CONN_TTL,
62 LDAP_BACK_CFG_NETWORK_TIMEOUT,
63 LDAP_BACK_CFG_VERSION,
64 LDAP_BACK_CFG_SINGLECONN,
65 LDAP_BACK_CFG_USETEMP,
66 LDAP_BACK_CFG_CONNPOOLMAX,
67 LDAP_BACK_CFG_CANCEL,
68 LDAP_BACK_CFG_QUARANTINE,
69 LDAP_BACK_CFG_ST_REQUEST,
70 LDAP_BACK_CFG_NOREFS,
71 LDAP_BACK_CFG_NOUNDEFFILTER,
72 LDAP_BACK_CFG_ONERR,
73
74 LDAP_BACK_CFG_KEEPALIVE,
75 LDAP_BACK_CFG_TCP_USER_TIMEOUT,
76
77 LDAP_BACK_CFG_OMIT_UNKNOWN_SCHEMA,
78
79 LDAP_BACK_CFG_LAST
80 };
81
82 static ConfigTable ldapcfg[] = {
83 { "uri", "uri", 2, 2, 0,
84 ARG_MAGIC|LDAP_BACK_CFG_URI,
85 ldap_back_cf_gen, "( OLcfgDbAt:0.14 "
86 "NAME 'olcDbURI' "
87 "DESC 'URI (list) for remote DSA' "
88 "EQUALITY caseExactMatch "
89 "SYNTAX OMsDirectoryString "
90 "SINGLE-VALUE )",
91 NULL, NULL },
92 { "tls", "what", 2, 0, 0,
93 ARG_MAGIC|LDAP_BACK_CFG_TLS,
94 ldap_back_cf_gen, "( OLcfgDbAt:3.1 "
95 "NAME 'olcDbStartTLS' "
96 "DESC 'StartTLS' "
97 "EQUALITY caseExactMatch "
98 "SYNTAX OMsDirectoryString "
99 "SINGLE-VALUE )",
100 NULL, NULL },
101 { "acl-bind", "args", 2, 0, 0,
102 ARG_MAGIC|LDAP_BACK_CFG_ACL_BIND,
103 ldap_back_cf_gen, "( OLcfgDbAt:3.4 "
104 "NAME 'olcDbACLBind' "
105 "DESC 'Remote ACL administrative identity auth bind configuration' "
106 "EQUALITY caseIgnoreMatch "
107 "SYNTAX OMsDirectoryString "
108 "SINGLE-VALUE )",
109 NULL, NULL },
110 { "idassert-bind", "args", 2, 0, 0,
111 ARG_MAGIC|LDAP_BACK_CFG_IDASSERT_BIND,
112 ldap_back_cf_gen, "( OLcfgDbAt:3.7 "
113 "NAME 'olcDbIDAssertBind' "
114 "DESC 'Remote Identity Assertion administrative identity auth bind configuration' "
115 "EQUALITY caseIgnoreMatch "
116 "SYNTAX OMsDirectoryString "
117 "SINGLE-VALUE )",
118 NULL, NULL },
119 { "idassert-authzFrom", "authzRule", 2, 2, 0,
120 ARG_MAGIC|LDAP_BACK_CFG_IDASSERT_AUTHZFROM,
121 ldap_back_cf_gen, "( OLcfgDbAt:3.9 "
122 "NAME 'olcDbIDAssertAuthzFrom' "
123 "DESC 'Remote Identity Assertion authz rules' "
124 "EQUALITY caseIgnoreMatch "
125 "SYNTAX OMsDirectoryString "
126 "X-ORDERED 'VALUES' )",
127 NULL, NULL },
128 { "rebind-as-user", "true|FALSE", 1, 2, 0,
129 ARG_MAGIC|ARG_ON_OFF|LDAP_BACK_CFG_REBIND,
130 ldap_back_cf_gen, "( OLcfgDbAt:3.10 "
131 "NAME 'olcDbRebindAsUser' "
132 "DESC 'Rebind as user' "
133 "EQUALITY booleanMatch "
134 "SYNTAX OMsBoolean "
135 "SINGLE-VALUE )",
136 NULL, NULL },
137 { "chase-referrals", "true|FALSE", 2, 2, 0,
138 ARG_MAGIC|ARG_ON_OFF|LDAP_BACK_CFG_CHASE,
139 ldap_back_cf_gen, "( OLcfgDbAt:3.11 "
140 "NAME 'olcDbChaseReferrals' "
141 "DESC 'Chase referrals' "
142 "EQUALITY booleanMatch "
143 "SYNTAX OMsBoolean "
144 "SINGLE-VALUE )",
145 NULL, NULL },
146 { "t-f-support", "true|FALSE|discover", 2, 2, 0,
147 ARG_MAGIC|LDAP_BACK_CFG_T_F,
148 ldap_back_cf_gen, "( OLcfgDbAt:3.12 "
149 "NAME 'olcDbTFSupport' "
150 "DESC 'Absolute filters support' "
151 "EQUALITY caseIgnoreMatch "
152 "SYNTAX OMsDirectoryString "
153 "SINGLE-VALUE )",
154 NULL, NULL },
155 { "proxy-whoami", "true|FALSE", 1, 2, 0,
156 ARG_MAGIC|ARG_ON_OFF|LDAP_BACK_CFG_WHOAMI,
157 ldap_back_cf_gen, "( OLcfgDbAt:3.13 "
158 "NAME 'olcDbProxyWhoAmI' "
159 "DESC 'Proxy whoAmI exop' "
160 "EQUALITY booleanMatch "
161 "SYNTAX OMsBoolean "
162 "SINGLE-VALUE )",
163 NULL, NULL },
164 { "timeout", "timeout(list)", 2, 0, 0,
165 ARG_MAGIC|LDAP_BACK_CFG_TIMEOUT,
166 ldap_back_cf_gen, "( OLcfgDbAt:3.14 "
167 "NAME 'olcDbTimeout' "
168 "DESC 'Per-operation timeouts' "
169 "EQUALITY caseIgnoreMatch "
170 "SYNTAX OMsDirectoryString "
171 "SINGLE-VALUE )",
172 NULL, NULL },
173 { "idle-timeout", "timeout", 2, 2, 0,
174 ARG_MAGIC|LDAP_BACK_CFG_IDLE_TIMEOUT,
175 ldap_back_cf_gen, "( OLcfgDbAt:3.15 "
176 "NAME 'olcDbIdleTimeout' "
177 "DESC 'connection idle timeout' "
178 "EQUALITY caseIgnoreMatch "
179 "SYNTAX OMsDirectoryString "
180 "SINGLE-VALUE )",
181 NULL, NULL },
182 { "conn-ttl", "ttl", 2, 2, 0,
183 ARG_MAGIC|LDAP_BACK_CFG_CONN_TTL,
184 ldap_back_cf_gen, "( OLcfgDbAt:3.16 "
185 "NAME 'olcDbConnTtl' "
186 "DESC 'connection ttl' "
187 "EQUALITY caseIgnoreMatch "
188 "SYNTAX OMsDirectoryString "
189 "SINGLE-VALUE )",
190 NULL, NULL },
191 { "network-timeout", "timeout", 2, 2, 0,
192 ARG_MAGIC|LDAP_BACK_CFG_NETWORK_TIMEOUT,
193 ldap_back_cf_gen, "( OLcfgDbAt:3.17 "
194 "NAME 'olcDbNetworkTimeout' "
195 "DESC 'connection network timeout' "
196 "EQUALITY caseIgnoreMatch "
197 "SYNTAX OMsDirectoryString "
198 "SINGLE-VALUE )",
199 NULL, NULL },
200 { "protocol-version", "version", 2, 2, 0,
201 ARG_MAGIC|ARG_INT|LDAP_BACK_CFG_VERSION,
202 ldap_back_cf_gen, "( OLcfgDbAt:3.18 "
203 "NAME 'olcDbProtocolVersion' "
204 "DESC 'protocol version' "
205 "EQUALITY integerMatch "
206 "SYNTAX OMsInteger "
207 "SINGLE-VALUE )",
208 NULL, NULL },
209 { "single-conn", "true|FALSE", 2, 2, 0,
210 ARG_MAGIC|ARG_ON_OFF|LDAP_BACK_CFG_SINGLECONN,
211 ldap_back_cf_gen, "( OLcfgDbAt:3.19 "
212 "NAME 'olcDbSingleConn' "
213 "DESC 'cache a single connection per identity' "
214 "EQUALITY booleanMatch "
215 "SYNTAX OMsBoolean "
216 "SINGLE-VALUE )",
217 NULL, NULL },
218 { "cancel", "ABANDON|ignore|exop", 2, 2, 0,
219 ARG_MAGIC|LDAP_BACK_CFG_CANCEL,
220 ldap_back_cf_gen, "( OLcfgDbAt:3.20 "
221 "NAME 'olcDbCancel' "
222 "DESC 'abandon/ignore/exop operations when appropriate' "
223 "EQUALITY caseIgnoreMatch "
224 "SYNTAX OMsDirectoryString "
225 "SINGLE-VALUE )",
226 NULL, NULL },
227 { "quarantine", "retrylist", 2, 2, 0,
228 ARG_MAGIC|LDAP_BACK_CFG_QUARANTINE,
229 ldap_back_cf_gen, "( OLcfgDbAt:3.21 "
230 "NAME 'olcDbQuarantine' "
231 "DESC 'Quarantine database if connection fails and retry according to rule' "
232 "EQUALITY caseIgnoreMatch "
233 "SYNTAX OMsDirectoryString "
234 "SINGLE-VALUE )",
235 NULL, NULL },
236 { "use-temporary-conn", "true|FALSE", 2, 2, 0,
237 ARG_MAGIC|ARG_ON_OFF|LDAP_BACK_CFG_USETEMP,
238 ldap_back_cf_gen, "( OLcfgDbAt:3.22 "
239 "NAME 'olcDbUseTemporaryConn' "
240 "DESC 'Use temporary connections if the cached one is busy' "
241 "EQUALITY booleanMatch "
242 "SYNTAX OMsBoolean "
243 "SINGLE-VALUE )",
244 NULL, NULL },
245 { "conn-pool-max", "<n>", 2, 2, 0,
246 ARG_MAGIC|ARG_INT|LDAP_BACK_CFG_CONNPOOLMAX,
247 ldap_back_cf_gen, "( OLcfgDbAt:3.23 "
248 "NAME 'olcDbConnectionPoolMax' "
249 "DESC 'Max size of privileged connections pool' "
250 "EQUALITY integerMatch "
251 "SYNTAX OMsInteger "
252 "SINGLE-VALUE )",
253 NULL, NULL },
254 #ifdef SLAP_CONTROL_X_SESSION_TRACKING
255 { "session-tracking-request", "true|FALSE", 2, 2, 0,
256 ARG_MAGIC|ARG_ON_OFF|LDAP_BACK_CFG_ST_REQUEST,
257 ldap_back_cf_gen, "( OLcfgDbAt:3.24 "
258 "NAME 'olcDbSessionTrackingRequest' "
259 "DESC 'Add session tracking control to proxied requests' "
260 "EQUALITY booleanMatch "
261 "SYNTAX OMsBoolean "
262 "SINGLE-VALUE )",
263 NULL, NULL },
264 #endif /* SLAP_CONTROL_X_SESSION_TRACKING */
265 { "norefs", "true|FALSE", 2, 2, 0,
266 ARG_MAGIC|ARG_ON_OFF|LDAP_BACK_CFG_NOREFS,
267 ldap_back_cf_gen, "( OLcfgDbAt:3.25 "
268 "NAME 'olcDbNoRefs' "
269 "DESC 'Do not return search reference responses' "
270 "EQUALITY booleanMatch "
271 "SYNTAX OMsBoolean "
272 "SINGLE-VALUE )",
273 NULL, NULL },
274 { "noundeffilter", "true|FALSE", 2, 2, 0,
275 ARG_MAGIC|ARG_ON_OFF|LDAP_BACK_CFG_NOUNDEFFILTER,
276 ldap_back_cf_gen, "( OLcfgDbAt:3.26 "
277 "NAME 'olcDbNoUndefFilter' "
278 "DESC 'Do not propagate undefined search filters' "
279 "EQUALITY booleanMatch "
280 "SYNTAX OMsBoolean "
281 "SINGLE-VALUE )",
282 NULL, NULL },
283 { "onerr", "CONTINUE|report|stop", 2, 2, 0,
284 ARG_MAGIC|LDAP_BACK_CFG_ONERR,
285 ldap_back_cf_gen, "( OLcfgDbAt:3.108 "
286 "NAME 'olcDbOnErr' "
287 "DESC 'error handling' "
288 "EQUALITY caseIgnoreMatch "
289 "SYNTAX OMsDirectoryString "
290 "SINGLE-VALUE )",
291 NULL, NULL },
292 { "idassert-passThru", "authzRule", 2, 2, 0,
293 ARG_MAGIC|LDAP_BACK_CFG_IDASSERT_PASSTHRU,
294 ldap_back_cf_gen, "( OLcfgDbAt:3.27 "
295 "NAME 'olcDbIDAssertPassThru' "
296 "DESC 'Remote Identity Assertion passthru rules' "
297 "EQUALITY caseIgnoreMatch "
298 "SYNTAX OMsDirectoryString "
299 "X-ORDERED 'VALUES' )",
300 NULL, NULL },
301 { "omit-unknown-schema", "true|FALSE", 2, 2, 0,
302 ARG_MAGIC|ARG_ON_OFF|LDAP_BACK_CFG_OMIT_UNKNOWN_SCHEMA,
303 ldap_back_cf_gen, "( OLcfgDbAt:3.28 "
304 "NAME 'olcDbRemoveUnknownSchema' "
305 "DESC 'Omit unknown schema when returning search results' "
306 "EQUALITY booleanMatch "
307 "SYNTAX OMsBoolean "
308 "SINGLE-VALUE )",
309 NULL, NULL },
310 { "keepalive", "keepalive", 2, 2, 0,
311 ARG_MAGIC|LDAP_BACK_CFG_KEEPALIVE,
312 ldap_back_cf_gen, "( OLcfgDbAt:3.29 "
313 "NAME 'olcDbKeepalive' "
314 "DESC 'TCP keepalive' "
315 "EQUALITY caseIgnoreMatch "
316 "SYNTAX OMsDirectoryString "
317 "SINGLE-VALUE )",
318 NULL, NULL },
319 { "tcp-user-timeout", "milliseconds", 2, 2, 0,
320 ARG_MAGIC|ARG_UINT|LDAP_BACK_CFG_TCP_USER_TIMEOUT,
321 ldap_back_cf_gen, "( OLcfgDbAt:3.30 "
322 "NAME 'olcDbTcpUserTimeout' "
323 "DESC 'TCP User Timeout' "
324 "SYNTAX OMsInteger "
325 "SINGLE-VALUE )",
326 NULL, NULL },
327 { NULL, NULL, 0, 0, 0, ARG_IGNORED,
328 NULL, NULL, NULL, NULL }
329 };
330
331 static ConfigOCs ldapocs[] = {
332 { "( OLcfgDbOc:3.1 "
333 "NAME 'olcLDAPConfig' "
334 "DESC 'LDAP backend configuration' "
335 "SUP olcDatabaseConfig "
336 "MAY ( olcDbURI "
337 "$ olcDbStartTLS "
338 "$ olcDbACLBind "
339 "$ olcDbIDAssertBind "
340 "$ olcDbIDAssertAuthzFrom "
341 "$ olcDbIDAssertPassThru "
342 "$ olcDbRebindAsUser "
343 "$ olcDbChaseReferrals "
344 "$ olcDbTFSupport "
345 "$ olcDbProxyWhoAmI "
346 "$ olcDbTimeout "
347 "$ olcDbIdleTimeout "
348 "$ olcDbConnTtl "
349 "$ olcDbNetworkTimeout "
350 "$ olcDbProtocolVersion "
351 "$ olcDbSingleConn "
352 "$ olcDbCancel "
353 "$ olcDbQuarantine "
354 "$ olcDbUseTemporaryConn "
355 "$ olcDbConnectionPoolMax "
356 #ifdef SLAP_CONTROL_X_SESSION_TRACKING
357 "$ olcDbSessionTrackingRequest "
358 #endif /* SLAP_CONTROL_X_SESSION_TRACKING */
359 "$ olcDbNoRefs "
360 "$ olcDbNoUndefFilter "
361 "$ olcDbOnErr "
362 "$ olcDbKeepalive "
363 ") )",
364 Cft_Database, ldapcfg},
365 { NULL, 0, NULL }
366 };
367
368 static ConfigTable pbindcfg[] = {
369 { "uri", "uri", 2, 2, 0,
370 ARG_MAGIC|LDAP_BACK_CFG_URI,
371 ldap_pbind_cf_gen, "( OLcfgDbAt:0.14 "
372 "NAME 'olcDbURI' "
373 "DESC 'URI (list) for remote DSA' "
374 "SYNTAX OMsDirectoryString "
375 "SINGLE-VALUE )",
376 NULL, NULL },
377 { "tls", "what", 2, 0, 0,
378 ARG_MAGIC|LDAP_BACK_CFG_TLS,
379 ldap_pbind_cf_gen, "( OLcfgDbAt:3.1 "
380 "NAME 'olcDbStartTLS' "
381 "DESC 'StartTLS' "
382 "SYNTAX OMsDirectoryString "
383 "SINGLE-VALUE )",
384 NULL, NULL },
385 { "network-timeout", "timeout", 2, 2, 0,
386 ARG_MAGIC|LDAP_BACK_CFG_NETWORK_TIMEOUT,
387 ldap_pbind_cf_gen, "( OLcfgDbAt:3.17 "
388 "NAME 'olcDbNetworkTimeout' "
389 "DESC 'connection network timeout' "
390 "SYNTAX OMsDirectoryString "
391 "SINGLE-VALUE )",
392 NULL, NULL },
393 { "quarantine", "retrylist", 2, 2, 0,
394 ARG_MAGIC|LDAP_BACK_CFG_QUARANTINE,
395 ldap_pbind_cf_gen, "( OLcfgDbAt:3.21 "
396 "NAME 'olcDbQuarantine' "
397 "DESC 'Quarantine database if connection fails and retry according to rule' "
398 "SYNTAX OMsDirectoryString "
399 "SINGLE-VALUE )",
400 NULL, NULL },
401 { NULL, NULL, 0, 0, 0, ARG_IGNORED,
402 NULL, NULL, NULL, NULL }
403 };
404
405 static ConfigOCs pbindocs[] = {
406 { "( OLcfgOvOc:3.3 "
407 "NAME 'olcPBindConfig' "
408 "DESC 'Proxy Bind configuration' "
409 "SUP olcOverlayConfig "
410 "MUST olcDbURI "
411 "MAY ( olcDbStartTLS "
412 "$ olcDbNetworkTimeout "
413 "$ olcDbQuarantine "
414 ") )",
415 Cft_Overlay, pbindcfg},
416 { NULL, 0, NULL }
417 };
418
419 static slap_verbmasks idassert_mode[] = {
420 { BER_BVC("self"), LDAP_BACK_IDASSERT_SELF },
421 { BER_BVC("anonymous"), LDAP_BACK_IDASSERT_ANONYMOUS },
422 { BER_BVC("none"), LDAP_BACK_IDASSERT_NOASSERT },
423 { BER_BVC("legacy"), LDAP_BACK_IDASSERT_LEGACY },
424 { BER_BVNULL, 0 }
425 };
426
427 static slap_verbmasks tls_mode[] = {
428 { BER_BVC( "propagate" ), LDAP_BACK_F_TLS_PROPAGATE_MASK },
429 { BER_BVC( "try-propagate" ), LDAP_BACK_F_PROPAGATE_TLS },
430 { BER_BVC( "start" ), LDAP_BACK_F_TLS_USE_MASK },
431 { BER_BVC( "try-start" ), LDAP_BACK_F_USE_TLS },
432 { BER_BVC( "ldaps" ), LDAP_BACK_F_TLS_LDAPS },
433 { BER_BVC( "none" ), LDAP_BACK_F_NONE },
434 { BER_BVNULL, 0 }
435 };
436
437 static slap_verbmasks t_f_mode[] = {
438 { BER_BVC( "yes" ), LDAP_BACK_F_T_F },
439 { BER_BVC( "discover" ), LDAP_BACK_F_T_F_DISCOVER },
440 { BER_BVC( "no" ), LDAP_BACK_F_NONE },
441 { BER_BVNULL, 0 }
442 };
443
444 static slap_verbmasks cancel_mode[] = {
445 { BER_BVC( "ignore" ), LDAP_BACK_F_CANCEL_IGNORE },
446 { BER_BVC( "exop" ), LDAP_BACK_F_CANCEL_EXOP },
447 { BER_BVC( "exop-discover" ), LDAP_BACK_F_CANCEL_EXOP_DISCOVER },
448 { BER_BVC( "abandon" ), LDAP_BACK_F_CANCEL_ABANDON },
449 { BER_BVNULL, 0 }
450 };
451
452 static slap_verbmasks onerr_mode[] = {
453 { BER_BVC( "stop" ), LDAP_BACK_F_ONERR_STOP },
454 { BER_BVC( "report" ), LDAP_BACK_F_ONERR_STOP }, /* same behavior */
455 { BER_BVC( "continue" ), LDAP_BACK_F_NONE },
456 { BER_BVNULL, 0 }
457 };
458
459 /* see enum in slap.h */
460 static slap_cf_aux_table timeout_table[] = {
461 { BER_BVC("bind="), SLAP_OP_BIND * sizeof( time_t ), 'u', 0, NULL },
462 /* unbind makes no sense */
463 { BER_BVC("add="), SLAP_OP_ADD * sizeof( time_t ), 'u', 0, NULL },
464 { BER_BVC("delete="), SLAP_OP_DELETE * sizeof( time_t ), 'u', 0, NULL },
465 { BER_BVC("modrdn="), SLAP_OP_MODRDN * sizeof( time_t ), 'u', 0, NULL },
466 { BER_BVC("modify="), SLAP_OP_MODIFY * sizeof( time_t ), 'u', 0, NULL },
467 { BER_BVC("compare="), SLAP_OP_COMPARE * sizeof( time_t ), 'u', 0, NULL },
468 { BER_BVC("search="), SLAP_OP_SEARCH * sizeof( time_t ), 'u', 0, NULL },
469 /* abandon makes little sense */
470 #if 0 /* not implemented yet */
471 { BER_BVC("extended="), SLAP_OP_EXTENDED * sizeof( time_t ), 'u', 0, NULL },
472 #endif
473 { BER_BVNULL, 0, 0, 0, NULL }
474 };
475
476 int
slap_retry_info_parse(char * in,slap_retry_info_t * ri,char * buf,ber_len_t buflen)477 slap_retry_info_parse(
478 char *in,
479 slap_retry_info_t *ri,
480 char *buf,
481 ber_len_t buflen )
482 {
483 char **retrylist = NULL;
484 int rc = 0;
485 int i;
486
487 slap_str2clist( &retrylist, in, " ;" );
488 if ( retrylist == NULL ) {
489 return 1;
490 }
491
492 for ( i = 0; retrylist[ i ] != NULL; i++ )
493 /* count */ ;
494
495 ri->ri_interval = ch_calloc( sizeof( time_t ), i + 1 );
496 ri->ri_num = ch_calloc( sizeof( int ), i + 1 );
497
498 for ( i = 0; retrylist[ i ] != NULL; i++ ) {
499 unsigned long t;
500 char *sep = strchr( retrylist[ i ], ',' );
501
502 if ( sep == NULL ) {
503 snprintf( buf, buflen,
504 "missing comma in retry pattern #%d \"%s\"",
505 i, retrylist[ i ] );
506 rc = 1;
507 goto done;
508 }
509
510 *sep++ = '\0';
511
512 if ( lutil_parse_time( retrylist[ i ], &t ) ) {
513 snprintf( buf, buflen,
514 "unable to parse interval #%d \"%s\"",
515 i, retrylist[ i ] );
516 rc = 1;
517 goto done;
518 }
519 ri->ri_interval[ i ] = (time_t)t;
520
521 if ( strcmp( sep, "+" ) == 0 ) {
522 if ( retrylist[ i + 1 ] != NULL ) {
523 snprintf( buf, buflen,
524 "extra cruft after retry pattern "
525 "#%d \"%s,+\" with \"forever\" mark",
526 i, retrylist[ i ] );
527 rc = 1;
528 goto done;
529 }
530 ri->ri_num[ i ] = SLAP_RETRYNUM_FOREVER;
531
532 } else if ( lutil_atoi( &ri->ri_num[ i ], sep ) ) {
533 snprintf( buf, buflen,
534 "unable to parse retry num #%d \"%s\"",
535 i, sep );
536 rc = 1;
537 goto done;
538 }
539 }
540
541 ri->ri_num[ i ] = SLAP_RETRYNUM_TAIL;
542
543 ri->ri_idx = 0;
544 ri->ri_count = 0;
545 ri->ri_last = (time_t)(-1);
546
547 done:;
548 ldap_charray_free( retrylist );
549
550 if ( rc ) {
551 slap_retry_info_destroy( ri );
552 }
553
554 return rc;
555 }
556
557 int
slap_retry_info_unparse(slap_retry_info_t * ri,struct berval * bvout)558 slap_retry_info_unparse(
559 slap_retry_info_t *ri,
560 struct berval *bvout )
561 {
562 char buf[ BUFSIZ * 2 ],
563 *ptr = buf;
564 int i, len, restlen = (int) sizeof( buf );
565 struct berval bv;
566
567 assert( ri != NULL );
568 assert( bvout != NULL );
569
570 BER_BVZERO( bvout );
571
572 for ( i = 0; ri->ri_num[ i ] != SLAP_RETRYNUM_TAIL; i++ ) {
573 if ( i > 0 ) {
574 if ( --restlen <= 0 ) {
575 return 1;
576 }
577 *ptr++ = ';';
578 }
579
580 if ( lutil_unparse_time( ptr, restlen, ri->ri_interval[i] ) < 0 ) {
581 return 1;
582 }
583 len = (int) strlen( ptr );
584 if ( (restlen -= len + 1) <= 0 ) {
585 return 1;
586 }
587 ptr += len;
588 *ptr++ = ',';
589
590 if ( ri->ri_num[i] == SLAP_RETRYNUM_FOREVER ) {
591 if ( --restlen <= 0 ) {
592 return 1;
593 }
594 *ptr++ = '+';
595
596 } else {
597 len = snprintf( ptr, restlen, "%d", ri->ri_num[i] );
598 if ( (restlen -= len) <= 0 || len < 0 ) {
599 return 1;
600 }
601 ptr += len;
602 }
603 }
604
605 bv.bv_val = buf;
606 bv.bv_len = ptr - buf;
607 ber_dupbv( bvout, &bv );
608
609 return 0;
610 }
611
612 void
slap_retry_info_destroy(slap_retry_info_t * ri)613 slap_retry_info_destroy(
614 slap_retry_info_t *ri )
615 {
616 assert( ri != NULL );
617
618 assert( ri->ri_interval != NULL );
619 ch_free( ri->ri_interval );
620 ri->ri_interval = NULL;
621
622 assert( ri->ri_num != NULL );
623 ch_free( ri->ri_num );
624 ri->ri_num = NULL;
625 }
626
627 int
slap_idassert_authzfrom_parse(ConfigArgs * c,slap_idassert_t * si)628 slap_idassert_authzfrom_parse( ConfigArgs *c, slap_idassert_t *si )
629 {
630 struct berval bv;
631 struct berval in;
632 int rc;
633
634 if ( strcmp( c->argv[ 1 ], "*" ) == 0
635 || strcmp( c->argv[ 1 ], "dn:*" ) == 0
636 || strcasecmp( c->argv[ 1 ], "dn.regex:.*" ) == 0 )
637 {
638 if ( si->si_authz != NULL ) {
639 snprintf( c->cr_msg, sizeof( c->cr_msg ),
640 "\"%s <authz>\": "
641 "\"%s\" conflicts with existing authz rules",
642 c->argv[ 0 ], c->argv[ 1 ] );
643 Debug( LDAP_DEBUG_ANY, "%s: %s.\n", c->log, c->cr_msg );
644 return 1;
645 }
646
647 si->si_flags |= LDAP_BACK_AUTH_AUTHZ_ALL;
648
649 return 0;
650
651 } else if ( ( si->si_flags & LDAP_BACK_AUTH_AUTHZ_ALL ) ) {
652 snprintf( c->cr_msg, sizeof( c->cr_msg ),
653 "\"%s <authz>\": "
654 "\"<authz>\" conflicts with \"*\"", c->argv[0] );
655 Debug( LDAP_DEBUG_ANY, "%s: %s.\n", c->log, c->cr_msg );
656 return 1;
657 }
658
659 ber_str2bv( c->argv[ 1 ], 0, 0, &in );
660 rc = authzNormalize( 0, NULL, NULL, &in, &bv, NULL );
661 if ( rc != LDAP_SUCCESS ) {
662 snprintf( c->cr_msg, sizeof( c->cr_msg ),
663 "\"%s <authz>\": "
664 "invalid syntax", c->argv[0] );
665 Debug( LDAP_DEBUG_ANY, "%s: %s.\n", c->log, c->cr_msg );
666 return 1;
667 }
668
669 if ( c->valx == -1 ) {
670 ber_bvarray_add( &si->si_authz, &bv );
671
672 } else {
673 int i = 0;
674 if ( si->si_authz != NULL ) {
675 for ( ; !BER_BVISNULL( &si->si_authz[ i ] ); i++ )
676 ;
677 }
678
679 if ( i <= c->valx ) {
680 ber_bvarray_add( &si->si_authz, &bv );
681
682 } else {
683 BerVarray tmp = ber_memrealloc( si->si_authz,
684 sizeof( struct berval )*( i + 2 ) );
685 if ( tmp == NULL ) {
686 return -1;
687 }
688 si->si_authz = tmp;
689 for ( ; i > c->valx; i-- ) {
690 si->si_authz[ i ] = si->si_authz[ i - 1 ];
691 }
692 si->si_authz[ c->valx ] = bv;
693 }
694 }
695
696 return 0;
697 }
698
699 static int
slap_idassert_passthru_parse(ConfigArgs * c,slap_idassert_t * si)700 slap_idassert_passthru_parse( ConfigArgs *c, slap_idassert_t *si )
701 {
702 struct berval bv;
703 struct berval in;
704 int rc;
705
706 ber_str2bv( c->argv[ 1 ], 0, 0, &in );
707 rc = authzNormalize( 0, NULL, NULL, &in, &bv, NULL );
708 if ( rc != LDAP_SUCCESS ) {
709 snprintf( c->cr_msg, sizeof( c->cr_msg ),
710 "\"%s <authz>\": "
711 "invalid syntax", c->argv[0] );
712 Debug( LDAP_DEBUG_ANY, "%s: %s.\n", c->log, c->cr_msg );
713 return 1;
714 }
715
716 if ( c->valx == -1 ) {
717 ber_bvarray_add( &si->si_passthru, &bv );
718
719 } else {
720 int i = 0;
721 if ( si->si_passthru != NULL ) {
722 for ( ; !BER_BVISNULL( &si->si_passthru[ i ] ); i++ )
723 ;
724 }
725
726 if ( i <= c->valx ) {
727 ber_bvarray_add( &si->si_passthru, &bv );
728
729 } else {
730 BerVarray tmp = ber_memrealloc( si->si_passthru,
731 sizeof( struct berval )*( i + 2 ) );
732 if ( tmp == NULL ) {
733 return -1;
734 }
735 si->si_passthru = tmp;
736 for ( ; i > c->valx; i-- ) {
737 si->si_passthru[ i ] = si->si_passthru[ i - 1 ];
738 }
739 si->si_passthru[ c->valx ] = bv;
740 }
741 }
742
743 return 0;
744 }
745
746 int
slap_idassert_parse(ConfigArgs * c,slap_idassert_t * si)747 slap_idassert_parse( ConfigArgs *c, slap_idassert_t *si )
748 {
749 int i;
750
751 /* set default */
752 si->si_mode = LDAP_BACK_IDASSERT_LEGACY;
753
754 for ( i = 1; i < c->argc; i++ ) {
755 if ( strncasecmp( c->argv[ i ], "mode=", STRLENOF( "mode=" ) ) == 0 ) {
756 char *argvi = c->argv[ i ] + STRLENOF( "mode=" );
757 int j;
758
759 j = verb_to_mask( argvi, idassert_mode );
760 if ( BER_BVISNULL( &idassert_mode[ j ].word ) ) {
761 snprintf( c->cr_msg, sizeof( c->cr_msg ),
762 "\"%s <args>\": "
763 "unknown mode \"%s\"",
764 c->argv[0], argvi );
765 Debug( LDAP_DEBUG_ANY, "%s: %s.\n", c->log, c->cr_msg );
766 return 1;
767 }
768
769 si->si_mode = idassert_mode[ j ].mask;
770
771 } else if ( strncasecmp( c->argv[ i ], "authz=", STRLENOF( "authz=" ) ) == 0 ) {
772 char *argvi = c->argv[ i ] + STRLENOF( "authz=" );
773
774 if ( strcasecmp( argvi, "native" ) == 0 ) {
775 if ( si->si_bc.sb_method != LDAP_AUTH_SASL ) {
776 snprintf( c->cr_msg, sizeof( c->cr_msg ),
777 "\"%s <args>\": "
778 "authz=\"native\" incompatible "
779 "with auth method", c->argv[0] );
780 Debug( LDAP_DEBUG_ANY, "%s: %s.\n", c->log, c->cr_msg );
781 return 1;
782 }
783 si->si_flags |= LDAP_BACK_AUTH_NATIVE_AUTHZ;
784
785 } else if ( strcasecmp( argvi, "proxyAuthz" ) == 0 ) {
786 si->si_flags &= ~LDAP_BACK_AUTH_NATIVE_AUTHZ;
787
788 } else {
789 snprintf( c->cr_msg, sizeof( c->cr_msg ),
790 "\"%s <args>\": "
791 "unknown authz \"%s\"",
792 c->argv[0], argvi );
793 Debug( LDAP_DEBUG_ANY, "%s: %s.\n", c->log, c->cr_msg );
794 return 1;
795 }
796
797 } else if ( strncasecmp( c->argv[ i ], "flags=", STRLENOF( "flags=" ) ) == 0 ) {
798 char *argvi = c->argv[ i ] + STRLENOF( "flags=" );
799 char **flags = ldap_str2charray( argvi, "," );
800 int j, err = 0;
801
802 if ( flags == NULL ) {
803 snprintf( c->cr_msg, sizeof( c->cr_msg ),
804 "\"%s <args>\": "
805 "unable to parse flags \"%s\"",
806 c->argv[0], argvi );
807 Debug( LDAP_DEBUG_ANY, "%s: %s.\n", c->log, c->cr_msg );
808 return 1;
809 }
810
811 for ( j = 0; flags[ j ] != NULL; j++ ) {
812
813 if ( strcasecmp( flags[ j ], "override" ) == 0 ) {
814 si->si_flags |= LDAP_BACK_AUTH_OVERRIDE;
815
816 } else if ( strcasecmp( flags[ j ], "prescriptive" ) == 0 ) {
817 si->si_flags |= LDAP_BACK_AUTH_PRESCRIPTIVE;
818
819 } else if ( strcasecmp( flags[ j ], "non-prescriptive" ) == 0 ) {
820 si->si_flags &= ( ~LDAP_BACK_AUTH_PRESCRIPTIVE );
821
822 } else if ( strcasecmp( flags[ j ], "obsolete-proxy-authz" ) == 0 ) {
823 if ( si->si_flags & LDAP_BACK_AUTH_OBSOLETE_ENCODING_WORKAROUND ) {
824 snprintf( c->cr_msg, sizeof( c->cr_msg ),
825 "\"%s <args>\": "
826 "\"obsolete-proxy-authz\" flag "
827 "incompatible with previously issued \"obsolete-encoding-workaround\" flag.",
828 c->argv[0] );
829 Debug( LDAP_DEBUG_ANY, "%s: %s.\n", c->log, c->cr_msg );
830 err = 1;
831 break;
832
833 } else {
834 si->si_flags |= LDAP_BACK_AUTH_OBSOLETE_PROXY_AUTHZ;
835 }
836
837 } else if ( strcasecmp( flags[ j ], "obsolete-encoding-workaround" ) == 0 ) {
838 if ( si->si_flags & LDAP_BACK_AUTH_OBSOLETE_PROXY_AUTHZ ) {
839 snprintf( c->cr_msg, sizeof( c->cr_msg ),
840 "\"%s <args>\": "
841 "\"obsolete-encoding-workaround\" flag "
842 "incompatible with previously issued \"obsolete-proxy-authz\" flag.",
843 c->argv[0] );
844 Debug( LDAP_DEBUG_ANY, "%s: %s.\n", c->log, c->cr_msg );
845 err = 1;
846 break;
847
848 } else {
849 si->si_flags |= LDAP_BACK_AUTH_OBSOLETE_ENCODING_WORKAROUND;
850 }
851
852 } else if ( strcasecmp( flags[ j ], "proxy-authz-critical" ) == 0 ) {
853 si->si_flags |= LDAP_BACK_AUTH_PROXYAUTHZ_CRITICAL;
854
855 } else if ( strcasecmp( flags[ j ], "proxy-authz-non-critical" ) == 0 ) {
856 si->si_flags &= ~LDAP_BACK_AUTH_PROXYAUTHZ_CRITICAL;
857
858 } else if ( strcasecmp( flags[ j ], "dn-none" ) == 0 ) {
859 si->si_flags &= ~LDAP_BACK_AUTH_DN_MASK;
860
861 } else if ( strcasecmp( flags[ j ], "dn-authzid" ) == 0 ) {
862 si->si_flags &= ~LDAP_BACK_AUTH_DN_MASK;
863 si->si_flags |= LDAP_BACK_AUTH_DN_AUTHZID;
864
865 } else if ( strcasecmp( flags[ j ], "dn-whoami" ) == 0 ) {
866 si->si_flags &= ~LDAP_BACK_AUTH_DN_MASK;
867 si->si_flags |= LDAP_BACK_AUTH_DN_WHOAMI;
868
869 } else {
870 snprintf( c->cr_msg, sizeof( c->cr_msg ),
871 "\"%s <args>\": "
872 "unknown flag \"%s\"",
873 c->argv[0], flags[ j ] );
874 Debug( LDAP_DEBUG_ANY, "%s: %s.\n", c->log, c->cr_msg );
875 err = 1;
876 break;
877 }
878 }
879
880 ldap_charray_free( flags );
881 if ( err ) {
882 return 1;
883 }
884
885 } else if ( bindconf_parse( c->argv[ i ], &si->si_bc ) ) {
886 snprintf( c->cr_msg, sizeof( c->cr_msg ),
887 "\"%s <args>\": "
888 "unable to parse field \"%s\"",
889 c->argv[0], c->argv[ i ] );
890 Debug( LDAP_DEBUG_ANY, "%s: %s.\n", c->log, c->cr_msg );
891 return 1;
892 }
893 }
894
895 if ( si->si_bc.sb_method == LDAP_AUTH_SIMPLE ) {
896 if ( BER_BVISNULL( &si->si_bc.sb_binddn )
897 || BER_BVISNULL( &si->si_bc.sb_cred ) )
898 {
899 snprintf( c->cr_msg, sizeof( c->cr_msg ),
900 "\"%s <args>\": "
901 "SIMPLE needs \"binddn\" and \"credentials\"", c->argv[0] );
902 Debug( LDAP_DEBUG_ANY, "%s: %s.\n", c->log, c->cr_msg );
903 return 1;
904 }
905
906 } else if ( si->si_bc.sb_method == LDAP_AUTH_SASL ) {
907 if ( BER_BVISNULL( &si->si_bc.sb_binddn ) &&
908 !(si->si_flags & LDAP_BACK_AUTH_DN_MASK) )
909 {
910 static struct berval authid = BER_BVC("cn=auth");
911 ber_dupbv( &si->si_bc.sb_binddn, &authid );
912 }
913 }
914
915 bindconf_tls_defaults( &si->si_bc );
916 #ifdef HAVE_TLS
917 if ( si->si_bc.sb_tls_ctx ) {
918 ldap_pvt_tls_ctx_free( si->si_bc.sb_tls_ctx );
919 si->si_bc.sb_tls_ctx = NULL;
920 }
921 #endif
922
923 return 0;
924 }
925
926 /* NOTE: temporary, until back-meta is ported to back-config */
927 int
slap_idassert_passthru_parse_cf(const char * fname,int lineno,const char * arg,slap_idassert_t * si)928 slap_idassert_passthru_parse_cf( const char *fname, int lineno, const char *arg, slap_idassert_t *si )
929 {
930 ConfigArgs c = { 0 };
931 char *argv[ 3 ];
932
933 snprintf( c.log, sizeof( c.log ), "%s: line %d", fname, lineno );
934 c.argc = 2;
935 c.argv = argv;
936 argv[ 0 ] = "idassert-passThru";
937 argv[ 1 ] = (char *)arg;
938 argv[ 2 ] = NULL;
939
940 return slap_idassert_passthru_parse( &c, si );
941 }
942
943 static int
ldap_back_cf_gen(ConfigArgs * c)944 ldap_back_cf_gen( ConfigArgs *c )
945 {
946 ldapinfo_t *li = ( ldapinfo_t * )c->be->be_private;
947 int rc = 0;
948 int i;
949
950 if ( c->op == SLAP_CONFIG_EMIT ) {
951 struct berval bv = BER_BVNULL;
952
953 if ( li == NULL ) {
954 return 1;
955 }
956
957 switch( c->type ) {
958 case LDAP_BACK_CFG_URI:
959 if ( li->li_uri != NULL ) {
960 struct berval bv, bv2;
961
962 ber_str2bv( li->li_uri, 0, 0, &bv );
963 bv2.bv_len = bv.bv_len + STRLENOF( "\"\"" );
964 bv2.bv_val = ch_malloc( bv2.bv_len + 1 );
965 snprintf( bv2.bv_val, bv2.bv_len + 1,
966 "\"%s\"", bv.bv_val );
967 ber_bvarray_add( &c->rvalue_vals, &bv2 );
968
969 } else {
970 rc = 1;
971 }
972 break;
973
974 case LDAP_BACK_CFG_TLS: {
975 struct berval bc = BER_BVNULL, bv2;
976 enum_to_verb( tls_mode, ( li->li_flags & LDAP_BACK_F_TLS_MASK ), &bv );
977 assert( !BER_BVISNULL( &bv ) );
978 bindconf_tls_unparse( &li->li_tls, &bc );
979
980 if ( !BER_BVISEMPTY( &bc )) {
981 bv2.bv_len = bv.bv_len + bc.bv_len + 1;
982 bv2.bv_val = ch_malloc( bv2.bv_len + 1 );
983 strcpy( bv2.bv_val, bv.bv_val );
984 bv2.bv_val[bv.bv_len] = ' ';
985 strcpy( &bv2.bv_val[bv.bv_len + 1], bc.bv_val );
986 ber_bvarray_add( &c->rvalue_vals, &bv2 );
987
988 } else {
989 value_add_one( &c->rvalue_vals, &bv );
990 }
991 ber_memfree( bc.bv_val );
992 }
993 break;
994
995 case LDAP_BACK_CFG_ACL_BIND: {
996 int i;
997
998 if ( li->li_acl_authmethod == LDAP_AUTH_NONE ) {
999 return 1;
1000 }
1001
1002 bindconf_unparse( &li->li_acl, &bv );
1003
1004 for ( i = 0; isspace( (unsigned char) bv.bv_val[ i ] ); i++ )
1005 /* count spaces */ ;
1006
1007 if ( i ) {
1008 bv.bv_len -= i;
1009 AC_MEMCPY( bv.bv_val, &bv.bv_val[ i ],
1010 bv.bv_len + 1 );
1011 }
1012
1013 ber_bvarray_add( &c->rvalue_vals, &bv );
1014 break;
1015 }
1016
1017 case LDAP_BACK_CFG_IDASSERT_AUTHZFROM:
1018 case LDAP_BACK_CFG_IDASSERT_PASSTHRU: {
1019 BerVarray *bvp;
1020 int i;
1021 struct berval bv = BER_BVNULL;
1022 char buf[SLAP_TEXT_BUFLEN];
1023
1024 switch ( c->type ) {
1025 case LDAP_BACK_CFG_IDASSERT_AUTHZFROM: bvp = &li->li_idassert_authz; break;
1026 case LDAP_BACK_CFG_IDASSERT_PASSTHRU: bvp = &li->li_idassert_passthru; break;
1027 default: assert( 0 ); break;
1028 }
1029
1030 if ( *bvp == NULL ) {
1031 if ( bvp == &li->li_idassert_authz
1032 && ( li->li_idassert_flags & LDAP_BACK_AUTH_AUTHZ_ALL ) )
1033 {
1034 BER_BVSTR( &bv, "*" );
1035 value_add_one( &c->rvalue_vals, &bv );
1036
1037 } else {
1038 rc = 1;
1039 }
1040 break;
1041 }
1042
1043 for ( i = 0; !BER_BVISNULL( &((*bvp)[ i ]) ); i++ ) {
1044 char *ptr;
1045 int len = snprintf( buf, sizeof( buf ), SLAP_X_ORDERED_FMT, i );
1046 bv.bv_len = ((*bvp)[ i ]).bv_len + len;
1047 bv.bv_val = ber_memrealloc( bv.bv_val, bv.bv_len + 1 );
1048 ptr = bv.bv_val;
1049 ptr = lutil_strcopy( ptr, buf );
1050 ptr = lutil_strncopy( ptr, ((*bvp)[ i ]).bv_val, ((*bvp)[ i ]).bv_len );
1051 value_add_one( &c->rvalue_vals, &bv );
1052 }
1053 if ( bv.bv_val ) {
1054 ber_memfree( bv.bv_val );
1055 }
1056 break;
1057 }
1058
1059 case LDAP_BACK_CFG_IDASSERT_BIND: {
1060 int i;
1061 struct berval bc = BER_BVNULL;
1062 char *ptr;
1063
1064 if ( li->li_idassert_authmethod == LDAP_AUTH_NONE ) {
1065 return 1;
1066 }
1067
1068 if ( li->li_idassert_authmethod != LDAP_AUTH_NONE ) {
1069 ber_len_t len;
1070
1071 switch ( li->li_idassert_mode ) {
1072 case LDAP_BACK_IDASSERT_OTHERID:
1073 case LDAP_BACK_IDASSERT_OTHERDN:
1074 break;
1075
1076 default: {
1077 struct berval mode = BER_BVNULL;
1078
1079 enum_to_verb( idassert_mode, li->li_idassert_mode, &mode );
1080 if ( BER_BVISNULL( &mode ) ) {
1081 /* there's something wrong... */
1082 assert( 0 );
1083 rc = 1;
1084
1085 } else {
1086 bv.bv_len = STRLENOF( "mode=" ) + mode.bv_len;
1087 bv.bv_val = ch_malloc( bv.bv_len + 1 );
1088
1089 ptr = lutil_strcopy( bv.bv_val, "mode=" );
1090 ptr = lutil_strcopy( ptr, mode.bv_val );
1091 }
1092 break;
1093 }
1094 }
1095
1096 if ( li->li_idassert_flags & LDAP_BACK_AUTH_NATIVE_AUTHZ ) {
1097 len = bv.bv_len + STRLENOF( "authz=native" );
1098
1099 if ( !BER_BVISEMPTY( &bv ) ) {
1100 len += STRLENOF( " " );
1101 }
1102
1103 bv.bv_val = ch_realloc( bv.bv_val, len + 1 );
1104
1105 ptr = &bv.bv_val[ bv.bv_len ];
1106
1107 if ( !BER_BVISEMPTY( &bv ) ) {
1108 ptr = lutil_strcopy( ptr, " " );
1109 }
1110
1111 (void)lutil_strcopy( ptr, "authz=native" );
1112 }
1113
1114 len = bv.bv_len + STRLENOF( "flags=non-prescriptive,override,obsolete-encoding-workaround,proxy-authz-non-critical,dn-authzid" );
1115 /* flags */
1116 if ( !BER_BVISEMPTY( &bv ) ) {
1117 len += STRLENOF( " " );
1118 }
1119
1120 bv.bv_val = ch_realloc( bv.bv_val, len + 1 );
1121
1122 ptr = &bv.bv_val[ bv.bv_len ];
1123
1124 if ( !BER_BVISEMPTY( &bv ) ) {
1125 ptr = lutil_strcopy( ptr, " " );
1126 }
1127
1128 ptr = lutil_strcopy( ptr, "flags=" );
1129
1130 if ( li->li_idassert_flags & LDAP_BACK_AUTH_PRESCRIPTIVE ) {
1131 ptr = lutil_strcopy( ptr, "prescriptive" );
1132 } else {
1133 ptr = lutil_strcopy( ptr, "non-prescriptive" );
1134 }
1135
1136 if ( li->li_idassert_flags & LDAP_BACK_AUTH_OVERRIDE ) {
1137 ptr = lutil_strcopy( ptr, ",override" );
1138 }
1139
1140 if ( li->li_idassert_flags & LDAP_BACK_AUTH_OBSOLETE_PROXY_AUTHZ ) {
1141 ptr = lutil_strcopy( ptr, ",obsolete-proxy-authz" );
1142
1143 } else if ( li->li_idassert_flags & LDAP_BACK_AUTH_OBSOLETE_ENCODING_WORKAROUND ) {
1144 ptr = lutil_strcopy( ptr, ",obsolete-encoding-workaround" );
1145 }
1146
1147 if ( li->li_idassert_flags & LDAP_BACK_AUTH_PROXYAUTHZ_CRITICAL ) {
1148 ptr = lutil_strcopy( ptr, ",proxy-authz-critical" );
1149
1150 } else {
1151 ptr = lutil_strcopy( ptr, ",proxy-authz-non-critical" );
1152 }
1153
1154 switch ( li->li_idassert_flags & LDAP_BACK_AUTH_DN_MASK ) {
1155 case LDAP_BACK_AUTH_DN_AUTHZID:
1156 ptr = lutil_strcopy( ptr, ",dn-authzid" );
1157 break;
1158
1159 case LDAP_BACK_AUTH_DN_WHOAMI:
1160 ptr = lutil_strcopy( ptr, ",dn-whoami" );
1161 break;
1162
1163 default:
1164 #if 0 /* implicit */
1165 ptr = lutil_strcopy( ptr, ",dn-none" );
1166 #endif
1167 break;
1168 }
1169
1170 bv.bv_len = ( ptr - bv.bv_val );
1171 /* end-of-flags */
1172 }
1173
1174 bindconf_unparse( &li->li_idassert.si_bc, &bc );
1175
1176 if ( !BER_BVISNULL( &bv ) ) {
1177 ber_len_t len = bv.bv_len + bc.bv_len;
1178
1179 bv.bv_val = ch_realloc( bv.bv_val, len + 1 );
1180
1181 assert( bc.bv_val[ 0 ] == ' ' );
1182
1183 ptr = lutil_strcopy( &bv.bv_val[ bv.bv_len ], bc.bv_val );
1184 free( bc.bv_val );
1185 bv.bv_len = ptr - bv.bv_val;
1186
1187 } else {
1188 for ( i = 0; isspace( (unsigned char) bc.bv_val[ i ] ); i++ )
1189 /* count spaces */ ;
1190
1191 if ( i ) {
1192 bc.bv_len -= i;
1193 AC_MEMCPY( bc.bv_val, &bc.bv_val[ i ], bc.bv_len + 1 );
1194 }
1195
1196 bv = bc;
1197 }
1198
1199 ber_bvarray_add( &c->rvalue_vals, &bv );
1200
1201 break;
1202 }
1203
1204 case LDAP_BACK_CFG_REBIND:
1205 c->value_int = LDAP_BACK_SAVECRED( li );
1206 break;
1207
1208 case LDAP_BACK_CFG_CHASE:
1209 c->value_int = LDAP_BACK_CHASE_REFERRALS( li );
1210 break;
1211
1212 case LDAP_BACK_CFG_T_F:
1213 enum_to_verb( t_f_mode, (li->li_flags & LDAP_BACK_F_T_F_MASK2), &bv );
1214 if ( BER_BVISNULL( &bv ) ) {
1215 /* there's something wrong... */
1216 assert( 0 );
1217 rc = 1;
1218
1219 } else {
1220 value_add_one( &c->rvalue_vals, &bv );
1221 }
1222 break;
1223
1224 case LDAP_BACK_CFG_WHOAMI:
1225 c->value_int = LDAP_BACK_PROXY_WHOAMI( li );
1226 break;
1227
1228 case LDAP_BACK_CFG_TIMEOUT:
1229 BER_BVZERO( &bv );
1230
1231 for ( i = 0; i < SLAP_OP_LAST; i++ ) {
1232 if ( li->li_timeout[ i ] != 0 ) {
1233 break;
1234 }
1235 }
1236
1237 if ( i == SLAP_OP_LAST ) {
1238 return 1;
1239 }
1240
1241 slap_cf_aux_table_unparse( li->li_timeout, &bv, timeout_table );
1242
1243 if ( BER_BVISNULL( &bv ) ) {
1244 return 1;
1245 }
1246
1247 for ( i = 0; isspace( (unsigned char) bv.bv_val[ i ] ); i++ )
1248 /* count spaces */ ;
1249
1250 if ( i ) {
1251 bv.bv_len -= i;
1252 AC_MEMCPY( bv.bv_val, &bv.bv_val[ i ],
1253 bv.bv_len + 1 );
1254 }
1255
1256 ber_bvarray_add( &c->rvalue_vals, &bv );
1257 break;
1258
1259 case LDAP_BACK_CFG_IDLE_TIMEOUT: {
1260 char buf[ SLAP_TEXT_BUFLEN ];
1261
1262 if ( li->li_idle_timeout == 0 ) {
1263 return 1;
1264 }
1265
1266 lutil_unparse_time( buf, sizeof( buf ), li->li_idle_timeout );
1267 ber_str2bv( buf, 0, 0, &bv );
1268 value_add_one( &c->rvalue_vals, &bv );
1269 } break;
1270
1271 case LDAP_BACK_CFG_CONN_TTL: {
1272 char buf[ SLAP_TEXT_BUFLEN ];
1273
1274 if ( li->li_conn_ttl == 0 ) {
1275 return 1;
1276 }
1277
1278 lutil_unparse_time( buf, sizeof( buf ), li->li_conn_ttl );
1279 ber_str2bv( buf, 0, 0, &bv );
1280 value_add_one( &c->rvalue_vals, &bv );
1281 } break;
1282
1283 case LDAP_BACK_CFG_NETWORK_TIMEOUT: {
1284 char buf[ SLAP_TEXT_BUFLEN ];
1285
1286 if ( li->li_network_timeout == 0 ) {
1287 return 1;
1288 }
1289
1290 lutil_unparse_time( buf, sizeof( buf ), li->li_network_timeout );
1291 ber_str2bv( buf, 0, 0, &bv );
1292 value_add_one( &c->rvalue_vals, &bv );
1293 } break;
1294
1295 case LDAP_BACK_CFG_VERSION:
1296 if ( li->li_version == 0 ) {
1297 return 1;
1298 }
1299
1300 c->value_int = li->li_version;
1301 break;
1302
1303 case LDAP_BACK_CFG_SINGLECONN:
1304 c->value_int = LDAP_BACK_SINGLECONN( li );
1305 break;
1306
1307 case LDAP_BACK_CFG_USETEMP:
1308 c->value_int = LDAP_BACK_USE_TEMPORARIES( li );
1309 break;
1310
1311 case LDAP_BACK_CFG_CONNPOOLMAX:
1312 c->value_int = li->li_conn_priv_max;
1313 break;
1314
1315 case LDAP_BACK_CFG_CANCEL: {
1316 slap_mask_t mask = LDAP_BACK_F_CANCEL_MASK2;
1317
1318 if ( LDAP_BACK_CANCEL_DISCOVER( li ) ) {
1319 mask &= ~LDAP_BACK_F_CANCEL_EXOP;
1320 }
1321 enum_to_verb( cancel_mode, (li->li_flags & mask), &bv );
1322 if ( BER_BVISNULL( &bv ) ) {
1323 /* there's something wrong... */
1324 assert( 0 );
1325 rc = 1;
1326
1327 } else {
1328 value_add_one( &c->rvalue_vals, &bv );
1329 }
1330 } break;
1331
1332 case LDAP_BACK_CFG_QUARANTINE:
1333 if ( !LDAP_BACK_QUARANTINE( li ) ) {
1334 rc = 1;
1335 break;
1336 }
1337
1338 rc = slap_retry_info_unparse( &li->li_quarantine, &bv );
1339 if ( rc == 0 ) {
1340 ber_bvarray_add( &c->rvalue_vals, &bv );
1341 }
1342 break;
1343
1344 #ifdef SLAP_CONTROL_X_SESSION_TRACKING
1345 case LDAP_BACK_CFG_ST_REQUEST:
1346 c->value_int = LDAP_BACK_ST_REQUEST( li );
1347 break;
1348 #endif /* SLAP_CONTROL_X_SESSION_TRACKING */
1349
1350 case LDAP_BACK_CFG_NOREFS:
1351 c->value_int = LDAP_BACK_NOREFS( li );
1352 break;
1353
1354 case LDAP_BACK_CFG_NOUNDEFFILTER:
1355 c->value_int = LDAP_BACK_NOUNDEFFILTER( li );
1356 break;
1357
1358 case LDAP_BACK_CFG_OMIT_UNKNOWN_SCHEMA:
1359 c->value_int = LDAP_BACK_OMIT_UNKNOWN_SCHEMA( li );
1360 break;
1361
1362 case LDAP_BACK_CFG_ONERR:
1363 enum_to_verb( onerr_mode, li->li_flags & LDAP_BACK_F_ONERR_STOP, &bv );
1364 if ( BER_BVISNULL( &bv )) {
1365 rc = 1;
1366 } else {
1367 value_add_one( &c->rvalue_vals, &bv );
1368 }
1369 break;
1370
1371 case LDAP_BACK_CFG_KEEPALIVE: {
1372 struct berval bv;
1373 char buf[AC_LINE_MAX];
1374 bv.bv_len = AC_LINE_MAX;
1375 bv.bv_val = &buf[0];
1376 slap_keepalive_parse(&bv, &li->li_tls.sb_keepalive, 0, 0, 1);
1377 value_add_one( &c->rvalue_vals, &bv );
1378 break;
1379 }
1380
1381 case LDAP_BACK_CFG_TCP_USER_TIMEOUT:
1382 c->value_uint = li->li_tls.sb_tcp_user_timeout;
1383 break;
1384
1385 default:
1386 /* FIXME: we need to handle all... */
1387 assert( 0 );
1388 break;
1389 }
1390 return rc;
1391
1392 } else if ( c->op == LDAP_MOD_DELETE ) {
1393 switch( c->type ) {
1394 case LDAP_BACK_CFG_URI:
1395 if ( li->li_uri != NULL ) {
1396 ch_free( li->li_uri );
1397 li->li_uri = NULL;
1398
1399 assert( li->li_bvuri != NULL );
1400 ber_bvarray_free( li->li_bvuri );
1401 li->li_bvuri = NULL;
1402 }
1403
1404 /* better cleanup the cached connections... */
1405 /* NOTE: don't worry about locking: if we got here,
1406 * other threads are suspended. */
1407 if ( li->li_conninfo.lai_tree != NULL ) {
1408 ldap_tavl_free( li->li_conninfo.lai_tree, ldap_back_conn_free );
1409 li->li_conninfo.lai_tree = NULL;
1410 }
1411
1412 break;
1413
1414 case LDAP_BACK_CFG_TLS:
1415 rc = 1;
1416 break;
1417
1418 case LDAP_BACK_CFG_ACL_BIND:
1419 bindconf_free( &li->li_acl );
1420 break;
1421
1422 case LDAP_BACK_CFG_IDASSERT_AUTHZFROM:
1423 case LDAP_BACK_CFG_IDASSERT_PASSTHRU: {
1424 BerVarray *bvp;
1425
1426 switch ( c->type ) {
1427 case LDAP_BACK_CFG_IDASSERT_AUTHZFROM: bvp = &li->li_idassert_authz; break;
1428 case LDAP_BACK_CFG_IDASSERT_PASSTHRU: bvp = &li->li_idassert_passthru; break;
1429 default: assert( 0 ); break;
1430 }
1431
1432 if ( c->valx < 0 ) {
1433 if ( *bvp != NULL ) {
1434 ber_bvarray_free( *bvp );
1435 *bvp = NULL;
1436 }
1437
1438 } else {
1439 int i;
1440
1441 if ( *bvp == NULL ) {
1442 rc = 1;
1443 break;
1444 }
1445
1446 for ( i = 0; !BER_BVISNULL( &((*bvp)[ i ]) ); i++ )
1447 ;
1448
1449 if ( i >= c->valx ) {
1450 rc = 1;
1451 break;
1452 }
1453 ber_memfree( ((*bvp)[ c->valx ]).bv_val );
1454 for ( i = c->valx; !BER_BVISNULL( &((*bvp)[ i + 1 ]) ); i++ ) {
1455 (*bvp)[ i ] = (*bvp)[ i + 1 ];
1456 }
1457 BER_BVZERO( &((*bvp)[ i ]) );
1458 }
1459 } break;
1460
1461 case LDAP_BACK_CFG_IDASSERT_BIND:
1462 bindconf_free( &li->li_idassert.si_bc );
1463 memset( &li->li_idassert, 0, sizeof( slap_idassert_t ) );
1464 break;
1465
1466 case LDAP_BACK_CFG_REBIND:
1467 case LDAP_BACK_CFG_CHASE:
1468 case LDAP_BACK_CFG_T_F:
1469 case LDAP_BACK_CFG_WHOAMI:
1470 case LDAP_BACK_CFG_CANCEL:
1471 rc = 1;
1472 break;
1473
1474 case LDAP_BACK_CFG_TIMEOUT:
1475 for ( i = 0; i < SLAP_OP_LAST; i++ ) {
1476 li->li_timeout[ i ] = 0;
1477 }
1478 break;
1479
1480 case LDAP_BACK_CFG_IDLE_TIMEOUT:
1481 li->li_idle_timeout = 0;
1482 break;
1483
1484 case LDAP_BACK_CFG_CONN_TTL:
1485 li->li_conn_ttl = 0;
1486 break;
1487
1488 case LDAP_BACK_CFG_NETWORK_TIMEOUT:
1489 li->li_network_timeout = 0;
1490 break;
1491
1492 case LDAP_BACK_CFG_VERSION:
1493 li->li_version = 0;
1494 break;
1495
1496 case LDAP_BACK_CFG_SINGLECONN:
1497 li->li_flags &= ~LDAP_BACK_F_SINGLECONN;
1498 break;
1499
1500 case LDAP_BACK_CFG_USETEMP:
1501 li->li_flags &= ~LDAP_BACK_F_USE_TEMPORARIES;
1502 break;
1503
1504 case LDAP_BACK_CFG_CONNPOOLMAX:
1505 li->li_conn_priv_max = LDAP_BACK_CONN_PRIV_MIN;
1506 break;
1507
1508 case LDAP_BACK_CFG_QUARANTINE:
1509 if ( !LDAP_BACK_QUARANTINE( li ) ) {
1510 break;
1511 }
1512
1513 slap_retry_info_destroy( &li->li_quarantine );
1514 ldap_pvt_thread_mutex_destroy( &li->li_quarantine_mutex );
1515 li->li_isquarantined = 0;
1516 li->li_flags &= ~LDAP_BACK_F_QUARANTINE;
1517 break;
1518
1519 #ifdef SLAP_CONTROL_X_SESSION_TRACKING
1520 case LDAP_BACK_CFG_ST_REQUEST:
1521 li->li_flags &= ~LDAP_BACK_F_ST_REQUEST;
1522 break;
1523 #endif /* SLAP_CONTROL_X_SESSION_TRACKING */
1524
1525 case LDAP_BACK_CFG_NOREFS:
1526 li->li_flags &= ~LDAP_BACK_F_NOREFS;
1527 break;
1528
1529 case LDAP_BACK_CFG_NOUNDEFFILTER:
1530 li->li_flags &= ~LDAP_BACK_F_NOUNDEFFILTER;
1531 break;
1532
1533 case LDAP_BACK_CFG_OMIT_UNKNOWN_SCHEMA:
1534 li->li_flags &= ~LDAP_BACK_F_OMIT_UNKNOWN_SCHEMA;
1535 break;
1536
1537 case LDAP_BACK_CFG_ONERR:
1538 li->li_flags &= ~LDAP_BACK_F_ONERR_STOP;
1539 break;
1540
1541 case LDAP_BACK_CFG_KEEPALIVE:
1542 li->li_tls.sb_keepalive.sk_idle = 0;
1543 li->li_tls.sb_keepalive.sk_probes = 0;
1544 li->li_tls.sb_keepalive.sk_interval = 0;
1545 break;
1546
1547 case LDAP_BACK_CFG_TCP_USER_TIMEOUT:
1548 li->li_tls.sb_tcp_user_timeout = 0;
1549 break;
1550
1551 default:
1552 /* FIXME: we need to handle all... */
1553 assert( 0 );
1554 break;
1555 }
1556 return rc;
1557
1558 }
1559
1560 switch( c->type ) {
1561 case LDAP_BACK_CFG_URI: {
1562 LDAPURLDesc *tmpludp, *lud;
1563 char **urllist = NULL;
1564 int urlrc = LDAP_URL_SUCCESS, i;
1565
1566 if ( li->li_uri != NULL ) {
1567 ch_free( li->li_uri );
1568 li->li_uri = NULL;
1569
1570 assert( li->li_bvuri != NULL );
1571 ber_bvarray_free( li->li_bvuri );
1572 li->li_bvuri = NULL;
1573 }
1574
1575 /* PARANOID: DN and more are not required nor allowed */
1576 urlrc = ldap_url_parselist_ext( &lud, c->argv[ 1 ], ", \t", LDAP_PVT_URL_PARSE_NONE );
1577 if ( urlrc != LDAP_URL_SUCCESS ) {
1578 char *why;
1579
1580 switch ( urlrc ) {
1581 case LDAP_URL_ERR_MEM:
1582 why = "no memory";
1583 break;
1584 case LDAP_URL_ERR_PARAM:
1585 why = "parameter is bad";
1586 break;
1587 case LDAP_URL_ERR_BADSCHEME:
1588 why = "URL doesn't begin with \"[c]ldap[si]://\"";
1589 break;
1590 case LDAP_URL_ERR_BADENCLOSURE:
1591 why = "URL is missing trailing \">\"";
1592 break;
1593 case LDAP_URL_ERR_BADURL:
1594 why = "URL is bad";
1595 break;
1596 case LDAP_URL_ERR_BADHOST:
1597 why = "host/port is bad";
1598 break;
1599 case LDAP_URL_ERR_BADATTRS:
1600 why = "bad (or missing) attributes";
1601 break;
1602 case LDAP_URL_ERR_BADSCOPE:
1603 why = "scope string is invalid (or missing)";
1604 break;
1605 case LDAP_URL_ERR_BADFILTER:
1606 why = "bad or missing filter";
1607 break;
1608 case LDAP_URL_ERR_BADEXTS:
1609 why = "bad or missing extensions";
1610 break;
1611 default:
1612 why = "unknown reason";
1613 break;
1614 }
1615 snprintf( c->cr_msg, sizeof( c->cr_msg),
1616 "unable to parse uri \"%s\" "
1617 "in \"uri <uri>\" line: %s",
1618 c->value_string, why );
1619 Debug( LDAP_DEBUG_ANY, "%s: %s.\n", c->log, c->cr_msg );
1620 urlrc = 1;
1621 goto done_url;
1622 }
1623
1624 for ( i = 0, tmpludp = lud;
1625 tmpludp;
1626 i++, tmpludp = tmpludp->lud_next )
1627 {
1628 if ( ( tmpludp->lud_dn != NULL
1629 && tmpludp->lud_dn[0] != '\0' )
1630 || tmpludp->lud_attrs != NULL
1631 /* || tmpludp->lud_scope != LDAP_SCOPE_DEFAULT */
1632 || tmpludp->lud_filter != NULL
1633 || tmpludp->lud_exts != NULL )
1634 {
1635 snprintf( c->cr_msg, sizeof( c->cr_msg ),
1636 "warning, only protocol, "
1637 "host and port allowed "
1638 "in \"uri <uri>\" statement "
1639 "for uri #%d of \"%s\"",
1640 i, c->argv[ 1 ] );
1641 Debug( LDAP_DEBUG_ANY, "%s: %s.\n", c->log, c->cr_msg );
1642 }
1643 }
1644
1645 for ( i = 0, tmpludp = lud;
1646 tmpludp;
1647 i++, tmpludp = tmpludp->lud_next )
1648 /* just count */
1649 ;
1650 urllist = ch_calloc( sizeof( char * ), i + 1 );
1651
1652 for ( i = 0, tmpludp = lud;
1653 tmpludp;
1654 i++, tmpludp = tmpludp->lud_next )
1655 {
1656 LDAPURLDesc tmplud;
1657
1658 tmplud = *tmpludp;
1659 tmplud.lud_dn = "";
1660 tmplud.lud_attrs = NULL;
1661 tmplud.lud_filter = NULL;
1662 if ( !ldap_is_ldapi_url( tmplud.lud_scheme ) ) {
1663 tmplud.lud_exts = NULL;
1664 tmplud.lud_crit_exts = 0;
1665 }
1666
1667 urllist[ i ] = ldap_url_desc2str( &tmplud );
1668
1669 if ( urllist[ i ] == NULL ) {
1670 snprintf( c->cr_msg, sizeof( c->cr_msg),
1671 "unable to rebuild uri "
1672 "in \"uri <uri>\" statement "
1673 "for \"%s\"",
1674 c->argv[ 1 ] );
1675 Debug( LDAP_DEBUG_ANY, "%s: %s.\n", c->log, c->cr_msg );
1676 urlrc = 1;
1677 goto done_url;
1678 }
1679 }
1680
1681 li->li_uri = ldap_charray2str( urllist, " " );
1682 for ( i = 0; urllist[ i ] != NULL; i++ ) {
1683 struct berval bv;
1684
1685 ber_str2bv( urllist[ i ], 0, 0, &bv );
1686 ber_bvarray_add( &li->li_bvuri, &bv );
1687 urllist[ i ] = NULL;
1688 }
1689 ldap_memfree( urllist );
1690 urllist = NULL;
1691
1692 done_url:;
1693 if ( urllist ) {
1694 ldap_charray_free( urllist );
1695 }
1696 if ( lud ) {
1697 ldap_free_urllist( lud );
1698 }
1699 if ( urlrc != LDAP_URL_SUCCESS ) {
1700 return 1;
1701 }
1702 break;
1703 }
1704
1705 case LDAP_BACK_CFG_TLS:
1706 i = verb_to_mask( c->argv[1], tls_mode );
1707 if ( BER_BVISNULL( &tls_mode[i].word ) ) {
1708 return 1;
1709 }
1710 li->li_flags &= ~LDAP_BACK_F_TLS_MASK;
1711 li->li_flags |= tls_mode[i].mask;
1712 if ( c->argc > 2 ) {
1713 for ( i=2; i<c->argc; i++ ) {
1714 if ( bindconf_tls_parse( c->argv[i], &li->li_tls ))
1715 return 1;
1716 }
1717 bindconf_tls_defaults( &li->li_tls );
1718 }
1719 #ifdef HAVE_TLS
1720 if ( li->li_tls.sb_tls_ctx ) {
1721 ldap_pvt_tls_ctx_free( li->li_tls.sb_tls_ctx );
1722 li->li_tls.sb_tls_ctx = NULL;
1723 }
1724 #endif
1725 break;
1726
1727 case LDAP_BACK_CFG_ACL_BIND:
1728 for ( i = 1; i < c->argc; i++ ) {
1729 if ( bindconf_parse( c->argv[ i ], &li->li_acl ) ) {
1730 return 1;
1731 }
1732 }
1733 bindconf_tls_defaults( &li->li_acl );
1734 #ifdef HAVE_TLS
1735 if ( li->li_acl.sb_tls_ctx ) {
1736 ldap_pvt_tls_ctx_free( li->li_acl.sb_tls_ctx );
1737 li->li_acl.sb_tls_ctx = NULL;
1738 }
1739 #endif
1740 break;
1741
1742 case LDAP_BACK_CFG_IDASSERT_AUTHZFROM:
1743 rc = slap_idassert_authzfrom_parse( c, &li->li_idassert );
1744 break;
1745
1746 case LDAP_BACK_CFG_IDASSERT_PASSTHRU:
1747 rc = slap_idassert_passthru_parse( c, &li->li_idassert );
1748 break;
1749
1750 case LDAP_BACK_CFG_IDASSERT_BIND:
1751 rc = slap_idassert_parse( c, &li->li_idassert );
1752 break;
1753
1754 case LDAP_BACK_CFG_REBIND:
1755 if ( c->argc == 1 || c->value_int ) {
1756 li->li_flags |= LDAP_BACK_F_SAVECRED;
1757
1758 } else {
1759 li->li_flags &= ~LDAP_BACK_F_SAVECRED;
1760 }
1761 break;
1762
1763 case LDAP_BACK_CFG_CHASE:
1764 if ( c->argc == 1 || c->value_int ) {
1765 li->li_flags |= LDAP_BACK_F_CHASE_REFERRALS;
1766
1767 } else {
1768 li->li_flags &= ~LDAP_BACK_F_CHASE_REFERRALS;
1769 }
1770 break;
1771
1772 case LDAP_BACK_CFG_T_F: {
1773 slap_mask_t mask;
1774
1775 i = verb_to_mask( c->argv[1], t_f_mode );
1776 if ( BER_BVISNULL( &t_f_mode[i].word ) ) {
1777 return 1;
1778 }
1779
1780 mask = t_f_mode[i].mask;
1781
1782 if ( LDAP_BACK_ISOPEN( li )
1783 && mask == LDAP_BACK_F_T_F_DISCOVER
1784 && !LDAP_BACK_T_F( li ) )
1785 {
1786 slap_bindconf sb = { BER_BVNULL };
1787 int rc;
1788
1789 if ( li->li_uri == NULL ) {
1790 snprintf( c->cr_msg, sizeof( c->cr_msg ),
1791 "need URI to discover absolute filters support "
1792 "in \"t-f-support discover\"" );
1793 Debug( LDAP_DEBUG_ANY, "%s: %s.\n", c->log, c->cr_msg );
1794 return 1;
1795 }
1796
1797 ber_str2bv( li->li_uri, 0, 0, &sb.sb_uri );
1798 sb.sb_version = li->li_version;
1799 sb.sb_method = LDAP_AUTH_SIMPLE;
1800 BER_BVSTR( &sb.sb_binddn, "" );
1801
1802 rc = slap_discover_feature( &sb,
1803 slap_schema.si_ad_supportedFeatures->ad_cname.bv_val,
1804 LDAP_FEATURE_ABSOLUTE_FILTERS );
1805 if ( rc == LDAP_COMPARE_TRUE ) {
1806 mask |= LDAP_BACK_F_T_F;
1807 }
1808 }
1809
1810 li->li_flags &= ~LDAP_BACK_F_T_F_MASK2;
1811 li->li_flags |= mask;
1812 } break;
1813
1814 case LDAP_BACK_CFG_WHOAMI:
1815 if ( c->argc == 1 || c->value_int ) {
1816 li->li_flags |= LDAP_BACK_F_PROXY_WHOAMI;
1817 load_extop( (struct berval *)&slap_EXOP_WHOAMI,
1818 0, ldap_back_exop_whoami );
1819
1820 } else {
1821 li->li_flags &= ~LDAP_BACK_F_PROXY_WHOAMI;
1822 }
1823 break;
1824
1825 case LDAP_BACK_CFG_TIMEOUT:
1826 for ( i = 1; i < c->argc; i++ ) {
1827 if ( isdigit( (unsigned char) c->argv[ i ][ 0 ] ) ) {
1828 int j;
1829 unsigned u;
1830
1831 if ( lutil_atoux( &u, c->argv[ i ], 0 ) != 0 ) {
1832 snprintf( c->cr_msg, sizeof( c->cr_msg),
1833 "unable to parse timeout \"%s\"",
1834 c->argv[ i ] );
1835 Debug( LDAP_DEBUG_ANY, "%s: %s.\n", c->log, c->cr_msg );
1836 return 1;
1837 }
1838
1839 for ( j = 0; j < SLAP_OP_LAST; j++ ) {
1840 li->li_timeout[ j ] = u;
1841 }
1842
1843 continue;
1844 }
1845
1846 if ( slap_cf_aux_table_parse( c->argv[ i ], li->li_timeout, timeout_table, "slapd-ldap timeout" ) ) {
1847 snprintf( c->cr_msg, sizeof( c->cr_msg),
1848 "unable to parse timeout \"%s\"",
1849 c->argv[ i ] );
1850 Debug( LDAP_DEBUG_ANY, "%s: %s.\n", c->log, c->cr_msg );
1851 return 1;
1852 }
1853 }
1854 break;
1855
1856 case LDAP_BACK_CFG_IDLE_TIMEOUT: {
1857 unsigned long t;
1858
1859 if ( lutil_parse_time( c->argv[ 1 ], &t ) != 0 ) {
1860 snprintf( c->cr_msg, sizeof( c->cr_msg),
1861 "unable to parse idle timeout \"%s\"",
1862 c->argv[ 1 ] );
1863 Debug( LDAP_DEBUG_ANY, "%s: %s.\n", c->log, c->cr_msg );
1864 return 1;
1865 }
1866 li->li_idle_timeout = (time_t)t;
1867 } break;
1868
1869 case LDAP_BACK_CFG_CONN_TTL: {
1870 unsigned long t;
1871
1872 if ( lutil_parse_time( c->argv[ 1 ], &t ) != 0 ) {
1873 snprintf( c->cr_msg, sizeof( c->cr_msg),
1874 "unable to parse conn ttl\"%s\"",
1875 c->argv[ 1 ] );
1876 Debug( LDAP_DEBUG_ANY, "%s: %s.\n", c->log, c->cr_msg );
1877 return 1;
1878 }
1879 li->li_conn_ttl = (time_t)t;
1880 } break;
1881
1882 case LDAP_BACK_CFG_NETWORK_TIMEOUT: {
1883 unsigned long t;
1884
1885 if ( lutil_parse_time( c->argv[ 1 ], &t ) != 0 ) {
1886 snprintf( c->cr_msg, sizeof( c->cr_msg),
1887 "unable to parse network timeout \"%s\"",
1888 c->argv[ 1 ] );
1889 Debug( LDAP_DEBUG_ANY, "%s: %s.\n", c->log, c->cr_msg );
1890 return 1;
1891 }
1892 li->li_network_timeout = (time_t)t;
1893 } break;
1894
1895 case LDAP_BACK_CFG_VERSION:
1896 if ( c->value_int != 0 && ( c->value_int < LDAP_VERSION_MIN || c->value_int > LDAP_VERSION_MAX ) ) {
1897 snprintf( c->cr_msg, sizeof( c->cr_msg ),
1898 "unsupported version \"%s\" "
1899 "in \"protocol-version <version>\"",
1900 c->argv[ 1 ] );
1901 Debug( LDAP_DEBUG_ANY, "%s: %s.\n", c->log, c->cr_msg );
1902 return 1;
1903 }
1904
1905 li->li_version = c->value_int;
1906 break;
1907
1908 case LDAP_BACK_CFG_SINGLECONN:
1909 if ( c->value_int ) {
1910 li->li_flags |= LDAP_BACK_F_SINGLECONN;
1911
1912 } else {
1913 li->li_flags &= ~LDAP_BACK_F_SINGLECONN;
1914 }
1915 break;
1916
1917 case LDAP_BACK_CFG_USETEMP:
1918 if ( c->value_int ) {
1919 li->li_flags |= LDAP_BACK_F_USE_TEMPORARIES;
1920
1921 } else {
1922 li->li_flags &= ~LDAP_BACK_F_USE_TEMPORARIES;
1923 }
1924 break;
1925
1926 case LDAP_BACK_CFG_CONNPOOLMAX:
1927 if ( c->value_int < LDAP_BACK_CONN_PRIV_MIN
1928 || c->value_int > LDAP_BACK_CONN_PRIV_MAX )
1929 {
1930 snprintf( c->cr_msg, sizeof( c->cr_msg ),
1931 "invalid max size " "of privileged "
1932 "connections pool \"%s\" "
1933 "in \"conn-pool-max <n> "
1934 "(must be between %d and %d)\"",
1935 c->argv[ 1 ],
1936 LDAP_BACK_CONN_PRIV_MIN,
1937 LDAP_BACK_CONN_PRIV_MAX );
1938 Debug( LDAP_DEBUG_ANY, "%s: %s.\n", c->log, c->cr_msg );
1939 return 1;
1940 }
1941 li->li_conn_priv_max = c->value_int;
1942 break;
1943
1944 case LDAP_BACK_CFG_CANCEL: {
1945 slap_mask_t mask;
1946
1947 i = verb_to_mask( c->argv[1], cancel_mode );
1948 if ( BER_BVISNULL( &cancel_mode[i].word ) ) {
1949 return 1;
1950 }
1951
1952 mask = cancel_mode[i].mask;
1953
1954 if ( LDAP_BACK_ISOPEN( li )
1955 && mask == LDAP_BACK_F_CANCEL_EXOP_DISCOVER
1956 && !LDAP_BACK_CANCEL( li ) )
1957 {
1958 slap_bindconf sb = { BER_BVNULL };
1959 int rc;
1960
1961 if ( li->li_uri == NULL ) {
1962 snprintf( c->cr_msg, sizeof( c->cr_msg ),
1963 "need URI to discover \"cancel\" support "
1964 "in \"cancel exop-discover\"" );
1965 Debug( LDAP_DEBUG_ANY, "%s: %s.\n", c->log, c->cr_msg );
1966 return 1;
1967 }
1968
1969 ber_str2bv( li->li_uri, 0, 0, &sb.sb_uri );
1970 sb.sb_version = li->li_version;
1971 sb.sb_method = LDAP_AUTH_SIMPLE;
1972 BER_BVSTR( &sb.sb_binddn, "" );
1973
1974 rc = slap_discover_feature( &sb,
1975 slap_schema.si_ad_supportedExtension->ad_cname.bv_val,
1976 LDAP_EXOP_CANCEL );
1977 if ( rc == LDAP_COMPARE_TRUE ) {
1978 mask |= LDAP_BACK_F_CANCEL_EXOP;
1979 }
1980 }
1981
1982 li->li_flags &= ~LDAP_BACK_F_CANCEL_MASK2;
1983 li->li_flags |= mask;
1984 } break;
1985
1986 case LDAP_BACK_CFG_QUARANTINE:
1987 if ( LDAP_BACK_QUARANTINE( li ) ) {
1988 snprintf( c->cr_msg, sizeof( c->cr_msg ),
1989 "quarantine already defined" );
1990 Debug( LDAP_DEBUG_ANY, "%s: %s.\n", c->log, c->cr_msg );
1991 return 1;
1992 }
1993 rc = slap_retry_info_parse( c->argv[1], &li->li_quarantine,
1994 c->cr_msg, sizeof( c->cr_msg ) );
1995 if ( rc ) {
1996 Debug( LDAP_DEBUG_ANY, "%s: %s.\n", c->log, c->cr_msg );
1997
1998 } else {
1999 ldap_pvt_thread_mutex_init( &li->li_quarantine_mutex );
2000 /* give it a chance to retry if the pattern gets reset
2001 * via back-config */
2002 li->li_isquarantined = 0;
2003 li->li_flags |= LDAP_BACK_F_QUARANTINE;
2004 }
2005 break;
2006
2007 #ifdef SLAP_CONTROL_X_SESSION_TRACKING
2008 case LDAP_BACK_CFG_ST_REQUEST:
2009 if ( c->value_int ) {
2010 li->li_flags |= LDAP_BACK_F_ST_REQUEST;
2011
2012 } else {
2013 li->li_flags &= ~LDAP_BACK_F_ST_REQUEST;
2014 }
2015 break;
2016 #endif /* SLAP_CONTROL_X_SESSION_TRACKING */
2017
2018 case LDAP_BACK_CFG_NOREFS:
2019 if ( c->value_int ) {
2020 li->li_flags |= LDAP_BACK_F_NOREFS;
2021
2022 } else {
2023 li->li_flags &= ~LDAP_BACK_F_NOREFS;
2024 }
2025 break;
2026
2027 case LDAP_BACK_CFG_NOUNDEFFILTER:
2028 if ( c->value_int ) {
2029 li->li_flags |= LDAP_BACK_F_NOUNDEFFILTER;
2030
2031 } else {
2032 li->li_flags &= ~LDAP_BACK_F_NOUNDEFFILTER;
2033 }
2034 break;
2035
2036 case LDAP_BACK_CFG_ONERR:
2037 /* onerr? */
2038 i = verb_to_mask( c->argv[1], onerr_mode );
2039 if ( BER_BVISNULL( &onerr_mode[i].word ) ) {
2040 snprintf( c->cr_msg, sizeof( c->cr_msg ),
2041 "%s unknown argument \"%s\"",
2042 c->argv[0], c->argv[1] );
2043 Debug( LDAP_DEBUG_ANY, "%s: %s.\n", c->log, c->cr_msg );
2044 return 1;
2045 }
2046 li->li_flags &= ~LDAP_BACK_F_ONERR_STOP;
2047 li->li_flags |= onerr_mode[i].mask;
2048 break;
2049
2050 case LDAP_BACK_CFG_OMIT_UNKNOWN_SCHEMA:
2051 if ( c->value_int ) {
2052 li->li_flags |= LDAP_BACK_F_OMIT_UNKNOWN_SCHEMA;
2053
2054 } else {
2055 li->li_flags &= ~LDAP_BACK_F_OMIT_UNKNOWN_SCHEMA;
2056 }
2057 break;
2058
2059 case LDAP_BACK_CFG_KEEPALIVE:
2060 slap_keepalive_parse( ber_bvstrdup(c->argv[1]),
2061 &li->li_tls.sb_keepalive, 0, 0, 0);
2062 break;
2063
2064 case LDAP_BACK_CFG_TCP_USER_TIMEOUT:
2065 li->li_tls.sb_tcp_user_timeout = c->value_uint;
2066 break;
2067
2068 default:
2069 /* FIXME: try to catch inconsistencies */
2070 assert( 0 );
2071 break;
2072 }
2073
2074 return rc;
2075 }
2076
2077 int
ldap_back_init_cf(BackendInfo * bi)2078 ldap_back_init_cf( BackendInfo *bi )
2079 {
2080 int rc;
2081
2082 /* Make sure we don't exceed the bits reserved for userland */
2083 config_check_userland( LDAP_BACK_CFG_LAST );
2084
2085 bi->bi_cf_ocs = ldapocs;
2086
2087 rc = config_register_schema( ldapcfg, ldapocs );
2088 if ( rc ) {
2089 return rc;
2090 }
2091
2092 return 0;
2093 }
2094
2095 static int
ldap_pbind_cf_gen(ConfigArgs * c)2096 ldap_pbind_cf_gen( ConfigArgs *c )
2097 {
2098 slap_overinst *on = (slap_overinst *)c->bi;
2099 void *private = c->be->be_private;
2100 int rc;
2101
2102 c->be->be_private = on->on_bi.bi_private;
2103 rc = ldap_back_cf_gen( c );
2104 c->be->be_private = private;
2105 return rc;
2106 }
2107
2108 int
ldap_pbind_init_cf(BackendInfo * bi)2109 ldap_pbind_init_cf( BackendInfo *bi )
2110 {
2111 bi->bi_cf_ocs = pbindocs;
2112
2113 return config_register_schema( pbindcfg, pbindocs );
2114 }
2115
2116 static int
ldap_back_exop_whoami(Operation * op,SlapReply * rs)2117 ldap_back_exop_whoami(
2118 Operation *op,
2119 SlapReply *rs )
2120 {
2121 struct berval *bv = NULL;
2122
2123 if ( op->oq_extended.rs_reqdata != NULL ) {
2124 /* no request data should be provided */
2125 rs->sr_text = "no request data expected";
2126 return rs->sr_err = LDAP_PROTOCOL_ERROR;
2127 }
2128
2129 Debug( LDAP_DEBUG_STATS, "%s WHOAMI\n",
2130 op->o_log_prefix );
2131
2132 rs->sr_err = backend_check_restrictions( op, rs,
2133 (struct berval *)&slap_EXOP_WHOAMI );
2134 if( rs->sr_err != LDAP_SUCCESS ) return rs->sr_err;
2135
2136 /* if auth'd by back-ldap and request is proxied, forward it */
2137 if ( op->o_conn->c_authz_backend
2138 && !strcmp( op->o_conn->c_authz_backend->be_type, "ldap" )
2139 && !dn_match( &op->o_ndn, &op->o_conn->c_ndn ) )
2140 {
2141 ldapconn_t *lc = NULL;
2142 LDAPControl c, *ctrls[2] = {NULL, NULL};
2143 LDAPMessage *res;
2144 Operation op2 = *op;
2145 ber_int_t msgid;
2146 int doretry = 1;
2147 char *ptr;
2148
2149 ctrls[0] = &c;
2150 op2.o_ndn = op->o_conn->c_ndn;
2151 if ( !ldap_back_dobind( &lc, &op2, rs, LDAP_BACK_SENDERR ) ) {
2152 return -1;
2153 }
2154 c.ldctl_oid = LDAP_CONTROL_PROXY_AUTHZ;
2155 c.ldctl_iscritical = 1;
2156 c.ldctl_value.bv_val = op->o_tmpalloc(
2157 op->o_ndn.bv_len + STRLENOF( "dn:" ) + 1,
2158 op->o_tmpmemctx );
2159 c.ldctl_value.bv_len = op->o_ndn.bv_len + 3;
2160 ptr = c.ldctl_value.bv_val;
2161 ptr = lutil_strcopy( ptr, "dn:" );
2162 ptr = lutil_strncopy( ptr, op->o_ndn.bv_val, op->o_ndn.bv_len );
2163 ptr[ 0 ] = '\0';
2164
2165 retry:
2166 rs->sr_err = ldap_whoami( lc->lc_ld, ctrls, NULL, &msgid );
2167 if ( rs->sr_err == LDAP_SUCCESS ) {
2168 /* by now, make sure no timeout is used (ITS#6282) */
2169 struct timeval tv = { -1, 0 };
2170 if ( ldap_result( lc->lc_ld, msgid, LDAP_MSG_ALL, &tv, &res ) == -1 ) {
2171 ldap_get_option( lc->lc_ld, LDAP_OPT_ERROR_NUMBER,
2172 &rs->sr_err );
2173 if ( rs->sr_err == LDAP_SERVER_DOWN && doretry ) {
2174 doretry = 0;
2175 if ( ldap_back_retry( &lc, op, rs, LDAP_BACK_SENDERR ) ) {
2176 goto retry;
2177 }
2178 }
2179
2180 } else {
2181 /* NOTE: are we sure "bv" will be malloc'ed
2182 * with the appropriate memory? */
2183 rs->sr_err = ldap_parse_whoami( lc->lc_ld, res, &bv );
2184 ldap_msgfree(res);
2185 }
2186 }
2187 op->o_tmpfree( c.ldctl_value.bv_val, op->o_tmpmemctx );
2188 if ( rs->sr_err != LDAP_SUCCESS ) {
2189 rs->sr_err = slap_map_api2result( rs );
2190 }
2191
2192 if ( lc != NULL ) {
2193 ldap_back_release_conn( (ldapinfo_t *)op2.o_bd->be_private, lc );
2194 }
2195
2196 } else {
2197 /* else just do the same as before */
2198 bv = (struct berval *) ch_malloc( sizeof( struct berval ) );
2199 if ( !BER_BVISEMPTY( &op->o_dn ) ) {
2200 bv->bv_len = op->o_dn.bv_len + STRLENOF( "dn:" );
2201 bv->bv_val = ch_malloc( bv->bv_len + 1 );
2202 AC_MEMCPY( bv->bv_val, "dn:", STRLENOF( "dn:" ) );
2203 AC_MEMCPY( &bv->bv_val[ STRLENOF( "dn:" ) ], op->o_dn.bv_val,
2204 op->o_dn.bv_len );
2205 bv->bv_val[ bv->bv_len ] = '\0';
2206
2207 } else {
2208 bv->bv_len = 0;
2209 bv->bv_val = NULL;
2210 }
2211 }
2212
2213 rs->sr_rspdata = bv;
2214 return rs->sr_err;
2215 }
2216
2217
2218