]> git.sur5r.net Git - openldap/blob - servers/slapd/back-meta/modrdn.c
ITS#2368 - fix deleting key from range IDL
[openldap] / servers / slapd / back-meta / modrdn.c
1 /*
2  * Copyright 1998-2003 The OpenLDAP Foundation, All Rights Reserved.
3  * COPYING RESTRICTIONS APPLY, see COPYRIGHT file
4  *
5  * Copyright 2001, Pierangelo Masarati, All rights reserved. <ando@sys-net.it>
6  *
7  * This work has been developed to fulfill the requirements
8  * of SysNet s.n.c. <http:www.sys-net.it> and it has been donated
9  * to the OpenLDAP Foundation in the hope that it may be useful
10  * to the Open Source community, but WITHOUT ANY WARRANTY.
11  *
12  * Permission is granted to anyone to use this software for any purpose
13  * on any computer system, and to alter it and redistribute it, subject
14  * to the following restrictions:
15  *
16  * 1. The author and SysNet s.n.c. are not responsible for the consequences
17  *    of use of this software, no matter how awful, even if they arise from 
18  *    flaws in it.
19  *
20  * 2. The origin of this software must not be misrepresented, either by
21  *    explicit claim or by omission.  Since few users ever read sources,
22  *    credits should appear in the documentation.
23  *
24  * 3. Altered versions must be plainly marked as such, and must not be
25  *    misrepresented as being the original software.  Since few users
26  *    ever read sources, credits should appear in the documentation.
27  *    SysNet s.n.c. cannot be responsible for the consequences of the
28  *    alterations.
29  *
30  * 4. This notice may not be removed or altered.
31  *
32  *
33  * This software is based on the backend back-ldap, implemented
34  * by Howard Chu <hyc@highlandsun.com>, and modified by Mark Valence
35  * <kurash@sassafras.com>, Pierangelo Masarati <ando@sys-net.it> and other
36  * contributors. The contribution of the original software to the present
37  * implementation is acknowledged in this copyright statement.
38  *
39  * A special acknowledgement goes to Howard for the overall architecture
40  * (and for borrowing large pieces of code), and to Mark, who implemented
41  * from scratch the attribute/objectclass mapping.
42  *
43  * The original copyright statement follows.
44  *
45  * Copyright 1999, Howard Chu, All rights reserved. <hyc@highlandsun.com>
46  *
47  * Permission is granted to anyone to use this software for any purpose
48  * on any computer system, and to alter it and redistribute it, subject
49  * to the following restrictions:
50  *
51  * 1. The author is not responsible for the consequences of use of this
52  *    software, no matter how awful, even if they arise from flaws in it.
53  *
54  * 2. The origin of this software must not be misrepresented, either by
55  *    explicit claim or by omission.  Since few users ever read sources,
56  *    credits should appear in the documentation.
57  *
58  * 3. Altered versions must be plainly marked as such, and must not be
59  *    misrepresented as being the original software.  Since few users
60  *    ever read sources, credits should appear in the
61  *    documentation.
62  *
63  * 4. This notice may not be removed or altered.
64  *
65  */
66
67 #include "portable.h"
68
69 #include <stdio.h>
70
71 #include <ac/socket.h>
72 #include <ac/string.h>
73
74 #include "slap.h"
75 #include "../back-ldap/back-ldap.h"
76 #include "back-meta.h"
77
78 int
79 meta_back_modrdn(
80                 Backend         *be,
81                 Connection      *conn,
82                 Operation       *op,
83                 struct berval   *dn,
84                 struct berval   *ndn,
85                 struct berval   *newrdn,
86                 struct berval   *nnewrdn,
87                 int             deleteoldrdn,
88                 struct berval   *newSuperior,
89                 struct berval   *nnewSuperior
90 )
91 {
92         struct metainfo *li = ( struct metainfo * )be->be_private;
93         struct metaconn *lc;
94         int candidate = -1;
95
96         char *mdn = NULL, *mnewSuperior = NULL;
97
98         lc = meta_back_getconn( li, conn, op, META_OP_REQUIRE_SINGLE,
99                         ndn, &candidate );
100         if ( !lc || !meta_back_dobind( lc, op ) 
101                         || !meta_back_is_valid( lc, candidate ) ) {
102                 send_ldap_result( conn, op, LDAP_OTHER,
103                                 NULL, NULL, NULL, NULL );
104                 return -1;
105         }
106
107         if ( newSuperior ) {
108                 int nsCandidate, version = LDAP_VERSION3;
109
110                 nsCandidate = meta_back_select_unique_candidate( li,
111                                 newSuperior );
112
113                 if ( nsCandidate != candidate ) {
114                         /*
115                          * FIXME: one possibility is to delete the entry
116                          * from one target and add it to the other;
117                          * unfortunately we'd need write access to both,
118                          * which is nearly impossible; for administration
119                          * needs, the rootdn of the metadirectory could
120                          * be mapped to an administrative account on each
121                          * target (the binddn?); we'll see.
122                          */
123                         /*
124                          * FIXME: is this the correct return code?
125                          */
126                         send_ldap_result( conn, op, LDAP_UNWILLING_TO_PERFORM,
127                                         NULL, NULL, NULL, NULL );
128                         return -1;
129                 }
130
131                 ldap_set_option( lc->conns[ nsCandidate ].ld,
132                                 LDAP_OPT_PROTOCOL_VERSION, &version );
133                 
134                 /*
135                  * Rewrite the new superior, if defined and required
136                  */
137                 switch ( rewrite_session( li->targets[ nsCandidate ]->rwinfo,
138                                         "newSuperiorDn",
139                                         newSuperior->bv_val, 
140                                         conn, 
141                                         &mnewSuperior ) ) {
142                 case REWRITE_REGEXEC_OK:
143                         if ( mnewSuperior == NULL ) {
144                                 mnewSuperior = ( char * )newSuperior;
145                         }
146 #ifdef NEW_LOGGING
147                         LDAP_LOG( BACK_META, DETAIL1,
148                                 "[rw] newSuperiorDn: \"%s\" -> \"%s\"\n",
149                                 newSuperior, mnewSuperior, 0 );
150 #else /* !NEW_LOGGING */
151                         Debug( LDAP_DEBUG_ARGS, "rw> newSuperiorDn:"
152                                         " \"%s\" -> \"%s\"\n%s",
153                                         newSuperior->bv_val, mnewSuperior, "" );
154 #endif /* !NEW_LOGGING */
155                         break;
156
157                 case REWRITE_REGEXEC_UNWILLING:
158                         send_ldap_result( conn, op, LDAP_UNWILLING_TO_PERFORM,
159                                         NULL, "Operation not allowed", 
160                                         NULL, NULL );
161                         return -1;
162
163                 case REWRITE_REGEXEC_ERR:
164                         send_ldap_result( conn, op, LDAP_OTHER,
165                                         NULL, "Rewrite error", NULL, NULL );
166                         return -1;
167                 }
168         }
169
170         /*
171          * Rewrite the modrdn dn, if required
172          */
173         switch ( rewrite_session( li->targets[ candidate ]->rwinfo,
174                                 "modrDn", dn->bv_val, conn, &mdn ) ) {
175         case REWRITE_REGEXEC_OK:
176                 if ( mdn == NULL ) {
177                         mdn = ( char * )dn->bv_val;
178                 }
179 #ifdef NEW_LOGGING
180                 LDAP_LOG( BACK_META, DETAIL1,
181                         "[rw] modrDn: \"%s\" -> \"%s\"\n", dn->bv_val, mdn, 0 );
182 #else /* !NEW_LOGGING */
183                 Debug( LDAP_DEBUG_ARGS, "rw> modrDn: \"%s\" -> \"%s\"\n%s",
184                                 dn->bv_val, mdn, "" );
185 #endif /* !NEW_LOGGING */
186                 break;
187                 
188         case REWRITE_REGEXEC_UNWILLING:
189                 send_ldap_result( conn, op, LDAP_UNWILLING_TO_PERFORM,
190                                 NULL, "Operation not allowed", NULL, NULL );
191                 return -1;
192
193         case REWRITE_REGEXEC_ERR:
194                 send_ldap_result( conn, op, LDAP_OTHER,
195                                 NULL, "Rewrite error", NULL, NULL );
196                 return -1;
197         }
198
199         ldap_rename2_s( lc->conns[ candidate ].ld, mdn, newrdn->bv_val,
200                         mnewSuperior, deleteoldrdn );
201
202         if ( mdn != dn->bv_val ) {
203                 free( mdn );
204         }
205         if ( mnewSuperior != NULL && mnewSuperior != newSuperior->bv_val ) {
206                 free( mnewSuperior );
207         }
208         
209         return meta_back_op_result( lc, op );
210 }
211