Fix yet another oversight for the windows icon file update
[ardour.git] / libs / ardour / luabindings.cc
index f7fdcf40852c1edd896e42ea0f593d0f78bd09d9..84a2610a443fe7e1961ca0e44e4ac4bb1cbaf9e2 100644 (file)
@@ -56,6 +56,7 @@
 #include "ardour/plugin.h"
 #include "ardour/plugin_insert.h"
 #include "ardour/port_manager.h"
+#include "ardour/progress.h"
 #include "ardour/runtime_functions.h"
 #include "ardour/region.h"
 #include "ardour/region_factory.h"
@@ -137,14 +138,22 @@ luabridge::getIdentityKey ()
        template void const* luabridge::ClassInfo< CLS >::getConstKey();
 
 CLASSINFO(ArdourMarker);
+CLASSINFO(AxisView);
 CLASSINFO(MarkerSelection);
 CLASSINFO(PublicEditor);
 CLASSINFO(RegionSelection);
+CLASSINFO(RegionView);
+CLASSINFO(RouteTimeAxisView);
+CLASSINFO(RouteUI);
+CLASSINFO(Selectable);
 CLASSINFO(Selection);
+CLASSINFO(TimeAxisView);
+CLASSINFO(TimeAxisViewItem);
 CLASSINFO(TimeSelection);
 CLASSINFO(TrackSelection);
 CLASSINFO(TrackViewList);
 
+
 CLASSKEYS(std::bitset<47ul>); // LuaSignal::LAST_SIGNAL
 
 CLASSKEYS(void);
@@ -152,6 +161,8 @@ CLASSKEYS(float);
 CLASSKEYS(unsigned char);
 
 CLASSKEYS(ArdourMarker*);
+CLASSKEYS(Selectable*);
+CLASSKEYS(std::list<Selectable*>);
 
 CLASSKEYS(ARDOUR::AudioEngine);
 CLASSKEYS(ARDOUR::BufferSet);
@@ -198,10 +209,12 @@ CLASSKEYS(std::vector<boost::shared_ptr<ARDOUR::Processor> >);
 CLASSKEYS(std::vector<boost::shared_ptr<ARDOUR::Source> >);
 
 CLASSKEYS(std::list<ArdourMarker*>);
+CLASSKEYS(std::list<TimeAxisView*>);
 CLASSKEYS(std::list<ARDOUR::AudioRange>);
 CLASSKEYS(std::list<boost::shared_ptr<ARDOUR::Port> >);
 CLASSKEYS(std::list<boost::shared_ptr<ARDOUR::Region> >);
 CLASSKEYS(std::list<boost::shared_ptr<ARDOUR::Route> >);
+CLASSKEYS(boost::shared_ptr<std::list<boost::shared_ptr<ARDOUR::Route> > >);
 
 CLASSKEYS(boost::shared_ptr<ARDOUR::AudioRegion>);
 CLASSKEYS(boost::shared_ptr<ARDOUR::AudioSource>);
@@ -220,6 +233,8 @@ CLASSKEYS(boost::shared_ptr<Evoral::ControlList>);
 CLASSKEYS(boost::shared_ptr<Evoral::Note<Evoral::Beats> >);
 CLASSKEYS(boost::shared_ptr<Evoral::Sequence<Evoral::Beats> >);
 
+CLASSKEYS(boost::shared_ptr<ARDOUR::Playlist>);
+CLASSKEYS(boost::shared_ptr<ARDOUR::Route>);
 CLASSKEYS(boost::weak_ptr<ARDOUR::Route>);
 
 CLASSKEYS(Vamp::RealTime);
@@ -423,6 +438,20 @@ LuaBindings::common (lua_State* L)
                //.addStaticData ("ticks_per_beat", &Timecode::BBT_Time::ticks_per_beat, false)
                .endClass ()
 
+               .beginClass <Timecode::Time> ("Time")
+               .addConstructor <void (*) (double)> ()
+               .addData ("negative", &Timecode::Time::negative)
+               .addData ("hours", &Timecode::Time::hours)
+               .addData ("minutes", &Timecode::Time::minutes)
+               .addData ("seconds", &Timecode::Time::seconds)
+               .addData ("frames", &Timecode::Time::frames)
+               .addData ("subframes", &Timecode::Time::subframes)
+               .addData ("rate", &Timecode::Time::rate)
+               .addData ("drop", &Timecode::Time::drop)
+               .endClass ()
+
+               // TODO add increment, decrement; push it into the class
+
                /* libtimecode enums */
                .beginNamespace ("TimecodeFormat")
                .addConst ("TC23976", Timecode::TimecodeFormat(Timecode::timecode_23976))
@@ -645,6 +674,16 @@ LuaBindings::common (lua_State* L)
                .addData ("progress", const_cast<float InterThreadInfo::*>(&InterThreadInfo::progress))
                .endClass ()
 
+               .beginClass <Progress> ("Progress")
+               .endClass ()
+
+               .beginClass <MusicFrame> ("MusicFrame")
+               .addConstructor <void (*) (framepos_t, int32_t)> ()
+               .addFunction ("set", &MusicFrame::set)
+               .addData ("frame", &MusicFrame::frame)
+               .addData ("division", &MusicFrame::division)
+               .endClass ()
+
                .beginClass <AudioRange> ("AudioRange")
                .addConstructor <void (*) (framepos_t, framepos_t, uint32_t)> ()
                .addFunction ("length", &AudioRange::length)
@@ -655,7 +694,7 @@ LuaBindings::common (lua_State* L)
                .endClass ()
 
                .beginWSPtrClass <PluginInfo> ("PluginInfo")
-               .addVoidConstructor ()
+               .addNilPtrConstructor ()
                .addData ("name", &PluginInfo::name, false)
                .addData ("category", &PluginInfo::category, false)
                .addData ("creator", &PluginInfo::creator, false)
@@ -825,7 +864,38 @@ LuaBindings::common (lua_State* L)
                .endClass ()
 
                .beginClass <RouteGroup> ("RouteGroup")
-               // stub RouteGroup* is needed for new_audio_track()
+               .addFunction ("is_active", &RouteGroup::is_active)
+               .addFunction ("is_relative", &RouteGroup::is_relative)
+               .addFunction ("is_hidden", &RouteGroup::is_hidden)
+               .addFunction ("is_gain", &RouteGroup::is_gain)
+               .addFunction ("is_mute", &RouteGroup::is_mute)
+               .addFunction ("is_solo", &RouteGroup::is_solo)
+               .addFunction ("is_recenable", &RouteGroup::is_recenable)
+               .addFunction ("is_select", &RouteGroup::is_select)
+               .addFunction ("is_route_active", &RouteGroup::is_route_active)
+               .addFunction ("is_color", &RouteGroup::is_color)
+               .addFunction ("is_monitoring", &RouteGroup::is_monitoring)
+               .addFunction ("group_master_number", &RouteGroup::group_master_number)
+               .addFunction ("empty", &RouteGroup::empty)
+               .addFunction ("size", &RouteGroup::size)
+               .addFunction ("set_active", &RouteGroup::set_active)
+               .addFunction ("set_relative", &RouteGroup::set_relative)
+               .addFunction ("set_hidden", &RouteGroup::set_hidden)
+               .addFunction ("set_gain", &RouteGroup::set_gain)
+               .addFunction ("set_mute", &RouteGroup::set_mute)
+               .addFunction ("set_solo", &RouteGroup::set_solo)
+               .addFunction ("set_recenable", &RouteGroup::set_recenable)
+               .addFunction ("set_select", &RouteGroup::set_select)
+               .addFunction ("set_route_active", &RouteGroup::set_route_active)
+               .addFunction ("set_color", &RouteGroup::set_color)
+               .addFunction ("set_monitoring", &RouteGroup::set_monitoring)
+               .addFunction ("add", &RouteGroup::add)
+               .addFunction ("remove", &RouteGroup::remove)
+               .addFunction ("clear", &RouteGroup::clear)
+               .addFunction ("has_subgroup", &RouteGroup::has_subgroup)
+               .addFunction ("make_subgroup", &RouteGroup::make_subgroup)
+               .addFunction ("destroy_subgroup", &RouteGroup::destroy_subgroup)
+               .addFunction ("route_list", &RouteGroup::route_list)
                .endClass ()
 
                .deriveClass <PresentationInfo, PBD::Stateful> ("PresentationInfo")
@@ -884,6 +954,7 @@ LuaBindings::common (lua_State* L)
 
                .deriveWSPtrClass <Route, Stripable> ("Route")
                .addCast<Track> ("to_track")
+               .addCast<Automatable> ("to_automatable")
                .addFunction ("set_name", &Route::set_name)
                .addFunction ("comment", &Route::comment)
                .addFunction ("active", &Route::active)
@@ -893,7 +964,9 @@ LuaBindings::common (lua_State* L)
                .addFunction ("nth_send", &Route::nth_send)
                .addFunction ("add_processor_by_index", &Route::add_processor_by_index)
                .addFunction ("remove_processor", &Route::remove_processor)
+               .addFunction ("remove_processors", &Route::remove_processors)
                .addFunction ("replace_processor", &Route::replace_processor)
+               .addFunction ("reorder_processors", &Route::reorder_processors)
                .addFunction ("the_instrument", &Route::the_instrument)
                .addFunction ("n_inputs", &Route::n_inputs)
                .addFunction ("n_outputs", &Route::n_outputs)
@@ -1058,6 +1131,8 @@ LuaBindings::common (lua_State* L)
                .addFunction ("audio_source", &AudioRegion::audio_source)
                .addFunction ("set_scale_amplitude", &AudioRegion::set_scale_amplitude)
                .addFunction ("scale_amplitude", &AudioRegion::scale_amplitude)
+               .addFunction ("maximum_amplitude", &AudioRegion::maximum_amplitude)
+               .addFunction ("rms", &AudioRegion::rms)
                .endClass ()
 
                .deriveWSPtrClass <Source, SessionObject> ("Source")
@@ -1139,7 +1214,8 @@ LuaBindings::common (lua_State* L)
 
                .deriveWSPtrClass <Processor, SessionObject> ("Processor")
                .addCast<Automatable> ("to_automatable")
-               .addCast<PluginInsert> ("to_insert")
+               .addCast<PluginInsert> ("to_insert") // deprecated
+               .addCast<PluginInsert> ("to_plugininsert")
                .addCast<SideChain> ("to_sidechain")
                .addCast<IOProcessor> ("to_ioprocessor")
                .addCast<UnknownProcessor> ("to_unknownprocessor")
@@ -1152,6 +1228,7 @@ LuaBindings::common (lua_State* L)
 #endif
                .addCast<PeakMeter> ("to_meter")
                .addFunction ("display_name", &Processor::display_name)
+               .addFunction ("display_to_user", &Processor::display_to_user)
                .addFunction ("active", &Processor::active)
                .addFunction ("activate", &Processor::activate)
                .addFunction ("deactivate", &Processor::deactivate)
@@ -1217,6 +1294,7 @@ LuaBindings::common (lua_State* L)
                .addFunction ("set_output_map", &PluginInsert::set_output_map)
                .addFunction ("natural_output_streams", &PluginInsert::natural_output_streams)
                .addFunction ("natural_input_streams", &PluginInsert::natural_input_streams)
+               .addFunction ("reset_parameters_to_default", &PluginInsert::reset_parameters_to_default)
                .endClass ()
 
                .deriveWSPtrClass <AutomationControl, PBD::Controllable> ("AutomationControl")
@@ -1336,12 +1414,17 @@ LuaBindings::common (lua_State* L)
 
                // boost::shared_ptr<RouteList>
                .beginPtrStdList <boost::shared_ptr<Route> > ("RouteListPtr")
+               .addVoidPtrConstructor<std::list<boost::shared_ptr <Route> > > ()
                .endClass ()
 
                // typedef std::list<boost::weak_ptr <Route> > WeakRouteList
                .beginConstStdList <boost::weak_ptr<Route> > ("WeakRouteList")
                .endClass ()
 
+               // RouteList == std::list<boost::shared_ptr<Route> >
+               .beginConstStdList <RouteGroup*> ("RouteGroupList")
+               .endClass ()
+
                // typedef std::vector<boost::shared_ptr<Source> > Region::SourceList
                .beginStdVector <boost::shared_ptr<Source> > ("SourceList")
                .endClass ()
@@ -1356,6 +1439,11 @@ LuaBindings::common (lua_State* L)
 
                // boost::shared_ptr <std::list<boost::shared_ptr<Region> > >
                .beginPtrStdList <boost::shared_ptr<Region> > ("RegionListPtr")
+               .addVoidPtrConstructor<std::list<boost::shared_ptr <Region> > > ()
+               .endClass ()
+
+               // typedef std::list<boost::shared_ptr<Processor> > ProcessorList;
+               .beginStdList <boost::shared_ptr<Processor> > ("ProcessorList")
                .endClass ()
 
                //std::list<boost::shared_ptr<Port> > PortList;
@@ -1369,6 +1457,14 @@ LuaBindings::common (lua_State* L)
                .beginConstStdList <Location*> ("LocationList")
                .endClass ()
 
+               // std::list<boost::shared_ptr<AutomationControl> > ControlList;
+               .beginStdList <boost::shared_ptr<AutomationControl> > ("ControlList")
+               .endClass ()
+
+               .beginPtrStdList <boost::shared_ptr<AutomationControl> > ("ControlListPtr")
+               .addVoidPtrConstructor<std::list<boost::shared_ptr <AutomationControl> > > ()
+               .endClass ()
+
 #if 0  // depends on Evoal:: Note, Beats see note_fixer.h
        // typedef Evoral::Note<Evoral::Beats> Note;
        // std::set< boost::weak_ptr<Note> >
@@ -1400,7 +1496,8 @@ LuaBindings::common (lua_State* L)
                .beginClass <TempoMap> ("TempoMap")
                .addFunction ("add_tempo", &TempoMap::add_tempo)
                .addFunction ("add_meter", &TempoMap::add_meter)
-               .addFunction ("tempo_section_at_frame", &TempoMap::tempo_section_at_frame)
+               .addFunction ("tempo_section_at_frame", (TempoSection& (TempoMap::*)(framepos_t))&TempoMap::tempo_section_at_frame)
+               .addFunction ("tempo_section_at_frame", (const TempoSection& (TempoMap::*)(framepos_t) const)&TempoMap::tempo_section_at_frame)
                .addFunction ("meter_section_at_frame", &TempoMap::meter_section_at_frame)
                .addFunction ("meter_section_at_beat", &TempoMap::meter_section_at_beat)
                .addFunction ("bbt_at_frame", &TempoMap::bbt_at_frame)
@@ -1414,7 +1511,7 @@ LuaBindings::common (lua_State* L)
                .endClass ()
 
                .deriveClass <TempoSection, MetricSection> ("TempoSection")
-               .addFunction ("c_func", (double(TempoSection::*)()const)&TempoSection::c_func)
+               .addFunction ("c", (double(TempoSection::*)()const)&TempoSection::c)
                .endClass ()
 
                .deriveClass <MeterSection, MetricSection> ("MeterSection")
@@ -1492,6 +1589,12 @@ LuaBindings::common (lua_State* L)
                .addConst ("RecSafeAutomation", ARDOUR::AutomationType(RecSafeAutomation))
                .addConst ("TrimAutomation", ARDOUR::AutomationType(TrimAutomation))
                .addConst ("PhaseAutomation", ARDOUR::AutomationType(PhaseAutomation))
+               .addConst ("MidiCCAutomation", ARDOUR::AutomationType(MidiCCAutomation))
+               .addConst ("MidiPgmChangeAutomation", ARDOUR::AutomationType(MidiPgmChangeAutomation))
+               .addConst ("MidiPitchBenderAutomation", ARDOUR::AutomationType(MidiPitchBenderAutomation))
+               .addConst ("MidiChannelPressureAutomation", ARDOUR::AutomationType(MidiChannelPressureAutomation))
+               .addConst ("MidiNotePressureAutomation", ARDOUR::AutomationType(MidiNotePressureAutomation))
+               .addConst ("MidiSystemExclusiveAutomation", ARDOUR::AutomationType(MidiSystemExclusiveAutomation))
                .endNamespace ()
 
                .beginNamespace ("SrcQuality")
@@ -1523,6 +1626,18 @@ LuaBindings::common (lua_State* L)
                .addConst ("MeterCustom", ARDOUR::MeterPoint(MeterCustom))
                .endNamespace ()
 
+               .beginNamespace ("Placement")
+               .addConst ("PreFader", ARDOUR::Placement(PreFader))
+               .addConst ("PostFader", ARDOUR::Placement(PostFader))
+               .endNamespace ()
+
+               .beginNamespace ("MonitorChoice")
+               .addConst ("MonitorAuto", ARDOUR::MonitorChoice(MonitorAuto))
+               .addConst ("MonitorInput", ARDOUR::MonitorChoice(MonitorInput))
+               .addConst ("MonitorDisk", ARDOUR::MonitorChoice(MonitorDisk))
+               .addConst ("MonitorCue", ARDOUR::MonitorChoice(MonitorCue))
+               .endNamespace ()
+
                .beginNamespace ("NoteMode")
                .addConst ("Sustained", ARDOUR::NoteMode(Sustained))
                .addConst ("Percussive", ARDOUR::NoteMode(Percussive))
@@ -1536,12 +1651,30 @@ LuaBindings::common (lua_State* L)
                .addConst ("IsTerminal", ARDOUR::PortFlags(IsTerminal))
                .endNamespace ()
 
+               .beginNamespace ("MidiPortFlags")
+               .addConst ("MidiPortMusic", ARDOUR::MidiPortFlags(MidiPortMusic))
+               .addConst ("MidiPortControl", ARDOUR::MidiPortFlags(MidiPortControl))
+               .addConst ("MidiPortSelection", ARDOUR::MidiPortFlags(MidiPortSelection))
+               .addConst ("MidiPortVirtual", ARDOUR::MidiPortFlags(MidiPortVirtual))
+               .endNamespace ()
+
                .beginNamespace ("PlaylistDisposition")
                .addConst ("CopyPlaylist", ARDOUR::PlaylistDisposition(CopyPlaylist))
                .addConst ("NewPlaylist", ARDOUR::PlaylistDisposition(NewPlaylist))
                .addConst ("SharePlaylist", ARDOUR::PlaylistDisposition(SharePlaylist))
                .endNamespace ()
 
+               .beginNamespace ("MidiTrackNameSource")
+               .addConst ("SMFTrackNumber", ARDOUR::MidiTrackNameSource(SMFTrackNumber))
+               .addConst ("SMFTrackName", ARDOUR::MidiTrackNameSource(SMFTrackName))
+               .addConst ("SMFInstrumentName", ARDOUR::MidiTrackNameSource(SMFInstrumentName))
+               .endNamespace ()
+
+               .beginNamespace ("MidiTempoMapDisposition")
+               .addConst ("SMFTempoIgnore", ARDOUR::MidiTrackNameSource(SMFTempoIgnore))
+               .addConst ("SMFTempoUse", ARDOUR::MidiTrackNameSource(SMFTempoUse))
+               .endNamespace ()
+
                .beginNamespace ("RegionPoint")
                .addConst ("Start", ARDOUR::RegionPoint(Start))
                .addConst ("End", ARDOUR::RegionPoint(End))
@@ -1602,7 +1735,7 @@ LuaBindings::common (lua_State* L)
                .beginClass <AudioBackendInfo> ("AudioBackendInfo")
                .addData ("name", &AudioBackendInfo::name)
                .endClass()
-               .beginStdVector <const AudioBackendInfo*> ("BackendVector").endClass ()
+               .beginConstStdVector <const AudioBackendInfo*> ("BackendVector").endClass ()
 
                .beginClass <AudioBackend::DeviceStatus> ("DeviceStatus")
                .addData ("name", &AudioBackend::DeviceStatus::name)
@@ -1707,7 +1840,7 @@ LuaBindings::common (lua_State* L)
                .addFunction ("transport_speed", &Session::transport_speed)
                .addFunction ("frame_rate", &Session::frame_rate)
                .addFunction ("nominal_frame_rate", &Session::nominal_frame_rate)
-               .addFunction ("frames_per_timecode_frame", &Session::frames_per_timecode_frame)
+               .addFunction ("samples_per_timecode_frame", &Session::samples_per_timecode_frame)
                .addFunction ("timecode_frames_per_hour", &Session::timecode_frames_per_hour)
                .addFunction ("timecode_frames_per_second", &Session::timecode_frames_per_second)
                .addFunction ("timecode_drop_frames", &Session::timecode_drop_frames)
@@ -1744,8 +1877,17 @@ LuaBindings::common (lua_State* L)
                .addFunction ("snap_name", &Session::snap_name)
                .addFunction ("monitor_out", &Session::monitor_out)
                .addFunction ("master_out", &Session::master_out)
+               .addFunction ("add_internal_sends", &Session::add_internal_sends)
                .addFunction ("tempo_map", (TempoMap& (Session::*)())&Session::tempo_map)
                .addFunction ("locations", &Session::locations)
+               .addFunction ("soloing", &Session::soloing)
+               .addFunction ("listening", &Session::listening)
+               .addFunction ("solo_isolated", &Session::solo_isolated)
+               .addFunction ("cancel_all_solo", &Session::cancel_all_solo)
+               .addFunction ("clear_all_solo_state", &Session::clear_all_solo_state)
+               .addFunction ("set_controls", &Session::set_controls)
+               .addFunction ("set_control", &Session::set_control)
+               .addFunction ("set_exclusive_input_active", &Session::set_exclusive_input_active)
                .addFunction ("begin_reversible_command", (void (Session::*)(const std::string&))&Session::begin_reversible_command)
                .addFunction ("commit_reversible_command", &Session::commit_reversible_command)
                .addFunction ("abort_reversible_command", &Session::abort_reversible_command)
@@ -1758,6 +1900,11 @@ LuaBindings::common (lua_State* L)
                .addFunction ("worst_track_latency", &Session::worst_track_latency)
                .addFunction ("worst_playback_latency", &Session::worst_playback_latency)
                .addFunction ("cfg", &Session::cfg)
+               .addFunction ("route_groups", &Session::route_groups)
+               .addFunction ("new_route_group", &Session::new_route_group)
+               .addFunction ("remove_route_group", (void (Session::*)(RouteGroup*))&Session::remove_route_group)
+               .addExtCFunction ("timecode_to_sample_lua", ARDOUR::LuaAPI::timecode_to_sample_lua)
+               .addExtCFunction ("sample_to_timecode_lua", ARDOUR::LuaAPI::sample_to_timecode_lua)
                .endClass ()
 
                .beginClass <RegionFactory> ("RegionFactory")
@@ -1795,13 +1942,18 @@ LuaBindings::common (lua_State* L)
                .addFunction ("new_plugin", ARDOUR::LuaAPI::new_plugin)
                .addFunction ("set_processor_param", ARDOUR::LuaAPI::set_processor_param)
                .addFunction ("set_plugin_insert_param", ARDOUR::LuaAPI::set_plugin_insert_param)
+               .addFunction ("reset_processor_to_default", ARDOUR::LuaAPI::reset_processor_to_default)
                .addRefFunction ("get_processor_param", ARDOUR::LuaAPI::get_processor_param)
                .addRefFunction ("get_plugin_insert_param", ARDOUR::LuaAPI::get_plugin_insert_param)
                .addCFunction ("plugin_automation", ARDOUR::LuaAPI::plugin_automation)
                .addCFunction ("hsla_to_rgba", ARDOUR::LuaAPI::hsla_to_rgba)
+               .addCFunction ("color_to_rgba", ARDOUR::LuaAPI::color_to_rgba)
                .addFunction ("usleep", Glib::usleep)
+               .addFunction ("monotonic_time", ::g_get_monotonic_time)
                .addCFunction ("build_filename", ARDOUR::LuaAPI::build_filename)
                .addFunction ("new_noteptr", ARDOUR::LuaAPI::new_noteptr)
+               .addCFunction ("sample_to_timecode", ARDOUR::LuaAPI::sample_to_timecode)
+               .addCFunction ("timecode_to_sample", ARDOUR::LuaAPI::timecode_to_sample)
 
                .beginClass <ARDOUR::LuaAPI::Vamp> ("Vamp")
                .addConstructor <void (*) (const std::string&, float)> ()
@@ -1924,7 +2076,7 @@ LuaBindings::dsp (lua_State* L)
 
        luabridge::getGlobalNamespace (L)
                .beginNamespace ("Evoral")
-               .deriveClass <Evoral::Event<framepos_t>, Evoral::Event<framepos_t> > ("MidiEvent")
+               .deriveClass <Evoral::Event<framepos_t>, Evoral::Event<framepos_t> > ("Event")
                // add Ctor?
                .addFunction ("type", &Evoral::Event<framepos_t>::type)
                .addFunction ("channel", &Evoral::Event<framepos_t>::channel)
@@ -1977,6 +2129,7 @@ LuaBindings::session (lua_State* L)
                .addFunction ("save_state", &Session::save_state)
                .addFunction ("set_dirty", &Session::set_dirty)
                .addFunction ("unknown_processors", &Session::unknown_processors)
+               .addFunction ("export_track_state", &Session::export_track_state)
 
                .addFunction<RouteList (Session::*)(uint32_t, PresentationInfo::order_t, const std::string&, const std::string&, PlaylistDisposition)> ("new_route_from_template", &Session::new_route_from_template)
                // TODO  session_add_audio_track  session_add_midi_track  session_add_mixed_track