shell32/tests: Some more type consistency fixes for the ShellExecute() return value...
[wine] / dlls / shell32 / clipboard.c
1 /*
2  *      clipboard helper functions
3  *
4  *      Copyright 2000  Juergen Schmied <juergen.schmied@debitel.de>
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  * NOTES:
21  *
22  * For copy & paste functions within contextmenus does the shell use
23  * the OLE clipboard functions in combination with dataobjects.
24  * The OLE32.DLL gets loaded with LoadLibrary
25  *
26  * - a right mousebutton-copy sets the following formats:
27  *  classic:
28  *      Shell IDList Array
29  *      Preferred Drop Effect
30  *      Shell Object Offsets
31  *      HDROP
32  *      FileName
33  *  ole:
34  *      OlePrivateData (ClipboardDataObjectInterface)
35  *
36  */
37
38 #include <stdarg.h>
39 #include <string.h>
40
41 #include "windef.h"
42 #include "winbase.h"
43 #include "winreg.h"
44 #include "wingdi.h"
45 #include "pidl.h"
46 #include "undocshell.h"
47 #include "shell32_main.h"
48 #include "shlwapi.h"
49
50 #include "wine/unicode.h"
51 #include "wine/debug.h"
52
53 WINE_DEFAULT_DEBUG_CHANNEL(shell);
54
55 /**************************************************************************
56  * RenderHDROP
57  *
58  * creates a CF_HDROP structure
59  */
60 HGLOBAL RenderHDROP(LPITEMIDLIST pidlRoot, LPITEMIDLIST * apidl, UINT cidl)
61 {
62         UINT i;
63         int rootlen = 0,size = 0;
64         WCHAR wszRootPath[MAX_PATH];
65         WCHAR wszFileName[MAX_PATH];
66         HGLOBAL hGlobal;
67         DROPFILES *pDropFiles;
68         int offset;
69
70         TRACE("(%p,%p,%u)\n", pidlRoot, apidl, cidl);
71
72         /* get the size needed */
73         size = sizeof(DROPFILES);
74
75         SHGetPathFromIDListW(pidlRoot, wszRootPath);
76         PathAddBackslashW(wszRootPath);
77         rootlen = strlenW(wszRootPath);
78
79         for (i=0; i<cidl;i++)
80         {
81           _ILSimpleGetTextW(apidl[i], wszFileName, MAX_PATH);
82           size += (rootlen + strlenW(wszFileName) + 1) * sizeof(WCHAR);
83         }
84
85         size += sizeof(WCHAR);
86
87         /* Fill the structure */
88         hGlobal = GlobalAlloc(GHND|GMEM_SHARE, size);
89         if(!hGlobal) return hGlobal;
90
91         pDropFiles = GlobalLock(hGlobal);
92         offset = (sizeof(DROPFILES) + sizeof(WCHAR) - 1) / sizeof(WCHAR);
93         pDropFiles->pFiles = offset * sizeof(WCHAR);
94         pDropFiles->fWide = TRUE;
95
96         strcpyW(wszFileName, wszRootPath);
97
98         for (i=0; i<cidl;i++)
99         {
100
101           _ILSimpleGetTextW(apidl[i], wszFileName + rootlen, MAX_PATH - rootlen);
102           strcpyW(((WCHAR*)pDropFiles)+offset, wszFileName);
103           offset += strlenW(wszFileName) + 1;
104         }
105
106         ((WCHAR*)pDropFiles)[offset] = 0;
107         GlobalUnlock(hGlobal);
108
109         return hGlobal;
110 }
111
112 HGLOBAL RenderSHELLIDLIST (LPITEMIDLIST pidlRoot, LPITEMIDLIST * apidl, UINT cidl)
113 {
114         UINT i;
115         int offset = 0, sizePidl, size;
116         HGLOBAL hGlobal;
117         LPIDA   pcida;
118
119         TRACE("(%p,%p,%u)\n", pidlRoot, apidl, cidl);
120
121         /* get the size needed */
122         size = sizeof(CIDA) + sizeof (UINT)*(cidl);     /* header */
123         size += ILGetSize (pidlRoot);                   /* root pidl */
124         for(i=0; i<cidl; i++)
125         {
126           size += ILGetSize(apidl[i]);                  /* child pidls */
127         }
128
129         /* fill the structure */
130         hGlobal = GlobalAlloc(GHND|GMEM_SHARE, size);
131         if(!hGlobal) return hGlobal;
132         pcida = GlobalLock (hGlobal);
133         pcida->cidl = cidl;
134
135         /* root pidl */
136         offset = sizeof(CIDA) + sizeof (UINT)*(cidl);
137         pcida->aoffset[0] = offset;                     /* first element */
138         sizePidl = ILGetSize (pidlRoot);
139         memcpy(((LPBYTE)pcida)+offset, pidlRoot, sizePidl);
140         offset += sizePidl;
141
142         for(i=0; i<cidl; i++)                           /* child pidls */
143         {
144           pcida->aoffset[i+1] = offset;
145           sizePidl = ILGetSize(apidl[i]);
146           memcpy(((LPBYTE)pcida)+offset, apidl[i], sizePidl);
147           offset += sizePidl;
148         }
149
150         GlobalUnlock(hGlobal);
151         return hGlobal;
152 }
153
154 HGLOBAL RenderFILENAMEA (LPITEMIDLIST pidlRoot, LPITEMIDLIST * apidl, UINT cidl)
155 {
156         int size = 0;
157         char szTemp[MAX_PATH], *szFileName;
158         LPITEMIDLIST pidl;
159         HGLOBAL hGlobal;
160         BOOL bSuccess;
161
162         TRACE("(%p,%p,%u)\n", pidlRoot, apidl, cidl);
163
164         /* get path of combined pidl */
165         pidl = ILCombine(pidlRoot, apidl[0]);
166         if (!pidl)
167                 return 0;
168
169         bSuccess = SHGetPathFromIDListA(pidl, szTemp);
170         SHFree(pidl);
171         if (!bSuccess)
172                 return 0;
173
174         size = strlen(szTemp) + 1;
175
176         /* fill the structure */
177         hGlobal = GlobalAlloc(GHND|GMEM_SHARE, size);
178         if(!hGlobal) return hGlobal;
179         szFileName = GlobalLock(hGlobal);
180         memcpy(szFileName, szTemp, size);
181         GlobalUnlock(hGlobal);
182
183         return hGlobal;
184 }
185
186 HGLOBAL RenderFILENAMEW (LPITEMIDLIST pidlRoot, LPITEMIDLIST * apidl, UINT cidl)
187 {
188         int size = 0;
189         WCHAR szTemp[MAX_PATH], *szFileName;
190         LPITEMIDLIST pidl;
191         HGLOBAL hGlobal;
192         BOOL bSuccess;
193
194         TRACE("(%p,%p,%u)\n", pidlRoot, apidl, cidl);
195
196         /* get path of combined pidl */
197         pidl = ILCombine(pidlRoot, apidl[0]);
198         if (!pidl)
199                 return 0;
200
201         bSuccess = SHGetPathFromIDListW(pidl, szTemp);
202         SHFree(pidl);
203         if (!bSuccess)
204                 return 0;
205
206         size = (strlenW(szTemp)+1) * sizeof(WCHAR);
207
208         /* fill the structure */
209         hGlobal = GlobalAlloc(GHND|GMEM_SHARE, size);
210         if(!hGlobal) return hGlobal;
211         szFileName = GlobalLock(hGlobal);
212         memcpy(szFileName, szTemp, size);
213         GlobalUnlock(hGlobal);
214
215         return hGlobal;
216 }