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