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