feat: MoonSharpVsCodeDebugServer RequestPause(Script script)

Author: Benjamin-Dobell

src/MoonSharp.Interpreter.Tests/EmbeddableNUnitWrapper.cs

@@ -1,4 +1,4 @@
-#if EMBEDTEST || UNITY_5 || UNITY_5_3_OR_NEWER || UNITY_EDITOR || UNITY_STANDALONE
+#if EMBEDTEST || UNITY_5_3_OR_NEWER || UNITY_EDITOR || UNITY_STANDALONE
 
 using System;
 using System.Collections.Generic;

src/MoonSharp.Interpreter.Tests/NUnit2Compat.cs

@@ -1,4 +1,4 @@
-#if !(UNITY_5 || UNITY_5_3_OR_NEWER || UNITY_EDITOR || UNITY_STANDALONE)
+#if !(UNITY_5_3_OR_NEWER || UNITY_EDITOR || UNITY_STANDALONE)
 
 using System;
 using NUnit.Framework.Interfaces;
@@ -35,7 +35,7 @@ public ExpectedExceptionCommand(TestCommand innerCommand, Type expectedException
                 _expectedException = expectedException;
             }
 
-            #if UNITY_5 || UNITY_5_3_OR_NEWER || UNITY_EDITOR || UNITY_STANDALONE
+            #if UNITY_5_3_OR_NEWER || UNITY_EDITOR || UNITY_STANDALONE
             public override TestResult Execute(ITestExecutionContext context)
             #else
             public override TestResult Execute(TestExecutionContext context)

src/MoonSharp.VsCodeDebugger/DebuggerLogic/ScriptDebugSession.cs

@@ -266,6 +266,26 @@ public bool RemoveDebugger(Script script)
 			}
 		}
 
+		public bool RequestPause(Script script)
+		{
+			if (script == null)
+			{
+				return false;
+			}
+
+			lock (m_Lock)
+			{
+				if (!m_ThreadIdByScript.TryGetValue(script, out var threadId) || !m_ThreadsById.TryGetValue(threadId, out var state))
+				{
+					return false;
+				}
+
+				state.StopReason = STOP_REASON_PAUSED;
+				state.Debugger.PauseRequested = true;
+				return true;
+			}
+		}
+
 		public override void Initialize(Response response, Table args)
 		{
 			SendResponse(response, new Capabilities(

src/MoonSharp.VsCodeDebugger/MoonSharpVsCodeDebugServer.cs

@@ -1,5 +1,3 @@
-#if (!UNITY_5) || UNITY_STANDALONE
-
 using System;
 using System.Collections.Generic;
 using System.Linq;
@@ -144,6 +142,38 @@ public void Detach(Script script)
 			}
 		}
 
+		/// <summary>
+		/// Requests a pause for the specified attached script.
+		/// </summary>
+		public void RequestPause(Script script)
+		{
+			if (script == null)
+			{
+				throw new ArgumentException("Cannot pause null.");
+			}
+
+			lock (m_Lock)
+			{
+				if (m_Session != null)
+				{
+					if (!m_Session.RequestPause(script))
+					{
+						throw new ArgumentException("Cannot find script associated with debugger.");
+					}
+				}
+				else
+				{
+					AsyncDebugger debugger = m_PendingDebuggerList.FirstOrDefault(d => d.Script == script);
+					if (debugger == null)
+					{
+						throw new ArgumentException("Cannot find script associated with debugger.");
+					}
+
+					debugger.PauseRequested = true;
+				}
+			}
+		}
+
 		/// <summary>
 		/// Gets a list of the attached debuggers by id and name
 		/// </summary>
@@ -354,63 +384,3 @@ static void SpawnThread(string name, Action threadProc)
 		}
 	}
 }
-
-#else
-using System;
-using System.Collections.Generic;
-using MoonSharp.Interpreter;
-using MoonSharp.Interpreter.Debugging;
-
-namespace MoonSharp.VsCodeDebugger
-{
-	public class MoonSharpVsCodeDebugServer : IDisposable
-	{
-		public MoonSharpVsCodeDebugServer(int port = 41912)
-		{
-		}
-
-		public void AttachToScript(Script script, string name, Func<SourceCode, string> sourceFinder = null)
-		{
-		}
-
-		public void ReplaceAttachedScript(Script previousScript, Script newScript, string name = null, Func<SourceCode, string> sourceFinder = null)
-		{
-		}
-
-		public IEnumerable<KeyValuePair<int, string>> GetAttachedDebuggersByIdAndName()
-		{
-			yield break;
-		}
-
-		public IEnumerable<KeyValuePair<int, string>> GetListenersByPortAndDebuggerName()
-		{
-			yield break;
-		}
-
-		public IEnumerable<KeyValuePair<int, string>> GetSessionsByPortAndName()
-		{
-			yield break;
-		}
-
-		/// <summary>
-		/// Detaches the specified script. The debugger attached to that script will get disconnected.
-		/// </summary>
-		/// <param name="script">The script.</param>
-		/// <exception cref="ArgumentException">Thrown if the script cannot be found.</exception>
-		public void Detach(Script script)
-		{
-		}
-
-		public Action<string> Logger { get; set; }
-
-		public void Dispose()
-		{
-		}
-
-		public MoonSharpVsCodeDebugServer Start()
-		{
-			return this;
-		}
-	}
-}
-#endif