/*
- Copyright (C) 2006 Paul Davis
-
+ Copyright (C) 2006 Paul Davis
+
This program is free software; you can redistribute it and/or modify it
under the terms of the GNU General Public License as published by the Free
Software Foundation; either version 2 of the License, or (at your option)
any later version.
-
+
This program is distributed in the hope that it will be useful, but WITHOUT
ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
for more details.
-
+
You should have received a copy of the GNU General Public License along
with this program; if not, write to the Free Software Foundation, Inc.,
675 Mass Ave, Cambridge, MA 02139, USA.
*/
+
+#ifdef WAF_BUILD
+#include "libardour-config.h"
+#endif
+
#include <iostream>
#include <algorithm>
+#include <sstream>
+
+#include "pbd/compose.h"
+#include "pbd/failed_constructor.h"
+
#include "ardour/buffer.h"
#include "ardour/buffer_set.h"
-#include "ardour/lv2_event_buffer.h"
-#include "ardour/lv2_plugin.h"
+#include "ardour/debug.h"
#include "ardour/midi_buffer.h"
#include "ardour/port.h"
#include "ardour/port_set.h"
-#include "ardour/audioengine.h"
+#ifdef LV2_SUPPORT
+#include "ardour/lv2_plugin.h"
+#include "lv2_evbuf.h"
+#endif
+#if defined WINDOWS_VST_SUPPORT || defined LXVST_SUPPORT
+#include "ardour/vestige/aeffectx.h"
+#endif
namespace ARDOUR {
_buffers.clear();
_count.reset();
_available.reset();
+
+#if defined WINDOWS_VST_SUPPORT || defined LXVST_SUPPORT
+ for (VSTBuffers::iterator i = _vst_buffers.begin(); i != _vst_buffers.end(); ++i) {
+ delete *i;
+ }
+
+ _vst_buffers.clear ();
+#endif
+
}
-/** Make this BufferSet a direct mirror of a PortSet's buffers.
+/** Set up this BufferSet so that its data structures mirror a PortSet's buffers.
+ * This is quite expensive and not RT-safe, so it should not be called in a process context;
+ * get_jack_port_addresses() will fill in a structure set up by this method.
+ *
+ * XXX: this *is* called in a process context; I'm not sure quite what `should not' means above.
*/
void
-BufferSet::attach_buffers(PortSet& ports, nframes_t nframes, nframes_t offset)
+BufferSet::attach_buffers (PortSet& ports)
{
- clear();
+ const ChanCount& count (ports.count());
+
+ clear ();
for (DataType::iterator t = DataType::begin(); t != DataType::end(); ++t) {
- _buffers.push_back(BufferVec());
+ _buffers.push_back (BufferVec());
BufferVec& v = _buffers[*t];
-
- for (PortSet::iterator p = ports.begin(*t); p != ports.end(*t); ++p) {
- assert(p->type() == *t);
- v.push_back(&(p->get_buffer(nframes, offset)));
- }
+ v.assign (count.n (*t), (Buffer*) 0);
}
-
+
_count = ports.count();
+ _available = ports.count();
+
_is_mirror = true;
}
+/** Write the JACK port addresses from a PortSet into our data structures. This
+ * call assumes that attach_buffers() has already been called for the same PortSet.
+ * Does not allocate, so RT-safe BUT you can only call Port::get_buffer() from
+ * the process() callback tree anyway, so this has to be called in RT context.
+ */
+void
+BufferSet::get_jack_port_addresses (PortSet& ports, framecnt_t nframes)
+{
+ assert (_count == ports.count ());
+ assert (_available == ports.count ());
+ assert (_is_mirror);
+
+ assert (_buffers.size() == DataType::num_types);
+
+ for (DataType::iterator t = DataType::begin(); t != DataType::end(); ++t) {
+ BufferVec& v = _buffers[*t];
+
+ assert (v.size() == ports.num_ports (*t));
+
+ int i = 0;
+ for (PortSet::iterator p = ports.begin(*t); p != ports.end(*t); ++p) {
+ v[i] = &p->get_buffer (nframes);
+ ++i;
+ }
+ }
+}
+
/** Ensure that there are @a num_buffers buffers of type @a type available,
* each of size at least @a buffer_size
*/
assert(type != DataType::NIL);
assert(type < _buffers.size());
- if (num_buffers == 0)
+ if (num_buffers == 0) {
return;
+ }
// The vector of buffers of the type we care about
BufferVec& bufs = _buffers[type];
-
+
// If we're a mirror just make sure we're ok
if (_is_mirror) {
assert(_count.get(type) >= num_buffers);
for (size_t i = 0; i < num_buffers; ++i) {
bufs.push_back(Buffer::create(type, buffer_capacity));
}
-
+
_available.set(type, num_buffers);
+ _count.set (type, num_buffers);
}
+#ifdef LV2_SUPPORT
// Ensure enough low level MIDI format buffers are available for conversion
// in both directions (input & output, out-of-place)
- if (type == DataType::MIDI && _lv2_buffers.size() < _buffers[type].size() * 2) {
+ if (type == DataType::MIDI && _lv2_buffers.size() < _buffers[type].size() * 2 + 1) {
while (_lv2_buffers.size() < _buffers[type].size() * 2) {
- _lv2_buffers.push_back(std::make_pair(false, new LV2EventBuffer(buffer_capacity)));
+ _lv2_buffers.push_back(
+ std::make_pair(false, lv2_evbuf_new(buffer_capacity,
+ LV2_EVBUF_EVENT,
+ LV2Plugin::_chunk_type,
+ LV2Plugin::_sequence_type)));
+ }
+ }
+#endif
+
+#if defined WINDOWS_VST_SUPPORT || defined LXVST_SUPPORT
+ // As above but for VST
+ if (type == DataType::MIDI) {
+ while (_vst_buffers.size() < _buffers[type].size()) {
+ _vst_buffers.push_back (new VSTBuffer (buffer_capacity));
}
}
+#endif
// Post-conditions
assert(bufs[0]->type() == type);
assert(bufs[0]->capacity() >= buffer_capacity);
}
+/** Ensure that the number of buffers of each type @a type matches @a chns
+ * and each buffer is of size at least @a buffer_capacity
+ */
+void
+BufferSet::ensure_buffers(const ChanCount& chns, size_t buffer_capacity)
+{
+ for (DataType::iterator i = DataType::begin(); i != DataType::end(); ++i) {
+ ensure_buffers (*i, chns.get (*i), buffer_capacity);
+ }
+}
+
/** Get the capacity (size) of the available buffers of the given type.
*
* All buffers of a certain type always have the same capacity.
Buffer&
BufferSet::get(DataType type, size_t i)
{
- assert(i <= _count.get(type));
+ assert(i < _available.get(type));
+ return *_buffers[type][i];
+}
+
+const Buffer&
+BufferSet::get(DataType type, size_t i) const
+{
+ assert(i < _available.get(type));
return *_buffers[type][i];
}
-LV2EventBuffer&
-BufferSet::get_lv2_midi(bool input, size_t i)
+#ifdef LV2_SUPPORT
+
+LV2_Evbuf*
+BufferSet::get_lv2_midi(bool input, size_t i, bool old_api)
{
- MidiBuffer& mbuf = get_midi(i);
- LV2Buffers::value_type b = _lv2_buffers.at(i * 2 + (input ? 0 : 1));
- LV2EventBuffer* ebuf = b.second;
-
- ebuf->reset();
+ assert(count().get(DataType::MIDI) > i);
+
+ MidiBuffer& mbuf = get_midi(i);
+ LV2Buffers::value_type b = _lv2_buffers.at(i * 2 + (input ? 0 : 1));
+ LV2_Evbuf* evbuf = b.second;
+ lv2_evbuf_set_type(evbuf, old_api ? LV2_EVBUF_EVENT : LV2_EVBUF_ATOM);
+
+ lv2_evbuf_reset(evbuf, input);
if (input) {
+ DEBUG_TRACE(PBD::DEBUG::LV2,
+ string_compose("%1 bytes of MIDI waiting @ %2\n",
+ mbuf.size(), (void*) mbuf.data()));
+
+ LV2_Evbuf_Iterator i = lv2_evbuf_begin(evbuf);
+ const uint32_t type = LV2Plugin::midi_event_type();
for (MidiBuffer::iterator e = mbuf.begin(); e != mbuf.end(); ++e) {
- const Evoral::MIDIEvent<nframes_t> ev(*e, false);
- uint32_t type = LV2Plugin::midi_event_type();
- ebuf->append(ev.time(), 0, type, ev.size(), ev.buffer());
+ const Evoral::MIDIEvent<framepos_t> ev(*e, false);
+#ifndef NDEBUG
+ DEBUG_TRACE(PBD::DEBUG::LV2,
+ string_compose("\tMIDI event of size %1 @ %2\n",
+ ev.size(), ev.time()));
+ for (uint16_t x = 0; x < ev.size(); ++x) {
+ std::stringstream ss;
+ ss << "\t\tev[" << x << "] = " << std::hex << (int) ev.buffer()[x] << std::dec << std::endl;
+ DEBUG_TRACE (PBD::DEBUG::LV2, ss.str());
+ }
+#endif
+ lv2_evbuf_write(&i, ev.time(), 0, type, ev.size(), ev.buffer());
}
}
- return *ebuf;
+ return evbuf;
}
void
BufferSet::flush_lv2_midi(bool input, size_t i)
{
- MidiBuffer& mbuf = get_midi(i);
- LV2Buffers::value_type b = _lv2_buffers.at(i * 2 + (input ? 0 : 1));
- LV2EventBuffer* ebuf = b.second;
+ MidiBuffer& mbuf = get_midi(i);
+ LV2Buffers::value_type b = _lv2_buffers.at(i * 2 + (input ? 0 : 1));
+ LV2_Evbuf* evbuf = b.second;
mbuf.silence(0, 0);
- for (ebuf->rewind(); ebuf->is_valid(); ebuf->increment()) {
+ for (LV2_Evbuf_Iterator i = lv2_evbuf_begin(evbuf);
+ lv2_evbuf_is_valid(i);
+ i = lv2_evbuf_next(i)) {
uint32_t frames;
uint32_t subframes;
- uint16_t type;
- uint16_t size;
+ uint32_t type;
+ uint32_t size;
uint8_t* data;
- ebuf->get_event(&frames, &subframes, &type, &size, &data);
+ lv2_evbuf_get(i, &frames, &subframes, &type, &size, &data);
+#ifndef NDEBUG
+ DEBUG_TRACE (PBD::DEBUG::LV2, string_compose ("(FLUSH) MIDI event of size %1\n", size));
+ for (uint16_t x = 0; x < size; ++x) {
+ DEBUG_TRACE (PBD::DEBUG::LV2, string_compose ("\tByte[%1] = %2\n", x, (int) data[x]));
+ }
+#endif
mbuf.push_back(frames, size, data);
}
}
-// FIXME: make 'in' const
+#endif /* LV2_SUPPORT */
+
+#if defined WINDOWS_VST_SUPPORT || defined LXVST_SUPPORT
+
+VstEvents*
+BufferSet::get_vst_midi (size_t b)
+{
+ MidiBuffer& m = get_midi (b);
+ VSTBuffer* vst = _vst_buffers[b];
+
+ vst->clear ();
+
+ for (MidiBuffer::iterator i = m.begin(); i != m.end(); ++i) {
+ vst->push_back (*i);
+ }
+
+ return vst->events();
+}
+
+BufferSet::VSTBuffer::VSTBuffer (size_t c)
+ : _capacity (c)
+{
+ _events = static_cast<VstEvents*> (malloc (sizeof (VstEvents) + _capacity * sizeof (VstEvent *)));
+ _midi_events = static_cast<VstMidiEvent*> (malloc (sizeof (VstMidiEvent) * _capacity));
+
+ if (_events == 0 || _midi_events == 0) {
+ free (_events);
+ free (_midi_events);
+ throw failed_constructor ();
+ }
+
+ _events->numEvents = 0;
+ _events->reserved = 0;
+}
+
+BufferSet::VSTBuffer::~VSTBuffer ()
+{
+ free (_events);
+ free (_midi_events);
+}
+
+void
+BufferSet::VSTBuffer::clear ()
+{
+ _events->numEvents = 0;
+}
+
void
-BufferSet::read_from (BufferSet& in, nframes_t nframes)
+BufferSet::VSTBuffer::push_back (Evoral::MIDIEvent<framepos_t> const & ev)
+{
+ if (ev.size() > 3) {
+ /* XXX: this will silently drop MIDI messages longer than 3 bytes, so
+ they won't be passed to VST plugins or VSTis
+ */
+ return;
+ }
+ int const n = _events->numEvents;
+ assert (n < (int) _capacity);
+
+ _events->events[n] = reinterpret_cast<VstEvent*> (_midi_events + n);
+ VstMidiEvent* v = reinterpret_cast<VstMidiEvent*> (_events->events[n]);
+
+ v->type = kVstMidiType;
+ v->byteSize = sizeof (VstMidiEvent);
+ v->deltaFrames = ev.time ();
+
+ v->flags = 0;
+ v->detune = 0;
+ v->noteLength = 0;
+ v->noteOffset = 0;
+ v->reserved1 = 0;
+ v->reserved2 = 0;
+ v->noteOffVelocity = 0;
+ memcpy (v->midiData, ev.buffer(), ev.size());
+ v->midiData[3] = 0;
+
+ _events->numEvents++;
+}
+
+#endif /* WINDOWS_VST_SUPPORT */
+
+/** Copy buffers of one type from `in' to this BufferSet */
+void
+BufferSet::read_from (const BufferSet& in, framecnt_t nframes, DataType type)
+{
+ assert (available().get (type) >= in.count().get (type));
+
+ BufferSet::iterator o = begin (type);
+ for (BufferSet::const_iterator i = in.begin (type); i != in.end (type); ++i, ++o) {
+ o->read_from (*i, nframes);
+ }
+
+ _count.set (type, in.count().get (type));
+}
+
+/** Copy buffers of all types from `in' to this BufferSet */
+void
+BufferSet::read_from (const BufferSet& in, framecnt_t nframes)
{
assert(available() >= in.count());
// Copy all buffers 1:1
+ for (DataType::iterator t = DataType::begin(); t != DataType::end(); ++t) {
+ read_from (in, nframes, *t);
+ }
+}
+
+void
+BufferSet::merge_from (const BufferSet& in, framecnt_t nframes)
+{
+ /* merge all input buffers into out existing buffers.
+
+ NOTE: if "in" contains more buffers than this set,
+ we will drop the extra buffers.
+
+ */
+
for (DataType::iterator t = DataType::begin(); t != DataType::end(); ++t) {
BufferSet::iterator o = begin(*t);
- for (BufferSet::iterator i = in.begin(*t); i != in.end(*t); ++i, ++o) {
- o->read_from (*i, nframes);
+ for (BufferSet::const_iterator i = in.begin(*t); i != in.end(*t) && o != end (*t); ++i, ++o) {
+ o->merge_from (*i, nframes);
+ }
+ }
+}
+
+void
+BufferSet::silence (framecnt_t nframes, framecnt_t offset)
+{
+ for (std::vector<BufferVec>::iterator i = _buffers.begin(); i != _buffers.end(); ++i) {
+ for (BufferVec::iterator b = i->begin(); b != i->end(); ++b) {
+ (*b)->silence (nframes, offset);
+ }
+ }
+}
+
+void
+BufferSet::set_is_silent (bool yn)
+{
+ for (std::vector<BufferVec>::iterator i = _buffers.begin(); i != _buffers.end(); ++i) {
+ for (BufferVec::iterator b = i->begin(); b != i->end(); ++b) {
+ (*b)->set_is_silent (yn);
}
}
- set_count(in.count());
}
} // namespace ARDOUR