git.oblomov.eu Git - wine/blob - dlls/shdocvw/client.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., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
  17  */
  18
  19 #include <stdio.h>
  20
  21 #include "wine/debug.h"
  22 #include "shdocvw.h"
  23 #include "mshtmdid.h"
  24 #include "idispids.h"
  25
  26 WINE_DEFAULT_DEBUG_CHANNEL(shdocvw);
  27
  28 static inline DocHost *impl_from_IOleClientSite(IOleClientSite *iface)
  29 {
  30     return (DocHost*)((char*)iface - FIELD_OFFSET(DocHost, IOleClientSite_iface));
  31 }
  32
  33 static HRESULT WINAPI ClientSite_QueryInterface(IOleClientSite *iface, REFIID riid, void **ppv)
  34 {
  35     DocHost *This = impl_from_IOleClientSite(iface);
  36
  37     if(IsEqualGUID(&IID_IUnknown, riid)) {
  38         TRACE("(%p)->(IID_IUnknown %p)\n", This, ppv);
  39         *ppv = &This->IOleClientSite_iface;
  40     }else if(IsEqualGUID(&IID_IOleClientSite, riid)) {
  41         TRACE("(%p)->(IID_IOleClientSite %p)\n", This, ppv);
  42         *ppv = &This->IOleClientSite_iface;
  43     }else if(IsEqualGUID(&IID_IOleWindow, riid)) {
  44         TRACE("(%p)->(IID_IOleWindow %p)\n", This, ppv);
  45         *ppv = &This->IOleInPlaceSite_iface;
  46     }else if(IsEqualGUID(&IID_IOleInPlaceSite, riid)) {
  47         TRACE("(%p)->(IID_IOleInPlaceSite %p)\n", This, ppv);
  48         *ppv = &This->IOleInPlaceSite_iface;
  49     }else if(IsEqualGUID(&IID_IDocHostUIHandler, riid)) {
  50         TRACE("(%p)->(IID_IDocHostUIHandler %p)\n", This, ppv);
  51         *ppv = &This->IDocHostUIHandler2_iface;
  52     }else if(IsEqualGUID(&IID_IDocHostUIHandler2, riid)) {
  53         TRACE("(%p)->(IID_IDocHostUIHandler2 %p)\n", This, ppv);
  54         *ppv = &This->IDocHostUIHandler2_iface;
  55     }else if(IsEqualGUID(&IID_IOleDocumentSite, riid)) {
  56         TRACE("(%p)->(IID_IOleDocumentSite %p)\n", This, ppv);
  57         *ppv = &This->IOleDocumentSite_iface;
  58     }else if(IsEqualGUID(&IID_IOleCommandTarget, riid)) {
  59         TRACE("(%p)->(IID_IOleCommandTarget %p)\n", This, ppv);
  60         *ppv = &This->IOleCommandTarget_iface;
  61     }else if(IsEqualGUID(&IID_IDispatch, riid)) {
  62         TRACE("(%p)->(IID_IDispatch %p)\n", This, ppv);
  63         *ppv = &This->IDispatch_iface;
  64     }else if(IsEqualGUID(&IID_IPropertyNotifySink, riid)) {
  65         TRACE("(%p)->(IID_IPropertyNotifySink %p)\n", This, ppv);
  66         *ppv = &This->IPropertyNotifySink_iface;
  67     }else if(IsEqualGUID(&IID_IServiceProvider, riid)) {
  68         TRACE("(%p)->(IID_IServiceProvider %p)\n", This, ppv);
  69         *ppv = &This->IServiceProvider_iface;
  70     }else {
  71         *ppv = NULL;
  72         WARN("Unsupported interface %s\n", debugstr_guid(riid));
  73         return E_NOINTERFACE;
  74     }
  75
  76     IOleClientSite_AddRef((IUnknown*)*ppv);
  77     return S_OK;
  78 }
  79
  80 static ULONG WINAPI ClientSite_AddRef(IOleClientSite *iface)
  81 {
  82     DocHost *This = impl_from_IOleClientSite(iface);
  83     return IDispatch_AddRef(This->disp);
  84 }
  85
  86 static ULONG WINAPI ClientSite_Release(IOleClientSite *iface)
  87 {
  88     DocHost *This = impl_from_IOleClientSite(iface);
  89     return IDispatch_Release(This->disp);
  90 }
  91
  92 static HRESULT WINAPI ClientSite_SaveObject(IOleClientSite *iface)
  93 {
  94     DocHost *This = impl_from_IOleClientSite(iface);
  95     FIXME("(%p)\n", This);
  96     return E_NOTIMPL;
  97 }
  98
  99 static HRESULT WINAPI ClientSite_GetMoniker(IOleClientSite *iface, DWORD dwAssign,
 100                                             DWORD dwWhichMoniker, IMoniker **ppmk)
 101 {
 102     DocHost *This = impl_from_IOleClientSite(iface);
 103     FIXME("(%p)->(%d %d %p)\n", This, dwAssign, dwWhichMoniker, ppmk);
 104     return E_NOTIMPL;
 105 }
 106
 107 static HRESULT WINAPI ClientSite_GetContainer(IOleClientSite *iface, IOleContainer **ppContainer)
 108 {
 109     DocHost *This = impl_from_IOleClientSite(iface);
 110     FIXME("(%p)->(%p)\n", This, ppContainer);
 111     return E_NOTIMPL;
 112 }
 113
 114 static HRESULT WINAPI ClientSite_ShowObject(IOleClientSite *iface)
 115 {
 116     DocHost *This = impl_from_IOleClientSite(iface);
 117     FIXME("(%p)\n", This);
 118     return E_NOTIMPL;
 119 }
 120
 121 static HRESULT WINAPI ClientSite_OnShowWindow(IOleClientSite *iface, BOOL fShow)
 122 {
 123     DocHost *This = impl_from_IOleClientSite(iface);
 124     FIXME("(%p)->(%x)\n", This, fShow);
 125     return E_NOTIMPL;
 126 }
 127
 128 static HRESULT WINAPI ClientSite_RequestNewObjectLayout(IOleClientSite *iface)
 129 {
 130     DocHost *This = impl_from_IOleClientSite(iface);
 131     FIXME("(%p)\n", This);
 132     return E_NOTIMPL;
 133 }
 134
 135 static const IOleClientSiteVtbl OleClientSiteVtbl = {
 136     ClientSite_QueryInterface,
 137     ClientSite_AddRef,
 138     ClientSite_Release,
 139     ClientSite_SaveObject,
 140     ClientSite_GetMoniker,
 141     ClientSite_GetContainer,
 142     ClientSite_ShowObject,
 143     ClientSite_OnShowWindow,
 144     ClientSite_RequestNewObjectLayout
 145 };
 146
 147 static inline DocHost *impl_from_IOleInPlaceSite(IOleInPlaceSite *iface)
 148 {
 149     return (DocHost*)((char*)iface - FIELD_OFFSET(DocHost, IOleInPlaceSite_iface));
 150 }
 151
 152 static HRESULT WINAPI InPlaceSite_QueryInterface(IOleInPlaceSite *iface, REFIID riid, void **ppv)
 153 {
 154     DocHost *This = impl_from_IOleInPlaceSite(iface);
 155     return IOleClientSite_QueryInterface(&This->IOleClientSite_iface, riid, ppv);
 156 }
 157
 158 static ULONG WINAPI InPlaceSite_AddRef(IOleInPlaceSite *iface)
 159 {
 160     DocHost *This = impl_from_IOleInPlaceSite(iface);
 161     return IOleClientSite_AddRef(&This->IOleClientSite_iface);
 162 }
 163
 164 static ULONG WINAPI InPlaceSite_Release(IOleInPlaceSite *iface)
 165 {
 166     DocHost *This = impl_from_IOleInPlaceSite(iface);
 167     return IOleClientSite_Release(&This->IOleClientSite_iface);
 168 }
 169
 170 static HRESULT WINAPI InPlaceSite_GetWindow(IOleInPlaceSite *iface, HWND *phwnd)
 171 {
 172     DocHost *This = impl_from_IOleInPlaceSite(iface);
 173
 174     TRACE("(%p)->(%p)\n", This, phwnd);
 175
 176     *phwnd = This->hwnd;
 177     return S_OK;
 178 }
 179
 180 static HRESULT WINAPI InPlaceSite_ContextSensitiveHelp(IOleInPlaceSite *iface, BOOL fEnterMode)
 181 {
 182     DocHost *This = impl_from_IOleInPlaceSite(iface);
 183     FIXME("(%p)->(%x)\n", This, fEnterMode);
 184     return E_NOTIMPL;
 185 }
 186
 187 static HRESULT WINAPI InPlaceSite_CanInPlaceActivate(IOleInPlaceSite *iface)
 188 {
 189     DocHost *This = impl_from_IOleInPlaceSite(iface);
 190
 191     TRACE("(%p)\n", This);
 192
 193     /* Nothing to do here */
 194     return S_OK;
 195 }
 196
 197 static HRESULT WINAPI InPlaceSite_OnInPlaceActivate(IOleInPlaceSite *iface)
 198 {
 199     DocHost *This = impl_from_IOleInPlaceSite(iface);
 200
 201     TRACE("(%p)\n", This);
 202
 203     /* Nothing to do here */
 204     return S_OK;
 205 }
 206
 207 static HRESULT WINAPI InPlaceSite_OnUIActivate(IOleInPlaceSite *iface)
 208 {
 209     DocHost *This = impl_from_IOleInPlaceSite(iface);
 210     FIXME("(%p)\n", This);
 211     return E_NOTIMPL;
 212 }
 213
 214 static HRESULT WINAPI InPlaceSite_GetWindowContext(IOleInPlaceSite *iface,
 215         IOleInPlaceFrame **ppFrame, IOleInPlaceUIWindow **ppDoc, LPRECT lprcPosRect,
 216         LPRECT lprcClipRect, LPOLEINPLACEFRAMEINFO lpFrameInfo)
 217 {
 218     DocHost *This = impl_from_IOleInPlaceSite(iface);
 219
 220     TRACE("(%p)->(%p %p %p %p %p)\n", This, ppFrame, ppDoc, lprcPosRect,
 221           lprcClipRect, lpFrameInfo);
 222
 223     IOleInPlaceFrame_AddRef(&This->IOleInPlaceFrame_iface);
 224     *ppFrame = &This->IOleInPlaceFrame_iface;
 225     *ppDoc = NULL;
 226
 227     GetClientRect(This->hwnd, lprcPosRect);
 228     *lprcClipRect = *lprcPosRect;
 229
 230     lpFrameInfo->cb = sizeof(*lpFrameInfo);
 231     lpFrameInfo->fMDIApp = FALSE;
 232     lpFrameInfo->hwndFrame = This->frame_hwnd;
 233     lpFrameInfo->haccel = NULL;
 234     lpFrameInfo->cAccelEntries = 0; /* FIXME: should be 5 */
 235
 236     return S_OK;
 237 }
 238
 239 static HRESULT WINAPI InPlaceSite_Scroll(IOleInPlaceSite *iface, SIZE scrollExtent)
 240 {
 241     DocHost *This = impl_from_IOleInPlaceSite(iface);
 242     FIXME("(%p)->({%d %d})\n", This, scrollExtent.cx, scrollExtent.cy);
 243     return E_NOTIMPL;
 244 }
 245
 246 static HRESULT WINAPI InPlaceSite_OnUIDeactivate(IOleInPlaceSite *iface, BOOL fUndoable)
 247 {
 248     DocHost *This = impl_from_IOleInPlaceSite(iface);
 249     FIXME("(%p)->(%x)\n", This, fUndoable);
 250     return E_NOTIMPL;
 251 }
 252
 253 static HRESULT WINAPI InPlaceSite_OnInPlaceDeactivate(IOleInPlaceSite *iface)
 254 {
 255     DocHost *This = impl_from_IOleInPlaceSite(iface);
 256
 257     TRACE("(%p)\n", This);
 258
 259     /* Nothing to do here */
 260     return S_OK;
 261 }
 262
 263 static HRESULT WINAPI InPlaceSite_DiscardUndoState(IOleInPlaceSite *iface)
 264 {
 265     DocHost *This = impl_from_IOleInPlaceSite(iface);
 266     FIXME("(%p)\n", This);
 267     return E_NOTIMPL;
 268 }
 269
 270 static HRESULT WINAPI InPlaceSite_DeactivateAndUndo(IOleInPlaceSite *iface)
 271 {
 272     DocHost *This = impl_from_IOleInPlaceSite(iface);
 273     FIXME("(%p)\n", This);
 274     return E_NOTIMPL;
 275 }
 276
 277 static HRESULT WINAPI InPlaceSite_OnPosRectChange(IOleInPlaceSite *iface,
 278                                                   LPCRECT lprcPosRect)
 279 {
 280     DocHost *This = impl_from_IOleInPlaceSite(iface);
 281     FIXME("(%p)->(%p)\n", This, lprcPosRect);
 282     return E_NOTIMPL;
 283 }
 284
 285 static const IOleInPlaceSiteVtbl OleInPlaceSiteVtbl = {
 286     InPlaceSite_QueryInterface,
 287     InPlaceSite_AddRef,
 288     InPlaceSite_Release,
 289     InPlaceSite_GetWindow,
 290     InPlaceSite_ContextSensitiveHelp,
 291     InPlaceSite_CanInPlaceActivate,
 292     InPlaceSite_OnInPlaceActivate,
 293     InPlaceSite_OnUIActivate,
 294     InPlaceSite_GetWindowContext,
 295     InPlaceSite_Scroll,
 296     InPlaceSite_OnUIDeactivate,
 297     InPlaceSite_OnInPlaceDeactivate,
 298     InPlaceSite_DiscardUndoState,
 299     InPlaceSite_DeactivateAndUndo,
 300     InPlaceSite_OnPosRectChange
 301 };
 302
 303 static inline DocHost *impl_from_IOleDocumentSite(IOleDocumentSite *iface)
 304 {
 305     return (DocHost*)((char*)iface - FIELD_OFFSET(DocHost, IOleDocumentSite_iface));
 306 }
 307
 308 static HRESULT WINAPI OleDocumentSite_QueryInterface(IOleDocumentSite *iface,
 309                                                      REFIID riid, void **ppv)
 310 {
 311     DocHost *This = impl_from_IOleDocumentSite(iface);
 312     return IOleClientSite_QueryInterface(&This->IOleClientSite_iface, riid, ppv);
 313 }
 314
 315 static ULONG WINAPI OleDocumentSite_AddRef(IOleDocumentSite *iface)
 316 {
 317     DocHost *This = impl_from_IOleDocumentSite(iface);
 318     return IOleClientSite_AddRef(&This->IOleClientSite_iface);
 319 }
 320
 321 static ULONG WINAPI OleDocumentSite_Release(IOleDocumentSite *iface)
 322 {
 323     DocHost *This = impl_from_IOleDocumentSite(iface);
 324     return IOleClientSite_Release(&This->IOleClientSite_iface);
 325 }
 326
 327 static HRESULT WINAPI OleDocumentSite_ActivateMe(IOleDocumentSite *iface,
 328                                                  IOleDocumentView *pViewToActivate)
 329 {
 330     DocHost *This = impl_from_IOleDocumentSite(iface);
 331     IOleDocument *oledoc;
 332     RECT rect;
 333     HRESULT hres;
 334
 335     TRACE("(%p)->(%p)\n", This, pViewToActivate);
 336
 337     hres = IUnknown_QueryInterface(This->document, &IID_IOleDocument, (void**)&oledoc);
 338     if(FAILED(hres))
 339         return hres;
 340
 341     IOleDocument_CreateView(oledoc, &This->IOleInPlaceSite_iface, NULL, 0, &This->view);
 342     IOleDocument_Release(oledoc);
 343
 344     GetClientRect(This->hwnd, &rect);
 345     IOleDocumentView_SetRect(This->view, &rect);
 346
 347     hres = IOleDocumentView_Show(This->view, TRUE);
 348
 349     return hres;
 350 }
 351
 352 static const IOleDocumentSiteVtbl OleDocumentSiteVtbl = {
 353     OleDocumentSite_QueryInterface,
 354     OleDocumentSite_AddRef,
 355     OleDocumentSite_Release,
 356     OleDocumentSite_ActivateMe
 357 };
 358
 359 static inline DocHost *impl_from_IDispatch(IDispatch *iface)
 360 {
 361     return (DocHost*)((char*)iface - FIELD_OFFSET(DocHost, IDispatch_iface));
 362 }
 363
 364 static HRESULT WINAPI ClDispatch_QueryInterface(IDispatch *iface, REFIID riid, void **ppv)
 365 {
 366     DocHost *This = impl_from_IDispatch(iface);
 367     return IOleClientSite_QueryInterface(&This->IOleClientSite_iface, riid, ppv);
 368 }
 369
 370 static ULONG WINAPI ClDispatch_AddRef(IDispatch *iface)
 371 {
 372     DocHost *This = impl_from_IDispatch(iface);
 373     return IOleClientSite_AddRef(&This->IOleClientSite_iface);
 374 }
 375
 376 static ULONG WINAPI ClDispatch_Release(IDispatch *iface)
 377 {
 378     DocHost *This = impl_from_IDispatch(iface);
 379     return IOleClientSite_Release(&This->IOleClientSite_iface);
 380 }
 381
 382 static HRESULT WINAPI ClDispatch_GetTypeInfoCount(IDispatch *iface, UINT *pctinfo)
 383 {
 384     DocHost *This = impl_from_IDispatch(iface);
 385
 386     TRACE("(%p)->(%p)\n", This, pctinfo);
 387
 388     return E_NOTIMPL;
 389 }
 390
 391 static HRESULT WINAPI ClDispatch_GetTypeInfo(IDispatch *iface, UINT iTInfo, LCID lcid,
 392                                              ITypeInfo **ppTInfo)
 393 {
 394     DocHost *This = impl_from_IDispatch(iface);
 395
 396     TRACE("(%p)->(%u %d %p)\n", This, iTInfo, lcid, ppTInfo);
 397
 398     return E_NOTIMPL;
 399 }
 400
 401 static HRESULT WINAPI ClDispatch_GetIDsOfNames(IDispatch *iface, REFIID riid, LPOLESTR *rgszNames,
 402                                                UINT cNames, LCID lcid, DISPID *rgDispId)
 403 {
 404     DocHost *This = impl_from_IDispatch(iface);
 405
 406     TRACE("(%p)->(%s %p %u %d %p)\n", This, debugstr_guid(riid), rgszNames, cNames,
 407           lcid, rgDispId);
 408
 409     return E_NOTIMPL;
 410 }
 411
 412 static const char *debugstr_dispid(DISPID dispid)
 413 {
 414     static char buf[16];
 415
 416 #define CASE_DISPID(did) case did: return #did
 417     switch(dispid) {
 418         CASE_DISPID(DISPID_AMBIENT_USERMODE);
 419         CASE_DISPID(DISPID_AMBIENT_DLCONTROL);
 420         CASE_DISPID(DISPID_AMBIENT_USERAGENT);
 421         CASE_DISPID(DISPID_AMBIENT_PALETTE);
 422         CASE_DISPID(DISPID_AMBIENT_OFFLINEIFNOTCONNECTED);
 423         CASE_DISPID(DISPID_AMBIENT_SILENT);
 424     }
 425 #undef CASE_DISPID
 426
 427     sprintf(buf, "%d", dispid);
 428     return buf;
 429 }
 430
 431 static HRESULT WINAPI ClDispatch_Invoke(IDispatch *iface, DISPID dispIdMember, REFIID riid,
 432                                         LCID lcid, WORD wFlags, DISPPARAMS *pDispParams,
 433                                         VARIANT *pVarResult, EXCEPINFO *pExcepInfo, UINT *puArgErr)
 434 {
 435     DocHost *This = impl_from_IDispatch(iface);
 436
 437     TRACE("(%p)->(%s %s %d %04x %p %p %p %p)\n", This, debugstr_dispid(dispIdMember),
 438           debugstr_guid(riid), lcid, wFlags, pDispParams, pVarResult, pExcepInfo, puArgErr);
 439
 440     switch(dispIdMember) {
 441     case DISPID_AMBIENT_USERMODE:
 442     case DISPID_AMBIENT_DLCONTROL:
 443     case DISPID_AMBIENT_USERAGENT:
 444     case DISPID_AMBIENT_PALETTE:
 445         if(!This->client_disp)
 446             return E_FAIL;
 447         return IDispatch_Invoke(This->client_disp, dispIdMember, riid, lcid, wFlags,
 448                                 pDispParams, pVarResult, pExcepInfo, puArgErr);
 449     case DISPID_AMBIENT_OFFLINEIFNOTCONNECTED:
 450         V_VT(pVarResult) = VT_BOOL;
 451         V_BOOL(pVarResult) = This->offline;
 452         return S_OK;
 453     case DISPID_AMBIENT_SILENT:
 454         V_VT(pVarResult) = VT_BOOL;
 455         V_BOOL(pVarResult) = This->offline;
 456         return S_OK;
 457     }
 458
 459     FIXME("unhandled dispid %d\n", dispIdMember);
 460     return E_NOTIMPL;
 461 }
 462
 463 static const IDispatchVtbl DispatchVtbl = {
 464     ClDispatch_QueryInterface,
 465     ClDispatch_AddRef,
 466     ClDispatch_Release,
 467     ClDispatch_GetTypeInfoCount,
 468     ClDispatch_GetTypeInfo,
 469     ClDispatch_GetIDsOfNames,
 470     ClDispatch_Invoke
 471 };
 472
 473 static inline DocHost *impl_from_IServiceProvider(IServiceProvider *iface)
 474 {
 475     return (DocHost*)((char*)iface - FIELD_OFFSET(DocHost, IServiceProvider_iface));
 476 }
 477
 478 static HRESULT WINAPI ClServiceProvider_QueryInterface(IServiceProvider *iface, REFIID riid,
 479                                                        void **ppv)
 480 {
 481     DocHost *This = impl_from_IServiceProvider(iface);
 482     return IOleClientSite_QueryInterface(&This->IOleClientSite_iface, riid, ppv);
 483 }
 484
 485 static ULONG WINAPI ClServiceProvider_AddRef(IServiceProvider *iface)
 486 {
 487     DocHost *This = impl_from_IServiceProvider(iface);
 488     return IOleClientSite_AddRef(&This->IOleClientSite_iface);
 489 }
 490
 491 static ULONG WINAPI ClServiceProvider_Release(IServiceProvider *iface)
 492 {
 493     DocHost *This = impl_from_IServiceProvider(iface);
 494     return IOleClientSite_Release(&This->IOleClientSite_iface);
 495 }
 496
 497 static HRESULT WINAPI ClServiceProvider_QueryService(IServiceProvider *iface, REFGUID guidService,
 498                                                      REFIID riid, void **ppv)
 499 {
 500     DocHost *This = impl_from_IServiceProvider(iface);
 501
 502     if(IsEqualGUID(&IID_IHlinkFrame, guidService)) {
 503         TRACE("(%p)->(IID_IHlinkFrame %s %p)\n", This, debugstr_guid(riid), ppv);
 504         return IDispatch_QueryInterface(This->disp, riid, ppv);
 505     }
 506
 507     FIXME("(%p)->(%s %s %p)\n", This, debugstr_guid(guidService), debugstr_guid(riid), ppv);
 508
 509     return E_NOINTERFACE;
 510 }
 511
 512 static const IServiceProviderVtbl ServiceProviderVtbl = {
 513     ClServiceProvider_QueryInterface,
 514     ClServiceProvider_AddRef,
 515     ClServiceProvider_Release,
 516     ClServiceProvider_QueryService
 517 };
 518
 519 void DocHost_ClientSite_Init(DocHost *This)
 520 {
 521     This->IOleClientSite_iface.lpVtbl   = &OleClientSiteVtbl;
 522     This->IOleInPlaceSite_iface.lpVtbl  = &OleInPlaceSiteVtbl;
 523     This->IOleDocumentSite_iface.lpVtbl = &OleDocumentSiteVtbl;
 524     This->IDispatch_iface.lpVtbl        = &DispatchVtbl;
 525     This->IServiceProvider_iface.lpVtbl = &ServiceProviderVtbl;
 526 }
 527
 528 void DocHost_ClientSite_Release(DocHost *This)
 529 {
 530     if(This->view)
 531         IOleDocumentView_Release(This->view);
 532 }