1 files changed, 62 insertions, 0 deletions
diff --git a/src/ToolBox/SOS/tests/t_cmd_bpmd_clearall.py b/src/ToolBox/SOS/tests/t_cmd_bpmd_clearall.py
new file mode 100644
index 0000000000..8da9239f57
--- /dev/null
+++ b/src/ToolBox/SOS/tests/t_cmd_bpmd_clearall.py
@@ -0,0 +1,62 @@
+import lldb
+import re
+import testutils as test
+
+# bpmd -clearall
+
+
+def runScenario(assembly, debugger, target):
+    process = target.GetProcess()
+    res = lldb.SBCommandReturnObject()
+    ci = debugger.GetCommandInterpreter()
+
+    # Run debugger, wait until libcoreclr is loaded,
+    # set breakpoint at Test.Main and stop there
+    test.stop_in_main(debugger, assembly)
+
+    # Set breakpoint
+
+    ci.HandleCommand("bpmd " + assembly + " Test.UnlikelyInlined", res)
+    out_msg = res.GetOutput()
+    err_msg = res.GetError()
+    print(out_msg)
+    print(err_msg)
+    # Interpreter must have this command and able to run it
+    test.assertTrue(res.Succeeded())
+
+    # Output is not empty
+    # Should be at least 'Adding pending breakpoints...'
+    test.assertTrue(len(out_msg) > 0)
+
+    # Error message is empty
+    test.assertTrue(len(err_msg) == 0)
+
+    # Delete all breakpoints
+
+    ci.HandleCommand("bpmd -clearall", res)
+    out_msg = res.GetOutput()
+    err_msg = res.GetError()
+    print(out_msg)
+    print(err_msg)
+    # Interpreter must have this command and able to run it
+    test.assertTrue(res.Succeeded())
+
+    match = re.search('All pending breakpoints cleared.', out_msg)
+    # Check for specific output
+    test.assertTrue(match)
+
+    # Error message is empty
+    test.assertEqual(err_msg, '')
+
+    process.Continue()
+    # Process must be exited
+    test.assertEqual(process.GetState(), lldb.eStateExited)
+
+    # The reason of this stop must be a breakpoint
+    test.assertEqual(process.GetSelectedThread().GetStopReason(),
+                     lldb.eStopReasonNone)
+
+    #
+
+    # Delete all breakpoints, continue current process and checks its exit code
+    test.exit_lldb(debugger, assembly)