1 /*
2 * Copyright 2005 Jacek Caban for CodeWeavers
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., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
17 */
18
19 #include <stdio.h>
20
21 #include "wine/debug.h"
22 #include "shdocvw.h"
23 #include "mshtmdid.h"
24 #include "idispids.h"
25
26 WINE_DEFAULT_DEBUG_CHANNEL(shdocvw);
27
28 #define CLIENTSITE_THIS(iface) DEFINE_THIS(DocHost, OleClientSite, iface)
29
30 static HRESULT WINAPI ClientSite_QueryInterface(IOleClientSite *iface, REFIID riid, void **ppv)
31 {
32 DocHost *This = CLIENTSITE_THIS(iface);
33
34 *ppv = NULL;
35
36 if(IsEqualGUID(&IID_IUnknown, riid)) {
37 TRACE("(%p)->(IID_IUnknown %p)\n", This, ppv);
38 *ppv = CLIENTSITE(This);
39 }else if(IsEqualGUID(&IID_IOleClientSite, riid)) {
40 TRACE("(%p)->(IID_IOleClientSite %p)\n", This, ppv);
41 *ppv = CLIENTSITE(This);
42 }else if(IsEqualGUID(&IID_IOleWindow, riid)) {
43 TRACE("(%p)->(IID_IOleWindow %p)\n", This, ppv);
44 *ppv = INPLACESITE(This);
45 }else if(IsEqualGUID(&IID_IOleInPlaceSite, riid)) {
46 TRACE("(%p)->(IID_IOleInPlaceSite %p)\n", This, ppv);
47 *ppv = INPLACESITE(This);
48 }else if(IsEqualGUID(&IID_IDocHostUIHandler, riid)) {
49 TRACE("(%p)->(IID_IDocHostUIHandler %p)\n", This, ppv);
50 *ppv = DOCHOSTUI(This);
51 }else if(IsEqualGUID(&IID_IDocHostUIHandler2, riid)) {
52 TRACE("(%p)->(IID_IDocHostUIHandler2 %p)\n", This, ppv);
53 *ppv = DOCHOSTUI2(This);
54 }else if(IsEqualGUID(&IID_IOleDocumentSite, riid)) {
55 TRACE("(%p)->(IID_IOleDocumentSite %p)\n", This, ppv);
56 *ppv = DOCSITE(This);
57 }else if(IsEqualGUID(&IID_IOleCommandTarget, riid)) {
58 TRACE("(%p)->(IID_IOleCommandTarget %p)\n", This, ppv);
59 *ppv = OLECMD(This);
60 }else if(IsEqualGUID(&IID_IDispatch, riid)) {
61 TRACE("(%p)->(IID_IDispatch %p)\n", This, ppv);
62 *ppv = CLDISP(This);
63 }else if(IsEqualGUID(&IID_IServiceProvider, riid)) {
64 TRACE("(%p)->(IID_IServiceProvider %p)\n", This, ppv);
65 *ppv = SERVPROV(This);
66 }
67
68 if(*ppv) {
69 IOleClientSite_AddRef(CLIENTSITE(This));
70 return S_OK;
71 }
72
73 WARN("Unsupported intrface %s\n", debugstr_guid(riid));
74
75 return E_NOINTERFACE;
76 }
77
78 static ULONG WINAPI ClientSite_AddRef(IOleClientSite *iface)
79 {
80 DocHost *This = CLIENTSITE_THIS(iface);
81 return IDispatch_AddRef(This->disp);
82 }
83
84 static ULONG WINAPI ClientSite_Release(IOleClientSite *iface)
85 {
86 DocHost *This = CLIENTSITE_THIS(iface);
87 return IDispatch_Release(This->disp);
88 }
89
90 static HRESULT WINAPI ClientSite_SaveObject(IOleClientSite *iface)
91 {
92 DocHost *This = CLIENTSITE_THIS(iface);
93 FIXME("(%p)\n", This);
94 return E_NOTIMPL;
95 }
96
97 static HRESULT WINAPI ClientSite_GetMoniker(IOleClientSite *iface, DWORD dwAssign,
98 DWORD dwWhichMoniker, IMoniker **ppmk)
99 {
100 DocHost *This = CLIENTSITE_THIS(iface);
101 FIXME("(%p)->(%d %d %p)\n", This, dwAssign, dwWhichMoniker, ppmk);
102 return E_NOTIMPL;
103 }
104
105 static HRESULT WINAPI ClientSite_GetContainer(IOleClientSite *iface, IOleContainer **ppContainer)
106 {
107 DocHost *This = CLIENTSITE_THIS(iface);
108 FIXME("(%p)->(%p)\n", This, ppContainer);
109 return E_NOTIMPL;
110 }
111
112 static HRESULT WINAPI ClientSite_ShowObject(IOleClientSite *iface)
113 {
114 DocHost *This = CLIENTSITE_THIS(iface);
115 FIXME("(%p)\n", This);
116 return E_NOTIMPL;
117 }
118
119 static HRESULT WINAPI ClientSite_OnShowWindow(IOleClientSite *iface, BOOL fShow)
120 {
121 DocHost *This = CLIENTSITE_THIS(iface);
122 FIXME("(%p)->(%x)\n", This, fShow);
123 return E_NOTIMPL;
124 }
125
126 static HRESULT WINAPI ClientSite_RequestNewObjectLayout(IOleClientSite *iface)
127 {
128 DocHost *This = CLIENTSITE_THIS(iface);
129 FIXME("(%p)\n", This);
130 return E_NOTIMPL;
131 }
132
133 #undef CLIENTSITE_THIS
134
135 static const IOleClientSiteVtbl OleClientSiteVtbl = {
136 ClientSite_QueryInterface,
137 ClientSite_AddRef,
138 ClientSite_Release,
139 ClientSite_SaveObject,
140 ClientSite_GetMoniker,
141 ClientSite_GetContainer,
142 ClientSite_ShowObject,
143 ClientSite_OnShowWindow,
144 ClientSite_RequestNewObjectLayout
145 };
146
147 #define INPLACESITE_THIS(iface) DEFINE_THIS(DocHost, OleInPlaceSite, iface)
148
149 static HRESULT WINAPI InPlaceSite_QueryInterface(IOleInPlaceSite *iface, REFIID riid, void **ppv)
150 {
151 DocHost *This = INPLACESITE_THIS(iface);
152 return IOleClientSite_QueryInterface(CLIENTSITE(This), riid, ppv);
153 }
154
155 static ULONG WINAPI InPlaceSite_AddRef(IOleInPlaceSite *iface)
156 {
157 DocHost *This = INPLACESITE_THIS(iface);
158 return IOleClientSite_AddRef(CLIENTSITE(This));
159 }
160
161 static ULONG WINAPI InPlaceSite_Release(IOleInPlaceSite *iface)
162 {
163 DocHost *This = INPLACESITE_THIS(iface);
164 return IOleClientSite_Release(CLIENTSITE(This));
165 }
166
167 static HRESULT WINAPI InPlaceSite_GetWindow(IOleInPlaceSite *iface, HWND *phwnd)
168 {
169 DocHost *This = INPLACESITE_THIS(iface);
170
171 TRACE("(%p)->(%p)\n", This, phwnd);
172
173 *phwnd = This->hwnd;
174 return S_OK;
175 }
176
177 static HRESULT WINAPI InPlaceSite_ContextSensitiveHelp(IOleInPlaceSite *iface, BOOL fEnterMode)
178 {
179 DocHost *This = INPLACESITE_THIS(iface);
180 FIXME("(%p)->(%x)\n", This, fEnterMode);
181 return E_NOTIMPL;
182 }
183
184 static HRESULT WINAPI InPlaceSite_CanInPlaceActivate(IOleInPlaceSite *iface)
185 {
186 DocHost *This = INPLACESITE_THIS(iface);
187
188 TRACE("(%p)\n", This);
189
190 /* Nothing to do here */
191 return S_OK;
192 }
193
194 static HRESULT WINAPI InPlaceSite_OnInPlaceActivate(IOleInPlaceSite *iface)
195 {
196 DocHost *This = INPLACESITE_THIS(iface);
197
198 TRACE("(%p)\n", This);
199
200 /* Nothing to do here */
201 return S_OK;
202 }
203
204 static HRESULT WINAPI InPlaceSite_OnUIActivate(IOleInPlaceSite *iface)
205 {
206 DocHost *This = INPLACESITE_THIS(iface);
207 FIXME("(%p)\n", This);
208 return E_NOTIMPL;
209 }
210
211 static HRESULT WINAPI InPlaceSite_GetWindowContext(IOleInPlaceSite *iface,
212 IOleInPlaceFrame **ppFrame, IOleInPlaceUIWindow **ppDoc, LPRECT lprcPosRect,
213 LPRECT lprcClipRect, LPOLEINPLACEFRAMEINFO lpFrameInfo)
214 {
215 DocHost *This = INPLACESITE_THIS(iface);
216
217 TRACE("(%p)->(%p %p %p %p %p)\n", This, ppFrame, ppDoc, lprcPosRect,
218 lprcClipRect, lpFrameInfo);
219
220 IOleInPlaceFrame_AddRef(INPLACEFRAME(This));
221 *ppFrame = INPLACEFRAME(This);
222 *ppDoc = NULL;
223
224 GetClientRect(This->hwnd, lprcPosRect);
225 *lprcClipRect = *lprcPosRect;
226
227 lpFrameInfo->cb = sizeof(*lpFrameInfo);
228 lpFrameInfo->fMDIApp = FALSE;
229 lpFrameInfo->hwndFrame = This->frame_hwnd;
230 lpFrameInfo->haccel = NULL;
231 lpFrameInfo->cAccelEntries = 0; /* FIXME: should be 5 */
232
233 return S_OK;
234 }
235
236 static HRESULT WINAPI InPlaceSite_Scroll(IOleInPlaceSite *iface, SIZE scrollExtent)
237 {
238 DocHost *This = INPLACESITE_THIS(iface);
239 FIXME("(%p)->({%d %d})\n", This, scrollExtent.cx, scrollExtent.cy);
240 return E_NOTIMPL;
241 }
242
243 static HRESULT WINAPI InPlaceSite_OnUIDeactivate(IOleInPlaceSite *iface, BOOL fUndoable)
244 {
245 DocHost *This = INPLACESITE_THIS(iface);
246 FIXME("(%p)->(%x)\n", This, fUndoable);
247 return E_NOTIMPL;
248 }
249
250 static HRESULT WINAPI InPlaceSite_OnInPlaceDeactivate(IOleInPlaceSite *iface)
251 {
252 DocHost *This = INPLACESITE_THIS(iface);
253
254 TRACE("(%p)\n", This);
255
256 /* Nothing to do here */
257 return S_OK;
258 }
259
260 static HRESULT WINAPI InPlaceSite_DiscardUndoState(IOleInPlaceSite *iface)
261 {
262 DocHost *This = INPLACESITE_THIS(iface);
263 FIXME("(%p)\n", This);
264 return E_NOTIMPL;
265 }
266
267 static HRESULT WINAPI InPlaceSite_DeactivateAndUndo(IOleInPlaceSite *iface)
268 {
269 DocHost *This = INPLACESITE_THIS(iface);
270 FIXME("(%p)\n", This);
271 return E_NOTIMPL;
272 }
273
274 static HRESULT WINAPI InPlaceSite_OnPosRectChange(IOleInPlaceSite *iface,
275 LPCRECT lprcPosRect)
276 {
277 DocHost *This = INPLACESITE_THIS(iface);
278 FIXME("(%p)->(%p)\n", This, lprcPosRect);
279 return E_NOTIMPL;
280 }
281
282 #undef INPLACESITE_THIS
283
284 static const IOleInPlaceSiteVtbl OleInPlaceSiteVtbl = {
285 InPlaceSite_QueryInterface,
286 InPlaceSite_AddRef,
287 InPlaceSite_Release,
288 InPlaceSite_GetWindow,
289 InPlaceSite_ContextSensitiveHelp,
290 InPlaceSite_CanInPlaceActivate,
291 InPlaceSite_OnInPlaceActivate,
292 InPlaceSite_OnUIActivate,
293 InPlaceSite_GetWindowContext,
294 InPlaceSite_Scroll,
295 InPlaceSite_OnUIDeactivate,
296 InPlaceSite_OnInPlaceDeactivate,
297 InPlaceSite_DiscardUndoState,
298 InPlaceSite_DeactivateAndUndo,
299 InPlaceSite_OnPosRectChange
300 };
301
302 #define DOCSITE_THIS(iface) DEFINE_THIS(DocHost, OleDocumentSite, iface)
303
304 static HRESULT WINAPI OleDocumentSite_QueryInterface(IOleDocumentSite *iface,
305 REFIID riid, void **ppv)
306 {
307 DocHost *This = DOCSITE_THIS(iface);
308 return IOleClientSite_QueryInterface(CLIENTSITE(This), riid, ppv);
309 }
310
311 static ULONG WINAPI OleDocumentSite_AddRef(IOleDocumentSite *iface)
312 {
313 DocHost *This = DOCSITE_THIS(iface);
314 return IOleClientSite_AddRef(CLIENTSITE(This));
315 }
316
317 static ULONG WINAPI OleDocumentSite_Release(IOleDocumentSite *iface)
318 {
319 DocHost *This = DOCSITE_THIS(iface);
320 return IOleClientSite_Release(CLIENTSITE(This));
321 }
322
323 static HRESULT WINAPI OleDocumentSite_ActivateMe(IOleDocumentSite *iface,
324 IOleDocumentView *pViewToActivate)
325 {
326 DocHost *This = DOCSITE_THIS(iface);
327 IOleDocument *oledoc;
328 RECT rect;
329 HRESULT hres;
330
331 TRACE("(%p)->(%p)\n", This, pViewToActivate);
332
333 hres = IUnknown_QueryInterface(This->document, &IID_IOleDocument, (void**)&oledoc);
334 if(FAILED(hres))
335 return hres;
336
337 IOleDocument_CreateView(oledoc, INPLACESITE(This), NULL, 0, &This->view);
338 IOleDocument_Release(oledoc);
339
340 GetClientRect(This->hwnd, &rect);
341 IOleDocumentView_SetRect(This->view, &rect);
342
343 hres = IOleDocumentView_Show(This->view, TRUE);
344
345 return hres;
346 }
347
348 #undef DOCSITE_THIS
349
350 static const IOleDocumentSiteVtbl OleDocumentSiteVtbl = {
351 OleDocumentSite_QueryInterface,
352 OleDocumentSite_AddRef,
353 OleDocumentSite_Release,
354 OleDocumentSite_ActivateMe
355 };
356
357 #define DISP_THIS(iface) DEFINE_THIS(DocHost, Dispatch, iface)
358
359 static HRESULT WINAPI ClDispatch_QueryInterface(IDispatch *iface, REFIID riid, void **ppv)
360 {
361 DocHost *This = DISP_THIS(iface);
362 return IOleClientSite_QueryInterface(CLIENTSITE(This), riid, ppv);
363 }
364
365 static ULONG WINAPI ClDispatch_AddRef(IDispatch *iface)
366 {
367 DocHost *This = DISP_THIS(iface);
368 return IOleClientSite_AddRef(CLIENTSITE(This));
369 }
370
371 static ULONG WINAPI ClDispatch_Release(IDispatch *iface)
372 {
373 DocHost *This = DISP_THIS(iface);
374 return IOleClientSite_Release(CLIENTSITE(This));
375 }
376
377 static HRESULT WINAPI ClDispatch_GetTypeInfoCount(IDispatch *iface, UINT *pctinfo)
378 {
379 DocHost *This = DISP_THIS(iface);
380
381 TRACE("(%p)->(%p)\n", This, pctinfo);
382
383 return E_NOTIMPL;
384 }
385
386 static HRESULT WINAPI ClDispatch_GetTypeInfo(IDispatch *iface, UINT iTInfo, LCID lcid,
387 ITypeInfo **ppTInfo)
388 {
389 DocHost *This = DISP_THIS(iface);
390
391 TRACE("(%p)->(%u %d %p)\n", This, iTInfo, lcid, ppTInfo);
392
393 return E_NOTIMPL;
394 }
395
396 static HRESULT WINAPI ClDispatch_GetIDsOfNames(IDispatch *iface, REFIID riid, LPOLESTR *rgszNames,
397 UINT cNames, LCID lcid, DISPID *rgDispId)
398 {
399 DocHost *This = DISP_THIS(iface);
400
401 TRACE("(%p)->(%s %p %u %d %p)\n", This, debugstr_guid(riid), rgszNames, cNames,
402 lcid, rgDispId);
403
404 return E_NOTIMPL;
405 }
406
407 static const char *debugstr_dispid(DISPID dispid)
408 {
409 static char buf[16];
410
411 #define CASE_DISPID(did) case did: return #did
412 switch(dispid) {
413 CASE_DISPID(DISPID_AMBIENT_USERMODE);
414 CASE_DISPID(DISPID_AMBIENT_DLCONTROL);
415 CASE_DISPID(DISPID_AMBIENT_USERAGENT);
416 CASE_DISPID(DISPID_AMBIENT_PALETTE);
417 CASE_DISPID(DISPID_AMBIENT_OFFLINEIFNOTCONNECTED);
418 CASE_DISPID(DISPID_AMBIENT_SILENT);
419 }
420 #undef CASE_DISPID
421
422 sprintf(buf, "%d", dispid);
423 return buf;
424 }
425
426 static HRESULT WINAPI ClDispatch_Invoke(IDispatch *iface, DISPID dispIdMember, REFIID riid,
427 LCID lcid, WORD wFlags, DISPPARAMS *pDispParams,
428 VARIANT *pVarResult, EXCEPINFO *pExcepInfo, UINT *puArgErr)
429 {
430 DocHost *This = DISP_THIS(iface);
431
432 TRACE("(%p)->(%s %s %d %04x %p %p %p %p)\n", This, debugstr_dispid(dispIdMember),
433 debugstr_guid(riid), lcid, wFlags, pDispParams, pVarResult, pExcepInfo, puArgErr);
434
435 switch(dispIdMember) {
436 case DISPID_AMBIENT_USERMODE:
437 case DISPID_AMBIENT_DLCONTROL:
438 case DISPID_AMBIENT_USERAGENT:
439 case DISPID_AMBIENT_PALETTE:
440 if(!This->client_disp)
441 return E_FAIL;
442 return IDispatch_Invoke(This->client_disp, dispIdMember, riid, lcid, wFlags,
443 pDispParams, pVarResult, pExcepInfo, puArgErr);
444 case DISPID_AMBIENT_OFFLINEIFNOTCONNECTED:
445 V_VT(pVarResult) = VT_BOOL;
446 V_BOOL(pVarResult) = This->offline;
447 return S_OK;
448 case DISPID_AMBIENT_SILENT:
449 V_VT(pVarResult) = VT_BOOL;
450 V_BOOL(pVarResult) = This->offline;
451 return S_OK;
452 }
453
454 FIXME("unhandled dispid %d\n", dispIdMember);
455 return E_NOTIMPL;
456 }
457
458 #undef DISP_THIS
459
460 static const IDispatchVtbl DispatchVtbl = {
461 ClDispatch_QueryInterface,
462 ClDispatch_AddRef,
463 ClDispatch_Release,
464 ClDispatch_GetTypeInfoCount,
465 ClDispatch_GetTypeInfo,
466 ClDispatch_GetIDsOfNames,
467 ClDispatch_Invoke
468 };
469
470 #define SERVPROV_THIS(iface) DEFINE_THIS(DocHost, ServiceProvider, iface)
471
472 static HRESULT WINAPI ClServiceProvider_QueryInterface(IServiceProvider *iface, REFIID riid,
473 void **ppv)
474 {
475 DocHost *This = SERVPROV_THIS(iface);
476 return IOleClientSite_QueryInterface(CLIENTSITE(This), riid, ppv);
477 }
478
479 static ULONG WINAPI ClServiceProvider_AddRef(IServiceProvider *iface)
480 {
481 DocHost *This = SERVPROV_THIS(iface);
482 return IOleClientSite_AddRef(CLIENTSITE(This));
483 }
484
485 static ULONG WINAPI ClServiceProvider_Release(IServiceProvider *iface)
486 {
487 DocHost *This = SERVPROV_THIS(iface);
488 return IOleClientSite_Release(CLIENTSITE(This));
489 }
490
491 static HRESULT WINAPI ClServiceProvider_QueryService(IServiceProvider *iface, REFGUID guidService,
492 REFIID riid, void **ppv)
493 {
494 DocHost *This = SERVPROV_THIS(iface);
495
496 if(IsEqualGUID(&IID_IHlinkFrame, guidService)) {
497 TRACE("(%p)->(IID_IHlinkFrame %s %p)\n", This, debugstr_guid(riid), ppv);
498 return IDispatch_QueryInterface(This->disp, riid, ppv);
499 }
500
501 FIXME("(%p)->(%s %s %p)\n", This, debugstr_guid(guidService), debugstr_guid(riid), ppv);
502
503 return E_NOINTERFACE;
504 }
505
506 #undef SERVPROV_THIS
507
508 static const IServiceProviderVtbl ServiceProviderVtbl = {
509 ClServiceProvider_QueryInterface,
510 ClServiceProvider_AddRef,
511 ClServiceProvider_Release,
512 ClServiceProvider_QueryService
513 };
514
515 void DocHost_ClientSite_Init(DocHost *This)
516 {
517 This->lpOleClientSiteVtbl = &OleClientSiteVtbl;
518 This->lpOleInPlaceSiteVtbl = &OleInPlaceSiteVtbl;
519 This->lpOleDocumentSiteVtbl = &OleDocumentSiteVtbl;
520 This->lpDispatchVtbl = &DispatchVtbl;
521 This->lpServiceProviderVtbl = &ServiceProviderVtbl;
522
523 This->view = NULL;
524 }
525
526 void DocHost_ClientSite_Release(DocHost *This)
527 {
528 if(This->view)
529 IOleDocumentView_Release(This->view);
530 }
531
This page was automatically generated by the
LXR engine.
Visit the LXR main site for more
information.