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.

1860 lines
60KB

  1. /*
  2. * Carla Standalone
  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 GPL.txt file
  16. */
  17. #include "carla_standalone.hpp"
  18. #include "carla_backend_utils.hpp"
  19. #include "carla_engine.hpp"
  20. #include "carla_plugin.hpp"
  21. #include "carla_midi.h"
  22. #include "carla_native.h"
  23. #if 0
  24. extern "C" {
  25. #include "siginfo.c"
  26. }
  27. #endif
  28. #include <QtCore/QByteArray>
  29. using CarlaBackend::CarlaEngine;
  30. using CarlaBackend::CarlaPlugin;
  31. using CarlaBackend::CallbackFunc;
  32. using CarlaBackend::EngineOptions;
  33. #if 0
  34. int main(int argc, char* argv[])
  35. {
  36. CARLA_BACKEND_USE_NAMESPACE
  37. //std::printf("%s\n", carla_get_extended_license_text());
  38. //std::printf("%i\n", carla_get_engine_driver_count());
  39. std::printf("%i\n", carla_get_internal_plugin_count());
  40. return 0;
  41. }
  42. #endif
  43. // -------------------------------------------------------------------------------------------------------------------
  44. // Single, standalone engine
  45. struct CarlaBackendStandalone {
  46. CallbackFunc callback;
  47. CarlaEngine* engine;
  48. CarlaString lastError;
  49. CarlaString procName;
  50. EngineOptions options;
  51. CarlaBackendStandalone()
  52. : callback(nullptr),
  53. engine(nullptr) {}
  54. } standalone;
  55. // -------------------------------------------------------------------------------------------------------------------
  56. const char* carla_get_extended_license_text()
  57. {
  58. qDebug("carla_get_extended_license_text()");
  59. static CarlaString retText;
  60. if (retText.isEmpty())
  61. {
  62. retText = "<p>This current Carla build is using the following features and 3rd-party code:</p>";
  63. retText += "<ul>";
  64. #ifdef WANT_LADSPA
  65. retText += "<li>LADSPA plugin support, http://www.ladspa.org/</li>";
  66. #endif
  67. #ifdef WANT_DSSI
  68. retText += "<li>DSSI plugin support, http://dssi.sourceforge.net/</li>";
  69. #endif
  70. #ifdef WANT_LV2
  71. retText += "<li>LV2 plugin support, http://lv2plug.in/</li>";
  72. #endif
  73. #ifdef WANT_VST
  74. # ifdef VESTIGE_HEADER
  75. retText += "<li>VST plugin support, using VeSTige header by Javier Serrano Polo</li>";
  76. # else
  77. retText += "<li>VST plugin support, using official VST SDK 2.4 (trademark of Steinberg Media Technologies GmbH)</li>";
  78. # endif
  79. #endif
  80. #ifdef WANT_ZYNADDSUBFX
  81. retText += "<li>ZynAddSubFX plugin code, http://zynaddsubfx.sf.net/</li>";
  82. #endif
  83. #ifdef WANT_FLUIDSYNTH
  84. retText += "<li>FluidSynth library for SF2 support, http://www.fluidsynth.org/</li>";
  85. #endif
  86. #ifdef WANT_LINUXSAMPLER
  87. retText += "<li>LinuxSampler library for GIG and SFZ support*, http://www.linuxsampler.org/</li>";
  88. #endif
  89. retText += "<li>liblo library for OSC support, http://liblo.sourceforge.net/</li>";
  90. #ifdef WANT_LV2
  91. retText += "<li>serd, sord, sratom and lilv libraries for LV2 discovery, http://drobilla.net/software/lilv/</li>";
  92. #endif
  93. #ifdef CARLA_ENGINE_RTAUDIO
  94. retText += "<li>RtAudio and RtMidi libraries for extra Audio and MIDI support, http://www.music.mcgill.ca/~gary/rtaudio/</li>";
  95. #endif
  96. retText += "</ul>";
  97. #ifdef WANT_LINUXSAMPLER
  98. retText += "<p>(*) Using LinuxSampler code in commercial hardware or software products is not allowed without prior written authorization by the authors.</p>";
  99. #endif
  100. }
  101. return retText;
  102. }
  103. // -------------------------------------------------------------------------------------------------------------------
  104. unsigned int carla_get_engine_driver_count()
  105. {
  106. qDebug("carla_get_engine_driver_count()");
  107. return CarlaEngine::getDriverCount();
  108. }
  109. const char* carla_get_engine_driver_name(unsigned int index)
  110. {
  111. qDebug("carla_get_engine_driver_name(%i)", index);
  112. return CarlaEngine::getDriverName(index);
  113. }
  114. // -------------------------------------------------------------------------------------------------------------------
  115. unsigned int carla_get_internal_plugin_count()
  116. {
  117. qDebug("carla_get_internal_plugin_count()");
  118. return CarlaPlugin::getNativePluginCount();
  119. }
  120. const CarlaNativePluginInfo* carla_get_internal_plugin_info(unsigned int internalPluginId)
  121. {
  122. qDebug("carla_get_internal_plugin_info(%i)", internalPluginId);
  123. static CarlaNativePluginInfo info;
  124. const PluginDescriptor* const nativePlugin = CarlaPlugin::getNativePluginDescriptor(internalPluginId);
  125. // as internal plugin, this must never fail
  126. CARLA_ASSERT(nativePlugin != nullptr);
  127. if (nativePlugin == nullptr)
  128. return nullptr;
  129. info.category = static_cast<CarlaPluginCategory>(nativePlugin->category);
  130. info.hints = 0x0;
  131. if (nativePlugin->hints & PLUGIN_IS_RTSAFE)
  132. info.hints |= CarlaBackend::PLUGIN_IS_RTSAFE;
  133. if (nativePlugin->hints & PLUGIN_IS_SYNTH)
  134. info.hints |= CarlaBackend::PLUGIN_IS_SYNTH;
  135. if (nativePlugin->hints & PLUGIN_HAS_GUI)
  136. info.hints |= CarlaBackend::PLUGIN_HAS_GUI;
  137. if (nativePlugin->hints & PLUGIN_USES_SINGLE_THREAD)
  138. info.hints |= CarlaBackend::PLUGIN_USES_SINGLE_THREAD;
  139. info.audioIns = nativePlugin->audioIns;
  140. info.audioOuts = nativePlugin->audioOuts;
  141. info.midiIns = nativePlugin->midiIns;
  142. info.midiOuts = nativePlugin->midiOuts;
  143. info.parameterIns = nativePlugin->parameterIns;
  144. info.parameterOuts = nativePlugin->parameterOuts;
  145. info.name = nativePlugin->name;
  146. info.label = nativePlugin->label;
  147. info.maker = nativePlugin->maker;
  148. info.copyright = nativePlugin->copyright;
  149. return &info;
  150. }
  151. // -------------------------------------------------------------------------------------------------------------------
  152. bool carla_engine_init(const char* driverName, const char* clientName)
  153. {
  154. qDebug("carla_engine_init(\"%s\", \"%s\")", driverName, clientName);
  155. CARLA_ASSERT(standalone.engine == nullptr);
  156. CARLA_ASSERT(driverName != nullptr);
  157. CARLA_ASSERT(clientName != nullptr);
  158. #if 0
  159. static bool sigInfoInitiated = false;
  160. if (! sigInfoInitiated)
  161. {
  162. setup_siginfo();
  163. sigInfoInitiated = true;
  164. }
  165. #endif
  166. standalone.engine = CarlaEngine::newDriverByName(driverName);
  167. if (standalone.engine == nullptr)
  168. {
  169. standalone.lastError = "The seleted audio driver is not available!";
  170. return false;
  171. }
  172. #ifndef Q_OS_WIN
  173. // TODO: make this an option, put somewhere else
  174. if (getenv("WINE_RT") == nullptr)
  175. {
  176. carla_setenv("WINE_RT", "15");
  177. carla_setenv("WINE_SVR_RT", "10");
  178. }
  179. #endif
  180. if (standalone.callback != nullptr)
  181. standalone.engine->setCallback(standalone.callback, nullptr);
  182. #ifndef BUILD_BRIDGE
  183. standalone.engine->setOption(CarlaBackend::OPTION_PROCESS_MODE, standalone.options.processMode, nullptr);
  184. standalone.engine->setOption(CarlaBackend::OPTION_FORCE_STEREO, standalone.options.forceStereo, nullptr);
  185. standalone.engine->setOption(CarlaBackend::OPTION_PREFER_PLUGIN_BRIDGES, standalone.options.preferPluginBridges, nullptr);
  186. standalone.engine->setOption(CarlaBackend::OPTION_PREFER_UI_BRIDGES, standalone.options.preferUiBridges, nullptr);
  187. # ifdef WANT_DSSI
  188. standalone.engine->setOption(CarlaBackend::OPTION_USE_DSSI_VST_CHUNKS, standalone.options.useDssiVstChunks, nullptr);
  189. # endif
  190. standalone.engine->setOption(CarlaBackend::OPTION_MAX_PARAMETERS, standalone.options.maxParameters, nullptr);
  191. standalone.engine->setOption(CarlaBackend::OPTION_PREFERRED_BUFFER_SIZE, standalone.options.preferredBufferSize, nullptr);
  192. standalone.engine->setOption(CarlaBackend::OPTION_PREFERRED_SAMPLE_RATE, standalone.options.preferredSampleRate, nullptr);
  193. standalone.engine->setOption(CarlaBackend::OPTION_OSC_UI_TIMEOUT, standalone.options.oscUiTimeout, nullptr);
  194. standalone.engine->setOption(CarlaBackend::OPTION_PATH_BRIDGE_NATIVE, 0, standalone.options.bridge_native);
  195. standalone.engine->setOption(CarlaBackend::OPTION_PATH_BRIDGE_POSIX32, 0, standalone.options.bridge_posix32);
  196. standalone.engine->setOption(CarlaBackend::OPTION_PATH_BRIDGE_POSIX64, 0, standalone.options.bridge_posix64);
  197. standalone.engine->setOption(CarlaBackend::OPTION_PATH_BRIDGE_WIN32, 0, standalone.options.bridge_win32);
  198. standalone.engine->setOption(CarlaBackend::OPTION_PATH_BRIDGE_WIN64, 0, standalone.options.bridge_win64);
  199. # ifdef WANT_LV2
  200. standalone.engine->setOption(CarlaBackend::OPTION_PATH_BRIDGE_LV2_GTK2, 0, standalone.options.bridge_lv2gtk2);
  201. standalone.engine->setOption(CarlaBackend::OPTION_PATH_BRIDGE_LV2_GTK3, 0, standalone.options.bridge_lv2gtk3);
  202. standalone.engine->setOption(CarlaBackend::OPTION_PATH_BRIDGE_LV2_QT4, 0, standalone.options.bridge_lv2qt4);
  203. standalone.engine->setOption(CarlaBackend::OPTION_PATH_BRIDGE_LV2_QT5, 0, standalone.options.bridge_lv2qt5);
  204. standalone.engine->setOption(CarlaBackend::OPTION_PATH_BRIDGE_LV2_COCOA, 0, standalone.options.bridge_lv2cocoa);
  205. standalone.engine->setOption(CarlaBackend::OPTION_PATH_BRIDGE_LV2_WINDOWS, 0, standalone.options.bridge_lv2win);
  206. standalone.engine->setOption(CarlaBackend::OPTION_PATH_BRIDGE_LV2_X11, 0, standalone.options.bridge_lv2qt4);
  207. # endif
  208. # ifdef WANT_VST
  209. standalone.engine->setOption(CarlaBackend::OPTION_PATH_BRIDGE_VST_COCOA, 0, standalone.options.bridge_vstcocoa);
  210. standalone.engine->setOption(CarlaBackend::OPTION_PATH_BRIDGE_VST_HWND, 0, standalone.options.bridge_vsthwnd);
  211. standalone.engine->setOption(CarlaBackend::OPTION_PATH_BRIDGE_VST_X11, 0, standalone.options.bridge_vstx11);
  212. # endif
  213. if (standalone.procName.isNotEmpty())
  214. standalone.engine->setOption(CarlaBackend::OPTION_PROCESS_NAME, 0, standalone.procName);
  215. #endif
  216. const bool initiated = standalone.engine->init(clientName);
  217. if (initiated)
  218. {
  219. standalone.lastError = "no error";
  220. }
  221. else
  222. {
  223. delete standalone.engine;
  224. standalone.engine = nullptr;
  225. }
  226. return initiated;
  227. }
  228. bool carla_engine_close()
  229. {
  230. qDebug("carla_engine_close()");
  231. CARLA_ASSERT(standalone.engine != nullptr);
  232. if (standalone.engine == nullptr)
  233. {
  234. standalone.lastError = "Engine is not started";
  235. return false;
  236. }
  237. standalone.engine->setAboutToClose();
  238. standalone.engine->removeAllPlugins();
  239. const bool closed = standalone.engine->close();
  240. delete standalone.engine;
  241. standalone.engine = nullptr;
  242. return closed;
  243. }
  244. void carla_engine_idle()
  245. {
  246. CARLA_ASSERT(standalone.engine != nullptr);
  247. if (standalone.engine != nullptr)
  248. standalone.engine->idle();
  249. }
  250. bool carla_is_engine_running()
  251. {
  252. qDebug("carla_is_engine_running()");
  253. return (standalone.engine != nullptr && standalone.engine->isRunning());
  254. }
  255. // -------------------------------------------------------------------------------------------------------------------
  256. bool carla_load_project(const char* filename)
  257. {
  258. CARLA_ASSERT(standalone.engine != nullptr);
  259. CARLA_ASSERT(filename != nullptr);
  260. if (standalone.engine != nullptr)
  261. return standalone.engine->loadProject(filename);
  262. standalone.lastError = "Engine is not started";
  263. return false;
  264. }
  265. bool carla_save_project(const char* filename)
  266. {
  267. CARLA_ASSERT(standalone.engine != nullptr);
  268. CARLA_ASSERT(filename != nullptr);
  269. if (standalone.engine != nullptr)
  270. return standalone.engine->saveProject(filename);
  271. standalone.lastError = "Engine is not started";
  272. return false;
  273. }
  274. // -------------------------------------------------------------------------------------------------------------------
  275. bool carla_add_plugin(CarlaBackend::BinaryType btype, CarlaBackend::PluginType ptype, const char* filename, const char* const name, const char* label, void* extraStuff)
  276. {
  277. qDebug("carla_add_plugin(%s, %s, \"%s\", \"%s\", \"%s\", %p)", CarlaBackend::BinaryType2Str(btype), CarlaBackend::PluginType2Str(ptype), filename, name, label, extraStuff);
  278. CARLA_ASSERT(standalone.engine != nullptr);
  279. if (standalone.engine != nullptr && standalone.engine->isRunning())
  280. return standalone.engine->addPlugin(btype, ptype, filename, name, label, extraStuff);
  281. standalone.lastError = "Engine is not started";
  282. return false;
  283. }
  284. bool carla_remove_plugin(unsigned int pluginId)
  285. {
  286. qDebug("carla_remove_plugin(%i)", pluginId);
  287. CARLA_ASSERT(standalone.engine != nullptr);
  288. if (standalone.engine != nullptr && standalone.engine->isRunning())
  289. return standalone.engine->removePlugin(pluginId);
  290. standalone.lastError = "Engine is not started";
  291. return false;
  292. }
  293. void carla_remove_all_plugins()
  294. {
  295. qDebug("carla_remove_all_plugins()");
  296. CARLA_ASSERT(standalone.engine != nullptr);
  297. if (standalone.engine != nullptr && standalone.engine->isRunning())
  298. standalone.engine->removeAllPlugins();
  299. }
  300. // -------------------------------------------------------------------------------------------------------------------
  301. const CarlaPluginInfo* carla_get_plugin_info(unsigned int pluginId)
  302. {
  303. qDebug("carla_get_plugin_info(%i)", pluginId);
  304. CARLA_ASSERT(standalone.engine != nullptr);
  305. static CarlaPluginInfo info;
  306. // reset
  307. info.type = CarlaBackend::PLUGIN_NONE;
  308. info.category = CarlaBackend::PLUGIN_CATEGORY_NONE;
  309. info.hints = 0x0;
  310. info.binary = nullptr;
  311. info.name = nullptr;
  312. info.uniqueId = 0;
  313. info.latency = 0;
  314. // cleanup
  315. if (info.label != nullptr)
  316. {
  317. delete[] info.label;
  318. info.label = nullptr;
  319. }
  320. if (info.maker != nullptr)
  321. {
  322. delete[] info.maker;
  323. info.maker = nullptr;
  324. }
  325. if (info.copyright != nullptr)
  326. {
  327. delete[] info.copyright;
  328. info.copyright = nullptr;
  329. }
  330. if (standalone.engine == nullptr)
  331. return &info;
  332. if (CarlaPlugin* const plugin = standalone.engine->getPlugin(pluginId))
  333. {
  334. char strBufLabel[STR_MAX] = { 0 };
  335. char strBufMaker[STR_MAX] = { 0 };
  336. char strBufCopyright[STR_MAX] = { 0 };
  337. info.type = plugin->type();
  338. info.category = plugin->category();
  339. info.hints = plugin->hints();
  340. info.binary = plugin->filename();
  341. info.name = plugin->name();
  342. info.uniqueId = plugin->uniqueId();
  343. info.latency = plugin->latency();
  344. plugin->getLabel(strBufLabel);
  345. info.label = carla_strdup(strBufLabel);
  346. plugin->getMaker(strBufMaker);
  347. info.maker = carla_strdup(strBufMaker);
  348. plugin->getCopyright(strBufCopyright);
  349. info.copyright = carla_strdup(strBufCopyright);
  350. return &info;
  351. }
  352. qCritical("carla_get_plugin_info(%i) - could not find plugin", pluginId);
  353. return &info;
  354. }
  355. const CarlaPortCountInfo* carla_get_audio_port_count_info(unsigned int pluginId)
  356. {
  357. qDebug("carla_get_audio_port_count_info(%i)", pluginId);
  358. CARLA_ASSERT(standalone.engine != nullptr);
  359. static CarlaPortCountInfo info;
  360. // reset
  361. info.ins = 0;
  362. info.outs = 0;
  363. info.total = 0;
  364. if (standalone.engine == nullptr)
  365. return &info;
  366. if (CarlaPlugin* const plugin = standalone.engine->getPlugin(pluginId))
  367. {
  368. info.ins = plugin->audioInCount();
  369. info.outs = plugin->audioOutCount();
  370. info.total = info.ins + info.outs;
  371. return &info;
  372. }
  373. qCritical("carla_get_audio_port_count_info(%i) - could not find plugin", pluginId);
  374. return &info;
  375. }
  376. const CarlaPortCountInfo* carla_get_midi_port_count_info(unsigned int pluginId)
  377. {
  378. qDebug("carla_get_midi_port_count_info(%i)", pluginId);
  379. CARLA_ASSERT(standalone.engine != nullptr);
  380. static CarlaPortCountInfo info;
  381. // reset
  382. info.ins = 0;
  383. info.outs = 0;
  384. info.total = 0;
  385. if (standalone.engine == nullptr)
  386. return &info;
  387. if (CarlaPlugin* const plugin = standalone.engine->getPlugin(pluginId))
  388. {
  389. info.ins = plugin->midiInCount();
  390. info.outs = plugin->midiOutCount();
  391. info.total = info.ins + info.outs;
  392. return &info;
  393. }
  394. qCritical("carla_get_midi_port_count_info(%i) - could not find plugin", pluginId);
  395. return &info;
  396. }
  397. const CarlaPortCountInfo* carla_get_parameter_count_info(unsigned int pluginId)
  398. {
  399. qDebug("carla_get_parameter_count_info(%i)", pluginId);
  400. CARLA_ASSERT(standalone.engine != nullptr);
  401. static CarlaPortCountInfo info;
  402. // reset
  403. info.ins = 0;
  404. info.outs = 0;
  405. info.total = 0;
  406. if (standalone.engine == nullptr)
  407. return &info;
  408. if (CarlaPlugin* const plugin = standalone.engine->getPlugin(pluginId))
  409. {
  410. plugin->getParameterCountInfo(&info.ins, &info.outs, &info.total);
  411. return &info;
  412. }
  413. qCritical("carla_get_parameter_count_info(%i) - could not find plugin", pluginId);
  414. return &info;
  415. }
  416. const CarlaParameterInfo* carla_get_parameter_info(unsigned int pluginId, uint32_t parameterId)
  417. {
  418. qDebug("carla_get_parameter_info(%i, %i)", pluginId, parameterId);
  419. CARLA_ASSERT(standalone.engine != nullptr);
  420. static CarlaParameterInfo info;
  421. // reset
  422. info.scalePointCount = 0;
  423. // cleanup
  424. if (info.name != nullptr)
  425. {
  426. delete[] (void*)info.name;
  427. info.name = nullptr;
  428. }
  429. if (info.symbol != nullptr)
  430. {
  431. delete[] info.symbol;
  432. info.symbol = nullptr;
  433. }
  434. if (info.unit != nullptr)
  435. {
  436. delete[] info.unit;
  437. info.unit = nullptr;
  438. }
  439. if (standalone.engine == nullptr)
  440. return &info;
  441. if (CarlaPlugin* const plugin = standalone.engine->getPlugin(pluginId))
  442. {
  443. if (parameterId < plugin->parameterCount())
  444. {
  445. char strBufName[STR_MAX] = { 0 };
  446. char strBufSymbol[STR_MAX] = { 0 };
  447. char strBufUnit[STR_MAX] = { 0 };
  448. info.scalePointCount = plugin->parameterScalePointCount(parameterId);
  449. plugin->getParameterName(parameterId, strBufName);
  450. info.name = carla_strdup(strBufName);
  451. plugin->getParameterSymbol(parameterId, strBufSymbol);
  452. info.symbol = carla_strdup(strBufSymbol);
  453. plugin->getParameterUnit(parameterId, strBufUnit);
  454. info.unit = carla_strdup(strBufUnit);
  455. }
  456. else
  457. qCritical("carla_get_parameter_info(%i, %i) - parameterId out of bounds", pluginId, parameterId);
  458. return &info;
  459. }
  460. qCritical("carla_get_parameter_info(%i, %i) - could not find plugin", pluginId, parameterId);
  461. return &info;
  462. }
  463. const CarlaScalePointInfo* carla_get_parameter_scalepoint_info(unsigned int pluginId, uint32_t parameterId, uint32_t scalePointId)
  464. {
  465. qDebug("carla_get_parameter_scalepoint_info(%i, %i, %i)", pluginId, parameterId, scalePointId);
  466. CARLA_ASSERT(standalone.engine != nullptr);
  467. static CarlaScalePointInfo info;
  468. // reset
  469. info.value = 0.0f;
  470. // cleanup
  471. if (info.label != nullptr)
  472. {
  473. delete[] info.label;
  474. info.label = nullptr;
  475. }
  476. if (standalone.engine == nullptr)
  477. return &info;
  478. if (CarlaPlugin* const plugin = standalone.engine->getPlugin(pluginId))
  479. {
  480. if (parameterId < plugin->parameterCount())
  481. {
  482. if (scalePointId < plugin->parameterScalePointCount(parameterId))
  483. {
  484. char strBufLabel[STR_MAX] = { 0 };
  485. info.value = plugin->getParameterScalePointValue(parameterId, scalePointId);
  486. plugin->getParameterScalePointLabel(parameterId, scalePointId, strBufLabel);
  487. info.label = carla_strdup(strBufLabel);
  488. }
  489. else
  490. qCritical("carla_get_parameter_scalepoint_info(%i, %i, %i) - scalePointId out of bounds", pluginId, parameterId, scalePointId);
  491. }
  492. else
  493. qCritical("carla_get_parameter_scalepoint_info(%i, %i, %i) - parameterId out of bounds", pluginId, parameterId, scalePointId);
  494. return &info;
  495. }
  496. qCritical("carla_get_parameter_scalepoint_info(%i, %i, %i) - could not find plugin", pluginId, parameterId, scalePointId);
  497. return &info;
  498. }
  499. // -------------------------------------------------------------------------------------------------------------------
  500. const CarlaBackend::ParameterData* carla_get_parameter_data(unsigned int pluginId, uint32_t parameterId)
  501. {
  502. qDebug("carla_get_parameter_data(%i, %i)", pluginId, parameterId);
  503. CARLA_ASSERT(standalone.engine != nullptr);
  504. static CarlaBackend::ParameterData data;
  505. if (standalone.engine == nullptr)
  506. return &data;
  507. if (CarlaPlugin* const plugin = standalone.engine->getPlugin(pluginId))
  508. {
  509. if (parameterId < plugin->parameterCount())
  510. return &plugin->parameterData(parameterId);
  511. qCritical("carla_get_parameter_data(%i, %i) - parameterId out of bounds", pluginId, parameterId);
  512. return &data;
  513. }
  514. qCritical("carla_get_parameter_data(%i, %i) - could not find plugin", pluginId, parameterId);
  515. return &data;
  516. }
  517. const CarlaBackend::ParameterRanges* carla_get_parameter_ranges(unsigned int pluginId, uint32_t parameterId)
  518. {
  519. qDebug("carla_get_parameter_ranges(%i, %i)", pluginId, parameterId);
  520. CARLA_ASSERT(standalone.engine != nullptr);
  521. static CarlaBackend::ParameterRanges ranges;
  522. if (standalone.engine == nullptr)
  523. return &ranges;
  524. if (CarlaPlugin* const plugin = standalone.engine->getPlugin(pluginId))
  525. {
  526. if (parameterId < plugin->parameterCount())
  527. return &plugin->parameterRanges(parameterId);
  528. qCritical("carla_get_parameter_ranges(%i, %i) - parameterId out of bounds", pluginId, parameterId);
  529. return &ranges;
  530. }
  531. qCritical("carla_get_parameter_ranges(%i, %i) - could not find plugin", pluginId, parameterId);
  532. return &ranges;
  533. }
  534. const CarlaBackend::MidiProgramData* carla_get_midi_program_data(unsigned int pluginId, uint32_t midiProgramId)
  535. {
  536. qDebug("carla_get_midi_program_data(%i, %i)", pluginId, midiProgramId);
  537. CARLA_ASSERT(standalone.engine != nullptr);
  538. static CarlaBackend::MidiProgramData data;
  539. if (standalone.engine == nullptr)
  540. return &data;
  541. if (CarlaPlugin* const plugin = standalone.engine->getPlugin(pluginId))
  542. {
  543. if (midiProgramId < plugin->midiProgramCount())
  544. return &plugin->midiProgramData(midiProgramId);
  545. qCritical("carla_get_midi_program_data(%i, %i) - midiProgramId out of bounds", pluginId, midiProgramId);
  546. return &data;
  547. }
  548. qCritical("carla_get_midi_program_data(%i, %i) - could not find plugin", pluginId, midiProgramId);
  549. return &data;
  550. }
  551. const CarlaBackend::CustomData* carla_get_custom_data(unsigned int pluginId, uint32_t customDataId)
  552. {
  553. qDebug("carla_get_custom_data(%i, %i)", pluginId, customDataId);
  554. CARLA_ASSERT(standalone.engine != nullptr);
  555. static CarlaBackend::CustomData data;
  556. if (standalone.engine == nullptr)
  557. return &data;
  558. if (CarlaPlugin* const plugin = standalone.engine->getPlugin(pluginId))
  559. {
  560. if (customDataId < plugin->customDataCount())
  561. return &plugin->customData(customDataId);
  562. qCritical("carla_get_custom_data(%i, %i) - customDataId out of bounds", pluginId, customDataId);
  563. return &data;
  564. }
  565. qCritical("carla_get_custom_data(%i, %i) - could not find plugin", pluginId, customDataId);
  566. return &data;
  567. }
  568. const char* carla_get_chunk_data(unsigned int pluginId)
  569. {
  570. qDebug("carla_get_chunk_data(%i)", pluginId);
  571. CARLA_ASSERT(standalone.engine != nullptr);
  572. if (standalone.engine == nullptr)
  573. return nullptr;
  574. static CarlaString chunkData;
  575. // cleanup
  576. chunkData.clear();
  577. if (CarlaPlugin* const plugin = standalone.engine->getPlugin(pluginId))
  578. {
  579. if (plugin->hints() & CarlaBackend::PLUGIN_USES_CHUNKS)
  580. {
  581. void* data = nullptr;
  582. const int32_t dataSize = plugin->chunkData(&data);
  583. if (data != nullptr && dataSize >= 4)
  584. {
  585. const QByteArray chunk((const char*)data, dataSize);
  586. chunkData = chunk.toBase64().constData();
  587. }
  588. else
  589. qCritical("carla_get_chunk_data(%i) - got invalid chunk data", pluginId);
  590. }
  591. else
  592. qCritical("carla_get_chunk_data(%i) - plugin does not support chunks", pluginId);
  593. return (const char*)chunkData;
  594. }
  595. qCritical("carla_get_chunk_data(%i) - could not find plugin", pluginId);
  596. return nullptr;
  597. }
  598. // -------------------------------------------------------------------------------------------------------------------
  599. uint32_t carla_get_parameter_count(unsigned int pluginId)
  600. {
  601. qDebug("carla_get_parameter_count(%i)", pluginId);
  602. CARLA_ASSERT(standalone.engine != nullptr);
  603. if (standalone.engine == nullptr)
  604. return 0;
  605. if (CarlaPlugin* const plugin = standalone.engine->getPlugin(pluginId))
  606. return plugin->parameterCount();
  607. qCritical("carla_get_parameter_count(%i) - could not find plugin", pluginId);
  608. return 0;
  609. }
  610. uint32_t carla_get_program_count(unsigned int pluginId)
  611. {
  612. qDebug("carla_get_program_count(%i)", pluginId);
  613. CARLA_ASSERT(standalone.engine != nullptr);
  614. if (standalone.engine == nullptr)
  615. return 0;
  616. if (CarlaPlugin* const plugin = standalone.engine->getPlugin(pluginId))
  617. return plugin->programCount();
  618. qCritical("carla_get_program_count(%i) - could not find plugin", pluginId);
  619. return 0;
  620. }
  621. uint32_t carla_get_midi_program_count(unsigned int pluginId)
  622. {
  623. qDebug("carla_get_midi_program_count(%i)", pluginId);
  624. CARLA_ASSERT(standalone.engine != nullptr);
  625. if (standalone.engine == nullptr)
  626. return 0;
  627. if (CarlaPlugin* const plugin = standalone.engine->getPlugin(pluginId))
  628. return plugin->midiProgramCount();
  629. qCritical("carla_get_midi_program_count(%i) - could not find plugin", pluginId);
  630. return 0;
  631. }
  632. uint32_t carla_get_custom_data_count(unsigned int pluginId)
  633. {
  634. qDebug("carla_get_custom_data_count(%i)", pluginId);
  635. CARLA_ASSERT(standalone.engine != nullptr);
  636. if (standalone.engine == nullptr)
  637. return 0;
  638. if (CarlaPlugin* const plugin = standalone.engine->getPlugin(pluginId))
  639. return plugin->customDataCount();
  640. qCritical("carla_get_custom_data_count(%i) - could not find plugin", pluginId);
  641. return 0;
  642. }
  643. // -------------------------------------------------------------------------------------------------------------------
  644. const char* carla_get_parameter_text(unsigned int pluginId, uint32_t parameterId)
  645. {
  646. qDebug("carla_get_parameter_text(%i, %i)", pluginId, parameterId);
  647. CARLA_ASSERT(standalone.engine != nullptr);
  648. if (standalone.engine == nullptr)
  649. return nullptr;
  650. static char textBuf[STR_MAX];
  651. carla_zeroMem(textBuf, sizeof(char)*STR_MAX);
  652. if (CarlaPlugin* const plugin = standalone.engine->getPlugin(pluginId))
  653. {
  654. if (parameterId < plugin->parameterCount())
  655. {
  656. plugin->getParameterText(parameterId, textBuf);
  657. return textBuf;
  658. }
  659. qCritical("carla_get_parameter_text(%i, %i) - parameterId out of bounds", pluginId, parameterId);
  660. return nullptr;
  661. }
  662. qCritical("carla_get_parameter_text(%i, %i) - could not find plugin", pluginId, parameterId);
  663. return nullptr;
  664. }
  665. const char* carla_get_program_name(unsigned int pluginId, uint32_t programId)
  666. {
  667. qDebug("carla_get_program_name(%i, %i)", pluginId, programId);
  668. CARLA_ASSERT(standalone.engine != nullptr);
  669. if (standalone.engine == nullptr)
  670. return nullptr;
  671. static char programName[STR_MAX];
  672. carla_zeroMem(programName, sizeof(char)*STR_MAX);
  673. if (CarlaPlugin* const plugin = standalone.engine->getPlugin(pluginId))
  674. {
  675. if (programId < plugin->programCount())
  676. {
  677. plugin->getProgramName(programId, programName);
  678. return programName;
  679. }
  680. qCritical("carla_get_program_name(%i, %i) - programId out of bounds", pluginId, programId);
  681. return nullptr;
  682. }
  683. qCritical("carla_get_program_name(%i, %i) - could not find plugin", pluginId, programId);
  684. return nullptr;
  685. }
  686. const char* carla_get_midi_program_name(unsigned int pluginId, uint32_t midiProgramId)
  687. {
  688. qDebug("carla_get_midi_program_name(%i, %i)", pluginId, midiProgramId);
  689. CARLA_ASSERT(standalone.engine != nullptr);
  690. if (standalone.engine == nullptr)
  691. return nullptr;
  692. static char midiProgramName[STR_MAX];
  693. carla_zeroMem(midiProgramName, sizeof(char)*STR_MAX);
  694. if (CarlaPlugin* const plugin = standalone.engine->getPlugin(pluginId))
  695. {
  696. if (midiProgramId < plugin->midiProgramCount())
  697. {
  698. plugin->getMidiProgramName(midiProgramId, midiProgramName);
  699. return midiProgramName;
  700. }
  701. qCritical("carla_get_midi_program_name(%i, %i) - midiProgramId out of bounds", pluginId, midiProgramId);
  702. return nullptr;
  703. }
  704. qCritical("carla_get_midi_program_name(%i, %i) - could not find plugin", pluginId, midiProgramId);
  705. return nullptr;
  706. }
  707. const char* carla_get_real_plugin_name(unsigned int pluginId)
  708. {
  709. qDebug("carla_get_real_plugin_name(%i)", pluginId);
  710. CARLA_ASSERT(standalone.engine != nullptr);
  711. if (standalone.engine == nullptr)
  712. return nullptr;
  713. static char realPluginName[STR_MAX];
  714. carla_zeroMem(realPluginName, sizeof(char)*STR_MAX);
  715. if (CarlaPlugin* const plugin = standalone.engine->getPlugin(pluginId))
  716. {
  717. plugin->getRealName(realPluginName);
  718. return realPluginName;
  719. }
  720. qCritical("carla_get_real_plugin_name(%i) - could not find plugin", pluginId);
  721. return nullptr;
  722. }
  723. // -------------------------------------------------------------------------------------------------------------------
  724. int32_t carla_get_current_program_index(unsigned int pluginId)
  725. {
  726. qDebug("carla_get_current_program_index(%i)", pluginId);
  727. CARLA_ASSERT(standalone.engine != nullptr);
  728. if (standalone.engine == nullptr)
  729. return -1;
  730. if (CarlaPlugin* const plugin = standalone.engine->getPlugin(pluginId))
  731. return plugin->currentProgram();
  732. qCritical("carla_get_current_program_index(%i) - could not find plugin", pluginId);
  733. return -1;
  734. }
  735. int32_t carla_get_current_midi_program_index(unsigned int pluginId)
  736. {
  737. qDebug("carla_get_current_midi_program_index(%i)", pluginId);
  738. CARLA_ASSERT(standalone.engine != nullptr);
  739. if (standalone.engine == nullptr)
  740. return -1;
  741. if (CarlaPlugin* const plugin = standalone.engine->getPlugin(pluginId))
  742. return plugin->currentMidiProgram();
  743. qCritical("carla_get_current_midi_program_index(%i) - could not find plugin", pluginId);
  744. return -1;
  745. }
  746. // -------------------------------------------------------------------------------------------------------------------
  747. float carla_get_default_parameter_value(unsigned int pluginId, uint32_t parameterId)
  748. {
  749. qDebug("carla_get_default_parameter_value(%i, %i)", pluginId, parameterId);
  750. CARLA_ASSERT(standalone.engine != nullptr);
  751. if (standalone.engine == nullptr)
  752. return 0.0f;
  753. if (CarlaPlugin* const plugin = standalone.engine->getPlugin(pluginId))
  754. {
  755. if (parameterId < plugin->parameterCount())
  756. return plugin->parameterRanges(parameterId).def;
  757. qCritical("carla_get_default_parameter_value(%i, %i) - parameterId out of bounds", pluginId, parameterId);
  758. return 0.0f;
  759. }
  760. qCritical("carla_get_default_parameter_value(%i, %i) - could not find plugin", pluginId, parameterId);
  761. return 0.0f;
  762. }
  763. float carla_get_current_parameter_value(unsigned int pluginId, uint32_t parameterId)
  764. {
  765. qDebug("carla_get_current_parameter_value(%i, %i)", pluginId, parameterId);
  766. CARLA_ASSERT(standalone.engine != nullptr);
  767. if (standalone.engine == nullptr)
  768. return 0.0f;
  769. if (CarlaPlugin* const plugin = standalone.engine->getPlugin(pluginId))
  770. {
  771. if (parameterId < plugin->parameterCount())
  772. return plugin->getParameterValue(parameterId);
  773. qCritical("carla_get_current_parameter_value(%i, %i) - parameterId out of bounds", pluginId, parameterId);
  774. return 0.0f;
  775. }
  776. qCritical("carla_get_current_parameter_value(%i, %i) - could not find plugin", pluginId, parameterId);
  777. return 0.0f;
  778. }
  779. // -------------------------------------------------------------------------------------------------------------------
  780. float carla_get_input_peak_value(unsigned int pluginId, unsigned short portId)
  781. {
  782. CARLA_ASSERT(standalone.engine != nullptr);
  783. CARLA_ASSERT(portId == 1 || portId == 2);
  784. if (standalone.engine == nullptr)
  785. return 0.0f;
  786. if (pluginId >= standalone.engine->currentPluginCount())
  787. {
  788. qCritical("carla_get_input_peak_value(%i, %i) - invalid plugin value", pluginId, portId);
  789. return 0.0f;
  790. }
  791. if (portId == 1 || portId == 2)
  792. return standalone.engine->getInputPeak(pluginId, portId-1);
  793. qCritical("carla_get_input_peak_value(%i, %i) - invalid port value", pluginId, portId);
  794. return 0.0f;
  795. }
  796. float carla_get_output_peak_value(unsigned int pluginId, unsigned short portId)
  797. {
  798. CARLA_ASSERT(standalone.engine != nullptr);
  799. CARLA_ASSERT(portId == 1 || portId == 2);
  800. if (standalone.engine == nullptr)
  801. return 0.0f;
  802. if (pluginId >= standalone.engine->currentPluginCount())
  803. {
  804. qCritical("carla_get_input_peak_value(%i, %i) - invalid plugin value", pluginId, portId);
  805. return 0.0f;
  806. }
  807. if (portId == 1 || portId == 2)
  808. return standalone.engine->getOutputPeak(pluginId, portId-1);
  809. qCritical("carla_get_output_peak_value(%i, %i) - invalid port value", pluginId, portId);
  810. return 0.0f;
  811. }
  812. // -------------------------------------------------------------------------------------------------------------------
  813. void carla_set_active(unsigned int pluginId, bool onOff)
  814. {
  815. qDebug("carla_set_active(%i, %s)", pluginId, bool2str(onOff));
  816. CARLA_ASSERT(standalone.engine != nullptr);
  817. if (standalone.engine == nullptr)
  818. return;
  819. if (CarlaPlugin* const plugin = standalone.engine->getPlugin(pluginId))
  820. return plugin->setActive(onOff, true, false);
  821. qCritical("carla_set_active(%i, %s) - could not find plugin", pluginId, bool2str(onOff));
  822. }
  823. void carla_set_drywet(unsigned int pluginId, float value)
  824. {
  825. qDebug("carla_set_drywet(%i, %f)", pluginId, value);
  826. CARLA_ASSERT(standalone.engine != nullptr);
  827. if (standalone.engine == nullptr)
  828. return;
  829. if (CarlaPlugin* const plugin = standalone.engine->getPlugin(pluginId))
  830. return plugin->setDryWet(value, true, false);
  831. qCritical("carla_set_drywet(%i, %f) - could not find plugin", pluginId, value);
  832. }
  833. void carla_set_volume(unsigned int pluginId, float value)
  834. {
  835. qDebug("carla_set_volume(%i, %f)", pluginId, value);
  836. CARLA_ASSERT(standalone.engine != nullptr);
  837. if (standalone.engine == nullptr)
  838. return;
  839. if (CarlaPlugin* const plugin = standalone.engine->getPlugin(pluginId))
  840. return plugin->setVolume(value, true, false);
  841. qCritical("carla_set_volume(%i, %f) - could not find plugin", pluginId, value);
  842. }
  843. void carla_set_balance_left(unsigned int pluginId, float value)
  844. {
  845. qDebug("carla_set_balance_left(%i, %f)", pluginId, value);
  846. CARLA_ASSERT(standalone.engine != nullptr);
  847. if (standalone.engine == nullptr)
  848. return;
  849. if (CarlaPlugin* const plugin = standalone.engine->getPlugin(pluginId))
  850. return plugin->setBalanceLeft(value, true, false);
  851. qCritical("carla_set_balance_left(%i, %f) - could not find plugin", pluginId, value);
  852. }
  853. void carla_set_balance_right(unsigned int pluginId, float value)
  854. {
  855. qDebug("carla_set_balance_right(%i, %f)", pluginId, value);
  856. CARLA_ASSERT(standalone.engine != nullptr);
  857. if (standalone.engine == nullptr)
  858. return;
  859. if (CarlaPlugin* const plugin = standalone.engine->getPlugin(pluginId))
  860. return plugin->setBalanceRight(value, true, false);
  861. qCritical("carla_set_balance_right(%i, %f) - could not find plugin", pluginId, value);
  862. }
  863. void carla_set_panning(unsigned int pluginId, float value)
  864. {
  865. qDebug("carla_set_panning(%i, %f)", pluginId, value);
  866. CARLA_ASSERT(standalone.engine != nullptr);
  867. if (standalone.engine == nullptr)
  868. return;
  869. if (CarlaPlugin* const plugin = standalone.engine->getPlugin(pluginId))
  870. return plugin->setPanning(value, true, false);
  871. qCritical("carla_set_panning(%i, %f) - could not find plugin", pluginId, value);
  872. }
  873. // -------------------------------------------------------------------------------------------------------------------
  874. void carla_set_parameter_value(unsigned int pluginId, uint32_t parameterId, float value)
  875. {
  876. qDebug("carla_set_parameter_value(%i, %i, %f)", pluginId, parameterId, value);
  877. CARLA_ASSERT(standalone.engine != nullptr);
  878. if (standalone.engine == nullptr)
  879. return;
  880. if (CarlaPlugin* const plugin = standalone.engine->getPlugin(pluginId))
  881. {
  882. if (parameterId < plugin->parameterCount())
  883. return plugin->setParameterValue(parameterId, value, true, true, false);
  884. qCritical("carla_set_parameter_value(%i, %i, %f) - parameterId out of bounds", pluginId, parameterId, value);
  885. return;
  886. }
  887. qCritical("carla_set_parameter_value(%i, %i, %f) - could not find plugin", pluginId, parameterId, value);
  888. }
  889. void carla_set_parameter_midi_channel(unsigned int pluginId, uint32_t parameterId, uint8_t channel)
  890. {
  891. qDebug("carla_set_parameter_midi_channel(%i, %i, %i)", pluginId, parameterId, channel);
  892. CARLA_ASSERT(standalone.engine != nullptr);
  893. CARLA_ASSERT(channel < MAX_MIDI_CHANNELS);
  894. if (channel >= MAX_MIDI_CHANNELS)
  895. {
  896. qCritical("carla_set_parameter_midi_channel(%i, %i, %i) - invalid channel number", pluginId, parameterId, channel);
  897. return;
  898. }
  899. if (standalone.engine == nullptr)
  900. return;
  901. if (CarlaPlugin* const plugin = standalone.engine->getPlugin(pluginId))
  902. {
  903. if (parameterId < plugin->parameterCount())
  904. return plugin->setParameterMidiChannel(parameterId, channel, true, false);
  905. qCritical("carla_set_parameter_midi_channel(%i, %i, %i) - parameterId out of bounds", pluginId, parameterId, channel);
  906. return;
  907. }
  908. qCritical("carla_set_parameter_midi_channel(%i, %i, %i) - could not find plugin", pluginId, parameterId, channel);
  909. }
  910. void carla_set_parameter_midi_cc(unsigned int pluginId, uint32_t parameterId, int16_t cc)
  911. {
  912. qDebug("carla_set_parameter_midi_cc(%i, %i, %i)", pluginId, parameterId, cc);
  913. CARLA_ASSERT(standalone.engine != nullptr);
  914. CARLA_ASSERT(cc >= -1 && cc <= 0x5F);
  915. if (cc < -1)
  916. {
  917. cc = -1;
  918. }
  919. else if (cc > 0x5F) // 95
  920. {
  921. qCritical("carla_set_parameter_midi_cc(%i, %i, %i) - invalid cc number", pluginId, parameterId, cc);
  922. return;
  923. }
  924. if (standalone.engine == nullptr)
  925. return;
  926. if (CarlaPlugin* const plugin = standalone.engine->getPlugin(pluginId))
  927. {
  928. if (parameterId < plugin->parameterCount())
  929. return plugin->setParameterMidiCC(parameterId, cc, true, false);
  930. qCritical("carla_set_parameter_midi_cc(%i, %i, %i) - parameterId out of bounds", pluginId, parameterId, cc);
  931. return;
  932. }
  933. qCritical("carla_set_parameter_midi_cc(%i, %i, %i) - could not find plugin", pluginId, parameterId, cc);
  934. }
  935. void carla_set_program(unsigned int pluginId, uint32_t programId)
  936. {
  937. qDebug("carla_set_program(%i, %i)", pluginId, programId);
  938. CARLA_ASSERT(standalone.engine != nullptr);
  939. if (standalone.engine == nullptr)
  940. return;
  941. if (CarlaPlugin* const plugin = standalone.engine->getPlugin(pluginId))
  942. {
  943. if (programId < plugin->programCount())
  944. return plugin->setProgram(programId, true, true, false, true);
  945. qCritical("carla_set_program(%i, %i) - programId out of bounds", pluginId, programId);
  946. return;
  947. }
  948. qCritical("carla_set_program(%i, %i) - could not find plugin", pluginId, programId);
  949. }
  950. void carla_set_midi_program(unsigned int pluginId, uint32_t midiProgramId)
  951. {
  952. qDebug("carla_set_midi_program(%i, %i)", pluginId, midiProgramId);
  953. CARLA_ASSERT(standalone.engine != nullptr);
  954. if (standalone.engine == nullptr)
  955. return;
  956. if (CarlaPlugin* const plugin = standalone.engine->getPlugin(pluginId))
  957. {
  958. if (midiProgramId < plugin->midiProgramCount())
  959. return plugin->setMidiProgram(midiProgramId, true, true, false, true);
  960. qCritical("carla_set_midi_program(%i, %i) - midiProgramId out of bounds", pluginId, midiProgramId);
  961. return;
  962. }
  963. qCritical("carla_set_midi_program(%i, %i) - could not find plugin", pluginId, midiProgramId);
  964. }
  965. // -------------------------------------------------------------------------------------------------------------------
  966. void carla_set_custom_data(unsigned int pluginId, const char* type, const char* key, const char* value)
  967. {
  968. qDebug("carla_set_custom_data(%i, \"%s\", \"%s\", \"%s\")", pluginId, type, key, value);
  969. CARLA_ASSERT(standalone.engine != nullptr);
  970. if (standalone.engine == nullptr)
  971. return;
  972. if (CarlaPlugin* const plugin = standalone.engine->getPlugin(pluginId))
  973. return plugin->setCustomData(type, key, value, true);
  974. qCritical("carla_set_custom_data(%i, \"%s\", \"%s\", \"%s\") - could not find plugin", pluginId, type, key, value);
  975. }
  976. void carla_set_chunk_data(unsigned int pluginId, const char* chunkData)
  977. {
  978. qDebug("carla_set_chunk_data(%i, \"%s\")", pluginId, chunkData);
  979. CARLA_ASSERT(standalone.engine != nullptr);
  980. if (standalone.engine == nullptr)
  981. return;
  982. if (CarlaPlugin* const plugin = standalone.engine->getPlugin(pluginId))
  983. {
  984. if (plugin->hints() & CarlaBackend::PLUGIN_USES_CHUNKS)
  985. return plugin->setChunkData(chunkData);
  986. qCritical("carla_set_chunk_data(%i, \"%s\") - plugin does not support chunks", pluginId, chunkData);
  987. return;
  988. }
  989. qCritical("carla_set_chunk_data(%i, \"%s\") - could not find plugin", pluginId, chunkData);
  990. }
  991. // -------------------------------------------------------------------------------------------------------------------
  992. void carla_prepare_for_save(unsigned int pluginId)
  993. {
  994. qDebug("carla_prepare_for_save(%i)", pluginId);
  995. CARLA_ASSERT(standalone.engine != nullptr);
  996. if (standalone.engine == nullptr)
  997. return;
  998. if (CarlaPlugin* const plugin = standalone.engine->getPlugin(pluginId))
  999. return plugin->prepareForSave();
  1000. qCritical("carla_prepare_for_save(%i) - could not find plugin", pluginId);
  1001. }
  1002. void carla_send_midi_note(unsigned int pluginId, uint8_t channel, uint8_t note, uint8_t velocity)
  1003. {
  1004. qDebug("carla_send_midi_note(%i, %i, %i, %i)", pluginId, channel, note, velocity);
  1005. CARLA_ASSERT(standalone.engine != nullptr);
  1006. if (standalone.engine == nullptr || ! standalone.engine->isRunning())
  1007. return;
  1008. if (CarlaPlugin* const plugin = standalone.engine->getPlugin(pluginId))
  1009. return plugin->sendMidiSingleNote(channel, note, velocity, true, true, false);
  1010. qCritical("carla_send_midi_note(%i, %i, %i, %i) - could not find plugin", pluginId, channel, note, velocity);
  1011. }
  1012. void carla_show_gui(unsigned int pluginId, bool yesno)
  1013. {
  1014. qDebug("carla_show_gui(%i, %s)", pluginId, bool2str(yesno));
  1015. CARLA_ASSERT(standalone.engine != nullptr);
  1016. if (standalone.engine == nullptr)
  1017. return;
  1018. if (CarlaPlugin* const plugin = standalone.engine->getPlugin(pluginId))
  1019. return plugin->showGui(yesno);
  1020. qCritical("carla_show_gui(%i, %s) - could not find plugin", pluginId, bool2str(yesno));
  1021. }
  1022. // -------------------------------------------------------------------------------------------------------------------
  1023. uint32_t carla_get_buffer_size()
  1024. {
  1025. qDebug("carla_get_buffer_size()");
  1026. CARLA_ASSERT(standalone.engine != nullptr);
  1027. if (standalone.engine == nullptr)
  1028. return 0;
  1029. return standalone.engine->getBufferSize();
  1030. }
  1031. double carla_get_sample_rate()
  1032. {
  1033. qDebug("carla_get_sample_rate()");
  1034. CARLA_ASSERT(standalone.engine != nullptr);
  1035. if (standalone.engine == nullptr)
  1036. return 0.0;
  1037. return standalone.engine->getSampleRate();
  1038. }
  1039. // -------------------------------------------------------------------------------------------------------------------
  1040. const char* carla_get_last_error()
  1041. {
  1042. qDebug("carla_get_last_error()");
  1043. if (standalone.engine != nullptr)
  1044. return standalone.engine->getLastError();
  1045. return standalone.lastError;
  1046. }
  1047. const char* carla_get_host_osc_url()
  1048. {
  1049. qDebug("carla_get_host_osc_url()");
  1050. CARLA_ASSERT(standalone.engine != nullptr);
  1051. if (standalone.engine == nullptr)
  1052. return nullptr;
  1053. return standalone.engine->getOscServerPathTCP();
  1054. }
  1055. // -------------------------------------------------------------------------------------------------------------------
  1056. void carla_set_callback_function(CarlaBackend::CallbackFunc func)
  1057. {
  1058. qDebug("carla_set_callback_function(%p)", func);
  1059. standalone.callback = func;
  1060. if (standalone.engine)
  1061. standalone.engine->setCallback(func, nullptr);
  1062. }
  1063. void carla_set_option(CarlaBackend::OptionsType option, int value, const char* valueStr)
  1064. {
  1065. qDebug("carla_set_option(%s, %i, \"%s\")", CarlaBackend::OptionsType2Str(option), value, valueStr);
  1066. #ifndef BUILD_BRIDGE
  1067. if (standalone.engine != nullptr)
  1068. standalone.engine->setOption(option, value, valueStr);
  1069. #endif
  1070. switch (option)
  1071. {
  1072. case CarlaBackend::OPTION_PROCESS_NAME:
  1073. standalone.procName = valueStr;
  1074. break;
  1075. case CarlaBackend::OPTION_PROCESS_MODE:
  1076. if (value < CarlaBackend::PROCESS_MODE_SINGLE_CLIENT || value > CarlaBackend::PROCESS_MODE_PATCHBAY)
  1077. return qCritical("carla_set_option(OPTION_PROCESS_MODE, %i, \"%s\") - invalid value", value, valueStr);
  1078. standalone.options.processMode = static_cast<CarlaBackend::ProcessMode>(value);
  1079. break;
  1080. case CarlaBackend::OPTION_FORCE_STEREO:
  1081. standalone.options.forceStereo = value;
  1082. break;
  1083. case CarlaBackend::OPTION_PREFER_PLUGIN_BRIDGES:
  1084. standalone.options.preferPluginBridges = value;
  1085. break;
  1086. case CarlaBackend::OPTION_PREFER_UI_BRIDGES:
  1087. standalone.options.preferUiBridges = value;
  1088. break;
  1089. #ifdef WANT_DSSI
  1090. case CarlaBackend::OPTION_USE_DSSI_VST_CHUNKS:
  1091. standalone.options.useDssiVstChunks = value;
  1092. break;
  1093. #endif
  1094. case CarlaBackend::OPTION_MAX_PARAMETERS:
  1095. standalone.options.maxParameters = (value > 0) ? value : CarlaBackend::MAX_DEFAULT_PARAMETERS;
  1096. break;
  1097. case CarlaBackend::OPTION_OSC_UI_TIMEOUT:
  1098. standalone.options.oscUiTimeout = value;
  1099. break;
  1100. case CarlaBackend::OPTION_PREFERRED_BUFFER_SIZE:
  1101. standalone.options.preferredBufferSize = value;
  1102. break;
  1103. case CarlaBackend::OPTION_PREFERRED_SAMPLE_RATE:
  1104. standalone.options.preferredSampleRate = value;
  1105. break;
  1106. #ifndef BUILD_BRIDGE
  1107. case CarlaBackend::OPTION_PATH_BRIDGE_NATIVE:
  1108. standalone.options.bridge_native = valueStr;
  1109. break;
  1110. case CarlaBackend::OPTION_PATH_BRIDGE_POSIX32:
  1111. standalone.options.bridge_posix32 = valueStr;
  1112. break;
  1113. case CarlaBackend::OPTION_PATH_BRIDGE_POSIX64:
  1114. standalone.options.bridge_posix64 = valueStr;
  1115. break;
  1116. case CarlaBackend::OPTION_PATH_BRIDGE_WIN32:
  1117. standalone.options.bridge_win32 = valueStr;
  1118. break;
  1119. case CarlaBackend::OPTION_PATH_BRIDGE_WIN64:
  1120. standalone.options.bridge_win64 = valueStr;
  1121. break;
  1122. #endif
  1123. #ifdef WANT_LV2
  1124. case CarlaBackend::OPTION_PATH_BRIDGE_LV2_GTK2:
  1125. standalone.options.bridge_lv2gtk2 = valueStr;
  1126. break;
  1127. case CarlaBackend::OPTION_PATH_BRIDGE_LV2_GTK3:
  1128. standalone.options.bridge_lv2gtk3 = valueStr;
  1129. break;
  1130. case CarlaBackend::OPTION_PATH_BRIDGE_LV2_QT4:
  1131. standalone.options.bridge_lv2qt4 = valueStr;
  1132. break;
  1133. case CarlaBackend::OPTION_PATH_BRIDGE_LV2_QT5:
  1134. standalone.options.bridge_lv2qt5 = valueStr;
  1135. break;
  1136. case CarlaBackend::OPTION_PATH_BRIDGE_LV2_COCOA:
  1137. standalone.options.bridge_lv2cocoa = valueStr;
  1138. break;
  1139. case CarlaBackend::OPTION_PATH_BRIDGE_LV2_WINDOWS:
  1140. standalone.options.bridge_lv2win = valueStr;
  1141. break;
  1142. case CarlaBackend::OPTION_PATH_BRIDGE_LV2_X11:
  1143. standalone.options.bridge_lv2x11 = valueStr;
  1144. break;
  1145. #endif
  1146. #ifdef WANT_VST
  1147. case CarlaBackend::OPTION_PATH_BRIDGE_VST_COCOA:
  1148. standalone.options.bridge_vstcocoa = valueStr;
  1149. break;
  1150. case CarlaBackend::OPTION_PATH_BRIDGE_VST_HWND:
  1151. standalone.options.bridge_vsthwnd = valueStr;
  1152. break;
  1153. case CarlaBackend::OPTION_PATH_BRIDGE_VST_X11:
  1154. standalone.options.bridge_vstx11 = valueStr;
  1155. break;
  1156. #endif
  1157. }
  1158. }
  1159. #if 0
  1160. // -------------------------------------------------------------------------------------------------------------------
  1161. #define NSM_API_VERSION_MAJOR 1
  1162. #define NSM_API_VERSION_MINOR 0
  1163. class CarlaNSM
  1164. {
  1165. public:
  1166. CarlaNSM()
  1167. {
  1168. m_controlAddr = nullptr;
  1169. m_serverThread = nullptr;
  1170. m_isOpened = false;
  1171. m_isSaved = false;
  1172. }
  1173. ~CarlaNSM()
  1174. {
  1175. if (m_controlAddr)
  1176. lo_address_free(m_controlAddr);
  1177. if (m_serverThread)
  1178. {
  1179. lo_server_thread_stop(m_serverThread);
  1180. lo_server_thread_del_method(m_serverThread, "/reply", "ssss");
  1181. lo_server_thread_del_method(m_serverThread, "/nsm/client/open", "sss");
  1182. lo_server_thread_del_method(m_serverThread, "/nsm/client/save", "");
  1183. lo_server_thread_free(m_serverThread);
  1184. }
  1185. }
  1186. void announce(const char* const url, const int pid)
  1187. {
  1188. lo_address addr = lo_address_new_from_url(url);
  1189. int proto = lo_address_get_protocol(addr);
  1190. if (! m_serverThread)
  1191. {
  1192. // create new OSC thread
  1193. m_serverThread = lo_server_thread_new_with_proto(nullptr, proto, error_handler);
  1194. // register message handlers and start OSC thread
  1195. lo_server_thread_add_method(m_serverThread, "/reply", "ssss", _reply_handler, this);
  1196. lo_server_thread_add_method(m_serverThread, "/nsm/client/open", "sss", _nsm_open_handler, this);
  1197. lo_server_thread_add_method(m_serverThread, "/nsm/client/save", "", _nsm_save_handler, this);
  1198. lo_server_thread_start(m_serverThread);
  1199. }
  1200. lo_send_from(addr, lo_server_thread_get_server(m_serverThread), LO_TT_IMMEDIATE, "/nsm/server/announce", "sssiii",
  1201. "Carla", ":switch:", "carla", NSM_API_VERSION_MAJOR, NSM_API_VERSION_MINOR, pid);
  1202. lo_address_free(addr);
  1203. }
  1204. void replyOpen()
  1205. {
  1206. m_isOpened = true;
  1207. }
  1208. void replySave()
  1209. {
  1210. m_isSaved = true;
  1211. }
  1212. protected:
  1213. int reply_handler(const char* const path, const char* const types, lo_arg** const argv, const int argc, const lo_message msg)
  1214. {
  1215. qDebug("CarlaNSM::reply_handler(%s, %i, %p, %s, %p)", path, argc, argv, types, msg);
  1216. m_controlAddr = lo_address_new_from_url(lo_address_get_url(lo_message_get_source(msg)));
  1217. const char* const method = &argv[0]->s;
  1218. if (strcmp(method, "/nsm/server/announce") == 0 && standalone.callback)
  1219. standalone.callback(nullptr, CarlaBackend::CALLBACK_NSM_ANNOUNCE, 0, 0, 0, 0.0, nullptr); // FIXME?
  1220. return 0;
  1221. }
  1222. int nsm_open_handler(const char* const path, const char* const types, lo_arg** const argv, const int argc, const lo_message msg)
  1223. {
  1224. qDebug("CarlaNSM::nsm_open_handler(\"%s\", \"%s\", %p, %i, %p)", path, types, argv, argc, msg);
  1225. if (! standalone.callback)
  1226. return 1;
  1227. const char* const projectPath = &argv[0]->s;
  1228. const char* const clientId = &argv[2]->s;
  1229. standalone.callback(nullptr, CarlaBackend::CALLBACK_NSM_OPEN1, 0, 0, 0, 0.0, clientId);
  1230. standalone.callback(nullptr, CarlaBackend::CALLBACK_NSM_OPEN2, 0, 0, 0, 0.0, projectPath);
  1231. for (int i=0; i < 30 && ! m_isOpened; i++)
  1232. carla_msleep(100);
  1233. if (m_controlAddr)
  1234. lo_send_from(m_controlAddr, lo_server_thread_get_server(m_serverThread), LO_TT_IMMEDIATE, "/reply", "ss", "/nsm/client/open", "OK");
  1235. return 0;
  1236. }
  1237. int nsm_save_handler(const char* const path, const char* const types, lo_arg** const argv, const int argc, const lo_message msg)
  1238. {
  1239. qDebug("CarlaNSM::nsm_save_handler(\"%s\", \"%s\", %p, %i, %p)", path, types, argv, argc, msg);
  1240. if (! standalone.callback)
  1241. return 1;
  1242. standalone.callback(nullptr, CarlaBackend::CALLBACK_NSM_SAVE, 0, 0, 0, 0.0, nullptr);
  1243. for (int i=0; i < 30 && ! m_isSaved; i++)
  1244. carla_msleep(100);
  1245. if (m_controlAddr)
  1246. lo_send_from(m_controlAddr, lo_server_thread_get_server(m_serverThread), LO_TT_IMMEDIATE, "/reply", "ss", "/nsm/client/save", "OK");
  1247. return 0;
  1248. }
  1249. private:
  1250. lo_address m_controlAddr;
  1251. lo_server_thread m_serverThread;
  1252. bool m_isOpened, m_isSaved;
  1253. static int _reply_handler(const char* const path, const char* const types, lo_arg** const argv, const int argc, const lo_message msg, void* const data)
  1254. {
  1255. CARLA_ASSERT(data);
  1256. CarlaNSM* const _this_ = (CarlaNSM*)data;
  1257. return _this_->reply_handler(path, types, argv, argc, msg);
  1258. }
  1259. static int _nsm_open_handler(const char* const path, const char* const types, lo_arg** const argv, const int argc, const lo_message msg, void* const data)
  1260. {
  1261. CARLA_ASSERT(data);
  1262. CarlaNSM* const _this_ = (CarlaNSM*)data;
  1263. return _this_->nsm_open_handler(path, types, argv, argc, msg);
  1264. }
  1265. static int _nsm_save_handler(const char* const path, const char* const types, lo_arg** const argv, const int argc, const lo_message msg, void* const data)
  1266. {
  1267. CARLA_ASSERT(data);
  1268. CarlaNSM* const _this_ = (CarlaNSM*)data;
  1269. return _this_->nsm_save_handler(path, types, argv, argc, msg);
  1270. }
  1271. static void error_handler(const int num, const char* const msg, const char* const path)
  1272. {
  1273. qCritical("CarlaNSM::error_handler(%i, \"%s\", \"%s\")", num, msg, path);
  1274. }
  1275. };
  1276. static CarlaNSM carlaNSM;
  1277. void carla_nsm_announce(const char* url, int pid)
  1278. {
  1279. carlaNSM.announce(url, pid);
  1280. }
  1281. void carla_nsm_reply_open()
  1282. {
  1283. carlaNSM.replyOpen();
  1284. }
  1285. void carla_nsm_reply_save()
  1286. {
  1287. carlaNSM.replySave();
  1288. }
  1289. #endif
  1290. // -------------------------------------------------------------------------------------------------------------------
  1291. #if 0
  1292. //def QTCREATOR_TEST
  1293. #include <QtGui/QApplication>
  1294. #include <QtGui/QDialog>
  1295. QDialog* vstGui = nullptr;
  1296. void main_callback(void* ptr, CarlaBackend::CallbackType action, unsigned int pluginId, int value1, int value2, double value3)
  1297. {
  1298. switch (action)
  1299. {
  1300. case CarlaBackend::CALLBACK_SHOW_GUI:
  1301. if (vstGui && ! value1)
  1302. vstGui->close();
  1303. break;
  1304. case CarlaBackend::CALLBACK_RESIZE_GUI:
  1305. vstGui->setFixedSize(value1, value2);
  1306. break;
  1307. default:
  1308. break;
  1309. }
  1310. Q_UNUSED(ptr);
  1311. Q_UNUSED(pluginId);
  1312. Q_UNUSED(value3);
  1313. }
  1314. void run_tests_standalone(short idMax)
  1315. {
  1316. for (short id = 0; id <= idMax; id++)
  1317. {
  1318. qDebug("------------------- TEST @%i: non-parameter calls --------------------", id);
  1319. get_plugin_info(id);
  1320. get_audio_port_count_info(id);
  1321. get_midi_port_count_info(id);
  1322. get_parameter_count_info(id);
  1323. get_gui_info(id);
  1324. get_chunk_data(id);
  1325. get_parameter_count(id);
  1326. get_program_count(id);
  1327. get_midi_program_count(id);
  1328. get_custom_data_count(id);
  1329. get_real_plugin_name(id);
  1330. get_current_program_index(id);
  1331. get_current_midi_program_index(id);
  1332. qDebug("------------------- TEST @%i: parameter calls [-1] --------------------", id);
  1333. get_parameter_info(id, -1);
  1334. get_parameter_scalepoint_info(id, -1, -1);
  1335. get_parameter_data(id, -1);
  1336. get_parameter_ranges(id, -1);
  1337. get_midi_program_data(id, -1);
  1338. get_custom_data(id, -1);
  1339. get_parameter_text(id, -1);
  1340. get_program_name(id, -1);
  1341. get_midi_program_name(id, -1);
  1342. get_default_parameter_value(id, -1);
  1343. get_current_parameter_value(id, -1);
  1344. get_input_peak_value(id, -1);
  1345. get_output_peak_value(id, -1);
  1346. qDebug("------------------- TEST @%i: parameter calls [0] --------------------", id);
  1347. get_parameter_info(id, 0);
  1348. get_parameter_scalepoint_info(id, 0, -1);
  1349. get_parameter_scalepoint_info(id, 0, 0);
  1350. get_parameter_data(id, 0);
  1351. get_parameter_ranges(id, 0);
  1352. get_midi_program_data(id, 0);
  1353. get_custom_data(id, 0);
  1354. get_parameter_text(id, 0);
  1355. get_program_name(id, 0);
  1356. get_midi_program_name(id, 0);
  1357. get_default_parameter_value(id, 0);
  1358. get_current_parameter_value(id, 0);
  1359. get_input_peak_value(id, 0);
  1360. get_input_peak_value(id, 1);
  1361. get_input_peak_value(id, 2);
  1362. get_output_peak_value(id, 0);
  1363. get_output_peak_value(id, 1);
  1364. get_output_peak_value(id, 2);
  1365. qDebug("------------------- TEST @%i: set extra data --------------------", id);
  1366. set_custom_data(id, CarlaBackend::CUSTOM_DATA_STRING, "", "");
  1367. set_chunk_data(id, nullptr);
  1368. set_gui_container(id, (uintptr_t)1);
  1369. qDebug("------------------- TEST @%i: gui stuff --------------------", id);
  1370. show_gui(id, false);
  1371. show_gui(id, true);
  1372. show_gui(id, true);
  1373. idle_guis();
  1374. idle_guis();
  1375. idle_guis();
  1376. qDebug("------------------- TEST @%i: other --------------------", id);
  1377. send_midi_note(id, 15, 127, 127);
  1378. send_midi_note(id, 0, 0, 0);
  1379. prepare_for_save(id);
  1380. prepare_for_save(id);
  1381. prepare_for_save(id);
  1382. }
  1383. }
  1384. int main(int argc, char* argv[])
  1385. {
  1386. using namespace CarlaBackend;
  1387. // Qt app
  1388. QApplication app(argc, argv);
  1389. // Qt gui (for vst)
  1390. vstGui = new QDialog(nullptr);
  1391. // set callback and options
  1392. set_callback_function(main_callback);
  1393. set_option(OPTION_PREFER_UI_BRIDGES, 0, nullptr);
  1394. //set_option(OPTION_PROCESS_MODE, PROCESS_MODE_CONTINUOUS_RACK, nullptr);
  1395. // start engine
  1396. if (! engine_init("JACK", "carla_demo"))
  1397. {
  1398. qCritical("failed to start backend engine, reason:\n%s", get_last_error());
  1399. delete vstGui;
  1400. return 1;
  1401. }
  1402. short id_ladspa = add_plugin(BINARY_NATIVE, PLUGIN_LADSPA, "/usr/lib/ladspa/LEET_eqbw2x2.so", "LADSPA plug name, test long name - "
  1403. "------- name ------------ name2 ----------- name3 ------------ name4 ------------ name5 ---------- name6", "leet_equalizer_bw2x2", nullptr);
  1404. short id_dssi = add_plugin(BINARY_NATIVE, PLUGIN_DSSI, "/usr/lib/dssi/fluidsynth-dssi.so", "DSSI pname, short-utf8 _ \xAE", "FluidSynth-DSSI", (void*)"/usr/lib/dssi/fluidsynth-dssi/FluidSynth-DSSI_gtk");
  1405. short id_native = add_plugin(BINARY_NATIVE, PLUGIN_INTERNAL, "", "ZynHere", "zynaddsubfx", nullptr);
  1406. //short id_lv2 = add_plugin(BINARY_NATIVE, PLUGIN_LV2, "FILENAME", "HAHA name!!!", "http://studionumbersix.com/foo/lv2/yc20", nullptr);
  1407. //short id_vst = add_plugin(BINARY_NATIVE, PLUGIN_LV2, "FILENAME", "HAHA name!!!", "http://studionumbersix.com/foo/lv2/yc20", nullptr);
  1408. if (id_ladspa < 0 || id_dssi < 0 || id_native < 0)
  1409. {
  1410. qCritical("failed to start load plugins, reason:\n%s", get_last_error());
  1411. delete vstGui;
  1412. return 1;
  1413. }
  1414. //const GuiInfo* const guiInfo = get_gui_info(id);
  1415. //if (guiInfo->type == CarlaBackend::GUI_INTERNAL_QT4 || guiInfo->type == CarlaBackend::GUI_INTERNAL_X11)
  1416. //{
  1417. // set_gui_data(id, 0, (uintptr_t)gui);
  1418. //gui->show();
  1419. //}
  1420. // activate
  1421. set_active(id_ladspa, true);
  1422. set_active(id_dssi, true);
  1423. set_active(id_native, true);
  1424. // start guis
  1425. show_gui(id_dssi, true);
  1426. carla_sleep(1);
  1427. // do tests
  1428. run_tests_standalone(id_dssi+1);
  1429. // lock
  1430. app.exec();
  1431. delete vstGui;
  1432. vstGui = nullptr;
  1433. remove_plugin(id_ladspa);
  1434. remove_plugin(id_dssi);
  1435. remove_plugin(id_native);
  1436. engine_close();
  1437. return 0;
  1438. }
  1439. #endif