* first primitive implementation of MidiPatchManager
[ardour.git] / libs / ardour / plugin_manager.cc
index e214e56ebc8068ff4e22645d6286c52281b2671b..d4e995f0bf0651e41593214d01c3be7531247973 100644 (file)
@@ -1,5 +1,5 @@
 /*
-    Copyright (C) 2000-2004 Paul Davis 
+    Copyright (C) 2000-2006 Paul Davis 
 
     This program is free software; you can redistribute it and/or modify
     it under the terms of the GNU General Public License as published by
     along with this program; if not, write to the Free Software
     Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
 
-    $Id$
 */
 
+#define __STDC_FORMAT_MACROS 1
+#include <stdint.h>
+
 #include <sys/types.h>
 #include <cstdio>
 #include <lrdf.h>
 #include <dlfcn.h>
+#include <cstdlib>
+#include <fstream>
 
 #ifdef VST_SUPPORT
 #include <fst.h>
 #include <pbd/basename.h>
-#include <string.h>
-#endif
+#include <cstring>
+#endif // VST_SUPPORT
+
+#include <glibmm/miscutils.h>
 
 #include <pbd/pathscanner.h>
 
 #include <ardour/plugin_manager.h>
 #include <ardour/plugin.h>
 #include <ardour/ladspa_plugin.h>
+#include <ardour/filesystem_paths.h>
+
+#ifdef HAVE_SLV2
+#include <slv2/slv2.h>
+#include <ardour/lv2_plugin.h>
+#endif
+
+#ifdef VST_SUPPORT
 #include <ardour/vst_plugin.h>
+#endif
+
+#ifdef HAVE_AUDIOUNITS
+#include <ardour/audio_unit.h>
+#include <Carbon/Carbon.h>
+#endif
 
 #include <pbd/error.h>
 #include <pbd/stl_delete.h>
 #include "i18n.h"
 
 using namespace ARDOUR;
+using namespace PBD;
+using namespace std;
 
 PluginManager* PluginManager::_manager = 0;
 
-PluginManager::PluginManager (AudioEngine& e)
-       : _engine (e)
+PluginManager::PluginManager ()
 {
        char* s;
        string lrdf_path;
 
+       load_favorites ();
+
+#ifdef GTKOSX
+       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;
        }
@@ -79,40 +110,59 @@ PluginManager::PluginManager (AudioEngine& e)
                vst_path = s;
        }
 
-       refresh ();
-
        if (_manager == 0) {
                _manager = this;
        }
+
+       /* the plugin manager is constructed too early to use Profile */
+
+       if (getenv ("ARDOUR_SAE")) {
+               ladspa_plugin_whitelist.push_back (1203); // single band parametric
+               ladspa_plugin_whitelist.push_back (1772); // caps compressor
+               ladspa_plugin_whitelist.push_back (1913); // fast lookahead limiter
+               ladspa_plugin_whitelist.push_back (1075); // simple RMS expander
+               ladspa_plugin_whitelist.push_back (1061); // feedback delay line (max 5s)
+               ladspa_plugin_whitelist.push_back (1216); // gverb
+               ladspa_plugin_whitelist.push_back (2150); // tap pitch shifter
+       } 
+
+#ifdef HAVE_SLV2
+       _lv2_world = new LV2World();
+#endif
+
+       refresh ();
 }
 
 void
 PluginManager::refresh ()
 {
        ladspa_refresh ();
+#ifdef HAVE_SLV2
+       lv2_refresh ();
+#endif
 #ifdef VST_SUPPORT
        if (Config->get_use_vst()) {
                vst_refresh ();
        }
+#endif // VST_SUPPORT
+#ifdef HAVE_AUDIOUNITS
+       au_refresh ();
 #endif
 }
 
 void
 PluginManager::ladspa_refresh ()
 {
-       for (std::list<PluginInfo*>::iterator i = _ladspa_plugin_info.begin(); i != _ladspa_plugin_info.end(); ++i) {
-               delete *i;
-       }
-
        _ladspa_plugin_info.clear ();
 
        if (ladspa_path.length() == 0) {
-               ladspa_path = "/usr/local/lib/ladspa:/usr/lib/ladspa";
+               ladspa_path = "/usr/local/lib64/ladspa:/usr/local/lib/ladspa:/usr/lib64/ladspa:/usr/lib/ladspa:/Library/Audio/Plug-Ins/LADSPA";
        }
 
        ladspa_discover_from_path (ladspa_path);
 }
 
+
 int
 PluginManager::add_ladspa_directory (string path)
 {
@@ -183,14 +233,14 @@ PluginManager::add_presets(string domain)
                return;
        }
 
-       string path = compose("%1/.%2/rdf", envvar, domain);
+       string path = string_compose("%1/.%2/rdf", envvar, domain);
        presets = scanner (path, rdf_filter, 0, true, true);
 
        if (presets) {
                for (x = presets->begin(); x != presets->end (); ++x) {
                        string file = "file:" + **x;
                        if (lrdf_read_file(file.c_str())) {
-                               warning << compose(_("Could not parse rdf file: %1"), *x) << endmsg;
+                               warning << string_compose(_("Could not parse rdf file: %1"), *x) << endmsg;
                        }
                }
        }
@@ -198,7 +248,6 @@ PluginManager::add_presets(string domain)
        vector_delete (presets);
 }
 
-
 void
 PluginManager::add_lrdf_data (const string &path)
 {
@@ -225,21 +274,20 @@ PluginManager::add_lrdf_data (const string &path)
 int 
 PluginManager::ladspa_discover (string path)
 {
-       PluginInfo *info;
        void *module;
        const LADSPA_Descriptor *descriptor;
        LADSPA_Descriptor_Function dfunc;
        const char *errstr;
 
        if ((module = dlopen (path.c_str(), RTLD_NOW)) == 0) {
-               error << compose(_("LADSPA: cannot load module \"%1\" (%2)"), path, dlerror()) << endmsg;
+               error << string_compose(_("LADSPA: cannot load module \"%1\" (%2)"), path, dlerror()) << endmsg;
                return -1;
        }
 
        dfunc = (LADSPA_Descriptor_Function) dlsym (module, "ladspa_descriptor");
 
        if ((errstr = dlerror()) != 0) {
-               error << compose(_("LADSPA: module \"%1\" has no descriptor function."), path) << endmsg;
+               error << string_compose(_("LADSPA: module \"%1\" has no descriptor function."), path) << endmsg;
                error << errstr << endmsg;
                dlclose (module);
                return -1;
@@ -250,22 +298,33 @@ PluginManager::ladspa_discover (string path)
                        break;
                }
 
-               info = new PluginInfo;
+               if (!ladspa_plugin_whitelist.empty()) {
+                       if (find (ladspa_plugin_whitelist.begin(), ladspa_plugin_whitelist.end(), descriptor->UniqueID) == ladspa_plugin_whitelist.end()) {
+                               continue;
+                       }
+               } 
+
+               PluginInfoPtr info(new LadspaPluginInfo);
                info->name = descriptor->Name;
                info->category = get_ladspa_category(descriptor->UniqueID);
+               info->creator = descriptor->Maker;
                info->path = path;
                info->index = i;
-               info->n_inputs = 0;
-               info->n_outputs = 0;
-               info->type = PluginInfo::LADSPA;
+               info->n_inputs = ChanCount();
+               info->n_outputs = ChanCount();
+               info->type = ARDOUR::LADSPA;
+               
+               char buf[32];
+               snprintf (buf, sizeof (buf), "%lu", descriptor->UniqueID);
+               info->unique_id = buf;
                
                for (uint32_t n=0; n < descriptor->PortCount; ++n) {
                        if ( LADSPA_IS_PORT_AUDIO (descriptor->PortDescriptors[n]) ) {
                                if ( LADSPA_IS_PORT_INPUT (descriptor->PortDescriptors[n]) ) {
-                                       info->n_inputs++;
+                                       info->n_inputs.set_audio(info->n_inputs.n_audio() + 1);
                                }
                                else if ( LADSPA_IS_PORT_OUTPUT (descriptor->PortDescriptors[n]) ) {
-                                       info->n_outputs++;
+                                       info->n_outputs.set_audio(info->n_outputs.n_audio() + 1);
                                }
                        }
                }
@@ -279,77 +338,6 @@ PluginManager::ladspa_discover (string path)
        return 0;
 }
 
-Plugin *
-PluginManager::load (Session& session, PluginInfo *info)
-{
-       void *module;
-       Plugin *plugin = 0;
-
-       try {
-               if (info->type == PluginInfo::VST) {
-
-#ifdef VST_SUPPORT                     
-                       if (Config->get_use_vst()) {
-                               FSTHandle* handle;
-                               
-                               if ((handle = fst_load (info->path.c_str())) == 0) {
-                                       error << compose(_("VST: cannot load module from \"%1\""), info->path) << endmsg;
-                               } else {
-                                       plugin = new VSTPlugin (_engine, session, handle);
-                               }
-                       } else {
-                               error << _("You asked ardour to not use any VST plugins") << endmsg;
-                       }
-#else
-                       error << _("This version of ardour has no support for VST plugins") << endmsg;
-                       return 0;
-#endif                 
-                               
-               } else {
-
-                       if ((module = dlopen (info->path.c_str(), RTLD_NOW)) == 0) {
-                               error << compose(_("LADSPA: cannot load module from \"%1\""), info->path) << endmsg;
-                               error << dlerror() << endmsg;
-                       } else {
-                               plugin = new LadspaPlugin (module, _engine, session, info->index, session.frame_rate());
-                       }
-               }
-
-               plugin->set_info(*info);
-       }
-
-       catch (failed_constructor &err) {
-               plugin = 0;
-       }
-       
-       return plugin;
-}
-
-Plugin *
-ARDOUR::find_plugin(Session& session, string name, PluginInfo::Type type)
-{
-       PluginManager *mgr = PluginManager::the_manager();
-       list<PluginInfo *>::iterator i;
-       list<PluginInfo *>* plugs = 0;
-
-       switch (type) {
-       case PluginInfo::LADSPA:
-               plugs = &mgr->ladspa_plugin_info();
-               break;
-       case PluginInfo::VST:
-               plugs = &mgr->vst_plugin_info();
-               break;
-       }
-
-       for (i = plugs->begin(); i != plugs->end(); ++i) {
-               if ((*i)->name == name) {       
-                       return mgr->load (session, *i);
-               }
-       }
-       
-       return 0;
-}
-
 string
 PluginManager::get_ladspa_category (uint32_t plugin_id)
 {
@@ -358,18 +346,18 @@ PluginManager::get_ladspa_category (uint32_t plugin_id)
 
        snprintf(buf, sizeof(buf), "%s%" PRIu32, LADSPA_BASE, plugin_id);
        pattern.subject = buf;
-       pattern.predicate = RDF_TYPE;
+       pattern.predicate = (char*)RDF_TYPE;
        pattern.object = 0;
        pattern.object_type = lrdf_uri;
 
        lrdf_statement* matches1 = lrdf_matches (&pattern);
 
        if (!matches1) {
-               return _("Unknown");
+               return "";
        }
 
        pattern.subject = matches1->object;
-       pattern.predicate = LADSPA_BASE "hasLabel";
+       pattern.predicate = (char*)(LADSPA_BASE "hasLabel");
        pattern.object = 0;
        pattern.object_type = lrdf_literal;
 
@@ -377,7 +365,7 @@ PluginManager::get_ladspa_category (uint32_t plugin_id)
        lrdf_free_statements(matches1);
 
        if (!matches2) {
-               return _("Unknown");
+               return ("");
        }
 
        string label = matches2->object;
@@ -386,15 +374,42 @@ PluginManager::get_ladspa_category (uint32_t plugin_id)
        return label;
 }
 
+#ifdef HAVE_SLV2
+void
+PluginManager::lv2_refresh ()
+{
+       lv2_discover();
+}
+
+int
+PluginManager::lv2_discover ()
+{
+       _lv2_plugin_info = LV2PluginInfo::discover(_lv2_world);
+       return 0;
+}
+#endif
+
+#ifdef HAVE_AUDIOUNITS
+void
+PluginManager::au_refresh ()
+{
+       au_discover();
+}
+
+int
+PluginManager::au_discover ()
+{
+       _au_plugin_info = AUPluginInfo::discover();
+       return 0;
+}
+
+#endif
+
 #ifdef VST_SUPPORT
 
 void
 PluginManager::vst_refresh ()
 {
-       for (std::list<PluginInfo*>::iterator i = _vst_plugin_info.begin(); i != _vst_plugin_info.end(); ++i) {
-               delete *i;
-       }
-
        _vst_plugin_info.clear ();
 
        if (vst_path.length() == 0) {
@@ -418,7 +433,7 @@ PluginManager::add_vst_directory (string path)
 static bool vst_filter (const string& str, void *arg)
 {
        /* Not a dotfile, has a prefix before a period, suffix is "dll" */
-       
+
        return str[0] != '.' && (str.length() > 4 && str.find (".dll") == (str.length() - 4));
 }
 
@@ -448,21 +463,22 @@ int
 PluginManager::vst_discover (string path)
 {
        FSTInfo* finfo;
-       PluginInfo* info;
+       char buf[32];
 
        if ((finfo = fst_get_info (const_cast<char *> (path.c_str()))) == 0) {
+               warning << "Cannot get VST information from " << path << endmsg;
                return -1;
        }
 
        if (!finfo->canProcessReplacing) {
-               warning << compose (_("VST plugin %1 does not support processReplacing, and so cannot be used in ardour at this time"),
+               warning << string_compose (_("VST plugin %1 does not support processReplacing, and so cannot be used in ardour at this time"),
                                    finfo->name)
                        << endl;
        }
        
-       info = new PluginInfo;
+       PluginInfoPtr info(new VSTPluginInfo);
 
-       /* what a goddam joke freeware VST is */
+       /* what a joke freeware VST is */
 
        if (!strcasecmp ("The Unnamed plugin", finfo->name)) {
                info->name = PBD::basename_nosuffix (path);
@@ -470,12 +486,16 @@ PluginManager::vst_discover (string path)
                info->name = finfo->name;
        }
 
+       
+       snprintf (buf, sizeof (buf), "%d", finfo->UniqueID);
+       info->unique_id = buf;
        info->category = "VST";
        info->path = path;
+       // need to set info->creator but FST doesn't provide it
        info->index = 0;
        info->n_inputs = finfo->numInputs;
        info->n_outputs = finfo->numOutputs;
-       info->type = PluginInfo::VST;
+       info->type = ARDOUR::VST;
        
        _vst_plugin_info.push_back (info);
        fst_free_info (finfo);
@@ -483,4 +503,108 @@ PluginManager::vst_discover (string path)
        return 0;
 }
 
-#endif
+#endif // VST_SUPPORT
+
+bool
+PluginManager::is_a_favorite_plugin (const PluginInfoPtr& pi)
+{
+       FavoritePlugin fp (pi->type, pi->unique_id);
+       return find (favorites.begin(), favorites.end(), fp) !=  favorites.end();
+}
+
+void
+PluginManager::save_favorites ()
+{
+       ofstream ofs;
+       sys::path path = user_config_directory();
+       path /= "favorite_plugins";
+
+       ofs.open (path.to_string().c_str(), ios_base::openmode (ios::out|ios::trunc));
+
+       if (!ofs) {
+               return;
+       }
+
+       for (FavoritePluginList::iterator i = favorites.begin(); i != favorites.end(); ++i) {
+               switch ((*i).type) {
+               case LADSPA:
+                       ofs << "LADSPA";
+                       break;
+               case AudioUnit:
+                       ofs << "AudioUnit";
+                       break;
+               case LV2:
+                       ofs << "LV2";
+                       break;
+               case VST:
+                       ofs << "VST";
+                       break;
+               }
+               
+               ofs << ' ' << (*i).unique_id << endl;
+       }
+
+       ofs.close ();
+}
+
+void
+PluginManager::load_favorites ()
+{
+       sys::path path = user_config_directory();
+       path /= "favorite_plugins";
+       ifstream ifs (path.to_string().c_str());
+
+       if (!ifs) {
+               return;
+       }
+       
+       std::string stype;
+       std::string id;
+       PluginType type;
+
+       while (ifs) {
+
+               ifs >> stype;
+               if (!ifs) {
+                       break;
+
+               }
+               ifs >> id;
+               if (!ifs) {
+                       break;
+               }
+
+               if (stype == "LADSPA") {
+                       type = LADSPA;
+               } else if (stype == "AudioUnit") {
+                       type = AudioUnit;
+               } else if (stype == "LV2") {
+                       type = LV2;
+               } else if (stype == "VST") {
+                       type = VST;
+               } else {
+                       error << string_compose (_("unknown favorite plugin type \"%1\" - ignored"), stype)
+                             << endmsg;
+                       continue;
+               }
+               
+               add_favorite (type, id);
+       }
+       
+       ifs.close ();
+}
+
+void
+PluginManager::add_favorite (PluginType t, string id)
+{
+       FavoritePlugin fp (t, id);
+       pair<FavoritePluginList::iterator,bool> res = favorites.insert (fp);
+       cerr << "Added " << t << " " << id << " success ? " << res.second << endl;
+}
+
+void
+PluginManager::remove_favorite (PluginType t, string id)
+{
+       FavoritePlugin fp (t, id);
+       favorites.erase (fp);
+}