reactos/dll/win32/mshtml/view.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 "config.h"
  20
  21 #include <stdarg.h>
  22 #include <stdio.h>
  23
  24 #define COBJMACROS
  25
  26 #include "windef.h"
  27 #include "winbase.h"
  28 #include "winuser.h"
  29 #include "commctrl.h"
  30 #include "ole2.h"
  31 #include "resource.h"
  32
  33 #include "wine/debug.h"
  34
  35 #include "mshtml_private.h"
  36
  37 WINE_DEFAULT_DEBUG_CHANNEL(mshtml);
  38
  39 #define TIMER_ID 0x1000
  40
  41 static const WCHAR wszInternetExplorer_Server[] =
  42     {'I','n','t','e','r','n','e','t',' ','E','x','p','l','o','r','e','r','_','S','e','r','v','e','r',0};
  43
  44 static const WCHAR wszTooltipData[] = {'t','o','o','l','t','i','p','_','d','a','t','a',0};
  45
  46 static ATOM serverwnd_class = 0;
  47
  48 typedef struct {
  49     HTMLDocumentObj *doc;
  50     WNDPROC proc;
  51 } tooltip_data;
  52
  53 static void paint_document(HTMLDocumentObj *This)
  54 {
  55     PAINTSTRUCT ps;
  56     RECT rect;
  57     HDC hdc;
  58
  59     GetClientRect(This->hwnd, &rect);
  60
  61     hdc = BeginPaint(This->hwnd, &ps);
  62
  63     if(!(This->hostinfo.dwFlags & (DOCHOSTUIFLAG_NO3DOUTERBORDER|DOCHOSTUIFLAG_NO3DBORDER)))
  64         DrawEdge(hdc, &rect, EDGE_SUNKEN, BF_RECT|BF_ADJUST);
  65
  66     if(!This->nscontainer) {
  67         WCHAR wszHTMLDisabled[100];
  68         HFONT font;
  69
  70         LoadStringW(hInst, IDS_HTMLDISABLED, wszHTMLDisabled, sizeof(wszHTMLDisabled)/sizeof(WCHAR));
  71
  72         font = CreateFontA(25,0,0,0,400,0,0,0,ANSI_CHARSET,0,0,DEFAULT_QUALITY,DEFAULT_PITCH,NULL);
  73
  74         SelectObject(hdc, font);
  75         SelectObject(hdc, GetSysColorBrush(COLOR_WINDOW));
  76
  77         Rectangle(hdc, rect.left, rect.top, rect.right, rect.bottom);
  78         DrawTextW(hdc, wszHTMLDisabled,-1, &rect, DT_CENTER | DT_SINGLELINE | DT_VCENTER);
  79
  80         DeleteObject(font);
  81     }
  82
  83     EndPaint(This->hwnd, &ps);
  84 }
  85
  86 static void activate_gecko(NSContainer *This)
  87 {
  88     TRACE("(%p) %p\n", This, This->window);
  89
  90     SetParent(This->hwnd, This->doc->hwnd);
  91     ShowWindow(This->hwnd, SW_SHOW);
  92
  93     nsIBaseWindow_SetVisibility(This->window, TRUE);
  94     nsIBaseWindow_SetEnabled(This->window, TRUE);
  95     nsIWebBrowserFocus_Activate(This->focus);
  96 }
  97
  98 void update_doc(HTMLDocument *This, DWORD flags)
  99 {
 100     if(!This->doc_obj->update && This->doc_obj->hwnd)
 101         SetTimer(This->doc_obj->hwnd, TIMER_ID, 100, NULL);
 102
 103     This->doc_obj->update |= flags;
 104 }
 105
 106 void update_title(HTMLDocumentObj *This)
 107 {
 108     IOleCommandTarget *olecmd;
 109     HRESULT hres;
 110
 111     if(!(This->update & UPDATE_TITLE))
 112         return;
 113
 114     This->update &= ~UPDATE_TITLE;
 115
 116     if(!This->client)
 117         return;
 118
 119     hres = IOleClientSite_QueryInterface(This->client, &IID_IOleCommandTarget, (void**)&olecmd);
 120     if(SUCCEEDED(hres)) {
 121         VARIANT title;
 122         WCHAR empty[] = {0};
 123
 124         V_VT(&title) = VT_BSTR;
 125         V_BSTR(&title) = SysAllocString(empty);
 126         IOleCommandTarget_Exec(olecmd, NULL, OLECMDID_SETTITLE, OLECMDEXECOPT_DONTPROMPTUSER,
 127                                &title, NULL);
 128         SysFreeString(V_BSTR(&title));
 129
 130         IOleCommandTarget_Release(olecmd);
 131     }
 132 }
 133
 134 static LRESULT on_timer(HTMLDocumentObj *This)
 135 {
 136     TRACE("(%p) %x\n", This, This->update);
 137
 138     KillTimer(This->hwnd, TIMER_ID);
 139
 140     if(!This->update)
 141         return 0;
 142
 143     if(This->update & UPDATE_UI) {
 144         if(This->hostui)
 145             IDocHostUIHandler_UpdateUI(This->hostui);
 146
 147         if(This->client) {
 148             IOleCommandTarget *cmdtrg;
 149             HRESULT hres;
 150
 151             hres = IOleClientSite_QueryInterface(This->client, &IID_IOleCommandTarget,
 152                                                  (void**)&cmdtrg);
 153             if(SUCCEEDED(hres)) {
 154                 IOleCommandTarget_Exec(cmdtrg, NULL, OLECMDID_UPDATECOMMANDS,
 155                                        OLECMDEXECOPT_DONTPROMPTUSER, NULL, NULL);
 156                 IOleCommandTarget_Release(cmdtrg);
 157             }
 158         }
 159     }
 160
 161     update_title(This);
 162     This->update = 0;
 163     return 0;
 164 }
 165
 166 void notif_focus(HTMLDocumentObj *This)
 167 {
 168     IOleControlSite *site;
 169     HRESULT hres;
 170
 171     if(!This->client)
 172         return;
 173
 174     hres = IOleClientSite_QueryInterface(This->client, &IID_IOleControlSite, (void**)&site);
 175     if(FAILED(hres))
 176         return;
 177
 178     IOleControlSite_OnFocus(site, This->focus);
 179     IOleControlSite_Release(site);
 180 }
 181
 182 static LRESULT WINAPI serverwnd_proc(HWND hwnd, UINT msg, WPARAM wParam, LPARAM lParam)
 183 {
 184     HTMLDocumentObj *This;
 185
 186     static const WCHAR wszTHIS[] = {'T','H','I','S',0};
 187
 188     if(msg == WM_CREATE) {
 189         This = *(HTMLDocumentObj**)lParam;
 190         SetPropW(hwnd, wszTHIS, This);
 191     }else {
 192         This = GetPropW(hwnd, wszTHIS);
 193     }
 194
 195     switch(msg) {
 196     case WM_CREATE:
 197         This->hwnd = hwnd;
 198         break;
 199     case WM_PAINT:
 200         paint_document(This);
 201         break;
 202     case WM_SIZE:
 203         TRACE("(%p)->(WM_SIZE)\n", This);
 204         if(This->nscontainer) {
 205             INT ew=0, eh=0;
 206
 207             if(!(This->hostinfo.dwFlags & (DOCHOSTUIFLAG_NO3DOUTERBORDER|DOCHOSTUIFLAG_NO3DBORDER))) {
 208                 ew = GetSystemMetrics(SM_CXEDGE);
 209                 eh = GetSystemMetrics(SM_CYEDGE);
 210             }
 211
 212             SetWindowPos(This->nscontainer->hwnd, NULL, ew, eh,
 213                          LOWORD(lParam) - 2*ew, HIWORD(lParam) - 2*eh,
 214                          SWP_NOZORDER | SWP_NOACTIVATE);
 215         }
 216         break;
 217     case WM_TIMER:
 218         return on_timer(This);
 219     case WM_MOUSEACTIVATE:
 220         return MA_ACTIVATE;
 221     }
 222
 223     return DefWindowProcW(hwnd, msg, wParam, lParam);
 224 }
 225
 226 static void register_serverwnd_class(void)
 227 {
 228     static WNDCLASSEXW wndclass = {
 229         sizeof(WNDCLASSEXW),
 230         CS_DBLCLKS,
 231         serverwnd_proc,
 232         0, 0, NULL, NULL, NULL, NULL, NULL,
 233         wszInternetExplorer_Server,
 234         NULL,
 235     };
 236     wndclass.hInstance = hInst;
 237     serverwnd_class = RegisterClassExW(&wndclass);
 238 }
 239
 240 static HRESULT activate_window(HTMLDocumentObj *This)
 241 {
 242     IOleInPlaceFrame *pIPFrame;
 243     IOleCommandTarget *cmdtrg;
 244     IOleInPlaceSiteEx *ipsiteex;
 245     RECT posrect, cliprect;
 246     OLEINPLACEFRAMEINFO frameinfo;
 247     HWND parent_hwnd;
 248     HRESULT hres;
 249
 250     if(!serverwnd_class)
 251         register_serverwnd_class();
 252
 253     hres = IOleInPlaceSite_CanInPlaceActivate(This->ipsite);
 254     if(hres != S_OK) {
 255         WARN("CanInPlaceActivate returned: %08x\n", hres);
 256         return FAILED(hres) ? hres : E_FAIL;
 257     }
 258
 259     hres = IOleInPlaceSite_GetWindowContext(This->ipsite, &pIPFrame, &This->ip_window,
 260             &posrect, &cliprect, &frameinfo);
 261     if(FAILED(hres)) {
 262         WARN("GetWindowContext failed: %08x\n", hres);
 263         return hres;
 264     }
 265
 266     TRACE("got window context: %p %p {%d %d %d %d} {%d %d %d %d} {%d %x %p %p %d}\n",
 267             pIPFrame, This->ip_window, posrect.left, posrect.top, posrect.right, posrect.bottom,
 268             cliprect.left, cliprect.top, cliprect.right, cliprect.bottom,
 269             frameinfo.cb, frameinfo.fMDIApp, frameinfo.hwndFrame, frameinfo.haccel, frameinfo.cAccelEntries);
 270
 271     hres = IOleInPlaceSite_GetWindow(This->ipsite, &parent_hwnd);
 272     if(FAILED(hres)) {
 273         WARN("GetWindow failed: %08x\n", hres);
 274         return hres;
 275     }
 276
 277     TRACE("got parent window %p\n", parent_hwnd);
 278
 279     if(This->hwnd) {
 280         if(GetParent(This->hwnd) != parent_hwnd)
 281             SetParent(This->hwnd, parent_hwnd);
 282         SetWindowPos(This->hwnd, HWND_TOP,
 283                 posrect.left, posrect.top, posrect.right-posrect.left, posrect.bottom-posrect.top,
 284                 SWP_NOACTIVATE | SWP_SHOWWINDOW);
 285     }else {
 286         CreateWindowExW(0, wszInternetExplorer_Server, NULL,
 287                 WS_CHILD | WS_CLIPSIBLINGS | WS_CLIPCHILDREN,
 288                 posrect.left, posrect.top, posrect.right-posrect.left, posrect.bottom-posrect.top,
 289                 parent_hwnd, NULL, hInst, This);
 290
 291         TRACE("Created window %p\n", This->hwnd);
 292
 293         SetWindowPos(This->hwnd, NULL, 0, 0, 0, 0,
 294                 SWP_NOSIZE | SWP_NOMOVE | SWP_NOZORDER | SWP_NOREDRAW | SWP_NOACTIVATE | SWP_SHOWWINDOW);
 295         RedrawWindow(This->hwnd, NULL, NULL, RDW_INVALIDATE | RDW_NOERASE | RDW_ALLCHILDREN);
 296
 297         /* NOTE:
 298          * Windows implementation calls:
 299          * RegisterWindowMessage("MSWHEEL_ROLLMSG");
 300          */
 301         SetTimer(This->hwnd, TIMER_ID, 100, NULL);
 302     }
 303
 304     if(This->nscontainer)
 305         activate_gecko(This->nscontainer);
 306
 307     This->in_place_active = TRUE;
 308     hres = IOleInPlaceSite_QueryInterface(This->ipsite, &IID_IOleInPlaceSiteEx, (void**)&ipsiteex);
 309     if(SUCCEEDED(hres)) {
 310         BOOL redraw = FALSE;
 311
 312         hres = IOleInPlaceSiteEx_OnInPlaceActivateEx(ipsiteex, &redraw, 0);
 313         IOleInPlaceSiteEx_Release(ipsiteex);
 314         if(redraw)
 315             FIXME("unsupported redraw\n");
 316     }else{
 317         hres = IOleInPlaceSite_OnInPlaceActivate(This->ipsite);
 318     }
 319     if(FAILED(hres)) {
 320         WARN("OnInPlaceActivate failed: %08x\n", hres);
 321         This->in_place_active = FALSE;
 322         return hres;
 323     }
 324
 325     hres = IOleClientSite_QueryInterface(This->client, &IID_IOleCommandTarget, (void**)&cmdtrg);
 326     if(SUCCEEDED(hres)) {
 327         VARIANT var;
 328
 329         IOleInPlaceFrame_SetStatusText(pIPFrame, NULL);
 330
 331         V_VT(&var) = VT_I4;
 332         V_I4(&var) = 0;
 333         IOleCommandTarget_Exec(cmdtrg, NULL, OLECMDID_SETPROGRESSMAX,
 334                 OLECMDEXECOPT_DONTPROMPTUSER, &var, NULL);
 335         IOleCommandTarget_Exec(cmdtrg, NULL, OLECMDID_SETPROGRESSPOS,
 336                 OLECMDEXECOPT_DONTPROMPTUSER, &var, NULL);
 337
 338         IOleCommandTarget_Release(cmdtrg);
 339     }
 340
 341     if(This->frame)
 342         IOleInPlaceFrame_Release(This->frame);
 343     This->frame = pIPFrame;
 344
 345     This->window_active = TRUE;
 346
 347     return S_OK;
 348 }
 349
 350 static LRESULT WINAPI tooltips_proc(HWND hwnd, UINT msg, WPARAM wParam, LPARAM lParam)
 351 {
 352     tooltip_data *data = GetPropW(hwnd, wszTooltipData);
 353
 354     TRACE("%d %p\n", msg, data);
 355
 356     if(msg == TTM_WINDOWFROMPOINT) {
 357         RECT rect;
 358         POINT *pt = (POINT*)lParam;
 359
 360         TRACE("TTM_WINDOWFROMPOINT (%d,%d)\n", pt->x, pt->y);
 361
 362         GetWindowRect(data->doc->hwnd, &rect);
 363
 364         if(rect.left <= pt->x && pt->x <= rect.right
 365            && rect.top <= pt->y && pt->y <= rect.bottom)
 366             return (LPARAM)data->doc->hwnd;
 367     }
 368
 369     return CallWindowProcW(data->proc, hwnd, msg, wParam, lParam);
 370 }
 371
 372 static void create_tooltips_window(HTMLDocumentObj *This)
 373 {
 374     tooltip_data *data = heap_alloc(sizeof(*data));
 375
 376     This->tooltips_hwnd = CreateWindowExW(0, TOOLTIPS_CLASSW, NULL, TTS_NOPREFIX | WS_POPUP,
 377             CW_USEDEFAULT, CW_USEDEFAULT, 10, 10, This->hwnd, NULL, hInst, NULL);
 378
 379     data->doc = This;
 380     data->proc = (WNDPROC)GetWindowLongPtrW(This->tooltips_hwnd, GWLP_WNDPROC);
 381
 382     SetPropW(This->tooltips_hwnd, wszTooltipData, data);
 383
 384     SetWindowLongPtrW(This->tooltips_hwnd, GWLP_WNDPROC, (LONG_PTR)tooltips_proc);
 385
 386     SetWindowPos(This->tooltips_hwnd, HWND_TOPMOST,0, 0, 0, 0,
 387                  SWP_NOMOVE | SWP_NOSIZE | SWP_NOACTIVATE);
 388
 389 }
 390
 391 void show_tooltip(HTMLDocumentObj *This, DWORD x, DWORD y, LPCWSTR text)
 392 {
 393     TTTOOLINFOW toolinfo = {
 394         sizeof(TTTOOLINFOW), 0, This->hwnd, 0xdeadbeef,
 395         {x>2 ? x-2 : 0, y>0 ? y-2 : 0, x+2, y+2}, /* FIXME */
 396         NULL, (LPWSTR)text, 0};
 397     MSG msg = {This->hwnd, WM_MOUSEMOVE, 0, MAKELPARAM(x,y), 0, {x,y}};
 398
 399     TRACE("(%p)->(%d %d %s)\n", This, x, y, debugstr_w(text));
 400
 401     if(!This->tooltips_hwnd)
 402         create_tooltips_window(This);
 403
 404     SendMessageW(This->tooltips_hwnd, TTM_ADDTOOLW, 0, (LPARAM)&toolinfo);
 405     SendMessageW(This->tooltips_hwnd, TTM_ACTIVATE, TRUE, 0);
 406     SendMessageW(This->tooltips_hwnd, TTM_RELAYEVENT, 0, (LPARAM)&msg);
 407 }
 408
 409 void hide_tooltip(HTMLDocumentObj *This)
 410 {
 411     TTTOOLINFOW toolinfo = {
 412         sizeof(TTTOOLINFOW), 0, This->hwnd, 0xdeadbeef,
 413         {0,0,0,0}, NULL, NULL, 0};
 414
 415     TRACE("(%p)\n", This);
 416
 417     SendMessageW(This->tooltips_hwnd, TTM_DELTOOLW, 0, (LPARAM)&toolinfo);
 418     SendMessageW(This->tooltips_hwnd, TTM_ACTIVATE, FALSE, 0);
 419 }
 420
 421 HRESULT call_set_active_object(IOleInPlaceUIWindow *window, IOleInPlaceActiveObject *act_obj)
 422 {
 423     static WCHAR html_documentW[30];
 424
 425     if(act_obj && !html_documentW[0]) {
 426         LoadStringW(hInst, IDS_HTMLDOCUMENT, html_documentW,
 427                     sizeof(html_documentW)/sizeof(WCHAR));
 428     }
 429
 430     return IOleInPlaceFrame_SetActiveObject(window, act_obj, act_obj ? html_documentW : NULL);
 431 }
 432
 433 /**********************************************************
 434  * IOleDocumentView implementation
 435  */
 436
 437 #define DOCVIEW_THIS(iface) DEFINE_THIS(HTMLDocument, OleDocumentView, iface)
 438
 439 static HRESULT WINAPI OleDocumentView_QueryInterface(IOleDocumentView *iface, REFIID riid, void **ppvObject)
 440 {
 441     HTMLDocument *This = DOCVIEW_THIS(iface);
 442     return IHTMLDocument2_QueryInterface(HTMLDOC(This), riid, ppvObject);
 443 }
 444
 445 static ULONG WINAPI OleDocumentView_AddRef(IOleDocumentView *iface)
 446 {
 447     HTMLDocument *This = DOCVIEW_THIS(iface);
 448     return IHTMLDocument2_AddRef(HTMLDOC(This));
 449 }
 450
 451 static ULONG WINAPI OleDocumentView_Release(IOleDocumentView *iface)
 452 {
 453     HTMLDocument *This = DOCVIEW_THIS(iface);
 454     return IHTMLDocument2_Release(HTMLDOC(This));
 455 }
 456
 457 static HRESULT WINAPI OleDocumentView_SetInPlaceSite(IOleDocumentView *iface, IOleInPlaceSite *pIPSite)
 458 {
 459     HTMLDocument *This = DOCVIEW_THIS(iface);
 460     TRACE("(%p)->(%p)\n", This, pIPSite);
 461
 462     if(pIPSite)
 463         IOleInPlaceSite_AddRef(pIPSite);
 464
 465     if(This->doc_obj->ipsite)
 466         IOleInPlaceSite_Release(This->doc_obj->ipsite);
 467
 468     This->doc_obj->ipsite = pIPSite;
 469     return S_OK;
 470 }
 471
 472 static HRESULT WINAPI OleDocumentView_GetInPlaceSite(IOleDocumentView *iface, IOleInPlaceSite **ppIPSite)
 473 {
 474     HTMLDocument *This = DOCVIEW_THIS(iface);
 475     TRACE("(%p)->(%p)\n", This, ppIPSite);
 476
 477     if(!ppIPSite)
 478         return E_INVALIDARG;
 479
 480     if(This->doc_obj->ipsite)
 481         IOleInPlaceSite_AddRef(This->doc_obj->ipsite);
 482
 483     *ppIPSite = This->doc_obj->ipsite;
 484     return S_OK;
 485 }
 486
 487 static HRESULT WINAPI OleDocumentView_GetDocument(IOleDocumentView *iface, IUnknown **ppunk)
 488 {
 489     HTMLDocument *This = DOCVIEW_THIS(iface);
 490     TRACE("(%p)->(%p)\n", This, ppunk);
 491
 492     if(!ppunk)
 493         return E_INVALIDARG;
 494
 495     IHTMLDocument2_AddRef(HTMLDOC(This));
 496     *ppunk = (IUnknown*)HTMLDOC(This);
 497     return S_OK;
 498 }
 499
 500 static HRESULT WINAPI OleDocumentView_SetRect(IOleDocumentView *iface, LPRECT prcView)
 501 {
 502     HTMLDocument *This = DOCVIEW_THIS(iface);
 503     RECT rect;
 504
 505     TRACE("(%p)->(%p)\n", This, prcView);
 506
 507     if(!prcView)
 508         return E_INVALIDARG;
 509
 510     if(This->doc_obj->hwnd) {
 511         GetClientRect(This->doc_obj->hwnd, &rect);
 512         if(memcmp(prcView, &rect, sizeof(RECT))) {
 513             InvalidateRect(This->doc_obj->hwnd, NULL, TRUE);
 514             SetWindowPos(This->doc_obj->hwnd, NULL, prcView->left, prcView->top, prcView->right,
 515                     prcView->bottom, SWP_NOZORDER | SWP_NOACTIVATE);
 516         }
 517     }
 518
 519     return S_OK;
 520 }
 521
 522 static HRESULT WINAPI OleDocumentView_GetRect(IOleDocumentView *iface, LPRECT prcView)
 523 {
 524     HTMLDocument *This = DOCVIEW_THIS(iface);
 525
 526     TRACE("(%p)->(%p)\n", This, prcView);
 527
 528     if(!prcView)
 529         return E_INVALIDARG;
 530
 531     GetClientRect(This->doc_obj->hwnd, prcView);
 532     return S_OK;
 533 }
 534
 535 static HRESULT WINAPI OleDocumentView_SetRectComplex(IOleDocumentView *iface, LPRECT prcView,
 536                         LPRECT prcHScroll, LPRECT prcVScroll, LPRECT prcSizeBox)
 537 {
 538     HTMLDocument *This = DOCVIEW_THIS(iface);
 539     FIXME("(%p)->(%p %p %p %p)\n", This, prcView, prcHScroll, prcVScroll, prcSizeBox);
 540     return E_NOTIMPL;
 541 }
 542
 543 static HRESULT WINAPI OleDocumentView_Show(IOleDocumentView *iface, BOOL fShow)
 544 {
 545     HTMLDocument *This = DOCVIEW_THIS(iface);
 546     HRESULT hres;
 547
 548     TRACE("(%p)->(%x)\n", This, fShow);
 549
 550     if(fShow) {
 551         if(!This->doc_obj->ui_active) {
 552             hres = activate_window(This->doc_obj);
 553             if(FAILED(hres))
 554                 return hres;
 555         }
 556         update_doc(This, UPDATE_UI);
 557         ShowWindow(This->doc_obj->hwnd, SW_SHOW);
 558     }else {
 559         ShowWindow(This->doc_obj->hwnd, SW_HIDE);
 560         if(This->doc_obj->ip_window) {
 561             IOleInPlaceUIWindow_Release(This->doc_obj->ip_window);
 562             This->doc_obj->ip_window = NULL;
 563         }
 564     }
 565
 566     return S_OK;
 567 }
 568
 569 static HRESULT WINAPI OleDocumentView_UIActivate(IOleDocumentView *iface, BOOL fUIActivate)
 570 {
 571     HTMLDocument *This = DOCVIEW_THIS(iface);
 572     HRESULT hres;
 573
 574     TRACE("(%p)->(%x)\n", This, fUIActivate);
 575
 576     if(!This->doc_obj->ipsite) {
 577         FIXME("This->ipsite = NULL\n");
 578         return E_FAIL;
 579     }
 580
 581     if(fUIActivate) {
 582         RECT rcBorderWidths;
 583
 584         if(This->doc_obj->ui_active)
 585             return S_OK;
 586
 587         if(!This->doc_obj->window_active) {
 588             hres = activate_window(This->doc_obj);
 589             if(FAILED(hres))
 590                 return hres;
 591         }
 592
 593         This->doc_obj->focus = TRUE;
 594         if(This->doc_obj->nscontainer)
 595             nsIWebBrowserFocus_Activate(This->doc_obj->nscontainer->focus);
 596         notif_focus(This->doc_obj);
 597
 598         update_doc(This, UPDATE_UI);
 599
 600         hres = IOleInPlaceSite_OnUIActivate(This->doc_obj->ipsite);
 601         if(SUCCEEDED(hres)) {
 602             call_set_active_object((IOleInPlaceUIWindow*)This->doc_obj->frame, ACTOBJ(This));
 603         }else {
 604             FIXME("OnUIActivate failed: %08x\n", hres);
 605             IOleInPlaceFrame_Release(This->doc_obj->frame);
 606             This->doc_obj->frame = NULL;
 607             This->doc_obj->ui_active = FALSE;
 608             return hres;
 609         }
 610
 611         if(This->doc_obj->hostui) {
 612             hres = IDocHostUIHandler_ShowUI(This->doc_obj->hostui,
 613                     This->doc_obj->usermode == EDITMODE ? DOCHOSTUITYPE_AUTHOR : DOCHOSTUITYPE_BROWSE,
 614                     ACTOBJ(This), CMDTARGET(This), This->doc_obj->frame, This->doc_obj->ip_window);
 615             if(FAILED(hres))
 616                 IDocHostUIHandler_HideUI(This->doc_obj->hostui);
 617         }
 618
 619         if(This->doc_obj->ip_window)
 620             call_set_active_object(This->doc_obj->ip_window, ACTOBJ(This));
 621
 622         memset(&rcBorderWidths, 0, sizeof(rcBorderWidths));
 623         IOleInPlaceFrame_SetBorderSpace(This->doc_obj->frame, &rcBorderWidths);
 624
 625         This->doc_obj->ui_active = TRUE;
 626     }else {
 627         if(This->doc_obj->ui_active) {
 628             This->doc_obj->ui_active = FALSE;
 629             if(This->doc_obj->ip_window)
 630                 call_set_active_object(This->doc_obj->ip_window, NULL);
 631             if(This->doc_obj->frame)
 632                 call_set_active_object((IOleInPlaceUIWindow*)This->doc_obj->frame, NULL);
 633             if(This->doc_obj->hostui)
 634                 IDocHostUIHandler_HideUI(This->doc_obj->hostui);
 635             if(This->doc_obj->ipsite)
 636                 IOleInPlaceSite_OnUIDeactivate(This->doc_obj->ipsite, FALSE);
 637         }
 638     }
 639     return S_OK;
 640 }
 641
 642 static HRESULT WINAPI OleDocumentView_Open(IOleDocumentView *iface)
 643 {
 644     HTMLDocument *This = DOCVIEW_THIS(iface);
 645     FIXME("(%p)\n", This);
 646     return E_NOTIMPL;
 647 }
 648
 649 static HRESULT WINAPI OleDocumentView_CloseView(IOleDocumentView *iface, DWORD dwReserved)
 650 {
 651     HTMLDocument *This = DOCVIEW_THIS(iface);
 652     TRACE("(%p)->(%x)\n", This, dwReserved);
 653
 654     if(dwReserved)
 655         WARN("dwReserved = %d\n", dwReserved);
 656
 657     /* NOTE:
 658      * Windows implementation calls QueryInterface(IID_IOleCommandTarget),
 659      * QueryInterface(IID_IOleControlSite) and KillTimer
 660      */
 661
 662     IOleDocumentView_Show(iface, FALSE);
 663
 664     return S_OK;
 665 }
 666
 667 static HRESULT WINAPI OleDocumentView_SaveViewState(IOleDocumentView *iface, LPSTREAM pstm)
 668 {
 669     HTMLDocument *This = DOCVIEW_THIS(iface);
 670     FIXME("(%p)->(%p)\n", This, pstm);
 671     return E_NOTIMPL;
 672 }
 673
 674 static HRESULT WINAPI OleDocumentView_ApplyViewState(IOleDocumentView *iface, LPSTREAM pstm)
 675 {
 676     HTMLDocument *This = DOCVIEW_THIS(iface);
 677     FIXME("(%p)->(%p)\n", This, pstm);
 678     return E_NOTIMPL;
 679 }
 680
 681 static HRESULT WINAPI OleDocumentView_Clone(IOleDocumentView *iface, IOleInPlaceSite *pIPSiteNew,
 682                                         IOleDocumentView **ppViewNew)
 683 {
 684     HTMLDocument *This = DOCVIEW_THIS(iface);
 685     FIXME("(%p)->(%p %p)\n", This, pIPSiteNew, ppViewNew);
 686     return E_NOTIMPL;
 687 }
 688
 689 #undef DOCVIEW_THIS
 690
 691 static const IOleDocumentViewVtbl OleDocumentViewVtbl = {
 692     OleDocumentView_QueryInterface,
 693     OleDocumentView_AddRef,
 694     OleDocumentView_Release,
 695     OleDocumentView_SetInPlaceSite,
 696     OleDocumentView_GetInPlaceSite,
 697     OleDocumentView_GetDocument,
 698     OleDocumentView_SetRect,
 699     OleDocumentView_GetRect,
 700     OleDocumentView_SetRectComplex,
 701     OleDocumentView_Show,
 702     OleDocumentView_UIActivate,
 703     OleDocumentView_Open,
 704     OleDocumentView_CloseView,
 705     OleDocumentView_SaveViewState,
 706     OleDocumentView_ApplyViewState,
 707     OleDocumentView_Clone
 708 };
 709
 710 /**********************************************************
 711  * IViewObject implementation
 712  */
 713
 714 #define VIEWOBJ_THIS(iface) DEFINE_THIS(HTMLDocument, ViewObject2, iface)
 715
 716 static HRESULT WINAPI ViewObject_QueryInterface(IViewObject2 *iface, REFIID riid, void **ppvObject)
 717 {
 718     HTMLDocument *This = VIEWOBJ_THIS(iface);
 719     return IHTMLDocument2_QueryInterface(HTMLDOC(This), riid, ppvObject);
 720 }
 721
 722 static ULONG WINAPI ViewObject_AddRef(IViewObject2 *iface)
 723 {
 724     HTMLDocument *This = VIEWOBJ_THIS(iface);
 725     return IHTMLDocument2_AddRef(HTMLDOC(This));
 726 }
 727
 728 static ULONG WINAPI ViewObject_Release(IViewObject2 *iface)
 729 {
 730     HTMLDocument *This = VIEWOBJ_THIS(iface);
 731     return IHTMLDocument2_Release(HTMLDOC(This));
 732 }
 733
 734 static HRESULT WINAPI ViewObject_Draw(IViewObject2 *iface, DWORD dwDrawAspect, LONG lindex, void *pvAspect,
 735         DVTARGETDEVICE *ptd, HDC hdcTargetDev, HDC hdcDraw, LPCRECTL lprcBounds,
 736         LPCRECTL lprcWBounds, BOOL (CALLBACK *pfnContinue)(ULONG_PTR dwContinue), ULONG_PTR dwContinue)
 737 {
 738     HTMLDocument *This = VIEWOBJ_THIS(iface);
 739     FIXME("(%p)->(%d %d %p %p %p %p %p %p %p %ld)\n", This, dwDrawAspect, lindex, pvAspect,
 740             ptd, hdcTargetDev, hdcDraw, lprcBounds, lprcWBounds, pfnContinue, dwContinue);
 741     return E_NOTIMPL;
 742 }
 743
 744 static HRESULT WINAPI ViewObject_GetColorSet(IViewObject2 *iface, DWORD dwDrawAspect, LONG lindex, void *pvAspect,
 745         DVTARGETDEVICE *ptd, HDC hicTargetDev, LOGPALETTE **ppColorSet)
 746 {
 747     HTMLDocument *This = VIEWOBJ_THIS(iface);
 748     FIXME("(%p)->(%d %d %p %p %p %p)\n", This, dwDrawAspect, lindex, pvAspect, ptd, hicTargetDev, ppColorSet);
 749     return E_NOTIMPL;
 750 }
 751
 752 static HRESULT WINAPI ViewObject_Freeze(IViewObject2 *iface, DWORD dwDrawAspect, LONG lindex,
 753         void *pvAspect, DWORD *pdwFreeze)
 754 {
 755     HTMLDocument *This = VIEWOBJ_THIS(iface);
 756     FIXME("(%p)->(%d %d %p %p)\n", This, dwDrawAspect, lindex, pvAspect, pdwFreeze);
 757     return E_NOTIMPL;
 758 }
 759
 760 static HRESULT WINAPI ViewObject_Unfreeze(IViewObject2 *iface, DWORD dwFreeze)
 761 {
 762     HTMLDocument *This = VIEWOBJ_THIS(iface);
 763     FIXME("(%p)->(%d)\n", This, dwFreeze);
 764     return E_NOTIMPL;
 765 }
 766
 767 static HRESULT WINAPI ViewObject_SetAdvise(IViewObject2 *iface, DWORD aspects, DWORD advf, IAdviseSink *pAdvSink)
 768 {
 769     HTMLDocument *This = VIEWOBJ_THIS(iface);
 770     FIXME("(%p)->(%d %d %p)\n", This, aspects, advf, pAdvSink);
 771     return E_NOTIMPL;
 772 }
 773
 774 static HRESULT WINAPI ViewObject_GetAdvise(IViewObject2 *iface, DWORD *pAspects, DWORD *pAdvf, IAdviseSink **ppAdvSink)
 775 {
 776     HTMLDocument *This = VIEWOBJ_THIS(iface);
 777     FIXME("(%p)->(%p %p %p)\n", This, pAspects, pAdvf, ppAdvSink);
 778     return E_NOTIMPL;
 779 }
 780
 781 static HRESULT WINAPI ViewObject_GetExtent(IViewObject2 *iface, DWORD dwDrawAspect, LONG lindex,
 782                                 DVTARGETDEVICE* ptd, LPSIZEL lpsizel)
 783 {
 784     HTMLDocument *This = VIEWOBJ_THIS(iface);
 785     FIXME("(%p)->(%d %d %p %p)\n", This, dwDrawAspect, lindex, ptd, lpsizel);
 786     return E_NOTIMPL;
 787 }
 788
 789 #undef VIEWOBJ_THIS
 790
 791 static const IViewObject2Vtbl ViewObjectVtbl = {
 792     ViewObject_QueryInterface,
 793     ViewObject_AddRef,
 794     ViewObject_Release,
 795     ViewObject_Draw,
 796     ViewObject_GetColorSet,
 797     ViewObject_Freeze,
 798     ViewObject_Unfreeze,
 799     ViewObject_SetAdvise,
 800     ViewObject_GetAdvise,
 801     ViewObject_GetExtent
 802 };
 803
 804 void HTMLDocument_View_Init(HTMLDocument *This)
 805 {
 806     This->lpOleDocumentViewVtbl = &OleDocumentViewVtbl;
 807     This->lpViewObject2Vtbl = &ViewObjectVtbl;
 808 }