git.oblomov.eu Git - wine/blob - dlls/shdocvw/dochost.c

   1 /*
   2  * Copyright 2005 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., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
  17  */
  18
  19 #include "wine/debug.h"
  20 #include "shdocvw.h"
  21 #include "hlink.h"
  22 #include "exdispid.h"
  23
  24 WINE_DEFAULT_DEBUG_CHANNEL(shdocvw);
  25
  26 static ATOM doc_view_atom = 0;
  27
  28 static void navigate_complete(WebBrowser *This)
  29 {
  30     IDispatch *disp, *docdisp = NULL;
  31     DISPPARAMS dispparams;
  32     VARIANTARG params[2];
  33     VARIANT url;
  34     HRESULT hres;
  35
  36     hres = IOleClientSite_QueryInterface(This->client, &IID_IDispatch, (void**)&disp);
  37     if(FAILED(hres))
  38         return;
  39
  40     hres = IUnknown_QueryInterface(This->document, &IID_IDispatch, (void**)&docdisp);
  41     if(FAILED(hres))
  42         FIXME("Could not get IDispatch interface\n");
  43
  44     dispparams.cArgs = 2;
  45     dispparams.cNamedArgs = 0;
  46     dispparams.rgdispidNamedArgs = NULL;
  47     dispparams.rgvarg = params;
  48
  49     V_VT(params) = (VT_BYREF|VT_VARIANT);
  50     V_BYREF(params) = &url;
  51
  52     V_VT(params+1) = VT_DISPATCH;
  53     V_DISPATCH(params+1) = docdisp;
  54
  55     V_VT(&url) = VT_BSTR;
  56     V_BSTR(&url) = This->url;
  57
  58     IDispatch_Invoke(disp, DISPID_NAVIGATECOMPLETE2, &IID_NULL, LOCALE_SYSTEM_DEFAULT,
  59                      DISPATCH_METHOD, &dispparams, NULL, NULL, NULL);
  60     IDispatch_Invoke(disp, DISPID_DOCUMENTCOMPLETE, &IID_NULL, LOCALE_SYSTEM_DEFAULT,
  61                      DISPATCH_METHOD, &dispparams, NULL, NULL, NULL);
  62
  63     IDispatch_Release(disp);
  64     if(docdisp)
  65         IDispatch_Release(docdisp);
  66 }
  67
  68 static LRESULT navigate2(WebBrowser *This)
  69 {
  70     IHlinkTarget *hlink;
  71     HRESULT hres;
  72
  73     TRACE("(%p)\n", This);
  74
  75     if(!This->document) {
  76         WARN("document == NULL\n");
  77         return 0;
  78     }
  79
  80     hres = IUnknown_QueryInterface(This->document, &IID_IHlinkTarget, (void**)&hlink);
  81     if(FAILED(hres)) {
  82         FIXME("Could not get IHlinkTarget interface\n");
  83         return 0;
  84     }
  85
  86     hres = IHlinkTarget_Navigate(hlink, 0, NULL);
  87     IHlinkTarget_Release(hlink);
  88     if(FAILED(hres)) {
  89         FIXME("Navigate failed\n");
  90         return 0;
  91     }
  92
  93     navigate_complete(This);
  94
  95     return 0;
  96 }
  97
  98 static LRESULT WINAPI doc_view_proc(HWND hwnd, UINT msg, WPARAM wParam, LPARAM lParam)
  99 {
 100     WebBrowser *This;
 101
 102     static const WCHAR wszTHIS[] = {'T','H','I','S',0};
 103
 104     if(msg == WM_CREATE) {
 105         This = *(WebBrowser**)lParam;
 106         ERR("create %p\n", This);
 107         SetPropW(hwnd, wszTHIS, This);
 108     }else {
 109         This = GetPropW(hwnd, wszTHIS);
 110     }
 111
 112     switch(msg) {
 113     case WB_WM_NAVIGATE2:
 114         return navigate2(This);
 115     }
 116
 117     return DefWindowProcA(hwnd, msg, wParam, lParam);
 118 }
 119
 120 void create_doc_view_hwnd(WebBrowser *This)
 121 {
 122     RECT rect;
 123
 124     static const WCHAR wszShell_DocObject_View[] =
 125         {'S','h','e','l','l',' ','D','o','c','O','b','j','e','c','t',' ','V','i','e','w',0};
 126
 127     if(!doc_view_atom) {
 128         static WNDCLASSEXW wndclass = {
 129             sizeof(wndclass),
 130             CS_PARENTDC,
 131             doc_view_proc,
 132             0, 0 /* native uses 4*/, NULL, NULL, NULL,
 133             (HBRUSH)COLOR_WINDOWFRAME, NULL,
 134             wszShell_DocObject_View,
 135             NULL
 136         };
 137
 138         wndclass.hInstance = shdocvw_hinstance;
 139
 140         doc_view_atom = RegisterClassExW(&wndclass);
 141     }
 142
 143     GetWindowRect(This->shell_embedding_hwnd, &rect);
 144     This->doc_view_hwnd = CreateWindowExW(0, wszShell_DocObject_View,
 145          wszShell_DocObject_View,
 146          WS_CHILD | WS_VISIBLE | WS_CLIPSIBLINGS | WS_CLIPCHILDREN | WS_TABSTOP | WS_MAXIMIZEBOX,
 147          rect.left, rect.top, rect.right, rect.bottom, This->shell_embedding_hwnd,
 148          NULL, shdocvw_hinstance, This);
 149 }
 150
 151 #define DOCHOSTUI_THIS(iface) DEFINE_THIS(WebBrowser, DocHostUIHandler, iface)
 152
 153 static HRESULT WINAPI DocHostUIHandler_QueryInterface(IDocHostUIHandler2 *iface,
 154                                                       REFIID riid, void **ppv)
 155 {
 156     WebBrowser *This = DOCHOSTUI_THIS(iface);
 157     return IOleClientSite_QueryInterface(CLIENTSITE(This), riid, ppv);
 158 }
 159
 160 static ULONG WINAPI DocHostUIHandler_AddRef(IDocHostUIHandler2 *iface)
 161 {
 162     WebBrowser *This = DOCHOSTUI_THIS(iface);
 163     return IOleClientSite_AddRef(CLIENTSITE(This));
 164 }
 165
 166 static ULONG WINAPI DocHostUIHandler_Release(IDocHostUIHandler2 *iface)
 167 {
 168     WebBrowser *This = DOCHOSTUI_THIS(iface);
 169     return IOleClientSite_Release(CLIENTSITE(This));
 170 }
 171
 172 static HRESULT WINAPI DocHostUIHandler_ShowContextMenu(IDocHostUIHandler2 *iface,
 173          DWORD dwID, POINT *ppt, IUnknown *pcmdtReserved, IDispatch *pdispReserved)
 174 {
 175     WebBrowser *This = DOCHOSTUI_THIS(iface);
 176     FIXME("(%p)->(%ld %p %p %p)\n", This, dwID, ppt, pcmdtReserved, pdispReserved);
 177     return E_NOTIMPL;
 178 }
 179
 180 static HRESULT WINAPI DocHostUIHandler_GetHostInfo(IDocHostUIHandler2 *iface,
 181         DOCHOSTUIINFO *pInfo)
 182 {
 183     WebBrowser *This = DOCHOSTUI_THIS(iface);
 184     IDocHostUIHandler *handler;
 185     HRESULT hres;
 186
 187     TRACE("(%p)->(%p)\n", This, pInfo);
 188
 189     if(This->client) {
 190         hres = IOleClientSite_QueryInterface(This->client, &IID_IDocHostUIHandler, (void**)&handler);
 191         if(SUCCEEDED(hres)) {
 192             hres = IDocHostUIHandler_GetHostInfo(handler, pInfo);
 193             IDocHostUIHandler_Release(handler);
 194             if(SUCCEEDED(hres))
 195                 return hres;
 196         }
 197     }
 198
 199     pInfo->dwFlags = DOCHOSTUIFLAG_DISABLE_HELP_MENU | DOCHOSTUIFLAG_OPENNEWWIN
 200         | DOCHOSTUIFLAG_URL_ENCODING_ENABLE_UTF8 | DOCHOSTUIFLAG_ENABLE_INPLACE_NAVIGATION
 201         | DOCHOSTUIFLAG_IME_ENABLE_RECONVERSION;
 202     return S_OK;
 203 }
 204
 205 static HRESULT WINAPI DocHostUIHandler_ShowUI(IDocHostUIHandler2 *iface, DWORD dwID,
 206         IOleInPlaceActiveObject *pActiveObject, IOleCommandTarget *pCommandTarget,
 207         IOleInPlaceFrame *pFrame, IOleInPlaceUIWindow *pDoc)
 208 {
 209     WebBrowser *This = DOCHOSTUI_THIS(iface);
 210     FIXME("(%p)->(%ld %p %p %p %p)\n", This, dwID, pActiveObject, pCommandTarget,
 211           pFrame, pDoc);
 212     return E_NOTIMPL;
 213 }
 214
 215 static HRESULT WINAPI DocHostUIHandler_HideUI(IDocHostUIHandler2 *iface)
 216 {
 217     WebBrowser *This = DOCHOSTUI_THIS(iface);
 218     FIXME("(%p)\n", This);
 219     return E_NOTIMPL;
 220 }
 221
 222 static HRESULT WINAPI DocHostUIHandler_UpdateUI(IDocHostUIHandler2 *iface)
 223 {
 224     WebBrowser *This = DOCHOSTUI_THIS(iface);
 225     FIXME("(%p)\n", This);
 226     return E_NOTIMPL;
 227 }
 228
 229 static HRESULT WINAPI DocHostUIHandler_EnableModeless(IDocHostUIHandler2 *iface,
 230                                                       BOOL fEnable)
 231 {
 232     WebBrowser *This = DOCHOSTUI_THIS(iface);
 233     FIXME("(%p)->(%x)\n", This, fEnable);
 234     return E_NOTIMPL;
 235 }
 236
 237 static HRESULT WINAPI DocHostUIHandler_OnDocWindowActivate(IDocHostUIHandler2 *iface,
 238                                                            BOOL fActivate)
 239 {
 240     WebBrowser *This = DOCHOSTUI_THIS(iface);
 241     FIXME("(%p)->(%x)\n", This, fActivate);
 242     return E_NOTIMPL;
 243 }
 244
 245 static HRESULT WINAPI DocHostUIHandler_OnFrameWindowActivate(IDocHostUIHandler2 *iface,
 246                                                              BOOL fActivate)
 247 {
 248     WebBrowser *This = DOCHOSTUI_THIS(iface);
 249     FIXME("(%p)->(%x)\n", This, fActivate);
 250     return E_NOTIMPL;
 251 }
 252
 253 static HRESULT WINAPI DocHostUIHandler_ResizeBorder(IDocHostUIHandler2 *iface,
 254         LPCRECT prcBorder, IOleInPlaceUIWindow *pUIWindow, BOOL fRameWindow)
 255 {
 256     WebBrowser *This = DOCHOSTUI_THIS(iface);
 257     FIXME("(%p)->(%p %p %X)\n", This, prcBorder, pUIWindow, fRameWindow);
 258     return E_NOTIMPL;
 259 }
 260
 261 static HRESULT WINAPI DocHostUIHandler_TranslateAccelerator(IDocHostUIHandler2 *iface,
 262         LPMSG lpMsg, const GUID *pguidCmdGroup, DWORD nCmdID)
 263 {
 264     WebBrowser *This = DOCHOSTUI_THIS(iface);
 265     FIXME("(%p)->(%p %p %ld)\n", This, lpMsg, pguidCmdGroup, nCmdID);
 266     return E_NOTIMPL;
 267 }
 268
 269 static HRESULT WINAPI DocHostUIHandler_GetOptionKeyPath(IDocHostUIHandler2 *iface,
 270         LPOLESTR *pchKey, DWORD dw)
 271 {
 272     WebBrowser *This = DOCHOSTUI_THIS(iface);
 273     IDocHostUIHandler *handler;
 274     HRESULT hres;
 275
 276     TRACE("(%p)->(%p %ld)\n", This, pchKey, dw);
 277
 278     if(!This->client)
 279         return S_OK;
 280
 281     hres = IOleClientSite_QueryInterface(This->client, &IID_IDocHostUIHandler,
 282                                          (void**)&handler);
 283     if(SUCCEEDED(hres)) {
 284         hres = IDocHostUIHandler_GetOptionKeyPath(handler, pchKey, dw);
 285         IDocHostUIHandler_Release(handler);
 286         return hres;
 287     }
 288
 289     return S_OK;
 290 }
 291
 292 static HRESULT WINAPI DocHostUIHandler_GetDropTarget(IDocHostUIHandler2 *iface,
 293         IDropTarget *pDropTarget, IDropTarget **ppDropTarget)
 294 {
 295     WebBrowser *This = DOCHOSTUI_THIS(iface);
 296     FIXME("(%p)\n", This);
 297     return E_NOTIMPL;
 298 }
 299
 300 static HRESULT WINAPI DocHostUIHandler_GetExternal(IDocHostUIHandler2 *iface,
 301         IDispatch **ppDispatch)
 302 {
 303     WebBrowser *This = DOCHOSTUI_THIS(iface);
 304     FIXME("(%p)->(%p)\n", This, ppDispatch);
 305     return E_NOTIMPL;
 306 }
 307
 308 static HRESULT WINAPI DocHostUIHandler_TranslateUrl(IDocHostUIHandler2 *iface,
 309         DWORD dwTranslate, OLECHAR *pchURLIn, OLECHAR **ppchURLOut)
 310 {
 311     WebBrowser *This = DOCHOSTUI_THIS(iface);
 312     FIXME("(%p)->(%ld %s %p)\n", This, dwTranslate, debugstr_w(pchURLIn), ppchURLOut);
 313     return E_NOTIMPL;
 314 }
 315
 316 static HRESULT WINAPI DocHostUIHandler_FilterDataObject(IDocHostUIHandler2 *iface,
 317         IDataObject *pDO, IDataObject **ppDORet)
 318 {
 319     WebBrowser *This = DOCHOSTUI_THIS(iface);
 320     FIXME("(%p)->(%p %p)\n", This, pDO, ppDORet);
 321     return E_NOTIMPL;
 322 }
 323
 324 static HRESULT WINAPI DocHostUIHandler_GetOverrideKeyPath(IDocHostUIHandler2 *iface,
 325         LPOLESTR *pchKey, DWORD dw)
 326 {
 327     WebBrowser *This = DOCHOSTUI_THIS(iface);
 328     IDocHostUIHandler2 *handler;
 329     HRESULT hres;
 330
 331     TRACE("(%p)->(%p %ld)\n", This, pchKey, dw);
 332
 333     if(!This->client)
 334         return S_OK;
 335
 336     hres = IOleClientSite_QueryInterface(This->client, &IID_IDocHostUIHandler2,
 337                                          (void**)&handler);
 338     if(SUCCEEDED(hres)) {
 339         hres = IDocHostUIHandler2_GetOverrideKeyPath(handler, pchKey, dw);
 340         IDocHostUIHandler2_Release(handler);
 341         return hres;
 342     }
 343
 344     return S_OK;
 345 }
 346
 347 #undef DOCHOSTUI_THIS
 348
 349 static const IDocHostUIHandler2Vtbl DocHostUIHandler2Vtbl = {
 350     DocHostUIHandler_QueryInterface,
 351     DocHostUIHandler_AddRef,
 352     DocHostUIHandler_Release,
 353     DocHostUIHandler_ShowContextMenu,
 354     DocHostUIHandler_GetHostInfo,
 355     DocHostUIHandler_ShowUI,
 356     DocHostUIHandler_HideUI,
 357     DocHostUIHandler_UpdateUI,
 358     DocHostUIHandler_EnableModeless,
 359     DocHostUIHandler_OnDocWindowActivate,
 360     DocHostUIHandler_OnFrameWindowActivate,
 361     DocHostUIHandler_ResizeBorder,
 362     DocHostUIHandler_TranslateAccelerator,
 363     DocHostUIHandler_GetOptionKeyPath,
 364     DocHostUIHandler_GetDropTarget,
 365     DocHostUIHandler_GetExternal,
 366     DocHostUIHandler_TranslateUrl,
 367     DocHostUIHandler_FilterDataObject,
 368     DocHostUIHandler_GetOverrideKeyPath
 369 };
 370
 371 void WebBrowser_DocHost_Init(WebBrowser *This)
 372 {
 373     This->lpDocHostUIHandlerVtbl = &DocHostUIHandler2Vtbl;
 374
 375     This->doc_view_hwnd = NULL;
 376 }