engines/gig/Engine.cpp

/***************************************************************************
 *                                                                         *
 *   LinuxSampler - modular, streaming capable sampler                     *
 *                                                                         *
 *   Copyright (C) 2003,2004 by Benno Senoner and Christian Schoenebeck    *
 *   Copyright (C) 2005-2008 Christian Schoenebeck                         *
 *   Copyright (C) 2009-2010 Christian Schoenebeck and Grigor Iliev        *
 *                                                                         *
 *   This program is free software; you can redistribute it and/or modify  *
 *   it under the terms of the GNU General Public License as published by  *
 *   the Free Software Foundation; either version 2 of the License, or     *
 *   (at your option) any later version.                                   *
 *                                                                         *
 *   This program is distributed in the hope that it will be useful,       *
 *   but WITHOUT ANY WARRANTY; without even the implied warranty of        *
 *   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the         *
 *   GNU General Public License for more details.                          *
 *                                                                         *
 *   You should have received a copy of the GNU General Public License     *
 *   along with this program; if not, write to the Free Software           *
 *   Foundation, Inc., 59 Temple Place, Suite 330, Boston,                 *
 *   MA  02111-1307  USA                                                   *
 ***************************************************************************/

#include "Engine.h"
#include "EngineChannel.h"
#include "InstrumentScriptVM.h"

namespace LinuxSampler { namespace gig {
    Engine::Format Engine::GetEngineFormat() { return GIG; }

    void Engine::CreateInstrumentScriptVM() {
        dmsg(2,("gig::Engine created Giga format scriptvm\n"));
        if (pScriptVM) return;
        pScriptVM = new InstrumentScriptVM; // gig format specific extended script runner
    }

    /**
     *  Reacts on supported control change commands (e.g. pitch bend wheel,
     *  modulation wheel, aftertouch).
     *
     *  @param pEngineChannel - engine channel on which this event occured on
     *  @param itControlChangeEvent - controller, value and time stamp of the event
     */
    void Engine::ProcessControlChange (
        LinuxSampler::EngineChannel*  pEngineChannel,
        Pool<Event>::Iterator&        itControlChangeEvent
    ) {
        dmsg(4,("Engine::ContinuousController cc=%d v=%d\n", itControlChangeEvent->Param.CC.Controller, itControlChangeEvent->Param.CC.Value));

        EngineChannel* pChannel = dynamic_cast<EngineChannel*>(pEngineChannel);
        // handle the "control triggered" MIDI rule: a control change
        // event can trigger a new note on or note off event
        if (pChannel->pInstrument) {

            ::gig::MidiRule* rule;
            for (int i = 0 ; (rule = pChannel->pInstrument->GetMidiRule(i)) ; i++) {

                if (::gig::MidiRuleCtrlTrigger* ctrlTrigger =
                    dynamic_cast< ::gig::MidiRuleCtrlTrigger*>(rule)) {
                    if (itControlChangeEvent->Param.CC.Controller ==
                        ctrlTrigger->ControllerNumber) {

                        uint8_t oldCCValue = pChannel->ControllerTable[
                            itControlChangeEvent->Param.CC.Controller];
                        uint8_t newCCValue = itControlChangeEvent->Param.CC.Value;

                        for (int i = 0 ; i < ctrlTrigger->Triggers ; i++) {
                            ::gig::MidiRuleCtrlTrigger::trigger_t* pTrigger =
                                  &ctrlTrigger->pTriggers[i];

                            // check if the controller has passed the
                            // trigger point in the right direction
                            if ((pTrigger->Descending &&
                                 oldCCValue > pTrigger->TriggerPoint &&
                                 newCCValue <= pTrigger->TriggerPoint) ||
                                (!pTrigger->Descending &&
                                 oldCCValue < pTrigger->TriggerPoint &&
                                 newCCValue >= pTrigger->TriggerPoint)) {

                                RTList<Event>::Iterator itNewEvent = pGlobalEvents->allocAppend();
                                if (itNewEvent) {
                                    *itNewEvent = *itControlChangeEvent;
                                    itNewEvent->Param.Note.Key = pTrigger->Key;

                                    if (pTrigger->NoteOff || pTrigger->Velocity == 0) {
                                        itNewEvent->Type = Event::type_note_off;
                                        itNewEvent->Param.Note.Velocity = 100;

                                        ProcessNoteOff(pEngineChannel, itNewEvent);
                                    } else {
                                        itNewEvent->Type = Event::type_note_on;
                                        //TODO: if Velocity is 255, the triggered velocity should
                                        // depend on how fast the controller is moving
                                        itNewEvent->Param.Note.Velocity =
                                            pTrigger->Velocity == 255 ? 100 :
                                            pTrigger->Velocity;

                                        ProcessNoteOn(pEngineChannel, itNewEvent);
                                    }
                                }
                                else dmsg(1,("Event pool emtpy!\n"));
                            }
                        }
                    }
                }
            }
        }

        // update controller value in the engine channel's controller table
        pChannel->ControllerTable[itControlChangeEvent->Param.CC.Controller] = itControlChangeEvent->Param.CC.Value;

        ProcessHardcodedControllers(pEngineChannel, itControlChangeEvent);

        // handle FX send controllers
        ProcessFxSendControllers(pChannel, itControlChangeEvent);
    }

    void Engine::ProcessChannelPressure(LinuxSampler::EngineChannel* pEngineChannel, Pool<Event>::Iterator& itChannelPressureEvent) {
        // forward this to the CC routine, so it updates the current aftertouch value and may handle aftertouch trigger rules
        ProcessControlChange(pEngineChannel, itChannelPressureEvent);

        // if required: engine global aftertouch handling (apart from the per voice handling)
    }

    void Engine::ProcessPolyphonicKeyPressure(LinuxSampler::EngineChannel* pEngineChannel, Pool<Event>::Iterator& itNotePressureEvent) {
        // if required: engine global aftertouch handling (apart from the per voice handling)
    }

    DiskThread* Engine::CreateDiskThread() {
        return new DiskThread (
            iMaxDiskStreams,
            ((pAudioOutputDevice->MaxSamplesPerCycle() << CONFIG_MAX_PITCH) << 1) + 6, //FIXME: assuming stereo
            &instruments
        );
    }

    void Engine::TriggerNewVoices (
        LinuxSampler::EngineChannel* pEngineChannel,
        RTList<Event>::Iterator&     itNoteOnEvent,
        bool                         HandleKeyGroupConflicts
    ) {
        NoteIterator itNote = GetNotePool()->fromID(itNoteOnEvent->Param.Note.ID);
        if (!itNote) {
            dmsg(1,("gig::Engine: No Note object for triggering new voices!\n"));
            return;
        }

        EngineChannel* pChannel = static_cast<EngineChannel*>(pEngineChannel);

        // first, get total amount of required voices (dependant on amount of layers)
        // (using the note's MIDI note number instead of the MIDI event's one,
        //  because an instrument script might have modified the note number)
        ::gig::Region* pRegion = pChannel->pInstrument->GetRegion(itNote->cause.Param.Note.Key);
        if (!pRegion || RegionSuspended(pRegion))
            return;
        const int voicesRequired = pRegion->Layers;
        if (voicesRequired <= 0)
            return;

        // now launch the required amount of voices
        for (int i = 0; i < voicesRequired; i++) {
            VoiceIterator itNewVoice =
                LaunchVoice(pChannel, itNoteOnEvent, i, false, true, HandleKeyGroupConflicts);
            if (!itNewVoice) continue;
            itNewVoice.moveToEndOf(itNote->pActiveVoices);
        }
    }

    void Engine::TriggerReleaseVoices (
        LinuxSampler::EngineChannel*  pEngineChannel,
        RTList<Event>::Iterator&      itNoteOffEvent
    ) {
        NoteIterator itNote = GetNotePool()->fromID(itNoteOffEvent->Param.Note.ID);
        if (!itNote) {
            dmsg(1,("gig::Engine: No Note object for triggering new release voices!\n"));
            return;
        }

        EngineChannel* pChannel = static_cast<EngineChannel*>(pEngineChannel);
        MidiKey* pKey = &pChannel->pMIDIKeyInfo[itNoteOffEvent->Param.Note.Key];
        // first, get total amount of required voices (dependant on amount of layers)
        // (using the note's MIDI note number instead of the MIDI event's one,
        //  because an instrument script might have modified the note number)
        ::gig::Region* pRegion = pChannel->pInstrument->GetRegion(itNote->cause.Param.Note.Key);
        if (!pRegion)
            return;
        const int voicesRequired = pRegion->Layers;
        if (voicesRequired <= 0)
            return;

        // MIDI note-on velocity is used instead of note-off velocity
        itNoteOffEvent->Param.Note.Velocity = pKey->Velocity;

        // now launch the required amount of voices
        for (int i = 0; i < voicesRequired; i++) {
            VoiceIterator itNewVoice =
                LaunchVoice(pChannel, itNoteOffEvent, i, true, false, false); //FIXME: for the moment we don't perform voice stealing for release triggered samples
            if (!itNewVoice) continue;
            itNewVoice.moveToEndOf(itNote->pActiveVoices);
        }
    }

    Pool<Voice>::Iterator Engine::LaunchVoice (
        LinuxSampler::EngineChannel*  pEngineChannel,
        Pool<Event>::Iterator&        itNoteOnEvent,
        int                           iLayer,
        bool                          ReleaseTriggerVoice,
        bool                          VoiceStealing,
        bool                          HandleKeyGroupConflicts
    ) {
        NoteIterator itNote = GetNotePool()->fromID(itNoteOnEvent->Param.Note.ID);
        if (!itNote) {
            dmsg(1,("gig::Engine: No Note object for launching voices!\n"));
            return Pool<Voice>::Iterator();
        }

        EngineChannel* pChannel = static_cast<EngineChannel*>(pEngineChannel);
        // the note's MIDI note number might differ from the event's note number
        // because a script might have modified the note's note number
        int MIDIKey = itNoteOnEvent->Param.Note.Key;
        int NoteKey = itNote->cause.Param.Note.Key;
        //EngineChannel::MidiKey* pKey  = &pChannel->pMIDIKeyInfo[MIDIKey];
        ::gig::Region* pRegion = pChannel->pInstrument->GetRegion(NoteKey);

        // if nothing defined for this key
        if (!pRegion) return Pool<Voice>::Iterator(); // nothing to do

        int iKeyGroup = pRegion->KeyGroup;
        // only need to send a group event from the first voice in a layered region,
        // as all layers in a region always belongs to the same key group
        if (HandleKeyGroupConflicts && iLayer == 0) pChannel->HandleKeyGroupConflicts(iKeyGroup, itNoteOnEvent);

        Voice::type_t VoiceType = Voice::type_normal;

        // get current dimension values to select the right dimension region
        //TODO: for stolen voices this dimension region selection block is processed twice, this should be changed
        //FIXME: controller values for selecting the dimension region here are currently not sample accurate
        uint DimValues[8] = { 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;
                    break;
                case ::gig::dimension_velocity:
                    DimValues[i] = itNote->cause.Param.Note.Velocity;
                    break;
                case ::gig::dimension_channelaftertouch:
                    DimValues[i] = pChannel->ControllerTable[128];
                    break;
                case ::gig::dimension_releasetrigger:
                    VoiceType = (ReleaseTriggerVoice) ? Voice::type_release_trigger : (!iLayer) ? Voice::type_release_trigger_required : Voice::type_normal;
                    DimValues[i] = (uint) ReleaseTriggerVoice;
                    break;
                case ::gig::dimension_keyboard:
                    DimValues[i] = (uint) (pChannel->CurrentKeyDimension * pRegion->pDimensionDefinitions[i].zones);
                    break;
                case ::gig::dimension_roundrobin:
                    DimValues[i] = uint(*pChannel->pMIDIKeyInfo[MIDIKey].pRoundRobinIndex % pRegion->pDimensionDefinitions[i].zones); // RoundRobinIndex is incremented for each note on in this Region
                    break;
                case ::gig::dimension_roundrobinkeyboard:
                    DimValues[i] = uint(pChannel->RoundRobinIndex % pRegion->pDimensionDefinitions[i].zones); // RoundRobinIndex is incremented for each note on
                    break;
                case ::gig::dimension_random:
                    DimValues[i] = uint(Random() * pRegion->pDimensionDefinitions[i].zones);
                    break;
                case ::gig::dimension_smartmidi:
                    DimValues[i] = 0;
                    break;
                case ::gig::dimension_modwheel:
                    DimValues[i] = pChannel->ControllerTable[1];
                    break;
                case ::gig::dimension_breath:
                    DimValues[i] = pChannel->ControllerTable[2];
                    break;
                case ::gig::dimension_foot:
                    DimValues[i] = pChannel->ControllerTable[4];
                    break;
                case ::gig::dimension_portamentotime:
                    DimValues[i] = pChannel->ControllerTable[5];
                    break;
                case ::gig::dimension_effect1:
                    DimValues[i] = pChannel->ControllerTable[12];
                    break;
                case ::gig::dimension_effect2:
                    DimValues[i] = pChannel->ControllerTable[13];
                    break;
                case ::gig::dimension_genpurpose1:
                    DimValues[i] = pChannel->ControllerTable[16];
                    break;
                case ::gig::dimension_genpurpose2:
                    DimValues[i] = pChannel->ControllerTable[17];
                    break;
                case ::gig::dimension_genpurpose3:
                    DimValues[i] = pChannel->ControllerTable[18];
                    break;
                case ::gig::dimension_genpurpose4:
                    DimValues[i] = pChannel->ControllerTable[19];
                    break;
                case ::gig::dimension_sustainpedal:
                    DimValues[i] = pChannel->ControllerTable[64];
                    break;
                case ::gig::dimension_portamento:
                    DimValues[i] = pChannel->ControllerTable[65];
                    break;
                case ::gig::dimension_sostenutopedal:
                    DimValues[i] = pChannel->ControllerTable[66];
                    break;
                case ::gig::dimension_softpedal:
                    DimValues[i] = pChannel->ControllerTable[67];
                    break;
                case ::gig::dimension_genpurpose5:
                    DimValues[i] = pChannel->ControllerTable[80];
                    break;
                case ::gig::dimension_genpurpose6:
                    DimValues[i] = pChannel->ControllerTable[81];
                    break;
                case ::gig::dimension_genpurpose7:
                    DimValues[i] = pChannel->ControllerTable[82];
                    break;
                case ::gig::dimension_genpurpose8:
                    DimValues[i] = pChannel->ControllerTable[83];
                    break;
                case ::gig::dimension_effect1depth:
                    DimValues[i] = pChannel->ControllerTable[91];
                    break;
                case ::gig::dimension_effect2depth:
                    DimValues[i] = pChannel->ControllerTable[92];
                    break;
                case ::gig::dimension_effect3depth:
                    DimValues[i] = pChannel->ControllerTable[93];
                    break;
                case ::gig::dimension_effect4depth:
                    DimValues[i] = pChannel->ControllerTable[94];
                    break;
                case ::gig::dimension_effect5depth:
                    DimValues[i] = pChannel->ControllerTable[95];
                    break;
                case ::gig::dimension_none:
                    std::cerr << "gig::Engine::LaunchVoice() Error: dimension=none\n" << std::flush;
                    break;
                default:
                    std::cerr << "gig::Engine::LaunchVoice() Error: Unknown dimension\n" << std::flush;
            }
        }

        // return if this is a release triggered voice and there is no
        // releasetrigger dimension (could happen if an instrument
        // change has occured between note on and off)
        if (ReleaseTriggerVoice && !(VoiceType & Voice::type_release_trigger)) return Pool<Voice>::Iterator();

        ::gig::DimensionRegion* pDimRgn;
        if (!itNote->Format.Gig.DimMask) { // normal case ...
            pDimRgn = pRegion->GetDimensionRegionByValue(DimValues);
        } else { // some dimension zones were overridden (i.e. by instrument script) ...
            dmsg(3,("trigger with dim mask=%d val=%d\n", itNote->Format.Gig.DimMask, itNote->Format.Gig.DimBits));
            int index = pRegion->GetDimensionRegionIndexByValue(DimValues);
            index &= ~itNote->Format.Gig.DimMask;
            index |=  itNote->Format.Gig.DimBits & itNote->Format.Gig.DimMask;
            pDimRgn = pRegion->pDimensionRegions[index & 255];
        }
        if (!pDimRgn) return Pool<Voice>::Iterator(); // error (could not resolve dimension region)

        // no need to continue if sample is silent
        if (!pDimRgn->pSample || !pDimRgn->pSample->SamplesTotal) return Pool<Voice>::Iterator();
        
        dmsg(2,("sample -> \"%s\"\n", pDimRgn->pSample->pInfo->Name.c_str()));

        // allocate a new voice for the key
        Pool<Voice>::Iterator itNewVoice = GetVoicePool()->allocAppend();

        int res = InitNewVoice (
                pChannel, pDimRgn, itNoteOnEvent, VoiceType, iLayer,
                iKeyGroup, ReleaseTriggerVoice, VoiceStealing, itNewVoice
        );
        if (!res) return itNewVoice;

        return Pool<Voice>::Iterator(); // no free voice or error
    }

    bool Engine::DiskStreamSupported() {
        return true;
    }

    String Engine::Description() {
        return "GigaSampler Format Engine";
    }

    String Engine::Version() {
        String s = "$Revision$";
        return s.substr(11, s.size() - 13); // cut dollar signs, spaces and CVS macro keyword
    }

}} // namespace LinuxSampler::gig
1	schoenebeck	53	/***************************************************************************
2			* *
3			* LinuxSampler - modular, streaming capable sampler *
4			* *
5	persson	1644	* Copyright (C) 2003,2004 by Benno Senoner and Christian Schoenebeck *
6	persson	2072	* Copyright (C) 2005-2008 Christian Schoenebeck *
7			* Copyright (C) 2009-2010 Christian Schoenebeck and Grigor Iliev *
8	schoenebeck	53	* *
9			* This program is free software; you can redistribute it and/or modify *
10			* it under the terms of the GNU General Public License as published by *
11			* the Free Software Foundation; either version 2 of the License, or *
12			* (at your option) any later version. *
13			* *
14			* This program is distributed in the hope that it will be useful, *
15			* but WITHOUT ANY WARRANTY; without even the implied warranty of *
16			* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the *
17			* GNU General Public License for more details. *
18			* *
19			* You should have received a copy of the GNU General Public License *
20			* along with this program; if not, write to the Free Software *
21			* Foundation, Inc., 59 Temple Place, Suite 330, Boston, *
22			* MA 02111-1307 USA *
23			***************************************************************************/
24
25			#include "Engine.h"
26	iliev	2012	#include "EngineChannel.h"
27	schoenebeck	2600	#include "InstrumentScriptVM.h"
28	schoenebeck	53
29			namespace LinuxSampler { namespace gig {
30	iliev	2012	Engine::Format Engine::GetEngineFormat() { return GIG; }
31	schoenebeck	53
32	schoenebeck	2611	void Engine::CreateInstrumentScriptVM() {
33			dmsg(2,("gig::Engine created Giga format scriptvm\n"));
34			if (pScriptVM) return;
35			pScriptVM = new InstrumentScriptVM; // gig format specific extended script runner
36	schoenebeck	2600	}
37
38	schoenebeck	412	/**
39	iliev	2012	* Reacts on supported control change commands (e.g. pitch bend wheel,
40			* modulation wheel, aftertouch).
41	schoenebeck	412	*
42	iliev	2012	* @param pEngineChannel - engine channel on which this event occured on
43			* @param itControlChangeEvent - controller, value and time stamp of the event
44	schoenebeck	412	*/
45	iliev	2012	void Engine::ProcessControlChange (
46			LinuxSampler::EngineChannel* pEngineChannel,
47			Pool<Event>::Iterator& itControlChangeEvent
48			) {
49			dmsg(4,("Engine::ContinuousController cc=%d v=%d\n", itControlChangeEvent->Param.CC.Controller, itControlChangeEvent->Param.CC.Value));
50	persson	1039
51	iliev	2012	EngineChannel* pChannel = dynamic_cast<EngineChannel*>(pEngineChannel);
52			// handle the "control triggered" MIDI rule: a control change
53			// event can trigger a new note on or note off event
54			if (pChannel->pInstrument) {
55	schoenebeck	411
56	iliev	2012	::gig::MidiRule* rule;
57			for (int i = 0 ; (rule = pChannel->pInstrument->GetMidiRule(i)) ; i++) {
58	schoenebeck	411
59	iliev	2012	if (::gig::MidiRuleCtrlTrigger* ctrlTrigger =
60			dynamic_cast< ::gig::MidiRuleCtrlTrigger*>(rule)) {
61			if (itControlChangeEvent->Param.CC.Controller ==
62			ctrlTrigger->ControllerNumber) {
63	persson	1038
64	iliev	2012	uint8_t oldCCValue = pChannel->ControllerTable[
65			itControlChangeEvent->Param.CC.Controller];
66			uint8_t newCCValue = itControlChangeEvent->Param.CC.Value;
67	schoenebeck	53
68	iliev	2012	for (int i = 0 ; i < ctrlTrigger->Triggers ; i++) {
69			::gig::MidiRuleCtrlTrigger::trigger_t* pTrigger =
70			&ctrlTrigger->pTriggers[i];
71	schoenebeck	53
72	iliev	2012	// check if the controller has passed the
73			// trigger point in the right direction
74			if ((pTrigger->Descending &&
75			oldCCValue > pTrigger->TriggerPoint &&
76			newCCValue <= pTrigger->TriggerPoint) \|\|
77			(!pTrigger->Descending &&
78			oldCCValue < pTrigger->TriggerPoint &&
79			newCCValue >= pTrigger->TriggerPoint)) {
80	schoenebeck	53
81	iliev	2012	RTList<Event>::Iterator itNewEvent = pGlobalEvents->allocAppend();
82			if (itNewEvent) {
83			itNewEvent = itControlChangeEvent;
84			itNewEvent->Param.Note.Key = pTrigger->Key;
85	schoenebeck	53
86	iliev	2012	if (pTrigger->NoteOff \|\| pTrigger->Velocity == 0) {
87			itNewEvent->Type = Event::type_note_off;
88			itNewEvent->Param.Note.Velocity = 100;
89	schoenebeck	53
90	iliev	2012	ProcessNoteOff(pEngineChannel, itNewEvent);
91			} else {
92			itNewEvent->Type = Event::type_note_on;
93			//TODO: if Velocity is 255, the triggered velocity should
94			// depend on how fast the controller is moving
95			itNewEvent->Param.Note.Velocity =
96			pTrigger->Velocity == 255 ? 100 :
97			pTrigger->Velocity;
98	schoenebeck	53
99	iliev	2012	ProcessNoteOn(pEngineChannel, itNewEvent);
100			}
101			}
102			else dmsg(1,("Event pool emtpy!\n"));
103			}
104	schoenebeck	1321	}
105			}
106			}
107			}
108			}
109
110	iliev	2012	// update controller value in the engine channel's controller table
111			pChannel->ControllerTable[itControlChangeEvent->Param.CC.Controller] = itControlChangeEvent->Param.CC.Value;
112	schoenebeck	1321
113	iliev	2012	ProcessHardcodedControllers(pEngineChannel, itControlChangeEvent);
114	schoenebeck	1321
115	iliev	2012	// handle FX send controllers
116			ProcessFxSendControllers(pChannel, itControlChangeEvent);
117	schoenebeck	1321	}
118
119	schoenebeck	2559	void Engine::ProcessChannelPressure(LinuxSampler::EngineChannel* pEngineChannel, Pool<Event>::Iterator& itChannelPressureEvent) {
120	schoenebeck	3015	// forward this to the CC routine, so it updates the current aftertouch value and may handle aftertouch trigger rules
121			ProcessControlChange(pEngineChannel, itChannelPressureEvent);
122
123	schoenebeck	2559	// if required: engine global aftertouch handling (apart from the per voice handling)
124			}
125
126			void Engine::ProcessPolyphonicKeyPressure(LinuxSampler::EngineChannel* pEngineChannel, Pool<Event>::Iterator& itNotePressureEvent) {
127			// if required: engine global aftertouch handling (apart from the per voice handling)
128			}
129
130	iliev	2012	DiskThread* Engine::CreateDiskThread() {
131			return new DiskThread (
132			iMaxDiskStreams,
133			((pAudioOutputDevice->MaxSamplesPerCycle() << CONFIG_MAX_PITCH) << 1) + 6, //FIXME: assuming stereo
134			&instruments
135			);
136	schoenebeck	412	}
137
138	iliev	2012	void Engine::TriggerNewVoices (
139			LinuxSampler::EngineChannel* pEngineChannel,
140			RTList<Event>::Iterator& itNoteOnEvent,
141			bool HandleKeyGroupConflicts
142			) {
143	schoenebeck	3219	NoteIterator itNote = GetNotePool()->fromID(itNoteOnEvent->Param.Note.ID);
144			if (!itNote) {
145			dmsg(1,("gig::Engine: No Note object for triggering new voices!\n"));
146			return;
147			}
148
149	iliev	2012	EngineChannel* pChannel = static_cast<EngineChannel*>(pEngineChannel);
150	schoenebeck	3219
151	iliev	2012	// first, get total amount of required voices (dependant on amount of layers)
152	schoenebeck	3219	// (using the note's MIDI note number instead of the MIDI event's one,
153			// because an instrument script might have modified the note number)
154			::gig::Region* pRegion = pChannel->pInstrument->GetRegion(itNote->cause.Param.Note.Key);
155	schoenebeck	2879	if (!pRegion \|\| RegionSuspended(pRegion))
156			return;
157			const int voicesRequired = pRegion->Layers;
158			if (voicesRequired <= 0)
159			return;
160
161			// now launch the required amount of voices
162			for (int i = 0; i < voicesRequired; i++) {
163			VoiceIterator itNewVoice =
164	iliev	2012	LaunchVoice(pChannel, itNoteOnEvent, i, false, true, HandleKeyGroupConflicts);
165	schoenebeck	2879	if (!itNewVoice) continue;
166			itNewVoice.moveToEndOf(itNote->pActiveVoices);
167	schoenebeck	412	}
168	persson	438	}
169	schoenebeck	412
170	iliev	2012	void Engine::TriggerReleaseVoices (
171			LinuxSampler::EngineChannel* pEngineChannel,
172			RTList<Event>::Iterator& itNoteOffEvent
173			) {
174	schoenebeck	3219	NoteIterator itNote = GetNotePool()->fromID(itNoteOffEvent->Param.Note.ID);
175			if (!itNote) {
176			dmsg(1,("gig::Engine: No Note object for triggering new release voices!\n"));
177			return;
178			}
179
180	iliev	2012	EngineChannel* pChannel = static_cast<EngineChannel*>(pEngineChannel);
181			MidiKey* pKey = &pChannel->pMIDIKeyInfo[itNoteOffEvent->Param.Note.Key];
182			// first, get total amount of required voices (dependant on amount of layers)
183	schoenebeck	3219	// (using the note's MIDI note number instead of the MIDI event's one,
184			// because an instrument script might have modified the note number)
185			::gig::Region* pRegion = pChannel->pInstrument->GetRegion(itNote->cause.Param.Note.Key);
186	schoenebeck	2879	if (!pRegion)
187			return;
188			const int voicesRequired = pRegion->Layers;
189			if (voicesRequired <= 0)
190			return;
191	schoenebeck	53
192	schoenebeck	2879	// MIDI note-on velocity is used instead of note-off velocity
193			itNoteOffEvent->Param.Note.Velocity = pKey->Velocity;
194
195			// now launch the required amount of voices
196			for (int i = 0; i < voicesRequired; i++) {
197			VoiceIterator itNewVoice =
198	iliev	2012	LaunchVoice(pChannel, itNoteOffEvent, i, true, false, false); //FIXME: for the moment we don't perform voice stealing for release triggered samples
199	schoenebeck	2879	if (!itNewVoice) continue;
200			itNewVoice.moveToEndOf(itNote->pActiveVoices);
201	schoenebeck	53	}
202	schoenebeck	412	}
203
204	iliev	2012	Pool<Voice>::Iterator Engine::LaunchVoice (
205			LinuxSampler::EngineChannel* pEngineChannel,
206			Pool<Event>::Iterator& itNoteOnEvent,
207			int iLayer,
208			bool ReleaseTriggerVoice,
209			bool VoiceStealing,
210			bool HandleKeyGroupConflicts
211			) {
212	schoenebeck	3219	NoteIterator itNote = GetNotePool()->fromID(itNoteOnEvent->Param.Note.ID);
213			if (!itNote) {
214			dmsg(1,("gig::Engine: No Note object for launching voices!\n"));
215			return Pool<Voice>::Iterator();
216			}
217
218	iliev	2012	EngineChannel* pChannel = static_cast<EngineChannel*>(pEngineChannel);
219	schoenebeck	3219	// the note's MIDI note number might differ from the event's note number
220			// because a script might have modified the note's note number
221	iliev	2012	int MIDIKey = itNoteOnEvent->Param.Note.Key;
222	schoenebeck	3219	int NoteKey = itNote->cause.Param.Note.Key;
223	schoenebeck	2879	//EngineChannel::MidiKey* pKey = &pChannel->pMIDIKeyInfo[MIDIKey];
224	schoenebeck	3219	::gig::Region* pRegion = pChannel->pInstrument->GetRegion(NoteKey);
225	schoenebeck	53
226	schoenebeck	668	// if nothing defined for this key
227			if (!pRegion) return Pool<Voice>::Iterator(); // nothing to do
228
229	persson	2114	int iKeyGroup = pRegion->KeyGroup;
230			// only need to send a group event from the first voice in a layered region,
231			// as all layers in a region always belongs to the same key group
232			if (HandleKeyGroupConflicts && iLayer == 0) pChannel->HandleKeyGroupConflicts(iKeyGroup, itNoteOnEvent);
233	schoenebeck	669
234			Voice::type_t VoiceType = Voice::type_normal;
235
236			// get current dimension values to select the right dimension region
237			//TODO: for stolen voices this dimension region selection block is processed twice, this should be changed
238			//FIXME: controller values for selecting the dimension region here are currently not sample accurate
239			uint DimValues[8] = { 0 };
240			for (int i = pRegion->Dimensions - 1; i >= 0; i--) {
241			switch (pRegion->pDimensionDefinitions[i].dimension) {
242			case ::gig::dimension_samplechannel:
243			DimValues[i] = 0; //TODO: we currently ignore this dimension
244			break;
245			case ::gig::dimension_layer:
246			DimValues[i] = iLayer;
247			break;
248			case ::gig::dimension_velocity:
249	schoenebeck	3219	DimValues[i] = itNote->cause.Param.Note.Velocity;
250	schoenebeck	669	break;
251			case ::gig::dimension_channelaftertouch:
252	iliev	2012	DimValues[i] = pChannel->ControllerTable[128];
253	schoenebeck	669	break;
254			case ::gig::dimension_releasetrigger:
255			VoiceType = (ReleaseTriggerVoice) ? Voice::type_release_trigger : (!iLayer) ? Voice::type_release_trigger_required : Voice::type_normal;
256			DimValues[i] = (uint) ReleaseTriggerVoice;
257			break;
258			case ::gig::dimension_keyboard:
259	iliev	2012	DimValues[i] = (uint) (pChannel->CurrentKeyDimension * pRegion->pDimensionDefinitions[i].zones);
260	schoenebeck	669	break;
261			case ::gig::dimension_roundrobin:
262	persson	2043	DimValues[i] = uint(*pChannel->pMIDIKeyInfo[MIDIKey].pRoundRobinIndex % pRegion->pDimensionDefinitions[i].zones); // RoundRobinIndex is incremented for each note on in this Region
263	schoenebeck	669	break;
264	persson	2043	case ::gig::dimension_roundrobinkeyboard:
265			DimValues[i] = uint(pChannel->RoundRobinIndex % pRegion->pDimensionDefinitions[i].zones); // RoundRobinIndex is incremented for each note on
266			break;
267	schoenebeck	669	case ::gig::dimension_random:
268	persson	2072	DimValues[i] = uint(Random() * pRegion->pDimensionDefinitions[i].zones);
269	schoenebeck	669	break;
270	schoenebeck	2611	case ::gig::dimension_smartmidi:
271			DimValues[i] = 0;
272			break;
273	schoenebeck	669	case ::gig::dimension_modwheel:
274	iliev	2012	DimValues[i] = pChannel->ControllerTable[1];
275	schoenebeck	669	break;
276			case ::gig::dimension_breath:
277	iliev	2012	DimValues[i] = pChannel->ControllerTable[2];
278	schoenebeck	669	break;
279			case ::gig::dimension_foot:
280	iliev	2012	DimValues[i] = pChannel->ControllerTable[4];
281	schoenebeck	669	break;
282			case ::gig::dimension_portamentotime:
283	iliev	2012	DimValues[i] = pChannel->ControllerTable[5];
284	schoenebeck	669	break;
285			case ::gig::dimension_effect1:
286	iliev	2012	DimValues[i] = pChannel->ControllerTable[12];
287	schoenebeck	669	break;
288			case ::gig::dimension_effect2:
289	iliev	2012	DimValues[i] = pChannel->ControllerTable[13];
290	schoenebeck	669	break;
291			case ::gig::dimension_genpurpose1:
292	iliev	2012	DimValues[i] = pChannel->ControllerTable[16];
293	schoenebeck	669	break;
294			case ::gig::dimension_genpurpose2:
295	iliev	2012	DimValues[i] = pChannel->ControllerTable[17];
296	schoenebeck	669	break;
297			case ::gig::dimension_genpurpose3:
298	iliev	2012	DimValues[i] = pChannel->ControllerTable[18];
299	schoenebeck	669	break;
300			case ::gig::dimension_genpurpose4:
301	iliev	2012	DimValues[i] = pChannel->ControllerTable[19];
302	schoenebeck	669	break;
303			case ::gig::dimension_sustainpedal:
304	iliev	2012	DimValues[i] = pChannel->ControllerTable[64];
305	schoenebeck	669	break;
306			case ::gig::dimension_portamento:
307	iliev	2012	DimValues[i] = pChannel->ControllerTable[65];
308	schoenebeck	669	break;
309			case ::gig::dimension_sostenutopedal:
310	iliev	2012	DimValues[i] = pChannel->ControllerTable[66];
311	schoenebeck	669	break;
312			case ::gig::dimension_softpedal:
313	iliev	2012	DimValues[i] = pChannel->ControllerTable[67];
314	schoenebeck	669	break;
315			case ::gig::dimension_genpurpose5:
316	iliev	2012	DimValues[i] = pChannel->ControllerTable[80];
317	schoenebeck	669	break;
318			case ::gig::dimension_genpurpose6:
319	iliev	2012	DimValues[i] = pChannel->ControllerTable[81];
320	schoenebeck	669	break;
321			case ::gig::dimension_genpurpose7:
322	iliev	2012	DimValues[i] = pChannel->ControllerTable[82];
323	schoenebeck	669	break;
324			case ::gig::dimension_genpurpose8:
325	iliev	2012	DimValues[i] = pChannel->ControllerTable[83];
326	schoenebeck	669	break;
327			case ::gig::dimension_effect1depth:
328	iliev	2012	DimValues[i] = pChannel->ControllerTable[91];
329	schoenebeck	669	break;
330			case ::gig::dimension_effect2depth:
331	iliev	2012	DimValues[i] = pChannel->ControllerTable[92];
332	schoenebeck	669	break;
333			case ::gig::dimension_effect3depth:
334	iliev	2012	DimValues[i] = pChannel->ControllerTable[93];
335	schoenebeck	669	break;
336			case ::gig::dimension_effect4depth:
337	iliev	2012	DimValues[i] = pChannel->ControllerTable[94];
338	schoenebeck	669	break;
339			case ::gig::dimension_effect5depth:
340	iliev	2012	DimValues[i] = pChannel->ControllerTable[95];
341	schoenebeck	669	break;
342			case ::gig::dimension_none:
343			std::cerr << "gig::Engine::LaunchVoice() Error: dimension=none\n" << std::flush;
344			break;
345			default:
346			std::cerr << "gig::Engine::LaunchVoice() Error: Unknown dimension\n" << std::flush;
347			}
348			}
349	persson	1038
350			// return if this is a release triggered voice and there is no
351			// releasetrigger dimension (could happen if an instrument
352			// change has occured between note on and off)
353	persson	2115	if (ReleaseTriggerVoice && !(VoiceType & Voice::type_release_trigger)) return Pool<Voice>::Iterator();
354	persson	1038
355	schoenebeck	2600	::gig::DimensionRegion* pDimRgn;
356	schoenebeck	2879	if (!itNote->Format.Gig.DimMask) { // normal case ...
357	schoenebeck	2600	pDimRgn = pRegion->GetDimensionRegionByValue(DimValues);
358			} else { // some dimension zones were overridden (i.e. by instrument script) ...
359	schoenebeck	2879	dmsg(3,("trigger with dim mask=%d val=%d\n", itNote->Format.Gig.DimMask, itNote->Format.Gig.DimBits));
360	schoenebeck	2600	int index = pRegion->GetDimensionRegionIndexByValue(DimValues);
361	schoenebeck	2879	index &= ~itNote->Format.Gig.DimMask;
362			index \|= itNote->Format.Gig.DimBits & itNote->Format.Gig.DimMask;
363	schoenebeck	2600	pDimRgn = pRegion->pDimensionRegions[index & 255];
364			}
365	schoenebeck	2565	if (!pDimRgn) return Pool<Voice>::Iterator(); // error (could not resolve dimension region)
366	schoenebeck	669
367			// no need to continue if sample is silent
368			if (!pDimRgn->pSample \|\| !pDimRgn->pSample->SamplesTotal) return Pool<Voice>::Iterator();
369	schoenebeck	2927
370			dmsg(2,("sample -> \"%s\"\n", pDimRgn->pSample->pInfo->Name.c_str()));
371	schoenebeck	669
372	schoenebeck	233	// allocate a new voice for the key
373	schoenebeck	2879	Pool<Voice>::Iterator itNewVoice = GetVoicePool()->allocAppend();
374	schoenebeck	285
375	iliev	2027	int res = InitNewVoice (
376			pChannel, pDimRgn, itNoteOnEvent, VoiceType, iLayer,
377			iKeyGroup, ReleaseTriggerVoice, VoiceStealing, itNewVoice
378			);
379			if (!res) return itNewVoice;
380
381	schoenebeck	271	return Pool<Voice>::Iterator(); // no free voice or error
382	schoenebeck	233	}
383
384	schoenebeck	53	bool Engine::DiskStreamSupported() {
385			return true;
386			}
387
388			String Engine::Description() {
389	iliev	2012	return "GigaSampler Format Engine";
390	schoenebeck	53	}
391
392			String Engine::Version() {
393	schoenebeck	2494	String s = "$Revision$";
394	schoenebeck	123	return s.substr(11, s.size() - 13); // cut dollar signs, spaces and CVS macro keyword
395	schoenebeck	53	}
396
397			}} // namespace LinuxSampler::gig