Chris@49
|
1 /* -*- c-basic-offset: 4 indent-tabs-mode: nil -*- vi:set ts=8 sts=4 sw=4: */
|
Chris@0
|
2
|
Chris@0
|
3 /*
|
Chris@52
|
4 Sonic Visualiser
|
Chris@52
|
5 An audio file viewer and annotation editor.
|
Chris@52
|
6 Centre for Digital Music, Queen Mary, University of London.
|
Chris@0
|
7
|
Chris@52
|
8 This program is free software; you can redistribute it and/or
|
Chris@52
|
9 modify it under the terms of the GNU General Public License as
|
Chris@52
|
10 published by the Free Software Foundation; either version 2 of the
|
Chris@52
|
11 License, or (at your option) any later version. See the file
|
Chris@52
|
12 COPYING included with this distribution for more information.
|
Chris@0
|
13 */
|
Chris@0
|
14
|
Chris@0
|
15 /*
|
Chris@0
|
16 This is a modified version of a source file from the
|
Chris@0
|
17 Rosegarden MIDI and audio sequencer and notation editor.
|
Chris@17
|
18 This file copyright 2000-2006 Chris Cannam and Richard Bown.
|
Chris@0
|
19 */
|
Chris@0
|
20
|
Chris@0
|
21 #include "LADSPAPluginFactory.h"
|
Chris@0
|
22 #include <iostream>
|
Chris@0
|
23
|
Chris@0
|
24 #include <QDir>
|
Chris@0
|
25 #include <QFile>
|
Chris@0
|
26 #include <QTextStream>
|
Chris@0
|
27
|
Chris@0
|
28 #include <cmath>
|
Chris@0
|
29
|
Chris@0
|
30 #include "LADSPAPluginInstance.h"
|
Chris@0
|
31 #include "PluginIdentifier.h"
|
Chris@0
|
32
|
Chris@150
|
33 #include "system/System.h"
|
Chris@145
|
34 #include "base/Preferences.h"
|
Chris@0
|
35
|
Chris@35
|
36 #ifdef HAVE_LRDF
|
Chris@0
|
37 #include "lrdf.h"
|
Chris@35
|
38 #endif // HAVE_LRDF
|
Chris@0
|
39
|
Chris@0
|
40
|
Chris@0
|
41 LADSPAPluginFactory::LADSPAPluginFactory()
|
Chris@0
|
42 {
|
Chris@0
|
43 }
|
Chris@0
|
44
|
Chris@0
|
45 LADSPAPluginFactory::~LADSPAPluginFactory()
|
Chris@0
|
46 {
|
Chris@0
|
47 for (std::set<RealTimePluginInstance *>::iterator i = m_instances.begin();
|
Chris@0
|
48 i != m_instances.end(); ++i) {
|
Chris@0
|
49 (*i)->setFactory(0);
|
Chris@0
|
50 delete *i;
|
Chris@0
|
51 }
|
Chris@0
|
52 m_instances.clear();
|
Chris@0
|
53 unloadUnusedLibraries();
|
Chris@0
|
54 }
|
Chris@0
|
55
|
Chris@0
|
56 const std::vector<QString> &
|
Chris@0
|
57 LADSPAPluginFactory::getPluginIdentifiers() const
|
Chris@0
|
58 {
|
Chris@0
|
59 return m_identifiers;
|
Chris@0
|
60 }
|
Chris@0
|
61
|
Chris@0
|
62 void
|
Chris@0
|
63 LADSPAPluginFactory::enumeratePlugins(std::vector<QString> &list)
|
Chris@0
|
64 {
|
Chris@0
|
65 for (std::vector<QString>::iterator i = m_identifiers.begin();
|
Chris@0
|
66 i != m_identifiers.end(); ++i) {
|
Chris@0
|
67
|
Chris@0
|
68 const LADSPA_Descriptor *descriptor = getLADSPADescriptor(*i);
|
Chris@0
|
69
|
Chris@0
|
70 if (!descriptor) {
|
Chris@0
|
71 std::cerr << "WARNING: LADSPAPluginFactory::enumeratePlugins: couldn't get descriptor for identifier " << i->toStdString() << std::endl;
|
Chris@0
|
72 continue;
|
Chris@0
|
73 }
|
Chris@0
|
74
|
Chris@0
|
75 list.push_back(*i);
|
Chris@0
|
76 list.push_back(descriptor->Name);
|
Chris@0
|
77 list.push_back(QString("%1").arg(descriptor->UniqueID));
|
Chris@0
|
78 list.push_back(descriptor->Label);
|
Chris@0
|
79 list.push_back(descriptor->Maker);
|
Chris@0
|
80 list.push_back(descriptor->Copyright);
|
Chris@0
|
81 list.push_back("false"); // is synth
|
Chris@0
|
82 list.push_back("false"); // is grouped
|
Chris@165
|
83
|
Chris@165
|
84 if (m_taxonomy.find(*i) != m_taxonomy.end() && m_taxonomy[*i] != "") {
|
Chris@0
|
85 // std::cerr << "LADSPAPluginFactory: cat for " << i->toStdString()<< " found in taxonomy as " << m_taxonomy[descriptor->UniqueID] << std::endl;
|
Chris@165
|
86 list.push_back(m_taxonomy[*i]);
|
Chris@0
|
87
|
Chris@0
|
88 } else {
|
Chris@0
|
89 list.push_back("");
|
Chris@0
|
90 // std::cerr << "LADSPAPluginFactory: cat for " << i->toStdString() << " not found (despite having " << m_fallbackCategories.size() << " fallbacks)" << std::endl;
|
Chris@0
|
91
|
Chris@0
|
92 }
|
Chris@0
|
93
|
Chris@0
|
94 list.push_back(QString("%1").arg(descriptor->PortCount));
|
Chris@0
|
95
|
Chris@0
|
96 for (unsigned long p = 0; p < descriptor->PortCount; ++p) {
|
Chris@0
|
97
|
Chris@0
|
98 int type = 0;
|
Chris@0
|
99 if (LADSPA_IS_PORT_CONTROL(descriptor->PortDescriptors[p])) {
|
Chris@0
|
100 type |= PortType::Control;
|
Chris@0
|
101 } else {
|
Chris@0
|
102 type |= PortType::Audio;
|
Chris@0
|
103 }
|
Chris@0
|
104 if (LADSPA_IS_PORT_INPUT(descriptor->PortDescriptors[p])) {
|
Chris@0
|
105 type |= PortType::Input;
|
Chris@0
|
106 } else {
|
Chris@0
|
107 type |= PortType::Output;
|
Chris@0
|
108 }
|
Chris@0
|
109
|
Chris@0
|
110 list.push_back(QString("%1").arg(p));
|
Chris@0
|
111 list.push_back(descriptor->PortNames[p]);
|
Chris@0
|
112 list.push_back(QString("%1").arg(type));
|
Chris@0
|
113 list.push_back(QString("%1").arg(getPortDisplayHint(descriptor, p)));
|
Chris@0
|
114 list.push_back(QString("%1").arg(getPortMinimum(descriptor, p)));
|
Chris@0
|
115 list.push_back(QString("%1").arg(getPortMaximum(descriptor, p)));
|
Chris@0
|
116 list.push_back(QString("%1").arg(getPortDefault(descriptor, p)));
|
Chris@0
|
117 }
|
Chris@0
|
118 }
|
Chris@0
|
119
|
Chris@0
|
120 unloadUnusedLibraries();
|
Chris@0
|
121 }
|
Chris@0
|
122
|
Chris@60
|
123 const RealTimePluginDescriptor *
|
Chris@60
|
124 LADSPAPluginFactory::getPluginDescriptor(QString identifier) const
|
Chris@60
|
125 {
|
Chris@60
|
126 std::map<QString, RealTimePluginDescriptor *>::const_iterator i =
|
Chris@60
|
127 m_rtDescriptors.find(identifier);
|
Chris@60
|
128
|
Chris@60
|
129 if (i != m_rtDescriptors.end()) {
|
Chris@60
|
130 return i->second;
|
Chris@60
|
131 }
|
Chris@60
|
132
|
Chris@60
|
133 return 0;
|
Chris@60
|
134 }
|
Chris@60
|
135
|
Chris@0
|
136 float
|
Chris@0
|
137 LADSPAPluginFactory::getPortMinimum(const LADSPA_Descriptor *descriptor, int port)
|
Chris@0
|
138 {
|
Chris@0
|
139 LADSPA_PortRangeHintDescriptor d =
|
Chris@0
|
140 descriptor->PortRangeHints[port].HintDescriptor;
|
Chris@0
|
141
|
Chris@0
|
142 float minimum = 0.0;
|
Chris@0
|
143
|
Chris@0
|
144 if (LADSPA_IS_HINT_BOUNDED_BELOW(d)) {
|
Chris@0
|
145 float lb = descriptor->PortRangeHints[port].LowerBound;
|
Chris@0
|
146 minimum = lb;
|
Chris@0
|
147 } else if (LADSPA_IS_HINT_BOUNDED_ABOVE(d)) {
|
Chris@0
|
148 float ub = descriptor->PortRangeHints[port].UpperBound;
|
Chris@0
|
149 minimum = std::min(0.0, ub - 1.0);
|
Chris@0
|
150 }
|
Chris@0
|
151
|
Chris@0
|
152 if (LADSPA_IS_HINT_SAMPLE_RATE(d)) {
|
Chris@0
|
153 minimum *= m_sampleRate;
|
Chris@0
|
154 }
|
Chris@0
|
155
|
Chris@0
|
156 return minimum;
|
Chris@0
|
157 }
|
Chris@0
|
158
|
Chris@0
|
159 float
|
Chris@0
|
160 LADSPAPluginFactory::getPortMaximum(const LADSPA_Descriptor *descriptor, int port)
|
Chris@0
|
161 {
|
Chris@0
|
162 LADSPA_PortRangeHintDescriptor d =
|
Chris@0
|
163 descriptor->PortRangeHints[port].HintDescriptor;
|
Chris@0
|
164
|
Chris@0
|
165 float maximum = 1.0;
|
Chris@0
|
166
|
Chris@0
|
167 if (LADSPA_IS_HINT_BOUNDED_ABOVE(d)) {
|
Chris@0
|
168 float ub = descriptor->PortRangeHints[port].UpperBound;
|
Chris@0
|
169 maximum = ub;
|
Chris@0
|
170 } else {
|
Chris@0
|
171 float lb = descriptor->PortRangeHints[port].LowerBound;
|
Chris@0
|
172 maximum = lb + 1.0;
|
Chris@0
|
173 }
|
Chris@0
|
174
|
Chris@0
|
175 if (LADSPA_IS_HINT_SAMPLE_RATE(d)) {
|
Chris@0
|
176 maximum *= m_sampleRate;
|
Chris@0
|
177 }
|
Chris@0
|
178
|
Chris@0
|
179 return maximum;
|
Chris@0
|
180 }
|
Chris@0
|
181
|
Chris@0
|
182 float
|
Chris@0
|
183 LADSPAPluginFactory::getPortDefault(const LADSPA_Descriptor *descriptor, int port)
|
Chris@0
|
184 {
|
Chris@0
|
185 float minimum = getPortMinimum(descriptor, port);
|
Chris@0
|
186 float maximum = getPortMaximum(descriptor, port);
|
Chris@0
|
187 float deft;
|
Chris@0
|
188
|
Chris@0
|
189 if (m_portDefaults.find(descriptor->UniqueID) !=
|
Chris@0
|
190 m_portDefaults.end()) {
|
Chris@0
|
191 if (m_portDefaults[descriptor->UniqueID].find(port) !=
|
Chris@0
|
192 m_portDefaults[descriptor->UniqueID].end()) {
|
Chris@0
|
193
|
Chris@0
|
194 deft = m_portDefaults[descriptor->UniqueID][port];
|
Chris@0
|
195 if (deft < minimum) deft = minimum;
|
Chris@0
|
196 if (deft > maximum) deft = maximum;
|
Chris@0
|
197 return deft;
|
Chris@0
|
198 }
|
Chris@0
|
199 }
|
Chris@0
|
200
|
Chris@0
|
201 LADSPA_PortRangeHintDescriptor d =
|
Chris@0
|
202 descriptor->PortRangeHints[port].HintDescriptor;
|
Chris@0
|
203
|
Chris@0
|
204 bool logarithmic = LADSPA_IS_HINT_LOGARITHMIC(d);
|
Chris@0
|
205
|
Chris@0
|
206 if (!LADSPA_IS_HINT_HAS_DEFAULT(d)) {
|
Chris@0
|
207
|
Chris@0
|
208 deft = minimum;
|
Chris@0
|
209
|
Chris@0
|
210 } else if (LADSPA_IS_HINT_DEFAULT_MINIMUM(d)) {
|
Chris@0
|
211
|
Chris@0
|
212 deft = minimum;
|
Chris@0
|
213
|
Chris@0
|
214 } else if (LADSPA_IS_HINT_DEFAULT_LOW(d)) {
|
Chris@0
|
215
|
Chris@0
|
216 if (logarithmic) {
|
Chris@0
|
217 deft = powf(10, log10(minimum) * 0.75 +
|
Chris@0
|
218 log10(maximum) * 0.25);
|
Chris@0
|
219 } else {
|
Chris@0
|
220 deft = minimum * 0.75 + maximum * 0.25;
|
Chris@0
|
221 }
|
Chris@0
|
222
|
Chris@0
|
223 } else if (LADSPA_IS_HINT_DEFAULT_MIDDLE(d)) {
|
Chris@0
|
224
|
Chris@0
|
225 if (logarithmic) {
|
Chris@0
|
226 deft = powf(10, log10(minimum) * 0.5 +
|
Chris@0
|
227 log10(maximum) * 0.5);
|
Chris@0
|
228 } else {
|
Chris@0
|
229 deft = minimum * 0.5 + maximum * 0.5;
|
Chris@0
|
230 }
|
Chris@0
|
231
|
Chris@0
|
232 } else if (LADSPA_IS_HINT_DEFAULT_HIGH(d)) {
|
Chris@0
|
233
|
Chris@0
|
234 if (logarithmic) {
|
Chris@0
|
235 deft = powf(10, log10(minimum) * 0.25 +
|
Chris@0
|
236 log10(maximum) * 0.75);
|
Chris@0
|
237 } else {
|
Chris@0
|
238 deft = minimum * 0.25 + maximum * 0.75;
|
Chris@0
|
239 }
|
Chris@0
|
240
|
Chris@0
|
241 } else if (LADSPA_IS_HINT_DEFAULT_MAXIMUM(d)) {
|
Chris@0
|
242
|
Chris@0
|
243 deft = maximum;
|
Chris@0
|
244
|
Chris@0
|
245 } else if (LADSPA_IS_HINT_DEFAULT_0(d)) {
|
Chris@0
|
246
|
Chris@0
|
247 deft = 0.0;
|
Chris@0
|
248
|
Chris@0
|
249 } else if (LADSPA_IS_HINT_DEFAULT_1(d)) {
|
Chris@0
|
250
|
Chris@0
|
251 deft = 1.0;
|
Chris@0
|
252
|
Chris@0
|
253 } else if (LADSPA_IS_HINT_DEFAULT_100(d)) {
|
Chris@0
|
254
|
Chris@0
|
255 deft = 100.0;
|
Chris@0
|
256
|
Chris@0
|
257 } else if (LADSPA_IS_HINT_DEFAULT_440(d)) {
|
Chris@0
|
258
|
Chris@145
|
259 // deft = 440.0;
|
Chris@145
|
260 deft = Preferences::getInstance()->getTuningFrequency();
|
Chris@0
|
261
|
Chris@0
|
262 } else {
|
Chris@0
|
263
|
Chris@0
|
264 deft = minimum;
|
Chris@0
|
265 }
|
Chris@0
|
266
|
Chris@0
|
267 if (LADSPA_IS_HINT_SAMPLE_RATE(d)) {
|
Chris@0
|
268 deft *= m_sampleRate;
|
Chris@0
|
269 }
|
Chris@0
|
270
|
Chris@0
|
271 return deft;
|
Chris@0
|
272 }
|
Chris@0
|
273
|
Chris@57
|
274 float
|
Chris@57
|
275 LADSPAPluginFactory::getPortQuantization(const LADSPA_Descriptor *descriptor, int port)
|
Chris@57
|
276 {
|
Chris@57
|
277 int displayHint = getPortDisplayHint(descriptor, port);
|
Chris@57
|
278 if (displayHint & PortHint::Toggled) {
|
Chris@57
|
279 return lrintf(getPortMaximum(descriptor, port)) -
|
Chris@57
|
280 lrintf(getPortMinimum(descriptor, port));
|
Chris@57
|
281 }
|
Chris@57
|
282 if (displayHint & PortHint::Integer) {
|
Chris@57
|
283 return 1.0;
|
Chris@57
|
284 }
|
Chris@57
|
285 return 0.0;
|
Chris@57
|
286 }
|
Chris@57
|
287
|
Chris@0
|
288 int
|
Chris@0
|
289 LADSPAPluginFactory::getPortDisplayHint(const LADSPA_Descriptor *descriptor, int port)
|
Chris@0
|
290 {
|
Chris@0
|
291 LADSPA_PortRangeHintDescriptor d =
|
Chris@0
|
292 descriptor->PortRangeHints[port].HintDescriptor;
|
Chris@0
|
293 int hint = PortHint::NoHint;
|
Chris@0
|
294
|
Chris@0
|
295 if (LADSPA_IS_HINT_TOGGLED(d)) hint |= PortHint::Toggled;
|
Chris@0
|
296 if (LADSPA_IS_HINT_INTEGER(d)) hint |= PortHint::Integer;
|
Chris@0
|
297 if (LADSPA_IS_HINT_LOGARITHMIC(d)) hint |= PortHint::Logarithmic;
|
Chris@0
|
298
|
Chris@0
|
299 return hint;
|
Chris@0
|
300 }
|
Chris@0
|
301
|
Chris@0
|
302
|
Chris@0
|
303 RealTimePluginInstance *
|
Chris@0
|
304 LADSPAPluginFactory::instantiatePlugin(QString identifier,
|
Chris@0
|
305 int instrument,
|
Chris@0
|
306 int position,
|
Chris@0
|
307 unsigned int sampleRate,
|
Chris@0
|
308 unsigned int blockSize,
|
Chris@0
|
309 unsigned int channels)
|
Chris@0
|
310 {
|
Chris@0
|
311 const LADSPA_Descriptor *descriptor = getLADSPADescriptor(identifier);
|
Chris@0
|
312
|
Chris@0
|
313 if (descriptor) {
|
Chris@0
|
314
|
Chris@0
|
315 LADSPAPluginInstance *instance =
|
Chris@0
|
316 new LADSPAPluginInstance
|
Chris@0
|
317 (this, instrument, identifier, position, sampleRate, blockSize, channels,
|
Chris@0
|
318 descriptor);
|
Chris@0
|
319
|
Chris@0
|
320 m_instances.insert(instance);
|
Chris@0
|
321
|
Chris@78
|
322 std::cerr << "LADSPAPluginFactory::instantiatePlugin("
|
Chris@78
|
323 << identifier.toStdString() << ": now have " << m_instances.size() << " instances" << std::endl;
|
Chris@78
|
324
|
Chris@0
|
325 return instance;
|
Chris@0
|
326 }
|
Chris@0
|
327
|
Chris@0
|
328 return 0;
|
Chris@0
|
329 }
|
Chris@0
|
330
|
Chris@0
|
331 void
|
Chris@0
|
332 LADSPAPluginFactory::releasePlugin(RealTimePluginInstance *instance,
|
Chris@0
|
333 QString identifier)
|
Chris@0
|
334 {
|
Chris@0
|
335 if (m_instances.find(instance) == m_instances.end()) {
|
Chris@0
|
336 std::cerr << "WARNING: LADSPAPluginFactory::releasePlugin: Not one of mine!"
|
Chris@0
|
337 << std::endl;
|
Chris@0
|
338 return;
|
Chris@0
|
339 }
|
Chris@0
|
340
|
Chris@0
|
341 QString type, soname, label;
|
Chris@0
|
342 PluginIdentifier::parseIdentifier(identifier, type, soname, label);
|
Chris@0
|
343
|
Chris@0
|
344 m_instances.erase(instance);
|
Chris@0
|
345
|
Chris@0
|
346 bool stillInUse = false;
|
Chris@0
|
347
|
Chris@0
|
348 for (std::set<RealTimePluginInstance *>::iterator ii = m_instances.begin();
|
Chris@0
|
349 ii != m_instances.end(); ++ii) {
|
Chris@0
|
350 QString itype, isoname, ilabel;
|
Chris@0
|
351 PluginIdentifier::parseIdentifier((*ii)->getIdentifier(), itype, isoname, ilabel);
|
Chris@0
|
352 if (isoname == soname) {
|
Chris@78
|
353 std::cerr << "LADSPAPluginFactory::releasePlugin: dll " << soname.toStdString() << " is still in use for plugin " << ilabel.toStdString() << std::endl;
|
Chris@0
|
354 stillInUse = true;
|
Chris@0
|
355 break;
|
Chris@0
|
356 }
|
Chris@0
|
357 }
|
Chris@0
|
358
|
Chris@0
|
359 if (!stillInUse) {
|
Chris@118
|
360 if (soname != PluginIdentifier::BUILTIN_PLUGIN_SONAME) {
|
Chris@118
|
361 std::cerr << "LADSPAPluginFactory::releasePlugin: dll " << soname.toStdString() << " no longer in use, unloading" << std::endl;
|
Chris@118
|
362 unloadLibrary(soname);
|
Chris@118
|
363 }
|
Chris@0
|
364 }
|
Chris@78
|
365
|
Chris@78
|
366 std::cerr << "LADSPAPluginFactory::releasePlugin("
|
Chris@78
|
367 << identifier.toStdString() << ": now have " << m_instances.size() << " instances" << std::endl;
|
Chris@0
|
368 }
|
Chris@0
|
369
|
Chris@0
|
370 const LADSPA_Descriptor *
|
Chris@0
|
371 LADSPAPluginFactory::getLADSPADescriptor(QString identifier)
|
Chris@0
|
372 {
|
Chris@0
|
373 QString type, soname, label;
|
Chris@0
|
374 PluginIdentifier::parseIdentifier(identifier, type, soname, label);
|
Chris@0
|
375
|
Chris@0
|
376 if (m_libraryHandles.find(soname) == m_libraryHandles.end()) {
|
Chris@0
|
377 loadLibrary(soname);
|
Chris@0
|
378 if (m_libraryHandles.find(soname) == m_libraryHandles.end()) {
|
Chris@0
|
379 std::cerr << "WARNING: LADSPAPluginFactory::getLADSPADescriptor: loadLibrary failed for " << soname.toStdString() << std::endl;
|
Chris@0
|
380 return 0;
|
Chris@0
|
381 }
|
Chris@0
|
382 }
|
Chris@0
|
383
|
Chris@0
|
384 void *libraryHandle = m_libraryHandles[soname];
|
Chris@0
|
385
|
Chris@0
|
386 LADSPA_Descriptor_Function fn = (LADSPA_Descriptor_Function)
|
Chris@0
|
387 DLSYM(libraryHandle, "ladspa_descriptor");
|
Chris@0
|
388
|
Chris@0
|
389 if (!fn) {
|
Chris@0
|
390 std::cerr << "WARNING: LADSPAPluginFactory::getLADSPADescriptor: No descriptor function in library " << soname.toStdString() << std::endl;
|
Chris@0
|
391 return 0;
|
Chris@0
|
392 }
|
Chris@0
|
393
|
Chris@0
|
394 const LADSPA_Descriptor *descriptor = 0;
|
Chris@0
|
395
|
Chris@0
|
396 int index = 0;
|
Chris@0
|
397 while ((descriptor = fn(index))) {
|
Chris@0
|
398 if (descriptor->Label == label) return descriptor;
|
Chris@0
|
399 ++index;
|
Chris@0
|
400 }
|
Chris@0
|
401
|
Chris@0
|
402 std::cerr << "WARNING: LADSPAPluginFactory::getLADSPADescriptor: No such plugin as " << label.toStdString() << " in library " << soname.toStdString() << std::endl;
|
Chris@0
|
403
|
Chris@0
|
404 return 0;
|
Chris@0
|
405 }
|
Chris@0
|
406
|
Chris@0
|
407 void
|
Chris@0
|
408 LADSPAPluginFactory::loadLibrary(QString soName)
|
Chris@0
|
409 {
|
Chris@0
|
410 void *libraryHandle = DLOPEN(soName, RTLD_NOW);
|
Chris@106
|
411 if (libraryHandle) {
|
Chris@106
|
412 m_libraryHandles[soName] = libraryHandle;
|
Chris@106
|
413 std::cerr << "LADSPAPluginFactory::loadLibrary: Loaded library \"" << soName.toStdString() << "\"" << std::endl;
|
Chris@106
|
414 return;
|
Chris@106
|
415 }
|
Chris@106
|
416
|
Chris@106
|
417 if (QFileInfo(soName).exists()) {
|
Chris@106
|
418 DLERROR();
|
Chris@106
|
419 std::cerr << "LADSPAPluginFactory::loadLibrary: Library \"" << soName.toStdString() << "\" exists, but failed to load it" << std::endl;
|
Chris@106
|
420 return;
|
Chris@106
|
421 }
|
Chris@106
|
422
|
Chris@106
|
423 std::vector<QString> pathList = getPluginPath();
|
Chris@106
|
424
|
Chris@106
|
425 QString fileName = QFile(soName).fileName();
|
Chris@106
|
426 QString base = QFileInfo(soName).baseName();
|
Chris@106
|
427
|
Chris@106
|
428 for (std::vector<QString>::iterator i = pathList.begin();
|
Chris@106
|
429 i != pathList.end(); ++i) {
|
Chris@106
|
430
|
Chris@106
|
431 std::cerr << "Looking at: " << (*i).toStdString() << std::endl;
|
Chris@106
|
432
|
Chris@106
|
433 QDir dir(*i, PLUGIN_GLOB,
|
Chris@106
|
434 QDir::Name | QDir::IgnoreCase,
|
Chris@106
|
435 QDir::Files | QDir::Readable);
|
Chris@106
|
436
|
Chris@106
|
437 if (QFileInfo(dir.filePath(fileName)).exists()) {
|
Chris@106
|
438 std::cerr << "Loading: " << fileName.toStdString() << std::endl;
|
Chris@106
|
439 libraryHandle = DLOPEN(dir.filePath(fileName), RTLD_NOW);
|
Chris@106
|
440 if (libraryHandle) m_libraryHandles[soName] = libraryHandle;
|
Chris@106
|
441 return;
|
Chris@106
|
442 }
|
Chris@106
|
443
|
Chris@106
|
444 for (unsigned int j = 0; j < dir.count(); ++j) {
|
Chris@106
|
445 QString file = dir.filePath(dir[j]);
|
Chris@106
|
446 if (QFileInfo(file).baseName() == base) {
|
Chris@106
|
447 std::cerr << "Loading: " << file.toStdString() << std::endl;
|
Chris@106
|
448 libraryHandle = DLOPEN(file, RTLD_NOW);
|
Chris@106
|
449 if (libraryHandle) m_libraryHandles[soName] = libraryHandle;
|
Chris@106
|
450 return;
|
Chris@106
|
451 }
|
Chris@106
|
452 }
|
Chris@106
|
453 }
|
Chris@106
|
454
|
Chris@106
|
455 std::cerr << "LADSPAPluginFactory::loadLibrary: Failed to locate plugin library \"" << soName.toStdString() << "\"" << std::endl;
|
Chris@0
|
456 }
|
Chris@0
|
457
|
Chris@0
|
458 void
|
Chris@0
|
459 LADSPAPluginFactory::unloadLibrary(QString soName)
|
Chris@0
|
460 {
|
Chris@0
|
461 LibraryHandleMap::iterator li = m_libraryHandles.find(soName);
|
Chris@0
|
462 if (li != m_libraryHandles.end()) {
|
Chris@0
|
463 // std::cerr << "unloading " << soname.toStdString() << std::endl;
|
Chris@0
|
464 DLCLOSE(m_libraryHandles[soName]);
|
Chris@0
|
465 m_libraryHandles.erase(li);
|
Chris@0
|
466 }
|
Chris@0
|
467 }
|
Chris@0
|
468
|
Chris@0
|
469 void
|
Chris@0
|
470 LADSPAPluginFactory::unloadUnusedLibraries()
|
Chris@0
|
471 {
|
Chris@0
|
472 std::vector<QString> toUnload;
|
Chris@0
|
473
|
Chris@0
|
474 for (LibraryHandleMap::iterator i = m_libraryHandles.begin();
|
Chris@0
|
475 i != m_libraryHandles.end(); ++i) {
|
Chris@0
|
476
|
Chris@0
|
477 bool stillInUse = false;
|
Chris@0
|
478
|
Chris@0
|
479 for (std::set<RealTimePluginInstance *>::iterator ii = m_instances.begin();
|
Chris@0
|
480 ii != m_instances.end(); ++ii) {
|
Chris@0
|
481
|
Chris@0
|
482 QString itype, isoname, ilabel;
|
Chris@0
|
483 PluginIdentifier::parseIdentifier((*ii)->getIdentifier(), itype, isoname, ilabel);
|
Chris@0
|
484 if (isoname == i->first) {
|
Chris@0
|
485 stillInUse = true;
|
Chris@0
|
486 break;
|
Chris@0
|
487 }
|
Chris@0
|
488 }
|
Chris@0
|
489
|
Chris@0
|
490 if (!stillInUse) toUnload.push_back(i->first);
|
Chris@0
|
491 }
|
Chris@0
|
492
|
Chris@0
|
493 for (std::vector<QString>::iterator i = toUnload.begin();
|
Chris@0
|
494 i != toUnload.end(); ++i) {
|
Chris@118
|
495 if (*i != PluginIdentifier::BUILTIN_PLUGIN_SONAME) {
|
Chris@118
|
496 unloadLibrary(*i);
|
Chris@118
|
497 }
|
Chris@0
|
498 }
|
Chris@0
|
499 }
|
Chris@0
|
500
|
Chris@0
|
501
|
Chris@0
|
502 // It is only later, after they've gone,
|
Chris@0
|
503 // I realize they have delivered a letter.
|
Chris@0
|
504 // It's a letter from my wife. "What are you doing
|
Chris@0
|
505 // there?" my wife asks. "Are you drinking?"
|
Chris@0
|
506 // I study the postmark for hours. Then it, too, begins to fade.
|
Chris@0
|
507 // I hope someday to forget all this.
|
Chris@0
|
508
|
Chris@0
|
509
|
Chris@0
|
510 std::vector<QString>
|
Chris@0
|
511 LADSPAPluginFactory::getPluginPath()
|
Chris@0
|
512 {
|
Chris@0
|
513 std::vector<QString> pathList;
|
Chris@0
|
514 std::string path;
|
Chris@0
|
515
|
Chris@0
|
516 char *cpath = getenv("LADSPA_PATH");
|
Chris@0
|
517 if (cpath) path = cpath;
|
Chris@0
|
518
|
Chris@0
|
519 if (path == "") {
|
Chris@0
|
520 path = "/usr/local/lib/ladspa:/usr/lib/ladspa";
|
Chris@0
|
521 char *home = getenv("HOME");
|
Chris@0
|
522 if (home) path = std::string(home) + "/.ladspa:" + path;
|
Chris@0
|
523 }
|
Chris@0
|
524
|
Chris@0
|
525 std::string::size_type index = 0, newindex = 0;
|
Chris@0
|
526
|
Chris@0
|
527 while ((newindex = path.find(':', index)) < path.size()) {
|
Chris@0
|
528 pathList.push_back(path.substr(index, newindex - index).c_str());
|
Chris@0
|
529 index = newindex + 1;
|
Chris@0
|
530 }
|
Chris@0
|
531
|
Chris@0
|
532 pathList.push_back(path.substr(index).c_str());
|
Chris@0
|
533
|
Chris@0
|
534 return pathList;
|
Chris@0
|
535 }
|
Chris@0
|
536
|
Chris@0
|
537
|
Chris@0
|
538 std::vector<QString>
|
Chris@0
|
539 LADSPAPluginFactory::getLRDFPath(QString &baseUri)
|
Chris@0
|
540 {
|
Chris@150
|
541 std::vector<QString> lrdfPaths;
|
Chris@150
|
542
|
Chris@150
|
543 #ifdef HAVE_LRDF
|
Chris@0
|
544 std::vector<QString> pathList = getPluginPath();
|
Chris@0
|
545
|
Chris@0
|
546 lrdfPaths.push_back("/usr/local/share/ladspa/rdf");
|
Chris@0
|
547 lrdfPaths.push_back("/usr/share/ladspa/rdf");
|
Chris@0
|
548
|
Chris@0
|
549 for (std::vector<QString>::iterator i = pathList.begin();
|
Chris@0
|
550 i != pathList.end(); ++i) {
|
Chris@0
|
551 lrdfPaths.push_back(*i + "/rdf");
|
Chris@0
|
552 }
|
Chris@0
|
553
|
Chris@0
|
554 baseUri = LADSPA_BASE;
|
Chris@150
|
555 #endif
|
Chris@150
|
556
|
Chris@0
|
557 return lrdfPaths;
|
Chris@0
|
558 }
|
Chris@0
|
559
|
Chris@0
|
560 void
|
Chris@0
|
561 LADSPAPluginFactory::discoverPlugins()
|
Chris@0
|
562 {
|
Chris@0
|
563 std::vector<QString> pathList = getPluginPath();
|
Chris@0
|
564
|
Chris@0
|
565 // std::cerr << "LADSPAPluginFactory::discoverPlugins - "
|
Chris@0
|
566 // << "discovering plugins; path is ";
|
Chris@0
|
567 for (std::vector<QString>::iterator i = pathList.begin();
|
Chris@0
|
568 i != pathList.end(); ++i) {
|
Chris@0
|
569 std::cerr << "[" << i->toStdString() << "] ";
|
Chris@0
|
570 }
|
Chris@0
|
571 std::cerr << std::endl;
|
Chris@0
|
572
|
Chris@35
|
573 #ifdef HAVE_LRDF
|
Chris@0
|
574 // Initialise liblrdf and read the description files
|
Chris@0
|
575 //
|
Chris@0
|
576 lrdf_init();
|
Chris@0
|
577
|
Chris@0
|
578 QString baseUri;
|
Chris@0
|
579 std::vector<QString> lrdfPaths = getLRDFPath(baseUri);
|
Chris@0
|
580
|
Chris@0
|
581 bool haveSomething = false;
|
Chris@0
|
582
|
Chris@0
|
583 for (size_t i = 0; i < lrdfPaths.size(); ++i) {
|
Chris@0
|
584 QDir dir(lrdfPaths[i], "*.rdf;*.rdfs");
|
Chris@0
|
585 for (unsigned int j = 0; j < dir.count(); ++j) {
|
Chris@0
|
586 if (!lrdf_read_file(QString("file:" + lrdfPaths[i] + "/" + dir[j]).toStdString().c_str())) {
|
Chris@0
|
587 // std::cerr << "LADSPAPluginFactory: read RDF file " << (lrdfPaths[i] + "/" + dir[j]) << std::endl;
|
Chris@0
|
588 haveSomething = true;
|
Chris@0
|
589 }
|
Chris@0
|
590 }
|
Chris@0
|
591 }
|
Chris@0
|
592
|
Chris@0
|
593 if (haveSomething) {
|
Chris@0
|
594 generateTaxonomy(baseUri + "Plugin", "");
|
Chris@0
|
595 }
|
Chris@35
|
596 #endif // HAVE_LRDF
|
Chris@0
|
597
|
Chris@0
|
598 generateFallbackCategories();
|
Chris@0
|
599
|
Chris@0
|
600 for (std::vector<QString>::iterator i = pathList.begin();
|
Chris@0
|
601 i != pathList.end(); ++i) {
|
Chris@0
|
602
|
Chris@0
|
603 QDir pluginDir(*i, PLUGIN_GLOB);
|
Chris@0
|
604
|
Chris@0
|
605 for (unsigned int j = 0; j < pluginDir.count(); ++j) {
|
Chris@0
|
606 discoverPlugins(QString("%1/%2").arg(*i).arg(pluginDir[j]));
|
Chris@0
|
607 }
|
Chris@0
|
608 }
|
Chris@0
|
609
|
Chris@35
|
610 #ifdef HAVE_LRDF
|
Chris@0
|
611 // Cleanup after the RDF library
|
Chris@0
|
612 //
|
Chris@0
|
613 lrdf_cleanup();
|
Chris@35
|
614 #endif // HAVE_LRDF
|
Chris@0
|
615 }
|
Chris@0
|
616
|
Chris@0
|
617 void
|
Chris@0
|
618 LADSPAPluginFactory::discoverPlugins(QString soname)
|
Chris@0
|
619 {
|
Chris@0
|
620 void *libraryHandle = DLOPEN(soname, RTLD_LAZY);
|
Chris@0
|
621
|
Chris@0
|
622 if (!libraryHandle) {
|
Chris@0
|
623 std::cerr << "WARNING: LADSPAPluginFactory::discoverPlugins: couldn't load plugin library "
|
Chris@0
|
624 << soname.toStdString() << " - " << DLERROR() << std::endl;
|
Chris@0
|
625 return;
|
Chris@0
|
626 }
|
Chris@0
|
627
|
Chris@0
|
628 LADSPA_Descriptor_Function fn = (LADSPA_Descriptor_Function)
|
Chris@0
|
629 DLSYM(libraryHandle, "ladspa_descriptor");
|
Chris@0
|
630
|
Chris@0
|
631 if (!fn) {
|
Chris@0
|
632 std::cerr << "WARNING: LADSPAPluginFactory::discoverPlugins: No descriptor function in " << soname.toStdString() << std::endl;
|
Chris@0
|
633 return;
|
Chris@0
|
634 }
|
Chris@0
|
635
|
Chris@0
|
636 const LADSPA_Descriptor *descriptor = 0;
|
Chris@0
|
637
|
Chris@0
|
638 int index = 0;
|
Chris@0
|
639 while ((descriptor = fn(index))) {
|
Chris@0
|
640
|
Chris@60
|
641 RealTimePluginDescriptor *rtd = new RealTimePluginDescriptor;
|
Chris@60
|
642 rtd->name = descriptor->Name;
|
Chris@60
|
643 rtd->label = descriptor->Label;
|
Chris@60
|
644 rtd->maker = descriptor->Maker;
|
Chris@60
|
645 rtd->copyright = descriptor->Copyright;
|
Chris@60
|
646 rtd->category = "";
|
Chris@60
|
647 rtd->isSynth = false;
|
Chris@60
|
648 rtd->parameterCount = 0;
|
Chris@60
|
649 rtd->audioInputPortCount = 0;
|
Chris@60
|
650 rtd->controlOutputPortCount = 0;
|
Chris@60
|
651
|
Chris@165
|
652 QString identifier = PluginIdentifier::createIdentifier
|
Chris@165
|
653 ("ladspa", soname, descriptor->Label);
|
Chris@165
|
654
|
Chris@35
|
655 #ifdef HAVE_LRDF
|
Chris@0
|
656 char *def_uri = 0;
|
Chris@0
|
657 lrdf_defaults *defs = 0;
|
Chris@0
|
658
|
Chris@165
|
659 if (m_lrdfTaxonomy[descriptor->UniqueID] != "") {
|
Chris@165
|
660 m_taxonomy[identifier] = m_lrdfTaxonomy[descriptor->UniqueID];
|
Chris@165
|
661 // std::cerr << "set id \"" << identifier.toStdString() << "\" to cat \"" << m_taxonomy[identifier].toStdString() << "\" from LRDF" << std::endl;
|
Chris@165
|
662 }
|
Chris@165
|
663
|
Chris@165
|
664 QString category = m_taxonomy[identifier];
|
Chris@0
|
665
|
Chris@0
|
666 if (category == "" && descriptor->Name != 0) {
|
Chris@0
|
667 std::string name = descriptor->Name;
|
Chris@0
|
668 if (name.length() > 4 &&
|
Chris@0
|
669 name.substr(name.length() - 4) == " VST") {
|
Chris@0
|
670 category = "VST effects";
|
Chris@165
|
671 m_taxonomy[identifier] = category;
|
Chris@0
|
672 }
|
Chris@0
|
673 }
|
Chris@0
|
674
|
Chris@60
|
675 rtd->category = category.toStdString();
|
Chris@60
|
676
|
Chris@0
|
677 // std::cerr << "Plugin id is " << descriptor->UniqueID
|
Chris@0
|
678 // << ", category is \"" << (category ? category : QString("(none)"))
|
Chris@0
|
679 // << "\", name is " << descriptor->Name
|
Chris@0
|
680 // << ", label is " << descriptor->Label
|
Chris@0
|
681 // << std::endl;
|
Chris@0
|
682
|
Chris@0
|
683 def_uri = lrdf_get_default_uri(descriptor->UniqueID);
|
Chris@0
|
684 if (def_uri) {
|
Chris@0
|
685 defs = lrdf_get_setting_values(def_uri);
|
Chris@0
|
686 }
|
Chris@0
|
687
|
Chris@0
|
688 int controlPortNumber = 1;
|
Chris@0
|
689
|
Chris@0
|
690 for (unsigned long i = 0; i < descriptor->PortCount; i++) {
|
Chris@0
|
691
|
Chris@0
|
692 if (LADSPA_IS_PORT_CONTROL(descriptor->PortDescriptors[i])) {
|
Chris@0
|
693
|
Chris@0
|
694 if (def_uri && defs) {
|
Chris@0
|
695
|
Chris@0
|
696 for (int j = 0; j < defs->count; j++) {
|
Chris@0
|
697 if (defs->items[j].pid == controlPortNumber) {
|
Chris@0
|
698 // 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;
|
Chris@0
|
699 m_portDefaults[descriptor->UniqueID][i] =
|
Chris@0
|
700 defs->items[j].value;
|
Chris@0
|
701 }
|
Chris@0
|
702 }
|
Chris@0
|
703 }
|
Chris@0
|
704
|
Chris@0
|
705 ++controlPortNumber;
|
Chris@0
|
706 }
|
Chris@0
|
707 }
|
Chris@35
|
708 #endif // HAVE_LRDF
|
Chris@0
|
709
|
Chris@60
|
710 for (unsigned long i = 0; i < descriptor->PortCount; i++) {
|
Chris@60
|
711 if (LADSPA_IS_PORT_CONTROL(descriptor->PortDescriptors[i])) {
|
Chris@60
|
712 if (LADSPA_IS_PORT_INPUT(descriptor->PortDescriptors[i])) {
|
Chris@60
|
713 ++rtd->parameterCount;
|
Chris@60
|
714 } else {
|
Chris@60
|
715 if (strcmp(descriptor->PortNames[i], "latency") &&
|
Chris@60
|
716 strcmp(descriptor->PortNames[i], "_latency")) {
|
Chris@60
|
717 ++rtd->controlOutputPortCount;
|
Chris@60
|
718 rtd->controlOutputPortNames.push_back
|
Chris@60
|
719 (descriptor->PortNames[i]);
|
Chris@60
|
720 }
|
Chris@60
|
721 }
|
Chris@60
|
722 } else {
|
Chris@60
|
723 if (LADSPA_IS_PORT_INPUT(descriptor->PortDescriptors[i])) {
|
Chris@60
|
724 ++rtd->audioInputPortCount;
|
Chris@60
|
725 }
|
Chris@60
|
726 }
|
Chris@60
|
727 }
|
Chris@60
|
728
|
Chris@0
|
729 m_identifiers.push_back(identifier);
|
Chris@0
|
730
|
Chris@60
|
731 m_rtDescriptors[identifier] = rtd;
|
Chris@60
|
732
|
Chris@0
|
733 ++index;
|
Chris@0
|
734 }
|
Chris@0
|
735
|
Chris@0
|
736 if (DLCLOSE(libraryHandle) != 0) {
|
Chris@0
|
737 std::cerr << "WARNING: LADSPAPluginFactory::discoverPlugins - can't unload " << libraryHandle << std::endl;
|
Chris@0
|
738 return;
|
Chris@0
|
739 }
|
Chris@0
|
740 }
|
Chris@0
|
741
|
Chris@0
|
742 void
|
Chris@0
|
743 LADSPAPluginFactory::generateFallbackCategories()
|
Chris@0
|
744 {
|
Chris@0
|
745 std::vector<QString> pluginPath = getPluginPath();
|
Chris@0
|
746 std::vector<QString> path;
|
Chris@0
|
747
|
Chris@0
|
748 for (size_t i = 0; i < pluginPath.size(); ++i) {
|
Chris@0
|
749 if (pluginPath[i].contains("/lib/")) {
|
Chris@0
|
750 QString p(pluginPath[i]);
|
Chris@165
|
751 path.push_back(p);
|
Chris@0
|
752 p.replace("/lib/", "/share/");
|
Chris@0
|
753 path.push_back(p);
|
Chris@165
|
754 // std::cerr << "LADSPAPluginFactory::generateFallbackCategories: path element " << p.toStdString() << std::endl;
|
Chris@0
|
755 }
|
Chris@0
|
756 path.push_back(pluginPath[i]);
|
Chris@165
|
757 // std::cerr << "LADSPAPluginFactory::generateFallbackCategories: path element " << pluginPath[i].toStdString() << std::endl;
|
Chris@0
|
758 }
|
Chris@0
|
759
|
Chris@0
|
760 for (size_t i = 0; i < path.size(); ++i) {
|
Chris@0
|
761
|
Chris@0
|
762 QDir dir(path[i], "*.cat");
|
Chris@0
|
763
|
Chris@165
|
764 // std::cerr << "LADSPAPluginFactory::generateFallbackCategories: directory " << path[i].toStdString() << " has " << dir.count() << " .cat files" << std::endl;
|
Chris@0
|
765 for (unsigned int j = 0; j < dir.count(); ++j) {
|
Chris@0
|
766
|
Chris@0
|
767 QFile file(path[i] + "/" + dir[j]);
|
Chris@0
|
768
|
Chris@165
|
769 // std::cerr << "LADSPAPluginFactory::generateFallbackCategories: about to open " << (path[i].toStdString() + "/" + dir[j].toStdString()) << std::endl;
|
Chris@0
|
770
|
Chris@0
|
771 if (file.open(QIODevice::ReadOnly)) {
|
Chris@0
|
772 // std::cerr << "...opened" << std::endl;
|
Chris@0
|
773 QTextStream stream(&file);
|
Chris@0
|
774 QString line;
|
Chris@0
|
775
|
Chris@0
|
776 while (!stream.atEnd()) {
|
Chris@0
|
777 line = stream.readLine();
|
Chris@165
|
778 // std::cerr << "line is: \"" << line.toStdString() << "\"" << std::endl;
|
Chris@165
|
779 QString id = PluginIdentifier::canonicalise
|
Chris@165
|
780 (line.section("::", 0, 0));
|
Chris@0
|
781 QString cat = line.section("::", 1, 1);
|
Chris@165
|
782 m_taxonomy[id] = cat;
|
Chris@165
|
783 // std::cerr << "set id \"" << id.toStdString() << "\" to cat \"" << cat.toStdString() << "\"" << std::endl;
|
Chris@0
|
784 }
|
Chris@0
|
785 }
|
Chris@0
|
786 }
|
Chris@0
|
787 }
|
Chris@0
|
788 }
|
Chris@0
|
789
|
Chris@0
|
790 void
|
Chris@0
|
791 LADSPAPluginFactory::generateTaxonomy(QString uri, QString base)
|
Chris@0
|
792 {
|
Chris@35
|
793 #ifdef HAVE_LRDF
|
Chris@0
|
794 lrdf_uris *uris = lrdf_get_instances(uri.toStdString().c_str());
|
Chris@0
|
795
|
Chris@0
|
796 if (uris != NULL) {
|
Chris@0
|
797 for (int i = 0; i < uris->count; ++i) {
|
Chris@165
|
798 m_lrdfTaxonomy[lrdf_get_uid(uris->items[i])] = base;
|
Chris@0
|
799 }
|
Chris@0
|
800 lrdf_free_uris(uris);
|
Chris@0
|
801 }
|
Chris@0
|
802
|
Chris@0
|
803 uris = lrdf_get_subclasses(uri.toStdString().c_str());
|
Chris@0
|
804
|
Chris@0
|
805 if (uris != NULL) {
|
Chris@0
|
806 for (int i = 0; i < uris->count; ++i) {
|
Chris@0
|
807 char *label = lrdf_get_label(uris->items[i]);
|
Chris@0
|
808 generateTaxonomy(uris->items[i],
|
Chris@0
|
809 base + (base.length() > 0 ? " > " : "") + label);
|
Chris@0
|
810 }
|
Chris@0
|
811 lrdf_free_uris(uris);
|
Chris@0
|
812 }
|
Chris@0
|
813 #endif
|
Chris@0
|
814 }
|
Chris@0
|
815
|
Chris@165
|
816 QString
|
Chris@165
|
817 LADSPAPluginFactory::getPluginCategory(QString identifier)
|
Chris@165
|
818 {
|
Chris@165
|
819 return m_taxonomy[identifier];
|
Chris@165
|
820 }
|
Chris@0
|
821
|