fix crash when copy'ing latent plugins
[ardour.git] / libs / ardour / midi_port.cc
index ead5f5aeac047dfbe62a485c01e4870a863ec1ac..2942aded75012b34e6b2114e5468bc5f38613642 100644 (file)
@@ -1,5 +1,5 @@
 /*
-    Copyright (C) 2006 Paul Davis 
+    Copyright (C) 2006 Paul Davis
 
     This program is free software; you can redistribute it and/or modify
     it under the terms of the GNU General Public License as published by
 #include <cassert>
 #include <iostream>
 
-#include <ardour/midi_port.h>
-#include <ardour/data_type.h>
+#include "pbd/compose.h"
+#include "pbd/debug.h"
+
+#include "ardour/audioengine.h"
+#include "ardour/data_type.h"
+#include "ardour/debug.h"
+#include "ardour/midi_buffer.h"
+#include "ardour/midi_port.h"
 
-using namespace ARDOUR;
 using namespace std;
+using namespace ARDOUR;
+using namespace PBD;
 
-MidiPort::MidiPort (const std::string& name, Flags flags, bool ext, nframes_t capacity)
-        : Port (name, DataType::MIDI, flags, ext)
+#define port_engine AudioEngine::instance()->port_engine()
+
+MidiPort::MidiPort (const std::string& name, PortFlags flags)
+       : Port (name, DataType::MIDI, flags)
        , _has_been_mixed_down (false)
+       , _resolve_required (false)
+       , _input_active (true)
+       , _always_parse (false)
+       , _trace_on (false)
 {
-       // FIXME: size kludge (see BufferSet::ensure_buffers)
-       // Jack needs to tell us this
-       _buffer = new MidiBuffer (capacity * 32);
+       _buffer = new MidiBuffer (AudioEngine::instance()->raw_buffer_size (DataType::MIDI));
 }
 
 MidiPort::~MidiPort()
@@ -39,68 +50,99 @@ MidiPort::~MidiPort()
        delete _buffer;
 }
 
-
 void
-MidiPort::cycle_start (nframes_t nframes, nframes_t offset)
+MidiPort::cycle_start (pframes_t nframes)
 {
-       if (external ()) {
-               _buffer->clear ();
-               assert (_buffer->size () == 0);
+       framepos_t now = AudioEngine::instance()->sample_time_at_cycle_start();
+
+       Port::cycle_start (nframes);
+
+       _buffer->clear ();
+
+       if (sends_output ()) {
+               port_engine.midi_clear (port_engine.get_buffer (_port_handle, nframes));
+       }
+
+       if (_always_parse || (receives_input() && _trace_on)) {
+               MidiBuffer& mb (get_midi_buffer (nframes));
+
+               /* dump incoming MIDI to parser */
 
-               if (sends_output ()) {
-                       jack_midi_clear_buffer (jack_port_get_buffer (_jack_port, nframes));
+               for (MidiBuffer::iterator b = mb.begin(); b != mb.end(); ++b) {
+                       uint8_t* buf = (*b).buffer();
+
+                       _self_parser.set_timestamp (now + (*b).time());
+
+                       uint32_t limit = (*b).size();
+
+                       for (size_t n = 0; n < limit; ++n) {
+                               _self_parser.scanner (buf[n]);
+                       }
                }
        }
 }
 
+Buffer&
+MidiPort::get_buffer (pframes_t nframes)
+{
+       return get_midi_buffer (nframes);
+}
+
 MidiBuffer &
-MidiPort::get_midi_buffer (nframes_t nframes, nframes_t offset)
+MidiPort::get_midi_buffer (pframes_t nframes)
 {
        if (_has_been_mixed_down) {
-           return *_buffer;
+               return *_buffer;
        }
 
        if (receives_input ()) {
-                       
-               if (external ()) {
-               
-                       void* jack_buffer = jack_port_get_buffer (_jack_port, nframes);
-                       const nframes_t event_count = jack_midi_get_event_count(jack_buffer);
 
-                       assert (event_count < _buffer->capacity());
+               if (_input_active) {
 
-                       jack_midi_event_t ev;
+                       void* buffer = port_engine.get_buffer (_port_handle, nframes);
+                       const pframes_t event_count = port_engine.get_midi_event_count (buffer);
 
-                       for (nframes_t i = 0; i < event_count; ++i) {
+                       /* suck all relevant MIDI events from the MIDI port buffer
+                          into our MidiBuffer
+                       */
 
-                               jack_midi_event_get (&ev, jack_buffer, i);
+                       for (pframes_t i = 0; i < event_count; ++i) {
 
-                               // i guess this should do but i leave it off to test the rest first.
-                               //if (ev.time > offset && ev.time < offset+nframes)
-                               _buffer->push_back (ev);
-                       }
+                               pframes_t timestamp;
+                               size_t size;
+                               uint8_t* buf;
 
-                       if (nframes) {
-                               _has_been_mixed_down = true;
-                       }
+                               port_engine.midi_event_get (timestamp, size, &buf, buffer, i);
+
+                               if (buf[0] == 0xfe) {
+                                       /* throw away active sensing */
+                                       continue;
+                               } else if ((buf[0] & 0xF0) == 0x90 && buf[2] == 0) {
+                                       /* normalize note on with velocity 0 to proper note off */
+                                       buf[0] = 0x80 | (buf[0] & 0x0F);  /* note off */
+                                       buf[2] = 0x40;  /* default velocity */
+                               }
+
+                               /* check that the event is in the acceptable time range */
 
-                       if (!_connections.empty()) {
-                               mixdown (nframes, offset, false);
+                               if ((timestamp >= (_global_port_buffer_offset + _port_buffer_offset)) &&
+                                   (timestamp < (_global_port_buffer_offset + _port_buffer_offset + nframes))) {
+                                       _buffer->push_back (timestamp, size, buf);
+                               } else {
+                                       cerr << "Dropping incoming MIDI at time " << timestamp << "; offset="
+                                            << _global_port_buffer_offset << " limit="
+                                            << (_global_port_buffer_offset + _port_buffer_offset + nframes) << "\n";
+                               }
                        }
 
                } else {
-               
-                       if (_connections.empty()) {
-                               _buffer->silence (nframes, offset);
-                       } else {
-                               mixdown (nframes, offset, true);
-                       }
+                       _buffer->silence (nframes);
                }
 
        } else {
-               _buffer->silence (nframes, offset);
+               _buffer->silence (nframes);
        }
-       
+
        if (nframes) {
                _has_been_mixed_down = true;
        }
@@ -108,70 +150,167 @@ MidiPort::get_midi_buffer (nframes_t nframes, nframes_t offset)
        return *_buffer;
 }
 
-       
 void
-MidiPort::cycle_end (nframes_t nframes, nframes_t offset)
+MidiPort::cycle_end (pframes_t /*nframes*/)
 {
-#if 0
+       _has_been_mixed_down = false;
+}
 
-       if (external () && sends_output ()) {
-               /* FIXME: offset */
+void
+MidiPort::cycle_split ()
+{
+       _has_been_mixed_down = false;
+}
 
-               // We're an output - copy events from source buffer to Jack buffer
-               
-               void* jack_buffer = jack_port_get_buffer (_jack_port, nframes);
-               
-               jack_midi_clear_buffer (jack_buffer);
-               
-               for (MidiBuffer::iterator i = _buffer->begin(); i != _buffer->end(); ++i) {
-                       const Evoral::Event& ev = *i;
+void
+MidiPort::resolve_notes (void* port_buffer, MidiBuffer::TimeType when)
+{
+       for (uint8_t channel = 0; channel <= 0xF; channel++) {
 
-                       // event times should be frames, relative to cycle start
-                       assert(ev.time() >= 0);
-                       assert(ev.time() < nframes);
-                       jack_midi_event_write (jack_buffer, (jack_nframes_t) ev.time(), ev.buffer(), ev.size());
+               uint8_t ev[3] = { ((uint8_t) (MIDI_CMD_CONTROL | channel)), MIDI_CTL_SUSTAIN, 0 };
+
+               /* we need to send all notes off AND turn the
+                * sustain/damper pedal off to handle synths
+                * that prioritize sustain over AllNotesOff
+                */
+
+               if (port_engine.midi_event_put (port_buffer, when, ev, 3) != 0) {
+                       cerr << "failed to deliver sustain-zero on channel " << (int)channel << " on port " << name() << endl;
                }
-       }
-#endif
 
-       _has_been_mixed_down = false;
+               ev[1] = MIDI_CTL_ALL_NOTES_OFF;
+
+               if (port_engine.midi_event_put (port_buffer, when, ev, 3) != 0) {
+                       cerr << "failed to deliver ALL NOTES OFF on channel " << (int)channel << " on port " << name() << endl;
+               }
+       }
 }
 
 void
-MidiPort::flush_buffers (nframes_t nframes, nframes_t offset)
+MidiPort::flush_buffers (pframes_t nframes)
 {
-       /* FIXME: offset */
-       
-       if (external () && sends_output ()) {
-               
-               void* jack_buffer = jack_port_get_buffer (_jack_port, nframes);
+       if (sends_output ()) {
+
+               void* port_buffer = 0;
+
+               if (_resolve_required) {
+                       port_buffer = port_engine.get_buffer (_port_handle, nframes);
+                       /* resolve all notes at the start of the buffer */
+                       resolve_notes (port_buffer, _global_port_buffer_offset);
+                       _resolve_required = false;
+               }
+
+               if (_buffer->empty()) {
+                       return;
+               }
+
+               if (!port_buffer) {
+                       port_buffer = port_engine.get_buffer (_port_handle, nframes);
+               }
+
 
                for (MidiBuffer::iterator i = _buffer->begin(); i != _buffer->end(); ++i) {
-                       const Evoral::Event<double>& ev = *i;
-                       // event times should be frames, relative to cycle start
-                       assert(ev.time() >= 0);
-                       assert(ev.time() < (nframes+offset));
-                       if (ev.time() >= offset) {
-                               jack_midi_event_write (jack_buffer, (jack_nframes_t) ev.time(), ev.buffer(), ev.size());
+
+                       const Evoral::MIDIEvent<MidiBuffer::TimeType> ev (*i, false);
+
+
+                       if (sends_output() && _trace_on) {
+                               uint8_t const * const buf = ev.buffer();
+                               const framepos_t now = AudioEngine::instance()->sample_time_at_cycle_start();
+
+                               _self_parser.set_timestamp (now + ev.time());
+
+                               uint32_t limit = ev.size();
+
+                               for (size_t n = 0; n < limit; ++n) {
+                                       _self_parser.scanner (buf[n]);
+                               }
+                       }
+
+
+                       // event times are in frames, relative to cycle start
+
+#ifndef NDEBUG
+                       if (DEBUG_ENABLED (DEBUG::MidiIO)) {
+                               DEBUG_STR_DECL(a);
+                               DEBUG_STR_APPEND(a, string_compose ("MidiPort %1 pop event    @ %2 sz %3 ", _buffer, ev.time(), ev.size()));
+                               for (size_t i=0; i < ev.size(); ++i) {
+                                       DEBUG_STR_APPEND(a,hex);
+                                       DEBUG_STR_APPEND(a,"0x");
+                                       DEBUG_STR_APPEND(a,(int)(ev.buffer()[i]));
+                                       DEBUG_STR_APPEND(a,' ');
+                               }
+                               DEBUG_STR_APPEND(a,'\n');
+                               DEBUG_TRACE (DEBUG::MidiIO, DEBUG_STR(a).str());
+                       }
+#endif
+
+                       assert (ev.time() < (nframes + _global_port_buffer_offset + _port_buffer_offset));
+
+                       if (ev.time() >= _global_port_buffer_offset + _port_buffer_offset) {
+                               if (port_engine.midi_event_put (port_buffer, (pframes_t) ev.time(), ev.buffer(), ev.size()) != 0) {
+                                       cerr << "write failed, drop flushed note off on the floor, time "
+                                            << ev.time() << " > " << _global_port_buffer_offset + _port_buffer_offset << endl;
+                               }
+                       } else {
+                               cerr << "drop flushed event on the floor, time " << ev.time()
+                                    << " too early for " << _global_port_buffer_offset
+                                    << " + " << _port_buffer_offset;
+                               for (size_t xx = 0; xx < ev.size(); ++xx) {
+                                       cerr << ' ' << hex << (int) ev.buffer()[xx];
+                               }
+                               cerr << dec << endl;
                        }
                }
+
+               /* done.. the data has moved to the port buffer, mark it so
+                */
+
+               _buffer->clear ();
        }
 }
 
 void
-MidiPort::mixdown (nframes_t cnt, nframes_t offset, bool first_overwrite)
+MidiPort::require_resolve ()
 {
-       set<Port*>::const_iterator p = _connections.begin();
+       _resolve_required = true;
+}
 
-       if (first_overwrite) {
-               _buffer->read_from ((dynamic_cast<MidiPort*>(*p))->get_midi_buffer (cnt, offset), cnt, offset);
-               ++p;
-       }
+void
+MidiPort::transport_stopped ()
+{
+       _resolve_required = true;
+}
 
-       // XXX DAVE: this is just a guess
+void
+MidiPort::realtime_locate ()
+{
+       _resolve_required = true;
+}
 
-       for (; p != _connections.end(); ++p) {
-               _buffer->merge (*_buffer, (dynamic_cast<MidiPort*>(*p))->get_midi_buffer (cnt, offset));
-       }
+void
+MidiPort::reset ()
+{
+       Port::reset ();
+       delete _buffer;
+       cerr << name() << " new MIDI buffer of size " << AudioEngine::instance()->raw_buffer_size (DataType::MIDI) << endl;
+       _buffer = new MidiBuffer (AudioEngine::instance()->raw_buffer_size (DataType::MIDI));
 }
 
+void
+MidiPort::set_input_active (bool yn)
+{
+       _input_active = yn;
+}
+
+void
+MidiPort::set_always_parse (bool yn)
+{
+       _always_parse = yn;
+}
+
+void
+MidiPort::set_trace_on (bool yn)
+{
+       _trace_on = yn;
+}