olesvr32: Renamed olesvr directory to olesvr32.
[wine] / dlls / olesvr32 / olesvr_main.c
1 /*
2  *      OLESVR 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., 59 Temple Place, Suite 330, Boston, MA  02111-1307  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 "winbase.h"
30 #include "wine/windef16.h"
31 #include "objbase.h"
32 #include "wine/debug.h"
33
34 WINE_DEFAULT_DEBUG_CHANNEL(ole);
35
36 typedef enum
37 {
38     OLE_OK,
39     OLE_WAIT_FOR_RELEASE,
40     OLE_BUSY,
41     OLE_ERROR_PROTECT_ONLY,
42     OLE_ERROR_MEMORY,
43     OLE_ERROR_STREAM,
44     OLE_ERROR_STATIC,
45     OLE_ERROR_BLANK,
46     OLE_ERROR_DRAW,
47     OLE_ERROR_METAFILE,
48     OLE_ERROR_ABORT,
49     OLE_ERROR_CLIPBOARD,
50     OLE_ERROR_FORMAT,
51     OLE_ERROR_OBJECT,
52     OLE_ERROR_OPTION,
53     OLE_ERROR_PROTOCOL,
54     OLE_ERROR_ADDRESS,
55     OLE_ERROR_NOT_EQUAL,
56     OLE_ERROR_HANDLE,
57     OLE_ERROR_GENERIC,
58     OLE_ERROR_CLASS,
59     OLE_ERROR_SYNTAX,
60     OLE_ERROR_DATATYPE,
61     OLE_ERROR_PALETTE,
62     OLE_ERROR_NOT_LINK,
63     OLE_ERROR_NOT_EMPTY,
64     OLE_ERROR_SIZE,
65     OLE_ERROR_DRIVE,
66     OLE_ERROR_NETWORK,
67     OLE_ERROR_NAME,
68     OLE_ERROR_TEMPLATE,
69     OLE_ERROR_NEW,
70     OLE_ERROR_EDIT,
71     OLE_ERROR_OPEN,
72     OLE_ERROR_NOT_OPEN,
73     OLE_ERROR_LAUNCH,
74     OLE_ERROR_COMM,
75     OLE_ERROR_TERMINATE,
76     OLE_ERROR_COMMAND,
77     OLE_ERROR_SHOW,
78     OLE_ERROR_DOVERB,
79     OLE_ERROR_ADVISE_NATIVE,
80     OLE_ERROR_ADVISE_PICT,
81     OLE_ERROR_ADVISE_RENAME,
82     OLE_ERROR_POKE_NATIVE,
83     OLE_ERROR_REQUEST_NATIVE,
84     OLE_ERROR_REQUEST_PICT,
85     OLE_ERROR_SERVER_BLOCKED,
86     OLE_ERROR_REGISTRATION,
87     OLE_ERROR_ALREADY_REGISTERED,
88     OLE_ERROR_TASK,
89     OLE_ERROR_OUTOFDATE,
90     OLE_ERROR_CANT_UPDATE_CLIENT,
91     OLE_ERROR_UPDATE,
92     OLE_ERROR_SETDATA_FORMAT,
93     OLE_ERROR_STATIC_FROM_OTHER_OS,
94     OLE_WARN_DELETE_DATA = 1000
95 } OLESTATUS;
96
97 typedef enum {
98     OLE_SERVER_MULTI,
99     OLE_SERVER_SINGLE
100 } OLE_SERVER_USE;
101
102 typedef LONG LHSERVER;
103 typedef LONG LHSERVERDOC;
104 typedef LPCSTR LPCOLESTR16;
105
106 typedef struct _OLESERVERDOC *LPOLESERVERDOC;
107
108 struct _OLESERVERDOCVTBL;
109 typedef struct _OLESERVERDOC
110 {
111     const struct _OLESERVERDOCVTBL *lpvtbl;
112     /* server provided state info */
113 } OLESERVERDOC;
114
115 typedef struct _OLESERVER *LPOLESERVER;
116 typedef struct _OLESERVERVTBL
117 {
118     OLESTATUS (CALLBACK *Open)(LPOLESERVER,LHSERVERDOC,LPCOLESTR16,LPOLESERVERDOC *);
119     OLESTATUS (CALLBACK *Create)(LPOLESERVER,LHSERVERDOC,LPCOLESTR16,LPCOLESTR16,LPOLESERVERDOC*);
120     OLESTATUS (CALLBACK *CreateFromTemplate)(LPOLESERVER,LHSERVERDOC,LPCOLESTR16,LPCOLESTR16,LPCOLESTR16,LPOLESERVERDOC *);
121     OLESTATUS (CALLBACK *Edit)(LPOLESERVER,LHSERVERDOC,LPCOLESTR16,LPCOLESTR16,LPOLESERVERDOC *);
122     OLESTATUS (CALLBACK *Exit)(LPOLESERVER);
123     OLESTATUS (CALLBACK *Release)(LPOLESERVER);
124     OLESTATUS (CALLBACK *Execute)(LPOLESERVER);
125 } OLESERVERVTBL, *LPOLESERVERVTBL;
126
127 typedef struct _OLESERVER
128 {
129     const OLESERVERVTBL *lpvtbl;
130     /* server specific data */
131 } OLESERVER;
132
133 static LONG OLE_current_handle;
134
135 /******************************************************************************
136  *              OleRegisterServer       [OLESVR.2]
137  */
138 OLESTATUS WINAPI OleRegisterServer16( LPCSTR name, LPOLESERVER serverStruct,
139                                       LHSERVER *hRet, HINSTANCE16 hServer,
140                                       OLE_SERVER_USE use )
141 {
142     FIXME("(%s,...): stub\n",name);
143     *hRet=++OLE_current_handle;
144     /* return OLE_ERROR_MEMORY, OLE_ERROR_PROTECT_ONLY if you want it fail*/
145     return OLE_OK;
146 }
147
148 /******************************************************************************
149  *              OleBlockServer  [OLESVR.4]
150  */
151 OLESTATUS WINAPI OleBlockServer16(LHSERVER hServer)
152 {
153     FIXME("(%ld): stub\n",hServer);
154     return OLE_OK;
155 }
156
157 /******************************************************************************
158  *              OleBlockServer  [OLESVR32.4]
159  */
160 OLESTATUS WINAPI OleBlockServer(LHSERVER hServer)
161 {
162     FIXME("(%ld): stub\n",hServer);
163     return OLE_OK;
164 }
165
166 /******************************************************************************
167  *              OleUnblockServer        [OLESVR.5]
168  */
169 OLESTATUS WINAPI OleUnblockServer16(LHSERVER hServer, BOOL16 *block)
170 {
171     FIXME("(%ld): stub\n",hServer);
172     /* no more blocked messages :) */
173     *block=FALSE;
174     return OLE_OK;
175 }
176
177 /******************************************************************************
178  *              OleUnblockServer        [OLESVR32.5]
179  */
180 OLESTATUS WINAPI OleUnblockServer(LHSERVER hServer, BOOL *block)
181 {
182     FIXME("(%ld): stub\n",hServer);
183     /* no more blocked messages :) */
184     *block=FALSE;
185     return OLE_OK;
186 }
187
188 /***********************************************************************
189  *              OleRegisterServerDoc    [OLESVR.6]
190  */
191 OLESTATUS WINAPI OleRegisterServerDoc16( LHSERVER hServer, LPCSTR docname,
192                                          LPOLESERVERDOC document,
193                                          LHSERVERDOC *hRet)
194 {
195     FIXME("(%ld,%s): stub\n",hServer, docname);
196     *hRet=++OLE_current_handle;
197     return OLE_OK;
198 }
199
200 /******************************************************************************
201  *              OleRevokeServerDoc      [OLESVR.7]
202  */
203 OLESTATUS WINAPI OleRevokeServerDoc16(LHSERVERDOC hServerDoc)
204 {
205     FIXME("%ld  - stub\n",hServerDoc);
206     return OLE_OK;
207 }
208
209 /******************************************************************************
210  *              OleRevokeServerDoc      [OLESVR32.7]
211  */
212 OLESTATUS WINAPI OleRevokeServerDoc(LHSERVERDOC hServerDoc)
213 {
214     FIXME("(%ld): stub\n",hServerDoc);
215     return OLE_OK;
216 }
217
218 /******************************************************************************
219  *              OleRevokeServer [OLESVR.3]
220  */
221 OLESTATUS WINAPI OleRevokeServer16(LHSERVER hServer)
222 {
223     FIXME("%ld - stub\n",hServer);
224     return OLE_OK;
225 }
226
227 /******************************************************************************
228  * OleRegisterServer [OLESVR32.2]
229  */
230 OLESTATUS WINAPI OleRegisterServer(LPCSTR svrname,LPOLESERVER olesvr,LHSERVER* hRet,HINSTANCE hinst,OLE_SERVER_USE osu) {
231         FIXME("(%s,%p,%p,%p,%d): stub!\n",svrname,olesvr,hRet,hinst,osu);
232         *hRet=++OLE_current_handle;
233         return OLE_OK;
234 }
235
236 /******************************************************************************
237  * OleRegisterServerDoc [OLESVR32.6]
238  */
239 OLESTATUS WINAPI OleRegisterServerDoc( LHSERVER hServer, LPCSTR docname,
240                                          LPOLESERVERDOC document,
241                                          LHSERVERDOC *hRet)
242 {
243     FIXME("(%ld,%s): stub\n", hServer, docname);
244     *hRet=++OLE_current_handle;
245     return OLE_OK;
246 }
247
248 /******************************************************************************
249  *              OleRenameServerDoc      [OLESVR.8]
250  *
251  */
252 OLESTATUS WINAPI OleRenameServerDoc16(LHSERVERDOC hDoc, LPCSTR newName)
253 {
254     FIXME("(%ld,%s): stub.\n", hDoc, newName);
255     return OLE_OK;
256 }
257
258 /******************************************************************************
259  *              OleRenameServerDoc      [OLESVR32.8]
260  *
261  */
262 OLESTATUS WINAPI OleRenameServerDoc(LHSERVERDOC hDoc, LPCSTR newName)
263 {
264     FIXME("(%ld,%s): stub.\n",hDoc, newName);
265     return OLE_OK;
266 }
267
268 /******************************************************************************
269  *              OleRevertServerDoc      [OLESVR.9]
270  *
271  */
272 OLESTATUS WINAPI OleRevertServerDoc16(LHSERVERDOC hDoc)
273 {
274     FIXME("(%ld): stub.\n", hDoc);
275     return OLE_OK;
276 }
277
278 /******************************************************************************
279  *              OleRevertServerDoc      [OLESVR32.9]
280  *
281  */
282 OLESTATUS WINAPI OleRevertServerDoc(LHSERVERDOC hDoc)
283 {
284     FIXME("(%ld): stub.\n", hDoc);
285     return OLE_OK;
286 }
287
288 /******************************************************************************
289  *              OleSavedServerDoc       [OLESVR.10]
290  *
291  */
292 OLESTATUS WINAPI OleSavedServerDoc16(LHSERVERDOC hDoc)
293 {
294     FIXME("(%ld): stub.\n", hDoc);
295     return OLE_OK;
296 }
297
298 /******************************************************************************
299  *              OleSavedServerDoc       [OLESVR32.10]
300  *
301  */
302 OLESTATUS WINAPI OleSavedServerDoc(LHSERVERDOC hDoc)
303 {
304     FIXME("(%ld): stub.\n", hDoc);
305     return OLE_OK;
306 }