tempo editing updates
[ardour.git] / gtk2_ardour / editor_markers.cc
1 /*
2     Copyright (C) 2000 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 #include <cstdlib>
21 #include <cmath>
22
23 #include <gtkmm2ext/gtk_ui.h>
24
25 #include "ardour/session.h"
26 #include "ardour/location.h"
27 #include "ardour/profile.h"
28 #include "pbd/memento_command.h"
29
30 #include "canvas/canvas.h"
31 #include "canvas/item.h"
32 #include "canvas/rectangle.h"
33
34 #include "editor.h"
35 #include "marker.h"
36 #include "selection.h"
37 #include "editing.h"
38 #include "gui_thread.h"
39 #include "actions.h"
40 #include "prompter.h"
41 #include "editor_drag.h"
42
43 #include "pbd/i18n.h"
44
45 using namespace std;
46 using namespace ARDOUR;
47 using namespace PBD;
48 using namespace Gtk;
49 using namespace Gtkmm2ext;
50
51 void
52 Editor::clear_marker_display ()
53 {
54         for (LocationMarkerMap::iterator i = location_markers.begin(); i != location_markers.end(); ++i) {
55                 delete i->second;
56         }
57
58         location_markers.clear ();
59         _sorted_marker_lists.clear ();
60 }
61
62 void
63 Editor::add_new_location (Location *location)
64 {
65         ENSURE_GUI_THREAD (*this, &Editor::add_new_location, location);
66
67         ArdourCanvas::Container* group = add_new_location_internal (location);
68
69         /* Do a full update of the markers in this group */
70         update_marker_labels (group);
71
72         if (location->is_auto_punch()) {
73                 update_punch_range_view ();
74         }
75
76         if (location->is_auto_loop()) {
77                 update_loop_range_view ();
78         }
79 }
80
81 /** Add a new location, without a time-consuming update of all marker labels;
82  *  the caller must call update_marker_labels () after calling this.
83  *  @return canvas group that the location's marker was added to.
84  */
85 ArdourCanvas::Container*
86 Editor::add_new_location_internal (Location* location)
87 {
88         LocationMarkers *lam = new LocationMarkers;
89         uint32_t color;
90
91         /* make a note here of which group this marker ends up in */
92         ArdourCanvas::Container* group = 0;
93
94         if (location->is_cd_marker()) {
95                 color = location_cd_marker_color;
96         } else if (location->is_mark()) {
97                 color = location_marker_color;
98         } else if (location->is_auto_loop()) {
99                 color = location_loop_color;
100         } else if (location->is_auto_punch()) {
101                 color = location_punch_color;
102         } else {
103                 color = location_range_color;
104         }
105
106         if (location->is_mark()) {
107
108                 if (location->is_cd_marker() && ruler_cd_marker_action->get_active()) {
109                         lam->start = new ArdourMarker (*this, *cd_marker_group, color, location->name(), ArdourMarker::Mark, location->start());
110                         group = cd_marker_group;
111                 } else {
112                         lam->start = new ArdourMarker (*this, *marker_group, color, location->name(), ArdourMarker::Mark, location->start());
113                         group = marker_group;
114                 }
115
116                 lam->end = 0;
117
118         } else if (location->is_auto_loop()) {
119
120                 // transport marker
121                 lam->start = new ArdourMarker (*this, *transport_marker_group, color,
122                                          location->name(), ArdourMarker::LoopStart, location->start());
123                 lam->end   = new ArdourMarker (*this, *transport_marker_group, color,
124                                          location->name(), ArdourMarker::LoopEnd, location->end());
125                 group = transport_marker_group;
126
127         } else if (location->is_auto_punch()) {
128
129                 // transport marker
130                 lam->start = new ArdourMarker (*this, *transport_marker_group, color,
131                                          location->name(), ArdourMarker::PunchIn, location->start());
132                 lam->end   = new ArdourMarker (*this, *transport_marker_group, color,
133                                          location->name(), ArdourMarker::PunchOut, location->end());
134                 group = transport_marker_group;
135
136         } else if (location->is_session_range()) {
137
138                 // session range
139                 lam->start = new ArdourMarker (*this, *marker_group, color, _("start"), ArdourMarker::SessionStart, location->start());
140                 lam->end = new ArdourMarker (*this, *marker_group, color, _("end"), ArdourMarker::SessionEnd, location->end());
141                 group = marker_group;
142
143         } else {
144                 // range marker
145                 if (location->is_cd_marker() && ruler_cd_marker_action->get_active()) {
146                         lam->start = new ArdourMarker (*this, *cd_marker_group, color,
147                                                  location->name(), ArdourMarker::RangeStart, location->start());
148                         lam->end   = new ArdourMarker (*this, *cd_marker_group, color,
149                                                  location->name(), ArdourMarker::RangeEnd, location->end());
150                         group = cd_marker_group;
151                 } else {
152                         lam->start = new ArdourMarker (*this, *range_marker_group, color,
153                                                  location->name(), ArdourMarker::RangeStart, location->start());
154                         lam->end   = new ArdourMarker (*this, *range_marker_group, color,
155                                                  location->name(), ArdourMarker::RangeEnd, location->end());
156                         group = range_marker_group;
157                 }
158         }
159
160         if (location->is_hidden ()) {
161                 lam->hide();
162         } else {
163                 lam->show ();
164         }
165
166         location->name_changed.connect (*this, invalidator (*this), boost::bind (&Editor::location_changed, this, _1), gui_context());
167         location->FlagsChanged.connect (*this, invalidator (*this), boost::bind (&Editor::location_flags_changed, this, location), gui_context());
168
169         pair<Location*,LocationMarkers*> newpair;
170
171         newpair.first = location;
172         newpair.second = lam;
173
174         location_markers.insert (newpair);
175
176         if (select_new_marker && location->is_mark()) {
177                 selection->set (lam->start);
178                 select_new_marker = false;
179         }
180
181         lam->canvas_height_set (_visible_canvas_height);
182         lam->set_show_lines (_show_marker_lines);
183
184         /* Add these markers to the appropriate sorted marker lists, which will render
185            them unsorted until a call to update_marker_labels() sorts them out.
186         */
187         _sorted_marker_lists[group].push_back (lam->start);
188         if (lam->end) {
189                 _sorted_marker_lists[group].push_back (lam->end);
190         }
191
192         return group;
193 }
194
195 void
196 Editor::location_changed (Location *location)
197 {
198         ENSURE_GUI_THREAD (*this, &Editor::location_changed, location)
199
200         LocationMarkers *lam = find_location_markers (location);
201
202         if (lam == 0) {
203                 /* a location that isn't "marked" with markers */
204                 return;
205         }
206
207         lam->set_name (location->name ());
208         lam->set_position (location->start(), location->end());
209
210         if (location->is_auto_loop()) {
211                 update_loop_range_view ();
212         } else if (location->is_auto_punch()) {
213                 update_punch_range_view ();
214         }
215
216         check_marker_label (lam->start);
217         if (lam->end) {
218                 check_marker_label (lam->end);
219         }
220 }
221
222 /** Look at a marker and check whether its label, and those of the previous and next markers,
223  *  need to have their labels updated (in case those labels need to be shortened or can be
224  *  lengthened)
225  */
226 void
227 Editor::check_marker_label (ArdourMarker* m)
228 {
229         /* Get a time-ordered list of markers from the last time anything changed */
230         std::list<ArdourMarker*>& sorted = _sorted_marker_lists[m->get_parent()];
231
232         list<ArdourMarker*>::iterator i = find (sorted.begin(), sorted.end(), m);
233
234         list<ArdourMarker*>::iterator prev = sorted.end ();
235         list<ArdourMarker*>::iterator next = i;
236         ++next;
237
238         /* Look to see if the previous marker is still behind `m' in time */
239         if (i != sorted.begin()) {
240
241                 prev = i;
242                 --prev;
243
244                 if ((*prev)->position() > m->position()) {
245                         /* This marker is no longer in the correct order with the previous one, so
246                          * update all the markers in this group.
247                          */
248                         update_marker_labels (m->get_parent ());
249                         return;
250                 }
251         }
252
253         /* Look to see if the next marker is still ahead of `m' in time */
254         if (next != sorted.end() && (*next)->position() < m->position()) {
255                 /* This marker is no longer in the correct order with the next one, so
256                  * update all the markers in this group.
257                  */
258                 update_marker_labels (m->get_parent ());
259                 return;
260         }
261
262         if (prev != sorted.end()) {
263
264                 /* Update just the available space between the previous marker and this one */
265
266                 double const p = sample_to_pixel (m->position() - (*prev)->position());
267
268                 if (m->label_on_left()) {
269                         (*prev)->set_right_label_limit (p / 2);
270                 } else {
271                         (*prev)->set_right_label_limit (p);
272                 }
273
274                 if ((*prev)->label_on_left ()) {
275                         m->set_left_label_limit (p);
276                 } else {
277                         m->set_left_label_limit (p / 2);
278                 }
279         }
280
281         if (next != sorted.end()) {
282
283                 /* Update just the available space between this marker and the next */
284
285                 double const p = sample_to_pixel ((*next)->position() - m->position());
286
287                 if ((*next)->label_on_left()) {
288                         m->set_right_label_limit (p / 2);
289                 } else {
290                         m->set_right_label_limit (p);
291                 }
292
293                 if (m->label_on_left()) {
294                         (*next)->set_left_label_limit (p);
295                 } else {
296                         (*next)->set_left_label_limit (p / 2);
297                 }
298         }
299 }
300
301 struct MarkerComparator {
302         bool operator() (ArdourMarker const * a, ArdourMarker const * b) {
303                 return a->position() < b->position();
304         }
305 };
306
307 /** Update all marker labels in all groups */
308 void
309 Editor::update_marker_labels ()
310 {
311         for (std::map<ArdourCanvas::Container *, std::list<ArdourMarker *> >::iterator i = _sorted_marker_lists.begin(); i != _sorted_marker_lists.end(); ++i) {
312                 update_marker_labels (i->first);
313         }
314 }
315
316 /** Look at all markers in a group and update label widths */
317 void
318 Editor::update_marker_labels (ArdourCanvas::Container* group)
319 {
320         list<ArdourMarker*>& sorted = _sorted_marker_lists[group];
321
322         if (sorted.empty()) {
323                 return;
324         }
325
326         /* We sort the list of markers and then set up the space available between each one */
327
328         sorted.sort (MarkerComparator ());
329
330         list<ArdourMarker*>::iterator i = sorted.begin ();
331
332         list<ArdourMarker*>::iterator prev = sorted.end ();
333         list<ArdourMarker*>::iterator next = i;
334
335         if (next != sorted.end()) {
336                 ++next;
337         }
338
339         while (i != sorted.end()) {
340
341                 if (prev != sorted.end()) {
342                         double const p = sample_to_pixel ((*i)->position() - (*prev)->position());
343
344                         if ((*prev)->label_on_left()) {
345                                 (*i)->set_left_label_limit (p);
346                         } else {
347                                 (*i)->set_left_label_limit (p / 2);
348                         }
349
350                 }
351
352                 if (next != sorted.end()) {
353                         double const p = sample_to_pixel ((*next)->position() - (*i)->position());
354
355                         if ((*next)->label_on_left()) {
356                                 (*i)->set_right_label_limit (p / 2);
357                         } else {
358                                 (*i)->set_right_label_limit (p);
359                         }
360
361                         ++next;
362                 }
363
364                 prev = i;
365                 ++i;
366         }
367 }
368
369 void
370 Editor::location_flags_changed (Location *location)
371 {
372         ENSURE_GUI_THREAD (*this, &Editor::location_flags_changed, location, src)
373
374         LocationMarkers *lam = find_location_markers (location);
375
376         if (lam == 0) {
377                 /* a location that isn't "marked" with markers */
378                 return;
379         }
380
381         // move cd markers to/from cd marker bar as appropriate
382         ensure_cd_marker_updated (lam, location);
383
384         if (location->is_cd_marker()) {
385                 lam->set_color_rgba (location_cd_marker_color);
386         } else if (location->is_mark()) {
387                 lam->set_color_rgba (location_marker_color);
388         } else if (location->is_auto_punch()) {
389                 lam->set_color_rgba (location_punch_color);
390         } else if (location->is_auto_loop()) {
391                 lam->set_color_rgba (location_loop_color);
392         } else {
393                 lam->set_color_rgba (location_range_color);
394         }
395
396         if (location->is_hidden()) {
397                 lam->hide();
398         } else {
399                 lam->show ();
400         }
401 }
402
403 void Editor::update_cd_marker_display ()
404 {
405         for (LocationMarkerMap::iterator i = location_markers.begin(); i != location_markers.end(); ++i) {
406                 LocationMarkers * lam = i->second;
407                 Location * location = i->first;
408
409                 ensure_cd_marker_updated (lam, location);
410         }
411 }
412
413 void Editor::ensure_cd_marker_updated (LocationMarkers * lam, Location * location)
414 {
415         if (location->is_cd_marker()
416             && (ruler_cd_marker_action->get_active() &&  lam->start->get_parent() != cd_marker_group))
417         {
418                 //cerr << "reparenting non-cd marker so it can be relocated: " << location->name() << endl;
419                 if (lam->start) {
420                         lam->start->reparent (*cd_marker_group);
421                 }
422                 if (lam->end) {
423                         lam->end->reparent (*cd_marker_group);
424                 }
425         }
426         else if ( (!location->is_cd_marker() || !ruler_cd_marker_action->get_active())
427                   && (lam->start->get_parent() == cd_marker_group))
428         {
429                 //cerr << "reparenting non-cd marker so it can be relocated: " << location->name() << endl;
430                 if (location->is_mark()) {
431                         if (lam->start) {
432                                 lam->start->reparent (*marker_group);
433                         }
434                         if (lam->end) {
435                                 lam->end->reparent (*marker_group);
436                         }
437                 }
438                 else {
439                         if (lam->start) {
440                                 lam->start->reparent (*range_marker_group);
441                         }
442                         if (lam->end) {
443                                 lam->end->reparent (*range_marker_group);
444                         }
445                 }
446         }
447 }
448
449 Editor::LocationMarkers::~LocationMarkers ()
450 {
451         delete start;
452         delete end;
453 }
454
455 Editor::LocationMarkers *
456 Editor::find_location_markers (Location *location) const
457 {
458         LocationMarkerMap::const_iterator i;
459
460         for (i = location_markers.begin(); i != location_markers.end(); ++i) {
461                 if ((*i).first == location) {
462                         return (*i).second;
463                 }
464         }
465
466         return 0;
467 }
468
469 Location *
470 Editor::find_location_from_marker (ArdourMarker *marker, bool& is_start) const
471 {
472         LocationMarkerMap::const_iterator i;
473
474         for (i = location_markers.begin(); i != location_markers.end(); ++i) {
475                 LocationMarkers *lm = (*i).second;
476                 if (lm->start == marker) {
477                         is_start = true;
478                         return (*i).first;
479                 } else if (lm->end == marker) {
480                         is_start = false;
481                         return (*i).first;
482                 }
483         }
484
485         return 0;
486 }
487
488 void
489 Editor::refresh_location_display_internal (const Locations::LocationList& locations)
490 {
491         /* invalidate all */
492
493         for (LocationMarkerMap::iterator i = location_markers.begin(); i != location_markers.end(); ++i) {
494                 i->second->valid = false;
495         }
496
497         /* add new ones */
498
499         for (Locations::LocationList::const_iterator i = locations.begin(); i != locations.end(); ++i) {
500
501                 LocationMarkerMap::iterator x;
502
503                 if ((x = location_markers.find (*i)) != location_markers.end()) {
504                         x->second->valid = true;
505                         continue;
506                 }
507
508                 add_new_location_internal (*i);
509         }
510
511         /* remove dead ones */
512
513         for (LocationMarkerMap::iterator i = location_markers.begin(); i != location_markers.end(); ) {
514
515                 LocationMarkerMap::iterator tmp;
516
517                 tmp = i;
518                 ++tmp;
519
520                 if (!i->second->valid) {
521
522                         remove_sorted_marker (i->second->start);
523                         if (i->second->end) {
524                                 remove_sorted_marker (i->second->end);
525                         }
526
527                         LocationMarkers* m = i->second;
528                         location_markers.erase (i);
529                         delete m;
530                 }
531
532                 i = tmp;
533         }
534
535         update_punch_range_view ();
536         update_loop_range_view ();
537 }
538
539 void
540 Editor::refresh_location_display ()
541 {
542         ENSURE_GUI_THREAD (*this, &Editor::refresh_location_display)
543
544         if (_session) {
545                 _session->locations()->apply (*this, &Editor::refresh_location_display_internal);
546         }
547
548         update_marker_labels ();
549 }
550
551 void
552 Editor::LocationMarkers::hide()
553 {
554         start->hide ();
555         if (end) {
556                 end->hide ();
557         }
558 }
559
560 void
561 Editor::LocationMarkers::show()
562 {
563         start->show ();
564         if (end) {
565                 end->show ();
566         }
567 }
568
569 void
570 Editor::LocationMarkers::canvas_height_set (double h)
571 {
572         start->canvas_height_set (h);
573         if (end) {
574                 end->canvas_height_set (h);
575         }
576 }
577
578 void
579 Editor::LocationMarkers::set_name (const string& str)
580 {
581         /* XXX: hack: don't change names of session start/end markers */
582
583         if (start->type() != ArdourMarker::SessionStart) {
584                 start->set_name (str);
585         }
586
587         if (end && end->type() != ArdourMarker::SessionEnd) {
588                 end->set_name (str);
589         }
590 }
591
592 void
593 Editor::LocationMarkers::set_position (framepos_t startf,
594                                        framepos_t endf)
595 {
596         start->set_position (startf);
597         if (end) {
598                 end->set_position (endf);
599         }
600 }
601
602 void
603 Editor::LocationMarkers::set_color_rgba (uint32_t rgba)
604 {
605         start->set_color_rgba (rgba);
606         if (end) {
607                 end->set_color_rgba (rgba);
608         }
609 }
610
611 void
612 Editor::LocationMarkers::set_show_lines (bool s)
613 {
614         start->set_show_line (s);
615         if (end) {
616                 end->set_show_line (s);
617         }
618 }
619
620 void
621 Editor::LocationMarkers::set_selected (bool s)
622 {
623         start->set_selected (s);
624         if (end) {
625                 end->set_selected (s);
626         }
627 }
628
629 void
630 Editor::LocationMarkers::setup_lines ()
631 {
632         start->setup_line ();
633         if (end) {
634                 end->setup_line ();
635         }
636 }
637
638 void
639 Editor::mouse_add_new_marker (framepos_t where, bool is_cd)
640 {
641         string markername;
642         int flags = (is_cd ? Location::IsCDMarker|Location::IsMark : Location::IsMark);
643
644         if (_session) {
645                 _session->locations()->next_available_name(markername, _("mark"));
646                 if (!choose_new_marker_name(markername)) {
647                         return;
648                 }
649                 Location *location = new Location (*_session, where, where, markername, (Location::Flags) flags, get_grid_music_divisions (0));
650                 begin_reversible_command (_("add marker"));
651
652                 XMLNode &before = _session->locations()->get_state();
653                 _session->locations()->add (location, true);
654                 XMLNode &after = _session->locations()->get_state();
655                 _session->add_command (new MementoCommand<Locations>(*(_session->locations()), &before, &after));
656
657                 /* find the marker we just added */
658
659                 LocationMarkers *lam = find_location_markers (location);
660                 if (lam) {
661                         /* make it the selected marker */
662                         selection->set (lam->start);
663                 }
664
665                 commit_reversible_command ();
666         }
667 }
668
669 void
670 Editor::mouse_add_new_loop (framepos_t where)
671 {
672         if (!_session) {
673                 return;
674         }
675
676         /* Make this marker 1/8th of the visible area of the session so that
677            it's reasonably easy to manipulate after creation.
678         */
679
680         framepos_t const end = where + current_page_samples() / 8;
681
682         set_loop_range (where, end,  _("set loop range"));
683 }
684
685 void
686 Editor::mouse_add_new_punch (framepos_t where)
687 {
688         if (!_session) {
689                 return;
690         }
691
692         /* Make this marker 1/8th of the visible area of the session so that
693            it's reasonably easy to manipulate after creation.
694         */
695
696         framepos_t const end = where + current_page_samples() / 8;
697
698         set_punch_range (where, end,  _("set punch range"));
699 }
700
701 void
702 Editor::mouse_add_new_range (framepos_t where)
703 {
704         if (!_session) {
705                 return;
706         }
707
708         /* Make this marker 1/8th of the visible area of the session so that
709            it's reasonably easy to manipulate after creation.
710         */
711
712         framepos_t const end = where + current_page_samples() / 8;
713
714         string name;
715         _session->locations()->next_available_name (name, _("range"));
716         Location* loc = new Location (*_session, where, end, name, Location::IsRangeMarker);
717
718         begin_reversible_command (_("new range marker"));
719         XMLNode& before = _session->locations()->get_state ();
720         _session->locations()->add (loc, true);
721         XMLNode& after = _session->locations()->get_state ();
722         _session->add_command (new MementoCommand<Locations> (*_session->locations(), &before, &after));
723         commit_reversible_command ();
724 }
725
726 void
727 Editor::remove_marker (ArdourCanvas::Item& item, GdkEvent*)
728 {
729         ArdourMarker* marker;
730         bool is_start;
731
732         if ((marker = static_cast<ArdourMarker*> (item.get_data ("marker"))) == 0) {
733                 fatal << _("programming error: marker canvas item has no marker object pointer!") << endmsg;
734                 abort(); /*NOTREACHED*/
735         }
736
737         if (entered_marker == marker) {
738                 entered_marker = NULL;
739         }
740
741         Location* loc = find_location_from_marker (marker, is_start);
742
743         if (_session && loc) {
744                 Glib::signal_idle().connect (sigc::bind (sigc::mem_fun(*this, &Editor::really_remove_marker), loc));
745         }
746 }
747
748 gint
749 Editor::really_remove_marker (Location* loc)
750 {
751         begin_reversible_command (_("remove marker"));
752         XMLNode &before = _session->locations()->get_state();
753         _session->locations()->remove (loc);
754         XMLNode &after = _session->locations()->get_state();
755         _session->add_command (new MementoCommand<Locations>(*(_session->locations()), &before, &after));
756         commit_reversible_command ();
757         return FALSE;
758 }
759
760 void
761 Editor::location_gone (Location *location)
762 {
763         ENSURE_GUI_THREAD (*this, &Editor::location_gone, location)
764
765         LocationMarkerMap::iterator i;
766
767         if (location == transport_loop_location()) {
768                 update_loop_range_view ();
769         }
770
771         if (location == transport_punch_location()) {
772                 update_punch_range_view ();
773         }
774
775         for (i = location_markers.begin(); i != location_markers.end(); ++i) {
776                 if (i->first == location) {
777
778                         remove_sorted_marker (i->second->start);
779                         if (i->second->end) {
780                                 remove_sorted_marker (i->second->end);
781                         }
782
783                         LocationMarkers* m = i->second;
784                         location_markers.erase (i);
785                         delete m;
786
787                         /* Markers that visually overlap with this (removed) marker
788                          * need to be re-displayed.
789                          * But finding such cases is similarly expensive as simply
790                          * re-displaying all..  so:
791                          */
792                         refresh_location_display ();
793                         break;
794                 }
795         }
796 }
797
798 void
799 Editor::tempo_or_meter_marker_context_menu (GdkEventButton* ev, ArdourCanvas::Item* item)
800 {
801         marker_menu_item = item;
802
803         MeterMarker* mm;
804         TempoMarker* tm;
805         dynamic_cast_marker_object (marker_menu_item->get_data ("marker"), &mm, &tm);
806
807         bool can_remove = false;
808
809         if (mm) {
810                 can_remove = !mm->meter().initial ();
811                 delete meter_marker_menu;
812                 build_meter_marker_menu (mm, can_remove);
813                 meter_marker_menu->popup (1, ev->time);
814         } else if (tm) {
815                 if (!tm->tempo().active()) {
816                         return;
817                 }
818                 can_remove = !tm->tempo().initial() && !tm->tempo().locked_to_meter();
819                 delete tempo_marker_menu;
820                 build_tempo_marker_menu (tm, can_remove);
821                 tempo_marker_menu->popup (1, ev->time);
822         } else {
823                 return;
824         }
825 }
826
827 void
828 Editor::marker_context_menu (GdkEventButton* ev, ArdourCanvas::Item* item)
829 {
830         ArdourMarker * marker;
831         if ((marker = reinterpret_cast<ArdourMarker *> (item->get_data("marker"))) == 0) {
832                 fatal << _("programming error: marker canvas item has no marker object pointer!") << endmsg;
833                 abort(); /*NOTREACHED*/
834         }
835
836         bool is_start;
837         Location * loc = find_location_from_marker (marker, is_start);
838
839         if (loc == transport_loop_location() || loc == transport_punch_location() || loc->is_session_range ()) {
840
841                 delete transport_marker_menu;
842                 build_range_marker_menu (loc, loc == transport_loop_location() || loc == transport_punch_location(), loc->is_session_range());
843
844                 marker_menu_item = item;
845                 transport_marker_menu->popup (1, ev->time);
846
847         } else if (loc->is_mark()) {
848
849                         delete marker_menu;
850                         build_marker_menu (loc);
851
852                 // GTK2FIX use action group sensitivity
853 #ifdef GTK2FIX
854                         if (children.size() >= 3) {
855                                 MenuItem * loopitem = &children[2];
856                                 if (loopitem) {
857                                         if (loc->is_mark()) {
858                                                 loopitem->set_sensitive(false);
859                                         }
860                                         else {
861                                                 loopitem->set_sensitive(true);
862                                         }
863                                 }
864                         }
865 #endif
866                         marker_menu_item = item;
867                         marker_menu->popup (1, ev->time);
868
869         } else if (loc->is_range_marker()) {
870                 delete range_marker_menu;
871                 build_range_marker_menu (loc, false, false);
872
873                 marker_menu_item = item;
874                 range_marker_menu->popup (1, ev->time);
875         }
876 }
877
878 void
879 Editor::new_transport_marker_context_menu (GdkEventButton* ev, ArdourCanvas::Item*)
880 {
881         if (new_transport_marker_menu == 0) {
882                 build_new_transport_marker_menu ();
883         }
884
885         new_transport_marker_menu->popup (1, ev->time);
886
887 }
888
889 void
890 Editor::build_marker_menu (Location* loc)
891 {
892         using namespace Menu_Helpers;
893
894         marker_menu = new Menu;
895
896         MenuList& items = marker_menu->items();
897         marker_menu->set_name ("ArdourContextMenu");
898
899         items.push_back (MenuElem (_("Locate to Here"), sigc::mem_fun(*this, &Editor::marker_menu_set_playhead)));
900         items.push_back (MenuElem (_("Play from Here"), sigc::mem_fun(*this, &Editor::marker_menu_play_from)));
901         items.push_back (MenuElem (_("Move Mark to Playhead"), sigc::mem_fun(*this, &Editor::marker_menu_set_from_playhead)));
902
903         items.push_back (SeparatorElem());
904
905         items.push_back (MenuElem (_("Create Range to Next Marker"), sigc::mem_fun(*this, &Editor::marker_menu_range_to_next)));
906
907         items.push_back (MenuElem (_("Hide"), sigc::mem_fun(*this, &Editor::marker_menu_hide)));
908         items.push_back (MenuElem (_("Rename..."), sigc::mem_fun(*this, &Editor::marker_menu_rename)));
909
910         items.push_back (CheckMenuElem (_("Lock")));
911         Gtk::CheckMenuItem* lock_item = static_cast<Gtk::CheckMenuItem*> (&items.back());
912         if (loc->locked ()) {
913                 lock_item->set_active ();
914         }
915         lock_item->signal_activate().connect (sigc::mem_fun (*this, &Editor::toggle_marker_menu_lock));
916
917         items.push_back (CheckMenuElem (_("Glue to Bars and Beats")));
918         Gtk::CheckMenuItem* glue_item = static_cast<Gtk::CheckMenuItem*> (&items.back());
919         glue_item->set_active (loc->position_lock_style() == MusicTime);
920
921         glue_item->signal_activate().connect (sigc::mem_fun (*this, &Editor::toggle_marker_menu_glue));
922
923         items.push_back (SeparatorElem());
924
925         items.push_back (MenuElem (_("Remove"), sigc::mem_fun(*this, &Editor::marker_menu_remove)));
926 }
927
928 void
929 Editor::build_range_marker_menu (Location* loc, bool loop_or_punch, bool session)
930 {
931         using namespace Menu_Helpers;
932
933         bool const loop_or_punch_or_session = loop_or_punch || session;
934
935         Menu* markerMenu = new Menu;
936
937         if (loop_or_punch_or_session) {
938                 transport_marker_menu = markerMenu;
939         } else {
940                 range_marker_menu = markerMenu;
941         }
942         MenuList& items = markerMenu->items();
943         markerMenu->set_name ("ArdourContextMenu");
944
945         items.push_back (MenuElem (_("Play Range"), sigc::mem_fun(*this, &Editor::marker_menu_play_range)));
946         items.push_back (MenuElem (_("Locate to Marker"), sigc::mem_fun(*this, &Editor::marker_menu_set_playhead)));
947         items.push_back (MenuElem (_("Play from Marker"), sigc::mem_fun(*this, &Editor::marker_menu_play_from)));
948         items.push_back (MenuElem (_("Loop Range"), sigc::mem_fun(*this, &Editor::marker_menu_loop_range)));
949
950         items.push_back (MenuElem (_("Set Marker from Playhead"), sigc::mem_fun(*this, &Editor::marker_menu_set_from_playhead)));
951         items.push_back (MenuElem (_("Set Range from Selection"), sigc::bind (sigc::mem_fun(*this, &Editor::marker_menu_set_from_selection), false)));
952
953         items.push_back (MenuElem (_("Zoom to Range"), sigc::mem_fun (*this, &Editor::marker_menu_zoom_to_range)));
954
955         items.push_back (SeparatorElem());
956         items.push_back (CheckMenuElem (_("Glue to Bars and Beats")));
957
958         Gtk::CheckMenuItem* glue_item = static_cast<Gtk::CheckMenuItem*> (&items.back());
959         glue_item->set_active (loc->position_lock_style() == MusicTime);
960         glue_item->signal_activate().connect (sigc::mem_fun (*this, &Editor::toggle_marker_menu_glue));
961
962         items.push_back (SeparatorElem());
963         items.push_back (MenuElem (_("Export Range..."), sigc::mem_fun(*this, &Editor::export_range)));
964         items.push_back (SeparatorElem());
965
966         if (!loop_or_punch_or_session) {
967                 items.push_back (MenuElem (_("Hide Range"), sigc::mem_fun(*this, &Editor::marker_menu_hide)));
968                 items.push_back (MenuElem (_("Rename Range..."), sigc::mem_fun(*this, &Editor::marker_menu_rename)));
969         }
970
971         if (!session) {
972                 items.push_back (MenuElem (_("Remove Range"), sigc::mem_fun(*this, &Editor::marker_menu_remove)));
973         }
974
975         if (!loop_or_punch_or_session || !session) {
976                 items.push_back (SeparatorElem());
977         }
978
979         items.push_back (MenuElem (_("Separate Regions in Range"), sigc::mem_fun(*this, &Editor::marker_menu_separate_regions_using_location)));
980         items.push_back (MenuElem (_("Select All in Range"), sigc::mem_fun(*this, &Editor::marker_menu_select_all_selectables_using_range)));
981         items.push_back (MenuElem (_("Select Range"), sigc::mem_fun(*this, &Editor::marker_menu_select_using_range)));
982 }
983
984 void
985 Editor::build_tempo_marker_menu (TempoMarker* loc, bool can_remove)
986 {
987         using namespace Menu_Helpers;
988
989         tempo_marker_menu = new Menu;
990
991         MenuList& items = tempo_marker_menu->items();
992         tempo_marker_menu->set_name ("ArdourContextMenu");
993
994         if (!loc->tempo().initial()) {
995                 if (loc->tempo().clamped()) {
996                         items.push_back (MenuElem (_("Unlock Continue"), sigc::mem_fun(*this, &Editor::toggle_tempo_clamped)));
997                 } else {
998                         items.push_back (MenuElem (_("Lock Continue"), sigc::mem_fun(*this, &Editor::toggle_tempo_clamped)));
999                 }
1000
1001                 TempoSection* prev_ts = _session->tempo_map().previous_tempo_section (&loc->tempo());
1002                 if (prev_ts && prev_ts->end_note_types_per_minute() != loc->tempo().note_types_per_minute()) {
1003                         items.push_back (MenuElem (_("Continue"), sigc::mem_fun(*this, &Editor::continue_previous_tempo)));
1004                 }
1005         }
1006
1007         TempoSection* next_ts = _session->tempo_map().next_tempo_section (&loc->tempo());
1008         if (next_ts && next_ts->note_types_per_minute() != loc->tempo().end_note_types_per_minute()) {
1009                 items.push_back (MenuElem (_("Ramp to Next"), sigc::mem_fun(*this, &Editor::ramp_to_next_tempo)));
1010         }
1011
1012         if (loc->tempo().type() == TempoSection::Ramp) {
1013                 items.push_back (MenuElem (_("Set Constant"), sigc::mem_fun(*this, &Editor::toggle_tempo_type)));
1014         }
1015
1016         if (loc->tempo().position_lock_style() == AudioTime && can_remove) {
1017                 items.push_back (MenuElem (_("Lock to Music"), sigc::mem_fun(*this, &Editor::toggle_marker_lock_style)));
1018         } else if (can_remove) {
1019                 items.push_back (MenuElem (_("Lock to Audio"), sigc::mem_fun(*this, &Editor::toggle_marker_lock_style)));
1020         }
1021
1022         items.push_back (MenuElem (_("Edit..."), sigc::mem_fun(*this, &Editor::marker_menu_edit)));
1023         items.push_back (MenuElem (_("Remove"), sigc::mem_fun(*this, &Editor::marker_menu_remove)));
1024         items.back().set_sensitive (can_remove);
1025 }
1026
1027 void
1028 Editor::build_meter_marker_menu (MeterMarker* loc, bool can_remove)
1029 {
1030         using namespace Menu_Helpers;
1031
1032         meter_marker_menu = new Menu;
1033
1034         MenuList& items = meter_marker_menu->items();
1035         meter_marker_menu->set_name ("ArdourContextMenu");
1036
1037         if (loc->meter().position_lock_style() == AudioTime && can_remove) {
1038                 items.push_back (MenuElem (_("Lock to Music"), sigc::mem_fun(*this, &Editor::toggle_marker_lock_style)));
1039         } else if (can_remove) {
1040                 items.push_back (MenuElem (_("Lock to Audio"), sigc::mem_fun(*this, &Editor::toggle_marker_lock_style)));
1041         }
1042
1043         items.push_back (MenuElem (_("Edit..."), sigc::mem_fun(*this, &Editor::marker_menu_edit)));
1044         items.push_back (MenuElem (_("Remove"), sigc::mem_fun(*this, &Editor::marker_menu_remove)));
1045
1046         items.back().set_sensitive (can_remove);
1047 }
1048
1049 void
1050 Editor::build_new_transport_marker_menu ()
1051 {
1052         using namespace Menu_Helpers;
1053
1054         new_transport_marker_menu = new Menu;
1055
1056         MenuList& items = new_transport_marker_menu->items();
1057         new_transport_marker_menu->set_name ("ArdourContextMenu");
1058
1059         items.push_back (MenuElem (_("Set Loop Range"), sigc::mem_fun(*this, &Editor::new_transport_marker_menu_set_loop)));
1060         items.push_back (MenuElem (_("Set Punch Range"), sigc::mem_fun(*this, &Editor::new_transport_marker_menu_set_punch)));
1061
1062         new_transport_marker_menu->signal_unmap().connect ( sigc::mem_fun(*this, &Editor::new_transport_marker_menu_popdown));
1063 }
1064
1065 void
1066 Editor::marker_menu_hide ()
1067 {
1068         ArdourMarker* marker;
1069
1070         if ((marker = reinterpret_cast<ArdourMarker *> (marker_menu_item->get_data ("marker"))) == 0) {
1071                 fatal << _("programming error: marker canvas item has no marker object pointer!") << endmsg;
1072                 abort(); /*NOTREACHED*/
1073         }
1074
1075         Location* l;
1076         bool is_start;
1077
1078         if ((l = find_location_from_marker (marker, is_start)) != 0) {
1079                 l->set_hidden (true, this);
1080         }
1081 }
1082
1083 void
1084 Editor::marker_menu_select_using_range ()
1085 {
1086         ArdourMarker* marker;
1087
1088         if ((marker = reinterpret_cast<ArdourMarker *> (marker_menu_item->get_data ("marker"))) == 0) {
1089                 fatal << _("programming error: marker canvas item has no marker object pointer!") << endmsg;
1090                 abort(); /*NOTREACHED*/
1091         }
1092
1093         Location* l;
1094         bool is_start;
1095
1096         if (((l = find_location_from_marker (marker, is_start)) != 0) && (l->end() > l->start())) {
1097                 set_selection_from_range (*l);
1098         }
1099 }
1100
1101 void
1102 Editor::marker_menu_select_all_selectables_using_range ()
1103 {
1104         ArdourMarker* marker;
1105
1106         if ((marker = reinterpret_cast<ArdourMarker *> (marker_menu_item->get_data ("marker"))) == 0) {
1107                 fatal << _("programming error: marker canvas item has no marker object pointer!") << endmsg;
1108                 abort(); /*NOTREACHED*/
1109         }
1110
1111         Location* l;
1112         bool is_start;
1113
1114         if (((l = find_location_from_marker (marker, is_start)) != 0) && (l->end() > l->start())) {
1115                 select_all_within (l->start(), l->end() - 1, 0,  DBL_MAX, track_views, Selection::Set, false);
1116         }
1117
1118 }
1119
1120 void
1121 Editor::marker_menu_separate_regions_using_location ()
1122 {
1123         ArdourMarker* marker;
1124
1125         if ((marker = reinterpret_cast<ArdourMarker *> (marker_menu_item->get_data ("marker"))) == 0) {
1126                 fatal << _("programming error: marker canvas item has no marker object pointer!") << endmsg;
1127                 abort(); /*NOTREACHED*/
1128         }
1129
1130         Location* l;
1131         bool is_start;
1132
1133         if (((l = find_location_from_marker (marker, is_start)) != 0) && (l->end() > l->start())) {
1134                 separate_regions_using_location (*l);
1135         }
1136
1137 }
1138
1139 void
1140 Editor::marker_menu_play_from ()
1141 {
1142         ArdourMarker* marker;
1143
1144         if ((marker = reinterpret_cast<ArdourMarker *> (marker_menu_item->get_data ("marker"))) == 0) {
1145                 fatal << _("programming error: marker canvas item has no marker object pointer!") << endmsg;
1146                 abort(); /*NOTREACHED*/
1147         }
1148
1149         Location* l;
1150         bool is_start;
1151
1152         if ((l = find_location_from_marker (marker, is_start)) != 0) {
1153
1154                 if (l->is_mark()) {
1155                         _session->request_locate (l->start(), true);
1156                 }
1157                 else {
1158                         //_session->request_bounded_roll (l->start(), l->end());
1159
1160                         if (is_start) {
1161                                 _session->request_locate (l->start(), true);
1162                         } else {
1163                                 _session->request_locate (l->end(), true);
1164                         }
1165                 }
1166         }
1167 }
1168
1169 void
1170 Editor::marker_menu_set_playhead ()
1171 {
1172         ArdourMarker* marker;
1173
1174         if ((marker = reinterpret_cast<ArdourMarker *> (marker_menu_item->get_data ("marker"))) == 0) {
1175                 fatal << _("programming error: marker canvas item has no marker object pointer!") << endmsg;
1176                 abort(); /*NOTREACHED*/
1177         }
1178
1179         Location* l;
1180         bool is_start;
1181
1182         if ((l = find_location_from_marker (marker, is_start)) != 0) {
1183
1184                 if (l->is_mark()) {
1185                         _session->request_locate (l->start(), false);
1186                 }
1187                 else {
1188                         if (is_start) {
1189                                 _session->request_locate (l->start(), false);
1190                         } else {
1191                                 _session->request_locate (l->end(), false);
1192                         }
1193                 }
1194         }
1195 }
1196
1197 void
1198 Editor::marker_menu_range_to_next ()
1199 {
1200         ArdourMarker* marker;
1201         if (!_session) {
1202                 return;
1203         }
1204
1205         if ((marker = reinterpret_cast<ArdourMarker *> (marker_menu_item->get_data ("marker"))) == 0) {
1206                 fatal << _("programming error: marker canvas item has no marker object pointer!") << endmsg;
1207                 abort(); /*NOTREACHED*/
1208         }
1209
1210         Location* l;
1211         bool is_start;
1212
1213         if ((l = find_location_from_marker (marker, is_start)) == 0) {
1214                 return;
1215         }
1216
1217         framepos_t start;
1218         framepos_t end;
1219         _session->locations()->marks_either_side (marker->position(), start, end);
1220
1221         if (end != max_framepos) {
1222                 string range_name = l->name();
1223                 range_name += "-range";
1224
1225                 Location* newrange = new Location (*_session, marker->position(), end, range_name, Location::IsRangeMarker);
1226                 _session->locations()->add (newrange);
1227         }
1228 }
1229
1230 void
1231 Editor::marker_menu_set_from_playhead ()
1232 {
1233         ArdourMarker* marker;
1234
1235         if ((marker = reinterpret_cast<ArdourMarker *> (marker_menu_item->get_data ("marker"))) == 0) {
1236                 fatal << _("programming error: marker canvas item has no marker object pointer!") << endmsg;
1237                 abort(); /*NOTREACHED*/
1238         }
1239
1240         Location* l;
1241         bool is_start;
1242         const int32_t divisions = get_grid_music_divisions (0);
1243
1244         if ((l = find_location_from_marker (marker, is_start)) != 0) {
1245
1246                 if (l->is_mark()) {
1247                         l->set_start (_session->audible_frame (), false, true, divisions);
1248                 }
1249                 else {
1250                         if (is_start) {
1251                                 l->set_start (_session->audible_frame (), false, true, divisions);
1252                         } else {
1253                                 l->set_end (_session->audible_frame (), false, true, divisions);
1254                         }
1255                 }
1256         }
1257 }
1258
1259 void
1260 Editor::marker_menu_set_from_selection (bool /*force_regions*/)
1261 {
1262         ArdourMarker* marker;
1263
1264         if ((marker = reinterpret_cast<ArdourMarker *> (marker_menu_item->get_data ("marker"))) == 0) {
1265                 fatal << _("programming error: marker canvas item has no marker object pointer!") << endmsg;
1266                 abort(); /*NOTREACHED*/
1267         }
1268
1269         Location* l;
1270         bool is_start;
1271
1272         if ((l = find_location_from_marker (marker, is_start)) != 0) {
1273
1274                 if (l->is_mark()) {
1275
1276                         // nothing for now
1277
1278                 } else {
1279
1280                         if (!selection->time.empty()) {
1281                                 l->set (selection->time.start(), selection->time.end_frame());
1282                         } else if (!selection->regions.empty()) {
1283                                 l->set (selection->regions.start(), selection->regions.end_frame());
1284                         }
1285                 }
1286         }
1287 }
1288
1289
1290 void
1291 Editor::marker_menu_play_range ()
1292 {
1293         ArdourMarker* marker;
1294
1295         if ((marker = reinterpret_cast<ArdourMarker *> (marker_menu_item->get_data ("marker"))) == 0) {
1296                 fatal << _("programming error: marker canvas item has no marker object pointer!") << endmsg;
1297                 abort(); /*NOTREACHED*/
1298         }
1299
1300         Location* l;
1301         bool is_start;
1302
1303         if ((l = find_location_from_marker (marker, is_start)) != 0) {
1304
1305                 if (l->is_mark()) {
1306                         _session->request_locate (l->start(), true);
1307                 }
1308                 else {
1309                         _session->request_bounded_roll (l->start(), l->end());
1310
1311                 }
1312         }
1313 }
1314
1315 void
1316 Editor::marker_menu_loop_range ()
1317 {
1318         ArdourMarker* marker;
1319
1320         if ((marker = reinterpret_cast<ArdourMarker *> (marker_menu_item->get_data ("marker"))) == 0) {
1321                 fatal << _("programming error: marker canvas item has no marker object pointer!") << endmsg;
1322                 abort(); /*NOTREACHED*/
1323         }
1324
1325         Location* l;
1326         bool is_start;
1327
1328         if ((l = find_location_from_marker (marker, is_start)) != 0) {
1329                 Location* l2;
1330                 if ((l2 = transport_loop_location()) != 0) {
1331                         l2->set (l->start(), l->end());
1332
1333                         // enable looping, reposition and start rolling
1334                         _session->request_locate (l2->start(), true);
1335                         _session->request_play_loop(true);
1336                 }
1337         }
1338 }
1339
1340 /** Temporal zoom to the range of the marker_menu_item (plus 5% either side) */
1341 void
1342 Editor::marker_menu_zoom_to_range ()
1343 {
1344         ArdourMarker* marker = reinterpret_cast<ArdourMarker *> (marker_menu_item->get_data ("marker"));
1345         assert (marker);
1346
1347         bool is_start;
1348         Location* l = find_location_from_marker (marker, is_start);
1349         if (l == 0) {
1350                 return;
1351         }
1352
1353         framecnt_t const extra = l->length() * 0.05;
1354         framepos_t a = l->start ();
1355         if (a >= extra) {
1356                 a -= extra;
1357         }
1358
1359         framepos_t b = l->end ();
1360         if (b < (max_framepos - extra)) {
1361                 b += extra;
1362         }
1363
1364         temporal_zoom_by_frame (a, b);
1365 }
1366
1367 void
1368 Editor::dynamic_cast_marker_object (void* p, MeterMarker** m, TempoMarker** t) const
1369 {
1370         ArdourMarker* marker = reinterpret_cast<ArdourMarker*> (p);
1371         if (!marker) {
1372                 fatal << _("programming error: marker canvas item has no marker object pointer!") << endmsg;
1373                 abort(); /*NOTREACHED*/
1374         }
1375
1376         *m = dynamic_cast<MeterMarker*> (marker);
1377         *t = dynamic_cast<TempoMarker*> (marker);
1378 }
1379
1380 void
1381 Editor::marker_menu_edit ()
1382 {
1383         MeterMarker* mm;
1384         TempoMarker* tm;
1385         dynamic_cast_marker_object (marker_menu_item->get_data ("marker"), &mm, &tm);
1386
1387         if (mm) {
1388                 edit_meter_section (&mm->meter());
1389         } else if (tm) {
1390                 edit_tempo_section (&tm->tempo());
1391         }
1392 }
1393
1394 void
1395 Editor::marker_menu_remove ()
1396 {
1397         MeterMarker* mm;
1398         TempoMarker* tm;
1399         dynamic_cast_marker_object (marker_menu_item->get_data ("marker"), &mm, &tm);
1400
1401         if (mm) {
1402                 remove_meter_marker (marker_menu_item);
1403         } else if (tm) {
1404                 remove_tempo_marker (marker_menu_item);
1405         } else {
1406                 remove_marker (*marker_menu_item, (GdkEvent*) 0);
1407         }
1408 }
1409
1410 void
1411 Editor::toggle_marker_lock_style ()
1412 {
1413         MeterMarker* mm;
1414         TempoMarker* tm;
1415         dynamic_cast_marker_object (marker_menu_item->get_data ("marker"), &mm, &tm);
1416
1417         if (mm) {
1418                 begin_reversible_command (_("change meter lock style"));
1419                 XMLNode &before = _session->tempo_map().get_state();
1420                 MeterSection* msp = &mm->meter();
1421
1422                 const Meter meter (msp->divisions_per_bar(), msp->note_divisor());
1423                 const Timecode::BBT_Time bbt (msp->bbt());
1424                 const PositionLockStyle pls = (msp->position_lock_style() == AudioTime) ? MusicTime : AudioTime;
1425
1426                 _session->tempo_map().replace_meter (*msp, meter, bbt, msp->frame(), pls);
1427
1428                 XMLNode &after = _session->tempo_map().get_state();
1429                 _session->add_command(new MementoCommand<TempoMap>(_session->tempo_map(), &before, &after));
1430                 commit_reversible_command ();
1431         } else if (tm) {
1432                 TempoSection* tsp = &tm->tempo();
1433
1434                 const double pulse = tsp->pulse();
1435                 const framepos_t frame = tsp->frame();
1436                 const PositionLockStyle pls = (tsp->position_lock_style() == AudioTime) ? MusicTime : AudioTime;
1437                 const Tempo tempo (tsp->note_types_per_minute(), tsp->note_type(), tsp->end_note_types_per_minute());
1438
1439                 begin_reversible_command (_("change tempo lock style"));
1440                 XMLNode &before = _session->tempo_map().get_state();
1441
1442                 _session->tempo_map().replace_tempo (*tsp, tempo, pulse, frame, pls);
1443
1444                 XMLNode &after = _session->tempo_map().get_state();
1445                 _session->add_command(new MementoCommand<TempoMap>(_session->tempo_map(), &before, &after));
1446                 commit_reversible_command ();
1447         }
1448 }
1449 /* actally just resets the ts to constant using initial tempo */
1450 void
1451 Editor::toggle_tempo_type ()
1452 {
1453         TempoMarker* tm;
1454         MeterMarker* mm;
1455         dynamic_cast_marker_object (marker_menu_item->get_data ("marker"), &mm, &tm);
1456
1457         if (tm) {
1458                 TempoSection* tsp = &tm->tempo();
1459
1460                 const Tempo tempo (tsp->note_types_per_minute(), tsp->note_type());
1461                 const double pulse = tsp->pulse();
1462                 const framepos_t frame = tsp->frame();
1463                 const PositionLockStyle pls = tsp->position_lock_style();
1464
1465                 begin_reversible_command (_("set tempo to constant"));
1466                 XMLNode &before = _session->tempo_map().get_state();
1467
1468                 _session->tempo_map().replace_tempo (*tsp, tempo, pulse, frame, pls);
1469
1470                 XMLNode &after = _session->tempo_map().get_state();
1471                 _session->add_command(new MementoCommand<TempoMap>(_session->tempo_map(), &before, &after));
1472                 commit_reversible_command ();
1473         }
1474 }
1475 /* clamped locks the previous section end tempo to the start tempo */
1476 void
1477 Editor::toggle_tempo_clamped ()
1478 {
1479         TempoMarker* tm;
1480         MeterMarker* mm;
1481         dynamic_cast_marker_object (marker_menu_item->get_data ("marker"), &mm, &tm);
1482
1483         if (tm) {
1484                 begin_reversible_command (_("Clamp Tempo"));
1485                 XMLNode &before = _session->tempo_map().get_state();
1486
1487                 TempoSection* tsp = &tm->tempo();
1488                 TempoSection* prev = _session->tempo_map().previous_tempo_section (tsp);
1489
1490                 if (prev) {
1491                         /* set to the end tempo of the previous section */
1492                         Tempo new_tempo (prev->end_note_types_per_minute(), prev->note_type(), tsp->end_note_types_per_minute());
1493                         _session->tempo_map().gui_change_tempo (tsp, new_tempo);
1494                 }
1495
1496                 tsp->set_clamped (!tsp->clamped());
1497
1498                 XMLNode &after = _session->tempo_map().get_state();
1499                 _session->add_command(new MementoCommand<TempoMap>(_session->tempo_map(), &before, &after));
1500                 commit_reversible_command ();
1501         }
1502 }
1503
1504 void
1505 Editor::continue_previous_tempo ()
1506 {
1507         TempoMarker* tm;
1508         MeterMarker* mm;
1509         dynamic_cast_marker_object (marker_menu_item->get_data ("marker"), &mm, &tm);
1510
1511         if (tm) {
1512                 TempoMap& tmap (_session->tempo_map());
1513                 TempoSection* tsp = &tm->tempo();
1514                 TempoSection* prev_ts = tmap.previous_tempo_section (&tm->tempo());
1515                 if (prev_ts) {
1516                         const Tempo tempo (prev_ts->end_note_types_per_minute(), tsp->note_type(), tsp->end_note_types_per_minute());
1517                         const double pulse = tsp->pulse();
1518                         const framepos_t frame = tsp->frame();
1519                         const PositionLockStyle pls = tsp->position_lock_style();
1520
1521                         begin_reversible_command (_("continue previous tempo"));
1522                         XMLNode &before = _session->tempo_map().get_state();
1523
1524                         tmap.replace_tempo (*tsp, tempo, pulse, frame, pls);
1525
1526                         XMLNode &after = _session->tempo_map().get_state();
1527                         _session->add_command(new MementoCommand<TempoMap>(_session->tempo_map(), &before, &after));
1528                         commit_reversible_command ();
1529                 }
1530         }
1531 }
1532
1533 void
1534 Editor::ramp_to_next_tempo ()
1535 {
1536         TempoMarker* tm;
1537         MeterMarker* mm;
1538         dynamic_cast_marker_object (marker_menu_item->get_data ("marker"), &mm, &tm);
1539
1540         if (tm) {
1541                 TempoMap& tmap (_session->tempo_map());
1542                 TempoSection* tsp = &tm->tempo();
1543                 TempoSection* next_ts = tmap.next_tempo_section (&tm->tempo());
1544                 if (next_ts) {
1545                         const Tempo tempo (tsp->note_types_per_minute(), tsp->note_type(), next_ts->note_types_per_minute());
1546                         const double pulse = tsp->pulse();
1547                         const framepos_t frame = tsp->frame();
1548                         const PositionLockStyle pls = tsp->position_lock_style();
1549
1550                         begin_reversible_command (_("ramp to next tempo"));
1551                         XMLNode &before = _session->tempo_map().get_state();
1552
1553                         tmap.replace_tempo (*tsp, tempo, pulse, frame, pls);
1554
1555                         XMLNode &after = _session->tempo_map().get_state();
1556                         _session->add_command(new MementoCommand<TempoMap>(_session->tempo_map(), &before, &after));
1557                         commit_reversible_command ();
1558                 }
1559         }
1560 }
1561
1562 void
1563 Editor::toggle_marker_menu_lock ()
1564 {
1565         ArdourMarker* marker;
1566
1567         if ((marker = reinterpret_cast<ArdourMarker *> (marker_menu_item->get_data ("marker"))) == 0) {
1568                 fatal << _("programming error: marker canvas item has no marker object pointer!") << endmsg;
1569                 abort(); /*NOTREACHED*/
1570         }
1571
1572         Location* loc;
1573         bool ignored;
1574
1575         loc = find_location_from_marker (marker, ignored);
1576
1577         if (!loc) {
1578                 return;
1579         }
1580
1581         if (loc->locked()) {
1582                 loc->unlock ();
1583         } else {
1584                 loc->lock ();
1585         }
1586 }
1587
1588 void
1589 Editor::marker_menu_rename ()
1590 {
1591         ArdourMarker* marker;
1592
1593         if ((marker = reinterpret_cast<ArdourMarker *> (marker_menu_item->get_data ("marker"))) == 0) {
1594                 fatal << _("programming error: marker canvas item has no marker object pointer!") << endmsg;
1595                 abort(); /*NOTREACHED*/
1596         }
1597
1598
1599         rename_marker (marker);
1600 }
1601
1602 void
1603 Editor::rename_marker(ArdourMarker *marker)
1604 {
1605         Location* loc;
1606         bool is_start;
1607
1608         loc = find_location_from_marker (marker, is_start);
1609
1610         if (!loc)
1611                return;
1612
1613         if (loc == transport_loop_location() || loc == transport_punch_location() || loc->is_session_range())
1614                 return;
1615
1616         ArdourPrompter dialog (true);
1617         string txt;
1618
1619         dialog.set_prompt (_("New Name:"));
1620
1621         if (loc->is_mark()) {
1622                 dialog.set_title (_("Rename Mark"));
1623         } else {
1624                 dialog.set_title (_("Rename Range"));
1625         }
1626
1627         dialog.set_name ("MarkRenameWindow");
1628         dialog.set_size_request (250, -1);
1629         dialog.set_position (Gtk::WIN_POS_MOUSE);
1630
1631         dialog.add_button (_("Rename"), RESPONSE_ACCEPT);
1632         dialog.set_response_sensitive (Gtk::RESPONSE_ACCEPT, false);
1633         dialog.set_initial_text (loc->name());
1634
1635         dialog.show ();
1636
1637         switch (dialog.run ()) {
1638         case RESPONSE_ACCEPT:
1639                 break;
1640         default:
1641                 return;
1642         }
1643
1644         begin_reversible_command ( _("rename marker") );
1645         XMLNode &before = _session->locations()->get_state();
1646
1647         dialog.get_result(txt);
1648         loc->set_name (txt);
1649         _session->set_dirty ();
1650
1651         XMLNode &after = _session->locations()->get_state();
1652         _session->add_command (new MementoCommand<Locations>(*(_session->locations()), &before, &after));
1653         commit_reversible_command ();
1654 }
1655
1656 void
1657 Editor::new_transport_marker_menu_popdown ()
1658 {
1659         // hide rects
1660         transport_bar_drag_rect->hide();
1661
1662         _drags->abort ();
1663 }
1664
1665 void
1666 Editor::new_transport_marker_menu_set_loop ()
1667 {
1668         set_loop_range (temp_location->start(), temp_location->end(), _("set loop range"));
1669 }
1670
1671 void
1672 Editor::new_transport_marker_menu_set_punch ()
1673 {
1674         set_punch_range (temp_location->start(), temp_location->end(), _("set punch range"));
1675 }
1676
1677 void
1678 Editor::update_loop_range_view ()
1679 {
1680         if (_session == 0) {
1681                 return;
1682         }
1683
1684         Location* tll;
1685
1686         if (_session->get_play_loop() && ((tll = transport_loop_location()) != 0)) {
1687
1688                 double x1 = sample_to_pixel (tll->start());
1689                 double x2 = sample_to_pixel (tll->end());
1690
1691                 transport_loop_range_rect->set_x0 (x1);
1692                 transport_loop_range_rect->set_x1 (x2);
1693
1694                 transport_loop_range_rect->show();
1695
1696         } else {
1697                 transport_loop_range_rect->hide();
1698         }
1699 }
1700
1701 void
1702 Editor::update_punch_range_view ()
1703 {
1704         if (_session == 0) {
1705                 return;
1706         }
1707
1708         Location* tpl;
1709
1710         if ((_session->config.get_punch_in() || _session->config.get_punch_out()) && ((tpl = transport_punch_location()) != 0)) {
1711
1712                 double pixel_start;
1713                 double pixel_end;
1714
1715                 if (_session->config.get_punch_in()) {
1716                         pixel_start = sample_to_pixel (tpl->start());
1717                 } else {
1718                         pixel_start = 0;
1719                 }
1720                 if (_session->config.get_punch_out()) {
1721                         pixel_end = sample_to_pixel (tpl->end());
1722                 } else {
1723                         pixel_end = sample_to_pixel (max_framepos);
1724                 }
1725
1726                 transport_punch_range_rect->set_x0 (pixel_start);
1727                 transport_punch_range_rect->set_x1 (pixel_end);
1728                 transport_punch_range_rect->show();
1729
1730         } else {
1731
1732                 transport_punch_range_rect->hide();
1733         }
1734 }
1735
1736 void
1737 Editor::marker_selection_changed ()
1738 {
1739         if (_session && _session->deletion_in_progress()) {
1740                 return;
1741         }
1742
1743         for (LocationMarkerMap::iterator i = location_markers.begin(); i != location_markers.end(); ++i) {
1744                 i->second->set_selected (false);
1745         }
1746
1747         for (MarkerSelection::iterator x = selection->markers.begin(); x != selection->markers.end(); ++x) {
1748                 (*x)->set_selected (true);
1749         }
1750 }
1751
1752 struct SortLocationsByPosition {
1753     bool operator() (Location* a, Location* b) {
1754             return a->start() < b->start();
1755     }
1756 };
1757
1758 void
1759 Editor::goto_nth_marker (int n)
1760 {
1761         if (!_session) {
1762                 return;
1763         }
1764         const Locations::LocationList& l (_session->locations()->list());
1765         Locations::LocationList ordered;
1766         ordered = l;
1767
1768         SortLocationsByPosition cmp;
1769         ordered.sort (cmp);
1770
1771         for (Locations::LocationList::iterator i = ordered.begin(); n >= 0 && i != ordered.end(); ++i) {
1772                 if ((*i)->is_mark() && !(*i)->is_hidden() && !(*i)->is_session_range()) {
1773                         if (n == 0) {
1774                                 _session->request_locate ((*i)->start(), _session->transport_rolling());
1775                                 break;
1776                         }
1777                         --n;
1778                 }
1779         }
1780 }
1781
1782 void
1783 Editor::toggle_marker_menu_glue ()
1784 {
1785         ArdourMarker* marker;
1786
1787         if ((marker = reinterpret_cast<ArdourMarker *> (marker_menu_item->get_data ("marker"))) == 0) {
1788                 fatal << _("programming error: marker canvas item has no marker object pointer!") << endmsg;
1789                 abort(); /*NOTREACHED*/
1790         }
1791
1792         Location* loc;
1793         bool ignored;
1794
1795         loc = find_location_from_marker (marker, ignored);
1796
1797         if (!loc) {
1798                 return;
1799         }
1800
1801         begin_reversible_command (_("change marker lock style"));
1802         XMLNode &before = _session->locations()->get_state();
1803
1804         if (loc->position_lock_style() == MusicTime) {
1805                 loc->set_position_lock_style (AudioTime);
1806         } else {
1807                 loc->set_position_lock_style (MusicTime);
1808         }
1809
1810         XMLNode &after = _session->locations()->get_state();
1811         _session->add_command(new MementoCommand<Locations>(*(_session->locations()), &before, &after));
1812         commit_reversible_command ();
1813 }
1814
1815 void
1816 Editor::toggle_marker_lines ()
1817 {
1818         _show_marker_lines = !_show_marker_lines;
1819
1820         for (LocationMarkerMap::iterator i = location_markers.begin(); i != location_markers.end(); ++i) {
1821                 i->second->set_show_lines (_show_marker_lines);
1822         }
1823 }
1824
1825 void
1826 Editor::remove_sorted_marker (ArdourMarker* m)
1827 {
1828         for (std::map<ArdourCanvas::Container *, std::list<ArdourMarker *> >::iterator i = _sorted_marker_lists.begin(); i != _sorted_marker_lists.end(); ++i) {
1829                 i->second.remove (m);
1830         }
1831 }
1832
1833 ArdourMarker *
1834 Editor::find_marker_from_location_id (PBD::ID const & id, bool is_start) const
1835 {
1836         for (LocationMarkerMap::const_iterator i = location_markers.begin(); i != location_markers.end(); ++i) {
1837                 if (i->first->id() == id) {
1838                         return is_start ? i->second->start : i->second->end;
1839                 }
1840         }
1841
1842         return 0;
1843 }