git.oblomov.eu Git - wine/blob - 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 changeW[] = {'c','h','a','n','g','e',0};
  39 static const WCHAR onchangeW[] = {'o','n','c','h','a','n','g','e',0};
  40
  41 static const WCHAR clickW[] = {'c','l','i','c','k',0};
  42 static const WCHAR onclickW[] = {'o','n','c','l','i','c','k',0};
  43
  44 static const WCHAR keyupW[] = {'k','e','y','u','p',0};
  45 static const WCHAR onkeyupW[] = {'o','n','k','e','y','u','p',0};
  46
  47 static const WCHAR loadW[] = {'l','o','a','d',0};
  48 static const WCHAR onloadW[] = {'o','n','l','o','a','d',0};
  49
  50 typedef struct {
  51     LPCWSTR name;
  52     LPCWSTR attr_name;
  53     DWORD flags;
  54 } event_info_t;
  55
  56 #define EVENT_DEFAULTLISTENER    0x0001
  57
  58 static const event_info_t event_info[] = {
  59     {changeW,   onchangeW,   EVENT_DEFAULTLISTENER},
  60     {clickW,    onclickW,    EVENT_DEFAULTLISTENER},
  61     {keyupW,    onkeyupW,    EVENT_DEFAULTLISTENER},
  62     {loadW,     onloadW,     0}
  63 };
  64
  65 eventid_t str_to_eid(LPCWSTR str)
  66 {
  67     int i;
  68
  69     for(i=0; i < sizeof(event_info)/sizeof(event_info[0]); i++) {
  70         if(!strcmpW(event_info[i].name, str))
  71             return i;
  72     }
  73
  74     ERR("unknown type %s\n", debugstr_w(str));
  75     return EVENTID_LAST;
  76 }
  77
  78 typedef struct {
  79     DispatchEx dispex;
  80     const IHTMLEventObjVtbl  *lpIHTMLEventObjVtbl;
  81     LONG ref;
  82 } HTMLEventObj;
  83
  84 #define HTMLEVENTOBJ(x) ((IHTMLEventObj*) &(x)->lpIHTMLEventObjVtbl)
  85
  86 #define HTMLEVENTOBJ_THIS(iface) DEFINE_THIS(HTMLEventObj, IHTMLEventObj, iface)
  87
  88 static HRESULT WINAPI HTMLEventObj_QueryInterface(IHTMLEventObj *iface, REFIID riid, void **ppv)
  89 {
  90     HTMLEventObj *This = HTMLEVENTOBJ_THIS(iface);
  91
  92     *ppv = NULL;
  93
  94     if(IsEqualGUID(&IID_IUnknown, riid)) {
  95         TRACE("(%p)->(IID_IUnknown %p)\n", This, ppv);
  96         *ppv = HTMLEVENTOBJ(This);
  97     }else if(IsEqualGUID(&IID_IHTMLEventObj, riid)) {
  98         TRACE("(%p)->(IID_IHTMLEventObj %p)\n", This, ppv);
  99         *ppv = HTMLEVENTOBJ(This);
 100     }else if(dispex_query_interface(&This->dispex, riid, ppv)) {
 101         return *ppv ? S_OK : E_NOINTERFACE;
 102     }
 103
 104     if(*ppv) {
 105         IUnknown_AddRef((IUnknown*)*ppv);
 106         return S_OK;
 107     }
 108
 109     WARN("(%p)->(%s %p)\n", This, debugstr_guid(riid), ppv);
 110     return E_NOINTERFACE;
 111 }
 112
 113 static ULONG WINAPI HTMLEventObj_AddRef(IHTMLEventObj *iface)
 114 {
 115     HTMLEventObj *This = HTMLEVENTOBJ_THIS(iface);
 116     LONG ref = InterlockedIncrement(&This->ref);
 117
 118     TRACE("(%p) ref=%d\n", This, ref);
 119
 120     return ref;
 121 }
 122
 123 static ULONG WINAPI HTMLEventObj_Release(IHTMLEventObj *iface)
 124 {
 125     HTMLEventObj *This = HTMLEVENTOBJ_THIS(iface);
 126     LONG ref = InterlockedDecrement(&This->ref);
 127
 128     TRACE("(%p) ref=%d\n", This, ref);
 129
 130     if(!ref)
 131         heap_free(This);
 132
 133     return ref;
 134 }
 135
 136 static HRESULT WINAPI HTMLEventObj_GetTypeInfoCount(IHTMLEventObj *iface, UINT *pctinfo)
 137 {
 138     HTMLEventObj *This = HTMLEVENTOBJ_THIS(iface);
 139     FIXME("(%p)->(%p)\n", This, pctinfo);
 140     return E_NOTIMPL;
 141 }
 142
 143 static HRESULT WINAPI HTMLEventObj_GetTypeInfo(IHTMLEventObj *iface, UINT iTInfo,
 144                                               LCID lcid, ITypeInfo **ppTInfo)
 145 {
 146     HTMLEventObj *This = HTMLEVENTOBJ_THIS(iface);
 147     FIXME("(%p)->(%u %u %p)\n", This, iTInfo, lcid, ppTInfo);
 148     return E_NOTIMPL;
 149 }
 150
 151 static HRESULT WINAPI HTMLEventObj_GetIDsOfNames(IHTMLEventObj *iface, REFIID riid,
 152                                                 LPOLESTR *rgszNames, UINT cNames,
 153                                                 LCID lcid, DISPID *rgDispId)
 154 {
 155     HTMLEventObj *This = HTMLEVENTOBJ_THIS(iface);
 156     FIXME("(%p)->(%s %p %u %u %p)\n", This, debugstr_guid(riid), rgszNames, cNames,
 157           lcid, rgDispId);
 158     return E_NOTIMPL;
 159 }
 160
 161 static HRESULT WINAPI HTMLEventObj_Invoke(IHTMLEventObj *iface, DISPID dispIdMember,
 162                             REFIID riid, LCID lcid, WORD wFlags, DISPPARAMS *pDispParams,
 163                             VARIANT *pVarResult, EXCEPINFO *pExcepInfo, UINT *puArgErr)
 164 {
 165     HTMLEventObj *This = HTMLEVENTOBJ_THIS(iface);
 166     FIXME("(%p)->(%d %s %d %d %p %p %p %p)\n", This, dispIdMember, debugstr_guid(riid),
 167           lcid, wFlags, pDispParams, pVarResult, pExcepInfo, puArgErr);
 168     return E_NOTIMPL;
 169 }
 170
 171 static HRESULT WINAPI HTMLEventObj_get_srcElement(IHTMLEventObj *iface, IHTMLElement **p)
 172 {
 173     HTMLEventObj *This = HTMLEVENTOBJ_THIS(iface);
 174     FIXME("(%p)->(%p)\n", This, p);
 175     return E_NOTIMPL;
 176 }
 177
 178 static HRESULT WINAPI HTMLEventObj_get_altKey(IHTMLEventObj *iface, VARIANT_BOOL *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_get_ctrlKey(IHTMLEventObj *iface, VARIANT_BOOL *p)
 186 {
 187     HTMLEventObj *This = HTMLEVENTOBJ_THIS(iface);
 188     FIXME("(%p)->(%p)\n", This, p);
 189     return E_NOTIMPL;
 190 }
 191
 192 static HRESULT WINAPI HTMLEventObj_get_shiftKey(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_put_returnValue(IHTMLEventObj *iface, VARIANT v)
 200 {
 201     HTMLEventObj *This = HTMLEVENTOBJ_THIS(iface);
 202     FIXME("(%p)->()\n", This);
 203     return E_NOTIMPL;
 204 }
 205
 206 static HRESULT WINAPI HTMLEventObj_get_returnValue(IHTMLEventObj *iface, VARIANT *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_cancelBubble(IHTMLEventObj *iface, VARIANT_BOOL v)
 214 {
 215     HTMLEventObj *This = HTMLEVENTOBJ_THIS(iface);
 216     FIXME("(%p)->(%x)\n", This, v);
 217     return E_NOTIMPL;
 218 }
 219
 220 static HRESULT WINAPI HTMLEventObj_get_cancelBubble(IHTMLEventObj *iface, VARIANT_BOOL *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_fromElement(IHTMLEventObj *iface, IHTMLElement **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_toElement(IHTMLEventObj *iface, IHTMLElement **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_put_keyCode(IHTMLEventObj *iface, long v)
 242 {
 243     HTMLEventObj *This = HTMLEVENTOBJ_THIS(iface);
 244     FIXME("(%p)->(%ld)\n", This, v);
 245     return E_NOTIMPL;
 246 }
 247
 248 static HRESULT WINAPI HTMLEventObj_get_keyCode(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_button(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_type(IHTMLEventObj *iface, BSTR *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_qualifier(IHTMLEventObj *iface, BSTR *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_reason(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_x(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_y(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_clientX(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_clientY(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_offsetX(IHTMLEventObj *iface, long *p)
 312 {
 313     HTMLEventObj *This = HTMLEVENTOBJ_THIS(iface);
 314     FIXME("(%p)->(%p)\n", This, p);
 315     return E_NOTIMPL;
 316 }
 317
 318 static HRESULT WINAPI HTMLEventObj_get_offsetY(IHTMLEventObj *iface, long *p)
 319 {
 320     HTMLEventObj *This = HTMLEVENTOBJ_THIS(iface);
 321     FIXME("(%p)->(%p)\n", This, p);
 322     return E_NOTIMPL;
 323 }
 324
 325 static HRESULT WINAPI HTMLEventObj_get_screenX(IHTMLEventObj *iface, long *p)
 326 {
 327     HTMLEventObj *This = HTMLEVENTOBJ_THIS(iface);
 328     FIXME("(%p)->(%p)\n", This, p);
 329     return E_NOTIMPL;
 330 }
 331
 332 static HRESULT WINAPI HTMLEventObj_get_screenY(IHTMLEventObj *iface, long *p)
 333 {
 334     HTMLEventObj *This = HTMLEVENTOBJ_THIS(iface);
 335     FIXME("(%p)->(%p)\n", This, p);
 336     return E_NOTIMPL;
 337 }
 338
 339 static HRESULT WINAPI HTMLEventObj_get_srcFilter(IHTMLEventObj *iface, IDispatch **p)
 340 {
 341     HTMLEventObj *This = HTMLEVENTOBJ_THIS(iface);
 342     FIXME("(%p)->(%p)\n", This, p);
 343     return E_NOTIMPL;
 344 }
 345
 346 #undef HTMLEVENTOBJ_THIS
 347
 348 static const IHTMLEventObjVtbl HTMLEventObjVtbl = {
 349     HTMLEventObj_QueryInterface,
 350     HTMLEventObj_AddRef,
 351     HTMLEventObj_Release,
 352     HTMLEventObj_GetTypeInfoCount,
 353     HTMLEventObj_GetTypeInfo,
 354     HTMLEventObj_GetIDsOfNames,
 355     HTMLEventObj_Invoke,
 356     HTMLEventObj_get_srcElement,
 357     HTMLEventObj_get_altKey,
 358     HTMLEventObj_get_ctrlKey,
 359     HTMLEventObj_get_shiftKey,
 360     HTMLEventObj_put_returnValue,
 361     HTMLEventObj_get_returnValue,
 362     HTMLEventObj_put_cancelBubble,
 363     HTMLEventObj_get_cancelBubble,
 364     HTMLEventObj_get_fromElement,
 365     HTMLEventObj_get_toElement,
 366     HTMLEventObj_put_keyCode,
 367     HTMLEventObj_get_keyCode,
 368     HTMLEventObj_get_button,
 369     HTMLEventObj_get_type,
 370     HTMLEventObj_get_qualifier,
 371     HTMLEventObj_get_reason,
 372     HTMLEventObj_get_x,
 373     HTMLEventObj_get_y,
 374     HTMLEventObj_get_clientX,
 375     HTMLEventObj_get_clientY,
 376     HTMLEventObj_get_offsetX,
 377     HTMLEventObj_get_offsetY,
 378     HTMLEventObj_get_screenX,
 379     HTMLEventObj_get_screenY,
 380     HTMLEventObj_get_srcFilter
 381 };
 382
 383 static const tid_t HTMLEventObj_iface_tids[] = {
 384     IHTMLEventObj_tid,
 385     0
 386 };
 387
 388 static dispex_static_data_t HTMLEventObj_dispex = {
 389     NULL,
 390     DispCEventObj_tid,
 391     NULL,
 392     HTMLEventObj_iface_tids
 393 };
 394
 395 static IHTMLEventObj *create_event(void)
 396 {
 397     HTMLEventObj *ret;
 398
 399     ret = heap_alloc(sizeof(*ret));
 400     ret->lpIHTMLEventObjVtbl = &HTMLEventObjVtbl;
 401     ret->ref = 1;
 402
 403     init_dispex(&ret->dispex, (IUnknown*)HTMLEVENTOBJ(ret), &HTMLEventObj_dispex);
 404
 405     return HTMLEVENTOBJ(ret);
 406 }
 407
 408 void fire_event(HTMLDocument *doc, eventid_t eid, nsIDOMNode *target)
 409 {
 410     HTMLDOMNode *node;
 411
 412     node = get_node(doc, target, FALSE);
 413     if(!node)
 414         return;
 415
 416     if(node->event_target && node->event_target->event_table[eid]) {
 417         doc->window->event = create_event();
 418
 419         TRACE("%s >>>\n", debugstr_w(event_info[eid].name));
 420         call_disp_func(doc, node->event_target->event_table[eid]);
 421         TRACE("%s <<<\n", debugstr_w(event_info[eid].name));
 422
 423         IHTMLEventObj_Release(doc->window->event);
 424         doc->window->event = NULL;
 425     }
 426 }
 427
 428 static HRESULT set_node_event_disp(HTMLDOMNode *node, eventid_t eid, IDispatch *disp)
 429 {
 430     if(!node->event_target)
 431         node->event_target = heap_alloc_zero(sizeof(event_target_t));
 432     else if(node->event_target->event_table[eid])
 433         IDispatch_Release(node->event_target->event_table[eid]);
 434
 435     IDispatch_AddRef(disp);
 436     node->event_target->event_table[eid] = disp;
 437
 438     if((event_info[eid].flags & EVENT_DEFAULTLISTENER) && !node->doc->nscontainer->event_vector[eid]) {
 439         node->doc->nscontainer->event_vector[eid] = TRUE;
 440         add_nsevent_listener(node->doc->nscontainer, event_info[eid].name);
 441     }
 442
 443     return S_OK;
 444 }
 445
 446 HRESULT set_node_event(HTMLDOMNode *node, eventid_t eid, VARIANT *var)
 447 {
 448     switch(V_VT(var)) {
 449     case VT_DISPATCH:
 450         return set_node_event_disp(node, eid, V_DISPATCH(var));
 451
 452     default:
 453         FIXME("not supported vt=%d\n", V_VT(var));
 454     }
 455
 456     return E_NOTIMPL;
 457 }
 458
 459 void check_event_attr(HTMLDocument *doc, nsIDOMElement *nselem)
 460 {
 461     const PRUnichar *attr_value;
 462     nsAString attr_name_str, attr_value_str;
 463     IDispatch *disp;
 464     HTMLDOMNode *node;
 465     int i;
 466     nsresult nsres;
 467
 468     nsAString_Init(&attr_value_str, NULL);
 469     nsAString_Init(&attr_name_str, NULL);
 470
 471     for(i=0; i < EVENTID_LAST; i++) {
 472         nsAString_SetData(&attr_name_str, event_info[i].attr_name);
 473         nsres = nsIDOMElement_GetAttribute(nselem, &attr_name_str, &attr_value_str);
 474         if(NS_SUCCEEDED(nsres)) {
 475             nsAString_GetData(&attr_value_str, &attr_value);
 476             if(!*attr_value)
 477                 continue;
 478
 479             TRACE("%p.%s = %s\n", nselem, debugstr_w(event_info[i].attr_name), debugstr_w(attr_value));
 480
 481             disp = script_parse_event(doc, attr_value);
 482             if(disp) {
 483                 node = get_node(doc, (nsIDOMNode*)nselem, TRUE);
 484                 set_node_event_disp(node, i, disp);
 485                 IDispatch_Release(disp);
 486             }
 487         }
 488     }
 489
 490     nsAString_Finish(&attr_value_str);
 491     nsAString_Finish(&attr_name_str);
 492 }
 493
 494 void release_event_target(event_target_t *event_target)
 495 {
 496     int i;
 497
 498     for(i=0; i < EVENTID_LAST; i++) {
 499         if(event_target->event_table[i])
 500             IDispatch_Release(event_target->event_table[i]);
 501     }
 502
 503     heap_free(event_target);
 504 }