#include <glibmm/fileutils.h>
#include "pbd/gstdio_compat.h"
-
+#include "pbd/locale_guard.h"
#include "pbd/pthread_utils.h"
#include "ardour/audio_buffer.h"
#include "LuaBridge/LuaBridge.h"
-#include "i18n.h"
+#include "pbd/i18n.h"
using namespace ARDOUR;
using namespace PBD;
Session& session,
const std::string &script)
: Plugin (engine, session)
- , _mempool ("LuaProc", 1048576) // 1 MB is plenty. (64K would be enough)
+ , _mempool ("LuaProc", 2097152)
+#ifdef USE_TLSF
+ , lua (lua_newstate (&PBD::TLSF::lalloc, &_mempool))
+#elif defined USE_MALLOC
+ , lua ()
+#else
, lua (lua_newstate (&PBD::ReallocPool::lalloc, &_mempool))
+#endif
, _lua_dsp (0)
, _script (script)
, _lua_does_channelmapping (false)
, _lua_has_inline_display (false)
+ , _designated_bypass_port (UINT32_MAX)
, _control_data (0)
, _shadow_data (0)
, _has_midi_input (false)
LuaProc::LuaProc (const LuaProc &other)
: Plugin (other)
- , _mempool ("LuaProc", 1048576) // 1 MB is plenty. (64K would be enough)
+ , _mempool ("LuaProc", 2097152)
+#ifdef USE_TLSF
+ , lua (lua_newstate (&PBD::TLSF::lalloc, &_mempool))
+#elif defined USE_MALLOC
+ , lua ()
+#else
, lua (lua_newstate (&PBD::ReallocPool::lalloc, &_mempool))
+#endif
, _lua_dsp (0)
, _script (other.script ())
, _lua_does_channelmapping (false)
, _lua_has_inline_display (false)
+ , _designated_bypass_port (UINT32_MAX)
, _control_data (0)
, _shadow_data (0)
, _has_midi_input (false)
_stats_avg[0] = _stats_avg[1] = _stats_max[0] = _stats_max[1] = _stats_cnt = 0;
#endif
+ lua.tweak_rt_gc ();
lua.Print.connect (sigc::mem_fun (*this, &LuaProc::lua_print));
// register session object
lua_State* L = lua.getState ();
.beginClass <LuaProc> ("LuaProc")
.addFunction ("queue_draw", &LuaProc::queue_draw)
.addFunction ("shmem", &LuaProc::instance_shm)
+ .addFunction ("table", &LuaProc::instance_ref)
.endClass ()
.endNamespace ();
_param_desc[pn].sr_dependent = lr["ratemult"].isBoolean () && (lr["ratemult"]).cast<bool> ();
_param_desc[pn].enumeration = lr["enum"].isBoolean () && (lr["enum"]).cast<bool> ();
+ if (lr["bypass"].isBoolean () && (lr["bypass"]).cast<bool> ()) {
+ _designated_bypass_port = pn - 1; // lua table starts at 1.
+ }
+
if (lr["unit"].isString ()) {
std::string unit = lr["unit"].cast<std::string> ();
if (unit == "dB") { _param_desc[pn].unit = ParameterDescriptor::DB; }
bool found = false;
bool exact_match = false;
- const int32_t audio_in = in.n_audio ();
- int32_t midi_out = _has_midi_output ? 1 : 0;
+ const int audio_in = in.n_audio ();
+ int midi_out = _has_midi_output ? 1 : 0;
// preferred setting (provided by plugin_insert)
- assert (out.n_audio () > 0 || midi_out > 0);
const int preferred_out = out.n_audio ();
for (luabridge::Iterator i (iotable); !i.isNil (); ++i) {
- assert (i.value ().type () == LUA_TTABLE);
luabridge::LuaRef io (i.value ());
+ if (!io.isTable()) {
+ continue;
+ }
- int possible_in = io["audio_in"];
- int possible_out = io["audio_out"];
+ int possible_in = io["audio_in"].isNumber() ? io["audio_in"] : -1;
+ int possible_out = io["audio_out"].isNumber() ? io["audio_out"] : -1;
// exact match
if ((possible_in == audio_in) && (possible_out == preferred_out)) {
}
/* now allow potentially "imprecise" matches */
- int32_t audio_out = -1;
+ int audio_out = -1;
float penalty = 9999;
#define FOUNDCFG(nch) { \
}
for (luabridge::Iterator i (iotable); !i.isNil (); ++i) {
- assert (i.value ().type () == LUA_TTABLE);
luabridge::LuaRef io (i.value ());
+ if (!io.isTable()) {
+ continue;
+ }
- int possible_in = io["audio_in"];
- int possible_out = io["audio_out"];
+ int possible_in = io["audio_in"].isNumber() ? io["audio_in"] : -1;
+ int possible_out = io["audio_out"].isNumber() ? io["audio_out"] : -1;
if (possible_out == 0) {
if (possible_in == 0) {
}
}
+ if (found && imprecise) {
+ *imprecise = in;
+ }
+
if (!found && imprecise) {
/* try harder */
for (luabridge::Iterator i (iotable); !i.isNil (); ++i) {
- assert (i.value ().type () == LUA_TTABLE);
luabridge::LuaRef io (i.value ());
+ if (!io.isTable()) {
+ continue;
+ }
- int possible_in = io["audio_in"];
- int possible_out = io["audio_out"];
+ int possible_in = io["audio_in"].isNumber() ? io["audio_in"] : -1;
+ int possible_out = io["audio_out"].isNumber() ? io["audio_out"] : -1;
if (possible_out == 0 && possible_in == 0 && _has_midi_output) {
assert (audio_in > 0); // no input is handled above
}
assert (possible_in > 0); // all other cases will have been matched above
- assert (possible_out !=0 || possible_in !=0); // already handled above
imprecise->set (DataType::AUDIO, possible_in);
if (possible_out == -1 || possible_out == -2) {
return false;
}
+ if (imprecise) {
+ imprecise->set (DataType::MIDI, _has_midi_input ? 1 : 0);
+ _selected_in = *imprecise;
+ } else {
+ _selected_in = in;
+ }
+
if (exact_match) {
out.set (DataType::MIDI, midi_out);
out.set (DataType::AUDIO, preferred_out);
out.set (DataType::MIDI, midi_out);
out.set (DataType::AUDIO, audio_out);
}
+ _selected_out = out;
+
return true;
}
in.set (DataType::MIDI, _has_midi_input ? 1 : 0);
out.set (DataType::MIDI, _has_midi_output ? 1 : 0);
+ _info->n_inputs = _selected_in;
+ _info->n_outputs = _selected_out;
+
// configure the DSP if needed
if (in != _configured_in || out != _configured_out) {
lua_State* L = lua.getState ();
luabridge::LuaRef lua_dsp_configure = luabridge::getGlobal (L, "dsp_configure");
if (lua_dsp_configure.type () == LUA_TFUNCTION) {
try {
- lua_dsp_configure (&in, &out);
+ luabridge::LuaRef io = lua_dsp_configure (&in, &out);
+ if (io.isTable ()) {
+ ChanCount lin (_selected_in);
+ ChanCount lout (_selected_out);
+
+ if (io["audio_in"].type() == LUA_TNUMBER) {
+ const int c = io["audio_in"].cast<int> ();
+ if (c >= 0) {
+ lin.set (DataType::AUDIO, c);
+ }
+ }
+ if (io["audio_out"].type() == LUA_TNUMBER) {
+ const int c = io["audio_out"].cast<int> ();
+ if (c >= 0) {
+ lout.set (DataType::AUDIO, c);
+ }
+ }
+ if (io["midi_in"].type() == LUA_TNUMBER) {
+ const int c = io["midi_in"].cast<int> ();
+ if (c >= 0) {
+ lin.set (DataType::MIDI, c);
+ }
+ }
+ if (io["midi_out"].type() == LUA_TNUMBER) {
+ const int c = io["midi_out"].cast<int> ();
+ if (c >= 0) {
+ lout.set (DataType::MIDI, c);
+ }
+ }
+ _info->n_inputs = lin;
+ _info->n_outputs = lout;
+ }
} catch (luabridge::LuaException const& e) {
PBD::error << "LuaException: " << e.what () << "\n";
#ifndef NDEBUG
_configured_in = in;
_configured_out = out;
- _info->n_inputs = _configured_in;
- _info->n_outputs = _configured_out;
return true;
}
#ifdef WITH_LUAPROC_STATS
int64_t t1 = g_get_monotonic_time ();
#endif
- lua.collect_garbage (); // rt-safe, slight *regular* performance overhead
+
+ lua.collect_garbage_step ();
#ifdef WITH_LUAPROC_STATS
++_stats_cnt;
int64_t t2 = g_get_monotonic_time ();
.beginNamespace ("Ardour")
.beginClass <LuaProc> ("LuaProc")
.addFunction ("shmem", &LuaProc::instance_shm)
+ .addFunction ("table", &LuaProc::instance_ref)
.endClass ()
.endNamespace ();
XMLProperty const * value = (*j)->property (X_("value"));
assert (index);
assert (value);
+ LocaleGuard lg;
set_parameter (atoi (index->value().c_str()), atof (value->value().c_str ()));
}
}
- return true;
+ return Plugin::load_preset(r);
}
return false;
}