4cce739b73b9149b8291938eb8f3408a3af9736f
[WebKit-https.git] / WebKit / mac / WebView / WebCoreScriptDebuggerImp.mm
1 /*
2  * Copyright (C) 2008 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  *
8  * 1.  Redistributions of source code must retain the above copyright
9  *     notice, this list of conditions and the following disclaimer.
10  * 2.  Redistributions in binary form must reproduce the above copyright
11  *     notice, this list of conditions and the following disclaimer in the
12  *     documentation and/or other materials provided with the distribution.
13  * 3.  Neither the name of Apple Computer, Inc. ("Apple") nor the names of
14  *     its contributors may be used to endorse or promote products derived
15  *     from this software without specific prior written permission.
16  *
17  * THIS SOFTWARE IS PROVIDED BY APPLE AND ITS CONTRIBUTORS "AS IS" AND ANY
18  * EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
19  * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
20  * DISCLAIMED. IN NO EVENT SHALL APPLE OR ITS CONTRIBUTORS BE LIABLE FOR ANY
21  * DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
22  * (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
23  * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND
24  * ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
25  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
26  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
27  */
28
29 // FIXME: This file and class should be renamed WebScriptDebugger
30
31 #include "WebCoreScriptDebuggerImp.h"
32
33 #include "WebFrameInternal.h"
34 #include "WebViewInternal.h"
35 #include "WebScriptDebugServerPrivate.h"
36 #include <JavaScriptCore/JSGlobalObject.h>
37 #include <WebCore/DOMWindow.h>
38 #include <WebCore/Frame.h>
39 #include <WebCore/JSDOMWindow.h>
40 #include <WebCore/KURL.h>
41
42 using namespace KJS;
43 using namespace WebCore;
44
45 @interface WebScriptCallFrame (WebScriptDebugDelegateInternal)
46
47 - (WebScriptCallFrame *)_initWithGlobalObject:(WebScriptObject *)globalObj caller:(WebScriptCallFrame *)caller state:(ExecState *)state;
48
49 @end
50
51 // convert UString to NSString
52 NSString *toNSString(const UString& s)
53 {
54     if (s.isEmpty())
55         return nil;
56     return [NSString stringWithCharacters:reinterpret_cast<const unichar*>(s.data()) length:s.size()];
57 }
58
59 // convert UString to NSURL
60 static NSURL *toNSURL(const UString& s)
61 {
62     if (s.isEmpty())
63         return nil;
64     return KURL(s);
65 }
66
67 static WebFrame *toWebFrame(ExecState* state)
68 {
69     JSDOMWindow* window = static_cast<JSDOMWindow*>(state->dynamicGlobalObject());
70     return kit(window->impl()->frame());
71 }
72
73 WebCoreScriptDebuggerImp::WebCoreScriptDebuggerImp(JSGlobalObject* globalObject)
74     : m_callingDelegate(false)
75 {
76     attach(globalObject);
77     List emptyList;
78     callEvent(globalObject->globalExec(), -1, -1, 0, emptyList);
79 }
80
81 // callbacks - relay to delegate
82 bool WebCoreScriptDebuggerImp::sourceParsed(ExecState* state, int sourceID, const UString& url, const UString& source, int lineNumber, int errorLine, const UString& errorMsg)
83 {
84     if (m_callingDelegate)
85         return true;
86
87     m_callingDelegate = true;
88
89     NSString *nsSource = toNSString(source);
90     NSURL *nsURL = toNSURL(url);
91
92     WebFrame *webFrame = toWebFrame(state);
93     WebView *webView = [webFrame webView];
94     if (errorLine == -1) {
95         [[webView _scriptDebugDelegateForwarder] webView:webView didParseSource:nsSource baseLineNumber:lineNumber fromURL:nsURL sourceId:sourceID forWebFrame:webFrame];
96         [[webView _scriptDebugDelegateForwarder] webView:webView didParseSource:nsSource fromURL:[nsURL absoluteString] sourceId:sourceID forWebFrame:webFrame]; // deprecated delegate method
97         if ([WebScriptDebugServer listenerCount])
98             [[WebScriptDebugServer sharedScriptDebugServer] webView:webView didParseSource:nsSource baseLineNumber:lineNumber fromURL:nsURL sourceId:sourceID forWebFrame:webFrame];
99     } else {
100         NSString* nsErrorMessage = toNSString(errorMsg);
101         NSDictionary *info = [[NSDictionary alloc] initWithObjectsAndKeys:nsErrorMessage, WebScriptErrorDescriptionKey, [NSNumber numberWithUnsignedInt:errorLine], WebScriptErrorLineNumberKey, nil];
102         NSError *error = [[NSError alloc] initWithDomain:WebScriptErrorDomain code:WebScriptGeneralErrorCode userInfo:info];
103         [[webView _scriptDebugDelegateForwarder] webView:webView failedToParseSource:nsSource baseLineNumber:lineNumber fromURL:nsURL withError:error forWebFrame:webFrame];
104         if ([WebScriptDebugServer listenerCount])
105             [[WebScriptDebugServer sharedScriptDebugServer] webView:webView failedToParseSource:nsSource baseLineNumber:lineNumber fromURL:nsURL withError:error forWebFrame:webFrame];
106         [error release];
107         [info release];
108     }
109
110     m_callingDelegate = false;
111
112     return true;
113 }
114
115 bool WebCoreScriptDebuggerImp::callEvent(ExecState* state, int sourceID, int lineNumber, JSObject*, const List&)
116 {
117     if (m_callingDelegate)
118         return true;
119
120     m_callingDelegate = true;
121
122     WebFrame *webFrame = toWebFrame(state);
123
124     m_topCallFrame.adoptNS([[WebScriptCallFrame alloc] _initWithGlobalObject:core(webFrame)->windowScriptObject() caller:m_topCallFrame.get() state:state]);
125
126     WebView *webView = [webFrame webView];
127     [[webView _scriptDebugDelegateForwarder] webView:webView didEnterCallFrame:m_topCallFrame.get() sourceId:sourceID line:lineNumber forWebFrame:webFrame];
128     if ([WebScriptDebugServer listenerCount])
129         [[WebScriptDebugServer sharedScriptDebugServer] webView:webView didEnterCallFrame:m_topCallFrame.get() sourceId:sourceID line:lineNumber forWebFrame:webFrame];
130
131     m_callingDelegate = false;
132
133     return true;
134 }
135
136 bool WebCoreScriptDebuggerImp::atStatement(ExecState* state, int sourceID, int lineNumber, int)
137 {
138     if (m_callingDelegate)
139         return true;
140
141     m_callingDelegate = true;
142
143     WebFrame *webFrame = toWebFrame(state);
144     WebView *webView = [webFrame webView];
145     [[webView _scriptDebugDelegateForwarder] webView:webView willExecuteStatement:m_topCallFrame.get() sourceId:sourceID line:lineNumber forWebFrame:webFrame];
146     if ([WebScriptDebugServer listenerCount])
147         [[WebScriptDebugServer sharedScriptDebugServer] webView:webView willExecuteStatement:m_topCallFrame.get() sourceId:sourceID line:lineNumber forWebFrame:webFrame];
148
149     m_callingDelegate = false;
150
151     return true;
152 }
153
154 bool WebCoreScriptDebuggerImp::returnEvent(ExecState* state, int sourceID, int lineNumber, JSObject*)
155 {
156     if (m_callingDelegate)
157         return true;
158
159     m_callingDelegate = true;
160
161     WebFrame *webFrame = toWebFrame(state);
162     WebView *webView = [webFrame webView];
163     [[webView _scriptDebugDelegateForwarder] webView:webView willLeaveCallFrame:m_topCallFrame.get() sourceId:sourceID line:lineNumber forWebFrame:webFrame];
164     if ([WebScriptDebugServer listenerCount])
165         [[WebScriptDebugServer sharedScriptDebugServer] webView:webView willLeaveCallFrame:m_topCallFrame.get() sourceId:sourceID line:lineNumber forWebFrame:webFrame];
166
167     m_topCallFrame = [m_topCallFrame.get() caller];
168
169     m_callingDelegate = false;
170
171     return true;
172 }
173
174 bool WebCoreScriptDebuggerImp::exception(ExecState* state, int sourceID, int lineNumber, JSValue*)
175 {
176     if (m_callingDelegate)
177         return true;
178
179     m_callingDelegate = true;
180
181     WebFrame *webFrame = toWebFrame(state);
182     WebView *webView = [webFrame webView];
183     [[webView _scriptDebugDelegateForwarder] webView:webView exceptionWasRaised:m_topCallFrame.get() sourceId:sourceID line:lineNumber forWebFrame:webFrame];
184     if ([WebScriptDebugServer listenerCount])
185         [[WebScriptDebugServer sharedScriptDebugServer] webView:webView exceptionWasRaised:m_topCallFrame.get() sourceId:sourceID line:lineNumber forWebFrame:webFrame];
186
187     m_callingDelegate = false;
188
189     return true;
190 }