fix crash when copy'ing latent plugins
[ardour.git] / libs / ardour / midi_track.cc
index 6a998de90e42b1c1565a3fbf938b4dcd03836ab6..b79a1cf52cd6b56f85e7d20650ae45b596dff29a 100644 (file)
     along with this program; if not, write to the Free Software
     Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
 */
+#include <cmath>
+
+#ifdef COMPILER_MSVC
+#include <float.h>
+
+// 'std::isinf()' and 'std::isnan()' are not available in MSVC.
+#define isinf_local(val) !((bool)_finite((double)val))
+#define isnan_local(val) (bool)_isnan((double)val)
+#else
+#define isinf_local std::isinf
+#define isnan_local std::isnan
+#endif
 
-#include "pbd/ffs.h"
 #include "pbd/enumwriter.h"
 #include "pbd/convert.h"
 #include "evoral/midi_util.h"
 
+#include "ardour/beats_frames_converter.h"
 #include "ardour/buffer_set.h"
 #include "ardour/debug.h"
 #include "ardour/delivery.h"
+#include "ardour/event_type_map.h"
 #include "ardour/meter.h"
 #include "ardour/midi_diskstream.h"
 #include "ardour/midi_playlist.h"
 #include "ardour/midi_port.h"
+#include "ardour/midi_region.h"
 #include "ardour/midi_track.h"
+#include "ardour/monitor_control.h"
+#include "ardour/parameter_types.h"
 #include "ardour/port.h"
 #include "ardour/processor.h"
+#include "ardour/profile.h"
+#include "ardour/route_group_specialized.h"
 #include "ardour/session.h"
 #include "ardour/session_playlists.h"
 #include "ardour/utils.h"
 
-#include "i18n.h"
+#include "pbd/i18n.h"
 
 namespace ARDOUR {
 class InterThreadInfo;
@@ -49,15 +67,13 @@ using namespace std;
 using namespace ARDOUR;
 using namespace PBD;
 
-MidiTrack::MidiTrack (Session& sess, string name, Route::Flag flag, TrackMode mode)
-       : Track (sess, name, flag, mode, DataType::MIDI)
+MidiTrack::MidiTrack (Session& sess, string name, TrackMode mode)
+       : Track (sess, name, PresentationInfo::MidiTrack, mode, DataType::MIDI)
        , _immediate_events(1024) // FIXME: size?
        , _step_edit_ring_buffer(64) // FIXME: size?
        , _note_mode(Sustained)
        , _step_editing (false)
        , _input_active (true)
-       , _playback_channel_mask(0x0000ffff)
-       , _capture_channel_mask(0x0000ffff)
 {
 }
 
@@ -80,13 +96,7 @@ MidiTrack::init ()
 boost::shared_ptr<Diskstream>
 MidiTrack::create_diskstream ()
 {
-       MidiDiskstream::Flag dflags = MidiDiskstream::Flag (0);
-
-       if (_flags & Auditioner) {
-               dflags = MidiDiskstream::Flag (dflags | MidiDiskstream::Hidden);
-       } else {
-               dflags = MidiDiskstream::Flag (dflags | MidiDiskstream::Recordable);
-       }
+       MidiDiskstream::Flag dflags = MidiDiskstream::Flag (MidiDiskstream::Recordable);
 
        assert(_mode != Destructive);
 
@@ -94,14 +104,24 @@ MidiTrack::create_diskstream ()
 }
 
 
-void
-MidiTrack::set_record_enabled (bool yn, void *src)
+bool
+MidiTrack::can_be_record_safe ()
 {
        if (_step_editing) {
-               return;
+               return false;
        }
 
-       Track::set_record_enabled (yn, src);
+       return Track::can_be_record_safe ();
+}
+
+bool
+MidiTrack::can_be_record_enabled ()
+{
+       if (_step_editing) {
+               return false;
+       }
+
+       return Track::can_be_record_enabled ();
 }
 
 void
@@ -112,13 +132,17 @@ MidiTrack::set_diskstream (boost::shared_ptr<Diskstream> ds)
        */
        boost::shared_ptr<MidiDiskstream> mds = boost::dynamic_pointer_cast<MidiDiskstream> (ds);
        mds->set_note_mode (_note_mode);
-       
+
        Track::set_diskstream (ds);
 
-       mds->reset_tracker ();  
+       mds->reset_tracker ();
 
        _diskstream->set_track (this);
-       _diskstream->set_destructive (_mode == Destructive);
+       if (Profile->get_trx()) {
+               _diskstream->set_destructive (false);
+       } else {
+               _diskstream->set_destructive (_mode == Destructive);
+       }
        _diskstream->set_record_enabled (false);
 
        _diskstream_data_recorded_connection.disconnect ();
@@ -138,7 +162,7 @@ MidiTrack::midi_diskstream() const
 int
 MidiTrack::set_state (const XMLNode& node, int version)
 {
-       const XMLProperty *prop;
+       XMLProperty const * prop;
 
        /* This must happen before Track::set_state(), as there will be a buffer
           fill during that call, and we must fill buffers using the correct
@@ -249,8 +273,8 @@ void
 MidiTrack::set_state_part_two ()
 {
        XMLNode* fnode;
-       XMLProperty* prop;
-       LocaleGuard lg (X_("POSIX"));
+       XMLProperty const * prop;
+       LocaleGuard lg;
 
        /* This is called after all session state has been restored but before
           have been made ports and connections are established.
@@ -310,6 +334,20 @@ MidiTrack::set_state_part_two ()
        return;
 }
 
+void
+MidiTrack::update_controls(const BufferSet& bufs)
+{
+       const MidiBuffer& buf = bufs.get_midi(0);
+       for (MidiBuffer::const_iterator e = buf.begin(); e != buf.end(); ++e) {
+               const Evoral::MIDIEvent<framepos_t>&     ev      = *e;
+               const Evoral::Parameter                  param   = midi_parameter(ev.buffer(), ev.size());
+               const boost::shared_ptr<Evoral::Control> control = this->control(param);
+               if (control) {
+                       control->set_double(ev.value(), _session.transport_frame(), false);
+               }
+       }
+}
+
 /** @param need_butler to be set to true if this track now needs the butler, otherwise it can be left alone
  *  or set to false.
  */
@@ -320,7 +358,7 @@ MidiTrack::roll (pframes_t nframes, framepos_t start_frame, framepos_t end_frame
        if (!lm.locked()) {
                boost::shared_ptr<MidiDiskstream> diskstream = midi_diskstream();
                framecnt_t playback_distance = diskstream->calculate_playback_distance(nframes);
-               if (can_internal_playback_seek(llabs(playback_distance))) {
+               if (can_internal_playback_seek(::llabs(playback_distance))) {
                        /* TODO should declick, and/or note-off */
                        internal_playback_seek(playback_distance);
                }
@@ -335,7 +373,7 @@ MidiTrack::roll (pframes_t nframes, framepos_t start_frame, framepos_t end_frame
 
        if (!_active) {
                silence (nframes);
-               if (_meter_point == MeterInput && (_monitoring & MonitorInput || _diskstream->record_enabled())) {
+               if (_meter_point == MeterInput && ((_monitoring_control->monitoring_choice() & MonitorInput) || _diskstream->record_enabled())) {
                        _meter->reset();
                }
                return 0;
@@ -362,13 +400,13 @@ MidiTrack::roll (pframes_t nframes, framepos_t start_frame, framepos_t end_frame
 
        fill_buffers_with_input (bufs, _input, nframes);
 
-       if (_meter_point == MeterInput && (_monitoring & MonitorInput || _diskstream->record_enabled())) {
-               _meter->run (bufs, start_frame, end_frame, nframes, true);
-       }
+       /* filter captured data before meter sees it */
+       _capture_filter.filter (bufs);
 
-       /* filter captured data before the diskstream sees it */
+       if (_meter_point == MeterInput && ((_monitoring_control->monitoring_choice() & MonitorInput) || _diskstream->record_enabled())) {
+               _meter->run (bufs, start_frame, end_frame, 1.0 /*speed()*/, nframes, true);
+       }
 
-       filter_channels (bufs, get_capture_channel_mode(), get_capture_channel_mask());
 
        _silent = false;
 
@@ -378,9 +416,7 @@ MidiTrack::roll (pframes_t nframes, framepos_t start_frame, framepos_t end_frame
                return dret;
        }
 
-       /* filter playback data before we do anything else */
-       
-       filter_channels (bufs, get_playback_channel_mode(), get_playback_channel_mask ());
+       /* note diskstream uses our filter to filter/map playback channels appropriately. */
 
        if (monitoring_state() == MonitoringInput) {
 
@@ -396,27 +432,22 @@ MidiTrack::roll (pframes_t nframes, framepos_t start_frame, framepos_t end_frame
 
                diskstream->flush_playback (start_frame, end_frame);
 
-       } 
+       }
+
 
-       
        /* append immediate messages to the first MIDI buffer (thus sending it to the first output port) */
-       
+
        write_out_of_band_data (bufs, start_frame, end_frame, nframes);
-       
+
        /* final argument: don't waste time with automation if we're not recording or rolling */
-       
+
        process_output_buffers (bufs, start_frame, end_frame, nframes,
                                declick, (!diskstream->record_enabled() && !_session.transport_stopped()));
 
-       for (ProcessorList::iterator i = _processors.begin(); i != _processors.end(); ++i) {
-               boost::shared_ptr<Delivery> d = boost::dynamic_pointer_cast<Delivery> (*i);
-               if (d) {
-                       d->flush_buffers (nframes);
-               }
-       }
+       flush_processor_buffers_locked (nframes);
 
        need_butler = diskstream->commit (playback_distance);
-       
+
        return 0;
 }
 
@@ -462,6 +493,49 @@ MidiTrack::realtime_handle_transport_stopped ()
        }
 }
 
+void
+MidiTrack::non_realtime_locate (framepos_t pos)
+{
+       Track::non_realtime_locate(pos);
+
+       boost::shared_ptr<MidiPlaylist> playlist = midi_diskstream()->midi_playlist();
+       if (!playlist) {
+               return;
+       }
+
+       /* Get the top unmuted region at this position. */
+       boost::shared_ptr<MidiRegion> region = boost::dynamic_pointer_cast<MidiRegion>(
+               playlist->top_unmuted_region_at(pos));
+       if (!region) {
+               return;
+       }
+
+       /* the source may be missing, but the control still referenced in the GUI */
+       if (!region->midi_source() || !region->model()) {
+               return;
+       }
+
+       Glib::Threads::Mutex::Lock lm (_control_lock, Glib::Threads::TRY_LOCK);
+       if (!lm.locked()) {
+               return;
+       }
+
+       /* Update track controllers based on its "automation". */
+       const framepos_t     origin = region->position() - region->start();
+       BeatsFramesConverter bfc(_session.tempo_map(), origin);
+       for (Controls::const_iterator c = _controls.begin(); c != _controls.end(); ++c) {
+               boost::shared_ptr<MidiTrack::MidiControl> tcontrol;
+               boost::shared_ptr<Evoral::Control>        rcontrol;
+               if ((tcontrol = boost::dynamic_pointer_cast<MidiTrack::MidiControl>(c->second)) &&
+                   (rcontrol = region->control(tcontrol->parameter()))) {
+                       const Evoral::Beats pos_beats = bfc.from(pos - origin);
+                       if (rcontrol->list()->size() > 0) {
+                               tcontrol->set_value(rcontrol->list()->eval(pos_beats.to_double()), Controllable::NoGroup);
+                       }
+               }
+       }
+}
+
 void
 MidiTrack::push_midi_input_to_step_edit_ringbuffer (framecnt_t nframes)
 {
@@ -489,48 +563,13 @@ MidiTrack::push_midi_input_to_step_edit_ringbuffer (framecnt_t nframes)
        }
 }
 
-void 
-MidiTrack::filter_channels (BufferSet& bufs, ChannelMode mode, uint32_t mask)
-{
-       if (mode == AllChannels) {
-               return;
-       }
-
-       MidiBuffer& buf (bufs.get_midi (0));
-       
-       for (MidiBuffer::iterator e = buf.begin(); e != buf.end(); ) {
-               
-               Evoral::MIDIEvent<framepos_t> ev(*e, false);
-
-               if (ev.is_channel_event()) {
-                       switch (mode) {
-                       case FilterChannels:
-                               if (0 == ((1<<ev.channel()) & mask)) {
-                                       e = buf.erase (e);
-                               } else {
-                                       ++e;
-                               }
-                               break;
-                       case ForceChannel:
-                               ev.set_channel (PBD::ffs (mask) - 1);
-                               ++e;
-                               break;
-                       case AllChannels:
-                               /* handled by the opening if() */
-                               ++e;
-                               break;
-                       }
-               } else {
-                       ++e;
-               }
-       }
-}
-
 void
 MidiTrack::write_out_of_band_data (BufferSet& bufs, framepos_t /*start*/, framepos_t /*end*/, framecnt_t nframes)
 {
        MidiBuffer& buf (bufs.get_midi (0));
 
+       update_controls (bufs);
+
        // Append immediate events
 
        if (_immediate_events.read_space()) {
@@ -542,36 +581,62 @@ MidiTrack::write_out_of_band_data (BufferSet& bufs, framepos_t /*start*/, framep
                 * the last argument ("stop on overflow in destination") so that we'll
                 * ship the rest out next time.
                 *
-                * the (nframes-1) argument puts all these events at the last
+                * the Port::port_offset() + (nframes-1) argument puts all these events at the last
                 * possible position of the output buffer, so that we do not
-                * violate monotonicity when writing.
+                * violate monotonicity when writing. Port::port_offset() will
+                * be non-zero if we're in a split process cycle.
                 */
-
-               _immediate_events.read (buf, 0, 1, nframes-1, true);
+               _immediate_events.read (buf, 0, 1, Port::port_offset() + nframes - 1, true);
        }
 }
 
 int
-MidiTrack::export_stuff (BufferSet& /*bufs*/, framepos_t /*start_frame*/, framecnt_t /*nframes*/, 
-                        boost::shared_ptr<Processor> /*endpoint*/, bool /*include_endpoint*/, bool /*forexport*/)
-{
-       return -1;
+MidiTrack::export_stuff (BufferSet&                   buffers,
+                         framepos_t                   start,
+                         framecnt_t                   nframes,
+                         boost::shared_ptr<Processor> endpoint,
+                         bool                         include_endpoint,
+                         bool                         for_export,
+                         bool                         for_freeze)
+{
+       if (buffers.count().n_midi() == 0) {
+               return -1;
+       }
+
+       boost::shared_ptr<MidiDiskstream> diskstream = midi_diskstream();
+
+       Glib::Threads::RWLock::ReaderLock rlock (_processor_lock);
+
+       boost::shared_ptr<MidiPlaylist> mpl = boost::dynamic_pointer_cast<MidiPlaylist>(diskstream->playlist());
+       if (!mpl) {
+               return -2;
+       }
+
+       buffers.get_midi(0).clear();
+       if (mpl->read(buffers.get_midi(0), start, nframes, 0) != nframes) {
+               return -1;
+       }
+
+       //bounce_process (buffers, start, nframes, endpoint, include_endpoint, for_export, for_freeze);
+
+       return 0;
 }
 
 boost::shared_ptr<Region>
-MidiTrack::bounce (InterThreadInfo& /*itt*/)
+MidiTrack::bounce (InterThreadInfo& itt)
 {
-       std::cerr << "MIDI bounce currently unsupported" << std::endl;
-       return boost::shared_ptr<Region> ();
+       return bounce_range (_session.current_start_frame(), _session.current_end_frame(), itt, main_outs(), false);
 }
 
-
 boost::shared_ptr<Region>
-MidiTrack::bounce_range (framepos_t /*start*/, framepos_t /*end*/, InterThreadInfo& /*itt*/,
-                        boost::shared_ptr<Processor> /*endpoint*/, bool /*include_endpoint*/)
+MidiTrack::bounce_range (framepos_t                   start,
+                         framepos_t                   end,
+                         InterThreadInfo&             itt,
+                         boost::shared_ptr<Processor> endpoint,
+                         bool                         include_endpoint)
 {
-       std::cerr << "MIDI bounce range currently unsupported" << std::endl;
-       return boost::shared_ptr<Region> ();
+       vector<boost::shared_ptr<Source> > srcs;
+       return _session.write_one_track (*this, start, end, false, srcs, itt, endpoint, include_endpoint, false, false);
 }
 
 void
@@ -624,22 +689,43 @@ MidiTrack::write_immediate_event(size_t size, const uint8_t* buf)
                cerr << "WARNING: Ignoring illegal immediate MIDI event" << endl;
                return false;
        }
-       const uint32_t type = EventTypeMap::instance().midi_event_type(buf[0]);
-       return (_immediate_events.write(0, type, size, buf) == size);
+       const uint32_t type = midi_parameter_type(buf[0]);
+       return (_immediate_events.write (0, type, size, buf) == size);
 }
 
 void
-MidiTrack::MidiControl::set_value(double val)
+MidiTrack::set_parameter_automation_state (Evoral::Parameter param, AutoState state)
+{
+       switch (param.type()) {
+       case MidiCCAutomation:
+       case MidiPgmChangeAutomation:
+       case MidiPitchBenderAutomation:
+       case MidiChannelPressureAutomation:
+       case MidiSystemExclusiveAutomation:
+               /* The track control for MIDI parameters is for immediate events to act
+                  as a control surface, write/touch for them is not currently
+                  supported. */
+               return;
+       default:
+               Automatable::set_parameter_automation_state(param, state);
+       }
+}
+
+void
+MidiTrack::MidiControl::actually_set_value (double val, PBD::Controllable::GroupControlDisposition group_override)
 {
+       const Evoral::Parameter &parameter = _list ? _list->parameter() : Control::parameter();
+       const Evoral::ParameterDescriptor &desc = EventTypeMap::instance().descriptor(parameter);
+
        bool valid = false;
-       if (isinf(val)) {
+       if (isinf_local(val)) {
                cerr << "MIDIControl value is infinity" << endl;
-       } else if (isnan(val)) {
+       } else if (isnan_local(val)) {
                cerr << "MIDIControl value is NaN" << endl;
-       } else if (val < _list->parameter().min()) {
-               cerr << "MIDIControl value is < " << _list->parameter().min() << endl;
-       } else if (val > _list->parameter().max()) {
-               cerr << "MIDIControl value is > " << _list->parameter().max() << endl;
+       } else if (val < desc.lower) {
+               cerr << "MIDIControl value is < " << desc.lower << endl;
+       } else if (val > desc.upper) {
+               cerr << "MIDIControl value is > " << desc.upper << endl;
        } else {
                valid = true;
        }
@@ -648,14 +734,14 @@ MidiTrack::MidiControl::set_value(double val)
                return;
        }
 
-       assert(val <= _list->parameter().max());
-       if ( ! automation_playback()) {
+       assert(val <= desc.upper);
+       if ( ! _list || ! automation_playback()) {
                size_t size = 3;
-               uint8_t ev[3] = { _list->parameter().channel(), uint8_t (val), 0 };
-               switch(_list->parameter().type()) {
+               uint8_t ev[3] = { parameter.channel(), uint8_t (val), 0 };
+               switch(parameter.type()) {
                case MidiCCAutomation:
                        ev[0] += MIDI_CMD_CONTROL;
-                       ev[1] = _list->parameter().id();
+                       ev[1] = parameter.id();
                        ev[2] = int(val);
                        break;
 
@@ -683,7 +769,7 @@ MidiTrack::MidiControl::set_value(double val)
                _route->write_immediate_event(size,  ev);
        }
 
-       AutomationControl::set_value(val);
+       AutomationControl::actually_set_value(val, group_override);
 }
 
 void
@@ -706,52 +792,34 @@ MidiTrack::write_source (uint32_t)
 }
 
 void
-MidiTrack::set_playback_channel_mode(ChannelMode mode, uint16_t mask) 
+MidiTrack::set_playback_channel_mode(ChannelMode mode, uint16_t mask)
 {
-       ChannelMode old = get_playback_channel_mode ();
-       uint16_t old_mask = get_playback_channel_mask ();
-
-       if (old != mode || mask != old_mask) {
-               _set_playback_channel_mode (mode, mask);
-               PlaybackChannelModeChanged ();
-               _session.set_dirty ();
+       if (_playback_filter.set_channel_mode(mode, mask)) {
+               _session.set_dirty();
        }
 }
 
 void
-MidiTrack::set_capture_channel_mode(ChannelMode mode, uint16_t mask) 
+MidiTrack::set_capture_channel_mode(ChannelMode mode, uint16_t mask)
 {
-       ChannelMode old = get_capture_channel_mode ();
-       uint16_t old_mask = get_capture_channel_mask ();
-
-       if (old != mode || mask != old_mask) {
-               _set_capture_channel_mode (mode, mask);
-               CaptureChannelModeChanged ();
-               _session.set_dirty ();
+       if (_capture_filter.set_channel_mode(mode, mask)) {
+               _session.set_dirty();
        }
 }
 
 void
 MidiTrack::set_playback_channel_mask (uint16_t mask)
 {
-       uint16_t old = get_playback_channel_mask();
-
-       if (old != mask) {
-               _set_playback_channel_mask (mask);
-               PlaybackChannelMaskChanged ();
-               _session.set_dirty ();
+       if (_playback_filter.set_channel_mask(mask)) {
+               _session.set_dirty();
        }
 }
 
 void
 MidiTrack::set_capture_channel_mask (uint16_t mask)
 {
-       uint16_t old = get_capture_channel_mask();
-
-       if (old != mask) {
-               _set_capture_channel_mask (mask);
-               CaptureChannelMaskChanged ();
-               _session.set_dirty ();
+       if (_capture_filter.set_channel_mask(mask)) {
+               _session.set_dirty();
        }
 }
 
@@ -837,10 +905,10 @@ MidiTrack::act_on_mute ()
                return;
        }
 
-       if (muted()) {
+       if (muted() || _mute_master->muted_by_others_soloing_at (MuteMaster::AllPoints)) {
                /* only send messages for channels we are using */
 
-               uint16_t mask = get_playback_channel_mask();
+               uint16_t mask = _playback_filter.get_channel_mask();
 
                for (uint8_t channel = 0; channel <= 0xF; channel++) {
 
@@ -849,39 +917,40 @@ MidiTrack::act_on_mute ()
                                DEBUG_TRACE (DEBUG::MidiIO, string_compose ("%1 delivers mute message to channel %2\n", name(), channel+1));
                                uint8_t ev[3] = { ((uint8_t) (MIDI_CMD_CONTROL | channel)), MIDI_CTL_SUSTAIN, 0 };
                                write_immediate_event (3, ev);
-                               ev[1] = MIDI_CTL_ALL_NOTES_OFF;
-                               write_immediate_event (3, ev);
+
+                               /* Note we do not send MIDI_CTL_ALL_NOTES_OFF here, since this may
+                                  silence notes that came from another non-muted track. */
                        }
                }
+
+               /* Resolve active notes. */
+               midi_diskstream()->resolve_tracker(_immediate_events, Port::port_offset());
        }
 }
-       
+
 void
-MidiTrack::set_monitoring (MonitorChoice mc)
+MidiTrack::monitoring_changed (bool self, Controllable::GroupControlDisposition gcd)
 {
-       if (mc != _monitoring) {
+       Track::monitoring_changed (self, gcd);
 
-               Track::set_monitoring (mc);
-               
-               /* monitoring state changed, so flush out any on notes at the
-                * port level.
-                */
+       /* monitoring state changed, so flush out any on notes at the
+        * port level.
+        */
 
-               PortSet& ports (_output->ports());
-               
-               for (PortSet::iterator p = ports.begin(); p != ports.end(); ++p) {
-                       boost::shared_ptr<MidiPort> mp = boost::dynamic_pointer_cast<MidiPort> (*p);
-                       if (mp) {
-                               mp->require_resolve ();
-                       }
-               }
+       PortSet& ports (_output->ports());
 
-               boost::shared_ptr<MidiDiskstream> md (midi_diskstream());
-               
-               if (md) {
-                       md->reset_tracker ();
+       for (PortSet::iterator p = ports.begin(); p != ports.end(); ++p) {
+               boost::shared_ptr<MidiPort> mp = boost::dynamic_pointer_cast<MidiPort> (*p);
+               if (mp) {
+                       mp->require_resolve ();
                }
        }
+
+       boost::shared_ptr<MidiDiskstream> md (midi_diskstream());
+
+       if (md) {
+               md->reset_tracker ();
+       }
 }
 
 MonitorState
@@ -890,7 +959,6 @@ MidiTrack::monitoring_state () const
        MonitorState ms = Track::monitoring_state();
        if (ms == MonitoringSilence) {
                return MonitoringInput;
-       } 
+       }
        return ms;
 }
-