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