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