2 Copyright (C) 2000-2002 Paul Davis
4 This program is free software; you can redistribute it and/or modify
5 it under the terms of the GNU General Public License as published by
6 the Free Software Foundation; either version 2 of the License, or
7 (at your option) any later version.
9 This program is distributed in the hope that it will be useful,
10 but WITHOUT ANY WARRANTY; without even the implied warranty of
11 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12 GNU General Public License for more details.
14 You should have received a copy of the GNU General Public License
15 along with this program; if not, write to the Free Software
16 Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
26 #include <glibmm/threads.h>
28 #include "pbd/enumwriter.h"
29 #include "pbd/xml++.h"
30 #include "evoral/Beats.hpp"
32 #include "ardour/debug.h"
33 #include "ardour/lmath.h"
34 #include "ardour/tempo.h"
40 using namespace ARDOUR;
43 using Timecode::BBT_Time;
45 /* _default tempo is 4/4 qtr=120 */
47 Meter TempoMap::_default_meter (4.0, 4.0);
48 Tempo TempoMap::_default_tempo (120.0, 4.0);
51 MetricSection::frame_at_minute (const double& time) const
53 return (framepos_t) floor ((time * 60.0 * _sample_rate) + 0.5);
57 MetricSection::minute_at_frame (const framepos_t& frame) const
59 return (frame / (double) _sample_rate) / 60.0;
62 /***********************************************************************/
65 Meter::frames_per_grid (const Tempo& tempo, framecnt_t sr) const
67 /* This is tempo- and meter-sensitive. The number it returns
68 is based on the interval between any two lines in the
69 grid that is constructed from tempo and meter sections.
71 The return value IS NOT interpretable in terms of "beats".
74 return (60.0 * sr) / (tempo.note_types_per_minute() * (_note_type/tempo.note_type()));
78 Meter::frames_per_bar (const Tempo& tempo, framecnt_t sr) const
80 return frames_per_grid (tempo, sr) * _divisions_per_bar;
83 /***********************************************************************/
85 const string TempoSection::xml_state_node_name = "Tempo";
87 TempoSection::TempoSection (const XMLNode& node, framecnt_t sample_rate)
88 : MetricSection (0.0, 0, MusicTime, true, sample_rate)
89 , Tempo (TempoMap::default_tempo())
92 , _locked_to_meter (false)
94 XMLProperty const * prop;
100 _legacy_bbt = BBT_Time (0, 0, 0);
102 if ((prop = node.property ("start")) != 0) {
103 if (sscanf (prop->value().c_str(), "%" PRIu32 "|%" PRIu32 "|%" PRIu32,
107 /* legacy session - start used to be in bbt*/
110 info << _("Legacy session detected. TempoSection XML node will be altered.") << endmsg;
114 if ((prop = node.property ("pulse")) != 0) {
115 if (sscanf (prop->value().c_str(), "%lf", &pulse) != 1) {
116 error << _("TempoSection XML node has an illegal \"pulse\" value") << endmsg;
122 if ((prop = node.property ("frame")) != 0) {
123 if (sscanf (prop->value().c_str(), "%" PRIu32, &frame) != 1) {
124 error << _("TempoSection XML node has an illegal \"frame\" value") << endmsg;
125 throw failed_constructor();
127 set_minute (minute_at_frame (frame));
131 /* XX replace old beats-per-minute name with note-types-per-minute */
132 if ((prop = node.property ("beats-per-minute")) != 0) {
133 if (sscanf (prop->value().c_str(), "%lf", &_note_types_per_minute) != 1 || _note_types_per_minute < 0.0) {
134 error << _("TempoSection XML node has an illegal \"beats-per-minute\" value") << endmsg;
135 throw failed_constructor();
139 if ((prop = node.property ("note-type")) == 0) {
140 /* older session, make note type be quarter by default */
143 if (sscanf (prop->value().c_str(), "%lf", &_note_type) != 1 || _note_type < 1.0) {
144 error << _("TempoSection XML node has an illegal \"note-type\" value") << endmsg;
145 throw failed_constructor();
149 if ((prop = node.property ("movable")) == 0) {
150 error << _("TempoSection XML node has no \"movable\" property") << endmsg;
151 throw failed_constructor();
154 set_initial (!string_is_affirmative (prop->value()));
156 if ((prop = node.property ("active")) == 0) {
157 warning << _("TempoSection XML node has no \"active\" property") << endmsg;
160 set_active (string_is_affirmative (prop->value()));
163 if ((prop = node.property ("tempo-type")) == 0) {
166 _type = Type (string_2_enum (prop->value(), _type));
169 if ((prop = node.property ("lock-style")) == 0) {
171 set_position_lock_style (MusicTime);
173 set_position_lock_style (AudioTime);
176 set_position_lock_style (PositionLockStyle (string_2_enum (prop->value(), position_lock_style())));
179 if ((prop = node.property ("locked-to-meter")) == 0) {
180 set_locked_to_meter (false);
182 set_locked_to_meter (string_is_affirmative (prop->value()));
187 TempoSection::get_state() const
189 XMLNode *root = new XMLNode (xml_state_node_name);
193 snprintf (buf, sizeof (buf), "%lf", pulse());
194 root->add_property ("pulse", buf);
195 snprintf (buf, sizeof (buf), "%li", frame());
196 root->add_property ("frame", buf);
197 snprintf (buf, sizeof (buf), "%lf", _note_types_per_minute);
198 root->add_property ("beats-per-minute", buf);
199 snprintf (buf, sizeof (buf), "%lf", _note_type);
200 root->add_property ("note-type", buf);
201 snprintf (buf, sizeof (buf), "%s", !initial()?"yes":"no");
202 root->add_property ("movable", buf);
203 snprintf (buf, sizeof (buf), "%s", active()?"yes":"no");
204 root->add_property ("active", buf);
205 root->add_property ("tempo-type", enum_2_string (_type));
206 root->add_property ("lock-style", enum_2_string (position_lock_style()));
207 root->add_property ("locked-to-meter", locked_to_meter()?"yes":"no");
213 TempoSection::set_type (Type type)
218 /** returns the Tempo at the session-relative minute.
221 TempoSection::tempo_at_minute (const double& m) const
224 if (_type == Constant || _c_func == 0.0) {
225 return Tempo (note_types_per_minute(), note_type());
228 return Tempo (_tempo_at_time (m - minute()), _note_type);
231 /** returns the session relative minute where the supplied tempo in note types per minute occurs.
232 * @param ntpm the tempo in mote types per minute used to calculate the returned minute
233 * @param p the pulse used to calculate the returned minute for constant tempi
234 * @return the minute at the supplied tempo
236 * note that the note_type is currently ignored in this function. see below.
240 /** if tempoA (120, 4.0) precedes tempoB (120, 8.0),
241 * there should be no ramp between the two even if we are ramped.
242 * in other words a ramp should only place a curve on note_types_per_minute.
243 * we should be able to use Tempo note type here, but the above
244 * complicates things a bit.
247 TempoSection::minute_at_ntpm (const double& ntpm, const double& p) const
249 if (_type == Constant || _c_func == 0.0) {
250 return ((p - pulse()) / pulses_per_minute()) + minute();
253 return _time_at_tempo (ntpm) + minute();
256 /** returns the Tempo at the supplied whole-note pulse.
259 TempoSection::tempo_at_pulse (const double& p) const
262 if (_type == Constant || _c_func == 0.0) {
263 return Tempo (note_types_per_minute(), note_type());
266 return Tempo (_tempo_at_pulse (p - pulse()), _note_type);
269 /** returns the whole-note pulse where a tempo in note types per minute occurs.
270 * constant tempi require minute m.
271 * @param ntpm the note types per minute value used to calculate the returned pulse
272 * @param m the minute used to calculate the returned pulse if the tempo is constant
273 * @return the whole-note pulse at the supplied tempo
275 * note that note_type is currently ignored in this function. see minute_at_tempo().
277 * for constant tempi, this is anaologous to pulse_at_minute().
280 TempoSection::pulse_at_ntpm (const double& ntpm, const double& m) const
282 if (_type == Constant || _c_func == 0.0) {
283 return ((m - minute()) * pulses_per_minute()) + pulse();
286 return _pulse_at_tempo (ntpm) + pulse();
289 /** returns the whole-note pulse at the supplied session-relative minute.
292 TempoSection::pulse_at_minute (const double& m) const
294 if (_type == Constant || _c_func == 0.0) {
295 return ((m - minute()) * pulses_per_minute()) + pulse();
298 return _pulse_at_time (m - minute()) + pulse();
301 /** returns the session-relative minute at the supplied whole-note pulse.
304 TempoSection::minute_at_pulse (const double& p) const
306 if (_type == Constant || _c_func == 0.0) {
307 return ((p - pulse()) / pulses_per_minute()) + minute();
310 return _time_at_pulse (p - pulse()) + minute();
313 /** returns thw whole-note pulse at session frame position f.
314 * @param f the frame position.
315 * @return the position in whole-note pulses corresponding to f
317 * for use with musical units whose granularity is coarser than frames (e.g. ticks)
320 TempoSection::pulse_at_frame (const framepos_t& f) const
322 if (_type == Constant || _c_func == 0.0) {
323 return (minute_at_frame (f - frame()) * pulses_per_minute()) + pulse();
326 return _pulse_at_time (minute_at_frame (f - frame())) + pulse();
330 TempoSection::frame_at_pulse (const double& p) const
332 if (_type == Constant || _c_func == 0.0) {
333 return frame_at_minute (((p - pulse()) / pulses_per_minute()) + minute());
336 return frame_at_minute (_time_at_pulse (p - pulse()) + minute());
344 Tt----|-----------------*|
345 Ta----|--------------|* |
351 _______________|___|____
352 time a t (next tempo)
355 Duration in beats at time a is the integral of some Tempo function.
356 In our case, the Tempo function (Tempo at time t) is
359 with function constant
364 The integral over t of our Tempo function (the beat function, which is the duration in beats at some time t) is:
365 b(t) = T0(e^(ct) - 1) / c
367 To find the time t at beat duration b, we use the inverse function of the beat function (the time function) which can be shown to be:
368 t(b) = log((c.b / T0) + 1) / c
370 The time t at which Tempo T occurs is a as above:
371 t(T) = log(T / T0) / c
373 The beat at which a Tempo T occurs is:
376 The Tempo at which beat b occurs is:
379 We define c for this tempo ramp by placing a new tempo section at some time t after this one.
380 Our problem is that we usually don't know t.
381 We almost always know the duration in beats between this and the new section, so we need to find c in terms of the beat function.
382 Where a = t (i.e. when a is equal to the time of the next tempo section), the beat function reveals:
383 t = b log (Ta / T0) / (T0 (e^(log (Ta / T0)) - 1))
385 By substituting our expanded t as a in the c function above, our problem is reduced to:
386 c = T0 (e^(log (Ta / T0)) - 1) / b
388 Of course the word 'beat' has been left loosely defined above.
389 In music, a beat is defined by the musical pulse (which comes from the tempo)
390 and the meter in use at a particular time (how many pulse divisions there are in one bar).
391 It would be more accurate to substitute the work 'pulse' for 'beat' above.
395 We can now store c for future time calculations.
396 If the following tempo section (the one that defines c in conjunction with this one)
397 is changed or moved, c is no longer valid.
399 The public methods are session-relative.
401 Most of this stuff is taken from this paper:
404 TOOLS FOR DYNAMIC TEMPO CALCULATIONS
407 Zurich University of Arts
408 Institute for Computer Music and Sound Technology
410 https://www.zhdk.ch/fileadmin/data_subsites/data_icst/Downloads/Timegrid/ICST_Tempopolyphony_ICMC07.pdf
414 /** compute this ramp's function constant from some tempo-pulse point
415 * @param end_npm end tempo (in note types per minute)
416 * @param end_pulse duration (pulses into global start) of some other position.
417 * @return the calculated function constant
420 TempoSection::compute_c_func_pulse (const double& end_npm, const double& end_pulse) const
422 double const log_tempo_ratio = log (end_npm / note_types_per_minute());
423 return (note_types_per_minute() * expm1 (log_tempo_ratio)) / ((end_pulse - pulse()) * _note_type);
426 /** compute the function constant from some tempo-time point.
427 * @param end_npm tempo (note types/min.)
428 * @param end_minute distance (in minutes) from session origin
429 * @return the calculated function constant
432 TempoSection::compute_c_func_minute (const double& end_npm, const double& end_minute) const
434 return c_func (end_npm, end_minute - minute());
437 /* position function */
439 TempoSection::a_func (double end_npm, double c_func) const
441 return log (end_npm / note_types_per_minute()) / c_func;
444 /*function constant*/
446 TempoSection::c_func (double end_npm, double end_time) const
448 return log (end_npm / note_types_per_minute()) / end_time;
451 /* tempo in note types per minute at time in minutes */
453 TempoSection::_tempo_at_time (const double& time) const
455 return exp (_c_func * time) * note_types_per_minute();
458 /* time in minutes at tempo in note types per minute */
460 TempoSection::_time_at_tempo (const double& npm) const
462 return log (npm / note_types_per_minute()) / _c_func;
465 /* pulse at tempo in note types per minute */
467 TempoSection::_pulse_at_tempo (const double& npm) const
469 return ((npm - note_types_per_minute()) / _c_func) / _note_type;
472 /* tempo in note types per minute at pulse */
474 TempoSection::_tempo_at_pulse (const double& pulse) const
476 return (pulse * _note_type * _c_func) + note_types_per_minute();
479 /* pulse at time in minutes */
481 TempoSection::_pulse_at_time (const double& time) const
483 return (expm1 (_c_func * time) * (note_types_per_minute() / _c_func)) / _note_type;
486 /* time in minutes at pulse */
488 TempoSection::_time_at_pulse (const double& pulse) const
490 return log1p ((_c_func * pulse * _note_type) / note_types_per_minute()) / _c_func;
493 /***********************************************************************/
495 const string MeterSection::xml_state_node_name = "Meter";
497 MeterSection::MeterSection (const XMLNode& node, const framecnt_t sample_rate)
498 : MetricSection (0.0, 0, MusicTime, false, sample_rate), Meter (TempoMap::default_meter())
500 XMLProperty const * prop;
505 framepos_t frame = 0;
506 pair<double, BBT_Time> start;
508 if ((prop = node.property ("start")) != 0) {
509 if (sscanf (prop->value().c_str(), "%" PRIu32 "|%" PRIu32 "|%" PRIu32,
513 error << _("MeterSection XML node has an illegal \"start\" value") << endmsg;
515 /* legacy session - start used to be in bbt*/
516 info << _("Legacy session detected - MeterSection XML node will be altered.") << endmsg;
521 if ((prop = node.property ("pulse")) != 0) {
522 if (sscanf (prop->value().c_str(), "%lf", &pulse) != 1) {
523 error << _("MeterSection XML node has an illegal \"pulse\" value") << endmsg;
528 if ((prop = node.property ("beat")) != 0) {
529 if (sscanf (prop->value().c_str(), "%lf", &beat) != 1) {
530 error << _("MeterSection XML node has an illegal \"beat\" value") << endmsg;
536 if ((prop = node.property ("bbt")) == 0) {
537 warning << _("MeterSection XML node has no \"bbt\" property") << endmsg;
538 } else if (sscanf (prop->value().c_str(), "%" PRIu32 "|%" PRIu32 "|%" PRIu32,
542 error << _("MeterSection XML node has an illegal \"bbt\" value") << endmsg;
543 throw failed_constructor();
549 if ((prop = node.property ("frame")) != 0) {
550 if (sscanf (prop->value().c_str(), "%li", &frame) != 1) {
551 error << _("MeterSection XML node has an illegal \"frame\" value") << endmsg;
552 throw failed_constructor();
554 set_minute (minute_at_frame (frame));
558 /* beats-per-bar is old; divisions-per-bar is new */
560 if ((prop = node.property ("divisions-per-bar")) == 0) {
561 if ((prop = node.property ("beats-per-bar")) == 0) {
562 error << _("MeterSection XML node has no \"beats-per-bar\" or \"divisions-per-bar\" property") << endmsg;
563 throw failed_constructor();
566 if (sscanf (prop->value().c_str(), "%lf", &_divisions_per_bar) != 1 || _divisions_per_bar < 0.0) {
567 error << _("MeterSection XML node has an illegal \"divisions-per-bar\" value") << endmsg;
568 throw failed_constructor();
571 if ((prop = node.property ("note-type")) == 0) {
572 error << _("MeterSection XML node has no \"note-type\" property") << endmsg;
573 throw failed_constructor();
575 if (sscanf (prop->value().c_str(), "%lf", &_note_type) != 1 || _note_type < 0.0) {
576 error << _("MeterSection XML node has an illegal \"note-type\" value") << endmsg;
577 throw failed_constructor();
580 if ((prop = node.property ("movable")) == 0) {
581 error << _("MeterSection XML node has no \"movable\" property") << endmsg;
582 throw failed_constructor();
585 set_initial (!string_is_affirmative (prop->value()));
587 if ((prop = node.property ("lock-style")) == 0) {
588 warning << _("MeterSection XML node has no \"lock-style\" property") << endmsg;
590 set_position_lock_style (MusicTime);
592 set_position_lock_style (AudioTime);
595 set_position_lock_style (PositionLockStyle (string_2_enum (prop->value(), position_lock_style())));
600 MeterSection::get_state() const
602 XMLNode *root = new XMLNode (xml_state_node_name);
606 snprintf (buf, sizeof (buf), "%lf", pulse());
607 root->add_property ("pulse", buf);
608 snprintf (buf, sizeof (buf), "%" PRIu32 "|%" PRIu32 "|%" PRIu32,
612 root->add_property ("bbt", buf);
613 snprintf (buf, sizeof (buf), "%lf", beat());
614 root->add_property ("beat", buf);
615 snprintf (buf, sizeof (buf), "%lf", _note_type);
616 root->add_property ("note-type", buf);
617 snprintf (buf, sizeof (buf), "%li", frame());
618 root->add_property ("frame", buf);
619 root->add_property ("lock-style", enum_2_string (position_lock_style()));
620 snprintf (buf, sizeof (buf), "%lf", _divisions_per_bar);
621 root->add_property ("divisions-per-bar", buf);
622 snprintf (buf, sizeof (buf), "%s", !initial()?"yes":"no");
623 root->add_property ("movable", buf);
628 /***********************************************************************/
632 Tempo determines the rate of musical pulse determined by its components
633 note types per minute - the rate per minute of the whole note divisor _note_type
634 note type - the division of whole notes (pulses) which occur at the rate of note types per minute.
635 Meter divides the musical pulse into measures and beats according to its components
639 TempoSection - translates between time, musical pulse and tempo.
640 has a musical location in whole notes (pulses).
641 has a time location in minutes.
642 Note that 'beats' in Tempo::note_types_per_minute() are in fact note types per minute.
643 (In the rest of tempo map,'beat' usually refers to accumulated BBT beats (pulse and meter based).
645 MeterSection - translates between BBT, meter-based beat and musical pulse.
646 has a musical location in whole notes (pulses)
647 has a musical location in meter-based beats
648 has a musical location in BBT time
649 has a time location expressed in minutes.
651 TempoSection and MeterSection may be locked to either audio or music (position lock style).
652 The lock style determines the location type to be kept as a reference when location is recalculated.
654 The first tempo and meter are special. they must move together, and are locked to audio.
655 Audio locked tempi which lie before the first meter are made inactive.
657 Recomputing the map is the process where the 'missing' location types are calculated.
658 We construct the tempo map by first using the locked location type of each section
659 to determine non-locked location types (pulse or minute position).
660 We then use this map to find the pulse or minute position of each meter (again depending on lock style).
662 Having done this, we can now traverse the Metrics list by pulse or minute
663 to query its relevant meter/tempo.
665 It is important to keep the _metrics in an order that makes sense.
666 Because ramped MusicTime and AudioTime tempos can interact with each other,
667 reordering is frequent. Care must be taken to keep _metrics in a solved state.
668 Solved means ordered by frame or pulse with frame-accurate precision (see check_solved()).
672 Music and audio-locked objects may seem interchangeable on the surface, but when translating
673 between audio samples and beat, remember that a sample is only a quantised approximation
674 of the actual time (in minutes) of a beat.
675 Thus if a gui user points to the frame occupying the start of a music-locked object on 1|3|0, it does not
676 mean that this frame is the actual location in time of 1|3|0.
678 You cannot use a frame measurement to determine beat distance except under special circumstances
679 (e.g. where the user has requested that a beat lie on a SMPTE frame or if the tempo is known to be constant over the duration).
681 This means is that a user operating on a musical grid must supply the desired beat position and/or current beat quantization in order for the
682 sample space the user is operating at to be translated correctly to the object.
684 The current approach is to interpret the supplied frame using the grid division the user has currently selected.
685 If the user has no musical grid set, they are actually operating in sample space (even SMPTE frames are rounded to audio frame), so
686 the supplied audio frame is interpreted as the desired musical location (beat_at_frame()).
688 tldr: Beat, being a function of time, has nothing to do with sample rate, but time quantization can get in the way of precision.
690 When frame_at_beat() is called, the position calculation is performed in pulses and minutes.
691 The result is rounded to audio frames.
692 When beat_at_frame() is called, the frame is converted to minutes, with no rounding performed on the result.
695 frame_at_beat (beat_at_frame (frame)) == frame
697 beat_at_frame (frame_at_beat (beat)) != beat due to the time quantization of frame_at_beat().
699 Doing the second one will result in a beat distance error of up to 0.5 audio samples.
700 frames_between_quarter_notes () eliminats this effect when determining time duration
701 from Beats distance, or instead work in quarter-notes and/or beats and convert to frames last.
703 The above pointless example could instead do:
704 beat_at_quarter_note (quarter_note_at_beat (beat)) to avoid rounding.
706 The Shaggs - Things I Wonder
707 https://www.youtube.com/watch?v=9wQK6zMJOoQ
710 struct MetricSectionSorter {
711 bool operator() (const MetricSection* a, const MetricSection* b) {
712 return a->pulse() < b->pulse();
716 struct MetricSectionFrameSorter {
717 bool operator() (const MetricSection* a, const MetricSection* b) {
718 return a->frame() < b->frame();
722 TempoMap::TempoMap (framecnt_t fr)
725 BBT_Time start (1, 1, 0);
727 TempoSection *t = new TempoSection (0.0, 0.0, _default_tempo.note_types_per_minute(), _default_tempo.note_type(), TempoSection::Ramp, AudioTime, fr);
728 MeterSection *m = new MeterSection (0.0, 0.0, 0.0, start, _default_meter.divisions_per_bar(), _default_meter.note_divisor(), AudioTime, fr);
730 t->set_initial (true);
731 m->set_initial (true);
733 /* note: frame time is correct (zero) for both of these */
735 _metrics.push_back (t);
736 _metrics.push_back (m);
740 TempoMap::~TempoMap ()
742 Metrics::const_iterator d = _metrics.begin();
743 while (d != _metrics.end()) {
751 TempoMap::frame_at_minute (const double time) const
753 return (framepos_t) floor ((time * 60.0 * _frame_rate) + 0.5);
757 TempoMap::minute_at_frame (const framepos_t frame) const
759 return (frame / (double) _frame_rate) / 60.0;
763 TempoMap::remove_tempo (const TempoSection& tempo, bool complete_operation)
765 bool removed = false;
768 Glib::Threads::RWLock::WriterLock lm (lock);
769 if ((removed = remove_tempo_locked (tempo))) {
770 if (complete_operation) {
771 recompute_map (_metrics);
776 if (removed && complete_operation) {
777 PropertyChanged (PropertyChange ());
782 TempoMap::remove_tempo_locked (const TempoSection& tempo)
786 for (i = _metrics.begin(); i != _metrics.end(); ++i) {
787 if (dynamic_cast<TempoSection*> (*i) != 0) {
788 if (tempo.frame() == (*i)->frame()) {
789 if (!(*i)->initial()) {
802 TempoMap::remove_meter (const MeterSection& tempo, bool complete_operation)
804 bool removed = false;
807 Glib::Threads::RWLock::WriterLock lm (lock);
808 if ((removed = remove_meter_locked (tempo))) {
809 if (complete_operation) {
810 recompute_map (_metrics);
815 if (removed && complete_operation) {
816 PropertyChanged (PropertyChange ());
821 TempoMap::remove_meter_locked (const MeterSection& meter)
824 if (meter.position_lock_style() == AudioTime) {
825 /* remove meter-locked tempo */
826 for (Metrics::iterator i = _metrics.begin(); i != _metrics.end(); ++i) {
828 if ((t = dynamic_cast<TempoSection*> (*i)) != 0) {
829 if (t->locked_to_meter() && meter.frame() == (*i)->frame()) {
838 for (Metrics::iterator i = _metrics.begin(); i != _metrics.end(); ++i) {
839 if (dynamic_cast<MeterSection*> (*i) != 0) {
840 if (meter.frame() == (*i)->frame()) {
841 if (!(*i)->initial()) {
854 TempoMap::do_insert (MetricSection* section)
856 bool need_add = true;
857 /* we only allow new meters to be inserted on beat 1 of an existing
861 if ((m = dynamic_cast<MeterSection*>(section)) != 0) {
863 if ((m->bbt().beats != 1) || (m->bbt().ticks != 0)) {
865 pair<double, BBT_Time> corrected = make_pair (m->beat(), m->bbt());
866 corrected.second.beats = 1;
867 corrected.second.ticks = 0;
868 corrected.first = beat_at_bbt_locked (_metrics, corrected.second);
869 warning << string_compose (_("Meter changes can only be positioned on the first beat of a bar. Moving from %1 to %2"),
870 m->bbt(), corrected.second) << endmsg;
871 //m->set_pulse (corrected);
875 /* Look for any existing MetricSection that is of the same type and
876 in the same bar as the new one, and remove it before adding
877 the new one. Note that this means that if we find a matching,
878 existing section, we can break out of the loop since we're
879 guaranteed that there is only one such match.
882 for (Metrics::iterator i = _metrics.begin(); i != _metrics.end(); ++i) {
884 TempoSection* const tempo = dynamic_cast<TempoSection*> (*i);
885 TempoSection* const insert_tempo = dynamic_cast<TempoSection*> (section);
886 MeterSection* const meter = dynamic_cast<MeterSection*> (*i);
887 MeterSection* const insert_meter = dynamic_cast<MeterSection*> (section);
889 if (tempo && insert_tempo) {
892 bool const ipm = insert_tempo->position_lock_style() == MusicTime;
893 if ((ipm && tempo->pulse() == insert_tempo->pulse()) || (!ipm && tempo->frame() == insert_tempo->frame())) {
895 if (tempo->initial()) {
897 /* can't (re)move this section, so overwrite
898 * its data content (but not its properties as
902 *(dynamic_cast<Tempo*>(*i)) = *(dynamic_cast<Tempo*>(insert_tempo));
903 (*i)->set_position_lock_style (AudioTime);
905 if ((t = dynamic_cast<TempoSection*>(*i)) != 0) {
906 t->set_type (insert_tempo->type());
916 } else if (meter && insert_meter) {
920 bool const ipm = insert_meter->position_lock_style() == MusicTime;
922 if ((ipm && meter->beat() == insert_meter->beat()) || (!ipm && meter->frame() == insert_meter->frame())) {
924 if (meter->initial()) {
926 /* can't (re)move this section, so overwrite
927 * its data content (but not its properties as
931 *(dynamic_cast<Meter*>(*i)) = *(dynamic_cast<Meter*>(insert_meter));
932 (*i)->set_position_lock_style (AudioTime);
942 /* non-matching types, so we don't care */
946 /* Add the given MetricSection, if we didn't just reset an existing
951 MeterSection* const insert_meter = dynamic_cast<MeterSection*> (section);
952 TempoSection* const insert_tempo = dynamic_cast<TempoSection*> (section);
955 for (i = _metrics.begin(); i != _metrics.end(); ++i) {
956 MeterSection* const meter = dynamic_cast<MeterSection*> (*i);
959 bool const ipm = insert_meter->position_lock_style() == MusicTime;
960 if ((ipm && meter->beat() > insert_meter->beat()) || (!ipm && meter->frame() > insert_meter->frame())) {
965 } else if (insert_tempo) {
966 for (i = _metrics.begin(); i != _metrics.end(); ++i) {
967 TempoSection* const tempo = dynamic_cast<TempoSection*> (*i);
970 bool const ipm = insert_tempo->position_lock_style() == MusicTime;
971 if ((ipm && tempo->pulse() > insert_tempo->pulse()) || (!ipm && tempo->frame() > insert_tempo->frame())) {
978 _metrics.insert (i, section);
979 //dump (_metrics, std::cout);
982 /* user supplies the exact pulse if pls == MusicTime */
984 TempoMap::add_tempo (const Tempo& tempo, const double& pulse, const framepos_t& frame, ARDOUR::TempoSection::Type type, PositionLockStyle pls)
986 TempoSection* ts = 0;
988 Glib::Threads::RWLock::WriterLock lm (lock);
989 ts = add_tempo_locked (tempo, pulse, minute_at_frame (frame), type, pls, true);
993 PropertyChanged (PropertyChange ());
999 TempoMap::replace_tempo (const TempoSection& ts, const Tempo& tempo, const double& pulse, const framepos_t& frame, TempoSection::Type type, PositionLockStyle pls)
1001 const bool locked_to_meter = ts.locked_to_meter();
1004 Glib::Threads::RWLock::WriterLock lm (lock);
1005 TempoSection& first (first_tempo());
1006 if (ts.frame() != first.frame()) {
1007 remove_tempo_locked (ts);
1008 add_tempo_locked (tempo, pulse, minute_at_frame (frame), type, pls, true, locked_to_meter);
1010 first.set_type (type);
1011 first.set_pulse (0.0);
1012 first.set_minute (minute_at_frame (frame));
1013 first.set_position_lock_style (AudioTime);
1015 /* cannot move the first tempo section */
1016 *static_cast<Tempo*>(&first) = tempo;
1017 recompute_map (_metrics);
1022 PropertyChanged (PropertyChange ());
1026 TempoMap::add_tempo_locked (const Tempo& tempo, double pulse, double minute
1027 , TempoSection::Type type, PositionLockStyle pls, bool recompute, bool locked_to_meter)
1029 TempoSection* t = new TempoSection (pulse, minute, tempo.note_types_per_minute(), tempo.note_type(), type, pls, _frame_rate);
1030 t->set_locked_to_meter (locked_to_meter);
1031 bool solved = false;
1036 if (pls == AudioTime) {
1037 solved = solve_map_minute (_metrics, t, t->minute());
1039 solved = solve_map_pulse (_metrics, t, t->pulse());
1041 recompute_meters (_metrics);
1044 if (!solved && recompute) {
1045 recompute_map (_metrics);
1052 TempoMap::add_meter (const Meter& meter, const double& beat, const Timecode::BBT_Time& where, PositionLockStyle pls)
1054 MeterSection* m = 0;
1056 Glib::Threads::RWLock::WriterLock lm (lock);
1057 m = add_meter_locked (meter, beat, where, pls, true);
1062 if (DEBUG_ENABLED(DEBUG::TempoMap)) {
1063 dump (_metrics, std::cerr);
1067 PropertyChanged (PropertyChange ());
1072 TempoMap::replace_meter (const MeterSection& ms, const Meter& meter, const BBT_Time& where, PositionLockStyle pls)
1075 Glib::Threads::RWLock::WriterLock lm (lock);
1076 const double beat = beat_at_bbt_locked (_metrics, where);
1078 if (!ms.initial()) {
1079 remove_meter_locked (ms);
1080 add_meter_locked (meter, beat, where, pls, true);
1082 MeterSection& first (first_meter());
1083 TempoSection& first_t (first_tempo());
1084 /* cannot move the first meter section */
1085 *static_cast<Meter*>(&first) = meter;
1086 first.set_position_lock_style (AudioTime);
1087 first.set_pulse (0.0);
1088 //first.set_minute (minute_at_frame (frame));
1089 pair<double, BBT_Time> beat = make_pair (0.0, BBT_Time (1, 1, 0));
1090 first.set_beat (beat);
1091 first_t.set_minute (first.minute());
1092 first_t.set_pulse (0.0);
1093 first_t.set_position_lock_style (AudioTime);
1094 recompute_map (_metrics);
1098 PropertyChanged (PropertyChange ());
1102 TempoMap::add_meter_locked (const Meter& meter, double beat, const BBT_Time& where, PositionLockStyle pls, bool recompute)
1104 const MeterSection& prev_m = meter_section_at_minute_locked (_metrics, minute_at_beat_locked (_metrics, beat) - minute_at_frame (1));
1105 const double pulse = ((where.bars - prev_m.bbt().bars) * (prev_m.divisions_per_bar() / prev_m.note_divisor())) + prev_m.pulse();
1106 const double time_minutes = minute_at_pulse_locked (_metrics, pulse);
1107 TempoSection* mlt = 0;
1109 if (pls == AudioTime) {
1110 /* add meter-locked tempo */
1111 mlt = add_tempo_locked (tempo_at_minute_locked (_metrics, time_minutes), pulse, time_minutes, TempoSection::Ramp, AudioTime, true, true);
1119 MeterSection* new_meter = new MeterSection (pulse, time_minutes, beat, where, meter.divisions_per_bar(), meter.note_divisor(), pls, _frame_rate);
1120 bool solved = false;
1122 do_insert (new_meter);
1126 if (pls == AudioTime) {
1127 solved = solve_map_minute (_metrics, new_meter, time_minutes);
1129 solved = solve_map_bbt (_metrics, new_meter, where);
1130 /* required due to resetting the pulse of meter-locked tempi above.
1131 Arguably solve_map_bbt() should use solve_map_pulse (_metrics, TempoSection) instead,
1132 but afaict this cannot cause the map to be left unsolved (these tempi are all audio locked).
1134 recompute_map (_metrics);
1138 if (!solved && recompute) {
1139 /* if this has failed to solve, there is little we can do other than to ensure that
1140 the new map is recalculated.
1142 warning << "Adding meter may have left the tempo map unsolved." << endmsg;
1143 recompute_map (_metrics);
1150 TempoMap::change_initial_tempo (double note_types_per_minute, double note_type)
1152 Tempo newtempo (note_types_per_minute, note_type);
1155 for (Metrics::iterator i = _metrics.begin(); i != _metrics.end(); ++i) {
1156 if ((t = dynamic_cast<TempoSection*> (*i)) != 0) {
1161 Glib::Threads::RWLock::WriterLock lm (lock);
1162 *((Tempo*) t) = newtempo;
1163 recompute_map (_metrics);
1165 PropertyChanged (PropertyChange ());
1172 TempoMap::change_existing_tempo_at (framepos_t where, double note_types_per_minute, double note_type)
1174 Tempo newtempo (note_types_per_minute, note_type);
1177 TempoSection* first;
1178 Metrics::iterator i;
1180 /* find the TempoSection immediately preceding "where"
1183 for (first = 0, i = _metrics.begin(), prev = 0; i != _metrics.end(); ++i) {
1185 if ((*i)->frame() > where) {
1191 if ((t = dynamic_cast<TempoSection*>(*i)) != 0) {
1204 error << string_compose (_("no tempo sections defined in tempo map - cannot change tempo @ %1"), where) << endmsg;
1214 Glib::Threads::RWLock::WriterLock lm (lock);
1215 /* cannot move the first tempo section */
1216 *((Tempo*)prev) = newtempo;
1217 recompute_map (_metrics);
1220 PropertyChanged (PropertyChange ());
1224 TempoMap::first_meter () const
1226 const MeterSection *m = 0;
1228 for (Metrics::const_iterator i = _metrics.begin(); i != _metrics.end(); ++i) {
1229 if ((m = dynamic_cast<const MeterSection *> (*i)) != 0) {
1234 fatal << _("programming error: no meter section in tempo map!") << endmsg;
1235 abort(); /*NOTREACHED*/
1240 TempoMap::first_meter ()
1242 MeterSection *m = 0;
1244 /* CALLER MUST HOLD LOCK */
1246 for (Metrics::iterator i = _metrics.begin(); i != _metrics.end(); ++i) {
1247 if ((m = dynamic_cast<MeterSection *> (*i)) != 0) {
1252 fatal << _("programming error: no tempo section in tempo map!") << endmsg;
1253 abort(); /*NOTREACHED*/
1258 TempoMap::first_tempo () const
1260 const TempoSection *t = 0;
1262 /* CALLER MUST HOLD LOCK */
1264 for (Metrics::const_iterator i = _metrics.begin(); i != _metrics.end(); ++i) {
1265 if ((t = dynamic_cast<const TempoSection *> (*i)) != 0) {
1275 fatal << _("programming error: no tempo section in tempo map!") << endmsg;
1276 abort(); /*NOTREACHED*/
1281 TempoMap::first_tempo ()
1283 TempoSection *t = 0;
1285 for (Metrics::const_iterator i = _metrics.begin(); i != _metrics.end(); ++i) {
1286 if ((t = dynamic_cast<TempoSection *> (*i)) != 0) {
1296 fatal << _("programming error: no tempo section in tempo map!") << endmsg;
1297 abort(); /*NOTREACHED*/
1301 TempoMap::recompute_tempi (Metrics& metrics)
1303 TempoSection* prev_t = 0;
1305 for (Metrics::const_iterator i = metrics.begin(); i != metrics.end(); ++i) {
1308 if ((*i)->is_tempo()) {
1309 t = static_cast<TempoSection*> (*i);
1321 if (t->position_lock_style() == AudioTime) {
1322 prev_t->set_c_func (prev_t->compute_c_func_minute (t->note_types_per_minute(), t->minute()));
1323 if (!t->locked_to_meter()) {
1324 t->set_pulse (prev_t->pulse_at_ntpm (t->note_types_per_minute(), t->minute()));
1328 prev_t->set_c_func (prev_t->compute_c_func_pulse (t->note_types_per_minute(), t->pulse()));
1329 t->set_minute (prev_t->minute_at_ntpm (t->note_types_per_minute(), t->pulse()));
1337 prev_t->set_c_func (0.0);
1340 /* tempos must be positioned correctly.
1341 the current approach is to use a meter's bbt time as its base position unit.
1342 an audio-locked meter requires a recomputation of pulse and beat (but not bbt),
1343 while a music-locked meter requires recomputations of frame pulse and beat (but not bbt)
1346 TempoMap::recompute_meters (Metrics& metrics)
1348 MeterSection* meter = 0;
1349 MeterSection* prev_m = 0;
1351 for (Metrics::const_iterator mi = metrics.begin(); mi != metrics.end(); ++mi) {
1352 if (!(*mi)->is_tempo()) {
1353 meter = static_cast<MeterSection*> (*mi);
1354 if (meter->position_lock_style() == AudioTime) {
1356 pair<double, BBT_Time> b_bbt;
1357 TempoSection* meter_locked_tempo = 0;
1358 for (Metrics::const_iterator ii = metrics.begin(); ii != metrics.end(); ++ii) {
1360 if ((*ii)->is_tempo()) {
1361 t = static_cast<TempoSection*> (*ii);
1362 if ((t->locked_to_meter() || t->initial()) && t->frame() == meter->frame()) {
1363 meter_locked_tempo = t;
1370 double beats = (meter->bbt().bars - prev_m->bbt().bars) * prev_m->divisions_per_bar();
1371 if (beats + prev_m->beat() != meter->beat()) {
1372 /* reordering caused a bbt change */
1374 beats = meter->beat() - prev_m->beat();
1375 b_bbt = make_pair (beats + prev_m->beat()
1376 , BBT_Time ((beats / prev_m->divisions_per_bar()) + prev_m->bbt().bars, 1, 0));
1377 pulse = prev_m->pulse() + (beats / prev_m->note_divisor());
1379 } else if (!meter->initial()) {
1380 b_bbt = make_pair (meter->beat(), meter->bbt());
1381 pulse = prev_m->pulse() + (beats / prev_m->note_divisor());
1384 b_bbt = make_pair (0.0, BBT_Time (1, 1, 0));
1386 if (meter_locked_tempo) {
1387 meter_locked_tempo->set_pulse (pulse);
1389 meter->set_beat (b_bbt);
1390 meter->set_pulse (pulse);
1395 pair<double, BBT_Time> b_bbt;
1397 const double beats = (meter->bbt().bars - prev_m->bbt().bars) * prev_m->divisions_per_bar();
1398 if (beats + prev_m->beat() != meter->beat()) {
1399 /* reordering caused a bbt change */
1400 b_bbt = make_pair (beats + prev_m->beat()
1401 , BBT_Time ((beats / prev_m->divisions_per_bar()) + prev_m->bbt().bars, 1, 0));
1403 b_bbt = make_pair (beats + prev_m->beat(), meter->bbt());
1405 pulse = (beats / prev_m->note_divisor()) + prev_m->pulse();
1407 /* shouldn't happen - the first is audio-locked */
1408 pulse = pulse_at_beat_locked (metrics, meter->beat());
1409 b_bbt = make_pair (meter->beat(), meter->bbt());
1412 meter->set_beat (b_bbt);
1413 meter->set_pulse (pulse);
1414 meter->set_minute (minute_at_pulse_locked (metrics, pulse));
1423 TempoMap::recompute_map (Metrics& metrics, framepos_t end)
1425 /* CALLER MUST HOLD WRITE LOCK */
1427 DEBUG_TRACE (DEBUG::TempoMath, string_compose ("recomputing tempo map, zero to %1\n", end));
1430 /* silly call from Session::process() during startup
1435 recompute_tempi (metrics);
1436 recompute_meters (metrics);
1440 TempoMap::metric_at (framepos_t frame, Metrics::const_iterator* last) const
1442 Glib::Threads::RWLock::ReaderLock lm (lock);
1443 TempoMetric m (first_meter(), first_tempo());
1445 /* at this point, we are *guaranteed* to have m.meter and m.tempo pointing
1446 at something, because we insert the default tempo and meter during
1447 TempoMap construction.
1449 now see if we can find better candidates.
1452 for (Metrics::const_iterator i = _metrics.begin(); i != _metrics.end(); ++i) {
1454 if ((*i)->frame() > frame) {
1468 /* XX meters only */
1470 TempoMap::metric_at (BBT_Time bbt) const
1472 Glib::Threads::RWLock::ReaderLock lm (lock);
1473 TempoMetric m (first_meter(), first_tempo());
1475 /* at this point, we are *guaranteed* to have m.meter and m.tempo pointing
1476 at something, because we insert the default tempo and meter during
1477 TempoMap construction.
1479 now see if we can find better candidates.
1482 for (Metrics::const_iterator i = _metrics.begin(); i != _metrics.end(); ++i) {
1484 if (!(*i)->is_tempo()) {
1485 mw = static_cast<MeterSection*> (*i);
1486 BBT_Time section_start (mw->bbt());
1488 if (section_start.bars > bbt.bars || (section_start.bars == bbt.bars && section_start.beats > bbt.beats)) {
1499 /** Returns the BBT (meter-based) beat corresponding to the supplied frame, possibly returning a negative value.
1500 * @param frame The session frame position.
1501 * @return The beat duration according to the tempo map at the supplied frame.
1503 * If the supplied frame lies before the first meter, the returned beat duration will be negative.
1504 * The returned beat is obtained using the first meter and the continuation of the tempo curve (backwards).
1506 * This function uses both tempo and meter.
1509 TempoMap::beat_at_frame (const framecnt_t& frame) const
1511 Glib::Threads::RWLock::ReaderLock lm (lock);
1513 return beat_at_minute_locked (_metrics, minute_at_frame (frame));
1516 /* This function uses both tempo and meter.*/
1518 TempoMap::beat_at_minute_locked (const Metrics& metrics, const double& minute) const
1520 const TempoSection& ts = tempo_section_at_minute_locked (metrics, minute);
1521 MeterSection* prev_m = 0;
1522 MeterSection* next_m = 0;
1524 for (Metrics::const_iterator i = metrics.begin(); i != metrics.end(); ++i) {
1525 if (!(*i)->is_tempo()) {
1526 if (prev_m && (*i)->minute() > minute) {
1527 next_m = static_cast<MeterSection*> (*i);
1530 prev_m = static_cast<MeterSection*> (*i);
1534 const double beat = prev_m->beat() + (ts.pulse_at_minute (minute) - prev_m->pulse()) * prev_m->note_divisor();
1536 /* audio locked meters fake their beat */
1537 if (next_m && next_m->beat() < beat) {
1538 return next_m->beat();
1544 /** Returns the frame corresponding to the supplied BBT (meter-based) beat.
1545 * @param beat The BBT (meter-based) beat.
1546 * @return The frame duration according to the tempo map at the supplied BBT (meter-based) beat.
1548 * This function uses both tempo and meter.
1551 TempoMap::frame_at_beat (const double& beat) const
1553 Glib::Threads::RWLock::ReaderLock lm (lock);
1555 return frame_at_minute (minute_at_beat_locked (_metrics, beat));
1558 /* meter & tempo section based */
1560 TempoMap::minute_at_beat_locked (const Metrics& metrics, const double& beat) const
1562 MeterSection* prev_m = 0;
1563 TempoSection* prev_t = 0;
1567 for (Metrics::const_iterator i = metrics.begin(); i != metrics.end(); ++i) {
1568 if (!(*i)->is_tempo()) {
1569 m = static_cast<MeterSection*> (*i);
1570 if (prev_m && m->beat() > beat) {
1580 for (Metrics::const_iterator i = metrics.begin(); i != metrics.end(); ++i) {
1581 if ((*i)->is_tempo()) {
1582 t = static_cast<TempoSection*> (*i);
1583 if (prev_t && ((t->pulse() - prev_m->pulse()) * prev_m->note_divisor()) + prev_m->beat() > beat) {
1592 return prev_t->minute_at_pulse (((beat - prev_m->beat()) / prev_m->note_divisor()) + prev_m->pulse());
1595 /** Returns a Tempo corresponding to the supplied frame position.
1596 * @param frame The audio frame.
1597 * @return a Tempo according to the tempo map at the supplied frame.
1601 TempoMap::tempo_at_frame (const framepos_t& frame) const
1603 Glib::Threads::RWLock::ReaderLock lm (lock);
1605 return tempo_at_minute_locked (_metrics, minute_at_frame (frame));
1609 TempoMap::tempo_at_minute_locked (const Metrics& metrics, const double& minute) const
1611 TempoSection* prev_t = 0;
1615 for (Metrics::const_iterator i = metrics.begin(); i != metrics.end(); ++i) {
1616 if ((*i)->is_tempo()) {
1617 t = static_cast<TempoSection*> (*i);
1621 if ((prev_t) && t->minute() > minute) {
1622 /* t is the section past frame */
1623 return prev_t->tempo_at_minute (minute);
1629 return Tempo (prev_t->note_types_per_minute(), prev_t->note_type());
1632 /** returns the frame at which the supplied tempo occurs, or
1633 * the frame of the last tempo section (search exhausted)
1634 * only the position of the first occurence will be returned
1638 TempoMap::frame_at_tempo (const Tempo& tempo) const
1640 Glib::Threads::RWLock::ReaderLock lm (lock);
1642 return frame_at_minute (minute_at_tempo_locked (_metrics, tempo));
1646 TempoMap::minute_at_tempo_locked (const Metrics& metrics, const Tempo& tempo) const
1648 TempoSection* prev_t = 0;
1649 const double tempo_bpm = tempo.note_types_per_minute();
1651 Metrics::const_iterator i;
1653 for (i = metrics.begin(); i != metrics.end(); ++i) {
1655 if ((*i)->is_tempo()) {
1656 t = static_cast<TempoSection*> (*i);
1662 const double t_bpm = t->note_types_per_minute();
1664 if (t_bpm == tempo_bpm) {
1669 const double prev_t_bpm = prev_t->note_types_per_minute();
1671 if ((t_bpm > tempo_bpm && prev_t_bpm < tempo_bpm) || (t_bpm < tempo_bpm && prev_t_bpm > tempo_bpm)) {
1672 return prev_t->minute_at_ntpm (prev_t->note_types_per_minute(), prev_t->pulse());
1679 return prev_t->minute();
1683 TempoMap::tempo_at_pulse_locked (const Metrics& metrics, const double& pulse) const
1685 TempoSection* prev_t = 0;
1689 for (Metrics::const_iterator i = metrics.begin(); i != metrics.end(); ++i) {
1690 if ((*i)->is_tempo()) {
1691 t = static_cast<TempoSection*> (*i);
1695 if ((prev_t) && t->pulse() > pulse) {
1696 /* t is the section past frame */
1697 return prev_t->tempo_at_pulse (pulse);
1703 return Tempo (prev_t->note_types_per_minute(), prev_t->note_type());
1707 TempoMap::pulse_at_tempo_locked (const Metrics& metrics, const Tempo& tempo) const
1709 TempoSection* prev_t = 0;
1710 const double tempo_bpm = tempo.note_types_per_minute();
1712 Metrics::const_iterator i;
1714 for (i = metrics.begin(); i != metrics.end(); ++i) {
1716 if ((*i)->is_tempo()) {
1717 t = static_cast<TempoSection*> (*i);
1723 const double t_bpm = t->note_types_per_minute();
1725 if (t_bpm == tempo_bpm) {
1730 const double prev_t_bpm = prev_t->note_types_per_minute();
1732 if ((t_bpm > tempo_bpm && prev_t_bpm < tempo_bpm) || (t_bpm < tempo_bpm && prev_t_bpm > tempo_bpm)) {
1733 return prev_t->pulse_at_ntpm (prev_t->note_types_per_minute(), prev_t->minute());
1740 return prev_t->pulse();
1743 /** Returns a Tempo corresponding to the supplied position in quarter-note beats.
1744 * @param qn the position in quarter note beats.
1745 * @return the Tempo at the supplied quarter-note.
1748 TempoMap::tempo_at_quarter_note (const double& qn) const
1750 Glib::Threads::RWLock::ReaderLock lm (lock);
1752 return tempo_at_pulse_locked (_metrics, qn / 4.0);
1755 /** Returns the position in quarter-note beats corresponding to the supplied Tempo.
1756 * @param tempo the tempo.
1757 * @return the position in quarter-note beats where the map bpm
1758 * is equal to that of the Tempo. currently ignores note_type.
1761 TempoMap::quarter_note_at_tempo (const Tempo& tempo) const
1763 Glib::Threads::RWLock::ReaderLock lm (lock);
1765 return pulse_at_tempo_locked (_metrics, tempo) * 4.0;;
1768 /** Returns the whole-note pulse corresponding to the supplied BBT (meter-based) beat.
1769 * @param metrics the list of metric sections used to calculate the pulse.
1770 * @param beat The BBT (meter-based) beat.
1771 * @return the whole-note pulse at the supplied BBT (meter-based) beat.
1773 * a pulse or whole note is the base musical position of a MetricSection.
1774 * it is equivalent to four quarter notes.
1778 TempoMap::pulse_at_beat_locked (const Metrics& metrics, const double& beat) const
1780 const MeterSection* prev_m = &meter_section_at_beat_locked (metrics, beat);
1782 return prev_m->pulse() + ((beat - prev_m->beat()) / prev_m->note_divisor());
1785 /** Returns the BBT (meter-based) beat corresponding to the supplied whole-note pulse .
1786 * @param metrics the list of metric sections used to calculate the beat.
1787 * @param pulse the whole-note pulse.
1788 * @return the meter-based beat at the supplied whole-note pulse.
1790 * a pulse or whole note is the base musical position of a MetricSection.
1791 * it is equivalent to four quarter notes.
1794 TempoMap::beat_at_pulse_locked (const Metrics& metrics, const double& pulse) const
1796 MeterSection* prev_m = 0;
1798 for (Metrics::const_iterator i = metrics.begin(); i != metrics.end(); ++i) {
1800 if (!(*i)->is_tempo()) {
1801 m = static_cast<MeterSection*> (*i);
1802 if (prev_m && m->pulse() > pulse) {
1810 double const ret = ((pulse - prev_m->pulse()) * prev_m->note_divisor()) + prev_m->beat();
1814 /* tempo section based */
1816 TempoMap::pulse_at_minute_locked (const Metrics& metrics, const double& minute) const
1818 /* HOLD (at least) THE READER LOCK */
1819 TempoSection* prev_t = 0;
1821 for (Metrics::const_iterator i = metrics.begin(); i != metrics.end(); ++i) {
1823 if ((*i)->is_tempo()) {
1824 t = static_cast<TempoSection*> (*i);
1828 if (prev_t && t->minute() > minute) {
1829 /*the previous ts is the one containing the frame */
1830 const double ret = prev_t->pulse_at_minute (minute);
1831 /* audio locked section in new meter*/
1832 if (t->pulse() < ret) {
1841 /* treated as constant for this ts */
1842 const double pulses_in_section = ((minute - prev_t->minute()) * prev_t->note_types_per_minute()) / prev_t->note_type();
1844 return pulses_in_section + prev_t->pulse();
1847 /* tempo section based */
1849 TempoMap::minute_at_pulse_locked (const Metrics& metrics, const double& pulse) const
1851 /* HOLD THE READER LOCK */
1853 const TempoSection* prev_t = 0;
1855 for (Metrics::const_iterator i = metrics.begin(); i != metrics.end(); ++i) {
1858 if ((*i)->is_tempo()) {
1859 t = static_cast<TempoSection*> (*i);
1863 if (prev_t && t->pulse() > pulse) {
1864 return prev_t->minute_at_pulse (pulse);
1870 /* must be treated as constant, irrespective of _type */
1871 double const dtime = ((pulse - prev_t->pulse()) * prev_t->note_type()) / prev_t->note_types_per_minute();
1873 return dtime + prev_t->minute();
1876 /** Returns the BBT (meter-based) beat corresponding to the supplied BBT time.
1877 * @param bbt The BBT time (meter-based).
1878 * @return bbt The BBT beat (meter-based) at the supplied BBT time.
1882 TempoMap::beat_at_bbt (const Timecode::BBT_Time& bbt)
1884 Glib::Threads::RWLock::ReaderLock lm (lock);
1885 return beat_at_bbt_locked (_metrics, bbt);
1890 TempoMap::beat_at_bbt_locked (const Metrics& metrics, const Timecode::BBT_Time& bbt) const
1892 /* CALLER HOLDS READ LOCK */
1894 MeterSection* prev_m = 0;
1896 /* because audio-locked meters have 'fake' integral beats,
1897 there is no pulse offset here.
1901 for (Metrics::const_iterator i = metrics.begin(); i != metrics.end(); ++i) {
1902 if (!(*i)->is_tempo()) {
1903 m = static_cast<MeterSection*> (*i);
1905 const double bars_to_m = (m->beat() - prev_m->beat()) / prev_m->divisions_per_bar();
1906 if ((bars_to_m + (prev_m->bbt().bars - 1)) > (bbt.bars - 1)) {
1914 const double remaining_bars = bbt.bars - prev_m->bbt().bars;
1915 const double remaining_bars_in_beats = remaining_bars * prev_m->divisions_per_bar();
1916 const double ret = remaining_bars_in_beats + prev_m->beat() + (bbt.beats - 1) + (bbt.ticks / BBT_Time::ticks_per_beat);
1921 /** Returns the BBT time corresponding to the supplied BBT (meter-based) beat.
1922 * @param beat The BBT (meter-based) beat.
1923 * @return The BBT time (meter-based) at the supplied meter-based beat.
1927 TempoMap::bbt_at_beat (const double& beat)
1929 Glib::Threads::RWLock::ReaderLock lm (lock);
1930 return bbt_at_beat_locked (_metrics, beat);
1934 TempoMap::bbt_at_beat_locked (const Metrics& metrics, const double& b) const
1936 /* CALLER HOLDS READ LOCK */
1937 MeterSection* prev_m = 0;
1938 const double beats = max (0.0, b);
1940 MeterSection* m = 0;
1942 for (Metrics::const_iterator i = metrics.begin(); i != metrics.end(); ++i) {
1943 if (!(*i)->is_tempo()) {
1944 m = static_cast<MeterSection*> (*i);
1946 if (m->beat() > beats) {
1947 /* this is the meter after the one our beat is on*/
1957 const double beats_in_ms = beats - prev_m->beat();
1958 const uint32_t bars_in_ms = (uint32_t) floor (beats_in_ms / prev_m->divisions_per_bar());
1959 const uint32_t total_bars = bars_in_ms + (prev_m->bbt().bars - 1);
1960 const double remaining_beats = beats_in_ms - (bars_in_ms * prev_m->divisions_per_bar());
1961 const double remaining_ticks = (remaining_beats - floor (remaining_beats)) * BBT_Time::ticks_per_beat;
1965 ret.ticks = (uint32_t) floor (remaining_ticks + 0.5);
1966 ret.beats = (uint32_t) floor (remaining_beats);
1967 ret.bars = total_bars;
1969 /* 0 0 0 to 1 1 0 - based mapping*/
1973 if (ret.ticks >= BBT_Time::ticks_per_beat) {
1975 ret.ticks -= BBT_Time::ticks_per_beat;
1978 if (ret.beats >= prev_m->divisions_per_bar() + 1) {
1986 /** Returns the quarter-note beat corresponding to the supplied BBT time (meter-based).
1987 * @param bbt The BBT time (meter-based).
1988 * @return the quarter note beat at the supplied BBT time
1990 * quarter-notes ignore meter and are based on pulse (the musical unit of MetricSection).
1992 * while the input uses meter, the output does not.
1995 TempoMap::quarter_note_at_bbt (const Timecode::BBT_Time& bbt)
1997 Glib::Threads::RWLock::ReaderLock lm (lock);
1999 return pulse_at_bbt_locked (_metrics, bbt) * 4.0;
2003 TempoMap::quarter_note_at_bbt_rt (const Timecode::BBT_Time& bbt)
2005 Glib::Threads::RWLock::ReaderLock lm (lock, Glib::Threads::TRY_LOCK);
2008 throw std::logic_error ("TempoMap::quarter_note_at_bbt_rt() could not lock tempo map");
2011 return pulse_at_bbt_locked (_metrics, bbt) * 4.0;
2015 TempoMap::pulse_at_bbt_locked (const Metrics& metrics, const Timecode::BBT_Time& bbt) const
2017 /* CALLER HOLDS READ LOCK */
2019 MeterSection* prev_m = 0;
2021 /* because audio-locked meters have 'fake' integral beats,
2022 there is no pulse offset here.
2026 for (Metrics::const_iterator i = metrics.begin(); i != metrics.end(); ++i) {
2027 if (!(*i)->is_tempo()) {
2028 m = static_cast<MeterSection*> (*i);
2030 if (m->bbt().bars > bbt.bars) {
2038 const double remaining_bars = bbt.bars - prev_m->bbt().bars;
2039 const double remaining_pulses = remaining_bars * prev_m->divisions_per_bar() / prev_m->note_divisor();
2040 const double ret = remaining_pulses + prev_m->pulse() + (((bbt.beats - 1) + (bbt.ticks / BBT_Time::ticks_per_beat)) / prev_m->note_divisor());
2045 /** Returns the BBT time corresponding to the supplied quarter-note beat.
2046 * @param qn the quarter-note beat.
2047 * @return The BBT time (meter-based) at the supplied meter-based beat.
2049 * quarter-notes ignore meter and are based on pulse (the musical unit of MetricSection).
2053 TempoMap::bbt_at_quarter_note (const double& qn)
2055 Glib::Threads::RWLock::ReaderLock lm (lock);
2057 return bbt_at_pulse_locked (_metrics, qn / 4.0);
2060 /** Returns the BBT time (meter-based) corresponding to the supplied whole-note pulse position.
2061 * @param metrics The list of metric sections used to determine the result.
2062 * @param pulse The whole-note pulse.
2063 * @return The BBT time at the supplied whole-note pulse.
2065 * a pulse or whole note is the basic musical position of a MetricSection.
2066 * it is equivalent to four quarter notes.
2067 * while the output uses meter, the input does not.
2070 TempoMap::bbt_at_pulse_locked (const Metrics& metrics, const double& pulse) const
2072 MeterSection* prev_m = 0;
2074 MeterSection* m = 0;
2076 for (Metrics::const_iterator i = metrics.begin(); i != metrics.end(); ++i) {
2078 if (!(*i)->is_tempo()) {
2079 m = static_cast<MeterSection*> (*i);
2082 double const pulses_to_m = m->pulse() - prev_m->pulse();
2083 if (prev_m->pulse() + pulses_to_m > pulse) {
2084 /* this is the meter after the one our beat is on*/
2095 const double beats_in_ms = (pulse - prev_m->pulse()) * prev_m->note_divisor();
2096 const uint32_t bars_in_ms = (uint32_t) floor (beats_in_ms / prev_m->divisions_per_bar());
2097 const uint32_t total_bars = bars_in_ms + (prev_m->bbt().bars - 1);
2098 const double remaining_beats = beats_in_ms - (bars_in_ms * prev_m->divisions_per_bar());
2099 const double remaining_ticks = (remaining_beats - floor (remaining_beats)) * BBT_Time::ticks_per_beat;
2103 ret.ticks = (uint32_t) floor (remaining_ticks + 0.5);
2104 ret.beats = (uint32_t) floor (remaining_beats);
2105 ret.bars = total_bars;
2107 /* 0 0 0 to 1 1 0 mapping*/
2111 if (ret.ticks >= BBT_Time::ticks_per_beat) {
2113 ret.ticks -= BBT_Time::ticks_per_beat;
2116 if (ret.beats >= prev_m->divisions_per_bar() + 1) {
2124 /** Returns the BBT time corresponding to the supplied frame position.
2125 * @param frame the position in audio samples.
2126 * @return the BBT time at the frame position .
2130 TempoMap::bbt_at_frame (framepos_t frame)
2137 warning << string_compose (_("tempo map was asked for BBT time at frame %1\n"), frame) << endmsg;
2140 Glib::Threads::RWLock::ReaderLock lm (lock);
2142 return bbt_at_minute_locked (_metrics, minute_at_frame (frame));
2146 TempoMap::bbt_at_frame_rt (framepos_t frame)
2148 Glib::Threads::RWLock::ReaderLock lm (lock, Glib::Threads::TRY_LOCK);
2151 throw std::logic_error ("TempoMap::bbt_at_frame_rt() could not lock tempo map");
2154 return bbt_at_minute_locked (_metrics, minute_at_frame (frame));
2158 TempoMap::bbt_at_minute_locked (const Metrics& metrics, const double& minute) const
2168 const TempoSection& ts = tempo_section_at_minute_locked (metrics, minute);
2169 MeterSection* prev_m = 0;
2170 MeterSection* next_m = 0;
2174 for (Metrics::const_iterator i = metrics.begin(); i != metrics.end(); ++i) {
2175 if (!(*i)->is_tempo()) {
2176 m = static_cast<MeterSection*> (*i);
2177 if (prev_m && m->minute() > minute) {
2185 double beat = prev_m->beat() + (ts.pulse_at_minute (minute) - prev_m->pulse()) * prev_m->note_divisor();
2187 /* handle frame before first meter */
2188 if (minute < prev_m->minute()) {
2191 /* audio locked meters fake their beat */
2192 if (next_m && next_m->beat() < beat) {
2193 beat = next_m->beat();
2196 beat = max (0.0, beat);
2198 const double beats_in_ms = beat - prev_m->beat();
2199 const uint32_t bars_in_ms = (uint32_t) floor (beats_in_ms / prev_m->divisions_per_bar());
2200 const uint32_t total_bars = bars_in_ms + (prev_m->bbt().bars - 1);
2201 const double remaining_beats = beats_in_ms - (bars_in_ms * prev_m->divisions_per_bar());
2202 const double remaining_ticks = (remaining_beats - floor (remaining_beats)) * BBT_Time::ticks_per_beat;
2206 ret.ticks = (uint32_t) floor (remaining_ticks + 0.5);
2207 ret.beats = (uint32_t) floor (remaining_beats);
2208 ret.bars = total_bars;
2210 /* 0 0 0 to 1 1 0 - based mapping*/
2214 if (ret.ticks >= BBT_Time::ticks_per_beat) {
2216 ret.ticks -= BBT_Time::ticks_per_beat;
2219 if (ret.beats >= prev_m->divisions_per_bar() + 1) {
2227 /** Returns the frame position corresponding to the supplied BBT time.
2228 * @param bbt the position in BBT time.
2229 * @return the frame position at bbt.
2233 TempoMap::frame_at_bbt (const BBT_Time& bbt)
2236 warning << string_compose (_("tempo map asked for frame time at bar < 1 (%1)\n"), bbt) << endmsg;
2240 if (bbt.beats < 1) {
2241 throw std::logic_error ("beats are counted from one");
2243 Glib::Threads::RWLock::ReaderLock lm (lock);
2245 return frame_at_minute (minute_at_bbt_locked (_metrics, bbt));
2248 /* meter & tempo section based */
2250 TempoMap::minute_at_bbt_locked (const Metrics& metrics, const BBT_Time& bbt) const
2252 /* HOLD THE READER LOCK */
2254 const double ret = minute_at_beat_locked (metrics, beat_at_bbt_locked (metrics, bbt));
2259 * Returns the quarter-note beat position corresponding to the supplied frame.
2261 * @param frame the position in frames.
2262 * @return The quarter-note position of the supplied frame. Ignores meter.
2266 TempoMap::quarter_note_at_frame (const framepos_t frame) const
2268 Glib::Threads::RWLock::ReaderLock lm (lock);
2270 const double ret = quarter_note_at_minute_locked (_metrics, minute_at_frame (frame));
2276 TempoMap::quarter_note_at_minute_locked (const Metrics& metrics, const double minute) const
2278 const double ret = pulse_at_minute_locked (metrics, minute) * 4.0;
2284 TempoMap::quarter_note_at_frame_rt (const framepos_t frame) const
2286 Glib::Threads::RWLock::ReaderLock lm (lock, Glib::Threads::TRY_LOCK);
2289 throw std::logic_error ("TempoMap::quarter_note_at_frame_rt() could not lock tempo map");
2292 const double ret = pulse_at_minute_locked (_metrics, minute_at_frame (frame)) * 4.0;
2298 * Returns the frame position corresponding to the supplied quarter-note beat.
2300 * @param quarter_note the quarter-note position.
2301 * @return the frame position of the supplied quarter-note. Ignores meter.
2306 TempoMap::frame_at_quarter_note (const double quarter_note) const
2308 Glib::Threads::RWLock::ReaderLock lm (lock);
2310 const framepos_t ret = frame_at_minute (minute_at_quarter_note_locked (_metrics, quarter_note));
2316 TempoMap::minute_at_quarter_note_locked (const Metrics& metrics, const double quarter_note) const
2318 const double ret = minute_at_pulse_locked (metrics, quarter_note / 4.0);
2323 /** Returns the quarter-note beats corresponding to the supplied BBT (meter-based) beat.
2324 * @param beat The BBT (meter-based) beat.
2325 * @return The quarter-note position of the supplied BBT (meter-based) beat.
2327 * a quarter-note may be compared with and assigned to Evoral::Beats.
2331 TempoMap::quarter_note_at_beat (const double beat) const
2333 Glib::Threads::RWLock::ReaderLock lm (lock);
2335 const double ret = quarter_note_at_beat_locked (_metrics, beat);
2341 TempoMap::quarter_note_at_beat_locked (const Metrics& metrics, const double beat) const
2343 const double ret = pulse_at_beat_locked (metrics, beat) * 4.0;
2348 /** Returns the BBT (meter-based) beat position corresponding to the supplied quarter-note beats.
2349 * @param quarter_note The position in quarter-note beats.
2350 * @return the BBT (meter-based) beat position of the supplied quarter-note beats.
2352 * a quarter-note is the musical unit of Evoral::Beats.
2356 TempoMap::beat_at_quarter_note (const double quarter_note) const
2358 Glib::Threads::RWLock::ReaderLock lm (lock);
2360 const double ret = beat_at_quarter_note_locked (_metrics, quarter_note);
2366 TempoMap::beat_at_quarter_note_locked (const Metrics& metrics, const double quarter_note) const
2369 return beat_at_pulse_locked (metrics, quarter_note / 4.0);
2372 /** Returns the duration in frames between two supplied quarter-note beat positions.
2373 * @param start the first position in quarter-note beats.
2374 * @param end the end position in quarter-note beats.
2375 * @return the frame distance ober the quarter-note beats duration.
2377 * use this rather than e.g.
2378 * frame_at-quarter_note (end_beats) - frame_at_quarter_note (start_beats).
2379 * frames_between_quarter_notes() doesn't round to audio frames as an intermediate step,
2383 TempoMap::frames_between_quarter_notes (const double start, const double end) const
2385 Glib::Threads::RWLock::ReaderLock lm (lock);
2387 return frame_at_minute (minutes_between_quarter_notes_locked (_metrics, start, end));
2391 TempoMap::minutes_between_quarter_notes_locked (const Metrics& metrics, const double start, const double end) const
2394 return minute_at_pulse_locked (metrics, end / 4.0) - minute_at_pulse_locked (metrics, start / 4.0);
2398 TempoMap::quarter_notes_between_frames (const framecnt_t start, const framecnt_t end) const
2400 Glib::Threads::RWLock::ReaderLock lm (lock);
2402 return quarter_notes_between_frames_locked (_metrics, start, end);
2406 TempoMap::quarter_notes_between_frames_locked (const Metrics& metrics, const framecnt_t start, const framecnt_t end) const
2408 const TempoSection* prev_t = 0;
2410 for (Metrics::const_iterator i = metrics.begin(); i != metrics.end(); ++i) {
2413 if ((*i)->is_tempo()) {
2414 t = static_cast<TempoSection*> (*i);
2418 if (prev_t && t->frame() > start) {
2425 const double start_qn = prev_t->pulse_at_frame (start);
2427 for (Metrics::const_iterator i = metrics.begin(); i != metrics.end(); ++i) {
2430 if ((*i)->is_tempo()) {
2431 t = static_cast<TempoSection*> (*i);
2435 if (prev_t && t->frame() > end) {
2441 const double end_qn = prev_t->pulse_at_frame (end);
2443 return (end_qn - start_qn) * 4.0;
2447 TempoMap::check_solved (const Metrics& metrics) const
2449 TempoSection* prev_t = 0;
2450 MeterSection* prev_m = 0;
2452 for (Metrics::const_iterator i = metrics.begin(); i != metrics.end(); ++i) {
2455 if ((*i)->is_tempo()) {
2456 t = static_cast<TempoSection*> (*i);
2461 /* check ordering */
2462 if ((t->minute() <= prev_t->minute()) || (t->pulse() <= prev_t->pulse())) {
2466 /* precision check ensures tempo and frames align.*/
2467 if (t->frame() != frame_at_minute (prev_t->minute_at_ntpm (t->note_types_per_minute(), t->pulse()))) {
2468 if (!t->locked_to_meter()) {
2473 /* gradient limit - who knows what it should be?
2474 things are also ok (if a little chaotic) without this
2476 if (fabs (prev_t->c_func()) > 1000.0) {
2477 //std::cout << "c : " << prev_t->c_func() << std::endl;
2484 if (!(*i)->is_tempo()) {
2485 m = static_cast<MeterSection*> (*i);
2486 if (prev_m && m->position_lock_style() == AudioTime) {
2487 const TempoSection* t = &tempo_section_at_minute_locked (metrics, minute_at_frame (m->frame() - 1));
2488 const double nascent_m_minute = t->minute_at_pulse (m->pulse());
2489 /* Here we check that a preceding section of music doesn't overlap a subsequent one.
2491 if (t && (nascent_m_minute > m->minute() || nascent_m_minute < 0.0)) {
2505 TempoMap::set_active_tempi (const Metrics& metrics, const framepos_t& frame)
2507 for (Metrics::const_iterator i = metrics.begin(); i != metrics.end(); ++i) {
2509 if ((*i)->is_tempo()) {
2510 t = static_cast<TempoSection*> (*i);
2512 t->set_active (true);
2514 } else if (t->position_lock_style() == AudioTime) {
2515 if (t->active () && t->frame() < frame) {
2516 t->set_active (false);
2518 } else if (t->frame() > frame) {
2519 t->set_active (true);
2520 } else if (t->frame() == frame) {
2530 TempoMap::solve_map_minute (Metrics& imaginary, TempoSection* section, const double& minute)
2532 TempoSection* prev_t = 0;
2533 TempoSection* section_prev = 0;
2534 double first_m_minute = 0.0;
2536 /* can't move a tempo before the first meter */
2537 for (Metrics::iterator i = imaginary.begin(); i != imaginary.end(); ++i) {
2539 if (!(*i)->is_tempo()) {
2540 m = static_cast<MeterSection*> (*i);
2542 first_m_minute = m->minute();
2547 if (!section->initial() && minute <= first_m_minute) {
2551 section->set_active (true);
2552 section->set_minute (minute);
2554 for (Metrics::iterator i = imaginary.begin(); i != imaginary.end(); ++i) {
2556 if ((*i)->is_tempo()) {
2557 t = static_cast<TempoSection*> (*i);
2564 section_prev = prev_t;
2565 if (t->locked_to_meter()) {
2570 if (t->position_lock_style() == MusicTime) {
2571 prev_t->set_c_func (prev_t->compute_c_func_pulse (t->note_types_per_minute(), t->pulse()));
2572 t->set_minute (prev_t->minute_at_ntpm (t->note_types_per_minute(), t->pulse()));
2574 prev_t->set_c_func (prev_t->compute_c_func_minute (t->note_types_per_minute(), t->minute()));
2575 if (!t->locked_to_meter()) {
2576 t->set_pulse (prev_t->pulse_at_ntpm (t->note_types_per_minute(), t->minute()));
2585 section_prev->set_c_func (section_prev->compute_c_func_minute (section->note_types_per_minute(), minute));
2586 if (!section->locked_to_meter()) {
2587 section->set_pulse (section_prev->pulse_at_ntpm (section->note_types_per_minute(), minute));
2592 recompute_tempi (imaginary);
2594 if (check_solved (imaginary)) {
2597 dunp (imaginary, std::cout);
2601 MetricSectionFrameSorter fcmp;
2602 imaginary.sort (fcmp);
2604 recompute_tempi (imaginary);
2606 if (check_solved (imaginary)) {
2614 TempoMap::solve_map_pulse (Metrics& imaginary, TempoSection* section, const double& pulse)
2616 TempoSection* prev_t = 0;
2617 TempoSection* section_prev = 0;
2619 section->set_pulse (pulse);
2621 for (Metrics::iterator i = imaginary.begin(); i != imaginary.end(); ++i) {
2623 if ((*i)->is_tempo()) {
2624 t = static_cast<TempoSection*> (*i);
2635 section_prev = prev_t;
2638 if (t->position_lock_style() == MusicTime) {
2639 prev_t->set_c_func (prev_t->compute_c_func_pulse (t->note_types_per_minute(), t->pulse()));
2640 t->set_minute (prev_t->minute_at_ntpm (t->note_types_per_minute(), t->pulse()));
2642 prev_t->set_c_func (prev_t->compute_c_func_minute (t->note_types_per_minute(), t->minute()));
2643 if (!t->locked_to_meter()) {
2644 t->set_pulse (prev_t->pulse_at_ntpm (t->note_types_per_minute(), t->minute()));
2653 section_prev->set_c_func (section_prev->compute_c_func_pulse (section->note_types_per_minute(), pulse));
2654 section->set_minute (section_prev->minute_at_ntpm (section->note_types_per_minute(), pulse));
2658 recompute_tempi (imaginary);
2660 if (check_solved (imaginary)) {
2663 dunp (imaginary, std::cout);
2667 MetricSectionSorter cmp;
2668 imaginary.sort (cmp);
2670 recompute_tempi (imaginary);
2672 * XX need a restriction here, but only for this case,
2673 * as audio locked tempos don't interact in the same way.
2675 * With music-locked tempos, the solution to cross-dragging can fly off the screen
2677 * |50 bpm |250 bpm |60 bpm
2678 * drag 250 to the pulse after 60->
2679 * a clue: dragging the second 60 <- past the 250 would cause no such problem.
2681 if (check_solved (imaginary)) {
2689 TempoMap::solve_map_minute (Metrics& imaginary, MeterSection* section, const double& minute)
2691 /* disallow moving first meter past any subsequent one, and any initial meter before the first one */
2692 const MeterSection* other = &meter_section_at_minute_locked (imaginary, minute);
2693 if ((section->initial() && !other->initial()) || (other->initial() && !section->initial() && other->minute() >= minute)) {
2697 if (section->initial()) {
2698 /* lock the first tempo to our first meter */
2699 if (!set_active_tempi (imaginary, section->frame_at_minute (minute))) {
2704 TempoSection* meter_locked_tempo = 0;
2706 for (Metrics::const_iterator ii = imaginary.begin(); ii != imaginary.end(); ++ii) {
2708 if ((*ii)->is_tempo()) {
2709 t = static_cast<TempoSection*> (*ii);
2710 if ((t->locked_to_meter() || t->initial()) && t->minute() == section->minute()) {
2711 meter_locked_tempo = t;
2717 if (!meter_locked_tempo) {
2721 MeterSection* prev_m = 0;
2723 TempoSection* tempo_copy = copy_metrics_and_point (imaginary, future_map, meter_locked_tempo);
2724 bool solved = false;
2726 for (Metrics::iterator i = imaginary.begin(); i != imaginary.end(); ++i) {
2728 if (!(*i)->is_tempo()) {
2729 m = static_cast<MeterSection*> (*i);
2731 if (prev_m && !section->initial()) {
2732 const double beats = (pulse_at_minute_locked (imaginary, minute) - prev_m->pulse()) * prev_m->note_divisor();
2733 if (beats + prev_m->beat() < section->beat()) {
2734 /* set the section pulse according to its musical position,
2735 * as an earlier time than this has been requested.
2737 const double new_pulse = ((section->beat() - prev_m->beat())
2738 / prev_m->note_divisor()) + prev_m->pulse();
2740 tempo_copy->set_position_lock_style (MusicTime);
2741 if ((solved = solve_map_pulse (future_map, tempo_copy, new_pulse))) {
2742 meter_locked_tempo->set_position_lock_style (MusicTime);
2743 section->set_position_lock_style (MusicTime);
2744 section->set_pulse (new_pulse);
2745 solve_map_pulse (imaginary, meter_locked_tempo, new_pulse);
2746 meter_locked_tempo->set_position_lock_style (AudioTime);
2747 section->set_position_lock_style (AudioTime);
2748 section->set_minute (meter_locked_tempo->minute());
2754 Metrics::const_iterator d = future_map.begin();
2755 while (d != future_map.end()) {
2764 /* all is ok. set section's locked tempo if allowed.
2765 possibly disallowed if there is an adjacent audio-locked tempo.
2766 XX this check could possibly go. its never actually happened here.
2768 MeterSection* meter_copy = const_cast<MeterSection*>
2769 (&meter_section_at_minute_locked (future_map, section->minute()));
2771 meter_copy->set_minute (minute);
2773 if ((solved = solve_map_minute (future_map, tempo_copy, minute))) {
2774 section->set_minute (minute);
2775 meter_locked_tempo->set_pulse (((section->beat() - prev_m->beat())
2776 / prev_m->note_divisor()) + prev_m->pulse());
2777 solve_map_minute (imaginary, meter_locked_tempo, minute);
2782 Metrics::const_iterator d = future_map.begin();
2783 while (d != future_map.end()) {
2793 /* initial (first meter atm) */
2795 tempo_copy->set_minute (minute);
2796 tempo_copy->set_pulse (0.0);
2798 if ((solved = solve_map_minute (future_map, tempo_copy, minute))) {
2799 section->set_minute (minute);
2800 meter_locked_tempo->set_minute (minute);
2801 meter_locked_tempo->set_pulse (0.0);
2802 solve_map_minute (imaginary, meter_locked_tempo, minute);
2807 Metrics::const_iterator d = future_map.begin();
2808 while (d != future_map.end()) {
2817 pair<double, BBT_Time> b_bbt = make_pair (0.0, BBT_Time (1, 1, 0));
2818 section->set_beat (b_bbt);
2819 section->set_pulse (0.0);
2829 MetricSectionFrameSorter fcmp;
2830 imaginary.sort (fcmp);
2832 recompute_meters (imaginary);
2838 TempoMap::solve_map_bbt (Metrics& imaginary, MeterSection* section, const BBT_Time& when)
2840 /* disallow setting section to an existing meter's bbt */
2841 for (Metrics::iterator i = imaginary.begin(); i != imaginary.end(); ++i) {
2843 if (!(*i)->is_tempo()) {
2844 m = static_cast<MeterSection*> (*i);
2845 if (m != section && m->bbt().bars == when.bars) {
2851 MeterSection* prev_m = 0;
2852 MeterSection* section_prev = 0;
2854 for (Metrics::iterator i = imaginary.begin(); i != imaginary.end(); ++i) {
2856 if (!(*i)->is_tempo()) {
2857 m = static_cast<MeterSection*> (*i);
2863 pair<double, BBT_Time> b_bbt;
2864 double new_pulse = 0.0;
2866 if (prev_m && m->bbt().bars > when.bars && !section_prev){
2867 section_prev = prev_m;
2869 const double beats = (when.bars - section_prev->bbt().bars) * section_prev->divisions_per_bar();
2870 const double pulse = (beats / section_prev->note_divisor()) + section_prev->pulse();
2871 pair<double, BBT_Time> b_bbt = make_pair (beats + section_prev->beat(), when);
2873 section->set_beat (b_bbt);
2874 section->set_pulse (pulse);
2875 section->set_minute (minute_at_pulse_locked (imaginary, pulse));
2879 if (m->position_lock_style() == AudioTime) {
2880 TempoSection* meter_locked_tempo = 0;
2882 for (Metrics::const_iterator ii = imaginary.begin(); ii != imaginary.end(); ++ii) {
2884 if ((*ii)->is_tempo()) {
2885 t = static_cast<TempoSection*> (*ii);
2886 if ((t->locked_to_meter() || t->initial()) && t->frame() == m->frame()) {
2887 meter_locked_tempo = t;
2893 if (!meter_locked_tempo) {
2898 double beats = ((m->bbt().bars - prev_m->bbt().bars) * prev_m->divisions_per_bar());
2900 if (beats + prev_m->beat() != m->beat()) {
2901 /* tempo/ meter change caused a change in beat (bar). */
2903 /* the user has requested that the previous section of music overlaps this one.
2904 we have no choice but to change the bar number here, as being locked to audio means
2905 we must stay where we are on the timeline.
2907 beats = m->beat() - prev_m->beat();
2908 b_bbt = make_pair (beats + prev_m->beat()
2909 , BBT_Time ((beats / prev_m->divisions_per_bar()) + prev_m->bbt().bars, 1, 0));
2910 new_pulse = prev_m->pulse() + (beats / prev_m->note_divisor());
2912 } else if (!m->initial()) {
2913 b_bbt = make_pair (m->beat(), m->bbt());
2914 new_pulse = prev_m->pulse() + (beats / prev_m->note_divisor());
2917 b_bbt = make_pair (0.0, BBT_Time (1, 1, 0));
2920 meter_locked_tempo->set_pulse (new_pulse);
2921 m->set_beat (b_bbt);
2922 m->set_pulse (new_pulse);
2926 const double beats = ((m->bbt().bars - prev_m->bbt().bars) * prev_m->divisions_per_bar());
2927 if (beats + prev_m->beat() != m->beat()) {
2928 /* tempo/ meter change caused a change in beat (bar). */
2929 b_bbt = make_pair (beats + prev_m->beat()
2930 , BBT_Time ((beats / prev_m->divisions_per_bar()) + prev_m->bbt().bars, 1, 0));
2932 b_bbt = make_pair (beats + prev_m->beat()
2935 new_pulse = (beats / prev_m->note_divisor()) + prev_m->pulse();
2936 m->set_beat (b_bbt);
2937 m->set_pulse (new_pulse);
2938 m->set_minute (minute_at_pulse_locked (imaginary, new_pulse));
2945 if (!section_prev) {
2947 const double beats = (when.bars - prev_m->bbt().bars) * prev_m->divisions_per_bar();
2948 const double pulse = (beats / prev_m->note_divisor()) + prev_m->pulse();
2949 pair<double, BBT_Time> b_bbt = make_pair (beats + prev_m->beat(), when);
2951 section->set_beat (b_bbt);
2952 section->set_pulse (pulse);
2953 section->set_minute (minute_at_pulse_locked (imaginary, pulse));
2956 MetricSectionSorter cmp;
2957 imaginary.sort (cmp);
2959 recompute_meters (imaginary);
2964 /** places a copy of _metrics into copy and returns a pointer
2965 * to section's equivalent in copy.
2968 TempoMap::copy_metrics_and_point (const Metrics& metrics, Metrics& copy, TempoSection* section)
2970 TempoSection* ret = 0;
2972 for (Metrics::const_iterator i = metrics.begin(); i != metrics.end(); ++i) {
2975 if ((*i)->is_tempo()) {
2976 t = static_cast<TempoSection*> (*i);
2978 ret = new TempoSection (*t);
2979 copy.push_back (ret);
2983 TempoSection* cp = new TempoSection (*t);
2984 copy.push_back (cp);
2986 if (!(*i)->is_tempo()) {
2987 m = static_cast<MeterSection *> (*i);
2988 MeterSection* cp = new MeterSection (*m);
2989 copy.push_back (cp);
2997 TempoMap::copy_metrics_and_point (const Metrics& metrics, Metrics& copy, MeterSection* section)
2999 MeterSection* ret = 0;
3001 for (Metrics::const_iterator i = metrics.begin(); i != metrics.end(); ++i) {
3004 if ((*i)->is_tempo()) {
3005 t = static_cast<TempoSection*> (*i);
3006 TempoSection* cp = new TempoSection (*t);
3007 copy.push_back (cp);
3010 if (!(*i)->is_tempo()) {
3011 m = static_cast<MeterSection *> (*i);
3013 ret = new MeterSection (*m);
3014 copy.push_back (ret);
3017 MeterSection* cp = new MeterSection (*m);
3018 copy.push_back (cp);
3025 /** answers the question "is this a valid beat position for this tempo section?".
3026 * it returns true if the tempo section can be moved to the requested bbt position,
3027 * leaving the tempo map in a solved state.
3028 * @param ts the tempo section to be moved
3029 * @param bbt the requested new position for the tempo section
3030 * @return true if the tempo section can be moved to the position, otherwise false.
3033 TempoMap::can_solve_bbt (TempoSection* ts, const BBT_Time& bbt)
3036 TempoSection* tempo_copy = 0;
3039 Glib::Threads::RWLock::ReaderLock lm (lock);
3040 tempo_copy = copy_metrics_and_point (_metrics, copy, ts);
3046 const bool ret = solve_map_pulse (copy, tempo_copy, pulse_at_bbt_locked (copy, bbt));
3048 Metrics::const_iterator d = copy.begin();
3049 while (d != copy.end()) {
3058 * This is for a gui that needs to know the pulse or frame of a tempo section if it were to be moved to some bbt time,
3059 * taking any possible reordering as a consequence of this into account.
3060 * @param section - the section to be altered
3061 * @param bbt - the BBT time where the altered tempo will fall
3062 * @return returns - the position in pulses and frames (as a pair) where the new tempo section will lie.
3064 pair<double, framepos_t>
3065 TempoMap::predict_tempo_position (TempoSection* section, const BBT_Time& bbt)
3068 pair<double, framepos_t> ret = make_pair (0.0, 0);
3070 Glib::Threads::RWLock::ReaderLock lm (lock);
3072 TempoSection* tempo_copy = copy_metrics_and_point (_metrics, future_map, section);
3074 const double beat = beat_at_bbt_locked (future_map, bbt);
3076 if (section->position_lock_style() == AudioTime) {
3077 tempo_copy->set_position_lock_style (MusicTime);
3080 if (solve_map_pulse (future_map, tempo_copy, pulse_at_beat_locked (future_map, beat))) {
3081 ret.first = tempo_copy->pulse();
3082 ret.second = tempo_copy->frame();
3084 ret.first = section->pulse();
3085 ret.second = section->frame();
3088 Metrics::const_iterator d = future_map.begin();
3089 while (d != future_map.end()) {
3096 /** moves a TempoSection to a specified position.
3097 * @param ts - the section to be moved
3098 * @param frame - the new position in frames for the tempo
3099 * @param sub_num - the snap division to use if using musical time.
3101 * if sub_num is non-zero, the frame position is used to calculate an exact
3104 * -1 | snap to bars (meter-based)
3105 * 0 | no snap - use audio frame for musical position
3106 * 1 | snap to meter-based (BBT) beat
3107 * >1 | snap to quarter-note subdivision (i.e. 4 will snap to sixteenth notes)
3109 * this follows the snap convention in the gui.
3110 * if sub_num is zero, the musical position will be taken from the supplied frame.
3113 TempoMap::gui_move_tempo (TempoSection* ts, const framepos_t& frame, const int& sub_num)
3117 if (ts->position_lock_style() == MusicTime) {
3119 /* if we're snapping to a musical grid, set the pulse exactly instead of via the supplied frame. */
3120 Glib::Threads::RWLock::WriterLock lm (lock);
3121 TempoSection* tempo_copy = copy_metrics_and_point (_metrics, future_map, ts);
3123 tempo_copy->set_position_lock_style (AudioTime);
3125 if (solve_map_minute (future_map, tempo_copy, minute_at_frame (frame))) {
3126 const double beat = exact_beat_at_frame_locked (future_map, frame, sub_num);
3127 const double pulse = pulse_at_beat_locked (future_map, beat);
3129 if (solve_map_pulse (future_map, tempo_copy, pulse)) {
3130 solve_map_pulse (_metrics, ts, pulse);
3131 recompute_meters (_metrics);
3139 Glib::Threads::RWLock::WriterLock lm (lock);
3140 TempoSection* tempo_copy = copy_metrics_and_point (_metrics, future_map, ts);
3142 if (solve_map_minute (future_map, tempo_copy, minute_at_frame (frame))) {
3144 /* We're moving the object that defines the grid while snapping to it...
3145 * Placing the ts at the beat corresponding to the requested frame may shift the
3146 * grid in such a way that the mouse is left hovering over a completerly different division,
3147 * causing jittering when the mouse next moves (esp. large tempo deltas).
3148 * To avoid this, place the ts at the requested frame in a dummy map
3149 * then find the closest beat subdivision to that frame in the dummy.
3150 * This alters the snap behaviour slightly in that we snap to beat divisions
3151 * in the future map rather than the existing one.
3153 const double beat = exact_beat_at_frame_locked (future_map, frame, sub_num);
3154 const double pulse = pulse_at_beat_locked (future_map, beat);
3156 if (solve_map_pulse (future_map, tempo_copy, pulse)) {
3157 /* snapping to a grid. force MusicTime temporarily. */
3158 ts->set_position_lock_style (MusicTime);
3159 solve_map_pulse (_metrics, ts, pulse);
3160 ts->set_position_lock_style (AudioTime);
3162 recompute_meters (_metrics);
3165 solve_map_minute (_metrics, ts, minute_at_frame (frame));
3166 recompute_meters (_metrics);
3172 Metrics::const_iterator d = future_map.begin();
3173 while (d != future_map.end()) {
3178 MetricPositionChanged (); // Emit Signal
3181 /** moves a MeterSection to a specified position.
3182 * @param ms - the section to be moved
3183 * @param frame - the new position in frames for the meter
3185 * as a meter cannot snap to anything but bars,
3186 * the supplied frame is rounded to the nearest bar, possibly
3187 * leaving the meter position unchanged.
3190 TempoMap::gui_move_meter (MeterSection* ms, const framepos_t& frame)
3194 if (ms->position_lock_style() == AudioTime) {
3197 Glib::Threads::RWLock::WriterLock lm (lock);
3198 MeterSection* copy = copy_metrics_and_point (_metrics, future_map, ms);
3200 if (solve_map_minute (future_map, copy, minute_at_frame (frame))) {
3201 solve_map_minute (_metrics, ms, minute_at_frame (frame));
3202 recompute_tempi (_metrics);
3207 Glib::Threads::RWLock::WriterLock lm (lock);
3208 MeterSection* copy = copy_metrics_and_point (_metrics, future_map, ms);
3210 const double beat = beat_at_minute_locked (_metrics, minute_at_frame (frame));
3211 const Timecode::BBT_Time bbt = bbt_at_beat_locked (_metrics, beat);
3213 if (solve_map_bbt (future_map, copy, bbt)) {
3214 solve_map_bbt (_metrics, ms, bbt);
3215 recompute_tempi (_metrics);
3220 Metrics::const_iterator d = future_map.begin();
3221 while (d != future_map.end()) {
3226 MetricPositionChanged (); // Emit Signal
3230 TempoMap::gui_change_tempo (TempoSection* ts, const Tempo& bpm)
3233 bool can_solve = false;
3235 Glib::Threads::RWLock::WriterLock lm (lock);
3236 TempoSection* tempo_copy = copy_metrics_and_point (_metrics, future_map, ts);
3237 tempo_copy->set_note_types_per_minute (bpm.note_types_per_minute());
3238 recompute_tempi (future_map);
3240 if (check_solved (future_map)) {
3241 ts->set_note_types_per_minute (bpm.note_types_per_minute());
3242 recompute_map (_metrics);
3247 Metrics::const_iterator d = future_map.begin();
3248 while (d != future_map.end()) {
3253 MetricPositionChanged (); // Emit Signal
3259 TempoMap::gui_dilate_tempo (TempoSection* ts, const framepos_t& frame, const framepos_t& end_frame)
3262 Ts (future prev_t) Tnext
3265 |----------|----------
3272 Glib::Threads::RWLock::WriterLock lm (lock);
3278 TempoSection* prev_t = copy_metrics_and_point (_metrics, future_map, ts);
3279 TempoSection* prev_to_prev_t = 0;
3280 const frameoffset_t fr_off = end_frame - frame;
3284 if (prev_t->pulse() > 0.0) {
3285 prev_to_prev_t = const_cast<TempoSection*>(&tempo_section_at_minute_locked (future_map, minute_at_frame (prev_t->frame() - 1)));
3288 TempoSection* next_t = 0;
3289 for (Metrics::iterator i = future_map.begin(); i != future_map.end(); ++i) {
3290 TempoSection* t = 0;
3291 if ((*i)->is_tempo()) {
3292 t = static_cast<TempoSection*> (*i);
3293 if (t->frame() > ts->frame()) {
3299 /* minimum allowed measurement distance in frames */
3300 const framepos_t min_dframe = 2;
3302 /* the change in frames is the result of changing the slope of at most 2 previous tempo sections.
3303 constant to constant is straightforward, as the tempo prev to prev_t has constant slope.
3305 double contribution = 0.0;
3307 if (next_t && prev_to_prev_t && prev_to_prev_t->type() == TempoSection::Ramp) {
3308 contribution = (prev_t->frame() - prev_to_prev_t->frame()) / (double) (next_t->frame() - prev_to_prev_t->frame());
3311 const frameoffset_t prev_t_frame_contribution = fr_off - (contribution * (double) fr_off);
3313 const double start_pulse = prev_t->pulse_at_minute (minute_at_frame (frame));
3314 const double end_pulse = prev_t->pulse_at_minute (minute_at_frame (end_frame));
3318 if (prev_t->type() == TempoSection::Constant || prev_t->c_func() == 0.0) {
3320 if (prev_t->position_lock_style() == MusicTime) {
3321 if (prev_to_prev_t && prev_to_prev_t->type() == TempoSection::Ramp) {
3322 if (frame > prev_to_prev_t->frame() + min_dframe && (frame + prev_t_frame_contribution) > prev_to_prev_t->frame() + min_dframe) {
3324 new_bpm = prev_t->note_types_per_minute() * ((frame - prev_to_prev_t->frame())
3325 / (double) ((frame + prev_t_frame_contribution) - prev_to_prev_t->frame()));
3327 new_bpm = prev_t->note_types_per_minute();
3330 /* prev to prev is irrelevant */
3332 if (start_pulse > prev_t->pulse() && end_pulse > prev_t->pulse()) {
3333 new_bpm = prev_t->note_types_per_minute() * ((start_pulse - prev_t->pulse()) / (end_pulse - prev_t->pulse()));
3335 new_bpm = prev_t->note_types_per_minute();
3340 if (prev_to_prev_t && prev_to_prev_t->type() == TempoSection::Ramp) {
3341 if (frame > prev_to_prev_t->frame() + min_dframe && end_frame > prev_to_prev_t->frame() + min_dframe) {
3343 new_bpm = prev_t->note_types_per_minute() * ((frame - prev_to_prev_t->frame())
3344 / (double) ((end_frame) - prev_to_prev_t->frame()));
3346 new_bpm = prev_t->note_types_per_minute();
3349 /* prev_to_prev_t is irrelevant */
3351 if (frame > prev_t->frame() + min_dframe && end_frame > prev_t->frame() + min_dframe) {
3352 new_bpm = prev_t->note_types_per_minute() * ((frame - prev_t->frame()) / (double) (end_frame - prev_t->frame()));
3354 new_bpm = prev_t->note_types_per_minute();
3360 double frame_ratio = 1.0;
3361 double pulse_ratio = 1.0;
3362 const double pulse_pos = frame;
3364 if (prev_to_prev_t) {
3365 if (pulse_pos > prev_to_prev_t->frame() + min_dframe && (pulse_pos - fr_off) > prev_to_prev_t->frame() + min_dframe) {
3366 frame_ratio = (((pulse_pos - fr_off) - prev_to_prev_t->frame()) / (double) ((pulse_pos) - prev_to_prev_t->frame()));
3368 if (end_pulse > prev_to_prev_t->pulse() && start_pulse > prev_to_prev_t->pulse()) {
3369 pulse_ratio = ((start_pulse - prev_to_prev_t->pulse()) / (end_pulse - prev_to_prev_t->pulse()));
3372 if (pulse_pos > prev_t->frame() + min_dframe && (pulse_pos - fr_off) > prev_t->frame() + min_dframe) {
3373 frame_ratio = (((pulse_pos - fr_off) - prev_t->frame()) / (double) ((pulse_pos) - prev_t->frame()));
3375 pulse_ratio = (start_pulse / end_pulse);
3377 new_bpm = prev_t->note_types_per_minute() * (pulse_ratio * frame_ratio);
3380 /* don't clamp and proceed here.
3381 testing has revealed that this can go negative,
3382 which is an entirely different thing to just being too low.
3384 if (new_bpm < 0.5) {
3387 new_bpm = min (new_bpm, (double) 1000.0);
3388 prev_t->set_note_types_per_minute (new_bpm);
3389 recompute_tempi (future_map);
3390 recompute_meters (future_map);
3392 if (check_solved (future_map)) {
3393 ts->set_note_types_per_minute (new_bpm);
3394 recompute_tempi (_metrics);
3395 recompute_meters (_metrics);
3399 Metrics::const_iterator d = future_map.begin();
3400 while (d != future_map.end()) {
3405 MetricPositionChanged (); // Emit Signal
3408 /** Returns the exact bbt-based beat corresponding to the bar, beat or quarter note subdivision nearest to
3409 * the supplied frame, possibly returning a negative value.
3411 * @param frame The session frame position.
3412 * @param sub_num The subdivision to use when rounding the beat.
3413 * A value of -1 indicates rounding to BBT bar. 1 indicates rounding to BBT beats.
3414 * Positive integers indicate quarter note (non BBT) divisions.
3415 * 0 indicates that the returned beat should not be rounded (equivalent to quarter_note_at_frame()).
3416 * @return The beat position of the supplied frame.
3418 * when working to a musical grid, the use of sub_nom indicates that
3419 * the position should be interpreted musically.
3421 * it effectively snaps to meter bars, meter beats or quarter note divisions
3422 * (as per current gui convention) and returns a musical position independent of frame rate.
3424 * If the supplied frame lies before the first meter, the return will be negative,
3425 * in which case the returned beat uses the first meter (for BBT subdivisions) and
3426 * the continuation of the tempo curve (backwards).
3428 * This function is sensitive to tempo and meter.
3431 TempoMap::exact_beat_at_frame (const framepos_t& frame, const int32_t sub_num) const
3433 Glib::Threads::RWLock::ReaderLock lm (lock);
3435 return exact_beat_at_frame_locked (_metrics, frame, sub_num);
3439 TempoMap::exact_beat_at_frame_locked (const Metrics& metrics, const framepos_t& frame, const int32_t divisions) const
3441 return beat_at_pulse_locked (_metrics, exact_qn_at_frame_locked (metrics, frame, divisions) / 4.0);
3444 /** Returns the exact quarter note corresponding to the bar, beat or quarter note subdivision nearest to
3445 * the supplied frame, possibly returning a negative value.
3447 * @param frame The session frame position.
3448 * @param sub_num The subdivision to use when rounding the quarter note.
3449 * A value of -1 indicates rounding to BBT bar. 1 indicates rounding to BBT beats.
3450 * Positive integers indicate quarter note (non BBT) divisions.
3451 * 0 indicates that the returned quarter note should not be rounded (equivalent to quarter_note_at_frame()).
3452 * @return The quarter note position of the supplied frame.
3454 * When working to a musical grid, the use of sub_nom indicates that
3455 * the frame position should be interpreted musically.
3457 * it effectively snaps to meter bars, meter beats or quarter note divisions
3458 * (as per current gui convention) and returns a musical position independent of frame rate.
3460 * If the supplied frame lies before the first meter, the return will be negative,
3461 * in which case the returned quarter note uses the first meter (for BBT subdivisions) and
3462 * the continuation of the tempo curve (backwards).
3464 * This function is tempo-sensitive.
3467 TempoMap::exact_qn_at_frame (const framepos_t& frame, const int32_t sub_num) const
3469 Glib::Threads::RWLock::ReaderLock lm (lock);
3471 return exact_qn_at_frame_locked (_metrics, frame, sub_num);
3475 TempoMap::exact_qn_at_frame_locked (const Metrics& metrics, const framepos_t& frame, const int32_t sub_num) const
3477 double qn = quarter_note_at_minute_locked (metrics, minute_at_frame (frame));
3480 qn = floor (qn) + (floor (((qn - floor (qn)) * (double) sub_num) + 0.5) / sub_num);
3481 } else if (sub_num == 1) {
3482 /* the gui requested exact musical (BBT) beat */
3483 qn = quarter_note_at_beat_locked (metrics, floor (beat_at_minute_locked (metrics, minute_at_frame (frame)) + 0.5));
3484 } else if (sub_num == -1) {
3486 Timecode::BBT_Time bbt = bbt_at_pulse_locked (metrics, qn / 4.0);
3490 const double prev_b = pulse_at_bbt_locked (metrics, bbt) * 4.0;
3492 const double next_b = pulse_at_bbt_locked (metrics, bbt) * 4.0;
3494 if ((qn - prev_b) > (next_b - prev_b) / 2.0) {
3504 /** returns the frame duration of the supplied BBT time at a specified frame position in the tempo map.
3505 * @param pos the frame position in the tempo map.
3506 * @param bbt the distance in BBT time from pos to calculate.
3507 * @param dir the rounding direction..
3508 * @return the duration in frames between pos and bbt
3511 TempoMap::bbt_duration_at (framepos_t pos, const BBT_Time& bbt, int dir)
3513 Glib::Threads::RWLock::ReaderLock lm (lock);
3515 BBT_Time pos_bbt = bbt_at_minute_locked (_metrics, minute_at_frame (pos));
3517 const double divisions = meter_section_at_minute_locked (_metrics, minute_at_frame (pos)).divisions_per_bar();
3520 pos_bbt.bars += bbt.bars;
3522 pos_bbt.ticks += bbt.ticks;
3523 if ((double) pos_bbt.ticks > BBT_Time::ticks_per_beat) {
3525 pos_bbt.ticks -= BBT_Time::ticks_per_beat;
3528 pos_bbt.beats += bbt.beats;
3529 if ((double) pos_bbt.beats > divisions) {
3531 pos_bbt.beats -= divisions;
3533 const framecnt_t pos_bbt_frame = frame_at_minute (minute_at_bbt_locked (_metrics, pos_bbt));
3535 return pos_bbt_frame - pos;
3539 if (pos_bbt.bars <= bbt.bars) {
3542 pos_bbt.bars -= bbt.bars;
3545 if (pos_bbt.ticks < bbt.ticks) {
3546 if (pos_bbt.bars > 1) {
3547 if (pos_bbt.beats == 1) {
3549 pos_bbt.beats = divisions;
3553 pos_bbt.ticks = BBT_Time::ticks_per_beat - (bbt.ticks - pos_bbt.ticks);
3559 pos_bbt.ticks -= bbt.ticks;
3562 if (pos_bbt.beats <= bbt.beats) {
3563 if (pos_bbt.bars > 1) {
3565 pos_bbt.beats = divisions - (bbt.beats - pos_bbt.beats);
3570 pos_bbt.beats -= bbt.beats;
3573 return pos - frame_at_minute (minute_at_bbt_locked (_metrics, pos_bbt));
3580 TempoMap::round_to_bar (framepos_t fr, RoundMode dir)
3582 return round_to_type (fr, dir, Bar);
3586 TempoMap::round_to_beat (framepos_t fr, RoundMode dir)
3588 return round_to_type (fr, dir, Beat);
3592 TempoMap::round_to_beat_subdivision (framepos_t fr, int sub_num, RoundMode dir)
3594 Glib::Threads::RWLock::ReaderLock lm (lock);
3595 uint32_t ticks = (uint32_t) floor (max (0.0, beat_at_minute_locked (_metrics, minute_at_frame (fr))) * BBT_Time::ticks_per_beat);
3596 uint32_t beats = (uint32_t) floor (ticks / BBT_Time::ticks_per_beat);
3597 uint32_t ticks_one_subdivisions_worth = (uint32_t) BBT_Time::ticks_per_beat / sub_num;
3599 ticks -= beats * BBT_Time::ticks_per_beat;
3602 /* round to next (or same iff dir == RoundUpMaybe) */
3604 uint32_t mod = ticks % ticks_one_subdivisions_worth;
3606 if (mod == 0 && dir == RoundUpMaybe) {
3607 /* right on the subdivision, which is fine, so do nothing */
3609 } else if (mod == 0) {
3610 /* right on the subdivision, so the difference is just the subdivision ticks */
3611 ticks += ticks_one_subdivisions_worth;
3614 /* not on subdivision, compute distance to next subdivision */
3616 ticks += ticks_one_subdivisions_worth - mod;
3619 if (ticks >= BBT_Time::ticks_per_beat) {
3620 ticks -= BBT_Time::ticks_per_beat;
3622 } else if (dir < 0) {
3624 /* round to previous (or same iff dir == RoundDownMaybe) */
3626 uint32_t difference = ticks % ticks_one_subdivisions_worth;
3628 if (difference == 0 && dir == RoundDownAlways) {
3629 /* right on the subdivision, but force-rounding down,
3630 so the difference is just the subdivision ticks */
3631 difference = ticks_one_subdivisions_worth;
3634 if (ticks < difference) {
3635 ticks = BBT_Time::ticks_per_beat - ticks;
3637 ticks -= difference;
3641 /* round to nearest */
3644 /* compute the distance to the previous and next subdivision */
3646 if ((rem = fmod ((double) ticks, (double) ticks_one_subdivisions_worth)) > ticks_one_subdivisions_worth/2.0) {
3648 /* closer to the next subdivision, so shift forward */
3650 ticks = lrint (ticks + (ticks_one_subdivisions_worth - rem));
3652 DEBUG_TRACE (DEBUG::SnapBBT, string_compose ("moved forward to %1\n", ticks));
3654 if (ticks > BBT_Time::ticks_per_beat) {
3656 ticks -= BBT_Time::ticks_per_beat;
3657 DEBUG_TRACE (DEBUG::SnapBBT, string_compose ("fold beat to %1\n", beats));
3660 } else if (rem > 0) {
3662 /* closer to previous subdivision, so shift backward */
3666 /* can't go backwards past zero, so ... */
3669 /* step back to previous beat */
3671 ticks = lrint (BBT_Time::ticks_per_beat - rem);
3672 DEBUG_TRACE (DEBUG::SnapBBT, string_compose ("step back beat to %1\n", beats));
3674 ticks = lrint (ticks - rem);
3675 DEBUG_TRACE (DEBUG::SnapBBT, string_compose ("moved backward to %1\n", ticks));
3678 /* on the subdivision, do nothing */
3682 const framepos_t ret_frame = frame_at_minute (minute_at_beat_locked (_metrics, beats + (ticks / BBT_Time::ticks_per_beat)));
3688 TempoMap::round_to_quarter_note_subdivision (framepos_t fr, int sub_num, RoundMode dir)
3690 Glib::Threads::RWLock::ReaderLock lm (lock);
3691 uint32_t ticks = (uint32_t) floor (max (0.0, quarter_note_at_minute_locked (_metrics, minute_at_frame (fr))) * BBT_Time::ticks_per_beat);
3692 uint32_t beats = (uint32_t) floor (ticks / BBT_Time::ticks_per_beat);
3693 uint32_t ticks_one_subdivisions_worth = (uint32_t) BBT_Time::ticks_per_beat / sub_num;
3695 ticks -= beats * BBT_Time::ticks_per_beat;
3698 /* round to next (or same iff dir == RoundUpMaybe) */
3700 uint32_t mod = ticks % ticks_one_subdivisions_worth;
3702 if (mod == 0 && dir == RoundUpMaybe) {
3703 /* right on the subdivision, which is fine, so do nothing */
3705 } else if (mod == 0) {
3706 /* right on the subdivision, so the difference is just the subdivision ticks */
3707 ticks += ticks_one_subdivisions_worth;
3710 /* not on subdivision, compute distance to next subdivision */
3712 ticks += ticks_one_subdivisions_worth - mod;
3715 if (ticks >= BBT_Time::ticks_per_beat) {
3716 ticks -= BBT_Time::ticks_per_beat;
3718 } else if (dir < 0) {
3720 /* round to previous (or same iff dir == RoundDownMaybe) */
3722 uint32_t difference = ticks % ticks_one_subdivisions_worth;
3724 if (difference == 0 && dir == RoundDownAlways) {
3725 /* right on the subdivision, but force-rounding down,
3726 so the difference is just the subdivision ticks */
3727 difference = ticks_one_subdivisions_worth;
3730 if (ticks < difference) {
3731 ticks = BBT_Time::ticks_per_beat - ticks;
3733 ticks -= difference;
3737 /* round to nearest */
3740 /* compute the distance to the previous and next subdivision */
3742 if ((rem = fmod ((double) ticks, (double) ticks_one_subdivisions_worth)) > ticks_one_subdivisions_worth/2.0) {
3744 /* closer to the next subdivision, so shift forward */
3746 ticks = lrint (ticks + (ticks_one_subdivisions_worth - rem));
3748 DEBUG_TRACE (DEBUG::SnapBBT, string_compose ("moved forward to %1\n", ticks));
3750 if (ticks > BBT_Time::ticks_per_beat) {
3752 ticks -= BBT_Time::ticks_per_beat;
3753 DEBUG_TRACE (DEBUG::SnapBBT, string_compose ("fold beat to %1\n", beats));
3756 } else if (rem > 0) {
3758 /* closer to previous subdivision, so shift backward */
3762 /* can't go backwards past zero, so ... */
3765 /* step back to previous beat */
3767 ticks = lrint (BBT_Time::ticks_per_beat - rem);
3768 DEBUG_TRACE (DEBUG::SnapBBT, string_compose ("step back beat to %1\n", beats));
3770 ticks = lrint (ticks - rem);
3771 DEBUG_TRACE (DEBUG::SnapBBT, string_compose ("moved backward to %1\n", ticks));
3774 /* on the subdivision, do nothing */
3778 const framepos_t ret_frame = frame_at_minute (minute_at_quarter_note_locked (_metrics, beats + (ticks / BBT_Time::ticks_per_beat)));
3784 TempoMap::round_to_type (framepos_t frame, RoundMode dir, BBTPointType type)
3786 Glib::Threads::RWLock::ReaderLock lm (lock);
3788 const double beat_at_framepos = max (0.0, beat_at_minute_locked (_metrics, minute_at_frame (frame)));
3789 BBT_Time bbt (bbt_at_beat_locked (_metrics, beat_at_framepos));
3794 /* find bar previous to 'frame' */
3797 return frame_at_minute (minute_at_bbt_locked (_metrics, bbt));
3799 } else if (dir > 0) {
3800 /* find bar following 'frame' */
3804 return frame_at_minute (minute_at_bbt_locked (_metrics, bbt));
3806 /* true rounding: find nearest bar */
3807 framepos_t raw_ft = frame_at_minute (minute_at_bbt_locked (_metrics, bbt));
3810 framepos_t prev_ft = frame_at_minute (minute_at_bbt_locked (_metrics, bbt));
3812 framepos_t next_ft = frame_at_minute (minute_at_bbt_locked (_metrics, bbt));
3814 if ((raw_ft - prev_ft) > (next_ft - prev_ft) / 2) {
3825 return frame_at_minute (minute_at_beat_locked (_metrics, floor (beat_at_framepos)));
3826 } else if (dir > 0) {
3827 return frame_at_minute (minute_at_beat_locked (_metrics, ceil (beat_at_framepos)));
3829 return frame_at_minute (minute_at_beat_locked (_metrics, floor (beat_at_framepos + 0.5)));
3838 TempoMap::get_grid (vector<TempoMap::BBTPoint>& points,
3839 framepos_t lower, framepos_t upper, uint32_t bar_mod)
3841 Glib::Threads::RWLock::ReaderLock lm (lock);
3842 int32_t cnt = ceil (beat_at_minute_locked (_metrics, minute_at_frame (lower)));
3844 /* although the map handles negative beats, bbt doesn't. */
3849 if (minute_at_beat_locked (_metrics, cnt) >= minute_at_frame (upper)) {
3853 while (pos >= 0 && pos < upper) {
3854 pos = frame_at_minute (minute_at_beat_locked (_metrics, cnt));
3855 const TempoSection tempo = tempo_section_at_minute_locked (_metrics, minute_at_frame (pos));
3856 const MeterSection meter = meter_section_at_minute_locked (_metrics, minute_at_frame (pos));
3857 const BBT_Time bbt = bbt_at_beat_locked (_metrics, cnt);
3858 points.push_back (BBTPoint (meter, tempo_at_minute_locked (_metrics, minute_at_frame (pos)), pos, bbt.bars, bbt.beats, tempo.c_func()));
3862 BBT_Time bbt = bbt_at_minute_locked (_metrics, minute_at_frame (lower));
3867 bbt.bars -= bbt.bars % bar_mod;
3871 while (pos >= 0 && pos < upper) {
3872 pos = frame_at_minute (minute_at_bbt_locked (_metrics, bbt));
3873 const TempoSection tempo = tempo_section_at_minute_locked (_metrics, minute_at_frame (pos));
3874 const MeterSection meter = meter_section_at_minute_locked (_metrics, minute_at_frame (pos));
3875 points.push_back (BBTPoint (meter, tempo_at_minute_locked (_metrics, minute_at_frame (pos)), pos, bbt.bars, bbt.beats, tempo.c_func()));
3876 bbt.bars += bar_mod;
3882 TempoMap::tempo_section_at_frame (framepos_t frame) const
3884 Glib::Threads::RWLock::ReaderLock lm (lock);
3886 return tempo_section_at_minute_locked (_metrics, minute_at_frame (frame));
3890 TempoMap::tempo_section_at_minute_locked (const Metrics& metrics, double minute) const
3892 TempoSection* prev = 0;
3896 for (Metrics::const_iterator i = metrics.begin(); i != metrics.end(); ++i) {
3898 if ((*i)->is_tempo()) {
3899 t = static_cast<TempoSection*> (*i);
3903 if (prev && t->minute() > minute) {
3913 abort(); /*NOTREACHED*/
3920 TempoMap::tempo_section_at_beat_locked (const Metrics& metrics, const double& beat) const
3922 TempoSection* prev_t = 0;
3923 const MeterSection* prev_m = &meter_section_at_beat_locked (metrics, beat);
3927 for (Metrics::const_iterator i = metrics.begin(); i != metrics.end(); ++i) {
3928 if ((*i)->is_tempo()) {
3929 t = static_cast<TempoSection*> (*i);
3930 if (prev_t && ((t->pulse() - prev_m->pulse()) * prev_m->note_divisor()) + prev_m->beat() > beat) {
3940 /* don't use this to calculate length (the tempo is only correct for this frame).
3941 do that stuff based on the beat_at_frame and frame_at_beat api
3944 TempoMap::frames_per_quarter_note_at (const framepos_t& frame, const framecnt_t& sr) const
3946 Glib::Threads::RWLock::ReaderLock lm (lock);
3948 const TempoSection* ts_at = 0;
3949 const TempoSection* ts_after = 0;
3950 Metrics::const_iterator i;
3953 for (i = _metrics.begin(); i != _metrics.end(); ++i) {
3955 if ((*i)->is_tempo()) {
3956 t = static_cast<TempoSection*> (*i);
3960 if (ts_at && (*i)->frame() > frame) {
3970 return (60.0 * _frame_rate) / ts_at->tempo_at_minute (minute_at_frame (frame)).quarter_notes_per_minute();
3972 /* must be treated as constant tempo */
3973 return ts_at->frames_per_quarter_note (_frame_rate);
3977 TempoMap::meter_section_at_frame (framepos_t frame) const
3979 Glib::Threads::RWLock::ReaderLock lm (lock);
3980 return meter_section_at_minute_locked (_metrics, minute_at_frame (frame));
3984 TempoMap::meter_section_at_minute_locked (const Metrics& metrics, double minute) const
3986 Metrics::const_iterator i;
3987 MeterSection* prev = 0;
3991 for (i = metrics.begin(); i != metrics.end(); ++i) {
3993 if (!(*i)->is_tempo()) {
3994 m = static_cast<MeterSection*> (*i);
3996 if (prev && (*i)->minute() > minute) {
4006 abort(); /*NOTREACHED*/
4013 TempoMap::meter_section_at_beat_locked (const Metrics& metrics, const double& beat) const
4015 MeterSection* prev_m = 0;
4017 for (Metrics::const_iterator i = metrics.begin(); i != metrics.end(); ++i) {
4019 if (!(*i)->is_tempo()) {
4020 m = static_cast<MeterSection*> (*i);
4021 if (prev_m && m->beat() > beat) {
4032 TempoMap::meter_section_at_beat (double beat) const
4034 Glib::Threads::RWLock::ReaderLock lm (lock);
4035 return meter_section_at_beat_locked (_metrics, beat);
4039 TempoMap::meter_at_frame (framepos_t frame) const
4041 TempoMetric m (metric_at (frame));
4046 TempoMap::fix_legacy_session ()
4048 MeterSection* prev_m = 0;
4049 TempoSection* prev_t = 0;
4051 for (Metrics::iterator i = _metrics.begin(); i != _metrics.end(); ++i) {
4055 if ((m = dynamic_cast<MeterSection*>(*i)) != 0) {
4057 pair<double, BBT_Time> bbt = make_pair (0.0, BBT_Time (1, 1, 0));
4060 m->set_minute (0.0);
4061 m->set_position_lock_style (AudioTime);
4066 pair<double, BBT_Time> start = make_pair (((m->bbt().bars - 1) * prev_m->note_divisor())
4067 + (m->bbt().beats - 1)
4068 + (m->bbt().ticks / BBT_Time::ticks_per_beat)
4070 m->set_beat (start);
4071 const double start_beat = ((m->bbt().bars - 1) * prev_m->note_divisor())
4072 + (m->bbt().beats - 1)
4073 + (m->bbt().ticks / BBT_Time::ticks_per_beat);
4074 m->set_pulse (start_beat / prev_m->note_divisor());
4077 } else if ((t = dynamic_cast<TempoSection*>(*i)) != 0) {
4085 t->set_minute (0.0);
4086 t->set_position_lock_style (AudioTime);
4092 const double beat = ((t->legacy_bbt().bars - 1) * ((prev_m) ? prev_m->note_divisor() : 4.0))
4093 + (t->legacy_bbt().beats - 1)
4094 + (t->legacy_bbt().ticks / BBT_Time::ticks_per_beat);
4096 t->set_pulse (beat / prev_m->note_divisor());
4098 /* really shouldn't happen but.. */
4099 t->set_pulse (beat / 4.0);
4108 TempoMap::get_state ()
4110 Metrics::const_iterator i;
4111 XMLNode *root = new XMLNode ("TempoMap");
4114 Glib::Threads::RWLock::ReaderLock lm (lock);
4115 for (i = _metrics.begin(); i != _metrics.end(); ++i) {
4116 root->add_child_nocopy ((*i)->get_state());
4124 TempoMap::set_state (const XMLNode& node, int /*version*/)
4127 Glib::Threads::RWLock::WriterLock lm (lock);
4130 XMLNodeConstIterator niter;
4131 Metrics old_metrics (_metrics);
4134 nlist = node.children();
4136 for (niter = nlist.begin(); niter != nlist.end(); ++niter) {
4137 XMLNode* child = *niter;
4139 if (child->name() == TempoSection::xml_state_node_name) {
4142 TempoSection* ts = new TempoSection (*child, _frame_rate);
4143 _metrics.push_back (ts);
4146 catch (failed_constructor& err){
4147 error << _("Tempo map: could not set new state, restoring old one.") << endmsg;
4148 _metrics = old_metrics;
4149 old_metrics.clear();
4153 } else if (child->name() == MeterSection::xml_state_node_name) {
4156 MeterSection* ms = new MeterSection (*child, _frame_rate);
4157 _metrics.push_back (ms);
4160 catch (failed_constructor& err) {
4161 error << _("Tempo map: could not set new state, restoring old one.") << endmsg;
4162 _metrics = old_metrics;
4163 old_metrics.clear();
4169 if (niter == nlist.end()) {
4170 MetricSectionSorter cmp;
4171 _metrics.sort (cmp);
4174 /* check for legacy sessions where bbt was the base musical unit for tempo */
4175 for (Metrics::const_iterator i = _metrics.begin(); i != _metrics.end(); ++i) {
4177 if ((t = dynamic_cast<TempoSection*> (*i)) != 0) {
4178 if (t->legacy_bbt().bars != 0) {
4179 fix_legacy_session();
4186 /* check for multiple tempo/meters at the same location, which
4187 ardour2 somehow allowed.
4190 Metrics::iterator prev = _metrics.end();
4191 for (Metrics::iterator i = _metrics.begin(); i != _metrics.end(); ++i) {
4192 if (prev != _metrics.end()) {
4194 MeterSection* prev_m;
4196 TempoSection* prev_t;
4197 if ((prev_m = dynamic_cast<MeterSection*>(*prev)) != 0 && (ms = dynamic_cast<MeterSection*>(*i)) != 0) {
4198 if (prev_m->pulse() == ms->pulse()) {
4199 cerr << string_compose (_("Multiple meter definitions found at %1"), prev_m->pulse()) << endmsg;
4200 error << string_compose (_("Multiple meter definitions found at %1"), prev_m->pulse()) << endmsg;
4203 } else if ((prev_t = dynamic_cast<TempoSection*>(*prev)) != 0 && (ts = dynamic_cast<TempoSection*>(*i)) != 0) {
4204 if (prev_t->pulse() == ts->pulse()) {
4205 cerr << string_compose (_("Multiple tempo definitions found at %1"), prev_t->pulse()) << endmsg;
4206 error << string_compose (_("Multiple tempo definitions found at %1"), prev_t->pulse()) << endmsg;
4214 recompute_map (_metrics);
4216 Metrics::const_iterator d = old_metrics.begin();
4217 while (d != old_metrics.end()) {
4221 old_metrics.clear ();
4224 PropertyChanged (PropertyChange ());
4230 TempoMap::dump (const Metrics& metrics, std::ostream& o) const
4232 Glib::Threads::RWLock::ReaderLock lm (lock, Glib::Threads::TRY_LOCK);
4233 const MeterSection* m;
4234 const TempoSection* t;
4235 const TempoSection* prev_t = 0;
4237 for (Metrics::const_iterator i = metrics.begin(); i != metrics.end(); ++i) {
4239 if ((t = dynamic_cast<const TempoSection*>(*i)) != 0) {
4240 o << "Tempo @ " << *i << t->note_types_per_minute() << " BPM (pulse = 1/" << t->note_type()
4241 << " type= " << enum_2_string (t->type()) << ") " << " at pulse= " << t->pulse()
4242 << " minute= " << t->minute() << " frame= " << t->frame() << " (initial? " << t->initial() << ')'
4243 << " pos lock: " << enum_2_string (t->position_lock_style()) << std::endl;
4245 o << " current : " << t->note_types_per_minute()
4246 << " | " << t->pulse() << " | " << t->frame() << " | " << t->minute() << std::endl;
4247 o << " previous : " << prev_t->note_types_per_minute()
4248 << " | " << prev_t->pulse() << " | " << prev_t->frame() << " | " << prev_t->minute() << std::endl;
4249 o << " calculated : " << prev_t->tempo_at_pulse (t->pulse())
4250 << " | " << prev_t->pulse_at_ntpm (t->note_types_per_minute(), t->minute())
4251 << " | " << frame_at_minute (prev_t->minute_at_ntpm (t->note_types_per_minute(), t->pulse()))
4252 << " | " << prev_t->minute_at_ntpm (t->note_types_per_minute(), t->pulse()) << std::endl;
4255 } else if ((m = dynamic_cast<const MeterSection*>(*i)) != 0) {
4256 o << "Meter @ " << *i << ' ' << m->divisions_per_bar() << '/' << m->note_divisor() << " at " << m->bbt()
4257 << " frame= " << m->frame() << " pulse: " << m->pulse() << " beat : " << m->beat()
4258 << " pos lock: " << enum_2_string (m->position_lock_style()) << " (initial? " << m->initial() << ')' << endl;
4261 o << "------" << std::endl;
4265 TempoMap::n_tempos() const
4267 Glib::Threads::RWLock::ReaderLock lm (lock);
4270 for (Metrics::const_iterator i = _metrics.begin(); i != _metrics.end(); ++i) {
4271 if ((*i)->is_tempo()) {
4280 TempoMap::n_meters() const
4282 Glib::Threads::RWLock::ReaderLock lm (lock);
4285 for (Metrics::const_iterator i = _metrics.begin(); i != _metrics.end(); ++i) {
4286 if (!(*i)->is_tempo()) {
4295 TempoMap::insert_time (framepos_t where, framecnt_t amount)
4297 for (Metrics::reverse_iterator i = _metrics.rbegin(); i != _metrics.rend(); ++i) {
4298 if ((*i)->frame() >= where && !(*i)->initial ()) {
4302 if ((ms = dynamic_cast <MeterSection*>(*i)) != 0) {
4303 gui_move_meter (ms, (*i)->frame() + amount);
4306 if ((ts = dynamic_cast <TempoSection*>(*i)) != 0) {
4307 gui_move_tempo (ts, (*i)->frame() + amount, 0);
4312 PropertyChanged (PropertyChange ());
4316 TempoMap::remove_time (framepos_t where, framecnt_t amount)
4320 std::list<MetricSection*> metric_kill_list;
4322 TempoSection* last_tempo = NULL;
4323 MeterSection* last_meter = NULL;
4324 bool tempo_after = false; // is there a tempo marker at the first sample after the removed range?
4325 bool meter_after = false; // is there a meter marker likewise?
4327 Glib::Threads::RWLock::WriterLock lm (lock);
4328 for (Metrics::iterator i = _metrics.begin(); i != _metrics.end(); ++i) {
4329 if ((*i)->frame() >= where && (*i)->frame() < where+amount) {
4330 metric_kill_list.push_back(*i);
4331 TempoSection *lt = dynamic_cast<TempoSection*> (*i);
4334 MeterSection *lm = dynamic_cast<MeterSection*> (*i);
4338 else if ((*i)->frame() >= where) {
4339 // TODO: make sure that moved tempo/meter markers are rounded to beat/bar boundaries
4340 (*i)->set_minute ((*i)->minute() - minute_at_frame (amount));
4341 if ((*i)->frame() == where) {
4342 // marker was immediately after end of range
4343 tempo_after = dynamic_cast<TempoSection*> (*i);
4344 meter_after = dynamic_cast<MeterSection*> (*i);
4350 //find the last TEMPO and METER metric (if any) and move it to the cut point so future stuff is correct
4351 if (last_tempo && !tempo_after) {
4352 metric_kill_list.remove(last_tempo);
4353 last_tempo->set_minute (minute_at_frame (where));
4356 if (last_meter && !meter_after) {
4357 metric_kill_list.remove(last_meter);
4358 last_meter->set_minute (minute_at_frame (where));
4362 //remove all the remaining metrics
4363 for (std::list<MetricSection*>::iterator i = metric_kill_list.begin(); i != metric_kill_list.end(); ++i) {
4364 _metrics.remove(*i);
4369 recompute_map (_metrics);
4372 PropertyChanged (PropertyChange ());
4376 /** Add some (fractional) Beats to a session frame position, and return the result in frames.
4377 * pos can be -ve, if required.
4380 TempoMap::framepos_plus_qn (framepos_t frame, Evoral::Beats beats) const
4382 Glib::Threads::RWLock::ReaderLock lm (lock);
4383 const double frame_qn = quarter_notes_between_frames_locked (_metrics, 0, frame);
4385 return frame_at_minute (minute_at_quarter_note_locked (_metrics, frame_qn + beats.to_double()));
4389 TempoMap::framepos_plus_bbt (framepos_t pos, BBT_Time op) const
4391 Glib::Threads::RWLock::ReaderLock lm (lock);
4393 BBT_Time pos_bbt = bbt_at_beat_locked (_metrics, beat_at_minute_locked (_metrics, minute_at_frame (pos)));
4394 pos_bbt.ticks += op.ticks;
4395 if (pos_bbt.ticks >= BBT_Time::ticks_per_beat) {
4397 pos_bbt.ticks -= BBT_Time::ticks_per_beat;
4399 pos_bbt.beats += op.beats;
4400 /* the meter in effect will start on the bar */
4401 double divisions_per_bar = meter_section_at_beat (beat_at_bbt_locked (_metrics, BBT_Time (pos_bbt.bars + op.bars, 1, 0))).divisions_per_bar();
4402 while (pos_bbt.beats >= divisions_per_bar + 1) {
4404 divisions_per_bar = meter_section_at_beat (beat_at_bbt_locked (_metrics, BBT_Time (pos_bbt.bars + op.bars, 1, 0))).divisions_per_bar();
4405 pos_bbt.beats -= divisions_per_bar;
4407 pos_bbt.bars += op.bars;
4409 return frame_at_minute (minute_at_bbt_locked (_metrics, pos_bbt));
4412 /** Count the number of beats that are equivalent to distance when going forward,
4416 TempoMap::framewalk_to_qn (framepos_t pos, framecnt_t distance) const
4418 Glib::Threads::RWLock::ReaderLock lm (lock);
4420 return Evoral::Beats (quarter_notes_between_frames_locked (_metrics, pos, pos + distance));
4424 bool operator() (const BBT_Time& a, const BBT_Time& b) {
4430 operator<< (std::ostream& o, const Meter& m) {
4431 return o << m.divisions_per_bar() << '/' << m.note_divisor();
4435 operator<< (std::ostream& o, const Tempo& t) {
4436 return o << t.note_types_per_minute() << " 1/" << t.note_type() << "'s per minute";
4440 operator<< (std::ostream& o, const MetricSection& section) {
4442 o << "MetricSection @ " << section.frame() << ' ';
4444 const TempoSection* ts;
4445 const MeterSection* ms;
4447 if ((ts = dynamic_cast<const TempoSection*> (§ion)) != 0) {
4448 o << *((const Tempo*) ts);
4449 } else if ((ms = dynamic_cast<const MeterSection*> (§ion)) != 0) {
4450 o << *((const Meter*) ms);