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                 if (l != transport_loop_location()) {
1330                         set_loop_range (l->start(), l->end(), _("loop range from marker"));
1331                 }
1332                 _session->request_locate (l->start(), true);
1333                 _session->request_play_loop (true);
1334         }
1335 }
1336
1337 /** Temporal zoom to the range of the marker_menu_item (plus 5% either side) */
1338 void
1339 Editor::marker_menu_zoom_to_range ()
1340 {
1341         ArdourMarker* marker = reinterpret_cast<ArdourMarker *> (marker_menu_item->get_data ("marker"));
1342         assert (marker);
1343
1344         bool is_start;
1345         Location* l = find_location_from_marker (marker, is_start);
1346         if (l == 0) {
1347                 return;
1348         }
1349
1350         framecnt_t const extra = l->length() * 0.05;
1351         framepos_t a = l->start ();
1352         if (a >= extra) {
1353                 a -= extra;
1354         }
1355
1356         framepos_t b = l->end ();
1357         if (b < (max_framepos - extra)) {
1358                 b += extra;
1359         }
1360
1361         temporal_zoom_by_frame (a, b);
1362 }
1363
1364 void
1365 Editor::dynamic_cast_marker_object (void* p, MeterMarker** m, TempoMarker** t) const
1366 {
1367         ArdourMarker* marker = reinterpret_cast<ArdourMarker*> (p);
1368         if (!marker) {
1369                 fatal << _("programming error: marker canvas item has no marker object pointer!") << endmsg;
1370                 abort(); /*NOTREACHED*/
1371         }
1372
1373         *m = dynamic_cast<MeterMarker*> (marker);
1374         *t = dynamic_cast<TempoMarker*> (marker);
1375 }
1376
1377 void
1378 Editor::marker_menu_edit ()
1379 {
1380         MeterMarker* mm;
1381         TempoMarker* tm;
1382         dynamic_cast_marker_object (marker_menu_item->get_data ("marker"), &mm, &tm);
1383
1384         if (mm) {
1385                 edit_meter_section (&mm->meter());
1386         } else if (tm) {
1387                 edit_tempo_section (&tm->tempo());
1388         }
1389 }
1390
1391 void
1392 Editor::marker_menu_remove ()
1393 {
1394         MeterMarker* mm;
1395         TempoMarker* tm;
1396         dynamic_cast_marker_object (marker_menu_item->get_data ("marker"), &mm, &tm);
1397
1398         if (mm) {
1399                 remove_meter_marker (marker_menu_item);
1400         } else if (tm) {
1401                 remove_tempo_marker (marker_menu_item);
1402         } else {
1403                 remove_marker (*marker_menu_item, (GdkEvent*) 0);
1404         }
1405 }
1406
1407 void
1408 Editor::toggle_marker_lock_style ()
1409 {
1410         MeterMarker* mm;
1411         TempoMarker* tm;
1412         dynamic_cast_marker_object (marker_menu_item->get_data ("marker"), &mm, &tm);
1413
1414         if (mm) {
1415                 begin_reversible_command (_("change meter lock style"));
1416                 XMLNode &before = _session->tempo_map().get_state();
1417                 MeterSection* msp = &mm->meter();
1418
1419                 const Meter meter (msp->divisions_per_bar(), msp->note_divisor());
1420                 const Timecode::BBT_Time bbt (msp->bbt());
1421                 const PositionLockStyle pls = (msp->position_lock_style() == AudioTime) ? MusicTime : AudioTime;
1422
1423                 _session->tempo_map().replace_meter (*msp, meter, bbt, msp->frame(), pls);
1424
1425                 XMLNode &after = _session->tempo_map().get_state();
1426                 _session->add_command(new MementoCommand<TempoMap>(_session->tempo_map(), &before, &after));
1427                 commit_reversible_command ();
1428         } else if (tm) {
1429                 TempoSection* tsp = &tm->tempo();
1430
1431                 const double pulse = tsp->pulse();
1432                 const framepos_t frame = tsp->frame();
1433                 const PositionLockStyle pls = (tsp->position_lock_style() == AudioTime) ? MusicTime : AudioTime;
1434                 const Tempo tempo (tsp->note_types_per_minute(), tsp->note_type(), tsp->end_note_types_per_minute());
1435
1436                 begin_reversible_command (_("change tempo lock style"));
1437                 XMLNode &before = _session->tempo_map().get_state();
1438
1439                 _session->tempo_map().replace_tempo (*tsp, tempo, pulse, frame, pls);
1440
1441                 XMLNode &after = _session->tempo_map().get_state();
1442                 _session->add_command(new MementoCommand<TempoMap>(_session->tempo_map(), &before, &after));
1443                 commit_reversible_command ();
1444         }
1445 }
1446 /* actally just resets the ts to constant using initial tempo */
1447 void
1448 Editor::toggle_tempo_type ()
1449 {
1450         TempoMarker* tm;
1451         MeterMarker* mm;
1452         dynamic_cast_marker_object (marker_menu_item->get_data ("marker"), &mm, &tm);
1453
1454         if (tm) {
1455                 TempoSection* tsp = &tm->tempo();
1456
1457                 const Tempo tempo (tsp->note_types_per_minute(), tsp->note_type());
1458                 const double pulse = tsp->pulse();
1459                 const framepos_t frame = tsp->frame();
1460                 const PositionLockStyle pls = tsp->position_lock_style();
1461
1462                 begin_reversible_command (_("set tempo to constant"));
1463                 XMLNode &before = _session->tempo_map().get_state();
1464
1465                 _session->tempo_map().replace_tempo (*tsp, tempo, pulse, frame, pls);
1466
1467                 XMLNode &after = _session->tempo_map().get_state();
1468                 _session->add_command(new MementoCommand<TempoMap>(_session->tempo_map(), &before, &after));
1469                 commit_reversible_command ();
1470         }
1471 }
1472 /* clamped locks the previous section end tempo to the start tempo */
1473 void
1474 Editor::toggle_tempo_clamped ()
1475 {
1476         TempoMarker* tm;
1477         MeterMarker* mm;
1478         dynamic_cast_marker_object (marker_menu_item->get_data ("marker"), &mm, &tm);
1479
1480         if (tm) {
1481                 begin_reversible_command (_("Clamp Tempo"));
1482                 XMLNode &before = _session->tempo_map().get_state();
1483
1484                 TempoSection* tsp = &tm->tempo();
1485                 TempoSection* prev = _session->tempo_map().previous_tempo_section (tsp);
1486
1487                 if (prev) {
1488                         /* set to the end tempo of the previous section */
1489                         Tempo new_tempo (prev->end_note_types_per_minute(), prev->note_type(), tsp->end_note_types_per_minute());
1490                         _session->tempo_map().gui_change_tempo (tsp, new_tempo);
1491                 }
1492
1493                 tsp->set_clamped (!tsp->clamped());
1494
1495                 XMLNode &after = _session->tempo_map().get_state();
1496                 _session->add_command(new MementoCommand<TempoMap>(_session->tempo_map(), &before, &after));
1497                 commit_reversible_command ();
1498         }
1499 }
1500
1501 void
1502 Editor::continue_previous_tempo ()
1503 {
1504         TempoMarker* tm;
1505         MeterMarker* mm;
1506         dynamic_cast_marker_object (marker_menu_item->get_data ("marker"), &mm, &tm);
1507
1508         if (tm) {
1509                 TempoMap& tmap (_session->tempo_map());
1510                 TempoSection* tsp = &tm->tempo();
1511                 TempoSection* prev_ts = tmap.previous_tempo_section (&tm->tempo());
1512                 if (prev_ts) {
1513                         const Tempo tempo (prev_ts->end_note_types_per_minute(), tsp->note_type(), tsp->end_note_types_per_minute());
1514                         const double pulse = tsp->pulse();
1515                         const framepos_t frame = tsp->frame();
1516                         const PositionLockStyle pls = tsp->position_lock_style();
1517
1518                         begin_reversible_command (_("continue previous tempo"));
1519                         XMLNode &before = _session->tempo_map().get_state();
1520
1521                         tmap.replace_tempo (*tsp, tempo, pulse, frame, pls);
1522
1523                         XMLNode &after = _session->tempo_map().get_state();
1524                         _session->add_command(new MementoCommand<TempoMap>(_session->tempo_map(), &before, &after));
1525                         commit_reversible_command ();
1526                 }
1527         }
1528 }
1529
1530 void
1531 Editor::ramp_to_next_tempo ()
1532 {
1533         TempoMarker* tm;
1534         MeterMarker* mm;
1535         dynamic_cast_marker_object (marker_menu_item->get_data ("marker"), &mm, &tm);
1536
1537         if (tm) {
1538                 TempoMap& tmap (_session->tempo_map());
1539                 TempoSection* tsp = &tm->tempo();
1540                 TempoSection* next_ts = tmap.next_tempo_section (&tm->tempo());
1541                 if (next_ts) {
1542                         const Tempo tempo (tsp->note_types_per_minute(), tsp->note_type(), next_ts->note_types_per_minute());
1543                         const double pulse = tsp->pulse();
1544                         const framepos_t frame = tsp->frame();
1545                         const PositionLockStyle pls = tsp->position_lock_style();
1546
1547                         begin_reversible_command (_("ramp to next tempo"));
1548                         XMLNode &before = _session->tempo_map().get_state();
1549
1550                         tmap.replace_tempo (*tsp, tempo, pulse, frame, pls);
1551
1552                         XMLNode &after = _session->tempo_map().get_state();
1553                         _session->add_command(new MementoCommand<TempoMap>(_session->tempo_map(), &before, &after));
1554                         commit_reversible_command ();
1555                 }
1556         }
1557 }
1558
1559 void
1560 Editor::toggle_marker_menu_lock ()
1561 {
1562         ArdourMarker* marker;
1563
1564         if ((marker = reinterpret_cast<ArdourMarker *> (marker_menu_item->get_data ("marker"))) == 0) {
1565                 fatal << _("programming error: marker canvas item has no marker object pointer!") << endmsg;
1566                 abort(); /*NOTREACHED*/
1567         }
1568
1569         Location* loc;
1570         bool ignored;
1571
1572         loc = find_location_from_marker (marker, ignored);
1573
1574         if (!loc) {
1575                 return;
1576         }
1577
1578         if (loc->locked()) {
1579                 loc->unlock ();
1580         } else {
1581                 loc->lock ();
1582         }
1583 }
1584
1585 void
1586 Editor::marker_menu_rename ()
1587 {
1588         ArdourMarker* marker;
1589
1590         if ((marker = reinterpret_cast<ArdourMarker *> (marker_menu_item->get_data ("marker"))) == 0) {
1591                 fatal << _("programming error: marker canvas item has no marker object pointer!") << endmsg;
1592                 abort(); /*NOTREACHED*/
1593         }
1594
1595
1596         rename_marker (marker);
1597 }
1598
1599 void
1600 Editor::rename_marker(ArdourMarker *marker)
1601 {
1602         Location* loc;
1603         bool is_start;
1604
1605         loc = find_location_from_marker (marker, is_start);
1606
1607         if (!loc) {
1608                 return;
1609         }
1610
1611         if (loc == transport_loop_location() || loc == transport_punch_location() || loc->is_session_range()) {
1612                 return;
1613         }
1614
1615         ArdourPrompter dialog (true);
1616         string txt;
1617
1618         dialog.set_prompt (_("New Name:"));
1619
1620         if (loc->is_mark()) {
1621                 dialog.set_title (_("Rename Mark"));
1622         } else {
1623                 dialog.set_title (_("Rename Range"));
1624         }
1625
1626         dialog.set_name ("MarkRenameWindow");
1627         dialog.set_size_request (250, -1);
1628         dialog.set_position (Gtk::WIN_POS_MOUSE);
1629
1630         dialog.add_button (_("Rename"), RESPONSE_ACCEPT);
1631         dialog.set_response_sensitive (Gtk::RESPONSE_ACCEPT, false);
1632         dialog.set_initial_text (loc->name());
1633
1634         dialog.show ();
1635
1636         switch (dialog.run ()) {
1637         case RESPONSE_ACCEPT:
1638                 break;
1639         default:
1640                 return;
1641         }
1642
1643         begin_reversible_command ( _("rename marker") );
1644         XMLNode &before = _session->locations()->get_state();
1645
1646         dialog.get_result(txt);
1647         loc->set_name (txt);
1648         _session->set_dirty ();
1649
1650         XMLNode &after = _session->locations()->get_state();
1651         _session->add_command (new MementoCommand<Locations>(*(_session->locations()), &before, &after));
1652         commit_reversible_command ();
1653 }
1654
1655 void
1656 Editor::new_transport_marker_menu_popdown ()
1657 {
1658         // hide rects
1659         transport_bar_drag_rect->hide();
1660
1661         _drags->abort ();
1662 }
1663
1664 void
1665 Editor::new_transport_marker_menu_set_loop ()
1666 {
1667         set_loop_range (temp_location->start(), temp_location->end(), _("set loop range"));
1668 }
1669
1670 void
1671 Editor::new_transport_marker_menu_set_punch ()
1672 {
1673         set_punch_range (temp_location->start(), temp_location->end(), _("set punch range"));
1674 }
1675
1676 void
1677 Editor::update_loop_range_view ()
1678 {
1679         if (_session == 0) {
1680                 return;
1681         }
1682
1683         Location* tll;
1684
1685         if (_session->get_play_loop() && ((tll = transport_loop_location()) != 0)) {
1686
1687                 double x1 = sample_to_pixel (tll->start());
1688                 double x2 = sample_to_pixel (tll->end());
1689
1690                 transport_loop_range_rect->set_x0 (x1);
1691                 transport_loop_range_rect->set_x1 (x2);
1692
1693                 transport_loop_range_rect->show();
1694
1695         } else {
1696                 transport_loop_range_rect->hide();
1697         }
1698 }
1699
1700 void
1701 Editor::update_punch_range_view ()
1702 {
1703         if (_session == 0) {
1704                 return;
1705         }
1706
1707         Location* tpl;
1708
1709         if ((_session->config.get_punch_in() || _session->config.get_punch_out()) && ((tpl = transport_punch_location()) != 0)) {
1710
1711                 double pixel_start;
1712                 double pixel_end;
1713
1714                 if (_session->config.get_punch_in()) {
1715                         pixel_start = sample_to_pixel (tpl->start());
1716                 } else {
1717                         pixel_start = 0;
1718                 }
1719                 if (_session->config.get_punch_out()) {
1720                         pixel_end = sample_to_pixel (tpl->end());
1721                 } else {
1722                         pixel_end = sample_to_pixel (max_framepos);
1723                 }
1724
1725                 transport_punch_range_rect->set_x0 (pixel_start);
1726                 transport_punch_range_rect->set_x1 (pixel_end);
1727                 transport_punch_range_rect->show();
1728
1729         } else {
1730
1731                 transport_punch_range_rect->hide();
1732         }
1733 }
1734
1735 void
1736 Editor::marker_selection_changed ()
1737 {
1738         if (_session && _session->deletion_in_progress()) {
1739                 return;
1740         }
1741
1742         for (LocationMarkerMap::iterator i = location_markers.begin(); i != location_markers.end(); ++i) {
1743                 i->second->set_selected (false);
1744         }
1745
1746         for (MarkerSelection::iterator x = selection->markers.begin(); x != selection->markers.end(); ++x) {
1747                 (*x)->set_selected (true);
1748         }
1749 }
1750
1751 struct SortLocationsByPosition {
1752         bool operator() (Location* a, Location* b) {
1753                 return a->start() < b->start();
1754         }
1755 };
1756
1757 void
1758 Editor::goto_nth_marker (int n)
1759 {
1760         if (!_session) {
1761                 return;
1762         }
1763         const Locations::LocationList& l (_session->locations()->list());
1764         Locations::LocationList ordered;
1765         ordered = l;
1766
1767         SortLocationsByPosition cmp;
1768         ordered.sort (cmp);
1769
1770         for (Locations::LocationList::iterator i = ordered.begin(); n >= 0 && i != ordered.end(); ++i) {
1771                 if ((*i)->is_mark() && !(*i)->is_hidden() && !(*i)->is_session_range()) {
1772                         if (n == 0) {
1773                                 _session->request_locate ((*i)->start(), _session->transport_rolling());
1774                                 break;
1775                         }
1776                         --n;
1777                 }
1778         }
1779 }
1780
1781 void
1782 Editor::toggle_marker_menu_glue ()
1783 {
1784         ArdourMarker* marker;
1785
1786         if ((marker = reinterpret_cast<ArdourMarker *> (marker_menu_item->get_data ("marker"))) == 0) {
1787                 fatal << _("programming error: marker canvas item has no marker object pointer!") << endmsg;
1788                 abort(); /*NOTREACHED*/
1789         }
1790
1791         Location* loc;
1792         bool ignored;
1793
1794         loc = find_location_from_marker (marker, ignored);
1795
1796         if (!loc) {
1797                 return;
1798         }
1799
1800         begin_reversible_command (_("change marker lock style"));
1801         XMLNode &before = _session->locations()->get_state();
1802
1803         if (loc->position_lock_style() == MusicTime) {
1804                 loc->set_position_lock_style (AudioTime);
1805         } else {
1806                 loc->set_position_lock_style (MusicTime);
1807         }
1808
1809         XMLNode &after = _session->locations()->get_state();
1810         _session->add_command(new MementoCommand<Locations>(*(_session->locations()), &before, &after));
1811         commit_reversible_command ();
1812 }
1813
1814 void
1815 Editor::toggle_marker_lines ()
1816 {
1817         _show_marker_lines = !_show_marker_lines;
1818
1819         for (LocationMarkerMap::iterator i = location_markers.begin(); i != location_markers.end(); ++i) {
1820                 i->second->set_show_lines (_show_marker_lines);
1821         }
1822 }
1823
1824 void
1825 Editor::remove_sorted_marker (ArdourMarker* m)
1826 {
1827         for (std::map<ArdourCanvas::Container *, std::list<ArdourMarker *> >::iterator i = _sorted_marker_lists.begin(); i != _sorted_marker_lists.end(); ++i) {
1828                 i->second.remove (m);
1829         }
1830 }
1831
1832 ArdourMarker *
1833 Editor::find_marker_from_location_id (PBD::ID const & id, bool is_start) const
1834 {
1835         for (LocationMarkerMap::const_iterator i = location_markers.begin(); i != location_markers.end(); ++i) {
1836                 if (i->first->id() == id) {
1837                         return is_start ? i->second->start : i->second->end;
1838                 }
1839         }
1840
1841         return 0;
1842 }