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