expose plugin sidechain (via route):
[ardour.git] / libs / ardour / luabindings.cc
index 38e9d4674b0a3c02c1aa3702cf8ba1f930114acc..33506ee6a9f7ca284a51ebee46cf651a35b2e3c6 100644 (file)
@@ -40,6 +40,7 @@
 #include "ardour/region_factory.h"
 #include "ardour/session.h"
 #include "ardour/session_object.h"
+#include "ardour/sidechain.h"
 #include "ardour/tempo.h"
 
 #include "LuaBridge/LuaBridge.h"
@@ -72,38 +73,26 @@ LuaBindings::stddef (lua_State* L)
 {
        // std::list<std::string>
        luabridge::getGlobalNamespace (L)
-               .beginNamespace ("ARDOUR")
+               .beginNamespace ("C")
                .beginStdList <std::string> ("StringList")
                .endClass ()
-               .endNamespace ();
 
        // std::vector<std::string>
-       luabridge::getGlobalNamespace (L)
-               .beginNamespace ("ARDOUR")
                .beginStdVector <std::string> ("StringVector")
                .endClass ()
-               .endNamespace ();
 
        // register float array (float*)
-       luabridge::getGlobalNamespace (L)
-               .beginNamespace ("ARDOUR")
                .registerArray <float> ("FloatArray")
-               .endNamespace ();
 
        // register float array (int32_t*)
-       luabridge::getGlobalNamespace (L)
-               .beginNamespace ("ARDOUR")
                .registerArray <int32_t> ("IntArray")
-               .endNamespace ();
 
        // std::vector<std::string>
-       luabridge::getGlobalNamespace (L)
-               .beginNamespace ("ARDOUR")
                .beginStdVector <double> ("DoubleVector")
                .endClass ()
-               .endNamespace ();
 
        // TODO std::set
+               .endNamespace ();
 }
 
 void
@@ -140,16 +129,46 @@ LuaBindings::common (lua_State* L)
                .addConst ("UseGroup", PBD::Controllable::GroupControlDisposition(PBD::Controllable::UseGroup))
                .endNamespace ()
 
-               .endNamespace ();
+               .endNamespace (); // PBD
 
        luabridge::getGlobalNamespace (L)
-               .beginNamespace ("ARDOUR") // XXX really libtimecode
+               .beginNamespace ("Timecode")
                .beginClass <Timecode::BBT_Time> ("BBT_TIME")
                .addConstructor <void (*) (uint32_t, uint32_t, uint32_t)> ()
                .endClass ()
                .endNamespace ();
 
        luabridge::getGlobalNamespace (L)
+
+               .beginNamespace ("Evoral")
+               .beginClass <Evoral::Parameter> ("Parameter")
+               .addConstructor <void (*) (uint32_t, uint8_t, uint32_t)> ()
+               .addFunction ("type", &Evoral::Parameter::type)
+               .addFunction ("channel", &Evoral::Parameter::channel)
+               .addFunction ("id", &Evoral::Parameter::id)
+               .endClass ()
+
+               .beginWSPtrClass <Evoral::ControlList> ("ControlList")
+               .addFunction ("add", &Evoral::ControlList::add)
+               .endClass ()
+
+               .beginWSPtrClass <Evoral::ControlSet> ("ControlSet")
+               .endClass ()
+
+               .beginWSPtrClass <Evoral::Control> ("Control")
+               .addFunction ("list", (boost::shared_ptr<Evoral::ControlList>(Evoral::Control::*)())&Evoral::Control::list)
+               .endClass ()
+
+               .beginClass <Evoral::ParameterDescriptor> ("ParameterDescriptor")
+               .addVoidConstructor ()
+               .addData ("lower", &Evoral::ParameterDescriptor::lower)
+               .addData ("upper", &Evoral::ParameterDescriptor::upper)
+               .addData ("normal", &Evoral::ParameterDescriptor::normal)
+               .addData ("toggled", &Evoral::ParameterDescriptor::toggled)
+               .endClass ()
+
+               .endNamespace () // Evoral
+
                .beginNamespace ("ARDOUR")
                .beginWSPtrClass <PluginInfo> ("PluginInfo")
                .addVoidConstructor ()
@@ -161,6 +180,13 @@ LuaBindings::common (lua_State* L)
                .endClass ()
                .endNamespace ()
 
+               .beginClass <ChanMapping> ("ChanMapping")
+               .addVoidConstructor ()
+               .addFunction ("get", static_cast<uint32_t(ChanMapping::*)(DataType, uint32_t) const>(&ChanMapping::get))
+               .addFunction ("set", &ChanMapping::set)
+               .addConst ("Invalid", 4294967295) // UINT32_MAX
+               .endClass ()
+
                .beginNamespace ("Properties")
                // templated class definitions
                .beginClass <PBD::PropertyDescriptor<bool> > ("BoolProperty").endClass ()
@@ -206,6 +232,15 @@ LuaBindings::common (lua_State* L)
                .addFunction ("name", &SessionObject::name)
                .endClass ()
 
+               .deriveWSPtrClass <IO, SessionObject> ("IO")
+               .addFunction ("active", &IO::active)
+               .addFunction ("add_port", &IO::add_port)
+               .addFunction ("remove_port", &IO::remove_port)
+               .addFunction ("connect", &IO::connect)
+               .addFunction ("disconnect", (int (IO::*)(boost::shared_ptr<Port>, std::string, void *))&IO::disconnect)
+               .addFunction ("physically_connected", &IO::physically_connected)
+               .endClass ()
+
                .deriveWSPtrClass <Route, SessionObject> ("Route")
                .addFunction ("set_name", &Route::set_name)
                .addFunction ("comment", &Route::comment)
@@ -218,6 +253,12 @@ LuaBindings::common (lua_State* L)
                .addFunction ("n_inputs", &Route::n_inputs)
                .addFunction ("n_outputs", &Route::n_outputs)
                .addFunction ("set_comment", &Route::set_comment)
+               .addFunction ("strict_io", &Route::strict_io)
+               .addFunction ("set_strict_io", &Route::set_strict_io)
+               .addFunction ("reset_plugin_insert", &Route::reset_plugin_insert)
+               .addFunction ("customize_plugin_insert", &Route::customize_plugin_insert)
+               .addFunction ("add_sidechain", &Route::add_sidechain)
+               .addFunction ("remove_sidechain", &Route::remove_sidechain)
                .endClass ()
 
                .deriveWSPtrClass <Track, Route> ("Track")
@@ -244,7 +285,7 @@ LuaBindings::common (lua_State* L)
                .addFunction ("data_type", &Region::data_type)
                .addFunction ("stretch", &Region::stretch)
                .addFunction ("shift", &Region::shift)
-               .addFunction ("sync_offset", &Region::sync_offset)
+               .addRefFunction ("sync_offset", &Region::sync_offset)
                .addFunction ("sync_position", &Region::sync_position)
                .addFunction ("hidden", &Region::hidden)
                .addFunction ("muted", &Region::muted)
@@ -293,13 +334,6 @@ LuaBindings::common (lua_State* L)
                .beginWSPtrClass <Source> ("Source")
                .endClass ()
 
-               .beginClass <Evoral::Parameter> ("EvoralParameter")
-               .addConstructor <void (*) (uint32_t, uint8_t, uint32_t)> ()
-               .addFunction ("type", &Evoral::Parameter::type)
-               .addFunction ("channel", &Evoral::Parameter::channel)
-               .addFunction ("id", &Evoral::Parameter::id)
-               .endClass ()
-
                .beginClass <Plugin::PresetRecord> ("PresetRecord")
                .addData ("uri", &Plugin::PresetRecord::uri, false)
                .addData ("label", &Plugin::PresetRecord::label, false)
@@ -307,29 +341,10 @@ LuaBindings::common (lua_State* L)
                .addData ("valid", &Plugin::PresetRecord::valid, false)
                .endClass ()
 
-               .beginWSPtrClass <Evoral::ControlList> ("EvoralControlList")
-               .addFunction ("add", &Evoral::ControlList::add)
-               .endClass ()
-
-               .beginWSPtrClass <Evoral::ControlSet> ("EvoralControlSet")
-               .endClass ()
-
                .deriveWSPtrClass <Automatable, Evoral::ControlSet> ("Automatable")
                .addFunction ("automation_control", (boost::shared_ptr<AutomationControl>(Automatable::*)(const Evoral::Parameter&, bool))&Automatable::automation_control)
                .endClass ()
 
-               .beginWSPtrClass <Evoral::Control> ("EvoralControl")
-               .addFunction ("list", (boost::shared_ptr<Evoral::ControlList>(Evoral::Control::*)())&Evoral::Control::list)
-               .endClass ()
-
-               .beginClass <Evoral::ParameterDescriptor> ("EvoralParameterDescriptor")
-               .addVoidConstructor ()
-               .addData ("lower", &Evoral::ParameterDescriptor::lower)
-               .addData ("upper", &Evoral::ParameterDescriptor::upper)
-               .addData ("normal", &Evoral::ParameterDescriptor::normal)
-               .addData ("toggled", &Evoral::ParameterDescriptor::toggled)
-               .endClass ()
-
                .deriveClass <ParameterDescriptor, Evoral::ParameterDescriptor> ("ParameterDescriptor")
                .addVoidConstructor ()
                .addData ("label", &ParameterDescriptor::label)
@@ -342,6 +357,8 @@ LuaBindings::common (lua_State* L)
 
                .deriveWSPtrClass <Processor, Automatable> ("Processor")
                .addCast<PluginInsert> ("to_insert")
+               .addCast<SideChain> ("to_sidechain")
+               .addCast<IOProcessor> ("to_ioprocessor")
                .addFunction ("display_name", &Processor::display_name)
                .addFunction ("active", &Processor::active)
                .addFunction ("activate", &Processor::activate)
@@ -350,12 +367,22 @@ LuaBindings::common (lua_State* L)
                .addFunction ("automation_control", (boost::shared_ptr<AutomationControl>(Automatable::*)(const Evoral::Parameter&, bool))&Automatable::automation_control)
                .endClass ()
 
-               .deriveWSPtrClass <Plugin, PBD::StatefulDestructible> ("PluginInsert")
+               .deriveWSPtrClass <IOProcessor, Processor> ("IOProcessor")
+               .addFunction ("natural_input_streams", &IOProcessor::natural_input_streams)
+               .addFunction ("natural_output_streams", &IOProcessor::natural_output_streams)
+               .addFunction ("input", (boost::shared_ptr<IO>(IOProcessor::*)())&IOProcessor::input)
+               .addFunction ("output", (boost::shared_ptr<IO>(IOProcessor::*)())&IOProcessor::output)
+               .endClass ()
+
+               .deriveWSPtrClass <SideChain, IOProcessor> ("SideChain")
+               .endClass ()
+
+               .deriveWSPtrClass <Plugin, PBD::StatefulDestructible> ("Plugin")
                .addFunction ("label", &Plugin::label)
                .addFunction ("name", &Plugin::name)
                .addFunction ("maker", &Plugin::maker)
                .addFunction ("parameter_count", &Plugin::parameter_count)
-               .addFunction ("nth_parameter", &Plugin::nth_parameter)
+               .addRefFunction ("nth_parameter", &Plugin::nth_parameter)
                .addFunction ("preset_by_label", &Plugin::preset_by_label)
                .addFunction ("preset_by_uri", &Plugin::preset_by_uri)
                .addFunction ("load_preset", &Plugin::load_preset)
@@ -369,6 +396,12 @@ LuaBindings::common (lua_State* L)
                .addFunction ("plugin", &PluginInsert::plugin)
                .addFunction ("activate", &PluginInsert::activate)
                .addFunction ("deactivate", &PluginInsert::deactivate)
+               .addFunction ("strict_io_configured", &PluginInsert::strict_io_configured)
+               .addFunction ("input_map", (ARDOUR::ChanMapping (PluginInsert::*)(uint32_t) const)&PluginInsert::input_map)
+               .addFunction ("output_map", (ARDOUR::ChanMapping (PluginInsert::*)(uint32_t) const)&PluginInsert::output_map)
+               .addFunction ("set_input_map", &PluginInsert::set_input_map)
+               .addFunction ("set_output_map", &PluginInsert::set_output_map)
+
                .endClass ()
 
                .deriveWSPtrClass <AutomationControl, Evoral::Control> ("AutomationControl")
@@ -449,11 +482,20 @@ LuaBindings::common (lua_State* L)
                .endClass ()
 
                .beginClass <ChanCount> ("ChanCount")
+               .addConstructor <void (*) (DataType, uint32_t)> ()
+               .addFunction ("get", &ChanCount::get)
+               .addFunction ("set", &ChanCount::set)
                .addFunction ("n_audio", &ChanCount::n_audio)
+               .addFunction ("n_midi", &ChanCount::n_midi)
+               .addFunction ("n_total", &ChanCount::n_total)
+               .addFunction ("reset", &ChanCount::reset)
                .endClass()
 
                .beginClass <DataType> ("DataType")
                .addConstructor <void (*) (std::string)> ()
+               .addStaticCFunction ("null",  &LuaAPI::datatype_ctor_nil) // "nil" is a lua reseved word
+               .addStaticCFunction ("audio", &LuaAPI::datatype_ctor_audio)
+               .addStaticCFunction ("midi",  &LuaAPI::datatype_ctor_midi)
                .endClass()
 
                /* libardour enums */
@@ -499,13 +541,11 @@ LuaBindings::common (lua_State* L)
                .endClass()
                .beginStdVector <const AudioBackendInfo*> ("BackendVector").endClass ()
 
-               .beginNamespace ("ARDOUR")
                .beginClass <AudioBackend::DeviceStatus> ("DeviceStatus")
                .addData ("name", &AudioBackend::DeviceStatus::name)
                .addData ("available", &AudioBackend::DeviceStatus::available)
                .endClass()
                .beginStdVector <AudioBackend::DeviceStatus> ("DeviceStatusVector").endClass ()
-               .endNamespace ()
 
                .beginWSPtrClass <AudioBackend> ("AudioBackend")
                .addFunction ("info", &AudioBackend::info)
@@ -639,12 +679,6 @@ LuaBindings::dsp (lua_State* L)
                .addFunction ("get_audio", static_cast<AudioBuffer&(BufferSet::*)(size_t)>(&BufferSet::get_audio))
                .addFunction ("count", static_cast<const ChanCount&(BufferSet::*)()const>(&BufferSet::count))
                .endClass()
-
-               .beginClass <ChanMapping> ("ChanMapping")
-               .addFunction ("get", static_cast<uint32_t(ChanMapping::*)(DataType, uint32_t)>(&ChanMapping::get))
-               .addFunction ("set", &ChanMapping::set)
-               .addConst ("Invalid", 4294967295) // UINT32_MAX
-               .endClass ()
                .endNamespace ();
 
        luabridge::getGlobalNamespace (L)
@@ -759,11 +793,13 @@ void
 LuaBindings::osc (lua_State* L)
 {
        luabridge::getGlobalNamespace (L)
-               .beginNamespace ("OSC")
-               .beginClass<LuaAPI::LuaOSCAddress> ("Address")
+               .beginNamespace ("ARDOUR")
+               .beginNamespace ("LuaOSC")
+               .beginClass<LuaOSC::Address> ("Address")
                .addConstructor<void (*) (std::string)> ()
-               .addCFunction ("send", &LuaAPI::LuaOSCAddress::send)
+               .addCFunction ("send", &LuaOSC::Address::send)
                .endClass ()
+               .endNamespace ()
                .endNamespace ();
 }