Remove -enterFrame: and -leaveFrame from WebScriptDebugger
[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 "WebScriptDebugDelegatePrivate.h"
36 #include "WebScriptDebugServerPrivate.h"
37 #include <JavaScriptCore/JSGlobalObject.h>
38 #include <WebCore/KURL.h>
39
40 using namespace KJS;
41 using namespace WebCore;
42
43 @interface WebScriptCallFrame (WebScriptDebugDelegateInternal)
44
45 - (WebScriptCallFrame *)_initWithGlobalObject:(WebScriptObject *)globalObj caller:(WebScriptCallFrame *)caller state:(ExecState *)state;
46
47 @end
48
49 // convert UString to NSString
50 NSString *toNSString(const UString& s)
51 {
52     if (s.isEmpty())
53         return nil;
54     return [NSString stringWithCharacters:reinterpret_cast<const unichar*>(s.data()) length:s.size()];
55 }
56
57 // convert UString to NSURL
58 static NSURL *toNSURL(const UString& s)
59 {
60     if (s.isEmpty())
61         return nil;
62     return KURL(s);
63 }
64
65 WebCoreScriptDebuggerImp::WebCoreScriptDebuggerImp(WebScriptDebugger *debugger, JSGlobalObject* globalObject)
66     : m_debugger(debugger)
67     , m_callingDelegate(false)
68 {
69     attach(globalObject);
70     List emptyList;
71     callEvent(globalObject->globalExec(), -1, -1, 0, emptyList);
72 }
73
74 // callbacks - relay to delegate
75 bool WebCoreScriptDebuggerImp::sourceParsed(ExecState* state, int sourceID, const UString& url, const UString& source, int lineNumber, int errorLine, const UString& errorMsg)
76 {
77     if (m_callingDelegate)
78         return true;
79
80     m_callingDelegate = true;
81
82     NSString *nsSource = toNSString(source);
83     NSURL *nsURL = toNSURL(url);
84
85     WebFrame *webFrame = [m_debugger webFrame];
86     WebView *webView = [webFrame webView];
87     if (errorLine == -1) {
88         [[webView _scriptDebugDelegateForwarder] webView:webView didParseSource:nsSource baseLineNumber:lineNumber fromURL:nsURL sourceId:sourceID forWebFrame:webFrame];
89         [[webView _scriptDebugDelegateForwarder] webView:webView didParseSource:nsSource fromURL:[nsURL absoluteString] sourceId:sourceID forWebFrame:webFrame]; // deprecated delegate method
90         if ([WebScriptDebugServer listenerCount])
91             [[WebScriptDebugServer sharedScriptDebugServer] webView:webView didParseSource:nsSource baseLineNumber:lineNumber fromURL:nsURL sourceId:sourceID forWebFrame:webFrame];
92     } else {
93         NSString* nsErrorMessage = toNSString(errorMsg);
94         NSDictionary *info = [[NSDictionary alloc] initWithObjectsAndKeys:nsErrorMessage, WebScriptErrorDescriptionKey, [NSNumber numberWithUnsignedInt:errorLine], WebScriptErrorLineNumberKey, nil];
95         NSError *error = [[NSError alloc] initWithDomain:WebScriptErrorDomain code:WebScriptGeneralErrorCode userInfo:info];
96         [[webView _scriptDebugDelegateForwarder] webView:webView failedToParseSource:nsSource baseLineNumber:lineNumber fromURL:nsURL withError:error forWebFrame:webFrame];
97         if ([WebScriptDebugServer listenerCount])
98             [[WebScriptDebugServer sharedScriptDebugServer] webView:webView failedToParseSource:nsSource baseLineNumber:lineNumber fromURL:nsURL withError:error forWebFrame:webFrame];
99         [error release];
100         [info release];
101     }
102
103     m_callingDelegate = false;
104
105     return true;
106 }
107
108 bool WebCoreScriptDebuggerImp::callEvent(ExecState* state, int sourceID, int lineNumber, JSObject*, const List&)
109 {
110     if (m_callingDelegate)
111         return true;
112
113     m_callingDelegate = true;
114
115     m_topCallFrame.adoptNS([[WebScriptCallFrame alloc] _initWithGlobalObject:[m_debugger globalObject] caller:m_topCallFrame.get() state:state]);
116
117     WebFrame *webFrame = [m_debugger webFrame];
118     WebView *webView = [webFrame webView];
119     [[webView _scriptDebugDelegateForwarder] webView:webView didEnterCallFrame:m_topCallFrame.get() sourceId:sourceID line:lineNumber forWebFrame:webFrame];
120     if ([WebScriptDebugServer listenerCount])
121         [[WebScriptDebugServer sharedScriptDebugServer] webView:webView didEnterCallFrame:m_topCallFrame.get() sourceId:sourceID line:lineNumber forWebFrame:webFrame];
122
123     m_callingDelegate = false;
124
125     return true;
126 }
127
128 bool WebCoreScriptDebuggerImp::atStatement(ExecState* state, int sourceID, int lineNumber, int)
129 {
130     if (m_callingDelegate)
131         return true;
132
133     m_callingDelegate = true;
134
135     WebFrame *webFrame = [m_debugger webFrame];
136     WebView *webView = [webFrame webView];
137     [[webView _scriptDebugDelegateForwarder] webView:webView willExecuteStatement:m_topCallFrame.get() sourceId:sourceID line:lineNumber forWebFrame:webFrame];
138     if ([WebScriptDebugServer listenerCount])
139         [[WebScriptDebugServer sharedScriptDebugServer] webView:webView willExecuteStatement:m_topCallFrame.get() sourceId:sourceID line:lineNumber forWebFrame:webFrame];
140
141     m_callingDelegate = false;
142
143     return true;
144 }
145
146 bool WebCoreScriptDebuggerImp::returnEvent(ExecState* state, int sourceID, int lineNumber, JSObject*)
147 {
148     if (m_callingDelegate)
149         return true;
150
151     m_callingDelegate = true;
152
153     WebFrame *webFrame = [m_debugger webFrame];
154     WebView *webView = [webFrame webView];
155     [[webView _scriptDebugDelegateForwarder] webView:webView willLeaveCallFrame:m_topCallFrame.get() sourceId:sourceID line:lineNumber forWebFrame:webFrame];
156     if ([WebScriptDebugServer listenerCount])
157         [[WebScriptDebugServer sharedScriptDebugServer] webView:webView willLeaveCallFrame:m_topCallFrame.get() sourceId:sourceID line:lineNumber forWebFrame:webFrame];
158
159     m_topCallFrame = [m_topCallFrame.get() caller];
160
161     m_callingDelegate = false;
162
163     return true;
164 }
165
166 bool WebCoreScriptDebuggerImp::exception(ExecState* state, int sourceID, int lineNumber, JSValue*)
167 {
168     if (m_callingDelegate)
169         return true;
170
171     m_callingDelegate = true;
172
173     WebFrame *webFrame = [m_debugger webFrame];
174     WebView *webView = [webFrame webView];
175     [[webView _scriptDebugDelegateForwarder] webView:webView exceptionWasRaised:m_topCallFrame.get() sourceId:sourceID line:lineNumber forWebFrame:webFrame];
176     if ([WebScriptDebugServer listenerCount])
177         [[WebScriptDebugServer sharedScriptDebugServer] webView:webView exceptionWasRaised:m_topCallFrame.get() sourceId:sourceID line:lineNumber forWebFrame:webFrame];
178
179     m_callingDelegate = false;
180
181     return true;
182 }