various minor MIDI fixes: prevent duplicate note entry with mouse, show note info...
[ardour.git] / libs / ardour / midi_source.cc
index c4cfe3c71dfb419cd2dc4dec2d6fca3796d5f35f..0c66879330a3526302cfe77781297ec520c48ad2 100644 (file)
 #include <iomanip>
 #include <algorithm>
 
-#include <pbd/xml++.h>
-#include <pbd/pthread_utils.h>
+#include <glibmm/fileutils.h>
 
-#include <ardour/midi_source.h>
-#include <ardour/midi_ring_buffer.h>
+#include "pbd/xml++.h"
+#include "pbd/pthread_utils.h"
+#include "pbd/basename.h"
+
+#include "ardour/audioengine.h"
+#include "ardour/debug.h"
+#include "ardour/midi_model.h"
+#include "ardour/midi_ring_buffer.h"
+#include "ardour/midi_state_tracker.h"
+#include "ardour/midi_source.h"
+#include "ardour/session.h"
+#include "ardour/session_directory.h"
+#include "ardour/source_factory.h"
+#include "ardour/tempo.h"
 
 #include "i18n.h"
 
@@ -40,26 +51,39 @@ using namespace std;
 using namespace ARDOUR;
 using namespace PBD;
 
-sigc::signal<void,MidiSource *> MidiSource::MidiSourceCreated;
+PBD::Signal1<void,MidiSource*> MidiSource::MidiSourceCreated;
 
-MidiSource::MidiSource (string name)
-       : Source (name, DataType::MIDI)
+MidiSource::MidiSource (Session& s, string name, Source::Flag flags)
+       : Source(s, DataType::MIDI, name, flags)
+       , _read_data_count(0)
+       , _write_data_count(0)
+       , _writing(false)
+       , _model_iter_valid(false)
+       , _length_beats(0.0)
+       , _last_read_end(0)
+       , _last_write_end(0)
 {
-       _read_data_count = 0;
-       _write_data_count = 0;
 }
 
-MidiSource::MidiSource (const XMLNode& node) 
-       : Source (node)
+MidiSource::MidiSource (Session& s, const XMLNode& node)
+       : Source(s, node)
+       , _read_data_count(0)
+       , _write_data_count(0)
+       , _writing(false)
+       , _model_iter_valid(false)
+       , _length_beats(0.0)
+       , _last_read_end(0)
+       , _last_write_end(0)
 {
        _read_data_count = 0;
        _write_data_count = 0;
 
-       if (set_state (node)) {
+       if (set_state (node, Stateful::loading_state_version)) {
                throw failed_constructor();
        }
 }
 
+
 MidiSource::~MidiSource ()
 {
 }
@@ -77,12 +101,10 @@ MidiSource::get_state ()
 }
 
 int
-MidiSource::set_state (const XMLNode& node)
+MidiSource::set_state (const XMLNode& node, int /*version*/)
 {
        const XMLProperty* prop;
 
-       Source::set_state (node);
-
        if ((prop = node.property ("captured-for")) != 0) {
                _captured_for = prop->value();
        }
@@ -90,27 +112,191 @@ MidiSource::set_state (const XMLNode& node)
        return 0;
 }
 
-jack_nframes_t
-MidiSource::read (MidiRingBuffer& dst, jack_nframes_t start, jack_nframes_t cnt, jack_nframes_t stamp_offset) const
+sframes_t
+MidiSource::length (sframes_t pos) const
+{
+       BeatsFramesConverter converter(_session.tempo_map(), pos);
+       return converter.to(_length_beats);
+}
+
+void
+MidiSource::update_length (sframes_t /*pos*/, sframes_t /*cnt*/)
+{
+       // You're not the boss of me!
+}
+
+void
+MidiSource::invalidate ()
+{
+       _model_iter_valid = false;
+       _model_iter.invalidate();
+}
+
+nframes_t
+MidiSource::midi_read (Evoral::EventSink<nframes_t>& dst, sframes_t source_start,
+                       sframes_t start, nframes_t cnt,
+                       sframes_t stamp_offset, sframes_t negative_stamp_offset,
+                       MidiStateTracker* tracker) const
 {
        Glib::Mutex::Lock lm (_lock);
-       return read_unlocked (dst, start, cnt, stamp_offset);
+
+       BeatsFramesConverter converter(_session.tempo_map(), source_start);
+
+       if (_model) {
+               Evoral::Sequence<double>::const_iterator& i = _model_iter;
+
+               // If the cached iterator is invalid, search for the first event past start
+               if (_last_read_end == 0 || start != _last_read_end || !_model_iter_valid) {
+                       DEBUG_TRACE (DEBUG::MidiSourceIO, string_compose ("*** %1 search for relevant iterator for %1 / %2\n", _name, source_start, start));
+                       for (i = _model->begin(); i != _model->end(); ++i) {
+                               if (converter.to(i->time()) >= start) {
+                                       break;
+                               }
+                       }
+                       _model_iter_valid = true;
+               } else {
+                       DEBUG_TRACE (DEBUG::MidiSourceIO, string_compose ("*** %1 use cached iterator for %1 / %2\n", _name, source_start, start));
+               }
+
+               _last_read_end = start + cnt;
+
+               // Read events up to end
+               for (; i != _model->end(); ++i) {
+                       const sframes_t time_frames = converter.to(i->time());
+                       if (time_frames < start + cnt) {
+                               dst.write(time_frames + stamp_offset - negative_stamp_offset,
+                                               i->event_type(), i->size(), i->buffer());
+                               if (tracker) {
+                                       Evoral::MIDIEvent<Evoral::MusicalTime>& ev (*(Evoral::MIDIEvent<Evoral::MusicalTime>*) (&(*i)));
+                                       if (ev.is_note_on()) {
+                                               DEBUG_TRACE (DEBUG::MidiSourceIO, string_compose ("\t%1 add note on %2 @ %3\n", _name, ev.note(), time_frames));
+                                               tracker->add (ev.note(), ev.channel());
+                                       } else if (ev.is_note_off()) {
+                                               DEBUG_TRACE (DEBUG::MidiSourceIO, string_compose ("\t%1 add note off %2 @ %3\n", _name, ev.note(), time_frames));
+                                               tracker->remove (ev.note(), ev.channel());
+                                       }
+                               }
+                       } else {
+                               break;
+                       }
+               }
+               return cnt;
+       } else {
+               return read_unlocked (dst, source_start, start, cnt, stamp_offset, negative_stamp_offset, tracker);
+       }
 }
 
-jack_nframes_t
-MidiSource::write (MidiRingBuffer& dst, jack_nframes_t cnt)
+nframes_t
+MidiSource::midi_write (MidiRingBuffer<nframes_t>& source, sframes_t source_start, nframes_t duration)
 {
        Glib::Mutex::Lock lm (_lock);
-       return write_unlocked (dst, cnt);
+       const nframes_t ret = write_unlocked (source, source_start, duration);
+       _last_write_end += duration;
+       return ret;
+}
+
+void
+MidiSource::mark_streaming_midi_write_started (NoteMode mode, sframes_t start_frame)
+{
+       set_timeline_position(start_frame);
+
+       if (_model) {
+               _model->set_note_mode(mode);
+               _model->start_write();
+       }
+
+       _last_write_end = start_frame;
+       _writing = true;
 }
 
-bool
-MidiSource::file_changed (string path)
+void
+MidiSource::mark_streaming_write_started ()
 {
-       struct stat stat_file;
+       NoteMode note_mode = _model ? _model->note_mode() : Sustained;
+       mark_streaming_midi_write_started(note_mode, _session.transport_frame());
+}
+
+void
+MidiSource::mark_streaming_write_completed ()
+{
+       if (_model) {
+               _model->end_write(false);
+       }
+
+       _writing = false;
+}
+
+boost::shared_ptr<MidiSource>
+MidiSource::clone (Evoral::MusicalTime begin, Evoral::MusicalTime end)
+{
+        string newname = PBD::basename_nosuffix(_name.val());
+        string newpath;
+
+        /* get a new name for the MIDI file we're going to write to
+         */
+
+        do { 
+
+                newname = bump_name_once (newname, '-');
+                /* XXX build path safely */
+                newpath = _session.session_directory().midi_path().to_string() +"/"+ newname + ".mid";
+
+        } while (Glib::file_test (newpath, Glib::FILE_TEST_EXISTS));
+        
+        boost::shared_ptr<MidiSource> newsrc = boost::dynamic_pointer_cast<MidiSource>(
+                SourceFactory::createWritable(DataType::MIDI, _session,
+                                              newpath, false, _session.frame_rate()));
+        
+        newsrc->set_timeline_position(_timeline_position);
+
+        if (_model) {
+                if (begin == Evoral::MinMusicalTime && end == Evoral::MaxMusicalTime) {
+                        _model->write_to (newsrc);
+                } else {
+                        _model->write_section_to (newsrc, begin, end);
+                }
+        } else {
+                error << string_compose (_("programming error: %1"), X_("no model for MidiSource during ::clone()"));
+                return boost::shared_ptr<MidiSource>();
+        }
 
-       int e1 = stat (path.c_str(), &stat_file);
-       
-       return ( !e1 );
+        newsrc->flush_midi();
+
+        /* force a reload of the model if the range is partial */
+        
+        if (begin != Evoral::MinMusicalTime || end != Evoral::MaxMusicalTime) {
+                newsrc->load_model (true, true);
+        }
+        
+        return newsrc;
+}
+
+void
+MidiSource::session_saved()
+{
+       flush_midi();
+
+       if (_model && _model->edited()) {
+               boost::shared_ptr<MidiSource> newsrc = clone ();
+
+                if (newsrc) {
+                        _model->set_midi_source (newsrc.get());
+                        Switched (newsrc); /* EMIT SIGNAL */
+                }
+       }
 }
 
+void
+MidiSource::set_note_mode(NoteMode mode)
+{
+       if (_model) {
+               _model->set_note_mode(mode);
+       }
+}
+
+void
+MidiSource::drop_model ()
+{
+        cerr << name() << " drop model\n";
+        _model.reset(); 
+}