Improved ExportProfileManager error handling, and added some missing (?) initialization
[ardour.git] / libs / ardour / playlist.cc
index 04649a56fe5fb0409d2bc519a6ac647571fbd9ad..65cb8637d5e94912d34c421ca550b4be9c5c0523 100644 (file)
@@ -37,6 +37,7 @@
 #include <ardour/region.h>
 #include <ardour/region_factory.h>
 #include <ardour/playlist_factory.h>
+#include <ardour/transient_detector.h>
 
 #include "i18n.h"
 
@@ -330,7 +331,6 @@ Playlist::release_notifications ()
        } 
 }
 
-
 void
 Playlist::notify_modified ()
 {
@@ -518,9 +518,12 @@ Playlist::set_region_ownership ()
        }
 }
 
-void
+bool
 Playlist::add_region_internal (boost::shared_ptr<Region> region, nframes_t position)
 {
+       if (region->data_type() != _type)
+               return false;
+
        RegionSortByPosition cmp;
        nframes_t old_length = 0;
 
@@ -560,6 +563,8 @@ Playlist::add_region_internal (boost::shared_ptr<Region> region, nframes_t posit
 
        region->StateChanged.connect (sigc::bind (mem_fun (this, &Playlist::region_changed_proxy), 
                                                  boost::weak_ptr<Region> (region)));
+
+       return true;
 }
 
 void
@@ -673,53 +678,64 @@ Playlist::partition (nframes_t start, nframes_t end, bool just_top_level)
 void
 Playlist::partition_internal (nframes_t start, nframes_t end, bool cutting, RegionList& thawlist)
 {
-       RegionLock rlock (this);
-       boost::shared_ptr<Region> region;
-       boost::shared_ptr<Region> current;
-       string new_name;
-       RegionList::iterator tmp;
-       OverlapType overlap;
-       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) {
+       {
+               RegionLock rlock (this);
+               boost::shared_ptr<Region> region;
+               boost::shared_ptr<Region> current;
+               string new_name;
+               RegionList::iterator tmp;
+               OverlapType overlap;
+               nframes_t pos1, pos2, pos3, pos4;
                
-               tmp = i;
-               ++tmp;
-
-               current = *i;
+               in_partition = true;
                
-               if (current->first_frame() == start && current->last_frame() == end) {
-                       if (cutting) {
-                               remove_region_internal (current);
-                       }
-                       continue;
-               }
+               /* need to work from a copy, because otherwise the regions we add during the process
+                  get operated on as well.
+               */
                
-               if ((overlap = current->coverage (start, end)) == OverlapNone) {
-                       continue;
-               }
+               RegionList copy = regions;
                
-               pos1 = current->position();
-               pos2 = start;
-               pos3 = end;
-               pos4 = current->last_frame();
+               for (RegionList::iterator i = copy.begin(); i != copy.end(); i = tmp) {
+                       
+                       tmp = i;
+                       ++tmp;
+                       
+                       current = *i;
 
-               if (overlap == OverlapInternal) {
+                       if (current->first_frame() >= start && current->last_frame() < end) {
+                               if (cutting) {
+                                       remove_region_internal (current);
+                               }
+                               continue;
+                       }
                        
-                       /* split: we need 3 new regions, the front, middle and end.
-                          cut:   we need 2 regions, the front and end.
+                       /* coverage will return OverlapStart if the start coincides
+                          with the end point. we do not partition such a region,
+                          so catch this special case.
                        */
+
+                       if (current->first_frame() >= end) {
+                               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
@@ -728,37 +744,37 @@ Playlist::partition_internal (nframes_t start, nframes_t end, bool cutting, Regi
                          CUT
                          ---------------*****----------------====------------
                          
-                       */
+                               */
 
-                       if (!cutting) {
+                               if (!cutting) {
                                
-                               /* "middle" ++++++ */
+                                       /* "middle" ++++++ */
+                                       
+                                       _session.region_name (new_name, current->name(), false);
+                                       region = RegionFactory::create (current, pos2 - pos1, pos3 - pos2, new_name,
+                                                                       regions.size(), Region::Flag(current->flags()|Region::Automatic|Region::LeftOfSplit|Region::RightOfSplit));
+                                       add_region_internal (region, start);
+                                       new_regions.push_back (region);
+                               }
                                
+                               /* "end" ====== */
+                       
                                _session.region_name (new_name, current->name(), false);
-                               region = RegionFactory::create (current, pos2 - pos1, pos3 - pos2, new_name,
-                                                      regions.size(), Region::Flag(current->flags()|Region::Automatic|Region::LeftOfSplit|Region::RightOfSplit));
-                               add_region_internal (region, start);
+                               region = RegionFactory::create (current, pos3 - pos1, pos4 - pos3, new_name, 
+                                                               regions.size(), Region::Flag(current->flags()|Region::Automatic|Region::RightOfSplit));
+                               
+                               add_region_internal (region, end);
                                new_regions.push_back (region);
-                       }
-                       
-                       /* "end" ====== */
-                       
-                       _session.region_name (new_name, current->name(), false);
-                       region = RegionFactory::create (current, pos3 - pos1, pos4 - pos3, new_name, 
-                                              regions.size(), Region::Flag(current->flags()|Region::Automatic|Region::RightOfSplit));
-
-                       add_region_internal (region, end);
-                       new_regions.push_back (region);
-
-                       /* "front" ***** */
                                
-                       current->freeze ();
-                       thawlist.push_back (current);
-                       current->trim_end (pos2, this);
-
-               } else if (overlap == OverlapEnd) {
-
-                       /*
+                               /* "front" ***** */
+                               
+                               current->freeze ();
+                               thawlist.push_back (current);
+                               current->trim_end (pos2, this);
+                               
+                       } else if (overlap == OverlapEnd) {
+                               
+                               /*
                                                              start           end
                                    ---------------*************************------------
                                                   P1           P2         P4   P3
@@ -766,33 +782,32 @@ Playlist::partition_internal (nframes_t start, nframes_t end, bool cutting, Regi
                                    ---------------**************+++++++++++------------
                                     CUT:                                                  
                                    ---------------**************-----------------------
-
-                       */
-
-                       if (!cutting) {
+                               */
+                               
+                               if (!cutting) {
+                                       
+                                       /* end +++++ */
+                                       
+                                       _session.region_name (new_name, current->name(), false);
+                                       region = RegionFactory::create (current, pos2 - pos1, pos4 - pos2, new_name, (layer_t) regions.size(),
+                                                                       Region::Flag(current->flags()|Region::Automatic|Region::LeftOfSplit));
+                                       add_region_internal (region, start);
+                                       new_regions.push_back (region);
+                               }
                                
-                               /* end +++++ */
+                               /* front ****** */
                                
-                               _session.region_name (new_name, current->name(), false);
-                               region = RegionFactory::create (current, pos2 - pos1, pos4 - pos2, new_name, (layer_t) regions.size(),
-                                                      Region::Flag(current->flags()|Region::Automatic|Region::LeftOfSplit));
-                               add_region_internal (region, start);
-                               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
-                       */
+                               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          
@@ -802,31 +817,31 @@ Playlist::partition_internal (nframes_t start, nframes_t end, bool cutting, Regi
                                    CUT:
                                    -------------------*********************------------
                                    
-                       */
+                               */
 
-                       if (!cutting) {
+                               if (!cutting) {
                                
-                               /* front **** */
-                                _session.region_name (new_name, current->name(), false);
-                                region = RegionFactory::create (current, 0, pos3 - pos1, new_name,
-                                                       regions.size(), Region::Flag(current->flags()|Region::Automatic|Region::RightOfSplit));
-                                add_region_internal (region, pos1);
-                                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.
-                       */
+                                       /* front **** */
+                                       _session.region_name (new_name, current->name(), false);
+                                       region = RegionFactory::create (current, 0, pos3 - pos1, new_name,
+                                                                       regions.size(), Region::Flag(current->flags()|Region::Automatic|Region::RightOfSplit));
+                                       add_region_internal (region, pos1);
+                                       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          
@@ -836,17 +851,18 @@ Playlist::partition_internal (nframes_t start, nframes_t end, bool cutting, Regi
                                    CUT:
                                    ----------------------------------------------------
                                    
-                       */
-
-                       if (cutting) {
-                               remove_region_internal (current);
+                               */
+                               
+                               if (cutting) {
+                                       remove_region_internal (current);
+                               }
+                               new_regions.push_back (current);
                        }
-                       new_regions.push_back (current);
                }
+               
+               in_partition = false;
        }
 
-       in_partition = false;
-
        for (RegionList::iterator i = new_regions.begin(); i != new_regions.end(); ++i) {
                check_dependents (*i, false);
        }
@@ -1007,11 +1023,68 @@ Playlist::duplicate (boost::shared_ptr<Region> region, nframes_t position, float
        }
 }
 
+void
+Playlist::shift (nframes64_t at, nframes64_t distance, bool move_intersected, bool ignore_music_glue)
+{
+       RegionLock rlock (this);
+       RegionList copy (regions);
+       RegionList fixup;
+
+       for (RegionList::iterator r = copy.begin(); r != copy.end(); ++r) {
+
+               if ((*r)->last_frame() < at) {
+                       /* too early */
+                       continue;
+               }
+               
+               if (at > (*r)->first_frame() && at < (*r)->last_frame()) {
+                       /* intersected region */
+                       if (!move_intersected) {
+                               continue;
+                       }
+               }
+               
+               /* do not move regions glued to music time - that
+                  has to be done separately.
+               */
+
+               if (!ignore_music_glue && (*r)->positional_lock_style() != Region::AudioTime) {
+                       fixup.push_back (*r);
+                       continue;
+               }
+
+               (*r)->set_position ((*r)->position() + distance, this);
+       }
+
+       for (RegionList::iterator r = fixup.begin(); r != fixup.end(); ++r) {
+               (*r)->recompute_position_from_lock_style ();
+       }
+}
+
+void
+Playlist::split (nframes64_t at)
+{
+       RegionLock rlock (this);
+       RegionList copy (regions);
+
+       /* use a copy since this operation can modify the region list
+        */
+
+       for (RegionList::iterator r = copy.begin(); r != copy.end(); ++r) {
+               _split_region (*r, at);
+       }
+}
+
 void
 Playlist::split_region (boost::shared_ptr<Region> region, nframes_t playlist_position)
 {
        RegionLock rl (this);
+       _split_region (region, playlist_position);
+}
 
+void
+Playlist::_split_region (boost::shared_ptr<Region> region, nframes_t playlist_position)
+{
        if (!region->covers (playlist_position)) {
                return;
        }
@@ -1428,6 +1501,65 @@ Playlist::regions_touched (nframes_t start, nframes_t end)
        return rlist;
 }
 
+nframes64_t
+Playlist::find_next_transient (nframes64_t from, int dir)
+{
+       RegionLock rlock (this);
+       AnalysisFeatureList points;
+       AnalysisFeatureList these_points;
+
+       for (RegionList::iterator i = regions.begin(); i != regions.end(); ++i) {
+               if (dir > 0) {
+                       if ((*i)->last_frame() < from) {
+                               continue;
+                       }
+               } else {
+                       if ((*i)->first_frame() > from) {
+                               continue;
+                       }
+               }
+
+               (*i)->get_transients (these_points);
+
+               /* add first frame, just, err, because */
+               
+               these_points.push_back ((*i)->first_frame());
+               
+               points.insert (points.end(), these_points.begin(), these_points.end());
+               these_points.clear ();
+       }
+       
+       if (points.empty()) {
+               return -1;
+       }
+
+       TransientDetector::cleanup_transients (points, _session.frame_rate(), 3.0);
+       bool reached = false;
+       
+       if (dir > 0) {
+               for (AnalysisFeatureList::iterator x = points.begin(); x != points.end(); ++x) {
+                       if ((*x) >= from) {
+                               reached = true;
+                       }
+                       
+                       if (reached && (*x) > from) {
+                               return *x;
+                       }
+               }
+       } else {
+               for (AnalysisFeatureList::reverse_iterator x = points.rbegin(); x != points.rend(); ++x) {
+                       if ((*x) <= from) {
+                               reached = true;
+                       }
+                       
+                       if (reached && (*x) < from) {
+                               return *x;
+                       }
+               }
+       }
+
+       return -1;
+}
 
 boost::shared_ptr<Region>
 Playlist::find_next_region (nframes_t frame, RegionPoint point, int dir)
@@ -1754,50 +1886,12 @@ Playlist::bump_name (string name, Session &session)
        string newname = name;
 
        do {
-               newname = Playlist::bump_name_once (newname);
+               newname = 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 {
-               int isnumber = 1;
-               const char *last_element = name.c_str() + period + 1;
-               for (size_t i = 0; i < strlen(last_element); i++) {
-                       if (!isdigit(last_element[i])) {
-                               isnumber = 0;
-                               break;
-                       }
-               }
-
-               errno = 0;
-               long int version = strtol (name.c_str()+period+1, (char **)NULL, 10);
-
-               if (isnumber == 0 || errno != 0) {
-                       // last_element is not a number, or is too large
-                       newname  = name;
-                       newname += ".1";
-               } else {
-                       char buf[32];
-
-                       snprintf (buf, sizeof(buf), "%ld", version+1);
-               
-                       newname  = name.substr (0, period+1);
-                       newname += buf;
-               }
-       }
-
-       return newname;
-}
 
 layer_t
 Playlist::top_layer() const
@@ -2259,3 +2353,18 @@ Playlist::region_is_shuffle_constrained (boost::shared_ptr<Region>)
 
        return false;
 }
+
+void
+Playlist::update_after_tempo_map_change ()
+{
+       RegionLock rlock (const_cast<Playlist*> (this));
+       RegionList copy (regions);
+
+       freeze ();
+       
+       for (RegionList::iterator i = copy.begin(); i != copy.end(); ++i) {     
+               (*i)->update_position_after_tempo_map_change ();
+       }
+
+       thaw ();
+}