Fix MIDI port offsets.
[ardour.git] / libs / ardour / plugin.cc
index 6778a3af1988aea38a438f83f89966416a81832f..e0ba0f00f7fabc31a9e2dcd8c7c20fd1b726ac68 100644 (file)
 #include <cstdlib>
 #include <cstdio> // so libraptor doesn't complain
 #include <cmath>
+#ifndef COMPILER_MSVC
 #include <dirent.h>
+#endif
 #include <sys/stat.h>
 #include <cerrno>
 #include <utility>
 
+#ifdef HAVE_LRDF
 #include <lrdf.h>
+#endif
 
 #include "pbd/compose.h"
 #include "pbd/error.h"
 #include "pbd/xml++.h"
 
-#include "ardour/ardour.h"
-#include "ardour/session.h"
-#include "ardour/audioengine.h"
+#include "ardour/buffer_set.h"
+#include "ardour/chan_count.h"
+#include "ardour/chan_mapping.h"
+#include "ardour/data_type.h"
+#include "ardour/luaproc.h"
+#include "ardour/midi_buffer.h"
+#include "ardour/midi_state_tracker.h"
 #include "ardour/plugin.h"
-#include "ardour/ladspa_plugin.h"
 #include "ardour/plugin_manager.h"
+#include "ardour/port.h"
+#include "ardour/session.h"
+#include "ardour/types.h"
 
-#ifdef HAVE_AUDIOUNITS
+#ifdef AUDIOUNIT_SUPPORT
 #include "ardour/audio_unit.h"
 #endif
 
-#ifdef HAVE_SLV2
+#ifdef LV2_SUPPORT
 #include "ardour/lv2_plugin.h"
 #endif
 
 #include "pbd/stl_delete.h"
 
-#include "i18n.h"
+#include "pbd/i18n.h"
 #include <locale.h>
 
 using namespace std;
 using namespace ARDOUR;
 using namespace PBD;
 
+namespace ARDOUR { class AudioEngine; }
+
+#ifdef NO_PLUGIN_STATE
+static bool seen_get_state_message = false;
+static bool seen_set_state_message = false;
+#endif
+
+PBD::Signal2<void, std::string, Plugin*> Plugin::PresetsChanged;
+
+bool
+PluginInfo::needs_midi_input () const
+{
+       return (n_inputs.n_midi() != 0);
+}
+
+bool
+PluginInfo::is_instrument () const
+{
+       return (n_inputs.n_midi() != 0) && (n_outputs.n_audio() > 0) && (n_inputs.n_audio() == 0);
+}
+
 Plugin::Plugin (AudioEngine& e, Session& s)
        : _engine (e)
        , _session (s)
        , _cycles (0)
+       , _owner (0)
+       , _have_presets (false)
+       , _have_pending_stop_events (false)
+       , _parameter_changed_since_last_preset (false)
+       , _immediate_events(6096) // FIXME: size?
 {
+       _pending_stop_events.ensure_buffers (DataType::MIDI, 1, 4096);
 }
 
 Plugin::Plugin (const Plugin& other)
@@ -76,180 +113,105 @@ Plugin::Plugin (const Plugin& other)
        , _session (other._session)
        , _info (other._info)
        , _cycles (0)
-       , presets (other.presets)
+       , _owner (other._owner)
+       , _have_presets (false)
+       , _have_pending_stop_events (false)
+       , _parameter_changed_since_last_preset (false)
+       , _immediate_events(6096) // FIXME: size?
 {
+       _pending_stop_events.ensure_buffers (DataType::MIDI, 1, 4096);
 }
 
 Plugin::~Plugin ()
 {
 }
 
-const Plugin::PresetRecord*
-Plugin::preset_by_label(const string& label)
-{
-       // FIXME: O(n)
-       for (map<string,PresetRecord>::const_iterator i = presets.begin(); i != presets.end(); ++i) {
-               if (i->second.label == label) {
-                       return &i->second;
-               }
-       }
-       return NULL;
-}
-
-const Plugin::PresetRecord*
-Plugin::preset_by_uri(const string& uri)
-{
-       map<string,PresetRecord>::const_iterator pr = presets.find(uri);
-       if (pr != presets.end()) {
-               return &pr->second;
-       } else {
-               return NULL;
-       }
-}
-
-vector<Plugin::PresetRecord>
-Plugin::get_presets()
+void
+Plugin::remove_preset (string name)
 {
-       vector<PresetRecord> result;
-       uint32_t id;
-       std::string unique (unique_id());
-
-       /* XXX problem: AU plugins don't have numeric ID's.
-          Solution: they have a different method of providing presets.
-          XXX sub-problem: implement it.
-       */
-
-       if (!isdigit (unique[0])) {
-               return result;
+       Plugin::PresetRecord const * p = preset_by_label (name);
+       if (!p) {
+               PBD::error << _("Trying to remove nonexistent preset.") << endmsg;
+               return;
        }
-
-       id = atol (unique.c_str());
-
-       lrdf_uris* set_uris = lrdf_get_setting_uris(id);
-
-       if (set_uris) {
-               for (uint32_t i = 0; i < (uint32_t) set_uris->count; ++i) {
-                       if (char* label = lrdf_get_label(set_uris->items[i])) {
-                               PresetRecord rec(set_uris->items[i], label);
-                               result.push_back(rec);
-                               presets.insert(std::make_pair(set_uris->items[i], rec));
-                       }
-               }
-               lrdf_free_uris(set_uris);
+       if (!p->user) {
+               PBD::error << _("Cannot remove plugin factory preset.") << endmsg;
+               return;
        }
 
-       return result;
-}
-
-bool
-Plugin::load_preset(const string preset_uri)
-{
-       lrdf_defaults* defs = lrdf_get_setting_values(preset_uri.c_str());
-
-       if (defs) {
-               for (uint32_t i = 0; i < (uint32_t) defs->count; ++i) {
-                       // The defs->items[i].pid < defs->count check is to work around
-                       // a bug in liblrdf that saves invalid values into the presets file.
-                       if (((uint32_t) defs->items[i].pid < (uint32_t) defs->count) && parameter_is_input (defs->items[i].pid)) {
-                               set_parameter(defs->items[i].pid, defs->items[i].value);
-                       }
-               }
-               lrdf_free_setting_values(defs);
-       }
+       do_remove_preset (name);
+       _presets.erase (p->uri);
 
-       return true;
+       _last_preset.uri = "";
+       _parameter_changed_since_last_preset = false;
+       _have_presets = false;
+       PresetsChanged (unique_id(), this); /* EMIT SIGNAL */
+       PresetRemoved (); /* EMIT SIGNAL */
 }
 
-bool
-Plugin::save_preset (string uri, string domain)
+/** @return PresetRecord with empty URI on failure */
+Plugin::PresetRecord
+Plugin::save_preset (string name)
 {
-       lrdf_portvalue portvalues[parameter_count()];
-       lrdf_defaults defaults;
-       uint32_t id;
-       std::string unique (unique_id());
-
-       /* XXX problem: AU plugins don't have numeric ID's.
-          Solution: they have a different method of providing/saving presets.
-          XXX sub-problem: implement it.
-       */
-
-       if (!isdigit (unique[0])) {
-               return false;
-       }
-
-       id = atol (unique.c_str());
-
-       defaults.count = parameter_count();
-       defaults.items = portvalues;
-
-       for (uint32_t i = 0; i < parameter_count(); ++i) {
-               if (parameter_is_input (i)) {
-                       portvalues[i].pid = i;
-                       portvalues[i].value = get_parameter(i);
-               }
-       }
-
-       char* envvar;
-       if ((envvar = getenv ("HOME")) == 0) {
-               warning << _("Could not locate HOME.  Preset not saved.") << endmsg;
-               return false;
-       }
-
-       string source(string_compose("file:%1/.%2/rdf/ardour-presets.n3", envvar, domain));
-
-       map<string,PresetRecord>::const_iterator pr = presets.find(uri);
-       if (pr == presets.end()) {
-               warning << _("Could not find preset ") << uri << endmsg;
-               return false;
-       }
-       free(lrdf_add_preset(source.c_str(), pr->second.label.c_str(), id,  &defaults));
-
-       string path = string_compose("%1/.%2", envvar, domain);
-       if (g_mkdir_with_parents (path.c_str(), 0775)) {
-               warning << string_compose(_("Could not create %1.  Preset not saved. (%2)"), path, strerror(errno)) << endmsg;
-               return false;
+       if (preset_by_label (name)) {
+               PBD::error << _("Preset with given name already exists.") << endmsg;
+               return Plugin::PresetRecord ();
        }
 
-       path += "/rdf";
-       if (g_mkdir_with_parents (path.c_str(), 0775)) {
-               warning << string_compose(_("Could not create %1.  Preset not saved. (%2)"), path, strerror(errno)) << endmsg;
-               return false;
-       }
+       string const uri = do_save_preset (name);
 
-       if (lrdf_export_by_source(source.c_str(), source.substr(5).c_str())) {
-               warning << string_compose(_("Error saving presets file %1."), source) << endmsg;
-               return false;
+       if (!uri.empty()) {
+               _presets.insert (make_pair (uri, PresetRecord (uri, name)));
+               _have_presets = false;
+               PresetsChanged (unique_id(), this); /* EMIT SIGNAL */
+               PresetAdded (); /* EMIT SIGNAL */
        }
 
-       return true;
+       return PresetRecord (uri, name);
 }
 
 PluginPtr
 ARDOUR::find_plugin(Session& session, string identifier, PluginType type)
 {
-       PluginManager *mgr = PluginManager::the_manager();
+       PluginManager& mgr (PluginManager::instance());
        PluginInfoList plugs;
 
        switch (type) {
+       case ARDOUR::Lua:
+               plugs = mgr.lua_plugin_info();
+               break;
+
        case ARDOUR::LADSPA:
-               plugs = mgr->ladspa_plugin_info();
+               plugs = mgr.ladspa_plugin_info();
                break;
 
-#ifdef HAVE_SLV2
+#ifdef LV2_SUPPORT
        case ARDOUR::LV2:
-               plugs = mgr->lv2_plugin_info();
+               plugs = mgr.lv2_plugin_info();
+               break;
+#endif
+
+#ifdef WINDOWS_VST_SUPPORT
+       case ARDOUR::Windows_VST:
+               plugs = mgr.windows_vst_plugin_info();
+               break;
+#endif
+
+#ifdef LXVST_SUPPORT
+       case ARDOUR::LXVST:
+               plugs = mgr.lxvst_plugin_info();
                break;
 #endif
 
-#ifdef VST_SUPPORT
-       case ARDOUR::VST:
-               plugs = mgr->vst_plugin_info();
+#ifdef MACVST_SUPPORT
+       case ARDOUR::MacVST:
+               plugs = mgr.mac_vst_plugin_info();
                break;
 #endif
 
-#ifdef HAVE_AUDIOUNITS
+#ifdef AUDIOUNIT_SUPPORT
        case ARDOUR::AudioUnit:
-               plugs = mgr->au_plugin_info();
+               plugs = mgr.au_plugin_info();
                break;
 #endif
 
@@ -265,7 +227,20 @@ ARDOUR::find_plugin(Session& session, string identifier, PluginType type)
                }
        }
 
-#ifdef VST_SUPPORT
+#ifdef WINDOWS_VST_SUPPORT
+       /* hmm, we didn't find it. could be because in older versions of Ardour.
+          we used to store the name of a VST plugin, not its unique ID. so try
+          again.
+       */
+
+       for (i = plugs.begin(); i != plugs.end(); ++i) {
+               if (identifier == (*i)->name){
+                       return (*i)->load (session);
+               }
+       }
+#endif
+
+#ifdef LXVST_SUPPORT
        /* hmm, we didn't find it. could be because in older versions of Ardour.
           we used to store the name of a VST plugin, not its unique ID. so try
           again.
@@ -299,4 +274,255 @@ Plugin::input_streams () const
        return ChanCount::ZERO;
 }
 
+Plugin::IOPortDescription
+Plugin::describe_io_port (ARDOUR::DataType dt, bool input, uint32_t id) const
+{
+       std::stringstream ss;
+       switch (dt) {
+               case DataType::AUDIO:
+                       ss << _("Audio") << " ";
+                       break;
+               case DataType::MIDI:
+                       ss << _("Midi") << " ";
+                       break;
+               default:
+                       ss << _("?") << " ";
+                       break;
+       }
+       if (input) {
+               ss << _("In") << " ";
+       } else {
+               ss << _("Out") << " ";
+       }
+
+       ss << (id + 1);
 
+       Plugin::IOPortDescription iod (ss.str());
+       return iod;
+}
+
+PluginOutputConfiguration
+Plugin::possible_output () const
+{
+       PluginOutputConfiguration oc;
+       if (_info) {
+               oc.insert (_info->n_outputs.n_audio ());
+       }
+       return oc;
+}
+
+const Plugin::PresetRecord *
+Plugin::preset_by_label (const string& label)
+{
+#ifndef NO_PLUGIN_STATE
+       if (!_have_presets) {
+               find_presets ();
+               _have_presets = true;
+       }
+#endif
+       // FIXME: O(n)
+       for (map<string, PresetRecord>::const_iterator i = _presets.begin(); i != _presets.end(); ++i) {
+               if (i->second.label == label) {
+                       return &i->second;
+               }
+       }
+
+       return 0;
+}
+
+const Plugin::PresetRecord *
+Plugin::preset_by_uri (const string& uri)
+{
+#ifndef NO_PLUGIN_STATE
+       if (!_have_presets) {
+               find_presets ();
+               _have_presets = true;
+       }
+#endif
+       map<string, PresetRecord>::const_iterator pr = _presets.find (uri);
+       if (pr != _presets.end()) {
+               return &pr->second;
+       } else {
+               return 0;
+       }
+}
+
+bool
+Plugin::write_immediate_event (size_t size, const uint8_t* buf)
+{
+       if (!Evoral::midi_event_is_valid (buf, size)) {
+               return false;
+       }
+       return (_immediate_events.write (0, Evoral::MIDI_EVENT, size, buf) == size);
+}
+
+int
+Plugin::connect_and_run (BufferSet& bufs,
+               samplepos_t /*start*/, samplepos_t /*end*/, double /*speed*/,
+               ChanMapping /*in_map*/, ChanMapping /*out_map*/,
+               pframes_t nframes, samplecnt_t /*offset*/)
+{
+       if (bufs.count().n_midi() > 0) {
+
+               if (_immediate_events.read_space() && nframes > 0) {
+                       _immediate_events.read (bufs.get_midi (0), 0, 1, nframes - 1, true);
+               }
+
+               /* Track notes that we are sending to the plugin */
+               const MidiBuffer& b = bufs.get_midi (0);
+
+               _tracker.track (b.begin(), b.end());
+
+               if (_have_pending_stop_events) {
+                       /* Transmit note-offs that are pending from the last transport stop */
+                       bufs.merge_from (_pending_stop_events, 0);
+                       _have_pending_stop_events = false;
+               }
+       }
+
+       return 0;
+}
+
+void
+Plugin::realtime_handle_transport_stopped ()
+{
+       resolve_midi ();
+}
+
+void
+Plugin::realtime_locate ()
+{
+       resolve_midi ();
+}
+
+void
+Plugin::monitoring_changed ()
+{
+       resolve_midi ();
+}
+
+void
+Plugin::resolve_midi ()
+{
+       /* Create note-offs for any active notes and put them in _pending_stop_events, to be picked
+          up on the next call to connect_and_run ().
+       */
+
+       _pending_stop_events.get_midi(0).clear ();
+       _tracker.resolve_notes (_pending_stop_events.get_midi (0), 0);
+       _have_pending_stop_events = true;
+}
+
+vector<Plugin::PresetRecord>
+Plugin::get_presets ()
+{
+       vector<PresetRecord> p;
+
+#ifndef NO_PLUGIN_STATE
+       if (!_have_presets) {
+               find_presets ();
+               _have_presets = true;
+       }
+
+       for (map<string, PresetRecord>::const_iterator i = _presets.begin(); i != _presets.end(); ++i) {
+               p.push_back (i->second);
+       }
+#else
+       if (!seen_set_state_message) {
+               info << string_compose (_("Plugin presets are not supported in this build of %1. Consider paying for a full version"),
+                                       PROGRAM_NAME)
+                    << endmsg;
+               seen_set_state_message = true;
+       }
+#endif
+
+       return p;
+}
+
+/** Set parameters using a preset */
+bool
+Plugin::load_preset (PresetRecord r)
+{
+       _last_preset = r;
+       _parameter_changed_since_last_preset = false;
+
+       _session.set_dirty ();
+       PresetLoaded (); /* EMIT SIGNAL */
+       return true;
+}
+
+void
+Plugin::clear_preset ()
+{
+       _last_preset.uri = "";
+       _last_preset.label = "";
+       _parameter_changed_since_last_preset = false;
+
+       _session.set_dirty ();
+       PresetLoaded (); /* EMIT SIGNAL */
+}
+
+void
+Plugin::set_parameter (uint32_t /* which */, float /* value */)
+{
+       _parameter_changed_since_last_preset = true;
+       PresetDirty (); /* EMIT SIGNAL */
+}
+
+void
+Plugin::parameter_changed_externally (uint32_t which, float /* value */)
+{
+       _parameter_changed_since_last_preset = true;
+       _session.set_dirty ();
+       ParameterChangedExternally (which, get_parameter (which)); /* EMIT SIGNAL */
+       PresetDirty (); /* EMIT SIGNAL */
+}
+
+int
+Plugin::set_state (const XMLNode& node, int /*version*/)
+{
+       node.get_property (X_("last-preset-uri"), _last_preset.uri);
+       node.get_property (X_("last-preset-label"), _last_preset.label);
+       node.get_property (X_("parameter-changed-since-last-preset"), _parameter_changed_since_last_preset);
+       return 0;
+}
+
+XMLNode &
+Plugin::get_state ()
+{
+       XMLNode* root = new XMLNode (state_node_name ());
+
+       root->set_property (X_("last-preset-uri"), _last_preset.uri);
+       root->set_property (X_("last-preset-label"), _last_preset.label);
+       root->set_property (X_("parameter-changed-since-last-preset"), _parameter_changed_since_last_preset);
+
+#ifndef NO_PLUGIN_STATE
+       add_state (root);
+#else
+       if (!seen_get_state_message) {
+               info << string_compose (_("Saving plugin settings is not supported in this build of %1. Consider paying for the full version"),
+                                       PROGRAM_NAME)
+                    << endmsg;
+               seen_get_state_message = true;
+       }
+#endif
+
+       return *root;
+}
+
+void
+Plugin::set_info (PluginInfoPtr info)
+{
+       _info = info;
+}
+
+std::string
+Plugin::parameter_label (uint32_t which) const
+{
+       if (which >= parameter_count ()) {
+               return "";
+       }
+       ParameterDescriptor pd;
+       get_parameter_descriptor (which, pd);
+       return pd.label;
+}