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