Fix problem with multiple timespan export. Most probably originated in r13305.
[ardour.git] / libs / ardour / plugin_manager.cc
index 8221f7b46e7988b354d38b81df9abe3cf688f030..6a24a33b60b22376b3041ff8224fc7ae0adafdef 100644 (file)
 #include <cstdlib>
 #include <fstream>
 
-#ifdef VST_SUPPORT
-#include <fst.h>
+#ifdef WINDOWS_VST_SUPPORT
+#include "fst.h"
 #include "pbd/basename.h"
 #include <cstring>
-#endif // VST_SUPPORT
+#endif // WINDOWS_VST_SUPPORT
+
+#ifdef LXVST_SUPPORT
+#include "ardour/linux_vst_support.h"
+#include "pbd/basename.h"
+#include <cstring>
+#endif //LXVST_SUPPORT
 
 #include <glibmm/miscutils.h>
 
 #include "pbd/pathscanner.h"
 #include "pbd/whitespace.h"
 
+#include "ardour/debug.h"
+#include "ardour/filesystem_paths.h"
 #include "ardour/ladspa.h"
-#include "ardour/session.h"
-#include "ardour/plugin_manager.h"
-#include "ardour/plugin.h"
 #include "ardour/ladspa_plugin.h"
-#include "ardour/filesystem_paths.h"
+#include "ardour/plugin.h"
+#include "ardour/plugin_manager.h"
+#include "ardour/rc_configuration.h"
 
 #ifdef LV2_SUPPORT
 #include "ardour/lv2_plugin.h"
 #endif
 
-#ifdef VST_SUPPORT
-#include "ardour/vst_plugin.h"
+#ifdef WINDOWS_VST_SUPPORT
+#include "ardour/windows_vst_plugin.h"
+#endif
+
+#ifdef LXVST_SUPPORT
+#include "ardour/lxvst_plugin.h"
 #endif
 
-#ifdef HAVE_AUDIOUNITS
+#ifdef AUDIOUNIT_SUPPORT
 #include "ardour/audio_unit.h"
 #include <Carbon/Carbon.h>
 #endif
@@ -70,10 +81,20 @@ using namespace ARDOUR;
 using namespace PBD;
 using namespace std;
 
-PluginManager* PluginManager::_manager = 0;
+PluginManager* PluginManager::_instance = 0;
+
+PluginManager&
+PluginManager::instance() 
+{
+       if (!_instance) {
+               _instance = new PluginManager;
+       }
+       return *_instance;
+}
 
 PluginManager::PluginManager ()
-       : _vst_plugin_info(0)
+       : _windows_vst_plugin_info(0)
+       , _lxvst_plugin_info(0)
        , _ladspa_plugin_info(0)
        , _lv2_plugin_info(0)
        , _au_plugin_info(0)
@@ -83,14 +104,6 @@ PluginManager::PluginManager ()
 
        load_statuses ();
 
-#ifdef HAVE_AUDIOUNITS
-       ProcessSerialNumber psn = { 0, kCurrentProcess };
-       OSStatus returnCode = TransformProcessType(& psn, kProcessTransformToForegroundApplication);
-       if( returnCode != 0) {
-               error << _("Cannot become GUI app") << endmsg;
-       }
-#endif
-
        if ((s = getenv ("LADSPA_RDF_PATH"))){
                lrdf_path = s;
        }
@@ -101,24 +114,36 @@ PluginManager::PluginManager ()
 
        add_lrdf_data(lrdf_path);
        add_ladspa_presets();
-#ifdef VST_SUPPORT
-       if (Config->get_use_vst()) {
-               add_vst_presets();
+#ifdef WINDOWS_VST_SUPPORT
+       if (Config->get_use_windows_vst ()) {
+               add_windows_vst_presets ();
+       }
+#endif /* WINDOWS_VST_SUPPORT */
+
+#ifdef LXVST_SUPPORT
+       if (Config->get_use_lxvst()) {
+               add_lxvst_presets();
        }
-#endif /* VST_SUPPORT */
+#endif /* Native LinuxVST support*/
 
        if ((s = getenv ("LADSPA_PATH"))) {
                ladspa_path = s;
        }
 
        if ((s = getenv ("VST_PATH"))) {
-               vst_path = s;
+               windows_vst_path = s;
        } else if ((s = getenv ("VST_PLUGINS"))) {
-               vst_path = s;
+               windows_vst_path = s;
        }
 
-       if (_manager == 0) {
-               _manager = this;
+       if ((s = getenv ("LXVST_PATH"))) {
+               lxvst_path = s;
+       } else if ((s = getenv ("LXVST_PLUGINS"))) {
+               lxvst_path = s;
+       }
+
+       if (_instance == 0) {
+               _instance = this;
        }
 
        /* the plugin manager is constructed too early to use Profile */
@@ -145,16 +170,25 @@ PluginManager::~PluginManager()
 void
 PluginManager::refresh ()
 {
+       DEBUG_TRACE (DEBUG::PluginManager, "PluginManager::refresh\n");
+
        ladspa_refresh ();
 #ifdef LV2_SUPPORT
        lv2_refresh ();
 #endif
-#ifdef VST_SUPPORT
-       if (Config->get_use_vst()) {
-               vst_refresh ();
+#ifdef WINDOWS_VST_SUPPORT
+       if (Config->get_use_windows_vst()) {
+               windows_vst_refresh ();
        }
-#endif // VST_SUPPORT
-#ifdef HAVE_AUDIOUNITS
+#endif // WINDOWS_VST_SUPPORT
+
+#ifdef LXVST_SUPPORT
+       if(Config->get_use_lxvst()) {
+               lxvst_refresh();
+       }
+#endif //Native linuxVST SUPPORT
+
+#ifdef AUDIOUNIT_SUPPORT
        au_refresh ();
 #endif
 
@@ -206,6 +240,8 @@ PluginManager::ladspa_refresh ()
 
        }
 
+       DEBUG_TRACE (DEBUG::PluginManager, string_compose ("LADSPA: search along: [%1]\n", ladspa_path));
+
        ladspa_discover_from_path (ladspa_path);
 }
 
@@ -236,7 +272,7 @@ PluginManager::ladspa_discover_from_path (string /*path*/)
        vector<string *>::iterator x;
        int ret = 0;
 
-       plugin_objects = scanner (ladspa_path, ladspa_filter, 0, true, true);
+       plugin_objects = scanner (ladspa_path, ladspa_filter, 0, false, true);
 
        if (plugin_objects) {
                for (x = plugin_objects->begin(); x != plugin_objects->end (); ++x) {
@@ -264,10 +300,17 @@ PluginManager::add_ladspa_presets()
 }
 
 void
-PluginManager::add_vst_presets()
+PluginManager::add_windows_vst_presets()
+{
+       add_presets ("windows-vst");
+}
+
+void
+PluginManager::add_lxvst_presets()
 {
-       add_presets ("vst");
+       add_presets ("lxvst");
 }
+
 void
 PluginManager::add_presets(string domain)
 {
@@ -282,7 +325,7 @@ PluginManager::add_presets(string domain)
        }
 
        string path = string_compose("%1/.%2/rdf", envvar, domain);
-       presets = scanner (path, rdf_filter, 0, true, true);
+       presets = scanner (path, rdf_filter, 0, false, true);
 
        if (presets) {
                for (x = presets->begin(); x != presets->end (); ++x) {
@@ -303,7 +346,7 @@ PluginManager::add_lrdf_data (const string &path)
        vector<string *>* rdf_files;
        vector<string *>::iterator x;
 
-       rdf_files = scanner (path, rdf_filter, 0, true, true);
+       rdf_files = scanner (path, rdf_filter, 0, false, true);
 
        if (rdf_files) {
                for (x = rdf_files->begin(); x != rdf_files->end (); ++x) {
@@ -409,7 +452,7 @@ PluginManager::get_ladspa_category (uint32_t plugin_id)
 
        snprintf(buf, sizeof(buf), "%s%" PRIu32, LADSPA_BASE, plugin_id);
        pattern.subject = buf;
-       pattern.predicate = (char*)RDF_TYPE;
+       pattern.predicate = const_cast<char*>(RDF_TYPE);
        pattern.object = 0;
        pattern.object_type = lrdf_uri;
 
@@ -420,7 +463,7 @@ PluginManager::get_ladspa_category (uint32_t plugin_id)
        }
 
        pattern.subject = matches1->object;
-       pattern.predicate = (char*)(LADSPA_BASE "hasLabel");
+       pattern.predicate = const_cast<char*>(LADSPA_BASE "hasLabel");
        pattern.object = 0;
        pattern.object_type = lrdf_literal;
 
@@ -467,50 +510,53 @@ PluginManager::get_ladspa_category (uint32_t plugin_id)
 void
 PluginManager::lv2_refresh ()
 {
+       DEBUG_TRACE (DEBUG::PluginManager, "LV2: refresh\n");
        delete _lv2_plugin_info;
        _lv2_plugin_info = LV2PluginInfo::discover();
 }
 #endif
 
-#ifdef HAVE_AUDIOUNITS
+#ifdef AUDIOUNIT_SUPPORT
 void
 PluginManager::au_refresh ()
 {
+       DEBUG_TRACE (DEBUG::PluginManager, "AU: refresh\n");
        delete _au_plugin_info;
        _au_plugin_info = AUPluginInfo::discover();
 }
 
 #endif
 
-#ifdef VST_SUPPORT
+#ifdef WINDOWS_VST_SUPPORT
 
 void
-PluginManager::vst_refresh ()
+PluginManager::windows_vst_refresh ()
 {
-       if (_vst_plugin_info)
-               _vst_plugin_info->clear ();
-       else
-               _vst_plugin_info = new ARDOUR::PluginInfoList();
+       if (_windows_vst_plugin_info) {
+               _windows_vst_plugin_info->clear ();
+       } else {
+               _windows_vst_plugin_info = new ARDOUR::PluginInfoList();
+       }
 
-       if (vst_path.length() == 0) {
-               vst_path = "/usr/local/lib/vst:/usr/lib/vst";
+       if (windows_vst_path.length() == 0) {
+               windows_vst_path = "/usr/local/lib/vst:/usr/lib/vst";
        }
 
-       vst_discover_from_path (vst_path);
+       windows_vst_discover_from_path (windows_vst_path);
 }
 
 int
-PluginManager::add_vst_directory (string path)
+PluginManager::add_windows_vst_directory (string path)
 {
-       if (vst_discover_from_path (path) == 0) {
-               vst_path += ':';
-               vst_path += path;
+       if (windows_vst_discover_from_path (path) == 0) {
+               windows_vst_path += ':';
+               windows_vst_path += path;
                return 0;
        }
        return -1;
 }
 
-static bool vst_filter (const string& str, void *arg)
+static bool windows_vst_filter (const string& str, void *arg)
 {
        /* Not a dotfile, has a prefix before a period, suffix is "dll" */
 
@@ -518,20 +564,20 @@ static bool vst_filter (const string& str, void *arg)
 }
 
 int
-PluginManager::vst_discover_from_path (string path)
+PluginManager::windows_vst_discover_from_path (string path)
 {
        PathScanner scanner;
        vector<string *> *plugin_objects;
        vector<string *>::iterator x;
        int ret = 0;
 
-       info << "detecting VST plugins along " << path << endmsg;
+       DEBUG_TRACE (DEBUG::PluginManager, string_compose ("detecting Windows VST plugins along %1\n", path));
 
-       plugin_objects = scanner (vst_path, vst_filter, 0, true, true);
+       plugin_objects = scanner (windows_vst_path, windows_vst_filter, 0, false, true);
 
        if (plugin_objects) {
                for (x = plugin_objects->begin(); x != plugin_objects->end (); ++x) {
-                       vst_discover (**x);
+                       windows_vst_discover (**x);
                }
        }
 
@@ -540,13 +586,13 @@ PluginManager::vst_discover_from_path (string path)
 }
 
 int
-PluginManager::vst_discover (string path)
+PluginManager::windows_vst_discover (string path)
 {
-       FSTInfo* finfo;
+       VSTInfo* finfo;
        char buf[32];
 
        if ((finfo = fst_get_info (const_cast<char *> (path.c_str()))) == 0) {
-               warning << "Cannot get VST information from " << path << endmsg;
+               warning << "Cannot get Windows VST information from " << path << endmsg;
                return -1;
        }
 
@@ -556,7 +602,7 @@ PluginManager::vst_discover (string path)
                        << endl;
        }
 
-       PluginInfoPtr info(new VSTPluginInfo);
+       PluginInfoPtr info (new WindowsVSTPluginInfo);
 
        /* what a joke freeware VST is */
 
@@ -576,15 +622,135 @@ PluginManager::vst_discover (string path)
        info->n_inputs.set_audio (finfo->numInputs);
        info->n_outputs.set_audio (finfo->numOutputs);
        info->n_inputs.set_midi (finfo->wantMidi ? 1 : 0);
-       info->type = ARDOUR::VST;
+       info->type = ARDOUR::Windows_VST;
 
-       _vst_plugin_info->push_back (info);
+       _windows_vst_plugin_info->push_back (info);
        fst_free_info (finfo);
 
        return 0;
 }
 
-#endif // VST_SUPPORT
+#endif // WINDOWS_VST_SUPPORT
+
+#ifdef LXVST_SUPPORT
+
+void
+PluginManager::lxvst_refresh ()
+{
+       if (_lxvst_plugin_info) {
+               _lxvst_plugin_info->clear ();
+       } else {
+               _lxvst_plugin_info = new ARDOUR::PluginInfoList();
+       }
+
+       if (lxvst_path.length() == 0) {
+               lxvst_path = "/usr/local/lib64/lxvst:/usr/local/lib/lxvst:/usr/lib64/lxvst:/usr/lib/lxvst";
+       }
+
+       lxvst_discover_from_path (lxvst_path);
+}
+
+int
+PluginManager::add_lxvst_directory (string path)
+{
+       if (lxvst_discover_from_path (path) == 0) {
+               lxvst_path += ':';
+               lxvst_path += path;
+               return 0;
+       }
+       return -1;
+}
+
+static bool lxvst_filter (const string& str, void *)
+{
+       /* Not a dotfile, has a prefix before a period, suffix is "so" */
+
+       return str[0] != '.' && (str.length() > 3 && str.find (".so") == (str.length() - 3));
+}
+
+int
+PluginManager::lxvst_discover_from_path (string path)
+{
+       PathScanner scanner;
+       vector<string *> *plugin_objects;
+       vector<string *>::iterator x;
+       int ret = 0;
+
+       DEBUG_TRACE (DEBUG::PluginManager, string_compose ("Discovering linuxVST plugins along %1\n", path));
+
+       plugin_objects = scanner (lxvst_path, lxvst_filter, 0, false, true);
+
+       if (plugin_objects) {
+               for (x = plugin_objects->begin(); x != plugin_objects->end (); ++x) {
+                       lxvst_discover (**x);
+               }
+       }
+
+       vector_delete (plugin_objects);
+       return ret;
+}
+
+int
+PluginManager::lxvst_discover (string path)
+{
+       VSTInfo* finfo;
+       char buf[32];
+
+       if ((finfo = vstfx_get_info (const_cast<char *> (path.c_str()))) == 0) {
+               return -1;
+       }
+
+       if (!finfo->canProcessReplacing) {
+               warning << string_compose (_("linuxVST plugin %1 does not support processReplacing, and so cannot be used in ardour at this time"),
+                                   finfo->name)
+                       << endl;
+       }
+
+       PluginInfoPtr info(new LXVSTPluginInfo);
+
+       if (!strcasecmp ("The Unnamed plugin", finfo->name)) {
+               info->name = PBD::basename_nosuffix (path);
+       } else {
+               info->name = finfo->name;
+       }
+
+       
+       snprintf (buf, sizeof (buf), "%d", finfo->UniqueID);
+       info->unique_id = buf;
+       info->category = "linuxVSTs";
+       info->path = path;
+       info->creator = finfo->creator;
+       info->index = 0;
+       info->n_inputs.set_audio (finfo->numInputs);
+       info->n_outputs.set_audio (finfo->numOutputs);
+       info->n_inputs.set_midi (finfo->wantMidi ? 1 : 0);
+       info->type = ARDOUR::LXVST;
+
+        /* Make sure we don't find the same plugin in more than one place along
+          the LXVST_PATH We can't use a simple 'find' because the path is included
+          in the PluginInfo, and that is the one thing we can be sure MUST be
+          different if a duplicate instance is found.  So we just compare the type
+          and unique ID (which for some VSTs isn't actually unique...)
+       */
+       
+       if (!_lxvst_plugin_info->empty()) {
+               for (PluginInfoList::iterator i =_lxvst_plugin_info->begin(); i != _lxvst_plugin_info->end(); ++i) {
+                       if ((info->type == (*i)->type)&&(info->unique_id == (*i)->unique_id)) {
+                               warning << "Ignoring duplicate Linux VST plugin " << info->name << "\n";
+                               vstfx_free_info(finfo);
+                               return 0;
+                       }
+               }
+       }
+       
+       _lxvst_plugin_info->push_back (info);
+       vstfx_free_info (finfo);
+
+       return 0;
+}
+
+#endif // LXVST_SUPPORT
+
 
 PluginManager::PluginStatusType
 PluginManager::get_status (const PluginInfoPtr& pi)
@@ -602,10 +768,9 @@ void
 PluginManager::save_statuses ()
 {
        ofstream ofs;
-       sys::path path = user_config_directory();
-       path /= "plugin_statuses";
+       std::string path = Glib::build_filename (user_config_directory(), "plugin_statuses");
 
-       ofs.open (path.to_string().c_str(), ios_base::openmode (ios::out|ios::trunc));
+       ofs.open (path.c_str(), ios_base::openmode (ios::out|ios::trunc));
 
        if (!ofs) {
                return;
@@ -622,8 +787,11 @@ PluginManager::save_statuses ()
                case LV2:
                        ofs << "LV2";
                        break;
-               case VST:
-                       ofs << "VST";
+               case Windows_VST:
+                       ofs << "Windows-VST";
+                       break;
+               case LXVST:
+                       ofs << "LXVST";
                        break;
                }
 
@@ -652,9 +820,8 @@ PluginManager::save_statuses ()
 void
 PluginManager::load_statuses ()
 {
-       sys::path path = user_config_directory();
-       path /= "plugin_statuses";
-       ifstream ifs (path.to_string().c_str());
+       std::string path = Glib::build_filename (user_config_directory(), "plugin_statuses");
+       ifstream ifs (path.c_str());
 
        if (!ifs) {
                return;
@@ -707,8 +874,10 @@ PluginManager::load_statuses ()
                        type = AudioUnit;
                } else if (stype == "LV2") {
                        type = LV2;
-               } else if (stype == "VST") {
-                       type = VST;
+               } else if (stype == "Windows-VST") {
+                       type = Windows_VST;
+               } else if (stype == "LXVST") {
+                       type = LXVST;
                } else {
                        error << string_compose (_("unknown plugin type \"%1\" - ignored"), stype)
                              << endmsg;
@@ -733,17 +902,29 @@ PluginManager::set_status (PluginType t, string id, PluginStatusType status)
                return;
        }
 
-       pair<PluginStatusList::iterator, bool> res = statuses.insert (ps);
-       //cerr << "Added " << t << " " << id << " " << status << " success ? " << res.second << endl;
+       statuses.insert (ps);
+}
+
+ARDOUR::PluginInfoList&
+PluginManager::windows_vst_plugin_info ()
+{
+#ifdef WINDOWS_VST_SUPPORT
+       if (!_windows_vst_plugin_info) {
+               windows_vst_refresh ();
+       }
+       return *_windows_vst_plugin_info;
+#else
+       return _empty_plugin_info;
+#endif
 }
 
 ARDOUR::PluginInfoList&
-PluginManager::vst_plugin_info ()
+PluginManager::lxvst_plugin_info ()
 {
-#ifdef VST_SUPPORT
-       if (!_vst_plugin_info)
-               vst_refresh();
-       return *_vst_plugin_info;
+#ifdef LXVST_SUPPORT
+       if (!_lxvst_plugin_info)
+               lxvst_refresh();
+       return *_lxvst_plugin_info;
 #else
        return _empty_plugin_info;
 #endif
@@ -772,7 +953,7 @@ PluginManager::lv2_plugin_info ()
 ARDOUR::PluginInfoList&
 PluginManager::au_plugin_info ()
 {
-#ifdef HAVE_AUDIOUNITS
+#ifdef AUDIOUNIT_SUPPORT
        if (!_au_plugin_info)
                au_refresh();
        return *_au_plugin_info;