lbajardsilogic@0: /* -*- c-basic-offset: 4 indent-tabs-mode: nil -*- vi:set ts=8 sts=4 sw=4: */ lbajardsilogic@0: lbajardsilogic@0: /* lbajardsilogic@0: Sonic Visualiser lbajardsilogic@0: An audio file viewer and annotation editor. lbajardsilogic@0: Centre for Digital Music, Queen Mary, University of London. lbajardsilogic@0: lbajardsilogic@0: This program is free software; you can redistribute it and/or lbajardsilogic@0: modify it under the terms of the GNU General Public License as lbajardsilogic@0: published by the Free Software Foundation; either version 2 of the lbajardsilogic@0: License, or (at your option) any later version. See the file lbajardsilogic@0: COPYING included with this distribution for more information. lbajardsilogic@0: */ lbajardsilogic@0: lbajardsilogic@0: /* lbajardsilogic@0: This is a modified version of a source file from the lbajardsilogic@0: Rosegarden MIDI and audio sequencer and notation editor. lbajardsilogic@0: This file copyright 2000-2006 Chris Cannam and Richard Bown. lbajardsilogic@0: */ lbajardsilogic@0: lbajardsilogic@0: #include "LADSPAPluginFactory.h" lbajardsilogic@0: #include lbajardsilogic@0: lbajardsilogic@0: #include lbajardsilogic@0: #include lbajardsilogic@0: #include lbajardsilogic@0: lbajardsilogic@0: #include lbajardsilogic@0: lbajardsilogic@0: #include "LADSPAPluginInstance.h" lbajardsilogic@0: #include "PluginIdentifier.h" lbajardsilogic@0: lbajardsilogic@0: #include "system/System.h" lbajardsilogic@0: #include "base/Preferences.h" lbajardsilogic@0: lbajardsilogic@0: //#define DEBUG_LADSPA_PLUGIN_FACTORY 1 lbajardsilogic@0: lbajardsilogic@0: #ifdef HAVE_LRDF lbajardsilogic@0: #include "lrdf.h" lbajardsilogic@0: #endif // HAVE_LRDF lbajardsilogic@0: lbajardsilogic@0: lbajardsilogic@0: LADSPAPluginFactory::LADSPAPluginFactory() lbajardsilogic@0: { lbajardsilogic@0: #ifdef HAVE_LRDF lbajardsilogic@0: lrdf_init(); lbajardsilogic@0: #endif lbajardsilogic@0: } lbajardsilogic@0: lbajardsilogic@0: LADSPAPluginFactory::~LADSPAPluginFactory() lbajardsilogic@0: { lbajardsilogic@0: for (std::set::iterator i = m_instances.begin(); lbajardsilogic@0: i != m_instances.end(); ++i) { lbajardsilogic@0: (*i)->setFactory(0); lbajardsilogic@0: delete *i; lbajardsilogic@0: } lbajardsilogic@0: m_instances.clear(); lbajardsilogic@0: unloadUnusedLibraries(); lbajardsilogic@0: lbajardsilogic@0: #ifdef HAVE_LRDF lbajardsilogic@0: lrdf_cleanup(); lbajardsilogic@0: #endif // HAVE_LRDF lbajardsilogic@0: } lbajardsilogic@0: lbajardsilogic@0: const std::vector & lbajardsilogic@0: LADSPAPluginFactory::getPluginIdentifiers() const lbajardsilogic@0: { lbajardsilogic@0: return m_identifiers; lbajardsilogic@0: } lbajardsilogic@0: lbajardsilogic@0: void lbajardsilogic@0: LADSPAPluginFactory::enumeratePlugins(std::vector &list) lbajardsilogic@0: { lbajardsilogic@0: for (std::vector::iterator i = m_identifiers.begin(); lbajardsilogic@0: i != m_identifiers.end(); ++i) { lbajardsilogic@0: lbajardsilogic@0: const LADSPA_Descriptor *descriptor = getLADSPADescriptor(*i); lbajardsilogic@0: lbajardsilogic@0: if (!descriptor) { lbajardsilogic@0: std::cerr << "WARNING: LADSPAPluginFactory::enumeratePlugins: couldn't get descriptor for identifier " << i->toStdString() << std::endl; lbajardsilogic@0: continue; lbajardsilogic@0: } lbajardsilogic@0: lbajardsilogic@0: list.push_back(*i); lbajardsilogic@0: list.push_back(descriptor->Name); lbajardsilogic@0: list.push_back(QString("%1").arg(descriptor->UniqueID)); lbajardsilogic@0: list.push_back(descriptor->Label); lbajardsilogic@0: list.push_back(descriptor->Maker); lbajardsilogic@0: list.push_back(descriptor->Copyright); lbajardsilogic@0: list.push_back("false"); // is synth lbajardsilogic@0: list.push_back("false"); // is grouped lbajardsilogic@0: lbajardsilogic@0: if (m_taxonomy.find(*i) != m_taxonomy.end() && m_taxonomy[*i] != "") { lbajardsilogic@0: // std::cerr << "LADSPAPluginFactory: cat for " << i->toStdString()<< " found in taxonomy as " << m_taxonomy[descriptor->UniqueID] << std::endl; lbajardsilogic@0: list.push_back(m_taxonomy[*i]); lbajardsilogic@0: } else { lbajardsilogic@0: list.push_back(""); lbajardsilogic@0: // std::cerr << "LADSPAPluginFactory: cat for " << i->toStdString() << " not found (despite having " << m_fallbackCategories.size() << " fallbacks)" << std::endl; lbajardsilogic@0: lbajardsilogic@0: } lbajardsilogic@0: lbajardsilogic@0: list.push_back(QString("%1").arg(descriptor->PortCount)); lbajardsilogic@0: lbajardsilogic@0: for (unsigned long p = 0; p < descriptor->PortCount; ++p) { lbajardsilogic@0: lbajardsilogic@0: int type = 0; lbajardsilogic@0: if (LADSPA_IS_PORT_CONTROL(descriptor->PortDescriptors[p])) { lbajardsilogic@0: type |= PortType::Control; lbajardsilogic@0: } else { lbajardsilogic@0: type |= PortType::Audio; lbajardsilogic@0: } lbajardsilogic@0: if (LADSPA_IS_PORT_INPUT(descriptor->PortDescriptors[p])) { lbajardsilogic@0: type |= PortType::Input; lbajardsilogic@0: } else { lbajardsilogic@0: type |= PortType::Output; lbajardsilogic@0: } lbajardsilogic@0: lbajardsilogic@0: list.push_back(QString("%1").arg(p)); lbajardsilogic@0: list.push_back(descriptor->PortNames[p]); lbajardsilogic@0: list.push_back(QString("%1").arg(type)); lbajardsilogic@0: list.push_back(QString("%1").arg(getPortDisplayHint(descriptor, p))); lbajardsilogic@0: list.push_back(QString("%1").arg(getPortMinimum(descriptor, p))); lbajardsilogic@0: list.push_back(QString("%1").arg(getPortMaximum(descriptor, p))); lbajardsilogic@0: list.push_back(QString("%1").arg(getPortDefault(descriptor, p))); lbajardsilogic@0: } lbajardsilogic@0: } lbajardsilogic@0: lbajardsilogic@0: unloadUnusedLibraries(); lbajardsilogic@0: } lbajardsilogic@0: lbajardsilogic@0: const RealTimePluginDescriptor * lbajardsilogic@0: LADSPAPluginFactory::getPluginDescriptor(QString identifier) const lbajardsilogic@0: { lbajardsilogic@0: std::map::const_iterator i = lbajardsilogic@0: m_rtDescriptors.find(identifier); lbajardsilogic@0: lbajardsilogic@0: if (i != m_rtDescriptors.end()) { lbajardsilogic@0: return i->second; lbajardsilogic@0: } lbajardsilogic@0: lbajardsilogic@0: return 0; lbajardsilogic@0: } lbajardsilogic@0: lbajardsilogic@0: float lbajardsilogic@0: LADSPAPluginFactory::getPortMinimum(const LADSPA_Descriptor *descriptor, int port) lbajardsilogic@0: { lbajardsilogic@0: LADSPA_PortRangeHintDescriptor d = lbajardsilogic@0: descriptor->PortRangeHints[port].HintDescriptor; lbajardsilogic@0: lbajardsilogic@0: float minimum = 0.0; lbajardsilogic@0: lbajardsilogic@0: if (LADSPA_IS_HINT_BOUNDED_BELOW(d)) { lbajardsilogic@0: float lb = descriptor->PortRangeHints[port].LowerBound; lbajardsilogic@0: minimum = lb; lbajardsilogic@0: } else if (LADSPA_IS_HINT_BOUNDED_ABOVE(d)) { lbajardsilogic@0: float ub = descriptor->PortRangeHints[port].UpperBound; lbajardsilogic@190: minimum = MIN(0.0, ub - 1.0); lbajardsilogic@0: } lbajardsilogic@0: lbajardsilogic@0: if (LADSPA_IS_HINT_SAMPLE_RATE(d)) { lbajardsilogic@0: minimum *= m_sampleRate; lbajardsilogic@0: } lbajardsilogic@0: lbajardsilogic@0: return minimum; lbajardsilogic@0: } lbajardsilogic@0: lbajardsilogic@0: float lbajardsilogic@0: LADSPAPluginFactory::getPortMaximum(const LADSPA_Descriptor *descriptor, int port) lbajardsilogic@0: { lbajardsilogic@0: LADSPA_PortRangeHintDescriptor d = lbajardsilogic@0: descriptor->PortRangeHints[port].HintDescriptor; lbajardsilogic@0: lbajardsilogic@0: float maximum = 1.0; lbajardsilogic@0: lbajardsilogic@0: if (LADSPA_IS_HINT_BOUNDED_ABOVE(d)) { lbajardsilogic@0: float ub = descriptor->PortRangeHints[port].UpperBound; lbajardsilogic@0: maximum = ub; lbajardsilogic@0: } else { lbajardsilogic@0: float lb = descriptor->PortRangeHints[port].LowerBound; lbajardsilogic@0: maximum = lb + 1.0; lbajardsilogic@0: } lbajardsilogic@0: lbajardsilogic@0: if (LADSPA_IS_HINT_SAMPLE_RATE(d)) { lbajardsilogic@0: maximum *= m_sampleRate; lbajardsilogic@0: } lbajardsilogic@0: lbajardsilogic@0: return maximum; lbajardsilogic@0: } lbajardsilogic@0: lbajardsilogic@0: float lbajardsilogic@0: LADSPAPluginFactory::getPortDefault(const LADSPA_Descriptor *descriptor, int port) lbajardsilogic@0: { lbajardsilogic@0: float minimum = getPortMinimum(descriptor, port); lbajardsilogic@0: float maximum = getPortMaximum(descriptor, port); lbajardsilogic@0: float deft; lbajardsilogic@0: lbajardsilogic@0: if (m_portDefaults.find(descriptor->UniqueID) != lbajardsilogic@0: m_portDefaults.end()) { lbajardsilogic@0: if (m_portDefaults[descriptor->UniqueID].find(port) != lbajardsilogic@0: m_portDefaults[descriptor->UniqueID].end()) { lbajardsilogic@0: lbajardsilogic@0: deft = m_portDefaults[descriptor->UniqueID][port]; lbajardsilogic@0: if (deft < minimum) deft = minimum; lbajardsilogic@0: if (deft > maximum) deft = maximum; lbajardsilogic@0: return deft; lbajardsilogic@0: } lbajardsilogic@0: } lbajardsilogic@0: lbajardsilogic@0: LADSPA_PortRangeHintDescriptor d = lbajardsilogic@0: descriptor->PortRangeHints[port].HintDescriptor; lbajardsilogic@0: lbajardsilogic@0: bool logarithmic = LADSPA_IS_HINT_LOGARITHMIC(d); lbajardsilogic@0: lbajardsilogic@0: if (!LADSPA_IS_HINT_HAS_DEFAULT(d)) { lbajardsilogic@0: lbajardsilogic@0: deft = minimum; lbajardsilogic@0: lbajardsilogic@0: } else if (LADSPA_IS_HINT_DEFAULT_MINIMUM(d)) { lbajardsilogic@0: lbajardsilogic@0: deft = minimum; lbajardsilogic@0: lbajardsilogic@0: } else if (LADSPA_IS_HINT_DEFAULT_LOW(d)) { lbajardsilogic@0: lbajardsilogic@0: if (logarithmic) { lbajardsilogic@0: deft = powf(10, log10(minimum) * 0.75 + lbajardsilogic@0: log10(maximum) * 0.25); lbajardsilogic@0: } else { lbajardsilogic@0: deft = minimum * 0.75 + maximum * 0.25; lbajardsilogic@0: } lbajardsilogic@0: lbajardsilogic@0: } else if (LADSPA_IS_HINT_DEFAULT_MIDDLE(d)) { lbajardsilogic@0: lbajardsilogic@0: if (logarithmic) { lbajardsilogic@0: deft = powf(10, log10(minimum) * 0.5 + lbajardsilogic@0: log10(maximum) * 0.5); lbajardsilogic@0: } else { lbajardsilogic@0: deft = minimum * 0.5 + maximum * 0.5; lbajardsilogic@0: } lbajardsilogic@0: lbajardsilogic@0: } else if (LADSPA_IS_HINT_DEFAULT_HIGH(d)) { lbajardsilogic@0: lbajardsilogic@0: if (logarithmic) { lbajardsilogic@0: deft = powf(10, log10(minimum) * 0.25 + lbajardsilogic@0: log10(maximum) * 0.75); lbajardsilogic@0: } else { lbajardsilogic@0: deft = minimum * 0.25 + maximum * 0.75; lbajardsilogic@0: } lbajardsilogic@0: lbajardsilogic@0: } else if (LADSPA_IS_HINT_DEFAULT_MAXIMUM(d)) { lbajardsilogic@0: lbajardsilogic@0: deft = maximum; lbajardsilogic@0: lbajardsilogic@0: } else if (LADSPA_IS_HINT_DEFAULT_0(d)) { lbajardsilogic@0: lbajardsilogic@0: deft = 0.0; lbajardsilogic@0: lbajardsilogic@0: } else if (LADSPA_IS_HINT_DEFAULT_1(d)) { lbajardsilogic@0: lbajardsilogic@0: deft = 1.0; lbajardsilogic@0: lbajardsilogic@0: } else if (LADSPA_IS_HINT_DEFAULT_100(d)) { lbajardsilogic@0: lbajardsilogic@0: deft = 100.0; lbajardsilogic@0: lbajardsilogic@0: } else if (LADSPA_IS_HINT_DEFAULT_440(d)) { lbajardsilogic@0: lbajardsilogic@0: // deft = 440.0; lbajardsilogic@0: deft = Preferences::getInstance()->getTuningFrequency(); lbajardsilogic@0: lbajardsilogic@0: } else { lbajardsilogic@0: lbajardsilogic@0: deft = minimum; lbajardsilogic@0: } lbajardsilogic@0: lbajardsilogic@0: if (LADSPA_IS_HINT_SAMPLE_RATE(d)) { lbajardsilogic@0: deft *= m_sampleRate; lbajardsilogic@0: } lbajardsilogic@0: lbajardsilogic@0: return deft; lbajardsilogic@0: } lbajardsilogic@0: lbajardsilogic@0: float lbajardsilogic@0: LADSPAPluginFactory::getPortQuantization(const LADSPA_Descriptor *descriptor, int port) lbajardsilogic@0: { lbajardsilogic@0: int displayHint = getPortDisplayHint(descriptor, port); lbajardsilogic@0: if (displayHint & PortHint::Toggled) { lbajardsilogic@0: return lrintf(getPortMaximum(descriptor, port)) - lbajardsilogic@0: lrintf(getPortMinimum(descriptor, port)); lbajardsilogic@0: } lbajardsilogic@0: if (displayHint & PortHint::Integer) { lbajardsilogic@0: return 1.0; lbajardsilogic@0: } lbajardsilogic@0: return 0.0; lbajardsilogic@0: } lbajardsilogic@0: lbajardsilogic@0: int lbajardsilogic@0: LADSPAPluginFactory::getPortDisplayHint(const LADSPA_Descriptor *descriptor, int port) lbajardsilogic@0: { lbajardsilogic@0: LADSPA_PortRangeHintDescriptor d = lbajardsilogic@0: descriptor->PortRangeHints[port].HintDescriptor; lbajardsilogic@0: int hint = PortHint::NoHint; lbajardsilogic@0: lbajardsilogic@0: if (LADSPA_IS_HINT_TOGGLED(d)) hint |= PortHint::Toggled; lbajardsilogic@0: if (LADSPA_IS_HINT_INTEGER(d)) hint |= PortHint::Integer; lbajardsilogic@0: if (LADSPA_IS_HINT_LOGARITHMIC(d)) hint |= PortHint::Logarithmic; lbajardsilogic@0: lbajardsilogic@0: return hint; lbajardsilogic@0: } lbajardsilogic@0: lbajardsilogic@0: lbajardsilogic@0: RealTimePluginInstance * lbajardsilogic@0: LADSPAPluginFactory::instantiatePlugin(QString identifier, lbajardsilogic@0: int instrument, lbajardsilogic@0: int position, lbajardsilogic@0: unsigned int sampleRate, lbajardsilogic@0: unsigned int blockSize, lbajardsilogic@0: unsigned int channels) lbajardsilogic@0: { lbajardsilogic@0: const LADSPA_Descriptor *descriptor = getLADSPADescriptor(identifier); lbajardsilogic@0: lbajardsilogic@0: if (descriptor) { lbajardsilogic@0: lbajardsilogic@0: LADSPAPluginInstance *instance = lbajardsilogic@0: new LADSPAPluginInstance lbajardsilogic@0: (this, instrument, identifier, position, sampleRate, blockSize, channels, lbajardsilogic@0: descriptor); lbajardsilogic@0: lbajardsilogic@0: m_instances.insert(instance); lbajardsilogic@0: lbajardsilogic@0: #ifdef DEBUG_LADSPA_PLUGIN_FACTORY lbajardsilogic@0: std::cerr << "LADSPAPluginFactory::instantiatePlugin(" lbajardsilogic@0: << identifier.toStdString() << ": now have " << m_instances.size() << " instances" << std::endl; lbajardsilogic@0: #endif lbajardsilogic@0: lbajardsilogic@0: return instance; lbajardsilogic@0: } lbajardsilogic@0: lbajardsilogic@0: return 0; lbajardsilogic@0: } lbajardsilogic@0: lbajardsilogic@0: void lbajardsilogic@0: LADSPAPluginFactory::releasePlugin(RealTimePluginInstance *instance, lbajardsilogic@0: QString identifier) lbajardsilogic@0: { lbajardsilogic@0: if (m_instances.find(instance) == m_instances.end()) { lbajardsilogic@0: std::cerr << "WARNING: LADSPAPluginFactory::releasePlugin: Not one of mine!" lbajardsilogic@0: << std::endl; lbajardsilogic@0: return; lbajardsilogic@0: } lbajardsilogic@0: lbajardsilogic@0: QString type, soname, label; lbajardsilogic@0: PluginIdentifier::parseIdentifier(identifier, type, soname, label); lbajardsilogic@0: lbajardsilogic@0: m_instances.erase(instance); lbajardsilogic@0: lbajardsilogic@0: bool stillInUse = false; lbajardsilogic@0: lbajardsilogic@0: for (std::set::iterator ii = m_instances.begin(); lbajardsilogic@0: ii != m_instances.end(); ++ii) { lbajardsilogic@0: QString itype, isoname, ilabel; lbajardsilogic@0: PluginIdentifier::parseIdentifier((*ii)->getPluginIdentifier(), itype, isoname, ilabel); lbajardsilogic@0: if (isoname == soname) { lbajardsilogic@0: #ifdef DEBUG_LADSPA_PLUGIN_FACTORY lbajardsilogic@0: std::cerr << "LADSPAPluginFactory::releasePlugin: dll " << soname.toStdString() << " is still in use for plugin " << ilabel.toStdString() << std::endl; lbajardsilogic@0: #endif lbajardsilogic@0: stillInUse = true; lbajardsilogic@0: break; lbajardsilogic@0: } lbajardsilogic@0: } lbajardsilogic@0: lbajardsilogic@0: if (!stillInUse) { lbajardsilogic@0: if (soname != PluginIdentifier::BUILTIN_PLUGIN_SONAME) { lbajardsilogic@0: #ifdef DEBUG_LADSPA_PLUGIN_FACTORY lbajardsilogic@0: std::cerr << "LADSPAPluginFactory::releasePlugin: dll " << soname.toStdString() << " no longer in use, unloading" << std::endl; lbajardsilogic@0: #endif lbajardsilogic@0: unloadLibrary(soname); lbajardsilogic@0: } lbajardsilogic@0: } lbajardsilogic@0: lbajardsilogic@0: #ifdef DEBUG_LADSPA_PLUGIN_FACTORY lbajardsilogic@0: std::cerr << "LADSPAPluginFactory::releasePlugin(" lbajardsilogic@0: << identifier.toStdString() << ": now have " << m_instances.size() << " instances" << std::endl; lbajardsilogic@0: #endif lbajardsilogic@0: } lbajardsilogic@0: lbajardsilogic@0: const LADSPA_Descriptor * lbajardsilogic@0: LADSPAPluginFactory::getLADSPADescriptor(QString identifier) lbajardsilogic@0: { lbajardsilogic@0: QString type, soname, label; lbajardsilogic@0: PluginIdentifier::parseIdentifier(identifier, type, soname, label); lbajardsilogic@0: lbajardsilogic@0: if (m_libraryHandles.find(soname) == m_libraryHandles.end()) { lbajardsilogic@0: loadLibrary(soname); lbajardsilogic@0: if (m_libraryHandles.find(soname) == m_libraryHandles.end()) { lbajardsilogic@0: std::cerr << "WARNING: LADSPAPluginFactory::getLADSPADescriptor: loadLibrary failed for " << soname.toStdString() << std::endl; lbajardsilogic@0: return 0; lbajardsilogic@0: } lbajardsilogic@0: } lbajardsilogic@0: lbajardsilogic@0: void *libraryHandle = m_libraryHandles[soname]; lbajardsilogic@0: lbajardsilogic@0: LADSPA_Descriptor_Function fn = (LADSPA_Descriptor_Function) lbajardsilogic@0: DLSYM(libraryHandle, "ladspa_descriptor"); lbajardsilogic@0: lbajardsilogic@0: if (!fn) { lbajardsilogic@0: std::cerr << "WARNING: LADSPAPluginFactory::getLADSPADescriptor: No descriptor function in library " << soname.toStdString() << std::endl; lbajardsilogic@0: return 0; lbajardsilogic@0: } lbajardsilogic@0: lbajardsilogic@0: const LADSPA_Descriptor *descriptor = 0; lbajardsilogic@0: lbajardsilogic@0: int index = 0; lbajardsilogic@0: while ((descriptor = fn(index))) { lbajardsilogic@0: if (descriptor->Label == label) return descriptor; lbajardsilogic@0: ++index; lbajardsilogic@0: } lbajardsilogic@0: lbajardsilogic@0: std::cerr << "WARNING: LADSPAPluginFactory::getLADSPADescriptor: No such plugin as " << label.toStdString() << " in library " << soname.toStdString() << std::endl; lbajardsilogic@0: lbajardsilogic@0: return 0; lbajardsilogic@0: } lbajardsilogic@0: lbajardsilogic@0: void lbajardsilogic@0: LADSPAPluginFactory::loadLibrary(QString soName) lbajardsilogic@0: { lbajardsilogic@0: void *libraryHandle = DLOPEN(soName, RTLD_NOW); lbajardsilogic@0: if (libraryHandle) { lbajardsilogic@0: m_libraryHandles[soName] = libraryHandle; lbajardsilogic@0: std::cerr << "LADSPAPluginFactory::loadLibrary: Loaded library \"" << soName.toStdString() << "\"" << std::endl; lbajardsilogic@0: return; lbajardsilogic@0: } lbajardsilogic@0: lbajardsilogic@0: if (QFileInfo(soName).exists()) { lbajardsilogic@0: DLERROR(); lbajardsilogic@0: std::cerr << "LADSPAPluginFactory::loadLibrary: Library \"" << soName.toStdString() << "\" exists, but failed to load it" << std::endl; lbajardsilogic@0: return; lbajardsilogic@0: } lbajardsilogic@0: lbajardsilogic@0: std::vector pathList = getPluginPath(); lbajardsilogic@0: lbajardsilogic@0: QString fileName = QFile(soName).fileName(); lbajardsilogic@0: QString base = QFileInfo(soName).baseName(); lbajardsilogic@0: lbajardsilogic@0: for (std::vector::iterator i = pathList.begin(); lbajardsilogic@0: i != pathList.end(); ++i) { lbajardsilogic@0: lbajardsilogic@0: #ifdef DEBUG_LADSPA_PLUGIN_FACTORY lbajardsilogic@0: std::cerr << "Looking at: " << (*i).toStdString() << std::endl; lbajardsilogic@0: #endif lbajardsilogic@0: lbajardsilogic@0: QDir dir(*i, PLUGIN_GLOB, lbajardsilogic@0: QDir::Name | QDir::IgnoreCase, lbajardsilogic@0: QDir::Files | QDir::Readable); lbajardsilogic@0: lbajardsilogic@0: if (QFileInfo(dir.filePath(fileName)).exists()) { lbajardsilogic@0: #ifdef DEBUG_LADSPA_PLUGIN_FACTORY lbajardsilogic@0: std::cerr << "Loading: " << fileName.toStdString() << std::endl; lbajardsilogic@0: #endif lbajardsilogic@0: libraryHandle = DLOPEN(dir.filePath(fileName), RTLD_NOW); lbajardsilogic@0: if (libraryHandle) { lbajardsilogic@0: m_libraryHandles[soName] = libraryHandle; lbajardsilogic@0: return; lbajardsilogic@0: } lbajardsilogic@0: } lbajardsilogic@0: lbajardsilogic@0: for (unsigned int j = 0; j < dir.count(); ++j) { lbajardsilogic@0: QString file = dir.filePath(dir[j]); lbajardsilogic@0: if (QFileInfo(file).baseName() == base) { lbajardsilogic@0: #ifdef DEBUG_LADSPA_PLUGIN_FACTORY lbajardsilogic@0: std::cerr << "Loading: " << file.toStdString() << std::endl; lbajardsilogic@0: #endif lbajardsilogic@0: libraryHandle = DLOPEN(file, RTLD_NOW); lbajardsilogic@0: if (libraryHandle) { lbajardsilogic@0: m_libraryHandles[soName] = libraryHandle; lbajardsilogic@0: return; lbajardsilogic@0: } lbajardsilogic@0: } lbajardsilogic@0: } lbajardsilogic@0: } lbajardsilogic@0: lbajardsilogic@0: std::cerr << "LADSPAPluginFactory::loadLibrary: Failed to locate plugin library \"" << soName.toStdString() << "\"" << std::endl; lbajardsilogic@0: } lbajardsilogic@0: lbajardsilogic@0: void lbajardsilogic@0: LADSPAPluginFactory::unloadLibrary(QString soName) lbajardsilogic@0: { lbajardsilogic@0: LibraryHandleMap::iterator li = m_libraryHandles.find(soName); lbajardsilogic@0: if (li != m_libraryHandles.end()) { lbajardsilogic@0: // std::cerr << "unloading " << soname.toStdString() << std::endl; lbajardsilogic@0: DLCLOSE(m_libraryHandles[soName]); lbajardsilogic@0: m_libraryHandles.erase(li); lbajardsilogic@0: } lbajardsilogic@0: } lbajardsilogic@0: lbajardsilogic@0: void lbajardsilogic@0: LADSPAPluginFactory::unloadUnusedLibraries() lbajardsilogic@0: { lbajardsilogic@0: std::vector toUnload; lbajardsilogic@0: lbajardsilogic@0: for (LibraryHandleMap::iterator i = m_libraryHandles.begin(); lbajardsilogic@0: i != m_libraryHandles.end(); ++i) { lbajardsilogic@0: lbajardsilogic@0: bool stillInUse = false; lbajardsilogic@0: lbajardsilogic@0: for (std::set::iterator ii = m_instances.begin(); lbajardsilogic@0: ii != m_instances.end(); ++ii) { lbajardsilogic@0: lbajardsilogic@0: QString itype, isoname, ilabel; lbajardsilogic@0: PluginIdentifier::parseIdentifier((*ii)->getPluginIdentifier(), itype, isoname, ilabel); lbajardsilogic@0: if (isoname == i->first) { lbajardsilogic@0: stillInUse = true; lbajardsilogic@0: break; lbajardsilogic@0: } lbajardsilogic@0: } lbajardsilogic@0: lbajardsilogic@0: if (!stillInUse) toUnload.push_back(i->first); lbajardsilogic@0: } lbajardsilogic@0: lbajardsilogic@0: for (std::vector::iterator i = toUnload.begin(); lbajardsilogic@0: i != toUnload.end(); ++i) { lbajardsilogic@0: if (*i != PluginIdentifier::BUILTIN_PLUGIN_SONAME) { lbajardsilogic@0: unloadLibrary(*i); lbajardsilogic@0: } lbajardsilogic@0: } lbajardsilogic@0: } lbajardsilogic@0: lbajardsilogic@0: lbajardsilogic@0: // It is only later, after they've gone, lbajardsilogic@0: // I realize they have delivered a letter. lbajardsilogic@0: // It's a letter from my wife. "What are you doing lbajardsilogic@0: // there?" my wife asks. "Are you drinking?" lbajardsilogic@0: // I study the postmark for hours. Then it, too, begins to fade. lbajardsilogic@0: // I hope someday to forget all this. lbajardsilogic@0: lbajardsilogic@0: lbajardsilogic@0: std::vector lbajardsilogic@0: LADSPAPluginFactory::getPluginPath() lbajardsilogic@0: { lbajardsilogic@0: std::vector pathList; lbajardsilogic@0: std::string path; lbajardsilogic@0: lbajardsilogic@0: char *cpath = getenv("LADSPA_PATH"); lbajardsilogic@0: if (cpath) path = cpath; lbajardsilogic@0: lbajardsilogic@0: if (path == "") { lbajardsilogic@0: lbajardsilogic@0: path = DEFAULT_LADSPA_PATH; lbajardsilogic@0: lbajardsilogic@0: char *home = getenv("HOME"); lbajardsilogic@0: if (home) { lbajardsilogic@0: std::string::size_type f; lbajardsilogic@0: while ((f = path.find("$HOME")) != std::string::npos && lbajardsilogic@0: f < path.length()) { lbajardsilogic@0: path.replace(f, 5, home); lbajardsilogic@0: } lbajardsilogic@0: } lbajardsilogic@0: lbajardsilogic@0: #ifdef _WIN32 lbajardsilogic@0: char *pfiles = getenv("ProgramFiles"); lbajardsilogic@0: if (!pfiles) pfiles = "C:\\Program Files"; lbajardsilogic@0: { lbajardsilogic@0: std::string::size_type f; lbajardsilogic@0: while ((f = path.find("%ProgramFiles%")) != std::string::npos && lbajardsilogic@0: f < path.length()) { lbajardsilogic@0: path.replace(f, 14, pfiles); lbajardsilogic@0: } lbajardsilogic@0: } lbajardsilogic@0: #endif lbajardsilogic@0: } lbajardsilogic@0: lbajardsilogic@0: std::string::size_type index = 0, newindex = 0; lbajardsilogic@0: lbajardsilogic@0: while ((newindex = path.find(PATH_SEPARATOR, index)) < path.size()) { lbajardsilogic@0: pathList.push_back(path.substr(index, newindex - index).c_str()); lbajardsilogic@0: index = newindex + 1; lbajardsilogic@0: } lbajardsilogic@0: lbajardsilogic@0: pathList.push_back(path.substr(index).c_str()); lbajardsilogic@0: lbajardsilogic@0: return pathList; lbajardsilogic@0: } lbajardsilogic@0: lbajardsilogic@0: lbajardsilogic@0: std::vector lbajardsilogic@0: LADSPAPluginFactory::getLRDFPath(QString &baseUri) lbajardsilogic@0: { lbajardsilogic@0: std::vector lrdfPaths; lbajardsilogic@0: lbajardsilogic@0: #ifdef HAVE_LRDF lbajardsilogic@0: std::vector pathList = getPluginPath(); lbajardsilogic@0: lbajardsilogic@0: lrdfPaths.push_back("/usr/local/share/ladspa/rdf"); lbajardsilogic@0: lrdfPaths.push_back("/usr/share/ladspa/rdf"); lbajardsilogic@0: lbajardsilogic@0: for (std::vector::iterator i = pathList.begin(); lbajardsilogic@0: i != pathList.end(); ++i) { lbajardsilogic@0: lrdfPaths.push_back(*i + "/rdf"); lbajardsilogic@0: } lbajardsilogic@0: lbajardsilogic@0: baseUri = LADSPA_BASE; lbajardsilogic@0: #endif lbajardsilogic@0: lbajardsilogic@0: return lrdfPaths; lbajardsilogic@0: } lbajardsilogic@0: lbajardsilogic@0: void lbajardsilogic@0: LADSPAPluginFactory::discoverPlugins() lbajardsilogic@0: { lbajardsilogic@0: std::vector pathList = getPluginPath(); lbajardsilogic@0: lbajardsilogic@0: // std::cerr << "LADSPAPluginFactory::discoverPlugins - " lbajardsilogic@0: // << "discovering plugins; path is "; lbajardsilogic@0: // for (std::vector::iterator i = pathList.begin(); lbajardsilogic@0: // i != pathList.end(); ++i) { lbajardsilogic@0: // std::cerr << "[" << i->toStdString() << "] "; lbajardsilogic@0: // } lbajardsilogic@0: // std::cerr << std::endl; lbajardsilogic@0: lbajardsilogic@0: #ifdef HAVE_LRDF lbajardsilogic@0: // read the description files lbajardsilogic@0: // lbajardsilogic@0: QString baseUri; lbajardsilogic@0: std::vector lrdfPaths = getLRDFPath(baseUri); lbajardsilogic@0: lbajardsilogic@0: bool haveSomething = false; lbajardsilogic@0: lbajardsilogic@0: for (size_t i = 0; i < lrdfPaths.size(); ++i) { lbajardsilogic@0: QDir dir(lrdfPaths[i], "*.rdf;*.rdfs"); lbajardsilogic@0: for (unsigned int j = 0; j < dir.count(); ++j) { lbajardsilogic@0: if (!lrdf_read_file(QString("file:" + lrdfPaths[i] + "/" + dir[j]).toStdString().c_str())) { lbajardsilogic@0: // std::cerr << "LADSPAPluginFactory: read RDF file " << (lrdfPaths[i] + "/" + dir[j]) << std::endl; lbajardsilogic@0: haveSomething = true; lbajardsilogic@0: } lbajardsilogic@0: } lbajardsilogic@0: } lbajardsilogic@0: lbajardsilogic@0: if (haveSomething) { lbajardsilogic@0: generateTaxonomy(baseUri + "Plugin", ""); lbajardsilogic@0: } lbajardsilogic@0: #endif // HAVE_LRDF lbajardsilogic@0: lbajardsilogic@0: generateFallbackCategories(); lbajardsilogic@0: lbajardsilogic@0: for (std::vector::iterator i = pathList.begin(); lbajardsilogic@0: i != pathList.end(); ++i) { lbajardsilogic@0: lbajardsilogic@0: QDir pluginDir(*i, PLUGIN_GLOB); lbajardsilogic@79: lbajardsilogic@0: for (unsigned int j = 0; j < pluginDir.count(); ++j) { lbajardsilogic@0: discoverPlugins(QString("%1/%2").arg(*i).arg(pluginDir[j])); lbajardsilogic@0: } lbajardsilogic@0: } lbajardsilogic@0: } lbajardsilogic@0: lbajardsilogic@0: void lbajardsilogic@0: LADSPAPluginFactory::discoverPlugins(QString soname) lbajardsilogic@0: { lbajardsilogic@0: void *libraryHandle = DLOPEN(soname, RTLD_LAZY); lbajardsilogic@0: lbajardsilogic@0: if (!libraryHandle) { lbajardsilogic@0: std::cerr << "WARNING: LADSPAPluginFactory::discoverPlugins: couldn't load plugin library " lbajardsilogic@0: << soname.toStdString() << " - " << DLERROR() << std::endl; lbajardsilogic@0: return; lbajardsilogic@0: } lbajardsilogic@0: lbajardsilogic@0: LADSPA_Descriptor_Function fn = (LADSPA_Descriptor_Function) lbajardsilogic@0: DLSYM(libraryHandle, "ladspa_descriptor"); lbajardsilogic@0: lbajardsilogic@0: if (!fn) { lbajardsilogic@0: std::cerr << "WARNING: LADSPAPluginFactory::discoverPlugins: No descriptor function in " << soname.toStdString() << std::endl; lbajardsilogic@0: return; lbajardsilogic@0: } lbajardsilogic@0: lbajardsilogic@0: const LADSPA_Descriptor *descriptor = 0; lbajardsilogic@0: lbajardsilogic@0: int index = 0; lbajardsilogic@0: while ((descriptor = fn(index))) { lbajardsilogic@0: lbajardsilogic@0: RealTimePluginDescriptor *rtd = new RealTimePluginDescriptor; lbajardsilogic@0: rtd->name = descriptor->Name; lbajardsilogic@0: rtd->label = descriptor->Label; lbajardsilogic@0: rtd->maker = descriptor->Maker; lbajardsilogic@0: rtd->copyright = descriptor->Copyright; lbajardsilogic@0: rtd->category = ""; lbajardsilogic@0: rtd->isSynth = false; lbajardsilogic@0: rtd->parameterCount = 0; lbajardsilogic@0: rtd->audioInputPortCount = 0; lbajardsilogic@0: rtd->audioOutputPortCount = 0; lbajardsilogic@0: rtd->controlOutputPortCount = 0; lbajardsilogic@0: lbajardsilogic@0: QString identifier = PluginIdentifier::createIdentifier lbajardsilogic@0: ("ladspa", soname, descriptor->Label); lbajardsilogic@0: lbajardsilogic@0: #ifdef HAVE_LRDF lbajardsilogic@0: char *def_uri = 0; lbajardsilogic@0: lrdf_defaults *defs = 0; lbajardsilogic@0: lbajardsilogic@0: if (m_lrdfTaxonomy[descriptor->UniqueID] != "") { lbajardsilogic@0: m_taxonomy[identifier] = m_lrdfTaxonomy[descriptor->UniqueID]; lbajardsilogic@0: // std::cerr << "set id \"" << identifier.toStdString() << "\" to cat \"" << m_taxonomy[identifier].toStdString() << "\" from LRDF" << std::endl; lbajardsilogic@0: // std::cout << identifier.toStdString() << "::" << m_taxonomy[identifier].toStdString() << std::endl; lbajardsilogic@0: } lbajardsilogic@0: lbajardsilogic@0: QString category = m_taxonomy[identifier]; lbajardsilogic@0: lbajardsilogic@0: if (category == "" && descriptor->Name != 0) { lbajardsilogic@0: std::string name = descriptor->Name; lbajardsilogic@0: if (name.length() > 4 && lbajardsilogic@0: name.substr(name.length() - 4) == " VST") { lbajardsilogic@0: category = "VST effects"; lbajardsilogic@0: m_taxonomy[identifier] = category; lbajardsilogic@0: } lbajardsilogic@0: } lbajardsilogic@0: lbajardsilogic@0: rtd->category = category.toStdString(); lbajardsilogic@0: lbajardsilogic@0: // std::cerr << "Plugin id is " << descriptor->UniqueID lbajardsilogic@0: // << ", category is \"" << (category ? category : QString("(none)")) lbajardsilogic@0: // << "\", name is " << descriptor->Name lbajardsilogic@0: // << ", label is " << descriptor->Label lbajardsilogic@0: // << std::endl; lbajardsilogic@0: lbajardsilogic@0: def_uri = lrdf_get_default_uri(descriptor->UniqueID); lbajardsilogic@0: if (def_uri) { lbajardsilogic@0: defs = lrdf_get_setting_values(def_uri); lbajardsilogic@0: } lbajardsilogic@0: lbajardsilogic@0: unsigned int controlPortNumber = 1; lbajardsilogic@0: lbajardsilogic@0: for (unsigned long i = 0; i < descriptor->PortCount; i++) { lbajardsilogic@0: lbajardsilogic@0: if (LADSPA_IS_PORT_CONTROL(descriptor->PortDescriptors[i])) { lbajardsilogic@0: lbajardsilogic@0: if (def_uri && defs) { lbajardsilogic@0: lbajardsilogic@0: for (unsigned int j = 0; j < defs->count; j++) { lbajardsilogic@0: if (defs->items[j].pid == controlPortNumber) { lbajardsilogic@0: // std::cerr << "Default for this port (" << defs->items[j].pid << ", " << defs->items[j].label << ") is " << defs->items[j].value << "; applying this to port number " << i << " with name " << descriptor->PortNames[i] << std::endl; lbajardsilogic@0: m_portDefaults[descriptor->UniqueID][i] = lbajardsilogic@0: defs->items[j].value; lbajardsilogic@0: } lbajardsilogic@0: } lbajardsilogic@0: } lbajardsilogic@0: lbajardsilogic@0: ++controlPortNumber; lbajardsilogic@0: } lbajardsilogic@0: } lbajardsilogic@0: #endif // HAVE_LRDF lbajardsilogic@0: lbajardsilogic@0: for (unsigned long i = 0; i < descriptor->PortCount; i++) { lbajardsilogic@0: if (LADSPA_IS_PORT_CONTROL(descriptor->PortDescriptors[i])) { lbajardsilogic@0: if (LADSPA_IS_PORT_INPUT(descriptor->PortDescriptors[i])) { lbajardsilogic@0: ++rtd->parameterCount; lbajardsilogic@0: } else { lbajardsilogic@0: if (strcmp(descriptor->PortNames[i], "latency") && lbajardsilogic@0: strcmp(descriptor->PortNames[i], "_latency")) { lbajardsilogic@0: ++rtd->controlOutputPortCount; lbajardsilogic@0: rtd->controlOutputPortNames.push_back lbajardsilogic@0: (descriptor->PortNames[i]); lbajardsilogic@0: } lbajardsilogic@0: } lbajardsilogic@0: } else { lbajardsilogic@0: if (LADSPA_IS_PORT_INPUT(descriptor->PortDescriptors[i])) { lbajardsilogic@0: ++rtd->audioInputPortCount; lbajardsilogic@0: } else if (LADSPA_IS_PORT_OUTPUT(descriptor->PortDescriptors[i])) { lbajardsilogic@0: ++rtd->audioOutputPortCount; lbajardsilogic@0: } lbajardsilogic@0: } lbajardsilogic@0: } lbajardsilogic@0: lbajardsilogic@0: m_identifiers.push_back(identifier); lbajardsilogic@0: lbajardsilogic@0: m_rtDescriptors[identifier] = rtd; lbajardsilogic@0: lbajardsilogic@0: ++index; lbajardsilogic@0: } lbajardsilogic@0: lbajardsilogic@0: if (DLCLOSE(libraryHandle) != 0) { lbajardsilogic@0: std::cerr << "WARNING: LADSPAPluginFactory::discoverPlugins - can't unload " << libraryHandle << std::endl; lbajardsilogic@0: return; lbajardsilogic@0: } lbajardsilogic@0: } lbajardsilogic@0: lbajardsilogic@0: void lbajardsilogic@0: LADSPAPluginFactory::generateFallbackCategories() lbajardsilogic@0: { lbajardsilogic@0: std::vector pluginPath = getPluginPath(); lbajardsilogic@0: std::vector path; lbajardsilogic@0: lbajardsilogic@0: for (size_t i = 0; i < pluginPath.size(); ++i) { lbajardsilogic@0: if (pluginPath[i].contains("/lib/")) { lbajardsilogic@0: QString p(pluginPath[i]); lbajardsilogic@0: path.push_back(p); lbajardsilogic@0: p.replace("/lib/", "/share/"); lbajardsilogic@0: path.push_back(p); lbajardsilogic@0: // std::cerr << "LADSPAPluginFactory::generateFallbackCategories: path element " << p.toStdString() << std::endl; lbajardsilogic@0: } lbajardsilogic@0: path.push_back(pluginPath[i]); lbajardsilogic@0: // std::cerr << "LADSPAPluginFactory::generateFallbackCategories: path element " << pluginPath[i].toStdString() << std::endl; lbajardsilogic@0: } lbajardsilogic@0: lbajardsilogic@0: for (size_t i = 0; i < path.size(); ++i) { lbajardsilogic@0: lbajardsilogic@0: QDir dir(path[i], "*.cat"); lbajardsilogic@0: lbajardsilogic@0: // std::cerr << "LADSPAPluginFactory::generateFallbackCategories: directory " << path[i].toStdString() << " has " << dir.count() << " .cat files" << std::endl; lbajardsilogic@0: for (unsigned int j = 0; j < dir.count(); ++j) { lbajardsilogic@0: lbajardsilogic@0: QFile file(path[i] + "/" + dir[j]); lbajardsilogic@0: lbajardsilogic@0: // std::cerr << "LADSPAPluginFactory::generateFallbackCategories: about to open " << (path[i].toStdString() + "/" + dir[j].toStdString()) << std::endl; lbajardsilogic@0: lbajardsilogic@0: if (file.open(QIODevice::ReadOnly)) { lbajardsilogic@0: // std::cerr << "...opened" << std::endl; lbajardsilogic@0: QTextStream stream(&file); lbajardsilogic@0: QString line; lbajardsilogic@0: lbajardsilogic@0: while (!stream.atEnd()) { lbajardsilogic@0: line = stream.readLine(); lbajardsilogic@0: // std::cerr << "line is: \"" << line.toStdString() << "\"" << std::endl; lbajardsilogic@0: QString id = PluginIdentifier::canonicalise lbajardsilogic@0: (line.section("::", 0, 0)); lbajardsilogic@0: QString cat = line.section("::", 1, 1); lbajardsilogic@0: m_taxonomy[id] = cat; lbajardsilogic@0: // std::cerr << "set id \"" << id.toStdString() << "\" to cat \"" << cat.toStdString() << "\"" << std::endl; lbajardsilogic@0: } lbajardsilogic@0: } lbajardsilogic@0: } lbajardsilogic@0: } lbajardsilogic@0: } lbajardsilogic@0: lbajardsilogic@0: void lbajardsilogic@0: LADSPAPluginFactory::generateTaxonomy(QString uri, QString base) lbajardsilogic@0: { lbajardsilogic@0: #ifdef HAVE_LRDF lbajardsilogic@0: lrdf_uris *uris = lrdf_get_instances(uri.toStdString().c_str()); lbajardsilogic@0: lbajardsilogic@0: if (uris != NULL) { lbajardsilogic@0: for (unsigned int i = 0; i < uris->count; ++i) { lbajardsilogic@0: m_lrdfTaxonomy[lrdf_get_uid(uris->items[i])] = base; lbajardsilogic@0: } lbajardsilogic@0: lrdf_free_uris(uris); lbajardsilogic@0: } lbajardsilogic@0: lbajardsilogic@0: uris = lrdf_get_subclasses(uri.toStdString().c_str()); lbajardsilogic@0: lbajardsilogic@0: if (uris != NULL) { lbajardsilogic@0: for (unsigned int i = 0; i < uris->count; ++i) { lbajardsilogic@0: char *label = lrdf_get_label(uris->items[i]); lbajardsilogic@0: generateTaxonomy(uris->items[i], lbajardsilogic@0: base + (base.length() > 0 ? " > " : "") + label); lbajardsilogic@0: } lbajardsilogic@0: lrdf_free_uris(uris); lbajardsilogic@0: } lbajardsilogic@0: #endif lbajardsilogic@0: } lbajardsilogic@0: lbajardsilogic@0: QString lbajardsilogic@0: LADSPAPluginFactory::getPluginCategory(QString identifier) lbajardsilogic@0: { lbajardsilogic@0: return m_taxonomy[identifier]; lbajardsilogic@0: } lbajardsilogic@0: