Move EventRingBuffer to libardour.
[ardour.git] / libs / ardour / midi_playlist.cc
index b2318bbe96257e74ef3135f288fe155902093259..36b6fce75fa60d3cda434d0655e99b694c82d4df 100644 (file)
@@ -1,17 +1,17 @@
 /*
-    Copyright (C) 2006 Paul Davis 
-       Written by Dave Robillard, 2006
+    Copyright (C) 2006 Paul Davis
+    Author: David Robillard
 
     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
     the Free Software Foundation; either version 2 of the License, or
     (at your option) any later version.
+
     This program is distributed in the hope that it will be useful,
     but WITHOUT ANY WARRANTY; without even the implied warranty of
     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
     GNU General Public License for more details.
+
     You should have received a copy of the GNU General Public License
     along with this program; if not, write to the Free Software
     Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
 #include <cassert>
 
 #include <algorithm>
+#include <iostream>
+#include <utility>
 
 #include <stdlib.h>
 
-#include <sigc++/bind.h>
+#include "evoral/EventList.hpp"
 
-#include <ardour/types.h>
-#include <ardour/configuration.h>
-#include <ardour/midi_playlist.h>
-#include <ardour/midi_region.h>
-#include <ardour/session.h>
-#include <ardour/midi_ring_buffer.h>
-
-#include <pbd/error.h>
+#include "ardour/debug.h"
+#include "ardour/midi_model.h"
+#include "ardour/midi_playlist.h"
+#include "ardour/midi_region.h"
+#include "ardour/midi_state_tracker.h"
+#include "ardour/types.h"
 
 #include "i18n.h"
 
 using namespace ARDOUR;
-using namespace sigc;
+using namespace PBD;
 using namespace std;
 
 MidiPlaylist::MidiPlaylist (Session& session, const XMLNode& node, bool hidden)
-               : Playlist (session, node, DataType::MIDI, hidden)
+       : Playlist (session, node, DataType::MIDI, hidden)
+       , _note_mode(Sustained)
 {
+#ifndef NDEBUG
        const XMLProperty* prop = node.property("type");
        assert(prop && DataType(prop->value()) == DataType::MIDI);
+#endif
 
-       in_set_state = true;
-       set_state (node);
-       in_set_state = false;
-
-       if (!hidden) {
-               PlaylistCreated (this); /* EMIT SIGNAL */
+       in_set_state++;
+       if (set_state (node, Stateful::loading_state_version)) {
+               throw failed_constructor ();
        }
+       in_set_state--;
+
+       relayer ();
 }
 
 MidiPlaylist::MidiPlaylist (Session& session, string name, bool hidden)
-               : Playlist (session, name, DataType::MIDI, hidden)
+       : Playlist (session, name, DataType::MIDI, hidden)
+       , _note_mode(Sustained)
 {
-       if (!hidden) {
-               PlaylistCreated (this); /* EMIT SIGNAL */
-       }
-
 }
 
-MidiPlaylist::MidiPlaylist (const MidiPlaylist& other, string name, bool hidden)
-               : Playlist (other, name, hidden)
+MidiPlaylist::MidiPlaylist (boost::shared_ptr<const MidiPlaylist> other, string name, bool hidden)
+       : Playlist (other, name, hidden)
+       , _note_mode(other->_note_mode)
 {
-       throw; // nope
-
-       /*
-       list<Region*>::const_iterator in_o  = other.regions.begin();
-       list<Region*>::iterator in_n = regions.begin();
-
-       while (in_o != other.regions.end()) {
-               MidiRegion *ar = dynamic_cast<MidiRegion *>( (*in_o) );
-
-               for (list<Crossfade *>::const_iterator xfades = other._crossfades.begin(); xfades != other._crossfades.end(); ++xfades) {
-                       if ( &(*xfades)->in() == ar) {
-                               // We found one! Now copy it!
-
-                               list<Region*>::const_iterator out_o = other.regions.begin();
-                               list<Region*>::const_iterator out_n = regions.begin();
-
-                               while (out_o != other.regions.end()) {
-
-                                       MidiRegion *ar2 = dynamic_cast<MidiRegion *>( (*out_o) );
-
-                                       if ( &(*xfades)->out() == ar2) {
-                                               MidiRegion *in  = dynamic_cast<MidiRegion*>( (*in_n) );
-                                               MidiRegion *out = dynamic_cast<MidiRegion*>( (*out_n) );
-                                               Crossfade *new_fade = new Crossfade( *(*xfades), in, out);
-                                               add_crossfade(*new_fade);
-                                               break;
-                                       }
-
-                                       out_o++;
-                                       out_n++;
-                               }
-                               //                              cerr << "HUH!? second region in the crossfade not found!" << endl;
-                       }
-               }
-
-               in_o++;
-               in_n++;
-       }
-*/
-       if (!hidden) {
-               PlaylistCreated (this); /* EMIT SIGNAL */
-       }
 }
 
-MidiPlaylist::MidiPlaylist (const MidiPlaylist& other, jack_nframes_t start, jack_nframes_t dur, string name, bool hidden)
-               : Playlist (other, start, dur, name, hidden)
+MidiPlaylist::MidiPlaylist (boost::shared_ptr<const MidiPlaylist> other, framepos_t start, framecnt_t dur, string name, bool hidden)
+       : Playlist (other, start, dur, name, hidden)
+       , _note_mode(other->_note_mode)
 {
        /* this constructor does NOT notify others (session) */
 }
 
 MidiPlaylist::~MidiPlaylist ()
 {
-       GoingAway (); /* EMIT SIGNAL */
 }
 
-struct RegionSortByLayer {
-    bool operator() (boost::shared_ptr<Region> a, boost::shared_ptr<Region> b) {
-           return a->layer() < b->layer();
+template<typename Time>
+struct EventsSortByTimeAndType {
+    bool operator() (Evoral::Event<Time>* a, Evoral::Event<Time>* b) {
+           if (a->time() == b->time()) {
+                   if (parameter_is_midi ((AutomationType)a->event_type()) &&
+                       parameter_is_midi ((AutomationType)b->event_type())) {
+                           /* negate return value since we must return whether
+                            * or not a should sort before b, not b before a
+                            */
+                           return !MidiBuffer::second_simultaneous_midi_byte_is_first (a->buffer()[0], b->buffer()[0]);
+                   }
+           }
+           return a->time() < b->time();
     }
 };
 
 /** Returns the number of frames in time duration read (eg could be large when 0 events are read) */
-jack_nframes_t
-MidiPlaylist::read (MidiRingBuffer& dst, jack_nframes_t start,
-                     jack_nframes_t dur, unsigned chan_n)
+framecnt_t
+MidiPlaylist::read (Evoral::EventSink<framepos_t>& dst, framepos_t start, framecnt_t dur, unsigned chan_n)
 {
        /* this function is never called from a realtime thread, so
           its OK to block (for short intervals).
        */
 
-       Glib::Mutex::Lock rm (region_lock);
+       Playlist::RegionReadLock rl (this);
 
-       jack_nframes_t ret         = 0;
-       jack_nframes_t end         = start + dur - 1;
-       //jack_nframes_t read_frames = 0;
-       //jack_nframes_t skip_frames = 0;
+       DEBUG_TRACE (DEBUG::MidiPlaylistIO, string_compose ("++++++ %1 .. %2  +++++++ %3 trackers +++++++++++++++++\n", 
+                                                           start, start + dur, _note_trackers.size()));
 
-       //_read_data_count = 0;
+       framepos_t end = start + dur - 1;
 
        // relevent regions overlapping start <--> end
-       vector<boost::shared_ptr<Region> > regs;
+       vector< boost::shared_ptr<Region> > regs;
+       vector< boost::shared_ptr<Region> > ended;
+       typedef pair<MidiStateTracker*,framepos_t> TrackerInfo;
+       vector<TrackerInfo> tracker_info;
+       NoteTrackers::iterator t;
 
        for (RegionList::iterator i = regions.begin(); i != regions.end(); ++i) {
 
-               if ((*i)->coverage (start, end) != OverlapNone) {
-                       regs.push_back(*i);
+               /* in this call to coverage, the return value indicates the
+                * overlap status of the read range (start...end) WRT to 
+                * the region.
+                */
+
+               switch ((*i)->coverage (start, end)) {
+               case Evoral::OverlapStart:
+               case Evoral::OverlapInternal:
+               case Evoral::OverlapExternal:
+                       regs.push_back (*i);
+                       break;
+
+               case Evoral::OverlapEnd:
+                       /* this region ends within the read range */
+                       regs.push_back (*i);
+                       ended.push_back (*i);
+                       break;
+               default:
+                       /* we don't care */
+                       break;
                }
        }
 
-       RegionSortByLayer layer_cmp;
-       sort(regs.begin(), regs.end(), layer_cmp);
+       if (regs.size() == 1 && 
+           (ended.empty() || (ended.size() == 1 && ended.front() == regs.front()))) {
 
-       for (vector<boost::shared_ptr<Region> >::iterator i = regs.begin(); i != regs.end(); ++i) {
-               // FIXME: ensure time is monotonic here
-               boost::shared_ptr<MidiRegion> mr = boost::dynamic_pointer_cast<MidiRegion>(*i);
-               mr->read_at (dst, start, dur, chan_n, 0, 0);// FIXME read_frames, skip_frames);
-               ret += mr->read_data_count();
-       }
+               /* just a single region - read directly into dst */
 
-       _read_data_count += ret;
-       
-       //return ret; FIXME?
-       return dur;
-}
+               DEBUG_TRACE (DEBUG::MidiPlaylistIO, string_compose ("Single region (%1) read, ended during this read %2\n", regs.front()->name(),
+                                                                   ended.size()));
 
+               boost::shared_ptr<MidiRegion> mr = boost::dynamic_pointer_cast<MidiRegion>(regs.front());
 
-void
-MidiPlaylist::remove_dependents (boost::shared_ptr<Region> region)
-{
-}
+               if (mr) {
 
+                       NoteTrackers::iterator t = _note_trackers.find (mr.get());
+                       MidiStateTracker* tracker;
+                       bool new_tracker = false;
 
-void
-MidiPlaylist::flush_notifications ()
-{
-       Playlist::flush_notifications();
+                       if (t == _note_trackers.end()) {
+                               tracker = new MidiStateTracker;
+                               new_tracker = true;
+                               DEBUG_TRACE (DEBUG::MidiPlaylistIO, "\tBEFORE: new tracker\n");
+                       } else {
+                               tracker = t->second;
+                               DEBUG_TRACE (DEBUG::MidiPlaylistIO, string_compose ("\tBEFORE: tracker says there are %1 on notes\n", tracker->on()));
+                       }
 
-       if (in_flush) {
-               return;
-       }
+                       mr->read_at (dst, start, dur, chan_n, _note_mode, tracker);
+                       DEBUG_TRACE (DEBUG::MidiPlaylistIO, string_compose ("\tAFTER: tracker says there are %1 on notes\n", tracker->on()));
 
-       in_flush = true;
+                       if (!ended.empty()) {
+                               DEBUG_TRACE (DEBUG::MidiPlaylistIO, string_compose ("\t%1 ended in this read, resolve notes and delete (%2) tracker\n",
+                                                                                   mr->name(), ((new_tracker) ? "new" : "old")));
+                               tracker->resolve_notes (dst, mr->last_frame());
+                               delete tracker;
+                               if (!new_tracker) {
+                                       _note_trackers.erase (t);
+                               }
+                       } else {
+                               if (new_tracker) {
+                                       pair<Region*,MidiStateTracker*> newpair;
+                                       newpair.first = mr.get();
+                                       newpair.second = tracker;
+                                       _note_trackers.insert (newpair);
+                                       DEBUG_TRACE (DEBUG::MidiPlaylistIO, "\tadded tracker to trackers\n");
+                               }
+                       }
+               }
 
-       in_flush = false;
-}
+       } else {
 
-void
-MidiPlaylist::refresh_dependents (boost::shared_ptr<Region> r)
-{
-}
+               /* multiple regions and/or note resolution: sort by layer, read into a temporary non-monotonically
+                  sorted EventSink, sort and then insert into dst.
+               */
 
-void
-MidiPlaylist::finalize_split_region (boost::shared_ptr<Region> original, boost::shared_ptr<Region> left, boost::shared_ptr<Region> right)
-{
-       throw; // I don't wanna
-       /*
-       MidiRegion *orig  = dynamic_cast<MidiRegion*>(o);
-       MidiRegion *left  = dynamic_cast<MidiRegion*>(l);
-       MidiRegion *right = dynamic_cast<MidiRegion*>(r);
-
-       for (Crossfades::iterator x = _crossfades.begin(); x != _crossfades.end();) {
-               Crossfades::iterator tmp;
-               tmp = x;
-               ++tmp;
-
-               Crossfade *fade = 0;
-
-               if ((*x)->_in == orig) {
-                       if (! (*x)->covers(right->position())) {
-                               fade = new Crossfade( *(*x), left, (*x)->_out);
+               DEBUG_TRACE (DEBUG::MidiPlaylistIO, string_compose ("%1 regions to read, plus %2 trackers\n", regs.size(), tracker_info.size()));
+
+               Evoral::EventList<framepos_t> evlist;
+
+               DEBUG_TRACE (DEBUG::MidiPlaylistIO, string_compose ("for %1 .. %2 we have %3 to consider\n", start, start+dur-1, regs.size()));
+
+               for (vector<boost::shared_ptr<Region> >::iterator i = regs.begin(); i != regs.end(); ++i) {
+
+                       boost::shared_ptr<MidiRegion> mr = boost::dynamic_pointer_cast<MidiRegion>(*i);
+
+                       if (!mr) {
+                               continue;
+                       }
+
+                       NoteTrackers::iterator t = _note_trackers.find (mr.get());
+                       MidiStateTracker* tracker;
+                       bool new_tracker = false;
+
+                       DEBUG_TRACE (DEBUG::MidiPlaylistIO, string_compose ("Before %1 (%2 .. %3) we now have %4 events\n", mr->name(), mr->position(), mr->last_frame(), evlist.size()));
+
+                       if (t == _note_trackers.end()) {
+                               tracker = new MidiStateTracker;
+                               new_tracker = true;
+                               DEBUG_TRACE (DEBUG::MidiPlaylistIO, "\tBEFORE: new tracker\n");
                        } else {
-                               // Overlap, the crossfade is copied on the left side of the right region instead
-                               fade = new Crossfade( *(*x), right, (*x)->_out);
+                               tracker = t->second;
+                               DEBUG_TRACE (DEBUG::MidiPlaylistIO, string_compose ("\tBEFORE: tracker says there are %1 on notes\n", tracker->on()));
                        }
-               }
 
-               if ((*x)->_out == orig) {
-                       if (! (*x)->covers(right->position())) {
-                               fade = new Crossfade( *(*x), (*x)->_in, right);
+
+                       mr->read_at (evlist, start, dur, chan_n, _note_mode, tracker);
+
+#ifndef NDEBUG
+                       DEBUG_TRACE (DEBUG::MidiPlaylistIO, string_compose ("After %1 (%2 .. %3) we now have %4\n", mr->name(), mr->position(), mr->last_frame(), evlist.size()));
+                       for (Evoral::EventList<framepos_t>::iterator x = evlist.begin(); x != evlist.end(); ++x) {
+                               DEBUG_TRACE (DEBUG::MidiPlaylistIO, string_compose ("\t%1\n", **x));
+                       }
+                       DEBUG_TRACE (DEBUG::MidiPlaylistIO, string_compose ("\tAFTER: tracker says there are %1 on notes\n", tracker->on()));
+#endif
+                       if (find (ended.begin(), ended.end(), *i) != ended.end()) {
+
+                               /* the region ended within the read range, so
+                                * resolve any dangling notes (i.e. notes whose
+                                * end is beyond the end of the region).
+                                */
+                               
+                               DEBUG_TRACE (DEBUG::MidiPlaylistIO, string_compose ("\t%1 ended in this read, resolve notes and delete (%2) tracker\n",
+                                                                                   mr->name(), ((new_tracker) ? "new" : "old")));
+
+                               tracker->resolve_notes (evlist, (*i)->last_frame());
+                               delete tracker;
+                               if (!new_tracker) {
+                                       _note_trackers.erase (t);
+                               }
+
                        } else {
-                               // Overlap, the crossfade is copied on the right side of the left region instead
-                               fade = new Crossfade( *(*x), (*x)->_in, left);
+
+                               if (new_tracker) {
+                                       _note_trackers.insert (make_pair (mr.get(), tracker));
+                                       DEBUG_TRACE (DEBUG::MidiPlaylistIO, "\tadded tracker to trackers\n");
+                               }
                        }
                }
 
-               if (fade) {
-                       _crossfades.remove( (*x) );
-                       add_crossfade (*fade);
+               if (!evlist.empty()) {
+
+                       /* sort the event list */
+                       EventsSortByTimeAndType<framepos_t> cmp;
+                       evlist.sort (cmp);
+
+#ifndef NDEBUG
+                       DEBUG_TRACE (DEBUG::MidiPlaylistIO, string_compose ("Final we now have %1 events\n",  evlist.size()));
+                       for (Evoral::EventList<framepos_t>::iterator x = evlist.begin(); x != evlist.end(); ++x) {
+                               DEBUG_TRACE (DEBUG::MidiPlaylistIO, string_compose ("\t%1\n", **x));
+                       }
+#endif
+                       /* write into dst */
+                       for (Evoral::EventList<framepos_t>::iterator e = evlist.begin(); e != evlist.end(); ++e) {
+                               Evoral::Event<framepos_t>* ev (*e);
+                               dst.write (ev->time(), ev->event_type(), ev->size(), ev->buffer());
+                               delete ev;
+                       }
+
                }
-               x = tmp;
-       }*/
+       }
+
+       DEBUG_TRACE (DEBUG::MidiPlaylistIO, "-------------------------------------------------------------\n");
+       return dur;
 }
 
 void
-MidiPlaylist::check_dependents (boost::shared_ptr<Region> r, bool norefresh)
+MidiPlaylist::clear_note_trackers ()
 {
-}
-
+       Playlist::RegionWriteLock rl (this, false);
 
-int
-MidiPlaylist::set_state (const XMLNode& node)
-{
-       if (!in_set_state) {
-               Playlist::set_state (node);
+       for (NoteTrackers::iterator n = _note_trackers.begin(); n != _note_trackers.end(); ++n) {
+               delete n->second;
        }
+       DEBUG_TRACE (DEBUG::MidiTrackers, string_compose ("%1 clears all note trackers\n", name()));
+       _note_trackers.clear ();
+}
 
-       // Actually Charles, I don't much care for children
-       
-       /*
-       XMLNodeList nlist = node.children();
-
-       for (XMLNodeConstIterator niter = nlist.begin(); niter != nlist.end(); ++niter) {
-
-               XMLNode* const child = *niter;
+void
+MidiPlaylist::remove_dependents (boost::shared_ptr<Region> region)
+{
+       /* MIDI regions have no dependents (crossfades) but we might be tracking notes */
+       NoteTrackers::iterator t = _note_trackers.find (region.get());
 
-       }*/
+       /* GACK! THREAD SAFETY! */
 
-       return 0;
+       if (t != _note_trackers.end()) {
+               delete t->second;
+               _note_trackers.erase (t);
+       }
 }
 
-XMLNode&
-MidiPlaylist::state (bool full_state)
+int
+MidiPlaylist::set_state (const XMLNode& node, int version)
 {
-       XMLNode& node = Playlist::state (full_state);
+       in_set_state++;
+       freeze ();
+
+       if (Playlist::set_state (node, version)) {
+               return -1;
+       }
+
+       thaw();
+       in_set_state--;
 
-       return node;
+       return 0;
 }
 
 void
@@ -300,17 +354,15 @@ bool
 MidiPlaylist::destroy_region (boost::shared_ptr<Region> region)
 {
        boost::shared_ptr<MidiRegion> r = boost::dynamic_pointer_cast<MidiRegion> (region);
-       bool changed = false;
 
-       if (r == 0) {
-               PBD::fatal << _("programming error: non-midi Region passed to remove_overlap in midi playlist")
-               << endmsg;
-               /*NOTREACHED*/
+       if (!r) {
                return false;
        }
 
+       bool changed = false;
+
        {
-               RegionLock rlock (this);
+               RegionWriteLock rlock (this);
                RegionList::iterator i;
                RegionList::iterator tmp;
 
@@ -337,28 +389,43 @@ MidiPlaylist::destroy_region (boost::shared_ptr<Region> region)
        return changed;
 }
 
+set<Evoral::Parameter>
+MidiPlaylist::contained_automation()
+{
+       /* this function is never called from a realtime thread, so
+          its OK to block (for short intervals).
+       */
+
+       Playlist::RegionReadLock rl (this);
+       set<Evoral::Parameter> ret;
+
+       for (RegionList::const_iterator r = regions.begin(); r != regions.end(); ++r) {
+               boost::shared_ptr<MidiRegion> mr = boost::dynamic_pointer_cast<MidiRegion>(*r);
+
+               for (Automatable::Controls::iterator c = mr->model()->controls().begin();
+                               c != mr->model()->controls().end(); ++c) {
+                       ret.insert(c->first);
+               }
+       }
+
+       return ret;
+}
+
+
 bool
-MidiPlaylist::region_changed (Change what_changed, boost::shared_ptr<Region> region)
+MidiPlaylist::region_changed (const PBD::PropertyChange& what_changed, boost::shared_ptr<Region> region)
 {
        if (in_flush || in_set_state) {
                return false;
        }
 
-       // Feeling rather uninterested today, but thanks for the heads up anyway!
-       
-       Change our_interests = Change (/*MidiRegion::FadeInChanged|
-                                      MidiRegion::FadeOutChanged|
-                                      MidiRegion::FadeInActiveChanged|
-                                      MidiRegion::FadeOutActiveChanged|
-                                      MidiRegion::EnvelopeActiveChanged|
-                                      MidiRegion::ScaleAmplitudeChanged|
-                                      MidiRegion::EnvelopeChanged*/);
-       bool parent_wants_notify;
-
-       parent_wants_notify = Playlist::region_changed (what_changed, region);
-
-       if ((parent_wants_notify || (what_changed & our_interests))) {
-               notify_modified ();
+       PBD::PropertyChange our_interests;
+       our_interests.add (Properties::midi_data);
+
+       bool parent_wants_notify = Playlist::region_changed (what_changed, region);
+
+       if (parent_wants_notify || what_changed.contains (our_interests)) {
+               notify_contents_changed ();
        }
 
        return true;