Browse Source

More DISTHRO work, first Nekobi plugin code

tags/1.9.4
falkTX 11 years ago
parent
commit
594d73eb0e
37 changed files with 11718 additions and 6 deletions
  1. +4
    -0
      source/backend/native/Makefile
  2. +58
    -0
      source/backend/native/distrho-nekobi.cpp
  3. +4
    -4
      source/backend/native/distrho/DistrhoPluginCarla.cpp
  4. +7294
    -0
      source/backend/native/nekobi/DistrhoArtworkNekobi.cpp
  5. +75
    -0
      source/backend/native/nekobi/DistrhoArtworkNekobi.hpp
  6. +37
    -0
      source/backend/native/nekobi/DistrhoPluginInfo.h
  7. +422
    -0
      source/backend/native/nekobi/DistrhoPluginNekobi.cpp
  8. +117
    -0
      source/backend/native/nekobi/DistrhoPluginNekobi.hpp
  9. +279
    -0
      source/backend/native/nekobi/DistrhoUINekobi.cpp
  10. +101
    -0
      source/backend/native/nekobi/DistrhoUINekobi.hpp
  11. +191
    -0
      source/backend/native/nekobi/NekoWidget.hpp
  12. BIN
      source/backend/native/nekobi/artwork/background.png
  13. BIN
      source/backend/native/nekobi/artwork/claw1.png
  14. BIN
      source/backend/native/nekobi/artwork/claw2.png
  15. BIN
      source/backend/native/nekobi/artwork/knob.png
  16. BIN
      source/backend/native/nekobi/artwork/run1.png
  17. BIN
      source/backend/native/nekobi/artwork/run2.png
  18. BIN
      source/backend/native/nekobi/artwork/run3.png
  19. BIN
      source/backend/native/nekobi/artwork/run4.png
  20. BIN
      source/backend/native/nekobi/artwork/scratch1.png
  21. BIN
      source/backend/native/nekobi/artwork/scratch2.png
  22. BIN
      source/backend/native/nekobi/artwork/sit.png
  23. BIN
      source/backend/native/nekobi/artwork/slider.png
  24. BIN
      source/backend/native/nekobi/artwork/tail.png
  25. +1779
    -0
      source/backend/native/nekobi/nekobee-src/minblep_tables.c
  26. +77
    -0
      source/backend/native/nekobi/nekobee-src/nekobee.h
  27. +236
    -0
      source/backend/native/nekobi/nekobee-src/nekobee_synth.c
  28. +132
    -0
      source/backend/native/nekobi/nekobee-src/nekobee_synth.h
  29. +30
    -0
      source/backend/native/nekobi/nekobee-src/nekobee_types.h
  30. +256
    -0
      source/backend/native/nekobi/nekobee-src/nekobee_voice.c
  31. +183
    -0
      source/backend/native/nekobi/nekobee-src/nekobee_voice.h
  32. +410
    -0
      source/backend/native/nekobi/nekobee-src/nekobee_voice_render.c
  33. +1
    -0
      source/backend/plugin/NativePlugin.cpp
  34. +19
    -0
      source/libs/distrho/DistrhoPlugin.hpp
  35. +2
    -0
      source/libs/distrho/dgl/ImageSlider.hpp
  36. +10
    -0
      source/libs/distrho/dgl/src/ImageSlider.cpp
  37. +1
    -2
      source/libs/distrho/src/DistrhoUIInternal.hpp

+ 4
- 0
source/backend/native/Makefile View File

@@ -79,6 +79,7 @@ ifeq ($(HAVE_OPENGL),true)
OBJS += \
distrho-3bandeq.cpp.o \
distrho-3bandsplitter.cpp.o \
distrho-nekobi.cpp.o \
distrho-pingpongpan.cpp.o \
distrho-stereoenhancer.cpp.o
endif
@@ -171,6 +172,9 @@ distrho-3bandeq.cpp.o: distrho-3bandeq.cpp 3bandeq/*.cpp 3bandeq/*.h 3bandeq/*.h
distrho-3bandsplitter.cpp.o: distrho-3bandsplitter.cpp 3bandsplitter/*.cpp 3bandsplitter/*.h 3bandsplitter/*.hpp distrho/DistrhoPluginCarla.cpp $(CXXDEPS)
$(CXX) $< $(GL_CXX_FLAGS) -I3bandsplitter -DDISTRHO_NAMESPACE=DISTRHO_3BandSplitter -c -o $@

distrho-nekobi.cpp.o: distrho-nekobi.cpp nekobi/*.cpp nekobi/*.h nekobi/*.hpp nekobi/nekobee-src/*.c nekobi/nekobee-src/*.h distrho/DistrhoPluginCarla.cpp $(CXXDEPS)
$(CXX) $< $(GL_CXX_FLAGS) -Inekobi -DDISTRHO_NAMESPACE=DISTRHO_Nekobi -c -o $@

distrho-pingpongpan.cpp.o: distrho-pingpongpan.cpp pingpongpan/*.cpp pingpongpan/*.h pingpongpan/*.hpp distrho/DistrhoPluginCarla.cpp $(CXXDEPS)
$(CXX) $< $(GL_CXX_FLAGS) -Ipingpongpan -DDISTRHO_NAMESPACE=DISTRHO_PingPongPan -c -o $@



+ 58
- 0
source/backend/native/distrho-nekobi.cpp View File

@@ -0,0 +1,58 @@
/*
* Carla Native Plugins
* Copyright (C) 2012-2013 Filipe Coelho <falktx@falktx.com>
*
* This program is free software; you can redistribute it and/or
* modify it under the terms of the GNU General Public License as
* published by the Free Software Foundation; either version 2 of
* the License, or any later version.
*
* This program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
* GNU General Public License for more details.
*
* For a full copy of the GNU General Public License see the GPL.txt file
*/

#include "CarlaNative.hpp"

// Plugin Code
#include "nekobi/DistrhoArtworkNekobi.cpp"
#include "nekobi/DistrhoPluginNekobi.cpp"
#include "nekobi/DistrhoUINekobi.cpp"

// Carla DISTRHO Plugin
#include "distrho/DistrhoPluginCarla.cpp"

START_NAMESPACE_DISTRHO

// -----------------------------------------------------------------------

static const PluginDescriptor nekobiDesc = {
/* category */ PLUGIN_CATEGORY_EQ,
/* hints */ static_cast<PluginHints>(PLUGIN_IS_RTSAFE|PLUGIN_IS_SYNTH|PLUGIN_HAS_GUI),
/* audioIns */ DISTRHO_PLUGIN_NUM_INPUTS,
/* audioOuts */ DISTRHO_PLUGIN_NUM_OUTPUTS,
/* midiIns */ 1,
/* midiOuts */ 0,
/* paramIns */ DistrhoPluginNekobi::paramCount,
/* paramOuts */ 0,
/* name */ DISTRHO_PLUGIN_NAME,
/* label */ "Nekobi",
/* maker */ "falkTX",
/* copyright */ "GPL v2+",
PluginDescriptorFILL(PluginCarla)
};

END_NAMESPACE_DISTRHO

// -----------------------------------------------------------------------

void carla_register_native_plugin_Nekobi()
{
USE_NAMESPACE_DISTRHO
carla_register_native_plugin(&nekobiDesc);
}

// -----------------------------------------------------------------------

+ 4
- 4
source/backend/native/distrho/DistrhoPluginCarla.cpp View File

@@ -378,10 +378,10 @@ protected:
const ::MidiEvent* const midiEvent = &midiEvents[i];
MidiEvent* const realMidiEvent = &fRealMidiEvents[i];

realMidiEvent->buffer[0] = midiEvent->data[0];
realMidiEvent->buffer[1] = midiEvent->data[1];
realMidiEvent->buffer[2] = midiEvent->data[2];
realMidiEvent->frame = midiEvent->time;
realMidiEvent->frame = midiEvent->time;
realMidiEvent->size = midiEvent->size;
carla_copy<uint8_t>(realMidiEvent->buf, midiEvent->data, midiEvent->size);
}

fPlugin.run(inBuffer, outBuffer, frames, i, fRealMidiEvents);


+ 7294
- 0
source/backend/native/nekobi/DistrhoArtworkNekobi.cpp
File diff suppressed because it is too large
View File


+ 75
- 0
source/backend/native/nekobi/DistrhoArtworkNekobi.hpp View File

@@ -0,0 +1,75 @@
/* (Auto-generated binary data file). */

#ifndef BINARY_DISTRHOARTWORKNEKOBI_HPP
#define BINARY_DISTRHOARTWORKNEKOBI_HPP

namespace DistrhoArtworkNekobi
{
extern const char* backgroundData;
const unsigned int backgroundDataSize = 206064;
const unsigned int backgroundWidth = 636;
const unsigned int backgroundHeight = 108;

extern const char* claw1Data;
const unsigned int claw1DataSize = 4096;
const unsigned int claw1Width = 32;
const unsigned int claw1Height = 32;

extern const char* claw2Data;
const unsigned int claw2DataSize = 4096;
const unsigned int claw2Width = 32;
const unsigned int claw2Height = 32;

extern const char* knobData;
const unsigned int knobDataSize = 288444;
const unsigned int knobWidth = 43;
const unsigned int knobHeight = 1677;

extern const char* run1Data;
const unsigned int run1DataSize = 4096;
const unsigned int run1Width = 32;
const unsigned int run1Height = 32;

extern const char* run2Data;
const unsigned int run2DataSize = 4096;
const unsigned int run2Width = 32;
const unsigned int run2Height = 32;

extern const char* run3Data;
const unsigned int run3DataSize = 4096;
const unsigned int run3Width = 32;
const unsigned int run3Height = 32;

extern const char* run4Data;
const unsigned int run4DataSize = 4096;
const unsigned int run4Width = 32;
const unsigned int run4Height = 32;

extern const char* scratch1Data;
const unsigned int scratch1DataSize = 4096;
const unsigned int scratch1Width = 32;
const unsigned int scratch1Height = 32;

extern const char* scratch2Data;
const unsigned int scratch2DataSize = 4096;
const unsigned int scratch2Width = 32;
const unsigned int scratch2Height = 32;

extern const char* sitData;
const unsigned int sitDataSize = 4096;
const unsigned int sitWidth = 32;
const unsigned int sitHeight = 32;

extern const char* sliderData;
const unsigned int sliderDataSize = 4624;
const unsigned int sliderWidth = 34;
const unsigned int sliderHeight = 34;

extern const char* tailData;
const unsigned int tailDataSize = 4096;
const unsigned int tailWidth = 32;
const unsigned int tailHeight = 32;
}

#endif // BINARY_DISTRHOARTWORKNEKOBI_HPP


+ 37
- 0
source/backend/native/nekobi/DistrhoPluginInfo.h View File

@@ -0,0 +1,37 @@
/*
* DISTRHO Nekobi Plugin, based on Nekobee by Sean Bolton and others.
* Copyright (C) 2013 Filipe Coelho <falktx@falktx.com>
*
* This program is free software; you can redistribute it and/or
* modify it under the terms of the GNU General Public License as
* published by the Free Software Foundation; either version 2 of
* the License, or any later version.
*
* This program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
* GNU General Public License for more details.
*
* For a full copy of the GNU General Public License see the GPL.txt file
*/

#ifndef __DISTRHO_PLUGIN_INFO_H__
#define __DISTRHO_PLUGIN_INFO_H__

#define DISTRHO_PLUGIN_NAME "Nekobi"

#define DISTRHO_PLUGIN_HAS_UI 1
#define DISTRHO_PLUGIN_IS_SYNTH 1

#define DISTRHO_PLUGIN_NUM_INPUTS 0
#define DISTRHO_PLUGIN_NUM_OUTPUTS 1

#define DISTRHO_PLUGIN_WANT_LATENCY 0
#define DISTRHO_PLUGIN_WANT_PROGRAMS 1
#define DISTRHO_PLUGIN_WANT_STATE 0

#define DISTRHO_PLUGIN_URI "http://distrho.sf.net/plugins/Nekobi"

#define DISTRHO_UI_OPENGL

#endif // __DISTRHO_PLUGIN_INFO_H__

+ 422
- 0
source/backend/native/nekobi/DistrhoPluginNekobi.cpp View File

@@ -0,0 +1,422 @@
/*
* DISTRHO Nekobi Plugin, based on Nekobee by Sean Bolton and others.
* Copyright (C) 2004 Sean Bolton and others
* Copyright (C) 2013 Filipe Coelho <falktx@falktx.com>
*
* This program is free software; you can redistribute it and/or
* modify it under the terms of the GNU General Public License as
* published by the Free Software Foundation; either version 2 of
* the License, or any later version.
*
* This program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
* GNU General Public License for more details.
*
* For a full copy of the GNU General Public License see the GPL.txt file
*/
#include "DistrhoPluginNekobi.hpp"
#include "CarlaUtils.hpp"
extern "C" {
#include "nekobee-src/nekobee_synth.c"
#include "nekobee-src/nekobee_voice.c"
#include "nekobee-src/nekobee_voice_render.c"
#include "nekobee-src/minblep_tables.c"
/* ---- mutual exclusion ---- */
bool dssp_voicelist_mutex_trylock(nekobee_synth_t* synth)
{
/* Attempt the mutex lock */
if (pthread_mutex_trylock(&synth->voicelist_mutex) != 0)
{
synth->voicelist_mutex_grab_failed = 1;
return false;
}
/* Clean up if a previous mutex grab failed */
if (synth->voicelist_mutex_grab_failed)
{
nekobee_synth_all_voices_off(synth);
synth->voicelist_mutex_grab_failed = 0;
}
return true;
}
bool dssp_voicelist_mutex_lock(nekobee_synth_t* synth)
{
return (pthread_mutex_lock(&synth->voicelist_mutex) == 0);
}
bool dssp_voicelist_mutex_unlock(nekobee_synth_t *synth)
{
return (pthread_mutex_unlock(&synth->voicelist_mutex) == 0);
}
/*
* nekobee_handle_raw_event
*/
void nekobee_handle_raw_event(nekobee_synth_t* synth, uint8_t size, const uint8_t* data)
{
if (size != 3)
return;
switch (data[0] & 0xf0)
{
case 0x80:
nekobee_synth_note_off(synth, data[1], data[2]);
break;
case 0x90:
if (data[2] > 0)
nekobee_synth_note_on(synth, data[1], data[2]);
else
nekobee_synth_note_off(synth, data[1], 64); /* shouldn't happen, but... */
break;
case 0xB0:
nekobee_synth_control_change(synth, data[1], data[2]);
break;
default:
break;
}
}
} /* extern "C" */
START_NAMESPACE_DISTRHO
// -------------------------------------------------
DistrhoPluginNekobi::DistrhoPluginNekobi()
: Plugin(paramCount, 1, 0) // 1 program, 0 states
{
nekobee_init_tables();
// init synth
fSynth = new nekobee_synth_t;
fSynth->sample_rate = d_sampleRate();
fSynth->deltat = 1.0f / (float)d_sampleRate();
fSynth->nugget_remains = 0;
fSynth->note_id = 0;
fSynth->polyphony = XSYNTH_DEFAULT_POLYPHONY;
fSynth->voices = XSYNTH_DEFAULT_POLYPHONY;
fSynth->monophonic = XSYNTH_MONO_MODE_ONCE;
fSynth->glide = 0;
fSynth->last_noteon_pitch = 0.0f;
fSynth->vcf_accent = 0.0f;
fSynth->vca_accent = 0.0f;
for (int i=0; i<8; ++i)
fSynth->held_keys[i] = -1;
fSynth->voice = nekobee_voice_new();
fSynth->voicelist_mutex_grab_failed = 0;
pthread_mutex_init(&fSynth->voicelist_mutex, NULL);
fSynth->channel_pressure = 0;
fSynth->pitch_wheel_sensitivity = 0;
fSynth->pitch_wheel = 0;
for (int i=0; i<128; ++i)
{
fSynth->key_pressure[i] = 0;
fSynth->cc[i] = 0;
}
fSynth->cc[7] = 127; // full volume
fSynth->mod_wheel = 1.0f;
fSynth->pitch_bend = 1.0f;
fSynth->cc_volume = 1.0f;
// set default values
d_setProgram(0);
// reset
d_deactivate();
}
DistrhoPluginNekobi::~DistrhoPluginNekobi()
{
free(fSynth->voice);
delete fSynth;
}
// -------------------------------------------------
// Init
void DistrhoPluginNekobi::d_initParameter(uint32_t index, Parameter& parameter)
{
switch (index)
{
case paramWaveform:
parameter.hints = PARAMETER_IS_AUTOMABLE|PARAMETER_IS_BOOLEAN;
parameter.name = "Waveform";
parameter.symbol = "waveform";
parameter.ranges.def = 0.0f;
parameter.ranges.min = 0.0f;
parameter.ranges.max = 1.0f;
break;
case paramTuning:
parameter.hints = PARAMETER_IS_AUTOMABLE; // was 0.5 <-> 2.0, log
parameter.name = "Tuning";
parameter.symbol = "tuning";
parameter.ranges.def = 0.0f;
parameter.ranges.min = -12.0f;
parameter.ranges.max = 12.0f;
break;
case paramCutoff:
parameter.hints = PARAMETER_IS_AUTOMABLE; // modified x2.5
parameter.name = "Cutoff";
parameter.symbol = "cutoff";
parameter.unit = "%";
parameter.ranges.def = 25.0f;
parameter.ranges.min = 0.0f;
parameter.ranges.max = 100.0f;
break;
case paramResonance:
parameter.hints = PARAMETER_IS_AUTOMABLE; // modified x100
parameter.name = "VCF Resonance";
parameter.symbol = "resonance";
parameter.unit = "%";
parameter.ranges.def = 25.0f;
parameter.ranges.min = 0.0f;
parameter.ranges.max = 95.0f;
break;
case paramEnvMod:
parameter.hints = PARAMETER_IS_AUTOMABLE; // modified x100
parameter.name = "Env Mod";
parameter.symbol = "env_mod";
parameter.unit = "%";
parameter.ranges.def = 50.0f;
parameter.ranges.min = 0.0f;
parameter.ranges.max = 100.0f;
break;
case paramDecay:
parameter.hints = PARAMETER_IS_AUTOMABLE; // was 0.000009 <-> 0.0005, log
parameter.name = "Decay";
parameter.symbol = "decay";
parameter.unit = "%";
parameter.ranges.def = 75.0f;
parameter.ranges.min = 0.0f;
parameter.ranges.max = 100.0f;
break;
case paramAccent:
parameter.hints = PARAMETER_IS_AUTOMABLE; // modified x100
parameter.name = "Accent";
parameter.symbol = "accent";
parameter.unit = "%";
parameter.ranges.def = 25.0f;
parameter.ranges.min = 0.0f;
parameter.ranges.max = 100.0f;
break;
case paramVolume:
parameter.hints = PARAMETER_IS_AUTOMABLE; // modified x100
parameter.name = "Volume";
parameter.symbol = "volume";
parameter.unit = "%";
parameter.ranges.def = 75.0f;
parameter.ranges.min = 0.0f;
parameter.ranges.max = 100.0f;
break;
}
}
void DistrhoPluginNekobi::d_initProgramName(uint32_t index, d_string& programName)
{
if (index != 0)
return;
programName = "Default";
}
// -------------------------------------------------
// Internal data
float DistrhoPluginNekobi::d_parameterValue(uint32_t index)
{
switch (index)
{
case paramWaveform:
return fParams.waveform;
case paramTuning:
return fParams.tuning;
case paramCutoff:
return fParams.cutoff;
case paramResonance:
return fParams.resonance;
case paramEnvMod:
return fParams.envMod;
case paramDecay:
return fParams.decay;
case paramAccent:
return fParams.accent;
case paramVolume:
return fParams.volume;
}
return 0.0f;
}
void DistrhoPluginNekobi::d_setParameterValue(uint32_t index, float value)
{
switch (index)
{
case paramWaveform:
fParams.waveform = value;
fSynth->waveform = value;
CARLA_SAFE_ASSERT_INT2(fSynth->waveform == 0.0f || fSynth->waveform == 1.0f, fSynth->waveform, value);
break;
case paramTuning:
fParams.tuning = value;
fSynth->tuning = (value+12.0f)/24.0f * 1.5 + 0.5f; // FIXME: log?
CARLA_SAFE_ASSERT_INT2(fSynth->tuning >= 0.5f && fSynth->tuning <= 2.0f, fSynth->tuning, value);
break;
case paramCutoff:
fParams.cutoff = value;
fSynth->cutoff = value/2.5f;
CARLA_SAFE_ASSERT_INT2(fSynth->cutoff >= 0.0f && fSynth->cutoff <= 40.0f, fSynth->cutoff, value);
break;
case paramResonance:
fParams.resonance = value;
fSynth->resonance = value/100.0f;
CARLA_SAFE_ASSERT_INT2(fSynth->resonance >= 0.0f && fSynth->resonance <= 0.95f, fSynth->resonance, value);
break;
case paramEnvMod:
fParams.envMod = value;
fSynth->envmod = value/100.0f;
CARLA_SAFE_ASSERT_INT2(fSynth->envmod >= 0.0f && fSynth->envmod <= 1.0f, fSynth->envmod, value);
break;
case paramDecay:
fParams.decay = value;
fSynth->decay = value/100.0f * 0.000491f + 0.000009f; // FIXME: log?
CARLA_SAFE_ASSERT_INT2(fSynth->decay >= 0.000009f && fSynth->decay <= 0.0005f, fSynth->decay, value);
break;
case paramAccent:
fParams.accent = value;
fSynth->accent = value/100.0f;
CARLA_SAFE_ASSERT_INT2(fSynth->accent >= 0.0f && fSynth->accent <= 1.0f, fSynth->accent, value);
break;
case paramVolume:
fParams.volume = value;
fSynth->volume = value/100.0f;
CARLA_SAFE_ASSERT_INT2(fSynth->volume >= 0.0f && fSynth->volume <= 1.0f, fSynth->volume, value);
break;
}
}
void DistrhoPluginNekobi::d_setProgram(uint32_t index)
{
if (index != 0)
return;
// Default values
fParams.waveform = 0.0f;
fParams.tuning = 0.0f;
fParams.cutoff = 25.0f;
fParams.resonance = 25.0f;
fParams.envMod = 50.0f;
fParams.decay = 75.0f;
fParams.accent = 25.0f;
fParams.volume = 75.0f;
// Internal stuff
fSynth->waveform = 0.0f;
fSynth->tuning = 1.0f;
fSynth->cutoff = 5.0f;
fSynth->resonance = 0.8f;
fSynth->envmod = 0.3f;
fSynth->decay = 0.0002f;
fSynth->accent = 0.3f;
fSynth->volume = 0.75f;
}
// -------------------------------------------------
// Process
void DistrhoPluginNekobi::d_activate()
{
fSynth->nugget_remains = 0;
fSynth->note_id = 0;
if (fSynth->voice != nullptr)
nekobee_synth_all_voices_off(fSynth);
}
void DistrhoPluginNekobi::d_deactivate()
{
if (fSynth->voice != nullptr)
nekobee_synth_all_voices_off(fSynth);
}
void DistrhoPluginNekobi::d_run(float**, float** outputs, uint32_t frames, uint32_t midiEventCount, const MidiEvent* midiEvents)
{
uint32_t framesDone = 0;
uint32_t curEventIndex = 0;
uint32_t burstSize;
float* out = outputs[0];
if (fSynth->voice == nullptr || ! dssp_voicelist_mutex_trylock(fSynth))
{
for (uint32_t i=0; i < frames; ++i)
*out++ = 0.0f;
return;
}
while (framesDone < frames)
{
if (fSynth->nugget_remains == 0)
fSynth->nugget_remains = XSYNTH_NUGGET_SIZE;
/* process any ready events */
while (curEventIndex < midiEventCount && framesDone == midiEvents[curEventIndex].frame)
{
nekobee_handle_raw_event(fSynth, midiEvents[curEventIndex].size, midiEvents[curEventIndex].buf);
curEventIndex++;
}
/* calculate the sample count (burstSize) for the next nekobee_voice_render() call to be the smallest of:
* - control calculation quantization size (XSYNTH_NUGGET_SIZE, in samples)
* - the number of samples remaining in an already-begun nugget (synth->nugget_remains)
* - the number of samples until the next event is ready
* - the number of samples left in this run
*/
burstSize = XSYNTH_NUGGET_SIZE;
/* we're still in the middle of a nugget, so reduce the burst size
* to end when the nugget ends */
if (fSynth->nugget_remains < burstSize)
burstSize = fSynth->nugget_remains;
/* reduce burst size to end when next event is ready */
if (curEventIndex < midiEventCount && midiEvents[curEventIndex].frame - framesDone < burstSize)
burstSize = midiEvents[curEventIndex].frame - framesDone;
/* reduce burst size to end at end of this run */
if (frames - framesDone < burstSize)
burstSize = frames - framesDone;
/* render the burst */
nekobee_synth_render_voices(fSynth, out + framesDone, burstSize, (burstSize == fSynth->nugget_remains));
framesDone += burstSize;
fSynth->nugget_remains -= burstSize;
}
dssp_voicelist_mutex_unlock(fSynth);
}
// -------------------------------------------------
Plugin* createPlugin()
{
return new DistrhoPluginNekobi();
}
// -------------------------------------------------
END_NAMESPACE_DISTRHO

+ 117
- 0
source/backend/native/nekobi/DistrhoPluginNekobi.hpp View File

@@ -0,0 +1,117 @@
/*
* DISTRHO Nekobi Plugin, based on Nekobee by Sean Bolton and others.
* Copyright (C) 2004 Sean Bolton and others
* Copyright (C) 2013 Filipe Coelho <falktx@falktx.com>
*
* This program is free software; you can redistribute it and/or
* modify it under the terms of the GNU General Public License as
* published by the Free Software Foundation; either version 2 of
* the License, or any later version.
*
* This program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
* GNU General Public License for more details.
*
* For a full copy of the GNU General Public License see the GPL.txt file
*/
#ifndef __DISTRHO_PLUGIN_3BANDEQ_HPP__
#define __DISTRHO_PLUGIN_3BANDEQ_HPP__
#include "DistrhoPlugin.hpp"
extern "C" {
#include "nekobee-src/nekobee_types.h"
}
START_NAMESPACE_DISTRHO
class DistrhoPluginNekobi : public Plugin
{
public:
enum Parameters
{
paramWaveform = 0,
paramTuning,
paramCutoff,
paramResonance,
paramEnvMod,
paramDecay,
paramAccent,
paramVolume,
paramCount
};
DistrhoPluginNekobi();
~DistrhoPluginNekobi();
protected:
// ---------------------------------------------
// Information
const char* d_label() const
{
return "Nekobi";
}
const char* d_maker() const
{
return "DISTRHO";
}
const char* d_license() const
{
return "GPL v2+";
}
uint32_t d_version() const
{
return 0x1000;
}
long d_uniqueId() const
{
return d_cconst('D', 'N', 'e', 'k');
}
// ---------------------------------------------
// Init
void d_initParameter(uint32_t index, Parameter& parameter);
void d_initProgramName(uint32_t index, d_string& programName);
// ---------------------------------------------
// Internal data
float d_parameterValue(uint32_t index);
void d_setParameterValue(uint32_t index, float value);
void d_setProgram(uint32_t index);
// ---------------------------------------------
// Process
void d_activate();
void d_deactivate();
void d_run(float** inputs, float** outputs, uint32_t frames, uint32_t midiEventCount, const MidiEvent* midiEvents);
// ---------------------------------------------
private:
struct ParamValues {
float waveform;
float tuning;
float cutoff;
float resonance;
float envMod;
float decay;
float accent;
float volume;
} fParams;
nekobee_synth_t* fSynth;
};
END_NAMESPACE_DISTRHO
#endif // __DISTRHO_PLUGIN_3BANDEQ_HPP__

+ 279
- 0
source/backend/native/nekobi/DistrhoUINekobi.cpp View File

@@ -0,0 +1,279 @@
/*
* DISTRHO Nekobi Plugin, based on Nekobee by Sean Bolton and others.
* Copyright (C) 2013 Filipe Coelho <falktx@falktx.com>
*
* This program is free software; you can redistribute it and/or
* modify it under the terms of the GNU General Public License as
* published by the Free Software Foundation; either version 2 of
* the License, or any later version.
*
* This program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
* GNU General Public License for more details.
*
* For a full copy of the GNU General Public License see the GPL.txt file
*/

#include "DistrhoUINekobi.hpp"

#include "dgl/ImageAboutWindow.hpp"

START_NAMESPACE_DISTRHO

// -------------------------------------------------

DistrhoUINekobi::DistrhoUINekobi()
: OpenGLUI()
{
Window* win = getParent();

fNeko.setTimerSpeed(4);

// background
fImgBackground = Image(DistrhoArtworkNekobi::backgroundData, DistrhoArtworkNekobi::backgroundWidth, DistrhoArtworkNekobi::backgroundHeight, GL_BGR);

// slider
Image sliderImage(DistrhoArtworkNekobi::sliderData, DistrhoArtworkNekobi::sliderWidth, DistrhoArtworkNekobi::sliderHeight);

fSliderWaveform = new ImageSlider(win, sliderImage);
fSliderWaveform->setStartPos(135, 39);
fSliderWaveform->setEndPos(135, 65);
fSliderWaveform->setRange(0.0f, 1.0f);
fSliderWaveform->setValue(0.0f);
fSliderWaveform->setCallback(this);

// knobs
Image knobImage(DistrhoArtworkNekobi::knobData, DistrhoArtworkNekobi::knobWidth, DistrhoArtworkNekobi::knobHeight);

// knob Tuning
fKnobTuning = new ImageKnob(win, knobImage);
fKnobTuning->setPos(44, 46);
fKnobTuning->setRange(-12.0f, 12.0f);
fKnobTuning->setValue(0.0f);
fKnobTuning->setCallback(this);

// knob Cutoff
fKnobCutoff = new ImageKnob(win, knobImage);
fKnobCutoff->setPos(187, 46);
fKnobCutoff->setRange(0.0f, 100.0f);
fKnobCutoff->setValue(25.0f);
fKnobCutoff->setCallback(this);

// knob Resonance
fKnobResonance = new ImageKnob(win, knobImage);
fKnobResonance->setPos(260, 46);
fKnobResonance->setRange(0.0f, 95.0f);
fKnobResonance->setValue(25.0f);
fKnobResonance->setCallback(this);

// knob Env Mod
fKnobEnvMod = new ImageKnob(win, knobImage);
fKnobEnvMod->setPos(332, 46);
fKnobEnvMod->setRange(0.0f, 100.0f);
fKnobEnvMod->setValue(50.0f);
fKnobEnvMod->setCallback(this);

// knob Decay
fKnobDecay = new ImageKnob(win, knobImage);
fKnobDecay->setPos(404, 46);
fKnobDecay->setRange(0.0f, 100.0f);
fKnobDecay->setValue(75.0f);
fKnobDecay->setCallback(this);

// knob Accent
fKnobAccent = new ImageKnob(win, knobImage);
fKnobAccent->setPos(476, 46);
fKnobAccent->setRange(0.0f, 100.0f);
fKnobAccent->setValue(25.0f);
fKnobAccent->setCallback(this);

// knob Volume
fKnobVolume = new ImageKnob(win, knobImage);
fKnobVolume->setPos(548, 46);
fKnobVolume->setRange(0.0f, 100.0f);
fKnobVolume->setValue(75.0f);
fKnobVolume->setCallback(this);
}

DistrhoUINekobi::~DistrhoUINekobi()
{
delete fSliderWaveform;
delete fKnobTuning;
delete fKnobCutoff;
delete fKnobResonance;
delete fKnobEnvMod;
delete fKnobDecay;
delete fKnobAccent;
delete fKnobVolume;
}

// -------------------------------------------------
// DSP Callbacks

void DistrhoUINekobi::d_parameterChanged(uint32_t index, float value)
{
switch (index)
{
case DistrhoPluginNekobi::paramTuning:
fKnobTuning->setValue(value);
break;
case DistrhoPluginNekobi::paramWaveform:
fSliderWaveform->setValue(value);
break;
case DistrhoPluginNekobi::paramCutoff:
fKnobCutoff->setValue(value);
break;
case DistrhoPluginNekobi::paramResonance:
fKnobResonance->setValue(value);
break;
case DistrhoPluginNekobi::paramEnvMod:
fKnobEnvMod->setValue(value);
break;
case DistrhoPluginNekobi::paramDecay:
fKnobDecay->setValue(value);
break;
case DistrhoPluginNekobi::paramAccent:
fKnobAccent->setValue(value);
break;
case DistrhoPluginNekobi::paramVolume:
fKnobVolume->setValue(value);
break;
}
}

void DistrhoUINekobi::d_programChanged(uint32_t index)
{
if (index != 0)
return;

// Default values
fSliderWaveform->setValue(0.0f);
fKnobTuning->setValue(0.0f);
fKnobCutoff->setValue(25.0f);
fKnobResonance->setValue(25.0f);
fKnobEnvMod->setValue(50.0f);
fKnobDecay->setValue(75.0f);
fKnobAccent->setValue(25.0f);
fKnobVolume->setValue(50.0f);
}

void DistrhoUINekobi::d_noteReceived(bool onOff, uint8_t, uint8_t note, uint8_t)
{
return;

(void)onOff;
(void)note;
}

// ---------------------------------------------
// UI Callbacks

void DistrhoUINekobi::d_uiIdle()
{
if (fNeko.idle())
repaint();
}

// -------------------------------------------------
// Widget Callbacks

void DistrhoUINekobi::imageButtonClicked(ImageButton* button, int)
{
(void)button;
}

void DistrhoUINekobi::imageKnobDragStarted(ImageKnob* knob)
{
if (knob == fKnobTuning)
d_editParameter(DistrhoPluginNekobi::paramTuning, true);
else if (knob == fKnobCutoff)
d_editParameter(DistrhoPluginNekobi::paramCutoff, true);
else if (knob == fKnobResonance)
d_editParameter(DistrhoPluginNekobi::paramResonance, true);
else if (knob == fKnobEnvMod)
d_editParameter(DistrhoPluginNekobi::paramEnvMod, true);
else if (knob == fKnobDecay)
d_editParameter(DistrhoPluginNekobi::paramDecay, true);
else if (knob == fKnobAccent)
d_editParameter(DistrhoPluginNekobi::paramAccent, true);
else if (knob == fKnobVolume)
d_editParameter(DistrhoPluginNekobi::paramVolume, true);
}

void DistrhoUINekobi::imageKnobDragFinished(ImageKnob* knob)
{
if (knob == fKnobTuning)
d_editParameter(DistrhoPluginNekobi::paramTuning, false);
else if (knob == fKnobCutoff)
d_editParameter(DistrhoPluginNekobi::paramCutoff, false);
else if (knob == fKnobResonance)
d_editParameter(DistrhoPluginNekobi::paramResonance, false);
else if (knob == fKnobEnvMod)
d_editParameter(DistrhoPluginNekobi::paramEnvMod, false);
else if (knob == fKnobDecay)
d_editParameter(DistrhoPluginNekobi::paramDecay, false);
else if (knob == fKnobAccent)
d_editParameter(DistrhoPluginNekobi::paramAccent, false);
else if (knob == fKnobVolume)
d_editParameter(DistrhoPluginNekobi::paramVolume, false);
}

void DistrhoUINekobi::imageKnobValueChanged(ImageKnob* knob, float value)
{
if (knob == fKnobTuning)
d_setParameterValue(DistrhoPluginNekobi::paramTuning, value);
else if (knob == fKnobCutoff)
d_setParameterValue(DistrhoPluginNekobi::paramCutoff, value);
else if (knob == fKnobResonance)
d_setParameterValue(DistrhoPluginNekobi::paramResonance, value);
else if (knob == fKnobEnvMod)
d_setParameterValue(DistrhoPluginNekobi::paramEnvMod, value);
else if (knob == fKnobDecay)
d_setParameterValue(DistrhoPluginNekobi::paramDecay, value);
else if (knob == fKnobAccent)
d_setParameterValue(DistrhoPluginNekobi::paramAccent, value);
else if (knob == fKnobVolume)
d_setParameterValue(DistrhoPluginNekobi::paramVolume, value);
}

void DistrhoUINekobi::imageSliderDragStarted(ImageSlider* slider)
{
if (slider != fSliderWaveform)
return;

d_editParameter(DistrhoPluginNekobi::paramWaveform, true);
}

void DistrhoUINekobi::imageSliderDragFinished(ImageSlider* slider)
{
if (slider != fSliderWaveform)
return;

d_editParameter(DistrhoPluginNekobi::paramWaveform, false);
}

void DistrhoUINekobi::imageSliderValueChanged(ImageSlider* slider, float value)
{
if (slider != fSliderWaveform)
return;

d_setParameterValue(DistrhoPluginNekobi::paramWaveform, value);
}

void DistrhoUINekobi::onDisplay()
{
fImgBackground.draw();
fNeko.draw();
}

// -------------------------------------------------

UI* createUI()
{
return new DistrhoUINekobi();
}

// -------------------------------------------------

END_NAMESPACE_DISTRHO

+ 101
- 0
source/backend/native/nekobi/DistrhoUINekobi.hpp View File

@@ -0,0 +1,101 @@
/*
* DISTRHO Nekobi Plugin, based on Nekobee by Sean Bolton and others.
* Copyright (C) 2013 Filipe Coelho <falktx@falktx.com>
*
* This program is free software; you can redistribute it and/or
* modify it under the terms of the GNU General Public License as
* published by the Free Software Foundation; either version 2 of
* the License, or any later version.
*
* This program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
* GNU General Public License for more details.
*
* For a full copy of the GNU General Public License see the GPL.txt file
*/

#ifndef __DISTRHO_UI_3BANDEQ_HPP__
#define __DISTRHO_UI_3BANDEQ_HPP__

#include "DistrhoUIOpenGL.hpp"
#include "dgl/ImageButton.hpp"
#include "dgl/ImageKnob.hpp"
#include "dgl/ImageSlider.hpp"

#include "DistrhoArtworkNekobi.hpp"
#include "DistrhoPluginNekobi.hpp"
#include "NekoWidget.hpp"

START_NAMESPACE_DISTRHO

// -------------------------------------------------

class DistrhoUINekobi : public OpenGLUI,
public ImageButton::Callback,
public ImageKnob::Callback,
public ImageSlider::Callback
{
public:
DistrhoUINekobi();
~DistrhoUINekobi() override;

protected:
// ---------------------------------------------
// Information

unsigned int d_width() const override
{
return DistrhoArtworkNekobi::backgroundWidth;
}

unsigned int d_height() const override
{
return DistrhoArtworkNekobi::backgroundHeight;
}

// ---------------------------------------------
// DSP Callbacks

void d_parameterChanged(uint32_t index, float value) override;
void d_programChanged(uint32_t index) override;
void d_noteReceived(bool onOff, uint8_t channel, uint8_t note, uint8_t velocity) override;

// ---------------------------------------------
// UI Callbacks

void d_uiIdle() override;

// ---------------------------------------------
// Widget Callbacks

void imageButtonClicked(ImageButton* button, int) override;
void imageKnobDragStarted(ImageKnob* knob) override;
void imageKnobDragFinished(ImageKnob* knob) override;
void imageKnobValueChanged(ImageKnob* knob, float value) override;
void imageSliderDragStarted(ImageSlider* slider) override;
void imageSliderDragFinished(ImageSlider* slider) override;
void imageSliderValueChanged(ImageSlider* slider, float value) override;

void onDisplay() override;

private:
Image fImgBackground;
NekoWidget fNeko;

ImageKnob* fKnobTuning;
ImageKnob* fKnobCutoff;
ImageKnob* fKnobResonance;
ImageKnob* fKnobEnvMod;
ImageKnob* fKnobDecay;
ImageKnob* fKnobAccent;
ImageKnob* fKnobVolume;

ImageSlider* fSliderWaveform;
};

// -------------------------------------------------

END_NAMESPACE_DISTRHO

#endif // __DISTRHO_UI_3BANDEQ_HPP__

+ 191
- 0
source/backend/native/nekobi/NekoWidget.hpp View File

@@ -0,0 +1,191 @@
/*
* Carla Tests
* Copyright (C) 2013 Filipe Coelho <falktx@falktx.com>
*
* This program is free software; you can redistribute it and/or
* modify it under the terms of the GNU General Public License as
* published by the Free Software Foundation; either version 2 of
* the License, or any later version.
*
* This program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
* GNU General Public License for more details.
*
* For a full copy of the GNU General Public License see the GPL.txt file
*/

#include "dgl/Image.hpp"
#include "dgl/Widget.hpp"

#include <cstdlib> // rand

#include "DistrhoArtworkNekobi.hpp"

USE_NAMESPACE_DGL;

class NekoWidget
{
public:
NekoWidget()
: fPos(0),
fTimer(0),
fTimerSpeed(20),
fCurAction(kActionNone),
fCurImage(&fImages.sit)
{
// load images
{
using namespace DistrhoArtworkNekobi;

#define JOIN(a, b) a ## b
#define LOAD_IMAGE(NAME) fImages.NAME.loadFromMemory(JOIN(NAME, Data), JOIN(NAME, Width), JOIN(NAME, Height));

LOAD_IMAGE(sit)
LOAD_IMAGE(tail)
LOAD_IMAGE(claw1)
LOAD_IMAGE(claw2)
LOAD_IMAGE(scratch1)
LOAD_IMAGE(scratch2)
LOAD_IMAGE(run1)
LOAD_IMAGE(run2)
LOAD_IMAGE(run3)
LOAD_IMAGE(run4)

#undef JOIN
#undef LOAD_IMAGE
}
}

void draw()
{
int x = fPos+110;
int y = -2;

if (fCurImage == &fImages.claw1 || fCurImage == &fImages.claw2)
{
x += 2;
y += 12;
}

fCurImage->draw(x, y);
}

// returns true if needs repaint
bool idle()
{
if (++fTimer % fTimerSpeed != 0) // target is 20ms
return false;

if (fTimer == fTimerSpeed*9)
{
if (fCurAction == kActionNone)
fCurAction = static_cast<Action>(rand() % kActionCount);
else
fCurAction = kActionNone;

fTimer = 0;
}

switch (fCurAction)
{
case kActionNone:
if (fCurImage == &fImages.sit)
fCurImage = &fImages.tail;
else
fCurImage = &fImages.sit;
break;

case kActionClaw:
if (fCurImage == &fImages.claw1)
fCurImage = &fImages.claw2;
else
fCurImage = &fImages.claw1;
break;

case kActionScratch:
if (fCurImage == &fImages.scratch1)
fCurImage = &fImages.scratch2;
else
fCurImage = &fImages.scratch1;
break;

case kActionRunRight:
if (fTimer == 0 && fPos > 20*9)
{
// run the other way
--fTimer;
fCurAction = kActionRunLeft;
idle();
break;
}

fPos += 20;

if (fCurImage == &fImages.run1)
fCurImage = &fImages.run2;
else
fCurImage = &fImages.run1;
break;

case kActionRunLeft:
if (fTimer == 0 && fPos < 20*9)
{
// run the other way
--fTimer;
fCurAction = kActionRunRight;
idle();
break;
}

fPos -= 20;

if (fCurImage == &fImages.run3)
fCurImage = &fImages.run4;
else
fCurImage = &fImages.run3;
break;

case kActionCount:
break;
}

return true;
}

void setTimerSpeed(int speed)
{
fTimer = 0;
fTimerSpeed = speed;
}

private:
enum Action {
kActionNone, // bounce tail
kActionClaw,
kActionScratch,
kActionRunRight,
kActionRunLeft,
kActionCount
};

struct Images {
Image sit;
Image tail;
Image claw1;
Image claw2;
Image scratch1;
Image scratch2;
Image run1;
Image run2;
Image run3;
Image run4;
} fImages;

int fPos;
int fTimer;
int fTimerSpeed;

Action fCurAction;
Image* fCurImage;
};

BIN
source/backend/native/nekobi/artwork/background.png View File

Before After
Width: 636  |  Height: 108  |  Size: 42KB

BIN
source/backend/native/nekobi/artwork/claw1.png View File

Before After
Width: 32  |  Height: 32  |  Size: 359B

BIN
source/backend/native/nekobi/artwork/claw2.png View File

Before After
Width: 32  |  Height: 32  |  Size: 354B

BIN
source/backend/native/nekobi/artwork/knob.png View File

Before After
Width: 43  |  Height: 1677  |  Size: 21KB

BIN
source/backend/native/nekobi/artwork/run1.png View File

Before After
Width: 32  |  Height: 32  |  Size: 383B

BIN
source/backend/native/nekobi/artwork/run2.png View File

Before After
Width: 32  |  Height: 32  |  Size: 370B

BIN
source/backend/native/nekobi/artwork/run3.png View File

Before After
Width: 32  |  Height: 32  |  Size: 383B

BIN
source/backend/native/nekobi/artwork/run4.png View File

Before After
Width: 32  |  Height: 32  |  Size: 369B

BIN
source/backend/native/nekobi/artwork/scratch1.png View File

Before After
Width: 32  |  Height: 32  |  Size: 375B

BIN
source/backend/native/nekobi/artwork/scratch2.png View File

Before After
Width: 32  |  Height: 32  |  Size: 348B

BIN
source/backend/native/nekobi/artwork/sit.png View File

Before After
Width: 32  |  Height: 32  |  Size: 347B

BIN
source/backend/native/nekobi/artwork/slider.png View File

Before After
Width: 34  |  Height: 34  |  Size: 3.8KB

BIN
source/backend/native/nekobi/artwork/tail.png View File

Before After
Width: 32  |  Height: 32  |  Size: 353B

+ 1779
- 0
source/backend/native/nekobi/nekobee-src/minblep_tables.c
File diff suppressed because it is too large
View File


+ 77
- 0
source/backend/native/nekobi/nekobee-src/nekobee.h View File

@@ -0,0 +1,77 @@
/* nekobee DSSI software synthesizer plugin
*
* Copyright (C) 2004 Sean Bolton and others.
*
* Portions of this file may have come from Chris Cannam and Steve
* Harris's public domain DSSI example code.
*
* This program is free software; you can redistribute it and/or
* modify it under the terms of the GNU General Public License as
* published by the Free Software Foundation; either version 2 of
* the License, or (at your option) any later version.
*
* This program is distributed in the hope that it will be
* useful, but WITHOUT ANY WARRANTY; without even the implied
* warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR
* PURPOSE. See the GNU General Public License for more details.
*
* You should have received a copy of the GNU General Public
* License along with this program; if not, write to the Free
* Software Foundation, Inc., 59 Temple Place, Suite 330, Boston,
* MA 02111-1307, USA.
*/

#ifndef _XSYNTH_H
#define _XSYNTH_H

/* ==== debugging ==== */

/* XSYNTH_DEBUG bits */
#define XDB_DSSI 1 /* DSSI interface */
#define XDB_AUDIO 2 /* audio output */
#define XDB_NOTE 4 /* note on/off, voice allocation */
#define XDB_DATA 8 /* plugin patchbank handling */
#define GDB_MAIN 16 /* GUI main program flow */
#define GDB_OSC 32 /* GUI OSC handling */
#define GDB_IO 64 /* GUI patch file input/output */
#define GDB_GUI 128 /* GUI GUI callbacks, updating, etc. */

/* If you want debug information, define XSYNTH_DEBUG to the XDB_* bits you're
* interested in getting debug information about, bitwise-ORed together.
* Otherwise, leave it undefined. */
// #define XSYNTH_DEBUG (1+8+16+32+64)

//#define XSYNTH_DEBUG GDB_GUI + GDB_OSC

// #define XSYNTH_DEBUG XDB_DSSI
#ifdef XSYNTH_DEBUG

#include <stdio.h>
#define XSYNTH_DEBUG_INIT(x)
#define XDB_MESSAGE(type, fmt...) { if (XSYNTH_DEBUG & type) fprintf(stderr, "nekobee-dssi.so" fmt); }
#define GDB_MESSAGE(type, fmt...) { if (XSYNTH_DEBUG & type) fprintf(stderr, "nekobee_gtk" fmt); }
// -FIX-:
// #include "message_buffer.h"
// #define XSYNTH_DEBUG_INIT(x) mb_init(x)
// #define XDB_MESSAGE(type, fmt...) { \-
// if (XSYNTH_DEBUG & type) { \-
// char _m[256]; \-
// snprintf(_m, 255, fmt); \-
// add_message(_m); \-
// } \-
// }

#else /* !XSYNTH_DEBUG */

#define XDB_MESSAGE(type, fmt...)
#define GDB_MESSAGE(type, fmt...)
#define XSYNTH_DEBUG_INIT(x)

#endif /* XSYNTH_DEBUG */

/* ==== end of debugging ==== */

#define XSYNTH_MAX_POLYPHONY 1
#define XSYNTH_DEFAULT_POLYPHONY 1

#endif /* _XSYNTH_H */

+ 236
- 0
source/backend/native/nekobi/nekobee-src/nekobee_synth.c View File

@@ -0,0 +1,236 @@
/* nekobee DSSI software synthesizer plugin
*
* Copyright (C) 2004 Sean Bolton and others.
*
* Portions of this file may have come from Steve Brookes'
* nekobee, copyright (C) 1999 S. J. Brookes.
* Portions of this file may have come from Peter Hanappe's
* Fluidsynth, copyright (C) 2003 Peter Hanappe and others.
* Portions of this file may have come from Chris Cannam and Steve
* Harris's public domain DSSI example code.
*
* This program is free software; you can redistribute it and/or
* modify it under the terms of the GNU General Public License as
* published by the Free Software Foundation; either version 2 of
* the License, or (at your option) any later version.
*
* This program is distributed in the hope that it will be
* useful, but WITHOUT ANY WARRANTY; without even the implied
* warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR
* PURPOSE. See the GNU General Public License for more details.
*
* You should have received a copy of the GNU General Public
* License along with this program; if not, write to the Free
* Software Foundation, Inc., 59 Temple Place, Suite 330, Boston,
* MA 02111-1307, USA.
*/

#include <stdlib.h>
#include <stdio.h>
#include <string.h>
#include <math.h>
#include <pthread.h>

#include "nekobee.h"
#include "nekobee_synth.h"
#include "nekobee_voice.h"

/*
* nekobee_synth_all_voices_off
*
* stop processing all notes immediately
*/
void
nekobee_synth_all_voices_off(nekobee_synth_t *synth)
{
int i;
nekobee_voice_t *voice;

for (i = 0; i < synth->voices; i++) {
//voice = synth->voice[i];
voice = synth->voice;
if (_PLAYING(voice)) {
nekobee_voice_off(voice);
}
}
for (i = 0; i < 8; i++) synth->held_keys[i] = -1;
}

/*
* nekobee_synth_note_off
*
* handle a note off message
*/
void
nekobee_synth_note_off(nekobee_synth_t *synth, unsigned char key, unsigned char rvelocity)
{
int i, count = 0;
nekobee_voice_t *voice;

for (i = 0; i < synth->voices; i++) {
voice = synth->voice;
if (_PLAYING(voice)) {
XDB_MESSAGE(XDB_NOTE, " nekobee_synth_note_off: key %d rvel %d voice %d note id %d\n", key, rvelocity, i, voice->note_id);
nekobee_voice_note_off(synth, voice, key, 64);
count++;
}
}

if (!count)
nekobee_voice_remove_held_key(synth, key);

return;
(void)rvelocity;
}

/*
* nekobee_synth_all_notes_off
*
* put all notes into the released state
*/
void
nekobee_synth_all_notes_off(nekobee_synth_t* synth)
{
int i;
nekobee_voice_t *voice;

/* reset the sustain controller */
synth->cc[MIDI_CTL_SUSTAIN] = 0;
for (i = 0; i < synth->voices; i++) {
//voice = synth->voice[i];
voice = synth->voice;
if (_ON(voice) || _SUSTAINED(voice)) {
nekobee_voice_release_note(synth, voice);
}
}
}

/*
* nekobee_synth_note_on
*/
void
nekobee_synth_note_on(nekobee_synth_t *synth, unsigned char key, unsigned char velocity)
{
nekobee_voice_t* voice;

voice = synth->voice;
if (_PLAYING(synth->voice)) {
XDB_MESSAGE(XDB_NOTE, " nekobee_synth_note_on: retriggering mono voice on new key %d\n", key);
}

voice->note_id = synth->note_id++;

nekobee_voice_note_on(synth, voice, key, velocity);
}

/*
* nekobee_synth_update_volume
*/
void
nekobee_synth_update_volume(nekobee_synth_t* synth)
{
synth->cc_volume = (float)(synth->cc[MIDI_CTL_MSB_MAIN_VOLUME] * 128 +
synth->cc[MIDI_CTL_LSB_MAIN_VOLUME]) / 16256.0f;
if (synth->cc_volume > 1.0f)
synth->cc_volume = 1.0f;
/* don't need to check if any playing voices need updating, because it's global */
}

/*
* nekobee_synth_control_change
*/
void
nekobee_synth_control_change(nekobee_synth_t *synth, unsigned int param, signed int value)
{
synth->cc[param] = value;

switch (param) {

case MIDI_CTL_MSB_MAIN_VOLUME:
case MIDI_CTL_LSB_MAIN_VOLUME:
nekobee_synth_update_volume(synth);
break;
case MIDI_CTL_ALL_SOUNDS_OFF:
nekobee_synth_all_voices_off(synth);
break;

case MIDI_CTL_RESET_CONTROLLERS:
nekobee_synth_init_controls(synth);
break;

case MIDI_CTL_ALL_NOTES_OFF:
nekobee_synth_all_notes_off(synth);
break;

/* what others should we respond to? */

/* these we ignore (let the host handle):
* BANK_SELECT_MSB
* BANK_SELECT_LSB
* DATA_ENTRY_MSB
* NRPN_MSB
* NRPN_LSB
* RPN_MSB
* RPN_LSB
* -FIX- no! we need RPN (0, 0) Pitch Bend Sensitivity!
*/
}
}

/*
* nekobee_synth_init_controls
*/
void
nekobee_synth_init_controls(nekobee_synth_t *synth)
{
int i;

for (i = 0; i < 128; i++) {
synth->cc[i] = 0;
}

synth->cc[7] = 127; /* full volume */
nekobee_synth_update_volume(synth);
}

/*
* nekobee_synth_render_voices
*/
void
nekobee_synth_render_voices(nekobee_synth_t *synth, float *out, unsigned long sample_count,
int do_control_update)
{
unsigned long i;
float res, wow;

/* clear the buffer */
for (i = 0; i < sample_count; i++)
out[i] = 0.0f;

// we can do anything that must be updated all the time here
// this is called even when a voice isn't playing

// approximate a log scale
res = 1-synth->resonance;
wow = res*res;
wow = wow/10.0f;

// as the resonance is increased, "wow" slows down the accent attack
if ((synth->voice->velocity>90) && (synth->vcf_accent < synth->voice->vcf_eg)) {
synth->vcf_accent=(0.985-wow)*synth->vcf_accent+(0.015+wow)*synth->voice->vcf_eg;
} else {
synth->vcf_accent=(0.985-wow)*synth->vcf_accent; // or just decay
}

if (synth->voice->velocity>90) {
synth->vca_accent=0.95*synth->vca_accent+0.05; // ramp up accent on with a time constant
} else {
synth->vca_accent=0.95*synth->vca_accent; // accent off with time constant
}
#if defined(XSYNTH_DEBUG) && (XSYNTH_DEBUG & XDB_AUDIO)
out[0] += 0.10f; /* add a 'buzz' to output so there's something audible even when quiescent */
#endif /* defined(XSYNTH_DEBUG) && (XSYNTH_DEBUG & XDB_AUDIO) */
if (_PLAYING(synth->voice)) {
nekobee_voice_render(synth, synth->voice, out, sample_count, do_control_update);
}
}

+ 132
- 0
source/backend/native/nekobi/nekobee-src/nekobee_synth.h View File

@@ -0,0 +1,132 @@
/* nekobee DSSI software synthesizer plugin
*
* Copyright (C) 2004 Sean Bolton and others.
*
* Portions of this file may have come from Peter Hanappe's
* Fluidsynth, copyright (C) 2003 Peter Hanappe and others.
* Portions of this file may have come from alsa-lib, copyright
* and licensed under the LGPL v2.1.
*
* This program is free software; you can redistribute it and/or
* modify it under the terms of the GNU General Public License as
* published by the Free Software Foundation; either version 2 of
* the License, or (at your option) any later version.
*
* This program is distributed in the hope that it will be
* useful, but WITHOUT ANY WARRANTY; without even the implied
* warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR
* PURPOSE. See the GNU General Public License for more details.
*
* You should have received a copy of the GNU General Public
* License along with this program; if not, write to the Free
* Software Foundation, Inc., 59 Temple Place, Suite 330, Boston,
* MA 02111-1307, USA.
*/

#ifndef _XSYNTH_SYNTH_H
#define _XSYNTH_SYNTH_H

#include <pthread.h>

#include "nekobee.h"
#include "nekobee_types.h"

#define XSYNTH_MONO_MODE_OFF 0
#define XSYNTH_MONO_MODE_ON 1
#define XSYNTH_MONO_MODE_ONCE 2
#define XSYNTH_MONO_MODE_BOTH 3

#define XSYNTH_GLIDE_MODE_LEGATO 0
#define XSYNTH_GLIDE_MODE_INITIAL 1
#define XSYNTH_GLIDE_MODE_ALWAYS 2
#define XSYNTH_GLIDE_MODE_LEFTOVER 3
#define XSYNTH_GLIDE_MODE_OFF 4

/*
* nekobee_synth_t
*/
struct _nekobee_synth_t {
/* output */
unsigned long sample_rate;
float deltat; /* 1 / sample_rate */
unsigned long nugget_remains;

/* voice tracking and data */
unsigned int note_id; /* incremented for every new note, used for voice-stealing prioritization */
int polyphony; /* requested polyphony, must be <= XSYNTH_MAX_POLYPHONY */
int voices; /* current polyphony, either requested polyphony above or 1 while in monophonic mode */
int monophonic; /* true if operating in monophonic mode */
int glide; /* current glide mode */
float last_noteon_pitch; /* glide start pitch for non-legato modes */
signed char held_keys[8]; /* for monophonic key tracking, an array of note-ons, most recently received first */
float vcf_accent; /* used to emulate the circuit that sweeps the vcf at full resonance */
float vca_accent; /* used to smooth the accent pulse, removing the click */

//nekobee_voice_t *voice[XSYNTH_MAX_POLYPHONY];
nekobee_voice_t *voice;
pthread_mutex_t voicelist_mutex;
int voicelist_mutex_grab_failed;

/* current non-paramter-mapped controller values */
unsigned char key_pressure[128];
unsigned char cc[128]; /* controller values */
unsigned char channel_pressure;
unsigned char pitch_wheel_sensitivity; /* in semitones */
int pitch_wheel; /* range is -8192 - 8191 */

/* translated controller values */
float mod_wheel; /* filter cutoff multiplier, off = 1.0, full on = 0.0 */
float pitch_bend; /* frequency multiplier, product of wheel setting and sensitivity, center = 1.0 */
float cc_volume; /* volume multiplier, 0.0 to 1.0 */

/* patch parameters */
float tuning;
float waveform;
float cutoff;
float resonance;
float envmod;
float decay;
float accent;
float volume;
};

void nekobee_synth_all_voices_off(nekobee_synth_t *synth);
void nekobee_synth_note_off(nekobee_synth_t *synth, unsigned char key,
unsigned char rvelocity);
void nekobee_synth_all_notes_off(nekobee_synth_t *synth);
void nekobee_synth_note_on(nekobee_synth_t *synth, unsigned char key,
unsigned char velocity);
void nekobee_synth_control_change(nekobee_synth_t *synth, unsigned int param,
signed int value);
void nekobee_synth_init_controls(nekobee_synth_t *synth);
void nekobee_synth_render_voices(nekobee_synth_t *synth, float *out,
unsigned long sample_count,
int do_control_update);

/* these come right out of alsa/asoundef.h */
#define MIDI_CTL_MSB_MODWHEEL 0x01 /**< Modulation */
#define MIDI_CTL_MSB_PORTAMENTO_TIME 0x05 /**< Portamento time */
#define MIDI_CTL_MSB_MAIN_VOLUME 0x07 /**< Main volume */
#define MIDI_CTL_MSB_BALANCE 0x08 /**< Balance */
#define MIDI_CTL_LSB_MODWHEEL 0x21 /**< Modulation */
#define MIDI_CTL_LSB_PORTAMENTO_TIME 0x25 /**< Portamento time */
#define MIDI_CTL_LSB_MAIN_VOLUME 0x27 /**< Main volume */
#define MIDI_CTL_LSB_BALANCE 0x28 /**< Balance */
#define MIDI_CTL_SUSTAIN 0x40 /**< Sustain pedal */

// nekobee defines
#define MIDI_CTL_TUNING 0x4b // impossible
#define MIDI_CTL_WAVEFORM 0x46 // select waveform
#define MIDI_CTL_CUTOFF 0x4a // VCF Cutoff
#define MIDI_CTL_RESONANCE 0x47 // VCF Resonance
#define MIDI_CTL_ENVMOD 0x01 // cheat and use modwheel
#define MIDI_CTL_DECAY 0x48 // Decay time (well release really)
#define MIDI_CTL_ACCENT 0x4c // impossible

#define MIDI_CTL_ALL_SOUNDS_OFF 0x78 /**< All sounds off */
#define MIDI_CTL_RESET_CONTROLLERS 0x79 /**< Reset Controllers */
#define MIDI_CTL_ALL_NOTES_OFF 0x7b /**< All notes off */

#define XSYNTH_SYNTH_SUSTAINED(_s) ((_s)->cc[MIDI_CTL_SUSTAIN] >= 64)

#endif /* _XSYNTH_SYNTH_H */

+ 30
- 0
source/backend/native/nekobi/nekobee-src/nekobee_types.h View File

@@ -0,0 +1,30 @@
/* nekobee DSSI software synthesizer plugin
*
* Copyright (C) 2004 Sean Bolton and others.
*
* This program is free software; you can redistribute it and/or
* modify it under the terms of the GNU General Public License as
* published by the Free Software Foundation; either version 2 of
* the License, or (at your option) any later version.
*
* This program is distributed in the hope that it will be
* useful, but WITHOUT ANY WARRANTY; without even the implied
* warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR
* PURPOSE. See the GNU General Public License for more details.
*
* You should have received a copy of the GNU General Public
* License along with this library; if not, write to the Free
* Software Foundation, Inc., 59 Temple Place, Suite 330, Boston,
* MA 02111-1307, USA.
*/

#ifndef _XSYNTH_TYPES_H
#define _XSYNTH_TYPES_H

#include <stddef.h>

typedef struct _nekobee_synth_t nekobee_synth_t;
typedef struct _nekobee_voice_t nekobee_voice_t;
typedef struct _nekobee_patch_t nekobee_patch_t;

#endif /* _XSYNTH_TYPES_H */

+ 256
- 0
source/backend/native/nekobi/nekobee-src/nekobee_voice.c View File

@@ -0,0 +1,256 @@
/* nekobee DSSI software synthesizer plugin
*
* Copyright (C) 2004 Sean Bolton and others.
*
* Portions of this file may have come from Steve Brookes'
* nekobee, copyright (C) 1999 S. J. Brookes.
* Portions of this file may have come from Peter Hanappe's
* Fluidsynth, copyright (C) 2003 Peter Hanappe and others.
*
* This program is free software; you can redistribute it and/or
* modify it under the terms of the GNU General Public License as
* published by the Free Software Foundation; either version 2 of
* the License, or (at your option) any later version.
*
* This program is distributed in the hope that it will be
* useful, but WITHOUT ANY WARRANTY; without even the implied
* warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR
* PURPOSE. See the GNU General Public License for more details.
*
* You should have received a copy of the GNU General Public
* License along with this program; if not, write to the Free
* Software Foundation, Inc., 59 Temple Place, Suite 330, Boston,
* MA 02111-1307, USA.
*/

#define _BSD_SOURCE 1
#define _SVID_SOURCE 1
#define _ISOC99_SOURCE 1

#include <stdlib.h>

#include "nekobee_types.h"
#include "nekobee.h"
#include "nekobee_synth.h"
#include "nekobee_voice.h"

/*
* nekobee_voice_new
*/
nekobee_voice_t *
nekobee_voice_new()
{
nekobee_voice_t *voice;

voice = (nekobee_voice_t *)calloc(sizeof(nekobee_voice_t), 1);
if (voice) {
voice->status = XSYNTH_VOICE_OFF;
}
return voice;
}

/*
* nekobee_voice_note_on
*/
void
nekobee_voice_note_on(nekobee_synth_t *synth, nekobee_voice_t *voice,
unsigned char key, unsigned char velocity)
{
int i;

voice->key = key;
voice->velocity = velocity;


if (!synth->monophonic || !(_ON(voice) || _SUSTAINED(voice))) {

// brand-new voice, or monophonic voice in release phase; set everything up
XDB_MESSAGE(XDB_NOTE, " nekobee_voice_note_on in polyphonic/new section: key %d, mono %d, old status %d\n", key, synth->monophonic, voice->status);

voice->target_pitch = nekobee_pitch[key];

if (synth->held_keys[0] >= 0) {
voice->prev_pitch = nekobee_pitch[synth->held_keys[0]];
} else {
voice->prev_pitch = voice->target_pitch;
}
if (!_PLAYING(voice)) {
voice->lfo_pos = 0.0f;
voice->vca_eg = 0.0f;
voice->vcf_eg = 0.0f;
voice->delay1 = 0.0f;
voice->delay2 = 0.0f;
voice->delay3 = 0.0f;
voice->delay4 = 0.0f;
voice->c5 = 0.0f;
voice->osc_index = 0;
voice->osc1.last_waveform = -1;
voice->osc1.pos = 0.0f;
}
voice->vca_eg_phase = 0;
voice->vcf_eg_phase = 0;
// nekobee_voice_update_pressure_mod(synth, voice);

} else {

/* synth is monophonic, and we're modifying a playing voice */
XDB_MESSAGE(XDB_NOTE, " nekobee_voice_note_on in monophonic section: old key %d => new key %d\n", synth->held_keys[0], key);

/* set new pitch */
voice->target_pitch = nekobee_pitch[key];
if (synth->glide == XSYNTH_GLIDE_MODE_INITIAL ||
synth->glide == XSYNTH_GLIDE_MODE_OFF)
voice->prev_pitch = voice->target_pitch;

/* if in 'on' or 'both' modes, and key has changed, then re-trigger EGs */
if ((synth->monophonic == XSYNTH_MONO_MODE_ON ||
synth->monophonic == XSYNTH_MONO_MODE_BOTH) &&
(synth->held_keys[0] < 0 || synth->held_keys[0] != key)) {
voice->vca_eg_phase = 0;
voice->vcf_eg_phase = 0;
}

/* all other variables stay what they are */

}
synth->last_noteon_pitch = voice->target_pitch;

/* add new key to the list of held keys */

/* check if new key is already in the list; if so, move it to the
* top of the list, otherwise shift the other keys down and add it
* to the top of the list. */
for (i = 0; i < 7; i++) {
if (synth->held_keys[i] == key)
break;
}
for (; i > 0; i--) {
synth->held_keys[i] = synth->held_keys[i - 1];
}
synth->held_keys[0] = key;

if (!_PLAYING(voice)) {

nekobee_voice_start_voice(voice);

} else if (!_ON(voice)) { /* must be XSYNTH_VOICE_SUSTAINED or XSYNTH_VOICE_RELEASED */

voice->status = XSYNTH_VOICE_ON;

}
}

/*
* nekobee_voice_set_release_phase
*/
static inline void
nekobee_voice_set_release_phase(nekobee_voice_t *voice)
{
voice->vca_eg_phase = 2;
voice->vcf_eg_phase = 2;
}

/*
* nekobee_voice_remove_held_key
*/
inline void
nekobee_voice_remove_held_key(nekobee_synth_t *synth, unsigned char key)
{
int i;

/* check if this key is in list of held keys; if so, remove it and
* shift the other keys up */
for (i = 7; i >= 0; i--) {
if (synth->held_keys[i] == key)
break;
}
if (i >= 0) {
for (; i < 7; i++) {
synth->held_keys[i] = synth->held_keys[i + 1];
}
synth->held_keys[7] = -1;
}
}

/*
* nekobee_voice_note_off
*/
void
nekobee_voice_note_off(nekobee_synth_t *synth, nekobee_voice_t *voice,
unsigned char key, unsigned char rvelocity)
{
unsigned char previous_top_key;

XDB_MESSAGE(XDB_NOTE, " nekobee_set_note_off: called for voice %p, key %d\n", voice, key);

/* save release velocity */
voice->velocity = rvelocity;

previous_top_key = synth->held_keys[0];

/* remove this key from list of held keys */
nekobee_voice_remove_held_key(synth, key);

if (synth->held_keys[0] >= 0) {

/* still some keys held */

if (synth->held_keys[0] != previous_top_key) {

/* most-recently-played key has changed */
voice->key = synth->held_keys[0];
XDB_MESSAGE(XDB_NOTE, " note-off in monophonic section: changing pitch to %d\n", voice->key);
voice->target_pitch = nekobee_pitch[voice->key];
if (synth->glide == XSYNTH_GLIDE_MODE_INITIAL ||
synth->glide == XSYNTH_GLIDE_MODE_OFF)
voice->prev_pitch = voice->target_pitch;

/* if mono mode is 'both', re-trigger EGs */
if (synth->monophonic == XSYNTH_MONO_MODE_BOTH && !_RELEASED(voice)) {
voice->vca_eg_phase = 0;
voice->vcf_eg_phase = 0;
}

}

} else { /* no keys still held */

if (XSYNTH_SYNTH_SUSTAINED(synth)) {

/* no more keys in list, but we're sustained */
XDB_MESSAGE(XDB_NOTE, " note-off in monophonic section: sustained with no held keys\n");
if (!_RELEASED(voice))
voice->status = XSYNTH_VOICE_SUSTAINED;

} else { /* not sustained */

/* no more keys in list, so turn off note */
XDB_MESSAGE(XDB_NOTE, " note-off in monophonic section: turning off voice %p\n", voice);
nekobee_voice_set_release_phase(voice);
voice->status = XSYNTH_VOICE_RELEASED;

}
}

}

/*
* nekobee_voice_release_note
*/
void
nekobee_voice_release_note(nekobee_synth_t *synth, nekobee_voice_t *voice)
{
XDB_MESSAGE(XDB_NOTE, " nekobee_voice_release_note: turning off voice %p\n", voice);
if (_ON(voice)) {
/* dummy up a release velocity */
voice->rvelocity = 64;
}
nekobee_voice_set_release_phase(voice);
voice->status = XSYNTH_VOICE_RELEASED;

return;
(void)synth;
}

+ 183
- 0
source/backend/native/nekobi/nekobee-src/nekobee_voice.h View File

@@ -0,0 +1,183 @@
/* nekobee DSSI software synthesizer plugin
*
* Copyright (C) 2004 Sean Bolton and others.
*
* Portions of this file may have come from Steve Brookes'
* nekobee, copyright (C) 1999 S. J. Brookes.
* Portions of this file may have come from Peter Hanappe's
* Fluidsynth, copyright (C) 2003 Peter Hanappe and others.
*
* This program is free software; you can redistribute it and/or
* modify it under the terms of the GNU General Public License as
* published by the Free Software Foundation; either version 2 of
* the License, or (at your option) any later version.
*
* This program is distributed in the hope that it will be
* useful, but WITHOUT ANY WARRANTY; without even the implied
* warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR
* PURPOSE. See the GNU General Public License for more details.
*
* You should have received a copy of the GNU General Public
* License along with this program; if not, write to the Free
* Software Foundation, Inc., 59 Temple Place, Suite 330, Boston,
* MA 02111-1307, USA.
*/

#ifndef _XSYNTH_VOICE_H
#define _XSYNTH_VOICE_H

#include <string.h>

#include "nekobee_types.h"

/* maximum size of a rendering burst */
#define XSYNTH_NUGGET_SIZE 64

/* minBLEP constants */
/* minBLEP table oversampling factor (must be a power of two): */
#define MINBLEP_PHASES 64
/* MINBLEP_PHASES minus one: */
#define MINBLEP_PHASE_MASK 63
/* length in samples of (truncated) step discontinuity delta: */
#define STEP_DD_PULSE_LENGTH 72
/* length in samples of (truncated) slope discontinuity delta: */
#define SLOPE_DD_PULSE_LENGTH 71
/* the longer of the two above: */
#define LONGEST_DD_PULSE_LENGTH STEP_DD_PULSE_LENGTH
/* MINBLEP_BUFFER_LENGTH must be at least XSYNTH_NUGGET_SIZE plus
* LONGEST_DD_PULSE_LENGTH, and not less than twice LONGEST_DD_PULSE_LENGTH: */
#define MINBLEP_BUFFER_LENGTH 512
/* delay between start of DD pulse and the discontinuity, in samples: */
#define DD_SAMPLE_DELAY 4

struct _nekobee_patch_t
{
float tuning;
unsigned char waveform;
float cutoff;
float resonance;
float envmod;
float decay;
float accent;
float volume;
};

enum nekobee_voice_status
{
XSYNTH_VOICE_OFF, /* silent: is not processed by render loop */
XSYNTH_VOICE_ON, /* has not received a note off event */
XSYNTH_VOICE_SUSTAINED, /* has received note off, but sustain controller is on */
XSYNTH_VOICE_RELEASED /* had note off, not sustained, in final decay phase of envelopes */
};

struct blosc
{
int last_waveform, /* persistent */
waveform, /* comes from LADSPA port each cycle */
bp_high; /* persistent */
float pos, /* persistent */
pw; /* comes from LADSPA port each cycle */
};

/*
* nekobee_voice_t
*/
struct _nekobee_voice_t
{
unsigned int note_id;

unsigned char status;
unsigned char key;
unsigned char velocity;
unsigned char rvelocity; /* the note-off velocity */

/* translated controller values */
float pressure; /* filter resonance multiplier, off = 1.0, full on = 0.0 */

/* persistent voice state */
float prev_pitch,
target_pitch,
lfo_pos;
struct blosc osc1;
float vca_eg,
vcf_eg,
accent_slug,
delay1,
delay2,
delay3,
delay4,
c5;
unsigned char vca_eg_phase,
vcf_eg_phase;
int osc_index; /* shared index into osc_audio */
float osc_audio[MINBLEP_BUFFER_LENGTH];
float freqcut_buf[XSYNTH_NUGGET_SIZE];
float vca_buf[XSYNTH_NUGGET_SIZE];
};

#define _PLAYING(voice) ((voice)->status != XSYNTH_VOICE_OFF)
#define _ON(voice) ((voice)->status == XSYNTH_VOICE_ON)
#define _SUSTAINED(voice) ((voice)->status == XSYNTH_VOICE_SUSTAINED)
#define _RELEASED(voice) ((voice)->status == XSYNTH_VOICE_RELEASED)
#define _AVAILABLE(voice) ((voice)->status == XSYNTH_VOICE_OFF)

extern float nekobee_pitch[128];

typedef struct { float value, delta; } float_value_delta;
extern float_value_delta step_dd_table[];

extern float slope_dd_table[];

/* nekobee_voice.c */
nekobee_voice_t *nekobee_voice_new();
void nekobee_voice_note_on(nekobee_synth_t *synth,
nekobee_voice_t *voice,
unsigned char key,
unsigned char velocity);
void nekobee_voice_remove_held_key(nekobee_synth_t *synth,
unsigned char key);
void nekobee_voice_note_off(nekobee_synth_t *synth,
nekobee_voice_t *voice,
unsigned char key,
unsigned char rvelocity);
void nekobee_voice_release_note(nekobee_synth_t *synth,
nekobee_voice_t *voice);
void nekobee_voice_set_ports(nekobee_synth_t *synth,
nekobee_patch_t *patch);
void nekobee_voice_update_pressure_mod(nekobee_synth_t *synth,
nekobee_voice_t *voice);

/* nekobee_voice_render.c */
void nekobee_init_tables(void);
void nekobee_voice_render(nekobee_synth_t *synth, nekobee_voice_t *voice,
float *out, unsigned long sample_count,
int do_control_update);

/* inline functions */

/*
* nekobee_voice_off
*
* Purpose: Turns off a voice immediately, meaning that it is not processed
* anymore by the render loop.
*/
static inline void
nekobee_voice_off(nekobee_voice_t* voice)
{
voice->status = XSYNTH_VOICE_OFF;
/* silence the oscillator buffer for the next use */
memset(voice->osc_audio, 0, MINBLEP_BUFFER_LENGTH * sizeof(float));
/* -FIX- decrement active voice count? */
}

/*
* nekobee_voice_start_voice
*/
static inline void
nekobee_voice_start_voice(nekobee_voice_t *voice)
{
voice->status = XSYNTH_VOICE_ON;
/* -FIX- increment active voice count? */
}

#endif /* _XSYNTH_VOICE_H */

+ 410
- 0
source/backend/native/nekobi/nekobee-src/nekobee_voice_render.c View File

@@ -0,0 +1,410 @@
/* nekobee DSSI software synthesizer plugin
*/

#define _BSD_SOURCE 1
#define _SVID_SOURCE 1
#define _ISOC99_SOURCE 1

#include <math.h>

#include "nekobee.h"
#include "nekobee_synth.h"
#include "nekobee_voice.h"

#define M_2PI_F (2.0f * (float)M_PI)
#define M_PI_F (float)M_PI

#define VCF_FREQ_MAX (0.825f) /* original filters only stable to this frequency */

static int tables_initialized = 0;

float nekobee_pitch[128];

#define pitch_ref_note 69

#define volume_to_amplitude_scale 128

static float volume_to_amplitude_table[4 + volume_to_amplitude_scale + 2];

static float velocity_to_attenuation[128];

static float qdB_to_amplitude_table[4 + 256 + 0];

void
nekobee_init_tables(void)
{
int i;
float pexp;
float volume, volume_exponent;
float ol, amp;

if (tables_initialized)
return;

/* MIDI note to pitch */
for (i = 0; i < 128; ++i) {
pexp = (float)(i - pitch_ref_note) / 12.0f;
nekobee_pitch[i] = powf(2.0f, pexp);
}

/* volume to amplitude
*
* This generates a curve which is:
* volume_to_amplitude_table[128 + 4] = 0.25 * 3.16... ~= -2dB
* volume_to_amplitude_table[64 + 4] = 0.25 * 1.0 ~= -12dB
* volume_to_amplitude_table[32 + 4] = 0.25 * 0.316... ~= -22dB
* volume_to_amplitude_table[16 + 4] = 0.25 * 0.1 ~= -32dB
* etc.
*/
volume_exponent = 1.0f / (2.0f * log10f(2.0f));
for (i = 0; i <= volume_to_amplitude_scale; i++) {
volume = (float)i / (float)volume_to_amplitude_scale;
volume_to_amplitude_table[i + 4] = powf(2.0f * volume, volume_exponent) / 4.0f;
}
volume_to_amplitude_table[ -1 + 4] = 0.0f;
volume_to_amplitude_table[129 + 4] = volume_to_amplitude_table[128 + 4];

/* velocity to attenuation
*
* Creates the velocity to attenuation lookup table, for converting
* velocities [1, 127] to full-velocity-sensitivity attenuation in
* quarter decibels. Modeled after my TX-7's velocity response.*/
velocity_to_attenuation[0] = 253.9999f;
for (i = 1; i < 127; i++) {
if (i >= 10) {
ol = (powf(((float)i / 127.0f), 0.32f) - 1.0f) * 100.0f;
amp = powf(2.0f, ol / 8.0f);
} else {
ol = (powf(((float)10 / 127.0f), 0.32f) - 1.0f) * 100.0f;
amp = powf(2.0f, ol / 8.0f) * (float)i / 10.0f;
}
velocity_to_attenuation[i] = log10f(amp) * -80.0f;
}
velocity_to_attenuation[127] = 0.0f;

/* quarter-decibel attenuation to amplitude */
qdB_to_amplitude_table[-1 + 4] = 1.0f;
for (i = 0; i <= 255; i++) {
qdB_to_amplitude_table[i + 4] = powf(10.0f, (float)i / -80.0f);
}

tables_initialized = 1;
}

static inline float
volume(float level)
{
unsigned char segment;
float fract;

level *= (float)volume_to_amplitude_scale;
segment = lrintf(level - 0.5f);
fract = level - (float)segment;

return volume_to_amplitude_table[segment + 4] + fract *
(volume_to_amplitude_table[segment + 5] -
volume_to_amplitude_table[segment + 4]);
}

static inline float
qdB_to_amplitude(float qdB)
{
int i = lrintf(qdB - 0.5f);
float f = qdB - (float)i;
return qdB_to_amplitude_table[i + 4] + f *
(qdB_to_amplitude_table[i + 5] -
qdB_to_amplitude_table[i + 4]);
}

void blosc_place_step_dd(float *buffer, int index, float phase, float w, float scale){
float r;
int i;

r = MINBLEP_PHASES * phase / w;
i = lrintf(r - 0.5f);
r -= (float)i;
i &= MINBLEP_PHASE_MASK; /* port changes can cause i to be out-of-range */
/* This would be better than the above, but more expensive:
* while (i < 0) {
* i += MINBLEP_PHASES;
* index++;
* }
*/

while (i < MINBLEP_PHASES * STEP_DD_PULSE_LENGTH) {
buffer[index] += scale * (step_dd_table[i].value + r * step_dd_table[i].delta);
i += MINBLEP_PHASES;
index++;
}
}


void vco(unsigned long sample_count, nekobee_voice_t *voice, struct blosc *osc,
int index, float w)

{
unsigned long sample;
float pos = osc->pos;
float pw, gain, halfgain, out;
pw=0.46f;
gain=1.0f;
halfgain=gain*0.5f;
int bp_high = osc->bp_high;
out=(bp_high ? halfgain : -halfgain);

switch (osc->waveform)
{
default:
case 0: {

for (sample = 0; sample < sample_count; sample++) {
pos += w;
if (bp_high) {
if (pos >= pw) {
blosc_place_step_dd(voice->osc_audio, index, pos - pw, w, -gain);
bp_high = 0;
out = -halfgain;
}
if (pos >= 1.0f) {
pos -= 1.0f;
blosc_place_step_dd(voice->osc_audio, index, pos, w, gain);
bp_high = 1;
out = halfgain;
}
} else {
if (pos >= 1.0f) {
pos -= 1.0f;
blosc_place_step_dd(voice->osc_audio, index, pos, w, gain);
bp_high = 1;
out = halfgain;
}

if (bp_high && pos >= pw) {
blosc_place_step_dd(voice->osc_audio, index, pos - pw, w, -gain);
bp_high = 0;
out = -halfgain;
}
}

voice->osc_audio[index + DD_SAMPLE_DELAY] += out;

index++;
}

osc->pos = pos;
osc->bp_high = bp_high;
break;
}
case 1: // sawtooth wave
{
for (sample=0; sample < sample_count; sample++) {
pos += w;
if (pos >= 1.0f) {
pos -= 1.0f;
blosc_place_step_dd(voice->osc_audio, index, pos, w, gain);
}
voice->osc_audio[index + DD_SAMPLE_DELAY] += gain * (0.5f - pos);

index++;
}

break;
}

}

osc->pos=pos;
}

static inline void
vcf_4pole(nekobee_voice_t *voice, unsigned long sample_count,
float *in, float *out, float *cutoff, float qres, float *amp)
{
unsigned long sample;
float freqcut, freqcut2, highpass,
delay1 = voice->delay1,
delay2 = voice->delay2,
delay3 = voice->delay3,
delay4 = voice->delay4;

qres = 2.0f - qres * 1.995f;

for (sample = 0; sample < sample_count; sample++) {

/* Hal Chamberlin's state variable filter */

freqcut = cutoff[sample] * 2.0f;
freqcut2 = cutoff[sample] * 4.0f;


if (freqcut > VCF_FREQ_MAX) freqcut = VCF_FREQ_MAX;
if (freqcut2 > VCF_FREQ_MAX) freqcut2 = VCF_FREQ_MAX;

delay2 = delay2 + freqcut * delay1; /* delay2/4 = lowpass output */
highpass = in[sample] - delay2 - qres * delay1;
delay1 = freqcut * highpass + delay1; /* delay1/3 = bandpass output */

delay4 = delay4 + freqcut2 * delay3;
highpass = delay2 - delay4 - qres * delay3;
delay3 = freqcut2 * highpass + delay3;

/* mix filter output into output buffer */
out[sample] += 0.1*atan(3*delay4 * amp[sample]);
}

voice->delay1 = delay1;
voice->delay2 = delay2;
voice->delay3 = delay3;
voice->delay4 = delay4;
voice->c5 = 0.0f;
}


/*
* nekobee_voice_render
*
* generate the actual sound data for this voice
*/
void
nekobee_voice_render(nekobee_synth_t *synth, nekobee_voice_t *voice,
float *out, unsigned long sample_count,
int do_control_update)
{
unsigned long sample;

/* state variables saved in voice */
float lfo_pos = voice->lfo_pos,
vca_eg = voice->vca_eg,
vcf_eg = voice->vcf_eg;
unsigned char vca_eg_phase = voice->vca_eg_phase,
vcf_eg_phase = voice->vcf_eg_phase;
int osc_index = voice->osc_index;

/* temporary variables used in calculating voice */
float fund_pitch;
float deltat = synth->deltat;
float freq, cutoff, vcf_amt;
float vcf_acc_amt;

/* set up synthesis variables from patch */
float omega;
float vca_eg_amp = qdB_to_amplitude(velocity_to_attenuation[voice->velocity] * 0);

float vca_eg_rate_level[3], vca_eg_one_rate[3];
float vcf_eg_amp = qdB_to_amplitude(velocity_to_attenuation[voice->velocity] * 0);

float vcf_eg_rate_level[3], vcf_eg_one_rate[3];
float qres = synth->resonance;
float vol_out = volume(synth->volume);

float velocity = (voice->velocity);

float vcf_egdecay = synth->decay;

fund_pitch = 0.1f*voice->target_pitch +0.9 * voice->prev_pitch; /* glide */

if (do_control_update) {
voice->prev_pitch = fund_pitch; /* save pitch for next time */
}

fund_pitch *= 440.0f;

omega = synth->tuning * fund_pitch;

// if we have triggered ACCENT
// we need a shorter decay
// we should probably have something like this in the note on code
// that could trigger an ACCENT light
if (velocity>90) {
vcf_egdecay=.0005;
}

// VCA - In a real 303, it is set for around 2 seconds
vca_eg_rate_level[0] = 0.1f * vca_eg_amp; // instant on attack
vca_eg_one_rate[0] = 0.9f; // very fast
vca_eg_rate_level[1] = 0.0f; // sustain is zero
vca_eg_one_rate[1] = 1.0f - 0.00001f; // decay time is very slow
vca_eg_rate_level[2] = 0.0f; // decays to zero
vca_eg_one_rate[2] = 0.975f; // very fast release

// VCF - funny things go on with the accent

vcf_eg_rate_level[0] = 0.1f * vcf_eg_amp;
vcf_eg_one_rate[0] = 1-0.1f; //0.9f;
vcf_eg_rate_level[1] = 0.0f; // vcf_egdecay * *(synth->vcf_eg_sustain_level) * vcf_eg_amp;
vcf_eg_one_rate[1] = 1.0f - vcf_egdecay;
vcf_eg_rate_level[2] = 0.0f;
vcf_eg_one_rate[2] = 0.9995f; // 1.0f - *(synth->vcf_eg_release_time);

vca_eg_amp *= 0.99f;
vcf_eg_amp *= 0.99f;

freq = M_PI_F * deltat * fund_pitch * synth->mod_wheel; /* now (0 to 1) * pi */

cutoff = 0.008f * synth->cutoff;

// 303 always has slight VCF mod
vcf_amt = 0.05f+(synth->envmod*0.75);

/* copy some things so oscillator functions can see them */
voice->osc1.waveform = lrintf(synth->waveform);

// work out how much the accent will affect the filter
vcf_acc_amt=.333f+ (synth->resonance/1.5f);

for (sample = 0; sample < sample_count; sample++) {
vca_eg = vca_eg_rate_level[vca_eg_phase] + vca_eg_one_rate[vca_eg_phase] * vca_eg;
vcf_eg = vcf_eg_rate_level[vcf_eg_phase] + vcf_eg_one_rate[vcf_eg_phase] * vcf_eg;

voice->freqcut_buf[sample] = (cutoff + (vcf_amt * vcf_eg/2.0f) + (synth->vcf_accent * synth->accent*0.5f));

voice->vca_buf[sample] = vca_eg * vol_out*(1.0f + synth->accent*synth->vca_accent);

if (!vca_eg_phase && vca_eg > vca_eg_amp) vca_eg_phase = 1; /* flip from attack to decay */
if (!vcf_eg_phase && vcf_eg > vcf_eg_amp) vcf_eg_phase = 1; /* flip from attack to decay */
}

// oscillator
vco(sample_count, voice, &voice->osc1, osc_index, deltat * omega);

// VCF and VCA
vcf_4pole(voice, sample_count, voice->osc_audio + osc_index, out, voice->freqcut_buf, qres, voice->vca_buf);

osc_index += sample_count;

if (do_control_update) {
/* do those things should be done only once per control-calculation
* interval ("nugget"), such as voice check-for-dead, pitch envelope
* calculations, volume envelope phase transition checks, etc. */
/* check if we've decayed to nothing, turn off voice if so */
if (vca_eg_phase == 2 && voice->vca_buf[sample_count - 1] < 6.26e-6f) {
// sound has completed its release phase (>96dB below volume '5' max)
XDB_MESSAGE(XDB_NOTE, " nekobee_voice_render check for dead: killing note id %d\n", voice->note_id);
nekobee_voice_off(voice);
return; // we're dead now, so return
}

/* already saved prev_pitch above */

/* check oscillator audio buffer index, shift buffer if necessary */
if (osc_index > MINBLEP_BUFFER_LENGTH - (XSYNTH_NUGGET_SIZE + LONGEST_DD_PULSE_LENGTH)) {
memcpy(voice->osc_audio, voice->osc_audio + osc_index,
LONGEST_DD_PULSE_LENGTH * sizeof (float));
memset(voice->osc_audio + LONGEST_DD_PULSE_LENGTH, 0,
(MINBLEP_BUFFER_LENGTH - LONGEST_DD_PULSE_LENGTH) * sizeof (float));
osc_index = 0;
}
}

/* save things for next time around */
voice->lfo_pos = lfo_pos;
voice->vca_eg = vca_eg;
voice->vca_eg_phase = vca_eg_phase;
voice->vcf_eg = vcf_eg;
voice->vcf_eg_phase = vcf_eg_phase;
voice->osc_index = osc_index;

return;
(void)freq;
(void)vcf_acc_amt;
}

+ 1
- 0
source/backend/plugin/NativePlugin.cpp View File

@@ -60,6 +60,7 @@ void carla_register_all_plugins()
// DISTRHO plugins (OpenGL)
carla_register_native_plugin_3BandEQ();
carla_register_native_plugin_3BandSplitter();
carla_register_native_plugin_Nekobi();
carla_register_native_plugin_PingPongPan();
carla_register_native_plugin_StereoEnhancer();
#endif


+ 19
- 0
source/libs/distrho/DistrhoPlugin.hpp View File

@@ -69,6 +69,16 @@ struct ParameterRanges {
this->stepLarge = stepLarge;
}

void clear()
{
def = 0.0f;
min = 0.0f;
max = 1.0f;
step = 0.001f;
stepSmall = 0.00001f;
stepLarge = 0.01f;
}

void fixValue(float& value) const
{
if (value < min)
@@ -116,6 +126,15 @@ struct Parameter {

Parameter()
: hints(0x0) {}

void clear()
{
hints = 0x0;
name = "";
symbol = "";
unit = "";
ranges.clear();
}
};

// -------------------------------------------------


+ 2
- 0
source/libs/distrho/dgl/ImageSlider.hpp View File

@@ -42,7 +42,9 @@ public:
float getValue() const;

void setStartPos(const Point<int>& startPos);
void setStartPos(int x, int y);
void setEndPos(const Point<int>& endPos);
void setEndPos(int x, int y);

void setRange(float min, float max);
void setValue(float value, bool sendCallback = false);


+ 10
- 0
source/libs/distrho/dgl/src/ImageSlider.cpp View File

@@ -62,12 +62,22 @@ void ImageSlider::setStartPos(const Point<int>& startPos)
_recheckArea();
}

void ImageSlider::setStartPos(int x, int y)
{
setStartPos(Point<int>(x, y));
}

void ImageSlider::setEndPos(const Point<int>& endPos)
{
fEndPos = endPos;
_recheckArea();
}

void ImageSlider::setEndPos(int x, int y)
{
setEndPos(Point<int>(x, y));
}

void ImageSlider::setRange(float min, float max)
{
if (fValue < min)


+ 1
- 2
source/libs/distrho/src/DistrhoUIInternal.hpp View File

@@ -227,12 +227,11 @@ public:
// needed?
#elif defined(DISTRHO_UI_OPENGL)
glApp.idle();
#else
#endif
assert(kUi != nullptr);

if (kUi != nullptr)
kUi->d_uiIdle();
#endif
}

#if defined(DISTRHO_UI_EXTERNAL)


Loading…
Cancel
Save