Make it easy to run Safari in the debugger on Windows
[WebKit-https.git] / WebKitTools / Scripts / webkitdirs.pm
index a2b1e32e47746fe0de9b2ccf5764ddbc59da6792..cd35373af0831624a376bae224299b2733577fa2 100644 (file)
@@ -766,4 +766,35 @@ sub exitStatus($)
     return WEXITSTATUS($returnvalue);
 }
 
+sub runSafari
+{
+    my ($debugger) = @_;
+
+    if (isOSX()) {
+        return system "$FindBin::Bin/gdb-safari", @ARGV if $debugger;
+
+        my $productDir = productDir();
+        print "Starting Safari with DYLD_FRAMEWORK_PATH set to point to built WebKit in $productDir.\n";
+        $ENV{DYLD_FRAMEWORK_PATH} = $productDir;
+        $ENV{WEBKIT_UNSET_DYLD_FRAMEWORK_PATH} = "YES";
+        return system safariPath(), @ARGV;
+    }
+
+    if (isCygwin()) {
+        my $script = "run-webkit-nightly.cmd";
+        my $result = system "cp", "$FindBin::Bin/$script", productDir();
+        return $result if $result;
+
+        my $cwd = getcwd();
+        chdir productDir();
+
+        my $debuggerFlag = $debugger ? "/debugger" : "";
+        $result = system "cmd", "/c", "call $script $debuggerFlag";
+        chdir $cwd;
+        return $result;
+    }
+
+    return 1;
+}
+
 1;