/[svn]/linuxsampler/trunk/src/engines/gig/Engine.cpp
ViewVC logotype

Diff of /linuxsampler/trunk/src/engines/gig/Engine.cpp

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 53 by schoenebeck, Mon Apr 26 17:15:51 2004 UTC revision 293 by schoenebeck, Mon Oct 25 15:14:27 2004 UTC
# Line 2  Line 2 
2   *                                                                         *   *                                                                         *
3   *   LinuxSampler - modular, streaming capable sampler                     *   *   LinuxSampler - modular, streaming capable sampler                     *
4   *                                                                         *   *                                                                         *
5   *   Copyright (C) 2003 by Benno Senoner and Christian Schoenebeck         *   *   Copyright (C) 2003, 2004 by Benno Senoner and Christian Schoenebeck   *
6   *                                                                         *   *                                                                         *
7   *   This program is free software; you can redistribute it and/or modify  *   *   This program is free software; you can redistribute it and/or modify  *
8   *   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  *
# Line 23  Line 23 
23  #include <sstream>  #include <sstream>
24  #include "DiskThread.h"  #include "DiskThread.h"
25  #include "Voice.h"  #include "Voice.h"
26    #include "EGADSR.h"
27    
28  #include "Engine.h"  #include "Engine.h"
29    
# Line 37  namespace LinuxSampler { namespace gig { Line 38  namespace LinuxSampler { namespace gig {
38          pAudioOutputDevice = NULL;          pAudioOutputDevice = NULL;
39          pDiskThread        = NULL;          pDiskThread        = NULL;
40          pEventGenerator    = NULL;          pEventGenerator    = NULL;
41          pEventQueue        = new RingBuffer<Event>(MAX_EVENTS_PER_FRAGMENT);          pSysexBuffer       = new RingBuffer<uint8_t>(SYSEX_BUFFER_SIZE, 0);
42          pEventPool         = new RTELMemoryPool<Event>(MAX_EVENTS_PER_FRAGMENT);          pEventQueue        = new RingBuffer<Event>(MAX_EVENTS_PER_FRAGMENT, 0);
43          pVoicePool         = new RTELMemoryPool<Voice>(MAX_AUDIO_VOICES);          pEventPool         = new Pool<Event>(MAX_EVENTS_PER_FRAGMENT);
44          pActiveKeys        = new RTELMemoryPool<uint>(128);          pVoicePool         = new Pool<Voice>(MAX_AUDIO_VOICES);
45          pEvents            = new RTEList<Event>(pEventPool);          pActiveKeys        = new Pool<uint>(128);
46          pCCEvents          = new RTEList<Event>(pEventPool);          pVoiceStealingQueue = new RTList<Event>(pEventPool);
47            pEvents            = new RTList<Event>(pEventPool);
48            pCCEvents          = new RTList<Event>(pEventPool);
49          for (uint i = 0; i < Event::destination_count; i++) {          for (uint i = 0; i < Event::destination_count; i++) {
50              pSynthesisEvents[i] = new RTEList<Event>(pEventPool);              pSynthesisEvents[i] = new RTList<Event>(pEventPool);
51          }          }
52          for (uint i = 0; i < 128; i++) {          for (uint i = 0; i < 128; i++) {
53              pMIDIKeyInfo[i].pActiveVoices = new RTEList<Voice>(pVoicePool);              pMIDIKeyInfo[i].pActiveVoices  = new RTList<Voice>(pVoicePool);
54              pMIDIKeyInfo[i].KeyPressed    = false;              pMIDIKeyInfo[i].KeyPressed     = false;
55              pMIDIKeyInfo[i].Active        = false;              pMIDIKeyInfo[i].Active         = false;
56              pMIDIKeyInfo[i].pSelf         = NULL;              pMIDIKeyInfo[i].ReleaseTrigger = false;
57              pMIDIKeyInfo[i].pEvents       = new RTEList<Event>(pEventPool);              pMIDIKeyInfo[i].pEvents        = new RTList<Event>(pEventPool);
58          }          }
59          for (Voice* pVoice = pVoicePool->alloc(); pVoice; pVoice = pVoicePool->alloc()) {          for (RTList<Voice>::Iterator iterVoice = pVoicePool->allocAppend(); iterVoice == pVoicePool->last(); iterVoice = pVoicePool->allocAppend()) {
60              pVoice->SetEngine(this);              iterVoice->SetEngine(this);
61          }          }
62          pVoicePool->clear();          pVoicePool->clear();
63    
64          pSynthesisParameters[0] = NULL; // we allocate when an audio device is connected          pSynthesisParameters[0] = NULL; // we allocate when an audio device is connected
65            pBasicFilterParameters  = NULL;
66            pMainFilterParameters   = NULL;
67    
68            InstrumentIdx = -1;
69            InstrumentStat = -1;
70    
71            AudioDeviceChannelLeft  = -1;
72            AudioDeviceChannelRight = -1;
73    
74          ResetInternal();          ResetInternal();
75      }      }
# Line 84  namespace LinuxSampler { namespace gig { Line 95  namespace LinuxSampler { namespace gig {
95          if (pEventPool)  delete pEventPool;          if (pEventPool)  delete pEventPool;
96          if (pVoicePool)  delete pVoicePool;          if (pVoicePool)  delete pVoicePool;
97          if (pActiveKeys) delete pActiveKeys;          if (pActiveKeys) delete pActiveKeys;
98            if (pSysexBuffer) delete pSysexBuffer;
99          if (pEventGenerator) delete pEventGenerator;          if (pEventGenerator) delete pEventGenerator;
100            if (pMainFilterParameters) delete[] pMainFilterParameters;
101            if (pBasicFilterParameters) delete[] pBasicFilterParameters;
102          if (pSynthesisParameters[0]) delete[] pSynthesisParameters[0];          if (pSynthesisParameters[0]) delete[] pSynthesisParameters[0];
103            if (pVoiceStealingQueue) delete pVoiceStealingQueue;
104      }      }
105    
106      void Engine::Enable() {      void Engine::Enable() {
107          dmsg(3,("gig::Engine: enabling\n"));          dmsg(3,("gig::Engine: enabling\n"));
108          EngineDisabled.PushAndUnlock(false, 2); // set condition object 'EngineDisabled' to false (wait max. 2s)          EngineDisabled.PushAndUnlock(false, 2); // set condition object 'EngineDisabled' to false (wait max. 2s)
109          dmsg(1,("gig::Engine: enabled (val=%d)\n", EngineDisabled.GetUnsafe()));          dmsg(3,("gig::Engine: enabled (val=%d)\n", EngineDisabled.GetUnsafe()));
110      }      }
111    
112      void Engine::Disable() {      void Engine::Disable() {
# Line 142  namespace LinuxSampler { namespace gig { Line 157  namespace LinuxSampler { namespace gig {
157          SustainPedal        = false;          SustainPedal        = false;
158          ActiveVoiceCount    = 0;          ActiveVoiceCount    = 0;
159          ActiveVoiceCountMax = 0;          ActiveVoiceCountMax = 0;
160            GlobalVolume        = 1.0;
161    
162            // reset voice stealing parameters
163            itLastStolenVoice = RTList<Voice>::Iterator();
164            iuiLastStolenKey  = RTList<uint>::Iterator();
165            pVoiceStealingQueue->clear();
166    
167            // reset to normal chromatic scale (means equal temper)
168            memset(&ScaleTuning[0], 0x00, 12);
169    
170          // set all MIDI controller values to zero          // set all MIDI controller values to zero
171          memset(ControllerTable, 0x00, 128);          memset(ControllerTable, 0x00, 128);
# Line 150  namespace LinuxSampler { namespace gig { Line 174  namespace LinuxSampler { namespace gig {
174          for (uint i = 0; i < 128; i++) {          for (uint i = 0; i < 128; i++) {
175              pMIDIKeyInfo[i].pActiveVoices->clear();              pMIDIKeyInfo[i].pActiveVoices->clear();
176              pMIDIKeyInfo[i].pEvents->clear();              pMIDIKeyInfo[i].pEvents->clear();
177              pMIDIKeyInfo[i].KeyPressed = false;              pMIDIKeyInfo[i].KeyPressed     = false;
178              pMIDIKeyInfo[i].Active     = false;              pMIDIKeyInfo[i].Active         = false;
179              pMIDIKeyInfo[i].pSelf      = NULL;              pMIDIKeyInfo[i].ReleaseTrigger = false;
180                pMIDIKeyInfo[i].itSelf         = Pool<uint>::Iterator();
181          }          }
182    
183            // reset all key groups
184            map<uint,uint*>::iterator iter = ActiveKeyGroups.begin();
185            for (; iter != ActiveKeyGroups.end(); iter++) iter->second = NULL;
186    
187          // reset all voices          // reset all voices
188          for (Voice* pVoice = pVoicePool->alloc(); pVoice; pVoice = pVoicePool->alloc()) {          for (RTList<Voice>::Iterator iterVoice = pVoicePool->allocAppend(); iterVoice == pVoicePool->last(); iterVoice = pVoicePool->allocAppend()) {
189              pVoice->Reset();              iterVoice->Reset();
190          }          }
191          pVoicePool->clear();          pVoicePool->clear();
192    
# Line 191  namespace LinuxSampler { namespace gig { Line 220  namespace LinuxSampler { namespace gig {
220              Instruments.HandBack(pInstrument, this);              Instruments.HandBack(pInstrument, this);
221          }          }
222    
223            InstrumentFile = FileName;
224            InstrumentIdx = Instrument;
225            InstrumentStat = 0;
226    
227            // delete all key groups
228            ActiveKeyGroups.clear();
229    
230          // request gig instrument from instrument manager          // request gig instrument from instrument manager
231          try {          try {
232              instrument_id_t instrid;              instrument_id_t instrid;
# Line 198  namespace LinuxSampler { namespace gig { Line 234  namespace LinuxSampler { namespace gig {
234              instrid.iInstrument = Instrument;              instrid.iInstrument = Instrument;
235              pInstrument = Instruments.Borrow(instrid, this);              pInstrument = Instruments.Borrow(instrid, this);
236              if (!pInstrument) {              if (!pInstrument) {
237                    InstrumentStat = -1;
238                  dmsg(1,("no instrument loaded!!!\n"));                  dmsg(1,("no instrument loaded!!!\n"));
239                  exit(EXIT_FAILURE);                  exit(EXIT_FAILURE);
240              }              }
241          }          }
242          catch (RIFF::Exception e) {          catch (RIFF::Exception e) {
243                InstrumentStat = -2;
244              String msg = "gig::Engine error: Failed to load instrument, cause: " + e.Message;              String msg = "gig::Engine error: Failed to load instrument, cause: " + e.Message;
245              throw LinuxSamplerException(msg);              throw LinuxSamplerException(msg);
246          }          }
247          catch (InstrumentResourceManagerException e) {          catch (InstrumentResourceManagerException e) {
248                InstrumentStat = -3;
249              String msg = "gig::Engine error: Failed to load instrument, cause: " + e.Message();              String msg = "gig::Engine error: Failed to load instrument, cause: " + e.Message();
250              throw LinuxSamplerException(msg);              throw LinuxSamplerException(msg);
251          }          }
252          catch (...) {          catch (...) {
253                InstrumentStat = -4;
254              throw LinuxSamplerException("gig::Engine error: Failed to load instrument, cause: Unknown exception while trying to parse gig file.");              throw LinuxSamplerException("gig::Engine error: Failed to load instrument, cause: Unknown exception while trying to parse gig file.");
255          }          }
256    
257            // rebuild ActiveKeyGroups map with key groups of current instrument
258            for (::gig::Region* pRegion = pInstrument->GetFirstRegion(); pRegion; pRegion = pInstrument->GetNextRegion())
259                if (pRegion->KeyGroup) ActiveKeyGroups[pRegion->KeyGroup] = NULL;
260    
261            InstrumentStat = 100;
262    
263          // inform audio driver for the need of two channels          // inform audio driver for the need of two channels
264          try {          try {
265              if (pAudioOutputDevice) pAudioOutputDevice->AcquireChannels(2); // gig Engine only stereo              if (pAudioOutputDevice) pAudioOutputDevice->AcquireChannels(2); // gig Engine only stereo
# Line 243  namespace LinuxSampler { namespace gig { Line 289  namespace LinuxSampler { namespace gig {
289       * update process was completed, so we can continue with playback.       * update process was completed, so we can continue with playback.
290       */       */
291      void Engine::ResourceUpdated(::gig::Instrument* pOldResource, ::gig::Instrument* pNewResource, void* pUpdateArg) {      void Engine::ResourceUpdated(::gig::Instrument* pOldResource, ::gig::Instrument* pNewResource, void* pUpdateArg) {
292          this->pInstrument = pNewResource;          this->pInstrument = pNewResource; //TODO: there are couple of engine parameters we should update here as well if the instrument was updated (see LoadInstrument())
293          Enable();          Enable();
294      }      }
295    
# Line 261  namespace LinuxSampler { namespace gig { Line 307  namespace LinuxSampler { namespace gig {
307              throw LinuxSamplerException(msg);              throw LinuxSamplerException(msg);
308          }          }
309    
310            this->AudioDeviceChannelLeft  = 0;
311            this->AudioDeviceChannelRight = 1;
312            this->pOutputLeft             = pAudioOutputDevice->Channel(0)->Buffer();
313            this->pOutputRight            = pAudioOutputDevice->Channel(1)->Buffer();
314            this->MaxSamplesPerCycle      = pAudioOutputDevice->MaxSamplesPerCycle();
315            this->SampleRate              = pAudioOutputDevice->SampleRate();
316    
317            // FIXME: audio drivers with varying fragment sizes might be a problem here
318            MaxFadeOutPos = MaxSamplesPerCycle - int(double(SampleRate) * EG_MIN_RELEASE_TIME) - 1;
319            if (MaxFadeOutPos < 0)
320                throw LinuxSamplerException("EG_MIN_RELEASE_TIME in EGADSR.h to big for current audio fragment size / sampling rate!");
321    
322          // (re)create disk thread          // (re)create disk thread
323          if (this->pDiskThread) {          if (this->pDiskThread) {
324              this->pDiskThread->StopThread();              this->pDiskThread->StopThread();
# Line 272  namespace LinuxSampler { namespace gig { Line 330  namespace LinuxSampler { namespace gig {
330              exit(EXIT_FAILURE);              exit(EXIT_FAILURE);
331          }          }
332    
333          for (Voice* pVoice = pVoicePool->alloc(); pVoice; pVoice = pVoicePool->alloc()) {          for (RTList<Voice>::Iterator iterVoice = pVoicePool->allocAppend(); iterVoice == pVoicePool->last(); iterVoice = pVoicePool->allocAppend()) {
334              pVoice->pDiskThread = this->pDiskThread;              iterVoice->pDiskThread = this->pDiskThread;
             pVoice->SetOutput(pAudioOut);  
335              dmsg(3,("d"));              dmsg(3,("d"));
336          }          }
337          pVoicePool->clear();          pVoicePool->clear();
# Line 289  namespace LinuxSampler { namespace gig { Line 346  namespace LinuxSampler { namespace gig {
346          for (int dst = 1; dst < Event::destination_count; dst++)          for (int dst = 1; dst < Event::destination_count; dst++)
347              pSynthesisParameters[dst] = pSynthesisParameters[dst - 1] + pAudioOut->MaxSamplesPerCycle();              pSynthesisParameters[dst] = pSynthesisParameters[dst - 1] + pAudioOut->MaxSamplesPerCycle();
348    
349            // (re)allocate biquad filter parameter sequence
350            if (pBasicFilterParameters) delete[] pBasicFilterParameters;
351            if (pMainFilterParameters)  delete[] pMainFilterParameters;
352            pBasicFilterParameters = new biquad_param_t[pAudioOut->MaxSamplesPerCycle()];
353            pMainFilterParameters  = new biquad_param_t[pAudioOut->MaxSamplesPerCycle()];
354    
355          dmsg(1,("Starting disk thread..."));          dmsg(1,("Starting disk thread..."));
356          pDiskThread->StartThread();          pDiskThread->StartThread();
357          dmsg(1,("OK\n"));          dmsg(1,("OK\n"));
358    
359          for (Voice* pVoice = pVoicePool->first(); pVoice; pVoice = pVoicePool->next()) {          for (RTList<Voice>::Iterator iterVoice = pVoicePool->allocAppend(); iterVoice == pVoicePool->last(); iterVoice = pVoicePool->allocAppend()) {
360              if (!pVoice->pDiskThread) {              if (!iterVoice->pDiskThread) {
361                  dmsg(0,("Engine -> voice::trigger: !pDiskThread\n"));                  dmsg(0,("Engine -> voice::trigger: !pDiskThread\n"));
362                  exit(EXIT_FAILURE);                  exit(EXIT_FAILURE);
363              }              }
# Line 306  namespace LinuxSampler { namespace gig { Line 369  namespace LinuxSampler { namespace gig {
369              AudioOutputDevice* olddevice = pAudioOutputDevice;              AudioOutputDevice* olddevice = pAudioOutputDevice;
370              pAudioOutputDevice = NULL;              pAudioOutputDevice = NULL;
371              olddevice->Disconnect(this);              olddevice->Disconnect(this);
372                AudioDeviceChannelLeft  = -1;
373                AudioDeviceChannelRight = -1;
374          }          }
375      }      }
376    
# Line 333  namespace LinuxSampler { namespace gig { Line 398  namespace LinuxSampler { namespace gig {
398          }          }
399    
400    
401            // update time of start and end of this audio fragment (as events' time stamps relate to this)
402            pEventGenerator->UpdateFragmentTime(Samples);
403    
404    
405          // empty the event lists for the new fragment          // empty the event lists for the new fragment
406          pEvents->clear();          pEvents->clear();
407          pCCEvents->clear();          pCCEvents->clear();
408          for (uint i = 0; i < Event::destination_count; i++) {          for (uint i = 0; i < Event::destination_count; i++) {
409              pSynthesisEvents[i]->clear();              pSynthesisEvents[i]->clear();
410          }          }
411            {
412          // read and copy events from input queue              RTList<uint>::Iterator iuiKey = pActiveKeys->first();
413          Event event = pEventGenerator->CreateEvent();              RTList<uint>::Iterator end    = pActiveKeys->end();
414          while (true) {              for(; iuiKey != end; ++iuiKey) {
415              if (!pEventQueue->pop(&event)) break;                  pMIDIKeyInfo[*iuiKey].pEvents->clear(); // free all events on the key
416              pEvents->alloc_assign(event);              }
417          }          }
418    
419    
420          // update time of start and end of this audio fragment (as events' time stamps relate to this)          // get all events from the input event queue which belong to the current fragment
421          pEventGenerator->UpdateFragmentTime(Samples);          {
422                RingBuffer<Event>::NonVolatileReader eventQueueReader = pEventQueue->get_non_volatile_reader();
423                Event* pEvent;
424                while (true) {
425                    // get next event from input event queue
426                    if (!(pEvent = eventQueueReader.pop())) break;
427                    // if younger event reached, ignore that and all subsequent ones for now
428                    if (pEvent->FragmentPos() >= Samples) {
429                        eventQueueReader--;
430                        dmsg(2,("Younger Event, pos=%d ,Samples=%d!\n",pEvent->FragmentPos(),Samples));
431                        pEvent->ResetFragmentPos();
432                        break;
433                    }
434                    // copy event to internal event list
435                    if (pEvents->poolIsEmpty()) {
436                        dmsg(1,("Event pool emtpy!\n"));
437                        break;
438                    }
439                    *pEvents->allocAppend() = *pEvent;
440                }
441                eventQueueReader.free(); // free all copied events from input queue
442            }
443    
444    
445          // process events          // process events
446          Event* pNextEvent = pEvents->first();          {
447          while (pNextEvent) {              RTList<Event>::Iterator itEvent = pEvents->first();
448              Event* pEvent = pNextEvent;              RTList<Event>::Iterator end     = pEvents->end();
449              pEvents->set_current(pEvent);              for (; itEvent != end; ++itEvent) {
450              pNextEvent = pEvents->next();                  switch (itEvent->Type) {
451              switch (pEvent->Type) {                      case Event::type_note_on:
452                  case Event::type_note_on:                          dmsg(5,("Engine: Note on received\n"));
453                      dmsg(5,("Audio Thread: Note on received\n"));                          ProcessNoteOn(itEvent);
454                      ProcessNoteOn(pEvent);                          break;
455                      break;                      case Event::type_note_off:
456                  case Event::type_note_off:                          dmsg(5,("Engine: Note off received\n"));
457                      dmsg(5,("Audio Thread: Note off received\n"));                          ProcessNoteOff(itEvent);
458                      ProcessNoteOff(pEvent);                          break;
459                      break;                      case Event::type_control_change:
460                  case Event::type_control_change:                          dmsg(5,("Engine: MIDI CC received\n"));
461                      dmsg(5,("Audio Thread: MIDI CC received\n"));                          ProcessControlChange(itEvent);
462                      ProcessControlChange(pEvent);                          break;
463                      break;                      case Event::type_pitchbend:
464                  case Event::type_pitchbend:                          dmsg(5,("Engine: Pitchbend received\n"));
465                      dmsg(5,("Audio Thread: Pitchbend received\n"));                          ProcessPitchbend(itEvent);
466                      ProcessPitchbend(pEvent);                          break;
467                      break;                      case Event::type_sysex:
468                            dmsg(5,("Engine: Sysex received\n"));
469                            ProcessSysex(itEvent);
470                            break;
471                    }
472              }              }
473          }          }
474    
475    
         // render audio from all active voices  
476          int active_voices = 0;          int active_voices = 0;
477          uint* piKey = pActiveKeys->first();  
478          while (piKey) { // iterate through all active keys          // render audio from all active voices
479              midi_key_info_t* pKey = &pMIDIKeyInfo[*piKey];          {
480              pActiveKeys->set_current(piKey);              RTList<uint>::Iterator iuiKey = pActiveKeys->first();
481              piKey = pActiveKeys->next();              RTList<uint>::Iterator end    = pActiveKeys->end();
482                while (iuiKey != end) { // iterate through all active keys
483              Voice* pVoiceNext = pKey->pActiveVoices->first();                  midi_key_info_t* pKey = &pMIDIKeyInfo[*iuiKey];
484              while (pVoiceNext) { // iterate through all voices on this key                  ++iuiKey;
485                  // already get next voice on key  
486                  Voice* pVoice = pVoiceNext;                  RTList<Voice>::Iterator itVoice     = pKey->pActiveVoices->first();
487                  pKey->pActiveVoices->set_current(pVoice);                  RTList<Voice>::Iterator itVoicesEnd = pKey->pActiveVoices->end();
488                  pVoiceNext = pKey->pActiveVoices->next();                  for (; itVoice != itVoicesEnd; ++itVoice) { // iterate through all voices on this key
489                        // now render current voice
490                  // now render current voice                      itVoice->Render(Samples);
491                  pVoice->Render(Samples);                      if (itVoice->IsActive()) active_voices++; // still active
492                  if (pVoice->IsActive()) active_voices++; // still active                      else { // voice reached end, is now inactive
493                  else { // voice reached end, is now inactive                          FreeVoice(itVoice); // remove voice from the list of active voices
494                      KillVoice(pVoice); // remove voice from the list of active voices                      }
495                    }
496                }
497            }
498    
499    
500            // now render all postponed voices from voice stealing
501            {
502                RTList<Event>::Iterator itVoiceStealEvent = pVoiceStealingQueue->first();
503                RTList<Event>::Iterator end               = pVoiceStealingQueue->end();
504                for (; itVoiceStealEvent != end; ++itVoiceStealEvent) {
505                    Pool<Voice>::Iterator itNewVoice = LaunchVoice(itVoiceStealEvent, itVoiceStealEvent->Param.Note.Layer, itVoiceStealEvent->Param.Note.ReleaseTrigger, false);
506                    if (itNewVoice) {
507                        for (; itNewVoice; itNewVoice = itNewVoice->itChildVoice) {
508                            itNewVoice->Render(Samples);
509                            if (itNewVoice->IsActive()) active_voices++; // still active
510                            else { // voice reached end, is now inactive
511                                FreeVoice(itNewVoice); // remove voice from the list of active voices
512                            }
513                        }
514                  }                  }
515                    else dmsg(1,("gig::Engine: ERROR, voice stealing didn't work out!\n"));
516                }
517            }
518            // reset voice stealing for the new fragment
519            pVoiceStealingQueue->clear();
520            itLastStolenVoice = RTList<Voice>::Iterator();
521            iuiLastStolenKey  = RTList<uint>::Iterator();
522    
523    
524            // free all keys which have no active voices left
525            {
526                RTList<uint>::Iterator iuiKey = pActiveKeys->first();
527                RTList<uint>::Iterator end    = pActiveKeys->end();
528                while (iuiKey != end) { // iterate through all active keys
529                    midi_key_info_t* pKey = &pMIDIKeyInfo[*iuiKey];
530                    ++iuiKey;
531                    if (pKey->pActiveVoices->isEmpty()) FreeKey(pKey);
532                    #if DEVMODE
533                    else { // FIXME: should be removed before the final release (purpose: just a sanity check for debugging)
534                        RTList<Voice>::Iterator itVoice     = pKey->pActiveVoices->first();
535                        RTList<Voice>::Iterator itVoicesEnd = pKey->pActiveVoices->end();
536                        for (; itVoice != itVoicesEnd; ++itVoice) { // iterate through all voices on this key
537                            if (itVoice->itKillEvent) {
538                                dmsg(1,("gig::Engine: ERROR, killed voice survived !!!\n"));
539                            }
540                        }
541                    }
542                    #endif // DEVMODE
543              }              }
             pKey->pEvents->clear(); // free all events on the key  
544          }          }
545    
546    
# Line 422  namespace LinuxSampler { namespace gig { Line 561  namespace LinuxSampler { namespace gig {
561       *  @param Velocity - MIDI velocity value of the triggered key       *  @param Velocity - MIDI velocity value of the triggered key
562       */       */
563      void Engine::SendNoteOn(uint8_t Key, uint8_t Velocity) {      void Engine::SendNoteOn(uint8_t Key, uint8_t Velocity) {
564          Event event    = pEventGenerator->CreateEvent();          Event event               = pEventGenerator->CreateEvent();
565          event.Type     = Event::type_note_on;          event.Type                = Event::type_note_on;
566          event.Key      = Key;          event.Param.Note.Key      = Key;
567          event.Velocity = Velocity;          event.Param.Note.Velocity = Velocity;
568          if (this->pEventQueue->write_space() > 0) this->pEventQueue->push(&event);          if (this->pEventQueue->write_space() > 0) this->pEventQueue->push(&event);
569          else dmsg(1,("Engine: Input event queue full!"));          else dmsg(1,("Engine: Input event queue full!"));
570      }      }
# Line 438  namespace LinuxSampler { namespace gig { Line 577  namespace LinuxSampler { namespace gig {
577       *  @param Velocity - MIDI release velocity value of the released key       *  @param Velocity - MIDI release velocity value of the released key
578       */       */
579      void Engine::SendNoteOff(uint8_t Key, uint8_t Velocity) {      void Engine::SendNoteOff(uint8_t Key, uint8_t Velocity) {
580          Event event    = pEventGenerator->CreateEvent();          Event event               = pEventGenerator->CreateEvent();
581          event.Type     = Event::type_note_off;          event.Type                = Event::type_note_off;
582          event.Key      = Key;          event.Param.Note.Key      = Key;
583          event.Velocity = Velocity;          event.Param.Note.Velocity = Velocity;
584          if (this->pEventQueue->write_space() > 0) this->pEventQueue->push(&event);          if (this->pEventQueue->write_space() > 0) this->pEventQueue->push(&event);
585          else dmsg(1,("Engine: Input event queue full!"));          else dmsg(1,("Engine: Input event queue full!"));
586      }      }
# Line 453  namespace LinuxSampler { namespace gig { Line 592  namespace LinuxSampler { namespace gig {
592       *  @param Pitch - MIDI pitch value (-8192 ... +8191)       *  @param Pitch - MIDI pitch value (-8192 ... +8191)
593       */       */
594      void Engine::SendPitchbend(int Pitch) {      void Engine::SendPitchbend(int Pitch) {
595          Event event = pEventGenerator->CreateEvent();          Event event             = pEventGenerator->CreateEvent();
596          event.Type  = Event::type_pitchbend;          event.Type              = Event::type_pitchbend;
597          event.Pitch = Pitch;          event.Param.Pitch.Pitch = Pitch;
598          if (this->pEventQueue->write_space() > 0) this->pEventQueue->push(&event);          if (this->pEventQueue->write_space() > 0) this->pEventQueue->push(&event);
599          else dmsg(1,("Engine: Input event queue full!"));          else dmsg(1,("Engine: Input event queue full!"));
600      }      }
# Line 468  namespace LinuxSampler { namespace gig { Line 607  namespace LinuxSampler { namespace gig {
607       *  @param Value      - value of the control change       *  @param Value      - value of the control change
608       */       */
609      void Engine::SendControlChange(uint8_t Controller, uint8_t Value) {      void Engine::SendControlChange(uint8_t Controller, uint8_t Value) {
610          Event event      = pEventGenerator->CreateEvent();          Event event               = pEventGenerator->CreateEvent();
611          event.Type       = Event::type_control_change;          event.Type                = Event::type_control_change;
612          event.Controller = Controller;          event.Param.CC.Controller = Controller;
613          event.Value      = Value;          event.Param.CC.Value      = Value;
614          if (this->pEventQueue->write_space() > 0) this->pEventQueue->push(&event);          if (this->pEventQueue->write_space() > 0) this->pEventQueue->push(&event);
615          else dmsg(1,("Engine: Input event queue full!"));          else dmsg(1,("Engine: Input event queue full!"));
616      }      }
617    
618      /**      /**
619         *  Will be called by the MIDI input device whenever a MIDI system
620         *  exclusive message has arrived.
621         *
622         *  @param pData - pointer to sysex data
623         *  @param Size  - lenght of sysex data (in bytes)
624         */
625        void Engine::SendSysex(void* pData, uint Size) {
626            Event event             = pEventGenerator->CreateEvent();
627            event.Type              = Event::type_sysex;
628            event.Param.Sysex.Size  = Size;
629            if (pEventQueue->write_space() > 0) {
630                if (pSysexBuffer->write_space() >= Size) {
631                    // copy sysex data to input buffer
632                    uint toWrite = Size;
633                    uint8_t* pPos = (uint8_t*) pData;
634                    while (toWrite) {
635                        const uint writeNow = RTMath::Min(toWrite, pSysexBuffer->write_space_to_end());
636                        pSysexBuffer->write(pPos, writeNow);
637                        toWrite -= writeNow;
638                        pPos    += writeNow;
639    
640                    }
641                    // finally place sysex event into input event queue
642                    pEventQueue->push(&event);
643                }
644                else dmsg(1,("Engine: Sysex message too large (%d byte) for input buffer (%d byte)!",Size,SYSEX_BUFFER_SIZE));
645            }
646            else dmsg(1,("Engine: Input event queue full!"));
647        }
648    
649        /**
650       *  Assigns and triggers a new voice for the respective MIDI key.       *  Assigns and triggers a new voice for the respective MIDI key.
651       *       *
652       *  @param pNoteOnEvent - key, velocity and time stamp of the event       *  @param itNoteOnEvent - key, velocity and time stamp of the event
653       */       */
654      void Engine::ProcessNoteOn(Event* pNoteOnEvent) {      void Engine::ProcessNoteOn(Pool<Event>::Iterator& itNoteOnEvent) {
655          midi_key_info_t* pKey = &pMIDIKeyInfo[pNoteOnEvent->Key];          midi_key_info_t* pKey = &pMIDIKeyInfo[itNoteOnEvent->Param.Note.Key];
656    
657          pKey->KeyPressed = true; // the MIDI key was now pressed down          pKey->KeyPressed = true; // the MIDI key was now pressed down
658    
659          // cancel release process of voices on this key if needed          // cancel release process of voices on this key if needed
660          if (pKey->Active && !SustainPedal) {          if (pKey->Active && !SustainPedal) {
661              pNoteOnEvent->Type = Event::type_cancel_release; // transform event type              RTList<Event>::Iterator itCancelReleaseEvent = pKey->pEvents->allocAppend();
662              pEvents->move(pNoteOnEvent, pKey->pEvents); // move event to the key's own event list              if (itCancelReleaseEvent) {
663          }                  *itCancelReleaseEvent = *itNoteOnEvent;                  // copy event
664                    itCancelReleaseEvent->Type = Event::type_cancel_release; // transform event type
         // allocate a new voice for the key  
         Voice* pNewVoice = pKey->pActiveVoices->alloc();  
         if (pNewVoice) {  
             // launch the new voice  
             if (pNewVoice->Trigger(pNoteOnEvent, this->Pitch, this->pInstrument) < 0) {  
                 dmsg(1,("Triggering new voice failed!\n"));  
                 pKey->pActiveVoices->free(pNewVoice);  
             }  
             else if (!pKey->Active) { // mark as active key  
                 pKey->Active = true;  
                 pKey->pSelf  = pActiveKeys->alloc();  
                 *pKey->pSelf = pNoteOnEvent->Key;  
665              }              }
666                else dmsg(1,("Event pool emtpy!\n"));
667          }          }
668          else std::cerr << "No free voice!" << std::endl << std::flush;  
669            // move note on event to the key's own event list
670            RTList<Event>::Iterator itNoteOnEventOnKeyList = itNoteOnEvent.moveToEndOf(pKey->pEvents);
671    
672            // allocate and trigger a new voice for the key
673            LaunchVoice(itNoteOnEventOnKeyList, 0, false, true);
674      }      }
675    
676      /**      /**
# Line 515  namespace LinuxSampler { namespace gig { Line 679  namespace LinuxSampler { namespace gig {
679       *  sustain pedal will be released or voice turned inactive by itself (e.g.       *  sustain pedal will be released or voice turned inactive by itself (e.g.
680       *  due to completion of sample playback).       *  due to completion of sample playback).
681       *       *
682       *  @param pNoteOffEvent - key, velocity and time stamp of the event       *  @param itNoteOffEvent - key, velocity and time stamp of the event
683       */       */
684      void Engine::ProcessNoteOff(Event* pNoteOffEvent) {      void Engine::ProcessNoteOff(Pool<Event>::Iterator& itNoteOffEvent) {
685          midi_key_info_t* pKey = &pMIDIKeyInfo[pNoteOffEvent->Key];          midi_key_info_t* pKey = &pMIDIKeyInfo[itNoteOffEvent->Param.Note.Key];
686    
687          pKey->KeyPressed = false; // the MIDI key was now released          pKey->KeyPressed = false; // the MIDI key was now released
688    
689          // release voices on this key if needed          // release voices on this key if needed
690          if (pKey->Active && !SustainPedal) {          if (pKey->Active && !SustainPedal) {
691              pNoteOffEvent->Type = Event::type_release; // transform event type              itNoteOffEvent->Type = Event::type_release; // transform event type
692              pEvents->move(pNoteOffEvent, pKey->pEvents); // move event to the key's own event list          }
693    
694            // move event to the key's own event list
695            RTList<Event>::Iterator itNoteOffEventOnKeyList = itNoteOffEvent.moveToEndOf(pKey->pEvents);
696    
697            // spawn release triggered voice(s) if needed
698            if (pKey->ReleaseTrigger) {
699                LaunchVoice(itNoteOffEventOnKeyList, 0, true, false); //FIXME: for the moment we don't perform voice stealing for release triggered samples
700                pKey->ReleaseTrigger = false;
701          }          }
702      }      }
703    
# Line 533  namespace LinuxSampler { namespace gig { Line 705  namespace LinuxSampler { namespace gig {
705       *  Moves pitchbend event from the general (input) event list to the pitch       *  Moves pitchbend event from the general (input) event list to the pitch
706       *  event list.       *  event list.
707       *       *
708       *  @param pPitchbendEvent - absolute pitch value and time stamp of the event       *  @param itPitchbendEvent - absolute pitch value and time stamp of the event
709         */
710        void Engine::ProcessPitchbend(Pool<Event>::Iterator& itPitchbendEvent) {
711            this->Pitch = itPitchbendEvent->Param.Pitch.Pitch; // store current pitch value
712            itPitchbendEvent.moveToEndOf(pSynthesisEvents[Event::destination_vco]);
713        }
714    
715        /**
716         *  Allocates and triggers a new voice. This method will usually be
717         *  called by the ProcessNoteOn() method and by the voices itself
718         *  (e.g. to spawn further voices on the same key for layered sounds).
719         *
720         *  @param itNoteOnEvent       - key, velocity and time stamp of the event
721         *  @param iLayer              - layer index for the new voice (optional - only
722         *                               in case of layered sounds of course)
723         *  @param ReleaseTriggerVoice - if new voice is a release triggered voice
724         *                               (optional, default = false)
725         *  @param VoiceStealing       - if voice stealing should be performed
726         *                               when there is no free voice
727         *                               (optional, default = true)
728         *  @returns pointer to new voice or NULL if there was no free voice or
729         *           if an error occured while trying to trigger the new voice
730         */
731        Pool<Voice>::Iterator Engine::LaunchVoice(Pool<Event>::Iterator& itNoteOnEvent, int iLayer, bool ReleaseTriggerVoice, bool VoiceStealing) {
732            midi_key_info_t* pKey = &pMIDIKeyInfo[itNoteOnEvent->Param.Note.Key];
733    
734            // allocate a new voice for the key
735            Pool<Voice>::Iterator itNewVoice = pKey->pActiveVoices->allocAppend();
736            if (itNewVoice) {
737                // launch the new voice
738                if (itNewVoice->Trigger(itNoteOnEvent, this->Pitch, this->pInstrument, iLayer, ReleaseTriggerVoice, VoiceStealing) < 0) {
739                    dmsg(1,("Triggering new voice failed!\n"));
740                    pKey->pActiveVoices->free(itNewVoice);
741                }
742                else { // on success
743                    uint** ppKeyGroup = NULL;
744                    if (itNewVoice->KeyGroup) { // if this voice / key belongs to a key group
745                        ppKeyGroup = &ActiveKeyGroups[itNewVoice->KeyGroup];
746                        if (*ppKeyGroup) { // if there's already an active key in that key group
747                            midi_key_info_t* pOtherKey = &pMIDIKeyInfo[**ppKeyGroup];
748                            // kill all voices on the (other) key
749                            RTList<Voice>::Iterator itVoiceToBeKilled = pOtherKey->pActiveVoices->first();
750                            RTList<Voice>::Iterator end               = pOtherKey->pActiveVoices->end();
751                            for (; itVoiceToBeKilled != end; ++itVoiceToBeKilled) {
752                                if (itVoiceToBeKilled->Type != Voice::type_release_trigger) itVoiceToBeKilled->Kill(itNoteOnEvent);
753                            }
754                        }
755                    }
756                    if (!pKey->Active) { // mark as active key
757                        pKey->Active = true;
758                        pKey->itSelf = pActiveKeys->allocAppend();
759                        *pKey->itSelf = itNoteOnEvent->Param.Note.Key;
760                    }
761                    if (itNewVoice->KeyGroup) {
762                        *ppKeyGroup = &*pKey->itSelf; // put key as the (new) active key to its key group
763                    }
764                    if (itNewVoice->Type == Voice::type_release_trigger_required) pKey->ReleaseTrigger = true; // mark key for the need of release triggered voice(s)
765                    return itNewVoice; // success
766                }
767            }
768            else if (VoiceStealing) {
769                // first, get total amount of required voices (dependant on amount of layers)
770                ::gig::Region* pRegion = pInstrument->GetRegion(itNoteOnEvent->Param.Note.Key);
771                if (!pRegion) return Pool<Voice>::Iterator(); // nothing defined for this MIDI key, so no voice needed
772                int voicesRequired = pRegion->Layers;
773    
774                // now steal the (remaining) amount of voices
775                for (int i = iLayer; i < voicesRequired; i++)
776                    StealVoice(itNoteOnEvent);
777    
778                // put note-on event into voice-stealing queue, so it will be reprocessed after killed voice died
779                RTList<Event>::Iterator itStealEvent = pVoiceStealingQueue->allocAppend();
780                if (itStealEvent) {
781                    *itStealEvent = *itNoteOnEvent; // copy event
782                    itStealEvent->Param.Note.Layer = iLayer;
783                    itStealEvent->Param.Note.ReleaseTrigger = ReleaseTriggerVoice;
784                }
785                else dmsg(1,("Voice stealing queue full!\n"));
786            }
787    
788            return Pool<Voice>::Iterator(); // no free voice or error
789        }
790    
791        /**
792         *  Will be called by LaunchVoice() method in case there are no free
793         *  voices left. This method will select and kill one old voice for
794         *  voice stealing and postpone the note-on event until the selected
795         *  voice actually died.
796         *
797         *  @param itNoteOnEvent - key, velocity and time stamp of the event
798       */       */
799      void Engine::ProcessPitchbend(Event* pPitchbendEvent) {      void Engine::StealVoice(Pool<Event>::Iterator& itNoteOnEvent) {
800          this->Pitch = pPitchbendEvent->Pitch; // store current pitch value          if (!pEventPool->poolIsEmpty()) {
801          pEvents->move(pPitchbendEvent, pSynthesisEvents[Event::destination_vco]);  
802                RTList<uint>::Iterator  iuiOldestKey;
803                RTList<Voice>::Iterator itOldestVoice;
804    
805                // Select one voice for voice stealing
806                switch (VOICE_STEAL_ALGORITHM) {
807    
808                    // try to pick the oldest voice on the key where the new
809                    // voice should be spawned, if there is no voice on that
810                    // key, or no voice left to kill there, then procceed with
811                    // 'oldestkey' algorithm
812                    case voice_steal_algo_keymask: {
813                        midi_key_info_t* pOldestKey = &pMIDIKeyInfo[itNoteOnEvent->Param.Note.Key];
814                        if (itLastStolenVoice) {
815                            itOldestVoice = itLastStolenVoice;
816                            ++itOldestVoice;
817                        }
818                        else { // no voice stolen in this audio fragment cycle yet
819                            itOldestVoice = pOldestKey->pActiveVoices->first();
820                        }
821                        if (itOldestVoice) {
822                            iuiOldestKey = pOldestKey->itSelf;
823                            break; // selection succeeded
824                        }
825                    } // no break - intentional !
826    
827                    // try to pick the oldest voice on the oldest active key
828                    // (caution: must stay after 'keymask' algorithm !)
829                    case voice_steal_algo_oldestkey: {
830                        if (itLastStolenVoice) {
831                            midi_key_info_t* pOldestKey = &pMIDIKeyInfo[*iuiLastStolenKey];
832                            itOldestVoice = itLastStolenVoice;
833                            ++itOldestVoice;
834                            if (!itOldestVoice) {
835                                iuiOldestKey = iuiLastStolenKey;
836                                ++iuiOldestKey;
837                                if (iuiOldestKey) {
838                                    midi_key_info_t* pOldestKey = &pMIDIKeyInfo[*iuiOldestKey];
839                                    itOldestVoice = pOldestKey->pActiveVoices->first();
840                                }
841                                else {
842                                    dmsg(1,("gig::Engine: Warning, too less voices, even for voice stealing! - Better recompile with higher MAX_AUDIO_VOICES.\n"));
843                                    return;
844                                }
845                            }
846                            else iuiOldestKey = iuiLastStolenKey;
847                        }
848                        else { // no voice stolen in this audio fragment cycle yet
849                            iuiOldestKey = pActiveKeys->first();
850                            midi_key_info_t* pOldestKey = &pMIDIKeyInfo[*iuiOldestKey];
851                            itOldestVoice = pOldestKey->pActiveVoices->first();
852                        }
853                        break;
854                    }
855    
856                    // don't steal anything
857                    case voice_steal_algo_none:
858                    default: {
859                        dmsg(1,("No free voice (voice stealing disabled)!\n"));
860                        return;
861                    }
862                }
863    
864                //FIXME: can be removed, just a sanity check for debugging
865                if (!itOldestVoice->IsActive()) dmsg(1,("gig::Engine: ERROR, tried to steal a voice which was not active !!!\n"));
866    
867                // now kill the selected voice
868                itOldestVoice->Kill(itNoteOnEvent);
869                // remember which voice on which key we stole, so we can simply proceed for the next voice stealing
870                this->itLastStolenVoice = itOldestVoice;
871                this->iuiLastStolenKey = iuiOldestKey;
872            }
873            else dmsg(1,("Event pool emtpy!\n"));
874      }      }
875    
876      /**      /**
877       *  Immediately kills the voice given with pVoice (no matter if sustain is       *  Removes the given voice from the MIDI key's list of active voices.
878       *  pressed or not) and removes it from the MIDI key's list of active voice.       *  This method will be called when a voice went inactive, e.g. because
879       *  This method will e.g. be called if a voice went inactive by itself.       *  it finished to playback its sample, finished its release stage or
880         *  just was killed.
881       *       *
882       *  @param pVoice - points to the voice to be killed       *  @param itVoice - points to the voice to be freed
883       */       */
884      void Engine::KillVoice(Voice* pVoice) {      void Engine::FreeVoice(Pool<Voice>::Iterator& itVoice) {
885          if (pVoice) {          if (itVoice) {
886              if (pVoice->IsActive()) pVoice->Kill();              midi_key_info_t* pKey = &pMIDIKeyInfo[itVoice->MIDIKey];
887    
888              midi_key_info_t* pKey = &pMIDIKeyInfo[pVoice->MIDIKey];              uint keygroup = itVoice->KeyGroup;
889    
890              // free the voice object              // free the voice object
891              pVoicePool->free(pVoice);              pVoicePool->free(itVoice);
892    
893              // check if there are no voices left on the MIDI key and update the key info if so              // if no other voices left and member of a key group, remove from key group
894              if (pKey->pActiveVoices->is_empty()) {              if (pKey->pActiveVoices->isEmpty() && keygroup) {
895                  pKey->Active = false;                  uint** ppKeyGroup = &ActiveKeyGroups[keygroup];
896                  pActiveKeys->free(pKey->pSelf); // remove key from list of active keys                  if (*ppKeyGroup == &*pKey->itSelf) *ppKeyGroup = NULL; // remove key from key group
                 pKey->pSelf = NULL;  
                 dmsg(3,("Key has no more voices now\n"));  
897              }              }
898          }          }
899          else std::cerr << "Couldn't release voice! (pVoice == NULL)\n" << std::flush;          else std::cerr << "Couldn't release voice! (!itVoice)\n" << std::flush;
900        }
901    
902        /**
903         *  Called when there's no more voice left on a key, this call will
904         *  update the key info respectively.
905         *
906         *  @param pKey - key which is now inactive
907         */
908        void Engine::FreeKey(midi_key_info_t* pKey) {
909            if (pKey->pActiveVoices->isEmpty()) {
910                pKey->Active = false;
911                pActiveKeys->free(pKey->itSelf); // remove key from list of active keys
912                pKey->itSelf = RTList<uint>::Iterator();
913                pKey->ReleaseTrigger = false;
914                pKey->pEvents->clear();
915                dmsg(3,("Key has no more voices now\n"));
916            }
917            else dmsg(1,("gig::Engine: Oops, tried to free a key which contains voices.\n"));
918      }      }
919    
920      /**      /**
921       *  Reacts on supported control change commands (e.g. pitch bend wheel,       *  Reacts on supported control change commands (e.g. pitch bend wheel,
922       *  modulation wheel, aftertouch).       *  modulation wheel, aftertouch).
923       *       *
924       *  @param pControlChangeEvent - controller, value and time stamp of the event       *  @param itControlChangeEvent - controller, value and time stamp of the event
925       */       */
926      void Engine::ProcessControlChange(Event* pControlChangeEvent) {      void Engine::ProcessControlChange(Pool<Event>::Iterator& itControlChangeEvent) {
927          dmsg(4,("Engine::ContinuousController cc=%d v=%d\n", pControlChangeEvent->Controller, pControlChangeEvent->Value));          dmsg(4,("Engine::ContinuousController cc=%d v=%d\n", itControlChangeEvent->Param.CC.Controller, itControlChangeEvent->Param.CC.Value));
928    
929          switch (pControlChangeEvent->Controller) {          switch (itControlChangeEvent->Param.CC.Controller) {
930              case 64: {              case 64: {
931                  if (pControlChangeEvent->Value >= 64 && !SustainPedal) {                  if (itControlChangeEvent->Param.CC.Value >= 64 && !SustainPedal) {
932                      dmsg(4,("PEDAL DOWN\n"));                      dmsg(4,("PEDAL DOWN\n"));
933                      SustainPedal = true;                      SustainPedal = true;
934    
935                      // cancel release process of voices if necessary                      // cancel release process of voices if necessary
936                      uint* piKey = pActiveKeys->first();                      RTList<uint>::Iterator iuiKey = pActiveKeys->first();
937                      if (piKey) {                      if (iuiKey) {
938                          pControlChangeEvent->Type = Event::type_cancel_release; // transform event type                          itControlChangeEvent->Type = Event::type_cancel_release; // transform event type
939                          while (piKey) {                          while (iuiKey) {
940                              midi_key_info_t* pKey = &pMIDIKeyInfo[*piKey];                              midi_key_info_t* pKey = &pMIDIKeyInfo[*iuiKey];
941                              pActiveKeys->set_current(piKey);                              ++iuiKey;
                             piKey = pActiveKeys->next();  
942                              if (!pKey->KeyPressed) {                              if (!pKey->KeyPressed) {
943                                  Event* pNewEvent = pKey->pEvents->alloc();                                  RTList<Event>::Iterator itNewEvent = pKey->pEvents->allocAppend();
944                                  if (pNewEvent) *pNewEvent = *pControlChangeEvent; // copy event to the key's own event list                                  if (itNewEvent) *itNewEvent = *itControlChangeEvent; // copy event to the key's own event list
945                                  else dmsg(1,("Event pool emtpy!\n"));                                  else dmsg(1,("Event pool emtpy!\n"));
946                              }                              }
947                          }                          }
948                      }                      }
949                  }                  }
950                  if (pControlChangeEvent->Value < 64 && SustainPedal) {                  if (itControlChangeEvent->Param.CC.Value < 64 && SustainPedal) {
951                      dmsg(4,("PEDAL UP\n"));                      dmsg(4,("PEDAL UP\n"));
952                      SustainPedal = false;                      SustainPedal = false;
953    
954                      // release voices if their respective key is not pressed                      // release voices if their respective key is not pressed
955                      uint* piKey = pActiveKeys->first();                      RTList<uint>::Iterator iuiKey = pActiveKeys->first();
956                      if (piKey) {                      if (iuiKey) {
957                          pControlChangeEvent->Type = Event::type_release; // transform event type                          itControlChangeEvent->Type = Event::type_release; // transform event type
958                          while (piKey) {                          while (iuiKey) {
959                              midi_key_info_t* pKey = &pMIDIKeyInfo[*piKey];                              midi_key_info_t* pKey = &pMIDIKeyInfo[*iuiKey];
960                              pActiveKeys->set_current(piKey);                              ++iuiKey;
                             piKey = pActiveKeys->next();  
961                              if (!pKey->KeyPressed) {                              if (!pKey->KeyPressed) {
962                                  Event* pNewEvent = pKey->pEvents->alloc();                                  RTList<Event>::Iterator itNewEvent = pKey->pEvents->allocAppend();
963                                  if (pNewEvent) *pNewEvent = *pControlChangeEvent; // copy event to the key's own event list                                  if (itNewEvent) *itNewEvent = *itControlChangeEvent; // copy event to the key's own event list
964                                  else dmsg(1,("Event pool emtpy!\n"));                                  else dmsg(1,("Event pool emtpy!\n"));
965                              }                              }
966                          }                          }
# Line 623  namespace LinuxSampler { namespace gig { Line 971  namespace LinuxSampler { namespace gig {
971          }          }
972    
973          // update controller value in the engine's controller table          // update controller value in the engine's controller table
974          ControllerTable[pControlChangeEvent->Controller] = pControlChangeEvent->Value;          ControllerTable[itControlChangeEvent->Param.CC.Controller] = itControlChangeEvent->Param.CC.Value;
975    
976          // move event from the unsorted event list to the control change event list          // move event from the unsorted event list to the control change event list
977          pEvents->move(pControlChangeEvent, pCCEvents);          itControlChangeEvent.moveToEndOf(pCCEvents);
978        }
979    
980        /**
981         *  Reacts on MIDI system exclusive messages.
982         *
983         *  @param itSysexEvent - sysex data size and time stamp of the sysex event
984         */
985        void Engine::ProcessSysex(Pool<Event>::Iterator& itSysexEvent) {
986            RingBuffer<uint8_t>::NonVolatileReader reader = pSysexBuffer->get_non_volatile_reader();
987    
988            uint8_t exclusive_status, id;
989            if (!reader.pop(&exclusive_status)) goto free_sysex_data;
990            if (!reader.pop(&id))               goto free_sysex_data;
991            if (exclusive_status != 0xF0)       goto free_sysex_data;
992    
993            switch (id) {
994                case 0x41: { // Roland
995                    uint8_t device_id, model_id, cmd_id;
996                    if (!reader.pop(&device_id)) goto free_sysex_data;
997                    if (!reader.pop(&model_id))  goto free_sysex_data;
998                    if (!reader.pop(&cmd_id))    goto free_sysex_data;
999                    if (model_id != 0x42 /*GS*/) goto free_sysex_data;
1000                    if (cmd_id != 0x12 /*DT1*/)  goto free_sysex_data;
1001    
1002                    // command address
1003                    uint8_t addr[3]; // 2 byte addr MSB, followed by 1 byte addr LSB)
1004                    const RingBuffer<uint8_t>::NonVolatileReader checksum_reader = reader; // so we can calculate the check sum later
1005                    if (reader.read(&addr[0], 3) != 3) goto free_sysex_data;
1006                    if (addr[0] == 0x40 && addr[1] == 0x00) { // System Parameters
1007                    }
1008                    else if (addr[0] == 0x40 && addr[1] == 0x01) { // Common Parameters
1009                    }
1010                    else if (addr[0] == 0x40 && (addr[1] & 0xf0) == 0x10) { // Part Parameters (1)
1011                        switch (addr[3]) {
1012                            case 0x40: { // scale tuning
1013                                uint8_t scale_tunes[12]; // detuning of all 12 semitones of an octave
1014                                if (reader.read(&scale_tunes[0], 12) != 12) goto free_sysex_data;
1015                                uint8_t checksum;
1016                                if (!reader.pop(&checksum))                      goto free_sysex_data;
1017                                if (GSCheckSum(checksum_reader, 12) != checksum) goto free_sysex_data;
1018                                for (int i = 0; i < 12; i++) scale_tunes[i] -= 64;
1019                                AdjustScale((int8_t*) scale_tunes);
1020                                break;
1021                            }
1022                        }
1023                    }
1024                    else if (addr[0] == 0x40 && (addr[1] & 0xf0) == 0x20) { // Part Parameters (2)
1025                    }
1026                    else if (addr[0] == 0x41) { // Drum Setup Parameters
1027                    }
1028                    break;
1029                }
1030            }
1031    
1032            free_sysex_data: // finally free sysex data
1033            pSysexBuffer->increment_read_ptr(itSysexEvent->Param.Sysex.Size);
1034        }
1035    
1036        /**
1037         * Calculates the Roland GS sysex check sum.
1038         *
1039         * @param AddrReader - reader which currently points to the first GS
1040         *                     command address byte of the GS sysex message in
1041         *                     question
1042         * @param DataSize   - size of the GS message data (in bytes)
1043         */
1044        uint8_t Engine::GSCheckSum(const RingBuffer<uint8_t>::NonVolatileReader AddrReader, uint DataSize) {
1045            RingBuffer<uint8_t>::NonVolatileReader reader = AddrReader;
1046            uint bytes = 3 /*addr*/ + DataSize;
1047            uint8_t addr_and_data[bytes];
1048            reader.read(&addr_and_data[0], bytes);
1049            uint8_t sum = 0;
1050            for (uint i = 0; i < bytes; i++) sum += addr_and_data[i];
1051            return 128 - sum % 128;
1052        }
1053    
1054        /**
1055         * Allows to tune each of the twelve semitones of an octave.
1056         *
1057         * @param ScaleTunes - detuning of all twelve semitones (in cents)
1058         */
1059        void Engine::AdjustScale(int8_t ScaleTunes[12]) {
1060            memcpy(&this->ScaleTuning[0], &ScaleTunes[0], 12); //TODO: currently not sample accurate
1061      }      }
1062    
1063      /**      /**
# Line 635  namespace LinuxSampler { namespace gig { Line 1066  namespace LinuxSampler { namespace gig {
1066       */       */
1067      void Engine::ResetSynthesisParameters(Event::destination_t dst, float val) {      void Engine::ResetSynthesisParameters(Event::destination_t dst, float val) {
1068          int maxsamples = pAudioOutputDevice->MaxSamplesPerCycle();          int maxsamples = pAudioOutputDevice->MaxSamplesPerCycle();
1069          for (int i = 0; i < maxsamples; i++) pSynthesisParameters[dst][i] = val;          float* m = &pSynthesisParameters[dst][0];
1070            for (int i = 0; i < maxsamples; i += 4) {
1071               m[i]   = val;
1072               m[i+1] = val;
1073               m[i+2] = val;
1074               m[i+3] = val;
1075            }
1076      }      }
1077    
1078      float Engine::Volume() {      float Engine::Volume() {
# Line 646  namespace LinuxSampler { namespace gig { Line 1083  namespace LinuxSampler { namespace gig {
1083          GlobalVolume = f;          GlobalVolume = f;
1084      }      }
1085    
1086        uint Engine::Channels() {
1087            return 2;
1088        }
1089    
1090        void Engine::SetOutputChannel(uint EngineAudioChannel, uint AudioDeviceChannel) {
1091            AudioChannel* pChannel = pAudioOutputDevice->Channel(AudioDeviceChannel);
1092            if (!pChannel) throw AudioOutputException("Invalid audio output device channel " + ToString(AudioDeviceChannel));
1093            switch (EngineAudioChannel) {
1094                case 0: // left output channel
1095                    pOutputLeft = pChannel->Buffer();
1096                    AudioDeviceChannelLeft = AudioDeviceChannel;
1097                    break;
1098                case 1: // right output channel
1099                    pOutputRight = pChannel->Buffer();
1100                    AudioDeviceChannelRight = AudioDeviceChannel;
1101                    break;
1102                default:
1103                    throw AudioOutputException("Invalid engine audio channel " + ToString(EngineAudioChannel));
1104            }
1105        }
1106    
1107        int Engine::OutputChannel(uint EngineAudioChannel) {
1108            switch (EngineAudioChannel) {
1109                case 0: // left channel
1110                    return AudioDeviceChannelLeft;
1111                case 1: // right channel
1112                    return AudioDeviceChannelRight;
1113                default:
1114                    throw AudioOutputException("Invalid engine audio channel " + ToString(EngineAudioChannel));
1115            }
1116        }
1117    
1118      uint Engine::VoiceCount() {      uint Engine::VoiceCount() {
1119          return ActiveVoiceCount;          return ActiveVoiceCount;
1120      }      }
# Line 674  namespace LinuxSampler { namespace gig { Line 1143  namespace LinuxSampler { namespace gig {
1143          return pDiskThread->GetBufferFillPercentage();          return pDiskThread->GetBufferFillPercentage();
1144      }      }
1145    
1146        String Engine::EngineName() {
1147            return "GigEngine";
1148        }
1149    
1150        String Engine::InstrumentFileName() {
1151            return InstrumentFile;
1152        }
1153    
1154        int Engine::InstrumentIndex() {
1155            return InstrumentIdx;
1156        }
1157    
1158        int Engine::InstrumentStatus() {
1159            return InstrumentStat;
1160        }
1161    
1162      String Engine::Description() {      String Engine::Description() {
1163          return "Gigasampler Engine";          return "Gigasampler Engine";
1164      }      }
1165    
1166      String Engine::Version() {      String Engine::Version() {
1167          return "0.0.1-0cvs20040423";          String s = "$Revision: 1.18 $";
1168            return s.substr(11, s.size() - 13); // cut dollar signs, spaces and CVS macro keyword
1169      }      }
1170    
1171  }} // namespace LinuxSampler::gig  }} // namespace LinuxSampler::gig

Legend:
Removed from v.53  
changed lines
  Added in v.293

  ViewVC Help
Powered by ViewVC