X-Git-Url: https://main.carlh.net/gitweb/?a=blobdiff_plain;f=libs%2Fardour%2Fmidi_region.cc;h=8509e55f97017a06597897bbdcc92e5615edd4d9;hb=f00b3b7f111e36537d773daef0ae77b03d11f82f;hp=cc914cac3867e10d2e67e10939d793ddcfa26785;hpb=f9f5ec85fbfd15d0008f70d4185a84eeadfd3891;p=ardour.git diff --git a/libs/ardour/midi_region.cc b/libs/ardour/midi_region.cc index cc914cac38..8509e55f97 100644 --- a/libs/ardour/midi_region.cc +++ b/libs/ardour/midi_region.cc @@ -1,5 +1,5 @@ /* - Copyright (C) 2000-2006 Paul Davis + Copyright (C) 2000-2006 Paul Davis 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 @@ -24,227 +24,284 @@ #include -#include -#include +#include -#include +#include "pbd/xml++.h" +#include "pbd/basename.h" -#include -#include - -#include -#include -#include -#include -#include -#include -#include -#include +#include "ardour/automation_control.h" +#include "ardour/midi_model.h" +#include "ardour/midi_region.h" +#include "ardour/midi_ring_buffer.h" +#include "ardour/midi_source.h" +#include "ardour/region_factory.h" +#include "ardour/session.h" +#include "ardour/tempo.h" +#include "ardour/types.h" #include "i18n.h" #include using namespace std; using namespace ARDOUR; +using namespace PBD; + +namespace ARDOUR { + namespace Properties { + PBD::PropertyDescriptor midi_data; + PBD::PropertyDescriptor start_beats; + PBD::PropertyDescriptor length_beats; + } +} -/** Basic MidiRegion constructor (one channel) */ -MidiRegion::MidiRegion (boost::shared_ptr src, jack_nframes_t start, jack_nframes_t length) - : Region (src, start, length, PBD::basename_nosuffix(src->name()), DataType::MIDI, 0, Region::Flag(Region::DefaultFlags|Region::External)) +void +MidiRegion::make_property_quarks () { - assert(_name.find("/") == string::npos); + Properties::midi_data.property_id = g_quark_from_static_string (X_("midi-data")); + DEBUG_TRACE (DEBUG::Properties, string_compose ("quark for midi-data = %1\n", Properties::midi_data.property_id)); + Properties::start_beats.property_id = g_quark_from_static_string (X_("start-beats")); + DEBUG_TRACE (DEBUG::Properties, string_compose ("quark for start-beats = %1\n", Properties::start_beats.property_id)); + Properties::length_beats.property_id = g_quark_from_static_string (X_("length-beats")); + DEBUG_TRACE (DEBUG::Properties, string_compose ("quark for length-beats = %1\n", Properties::length_beats.property_id)); } -/* Basic MidiRegion constructor (one channel) */ -MidiRegion::MidiRegion (boost::shared_ptr src, jack_nframes_t start, jack_nframes_t length, const string& name, layer_t layer, Flag flags) - : Region (src, start, length, name, DataType::MIDI, layer, flags) +void +MidiRegion::register_properties () { - assert(_name.find("/") == string::npos); + add_property (_start_beats); + add_property (_length_beats); } /* 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) - : Region (srcs, start, length, name, DataType::MIDI, layer, flags) +MidiRegion::MidiRegion (const SourceList& srcs) + : Region (srcs) + , _start_beats (Properties::start_beats, 0) + , _length_beats (Properties::length_beats, midi_source(0)->length_beats()) { - assert(_name.find("/") == string::npos); + register_properties (); + + midi_source(0)->ModelChanged.connect_same_thread (_source_connection, boost::bind (&MidiRegion::model_changed, this)); + model_changed (); + assert(_name.val().find("/") == string::npos); + assert(_type == DataType::MIDI); } +MidiRegion::MidiRegion (boost::shared_ptr other) + : Region (other) + , _start_beats (Properties::start_beats, other->_start_beats) + , _length_beats (Properties::length_beats, (Evoral::MusicalTime) 0) +{ + update_length_beats (); + register_properties (); + + assert(_name.val().find("/") == string::npos); + midi_source(0)->ModelChanged.connect_same_thread (_source_connection, boost::bind (&MidiRegion::model_changed, this)); + model_changed (); +} -/** Create a new MidiRegion, that is part of an existing one */ -MidiRegion::MidiRegion (boost::shared_ptr other, jack_nframes_t offset, jack_nframes_t length, const string& name, layer_t layer, Flag flags) - : Region (other, offset, length, name, layer, flags) +/** Create a new MidiRegion that is part of an existing one */ +MidiRegion::MidiRegion (boost::shared_ptr other, frameoffset_t offset) + : Region (other, offset) + , _start_beats (Properties::start_beats, (Evoral::MusicalTime) 0) + , _length_beats (Properties::length_beats, (Evoral::MusicalTime) 0) { - assert(_name.find("/") == string::npos); + BeatsFramesConverter bfc (_session.tempo_map(), _position); + Evoral::MusicalTime const offset_beats = bfc.from (offset); + + _start_beats = other->_start_beats + offset_beats; + _length_beats = other->_length_beats - offset_beats; + + register_properties (); + + assert(_name.val().find("/") == string::npos); + midi_source(0)->ModelChanged.connect_same_thread (_source_connection, boost::bind (&MidiRegion::model_changed, this)); + model_changed (); } -MidiRegion::MidiRegion (boost::shared_ptr other) - : Region (other) +MidiRegion::~MidiRegion () { - assert(_name.find("/") == string::npos); } -MidiRegion::MidiRegion (boost::shared_ptr src, const XMLNode& node) - : Region (src, node) +/** Create a new MidiRegion that has its own version of some/all of the Source used by another. + */ +boost::shared_ptr +MidiRegion::clone (string path) const { - if (set_state (node)) { - throw failed_constructor(); - } + BeatsFramesConverter bfc (_session.tempo_map(), _position); + Evoral::MusicalTime const bbegin = bfc.from (_start); + Evoral::MusicalTime const bend = bfc.from (_start + _length); - assert(_name.find("/") == string::npos); - assert(_type == DataType::MIDI); + boost::shared_ptr ms = midi_source(0)->clone (path, bbegin, bend); + + PropertyList plist; + + plist.add (Properties::name, PBD::basename_nosuffix (ms->name())); + plist.add (Properties::whole_file, true); + plist.add (Properties::start, _start); + plist.add (Properties::start_beats, _start_beats); + plist.add (Properties::length, _length); + plist.add (Properties::length_beats, _length_beats); + plist.add (Properties::layer, 0); + + return boost::dynamic_pointer_cast (RegionFactory::create (ms, plist, true)); } -MidiRegion::MidiRegion (SourceList& srcs, const XMLNode& node) - : Region (srcs, node) +void +MidiRegion::post_set (const PropertyChange& pc) { - if (set_state (node)) { - throw failed_constructor(); + Region::post_set (pc); + + if (pc.contains (Properties::length) && !pc.contains (Properties::length_beats)) { + update_length_beats (); + } else if (pc.contains (Properties::start) && !pc.contains (Properties::start_beats)) { + set_start_beats_from_start_frames (); } +} - assert(_name.find("/") == string::npos); - assert(_type == DataType::MIDI); +void +MidiRegion::set_start_beats_from_start_frames () +{ + BeatsFramesConverter c (_session.tempo_map(), _position - _start); + _start_beats = c.from (_start); } -MidiRegion::~MidiRegion () +void +MidiRegion::set_length_internal (framecnt_t len) +{ + Region::set_length_internal (len); + update_length_beats (); +} + +void +MidiRegion::update_after_tempo_map_change () +{ + Region::update_after_tempo_map_change (); + + /* _position has now been updated for the new tempo map */ + _start = _position - _session.tempo_map().framepos_minus_beats (_position, _start_beats); + + send_change (Properties::start); +} + +void +MidiRegion::update_length_beats () { + BeatsFramesConverter converter (_session.tempo_map(), _position); + _length_beats = converter.from (_length); } -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 +void +MidiRegion::set_position_internal (framepos_t pos, bool allow_bbt_recompute) { - return _read_at (_sources, out, position, dur, chan_n, read_frames, skip_frames); + Region::set_position_internal (pos, allow_bbt_recompute); + /* zero length regions don't exist - so if _length_beats is zero, this object + is under construction. + */ + if (_length_beats) { + /* leave _length_beats alone, and change _length to reflect the state of things + at the new position (tempo map may dictate a different number of frames + */ + BeatsFramesConverter converter (_session.tempo_map(), _position); + Region::set_length_internal (converter.to (_length_beats)); + } } -jack_nframes_t -MidiRegion::master_read_at (MidiRingBuffer& out, jack_nframes_t position, - jack_nframes_t dur, uint32_t chan_n) const +framecnt_t +MidiRegion::read_at (Evoral::EventSink& out, framepos_t position, framecnt_t dur, uint32_t chan_n, NoteMode mode, MidiStateTracker* tracker) const { - return _read_at (_master_sources, out, position, dur, chan_n, 0, 0); + return _read_at (_sources, out, position, dur, chan_n, mode, tracker); } -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 +framecnt_t +MidiRegion::master_read_at (MidiRingBuffer& out, framepos_t position, framecnt_t dur, uint32_t chan_n, NoteMode mode) const { + return _read_at (_master_sources, out, position, dur, chan_n, mode); /* no tracker */ +} - cerr << _name << "._read_at(" << position << ") - " << _position << endl; +framecnt_t +MidiRegion::_read_at (const SourceList& /*srcs*/, Evoral::EventSink& dst, framepos_t position, framecnt_t dur, uint32_t chan_n, + NoteMode mode, MidiStateTracker* tracker) const +{ + frameoffset_t internal_offset = 0; + framecnt_t to_read = 0; - 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); - + + if (muted()) { + return 0; /* read nothing */ + } + if (position < _position) { + /* we are starting the read from before the start of the region */ internal_offset = 0; - src_offset = _position - position; - dur -= src_offset; + dur -= _position - position; } else { + /* we are starting the read from after the start of the region */ internal_offset = position - _position; - src_offset = 0; } if (internal_offset >= _length) { return 0; /* read nothing */ } - if ((to_read = min (dur, _length - internal_offset)) == 0) { return 0; /* read nothing */ } - // FIXME: non-opaque MIDI regions not yet supported - assert(opaque()); - - if (muted()) { - return 0; /* read nothing */ - } - - _read_data_count = 0; - boost::shared_ptr src = midi_source(chan_n); - if (src->read (dst, _start + internal_offset, to_read, _position) != to_read) { + src->set_note_mode(mode); + + /* + cerr << "MR " << name () << " read @ " << position << " * " << to_read + << " _position = " << _position + << " _start = " << _start + << " intoffset = " << internal_offset + << endl; + */ + + /* This call reads events from a source and writes them to `dst' timed in session frames */ + + if (src->midi_read ( + dst, // destination buffer + _position - _start, // start position of the source in session frames + _start + internal_offset, // where to start reading in the source + to_read, // read duration in frames + tracker, + _filtered_parameters + ) != to_read) { return 0; /* "read nothing" */ } - _read_data_count += src->read_data_count(); // FIXME: semantics? - return to_read; } - -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); - - 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"); - } - - if (full && _extra_xml) { - node.add_child_copy (*_extra_xml); - } - - return node; +XMLNode& +MidiRegion::state () +{ + return Region::state (); } int -MidiRegion::set_state (const XMLNode& node) +MidiRegion::set_state (const XMLNode& node, int version) { - const XMLNodeList& nlist = node.children(); - const XMLProperty *prop; - LocaleGuard lg (X_("POSIX")); - - Region::set_state (node); - - if ((prop = node.property ("flags")) != 0) { - _flags = Flag (strtol (prop->value().c_str(), (char **) 0, 16)); - } + int ret = Region::set_state (node, version); - /* Now find child items */ - for (XMLNodeConstIterator niter = nlist.begin(); niter != nlist.end(); ++niter) { - - XMLNode *child; - //XMLProperty *prop; - - child = (*niter); - - /** Hello, children */ + if (ret == 0) { + update_length_beats (); } - return 0; + return ret; } void MidiRegion::recompute_at_end () { /* our length has changed - * (non destructively) "chop" notes that pass the end boundary, to - * prevent stuck notes. + * so what? stuck notes are dealt with via a note state tracker */ -} +} void MidiRegion::recompute_at_start () @@ -259,34 +316,34 @@ MidiRegion::recompute_at_start () } int -MidiRegion::separate_by_channel (Session& session, vector& v) const +MidiRegion::separate_by_channel (ARDOUR::Session&, vector< boost::shared_ptr >&) 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); + // TODO + return -1; +} - /* generate a new name */ - - if (session.region_name (new_name, _name)) { - return -1; - } +boost::shared_ptr +MidiRegion::control (const Evoral::Parameter& id, bool create) +{ + return model()->control(id, create); +} - /* create a copy with just one source */ +boost::shared_ptr +MidiRegion::control (const Evoral::Parameter& id) const +{ + return model()->control(id); +} - v.push_back (new MidiRegion (srcs, _start, _length, new_name, _layer, _flags)); - } -#endif +boost::shared_ptr +MidiRegion::model() +{ + return midi_source()->model(); +} - // Actually, I would prefer not if that's alright - return -1; +boost::shared_ptr +MidiRegion::model() const +{ + return midi_source()->model(); } boost::shared_ptr @@ -296,3 +353,88 @@ MidiRegion::midi_source (uint32_t n) const return boost::dynamic_pointer_cast(source(n)); } +void +MidiRegion::model_changed () +{ + if (!model()) { + return; + } + + /* build list of filtered Parameters, being those whose automation state is not `Play' */ + + _filtered_parameters.clear (); + + Automatable::Controls const & c = model()->controls(); + + for (Automatable::Controls::const_iterator i = c.begin(); i != c.end(); ++i) { + boost::shared_ptr ac = boost::dynamic_pointer_cast (i->second); + assert (ac); + if (ac->alist()->automation_state() != Play) { + _filtered_parameters.insert (ac->parameter ()); + } + } + + /* watch for changes to controls' AutoState */ + midi_source()->AutomationStateChanged.connect_same_thread ( + _model_connection, boost::bind (&MidiRegion::model_automation_state_changed, this, _1) + ); + + model()->ContentsChanged.connect_same_thread ( + _model_contents_connection, boost::bind (&MidiRegion::model_contents_changed, this)); +} + +void +MidiRegion::model_contents_changed () +{ + send_change (PropertyChange (Properties::midi_data)); +} + +void +MidiRegion::model_automation_state_changed (Evoral::Parameter const & p) +{ + /* Update our filtered parameters list after a change to a parameter's AutoState */ + + boost::shared_ptr ac = model()->automation_control (p); + assert (ac); + + if (ac->alist()->automation_state() == Play) { + _filtered_parameters.erase (p); + } else { + _filtered_parameters.insert (p); + } + + /* the source will have an iterator into the model, and that iterator will have been set up + for a given set of filtered_parameters, so now that we've changed that list we must invalidate + the iterator. + */ + Glib::Threads::Mutex::Lock lm (midi_source(0)->mutex()); + midi_source(0)->invalidate (); +} + +/** This is called when a trim drag has resulted in a -ve _start time for this region. + * Fix it up by adding some empty space to the source. + */ +void +MidiRegion::fix_negative_start () +{ + BeatsFramesConverter c (_session.tempo_map(), _position); + + model()->insert_silence_at_start (c.from (-_start)); + _start = 0; + _start_beats = 0; +} + +/** Transpose the notes in this region by a given number of semitones */ +void +MidiRegion::transpose (int semitones) +{ + BeatsFramesConverter c (_session.tempo_map(), _start); + model()->transpose (c.from (_start), c.from (_start + _length), semitones); +} + +void +MidiRegion::set_start_internal (framecnt_t s) +{ + Region::set_start_internal (s); + set_start_beats_from_start_frames (); +}