gtk2_ardour/automation_line.cc

   1 /*
   2     Copyright (C) 2002-2003 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 <cmath>
  21
  22 #ifdef COMPILER_MSVC
  23 #include <float.h>
  24
  25 // 'std::isnan()' is not available in MSVC.
  26 #define isnan_local(val) (bool)_isnan((double)val)
  27 #else
  28 #define isnan_local std::isnan
  29 #endif
  30
  31 #include <climits>
  32 #include <vector>
  33 #include <fstream>
  34
  35 #include "boost/shared_ptr.hpp"
  36
  37 #include "pbd/floating.h"
  38 #include "pbd/memento_command.h"
  39 #include "pbd/stl_delete.h"
  40 #include "pbd/stacktrace.h"
  41
  42 #include "ardour/automation_list.h"
  43 #include "ardour/dB.h"
  44 #include "ardour/debug.h"
  45 #include "ardour/parameter_types.h"
  46 #include "ardour/tempo.h"
  47
  48 #include "evoral/Curve.hpp"
  49
  50 #include "canvas/debug.h"
  51
  52 #include "automation_line.h"
  53 #include "control_point.h"
  54 #include "gui_thread.h"
  55 #include "rgb_macros.h"
  56 #include "ardour_ui.h"
  57 #include "public_editor.h"
  58 #include "selection.h"
  59 #include "time_axis_view.h"
  60 #include "point_selection.h"
  61 #include "automation_time_axis.h"
  62
  63 #include "ardour/event_type_map.h"
  64 #include "ardour/session.h"
  65 #include "ardour/value_as_string.h"
  66
  67 #include "i18n.h"
  68
  69 using namespace std;
  70 using namespace ARDOUR;
  71 using namespace PBD;
  72 using namespace Editing;
  73
  74 /** @param converter A TimeConverter whose origin_b is the start time of the AutomationList in session frames.
  75  *  This will not be deleted by AutomationLine.
  76  */
  77 AutomationLine::AutomationLine (const string&                              name,
  78                                 TimeAxisView&                              tv,
  79                                 ArdourCanvas::Item&                        parent,
  80                                 boost::shared_ptr<AutomationList>          al,
  81                                 const ParameterDescriptor&                 desc,
  82                                 Evoral::TimeConverter<double, framepos_t>* converter)
  83         : trackview (tv)
  84         , _name (name)
  85         , alist (al)
  86         , _time_converter (converter ? converter : new Evoral::IdentityConverter<double, framepos_t>)
  87         , _parent_group (parent)
  88         , _offset (0)
  89         , _maximum_time (max_framepos)
  90         , _desc (desc)
  91 {
  92         if (converter) {
  93                 _our_time_converter = false;
  94         } else {
  95                 _our_time_converter = true;
  96         }
  97
  98         _visible = Line;
  99
 100         update_pending = false;
 101         have_timeout = false;
 102         _uses_gain_mapping = false;
 103         no_draw = false;
 104         _is_boolean = false;
 105         terminal_points_can_slide = true;
 106         _height = 0;
 107
 108         group = new ArdourCanvas::Container (&parent, ArdourCanvas::Duple(0, 1.5));
 109         CANVAS_DEBUG_NAME (group, "region gain envelope group");
 110
 111         line = new ArdourCanvas::PolyLine (group);
 112         CANVAS_DEBUG_NAME (line, "region gain envelope line");
 113         line->set_data ("line", this);
 114         line->set_outline_width (2.0);
 115         line->set_covers_threshold (4.0);
 116
 117         line->Event.connect (sigc::mem_fun (*this, &AutomationLine::event_handler));
 118
 119         trackview.session()->register_with_memento_command_factory(alist->id(), this);
 120
 121         if (alist->parameter().type() == GainAutomation ||
 122             alist->parameter().type() == TrimAutomation ||
 123             alist->parameter().type() == EnvelopeAutomation ||
 124             desc.unit == ParameterDescriptor::DB) {
 125                 set_uses_gain_mapping (true);
 126         }
 127
 128         interpolation_changed (alist->interpolation ());
 129
 130         connect_to_list ();
 131 }
 132
 133 AutomationLine::~AutomationLine ()
 134 {
 135         vector_delete (&control_points);
 136         delete group;
 137
 138         if (_our_time_converter) {
 139                 delete _time_converter;
 140         }
 141 }
 142
 143 bool
 144 AutomationLine::event_handler (GdkEvent* event)
 145 {
 146         return PublicEditor::instance().canvas_line_event (event, line, this);
 147 }
 148
 149 bool
 150 AutomationLine::is_stepped() const
 151 {
 152         return (_desc.toggled ||
 153                 (alist && alist->interpolation() == AutomationList::Discrete));
 154 }
 155
 156 void
 157 AutomationLine::update_visibility ()
 158 {
 159         if (_visible & Line) {
 160                 /* Only show the line when there are some points, otherwise we may show an out-of-date line
 161                    when automation points have been removed (the line will still follow the shape of the
 162                    old points).
 163                 */
 164                 if (control_points.size() >= 2) {
 165                         line->show();
 166                 } else {
 167                         line->hide ();
 168                 }
 169
 170                 if (_visible & ControlPoints) {
 171                         for (vector<ControlPoint*>::iterator i = control_points.begin(); i != control_points.end(); ++i) {
 172                                 (*i)->show ();
 173                         }
 174                 } else if (_visible & SelectedControlPoints) {
 175                         for (vector<ControlPoint*>::iterator i = control_points.begin(); i != control_points.end(); ++i) {
 176                                 if ((*i)->get_selected()) {
 177                                         (*i)->show ();
 178                                 } else {
 179                                         (*i)->hide ();
 180                                 }
 181                         }
 182                 } else {
 183                         for (vector<ControlPoint*>::iterator i = control_points.begin(); i != control_points.end(); ++i) {
 184                                 (*i)->hide ();
 185                         }
 186                 }
 187
 188         } else {
 189                 line->hide ();
 190                 for (vector<ControlPoint*>::iterator i = control_points.begin(); i != control_points.end(); ++i) {
 191                         if (_visible & ControlPoints) {
 192                                 (*i)->show ();
 193                         } else {
 194                                 (*i)->hide ();
 195                         }
 196                 }
 197         }
 198
 199 }
 200
 201 void
 202 AutomationLine::hide ()
 203 {
 204         /* leave control points setting unchanged, we are just hiding the
 205            overall line
 206         */
 207
 208         set_visibility (AutomationLine::VisibleAspects (_visible & ~Line));
 209 }
 210
 211 double
 212 AutomationLine::control_point_box_size ()
 213 {
 214         if (_height > TimeAxisView::preset_height (HeightLarger)) {
 215                 return 8.0;
 216         } else if (_height > (guint32) TimeAxisView::preset_height (HeightNormal)) {
 217                 return 6.0;
 218         }
 219         return 4.0;
 220 }
 221
 222 void
 223 AutomationLine::set_height (guint32 h)
 224 {
 225         if (h != _height) {
 226                 _height = h;
 227
 228                 double bsz = control_point_box_size();
 229
 230                 for (vector<ControlPoint*>::iterator i = control_points.begin(); i != control_points.end(); ++i) {
 231                         (*i)->set_size (bsz);
 232                 }
 233
 234                 reset ();
 235         }
 236 }
 237
 238 void
 239 AutomationLine::set_line_color (uint32_t color)
 240 {
 241         _line_color = color;
 242         line->set_outline_color (color);
 243 }
 244
 245 void
 246 AutomationLine::set_uses_gain_mapping (bool yn)
 247 {
 248         if (yn != _uses_gain_mapping) {
 249                 _uses_gain_mapping = yn;
 250                 reset ();
 251         }
 252 }
 253
 254 ControlPoint*
 255 AutomationLine::nth (uint32_t n)
 256 {
 257         if (n < control_points.size()) {
 258                 return control_points[n];
 259         } else {
 260                 return 0;
 261         }
 262 }
 263
 264 ControlPoint const *
 265 AutomationLine::nth (uint32_t n) const
 266 {
 267         if (n < control_points.size()) {
 268                 return control_points[n];
 269         } else {
 270                 return 0;
 271         }
 272 }
 273
 274 void
 275 AutomationLine::modify_point_y (ControlPoint& cp, double y)
 276 {
 277         /* clamp y-coord appropriately. y is supposed to be a normalized fraction (0.0-1.0),
 278            and needs to be converted to a canvas unit distance.
 279         */
 280
 281         y = max (0.0, y);
 282         y = min (1.0, y);
 283         y = _height - (y * _height);
 284
 285         double const x = trackview.editor().sample_to_pixel_unrounded (_time_converter->to((*cp.model())->when) - _offset);
 286
 287         trackview.editor().begin_reversible_command (_("automation event move"));
 288         trackview.editor().session()->add_command (
 289                 new MementoCommand<AutomationList> (memento_command_binder(), &get_state(), 0));
 290
 291         cp.move_to (x, y, ControlPoint::Full);
 292
 293         alist->freeze ();
 294         sync_model_with_view_point (cp);
 295         alist->thaw ();
 296
 297         reset_line_coords (cp);
 298
 299         if (line_points.size() > 1) {
 300                 line->set_steps (line_points, is_stepped());
 301         }
 302
 303         update_pending = false;
 304
 305         trackview.editor().session()->add_command (
 306                 new MementoCommand<AutomationList> (memento_command_binder(), 0, &alist->get_state()));
 307
 308         trackview.editor().commit_reversible_command ();
 309         trackview.editor().session()->set_dirty ();
 310 }
 311
 312 void
 313 AutomationLine::reset_line_coords (ControlPoint& cp)
 314 {
 315         if (cp.view_index() < line_points.size()) {
 316                 line_points[cp.view_index()].x = cp.get_x ();
 317                 line_points[cp.view_index()].y = cp.get_y ();
 318         }
 319 }
 320
 321 bool
 322 AutomationLine::sync_model_with_view_points (list<ControlPoint*> cp)
 323 {
 324         update_pending = true;
 325
 326         bool moved = false;
 327         for (list<ControlPoint*>::iterator i = cp.begin(); i != cp.end(); ++i) {
 328                 moved = sync_model_with_view_point (**i) || moved;
 329         }
 330
 331         return moved;
 332 }
 333
 334 string
 335 AutomationLine::get_verbose_cursor_string (double fraction) const
 336 {
 337         std::string s = fraction_to_string (fraction);
 338         if (_uses_gain_mapping) {
 339                 s += " dB";
 340         }
 341
 342         return s;
 343 }
 344
 345 string
 346 AutomationLine::get_verbose_cursor_relative_string (double original, double fraction) const
 347 {
 348         std::string s = fraction_to_string (fraction);
 349         if (_uses_gain_mapping) {
 350                 s += " dB";
 351         }
 352
 353         std::string d = fraction_to_relative_string (original, fraction);
 354
 355         if (!d.empty()) {
 356
 357                 s += " (\u0394";
 358                 s += d;
 359
 360                 if (_uses_gain_mapping) {
 361                         s += " dB";
 362                 }
 363
 364                 s += ')';
 365         }
 366
 367         return s;
 368 }
 369
 370 /**
 371  *  @param fraction y fraction
 372  *  @return string representation of this value, using dB if appropriate.
 373  */
 374 string
 375 AutomationLine::fraction_to_string (double fraction) const
 376 {
 377         if (_uses_gain_mapping) {
 378                 char buf[32];
 379                 if (_desc.type == GainAutomation) {
 380                         if (fraction == 0.0) {
 381                                 snprintf (buf, sizeof (buf), "-inf");
 382                         } else {
 383                                 snprintf (buf, sizeof (buf), "%.1f", accurate_coefficient_to_dB (slider_position_to_gain_with_max (fraction, _desc.upper)));
 384                         }
 385                 } else {
 386                         float coeff = _desc.lower + fraction * (_desc.upper - _desc.lower);
 387                         if (coeff == 0.0) {
 388                                 snprintf (buf, sizeof (buf), "-inf");
 389                         } else {
 390                                 snprintf (buf, sizeof (buf), "%.1f", accurate_coefficient_to_dB (coeff));
 391                         }
 392                 }
 393                 return buf;
 394         } else {
 395                 view_to_model_coord_y (fraction);
 396                 return ARDOUR::value_as_string (_desc, fraction);
 397         }
 398
 399         return ""; /*NOTREACHED*/
 400 }
 401
 402 /**
 403  *  @param original an old y-axis fraction
 404  *  @param fraction the new y fraction
 405  *  @return string representation of the difference between original and fraction, using dB if appropriate.
 406  */
 407 string
 408 AutomationLine::fraction_to_relative_string (double original, double fraction) const
 409 {
 410         char buf[32];
 411
 412         if (original == fraction) {
 413                 return "0";
 414         }
 415
 416         if (_uses_gain_mapping) {
 417                 if (original == 0.0) {
 418                         /* there is no sensible representation of a relative
 419                            change from -inf dB, so return an empty string.
 420                         */
 421                         return "";
 422                 } else if (fraction == 0.0) {
 423                         snprintf (buf, sizeof (buf), "-inf");
 424                 } else {
 425                         double old_db = accurate_coefficient_to_dB (slider_position_to_gain_with_max (original, Config->get_max_gain()));
 426                         double new_db = accurate_coefficient_to_dB (slider_position_to_gain_with_max (fraction, Config->get_max_gain()));
 427                         snprintf (buf, sizeof (buf), "%.1f", new_db - old_db);
 428                 }
 429         } else {
 430                 view_to_model_coord_y (original);
 431                 view_to_model_coord_y (fraction);
 432                 return ARDOUR::value_as_string (_desc, fraction - original);
 433         }
 434
 435         return buf;
 436 }
 437
 438 /**
 439  *  @param s Value string in the form as returned by fraction_to_string.
 440  *  @return Corresponding y fraction.
 441  */
 442 double
 443 AutomationLine::string_to_fraction (string const & s) const
 444 {
 445         if (s == "-inf") {
 446                 return 0;
 447         }
 448
 449         double v;
 450         sscanf (s.c_str(), "%lf", &v);
 451
 452         if (_uses_gain_mapping) {
 453                 v = gain_to_slider_position_with_max (dB_to_coefficient (v), Config->get_max_gain());
 454         } else {
 455                 double dummy = 0.0;
 456                 model_to_view_coord (dummy, v);
 457         }
 458
 459         return v;
 460 }
 461
 462 /** Start dragging a single point, possibly adding others if the supplied point is selected and there
 463  *  are other selected points.
 464  *
 465  *  @param cp Point to drag.
 466  *  @param x Initial x position (units).
 467  *  @param fraction Initial y position (as a fraction of the track height, where 0 is the bottom and 1 the top)
 468  */
 469 void
 470 AutomationLine::start_drag_single (ControlPoint* cp, double x, float fraction)
 471 {
 472         trackview.editor().begin_reversible_command (_("automation event move"));
 473         trackview.editor().session()->add_command (
 474                 new MementoCommand<AutomationList> (memento_command_binder(), &get_state(), 0));
 475
 476         _drag_points.clear ();
 477         _drag_points.push_back (cp);
 478
 479         if (cp->get_selected ()) {
 480                 for (vector<ControlPoint*>::iterator i = control_points.begin(); i != control_points.end(); ++i) {
 481                         if (*i != cp && (*i)->get_selected()) {
 482                                 _drag_points.push_back (*i);
 483                         }
 484                 }
 485         }
 486
 487         start_drag_common (x, fraction);
 488 }
 489
 490 /** Start dragging a line vertically (with no change in x)
 491  *  @param i1 Control point index of the `left' point on the line.
 492  *  @param i2 Control point index of the `right' point on the line.
 493  *  @param fraction Initial y position (as a fraction of the track height, where 0 is the bottom and 1 the top)
 494  */
 495 void
 496 AutomationLine::start_drag_line (uint32_t i1, uint32_t i2, float fraction)
 497 {
 498         trackview.editor().begin_reversible_command (_("automation range move"));
 499         trackview.editor().session()->add_command (
 500                 new MementoCommand<AutomationList> (memento_command_binder (), &get_state(), 0));
 501
 502         _drag_points.clear ();
 503
 504         for (uint32_t i = i1; i <= i2; i++) {
 505                 _drag_points.push_back (nth (i));
 506         }
 507
 508         start_drag_common (0, fraction);
 509 }
 510
 511 /** Start dragging multiple points (with no change in x)
 512  *  @param cp Points to drag.
 513  *  @param fraction Initial y position (as a fraction of the track height, where 0 is the bottom and 1 the top)
 514  */
 515 void
 516 AutomationLine::start_drag_multiple (list<ControlPoint*> cp, float fraction, XMLNode* state)
 517 {
 518         trackview.editor().begin_reversible_command (_("automation range move"));
 519         trackview.editor().session()->add_command (
 520                 new MementoCommand<AutomationList> (memento_command_binder(), state, 0));
 521
 522         _drag_points = cp;
 523         start_drag_common (0, fraction);
 524 }
 525
 526 struct ControlPointSorter
 527 {
 528         bool operator() (ControlPoint const * a, ControlPoint const * b) const {
 529                 if (floateq (a->get_x(), b->get_x(), 1)) {
 530                         return a->view_index() < b->view_index();
 531                 }
 532                 return a->get_x() < b->get_x();
 533         }
 534 };
 535
 536 AutomationLine::ContiguousControlPoints::ContiguousControlPoints (AutomationLine& al)
 537         : line (al), before_x (0), after_x (DBL_MAX)
 538 {
 539 }
 540
 541 void
 542 AutomationLine::ContiguousControlPoints::compute_x_bounds (PublicEditor& e)
 543 {
 544         uint32_t sz = size();
 545
 546         if (sz > 0 && sz < line.npoints()) {
 547                 const TempoMap& map (e.session()->tempo_map());
 548
 549                 /* determine the limits on x-axis motion for this
 550                    contiguous range of control points
 551                 */
 552
 553                 if (front()->view_index() > 0) {
 554                         before_x = line.nth (front()->view_index() - 1)->get_x();
 555
 556                         const framepos_t pos = e.pixel_to_sample(before_x);
 557                         const Meter& meter = map.meter_at (pos);
 558                         const framecnt_t len = ceil (meter.frames_per_bar (map.tempo_at (pos), e.session()->frame_rate())
 559                                         / (Timecode::BBT_Time::ticks_per_beat * meter.divisions_per_bar()) );
 560                         const double one_tick_in_pixels = e.sample_to_pixel_unrounded (len);
 561
 562                         before_x += one_tick_in_pixels;
 563                 }
 564
 565                 /* if our last point has a point after it in the line,
 566                    we have an "after" bound
 567                 */
 568
 569                 if (back()->view_index() < (line.npoints() - 1)) {
 570                         after_x = line.nth (back()->view_index() + 1)->get_x();
 571
 572                         const framepos_t pos = e.pixel_to_sample(after_x);
 573                         const Meter& meter = map.meter_at (pos);
 574                         const framecnt_t len = ceil (meter.frames_per_bar (map.tempo_at (pos), e.session()->frame_rate())
 575                                         / (Timecode::BBT_Time::ticks_per_beat * meter.divisions_per_bar()));
 576                         const double one_tick_in_pixels = e.sample_to_pixel_unrounded (len);
 577
 578                         after_x -= one_tick_in_pixels;
 579                 }
 580         }
 581 }
 582
 583 double
 584 AutomationLine::ContiguousControlPoints::clamp_dx (double dx)
 585 {
 586         if (empty()) {
 587                 return dx;
 588         }
 589
 590         /* get the maximum distance we can move any of these points along the x-axis
 591          */
 592
 593         double tx; /* possible position a point would move to, given dx */
 594         ControlPoint* cp;
 595
 596         if (dx > 0) {
 597                 /* check the last point, since we're moving later in time */
 598                 cp = back();
 599         } else {
 600                 /* check the first point, since we're moving earlier in time */
 601                 cp = front();
 602         }
 603
 604         tx = cp->get_x() + dx; // new possible position if we just add the motion
 605         tx = max (tx, before_x); // can't move later than following point
 606         tx = min (tx, after_x);  // can't move earlier than preceeding point
 607         return  tx - cp->get_x ();
 608 }
 609
 610 void
 611 AutomationLine::ContiguousControlPoints::move (double dx, double dy)
 612 {
 613         for (std::list<ControlPoint*>::iterator i = begin(); i != end(); ++i) {
 614                 (*i)->move_to ((*i)->get_x() + dx, (*i)->get_y() - line.height() * dy, ControlPoint::Full);
 615                 line.reset_line_coords (**i);
 616         }
 617 }
 618
 619 /** Common parts of starting a drag.
 620  *  @param x Starting x position in units, or 0 if x is being ignored.
 621  *  @param fraction Starting y position (as a fraction of the track height, where 0 is the bottom and 1 the top)
 622  */
 623 void
 624 AutomationLine::start_drag_common (double x, float fraction)
 625 {
 626         _drag_x = x;
 627         _drag_distance = 0;
 628         _last_drag_fraction = fraction;
 629         _drag_had_movement = false;
 630         did_push = false;
 631
 632         /* they are probably ordered already, but we have to make sure */
 633
 634         _drag_points.sort (ControlPointSorter());
 635 }
 636
 637
 638 /** Should be called to indicate motion during a drag.
 639  *  @param x New x position of the drag in canvas units, or undefined if ignore_x == true.
 640  *  @param fraction New y fraction.
 641  *  @return x position and y fraction that were actually used (once clamped).
 642  */
 643 pair<double, float>
 644 AutomationLine::drag_motion (double const x, float fraction, bool ignore_x, bool with_push, uint32_t& final_index)
 645 {
 646         if (_drag_points.empty()) {
 647                 return pair<double,float> (x,fraction);
 648         }
 649
 650         double dx = ignore_x ? 0 : (x - _drag_x);
 651         double dy = fraction - _last_drag_fraction;
 652
 653         if (!_drag_had_movement) {
 654
 655                 /* "first move" ... do some stuff that we don't want to do if
 656                    no motion ever took place, but need to do before we handle
 657                    motion.
 658                 */
 659
 660                 /* partition the points we are dragging into (potentially several)
 661                  * set(s) of contiguous points. this will not happen with a normal
 662                  * drag, but if the user does a discontiguous selection, it can.
 663                  */
 664
 665                 uint32_t expected_view_index = 0;
 666                 CCP contig;
 667
 668                 for (list<ControlPoint*>::iterator i = _drag_points.begin(); i != _drag_points.end(); ++i) {
 669                         if (i == _drag_points.begin() || (*i)->view_index() != expected_view_index) {
 670                                 contig.reset (new ContiguousControlPoints (*this));
 671                                 contiguous_points.push_back (contig);
 672                         }
 673                         contig->push_back (*i);
 674                         expected_view_index = (*i)->view_index() + 1;
 675                 }
 676
 677                 if (contiguous_points.back()->empty()) {
 678                         contiguous_points.pop_back ();
 679                 }
 680
 681                 for (vector<CCP>::iterator ccp = contiguous_points.begin(); ccp != contiguous_points.end(); ++ccp) {
 682                         (*ccp)->compute_x_bounds (trackview.editor());
 683                 }
 684         }
 685
 686         /* OK, now on to the stuff related to *this* motion event. First, for
 687          * each contiguous range, figure out the maximum x-axis motion we are
 688          * allowed (because of neighbouring points that are not moving.
 689          *
 690          * if we are moving forwards with push, we don't need to do this,
 691          * since all later points will move too.
 692          */
 693
 694         if (dx < 0 || ((dx > 0) && !with_push)) {
 695                 for (vector<CCP>::iterator ccp = contiguous_points.begin(); ccp != contiguous_points.end(); ++ccp) {
 696                         double dxt = (*ccp)->clamp_dx (dx);
 697                         if (fabs (dxt) < fabs (dx)) {
 698                                 dx = dxt;
 699                         }
 700                 }
 701         }
 702
 703         /* clamp y */
 704
 705         for (list<ControlPoint*>::iterator i = _drag_points.begin(); i != _drag_points.end(); ++i) {
 706                 double const y = ((_height - (*i)->get_y()) / _height) + dy;
 707                 if (y < 0) {
 708                         dy -= y;
 709                 }
 710                 if (y > 1) {
 711                         dy -= (y - 1);
 712                 }
 713         }
 714
 715         if (dx || dy) {
 716
 717                 /* and now move each section */
 718
 719                 for (vector<CCP>::iterator ccp = contiguous_points.begin(); ccp != contiguous_points.end(); ++ccp) {
 720                         (*ccp)->move (dx, dy);
 721                 }
 722                 if (with_push) {
 723                         final_index = contiguous_points.back()->back()->view_index () + 1;
 724                         ControlPoint* p;
 725                         uint32_t i = final_index;
 726                         while ((p = nth (i)) != 0 && p->can_slide()) {
 727                                 p->move_to (p->get_x() + dx, p->get_y(), ControlPoint::Full);
 728                                 reset_line_coords (*p);
 729                                 ++i;
 730                         }
 731                 }
 732
 733                 /* update actual line coordinates (will queue a redraw)
 734                  */
 735
 736                 if (line_points.size() > 1) {
 737                         line->set_steps (line_points, is_stepped());
 738                 }
 739         }
 740
 741         _drag_distance += dx;
 742         _drag_x += dx;
 743         _last_drag_fraction = fraction;
 744         _drag_had_movement = true;
 745         did_push = with_push;
 746
 747         return pair<double, float> (_drag_x + dx, _last_drag_fraction + dy);
 748 }
 749
 750 /** Should be called to indicate the end of a drag */
 751 void
 752 AutomationLine::end_drag (bool with_push, uint32_t final_index)
 753 {
 754         if (!_drag_had_movement) {
 755                 return;
 756         }
 757
 758         alist->freeze ();
 759         bool moved = sync_model_with_view_points (_drag_points);
 760
 761         if (with_push) {
 762                 ControlPoint* p;
 763                 uint32_t i = final_index;
 764                 while ((p = nth (i)) != 0 && p->can_slide()) {
 765                         moved = sync_model_with_view_point (*p) || moved;
 766                         ++i;
 767                 }
 768         }
 769
 770         alist->thaw ();
 771
 772         update_pending = false;
 773
 774         if (moved) {
 775                 /* A point has moved as a result of sync (clamped to integer or boolean
 776                    value), update line accordingly. */
 777                 line->set_steps (line_points, is_stepped());
 778         }
 779
 780         trackview.editor().session()->add_command (
 781                 new MementoCommand<AutomationList>(memento_command_binder (), 0, &alist->get_state()));
 782
 783         trackview.editor().session()->set_dirty ();
 784         did_push = false;
 785
 786         contiguous_points.clear ();
 787 }
 788
 789 bool
 790 AutomationLine::sync_model_with_view_point (ControlPoint& cp)
 791 {
 792         /* find out where the visual control point is.
 793            initial results are in canvas units. ask the
 794            line to convert them to something relevant.
 795         */
 796
 797         double view_x = cp.get_x();
 798         double view_y = 1.0 - (cp.get_y() / _height);
 799
 800         /* if xval has not changed, set it directly from the model to avoid rounding errors */
 801
 802         if (view_x == trackview.editor().sample_to_pixel_unrounded (_time_converter->to ((*cp.model())->when)) - _offset) {
 803                 view_x = (*cp.model())->when - _offset;
 804         } else {
 805                 view_x = trackview.editor().pixel_to_sample (view_x);
 806                 view_x = _time_converter->from (view_x + _offset);
 807         }
 808
 809         update_pending = true;
 810
 811         view_to_model_coord_y (view_y);
 812
 813         alist->modify (cp.model(), view_x, view_y);
 814
 815         /* convert back from model to view y for clamping position (for integer/boolean/etc) */
 816         model_to_view_coord_y (view_y);
 817         const double point_y = _height - (view_y * _height);
 818         if (point_y != cp.get_y()) {
 819                 cp.move_to (cp.get_x(), point_y, ControlPoint::Full);
 820                 reset_line_coords (cp);
 821                 return true;
 822         }
 823
 824         return false;
 825 }
 826
 827 bool
 828 AutomationLine::control_points_adjacent (double xval, uint32_t & before, uint32_t& after)
 829 {
 830         ControlPoint *bcp = 0;
 831         ControlPoint *acp = 0;
 832         double unit_xval;
 833
 834         unit_xval = trackview.editor().sample_to_pixel_unrounded (xval);
 835
 836         for (vector<ControlPoint*>::iterator i = control_points.begin(); i != control_points.end(); ++i) {
 837
 838                 if ((*i)->get_x() <= unit_xval) {
 839
 840                         if (!bcp || (*i)->get_x() > bcp->get_x()) {
 841                                 bcp = *i;
 842                                 before = bcp->view_index();
 843                         }
 844
 845                 } else if ((*i)->get_x() > unit_xval) {
 846                         acp = *i;
 847                         after = acp->view_index();
 848                         break;
 849                 }
 850         }
 851
 852         return bcp && acp;
 853 }
 854
 855 bool
 856 AutomationLine::is_last_point (ControlPoint& cp)
 857 {
 858         // If the list is not empty, and the point is the last point in the list
 859
 860         if (alist->empty()) {
 861                 return false;
 862         }
 863
 864         AutomationList::const_iterator i = alist->end();
 865         --i;
 866
 867         if (cp.model() == i) {
 868                 return true;
 869         }
 870
 871         return false;
 872 }
 873
 874 bool
 875 AutomationLine::is_first_point (ControlPoint& cp)
 876 {
 877         // If the list is not empty, and the point is the first point in the list
 878
 879         if (!alist->empty() && cp.model() == alist->begin()) {
 880                 return true;
 881         }
 882
 883         return false;
 884 }
 885
 886 // This is copied into AudioRegionGainLine
 887 void
 888 AutomationLine::remove_point (ControlPoint& cp)
 889 {
 890         trackview.editor().begin_reversible_command (_("remove control point"));
 891         XMLNode &before = alist->get_state();
 892
 893         alist->erase (cp.model());
 894
 895         trackview.editor().session()->add_command(
 896                 new MementoCommand<AutomationList> (memento_command_binder (), &before, &alist->get_state()));
 897
 898         trackview.editor().commit_reversible_command ();
 899         trackview.editor().session()->set_dirty ();
 900 }
 901
 902 /** Get selectable points within an area.
 903  *  @param start Start position in session frames.
 904  *  @param end End position in session frames.
 905  *  @param bot Bottom y range, as a fraction of line height, where 0 is the bottom of the line.
 906  *  @param top Top y range, as a fraction of line height, where 0 is the bottom of the line.
 907  *  @param result Filled in with selectable things; in this case, ControlPoints.
 908  */
 909 void
 910 AutomationLine::get_selectables (framepos_t start, framepos_t end, double botfrac, double topfrac, list<Selectable*>& results)
 911 {
 912         /* convert fractions to display coordinates with 0 at the top of the track */
 913         double const bot_track = (1 - topfrac) * trackview.current_height ();
 914         double const top_track = (1 - botfrac) * trackview.current_height ();
 915
 916         for (vector<ControlPoint*>::iterator i = control_points.begin(); i != control_points.end(); ++i) {
 917                 double const model_when = (*(*i)->model())->when;
 918
 919                 /* model_when is relative to the start of the source, so we just need to add on the origin_b here
 920                    (as it is the session frame position of the start of the source)
 921                 */
 922
 923                 framepos_t const session_frames_when = _time_converter->to (model_when) + _time_converter->origin_b ();
 924
 925                 if (session_frames_when >= start && session_frames_when <= end && (*i)->get_y() >= bot_track && (*i)->get_y() <= top_track) {
 926                         results.push_back (*i);
 927                 }
 928         }
 929 }
 930
 931 void
 932 AutomationLine::get_inverted_selectables (Selection&, list<Selectable*>& /*results*/)
 933 {
 934         // hmmm ....
 935 }
 936
 937 void
 938 AutomationLine::set_selected_points (PointSelection const & points)
 939 {
 940         for (vector<ControlPoint*>::iterator i = control_points.begin(); i != control_points.end(); ++i) {
 941                 (*i)->set_selected (false);
 942         }
 943
 944         for (PointSelection::const_iterator i = points.begin(); i != points.end(); ++i) {
 945                 (*i)->set_selected (true);
 946         }
 947
 948         if (points.empty()) {
 949                 remove_visibility (SelectedControlPoints);
 950         } else {
 951                 add_visibility (SelectedControlPoints);
 952         }
 953
 954         set_colors ();
 955 }
 956
 957 void AutomationLine::set_colors ()
 958 {
 959         set_line_color (ARDOUR_UI::config()->color ("automation line"));
 960         for (vector<ControlPoint*>::iterator i = control_points.begin(); i != control_points.end(); ++i) {
 961                 (*i)->set_color ();
 962         }
 963 }
 964
 965 void
 966 AutomationLine::list_changed ()
 967 {
 968         DEBUG_TRACE (DEBUG::Automation, string_compose ("\tline changed, existing update pending? %1\n", update_pending));
 969
 970         if (!update_pending) {
 971                 update_pending = true;
 972                 Gtkmm2ext::UI::instance()->call_slot (invalidator (*this), boost::bind (&AutomationLine::queue_reset, this));
 973         }
 974 }
 975
 976 void
 977 AutomationLine::reset_callback (const Evoral::ControlList& events)
 978 {
 979         uint32_t vp = 0;
 980         uint32_t pi = 0;
 981         uint32_t np;
 982
 983         if (events.empty()) {
 984                 for (vector<ControlPoint*>::iterator i = control_points.begin(); i != control_points.end(); ++i) {
 985                         delete *i;
 986                 }
 987                 control_points.clear ();
 988                 line->hide();
 989                 return;
 990         }
 991
 992         /* hide all existing points, and the line */
 993
 994         for (vector<ControlPoint*>::iterator i = control_points.begin(); i != control_points.end(); ++i) {
 995                 (*i)->hide();
 996         }
 997
 998         line->hide ();
 999         np = events.size();
1000
1001         Evoral::ControlList& e = const_cast<Evoral::ControlList&> (events);
1002
1003         for (AutomationList::iterator ai = e.begin(); ai != e.end(); ++ai, ++pi) {
1004
1005                 double tx = (*ai)->when;
1006                 double ty = (*ai)->value;
1007
1008                 /* convert from model coordinates to canonical view coordinates */
1009
1010                 model_to_view_coord (tx, ty);
1011
1012                 if (isnan_local (tx) || isnan_local (ty)) {
1013                         warning << string_compose (_("Ignoring illegal points on AutomationLine \"%1\""),
1014                                                    _name) << endmsg;
1015                         continue;
1016                 }
1017
1018                 if (tx >= max_framepos || tx < 0 || tx >= _maximum_time) {
1019                         continue;
1020                 }
1021
1022                 /* convert x-coordinate to a canvas unit coordinate (this takes
1023                  * zoom and scroll into account).
1024                  */
1025
1026                 tx = trackview.editor().sample_to_pixel_unrounded (tx);
1027
1028                 /* convert from canonical view height (0..1.0) to actual
1029                  * height coordinates (using X11's top-left rooted system)
1030                  */
1031
1032                 ty = _height - (ty * _height);
1033
1034                 add_visible_control_point (vp, pi, tx, ty, ai, np);
1035                 vp++;
1036         }
1037
1038         /* discard extra CP's to avoid confusing ourselves */
1039
1040         while (control_points.size() > vp) {
1041                 ControlPoint* cp = control_points.back();
1042                 control_points.pop_back ();
1043                 delete cp;
1044         }
1045
1046         if (!terminal_points_can_slide) {
1047                 control_points.back()->set_can_slide(false);
1048         }
1049
1050         if (vp > 1) {
1051
1052                 /* reset the line coordinates given to the CanvasLine */
1053
1054                 while (line_points.size() < vp) {
1055                         line_points.push_back (ArdourCanvas::Duple (0,0));
1056                 }
1057
1058                 while (line_points.size() > vp) {
1059                         line_points.pop_back ();
1060                 }
1061
1062                 for (uint32_t n = 0; n < vp; ++n) {
1063                         line_points[n].x = control_points[n]->get_x();
1064                         line_points[n].y = control_points[n]->get_y();
1065                 }
1066
1067                 line->set_steps (line_points, is_stepped());
1068
1069                 update_visibility ();
1070         }
1071
1072         set_selected_points (trackview.editor().get_selection().points);
1073 }
1074
1075 void
1076 AutomationLine::reset ()
1077 {
1078         DEBUG_TRACE (DEBUG::Automation, "\t\tLINE RESET\n");
1079         update_pending = false;
1080         have_timeout = false;
1081
1082         if (no_draw) {
1083                 return;
1084         }
1085
1086         alist->apply_to_points (*this, &AutomationLine::reset_callback);
1087 }
1088
1089 void
1090 AutomationLine::queue_reset ()
1091 {
1092         /* this must be called from the GUI thread
1093          */
1094
1095         if (trackview.editor().session()->transport_rolling() && alist->automation_write()) {
1096                 /* automation write pass ... defer to a timeout */
1097                 /* redraw in 1/4 second */
1098                 if (!have_timeout) {
1099                         DEBUG_TRACE (DEBUG::Automation, "\tqueue timeout\n");
1100                         Glib::signal_timeout().connect (sigc::bind_return (sigc::mem_fun (*this, &AutomationLine::reset), false), 250);
1101                         have_timeout = true;
1102                 } else {
1103                         DEBUG_TRACE (DEBUG::Automation, "\ttimeout already queued, change ignored\n");
1104                 }
1105         } else {
1106                 reset ();
1107         }
1108 }
1109
1110 void
1111 AutomationLine::clear ()
1112 {
1113         /* parent must create and commit command */
1114         XMLNode &before = alist->get_state();
1115         alist->clear();
1116
1117         trackview.editor().session()->add_command (
1118                 new MementoCommand<AutomationList> (memento_command_binder (), &before, &alist->get_state()));
1119 }
1120
1121 void
1122 AutomationLine::set_list (boost::shared_ptr<ARDOUR::AutomationList> list)
1123 {
1124         alist = list;
1125         queue_reset ();
1126         connect_to_list ();
1127 }
1128
1129 void
1130 AutomationLine::add_visibility (VisibleAspects va)
1131 {
1132         VisibleAspects old = _visible;
1133
1134         _visible = VisibleAspects (_visible | va);
1135
1136         if (old != _visible) {
1137                 update_visibility ();
1138         }
1139 }
1140
1141 void
1142 AutomationLine::set_visibility (VisibleAspects va)
1143 {
1144         if (_visible != va) {
1145                 _visible = va;
1146                 update_visibility ();
1147         }
1148 }
1149
1150 void
1151 AutomationLine::remove_visibility (VisibleAspects va)
1152 {
1153         VisibleAspects old = _visible;
1154
1155         _visible = VisibleAspects (_visible & ~va);
1156
1157         if (old != _visible) {
1158                 update_visibility ();
1159         }
1160 }
1161
1162 void
1163 AutomationLine::track_entered()
1164 {
1165         add_visibility (ControlPoints);
1166 }
1167
1168 void
1169 AutomationLine::track_exited()
1170 {
1171         remove_visibility (ControlPoints);
1172 }
1173
1174 XMLNode &
1175 AutomationLine::get_state (void)
1176 {
1177         /* function as a proxy for the model */
1178         return alist->get_state();
1179 }
1180
1181 int
1182 AutomationLine::set_state (const XMLNode &node, int version)
1183 {
1184         /* function as a proxy for the model */
1185         return alist->set_state (node, version);
1186 }
1187
1188 void
1189 AutomationLine::view_to_model_coord (double& x, double& y) const
1190 {
1191         x = _time_converter->from (x);
1192         view_to_model_coord_y (y);
1193 }
1194
1195 void
1196 AutomationLine::view_to_model_coord_y (double& y) const
1197 {
1198         /* TODO: This should be more generic (use ParameterDescriptor)
1199          * or better yet:  Controllable -> set_interface();
1200          */
1201         if (   alist->parameter().type() == GainAutomation
1202             || alist->parameter().type() == EnvelopeAutomation
1203             || (_desc.unit == ParameterDescriptor::DB && _desc.lower == 0.)) {
1204                 y = slider_position_to_gain_with_max (y, _desc.upper);
1205                 y = max ((double)_desc.lower, y);
1206                 y = min ((double)_desc.upper, y);
1207         } else if (alist->parameter().type() == TrimAutomation
1208                    || (_desc.unit == ParameterDescriptor::DB && _desc.lower > 0 && _desc.upper > _desc.lower)) {
1209                 const double lower_db = accurate_coefficient_to_dB (_desc.lower);
1210                 const double range_db = accurate_coefficient_to_dB (_desc.upper) - lower_db;
1211                 y = max (0.0, y);
1212                 y = min (1.0, y);
1213                 y = dB_to_coefficient (lower_db + y * range_db);
1214         } else if (alist->parameter().type() == PanAzimuthAutomation ||
1215                    alist->parameter().type() == PanElevationAutomation) {
1216                 y = 1.0 - y;
1217         } else if (alist->parameter().type() == PanWidthAutomation) {
1218                 y = 2.0 * y - 1.0;
1219         } else {
1220                 y = y * (double)(alist->get_max_y() - alist->get_min_y()) + alist->get_min_y();
1221                 if (_desc.integer_step) {
1222                         y = round(y);
1223                 } else if (_desc.toggled) {
1224                         y = (y > 0.5) ? 1.0 : 0.0;
1225                 }
1226         }
1227 }
1228
1229 void
1230 AutomationLine::model_to_view_coord_y (double& y) const
1231 {
1232         /* TODO: This should be more generic (use ParameterDescriptor) */
1233         if (   alist->parameter().type() == GainAutomation
1234             || alist->parameter().type() == EnvelopeAutomation
1235             || (_desc.unit == ParameterDescriptor::DB && _desc.lower == 0.)) {
1236                 y = gain_to_slider_position_with_max (y, Config->get_max_gain());
1237         } else if (alist->parameter().type() == TrimAutomation
1238                    || (_desc.unit == ParameterDescriptor::DB && _desc.lower > 0 && _desc.upper > _desc.lower)) {
1239                 const double lower_db = accurate_coefficient_to_dB (_desc.lower);
1240                 const double range_db = accurate_coefficient_to_dB (_desc.upper) - lower_db;
1241                 y = (accurate_coefficient_to_dB (y) - lower_db) / range_db;
1242         } else if (alist->parameter().type() == PanAzimuthAutomation ||
1243                    alist->parameter().type() == PanElevationAutomation) {
1244                 y = 1.0 - y;
1245         } else if (alist->parameter().type() == PanWidthAutomation) {
1246                 y = .5 + y * .5;
1247         } else {
1248                 y = (y - alist->get_min_y()) / (double)(alist->get_max_y() - alist->get_min_y());
1249         }
1250 }
1251
1252 void
1253 AutomationLine::model_to_view_coord (double& x, double& y) const
1254 {
1255         model_to_view_coord_y (y);
1256         x = _time_converter->to (x) - _offset;
1257 }
1258
1259 /** Called when our list has announced that its interpolation style has changed */
1260 void
1261 AutomationLine::interpolation_changed (AutomationList::InterpolationStyle style)
1262 {
1263         if (line_points.size() > 1) {
1264                 line->set_steps(line_points, is_stepped());
1265         }
1266 }
1267
1268 void
1269 AutomationLine::add_visible_control_point (uint32_t view_index, uint32_t pi, double tx, double ty,
1270                                            AutomationList::iterator model, uint32_t npoints)
1271 {
1272         ControlPoint::ShapeType shape;
1273
1274         if (view_index >= control_points.size()) {
1275
1276                 /* make sure we have enough control points */
1277
1278                 ControlPoint* ncp = new ControlPoint (*this);
1279                 ncp->set_size (control_point_box_size ());
1280
1281                 control_points.push_back (ncp);
1282         }
1283
1284         if (!terminal_points_can_slide) {
1285                 if (pi == 0) {
1286                         control_points[view_index]->set_can_slide (false);
1287                         if (tx == 0) {
1288                                 shape = ControlPoint::Start;
1289                         } else {
1290                                 shape = ControlPoint::Full;
1291                         }
1292                 } else if (pi == npoints - 1) {
1293                         control_points[view_index]->set_can_slide (false);
1294                         shape = ControlPoint::End;
1295                 } else {
1296                         control_points[view_index]->set_can_slide (true);
1297                         shape = ControlPoint::Full;
1298                 }
1299         } else {
1300                 control_points[view_index]->set_can_slide (true);
1301                 shape = ControlPoint::Full;
1302         }
1303
1304         control_points[view_index]->reset (tx, ty, model, view_index, shape);
1305
1306         /* finally, control visibility */
1307
1308         if (_visible & ControlPoints) {
1309                 control_points[view_index]->show ();
1310         } else {
1311                 control_points[view_index]->hide ();
1312         }
1313 }
1314
1315 void
1316 AutomationLine::connect_to_list ()
1317 {
1318         _list_connections.drop_connections ();
1319
1320         alist->StateChanged.connect (_list_connections, invalidator (*this), boost::bind (&AutomationLine::list_changed, this), gui_context());
1321
1322         alist->InterpolationChanged.connect (
1323                 _list_connections, invalidator (*this), boost::bind (&AutomationLine::interpolation_changed, this, _1), gui_context());
1324 }
1325
1326 MementoCommandBinder<AutomationList>*
1327 AutomationLine::memento_command_binder ()
1328 {
1329         return new SimpleMementoCommandBinder<AutomationList> (*alist.get());
1330 }
1331
1332 /** Set the maximum time that points on this line can be at, relative
1333  *  to the start of the track or region that it is on.
1334  */
1335 void
1336 AutomationLine::set_maximum_time (framecnt_t t)
1337 {
1338         if (_maximum_time == t) {
1339                 return;
1340         }
1341
1342         _maximum_time = t;
1343         reset ();
1344 }
1345
1346
1347 /** @return min and max x positions of points that are in the list, in session frames */
1348 pair<framepos_t, framepos_t>
1349 AutomationLine::get_point_x_range () const
1350 {
1351         pair<framepos_t, framepos_t> r (max_framepos, 0);
1352
1353         for (AutomationList::const_iterator i = the_list()->begin(); i != the_list()->end(); ++i) {
1354                 r.first = min (r.first, session_position (i));
1355                 r.second = max (r.second, session_position (i));
1356         }
1357
1358         return r;
1359 }
1360
1361 framepos_t
1362 AutomationLine::session_position (AutomationList::const_iterator p) const
1363 {
1364         return _time_converter->to ((*p)->when) + _offset + _time_converter->origin_b ();
1365 }
1366
1367 void
1368 AutomationLine::set_offset (framepos_t off)
1369 {
1370         if (_offset == off) {
1371                 return;
1372         }
1373
1374         _offset = off;
1375         reset ();
1376 }