dlls/mshtml/htmlevent.c

   1 /*
   2  * Copyright 2008 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 <stdarg.h>
  20
  21 #define COBJMACROS
  22
  23 #include "windef.h"
  24 #include "winbase.h"
  25 #include "winuser.h"
  26 #include "ole2.h"
  27
  28 #include "mshtml_private.h"
  29
  30 #include "wine/debug.h"
  31
  32 WINE_DEFAULT_DEBUG_CHANNEL(mshtml);
  33
  34 struct event_target_t {
  35     IDispatch *event_table[EVENTID_LAST];
  36 };
  37
  38 static const WCHAR loadW[] = {'l','o','a','d',0};
  39 static const WCHAR onloadW[] = {'o','n','l','o','a','d',0};
  40
  41 typedef struct {
  42     LPCWSTR name;
  43     LPCWSTR attr_name;
  44 } event_info_t;
  45
  46 static const event_info_t event_info[] = {
  47     {loadW, onloadW}
  48 };
  49
  50 typedef struct {
  51     const IHTMLEventObjVtbl  *lpIHTMLEventObjVtbl;
  52     LONG ref;
  53 } HTMLEventObj;
  54
  55 #define HTMLEVENTOBJ(x) ((IHTMLEventObj*) &(x)->lpIHTMLEventObjVtbl)
  56
  57 #define HTMLEVENTOBJ_THIS(iface) DEFINE_THIS(HTMLEventObj, IHTMLEventObj, iface)
  58
  59 static HRESULT WINAPI HTMLEventObj_QueryInterface(IHTMLEventObj *iface, REFIID riid, void **ppv)
  60 {
  61     HTMLEventObj *This = HTMLEVENTOBJ_THIS(iface);
  62
  63     *ppv = NULL;
  64
  65     if(IsEqualGUID(&IID_IUnknown, riid)) {
  66         TRACE("(%p)->(IID_IUnknown %p)\n", This, ppv);
  67         *ppv = HTMLEVENTOBJ(This);
  68     }else if(IsEqualGUID(&IID_IDispatch, riid)) {
  69         TRACE("(%p)->(IID_IDispatch %p)\n", This, ppv);
  70         *ppv = HTMLEVENTOBJ(This);
  71     }else if(IsEqualGUID(&IID_IHTMLEventObj, riid)) {
  72         TRACE("(%p)->(IID_IHTMLEventObj %p)\n", This, ppv);
  73         *ppv = HTMLEVENTOBJ(This);
  74     }
  75
  76     if(*ppv) {
  77         IUnknown_AddRef((IUnknown*)*ppv);
  78         return S_OK;
  79     }
  80
  81     WARN("(%p)->(%s %p)\n", This, debugstr_guid(riid), ppv);
  82     return E_NOINTERFACE;
  83 }
  84
  85 static ULONG WINAPI HTMLEventObj_AddRef(IHTMLEventObj *iface)
  86 {
  87     HTMLEventObj *This = HTMLEVENTOBJ_THIS(iface);
  88     LONG ref = InterlockedIncrement(&This->ref);
  89
  90     TRACE("(%p) ref=%d\n", This, ref);
  91
  92     return ref;
  93 }
  94
  95 static ULONG WINAPI HTMLEventObj_Release(IHTMLEventObj *iface)
  96 {
  97     HTMLEventObj *This = HTMLEVENTOBJ_THIS(iface);
  98     LONG ref = InterlockedDecrement(&This->ref);
  99
 100     TRACE("(%p) ref=%d\n", This, ref);
 101
 102     if(!ref)
 103         heap_free(This);
 104
 105     return ref;
 106 }
 107
 108 static HRESULT WINAPI HTMLEventObj_GetTypeInfoCount(IHTMLEventObj *iface, UINT *pctinfo)
 109 {
 110     HTMLEventObj *This = HTMLEVENTOBJ_THIS(iface);
 111     FIXME("(%p)->(%p)\n", This, pctinfo);
 112     return E_NOTIMPL;
 113 }
 114
 115 static HRESULT WINAPI HTMLEventObj_GetTypeInfo(IHTMLEventObj *iface, UINT iTInfo,
 116                                               LCID lcid, ITypeInfo **ppTInfo)
 117 {
 118     HTMLEventObj *This = HTMLEVENTOBJ_THIS(iface);
 119     FIXME("(%p)->(%u %u %p)\n", This, iTInfo, lcid, ppTInfo);
 120     return E_NOTIMPL;
 121 }
 122
 123 static HRESULT WINAPI HTMLEventObj_GetIDsOfNames(IHTMLEventObj *iface, REFIID riid,
 124                                                 LPOLESTR *rgszNames, UINT cNames,
 125                                                 LCID lcid, DISPID *rgDispId)
 126 {
 127     HTMLEventObj *This = HTMLEVENTOBJ_THIS(iface);
 128     FIXME("(%p)->(%s %p %u %u %p)\n", This, debugstr_guid(riid), rgszNames, cNames,
 129           lcid, rgDispId);
 130     return E_NOTIMPL;
 131 }
 132
 133 static HRESULT WINAPI HTMLEventObj_Invoke(IHTMLEventObj *iface, DISPID dispIdMember,
 134                             REFIID riid, LCID lcid, WORD wFlags, DISPPARAMS *pDispParams,
 135                             VARIANT *pVarResult, EXCEPINFO *pExcepInfo, UINT *puArgErr)
 136 {
 137     HTMLEventObj *This = HTMLEVENTOBJ_THIS(iface);
 138     FIXME("(%p)->(%d %s %d %d %p %p %p %p)\n", This, dispIdMember, debugstr_guid(riid),
 139           lcid, wFlags, pDispParams, pVarResult, pExcepInfo, puArgErr);
 140     return E_NOTIMPL;
 141 }
 142
 143 static HRESULT WINAPI HTMLEventObj_get_srcElement(IHTMLEventObj *iface, IHTMLElement **p)
 144 {
 145     HTMLEventObj *This = HTMLEVENTOBJ_THIS(iface);
 146     FIXME("(%p)->(%p)\n", This, p);
 147     return E_NOTIMPL;
 148 }
 149
 150 static HRESULT WINAPI HTMLEventObj_get_altKey(IHTMLEventObj *iface, VARIANT_BOOL *p)
 151 {
 152     HTMLEventObj *This = HTMLEVENTOBJ_THIS(iface);
 153     FIXME("(%p)->(%p)\n", This, p);
 154     return E_NOTIMPL;
 155 }
 156
 157 static HRESULT WINAPI HTMLEventObj_get_ctrlKey(IHTMLEventObj *iface, VARIANT_BOOL *p)
 158 {
 159     HTMLEventObj *This = HTMLEVENTOBJ_THIS(iface);
 160     FIXME("(%p)->(%p)\n", This, p);
 161     return E_NOTIMPL;
 162 }
 163
 164 static HRESULT WINAPI HTMLEventObj_get_shiftKey(IHTMLEventObj *iface, VARIANT_BOOL *p)
 165 {
 166     HTMLEventObj *This = HTMLEVENTOBJ_THIS(iface);
 167     FIXME("(%p)->(%p)\n", This, p);
 168     return E_NOTIMPL;
 169 }
 170
 171 static HRESULT WINAPI HTMLEventObj_put_returnValue(IHTMLEventObj *iface, VARIANT v)
 172 {
 173     HTMLEventObj *This = HTMLEVENTOBJ_THIS(iface);
 174     FIXME("(%p)->()\n", This);
 175     return E_NOTIMPL;
 176 }
 177
 178 static HRESULT WINAPI HTMLEventObj_get_returnValue(IHTMLEventObj *iface, VARIANT *p)
 179 {
 180     HTMLEventObj *This = HTMLEVENTOBJ_THIS(iface);
 181     FIXME("(%p)->(%p)\n", This, p);
 182     return E_NOTIMPL;
 183 }
 184
 185 static HRESULT WINAPI HTMLEventObj_put_cancelBubble(IHTMLEventObj *iface, VARIANT_BOOL v)
 186 {
 187     HTMLEventObj *This = HTMLEVENTOBJ_THIS(iface);
 188     FIXME("(%p)->(%x)\n", This, v);
 189     return E_NOTIMPL;
 190 }
 191
 192 static HRESULT WINAPI HTMLEventObj_get_cancelBubble(IHTMLEventObj *iface, VARIANT_BOOL *p)
 193 {
 194     HTMLEventObj *This = HTMLEVENTOBJ_THIS(iface);
 195     FIXME("(%p)->(%p)\n", This, p);
 196     return E_NOTIMPL;
 197 }
 198
 199 static HRESULT WINAPI HTMLEventObj_get_fromElement(IHTMLEventObj *iface, IHTMLElement **p)
 200 {
 201     HTMLEventObj *This = HTMLEVENTOBJ_THIS(iface);
 202     FIXME("(%p)->(%p)\n", This, p);
 203     return E_NOTIMPL;
 204 }
 205
 206 static HRESULT WINAPI HTMLEventObj_get_toElement(IHTMLEventObj *iface, IHTMLElement **p)
 207 {
 208     HTMLEventObj *This = HTMLEVENTOBJ_THIS(iface);
 209     FIXME("(%p)->(%p)\n", This, p);
 210     return E_NOTIMPL;
 211 }
 212
 213 static HRESULT WINAPI HTMLEventObj_put_keyCode(IHTMLEventObj *iface, long v)
 214 {
 215     HTMLEventObj *This = HTMLEVENTOBJ_THIS(iface);
 216     FIXME("(%p)->(%ld)\n", This, v);
 217     return E_NOTIMPL;
 218 }
 219
 220 static HRESULT WINAPI HTMLEventObj_get_keyCode(IHTMLEventObj *iface, long *p)
 221 {
 222     HTMLEventObj *This = HTMLEVENTOBJ_THIS(iface);
 223     FIXME("(%p)->(%p)\n", This, p);
 224     return E_NOTIMPL;
 225 }
 226
 227 static HRESULT WINAPI HTMLEventObj_get_button(IHTMLEventObj *iface, long *p)
 228 {
 229     HTMLEventObj *This = HTMLEVENTOBJ_THIS(iface);
 230     FIXME("(%p)->(%p)\n", This, p);
 231     return E_NOTIMPL;
 232 }
 233
 234 static HRESULT WINAPI HTMLEventObj_get_type(IHTMLEventObj *iface, BSTR *p)
 235 {
 236     HTMLEventObj *This = HTMLEVENTOBJ_THIS(iface);
 237     FIXME("(%p)->(%p)\n", This, p);
 238     return E_NOTIMPL;
 239 }
 240
 241 static HRESULT WINAPI HTMLEventObj_get_qualifier(IHTMLEventObj *iface, BSTR *p)
 242 {
 243     HTMLEventObj *This = HTMLEVENTOBJ_THIS(iface);
 244     FIXME("(%p)->(%p)\n", This, p);
 245     return E_NOTIMPL;
 246 }
 247
 248 static HRESULT WINAPI HTMLEventObj_get_reason(IHTMLEventObj *iface, long *p)
 249 {
 250     HTMLEventObj *This = HTMLEVENTOBJ_THIS(iface);
 251     FIXME("(%p)->(%p)\n", This, p);
 252     return E_NOTIMPL;
 253 }
 254
 255 static HRESULT WINAPI HTMLEventObj_get_x(IHTMLEventObj *iface, long *p)
 256 {
 257     HTMLEventObj *This = HTMLEVENTOBJ_THIS(iface);
 258     FIXME("(%p)->(%p)\n", This, p);
 259     return E_NOTIMPL;
 260 }
 261
 262 static HRESULT WINAPI HTMLEventObj_get_y(IHTMLEventObj *iface, long *p)
 263 {
 264     HTMLEventObj *This = HTMLEVENTOBJ_THIS(iface);
 265     FIXME("(%p)->(%p)\n", This, p);
 266     return E_NOTIMPL;
 267 }
 268
 269 static HRESULT WINAPI HTMLEventObj_get_clientX(IHTMLEventObj *iface, long *p)
 270 {
 271     HTMLEventObj *This = HTMLEVENTOBJ_THIS(iface);
 272     FIXME("(%p)->(%p)\n", This, p);
 273     return E_NOTIMPL;
 274 }
 275
 276 static HRESULT WINAPI HTMLEventObj_get_clientY(IHTMLEventObj *iface, long *p)
 277 {
 278     HTMLEventObj *This = HTMLEVENTOBJ_THIS(iface);
 279     FIXME("(%p)->(%p)\n", This, p);
 280     return E_NOTIMPL;
 281 }
 282
 283 static HRESULT WINAPI HTMLEventObj_get_offsetX(IHTMLEventObj *iface, long *p)
 284 {
 285     HTMLEventObj *This = HTMLEVENTOBJ_THIS(iface);
 286     FIXME("(%p)->(%p)\n", This, p);
 287     return E_NOTIMPL;
 288 }
 289
 290 static HRESULT WINAPI HTMLEventObj_get_offsetY(IHTMLEventObj *iface, long *p)
 291 {
 292     HTMLEventObj *This = HTMLEVENTOBJ_THIS(iface);
 293     FIXME("(%p)->(%p)\n", This, p);
 294     return E_NOTIMPL;
 295 }
 296
 297 static HRESULT WINAPI HTMLEventObj_get_screenX(IHTMLEventObj *iface, long *p)
 298 {
 299     HTMLEventObj *This = HTMLEVENTOBJ_THIS(iface);
 300     FIXME("(%p)->(%p)\n", This, p);
 301     return E_NOTIMPL;
 302 }
 303
 304 static HRESULT WINAPI HTMLEventObj_get_screenY(IHTMLEventObj *iface, long *p)
 305 {
 306     HTMLEventObj *This = HTMLEVENTOBJ_THIS(iface);
 307     FIXME("(%p)->(%p)\n", This, p);
 308     return E_NOTIMPL;
 309 }
 310
 311 static HRESULT WINAPI HTMLEventObj_get_srcFilter(IHTMLEventObj *iface, IDispatch **p)
 312 {
 313     HTMLEventObj *This = HTMLEVENTOBJ_THIS(iface);
 314     FIXME("(%p)->(%p)\n", This, p);
 315     return E_NOTIMPL;
 316 }
 317
 318 #undef HTMLEVENTOBJ_THIS
 319
 320 static const IHTMLEventObjVtbl HTMLEventObjVtbl = {
 321     HTMLEventObj_QueryInterface,
 322     HTMLEventObj_AddRef,
 323     HTMLEventObj_Release,
 324     HTMLEventObj_GetTypeInfoCount,
 325     HTMLEventObj_GetTypeInfo,
 326     HTMLEventObj_GetIDsOfNames,
 327     HTMLEventObj_Invoke,
 328     HTMLEventObj_get_srcElement,
 329     HTMLEventObj_get_altKey,
 330     HTMLEventObj_get_ctrlKey,
 331     HTMLEventObj_get_shiftKey,
 332     HTMLEventObj_put_returnValue,
 333     HTMLEventObj_get_returnValue,
 334     HTMLEventObj_put_cancelBubble,
 335     HTMLEventObj_get_cancelBubble,
 336     HTMLEventObj_get_fromElement,
 337     HTMLEventObj_get_toElement,
 338     HTMLEventObj_put_keyCode,
 339     HTMLEventObj_get_keyCode,
 340     HTMLEventObj_get_button,
 341     HTMLEventObj_get_type,
 342     HTMLEventObj_get_qualifier,
 343     HTMLEventObj_get_reason,
 344     HTMLEventObj_get_x,
 345     HTMLEventObj_get_y,
 346     HTMLEventObj_get_clientX,
 347     HTMLEventObj_get_clientY,
 348     HTMLEventObj_get_offsetX,
 349     HTMLEventObj_get_offsetY,
 350     HTMLEventObj_get_screenX,
 351     HTMLEventObj_get_screenY,
 352     HTMLEventObj_get_srcFilter
 353 };
 354
 355 static IHTMLEventObj *create_event(void)
 356 {
 357     HTMLEventObj *ret;
 358
 359     ret = heap_alloc(sizeof(*ret));
 360     ret->lpIHTMLEventObjVtbl = &HTMLEventObjVtbl;
 361     ret->ref = 1;
 362
 363     return HTMLEVENTOBJ(ret);
 364 }
 365
 366 void fire_event(HTMLDocument *doc, eventid_t eid, nsIDOMNode *target)
 367 {
 368     HTMLDOMNode *node;
 369
 370     node = get_node(doc, target, FALSE);
 371     if(!node)
 372         return;
 373
 374     if(node->event_target && node->event_target->event_table[eid]) {
 375         doc->window->event = create_event();
 376
 377         call_disp_func(doc, node->event_target->event_table[eid]);
 378
 379         IHTMLEventObj_Release(doc->window->event);
 380         doc->window->event = NULL;
 381     }
 382 }
 383
 384 void check_event_attr(HTMLDocument *doc, nsIDOMElement *nselem)
 385 {
 386     const PRUnichar *attr_value;
 387     nsAString attr_name_str, attr_value_str;
 388     IDispatch *disp;
 389     HTMLDOMNode *node;
 390     int i;
 391     nsresult nsres;
 392
 393     nsAString_Init(&attr_value_str, NULL);
 394     nsAString_Init(&attr_name_str, NULL);
 395
 396     for(i=0; i < EVENTID_LAST; i++) {
 397         nsAString_SetData(&attr_name_str, event_info[i].attr_name);
 398         nsres = nsIDOMElement_GetAttribute(nselem, &attr_name_str, &attr_value_str);
 399         if(NS_SUCCEEDED(nsres)) {
 400             nsAString_GetData(&attr_value_str, &attr_value);
 401             if(!*attr_value)
 402                 continue;
 403
 404             TRACE("%p.%s = %s\n", nselem, debugstr_w(event_info[i].attr_name), debugstr_w(attr_value));
 405
 406             disp = script_parse_event(doc, attr_value);
 407             if(disp) {
 408                 node = get_node(doc, (nsIDOMNode*)nselem, TRUE);
 409                 if(!node->event_target)
 410                     node->event_target = heap_alloc_zero(sizeof(event_target_t));
 411                 node->event_target->event_table[i] = disp;
 412             }
 413         }
 414     }
 415
 416     nsAString_Finish(&attr_value_str);
 417     nsAString_Finish(&attr_name_str);
 418 }
 419
 420 void release_event_target(event_target_t *event_target)
 421 {
 422     int i;
 423
 424     for(i=0; i < EVENTID_LAST; i++) {
 425         if(event_target->event_table[i])
 426             IDispatch_Release(event_target->event_table[i]);
 427     }
 428
 429     heap_free(event_target);
 430 }