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