amend previous commit
[ardour.git] / gtk2_ardour / editor_tempodisplay.cc
1 /*
2     Copyright (C) 2002 Paul Davis
3
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.
8
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.
13
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.
17
18 */
19
20 #ifdef WAF_BUILD
21 #include "gtk2ardour-config.h"
22 #endif
23
24 #include <cstdio> // for sprintf, grrr
25 #include <cstdlib>
26 #include <cmath>
27 #include <string>
28 #include <climits>
29
30 #include "pbd/error.h"
31 #include "pbd/memento_command.h"
32
33 #include <gtkmm2ext/utils.h>
34 #include <gtkmm2ext/gtk_ui.h>
35
36 #include "ardour/session.h"
37 #include "ardour/tempo.h"
38 #include <gtkmm2ext/doi.h>
39 #include <gtkmm2ext/utils.h>
40
41 #include "canvas/canvas.h"
42 #include "canvas/item.h"
43 #include "canvas/line_set.h"
44
45 #include "editor.h"
46 #include "marker.h"
47 #include "tempo_dialog.h"
48 #include "rgb_macros.h"
49 #include "gui_thread.h"
50 #include "time_axis_view.h"
51 #include "tempo_lines.h"
52 #include "ui_config.h"
53
54 #include "pbd/i18n.h"
55
56 using namespace std;
57 using namespace ARDOUR;
58 using namespace PBD;
59 using namespace Gtk;
60 using namespace Gtkmm2ext;
61 using namespace Editing;
62
63 void
64 Editor::remove_metric_marks ()
65 {
66         /* don't delete these while handling events, just punt till the GUI is idle */
67
68         for (Marks::iterator x = metric_marks.begin(); x != metric_marks.end(); ++x) {
69                 delete_when_idle (*x);
70         }
71         metric_marks.clear ();
72
73         for (Curves::iterator x = tempo_curves.begin(); x != tempo_curves.end(); ++x) {
74                 delete (*x);
75         }
76         tempo_curves.clear ();
77 }
78
79 void
80 Editor::draw_metric_marks (const Metrics& metrics)
81 {
82         char buf[64];
83         double max_tempo = 0.0;
84         double min_tempo = DBL_MAX;
85
86         remove_metric_marks (); // also clears tempo curves
87
88         for (Metrics::const_iterator i = metrics.begin(); i != metrics.end(); ++i) {
89                 const MeterSection *ms;
90                 const TempoSection *ts;
91
92                 if ((ms = dynamic_cast<const MeterSection*>(*i)) != 0) {
93                         snprintf (buf, sizeof(buf), "%g/%g", ms->divisions_per_bar(), ms->note_divisor ());
94                         if (ms->position_lock_style() == MusicTime) {
95                                 metric_marks.push_back (new MeterMarker (*this, *meter_group, UIConfiguration::instance().color ("meter marker music"), buf,
96                                                                          *(const_cast<MeterSection*>(ms))));
97                         } else {
98                                 metric_marks.push_back (new MeterMarker (*this, *meter_group, UIConfiguration::instance().color ("meter marker"), buf,
99                                                                          *(const_cast<MeterSection*>(ms))));
100                         }
101                 } else if ((ts = dynamic_cast<const TempoSection*>(*i)) != 0) {
102                         if (UIConfiguration::instance().get_allow_non_quarter_pulse()) {
103                                 snprintf (buf, sizeof (buf), "%.3f/%.0f", ts->note_types_per_minute(), ts->note_type());
104                         } else {
105                                 snprintf (buf, sizeof (buf), "%.3f", ts->note_types_per_minute());
106                         }
107
108                         max_tempo = max (max_tempo, ts->note_types_per_minute());
109                         min_tempo = min (min_tempo, ts->note_types_per_minute());
110
111                         tempo_curves.push_back (new TempoCurve (*this, *tempo_group, UIConfiguration::instance().color ("tempo curve"),
112                                                                 *(const_cast<TempoSection*>(ts)), ts->frame(), false));
113                         if (ts->position_lock_style() == MusicTime) {
114                                 metric_marks.push_back (new TempoMarker (*this, *tempo_group, UIConfiguration::instance().color ("tempo marker music"), buf,
115                                                                  *(const_cast<TempoSection*>(ts))));
116                         } else {
117                                 metric_marks.push_back (new TempoMarker (*this, *tempo_group, UIConfiguration::instance().color ("tempo marker"), buf,
118                                                                  *(const_cast<TempoSection*>(ts))));
119                         }
120
121                 }
122
123         }
124
125         const double min_tempo_range = 5.0;
126         const double tempo_delta = fabs (max_tempo - min_tempo);
127
128         if (tempo_delta < min_tempo_range) {
129                 max_tempo += min_tempo_range - tempo_delta;
130                 min_tempo += tempo_delta - min_tempo_range;
131         }
132
133         for (Curves::iterator x = tempo_curves.begin(); x != tempo_curves.end(); ) {
134                 Curves::iterator tmp = x;
135                 (*x)->set_max_tempo (max_tempo);
136                 (*x)->set_min_tempo (min_tempo);
137                 ++tmp;
138                 if (tmp != tempo_curves.end()) {
139                         (*x)->set_position ((*x)->tempo().frame(), (*tmp)->tempo().frame());
140                 } else {
141                         (*x)->set_position ((*x)->tempo().frame(), UINT32_MAX);
142                 }
143                 ++x;
144         }
145
146         for (Marks::iterator x = metric_marks.begin(); x != metric_marks.end(); ++x) {
147                 TempoMarker* tempo_marker;
148
149                 if ((tempo_marker = dynamic_cast<TempoMarker*> (*x)) != 0) {
150                         tempo_marker->update_height_mark ((tempo_marker->tempo().note_types_per_minute() - min_tempo) / max (10.0, max_tempo - min_tempo));
151                 }
152         }
153 }
154
155
156 void
157 Editor::tempo_map_changed (const PropertyChange& /*ignored*/)
158 {
159         if (!_session) {
160                 return;
161         }
162
163         ENSURE_GUI_THREAD (*this, &Editor::tempo_map_changed, ignored);
164
165         if (tempo_lines) {
166                 tempo_lines->tempo_map_changed();
167         }
168
169         compute_bbt_ruler_scale (leftmost_frame, leftmost_frame + current_page_samples());
170         std::vector<TempoMap::BBTPoint> grid;
171         if (bbt_ruler_scale != bbt_show_many) {
172                 compute_current_bbt_points (grid, leftmost_frame, leftmost_frame + current_page_samples());
173         }
174         _session->tempo_map().apply_with_metrics (*this, &Editor::draw_metric_marks); // redraw metric markers
175         draw_measures (grid);
176         update_tempo_based_rulers ();
177 }
178
179 struct CurveComparator {
180         bool operator() (TempoCurve const * a, TempoCurve const * b) {
181                 return a->tempo().frame() < b->tempo().frame();
182         }
183 };
184
185 void
186 Editor::marker_position_changed ()
187 {
188         if (!_session) {
189                 return;
190         }
191
192         ENSURE_GUI_THREAD (*this, &Editor::tempo_map_changed);
193
194         if (tempo_lines) {
195                 tempo_lines->tempo_map_changed();
196         }
197
198         double max_tempo = 0.0;
199         double min_tempo = DBL_MAX;
200
201         for (Marks::iterator x = metric_marks.begin(); x != metric_marks.end(); ++x) {
202                 TempoMarker* tempo_marker;
203                 MeterMarker* meter_marker;
204                 const TempoSection *ts;
205                 const MeterSection *ms;
206
207                 if ((tempo_marker = dynamic_cast<TempoMarker*> (*x)) != 0) {
208                         if ((ts = &tempo_marker->tempo()) != 0) {
209                                 tempo_marker->set_position (ts->frame ());
210                                 char buf[64];
211
212                                 if (UIConfiguration::instance().get_allow_non_quarter_pulse()) {
213                                         snprintf (buf, sizeof (buf), "%.3f/%.0f", ts->note_types_per_minute(), ts->note_type());
214                                 } else {
215                                         snprintf (buf, sizeof (buf), "%.3f", ts->note_types_per_minute());
216                                 }
217
218                                 tempo_marker->set_name (buf);
219
220                                 max_tempo = max (max_tempo, ts->note_types_per_minute());
221                                 min_tempo = min (min_tempo, ts->note_types_per_minute());
222                         }
223                 }
224                 if ((meter_marker = dynamic_cast<MeterMarker*> (*x)) != 0) {
225                         if ((ms = &meter_marker->meter()) != 0) {
226                                 meter_marker->set_position (ms->frame ());
227                         }
228                 }
229         }
230
231         tempo_curves.sort (CurveComparator());
232
233         const double min_tempo_range = 5.0;
234         const double tempo_delta = fabs (max_tempo - min_tempo);
235
236         if (tempo_delta < min_tempo_range) {
237                 max_tempo += min_tempo_range - tempo_delta;
238                 min_tempo += tempo_delta - min_tempo_range;
239         }
240
241         for (Curves::iterator x = tempo_curves.begin(); x != tempo_curves.end(); ) {
242                 Curves::iterator tmp = x;
243                 (*x)->set_max_tempo (max_tempo);
244                 (*x)->set_min_tempo (min_tempo);
245                 ++tmp;
246                 if (tmp != tempo_curves.end()) {
247                         (*x)->set_position ((*x)->tempo().frame(), (*tmp)->tempo().frame());
248                 } else {
249                         (*x)->set_position ((*x)->tempo().frame(), UINT32_MAX);
250                 }
251                 ++x;
252         }
253
254         for (Marks::iterator x = metric_marks.begin(); x != metric_marks.end(); ++x) {
255                 TempoMarker* tempo_marker;
256                 if ((tempo_marker = dynamic_cast<TempoMarker*> (*x)) != 0) {
257                         tempo_marker->update_height_mark ((tempo_marker->tempo().note_types_per_minute() - min_tempo) / max (max_tempo - min_tempo, 10.0));
258                 }
259         }
260
261         compute_bbt_ruler_scale (leftmost_frame, leftmost_frame + current_page_samples());
262         std::vector<TempoMap::BBTPoint> grid;
263
264         if (bbt_ruler_scale != bbt_show_many) {
265                 compute_current_bbt_points (grid, leftmost_frame, leftmost_frame + current_page_samples());
266         }
267
268         draw_measures (grid);
269         update_tempo_based_rulers ();
270 }
271
272 void
273 Editor::redisplay_tempo (bool immediate_redraw)
274 {
275         if (!_session) {
276                 return;
277         }
278
279         if (immediate_redraw) {
280                 compute_bbt_ruler_scale (leftmost_frame, leftmost_frame + current_page_samples());
281                 std::vector<TempoMap::BBTPoint> grid;
282
283                 if (bbt_ruler_scale != bbt_show_many) {
284                         compute_current_bbt_points (grid, leftmost_frame, leftmost_frame + current_page_samples());
285                 }
286
287                 draw_measures (grid);
288                 update_tempo_based_rulers (); // redraw rulers and measure lines
289
290         } else {
291                 Glib::signal_idle().connect (sigc::bind_return (sigc::bind (sigc::mem_fun (*this, &Editor::redisplay_tempo), true), false));
292         }
293 }
294
295 /* computes a grid starting a beat before and ending a beat after leftmost and rightmost respectively */
296 void
297 Editor::compute_current_bbt_points (std::vector<TempoMap::BBTPoint>& grid, framepos_t leftmost, framepos_t rightmost)
298 {
299         if (!_session) {
300                 return;
301         }
302
303         /* prevent negative values of leftmost from creeping into tempomap
304          */
305         const double lower_beat = floor (max (0.0, _session->tempo_map().beat_at_frame (leftmost))) - 1.0;
306         switch (bbt_ruler_scale) {
307
308         case bbt_show_beats:
309         case bbt_show_ticks:
310         case bbt_show_ticks_detail:
311         case bbt_show_ticks_super_detail:
312                 _session->tempo_map().get_grid (grid, max (_session->tempo_map().frame_at_beat (lower_beat), (framepos_t) 0), rightmost);
313                 break;
314
315         case bbt_show_1:
316                 _session->tempo_map().get_grid (grid, max (_session->tempo_map().frame_at_beat (lower_beat), (framepos_t) 0), rightmost, 1);
317                 break;
318
319         case bbt_show_4:
320                 _session->tempo_map().get_grid (grid, max (_session->tempo_map().frame_at_beat (lower_beat), (framepos_t) 0), rightmost, 4);
321                 break;
322
323         case bbt_show_16:
324                 _session->tempo_map().get_grid (grid, max (_session->tempo_map().frame_at_beat (lower_beat), (framepos_t) 0), rightmost, 16);
325                 break;
326
327         case bbt_show_64:
328                 _session->tempo_map().get_grid (grid, max (_session->tempo_map().frame_at_beat (lower_beat), (framepos_t) 0), rightmost, 64);
329                 break;
330
331         default:
332                 /* bbt_show_many */
333                 _session->tempo_map().get_grid (grid, max (_session->tempo_map().frame_at_beat (lower_beat), (framepos_t) 0), rightmost, 128);
334                 break;
335         }
336 }
337
338 void
339 Editor::hide_measures ()
340 {
341         if (tempo_lines) {
342                 tempo_lines->hide();
343         }
344 }
345
346 void
347 Editor::draw_measures (std::vector<ARDOUR::TempoMap::BBTPoint>& grid)
348 {
349         if (_session == 0 || _show_measures == false || distance (grid.begin(), grid.end()) == 0) {
350                 return;
351         }
352
353         if (tempo_lines == 0) {
354                 tempo_lines = new TempoLines (time_line_group, ArdourCanvas::LineSet::Vertical);
355         }
356
357         const unsigned divisions = get_grid_beat_divisions(leftmost_frame);
358         tempo_lines->draw (grid, divisions, leftmost_frame, _session->frame_rate());
359 }
360
361 void
362 Editor::mouse_add_new_tempo_event (framepos_t frame)
363 {
364         if (_session == 0) {
365                 return;
366         }
367
368         TempoMap& map(_session->tempo_map());
369
370         begin_reversible_command (_("add tempo mark"));
371         const double pulse = map.exact_qn_at_frame (frame, get_grid_music_divisions (0)) / 4.0;
372
373         if (pulse > 0.0) {
374                 XMLNode &before = map.get_state();
375                 /* add music-locked ramped (?) tempo using the bpm/note type at frame*/
376                 map.add_tempo (map.tempo_at_frame (frame), pulse, 0, TempoSection::Ramp, MusicTime);
377
378                 XMLNode &after = map.get_state();
379                 _session->add_command(new MementoCommand<TempoMap>(map, &before, &after));
380                 commit_reversible_command ();
381         }
382
383         //map.dump (cerr);
384 }
385
386 void
387 Editor::mouse_add_new_meter_event (framepos_t frame)
388 {
389         if (_session == 0) {
390                 return;
391         }
392
393
394         TempoMap& map(_session->tempo_map());
395         MeterDialog meter_dialog (map, frame, _("add"));
396
397         switch (meter_dialog.run ()) {
398         case RESPONSE_ACCEPT:
399                 break;
400         default:
401                 return;
402         }
403
404         double bpb = meter_dialog.get_bpb ();
405         bpb = max (1.0, bpb); // XXX is this a reasonable limit?
406
407         double note_type = meter_dialog.get_note_type ();
408
409         Timecode::BBT_Time requested;
410         meter_dialog.get_bbt_time (requested);
411
412         const double beat = map.beat_at_bbt (requested);
413
414         begin_reversible_command (_("add meter mark"));
415         XMLNode &before = map.get_state();
416
417         if (meter_dialog.get_lock_style() == MusicTime) {
418                 map.add_meter (Meter (bpb, note_type), beat, requested, MusicTime);
419         } else {
420                 map.add_meter (Meter (bpb, note_type), beat, requested, AudioTime);
421         }
422
423         _session->add_command(new MementoCommand<TempoMap>(map, &before, &map.get_state()));
424         commit_reversible_command ();
425
426         //map.dump (cerr);
427 }
428
429 void
430 Editor::remove_tempo_marker (ArdourCanvas::Item* item)
431 {
432         ArdourMarker* marker;
433         TempoMarker* tempo_marker;
434
435         if ((marker = reinterpret_cast<ArdourMarker *> (item->get_data ("marker"))) == 0) {
436                 fatal << _("programming error: tempo marker canvas item has no marker object pointer!") << endmsg;
437                 abort(); /*NOTREACHED*/
438         }
439
440         if ((tempo_marker = dynamic_cast<TempoMarker*> (marker)) == 0) {
441                 fatal << _("programming error: marker for tempo is not a tempo marker!") << endmsg;
442                 abort(); /*NOTREACHED*/
443         }
444
445         if (!tempo_marker->tempo().initial()) {
446                 Glib::signal_idle().connect (sigc::bind (sigc::mem_fun(*this, &Editor::real_remove_tempo_marker), &tempo_marker->tempo()));
447         }
448 }
449
450 void
451 Editor::edit_meter_section (MeterSection* section)
452 {
453         MeterDialog meter_dialog (_session->tempo_map(), *section, _("done"));
454
455         switch (meter_dialog.run()) {
456         case RESPONSE_ACCEPT:
457                 break;
458         default:
459                 return;
460         }
461
462         double bpb = meter_dialog.get_bpb ();
463         bpb = max (1.0, bpb); // XXX is this a reasonable limit?
464
465         double const note_type = meter_dialog.get_note_type ();
466         const Meter meter (bpb, note_type);
467
468         Timecode::BBT_Time when;
469         meter_dialog.get_bbt_time (when);
470
471         const PositionLockStyle pls = (meter_dialog.get_lock_style() == AudioTime) ? AudioTime : MusicTime;
472
473         begin_reversible_command (_("replace meter mark"));
474         XMLNode &before = _session->tempo_map().get_state();
475
476         _session->tempo_map().replace_meter (*section, meter, when, pls);
477
478         XMLNode &after = _session->tempo_map().get_state();
479         _session->add_command(new MementoCommand<TempoMap>(_session->tempo_map(), &before, &after));
480         commit_reversible_command ();
481 }
482
483 void
484 Editor::edit_tempo_section (TempoSection* section)
485 {
486         TempoDialog tempo_dialog (_session->tempo_map(), *section, _("done"));
487
488         switch (tempo_dialog.run ()) {
489         case RESPONSE_ACCEPT:
490                 break;
491         default:
492                 return;
493         }
494
495         double bpm = tempo_dialog.get_bpm ();
496         double nt = tempo_dialog.get_note_type ();
497         bpm = max (0.01, bpm);
498         const Tempo tempo (bpm, nt);
499
500         Timecode::BBT_Time when;
501         tempo_dialog.get_bbt_time (when);
502
503         const TempoSection::Type ttype (tempo_dialog.get_tempo_type());
504
505         begin_reversible_command (_("replace tempo mark"));
506         XMLNode &before = _session->tempo_map().get_state();
507
508         if (tempo_dialog.get_lock_style() == AudioTime) {
509                 framepos_t const f = _session->tempo_map().predict_tempo_position (section, when).second;
510                 _session->tempo_map().replace_tempo (*section, tempo, 0.0, f, ttype, AudioTime);
511         } else {
512                 double const p = _session->tempo_map().predict_tempo_position (section, when).first;
513                 _session->tempo_map().replace_tempo (*section, tempo, p, 0, ttype, MusicTime);
514         }
515
516         XMLNode &after = _session->tempo_map().get_state();
517         _session->add_command (new MementoCommand<TempoMap>(_session->tempo_map(), &before, &after));
518         commit_reversible_command ();
519 }
520
521 void
522 Editor::edit_tempo_marker (TempoMarker& tm)
523 {
524         edit_tempo_section (&tm.tempo());
525 }
526
527 void
528 Editor::edit_meter_marker (MeterMarker& mm)
529 {
530         edit_meter_section (&mm.meter());
531 }
532
533 gint
534 Editor::real_remove_tempo_marker (TempoSection *section)
535 {
536         begin_reversible_command (_("remove tempo mark"));
537         XMLNode &before = _session->tempo_map().get_state();
538         _session->tempo_map().remove_tempo (*section, true);
539         XMLNode &after = _session->tempo_map().get_state();
540         _session->add_command(new MementoCommand<TempoMap>(_session->tempo_map(), &before, &after));
541         commit_reversible_command ();
542
543         return FALSE;
544 }
545
546 void
547 Editor::remove_meter_marker (ArdourCanvas::Item* item)
548 {
549         ArdourMarker* marker;
550         MeterMarker* meter_marker;
551
552         if ((marker = reinterpret_cast<ArdourMarker *> (item->get_data ("marker"))) == 0) {
553                 fatal << _("programming error: meter marker canvas item has no marker object pointer!") << endmsg;
554                 abort(); /*NOTREACHED*/
555         }
556
557         if ((meter_marker = dynamic_cast<MeterMarker*> (marker)) == 0) {
558                 fatal << _("programming error: marker for meter is not a meter marker!") << endmsg;
559                 abort(); /*NOTREACHED*/
560         }
561
562         if (!meter_marker->meter().initial()) {
563           Glib::signal_idle().connect (sigc::bind (sigc::mem_fun(*this, &Editor::real_remove_meter_marker), &meter_marker->meter()));
564         }
565 }
566
567 gint
568 Editor::real_remove_meter_marker (MeterSection *section)
569 {
570         begin_reversible_command (_("remove tempo mark"));
571         XMLNode &before = _session->tempo_map().get_state();
572         _session->tempo_map().remove_meter (*section, true);
573         XMLNode &after = _session->tempo_map().get_state();
574         _session->add_command(new MementoCommand<TempoMap>(_session->tempo_map(), &before, &after));
575         commit_reversible_command ();
576
577         return FALSE;
578 }