dlls/ieframe/events.c

   1 /*
   2  * Implementation of event-related interfaces for WebBrowser control:
   3  *
   4  *  - IConnectionPointContainer
   5  *  - IConnectionPoint
   6  *
   7  * Copyright 2001 John R. Sheets (for CodeWeavers)
   8  * Copyright 2006 Jacek Caban for CodeWeavers
   9  *
  10  * This library is free software; you can redistribute it and/or
  11  * modify it under the terms of the GNU Lesser General Public
  12  * License as published by the Free Software Foundation; either
  13  * version 2.1 of the License, or (at your option) any later version.
  14  *
  15  * This library is distributed in the hope that it will be useful,
  16  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  17  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  18  * Lesser General Public License for more details.
  19  *
  20  * You should have received a copy of the GNU Lesser General Public
  21  * License along with this library; if not, write to the Free Software
  22  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
  23  */
  24
  25 #include <string.h>
  26
  27 #include "ieframe.h"
  28
  29 #include "wine/debug.h"
  30
  31 WINE_DEFAULT_DEBUG_CHANNEL(ieframe);
  32
  33 struct ConnectionPoint {
  34     IConnectionPoint IConnectionPoint_iface;
  35
  36     IConnectionPointContainer *container;
  37
  38     IDispatch **sinks;
  39     DWORD sinks_size;
  40
  41     IID iid;
  42 };
  43
  44 /**********************************************************************
  45  * Implement the IConnectionPointContainer interface
  46  */
  47
  48 static inline ConnectionPointContainer *impl_from_IConnectionPointContainer(IConnectionPointContainer *iface)
  49 {
  50     return CONTAINING_RECORD(iface, ConnectionPointContainer, IConnectionPointContainer_iface);
  51 }
  52
  53 static HRESULT WINAPI ConnectionPointContainer_QueryInterface(IConnectionPointContainer *iface,
  54         REFIID riid, LPVOID *ppv)
  55 {
  56     ConnectionPointContainer *This = impl_from_IConnectionPointContainer(iface);
  57     return IUnknown_QueryInterface(This->impl, riid, ppv);
  58 }
  59
  60 static ULONG WINAPI ConnectionPointContainer_AddRef(IConnectionPointContainer *iface)
  61 {
  62     ConnectionPointContainer *This = impl_from_IConnectionPointContainer(iface);
  63     return IUnknown_AddRef(This->impl);
  64 }
  65
  66 static ULONG WINAPI ConnectionPointContainer_Release(IConnectionPointContainer *iface)
  67 {
  68     ConnectionPointContainer *This = impl_from_IConnectionPointContainer(iface);
  69     return IUnknown_Release(This->impl);
  70 }
  71
  72 static HRESULT WINAPI ConnectionPointContainer_EnumConnectionPoints(IConnectionPointContainer *iface,
  73         LPENUMCONNECTIONPOINTS *ppEnum)
  74 {
  75     ConnectionPointContainer *This = impl_from_IConnectionPointContainer(iface);
  76     FIXME("(%p)->(%p)\n", This, ppEnum);
  77     return E_NOTIMPL;
  78 }
  79
  80 static HRESULT WINAPI ConnectionPointContainer_FindConnectionPoint(IConnectionPointContainer *iface,
  81         REFIID riid, LPCONNECTIONPOINT *ppCP)
  82 {
  83     ConnectionPointContainer *This = impl_from_IConnectionPointContainer(iface);
  84
  85     if(!ppCP) {
  86         WARN("ppCP == NULL\n");
  87         return E_POINTER;
  88     }
  89
  90     *ppCP = NULL;
  91
  92     if(IsEqualGUID(&DIID_DWebBrowserEvents2, riid)) {
  93         TRACE("(%p)->(DIID_DWebBrowserEvents2 %p)\n", This, ppCP);
  94         *ppCP = &This->wbe2->IConnectionPoint_iface;
  95     }else if(IsEqualGUID(&DIID_DWebBrowserEvents, riid)) {
  96         TRACE("(%p)->(DIID_DWebBrowserEvents %p)\n", This, ppCP);
  97         *ppCP = &This->wbe->IConnectionPoint_iface;
  98     }else if(IsEqualGUID(&IID_IPropertyNotifySink, riid)) {
  99         TRACE("(%p)->(IID_IPropertyNotifySink %p)\n", This, ppCP);
 100         *ppCP = &This->pns->IConnectionPoint_iface;
 101     }
 102
 103     if(*ppCP) {
 104         IConnectionPoint_AddRef(*ppCP);
 105         return S_OK;
 106     }
 107
 108     WARN("Unsupported IID %s\n", debugstr_guid(riid));
 109     return CONNECT_E_NOCONNECTION;
 110 }
 111
 112 static const IConnectionPointContainerVtbl ConnectionPointContainerVtbl =
 113 {
 114     ConnectionPointContainer_QueryInterface,
 115     ConnectionPointContainer_AddRef,
 116     ConnectionPointContainer_Release,
 117     ConnectionPointContainer_EnumConnectionPoints,
 118     ConnectionPointContainer_FindConnectionPoint
 119 };
 120
 121
 122 /**********************************************************************
 123  * Implement the IConnectionPoint interface
 124  */
 125
 126 static inline ConnectionPoint *impl_from_IConnectionPoint(IConnectionPoint *iface)
 127 {
 128     return CONTAINING_RECORD(iface, ConnectionPoint, IConnectionPoint_iface);
 129 }
 130
 131 typedef struct {
 132     IEnumConnections IEnumConnections_iface;
 133
 134     LONG ref;
 135
 136     ConnectionPoint *cp;
 137     DWORD iter;
 138 } EnumConnections;
 139
 140 static inline EnumConnections *impl_from_IEnumConnections(IEnumConnections *iface)
 141 {
 142     return CONTAINING_RECORD(iface, EnumConnections, IEnumConnections_iface);
 143 }
 144
 145 static HRESULT WINAPI EnumConnections_QueryInterface(IEnumConnections *iface, REFIID riid, void **ppv)
 146 {
 147     EnumConnections *This = impl_from_IEnumConnections(iface);
 148
 149     if(IsEqualGUID(&IID_IUnknown, riid)) {
 150         TRACE("(%p)->(IID_IUnknown %p)\n", This, ppv);
 151         *ppv = &This->IEnumConnections_iface;
 152     }else if(IsEqualGUID(&IID_IEnumConnections, riid)) {
 153         TRACE("(%p)->(IID_IEnumConnections %p)\n", This, ppv);
 154         *ppv = &This->IEnumConnections_iface;
 155     }else {
 156         WARN("Unsupported interface %s\n", debugstr_guid(riid));
 157         *ppv = NULL;
 158         return E_NOINTERFACE;
 159     }
 160
 161     IUnknown_AddRef((IUnknown*)*ppv);
 162     return S_OK;
 163 }
 164
 165 static ULONG WINAPI EnumConnections_AddRef(IEnumConnections *iface)
 166 {
 167     EnumConnections *This = impl_from_IEnumConnections(iface);
 168     LONG ref = InterlockedIncrement(&This->ref);
 169
 170     TRACE("(%p) ref=%ld\n", This, ref);
 171
 172     return ref;
 173 }
 174
 175 static ULONG WINAPI EnumConnections_Release(IEnumConnections *iface)
 176 {
 177     EnumConnections *This = impl_from_IEnumConnections(iface);
 178     LONG ref = InterlockedDecrement(&This->ref);
 179
 180     TRACE("(%p) ref=%ld\n", This, ref);
 181
 182     if(!ref) {
 183         IConnectionPoint_Release(&This->cp->IConnectionPoint_iface);
 184         free(This);
 185     }
 186
 187     return ref;
 188 }
 189
 190 static HRESULT WINAPI EnumConnections_Next(IEnumConnections *iface, ULONG cConnections, CONNECTDATA *pgcd, ULONG *pcFetched)
 191 {
 192     EnumConnections *This = impl_from_IEnumConnections(iface);
 193     ULONG cnt = 0;
 194
 195     TRACE("(%p)->(%lu %p %p)\n", This, cConnections, pgcd, pcFetched);
 196
 197     while(cConnections--) {
 198         while(This->iter < This->cp->sinks_size && !This->cp->sinks[This->iter])
 199             This->iter++;
 200         if(This->iter == This->cp->sinks_size)
 201             break;
 202
 203         pgcd[cnt].pUnk = (IUnknown*)This->cp->sinks[This->iter];
 204         pgcd[cnt].dwCookie = cnt+1;
 205         This->iter++;
 206         cnt++;
 207     }
 208
 209     if(pcFetched)
 210         *pcFetched = cnt;
 211     return cnt ? S_OK : S_FALSE;
 212 }
 213
 214 static HRESULT WINAPI EnumConnections_Skip(IEnumConnections *iface, ULONG cConnections)
 215 {
 216     EnumConnections *This = impl_from_IEnumConnections(iface);
 217     FIXME("(%p)->(%lu)\n", This, cConnections);
 218     return E_NOTIMPL;
 219 }
 220
 221 static HRESULT WINAPI EnumConnections_Reset(IEnumConnections *iface)
 222 {
 223     EnumConnections *This = impl_from_IEnumConnections(iface);
 224     FIXME("(%p)\n", This);
 225     return E_NOTIMPL;
 226 }
 227
 228 static HRESULT WINAPI EnumConnections_Clone(IEnumConnections *iface, IEnumConnections **ppEnum)
 229 {
 230     EnumConnections *This = impl_from_IEnumConnections(iface);
 231     FIXME("(%p)->(%p)\n", This, ppEnum);
 232     return E_NOTIMPL;
 233 }
 234
 235 static const IEnumConnectionsVtbl EnumConnectionsVtbl = {
 236     EnumConnections_QueryInterface,
 237     EnumConnections_AddRef,
 238     EnumConnections_Release,
 239     EnumConnections_Next,
 240     EnumConnections_Skip,
 241     EnumConnections_Reset,
 242     EnumConnections_Clone
 243 };
 244
 245 static HRESULT WINAPI ConnectionPoint_QueryInterface(IConnectionPoint *iface,
 246                                                      REFIID riid, LPVOID *ppv)
 247 {
 248     ConnectionPoint *This = impl_from_IConnectionPoint(iface);
 249
 250     *ppv = NULL;
 251
 252     if(IsEqualGUID(&IID_IUnknown, riid)) {
 253         TRACE("(%p)->(IID_IUnknown %p)\n", This, ppv);
 254         *ppv = &This->IConnectionPoint_iface;
 255     }else if(IsEqualGUID(&IID_IConnectionPoint, riid)) {
 256         TRACE("(%p)->(IID_IConnectionPoint %p)\n", This, ppv);
 257         *ppv = &This->IConnectionPoint_iface;
 258     }
 259
 260     if(*ppv) {
 261         IConnectionPointContainer_AddRef(This->container);
 262         return S_OK;
 263     }
 264
 265     WARN("Unsupported interface %s\n", debugstr_guid(riid));
 266     return E_NOINTERFACE;
 267 }
 268
 269 static ULONG WINAPI ConnectionPoint_AddRef(IConnectionPoint *iface)
 270 {
 271     ConnectionPoint *This = impl_from_IConnectionPoint(iface);
 272     return IConnectionPointContainer_AddRef(This->container);
 273 }
 274
 275 static ULONG WINAPI ConnectionPoint_Release(IConnectionPoint *iface)
 276 {
 277     ConnectionPoint *This = impl_from_IConnectionPoint(iface);
 278     return IConnectionPointContainer_Release(This->container);
 279 }
 280
 281 static HRESULT WINAPI ConnectionPoint_GetConnectionInterface(IConnectionPoint *iface, IID *pIID)
 282 {
 283     ConnectionPoint *This = impl_from_IConnectionPoint(iface);
 284
 285     TRACE("(%p)->(%p)\n", This, pIID);
 286
 287     *pIID = This->iid;
 288     return S_OK;
 289 }
 290
 291 static HRESULT WINAPI ConnectionPoint_GetConnectionPointContainer(IConnectionPoint *iface,
 292         IConnectionPointContainer **ppCPC)
 293 {
 294     ConnectionPoint *This = impl_from_IConnectionPoint(iface);
 295
 296     TRACE("(%p)->(%p)\n", This, ppCPC);
 297
 298     *ppCPC = This->container;
 299     IConnectionPointContainer_AddRef(This->container);
 300     return S_OK;
 301 }
 302
 303 static HRESULT WINAPI ConnectionPoint_Advise(IConnectionPoint *iface, IUnknown *pUnkSink,
 304                                              DWORD *pdwCookie)
 305 {
 306     ConnectionPoint *This = impl_from_IConnectionPoint(iface);
 307     IDispatch *disp;
 308     DWORD i;
 309     HRESULT hres;
 310
 311     TRACE("(%p)->(%p %p)\n", This, pUnkSink, pdwCookie);
 312
 313     hres = IUnknown_QueryInterface(pUnkSink, &This->iid, (void**)&disp);
 314     if(FAILED(hres)) {
 315         hres = IUnknown_QueryInterface(pUnkSink, &IID_IDispatch, (void**)&disp);
 316         if(FAILED(hres))
 317             return CONNECT_E_CANNOTCONNECT;
 318     }
 319
 320     if(This->sinks) {
 321         for(i=0; i<This->sinks_size; i++) {
 322             if(!This->sinks[i])
 323                 break;
 324         }
 325
 326         if(i == This->sinks_size)
 327             This->sinks = realloc(This->sinks, (++This->sinks_size) * sizeof(*This->sinks));
 328     }else {
 329         This->sinks = malloc(sizeof(*This->sinks));
 330         This->sinks_size = 1;
 331         i = 0;
 332     }
 333
 334     This->sinks[i] = disp;
 335     *pdwCookie = i+1;
 336
 337     return S_OK;
 338 }
 339
 340 static HRESULT WINAPI ConnectionPoint_Unadvise(IConnectionPoint *iface, DWORD dwCookie)
 341 {
 342     ConnectionPoint *This = impl_from_IConnectionPoint(iface);
 343
 344     TRACE("(%p)->(%ld)\n", This, dwCookie);
 345
 346     if(!dwCookie || dwCookie > This->sinks_size || !This->sinks[dwCookie-1])
 347         return CONNECT_E_NOCONNECTION;
 348
 349     IDispatch_Release(This->sinks[dwCookie-1]);
 350     This->sinks[dwCookie-1] = NULL;
 351
 352     return S_OK;
 353 }
 354
 355 static HRESULT WINAPI ConnectionPoint_EnumConnections(IConnectionPoint *iface,
 356                                                       IEnumConnections **ppEnum)
 357 {
 358     ConnectionPoint *This = impl_from_IConnectionPoint(iface);
 359     EnumConnections *ret;
 360
 361     TRACE("(%p)->(%p)\n", This, ppEnum);
 362
 363     ret = malloc(sizeof(*ret));
 364     if(!ret)
 365         return E_OUTOFMEMORY;
 366
 367     ret->IEnumConnections_iface.lpVtbl = &EnumConnectionsVtbl;
 368     ret->ref = 1;
 369     ret->iter = 0;
 370
 371     IConnectionPoint_AddRef(&This->IConnectionPoint_iface);
 372     ret->cp = This;
 373
 374     *ppEnum = &ret->IEnumConnections_iface;
 375     return S_OK;
 376 }
 377
 378 static const IConnectionPointVtbl ConnectionPointVtbl =
 379 {
 380     ConnectionPoint_QueryInterface,
 381     ConnectionPoint_AddRef,
 382     ConnectionPoint_Release,
 383     ConnectionPoint_GetConnectionInterface,
 384     ConnectionPoint_GetConnectionPointContainer,
 385     ConnectionPoint_Advise,
 386     ConnectionPoint_Unadvise,
 387     ConnectionPoint_EnumConnections
 388 };
 389
 390 void call_sink(ConnectionPoint *This, DISPID dispid, DISPPARAMS *dispparams)
 391 {
 392     DWORD i;
 393
 394     for(i=0; i<This->sinks_size; i++) {
 395         if(This->sinks[i])
 396             IDispatch_Invoke(This->sinks[i], dispid, &IID_NULL, LOCALE_SYSTEM_DEFAULT,
 397                              DISPATCH_METHOD, dispparams, NULL, NULL, NULL);
 398     }
 399 }
 400
 401 static void ConnectionPoint_Create(REFIID riid, ConnectionPoint **cp,
 402                                    IConnectionPointContainer *container)
 403 {
 404     ConnectionPoint *ret = malloc(sizeof(ConnectionPoint));
 405
 406     ret->IConnectionPoint_iface.lpVtbl = &ConnectionPointVtbl;
 407
 408     ret->sinks = NULL;
 409     ret->sinks_size = 0;
 410     ret->container = container;
 411
 412     ret->iid = *riid;
 413
 414     *cp = ret;
 415 }
 416
 417 static void ConnectionPoint_Destroy(ConnectionPoint *This)
 418 {
 419     DWORD i;
 420
 421     for(i=0; i<This->sinks_size; i++) {
 422         if(This->sinks[i])
 423             IDispatch_Release(This->sinks[i]);
 424     }
 425
 426     free(This->sinks);
 427     free(This);
 428 }
 429
 430 void ConnectionPointContainer_Init(ConnectionPointContainer *This, IUnknown *impl)
 431 {
 432     This->IConnectionPointContainer_iface.lpVtbl = &ConnectionPointContainerVtbl;
 433
 434     ConnectionPoint_Create(&DIID_DWebBrowserEvents2, &This->wbe2, &This->IConnectionPointContainer_iface);
 435     ConnectionPoint_Create(&DIID_DWebBrowserEvents,  &This->wbe,  &This->IConnectionPointContainer_iface);
 436     ConnectionPoint_Create(&IID_IPropertyNotifySink, &This->pns,  &This->IConnectionPointContainer_iface);
 437
 438     This->impl = impl;
 439 }
 440
 441 void ConnectionPointContainer_Destroy(ConnectionPointContainer *This)
 442 {
 443     ConnectionPoint_Destroy(This->wbe2);
 444     ConnectionPoint_Destroy(This->wbe);
 445     ConnectionPoint_Destroy(This->pns);
 446 }