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