scripts/amp2.lua

   1 ardour {
   2         ["type"]    = "dsp",
   3         name        = "Simple Amp II",
   4         category    = "Example",
   5         license     = "MIT",
   6         author      = "Robin Gareus",
   7         email       = "robin@gareus.org",
   8         site        = "http://gareus.org",
   9         description = [[
  10         An Example DSP Plugin for processing audio, to
  11         be used with Ardour's Lua scripting facility.]]
  12 }
  13
  14 -- see amp1.lua
  15 function dsp_ioconfig ()
  16         return { [1] = { audio_in = -1, audio_out = -1}, }
  17 end
  18
  19 function dsp_configure (ins, outs)
  20         audio_ins = ins:n_audio();
  21         local audio_outs = outs:n_audio()
  22         assert (audio_ins == audio_outs)
  23 end
  24
  25
  26 -- this variant modifies the audio data in-place
  27 -- in Ardour's buffer.
  28 --
  29 -- It relies on the fact that by default Ardour requires
  30 -- plugins to process data in-place (zero copy).
  31 --
  32 -- Every assignment directly calls a c-function behind
  33 -- the scenes to get/set the value.
  34 -- It's a bit more efficient than "Amp I" on most systems.
  35
  36 function dsp_runmap (bufs, in_map, out_map, n_samples, offset)
  37         for c = 1,audio_ins do
  38                 -- ensure that processing does happen in-place
  39                 local ib = in_map:get(ARDOUR.DataType("audio"), c - 1); -- get id of mapped input buffer for given cannel
  40                 local ob = out_map:get(ARDOUR.DataType("audio"), c - 1); -- get id of mapped output buffer for given cannel
  41                 assert (ib ~= ARDOUR.ChanMapping.Invalid);
  42                 assert (ob ~= ARDOUR.ChanMapping.Invalid);
  43
  44                 local bi = bufs:get_audio(ib)
  45                 local bo = bufs:get_audio(ob)
  46                 assert (bi:sameinstance(bo))
  47
  48                 local a = bufs:get_audio(ib):data(offset):array() -- get a reference (pointer to array)
  49                 for s = 1,n_samples do
  50                         a[s] = a[s] * 2; -- modify data in-place (shared with ardour)
  51                 end
  52         end
  53 end