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
    ) {
        EngineChannel* pChannel = static_cast<EngineChannel*>(pEngineChannel);
        // first, get total amount of required voices (dependant on amount of layers)
        ::gig::Region* pRegion = pChannel->pInstrument->GetRegion(itNoteOnEvent->Param.Note.Key);
        if (!pRegion || RegionSuspended(pRegion))
            return;
        const int voicesRequired = pRegion->Layers;
        if (voicesRequired <= 0)
            return;

        NoteIterator itNote = GetNotePool()->fromID(itNoteOnEvent->Param.Note.ID);
        if (!itNote) {
            dmsg(1,("gig::Engine: No Note object for triggering new voices!\n"));
            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
    ) {
        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)
        ::gig::Region* pRegion = pChannel->pInstrument->GetRegion(itNoteOffEvent->Param.Note.Key);
        if (!pRegion)
            return;
        const int voicesRequired = pRegion->Layers;
        if (voicesRequired <= 0)
            return;

        NoteIterator itNote = GetNotePool()->fromID(itNoteOffEvent->Param.Note.ID);
        if (!itNote) {
            dmsg(1,("gig::Engine: No Note object for triggering new release voices!\n"));
            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
    ) {
        EngineChannel* pChannel = static_cast<EngineChannel*>(pEngineChannel);
        int MIDIKey = itNoteOnEvent->Param.Note.Key;
        //EngineChannel::MidiKey* pKey  = &pChannel->pMIDIKeyInfo[MIDIKey];
        ::gig::Region* pRegion = pChannel->pInstrument->GetRegion(MIDIKey);

        // 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] = itNoteOnEvent->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();

        NoteIterator itNote = GetNotePool()->fromID(itNoteOnEvent->Param.Note.ID);

        ::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			EngineChannel* pChannel = static_cast<EngineChannel*>(pEngineChannel);
144			// first, get total amount of required voices (dependant on amount of layers)
145			::gig::Region* pRegion = pChannel->pInstrument->GetRegion(itNoteOnEvent->Param.Note.Key);
146	schoenebeck	2879	if (!pRegion \|\| RegionSuspended(pRegion))
147			return;
148			const int voicesRequired = pRegion->Layers;
149			if (voicesRequired <= 0)
150			return;
151
152			NoteIterator itNote = GetNotePool()->fromID(itNoteOnEvent->Param.Note.ID);
153			if (!itNote) {
154			dmsg(1,("gig::Engine: No Note object for triggering new voices!\n"));
155			return;
156			}
157
158			// now launch the required amount of voices
159			for (int i = 0; i < voicesRequired; i++) {
160			VoiceIterator itNewVoice =
161	iliev	2012	LaunchVoice(pChannel, itNoteOnEvent, i, false, true, HandleKeyGroupConflicts);
162	schoenebeck	2879	if (!itNewVoice) continue;
163			itNewVoice.moveToEndOf(itNote->pActiveVoices);
164	schoenebeck	412	}
165	persson	438	}
166	schoenebeck	412
167	iliev	2012	void Engine::TriggerReleaseVoices (
168			LinuxSampler::EngineChannel* pEngineChannel,
169			RTList<Event>::Iterator& itNoteOffEvent
170			) {
171			EngineChannel* pChannel = static_cast<EngineChannel*>(pEngineChannel);
172			MidiKey* pKey = &pChannel->pMIDIKeyInfo[itNoteOffEvent->Param.Note.Key];
173			// first, get total amount of required voices (dependant on amount of layers)
174			::gig::Region* pRegion = pChannel->pInstrument->GetRegion(itNoteOffEvent->Param.Note.Key);
175	schoenebeck	2879	if (!pRegion)
176			return;
177			const int voicesRequired = pRegion->Layers;
178			if (voicesRequired <= 0)
179			return;
180	schoenebeck	53
181	schoenebeck	2879	NoteIterator itNote = GetNotePool()->fromID(itNoteOffEvent->Param.Note.ID);
182			if (!itNote) {
183			dmsg(1,("gig::Engine: No Note object for triggering new release voices!\n"));
184			return;
185			}
186	schoenebeck	53
187	schoenebeck	2879	// MIDI note-on velocity is used instead of note-off velocity
188			itNoteOffEvent->Param.Note.Velocity = pKey->Velocity;
189
190			// now launch the required amount of voices
191			for (int i = 0; i < voicesRequired; i++) {
192			VoiceIterator itNewVoice =
193	iliev	2012	LaunchVoice(pChannel, itNoteOffEvent, i, true, false, false); //FIXME: for the moment we don't perform voice stealing for release triggered samples
194	schoenebeck	2879	if (!itNewVoice) continue;
195			itNewVoice.moveToEndOf(itNote->pActiveVoices);
196	schoenebeck	53	}
197	schoenebeck	412	}
198
199	iliev	2012	Pool<Voice>::Iterator Engine::LaunchVoice (
200			LinuxSampler::EngineChannel* pEngineChannel,
201			Pool<Event>::Iterator& itNoteOnEvent,
202			int iLayer,
203			bool ReleaseTriggerVoice,
204			bool VoiceStealing,
205			bool HandleKeyGroupConflicts
206			) {
207			EngineChannel* pChannel = static_cast<EngineChannel*>(pEngineChannel);
208			int MIDIKey = itNoteOnEvent->Param.Note.Key;
209	schoenebeck	2879	//EngineChannel::MidiKey* pKey = &pChannel->pMIDIKeyInfo[MIDIKey];
210	iliev	2012	::gig::Region* pRegion = pChannel->pInstrument->GetRegion(MIDIKey);
211	schoenebeck	53
212	schoenebeck	668	// if nothing defined for this key
213			if (!pRegion) return Pool<Voice>::Iterator(); // nothing to do
214
215	persson	2114	int iKeyGroup = pRegion->KeyGroup;
216			// only need to send a group event from the first voice in a layered region,
217			// as all layers in a region always belongs to the same key group
218			if (HandleKeyGroupConflicts && iLayer == 0) pChannel->HandleKeyGroupConflicts(iKeyGroup, itNoteOnEvent);
219	schoenebeck	669
220			Voice::type_t VoiceType = Voice::type_normal;
221
222			// get current dimension values to select the right dimension region
223			//TODO: for stolen voices this dimension region selection block is processed twice, this should be changed
224			//FIXME: controller values for selecting the dimension region here are currently not sample accurate
225			uint DimValues[8] = { 0 };
226			for (int i = pRegion->Dimensions - 1; i >= 0; i--) {
227			switch (pRegion->pDimensionDefinitions[i].dimension) {
228			case ::gig::dimension_samplechannel:
229			DimValues[i] = 0; //TODO: we currently ignore this dimension
230			break;
231			case ::gig::dimension_layer:
232			DimValues[i] = iLayer;
233			break;
234			case ::gig::dimension_velocity:
235			DimValues[i] = itNoteOnEvent->Param.Note.Velocity;
236			break;
237			case ::gig::dimension_channelaftertouch:
238	iliev	2012	DimValues[i] = pChannel->ControllerTable[128];
239	schoenebeck	669	break;
240			case ::gig::dimension_releasetrigger:
241			VoiceType = (ReleaseTriggerVoice) ? Voice::type_release_trigger : (!iLayer) ? Voice::type_release_trigger_required : Voice::type_normal;
242			DimValues[i] = (uint) ReleaseTriggerVoice;
243			break;
244			case ::gig::dimension_keyboard:
245	iliev	2012	DimValues[i] = (uint) (pChannel->CurrentKeyDimension * pRegion->pDimensionDefinitions[i].zones);
246	schoenebeck	669	break;
247			case ::gig::dimension_roundrobin:
248	persson	2043	DimValues[i] = uint(*pChannel->pMIDIKeyInfo[MIDIKey].pRoundRobinIndex % pRegion->pDimensionDefinitions[i].zones); // RoundRobinIndex is incremented for each note on in this Region
249	schoenebeck	669	break;
250	persson	2043	case ::gig::dimension_roundrobinkeyboard:
251			DimValues[i] = uint(pChannel->RoundRobinIndex % pRegion->pDimensionDefinitions[i].zones); // RoundRobinIndex is incremented for each note on
252			break;
253	schoenebeck	669	case ::gig::dimension_random:
254	persson	2072	DimValues[i] = uint(Random() * pRegion->pDimensionDefinitions[i].zones);
255	schoenebeck	669	break;
256	schoenebeck	2611	case ::gig::dimension_smartmidi:
257			DimValues[i] = 0;
258			break;
259	schoenebeck	669	case ::gig::dimension_modwheel:
260	iliev	2012	DimValues[i] = pChannel->ControllerTable[1];
261	schoenebeck	669	break;
262			case ::gig::dimension_breath:
263	iliev	2012	DimValues[i] = pChannel->ControllerTable[2];
264	schoenebeck	669	break;
265			case ::gig::dimension_foot:
266	iliev	2012	DimValues[i] = pChannel->ControllerTable[4];
267	schoenebeck	669	break;
268			case ::gig::dimension_portamentotime:
269	iliev	2012	DimValues[i] = pChannel->ControllerTable[5];
270	schoenebeck	669	break;
271			case ::gig::dimension_effect1:
272	iliev	2012	DimValues[i] = pChannel->ControllerTable[12];
273	schoenebeck	669	break;
274			case ::gig::dimension_effect2:
275	iliev	2012	DimValues[i] = pChannel->ControllerTable[13];
276	schoenebeck	669	break;
277			case ::gig::dimension_genpurpose1:
278	iliev	2012	DimValues[i] = pChannel->ControllerTable[16];
279	schoenebeck	669	break;
280			case ::gig::dimension_genpurpose2:
281	iliev	2012	DimValues[i] = pChannel->ControllerTable[17];
282	schoenebeck	669	break;
283			case ::gig::dimension_genpurpose3:
284	iliev	2012	DimValues[i] = pChannel->ControllerTable[18];
285	schoenebeck	669	break;
286			case ::gig::dimension_genpurpose4:
287	iliev	2012	DimValues[i] = pChannel->ControllerTable[19];
288	schoenebeck	669	break;
289			case ::gig::dimension_sustainpedal:
290	iliev	2012	DimValues[i] = pChannel->ControllerTable[64];
291	schoenebeck	669	break;
292			case ::gig::dimension_portamento:
293	iliev	2012	DimValues[i] = pChannel->ControllerTable[65];
294	schoenebeck	669	break;
295			case ::gig::dimension_sostenutopedal:
296	iliev	2012	DimValues[i] = pChannel->ControllerTable[66];
297	schoenebeck	669	break;
298			case ::gig::dimension_softpedal:
299	iliev	2012	DimValues[i] = pChannel->ControllerTable[67];
300	schoenebeck	669	break;
301			case ::gig::dimension_genpurpose5:
302	iliev	2012	DimValues[i] = pChannel->ControllerTable[80];
303	schoenebeck	669	break;
304			case ::gig::dimension_genpurpose6:
305	iliev	2012	DimValues[i] = pChannel->ControllerTable[81];
306	schoenebeck	669	break;
307			case ::gig::dimension_genpurpose7:
308	iliev	2012	DimValues[i] = pChannel->ControllerTable[82];
309	schoenebeck	669	break;
310			case ::gig::dimension_genpurpose8:
311	iliev	2012	DimValues[i] = pChannel->ControllerTable[83];
312	schoenebeck	669	break;
313			case ::gig::dimension_effect1depth:
314	iliev	2012	DimValues[i] = pChannel->ControllerTable[91];
315	schoenebeck	669	break;
316			case ::gig::dimension_effect2depth:
317	iliev	2012	DimValues[i] = pChannel->ControllerTable[92];
318	schoenebeck	669	break;
319			case ::gig::dimension_effect3depth:
320	iliev	2012	DimValues[i] = pChannel->ControllerTable[93];
321	schoenebeck	669	break;
322			case ::gig::dimension_effect4depth:
323	iliev	2012	DimValues[i] = pChannel->ControllerTable[94];
324	schoenebeck	669	break;
325			case ::gig::dimension_effect5depth:
326	iliev	2012	DimValues[i] = pChannel->ControllerTable[95];
327	schoenebeck	669	break;
328			case ::gig::dimension_none:
329			std::cerr << "gig::Engine::LaunchVoice() Error: dimension=none\n" << std::flush;
330			break;
331			default:
332			std::cerr << "gig::Engine::LaunchVoice() Error: Unknown dimension\n" << std::flush;
333			}
334			}
335	persson	1038
336			// return if this is a release triggered voice and there is no
337			// releasetrigger dimension (could happen if an instrument
338			// change has occured between note on and off)
339	persson	2115	if (ReleaseTriggerVoice && !(VoiceType & Voice::type_release_trigger)) return Pool<Voice>::Iterator();
340	persson	1038
341	schoenebeck	2879	NoteIterator itNote = GetNotePool()->fromID(itNoteOnEvent->Param.Note.ID);
342
343	schoenebeck	2600	::gig::DimensionRegion* pDimRgn;
344	schoenebeck	2879	if (!itNote->Format.Gig.DimMask) { // normal case ...
345	schoenebeck	2600	pDimRgn = pRegion->GetDimensionRegionByValue(DimValues);
346			} else { // some dimension zones were overridden (i.e. by instrument script) ...
347	schoenebeck	2879	dmsg(3,("trigger with dim mask=%d val=%d\n", itNote->Format.Gig.DimMask, itNote->Format.Gig.DimBits));
348	schoenebeck	2600	int index = pRegion->GetDimensionRegionIndexByValue(DimValues);
349	schoenebeck	2879	index &= ~itNote->Format.Gig.DimMask;
350			index \|= itNote->Format.Gig.DimBits & itNote->Format.Gig.DimMask;
351	schoenebeck	2600	pDimRgn = pRegion->pDimensionRegions[index & 255];
352			}
353	schoenebeck	2565	if (!pDimRgn) return Pool<Voice>::Iterator(); // error (could not resolve dimension region)
354	schoenebeck	669
355			// no need to continue if sample is silent
356			if (!pDimRgn->pSample \|\| !pDimRgn->pSample->SamplesTotal) return Pool<Voice>::Iterator();
357	schoenebeck	2927
358			dmsg(2,("sample -> \"%s\"\n", pDimRgn->pSample->pInfo->Name.c_str()));
359	schoenebeck	669
360	schoenebeck	233	// allocate a new voice for the key
361	schoenebeck	2879	Pool<Voice>::Iterator itNewVoice = GetVoicePool()->allocAppend();
362	schoenebeck	285
363	iliev	2027	int res = InitNewVoice (
364			pChannel, pDimRgn, itNoteOnEvent, VoiceType, iLayer,
365			iKeyGroup, ReleaseTriggerVoice, VoiceStealing, itNewVoice
366			);
367			if (!res) return itNewVoice;
368
369	schoenebeck	271	return Pool<Voice>::Iterator(); // no free voice or error
370	schoenebeck	233	}
371
372	schoenebeck	53	bool Engine::DiskStreamSupported() {
373			return true;
374			}
375
376			String Engine::Description() {
377	iliev	2012	return "GigaSampler Format Engine";
378	schoenebeck	53	}
379
380			String Engine::Version() {
381	schoenebeck	2494	String s = "$Revision$";
382	schoenebeck	123	return s.substr(11, s.size() - 13); // cut dollar signs, spaces and CVS macro keyword
383	schoenebeck	53	}
384
385			}} // namespace LinuxSampler::gig