comctl32: Remove redundant NULL check before free (found by Smatch).
[wine] / dlls / ole32 / ole2_16.c
1
2 /*
3  *      OLE2 library - 16 bit only interfaces
4  *
5  *      Copyright 1995  Martin von Loewis
6  *      Copyright 1999  Francis Beaudet
7  *      Copyright 1999  Noel Borthwick
8  *
9  * This library is free software; you can redistribute it and/or
10  * modify it under the terms of the GNU Lesser General Public
11  * License as published by the Free Software Foundation; either
12  * version 2.1 of the License, or (at your option) any later version.
13  *
14  * This library is distributed in the hope that it will be useful,
15  * but WITHOUT ANY WARRANTY; without even the implied warranty of
16  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
17  * Lesser General Public License for more details.
18  *
19  * You should have received a copy of the GNU Lesser General Public
20  * License along with this library; if not, write to the Free Software
21  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
22  */
23
24 #include "config.h"
25
26 #include <assert.h>
27 #include <stdlib.h>
28 #include <stdarg.h>
29 #include <stdio.h>
30 #include <string.h>
31
32 #define NONAMELESSUNION
33 #define NONAMELESSSTRUCT
34 #include "windef.h"
35 #include "winbase.h"
36 #include "wingdi.h"
37 #include "winuser.h"
38 #include "ole2.h"
39 #include "winerror.h"
40
41 #include "wine/winbase16.h"
42 #include "wine/wingdi16.h"
43 #include "wine/winuser16.h"
44 #include "ifs.h"
45
46 #include "wine/debug.h"
47
48 WINE_DEFAULT_DEBUG_CHANNEL(ole);
49
50 #define HICON_16(h32)           (LOWORD(h32))
51 #define HICON_32(h16)           ((HICON)(ULONG_PTR)(h16))
52 #define HINSTANCE_32(h16)       ((HINSTANCE)(ULONG_PTR)(h16))
53
54 /***********************************************************************
55  *           RegisterDragDrop (OLE2.35)
56  */
57 HRESULT WINAPI RegisterDragDrop16(
58         HWND16 hwnd,
59         LPDROPTARGET pDropTarget
60 ) {
61         FIXME("(0x%04x,%p),stub!\n",hwnd,pDropTarget);
62         return S_OK;
63 }
64
65 /***********************************************************************
66  *           RevokeDragDrop (OLE2.36)
67  */
68 HRESULT WINAPI RevokeDragDrop16(
69         HWND16 hwnd
70 ) {
71         FIXME("(0x%04x),stub!\n",hwnd);
72         return S_OK;
73 }
74
75 /******************************************************************************
76  * OleMetaFilePictFromIconAndLabel (OLE2.56)
77  *
78  * Returns a global memory handle to a metafile which contains the icon and
79  * label given.
80  * I guess the result of that should look somehow like desktop icons.
81  * If no hIcon is given, we load the icon via lpszSourceFile and iIconIndex.
82  * This code might be wrong at some places.
83  */
84 HGLOBAL16 WINAPI OleMetaFilePictFromIconAndLabel16(
85         HICON16 hIcon,
86         LPCOLESTR16 lpszLabel,
87         LPCOLESTR16 lpszSourceFile,
88         UINT16 iIconIndex
89 ) {
90     METAFILEPICT16 *mf16;
91     HGLOBAL16 hmf16;
92     HMETAFILE hmf;
93     INT mfSize;
94     HDC hdc;
95
96     if (!hIcon) {
97         if (lpszSourceFile) {
98             HINSTANCE16 hInstance = LoadLibrary16(lpszSourceFile);
99
100             /* load the icon at index from lpszSourceFile */
101             hIcon = HICON_16(LoadIconA(HINSTANCE_32(hInstance), (LPCSTR)(DWORD)iIconIndex));
102             FreeLibrary16(hInstance);
103         } else
104             return 0;
105     }
106
107     FIXME("(%04x, '%s', '%s', %d): incorrect metrics, please try to correct them !\n", 
108           hIcon, lpszLabel, lpszSourceFile, iIconIndex);
109
110     hdc = CreateMetaFileW(NULL);
111     DrawIcon(hdc, 0, 0, HICON_32(hIcon)); /* FIXME */
112     TextOutA(hdc, 0, 0, lpszLabel, 1); /* FIXME */
113     hmf = CloseMetaFile(hdc);
114
115     hmf16 = GlobalAlloc16(0, sizeof(METAFILEPICT16));
116     mf16 = (METAFILEPICT16 *)GlobalLock16(hmf16);
117     mf16->mm = MM_ANISOTROPIC;
118     mf16->xExt = 20; /* FIXME: bogus */
119     mf16->yExt = 20; /* ditto */
120     mfSize = GetMetaFileBitsEx(hmf, 0, 0);
121     mf16->hMF = GlobalAlloc16(GMEM_MOVEABLE, mfSize);
122     if(mf16->hMF)
123     {
124         GetMetaFileBitsEx(hmf, mfSize, GlobalLock16(mf16->hMF));
125         GlobalUnlock16(mf16->hMF);
126     }
127     return hmf16;
128 }
129
130
131 /******************************************************************************
132  *        CreateItemMoniker     (OLE2.27)
133  */
134 HRESULT WINAPI CreateItemMoniker16(LPCOLESTR16 lpszDelim,LPCOLESTR16 lpszItem,LPMONIKER* ppmk)
135 {
136     FIXME("(%s,%p),stub!\n",lpszDelim,ppmk);
137     *ppmk = NULL;
138     return E_NOTIMPL;
139 }
140
141
142 /******************************************************************************
143  *        CreateFileMoniker (OLE2.28)
144  */
145 HRESULT WINAPI CreateFileMoniker16(LPCOLESTR16 lpszPathName,LPMONIKER* ppmk)
146 {
147     FIXME("(%s,%p),stub!\n",lpszPathName,ppmk);
148     return E_NOTIMPL;
149 }
150
151 /******************************************************************************
152  *        OleSetMenuDescriptor (OLE2.41)
153  *
154  * PARAMS
155  *  hOleMenu  FIXME: Should probably be an HOLEMENU16.
156  */
157 HRESULT WINAPI OleSetMenuDescriptor16(
158     HOLEMENU               hOleMenu,
159     HWND16                 hwndFrame,
160     HWND16                 hwndActiveObject,
161     LPOLEINPLACEFRAME        lpFrame,
162     LPOLEINPLACEACTIVEOBJECT lpActiveObject)
163 {
164     FIXME("(%p, %x, %x, %p, %p), stub!\n", hOleMenu, hwndFrame, hwndActiveObject, lpFrame, lpActiveObject);
165     return E_NOTIMPL;
166 }
167
168 /******************************************************************************
169  *              IsValidInterface        [COMPOBJ.23]
170  *
171  * Determines whether a pointer is a valid interface.
172  *
173  * PARAMS
174  *  punk [I] Interface to be tested.
175  *
176  * RETURNS
177  *  TRUE, if the passed pointer is a valid interface, or FALSE otherwise.
178  */
179 BOOL WINAPI IsValidInterface16(SEGPTR punk)
180 {
181         DWORD **ptr;
182
183         if (IsBadReadPtr16(punk,4))
184                 return FALSE;
185         ptr = MapSL(punk);
186         if (IsBadReadPtr16((SEGPTR)ptr[0],4))   /* check vtable ptr */
187                 return FALSE;
188         ptr = MapSL((SEGPTR)ptr[0]);            /* ptr to first method */
189         if (IsBadReadPtr16((SEGPTR)ptr[0],2))
190                 return FALSE;
191         return TRUE;
192 }
193
194 /******************************************************************************
195  *              OleLoad        [OLE2.12]
196  *
197  * PARAMS
198  *  pStg Segmented LPSTORAGE pointer.
199  *  pClientSite Segmented LPOLECLIENTSITE pointer.
200  */
201 HRESULT WINAPI OleLoad16(
202     SEGPTR              pStg,
203     REFIID              riid,
204     SEGPTR              pClientSite,
205     LPVOID*             ppvObj)
206 {
207   FIXME("(%x,%s,%x,%p), stub!\n", pStg, debugstr_guid(riid), pClientSite, ppvObj);
208   return E_NOTIMPL;
209 }
210
211 /******************************************************************************
212  *              OleDoAutoConvert        [OLE2.79]
213  */
214 HRESULT WINAPI OleDoAutoConvert16(LPSTORAGE pStg, LPCLSID pClsidNew)
215 {
216     FIXME("(%p,%p) : stub\n",pStg,pClsidNew);
217     return E_NOTIMPL;
218 }
219
220 /***********************************************************************
221  *           OleSetClipboard                            [OLE2.49]
222  */
223 HRESULT WINAPI OleSetClipboard16(IDataObject* pDataObj)
224 {
225   FIXME("(%p): stub\n", pDataObj);
226   return S_OK;
227 }
228
229 /***********************************************************************
230  *           OleGetClipboard                            [OLE2.50]
231  */
232 HRESULT WINAPI OleGetClipboard16(IDataObject** ppDataObj)
233 {
234   FIXME("(%p): stub\n", ppDataObj);
235   return E_NOTIMPL;
236 }
237
238 /***********************************************************************
239  *           OleFlushClipboard   [OLE2.76]
240  */
241
242 HRESULT WINAPI OleFlushClipboard16(void)
243 {
244   return OleFlushClipboard();
245 }