Added regedit unit test, a couple minor changes to regedit.
[wine] / dlls / shell32 / shellstring.c
1 /*
2  * Copyright 2000 Juergen Schmied
3  *
4  * This library is free software; you can redistribute it and/or
5  * modify it under the terms of the GNU Lesser General Public
6  * License as published by the Free Software Foundation; either
7  * version 2.1 of the License, or (at your option) any later version.
8  *
9  * This library is distributed in the hope that it will be useful,
10  * but WITHOUT ANY WARRANTY; without even the implied warranty of
11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
12  * Lesser General Public License for more details.
13  *
14  * You should have received a copy of the GNU Lesser General Public
15  * License along with this library; if not, write to the Free Software
16  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
17  */
18
19 #include <string.h>
20 #include <stdio.h>
21 #include <ctype.h>
22 #include <stdlib.h>
23
24 #include "winnls.h"
25 #include "winerror.h"
26 #include "winreg.h"
27
28 #include "shlobj.h"
29 #include "shellapi.h"
30 #include "shell32_main.h"
31 #include "undocshell.h"
32 #include "wine/unicode.h"
33 #include "wine/debug.h"
34
35 WINE_DEFAULT_DEBUG_CHANNEL(shell);
36
37 /************************* STRRET functions ****************************/
38
39 /*
40  * ***** NOTE *****
41  *  These routines are identical to StrRetToBuf[AW] in dlls/shlwapi/string.c.
42  *  They were duplicated here because not every version of Shlwapi.dll exports
43  *  StrRetToBuf[AW]. If you change one routine, change them both. YOU HAVE BEEN
44  *  WARNED.
45  * ***** NOTE *****
46  */
47
48 HRESULT WINAPI StrRetToStrNA (LPVOID dest, DWORD len, LPSTRRET src, const ITEMIDLIST *pidl)
49 {
50         TRACE("dest=0x%p len=0x%lx strret=0x%p pidl=%p stub\n",dest,len,src,pidl);
51
52         switch (src->uType)
53         {
54           case STRRET_WSTR:
55             WideCharToMultiByte(CP_ACP, 0, src->u.pOleStr, -1, (LPSTR)dest, len, NULL, NULL);
56 /*          SHFree(src->u.pOleStr);  FIXME: is this right? */
57             break;
58
59           case STRRET_CSTRA:
60             lstrcpynA((LPSTR)dest, src->u.cStr, len);
61             break;
62
63           case STRRET_OFFSETA:
64             lstrcpynA((LPSTR)dest, ((LPCSTR)&pidl->mkid)+src->u.uOffset, len);
65             break;
66
67           default:
68             FIXME("unknown type!\n");
69             if (len)
70             {
71               *(LPSTR)dest = '\0';
72             }
73             return(FALSE);
74         }
75         return S_OK;
76 }
77
78 /************************************************************************/
79
80 HRESULT WINAPI StrRetToStrNW (LPVOID dest1, DWORD len, LPSTRRET src, const ITEMIDLIST *pidl)
81 {
82     LPWSTR dest = (LPWSTR) dest1;
83         TRACE("dest=0x%p len=0x%lx strret=0x%p pidl=%p stub\n",dest,len,src,pidl);
84
85         switch (src->uType)
86         {
87           case STRRET_WSTR:
88             lstrcpynW((LPWSTR)dest, src->u.pOleStr, len);
89 /*          SHFree(src->u.pOleStr);  FIXME: is this right? */
90             break;
91
92           case STRRET_CSTRA:
93               if (!MultiByteToWideChar( CP_ACP, 0, src->u.cStr, -1, dest, len ) && len)
94                   dest[len-1] = 0;
95             break;
96
97           case STRRET_OFFSETA:
98             if (pidl)
99             {
100               if (!MultiByteToWideChar( CP_ACP, 0, ((LPCSTR)&pidl->mkid)+src->u.uOffset, -1,
101                                         dest, len ) && len)
102                   dest[len-1] = 0;
103             }
104             break;
105
106           default:
107             FIXME("unknown type!\n");
108             if (len)
109             { *(LPSTR)dest = '\0';
110             }
111             return(FALSE);
112         }
113         return S_OK;
114 }
115
116
117 /*************************************************************************
118  * StrRetToStrN                         [SHELL32.96]
119  *
120  * converts a STRRET to a normal string
121  *
122  * NOTES
123  *  the pidl is for STRRET OFFSET
124  */
125 HRESULT WINAPI StrRetToStrNAW (LPVOID dest, DWORD len, LPSTRRET src, const ITEMIDLIST *pidl)
126 {
127         if(SHELL_OsIsUnicode())
128           return StrRetToStrNW (dest, len, src, pidl);
129         return StrRetToStrNA (dest, len, src, pidl);
130 }
131
132 /************************* OLESTR functions ****************************/
133
134 /************************************************************************
135  *      StrToOleStr                     [SHELL32.163]
136  *
137  */
138 int WINAPI StrToOleStrA (LPWSTR lpWideCharStr, LPCSTR lpMultiByteString)
139 {
140         TRACE("(%p, %p %s)\n",
141         lpWideCharStr, lpMultiByteString, debugstr_a(lpMultiByteString));
142
143         return MultiByteToWideChar(0, 0, lpMultiByteString, -1, lpWideCharStr, MAX_PATH);
144
145 }
146 int WINAPI StrToOleStrW (LPWSTR lpWideCharStr, LPCWSTR lpWString)
147 {
148         TRACE("(%p, %p %s)\n",
149         lpWideCharStr, lpWString, debugstr_w(lpWString));
150
151         strcpyW (lpWideCharStr, lpWString );
152         return strlenW(lpWideCharStr);
153 }
154
155 BOOL WINAPI StrToOleStrAW (LPWSTR lpWideCharStr, LPCVOID lpString)
156 {
157         if (SHELL_OsIsUnicode())
158           return StrToOleStrW (lpWideCharStr, lpString);
159         return StrToOleStrA (lpWideCharStr, lpString);
160 }
161
162 /*************************************************************************
163  * StrToOleStrN                                 [SHELL32.79]
164  *  lpMulti, nMulti, nWide [IN]
165  *  lpWide [OUT]
166  */
167 BOOL WINAPI StrToOleStrNA (LPWSTR lpWide, INT nWide, LPCSTR lpStrA, INT nStr)
168 {
169         TRACE("(%p, %x, %s, %x)\n", lpWide, nWide, debugstr_an(lpStrA,nStr), nStr);
170         return MultiByteToWideChar (0, 0, lpStrA, nStr, lpWide, nWide);
171 }
172 BOOL WINAPI StrToOleStrNW (LPWSTR lpWide, INT nWide, LPCWSTR lpStrW, INT nStr)
173 {
174         TRACE("(%p, %x, %s, %x)\n", lpWide, nWide, debugstr_wn(lpStrW, nStr), nStr);
175
176         if (lstrcpynW (lpWide, lpStrW, nWide))
177         { return lstrlenW (lpWide);
178         }
179         return 0;
180 }
181
182 BOOL WINAPI StrToOleStrNAW (LPWSTR lpWide, INT nWide, LPCVOID lpStr, INT nStr)
183 {
184         if (SHELL_OsIsUnicode())
185           return StrToOleStrNW (lpWide, nWide, lpStr, nStr);
186         return StrToOleStrNA (lpWide, nWide, lpStr, nStr);
187 }
188
189 /*************************************************************************
190  * OleStrToStrN                                 [SHELL32.78]
191  */
192 BOOL WINAPI OleStrToStrNA (LPSTR lpStr, INT nStr, LPCWSTR lpOle, INT nOle)
193 {
194         TRACE("(%p, %x, %s, %x)\n", lpStr, nStr, debugstr_wn(lpOle,nOle), nOle);
195         return WideCharToMultiByte (0, 0, lpOle, nOle, lpStr, nStr, NULL, NULL);
196 }
197
198 BOOL WINAPI OleStrToStrNW (LPWSTR lpwStr, INT nwStr, LPCWSTR lpOle, INT nOle)
199 {
200         TRACE("(%p, %x, %s, %x)\n", lpwStr, nwStr, debugstr_wn(lpOle,nOle), nOle);
201
202         if (lstrcpynW ( lpwStr, lpOle, nwStr))
203         { return lstrlenW (lpwStr);
204         }
205         return 0;
206 }
207
208 BOOL WINAPI OleStrToStrNAW (LPVOID lpOut, INT nOut, LPCVOID lpIn, INT nIn)
209 {
210         if (SHELL_OsIsUnicode())
211           return OleStrToStrNW (lpOut, nOut, lpIn, nIn);
212         return OleStrToStrNA (lpOut, nOut, lpIn, nIn);
213 }
214
215
216 /*************************************************************************
217  * CheckEscapes [SHELL32]
218  */
219 DWORD WINAPI CheckEscapesA(
220     LPSTR    string,         /* [in]    string to check ??*/
221            DWORD    b,              /* [???]   is 0 */
222            DWORD    c,              /* [???]   is 0 */
223            LPDWORD  d,              /* [???]   is address */
224            LPDWORD  e,              /* [???]   is address */
225            DWORD    handle )        /* [in]    looks like handle but not */
226 {
227     FIXME("(%p<%s> %ld %ld %p<%ld> %p<%ld> 0x%08lx) stub\n",
228    string, debugstr_a(string),
229    b,
230    c,
231    d, (d) ? *d : 0xabbacddc,
232    e, (e) ? *e : 0xabbacddd,
233    handle);
234     return 0;
235 }
236
237 DWORD WINAPI CheckEscapesW(
238     LPWSTR   string,         /* [in]    string to check ??*/
239            DWORD    b,              /* [???]   is 0 */
240            DWORD    c,              /* [???]   is 0 */
241            LPDWORD  d,              /* [???]   is address */
242            LPDWORD  e,              /* [???]   is address */
243            DWORD    handle )        /* [in]    looks like handle but not */
244 {
245     FIXME("(%p<%s> %ld %ld %p<%ld> %p<%ld> 0x%08lx) stub\n",
246    string, debugstr_w(string),
247    b,
248    c,
249    d, (d) ? *d : 0xabbacddc,
250    e, (e) ? *e : 0xabbacddd,
251    handle);
252     return 0;
253 }