summaryrefslogtreecommitdiff
path: root/libs/ardour/playlist.cc
diff options
context:
space:
mode:
Diffstat (limited to 'libs/ardour/playlist.cc')
-rw-r--r--libs/ardour/playlist.cc1754
1 files changed, 1754 insertions, 0 deletions
diff --git a/libs/ardour/playlist.cc b/libs/ardour/playlist.cc
new file mode 100644
index 0000000000..b28e193c9b
--- /dev/null
+++ b/libs/ardour/playlist.cc
@@ -0,0 +1,1754 @@
+/*
+ Copyright (C) 2000-2003 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
+ the Free Software Foundation; either version 2 of the License, or
+ (at your option) any later version.
+
+ This program is distributed in the hope that it will be useful,
+ but WITHOUT ANY WARRANTY; without even the implied warranty of
+ MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+ GNU General Public License for more details.
+
+ You should have received a copy of the GNU General Public License
+ along with this program; if not, write to the Free Software
+ Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
+
+ $Id$
+*/
+
+#include <set>
+#include <fstream>
+#include <algorithm>
+#include <unistd.h>
+#include <cerrno>
+#include <string>
+#include <climits>
+
+#include <sigc++/bind.h>
+
+#include <pbd/failed_constructor.h>
+#include <pbd/stl_delete.h>
+#include <pbd/xml++.h>
+
+#include <ardour/playlist.h>
+#include <ardour/session.h>
+#include <ardour/region.h>
+#include <ardour/region_factory.h>
+
+#include "i18n.h"
+
+using namespace std;
+using namespace ARDOUR;
+//using namespace sigc;
+
+sigc::signal<void,Playlist*> Playlist::PlaylistCreated;
+
+struct ShowMeTheList {
+ ShowMeTheList (Playlist *pl, const string& n) : playlist (pl), name (n) {}
+ ~ShowMeTheList () {
+ cerr << ">>>>" << name << endl; playlist->dump(); cerr << "<<<<" << name << endl << endl;
+ };
+ Playlist *playlist;
+ string name;
+};
+
+struct RegionSortByLayer {
+ bool operator() (Region *a, Region *b) {
+ return a->layer() < b->layer();
+ }
+};
+
+struct RegionSortByPosition {
+ bool operator() (Region *a, Region *b) {
+ return a->position() < b->position();
+ }
+};
+
+struct RegionSortByLastLayerOp {
+ bool operator() (Region *a, Region *b) {
+ return a->last_layer_op() < b->last_layer_op();
+ }
+};
+
+Playlist::Playlist (Session& sess, string nom, bool hide)
+ : _session (sess)
+{
+ init (hide);
+ _name = nom;
+ _orig_diskstream_id = 0;
+
+}
+
+Playlist::Playlist (Session& sess, const XMLNode& node, bool hide)
+ : _session (sess)
+{
+ init (hide);
+ _name = "unnamed"; /* reset by set_state */
+ _orig_diskstream_id = 0;
+
+ if (set_state (node)) {
+ throw failed_constructor();
+ }
+}
+
+Playlist::Playlist (const Playlist& other, string namestr, bool hide)
+ : _name (namestr), _session (other._session), _orig_diskstream_id(other._orig_diskstream_id)
+{
+ init (hide);
+
+ other.copy_regions (regions);
+
+ for (list<Region*>::iterator x = regions.begin(); x != regions.end(); ++x) {
+ (*x)->set_playlist (this);
+ }
+}
+
+Playlist::Playlist (const Playlist& other, jack_nframes_t start, jack_nframes_t cnt, string str, bool hide)
+ : _name (str), _session (other._session), _orig_diskstream_id(other._orig_diskstream_id)
+{
+ RegionLock rlock2 (&((Playlist&)other));
+
+ jack_nframes_t end = start + cnt - 1;
+
+ init (hide);
+
+ for (RegionList::const_iterator i = other.regions.begin(); i != other.regions.end(); i++) {
+
+ Region *region;
+ Region *new_region;
+ jack_nframes_t offset = 0;
+ jack_nframes_t position = 0;
+ jack_nframes_t len = 0;
+ string new_name;
+ OverlapType overlap;
+
+ region = *i;
+
+ overlap = region->coverage (start, end);
+
+ switch (overlap) {
+ case OverlapNone:
+ continue;
+
+ case OverlapInternal:
+ offset = start - region->position();
+ position = 0;
+ len = cnt;
+ break;
+
+ case OverlapStart:
+ offset = 0;
+ position = region->position() - start;
+ len = end - region->position();
+ break;
+
+ case OverlapEnd:
+ offset = start - region->position();
+ position = 0;
+ len = region->length() - offset;
+ break;
+
+ case OverlapExternal:
+ offset = 0;
+ position = region->position() - start;
+ len = region->length();
+ break;
+ }
+
+ _session.region_name (new_name, region->name(), false);
+
+ new_region = createRegion (*region, offset, len, new_name, region->layer(), region->flags());
+
+ add_region_internal (new_region, position, true);
+ }
+
+ /* this constructor does NOT notify others (session) */
+}
+
+void
+Playlist::ref ()
+{
+ ++_refcnt;
+ InUse (this, true); /* EMIT SIGNAL */
+}
+
+void
+Playlist::unref ()
+{
+ if (_refcnt > 0) {
+ _refcnt--;
+ }
+ if (_refcnt == 0) {
+ InUse (this, false); /* EMIT SIGNAL */
+
+ if (_hidden) {
+ /* nobody knows we exist */
+ delete this;
+ }
+ }
+}
+
+
+void
+Playlist::copy_regions (RegionList& newlist) const
+{
+ RegionLock rlock (const_cast<Playlist *> (this));
+
+ for (RegionList::const_iterator i = regions.begin(); i != regions.end(); ++i) {
+ newlist.push_back (createRegion (**i));
+ }
+}
+
+void
+Playlist::init (bool hide)
+{
+ atomic_set (&block_notifications, 0);
+ atomic_set (&ignore_state_changes, 0);
+ pending_modified = false;
+ pending_length = false;
+ _refcnt = 0;
+ _hidden = hide;
+ _splicing = false;
+ _nudging = false;
+ in_set_state = false;
+ _edit_mode = _session.get_edit_mode();
+ in_flush = false;
+ in_partition = false;
+ subcnt = 0;
+ _read_data_count = 0;
+ _frozen = false;
+ save_on_thaw = false;
+ layer_op_counter = 0;
+ freeze_length = 0;
+
+ // _session.LayerModelChanged.connect (slot (*this, &Playlist::relayer));
+
+ Modified.connect (mem_fun (*this, &Playlist::mark_session_dirty));
+}
+
+Playlist::Playlist (const Playlist& pl)
+ : _session (pl._session)
+{
+ fatal << _("playlist const copy constructor called") << endmsg;
+}
+
+Playlist::Playlist (Playlist& pl)
+ : _session (pl._session)
+{
+ fatal << _("playlist non-const copy constructor called") << endmsg;
+}
+
+Playlist::~Playlist ()
+{
+}
+
+void
+Playlist::set_name (const string& str)
+{
+ /* in a typical situation, a playlist is being used
+ by one diskstream and also is referenced by the
+ Session. if there are more references than that,
+ then don't change the name.
+ */
+
+ if (_refcnt > 2) {
+ return;
+ }
+
+ _name = str;
+ NameChanged(); /* EMIT SIGNAL */
+}
+
+/***********************************************************************
+ CHANGE NOTIFICATION HANDLING
+
+ Notifications must be delayed till the region_lock is released. This
+ is necessary because handlers for the signals may need to acquire
+ the lock (e.g. to read from the playlist).
+ ***********************************************************************/
+
+void
+Playlist::freeze ()
+{
+ delay_notifications ();
+ atomic_inc (&ignore_state_changes);
+}
+
+void
+Playlist::thaw ()
+{
+ atomic_dec (&ignore_state_changes);
+ release_notifications ();
+}
+
+
+void
+Playlist::delay_notifications ()
+{
+ atomic_inc (&block_notifications);
+ freeze_length = _get_maximum_extent();
+}
+
+void
+Playlist::release_notifications ()
+{
+ if (atomic_dec_and_test(&block_notifications)) {
+ flush_notifications ();
+ }
+}
+
+
+void
+Playlist::notify_modified ()
+{
+ if (holding_state ()) {
+ pending_modified = true;
+ } else {
+ pending_modified = false;
+ Modified(); /* EMIT SIGNAL */
+ }
+}
+
+void
+Playlist::notify_region_removed (Region *r)
+{
+ if (holding_state ()) {
+ pending_removals.insert (pending_removals.end(), r);
+ } else {
+ RegionRemoved (r); /* EMIT SIGNAL */
+ /* this might not be true, but we have to act
+ as though it could be.
+ */
+ LengthChanged (); /* EMIT SIGNAL */
+ Modified (); /* EMIT SIGNAL */
+ }
+}
+
+void
+Playlist::notify_region_added (Region *r)
+{
+ if (holding_state()) {
+ pending_adds.insert (pending_adds.end(), r);
+ } else {
+ RegionAdded (r); /* EMIT SIGNAL */
+ /* this might not be true, but we have to act
+ as though it could be.
+ */
+ LengthChanged (); /* EMIT SIGNAL */
+ Modified (); /* EMIT SIGNAL */
+ }
+}
+
+void
+Playlist::notify_length_changed ()
+{
+ if (holding_state ()) {
+ pending_length = true;
+ } else {
+ LengthChanged(); /* EMIT SIGNAL */
+ Modified (); /* EMIT SIGNAL */
+ }
+}
+
+void
+Playlist::flush_notifications ()
+{
+ RegionList::iterator r;
+ RegionList::iterator a;
+ set<Region*> dependent_checks_needed;
+ uint32_t n = 0;
+
+ if (in_flush) {
+ return;
+ }
+
+ in_flush = true;
+
+ /* we have no idea what order the regions ended up in pending
+ bounds (it could be based on selection order, for example).
+ so, to preserve layering in the "most recently moved is higher"
+ model, sort them by existing layer, then timestamp them.
+ */
+
+ // RegionSortByLayer cmp;
+ // pending_bounds.sort (cmp);
+
+ for (RegionList::iterator r = pending_bounds.begin(); r != pending_bounds.end(); ++r) {
+ if (_session.get_layer_model() == Session::MoveAddHigher) {
+ timestamp_layer_op (**r);
+ }
+ pending_length = true;
+ n++;
+ }
+
+ for (RegionList::iterator r = pending_bounds.begin(); r != pending_bounds.end(); ++r) {
+ dependent_checks_needed.insert (*r);
+ /* don't increment n again - its the same list */
+ }
+
+ for (a = pending_adds.begin(); a != pending_adds.end(); ++a) {
+ dependent_checks_needed.insert (*a);
+ RegionAdded (*a); /* EMIT SIGNAL */
+ n++;
+ }
+
+ for (set<Region*>::iterator x = dependent_checks_needed.begin(); x != dependent_checks_needed.end(); ++x) {
+ check_dependents (**x, false);
+ }
+
+ for (r = pending_removals.begin(); r != pending_removals.end(); ++r) {
+ remove_dependents (**r);
+ RegionRemoved (*r); /* EMIT SIGNAL */
+ n++;
+ }
+
+ if ((freeze_length != _get_maximum_extent()) || pending_length) {
+ pending_length = 0;
+ LengthChanged(); /* EMIT SIGNAL */
+ n++;
+ }
+
+ if (n || pending_modified) {
+ possibly_splice ();
+ relayer ();
+ pending_modified = false;
+ Modified (); /* EMIT SIGNAL */
+ }
+
+ pending_adds.clear ();
+ pending_removals.clear ();
+ pending_bounds.clear ();
+
+ if (save_on_thaw) {
+ save_on_thaw = false;
+ save_state (last_save_reason);
+ }
+
+ in_flush = false;
+}
+
+/*************************************************************
+ PLAYLIST OPERATIONS
+ *************************************************************/
+
+void
+Playlist::add_region (const Region& region, jack_nframes_t position, float times, bool with_save)
+{
+ RegionLock rlock (this);
+
+ times = fabs (times);
+
+ int itimes = (int) floor (times);
+
+ jack_nframes_t pos = position;
+
+ if (itimes >= 1) {
+ add_region_internal (const_cast<Region*>(&region), pos, true);
+ pos += region.length();
+ --itimes;
+ }
+
+ /* later regions will all be spliced anyway */
+
+ if (!holding_state ()) {
+ possibly_splice_unlocked ();
+ }
+
+ /* note that itimes can be zero if we being asked to just
+ insert a single fraction of the region.
+ */
+
+ for (int i = 0; i < itimes; ++i) {
+ Region *copy = createRegion (region);
+ add_region_internal (copy, pos, true);
+ pos += region.length();
+ }
+
+ if (floor (times) != times) {
+ jack_nframes_t length = (jack_nframes_t) floor (region.length() * (times - floor (times)));
+ string name;
+ _session.region_name (name, region.name(), false);
+ Region *sub = createRegion (region, 0, length, name, region.layer(), region.flags());
+ add_region_internal (sub, pos, true);
+ }
+
+ if (with_save) {
+ maybe_save_state (_("add region"));
+ }
+}
+
+void
+Playlist::add_region_internal (Region *region, jack_nframes_t position, bool delay_sort)
+{
+ RegionSortByPosition cmp;
+ jack_nframes_t old_length;
+
+ // cerr << "adding region " << region->name() << " at " << position << endl;
+
+ if (!holding_state()) {
+ old_length = _get_maximum_extent();
+ }
+
+ region->set_playlist (this);
+ region->set_position (position, this);
+ region->lock_sources ();
+
+ timestamp_layer_op (*region);
+
+ regions.insert (upper_bound (regions.begin(), regions.end(), region, cmp), region);
+
+ if (!holding_state () && !in_set_state) {
+ /* layers get assigned from XML state */
+ relayer ();
+ }
+
+ /* we need to notify the existence of new region before checking dependents. Ick. */
+
+ notify_region_added (region);
+
+ if (!holding_state ()) {
+ check_dependents (*region, false);
+ if (old_length != _get_maximum_extent()) {
+ notify_length_changed ();
+ }
+ }
+
+ region->StateChanged.connect (sigc::bind (mem_fun (this, &Playlist::region_changed_proxy), region));
+}
+
+void
+Playlist::replace_region (Region& old, Region& newr, jack_nframes_t pos)
+{
+ RegionLock rlock (this);
+
+ remove_region_internal (&old);
+ add_region_internal (&newr, pos);
+
+ if (!holding_state ()) {
+ possibly_splice_unlocked ();
+ }
+
+ maybe_save_state (_("replace region"));
+}
+
+void
+Playlist::remove_region (Region *region)
+{
+ RegionLock rlock (this);
+ remove_region_internal (region);
+
+ if (!holding_state ()) {
+ possibly_splice_unlocked ();
+ }
+
+ maybe_save_state (_("remove region"));
+}
+
+int
+Playlist::remove_region_internal (Region *region, bool delay_sort)
+{
+ RegionList::iterator i;
+ jack_nframes_t old_length;
+
+ // cerr << "removing region " << region->name() << endl;
+
+ if (!holding_state()) {
+ old_length = _get_maximum_extent();
+ }
+
+ for (i = regions.begin(); i != regions.end(); ++i) {
+ if (*i == region) {
+
+ regions.erase (i);
+
+ if (!holding_state ()) {
+ relayer ();
+ remove_dependents (*region);
+
+ if (old_length != _get_maximum_extent()) {
+ notify_length_changed ();
+ }
+ }
+
+ notify_region_removed (region);
+ return 0;
+ }
+ }
+ return -1;
+}
+
+void
+Playlist::partition (jack_nframes_t start, jack_nframes_t end, bool just_top_level)
+{
+ RegionList thawlist;
+
+ partition_internal (start, end, false, thawlist);
+
+ for (RegionList::iterator i = thawlist.begin(); i != thawlist.end(); ++i) {
+ (*i)->thaw ("separation");
+ }
+
+ maybe_save_state (_("separate"));
+}
+
+void
+Playlist::partition_internal (jack_nframes_t start, jack_nframes_t end, bool cutting, RegionList& thawlist)
+{
+ RegionLock rlock (this);
+ Region *region;
+ Region *current;
+ string new_name;
+ RegionList::iterator tmp;
+ OverlapType overlap;
+ jack_nframes_t pos1, pos2, pos3, pos4;
+ RegionList new_regions;
+
+ in_partition = true;
+
+ /* need to work from a copy, because otherwise the regions we add during the process
+ get operated on as well.
+ */
+
+ RegionList copy = regions;
+
+ for (RegionList::iterator i = copy.begin(); i != copy.end(); i = tmp) {
+
+ tmp = i;
+ ++tmp;
+
+ current = *i;
+
+ if (current->first_frame() == start && current->last_frame() == end) {
+ if (cutting) {
+ remove_region_internal (current);
+ }
+ continue;
+ }
+
+ if ((overlap = current->coverage (start, end)) == OverlapNone) {
+ continue;
+ }
+
+ pos1 = current->position();
+ pos2 = start;
+ pos3 = end;
+ pos4 = current->last_frame();
+
+ if (overlap == OverlapInternal) {
+
+ /* split: we need 3 new regions, the front, middle and end.
+ cut: we need 2 regions, the front and end.
+ */
+
+ /*
+ start end
+ ---------------*************************------------
+ P1 P2 P3 P4
+ SPLIT:
+ ---------------*****++++++++++++++++====------------
+ CUT
+ ---------------*****----------------====------------
+
+ */
+
+ if (!cutting) {
+
+ /* "middle" ++++++ */
+
+ _session.region_name (new_name, current->name(), false);
+ region = createRegion (*current, pos2 - pos1, pos3 - pos2, new_name,
+ regions.size(), Region::Flag(current->flags()|Region::Automatic|Region::LeftOfSplit|Region::RightOfSplit));
+ add_region_internal (region, start, true);
+ new_regions.push_back (region);
+ }
+
+ /* "end" ====== */
+
+ _session.region_name (new_name, current->name(), false);
+ region = createRegion (*current, pos3 - pos1, pos4 - pos3, new_name,
+ regions.size(), Region::Flag(current->flags()|Region::Automatic|Region::RightOfSplit));
+
+ add_region_internal (region, end, true);
+ new_regions.push_back (region);
+
+ /* "front" ***** */
+
+ current->freeze ();
+ thawlist.push_back (current);
+ current->trim_end (pos2, this);
+
+ } else if (overlap == OverlapEnd) {
+
+ /*
+ start end
+ ---------------*************************------------
+ P1 P2 P4 P3
+ SPLIT:
+ ---------------**************+++++++++++------------
+ CUT:
+ ---------------**************-----------------------
+
+ */
+
+ if (!cutting) {
+
+ /* end +++++ */
+
+ _session.region_name (new_name, current->name(), false);
+ region = createRegion (*current, pos2 - pos1, pos4 - pos2, new_name, (layer_t) regions.size(),
+ Region::Flag(current->flags()|Region::Automatic|Region::LeftOfSplit));
+ add_region_internal (region, start, true);
+ new_regions.push_back (region);
+ }
+
+ /* front ****** */
+
+ current->freeze ();
+ thawlist.push_back (current);
+ current->trim_end (pos2, this);
+
+ } else if (overlap == OverlapStart) {
+
+ /* split: we need 2 regions: the front and the end.
+ cut: just trim current to skip the cut area
+ */
+
+ /*
+ start end
+ ---------------*************************------------
+ P2 P1 P3 P4
+
+ SPLIT:
+ ---------------****+++++++++++++++++++++------------
+ CUT:
+ -------------------*********************------------
+
+ */
+
+ if (!cutting) {
+
+ /* front **** */
+ _session.region_name (new_name, current->name(), false);
+ region = createRegion (*current, 0, pos3 - pos1, new_name,
+ regions.size(), Region::Flag(current->flags()|Region::Automatic|Region::RightOfSplit));
+ add_region_internal (region, pos1, true);
+ new_regions.push_back (region);
+ }
+
+ /* end */
+
+ current->freeze ();
+ thawlist.push_back (current);
+ current->trim_front (pos3, this);
+
+ } else if (overlap == OverlapExternal) {
+
+ /* split: no split required.
+ cut: remove the region.
+ */
+
+ /*
+ start end
+ ---------------*************************------------
+ P2 P1 P3 P4
+
+ SPLIT:
+ ---------------*************************------------
+ CUT:
+ ----------------------------------------------------
+
+ */
+
+ if (cutting) {
+ remove_region_internal (current);
+ }
+ new_regions.push_back (current);
+ }
+ }
+
+ in_partition = false;
+
+ for (RegionList::iterator i = new_regions.begin(); i != new_regions.end(); ++i) {
+ check_dependents (**i, false);
+ }
+}
+
+Playlist*
+Playlist::cut_copy (Playlist* (Playlist::*pmf)(jack_nframes_t, jack_nframes_t,bool), list<AudioRange>& ranges, bool result_is_hidden)
+{
+ Playlist* ret;
+ Playlist* pl;
+ jack_nframes_t start;
+
+ if (ranges.empty()) {
+ return 0;
+ }
+
+ start = ranges.front().start;
+
+
+ for (list<AudioRange>::iterator i = ranges.begin(); i != ranges.end(); ++i) {
+
+ pl = (this->*pmf)((*i).start, (*i).length(), result_is_hidden);
+
+ if (i == ranges.begin()) {
+ ret = pl;
+ } else {
+
+ /* paste the next section into the nascent playlist,
+ offset to reflect the start of the first range we
+ chopped.
+ */
+
+ ret->paste (*pl, (*i).start - start, 1.0f);
+ delete pl;
+ }
+ }
+
+ if (ret) {
+ /* manually notify session of new playlist here
+ because the playlists were constructed without notifying
+ */
+ PlaylistCreated (ret);
+ }
+
+ return ret;
+}
+
+Playlist*
+Playlist::cut (list<AudioRange>& ranges, bool result_is_hidden)
+{
+ Playlist* (Playlist::*pmf)(jack_nframes_t,jack_nframes_t,bool) = &Playlist::cut;
+ return cut_copy (pmf, ranges, result_is_hidden);
+}
+
+Playlist*
+Playlist::copy (list<AudioRange>& ranges, bool result_is_hidden)
+{
+ Playlist* (Playlist::*pmf)(jack_nframes_t,jack_nframes_t,bool) = &Playlist::copy;
+ return cut_copy (pmf, ranges, result_is_hidden);
+}
+
+Playlist *
+Playlist::cut (jack_nframes_t start, jack_nframes_t cnt, bool result_is_hidden)
+{
+ Playlist *the_copy;
+ RegionList thawlist;
+ char buf[32];
+
+ snprintf (buf, sizeof (buf), "%" PRIu32, ++subcnt);
+ string new_name = _name;
+ new_name += '.';
+ new_name += buf;
+
+ if ((the_copy = copyPlaylist (*this, start, cnt, new_name, result_is_hidden)) == 0) {
+ return 0;
+ }
+
+ partition_internal (start, start+cnt-1, true, thawlist);
+ possibly_splice ();
+
+ for (RegionList::iterator i = thawlist.begin(); i != thawlist.end(); ++i) {
+ (*i)->thaw ("playlist cut");
+ }
+
+ maybe_save_state (_("cut"));
+
+ return the_copy;
+}
+
+Playlist *
+Playlist::copy (jack_nframes_t start, jack_nframes_t cnt, bool result_is_hidden)
+{
+ char buf[32];
+
+ snprintf (buf, sizeof (buf), "%" PRIu32, ++subcnt);
+ string new_name = _name;
+ new_name += '.';
+ new_name += buf;
+
+ cnt = min (_get_maximum_extent() - start, cnt);
+ return copyPlaylist (*this, start, cnt, new_name, result_is_hidden);
+}
+
+int
+Playlist::paste (Playlist& other, jack_nframes_t position, float times)
+{
+ times = fabs (times);
+ jack_nframes_t old_length;
+
+ {
+ RegionLock rl1 (this);
+ RegionLock rl2 (&other);
+
+ old_length = _get_maximum_extent();
+
+ int itimes = (int) floor (times);
+ jack_nframes_t pos = position;
+ jack_nframes_t shift = other._get_maximum_extent();
+ layer_t top_layer = regions.size();
+
+ while (itimes--) {
+ for (RegionList::iterator i = other.regions.begin(); i != other.regions.end(); ++i) {
+ Region *copy_of_region = createRegion (**i);
+
+ /* put these new regions on top of all existing ones, but preserve
+ the ordering they had in the original playlist.
+ */
+
+ copy_of_region->set_layer (copy_of_region->layer() + top_layer);
+ add_region_internal (copy_of_region, copy_of_region->position() + pos);
+ }
+ pos += shift;
+ }
+
+ possibly_splice_unlocked ();
+
+ /* XXX shall we handle fractional cases at some point? */
+
+ if (old_length != _get_maximum_extent()) {
+ notify_length_changed ();
+ }
+
+
+ }
+
+ maybe_save_state (_("paste"));
+
+ return 0;
+}
+
+
+void
+Playlist::duplicate (Region& region, jack_nframes_t position, float times)
+{
+ times = fabs (times);
+
+ RegionLock rl (this);
+ int itimes = (int) floor (times);
+ jack_nframes_t pos = position;
+
+ while (itimes--) {
+ Region *copy = createRegion (region);
+ add_region_internal (copy, pos, true);
+ pos += region.length();
+ }
+
+ if (floor (times) != times) {
+ jack_nframes_t length = (jack_nframes_t) floor (region.length() * (times - floor (times)));
+ string name;
+ _session.region_name (name, region.name(), false);
+ Region *sub = createRegion (region, 0, length, name, region.layer(), region.flags());
+ add_region_internal (sub, pos, true);
+ }
+
+ maybe_save_state (_("duplicate"));
+}
+
+void
+Playlist::split_region (Region& region, jack_nframes_t playlist_position)
+{
+ RegionLock rl (this);
+
+ if (!region.covers (playlist_position)) {
+ return;
+ }
+
+ if (region.position() == playlist_position ||
+ region.last_frame() == playlist_position) {
+ return;
+ }
+
+ if (remove_region_internal (&region, true)) {
+ return;
+ }
+
+ Region *left;
+ Region *right;
+ jack_nframes_t before;
+ jack_nframes_t after;
+ string before_name;
+ string after_name;
+
+ before = playlist_position - region.position();
+ after = region.length() - before;
+
+ _session.region_name (before_name, region.name(), false);
+ left = createRegion (region, 0, before, before_name, region.layer(), Region::Flag (region.flags()|Region::LeftOfSplit));
+
+ _session.region_name (after_name, region.name(), false);
+ right = createRegion (region, before, after, after_name, region.layer(), Region::Flag (region.flags()|Region::RightOfSplit));
+
+ add_region_internal (left, region.position(), true);
+ add_region_internal (right, region.position() + before);
+
+ maybe_save_state (_("split"));
+}
+
+void
+Playlist::possibly_splice ()
+{
+ if (_edit_mode == Splice) {
+ splice_locked ();
+ }
+}
+
+void
+Playlist::possibly_splice_unlocked ()
+{
+ if (_edit_mode == Splice) {
+ splice_unlocked ();
+ }
+}
+
+void
+Playlist::splice_locked ()
+{
+ {
+ RegionLock rl (this);
+ core_splice ();
+ }
+
+ notify_length_changed ();
+}
+
+void
+Playlist::splice_unlocked ()
+{
+ core_splice ();
+ notify_length_changed ();
+}
+
+void
+Playlist::core_splice ()
+{
+ _splicing = true;
+
+ for (RegionList::iterator i = regions.begin(); i != regions.end(); ++i) {
+
+ RegionList::iterator next;
+
+ next = i;
+ ++next;
+
+ if (next == regions.end()) {
+ break;
+ }
+
+ (*next)->set_position ((*i)->last_frame() + 1, this);
+ }
+
+ _splicing = false;
+}
+
+void
+Playlist::region_bounds_changed (Change what_changed, Region *region)
+{
+ if (in_set_state || _splicing || _nudging) {
+ return;
+ }
+
+ if (what_changed & ARDOUR::PositionChanged) {
+
+ /* remove it from the list then add it back in
+ the right place again.
+ */
+
+ RegionSortByPosition cmp;
+
+ RegionList::iterator i = find (regions.begin(), regions.end(), region);
+
+ if (i == regions.end()) {
+ warning << compose (_("%1: bounds changed received for region (%2)not in playlist"),
+ _name, region->name())
+ << endmsg;
+ return;
+ }
+
+ regions.erase (i);
+ regions.insert (upper_bound (regions.begin(), regions.end(), region, cmp),
+ region);
+
+ }
+
+ if (what_changed & Change (ARDOUR::PositionChanged|ARDOUR::LengthChanged)) {
+
+ if (holding_state ()) {
+ pending_bounds.push_back (region);
+ } else {
+ if (_session.get_layer_model() == Session::MoveAddHigher) {
+ /* it moved or changed length, so change the timestamp */
+ timestamp_layer_op (*region);
+ }
+
+ possibly_splice ();
+ check_dependents (*region, false);
+ notify_length_changed ();
+ relayer ();
+ }
+ }
+}
+
+void
+Playlist::region_changed_proxy (Change what_changed, Region* region)
+{
+ /* this makes a virtual call to the right kind of playlist ... */
+
+ region_changed (what_changed, region);
+}
+
+bool
+Playlist::region_changed (Change what_changed, Region* region)
+{
+ Change our_interests = Change (Region::MuteChanged|Region::LayerChanged|Region::OpacityChanged);
+ bool save = false;
+
+ if (in_set_state || in_flush) {
+ return false;
+ }
+
+ {
+ if (what_changed & BoundsChanged) {
+ region_bounds_changed (what_changed, region);
+ save = !(_splicing || _nudging);
+ }
+
+ if ((what_changed & Region::MuteChanged) &&
+ !(what_changed & Change (ARDOUR::PositionChanged|ARDOUR::LengthChanged))) {
+ check_dependents (*region, false);
+ }
+
+ if (what_changed & our_interests) {
+ save = true;
+ }
+ }
+
+ return save;
+}
+
+void
+Playlist::clear (bool with_delete, bool with_save)
+{
+ RegionList::iterator i;
+ RegionList tmp;
+
+ {
+ RegionLock rl (this);
+ tmp = regions;
+ regions.clear ();
+ }
+
+ for (i = tmp.begin(); i != tmp.end(); ++i) {
+ notify_region_removed (*i);
+ if (with_delete) {
+ delete *i;
+ }
+ }
+
+ if (with_save) {
+ maybe_save_state (_("clear"));
+ }
+}
+
+/***********************************************************************
+ FINDING THINGS
+ **********************************************************************/
+
+Playlist::RegionList *
+Playlist::regions_at (jack_nframes_t frame)
+
+{
+ RegionLock rlock (this);
+ return find_regions_at (frame);
+}
+
+Region *
+Playlist::top_region_at (jack_nframes_t frame)
+
+{
+ RegionLock rlock (this);
+ RegionList *rlist = find_regions_at (frame);
+ Region *region = 0;
+
+ if (rlist->size()) {
+ RegionSortByLayer cmp;
+ rlist->sort (cmp);
+ region = rlist->back();
+ }
+
+ delete rlist;
+ return region;
+}
+
+Playlist::RegionList *
+Playlist::find_regions_at (jack_nframes_t frame)
+{
+ RegionList *rlist = new RegionList;
+
+ for (RegionList::iterator i = regions.begin(); i != regions.end(); ++i) {
+ if ((*i)->covers (frame)) {
+ rlist->push_back (*i);
+ }
+ }
+
+ return rlist;
+}
+
+Playlist::RegionList *
+Playlist::regions_touched (jack_nframes_t start, jack_nframes_t end)
+{
+ RegionLock rlock (this);
+ RegionList *rlist = new RegionList;
+
+ for (RegionList::iterator i = regions.begin(); i != regions.end(); ++i) {
+ if ((*i)->coverage (start, end) != OverlapNone) {
+ rlist->push_back (*i);
+ }
+ }
+
+ return rlist;
+}
+
+
+Region*
+
+Playlist::find_next_region (jack_nframes_t frame, RegionPoint point, int dir)
+{
+ RegionLock rlock (this);
+ Region* ret = 0;
+ jack_nframes_t closest = max_frames;
+
+ for (RegionList::iterator i = regions.begin(); i != regions.end(); ++i) {
+
+ jack_nframes_t distance;
+ Region* r = (*i);
+ jack_nframes_t pos = 0;
+
+ switch (point) {
+ case Start:
+ pos = r->first_frame ();
+ break;
+ case End:
+ pos = r->last_frame ();
+ break;
+ case SyncPoint:
+ pos = r->adjust_to_sync (r->first_frame());
+ break;
+ }
+
+ switch (dir) {
+ case 1: /* forwards */
+
+ if (pos > frame) {
+ if ((distance = pos - frame) < closest) {
+ closest = distance;
+ ret = r;
+ }
+ }
+
+ break;
+
+ default: /* backwards */
+
+ if (pos < frame) {
+ if ((distance = frame - pos) < closest) {
+ closest = distance;
+ ret = r;
+ }
+ }
+ break;
+ }
+ }
+
+ return ret;
+}
+
+/***********************************************************************/
+
+
+
+void
+Playlist::mark_session_dirty ()
+{
+ if (!in_set_state && !holding_state ()) {
+ _session.set_dirty();
+ }
+}
+
+int
+Playlist::set_state (const XMLNode& node)
+{
+ in_set_state = true;
+
+ XMLNode *child;
+ XMLNodeList nlist;
+ XMLNodeConstIterator niter;
+ XMLPropertyList plist;
+ XMLPropertyConstIterator piter;
+ XMLProperty *prop;
+ Region *region;
+ string region_name;
+
+ clear (false, false);
+
+ if (node.name() != "Playlist") {
+ in_set_state = false;
+ return -1;
+ }
+
+ plist = node.properties();
+
+ for (piter = plist.begin(); piter != plist.end(); ++piter) {
+
+ prop = *piter;
+
+ if (prop->name() == X_("name")) {
+ _name = prop->value();
+ } else if (prop->name() == X_("orig_diskstream_id")) {
+ sscanf (prop->value().c_str(), "%" PRIu64, &_orig_diskstream_id);
+ } else if (prop->name() == X_("frozen")) {
+ _frozen = (prop->value() == X_("yes"));
+ }
+ }
+
+ nlist = node.children();
+
+ for (niter = nlist.begin(); niter != nlist.end(); ++niter) {
+
+ child = *niter;
+
+ if (child->name() == "Region") {
+
+ if ((region = createRegion (_session, *child, true)) == 0) {
+ error << _("Playlist: cannot create region from state file") << endmsg;
+ continue;
+ }
+
+ add_region (*region, region->position(), 1.0, false);
+
+ }
+ }
+
+ /* update dependents, which was not done during add_region_internal
+ due to in_set_state being true
+ */
+
+ for (RegionList::iterator r = regions.begin(); r != regions.end(); ++r) {
+ check_dependents (**r, false);
+ }
+
+ in_set_state = false;
+
+ return 0;
+}
+
+XMLNode&
+Playlist::get_state()
+{
+ return state(true);
+}
+
+XMLNode&
+Playlist::get_template()
+{
+ return state(false);
+}
+
+XMLNode&
+Playlist::state (bool full_state)
+{
+ XMLNode *node = new XMLNode (X_("Playlist"));
+ char buf[64];
+
+ node->add_property (X_("name"), _name);
+
+ snprintf (buf, sizeof(buf), "%" PRIu64, _orig_diskstream_id);
+ node->add_property (X_("orig_diskstream_id"), buf);
+ node->add_property (X_("frozen"), _frozen ? "yes" : "no");
+
+ if (full_state) {
+ RegionLock rlock (this, false);
+
+ for (RegionList::iterator i = regions.begin(); i != regions.end(); ++i) {
+ node->add_child_nocopy ((*i)->get_state());
+ }
+ }
+
+ if (_extra_xml) {
+ node->add_child_copy (*_extra_xml);
+ }
+
+ return *node;
+}
+
+bool
+Playlist::empty() const
+{
+ return regions.empty();
+}
+
+jack_nframes_t
+Playlist::get_maximum_extent () const
+{
+ RegionLock rlock (const_cast<Playlist *>(this));
+ return _get_maximum_extent ();
+}
+
+jack_nframes_t
+Playlist::_get_maximum_extent () const
+{
+ RegionList::const_iterator i;
+ jack_nframes_t max_extent = 0;
+ jack_nframes_t end = 0;
+
+ for (i = regions.begin(); i != regions.end(); ++i) {
+ if ((end = (*i)->position() + (*i)->length()) > max_extent) {
+ max_extent = end;
+ }
+ }
+
+ return max_extent;
+}
+
+string
+Playlist::bump_name (string name, Session &session)
+{
+ string newname = name;
+
+ do {
+ newname = Playlist::bump_name_once (newname);
+ } while (session.playlist_by_name(newname)!=NULL);
+
+ return newname;
+}
+
+string
+Playlist::bump_name_once (string name)
+{
+ string::size_type period;
+ string newname;
+
+ if ((period = name.find_last_of ('.')) == string::npos) {
+ newname = name;
+ newname += ".1";
+ } else {
+ char buf[32];
+ int version;
+
+ sscanf (name.substr (period+1).c_str(), "%d", &version);
+ snprintf (buf, sizeof(buf), "%d", version+1);
+
+ newname = name.substr (0, period+1);
+ newname += buf;
+ }
+
+ return newname;
+}
+
+layer_t
+Playlist::top_layer() const
+{
+ RegionLock rlock (const_cast<Playlist *> (this));
+ layer_t top = 0;
+
+ for (RegionList::const_iterator i = regions.begin(); i != regions.end(); ++i) {
+ top = max (top, (*i)->layer());
+ }
+ return top;
+}
+
+void
+Playlist::set_edit_mode (EditMode mode)
+{
+ _edit_mode = mode;
+}
+
+/********************
+ * Region Layering
+ ********************/
+
+void
+Playlist::relayer ()
+{
+ RegionList::iterator i;
+ uint32_t layer = 0;
+
+ /* don't send multiple Modified notifications
+ when multiple regions are relayered.
+ */
+
+ freeze ();
+
+ if (_session.get_layer_model() == Session::MoveAddHigher ||
+ _session.get_layer_model() == Session::AddHigher) {
+
+ RegionSortByLastLayerOp cmp;
+ RegionList copy = regions;
+
+ copy.sort (cmp);
+
+ for (i = copy.begin(); i != copy.end(); ++i) {
+ (*i)->set_layer (layer++);
+ }
+
+ } else {
+
+ /* Session::LaterHigher model */
+
+ for (i = regions.begin(); i != regions.end(); ++i) {
+ (*i)->set_layer (layer++);
+ }
+ }
+
+ /* sending Modified means that various kinds of layering
+ models operate correctly at the GUI
+ level. slightly inefficient, but only slightly.
+
+ We force a Modified signal here in case no layers actually
+ changed.
+ */
+
+ notify_modified ();
+
+ thaw ();
+}
+
+/* XXX these layer functions are all deprecated */
+
+void
+Playlist::raise_region (Region& region)
+{
+ uint32_t rsz = regions.size();
+ layer_t target = region.layer() + 1U;
+
+ if (target >= rsz) {
+ /* its already at the effective top */
+ return;
+ }
+
+ move_region_to_layer (target, region, 1);
+}
+
+void
+Playlist::lower_region (Region& region)
+{
+ if (region.layer() == 0) {
+ /* its already at the bottom */
+ return;
+ }
+
+ layer_t target = region.layer() - 1U;
+
+ move_region_to_layer (target, region, -1);
+}
+
+void
+Playlist::raise_region_to_top (Region& region)
+{
+ /* does nothing useful if layering mode is later=higher */
+ if ((_session.get_layer_model() == Session::MoveAddHigher) ||
+ (_session.get_layer_model() == Session::AddHigher)) {
+ timestamp_layer_op (region);
+ relayer ();
+ }
+}
+
+void
+Playlist::lower_region_to_bottom (Region& region)
+{
+ /* does nothing useful if layering mode is later=higher */
+ if ((_session.get_layer_model() == Session::MoveAddHigher) ||
+ (_session.get_layer_model() == Session::AddHigher)) {
+ region.set_last_layer_op (0);
+ relayer ();
+ }
+}
+
+int
+Playlist::move_region_to_layer (layer_t target_layer, Region& region, int dir)
+{
+ RegionList::iterator i;
+ typedef pair<Region*,layer_t> LayerInfo;
+ list<LayerInfo> layerinfo;
+ layer_t dest;
+
+ {
+ RegionLock rlock (const_cast<Playlist *> (this));
+
+ for (i = regions.begin(); i != regions.end(); ++i) {
+
+ if (&region == *i) {
+ continue;
+ }
+
+ if (dir > 0) {
+
+ /* region is moving up, move all regions on intermediate layers
+ down 1
+ */
+
+ if ((*i)->layer() > region.layer() && (*i)->layer() <= target_layer) {
+ dest = (*i)->layer() - 1;
+ } else {
+ /* not affected */
+ continue;
+ }
+ } else {
+
+ /* region is moving down, move all regions on intermediate layers
+ up 1
+ */
+
+ if ((*i)->layer() < region.layer() && (*i)->layer() >= target_layer) {
+ dest = (*i)->layer() + 1;
+ } else {
+ /* not affected */
+ continue;
+ }
+ }
+
+ LayerInfo newpair;
+
+ newpair.first = *i;
+ newpair.second = dest;
+
+ layerinfo.push_back (newpair);
+ }
+ }
+
+ /* now reset the layers without holding the region lock */
+
+ for (list<LayerInfo>::iterator x = layerinfo.begin(); x != layerinfo.end(); ++x) {
+ x->first->set_layer (x->second);
+ }
+
+ region.set_layer (target_layer);
+
+ /* now check all dependents */
+
+ for (list<LayerInfo>::iterator x = layerinfo.begin(); x != layerinfo.end(); ++x) {
+ check_dependents (*(x->first), false);
+ }
+
+ check_dependents (region, false);
+
+ return 0;
+}
+
+void
+Playlist::nudge_after (jack_nframes_t start, jack_nframes_t distance, bool forwards)
+{
+ RegionList::iterator i;
+ jack_nframes_t new_pos;
+ bool moved = false;
+
+ _nudging = true;
+
+ {
+ RegionLock rlock (const_cast<Playlist *> (this));
+
+ for (i = regions.begin(); i != regions.end(); ++i) {
+
+ if ((*i)->position() >= start) {
+
+ if (forwards) {
+
+ if ((*i)->last_frame() > max_frames - distance) {
+ new_pos = max_frames - (*i)->length();
+ } else {
+ new_pos = (*i)->position() + distance;
+ }
+
+ } else {
+
+ if ((*i)->position() > distance) {
+ new_pos = (*i)->position() - distance;
+ } else {
+ new_pos = 0;
+ }
+ }
+
+ (*i)->set_position (new_pos, this);
+ moved = true;
+ }
+ }
+ }
+
+ if (moved) {
+ _nudging = false;
+ maybe_save_state (_("nudged"));
+ notify_length_changed ();
+ }
+
+}
+
+Region*
+Playlist::find_region (id_t id) const
+{
+ RegionLock rlock (const_cast<Playlist*> (this));
+ RegionList::const_iterator i;
+
+ for (i = regions.begin(); i != regions.end(); ++i) {
+ if ((*i)->id() == id) {
+ return (*i);
+ }
+ }
+
+ return 0;
+}
+
+void
+Playlist::save_state (std::string why)
+{
+ if (!in_set_state) {
+ StateManager::save_state (why);
+ }
+}
+
+void
+Playlist::dump () const
+{
+ Region *r;
+
+ cerr << "Playlist \"" << _name << "\" " << endl
+ << regions.size() << " regions "
+ << endl;
+
+ for (RegionList::const_iterator i = regions.begin(); i != regions.end(); ++i) {
+ r = *i;
+ cerr << " " << r->name() << " ["
+ << r->start() << "+" << r->length()
+ << "] at "
+ << r->position()
+ << " on layer "
+ << r->layer ()
+ << endl;
+ }
+}
+
+void
+Playlist::set_frozen (bool yn)
+{
+ _frozen = yn;
+}
+
+void
+Playlist::timestamp_layer_op (Region& region)
+{
+// struct timeval tv;
+// gettimeofday (&tv, 0);
+ region.set_last_layer_op (++layer_op_counter);
+}
+
+void
+Playlist::maybe_save_state (string why)
+{
+ if (holding_state ()) {
+ save_on_thaw = true;
+ last_save_reason = why;
+ } else {
+ save_state (why);
+ }
+}