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.

1844 lines
59KB

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