libs/ardour/amp.cc

   1 /*
   2     Copyright (C) 2006 Paul Davis
   3
   4     This program is free software; you can redistribute it and/or modify it
   5     under the terms of the GNU General Public License as published by the Free
   6     Software Foundation; either version 2 of the License, or (at your option)
   7     any later version.
   8
   9     This program is distributed in the hope that it will be useful, but WITHOUT
  10     ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
  11     FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
  12     for more details.
  13
  14     You should have received a copy of the GNU General Public License along
  15     with this program; if not, write to the Free Software Foundation, Inc.,
  16     675 Mass Ave, Cambridge, MA 02139, USA.
  17 */
  18
  19 #include <iostream>
  20 #include <cstring>
  21 #include <cmath>
  22 #include <algorithm>
  23
  24 #include "evoral/Curve.hpp"
  25
  26 #include "ardour/amp.h"
  27 #include "ardour/audio_buffer.h"
  28 #include "ardour/buffer_set.h"
  29 #include "ardour/midi_buffer.h"
  30 #include "ardour/rc_configuration.h"
  31 #include "ardour/session.h"
  32
  33 #include "i18n.h"
  34
  35 using namespace ARDOUR;
  36 using namespace PBD;
  37 using std::min;
  38
  39 Amp::Amp (Session& s)
  40         : Processor(s, "Amp")
  41         , _apply_gain(true)
  42         , _apply_gain_automation(false)
  43         , _current_gain(1.0)
  44         , _gain_automation_buffer(0)
  45 {
  46         Evoral::Parameter p (GainAutomation);
  47         boost::shared_ptr<AutomationList> gl (new AutomationList (p));
  48         _gain_control = boost::shared_ptr<GainControl> (new GainControl (X_("gaincontrol"), s, this, p, gl));
  49         _gain_control->set_flags (Controllable::GainLike);
  50
  51         add_control(_gain_control);
  52 }
  53
  54 std::string
  55 Amp::display_name() const
  56 {
  57         return _("Fader");
  58 }
  59
  60 bool
  61 Amp::can_support_io_configuration (const ChanCount& in, ChanCount& out)
  62 {
  63         out = in;
  64         return true;
  65 }
  66
  67 bool
  68 Amp::configure_io (ChanCount in, ChanCount out)
  69 {
  70         if (out != in) { // always 1:1
  71                 return false;
  72         }
  73
  74         return Processor::configure_io (in, out);
  75 }
  76
  77 void
  78 Amp::run (BufferSet& bufs, framepos_t /*start_frame*/, framepos_t /*end_frame*/, pframes_t nframes, bool)
  79 {
  80         if (!_active && !_pending_active) {
  81                 return;
  82         }
  83
  84         if (_apply_gain) {
  85
  86                 if (_apply_gain_automation) {
  87
  88                         gain_t* gab = _gain_automation_buffer;
  89                         assert (gab);
  90
  91                         for (BufferSet::audio_iterator i = bufs.audio_begin(); i != bufs.audio_end(); ++i) {
  92                                 Sample* const sp = i->data();
  93                                 for (pframes_t nx = 0; nx < nframes; ++nx) {
  94                                         sp[nx] *= gab[nx];
  95                                 }
  96                         }
  97
  98                         _current_gain = gab[nframes-1];
  99
 100                 } else { /* manual (scalar) gain */
 101
 102                         gain_t const dg = _gain_control->user_double();
 103
 104                         if (_current_gain != dg) {
 105
 106                                 Amp::apply_gain (bufs, nframes, _current_gain, dg);
 107                                 _current_gain = dg;
 108
 109                         } else if (_current_gain != 1.0f) {
 110
 111                                 /* gain has not changed, but its non-unity
 112                                 */
 113
 114                                 for (BufferSet::midi_iterator i = bufs.midi_begin(); i != bufs.midi_end(); ++i) {
 115
 116                                         MidiBuffer& mb (*i);
 117
 118                                         for (MidiBuffer::iterator m = mb.begin(); m != mb.end(); ++m) {
 119                                                 Evoral::MIDIEvent<MidiBuffer::TimeType> ev = *m;
 120                                                 if (ev.is_note_on()) {
 121                                                         ev.scale_velocity (_current_gain);
 122                                                 }
 123                                         }
 124                                 }
 125
 126                                 for (BufferSet::audio_iterator i = bufs.audio_begin(); i != bufs.audio_end(); ++i) {
 127                                         apply_gain_to_buffer (i->data(), nframes, _current_gain);
 128                                 }
 129                         }
 130                 }
 131         }
 132
 133         _active = _pending_active;
 134 }
 135
 136 void
 137 Amp::apply_gain (BufferSet& bufs, framecnt_t nframes, gain_t initial, gain_t target)
 138 {
 139         /** Apply a (potentially) declicked gain to the buffers of @a bufs
 140          */
 141
 142         if (nframes == 0 || bufs.count().n_total() == 0) {
 143                 return;
 144         }
 145
 146         // if we don't need to declick, defer to apply_simple_gain
 147         if (initial == target) {
 148                 apply_simple_gain (bufs, nframes, target);
 149                 return;
 150         }
 151
 152         const framecnt_t declick = std::min ((framecnt_t) 128, nframes);
 153         gain_t         delta;
 154         double         fractional_shift = -1.0/declick;
 155         double         fractional_pos;
 156
 157         if (target < initial) {
 158                 /* fade out: remove more and more of delta from initial */
 159                 delta = -(initial - target);
 160         } else {
 161                 /* fade in: add more and more of delta from initial */
 162                 delta = target - initial;
 163         }
 164
 165         /* MIDI Gain */
 166
 167         for (BufferSet::midi_iterator i = bufs.midi_begin(); i != bufs.midi_end(); ++i) {
 168
 169                 MidiBuffer& mb (*i);
 170
 171                 for (MidiBuffer::iterator m = mb.begin(); m != mb.end(); ++m) {
 172                         Evoral::MIDIEvent<MidiBuffer::TimeType> ev = *m;
 173
 174                         if (ev.is_note_on()) {
 175                                 const gain_t scale = delta * (ev.time()/(double) nframes);
 176                                 ev.scale_velocity (initial+scale);
 177                         }
 178                 }
 179         }
 180
 181         /* Audio Gain */
 182
 183         for (BufferSet::audio_iterator i = bufs.audio_begin(); i != bufs.audio_end(); ++i) {
 184                 Sample* const buffer = i->data();
 185
 186                 fractional_pos = 1.0;
 187
 188                 for (pframes_t nx = 0; nx < declick; ++nx) {
 189                         buffer[nx] *= (initial + (delta * (0.5 + 0.5 * cos (M_PI * fractional_pos))));
 190                         fractional_pos += fractional_shift;
 191                 }
 192
 193                 /* now ensure the rest of the buffer has the target value applied, if necessary. */
 194
 195                 if (declick != nframes) {
 196
 197                         if (target == 0.0) {
 198                                 memset (&buffer[declick], 0, sizeof (Sample) * (nframes - declick));
 199                         } else if (target != 1.0) {
 200                                 apply_gain_to_buffer (&buffer[declick], nframes - declick, target);
 201                         }
 202                 }
 203         }
 204 }
 205
 206 void
 207 Amp::declick (BufferSet& bufs, framecnt_t nframes, int dir)
 208 {
 209         /* Almost exactly like ::apply_gain() but skips MIDI buffers and has fixed initial+target
 210            values.
 211          */
 212
 213         if (nframes == 0 || bufs.count().n_total() == 0) {
 214                 return;
 215         }
 216
 217         const framecnt_t declick = std::min ((framecnt_t) 128, nframes);
 218         gain_t         delta, initial, target;
 219         double         fractional_shift = -1.0/(declick-1);
 220         double         fractional_pos;
 221
 222         if (dir < 0) {
 223                 /* fade out: remove more and more of delta from initial */
 224                 delta = -1.0;
 225                 initial = 1.0;
 226                 target = 0.0;
 227         } else {
 228                 /* fade in: add more and more of delta from initial */
 229                 delta = 1.0;
 230                 initial = 0.0;
 231                 target = 1.0;
 232         }
 233
 234         /* Audio Gain */
 235
 236         for (BufferSet::audio_iterator i = bufs.audio_begin(); i != bufs.audio_end(); ++i) {
 237                 Sample* const buffer = i->data();
 238
 239                 fractional_pos = 1.0;
 240
 241                 for (pframes_t nx = 0; nx < declick; ++nx) {
 242                         buffer[nx] *= (initial + (delta * (0.5 + 0.5 * cos (M_PI * fractional_pos))));
 243                         fractional_pos += fractional_shift;
 244                 }
 245
 246                 /* now ensure the rest of the buffer has the target value applied, if necessary. */
 247
 248                 if (declick != nframes) {
 249
 250                         if (target == 0.0) {
 251                                 memset (&buffer[declick], 0, sizeof (Sample) * (nframes - declick));
 252                         } else if (target != 1.0) {
 253                                 apply_gain_to_buffer (&buffer[declick], nframes - declick, target);
 254                         }
 255                 }
 256         }
 257 }
 258
 259 void
 260 Amp::apply_gain (AudioBuffer& buf, framecnt_t nframes, gain_t initial, gain_t target)
 261 {
 262         /** Apply a (potentially) declicked gain to the contents of @a buf
 263          */
 264
 265         if (nframes == 0) {
 266                 return;
 267         }
 268
 269         // if we don't need to declick, defer to apply_simple_gain
 270         if (initial == target) {
 271                 apply_simple_gain (buf, nframes, target);
 272                 return;
 273         }
 274
 275         const framecnt_t declick = std::min ((framecnt_t) 128, nframes);
 276         gain_t         delta;
 277         double         fractional_shift = -1.0/declick;
 278         double         fractional_pos;
 279
 280         if (target < initial) {
 281                 /* fade out: remove more and more of delta from initial */
 282                 delta = -(initial - target);
 283         } else {
 284                 /* fade in: add more and more of delta from initial */
 285                 delta = target - initial;
 286         }
 287
 288
 289         Sample* const buffer = buf.data();
 290
 291         fractional_pos = 1.0;
 292
 293         for (pframes_t nx = 0; nx < declick; ++nx) {
 294                 buffer[nx] *= (initial + (delta * (0.5 + 0.5 * cos (M_PI * fractional_pos))));
 295                 fractional_pos += fractional_shift;
 296         }
 297
 298         /* now ensure the rest of the buffer has the target value applied, if necessary. */
 299
 300         if (declick != nframes) {
 301
 302                 if (target == 0.0) {
 303                         memset (&buffer[declick], 0, sizeof (Sample) * (nframes - declick));
 304                 } else if (target != 1.0) {
 305                         apply_gain_to_buffer (&buffer[declick], nframes - declick, target);
 306                 }
 307         }
 308 }
 309
 310 void
 311 Amp::apply_simple_gain (BufferSet& bufs, framecnt_t nframes, gain_t target)
 312 {
 313         if (target == 0.0) {
 314
 315                 for (BufferSet::midi_iterator i = bufs.midi_begin(); i != bufs.midi_end(); ++i) {
 316                         MidiBuffer& mb (*i);
 317
 318                         for (MidiBuffer::iterator m = mb.begin(); m != mb.end(); ++m) {
 319                                 Evoral::MIDIEvent<MidiBuffer::TimeType> ev = *m;
 320                                 if (ev.is_note_on()) {
 321                                         ev.set_velocity (0);
 322                                 }
 323                         }
 324                 }
 325
 326                 for (BufferSet::audio_iterator i = bufs.audio_begin(); i != bufs.audio_end(); ++i) {
 327                         memset (i->data(), 0, sizeof (Sample) * nframes);
 328                 }
 329
 330         } else if (target != 1.0) {
 331
 332                 for (BufferSet::midi_iterator i = bufs.midi_begin(); i != bufs.midi_end(); ++i) {
 333                         MidiBuffer& mb (*i);
 334
 335                         for (MidiBuffer::iterator m = mb.begin(); m != mb.end(); ++m) {
 336                                 Evoral::MIDIEvent<MidiBuffer::TimeType> ev = *m;
 337                                 if (ev.is_note_on()) {
 338                                         ev.scale_velocity (target);
 339                                 }
 340                         }
 341                 }
 342
 343                 for (BufferSet::audio_iterator i = bufs.audio_begin(); i != bufs.audio_end(); ++i) {
 344                         apply_gain_to_buffer (i->data(), nframes, target);
 345                 }
 346         }
 347 }
 348
 349 void
 350 Amp::apply_simple_gain (AudioBuffer& buf, framecnt_t nframes, gain_t target)
 351 {
 352         if (target == 0.0) {
 353                 memset (buf.data(), 0, sizeof (Sample) * nframes);
 354         } else if (target != 1.0) {
 355                 apply_gain_to_buffer (buf.data(), nframes, target);
 356         }
 357 }
 358
 359 void
 360 Amp::inc_gain (gain_t factor, void *src)
 361 {
 362         float desired_gain = _gain_control->user_double();
 363
 364         if (desired_gain == 0.0f) {
 365                 set_gain (0.000001f + (0.000001f * factor), src);
 366         } else {
 367                 set_gain (desired_gain + (desired_gain * factor), src);
 368         }
 369 }
 370
 371 void
 372 Amp::set_gain (gain_t val, void *)
 373 {
 374         _gain_control->set_value (val);
 375 }
 376
 377 XMLNode&
 378 Amp::state (bool full_state)
 379 {
 380         XMLNode& node (Processor::state (full_state));
 381         node.add_property("type", "amp");
 382         node.add_child_nocopy (_gain_control->get_state());
 383
 384         return node;
 385 }
 386
 387 int
 388 Amp::set_state (const XMLNode& node, int version)
 389 {
 390         XMLNode* gain_node;
 391
 392         Processor::set_state (node, version);
 393
 394         if ((gain_node = node.child (Controllable::xml_node_name.c_str())) != 0) {
 395                 _gain_control->set_state (*gain_node, version);
 396         }
 397
 398         return 0;
 399 }
 400
 401 void
 402 Amp::GainControl::set_value (double val)
 403 {
 404         AutomationControl::set_value (min (val, (double) Config->get_max_gain()));
 405         _amp->session().set_dirty ();
 406 }
 407
 408 double
 409 Amp::GainControl::internal_to_interface (double v) const
 410 {
 411         return gain_to_slider_position (v);
 412 }
 413
 414 double
 415 Amp::GainControl::interface_to_internal (double v) const
 416 {
 417         return slider_position_to_gain (v);
 418 }
 419
 420 double
 421 Amp::GainControl::internal_to_user (double v) const
 422 {
 423         return accurate_coefficient_to_dB (v);
 424 }
 425
 426 double
 427 Amp::GainControl::user_to_internal (double u) const
 428 {
 429         return dB_to_coefficient (u);
 430 }
 431
 432 std::string
 433 Amp::GainControl::get_user_string () const
 434 {
 435         char theBuf[32]; sprintf( theBuf, _("%3.1f dB"), accurate_coefficient_to_dB (get_value()));
 436         return std::string(theBuf);
 437 }
 438
 439 /** Write gain automation for this cycle into the buffer previously passed in to
 440  *  set_gain_automation_buffer (if we are in automation playback mode and the
 441  *  transport is rolling).
 442  */
 443 void
 444 Amp::setup_gain_automation (framepos_t start_frame, framepos_t end_frame, framecnt_t nframes)
 445 {
 446         Glib::Threads::Mutex::Lock am (control_lock(), Glib::Threads::TRY_LOCK);
 447
 448         if (am.locked()
 449             && (_session.transport_rolling() || _session.bounce_processing())
 450             && _gain_control->automation_playback())
 451         {
 452                 assert (_gain_automation_buffer);
 453                 _apply_gain_automation = _gain_control->list()->curve().rt_safe_get_vector (
 454                         start_frame, end_frame, _gain_automation_buffer, nframes);
 455         } else {
 456                 _apply_gain_automation = false;
 457         }
 458 }
 459
 460 bool
 461 Amp::visible() const
 462 {
 463         return true;
 464 }
 465
 466 std::string
 467 Amp::value_as_string (boost::shared_ptr<AutomationControl> ac) const
 468 {
 469         if (ac == _gain_control) {
 470                 char buffer[32];
 471                 snprintf (buffer, sizeof (buffer), _("%.2fdB"), ac->internal_to_user (ac->get_value ()));
 472                 return buffer;
 473         }
 474
 475         return Automatable::value_as_string (ac);
 476 }
 477
 478 /** Sets up the buffer that setup_gain_automation and ::run will use for
 479  *  gain automationc curves.  Must be called before setup_gain_automation,
 480  *  and must be called with process lock held.
 481  */
 482
 483 void
 484 Amp::set_gain_automation_buffer (gain_t* g)
 485 {
 486         _gain_automation_buffer = g;
 487 }