falkTX
/
Carla
mirror of https://github.com/falkTX/Carla
1
0
Fork 0
Code Releases 43 Activity
Audio plugin host https://kx.studio/carla
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
986 Commits
17 Branches
4.4GB
Tree: 8dbec3bc28
Branches Tags
${ item.name }
Create branch ${ searchTerm }
from '8dbec3bc28'
${ noResults }
Carla/source/discovery/carla-discovery.cpp

1740 lines
54KB
Raw Blame History 

  1. /*

  2.  * Carla Plugin discovery

  3.  * Copyright (C) 2011-2013 Filipe Coelho <falktx@falktx.com>

  4.  *

  5.  * This program is free software; you can redistribute it and/or

  6.  * modify it under the terms of the GNU General Public License as

  7.  * published by the Free Software Foundation; either version 2 of

  8.  * the License, or any later version.

  9.  *

  10.  * This program is distributed in the hope that it will be useful,

  11.  * but WITHOUT ANY WARRANTY; without even the implied warranty of

  12.  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the

  13.  * GNU General Public License for more details.

  14.  *

  15.  * For a full copy of the GNU General Public License see the doc/GPL.txt file.

  16.  */

  17. 

  18. #include "CarlaBackendUtils.hpp"

  19. #include "CarlaLibUtils.hpp"

  20. #include "CarlaString.hpp"

  21. #include "CarlaMIDI.h"

  22. 

  23. #ifdef WANT_LADSPA

  24. # include "CarlaLadspaUtils.hpp"

  25. #endif

  26. #ifdef WANT_DSSI

  27. # include "CarlaDssiUtils.hpp"

  28. #endif

  29. #ifdef WANT_LV2

  30. # include "CarlaLv2Utils.hpp"

  31. #endif

  32. #ifdef WANT_VST

  33. # include "CarlaVstUtils.hpp"

  34. #endif

  35. #ifdef WANT_FLUIDSYNTH

  36. # include <fluidsynth.h>

  37. #endif

  38. #ifdef WANT_LINUXSAMPLER

  39. // fix broken headers

  40. # define TMP__cplusplus __cplusplus

  41. # undef __cplusplus

  42. # include "linuxsampler/EngineFactory.h"

  43. # define __cplusplus TMP__cplusplus

  44. # undef TMP__cplusplus

  45. #endif

  46. 

  47. #include "juce_audio_basics.h"

  48. 

  49. #include <iostream>

  50. 

  51. #define DISCOVERY_OUT(x, y) std::cout << "\ncarla-discovery::" << x << "::" << y << std::endl;

  52. 

  53. using juce::File;

  54. using juce::FloatVectorOperations;

  55. 

  56. CARLA_BACKEND_USE_NAMESPACE

  57. 

  58. // --------------------------------------------------------------------------

  59. // Dummy values to test plugins with

  60. 

  61. const uint32_t kBufferSize = 512;

  62. const double   kSampleRate = 44100.0;

  63. 

  64. // --------------------------------------------------------------------------

  65. // Don't print ELF/EXE related errors since discovery can find multi-architecture binaries

  66. 

  67. void print_lib_error(const char* const filename)

  68. {

  69.     const char* const error(lib_error(filename));

  70. 

  71.     if (error != nullptr && std::strstr(error, "wrong ELF class") == nullptr && std::strstr(error, "Bad EXE format") == nullptr)

  72.         DISCOVERY_OUT("error", error);

  73. }

  74. 

  75. #ifdef WANT_VST

  76. // --------------------------------------------------------------------------

  77. // VST stuff

  78. 

  79. // Check if plugin is currently processing

  80. bool gVstIsProcessing = false;

  81. 

  82. // Check if plugin needs idle

  83. bool gVstNeedsIdle = false;

  84. 

  85. // Check if plugin wants midi

  86. bool gVstWantsMidi = false;

  87. 

  88. // Check if plugin wants time

  89. bool gVstWantsTime = false;

  90. 

  91. // Current uniqueId for VST shell plugins

  92. intptr_t gVstCurrentUniqueId = 0;

  93. 

  94. // todo: add test, time requested without asking feature

  95. 

  96. // Supported Carla features

  97. intptr_t vstHostCanDo(const char* const feature)

  98. {

  99.     carla_debug("vstHostCanDo(\"%s\")", feature);

  100. 

  101.     if (std::strcmp(feature, "supplyIdle") == 0)

  102.         return 1;

  103.     if (std::strcmp(feature, "sendVstEvents") == 0)

  104.         return 1;

  105.     if (std::strcmp(feature, "sendVstMidiEvent") == 0)

  106.         return 1;

  107.     if (std::strcmp(feature, "sendVstMidiEventFlagIsRealtime") == 0)

  108.         return 1;

  109.     if (std::strcmp(feature, "sendVstTimeInfo") == 0)

  110.     {

  111.         gVstWantsTime = true;

  112.         return 1;

  113.     }

  114.     if (std::strcmp(feature, "receiveVstEvents") == 0)

  115.         return 1;

  116.     if (std::strcmp(feature, "receiveVstMidiEvent") == 0)

  117.         return 1;

  118.     if (std::strcmp(feature, "receiveVstTimeInfo") == 0)

  119.         return -1;

  120.     if (std::strcmp(feature, "reportConnectionChanges") == 0)

  121.         return -1;

  122.     if (std::strcmp(feature, "acceptIOChanges") == 0)

  123.         return 1;

  124.     if (std::strcmp(feature, "sizeWindow") == 0)

  125.         return 1;

  126.     if (std::strcmp(feature, "offline") == 0)

  127.         return -1;

  128.     if (std::strcmp(feature, "openFileSelector") == 0)

  129.         return -1;

  130.     if (std::strcmp(feature, "closeFileSelector") == 0)

  131.         return -1;

  132.     if (std::strcmp(feature, "startStopProcess") == 0)

  133.         return 1;

  134.     if (std::strcmp(feature, "supportShell") == 0)

  135.         return -1; // FIXME

  136.     if (std::strcmp(feature, "shellCategory") == 0)

  137.         return -1; // FIXME

  138. 

  139.     // non-official features found in some plugins:

  140.     // "asyncProcessing"

  141.     // "editFile"

  142. 

  143.     // unimplemented

  144.     carla_stderr("vstHostCanDo(\"%s\") - unknown feature", feature);

  145.     return 0;

  146. }

  147. 

  148. // Host-side callback

  149. intptr_t VSTCALLBACK vstHostCallback(AEffect* const effect, const int32_t opcode, const int32_t index, const intptr_t value, void* const ptr, const float opt)

  150. {

  151.     carla_debug("vstHostCallback(%p, %i:%s, %i, " P_INTPTR ", %p, %f)", effect, opcode, vstMasterOpcode2str(opcode), index, value, ptr, opt);

  152. 

  153.     intptr_t ret = 0;

  154. 

  155.     switch (opcode)

  156.     {

  157.     case audioMasterAutomate:

  158.         ret = 1;

  159.         break;

  160. 

  161.     case audioMasterVersion:

  162.         ret = kVstVersion;

  163.         break;

  164. 

  165.     case audioMasterCurrentId:

  166.         if (gVstCurrentUniqueId == 0) DISCOVERY_OUT("warning", "plugin asked for uniqueId, but it's currently 0");

  167. 

  168.         ret = gVstCurrentUniqueId;

  169.         break;

  170. 

  171.     case DECLARE_VST_DEPRECATED(audioMasterWantMidi):

  172.         if (gVstWantsMidi) DISCOVERY_OUT("warning", "plugin requested MIDI more than once");

  173. 

  174.         gVstWantsMidi = true;

  175.         ret = 1;

  176.         break;

  177. 

  178.     case audioMasterGetTime:

  179.         if (! gVstIsProcessing) DISCOVERY_OUT("warning", "plugin requested timeInfo out of process");

  180.         if (! gVstWantsTime)    DISCOVERY_OUT("warning", "plugin requested timeInfo but didn't ask if host could do \"sendVstTimeInfo\"");

  181. 

  182.         static VstTimeInfo_R timeInfo;

  183.         carla_zeroStruct<VstTimeInfo_R>(timeInfo);

  184.         timeInfo.sampleRate = kSampleRate;

  185. 

  186.         // Tempo

  187.         timeInfo.tempo  = 120.0;

  188.         timeInfo.flags |= kVstTempoValid;

  189. 

  190.         // Time Signature

  191.         timeInfo.timeSigNumerator   = 4;

  192.         timeInfo.timeSigDenominator = 4;

  193.         timeInfo.flags |= kVstTimeSigValid;

  194. 

  195. #ifdef VESTIGE_HEADER

  196.         ret = getAddressFromPointer(&timeInfo);

  197. #else

  198.         ret = ToVstPtr<VstTimeInfo_R>(&timeInfo);

  199. #endif

  200.         break;

  201. 

  202.     case DECLARE_VST_DEPRECATED(audioMasterTempoAt):

  203.         ret = 120 * 10000;

  204.         break;

  205. 

  206.     case DECLARE_VST_DEPRECATED(audioMasterGetNumAutomatableParameters):

  207.         ret = carla_min<intptr_t>(effect->numParams, MAX_DEFAULT_PARAMETERS, 0);

  208.         break;

  209. 

  210.     case DECLARE_VST_DEPRECATED(audioMasterGetParameterQuantization):

  211.         ret = 1; // full single float precision

  212.         break;

  213. 

  214.     case DECLARE_VST_DEPRECATED(audioMasterNeedIdle):

  215.         if (gVstNeedsIdle) DISCOVERY_OUT("warning", "plugin requested idle more than once");

  216. 

  217.         gVstNeedsIdle = true;

  218.         ret = 1;

  219.         break;

  220. 

  221.     case audioMasterGetSampleRate:

  222.         ret = kSampleRate;

  223.         break;

  224. 

  225.     case audioMasterGetBlockSize:

  226.         ret = kBufferSize;

  227.         break;

  228. 

  229.     case DECLARE_VST_DEPRECATED(audioMasterWillReplaceOrAccumulate):

  230.         ret = 1; // replace

  231.         break;

  232. 

  233.     case audioMasterGetCurrentProcessLevel:

  234.         ret = gVstIsProcessing ? kVstProcessLevelRealtime : kVstProcessLevelUser;

  235.         break;

  236. 

  237.     case audioMasterGetAutomationState:

  238.         ret = kVstAutomationOff;

  239.         break;

  240. 

  241.     case audioMasterGetVendorString:

  242.         CARLA_SAFE_ASSERT_BREAK(ptr != nullptr);

  243.         std::strcpy((char*)ptr, "falkTX");

  244.         ret = 1;

  245.         break;

  246. 

  247.     case audioMasterGetProductString:

  248.         CARLA_SAFE_ASSERT_BREAK(ptr != nullptr);

  249.         std::strcpy((char*)ptr, "Carla-Discovery");

  250.         ret = 1;

  251.         break;

  252. 

  253.     case audioMasterGetVendorVersion:

  254.         ret = CARLA_VERSION_HEX;

  255.         break;

  256. 

  257.     case audioMasterCanDo:

  258.         CARLA_SAFE_ASSERT_BREAK(ptr != nullptr);

  259.         ret = vstHostCanDo((const char*)ptr);

  260.         break;

  261. 

  262.     case audioMasterGetLanguage:

  263.         ret = kVstLangEnglish;

  264.         break;

  265. 

  266.     default:

  267.         carla_stdout("vstHostCallback(%p, %i:%s, %i, " P_INTPTR ", %p, %f)", effect, opcode, vstMasterOpcode2str(opcode), index, value, ptr, opt);

  268.         break;

  269.     }

  270. 

  271.     return ret;

  272. }

  273. #endif

  274. 

  275. #ifdef WANT_LINUXSAMPLER

  276. // --------------------------------------------------------------------------

  277. // LinuxSampler stuff

  278. 

  279. class LinuxSamplerScopedEngine

  280. {

  281. public:

  282.     LinuxSamplerScopedEngine(const char* const filename, const char* const stype)

  283.         : fEngine(nullptr)

  284.     {

  285.         using namespace LinuxSampler;

  286. 

  287.         try {

  288.             fEngine = EngineFactory::Create(stype);

  289.         }

  290.         catch (const Exception& e)

  291.         {

  292.             DISCOVERY_OUT("error", e.what());

  293.             return;

  294.         }

  295. 

  296.         if (fEngine == nullptr)

  297.             return;

  298. 

  299.         InstrumentManager* const insMan(fEngine->GetInstrumentManager());

  300. 

  301.         if (insMan == nullptr)

  302.         {

  303.             DISCOVERY_OUT("error", "Failed to get LinuxSampler instrument manager");

  304.             return;

  305.         }

  306. 

  307.         std::vector<InstrumentManager::instrument_id_t> ids;

  308. 

  309.         try {

  310.             ids = insMan->GetInstrumentFileContent(filename);

  311.         }

  312.         catch (const InstrumentManagerException& e)

  313.         {

  314.             DISCOVERY_OUT("error", e.what());

  315.             return;

  316.         }

  317. 

  318.         if (ids.size() == 0)

  319.             return;

  320. 

  321.         InstrumentManager::instrument_info_t info;

  322. 

  323.         try {

  324.             info = insMan->GetInstrumentInfo(ids[0]);

  325.         }

  326.         catch (const InstrumentManagerException& e)

  327.         {

  328.             DISCOVERY_OUT("error", e.what());

  329.             return;

  330.         }

  331. 

  332.         outputInfo(&info, ids.size());

  333.     }

  334. 

  335.     ~LinuxSamplerScopedEngine()

  336.     {

  337.         if (fEngine != nullptr)

  338.         {

  339.             LinuxSampler::EngineFactory::Destroy(fEngine);

  340.             fEngine = nullptr;

  341.         }

  342.     }

  343. 

  344.     static void outputInfo(const LinuxSampler::InstrumentManager::instrument_info_t* const info, const int programs, const char* const basename = nullptr)

  345.     {

  346.         DISCOVERY_OUT("init", "-----------");

  347. 

  348.         if (info != nullptr)

  349.         {

  350.             DISCOVERY_OUT("name", info->InstrumentName);

  351.             DISCOVERY_OUT("label", info->Product);

  352.             DISCOVERY_OUT("maker", info->Artists);

  353.             DISCOVERY_OUT("copyright", info->Artists);

  354.         }

  355.         else if (basename != nullptr && basename[0] != '\0')

  356.         {

  357.             DISCOVERY_OUT("name", basename);

  358.             DISCOVERY_OUT("label", basename);

  359.         }

  360. 

  361.         DISCOVERY_OUT("hints", PLUGIN_IS_SYNTH);

  362.         DISCOVERY_OUT("audio.outs", 2);

  363.         DISCOVERY_OUT("audio.total", 2);

  364.         DISCOVERY_OUT("midi.ins", 1);

  365.         DISCOVERY_OUT("midi.total", 1);

  366.         DISCOVERY_OUT("programs.total", programs);

  367.         //DISCOVERY_OUT("parameters.ins", 13); // defined in Carla, TODO

  368.         //DISCOVERY_OUT("parameters.outs", 1);

  369.         //DISCOVERY_OUT("parameters.total", 14);

  370.         DISCOVERY_OUT("build", BINARY_NATIVE);

  371.         DISCOVERY_OUT("end", "------------");

  372.     }

  373. 

  374. private:

  375.     LinuxSampler::Engine* fEngine;

  376. 

  377.     CARLA_PREVENT_HEAP_ALLOCATION

  378.     CARLA_DECLARE_NON_COPY_CLASS(LinuxSamplerScopedEngine)

  379. };

  380. #endif

  381. 

  382. // ------------------------------ Plugin Checks -----------------------------

  383. 

  384. void do_ladspa_check(void*& libHandle, const char* const filename, const bool init)

  385. {

  386. #ifdef WANT_LADSPA

  387.     LADSPA_Descriptor_Function descFn = (LADSPA_Descriptor_Function)lib_symbol(libHandle, "ladspa_descriptor");

  388. 

  389.     if (descFn == nullptr)

  390.     {

  391.         DISCOVERY_OUT("error", "Not a LADSPA plugin");

  392.         return;

  393.     }

  394. 

  395.     const LADSPA_Descriptor* descriptor;

  396. 

  397.     {

  398.         descriptor = descFn(0);

  399. 

  400.         if (descriptor == nullptr)

  401.         {

  402.             DISCOVERY_OUT("error", "Binary doesn't contain any plugins");

  403.             return;

  404.         }

  405. 

  406.         if (init && descriptor->instantiate != nullptr && descriptor->cleanup != nullptr)

  407.         {

  408.             LADSPA_Handle handle = descriptor->instantiate(descriptor, kSampleRate);

  409. 

  410.             if (handle == nullptr)

  411.             {

  412.                 DISCOVERY_OUT("error", "Failed to init first LADSPA plugin");

  413.                 return;

  414.             }

  415. 

  416.             descriptor->cleanup(handle);

  417. 

  418.             lib_close(libHandle);

  419.             libHandle = lib_open(filename);

  420. 

  421.             if (libHandle == nullptr)

  422.             {

  423.                 print_lib_error(filename);

  424.                 return;

  425.             }

  426. 

  427.             descFn = (LADSPA_Descriptor_Function)lib_symbol(libHandle, "ladspa_descriptor");

  428. 

  429.             if (descFn == nullptr)

  430.             {

  431.                 DISCOVERY_OUT("error", "Not a LADSPA plugin (#2)");

  432.                 return;

  433.             }

  434.         }

  435.     }

  436. 

  437.     unsigned long i = 0;

  438. 

  439.     while ((descriptor = descFn(i++)) != nullptr)

  440.     {

  441.         if (descriptor->instantiate == nullptr)

  442.         {

  443.             DISCOVERY_OUT("error", "Plugin '" << descriptor->Name << "' has no instantiate()");

  444.             continue;

  445.         }

  446.         if (descriptor->cleanup == nullptr)

  447.         {

  448.             DISCOVERY_OUT("error", "Plugin '" << descriptor->Name << "' has no cleanup()");

  449.             continue;

  450.         }

  451.         if (descriptor->run == nullptr)

  452.         {

  453.             DISCOVERY_OUT("error", "Plugin '" << descriptor->Name << "' has no run()");

  454.             continue;

  455.         }

  456.         if (! LADSPA_IS_HARD_RT_CAPABLE(descriptor->Properties))

  457.         {

  458.             DISCOVERY_OUT("warning", "Plugin '" << descriptor->Name << "' is not hard real-time capable");

  459.         }

  460. 

  461.         int hints = 0x0;

  462.         int audioIns = 0;

  463.         int audioOuts = 0;

  464.         int audioTotal = 0;

  465.         int parametersIns = 0;

  466.         int parametersOuts = 0;

  467.         int parametersTotal = 0;

  468. 

  469.         if (LADSPA_IS_HARD_RT_CAPABLE(descriptor->Properties))

  470.             hints |= PLUGIN_IS_RTSAFE;

  471. 

  472.         for (unsigned long j=0; j < descriptor->PortCount; ++j)

  473.         {

  474.             CARLA_ASSERT(descriptor->PortNames[j] != nullptr);

  475.             const LADSPA_PortDescriptor portDescriptor = descriptor->PortDescriptors[j];

  476. 

  477.             if (LADSPA_IS_PORT_AUDIO(portDescriptor))

  478.             {

  479.                 if (LADSPA_IS_PORT_INPUT(portDescriptor))

  480.                     audioIns += 1;

  481.                 else if (LADSPA_IS_PORT_OUTPUT(portDescriptor))

  482.                     audioOuts += 1;

  483. 

  484.                 audioTotal += 1;

  485.             }

  486.             else if (LADSPA_IS_PORT_CONTROL(portDescriptor))

  487.             {

  488.                 if (LADSPA_IS_PORT_INPUT(portDescriptor))

  489.                     parametersIns += 1;

  490.                 else if (LADSPA_IS_PORT_OUTPUT(portDescriptor) && std::strcmp(descriptor->PortNames[j], "latency") != 0 && std::strcmp(descriptor->PortNames[j], "_latency") != 0)

  491.                     parametersOuts += 1;

  492. 

  493.                 parametersTotal += 1;

  494.             }

  495.         }

  496. 

  497.         if (init)

  498.         {

  499.             // -----------------------------------------------------------------------

  500.             // start crash-free plugin test

  501. 

  502.             LADSPA_Handle handle = descriptor->instantiate(descriptor, kSampleRate);

  503. 

  504.             if (handle == nullptr)

  505.             {

  506.                 DISCOVERY_OUT("error", "Failed to init LADSPA plugin");

  507.                 continue;

  508.             }

  509. 

  510.             // Test quick init and cleanup

  511.             descriptor->cleanup(handle);

  512. 

  513.             handle = descriptor->instantiate(descriptor, kSampleRate);

  514. 

  515.             if (handle == nullptr)

  516.             {

  517.                 DISCOVERY_OUT("error", "Failed to init LADSPA plugin (#2)");

  518.                 continue;

  519.             }

  520. 

  521.             LADSPA_Data bufferAudio[kBufferSize][audioTotal];

  522.             LADSPA_Data bufferParams[parametersTotal];

  523.             LADSPA_Data min, max, def;

  524. 

  525.             for (unsigned long j=0, iA=0, iC=0; j < descriptor->PortCount; ++j)

  526.             {

  527.                 const LADSPA_PortDescriptor portDescriptor = descriptor->PortDescriptors[j];

  528.                 const LADSPA_PortRangeHint  portRangeHints = descriptor->PortRangeHints[j];

  529.                 const char* const portName = descriptor->PortNames[j];

  530. 

  531.                 if (LADSPA_IS_PORT_AUDIO(portDescriptor))

  532.                 {

  533.                     FloatVectorOperations::clear(bufferAudio[iA], kBufferSize);

  534.                     descriptor->connect_port(handle, j, bufferAudio[iA++]);

  535.                 }

  536.                 else if (LADSPA_IS_PORT_CONTROL(portDescriptor))

  537.                 {

  538.                     // min value

  539.                     if (LADSPA_IS_HINT_BOUNDED_BELOW(portRangeHints.HintDescriptor))

  540.                         min = portRangeHints.LowerBound;

  541.                     else

  542.                         min = 0.0f;

  543. 

  544.                     // max value

  545.                     if (LADSPA_IS_HINT_BOUNDED_ABOVE(portRangeHints.HintDescriptor))

  546.                         max = portRangeHints.UpperBound;

  547.                     else

  548.                         max = 1.0f;

  549. 

  550.                     if (min > max)

  551.                     {

  552.                         DISCOVERY_OUT("warning", "Parameter '" << portName << "' is broken: min > max");

  553.                         max = min + 0.1f;

  554.                     }

  555.                     else if (max - min == 0.0f)

  556.                     {

  557.                         DISCOVERY_OUT("warning", "Parameter '" << portName << "' is broken: max - min == 0");

  558.                         max = min + 0.1f;

  559.                     }

  560. 

  561.                     // default value

  562.                     def = get_default_ladspa_port_value(portRangeHints.HintDescriptor, min, max);

  563. 

  564.                     if (LADSPA_IS_HINT_SAMPLE_RATE(portRangeHints.HintDescriptor))

  565.                     {

  566.                         min *= kSampleRate;

  567.                         max *= kSampleRate;

  568.                         def *= kSampleRate;

  569.                     }

  570. 

  571.                     if (LADSPA_IS_PORT_OUTPUT(portDescriptor) && (std::strcmp(portName, "latency") == 0 || std::strcmp(portName, "_latency") == 0))

  572.                     {

  573.                         // latency parameter

  574.                         def = 0.0f;

  575.                     }

  576.                     else

  577.                     {

  578.                         if (def < min)

  579.                             def = min;

  580.                         else if (def > max)

  581.                             def = max;

  582.                     }

  583. 

  584.                     bufferParams[iC] = def;

  585.                     descriptor->connect_port(handle, j, &bufferParams[iC++]);

  586.                 }

  587.             }

  588. 

  589.             if (descriptor->activate != nullptr)

  590.                 descriptor->activate(handle);

  591. 

  592.             descriptor->run(handle, kBufferSize);

  593. 

  594.             if (descriptor->deactivate != nullptr)

  595.                 descriptor->deactivate(handle);

  596. 

  597.             descriptor->cleanup(handle);

  598. 

  599.             // end crash-free plugin test

  600.             // -----------------------------------------------------------------------

  601.         }

  602. 

  603.         DISCOVERY_OUT("init", "-----------");

  604.         DISCOVERY_OUT("name", descriptor->Name);

  605.         DISCOVERY_OUT("label", descriptor->Label);

  606.         DISCOVERY_OUT("maker", descriptor->Maker);

  607.         DISCOVERY_OUT("copyright", descriptor->Copyright);

  608.         DISCOVERY_OUT("uniqueId", descriptor->UniqueID);

  609.         DISCOVERY_OUT("hints", hints);

  610.         DISCOVERY_OUT("audio.ins", audioIns);

  611.         DISCOVERY_OUT("audio.outs", audioOuts);

  612.         DISCOVERY_OUT("audio.total", audioTotal);

  613.         DISCOVERY_OUT("parameters.ins", parametersIns);

  614.         DISCOVERY_OUT("parameters.outs", parametersOuts);

  615.         DISCOVERY_OUT("parameters.total", parametersTotal);

  616.         DISCOVERY_OUT("build", BINARY_NATIVE);

  617.         DISCOVERY_OUT("end", "------------");

  618.     }

  619. #else

  620.     DISCOVERY_OUT("error", "LADSPA support not available");

  621.     return;

  622. 

  623.     // unused

  624.     (void)libHandle;

  625.     (void)filename;

  626.     (void)init;

  627. #endif

  628. }

  629. 

  630. void do_dssi_check(void*& libHandle, const char* const filename, const bool init)

  631. {

  632. #ifdef WANT_DSSI

  633.     DSSI_Descriptor_Function descFn = (DSSI_Descriptor_Function)lib_symbol(libHandle, "dssi_descriptor");

  634. 

  635.     if (descFn == nullptr)

  636.     {

  637.         DISCOVERY_OUT("error", "Not a DSSI plugin");

  638.         return;

  639.     }

  640. 

  641.     const DSSI_Descriptor* descriptor;

  642. 

  643.     {

  644.         descriptor = descFn(0);

  645. 

  646.         if (descriptor == nullptr)

  647.         {

  648.             DISCOVERY_OUT("error", "Binary doesn't contain any plugins");

  649.             return;

  650.         }

  651. 

  652.         const LADSPA_Descriptor* const ldescriptor(descriptor->LADSPA_Plugin);

  653. 

  654.         if (init && ldescriptor->instantiate != nullptr && ldescriptor->cleanup != nullptr)

  655.         {

  656.             LADSPA_Handle handle = ldescriptor->instantiate(ldescriptor, kSampleRate);

  657. 

  658.             if (handle == nullptr)

  659.             {

  660.                 DISCOVERY_OUT("error", "Failed to init first LADSPA plugin");

  661.                 return;

  662.             }

  663. 

  664.             ldescriptor->cleanup(handle);

  665. 

  666.             lib_close(libHandle);

  667.             libHandle = lib_open(filename);

  668. 

  669.             if (libHandle == nullptr)

  670.             {

  671.                 print_lib_error(filename);

  672.                 return;

  673.             }

  674. 

  675.             DSSI_Descriptor_Function descFn = (DSSI_Descriptor_Function)lib_symbol(libHandle, "dssi_descriptor");

  676. 

  677.             if (descFn == nullptr)

  678.             {

  679.                 DISCOVERY_OUT("error", "Not a DSSI plugin (#2)");

  680.                 return;

  681.             }

  682.         }

  683.     }

  684. 

  685.     unsigned long i = 0;

  686. 

  687.     while ((descriptor = descFn(i++)) != nullptr)

  688.     {

  689.         const LADSPA_Descriptor* const ldescriptor(descriptor->LADSPA_Plugin);

  690. 

  691.         if (ldescriptor == nullptr)

  692.         {

  693.             DISCOVERY_OUT("error", "Plugin '" << ldescriptor->Name << "' has no LADSPA interface");

  694.             continue;

  695.         }

  696.         if (descriptor->DSSI_API_Version != DSSI_VERSION_MAJOR)

  697.         {

  698.             DISCOVERY_OUT("error", "Plugin '" << ldescriptor->Name << "' uses an unsupported DSSI spec version " << descriptor->DSSI_API_Version);

  699.             continue;

  700.         }

  701.         if (ldescriptor->instantiate == nullptr)

  702.         {

  703.             DISCOVERY_OUT("error", "Plugin '" << ldescriptor->Name << "' has no instantiate()");

  704.             continue;

  705.         }

  706.         if (ldescriptor->cleanup == nullptr)

  707.         {

  708.             DISCOVERY_OUT("error", "Plugin '" << ldescriptor->Name << "' has no cleanup()");

  709.             continue;

  710.         }

  711.         if (ldescriptor->run == nullptr && descriptor->run_synth == nullptr && descriptor->run_multiple_synths == nullptr)

  712.         {

  713.             DISCOVERY_OUT("error", "Plugin '" << ldescriptor->Name << "' has no run(), run_synth() or run_multiple_synths()");

  714.             continue;

  715.         }

  716.         if (! LADSPA_IS_HARD_RT_CAPABLE(ldescriptor->Properties))

  717.         {

  718.             DISCOVERY_OUT("warning", "Plugin '" << ldescriptor->Name << "' is not hard real-time capable");

  719.         }

  720. 

  721.         int hints = 0x0;

  722.         int audioIns = 0;

  723.         int audioOuts = 0;

  724.         int audioTotal = 0;

  725.         int midiIns = 0;

  726.         int midiTotal = 0;

  727.         int parametersIns = 0;

  728.         int parametersOuts = 0;

  729.         int parametersTotal = 0;

  730.         int programsTotal = 0;

  731. 

  732.         if (LADSPA_IS_HARD_RT_CAPABLE(ldescriptor->Properties))

  733.             hints |= PLUGIN_IS_RTSAFE;

  734. 

  735.         for (unsigned long j=0; j < ldescriptor->PortCount; ++j)

  736.         {

  737.             CARLA_ASSERT(ldescriptor->PortNames[j] != nullptr);

  738.             const LADSPA_PortDescriptor portDescriptor = ldescriptor->PortDescriptors[j];

  739. 

  740.             if (LADSPA_IS_PORT_AUDIO(portDescriptor))

  741.             {

  742.                 if (LADSPA_IS_PORT_INPUT(portDescriptor))

  743.                     audioIns += 1;

  744.                 else if (LADSPA_IS_PORT_OUTPUT(portDescriptor))

  745.                     audioOuts += 1;

  746. 

  747.                 audioTotal += 1;

  748.             }

  749.             else if (LADSPA_IS_PORT_CONTROL(portDescriptor))

  750.             {

  751.                 if (LADSPA_IS_PORT_INPUT(portDescriptor))

  752.                     parametersIns += 1;

  753.                 else if (LADSPA_IS_PORT_OUTPUT(portDescriptor) && std::strcmp(ldescriptor->PortNames[j], "latency") != 0 && std::strcmp(ldescriptor->PortNames[j], "_latency") != 0)

  754.                     parametersOuts += 1;

  755. 

  756.                 parametersTotal += 1;

  757.             }

  758.         }

  759. 

  760.         if (descriptor->run_synth != nullptr || descriptor->run_multiple_synths != nullptr)

  761.             midiIns = midiTotal = 1;

  762. 

  763.         if (midiIns > 0 && audioIns == 0 && audioOuts > 0)

  764.             hints |= PLUGIN_IS_SYNTH;

  765. 

  766.         if (const char* const ui = find_dssi_ui(filename, ldescriptor->Label))

  767.         {

  768.             hints |= PLUGIN_HAS_GUI;

  769.             delete[] ui;

  770.         }

  771. 

  772.         if (init)

  773.         {

  774.             // -----------------------------------------------------------------------

  775.             // start crash-free plugin test

  776. 

  777.             LADSPA_Handle handle = ldescriptor->instantiate(ldescriptor, kSampleRate);

  778. 

  779.             if (handle == nullptr)

  780.             {

  781.                 DISCOVERY_OUT("error", "Failed to init DSSI plugin");

  782.                 continue;

  783.             }

  784. 

  785.             // Test quick init and cleanup

  786.             ldescriptor->cleanup(handle);

  787. 

  788.             handle = ldescriptor->instantiate(ldescriptor, kSampleRate);

  789. 

  790.             if (handle == nullptr)

  791.             {

  792.                 DISCOVERY_OUT("error", "Failed to init DSSI plugin (#2)");

  793.                 continue;

  794.             }

  795. 

  796.             if (descriptor->get_program != nullptr && descriptor->select_program != nullptr)

  797.             {

  798.                 while (descriptor->get_program(handle, programsTotal++))

  799.                     continue;

  800.             }

  801. 

  802.             LADSPA_Data bufferAudio[kBufferSize][audioTotal];

  803.             LADSPA_Data bufferParams[parametersTotal];

  804.             LADSPA_Data min, max, def;

  805. 

  806.             for (unsigned long j=0, iA=0, iC=0; j < ldescriptor->PortCount; ++j)

  807.             {

  808.                 const LADSPA_PortDescriptor portDescriptor = ldescriptor->PortDescriptors[j];

  809.                 const LADSPA_PortRangeHint  portRangeHints = ldescriptor->PortRangeHints[j];

  810.                 const char* const portName = ldescriptor->PortNames[j];

  811. 

  812.                 if (LADSPA_IS_PORT_AUDIO(portDescriptor))

  813.                 {

  814.                     FloatVectorOperations::clear(bufferAudio[iA], kBufferSize);

  815.                     ldescriptor->connect_port(handle, j, bufferAudio[iA++]);

  816.                 }

  817.                 else if (LADSPA_IS_PORT_CONTROL(portDescriptor))

  818.                 {

  819.                     // min value

  820.                     if (LADSPA_IS_HINT_BOUNDED_BELOW(portRangeHints.HintDescriptor))

  821.                         min = portRangeHints.LowerBound;

  822.                     else

  823.                         min = 0.0f;

  824. 

  825.                     // max value

  826.                     if (LADSPA_IS_HINT_BOUNDED_ABOVE(portRangeHints.HintDescriptor))

  827.                         max = portRangeHints.UpperBound;

  828.                     else

  829.                         max = 1.0f;

  830. 

  831.                     if (min > max)

  832.                     {

  833.                         DISCOVERY_OUT("warning", "Parameter '" << portName << "' is broken: min > max");

  834.                         max = min + 0.1f;

  835.                     }

  836.                     else if (max - min == 0.0f)

  837.                     {

  838.                         DISCOVERY_OUT("warning", "Parameter '" << portName << "' is broken: max - min == 0");

  839.                         max = min + 0.1f;

  840.                     }

  841. 

  842.                     // default value

  843.                     def = get_default_ladspa_port_value(portRangeHints.HintDescriptor, min, max);

  844. 

  845.                     if (LADSPA_IS_HINT_SAMPLE_RATE(portRangeHints.HintDescriptor))

  846.                     {

  847.                         min *= kSampleRate;

  848.                         max *= kSampleRate;

  849.                         def *= kSampleRate;

  850.                     }

  851. 

  852.                     if (LADSPA_IS_PORT_OUTPUT(portDescriptor) && (std::strcmp(portName, "latency") == 0 || std::strcmp(portName, "_latency") == 0))

  853.                     {

  854.                         // latency parameter

  855.                         def = 0.0f;

  856.                     }

  857.                     else

  858.                     {

  859.                         if (def < min)

  860.                             def = min;

  861.                         else if (def > max)

  862.                             def = max;

  863.                     }

  864. 

  865.                     bufferParams[iC] = def;

  866.                     ldescriptor->connect_port(handle, j, &bufferParams[iC++]);

  867.                 }

  868.             }

  869. 

  870.             // select first midi-program if available

  871.             if (programsTotal > 0)

  872.             {

  873.                 if (const DSSI_Program_Descriptor* const pDesc = descriptor->get_program(handle, 0))

  874.                     descriptor->select_program(handle, pDesc->Bank, pDesc->Program);

  875.             }

  876. 

  877.             if (ldescriptor->activate != nullptr)

  878.                 ldescriptor->activate(handle);

  879. 

  880.             if (descriptor->run_synth != nullptr || descriptor->run_multiple_synths != nullptr)

  881.             {

  882.                 snd_seq_event_t midiEvents[2];

  883.                 carla_zeroStruct<snd_seq_event_t>(midiEvents, 2);

  884. 

  885.                 const unsigned long midiEventCount = 2;

  886. 

  887.                 midiEvents[0].type = SND_SEQ_EVENT_NOTEON;

  888.                 midiEvents[0].data.note.note     = 64;

  889.                 midiEvents[0].data.note.velocity = 100;

  890. 

  891.                 midiEvents[1].type = SND_SEQ_EVENT_NOTEOFF;

  892.                 midiEvents[1].data.note.note     = 64;

  893.                 midiEvents[1].data.note.velocity = 0;

  894.                 midiEvents[1].time.tick = kBufferSize/2;

  895. 

  896.                 if (descriptor->run_multiple_synths != nullptr && descriptor->run_synth == nullptr)

  897.                 {

  898.                     LADSPA_Handle handlePtr[1] = { handle };

  899.                     snd_seq_event_t* midiEventsPtr[1] = { midiEvents };

  900.                     unsigned long midiEventCountPtr[1] = { midiEventCount };

  901.                     descriptor->run_multiple_synths(1, handlePtr, kBufferSize, midiEventsPtr, midiEventCountPtr);

  902.                 }

  903.                 else

  904.                     descriptor->run_synth(handle, kBufferSize, midiEvents, midiEventCount);

  905.             }

  906.             else

  907.                 ldescriptor->run(handle, kBufferSize);

  908. 

  909.             if (ldescriptor->deactivate != nullptr)

  910.                 ldescriptor->deactivate(handle);

  911. 

  912.             ldescriptor->cleanup(handle);

  913. 

  914.             // end crash-free plugin test

  915.             // -----------------------------------------------------------------------

  916.         }

  917. 

  918.         DISCOVERY_OUT("init", "-----------");

  919.         DISCOVERY_OUT("name", ldescriptor->Name);

  920.         DISCOVERY_OUT("label", ldescriptor->Label);

  921.         DISCOVERY_OUT("maker", ldescriptor->Maker);

  922.         DISCOVERY_OUT("copyright", ldescriptor->Copyright);

  923.         DISCOVERY_OUT("uniqueId", ldescriptor->UniqueID);

  924.         DISCOVERY_OUT("hints", hints);

  925.         DISCOVERY_OUT("audio.ins", audioIns);

  926.         DISCOVERY_OUT("audio.outs", audioOuts);

  927.         DISCOVERY_OUT("audio.total", audioTotal);

  928.         DISCOVERY_OUT("midi.ins", midiIns);

  929.         DISCOVERY_OUT("midi.total", midiTotal);

  930.         DISCOVERY_OUT("parameters.ins", parametersIns);

  931.         DISCOVERY_OUT("parameters.outs", parametersOuts);

  932.         DISCOVERY_OUT("parameters.total", parametersTotal);

  933.         DISCOVERY_OUT("programs.total", programsTotal);

  934.         DISCOVERY_OUT("build", BINARY_NATIVE);

  935.         DISCOVERY_OUT("end", "------------");

  936.     }

  937. #else

  938.     DISCOVERY_OUT("error", "DSSI support not available");

  939.     return;

  940. 

  941.     // unused

  942.     (void)libHandle;

  943.     (void)filename;

  944.     (void)init;

  945. #endif

  946. }

  947. 

  948. void do_lv2_check(const char* const bundle, const bool init)

  949. {

  950. #ifdef WANT_LV2

  951.     Lv2WorldClass& lv2World(Lv2WorldClass::getInstance());

  952. 

  953.     // Convert bundle filename to URI

  954.     const size_t bundleSize(std::strlen(bundle)+8);

  955.     char bundleURI[bundleSize];

  956.     std::strcpy(bundleURI, "file://");

  957.     std::strcat(bundleURI, bundle);

  958. 

  959.     bundleURI[bundleSize-1] = OS_SEP;

  960.     bundleURI[bundleSize]   = '\0';

  961. 

  962.     // Load bundle

  963.     Lilv::Node lilvBundle(lv2World.new_uri(bundleURI));

  964.     lv2World.load_bundle(lilvBundle);

  965. 

  966.     // Load plugins in this bundle

  967.     const Lilv::Plugins lilvPlugins(lv2World.get_all_plugins());

  968. 

  969.     // Get all plugin URIs in this bundle

  970.     juce::StringArray URIs;

  971. 

  972.     LILV_FOREACH(plugins, i, lilvPlugins)

  973.     {

  974.         Lilv::Plugin lilvPlugin(lilv_plugins_get(lilvPlugins, i));

  975. 

  976.         if (const char* const uri = lilvPlugin.get_uri().as_string())

  977.             URIs.add(juce::String(uri));

  978.     }

  979. 

  980.     if (URIs.size() == 0)

  981.     {

  982.         DISCOVERY_OUT("warning", "LV2 Bundle doesn't provide any plugins");

  983.         return;

  984.     }

  985. 

  986.     // Get & check every plugin-instance

  987.     for (juce::String* it = URIs.begin(); it != URIs.end(); ++it)

  988.     {

  989.         const LV2_RDF_Descriptor* const rdfDescriptor(lv2_rdf_new(it->toRawUTF8(), false));

  990. 

  991.         if (rdfDescriptor == nullptr || rdfDescriptor->URI == nullptr)

  992.         {

  993.             DISCOVERY_OUT("error", "Failed to find LV2 plugin '" << it->toRawUTF8() << "'");

  994.             continue;

  995.         }

  996. 

  997.         if (init)

  998.         {

  999.             // test if DLL is loadable, twice

  1000.             void* const libHandle1 = lib_open(rdfDescriptor->Binary);

  1001. 

  1002.             if (libHandle1 == nullptr)

  1003.             {

  1004.                 print_lib_error(rdfDescriptor->Binary);

  1005.                 delete rdfDescriptor;

  1006.                 continue;

  1007.             }

  1008. 

  1009.             lib_close(libHandle1);

  1010. 

  1011.             void* const libHandle2 = lib_open(rdfDescriptor->Binary);

  1012. 

  1013.             if (libHandle2 == nullptr)

  1014.             {

  1015.                 print_lib_error(rdfDescriptor->Binary);

  1016.                 delete rdfDescriptor;

  1017.                 continue;

  1018.             }

  1019. 

  1020.             lib_close(libHandle2);

  1021.         }

  1022. 

  1023.         // test if we support all required ports and features

  1024.         {

  1025.             bool supported = true;

  1026. 

  1027.             for (uint32_t j=0; j < rdfDescriptor->PortCount && supported; ++j)

  1028.             {

  1029.                 const LV2_RDF_Port* const rdfPort = &rdfDescriptor->Ports[j];

  1030. 

  1031.                 if (is_lv2_port_supported(rdfPort->Types))

  1032.                 {

  1033.                     pass();

  1034.                 }

  1035.                 else if (! LV2_IS_PORT_OPTIONAL(rdfPort->Properties))

  1036.                 {

  1037.                     DISCOVERY_OUT("error", "Plugin '" << rdfDescriptor->URI << "' requires a non-supported port type (portName: '" << rdfPort->Name << "')");

  1038.                     supported = false;

  1039.                     break;

  1040.                 }

  1041.             }

  1042. 

  1043.             for (uint32_t j=0; j < rdfDescriptor->FeatureCount && supported; ++j)

  1044.             {

  1045.                 const LV2_RDF_Feature* const rdfFeature = &rdfDescriptor->Features[j];

  1046. 

  1047.                 if (is_lv2_feature_supported(rdfFeature->URI))

  1048.                 {

  1049.                     pass();

  1050.                 }

  1051.                 else if (LV2_IS_FEATURE_REQUIRED(rdfFeature->Type))

  1052.                 {

  1053.                     DISCOVERY_OUT("error", "Plugin '" << rdfDescriptor->URI << "' requires a non-supported feature '" << rdfFeature->URI << "'");

  1054.                     supported = false;

  1055.                     break;

  1056.                 }

  1057.             }

  1058. 

  1059.             if (! supported)

  1060.             {

  1061.                 delete rdfDescriptor;

  1062.                 continue;

  1063.             }

  1064.         }

  1065. 

  1066.         int hints = 0;

  1067.         int audioIns = 0;

  1068.         int audioOuts = 0;

  1069.         int audioTotal = 0;

  1070.         int midiIns = 0;

  1071.         int midiOuts = 0;

  1072.         int midiTotal = 0;

  1073.         int parametersIns = 0;

  1074.         int parametersOuts = 0;

  1075.         int parametersTotal = 0;

  1076.         int programsTotal = rdfDescriptor->PresetCount;

  1077. 

  1078.         for (uint32_t j=0; j < rdfDescriptor->FeatureCount; ++j)

  1079.         {

  1080.             const LV2_RDF_Feature* const rdfFeature = &rdfDescriptor->Features[j];

  1081. 

  1082.             if (std::strcmp(rdfFeature->URI, LV2_CORE__hardRTCapable) == 0)

  1083.                 hints |= PLUGIN_IS_RTSAFE;

  1084.         }

  1085. 

  1086.         for (uint32_t j=0; j < rdfDescriptor->PortCount; ++j)

  1087.         {

  1088.             const LV2_RDF_Port* const rdfPort = &rdfDescriptor->Ports[j];

  1089. 

  1090.             if (LV2_IS_PORT_AUDIO(rdfPort->Types))

  1091.             {

  1092.                 if (LV2_IS_PORT_INPUT(rdfPort->Types))

  1093.                     audioIns += 1;

  1094.                 else if (LV2_IS_PORT_OUTPUT(rdfPort->Types))

  1095.                     audioOuts += 1;

  1096. 

  1097.                 audioTotal += 1;

  1098.             }

  1099.             else if (LV2_IS_PORT_CONTROL(rdfPort->Types))

  1100.             {

  1101.                 if (LV2_IS_PORT_DESIGNATION_LATENCY(rdfPort->Designation))

  1102.                 {

  1103.                     pass();

  1104.                 }

  1105.                 else if (LV2_IS_PORT_DESIGNATION_SAMPLE_RATE(rdfPort->Designation))

  1106.                 {

  1107.                     pass();

  1108.                 }

  1109.                 else if (LV2_IS_PORT_DESIGNATION_FREEWHEELING(rdfPort->Designation))

  1110.                 {

  1111.                     pass();

  1112.                 }

  1113.                 else if (LV2_IS_PORT_DESIGNATION_TIME(rdfPort->Designation))

  1114.                 {

  1115.                     pass();

  1116.                 }

  1117.                 else

  1118.                 {

  1119.                     if (LV2_IS_PORT_INPUT(rdfPort->Types))

  1120.                         parametersIns += 1;

  1121.                     else if (LV2_IS_PORT_OUTPUT(rdfPort->Types))

  1122.                         parametersOuts += 1;

  1123. 

  1124.                     parametersTotal += 1;

  1125.                 }

  1126.             }

  1127.             else if (LV2_PORT_SUPPORTS_MIDI_EVENT(rdfPort->Types))

  1128.             {

  1129.                 if (LV2_IS_PORT_INPUT(rdfPort->Types))

  1130.                     midiIns += 1;

  1131.                 else if (LV2_IS_PORT_OUTPUT(rdfPort->Types))

  1132.                     midiOuts += 1;

  1133. 

  1134.                 midiTotal += 1;

  1135.             }

  1136.         }

  1137. 

  1138.         if (rdfDescriptor->Type[1] & LV2_PLUGIN_INSTRUMENT)

  1139.             hints |= PLUGIN_IS_SYNTH;

  1140. 

  1141.         if (rdfDescriptor->UICount > 0)

  1142.             hints |= PLUGIN_HAS_GUI;

  1143. 

  1144.         DISCOVERY_OUT("init", "-----------");

  1145.         DISCOVERY_OUT("uri", rdfDescriptor->URI);

  1146.         if (rdfDescriptor->Name != nullptr)

  1147.             DISCOVERY_OUT("name", rdfDescriptor->Name);

  1148.         if (rdfDescriptor->Author != nullptr)

  1149.             DISCOVERY_OUT("maker", rdfDescriptor->Author);

  1150.         if (rdfDescriptor->License != nullptr)

  1151.             DISCOVERY_OUT("copyright", rdfDescriptor->License);

  1152.         DISCOVERY_OUT("uniqueId", rdfDescriptor->UniqueID);

  1153.         DISCOVERY_OUT("hints", hints);

  1154.         DISCOVERY_OUT("audio.ins", audioIns);

  1155.         DISCOVERY_OUT("audio.outs", audioOuts);

  1156.         DISCOVERY_OUT("audio.total", audioTotal);

  1157.         DISCOVERY_OUT("midi.ins", midiIns);

  1158.         DISCOVERY_OUT("midi.outs", midiOuts);

  1159.         DISCOVERY_OUT("midi.total", midiTotal);

  1160.         DISCOVERY_OUT("parameters.ins", parametersIns);

  1161.         DISCOVERY_OUT("parameters.outs", parametersOuts);

  1162.         DISCOVERY_OUT("parameters.total", parametersTotal);

  1163.         DISCOVERY_OUT("programs.total", programsTotal);

  1164.         DISCOVERY_OUT("build", BINARY_NATIVE);

  1165.         DISCOVERY_OUT("end", "------------");

  1166. 

  1167.         delete rdfDescriptor;

  1168.     }

  1169. #else

  1170.     DISCOVERY_OUT("error", "LV2 support not available");

  1171.     return;

  1172. 

  1173.     // unused

  1174.     (void)bundle;

  1175.     (void)init;

  1176. #endif

  1177. }

  1178. 

  1179. void do_vst_check(void*& libHandle, const bool init)

  1180. {

  1181. #ifdef WANT_VST

  1182.     VST_Function vstFn = (VST_Function)lib_symbol(libHandle, "VSTPluginMain");

  1183. 

  1184.     if (vstFn == nullptr)

  1185.     {

  1186.         vstFn = (VST_Function)lib_symbol(libHandle, "main");

  1187. 

  1188.         if (vstFn == nullptr)

  1189.         {

  1190.             DISCOVERY_OUT("error", "Not a VST plugin");

  1191.             return;

  1192.         }

  1193.     }

  1194. 

  1195.     AEffect* const effect = vstFn(vstHostCallback);

  1196. 

  1197.     if (effect == nullptr || effect->magic != kEffectMagic)

  1198.     {

  1199.         DISCOVERY_OUT("error", "Failed to init VST plugin, or VST magic failed");

  1200.         return;

  1201.     }

  1202. 

  1203.     if (effect->uniqueID == 0)

  1204.     {

  1205.         DISCOVERY_OUT("error", "Plugin doesn't have an Unique ID");

  1206.         effect->dispatcher(effect, effClose, 0, 0, nullptr, 0.0f);

  1207.         return;

  1208.     }

  1209. 

  1210.     gVstCurrentUniqueId = effect->uniqueID;

  1211. 

  1212.     effect->dispatcher(effect, DECLARE_VST_DEPRECATED(effIdentify), 0, 0, nullptr, 0.0f);

  1213.     effect->dispatcher(effect, DECLARE_VST_DEPRECATED(effSetBlockSizeAndSampleRate), 0, kBufferSize, nullptr, kSampleRate);

  1214.     effect->dispatcher(effect, effSetSampleRate, 0, 0, nullptr, kSampleRate);

  1215.     effect->dispatcher(effect, effSetBlockSize, 0, kBufferSize, nullptr, 0.0f);

  1216.     effect->dispatcher(effect, effSetProcessPrecision, 0, kVstProcessPrecision32, nullptr, 0.0f);

  1217. 

  1218.     effect->dispatcher(effect, effOpen, 0, 0, nullptr, 0.0f);

  1219.     effect->dispatcher(effect, effSetProgram, 0, 0, nullptr, 0.0f);

  1220. 

  1221.     char strBuf[STR_MAX+1];

  1222.     CarlaString cName;

  1223.     CarlaString cProduct;

  1224.     CarlaString cVendor;

  1225. 

  1226.     const intptr_t vstCategory = effect->dispatcher(effect, effGetPlugCategory, 0, 0, nullptr, 0.0f);

  1227. 

  1228.     //for (int32_t i = effect->numInputs;  --i >= 0;) effect->dispatcher(effect, DECLARE_VST_DEPRECATED(effConnectInput),  i, 1, 0, 0);

  1229.     //for (int32_t i = effect->numOutputs; --i >= 0;) effect->dispatcher(effect, DECLARE_VST_DEPRECATED(effConnectOutput), i, 1, 0, 0);

  1230. 

  1231.     carla_zeroChar(strBuf, STR_MAX+1);

  1232. 

  1233.     if (effect->dispatcher(effect, effGetVendorString, 0, 0, strBuf, 0.0f) == 1)

  1234.         cVendor = strBuf;

  1235. 

  1236.     carla_zeroChar(strBuf, STR_MAX+1);

  1237. 

  1238.     if (vstCategory == kPlugCategShell)

  1239.     {

  1240.         gVstCurrentUniqueId = effect->dispatcher(effect, effShellGetNextPlugin, 0, 0, strBuf, 0.0f);

  1241. 

  1242.         CARLA_SAFE_ASSERT_RETURN(gVstCurrentUniqueId != 0,);

  1243.         cName = strBuf;

  1244.     }

  1245.     else

  1246.     {

  1247.         if (effect->dispatcher(effect, effGetEffectName, 0, 0, strBuf, 0.0f) == 1)

  1248.             cName = strBuf;

  1249.     }

  1250. 

  1251.     for (;;)

  1252.     {

  1253.         carla_zeroChar(strBuf, STR_MAX+1);

  1254. 

  1255.         if (effect->dispatcher(effect, effGetProductString, 0, 0, strBuf, 0.0f) == 1)

  1256.             cProduct = strBuf;

  1257.         else

  1258.             cProduct.clear();

  1259. 

  1260.         int hints = 0x0;

  1261.         int audioIns = effect->numInputs;

  1262.         int audioOuts = effect->numOutputs;

  1263.         int audioTotal = audioIns + audioOuts;

  1264.         int midiIns = 0;

  1265.         int midiOuts = 0;

  1266.         int midiTotal = 0;

  1267.         int parametersIns = effect->numParams;

  1268.         int parametersTotal = parametersIns;

  1269.         int programsTotal = effect->numPrograms;

  1270. 

  1271.         if (effect->flags & effFlagsHasEditor)

  1272.             hints |= PLUGIN_HAS_GUI;

  1273. 

  1274.         if (effect->flags & effFlagsIsSynth)

  1275.             hints |= PLUGIN_IS_SYNTH;

  1276. 

  1277.         if (vstPluginCanDo(effect, "receiveVstEvents") || vstPluginCanDo(effect, "receiveVstMidiEvent") || (effect->flags & effFlagsIsSynth) != 0)

  1278.             midiIns = 1;

  1279. 

  1280.         if (vstPluginCanDo(effect, "sendVstEvents") || vstPluginCanDo(effect, "sendVstMidiEvent"))

  1281.             midiOuts = 1;

  1282. 

  1283.         midiTotal = midiIns + midiOuts;

  1284. 

  1285.         // -----------------------------------------------------------------------

  1286.         // start crash-free plugin test

  1287. 

  1288.         if (init)

  1289.         {

  1290.             if (gVstNeedsIdle)

  1291.                 effect->dispatcher(effect, DECLARE_VST_DEPRECATED(effIdle), 0, 0, nullptr, 0.0f);

  1292. 

  1293.             effect->dispatcher(effect, effMainsChanged, 0, 1, nullptr, 0.0f);

  1294.             effect->dispatcher(effect, effStartProcess, 0, 0, nullptr, 0.0f);

  1295. 

  1296.             if (gVstNeedsIdle)

  1297.                 effect->dispatcher(effect, DECLARE_VST_DEPRECATED(effIdle), 0, 0, nullptr, 0.0f);

  1298. 

  1299.             // Plugin might call wantMidi() during resume

  1300.             if (midiIns == 0 && gVstWantsMidi)

  1301.             {

  1302.                 midiIns = 1;

  1303.                 midiTotal = midiIns + midiOuts;

  1304.             }

  1305. 

  1306.             float* bufferAudioIn[audioIns];

  1307.             for (int j=0; j < audioIns; ++j)

  1308.             {

  1309.                 bufferAudioIn[j] = new float[kBufferSize];

  1310.                 FloatVectorOperations::clear(bufferAudioIn[j], kBufferSize);

  1311.             }

  1312. 

  1313.             float* bufferAudioOut[audioOuts];

  1314.             for (int j=0; j < audioOuts; ++j)

  1315.             {

  1316.                 bufferAudioOut[j] = new float[kBufferSize];

  1317.                 FloatVectorOperations::clear(bufferAudioOut[j], kBufferSize);

  1318.             }

  1319. 

  1320.             struct VstEventsFixed {

  1321.                 int32_t numEvents;

  1322.                 intptr_t reserved;

  1323.                 VstEvent* data[2];

  1324. 

  1325.                 VstEventsFixed()

  1326.                     : numEvents(0),

  1327.                       reserved(0)

  1328.                 {

  1329.                     data[0] = data[1] = nullptr;

  1330.                 }

  1331.             } events;

  1332. 

  1333.             VstMidiEvent midiEvents[2];

  1334.             carla_zeroStruct<VstMidiEvent>(midiEvents, 2);

  1335. 

  1336.             midiEvents[0].type = kVstMidiType;

  1337.             midiEvents[0].byteSize = sizeof(VstMidiEvent);

  1338.             midiEvents[0].midiData[0] = MIDI_STATUS_NOTE_ON;

  1339.             midiEvents[0].midiData[1] = 64;

  1340.             midiEvents[0].midiData[2] = 100;

  1341. 

  1342.             midiEvents[1].type = kVstMidiType;

  1343.             midiEvents[1].byteSize = sizeof(VstMidiEvent);

  1344.             midiEvents[1].midiData[0] = MIDI_STATUS_NOTE_OFF;

  1345.             midiEvents[1].midiData[1] = 64;

  1346.             midiEvents[1].deltaFrames = kBufferSize/2;

  1347. 

  1348.             events.numEvents = 2;

  1349.             events.data[0] = (VstEvent*)&midiEvents[0];

  1350.             events.data[1] = (VstEvent*)&midiEvents[1];

  1351. 

  1352.             // processing

  1353.             gVstIsProcessing = true;

  1354. 

  1355.             if (midiIns > 0)

  1356.                 effect->dispatcher(effect, effProcessEvents, 0, 0, &events, 0.0f);

  1357. 

  1358.             if ((effect->flags & effFlagsCanReplacing) > 0 && effect->processReplacing != nullptr && effect->processReplacing != effect->DECLARE_VST_DEPRECATED(process))

  1359.                 effect->processReplacing(effect, bufferAudioIn, bufferAudioOut, kBufferSize);

  1360.             else if (effect->DECLARE_VST_DEPRECATED(process) != nullptr)

  1361.                 effect->DECLARE_VST_DEPRECATED(process)(effect, bufferAudioIn, bufferAudioOut, kBufferSize);

  1362.             else

  1363.                 DISCOVERY_OUT("error", "Plugin doesn't have a process function");

  1364. 

  1365.             gVstIsProcessing = false;

  1366. 

  1367.             effect->dispatcher(effect, effStopProcess, 0, 0, nullptr, 0.0f);

  1368.             effect->dispatcher(effect, effMainsChanged, 0, 0, nullptr, 0.0f);

  1369. 

  1370.             if (gVstNeedsIdle)

  1371.                 effect->dispatcher(effect, DECLARE_VST_DEPRECATED(effIdle), 0, 0, nullptr, 0.0f);

  1372. 

  1373.             for (int j=0; j < audioIns; ++j)

  1374.                 delete[] bufferAudioIn[j];

  1375.             for (int j=0; j < audioOuts; ++j)

  1376.                 delete[] bufferAudioOut[j];

  1377.         }

  1378. 

  1379.         // end crash-free plugin test

  1380.         // -----------------------------------------------------------------------

  1381. 

  1382.         DISCOVERY_OUT("init", "-----------");

  1383.         DISCOVERY_OUT("name", (const char*)cName);

  1384.         DISCOVERY_OUT("label", (const char*)cProduct);

  1385.         DISCOVERY_OUT("maker", (const char*)cVendor);

  1386.         DISCOVERY_OUT("copyright", (const char*)cVendor);

  1387.         DISCOVERY_OUT("uniqueId", gVstCurrentUniqueId);

  1388.         DISCOVERY_OUT("hints", hints);

  1389.         DISCOVERY_OUT("audio.ins", audioIns);

  1390.         DISCOVERY_OUT("audio.outs", audioOuts);

  1391.         DISCOVERY_OUT("audio.total", audioTotal);

  1392.         DISCOVERY_OUT("midi.ins", midiIns);

  1393.         DISCOVERY_OUT("midi.outs", midiOuts);

  1394.         DISCOVERY_OUT("midi.total", midiTotal);

  1395.         DISCOVERY_OUT("parameters.ins", parametersIns);

  1396.         DISCOVERY_OUT("parameters.total", parametersTotal);

  1397.         DISCOVERY_OUT("programs.total", programsTotal);

  1398.         DISCOVERY_OUT("build", BINARY_NATIVE);

  1399.         DISCOVERY_OUT("end", "------------");

  1400. 

  1401.         if (vstCategory != kPlugCategShell)

  1402.             break;

  1403. 

  1404.         gVstWantsMidi = false;

  1405.         gVstWantsTime = false;

  1406. 

  1407.         carla_zeroChar(strBuf, STR_MAX+1);

  1408. 

  1409.         gVstCurrentUniqueId = effect->dispatcher(effect, effShellGetNextPlugin, 0, 0, strBuf, 0.0f);

  1410. 

  1411.         if (gVstCurrentUniqueId != 0)

  1412.             cName = strBuf;

  1413.         else

  1414.             break;

  1415.     }

  1416. 

  1417.     if (gVstNeedsIdle)

  1418.         effect->dispatcher(effect, DECLARE_VST_DEPRECATED(effIdle), 0, 0, nullptr, 0.0f);

  1419. 

  1420.     effect->dispatcher(effect, effClose, 0, 0, nullptr, 0.0f);

  1421. 

  1422. #else

  1423.     DISCOVERY_OUT("error", "VST support not available");

  1424.     return;

  1425. 

  1426.     // unused

  1427.     (void)libHandle;

  1428.     (void)init;

  1429. #endif

  1430. }

  1431. 

  1432. void do_fluidsynth_check(const char* const filename, const bool init)

  1433. {

  1434. #ifdef WANT_FLUIDSYNTH

  1435.     if (! fluid_is_soundfont(filename))

  1436.     {

  1437.         DISCOVERY_OUT("error", "Not a SF2 file");

  1438.         return;

  1439.     }

  1440. 

  1441.     int programs = 0;

  1442. 

  1443.     if (init)

  1444.     {

  1445.         fluid_settings_t* const f_settings = new_fluid_settings();

  1446.         fluid_synth_t* const f_synth = new_fluid_synth(f_settings);

  1447.         const int f_id = fluid_synth_sfload(f_synth, filename, 0);

  1448. 

  1449.         if (f_id < 0)

  1450.         {

  1451.             DISCOVERY_OUT("error", "Failed to load SF2 file");

  1452.             return;

  1453.         }

  1454. 

  1455.         fluid_sfont_t* f_sfont;

  1456.         fluid_preset_t f_preset;

  1457. 

  1458.         f_sfont = fluid_synth_get_sfont_by_id(f_synth, f_id);

  1459. 

  1460.         f_sfont->iteration_start(f_sfont);

  1461.         while (f_sfont->iteration_next(f_sfont, &f_preset))

  1462.             programs += 1;

  1463. 

  1464.         delete_fluid_synth(f_synth);

  1465.         delete_fluid_settings(f_settings);

  1466.     }

  1467. 

  1468. #ifdef CARLA_OS_WIN

  1469.     int sep = '\\';

  1470. #else

  1471.     int sep = '/';

  1472. #endif

  1473. 

  1474.     CarlaString name(std::strrchr(filename, sep)+1);

  1475.     name.truncate(name.rfind('.'));

  1476. 

  1477.     CarlaString label(name);

  1478. 

  1479.     // 2 channels

  1480.     DISCOVERY_OUT("init", "-----------");

  1481.     DISCOVERY_OUT("name", (const char*)name);

  1482.     DISCOVERY_OUT("label", (const char*)label);

  1483.     DISCOVERY_OUT("maker", "");

  1484.     DISCOVERY_OUT("copyright", "");

  1485.     DISCOVERY_OUT("hints", PLUGIN_IS_SYNTH);

  1486.     DISCOVERY_OUT("audio.outs", 2);

  1487.     DISCOVERY_OUT("audio.total", 2);

  1488.     DISCOVERY_OUT("midi.ins", 1);

  1489.     DISCOVERY_OUT("midi.total", 1);

  1490.     DISCOVERY_OUT("programs.total", programs);

  1491.     DISCOVERY_OUT("parameters.ins", 13); // defined in Carla

  1492.     DISCOVERY_OUT("parameters.outs", 1);

  1493.     DISCOVERY_OUT("parameters.total", 14);

  1494.     DISCOVERY_OUT("build", BINARY_NATIVE);

  1495.     DISCOVERY_OUT("end", "------------");

  1496. 

  1497.     // 16 channels

  1498.     if (name.isNotEmpty())

  1499.         name += " (16 outputs)";

  1500. 

  1501.     DISCOVERY_OUT("init", "-----------");

  1502.     DISCOVERY_OUT("name", "");

  1503.     DISCOVERY_OUT("name", (const char*)name);

  1504.     DISCOVERY_OUT("label", (const char*)label);

  1505.     DISCOVERY_OUT("copyright", "");

  1506.     DISCOVERY_OUT("hints", PLUGIN_IS_SYNTH);

  1507.     DISCOVERY_OUT("audio.outs", 32);

  1508.     DISCOVERY_OUT("audio.total", 32);

  1509.     DISCOVERY_OUT("midi.ins", 1);

  1510.     DISCOVERY_OUT("midi.total", 1);

  1511.     DISCOVERY_OUT("programs.total", programs);

  1512.     DISCOVERY_OUT("parameters.ins", 13); // defined in Carla

  1513.     DISCOVERY_OUT("parameters.outs", 1);

  1514.     DISCOVERY_OUT("parameters.total", 14);

  1515.     DISCOVERY_OUT("build", BINARY_NATIVE);

  1516.     DISCOVERY_OUT("end", "------------");

  1517. #else

  1518.     DISCOVERY_OUT("error", "SF2 support not available");

  1519.     return;

  1520. 

  1521.     // unused

  1522.     (void)filename;

  1523.     (void)init;

  1524. #endif

  1525. }

  1526. 

  1527. void do_linuxsampler_check(const char* const filename, const char* const stype, const bool init)

  1528. {

  1529. #ifdef WANT_LINUXSAMPLER

  1530.     const juce::File file(filename);

  1531. 

  1532.     if (! file.existsAsFile())

  1533.     {

  1534.         DISCOVERY_OUT("error", "Requested file is not valid or does not exist");

  1535.         return;

  1536.     }

  1537. 

  1538.     if (init)

  1539.         const LinuxSamplerScopedEngine engine(filename, stype);

  1540.     else

  1541.         LinuxSamplerScopedEngine::outputInfo(nullptr, 0, file.getFileNameWithoutExtension().toRawUTF8());

  1542. #else

  1543.     DISCOVERY_OUT("error", stype << " support not available");

  1544.     return;

  1545. 

  1546.     // unused

  1547.     (void)filename;

  1548.     (void)init;

  1549. #endif

  1550. }

  1551. 

  1552. // --------------------------------------------------------------------------

  1553. 

  1554. class ScopedWorkingDirSet

  1555. {

  1556. public:

  1557.     ScopedWorkingDirSet(const char* const filename)

  1558.         : fPreviousWorkingDirectory(File::getCurrentWorkingDirectory())

  1559.     {

  1560.         File(filename).getParentDirectory().setAsCurrentWorkingDirectory();

  1561.     }

  1562. 

  1563.     ~ScopedWorkingDirSet()

  1564.     {

  1565.         fPreviousWorkingDirectory.setAsCurrentWorkingDirectory();

  1566.     }

  1567. 

  1568. private:

  1569.     const File fPreviousWorkingDirectory;

  1570. };

  1571. 

  1572. // ------------------------------ main entry point ------------------------------

  1573. 

  1574. int main(int argc, char* argv[])

  1575. {

  1576.     if (argc == 2 && std::strcmp(argv[1], "-formats") == 0)

  1577.     {

  1578.         printf("Available plugin formats:\n");

  1579.         printf("LADSPA: ");

  1580. #ifdef WANT_LADSPA

  1581.         printf("yes\n");

  1582. #else

  1583.         printf("no\n");

  1584. #endif

  1585.         printf("DSSI:   ");

  1586. #ifdef WANT_DSSI

  1587.         printf("yes\n");

  1588. #else

  1589.         printf("no\n");

  1590. #endif

  1591.         printf("LV2:    ");

  1592. #ifdef WANT_LV2

  1593.         printf("yes\n");

  1594. #else

  1595.         printf("no\n");

  1596. #endif

  1597.         printf("VST:    ");

  1598. #ifdef WANT_VST

  1599.         printf("yes\n");

  1600. #else

  1601.         printf("no\n");

  1602. #endif

  1603.         printf("\n");

  1604. 

  1605.         printf("Available sampler formats:\n");

  1606.         printf("GIG (LinuxSampler): ");

  1607. #ifdef WANT_LINUXSAMPLER

  1608.         printf("yes\n");

  1609. #else

  1610.         printf("no\n");

  1611. #endif

  1612.         printf("SF2 (FluidSynth):   ");

  1613. #ifdef WANT_FLUIDSYNTH

  1614.         printf("yes\n");

  1615. #else

  1616.         printf("no\n");

  1617. #endif

  1618.         printf("SFZ (LinuxSampler): ");

  1619. #ifdef WANT_LINUXSAMPLER

  1620.         printf("yes\n");

  1621. #else

  1622.         printf("no\n");

  1623. #endif

  1624.         return 0;

  1625.     }

  1626. 

  1627.     if (argc != 3)

  1628.     {

  1629.         carla_stdout("usage: %s <type> </path/to/plugin>", argv[0]);

  1630.         return 1;

  1631.     }

  1632. 

  1633.     const char* const stype    = argv[1];

  1634.     const char* const filename = argv[2];

  1635.     const PluginType  type     = getPluginTypeFromString(stype);

  1636. 

  1637.     const ScopedWorkingDirSet swds(filename);

  1638. 

  1639.     bool openLib = false;

  1640.     void* handle = nullptr;

  1641. 

  1642.     switch (type)

  1643.     {

  1644.     case PLUGIN_LADSPA:

  1645.     case PLUGIN_DSSI:

  1646.     case PLUGIN_VST:

  1647.     case PLUGIN_AU:

  1648.         openLib = true;

  1649.     default:

  1650.         break;

  1651.     }

  1652. 

  1653.     if (openLib)

  1654.     {

  1655.         handle = lib_open(filename);

  1656. 

  1657.         if (handle == nullptr)

  1658.         {

  1659.             print_lib_error(filename);

  1660.             return 1;

  1661.         }

  1662. 

  1663.         CarlaString filenameStr(filename);

  1664.         filenameStr.toLower();

  1665. 

  1666.         if (filenameStr.contains("fluidsynth", true))

  1667.         {

  1668.             DISCOVERY_OUT("info", "skipping fluidsynth based plugin");

  1669.             return 0;

  1670.         }

  1671.         if (filenameStr.contains("linuxsampler", true) || filenameStr.endsWith("ls16.so"))

  1672.         {

  1673.             DISCOVERY_OUT("info", "skipping linuxsampler based plugin");

  1674.             return 0;

  1675.         }

  1676.     }

  1677. 

  1678.     // never do init for dssi-vst, takes too long and it's crashy

  1679.     bool doInit = ! filenameStr.contains("dssi-vst", true);

  1680. 

  1681.     if (doInit && getenv("CARLA_DISCOVERY_NO_PROCESSING_CHECKS") != nullptr)

  1682.         doInit = false;

  1683. 

  1684.     if (doInit && handle != nullptr)

  1685.     {

  1686.         // test fast loading & unloading DLL without initializing the plugin(s)

  1687.         if (! lib_close(handle))

  1688.         {

  1689.             print_lib_error(filename);

  1690.             return 1;

  1691.         }

  1692. 

  1693.         handle = lib_open(filename);

  1694. 

  1695.         if (handle == nullptr)

  1696.         {

  1697.             print_lib_error(filename);

  1698.             return 1;

  1699.         }

  1700.     }

  1701. 

  1702.     switch (type)

  1703.     {

  1704.     case PLUGIN_LADSPA:

  1705.         do_ladspa_check(handle, filename, doInit);

  1706.         break;

  1707.     case PLUGIN_DSSI:

  1708.         do_dssi_check(handle, filename, doInit);

  1709.         break;

  1710.     case PLUGIN_LV2:

  1711.         do_lv2_check(filename, doInit);

  1712.         break;

  1713.     case PLUGIN_VST:

  1714.         do_vst_check(handle, doInit);

  1715.         break;

  1716.     case PLUGIN_AU:

  1717.         //do_au_check(handle, doInit);

  1718.         break;

  1719.     case PLUGIN_CSOUND:

  1720.         //do_csound_check(handle, doInit);

  1721.         break;

  1722.     case PLUGIN_GIG:

  1723.         do_linuxsampler_check(filename, "gig", doInit);

  1724.         break;

  1725.     case PLUGIN_SF2:

  1726.         do_fluidsynth_check(filename, doInit);

  1727.         break;

  1728.     case PLUGIN_SFZ:

  1729.         do_linuxsampler_check(filename, "sfz", doInit);

  1730.         break;

  1731.     default:

  1732.         break;

  1733.     }

  1734. 

  1735.     if (openLib && handle != nullptr)

  1736.         lib_close(handle);

  1737. 

  1738.     return 0;

  1739. }