1 /*
2 * Copyright 2005-2006 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 "wine/debug.h"
20 #include "shdocvw.h"
21 #include "hlink.h"
22 #include "exdispid.h"
23
24 WINE_DEFAULT_DEBUG_CHANNEL(shdocvw);
25
26 static ATOM doc_view_atom = 0;
27
28 void push_dochost_task(DocHost *This, task_header_t *task, task_proc_t proc, BOOL send)
29 {
30 task->proc = proc;
31
32 /* FIXME: Don't use lParam */
33 if(send)
34 SendMessageW(This->frame_hwnd, WM_DOCHOSTTASK, 0, (LPARAM)task);
35 else
36 PostMessageW(This->frame_hwnd, WM_DOCHOSTTASK, 0, (LPARAM)task);
37 }
38
39 LRESULT process_dochost_task(DocHost *This, LPARAM lparam)
40 {
41 task_header_t *task = (task_header_t*)lparam;
42
43 task->proc(This, task);
44
45 heap_free(task);
46 return 0;
47 }
48
49 static void navigate_complete(DocHost *This)
50 {
51 IDispatch *disp = NULL;
52 DISPPARAMS dispparams;
53 VARIANTARG params[2];
54 VARIANT url;
55 HRESULT hres;
56
57 hres = IUnknown_QueryInterface(This->document, &IID_IDispatch, (void**)&disp);
58 if(FAILED(hres))
59 FIXME("Could not get IDispatch interface\n");
60
61 dispparams.cArgs = 2;
62 dispparams.cNamedArgs = 0;
63 dispparams.rgdispidNamedArgs = NULL;
64 dispparams.rgvarg = params;
65
66 V_VT(params) = (VT_BYREF|VT_VARIANT);
67 V_BYREF(params) = &url;
68
69 V_VT(params+1) = VT_DISPATCH;
70 V_DISPATCH(params+1) = disp;
71
72 V_VT(&url) = VT_BSTR;
73 V_BSTR(&url) = SysAllocString(This->url);
74
75 call_sink(This->cps.wbe2, DISPID_NAVIGATECOMPLETE2, &dispparams);
76 call_sink(This->cps.wbe2, DISPID_DOCUMENTCOMPLETE, &dispparams);
77
78 SysFreeString(V_BSTR(&url));
79 if(disp)
80 IDispatch_Release(disp);
81 This->busy = VARIANT_FALSE;
82 }
83
84 void object_available(DocHost *This)
85 {
86 IHlinkTarget *hlink;
87 HRESULT hres;
88
89 TRACE("(%p)\n", This);
90
91 if(!This->document) {
92 WARN("document == NULL\n");
93 return;
94 }
95
96 hres = IUnknown_QueryInterface(This->document, &IID_IHlinkTarget, (void**)&hlink);
97 if(FAILED(hres)) {
98 FIXME("Could not get IHlinkTarget interface\n");
99 return;
100 }
101
102 hres = IHlinkTarget_Navigate(hlink, 0, NULL);
103 IHlinkTarget_Release(hlink);
104 if(FAILED(hres)) {
105 FIXME("Navigate failed\n");
106 return;
107 }
108
109 navigate_complete(This);
110
111 return;
112 }
113
114 static LRESULT resize_document(DocHost *This, LONG width, LONG height)
115 {
116 RECT rect = {0, 0, width, height};
117
118 TRACE("(%p)->(%d %d)\n", This, width, height);
119
120 if(This->view)
121 IOleDocumentView_SetRect(This->view, &rect);
122
123 return 0;
124 }
125
126 static LRESULT WINAPI doc_view_proc(HWND hwnd, UINT msg, WPARAM wParam, LPARAM lParam)
127 {
128 DocHost *This;
129
130 static const WCHAR wszTHIS[] = {'T','H','I','S',0};
131
132 if(msg == WM_CREATE) {
133 This = *(DocHost**)lParam;
134 SetPropW(hwnd, wszTHIS, This);
135 }else {
136 This = GetPropW(hwnd, wszTHIS);
137 }
138
139 switch(msg) {
140 case WM_SIZE:
141 return resize_document(This, LOWORD(lParam), HIWORD(lParam));
142 }
143
144 return DefWindowProcW(hwnd, msg, wParam, lParam);
145 }
146
147 void create_doc_view_hwnd(DocHost *This)
148 {
149 RECT rect;
150
151 static const WCHAR wszShell_DocObject_View[] =
152 {'S','h','e','l','l',' ','D','o','c','O','b','j','e','c','t',' ','V','i','e','w',0};
153
154 if(!doc_view_atom) {
155 static WNDCLASSEXW wndclass = {
156 sizeof(wndclass),
157 CS_PARENTDC,
158 doc_view_proc,
159 0, 0 /* native uses 4*/, NULL, NULL, NULL,
160 (HBRUSH)COLOR_WINDOWFRAME, NULL,
161 wszShell_DocObject_View,
162 NULL
163 };
164
165 wndclass.hInstance = shdocvw_hinstance;
166
167 doc_view_atom = RegisterClassExW(&wndclass);
168 }
169
170 GetClientRect(This->frame_hwnd, &rect); /* FIXME */
171 This->hwnd = CreateWindowExW(0, wszShell_DocObject_View,
172 wszShell_DocObject_View,
173 WS_CHILD | WS_VISIBLE | WS_CLIPSIBLINGS | WS_CLIPCHILDREN | WS_TABSTOP,
174 rect.left, rect.top, rect.right, rect.bottom, This->frame_hwnd,
175 NULL, shdocvw_hinstance, This);
176 }
177
178 void deactivate_document(DocHost *This)
179 {
180 IOleInPlaceObjectWindowless *winobj;
181 IOleObject *oleobj = NULL;
182 IHlinkTarget *hlink = NULL;
183 HRESULT hres;
184
185 if(This->view)
186 IOleDocumentView_UIActivate(This->view, FALSE);
187
188 hres = IUnknown_QueryInterface(This->document, &IID_IOleInPlaceObjectWindowless,
189 (void**)&winobj);
190 if(SUCCEEDED(hres)) {
191 IOleInPlaceObjectWindowless_InPlaceDeactivate(winobj);
192 IOleInPlaceObjectWindowless_Release(winobj);
193 }
194
195 if(This->view) {
196 IOleDocumentView_Show(This->view, FALSE);
197 IOleDocumentView_CloseView(This->view, 0);
198 IOleDocumentView_SetInPlaceSite(This->view, NULL);
199 IOleDocumentView_Release(This->view);
200 This->view = NULL;
201 }
202
203 hres = IUnknown_QueryInterface(This->document, &IID_IOleObject, (void**)&oleobj);
204 if(SUCCEEDED(hres))
205 IOleObject_Close(oleobj, OLECLOSE_NOSAVE);
206
207 hres = IUnknown_QueryInterface(This->document, &IID_IHlinkTarget, (void**)&hlink);
208 if(SUCCEEDED(hres)) {
209 IHlinkTarget_SetBrowseContext(hlink, NULL);
210 IHlinkTarget_Release(hlink);
211 }
212
213 if(oleobj) {
214 IOleClientSite *client_site = NULL;
215
216 IOleObject_GetClientSite(oleobj, &client_site);
217 if(client_site) {
218 if(client_site == CLIENTSITE(This))
219 IOleObject_SetClientSite(oleobj, NULL);
220 IOleClientSite_Release(client_site);
221 }
222
223 IOleObject_Release(oleobj);
224 }
225
226 IUnknown_Release(This->document);
227 This->document = NULL;
228 }
229
230 #define OLECMD_THIS(iface) DEFINE_THIS(DocHost, OleCommandTarget, iface)
231
232 static HRESULT WINAPI ClOleCommandTarget_QueryInterface(IOleCommandTarget *iface,
233 REFIID riid, void **ppv)
234 {
235 DocHost *This = OLECMD_THIS(iface);
236 return IOleClientSite_QueryInterface(CLIENTSITE(This), riid, ppv);
237 }
238
239 static ULONG WINAPI ClOleCommandTarget_AddRef(IOleCommandTarget *iface)
240 {
241 DocHost *This = OLECMD_THIS(iface);
242 return IOleClientSite_AddRef(CLIENTSITE(This));
243 }
244
245 static ULONG WINAPI ClOleCommandTarget_Release(IOleCommandTarget *iface)
246 {
247 DocHost *This = OLECMD_THIS(iface);
248 return IOleClientSite_Release(CLIENTSITE(This));
249 }
250
251 static HRESULT WINAPI ClOleCommandTarget_QueryStatus(IOleCommandTarget *iface,
252 const GUID *pguidCmdGroup, ULONG cCmds, OLECMD prgCmds[], OLECMDTEXT *pCmdText)
253 {
254 DocHost *This = OLECMD_THIS(iface);
255 FIXME("(%p)->(%s %u %p %p)\n", This, debugstr_guid(pguidCmdGroup), cCmds, prgCmds,
256 pCmdText);
257 return E_NOTIMPL;
258 }
259
260 static HRESULT WINAPI ClOleCommandTarget_Exec(IOleCommandTarget *iface,
261 const GUID *pguidCmdGroup, DWORD nCmdID, DWORD nCmdexecopt, VARIANT *pvaIn,
262 VARIANT *pvaOut)
263 {
264 DocHost *This = OLECMD_THIS(iface);
265 FIXME("(%p)->(%s %d %d %p %p)\n", This, debugstr_guid(pguidCmdGroup), nCmdID,
266 nCmdexecopt, pvaIn, pvaOut);
267 return E_NOTIMPL;
268 }
269
270 #undef OLECMD_THIS
271
272 static const IOleCommandTargetVtbl OleCommandTargetVtbl = {
273 ClOleCommandTarget_QueryInterface,
274 ClOleCommandTarget_AddRef,
275 ClOleCommandTarget_Release,
276 ClOleCommandTarget_QueryStatus,
277 ClOleCommandTarget_Exec
278 };
279
280 #define DOCHOSTUI_THIS(iface) DEFINE_THIS(DocHost, DocHostUIHandler, iface)
281
282 static HRESULT WINAPI DocHostUIHandler_QueryInterface(IDocHostUIHandler2 *iface,
283 REFIID riid, void **ppv)
284 {
285 DocHost *This = DOCHOSTUI_THIS(iface);
286 return IOleClientSite_QueryInterface(CLIENTSITE(This), riid, ppv);
287 }
288
289 static ULONG WINAPI DocHostUIHandler_AddRef(IDocHostUIHandler2 *iface)
290 {
291 DocHost *This = DOCHOSTUI_THIS(iface);
292 return IOleClientSite_AddRef(CLIENTSITE(This));
293 }
294
295 static ULONG WINAPI DocHostUIHandler_Release(IDocHostUIHandler2 *iface)
296 {
297 DocHost *This = DOCHOSTUI_THIS(iface);
298 return IOleClientSite_Release(CLIENTSITE(This));
299 }
300
301 static HRESULT WINAPI DocHostUIHandler_ShowContextMenu(IDocHostUIHandler2 *iface,
302 DWORD dwID, POINT *ppt, IUnknown *pcmdtReserved, IDispatch *pdispReserved)
303 {
304 DocHost *This = DOCHOSTUI_THIS(iface);
305 HRESULT hres;
306
307 TRACE("(%p)->(%d %p %p %p)\n", This, dwID, ppt, pcmdtReserved, pdispReserved);
308
309 if(This->hostui) {
310 hres = IDocHostUIHandler_ShowContextMenu(This->hostui, dwID, ppt, pcmdtReserved,
311 pdispReserved);
312 if(hres == S_OK)
313 return S_OK;
314 }
315
316 FIXME("default action not implemented\n");
317 return E_NOTIMPL;
318 }
319
320 static HRESULT WINAPI DocHostUIHandler_GetHostInfo(IDocHostUIHandler2 *iface,
321 DOCHOSTUIINFO *pInfo)
322 {
323 DocHost *This = DOCHOSTUI_THIS(iface);
324 HRESULT hres;
325
326 TRACE("(%p)->(%p)\n", This, pInfo);
327
328 if(This->hostui) {
329 hres = IDocHostUIHandler_GetHostInfo(This->hostui, pInfo);
330 if(SUCCEEDED(hres))
331 return hres;
332 }
333
334 pInfo->dwFlags = DOCHOSTUIFLAG_DISABLE_HELP_MENU | DOCHOSTUIFLAG_OPENNEWWIN
335 | DOCHOSTUIFLAG_URL_ENCODING_ENABLE_UTF8 | DOCHOSTUIFLAG_ENABLE_INPLACE_NAVIGATION
336 | DOCHOSTUIFLAG_IME_ENABLE_RECONVERSION;
337 return S_OK;
338 }
339
340 static HRESULT WINAPI DocHostUIHandler_ShowUI(IDocHostUIHandler2 *iface, DWORD dwID,
341 IOleInPlaceActiveObject *pActiveObject, IOleCommandTarget *pCommandTarget,
342 IOleInPlaceFrame *pFrame, IOleInPlaceUIWindow *pDoc)
343 {
344 DocHost *This = DOCHOSTUI_THIS(iface);
345 FIXME("(%p)->(%d %p %p %p %p)\n", This, dwID, pActiveObject, pCommandTarget,
346 pFrame, pDoc);
347 return E_NOTIMPL;
348 }
349
350 static HRESULT WINAPI DocHostUIHandler_HideUI(IDocHostUIHandler2 *iface)
351 {
352 DocHost *This = DOCHOSTUI_THIS(iface);
353 FIXME("(%p)\n", This);
354 return E_NOTIMPL;
355 }
356
357 static HRESULT WINAPI DocHostUIHandler_UpdateUI(IDocHostUIHandler2 *iface)
358 {
359 DocHost *This = DOCHOSTUI_THIS(iface);
360
361 TRACE("(%p)\n", This);
362
363 if(!This->hostui)
364 return S_FALSE;
365
366 return IDocHostUIHandler_UpdateUI(This->hostui);
367 }
368
369 static HRESULT WINAPI DocHostUIHandler_EnableModeless(IDocHostUIHandler2 *iface,
370 BOOL fEnable)
371 {
372 DocHost *This = DOCHOSTUI_THIS(iface);
373 FIXME("(%p)->(%x)\n", This, fEnable);
374 return E_NOTIMPL;
375 }
376
377 static HRESULT WINAPI DocHostUIHandler_OnDocWindowActivate(IDocHostUIHandler2 *iface,
378 BOOL fActivate)
379 {
380 DocHost *This = DOCHOSTUI_THIS(iface);
381 FIXME("(%p)->(%x)\n", This, fActivate);
382 return E_NOTIMPL;
383 }
384
385 static HRESULT WINAPI DocHostUIHandler_OnFrameWindowActivate(IDocHostUIHandler2 *iface,
386 BOOL fActivate)
387 {
388 DocHost *This = DOCHOSTUI_THIS(iface);
389 FIXME("(%p)->(%x)\n", This, fActivate);
390 return E_NOTIMPL;
391 }
392
393 static HRESULT WINAPI DocHostUIHandler_ResizeBorder(IDocHostUIHandler2 *iface,
394 LPCRECT prcBorder, IOleInPlaceUIWindow *pUIWindow, BOOL fRameWindow)
395 {
396 DocHost *This = DOCHOSTUI_THIS(iface);
397 FIXME("(%p)->(%p %p %X)\n", This, prcBorder, pUIWindow, fRameWindow);
398 return E_NOTIMPL;
399 }
400
401 static HRESULT WINAPI DocHostUIHandler_TranslateAccelerator(IDocHostUIHandler2 *iface,
402 LPMSG lpMsg, const GUID *pguidCmdGroup, DWORD nCmdID)
403 {
404 DocHost *This = DOCHOSTUI_THIS(iface);
405 FIXME("(%p)->(%p %p %d)\n", This, lpMsg, pguidCmdGroup, nCmdID);
406 return E_NOTIMPL;
407 }
408
409 static HRESULT WINAPI DocHostUIHandler_GetOptionKeyPath(IDocHostUIHandler2 *iface,
410 LPOLESTR *pchKey, DWORD dw)
411 {
412 DocHost *This = DOCHOSTUI_THIS(iface);
413
414 TRACE("(%p)->(%p %d)\n", This, pchKey, dw);
415
416 if(This->hostui)
417 return IDocHostUIHandler_GetOptionKeyPath(This->hostui, pchKey, dw);
418
419 return S_OK;
420 }
421
422 static HRESULT WINAPI DocHostUIHandler_GetDropTarget(IDocHostUIHandler2 *iface,
423 IDropTarget *pDropTarget, IDropTarget **ppDropTarget)
424 {
425 DocHost *This = DOCHOSTUI_THIS(iface);
426 FIXME("(%p)\n", This);
427 return E_NOTIMPL;
428 }
429
430 static HRESULT WINAPI DocHostUIHandler_GetExternal(IDocHostUIHandler2 *iface,
431 IDispatch **ppDispatch)
432 {
433 DocHost *This = DOCHOSTUI_THIS(iface);
434
435 TRACE("(%p)->(%p)\n", This, ppDispatch);
436
437 if(This->hostui)
438 return IDocHostUIHandler_GetExternal(This->hostui, ppDispatch);
439
440 FIXME("default action not implemented\n");
441 return E_NOTIMPL;
442 }
443
444 static HRESULT WINAPI DocHostUIHandler_TranslateUrl(IDocHostUIHandler2 *iface,
445 DWORD dwTranslate, OLECHAR *pchURLIn, OLECHAR **ppchURLOut)
446 {
447 DocHost *This = DOCHOSTUI_THIS(iface);
448
449 TRACE("(%p)->(%d %s %p)\n", This, dwTranslate, debugstr_w(pchURLIn), ppchURLOut);
450
451 if(This->hostui)
452 return IDocHostUIHandler_TranslateUrl(This->hostui, dwTranslate,
453 pchURLIn, ppchURLOut);
454
455 return S_FALSE;
456 }
457
458 static HRESULT WINAPI DocHostUIHandler_FilterDataObject(IDocHostUIHandler2 *iface,
459 IDataObject *pDO, IDataObject **ppDORet)
460 {
461 DocHost *This = DOCHOSTUI_THIS(iface);
462 FIXME("(%p)->(%p %p)\n", This, pDO, ppDORet);
463 return E_NOTIMPL;
464 }
465
466 static HRESULT WINAPI DocHostUIHandler_GetOverrideKeyPath(IDocHostUIHandler2 *iface,
467 LPOLESTR *pchKey, DWORD dw)
468 {
469 DocHost *This = DOCHOSTUI_THIS(iface);
470 IDocHostUIHandler2 *handler;
471 HRESULT hres;
472
473 TRACE("(%p)->(%p %d)\n", This, pchKey, dw);
474
475 if(!This->hostui)
476 return S_OK;
477
478 hres = IDocHostUIHandler_QueryInterface(This->hostui, &IID_IDocHostUIHandler2,
479 (void**)&handler);
480 if(SUCCEEDED(hres)) {
481 hres = IDocHostUIHandler2_GetOverrideKeyPath(handler, pchKey, dw);
482 IDocHostUIHandler2_Release(handler);
483 return hres;
484 }
485
486 return S_OK;
487 }
488
489 #undef DOCHOSTUI_THIS
490
491 static const IDocHostUIHandler2Vtbl DocHostUIHandler2Vtbl = {
492 DocHostUIHandler_QueryInterface,
493 DocHostUIHandler_AddRef,
494 DocHostUIHandler_Release,
495 DocHostUIHandler_ShowContextMenu,
496 DocHostUIHandler_GetHostInfo,
497 DocHostUIHandler_ShowUI,
498 DocHostUIHandler_HideUI,
499 DocHostUIHandler_UpdateUI,
500 DocHostUIHandler_EnableModeless,
501 DocHostUIHandler_OnDocWindowActivate,
502 DocHostUIHandler_OnFrameWindowActivate,
503 DocHostUIHandler_ResizeBorder,
504 DocHostUIHandler_TranslateAccelerator,
505 DocHostUIHandler_GetOptionKeyPath,
506 DocHostUIHandler_GetDropTarget,
507 DocHostUIHandler_GetExternal,
508 DocHostUIHandler_TranslateUrl,
509 DocHostUIHandler_FilterDataObject,
510 DocHostUIHandler_GetOverrideKeyPath
511 };
512
513 void DocHost_Init(DocHost *This, IDispatch *disp)
514 {
515 This->lpDocHostUIHandlerVtbl = &DocHostUIHandler2Vtbl;
516 This->lpOleCommandTargetVtbl = &OleCommandTargetVtbl;
517
518 This->disp = disp;
519
520 This->client_disp = NULL;
521
522 This->document = NULL;
523 This->hostui = NULL;
524 This->frame = NULL;
525
526 This->hwnd = NULL;
527 This->frame_hwnd = NULL;
528 This->url = NULL;
529
530 This->silent = VARIANT_FALSE;
531 This->offline = VARIANT_FALSE;
532
533 DocHost_ClientSite_Init(This);
534 DocHost_Frame_Init(This);
535
536 ConnectionPointContainer_Init(&This->cps, (IUnknown*)disp);
537 }
538
539 void DocHost_Release(DocHost *This)
540 {
541 if(This->client_disp)
542 IDispatch_Release(This->client_disp);
543 if(This->frame)
544 IOleInPlaceFrame_Release(This->frame);
545
546 DocHost_ClientSite_Release(This);
547
548 ConnectionPointContainer_Destroy(&This->cps);
549
550 SysFreeString(This->url);
551 }
552
This page was automatically generated by the
LXR engine.
Visit the LXR main site for more
information.