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

Diff of /linuxsampler/trunk/src/engines/AbstractEngineChannel.cpp

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

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