2 Copyright (C) 2006 Paul Davis
4 This program is free software; you can redistribute it and/or modify
5 it under the terms of the GNU General Public License as published by
6 the Free Software Foundation; either version 2 of the License, or
7 (at your option) any later version.
9 This program is distributed in the hope that it will be useful,
10 but WITHOUT ANY WARRANTY; without even the implied warranty of
11 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12 GNU General Public License for more details.
14 You should have received a copy of the GNU General Public License
15 along with this program; if not, write to the Free Software
16 Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
22 #include "pbd/compose.h"
23 #include "pbd/debug.h"
25 #include "ardour/audioengine.h"
26 #include "ardour/data_type.h"
27 #include "ardour/debug.h"
28 #include "ardour/midi_buffer.h"
29 #include "ardour/midi_port.h"
32 using namespace ARDOUR;
35 #define port_engine AudioEngine::instance()->port_engine()
37 MidiPort::MidiPort (const std::string& name, PortFlags flags)
38 : Port (name, DataType::MIDI, flags)
39 , _has_been_mixed_down (false)
40 , _resolve_required (false)
41 , _input_active (true)
42 , _always_parse (false)
45 _buffer = new MidiBuffer (AudioEngine::instance()->raw_buffer_size (DataType::MIDI));
54 MidiPort::cycle_start (pframes_t nframes)
56 framepos_t now = AudioEngine::instance()->sample_time_at_cycle_start();
58 Port::cycle_start (nframes);
62 if (sends_output ()) {
63 port_engine.midi_clear (port_engine.get_buffer (_port_handle, nframes));
66 if (_always_parse || (receives_input() && _trace_on)) {
67 MidiBuffer& mb (get_midi_buffer (nframes));
69 /* dump incoming MIDI to parser */
71 for (MidiBuffer::iterator b = mb.begin(); b != mb.end(); ++b) {
72 uint8_t* buf = (*b).buffer();
74 _self_parser.set_timestamp (now + (*b).time());
76 uint32_t limit = (*b).size();
78 for (size_t n = 0; n < limit; ++n) {
79 _self_parser.scanner (buf[n]);
86 MidiPort::get_buffer (pframes_t nframes)
88 return get_midi_buffer (nframes);
92 MidiPort::get_midi_buffer (pframes_t nframes)
94 if (_has_been_mixed_down) {
98 if (receives_input ()) {
102 void* buffer = port_engine.get_buffer (_port_handle, nframes);
103 const pframes_t event_count = port_engine.get_midi_event_count (buffer);
105 /* suck all relevant MIDI events from the MIDI port buffer
109 for (pframes_t i = 0; i < event_count; ++i) {
115 port_engine.midi_event_get (timestamp, size, &buf, buffer, i);
117 if (buf[0] == 0xfe) {
118 /* throw away active sensing */
122 /* check that the event is in the acceptable time range */
124 if ((timestamp >= (_global_port_buffer_offset + _port_buffer_offset)) &&
125 (timestamp < (_global_port_buffer_offset + _port_buffer_offset + nframes))) {
126 _buffer->push_back (timestamp, size, buf);
128 cerr << "Dropping incoming MIDI at time " << timestamp << "; offset="
129 << _global_port_buffer_offset << " limit="
130 << (_global_port_buffer_offset + _port_buffer_offset + nframes) << "\n";
135 _buffer->silence (nframes);
139 _buffer->silence (nframes);
143 _has_been_mixed_down = true;
150 MidiPort::cycle_end (pframes_t /*nframes*/)
152 _has_been_mixed_down = false;
156 MidiPort::cycle_split ()
158 _has_been_mixed_down = false;
162 MidiPort::resolve_notes (void* port_buffer, MidiBuffer::TimeType when)
164 for (uint8_t channel = 0; channel <= 0xF; channel++) {
166 uint8_t ev[3] = { ((uint8_t) (MIDI_CMD_CONTROL | channel)), MIDI_CTL_SUSTAIN, 0 };
168 /* we need to send all notes off AND turn the
169 * sustain/damper pedal off to handle synths
170 * that prioritize sustain over AllNotesOff
173 if (port_engine.midi_event_put (port_buffer, when, ev, 3) != 0) {
174 cerr << "failed to deliver sustain-zero on channel " << (int)channel << " on port " << name() << endl;
177 ev[1] = MIDI_CTL_ALL_NOTES_OFF;
179 if (port_engine.midi_event_put (port_buffer, 0, ev, 3) != 0) {
180 cerr << "failed to deliver ALL NOTES OFF on channel " << (int)channel << " on port " << name() << endl;
186 MidiPort::flush_buffers (pframes_t nframes)
188 if (sends_output ()) {
190 void* port_buffer = 0;
192 if (_resolve_required) {
193 port_buffer = port_engine.get_buffer (_port_handle, nframes);
194 /* resolve all notes at the start of the buffer */
195 resolve_notes (port_buffer, 0);
196 _resolve_required = false;
199 if (_buffer->empty()) {
204 port_buffer = port_engine.get_buffer (_port_handle, nframes);
208 for (MidiBuffer::iterator i = _buffer->begin(); i != _buffer->end(); ++i) {
210 const Evoral::MIDIEvent<MidiBuffer::TimeType> ev (*i, false);
213 if (sends_output() && _trace_on) {
214 uint8_t const * const buf = ev.buffer();
215 const framepos_t now = AudioEngine::instance()->sample_time_at_cycle_start();
217 _self_parser.set_timestamp (now + ev.time());
219 uint32_t limit = ev.size();
221 for (size_t n = 0; n < limit; ++n) {
222 _self_parser.scanner (buf[n]);
227 // event times are in frames, relative to cycle start
230 if (DEBUG::MidiIO & PBD::debug_bits) {
232 DEBUG_STR_APPEND(a, string_compose ("MidiPort %1 pop event @ %2 sz %3 ", _buffer, ev.time(), ev.size()));
233 for (size_t i=0; i < ev.size(); ++i) {
234 DEBUG_STR_APPEND(a,hex);
235 DEBUG_STR_APPEND(a,"0x");
236 DEBUG_STR_APPEND(a,(int)(ev.buffer()[i]));
237 DEBUG_STR_APPEND(a,' ');
239 DEBUG_STR_APPEND(a,'\n');
240 DEBUG_TRACE (DEBUG::MidiIO, DEBUG_STR(a).str());
244 assert (ev.time() < (nframes + _global_port_buffer_offset + _port_buffer_offset));
246 if (ev.time() >= _global_port_buffer_offset + _port_buffer_offset) {
247 if (port_engine.midi_event_put (port_buffer, (pframes_t) ev.time(), ev.buffer(), ev.size()) != 0) {
248 cerr << "write failed, drop flushed note off on the floor, time "
249 << ev.time() << " > " << _global_port_buffer_offset + _port_buffer_offset << endl;
252 cerr << "drop flushed event on the floor, time " << ev.time()
253 << " too early for " << _global_port_buffer_offset
254 << " + " << _port_buffer_offset;
255 for (size_t xx = 0; xx < ev.size(); ++xx) {
256 cerr << ' ' << hex << (int) ev.buffer()[xx];
262 /* done.. the data has moved to the port buffer, mark it so
270 MidiPort::require_resolve ()
272 _resolve_required = true;
276 MidiPort::transport_stopped ()
278 _resolve_required = true;
282 MidiPort::realtime_locate ()
284 _resolve_required = true;
292 cerr << name() << " new MIDI buffer of size " << AudioEngine::instance()->raw_buffer_size (DataType::MIDI) << endl;
293 _buffer = new MidiBuffer (AudioEngine::instance()->raw_buffer_size (DataType::MIDI));
297 MidiPort::set_input_active (bool yn)
303 MidiPort::set_always_parse (bool yn)
309 MidiPort::set_trace_on (bool yn)