libs/ardour/midi_playlist.cc

   1 /*
   2     Copyright (C) 2006 Paul Davis
   3     Author: David Robillard
   4
   5     This program is free software; you can redistribute it and/or modify
   6     it under the terms of the GNU General Public License as published by
   7     the Free Software Foundation; either version 2 of the License, or
   8     (at your option) any later version.
   9
  10     This program is distributed in the hope that it will be useful,
  11     but WITHOUT ANY WARRANTY; without even the implied warranty of
  12     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  13     GNU General Public License for more details.
  14
  15     You should have received a copy of the GNU General Public License
  16     along with this program; if not, write to the Free Software
  17     Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  18 */
  19
  20 #include <algorithm>
  21 #include <cassert>
  22 #include <cstdlib>
  23 #include <iostream>
  24 #include <utility>
  25
  26 #include "evoral/EventList.hpp"
  27 #include "evoral/Control.hpp"
  28
  29 #include "ardour/beats_frames_converter.h"
  30 #include "ardour/debug.h"
  31 #include "ardour/midi_model.h"
  32 #include "ardour/midi_playlist.h"
  33 #include "ardour/midi_region.h"
  34 #include "ardour/midi_source.h"
  35 #include "ardour/midi_state_tracker.h"
  36 #include "ardour/session.h"
  37 #include "ardour/types.h"
  38
  39 #include "pbd/i18n.h"
  40
  41 using namespace ARDOUR;
  42 using namespace PBD;
  43 using namespace std;
  44
  45 MidiPlaylist::MidiPlaylist (Session& session, const XMLNode& node, bool hidden)
  46         : Playlist (session, node, DataType::MIDI, hidden)
  47         , _note_mode(Sustained)
  48         , _read_end(0)
  49 {
  50 #ifndef NDEBUG
  51         XMLProperty const * prop = node.property("type");
  52         assert(prop && DataType(prop->value()) == DataType::MIDI);
  53 #endif
  54
  55         in_set_state++;
  56         if (set_state (node, Stateful::loading_state_version)) {
  57                 throw failed_constructor ();
  58         }
  59         in_set_state--;
  60
  61         relayer ();
  62 }
  63
  64 MidiPlaylist::MidiPlaylist (Session& session, string name, bool hidden)
  65         : Playlist (session, name, DataType::MIDI, hidden)
  66         , _note_mode(Sustained)
  67         , _read_end(0)
  68 {
  69 }
  70
  71 MidiPlaylist::MidiPlaylist (boost::shared_ptr<const MidiPlaylist> other, string name, bool hidden)
  72         : Playlist (other, name, hidden)
  73         , _note_mode(other->_note_mode)
  74         , _read_end(0)
  75 {
  76 }
  77
  78 MidiPlaylist::MidiPlaylist (boost::shared_ptr<const MidiPlaylist> other,
  79                             framepos_t                            start,
  80                             framecnt_t                            dur,
  81                             string                                name,
  82                             bool                                  hidden)
  83         : Playlist (other, start, dur, name, hidden)
  84         , _note_mode(other->_note_mode)
  85         , _read_end(0)
  86 {
  87 }
  88
  89 MidiPlaylist::~MidiPlaylist ()
  90 {
  91 }
  92
  93 template<typename Time>
  94 struct EventsSortByTimeAndType {
  95     bool operator() (Evoral::Event<Time>* a, Evoral::Event<Time>* b) {
  96             if (a->time() == b->time()) {
  97                     if (parameter_is_midi ((AutomationType)a->event_type()) &&
  98                         parameter_is_midi ((AutomationType)b->event_type())) {
  99                             /* negate return value since we must return whether
 100                              * or not a should sort before b, not b before a
 101                              */
 102                             return !MidiBuffer::second_simultaneous_midi_byte_is_first (a->buffer()[0], b->buffer()[0]);
 103                     }
 104             }
 105             return a->time() < b->time();
 106     }
 107 };
 108
 109 framecnt_t
 110 MidiPlaylist::read (Evoral::EventSink<framepos_t>& dst,
 111                     framepos_t                     start,
 112                     framecnt_t                     dur,
 113                     Evoral::Range<framepos_t>*     loop_range,
 114                     unsigned                       chan_n,
 115                     MidiChannelFilter*             filter)
 116 {
 117         typedef pair<MidiStateTracker*,framepos_t> TrackerInfo;
 118
 119         Playlist::RegionReadLock rl (this);
 120
 121         DEBUG_TRACE (DEBUG::MidiPlaylistIO,
 122                      string_compose ("---- MidiPlaylist::read %1 .. %2 (%3 trackers) ----\n",
 123                                      start, start + dur, _note_trackers.size()));
 124
 125         /* First, emit any queued edit fixup events at start. */
 126         for (NoteTrackers::iterator t = _note_trackers.begin(); t != _note_trackers.end(); ++t) {
 127                 t->second->fixer.emit(dst, _read_end, t->second->tracker);
 128         }
 129
 130         /* Find relevant regions that overlap [start..end] */
 131         const framepos_t                         end = start + dur - 1;
 132         std::vector< boost::shared_ptr<Region> > regs;
 133         std::vector< boost::shared_ptr<Region> > ended;
 134         for (RegionList::iterator i = regions.begin(); i != regions.end(); ++i) {
 135                 switch ((*i)->coverage (start, end)) {
 136                 case Evoral::OverlapStart:
 137                 case Evoral::OverlapInternal:
 138                         regs.push_back (*i);
 139                         break;
 140
 141                 case Evoral::OverlapExternal:
 142                         /* this region is entirely contained in the read range */
 143                         regs.push_back (*i);
 144                         ended.push_back (*i);
 145                         break;
 146
 147                 case Evoral::OverlapEnd:
 148                         /* this region ends within the read range */
 149                         regs.push_back (*i);
 150                         ended.push_back (*i);
 151                         break;
 152
 153                 default:
 154                         /* we don't care */
 155                         break;
 156                 }
 157         }
 158
 159         /* If we are reading from a single region, we can read directly into dst.  Otherwise,
 160            we read into a temporarily list, sort it, then write that to dst. */
 161         const bool direct_read = regs.size() == 1 &&
 162                 (ended.empty() || (ended.size() == 1 && ended.front() == regs.front()));
 163
 164         Evoral::EventList<framepos_t>  evlist;
 165         Evoral::EventSink<framepos_t>& tgt = direct_read ? dst : evlist;
 166
 167         DEBUG_TRACE (DEBUG::MidiPlaylistIO,
 168                      string_compose ("\t%1 regions to read, direct: %2\n", regs.size(), direct_read));
 169
 170         for (vector<boost::shared_ptr<Region> >::iterator i = regs.begin(); i != regs.end(); ++i) {
 171                 boost::shared_ptr<MidiRegion> mr = boost::dynamic_pointer_cast<MidiRegion>(*i);
 172                 if (!mr) {
 173                         continue;
 174                 }
 175
 176                 /* Get the existing note tracker for this region, or create a new one. */
 177                 NoteTrackers::iterator           t           = _note_trackers.find (mr.get());
 178                 bool                             new_tracker = false;
 179                 boost::shared_ptr<RegionTracker> tracker;
 180                 if (t == _note_trackers.end()) {
 181                         tracker     = boost::shared_ptr<RegionTracker>(new RegionTracker);
 182                         new_tracker = true;
 183                         DEBUG_TRACE (DEBUG::MidiPlaylistIO,
 184                                      string_compose ("\tPre-read %1 (%2 .. %3): new tracker\n",
 185                                                      mr->name(), mr->position(), mr->last_frame()));
 186                 } else {
 187                         tracker = t->second;
 188                         DEBUG_TRACE (DEBUG::MidiPlaylistIO,
 189                                      string_compose ("\tPre-read %1 (%2 .. %3): %4 active notes\n",
 190                                                      mr->name(), mr->position(), mr->last_frame(), tracker->tracker.on()));
 191                 }
 192
 193                 /* Read from region into target. */
 194                 DEBUG_TRACE (DEBUG::MidiPlaylistIO, string_compose ("read from %1 at %2 for %3 LR %4 .. %5\n",
 195                                                                     mr->name(), start, dur,
 196                                                                     (loop_range ? loop_range->from : -1),
 197                                                                     (loop_range ? loop_range->to : -1)));
 198                 mr->read_at (tgt, start, dur, loop_range, chan_n, _note_mode, &tracker->tracker, filter);
 199                 DEBUG_TRACE (DEBUG::MidiPlaylistIO,
 200                              string_compose ("\tPost-read: %1 active notes\n", tracker->tracker.on()));
 201
 202                 if (find (ended.begin(), ended.end(), *i) != ended.end()) {
 203                         /* Region ended within the read range, so resolve any active notes
 204                            (either stuck notes in the data, or notes that end after the end
 205                            of the region). */
 206                         DEBUG_TRACE (DEBUG::MidiPlaylistIO,
 207                                      string_compose ("\t%1 ended, resolve notes and delete (%2) tracker\n",
 208                                                      mr->name(), ((new_tracker) ? "new" : "old")));
 209
 210                         tracker->tracker.resolve_notes (tgt, loop_range ? loop_range->squish ((*i)->last_frame()) : (*i)->last_frame());
 211                         if (!new_tracker) {
 212                                 _note_trackers.erase (t);
 213                         }
 214
 215                 } else {
 216
 217                         if (new_tracker) {
 218                                 _note_trackers.insert (make_pair (mr.get(), tracker));
 219                                 DEBUG_TRACE (DEBUG::MidiPlaylistIO, "\tadded tracker to trackers\n");
 220                         }
 221                 }
 222         }
 223
 224         if (!direct_read && !evlist.empty()) {
 225                 /* We've read from multiple regions, sort the event list by time. */
 226                 EventsSortByTimeAndType<framepos_t> cmp;
 227                 evlist.sort (cmp);
 228
 229                 /* Copy ordered events from event list to dst. */
 230                 for (Evoral::EventList<framepos_t>::iterator e = evlist.begin(); e != evlist.end(); ++e) {
 231                         Evoral::Event<framepos_t>* ev (*e);
 232                         dst.write (ev->time(), ev->event_type(), ev->size(), ev->buffer());
 233                         delete ev;
 234                 }
 235         }
 236
 237         DEBUG_TRACE (DEBUG::MidiPlaylistIO, "---- End MidiPlaylist::read ----\n");
 238         _read_end = start + dur;
 239         return dur;
 240 }
 241
 242 void
 243 MidiPlaylist::region_edited(boost::shared_ptr<Region>         region,
 244                             const MidiModel::NoteDiffCommand* cmd)
 245 {
 246         typedef MidiModel::NoteDiffCommand Command;
 247
 248         boost::shared_ptr<MidiRegion> mr = boost::dynamic_pointer_cast<MidiRegion>(region);
 249         if (!mr || !_session.transport_rolling()) {
 250                 return;
 251         }
 252
 253         /* Take write lock to prevent concurrency with read(). */
 254         Playlist::RegionWriteLock lock(this);
 255
 256         NoteTrackers::iterator t = _note_trackers.find(mr.get());
 257         if (t == _note_trackers.end()) {
 258                 return; /* Region is not currently active, nothing to do. */
 259         }
 260
 261         /* Queue any necessary edit compensation events. */
 262         t->second->fixer.prepare(
 263                 _session.tempo_map(), cmd, mr->position() - mr->start(),
 264                 _read_end, mr->midi_source()->model()->active_notes());
 265 }
 266
 267 void
 268 MidiPlaylist::reset_note_trackers ()
 269 {
 270         Playlist::RegionWriteLock rl (this, false);
 271
 272         DEBUG_TRACE (DEBUG::MidiTrackers, string_compose ("%1 reset all note trackers\n", name()));
 273         _note_trackers.clear ();
 274 }
 275
 276 void
 277 MidiPlaylist::resolve_note_trackers (Evoral::EventSink<framepos_t>& dst, framepos_t time)
 278 {
 279         Playlist::RegionWriteLock rl (this, false);
 280
 281         for (NoteTrackers::iterator n = _note_trackers.begin(); n != _note_trackers.end(); ++n) {
 282                 n->second->tracker.resolve_notes(dst, time);
 283         }
 284         DEBUG_TRACE (DEBUG::MidiTrackers, string_compose ("%1 resolve all note trackers\n", name()));
 285         _note_trackers.clear ();
 286 }
 287
 288 void
 289 MidiPlaylist::remove_dependents (boost::shared_ptr<Region> region)
 290 {
 291         /* MIDI regions have no dependents (crossfades) but we might be tracking notes */
 292         _note_trackers.erase(region.get());
 293 }
 294
 295 int
 296 MidiPlaylist::set_state (const XMLNode& node, int version)
 297 {
 298         in_set_state++;
 299         freeze ();
 300
 301         if (Playlist::set_state (node, version)) {
 302                 return -1;
 303         }
 304
 305         thaw();
 306         in_set_state--;
 307
 308         return 0;
 309 }
 310
 311 void
 312 MidiPlaylist::dump () const
 313 {
 314         boost::shared_ptr<Region> r;
 315
 316         cerr << "Playlist \"" << _name << "\" " << endl
 317         << regions.size() << " regions "
 318         << endl;
 319
 320         for (RegionList::const_iterator i = regions.begin(); i != regions.end(); ++i) {
 321                 r = *i;
 322                 cerr << "  " << r->name() << " @ " << r << " ["
 323                 << r->start() << "+" << r->length()
 324                 << "] at "
 325                 << r->position()
 326                 << " on layer "
 327                 << r->layer ()
 328                 << endl;
 329         }
 330 }
 331
 332 bool
 333 MidiPlaylist::destroy_region (boost::shared_ptr<Region> region)
 334 {
 335         boost::shared_ptr<MidiRegion> r = boost::dynamic_pointer_cast<MidiRegion> (region);
 336
 337         if (!r) {
 338                 return false;
 339         }
 340
 341         bool changed = false;
 342
 343         {
 344                 RegionWriteLock rlock (this);
 345                 RegionList::iterator i;
 346                 RegionList::iterator tmp;
 347
 348                 for (i = regions.begin(); i != regions.end(); ) {
 349
 350                         tmp = i;
 351                         ++tmp;
 352
 353                         if ((*i) == region) {
 354                                 regions.erase (i);
 355                                 changed = true;
 356                         }
 357
 358                         i = tmp;
 359                 }
 360         }
 361
 362
 363         if (changed) {
 364                 /* overload this, it normally means "removed", not destroyed */
 365                 notify_region_removed (region);
 366         }
 367
 368         return changed;
 369 }
 370
 371 set<Evoral::Parameter>
 372 MidiPlaylist::contained_automation()
 373 {
 374         /* this function is never called from a realtime thread, so
 375            its OK to block (for short intervals).
 376         */
 377
 378         Playlist::RegionReadLock rl (this);
 379         set<Evoral::Parameter> ret;
 380
 381         for (RegionList::const_iterator r = regions.begin(); r != regions.end(); ++r) {
 382                 boost::shared_ptr<MidiRegion> mr = boost::dynamic_pointer_cast<MidiRegion>(*r);
 383
 384                 for (Automatable::Controls::iterator c = mr->model()->controls().begin();
 385                                 c != mr->model()->controls().end(); ++c) {
 386                         if (c->second->list()->size() > 0) {
 387                                 ret.insert(c->first);
 388                         }
 389                 }
 390         }
 391
 392         return ret;
 393 }