]> git.sur5r.net Git - openldap/blob - servers/slapd/back-ldap/modify.c
ITS#2864 don't use sl_mark/release.
[openldap] / servers / slapd / back-ldap / modify.c
1 /* modify.c - ldap backend modify function */
2 /* $OpenLDAP$ */
3 /* This work is part of OpenLDAP Software <http://www.openldap.org/>.
4  *
5  * Copyright 2003 The OpenLDAP Foundation.
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 the Howard Chu for inclusion
18  * in OpenLDAP Software and subsequently enhanced by Pierangelo
19  * Masarati.
20  */
21 /* This is an altered version */
22 /*
23  * Copyright 1999, Howard Chu, All rights reserved. <hyc@highlandsun.com>
24  * 
25  * Permission is granted to anyone to use this software for any purpose
26  * on any computer system, and to alter it and redistribute it, subject
27  * to the following restrictions:
28  * 
29  * 1. The author is not responsible for the consequences of use of this
30  *    software, no matter how awful, even if they arise from flaws in it.
31  * 
32  * 2. The origin of this software must not be misrepresented, either by
33  *    explicit claim or by omission.  Since few users ever read sources,
34  *    credits should appear in the documentation.
35  * 
36  * 3. Altered versions must be plainly marked as such, and must not be
37  *    misrepresented as being the original software.  Since few users
38  *    ever read sources, credits should appear in the documentation.
39  * 
40  * 4. This notice may not be removed or altered.
41  *
42  *
43  *
44  * Copyright 2000, Pierangelo Masarati, All rights reserved. <ando@sys-net.it>
45  * 
46  * This software is being modified by Pierangelo Masarati.
47  * The previously reported conditions apply to the modified code as well.
48  * Changes in the original code are highlighted where required.
49  * Credits for the original code go to the author, Howard Chu.
50  */
51
52 #include "portable.h"
53
54 #include <stdio.h>
55
56 #include <ac/string.h>
57 #include <ac/socket.h>
58
59 #include "slap.h"
60 #include "back-ldap.h"
61
62 int
63 ldap_back_modify(
64     Operation   *op,
65     SlapReply   *rs )
66 {
67         struct ldapinfo *li = (struct ldapinfo *) op->o_bd->be_private;
68         struct ldapconn *lc;
69         LDAPMod **modv = NULL;
70         LDAPMod *mods;
71         Modifications *ml;
72         int i, j, rc;
73         struct berval mapped;
74         struct berval mdn = { 0, NULL };
75         ber_int_t msgid;
76         dncookie dc;
77 #ifdef LDAP_BACK_PROXY_AUTHZ 
78         LDAPControl **ctrls = NULL;
79 #endif /* LDAP_BACK_PROXY_AUTHZ */
80
81         lc = ldap_back_getconn(op, rs);
82         if ( !lc || !ldap_back_dobind( lc, op, rs ) ) {
83                 return( -1 );
84         }
85
86         /*
87          * Rewrite the modify dn, if needed
88          */
89         dc.rwmap = &li->rwmap;
90 #ifdef ENABLE_REWRITE
91         dc.conn = op->o_conn;
92         dc.rs = rs;
93         dc.ctx = "modifyDn";
94 #else
95         dc.tofrom = 1;
96         dc.normalized = 0;
97 #endif
98         if ( ldap_back_dn_massage( &dc, &op->o_req_dn, &mdn ) ) {
99                 send_ldap_result( op, rs );
100                 return -1;
101         }
102
103         for (i=0, ml=op->oq_modify.rs_modlist; ml; i++,ml=ml->sml_next)
104                 ;
105
106         mods = (LDAPMod *)ch_malloc(i*sizeof(LDAPMod));
107         if (mods == NULL) {
108                 rc = LDAP_NO_MEMORY;
109                 goto cleanup;
110         }
111         modv = (LDAPMod **)ch_malloc((i+1)*sizeof(LDAPMod *));
112         if (modv == NULL) {
113                 rc = LDAP_NO_MEMORY;
114                 goto cleanup;
115         }
116
117 #ifdef ENABLE_REWRITE
118         dc.ctx = "modifyAttrDN";
119 #endif
120         for (i=0, ml=op->oq_modify.rs_modlist; ml; ml=ml->sml_next) {
121                 int     is_oc = 0;
122
123                 if ( ml->sml_desc->ad_type->sat_no_user_mod  ) {
124                         continue;
125                 }
126
127                 if ( ml->sml_desc == slap_schema.si_ad_objectClass 
128                                 || ml->sml_desc == slap_schema.si_ad_structuralObjectClass ) {
129                         is_oc = 1;
130                         mapped = ml->sml_desc->ad_cname;
131
132                 } else {
133                         ldap_back_map(&li->rwmap.rwm_at,
134                                         &ml->sml_desc->ad_cname,
135                                         &mapped, BACKLDAP_MAP);
136                         if (mapped.bv_val == NULL || mapped.bv_val[0] == '\0') {
137                                 continue;
138                         }
139                 }
140
141                 modv[i] = &mods[i];
142                 mods[i].mod_op = ml->sml_op | LDAP_MOD_BVALUES;
143                 mods[i].mod_type = mapped.bv_val;
144
145                 if ( ml->sml_bvalues != NULL ) {
146                         if ( is_oc ) {
147                                 for (j = 0; ml->sml_bvalues[j].bv_val; j++);
148                                 mods[i].mod_bvalues = (struct berval **)ch_malloc((j+1) *
149                                         sizeof(struct berval *));
150                                 for (j = 0; ml->sml_bvalues[j].bv_val; j++) {
151                                         ldap_back_map(&li->rwmap.rwm_oc,
152                                                         &ml->sml_bvalues[j],
153                                                         &mapped, BACKLDAP_MAP);
154                                         if (mapped.bv_val == NULL || mapped.bv_val[0] == '\0') {
155                                                 continue;
156                                         }
157                                         mods[i].mod_bvalues[j] = &mapped;
158                                 }
159                                 mods[i].mod_bvalues[j] = NULL;
160
161                         } else {
162                                 if ( ml->sml_desc->ad_type->sat_syntax ==
163                                         slap_schema.si_syn_distinguishedName ) {
164                                         ldap_dnattr_rewrite( &dc, ml->sml_bvalues );
165                                 }
166
167                                 if ( ml->sml_bvalues == NULL ) {        
168                                         continue;
169                                 }
170
171                                 for (j = 0; ml->sml_bvalues[j].bv_val; j++);
172                                 mods[i].mod_bvalues = (struct berval **)ch_malloc((j+1) *
173                                         sizeof(struct berval *));
174                                 for (j = 0; ml->sml_bvalues[j].bv_val; j++)
175                                         mods[i].mod_bvalues[j] = &ml->sml_bvalues[j];
176                                 mods[i].mod_bvalues[j] = NULL;
177                         }
178
179                 } else {
180                         mods[i].mod_bvalues = NULL;
181                 }
182
183                 i++;
184         }
185         modv[i] = 0;
186
187 #ifdef LDAP_BACK_PROXY_AUTHZ
188         rc = ldap_back_proxy_authz_ctrl( lc, op, rs, &ctrls );
189         if ( rc != LDAP_SUCCESS ) {
190                 goto cleanup;
191         }
192 #endif /* LDAP_BACK_PROXY_AUTHZ */
193
194         rs->sr_err = ldap_modify_ext( lc->ld, mdn.bv_val, modv,
195 #ifdef LDAP_BACK_PROXY_AUTHZ
196                         ctrls,
197 #else /* ! LDAP_BACK_PROXY_AUTHZ */
198                         op->o_ctrls,
199 #endif /* ! LDAP_BACK_PROXY_AUTHZ */
200                         NULL, &msgid );
201
202 cleanup:;
203 #ifdef LDAP_BACK_PROXY_AUTHZ
204         if ( ctrls && ctrls != op->o_ctrls ) {
205                 free( ctrls[ 0 ] );
206                 free( ctrls );
207         }
208 #endif /* LDAP_BACK_PROXY_AUTHZ */
209
210         if ( mdn.bv_val != op->o_req_dn.bv_val ) {
211                 free( mdn.bv_val );
212         }
213         for (i=0; modv[i]; i++) {
214                 ch_free(modv[i]->mod_bvalues);
215         }
216         ch_free( mods );
217         ch_free( modv );
218
219 #ifdef LDAP_BACK_PROXY_AUTHZ
220         if ( rc != LDAP_SUCCESS ) {
221                 send_ldap_result( op, rs );
222                 return -1;
223         }
224 #endif /* LDAP_BACK_PROXY_AUTHZ */
225
226         return ldap_back_op_result( lc, op, rs, msgid, 1 );
227 }
228