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