2 |
* * |
* * |
3 |
* LinuxSampler - modular, streaming capable sampler * |
* LinuxSampler - modular, streaming capable sampler * |
4 |
* * |
* * |
5 |
* Copyright (C) 2003,2004 by Benno Senoner and Christian Schoenebeck * |
* Copyright (C) 2003,2004 by Benno Senoner and Christian Schoenebeck * |
6 |
* Copyright (C) 2005-2007 Christian Schoenebeck * |
* Copyright (C) 2005-2008 Christian Schoenebeck * |
7 |
* * |
* * |
8 |
* This program is free software; you can redistribute it and/or modify * |
* This program is free software; you can redistribute it and/or modify * |
9 |
* it under the terms of the GNU General Public License as published by * |
* it under the terms of the GNU General Public License as published by * |
29 |
|
|
30 |
#include "Engine.h" |
#include "Engine.h" |
31 |
|
|
32 |
|
#include "../../common/global_private.h" |
33 |
|
|
34 |
namespace LinuxSampler { namespace gig { |
namespace LinuxSampler { namespace gig { |
35 |
|
|
36 |
InstrumentResourceManager Engine::instruments; |
InstrumentResourceManager Engine::instruments; |
74 |
|
|
75 |
/** |
/** |
76 |
* Once an engine channel is disconnected from an audio output device, |
* Once an engine channel is disconnected from an audio output device, |
77 |
* it wil immediately call this method to unregister itself from the |
* it will immediately call this method to unregister itself from the |
78 |
* engine instance and if that engine instance is not used by any other |
* engine instance and if that engine instance is not used by any other |
79 |
* engine channel anymore, then that engine instance will be destroyed. |
* engine channel anymore, then that engine instance will be destroyed. |
80 |
* |
* |
100 |
/** |
/** |
101 |
* Constructor |
* Constructor |
102 |
*/ |
*/ |
103 |
Engine::Engine() { |
Engine::Engine() : SuspendedRegions(128) { |
104 |
pAudioOutputDevice = NULL; |
pAudioOutputDevice = NULL; |
105 |
pDiskThread = NULL; |
pDiskThread = NULL; |
106 |
pEventGenerator = NULL; |
pEventGenerator = NULL; |
108 |
pEventQueue = new RingBuffer<Event,false>(CONFIG_MAX_EVENTS_PER_FRAGMENT, 0); |
pEventQueue = new RingBuffer<Event,false>(CONFIG_MAX_EVENTS_PER_FRAGMENT, 0); |
109 |
pEventPool = new Pool<Event>(CONFIG_MAX_EVENTS_PER_FRAGMENT); |
pEventPool = new Pool<Event>(CONFIG_MAX_EVENTS_PER_FRAGMENT); |
110 |
pVoicePool = new Pool<Voice>(CONFIG_MAX_VOICES); |
pVoicePool = new Pool<Voice>(CONFIG_MAX_VOICES); |
111 |
pDimRegionsInUse = new ::gig::DimensionRegion*[CONFIG_MAX_VOICES + 1]; |
pDimRegionPool[0] = new Pool< ::gig::DimensionRegion*>(CONFIG_MAX_VOICES); |
112 |
|
pDimRegionPool[1] = new Pool< ::gig::DimensionRegion*>(CONFIG_MAX_VOICES); |
113 |
pVoiceStealingQueue = new RTList<Event>(pEventPool); |
pVoiceStealingQueue = new RTList<Event>(pEventPool); |
114 |
pGlobalEvents = new RTList<Event>(pEventPool); |
pGlobalEvents = new RTList<Event>(pEventPool); |
|
InstrumentChangeQueue = new RingBuffer<instrument_change_command_t,false>(1, 0); |
|
|
InstrumentChangeReplyQueue = new RingBuffer<instrument_change_reply_t,false>(1, 0); |
|
115 |
|
|
116 |
for (RTList<Voice>::Iterator iterVoice = pVoicePool->allocAppend(); iterVoice == pVoicePool->last(); iterVoice = pVoicePool->allocAppend()) { |
for (RTList<Voice>::Iterator iterVoice = pVoicePool->allocAppend(); iterVoice == pVoicePool->last(); iterVoice = pVoicePool->allocAppend()) { |
117 |
iterVoice->SetEngine(this); |
iterVoice->SetEngine(this); |
120 |
|
|
121 |
ResetInternal(); |
ResetInternal(); |
122 |
ResetScaleTuning(); |
ResetScaleTuning(); |
123 |
|
ResetSuspendedRegions(); |
124 |
} |
} |
125 |
|
|
126 |
/** |
/** |
143 |
if (pEventGenerator) delete pEventGenerator; |
if (pEventGenerator) delete pEventGenerator; |
144 |
if (pVoiceStealingQueue) delete pVoiceStealingQueue; |
if (pVoiceStealingQueue) delete pVoiceStealingQueue; |
145 |
if (pSysexBuffer) delete pSysexBuffer; |
if (pSysexBuffer) delete pSysexBuffer; |
146 |
|
if (pGlobalEvents) delete pGlobalEvents; |
147 |
|
if (pDimRegionPool[0]) delete pDimRegionPool[0]; |
148 |
|
if (pDimRegionPool[1]) delete pDimRegionPool[1]; |
149 |
|
ResetSuspendedRegions(); |
150 |
Unregister(); |
Unregister(); |
151 |
} |
} |
152 |
|
|
156 |
dmsg(3,("gig::Engine: enabled (val=%d)\n", EngineDisabled.GetUnsafe())); |
dmsg(3,("gig::Engine: enabled (val=%d)\n", EngineDisabled.GetUnsafe())); |
157 |
} |
} |
158 |
|
|
159 |
|
/** |
160 |
|
* Temporarily stop the engine to not do anything. The engine will just be |
161 |
|
* frozen during that time, that means after enabling it again it will |
162 |
|
* continue where it was, with all its voices and playback state it had at |
163 |
|
* the point of disabling. Notice that the engine's (audio) thread will |
164 |
|
* continue to run, it just remains in an inactive loop during that time. |
165 |
|
* |
166 |
|
* If you need to be sure that all voices and disk streams are killed as |
167 |
|
* well, use @c SuspendAll() instead. |
168 |
|
* |
169 |
|
* @see Enable(), SuspendAll() |
170 |
|
*/ |
171 |
void Engine::Disable() { |
void Engine::Disable() { |
172 |
dmsg(3,("gig::Engine: disabling\n")); |
dmsg(3,("gig::Engine: disabling\n")); |
173 |
bool* pWasDisabled = EngineDisabled.PushAndUnlock(true, 2); // wait max. 2s |
bool* pWasDisabled = EngineDisabled.PushAndUnlock(true, 2); // wait max. 2s |
181 |
} |
} |
182 |
|
|
183 |
/** |
/** |
184 |
|
* Similar to @c Disable() but this method additionally kills all voices |
185 |
|
* and disk streams and blocks until all voices and disk streams are actually |
186 |
|
* killed / deleted. |
187 |
|
* |
188 |
|
* @e Note: only the original calling thread is able to re-enable the |
189 |
|
* engine afterwards by calling @c ResumeAll() later on! |
190 |
|
*/ |
191 |
|
void Engine::SuspendAll() { |
192 |
|
dmsg(2,("gig::Engine: Suspending all ...\n")); |
193 |
|
// stop the engine, so we can safely modify the engine's |
194 |
|
// data structures from this foreign thread |
195 |
|
DisableAndLock(); |
196 |
|
// we could also use the respective class member variable here, |
197 |
|
// but this is probably safer and cleaner |
198 |
|
int iPendingStreamDeletions = 0; |
199 |
|
// kill all voices on all engine channels the *die hard* way |
200 |
|
for (int iChannel = 0; iChannel < engineChannels.size(); iChannel++) { |
201 |
|
EngineChannel* pEngineChannel = engineChannels[iChannel]; |
202 |
|
RTList<uint>::Iterator iuiKey = pEngineChannel->pActiveKeys->first(); |
203 |
|
RTList<uint>::Iterator end = pEngineChannel->pActiveKeys->end(); |
204 |
|
for (; iuiKey != end; ++iuiKey) { // iterate through all active keys |
205 |
|
midi_key_info_t* pKey = &pEngineChannel->pMIDIKeyInfo[*iuiKey]; |
206 |
|
RTList<Voice>::Iterator itVoice = pKey->pActiveVoices->first(); |
207 |
|
RTList<Voice>::Iterator itVoicesEnd = pKey->pActiveVoices->end(); |
208 |
|
for (; itVoice != itVoicesEnd; ++itVoice) { // iterate through all voices on this key |
209 |
|
// request a notification from disk thread side for stream deletion |
210 |
|
const Stream::Handle hStream = itVoice->KillImmediately(true); |
211 |
|
if (hStream != Stream::INVALID_HANDLE) { // voice actually used a stream |
212 |
|
iPendingStreamDeletions++; |
213 |
|
} |
214 |
|
} |
215 |
|
} |
216 |
|
} |
217 |
|
// wait until all streams were actually deleted by the disk thread |
218 |
|
while (iPendingStreamDeletions) { |
219 |
|
while ( |
220 |
|
iPendingStreamDeletions && |
221 |
|
pDiskThread->AskForDeletedStream() != Stream::INVALID_HANDLE |
222 |
|
) iPendingStreamDeletions--; |
223 |
|
if (!iPendingStreamDeletions) break; |
224 |
|
usleep(10000); // sleep for 10ms |
225 |
|
} |
226 |
|
dmsg(2,("gig::Engine: Everything suspended.\n")); |
227 |
|
} |
228 |
|
|
229 |
|
/** |
230 |
|
* At the moment same as calling @c Enable() directly, but this might |
231 |
|
* change in future, so better call this method as counterpart to |
232 |
|
* @c SuspendAll() instead of @c Enable() ! |
233 |
|
*/ |
234 |
|
void Engine::ResumeAll() { |
235 |
|
Enable(); |
236 |
|
} |
237 |
|
|
238 |
|
/** |
239 |
|
* Order the engine to stop rendering audio for the given region. |
240 |
|
* Additionally this method will block until all voices and their disk |
241 |
|
* streams associated with that region are actually killed / deleted, so |
242 |
|
* one can i.e. safely modify the region with an instrument editor after |
243 |
|
* returning from this method. |
244 |
|
* |
245 |
|
* @param pRegion - region the engine shall stop using |
246 |
|
*/ |
247 |
|
void Engine::Suspend(::gig::Region* pRegion) { |
248 |
|
dmsg(2,("gig::Engine: Suspending Region %x ...\n",pRegion)); |
249 |
|
SuspendedRegionsMutex.Lock(); |
250 |
|
SuspensionChangeOngoing.Set(true); |
251 |
|
pPendingRegionSuspension = pRegion; |
252 |
|
SuspensionChangeOngoing.WaitAndUnlockIf(true); |
253 |
|
SuspendedRegionsMutex.Unlock(); |
254 |
|
dmsg(2,("gig::Engine: Region %x suspended.",pRegion)); |
255 |
|
} |
256 |
|
|
257 |
|
/** |
258 |
|
* Orders the engine to resume playing back the given region, previously |
259 |
|
* suspended with @c Suspend() . |
260 |
|
* |
261 |
|
* @param pRegion - region the engine shall be allowed to use again |
262 |
|
*/ |
263 |
|
void Engine::Resume(::gig::Region* pRegion) { |
264 |
|
dmsg(2,("gig::Engine: Resuming Region %x ...\n",pRegion)); |
265 |
|
SuspendedRegionsMutex.Lock(); |
266 |
|
SuspensionChangeOngoing.Set(true); |
267 |
|
pPendingRegionResumption = pRegion; |
268 |
|
SuspensionChangeOngoing.WaitAndUnlockIf(true); |
269 |
|
SuspendedRegionsMutex.Unlock(); |
270 |
|
dmsg(2,("gig::Engine: Region %x resumed.\n",pRegion)); |
271 |
|
} |
272 |
|
|
273 |
|
/** |
274 |
* Reset all voices and disk thread and clear input event queue and all |
* Reset all voices and disk thread and clear input event queue and all |
275 |
* control and status variables. |
* control and status variables. |
276 |
*/ |
*/ |
325 |
memset(&ScaleTuning[0], 0x00, 12); |
memset(&ScaleTuning[0], 0x00, 12); |
326 |
} |
} |
327 |
|
|
328 |
|
void Engine::ResetSuspendedRegions() { |
329 |
|
SuspendedRegions.clear(); |
330 |
|
iPendingStreamDeletions = 0; |
331 |
|
pPendingRegionSuspension = pPendingRegionResumption = NULL; |
332 |
|
SuspensionChangeOngoing.Set(false); |
333 |
|
} |
334 |
|
|
335 |
/** |
/** |
336 |
* Connect this engine instance with the given audio output device. |
* Connect this engine instance with the given audio output device. |
337 |
* This method will be called when an Engine instance is created. |
* This method will be called when an Engine instance is created. |
411 |
} |
} |
412 |
|
|
413 |
/** |
/** |
414 |
|
* Called by the engine's (audio) thread once per cycle to process requests |
415 |
|
* from the outer world to suspend or resume a given @c gig::Region . |
416 |
|
*/ |
417 |
|
void Engine::ProcessSuspensionsChanges() { |
418 |
|
// process request for suspending one region |
419 |
|
if (pPendingRegionSuspension) { |
420 |
|
// kill all voices on all engine channels that use this region |
421 |
|
for (int iChannel = 0; iChannel < engineChannels.size(); iChannel++) { |
422 |
|
EngineChannel* pEngineChannel = engineChannels[iChannel]; |
423 |
|
RTList<uint>::Iterator iuiKey = pEngineChannel->pActiveKeys->first(); |
424 |
|
RTList<uint>::Iterator end = pEngineChannel->pActiveKeys->end(); |
425 |
|
for (; iuiKey != end; ++iuiKey) { // iterate through all active keys |
426 |
|
midi_key_info_t* pKey = &pEngineChannel->pMIDIKeyInfo[*iuiKey]; |
427 |
|
RTList<Voice>::Iterator itVoice = pKey->pActiveVoices->first(); |
428 |
|
// if current key is not associated with this region, skip this key |
429 |
|
if (itVoice->pDimRgn->GetParent() != pPendingRegionSuspension) continue; |
430 |
|
RTList<Voice>::Iterator itVoicesEnd = pKey->pActiveVoices->end(); |
431 |
|
for (; itVoice != itVoicesEnd; ++itVoice) { // iterate through all voices on this key |
432 |
|
// request a notification from disk thread side for stream deletion |
433 |
|
const Stream::Handle hStream = itVoice->KillImmediately(true); |
434 |
|
if (hStream != Stream::INVALID_HANDLE) { // voice actually used a stream |
435 |
|
iPendingStreamDeletions++; |
436 |
|
} |
437 |
|
} |
438 |
|
} |
439 |
|
} |
440 |
|
// make sure the region is not yet on the list |
441 |
|
bool bAlreadySuspended = false; |
442 |
|
RTList< ::gig::Region*>::Iterator iter = SuspendedRegions.first(); |
443 |
|
RTList< ::gig::Region*>::Iterator end = SuspendedRegions.end(); |
444 |
|
for (; iter != end; ++iter) { // iterate through all suspended regions |
445 |
|
if (*iter == pPendingRegionSuspension) { // found |
446 |
|
bAlreadySuspended = true; |
447 |
|
dmsg(1,("gig::Engine: attempt to suspend an already suspended region !!!\n")); |
448 |
|
break; |
449 |
|
} |
450 |
|
} |
451 |
|
if (!bAlreadySuspended) { |
452 |
|
// put the region on the list of suspended regions |
453 |
|
RTList< ::gig::Region*>::Iterator iter = SuspendedRegions.allocAppend(); |
454 |
|
if (iter) { |
455 |
|
*iter = pPendingRegionSuspension; |
456 |
|
} else std::cerr << "gig::Engine: Could not suspend Region, list is full. This is a bug!!!\n" << std::flush; |
457 |
|
} |
458 |
|
// free request slot for next caller (and to make sure that |
459 |
|
// we're not going to process the same request in the next cycle) |
460 |
|
pPendingRegionSuspension = NULL; |
461 |
|
// if no disk stream deletions are pending, awaken other side, as |
462 |
|
// we're done in this case |
463 |
|
if (!iPendingStreamDeletions) SuspensionChangeOngoing.Set(false); |
464 |
|
} |
465 |
|
|
466 |
|
// process request for resuming one region |
467 |
|
if (pPendingRegionResumption) { |
468 |
|
// remove region from the list of suspended regions |
469 |
|
RTList< ::gig::Region*>::Iterator iter = SuspendedRegions.first(); |
470 |
|
RTList< ::gig::Region*>::Iterator end = SuspendedRegions.end(); |
471 |
|
for (; iter != end; ++iter) { // iterate through all suspended regions |
472 |
|
if (*iter == pPendingRegionResumption) { // found |
473 |
|
SuspendedRegions.free(iter); |
474 |
|
break; // done |
475 |
|
} |
476 |
|
} |
477 |
|
// free request slot for next caller |
478 |
|
pPendingRegionResumption = NULL; |
479 |
|
// awake other side as we're done |
480 |
|
SuspensionChangeOngoing.Set(false); |
481 |
|
} |
482 |
|
} |
483 |
|
|
484 |
|
/** |
485 |
|
* Called by the engine's (audio) thread once per cycle to check if |
486 |
|
* streams of voices that were killed due to suspension request have |
487 |
|
* finally really been deleted by the disk thread. |
488 |
|
*/ |
489 |
|
void Engine::ProcessPendingStreamDeletions() { |
490 |
|
if (!iPendingStreamDeletions) return; |
491 |
|
//TODO: or shall we better store a list with stream handles instead of a scalar amount of streams to be deleted? might be safer |
492 |
|
while ( |
493 |
|
iPendingStreamDeletions && |
494 |
|
pDiskThread->AskForDeletedStream() != Stream::INVALID_HANDLE |
495 |
|
) iPendingStreamDeletions--; |
496 |
|
// just for safety ... |
497 |
|
while (pDiskThread->AskForDeletedStream() != Stream::INVALID_HANDLE); |
498 |
|
// now that all disk streams are deleted, awake other side as |
499 |
|
// we're finally done with suspending the requested region |
500 |
|
if (!iPendingStreamDeletions) SuspensionChangeOngoing.Set(false); |
501 |
|
} |
502 |
|
|
503 |
|
/** |
504 |
|
* Returns @c true if the given region is currently set to be suspended |
505 |
|
* from being used, @c false otherwise. |
506 |
|
*/ |
507 |
|
bool Engine::RegionSuspended(::gig::Region* pRegion) { |
508 |
|
if (SuspendedRegions.isEmpty()) return false; |
509 |
|
//TODO: or shall we use a sorted container instead of the RTList? might be faster ... or trivial ;-) |
510 |
|
RTList< ::gig::Region*>::Iterator iter = SuspendedRegions.first(); |
511 |
|
RTList< ::gig::Region*>::Iterator end = SuspendedRegions.end(); |
512 |
|
for (; iter != end; ++iter) // iterate through all suspended regions |
513 |
|
if (*iter == pRegion) return true; |
514 |
|
return false; |
515 |
|
} |
516 |
|
|
517 |
|
/** |
518 |
* Clear all engine global event lists. |
* Clear all engine global event lists. |
519 |
*/ |
*/ |
520 |
void Engine::ClearEventLists() { |
void Engine::ClearEventLists() { |
569 |
* @returns 0 on success |
* @returns 0 on success |
570 |
*/ |
*/ |
571 |
int Engine::RenderAudio(uint Samples) { |
int Engine::RenderAudio(uint Samples) { |
572 |
dmsg(7,("RenderAudio(Samples=%d)\n", Samples)); |
dmsg(8,("RenderAudio(Samples=%d)\n", Samples)); |
573 |
|
|
574 |
// return if engine disabled |
// return if engine disabled |
575 |
if (EngineDisabled.Pop()) { |
if (EngineDisabled.Pop()) { |
577 |
return 0; |
return 0; |
578 |
} |
} |
579 |
|
|
580 |
|
// process requests for suspending / resuming regions (i.e. to avoid |
581 |
|
// crashes while these regions are modified by an instrument editor) |
582 |
|
ProcessSuspensionsChanges(); |
583 |
|
|
584 |
// update time of start and end of this audio fragment (as events' time stamps relate to this) |
// update time of start and end of this audio fragment (as events' time stamps relate to this) |
585 |
pEventGenerator->UpdateFragmentTime(Samples); |
pEventGenerator->UpdateFragmentTime(Samples); |
586 |
|
|
611 |
ActiveVoiceCountTemp = 0; |
ActiveVoiceCountTemp = 0; |
612 |
|
|
613 |
// handle instrument change commands |
// handle instrument change commands |
614 |
instrument_change_command_t command; |
bool instrumentChanged = false; |
615 |
if (InstrumentChangeQueue->pop(&command) > 0) { |
for (int i = 0; i < engineChannels.size(); i++) { |
616 |
EngineChannel* pEngineChannel = command.pEngineChannel; |
EngineChannel* pEngineChannel = engineChannels[i]; |
|
pEngineChannel->pInstrument = command.pInstrument; |
|
|
|
|
|
// iterate through all active voices and mark their |
|
|
// dimension regions as "in use". The instrument resource |
|
|
// manager may delete all of the instrument except the |
|
|
// dimension regions and samples that are in use. |
|
|
int i = 0; |
|
|
RTList<uint>::Iterator iuiKey = pEngineChannel->pActiveKeys->first(); |
|
|
RTList<uint>::Iterator end = pEngineChannel->pActiveKeys->end(); |
|
|
while (iuiKey != end) { // iterate through all active keys |
|
|
midi_key_info_t* pKey = &pEngineChannel->pMIDIKeyInfo[*iuiKey]; |
|
|
++iuiKey; |
|
617 |
|
|
618 |
RTList<Voice>::Iterator itVoice = pKey->pActiveVoices->first(); |
// as we're going to (carefully) write some status to the |
619 |
RTList<Voice>::Iterator itVoicesEnd = pKey->pActiveVoices->end(); |
// synchronized struct, we cast away the const |
620 |
for (; itVoice != itVoicesEnd; ++itVoice) { // iterate through all voices on this key |
EngineChannel::instrument_change_command_t& cmd = |
621 |
if (!itVoice->Orphan) { |
const_cast<EngineChannel::instrument_change_command_t&>(pEngineChannel->InstrumentChangeCommandReader.Lock()); |
622 |
|
|
623 |
|
pEngineChannel->pDimRegionsInUse = cmd.pDimRegionsInUse; |
624 |
|
pEngineChannel->pDimRegionsInUse->clear(); |
625 |
|
|
626 |
|
if (cmd.bChangeInstrument) { |
627 |
|
// change instrument |
628 |
|
dmsg(5,("Engine: instrument change command received\n")); |
629 |
|
cmd.bChangeInstrument = false; |
630 |
|
pEngineChannel->pInstrument = cmd.pInstrument; |
631 |
|
instrumentChanged = true; |
632 |
|
|
633 |
|
// Iterate through all active voices and mark them as |
634 |
|
// "orphans", which means that the dimension regions |
635 |
|
// and samples they use should be released to the |
636 |
|
// instrument resource manager when the voices die. |
637 |
|
int i = 0; |
638 |
|
RTList<uint>::Iterator iuiKey = pEngineChannel->pActiveKeys->first(); |
639 |
|
RTList<uint>::Iterator end = pEngineChannel->pActiveKeys->end(); |
640 |
|
while (iuiKey != end) { // iterate through all active keys |
641 |
|
midi_key_info_t* pKey = &pEngineChannel->pMIDIKeyInfo[*iuiKey]; |
642 |
|
++iuiKey; |
643 |
|
|
644 |
|
RTList<Voice>::Iterator itVoice = pKey->pActiveVoices->first(); |
645 |
|
RTList<Voice>::Iterator itVoicesEnd = pKey->pActiveVoices->end(); |
646 |
|
for (; itVoice != itVoicesEnd; ++itVoice) { // iterate through all voices on this key |
647 |
itVoice->Orphan = true; |
itVoice->Orphan = true; |
|
pDimRegionsInUse[i++] = itVoice->pDimRgn; |
|
648 |
} |
} |
649 |
} |
} |
650 |
} |
} |
651 |
pDimRegionsInUse[i] = 0; // end of list |
} |
652 |
|
if (instrumentChanged) { |
653 |
// send a reply to the calling thread, which is waiting |
//TODO: this is a lazy solution ATM and not safe in case somebody is currently editing the instrument we're currently switching to (we should store all suspended regions on instrument manager side and when switching to another instrument copy that list to the engine's local list of suspensions |
654 |
instrument_change_reply_t reply; |
ResetSuspendedRegions(); |
|
InstrumentChangeReplyQueue->push(&reply); |
|
655 |
} |
} |
656 |
|
|
657 |
// handle events on all engine channels |
// handle events on all engine channels |
689 |
ActiveVoiceCount = ActiveVoiceCountTemp; |
ActiveVoiceCount = ActiveVoiceCountTemp; |
690 |
if (ActiveVoiceCount > ActiveVoiceCountMax) ActiveVoiceCountMax = ActiveVoiceCount; |
if (ActiveVoiceCount > ActiveVoiceCountMax) ActiveVoiceCountMax = ActiveVoiceCount; |
691 |
|
|
692 |
|
// in case regions were previously suspended and we killed voices |
693 |
|
// with disk streams due to that, check if those streams have finally |
694 |
|
// been deleted by the disk thread |
695 |
|
if (iPendingStreamDeletions) ProcessPendingStreamDeletions(); |
696 |
|
|
697 |
|
for (int i = 0; i < engineChannels.size(); i++) { |
698 |
|
engineChannels[i]->InstrumentChangeCommandReader.Unlock(); |
699 |
|
} |
700 |
FrameTime += Samples; |
FrameTime += Samples; |
701 |
|
|
702 |
return 0; |
return 0; |
764 |
if (pEngineChannel->GetMute()) return; // skip if sampler channel is muted |
if (pEngineChannel->GetMute()) return; // skip if sampler channel is muted |
765 |
#endif |
#endif |
766 |
|
|
767 |
|
uint voiceCount = 0; |
768 |
|
uint streamCount = 0; |
769 |
RTList<uint>::Iterator iuiKey = pEngineChannel->pActiveKeys->first(); |
RTList<uint>::Iterator iuiKey = pEngineChannel->pActiveKeys->first(); |
770 |
RTList<uint>::Iterator end = pEngineChannel->pActiveKeys->end(); |
RTList<uint>::Iterator end = pEngineChannel->pActiveKeys->end(); |
771 |
while (iuiKey != end) { // iterate through all active keys |
while (iuiKey != end) { // iterate through all active keys |
777 |
for (; itVoice != itVoicesEnd; ++itVoice) { // iterate through all voices on this key |
for (; itVoice != itVoicesEnd; ++itVoice) { // iterate through all voices on this key |
778 |
// now render current voice |
// now render current voice |
779 |
itVoice->Render(Samples); |
itVoice->Render(Samples); |
780 |
if (itVoice->IsActive()) ActiveVoiceCountTemp++; // still active |
if (itVoice->IsActive()) { // still active |
781 |
else { // voice reached end, is now inactive |
if (!itVoice->Orphan) { |
782 |
|
*(pEngineChannel->pDimRegionsInUse->allocAppend()) = itVoice->pDimRgn; |
783 |
|
} |
784 |
|
ActiveVoiceCountTemp++; |
785 |
|
voiceCount++; |
786 |
|
|
787 |
|
if (itVoice->PlaybackState == Voice::playback_state_disk) { |
788 |
|
if ((itVoice->DiskStreamRef).State == Stream::state_active) streamCount++; |
789 |
|
} |
790 |
|
} else { // voice reached end, is now inactive |
791 |
FreeVoice(pEngineChannel, itVoice); // remove voice from the list of active voices |
FreeVoice(pEngineChannel, itVoice); // remove voice from the list of active voices |
792 |
} |
} |
793 |
} |
} |
794 |
} |
} |
795 |
|
|
796 |
|
pEngineChannel->SetVoiceCount(voiceCount); |
797 |
|
pEngineChannel->SetDiskStreamCount(streamCount); |
798 |
} |
} |
799 |
|
|
800 |
/** |
/** |
820 |
LaunchVoice(pEngineChannel, itVoiceStealEvent, itVoiceStealEvent->Param.Note.Layer, itVoiceStealEvent->Param.Note.ReleaseTrigger, false, false); |
LaunchVoice(pEngineChannel, itVoiceStealEvent, itVoiceStealEvent->Param.Note.Layer, itVoiceStealEvent->Param.Note.ReleaseTrigger, false, false); |
821 |
if (itNewVoice) { |
if (itNewVoice) { |
822 |
itNewVoice->Render(Samples); |
itNewVoice->Render(Samples); |
823 |
if (itNewVoice->IsActive()) ActiveVoiceCountTemp++; // still active |
if (itNewVoice->IsActive()) { // still active |
824 |
else { // voice reached end, is now inactive |
*(pEngineChannel->pDimRegionsInUse->allocAppend()) = itNewVoice->pDimRgn; |
825 |
|
ActiveVoiceCountTemp++; |
826 |
|
pEngineChannel->SetVoiceCount(pEngineChannel->GetVoiceCount() + 1); |
827 |
|
|
828 |
|
if (itNewVoice->PlaybackState == Voice::playback_state_disk) { |
829 |
|
if (itNewVoice->DiskStreamRef.State == Stream::state_active) { |
830 |
|
pEngineChannel->SetDiskStreamCount(pEngineChannel->GetDiskStreamCount() + 1); |
831 |
|
} |
832 |
|
} |
833 |
|
} else { // voice reached end, is now inactive |
834 |
FreeVoice(pEngineChannel, itNewVoice); // remove voice from the list of active voices |
FreeVoice(pEngineChannel, itNewVoice); // remove voice from the list of active voices |
835 |
} |
} |
836 |
} |
} |
857 |
* this audio fragment cycle |
* this audio fragment cycle |
858 |
*/ |
*/ |
859 |
void Engine::RouteAudio(EngineChannel* pEngineChannel, uint Samples) { |
void Engine::RouteAudio(EngineChannel* pEngineChannel, uint Samples) { |
860 |
// route master signal |
// route dry signal |
861 |
{ |
{ |
862 |
AudioChannel* pDstL = pAudioOutputDevice->Channel(pEngineChannel->AudioDeviceChannelLeft); |
AudioChannel* pDstL = pAudioOutputDevice->Channel(pEngineChannel->AudioDeviceChannelLeft); |
863 |
AudioChannel* pDstR = pAudioOutputDevice->Channel(pEngineChannel->AudioDeviceChannelRight); |
AudioChannel* pDstR = pAudioOutputDevice->Channel(pEngineChannel->AudioDeviceChannelRight); |
868 |
{ |
{ |
869 |
for (int iFxSend = 0; iFxSend < pEngineChannel->GetFxSendCount(); iFxSend++) { |
for (int iFxSend = 0; iFxSend < pEngineChannel->GetFxSendCount(); iFxSend++) { |
870 |
FxSend* pFxSend = pEngineChannel->GetFxSend(iFxSend); |
FxSend* pFxSend = pEngineChannel->GetFxSend(iFxSend); |
871 |
// left channel |
for (int iChan = 0; iChan < 2; ++iChan) { |
872 |
const int iDstL = pFxSend->DestinationChannel(0); |
AudioChannel* pSource = |
873 |
if (iDstL < 0) { |
(iChan) |
874 |
dmsg(1,("Engine::RouteAudio() Error: invalid FX send (L) destination channel")); |
? pEngineChannel->pChannelRight |
875 |
} else { |
: pEngineChannel->pChannelLeft; |
876 |
AudioChannel* pDstL = pAudioOutputDevice->Channel(iDstL); |
const int iDstChan = pFxSend->DestinationChannel(iChan); |
877 |
if (!pDstL) { |
if (iDstChan < 0) { |
878 |
dmsg(1,("Engine::RouteAudio() Error: invalid FX send (L) destination channel")); |
dmsg(1,("Engine::RouteAudio() Error: invalid FX send (%s) destination channel (%d->%d)", ((iChan) ? "R" : "L"), iChan, iDstChan)); |
879 |
} else pEngineChannel->pChannelLeft->MixTo(pDstL, Samples, pFxSend->Level()); |
goto channel_cleanup; |
880 |
} |
} |
881 |
// right channel |
AudioChannel* pDstChan = NULL; |
882 |
const int iDstR = pFxSend->DestinationChannel(1); |
if (pFxSend->DestinationMasterEffectChain() >= 0) { // fx send routed to an internal master effect |
883 |
if (iDstR < 0) { |
EffectChain* pEffectChain = |
884 |
dmsg(1,("Engine::RouteAudio() Error: invalid FX send (R) destination channel")); |
pAudioOutputDevice->MasterEffectChain( |
885 |
} else { |
pFxSend->DestinationMasterEffectChain() |
886 |
AudioChannel* pDstR = pAudioOutputDevice->Channel(iDstR); |
); |
887 |
if (!pDstR) { |
if (!pEffectChain) { |
888 |
dmsg(1,("Engine::RouteAudio() Error: invalid FX send (R) destination channel")); |
dmsg(1,("Engine::RouteAudio() Error: invalid FX send (%s) destination effect chain %d", ((iChan) ? "R" : "L"), pFxSend->DestinationMasterEffectChain())); |
889 |
} else pEngineChannel->pChannelRight->MixTo(pDstR, Samples, pFxSend->Level()); |
goto channel_cleanup; |
890 |
|
} |
891 |
|
Effect* pEffect = |
892 |
|
pEffectChain->GetEffect( |
893 |
|
pFxSend->DestinationMasterEffect() |
894 |
|
); |
895 |
|
if (!pEffect) { |
896 |
|
dmsg(1,("Engine::RouteAudio() Error: invalid FX send (%s) destination effect %d of effect chain %d", ((iChan) ? "R" : "L"), pFxSend->DestinationMasterEffect(), pFxSend->DestinationMasterEffectChain())); |
897 |
|
goto channel_cleanup; |
898 |
|
} |
899 |
|
pDstChan = pEffect->InputChannel(iDstChan); |
900 |
|
} else { // FX send routed directly to an audio output channel |
901 |
|
pDstChan = pAudioOutputDevice->Channel(iDstChan); |
902 |
|
} |
903 |
|
if (!pDstChan) { |
904 |
|
dmsg(1,("Engine::RouteAudio() Error: invalid FX send (%s) destination channel (%d->%d)", ((iChan) ? "R" : "L"), iChan, iDstChan)); |
905 |
|
goto channel_cleanup; |
906 |
|
} |
907 |
|
pSource->MixTo(pDstChan, Samples, pFxSend->Level()); |
908 |
} |
} |
909 |
} |
} |
910 |
} |
} |
911 |
|
channel_cleanup: |
912 |
// reset buffers with silence (zero out) for the next audio cycle |
// reset buffers with silence (zero out) for the next audio cycle |
913 |
pEngineChannel->pChannelLeft->Clear(); |
pEngineChannel->pChannelLeft->Clear(); |
914 |
pEngineChannel->pChannelRight->Clear(); |
pEngineChannel->pChannelRight->Clear(); |
1053 |
{ |
{ |
1054 |
// first, get total amount of required voices (dependant on amount of layers) |
// first, get total amount of required voices (dependant on amount of layers) |
1055 |
::gig::Region* pRegion = pEngineChannel->pInstrument->GetRegion(itNoteOnEventOnKeyList->Param.Note.Key); |
::gig::Region* pRegion = pEngineChannel->pInstrument->GetRegion(itNoteOnEventOnKeyList->Param.Note.Key); |
1056 |
if (pRegion) { |
if (pRegion && !RegionSuspended(pRegion)) { |
1057 |
int voicesRequired = pRegion->Layers; |
int voicesRequired = pRegion->Layers; |
1058 |
// now launch the required amount of voices |
// now launch the required amount of voices |
1059 |
for (int i = 0; i < voicesRequired; i++) |
for (int i = 0; i < voicesRequired; i++) |
1637 |
void Engine::ProcessControlChange(EngineChannel* pEngineChannel, Pool<Event>::Iterator& itControlChangeEvent) { |
void Engine::ProcessControlChange(EngineChannel* pEngineChannel, Pool<Event>::Iterator& itControlChangeEvent) { |
1638 |
dmsg(4,("Engine::ContinuousController cc=%d v=%d\n", itControlChangeEvent->Param.CC.Controller, itControlChangeEvent->Param.CC.Value)); |
dmsg(4,("Engine::ContinuousController cc=%d v=%d\n", itControlChangeEvent->Param.CC.Controller, itControlChangeEvent->Param.CC.Value)); |
1639 |
|
|
1640 |
|
// handle the "control triggered" MIDI rule: a control change |
1641 |
|
// event can trigger a new note on or note off event |
1642 |
|
if (pEngineChannel->pInstrument) { |
1643 |
|
|
1644 |
|
::gig::MidiRule* rule; |
1645 |
|
for (int i = 0 ; (rule = pEngineChannel->pInstrument->GetMidiRule(i)) ; i++) { |
1646 |
|
|
1647 |
|
if (::gig::MidiRuleCtrlTrigger* ctrlTrigger = |
1648 |
|
dynamic_cast< ::gig::MidiRuleCtrlTrigger*>(rule)) { |
1649 |
|
if (itControlChangeEvent->Param.CC.Controller == |
1650 |
|
ctrlTrigger->ControllerNumber) { |
1651 |
|
|
1652 |
|
uint8_t oldCCValue = pEngineChannel->ControllerTable[ |
1653 |
|
itControlChangeEvent->Param.CC.Controller]; |
1654 |
|
uint8_t newCCValue = itControlChangeEvent->Param.CC.Value; |
1655 |
|
|
1656 |
|
for (int i = 0 ; i < ctrlTrigger->Triggers ; i++) { |
1657 |
|
::gig::MidiRuleCtrlTrigger::trigger_t* pTrigger = |
1658 |
|
&ctrlTrigger->pTriggers[i]; |
1659 |
|
|
1660 |
|
// check if the controller has passed the |
1661 |
|
// trigger point in the right direction |
1662 |
|
if ((pTrigger->Descending && |
1663 |
|
oldCCValue > pTrigger->TriggerPoint && |
1664 |
|
newCCValue <= pTrigger->TriggerPoint) || |
1665 |
|
(!pTrigger->Descending && |
1666 |
|
oldCCValue < pTrigger->TriggerPoint && |
1667 |
|
newCCValue >= pTrigger->TriggerPoint)) { |
1668 |
|
|
1669 |
|
RTList<Event>::Iterator itNewEvent = pGlobalEvents->allocAppend(); |
1670 |
|
if (itNewEvent) { |
1671 |
|
*itNewEvent = *itControlChangeEvent; |
1672 |
|
itNewEvent->Param.Note.Key = pTrigger->Key; |
1673 |
|
|
1674 |
|
if (pTrigger->NoteOff || pTrigger->Velocity == 0) { |
1675 |
|
itNewEvent->Type = Event::type_note_off; |
1676 |
|
itNewEvent->Param.Note.Velocity = 100; |
1677 |
|
|
1678 |
|
ProcessNoteOff(pEngineChannel, itNewEvent); |
1679 |
|
} else { |
1680 |
|
itNewEvent->Type = Event::type_note_on; |
1681 |
|
//TODO: if Velocity is 255, the triggered velocity should |
1682 |
|
// depend on how fast the controller is moving |
1683 |
|
itNewEvent->Param.Note.Velocity = |
1684 |
|
pTrigger->Velocity == 255 ? 100 : |
1685 |
|
pTrigger->Velocity; |
1686 |
|
|
1687 |
|
ProcessNoteOn(pEngineChannel, itNewEvent); |
1688 |
|
} |
1689 |
|
} |
1690 |
|
else dmsg(1,("Event pool emtpy!\n")); |
1691 |
|
} |
1692 |
|
} |
1693 |
|
} |
1694 |
|
} |
1695 |
|
} |
1696 |
|
} |
1697 |
|
|
1698 |
// update controller value in the engine channel's controller table |
// update controller value in the engine channel's controller table |
1699 |
pEngineChannel->ControllerTable[itControlChangeEvent->Param.CC.Controller] = itControlChangeEvent->Param.CC.Value; |
pEngineChannel->ControllerTable[itControlChangeEvent->Param.CC.Controller] = itControlChangeEvent->Param.CC.Value; |
1700 |
|
|
1728 |
//TODO: not sample accurate yet |
//TODO: not sample accurate yet |
1729 |
pEngineChannel->GlobalPanLeft = PanCurve[128 - itControlChangeEvent->Param.CC.Value]; |
pEngineChannel->GlobalPanLeft = PanCurve[128 - itControlChangeEvent->Param.CC.Value]; |
1730 |
pEngineChannel->GlobalPanRight = PanCurve[itControlChangeEvent->Param.CC.Value]; |
pEngineChannel->GlobalPanRight = PanCurve[itControlChangeEvent->Param.CC.Value]; |
1731 |
|
pEngineChannel->iLastPanRequest = itControlChangeEvent->Param.CC.Value; |
1732 |
break; |
break; |
1733 |
} |
} |
1734 |
case 64: { // sustain |
case 64: { // sustain |
1779 |
break; |
break; |
1780 |
} |
} |
1781 |
case 65: { // portamento on / off |
case 65: { // portamento on / off |
1782 |
KillAllVoices(pEngineChannel, itControlChangeEvent); |
const bool bPortamento = itControlChangeEvent->Param.CC.Value >= 64; |
1783 |
pEngineChannel->PortamentoMode = itControlChangeEvent->Param.CC.Value >= 64; |
if (bPortamento != pEngineChannel->PortamentoMode) |
1784 |
|
KillAllVoices(pEngineChannel, itControlChangeEvent); |
1785 |
|
pEngineChannel->PortamentoMode = bPortamento; |
1786 |
break; |
break; |
1787 |
} |
} |
1788 |
case 66: { // sostenuto |
case 66: { // sostenuto |
1852 |
break; |
break; |
1853 |
} |
} |
1854 |
case 126: { // mono mode on |
case 126: { // mono mode on |
1855 |
KillAllVoices(pEngineChannel, itControlChangeEvent); |
if (!pEngineChannel->SoloMode) |
1856 |
|
KillAllVoices(pEngineChannel, itControlChangeEvent); |
1857 |
pEngineChannel->SoloMode = true; |
pEngineChannel->SoloMode = true; |
1858 |
break; |
break; |
1859 |
} |
} |
1860 |
case 127: { // poly mode on |
case 127: { // poly mode on |
1861 |
KillAllVoices(pEngineChannel, itControlChangeEvent); |
if (pEngineChannel->SoloMode) |
1862 |
|
KillAllVoices(pEngineChannel, itControlChangeEvent); |
1863 |
pEngineChannel->SoloMode = false; |
pEngineChannel->SoloMode = false; |
1864 |
break; |
break; |
1865 |
} |
} |
1869 |
if (!pEngineChannel->fxSends.empty()) { |
if (!pEngineChannel->fxSends.empty()) { |
1870 |
for (int iFxSend = 0; iFxSend < pEngineChannel->GetFxSendCount(); iFxSend++) { |
for (int iFxSend = 0; iFxSend < pEngineChannel->GetFxSendCount(); iFxSend++) { |
1871 |
FxSend* pFxSend = pEngineChannel->GetFxSend(iFxSend); |
FxSend* pFxSend = pEngineChannel->GetFxSend(iFxSend); |
1872 |
if (pFxSend->MidiController() == itControlChangeEvent->Param.CC.Controller) |
if (pFxSend->MidiController() == itControlChangeEvent->Param.CC.Controller) { |
1873 |
pFxSend->SetLevel(itControlChangeEvent->Param.CC.Value); |
pFxSend->SetLevel(itControlChangeEvent->Param.CC.Value); |
1874 |
|
pFxSend->SetInfoChanged(true); |
1875 |
|
} |
1876 |
} |
} |
1877 |
} |
} |
1878 |
} |
} |
1891 |
if (exclusive_status != 0xF0) goto free_sysex_data; |
if (exclusive_status != 0xF0) goto free_sysex_data; |
1892 |
|
|
1893 |
switch (id) { |
switch (id) { |
1894 |
|
case 0x7f: { // (Realtime) Universal Sysex (GM Standard) |
1895 |
|
uint8_t sysex_channel, sub_id1, sub_id2, val_msb, val_lsb;; |
1896 |
|
if (!reader.pop(&sysex_channel)) goto free_sysex_data; |
1897 |
|
if (!reader.pop(&sub_id1)) goto free_sysex_data; |
1898 |
|
if (!reader.pop(&sub_id2)) goto free_sysex_data; |
1899 |
|
if (!reader.pop(&val_lsb)) goto free_sysex_data; |
1900 |
|
if (!reader.pop(&val_msb)) goto free_sysex_data; |
1901 |
|
//TODO: for now we simply ignore the sysex channel, seldom used anyway |
1902 |
|
switch (sub_id1) { |
1903 |
|
case 0x04: // Device Control |
1904 |
|
switch (sub_id2) { |
1905 |
|
case 0x01: // Master Volume |
1906 |
|
GLOBAL_VOLUME = |
1907 |
|
double((uint(val_msb)<<7) | uint(val_lsb)) / 16383.0; |
1908 |
|
break; |
1909 |
|
} |
1910 |
|
break; |
1911 |
|
} |
1912 |
|
break; |
1913 |
|
} |
1914 |
case 0x41: { // Roland |
case 0x41: { // Roland |
1915 |
dmsg(3,("Roland Sysex\n")); |
dmsg(3,("Roland Sysex\n")); |
1916 |
uint8_t device_id, model_id, cmd_id; |
uint8_t device_id, model_id, cmd_id; |
2085 |
} |
} |
2086 |
|
|
2087 |
String Engine::Description() { |
String Engine::Description() { |
2088 |
return "Gigasampler Engine"; |
return "Gigasampler Format Engine"; |
2089 |
} |
} |
2090 |
|
|
2091 |
String Engine::Version() { |
String Engine::Version() { |
2092 |
String s = "$Revision: 1.75 $"; |
String s = "$Revision: 1.92 $"; |
2093 |
return s.substr(11, s.size() - 13); // cut dollar signs, spaces and CVS macro keyword |
return s.substr(11, s.size() - 13); // cut dollar signs, spaces and CVS macro keyword |
2094 |
} |
} |
2095 |
|
|
2098 |
} |
} |
2099 |
|
|
2100 |
// static constant initializers |
// static constant initializers |
2101 |
const float* Engine::VolumeCurve(InitVolumeCurve()); |
const Engine::FloatTable Engine::VolumeCurve(InitVolumeCurve()); |
2102 |
const float* Engine::PanCurve(InitPanCurve()); |
const Engine::FloatTable Engine::PanCurve(InitPanCurve()); |
2103 |
const float* Engine::CrossfadeCurve(InitCrossfadeCurve()); |
const Engine::FloatTable Engine::CrossfadeCurve(InitCrossfadeCurve()); |
2104 |
|
|
2105 |
float* Engine::InitVolumeCurve() { |
float* Engine::InitVolumeCurve() { |
2106 |
// line-segment approximation |
// line-segment approximation |
2139 |
return y; |
return y; |
2140 |
} |
} |
2141 |
|
|
|
/** |
|
|
* Changes the instrument for an engine channel. |
|
|
* |
|
|
* @param pEngineChannel - engine channel on which the instrument |
|
|
* should be changed |
|
|
* @param pInstrument - new instrument |
|
|
* @returns a list of dimension regions from the old instrument |
|
|
* that are still in use |
|
|
*/ |
|
|
::gig::DimensionRegion** Engine::ChangeInstrument(EngineChannel* pEngineChannel, ::gig::Instrument* pInstrument) { |
|
|
instrument_change_command_t command; |
|
|
command.pEngineChannel = pEngineChannel; |
|
|
command.pInstrument = pInstrument; |
|
|
InstrumentChangeQueue->push(&command); |
|
|
|
|
|
// wait for the audio thread to confirm that the instrument |
|
|
// change has been done |
|
|
instrument_change_reply_t reply; |
|
|
while (InstrumentChangeReplyQueue->pop(&reply) == 0) { |
|
|
usleep(10000); |
|
|
} |
|
|
return pDimRegionsInUse; |
|
|
} |
|
|
|
|
2142 |
}} // namespace LinuxSampler::gig |
}} // namespace LinuxSampler::gig |