oleaut32: Use implementation pointer to avoid casts.
[wine] / dlls / olecli.dll16 / olecli.c
1 /*
2  *      OLECLI library
3  *
4  *      Copyright 1995  Martin von Loewis
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 /*      At the moment, these are only empty stubs.
22  */
23
24 #include "config.h"
25
26 #include <stdarg.h>
27
28 #include "windef.h"
29 #include "wine/windef16.h"
30 #include "wine/winbase16.h"
31 #include "winbase.h"
32 #include "wingdi.h"
33 #include "wownt32.h"
34 #include "objbase.h"
35 #include "olecli.h"
36 #include "wine/debug.h"
37
38 WINE_DEFAULT_DEBUG_CHANNEL(ole);
39
40 typedef struct _OLEOBJECTVTBL16 {
41     void CALLBACK *(*QueryProtocol)(_LPOLEOBJECT,LPCOLESTR16);
42     OLESTATUS      (CALLBACK *Release)(_LPOLEOBJECT);
43     OLESTATUS      (CALLBACK *Show)(_LPOLEOBJECT,BOOL16);
44     OLESTATUS      (CALLBACK *DoVerb)(_LPOLEOBJECT,UINT16,BOOL16,BOOL16);
45     OLESTATUS      (CALLBACK *GetData)(_LPOLEOBJECT,OLECLIPFORMAT,HANDLE16 *);
46     OLESTATUS      (CALLBACK *SetData)(_LPOLEOBJECT,OLECLIPFORMAT,HANDLE16);
47     OLESTATUS      (CALLBACK *SetTargetDevice)(_LPOLEOBJECT,HGLOBAL16);
48     OLESTATUS      (CALLBACK *SetBounds)(_LPOLEOBJECT,LPRECT16);
49     OLESTATUS      (CALLBACK *EnumFormats)(_LPOLEOBJECT,OLECLIPFORMAT);
50     OLESTATUS      (CALLBACK *SetColorScheme)(_LPOLEOBJECT,struct tagLOGPALETTE*);
51     OLESTATUS      (CALLBACK *Delete)(_LPOLEOBJECT);
52     OLESTATUS      (CALLBACK *SetHostNames)(_LPOLEOBJECT,LPCOLESTR16,LPCOLESTR16);
53     OLESTATUS      (CALLBACK *SaveToStream)(_LPOLEOBJECT,struct _OLESTREAM*);
54     OLESTATUS      (CALLBACK *Clone)(_LPOLEOBJECT,LPOLECLIENT,LHCLIENTDOC,LPCOLESTR16,_LPOLEOBJECT *);
55     OLESTATUS      (CALLBACK *CopyFromLink)(_LPOLEOBJECT,LPOLECLIENT,LHCLIENTDOC,LPCOLESTR16,_LPOLEOBJECT *);
56     OLESTATUS      (CALLBACK *Equal)(_LPOLEOBJECT,_LPOLEOBJECT);
57     OLESTATUS      (CALLBACK *CopyToClipBoard)(_LPOLEOBJECT);
58     OLESTATUS      (CALLBACK *Draw)(_LPOLEOBJECT,HDC16,LPRECT16,LPRECT16,HDC16);
59     OLESTATUS      (CALLBACK *Activate)(_LPOLEOBJECT,UINT16,BOOL16,BOOL16,HWND16,LPRECT16);
60     OLESTATUS      (CALLBACK *Execute)(_LPOLEOBJECT,HGLOBAL16,UINT16);
61     OLESTATUS      (CALLBACK *Close)(_LPOLEOBJECT);
62     OLESTATUS      (CALLBACK *Update)(_LPOLEOBJECT);
63     OLESTATUS      (CALLBACK *Reconnect)(_LPOLEOBJECT);
64     OLESTATUS      (CALLBACK *ObjectConvert)(_LPOLEOBJECT,LPCOLESTR16,LPOLECLIENT,LHCLIENTDOC,LPCOLESTR16,_LPOLEOBJECT*);
65     OLESTATUS      (CALLBACK *GetLinkUpdateOptions)(_LPOLEOBJECT,LPOLEOPT_UPDATE);
66     OLESTATUS      (CALLBACK *SetLinkUpdateOptions)(_LPOLEOBJECT,OLEOPT_UPDATE);
67     OLESTATUS      (CALLBACK *Rename)(_LPOLEOBJECT,LPCOLESTR16);
68     OLESTATUS      (CALLBACK *QueryName)(_LPOLEOBJECT,LPSTR,LPUINT16);
69     OLESTATUS      (CALLBACK *QueryType)(_LPOLEOBJECT,LPLONG);
70     OLESTATUS      (CALLBACK *QueryBounds)(_LPOLEOBJECT,LPRECT16);
71     OLESTATUS      (CALLBACK *QuerySize)(_LPOLEOBJECT,LPDWORD);
72     OLESTATUS      (CALLBACK *QueryOpen)(_LPOLEOBJECT);
73     OLESTATUS      (CALLBACK *QueryOutOfDate)(_LPOLEOBJECT);
74     OLESTATUS      (CALLBACK *QueryReleaseStatus)(_LPOLEOBJECT);
75     OLESTATUS      (CALLBACK *QueryReleaseError)(_LPOLEOBJECT);
76     OLE_RELEASE_METHOD (CALLBACK *QueryReleaseMethod)(_LPOLEOBJECT);
77     OLESTATUS      (CALLBACK *RequestData)(_LPOLEOBJECT,OLECLIPFORMAT);
78     OLESTATUS      (CALLBACK *ObjectLong)(_LPOLEOBJECT,UINT16,LPLONG);
79 } OLEOBJECTVTBL;
80 typedef OLEOBJECTVTBL *LPOLEOBJECTVTBL;
81
82 typedef struct _OLEOBJECT
83 {
84     const OLEOBJECTVTBL *lpvtbl;
85 } OLEOBJECT16;
86
87 static LONG OLE_current_handle;
88
89 /******************************************************************************
90  *              OleSavedClientDoc       [OLECLI.45]
91  */
92 OLESTATUS WINAPI OleSavedClientDoc16(LHCLIENTDOC hDoc)
93 {
94     FIXME("(%d: stub\n", hDoc);
95     return OLE_OK;
96 }
97
98 /******************************************************************************
99  *              OleRegisterClientDoc    [OLECLI.41]
100  */
101 OLESTATUS WINAPI OleRegisterClientDoc16(LPCSTR classname, LPCSTR docname,
102                                         LONG reserved, LHCLIENTDOC *hRet )
103 {
104     FIXME("(%s,%s,...): stub\n",classname,docname);
105     *hRet=++OLE_current_handle;
106     return OLE_OK;
107 }
108
109 /******************************************************************************
110  *              OleRenameClientDoc      [OLECLI.43]
111  */
112 OLESTATUS WINAPI OleRenameClientDoc16(LHCLIENTDOC hDoc, LPCSTR newName)
113 {
114     FIXME("(%d,%s,...): stub\n",hDoc, newName);
115     return OLE_OK;
116 }
117
118 /******************************************************************************
119  *              OleRevokeClientDoc      [OLECLI.42]
120  */
121 OLESTATUS WINAPI OleRevokeClientDoc16(LHCLIENTDOC hServerDoc)
122 {
123     FIXME("(%d): stub\n",hServerDoc);
124     return OLE_OK;
125 }
126
127 /******************************************************************************
128  *              OleRevertClientDoc      [OLECLI.44]
129  */
130 OLESTATUS WINAPI OleRevertClientDoc16(LHCLIENTDOC hServerDoc)
131 {
132     FIXME("(%d): stub\n", hServerDoc);
133     return OLE_OK;
134 }
135
136 /******************************************************************************
137  *              OleEnumObjects  [OLECLI.47]
138  */
139 OLESTATUS WINAPI OleEnumObjects16(LHCLIENTDOC hServerDoc, SEGPTR data)
140 {
141     FIXME("(%d, %04x:%04x): stub\n", hServerDoc, HIWORD(data),
142         LOWORD(data));
143     return OLE_OK;
144 }
145
146 /******************************************************************************
147  *           OleCreateLinkFromClip      [OLECLI.11]
148  */
149 OLESTATUS WINAPI OleCreateLinkFromClip16( LPCSTR name, SEGPTR olecli, LHCLIENTDOC hclientdoc,
150                                           LPCSTR xname, SEGPTR lpoleob, UINT16 render,
151                                           UINT16 clipformat )
152 {
153         FIXME("(%s, %04x:%04x, %d, %s, %04x:%04x, %d, %d): stub!\n",
154               name, HIWORD(olecli), LOWORD(olecli), hclientdoc, xname, HIWORD(lpoleob),
155               LOWORD(lpoleob), render, clipformat);
156         return OLE_OK;
157 }
158
159 /******************************************************************************
160  *           OleQueryLinkFromClip       [OLECLI.9]
161  */
162 OLESTATUS WINAPI OleQueryLinkFromClip16(LPCSTR name, UINT16 render, UINT16 clipformat)
163 {
164         FIXME("(%s, %d, %d): stub!\n", name, render, clipformat);
165         return OLE_OK;
166 }
167
168 /******************************************************************************
169  *           OleQueryCreateFromClip     [OLECLI.10]
170  */
171 OLESTATUS WINAPI OleQueryCreateFromClip16(LPCSTR name, UINT16 render, UINT16 clipformat)
172 {
173         FIXME("(%s, %d, %d): stub!\n", name, render, clipformat);
174         return OLE_OK;
175 }
176
177 /******************************************************************************
178  *              OleIsDcMeta     [OLECLI.60]
179  */
180 BOOL16 WINAPI OleIsDcMeta16(HDC16 hdc)
181 {
182     return GetObjectType( HDC_32(hdc) ) == OBJ_METADC;
183 }
184
185 /******************************************************************************
186  *              OleQueryType    [OLECLI.14]
187  */
188 OLESTATUS WINAPI OleQueryType16(_LPOLEOBJECT oleob,  SEGPTR xlong) {
189         FIXME("(%p, %p): stub!\n", oleob, MapSL(xlong));
190         return OLE_OK;
191 }
192
193 /******************************************************************************
194  *              OleCreateFromClip       [OLECLI.12]
195  */
196 OLESTATUS WINAPI OleCreateFromClip16( LPCSTR name, SEGPTR olecli, LHCLIENTDOC hclientdoc,
197                                       LPCSTR xname, SEGPTR lpoleob,
198                                       UINT16 render, UINT16 clipformat )
199 {
200         FIXME("(%s, %04x:%04x, %d, %s, %04x:%04x, %d, %d): stub!\n",
201               name, HIWORD(olecli), LOWORD(olecli), hclientdoc, xname, HIWORD(lpoleob),
202               LOWORD(lpoleob), render, clipformat);
203         return OLE_OK;
204 }