do not allow smf_source's reads to stomp on cached read_end position in parent class...
[ardour.git] / libs / ardour / midi_region.cc
index c0d63cc2ba200e656b3c793644f768c76a93970b..aca8d039ad218b01f3268e50a84cc5510439afb5 100644 (file)
 
 #include <glibmm/thread.h>
 
-#include <pbd/basename.h>
-#include <pbd/xml++.h>
-
-#include <ardour/midi_region.h>
-#include <ardour/session.h>
-#include <ardour/gain.h>
-#include <ardour/dB.h>
-#include <ardour/playlist.h>
-#include <ardour/midi_source.h>
-#include <ardour/types.h>
-#include <ardour/midi_ring_buffer.h>
+#include "pbd/basename.h"
+#include "pbd/xml++.h"
+#include "pbd/enumwriter.h"
+
+#include "ardour/midi_region.h"
+#include "ardour/session.h"
+#include "ardour/gain.h"
+#include "ardour/dB.h"
+#include "ardour/playlist.h"
+#include "ardour/midi_source.h"
+#include "ardour/types.h"
+#include "ardour/midi_ring_buffer.h"
 
 #include "i18n.h"
 #include <locale.h>
@@ -48,48 +49,43 @@ using namespace std;
 using namespace ARDOUR;
 
 /** Basic MidiRegion constructor (one channel) */
-MidiRegion::MidiRegion (boost::shared_ptr<MidiSource> src, jack_nframes_t start, jack_nframes_t length)
+MidiRegion::MidiRegion (boost::shared_ptr<MidiSource> src, nframes_t start, nframes_t length)
        : Region (src, start, length, PBD::basename_nosuffix(src->name()), DataType::MIDI, 0,  Region::Flag(Region::DefaultFlags|Region::External))
 {
-       save_state ("initial state");
-
        assert(_name.find("/") == string::npos);
+       midi_source(0)->Switched.connect(sigc::mem_fun(this, &MidiRegion::switch_source));
 }
 
 /* Basic MidiRegion constructor (one channel) */
-MidiRegion::MidiRegion (boost::shared_ptr<MidiSource> src, jack_nframes_t start, jack_nframes_t length, const string& name, layer_t layer, Flag flags)
+MidiRegion::MidiRegion (boost::shared_ptr<MidiSource> src, nframes_t start, nframes_t length, const string& name, layer_t layer, Flag flags)
        : Region (src, start, length, name, DataType::MIDI, layer, flags)
 {
-       save_state ("initial state");
-
        assert(_name.find("/") == string::npos);
+       midi_source(0)->Switched.connect(sigc::mem_fun(this, &MidiRegion::switch_source));
 }
 
 /* Basic MidiRegion constructor (many channels) */
-MidiRegion::MidiRegion (SourceList& srcs, jack_nframes_t start, jack_nframes_t length, const string& name, layer_t layer, Flag flags)
+MidiRegion::MidiRegion (const SourceList& srcs, nframes_t start, nframes_t length, const string& name, layer_t layer, Flag flags)
        : Region (srcs, start, length, name, DataType::MIDI, layer, flags)
 {
-       save_state ("initial state");
-
        assert(_name.find("/") == string::npos);
+       midi_source(0)->Switched.connect(sigc::mem_fun(this, &MidiRegion::switch_source));
 }
 
 
 /** Create a new MidiRegion, that is part of an existing one */
-MidiRegion::MidiRegion (boost::shared_ptr<const MidiRegion> other, jack_nframes_t offset, jack_nframes_t length, const string& name, layer_t layer, Flag flags)
+MidiRegion::MidiRegion (boost::shared_ptr<const MidiRegion> other, nframes_t offset, nframes_t length, const string& name, layer_t layer, Flag flags)
        : Region (other, offset, length, name, layer, flags)
 {
-       save_state ("initial state");
-
        assert(_name.find("/") == string::npos);
+       midi_source(0)->Switched.connect(sigc::mem_fun(this, &MidiRegion::switch_source));
 }
 
 MidiRegion::MidiRegion (boost::shared_ptr<const MidiRegion> other)
        : Region (other)
 {
-       save_state ("initial state");
-
        assert(_name.find("/") == string::npos);
+       midi_source(0)->Switched.connect(sigc::mem_fun(this, &MidiRegion::switch_source));
 }
 
 MidiRegion::MidiRegion (boost::shared_ptr<MidiSource> src, const XMLNode& node)
@@ -99,115 +95,59 @@ MidiRegion::MidiRegion (boost::shared_ptr<MidiSource> src, const XMLNode& node)
                throw failed_constructor();
        }
 
-       save_state ("initial state");
-
+       midi_source(0)->Switched.connect(sigc::mem_fun(this, &MidiRegion::switch_source));
        assert(_name.find("/") == string::npos);
        assert(_type == DataType::MIDI);
 }
 
-MidiRegion::MidiRegion (SourceList& srcs, const XMLNode& node)
+MidiRegion::MidiRegion (const SourceList& srcs, const XMLNode& node)
        : Region (srcs, node)
 {
        if (set_state (node)) {
                throw failed_constructor();
        }
 
-       save_state ("initial state");
-
+       midi_source(0)->Switched.connect(sigc::mem_fun(this, &MidiRegion::switch_source));
        assert(_name.find("/") == string::npos);
        assert(_type == DataType::MIDI);
 }
 
 MidiRegion::~MidiRegion ()
 {
-       GoingAway (); /* EMIT SIGNAL */
 }
 
-StateManager::State*
-MidiRegion::state_factory (std::string why) const
+void
+MidiRegion::set_position_internal (nframes_t pos, bool allow_bbt_recompute)
 {
-       RegionState* state = new RegionState (why);
-
-       Region::store_state (*state);
+       BeatsFramesConverter old_converter(_session, _position - _start);
+       double length_beats = old_converter.from(_length);
 
-       return state;
-}      
-
-Change
-MidiRegion::restore_state (StateManager::State& sstate) 
-{
-       RegionState* state = dynamic_cast<RegionState*> (&sstate);
-       Change what_changed = Region::restore_and_return_flags (*state);
+       Region::set_position_internal(pos, allow_bbt_recompute);
        
-       if (_flags != Flag (state->_flags)) {
-               
-               //uint32_t old_flags = _flags;
-               
-               _flags = Flag (state->_flags);
-       }
-               
-       what_changed = Change (what_changed);
-
-       return what_changed;
-}
+       BeatsFramesConverter new_converter(_session, pos - _start);
 
-UndoAction
-MidiRegion::get_memento() const
-{
-       return sigc::bind (mem_fun (*(const_cast<MidiRegion *> (this)), &StateManager::use_state), _current_state_id);
+       set_length(new_converter.to(length_beats), 0);
 }
 
-jack_nframes_t
-MidiRegion::read_at (MidiRingBuffer& out, jack_nframes_t position, 
-                     jack_nframes_t dur, 
-                     uint32_t chan_n, jack_nframes_t read_frames, jack_nframes_t skip_frames) const
+nframes_t
+MidiRegion::read_at (MidiRingBuffer<nframes_t>& out, sframes_t position, nframes_t dur, uint32_t chan_n, NoteMode mode) const
 {
-       return _read_at (_sources, out, position, dur, chan_n, read_frames, skip_frames);
+       return _read_at (_sources, out, position, dur, chan_n, mode);
 }
 
-jack_nframes_t
-MidiRegion::master_read_at (MidiRingBuffer& out, jack_nframes_t position, 
-                            jack_nframes_t dur, uint32_t chan_n) const
+nframes_t
+MidiRegion::master_read_at (MidiRingBuffer<nframes_t>& out, sframes_t position, nframes_t dur, uint32_t chan_n, NoteMode mode) const
 {
-       return _read_at (_master_sources, out, position, dur, chan_n, 0, 0);
+       return _read_at (_master_sources, out, position, dur, chan_n, mode);
 }
 
-jack_nframes_t
-MidiRegion::_read_at (const SourceList& srcs, MidiRingBuffer& dst, 
-                      jack_nframes_t position, jack_nframes_t dur, 
-                      uint32_t chan_n, jack_nframes_t read_frames, jack_nframes_t skip_frames) const
+nframes_t
+MidiRegion::_read_at (const SourceList& /*srcs*/, MidiRingBuffer<nframes_t>& dst, nframes_t position, nframes_t dur, uint32_t chan_n, NoteMode mode) const
 {
-/*
-       MidiEvent ev;
-       RawMidi data[4];
+       nframes_t internal_offset = 0;
+       nframes_t src_offset      = 0;
+       nframes_t to_read         = 0;
 
-       const char note = rand()%30 + 30;
-       
-       ev.buffer = data;
-       ev.time = position;
-       ev.size = 3;
-       data[0] = 0x90;
-       data[1] = note;
-       data[2] = 120;
-       dst.write(ev);
-       
-       ev.buffer = data;
-       ev.time = (jack_nframes_t)(position + (9/10.0 * dur));
-       assert(ev.time < position + dur);
-       ev.size = 3;
-       data[0] = 0x80;
-       data[1] = note;
-       data[2] = 64;
-       dst.write(ev);
-
-       _read_data_count += dur;
-
-       return dur;
-*/
-       jack_nframes_t internal_offset = 0;
-       jack_nframes_t src_offset      = 0;
-       jack_nframes_t to_read         = 0;
-       
        /* precondition: caller has verified that we cover the desired section */
 
        assert(chan_n == 0);
@@ -225,7 +165,6 @@ MidiRegion::_read_at (const SourceList& srcs, MidiRingBuffer& dst,
                return 0; /* read nothing */
        }
        
-
        if ((to_read = min (dur, _length - internal_offset)) == 0) {
                return 0; /* read nothing */
        }
@@ -240,11 +179,40 @@ MidiRegion::_read_at (const SourceList& srcs, MidiRingBuffer& dst,
        _read_data_count = 0;
 
        boost::shared_ptr<MidiSource> src = midi_source(chan_n);
-       if (src->read (dst, _start + internal_offset, to_read, _position) != to_read) {
+       src->set_note_mode(mode);
+
+       nframes_t output_buffer_position = 0;
+       nframes_t negative_output_buffer_position = 0;
+       if (_position >= _start) {
+               // handle resizing of beginnings of regions correctly
+               output_buffer_position = _position - _start;
+       } else {
+               // when _start is greater than _position, we have to subtract
+               // _start from the note times in the midi source
+               negative_output_buffer_position = _start; 
+       }
+
+#if 0  
+       cerr << "\t\tsource read from " << _position << " - " << _start << " (" << _position - _start << ") "
+            << " start in source " << _start << " + " << internal_offset << " (" << _start + internal_offset << ") "
+            << " dur = " << to_read 
+            << " offset = " << output_buffer_position 
+            << " negoffset = " << negative_output_buffer_position 
+            << endl;
+#endif
+
+       if (src->midi_read (
+                       dst, // destination buffer
+                       _position - _start, // start position of the source in this read context
+                       _start + internal_offset, // where to start reading in the source
+                       to_read, // read duration in frames
+                       output_buffer_position, // the offset in the output buffer
+                       negative_output_buffer_position // amount to substract from note times
+               ) != to_read) {
                return 0; /* "read nothing" */
        }
 
-       _read_data_count += src->read_data_count(); // FIXME: semantics?
+       _read_data_count += src->read_data_count();
 
        return to_read;
 }
@@ -253,27 +221,24 @@ XMLNode&
 MidiRegion::state (bool full)
 {
        XMLNode& node (Region::state (full));
-       XMLNode *child;
        char buf[64];
        char buf2[64];
        LocaleGuard lg (X_("POSIX"));
        
-       snprintf (buf, sizeof (buf), "0x%x", (int) _flags);
-       node.add_property ("flags", buf);
+       node.add_property ("flags", enum_2_string (_flags));
 
+       // XXX these should move into Region
+       
        for (uint32_t n=0; n < _sources.size(); ++n) {
                snprintf (buf2, sizeof(buf2), "source-%d", n);
                _sources[n]->id().print (buf, sizeof(buf));
                node.add_property (buf2, buf);
        }
 
-       snprintf (buf, sizeof (buf), "%u", (uint32_t) _sources.size());
-       node.add_property ("channels", buf);
-
-       child = node.add_child ("Envelope");
-
-       if ( ! full) {
-               child->add_property ("default", "yes");
+       for (uint32_t n=0; n < _master_sources.size(); ++n) {
+               snprintf (buf2, sizeof(buf2), "master-source-%d", n);
+               _master_sources[n]->id().print (buf, sizeof (buf));
+               node.add_property (buf2, buf);
        }
 
        if (full && _extra_xml) {
@@ -284,32 +249,52 @@ MidiRegion::state (bool full)
 }
 
 int
-MidiRegion::set_state (const XMLNode& node)
+MidiRegion::set_live_state (const XMLNode& node, Change& what_changed, bool send)
 {
-       const XMLNodeList& nlist = node.children();
        const XMLProperty *prop;
        LocaleGuard lg (X_("POSIX"));
 
-       Region::set_state (node);
+       Region::set_live_state (node, what_changed, false);
 
+       uint32_t old_flags = _flags;
+               
        if ((prop = node.property ("flags")) != 0) {
-               _flags = Flag (strtol (prop->value().c_str(), (char **) 0, 16));
+               _flags = Flag (string_2_enum (prop->value(), _flags));
+
+               //_flags = Flag (strtol (prop->value().c_str(), (char **) 0, 16));
+
+               _flags = Flag (_flags & ~Region::LeftOfSplit);
+               _flags = Flag (_flags & ~Region::RightOfSplit);
        }
 
-       /* Now find child items */
-       for (XMLNodeConstIterator niter = nlist.begin(); niter != nlist.end(); ++niter) {
-               
-               XMLNode *child;
-               //XMLProperty *prop;
-               
-               child = (*niter);
-               
-               /** Hello, children */
+       if ((old_flags ^ _flags) & Muted) {
+               what_changed = Change (what_changed|MuteChanged);
+       }
+       if ((old_flags ^ _flags) & Opaque) {
+               what_changed = Change (what_changed|OpacityChanged);
+       }
+       if ((old_flags ^ _flags) & Locked) {
+               what_changed = Change (what_changed|LockChanged);
+       }
+
+       if (send) {
+               send_change (what_changed);
        }
 
        return 0;
 }
 
+int
+MidiRegion::set_state (const XMLNode& node)
+{
+       /* Region::set_state() calls the virtual set_live_state(),
+          which will get us back to AudioRegion::set_live_state()
+          to handle the relevant stuff.
+       */
+
+       return Region::set_state (node);
+}
+
 void
 MidiRegion::recompute_at_end ()
 {
@@ -332,33 +317,15 @@ MidiRegion::recompute_at_start ()
 }
 
 int
-MidiRegion::separate_by_channel (Session& session, vector<MidiRegion*>& v) const
+MidiRegion::separate_by_channel (ARDOUR::Session&, vector< boost::shared_ptr<Region> >&) const
 {
-       // Separate by MIDI channel?  bit different from audio since this is separating based
-       // on the actual contained data and destructively modifies and creates new sources..
-       
-#if 0
-       SourceList srcs;
-       string new_name;
-
-       for (SourceList::const_iterator i = _master_sources.begin(); i != _master_sources.end(); ++i) {
-
-               srcs.clear ();
-               srcs.push_back (*i);
-
-               /* generate a new name */
-               
-               if (session.region_name (new_name, _name)) {
-                       return -1;
-               }
-
-               /* create a copy with just one source */
-
-               v.push_back (new MidiRegion (srcs, _start, _length, new_name, _layer, _flags));
-       }
-#endif
+       // TODO
+       return -1;
+}
 
-       // Actually, I would prefer not if that's alright
+int
+MidiRegion::exportme (ARDOUR::Session&, ARDOUR::ExportSpecification&)
+{
        return -1;
 }
 
@@ -369,3 +336,18 @@ MidiRegion::midi_source (uint32_t n) const
        return boost::dynamic_pointer_cast<MidiSource>(source(n));
 }
 
+
+void
+MidiRegion::switch_source(boost::shared_ptr<Source> src)
+{
+       boost::shared_ptr<MidiSource> msrc = boost::dynamic_pointer_cast<MidiSource>(src);
+       if (!msrc)
+               return;
+
+       // MIDI regions have only one source
+       _sources.clear();
+       _sources.push_back(msrc);
+
+       set_name(msrc->name());
+}
+