mshtml: Added noscript tag handling tests.
[wine] / dlls / mshtml / nsevents.c
1 /*
2  * Copyright 2007-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 "config.h"
20
21 #include <stdarg.h>
22
23 #define COBJMACROS
24
25 #include "windef.h"
26 #include "winbase.h"
27 #include "winuser.h"
28 #include "ole2.h"
29 #include "mshtmcid.h"
30 #include "shlguid.h"
31
32 #include "wine/debug.h"
33
34 #include "mshtml_private.h"
35 #include "htmlevent.h"
36 #include "resource.h"
37
38 WINE_DEFAULT_DEBUG_CHANNEL(mshtml);
39
40 static const PRUnichar blurW[]      = {'b','l','u','r',0};
41 static const PRUnichar focusW[]     = {'f','o','c','u','s',0};
42 static const PRUnichar keypressW[]  = {'k','e','y','p','r','e','s','s',0};
43 static const PRUnichar loadW[]      = {'l','o','a','d',0};
44
45 typedef struct {
46     nsIDOMEventListener nsIDOMEventListener_iface;
47     nsDocumentEventListener *This;
48 } nsEventListener;
49
50 struct nsDocumentEventListener {
51     nsEventListener blur_listener;
52     nsEventListener focus_listener;
53     nsEventListener keypress_listener;
54     nsEventListener load_listener;
55     nsEventListener htmlevent_listener;
56
57     LONG ref;
58
59     HTMLDocumentNode *doc;
60 };
61
62 static LONG release_listener(nsDocumentEventListener *This)
63 {
64     LONG ref = InterlockedDecrement(&This->ref);
65
66     TRACE("(%p) ref=%d\n", This, ref);
67
68     if(!ref)
69         heap_free(This);
70
71     return ref;
72 }
73
74 static inline nsEventListener *impl_from_nsIDOMEventListener(nsIDOMEventListener *iface)
75 {
76     return CONTAINING_RECORD(iface, nsEventListener, nsIDOMEventListener_iface);
77 }
78
79 static nsresult NSAPI nsDOMEventListener_QueryInterface(nsIDOMEventListener *iface,
80         nsIIDRef riid, void **result)
81 {
82     nsEventListener *This = impl_from_nsIDOMEventListener(iface);
83
84     *result = NULL;
85
86     if(IsEqualGUID(&IID_nsISupports, riid)) {
87         TRACE("(%p)->(IID_nsISupports, %p)\n", This, result);
88         *result = &This->nsIDOMEventListener_iface;
89     }else if(IsEqualGUID(&IID_nsIDOMEventListener, riid)) {
90         TRACE("(%p)->(IID_nsIDOMEventListener %p)\n", This, result);
91         *result = &This->nsIDOMEventListener_iface;
92     }
93
94     if(*result) {
95         nsIDOMEventListener_AddRef(&This->nsIDOMEventListener_iface);
96         return NS_OK;
97     }
98
99     TRACE("(%p)->(%s %p)\n", This, debugstr_guid(riid), result);
100     return NS_NOINTERFACE;
101 }
102
103 static nsrefcnt NSAPI nsDOMEventListener_AddRef(nsIDOMEventListener *iface)
104 {
105     nsEventListener *This = impl_from_nsIDOMEventListener(iface);
106     LONG ref = InterlockedIncrement(&This->This->ref);
107
108     TRACE("(%p) ref=%d\n", This->This, ref);
109
110     return ref;
111 }
112
113 static nsrefcnt NSAPI nsDOMEventListener_Release(nsIDOMEventListener *iface)
114 {
115     nsEventListener *This = impl_from_nsIDOMEventListener(iface);
116
117     return release_listener(This->This);
118 }
119
120 static BOOL is_doc_child_focus(NSContainer *nscontainer)
121 {
122     HWND hwnd;
123
124     for(hwnd = GetFocus(); hwnd && hwnd != nscontainer->hwnd; hwnd = GetParent(hwnd));
125
126     return hwnd != NULL;
127 }
128
129 static nsresult NSAPI handle_blur(nsIDOMEventListener *iface, nsIDOMEvent *event)
130 {
131     nsEventListener *This = impl_from_nsIDOMEventListener(iface);
132     HTMLDocumentNode *doc = This->This->doc;
133     HTMLDocumentObj *doc_obj;
134
135     TRACE("(%p)\n", doc);
136
137     if(!doc || !doc->basedoc.doc_obj)
138         return NS_ERROR_FAILURE;
139     doc_obj = doc->basedoc.doc_obj;
140
141     if(doc_obj->focus && !is_doc_child_focus(doc_obj->nscontainer)) {
142         doc_obj->focus = FALSE;
143         notif_focus(doc_obj);
144     }
145
146     return NS_OK;
147 }
148
149 static nsresult NSAPI handle_focus(nsIDOMEventListener *iface, nsIDOMEvent *event)
150 {
151     nsEventListener *This = impl_from_nsIDOMEventListener(iface);
152     HTMLDocumentNode *doc = This->This->doc;
153     HTMLDocumentObj *doc_obj;
154
155     TRACE("(%p)\n", doc);
156
157     if(!doc)
158         return NS_ERROR_FAILURE;
159     doc_obj = doc->basedoc.doc_obj;
160
161     if(!doc_obj->focus) {
162         doc_obj->focus = TRUE;
163         notif_focus(doc_obj);
164     }
165
166     return NS_OK;
167 }
168
169 static nsresult NSAPI handle_keypress(nsIDOMEventListener *iface,
170         nsIDOMEvent *event)
171 {
172     nsEventListener *This = impl_from_nsIDOMEventListener(iface);
173     HTMLDocumentNode *doc = This->This->doc;
174     HTMLDocumentObj *doc_obj;
175
176     if(!doc)
177         return NS_ERROR_FAILURE;
178     doc_obj = doc->basedoc.doc_obj;
179
180     TRACE("(%p)->(%p)\n", doc, event);
181
182     update_doc(&doc_obj->basedoc, UPDATE_UI);
183     if(doc_obj->usermode == EDITMODE)
184         handle_edit_event(&doc_obj->basedoc, event);
185
186     return NS_OK;
187 }
188
189 static void handle_docobj_load(HTMLDocumentObj *doc)
190 {
191     IOleCommandTarget *olecmd = NULL;
192     HRESULT hres;
193
194     if(doc->nscontainer->editor_controller) {
195         nsIController_Release(doc->nscontainer->editor_controller);
196         doc->nscontainer->editor_controller = NULL;
197     }
198
199     if(doc->usermode == EDITMODE)
200         handle_edit_load(&doc->basedoc);
201
202     if(doc->client) {
203         hres = IOleClientSite_QueryInterface(doc->client, &IID_IOleCommandTarget, (void**)&olecmd);
204         if(FAILED(hres))
205             olecmd = NULL;
206     }
207
208     if(doc->download_state) {
209         if(olecmd) {
210             VARIANT progress;
211
212             V_VT(&progress) = VT_I4;
213             V_I4(&progress) = 0;
214             IOleCommandTarget_Exec(olecmd, NULL, OLECMDID_SETPROGRESSPOS,
215                     OLECMDEXECOPT_DONTPROMPTUSER, &progress, NULL);
216         }
217
218         set_download_state(doc, 0);
219     }
220
221     if(olecmd) {
222         IOleCommandTarget_Exec(olecmd, &CGID_ShellDocView, 103, 0, NULL, NULL);
223         IOleCommandTarget_Exec(olecmd, &CGID_MSHTML, IDM_PARSECOMPLETE, 0, NULL, NULL);
224         IOleCommandTarget_Exec(olecmd, NULL, OLECMDID_HTTPEQUIV_DONE, 0, NULL, NULL);
225
226         IOleCommandTarget_Release(olecmd);
227     }
228 }
229
230 static nsresult NSAPI handle_load(nsIDOMEventListener *iface, nsIDOMEvent *event)
231 {
232     nsEventListener *This = impl_from_nsIDOMEventListener(iface);
233     HTMLDocumentNode *doc = This->This->doc;
234     nsIDOMHTMLElement *nsbody = NULL;
235     HTMLDocumentObj *doc_obj = NULL;
236
237     TRACE("(%p)\n", doc);
238
239     if(!doc || !doc->basedoc.window)
240         return NS_ERROR_FAILURE;
241     if(doc->basedoc.doc_obj && doc->basedoc.doc_obj->basedoc.doc_node == doc)
242         doc_obj = doc->basedoc.doc_obj;
243
244     connect_scripts(doc->window);
245
246     if(doc_obj)
247         handle_docobj_load(doc_obj);
248
249     set_ready_state(doc->basedoc.window, READYSTATE_COMPLETE);
250
251     if(doc_obj) {
252         if(doc_obj->view_sink)
253             IAdviseSink_OnViewChange(doc_obj->view_sink, DVASPECT_CONTENT, -1);
254
255         set_statustext(doc_obj, IDS_STATUS_DONE, NULL);
256
257         update_title(doc_obj);
258     }
259
260     if(doc_obj && doc_obj->usermode!=EDITMODE && doc_obj->doc_object_service)
261         IDocObjectService_FireDocumentComplete(doc_obj->doc_object_service,
262                 &doc->basedoc.window->base.IHTMLWindow2_iface, 0);
263
264     if(!doc->nsdoc) {
265         ERR("NULL nsdoc\n");
266         return NS_ERROR_FAILURE;
267     }
268
269     nsIDOMHTMLDocument_GetBody(doc->nsdoc, &nsbody);
270     if(nsbody) {
271         fire_event(doc, EVENTID_LOAD, TRUE, (nsIDOMNode*)nsbody, event);
272         nsIDOMHTMLElement_Release(nsbody);
273     }
274
275     return NS_OK;
276 }
277
278 static nsresult NSAPI handle_htmlevent(nsIDOMEventListener *iface, nsIDOMEvent *event)
279 {
280     nsEventListener *This = impl_from_nsIDOMEventListener(iface);
281     HTMLDocumentNode *doc = This->This->doc;
282     const PRUnichar *type;
283     nsIDOMEventTarget *event_target;
284     nsIDOMNode *nsnode;
285     nsAString type_str;
286     eventid_t eid;
287     nsresult nsres;
288
289     TRACE("%p\n", This->This);
290
291     if(!doc) {
292         WARN("NULL doc\n");
293         return NS_OK;
294     }
295
296     nsAString_Init(&type_str, NULL);
297     nsIDOMEvent_GetType(event, &type_str);
298     nsAString_GetData(&type_str, &type);
299     eid = str_to_eid(type);
300     nsAString_Finish(&type_str);
301
302     nsres = nsIDOMEvent_GetTarget(event, &event_target);
303     if(NS_FAILED(nsres) || !event_target) {
304         ERR("GetEventTarget failed: %08x\n", nsres);
305         return NS_OK;
306     }
307
308     nsres = nsIDOMEventTarget_QueryInterface(event_target, &IID_nsIDOMNode, (void**)&nsnode);
309     nsIDOMEventTarget_Release(event_target);
310     if(NS_FAILED(nsres)) {
311         ERR("Could not get nsIDOMNode: %08x\n", nsres);
312         return NS_OK;
313     }
314
315     fire_event(doc, eid, TRUE, nsnode, event);
316
317     nsIDOMNode_Release(nsnode);
318
319     return NS_OK;
320 }
321
322 #define EVENTLISTENER_VTBL(handler) \
323     { \
324         nsDOMEventListener_QueryInterface, \
325         nsDOMEventListener_AddRef, \
326         nsDOMEventListener_Release, \
327         handler, \
328     }
329
330 static const nsIDOMEventListenerVtbl blur_vtbl =      EVENTLISTENER_VTBL(handle_blur);
331 static const nsIDOMEventListenerVtbl focus_vtbl =     EVENTLISTENER_VTBL(handle_focus);
332 static const nsIDOMEventListenerVtbl keypress_vtbl =  EVENTLISTENER_VTBL(handle_keypress);
333 static const nsIDOMEventListenerVtbl load_vtbl =      EVENTLISTENER_VTBL(handle_load);
334 static const nsIDOMEventListenerVtbl htmlevent_vtbl = EVENTLISTENER_VTBL(handle_htmlevent);
335
336 static void init_event(nsIDOMEventTarget *target, const PRUnichar *type,
337         nsIDOMEventListener *listener, BOOL capture)
338 {
339     nsAString type_str;
340     nsresult nsres;
341
342     nsAString_InitDepend(&type_str, type);
343     nsres = nsIDOMEventTarget_AddEventListener(target, &type_str, listener, capture, FALSE, 1);
344     nsAString_Finish(&type_str);
345     if(NS_FAILED(nsres))
346         ERR("AddEventTarget failed: %08x\n", nsres);
347
348 }
349
350 static void init_listener(nsEventListener *This, nsDocumentEventListener *listener,
351         const nsIDOMEventListenerVtbl *vtbl)
352 {
353     This->nsIDOMEventListener_iface.lpVtbl = vtbl;
354     This->This = listener;
355 }
356
357 void add_nsevent_listener(HTMLDocumentNode *doc, nsIDOMNode *nsnode, LPCWSTR type)
358 {
359     nsIDOMEventTarget *target;
360     nsresult nsres;
361
362     if(nsnode)
363         nsres = nsIDOMNode_QueryInterface(nsnode, &IID_nsIDOMEventTarget, (void**)&target);
364     else
365         nsres = nsIDOMWindow_QueryInterface(doc->basedoc.window->nswindow, &IID_nsIDOMEventTarget, (void**)&target);
366     if(NS_FAILED(nsres)) {
367         ERR("Could not get nsIDOMEventTarget interface: %08x\n", nsres);
368         return;
369     }
370
371     init_event(target, type, &doc->nsevent_listener->htmlevent_listener.nsIDOMEventListener_iface,
372             TRUE);
373     nsIDOMEventTarget_Release(target);
374 }
375
376 static void detach_nslistener(HTMLDocumentNode *doc, const WCHAR *type, nsEventListener *listener, cpp_bool is_capture)
377 {
378     nsIDOMEventTarget *target;
379     nsAString type_str;
380     nsresult nsres;
381
382     if(!doc->basedoc.window)
383         return;
384
385     nsres = nsIDOMWindow_QueryInterface(doc->basedoc.window->nswindow, &IID_nsIDOMEventTarget, (void**)&target);
386     if(NS_FAILED(nsres)) {
387         ERR("Could not get nsIDOMEventTarget interface: %08x\n", nsres);
388         return;
389     }
390
391     nsAString_InitDepend(&type_str, type);
392     nsres = nsIDOMEventTarget_RemoveEventListener(target, &type_str,
393             &listener->nsIDOMEventListener_iface, is_capture);
394     nsAString_Finish(&type_str);
395     nsIDOMEventTarget_Release(target);
396     if(NS_FAILED(nsres))
397         ERR("RemoveEventTarget failed: %08x\n", nsres);
398 }
399
400 void detach_nsevent(HTMLDocumentNode *doc, const WCHAR *type)
401 {
402     detach_nslistener(doc, type, &doc->nsevent_listener->htmlevent_listener, TRUE);
403 }
404
405 void release_nsevents(HTMLDocumentNode *doc)
406 {
407     nsDocumentEventListener *listener = doc->nsevent_listener;
408
409     TRACE("%p %p\n", doc, doc->nsevent_listener);
410
411     if(!listener)
412         return;
413
414     detach_nslistener(doc, blurW,     &listener->blur_listener,     TRUE);
415     detach_nslistener(doc, focusW,    &listener->focus_listener,    TRUE);
416     detach_nslistener(doc, keypressW, &listener->keypress_listener, FALSE);
417     detach_nslistener(doc, loadW,     &listener->load_listener,     TRUE);
418
419     listener->doc = NULL;
420     release_listener(listener);
421     doc->nsevent_listener = NULL;
422 }
423
424 void init_nsevents(HTMLDocumentNode *doc)
425 {
426     nsDocumentEventListener *listener;
427     nsIDOMEventTarget *target;
428     nsresult nsres;
429
430     listener = heap_alloc(sizeof(nsDocumentEventListener));
431     if(!listener)
432         return;
433
434     TRACE("%p %p\n", doc, listener);
435
436     listener->ref = 1;
437     listener->doc = doc;
438
439     init_listener(&listener->blur_listener,        listener, &blur_vtbl);
440     init_listener(&listener->focus_listener,       listener, &focus_vtbl);
441     init_listener(&listener->keypress_listener,    listener, &keypress_vtbl);
442     init_listener(&listener->load_listener,        listener, &load_vtbl);
443     init_listener(&listener->htmlevent_listener,   listener, &htmlevent_vtbl);
444
445     doc->nsevent_listener = listener;
446
447     nsres = nsIDOMWindow_QueryInterface(doc->basedoc.window->nswindow, &IID_nsIDOMEventTarget, (void**)&target);
448     if(NS_FAILED(nsres)) {
449         ERR("Could not get nsIDOMEventTarget interface: %08x\n", nsres);
450         return;
451     }
452
453     init_event(target, blurW,     &listener->blur_listener.nsIDOMEventListener_iface,     TRUE);
454     init_event(target, focusW,    &listener->focus_listener.nsIDOMEventListener_iface,    TRUE);
455     init_event(target, keypressW, &listener->keypress_listener.nsIDOMEventListener_iface, FALSE);
456     init_event(target, loadW,     &listener->load_listener.nsIDOMEventListener_iface,     TRUE);
457
458     nsIDOMEventTarget_Release(target);
459 }