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