libs/ardour/automation_control.cc

   1 /*
   2     Copyright (C) 2007 Paul Davis
   3     Author: David Robillard
   4
   5     This program is free software; you can redistribute it and/or modify
   6     it under the terms of the GNU General Public License as published by
   7     the Free Software Foundation; either version 2 of the License, or
   8     (at your option) any later version.
   9
  10     This program is distributed in the hope that it will be useful,
  11     but WITHOUT ANY WARRANTY; without even the implied warranty of
  12     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  13     GNU General Public License for more details.
  14
  15     You should have received a copy of the GNU General Public License
  16     along with this program; if not, write to the Free Software
  17     Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  18
  19 */
  20
  21 #include <iostream>
  22 #include "ardour/automation_control.h"
  23 #include "ardour/automation_watch.h"
  24 #include "ardour/event_type_map.h"
  25 #include "ardour/session.h"
  26
  27 #include "pbd/memento_command.h"
  28
  29 #include "i18n.h"
  30
  31 using namespace std;
  32 using namespace ARDOUR;
  33 using namespace PBD;
  34
  35 AutomationControl::AutomationControl(ARDOUR::Session&                          session,
  36                                      const Evoral::Parameter&                  parameter,
  37                                      const ParameterDescriptor&                desc,
  38                                      boost::shared_ptr<ARDOUR::AutomationList> list,
  39                                      const string&                             name)
  40         : Controllable (name.empty() ? EventTypeMap::instance().to_symbol(parameter) : name)
  41         , Evoral::Control(parameter, desc, list)
  42         , _session(session)
  43         , _desc(desc)
  44 {
  45 }
  46
  47 AutomationControl::~AutomationControl ()
  48 {
  49 }
  50
  51 /** Get the current effective `user' value based on automation state */
  52 double
  53 AutomationControl::get_value() const
  54 {
  55         bool from_list = _list && ((AutomationList*)_list.get())->automation_playback();
  56         return Control::get_double (from_list, _session.transport_frame());
  57 }
  58
  59 /** Set the value and do the right thing based on automation state
  60  *  (e.g. record if necessary, etc.)
  61  *  @param value `user' value
  62  */
  63 void
  64 AutomationControl::set_value (double value)
  65 {
  66         bool to_list = _list && ((AutomationList*)_list.get())->automation_write();
  67
  68         Control::set_double (value, _session.transport_frame(), to_list);
  69
  70         Changed(); /* EMIT SIGNAL */
  71 }
  72
  73 void
  74 AutomationControl::set_list (boost::shared_ptr<Evoral::ControlList> list)
  75 {
  76         Control::set_list (list);
  77         Changed();  /* EMIT SIGNAL */
  78 }
  79
  80 void
  81 AutomationControl::set_automation_state (AutoState as)
  82 {
  83         if (_list && as != alist()->automation_state()) {
  84
  85                 alist()->set_automation_state (as);
  86                 if (_desc.toggled) {
  87                         return;  // No watch for boolean automation
  88                 }
  89
  90                 if (as == Write) {
  91                         /* get state for undo */
  92                         _before = &alist ()->get_state ();
  93                         AutomationWatch::instance().add_automation_watch (shared_from_this());
  94                 } else if (as == Touch) {
  95                         if (!touching()) {
  96                                 AutomationWatch::instance().remove_automation_watch (shared_from_this());
  97                         } else {
  98                                 /* this seems unlikely, but the combination of
  99                                  * a control surface and the mouse could make
 100                                  * it possible to put the control into Touch
 101                                  * mode *while* touching it.
 102                                  */
 103                                 AutomationWatch::instance().add_automation_watch (shared_from_this());
 104                         }
 105                 } else {
 106                         AutomationWatch::instance().remove_automation_watch (shared_from_this());
 107                 }
 108         }
 109 }
 110
 111 void
 112 AutomationControl::set_automation_style (AutoStyle as)
 113 {
 114         if (!_list) return;
 115         alist()->set_automation_style (as);
 116 }
 117
 118 void
 119 AutomationControl::start_touch(double when)
 120 {
 121         if (!_list) {
 122                 return;
 123         }
 124
 125         if (!touching()) {
 126
 127                 if (alist()->automation_state() == Touch) {
 128                         /* subtle. aligns the user value with the playback */
 129                         set_value (get_value ());
 130                         _before = &alist ()->get_state ();
 131                         alist()->start_touch (when);
 132                         if (!_desc.toggled) {
 133                                 AutomationWatch::instance().add_automation_watch (shared_from_this());
 134                         }
 135                 }
 136                 set_touching (true);
 137         }
 138 }
 139
 140 void
 141 AutomationControl::stop_touch(bool mark, double when)
 142 {
 143         if (!_list) return;
 144         if (touching()) {
 145                 set_touching (false);
 146
 147                 if (alist()->automation_state() == Write) {
 148                         _session.begin_reversible_command (string_compose (_("write %1 automation"), name ()));
 149                         _session.add_command (new MementoCommand<AutomationList> (*alist ().get (), _before, &alist ()->get_state ()));
 150                         _session.commit_reversible_command ();
 151                 }
 152
 153                 if (alist()->automation_state() == Touch) {
 154                         alist()->stop_touch (mark, when);
 155                         if (!_desc.toggled) {
 156                                 AutomationWatch::instance().remove_automation_watch (shared_from_this());
 157                         }
 158
 159                         _session.begin_reversible_command (string_compose (_("touch %1 automation"), name ()));
 160                         _session.add_command (new MementoCommand<AutomationList> (*alist ().get (), _before, &alist ()->get_state ()));
 161                         _session.commit_reversible_command ();
 162                 }
 163         }
 164 }
 165
 166 double
 167 AutomationControl::internal_to_interface (double val) const
 168 {
 169         if (_desc.integer_step) {
 170                 // both upper and lower are inclusive.
 171                 val =  (val - lower()) / (1 + upper() - lower());
 172         } else {
 173                 val =  (val - lower()) / (upper() - lower());
 174         }
 175
 176         if (_desc.logarithmic) {
 177                 if (val > 0) {
 178                         val = pow (val, 1/1.5);
 179                 } else {
 180                         val = 0;
 181                 }
 182         }
 183
 184         return val;
 185 }
 186
 187 double
 188 AutomationControl::interface_to_internal (double val) const
 189 {
 190         if (_desc.logarithmic) {
 191                 if (val <= 0) {
 192                         val = 0;
 193                 } else {
 194                         val = pow (val, 1.5);
 195                 }
 196         }
 197
 198         if (_desc.integer_step) {
 199                 val =  lower() + val * (1 + upper() - lower());
 200         } else {
 201                 val =  lower() + val * (upper() - lower());
 202         }
 203
 204         if (val < lower()) val = lower();
 205         if (val > upper()) val = upper();
 206
 207         return val;
 208 }
 209
 210