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