From c33b40bb7f247d3e2707fd6d03dd3904af26a971 Mon Sep 17 00:00:00 2001
From: Robin Gareus <robin@gareus.org>
Date: Thu, 11 Feb 2021 10:03:23 +0100
Subject: [PATCH] Crash-test tester

---
 libs/ardour/ardour/lua_api.h | 3 +++
 libs/ardour/lua_api.cc       | 7 +++++++
 libs/ardour/luabindings.cc   | 1 +
 3 files changed, 11 insertions(+)

diff --git a/libs/ardour/ardour/lua_api.h b/libs/ardour/ardour/lua_api.h
index b4ab9d60bc..022689e2c6 100644
--- a/libs/ardour/ardour/lua_api.h
+++ b/libs/ardour/ardour/lua_api.h
@@ -237,6 +237,9 @@ namespace ARDOUR { namespace LuaAPI {
 	 */
 	bool wait_for_process_callback (size_t n_cycles, int64_t timeout_ms);
 
+	/** Crash Test Dummy */
+	void segfault ();
+
 	class Vamp {
 	/** Vamp Plugin Interface
 	 *
diff --git a/libs/ardour/lua_api.cc b/libs/ardour/lua_api.cc
index 9a0fc04545..a724aca926 100644
--- a/libs/ardour/lua_api.cc
+++ b/libs/ardour/lua_api.cc
@@ -466,6 +466,13 @@ ARDOUR::LuaAPI::wait_for_process_callback (size_t n_cycles, int64_t timeout_ms)
 	return true;
 }
 
+void
+ARDOUR::LuaAPI::segfault ()
+{
+	int* p = NULL;
+	*p = 0;
+}
+
 int
 ARDOUR::LuaOSC::Address::send (lua_State *L)
 {
diff --git a/libs/ardour/luabindings.cc b/libs/ardour/luabindings.cc
index 27a3c81cb7..9bb00d407c 100644
--- a/libs/ardour/luabindings.cc
+++ b/libs/ardour/luabindings.cc
@@ -2577,6 +2577,7 @@ LuaBindings::common (lua_State* L)
 		.addCFunction ("sample_to_timecode", ARDOUR::LuaAPI::sample_to_timecode)
 		.addCFunction ("timecode_to_sample", ARDOUR::LuaAPI::timecode_to_sample)
 		.addFunction ("wait_for_process_callback", ARDOUR::LuaAPI::wait_for_process_callback)
+		.addFunction ("segfault", ARDOUR::LuaAPI::segfault)
 
 		.beginNamespace ("FileTest")
 		.addConst ("IsRegular", Glib::FILE_TEST_IS_REGULAR)