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

   1 /* $OpenLDAP$ */
   2 /*
   3  * Copyright 1998-2003 The OpenLDAP Foundation, All Rights Reserved.
   4  * COPYING RESTRICTIONS APPLY, see COPYRIGHT file
   5  */
   6 /*
   7  * Copyright (c) 1995 Regents of the University of Michigan.
   8  * All rights reserved.
   9  *
  10  * Redistribution and use in source and binary forms are permitted
  11  * provided that this notice is preserved and that due credit is given
  12  * to the University of Michigan at Ann Arbor. The name of the University
  13  * may not be used to endorse or promote products derived from this
  14  * software without specific prior written permission. This software
  15  * is provided ``as is'' without express or implied warranty.
  16  */
  17
  18 /*
  19  * LDAP v3 newSuperior support.
  20  *
  21  * Copyright 1999, Juan C. Gomez, All rights reserved.
  22  * This software is not subject to any license of Silicon Graphics
  23  * Inc. or Purdue University.
  24  *
  25  * Redistribution and use in source and binary forms are permitted
  26  * without restriction or fee of any kind as long as this notice
  27  * is preserved.
  28  *
  29  */
  30
  31 #include "portable.h"
  32 #include "slapi_common.h"
  33
  34 #include <stdio.h>
  35
  36 #include <ac/socket.h>
  37 #include <ac/string.h>
  38
  39 #include "ldap_pvt.h"
  40 #include "slap.h"
  41 #include "slapi.h"
  42
  43 int
  44 do_modrdn(
  45     Connection  *conn,
  46     Operation   *op
  47 )
  48 {
  49         struct berval dn = { 0, NULL };
  50         struct berval newrdn = { 0, NULL };
  51         struct berval newSuperior = { 0, NULL };
  52         ber_int_t       deloldrdn;
  53
  54         struct berval pdn = { 0, NULL };
  55         struct berval pnewrdn = { 0, NULL };
  56         struct berval pnewSuperior = { 0, NULL }, *pnewS = NULL;
  57
  58         struct berval ndn = { 0, NULL };
  59         struct berval nnewrdn = { 0, NULL };
  60         struct berval nnewSuperior = { 0, NULL }, *nnewS = NULL;
  61
  62         Backend *be;
  63         Backend *newSuperior_be = NULL;
  64         ber_len_t       length;
  65         int rc;
  66         const char *text;
  67         int manageDSAit;
  68
  69         Slapi_PBlock *pb = op->o_pb;
  70
  71 #ifdef NEW_LOGGING
  72         LDAP_LOG( OPERATION, ENTRY, "do_modrdn: begin\n", 0, 0, 0 );
  73 #else
  74         Debug( LDAP_DEBUG_TRACE, "do_modrdn\n", 0, 0, 0 );
  75 #endif
  76
  77
  78         /*
  79          * Parse the modrdn request.  It looks like this:
  80          *
  81          *      ModifyRDNRequest := SEQUENCE {
  82          *              entry   DistinguishedName,
  83          *              newrdn  RelativeDistinguishedName
  84          *              deleteoldrdn    BOOLEAN,
  85          *              newSuperior     [0] LDAPDN OPTIONAL (v3 Only!)
  86          *      }
  87          */
  88
  89         if ( ber_scanf( op->o_ber, "{mmb", &dn, &newrdn, &deloldrdn )
  90             == LBER_ERROR )
  91         {
  92 #ifdef NEW_LOGGING
  93                 LDAP_LOG( OPERATION, ERR, "do_modrdn: ber_scanf failed\n", 0, 0, 0 );
  94 #else
  95                 Debug( LDAP_DEBUG_ANY, "ber_scanf failed\n", 0, 0, 0 );
  96 #endif
  97
  98                 send_ldap_disconnect( conn, op,
  99                         LDAP_PROTOCOL_ERROR, "decoding error" );
 100                 return SLAPD_DISCONNECT;
 101         }
 102
 103         /* Check for newSuperior parameter, if present scan it */
 104
 105         if ( ber_peek_tag( op->o_ber, &length ) == LDAP_TAG_NEWSUPERIOR ) {
 106                 if ( op->o_protocol < LDAP_VERSION3 ) {
 107                         /* Conection record indicates v2 but field
 108                          * newSuperior is present: report error.
 109                          */
 110 #ifdef NEW_LOGGING
 111                         LDAP_LOG( OPERATION, ERR,
 112                                 "do_modrdn: (v2) invalid field newSuperior.\n", 0, 0, 0 );
 113 #else
 114                         Debug( LDAP_DEBUG_ANY,
 115                             "modrdn(v2): invalid field newSuperior!\n",
 116                             0, 0, 0 );
 117 #endif
 118
 119                         send_ldap_disconnect( conn, op,
 120                                 LDAP_PROTOCOL_ERROR, "newSuperior requires LDAPv3" );
 121                         rc = SLAPD_DISCONNECT;
 122                         goto cleanup;
 123                 }
 124
 125                 if ( ber_scanf( op->o_ber, "m", &newSuperior )
 126                      == LBER_ERROR ) {
 127
 128 #ifdef NEW_LOGGING
 129                         LDAP_LOG( OPERATION, ERR,
 130                                 "do_modrdn: ber_scanf(\"m\") failed\n", 0, 0, 0 );
 131 #else
 132                         Debug( LDAP_DEBUG_ANY, "ber_scanf(\"m\") failed\n",
 133                                 0, 0, 0 );
 134 #endif
 135
 136                         send_ldap_disconnect( conn, op,
 137                                 LDAP_PROTOCOL_ERROR, "decoding error" );
 138                         rc = SLAPD_DISCONNECT;
 139                         goto cleanup;
 140                 }
 141                 pnewS = &pnewSuperior;
 142                 nnewS = &nnewSuperior;
 143         }
 144
 145 #ifdef NEW_LOGGING
 146         LDAP_LOG( OPERATION, ARGS,
 147                 "do_modrdn: dn (%s) newrdn (%s) newsuperior(%s)\n",
 148                 dn.bv_val, newrdn.bv_val,
 149                 newSuperior.bv_len ? newSuperior.bv_val : "" );
 150 #else
 151         Debug( LDAP_DEBUG_ARGS,
 152             "do_modrdn: dn (%s) newrdn (%s) newsuperior (%s)\n",
 153                 dn.bv_val, newrdn.bv_val,
 154                 newSuperior.bv_len ? newSuperior.bv_val : "" );
 155 #endif
 156
 157         if ( ber_scanf( op->o_ber, /*{*/ "}") == LBER_ERROR ) {
 158 #ifdef NEW_LOGGING
 159                 LDAP_LOG( OPERATION, ERR, "do_modrdn: ber_scanf failed\n", 0, 0, 0 );
 160 #else
 161                 Debug( LDAP_DEBUG_ANY, "do_modrdn: ber_scanf failed\n", 0, 0, 0 );
 162 #endif
 163
 164                 send_ldap_disconnect( conn, op,
 165                         LDAP_PROTOCOL_ERROR, "decoding error" );
 166                 rc = SLAPD_DISCONNECT;
 167                 goto cleanup;
 168         }
 169
 170         if( (rc = get_ctrls( conn, op, 1 )) != LDAP_SUCCESS ) {
 171 #ifdef NEW_LOGGING
 172                 LDAP_LOG( OPERATION, ERR, "do_modrdn: get_ctrls failed\n", 0, 0, 0 );
 173 #else
 174                 Debug( LDAP_DEBUG_ANY, "do_modrdn: get_ctrls failed\n", 0, 0, 0 );
 175 #endif
 176
 177                 /* get_ctrls has sent results.  Now clean up. */
 178                 goto cleanup;
 179         }
 180
 181         rc = dnPrettyNormal( NULL, &dn, &pdn, &ndn );
 182         if( rc != LDAP_SUCCESS ) {
 183 #ifdef NEW_LOGGING
 184                 LDAP_LOG( OPERATION, INFO,
 185                         "do_modrdn: conn %d  invalid dn (%s)\n",
 186                         conn->c_connid, dn.bv_val, 0 );
 187 #else
 188                 Debug( LDAP_DEBUG_ANY,
 189                         "do_modrdn: invalid dn (%s)\n", dn.bv_val, 0, 0 );
 190 #endif
 191                 send_ldap_result( conn, op, rc = LDAP_INVALID_DN_SYNTAX, NULL,
 192                     "invalid DN", NULL, NULL );
 193                 goto cleanup;
 194         }
 195
 196         if( ndn.bv_len == 0 ) {
 197 #ifdef NEW_LOGGING
 198                 LDAP_LOG( OPERATION, ERR,
 199                         "do_modrdn:  attempt to modify root DSE.\n", 0, 0, 0 );
 200 #else
 201                 Debug( LDAP_DEBUG_ANY, "do_modrdn: root dse!\n", 0, 0, 0 );
 202 #endif
 203
 204                 send_ldap_result( conn, op, rc = LDAP_UNWILLING_TO_PERFORM,
 205                         NULL, "cannot rename the root DSE", NULL, NULL );
 206                 goto cleanup;
 207
 208         } else if ( bvmatch( &ndn, &global_schemandn ) ) {
 209 #ifdef NEW_LOGGING
 210                 LDAP_LOG( OPERATION, ERR,
 211                         "do_modrdn: attempt to modify subschema subentry: %s (%ld)\n",
 212                         global_schemandn.bv_val, (long) global_schemandn.bv_len, 0 );
 213 #else
 214                 Debug( LDAP_DEBUG_ANY, "do_modrdn: subschema subentry: %s (%ld)\n",
 215                         global_schemandn.bv_val, (long) global_schemandn.bv_len, 0 );
 216 #endif
 217
 218                 send_ldap_result( conn, op, rc = LDAP_UNWILLING_TO_PERFORM,
 219                         NULL, "cannot rename subschema subentry", NULL, NULL );
 220                 goto cleanup;
 221         }
 222
 223         /* FIXME: should have/use rdnPretty / rdnNormalize routines */
 224
 225         rc = dnPrettyNormal( NULL, &newrdn, &pnewrdn, &nnewrdn );
 226         if( rc != LDAP_SUCCESS ) {
 227 #ifdef NEW_LOGGING
 228                 LDAP_LOG( OPERATION, INFO,
 229                         "do_modrdn: conn %d  invalid newrdn (%s)\n",
 230                         conn->c_connid, newrdn.bv_val, 0 );
 231 #else
 232                 Debug( LDAP_DEBUG_ANY,
 233                         "do_modrdn: invalid newrdn (%s)\n", newrdn.bv_val, 0, 0 );
 234 #endif
 235                 send_ldap_result( conn, op, rc = LDAP_INVALID_DN_SYNTAX, NULL,
 236                     "invalid new RDN", NULL, NULL );
 237                 goto cleanup;
 238         }
 239
 240         if( rdnValidate( &pnewrdn ) != LDAP_SUCCESS ) {
 241 #ifdef NEW_LOGGING
 242                 LDAP_LOG( OPERATION, ERR,
 243                         "do_modrdn: invalid rdn (%s).\n", pnewrdn.bv_val, 0, 0 );
 244 #else
 245                 Debug( LDAP_DEBUG_ANY, "do_modrdn: invalid rdn (%s)\n",
 246                         pnewrdn.bv_val, 0, 0 );
 247 #endif
 248
 249                 send_ldap_result( conn, op, rc = LDAP_INVALID_DN_SYNTAX, NULL,
 250                     "invalid new RDN", NULL, NULL );
 251                 goto cleanup;
 252         }
 253
 254         if( pnewS ) {
 255                 rc = dnPrettyNormal( NULL, &newSuperior, &pnewSuperior,
 256                         &nnewSuperior );
 257                 if( rc != LDAP_SUCCESS ) {
 258 #ifdef NEW_LOGGING
 259                         LDAP_LOG( OPERATION, INFO,
 260                                 "do_modrdn: conn %d  invalid newSuperior (%s)\n",
 261                                 conn->c_connid, newSuperior.bv_val, 0 );
 262 #else
 263                         Debug( LDAP_DEBUG_ANY,
 264                                 "do_modrdn: invalid newSuperior (%s)\n",
 265                                 newSuperior.bv_val, 0, 0 );
 266 #endif
 267                         send_ldap_result( conn, op, rc = LDAP_INVALID_DN_SYNTAX, NULL,
 268                                 "invalid newSuperior", NULL, NULL );
 269                         goto cleanup;
 270                 }
 271         }
 272
 273         Statslog( LDAP_DEBUG_STATS, "conn=%lu op=%lu MODRDN dn=\"%s\"\n",
 274             op->o_connid, op->o_opid, pdn.bv_val, 0, 0 );
 275
 276         manageDSAit = get_manageDSAit( op );
 277
 278         /*
 279          * We could be serving multiple database backends.  Select the
 280          * appropriate one, or send a referral to our "referral server"
 281          * if we don't hold it.
 282          */
 283         if ( (be = select_backend( &ndn, manageDSAit, 0 )) == NULL ) {
 284                 BerVarray ref = referral_rewrite( default_referral,
 285                         NULL, &pdn, LDAP_SCOPE_DEFAULT );
 286
 287                 send_ldap_result( conn, op, rc = LDAP_REFERRAL,
 288                         NULL, NULL, ref ? ref : default_referral, NULL );
 289
 290                 ber_bvarray_free( ref );
 291                 goto cleanup;
 292         }
 293
 294         /* check restrictions */
 295         rc = backend_check_restrictions( be, conn, op, NULL, &text ) ;
 296         if( rc != LDAP_SUCCESS ) {
 297                 send_ldap_result( conn, op, rc,
 298                         NULL, text, NULL, NULL );
 299                 goto cleanup;
 300         }
 301
 302         /* check for referrals */
 303         rc = backend_check_referrals( be, conn, op, &pdn, &ndn );
 304         if ( rc != LDAP_SUCCESS ) {
 305                 goto cleanup;
 306         }
 307
 308         /* Make sure that the entry being changed and the newSuperior are in
 309          * the same backend, otherwise we return an error.
 310          */
 311         if( pnewS ) {
 312                 newSuperior_be = select_backend( &nnewSuperior, 0, 0 );
 313
 314                 if ( newSuperior_be != be ) {
 315                         /* newSuperior is in same backend */
 316                         rc = LDAP_AFFECTS_MULTIPLE_DSAS;
 317
 318                         send_ldap_result( conn, op, rc,
 319                                 NULL, "cannot rename between DSAa", NULL, NULL );
 320
 321                         goto cleanup;
 322                 }
 323
 324                 /* deref suffix alias if appropriate */
 325                 suffix_alias( be, &nnewSuperior );
 326         }
 327
 328         /* deref suffix alias if appropriate */
 329         suffix_alias( be, &ndn );
 330
 331 #if defined( LDAP_SLAPI )
 332         slapi_backend_set_pb( pb, be );
 333         slapi_connection_set_pb( pb, conn );
 334         slapi_operation_set_pb( pb, op );
 335         slapi_pblock_set( pb, SLAPI_MODRDN_TARGET, (void *)dn.bv_val );
 336         slapi_pblock_set( pb, SLAPI_MODRDN_NEWRDN, (void *)newrdn.bv_val );
 337         slapi_pblock_set( pb, SLAPI_MODRDN_NEWSUPERIOR,
 338                         (void *)newSuperior.bv_val );
 339         slapi_pblock_set( pb, SLAPI_MODRDN_DELOLDRDN, (void *)deloldrdn );
 340         slapi_pblock_set( pb, SLAPI_MANAGEDSAIT, (void *)(1) );
 341
 342         rc = doPluginFNs( be, SLAPI_PLUGIN_PRE_MODRDN_FN, pb );
 343         if ( rc != 0 && rc != LDAP_OTHER ) {
 344                 /*
 345                  * either there is no preOp (modrdn) plugins
 346                  * or a plugin failed. Just log it
 347                  *
 348                  * FIXME: is this correct?
 349                  */
 350 #ifdef NEW_LOGGING
 351                 LDAP_LOG( OPERATION, INFO, "do_modrdn: modrdn preOps "
 352                                 "failed\n", 0, 0, 0 );
 353 #else
 354                 Debug(LDAP_DEBUG_TRACE, "do_modrdn: modrdn preOps "
 355                                 "failed.\n", 0, 0, 0);
 356 #endif
 357         }
 358 #endif /* defined( LDAP_SLAPI ) */
 359
 360         /*
 361          * do the add if 1 && (2 || 3)
 362          * 1) there is an add function implemented in this backend;
 363          * 2) this backend is master for what it holds;
 364          * 3) it's a replica and the dn supplied is the update_ndn.
 365          */
 366         if ( be->be_modrdn ) {
 367                 /* do the update here */
 368                 int repl_user = be_isupdate( be, &op->o_ndn );
 369 #ifndef SLAPD_MULTIMASTER
 370                 if ( !be->be_update_ndn.bv_len || repl_user )
 371 #endif
 372                 {
 373                         if ( (*be->be_modrdn)( be, conn, op, &pdn, &ndn,
 374                                 &pnewrdn, &nnewrdn, deloldrdn,
 375                                 pnewS, nnewS ) == 0
 376 #ifdef SLAPD_MULTIMASTER
 377                                 && ( !be->be_update_ndn.bv_len || !repl_user )
 378 #endif
 379                         ) {
 380                                 struct slap_replog_moddn moddn;
 381                                 moddn.newrdn = &pnewrdn;
 382                                 moddn.deloldrdn = deloldrdn;
 383                                 moddn.newsup = &pnewSuperior;
 384
 385                                 replog( be, op, &pdn, &ndn, &moddn );
 386                         }
 387 #ifndef SLAPD_MULTIMASTER
 388                 } else {
 389                         BerVarray defref = be->be_update_refs
 390                                 ? be->be_update_refs : default_referral;
 391                         BerVarray ref = referral_rewrite( defref,
 392                                 NULL, &pdn, LDAP_SCOPE_DEFAULT );
 393
 394                         send_ldap_result( conn, op, rc = LDAP_REFERRAL, NULL, NULL,
 395                                 ref ? ref : defref, NULL );
 396
 397                         ber_bvarray_free( ref );
 398 #endif
 399                 }
 400         } else {
 401                 send_ldap_result( conn, op, rc = LDAP_UNWILLING_TO_PERFORM,
 402                         NULL, "operation not supported within namingContext",
 403                         NULL, NULL );
 404         }
 405
 406 #if defined( LDAP_SLAPI )
 407         rc = doPluginFNs( be, SLAPI_PLUGIN_POST_MODRDN_FN, pb );
 408         if ( rc != 0 && rc != LDAP_OTHER ) {
 409                 /*
 410                  * either there is no postOp (modrdn) plugins
 411                  * or a plugin failed. Just log it
 412                  *
 413                  * FIXME: is this correct?
 414                  */
 415 #ifdef NEW_LOGGING
 416                 LDAP_LOG( OPERATION, INFO, "do_modrdn: modrdn postOps "
 417                                 "failed\n", 0, 0, 0 );
 418 #else
 419                 Debug(LDAP_DEBUG_TRACE, "do_modrdn: modrdn postOps "
 420                                 "failed.\n", 0, 0, 0);
 421 #endif
 422         }
 423 #endif /* defined( LDAP_SLAPI ) */
 424
 425 cleanup:
 426         free( pdn.bv_val );
 427         free( ndn.bv_val );
 428
 429         free( pnewrdn.bv_val );
 430         free( nnewrdn.bv_val );
 431
 432         if ( pnewSuperior.bv_val ) free( pnewSuperior.bv_val );
 433         if ( nnewSuperior.bv_val ) free( nnewSuperior.bv_val );
 434
 435         return rc;
 436 }
 437
 438 int
 439 slap_modrdn2mods(
 440         Backend         *be,
 441         Connection      *conn,
 442         Operation       *op,
 443         Entry           *e,
 444         LDAPRDN         *old_rdn,
 445         LDAPRDN         *new_rdn,
 446         int             deleteoldrdn,
 447         Modifications   **pmod )
 448 {
 449         int             rc = LDAP_SUCCESS;
 450         const char      *text;
 451         Modifications   *mod = NULL;
 452         int             a_cnt, d_cnt;
 453
 454         assert( new_rdn != NULL );
 455         assert( !deleteoldrdn || old_rdn != NULL );
 456
 457         /* Add new attribute values to the entry */
 458         for ( a_cnt = 0; new_rdn[ 0 ][ a_cnt ]; a_cnt++ ) {
 459                 AttributeDescription    *desc = NULL;
 460                 Modifications           *mod_tmp;
 461
 462                 rc = slap_bv2ad( &new_rdn[ 0 ][ a_cnt ]->la_attr,
 463                                 &desc, &text );
 464
 465                 if ( rc != LDAP_SUCCESS ) {
 466 #ifdef NEW_LOGGING
 467                         LDAP_LOG ( OPERATION, ERR,
 468                                 "slap_modrdn2modlist: %s: %s (new)\n",
 469                                 text,
 470                                 new_rdn[ 0 ][ a_cnt ]->la_attr.bv_val, 0 );
 471 #else
 472                         Debug( LDAP_DEBUG_TRACE,
 473                                 "slap_modrdn2modlist: %s: %s (new)\n",
 474                                 text,
 475                                 new_rdn[ 0 ][ a_cnt ]->la_attr.bv_val, 0 );
 476 #endif
 477                         goto done;
 478                 }
 479
 480                 /* ACL check of newly added attrs */
 481                 if ( be && !access_allowed( be, conn, op, e, desc,
 482                         &new_rdn[ 0 ][ a_cnt ]->la_value, ACL_WRITE, NULL ) ) {
 483 #ifdef NEW_LOGGING
 484                         LDAP_LOG ( OPERATION, ERR,
 485                                 "slap_modrdn2modlist: access to attr \"%s\" "
 486                                 "(new) not allowed\n",
 487                                 new_rdn[ 0 ][a_cnt]->la_attr.bv_val, 0, 0 );
 488 #else
 489                         Debug( LDAP_DEBUG_TRACE,
 490                                 "slap_modrdn2modlist: access to attr \"%s\" "
 491                                 "(new) not allowed\n",
 492                                 new_rdn[ 0 ][ a_cnt ]->la_attr.bv_val, 0, 0 );
 493 #endif
 494                         rc = LDAP_INSUFFICIENT_ACCESS;
 495                         goto done;
 496                 }
 497
 498                 /* Apply modification */
 499                 mod_tmp = ( Modifications * )ch_malloc( sizeof( Modifications )
 500                         + 2 * sizeof( struct berval ) );
 501                 mod_tmp->sml_desc = desc;
 502                 mod_tmp->sml_bvalues = ( BerVarray )( mod_tmp + 1 );
 503                 mod_tmp->sml_bvalues[ 0 ] = new_rdn[ 0 ][ a_cnt ]->la_value;
 504                 mod_tmp->sml_bvalues[ 1 ].bv_val = NULL;
 505                 mod_tmp->sml_op = SLAP_MOD_SOFTADD;
 506                 mod_tmp->sml_next = mod;
 507                 mod = mod_tmp;
 508         }
 509
 510         /* Remove old rdn value if required */
 511         if ( deleteoldrdn ) {
 512                 for ( d_cnt = 0; old_rdn[ 0 ][ d_cnt ]; d_cnt++ ) {
 513                         AttributeDescription    *desc = NULL;
 514                         Modifications           *mod_tmp;
 515
 516                         rc = slap_bv2ad( &old_rdn[ 0 ][ d_cnt ]->la_attr,
 517                                         &desc, &text );
 518
 519                         if ( rc != LDAP_SUCCESS ) {
 520 #ifdef NEW_LOGGING
 521                                 LDAP_LOG ( OPERATION, ERR,
 522                                         "slap_modrdn2modlist: %s: %s (old)\n",
 523                                         text,
 524                                         old_rdn[ 0 ][ d_cnt ]->la_attr.bv_val,
 525                                         0 );
 526 #else
 527                                 Debug( LDAP_DEBUG_TRACE,
 528                                         "slap_modrdn2modlist: %s: %s (old)\n",
 529                                         text,
 530                                         old_rdn[ 0 ][ d_cnt ]->la_attr.bv_val,
 531                                         0 );
 532 #endif
 533                                 goto done;
 534                         }
 535
 536                         /* ACL check of newly added attrs */
 537                         if ( be && !access_allowed( be, conn, op, e, desc,
 538                                 &old_rdn[ 0 ][ d_cnt ]->la_value, ACL_WRITE,
 539                                 NULL ) ) {
 540 #ifdef NEW_LOGGING
 541                                 LDAP_LOG ( OPERATION, ERR,
 542                                         "slap_modrdn2modlist: access "
 543                                         "to attr \"%s\" (old) not allowed\n",
 544                                         old_rdn[ 0 ][ d_cnt ]->la_attr.bv_val,
 545                                         0, 0 );
 546 #else
 547                                 Debug( LDAP_DEBUG_TRACE,
 548                                         "slap_modrdn2modlist: access "
 549                                         "to attr \"%s\" (old) not allowed\n",
 550                                         old_rdn[ 0 ][ d_cnt ]->la_attr.bv_val,
 551                                         0, 0 );
 552 #endif
 553                                 rc = LDAP_INSUFFICIENT_ACCESS;
 554                                 goto done;
 555                         }
 556
 557                         /* Apply modification */
 558                         mod_tmp = ( Modifications * )ch_malloc( sizeof( Modifications )
 559                                 + 2 * sizeof ( struct berval ) );
 560                         mod_tmp->sml_desc = desc;
 561                         mod_tmp->sml_bvalues = ( BerVarray )(mod_tmp+1);
 562                         mod_tmp->sml_bvalues[ 0 ]
 563                                 = old_rdn[ 0 ][ d_cnt ]->la_value;
 564                         mod_tmp->sml_bvalues[ 1 ].bv_val = NULL;
 565                         mod_tmp->sml_op = LDAP_MOD_DELETE;
 566                         mod_tmp->sml_next = mod;
 567                         mod = mod_tmp;
 568                 }
 569         }
 570
 571 done:
 572         /* LDAP v2 supporting correct attribute handling. */
 573         if ( rc != LDAP_SUCCESS && mod != NULL ) {
 574                 Modifications *tmp;
 575                 for ( ; mod; mod = tmp ) {
 576                         tmp = mod->sml_next;
 577                         ch_free( mod );
 578                 }
 579         }
 580
 581         *pmod = mod;
 582
 583         return rc;
 584 }