msvcrt: Added basic _popen tests.
[wine] / dlls / wldap32 / rename.c
1 /*
2  * WLDAP32 - LDAP support for Wine
3  *
4  * Copyright 2005 Hans Leidekker
5  *
6  * This library is free software; you can redistribute it and/or
7  * modify it under the terms of the GNU Lesser General Public
8  * License as published by the Free Software Foundation; either
9  * version 2.1 of the License, or (at your option) any later version.
10  *
11  * This library is distributed in the hope that it will be useful,
12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
14  * Lesser General Public License for more details.
15  *
16  * You should have received a copy of the GNU Lesser General Public
17  * License along with this library; if not, write to the Free Software
18  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
19  */
20
21 #include "config.h"
22 #include "wine/port.h"
23
24 #include <stdarg.h>
25 #ifdef HAVE_LDAP_H
26 #include <ldap.h>
27 #endif
28
29 #include "windef.h"
30 #include "winbase.h"
31 #include "winnls.h"
32
33 #include "winldap_private.h"
34 #include "wldap32.h"
35 #include "wine/debug.h"
36
37 WINE_DEFAULT_DEBUG_CHANNEL(wldap32);
38
39 /***********************************************************************
40  *      ldap_rename_extA     (WLDAP32.@)
41  *
42  *  See ldap_rename_extW.
43  */
44 ULONG CDECL ldap_rename_extA( WLDAP32_LDAP *ld, PCHAR dn, PCHAR newrdn,
45     PCHAR newparent, INT delete, PLDAPControlA *serverctrls,
46     PLDAPControlA *clientctrls, ULONG *message )
47 {
48     ULONG ret = WLDAP32_LDAP_NOT_SUPPORTED;
49 #ifdef HAVE_LDAP
50     WCHAR *dnW = NULL, *newrdnW = NULL, *newparentW = NULL;
51     LDAPControlW **serverctrlsW = NULL, **clientctrlsW = NULL;
52
53     ret = WLDAP32_LDAP_NO_MEMORY;
54
55     TRACE( "(%p, %s, %s, %s, 0x%02x, %p, %p, %p)\n", ld, debugstr_a(dn),
56            debugstr_a(newrdn), debugstr_a(newparent), delete,
57            serverctrls, clientctrls, message );
58
59     if (!ld || !message) return WLDAP32_LDAP_PARAM_ERROR;
60
61     if (dn) {
62         dnW = strAtoW( dn );
63         if (!dnW) goto exit;
64     }
65     if (newrdn) {
66         newrdnW = strAtoW( newrdn );
67         if (!newrdnW) goto exit;
68     }
69     if (newparent) {
70         newparentW = strAtoW( newparent );
71         if (!newparentW) goto exit;
72     }
73     if (serverctrls) {
74         serverctrlsW = controlarrayAtoW( serverctrls );
75         if (!serverctrlsW) goto exit;
76     }
77     if (clientctrls) {
78         clientctrlsW = controlarrayAtoW( clientctrls );
79         if (!clientctrlsW) goto exit;
80     }
81
82     ret = ldap_rename_extW( ld, dnW, newrdnW, newparentW, delete,
83                             serverctrlsW, clientctrlsW, message );
84
85 exit:
86     strfreeW( dnW );
87     strfreeW( newrdnW );
88     strfreeW( newparentW );
89     controlarrayfreeW( serverctrlsW );
90     controlarrayfreeW( clientctrlsW );
91
92 #endif
93     return ret;
94 }
95
96 /***********************************************************************
97  *      ldap_rename_extW     (WLDAP32.@)
98  *
99  * Change the DN of a directory entry (asynchronous operation).
100  *
101  * PARAMS
102  *  ld          [I] Pointer to an LDAP context.
103  *  dn          [I] DN of the entry to change.
104  *  newrdn      [I] New RDN for the entry.
105  *  newparent   [I] New parent for the entry.
106  *  delete      [I] Delete old RDN?
107  *  serverctrls [I] Array of LDAP server controls.
108  *  clientctrls [I] Array of LDAP client controls.
109  *  message     [O] Message ID of the operation.
110  *
111  * RETURNS
112  *  Success: LDAP_SUCCESS
113  *  Failure: An LDAP error code.
114  *
115  * NOTES
116  *  Call ldap_result with the message ID to get the result of
117  *  the operation. Cancel the operation by calling ldap_abandon
118  *  with the message ID.
119  */
120 ULONG CDECL ldap_rename_extW( WLDAP32_LDAP *ld, PWCHAR dn, PWCHAR newrdn,
121     PWCHAR newparent, INT delete, PLDAPControlW *serverctrls,
122     PLDAPControlW *clientctrls, ULONG *message )
123 {
124     ULONG ret = WLDAP32_LDAP_NOT_SUPPORTED;
125 #ifdef HAVE_LDAP
126     char *dnU = NULL, *newrdnU = NULL, *newparentU = NULL;
127     LDAPControl **serverctrlsU = NULL, **clientctrlsU = NULL;
128
129     ret = WLDAP32_LDAP_NO_MEMORY;
130
131     TRACE( "(%p, %s, %s, %s, 0x%02x, %p, %p, %p)\n", ld, debugstr_w(dn),
132            debugstr_w(newrdn), debugstr_w(newparent), delete,
133            serverctrls, clientctrls, message );
134
135     if (!ld || !message) return WLDAP32_LDAP_PARAM_ERROR;
136
137     if (dn) {
138         dnU = strWtoU( dn );
139         if (!dnU) goto exit;
140     }
141     if (newrdn) {
142         newrdnU = strWtoU( newrdn );
143         if (!newrdnU) goto exit;
144     }
145     if (newparent) {
146         newparentU = strWtoU( newparent );
147         if (!newparentU) goto exit;
148     }
149     if (serverctrls) {
150         serverctrlsU = controlarrayWtoU( serverctrls );
151         if (!serverctrlsU) goto exit;
152     }
153     if (clientctrls) {
154         clientctrlsU = controlarrayWtoU( clientctrls );
155         if (!clientctrlsU) goto exit;
156     }
157
158     ret = map_error( ldap_rename( ld, dn ? dnU : "", newrdn ? newrdnU : "", newparentU,
159                                   delete, serverctrlsU, clientctrlsU, (int *)message ));
160
161 exit:
162     strfreeU( dnU );
163     strfreeU( newrdnU );
164     strfreeU( newparentU );
165     controlarrayfreeU( serverctrlsU );
166     controlarrayfreeU( clientctrlsU );
167
168 #endif
169     return ret;
170 }
171
172 /***********************************************************************
173  *      ldap_rename_ext_sA     (WLDAP32.@)
174  *
175  *  See ldap_rename_ext_sW.
176  */
177 ULONG CDECL ldap_rename_ext_sA( WLDAP32_LDAP *ld, PCHAR dn, PCHAR newrdn,
178     PCHAR newparent, INT delete, PLDAPControlA *serverctrls,
179     PLDAPControlA *clientctrls )
180 {
181     ULONG ret = WLDAP32_LDAP_NOT_SUPPORTED;
182 #ifdef HAVE_LDAP
183     WCHAR *dnW = NULL, *newrdnW = NULL, *newparentW = NULL;
184     LDAPControlW **serverctrlsW = NULL, **clientctrlsW = NULL;
185
186     ret = WLDAP32_LDAP_NO_MEMORY;
187
188     TRACE( "(%p, %s, %s, %s, 0x%02x, %p, %p)\n", ld, debugstr_a(dn),
189            debugstr_a(newrdn), debugstr_a(newparent), delete,
190            serverctrls, clientctrls );
191
192     if (!ld) return WLDAP32_LDAP_PARAM_ERROR;
193
194     if (dn) {
195         dnW = strAtoW( dn );
196         if (!dnW) goto exit;
197     }
198     if (newrdn) {
199         newrdnW = strAtoW( newrdn );
200         if (!newrdnW) goto exit;
201     }
202     if (newparent) {
203         newparentW = strAtoW( newparent );
204         if (!newparentW) goto exit;
205     }
206     if (serverctrls) {
207         serverctrlsW = controlarrayAtoW( serverctrls );
208         if (!serverctrlsW) goto exit;
209     }
210     if (clientctrls) {
211         clientctrlsW = controlarrayAtoW( clientctrls );
212         if (!clientctrlsW) goto exit;
213     }
214
215     ret = ldap_rename_ext_sW( ld, dnW, newrdnW, newparentW, delete,
216                               serverctrlsW, clientctrlsW );
217
218 exit:
219     strfreeW( dnW );
220     strfreeW( newrdnW );
221     strfreeW( newparentW );
222     controlarrayfreeW( serverctrlsW );
223     controlarrayfreeW( clientctrlsW );
224
225 #endif
226     return ret;
227 }
228 /***********************************************************************
229  *      ldap_rename_ext_sW     (WLDAP32.@)
230  *
231  * Change the DN of a directory entry (synchronous operation).
232  *
233  * PARAMS
234  *  ld          [I] Pointer to an LDAP context.
235  *  dn          [I] DN of the entry to change.
236  *  newrdn      [I] New RDN for the entry.
237  *  newparent   [I] New parent for the entry.
238  *  delete      [I] Delete old RDN?
239  *  serverctrls [I] Array of LDAP server controls.
240  *  clientctrls [I] Array of LDAP client controls.
241  *
242  * RETURNS
243  *  Success: LDAP_SUCCESS
244  *  Failure: An LDAP error code.
245  */ 
246 ULONG CDECL ldap_rename_ext_sW( WLDAP32_LDAP *ld, PWCHAR dn, PWCHAR newrdn,
247     PWCHAR newparent, INT delete, PLDAPControlW *serverctrls,
248     PLDAPControlW *clientctrls )
249 {
250     ULONG ret = WLDAP32_LDAP_NOT_SUPPORTED;
251 #ifdef HAVE_LDAP
252     char *dnU = NULL, *newrdnU = NULL, *newparentU = NULL;
253     LDAPControl **serverctrlsU = NULL, **clientctrlsU = NULL;
254
255     ret = WLDAP32_LDAP_NO_MEMORY;
256
257     TRACE( "(%p, %s, %s, %s, 0x%02x, %p, %p)\n", ld, debugstr_w(dn),
258            debugstr_w(newrdn), debugstr_w(newparent), delete,
259            serverctrls, clientctrls );
260
261     if (!ld) return WLDAP32_LDAP_PARAM_ERROR;
262
263     if (dn) {
264         dnU = strWtoU( dn );
265         if (!dnU) goto exit;
266     }
267     if (newrdn) {
268         newrdnU = strWtoU( newrdn );
269         if (!newrdnU) goto exit;
270     }
271     if (newparent) {
272         newparentU = strWtoU( newparent );
273         if (!newparentU) goto exit;
274     }
275     if (serverctrls) {
276         serverctrlsU = controlarrayWtoU( serverctrls );
277         if (!serverctrlsU) goto exit;
278     }
279     if (clientctrls) {
280         clientctrlsU = controlarrayWtoU( clientctrls );
281         if (!clientctrlsU) goto exit;
282     }
283
284     ret = map_error( ldap_rename_s( ld, dn ? dnU : "", newrdn ? newrdnU : "", newparentU,
285                                     delete, serverctrlsU, clientctrlsU ));
286
287 exit:
288     strfreeU( dnU );
289     strfreeU( newrdnU );
290     strfreeU( newparentU );
291     controlarrayfreeU( serverctrlsU );
292     controlarrayfreeU( clientctrlsU );
293
294 #endif
295     return ret;
296 }