mshtml: Fixed typo in IHTMLElement2::get_scrollHeight.
[wine] / dlls / shdocvw / dochost.c
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 #include "mshtml.h"
24
25 WINE_DEFAULT_DEBUG_CHANNEL(shdocvw);
26
27 static ATOM doc_view_atom = 0;
28
29 void push_dochost_task(DocHost *This, task_header_t *task, task_proc_t proc, BOOL send)
30 {
31     task->proc = proc;
32
33     /* FIXME: Don't use lParam */
34     if(send)
35         SendMessageW(This->frame_hwnd, WM_DOCHOSTTASK, 0, (LPARAM)task);
36     else
37         PostMessageW(This->frame_hwnd, WM_DOCHOSTTASK, 0, (LPARAM)task);
38 }
39
40 LRESULT process_dochost_task(DocHost *This, LPARAM lparam)
41 {
42     task_header_t *task = (task_header_t*)lparam;
43
44     task->proc(This, task);
45
46     heap_free(task);
47     return 0;
48 }
49
50 static void notif_complete(DocHost *This, DISPID dispid)
51 {
52     DISPPARAMS dispparams;
53     VARIANTARG params[2];
54     VARIANT url;
55
56     dispparams.cArgs = 2;
57     dispparams.cNamedArgs = 0;
58     dispparams.rgdispidNamedArgs = NULL;
59     dispparams.rgvarg = params;
60
61     V_VT(params) = (VT_BYREF|VT_VARIANT);
62     V_BYREF(params) = &url;
63
64     V_VT(params+1) = VT_DISPATCH;
65     V_DISPATCH(params+1) = This->disp;
66
67     V_VT(&url) = VT_BSTR;
68     V_BSTR(&url) = SysAllocString(This->url);
69
70     TRACE("%d >>>\n", dispid);
71     call_sink(This->cps.wbe2, dispid, &dispparams);
72     TRACE("%d <<<\n", dispid);
73
74     SysFreeString(V_BSTR(&url));
75     This->busy = VARIANT_FALSE;
76 }
77
78 static void object_available(DocHost *This)
79 {
80     IHlinkTarget *hlink;
81     HRESULT hres;
82
83     TRACE("(%p)\n", This);
84
85     if(!This->document) {
86         WARN("document == NULL\n");
87         return;
88     }
89
90     hres = IUnknown_QueryInterface(This->document, &IID_IHlinkTarget, (void**)&hlink);
91     if(FAILED(hres)) {
92         FIXME("Could not get IHlinkTarget interface\n");
93         return;
94     }
95
96     hres = IHlinkTarget_Navigate(hlink, 0, NULL);
97     IHlinkTarget_Release(hlink);
98     if(FAILED(hres))
99         FIXME("Navigate failed\n");
100 }
101
102 static HRESULT get_doc_ready_state(DocHost *This, READYSTATE *ret)
103 {
104     DISPPARAMS dp = {NULL,NULL,0,0};
105     IDispatch *disp;
106     EXCEPINFO ei;
107     VARIANT var;
108     HRESULT hres;
109
110     hres = IUnknown_QueryInterface(This->document, &IID_IDispatch, (void**)&disp);
111     if(FAILED(hres))
112         return hres;
113
114     hres = IDispatch_Invoke(disp, DISPID_READYSTATE, &IID_NULL, LOCALE_SYSTEM_DEFAULT, DISPATCH_PROPERTYGET,
115             &dp, &var, &ei, NULL);
116     IDispatch_Release(disp);
117     if(FAILED(hres)) {
118         WARN("Invoke(DISPID_READYSTATE failed: %08x\n", hres);
119         return hres;
120     }
121
122     if(V_VT(&var) != VT_I4) {
123         WARN("V_VT(var) = %d\n", V_VT(&var));
124         VariantClear(&var);
125         return E_FAIL;
126     }
127
128     *ret = V_I4(&var);
129     return S_OK;
130 }
131
132 static void advise_prop_notif(DocHost *This, BOOL set)
133 {
134     IConnectionPointContainer *cp_container;
135     IConnectionPoint *cp;
136     HRESULT hres;
137
138     hres = IUnknown_QueryInterface(This->document, &IID_IConnectionPointContainer, (void**)&cp_container);
139     if(FAILED(hres))
140         return;
141
142     hres = IConnectionPointContainer_FindConnectionPoint(cp_container, &IID_IPropertyNotifySink, &cp);
143     IConnectionPointContainer_Release(cp_container);
144     if(FAILED(hres))
145         return;
146
147     if(set)
148         hres = IConnectionPoint_Advise(cp, (IUnknown*)PROPNOTIF(This), &This->prop_notif_cookie);
149     else
150         hres = IConnectionPoint_Unadvise(cp, This->prop_notif_cookie);
151     IConnectionPoint_Release(cp);
152
153     if(SUCCEEDED(hres))
154         This->is_prop_notif = set;
155 }
156
157 static void update_ready_state(DocHost *This, READYSTATE ready_state)
158 {
159     if(ready_state > READYSTATE_LOADING && This->ready_state <= READYSTATE_LOADING) {
160         notif_complete(This, DISPID_NAVIGATECOMPLETE2);
161         This->ready_state = ready_state;
162     }
163
164     if(ready_state == READYSTATE_COMPLETE && This->ready_state < READYSTATE_COMPLETE) {
165         This->ready_state = READYSTATE_COMPLETE;
166         notif_complete(This, DISPID_DOCUMENTCOMPLETE);
167     }
168 }
169
170 typedef struct {
171     task_header_t header;
172     IUnknown *doc;
173     READYSTATE ready_state;
174 } ready_state_task_t;
175
176 static void ready_state_proc(DocHost *This, task_header_t *_task)
177 {
178     ready_state_task_t *task = (ready_state_task_t*)_task;
179
180     if(task->doc == This->document)
181         update_ready_state(This, task->ready_state);
182
183     IUnknown_Release(task->doc);
184 }
185
186 static void push_ready_state_task(DocHost *This, READYSTATE ready_state)
187 {
188     ready_state_task_t *task = heap_alloc(sizeof(ready_state_task_t));
189
190     IUnknown_AddRef(This->document);
191     task->doc = This->document;
192     task->ready_state = ready_state;
193
194     push_dochost_task(This, &task->header, ready_state_proc, FALSE);
195 }
196
197 static void object_available_proc(DocHost *This, task_header_t *task)
198 {
199     object_available(This);
200 }
201
202 HRESULT dochost_object_available(DocHost *This, IUnknown *doc)
203 {
204     READYSTATE ready_state;
205     task_header_t *task;
206     IOleObject *oleobj;
207     HRESULT hres;
208
209     IUnknown_AddRef(doc);
210     This->document = doc;
211
212     hres = IUnknown_QueryInterface(doc, &IID_IOleObject, (void**)&oleobj);
213     if(SUCCEEDED(hres)) {
214         CLSID clsid;
215
216         hres = IOleObject_GetUserClassID(oleobj, &clsid);
217         if(SUCCEEDED(hres))
218             TRACE("Got clsid %s\n",
219                   IsEqualGUID(&clsid, &CLSID_HTMLDocument) ? "CLSID_HTMLDocument" : debugstr_guid(&clsid));
220
221         hres = IOleObject_SetClientSite(oleobj, CLIENTSITE(This));
222         if(FAILED(hres))
223             FIXME("SetClientSite failed: %08x\n", hres);
224
225         IOleObject_Release(oleobj);
226     }else {
227         FIXME("Could not get IOleObject iface: %08x\n", hres);
228     }
229
230     /* FIXME: Call SetAdvise */
231
232     task = heap_alloc(sizeof(*task));
233     push_dochost_task(This, task, object_available_proc, FALSE);
234
235     hres = get_doc_ready_state(This, &ready_state);
236     if(SUCCEEDED(hres)) {
237         if(ready_state == READYSTATE_COMPLETE)
238             push_ready_state_task(This, READYSTATE_COMPLETE);
239         else
240             advise_prop_notif(This, TRUE);
241     }
242
243     return S_OK;
244 }
245
246 static LRESULT resize_document(DocHost *This, LONG width, LONG height)
247 {
248     RECT rect = {0, 0, width, height};
249
250     TRACE("(%p)->(%d %d)\n", This, width, height);
251
252     if(This->view)
253         IOleDocumentView_SetRect(This->view, &rect);
254
255     return 0;
256 }
257
258 static LRESULT WINAPI doc_view_proc(HWND hwnd, UINT msg, WPARAM wParam, LPARAM lParam)
259 {
260     DocHost *This;
261
262     static const WCHAR wszTHIS[] = {'T','H','I','S',0};
263
264     if(msg == WM_CREATE) {
265         This = *(DocHost**)lParam;
266         SetPropW(hwnd, wszTHIS, This);
267     }else {
268         This = GetPropW(hwnd, wszTHIS);
269     }
270
271     switch(msg) {
272     case WM_SIZE:
273         return resize_document(This, LOWORD(lParam), HIWORD(lParam));
274     }
275
276     return DefWindowProcW(hwnd, msg, wParam, lParam);
277 }
278
279 void create_doc_view_hwnd(DocHost *This)
280 {
281     RECT rect;
282
283     static const WCHAR wszShell_DocObject_View[] =
284         {'S','h','e','l','l',' ','D','o','c','O','b','j','e','c','t',' ','V','i','e','w',0};
285
286     if(!doc_view_atom) {
287         static WNDCLASSEXW wndclass = {
288             sizeof(wndclass),
289             CS_PARENTDC,
290             doc_view_proc,
291             0, 0 /* native uses 4*/, NULL, NULL, NULL,
292             (HBRUSH)(COLOR_WINDOW + 1), NULL,
293             wszShell_DocObject_View,
294             NULL
295         };
296
297         wndclass.hInstance = shdocvw_hinstance;
298
299         doc_view_atom = RegisterClassExW(&wndclass);
300     }
301
302     GetClientRect(This->frame_hwnd, &rect); /* FIXME */
303     This->hwnd = CreateWindowExW(0, wszShell_DocObject_View,
304          wszShell_DocObject_View,
305          WS_CHILD | WS_VISIBLE | WS_CLIPSIBLINGS | WS_CLIPCHILDREN | WS_TABSTOP,
306          rect.left, rect.top, rect.right, rect.bottom, This->frame_hwnd,
307          NULL, shdocvw_hinstance, This);
308 }
309
310 void deactivate_document(DocHost *This)
311 {
312     IOleInPlaceObjectWindowless *winobj;
313     IOleObject *oleobj = NULL;
314     IHlinkTarget *hlink = NULL;
315     HRESULT hres;
316
317     if(This->is_prop_notif)
318         advise_prop_notif(This, FALSE);
319
320     if(This->view)
321         IOleDocumentView_UIActivate(This->view, FALSE);
322
323     hres = IUnknown_QueryInterface(This->document, &IID_IOleInPlaceObjectWindowless,
324                                    (void**)&winobj);
325     if(SUCCEEDED(hres)) {
326         IOleInPlaceObjectWindowless_InPlaceDeactivate(winobj);
327         IOleInPlaceObjectWindowless_Release(winobj);
328     }
329
330     if(This->view) {
331         IOleDocumentView_Show(This->view, FALSE);
332         IOleDocumentView_CloseView(This->view, 0);
333         IOleDocumentView_SetInPlaceSite(This->view, NULL);
334         IOleDocumentView_Release(This->view);
335         This->view = NULL;
336     }
337
338     hres = IUnknown_QueryInterface(This->document, &IID_IOleObject, (void**)&oleobj);
339     if(SUCCEEDED(hres))
340         IOleObject_Close(oleobj, OLECLOSE_NOSAVE);
341
342     hres = IUnknown_QueryInterface(This->document, &IID_IHlinkTarget, (void**)&hlink);
343     if(SUCCEEDED(hres)) {
344         IHlinkTarget_SetBrowseContext(hlink, NULL);
345         IHlinkTarget_Release(hlink);
346     }
347
348     if(oleobj) {
349         IOleClientSite *client_site = NULL;
350
351         IOleObject_GetClientSite(oleobj, &client_site);
352         if(client_site) {
353             if(client_site == CLIENTSITE(This))
354                 IOleObject_SetClientSite(oleobj, NULL);
355             IOleClientSite_Release(client_site);
356         }
357
358         IOleObject_Release(oleobj);
359     }
360
361     IUnknown_Release(This->document);
362     This->document = NULL;
363 }
364
365 #define OLECMD_THIS(iface) DEFINE_THIS(DocHost, OleCommandTarget, iface)
366
367 static HRESULT WINAPI ClOleCommandTarget_QueryInterface(IOleCommandTarget *iface,
368         REFIID riid, void **ppv)
369 {
370     DocHost *This = OLECMD_THIS(iface);
371     return IOleClientSite_QueryInterface(CLIENTSITE(This), riid, ppv);
372 }
373
374 static ULONG WINAPI ClOleCommandTarget_AddRef(IOleCommandTarget *iface)
375 {
376     DocHost *This = OLECMD_THIS(iface);
377     return IOleClientSite_AddRef(CLIENTSITE(This));
378 }
379
380 static ULONG WINAPI ClOleCommandTarget_Release(IOleCommandTarget *iface)
381 {
382     DocHost *This = OLECMD_THIS(iface);
383     return IOleClientSite_Release(CLIENTSITE(This));
384 }
385
386 static HRESULT WINAPI ClOleCommandTarget_QueryStatus(IOleCommandTarget *iface,
387         const GUID *pguidCmdGroup, ULONG cCmds, OLECMD prgCmds[], OLECMDTEXT *pCmdText)
388 {
389     DocHost *This = OLECMD_THIS(iface);
390     FIXME("(%p)->(%s %u %p %p)\n", This, debugstr_guid(pguidCmdGroup), cCmds, prgCmds,
391           pCmdText);
392     return E_NOTIMPL;
393 }
394
395 static HRESULT WINAPI ClOleCommandTarget_Exec(IOleCommandTarget *iface,
396         const GUID *pguidCmdGroup, DWORD nCmdID, DWORD nCmdexecopt, VARIANT *pvaIn,
397         VARIANT *pvaOut)
398 {
399     DocHost *This = OLECMD_THIS(iface);
400     FIXME("(%p)->(%s %d %d %p %p)\n", This, debugstr_guid(pguidCmdGroup), nCmdID,
401           nCmdexecopt, pvaIn, pvaOut);
402     return E_NOTIMPL;
403 }
404
405 #undef OLECMD_THIS
406
407 static const IOleCommandTargetVtbl OleCommandTargetVtbl = {
408     ClOleCommandTarget_QueryInterface,
409     ClOleCommandTarget_AddRef,
410     ClOleCommandTarget_Release,
411     ClOleCommandTarget_QueryStatus,
412     ClOleCommandTarget_Exec
413 };
414
415 #define DOCHOSTUI_THIS(iface) DEFINE_THIS(DocHost, DocHostUIHandler, iface)
416
417 static HRESULT WINAPI DocHostUIHandler_QueryInterface(IDocHostUIHandler2 *iface,
418                                                       REFIID riid, void **ppv)
419 {
420     DocHost *This = DOCHOSTUI_THIS(iface);
421     return IOleClientSite_QueryInterface(CLIENTSITE(This), riid, ppv);
422 }
423
424 static ULONG WINAPI DocHostUIHandler_AddRef(IDocHostUIHandler2 *iface)
425 {
426     DocHost *This = DOCHOSTUI_THIS(iface);
427     return IOleClientSite_AddRef(CLIENTSITE(This));
428 }
429
430 static ULONG WINAPI DocHostUIHandler_Release(IDocHostUIHandler2 *iface)
431 {
432     DocHost *This = DOCHOSTUI_THIS(iface);
433     return IOleClientSite_Release(CLIENTSITE(This));
434 }
435
436 static HRESULT WINAPI DocHostUIHandler_ShowContextMenu(IDocHostUIHandler2 *iface,
437          DWORD dwID, POINT *ppt, IUnknown *pcmdtReserved, IDispatch *pdispReserved)
438 {
439     DocHost *This = DOCHOSTUI_THIS(iface);
440     HRESULT hres;
441
442     TRACE("(%p)->(%d %p %p %p)\n", This, dwID, ppt, pcmdtReserved, pdispReserved);
443
444     if(This->hostui) {
445         hres = IDocHostUIHandler_ShowContextMenu(This->hostui, dwID, ppt, pcmdtReserved,
446                                                  pdispReserved);
447         if(hres == S_OK)
448             return S_OK;
449     }
450
451     FIXME("default action not implemented\n");
452     return E_NOTIMPL;
453 }
454
455 static HRESULT WINAPI DocHostUIHandler_GetHostInfo(IDocHostUIHandler2 *iface,
456         DOCHOSTUIINFO *pInfo)
457 {
458     DocHost *This = DOCHOSTUI_THIS(iface);
459     HRESULT hres;
460
461     TRACE("(%p)->(%p)\n", This, pInfo);
462
463     if(This->hostui) {
464         hres = IDocHostUIHandler_GetHostInfo(This->hostui, pInfo);
465         if(SUCCEEDED(hres))
466             return hres;
467     }
468
469     pInfo->dwFlags = DOCHOSTUIFLAG_DISABLE_HELP_MENU | DOCHOSTUIFLAG_OPENNEWWIN
470         | DOCHOSTUIFLAG_URL_ENCODING_ENABLE_UTF8 | DOCHOSTUIFLAG_ENABLE_INPLACE_NAVIGATION
471         | DOCHOSTUIFLAG_IME_ENABLE_RECONVERSION;
472     return S_OK;
473 }
474
475 static HRESULT WINAPI DocHostUIHandler_ShowUI(IDocHostUIHandler2 *iface, DWORD dwID,
476         IOleInPlaceActiveObject *pActiveObject, IOleCommandTarget *pCommandTarget,
477         IOleInPlaceFrame *pFrame, IOleInPlaceUIWindow *pDoc)
478 {
479     DocHost *This = DOCHOSTUI_THIS(iface);
480     FIXME("(%p)->(%d %p %p %p %p)\n", This, dwID, pActiveObject, pCommandTarget,
481           pFrame, pDoc);
482     return E_NOTIMPL;
483 }
484
485 static HRESULT WINAPI DocHostUIHandler_HideUI(IDocHostUIHandler2 *iface)
486 {
487     DocHost *This = DOCHOSTUI_THIS(iface);
488     FIXME("(%p)\n", This);
489     return E_NOTIMPL;
490 }
491
492 static HRESULT WINAPI DocHostUIHandler_UpdateUI(IDocHostUIHandler2 *iface)
493 {
494     DocHost *This = DOCHOSTUI_THIS(iface);
495
496     TRACE("(%p)\n", This);
497
498     if(!This->hostui)
499         return S_FALSE;
500
501     return IDocHostUIHandler_UpdateUI(This->hostui);
502 }
503
504 static HRESULT WINAPI DocHostUIHandler_EnableModeless(IDocHostUIHandler2 *iface,
505                                                       BOOL fEnable)
506 {
507     DocHost *This = DOCHOSTUI_THIS(iface);
508     FIXME("(%p)->(%x)\n", This, fEnable);
509     return E_NOTIMPL;
510 }
511
512 static HRESULT WINAPI DocHostUIHandler_OnDocWindowActivate(IDocHostUIHandler2 *iface,
513                                                            BOOL fActivate)
514 {
515     DocHost *This = DOCHOSTUI_THIS(iface);
516     FIXME("(%p)->(%x)\n", This, fActivate);
517     return E_NOTIMPL;
518 }
519
520 static HRESULT WINAPI DocHostUIHandler_OnFrameWindowActivate(IDocHostUIHandler2 *iface,
521                                                              BOOL fActivate)
522 {
523     DocHost *This = DOCHOSTUI_THIS(iface);
524     FIXME("(%p)->(%x)\n", This, fActivate);
525     return E_NOTIMPL;
526 }
527
528 static HRESULT WINAPI DocHostUIHandler_ResizeBorder(IDocHostUIHandler2 *iface,
529         LPCRECT prcBorder, IOleInPlaceUIWindow *pUIWindow, BOOL fRameWindow)
530 {
531     DocHost *This = DOCHOSTUI_THIS(iface);
532     FIXME("(%p)->(%p %p %X)\n", This, prcBorder, pUIWindow, fRameWindow);
533     return E_NOTIMPL;
534 }
535
536 static HRESULT WINAPI DocHostUIHandler_TranslateAccelerator(IDocHostUIHandler2 *iface,
537         LPMSG lpMsg, const GUID *pguidCmdGroup, DWORD nCmdID)
538 {
539     DocHost *This = DOCHOSTUI_THIS(iface);
540     FIXME("(%p)->(%p %p %d)\n", This, lpMsg, pguidCmdGroup, nCmdID);
541     return E_NOTIMPL;
542 }
543
544 static HRESULT WINAPI DocHostUIHandler_GetOptionKeyPath(IDocHostUIHandler2 *iface,
545         LPOLESTR *pchKey, DWORD dw)
546 {
547     DocHost *This = DOCHOSTUI_THIS(iface);
548
549     TRACE("(%p)->(%p %d)\n", This, pchKey, dw);
550
551     if(This->hostui)
552         return IDocHostUIHandler_GetOptionKeyPath(This->hostui, pchKey, dw);
553
554     return S_OK;
555 }
556
557 static HRESULT WINAPI DocHostUIHandler_GetDropTarget(IDocHostUIHandler2 *iface,
558         IDropTarget *pDropTarget, IDropTarget **ppDropTarget)
559 {
560     DocHost *This = DOCHOSTUI_THIS(iface);
561     FIXME("(%p)\n", This);
562     return E_NOTIMPL;
563 }
564
565 static HRESULT WINAPI DocHostUIHandler_GetExternal(IDocHostUIHandler2 *iface,
566         IDispatch **ppDispatch)
567 {
568     DocHost *This = DOCHOSTUI_THIS(iface);
569
570     TRACE("(%p)->(%p)\n", This, ppDispatch);
571
572     if(This->hostui)
573         return IDocHostUIHandler_GetExternal(This->hostui, ppDispatch);
574
575     FIXME("default action not implemented\n");
576     return E_NOTIMPL;
577 }
578
579 static HRESULT WINAPI DocHostUIHandler_TranslateUrl(IDocHostUIHandler2 *iface,
580         DWORD dwTranslate, OLECHAR *pchURLIn, OLECHAR **ppchURLOut)
581 {
582     DocHost *This = DOCHOSTUI_THIS(iface);
583
584     TRACE("(%p)->(%d %s %p)\n", This, dwTranslate, debugstr_w(pchURLIn), ppchURLOut);
585
586     if(This->hostui)
587         return IDocHostUIHandler_TranslateUrl(This->hostui, dwTranslate,
588                                               pchURLIn, ppchURLOut);
589
590     return S_FALSE;
591 }
592
593 static HRESULT WINAPI DocHostUIHandler_FilterDataObject(IDocHostUIHandler2 *iface,
594         IDataObject *pDO, IDataObject **ppDORet)
595 {
596     DocHost *This = DOCHOSTUI_THIS(iface);
597     FIXME("(%p)->(%p %p)\n", This, pDO, ppDORet);
598     return E_NOTIMPL;
599 }
600
601 static HRESULT WINAPI DocHostUIHandler_GetOverrideKeyPath(IDocHostUIHandler2 *iface,
602         LPOLESTR *pchKey, DWORD dw)
603 {
604     DocHost *This = DOCHOSTUI_THIS(iface);
605     IDocHostUIHandler2 *handler;
606     HRESULT hres;
607
608     TRACE("(%p)->(%p %d)\n", This, pchKey, dw);
609
610     if(!This->hostui)
611         return S_OK;
612
613     hres = IDocHostUIHandler_QueryInterface(This->hostui, &IID_IDocHostUIHandler2,
614                                             (void**)&handler);
615     if(SUCCEEDED(hres)) {
616         hres = IDocHostUIHandler2_GetOverrideKeyPath(handler, pchKey, dw);
617         IDocHostUIHandler2_Release(handler);
618         return hres;
619     }
620
621     return S_OK;
622 }
623
624 #undef DOCHOSTUI_THIS
625
626 static const IDocHostUIHandler2Vtbl DocHostUIHandler2Vtbl = {
627     DocHostUIHandler_QueryInterface,
628     DocHostUIHandler_AddRef,
629     DocHostUIHandler_Release,
630     DocHostUIHandler_ShowContextMenu,
631     DocHostUIHandler_GetHostInfo,
632     DocHostUIHandler_ShowUI,
633     DocHostUIHandler_HideUI,
634     DocHostUIHandler_UpdateUI,
635     DocHostUIHandler_EnableModeless,
636     DocHostUIHandler_OnDocWindowActivate,
637     DocHostUIHandler_OnFrameWindowActivate,
638     DocHostUIHandler_ResizeBorder,
639     DocHostUIHandler_TranslateAccelerator,
640     DocHostUIHandler_GetOptionKeyPath,
641     DocHostUIHandler_GetDropTarget,
642     DocHostUIHandler_GetExternal,
643     DocHostUIHandler_TranslateUrl,
644     DocHostUIHandler_FilterDataObject,
645     DocHostUIHandler_GetOverrideKeyPath
646 };
647
648 #define PROPNOTIF_THIS(iface) DEFINE_THIS(DocHost, IPropertyNotifySink, iface)
649
650 static HRESULT WINAPI PropertyNotifySink_QueryInterface(IPropertyNotifySink *iface,
651         REFIID riid, void **ppv)
652 {
653     DocHost *This = PROPNOTIF_THIS(iface);
654     return IOleClientSite_QueryInterface(CLIENTSITE(This), riid, ppv);
655 }
656
657 static ULONG WINAPI PropertyNotifySink_AddRef(IPropertyNotifySink *iface)
658 {
659     DocHost *This = PROPNOTIF_THIS(iface);
660     return IOleClientSite_AddRef(CLIENTSITE(This));
661 }
662
663 static ULONG WINAPI PropertyNotifySink_Release(IPropertyNotifySink *iface)
664 {
665     DocHost *This = PROPNOTIF_THIS(iface);
666     return IOleClientSite_Release(CLIENTSITE(This));
667 }
668
669 static HRESULT WINAPI PropertyNotifySink_OnChanged(IPropertyNotifySink *iface, DISPID dispID)
670 {
671     DocHost *This = PROPNOTIF_THIS(iface);
672
673     TRACE("(%p)->(%d)\n", This, dispID);
674
675     switch(dispID) {
676     case DISPID_READYSTATE: {
677         READYSTATE ready_state;
678         HRESULT hres;
679
680         hres = get_doc_ready_state(This, &ready_state);
681         if(FAILED(hres))
682             return hres;
683
684         if(ready_state == READYSTATE_COMPLETE)
685             advise_prop_notif(This, FALSE);
686
687         push_ready_state_task(This, ready_state);
688         break;
689     }
690     default:
691         FIXME("unimplemented dispid %d\n", dispID);
692         return E_NOTIMPL;
693     }
694
695     return S_OK;
696 }
697
698 static HRESULT WINAPI PropertyNotifySink_OnRequestEdit(IPropertyNotifySink *iface, DISPID dispID)
699 {
700     DocHost *This = PROPNOTIF_THIS(iface);
701     FIXME("(%p)->(%d)\n", This, dispID);
702     return E_NOTIMPL;
703 }
704
705 #undef PROPNOTIF_THIS
706
707 static const IPropertyNotifySinkVtbl PropertyNotifySinkVtbl = {
708     PropertyNotifySink_QueryInterface,
709     PropertyNotifySink_AddRef,
710     PropertyNotifySink_Release,
711     PropertyNotifySink_OnChanged,
712     PropertyNotifySink_OnRequestEdit
713 };
714
715 void DocHost_Init(DocHost *This, IDispatch *disp)
716 {
717     This->lpDocHostUIHandlerVtbl = &DocHostUIHandler2Vtbl;
718     This->lpOleCommandTargetVtbl = &OleCommandTargetVtbl;
719     This->lpIPropertyNotifySinkVtbl = &PropertyNotifySinkVtbl;
720
721     This->disp = disp;
722
723     This->client_disp = NULL;
724
725     This->document = NULL;
726     This->hostui = NULL;
727     This->frame = NULL;
728
729     This->hwnd = NULL;
730     This->frame_hwnd = NULL;
731     This->url = NULL;
732
733     This->silent = VARIANT_FALSE;
734     This->offline = VARIANT_FALSE;
735
736     This->ready_state = READYSTATE_UNINITIALIZED;
737     This->is_prop_notif = FALSE;
738
739     DocHost_ClientSite_Init(This);
740     DocHost_Frame_Init(This);
741
742     ConnectionPointContainer_Init(&This->cps, (IUnknown*)disp);
743 }
744
745 void DocHost_Release(DocHost *This)
746 {
747     if(This->client_disp)
748         IDispatch_Release(This->client_disp);
749     if(This->frame)
750         IOleInPlaceFrame_Release(This->frame);
751
752     DocHost_ClientSite_Release(This);
753
754     ConnectionPointContainer_Destroy(&This->cps);
755
756     SysFreeString(This->url);
757 }