--- linuxsampler/trunk/src/engines/gig/Voice.cpp 2004/10/16 17:38:03 287 +++ linuxsampler/trunk/src/engines/gig/Voice.cpp 2006/06/25 13:54:17 877 @@ -3,6 +3,7 @@ * LinuxSampler - modular, streaming capable sampler * * * * Copyright (C) 2003, 2004 by Benno Senoner and Christian Schoenebeck * + * Copyright (C) 2005, 2006 Christian Schoenebeck * * * * 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 * @@ -20,81 +21,43 @@ * MA 02111-1307 USA * ***************************************************************************/ -#include "EGADSR.h" -#include "Manipulator.h" +#include "../../common/Features.h" +#include "Synthesizer.h" +#include "Profiler.h" #include "Voice.h" namespace LinuxSampler { namespace gig { - const float Voice::FILTER_CUTOFF_COEFF(CalculateFilterCutoffCoeff()); - - const int Voice::FILTER_UPDATE_MASK(CalculateFilterUpdateMask()); - - float Voice::CalculateFilterCutoffCoeff() { - return log(FILTER_CUTOFF_MIN / FILTER_CUTOFF_MAX); - } - - int Voice::CalculateFilterUpdateMask() { - if (FILTER_UPDATE_PERIOD <= 0) return 0; - int power_of_two; - for (power_of_two = 0; 1<pEngine = pEngine; - - // delete old objects - if (pEG1) delete pEG1; - if (pEG2) delete pEG2; - if (pEG3) delete pEG3; - if (pVCAManipulator) delete pVCAManipulator; - if (pVCFCManipulator) delete pVCFCManipulator; - if (pVCOManipulator) delete pVCOManipulator; - if (pLFO1) delete pLFO1; - if (pLFO2) delete pLFO2; - if (pLFO3) delete pLFO3; - - // create new ones - pEG1 = new EGADSR(pEngine, Event::destination_vca); - pEG2 = new EGADSR(pEngine, Event::destination_vcfc); - pEG3 = new EGDecay(pEngine, Event::destination_vco); - pVCAManipulator = new VCAManipulator(pEngine); - pVCFCManipulator = new VCFCManipulator(pEngine); - pVCOManipulator = new VCOManipulator(pEngine); - pLFO1 = new LFO(0.0f, 1.0f, LFO::propagation_top_down, pVCAManipulator, pEngine->pEventPool); - pLFO2 = new LFO(0.0f, 1.0f, LFO::propagation_top_down, pVCFCManipulator, pEngine->pEventPool); - pLFO3 = new LFO(-1200.0f, 1200.0f, LFO::propagation_middle_balanced, pVCOManipulator, pEngine->pEventPool); // +-1 octave (+-1200 cents) max. - + this->pEngine = pEngine; this->pDiskThread = pEngine->pDiskThread; dmsg(6,("Voice::SetEngine()\n")); } @@ -103,181 +66,96 @@ * Initializes and triggers the voice, a disk stream will be launched if * needed. * - * @param itNoteOnEvent - event that caused triggering of this voice - * @param PitchBend - MIDI detune factor (-8192 ... +8191) - * @param pInstrument - points to the loaded instrument which provides sample wave(s) and articulation data - * @param iLayer - layer number this voice refers to (only if this is a layered sound of course) - * @param ReleaseTriggerVoice - if this new voice is a release trigger voice (optional, default = false) - * @param VoiceStealing - wether the voice is allowed to steal voices for further subvoices - * @returns 0 on success, a value < 0 if something failed + * @param pEngineChannel - engine channel on which this voice was ordered + * @param itNoteOnEvent - event that caused triggering of this voice + * @param PitchBend - MIDI detune factor (-8192 ... +8191) + * @param pDimRgn - points to the dimension region which provides sample wave(s) and articulation data + * @param VoiceType - type of this voice + * @param iKeyGroup - a value > 0 defines a key group in which this voice is member of + * @returns 0 on success, a value < 0 if the voice wasn't triggered + * (either due to an error or e.g. because no region is + * defined for the given key) */ - int Voice::Trigger(Pool::Iterator& itNoteOnEvent, int PitchBend, ::gig::Instrument* pInstrument, int iLayer, bool ReleaseTriggerVoice, bool VoiceStealing) { - if (!pInstrument) { - dmsg(1,("voice::trigger: !pInstrument\n")); - exit(EXIT_FAILURE); + int Voice::Trigger(EngineChannel* pEngineChannel, Pool::Iterator& itNoteOnEvent, int PitchBend, ::gig::DimensionRegion* pDimRgn, type_t VoiceType, int iKeyGroup) { + this->pEngineChannel = pEngineChannel; + this->pDimRgn = pDimRgn; + + #if CONFIG_DEVMODE + if (itNoteOnEvent->FragmentPos() > pEngine->MaxSamplesPerCycle) { // just a sanity check for debugging + dmsg(1,("Voice::Trigger(): ERROR, TriggerDelay > Totalsamples\n")); } + #endif // CONFIG_DEVMODE - Type = type_normal; + Type = VoiceType; MIDIKey = itNoteOnEvent->Param.Note.Key; - pRegion = pInstrument->GetRegion(MIDIKey); - PlaybackState = playback_state_ram; // we always start playback from RAM cache and switch then to disk if needed + PlaybackState = playback_state_init; // mark voice as triggered, but no audio rendered yet Delay = itNoteOnEvent->FragmentPos(); itTriggerEvent = itNoteOnEvent; itKillEvent = Pool::Iterator(); - itChildVoice = Pool::Iterator(); + KeyGroup = iKeyGroup; + pSample = pDimRgn->pSample; // sample won't change until the voice is finished - if (!pRegion) { - std::cerr << "gig::Voice: No Region defined for MIDI key " << MIDIKey << std::endl << std::flush; - KillImmediately(); - return -1; - } + // calculate volume + const double velocityAttenuation = pDimRgn->GetVelocityAttenuation(itNoteOnEvent->Param.Note.Velocity); - KeyGroup = pRegion->KeyGroup; + float volume = velocityAttenuation / 32768.0f; // we downscale by 32768 to convert from int16 value range to DSP value range (which is -1.0..1.0) - // get current dimension values to select the right dimension region - //FIXME: controller values for selecting the dimension region here are currently not sample accurate - uint DimValues[5] = {0,0,0,0,0}; - for (int i = pRegion->Dimensions - 1; i >= 0; i--) { - switch (pRegion->pDimensionDefinitions[i].dimension) { - case ::gig::dimension_samplechannel: - DimValues[i] = 0; //TODO: we currently ignore this dimension - break; - case ::gig::dimension_layer: - DimValues[i] = iLayer; - // if this is the 1st layer then spawn further voices for all the other layers - if (iLayer == 0) - for (int iNewLayer = 1; iNewLayer < pRegion->pDimensionDefinitions[i].zones; iNewLayer++) - itChildVoice = pEngine->LaunchVoice(itNoteOnEvent, iNewLayer, ReleaseTriggerVoice, VoiceStealing); - break; - case ::gig::dimension_velocity: - DimValues[i] = itNoteOnEvent->Param.Note.Velocity; - break; - case ::gig::dimension_channelaftertouch: - DimValues[i] = 0; //TODO: we currently ignore this dimension - break; - case ::gig::dimension_releasetrigger: - Type = (ReleaseTriggerVoice) ? type_release_trigger : (!iLayer) ? type_release_trigger_required : type_normal; - DimValues[i] = (uint) ReleaseTriggerVoice; - break; - case ::gig::dimension_keyboard: - DimValues[i] = (uint) itNoteOnEvent->Param.Note.Key; - break; - case ::gig::dimension_modwheel: - DimValues[i] = pEngine->ControllerTable[1]; - break; - case ::gig::dimension_breath: - DimValues[i] = pEngine->ControllerTable[2]; - break; - case ::gig::dimension_foot: - DimValues[i] = pEngine->ControllerTable[4]; - break; - case ::gig::dimension_portamentotime: - DimValues[i] = pEngine->ControllerTable[5]; - break; - case ::gig::dimension_effect1: - DimValues[i] = pEngine->ControllerTable[12]; - break; - case ::gig::dimension_effect2: - DimValues[i] = pEngine->ControllerTable[13]; - break; - case ::gig::dimension_genpurpose1: - DimValues[i] = pEngine->ControllerTable[16]; - break; - case ::gig::dimension_genpurpose2: - DimValues[i] = pEngine->ControllerTable[17]; - break; - case ::gig::dimension_genpurpose3: - DimValues[i] = pEngine->ControllerTable[18]; - break; - case ::gig::dimension_genpurpose4: - DimValues[i] = pEngine->ControllerTable[19]; - break; - case ::gig::dimension_sustainpedal: - DimValues[i] = pEngine->ControllerTable[64]; - break; - case ::gig::dimension_portamento: - DimValues[i] = pEngine->ControllerTable[65]; - break; - case ::gig::dimension_sostenutopedal: - DimValues[i] = pEngine->ControllerTable[66]; - break; - case ::gig::dimension_softpedal: - DimValues[i] = pEngine->ControllerTable[67]; - break; - case ::gig::dimension_genpurpose5: - DimValues[i] = pEngine->ControllerTable[80]; - break; - case ::gig::dimension_genpurpose6: - DimValues[i] = pEngine->ControllerTable[81]; - break; - case ::gig::dimension_genpurpose7: - DimValues[i] = pEngine->ControllerTable[82]; - break; - case ::gig::dimension_genpurpose8: - DimValues[i] = pEngine->ControllerTable[83]; - break; - case ::gig::dimension_effect1depth: - DimValues[i] = pEngine->ControllerTable[91]; - break; - case ::gig::dimension_effect2depth: - DimValues[i] = pEngine->ControllerTable[92]; - break; - case ::gig::dimension_effect3depth: - DimValues[i] = pEngine->ControllerTable[93]; - break; - case ::gig::dimension_effect4depth: - DimValues[i] = pEngine->ControllerTable[94]; - break; - case ::gig::dimension_effect5depth: - DimValues[i] = pEngine->ControllerTable[95]; - break; - case ::gig::dimension_none: - std::cerr << "gig::Voice::Trigger() Error: dimension=none\n" << std::flush; - break; - default: - std::cerr << "gig::Voice::Trigger() Error: Unknown dimension\n" << std::flush; - } + volume *= pDimRgn->SampleAttenuation; + + // the volume of release triggered samples depends on note length + if (Type == type_release_trigger) { + float noteLength = float(pEngine->FrameTime + Delay - + pEngineChannel->pMIDIKeyInfo[MIDIKey].NoteOnTime) / pEngine->SampleRate; + float attenuation = 1 - 0.01053 * (256 >> pDimRgn->ReleaseTriggerDecay) * noteLength; + if (attenuation <= 0) return -1; + volume *= attenuation; } - pDimRgn = pRegion->GetDimensionRegionByValue(DimValues[4],DimValues[3],DimValues[2],DimValues[1],DimValues[0]); + + // select channel mode (mono or stereo) + SYNTHESIS_MODE_SET_CHANNELS(SynthesisMode, pSample->Channels == 2); // get starting crossfade volume level + float crossfadeVolume; switch (pDimRgn->AttenuationController.type) { case ::gig::attenuation_ctrl_t::type_channelaftertouch: - CrossfadeVolume = 1.0f; //TODO: aftertouch not supported yet + crossfadeVolume = 1.0f; //TODO: aftertouch not supported yet break; case ::gig::attenuation_ctrl_t::type_velocity: - CrossfadeVolume = CrossfadeAttenuation(itNoteOnEvent->Param.Note.Velocity); + crossfadeVolume = Engine::CrossfadeCurve[CrossfadeAttenuation(itNoteOnEvent->Param.Note.Velocity)]; break; case ::gig::attenuation_ctrl_t::type_controlchange: //FIXME: currently not sample accurate - CrossfadeVolume = CrossfadeAttenuation(pEngine->ControllerTable[pDimRgn->AttenuationController.controller_number]); + crossfadeVolume = Engine::CrossfadeCurve[CrossfadeAttenuation(pEngineChannel->ControllerTable[pDimRgn->AttenuationController.controller_number])]; break; case ::gig::attenuation_ctrl_t::type_none: // no crossfade defined default: - CrossfadeVolume = 1.0f; + crossfadeVolume = 1.0f; } - PanLeft = 1.0f - float(RTMath::Max(pDimRgn->Pan, 0)) / 63.0f; - PanRight = 1.0f - float(RTMath::Min(pDimRgn->Pan, 0)) / -64.0f; + VolumeLeft = volume * Engine::PanCurve[64 - pDimRgn->Pan]; + VolumeRight = volume * Engine::PanCurve[64 + pDimRgn->Pan]; - pSample = pDimRgn->pSample; // sample won't change until the voice is finished + float subfragmentRate = pEngine->SampleRate / CONFIG_DEFAULT_SUBFRAGMENT_SIZE; + CrossfadeSmoother.trigger(crossfadeVolume, subfragmentRate); + VolumeSmoother.trigger(pEngineChannel->GlobalVolume, subfragmentRate); + PanLeftSmoother.trigger(pEngineChannel->GlobalPanLeft, subfragmentRate); + PanRightSmoother.trigger(pEngineChannel->GlobalPanRight, subfragmentRate); - Pos = pDimRgn->SampleStartOffset; // offset where we should start playback of sample (0 - 2000 sample points) + finalSynthesisParameters.dPos = pDimRgn->SampleStartOffset; // offset where we should start playback of sample (0 - 2000 sample points) + Pos = pDimRgn->SampleStartOffset; // Check if the sample needs disk streaming or is too short for that long cachedsamples = pSample->GetCache().Size / pSample->FrameSize; DiskVoice = cachedsamples < pSample->SamplesTotal; + const DLS::sample_loop_t& loopinfo = pDimRgn->pSampleLoops[0]; + if (DiskVoice) { // voice to be streamed from disk - MaxRAMPos = cachedsamples - (pEngine->MaxSamplesPerCycle << MAX_PITCH) / pSample->Channels; //TODO: this calculation is too pessimistic and may better be moved to Render() method, so it calculates MaxRAMPos dependent to the current demand of sample points to be rendered (e.g. in case of JACK) + MaxRAMPos = cachedsamples - (pEngine->MaxSamplesPerCycle << CONFIG_MAX_PITCH) / pSample->Channels; //TODO: this calculation is too pessimistic and may better be moved to Render() method, so it calculates MaxRAMPos dependent to the current demand of sample points to be rendered (e.g. in case of JACK) // check if there's a loop defined which completely fits into the cached (RAM) part of the sample - if (pSample->Loops && pSample->LoopEnd <= MaxRAMPos) { - RAMLoop = true; - LoopCyclesLeft = pSample->LoopPlayCount; - } - else RAMLoop = false; + RAMLoop = (pDimRgn->SampleLoops && (loopinfo.LoopStart + loopinfo.LoopLength) <= MaxRAMPos); - if (pDiskThread->OrderNewStream(&DiskStreamRef, pSample, MaxRAMPos, !RAMLoop) < 0) { + if (pDiskThread->OrderNewStream(&DiskStreamRef, pDimRgn, MaxRAMPos, !RAMLoop) < 0) { dmsg(1,("Disk stream order failed!\n")); KillImmediately(); return -1; @@ -286,26 +164,27 @@ } else { // RAM only voice MaxRAMPos = cachedsamples; - if (pSample->Loops) { - RAMLoop = true; - LoopCyclesLeft = pSample->LoopPlayCount; - } - else RAMLoop = false; + RAMLoop = (pDimRgn->SampleLoops != 0); dmsg(4,("RAM only voice launched (Looping: %s)\n", (RAMLoop) ? "yes" : "no")); } - + if (RAMLoop) { + loop.uiTotalCycles = pSample->LoopPlayCount; + loop.uiCyclesLeft = pSample->LoopPlayCount; + loop.uiStart = loopinfo.LoopStart; + loop.uiEnd = loopinfo.LoopStart + loopinfo.LoopLength; + loop.uiSize = loopinfo.LoopLength; + } // calculate initial pitch value { - double pitchbasecents = pDimRgn->FineTune * 10 + (int) pEngine->ScaleTuning[MIDIKey % 12]; + double pitchbasecents = pDimRgn->FineTune + (int) pEngine->ScaleTuning[MIDIKey % 12]; if (pDimRgn->PitchTrack) pitchbasecents += (MIDIKey - (int) pDimRgn->UnityNote) * 100; - this->PitchBase = RTMath::CentsToFreqRatio(pitchbasecents) * (double(pSample->SamplesPerSecond) / double(pEngine->pAudioOutputDevice->SampleRate())); + this->PitchBase = RTMath::CentsToFreqRatio(pitchbasecents) * (double(pSample->SamplesPerSecond) / double(pEngine->SampleRate)); this->PitchBend = RTMath::CentsToFreqRatio(((double) PitchBend / 8192.0) * 200.0); // pitchbend wheel +-2 semitones = 200 cents } - - Volume = pDimRgn->GetVelocityAttenuation(itNoteOnEvent->Param.Note.Velocity) / 32768.0f; // we downscale by 32768 to convert from int16 value range to DSP value range (which is -1.0..1.0) - + // the length of the decay and release curves are dependent on the velocity + const double velrelease = 1 / pDimRgn->GetVelocityRelease(itNoteOnEvent->Param.Note.Velocity); // setup EG 1 (VCA EG) { @@ -322,30 +201,49 @@ eg1controllervalue = itNoteOnEvent->Param.Note.Velocity; break; case ::gig::eg1_ctrl_t::type_controlchange: // MIDI control change controller - eg1controllervalue = pEngine->ControllerTable[pDimRgn->EG1Controller.controller_number]; + eg1controllervalue = pEngineChannel->ControllerTable[pDimRgn->EG1Controller.controller_number]; break; } if (pDimRgn->EG1ControllerInvert) eg1controllervalue = 127 - eg1controllervalue; - // calculate influence of EG1 controller on EG1's parameters (TODO: needs to be fine tuned) - double eg1attack = (pDimRgn->EG1ControllerAttackInfluence) ? 0.0001 * (double) (1 << pDimRgn->EG1ControllerAttackInfluence) * eg1controllervalue : 0.0; - double eg1decay = (pDimRgn->EG1ControllerDecayInfluence) ? 0.0001 * (double) (1 << pDimRgn->EG1ControllerDecayInfluence) * eg1controllervalue : 0.0; - double eg1release = (pDimRgn->EG1ControllerReleaseInfluence) ? 0.0001 * (double) (1 << pDimRgn->EG1ControllerReleaseInfluence) * eg1controllervalue : 0.0; - - pEG1->Trigger(pDimRgn->EG1PreAttack, - pDimRgn->EG1Attack + eg1attack, - pDimRgn->EG1Hold, - pSample->LoopStart, - pDimRgn->EG1Decay1 + eg1decay, - pDimRgn->EG1Decay2 + eg1decay, - pDimRgn->EG1InfiniteSustain, - pDimRgn->EG1Sustain, - pDimRgn->EG1Release + eg1release, - Delay); - } + // calculate influence of EG1 controller on EG1's parameters + // (eg1attack is different from the others) + double eg1attack = (pDimRgn->EG1ControllerAttackInfluence) ? + 1 + 0.031 * (double) (pDimRgn->EG1ControllerAttackInfluence == 1 ? + 1 : 1 << pDimRgn->EG1ControllerAttackInfluence) * eg1controllervalue : 1.0; + double eg1decay = (pDimRgn->EG1ControllerDecayInfluence) ? 1 + 0.00775 * (double) (1 << pDimRgn->EG1ControllerDecayInfluence) * eg1controllervalue : 1.0; + double eg1release = (pDimRgn->EG1ControllerReleaseInfluence) ? 1 + 0.00775 * (double) (1 << pDimRgn->EG1ControllerReleaseInfluence) * eg1controllervalue : 1.0; + + EG1.trigger(pDimRgn->EG1PreAttack, + pDimRgn->EG1Attack * eg1attack, + pDimRgn->EG1Hold, + pDimRgn->EG1Decay1 * eg1decay * velrelease, + pDimRgn->EG1Decay2 * eg1decay * velrelease, + pDimRgn->EG1InfiniteSustain, + pDimRgn->EG1Sustain, + pDimRgn->EG1Release * eg1release * velrelease, + velocityAttenuation, + pEngine->SampleRate / CONFIG_DEFAULT_SUBFRAGMENT_SIZE); + } + +#ifdef CONFIG_INTERPOLATE_VOLUME + // setup initial volume in synthesis parameters +#ifdef CONFIG_PROCESS_MUTED_CHANNELS + if (pEngineChannel->GetMute()) { + finalSynthesisParameters.fFinalVolumeLeft = 0; + finalSynthesisParameters.fFinalVolumeRight = 0; + } + else +#else + { + float finalVolume = pEngineChannel->GlobalVolume * crossfadeVolume * EG1.getLevel(); + finalSynthesisParameters.fFinalVolumeLeft = finalVolume * VolumeLeft * pEngineChannel->GlobalPanLeft; + finalSynthesisParameters.fFinalVolumeRight = finalVolume * VolumeRight * pEngineChannel->GlobalPanRight; + } +#endif +#endif - #if ENABLE_FILTER // setup EG 2 (VCF Cutoff EG) { // get current value of EG2 controller @@ -361,34 +259,41 @@ eg2controllervalue = itNoteOnEvent->Param.Note.Velocity; break; case ::gig::eg2_ctrl_t::type_controlchange: // MIDI control change controller - eg2controllervalue = pEngine->ControllerTable[pDimRgn->EG2Controller.controller_number]; + eg2controllervalue = pEngineChannel->ControllerTable[pDimRgn->EG2Controller.controller_number]; break; } if (pDimRgn->EG2ControllerInvert) eg2controllervalue = 127 - eg2controllervalue; - // calculate influence of EG2 controller on EG2's parameters (TODO: needs to be fine tuned) - double eg2attack = (pDimRgn->EG2ControllerAttackInfluence) ? 0.0001 * (double) (1 << pDimRgn->EG2ControllerAttackInfluence) * eg2controllervalue : 0.0; - double eg2decay = (pDimRgn->EG2ControllerDecayInfluence) ? 0.0001 * (double) (1 << pDimRgn->EG2ControllerDecayInfluence) * eg2controllervalue : 0.0; - double eg2release = (pDimRgn->EG2ControllerReleaseInfluence) ? 0.0001 * (double) (1 << pDimRgn->EG2ControllerReleaseInfluence) * eg2controllervalue : 0.0; - - pEG2->Trigger(pDimRgn->EG2PreAttack, - pDimRgn->EG2Attack + eg2attack, - false, - pSample->LoopStart, - pDimRgn->EG2Decay1 + eg2decay, - pDimRgn->EG2Decay2 + eg2decay, - pDimRgn->EG2InfiniteSustain, - pDimRgn->EG2Sustain, - pDimRgn->EG2Release + eg2release, - Delay); + // calculate influence of EG2 controller on EG2's parameters + double eg2attack = (pDimRgn->EG2ControllerAttackInfluence) ? 1 + 0.00775 * (double) (1 << pDimRgn->EG2ControllerAttackInfluence) * eg2controllervalue : 1.0; + double eg2decay = (pDimRgn->EG2ControllerDecayInfluence) ? 1 + 0.00775 * (double) (1 << pDimRgn->EG2ControllerDecayInfluence) * eg2controllervalue : 1.0; + double eg2release = (pDimRgn->EG2ControllerReleaseInfluence) ? 1 + 0.00775 * (double) (1 << pDimRgn->EG2ControllerReleaseInfluence) * eg2controllervalue : 1.0; + + EG2.trigger(pDimRgn->EG2PreAttack, + pDimRgn->EG2Attack * eg2attack, + false, + pDimRgn->EG2Decay1 * eg2decay * velrelease, + pDimRgn->EG2Decay2 * eg2decay * velrelease, + pDimRgn->EG2InfiniteSustain, + pDimRgn->EG2Sustain, + pDimRgn->EG2Release * eg2release * velrelease, + velocityAttenuation, + pEngine->SampleRate / CONFIG_DEFAULT_SUBFRAGMENT_SIZE); } - #endif // ENABLE_FILTER // setup EG 3 (VCO EG) { - double eg3depth = RTMath::CentsToFreqRatio(pDimRgn->EG3Depth); - pEG3->Trigger(eg3depth, pDimRgn->EG3Attack, Delay); + // if portamento mode is on, we dedicate EG3 purely for portamento, otherwise if portamento is off we do as told by the patch + bool bPortamento = pEngineChannel->PortamentoMode && pEngineChannel->PortamentoPos >= 0.0f; + float eg3depth = (bPortamento) + ? RTMath::CentsToFreqRatio((pEngineChannel->PortamentoPos - (float) MIDIKey) * 100) + : RTMath::CentsToFreqRatio(pDimRgn->EG3Depth); + float eg3time = (bPortamento) + ? pEngineChannel->PortamentoTime + : pDimRgn->EG3Attack; + EG3.trigger(eg3depth, eg3time, pEngine->SampleRate / CONFIG_DEFAULT_SUBFRAGMENT_SIZE); + dmsg(5,("PortamentoPos=%f, depth=%f, time=%f\n", pEngineChannel->PortamentoPos, eg3depth, eg3time)); } @@ -399,37 +304,45 @@ case ::gig::lfo1_ctrl_internal: lfo1_internal_depth = pDimRgn->LFO1InternalDepth; pLFO1->ExtController = 0; // no external controller + bLFO1Enabled = (lfo1_internal_depth > 0); break; case ::gig::lfo1_ctrl_modwheel: lfo1_internal_depth = 0; pLFO1->ExtController = 1; // MIDI controller 1 + bLFO1Enabled = (pDimRgn->LFO1ControlDepth > 0); break; case ::gig::lfo1_ctrl_breath: lfo1_internal_depth = 0; pLFO1->ExtController = 2; // MIDI controller 2 + bLFO1Enabled = (pDimRgn->LFO1ControlDepth > 0); break; case ::gig::lfo1_ctrl_internal_modwheel: lfo1_internal_depth = pDimRgn->LFO1InternalDepth; pLFO1->ExtController = 1; // MIDI controller 1 + bLFO1Enabled = (lfo1_internal_depth > 0 || pDimRgn->LFO1ControlDepth > 0); break; case ::gig::lfo1_ctrl_internal_breath: lfo1_internal_depth = pDimRgn->LFO1InternalDepth; pLFO1->ExtController = 2; // MIDI controller 2 + bLFO1Enabled = (lfo1_internal_depth > 0 || pDimRgn->LFO1ControlDepth > 0); break; default: lfo1_internal_depth = 0; pLFO1->ExtController = 0; // no external controller + bLFO1Enabled = false; + } + if (bLFO1Enabled) { + pLFO1->trigger(pDimRgn->LFO1Frequency, + start_level_max, + lfo1_internal_depth, + pDimRgn->LFO1ControlDepth, + pDimRgn->LFO1FlipPhase, + pEngine->SampleRate / CONFIG_DEFAULT_SUBFRAGMENT_SIZE); + pLFO1->update(pLFO1->ExtController ? pEngineChannel->ControllerTable[pLFO1->ExtController] : 0); } - pLFO1->Trigger(pDimRgn->LFO1Frequency, - lfo1_internal_depth, - pDimRgn->LFO1ControlDepth, - pEngine->ControllerTable[pLFO1->ExtController], - pDimRgn->LFO1FlipPhase, - pEngine->SampleRate, - Delay); } - #if ENABLE_FILTER + // setup LFO 2 (VCF Cutoff LFO) { uint16_t lfo2_internal_depth; @@ -437,36 +350,44 @@ case ::gig::lfo2_ctrl_internal: lfo2_internal_depth = pDimRgn->LFO2InternalDepth; pLFO2->ExtController = 0; // no external controller + bLFO2Enabled = (lfo2_internal_depth > 0); break; case ::gig::lfo2_ctrl_modwheel: lfo2_internal_depth = 0; pLFO2->ExtController = 1; // MIDI controller 1 + bLFO2Enabled = (pDimRgn->LFO2ControlDepth > 0); break; case ::gig::lfo2_ctrl_foot: lfo2_internal_depth = 0; pLFO2->ExtController = 4; // MIDI controller 4 + bLFO2Enabled = (pDimRgn->LFO2ControlDepth > 0); break; case ::gig::lfo2_ctrl_internal_modwheel: lfo2_internal_depth = pDimRgn->LFO2InternalDepth; pLFO2->ExtController = 1; // MIDI controller 1 + bLFO2Enabled = (lfo2_internal_depth > 0 || pDimRgn->LFO2ControlDepth > 0); break; case ::gig::lfo2_ctrl_internal_foot: lfo2_internal_depth = pDimRgn->LFO2InternalDepth; pLFO2->ExtController = 4; // MIDI controller 4 + bLFO2Enabled = (lfo2_internal_depth > 0 || pDimRgn->LFO2ControlDepth > 0); break; default: lfo2_internal_depth = 0; pLFO2->ExtController = 0; // no external controller + bLFO2Enabled = false; + } + if (bLFO2Enabled) { + pLFO2->trigger(pDimRgn->LFO2Frequency, + start_level_max, + lfo2_internal_depth, + pDimRgn->LFO2ControlDepth, + pDimRgn->LFO2FlipPhase, + pEngine->SampleRate / CONFIG_DEFAULT_SUBFRAGMENT_SIZE); + pLFO2->update(pLFO2->ExtController ? pEngineChannel->ControllerTable[pLFO2->ExtController] : 0); } - pLFO2->Trigger(pDimRgn->LFO2Frequency, - lfo2_internal_depth, - pDimRgn->LFO2ControlDepth, - pEngine->ControllerTable[pLFO2->ExtController], - pDimRgn->LFO2FlipPhase, - pEngine->SampleRate, - Delay); } - #endif // ENABLE_FILTER + // setup LFO 3 (VCO LFO) { @@ -475,45 +396,54 @@ case ::gig::lfo3_ctrl_internal: lfo3_internal_depth = pDimRgn->LFO3InternalDepth; pLFO3->ExtController = 0; // no external controller + bLFO3Enabled = (lfo3_internal_depth > 0); break; case ::gig::lfo3_ctrl_modwheel: lfo3_internal_depth = 0; pLFO3->ExtController = 1; // MIDI controller 1 + bLFO3Enabled = (pDimRgn->LFO3ControlDepth > 0); break; case ::gig::lfo3_ctrl_aftertouch: lfo3_internal_depth = 0; pLFO3->ExtController = 0; // TODO: aftertouch not implemented yet + bLFO3Enabled = false; // see TODO comment in line above break; case ::gig::lfo3_ctrl_internal_modwheel: lfo3_internal_depth = pDimRgn->LFO3InternalDepth; pLFO3->ExtController = 1; // MIDI controller 1 + bLFO3Enabled = (lfo3_internal_depth > 0 || pDimRgn->LFO3ControlDepth > 0); break; case ::gig::lfo3_ctrl_internal_aftertouch: lfo3_internal_depth = pDimRgn->LFO3InternalDepth; pLFO1->ExtController = 0; // TODO: aftertouch not implemented yet + bLFO3Enabled = (lfo3_internal_depth > 0 /*|| pDimRgn->LFO3ControlDepth > 0*/); // see TODO comment in line above break; default: lfo3_internal_depth = 0; pLFO3->ExtController = 0; // no external controller + bLFO3Enabled = false; + } + if (bLFO3Enabled) { + pLFO3->trigger(pDimRgn->LFO3Frequency, + start_level_mid, + lfo3_internal_depth, + pDimRgn->LFO3ControlDepth, + false, + pEngine->SampleRate / CONFIG_DEFAULT_SUBFRAGMENT_SIZE); + pLFO3->update(pLFO3->ExtController ? pEngineChannel->ControllerTable[pLFO3->ExtController] : 0); } - pLFO3->Trigger(pDimRgn->LFO3Frequency, - lfo3_internal_depth, - pDimRgn->LFO3ControlDepth, - pEngine->ControllerTable[pLFO3->ExtController], - false, - pEngine->SampleRate, - Delay); } - #if ENABLE_FILTER - #if FORCE_FILTER_USAGE - FilterLeft.Enabled = FilterRight.Enabled = true; + + #if CONFIG_FORCE_FILTER + const bool bUseFilter = true; #else // use filter only if instrument file told so - FilterLeft.Enabled = FilterRight.Enabled = pDimRgn->VCFEnabled; - #endif // FORCE_FILTER_USAGE - if (pDimRgn->VCFEnabled) { - #ifdef OVERRIDE_FILTER_CUTOFF_CTRL - VCFCutoffCtrl.controller = OVERRIDE_FILTER_CUTOFF_CTRL; + const bool bUseFilter = pDimRgn->VCFEnabled; + #endif // CONFIG_FORCE_FILTER + SYNTHESIS_MODE_SET_FILTER(SynthesisMode, bUseFilter); + if (bUseFilter) { + #ifdef CONFIG_OVERRIDE_CUTOFF_CTRL + VCFCutoffCtrl.controller = CONFIG_OVERRIDE_CUTOFF_CTRL; #else // use the one defined in the instrument file switch (pDimRgn->VCFCutoffController) { case ::gig::vcf_cutoff_ctrl_modwheel: @@ -549,10 +479,10 @@ VCFCutoffCtrl.controller = 0; break; } - #endif // OVERRIDE_FILTER_CUTOFF_CTRL + #endif // CONFIG_OVERRIDE_CUTOFF_CTRL - #ifdef OVERRIDE_FILTER_RES_CTRL - VCFResonanceCtrl.controller = OVERRIDE_FILTER_RES_CTRL; + #ifdef CONFIG_OVERRIDE_RESONANCE_CTRL + VCFResonanceCtrl.controller = CONFIG_OVERRIDE_RESONANCE_CTRL; #else // use the one defined in the instrument file switch (pDimRgn->VCFResonanceController) { case ::gig::vcf_res_ctrl_genpurpose3: @@ -571,44 +501,49 @@ default: VCFResonanceCtrl.controller = 0; } - #endif // OVERRIDE_FILTER_RES_CTRL + #endif // CONFIG_OVERRIDE_RESONANCE_CTRL - #ifndef OVERRIDE_FILTER_TYPE - FilterLeft.SetType(pDimRgn->VCFType); - FilterRight.SetType(pDimRgn->VCFType); + #ifndef CONFIG_OVERRIDE_FILTER_TYPE + finalSynthesisParameters.filterLeft.SetType(pDimRgn->VCFType); + finalSynthesisParameters.filterRight.SetType(pDimRgn->VCFType); #else // override filter type - FilterLeft.SetType(OVERRIDE_FILTER_TYPE); - FilterRight.SetType(OVERRIDE_FILTER_TYPE); - #endif // OVERRIDE_FILTER_TYPE + FilterLeft.SetType(CONFIG_OVERRIDE_FILTER_TYPE); + FilterRight.SetType(CONFIG_OVERRIDE_FILTER_TYPE); + #endif // CONFIG_OVERRIDE_FILTER_TYPE - VCFCutoffCtrl.value = pEngine->ControllerTable[VCFCutoffCtrl.controller]; - VCFResonanceCtrl.value = pEngine->ControllerTable[VCFResonanceCtrl.controller]; + VCFCutoffCtrl.value = pEngineChannel->ControllerTable[VCFCutoffCtrl.controller]; + VCFResonanceCtrl.value = pEngineChannel->ControllerTable[VCFResonanceCtrl.controller]; // calculate cutoff frequency - float cutoff = (!VCFCutoffCtrl.controller) - ? exp((float) (127 - itNoteOnEvent->Param.Note.Velocity) * (float) pDimRgn->VCFVelocityScale * 6.2E-5f * FILTER_CUTOFF_COEFF) * FILTER_CUTOFF_MAX - : exp((float) VCFCutoffCtrl.value * 0.00787402f * FILTER_CUTOFF_COEFF) * FILTER_CUTOFF_MAX; - - // calculate resonance - float resonance = (float) VCFResonanceCtrl.value * 0.00787f; // 0.0..1.0 + float cutoff = pDimRgn->GetVelocityCutoff(itNoteOnEvent->Param.Note.Velocity); if (pDimRgn->VCFKeyboardTracking) { - resonance += (float) (itNoteOnEvent->Param.Note.Key - pDimRgn->VCFKeyboardTrackingBreakpoint) * 0.00787f; + cutoff *= exp((itNoteOnEvent->Param.Note.Key - pDimRgn->VCFKeyboardTrackingBreakpoint) * 0.057762265f); // (ln(2) / 12) } - Constrain(resonance, 0.0, 1.0); // correct resonance if outside allowed value range (0.0..1.0) + CutoffBase = cutoff; - VCFCutoffCtrl.fvalue = cutoff - FILTER_CUTOFF_MIN; - VCFResonanceCtrl.fvalue = resonance; + int cvalue; + if (VCFCutoffCtrl.controller) { + cvalue = pEngineChannel->ControllerTable[VCFCutoffCtrl.controller]; + if (pDimRgn->VCFCutoffControllerInvert) cvalue = 127 - cvalue; + // VCFVelocityScale in this case means Minimum cutoff + if (cvalue < pDimRgn->VCFVelocityScale) cvalue = pDimRgn->VCFVelocityScale; + } + else { + cvalue = pDimRgn->VCFCutoff; + } + cutoff *= float(cvalue); + if (cutoff > 127.0f) cutoff = 127.0f; - FilterLeft.SetParameters(cutoff, resonance, pEngine->SampleRate); - FilterRight.SetParameters(cutoff, resonance, pEngine->SampleRate); + // calculate resonance + float resonance = (float) (VCFResonanceCtrl.controller ? VCFResonanceCtrl.value : pDimRgn->VCFResonance); - FilterUpdateCounter = -1; + VCFCutoffCtrl.fvalue = cutoff; + VCFResonanceCtrl.fvalue = resonance; } else { VCFCutoffCtrl.controller = 0; VCFResonanceCtrl.controller = 0; } - #endif // ENABLE_FILTER return 0; // success } @@ -626,50 +561,28 @@ */ void Voice::Render(uint Samples) { - // Reset the synthesis parameter matrix - pEngine->ResetSynthesisParameters(Event::destination_vca, this->Volume * this->CrossfadeVolume * pEngine->GlobalVolume); - pEngine->ResetSynthesisParameters(Event::destination_vco, this->PitchBase); - #if ENABLE_FILTER - pEngine->ResetSynthesisParameters(Event::destination_vcfc, VCFCutoffCtrl.fvalue); - pEngine->ResetSynthesisParameters(Event::destination_vcfr, VCFResonanceCtrl.fvalue); - #endif // ENABLE_FILTER - - - // Apply events to the synthesis parameter matrix - ProcessEvents(Samples); - - - // Let all modulators write their parameter changes to the synthesis parameter matrix for the current audio fragment - pEG1->Process(Samples, pEngine->pMIDIKeyInfo[MIDIKey].pEvents, itTriggerEvent, this->Pos, this->PitchBase * this->PitchBend, itKillEvent); - #if ENABLE_FILTER - pEG2->Process(Samples, pEngine->pMIDIKeyInfo[MIDIKey].pEvents, itTriggerEvent, this->Pos, this->PitchBase * this->PitchBend); - #endif // ENABLE_FILTER - pEG3->Process(Samples); - pLFO1->Process(Samples); - #if ENABLE_FILTER - pLFO2->Process(Samples); - #endif // ENABLE_FILTER - pLFO3->Process(Samples); - - - #if ENABLE_FILTER - CalculateBiquadParameters(Samples); // calculate the final biquad filter parameters - #endif // ENABLE_FILTER - + // select default values for synthesis mode bits + SYNTHESIS_MODE_SET_LOOP(SynthesisMode, false); switch (this->PlaybackState) { + case playback_state_init: + this->PlaybackState = playback_state_ram; // we always start playback from RAM cache and switch then to disk if needed + // no break - continue with playback_state_ram + case playback_state_ram: { - if (RAMLoop) InterpolateAndLoop(Samples, (sample_t*) pSample->GetCache().pStart, Delay); - else InterpolateNoLoop(Samples, (sample_t*) pSample->GetCache().pStart, Delay); + if (RAMLoop) SYNTHESIS_MODE_SET_LOOP(SynthesisMode, true); // enable looping + + // render current fragment + Synthesize(Samples, (sample_t*) pSample->GetCache().pStart, Delay); + if (DiskVoice) { // check if we reached the allowed limit of the sample RAM cache - if (Pos > MaxRAMPos) { - dmsg(5,("Voice: switching to disk playback (Pos=%f)\n", Pos)); + if (finalSynthesisParameters.dPos > MaxRAMPos) { + dmsg(5,("Voice: switching to disk playback (Pos=%f)\n", finalSynthesisParameters.dPos)); this->PlaybackState = playback_state_disk; } - } - else if (Pos >= pSample->GetCache().Size / pSample->FrameSize) { + } else if (finalSynthesisParameters.dPos >= pSample->GetCache().Size / pSample->FrameSize) { this->PlaybackState = playback_state_end; } } @@ -684,20 +597,38 @@ KillImmediately(); return; } - DiskStreamRef.pStream->IncrementReadPos(pSample->Channels * (RTMath::DoubleToInt(Pos) - MaxRAMPos)); - Pos -= RTMath::DoubleToInt(Pos); + DiskStreamRef.pStream->IncrementReadPos(pSample->Channels * (int(finalSynthesisParameters.dPos) - MaxRAMPos)); + finalSynthesisParameters.dPos -= int(finalSynthesisParameters.dPos); + RealSampleWordsLeftToRead = -1; // -1 means no silence has been added yet } + const int sampleWordsLeftToRead = DiskStreamRef.pStream->GetReadSpace(); + // add silence sample at the end if we reached the end of the stream (for the interpolator) - if (DiskStreamRef.State == Stream::state_end && DiskStreamRef.pStream->GetReadSpace() < (pEngine->MaxSamplesPerCycle << MAX_PITCH) / pSample->Channels) { - DiskStreamRef.pStream->WriteSilence((pEngine->MaxSamplesPerCycle << MAX_PITCH) / pSample->Channels); - this->PlaybackState = playback_state_end; + if (DiskStreamRef.State == Stream::state_end) { + const int maxSampleWordsPerCycle = (pEngine->MaxSamplesPerCycle << CONFIG_MAX_PITCH) * pSample->Channels + 6; // +6 for the interpolator algorithm + if (sampleWordsLeftToRead <= maxSampleWordsPerCycle) { + // remember how many sample words there are before any silence has been added + if (RealSampleWordsLeftToRead < 0) RealSampleWordsLeftToRead = sampleWordsLeftToRead; + DiskStreamRef.pStream->WriteSilence(maxSampleWordsPerCycle - sampleWordsLeftToRead); + } } sample_t* ptr = DiskStreamRef.pStream->GetReadPtr(); // get the current read_ptr within the ringbuffer where we read the samples from - InterpolateNoLoop(Samples, ptr, Delay); - DiskStreamRef.pStream->IncrementReadPos(RTMath::DoubleToInt(Pos) * pSample->Channels); - Pos -= RTMath::DoubleToInt(Pos); + + // render current audio fragment + Synthesize(Samples, ptr, Delay); + + const int iPos = (int) finalSynthesisParameters.dPos; + const int readSampleWords = iPos * pSample->Channels; // amount of sample words actually been read + DiskStreamRef.pStream->IncrementReadPos(readSampleWords); + finalSynthesisParameters.dPos -= iPos; // just keep fractional part of playback position + + // change state of voice to 'end' if we really reached the end of the sample data + if (RealSampleWordsLeftToRead >= 0) { + RealSampleWordsLeftToRead -= readSampleWords; + if (RealSampleWordsLeftToRead <= 0) this->PlaybackState = playback_state_end; + } } break; @@ -706,21 +637,13 @@ break; } - - // Reset synthesis event lists (except VCO, as VCO events apply channel wide currently) - pEngine->pSynthesisEvents[Event::destination_vca]->clear(); - #if ENABLE_FILTER - pEngine->pSynthesisEvents[Event::destination_vcfc]->clear(); - pEngine->pSynthesisEvents[Event::destination_vcfr]->clear(); - #endif // ENABLE_FILTER - // Reset delay Delay = 0; itTriggerEvent = Pool::Iterator(); // If sample stream or release stage finished, kill the voice - if (PlaybackState == playback_state_end || pEG1->GetStage() == EGADSR::stage_end) KillImmediately(); + if (PlaybackState == playback_state_end || EG1.getSegmentType() == EGADSR::segment_end) KillImmediately(); } /** @@ -728,9 +651,8 @@ * suspended / not running. */ void Voice::Reset() { - pLFO1->Reset(); - pLFO2->Reset(); - pLFO3->Reset(); + finalSynthesisParameters.filterLeft.Reset(); + finalSynthesisParameters.filterRight.Reset(); DiskStreamRef.pStream = NULL; DiskStreamRef.hStream = 0; DiskStreamRef.State = Stream::state_unused; @@ -741,297 +663,247 @@ } /** - * Process the control change event lists of the engine for the current - * audio fragment. Event values will be applied to the synthesis parameter - * matrix. + * Process given list of MIDI note on, note off and sustain pedal events + * for the given time. * - * @param Samples - number of samples to be rendered in this audio fragment cycle + * @param itEvent - iterator pointing to the next event to be processed + * @param End - youngest time stamp where processing should be stopped */ - void Voice::ProcessEvents(uint Samples) { + void Voice::processTransitionEvents(RTList::Iterator& itEvent, uint End) { + for (; itEvent && itEvent->FragmentPos() <= End; ++itEvent) { + if (itEvent->Type == Event::type_release) { + EG1.update(EGADSR::event_release, pEngine->SampleRate / CONFIG_DEFAULT_SUBFRAGMENT_SIZE); + EG2.update(EGADSR::event_release, pEngine->SampleRate / CONFIG_DEFAULT_SUBFRAGMENT_SIZE); + } else if (itEvent->Type == Event::type_cancel_release) { + EG1.update(EGADSR::event_cancel_release, pEngine->SampleRate / CONFIG_DEFAULT_SUBFRAGMENT_SIZE); + EG2.update(EGADSR::event_cancel_release, pEngine->SampleRate / CONFIG_DEFAULT_SUBFRAGMENT_SIZE); + } + } + } - // dispatch control change events - RTList::Iterator itCCEvent = pEngine->pCCEvents->first(); - if (Delay) { // skip events that happened before this voice was triggered - while (itCCEvent && itCCEvent->FragmentPos() <= Delay) ++itCCEvent; - } - while (itCCEvent) { - if (itCCEvent->Param.CC.Controller) { // if valid MIDI controller - #if ENABLE_FILTER - if (itCCEvent->Param.CC.Controller == VCFCutoffCtrl.controller) { - *pEngine->pSynthesisEvents[Event::destination_vcfc]->allocAppend() = *itCCEvent; - } - if (itCCEvent->Param.CC.Controller == VCFResonanceCtrl.controller) { - *pEngine->pSynthesisEvents[Event::destination_vcfr]->allocAppend() = *itCCEvent; + /** + * Process given list of MIDI control change and pitch bend events for + * the given time. + * + * @param itEvent - iterator pointing to the next event to be processed + * @param End - youngest time stamp where processing should be stopped + */ + void Voice::processCCEvents(RTList::Iterator& itEvent, uint End) { + for (; itEvent && itEvent->FragmentPos() <= End; ++itEvent) { + if (itEvent->Type == Event::type_control_change && + itEvent->Param.CC.Controller) { // if (valid) MIDI control change event + if (itEvent->Param.CC.Controller == VCFCutoffCtrl.controller) { + processCutoffEvent(itEvent); + } + if (itEvent->Param.CC.Controller == VCFResonanceCtrl.controller) { + processResonanceEvent(itEvent); } - #endif // ENABLE_FILTER - if (itCCEvent->Param.CC.Controller == pLFO1->ExtController) { - pLFO1->SendEvent(itCCEvent); + if (itEvent->Param.CC.Controller == pLFO1->ExtController) { + pLFO1->update(itEvent->Param.CC.Value); } - #if ENABLE_FILTER - if (itCCEvent->Param.CC.Controller == pLFO2->ExtController) { - pLFO2->SendEvent(itCCEvent); + if (itEvent->Param.CC.Controller == pLFO2->ExtController) { + pLFO2->update(itEvent->Param.CC.Value); } - #endif // ENABLE_FILTER - if (itCCEvent->Param.CC.Controller == pLFO3->ExtController) { - pLFO3->SendEvent(itCCEvent); + if (itEvent->Param.CC.Controller == pLFO3->ExtController) { + pLFO3->update(itEvent->Param.CC.Value); } if (pDimRgn->AttenuationController.type == ::gig::attenuation_ctrl_t::type_controlchange && - itCCEvent->Param.CC.Controller == pDimRgn->AttenuationController.controller_number) { // if crossfade event - *pEngine->pSynthesisEvents[Event::destination_vca]->allocAppend() = *itCCEvent; + itEvent->Param.CC.Controller == pDimRgn->AttenuationController.controller_number) { + CrossfadeSmoother.update(Engine::CrossfadeCurve[CrossfadeAttenuation(itEvent->Param.CC.Value)]); } - } - - ++itCCEvent; - } - - - // process pitch events - { - RTList* pVCOEventList = pEngine->pSynthesisEvents[Event::destination_vco]; - RTList::Iterator itVCOEvent = pVCOEventList->first(); - if (Delay) { // skip events that happened before this voice was triggered - while (itVCOEvent && itVCOEvent->FragmentPos() <= Delay) ++itVCOEvent; - } - // apply old pitchbend value until first pitch event occurs - if (this->PitchBend != 1.0) { - uint end = (itVCOEvent) ? itVCOEvent->FragmentPos() : Samples; - for (uint i = Delay; i < end; i++) { - pEngine->pSynthesisParameters[Event::destination_vco][i] *= this->PitchBend; - } - } - float pitch; - while (itVCOEvent) { - RTList::Iterator itNextVCOEvent = itVCOEvent; - ++itNextVCOEvent; - - // calculate the influence length of this event (in sample points) - uint end = (itNextVCOEvent) ? itNextVCOEvent->FragmentPos() : Samples; - - pitch = RTMath::CentsToFreqRatio(((double) itVCOEvent->Param.Pitch.Pitch / 8192.0) * 200.0); // +-two semitones = +-200 cents - - // apply pitch value to the pitch parameter sequence - for (uint i = itVCOEvent->FragmentPos(); i < end; i++) { - pEngine->pSynthesisParameters[Event::destination_vco][i] *= pitch; - } - - itVCOEvent = itNextVCOEvent; - } - if (!pVCOEventList->isEmpty()) this->PitchBend = pitch; - } - - // process volume / attenuation events (TODO: we only handle and _expect_ crossfade events here ATM !) - { - RTList* pVCAEventList = pEngine->pSynthesisEvents[Event::destination_vca]; - RTList::Iterator itVCAEvent = pVCAEventList->first(); - if (Delay) { // skip events that happened before this voice was triggered - while (itVCAEvent && itVCAEvent->FragmentPos() <= Delay) ++itVCAEvent; - } - float crossfadevolume; - while (itVCAEvent) { - RTList::Iterator itNextVCAEvent = itVCAEvent; - ++itNextVCAEvent; - - // calculate the influence length of this event (in sample points) - uint end = (itNextVCAEvent) ? itNextVCAEvent->FragmentPos() : Samples; - - crossfadevolume = CrossfadeAttenuation(itVCAEvent->Param.CC.Value); - - float effective_volume = crossfadevolume * this->Volume * pEngine->GlobalVolume; - - // apply volume value to the volume parameter sequence - for (uint i = itVCAEvent->FragmentPos(); i < end; i++) { - pEngine->pSynthesisParameters[Event::destination_vca][i] = effective_volume; + if (itEvent->Param.CC.Controller == 7) { // volume + VolumeSmoother.update(Engine::VolumeCurve[itEvent->Param.CC.Value] * CONFIG_GLOBAL_ATTENUATION); + } else if (itEvent->Param.CC.Controller == 10) { // panpot + PanLeftSmoother.update(Engine::PanCurve[128 - itEvent->Param.CC.Value]); + PanRightSmoother.update(Engine::PanCurve[itEvent->Param.CC.Value]); } - - itVCAEvent = itNextVCAEvent; + } else if (itEvent->Type == Event::type_pitchbend) { // if pitch bend event + processPitchEvent(itEvent); } - if (!pVCAEventList->isEmpty()) this->CrossfadeVolume = crossfadevolume; } + } - #if ENABLE_FILTER - // process filter cutoff events - { - RTList* pCutoffEventList = pEngine->pSynthesisEvents[Event::destination_vcfc]; - RTList::Iterator itCutoffEvent = pCutoffEventList->first(); - if (Delay) { // skip events that happened before this voice was triggered - while (itCutoffEvent && itCutoffEvent->FragmentPos() <= Delay) ++itCutoffEvent; - } - float cutoff; - while (itCutoffEvent) { - RTList::Iterator itNextCutoffEvent = itCutoffEvent; - ++itNextCutoffEvent; - - // calculate the influence length of this event (in sample points) - uint end = (itNextCutoffEvent) ? itNextCutoffEvent->FragmentPos() : Samples; - - cutoff = exp((float) itCutoffEvent->Param.CC.Value * 0.00787402f * FILTER_CUTOFF_COEFF) * FILTER_CUTOFF_MAX - FILTER_CUTOFF_MIN; - - // apply cutoff frequency to the cutoff parameter sequence - for (uint i = itCutoffEvent->FragmentPos(); i < end; i++) { - pEngine->pSynthesisParameters[Event::destination_vcfc][i] = cutoff; - } - - itCutoffEvent = itNextCutoffEvent; - } - if (!pCutoffEventList->isEmpty()) VCFCutoffCtrl.fvalue = cutoff; // needed for initialization of parameter matrix next time - } + void Voice::processPitchEvent(RTList::Iterator& itEvent) { + const float pitch = RTMath::CentsToFreqRatio(((double) itEvent->Param.Pitch.Pitch / 8192.0) * 200.0); // +-two semitones = +-200 cents + finalSynthesisParameters.fFinalPitch *= pitch; + PitchBend = pitch; + } - // process filter resonance events - { - RTList* pResonanceEventList = pEngine->pSynthesisEvents[Event::destination_vcfr]; - RTList::Iterator itResonanceEvent = pResonanceEventList->first(); - if (Delay) { // skip events that happened before this voice was triggered - while (itResonanceEvent && itResonanceEvent->FragmentPos() <= Delay) ++itResonanceEvent; - } - while (itResonanceEvent) { - RTList::Iterator itNextResonanceEvent = itResonanceEvent; - ++itNextResonanceEvent; - - // calculate the influence length of this event (in sample points) - uint end = (itNextResonanceEvent) ? itNextResonanceEvent->FragmentPos() : Samples; - - // convert absolute controller value to differential - int ctrldelta = itResonanceEvent->Param.CC.Value - VCFResonanceCtrl.value; - VCFResonanceCtrl.value = itResonanceEvent->Param.CC.Value; - - float resonancedelta = (float) ctrldelta * 0.00787f; // 0.0..1.0 - - // apply cutoff frequency to the cutoff parameter sequence - for (uint i = itResonanceEvent->FragmentPos(); i < end; i++) { - pEngine->pSynthesisParameters[Event::destination_vcfr][i] += resonancedelta; - } + void Voice::processCutoffEvent(RTList::Iterator& itEvent) { + int ccvalue = itEvent->Param.CC.Value; + if (VCFCutoffCtrl.value == ccvalue) return; + VCFCutoffCtrl.value == ccvalue; + if (pDimRgn->VCFCutoffControllerInvert) ccvalue = 127 - ccvalue; + if (ccvalue < pDimRgn->VCFVelocityScale) ccvalue = pDimRgn->VCFVelocityScale; + float cutoff = CutoffBase * float(ccvalue); + if (cutoff > 127.0f) cutoff = 127.0f; - itResonanceEvent = itNextResonanceEvent; - } - if (!pResonanceEventList->isEmpty()) VCFResonanceCtrl.fvalue = pResonanceEventList->last()->Param.CC.Value * 0.00787f; // needed for initialization of parameter matrix next time - } - #endif // ENABLE_FILTER + VCFCutoffCtrl.fvalue = cutoff; // needed for initialization of fFinalCutoff next time + fFinalCutoff = cutoff; } - #if ENABLE_FILTER - /** - * Calculate all necessary, final biquad filter parameters. - * - * @param Samples - number of samples to be rendered in this audio fragment cycle - */ - void Voice::CalculateBiquadParameters(uint Samples) { - if (!FilterLeft.Enabled) return; - - biquad_param_t bqbase; - biquad_param_t bqmain; - float prev_cutoff = pEngine->pSynthesisParameters[Event::destination_vcfc][0]; - float prev_res = pEngine->pSynthesisParameters[Event::destination_vcfr][0]; - FilterLeft.SetParameters(&bqbase, &bqmain, prev_cutoff, prev_res, pEngine->SampleRate); - pEngine->pBasicFilterParameters[0] = bqbase; - pEngine->pMainFilterParameters[0] = bqmain; - - float* bq; - for (int i = 1; i < Samples; i++) { - // recalculate biquad parameters if cutoff or resonance differ from previous sample point - if (!(i & FILTER_UPDATE_MASK)) if (pEngine->pSynthesisParameters[Event::destination_vcfr][i] != prev_res || - pEngine->pSynthesisParameters[Event::destination_vcfc][i] != prev_cutoff) { - prev_cutoff = pEngine->pSynthesisParameters[Event::destination_vcfc][i]; - prev_res = pEngine->pSynthesisParameters[Event::destination_vcfr][i]; - FilterLeft.SetParameters(&bqbase, &bqmain, prev_cutoff, prev_res, pEngine->SampleRate); - } - - //same as 'pEngine->pBasicFilterParameters[i] = bqbase;' - bq = (float*) &pEngine->pBasicFilterParameters[i]; - bq[0] = bqbase.a1; - bq[1] = bqbase.a2; - bq[2] = bqbase.b0; - bq[3] = bqbase.b1; - bq[4] = bqbase.b2; - - // same as 'pEngine->pMainFilterParameters[i] = bqmain;' - bq = (float*) &pEngine->pMainFilterParameters[i]; - bq[0] = bqmain.a1; - bq[1] = bqmain.a2; - bq[2] = bqmain.b0; - bq[3] = bqmain.b1; - bq[4] = bqmain.b2; - } + void Voice::processResonanceEvent(RTList::Iterator& itEvent) { + // convert absolute controller value to differential + const int ctrldelta = itEvent->Param.CC.Value - VCFResonanceCtrl.value; + VCFResonanceCtrl.value = itEvent->Param.CC.Value; + const float resonancedelta = (float) ctrldelta; + fFinalResonance += resonancedelta; + // needed for initialization of parameter + VCFResonanceCtrl.fvalue = itEvent->Param.CC.Value; } - #endif // ENABLE_FILTER /** - * Interpolates the input audio data (without looping). + * Synthesizes the current audio fragment for this voice. * * @param Samples - number of sample points to be rendered in this audio * fragment cycle * @param pSrc - pointer to input sample data * @param Skip - number of sample points to skip in output buffer */ - void Voice::InterpolateNoLoop(uint Samples, sample_t* pSrc, uint Skip) { - int i = Skip; + void Voice::Synthesize(uint Samples, sample_t* pSrc, uint Skip) { + finalSynthesisParameters.pOutLeft = &pEngineChannel->pOutputLeft[Skip]; + finalSynthesisParameters.pOutRight = &pEngineChannel->pOutputRight[Skip]; + finalSynthesisParameters.pSrc = pSrc; - // FIXME: assuming either mono or stereo - if (this->pSample->Channels == 2) { // Stereo Sample - while (i < Samples) InterpolateStereo(pSrc, i); - } - else { // Mono Sample - while (i < Samples) InterpolateMono(pSrc, i); + RTList::Iterator itCCEvent = pEngineChannel->pEvents->first(); + RTList::Iterator itNoteEvent = pEngineChannel->pMIDIKeyInfo[MIDIKey].pEvents->first(); + + if (Skip) { // skip events that happened before this voice was triggered + while (itCCEvent && itCCEvent->FragmentPos() <= Skip) ++itCCEvent; + while (itNoteEvent && itNoteEvent->FragmentPos() <= Skip) ++itNoteEvent; } - } - /** - * Interpolates the input audio data, this method honors looping. - * - * @param Samples - number of sample points to be rendered in this audio - * fragment cycle - * @param pSrc - pointer to input sample data - * @param Skip - number of sample points to skip in output buffer - */ - void Voice::InterpolateAndLoop(uint Samples, sample_t* pSrc, uint Skip) { - int i = Skip; + uint killPos; + if (itKillEvent) killPos = RTMath::Min(itKillEvent->FragmentPos(), pEngine->MaxFadeOutPos); - // FIXME: assuming either mono or stereo - if (pSample->Channels == 2) { // Stereo Sample - if (pSample->LoopPlayCount) { - // render loop (loop count limited) - while (i < Samples && LoopCyclesLeft) { - InterpolateStereo(pSrc, i); - if (Pos > pSample->LoopEnd) { - Pos = pSample->LoopStart + fmod(Pos - pSample->LoopEnd, pSample->LoopSize);; - LoopCyclesLeft--; - } - } - // render on without loop - while (i < Samples) InterpolateStereo(pSrc, i); + uint i = Skip; + while (i < Samples) { + int iSubFragmentEnd = RTMath::Min(i + CONFIG_DEFAULT_SUBFRAGMENT_SIZE, Samples); + + // initialize all final synthesis parameters + finalSynthesisParameters.fFinalPitch = PitchBase * PitchBend; + fFinalCutoff = VCFCutoffCtrl.fvalue; + fFinalResonance = VCFResonanceCtrl.fvalue; + + // process MIDI control change and pitchbend events for this subfragment + processCCEvents(itCCEvent, iSubFragmentEnd); + + float fFinalVolume = VolumeSmoother.render() * CrossfadeSmoother.render(); +#ifdef CONFIG_PROCESS_MUTED_CHANNELS + if (pEngineChannel->GetMute()) fFinalVolume = 0; +#endif + + // process transition events (note on, note off & sustain pedal) + processTransitionEvents(itNoteEvent, iSubFragmentEnd); + + // if the voice was killed in this subfragment switch EG1 to fade out stage + if (itKillEvent && killPos <= iSubFragmentEnd) { + EG1.enterFadeOutStage(); + itKillEvent = Pool::Iterator(); } - else { // render loop (endless loop) - while (i < Samples) { - InterpolateStereo(pSrc, i); - if (Pos > pSample->LoopEnd) { - Pos = pSample->LoopStart + fmod(Pos - pSample->LoopEnd, pSample->LoopSize); - } - } + + // process envelope generators + switch (EG1.getSegmentType()) { + case EGADSR::segment_lin: + fFinalVolume *= EG1.processLin(); + break; + case EGADSR::segment_exp: + fFinalVolume *= EG1.processExp(); + break; + case EGADSR::segment_end: + fFinalVolume *= EG1.getLevel(); + break; // noop } - } - else { // Mono Sample - if (pSample->LoopPlayCount) { - // render loop (loop count limited) - while (i < Samples && LoopCyclesLeft) { - InterpolateMono(pSrc, i); - if (Pos > pSample->LoopEnd) { - Pos = pSample->LoopStart + fmod(Pos - pSample->LoopEnd, pSample->LoopSize);; - LoopCyclesLeft--; - } - } - // render on without loop - while (i < Samples) InterpolateMono(pSrc, i); + switch (EG2.getSegmentType()) { + case EGADSR::segment_lin: + fFinalCutoff *= EG2.processLin(); + break; + case EGADSR::segment_exp: + fFinalCutoff *= EG2.processExp(); + break; + case EGADSR::segment_end: + fFinalCutoff *= EG2.getLevel(); + break; // noop } - else { // render loop (endless loop) - while (i < Samples) { - InterpolateMono(pSrc, i); - if (Pos > pSample->LoopEnd) { - Pos = pSample->LoopStart + fmod(Pos - pSample->LoopEnd, pSample->LoopSize);; - } + if (EG3.active()) finalSynthesisParameters.fFinalPitch *= EG3.render(); + + // process low frequency oscillators + if (bLFO1Enabled) fFinalVolume *= pLFO1->render(); + if (bLFO2Enabled) fFinalCutoff *= pLFO2->render(); + if (bLFO3Enabled) finalSynthesisParameters.fFinalPitch *= RTMath::CentsToFreqRatio(pLFO3->render()); + + // if filter enabled then update filter coefficients + if (SYNTHESIS_MODE_GET_FILTER(SynthesisMode)) { + finalSynthesisParameters.filterLeft.SetParameters(fFinalCutoff, fFinalResonance, pEngine->SampleRate); + finalSynthesisParameters.filterRight.SetParameters(fFinalCutoff, fFinalResonance, pEngine->SampleRate); + } + + // do we need resampling? + const float __PLUS_ONE_CENT = 1.000577789506554859250142541782224725466f; + const float __MINUS_ONE_CENT = 0.9994225441413807496009516495583113737666f; + const bool bResamplingRequired = !(finalSynthesisParameters.fFinalPitch <= __PLUS_ONE_CENT && + finalSynthesisParameters.fFinalPitch >= __MINUS_ONE_CENT); + SYNTHESIS_MODE_SET_INTERPOLATE(SynthesisMode, bResamplingRequired); + + // prepare final synthesis parameters structure + finalSynthesisParameters.uiToGo = iSubFragmentEnd - i; +#ifdef CONFIG_INTERPOLATE_VOLUME + finalSynthesisParameters.fFinalVolumeDeltaLeft = + (fFinalVolume * VolumeLeft * PanLeftSmoother.render() - + finalSynthesisParameters.fFinalVolumeLeft) / finalSynthesisParameters.uiToGo; + finalSynthesisParameters.fFinalVolumeDeltaRight = + (fFinalVolume * VolumeRight * PanRightSmoother.render() - + finalSynthesisParameters.fFinalVolumeRight) / finalSynthesisParameters.uiToGo; +#else + finalSynthesisParameters.fFinalVolumeLeft = + fFinalVolume * VolumeLeft * PanLeftSmoother.render(); + finalSynthesisParameters.fFinalVolumeRight = + fFinalVolume * VolumeRight * PanRightSmoother.render(); +#endif + // render audio for one subfragment + RunSynthesisFunction(SynthesisMode, &finalSynthesisParameters, &loop); + + // stop the rendering if volume EG is finished + if (EG1.getSegmentType() == EGADSR::segment_end) break; + + const double newPos = Pos + (iSubFragmentEnd - i) * finalSynthesisParameters.fFinalPitch; + + // increment envelopes' positions + if (EG1.active()) { + + // if sample has a loop and loop start has been reached in this subfragment, send a special event to EG1 to let it finish the attack hold stage + if (pDimRgn->SampleLoops && Pos <= pDimRgn->pSampleLoops[0].LoopStart && pDimRgn->pSampleLoops[0].LoopStart < newPos) { + EG1.update(EGADSR::event_hold_end, pEngine->SampleRate / CONFIG_DEFAULT_SUBFRAGMENT_SIZE); } + + EG1.increment(1); + if (!EG1.toStageEndLeft()) EG1.update(EGADSR::event_stage_end, pEngine->SampleRate / CONFIG_DEFAULT_SUBFRAGMENT_SIZE); } + if (EG2.active()) { + EG2.increment(1); + if (!EG2.toStageEndLeft()) EG2.update(EGADSR::event_stage_end, pEngine->SampleRate / CONFIG_DEFAULT_SUBFRAGMENT_SIZE); + } + EG3.increment(1); + if (!EG3.toEndLeft()) EG3.update(); // neutralize envelope coefficient if end reached + + Pos = newPos; + i = iSubFragmentEnd; } } + /** @brief Update current portamento position. + * + * Will be called when portamento mode is enabled to get the final + * portamento position of this active voice from where the next voice(s) + * might continue to slide on. + * + * @param itNoteOffEvent - event which causes this voice to die soon + */ + void Voice::UpdatePortamentoPos(Pool::Iterator& itNoteOffEvent) { + const float fFinalEG3Level = EG3.level(itNoteOffEvent->FragmentPos()); + pEngineChannel->PortamentoPos = (float) MIDIKey + RTMath::FreqRatioToCents(fFinalEG3Level) * 0.01f; + } + /** * Immediately kill the voice. This method should not be used to kill * a normal, active voice, because it doesn't take care of things like @@ -1057,9 +929,10 @@ * @param itKillEvent - event which caused the voice to be killed */ void Voice::Kill(Pool::Iterator& itKillEvent) { - //FIXME: just two sanity checks for debugging, can be removed + #if CONFIG_DEVMODE if (!itKillEvent) dmsg(1,("gig::Voice::Kill(): ERROR, !itKillEvent !!!\n")); if (itKillEvent && !itKillEvent.isValid()) dmsg(1,("gig::Voice::Kill(): ERROR, itKillEvent invalid !!!\n")); + #endif // CONFIG_DEVMODE if (itTriggerEvent && itKillEvent->FragmentPos() <= itTriggerEvent->FragmentPos()) return; this->itKillEvent = itKillEvent;