X-Git-Url: https://main.carlh.net/gitweb/?a=blobdiff_plain;f=libs%2Fardour%2Fmidi_port.cc;h=2942aded75012b34e6b2114e5468bc5f38613642;hb=11f069f11869284b8f32bd3564abbb7cd63a4ff1;hp=779d31724760b345867f9b833899014332bf0269;hpb=89e4d352445e9394073804f78fbd6845e6820f20;p=ardour.git diff --git a/libs/ardour/midi_port.cc b/libs/ardour/midi_port.cc index 779d317247..2942aded75 100644 --- a/libs/ardour/midi_port.cc +++ b/libs/ardour/midi_port.cc @@ -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 @@ -19,113 +19,298 @@ #include #include -#include -#include -#include +#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; + +#define port_engine AudioEngine::instance()->port_engine() -MidiPort::MidiPort (const std::string& name, Flags flags, bool external, nframes_t capacity) - : Port (name, flags) - , BaseMidiPort (name, flags) - , PortFacade (name, flags) +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 * 8); - - if (external) { - /* external ports use the same buffer for the jack port (_ext_port) - * and internal ports (this) */ - _ext_port = new JackMidiPort (name, flags, _buffer); - Port::set_name (_ext_port->name()); - } else { - /* internal ports just have a single buffer, no jack port */ - _ext_port = 0; - set_name (name); - } - - reset (); + _buffer = new MidiBuffer (AudioEngine::instance()->raw_buffer_size (DataType::MIDI)); } MidiPort::~MidiPort() { - if (_ext_port) { - delete _ext_port; - _ext_port = 0; - } + delete _buffer; } void -MidiPort::reset() +MidiPort::cycle_start (pframes_t nframes) { - BaseMidiPort::reset(); + 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)); - if (_ext_port) { - _ext_port->reset (); + /* dump incoming MIDI to parser */ + + 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]); + } + } } } -void -MidiPort::cycle_start (nframes_t nframes, nframes_t offset) +Buffer& +MidiPort::get_buffer (pframes_t nframes) { - if (_ext_port) { - _ext_port->cycle_start (nframes, offset); - } + return get_midi_buffer (nframes); } MidiBuffer & -MidiPort::get_midi_buffer( nframes_t nframes, nframes_t offset ) { - - if (_has_been_mixed_down) - return *_buffer; - - if (_flags & IsInput) { - - if (_ext_port) { - - BaseMidiPort* mprt = dynamic_cast(_ext_port); - assert(mprt); - assert(&mprt->get_midi_buffer(nframes,offset) == _buffer); - - if (!_connections.empty()) { - (*_mixdown) (_connections, _buffer, nframes, offset, false); +MidiPort::get_midi_buffer (pframes_t nframes) +{ + if (_has_been_mixed_down) { + return *_buffer; + } + + if (receives_input ()) { + + if (_input_active) { + + void* buffer = port_engine.get_buffer (_port_handle, nframes); + const pframes_t event_count = port_engine.get_midi_event_count (buffer); + + /* suck all relevant MIDI events from the MIDI port buffer + into our MidiBuffer + */ + + for (pframes_t i = 0; i < event_count; ++i) { + + pframes_t timestamp; + size_t size; + uint8_t* buf; + + 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 ((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) (_connections, _buffer, nframes, offset, true); - } + _buffer->silence (nframes); } } else { - _buffer->silence (nframes, offset); + _buffer->silence (nframes); } - if (nframes) + + if (nframes) { _has_been_mixed_down = true; + } return *_buffer; } - void -MidiPort::cycle_end (nframes_t nframes, nframes_t offset) +MidiPort::cycle_end (pframes_t /*nframes*/) +{ + _has_been_mixed_down = false; +} + +void +MidiPort::cycle_split () { - if (_ext_port) { - _ext_port->cycle_end (nframes, offset); - } _has_been_mixed_down = false; } void -MidiPort::flush_buffers (nframes_t nframes, nframes_t offset) +MidiPort::resolve_notes (void* port_buffer, MidiBuffer::TimeType when) { - if (_ext_port) { - _ext_port->flush_buffers (nframes, offset); + for (uint8_t channel = 0; channel <= 0xF; channel++) { + + 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; + } + + 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 (pframes_t 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::MIDIEvent 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::require_resolve () +{ + _resolve_required = true; +} + +void +MidiPort::transport_stopped () +{ + _resolve_required = true; +} + +void +MidiPort::realtime_locate () +{ + _resolve_required = true; +} + +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; +}