git.sur5r.net Git - openldap/blob - servers/slapd/back-meta/modify.c

   1 /* $OpenLDAP$ */
   2 /* This work is part of OpenLDAP Software <http://www.openldap.org/>.
   3  *
   4  * Copyright 1999-2004 The OpenLDAP Foundation.
   5  * Portions Copyright 2001-2003 Pierangelo Masarati.
   6  * Portions Copyright 1999-2003 Howard Chu.
   7  * All rights reserved.
   8  *
   9  * Redistribution and use in source and binary forms, with or without
  10  * modification, are permitted only as authorized by the OpenLDAP
  11  * Public License.
  12  *
  13  * A copy of this license is available in the file LICENSE in the
  14  * top-level directory of the distribution or, alternatively, at
  15  * <http://www.OpenLDAP.org/license.html>.
  16  */
  17 /* ACKNOWLEDGEMENTS:
  18  * This work was initially developed by the Howard Chu for inclusion
  19  * in OpenLDAP Software and subsequently enhanced by Pierangelo
  20  * Masarati.
  21  */
  22
  23 #include "portable.h"
  24
  25 #include <stdio.h>
  26
  27 #include <ac/string.h>
  28 #include <ac/socket.h>
  29
  30 #include "slap.h"
  31 #include "../back-ldap/back-ldap.h"
  32 #include "back-meta.h"
  33
  34 int
  35 meta_back_modify( Operation *op, SlapReply *rs )
  36 {
  37         struct metainfo         *li = ( struct metainfo * )op->o_bd->be_private;
  38         struct metaconn         *lc;
  39         int                     rc = 0;
  40         LDAPMod                 **modv = NULL;
  41         LDAPMod                 *mods = NULL;
  42         Modifications           *ml;
  43         int                     candidate = -1, i;
  44         struct berval           mdn = BER_BVNULL;
  45         struct berval           mapped;
  46         dncookie                dc;
  47
  48         lc = meta_back_getconn( op, rs, META_OP_REQUIRE_SINGLE,
  49                         &op->o_req_ndn, &candidate );
  50         if ( !lc ) {
  51                 rc = -1;
  52                 goto cleanup;
  53         }
  54
  55         if ( !meta_back_dobind( lc, op )
  56                         || !meta_back_is_valid( lc, candidate ) ) {
  57                 rs->sr_err = LDAP_OTHER;
  58                 rc = -1;
  59                 goto cleanup;
  60         }
  61
  62         /*
  63          * Rewrite the modify dn, if needed
  64          */
  65         dc.rwmap = &li->targets[ candidate ]->rwmap;
  66         dc.conn = op->o_conn;
  67         dc.rs = rs;
  68         dc.ctx = "modifyDN";
  69
  70         if ( ldap_back_dn_massage( &dc, &op->o_req_dn, &mdn ) ) {
  71                 rc = -1;
  72                 goto cleanup;
  73         }
  74
  75         for ( i = 0, ml = op->oq_modify.rs_modlist; ml; i++ ,ml = ml->sml_next )
  76                 ;
  77
  78         mods = ch_malloc( sizeof( LDAPMod )*i );
  79         if ( mods == NULL ) {
  80                 rs->sr_err = LDAP_NO_MEMORY;
  81                 rc = -1;
  82                 goto cleanup;
  83         }
  84         modv = ( LDAPMod ** )ch_malloc( ( i + 1 )*sizeof( LDAPMod * ) );
  85         if ( modv == NULL ) {
  86                 rs->sr_err = LDAP_NO_MEMORY;
  87                 rc = -1;
  88                 goto cleanup;
  89         }
  90
  91         dc.ctx = "modifyAttrDN";
  92         for ( i = 0, ml = op->oq_modify.rs_modlist; ml; ml = ml->sml_next ) {
  93                 int j;
  94
  95                 if ( ml->sml_desc->ad_type->sat_no_user_mod  ) {
  96                         continue;
  97                 }
  98
  99                 ldap_back_map( &li->targets[ candidate ]->rwmap.rwm_at,
 100                                 &ml->sml_desc->ad_cname, &mapped,
 101                                 BACKLDAP_MAP );
 102                 if ( mapped.bv_val == NULL || mapped.bv_val[0] == '\0' ) {
 103                         continue;
 104                 }
 105
 106                 modv[ i ] = &mods[ i ];
 107                 mods[ i ].mod_op = ml->sml_op | LDAP_MOD_BVALUES;
 108                 mods[ i ].mod_type = mapped.bv_val;
 109
 110                 /*
 111                  * FIXME: dn-valued attrs should be rewritten
 112                  * to allow their use in ACLs at the back-ldap
 113                  * level.
 114                  */
 115                 if ( strcmp( ml->sml_desc->ad_type->sat_syntax->ssyn_oid,
 116                                         SLAPD_DN_SYNTAX ) == 0 ) {
 117                         ( void )ldap_dnattr_rewrite( &dc, ml->sml_bvalues );
 118                 }
 119
 120                 if ( ml->sml_bvalues != NULL ){
 121                         for (j = 0; ml->sml_bvalues[ j ].bv_val; j++);
 122                         mods[ i ].mod_bvalues = (struct berval **)ch_malloc((j+1) *
 123                                 sizeof(struct berval *));
 124                         for (j = 0; ml->sml_bvalues[ j ].bv_val; j++)
 125                                 mods[ i ].mod_bvalues[ j ] = &ml->sml_bvalues[j];
 126                         mods[ i ].mod_bvalues[ j ] = NULL;
 127
 128                 } else {
 129                         mods[ i ].mod_bvalues = NULL;
 130                 }
 131
 132                 i++;
 133         }
 134         modv[ i ] = 0;
 135
 136         ldap_modify_s( lc->conns[ candidate ].ld, mdn.bv_val, modv );
 137
 138 cleanup:;
 139         if ( mdn.bv_val != op->o_req_dn.bv_val ) {
 140                 free( mdn.bv_val );
 141         }
 142         if ( modv != NULL ) {
 143                 for ( i = 0; modv[ i ]; i++) {
 144                         free( modv[ i ]->mod_bvalues );
 145                 }
 146         }
 147         free( mods );
 148         free( modv );
 149
 150         if ( rc == 0 ) {
 151                 return meta_back_op_result( lc, op, rs ) == LDAP_SUCCESS
 152                         ? 0 : 1;
 153         } /* else */
 154
 155         send_ldap_result( op, rs );
 156
 157         return rc;
 158 }
 159