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