From f80958e168e459f617a860a4aa12e6fc6766c8be Mon Sep 17 00:00:00 2001
From: Robin Gareus <robin@gareus.org>
Date: Sat, 17 Jun 2017 04:35:48 +0200
Subject: Add Lua bindings to query all stripables

---
 libs/ardour/ardour/session.h | 1 +
 libs/ardour/luabindings.cc   | 3 +++
 libs/ardour/session.cc       | 9 +++++++++
 3 files changed, 13 insertions(+)

(limited to 'libs')

diff --git a/libs/ardour/ardour/session.h b/libs/ardour/ardour/session.h
index dcc9e92e9e..bc8614be96 100644
--- a/libs/ardour/ardour/session.h
+++ b/libs/ardour/ardour/session.h
@@ -300,6 +300,7 @@ class LIBARDOUR_API Session : public PBD::StatefulDestructible, public PBD::Scop
 	 */
 
 	void get_stripables (StripableList&) const;
+	StripableList get_stripables () const;
 	boost::shared_ptr<RouteList> get_tracks() const;
 	boost::shared_ptr<RouteList> get_routes_with_internal_returns() const;
 	boost::shared_ptr<RouteList> get_routes_with_regions_at (framepos_t const) const;
diff --git a/libs/ardour/luabindings.cc b/libs/ardour/luabindings.cc
index 112805f3e6..3cc88fa414 100644
--- a/libs/ardour/luabindings.cc
+++ b/libs/ardour/luabindings.cc
@@ -945,6 +945,8 @@ LuaBindings::common (lua_State* L)
 		.addFunction ("color", &PresentationInfo::color)
 		.addFunction ("set_color", &PresentationInfo::set_color)
 		.addFunction ("order", &PresentationInfo::order)
+		.addFunction ("special", &PresentationInfo::special)
+		.addFunction ("flags", &PresentationInfo::flags)
 		.addConst ("max_order", ARDOUR::PresentationInfo::max_order)
 		.endClass ()
 
@@ -1972,6 +1974,7 @@ LuaBindings::common (lua_State* L)
 		.addFunction ("new_midi_route", &Session::new_midi_route)
 		.addFunction ("get_routes", &Session::get_routes)
 		.addFunction ("get_tracks", &Session::get_tracks)
+		.addFunction ("get_stripables", (StripableList (Session::*)() const)&Session::get_stripables)
 		.addFunction ("name", &Session::name)
 		.addFunction ("path", &Session::path)
 		.addFunction ("record_status", &Session::record_status)
diff --git a/libs/ardour/session.cc b/libs/ardour/session.cc
index 1e1289e8e6..cae5a5257b 100644
--- a/libs/ardour/session.cc
+++ b/libs/ardour/session.cc
@@ -4276,6 +4276,15 @@ Session::get_stripables (StripableList& sl) const
 	sl.insert (sl.end(), v.begin(), v.end());
 }
 
+StripableList
+Session::get_stripables () const
+{
+	StripableList rv;
+	Session::get_stripables (rv);
+	rv.sort (Stripable::Sorter ());
+	return rv;
+}
+
 boost::shared_ptr<RouteList>
 Session::get_routes_with_internal_returns() const
 {
-- 
cgit v1.2.3