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.

1734 lines
63KB

  1. /*
  2. * Carla FluidSynth Plugin
  3. * Copyright (C) 2011-2013 Filipe Coelho <falktx@falktx.com>
  4. *
  5. * This program is free software; you can redistribute it and/or
  6. * modify it under the terms of the GNU General Public License as
  7. * published by the Free Software Foundation; either version 2 of
  8. * the License, or any later version.
  9. *
  10. * This program is distributed in the hope that it will be useful,
  11. * but WITHOUT ANY WARRANTY; without even the implied warranty of
  12. * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
  13. * GNU General Public License for more details.
  14. *
  15. * For a full copy of the GNU General Public License see the doc/GPL.txt file.
  16. */
  17. #include "CarlaPluginInternal.hpp"
  18. #include "CarlaEngine.hpp"
  19. #ifdef WANT_FLUIDSYNTH
  20. #include "CarlaMathUtils.hpp"
  21. #include <fluidsynth.h>
  22. #include <QtCore/QStringList>
  23. #if (FLUIDSYNTH_VERSION_MAJOR >= 1 && FLUIDSYNTH_VERSION_MINOR >= 1 && FLUIDSYNTH_VERSION_MICRO >= 4)
  24. # define FLUIDSYNTH_VERSION_NEW_API
  25. #endif
  26. CARLA_BACKEND_START_NAMESPACE
  27. #if 0
  28. }
  29. #endif
  30. #define FLUID_DEFAULT_POLYPHONY 64
  31. class FluidSynthPlugin : public CarlaPlugin
  32. {
  33. public:
  34. FluidSynthPlugin(CarlaEngine* const engine, const unsigned int id, const bool use16Outs)
  35. : CarlaPlugin(engine, id),
  36. fUses16Outs(use16Outs),
  37. fSettings(nullptr),
  38. fSynth(nullptr),
  39. fSynthId(-1),
  40. fAudio16Buffers(nullptr),
  41. fLabel(nullptr)
  42. {
  43. carla_debug("FluidSynthPlugin::FluidSynthPlugin(%p, %i, %s)", engine, id, bool2str(use16Outs));
  44. FLOAT_CLEAR(fParamBuffers, FluidSynthParametersMax);
  45. carla_fill<int32_t>(fCurMidiProgs, MAX_MIDI_CHANNELS, 0);
  46. // create settings
  47. fSettings = new_fluid_settings();
  48. CARLA_SAFE_ASSERT_RETURN(fSettings != nullptr,);
  49. // define settings
  50. fluid_settings_setint(fSettings, "synth.audio-channels", use16Outs ? 16 : 1);
  51. fluid_settings_setint(fSettings, "synth.audio-groups", use16Outs ? 16 : 1);
  52. fluid_settings_setnum(fSettings, "synth.sample-rate", pData->engine->getSampleRate());
  53. //fluid_settings_setnum(fSettings, "synth.cpu-cores", 2);
  54. fluid_settings_setint(fSettings, "synth.parallel-render", 1);
  55. fluid_settings_setint(fSettings, "synth.threadsafe-api", 0);
  56. // create synth
  57. fSynth = new_fluid_synth(fSettings);
  58. CARLA_SAFE_ASSERT_RETURN(fSynth != nullptr,);
  59. #ifdef FLUIDSYNTH_VERSION_NEW_API
  60. fluid_synth_set_sample_rate(fSynth, (float)pData->engine->getSampleRate());
  61. #endif
  62. // set default values
  63. fluid_synth_set_reverb_on(fSynth, 1);
  64. fluid_synth_set_reverb(fSynth, FLUID_REVERB_DEFAULT_ROOMSIZE, FLUID_REVERB_DEFAULT_DAMP, FLUID_REVERB_DEFAULT_WIDTH, FLUID_REVERB_DEFAULT_LEVEL);
  65. fluid_synth_set_chorus_on(fSynth, 1);
  66. fluid_synth_set_chorus(fSynth, FLUID_CHORUS_DEFAULT_N, FLUID_CHORUS_DEFAULT_LEVEL, FLUID_CHORUS_DEFAULT_SPEED, FLUID_CHORUS_DEFAULT_DEPTH, FLUID_CHORUS_DEFAULT_TYPE);
  67. fluid_synth_set_polyphony(fSynth, FLUID_DEFAULT_POLYPHONY);
  68. fluid_synth_set_gain(fSynth, 1.0f);
  69. for (int i=0; i < MAX_MIDI_CHANNELS; ++i)
  70. fluid_synth_set_interp_method(fSynth, i, FLUID_INTERP_DEFAULT);
  71. }
  72. ~FluidSynthPlugin() override
  73. {
  74. carla_debug("FluidSynthPlugin::~FluidSynthPlugin()");
  75. pData->singleMutex.lock();
  76. pData->masterMutex.lock();
  77. if (pData->client != nullptr && pData->client->isActive())
  78. pData->client->deactivate();
  79. if (pData->active)
  80. {
  81. deactivate();
  82. pData->active = false;
  83. }
  84. if (fSynth != nullptr)
  85. {
  86. delete_fluid_synth(fSynth);
  87. fSynth = nullptr;
  88. }
  89. if (fSettings != nullptr)
  90. {
  91. delete_fluid_settings(fSettings);
  92. fSettings = nullptr;
  93. }
  94. if (fLabel != nullptr)
  95. {
  96. delete[] fLabel;
  97. fLabel = nullptr;
  98. }
  99. clearBuffers();
  100. }
  101. // -------------------------------------------------------------------
  102. // Information (base)
  103. PluginType getType() const noexcept override
  104. {
  105. return PLUGIN_FILE_SF2;
  106. }
  107. PluginCategory getCategory() const noexcept override
  108. {
  109. return PLUGIN_CATEGORY_SYNTH;
  110. }
  111. // -------------------------------------------------------------------
  112. // Information (count)
  113. uint32_t getParameterScalePointCount(const uint32_t parameterId) const noexcept override
  114. {
  115. CARLA_SAFE_ASSERT_RETURN(parameterId < pData->param.count, 0);
  116. switch (parameterId)
  117. {
  118. case FluidSynthChorusType:
  119. return 2;
  120. case FluidSynthInterpolation:
  121. return 4;
  122. default:
  123. return 0;
  124. }
  125. }
  126. // -------------------------------------------------------------------
  127. // Information (current data)
  128. // nothing
  129. // -------------------------------------------------------------------
  130. // Information (per-plugin data)
  131. unsigned int getOptionsAvailable() const noexcept override
  132. {
  133. unsigned int options = 0x0;
  134. options |= PLUGIN_OPTION_MAP_PROGRAM_CHANGES;
  135. options |= PLUGIN_OPTION_SEND_CONTROL_CHANGES;
  136. options |= PLUGIN_OPTION_SEND_CHANNEL_PRESSURE;
  137. options |= PLUGIN_OPTION_SEND_PITCHBEND;
  138. options |= PLUGIN_OPTION_SEND_ALL_SOUND_OFF;
  139. return options;
  140. }
  141. float getParameterValue(const uint32_t parameterId) const noexcept override
  142. {
  143. CARLA_SAFE_ASSERT_RETURN(parameterId < pData->param.count, 0.0f);
  144. return fParamBuffers[parameterId];
  145. }
  146. float getParameterScalePointValue(const uint32_t parameterId, const uint32_t scalePointId) const noexcept override
  147. {
  148. CARLA_SAFE_ASSERT_RETURN(parameterId < pData->param.count, 0.0f);
  149. CARLA_SAFE_ASSERT_RETURN(scalePointId < getParameterScalePointCount(parameterId), 0.0f);
  150. switch (parameterId)
  151. {
  152. case FluidSynthChorusType:
  153. switch (scalePointId)
  154. {
  155. case 0:
  156. return FLUID_CHORUS_MOD_SINE;
  157. case 1:
  158. return FLUID_CHORUS_MOD_TRIANGLE;
  159. default:
  160. return FLUID_CHORUS_DEFAULT_TYPE;
  161. }
  162. case FluidSynthInterpolation:
  163. switch (scalePointId)
  164. {
  165. case 0:
  166. return FLUID_INTERP_NONE;
  167. case 1:
  168. return FLUID_INTERP_LINEAR;
  169. case 2:
  170. return FLUID_INTERP_4THORDER;
  171. case 3:
  172. return FLUID_INTERP_7THORDER;
  173. default:
  174. return FLUID_INTERP_DEFAULT;
  175. }
  176. default:
  177. return 0.0f;
  178. }
  179. }
  180. void getLabel(char* const strBuf) const noexcept override
  181. {
  182. if (fLabel != nullptr)
  183. std::strncpy(strBuf, fLabel, STR_MAX);
  184. else
  185. CarlaPlugin::getLabel(strBuf);
  186. }
  187. void getMaker(char* const strBuf) const noexcept override
  188. {
  189. std::strncpy(strBuf, "FluidSynth SF2 engine", STR_MAX);
  190. }
  191. void getCopyright(char* const strBuf) const noexcept override
  192. {
  193. std::strncpy(strBuf, "GNU GPL v2+", STR_MAX);
  194. }
  195. void getRealName(char* const strBuf) const noexcept override
  196. {
  197. getLabel(strBuf);
  198. }
  199. void getParameterName(const uint32_t parameterId, char* const strBuf) const noexcept override
  200. {
  201. CARLA_SAFE_ASSERT_RETURN(parameterId < pData->param.count,);
  202. switch (parameterId)
  203. {
  204. case FluidSynthReverbOnOff:
  205. std::strncpy(strBuf, "Reverb On/Off", STR_MAX);
  206. break;
  207. case FluidSynthReverbRoomSize:
  208. std::strncpy(strBuf, "Reverb Room Size", STR_MAX);
  209. break;
  210. case FluidSynthReverbDamp:
  211. std::strncpy(strBuf, "Reverb Damp", STR_MAX);
  212. break;
  213. case FluidSynthReverbLevel:
  214. std::strncpy(strBuf, "Reverb Level", STR_MAX);
  215. break;
  216. case FluidSynthReverbWidth:
  217. std::strncpy(strBuf, "Reverb Width", STR_MAX);
  218. break;
  219. case FluidSynthChorusOnOff:
  220. std::strncpy(strBuf, "Chorus On/Off", STR_MAX);
  221. break;
  222. case FluidSynthChorusNr:
  223. std::strncpy(strBuf, "Chorus Voice Count", STR_MAX);
  224. break;
  225. case FluidSynthChorusLevel:
  226. std::strncpy(strBuf, "Chorus Level", STR_MAX);
  227. break;
  228. case FluidSynthChorusSpeedHz:
  229. std::strncpy(strBuf, "Chorus Speed", STR_MAX);
  230. break;
  231. case FluidSynthChorusDepthMs:
  232. std::strncpy(strBuf, "Chorus Depth", STR_MAX);
  233. break;
  234. case FluidSynthChorusType:
  235. std::strncpy(strBuf, "Chorus Type", STR_MAX);
  236. break;
  237. case FluidSynthPolyphony:
  238. std::strncpy(strBuf, "Polyphony", STR_MAX);
  239. break;
  240. case FluidSynthInterpolation:
  241. std::strncpy(strBuf, "Interpolation", STR_MAX);
  242. break;
  243. case FluidSynthVoiceCount:
  244. std::strncpy(strBuf, "Voice Count", STR_MAX);
  245. break;
  246. default:
  247. CarlaPlugin::getParameterName(parameterId, strBuf);
  248. break;
  249. }
  250. }
  251. void getParameterUnit(const uint32_t parameterId, char* const strBuf) const noexcept override
  252. {
  253. CARLA_SAFE_ASSERT_RETURN(parameterId < pData->param.count,);
  254. switch (parameterId)
  255. {
  256. case FluidSynthChorusSpeedHz:
  257. std::strncpy(strBuf, "Hz", STR_MAX);
  258. break;
  259. case FluidSynthChorusDepthMs:
  260. std::strncpy(strBuf, "ms", STR_MAX);
  261. break;
  262. default:
  263. CarlaPlugin::getParameterUnit(parameterId, strBuf);
  264. break;
  265. }
  266. }
  267. void getParameterScalePointLabel(const uint32_t parameterId, const uint32_t scalePointId, char* const strBuf) const noexcept override
  268. {
  269. CARLA_SAFE_ASSERT_RETURN(parameterId < pData->param.count,);
  270. CARLA_SAFE_ASSERT_RETURN(scalePointId < getParameterScalePointCount(parameterId),);
  271. switch (parameterId)
  272. {
  273. case FluidSynthChorusType:
  274. switch (scalePointId)
  275. {
  276. case 0:
  277. std::strncpy(strBuf, "Sine wave", STR_MAX);
  278. return;
  279. case 1:
  280. std::strncpy(strBuf, "Triangle wave", STR_MAX);
  281. return;
  282. }
  283. case FluidSynthInterpolation:
  284. switch (scalePointId)
  285. {
  286. case 0:
  287. std::strncpy(strBuf, "None", STR_MAX);
  288. return;
  289. case 1:
  290. std::strncpy(strBuf, "Straight-line", STR_MAX);
  291. return;
  292. case 2:
  293. std::strncpy(strBuf, "Fourth-order", STR_MAX);
  294. return;
  295. case 3:
  296. std::strncpy(strBuf, "Seventh-order", STR_MAX);
  297. return;
  298. }
  299. }
  300. CarlaPlugin::getParameterScalePointLabel(parameterId, scalePointId, strBuf);
  301. }
  302. // -------------------------------------------------------------------
  303. // Set data (state)
  304. void prepareForSave() override
  305. {
  306. char strBuf[STR_MAX+1];
  307. std::snprintf(strBuf, STR_MAX, "%i:%i:%i:%i:%i:%i:%i:%i:%i:%i:%i:%i:%i:%i:%i:%i", fCurMidiProgs[0], fCurMidiProgs[1], fCurMidiProgs[2], fCurMidiProgs[3],
  308. fCurMidiProgs[4], fCurMidiProgs[5], fCurMidiProgs[6], fCurMidiProgs[7],
  309. fCurMidiProgs[8], fCurMidiProgs[9], fCurMidiProgs[10], fCurMidiProgs[11],
  310. fCurMidiProgs[12], fCurMidiProgs[13], fCurMidiProgs[14], fCurMidiProgs[15]);
  311. CarlaPlugin::setCustomData(CUSTOM_DATA_TYPE_STRING, "midiPrograms", strBuf, false);
  312. }
  313. // -------------------------------------------------------------------
  314. // Set data (internal stuff)
  315. void setCtrlChannel(const int8_t channel, const bool sendOsc, const bool sendCallback) noexcept override
  316. {
  317. if (channel < MAX_MIDI_CHANNELS)
  318. pData->midiprog.current = fCurMidiProgs[channel];
  319. CarlaPlugin::setCtrlChannel(channel, sendOsc, sendCallback);
  320. }
  321. // -------------------------------------------------------------------
  322. // Set data (plugin-specific stuff)
  323. void setParameterValue(const uint32_t parameterId, const float value, const bool sendGui, const bool sendOsc, const bool sendCallback) noexcept override
  324. {
  325. CARLA_SAFE_ASSERT_RETURN(parameterId < pData->param.count,);
  326. const float fixedValue(pData->param.getFixedValue(parameterId, value));
  327. fParamBuffers[parameterId] = fixedValue;
  328. {
  329. const ScopedSingleProcessLocker spl(this, (sendGui || sendOsc || sendCallback));
  330. switch (parameterId)
  331. {
  332. case FluidSynthReverbOnOff:
  333. try {
  334. fluid_synth_set_reverb_on(fSynth, (fixedValue > 0.5f) ? 1 : 0);
  335. } catch(...) {}
  336. break;
  337. case FluidSynthReverbRoomSize:
  338. case FluidSynthReverbDamp:
  339. case FluidSynthReverbLevel:
  340. case FluidSynthReverbWidth:
  341. try {
  342. fluid_synth_set_reverb(fSynth, fParamBuffers[FluidSynthReverbRoomSize], fParamBuffers[FluidSynthReverbDamp], fParamBuffers[FluidSynthReverbWidth], fParamBuffers[FluidSynthReverbLevel]);
  343. } catch(...) {}
  344. break;
  345. case FluidSynthChorusOnOff:
  346. try {
  347. fluid_synth_set_chorus_on(fSynth, (value > 0.5f) ? 1 : 0);
  348. } catch(...) {}
  349. break;
  350. case FluidSynthChorusNr:
  351. case FluidSynthChorusLevel:
  352. case FluidSynthChorusSpeedHz:
  353. case FluidSynthChorusDepthMs:
  354. case FluidSynthChorusType:
  355. try {
  356. fluid_synth_set_chorus(fSynth, (int)fParamBuffers[FluidSynthChorusNr], fParamBuffers[FluidSynthChorusLevel], fParamBuffers[FluidSynthChorusSpeedHz], fParamBuffers[FluidSynthChorusDepthMs], (int)fParamBuffers[FluidSynthChorusType]);
  357. } catch(...) {}
  358. break;
  359. case FluidSynthPolyphony:
  360. try {
  361. fluid_synth_set_polyphony(fSynth, (int)value);
  362. } catch(...) {}
  363. break;
  364. case FluidSynthInterpolation:
  365. for (int i=0; i < MAX_MIDI_CHANNELS; ++i)
  366. {
  367. try {
  368. fluid_synth_set_interp_method(fSynth, i, (int)value);
  369. }
  370. catch(...) {
  371. break;
  372. }
  373. }
  374. break;
  375. default:
  376. break;
  377. }
  378. }
  379. CarlaPlugin::setParameterValue(parameterId, value, sendGui, sendOsc, sendCallback);
  380. }
  381. void setCustomData(const char* const type, const char* const key, const char* const value, const bool sendGui) override
  382. {
  383. CARLA_SAFE_ASSERT_RETURN(fSynth != nullptr,);
  384. CARLA_SAFE_ASSERT_RETURN(type != nullptr && type[0] != '\0',);
  385. CARLA_SAFE_ASSERT_RETURN(key != nullptr && key[0] != '\0',);
  386. CARLA_SAFE_ASSERT_RETURN(value != nullptr && value[0] != '\0',);
  387. carla_debug("FluidSynthPlugin::setCustomData(%s, \"%s\", \"%s\", %s)", type, key, value, bool2str(sendGui));
  388. if (std::strcmp(type, CUSTOM_DATA_TYPE_STRING) != 0)
  389. return carla_stderr2("FluidSynthPlugin::setCustomData(\"%s\", \"%s\", \"%s\", %s) - type is not string", type, key, value, bool2str(sendGui));
  390. if (std::strcmp(key, "midiPrograms") != 0)
  391. return carla_stderr2("FluidSynthPlugin::setCustomData(\"%s\", \"%s\", \"%s\", %s) - type is not string", type, key, value, bool2str(sendGui));
  392. if (fUses16Outs)
  393. {
  394. QStringList midiProgramList(QString(value).split(":", QString::SkipEmptyParts));
  395. if (midiProgramList.count() == MAX_MIDI_CHANNELS)
  396. {
  397. uint i = 0;
  398. foreach (const QString& midiProg, midiProgramList)
  399. {
  400. CARLA_SAFE_ASSERT_BREAK(i < MAX_MIDI_CHANNELS);
  401. bool ok;
  402. uint index = midiProg.toUInt(&ok);
  403. if (ok && index < pData->midiprog.count)
  404. {
  405. const uint32_t bank = pData->midiprog.data[index].bank;
  406. const uint32_t program = pData->midiprog.data[index].program;
  407. fluid_synth_program_select(fSynth, i, fSynthId, bank, program);
  408. fCurMidiProgs[i] = index;
  409. if (pData->ctrlChannel == static_cast<int32_t>(i))
  410. {
  411. pData->midiprog.current = index;
  412. pData->engine->callback(ENGINE_CALLBACK_MIDI_PROGRAM_CHANGED, pData->id, index, 0, 0.0f, nullptr);
  413. }
  414. }
  415. ++i;
  416. }
  417. CARLA_SAFE_ASSERT(i == MAX_MIDI_CHANNELS);
  418. }
  419. }
  420. CarlaPlugin::setCustomData(type, key, value, sendGui);
  421. }
  422. void setMidiProgram(const int32_t index, const bool sendGui, const bool sendOsc, const bool sendCallback) noexcept override
  423. {
  424. CARLA_SAFE_ASSERT_RETURN(fSynth != nullptr,);
  425. CARLA_SAFE_ASSERT_RETURN(index >= -1 && index < static_cast<int32_t>(pData->midiprog.count),);
  426. if (index >= 0 && pData->ctrlChannel >= 0 && pData->ctrlChannel < MAX_MIDI_CHANNELS)
  427. {
  428. const uint32_t bank = pData->midiprog.data[index].bank;
  429. const uint32_t program = pData->midiprog.data[index].program;
  430. //const ScopedSingleProcessLocker spl(this, (sendGui || sendOsc || sendCallback));
  431. try {
  432. fluid_synth_program_select(fSynth, pData->ctrlChannel, fSynthId, bank, program);
  433. } catch(...) {}
  434. fCurMidiProgs[pData->ctrlChannel] = index;
  435. }
  436. CarlaPlugin::setMidiProgram(index, sendGui, sendOsc, sendCallback);
  437. }
  438. // -------------------------------------------------------------------
  439. // Set ui stuff
  440. // nothing
  441. // -------------------------------------------------------------------
  442. // Plugin state
  443. void reload() override
  444. {
  445. CARLA_SAFE_ASSERT_RETURN(pData->engine != nullptr,);
  446. CARLA_SAFE_ASSERT_RETURN(fSynth != nullptr,);
  447. carla_debug("FluidSynthPlugin::reload() - start");
  448. const EngineProcessMode processMode(pData->engine->getProccessMode());
  449. // Safely disable plugin for reload
  450. const ScopedDisabler sd(this);
  451. if (pData->active)
  452. deactivate();
  453. clearBuffers();
  454. uint32_t aOuts, params;
  455. aOuts = fUses16Outs ? 32 : 2;
  456. params = FluidSynthParametersMax;
  457. pData->audioOut.createNew(aOuts);
  458. pData->param.createNew(params, false);
  459. const int portNameSize(pData->engine->getMaxPortNameSize());
  460. CarlaString portName;
  461. // ---------------------------------------
  462. // Audio Outputs
  463. if (fUses16Outs)
  464. {
  465. for (int i=0; i < 32; ++i)
  466. {
  467. portName.clear();
  468. if (processMode == ENGINE_PROCESS_MODE_SINGLE_CLIENT)
  469. {
  470. portName = pData->name;
  471. portName += ":";
  472. }
  473. portName += "out-";
  474. if ((i+2)/2 < 9)
  475. portName += "0";
  476. portName += CarlaString((i+2)/2);
  477. if (i % 2 == 0)
  478. portName += "L";
  479. else
  480. portName += "R";
  481. portName.truncate(portNameSize);
  482. pData->audioOut.ports[i].port = (CarlaEngineAudioPort*)pData->client->addPort(kEnginePortTypeAudio, portName, false);
  483. pData->audioOut.ports[i].rindex = i;
  484. }
  485. fAudio16Buffers = new float*[aOuts];
  486. for (uint32_t i=0; i < aOuts; ++i)
  487. fAudio16Buffers[i] = nullptr;
  488. }
  489. else
  490. {
  491. // out-left
  492. portName.clear();
  493. if (processMode == ENGINE_PROCESS_MODE_SINGLE_CLIENT)
  494. {
  495. portName = pData->name;
  496. portName += ":";
  497. }
  498. portName += "out-left";
  499. portName.truncate(portNameSize);
  500. pData->audioOut.ports[0].port = (CarlaEngineAudioPort*)pData->client->addPort(kEnginePortTypeAudio, portName, false);
  501. pData->audioOut.ports[0].rindex = 0;
  502. // out-right
  503. portName.clear();
  504. if (processMode == ENGINE_PROCESS_MODE_SINGLE_CLIENT)
  505. {
  506. portName = pData->name;
  507. portName += ":";
  508. }
  509. portName += "out-right";
  510. portName.truncate(portNameSize);
  511. pData->audioOut.ports[1].port = (CarlaEngineAudioPort*)pData->client->addPort(kEnginePortTypeAudio, portName, false);
  512. pData->audioOut.ports[1].rindex = 1;
  513. }
  514. // ---------------------------------------
  515. // Event Input
  516. {
  517. portName.clear();
  518. if (processMode == ENGINE_PROCESS_MODE_SINGLE_CLIENT)
  519. {
  520. portName = pData->name;
  521. portName += ":";
  522. }
  523. portName += "events-in";
  524. portName.truncate(portNameSize);
  525. pData->event.portIn = (CarlaEngineEventPort*)pData->client->addPort(kEnginePortTypeEvent, portName, true);
  526. }
  527. // ---------------------------------------
  528. // Event Output
  529. {
  530. portName.clear();
  531. if (processMode == ENGINE_PROCESS_MODE_SINGLE_CLIENT)
  532. {
  533. portName = pData->name;
  534. portName += ":";
  535. }
  536. portName += "events-out";
  537. portName.truncate(portNameSize);
  538. pData->event.portOut = (CarlaEngineEventPort*)pData->client->addPort(kEnginePortTypeEvent, portName, false);
  539. }
  540. // ---------------------------------------
  541. // Parameters
  542. {
  543. int j;
  544. // ----------------------
  545. j = FluidSynthReverbOnOff;
  546. pData->param.data[j].type = PARAMETER_INPUT;
  547. pData->param.data[j].hints = PARAMETER_IS_ENABLED /*| PARAMETER_IS_AUTOMABLE*/ | PARAMETER_IS_BOOLEAN;
  548. pData->param.data[j].index = j;
  549. pData->param.data[j].rindex = j;
  550. pData->param.data[j].midiChannel = 0;
  551. pData->param.data[j].midiCC = -1;
  552. pData->param.ranges[j].min = 0.0f;
  553. pData->param.ranges[j].max = 1.0f;
  554. pData->param.ranges[j].def = 1.0f;
  555. pData->param.ranges[j].step = 1.0f;
  556. pData->param.ranges[j].stepSmall = 1.0f;
  557. pData->param.ranges[j].stepLarge = 1.0f;
  558. fParamBuffers[j] = pData->param.ranges[j].def;
  559. // ----------------------
  560. j = FluidSynthReverbRoomSize;
  561. pData->param.data[j].type = PARAMETER_INPUT;
  562. pData->param.data[j].hints = PARAMETER_IS_ENABLED /*| PARAMETER_IS_AUTOMABLE*/;
  563. pData->param.data[j].index = j;
  564. pData->param.data[j].rindex = j;
  565. pData->param.data[j].midiChannel = 0;
  566. pData->param.data[j].midiCC = -1;
  567. pData->param.ranges[j].min = 0.0f;
  568. pData->param.ranges[j].max = 1.2f;
  569. pData->param.ranges[j].def = FLUID_REVERB_DEFAULT_ROOMSIZE;
  570. pData->param.ranges[j].step = 0.01f;
  571. pData->param.ranges[j].stepSmall = 0.0001f;
  572. pData->param.ranges[j].stepLarge = 0.1f;
  573. fParamBuffers[j] = pData->param.ranges[j].def;
  574. // ----------------------
  575. j = FluidSynthReverbDamp;
  576. pData->param.data[j].type = PARAMETER_INPUT;
  577. pData->param.data[j].hints = PARAMETER_IS_ENABLED /*| PARAMETER_IS_AUTOMABLE*/;
  578. pData->param.data[j].index = j;
  579. pData->param.data[j].rindex = j;
  580. pData->param.data[j].midiChannel = 0;
  581. pData->param.data[j].midiCC = -1;
  582. pData->param.ranges[j].min = 0.0f;
  583. pData->param.ranges[j].max = 1.0f;
  584. pData->param.ranges[j].def = FLUID_REVERB_DEFAULT_DAMP;
  585. pData->param.ranges[j].step = 0.01f;
  586. pData->param.ranges[j].stepSmall = 0.0001f;
  587. pData->param.ranges[j].stepLarge = 0.1f;
  588. fParamBuffers[j] = pData->param.ranges[j].def;
  589. // ----------------------
  590. j = FluidSynthReverbLevel;
  591. pData->param.data[j].type = PARAMETER_INPUT;
  592. pData->param.data[j].hints = PARAMETER_IS_ENABLED /*| PARAMETER_IS_AUTOMABLE*/;
  593. pData->param.data[j].index = j;
  594. pData->param.data[j].rindex = j;
  595. pData->param.data[j].midiChannel = 0;
  596. pData->param.data[j].midiCC = MIDI_CONTROL_REVERB_SEND_LEVEL;
  597. pData->param.ranges[j].min = 0.0f;
  598. pData->param.ranges[j].max = 1.0f;
  599. pData->param.ranges[j].def = FLUID_REVERB_DEFAULT_LEVEL;
  600. pData->param.ranges[j].step = 0.01f;
  601. pData->param.ranges[j].stepSmall = 0.0001f;
  602. pData->param.ranges[j].stepLarge = 0.1f;
  603. fParamBuffers[j] = pData->param.ranges[j].def;
  604. // ----------------------
  605. j = FluidSynthReverbWidth;
  606. pData->param.data[j].type = PARAMETER_INPUT;
  607. pData->param.data[j].hints = PARAMETER_IS_ENABLED /*| PARAMETER_IS_AUTOMABLE*/;
  608. pData->param.data[j].index = j;
  609. pData->param.data[j].rindex = j;
  610. pData->param.data[j].midiChannel = 0;
  611. pData->param.data[j].midiCC = -1;
  612. pData->param.ranges[j].min = 0.0f;
  613. pData->param.ranges[j].max = 10.0f; // should be 100, but that sounds too much
  614. pData->param.ranges[j].def = FLUID_REVERB_DEFAULT_WIDTH;
  615. pData->param.ranges[j].step = 0.01f;
  616. pData->param.ranges[j].stepSmall = 0.0001f;
  617. pData->param.ranges[j].stepLarge = 0.1f;
  618. fParamBuffers[j] = pData->param.ranges[j].def;
  619. // ----------------------
  620. j = FluidSynthChorusOnOff;
  621. pData->param.data[j].type = PARAMETER_INPUT;
  622. pData->param.data[j].hints = PARAMETER_IS_ENABLED | PARAMETER_IS_BOOLEAN;
  623. pData->param.data[j].index = j;
  624. pData->param.data[j].rindex = j;
  625. pData->param.data[j].midiChannel = 0;
  626. pData->param.data[j].midiCC = -1;
  627. pData->param.ranges[j].min = 0.0f;
  628. pData->param.ranges[j].max = 1.0f;
  629. pData->param.ranges[j].def = 1.0f;
  630. pData->param.ranges[j].step = 1.0f;
  631. pData->param.ranges[j].stepSmall = 1.0f;
  632. pData->param.ranges[j].stepLarge = 1.0f;
  633. fParamBuffers[j] = pData->param.ranges[j].def;
  634. // ----------------------
  635. j = FluidSynthChorusNr;
  636. pData->param.data[j].type = PARAMETER_INPUT;
  637. pData->param.data[j].hints = PARAMETER_IS_ENABLED | PARAMETER_IS_INTEGER;
  638. pData->param.data[j].index = j;
  639. pData->param.data[j].rindex = j;
  640. pData->param.data[j].midiChannel = 0;
  641. pData->param.data[j].midiCC = -1;
  642. pData->param.ranges[j].min = 0.0f;
  643. pData->param.ranges[j].max = 99.0f;
  644. pData->param.ranges[j].def = FLUID_CHORUS_DEFAULT_N;
  645. pData->param.ranges[j].step = 1.0f;
  646. pData->param.ranges[j].stepSmall = 1.0f;
  647. pData->param.ranges[j].stepLarge = 10.0f;
  648. fParamBuffers[j] = pData->param.ranges[j].def;
  649. // ----------------------
  650. j = FluidSynthChorusLevel;
  651. pData->param.data[j].type = PARAMETER_INPUT;
  652. pData->param.data[j].hints = PARAMETER_IS_ENABLED;
  653. pData->param.data[j].index = j;
  654. pData->param.data[j].rindex = j;
  655. pData->param.data[j].midiChannel = 0;
  656. pData->param.data[j].midiCC = 0; //MIDI_CONTROL_CHORUS_SEND_LEVEL;
  657. pData->param.ranges[j].min = 0.0f;
  658. pData->param.ranges[j].max = 10.0f;
  659. pData->param.ranges[j].def = FLUID_CHORUS_DEFAULT_LEVEL;
  660. pData->param.ranges[j].step = 0.01f;
  661. pData->param.ranges[j].stepSmall = 0.0001f;
  662. pData->param.ranges[j].stepLarge = 0.1f;
  663. fParamBuffers[j] = pData->param.ranges[j].def;
  664. // ----------------------
  665. j = FluidSynthChorusSpeedHz;
  666. pData->param.data[j].type = PARAMETER_INPUT;
  667. pData->param.data[j].hints = PARAMETER_IS_ENABLED;
  668. pData->param.data[j].index = j;
  669. pData->param.data[j].rindex = j;
  670. pData->param.data[j].midiChannel = 0;
  671. pData->param.data[j].midiCC = -1;
  672. pData->param.ranges[j].min = 0.29f;
  673. pData->param.ranges[j].max = 5.0f;
  674. pData->param.ranges[j].def = FLUID_CHORUS_DEFAULT_SPEED;
  675. pData->param.ranges[j].step = 0.01f;
  676. pData->param.ranges[j].stepSmall = 0.0001f;
  677. pData->param.ranges[j].stepLarge = 0.1f;
  678. fParamBuffers[j] = pData->param.ranges[j].def;
  679. // ----------------------
  680. j = FluidSynthChorusDepthMs;
  681. pData->param.data[j].type = PARAMETER_INPUT;
  682. pData->param.data[j].hints = PARAMETER_IS_ENABLED;
  683. pData->param.data[j].index = j;
  684. pData->param.data[j].rindex = j;
  685. pData->param.data[j].midiChannel = 0;
  686. pData->param.data[j].midiCC = -1;
  687. pData->param.ranges[j].min = 0.0f;
  688. pData->param.ranges[j].max = float(2048.0 * 1000.0 / pData->engine->getSampleRate()); // FIXME?
  689. pData->param.ranges[j].def = FLUID_CHORUS_DEFAULT_DEPTH;
  690. pData->param.ranges[j].step = 0.01f;
  691. pData->param.ranges[j].stepSmall = 0.0001f;
  692. pData->param.ranges[j].stepLarge = 0.1f;
  693. fParamBuffers[j] = pData->param.ranges[j].def;
  694. // ----------------------
  695. j = FluidSynthChorusType;
  696. pData->param.data[j].type = PARAMETER_INPUT;
  697. pData->param.data[j].hints = PARAMETER_IS_ENABLED | PARAMETER_IS_INTEGER | PARAMETER_USES_SCALEPOINTS;
  698. pData->param.data[j].index = j;
  699. pData->param.data[j].rindex = j;
  700. pData->param.data[j].midiChannel = 0;
  701. pData->param.data[j].midiCC = -1;
  702. pData->param.ranges[j].min = FLUID_CHORUS_MOD_SINE;
  703. pData->param.ranges[j].max = FLUID_CHORUS_MOD_TRIANGLE;
  704. pData->param.ranges[j].def = FLUID_CHORUS_DEFAULT_TYPE;
  705. pData->param.ranges[j].step = 1.0f;
  706. pData->param.ranges[j].stepSmall = 1.0f;
  707. pData->param.ranges[j].stepLarge = 1.0f;
  708. fParamBuffers[j] = pData->param.ranges[j].def;
  709. // ----------------------
  710. j = FluidSynthPolyphony;
  711. pData->param.data[j].type = PARAMETER_INPUT;
  712. pData->param.data[j].hints = PARAMETER_IS_ENABLED | PARAMETER_IS_INTEGER;
  713. pData->param.data[j].index = j;
  714. pData->param.data[j].rindex = j;
  715. pData->param.data[j].midiChannel = 0;
  716. pData->param.data[j].midiCC = -1;
  717. pData->param.ranges[j].min = 1.0f;
  718. pData->param.ranges[j].max = 512.0f; // max theoric is 65535
  719. pData->param.ranges[j].def = (float)fluid_synth_get_polyphony(fSynth);
  720. pData->param.ranges[j].step = 1.0f;
  721. pData->param.ranges[j].stepSmall = 1.0f;
  722. pData->param.ranges[j].stepLarge = 10.0f;
  723. fParamBuffers[j] = pData->param.ranges[j].def;
  724. // ----------------------
  725. j = FluidSynthInterpolation;
  726. pData->param.data[j].type = PARAMETER_INPUT;
  727. pData->param.data[j].hints = PARAMETER_IS_ENABLED | PARAMETER_IS_INTEGER | PARAMETER_USES_SCALEPOINTS;
  728. pData->param.data[j].index = j;
  729. pData->param.data[j].rindex = j;
  730. pData->param.data[j].midiChannel = 0;
  731. pData->param.data[j].midiCC = -1;
  732. pData->param.ranges[j].min = FLUID_INTERP_NONE;
  733. pData->param.ranges[j].max = FLUID_INTERP_HIGHEST;
  734. pData->param.ranges[j].def = FLUID_INTERP_DEFAULT;
  735. pData->param.ranges[j].step = 1.0f;
  736. pData->param.ranges[j].stepSmall = 1.0f;
  737. pData->param.ranges[j].stepLarge = 1.0f;
  738. fParamBuffers[j] = pData->param.ranges[j].def;
  739. // ----------------------
  740. j = FluidSynthVoiceCount;
  741. pData->param.data[j].type = PARAMETER_OUTPUT;
  742. pData->param.data[j].hints = PARAMETER_IS_ENABLED | PARAMETER_IS_AUTOMABLE | PARAMETER_IS_INTEGER;
  743. pData->param.data[j].index = j;
  744. pData->param.data[j].rindex = j;
  745. pData->param.data[j].midiChannel = 0;
  746. pData->param.data[j].midiCC = -1;
  747. pData->param.ranges[j].min = 0.0f;
  748. pData->param.ranges[j].max = 65535.0f;
  749. pData->param.ranges[j].def = 0.0f;
  750. pData->param.ranges[j].step = 1.0f;
  751. pData->param.ranges[j].stepSmall = 1.0f;
  752. pData->param.ranges[j].stepLarge = 1.0f;
  753. fParamBuffers[j] = pData->param.ranges[j].def;
  754. }
  755. // ---------------------------------------
  756. // plugin hints
  757. pData->hints = 0x0;
  758. pData->hints |= PLUGIN_IS_SYNTH;
  759. pData->hints |= PLUGIN_CAN_VOLUME;
  760. if (! fUses16Outs)
  761. pData->hints |= PLUGIN_CAN_BALANCE;
  762. // extra plugin hints
  763. pData->extraHints = 0x0;
  764. pData->extraHints |= PLUGIN_EXTRA_HINT_HAS_MIDI_IN;
  765. if (! fUses16Outs)
  766. pData->extraHints |= PLUGIN_EXTRA_HINT_CAN_RUN_RACK;
  767. bufferSizeChanged(pData->engine->getBufferSize());
  768. reloadPrograms(true);
  769. if (pData->active)
  770. activate();
  771. carla_debug("FluidSynthPlugin::reload() - end");
  772. }
  773. void reloadPrograms(const bool init) override
  774. {
  775. carla_debug("FluidSynthPlugin::reloadPrograms(%s)", bool2str(init));
  776. // save drum info in case we have one program for it
  777. bool hasDrums = false;
  778. uint32_t drumIndex, drumProg;
  779. // Delete old programs
  780. pData->midiprog.clear();
  781. // Query new programs
  782. uint32_t count = 0;
  783. if (fluid_sfont_t* const f_sfont = fluid_synth_get_sfont_by_id(fSynth, fSynthId))
  784. {
  785. fluid_preset_t f_preset;
  786. // initial check to know how many midi-programs we have
  787. f_sfont->iteration_start(f_sfont);
  788. while (f_sfont->iteration_next(f_sfont, &f_preset))
  789. ++count;
  790. // sound kits must always have at least 1 midi-program
  791. CARLA_SAFE_ASSERT_RETURN(count > 0,);
  792. pData->midiprog.createNew(count);
  793. // Update data
  794. uint32_t i = 0;
  795. f_sfont->iteration_start(f_sfont);
  796. while (f_sfont->iteration_next(f_sfont, &f_preset))
  797. {
  798. CARLA_SAFE_ASSERT_BREAK(i < count);
  799. pData->midiprog.data[i].bank = f_preset.get_banknum(&f_preset);
  800. pData->midiprog.data[i].program = f_preset.get_num(&f_preset);
  801. pData->midiprog.data[i].name = carla_strdup(f_preset.get_name(&f_preset));
  802. if (pData->midiprog.data[i].bank == 128 && ! hasDrums)
  803. {
  804. hasDrums = true;
  805. drumIndex = i;
  806. drumProg = pData->midiprog.data[i].program;
  807. }
  808. ++i;
  809. }
  810. }
  811. else
  812. {
  813. // failing means 0 midi-programs, it shouldn't happen!
  814. carla_safe_assert("fluid_sfont_t* const f_sfont = fluid_synth_get_sfont_by_id(fSynth, fSynthId)", __FILE__, __LINE__);
  815. return;
  816. }
  817. #ifndef BUILD_BRIDGE
  818. // Update OSC Names
  819. if (pData->engine->isOscControlRegistered())
  820. {
  821. pData->engine->oscSend_control_set_midi_program_count(pData->id, count);
  822. for (uint32_t i=0; i < count; ++i)
  823. pData->engine->oscSend_control_set_midi_program_data(pData->id, i, pData->midiprog.data[i].bank, pData->midiprog.data[i].program, pData->midiprog.data[i].name);
  824. }
  825. #endif
  826. if (init)
  827. {
  828. fluid_synth_program_reset(fSynth);
  829. // select first program, or 128 for ch10
  830. for (uint32_t i=0; i < MAX_MIDI_CHANNELS && i != 9; ++i)
  831. {
  832. #ifdef FLUIDSYNTH_VERSION_NEW_API
  833. fluid_synth_set_channel_type(fSynth, i, CHANNEL_TYPE_MELODIC);
  834. #endif
  835. fluid_synth_program_select(fSynth, i, fSynthId, pData->midiprog.data[0].bank, pData->midiprog.data[0].program);
  836. fCurMidiProgs[i] = 0;
  837. }
  838. if (hasDrums)
  839. {
  840. #ifdef FLUIDSYNTH_VERSION_NEW_API
  841. fluid_synth_set_channel_type(fSynth, 9, CHANNEL_TYPE_DRUM);
  842. #endif
  843. fluid_synth_program_select(fSynth, 9, fSynthId, 128, drumProg);
  844. fCurMidiProgs[9] = drumIndex;
  845. }
  846. else
  847. {
  848. #ifdef FLUIDSYNTH_VERSION_NEW_API
  849. fluid_synth_set_channel_type(fSynth, 9, CHANNEL_TYPE_MELODIC);
  850. #endif
  851. fluid_synth_program_select(fSynth, 9, fSynthId, pData->midiprog.data[0].bank, pData->midiprog.data[0].program);
  852. fCurMidiProgs[9] = 0;
  853. }
  854. pData->midiprog.current = 0;
  855. }
  856. else
  857. {
  858. pData->engine->callback(ENGINE_CALLBACK_RELOAD_PROGRAMS, pData->id, 0, 0, 0.0f, nullptr);
  859. }
  860. }
  861. // -------------------------------------------------------------------
  862. // Plugin processing
  863. void process(float** const, float** const outBuffer, const uint32_t frames) override
  864. {
  865. // --------------------------------------------------------------------------------------------------------
  866. // Check if active
  867. if (! pData->active)
  868. {
  869. // disable any output sound
  870. for (uint32_t i=0; i < pData->audioOut.count; ++i)
  871. FLOAT_CLEAR(outBuffer[i], frames);
  872. return;
  873. }
  874. // --------------------------------------------------------------------------------------------------------
  875. // Check if needs reset
  876. if (pData->needsReset)
  877. {
  878. if (pData->options & PLUGIN_OPTION_SEND_ALL_SOUND_OFF)
  879. {
  880. for (int i=0; i < MAX_MIDI_CHANNELS; ++i)
  881. {
  882. #ifdef FLUIDSYNTH_VERSION_NEW_API
  883. fluid_synth_all_notes_off(fSynth, i);
  884. fluid_synth_all_sounds_off(fSynth, i);
  885. #else
  886. fluid_synth_cc(fSynth, i, MIDI_CONTROL_ALL_SOUND_OFF, 0);
  887. fluid_synth_cc(fSynth, i, MIDI_CONTROL_ALL_NOTES_OFF, 0);
  888. #endif
  889. }
  890. }
  891. else if (pData->ctrlChannel >= 0 && pData->ctrlChannel < MAX_MIDI_CHANNELS)
  892. {
  893. for (int i=0; i < MAX_MIDI_NOTE; ++i)
  894. fluid_synth_noteoff(fSynth, pData->ctrlChannel, i);
  895. }
  896. pData->needsReset = false;
  897. }
  898. // --------------------------------------------------------------------------------------------------------
  899. // Event Input and Processing
  900. {
  901. // ----------------------------------------------------------------------------------------------------
  902. // MIDI Input (External)
  903. if (pData->extNotes.mutex.tryLock())
  904. {
  905. while (! pData->extNotes.data.isEmpty())
  906. {
  907. const ExternalMidiNote& note(pData->extNotes.data.getFirst(true));
  908. CARLA_SAFE_ASSERT_CONTINUE(note.channel >= 0 && note.channel < MAX_MIDI_CHANNELS);
  909. if (note.velo > 0)
  910. fluid_synth_noteon(fSynth, note.channel, note.note, note.velo);
  911. else
  912. fluid_synth_noteoff(fSynth,note.channel, note.note);
  913. }
  914. pData->extNotes.mutex.unlock();
  915. } // End of MIDI Input (External)
  916. // ----------------------------------------------------------------------------------------------------
  917. // Event Input (System)
  918. bool allNotesOffSent = false;
  919. uint32_t time, nEvents = pData->event.portIn->getEventCount();
  920. uint32_t timeOffset = 0;
  921. uint32_t nextBankIds[MAX_MIDI_CHANNELS] = { 0, 0, 0, 0, 0, 0, 0, 0, 0, 128, 0, 0, 0, 0, 0, 0 };
  922. if (pData->midiprog.current >= 0 && pData->midiprog.count > 0 && pData->ctrlChannel >= 0 && pData->ctrlChannel < MAX_MIDI_CHANNELS)
  923. nextBankIds[pData->ctrlChannel] = pData->midiprog.data[pData->midiprog.current].bank;
  924. for (uint32_t i=0; i < nEvents; ++i)
  925. {
  926. const EngineEvent& event(pData->event.portIn->getEvent(i));
  927. time = event.time;
  928. CARLA_SAFE_ASSERT_CONTINUE(time < frames);
  929. CARLA_SAFE_ASSERT_BREAK(time >= timeOffset);
  930. if (time > timeOffset)
  931. {
  932. if (processSingle(outBuffer, time - timeOffset, timeOffset))
  933. {
  934. timeOffset = time;
  935. if (pData->midiprog.current >= 0 && pData->midiprog.count > 0 && pData->ctrlChannel >= 0 && pData->ctrlChannel < MAX_MIDI_CHANNELS)
  936. nextBankIds[pData->ctrlChannel] = pData->midiprog.data[pData->midiprog.current].bank;
  937. }
  938. }
  939. // Control change
  940. switch (event.type)
  941. {
  942. case kEngineEventTypeNull:
  943. break;
  944. case kEngineEventTypeControl:
  945. {
  946. const EngineControlEvent& ctrlEvent = event.ctrl;
  947. switch (ctrlEvent.type)
  948. {
  949. case kEngineControlEventTypeNull:
  950. break;
  951. case kEngineControlEventTypeParameter:
  952. {
  953. #ifndef BUILD_BRIDGE
  954. // Control backend stuff
  955. if (event.channel == pData->ctrlChannel)
  956. {
  957. float value;
  958. if (MIDI_IS_CONTROL_BREATH_CONTROLLER(ctrlEvent.param) && (pData->hints & PLUGIN_CAN_DRYWET) != 0)
  959. {
  960. value = ctrlEvent.value;
  961. setDryWet(value, false, false);
  962. pData->postponeRtEvent(kPluginPostRtEventParameterChange, PARAMETER_DRYWET, 0, value);
  963. }
  964. if (MIDI_IS_CONTROL_CHANNEL_VOLUME(ctrlEvent.param) && (pData->hints & PLUGIN_CAN_VOLUME) != 0)
  965. {
  966. value = ctrlEvent.value*127.0f/100.0f;
  967. setVolume(value, false, false);
  968. pData->postponeRtEvent(kPluginPostRtEventParameterChange, PARAMETER_VOLUME, 0, value);
  969. }
  970. if (MIDI_IS_CONTROL_BALANCE(ctrlEvent.param) && (pData->hints & PLUGIN_CAN_BALANCE) != 0)
  971. {
  972. float left, right;
  973. value = ctrlEvent.value/0.5f - 1.0f;
  974. if (value < 0.0f)
  975. {
  976. left = -1.0f;
  977. right = (value*2.0f)+1.0f;
  978. }
  979. else if (value > 0.0f)
  980. {
  981. left = (value*2.0f)-1.0f;
  982. right = 1.0f;
  983. }
  984. else
  985. {
  986. left = -1.0f;
  987. right = 1.0f;
  988. }
  989. setBalanceLeft(left, false, false);
  990. setBalanceRight(right, false, false);
  991. pData->postponeRtEvent(kPluginPostRtEventParameterChange, PARAMETER_BALANCE_LEFT, 0, left);
  992. pData->postponeRtEvent(kPluginPostRtEventParameterChange, PARAMETER_BALANCE_RIGHT, 0, right);
  993. }
  994. }
  995. #endif
  996. // Control plugin parameters
  997. for (uint32_t k=0; k < pData->param.count; ++k)
  998. {
  999. if (pData->param.data[k].midiChannel != event.channel)
  1000. continue;
  1001. if (pData->param.data[k].midiCC != ctrlEvent.param)
  1002. continue;
  1003. if (pData->param.data[k].hints != PARAMETER_INPUT)
  1004. continue;
  1005. if ((pData->param.data[k].hints & PARAMETER_IS_AUTOMABLE) == 0)
  1006. continue;
  1007. float value;
  1008. if (pData->param.data[k].hints & PARAMETER_IS_BOOLEAN)
  1009. {
  1010. value = (ctrlEvent.value < 0.5f) ? pData->param.ranges[k].min : pData->param.ranges[k].max;
  1011. }
  1012. else
  1013. {
  1014. value = pData->param.ranges[k].getUnnormalizedValue(ctrlEvent.value);
  1015. if (pData->param.data[k].hints & PARAMETER_IS_INTEGER)
  1016. value = std::rint(value);
  1017. }
  1018. setParameterValue(k, value, false, false, false);
  1019. pData->postponeRtEvent(kPluginPostRtEventParameterChange, static_cast<int32_t>(k), 0, value);
  1020. }
  1021. if ((pData->options & PLUGIN_OPTION_SEND_CONTROL_CHANGES) != 0 && ctrlEvent.param <= 0x5F)
  1022. {
  1023. fluid_synth_cc(fSynth, event.channel, ctrlEvent.param, int(ctrlEvent.value*127.0f));
  1024. }
  1025. break;
  1026. }
  1027. case kEngineControlEventTypeMidiBank:
  1028. if (event.channel < MAX_MIDI_CHANNELS && (pData->options & PLUGIN_OPTION_MAP_PROGRAM_CHANGES) != 0)
  1029. nextBankIds[event.channel] = ctrlEvent.param;
  1030. break;
  1031. case kEngineControlEventTypeMidiProgram:
  1032. if (event.channel < MAX_MIDI_CHANNELS && (pData->options & PLUGIN_OPTION_MAP_PROGRAM_CHANGES) != 0)
  1033. {
  1034. const uint32_t bankId(nextBankIds[event.channel]);
  1035. const uint32_t progId(ctrlEvent.param);
  1036. for (uint32_t k=0; k < pData->midiprog.count; ++k)
  1037. {
  1038. if (pData->midiprog.data[k].bank == bankId && pData->midiprog.data[k].program == progId)
  1039. {
  1040. fluid_synth_program_select(fSynth, event.channel, fSynthId, bankId, progId);
  1041. fCurMidiProgs[event.channel] = k;
  1042. if (event.channel == pData->ctrlChannel)
  1043. pData->postponeRtEvent(kPluginPostRtEventMidiProgramChange, k, 0, 0.0f);
  1044. break;
  1045. }
  1046. }
  1047. }
  1048. break;
  1049. case kEngineControlEventTypeAllSoundOff:
  1050. if (pData->options & PLUGIN_OPTION_SEND_ALL_SOUND_OFF)
  1051. {
  1052. #ifdef FLUIDSYNTH_VERSION_NEW_API
  1053. fluid_synth_all_sounds_off(fSynth, event.channel);
  1054. #else
  1055. fluid_synth_cc(fSynth, event.channel, MIDI_CONTROL_ALL_SOUND_OFF, 0);
  1056. #endif
  1057. }
  1058. break;
  1059. case kEngineControlEventTypeAllNotesOff:
  1060. if (pData->options & PLUGIN_OPTION_SEND_ALL_SOUND_OFF)
  1061. {
  1062. if (event.channel == pData->ctrlChannel && ! allNotesOffSent)
  1063. {
  1064. allNotesOffSent = true;
  1065. sendMidiAllNotesOffToCallback();
  1066. }
  1067. #ifdef FLUIDSYNTH_VERSION_NEW_API
  1068. fluid_synth_all_notes_off(fSynth, event.channel);
  1069. #else
  1070. fluid_synth_cc(fSynth, event.channel, MIDI_CONTROL_ALL_NOTES_OFF, 0);
  1071. #endif
  1072. }
  1073. break;
  1074. }
  1075. break;
  1076. }
  1077. case kEngineEventTypeMidi:
  1078. {
  1079. const EngineMidiEvent& midiEvent(event.midi);
  1080. uint8_t status = uint8_t(MIDI_GET_STATUS_FROM_DATA(midiEvent.data));
  1081. uint8_t channel = event.channel;
  1082. // Fix bad note-off
  1083. if (MIDI_IS_STATUS_NOTE_ON(status) && midiEvent.data[2] == 0)
  1084. status = MIDI_STATUS_NOTE_OFF;
  1085. if (MIDI_IS_STATUS_NOTE_OFF(status))
  1086. {
  1087. const uint8_t note = midiEvent.data[1];
  1088. fluid_synth_noteoff(fSynth, channel, note);
  1089. pData->postponeRtEvent(kPluginPostRtEventNoteOff, channel, note, 0.0f);
  1090. }
  1091. else if (MIDI_IS_STATUS_NOTE_ON(status))
  1092. {
  1093. const uint8_t note = midiEvent.data[1];
  1094. const uint8_t velo = midiEvent.data[2];
  1095. fluid_synth_noteon(fSynth, channel, note, velo);
  1096. pData->postponeRtEvent(kPluginPostRtEventNoteOn, channel, note, velo);
  1097. }
  1098. else if (MIDI_IS_STATUS_POLYPHONIC_AFTERTOUCH(status) && (pData->options & PLUGIN_OPTION_SEND_NOTE_AFTERTOUCH) != 0)
  1099. {
  1100. //const uint8_t note = midiEvent.data[1];
  1101. //const uint8_t pressure = midiEvent.data[2];
  1102. // TODO, not in fluidsynth API
  1103. }
  1104. else if (MIDI_IS_STATUS_CONTROL_CHANGE(status) && (pData->options & PLUGIN_OPTION_SEND_CONTROL_CHANGES) != 0)
  1105. {
  1106. const uint8_t control = midiEvent.data[1];
  1107. const uint8_t value = midiEvent.data[2];
  1108. fluid_synth_cc(fSynth, channel, control, value);
  1109. }
  1110. else if (MIDI_IS_STATUS_CHANNEL_PRESSURE(status) && (pData->options & PLUGIN_OPTION_SEND_CHANNEL_PRESSURE) != 0)
  1111. {
  1112. const uint8_t pressure = midiEvent.data[1];
  1113. fluid_synth_channel_pressure(fSynth, channel, pressure);;
  1114. }
  1115. else if (MIDI_IS_STATUS_PITCH_WHEEL_CONTROL(status) && (pData->options & PLUGIN_OPTION_SEND_PITCHBEND) != 0)
  1116. {
  1117. const uint8_t lsb = midiEvent.data[1];
  1118. const uint8_t msb = midiEvent.data[2];
  1119. const int value = ((msb << 7) | lsb) - 8192;
  1120. fluid_synth_pitch_bend(fSynth, channel, value);
  1121. }
  1122. break;
  1123. }
  1124. }
  1125. }
  1126. pData->postRtEvents.trySplice();
  1127. if (frames > timeOffset)
  1128. processSingle(outBuffer, frames - timeOffset, timeOffset);
  1129. } // End of Event Input and Processing
  1130. CARLA_PROCESS_CONTINUE_CHECK;
  1131. // --------------------------------------------------------------------------------------------------------
  1132. // Control Output
  1133. {
  1134. uint32_t k = FluidSynthVoiceCount;
  1135. fParamBuffers[k] = float(fluid_synth_get_active_voice_count(fSynth));
  1136. pData->param.ranges[k].fixValue(fParamBuffers[k]);
  1137. if (pData->param.data[k].midiCC > 0)
  1138. {
  1139. float value(pData->param.ranges[k].getNormalizedValue(fParamBuffers[k]));
  1140. pData->event.portOut->writeControlEvent(0, pData->param.data[k].midiChannel, kEngineControlEventTypeParameter, pData->param.data[k].midiCC, value);
  1141. }
  1142. } // End of Control Output
  1143. }
  1144. bool processSingle(float** const outBuffer, const uint32_t frames, const uint32_t timeOffset)
  1145. {
  1146. CARLA_SAFE_ASSERT_RETURN(outBuffer != nullptr, false);
  1147. CARLA_SAFE_ASSERT_RETURN(frames > 0, false);
  1148. // --------------------------------------------------------------------------------------------------------
  1149. // Try lock, silence otherwise
  1150. if (pData->engine->isOffline())
  1151. {
  1152. pData->singleMutex.lock();
  1153. }
  1154. else if (! pData->singleMutex.tryLock())
  1155. {
  1156. for (uint32_t i=0; i < pData->audioOut.count; ++i)
  1157. {
  1158. for (uint32_t k=0; k < frames; ++k)
  1159. outBuffer[i][k+timeOffset] = 0.0f;
  1160. }
  1161. return false;
  1162. }
  1163. // --------------------------------------------------------------------------------------------------------
  1164. // Fill plugin buffers and Run plugin
  1165. if (fUses16Outs)
  1166. {
  1167. for (uint32_t i=0; i < pData->audioOut.count; ++i)
  1168. FLOAT_CLEAR(fAudio16Buffers[i], frames);
  1169. fluid_synth_process(fSynth, frames, 0, nullptr, pData->audioOut.count, fAudio16Buffers);
  1170. }
  1171. else
  1172. fluid_synth_write_float(fSynth, frames, outBuffer[0] + timeOffset, 0, 1, outBuffer[1] + timeOffset, 0, 1);
  1173. #ifndef BUILD_BRIDGE
  1174. // --------------------------------------------------------------------------------------------------------
  1175. // Post-processing (volume and balance)
  1176. {
  1177. // note - balance not possible with fUses16Outs, so we can safely skip fAudioOutBuffers
  1178. const bool doVolume = (pData->hints & PLUGIN_CAN_VOLUME) > 0 && pData->postProc.volume != 1.0f;
  1179. const bool doBalance = (pData->hints & PLUGIN_CAN_BALANCE) > 0 && (pData->postProc.balanceLeft != -1.0f || pData->postProc.balanceRight != 1.0f);
  1180. float oldBufLeft[doBalance ? frames : 1];
  1181. for (uint32_t i=0; i < pData->audioOut.count; ++i)
  1182. {
  1183. // Balance
  1184. if (doBalance)
  1185. {
  1186. if (i % 2 == 0)
  1187. FLOAT_COPY(oldBufLeft, outBuffer[i]+timeOffset, frames);
  1188. float balRangeL = (pData->postProc.balanceLeft + 1.0f)/2.0f;
  1189. float balRangeR = (pData->postProc.balanceRight + 1.0f)/2.0f;
  1190. for (uint32_t k=0; k < frames; ++k)
  1191. {
  1192. if (i % 2 == 0)
  1193. {
  1194. // left
  1195. outBuffer[i][k+timeOffset] = oldBufLeft[k] * (1.0f - balRangeL);
  1196. outBuffer[i][k+timeOffset] += outBuffer[i+1][k+timeOffset] * (1.0f - balRangeR);
  1197. }
  1198. else
  1199. {
  1200. // right
  1201. outBuffer[i][k+timeOffset] = outBuffer[i][k+timeOffset] * balRangeR;
  1202. outBuffer[i][k+timeOffset] += oldBufLeft[k] * balRangeL;
  1203. }
  1204. }
  1205. }
  1206. // Volume
  1207. if (fUses16Outs)
  1208. {
  1209. for (uint32_t k=0; k < frames; ++k)
  1210. outBuffer[i][k+timeOffset] = fAudio16Buffers[i][k] * pData->postProc.volume;
  1211. }
  1212. else if (doVolume)
  1213. {
  1214. for (uint32_t k=0; k < frames; ++k)
  1215. outBuffer[i][k+timeOffset] *= pData->postProc.volume;
  1216. }
  1217. }
  1218. } // End of Post-processing
  1219. #else
  1220. if (fUses16Outs)
  1221. {
  1222. for (uint32_t i=0; i < pData->audioOut.count; ++i)
  1223. {
  1224. for (uint32_t k=0; k < frames; ++k)
  1225. outBuffer[i][k+timeOffset] = fAudio16Buffers[i][k];
  1226. }
  1227. }
  1228. #endif
  1229. // --------------------------------------------------------------------------------------------------------
  1230. pData->singleMutex.unlock();
  1231. return true;
  1232. }
  1233. void bufferSizeChanged(const uint32_t newBufferSize) override
  1234. {
  1235. if (! fUses16Outs)
  1236. return;
  1237. for (uint32_t i=0; i < pData->audioOut.count; ++i)
  1238. {
  1239. if (fAudio16Buffers[i] != nullptr)
  1240. delete[] fAudio16Buffers[i];
  1241. fAudio16Buffers[i] = new float[newBufferSize];
  1242. }
  1243. }
  1244. void sampleRateChanged(const double newSampleRate) override
  1245. {
  1246. CARLA_SAFE_ASSERT_RETURN(fSettings != nullptr,);
  1247. fluid_settings_setnum(fSettings, "synth.sample-rate", newSampleRate);
  1248. #ifdef FLUIDSYNTH_VERSION_NEW_API
  1249. CARLA_SAFE_ASSERT_RETURN(fSynth != nullptr,);
  1250. fluid_synth_set_sample_rate(fSynth, float(newSampleRate));
  1251. #endif
  1252. }
  1253. // -------------------------------------------------------------------
  1254. // Plugin buffers
  1255. void clearBuffers() override
  1256. {
  1257. carla_debug("FluidSynthPlugin::clearBuffers() - start");
  1258. if (fAudio16Buffers != nullptr)
  1259. {
  1260. for (uint32_t i=0; i < pData->audioOut.count; ++i)
  1261. {
  1262. if (fAudio16Buffers[i] != nullptr)
  1263. {
  1264. delete[] fAudio16Buffers[i];
  1265. fAudio16Buffers[i] = nullptr;
  1266. }
  1267. }
  1268. delete[] fAudio16Buffers;
  1269. fAudio16Buffers = nullptr;
  1270. }
  1271. CarlaPlugin::clearBuffers();
  1272. carla_debug("FluidSynthPlugin::clearBuffers() - end");
  1273. }
  1274. // -------------------------------------------------------------------
  1275. const void* getExtraStuff() const noexcept override
  1276. {
  1277. static const char xtrue[] = "true";
  1278. static const char xfalse[] = "false";
  1279. return fUses16Outs ? xtrue : xfalse;
  1280. }
  1281. bool init(const char* const filename, const char* const name, const char* const label)
  1282. {
  1283. CARLA_SAFE_ASSERT_RETURN(pData->engine != nullptr, false);
  1284. // ---------------------------------------------------------------
  1285. // first checks
  1286. if (pData->client != nullptr)
  1287. {
  1288. pData->engine->setLastError("Plugin client is already registered");
  1289. return false;
  1290. }
  1291. if (fSynth == nullptr)
  1292. {
  1293. pData->engine->setLastError("null synth");
  1294. return false;
  1295. }
  1296. if (filename == nullptr || filename[0] == '\0')
  1297. {
  1298. pData->engine->setLastError("null filename");
  1299. return false;
  1300. }
  1301. if (label == nullptr || label[0] == '\0')
  1302. {
  1303. pData->engine->setLastError("null label");
  1304. return false;
  1305. }
  1306. // ---------------------------------------------------------------
  1307. // open soundfont
  1308. fSynthId = fluid_synth_sfload(fSynth, filename, 0);
  1309. if (fSynthId < 0)
  1310. {
  1311. pData->engine->setLastError("Failed to load SoundFont file");
  1312. return false;
  1313. }
  1314. // ---------------------------------------------------------------
  1315. // get info
  1316. CarlaString label2(label);
  1317. if (fUses16Outs && ! label2.endsWith(" (16 outs)"))
  1318. label2 += " (16 outs)";
  1319. fLabel = label2.dup();
  1320. pData->filename = carla_strdup(filename);
  1321. if (name != nullptr && name[0] != '\0')
  1322. pData->name = pData->engine->getUniquePluginName(name);
  1323. else
  1324. pData->name = pData->engine->getUniquePluginName(label);
  1325. // ---------------------------------------------------------------
  1326. // register client
  1327. pData->client = pData->engine->addClient(this);
  1328. if (pData->client == nullptr || ! pData->client->isOk())
  1329. {
  1330. pData->engine->setLastError("Failed to register plugin client");
  1331. return false;
  1332. }
  1333. // ---------------------------------------------------------------
  1334. // load plugin settings
  1335. {
  1336. // set default options
  1337. pData->options = 0x0;
  1338. pData->options |= PLUGIN_OPTION_MAP_PROGRAM_CHANGES;
  1339. pData->options |= PLUGIN_OPTION_SEND_CHANNEL_PRESSURE;
  1340. pData->options |= PLUGIN_OPTION_SEND_PITCHBEND;
  1341. pData->options |= PLUGIN_OPTION_SEND_ALL_SOUND_OFF;
  1342. // set identifier string
  1343. CarlaString identifier("SF2/");
  1344. if (const char* const shortname = std::strrchr(filename, OS_SEP))
  1345. identifier += shortname+1;
  1346. else
  1347. identifier += label;
  1348. pData->identifier = identifier.dup();
  1349. // load settings
  1350. pData->options = pData->loadSettings(pData->options, getOptionsAvailable());
  1351. }
  1352. return true;
  1353. }
  1354. private:
  1355. enum FluidSynthInputParameters {
  1356. FluidSynthReverbOnOff = 0,
  1357. FluidSynthReverbRoomSize = 1,
  1358. FluidSynthReverbDamp = 2,
  1359. FluidSynthReverbLevel = 3,
  1360. FluidSynthReverbWidth = 4,
  1361. FluidSynthChorusOnOff = 5,
  1362. FluidSynthChorusNr = 6,
  1363. FluidSynthChorusLevel = 7,
  1364. FluidSynthChorusSpeedHz = 8,
  1365. FluidSynthChorusDepthMs = 9,
  1366. FluidSynthChorusType = 10,
  1367. FluidSynthPolyphony = 11,
  1368. FluidSynthInterpolation = 12,
  1369. FluidSynthVoiceCount = 13,
  1370. FluidSynthParametersMax = 14
  1371. };
  1372. const bool fUses16Outs;
  1373. fluid_settings_t* fSettings;
  1374. fluid_synth_t* fSynth;
  1375. int fSynthId;
  1376. float** fAudio16Buffers;
  1377. float fParamBuffers[FluidSynthParametersMax];
  1378. int32_t fCurMidiProgs[MAX_MIDI_CHANNELS];
  1379. const char* fLabel;
  1380. CARLA_DECLARE_NON_COPYABLE_WITH_LEAK_DETECTOR(FluidSynthPlugin)
  1381. };
  1382. CARLA_BACKEND_END_NAMESPACE
  1383. #endif // WANT_FLUIDSYNTH
  1384. CARLA_BACKEND_START_NAMESPACE
  1385. CarlaPlugin* CarlaPlugin::newFluidSynth(const Initializer& init, const bool use16Outs)
  1386. {
  1387. carla_debug("CarlaPlugin::newFluidSynth({%p, \"%s\", \"%s\", \"%s\"}, %s)", init.engine, init.filename, init.name, init.label, bool2str(use16Outs));
  1388. #ifdef WANT_FLUIDSYNTH
  1389. if (init.engine->getProccessMode() == ENGINE_PROCESS_MODE_CONTINUOUS_RACK && use16Outs)
  1390. {
  1391. init.engine->setLastError("Carla's rack mode can only work with Stereo modules, please choose the 2-channel only SoundFont version");
  1392. return nullptr;
  1393. }
  1394. if (! fluid_is_soundfont(init.filename))
  1395. {
  1396. init.engine->setLastError("Requested file is not a valid SoundFont");
  1397. return nullptr;
  1398. }
  1399. FluidSynthPlugin* const plugin(new FluidSynthPlugin(init.engine, init.id, use16Outs));
  1400. if (! plugin->init(init.filename, init.name, init.label))
  1401. {
  1402. delete plugin;
  1403. return nullptr;
  1404. }
  1405. plugin->reload();
  1406. return plugin;
  1407. #else
  1408. init.engine->setLastError("fluidsynth support not available");
  1409. return nullptr;
  1410. // unused
  1411. (void)use16Outs;
  1412. #endif
  1413. }
  1414. CARLA_BACKEND_END_NAMESPACE