X-Git-Url: https://main.carlh.net/gitweb/?a=blobdiff_plain;f=libs%2Fardour%2Fmidi_ring_buffer.cc;h=3b8f6fc39e10903e27a420342573f122f4e1c5c2;hb=f9f0b4aabdf0df7b498ef774a608946ed488675e;hp=434fa0c33ea608242b8f6106c4832f49a6e78264;hpb=a473d630eb165272992e90f8d854b1d66ec0be63;p=ardour.git diff --git a/libs/ardour/midi_ring_buffer.cc b/libs/ardour/midi_ring_buffer.cc index 434fa0c33e..3b8f6fc39e 100644 --- a/libs/ardour/midi_ring_buffer.cc +++ b/libs/ardour/midi_ring_buffer.cc @@ -17,6 +17,8 @@ */ #include "pbd/compose.h" +#include "pbd/enumwriter.h" +#include "pbd/error.h" #include "ardour/debug.h" #include "ardour/midi_ring_buffer.h" @@ -24,9 +26,10 @@ #include "ardour/event_type_map.h" using namespace std; -using namespace ARDOUR; using namespace PBD; +namespace ARDOUR { + /** 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 @@ -34,132 +37,75 @@ using namespace PBD; */ template size_t -MidiRingBuffer::read(MidiBuffer& dst, framepos_t start, framepos_t end, framecnt_t offset, bool stop_on_overflow_in_dst) +MidiRingBuffer::read (MidiBuffer& dst, samplepos_t start, samplepos_t end, samplecnt_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; - - /* If we see the end of a loop during this read, we must write the events after it - to the MidiBuffer with adjusted times. The situation is as follows: - - session frames-----------------------------> - - | | | - start_of_loop start end_of_loop - - The MidiDiskstream::read method which will have happened before this checks for - loops ending, and helpfully inserts a magic LoopEvent into the ringbuffer. After this, - the MidiDiskstream continues to write events with their proper session frame times, - so after the LoopEvent event times will go backwards (ie non-monotonically). - - Once we hit end_of_loop, we need to fake it to make it look as though the loop has been - immediately repeated. Say that an event E after the end_of_loop in the ringbuffer - has time E_t, which is a time in session frames. Its offset from the start - of the loop will be E_t - start_of_loop. Its `faked' time will therefore be - end_of_loop + E_t - start_of_loop. And so its port-buffer-relative time (for - writing to the MidiBuffer) will be end_of_loop + E_t - start_of_loop - start. - - The subtraction of start is already taken care of, so if we see a LoopEvent, we'll - set up loop_offset to equal end_of_loop - start_of_loop, so that given an event - time E_t in the ringbuffer we can get the port-buffer-relative time as - E_t + offset - start. - */ - - frameoffset_t loop_offset = 0; - - size_t count = 0; - - const size_t prefix_size = sizeof(T) + sizeof(Evoral::EventType) + sizeof(uint32_t); + size_t count = 0; + 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; - success = this->peek (peekbuf, prefix_size); /* this cannot fail, because we've already verified that there is prefix_space to read */ - assert (success); + this->peek (peekbuf, prefix_size); - ev_time = *((T*) peekbuf); - ev_type = *((Evoral::EventType*)(peekbuf + sizeof (T))); - ev_size = *((uint32_t*)(peekbuf + sizeof(T) + sizeof (Evoral::EventType))); + ev_time = *(reinterpret_cast((uintptr_t)peekbuf)); + ev_size = *(reinterpret_cast((uintptr_t)(peekbuf + sizeof(T) + sizeof (Evoral::EventType)))); - if (ev_time + loop_offset >= end) { - DEBUG_TRACE (DEBUG::MidiDiskstreamIO, string_compose ("MRB event @ %1 past end @ %2\n", ev_time, end)); + if (this->read_space() < ev_size) { + break;; + } + + if (ev_time >= end) { + DEBUG_TRACE (DEBUG::MidiRingBuffer, string_compose ("MRB event @ %1 past end @ %2\n", ev_time, end)); break; - } else if (ev_time + loop_offset < start) { - DEBUG_TRACE (DEBUG::MidiDiskstreamIO, string_compose ("MRB event @ %1 before start @ %2\n", ev_time, start)); + } else if (ev_time < start) { + DEBUG_TRACE (DEBUG::MidiRingBuffer, 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)); + DEBUG_TRACE (DEBUG::MidiRingBuffer, string_compose ("MRB event @ %1 in range %2 .. %3\n", ev_time, start, end)); } - /* lets see if we are going to be able to write this event into dst. - */ - - 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) { - 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; - } - cerr << "MRB: Unable to reserve space in buffer, event skipped"; - this->increment_read_ptr (prefix_size + ev_size); // Advance read pointer to next event - continue; - } - /* 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); - // This event marks a loop end (i.e. the next event's timestamp will be non-monotonic) - if (ev_type == LoopEventType) { - assert (ev_size == sizeof (framepos_t)); - framepos_t loop_start; - read_contents (ev_size, (uint8_t *) &loop_start); - - loop_offset = ev_time - loop_start; - continue; - } - - ev_time += loop_offset; - uint8_t status; - success = this->peek (&status, sizeof(uint8_t)); - assert(success); // 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->increment_read_ptr (ev_size); // Advance read pointer to next event - continue; + bool r = this->peek (&status, sizeof(uint8_t)); + assert (r); // If this failed, buffer is corrupt, all hope is lost + + /* 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::MidiRingBuffer, 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 = read_contents (ev_size, write_loc); + bool success = read_contents (ev_size, write_loc); #ifndef NDEBUG - if (DEBUG::MidiDiskstreamIO && PBD::debug_bits) { + if (DEBUG_ENABLED (DEBUG::MidiRingBuffer)) { DEBUG_STR_DECL(a); - DEBUG_STR_APPEND(a, string_compose ("wrote MidiEvent to Buffer (time=%1, start=%2 offset=%3)", ev_time, start, offset)); + 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"); @@ -167,14 +113,11 @@ MidiRingBuffer::read(MidiBuffer& dst, framepos_t start, framepos_t end, frame DEBUG_STR_APPEND(a,' '); } DEBUG_STR_APPEND(a,'\n'); - DEBUG_TRACE (DEBUG::MidiDiskstreamIO, DEBUG_STR(a).str()); + DEBUG_TRACE (DEBUG::MidiRingBuffer, DEBUG_STR(a).str()); } #endif - if (success) { - if (is_channel_event(status) && get_channel_mode() == ForceChannel) { - write_loc[0] = (write_loc[0] & 0xF0) | (get_channel_mask() & 0x0F); - } + _tracker.track(write_loc); ++count; } else { cerr << "WARNING: error reading event contents from MIDI ring" << endl; @@ -184,6 +127,101 @@ MidiRingBuffer::read(MidiBuffer& dst, framepos_t start, framepos_t end, frame return count; } +template +size_t +MidiRingBuffer::skip_to(samplepos_t start) +{ + if (this->read_space() == 0) { + return 0; + } + + T ev_time; + uint32_t ev_size; + size_t count = 0; + const size_t prefix_size = sizeof(T) + sizeof(Evoral::EventType) + sizeof(uint32_t); + + while (this->read_space() >= prefix_size) { + + uint8_t peekbuf[prefix_size]; + this->peek (peekbuf, prefix_size); + + ev_time = *(reinterpret_cast((uintptr_t)peekbuf)); + ev_size = *(reinterpret_cast((uintptr_t)(peekbuf + sizeof(T) + sizeof (Evoral::EventType)))); + + if (ev_time >= start) { + return count; + } + + if (this->read_space() < ev_size) { + continue; + } + + this->increment_read_ptr (prefix_size); + + uint8_t status; + bool r = this->peek (&status, sizeof(uint8_t)); + assert (r); // If this failed, buffer is corrupt, all hope is lost + + ++count; + + /* TODO investigate and think: + * + * Does it makes sense to keep track of notes + * that are skipped (because they're either too late + * (underrun) or never used (read-ahead, loop) ? + * + * skip_to() is called on the rinbuffer between + * disk and process. it seems wrong to track them + * (a potential synth never sees skipped notes, either) + * but there may be more to this. + */ + + if (ev_size >= 8) { + this->increment_read_ptr (ev_size); + } else { + // we only track note on/off, 8 bytes are plenty. + uint8_t write_loc[8]; + bool success = read_contents (ev_size, write_loc); + if (success) { + _tracker.track(write_loc); + } + } + } + return count; +} + + + +template +void +MidiRingBuffer::flush (samplepos_t /*start*/, samplepos_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 = *(reinterpret_cast((uintptr_t)peekbuf)); + + if (ev_time >= end) { + break; + } + + ev_size = *(reinterpret_cast((uintptr_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) @@ -191,7 +229,7 @@ MidiRingBuffer::dump(ostream& str) size_t rspace; if ((rspace = this->read_space()) == 0) { - str << "MRB::dump: empty\n"; + str << this << " MRB::dump: empty\n"; return; } @@ -262,5 +300,27 @@ MidiRingBuffer::dump(ostream& str) delete [] buf; } -template class MidiRingBuffer; +template +void +MidiRingBuffer::reset_tracker () +{ + _tracker.reset (); +} + +template +void +MidiRingBuffer::resolve_tracker (MidiBuffer& dst, samplepos_t t) +{ + _tracker.resolve_notes (dst, t); +} + +template +void +MidiRingBuffer::resolve_tracker (Evoral::EventSink& dst, samplepos_t t) +{ + _tracker.resolve_notes(dst, t); +} + +template class MidiRingBuffer; +} // namespace ARDOUR