f2dea9a358b249744e63a7912b603e9548b8c087
[WebKit-https.git] / WebCore / bindings / js / kjs_proxy.cpp
1 /*
2  *  This file is part of the KDE libraries
3  *  Copyright (C) 1999-2001 Harri Porten (porten@kde.org)
4  *  Copyright (C) 2001 Peter Kelly (pmk@post.com)
5  *
6  *  This library is free software; you can redistribute it and/or
7  *  modify it under the terms of the GNU Lesser General Public
8  *  License as published by the Free Software Foundation; either
9  *  version 2 of the License, or (at your option) any later version.
10  *
11  *  This library is distributed in the hope that it will be useful,
12  *  but WITHOUT ANY WARRANTY; without even the implied warranty of
13  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
14  *  Lesser General Public License for more details.
15  *
16  *  You should have received a copy of the GNU Lesser General Public
17  *  License along with this library; if not, write to the Free Software
18  *  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
19  */
20
21 #include "config.h"
22 #include "kjs_proxy.h"
23
24 #include "kjs_events.h"
25 #include "kjs_window.h"
26 #include "Frame.h"
27 #include "JSDOMWindow.h"
28
29 #if SVG_SUPPORT
30 #include "JSSVGLazyEventListener.h"
31 #endif
32
33 using namespace KJS;
34
35 namespace WebCore {
36
37 KJSProxy::KJSProxy(Frame* frame)
38 {
39     m_script = 0;
40     m_frame = frame;
41     m_handlerLineno = 0;
42 }
43
44 KJSProxy::~KJSProxy()
45 {
46     JSLock lock;
47     delete m_script;
48     Collector::collect();
49 }
50
51 JSValue* KJSProxy::evaluate(const String& filename, int baseLine, const String& str, Node* n) 
52 {
53   // evaluate code. Returns the JS return value or 0
54   // if there was none, an error occured or the type couldn't be converted.
55
56   initScriptIfNeeded();
57   // inlineCode is true for <a href="javascript:doSomething()">
58   // and false for <script>doSomething()</script>. Check if it has the
59   // expected value in all cases.
60   // See smart window.open policy for where this is used.
61   bool inlineCode = filename.isNull();
62
63   m_script->setInlineCode(inlineCode);
64
65   JSLock lock;
66
67   JSValue* thisNode = n ? Window::retrieve(m_frame) : toJS(m_script->globalExec(), n);
68   Completion comp = m_script->evaluate(filename, baseLine, reinterpret_cast<const KJS::UChar*>(str.characters()), str.length(), thisNode);
69
70   if (comp.complType() == Normal || comp.complType() == ReturnValue)
71     return comp.value();
72
73   if (comp.complType() == Throw) {
74     UString errorMessage = comp.value()->toString(m_script->globalExec());
75     int lineNumber = comp.value()->toObject(m_script->globalExec())->get(m_script->globalExec(), "line")->toInt32(m_script->globalExec());
76     UString sourceURL = comp.value()->toObject(m_script->globalExec())->get(m_script->globalExec(), "sourceURL")->toString(m_script->globalExec());
77     m_frame->addMessageToConsole(errorMessage, lineNumber, sourceURL);
78   }
79
80   return 0;
81 }
82
83 void KJSProxy::clear() {
84   // clear resources allocated by the interpreter, and make it ready to be used by another page
85   // We have to keep it, so that the Window object for the frame remains the same.
86   // (we used to delete and re-create it, previously)
87   if (m_script) {
88     Window *win = Window::retrieveWindow(m_frame);
89     if (win)
90         win->clear();
91   }
92 }
93
94 EventListener* KJSProxy::createHTMLEventHandler(const String& functionName, const String& code, Node* node)
95 {
96     initScriptIfNeeded();
97     JSLock lock;
98     return new JSLazyEventListener(functionName, code, Window::retrieveWindow(m_frame), node, m_handlerLineno);
99 }
100
101 #if SVG_SUPPORT
102 EventListener* KJSProxy::createSVGEventHandler(const String& functionName, const String& code, Node* node)
103 {
104     initScriptIfNeeded();
105     JSLock lock;
106     return new JSSVGLazyEventListener(functionName, code, Window::retrieveWindow(m_frame), node, m_handlerLineno);
107 }
108 #endif
109
110 void KJSProxy::finishedWithEvent(Event* event)
111 {
112   // This is called when the DOM implementation has finished with a particular event. This
113   // is the case in sitations where an event has been created just for temporary usage,
114   // e.g. an image load or mouse move. Once the event has been dispatched, it is forgotten
115   // by the DOM implementation and so does not need to be cached still by the interpreter
116   m_script->forgetDOMObject(event);
117 }
118
119 ScriptInterpreter* KJSProxy::interpreter()
120 {
121   initScriptIfNeeded();
122   assert(m_script);
123   return m_script;
124 }
125
126 // Implementation of the debug() function
127 class TestFunctionImp : public DOMObject {
128 public:
129   virtual bool implementsCall() const { return true; }
130   virtual JSValue* callAsFunction(ExecState*, JSObject*, const List& args);
131 };
132
133 JSValue *TestFunctionImp::callAsFunction(ExecState* exec, JSObject*, const List& args)
134 {
135   fprintf(stderr,"--> %s\n", args[0]->toString(exec).ascii());
136   return jsUndefined();
137 }
138
139 void KJSProxy::initScriptIfNeeded()
140 {
141   if (m_script)
142     return;
143
144   // Build the global object - which is a Window instance
145   JSLock lock;
146   JSObject* globalObject = new JSDOMWindow(m_frame->domWindow());
147
148   // Create a KJS interpreter for this frame
149   m_script = new ScriptInterpreter(globalObject, m_frame);
150   globalObject->put(m_script->globalExec(), "debug", new TestFunctionImp(), Internal);
151
152   String userAgent = m_frame->userAgent();
153   if (userAgent.find("Microsoft") >= 0 || userAgent.find("MSIE") >= 0)
154     m_script->setCompatMode(Interpreter::IECompat);
155   else
156     // If we find "Mozilla" but not "(compatible, ...)" we are a real Netscape
157     if (userAgent.find("Mozilla") >= 0 && userAgent.find("compatible") == -1)
158       m_script->setCompatMode(Interpreter::NetscapeCompat);
159 }
160
161 }