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