Mac build fix. Add new symbol to exports file.
[WebKit-https.git] / WebKit / win / WebScriptDebugger.cpp
1 /*
2  * Copyright (C) 2007 Apple Inc.  All rights reserved.
3  *
4  * Redistribution and use in source and binary forms, with or without
5  * modification, are permitted provided that the following conditions
6  * are met:
7  * 1. Redistributions of source code must retain the above copyright
8  *    notice, this list of conditions and the following disclaimer.
9  * 2. Redistributions in binary form must reproduce the above copyright
10  *    notice, this list of conditions and the following disclaimer in the
11  *    documentation and/or other materials provided with the distribution.
12  * 3.  Neither the name of Apple Computer, Inc. ("Apple") nor the names of
13  *     its contributors may be used to endorse or promote products derived
14  *     from this software without specific prior written permission.
15  *
16  * THIS SOFTWARE IS PROVIDED BY APPLE COMPUTER, INC. ``AS IS'' AND ANY
17  * EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
18  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
19  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL APPLE COMPUTER, INC. OR
20  * CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
21  * EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
22  * PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR
23  * PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY
24  * OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
25  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
26  * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. 
27  */
28
29 #include "config.h"
30 #include "WebKitDLL.h"
31 #include "WebScriptDebugger.h"
32
33 #include "WebKit.h"
34 #include "WebFrame.h"
35 #include "WebScriptCallFrame.h"
36 #include "WebScriptDebugServer.h"
37 #include "WebView.h"
38
39 #pragma warning(push, 0)
40 #include <WebCore/BString.h>
41 #include <WebCore/DOMWindow.h>
42 #include <WebCore/kjs_binding.h>
43 #include <WebCore/kjs_proxy.h>
44 #include <WebCore/PlatformString.h>
45 #pragma warning(pop)
46
47 using namespace WebCore;
48 using namespace KJS;
49
50 WebScriptDebugger& WebScriptDebugger::shared()
51 {
52     static WebScriptDebugger debugger;
53     return debugger;
54 }
55
56 WebScriptDebugger::WebScriptDebugger()
57     : m_callingServer(false)
58 {
59 }
60
61 WebScriptDebugger::~WebScriptDebugger()
62 {
63 }
64
65 static Frame* frame(ExecState* exec)
66 {
67     JSDOMWindow* window = static_cast<JSDOMWindow*>(exec->dynamicGlobalObject());
68     return window->impl()->frame();
69 }
70
71 static WebFrame* webFrame(ExecState* exec)
72 {
73     return kit(frame(exec));
74 }
75
76 static WebView* webView(ExecState* exec)
77 {
78     return kit(frame(exec)->page());
79 }
80
81 bool WebScriptDebugger::sourceParsed(ExecState* exec, int sourceId, const UString& sourceURL,
82                   const UString& source, int startingLineNumber, int errorLine, const UString& /*errorMsg*/)
83 {
84     if (m_callingServer)
85         return true;
86
87     m_callingServer = true;
88
89     if (WebScriptDebugServer::listenerCount() <= 0)
90         return true;
91
92     BString bSource = String(source);
93     BString bSourceURL = String(sourceURL);
94     
95     if (errorLine == -1) {
96         WebScriptDebugServer::sharedWebScriptDebugServer()->didParseSource(webView(exec),
97             bSource,
98             startingLineNumber,
99             bSourceURL,
100             sourceId,
101             webFrame(exec));
102     } else {
103         // FIXME: the error var should be made with the information in the errorMsg.  It is not a simple
104         // UString to BSTR conversion there is some logic involved that I don't fully understand yet.
105         BString error(L"An Error Occurred.");
106         WebScriptDebugServer::sharedWebScriptDebugServer()->failedToParseSource(webView(exec),
107             bSource,
108             startingLineNumber,
109             bSourceURL,
110             error,
111             webFrame(exec));
112     }
113
114     m_callingServer = false;
115     return true;
116 }
117
118 bool WebScriptDebugger::callEvent(ExecState* exec, int sourceId, int lineno, JSObject* /*function*/, const List &/*args*/)
119 {
120     if (m_callingServer)
121         return true;
122
123     m_callingServer = true;
124
125     COMPtr<WebScriptCallFrame> callFrame(AdoptCOM, WebScriptCallFrame::createInstance(exec));
126     WebScriptDebugServer::sharedWebScriptDebugServer()->didEnterCallFrame(webView(exec), callFrame.get(), sourceId, lineno, webFrame(exec));
127
128     m_callingServer = false;
129
130     return true;
131 }
132
133 bool WebScriptDebugger::atStatement(ExecState* exec, int sourceId, int firstLine, int /*lastLine*/)
134 {
135     if (m_callingServer)
136         return true;
137
138     m_callingServer = true;
139
140     COMPtr<WebScriptCallFrame> callFrame(AdoptCOM, WebScriptCallFrame::createInstance(exec));
141     WebScriptDebugServer::sharedWebScriptDebugServer()->willExecuteStatement(webView(exec), callFrame.get(), sourceId, firstLine, webFrame(exec));
142
143     m_callingServer = false;
144
145     return true;
146 }
147
148 bool WebScriptDebugger::returnEvent(ExecState* exec, int sourceId, int lineno, JSObject* /*function*/)
149 {
150     if (m_callingServer)
151         return true;
152
153     m_callingServer = true;
154
155     COMPtr<WebScriptCallFrame> callFrame(AdoptCOM, WebScriptCallFrame::createInstance(exec->callingExecState()));
156     WebScriptDebugServer::sharedWebScriptDebugServer()->willLeaveCallFrame(webView(exec), callFrame.get(), sourceId, lineno, webFrame(exec));
157
158     m_callingServer = false;
159
160     return true;
161 }
162
163 bool WebScriptDebugger::exception(ExecState* exec, int sourceId, int lineno, JSValue* /*exception */)
164 {
165     if (m_callingServer)
166         return true;
167
168     m_callingServer = true;
169
170     COMPtr<WebScriptCallFrame> callFrame(AdoptCOM, WebScriptCallFrame::createInstance(exec));
171     WebScriptDebugServer::sharedWebScriptDebugServer()->exceptionWasRaised(webView(exec), callFrame.get(), sourceId, lineno, webFrame(exec));
172
173     m_callingServer = false;
174
175     return true;
176 }