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