ardour/ardour
ardour/ardour
13
1
Fork 0
Code Pull Requests Releases Activity

lua-scope handle unconnected in-place buffers

Browse Source
This commit is contained in:
Robin Gareus 2016-04-06 03:12:01 +02:00
parent 342422203d
commit 1c3c105574
1 changed files with 27 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

25
scripts/scope.lua
View File

@ -42,8 +42,6 @@ end
function dsp_configure (ins, outs)
-- store configuration in global variable
audio_ins = ins:n_audio ()
local audio_outs = outs:n_audio ()
assert (audio_ins == audio_outs)
-- allocate shared memory area
-- this is used to speed up DSP computaton (using a C array)
-- and to share data with the GUI
@ -63,8 +61,9 @@ function dsp_runmap (bufs, in_map, out_map, n_samples, offset)
for c = 1,audio_ins do
-- Note: lua starts counting at 1, ardour's ChanMapping::get() at 0
local ib = in_map:get (ARDOUR.DataType ("audio"), c - 1); -- get id of mapped input buffer for given cannel
assert (ib ~= ARDOUR.ChanMapping.Invalid)
local ob = out_map:get (ARDOUR.DataType ("audio"), c - 1); -- get id of mapped output buffer for given cannel
local chn_off = 4 + bufsiz * (c - 1)
if (ib ~= ARDOUR.ChanMapping.Invalid) then
if (write_ptr + n_samples < bufsiz) then
ARDOUR.DSP.copy_vector (shmem:to_float (write_ptr + chn_off), bufs:get_audio (ib):data (offset), n_samples)
else
@ -72,6 +71,26 @@ function dsp_runmap (bufs, in_map, out_map, n_samples, offset)
ARDOUR.DSP.copy_vector (shmem:to_float (write_ptr + chn_off), bufs:get_audio (ib):data (offset), w0)
ARDOUR.DSP.copy_vector (shmem:to_float (chn_off) , bufs:get_audio (ib):data (offset), n_samples - w0)
end
if (ob ~= ARDOUR.ChanMapping.Invalid and ib ~= ob) then
ARDOUR.DSP.copy_vector (bufs:get_audio (ob):data (offset), bufs:get_audio (ib):data (offset), n_samples)
end
else
if (write_ptr + n_samples < bufsiz) then
ARDOUR.DSP.memset (shmem:to_float (write_ptr + chn_off), 0, n_samples)
else
local w0 = bufsiz - write_ptr;
ARDOUR.DSP.memset (shmem:to_float (write_ptr + chn_off), 0, w0)
ARDOUR.DSP.memset (shmem:to_float (chn_off) , 0, n_samples - w0)
end
end
end
-- clear unconnected inplace buffers
for c = 1,audio_ins do
local ib = in_map:get (ARDOUR.DataType ("audio"), c - 1); -- get id of mapped input buffer for given cannel
local ob = out_map:get (ARDOUR.DataType ("audio"), c - 1); -- get id of mapped output buffer for given cannel
if (ib == ARDOUR.ChanMapping.Invalid and ob ~= ARDOUR.ChanMapping.Invalid) then
bufs:get_audio (ob):silence (n_samples, offset)
end
end
write_ptr = (write_ptr + n_samples) % bufsiz