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-2008 Christian Schoenebeck * |
* Copyright (C) 2005-2020 Christian Schoenebeck * |
7 |
* Copyright (C) 2009-2012 Christian Schoenebeck and Grigor Iliev * |
* Copyright (C) 2009-2012 Grigor Iliev * |
8 |
|
* Copyright (C) 2012-2017 Andreas Persson * |
9 |
* * |
* * |
10 |
* This program is free software; you can redistribute it and/or modify * |
* This program is free software; you can redistribute it and/or modify * |
11 |
* 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 * |
35 |
{ |
{ |
36 |
pEngine = NULL; |
pEngine = NULL; |
37 |
pEvents = NULL; // we allocate when we retrieve the right Engine object |
pEvents = NULL; // we allocate when we retrieve the right Engine object |
38 |
|
delayedEvents.pList = NULL; |
39 |
pEventQueue = new RingBuffer<Event,false>(CONFIG_MAX_EVENTS_PER_FRAGMENT, 0); |
pEventQueue = new RingBuffer<Event,false>(CONFIG_MAX_EVENTS_PER_FRAGMENT, 0); |
40 |
InstrumentIdx = -1; |
InstrumentIdx = -1; |
41 |
InstrumentStat = -1; |
InstrumentStat = -1; |
43 |
pChannelRight = NULL; |
pChannelRight = NULL; |
44 |
AudioDeviceChannelLeft = -1; |
AudioDeviceChannelLeft = -1; |
45 |
AudioDeviceChannelRight = -1; |
AudioDeviceChannelRight = -1; |
|
pMidiInputPort = NULL; |
|
46 |
midiChannel = midi_chan_all; |
midiChannel = midi_chan_all; |
47 |
ResetControllers(); |
ResetControllers(); |
48 |
PortamentoMode = false; |
PortamentoMode = false; |
49 |
PortamentoTime = CONFIG_PORTAMENTO_TIME_DEFAULT; |
PortamentoTime = CONFIG_PORTAMENTO_TIME_DEFAULT; |
50 |
|
pScript = NULL; |
51 |
} |
} |
52 |
|
|
53 |
AbstractEngineChannel::~AbstractEngineChannel() { |
AbstractEngineChannel::~AbstractEngineChannel() { |
102 |
|
|
103 |
void AbstractEngineChannel::Reset() { |
void AbstractEngineChannel::Reset() { |
104 |
if (pEngine) pEngine->DisableAndLock(); |
if (pEngine) pEngine->DisableAndLock(); |
105 |
ResetInternal(); |
ResetInternal(false/*don't reset engine*/); |
106 |
ResetControllers(); |
ResetControllers(); |
107 |
if (pEngine) { |
if (pEngine) { |
108 |
pEngine->Enable(); |
pEngine->Enable(); |
130 |
/** |
/** |
131 |
* This method is not thread safe! |
* This method is not thread safe! |
132 |
*/ |
*/ |
133 |
void AbstractEngineChannel::ResetInternal() { |
void AbstractEngineChannel::ResetInternal(bool bResetEngine) { |
134 |
CurrentKeyDimension = 0; |
CurrentKeyDimension = 0; |
135 |
PortamentoPos = -1.0f; // no portamento active yet |
PortamentoPos = -1.0f; // no portamento active yet |
136 |
|
|
137 |
|
// delete all active instrument script events |
138 |
|
if (pScript) pScript->resetEvents(); |
139 |
|
|
140 |
|
// free all delayed MIDI events |
141 |
|
delayedEvents.clear(); |
142 |
|
|
143 |
// delete all input events |
// delete all input events |
144 |
pEventQueue->init(); |
pEventQueue->init(); |
145 |
|
|
146 |
if (pEngine) pEngine->ResetInternal(); |
if (bResetEngine && pEngine) pEngine->ResetInternal(); |
147 |
|
|
148 |
// status of engine channel has changed, so set notify flag |
// status of engine channel has changed, so set notify flag |
149 |
bStatusChanged = true; |
bStatusChanged = true; |
200 |
* device from other threads than the lscp thread. |
* device from other threads than the lscp thread. |
201 |
*/ |
*/ |
202 |
AudioOutputDevice* AbstractEngineChannel::GetAudioOutputDeviceSafe() { |
AudioOutputDevice* AbstractEngineChannel::GetAudioOutputDeviceSafe() { |
203 |
EngineMutex.Lock(); |
LockGuard lock(EngineMutex); |
204 |
AudioOutputDevice* res = GetAudioOutputDevice(); |
return GetAudioOutputDevice(); |
|
EngineMutex.Unlock(); |
|
|
return res; |
|
205 |
} |
} |
206 |
|
|
207 |
void AbstractEngineChannel::SetOutputChannel(uint EngineAudioChannel, uint AudioDeviceChannel) { |
void AbstractEngineChannel::SetOutputChannel(uint EngineAudioChannel, uint AudioDeviceChannel) { |
236 |
} |
} |
237 |
} |
} |
238 |
|
|
239 |
|
void AbstractEngineChannel::Connect(MidiInputPort* pMidiPort) { |
240 |
|
if (!pMidiPort) return; |
241 |
|
|
242 |
|
Sync< ArrayList<MidiInputPort*> > connections = midiInputs.back(); |
243 |
|
|
244 |
|
// check if connection already exists |
245 |
|
for (int i = 0; i < connections->size(); ++i) |
246 |
|
if ((*connections)[i] == pMidiPort) |
247 |
|
return; // to avoid endless recursion |
248 |
|
|
249 |
|
connections->add(pMidiPort); |
250 |
|
|
251 |
|
// inform MIDI port about this new connection |
252 |
|
pMidiPort->Connect(this, MidiChannel()); |
253 |
|
} |
254 |
|
|
255 |
|
void AbstractEngineChannel::Disconnect(MidiInputPort* pMidiPort) { |
256 |
|
if (!pMidiPort) return; |
257 |
|
|
258 |
|
Sync< ArrayList<MidiInputPort*> > connections = midiInputs.back(); |
259 |
|
|
260 |
|
for (int i = 0; i < connections->size(); ++i) { |
261 |
|
if ((*connections)[i] == pMidiPort) { |
262 |
|
connections->remove(i); |
263 |
|
// inform MIDI port about this disconnection |
264 |
|
pMidiPort->Disconnect(this); |
265 |
|
return; |
266 |
|
} |
267 |
|
} |
268 |
|
} |
269 |
|
|
270 |
|
void AbstractEngineChannel::DisconnectAllMidiInputPorts() { |
271 |
|
Sync< ArrayList<MidiInputPort*> > connections = midiInputs.back(); |
272 |
|
ArrayList<MidiInputPort*> clonedList = *connections; |
273 |
|
connections->clear(); |
274 |
|
for (int i = 0; i < clonedList.size(); ++i) clonedList[i]->Disconnect(this); |
275 |
|
} |
276 |
|
|
277 |
|
uint AbstractEngineChannel::GetMidiInputPortCount() { |
278 |
|
Sync< ArrayList<MidiInputPort*> > connections = midiInputs.back(); |
279 |
|
return (uint) connections->size(); |
280 |
|
} |
281 |
|
|
282 |
|
MidiInputPort* AbstractEngineChannel::GetMidiInputPort(uint index) { |
283 |
|
Sync< ArrayList<MidiInputPort*> > connections = midiInputs.back(); |
284 |
|
return (index < connections->size()) ? (*connections)[index] : NULL; |
285 |
|
} |
286 |
|
|
287 |
|
// deprecated (just for API backward compatibility) - may be removed in future |
288 |
void AbstractEngineChannel::Connect(MidiInputPort* pMidiPort, midi_chan_t MidiChannel) { |
void AbstractEngineChannel::Connect(MidiInputPort* pMidiPort, midi_chan_t MidiChannel) { |
289 |
if (!pMidiPort || pMidiPort == this->pMidiInputPort) return; |
if (!pMidiPort) return; |
290 |
DisconnectMidiInputPort(); |
|
291 |
this->pMidiInputPort = pMidiPort; |
Sync< ArrayList<MidiInputPort*> > connections = midiInputs.back(); |
292 |
this->midiChannel = MidiChannel; |
|
293 |
|
// check against endless recursion |
294 |
|
if (connections->size() == 1 && (*connections)[0] == pMidiPort && this->midiChannel == MidiChannel) |
295 |
|
return; |
296 |
|
|
297 |
|
if (!isValidMidiChan(MidiChannel)) |
298 |
|
throw MidiInputException("Invalid MIDI channel (" + ToString(int(MidiChannel)) + ")"); |
299 |
|
|
300 |
|
this->midiChannel = MidiChannel; |
301 |
|
|
302 |
|
// disconnect all currently connected MIDI ports |
303 |
|
ArrayList<MidiInputPort*> clonedList = *connections; |
304 |
|
connections->clear(); |
305 |
|
for (int i = 0; i < clonedList.size(); ++i) |
306 |
|
clonedList[i]->Disconnect(this); |
307 |
|
|
308 |
|
// connect the new port |
309 |
|
connections->add(pMidiPort); |
310 |
pMidiPort->Connect(this, MidiChannel); |
pMidiPort->Connect(this, MidiChannel); |
311 |
} |
} |
312 |
|
|
313 |
|
// deprecated (just for API backward compatibility) - may be removed in future |
314 |
void AbstractEngineChannel::DisconnectMidiInputPort() { |
void AbstractEngineChannel::DisconnectMidiInputPort() { |
315 |
MidiInputPort* pOldPort = this->pMidiInputPort; |
DisconnectAllMidiInputPorts(); |
|
this->pMidiInputPort = NULL; |
|
|
if (pOldPort) pOldPort->Disconnect(this); |
|
316 |
} |
} |
317 |
|
|
318 |
|
// deprecated (just for API backward compatibility) - may be removed in future |
319 |
MidiInputPort* AbstractEngineChannel::GetMidiInputPort() { |
MidiInputPort* AbstractEngineChannel::GetMidiInputPort() { |
320 |
return pMidiInputPort; |
return GetMidiInputPort(0); |
321 |
} |
} |
322 |
|
|
323 |
midi_chan_t AbstractEngineChannel::MidiChannel() { |
midi_chan_t AbstractEngineChannel::MidiChannel() { |
324 |
return midiChannel; |
return midiChannel; |
325 |
} |
} |
326 |
|
|
327 |
|
void AbstractEngineChannel::SetMidiChannel(midi_chan_t MidiChannel) { |
328 |
|
if (this->midiChannel == MidiChannel) return; |
329 |
|
if (!isValidMidiChan(MidiChannel)) |
330 |
|
throw MidiInputException("Invalid MIDI channel (" + ToString(int(MidiChannel)) + ")"); |
331 |
|
|
332 |
|
this->midiChannel = MidiChannel; |
333 |
|
|
334 |
|
Sync< ArrayList<MidiInputPort*> > connections = midiInputs.back(); |
335 |
|
ArrayList<MidiInputPort*> clonedList = *connections; |
336 |
|
|
337 |
|
DisconnectAllMidiInputPorts(); |
338 |
|
|
339 |
|
for (int i = 0; i < clonedList.size(); ++i) Connect(clonedList[i]); |
340 |
|
} |
341 |
|
|
342 |
void AbstractEngineChannel::Connect(VirtualMidiDevice* pDevice) { |
void AbstractEngineChannel::Connect(VirtualMidiDevice* pDevice) { |
343 |
// double buffer ... double work ... |
// double buffer ... double work ... |
344 |
{ |
{ |
374 |
*/ |
*/ |
375 |
void AbstractEngineChannel::SendNoteOn(uint8_t Key, uint8_t Velocity, uint8_t MidiChannel) { |
void AbstractEngineChannel::SendNoteOn(uint8_t Key, uint8_t Velocity, uint8_t MidiChannel) { |
376 |
if (pEngine) { |
if (pEngine) { |
377 |
|
// protection in case there are more than 1 MIDI input threads sending MIDI events to this EngineChannel |
378 |
|
LockGuard g; |
379 |
|
if (hasMultipleMIDIInputs()) g = LockGuard(MidiInputMutex); |
380 |
|
|
381 |
Event event = pEngine->pEventGenerator->CreateEvent(); |
Event event = pEngine->pEventGenerator->CreateEvent(); |
382 |
event.Type = Event::type_note_on; |
event.Type = Event::type_note_on; |
383 |
event.Param.Note.Key = Key; |
event.Param.Note.Key = Key; |
415 |
dmsg(1,("EngineChannel::SendNoteOn(): negative FragmentPos! Seems MIDI driver is buggy!")); |
dmsg(1,("EngineChannel::SendNoteOn(): negative FragmentPos! Seems MIDI driver is buggy!")); |
416 |
} |
} |
417 |
else if (pEngine) { |
else if (pEngine) { |
418 |
|
// protection in case there are more than 1 MIDI input threads sending MIDI events to this EngineChannel |
419 |
|
LockGuard g; |
420 |
|
if (hasMultipleMIDIInputs()) g = LockGuard(MidiInputMutex); |
421 |
|
|
422 |
Event event = pEngine->pEventGenerator->CreateEvent(FragmentPos); |
Event event = pEngine->pEventGenerator->CreateEvent(FragmentPos); |
423 |
event.Type = Event::type_note_on; |
event.Type = Event::type_note_on; |
424 |
event.Param.Note.Key = Key; |
event.Param.Note.Key = Key; |
451 |
*/ |
*/ |
452 |
void AbstractEngineChannel::SendNoteOff(uint8_t Key, uint8_t Velocity, uint8_t MidiChannel) { |
void AbstractEngineChannel::SendNoteOff(uint8_t Key, uint8_t Velocity, uint8_t MidiChannel) { |
453 |
if (pEngine) { |
if (pEngine) { |
454 |
|
// protection in case there are more than 1 MIDI input threads sending MIDI events to this EngineChannel |
455 |
|
LockGuard g; |
456 |
|
if (hasMultipleMIDIInputs()) g = LockGuard(MidiInputMutex); |
457 |
|
|
458 |
Event event = pEngine->pEventGenerator->CreateEvent(); |
Event event = pEngine->pEventGenerator->CreateEvent(); |
459 |
event.Type = Event::type_note_off; |
event.Type = Event::type_note_off; |
460 |
event.Param.Note.Key = Key; |
event.Param.Note.Key = Key; |
492 |
dmsg(1,("EngineChannel::SendNoteOff(): negative FragmentPos! Seems MIDI driver is buggy!")); |
dmsg(1,("EngineChannel::SendNoteOff(): negative FragmentPos! Seems MIDI driver is buggy!")); |
493 |
} |
} |
494 |
else if (pEngine) { |
else if (pEngine) { |
495 |
|
// protection in case there are more than 1 MIDI input threads sending MIDI events to this EngineChannel |
496 |
|
LockGuard g; |
497 |
|
if (hasMultipleMIDIInputs()) g = LockGuard(MidiInputMutex); |
498 |
|
|
499 |
Event event = pEngine->pEventGenerator->CreateEvent(FragmentPos); |
Event event = pEngine->pEventGenerator->CreateEvent(FragmentPos); |
500 |
event.Type = Event::type_note_off; |
event.Type = Event::type_note_off; |
501 |
event.Param.Note.Key = Key; |
event.Param.Note.Key = Key; |
527 |
*/ |
*/ |
528 |
void AbstractEngineChannel::SendPitchbend(int Pitch, uint8_t MidiChannel) { |
void AbstractEngineChannel::SendPitchbend(int Pitch, uint8_t MidiChannel) { |
529 |
if (pEngine) { |
if (pEngine) { |
530 |
|
// protection in case there are more than 1 MIDI input threads sending MIDI events to this EngineChannel |
531 |
|
LockGuard g; |
532 |
|
if (hasMultipleMIDIInputs()) g = LockGuard(MidiInputMutex); |
533 |
|
|
534 |
Event event = pEngine->pEventGenerator->CreateEvent(); |
Event event = pEngine->pEventGenerator->CreateEvent(); |
535 |
event.Type = Event::type_pitchbend; |
event.Type = Event::type_pitchbend; |
536 |
event.Param.Pitch.Pitch = Pitch; |
event.Param.Pitch.Pitch = Pitch; |
556 |
dmsg(1,("AbstractEngineChannel::SendPitchBend(): negative FragmentPos! Seems MIDI driver is buggy!")); |
dmsg(1,("AbstractEngineChannel::SendPitchBend(): negative FragmentPos! Seems MIDI driver is buggy!")); |
557 |
} |
} |
558 |
else if (pEngine) { |
else if (pEngine) { |
559 |
|
// protection in case there are more than 1 MIDI input threads sending MIDI events to this EngineChannel |
560 |
|
LockGuard g; |
561 |
|
if (hasMultipleMIDIInputs()) g = LockGuard(MidiInputMutex); |
562 |
|
|
563 |
Event event = pEngine->pEventGenerator->CreateEvent(FragmentPos); |
Event event = pEngine->pEventGenerator->CreateEvent(FragmentPos); |
564 |
event.Type = Event::type_pitchbend; |
event.Type = Event::type_pitchbend; |
565 |
event.Param.Pitch.Pitch = Pitch; |
event.Param.Pitch.Pitch = Pitch; |
581 |
*/ |
*/ |
582 |
void AbstractEngineChannel::SendControlChange(uint8_t Controller, uint8_t Value, uint8_t MidiChannel) { |
void AbstractEngineChannel::SendControlChange(uint8_t Controller, uint8_t Value, uint8_t MidiChannel) { |
583 |
if (pEngine) { |
if (pEngine) { |
584 |
|
// protection in case there are more than 1 MIDI input threads sending MIDI events to this EngineChannel |
585 |
|
LockGuard g; |
586 |
|
if (hasMultipleMIDIInputs()) g = LockGuard(MidiInputMutex); |
587 |
|
|
588 |
Event event = pEngine->pEventGenerator->CreateEvent(); |
Event event = pEngine->pEventGenerator->CreateEvent(); |
589 |
event.Type = Event::type_control_change; |
event.Type = Event::type_control_change; |
590 |
event.Param.CC.Controller = Controller; |
event.Param.CC.Controller = Controller; |
612 |
dmsg(1,("AbstractEngineChannel::SendControlChange(): negative FragmentPos! Seems MIDI driver is buggy!")); |
dmsg(1,("AbstractEngineChannel::SendControlChange(): negative FragmentPos! Seems MIDI driver is buggy!")); |
613 |
} |
} |
614 |
else if (pEngine) { |
else if (pEngine) { |
615 |
|
// protection in case there are more than 1 MIDI input threads sending MIDI events to this EngineChannel |
616 |
|
LockGuard g; |
617 |
|
if (hasMultipleMIDIInputs()) g = LockGuard(MidiInputMutex); |
618 |
|
|
619 |
Event event = pEngine->pEventGenerator->CreateEvent(FragmentPos); |
Event event = pEngine->pEventGenerator->CreateEvent(FragmentPos); |
620 |
event.Type = Event::type_control_change; |
event.Type = Event::type_control_change; |
621 |
event.Param.CC.Controller = Controller; |
event.Param.CC.Controller = Controller; |
627 |
} |
} |
628 |
} |
} |
629 |
|
|
630 |
|
void AbstractEngineChannel::SendChannelPressure(uint8_t Value, uint8_t MidiChannel) { |
631 |
|
if (pEngine) { |
632 |
|
// protection in case there are more than 1 MIDI input threads sending MIDI events to this EngineChannel |
633 |
|
LockGuard g; |
634 |
|
if (hasMultipleMIDIInputs()) g = LockGuard(MidiInputMutex); |
635 |
|
|
636 |
|
Event event = pEngine->pEventGenerator->CreateEvent(); |
637 |
|
event.Type = Event::type_channel_pressure; |
638 |
|
event.Param.ChannelPressure.Controller = CTRL_TABLE_IDX_AFTERTOUCH; // required for instrument scripts |
639 |
|
event.Param.ChannelPressure.Value = Value; |
640 |
|
event.Param.ChannelPressure.Channel = MidiChannel; |
641 |
|
event.pEngineChannel = this; |
642 |
|
if (this->pEventQueue->write_space() > 0) this->pEventQueue->push(&event); |
643 |
|
else dmsg(1,("AbstractEngineChannel: Input event queue full!")); |
644 |
|
} |
645 |
|
} |
646 |
|
|
647 |
|
void AbstractEngineChannel::SendChannelPressure(uint8_t Value, uint8_t MidiChannel, int32_t FragmentPos) { |
648 |
|
if (pEngine) { |
649 |
|
// protection in case there are more than 1 MIDI input threads sending MIDI events to this EngineChannel |
650 |
|
LockGuard g; |
651 |
|
if (hasMultipleMIDIInputs()) g = LockGuard(MidiInputMutex); |
652 |
|
|
653 |
|
Event event = pEngine->pEventGenerator->CreateEvent(FragmentPos); |
654 |
|
event.Type = Event::type_channel_pressure; |
655 |
|
event.Param.ChannelPressure.Controller = CTRL_TABLE_IDX_AFTERTOUCH; // required for instrument scripts |
656 |
|
event.Param.ChannelPressure.Value = Value; |
657 |
|
event.Param.ChannelPressure.Channel = MidiChannel; |
658 |
|
event.pEngineChannel = this; |
659 |
|
if (this->pEventQueue->write_space() > 0) this->pEventQueue->push(&event); |
660 |
|
else dmsg(1,("AbstractEngineChannel: Input event queue full!")); |
661 |
|
} |
662 |
|
} |
663 |
|
|
664 |
|
void AbstractEngineChannel::SendPolyphonicKeyPressure(uint8_t Key, uint8_t Value, uint8_t MidiChannel) { |
665 |
|
if (pEngine) { |
666 |
|
// protection in case there are more than 1 MIDI input threads sending MIDI events to this EngineChannel |
667 |
|
LockGuard g; |
668 |
|
if (hasMultipleMIDIInputs()) g = LockGuard(MidiInputMutex); |
669 |
|
|
670 |
|
Event event = pEngine->pEventGenerator->CreateEvent(); |
671 |
|
event.Type = Event::type_note_pressure; |
672 |
|
event.Param.NotePressure.Key = Key; |
673 |
|
event.Param.NotePressure.Value = Value; |
674 |
|
event.Param.NotePressure.Channel = MidiChannel; |
675 |
|
event.pEngineChannel = this; |
676 |
|
if (this->pEventQueue->write_space() > 0) this->pEventQueue->push(&event); |
677 |
|
else dmsg(1,("AbstractEngineChannel: Input event queue full!")); |
678 |
|
} |
679 |
|
} |
680 |
|
|
681 |
|
void AbstractEngineChannel::SendPolyphonicKeyPressure(uint8_t Key, uint8_t Value, uint8_t MidiChannel, int32_t FragmentPos) { |
682 |
|
if (pEngine) { |
683 |
|
// protection in case there are more than 1 MIDI input threads sending MIDI events to this EngineChannel |
684 |
|
LockGuard g; |
685 |
|
if (hasMultipleMIDIInputs()) g = LockGuard(MidiInputMutex); |
686 |
|
|
687 |
|
Event event = pEngine->pEventGenerator->CreateEvent(FragmentPos); |
688 |
|
event.Type = Event::type_note_pressure; |
689 |
|
event.Param.NotePressure.Key = Key; |
690 |
|
event.Param.NotePressure.Value = Value; |
691 |
|
event.Param.NotePressure.Channel = MidiChannel; |
692 |
|
event.pEngineChannel = this; |
693 |
|
if (this->pEventQueue->write_space() > 0) this->pEventQueue->push(&event); |
694 |
|
else dmsg(1,("AbstractEngineChannel: Input event queue full!")); |
695 |
|
} |
696 |
|
} |
697 |
|
|
698 |
|
bool AbstractEngineChannel::applyTranspose(Event* event) { |
699 |
|
if (event->Type != Event::type_note_on && event->Type != Event::type_note_off) |
700 |
|
return true; // event OK (not a note event, nothing to do with it here) |
701 |
|
|
702 |
|
//HACK: we should better add the transpose value only to the most mandatory places (like for retrieving the region and calculating the tuning), because otherwise voices will unintendedly survive when changing transpose while playing |
703 |
|
const int k = event->Param.Note.Key + GlobalTranspose; |
704 |
|
if (k < 0 || k > 127) |
705 |
|
return false; // bad event, drop it |
706 |
|
|
707 |
|
event->Param.Note.Key = k; |
708 |
|
|
709 |
|
return true; // event OK |
710 |
|
} |
711 |
|
|
712 |
/** |
/** |
713 |
* Copy all events from the engine channel's input event queue buffer to |
* Copy all events from the engine channel's input event queue buffer to |
714 |
* the internal event list. This will be done at the beginning of each |
* the internal event list. This will be done at the beginning of each |
728 |
{ |
{ |
729 |
const uint8_t channel = MidiChannel() == midi_chan_all ? 0 : MidiChannel(); |
const uint8_t channel = MidiChannel() == midi_chan_all ? 0 : MidiChannel(); |
730 |
const int FragmentPos = 0; // randomly chosen, we don't care about jitter for virtual MIDI devices |
const int FragmentPos = 0; // randomly chosen, we don't care about jitter for virtual MIDI devices |
731 |
Event event = pEngine->pEventGenerator->CreateEvent(FragmentPos); |
const Event event = pEngine->pEventGenerator->CreateEvent(FragmentPos); |
732 |
VirtualMidiDevice::event_t devEvent; // the event format we get from the virtual MIDI device |
VirtualMidiDevice::event_t devEvent; // the event format we get from the virtual MIDI device |
733 |
// as we're going to (carefully) write some status to the |
// as we're going to (carefully) write some status to the |
734 |
// synchronized struct, we cast away the const |
// synchronized struct, we cast away the const |
739 |
VirtualMidiDevice* pDev = devices[i]; |
VirtualMidiDevice* pDev = devices[i]; |
740 |
// I think we can simply flush the whole FIFO(s), the user shouldn't be so fast ;-) |
// I think we can simply flush the whole FIFO(s), the user shouldn't be so fast ;-) |
741 |
while (pDev->GetMidiEventFromDevice(devEvent)) { |
while (pDev->GetMidiEventFromDevice(devEvent)) { |
742 |
|
if (pEvents->poolIsEmpty()) { |
743 |
|
dmsg(1,("Event pool emtpy!\n")); |
744 |
|
goto exitVirtualDevicesLoop; |
745 |
|
} |
746 |
|
|
747 |
|
// copy event to internal event list (this is already |
748 |
|
// required here, because the LaunchNewNote() call below |
749 |
|
// requires the event to be from the internal event pool for |
750 |
|
// being able to generate a valid event ID) |
751 |
|
RTList<Event>::Iterator itEvent = pEvents->allocAppend(); |
752 |
|
*itEvent = event; |
753 |
|
|
754 |
|
itEvent->pEngineChannel = this; |
755 |
|
|
756 |
switch (devEvent.Type) { |
switch (devEvent.Type) { |
757 |
case VirtualMidiDevice::EVENT_TYPE_NOTEON: |
case VirtualMidiDevice::EVENT_TYPE_NOTEON: |
758 |
event.Type = Event::type_note_on; |
itEvent->Type = Event::type_note_on; |
759 |
event.Param.Note.Key = devEvent.Arg1; |
itEvent->Param.Note.Key = devEvent.Arg1; |
760 |
event.Param.Note.Velocity = devEvent.Arg2; |
itEvent->Param.Note.Velocity = devEvent.Arg2; |
761 |
event.Param.Note.Channel = channel; |
itEvent->Param.Note.Channel = channel; |
762 |
|
// apply transpose setting to (note on/off) event |
763 |
|
if (!applyTranspose(&*itEvent)) { |
764 |
|
// note value is out of range, so drop this event |
765 |
|
pEvents->free(itEvent); |
766 |
|
continue; |
767 |
|
} |
768 |
|
// assign a new note to this note-on event |
769 |
|
if (!pEngine->LaunchNewNote(this, itEvent)) { |
770 |
|
// failed launching new note, so drop this event |
771 |
|
pEvents->free(itEvent); |
772 |
|
continue; |
773 |
|
} |
774 |
break; |
break; |
775 |
case VirtualMidiDevice::EVENT_TYPE_NOTEOFF: |
case VirtualMidiDevice::EVENT_TYPE_NOTEOFF: |
776 |
event.Type = Event::type_note_off; |
itEvent->Type = Event::type_note_off; |
777 |
event.Param.Note.Key = devEvent.Arg1; |
itEvent->Param.Note.Key = devEvent.Arg1; |
778 |
event.Param.Note.Velocity = devEvent.Arg2; |
itEvent->Param.Note.Velocity = devEvent.Arg2; |
779 |
event.Param.Note.Channel = channel; |
itEvent->Param.Note.Channel = channel; |
780 |
|
if (!applyTranspose(&*itEvent)) { |
781 |
|
// note value is out of range, so drop this event |
782 |
|
pEvents->free(itEvent); |
783 |
|
continue; |
784 |
|
} |
785 |
break; |
break; |
786 |
case VirtualMidiDevice::EVENT_TYPE_CC: |
case VirtualMidiDevice::EVENT_TYPE_CC: |
787 |
event.Type = Event::type_control_change; |
switch (devEvent.Arg1) { |
788 |
event.Param.CC.Controller = devEvent.Arg1; |
case 0: // bank select MSB ... |
789 |
event.Param.CC.Value = devEvent.Arg2; |
SetMidiBankMsb(devEvent.Arg2); |
790 |
event.Param.CC.Channel = channel; |
// don't push this event into FIFO |
791 |
|
pEvents->free(itEvent); |
792 |
|
continue; |
793 |
|
case 32: // bank select LSB ... |
794 |
|
SetMidiBankLsb(devEvent.Arg2); |
795 |
|
// don't push this event into FIFO |
796 |
|
pEvents->free(itEvent); |
797 |
|
continue; |
798 |
|
default: // regular MIDI CC ... |
799 |
|
itEvent->Type = Event::type_control_change; |
800 |
|
itEvent->Param.CC.Controller = devEvent.Arg1; |
801 |
|
itEvent->Param.CC.Value = devEvent.Arg2; |
802 |
|
itEvent->Param.CC.Channel = channel; |
803 |
|
} |
804 |
|
break; |
805 |
|
case VirtualMidiDevice::EVENT_TYPE_PITCHBEND: |
806 |
|
itEvent->Type = Event::type_pitchbend; |
807 |
|
itEvent->Param.Pitch.Pitch = int(devEvent.Arg2 << 7 | devEvent.Arg1) - 8192; |
808 |
|
itEvent->Param.Pitch.Channel = channel; |
809 |
|
break; |
810 |
|
case VirtualMidiDevice::EVENT_TYPE_PROGRAM: |
811 |
|
SendProgramChange(devEvent.Arg1); |
812 |
|
// don't push this event into FIFO |
813 |
|
pEvents->free(itEvent); |
814 |
|
continue; |
815 |
|
case VirtualMidiDevice::EVENT_TYPE_CHPRESSURE: |
816 |
|
itEvent->Type = Event::type_channel_pressure; |
817 |
|
itEvent->Param.ChannelPressure.Controller = CTRL_TABLE_IDX_AFTERTOUCH; |
818 |
|
itEvent->Param.ChannelPressure.Value = devEvent.Arg2; |
819 |
|
itEvent->Param.ChannelPressure.Channel = channel; |
820 |
break; |
break; |
821 |
default: |
default: |
822 |
std::cerr << "AbstractEngineChannel::ImportEvents() ERROR: unknown event type (" |
std::cerr << "AbstractEngineChannel::ImportEvents() ERROR: unknown event type (" |
823 |
<< devEvent.Type << "). This is a bug!"; |
<< devEvent.Type << "). This is a bug!"; |
824 |
|
pEvents->free(itEvent); // drop event |
825 |
continue; |
continue; |
826 |
} |
} |
|
event.pEngineChannel = this; |
|
|
// copy event to internal event list |
|
|
if (pEvents->poolIsEmpty()) { |
|
|
dmsg(1,("Event pool emtpy!\n")); |
|
|
goto exitVirtualDevicesLoop; |
|
|
} |
|
|
*pEvents->allocAppend() = event; |
|
827 |
} |
} |
828 |
} |
} |
829 |
} |
} |
843 |
pEvent->ResetFragmentPos(); |
pEvent->ResetFragmentPos(); |
844 |
break; |
break; |
845 |
} |
} |
|
// copy event to internal event list |
|
846 |
if (pEvents->poolIsEmpty()) { |
if (pEvents->poolIsEmpty()) { |
847 |
dmsg(1,("Event pool emtpy!\n")); |
dmsg(1,("Event pool emtpy!\n")); |
848 |
break; |
break; |
849 |
} |
} |
850 |
*pEvents->allocAppend() = *pEvent; |
|
851 |
|
// copy event to internal event list |
852 |
|
// (required already because LaunchNewNote() relies on it, see |
853 |
|
// comment about it above) |
854 |
|
RTList<Event>::Iterator itEvent = pEvents->allocAppend(); |
855 |
|
*itEvent = *pEvent; |
856 |
|
|
857 |
|
// apply transpose setting to (note on/off) event |
858 |
|
if (!applyTranspose(&*itEvent)) { |
859 |
|
// it's a note event which has a note value out of range, so drop this event |
860 |
|
pEvents->free(itEvent); |
861 |
|
continue; |
862 |
|
} |
863 |
|
// assign a new note to this event (if its a note-on event) |
864 |
|
if (itEvent->Type == Event::type_note_on) { |
865 |
|
if (!pEngine->LaunchNewNote(this, itEvent)) { |
866 |
|
// failed launching new note, so drop this event |
867 |
|
pEvents->free(itEvent); |
868 |
|
continue; |
869 |
|
} |
870 |
|
} |
871 |
|
|
872 |
} |
} |
873 |
eventQueueReader.free(); // free all copied events from input queue |
eventQueueReader.free(); // free all copied events from input queue |
874 |
} |
} |
875 |
|
|
876 |
|
/** |
877 |
|
* Called by real-time instrument script functions to schedule a new event |
878 |
|
* @a delay microseconds in future. |
879 |
|
* |
880 |
|
* @b IMPORTANT: for the supplied @a delay to be scheduled correctly, the |
881 |
|
* passed @a pEvent must be assigned a valid fragment time within the |
882 |
|
* current audio fragment boundaries. That fragment time will be used by |
883 |
|
* this method as basis for interpreting what "now" acutally is, and thus |
884 |
|
* it will be used as basis for calculating the precise scheduling time |
885 |
|
* for @a delay. The easiest way to achieve this is by copying a recent |
886 |
|
* event which happened within the current audio fragment cycle: i.e. the |
887 |
|
* original event which caused calling this method here. |
888 |
|
* |
889 |
|
* @param pEvent - event to be scheduled in future (event data will be copied) |
890 |
|
* @param delay - amount of microseconds in future (from now) when event shall be processed |
891 |
|
* @returns unique event ID of scheduled new event, or NULL on error |
892 |
|
*/ |
893 |
|
event_id_t AbstractEngineChannel::ScheduleEventMicroSec(const Event* pEvent, int64_t delay) { |
894 |
|
dmsg(3,("AbstractEngineChannel::ScheduleEventMicroSec(Event.Type=%d,delay=%lld)\n", pEvent->Type, delay)); |
895 |
|
RTList<Event>::Iterator itEvent = pEvents->allocAppend(); |
896 |
|
if (!itEvent) { |
897 |
|
dmsg(1,("AbstractEngineChannel::ScheduleEventMicroSec(): Event pool emtpy!\n")); |
898 |
|
return 0; |
899 |
|
} |
900 |
|
RTList<ScheduledEvent>::Iterator itNode = delayedEvents.schedulerNodes.allocAppend(); |
901 |
|
if (!itNode) { // scheduler node pool empty ... |
902 |
|
dmsg(1,("AbstractEngineChannel::ScheduleEventMicroSec(): ScheduledEvent pool empty!\n")); |
903 |
|
pEvents->free(itEvent); |
904 |
|
return 0; |
905 |
|
} |
906 |
|
// copy passed event |
907 |
|
*itEvent = *pEvent; |
908 |
|
// move copied event to list of delayed events |
909 |
|
itEvent = itEvent.moveToEndOf(delayedEvents.pList); |
910 |
|
// connect scheduler node with the copied event |
911 |
|
itNode->itEvent = itEvent; |
912 |
|
// add entry to time sorted scheduler queue for copied event |
913 |
|
pEngine->pEventGenerator->scheduleAheadMicroSec( |
914 |
|
delayedEvents.queue, *itNode, itEvent->FragmentPos(), delay |
915 |
|
); |
916 |
|
//dmsg(5,("ScheduledEvent queue size: %d\n", delayedEvents.queue.size())); |
917 |
|
return pEvents->getID(itEvent); |
918 |
|
} |
919 |
|
|
920 |
|
/** |
921 |
|
* Called by real-time instrument script functions to ignore the event |
922 |
|
* reflected by given event ID. The event will be freed immediately to its |
923 |
|
* pool and cannot be dereferenced by its old ID anymore. Even if its |
924 |
|
* allocated back from the Pool later on, it will have a different ID. |
925 |
|
* |
926 |
|
* @param id - unique ID of event to be dropped |
927 |
|
*/ |
928 |
|
void AbstractEngineChannel::IgnoreEvent(event_id_t id) { |
929 |
|
RTList<Event>::Iterator it = pEvents->fromID(id); |
930 |
|
if (it) pEvents->free(it); |
931 |
|
} |
932 |
|
|
933 |
|
/** @brief Drop the requested event. |
934 |
|
* |
935 |
|
* Called by real-time instrument script functions to ignore the event |
936 |
|
* reflected by the given event @a id. This method detects whether the |
937 |
|
* passed ID is actually a @c Note ID or a regular @c Event ID and act |
938 |
|
* accordingly. |
939 |
|
* |
940 |
|
* @param id - event id (from script scope) |
941 |
|
* @see ScriptID |
942 |
|
*/ |
943 |
|
void AbstractEngineChannel::IgnoreEventByScriptID(const ScriptID& id) { |
944 |
|
switch (id.type()) { |
945 |
|
case ScriptID::EVENT: |
946 |
|
IgnoreEvent( id.eventID() ); |
947 |
|
break; |
948 |
|
case ScriptID::NOTE: |
949 |
|
IgnoreNote( id.noteID() ); |
950 |
|
break; |
951 |
|
} |
952 |
|
} |
953 |
|
|
954 |
|
/** @brief Order resuming of script execution instance "now". |
955 |
|
* |
956 |
|
* Called by real-time instrument script function stop_wait() to resume a |
957 |
|
* script callback currently being suspended (i.e. due to a wait() script |
958 |
|
* function call). |
959 |
|
* |
960 |
|
* @param itCallback - suspended script callback to be resumed |
961 |
|
* @param now - current scheduler time to be "now" |
962 |
|
* @param forever - whether this particulare script callback should ignore |
963 |
|
* all subsequent wait*() script function calls |
964 |
|
*/ |
965 |
|
void AbstractEngineChannel::ScheduleResumeOfScriptCallback(RTList<ScriptEvent>::Iterator& itCallback, sched_time_t now, bool forever) { |
966 |
|
// ignore if invalid iterator was passed |
967 |
|
if (!itCallback) return; |
968 |
|
|
969 |
|
ScriptEvent* pCallback = &*itCallback; |
970 |
|
|
971 |
|
// mark this callback to ignore all subsequent built-in wait*() script function calls |
972 |
|
if (forever) pCallback->ignoreAllWaitCalls = true; |
973 |
|
|
974 |
|
// ignore if callback is not in the scheduler queue |
975 |
|
if (pCallback->currentSchedulerQueue() != &pScript->suspendedEvents) return; |
976 |
|
|
977 |
|
// ignore if callback is already scheduled to be resumed "now" |
978 |
|
if (pCallback->scheduleTime <= now) return; |
979 |
|
|
980 |
|
// take it out from the scheduler queue and re-insert callback |
981 |
|
// to schedule the script callback for resuming execution "now" |
982 |
|
pScript->suspendedEvents.erase(*pCallback); |
983 |
|
pCallback->scheduleTime = now + 1; |
984 |
|
pScript->suspendedEvents.insert(*pCallback); |
985 |
|
} |
986 |
|
|
987 |
|
/** @brief Fork the given script execution instance. |
988 |
|
* |
989 |
|
* Called by real-time instrument script function fork() to create a new |
990 |
|
* script execution instance (child) of the script execution instance |
991 |
|
* (parent) that was calling fork(). This is essentially like creating a |
992 |
|
* new thread for a script handler being executing. The entire execution |
993 |
|
* state of parent is copied to the "forked" child. |
994 |
|
* |
995 |
|
* @param parent - original active script callback instance from which the |
996 |
|
* new child shall be forked from |
997 |
|
* @param bAutoAbort - whether the forked child shall automatically be |
998 |
|
* terminated as soon as parent terminates |
999 |
|
* @returns forked new child execution instance |
1000 |
|
*/ |
1001 |
|
RTList<ScriptEvent>::Iterator AbstractEngineChannel::forkScriptCallback(ScriptEvent* parent, bool bAutoAbort) { |
1002 |
|
// check if the max. amount of child forks for this parent event handler |
1003 |
|
// instance have not been exceeded yet |
1004 |
|
if (parent->countChildHandlers() >= MAX_FORK_PER_SCRIPT_HANDLER) |
1005 |
|
return RTList<ScriptEvent>::Iterator(); |
1006 |
|
|
1007 |
|
// allocate a new script callback instance for child to be forked |
1008 |
|
RTList<ScriptEvent>::Iterator itChild = pScript->pEvents->allocAppend(); |
1009 |
|
if (!itChild) return itChild; |
1010 |
|
|
1011 |
|
// copy entire script handler state from parent to forked child |
1012 |
|
parent->forkTo(&*itChild, bAutoAbort); |
1013 |
|
|
1014 |
|
// stick the parent ID and child ID respectively to each other |
1015 |
|
itChild->parentHandlerID = GetScriptCallbackID(parent); |
1016 |
|
parent->addChildHandlerID( GetScriptCallbackID(&*itChild) ); |
1017 |
|
|
1018 |
|
// insert newly created (forked) child event handler instance to the |
1019 |
|
// scheduler queue for being executed soon |
1020 |
|
pEngine->pEventGenerator->scheduleAheadMicroSec( |
1021 |
|
pScript->suspendedEvents, // scheduler queue |
1022 |
|
*itChild, // script event |
1023 |
|
parent->cause.FragmentPos(), // current time of script event (basis for its next execution) |
1024 |
|
0 // "resume" new child script callback instance ASAP |
1025 |
|
); |
1026 |
|
|
1027 |
|
return itChild; |
1028 |
|
} |
1029 |
|
|
1030 |
FxSend* AbstractEngineChannel::AddFxSend(uint8_t MidiCtrl, String Name) throw (Exception) { |
FxSend* AbstractEngineChannel::AddFxSend(uint8_t MidiCtrl, String Name) throw (Exception) { |
1031 |
if (pEngine) pEngine->DisableAndLock(); |
if (pEngine) pEngine->DisableAndLock(); |
1032 |
FxSend* pFxSend = new FxSend(this, MidiCtrl, Name); |
FxSend* pFxSend = new FxSend(this, MidiCtrl, Name); |
1054 |
} |
} |
1055 |
|
|
1056 |
uint AbstractEngineChannel::GetFxSendCount() { |
uint AbstractEngineChannel::GetFxSendCount() { |
1057 |
return fxSends.size(); |
return (uint)fxSends.size(); |
1058 |
} |
} |
1059 |
|
|
1060 |
void AbstractEngineChannel::RemoveFxSend(FxSend* pFxSend) { |
void AbstractEngineChannel::RemoveFxSend(FxSend* pFxSend) { |