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