Move URL from WebCore to WTF
[WebKit-https.git] / Source / WebKitLegacy / mac / WebView / WebScriptDebugger.mm
1 /*
2  * Copyright (C) 2008-2013 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 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 #import "WebScriptDebugger.h"
30
31 #import "WebDelegateImplementationCaching.h"
32 #import "WebFrameInternal.h"
33 #import "WebScriptDebugDelegate.h"
34 #import "WebViewInternal.h"
35 #import <JavaScriptCore/DebuggerCallFrame.h>
36 #import <JavaScriptCore/JSGlobalObject.h>
37 #import <JavaScriptCore/SourceProvider.h>
38 #import <JavaScriptCore/StrongInlines.h>
39 #import <WebCore/DOMWindow.h>
40 #import <WebCore/Frame.h>
41 #import <WebCore/JSDOMWindow.h>
42 #import <WebCore/ScriptController.h>
43 #import <wtf/URL.h>
44
45 using namespace JSC;
46 using namespace WebCore;
47
48 @interface WebScriptCallFrame (WebScriptDebugDelegateInternal)
49 - (WebScriptCallFrame *)_initWithGlobalObject:(WebScriptObject *)globalObj functionName:(String)functionName exceptionValue:(JSC::JSValue)exceptionValue;
50 @end
51
52 static NSString *toNSString(SourceProvider* sourceProvider)
53 {
54     const String& sourceString = sourceProvider->source().toString();
55     if (sourceString.isEmpty())
56         return nil;
57     return sourceString;
58 }
59
60 // Convert String to NSURL.
61 static NSURL *toNSURL(const String& s)
62 {
63     if (s.isEmpty())
64         return nil;
65     return URL({ }, s);
66 }
67
68 static WebFrame *toWebFrame(JSGlobalObject* globalObject)
69 {
70     JSDOMWindow* window = static_cast<JSDOMWindow*>(globalObject);
71     return kit(window->wrapped().frame());
72 }
73
74 WebScriptDebugger::WebScriptDebugger(JSGlobalObject* globalObject)
75     : Debugger(globalObject->vm())
76     , m_callingDelegate(false)
77     , m_globalObject(globalObject->vm(), globalObject)
78 {
79     setPauseOnExceptionsState(PauseOnAllExceptions);
80     deactivateBreakpoints();
81     attach(globalObject);
82 }
83
84 // callbacks - relay to delegate
85 void WebScriptDebugger::sourceParsed(ExecState* exec, SourceProvider* sourceProvider, int errorLine, const String& errorMsg)
86 {
87     if (m_callingDelegate)
88         return;
89
90     m_callingDelegate = true;
91
92     NSString *nsSource = toNSString(sourceProvider);
93     NSURL *nsURL = toNSURL(sourceProvider->url());
94     int firstLine = sourceProvider->startPosition().m_line.oneBasedInt();
95
96     VM& vm = exec->vm();
97     WebFrame *webFrame = toWebFrame(vm.vmEntryGlobalObject(exec));
98     WebView *webView = [webFrame webView];
99     WebScriptDebugDelegateImplementationCache* implementations = WebViewGetScriptDebugDelegateImplementations(webView);
100
101     if (errorLine == -1) {
102         if (implementations->didParseSourceFunc) {
103             if (implementations->didParseSourceExpectsBaseLineNumber)
104                 CallScriptDebugDelegate(implementations->didParseSourceFunc, webView, @selector(webView:didParseSource:baseLineNumber:fromURL:sourceId:forWebFrame:), nsSource, firstLine, nsURL, sourceProvider->asID(), webFrame);
105             else
106                 CallScriptDebugDelegate(implementations->didParseSourceFunc, webView, @selector(webView:didParseSource:fromURL:sourceId:forWebFrame:), nsSource, [nsURL absoluteString], sourceProvider->asID(), webFrame);
107         }
108     } else {
109         NSString* nsErrorMessage = nsStringNilIfEmpty(errorMsg);
110         NSDictionary *info = [[NSDictionary alloc] initWithObjectsAndKeys:nsErrorMessage, WebScriptErrorDescriptionKey, [NSNumber numberWithUnsignedInt:errorLine], WebScriptErrorLineNumberKey, nil];
111         NSError *error = [[NSError alloc] initWithDomain:WebScriptErrorDomain code:WebScriptGeneralErrorCode userInfo:info];
112
113         if (implementations->failedToParseSourceFunc)
114             CallScriptDebugDelegate(implementations->failedToParseSourceFunc, webView, @selector(webView:failedToParseSource:baseLineNumber:fromURL:withError:forWebFrame:), nsSource, firstLine, nsURL, error, webFrame);
115
116         [error release];
117         [info release];
118     }
119
120     m_callingDelegate = false;
121 }
122
123 void WebScriptDebugger::handlePause(JSGlobalObject* globalObject, Debugger::ReasonForPause reason)
124 {
125     if (m_callingDelegate)
126         return;
127
128     if (reason != Debugger::PausedForException)
129         return;
130
131     m_callingDelegate = true;
132
133     WebFrame *webFrame = toWebFrame(globalObject);
134     WebView *webView = [webFrame webView];
135     DebuggerCallFrame& debuggerCallFrame = currentDebuggerCallFrame();
136     JSValue exceptionValue = currentException();
137     String functionName = debuggerCallFrame.functionName();
138     RetainPtr<WebScriptCallFrame> webCallFrame = adoptNS([[WebScriptCallFrame alloc] _initWithGlobalObject:core(webFrame)->script().windowScriptObject() functionName:functionName exceptionValue:exceptionValue]);
139
140     WebScriptDebugDelegateImplementationCache* cache = WebViewGetScriptDebugDelegateImplementations(webView);
141     if (cache->exceptionWasRaisedFunc) {
142         if (cache->exceptionWasRaisedExpectsHasHandlerFlag) {
143             bool hasHandler = hasHandlerForExceptionCallback();
144             CallScriptDebugDelegate(cache->exceptionWasRaisedFunc, webView, @selector(webView:exceptionWasRaised:hasHandler:sourceId:line:forWebFrame:), webCallFrame.get(), hasHandler, debuggerCallFrame.sourceID(), debuggerCallFrame.line(), webFrame);
145         } else
146             CallScriptDebugDelegate(cache->exceptionWasRaisedFunc, webView, @selector(webView:exceptionWasRaised:sourceId:line:forWebFrame:), webCallFrame.get(), debuggerCallFrame.sourceID(), debuggerCallFrame.line(), webFrame);
147     }
148
149     m_callingDelegate = false;
150 }