]> git.sur5r.net Git - openldap/blob - servers/slapd/back-ldap/config.c
ed5097518ca56d73f7ff21dfbf079f175c8e6d2f
[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-2006 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_REWRITE,
67
68         LDAP_BACK_CFG_LAST
69 };
70
71 static ConfigTable ldapcfg[] = {
72         { "uri", "uri", 2, 2, 0,
73                 ARG_MAGIC|LDAP_BACK_CFG_URI,
74                 ldap_back_cf_gen, "( OLcfgDbAt:0.14 "
75                         "NAME 'olcDbURI' "
76                         "DESC 'URI (list) for remote DSA' "
77                         "SYNTAX OMsDirectoryString "
78                         "SINGLE-VALUE )",
79                 NULL, NULL },
80         { "tls", "what", 2, 2, 0,
81                 ARG_MAGIC|LDAP_BACK_CFG_TLS,
82                 ldap_back_cf_gen, "( OLcfgDbAt:3.1 "
83                         "NAME 'olcDbStartTLS' "
84                         "DESC 'StartTLS' "
85                         "SYNTAX OMsDirectoryString "
86                         "SINGLE-VALUE )",
87                 NULL, NULL },
88         { "acl-authcDN", "DN", 2, 2, 0,
89                 ARG_DN|ARG_MAGIC|LDAP_BACK_CFG_ACL_AUTHCDN,
90                 ldap_back_cf_gen, "( OLcfgDbAt:3.2 "
91                         "NAME 'olcDbACLAuthcDn' "
92                         "DESC 'Remote ACL administrative identity' "
93                         "OBSOLETE "
94                         "SYNTAX OMsDN "
95                         "SINGLE-VALUE )",
96                 NULL, NULL },
97         /* deprecated, will be removed; aliases "acl-authcDN" */
98         { "binddn", "DN", 2, 2, 0,
99                 ARG_DN|ARG_MAGIC|LDAP_BACK_CFG_ACL_AUTHCDN,
100                 ldap_back_cf_gen, NULL, NULL, NULL },
101         { "acl-passwd", "cred", 2, 2, 0,
102                 ARG_MAGIC|LDAP_BACK_CFG_ACL_PASSWD,
103                 ldap_back_cf_gen, "( OLcfgDbAt:3.3 "
104                         "NAME 'olcDbACLPasswd' "
105                         "DESC 'Remote ACL administrative identity credentials' "
106                         "OBSOLETE "
107                         "SYNTAX OMsDirectoryString "
108                         "SINGLE-VALUE )",
109                 NULL, NULL },
110         /* deprecated, will be removed; aliases "acl-passwd" */
111         { "bindpw", "cred", 2, 2, 0,
112                 ARG_MAGIC|LDAP_BACK_CFG_ACL_PASSWD,
113                 ldap_back_cf_gen, NULL, NULL, NULL },
114         /* deprecated, will be removed; aliases "acl-bind" */
115         { "acl-method", "args", 2, 0, 0,
116                 ARG_MAGIC|LDAP_BACK_CFG_ACL_METHOD,
117                 ldap_back_cf_gen, NULL, NULL, NULL },
118         { "acl-bind", "args", 2, 0, 0,
119                 ARG_MAGIC|LDAP_BACK_CFG_ACL_BIND,
120                 ldap_back_cf_gen, "( OLcfgDbAt:3.4 "
121                         "NAME 'olcDbACLBind' "
122                         "DESC 'Remote ACL administrative identity auth bind configuration' "
123                         "SYNTAX OMsDirectoryString "
124                         "SINGLE-VALUE )",
125                 NULL, NULL },
126         { "idassert-authcDN", "DN", 2, 2, 0,
127                 ARG_DN|ARG_MAGIC|LDAP_BACK_CFG_IDASSERT_AUTHCDN,
128                 ldap_back_cf_gen, "( OLcfgDbAt:3.5 "
129                         "NAME 'olcDbIDAssertAuthcDn' "
130                         "DESC 'Remote Identity Assertion administrative identity' "
131                         "OBSOLETE "
132                         "SYNTAX OMsDN "
133                         "SINGLE-VALUE )",
134                 NULL, NULL },
135         /* deprecated, will be removed; partially aliases "idassert-authcDN" */
136         { "proxyauthzdn", "DN", 2, 2, 0,
137                 ARG_DN|ARG_MAGIC|LDAP_BACK_CFG_IDASSERT_AUTHCDN,
138                 ldap_back_cf_gen, NULL, NULL, NULL },
139         { "idassert-passwd", "cred", 2, 2, 0,
140                 ARG_MAGIC|LDAP_BACK_CFG_IDASSERT_PASSWD,
141                 ldap_back_cf_gen, "( OLcfgDbAt:3.6 "
142                         "NAME 'olcDbIDAssertPasswd' "
143                         "DESC 'Remote Identity Assertion administrative identity credentials' "
144                         "OBSOLETE "
145                         "SYNTAX OMsDirectoryString "
146                         "SINGLE-VALUE )",
147                 NULL, NULL },
148         /* deprecated, will be removed; partially aliases "idassert-passwd" */
149         { "proxyauthzpw", "cred", 2, 2, 0,
150                 ARG_MAGIC|LDAP_BACK_CFG_IDASSERT_PASSWD,
151                 ldap_back_cf_gen, NULL, NULL, NULL },
152         { "idassert-bind", "args", 2, 0, 0,
153                 ARG_MAGIC|LDAP_BACK_CFG_IDASSERT_BIND,
154                 ldap_back_cf_gen, "( OLcfgDbAt:3.7 "
155                         "NAME 'olcDbIDAssertBind' "
156                         "DESC 'Remote Identity Assertion administrative identity auth bind configuration' "
157                         "SYNTAX OMsDirectoryString "
158                         "SINGLE-VALUE )",
159                 NULL, NULL },
160         { "idassert-method", "args", 2, 0, 0,
161                 ARG_MAGIC|LDAP_BACK_CFG_IDASSERT_METHOD,
162                 ldap_back_cf_gen, NULL, NULL, NULL },
163         { "idassert-mode", "mode>|u:<user>|[dn:]<DN", 2, 0, 0,
164                 ARG_STRING|ARG_MAGIC|LDAP_BACK_CFG_IDASSERT_MODE,
165                 ldap_back_cf_gen, "( OLcfgDbAt:3.8 "
166                         "NAME 'olcDbIDAssertMode' "
167                         "DESC 'Remote Identity Assertion mode' "
168                         "OBSOLETE "
169                         "SYNTAX OMsDirectoryString "
170                         "SINGLE-VALUE)",
171                 NULL, NULL },
172         { "idassert-authzFrom", "authzRule", 2, 2, 0,
173                 ARG_MAGIC|LDAP_BACK_CFG_IDASSERT_AUTHZFROM,
174                 ldap_back_cf_gen, "( OLcfgDbAt:3.9 "
175                         "NAME 'olcDbIDAssertAuthzFrom' "
176                         "DESC 'Remote Identity Assertion authz rules' "
177                         "SYNTAX OMsDirectoryString "
178                         "X-ORDERED 'VALUES' )",
179                 NULL, NULL },
180         { "rebind-as-user", "NO|yes", 1, 2, 0,
181                 ARG_MAGIC|ARG_ON_OFF|LDAP_BACK_CFG_REBIND,
182                 ldap_back_cf_gen, "( OLcfgDbAt:3.10 "
183                         "NAME 'olcDbRebindAsUser' "
184                         "DESC 'Rebind as user' "
185                         "SYNTAX OMsBoolean "
186                         "SINGLE-VALUE )",
187                 NULL, NULL },
188         { "chase-referrals", "YES|no", 2, 2, 0,
189                 ARG_MAGIC|ARG_ON_OFF|LDAP_BACK_CFG_CHASE,
190                 ldap_back_cf_gen, "( OLcfgDbAt:3.11 "
191                         "NAME 'olcDbChaseReferrals' "
192                         "DESC 'Chase referrals' "
193                         "SYNTAX OMsBoolean "
194                         "SINGLE-VALUE )",
195                 NULL, NULL },
196         { "t-f-support", "NO|yes|discover", 2, 2, 0,
197                 ARG_MAGIC|LDAP_BACK_CFG_T_F,
198                 ldap_back_cf_gen, "( OLcfgDbAt:3.12 "
199                         "NAME 'olcDbTFSupport' "
200                         "DESC 'Absolute filters support' "
201                         "SYNTAX OMsDirectoryString "
202                         "SINGLE-VALUE )",
203                 NULL, NULL },
204         { "proxy-whoami", "NO|yes", 1, 2, 0,
205                 ARG_MAGIC|ARG_ON_OFF|LDAP_BACK_CFG_WHOAMI,
206                 ldap_back_cf_gen, "( OLcfgDbAt:3.13 "
207                         "NAME 'olcDbProxyWhoAmI' "
208                         "DESC 'Proxy whoAmI exop' "
209                         "SYNTAX OMsBoolean "
210                         "SINGLE-VALUE )",
211                 NULL, NULL },
212         { "timeout", "timeout(list)", 2, 0, 0,
213                 ARG_MAGIC|LDAP_BACK_CFG_TIMEOUT,
214                 ldap_back_cf_gen, "( OLcfgDbAt:3.14 "
215                         "NAME 'olcDbTimeout' "
216                         "DESC 'Per-operation timeouts' "
217                         "SYNTAX OMsDirectoryString "
218                         "SINGLE-VALUE )",
219                 NULL, NULL },
220         { "idle-timeout", "timeout", 2, 0, 0,
221                 ARG_MAGIC|LDAP_BACK_CFG_IDLE_TIMEOUT,
222                 ldap_back_cf_gen, "( OLcfgDbAt:3.15 "
223                         "NAME 'olcDbIdleTimeout' "
224                         "DESC 'connection idle timeout' "
225                         "SYNTAX OMsDirectoryString "
226                         "SINGLE-VALUE )",
227                 NULL, NULL },
228         { "conn-ttl", "ttl", 2, 0, 0,
229                 ARG_MAGIC|LDAP_BACK_CFG_CONN_TTL,
230                 ldap_back_cf_gen, "( OLcfgDbAt:3.16 "
231                         "NAME 'olcDbConnTtl' "
232                         "DESC 'connection ttl' "
233                         "SYNTAX OMsDirectoryString "
234                         "SINGLE-VALUE )",
235                 NULL, NULL },
236         { "network-timeout", "timeout", 2, 0, 0,
237                 ARG_MAGIC|LDAP_BACK_CFG_NETWORK_TIMEOUT,
238                 ldap_back_cf_gen, "( OLcfgDbAt:3.17 "
239                         "NAME 'olcDbNetworkTimeout' "
240                         "DESC 'connection network timeout' "
241                         "SYNTAX OMsDirectoryString "
242                         "SINGLE-VALUE )",
243                 NULL, NULL },
244         { "suffixmassage", "[virtual]> <real", 2, 3, 0,
245                 ARG_STRING|ARG_MAGIC|LDAP_BACK_CFG_REWRITE,
246                 ldap_back_cf_gen, NULL, NULL, NULL },
247         { "map", "attribute|objectClass> [*|<local>] *|<remote", 3, 4, 0,
248                 ARG_STRING|ARG_MAGIC|LDAP_BACK_CFG_REWRITE,
249                 ldap_back_cf_gen, NULL, NULL, NULL },
250         { "rewrite", "<arglist>", 2, 4, STRLENOF( "rewrite" ),
251                 ARG_STRING|ARG_MAGIC|LDAP_BACK_CFG_REWRITE,
252                 ldap_back_cf_gen, NULL, NULL, NULL },
253         { NULL, NULL, 0, 0, 0, ARG_IGNORED,
254                 NULL, NULL, NULL, NULL }
255 };
256
257 static ConfigOCs ldapocs[] = {
258         { "( OLcfgDbOc:3.1 "
259                 "NAME 'olcLDAPConfig' "
260                 "DESC 'LDAP backend configuration' "
261                 "SUP olcDatabaseConfig "
262                 "MUST olcDbURI "
263                 "MAY ( olcDbStartTLS "
264                         "$ olcDbACLAuthcDn "
265                         "$ olcDbACLPasswd "
266                         "$ olcDbACLBind "
267                         "$ olcDbIDAssertAuthcDn "
268                         "$ olcDbIDAssertPasswd "
269                         "$ olcDbIDAssertBind "
270                         "$ olcDbIDAssertMode "
271                         "$ olcDbIDAssertAuthzFrom "
272                         "$ olcDbRebindAsUser "
273                         "$ olcDbChaseReferrals "
274                         "$ olcDbTFSupport "
275                         "$ olcDbProxyWhoAmI "
276                         "$ olcDbTimeout "
277                         "$ olcDbIdleTimeout "
278                 ") )",
279                         Cft_Database, ldapcfg},
280         { NULL, 0, NULL }
281 };
282
283 static slap_verbmasks idassert_mode[] = {
284         { BER_BVC("self"),              LDAP_BACK_IDASSERT_SELF },
285         { BER_BVC("anonymous"),         LDAP_BACK_IDASSERT_ANONYMOUS },
286         { BER_BVC("none"),              LDAP_BACK_IDASSERT_NOASSERT },
287         { BER_BVC("legacy"),            LDAP_BACK_IDASSERT_LEGACY },
288         { BER_BVNULL,                   0 }
289 };
290
291 static slap_verbmasks tls_mode[] = {
292         { BER_BVC( "propagate" ),       LDAP_BACK_F_TLS_PROPAGATE_MASK },
293         { BER_BVC( "try-propagate" ),   LDAP_BACK_F_PROPAGATE_TLS },
294         { BER_BVC( "start" ),           LDAP_BACK_F_TLS_USE_MASK },
295         { BER_BVC( "try-start" ),       LDAP_BACK_F_USE_TLS },
296         { BER_BVC( "none" ),            LDAP_BACK_F_NONE },
297         { BER_BVNULL,                   0 }
298 };
299
300 static slap_verbmasks t_f_mode[] = {
301         { BER_BVC( "yes" ),             LDAP_BACK_F_SUPPORT_T_F },
302         { BER_BVC( "discover" ),        LDAP_BACK_F_SUPPORT_T_F_DISCOVER },
303         { BER_BVC( "no" ),              LDAP_BACK_F_NONE },
304         { BER_BVNULL,                   0 }
305 };
306
307 static slap_cf_aux_table timeout_table[] = {
308         { BER_BVC("add="), 0 * sizeof( time_t ), 'u', 0, NULL },
309         { BER_BVC("delete="), 1 * sizeof( time_t ), 'u', 0, NULL },
310         { BER_BVC("modify="), 2 * sizeof( time_t ), 'u', 0, NULL },
311         { BER_BVC("modrdn="), 3 * sizeof( time_t ), 'u', 0, NULL },
312         { BER_BVNULL, 0, 0, 0, NULL }
313 };
314
315 static int
316 ldap_back_cf_gen( ConfigArgs *c )
317 {
318         ldapinfo_t      *li = ( ldapinfo_t * )c->be->be_private;
319         int             rc;
320         int             i;
321
322         if ( c->op == SLAP_CONFIG_EMIT ) {
323                 struct berval   bv = BER_BVNULL;
324                 rc = 0;
325
326                 if ( li == NULL ) {
327                         return 1;
328                 }
329
330                 switch( c->type ) {
331                 case LDAP_BACK_CFG_URI:
332                         if ( li->li_uri != NULL ) {
333                                 struct berval   bv;
334
335                                 ber_str2bv( li->li_uri, 0, 0, &bv );
336                                 value_add_one( &c->rvalue_vals, &bv );
337
338                         } else {
339                                 rc = 1;
340                         }
341                         break;
342
343                 case LDAP_BACK_CFG_TLS:
344                         enum_to_verb( tls_mode, ( li->li_flags & LDAP_BACK_F_TLS_MASK ), &bv );
345                         assert( !BER_BVISNULL( &bv ) );
346                         value_add_one( &c->rvalue_vals, &bv );
347                         break;
348
349                 case LDAP_BACK_CFG_ACL_AUTHCDN:
350                 case LDAP_BACK_CFG_ACL_PASSWD:
351                 case LDAP_BACK_CFG_ACL_METHOD:
352                         /* handled by LDAP_BACK_CFG_ACL_BIND */
353                         rc = 1;
354                         break;
355
356                 case LDAP_BACK_CFG_ACL_BIND: {
357                         int     i;
358
359                         if ( li->li_acl_authmethod == LDAP_AUTH_NONE ) {
360                                 return 1;
361                         }
362
363                         bindconf_unparse( &li->li_acl, &bv );
364
365                         for ( i = 0; isspace( (unsigned char) bv.bv_val[ i ] ); i++ )
366                                 /* count spaces */ ;
367
368                         if ( i ) {
369                                 bv.bv_len -= i;
370                                 AC_MEMCPY( bv.bv_val, &bv.bv_val[ i ],
371                                         bv.bv_len + 1 );
372                         }
373
374                         ber_bvarray_add( &c->rvalue_vals, &bv );
375                         break;
376                 }
377
378                 case LDAP_BACK_CFG_IDASSERT_MODE:
379                 case LDAP_BACK_CFG_IDASSERT_AUTHCDN:
380                 case LDAP_BACK_CFG_IDASSERT_PASSWD:
381                 case LDAP_BACK_CFG_IDASSERT_METHOD:
382                         /* handled by LDAP_BACK_CFG_IDASSERT_BIND */
383                         rc = 1;
384                         break;
385
386                 case LDAP_BACK_CFG_IDASSERT_AUTHZFROM: {
387                         int             i;
388
389                         if ( li->li_idassert_authz == NULL ) {
390                                 rc = 1;
391                                 break;
392                         }
393
394                         for ( i = 0; !BER_BVISNULL( &li->li_idassert_authz[ i ] ); i++ )
395                         {
396                                 value_add_one( &c->rvalue_vals, &li->li_idassert_authz[ i ] );
397                         }
398                         break;
399                 }
400
401                 case LDAP_BACK_CFG_IDASSERT_BIND: {
402                         int             i;
403                         struct berval   bc = BER_BVNULL;
404                         char            *ptr;
405
406                         if ( li->li_idassert_authmethod == LDAP_AUTH_NONE ) {
407                                 return 1;
408                         }
409
410                         if ( li->li_idassert_authmethod != LDAP_AUTH_NONE ) {
411                                 ber_len_t       len;
412
413                                 switch ( li->li_idassert_mode ) {
414                                 case LDAP_BACK_IDASSERT_OTHERID:
415                                 case LDAP_BACK_IDASSERT_OTHERDN:
416                                         break;
417
418                                 default: {
419                                         struct berval   mode = BER_BVNULL;
420
421                                         enum_to_verb( idassert_mode, li->li_idassert_mode, &mode );
422                                         if ( BER_BVISNULL( &mode ) ) {
423                                                 /* there's something wrong... */
424                                                 assert( 0 );
425                                                 rc = 1;
426         
427                                         } else {
428                                                 bv.bv_len = STRLENOF( "mode=" ) + mode.bv_len;
429                                                 bv.bv_val = ch_malloc( bv.bv_len + 1 );
430
431                                                 ptr = lutil_strcopy( bv.bv_val, "mode=" );
432                                                 ptr = lutil_strcopy( ptr, mode.bv_val );
433                                         }
434                                         break;
435                                 }
436                                 }
437
438                                 if ( li->li_idassert_flags & LDAP_BACK_AUTH_NATIVE_AUTHZ ) {
439                                         len = bv.bv_len + STRLENOF( "authz=native" );
440
441                                         if ( !BER_BVISEMPTY( &bv ) ) {
442                                                 len += STRLENOF( " " );
443                                         }
444
445                                         bv.bv_val = ch_realloc( bv.bv_val, len + 1 );
446
447                                         ptr = &bv.bv_val[ bv.bv_len ];
448
449                                         if ( !BER_BVISEMPTY( &bv ) ) {
450                                                 ptr = lutil_strcopy( ptr, " " );
451                                         }
452
453                                         (void)lutil_strcopy( ptr, "authz=native" );
454                                 }
455
456                                 len = bv.bv_len + STRLENOF( "flags=non-prescriptive,override,obsolete-encoding-workaround" );
457                                 /* flags */
458                                 if ( !BER_BVISEMPTY( &bv ) ) {
459                                         len += STRLENOF( " " );
460                                 }
461
462                                 bv.bv_val = ch_realloc( bv.bv_val, len + 1 );
463
464                                 ptr = &bv.bv_val[ bv.bv_len ];
465
466                                 if ( !BER_BVISEMPTY( &bv ) ) {
467                                         ptr = lutil_strcopy( ptr, " " );
468                                 }
469
470                                 ptr = lutil_strcopy( ptr, "flags=" );
471
472                                 if ( li->li_idassert_flags & LDAP_BACK_AUTH_PRESCRIPTIVE ) {
473                                         ptr = lutil_strcopy( ptr, "prescriptive" );
474                                 } else {
475                                         ptr = lutil_strcopy( ptr, "non-prescriptive" );
476                                 }
477
478                                 if ( li->li_idassert_flags & LDAP_BACK_AUTH_OVERRIDE ) {
479                                         ptr = lutil_strcopy( ptr, ",override" );
480                                 }
481
482                                 if ( li->li_idassert_flags & LDAP_BACK_AUTH_OBSOLETE_PROXY_AUTHZ ) {
483                                         ptr = lutil_strcopy( ptr, ",obsolete-proxy-authz" );
484
485                                 } else if ( li->li_idassert_flags & LDAP_BACK_AUTH_OBSOLETE_ENCODING_WORKAROUND ) {
486                                         ptr = lutil_strcopy( ptr, ",obsolete-encoding-workaround" );
487                                 }
488
489                                 bv.bv_len = ( ptr - bv.bv_val );
490                                 /* end-of-flags */
491                         }
492
493                         bindconf_unparse( &li->li_idassert, &bc );
494
495                         if ( !BER_BVISNULL( &bv ) ) {
496                                 ber_len_t       len = bv.bv_len + bc.bv_len;
497
498                                 bv.bv_val = ch_realloc( bv.bv_val, len + 1 );
499
500                                 assert( bc.bv_val[ 0 ] == ' ' );
501
502                                 ptr = lutil_strcopy( &bv.bv_val[ bv.bv_len ], bc.bv_val );
503                                 free( bc.bv_val );
504                                 bv.bv_len = ptr - bv.bv_val;
505
506                         } else {
507                                 for ( i = 0; isspace( (unsigned char) bc.bv_val[ i ] ); i++ )
508                                         /* count spaces */ ;
509
510                                 if ( i ) {
511                                         bc.bv_len -= i;
512                                         AC_MEMCPY( bc.bv_val, &bc.bv_val[ i ], bc.bv_len + 1 );
513                                 }
514
515                                 bv = bc;
516                         }
517                         
518                         ber_bvarray_add( &c->rvalue_vals, &bv );
519
520                         break;
521                 }
522
523                 case LDAP_BACK_CFG_REBIND:
524                         c->value_int = LDAP_BACK_SAVECRED( li );
525                         break;
526
527                 case LDAP_BACK_CFG_CHASE:
528                         c->value_int = LDAP_BACK_CHASE_REFERRALS( li );
529                         break;
530
531                 case LDAP_BACK_CFG_T_F:
532                         enum_to_verb( t_f_mode, (li->li_flags & LDAP_BACK_F_SUPPORT_T_F_MASK), &bv );
533                         if ( BER_BVISNULL( &bv ) ) {
534                                 /* there's something wrong... */
535                                 assert( 0 );
536                                 rc = 1;
537
538                         } else {
539                                 value_add_one( &c->rvalue_vals, &bv );
540                         }
541                         break;
542
543                 case LDAP_BACK_CFG_WHOAMI:
544                         c->value_int = LDAP_BACK_PROXY_WHOAMI( li );
545                         break;
546
547                 case LDAP_BACK_CFG_TIMEOUT:
548                         BER_BVZERO( &bv );
549
550                         for ( i = 0; i < LDAP_BACK_OP_LAST; i++ ) {
551                                 if ( li->li_timeout[ i ] != 0 ) {
552                                         break;
553                                 }
554                         }
555
556                         if ( i == LDAP_BACK_OP_LAST ) {
557                                 return 1;
558                         }
559
560                         slap_cf_aux_table_unparse( li->li_timeout, &bv, timeout_table );
561
562                         if ( BER_BVISNULL( &bv ) ) {
563                                 return 1;
564                         }
565
566                         for ( i = 0; isspace( (unsigned char) bv.bv_val[ i ] ); i++ )
567                                 /* count spaces */ ;
568
569                         if ( i ) {
570                                 bv.bv_len -= i;
571                                 AC_MEMCPY( bv.bv_val, &bv.bv_val[ i ],
572                                         bv.bv_len + 1 );
573                         }
574
575                         ber_bvarray_add( &c->rvalue_vals, &bv );
576                         break;
577
578                 case LDAP_BACK_CFG_IDLE_TIMEOUT: {
579                         char    buf[ SLAP_TEXT_BUFLEN ];
580
581                         if ( li->li_idle_timeout == 0 ) {
582                                 return 1;
583                         }
584
585                         lutil_unparse_time( buf, sizeof( buf ), li->li_idle_timeout );
586                         ber_str2bv( buf, 0, 0, &bv );
587                         value_add_one( &c->rvalue_vals, &bv );
588                         } break;
589
590                 case LDAP_BACK_CFG_CONN_TTL: {
591                         char    buf[ SLAP_TEXT_BUFLEN ];
592
593                         if ( li->li_conn_ttl == 0 ) {
594                                 return 1;
595                         }
596
597                         lutil_unparse_time( buf, sizeof( buf ), li->li_conn_ttl );
598                         ber_str2bv( buf, 0, 0, &bv );
599                         value_add_one( &c->rvalue_vals, &bv );
600                         } break;
601
602                 case LDAP_BACK_CFG_NETWORK_TIMEOUT: {
603                         char    buf[ SLAP_TEXT_BUFLEN ];
604
605                         if ( li->li_network_timeout == 0 ) {
606                                 return 1;
607                         }
608
609                         snprintf( buf, sizeof( buf ), "%ld",
610                                 (long)li->li_network_timeout );
611                         ber_str2bv( buf, 0, 0, &bv );
612                         value_add_one( &c->rvalue_vals, &bv );
613                         } break;
614
615                 default:
616                         /* FIXME: we need to handle all... */
617                         assert( 0 );
618                         break;
619                 }
620                 return rc;
621
622         } else if ( c->op == LDAP_MOD_DELETE ) {
623                 rc = 0;
624                 switch( c->type ) {
625                 case LDAP_BACK_CFG_URI:
626                         if ( li->li_uri != NULL ) {
627                                 ch_free( li->li_uri );
628                                 li->li_uri = NULL;
629
630                                 assert( li->li_bvuri != NULL );
631                                 ber_bvarray_free( li->li_bvuri );
632                                 li->li_bvuri = NULL;
633                         }
634
635                         /* better cleanup the cached connections... */
636                         /* NOTE: don't worry about locking: if we got here,
637                          * other threads are suspended. */
638                         if ( li->li_conninfo.lai_tree != NULL ) {
639                                 avl_free( li->li_conninfo.lai_tree, ldap_back_conn_free );
640                                 li->li_conninfo.lai_tree = NULL;
641                         }
642                         
643                         break;
644
645                 case LDAP_BACK_CFG_TLS:
646                         rc = 1;
647                         break;
648
649                 case LDAP_BACK_CFG_ACL_AUTHCDN:
650                 case LDAP_BACK_CFG_ACL_PASSWD:
651                 case LDAP_BACK_CFG_ACL_METHOD:
652                         /* handled by LDAP_BACK_CFG_ACL_BIND */
653                         rc = 1;
654                         break;
655
656                 case LDAP_BACK_CFG_ACL_BIND:
657                         bindconf_free( &li->li_acl );
658                         break;
659
660                 case LDAP_BACK_CFG_IDASSERT_MODE:
661                 case LDAP_BACK_CFG_IDASSERT_AUTHCDN:
662                 case LDAP_BACK_CFG_IDASSERT_PASSWD:
663                 case LDAP_BACK_CFG_IDASSERT_METHOD:
664                         /* handled by LDAP_BACK_CFG_IDASSERT_BIND */
665                         rc = 1;
666                         break;
667
668                 case LDAP_BACK_CFG_IDASSERT_AUTHZFROM:
669                         if ( li->li_idassert_authz != NULL ) {
670                                 ber_bvarray_free( li->li_idassert_authz );
671                                 li->li_idassert_authz = NULL;
672                         }
673                         break;
674
675                 case LDAP_BACK_CFG_IDASSERT_BIND:
676                         bindconf_free( &li->li_idassert );
677                         break;
678
679                 case LDAP_BACK_CFG_REBIND:
680                 case LDAP_BACK_CFG_CHASE:
681                 case LDAP_BACK_CFG_T_F:
682                 case LDAP_BACK_CFG_WHOAMI:
683                         rc = 1;
684                         break;
685
686                 case LDAP_BACK_CFG_TIMEOUT:
687                         for ( i = 0; i < LDAP_BACK_OP_LAST; i++ ) {
688                                 li->li_timeout[ i ] = 0;
689                         }
690                         break;
691
692                 case LDAP_BACK_CFG_IDLE_TIMEOUT:
693                         li->li_idle_timeout = 0;
694                         break;
695
696                 case LDAP_BACK_CFG_CONN_TTL:
697                         li->li_conn_ttl = 0;
698                         break;
699
700                 case LDAP_BACK_CFG_NETWORK_TIMEOUT:
701                         li->li_network_timeout;
702                         break;
703
704                 default:
705                         /* FIXME: we need to handle all... */
706                         assert( 0 );
707                         break;
708                 }
709                 return rc;
710
711         }
712
713         switch( c->type ) {
714         case LDAP_BACK_CFG_URI: {
715                 LDAPURLDesc     *tmpludp, *lud;
716                 char            **urllist = NULL;
717                 int             urlrc = LDAP_URL_SUCCESS, i;
718
719                 if ( li->li_uri != NULL ) {
720                         ch_free( li->li_uri );
721                         li->li_uri = NULL;
722
723                         assert( li->li_bvuri != NULL );
724                         ber_bvarray_free( li->li_bvuri );
725                         li->li_bvuri = NULL;
726                 }
727
728                 /* PARANOID: DN and more are not required nor allowed */
729                 urlrc = ldap_url_parselist_ext( &lud, c->argv[ 1 ], ", \t" );
730                 if ( urlrc != LDAP_URL_SUCCESS ) {
731                         char    *why;
732
733                         switch ( urlrc ) {
734                         case LDAP_URL_ERR_MEM:
735                                 why = "no memory";
736                                 break;
737                         case LDAP_URL_ERR_PARAM:
738                                 why = "parameter is bad";
739                                 break;
740                         case LDAP_URL_ERR_BADSCHEME:
741                                 why = "URL doesn't begin with \"[c]ldap[si]://\"";
742                                 break;
743                         case LDAP_URL_ERR_BADENCLOSURE:
744                                 why = "URL is missing trailing \">\"";
745                                 break;
746                         case LDAP_URL_ERR_BADURL:
747                                 why = "URL is bad";
748                                 break;
749                         case LDAP_URL_ERR_BADHOST:
750                                 why = "host/port is bad";
751                                 break;
752                         case LDAP_URL_ERR_BADATTRS:
753                                 why = "bad (or missing) attributes";
754                                 break;
755                         case LDAP_URL_ERR_BADSCOPE:
756                                 why = "scope string is invalid (or missing)";
757                                 break;
758                         case LDAP_URL_ERR_BADFILTER:
759                                 why = "bad or missing filter";
760                                 break;
761                         case LDAP_URL_ERR_BADEXTS:
762                                 why = "bad or missing extensions";
763                                 break;
764                         default:
765                                 why = "unknown reason";
766                                 break;
767                         }
768                         snprintf( c->msg, sizeof( c->msg),
769                                         "unable to parse uri \"%s\" "
770                                         "in \"uri <uri>\" line: %s",
771                                         c->value_string, why );
772                         Debug( LDAP_DEBUG_ANY, "%s: %s.\n", c->log, c->msg, 0 );
773                         urlrc = 1;
774                         goto done_url;
775                 }
776
777                 for ( i = 0, tmpludp = lud;
778                                 tmpludp;
779                                 i++, tmpludp = tmpludp->lud_next )
780                 {
781                         if ( ( tmpludp->lud_dn != NULL
782                                                 && tmpludp->lud_dn[0] != '\0' )
783                                         || tmpludp->lud_attrs != NULL
784                                         /* || tmpludp->lud_scope != LDAP_SCOPE_DEFAULT */
785                                         || tmpludp->lud_filter != NULL
786                                         || tmpludp->lud_exts != NULL )
787                         {
788                                 snprintf( c->msg, sizeof( c->msg ),
789                                                 "warning, only protocol, "
790                                                 "host and port allowed "
791                                                 "in \"uri <uri>\" statement "
792                                                 "for uri #%d of \"%s\"",
793                                                 i, c->value_string );
794                                 Debug( LDAP_DEBUG_ANY, "%s: %s.\n", c->log, c->msg, 0 );
795                         }
796                 }
797
798                 for ( i = 0, tmpludp = lud;
799                                 tmpludp;
800                                 i++, tmpludp = tmpludp->lud_next )
801                         /* just count */
802                         ;
803                 urllist = ch_calloc( sizeof( char * ), i + 1 );
804
805                 for ( i = 0, tmpludp = lud;
806                                 tmpludp;
807                                 i++, tmpludp = tmpludp->lud_next )
808                 {
809                         LDAPURLDesc     tmplud;
810
811                         tmplud = *tmpludp;
812                         tmplud.lud_dn = "";
813                         tmplud.lud_attrs = NULL;
814                         tmplud.lud_filter = NULL;
815                         if ( !ldap_is_ldapi_url( tmplud.lud_scheme ) ) {
816                                 tmplud.lud_exts = NULL;
817                                 tmplud.lud_crit_exts = 0;
818                         }
819
820                         urllist[ i ]  = ldap_url_desc2str( &tmplud );
821
822                         if ( urllist[ i ] == NULL ) {
823                                 snprintf( c->msg, sizeof( c->msg),
824                                         "unable to rebuild uri "
825                                         "in \"uri <uri>\" statement "
826                                         "for \"%s\"",
827                                         c->argv[ 1 ] );
828                                 Debug( LDAP_DEBUG_ANY, "%s: %s.\n", c->log, c->msg, 0 );
829                                 urlrc = 1;
830                                 goto done_url;
831                         }
832                 }
833
834                 li->li_uri = ldap_charray2str( urllist, " " );
835                 for ( i = 0; urllist[ i ] != NULL; i++ ) {
836                         struct berval   bv;
837
838                         ber_str2bv( urllist[ i ], 0, 0, &bv );
839                         ber_bvarray_add( &li->li_bvuri, &bv );
840                         urllist[ i ] = NULL;
841                 }
842                 ldap_memfree( urllist );
843                 urllist = NULL;
844
845 done_url:;
846                 if ( urllist ) {
847                         ldap_charray_free( urllist );
848                 }
849                 if ( lud ) {
850                         ldap_free_urllist( lud );
851                 }
852                 if ( urlrc != LDAP_URL_SUCCESS ) {
853                         return 1;
854                 }
855                 break;
856         }
857
858         case LDAP_BACK_CFG_TLS:
859                 i = verb_to_mask( c->argv[1], tls_mode );
860                 if ( BER_BVISNULL( &tls_mode[i].word ) ) {
861                         return 1;
862                 }
863                 li->li_flags &= ~LDAP_BACK_F_TLS_MASK;
864                 li->li_flags |= tls_mode[i].mask;
865                 break;
866
867         case LDAP_BACK_CFG_ACL_AUTHCDN:
868                 switch ( li->li_acl_authmethod ) {
869                 case LDAP_AUTH_NONE:
870                         li->li_acl_authmethod = LDAP_AUTH_SIMPLE;
871                         break;
872
873                 case LDAP_AUTH_SIMPLE:
874                         break;
875
876                 default:
877                         snprintf( c->msg, sizeof( c->msg),
878                                 "\"acl-authcDN <DN>\" incompatible "
879                                 "with auth method %d",
880                                 li->li_acl_authmethod );
881                         Debug( LDAP_DEBUG_ANY, "%s: %s.\n", c->log, c->msg, 0 );
882                         return 1;
883                 }
884                 if ( !BER_BVISNULL( &li->li_acl_authcDN ) ) {
885                         free( li->li_acl_authcDN.bv_val );
886                 }
887                 ber_memfree_x( c->value_dn.bv_val, NULL );
888                 li->li_acl_authcDN = c->value_ndn;
889                 BER_BVZERO( &c->value_dn );
890                 BER_BVZERO( &c->value_ndn );
891                 break;
892
893         case LDAP_BACK_CFG_ACL_PASSWD:
894                 switch ( li->li_acl_authmethod ) {
895                 case LDAP_AUTH_NONE:
896                         li->li_acl_authmethod = LDAP_AUTH_SIMPLE;
897                         break;
898
899                 case LDAP_AUTH_SIMPLE:
900                         break;
901
902                 default:
903                         snprintf( c->msg, sizeof( c->msg ),
904                                 "\"acl-passwd <cred>\" incompatible "
905                                 "with auth method %d",
906                                 li->li_acl_authmethod );
907                         Debug( LDAP_DEBUG_ANY, "%s: %s.\n", c->log, c->msg, 0 );
908                         return 1;
909                 }
910                 if ( !BER_BVISNULL( &li->li_acl_passwd ) ) {
911                         free( li->li_acl_passwd.bv_val );
912                 }
913                 ber_str2bv( c->argv[ 1 ], 0, 1, &li->li_acl_passwd );
914                 break;
915
916         case LDAP_BACK_CFG_ACL_METHOD:
917         case LDAP_BACK_CFG_ACL_BIND:
918                 for ( i = 1; i < c->argc; i++ ) {
919                         if ( bindconf_parse( c->argv[ i ], &li->li_acl ) ) {
920                                 return 1;
921                         }
922                 }
923                 break;
924
925         case LDAP_BACK_CFG_IDASSERT_MODE:
926                 i = verb_to_mask( c->argv[1], idassert_mode );
927                 if ( BER_BVISNULL( &idassert_mode[i].word ) ) {
928                         if ( strncasecmp( c->argv[1], "u:", STRLENOF( "u:" ) ) == 0 ) {
929                                 li->li_idassert_mode = LDAP_BACK_IDASSERT_OTHERID;
930                                 ber_str2bv( c->argv[1], 0, 1, &li->li_idassert_authzID );
931                                 li->li_idassert_authzID.bv_val[ 0 ] = 'u';
932                                 
933                         } else {
934                                 struct berval   id, ndn;
935
936                                 ber_str2bv( c->argv[1], 0, 0, &id );
937
938                                 if ( strncasecmp( c->argv[1], "dn:", STRLENOF( "dn:" ) ) == 0 ) {
939                                         id.bv_val += STRLENOF( "dn:" );
940                                         id.bv_len -= STRLENOF( "dn:" );
941                                 }
942
943                                 rc = dnNormalize( 0, NULL, NULL, &id, &ndn, NULL );
944                                 if ( rc != LDAP_SUCCESS ) {
945                                         Debug( LDAP_DEBUG_ANY,
946                                                 "%s: line %d: idassert ID \"%s\" is not a valid DN\n",
947                                                 c->fname, c->lineno, c->argv[1] );
948                                         return 1;
949                                 }
950
951                                 li->li_idassert_authzID.bv_len = STRLENOF( "dn:" ) + ndn.bv_len;
952                                 li->li_idassert_authzID.bv_val = ch_malloc( li->li_idassert_authzID.bv_len + 1 );
953                                 AC_MEMCPY( li->li_idassert_authzID.bv_val, "dn:", STRLENOF( "dn:" ) );
954                                 AC_MEMCPY( &li->li_idassert_authzID.bv_val[ STRLENOF( "dn:" ) ], ndn.bv_val, ndn.bv_len + 1 );
955                                 ch_free( ndn.bv_val );
956
957                                 li->li_idassert_mode = LDAP_BACK_IDASSERT_OTHERDN;
958                         }
959
960                 } else {
961                         li->li_idassert_mode = idassert_mode[i].mask;
962                 }
963
964                 if ( c->argc > 2 ) {
965                         int     i;
966
967                         for ( i = 2; i < c->argc; i++ ) {
968                                 if ( strcasecmp( c->argv[ i ], "override" ) == 0 ) {
969                                         li->li_idassert_flags |= LDAP_BACK_AUTH_OVERRIDE;
970
971                                 } else if ( strcasecmp( c->argv[ i ], "prescriptive" ) == 0 ) {
972                                         li->li_idassert_flags |= LDAP_BACK_AUTH_PRESCRIPTIVE;
973
974                                 } else if ( strcasecmp( c->argv[ i ], "non-prescriptive" ) == 0 ) {
975                                         li->li_idassert_flags &= ( ~LDAP_BACK_AUTH_PRESCRIPTIVE );
976
977                                 } else if ( strcasecmp( c->argv[ i ], "obsolete-proxy-authz" ) == 0 ) {
978                                         if ( li->li_idassert_flags & LDAP_BACK_AUTH_OBSOLETE_ENCODING_WORKAROUND ) {
979                                                 Debug( LDAP_DEBUG_ANY,
980                                                         "%s: line %d: \"obsolete-proxy-authz\" flag "
981                                                         "in \"idassert-mode <args>\" "
982                                                         "incompatible with previously issued \"obsolete-encoding-workaround\" flag.\n",
983                                                         c->fname, c->lineno, 0 );
984                                                 return 1;
985                                         }
986                                         li->li_idassert_flags |= LDAP_BACK_AUTH_OBSOLETE_PROXY_AUTHZ;
987
988                                 } else if ( strcasecmp( c->argv[ i ], "obsolete-encoding-workaround" ) == 0 ) {
989                                         if ( li->li_idassert_flags & LDAP_BACK_AUTH_OBSOLETE_PROXY_AUTHZ ) {
990                                                 Debug( LDAP_DEBUG_ANY,
991                                                         "%s: line %d: \"obsolete-encoding-workaround\" flag "
992                                                         "in \"idassert-mode <args>\" "
993                                                         "incompatible with previously issued \"obsolete-proxy-authz\" flag.\n",
994                                                         c->fname, c->lineno, 0 );
995                                                 return 1;
996                                         }
997                                         li->li_idassert_flags |= LDAP_BACK_AUTH_OBSOLETE_ENCODING_WORKAROUND;
998
999                                 } else {
1000                                         Debug( LDAP_DEBUG_ANY,
1001                                                 "%s: line %d: unknown flag #%d "
1002                                                 "in \"idassert-mode <args> "
1003                                                 "[<flags>]\" line.\n",
1004                                                 c->fname, c->lineno, i - 2 );
1005                                         return 1;
1006                                 }
1007                         }
1008                 }
1009                 break;
1010
1011         case LDAP_BACK_CFG_IDASSERT_AUTHCDN:
1012                 switch ( li->li_idassert_authmethod ) {
1013                 case LDAP_AUTH_NONE:
1014                         li->li_idassert_authmethod = LDAP_AUTH_SIMPLE;
1015                         break;
1016
1017                 case LDAP_AUTH_SIMPLE:
1018                         break;
1019
1020                 default:
1021                         snprintf( c->msg, sizeof( c->msg ),
1022                                 "\"idassert-authcDN <DN>\" incompatible "
1023                                 "with auth method %d",
1024                                 li->li_idassert_authmethod );
1025                         Debug( LDAP_DEBUG_ANY, "%s: %s.\n", c->log, c->msg, 0 );
1026                         return 1;
1027                 }
1028                 if ( !BER_BVISNULL( &li->li_idassert_authcDN ) ) {
1029                         free( li->li_idassert_authcDN.bv_val );
1030                 }
1031                 ber_memfree_x( c->value_dn.bv_val, NULL );
1032                 li->li_idassert_authcDN = c->value_ndn;
1033                 BER_BVZERO( &c->value_dn );
1034                 BER_BVZERO( &c->value_ndn );
1035                 break;
1036
1037         case LDAP_BACK_CFG_IDASSERT_PASSWD:
1038                 switch ( li->li_idassert_authmethod ) {
1039                 case LDAP_AUTH_NONE:
1040                         li->li_idassert_authmethod = LDAP_AUTH_SIMPLE;
1041                         break;
1042
1043                 case LDAP_AUTH_SIMPLE:
1044                         break;
1045
1046                 default:
1047                         snprintf( c->msg, sizeof( c->msg ),
1048                                 "\"idassert-passwd <cred>\" incompatible "
1049                                 "with auth method %d",
1050                                 li->li_idassert_authmethod );
1051                         Debug( LDAP_DEBUG_ANY, "%s: %s.\n", c->log, c->msg, 0 );
1052                         return 1;
1053                 }
1054                 if ( !BER_BVISNULL( &li->li_idassert_passwd ) ) {
1055                         free( li->li_idassert_passwd.bv_val );
1056                 }
1057                 ber_str2bv( c->argv[ 1 ], 0, 1, &li->li_idassert_passwd );
1058                 break;
1059
1060         case LDAP_BACK_CFG_IDASSERT_AUTHZFROM: {
1061                 struct berval   bv;
1062 #ifdef SLAP_AUTHZ_SYNTAX
1063                 struct berval   in;
1064                 int             rc;
1065
1066                 ber_str2bv( c->argv[ 1 ], 0, 0, &in );
1067                 rc = authzNormalize( 0, NULL, NULL, &in, &bv, NULL );
1068                 if ( rc != LDAP_SUCCESS ) {
1069                         snprintf( c->msg, sizeof( c->msg ),
1070                                 "\"idassert-authzFrom <authz>\": "
1071                                 "invalid syntax" );
1072                         Debug( LDAP_DEBUG_ANY, "%s: %s.\n", c->log, c->msg, 0 );
1073                         return 1;
1074                 }
1075 #else /* !SLAP_AUTHZ_SYNTAX */
1076                 ber_str2bv( c->argv[ 1 ], 0, 1, &bv );
1077 #endif /* !SLAP_AUTHZ_SYNTAX */
1078                 ber_bvarray_add( &li->li_idassert_authz, &bv );
1079                 } break;
1080
1081         case LDAP_BACK_CFG_IDASSERT_METHOD:
1082                 /* no longer supported */
1083                 snprintf( c->msg, sizeof( c->msg ),
1084                         "\"idassert-method <args>\": "
1085                         "no longer supported; use \"idassert-bind\"" );
1086                 Debug( LDAP_DEBUG_ANY, "%s: %s.\n", c->log, c->msg, 0 );
1087                 return 1;
1088
1089         case LDAP_BACK_CFG_IDASSERT_BIND:
1090                 for ( i = 1; i < c->argc; i++ ) {
1091                         if ( strncasecmp( c->argv[ i ], "mode=", STRLENOF( "mode=" ) ) == 0 ) {
1092                                 char    *argvi = c->argv[ i ] + STRLENOF( "mode=" );
1093                                 int     j;
1094
1095                                 j = verb_to_mask( argvi, idassert_mode );
1096                                 if ( BER_BVISNULL( &idassert_mode[ j ].word ) ) {
1097                                         snprintf( c->msg, sizeof( c->msg ),
1098                                                 "\"idassert-bind <args>\": "
1099                                                 "unknown mode \"%s\"",
1100                                                 argvi );
1101                                         Debug( LDAP_DEBUG_ANY, "%s: %s.\n", c->log, c->msg, 0 );
1102                                         return 1;
1103                                 }
1104
1105                                 li->li_idassert_mode = idassert_mode[ j ].mask;
1106
1107                         } else if ( strncasecmp( c->argv[ i ], "authz=", STRLENOF( "authz=" ) ) == 0 ) {
1108                                 char    *argvi = c->argv[ i ] + STRLENOF( "authz=" );
1109
1110                                 if ( strcasecmp( argvi, "native" ) == 0 ) {
1111                                         if ( li->li_idassert_authmethod != LDAP_AUTH_SASL ) {
1112                                                 snprintf( c->msg, sizeof( c->msg ),
1113                                                         "\"idassert-bind <args>\": "
1114                                                         "authz=\"native\" incompatible "
1115                                                         "with auth method" );
1116                                                 Debug( LDAP_DEBUG_ANY, "%s: %s.\n", c->log, c->msg, 0 );
1117                                                 return 1;
1118                                         }
1119                                         li->li_idassert_flags |= LDAP_BACK_AUTH_NATIVE_AUTHZ;
1120
1121                                 } else if ( strcasecmp( argvi, "proxyAuthz" ) == 0 ) {
1122                                         li->li_idassert_flags &= ~LDAP_BACK_AUTH_NATIVE_AUTHZ;
1123
1124                                 } else {
1125                                         snprintf( c->msg, sizeof( c->msg ),
1126                                                 "\"idassert-bind <args>\": "
1127                                                 "unknown authz \"%s\"",
1128                                                 argvi );
1129                                         Debug( LDAP_DEBUG_ANY, "%s: %s.\n", c->log, c->msg, 0 );
1130                                         return 1;
1131                                 }
1132
1133                         } else if ( strncasecmp( c->argv[ i ], "flags=", STRLENOF( "flags=" ) ) == 0 ) {
1134                                 char    *argvi = c->argv[ i ] + STRLENOF( "flags=" );
1135                                 char    **flags = ldap_str2charray( argvi, "," );
1136                                 int     j;
1137
1138                                 if ( flags == NULL ) {
1139                                         snprintf( c->msg, sizeof( c->msg ),
1140                                                 "\"idassert-bind <args>\": "
1141                                                 "unable to parse flags \"%s\"",
1142                                                 argvi );
1143                                         Debug( LDAP_DEBUG_ANY, "%s: %s.\n", c->log, c->msg, 0 );
1144                                         return 1;
1145                                 }
1146
1147                                 for ( j = 0; flags[ j ] != NULL; j++ ) {
1148                                         if ( strcasecmp( flags[ j ], "override" ) == 0 ) {
1149                                                 li->li_idassert_flags |= LDAP_BACK_AUTH_OVERRIDE;
1150
1151                                         } else if ( strcasecmp( flags[ j ], "prescriptive" ) == 0 ) {
1152                                                 li->li_idassert_flags |= LDAP_BACK_AUTH_PRESCRIPTIVE;
1153
1154                                         } else if ( strcasecmp( flags[ j ], "non-prescriptive" ) == 0 ) {
1155                                                 li->li_idassert_flags &= ( ~LDAP_BACK_AUTH_PRESCRIPTIVE );
1156
1157                                         } else if ( strcasecmp( flags[ j ], "obsolete-proxy-authz" ) == 0 ) {
1158                                                 if ( li->li_idassert_flags & LDAP_BACK_AUTH_OBSOLETE_ENCODING_WORKAROUND ) {
1159                                                         Debug( LDAP_DEBUG_ANY,
1160                                                                 "%s: line %d: \"obsolete-proxy-authz\" flag "
1161                                                                 "in \"idassert-mode <args>\" "
1162                                                                 "incompatible with previously issued \"obsolete-encoding-workaround\" flag.\n",
1163                                                                 c->fname, c->lineno, 0 );
1164                                                         return 1;
1165                                                 }
1166                                                 li->li_idassert_flags |= LDAP_BACK_AUTH_OBSOLETE_PROXY_AUTHZ;
1167
1168                                         } else if ( strcasecmp( flags[ j ], "obsolete-encoding-workaround" ) == 0 ) {
1169                                                 if ( li->li_idassert_flags & LDAP_BACK_AUTH_OBSOLETE_PROXY_AUTHZ ) {
1170                                                         Debug( LDAP_DEBUG_ANY,
1171                                                                 "%s: line %d: \"obsolete-encoding-workaround\" flag "
1172                                                                 "in \"idassert-mode <args>\" "
1173                                                                 "incompatible with previously issued \"obsolete-proxy-authz\" flag.\n",
1174                                                                 c->fname, c->lineno, 0 );
1175                                                         return 1;
1176                                                 }
1177                                                 li->li_idassert_flags |= LDAP_BACK_AUTH_OBSOLETE_ENCODING_WORKAROUND;
1178
1179                                         } else {
1180                                                 snprintf( c->msg, sizeof( c->msg ),
1181                                                         "\"idassert-bind <args>\": "
1182                                                         "unknown flag \"%s\"",
1183                                                         flags[ j ] );
1184                                                 Debug( LDAP_DEBUG_ANY, "%s: %s.\n", c->log, c->msg, 0 );
1185                                                 ldap_charray_free( flags );
1186                                                 return 1;
1187                                         }
1188                                 }
1189
1190                                 ldap_charray_free( flags );
1191
1192                         } else if ( bindconf_parse( c->argv[ i ], &li->li_idassert ) ) {
1193                                 return 1;
1194                         }
1195                 }
1196                 break;
1197
1198         case LDAP_BACK_CFG_REBIND:
1199                 if ( c->argc == 1 || c->value_int ) {
1200                         li->li_flags |= LDAP_BACK_F_SAVECRED;
1201
1202                 } else {
1203                         li->li_flags &= ~LDAP_BACK_F_SAVECRED;
1204                 }
1205                 break;
1206
1207         case LDAP_BACK_CFG_CHASE:
1208                 if ( c->argc == 1 || c->value_int ) {
1209                         li->li_flags |= LDAP_BACK_F_CHASE_REFERRALS;
1210
1211                 } else {
1212                         li->li_flags &= ~LDAP_BACK_F_CHASE_REFERRALS;
1213                 }
1214                 break;
1215
1216         case LDAP_BACK_CFG_T_F:
1217                 i = verb_to_mask( c->argv[1], t_f_mode );
1218                 if ( BER_BVISNULL( &t_f_mode[i].word ) ) {
1219                         return 1;
1220                 }
1221                 li->li_flags &= ~LDAP_BACK_F_SUPPORT_T_F_MASK;
1222                 li->li_flags |= t_f_mode[i].mask;
1223                 break;
1224
1225         case LDAP_BACK_CFG_WHOAMI:
1226                 if ( c->argc == 1 || c->value_int ) {
1227                         li->li_flags |= LDAP_BACK_F_PROXY_WHOAMI;
1228                         load_extop( (struct berval *)&slap_EXOP_WHOAMI,
1229                                         0, ldap_back_exop_whoami );
1230
1231                 } else {
1232                         li->li_flags &= ~LDAP_BACK_F_PROXY_WHOAMI;
1233                 }
1234                 break;
1235
1236         case LDAP_BACK_CFG_TIMEOUT:
1237                 for ( i = 1; i < c->argc; i++ ) {
1238                         if ( isdigit( (unsigned char) c->argv[ i ][ 0 ] ) ) {
1239                                 int             j;
1240                                 unsigned        u;
1241
1242                                 if ( lutil_atoux( &u, c->argv[ i ], 0 ) != 0 ) {
1243                                         return 1;
1244                                 }
1245
1246                                 for ( j = 0; j < LDAP_BACK_OP_LAST; j++ ) {
1247                                         li->li_timeout[ j ] = u;
1248                                 }
1249
1250                                 continue;
1251                         }
1252
1253                         if ( slap_cf_aux_table_parse( c->argv[ i ], li->li_timeout, timeout_table, "slapd-ldap timeout" ) ) {
1254                                 return 1;
1255                         }
1256                 }
1257                 break;
1258
1259         case LDAP_BACK_CFG_IDLE_TIMEOUT: {
1260                 unsigned long   t;
1261
1262                 if ( lutil_parse_time( c->argv[ 1 ], &t ) != 0 ) {
1263                         snprintf( c->msg, sizeof( c->msg),
1264                                 "unable to parse idle timeout \"%s\"",
1265                                 c->argv[ 1 ] );
1266                         Debug( LDAP_DEBUG_ANY, "%s: %s.\n", c->log, c->msg, 0 );
1267                         return 1;
1268                 }
1269                 li->li_idle_timeout = (time_t)t;
1270                 } break;
1271
1272         case LDAP_BACK_CFG_CONN_TTL: {
1273                 unsigned long   t;
1274
1275                 if ( lutil_parse_time( c->argv[ 1 ], &t ) != 0 ) {
1276                         snprintf( c->msg, sizeof( c->msg),
1277                                 "unable to parse conn ttl\"%s\"",
1278                                 c->argv[ 1 ] );
1279                         Debug( LDAP_DEBUG_ANY, "%s: %s.\n", c->log, c->msg, 0 );
1280                         return 1;
1281                 }
1282                 li->li_conn_ttl = (time_t)t;
1283                 } break;
1284
1285         case LDAP_BACK_CFG_NETWORK_TIMEOUT: {
1286                 unsigned long   t;
1287
1288                 if ( lutil_parse_time( c->argv[ 1 ], &t ) != 0 ) {
1289                         snprintf( c->msg, sizeof( c->msg),
1290                                 "unable to parse network timeout \"%s\"",
1291                                 c->argv[ 1 ] );
1292                         Debug( LDAP_DEBUG_ANY, "%s: %s.\n", c->log, c->msg, 0 );
1293                         return 1;
1294                 }
1295                 li->li_network_timeout = (time_t)t;
1296                 } break;
1297
1298         case LDAP_BACK_CFG_REWRITE:
1299                 snprintf( c->msg, sizeof( c->msg ),
1300                         "rewrite/remap capabilities have been moved "
1301                         "to the \"rwm\" overlay; see slapo-rwm(5) "
1302                         "for details (hint: add \"overlay rwm\" "
1303                         "and prefix all directives with \"rwm-\")" );
1304                 Debug( LDAP_DEBUG_ANY, "%s: %s.\n", c->log, c->msg, 0 );
1305                 return 1;
1306                 
1307         default:
1308                 /* FIXME: try to catch inconsistencies */
1309                 assert( 0 );
1310                 break;
1311         }
1312
1313         return 0;
1314 }
1315
1316 int
1317 ldap_back_init_cf( BackendInfo *bi )
1318 {
1319         int                     rc;
1320         AttributeDescription    *ad = NULL;
1321         const char              *text;
1322
1323         /* Make sure we don't exceed the bits reserved for userland */
1324         config_check_userland( LDAP_BACK_CFG_LAST );
1325
1326         bi->bi_cf_ocs = ldapocs;
1327
1328         rc = config_register_schema( ldapcfg, ldapocs );
1329         if ( rc ) {
1330                 return rc;
1331         }
1332
1333         /* setup olcDbAclPasswd and olcDbIDAssertPasswd 
1334          * to be base64-encoded when written in LDIF form;
1335          * basically, we don't care if it fails */
1336         rc = slap_str2ad( "olcDbACLPasswd", &ad, &text );
1337         if ( rc ) {
1338                 Debug( LDAP_DEBUG_ANY, "config_back_initialize: "
1339                         "warning, unable to get \"olcDbACLPasswd\" "
1340                         "attribute description: %d: %s\n",
1341                         rc, text, 0 );
1342         } else {
1343                 (void)ldif_must_b64_encode_register( ad->ad_cname.bv_val,
1344                         ad->ad_type->sat_oid );
1345         }
1346
1347         ad = NULL;
1348         rc = slap_str2ad( "olcDbIDAssertPasswd", &ad, &text );
1349         if ( rc ) {
1350                 Debug( LDAP_DEBUG_ANY, "config_back_initialize: "
1351                         "warning, unable to get \"olcDbIDAssertPasswd\" "
1352                         "attribute description: %d: %s\n",
1353                         rc, text, 0 );
1354         } else {
1355                 (void)ldif_must_b64_encode_register( ad->ad_cname.bv_val,
1356                         ad->ad_type->sat_oid );
1357         }
1358
1359         return 0;
1360 }
1361
1362
1363 static int
1364 ldap_back_exop_whoami(
1365                 Operation       *op,
1366                 SlapReply       *rs )
1367 {
1368         struct berval *bv = NULL;
1369
1370         if ( op->oq_extended.rs_reqdata != NULL ) {
1371                 /* no request data should be provided */
1372                 rs->sr_text = "no request data expected";
1373                 return rs->sr_err = LDAP_PROTOCOL_ERROR;
1374         }
1375
1376         Statslog( LDAP_DEBUG_STATS, "%s WHOAMI\n",
1377             op->o_log_prefix, 0, 0, 0, 0 );
1378
1379         rs->sr_err = backend_check_restrictions( op, rs, 
1380                         (struct berval *)&slap_EXOP_WHOAMI );
1381         if( rs->sr_err != LDAP_SUCCESS ) return rs->sr_err;
1382
1383         /* if auth'd by back-ldap and request is proxied, forward it */
1384         if ( op->o_conn->c_authz_backend
1385                 && !strcmp( op->o_conn->c_authz_backend->be_type, "ldap" )
1386                 && !dn_match( &op->o_ndn, &op->o_conn->c_ndn ) )
1387         {
1388                 ldapconn_t      *lc;
1389                 LDAPControl c, *ctrls[2] = {NULL, NULL};
1390                 LDAPMessage *res;
1391                 Operation op2 = *op;
1392                 ber_int_t msgid;
1393                 int doretry = 1;
1394                 char *ptr;
1395
1396                 ctrls[0] = &c;
1397                 op2.o_ndn = op->o_conn->c_ndn;
1398                 lc = ldap_back_getconn(&op2, rs, LDAP_BACK_SENDERR);
1399                 if ( !lc || !ldap_back_dobind( lc, op, rs, LDAP_BACK_SENDERR ) ) {
1400                         return -1;
1401                 }
1402                 c.ldctl_oid = LDAP_CONTROL_PROXY_AUTHZ;
1403                 c.ldctl_iscritical = 1;
1404                 c.ldctl_value.bv_val = op->o_tmpalloc(
1405                         op->o_ndn.bv_len + STRLENOF( "dn:" ) + 1,
1406                         op->o_tmpmemctx );
1407                 c.ldctl_value.bv_len = op->o_ndn.bv_len + 3;
1408                 ptr = c.ldctl_value.bv_val;
1409                 ptr = lutil_strcopy( ptr, "dn:" );
1410                 ptr = lutil_strncopy( ptr, op->o_ndn.bv_val, op->o_ndn.bv_len );
1411                 ptr[ 0 ] = '\0';
1412
1413 retry:
1414                 rs->sr_err = ldap_whoami( lc->lc_ld, ctrls, NULL, &msgid );
1415                 if ( rs->sr_err == LDAP_SUCCESS ) {
1416                         if ( ldap_result( lc->lc_ld, msgid, LDAP_MSG_ALL, NULL, &res ) == -1 ) {
1417                                 ldap_get_option( lc->lc_ld, LDAP_OPT_ERROR_NUMBER,
1418                                         &rs->sr_err );
1419                                 if ( rs->sr_err == LDAP_SERVER_DOWN && doretry ) {
1420                                         doretry = 0;
1421                                         if ( ldap_back_retry( &lc, op, rs, LDAP_BACK_SENDERR ) ) {
1422                                                 goto retry;
1423                                         }
1424                                 }
1425
1426                         } else {
1427                                 /* NOTE: are we sure "bv" will be malloc'ed
1428                                  * with the appropriate memory? */
1429                                 rs->sr_err = ldap_parse_whoami( lc->lc_ld, res, &bv );
1430                                 ldap_msgfree(res);
1431                         }
1432                 }
1433                 op->o_tmpfree( c.ldctl_value.bv_val, op->o_tmpmemctx );
1434                 if ( rs->sr_err != LDAP_SUCCESS ) {
1435                         rs->sr_err = slap_map_api2result( rs );
1436                 }
1437
1438                 if ( lc != NULL ) {
1439                         ldap_back_release_conn( &op2, rs, lc );
1440                 }
1441
1442         } else {
1443                 /* else just do the same as before */
1444                 bv = (struct berval *) ch_malloc( sizeof( struct berval ) );
1445                 if ( !BER_BVISEMPTY( &op->o_dn ) ) {
1446                         bv->bv_len = op->o_dn.bv_len + STRLENOF( "dn:" );
1447                         bv->bv_val = ch_malloc( bv->bv_len + 1 );
1448                         AC_MEMCPY( bv->bv_val, "dn:", STRLENOF( "dn:" ) );
1449                         AC_MEMCPY( &bv->bv_val[ STRLENOF( "dn:" ) ], op->o_dn.bv_val,
1450                                 op->o_dn.bv_len );
1451                         bv->bv_val[ bv->bv_len ] = '\0';
1452
1453                 } else {
1454                         bv->bv_len = 0;
1455                         bv->bv_val = NULL;
1456                 }
1457         }
1458
1459         rs->sr_rspdata = bv;
1460         return rs->sr_err;
1461 }
1462
1463