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()) {
2571 if (t->frame() == frame_at_minute (minute)) {
2575 if (t->position_lock_style() == MusicTime) {
2576 prev_t->set_c_func (prev_t->compute_c_func_pulse (t->note_types_per_minute(), t->pulse()));
2577 t->set_minute (prev_t->minute_at_ntpm (t->note_types_per_minute(), t->pulse()));
2579 prev_t->set_c_func (prev_t->compute_c_func_minute (t->note_types_per_minute(), t->minute()));
2580 if (!t->locked_to_meter()) {
2581 t->set_pulse (prev_t->pulse_at_ntpm (t->note_types_per_minute(), t->minute()));
2590 section_prev->set_c_func (section_prev->compute_c_func_minute (section->note_types_per_minute(), minute));
2591 if (!section->locked_to_meter()) {
2592 section->set_pulse (section_prev->pulse_at_ntpm (section->note_types_per_minute(), minute));
2597 recompute_tempi (imaginary);
2599 if (check_solved (imaginary)) {
2602 dunp (imaginary, std::cout);
2606 MetricSectionFrameSorter fcmp;
2607 imaginary.sort (fcmp);
2609 recompute_tempi (imaginary);
2611 if (check_solved (imaginary)) {
2619 TempoMap::solve_map_pulse (Metrics& imaginary, TempoSection* section, const double& pulse)
2621 TempoSection* prev_t = 0;
2622 TempoSection* section_prev = 0;
2624 section->set_pulse (pulse);
2626 for (Metrics::iterator i = imaginary.begin(); i != imaginary.end(); ++i) {
2628 if ((*i)->is_tempo()) {
2629 t = static_cast<TempoSection*> (*i);
2640 section_prev = prev_t;
2643 if (t->position_lock_style() == MusicTime) {
2644 prev_t->set_c_func (prev_t->compute_c_func_pulse (t->note_types_per_minute(), t->pulse()));
2645 t->set_minute (prev_t->minute_at_ntpm (t->note_types_per_minute(), t->pulse()));
2647 prev_t->set_c_func (prev_t->compute_c_func_minute (t->note_types_per_minute(), t->minute()));
2648 if (!t->locked_to_meter()) {
2649 t->set_pulse (prev_t->pulse_at_ntpm (t->note_types_per_minute(), t->minute()));
2658 section_prev->set_c_func (section_prev->compute_c_func_pulse (section->note_types_per_minute(), pulse));
2659 section->set_minute (section_prev->minute_at_ntpm (section->note_types_per_minute(), pulse));
2663 recompute_tempi (imaginary);
2665 if (check_solved (imaginary)) {
2668 dunp (imaginary, std::cout);
2672 MetricSectionSorter cmp;
2673 imaginary.sort (cmp);
2675 recompute_tempi (imaginary);
2677 * XX need a restriction here, but only for this case,
2678 * as audio locked tempos don't interact in the same way.
2680 * With music-locked tempos, the solution to cross-dragging can fly off the screen
2682 * |50 bpm |250 bpm |60 bpm
2683 * drag 250 to the pulse after 60->
2684 * a clue: dragging the second 60 <- past the 250 would cause no such problem.
2686 if (check_solved (imaginary)) {
2694 TempoMap::solve_map_minute (Metrics& imaginary, MeterSection* section, const double& minute)
2696 /* disallow moving first meter past any subsequent one, and any initial meter before the first one */
2697 const MeterSection* other = &meter_section_at_minute_locked (imaginary, minute);
2698 if ((section->initial() && !other->initial()) || (other->initial() && !section->initial() && other->minute() >= minute)) {
2702 if (section->initial()) {
2703 /* lock the first tempo to our first meter */
2704 if (!set_active_tempi (imaginary, section->frame_at_minute (minute))) {
2709 TempoSection* meter_locked_tempo = 0;
2711 for (Metrics::const_iterator ii = imaginary.begin(); ii != imaginary.end(); ++ii) {
2713 if ((*ii)->is_tempo()) {
2714 t = static_cast<TempoSection*> (*ii);
2715 if ((t->locked_to_meter() || t->initial()) && t->minute() == section->minute()) {
2716 meter_locked_tempo = t;
2722 if (!meter_locked_tempo) {
2726 MeterSection* prev_m = 0;
2728 TempoSection* tempo_copy = copy_metrics_and_point (imaginary, future_map, meter_locked_tempo);
2729 bool solved = false;
2731 for (Metrics::iterator i = imaginary.begin(); i != imaginary.end(); ++i) {
2733 if (!(*i)->is_tempo()) {
2734 m = static_cast<MeterSection*> (*i);
2736 if (prev_m && !section->initial()) {
2737 const double beats = (pulse_at_minute_locked (imaginary, minute) - prev_m->pulse()) * prev_m->note_divisor();
2738 if (beats + prev_m->beat() < section->beat()) {
2739 /* set the section pulse according to its musical position,
2740 * as an earlier time than this has been requested.
2742 const double new_pulse = ((section->beat() - prev_m->beat())
2743 / prev_m->note_divisor()) + prev_m->pulse();
2745 tempo_copy->set_position_lock_style (MusicTime);
2746 if ((solved = solve_map_pulse (future_map, tempo_copy, new_pulse))) {
2747 meter_locked_tempo->set_position_lock_style (MusicTime);
2748 section->set_position_lock_style (MusicTime);
2749 section->set_pulse (new_pulse);
2750 solve_map_pulse (imaginary, meter_locked_tempo, new_pulse);
2751 meter_locked_tempo->set_position_lock_style (AudioTime);
2752 section->set_position_lock_style (AudioTime);
2753 section->set_minute (meter_locked_tempo->minute());
2759 Metrics::const_iterator d = future_map.begin();
2760 while (d != future_map.end()) {
2769 /* all is ok. set section's locked tempo if allowed.
2770 possibly disallowed if there is an adjacent audio-locked tempo.
2771 XX this check could possibly go. its never actually happened here.
2773 MeterSection* meter_copy = const_cast<MeterSection*>
2774 (&meter_section_at_minute_locked (future_map, section->minute()));
2776 meter_copy->set_minute (minute);
2778 if ((solved = solve_map_minute (future_map, tempo_copy, minute))) {
2779 section->set_minute (minute);
2780 meter_locked_tempo->set_pulse (((section->beat() - prev_m->beat())
2781 / prev_m->note_divisor()) + prev_m->pulse());
2782 solve_map_minute (imaginary, meter_locked_tempo, minute);
2787 Metrics::const_iterator d = future_map.begin();
2788 while (d != future_map.end()) {
2798 /* initial (first meter atm) */
2800 tempo_copy->set_minute (minute);
2801 tempo_copy->set_pulse (0.0);
2803 if ((solved = solve_map_minute (future_map, tempo_copy, minute))) {
2804 section->set_minute (minute);
2805 meter_locked_tempo->set_minute (minute);
2806 meter_locked_tempo->set_pulse (0.0);
2807 solve_map_minute (imaginary, meter_locked_tempo, minute);
2812 Metrics::const_iterator d = future_map.begin();
2813 while (d != future_map.end()) {
2822 pair<double, BBT_Time> b_bbt = make_pair (0.0, BBT_Time (1, 1, 0));
2823 section->set_beat (b_bbt);
2824 section->set_pulse (0.0);
2834 MetricSectionFrameSorter fcmp;
2835 imaginary.sort (fcmp);
2837 recompute_meters (imaginary);
2843 TempoMap::solve_map_bbt (Metrics& imaginary, MeterSection* section, const BBT_Time& when)
2845 /* disallow setting section to an existing meter's bbt */
2846 for (Metrics::iterator i = imaginary.begin(); i != imaginary.end(); ++i) {
2848 if (!(*i)->is_tempo()) {
2849 m = static_cast<MeterSection*> (*i);
2850 if (m != section && m->bbt().bars == when.bars) {
2856 MeterSection* prev_m = 0;
2857 MeterSection* section_prev = 0;
2859 for (Metrics::iterator i = imaginary.begin(); i != imaginary.end(); ++i) {
2861 if (!(*i)->is_tempo()) {
2862 m = static_cast<MeterSection*> (*i);
2868 pair<double, BBT_Time> b_bbt;
2869 double new_pulse = 0.0;
2871 if (prev_m && m->bbt().bars > when.bars && !section_prev){
2872 section_prev = prev_m;
2874 const double beats = (when.bars - section_prev->bbt().bars) * section_prev->divisions_per_bar();
2875 const double pulse = (beats / section_prev->note_divisor()) + section_prev->pulse();
2876 pair<double, BBT_Time> b_bbt = make_pair (beats + section_prev->beat(), when);
2878 section->set_beat (b_bbt);
2879 section->set_pulse (pulse);
2880 section->set_minute (minute_at_pulse_locked (imaginary, pulse));
2884 if (m->position_lock_style() == AudioTime) {
2885 TempoSection* meter_locked_tempo = 0;
2887 for (Metrics::const_iterator ii = imaginary.begin(); ii != imaginary.end(); ++ii) {
2889 if ((*ii)->is_tempo()) {
2890 t = static_cast<TempoSection*> (*ii);
2891 if ((t->locked_to_meter() || t->initial()) && t->frame() == m->frame()) {
2892 meter_locked_tempo = t;
2898 if (!meter_locked_tempo) {
2903 double beats = ((m->bbt().bars - prev_m->bbt().bars) * prev_m->divisions_per_bar());
2905 if (beats + prev_m->beat() != m->beat()) {
2906 /* tempo/ meter change caused a change in beat (bar). */
2908 /* the user has requested that the previous section of music overlaps this one.
2909 we have no choice but to change the bar number here, as being locked to audio means
2910 we must stay where we are on the timeline.
2912 beats = m->beat() - prev_m->beat();
2913 b_bbt = make_pair (beats + prev_m->beat()
2914 , BBT_Time ((beats / prev_m->divisions_per_bar()) + prev_m->bbt().bars, 1, 0));
2915 new_pulse = prev_m->pulse() + (beats / prev_m->note_divisor());
2917 } else if (!m->initial()) {
2918 b_bbt = make_pair (m->beat(), m->bbt());
2919 new_pulse = prev_m->pulse() + (beats / prev_m->note_divisor());
2922 b_bbt = make_pair (0.0, BBT_Time (1, 1, 0));
2925 meter_locked_tempo->set_pulse (new_pulse);
2926 m->set_beat (b_bbt);
2927 m->set_pulse (new_pulse);
2931 const double beats = ((m->bbt().bars - prev_m->bbt().bars) * prev_m->divisions_per_bar());
2932 if (beats + prev_m->beat() != m->beat()) {
2933 /* tempo/ meter change caused a change in beat (bar). */
2934 b_bbt = make_pair (beats + prev_m->beat()
2935 , BBT_Time ((beats / prev_m->divisions_per_bar()) + prev_m->bbt().bars, 1, 0));
2937 b_bbt = make_pair (beats + prev_m->beat()
2940 new_pulse = (beats / prev_m->note_divisor()) + prev_m->pulse();
2941 m->set_beat (b_bbt);
2942 m->set_pulse (new_pulse);
2943 m->set_minute (minute_at_pulse_locked (imaginary, new_pulse));
2950 if (!section_prev) {
2952 const double beats = (when.bars - prev_m->bbt().bars) * prev_m->divisions_per_bar();
2953 const double pulse = (beats / prev_m->note_divisor()) + prev_m->pulse();
2954 pair<double, BBT_Time> b_bbt = make_pair (beats + prev_m->beat(), when);
2956 section->set_beat (b_bbt);
2957 section->set_pulse (pulse);
2958 section->set_minute (minute_at_pulse_locked (imaginary, pulse));
2961 MetricSectionSorter cmp;
2962 imaginary.sort (cmp);
2964 recompute_meters (imaginary);
2969 /** places a copy of _metrics into copy and returns a pointer
2970 * to section's equivalent in copy.
2973 TempoMap::copy_metrics_and_point (const Metrics& metrics, Metrics& copy, TempoSection* section)
2975 TempoSection* ret = 0;
2977 for (Metrics::const_iterator i = metrics.begin(); i != metrics.end(); ++i) {
2980 if ((*i)->is_tempo()) {
2981 t = static_cast<TempoSection*> (*i);
2983 ret = new TempoSection (*t);
2984 copy.push_back (ret);
2988 TempoSection* cp = new TempoSection (*t);
2989 copy.push_back (cp);
2991 if (!(*i)->is_tempo()) {
2992 m = static_cast<MeterSection *> (*i);
2993 MeterSection* cp = new MeterSection (*m);
2994 copy.push_back (cp);
3002 TempoMap::copy_metrics_and_point (const Metrics& metrics, Metrics& copy, MeterSection* section)
3004 MeterSection* ret = 0;
3006 for (Metrics::const_iterator i = metrics.begin(); i != metrics.end(); ++i) {
3009 if ((*i)->is_tempo()) {
3010 t = static_cast<TempoSection*> (*i);
3011 TempoSection* cp = new TempoSection (*t);
3012 copy.push_back (cp);
3015 if (!(*i)->is_tempo()) {
3016 m = static_cast<MeterSection *> (*i);
3018 ret = new MeterSection (*m);
3019 copy.push_back (ret);
3022 MeterSection* cp = new MeterSection (*m);
3023 copy.push_back (cp);
3030 /** answers the question "is this a valid beat position for this tempo section?".
3031 * it returns true if the tempo section can be moved to the requested bbt position,
3032 * leaving the tempo map in a solved state.
3033 * @param ts the tempo section to be moved
3034 * @param bbt the requested new position for the tempo section
3035 * @return true if the tempo section can be moved to the position, otherwise false.
3038 TempoMap::can_solve_bbt (TempoSection* ts, const BBT_Time& bbt)
3041 TempoSection* tempo_copy = 0;
3044 Glib::Threads::RWLock::ReaderLock lm (lock);
3045 tempo_copy = copy_metrics_and_point (_metrics, copy, ts);
3051 const bool ret = solve_map_pulse (copy, tempo_copy, pulse_at_bbt_locked (copy, bbt));
3053 Metrics::const_iterator d = copy.begin();
3054 while (d != copy.end()) {
3063 * 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,
3064 * taking any possible reordering as a consequence of this into account.
3065 * @param section - the section to be altered
3066 * @param bbt - the BBT time where the altered tempo will fall
3067 * @return returns - the position in pulses and frames (as a pair) where the new tempo section will lie.
3069 pair<double, framepos_t>
3070 TempoMap::predict_tempo_position (TempoSection* section, const BBT_Time& bbt)
3073 pair<double, framepos_t> ret = make_pair (0.0, 0);
3075 Glib::Threads::RWLock::ReaderLock lm (lock);
3077 TempoSection* tempo_copy = copy_metrics_and_point (_metrics, future_map, section);
3079 const double beat = beat_at_bbt_locked (future_map, bbt);
3081 if (section->position_lock_style() == AudioTime) {
3082 tempo_copy->set_position_lock_style (MusicTime);
3085 if (solve_map_pulse (future_map, tempo_copy, pulse_at_beat_locked (future_map, beat))) {
3086 ret.first = tempo_copy->pulse();
3087 ret.second = tempo_copy->frame();
3089 ret.first = section->pulse();
3090 ret.second = section->frame();
3093 Metrics::const_iterator d = future_map.begin();
3094 while (d != future_map.end()) {
3101 /** moves a TempoSection to a specified position.
3102 * @param ts - the section to be moved
3103 * @param frame - the new position in frames for the tempo
3104 * @param sub_num - the snap division to use if using musical time.
3106 * if sub_num is non-zero, the frame position is used to calculate an exact
3109 * -1 | snap to bars (meter-based)
3110 * 0 | no snap - use audio frame for musical position
3111 * 1 | snap to meter-based (BBT) beat
3112 * >1 | snap to quarter-note subdivision (i.e. 4 will snap to sixteenth notes)
3114 * this follows the snap convention in the gui.
3115 * if sub_num is zero, the musical position will be taken from the supplied frame.
3118 TempoMap::gui_move_tempo (TempoSection* ts, const framepos_t& frame, const int& sub_num)
3122 if (ts->position_lock_style() == MusicTime) {
3124 /* if we're snapping to a musical grid, set the pulse exactly instead of via the supplied frame. */
3125 Glib::Threads::RWLock::WriterLock lm (lock);
3126 TempoSection* tempo_copy = copy_metrics_and_point (_metrics, future_map, ts);
3128 tempo_copy->set_position_lock_style (AudioTime);
3130 if (solve_map_minute (future_map, tempo_copy, minute_at_frame (frame))) {
3131 const double beat = exact_beat_at_frame_locked (future_map, frame, sub_num);
3132 const double pulse = pulse_at_beat_locked (future_map, beat);
3134 if (solve_map_pulse (future_map, tempo_copy, pulse)) {
3135 solve_map_pulse (_metrics, ts, pulse);
3136 recompute_meters (_metrics);
3144 Glib::Threads::RWLock::WriterLock lm (lock);
3145 TempoSection* tempo_copy = copy_metrics_and_point (_metrics, future_map, ts);
3147 if (solve_map_minute (future_map, tempo_copy, minute_at_frame (frame))) {
3149 /* We're moving the object that defines the grid while snapping to it...
3150 * Placing the ts at the beat corresponding to the requested frame may shift the
3151 * grid in such a way that the mouse is left hovering over a completerly different division,
3152 * causing jittering when the mouse next moves (esp. large tempo deltas).
3154 * This alters the snap behaviour slightly in that we snap to beat divisions
3155 * in the future map rather than the existing one.
3157 const double qn = exact_qn_at_frame_locked (future_map, frame, sub_num);
3158 const framepos_t snapped_frame = frame_at_minute (minute_at_quarter_note_locked (future_map, qn));
3160 if (solve_map_minute (future_map, tempo_copy, minute_at_frame (snapped_frame))) {
3161 solve_map_minute (_metrics, ts, minute_at_frame (snapped_frame));
3162 ts->set_pulse (qn / 4.0);
3163 recompute_meters (_metrics);
3166 solve_map_minute (_metrics, ts, minute_at_frame (frame));
3167 recompute_meters (_metrics);
3173 Metrics::const_iterator d = future_map.begin();
3174 while (d != future_map.end()) {
3179 MetricPositionChanged (); // Emit Signal
3182 /** moves a MeterSection to a specified position.
3183 * @param ms - the section to be moved
3184 * @param frame - the new position in frames for the meter
3186 * as a meter cannot snap to anything but bars,
3187 * the supplied frame is rounded to the nearest bar, possibly
3188 * leaving the meter position unchanged.
3191 TempoMap::gui_move_meter (MeterSection* ms, const framepos_t& frame)
3195 if (ms->position_lock_style() == AudioTime) {
3198 Glib::Threads::RWLock::WriterLock lm (lock);
3199 MeterSection* copy = copy_metrics_and_point (_metrics, future_map, ms);
3201 if (solve_map_minute (future_map, copy, minute_at_frame (frame))) {
3202 solve_map_minute (_metrics, ms, minute_at_frame (frame));
3203 recompute_tempi (_metrics);
3208 Glib::Threads::RWLock::WriterLock lm (lock);
3209 MeterSection* copy = copy_metrics_and_point (_metrics, future_map, ms);
3211 const double beat = beat_at_minute_locked (_metrics, minute_at_frame (frame));
3212 const Timecode::BBT_Time bbt = bbt_at_beat_locked (_metrics, beat);
3214 if (solve_map_bbt (future_map, copy, bbt)) {
3215 solve_map_bbt (_metrics, ms, bbt);
3216 recompute_tempi (_metrics);
3221 Metrics::const_iterator d = future_map.begin();
3222 while (d != future_map.end()) {
3227 MetricPositionChanged (); // Emit Signal
3231 TempoMap::gui_change_tempo (TempoSection* ts, const Tempo& bpm)
3234 bool can_solve = false;
3236 Glib::Threads::RWLock::WriterLock lm (lock);
3237 TempoSection* tempo_copy = copy_metrics_and_point (_metrics, future_map, ts);
3238 tempo_copy->set_note_types_per_minute (bpm.note_types_per_minute());
3239 recompute_tempi (future_map);
3241 if (check_solved (future_map)) {
3242 ts->set_note_types_per_minute (bpm.note_types_per_minute());
3243 recompute_map (_metrics);
3248 Metrics::const_iterator d = future_map.begin();
3249 while (d != future_map.end()) {
3254 MetricPositionChanged (); // Emit Signal
3260 TempoMap::gui_dilate_tempo (TempoSection* ts, const framepos_t& frame, const framepos_t& end_frame)
3263 Ts (future prev_t) Tnext
3266 |----------|----------
3273 Glib::Threads::RWLock::WriterLock lm (lock);
3279 TempoSection* prev_t = copy_metrics_and_point (_metrics, future_map, ts);
3280 TempoSection* prev_to_prev_t = 0;
3281 const frameoffset_t fr_off = end_frame - frame;
3285 if (prev_t->pulse() > 0.0) {
3286 prev_to_prev_t = const_cast<TempoSection*>(&tempo_section_at_minute_locked (future_map, minute_at_frame (prev_t->frame() - 1)));
3289 TempoSection* next_t = 0;
3290 for (Metrics::iterator i = future_map.begin(); i != future_map.end(); ++i) {
3291 TempoSection* t = 0;
3292 if ((*i)->is_tempo()) {
3293 t = static_cast<TempoSection*> (*i);
3294 if (t->frame() > ts->frame()) {
3300 /* minimum allowed measurement distance in frames */
3301 const framepos_t min_dframe = 2;
3303 /* the change in frames is the result of changing the slope of at most 2 previous tempo sections.
3304 constant to constant is straightforward, as the tempo prev to prev_t has constant slope.
3306 double contribution = 0.0;
3308 if (next_t && prev_to_prev_t && prev_to_prev_t->type() == TempoSection::Ramp) {
3309 contribution = (prev_t->frame() - prev_to_prev_t->frame()) / (double) (next_t->frame() - prev_to_prev_t->frame());
3312 const frameoffset_t prev_t_frame_contribution = fr_off - (contribution * (double) fr_off);
3314 const double start_pulse = prev_t->pulse_at_minute (minute_at_frame (frame));
3315 const double end_pulse = prev_t->pulse_at_minute (minute_at_frame (end_frame));
3319 if (prev_t->type() == TempoSection::Constant || prev_t->c_func() == 0.0) {
3321 if (prev_t->position_lock_style() == MusicTime) {
3322 if (prev_to_prev_t && prev_to_prev_t->type() == TempoSection::Ramp) {
3323 if (frame > prev_to_prev_t->frame() + min_dframe && (frame + prev_t_frame_contribution) > prev_to_prev_t->frame() + min_dframe) {
3325 new_bpm = prev_t->note_types_per_minute() * ((frame - prev_to_prev_t->frame())
3326 / (double) ((frame + prev_t_frame_contribution) - prev_to_prev_t->frame()));
3328 new_bpm = prev_t->note_types_per_minute();
3331 /* prev to prev is irrelevant */
3333 if (start_pulse > prev_t->pulse() && end_pulse > prev_t->pulse()) {
3334 new_bpm = prev_t->note_types_per_minute() * ((start_pulse - prev_t->pulse()) / (end_pulse - prev_t->pulse()));
3336 new_bpm = prev_t->note_types_per_minute();
3341 if (prev_to_prev_t && prev_to_prev_t->type() == TempoSection::Ramp) {
3342 if (frame > prev_to_prev_t->frame() + min_dframe && end_frame > prev_to_prev_t->frame() + min_dframe) {
3344 new_bpm = prev_t->note_types_per_minute() * ((frame - prev_to_prev_t->frame())
3345 / (double) ((end_frame) - prev_to_prev_t->frame()));
3347 new_bpm = prev_t->note_types_per_minute();
3350 /* prev_to_prev_t is irrelevant */
3352 if (frame > prev_t->frame() + min_dframe && end_frame > prev_t->frame() + min_dframe) {
3353 new_bpm = prev_t->note_types_per_minute() * ((frame - prev_t->frame()) / (double) (end_frame - prev_t->frame()));
3355 new_bpm = prev_t->note_types_per_minute();
3361 double frame_ratio = 1.0;
3362 double pulse_ratio = 1.0;
3363 const double pulse_pos = frame;
3365 if (prev_to_prev_t) {
3366 if (pulse_pos > prev_to_prev_t->frame() + min_dframe && (pulse_pos - fr_off) > prev_to_prev_t->frame() + min_dframe) {
3367 frame_ratio = (((pulse_pos - fr_off) - prev_to_prev_t->frame()) / (double) ((pulse_pos) - prev_to_prev_t->frame()));
3369 if (end_pulse > prev_to_prev_t->pulse() && start_pulse > prev_to_prev_t->pulse()) {
3370 pulse_ratio = ((start_pulse - prev_to_prev_t->pulse()) / (end_pulse - prev_to_prev_t->pulse()));
3373 if (pulse_pos > prev_t->frame() + min_dframe && (pulse_pos - fr_off) > prev_t->frame() + min_dframe) {
3374 frame_ratio = (((pulse_pos - fr_off) - prev_t->frame()) / (double) ((pulse_pos) - prev_t->frame()));
3376 pulse_ratio = (start_pulse / end_pulse);
3378 new_bpm = prev_t->note_types_per_minute() * (pulse_ratio * frame_ratio);
3381 /* don't clamp and proceed here.
3382 testing has revealed that this can go negative,
3383 which is an entirely different thing to just being too low.
3385 if (new_bpm < 0.5) {
3388 new_bpm = min (new_bpm, (double) 1000.0);
3389 prev_t->set_note_types_per_minute (new_bpm);
3390 recompute_tempi (future_map);
3391 recompute_meters (future_map);
3393 if (check_solved (future_map)) {
3394 ts->set_note_types_per_minute (new_bpm);
3395 recompute_tempi (_metrics);
3396 recompute_meters (_metrics);
3400 Metrics::const_iterator d = future_map.begin();
3401 while (d != future_map.end()) {
3406 MetricPositionChanged (); // Emit Signal
3409 /** Returns the exact bbt-based beat corresponding to the bar, beat or quarter note subdivision nearest to
3410 * the supplied frame, possibly returning a negative value.
3412 * @param frame The session frame position.
3413 * @param sub_num The subdivision to use when rounding the beat.
3414 * A value of -1 indicates rounding to BBT bar. 1 indicates rounding to BBT beats.
3415 * Positive integers indicate quarter note (non BBT) divisions.
3416 * 0 indicates that the returned beat should not be rounded (equivalent to quarter_note_at_frame()).
3417 * @return The beat position of the supplied frame.
3419 * when working to a musical grid, the use of sub_nom indicates that
3420 * the position should be interpreted musically.
3422 * it effectively snaps to meter bars, meter beats or quarter note divisions
3423 * (as per current gui convention) and returns a musical position independent of frame rate.
3425 * If the supplied frame lies before the first meter, the return will be negative,
3426 * in which case the returned beat uses the first meter (for BBT subdivisions) and
3427 * the continuation of the tempo curve (backwards).
3429 * This function is sensitive to tempo and meter.
3432 TempoMap::exact_beat_at_frame (const framepos_t& frame, const int32_t sub_num) const
3434 Glib::Threads::RWLock::ReaderLock lm (lock);
3436 return exact_beat_at_frame_locked (_metrics, frame, sub_num);
3440 TempoMap::exact_beat_at_frame_locked (const Metrics& metrics, const framepos_t& frame, const int32_t divisions) const
3442 return beat_at_pulse_locked (_metrics, exact_qn_at_frame_locked (metrics, frame, divisions) / 4.0);
3445 /** Returns the exact quarter note corresponding to the bar, beat or quarter note subdivision nearest to
3446 * the supplied frame, possibly returning a negative value.
3448 * @param frame The session frame position.
3449 * @param sub_num The subdivision to use when rounding the quarter note.
3450 * A value of -1 indicates rounding to BBT bar. 1 indicates rounding to BBT beats.
3451 * Positive integers indicate quarter note (non BBT) divisions.
3452 * 0 indicates that the returned quarter note should not be rounded (equivalent to quarter_note_at_frame()).
3453 * @return The quarter note position of the supplied frame.
3455 * When working to a musical grid, the use of sub_nom indicates that
3456 * the frame position should be interpreted musically.
3458 * it effectively snaps to meter bars, meter beats or quarter note divisions
3459 * (as per current gui convention) and returns a musical position independent of frame rate.
3461 * If the supplied frame lies before the first meter, the return will be negative,
3462 * in which case the returned quarter note uses the first meter (for BBT subdivisions) and
3463 * the continuation of the tempo curve (backwards).
3465 * This function is tempo-sensitive.
3468 TempoMap::exact_qn_at_frame (const framepos_t& frame, const int32_t sub_num) const
3470 Glib::Threads::RWLock::ReaderLock lm (lock);
3472 return exact_qn_at_frame_locked (_metrics, frame, sub_num);
3476 TempoMap::exact_qn_at_frame_locked (const Metrics& metrics, const framepos_t& frame, const int32_t sub_num) const
3478 double qn = quarter_note_at_minute_locked (metrics, minute_at_frame (frame));
3481 qn = floor (qn) + (floor (((qn - floor (qn)) * (double) sub_num) + 0.5) / sub_num);
3482 } else if (sub_num == 1) {
3483 /* the gui requested exact musical (BBT) beat */
3484 qn = quarter_note_at_beat_locked (metrics, floor (beat_at_minute_locked (metrics, minute_at_frame (frame)) + 0.5));
3485 } else if (sub_num == -1) {
3487 Timecode::BBT_Time bbt = bbt_at_pulse_locked (metrics, qn / 4.0);
3491 const double prev_b = pulse_at_bbt_locked (metrics, bbt) * 4.0;
3493 const double next_b = pulse_at_bbt_locked (metrics, bbt) * 4.0;
3495 if ((qn - prev_b) > (next_b - prev_b) / 2.0) {
3505 /** returns the frame duration of the supplied BBT time at a specified frame position in the tempo map.
3506 * @param pos the frame position in the tempo map.
3507 * @param bbt the distance in BBT time from pos to calculate.
3508 * @param dir the rounding direction..
3509 * @return the duration in frames between pos and bbt
3512 TempoMap::bbt_duration_at (framepos_t pos, const BBT_Time& bbt, int dir)
3514 Glib::Threads::RWLock::ReaderLock lm (lock);
3516 BBT_Time pos_bbt = bbt_at_minute_locked (_metrics, minute_at_frame (pos));
3518 const double divisions = meter_section_at_minute_locked (_metrics, minute_at_frame (pos)).divisions_per_bar();
3521 pos_bbt.bars += bbt.bars;
3523 pos_bbt.ticks += bbt.ticks;
3524 if ((double) pos_bbt.ticks > BBT_Time::ticks_per_beat) {
3526 pos_bbt.ticks -= BBT_Time::ticks_per_beat;
3529 pos_bbt.beats += bbt.beats;
3530 if ((double) pos_bbt.beats > divisions) {
3532 pos_bbt.beats -= divisions;
3534 const framecnt_t pos_bbt_frame = frame_at_minute (minute_at_bbt_locked (_metrics, pos_bbt));
3536 return pos_bbt_frame - pos;
3540 if (pos_bbt.bars <= bbt.bars) {
3543 pos_bbt.bars -= bbt.bars;
3546 if (pos_bbt.ticks < bbt.ticks) {
3547 if (pos_bbt.bars > 1) {
3548 if (pos_bbt.beats == 1) {
3550 pos_bbt.beats = divisions;
3554 pos_bbt.ticks = BBT_Time::ticks_per_beat - (bbt.ticks - pos_bbt.ticks);
3560 pos_bbt.ticks -= bbt.ticks;
3563 if (pos_bbt.beats <= bbt.beats) {
3564 if (pos_bbt.bars > 1) {
3566 pos_bbt.beats = divisions - (bbt.beats - pos_bbt.beats);
3571 pos_bbt.beats -= bbt.beats;
3574 return pos - frame_at_minute (minute_at_bbt_locked (_metrics, pos_bbt));
3581 TempoMap::round_to_bar (framepos_t fr, RoundMode dir)
3583 return round_to_type (fr, dir, Bar);
3587 TempoMap::round_to_beat (framepos_t fr, RoundMode dir)
3589 return round_to_type (fr, dir, Beat);
3593 TempoMap::round_to_beat_subdivision (framepos_t fr, int sub_num, RoundMode dir)
3595 Glib::Threads::RWLock::ReaderLock lm (lock);
3596 uint32_t ticks = (uint32_t) floor (max (0.0, beat_at_minute_locked (_metrics, minute_at_frame (fr))) * BBT_Time::ticks_per_beat);
3597 uint32_t beats = (uint32_t) floor (ticks / BBT_Time::ticks_per_beat);
3598 uint32_t ticks_one_subdivisions_worth = (uint32_t) BBT_Time::ticks_per_beat / sub_num;
3600 ticks -= beats * BBT_Time::ticks_per_beat;
3603 /* round to next (or same iff dir == RoundUpMaybe) */
3605 uint32_t mod = ticks % ticks_one_subdivisions_worth;
3607 if (mod == 0 && dir == RoundUpMaybe) {
3608 /* right on the subdivision, which is fine, so do nothing */
3610 } else if (mod == 0) {
3611 /* right on the subdivision, so the difference is just the subdivision ticks */
3612 ticks += ticks_one_subdivisions_worth;
3615 /* not on subdivision, compute distance to next subdivision */
3617 ticks += ticks_one_subdivisions_worth - mod;
3620 if (ticks >= BBT_Time::ticks_per_beat) {
3621 ticks -= BBT_Time::ticks_per_beat;
3623 } else if (dir < 0) {
3625 /* round to previous (or same iff dir == RoundDownMaybe) */
3627 uint32_t difference = ticks % ticks_one_subdivisions_worth;
3629 if (difference == 0 && dir == RoundDownAlways) {
3630 /* right on the subdivision, but force-rounding down,
3631 so the difference is just the subdivision ticks */
3632 difference = ticks_one_subdivisions_worth;
3635 if (ticks < difference) {
3636 ticks = BBT_Time::ticks_per_beat - ticks;
3638 ticks -= difference;
3642 /* round to nearest */
3645 /* compute the distance to the previous and next subdivision */
3647 if ((rem = fmod ((double) ticks, (double) ticks_one_subdivisions_worth)) > ticks_one_subdivisions_worth/2.0) {
3649 /* closer to the next subdivision, so shift forward */
3651 ticks = lrint (ticks + (ticks_one_subdivisions_worth - rem));
3653 DEBUG_TRACE (DEBUG::SnapBBT, string_compose ("moved forward to %1\n", ticks));
3655 if (ticks > BBT_Time::ticks_per_beat) {
3657 ticks -= BBT_Time::ticks_per_beat;
3658 DEBUG_TRACE (DEBUG::SnapBBT, string_compose ("fold beat to %1\n", beats));
3661 } else if (rem > 0) {
3663 /* closer to previous subdivision, so shift backward */
3667 /* can't go backwards past zero, so ... */
3670 /* step back to previous beat */
3672 ticks = lrint (BBT_Time::ticks_per_beat - rem);
3673 DEBUG_TRACE (DEBUG::SnapBBT, string_compose ("step back beat to %1\n", beats));
3675 ticks = lrint (ticks - rem);
3676 DEBUG_TRACE (DEBUG::SnapBBT, string_compose ("moved backward to %1\n", ticks));
3679 /* on the subdivision, do nothing */
3683 const framepos_t ret_frame = frame_at_minute (minute_at_beat_locked (_metrics, beats + (ticks / BBT_Time::ticks_per_beat)));
3689 TempoMap::round_to_quarter_note_subdivision (framepos_t fr, int sub_num, RoundMode dir)
3691 Glib::Threads::RWLock::ReaderLock lm (lock);
3692 uint32_t ticks = (uint32_t) floor (max (0.0, quarter_note_at_minute_locked (_metrics, minute_at_frame (fr))) * BBT_Time::ticks_per_beat);
3693 uint32_t beats = (uint32_t) floor (ticks / BBT_Time::ticks_per_beat);
3694 uint32_t ticks_one_subdivisions_worth = (uint32_t) BBT_Time::ticks_per_beat / sub_num;
3696 ticks -= beats * BBT_Time::ticks_per_beat;
3699 /* round to next (or same iff dir == RoundUpMaybe) */
3701 uint32_t mod = ticks % ticks_one_subdivisions_worth;
3703 if (mod == 0 && dir == RoundUpMaybe) {
3704 /* right on the subdivision, which is fine, so do nothing */
3706 } else if (mod == 0) {
3707 /* right on the subdivision, so the difference is just the subdivision ticks */
3708 ticks += ticks_one_subdivisions_worth;
3711 /* not on subdivision, compute distance to next subdivision */
3713 ticks += ticks_one_subdivisions_worth - mod;
3716 if (ticks >= BBT_Time::ticks_per_beat) {
3717 ticks -= BBT_Time::ticks_per_beat;
3719 } else if (dir < 0) {
3721 /* round to previous (or same iff dir == RoundDownMaybe) */
3723 uint32_t difference = ticks % ticks_one_subdivisions_worth;
3725 if (difference == 0 && dir == RoundDownAlways) {
3726 /* right on the subdivision, but force-rounding down,
3727 so the difference is just the subdivision ticks */
3728 difference = ticks_one_subdivisions_worth;
3731 if (ticks < difference) {
3732 ticks = BBT_Time::ticks_per_beat - ticks;
3734 ticks -= difference;
3738 /* round to nearest */
3741 /* compute the distance to the previous and next subdivision */
3743 if ((rem = fmod ((double) ticks, (double) ticks_one_subdivisions_worth)) > ticks_one_subdivisions_worth/2.0) {
3745 /* closer to the next subdivision, so shift forward */
3747 ticks = lrint (ticks + (ticks_one_subdivisions_worth - rem));
3749 DEBUG_TRACE (DEBUG::SnapBBT, string_compose ("moved forward to %1\n", ticks));
3751 if (ticks > BBT_Time::ticks_per_beat) {
3753 ticks -= BBT_Time::ticks_per_beat;
3754 DEBUG_TRACE (DEBUG::SnapBBT, string_compose ("fold beat to %1\n", beats));
3757 } else if (rem > 0) {
3759 /* closer to previous subdivision, so shift backward */
3763 /* can't go backwards past zero, so ... */
3766 /* step back to previous beat */
3768 ticks = lrint (BBT_Time::ticks_per_beat - rem);
3769 DEBUG_TRACE (DEBUG::SnapBBT, string_compose ("step back beat to %1\n", beats));
3771 ticks = lrint (ticks - rem);
3772 DEBUG_TRACE (DEBUG::SnapBBT, string_compose ("moved backward to %1\n", ticks));
3775 /* on the subdivision, do nothing */
3779 const framepos_t ret_frame = frame_at_minute (minute_at_quarter_note_locked (_metrics, beats + (ticks / BBT_Time::ticks_per_beat)));
3785 TempoMap::round_to_type (framepos_t frame, RoundMode dir, BBTPointType type)
3787 Glib::Threads::RWLock::ReaderLock lm (lock);
3789 const double beat_at_framepos = max (0.0, beat_at_minute_locked (_metrics, minute_at_frame (frame)));
3790 BBT_Time bbt (bbt_at_beat_locked (_metrics, beat_at_framepos));
3795 /* find bar previous to 'frame' */
3798 return frame_at_minute (minute_at_bbt_locked (_metrics, bbt));
3800 } else if (dir > 0) {
3801 /* find bar following 'frame' */
3805 return frame_at_minute (minute_at_bbt_locked (_metrics, bbt));
3807 /* true rounding: find nearest bar */
3808 framepos_t raw_ft = frame_at_minute (minute_at_bbt_locked (_metrics, bbt));
3811 framepos_t prev_ft = frame_at_minute (minute_at_bbt_locked (_metrics, bbt));
3813 framepos_t next_ft = frame_at_minute (minute_at_bbt_locked (_metrics, bbt));
3815 if ((raw_ft - prev_ft) > (next_ft - prev_ft) / 2) {
3826 return frame_at_minute (minute_at_beat_locked (_metrics, floor (beat_at_framepos)));
3827 } else if (dir > 0) {
3828 return frame_at_minute (minute_at_beat_locked (_metrics, ceil (beat_at_framepos)));
3830 return frame_at_minute (minute_at_beat_locked (_metrics, floor (beat_at_framepos + 0.5)));
3839 TempoMap::get_grid (vector<TempoMap::BBTPoint>& points,
3840 framepos_t lower, framepos_t upper, uint32_t bar_mod)
3842 Glib::Threads::RWLock::ReaderLock lm (lock);
3843 int32_t cnt = ceil (beat_at_minute_locked (_metrics, minute_at_frame (lower)));
3845 /* although the map handles negative beats, bbt doesn't. */
3850 if (minute_at_beat_locked (_metrics, cnt) >= minute_at_frame (upper)) {
3854 while (pos >= 0 && pos < upper) {
3855 pos = frame_at_minute (minute_at_beat_locked (_metrics, cnt));
3856 const TempoSection tempo = tempo_section_at_minute_locked (_metrics, minute_at_frame (pos));
3857 const MeterSection meter = meter_section_at_minute_locked (_metrics, minute_at_frame (pos));
3858 const BBT_Time bbt = bbt_at_beat_locked (_metrics, cnt);
3859 points.push_back (BBTPoint (meter, tempo_at_minute_locked (_metrics, minute_at_frame (pos)), pos, bbt.bars, bbt.beats, tempo.c_func()));
3863 BBT_Time bbt = bbt_at_minute_locked (_metrics, minute_at_frame (lower));
3868 bbt.bars -= bbt.bars % bar_mod;
3872 while (pos >= 0 && pos < upper) {
3873 pos = frame_at_minute (minute_at_bbt_locked (_metrics, bbt));
3874 const TempoSection tempo = tempo_section_at_minute_locked (_metrics, minute_at_frame (pos));
3875 const MeterSection meter = meter_section_at_minute_locked (_metrics, minute_at_frame (pos));
3876 points.push_back (BBTPoint (meter, tempo_at_minute_locked (_metrics, minute_at_frame (pos)), pos, bbt.bars, bbt.beats, tempo.c_func()));
3877 bbt.bars += bar_mod;
3883 TempoMap::tempo_section_at_frame (framepos_t frame) const
3885 Glib::Threads::RWLock::ReaderLock lm (lock);
3887 return tempo_section_at_minute_locked (_metrics, minute_at_frame (frame));
3891 TempoMap::tempo_section_at_minute_locked (const Metrics& metrics, double minute) const
3893 TempoSection* prev = 0;
3897 for (Metrics::const_iterator i = metrics.begin(); i != metrics.end(); ++i) {
3899 if ((*i)->is_tempo()) {
3900 t = static_cast<TempoSection*> (*i);
3904 if (prev && t->minute() > minute) {
3914 abort(); /*NOTREACHED*/
3921 TempoMap::tempo_section_at_beat_locked (const Metrics& metrics, const double& beat) const
3923 TempoSection* prev_t = 0;
3924 const MeterSection* prev_m = &meter_section_at_beat_locked (metrics, beat);
3928 for (Metrics::const_iterator i = metrics.begin(); i != metrics.end(); ++i) {
3929 if ((*i)->is_tempo()) {
3930 t = static_cast<TempoSection*> (*i);
3931 if (prev_t && ((t->pulse() - prev_m->pulse()) * prev_m->note_divisor()) + prev_m->beat() > beat) {
3941 /* don't use this to calculate length (the tempo is only correct for this frame).
3942 do that stuff based on the beat_at_frame and frame_at_beat api
3945 TempoMap::frames_per_quarter_note_at (const framepos_t& frame, const framecnt_t& sr) const
3947 Glib::Threads::RWLock::ReaderLock lm (lock);
3949 const TempoSection* ts_at = 0;
3950 const TempoSection* ts_after = 0;
3951 Metrics::const_iterator i;
3954 for (i = _metrics.begin(); i != _metrics.end(); ++i) {
3956 if ((*i)->is_tempo()) {
3957 t = static_cast<TempoSection*> (*i);
3961 if (ts_at && (*i)->frame() > frame) {
3971 return (60.0 * _frame_rate) / ts_at->tempo_at_minute (minute_at_frame (frame)).quarter_notes_per_minute();
3973 /* must be treated as constant tempo */
3974 return ts_at->frames_per_quarter_note (_frame_rate);
3978 TempoMap::meter_section_at_frame (framepos_t frame) const
3980 Glib::Threads::RWLock::ReaderLock lm (lock);
3981 return meter_section_at_minute_locked (_metrics, minute_at_frame (frame));
3985 TempoMap::meter_section_at_minute_locked (const Metrics& metrics, double minute) const
3987 Metrics::const_iterator i;
3988 MeterSection* prev = 0;
3992 for (i = metrics.begin(); i != metrics.end(); ++i) {
3994 if (!(*i)->is_tempo()) {
3995 m = static_cast<MeterSection*> (*i);
3997 if (prev && (*i)->minute() > minute) {
4007 abort(); /*NOTREACHED*/
4014 TempoMap::meter_section_at_beat_locked (const Metrics& metrics, const double& beat) const
4016 MeterSection* prev_m = 0;
4018 for (Metrics::const_iterator i = metrics.begin(); i != metrics.end(); ++i) {
4020 if (!(*i)->is_tempo()) {
4021 m = static_cast<MeterSection*> (*i);
4022 if (prev_m && m->beat() > beat) {
4033 TempoMap::meter_section_at_beat (double beat) const
4035 Glib::Threads::RWLock::ReaderLock lm (lock);
4036 return meter_section_at_beat_locked (_metrics, beat);
4040 TempoMap::meter_at_frame (framepos_t frame) const
4042 TempoMetric m (metric_at (frame));
4047 TempoMap::fix_legacy_session ()
4049 MeterSection* prev_m = 0;
4050 TempoSection* prev_t = 0;
4052 for (Metrics::iterator i = _metrics.begin(); i != _metrics.end(); ++i) {
4056 if ((m = dynamic_cast<MeterSection*>(*i)) != 0) {
4058 pair<double, BBT_Time> bbt = make_pair (0.0, BBT_Time (1, 1, 0));
4061 m->set_minute (0.0);
4062 m->set_position_lock_style (AudioTime);
4067 pair<double, BBT_Time> start = make_pair (((m->bbt().bars - 1) * prev_m->note_divisor())
4068 + (m->bbt().beats - 1)
4069 + (m->bbt().ticks / BBT_Time::ticks_per_beat)
4071 m->set_beat (start);
4072 const double start_beat = ((m->bbt().bars - 1) * prev_m->note_divisor())
4073 + (m->bbt().beats - 1)
4074 + (m->bbt().ticks / BBT_Time::ticks_per_beat);
4075 m->set_pulse (start_beat / prev_m->note_divisor());
4078 } else if ((t = dynamic_cast<TempoSection*>(*i)) != 0) {
4086 t->set_minute (0.0);
4087 t->set_position_lock_style (AudioTime);
4093 const double beat = ((t->legacy_bbt().bars - 1) * ((prev_m) ? prev_m->note_divisor() : 4.0))
4094 + (t->legacy_bbt().beats - 1)
4095 + (t->legacy_bbt().ticks / BBT_Time::ticks_per_beat);
4097 t->set_pulse (beat / prev_m->note_divisor());
4099 /* really shouldn't happen but.. */
4100 t->set_pulse (beat / 4.0);
4109 TempoMap::get_state ()
4111 Metrics::const_iterator i;
4112 XMLNode *root = new XMLNode ("TempoMap");
4115 Glib::Threads::RWLock::ReaderLock lm (lock);
4116 for (i = _metrics.begin(); i != _metrics.end(); ++i) {
4117 root->add_child_nocopy ((*i)->get_state());
4125 TempoMap::set_state (const XMLNode& node, int /*version*/)
4128 Glib::Threads::RWLock::WriterLock lm (lock);
4131 XMLNodeConstIterator niter;
4132 Metrics old_metrics (_metrics);
4135 nlist = node.children();
4137 for (niter = nlist.begin(); niter != nlist.end(); ++niter) {
4138 XMLNode* child = *niter;
4140 if (child->name() == TempoSection::xml_state_node_name) {
4143 TempoSection* ts = new TempoSection (*child, _frame_rate);
4144 _metrics.push_back (ts);
4147 catch (failed_constructor& err){
4148 error << _("Tempo map: could not set new state, restoring old one.") << endmsg;
4149 _metrics = old_metrics;
4150 old_metrics.clear();
4154 } else if (child->name() == MeterSection::xml_state_node_name) {
4157 MeterSection* ms = new MeterSection (*child, _frame_rate);
4158 _metrics.push_back (ms);
4161 catch (failed_constructor& err) {
4162 error << _("Tempo map: could not set new state, restoring old one.") << endmsg;
4163 _metrics = old_metrics;
4164 old_metrics.clear();
4170 if (niter == nlist.end()) {
4171 MetricSectionSorter cmp;
4172 _metrics.sort (cmp);
4175 /* check for legacy sessions where bbt was the base musical unit for tempo */
4176 for (Metrics::const_iterator i = _metrics.begin(); i != _metrics.end(); ++i) {
4178 if ((t = dynamic_cast<TempoSection*> (*i)) != 0) {
4179 if (t->legacy_bbt().bars != 0) {
4180 fix_legacy_session();
4187 /* check for multiple tempo/meters at the same location, which
4188 ardour2 somehow allowed.
4191 Metrics::iterator prev = _metrics.end();
4192 for (Metrics::iterator i = _metrics.begin(); i != _metrics.end(); ++i) {
4193 if (prev != _metrics.end()) {
4195 MeterSection* prev_m;
4197 TempoSection* prev_t;
4198 if ((prev_m = dynamic_cast<MeterSection*>(*prev)) != 0 && (ms = dynamic_cast<MeterSection*>(*i)) != 0) {
4199 if (prev_m->pulse() == ms->pulse()) {
4200 cerr << string_compose (_("Multiple meter definitions found at %1"), prev_m->pulse()) << endmsg;
4201 error << string_compose (_("Multiple meter definitions found at %1"), prev_m->pulse()) << endmsg;
4204 } else if ((prev_t = dynamic_cast<TempoSection*>(*prev)) != 0 && (ts = dynamic_cast<TempoSection*>(*i)) != 0) {
4205 if (prev_t->pulse() == ts->pulse()) {
4206 cerr << string_compose (_("Multiple tempo definitions found at %1"), prev_t->pulse()) << endmsg;
4207 error << string_compose (_("Multiple tempo definitions found at %1"), prev_t->pulse()) << endmsg;
4215 recompute_map (_metrics);
4217 Metrics::const_iterator d = old_metrics.begin();
4218 while (d != old_metrics.end()) {
4222 old_metrics.clear ();
4225 PropertyChanged (PropertyChange ());
4231 TempoMap::dump (const Metrics& metrics, std::ostream& o) const
4233 Glib::Threads::RWLock::ReaderLock lm (lock, Glib::Threads::TRY_LOCK);
4234 const MeterSection* m;
4235 const TempoSection* t;
4236 const TempoSection* prev_t = 0;
4238 for (Metrics::const_iterator i = metrics.begin(); i != metrics.end(); ++i) {
4240 if ((t = dynamic_cast<const TempoSection*>(*i)) != 0) {
4241 o << "Tempo @ " << *i << t->note_types_per_minute() << " BPM (pulse = 1/" << t->note_type()
4242 << " type= " << enum_2_string (t->type()) << ") " << " at pulse= " << t->pulse()
4243 << " minute= " << t->minute() << " frame= " << t->frame() << " (initial? " << t->initial() << ')'
4244 << " pos lock: " << enum_2_string (t->position_lock_style()) << std::endl;
4246 o << " current : " << t->note_types_per_minute()
4247 << " | " << t->pulse() << " | " << t->frame() << " | " << t->minute() << std::endl;
4248 o << " previous : " << prev_t->note_types_per_minute()
4249 << " | " << prev_t->pulse() << " | " << prev_t->frame() << " | " << prev_t->minute() << std::endl;
4250 o << " calculated : " << prev_t->tempo_at_pulse (t->pulse())
4251 << " | " << prev_t->pulse_at_ntpm (t->note_types_per_minute(), t->minute())
4252 << " | " << frame_at_minute (prev_t->minute_at_ntpm (t->note_types_per_minute(), t->pulse()))
4253 << " | " << prev_t->minute_at_ntpm (t->note_types_per_minute(), t->pulse()) << std::endl;
4256 } else if ((m = dynamic_cast<const MeterSection*>(*i)) != 0) {
4257 o << "Meter @ " << *i << ' ' << m->divisions_per_bar() << '/' << m->note_divisor() << " at " << m->bbt()
4258 << " frame= " << m->frame() << " pulse: " << m->pulse() << " beat : " << m->beat()
4259 << " pos lock: " << enum_2_string (m->position_lock_style()) << " (initial? " << m->initial() << ')' << endl;
4262 o << "------" << std::endl;
4266 TempoMap::n_tempos() const
4268 Glib::Threads::RWLock::ReaderLock lm (lock);
4271 for (Metrics::const_iterator i = _metrics.begin(); i != _metrics.end(); ++i) {
4272 if ((*i)->is_tempo()) {
4281 TempoMap::n_meters() const
4283 Glib::Threads::RWLock::ReaderLock lm (lock);
4286 for (Metrics::const_iterator i = _metrics.begin(); i != _metrics.end(); ++i) {
4287 if (!(*i)->is_tempo()) {
4296 TempoMap::insert_time (framepos_t where, framecnt_t amount)
4298 for (Metrics::reverse_iterator i = _metrics.rbegin(); i != _metrics.rend(); ++i) {
4299 if ((*i)->frame() >= where && !(*i)->initial ()) {
4303 if ((ms = dynamic_cast <MeterSection*>(*i)) != 0) {
4304 gui_move_meter (ms, (*i)->frame() + amount);
4307 if ((ts = dynamic_cast <TempoSection*>(*i)) != 0) {
4308 gui_move_tempo (ts, (*i)->frame() + amount, 0);
4313 PropertyChanged (PropertyChange ());
4317 TempoMap::remove_time (framepos_t where, framecnt_t amount)
4321 std::list<MetricSection*> metric_kill_list;
4323 TempoSection* last_tempo = NULL;
4324 MeterSection* last_meter = NULL;
4325 bool tempo_after = false; // is there a tempo marker at the first sample after the removed range?
4326 bool meter_after = false; // is there a meter marker likewise?
4328 Glib::Threads::RWLock::WriterLock lm (lock);
4329 for (Metrics::iterator i = _metrics.begin(); i != _metrics.end(); ++i) {
4330 if ((*i)->frame() >= where && (*i)->frame() < where+amount) {
4331 metric_kill_list.push_back(*i);
4332 TempoSection *lt = dynamic_cast<TempoSection*> (*i);
4335 MeterSection *lm = dynamic_cast<MeterSection*> (*i);
4339 else if ((*i)->frame() >= where) {
4340 // TODO: make sure that moved tempo/meter markers are rounded to beat/bar boundaries
4341 (*i)->set_minute ((*i)->minute() - minute_at_frame (amount));
4342 if ((*i)->frame() == where) {
4343 // marker was immediately after end of range
4344 tempo_after = dynamic_cast<TempoSection*> (*i);
4345 meter_after = dynamic_cast<MeterSection*> (*i);
4351 //find the last TEMPO and METER metric (if any) and move it to the cut point so future stuff is correct
4352 if (last_tempo && !tempo_after) {
4353 metric_kill_list.remove(last_tempo);
4354 last_tempo->set_minute (minute_at_frame (where));
4357 if (last_meter && !meter_after) {
4358 metric_kill_list.remove(last_meter);
4359 last_meter->set_minute (minute_at_frame (where));
4363 //remove all the remaining metrics
4364 for (std::list<MetricSection*>::iterator i = metric_kill_list.begin(); i != metric_kill_list.end(); ++i) {
4365 _metrics.remove(*i);
4370 recompute_map (_metrics);
4373 PropertyChanged (PropertyChange ());
4377 /** Add some (fractional) Beats to a session frame position, and return the result in frames.
4378 * pos can be -ve, if required.
4381 TempoMap::framepos_plus_qn (framepos_t frame, Evoral::Beats beats) const
4383 Glib::Threads::RWLock::ReaderLock lm (lock);
4384 const double frame_qn = quarter_notes_between_frames_locked (_metrics, 0, frame);
4386 return frame_at_minute (minute_at_quarter_note_locked (_metrics, frame_qn + beats.to_double()));
4390 TempoMap::framepos_plus_bbt (framepos_t pos, BBT_Time op) const
4392 Glib::Threads::RWLock::ReaderLock lm (lock);
4394 BBT_Time pos_bbt = bbt_at_beat_locked (_metrics, beat_at_minute_locked (_metrics, minute_at_frame (pos)));
4395 pos_bbt.ticks += op.ticks;
4396 if (pos_bbt.ticks >= BBT_Time::ticks_per_beat) {
4398 pos_bbt.ticks -= BBT_Time::ticks_per_beat;
4400 pos_bbt.beats += op.beats;
4401 /* the meter in effect will start on the bar */
4402 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();
4403 while (pos_bbt.beats >= divisions_per_bar + 1) {
4405 divisions_per_bar = meter_section_at_beat (beat_at_bbt_locked (_metrics, BBT_Time (pos_bbt.bars + op.bars, 1, 0))).divisions_per_bar();
4406 pos_bbt.beats -= divisions_per_bar;
4408 pos_bbt.bars += op.bars;
4410 return frame_at_minute (minute_at_bbt_locked (_metrics, pos_bbt));
4413 /** Count the number of beats that are equivalent to distance when going forward,
4417 TempoMap::framewalk_to_qn (framepos_t pos, framecnt_t distance) const
4419 Glib::Threads::RWLock::ReaderLock lm (lock);
4421 return Evoral::Beats (quarter_notes_between_frames_locked (_metrics, pos, pos + distance));
4425 bool operator() (const BBT_Time& a, const BBT_Time& b) {
4431 operator<< (std::ostream& o, const Meter& m) {
4432 return o << m.divisions_per_bar() << '/' << m.note_divisor();
4436 operator<< (std::ostream& o, const Tempo& t) {
4437 return o << t.note_types_per_minute() << " 1/" << t.note_type() << "'s per minute";
4441 operator<< (std::ostream& o, const MetricSection& section) {
4443 o << "MetricSection @ " << section.frame() << ' ';
4445 const TempoSection* ts;
4446 const MeterSection* ms;
4448 if ((ts = dynamic_cast<const TempoSection*> (§ion)) != 0) {
4449 o << *((const Tempo*) ts);
4450 } else if ((ms = dynamic_cast<const MeterSection*> (§ion)) != 0) {
4451 o << *((const Meter*) ms);