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