X-Git-Url: https://main.carlh.net/gitweb/?a=blobdiff_plain;ds=sidebyside;f=libs%2Fardour%2Fmidi_ring_buffer.cc;h=db3a4cb1090f8c414503d9a673d7c1e4643aee13;hb=07112b55e0bb7ceb9e5c05ab4df167ecaf7edd9b;hp=469222d5d7b2f1912055100253effc7a21d4ef3d;hpb=848df74e581b1c73e40a6a606f5be8d1f2dd922d;p=ardour.git diff --git a/libs/ardour/midi_ring_buffer.cc b/libs/ardour/midi_ring_buffer.cc index 469222d5d7..db3a4cb109 100644 --- a/libs/ardour/midi_ring_buffer.cc +++ b/libs/ardour/midi_ring_buffer.cc @@ -16,105 +16,121 @@ Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. */ +#include "pbd/compose.h" +#include "pbd/error.h" + +#include "ardour/debug.h" #include "ardour/midi_ring_buffer.h" #include "ardour/midi_buffer.h" #include "ardour/event_type_map.h" using namespace std; +using namespace PBD; namespace ARDOUR { -/** Read a block of MIDI events from buffer. +/** Read a block of MIDI events from this buffer into a MidiBuffer. * * Timestamps of events returned are relative to start (i.e. event with stamp 0 * occurred at start), with offset added. */ template size_t -MidiRingBuffer::read(MidiBuffer& dst, nframes_t start, nframes_t end, nframes_t offset) +MidiRingBuffer::read(MidiBuffer& dst, framepos_t start, framepos_t end, framecnt_t offset, bool stop_on_overflow_in_dst) { if (this->read_space() == 0) { return 0; } T ev_time; - Evoral::EventType ev_type; uint32_t ev_size; + size_t count = 0; + const size_t prefix_size = sizeof(T) + sizeof(Evoral::EventType) + sizeof(uint32_t); - size_t count = 0; + while (this->read_space() >= prefix_size) { - //cerr << "MRB read " << start << " .. " << end << " + " << offset << endl; + uint8_t peekbuf[prefix_size]; - while (this->read_space() >= sizeof(T) + sizeof(Evoral::EventType) + sizeof(uint32_t)) { + /* this cannot fail, because we've already verified that there + is prefix_space to read + */ + this->peek (peekbuf, prefix_size); - this->full_peek(sizeof(T), (uint8_t*)&ev_time); + ev_time = *((T*) peekbuf); + ev_size = *((uint32_t*)(peekbuf + sizeof(T) + sizeof (Evoral::EventType))); - if (ev_time > end) { - //cerr << "MRB event @ " << ev_time << " past end @ " << end << endl; + if (ev_time >= end) { + DEBUG_TRACE (DEBUG::MidiDiskstreamIO, string_compose ("MRB event @ %1 past end @ %2\n", ev_time, end)); break; } else if (ev_time < start) { - //cerr << "MRB event @ " << ev_time << " before start @ " << start << endl; + DEBUG_TRACE (DEBUG::MidiDiskstreamIO, string_compose ("MRB event @ %1 before start @ %2\n", ev_time, start)); break; + } else { + DEBUG_TRACE (DEBUG::MidiDiskstreamIO, string_compose ("MRB event @ %1 in range %2 .. %3\n", ev_time, start, end)); } - bool success = read_prefix(&ev_time, &ev_type, &ev_size); - if (!success) { - cerr << "WARNING: error reading event prefix from MIDI ring" << endl; - continue; - } + ev_time -= start; + ev_time += offset; - // This event marks a loop end (i.e. the next event's timestamp will be non-monotonic) - if (ev_type == LoopEventType) { - ev_time -= start; - ev_time += offset; - Evoral::MIDIEvent loopevent(LoopEventType, ev_time); - dst.push_back(loopevent); - - // We can safely return, without reading the data, because - // a LoopEvent does not have data. - cerr << "MRB loop boundary @ " << ev_time << endl; - return count + 1; - } + /* we're good to go ahead and read the data now but since we + * have the prefix data already, just skip over that + */ + this->increment_read_ptr (prefix_size); uint8_t status; - success = this->full_peek(sizeof(uint8_t), &status); - assert(success); // If this failed, buffer is corrupt, all hope is lost + bool r = this->peek (&status, sizeof(uint8_t)); + assert (r); // If this failed, buffer is corrupt, all hope is lost // Ignore event if it doesn't match channel filter if (is_channel_event(status) && get_channel_mode() == FilterChannels) { const uint8_t channel = status & 0x0F; if (!(get_channel_mask() & (1L << channel))) { - //cerr << "MRB skipping event due to channel mask" << endl; - this->skip(ev_size); // Advance read pointer to next event + DEBUG_TRACE (DEBUG::MidiDiskstreamIO, string_compose ("MRB skipping event (%3 bytes) due to channel mask (mask = %1 chn = %2)\n", + get_channel_mask(), (int) channel, ev_size)); + this->increment_read_ptr (ev_size); // Advance read pointer to next event continue; } } - /*cerr << "MRB " << this << " - Reading event, time = " - << ev_time << " - " << start << " => " << ev_time - start - << ", size = " << ev_size << endl;*/ - - assert(ev_time >= start); - ev_time -= start; - ev_time += offset; - - // write the timestamp to address (write_loc - 1) - uint8_t* write_loc = dst.reserve(ev_time, ev_size); - if (write_loc == NULL) { - cerr << "MRB: Unable to reserve space in buffer, event skipped"; + /* lets see if we are going to be able to write this event into dst. + */ + uint8_t* write_loc = dst.reserve (ev_time, ev_size); + if (write_loc == 0) { + if (stop_on_overflow_in_dst) { + DEBUG_TRACE (DEBUG::MidiDiskstreamIO, string_compose ("MidiRingBuffer: overflow in destination MIDI buffer, stopped after %1 events\n", count)); + break; + } + error << "MRB: Unable to reserve space in buffer, event skipped" << endmsg; + this->increment_read_ptr (ev_size); // Advance read pointer to next event continue; } - + // write MIDI buffer contents - success = Evoral::EventRingBuffer::full_read(ev_size, write_loc); - - /*cerr << "wrote MidiEvent to Buffer: "; - for (size_t i=0; i < ev_size; ++i) { - printf("%X ", write_loc[i]); + bool success = read_contents (ev_size, write_loc); + +#ifndef NDEBUG + if (DEBUG::MidiDiskstreamIO && PBD::debug_bits) { + DEBUG_STR_DECL(a); + DEBUG_STR_APPEND(a, string_compose ("wrote MidiEvent to Buffer (time=%1, start=%2 offset=%3)", ev_time, start, offset)); + for (size_t i=0; i < ev_size; ++i) { + DEBUG_STR_APPEND(a,hex); + DEBUG_STR_APPEND(a,"0x"); + DEBUG_STR_APPEND(a,(int)write_loc[i]); + DEBUG_STR_APPEND(a,' '); + } + DEBUG_STR_APPEND(a,'\n'); + DEBUG_TRACE (DEBUG::MidiDiskstreamIO, DEBUG_STR(a).str()); } - printf("\n");*/ +#endif if (success) { + + if (is_note_on(write_loc[0]) ) { + _tracker.add (write_loc[1], write_loc[0] & 0xf); + } else if (is_note_off(write_loc[0])) { + _tracker.remove (write_loc[1], write_loc[0] & 0xf); + } + if (is_channel_event(status) && get_channel_mode() == ForceChannel) { write_loc[0] = (write_loc[0] & 0xF0) | (get_channel_mask() & 0x0F); } @@ -123,11 +139,132 @@ MidiRingBuffer::read(MidiBuffer& dst, nframes_t start, nframes_t end, nframes cerr << "WARNING: error reading event contents from MIDI ring" << endl; } } - + return count; } -template class MidiRingBuffer; +template +void +MidiRingBuffer::flush (framepos_t /*start*/, framepos_t end) +{ + const size_t prefix_size = sizeof(T) + sizeof(Evoral::EventType) + sizeof(uint32_t); + + while (this->read_space() >= prefix_size) { + uint8_t peekbuf[prefix_size]; + bool success; + uint32_t ev_size; + T ev_time; + + success = this->peek (peekbuf, prefix_size); + /* this cannot fail, because we've already verified that there + is prefix_space to read + */ + assert (success); + + ev_time = *((T*) peekbuf); + + if (ev_time >= end) { + break; + } + + ev_size = *((uint32_t*)(peekbuf + sizeof(T) + sizeof (Evoral::EventType))); + this->increment_read_ptr (prefix_size); + this->increment_read_ptr (ev_size); + } +} + +template +void +MidiRingBuffer::dump(ostream& str) +{ + size_t rspace; + + if ((rspace = this->read_space()) == 0) { + str << "MRB::dump: empty\n"; + return; + } + + T ev_time; + Evoral::EventType ev_type; + uint32_t ev_size; + + RingBufferNPT::rw_vector vec; + RingBufferNPT::get_read_vector (&vec); + + if (vec.len[0] == 0) { + return; + } + + str << this << ": Dump size = " << vec.len[0] + vec.len[1] + << " r@ " << RingBufferNPT::get_read_ptr() + << " w@" << RingBufferNPT::get_write_ptr() << endl; + + + uint8_t *buf = new uint8_t[vec.len[0] + vec.len[1]]; + memcpy (buf, vec.buf[0], vec.len[0]); + + if (vec.len[1]) { + memcpy (buf+vec.len[1], vec.buf[1], vec.len[1]); + } + + uint8_t* data = buf; + const uint8_t* end = buf + vec.len[0] + vec.len[1]; + + while (data < end) { + + memcpy (&ev_time, data, sizeof (T)); + data += sizeof (T); + str << "\ttime " << ev_time; + + if (data >= end) { + str << "(incomplete)\n "; + break; + } + + memcpy (&ev_type, data, sizeof (ev_type)); + data += sizeof (ev_type); + str << " type " << ev_type; + + if (data >= end) { + str << "(incomplete)\n"; + break; + } + + memcpy (&ev_size, data, sizeof (ev_size)); + data += sizeof (ev_size); + str << " size " << ev_size; + + if (data >= end) { + str << "(incomplete)\n"; + break; + } + + for (uint32_t i = 0; i != ev_size && data < end; ++i) { + str << ' ' << hex << (int) data[i] << dec; + } + + data += ev_size; + + str << endl; + } + + delete [] buf; +} + +template +void +MidiRingBuffer::reset_tracker () +{ + _tracker.reset (); +} + +template +void +MidiRingBuffer::loop_resolve (MidiBuffer& dst, framepos_t t) +{ + _tracker.resolve_notes (dst, t); +} -} // namespace ARDOUR +template class MidiRingBuffer; +} // namespace ARDOUR