git.sur5r.net Git - openldap/blob - servers/slapd/slapi/slapi_pblock.c

   1 /* $OpenLDAP$ */
   2 /* This work is part of OpenLDAP Software <http://www.openldap.org/>.
   3  *
   4  * Copyright 2002-2005 The OpenLDAP Foundation.
   5  * Portions Copyright 1997,2002-2003 IBM Corporation.
   6  * All rights reserved.
   7  *
   8  * Redistribution and use in source and binary forms, with or without
   9  * modification, are permitted only as authorized by the OpenLDAP
  10  * Public License.
  11  *
  12  * A copy of this license is available in the file LICENSE in the
  13  * top-level directory of the distribution or, alternatively, at
  14  * <http://www.OpenLDAP.org/license.html>.
  15  */
  16 /* ACKNOWLEDGEMENTS:
  17  * This work was initially developed by IBM Corporation for use in
  18  * IBM products and subsequently ported to OpenLDAP Software by
  19  * Steve Omrani.  Additional significant contributors include:
  20  *   Luke Howard
  21  */
  22
  23 #include "portable.h"
  24 #include <slap.h>
  25 #include <slapi.h>
  26
  27 #ifdef LDAP_SLAPI
  28
  29 /* some parameters require a valid connection and operation */
  30 #define PBLOCK_LOCK_CONN( _pb )         do { \
  31                 ldap_pvt_thread_mutex_lock( &(_pb)->pb_conn->c_mutex ); \
  32         } while (0)
  33
  34 #define PBLOCK_UNLOCK_CONN( _pb )       do { \
  35                 ldap_pvt_thread_mutex_unlock( &(_pb)->pb_conn->c_mutex ); \
  36         } while (0)
  37
  38 /* some parameters are only settable for internal operations */
  39 #define PBLOCK_VALIDATE_IS_INTOP( _pb ) do { if ( (_pb)->pb_intop == 0 ) break; } while ( 0 )
  40
  41 static slapi_pblock_class_t
  42 pblock_get_param_class( int param )
  43 {
  44         switch ( param ) {
  45         case SLAPI_PLUGIN_TYPE:
  46         case SLAPI_PLUGIN_ARGC:
  47         case SLAPI_PLUGIN_OPRETURN:
  48         case SLAPI_PLUGIN_INTOP_RESULT:
  49         case SLAPI_CONFIG_LINENO:
  50         case SLAPI_CONFIG_ARGC:
  51         case SLAPI_BIND_METHOD:
  52         case SLAPI_MODRDN_DELOLDRDN:
  53         case SLAPI_SEARCH_SCOPE:
  54         case SLAPI_SEARCH_DEREF:
  55         case SLAPI_SEARCH_SIZELIMIT:
  56         case SLAPI_SEARCH_TIMELIMIT:
  57         case SLAPI_SEARCH_ATTRSONLY:
  58         case SLAPI_NENTRIES:
  59         case SLAPI_CHANGENUMBER:
  60         case SLAPI_DBSIZE:
  61         case SLAPI_REQUESTOR_ISROOT:
  62         case SLAPI_BE_READONLY:
  63         case SLAPI_BE_LASTMOD:
  64         case SLAPI_DB2LDIF_PRINTKEY:
  65         case SLAPI_LDIF2DB_REMOVEDUPVALS:
  66         case SLAPI_MANAGEDSAIT:
  67         case SLAPI_IS_REPLICATED_OPERATION:
  68         case SLAPI_X_CONN_IS_UDP:
  69         case SLAPI_X_CONN_SSF:
  70         case SLAPI_RESULT_CODE:
  71         case SLAPI_LOG_OPERATION:
  72                 return PBLOCK_CLASS_INTEGER;
  73                 break;
  74
  75         case SLAPI_CONN_ID:
  76         case SLAPI_OPERATION_ID:
  77         case SLAPI_OPINITIATED_TIME:
  78         case SLAPI_ABANDON_MSGID:
  79                 return PBLOCK_CLASS_LONG_INTEGER;
  80                 break;
  81
  82         case SLAPI_PLUGIN_DESTROY_FN:
  83         case SLAPI_PLUGIN_DB_BIND_FN:
  84         case SLAPI_PLUGIN_DB_UNBIND_FN:
  85         case SLAPI_PLUGIN_DB_SEARCH_FN:
  86         case SLAPI_PLUGIN_DB_COMPARE_FN:
  87         case SLAPI_PLUGIN_DB_MODIFY_FN:
  88         case SLAPI_PLUGIN_DB_MODRDN_FN:
  89         case SLAPI_PLUGIN_DB_ADD_FN:
  90         case SLAPI_PLUGIN_DB_DELETE_FN:
  91         case SLAPI_PLUGIN_DB_ABANDON_FN:
  92         case SLAPI_PLUGIN_DB_CONFIG_FN:
  93         case SLAPI_PLUGIN_CLOSE_FN:
  94         case SLAPI_PLUGIN_DB_FLUSH_FN:
  95         case SLAPI_PLUGIN_START_FN:
  96         case SLAPI_PLUGIN_DB_SEQ_FN:
  97         case SLAPI_PLUGIN_DB_ENTRY_FN:
  98         case SLAPI_PLUGIN_DB_REFERRAL_FN:
  99         case SLAPI_PLUGIN_DB_RESULT_FN:
 100         case SLAPI_PLUGIN_DB_LDIF2DB_FN:
 101         case SLAPI_PLUGIN_DB_DB2LDIF_FN:
 102         case SLAPI_PLUGIN_DB_BEGIN_FN:
 103         case SLAPI_PLUGIN_DB_COMMIT_FN:
 104         case SLAPI_PLUGIN_DB_ABORT_FN:
 105         case SLAPI_PLUGIN_DB_ARCHIVE2DB_FN:
 106         case SLAPI_PLUGIN_DB_DB2ARCHIVE_FN:
 107         case SLAPI_PLUGIN_DB_NEXT_SEARCH_ENTRY_FN:
 108         case SLAPI_PLUGIN_DB_FREE_RESULT_SET_FN:
 109         case SLAPI_PLUGIN_DB_SIZE_FN:
 110         case SLAPI_PLUGIN_DB_TEST_FN:
 111         case SLAPI_PLUGIN_DB_NO_ACL:
 112         case SLAPI_PLUGIN_EXT_OP_FN:
 113         case SLAPI_PLUGIN_EXT_OP_OIDLIST:
 114         case SLAPI_PLUGIN_PRE_BIND_FN:
 115         case SLAPI_PLUGIN_PRE_UNBIND_FN:
 116         case SLAPI_PLUGIN_PRE_SEARCH_FN:
 117         case SLAPI_PLUGIN_PRE_COMPARE_FN:
 118         case SLAPI_PLUGIN_PRE_MODIFY_FN:
 119         case SLAPI_PLUGIN_PRE_MODRDN_FN:
 120         case SLAPI_PLUGIN_PRE_ADD_FN:
 121         case SLAPI_PLUGIN_PRE_DELETE_FN:
 122         case SLAPI_PLUGIN_PRE_ABANDON_FN:
 123         case SLAPI_PLUGIN_PRE_ENTRY_FN:
 124         case SLAPI_PLUGIN_PRE_REFERRAL_FN:
 125         case SLAPI_PLUGIN_PRE_RESULT_FN:
 126         case SLAPI_PLUGIN_INTERNAL_PRE_ADD_FN:
 127         case SLAPI_PLUGIN_INTERNAL_PRE_MODIFY_FN:
 128         case SLAPI_PLUGIN_INTERNAL_PRE_MODRDN_FN:
 129         case SLAPI_PLUGIN_INTERNAL_PRE_DELETE_FN:
 130         case SLAPI_PLUGIN_BE_PRE_ADD_FN:
 131         case SLAPI_PLUGIN_BE_PRE_MODIFY_FN:
 132         case SLAPI_PLUGIN_BE_PRE_MODRDN_FN:
 133         case SLAPI_PLUGIN_BE_PRE_DELETE_FN:
 134         case SLAPI_PLUGIN_POST_BIND_FN:
 135         case SLAPI_PLUGIN_POST_UNBIND_FN:
 136         case SLAPI_PLUGIN_POST_SEARCH_FN:
 137         case SLAPI_PLUGIN_POST_COMPARE_FN:
 138         case SLAPI_PLUGIN_POST_MODIFY_FN:
 139         case SLAPI_PLUGIN_POST_MODRDN_FN:
 140         case SLAPI_PLUGIN_POST_ADD_FN:
 141         case SLAPI_PLUGIN_POST_DELETE_FN:
 142         case SLAPI_PLUGIN_POST_ABANDON_FN:
 143         case SLAPI_PLUGIN_POST_ENTRY_FN:
 144         case SLAPI_PLUGIN_POST_REFERRAL_FN:
 145         case SLAPI_PLUGIN_POST_RESULT_FN:
 146         case SLAPI_PLUGIN_INTERNAL_POST_ADD_FN:
 147         case SLAPI_PLUGIN_INTERNAL_POST_MODIFY_FN:
 148         case SLAPI_PLUGIN_INTERNAL_POST_MODRDN_FN:
 149         case SLAPI_PLUGIN_INTERNAL_POST_DELETE_FN:
 150         case SLAPI_PLUGIN_BE_POST_ADD_FN:
 151         case SLAPI_PLUGIN_BE_POST_MODIFY_FN:
 152         case SLAPI_PLUGIN_BE_POST_MODRDN_FN:
 153         case SLAPI_PLUGIN_BE_POST_DELETE_FN:
 154         case SLAPI_PLUGIN_MR_FILTER_CREATE_FN:
 155         case SLAPI_PLUGIN_MR_INDEXER_CREATE_FN:
 156         case SLAPI_PLUGIN_MR_FILTER_MATCH_FN:
 157         case SLAPI_PLUGIN_MR_FILTER_INDEX_FN:
 158         case SLAPI_PLUGIN_MR_FILTER_RESET_FN:
 159         case SLAPI_PLUGIN_MR_INDEX_FN:
 160         case SLAPI_PLUGIN_COMPUTE_EVALUATOR_FN:
 161         case SLAPI_PLUGIN_COMPUTE_SEARCH_REWRITER_FN:
 162         case SLAPI_PLUGIN_ACL_ALLOW_ACCESS:
 163         case SLAPI_X_PLUGIN_PRE_GROUP_FN:
 164         case SLAPI_X_PLUGIN_POST_GROUP_FN:
 165         case SLAPI_PLUGIN_AUDIT_FN:
 166                 return PBLOCK_CLASS_FUNCTION_POINTER;
 167                 break;
 168
 169         case SLAPI_BACKEND:
 170         case SLAPI_CONNECTION:
 171         case SLAPI_OPERATION:
 172         case SLAPI_OPERATION_PARAMETERS:
 173         case SLAPI_OPERATION_TYPE:
 174         case SLAPI_OPERATION_AUTHTYPE:
 175         case SLAPI_BE_MONITORDN:
 176         case SLAPI_BE_TYPE:
 177         case SLAPI_REQUESTOR_DN:
 178         case SLAPI_CONN_DN:
 179         case SLAPI_CONN_CLIENTIP:
 180         case SLAPI_CONN_SERVERIP:
 181         case SLAPI_CONN_AUTHTYPE:
 182         case SLAPI_CONN_AUTHMETHOD:
 183         case SLAPI_CONN_CERT:
 184         case SLAPI_X_CONN_CLIENTPATH:
 185         case SLAPI_X_CONN_SERVERPATH:
 186         case SLAPI_X_CONN_SASL_CONTEXT:
 187         case SLAPI_X_CONFIG_ARGV:
 188         case SLAPI_X_INTOP_FLAGS:
 189         case SLAPI_X_INTOP_RESULT_CALLBACK:
 190         case SLAPI_X_INTOP_SEARCH_ENTRY_CALLBACK:
 191         case SLAPI_X_INTOP_REFERRAL_ENTRY_CALLBACK:
 192         case SLAPI_X_INTOP_CALLBACK_DATA:
 193         case SLAPI_PLUGIN_MR_OID:
 194         case SLAPI_PLUGIN_MR_TYPE:
 195         case SLAPI_PLUGIN_MR_VALUE:
 196         case SLAPI_PLUGIN_MR_VALUES:
 197         case SLAPI_PLUGIN_MR_KEYS:
 198         case SLAPI_PLUGIN:
 199         case SLAPI_PLUGIN_PRIVATE:
 200         case SLAPI_PLUGIN_ARGV:
 201         case SLAPI_PLUGIN_OBJECT:
 202         case SLAPI_PLUGIN_DESCRIPTION:
 203         case SLAPI_PLUGIN_IDENTITY:
 204         case SLAPI_PLUGIN_INTOP_SEARCH_ENTRIES:
 205         case SLAPI_PLUGIN_INTOP_SEARCH_REFERRALS:
 206         case SLAPI_PLUGIN_MR_FILTER_REUSABLE:
 207         case SLAPI_PLUGIN_MR_QUERY_OPERATOR:
 208         case SLAPI_PLUGIN_MR_USAGE:
 209         case SLAPI_OP_LESS:
 210         case SLAPI_OP_LESS_OR_EQUAL:
 211         case SLAPI_PLUGIN_MR_USAGE_INDEX:
 212         case SLAPI_PLUGIN_SYNTAX_FILTER_AVA:
 213         case SLAPI_PLUGIN_SYNTAX_FILTER_SUB:
 214         case SLAPI_PLUGIN_SYNTAX_VALUES2KEYS:
 215         case SLAPI_PLUGIN_SYNTAX_ASSERTION2KEYS_AVA:
 216         case SLAPI_PLUGIN_SYNTAX_ASSERTION2KEYS_SUB:
 217         case SLAPI_PLUGIN_SYNTAX_NAMES:
 218         case SLAPI_PLUGIN_SYNTAX_OID:
 219         case SLAPI_PLUGIN_SYNTAX_FLAGS:
 220         case SLAPI_PLUGIN_SYNTAX_COMPARE:
 221         case SLAPI_CONFIG_FILENAME:
 222         case SLAPI_CONFIG_ARGV:
 223         case SLAPI_TARGET_ADDRESS:
 224         case SLAPI_TARGET_UNIQUEID:
 225         case SLAPI_TARGET_DN:
 226         case SLAPI_REQCONTROLS:
 227         case SLAPI_ENTRY_PRE_OP:
 228         case SLAPI_ENTRY_POST_OP:
 229         case SLAPI_RESCONTROLS:
 230         case SLAPI_X_OLD_RESCONTROLS:
 231         case SLAPI_ADD_RESCONTROL:
 232         case SLAPI_CONTROLS_ARG:
 233         case SLAPI_ADD_ENTRY:
 234         case SLAPI_ADD_EXISTING_DN_ENTRY:
 235         case SLAPI_ADD_PARENT_ENTRY:
 236         case SLAPI_ADD_PARENT_UNIQUEID:
 237         case SLAPI_ADD_EXISTING_UNIQUEID_ENTRY:
 238         case SLAPI_BIND_CREDENTIALS:
 239         case SLAPI_BIND_SASLMECHANISM:
 240         case SLAPI_BIND_RET_SASLCREDS:
 241         case SLAPI_COMPARE_TYPE:
 242         case SLAPI_COMPARE_VALUE:
 243         case SLAPI_MODIFY_MODS:
 244         case SLAPI_MODRDN_NEWRDN:
 245         case SLAPI_MODRDN_NEWSUPERIOR:
 246         case SLAPI_MODRDN_PARENT_ENTRY:
 247         case SLAPI_MODRDN_NEWPARENT_ENTRY:
 248         case SLAPI_MODRDN_TARGET_ENTRY:
 249         case SLAPI_MODRDN_NEWSUPERIOR_ADDRESS:
 250         case SLAPI_SEARCH_FILTER:
 251         case SLAPI_SEARCH_STRFILTER:
 252         case SLAPI_SEARCH_ATTRS:
 253         case SLAPI_SEQ_TYPE:
 254         case SLAPI_SEQ_ATTRNAME:
 255         case SLAPI_SEQ_VAL:
 256         case SLAPI_EXT_OP_REQ_OID:
 257         case SLAPI_EXT_OP_REQ_VALUE:
 258         case SLAPI_EXT_OP_RET_OID:
 259         case SLAPI_EXT_OP_RET_VALUE:
 260         case SLAPI_MR_FILTER_ENTRY:
 261         case SLAPI_MR_FILTER_TYPE:
 262         case SLAPI_MR_FILTER_VALUE:
 263         case SLAPI_MR_FILTER_OID:
 264         case SLAPI_MR_FILTER_DNATTRS:
 265         case SLAPI_LDIF2DB_FILE:
 266         case SLAPI_PARENT_TXN:
 267         case SLAPI_TXN:
 268         case SLAPI_SEARCH_RESULT_SET:
 269         case SLAPI_SEARCH_RESULT_ENTRY:
 270         case SLAPI_SEARCH_REFERRALS:
 271         case SLAPI_RESULT_TEXT:
 272         case SLAPI_RESULT_MATCHED:
 273         case SLAPI_X_GROUP_ENTRY:
 274         case SLAPI_X_GROUP_ATTRIBUTE:
 275         case SLAPI_X_GROUP_OPERATION_DN:
 276         case SLAPI_X_GROUP_TARGET_ENTRY:
 277         case SLAPI_PLUGIN_AUDIT_DATA:
 278         case SLAPI_IBM_PBLOCK:
 279         case SLAPI_PLUGIN_VERSION:
 280                 return PBLOCK_CLASS_POINTER;
 281                 break;
 282         default:
 283                 break;
 284         }
 285
 286         return PBLOCK_CLASS_INVALID;
 287 }
 288
 289 static void
 290 pblock_lock( Slapi_PBlock *pb )
 291 {
 292         ldap_pvt_thread_mutex_lock(&pb->pb_mutex);
 293 }
 294
 295 static void
 296 pblock_unlock( Slapi_PBlock *pb )
 297 {
 298         ldap_pvt_thread_mutex_unlock(&pb->pb_mutex);
 299 }
 300
 301 static int
 302 pblock_get_default( Slapi_PBlock *pb, int param, void **value )
 303 {
 304         int i;
 305         slapi_pblock_class_t pbClass;
 306
 307         pbClass = pblock_get_param_class( param );
 308         if ( pbClass == PBLOCK_CLASS_INVALID ) {
 309                 return PBLOCK_ERROR;
 310         }
 311
 312         switch ( pbClass ) {
 313         case PBLOCK_CLASS_INTEGER:
 314                 *((int *)value) = 0;
 315                 break;
 316         case PBLOCK_CLASS_LONG_INTEGER:
 317                 *((long *)value) = 0L;
 318                 break;
 319         case PBLOCK_CLASS_POINTER:
 320         case PBLOCK_CLASS_FUNCTION_POINTER:
 321                 *value = NULL;
 322                 break;
 323         case PBLOCK_CLASS_INVALID:
 324                 return PBLOCK_ERROR;
 325         }
 326
 327         for ( i = 0; i < pb->pb_nParams; i++ ) {
 328                 if ( pb->pb_params[i] == param ) {
 329                         switch ( pbClass ) {
 330                         case PBLOCK_CLASS_INTEGER:
 331                                 *((int *)value) = pb->pb_values[i].pv_integer;
 332                                 break;
 333                         case PBLOCK_CLASS_LONG_INTEGER:
 334                                 *((long *)value) = pb->pb_values[i].pv_long_integer;
 335                                 break;
 336                         case PBLOCK_CLASS_POINTER:
 337                                 *value = pb->pb_values[i].pv_pointer;
 338                                 break;
 339                         case PBLOCK_CLASS_FUNCTION_POINTER:
 340                                 *value = pb->pb_values[i].pv_function_pointer;
 341                                 break;
 342                         default:
 343                                 break;
 344                         }
 345                         break;
 346                 }
 347         }
 348
 349         return PBLOCK_SUCCESS;
 350 }
 351
 352 static char *
 353 pblock_get_authtype( AuthorizationInformation *authz, int is_tls )
 354 {
 355         char *authType;
 356
 357         switch ( authz->sai_method ) {
 358         case LDAP_AUTH_SASL:
 359                 authType = SLAPD_AUTH_SASL;
 360                 break;
 361         case LDAP_AUTH_SIMPLE:
 362                 authType = SLAPD_AUTH_SIMPLE;
 363                 break;
 364         case LDAP_AUTH_NONE:
 365                 authType = SLAPD_AUTH_NONE;
 366                 break;
 367         default:
 368                 authType = NULL;
 369                 break;
 370         }
 371
 372         if ( is_tls && authType == NULL ) {
 373                 authType = SLAPD_AUTH_SSL;
 374         }
 375
 376         return authType;
 377 }
 378
 379 static int
 380 pblock_set_default( Slapi_PBlock *pb, int param, void *value )
 381 {
 382         slapi_pblock_class_t pbClass;
 383         size_t i;
 384
 385         pbClass = pblock_get_param_class( param );
 386         if ( pbClass == PBLOCK_CLASS_INVALID ) {
 387                 return PBLOCK_ERROR;
 388         }
 389
 390         if ( pb->pb_nParams == PBLOCK_MAX_PARAMS ) {
 391                 return PBLOCK_ERROR;
 392         }
 393
 394         for ( i = 0; i < pb->pb_nParams; i++ ) {
 395                 if ( pb->pb_params[i] == param )
 396                         break;
 397         }
 398         if ( i >= pb->pb_nParams ) {
 399                 pb->pb_params[i] = param;
 400                 pb->pb_nParams++;
 401         }
 402
 403         switch ( pbClass ) {
 404         case PBLOCK_CLASS_INTEGER:
 405                 pb->pb_values[i].pv_integer = (*((int *)value));
 406                 break;
 407         case PBLOCK_CLASS_LONG_INTEGER:
 408                 pb->pb_values[i].pv_long_integer = (*((long *)value));
 409                 break;
 410         case PBLOCK_CLASS_POINTER:
 411                 pb->pb_values[i].pv_pointer = value;
 412                 break;
 413         case PBLOCK_CLASS_FUNCTION_POINTER:
 414                 pb->pb_values[i].pv_function_pointer = value;
 415                 break;
 416         default:
 417                 break;
 418         }
 419
 420         return PBLOCK_SUCCESS;
 421 }
 422
 423 static int
 424 pblock_get( Slapi_PBlock *pb, int param, void **value )
 425 {
 426         int rc = PBLOCK_SUCCESS;
 427
 428         pblock_lock( pb );
 429
 430         switch ( param ) {
 431         case SLAPI_OPERATION:
 432                 *value = pb->pb_op;
 433                 break;
 434         case SLAPI_OPINITIATED_TIME:
 435                 PBLOCK_ASSERT_OP( pb, 0 );
 436                 *((long *)value) = pb->pb_op->o_time;
 437                 break;
 438         case SLAPI_OPERATION_ID:
 439                 PBLOCK_ASSERT_OP( pb, 0 );
 440                 *((long *)value) = pb->pb_op->o_opid;
 441                 break;
 442         case SLAPI_OPERATION_TYPE:
 443                 PBLOCK_ASSERT_OP( pb, 0 );
 444                 *((ber_tag_t *)value) = pb->pb_op->o_tag;
 445                 break;
 446         case SLAPI_REQCONTROLS:
 447                 PBLOCK_ASSERT_OP( pb, 0 );
 448                 *((LDAPControl ***)value) = pb->pb_op->o_ctrls;
 449                 break;
 450         case SLAPI_REQUESTOR_DN:
 451                 PBLOCK_ASSERT_OP( pb, 0 );
 452                 *((char **)value) = pb->pb_op->o_ndn.bv_val;
 453                 break;
 454         case SLAPI_MANAGEDSAIT:
 455                 PBLOCK_ASSERT_OP( pb, 0 );
 456                 *((int *)value) = get_manageDSAit( pb->pb_op );
 457                 break;
 458         case SLAPI_BACKEND:
 459                 PBLOCK_ASSERT_OP( pb, 0 );
 460                 *((BackendDB **)value) = pb->pb_op->o_bd;
 461                 break;
 462         case SLAPI_BE_TYPE:
 463                 PBLOCK_ASSERT_OP( pb, 0 );
 464                 if ( pb->pb_op->o_bd != NULL )
 465                         *((char **)value) = pb->pb_op->o_bd->bd_info->bi_type;
 466                 else
 467                         *value = NULL;
 468                 break;
 469         case SLAPI_CONNECTION:
 470                 *value = pb->pb_conn;
 471                 break;
 472         case SLAPI_X_CONN_SSF:
 473                 PBLOCK_ASSERT_OP( pb, 0 );
 474                 *((slap_ssf_t *)value) = pb->pb_conn->c_ssf;
 475                 break;
 476         case SLAPI_X_CONN_SASL_CONTEXT:
 477                 PBLOCK_ASSERT_CONN( pb );
 478                 if ( pb->pb_conn->c_sasl_authctx != NULL )
 479                         *value = pb->pb_conn->c_sasl_authctx;
 480                 else
 481                         *value = pb->pb_conn->c_sasl_sockctx;
 482                 break;
 483         case SLAPI_TARGET_DN:
 484                 PBLOCK_ASSERT_OP( pb, 0 );
 485                 *((char **)value) = pb->pb_op->o_req_ndn.bv_val;
 486                 break;
 487         case SLAPI_REQUESTOR_ISROOT:
 488                 PBLOCK_ASSERT_OP( pb, 0 );
 489                 *((int *)value) = be_isroot( pb->pb_op );
 490                 break;
 491         case SLAPI_IS_REPLICATED_OPERATION:
 492                 PBLOCK_ASSERT_OP( pb, 0 );
 493                 *((int *)value) = be_isupdate( pb->pb_op );
 494                 break;
 495         case SLAPI_CONN_AUTHTYPE:
 496         case SLAPI_CONN_AUTHMETHOD: /* XXX should return SASL mech */
 497                 PBLOCK_ASSERT_CONN( pb );
 498                 *((char **)value) = pblock_get_authtype( &pb->pb_conn->c_authz,
 499 #ifdef HAVE_TLS
 500                                                          pb->pb_conn->c_is_tls
 501 #else
 502                                                          0
 503 #endif
 504                                                          );
 505                 break;
 506         case SLAPI_X_CONN_IS_UDP:
 507                 PBLOCK_ASSERT_CONN( pb );
 508 #ifdef LDAP_CONNECTIONLESS
 509                 *((int *)value) = pb->pb_conn->c_is_udp;
 510 #else
 511                 *((int *)value) = 0;
 512 #endif
 513                 break;
 514         case SLAPI_CONN_ID:
 515                 PBLOCK_ASSERT_CONN( pb );
 516                 *((long *)value) = pb->pb_conn->c_connid;
 517                 break;
 518         case SLAPI_CONN_DN:
 519                 PBLOCK_ASSERT_CONN( pb );
 520                 *((char **)value) = pb->pb_conn->c_dn.bv_val;
 521                 break;
 522         case SLAPI_CONN_CLIENTIP:
 523                 PBLOCK_ASSERT_CONN( pb );
 524                 if ( strncmp( pb->pb_conn->c_peer_name.bv_val, "IP=", 3 ) == 0 )
 525                         *((char **)value) = &pb->pb_conn->c_peer_name.bv_val[3];
 526                 else
 527                         *value = NULL;
 528                 break;
 529         case SLAPI_X_CONN_CLIENTPATH:
 530                 PBLOCK_ASSERT_CONN( pb );
 531                 if ( strncmp( pb->pb_conn->c_peer_name.bv_val, "PATH=", 3 ) == 0 )
 532                         *((char **)value) = &pb->pb_conn->c_peer_name.bv_val[5];
 533                 else
 534                         *value = NULL;
 535                 break;
 536         case SLAPI_CONN_SERVERIP:
 537                 PBLOCK_ASSERT_CONN( pb );
 538                 if ( strncmp( pb->pb_conn->c_peer_name.bv_val, "IP=", 3 ) == 0 )
 539                         *((char **)value) = &pb->pb_conn->c_sock_name.bv_val[3];
 540                 else
 541                         *value = NULL;
 542                 break;
 543         case SLAPI_X_CONN_SERVERPATH:
 544                 PBLOCK_ASSERT_CONN( pb );
 545                 if ( strncmp( pb->pb_conn->c_peer_name.bv_val, "PATH=", 3 ) == 0 )
 546                         *((char **)value) = &pb->pb_conn->c_sock_name.bv_val[5];
 547                 else
 548                         *value = NULL;
 549                 break;
 550         case SLAPI_RESULT_CODE:
 551         case SLAPI_PLUGIN_INTOP_RESULT:
 552                 *((int *)value) = pb->pb_rs.sr_err;
 553                 break;
 554         case SLAPI_RESULT_TEXT:
 555                 *((const char **)value) = pb->pb_rs.sr_text;
 556                 break;
 557         case SLAPI_RESULT_MATCHED:
 558                 *((const char **)value) = pb->pb_rs.sr_matched;
 559                 break;
 560         case SLAPI_ADD_ENTRY:
 561                 PBLOCK_ASSERT_OP( pb, 0 );
 562                 if ( pb->pb_op->o_tag == LDAP_REQ_ADD )
 563                         *((Slapi_Entry **)value) = pb->pb_op->ora_e;
 564                 else
 565                         *value = NULL;
 566                 break;
 567         case SLAPI_MODIFY_MODS: {
 568                 LDAPMod **mods = NULL;
 569
 570                 pblock_get_default( pb, param, (void **)&mods );
 571                 if ( mods == NULL && pb->pb_intop == 0 ) {
 572                         if ( pb->pb_op->o_tag != LDAP_REQ_MODIFY ) {
 573                                 rc = PBLOCK_ERROR;
 574                                 break;
 575                         }
 576                         mods = slapi_int_modifications2ldapmods( &pb->pb_op->orm_modlist, NULL );
 577                         pblock_set_default( pb, param, (void *)mods );
 578                 }
 579                 *((LDAPMod ***)value) = mods;
 580                 break;
 581         }
 582         case SLAPI_MODRDN_NEWRDN:
 583                 PBLOCK_ASSERT_OP( pb, 0 );
 584                 if ( pb->pb_op->o_tag == LDAP_REQ_MODRDN )
 585                         *((char **)value) = pb->pb_op->orr_newrdn.bv_val;
 586                 else
 587                         *value = NULL;
 588                 break;
 589         case SLAPI_MODRDN_NEWSUPERIOR:
 590                 PBLOCK_ASSERT_OP( pb, 0 );
 591                 if ( pb->pb_op->o_tag == LDAP_REQ_MODRDN && pb->pb_op->orr_newSup != NULL )
 592                         *((char **)value) = pb->pb_op->orr_newSup->bv_val;
 593                 else
 594                         *value = NULL;
 595                 break;
 596         case SLAPI_MODRDN_DELOLDRDN:
 597                 PBLOCK_ASSERT_OP( pb, 0 );
 598                 if ( pb->pb_op->o_tag == LDAP_REQ_MODRDN )
 599                         *((int *)value) = pb->pb_op->orr_deleteoldrdn;
 600                 else
 601                         *((int *)value) = 0;
 602                 break;
 603         case SLAPI_SEARCH_SCOPE:
 604                 PBLOCK_ASSERT_OP( pb, 0 );
 605                 if ( pb->pb_op->o_tag == LDAP_REQ_SEARCH )
 606                         *((int *)value) = pb->pb_op->ors_scope;
 607                 else
 608                         *((int *)value) = 0;
 609                 break;
 610         case SLAPI_SEARCH_DEREF:
 611                 PBLOCK_ASSERT_OP( pb, 0 );
 612                 if ( pb->pb_op->o_tag == LDAP_REQ_SEARCH )
 613                         *((int *)value) = pb->pb_op->ors_deref;
 614                 else
 615                         *((int *)value) = 0;
 616                 break;
 617         case SLAPI_SEARCH_SIZELIMIT:
 618                 PBLOCK_ASSERT_OP( pb, 0 );
 619                 if ( pb->pb_op->o_tag == LDAP_REQ_SEARCH )
 620                         *((int *)value) = pb->pb_op->ors_slimit;
 621                 else
 622                         *((int *)value) = 0;
 623                 break;
 624         case SLAPI_SEARCH_TIMELIMIT:
 625                 PBLOCK_ASSERT_OP( pb, 0 );
 626                 if ( pb->pb_op->o_tag == LDAP_REQ_SEARCH )
 627                         *((int *)value) = pb->pb_op->ors_tlimit;
 628                 else
 629                         *((int *)value) = 0;
 630                 break;
 631         case SLAPI_SEARCH_FILTER:
 632                 PBLOCK_ASSERT_OP( pb, 0 );
 633                 if ( pb->pb_op->o_tag == LDAP_REQ_SEARCH )
 634                         *((Slapi_Filter **)value) = pb->pb_op->ors_filter;
 635                 else
 636                         *((Slapi_Filter **)value) = NULL;
 637                 break;
 638         case SLAPI_SEARCH_STRFILTER:
 639                 PBLOCK_ASSERT_OP( pb, 0 );
 640                 if ( pb->pb_op->o_tag == LDAP_REQ_SEARCH )
 641                         *((char **)value) = pb->pb_op->ors_filterstr.bv_val;
 642                 else
 643                         *((char **)value) = NULL;
 644                 break;
 645         case SLAPI_SEARCH_ATTRS: {
 646                 char **attrs = NULL;
 647
 648                 PBLOCK_ASSERT_OP( pb, 0 );
 649                 if ( pb->pb_op->o_tag != LDAP_REQ_SEARCH ) {
 650                         rc = PBLOCK_ERROR;
 651                         break;
 652                 }
 653                 pblock_get_default( pb, param, (void **)&attrs );
 654                 if ( attrs == NULL && pb->pb_intop == 0 ) {
 655                         attrs = anlist2charray_x( pb->pb_op->ors_attrs, 0, pb->pb_op->o_tmpmemctx );
 656                         pblock_set_default( pb, param, (void *)attrs );
 657                 }
 658                 *((char ***)attrs) = attrs;
 659         }
 660         case SLAPI_SEARCH_ATTRSONLY:
 661                 PBLOCK_ASSERT_OP( pb, 0 );
 662                 if ( pb->pb_op->o_tag == LDAP_REQ_SEARCH )
 663                         *((int *)value) = pb->pb_op->ors_attrsonly;
 664                 else
 665                         *((int *)value) = 0;
 666                 break;
 667         case SLAPI_SEARCH_RESULT_ENTRY:
 668                 *((Slapi_Entry **)value) = pb->pb_rs.sr_entry;
 669                 break;
 670         case SLAPI_BIND_RET_SASLCREDS:
 671                 *((struct berval **)value) = pb->pb_rs.sr_sasldata;
 672                 break;
 673         case SLAPI_EXT_OP_REQ_OID:
 674                 *((const char **)value) = pb->pb_op->ore_reqoid.bv_val;
 675                 break;
 676         case SLAPI_EXT_OP_REQ_VALUE:
 677                 *((struct berval **)value) = pb->pb_op->ore_reqdata;
 678                 break;
 679         case SLAPI_EXT_OP_RET_OID:
 680                 *((const char **)value) = pb->pb_rs.sr_rspoid;
 681                 break;
 682         case SLAPI_EXT_OP_RET_VALUE:
 683                 *((struct berval **)value) = pb->pb_rs.sr_rspdata;
 684                 break;
 685         case SLAPI_BIND_METHOD:
 686                 if ( pb->pb_op->o_tag == LDAP_REQ_BIND )
 687                         *((int *)value) = pb->pb_op->orb_method;
 688                 else
 689                         *((int *)value) = 0;
 690                 break;
 691         case SLAPI_BIND_CREDENTIALS:
 692                 if ( pb->pb_op->o_tag == LDAP_REQ_BIND )
 693                         *((struct berval **)value) = &pb->pb_op->orb_cred;
 694                 else
 695                         *value = NULL;
 696                 break;
 697         case SLAPI_COMPARE_TYPE:
 698                 if ( pb->pb_op->o_tag == LDAP_REQ_COMPARE )
 699                         *((char **)value) = pb->pb_op->orc_ava->aa_desc->ad_cname.bv_val;
 700                 else
 701                         *value = NULL;
 702                 break;
 703         case SLAPI_COMPARE_VALUE:
 704                 if ( pb->pb_op->o_tag == LDAP_REQ_COMPARE )
 705                         *((struct berval **)value) = &pb->pb_op->orc_ava->aa_value;
 706                 else
 707                         *value = NULL;
 708                 break;
 709         case SLAPI_ABANDON_MSGID:
 710                 if ( pb->pb_op->o_tag == LDAP_REQ_ABANDON )
 711                         *((int *)value) = pb->pb_op->orn_msgid;
 712                 else
 713                         *((int *)value) = 0;
 714                 break;
 715         default:
 716                 rc = pblock_get_default( pb, param, value );
 717                 break;
 718         }
 719
 720         pblock_unlock( pb );
 721
 722         return rc;
 723 }
 724
 725 static int
 726 pblock_add_control( Slapi_PBlock *pb, LDAPControl *control )
 727 {
 728         LDAPControl **controls = NULL;
 729         size_t i;
 730
 731         pblock_get_default( pb, SLAPI_RESCONTROLS, (void **)&controls );
 732
 733         if ( controls != NULL ) {
 734                 for ( i = 0; controls[i] != NULL; i++ )
 735                         ;
 736         } else {
 737                 i = 0;
 738         }
 739
 740         controls = (LDAPControl **)slapi_ch_realloc( (char *)controls,
 741                 ( i + 2 ) * sizeof(LDAPControl *));
 742         controls[i] = control;
 743
 744         return pblock_set_default( pb, SLAPI_RESCONTROLS, (void *)controls );
 745 }
 746
 747 static int
 748 pblock_set_dn( void *value, struct berval *dn, struct berval *ndn, void *memctx )
 749 {
 750         struct berval bv;
 751
 752         if ( !BER_BVISNULL( dn )) {
 753                 slap_sl_free( dn->bv_val, memctx );
 754                 BER_BVZERO( dn );
 755         }
 756         if ( !BER_BVISNULL( ndn )) {
 757                 slap_sl_free( ndn->bv_val, memctx );
 758                 BER_BVZERO( ndn );
 759         }
 760
 761         bv.bv_val = (char *)value;
 762         bv.bv_len = strlen( bv.bv_val );
 763
 764         return dnPrettyNormal( NULL, &bv, dn, ndn, memctx );
 765 }
 766
 767 static int
 768 pblock_set( Slapi_PBlock *pb, int param, void *value )
 769 {
 770         int rc = PBLOCK_SUCCESS;
 771
 772         pblock_lock( pb );
 773
 774         switch ( param ) {
 775         case SLAPI_OPERATION:
 776                 pb->pb_op = (Operation *)value;
 777                 break;
 778         case SLAPI_OPINITIATED_TIME:
 779                 PBLOCK_ASSERT_OP( pb, 0 );
 780                 pb->pb_op->o_time = *((long *)value);
 781                 break;
 782         case SLAPI_OPERATION_ID:
 783                 PBLOCK_ASSERT_OP( pb, 0 );
 784                 pb->pb_op->o_opid = *((long *)value);
 785                 break;
 786         case SLAPI_OPERATION_TYPE:
 787                 PBLOCK_ASSERT_OP( pb, 0 );
 788                 pb->pb_op->o_tag = *((ber_tag_t *)value);
 789                 break;
 790         case SLAPI_REQCONTROLS:
 791                 PBLOCK_ASSERT_OP( pb, 0 );
 792                 pb->pb_op->o_ctrls = (LDAPControl **)value;
 793                 break;
 794         case SLAPI_RESCONTROLS: {
 795                 LDAPControl **ctrls = NULL;
 796
 797                 pblock_get_default( pb, param, (void **)&ctrls );
 798                 if ( ctrls == NULL ) {
 799                         /* free old ones first */
 800                         ldap_controls_free( ctrls );
 801                 }
 802                 rc = pblock_set_default( pb, param, value );
 803                 break;
 804         }
 805         case SLAPI_ADD_RESCONTROL:
 806                 PBLOCK_ASSERT_OP( pb, 0 );
 807                 rc = pblock_add_control( pb, (LDAPControl *)value );
 808                 break;
 809         case SLAPI_REQUESTOR_DN:
 810                 PBLOCK_ASSERT_OP( pb, 0 );
 811                 rc = pblock_set_dn( value, &pb->pb_op->o_dn, &pb->pb_op->o_ndn, pb->pb_op->o_tmpmemctx );
 812                 break;
 813         case SLAPI_MANAGEDSAIT:
 814                 PBLOCK_ASSERT_OP( pb, 0 );
 815                 pb->pb_op->o_managedsait = *((int *)value);
 816                 break;
 817         case SLAPI_BACKEND:
 818                 PBLOCK_ASSERT_OP( pb, 0 );
 819                 pb->pb_op->o_bd = (BackendDB *)value;
 820                 break;
 821         case SLAPI_CONNECTION:
 822                 pb->pb_conn = (Connection *)value;
 823                 break;
 824         case SLAPI_X_CONN_SSF:
 825                 PBLOCK_ASSERT_CONN( pb );
 826                 PBLOCK_LOCK_CONN( pb );
 827                 pb->pb_conn->c_ssf = (slap_ssf_t)value;
 828                 PBLOCK_UNLOCK_CONN( pb );
 829                 break;
 830         case SLAPI_X_CONN_SASL_CONTEXT:
 831                 PBLOCK_ASSERT_CONN( pb );
 832                 PBLOCK_LOCK_CONN( pb );
 833                 pb->pb_conn->c_sasl_authctx = value;
 834                 PBLOCK_UNLOCK_CONN( pb );
 835                 break;
 836         case SLAPI_TARGET_DN:
 837                 PBLOCK_ASSERT_OP( pb, 0 );
 838                 rc = pblock_set_dn( value, &pb->pb_op->o_req_dn, &pb->pb_op->o_req_ndn, pb->pb_op->o_tmpmemctx );
 839                 break;
 840         case SLAPI_CONN_ID:
 841                 PBLOCK_ASSERT_CONN( pb );
 842                 PBLOCK_LOCK_CONN( pb );
 843                 pb->pb_conn->c_connid = *((long *)value);
 844                 PBLOCK_UNLOCK_CONN( pb );
 845                 break;
 846         case SLAPI_CONN_DN:
 847                 PBLOCK_ASSERT_CONN( pb );
 848                 PBLOCK_LOCK_CONN( pb );
 849                 rc = pblock_set_dn( value, &pb->pb_conn->c_dn, &pb->pb_conn->c_ndn, NULL );
 850                 PBLOCK_UNLOCK_CONN( pb );
 851                 break;
 852         case SLAPI_RESULT_CODE:
 853         case SLAPI_PLUGIN_INTOP_RESULT:
 854                 pb->pb_rs.sr_err = *((int *)value);
 855                 break;
 856         case SLAPI_RESULT_TEXT:
 857                 snprintf( pb->pb_textbuf, sizeof( pb->pb_textbuf ), "%s", (char *)value );
 858                 pb->pb_rs.sr_text = pb->pb_textbuf;
 859                 break;
 860         case SLAPI_RESULT_MATCHED:
 861                 pb->pb_rs.sr_matched = (char *)value; /* XXX should dup? */
 862                 break;
 863         case SLAPI_ADD_ENTRY:
 864                 PBLOCK_ASSERT_OP( pb, 0 );
 865                 if ( pb->pb_op->o_tag == LDAP_REQ_ADD ) {
 866                         pb->pb_op->ora_e = (Slapi_Entry *)value;
 867                 } else {
 868                         rc = PBLOCK_ERROR;
 869                 }
 870                 break;
 871         case SLAPI_MODIFY_MODS: {
 872                 Modifications **mlp;
 873
 874                 PBLOCK_ASSERT_OP( pb, 0 );
 875                 rc = pblock_set_default( pb, param, value );
 876                 if ( rc != PBLOCK_SUCCESS ) {
 877                         break;
 878                 }
 879
 880                 if ( pb->pb_op->o_tag == LDAP_REQ_MODIFY ) {
 881                         mlp = &pb->pb_op->orm_modlist;
 882                 } else if ( pb->pb_op->o_tag == LDAP_REQ_ADD ) {
 883                         mlp = &pb->pb_op->ora_modlist;
 884                 } else {
 885                         break;
 886                 }
 887
 888                 if ( *mlp != NULL ) {
 889                         if ( pb->pb_intop )
 890                                 slapi_int_mods_free( *mlp ); /* caller owns values */
 891                         else
 892                                 slap_mods_free( *mlp );  /* we own values */
 893                         *mlp = NULL;
 894                 }
 895                 *mlp = slapi_int_ldapmods2modifications( (LDAPMod **)value, NULL );
 896                 break;
 897         }
 898         case SLAPI_MODRDN_NEWRDN:
 899                 PBLOCK_ASSERT_OP( pb, 0 );
 900                 PBLOCK_VALIDATE_IS_INTOP( pb );
 901                 if ( pb->pb_op->o_tag == LDAP_REQ_MODRDN ) {
 902                         rc = pblock_set_dn( value, &pb->pb_op->orr_newrdn, &pb->pb_op->orr_nnewrdn, pb->pb_op->o_tmpmemctx );
 903                         if ( rc == LDAP_SUCCESS ) rc = rdn_validate( &pb->pb_op->orr_nnewrdn );
 904                 } else {
 905                         rc = PBLOCK_ERROR;
 906                 }
 907                 break;
 908         case SLAPI_MODRDN_NEWSUPERIOR:
 909                 PBLOCK_ASSERT_OP( pb, 0 );
 910                 PBLOCK_VALIDATE_IS_INTOP( pb );
 911                 if ( pb->pb_op->o_tag == LDAP_REQ_MODRDN ) {
 912                         if ( value == NULL ) {
 913                                 if ( pb->pb_op->orr_newSup != NULL ) {
 914                                         pb->pb_op->o_tmpfree( pb->pb_op->orr_newSup, pb->pb_op->o_tmpmemctx );
 915                                         pb->pb_op->orr_newSup = NULL;
 916                                 }
 917                                 if ( pb->pb_op->orr_newSup != NULL ) {
 918                                         pb->pb_op->o_tmpfree( pb->pb_op->orr_nnewSup, pb->pb_op->o_tmpmemctx );
 919                                         pb->pb_op->orr_nnewSup = NULL;
 920                                 }
 921                         } else {
 922                                 if ( pb->pb_op->orr_newSup == NULL ) {
 923                                         pb->pb_op->orr_newSup = (struct berval *)pb->pb_op->o_tmpalloc(
 924                                                 sizeof(struct berval), pb->pb_op->o_tmpmemctx );
 925                                 }
 926                                 if ( pb->pb_op->orr_nnewSup == NULL ) {
 927                                         pb->pb_op->orr_nnewSup = (struct berval *)pb->pb_op->o_tmpalloc(
 928                                                 sizeof(struct berval), pb->pb_op->o_tmpmemctx );
 929                                 }
 930                                 rc = pblock_set_dn( value, pb->pb_op->orr_newSup, pb->pb_op->orr_nnewSup, pb->pb_op->o_tmpmemctx );
 931                         }
 932                 } else {
 933                         rc = PBLOCK_ERROR;
 934                 }
 935                 break;
 936         case SLAPI_MODRDN_DELOLDRDN:
 937                 PBLOCK_ASSERT_OP( pb, 0 );
 938                 PBLOCK_VALIDATE_IS_INTOP( pb );
 939                 if ( pb->pb_op->o_tag == LDAP_REQ_MODRDN )
 940                         pb->pb_op->orr_deleteoldrdn = *((int *)value);
 941                 else
 942                         rc = PBLOCK_ERROR;
 943                 break;
 944         case SLAPI_SEARCH_SCOPE: {
 945                 int scope = *((int *)value);
 946
 947                 PBLOCK_ASSERT_OP( pb, 0 );
 948                 if ( pb->pb_op->o_tag == LDAP_REQ_SEARCH ) {
 949                         switch ( *((int *)value) ) {
 950                         case LDAP_SCOPE_BASE:
 951                         case LDAP_SCOPE_ONELEVEL:
 952                         case LDAP_SCOPE_SUBTREE:
 953 #ifdef LDAP_SCOPE_SUBORDINATE
 954                         case LDAP_SCOPE_SUBORDINATE:
 955 #endif
 956                                 pb->pb_op->ors_scope = scope;
 957                                 break;
 958                         default:
 959                                 rc = PBLOCK_ERROR;
 960                                 break;
 961                         }
 962                 } else {
 963                         rc = PBLOCK_ERROR;
 964                 }
 965                 break;
 966         }
 967         case SLAPI_SEARCH_DEREF:
 968                 PBLOCK_ASSERT_OP( pb, 0 );
 969                 if ( pb->pb_op->o_tag == LDAP_REQ_SEARCH )
 970                         pb->pb_op->ors_deref = *((int *)value);
 971                 else
 972                         rc = PBLOCK_ERROR;
 973                 break;
 974         case SLAPI_SEARCH_SIZELIMIT:
 975                 PBLOCK_ASSERT_OP( pb, 0 );
 976                 if ( pb->pb_op->o_tag == LDAP_REQ_SEARCH )
 977                         pb->pb_op->ors_slimit = *((int *)value);
 978                 else
 979                         rc = PBLOCK_ERROR;
 980                 break;
 981         case SLAPI_SEARCH_TIMELIMIT:
 982                 PBLOCK_ASSERT_OP( pb, 0 );
 983                 if ( pb->pb_op->o_tag == LDAP_REQ_SEARCH )
 984                         pb->pb_op->ors_tlimit = *((int *)value);
 985                 else
 986                         rc = PBLOCK_ERROR;
 987                 break;
 988         case SLAPI_SEARCH_FILTER:
 989                 PBLOCK_ASSERT_OP( pb, 0 );
 990                 if ( pb->pb_op->o_tag == LDAP_REQ_SEARCH )
 991                         pb->pb_op->ors_filter = (Slapi_Filter *)value;
 992                 else
 993                         rc = PBLOCK_ERROR;
 994                 break;
 995         case SLAPI_SEARCH_STRFILTER:
 996                 PBLOCK_ASSERT_OP( pb, 0 );
 997                 if ( pb->pb_op->o_tag == LDAP_REQ_SEARCH ) {
 998                         pb->pb_op->ors_filterstr.bv_val = (char *)value;
 999                         pb->pb_op->ors_filterstr.bv_len = strlen((char *)value);
1000                 } else {
1001                         rc = PBLOCK_ERROR;
1002                 }
1003                 break;
1004         case SLAPI_SEARCH_ATTRS: {
1005                 AttributeName *an = NULL;
1006                 size_t i = 0;
1007                 char **attrs = (char **)value;
1008
1009                 PBLOCK_ASSERT_OP( pb, 0 );
1010                 PBLOCK_VALIDATE_IS_INTOP( pb );
1011
1012                 if ( pb->pb_op->o_tag != LDAP_REQ_SEARCH ) {
1013                         rc = PBLOCK_ERROR;
1014                         break;
1015                 }
1016                 /* also set mapped attrs */
1017                 rc = pblock_set_default( pb, param, value );
1018                 if ( rc != PBLOCK_SUCCESS ) {
1019                         break;
1020                 }
1021                 if ( pb->pb_op->ors_attrs != NULL ) {
1022                         pb->pb_op->o_tmpfree( pb->pb_op->ors_attrs, pb->pb_op->o_tmpmemctx );
1023                         pb->pb_op->ors_attrs = NULL;
1024                 }
1025                 if ( attrs != NULL ) {
1026                         for ( i = 0; attrs[i] != NULL; i++ )
1027                                 ;
1028                 }
1029                 if ( i ) {
1030                         an = (AttributeName *)pb->pb_op->o_tmpalloc( (i + 1) *
1031                                 sizeof(AttributeName), pb->pb_op->o_tmpmemctx );
1032                         for ( i = 0; attrs[i] != NULL; i++ ) {
1033                                 an[i].an_desc = NULL;
1034                                 an[i].an_oc = NULL;
1035                                 an[i].an_oc_exclude = 0;
1036                                 an[i].an_name.bv_val = attrs[i];
1037                                 an[i].an_name.bv_len = strlen( attrs[i] );
1038                                 slap_bv2ad( &an[i].an_name, &an[i].an_desc, &pb->pb_rs.sr_text );
1039                         }
1040                         an[i].an_name.bv_val = NULL;
1041                         an[i].an_name.bv_len = 0;
1042                 }
1043                 pb->pb_op->ors_attrs = an;
1044                 break;
1045         }
1046         case SLAPI_SEARCH_ATTRSONLY:
1047                 PBLOCK_ASSERT_OP( pb, 0 );
1048                 PBLOCK_VALIDATE_IS_INTOP( pb );
1049
1050                 if ( pb->pb_op->o_tag == LDAP_REQ_SEARCH )
1051                         pb->pb_op->ors_attrsonly = *((int *)value);
1052                 else
1053                         rc = PBLOCK_ERROR;
1054                 break;
1055         case SLAPI_SEARCH_RESULT_ENTRY:
1056                 PBLOCK_ASSERT_OP( pb, 0 );
1057                 pb->pb_rs.sr_entry = (Slapi_Entry *)value;
1058                 break;
1059         case SLAPI_BIND_RET_SASLCREDS:
1060                 pb->pb_rs.sr_sasldata = (struct berval *)value;
1061                 break;
1062         case SLAPI_EXT_OP_REQ_OID:
1063                 PBLOCK_ASSERT_OP( pb, 0 );
1064                 PBLOCK_VALIDATE_IS_INTOP( pb );
1065
1066                 if ( pb->pb_op->o_tag == LDAP_REQ_EXTENDED ) {
1067                         pb->pb_op->ore_reqoid.bv_val = (char *)value;
1068                         pb->pb_op->ore_reqoid.bv_len = strlen((char *)value);
1069                 } else {
1070                         rc = PBLOCK_ERROR;
1071                 }
1072                 break;
1073         case SLAPI_EXT_OP_REQ_VALUE:
1074                 PBLOCK_ASSERT_OP( pb, 0 );
1075                 PBLOCK_VALIDATE_IS_INTOP( pb );
1076
1077                 if ( pb->pb_op->o_tag == LDAP_REQ_EXTENDED )
1078                         pb->pb_op->ore_reqdata = (struct berval *)value;
1079                 else
1080                         rc = PBLOCK_ERROR;
1081                 break;
1082         case SLAPI_EXT_OP_RET_OID:
1083                 pb->pb_rs.sr_rspoid = (char *)value;
1084                 break;
1085         case SLAPI_EXT_OP_RET_VALUE:
1086                 pb->pb_rs.sr_rspdata = (struct berval *)value;
1087                 break;
1088         case SLAPI_BIND_METHOD:
1089                 PBLOCK_ASSERT_OP( pb, 0 );
1090                 PBLOCK_VALIDATE_IS_INTOP( pb );
1091
1092                 if ( pb->pb_op->o_tag == LDAP_REQ_BIND )
1093                         pb->pb_op->orb_method = *((int *)value);
1094                 else
1095                         rc = PBLOCK_ERROR;
1096                 break;
1097         case SLAPI_BIND_CREDENTIALS:
1098                 PBLOCK_ASSERT_OP( pb, 0 );
1099                 PBLOCK_VALIDATE_IS_INTOP( pb );
1100
1101                 if ( pb->pb_op->o_tag == LDAP_REQ_BIND )
1102                         pb->pb_op->orb_cred = *((struct berval *)value);
1103                 else
1104                         rc = PBLOCK_ERROR;
1105                 break;
1106         case SLAPI_COMPARE_TYPE:
1107                 PBLOCK_ASSERT_OP( pb, 0 );
1108                 PBLOCK_VALIDATE_IS_INTOP( pb );
1109
1110                 if ( pb->pb_op->o_tag == LDAP_REQ_COMPARE ) {
1111                         const char *text;
1112
1113                         pb->pb_op->orc_ava->aa_desc = NULL;
1114                         rc = slap_str2ad( (char *)value, &pb->pb_op->orc_ava->aa_desc, &text );
1115                 } else {
1116                         rc = PBLOCK_ERROR;
1117                 }
1118                 break;
1119         case SLAPI_COMPARE_VALUE:
1120                 PBLOCK_ASSERT_OP( pb, 0 );
1121                 PBLOCK_VALIDATE_IS_INTOP( pb );
1122
1123                 if ( pb->pb_op->o_tag == LDAP_REQ_COMPARE )
1124                         pb->pb_op->orc_ava->aa_value = *((struct berval *)value);
1125                 else
1126                         rc = PBLOCK_ERROR;
1127                 break;
1128         case SLAPI_ABANDON_MSGID:
1129                 PBLOCK_ASSERT_OP( pb, 0 );
1130                 PBLOCK_VALIDATE_IS_INTOP( pb );
1131
1132                 if ( pb->pb_op->o_tag == LDAP_REQ_ABANDON)
1133                         pb->pb_op->orn_msgid = *((int *)value);
1134                 else
1135                         rc = PBLOCK_ERROR;
1136                 break;
1137         case SLAPI_REQUESTOR_ISROOT:
1138         case SLAPI_IS_REPLICATED_OPERATION:
1139         case SLAPI_CONN_AUTHTYPE:
1140         case SLAPI_CONN_AUTHMETHOD:
1141         case SLAPI_X_CONN_IS_UDP:
1142         case SLAPI_CONN_CLIENTIP:
1143         case SLAPI_X_CONN_CLIENTPATH:
1144         case SLAPI_CONN_SERVERIP:
1145         case SLAPI_X_CONN_SERVERPATH:
1146                 /* These parameters cannot be set */
1147                 rc = PBLOCK_ERROR;
1148                 break;
1149         default:
1150                 rc = pblock_set_default( pb, param, value );
1151                 break;
1152         }
1153
1154         pblock_unlock( pb );
1155
1156         return rc;
1157 }
1158
1159 static void
1160 pblock_clear( Slapi_PBlock *pb )
1161 {
1162         pb->pb_nParams = 1;
1163 }
1164
1165 static int
1166 pblock_delete_param( Slapi_PBlock *p, int param )
1167 {
1168         int i;
1169
1170         pblock_lock(p);
1171
1172         for ( i = 0; i < p->pb_nParams; i++ ) {
1173                 if ( p->pb_params[i] == param ) {
1174                         break;
1175                 }
1176         }
1177
1178         if (i >= p->pb_nParams ) {
1179                 pblock_unlock( p );
1180                 return PBLOCK_ERROR;
1181         }
1182
1183         /* move last parameter to index of deleted parameter */
1184         if ( p->pb_nParams > 1 ) {
1185                 p->pb_params[i] = p->pb_params[p->pb_nParams - 1];
1186                 p->pb_values[i] = p->pb_values[p->pb_nParams - 1];
1187         }
1188         p->pb_nParams--;
1189
1190         pblock_unlock( p );
1191
1192         return PBLOCK_SUCCESS;
1193 }
1194
1195 Slapi_PBlock *
1196 slapi_pblock_new(void)
1197 {
1198         Slapi_PBlock *pb;
1199
1200         pb = (Slapi_PBlock *) ch_calloc( 1, sizeof(Slapi_PBlock) );
1201         if ( pb != NULL ) {
1202                 ldap_pvt_thread_mutex_init( &pb->pb_mutex );
1203
1204                 pb->pb_params[0] = SLAPI_IBM_PBLOCK;
1205                 pb->pb_values[0].pv_pointer = NULL;
1206                 pb->pb_nParams = 1;
1207                 pb->pb_conn = NULL;
1208                 pb->pb_op = NULL;
1209                 pb->pb_intop = 0;
1210         }
1211         return pb;
1212 }
1213
1214 static void
1215 pblock_destroy( Slapi_PBlock *pb )
1216 {
1217         LDAPControl **controls = NULL;
1218         LDAPMod **mods = NULL;
1219         char **attrs = NULL;
1220
1221         assert( pb != NULL );
1222
1223         pblock_get_default( pb, SLAPI_RESCONTROLS, (void **)&controls );
1224         if ( controls != NULL ) {
1225                 ldap_controls_free( controls );
1226         }
1227
1228         if ( pb->pb_intop ) {
1229                 slapi_int_connection_done_pb( pb );
1230         } else {
1231                 pblock_get_default( pb, SLAPI_MODIFY_MODS, (void **)&mods );
1232                 if ( mods != NULL )
1233                         slapi_int_free_ldapmods( mods );
1234
1235                 pblock_get_default( pb, SLAPI_SEARCH_ATTRS, (void **)&attrs );
1236                 if ( attrs != NULL )
1237                         pb->pb_op->o_tmpfree( attrs, pb->pb_op->o_tmpmemctx );
1238         }
1239
1240         ldap_pvt_thread_mutex_destroy( &pb->pb_mutex );
1241         slapi_ch_free( (void **)&pb );
1242 }
1243
1244 void
1245 slapi_pblock_destroy( Slapi_PBlock *pb )
1246 {
1247         if ( pb != NULL ) {
1248                 pblock_destroy( pb );
1249         }
1250 }
1251
1252 int
1253 slapi_pblock_get( Slapi_PBlock *pb, int arg, void *value )
1254 {
1255         return pblock_get( pb, arg, (void **)value );
1256 }
1257
1258 int
1259 slapi_pblock_set( Slapi_PBlock *pb, int arg, void *value )
1260 {
1261         return pblock_set( pb, arg, value );
1262 }
1263
1264 void
1265 slapi_pblock_clear( Slapi_PBlock *pb )
1266 {
1267         pblock_clear( pb );
1268 }
1269
1270 int
1271 slapi_pblock_delete_param( Slapi_PBlock *p, int param )
1272 {
1273         return pblock_delete_param( p, param );
1274 }
1275
1276 /*
1277  * OpenLDAP extension
1278  */
1279 int
1280 slapi_int_pblock_get_first( Backend *be, Slapi_PBlock **pb )
1281 {
1282         assert( pb != NULL );
1283         *pb = SLAPI_BACKEND_PBLOCK( be );
1284         return (*pb == NULL ? LDAP_OTHER : LDAP_SUCCESS);
1285 }
1286
1287 /*
1288  * OpenLDAP extension
1289  */
1290 int
1291 slapi_int_pblock_get_next( Slapi_PBlock **pb )
1292 {
1293         assert( pb != NULL );
1294         return slapi_pblock_get( *pb, SLAPI_IBM_PBLOCK, pb );
1295 }
1296
1297 #endif /* LDAP_SLAPI */
1298