merge and resolve conflict with master
[ardour.git] / libs / ardour / plugin_manager.cc
index 88dc4c13a7d9db82e27365fe7299ec1d03e2d7cb..8d209cc78e29c936519a1b874036e13249ec7600 100644 (file)
 
 #include <sys/types.h>
 #include <cstdio>
-#include <lrdf.h>
-#include <dlfcn.h>
 #include <cstdlib>
 #include <fstream>
 
-#ifdef VST_SUPPORT
-#include <fst.h>
+#ifdef HAVE_LRDF
+#include <lrdf.h>
+#endif
+
+#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/vstfx.h>
-#include <pbd/basename.h>
+#include "ardour/linux_vst_support.h"
+#include "pbd/basename.h"
 #include <cstring>
 #endif //LXVST_SUPPORT
 
 #include <glibmm/miscutils.h>
+#include <glibmm/pattern.h>
 
 #include "pbd/pathscanner.h"
 #include "pbd/whitespace.h"
+#include "pbd/file_utils.h"
 
 #include "ardour/debug.h"
 #include "ardour/filesystem_paths.h"
 #include "ardour/ladspa_plugin.h"
 #include "ardour/plugin.h"
 #include "ardour/plugin_manager.h"
-#include "ardour/session.h"
+#include "ardour/rc_configuration.h"
+
+#include "ardour/ladspa_search_path.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 "i18n.h"
 
+#include "ardour/debug.h"
+
 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)
@@ -105,11 +122,11 @@ 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 /* VST_SUPPORT */
+#endif /* WINDOWS_VST_SUPPORT */
 
 #ifdef LXVST_SUPPORT
        if (Config->get_use_lxvst()) {
@@ -117,14 +134,10 @@ PluginManager::PluginManager ()
        }
 #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 ((s = getenv ("LXVST_PATH"))) {
@@ -133,8 +146,8 @@ PluginManager::PluginManager ()
                lxvst_path = s;
        }
 
-       if (_manager == 0) {
-               _manager = this;
+       if (_instance == 0) {
+               _instance = this;
        }
 
        /* the plugin manager is constructed too early to use Profile */
@@ -167,11 +180,11 @@ PluginManager::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
+#endif // WINDOWS_VST_SUPPORT
 
 #ifdef LXVST_SUPPORT
        if(Config->get_use_lxvst()) {
@@ -189,90 +202,38 @@ PluginManager::refresh ()
 void
 PluginManager::ladspa_refresh ()
 {
-       if (_ladspa_plugin_info)
+       if (_ladspa_plugin_info) {
                _ladspa_plugin_info->clear ();
-       else
+       } else {
                _ladspa_plugin_info = new ARDOUR::PluginInfoList ();
-
-       static const char *standard_paths[] = {
-               "/usr/local/lib64/ladspa",
-               "/usr/local/lib/ladspa",
-               "/usr/lib64/ladspa",
-               "/usr/lib/ladspa",
-               "/Library/Audio/Plug-Ins/LADSPA",
-               ""
-       };
+       }
 
        /* allow LADSPA_PATH to augment, not override standard locations */
 
        /* Only add standard locations to ladspa_path if it doesn't
         * already contain them. Check for trailing G_DIR_SEPARATOR too.
         */
+       
+       vector<string> ladspa_modules;
 
-       int i;
-       for (i = 0; standard_paths[i][0]; i++) {
-               size_t found = ladspa_path.find(standard_paths[i]);
-               if (found != ladspa_path.npos) {
-                       switch (ladspa_path[found + strlen(standard_paths[i])]) {
-                               case ':' :
-                               case '\0':
-                                       continue;
-                               case G_DIR_SEPARATOR :
-                                       if (ladspa_path[found + strlen(standard_paths[i]) + 1] == ':' ||
-                                           ladspa_path[found + strlen(standard_paths[i]) + 1] == '\0') {
-                                               continue;
-                                       }
-                       }
-               }
-               if (!ladspa_path.empty())
-                       ladspa_path += ":";
-
-               ladspa_path += standard_paths[i];
-
-       }
-
-       DEBUG_TRACE (DEBUG::PluginManager, string_compose ("LADSPA: search along: [%1]\n", ladspa_path));
-
-       ladspa_discover_from_path (ladspa_path);
-}
-
-
-int
-PluginManager::add_ladspa_directory (string path)
-{
-       if (ladspa_discover_from_path (path) == 0) {
-               ladspa_path += ':';
-               ladspa_path += path;
-               return 0;
-       }
-       return -1;
-}
-
-static bool ladspa_filter (const string& str, void */*arg*/)
-{
-       /* Not a dotfile, has a prefix before a period, suffix is "so" */
+       DEBUG_TRACE (DEBUG::PluginManager, string_compose ("LADSPA: search along: [%1]\n", ladspa_search_path().to_string()));
 
-       return str[0] != '.' && (str.length() > 3 && str.find (".so") == (str.length() - 3));
-}
+       Glib::PatternSpec so_extension_pattern("*.so");
+       Glib::PatternSpec dylib_extension_pattern("*.dylib");
+       Glib::PatternSpec dll_extension_pattern("*.dll");
 
-int
-PluginManager::ladspa_discover_from_path (string /*path*/)
-{
-       PathScanner scanner;
-       vector<string *> *plugin_objects;
-       vector<string *>::iterator x;
-       int ret = 0;
+       find_matching_files_in_search_path (ladspa_search_path (),
+                                           so_extension_pattern, ladspa_modules);
 
-       plugin_objects = scanner (ladspa_path, ladspa_filter, 0, true, true);
+       find_matching_files_in_search_path (ladspa_search_path (),
+                                           dylib_extension_pattern, ladspa_modules);
+       find_matching_files_in_search_path (ladspa_search_path (),
+                                           dll_extension_pattern, ladspa_modules);
 
-       if (plugin_objects) {
-               for (x = plugin_objects->begin(); x != plugin_objects->end (); ++x) {
-                       ladspa_discover (**x);
-               }
+       for (vector<std::string>::iterator i = ladspa_modules.begin(); i != ladspa_modules.end(); ++i) {
+               ladspa_discover (*i);
        }
-
-       vector_delete (plugin_objects);
-       return ret;
 }
 
 static bool rdf_filter (const string &str, void* /*arg*/)
@@ -291,9 +252,9 @@ PluginManager::add_ladspa_presets()
 }
 
 void
-PluginManager::add_vst_presets()
+PluginManager::add_windows_vst_presets()
 {
-       add_presets ("vst");
+       add_presets ("windows-vst");
 }
 
 void
@@ -305,7 +266,7 @@ PluginManager::add_lxvst_presets()
 void
 PluginManager::add_presets(string domain)
 {
-
+#ifdef HAVE_LRDF
        PathScanner scanner;
        vector<string *> *presets;
        vector<string *>::iterator x;
@@ -316,7 +277,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) {
@@ -325,19 +286,21 @@ PluginManager::add_presets(string domain)
                                warning << string_compose(_("Could not parse rdf file: %1"), *x) << endmsg;
                        }
                }
+               
+               vector_delete (presets);
        }
-
-       vector_delete (presets);
+#endif
 }
 
 void
 PluginManager::add_lrdf_data (const string &path)
 {
+#ifdef HAVE_LRDF
        PathScanner scanner;
        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) {
@@ -347,33 +310,39 @@ PluginManager::add_lrdf_data (const string &path)
                                warning << "Could not parse rdf file: " << uri << endmsg;
                        }
                }
-       }
 
-       vector_delete (rdf_files);
+               vector_delete (rdf_files);
+       }
+#endif
 }
 
 int
 PluginManager::ladspa_discover (string path)
 {
-       void *module;
+       DEBUG_TRACE (DEBUG::PluginManager, string_compose ("Checking for LADSPA plugin at %1\n", path));
+
+       Glib::Module module(path);
        const LADSPA_Descriptor *descriptor;
        LADSPA_Descriptor_Function dfunc;
-       const char *errstr;
+       void* func = 0;
 
-       if ((module = dlopen (path.c_str(), RTLD_NOW)) == 0) {
-               error << string_compose(_("LADSPA: cannot load module \"%1\" (%2)"), path, dlerror()) << endmsg;
+       if (!module) {
+               error << string_compose(_("LADSPA: cannot load module \"%1\" (%2)"),
+                       path, Glib::Module::get_last_error()) << endmsg;
                return -1;
        }
 
-       dfunc = (LADSPA_Descriptor_Function) dlsym (module, "ladspa_descriptor");
 
-       if ((errstr = dlerror()) != 0) {
+       if (!module.get_symbol("ladspa_descriptor", func)) {
                error << string_compose(_("LADSPA: module \"%1\" has no descriptor function."), path) << endmsg;
-               error << errstr << endmsg;
-               dlclose (module);
+               error << Glib::Module::get_last_error() << endmsg;
                return -1;
        }
 
+       dfunc = (LADSPA_Descriptor_Function)func;
+
+       DEBUG_TRACE (DEBUG::PluginManager, string_compose ("LADSPA plugin found at %1\n", path));
+
        for (uint32_t i = 0; ; ++i) {
                if ((descriptor = dfunc (i)) == 0) {
                        break;
@@ -427,6 +396,8 @@ PluginManager::ladspa_discover (string path)
                if(!found){
                    _ladspa_plugin_info->push_back (info);
                }
+
+               DEBUG_TRACE (DEBUG::PluginManager, string_compose ("Found LADSPA plugin, name: %1, Inputs: %2, Outputs: %3\n", info->name, info->n_inputs, info->n_outputs));
        }
 
 // GDB WILL NOT LIKE YOU IF YOU DO THIS
@@ -438,12 +409,13 @@ PluginManager::ladspa_discover (string path)
 string
 PluginManager::get_ladspa_category (uint32_t plugin_id)
 {
+#ifdef HAVE_LRDF
        char buf[256];
        lrdf_statement pattern;
 
        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;
 
@@ -454,7 +426,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;
 
@@ -495,12 +467,16 @@ PluginManager::get_ladspa_category (uint32_t plugin_id)
        } else {
                return label;
        }
+#else
+               return ("Unknown");
+#endif
 }
 
 #ifdef LV2_SUPPORT
 void
 PluginManager::lv2_refresh ()
 {
+       DEBUG_TRACE (DEBUG::PluginManager, "LV2: refresh\n");
        delete _lv2_plugin_info;
        _lv2_plugin_info = LV2PluginInfo::discover();
 }
@@ -517,35 +493,36 @@ PluginManager::au_refresh ()
 
 #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" */
 
@@ -553,45 +530,46 @@ 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);
                }
+
+               vector_delete (plugin_objects);
        }
 
-       vector_delete (plugin_objects);
        return ret;
 }
 
 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;
        }
 
        if (!finfo->canProcessReplacing) {
-               warning << string_compose (_("VST plugin %1 does not support processReplacing, and so cannot be used in ardour at this time"),
-                                   finfo->name)
+               warning << string_compose (_("VST plugin %1 does not support processReplacing, and so cannot be used in %2 at this time"),
+                                          finfo->name, PROGRAM_NAME)
                        << endl;
        }
 
-       PluginInfoPtr info(new VSTPluginInfo);
+       PluginInfoPtr info (new WindowsVSTPluginInfo);
 
        /* what a joke freeware VST is */
 
@@ -611,15 +589,15 @@ 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
 
@@ -665,36 +643,36 @@ PluginManager::lxvst_discover_from_path (string path)
        vector<string *>::iterator x;
        int ret = 0;
 
-       info << "Discovering linuxVST plugins along " << path << endmsg;
+       DEBUG_TRACE (DEBUG::PluginManager, string_compose ("Discovering linuxVST plugins along %1\n", path));
 
-       plugin_objects = scanner (lxvst_path, lxvst_filter, 0, true, true);
+       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);
                }
-       }
 
-       info << "Done linuxVST discover" << endmsg;
+               vector_delete (plugin_objects);
+       }
 
-       vector_delete (plugin_objects);
        return ret;
 }
 
 int
 PluginManager::lxvst_discover (string path)
 {
-       VSTFXInfo* finfo;
+       VSTInfo* finfo;
        char buf[32];
 
+       DEBUG_TRACE (DEBUG::PluginManager, string_compose ("checking apparent LXVST plugin at %1\n", path));
+
        if ((finfo = vstfx_get_info (const_cast<char *> (path.c_str()))) == 0) {
-               warning << "Cannot get linuxVST information from " << path << endmsg;
                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)
+               warning << string_compose (_("linuxVST plugin %1 does not support processReplacing, and so cannot be used in %2 at this time"),
+                                          finfo->name, PROGRAM_NAME)
                        << endl;
        }
 
@@ -728,6 +706,7 @@ PluginManager::lxvst_discover (string path)
        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;
                        }
@@ -759,10 +738,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;
@@ -779,8 +757,8 @@ PluginManager::save_statuses ()
                case LV2:
                        ofs << "LV2";
                        break;
-               case VST:
-                       ofs << "VST";
+               case Windows_VST:
+                       ofs << "Windows-VST";
                        break;
                case LXVST:
                        ofs << "LXVST";
@@ -812,9 +790,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;
@@ -867,8 +844,8 @@ 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 {
@@ -899,12 +876,13 @@ PluginManager::set_status (PluginType t, string id, PluginStatusType status)
 }
 
 ARDOUR::PluginInfoList&
-PluginManager::vst_plugin_info ()
+PluginManager::windows_vst_plugin_info ()
 {
-#ifdef VST_SUPPORT
-       if (!_vst_plugin_info)
-               vst_refresh();
-       return *_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