external/bsd/openldap/dist/servers/slapd/back-ldap/modify.c

   1 /* modify.c - ldap backend modify function */
   2 /* $OpenLDAP: pkg/ldap/servers/slapd/back-ldap/modify.c,v 1.69.2.5 2008/02/11 23:26:46 kurt Exp $ */
   3 /* This work is part of OpenLDAP Software <http://www.openldap.org/>.
   4  *
   5  * Copyright 1999-2008 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/socket.h>
  30
  31 #include "slap.h"
  32 #include "back-ldap.h"
  33
  34 int
  35 ldap_back_modify(
  36                 Operation       *op,
  37                 SlapReply       *rs )
  38 {
  39         ldapinfo_t              *li = (ldapinfo_t *)op->o_bd->be_private;
  40
  41         ldapconn_t              *lc = NULL;
  42         LDAPMod                 **modv = NULL,
  43                                 *mods = NULL;
  44         Modifications           *ml;
  45         int                     i, j, rc;
  46         ber_int_t               msgid;
  47         int                     isupdate;
  48         ldap_back_send_t        retrying = LDAP_BACK_RETRYING;
  49         LDAPControl             **ctrls = NULL;
  50
  51         if ( !ldap_back_dobind( &lc, op, rs, LDAP_BACK_SENDERR ) ) {
  52                 return rs->sr_err;
  53         }
  54
  55         for ( i = 0, ml = op->orm_modlist; ml; i++, ml = ml->sml_next )
  56                 /* just count mods */ ;
  57
  58         modv = (LDAPMod **)ch_malloc( ( i + 1 )*sizeof( LDAPMod * )
  59                         + i*sizeof( LDAPMod ) );
  60         if ( modv == NULL ) {
  61                 rc = LDAP_NO_MEMORY;
  62                 goto cleanup;
  63         }
  64         mods = (LDAPMod *)&modv[ i + 1 ];
  65
  66         isupdate = be_shadow_update( op );
  67         for ( i = 0, ml = op->orm_modlist; ml; ml = ml->sml_next ) {
  68                 if ( !isupdate && !get_relax( op ) && ml->sml_desc->ad_type->sat_no_user_mod  )
  69                 {
  70                         continue;
  71                 }
  72
  73                 modv[ i ] = &mods[ i ];
  74                 mods[ i ].mod_op = ( ml->sml_op | LDAP_MOD_BVALUES );
  75                 mods[ i ].mod_type = ml->sml_desc->ad_cname.bv_val;
  76
  77                 if ( ml->sml_values != NULL ) {
  78                         if ( ml->sml_values == NULL ) {
  79                                 continue;
  80                         }
  81
  82                         for ( j = 0; !BER_BVISNULL( &ml->sml_values[ j ] ); j++ )
  83                                 /* just count mods */ ;
  84                         mods[ i ].mod_bvalues =
  85                                 (struct berval **)ch_malloc( ( j + 1 )*sizeof( struct berval * ) );
  86                         for ( j = 0; !BER_BVISNULL( &ml->sml_values[ j ] ); j++ )
  87                         {
  88                                 mods[ i ].mod_bvalues[ j ] = &ml->sml_values[ j ];
  89                         }
  90                         mods[ i ].mod_bvalues[ j ] = NULL;
  91
  92                 } else {
  93                         mods[ i ].mod_bvalues = NULL;
  94                 }
  95
  96                 i++;
  97         }
  98         modv[ i ] = 0;
  99
 100 retry:;
 101         ctrls = op->o_ctrls;
 102         rc = ldap_back_controls_add( op, rs, lc, &ctrls );
 103         if ( rc != LDAP_SUCCESS ) {
 104                 send_ldap_result( op, rs );
 105                 rc = -1;
 106                 goto cleanup;
 107         }
 108
 109         rs->sr_err = ldap_modify_ext( lc->lc_ld, op->o_req_dn.bv_val, modv,
 110                         ctrls, NULL, &msgid );
 111         rc = ldap_back_op_result( lc, op, rs, msgid,
 112                 li->li_timeout[ SLAP_OP_MODIFY ],
 113                 ( LDAP_BACK_SENDRESULT | retrying ) );
 114         if ( rs->sr_err == LDAP_UNAVAILABLE && retrying ) {
 115                 retrying &= ~LDAP_BACK_RETRYING;
 116                 if ( ldap_back_retry( &lc, op, rs, LDAP_BACK_SENDERR ) ) {
 117                         /* if the identity changed, there might be need to re-authz */
 118                         (void)ldap_back_controls_free( op, rs, &ctrls );
 119                         goto retry;
 120                 }
 121         }
 122
 123 cleanup:;
 124         (void)ldap_back_controls_free( op, rs, &ctrls );
 125
 126         for ( i = 0; modv[ i ]; i++ ) {
 127                 ch_free( modv[ i ]->mod_bvalues );
 128         }
 129         ch_free( modv );
 130
 131         if ( lc != NULL ) {
 132                 ldap_back_release_conn( li, lc );
 133         }
 134
 135         return rc;
 136 }
 137