libs/ardour/panner_shell.cc

   1 /*
   2     Copyright (C) 2004-2011 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 <inttypes.h>
  21
  22 #include <cmath>
  23 #include <cerrno>
  24 #include <fstream>
  25 #include <cstdlib>
  26 #include <string>
  27 #include <cstdio>
  28 #include <locale.h>
  29 #include <unistd.h>
  30 #include <float.h>
  31 #include <iomanip>
  32
  33 #include <glibmm.h>
  34
  35 #include "pbd/cartesian.h"
  36 #include "pbd/boost_debug.h"
  37 #include "pbd/convert.h"
  38 #include "pbd/error.h"
  39 #include "pbd/failed_constructor.h"
  40 #include "pbd/xml++.h"
  41 #include "pbd/enumwriter.h"
  42
  43 #include "evoral/Curve.hpp"
  44
  45 #include "ardour/audio_buffer.h"
  46 #include "ardour/audio_buffer.h"
  47 #include "ardour/automatable.h"
  48 #include "ardour/buffer_set.h"
  49 #include "ardour/debug.h"
  50 #include "ardour/pannable.h"
  51 #include "ardour/panner.h"
  52 #include "ardour/panner_manager.h"
  53 #include "ardour/panner_shell.h"
  54 #include "ardour/runtime_functions.h"
  55 #include "ardour/session.h"
  56 #include "ardour/utils.h"
  57
  58 #include "i18n.h"
  59
  60 #include "pbd/mathfix.h"
  61
  62 using namespace std;
  63 using namespace ARDOUR;
  64 using namespace PBD;
  65
  66 PannerShell::PannerShell (string name, Session& s, boost::shared_ptr<Pannable> p)
  67         : SessionObject (s, name)
  68         , _pannable (p)
  69 {
  70         set_name (name);
  71 }
  72
  73 PannerShell::~PannerShell ()
  74 {
  75         DEBUG_TRACE(DEBUG::Destruction, string_compose ("panner shell for %1 destructor, pannable is %2\n", _name, _pannable));
  76 }
  77
  78 void
  79 PannerShell::configure_io (ChanCount in, ChanCount out)
  80 {
  81         uint32_t nouts = out.n_audio();
  82         uint32_t nins = in.n_audio();
  83
  84         /* if new and old config don't need panning, or if
  85            the config hasn't changed, we're done.
  86         */
  87
  88         if (_panner && _panner->in().n_audio() == nins && _panner->out().n_audio() == nouts) {
  89                 return;
  90         }
  91
  92         if (nouts < 2 || nins == 0) {
  93                 /* no need for panning with less than 2 outputs or no inputs */
  94                 if (_panner) {
  95                         _panner.reset ();
  96                         Changed (); /* EMIT SIGNAL */
  97                 }
  98                 return;
  99         }
 100
 101         PannerInfo* pi = PannerManager::instance().select_panner (in, out);
 102
 103         if (pi == 0) {
 104                 abort ();
 105         }
 106
 107         Panner* p = pi->descriptor.factory (_pannable, _session.get_speakers());
 108         boost_debug_shared_ptr_mark_interesting (p, "Panner");
 109         _panner.reset (p);
 110         _panner->configure_io (in, out);
 111
 112         Changed (); /* EMIT SIGNAL */
 113 }
 114
 115 XMLNode&
 116 PannerShell::get_state (void)
 117 {
 118         return state (true);
 119 }
 120
 121 XMLNode&
 122 PannerShell::state (bool full)
 123 {
 124         XMLNode* node = new XMLNode ("PannerShell");
 125
 126         if (_panner) {
 127                 node->add_child_nocopy (_panner->state (full));
 128         }
 129
 130         return *node;
 131 }
 132
 133 int
 134 PannerShell::set_state (const XMLNode& node, int version)
 135 {
 136         XMLNodeList nlist = node.children ();
 137         XMLNodeConstIterator niter;
 138         const XMLProperty *prop;
 139         LocaleGuard lg (X_("POSIX"));
 140
 141         _panner.reset ();
 142
 143         for (niter = nlist.begin(); niter != nlist.end(); ++niter) {
 144
 145                 if ((*niter)->name() == X_("Panner")) {
 146
 147                         if ((prop = (*niter)->property (X_("type")))) {
 148
 149                                 list<PannerInfo*>::iterator p;
 150                                 PannerManager& pm (PannerManager::instance());
 151
 152                                 for (p = pm.panner_info.begin(); p != pm.panner_info.end(); ++p) {
 153                                         if (prop->value() == (*p)->descriptor.name) {
 154
 155                                                 /* note that we assume that all the stream panners
 156                                                    are of the same type. pretty good
 157                                                    assumption, but it's still an assumption.
 158                                                 */
 159
 160                                                 _panner.reset ((*p)->descriptor.factory (_pannable, _session.get_speakers ()));
 161
 162                                                 if (_panner->set_state (**niter, version) == 0) {
 163                                                         return -1;
 164                                                 }
 165
 166                                                 break;
 167                                         }
 168                                 }
 169
 170                                 if (p == pm.panner_info.end()) {
 171                                         error << string_compose (_("Unknown panner plugin \"%1\" found in pan state - ignored"),
 172                                                           prop->value())
 173                                               << endmsg;
 174                                 }
 175
 176                         } else {
 177                                 error << _("panner plugin node has no type information!")
 178                                       << endmsg;
 179                                 return -1;
 180                         }
 181                 }
 182         }
 183
 184         return 0;
 185 }
 186
 187
 188 void
 189 PannerShell::distribute_no_automation (BufferSet& inbufs, BufferSet& outbufs, pframes_t nframes, gain_t gain_coeff)
 190 {
 191         if (outbufs.count().n_audio() == 0) {
 192                 // Don't want to lose audio...
 193                 assert(inbufs.count().n_audio() == 0);
 194                 return;
 195         }
 196
 197         if (outbufs.count().n_audio() == 1) {
 198
 199                 /* just one output: no real panning going on */
 200
 201                 AudioBuffer& dst = outbufs.get_audio(0);
 202
 203                 if (gain_coeff == 0.0f) {
 204
 205                         /* gain was zero, so make it silent */
 206
 207                         dst.silence (nframes);
 208
 209                 } else if (gain_coeff == 1.0f){
 210
 211                         /* mix all input buffers into the output */
 212
 213                         // copy the first
 214                         dst.read_from(inbufs.get_audio(0), nframes);
 215
 216                         // accumulate starting with the second
 217                         if (inbufs.count().n_audio() > 0) {
 218                                 BufferSet::audio_iterator i = inbufs.audio_begin();
 219                                 for (++i; i != inbufs.audio_end(); ++i) {
 220                                         dst.merge_from(*i, nframes);
 221                                 }
 222                         }
 223
 224                 } else {
 225
 226                         /* mix all buffers into the output, scaling them all by the gain */
 227
 228                         // copy the first
 229                         dst.read_from(inbufs.get_audio(0), nframes);
 230
 231                         // accumulate (with gain) starting with the second
 232                         if (inbufs.count().n_audio() > 0) {
 233                                 BufferSet::audio_iterator i = inbufs.audio_begin();
 234                                 for (++i; i != inbufs.audio_end(); ++i) {
 235                                         dst.accumulate_with_gain_from(*i, nframes, gain_coeff);
 236                                 }
 237                         }
 238
 239                 }
 240
 241                 return;
 242         }
 243
 244         /* multiple outputs ... we must have a panner */
 245
 246         assert (_panner);
 247
 248         /* setup silent buffers so that we can mix into the outbuffers (slightly suboptimal -
 249            better to copy the first set of data then mix after that, but hey, its 2011)
 250          */
 251
 252         for (BufferSet::audio_iterator b = outbufs.audio_begin(); b != outbufs.audio_end(); ++b) {
 253                 (*b).silence (nframes);
 254         }
 255
 256         _panner->distribute (inbufs, outbufs, gain_coeff, nframes);
 257 }
 258
 259 void
 260 PannerShell::run (BufferSet& inbufs, BufferSet& outbufs, framepos_t start_frame, framepos_t end_frame, pframes_t nframes)
 261 {
 262         if (outbufs.count().n_audio() == 0) {
 263                 // Failing to deliver audio we were asked to deliver is a bug
 264                 assert(inbufs.count().n_audio() == 0);
 265                 return;
 266         }
 267
 268         if (outbufs.count().n_audio() == 1) {
 269
 270                 /* one output only: no panner */
 271
 272                 AudioBuffer& dst = outbufs.get_audio(0);
 273
 274                 // FIXME: apply gain automation?
 275
 276                 // copy the first
 277                 dst.read_from (inbufs.get_audio(0), nframes);
 278
 279                 // accumulate starting with the second
 280                 BufferSet::audio_iterator i = inbufs.audio_begin();
 281                 for (++i; i != inbufs.audio_end(); ++i) {
 282                         dst.merge_from (*i, nframes);
 283                 }
 284
 285                 return;
 286         }
 287
 288         // More than 1 output
 289
 290         AutoState as = _panner->automation_state ();
 291
 292         // If we shouldn't play automation defer to distribute_no_automation
 293
 294         if (!(as & Play || ((as & Touch) && !_panner->touching()))) {
 295
 296                 // Speed quietning
 297                 gain_t gain_coeff = 1.0;
 298
 299                 if (fabsf(_session.transport_speed()) > 1.5f && Config->get_quieten_at_speed ()) {
 300                         gain_coeff = speed_quietning;
 301                 }
 302
 303                 distribute_no_automation (inbufs, outbufs, nframes, gain_coeff);
 304
 305         } else {
 306
 307                 /* setup the terrible silence so that we can mix into the outbuffers (slightly suboptimal -
 308                    better to copy the first set of data then mix after that, but hey, its 2011)
 309                 */
 310                 for (BufferSet::audio_iterator i = outbufs.audio_begin(); i != outbufs.audio_end(); ++i) {
 311                         i->silence(nframes);
 312                 }
 313
 314                 _panner->distribute_automated (inbufs, outbufs, start_frame, end_frame, nframes, _session.pan_automation_buffer());
 315         }
 316 }
 317