]> git.sur5r.net Git - openldap/blob - servers/slapd/back-ldap/modrdn.c
b44b7c0c5529aa99193fcd8228c2dc911a515efb
[openldap] / servers / slapd / back-ldap / modrdn.c
1 /* modrdn.c - ldap backend modrdn 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/socket.h>
43 #include <ac/string.h>
44
45 #include "slap.h"
46 #include "back-ldap.h"
47
48 int
49 ldap_back_modrdn(
50     Operation   *op,
51     SlapReply   *rs )
52 {
53         struct ldapinfo *li = (struct ldapinfo *) op->o_bd->be_private;
54         struct ldapconn *lc;
55         int rc;
56         ber_int_t msgid;
57
58         struct berval mdn = { 0, NULL }, mnewSuperior = { 0, NULL };
59
60         lc = ldap_back_getconn( li, op, rs );
61         if ( !lc || !ldap_back_dobind(li, lc, op, rs) ) {
62                 return( -1 );
63         }
64
65         if (op->oq_modrdn.rs_newSup) {
66                 int version = LDAP_VERSION3;
67                 ldap_set_option( lc->ld, LDAP_OPT_PROTOCOL_VERSION, &version);
68                 
69                 /*
70                  * Rewrite the new superior, if defined and required
71                  */
72 #ifdef ENABLE_REWRITE
73                 switch ( rewrite_session( li->rwinfo, "newSuperiorDn",
74                                         op->oq_modrdn.rs_newSup->bv_val, op->o_conn, &mnewSuperior.bv_val ) ) {
75                 case REWRITE_REGEXEC_OK:
76                         if ( mnewSuperior.bv_val == NULL ) {
77                                 mnewSuperior.bv_val = ( char * )op->oq_modrdn.rs_newSup->bv_val;
78                         }
79 #ifdef NEW_LOGGING
80                         LDAP_LOG( BACK_LDAP, DETAIL1, 
81                                 "[rw] newSuperiorDn:" " \"%s\" -> \"%s\"\n",
82                                 op->oq_modrdn.rs_newSup->bv_val, mnewSuperior.bv_val, 0 );
83 #else /* !NEW_LOGGING */
84                         Debug( LDAP_DEBUG_ARGS, "rw> newSuperiorDn:"
85                                         " \"%s\" -> \"%s\"\n%s",
86                                         op->oq_modrdn.rs_newSup->bv_val, mnewSuperior.bv_val, "" );
87 #endif /* !NEW_LOGGING */
88                         break;
89
90                 case REWRITE_REGEXEC_UNWILLING:
91                         send_ldap_error( op, rs, LDAP_UNWILLING_TO_PERFORM,
92                                         "Operation not allowed" );
93                         return( -1 );
94
95                 case REWRITE_REGEXEC_ERR:
96                         send_ldap_error( op, rs, LDAP_OTHER,
97                                         "Rewrite error" );
98                         return( -1 );
99                 }
100 #else /* !ENABLE_REWRITE */
101                 ldap_back_dn_massage( li, op->oq_modrdn.rs_newSup, &mnewSuperior, 0, 1 );
102                 if ( mnewSuperior.bv_val == NULL ) {
103                         return( -1 );
104                 }
105 #endif /* !ENABLE_REWRITE */
106         }
107
108 #ifdef ENABLE_REWRITE
109         /*
110          * Rewrite the modrdn dn, if required
111          */
112         switch ( rewrite_session( li->rwinfo, "modrDn", op->o_req_dn.bv_val, op->o_conn, &mdn.bv_val ) ) {
113         case REWRITE_REGEXEC_OK:
114                 if ( mdn.bv_val == NULL ) {
115                         mdn.bv_val = ( char * )op->o_req_dn.bv_val;
116                 }
117 #ifdef NEW_LOGGING
118                 LDAP_LOG( BACK_LDAP, DETAIL1, 
119                         "[rw] modrDn: \"%s\" -> \"%s\"\n", op->o_req_dn.bv_val, mdn.bv_val, 0 );
120 #else /* !NEW_LOGGING */
121                 Debug( LDAP_DEBUG_ARGS, "rw> modrDn: \"%s\" -> \"%s\"\n%s",
122                                 op->o_req_dn.bv_val, mdn.bv_val, "" );
123 #endif /* !NEW_LOGGING */
124                 break;
125                 
126         case REWRITE_REGEXEC_UNWILLING:
127                 send_ldap_error( op, rs, LDAP_UNWILLING_TO_PERFORM,
128                                 "Operation not allowed" );
129                 return( -1 );
130
131         case REWRITE_REGEXEC_ERR:
132                 send_ldap_error( op, rs, LDAP_OTHER,
133                                 "Rewrite error" );
134                 return( -1 );
135         }
136 #else /* !ENABLE_REWRITE */
137         ldap_back_dn_massage( li, &op->o_req_dn, &mdn, 0, 1 );
138 #endif /* !ENABLE_REWRITE */
139
140         rc = ldap_rename( lc->ld, mdn.bv_val, op->oq_modrdn.rs_newrdn.bv_val, mnewSuperior.bv_val,
141                 op->oq_modrdn.rs_deleteoldrdn, op->o_ctrls, NULL, &msgid );
142
143         if ( mdn.bv_val != op->o_req_dn.bv_val ) {
144                 free( mdn.bv_val );
145         }
146         if ( mnewSuperior.bv_val != NULL
147                 && mnewSuperior.bv_val != op->oq_modrdn.rs_newSup->bv_val ) {
148                 free( mnewSuperior.bv_val );
149         }
150         
151         return( ldap_back_op_result( li, lc, op, rs, msgid, rc, 1 ) );
152 }