13
0
livetrax/libs/backends/alsa/alsa_audiobackend.cc

1674 lines
40 KiB
C++

/*
* Copyright (C) 2014 Robin Gareus <robin@gareus.org>
* Copyright (C) 2013 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.
*/
#include <regex.h>
#include <sys/mman.h>
#include <sys/time.h>
#include <glibmm.h>
#include "alsa_audiobackend.h"
#include "rt_thread.h"
#include "pbd/compose.h"
#include "pbd/error.h"
#include "ardour/port_manager.h"
#include "i18n.h"
using namespace ARDOUR;
static std::string s_instance_name;
size_t AlsaAudioBackend::_max_buffer_size = 8192;
AlsaAudioBackend::AlsaAudioBackend (AudioEngine& e, AudioBackendInfo& info)
: AudioBackend (e, info)
, _pcmi (0)
, _running (false)
, _freewheeling (false)
, _capture_device("")
, _playback_device("")
, _samplerate (48000)
, _samples_per_period (1024)
, _periods_per_cycle (2)
, _dsp_load (0)
, _n_inputs (0)
, _n_outputs (0)
, _systemic_input_latency (0)
, _systemic_output_latency (0)
, _processed_samples (0)
{
_instance_name = s_instance_name;
pthread_mutex_init (&_port_callback_mutex, 0);
}
AlsaAudioBackend::~AlsaAudioBackend ()
{
pthread_mutex_destroy (&_port_callback_mutex);
}
/* AUDIOBACKEND API */
std::string
AlsaAudioBackend::name () const
{
return X_("ALSA");
}
bool
AlsaAudioBackend::is_realtime () const
{
return true;
}
std::vector<AudioBackend::DeviceStatus>
AlsaAudioBackend::enumerate_devices () const
{
std::vector<AudioBackend::DeviceStatus> s;
int cardnum = -1;
int device = -1;
snd_ctl_card_info_t *info;
snd_ctl_card_info_alloca (&info);
snd_pcm_info_t *pcminfo;
snd_pcm_info_alloca (&pcminfo);
while (snd_card_next (&cardnum) >= 0 && cardnum >= 0) {
snd_ctl_t *handle;
std::string devname = "hw:";
devname += PBD::to_string (cardnum, std::dec);
if (snd_ctl_open (&handle, devname.c_str(), 0) >= 0 && snd_ctl_card_info (handle, info) >= 0) {
if (snd_ctl_card_info (handle, info) < 0) {
continue;
}
std::string card_name = snd_ctl_card_info_get_name (info);
devname = "hw:";
devname += snd_ctl_card_info_get_id (info);
while (snd_ctl_pcm_next_device (handle, &device) >= 0 && device >= 0) {
snd_pcm_info_set_device (pcminfo, device);
snd_pcm_info_set_subdevice (pcminfo, 0);
snd_pcm_info_set_stream (pcminfo, SND_PCM_STREAM_CAPTURE);
if (snd_ctl_pcm_info (handle, pcminfo) < 0) {
continue;
}
snd_pcm_info_set_device (pcminfo, device);
snd_pcm_info_set_subdevice (pcminfo, 0);
snd_pcm_info_set_stream (pcminfo, SND_PCM_STREAM_PLAYBACK);
if (snd_ctl_pcm_info (handle, pcminfo) < 0) {
continue;
}
devname += ',';
devname += PBD::to_string (device, std::dec);
s.push_back (DeviceStatus (devname + " " + card_name, true));
}
snd_ctl_close (handle);
}
}
return s;
}
std::vector<float>
AlsaAudioBackend::available_sample_rates (const std::string&) const
{
std::vector<float> sr;
sr.push_back (8000.0);
sr.push_back (22050.0);
sr.push_back (24000.0);
sr.push_back (44100.0);
sr.push_back (48000.0);
sr.push_back (88200.0);
sr.push_back (96000.0);
sr.push_back (176400.0);
sr.push_back (192000.0);
return sr;
}
std::vector<uint32_t>
AlsaAudioBackend::available_buffer_sizes (const std::string&) const
{
std::vector<uint32_t> bs;
bs.push_back (32);
bs.push_back (64);
bs.push_back (128);
bs.push_back (256);
bs.push_back (512);
bs.push_back (1024);
bs.push_back (2048);
bs.push_back (4096);
bs.push_back (8192);
return bs;
}
uint32_t
AlsaAudioBackend::available_input_channel_count (const std::string&) const
{
return 128; // TODO query current device
}
uint32_t
AlsaAudioBackend::available_output_channel_count (const std::string&) const
{
return 128; // TODO query current device
}
bool
AlsaAudioBackend::can_change_sample_rate_when_running () const
{
return false;
}
bool
AlsaAudioBackend::can_change_buffer_size_when_running () const
{
return false;
}
int
AlsaAudioBackend::set_device_name (const std::string& d)
{
_capture_device = d;
_playback_device = d;
return 0;
}
int
AlsaAudioBackend::set_sample_rate (float sr)
{
if (sr <= 0) { return -1; }
_samplerate = sr;
engine.sample_rate_change (sr);
return 0;
}
int
AlsaAudioBackend::set_buffer_size (uint32_t bs)
{
if (bs <= 0 || bs >= _max_buffer_size) {
return -1;
}
_samples_per_period = bs;
engine.buffer_size_change (bs);
return 0;
}
int
AlsaAudioBackend::set_interleaved (bool yn)
{
if (!yn) { return 0; }
return -1;
}
int
AlsaAudioBackend::set_input_channels (uint32_t cc)
{
_n_inputs = cc;
return 0;
}
int
AlsaAudioBackend::set_output_channels (uint32_t cc)
{
_n_outputs = cc;
return 0;
}
int
AlsaAudioBackend::set_systemic_input_latency (uint32_t sl)
{
_systemic_input_latency = sl;
return 0;
}
int
AlsaAudioBackend::set_systemic_output_latency (uint32_t sl)
{
_systemic_output_latency = sl;
return 0;
}
/* Retrieving parameters */
std::string
AlsaAudioBackend::device_name () const
{
return _capture_device;
}
float
AlsaAudioBackend::sample_rate () const
{
return _samplerate;
}
uint32_t
AlsaAudioBackend::buffer_size () const
{
return _samples_per_period;
}
bool
AlsaAudioBackend::interleaved () const
{
return false;
}
uint32_t
AlsaAudioBackend::input_channels () const
{
return _n_inputs;
}
uint32_t
AlsaAudioBackend::output_channels () const
{
return _n_outputs;
}
uint32_t
AlsaAudioBackend::systemic_input_latency () const
{
return _systemic_input_latency;
}
uint32_t
AlsaAudioBackend::systemic_output_latency () const
{
return _systemic_output_latency;
}
/* MIDI */
void
AlsaAudioBackend::enumerate_midi_devices (std::vector<std::string> &m) const
{
int cardnum = -1;
snd_ctl_card_info_t *cinfo;
snd_ctl_card_info_alloca (&cinfo);
while (snd_card_next (&cardnum) >= 0 && cardnum >= 0) {
snd_ctl_t *handle;
std::string devname = "hw:";
devname += PBD::to_string (cardnum, std::dec);
if (snd_ctl_open (&handle, devname.c_str (), 0) >= 0 && snd_ctl_card_info (handle, cinfo) >= 0) {
int device = -1;
while (snd_ctl_rawmidi_next_device (handle, &device) >= 0 && device >= 0) {
snd_rawmidi_info_t *info;
snd_rawmidi_info_alloca (&info);
snd_rawmidi_info_set_device (info, device);
int subs_in, subs_out;
snd_rawmidi_info_set_stream (info, SND_RAWMIDI_STREAM_INPUT);
if (snd_ctl_rawmidi_info (handle, info) >= 0) {
subs_in = snd_rawmidi_info_get_subdevices_count (info);
} else {
subs_in = 0;
}
snd_rawmidi_info_set_stream (info, SND_RAWMIDI_STREAM_OUTPUT);
if (snd_ctl_rawmidi_info (handle, info) >= 0) {
subs_out = snd_rawmidi_info_get_subdevices_count (info);
} else {
subs_out = 0;
}
const int subs = subs_in > subs_out ? subs_in : subs_out;
if (!subs) {
continue;
}
for (int sub = 0; sub < subs; ++sub) {
snd_rawmidi_info_set_stream (info, sub < subs_in ?
SND_RAWMIDI_STREAM_INPUT :
SND_RAWMIDI_STREAM_OUTPUT);
snd_rawmidi_info_set_subdevice (info, sub);
if (snd_ctl_rawmidi_info (handle, info) < 0) {
continue;
}
const char *sub_name = snd_rawmidi_info_get_subdevice_name (info);
if (sub == 0 && sub_name[0] == '\0') {
devname = "hw:";
devname += snd_ctl_card_info_get_id (cinfo);
devname += ",";
devname += PBD::to_string (device, std::dec);
devname += " ";
devname += snd_rawmidi_info_get_name (info);
devname += " (";
if (sub < subs_in) devname += "I";
if (sub < subs_out) devname += "O";
devname += ")";
m.push_back (devname);
break;
} else {
devname = "hw:";
devname += snd_ctl_card_info_get_id (cinfo);
devname += ",";
devname += PBD::to_string (device, std::dec);
devname += ",";
devname += PBD::to_string (sub, std::dec);
devname += " ";
devname += sub_name;
devname += " (";
if (sub < subs_in) devname += "I";
if (sub < subs_out) devname += "O";
devname += ")";
m.push_back (devname);
}
}
}
snd_ctl_close (handle);
}
}
}
std::vector<std::string>
AlsaAudioBackend::enumerate_midi_options () const
{
std::vector<std::string> m;
m.push_back (_("-None-"));
enumerate_midi_devices(m);
if (m.size() > 2) {
m.push_back (_("-All-"));
}
return m;
}
int
AlsaAudioBackend::set_midi_option (const std::string& opt)
{
_midi_device = opt;
return 0;
}
std::string
AlsaAudioBackend::midi_option () const
{
return _midi_device;
}
/* State Control */
static void * pthread_process (void *arg)
{
AlsaAudioBackend *d = static_cast<AlsaAudioBackend *>(arg);
d->main_process_thread ();
pthread_exit (0);
return 0;
}
int
AlsaAudioBackend::_start (bool for_latency_measurement)
{
if (_running) {
PBD::error << _("AlsaAudioBackend: already active.") << endmsg;
return -1;
}
if (_ports.size()) {
PBD::warning << _("AlsaAudioBackend: recovering from unclean shutdown, port registry is not empty.") << endmsg;
_system_inputs.clear();
_system_outputs.clear();
_system_midi_in.clear();
_system_midi_out.clear();
_ports.clear();
}
assert(_rmidi_in.size() == 0);
assert(_rmidi_out.size() == 0);
assert(_pcmi == 0);
unsigned int pos = _capture_device.find(" ");
_pcmi = new Alsa_pcmi (_capture_device.substr(0, pos).c_str(), _playback_device.substr(0, pos).c_str(), 0, _samplerate, _samples_per_period, _periods_per_cycle, 0);
if (_pcmi->state ()) {
// TODO get detailed error from _pcmi
PBD::error << _("AlsaAudioBackend: failed to open device (see stderr for details).") << endmsg;
delete _pcmi; _pcmi = 0;
return -1;
}
#ifndef NDEBUG
_pcmi->printinfo ();
#endif
if (_n_outputs != _pcmi->nplay ()) {
if (_n_outputs == 0) {
_n_outputs = _pcmi->nplay ();
} else {
_n_outputs = std::min (_n_outputs, _pcmi->nplay ());
}
PBD::warning << _("AlsaAudioBackend: adjusted output channel count to match device.") << endmsg;
}
if (_n_inputs != _pcmi->ncapt ()) {
if (_n_inputs == 0) {
_n_inputs = _pcmi->ncapt ();
} else {
_n_inputs = std::min (_n_inputs, _pcmi->ncapt ());
}
PBD::warning << _("AlsaAudioBackend: adjusted input channel count to match device.") << endmsg;
}
if (_pcmi->fsize() != _samples_per_period) {
_samples_per_period = _pcmi->fsize();
PBD::warning << _("AlsaAudioBackend: samples per period does not match.") << endmsg;
}
if (_pcmi->fsamp() != _samplerate) {
_samplerate = _pcmi->fsamp();
engine.sample_rate_change (_samplerate);
PBD::warning << _("AlsaAudioBackend: sample rate does not match.") << endmsg;
}
if (for_latency_measurement) {
_systemic_input_latency = 0;
_systemic_output_latency = 0;
}
register_system_midi_ports();
if (register_system_audio_ports()) {
PBD::error << _("AlsaAudioBackend: failed to register system ports.") << endmsg;
delete _pcmi; _pcmi = 0;
return -1;
}
if (engine.reestablish_ports ()) {
PBD::error << _("AlsaAudioBackend: Could not re-establish ports.") << endmsg;
delete _pcmi; _pcmi = 0;
return -1;
}
engine.buffer_size_change (_samples_per_period);
engine.reconnect_ports ();
if (_realtime_pthread_create (SCHED_FIFO, -20,
&_main_thread, pthread_process, this))
{
if (pthread_create (&_main_thread, NULL, pthread_process, this))
{
PBD::error << _("AlsaAudioBackend: failed to create process thread.") << endmsg;
delete _pcmi; _pcmi = 0;
return -1;
} else {
PBD::warning << _("AlsaAudioBackend: cannot acquire realtime permissions.") << endmsg;
}
}
int timeout = 5000;
while (!_running && --timeout > 0) { Glib::usleep (1000); }
if (timeout == 0 || !_running) {
PBD::error << _("AlsaAudioBackend: failed to start process thread.") << endmsg;
delete _pcmi; _pcmi = 0;
return -1;
}
return 0;
}
int
AlsaAudioBackend::stop ()
{
void *status;
if (!_running) {
return 0;
}
_running = false;
if (pthread_join (_main_thread, &status)) {
PBD::error << _("AlsaAudioBackend: failed to terminate.") << endmsg;
return -1;
}
while (!_rmidi_out.empty ()) {
AlsaRawMidiIO *m = _rmidi_out.back ();
m->stop();
_rmidi_out.pop_back ();
delete m;
}
while (!_rmidi_in.empty ()) {
AlsaRawMidiIO *m = _rmidi_in.back ();
m->stop();
_rmidi_in.pop_back ();
delete m;
}
unregister_system_ports();
delete _pcmi; _pcmi = 0;
return 0;
}
int
AlsaAudioBackend::freewheel (bool onoff)
{
if (onoff == _freewheeling) {
return 0;
}
_freewheeling = onoff;
engine.freewheel_callback (onoff);
return 0;
}
float
AlsaAudioBackend::dsp_load () const
{
return 100.f * _dsp_load;
}
size_t
AlsaAudioBackend::raw_buffer_size (DataType t)
{
switch (t) {
case DataType::AUDIO:
return _samples_per_period * sizeof(Sample);
case DataType::MIDI:
return _max_buffer_size; // XXX not really limited
}
return 0;
}
/* Process time */
pframes_t
AlsaAudioBackend::sample_time ()
{
return _processed_samples;
}
pframes_t
AlsaAudioBackend::sample_time_at_cycle_start ()
{
return _processed_samples;
}
pframes_t
AlsaAudioBackend::samples_since_cycle_start ()
{
return 0;
}
void *
AlsaAudioBackend::alsa_process_thread (void *arg)
{
ThreadData* td = reinterpret_cast<ThreadData*> (arg);
boost::function<void ()> f = td->f;
delete td;
f ();
return 0;
}
int
AlsaAudioBackend::create_process_thread (boost::function<void()> func)
{
pthread_t thread_id;
pthread_attr_t attr;
size_t stacksize = 100000;
pthread_attr_init (&attr);
pthread_attr_setstacksize (&attr, stacksize);
ThreadData* td = new ThreadData (this, func, stacksize);
if (pthread_create (&thread_id, &attr, alsa_process_thread, td)) {
PBD::error << _("AudioEngine: cannot create process thread.") << endmsg;
pthread_attr_destroy (&attr);
return -1;
}
pthread_attr_destroy (&attr);
_threads.push_back (thread_id);
return 0;
}
int
AlsaAudioBackend::join_process_threads ()
{
int rv = 0;
for (std::vector<pthread_t>::const_iterator i = _threads.begin (); i != _threads.end (); ++i)
{
void *status;
if (pthread_join (*i, &status)) {
PBD::error << _("AudioEngine: cannot terminate process thread.") << endmsg;
rv -= 1;
}
}
_threads.clear ();
return rv;
}
bool
AlsaAudioBackend::in_process_thread ()
{
for (std::vector<pthread_t>::const_iterator i = _threads.begin (); i != _threads.end (); ++i)
{
if (pthread_equal (*i, pthread_self ()) != 0) {
return true;
}
}
return false;
}
uint32_t
AlsaAudioBackend::process_thread_count ()
{
return _threads.size ();
}
void
AlsaAudioBackend::update_latencies ()
{
}
/* PORTENGINE API */
void*
AlsaAudioBackend::private_handle () const
{
return NULL;
}
const std::string&
AlsaAudioBackend::my_name () const
{
return _instance_name;
}
bool
AlsaAudioBackend::available () const
{
return true;
}
uint32_t
AlsaAudioBackend::port_name_size () const
{
return 256;
}
int
AlsaAudioBackend::set_port_name (PortEngine::PortHandle port, const std::string& name)
{
if (!valid_port (port)) {
PBD::error << _("AlsaBackend::set_port_name: Invalid Port(s)") << endmsg;
return -1;
}
return static_cast<AlsaPort*>(port)->set_name (_instance_name + ":" + name);
}
std::string
AlsaAudioBackend::get_port_name (PortEngine::PortHandle port) const
{
if (!valid_port (port)) {
PBD::error << _("AlsaBackend::get_port_name: Invalid Port(s)") << endmsg;
return std::string ();
}
return static_cast<AlsaPort*>(port)->name ();
}
PortEngine::PortHandle
AlsaAudioBackend::get_port_by_name (const std::string& name) const
{
PortHandle port = (PortHandle) find_port (name);
return port;
}
int
AlsaAudioBackend::get_ports (
const std::string& port_name_pattern,
DataType type, PortFlags flags,
std::vector<std::string>& port_names) const
{
int rv = 0;
regex_t port_regex;
bool use_regexp = false;
if (port_name_pattern.size () > 0) {
if (!regcomp (&port_regex, port_name_pattern.c_str (), REG_EXTENDED|REG_NOSUB)) {
use_regexp = true;
}
}
for (size_t i = 0; i < _ports.size (); ++i) {
AlsaPort* port = _ports[i];
if ((port->type () == type) && (port->flags () & flags)) {
if (!use_regexp || !regexec (&port_regex, port->name ().c_str (), 0, NULL, 0)) {
port_names.push_back (port->name ());
++rv;
}
}
}
if (use_regexp) {
regfree (&port_regex);
}
return rv;
}
DataType
AlsaAudioBackend::port_data_type (PortEngine::PortHandle port) const
{
if (!valid_port (port)) {
return DataType::NIL;
}
return static_cast<AlsaPort*>(port)->type ();
}
PortEngine::PortHandle
AlsaAudioBackend::register_port (
const std::string& name,
ARDOUR::DataType type,
ARDOUR::PortFlags flags)
{
if (name.size () == 0) { return 0; }
if (flags & IsPhysical) { return 0; }
return add_port (_instance_name + ":" + name, type, flags);
}
PortEngine::PortHandle
AlsaAudioBackend::add_port (
const std::string& name,
ARDOUR::DataType type,
ARDOUR::PortFlags flags)
{
assert(name.size ());
if (find_port (name)) {
PBD::error << _("AlsaBackend::register_port: Port already exists:")
<< " (" << name << ")" << endmsg;
return 0;
}
AlsaPort* port = NULL;
switch (type) {
case DataType::AUDIO:
port = new AlsaAudioPort (*this, name, flags);
break;
case DataType::MIDI:
port = new AlsaMidiPort (*this, name, flags);
break;
default:
PBD::error << _("AlsaBackend::register_port: Invalid Data Type.") << endmsg;
return 0;
}
_ports.push_back (port);
return port;
}
void
AlsaAudioBackend::unregister_port (PortEngine::PortHandle port_handle)
{
if (!valid_port (port_handle)) {
PBD::error << _("AlsaBackend::unregister_port: Invalid Port.") << endmsg;
}
AlsaPort* port = static_cast<AlsaPort*>(port_handle);
std::vector<AlsaPort*>::iterator i = std::find (_ports.begin (), _ports.end (), static_cast<AlsaPort*>(port_handle));
if (i == _ports.end ()) {
PBD::error << _("AlsaBackend::unregister_port: Failed to find port") << endmsg;
return;
}
disconnect_all(port_handle);
_ports.erase (i);
delete port;
}
int
AlsaAudioBackend::register_system_audio_ports()
{
LatencyRange lr;
const int a_ins = _n_inputs > 0 ? _n_inputs : 2;
const int a_out = _n_outputs > 0 ? _n_outputs : 2;
/* audio ports */
lr.min = lr.max = _samples_per_period * _periods_per_cycle + _systemic_input_latency;
for (int i = 1; i <= a_ins; ++i) {
char tmp[64];
snprintf(tmp, sizeof(tmp), "system:capture_%d", i);
PortHandle p = add_port(std::string(tmp), DataType::AUDIO, static_cast<PortFlags>(IsOutput | IsPhysical | IsTerminal));
if (!p) return -1;
set_latency_range (p, false, lr);
_system_inputs.push_back(static_cast<AlsaPort*>(p));
}
lr.min = lr.max = _samples_per_period * _periods_per_cycle + _systemic_output_latency;
for (int i = 1; i <= a_out; ++i) {
char tmp[64];
snprintf(tmp, sizeof(tmp), "system:playback_%d", i);
PortHandle p = add_port(std::string(tmp), DataType::AUDIO, static_cast<PortFlags>(IsInput | IsPhysical | IsTerminal));
if (!p) return -1;
set_latency_range (p, false, lr);
_system_outputs.push_back(static_cast<AlsaPort*>(p));
}
return 0;
}
int
AlsaAudioBackend::register_system_midi_ports()
{
LatencyRange lr;
std::vector<std::string> devices;
if (_midi_device == _("-None-")) {
return 0;
}
else if (_midi_device == _("-All-")) {
enumerate_midi_devices(devices);
} else {
unsigned int pos = _midi_device.find(" ");
devices.push_back(_midi_device.substr(0, pos));
}
for (std::vector<std::string>::const_iterator i = devices.begin (); i != devices.end (); ++i) {
AlsaRawMidiOut *mout = new AlsaRawMidiOut (i->c_str());
if (mout->state ()) {
PBD::warning << string_compose (
_("AlsaRawMidiOut: failed to open midi device '%1'."), *i)
<< endmsg;
delete mout;
} else {
mout->setup_timing(_samples_per_period, _samplerate);
mout->sync_time (g_get_monotonic_time());
if (mout->start ()) {
PBD::warning << string_compose (
_("AlsaRawMidiOut: failed to start midi device '%1'."), *i)
<< endmsg;
delete mout;
} else {
_rmidi_out.push_back (mout);
}
}
AlsaRawMidiIn *midin = new AlsaRawMidiIn (i->c_str());
if (midin->state ()) {
PBD::warning << string_compose (
_("AlsaRawMidiIn: failed to open midi device '%1'."), *i)
<< endmsg;
delete midin;
} else {
midin->setup_timing(_samples_per_period, _samplerate);
midin->sync_time (g_get_monotonic_time());
if (midin->start ()) {
PBD::warning << string_compose (
_("AlsaRawMidiIn: failed to start midi device '%1'."), *i)
<< endmsg;
delete midin;
} else {
_rmidi_in.push_back (midin);
}
}
}
const int m_ins = _rmidi_in.size();
const int m_out = _rmidi_out.size();
lr.min = lr.max = _samples_per_period + _systemic_input_latency;
for (int i = 1; i <= m_ins; ++i) {
char tmp[64];
snprintf(tmp, sizeof(tmp), "system:midi_capture_%d", i);
PortHandle p = add_port(std::string(tmp), DataType::MIDI, static_cast<PortFlags>(IsOutput | IsPhysical | IsTerminal));
if (!p) return -1;
set_latency_range (p, false, lr);
_system_midi_in.push_back(static_cast<AlsaPort*>(p));
}
lr.min = lr.max = _samples_per_period + _systemic_output_latency;
for (int i = 1; i <= m_out; ++i) {
char tmp[64];
snprintf(tmp, sizeof(tmp), "system:midi_playback_%d", i);
PortHandle p = add_port(std::string(tmp), DataType::MIDI, static_cast<PortFlags>(IsInput | IsPhysical | IsTerminal));
if (!p) return -1;
set_latency_range (p, false, lr);
_system_midi_out.push_back(static_cast<AlsaPort*>(p));
}
return 0;
}
void
AlsaAudioBackend::unregister_system_ports()
{
size_t i = 0;
_system_inputs.clear();
_system_outputs.clear();
_system_midi_in.clear();
_system_midi_out.clear();
while (i < _ports.size ()) {
AlsaPort* port = _ports[i];
if (port->is_physical () && port->is_terminal ()) {
port->disconnect_all ();
_ports.erase (_ports.begin() + i);
} else {
++i;
}
}
}
int
AlsaAudioBackend::connect (const std::string& src, const std::string& dst)
{
AlsaPort* src_port = find_port (src);
AlsaPort* dst_port = find_port (dst);
if (!src_port) {
PBD::error << _("AlsaBackend::connect: Invalid Source port:")
<< " (" << src <<")" << endmsg;
return -1;
}
if (!dst_port) {
PBD::error << _("AlsaBackend::connect: Invalid Destination port:")
<< " (" << dst <<")" << endmsg;
return -1;
}
return src_port->connect (dst_port);
}
int
AlsaAudioBackend::disconnect (const std::string& src, const std::string& dst)
{
AlsaPort* src_port = find_port (src);
AlsaPort* dst_port = find_port (dst);
if (!src_port || !dst_port) {
PBD::error << _("AlsaBackend::disconnect: Invalid Port(s)") << endmsg;
return -1;
}
return src_port->disconnect (dst_port);
}
int
AlsaAudioBackend::connect (PortEngine::PortHandle src, const std::string& dst)
{
AlsaPort* dst_port = find_port (dst);
if (!valid_port (src)) {
PBD::error << _("AlsaBackend::connect: Invalid Source Port Handle") << endmsg;
return -1;
}
if (!dst_port) {
PBD::error << _("AlsaBackend::connect: Invalid Destination Port")
<< " (" << dst << ")" << endmsg;
return -1;
}
return static_cast<AlsaPort*>(src)->connect (dst_port);
}
int
AlsaAudioBackend::disconnect (PortEngine::PortHandle src, const std::string& dst)
{
AlsaPort* dst_port = find_port (dst);
if (!valid_port (src) || !dst_port) {
PBD::error << _("AlsaBackend::disconnect: Invalid Port(s)") << endmsg;
return -1;
}
return static_cast<AlsaPort*>(src)->disconnect (dst_port);
}
int
AlsaAudioBackend::disconnect_all (PortEngine::PortHandle port)
{
if (!valid_port (port)) {
PBD::error << _("AlsaBackend::disconnect_all: Invalid Port") << endmsg;
return -1;
}
static_cast<AlsaPort*>(port)->disconnect_all ();
return 0;
}
bool
AlsaAudioBackend::connected (PortEngine::PortHandle port, bool /* process_callback_safe*/)
{
if (!valid_port (port)) {
PBD::error << _("AlsaBackend::disconnect_all: Invalid Port") << endmsg;
return false;
}
return static_cast<AlsaPort*>(port)->is_connected ();
}
bool
AlsaAudioBackend::connected_to (PortEngine::PortHandle src, const std::string& dst, bool /*process_callback_safe*/)
{
AlsaPort* dst_port = find_port (dst);
if (!valid_port (src) || !dst_port) {
PBD::error << _("AlsaBackend::connected_to: Invalid Port") << endmsg;
return false;
}
return static_cast<AlsaPort*>(src)->is_connected (dst_port);
}
bool
AlsaAudioBackend::physically_connected (PortEngine::PortHandle port, bool /*process_callback_safe*/)
{
if (!valid_port (port)) {
PBD::error << _("AlsaBackend::physically_connected: Invalid Port") << endmsg;
return false;
}
return static_cast<AlsaPort*>(port)->is_physically_connected ();
}
int
AlsaAudioBackend::get_connections (PortEngine::PortHandle port, std::vector<std::string>& names, bool /*process_callback_safe*/)
{
if (!valid_port (port)) {
PBD::error << _("AlsaBackend::get_connections: Invalid Port") << endmsg;
return -1;
}
assert (0 == names.size ());
const std::vector<AlsaPort*>& connected_ports = static_cast<AlsaPort*>(port)->get_connections ();
for (std::vector<AlsaPort*>::const_iterator i = connected_ports.begin (); i != connected_ports.end (); ++i) {
names.push_back ((*i)->name ());
}
return (int)names.size ();
}
/* MIDI */
int
AlsaAudioBackend::midi_event_get (
pframes_t& timestamp,
size_t& size, uint8_t** buf, void* port_buffer,
uint32_t event_index)
{
assert (buf && port_buffer);
AlsaMidiBuffer& source = * static_cast<AlsaMidiBuffer*>(port_buffer);
if (event_index >= source.size ()) {
return -1;
}
AlsaMidiEvent * const event = source[event_index].get ();
timestamp = event->timestamp ();
size = event->size ();
*buf = event->data ();
return 0;
}
int
AlsaAudioBackend::midi_event_put (
void* port_buffer,
pframes_t timestamp,
const uint8_t* buffer, size_t size)
{
assert (buffer && port_buffer);
AlsaMidiBuffer& dst = * static_cast<AlsaMidiBuffer*>(port_buffer);
if (dst.size () && (pframes_t)dst.back ()->timestamp () > timestamp) {
fprintf (stderr, "AlsaMidiBuffer: it's too late for this event. %d > %d\n",
(pframes_t)dst.back ()->timestamp (), timestamp);
return -1;
}
dst.push_back (boost::shared_ptr<AlsaMidiEvent>(new AlsaMidiEvent (timestamp, buffer, size)));
return 0;
}
uint32_t
AlsaAudioBackend::get_midi_event_count (void* port_buffer)
{
assert (port_buffer);
return static_cast<AlsaMidiBuffer*>(port_buffer)->size ();
}
void
AlsaAudioBackend::midi_clear (void* port_buffer)
{
assert (port_buffer);
AlsaMidiBuffer * buf = static_cast<AlsaMidiBuffer*>(port_buffer);
assert (buf);
buf->clear ();
}
/* Monitoring */
bool
AlsaAudioBackend::can_monitor_input () const
{
return false;
}
int
AlsaAudioBackend::request_input_monitoring (PortEngine::PortHandle, bool)
{
return -1;
}
int
AlsaAudioBackend::ensure_input_monitoring (PortEngine::PortHandle, bool)
{
return -1;
}
bool
AlsaAudioBackend::monitoring_input (PortEngine::PortHandle)
{
return false;
}
/* Latency management */
void
AlsaAudioBackend::set_latency_range (PortEngine::PortHandle port, bool for_playback, LatencyRange latency_range)
{
if (!valid_port (port)) {
PBD::error << _("AlsaPort::set_latency_range (): invalid port.") << endmsg;
}
static_cast<AlsaPort*>(port)->set_latency_range (latency_range, for_playback);
}
LatencyRange
AlsaAudioBackend::get_latency_range (PortEngine::PortHandle port, bool for_playback)
{
if (!valid_port (port)) {
PBD::error << _("AlsaPort::get_latency_range (): invalid port.") << endmsg;
LatencyRange r;
r.min = 0;
r.max = 0;
return r;
}
return static_cast<AlsaPort*>(port)->latency_range (for_playback);
}
/* Discovering physical ports */
bool
AlsaAudioBackend::port_is_physical (PortEngine::PortHandle port) const
{
if (!valid_port (port)) {
PBD::error << _("AlsaPort::port_is_physical (): invalid port.") << endmsg;
return false;
}
return static_cast<AlsaPort*>(port)->is_physical ();
}
void
AlsaAudioBackend::get_physical_outputs (DataType type, std::vector<std::string>& port_names)
{
for (size_t i = 0; i < _ports.size (); ++i) {
AlsaPort* port = _ports[i];
if ((port->type () == type) && port->is_input () && port->is_physical ()) {
port_names.push_back (port->name ());
}
}
}
void
AlsaAudioBackend::get_physical_inputs (DataType type, std::vector<std::string>& port_names)
{
for (size_t i = 0; i < _ports.size (); ++i) {
AlsaPort* port = _ports[i];
if ((port->type () == type) && port->is_output () && port->is_physical ()) {
port_names.push_back (port->name ());
}
}
}
ChanCount
AlsaAudioBackend::n_physical_outputs () const
{
int n_midi = 0;
int n_audio = 0;
for (size_t i = 0; i < _ports.size (); ++i) {
AlsaPort* port = _ports[i];
if (port->is_output () && port->is_physical ()) {
switch (port->type ()) {
case DataType::AUDIO: ++n_audio; break;
case DataType::MIDI: ++n_midi; break;
default: break;
}
}
}
ChanCount cc;
cc.set (DataType::AUDIO, n_audio);
cc.set (DataType::MIDI, n_midi);
return cc;
}
ChanCount
AlsaAudioBackend::n_physical_inputs () const
{
int n_midi = 0;
int n_audio = 0;
for (size_t i = 0; i < _ports.size (); ++i) {
AlsaPort* port = _ports[i];
if (port->is_input () && port->is_physical ()) {
switch (port->type ()) {
case DataType::AUDIO: ++n_audio; break;
case DataType::MIDI: ++n_midi; break;
default: break;
}
}
}
ChanCount cc;
cc.set (DataType::AUDIO, n_audio);
cc.set (DataType::MIDI, n_midi);
return cc;
}
/* Getting access to the data buffer for a port */
void*
AlsaAudioBackend::get_buffer (PortEngine::PortHandle port, pframes_t nframes)
{
assert (port);
assert (valid_port (port));
return static_cast<AlsaPort*>(port)->get_buffer (nframes);
}
/* Engine Process */
void *
AlsaAudioBackend::main_process_thread ()
{
AudioEngine::thread_init_callback (this);
_running = true;
_processed_samples = 0;
uint64_t clock1, clock2;
clock1 = g_get_monotonic_time();
_pcmi->pcm_start ();
int no_proc_errors = 0;
while (_running) {
long nr;
bool xrun = false;
if (!_freewheeling) {
nr = _pcmi->pcm_wait ();
if (_pcmi->state () > 0) {
++no_proc_errors;
xrun = true;
}
if (_pcmi->state () < 0 || no_proc_errors > 50) {
PBD::error << _("AlsaAudioBackend: I/O error. Audio Process Terminated.") << endmsg;
break;
}
while (nr >= (long)_samples_per_period) {
uint32_t i = 0;
clock1 = g_get_monotonic_time();
no_proc_errors = 0;
_pcmi->capt_init (_samples_per_period);
for (std::vector<AlsaPort*>::const_iterator it = _system_inputs.begin (); it != _system_inputs.end (); ++it, ++i) {
_pcmi->capt_chan (i, (float*)((*it)->get_buffer(_samples_per_period)), _samples_per_period);
}
_pcmi->capt_done (_samples_per_period);
/* de-queue midi*/
i = 0;
for (std::vector<AlsaPort*>::const_iterator it = _system_midi_in.begin (); it != _system_midi_in.end (); ++it, ++i) {
assert (_rmidi_in.size() > i);
AlsaRawMidiIn *rm = static_cast<AlsaRawMidiIn*>(_rmidi_in.at(i));
void *bptr = (*it)->get_buffer(0);
pframes_t time;
uint8_t data[64]; // match MaxAlsaRawEventSize in alsa_rawmidi.cc
size_t size = sizeof(data);
midi_clear(bptr);
while (rm->recv_event (time, data, size)) {
midi_event_put(bptr, time, data, size);
size = sizeof(data);
}
rm->sync_time (clock1);
}
for (std::vector<AlsaPort*>::const_iterator it = _system_outputs.begin (); it != _system_outputs.end (); ++it) {
memset ((*it)->get_buffer (_samples_per_period), 0, _samples_per_period * sizeof (Sample));
}
if (engine.process_callback (_samples_per_period)) {
_pcmi->pcm_stop ();
return 0;
}
/* queue midi*/
i = 0;
for (std::vector<AlsaPort*>::const_iterator it = _system_midi_out.begin (); it != _system_midi_out.end (); ++it, ++i) {
assert (_rmidi_out.size() > i);
AlsaRawMidiOut *rm = static_cast<AlsaRawMidiOut*>(_rmidi_out.at(i));
const AlsaMidiBuffer *src = static_cast<const AlsaMidiBuffer*>((*it)->get_buffer(0));
rm->sync_time (clock1); // ?? use clock pre DSP load?
for (AlsaMidiBuffer::const_iterator mit = src->begin (); mit != src->end (); ++mit) {
rm->send_event ((*mit)->timestamp(), (*mit)->data(), (*mit)->size());
}
}
/* write back audio */
i = 0;
_pcmi->play_init (_samples_per_period);
for (std::vector<AlsaPort*>::const_iterator it = _system_outputs.begin (); it != _system_outputs.end (); ++it, ++i) {
_pcmi->play_chan (i, (const float*)(*it)->get_buffer (_samples_per_period), _samples_per_period);
}
for (; i < _pcmi->nplay (); ++i) {
_pcmi->clear_chan (i, _samples_per_period);
}
_pcmi->play_done (_samples_per_period);
nr -= _samples_per_period;
_processed_samples += _samples_per_period;
/* calculate DSP load */
clock2 = g_get_monotonic_time();
const int64_t elapsed_time = clock2 - clock1;
const int64_t nomial_time = 1e6 * _samples_per_period / _samplerate;
_dsp_load = elapsed_time / (float) nomial_time;
}
if (xrun && (_pcmi->capt_xrun() > 0 || _pcmi->play_xrun() > 0)) {
engine.Xrun ();
#if 0
fprintf(stderr, "ALSA x-run read: %.1f ms, write: %.1f ms\n",
_pcmi->capt_xrun() * 1000.0, _pcmi->play_xrun() * 1000.0);
#endif
}
} else {
// Freewheelin'
for (std::vector<AlsaPort*>::const_iterator it = _system_inputs.begin (); it != _system_inputs.end (); ++it) {
memset ((*it)->get_buffer (_samples_per_period), 0, _samples_per_period * sizeof (Sample));
}
for (std::vector<AlsaPort*>::const_iterator it = _system_midi_in.begin (); it != _system_midi_in.end (); ++it) {
static_cast<AlsaMidiBuffer*>((*it)->get_buffer(0))->clear ();
}
if (engine.process_callback (_samples_per_period)) {
_pcmi->pcm_stop ();
return 0;
}
_dsp_load = 1.0;
Glib::usleep (100); // don't hog cpu
}
if (!pthread_mutex_trylock (&_port_callback_mutex)) {
while (!_port_connection_queue.empty ()) {
PortConnectData *c = _port_connection_queue.back ();
manager.connect_callback (c->a, c->b, c->c);
_port_connection_queue.pop_back ();
delete c;
}
pthread_mutex_unlock (&_port_callback_mutex);
}
}
_pcmi->pcm_stop ();
return 0;
}
/******************************************************************************/
static boost::shared_ptr<AlsaAudioBackend> _instance;
static boost::shared_ptr<AudioBackend> backend_factory (AudioEngine& e);
static int instantiate (const std::string& arg1, const std::string& /* arg2 */);
static int deinstantiate ();
static bool already_configured ();
static ARDOUR::AudioBackendInfo _descriptor = {
"Alsa",
instantiate,
deinstantiate,
backend_factory,
already_configured,
};
static boost::shared_ptr<AudioBackend>
backend_factory (AudioEngine& e)
{
if (!_instance) {
_instance.reset (new AlsaAudioBackend (e, _descriptor));
}
return _instance;
}
static int
instantiate (const std::string& arg1, const std::string& /* arg2 */)
{
s_instance_name = arg1;
return 0;
}
static int
deinstantiate ()
{
_instance.reset ();
return 0;
}
static bool
already_configured ()
{
return false;
}
extern "C" ARDOURBACKEND_API ARDOUR::AudioBackendInfo* descriptor ()
{
return &_descriptor;
}
/******************************************************************************/
AlsaPort::AlsaPort (AlsaAudioBackend &b, const std::string& name, PortFlags flags)
: _alsa_backend (b)
, _name (name)
, _flags (flags)
{
_capture_latency_range.min = 0;
_capture_latency_range.max = 0;
_playback_latency_range.min = 0;
_playback_latency_range.max = 0;
}
AlsaPort::~AlsaPort () {
disconnect_all ();
}
int AlsaPort::connect (AlsaPort *port)
{
if (!port) {
PBD::error << _("AlsaPort::connect (): invalid (null) port") << endmsg;
return -1;
}
if (type () != port->type ()) {
PBD::error << _("AlsaPort::connect (): wrong port-type") << endmsg;
return -1;
}
if (is_output () && port->is_output ()) {
PBD::error << _("AlsaPort::connect (): cannot inter-connect output ports.") << endmsg;
return -1;
}
if (is_input () && port->is_input ()) {
PBD::error << _("AlsaPort::connect (): cannot inter-connect input ports.") << endmsg;
return -1;
}
if (this == port) {
PBD::error << _("AlsaPort::connect (): cannot self-connect ports.") << endmsg;
return -1;
}
if (is_connected (port)) {
#if 0 // don't bother to warn about this for now. just ignore it
PBD::error << _("AlsaPort::connect (): ports are already connected:")
<< " (" << name () << ") -> (" << port->name () << ")"
<< endmsg;
#endif
return -1;
}
_connect (port, true);
return 0;
}
void AlsaPort::_connect (AlsaPort *port, bool callback)
{
_connections.push_back (port);
if (callback) {
port->_connect (this, false);
_alsa_backend.port_connect_callback (name(), port->name(), true);
}
}
int AlsaPort::disconnect (AlsaPort *port)
{
if (!port) {
PBD::error << _("AlsaPort::disconnect (): invalid (null) port") << endmsg;
return -1;
}
if (!is_connected (port)) {
PBD::error << _("AlsaPort::disconnect (): ports are not connected:")
<< " (" << name () << ") -> (" << port->name () << ")"
<< endmsg;
return -1;
}
_disconnect (port, true);
return 0;
}
void AlsaPort::_disconnect (AlsaPort *port, bool callback)
{
std::vector<AlsaPort*>::iterator it = std::find (_connections.begin (), _connections.end (), port);
assert (it != _connections.end ());
_connections.erase (it);
if (callback) {
port->_disconnect (this, false);
_alsa_backend.port_connect_callback (name(), port->name(), false);
}
}
void AlsaPort::disconnect_all ()
{
while (!_connections.empty ()) {
_connections.back ()->_disconnect (this, false);
_alsa_backend.port_connect_callback (name(), _connections.back ()->name(), false);
_connections.pop_back ();
}
}
bool
AlsaPort::is_connected (const AlsaPort *port) const
{
return std::find (_connections.begin (), _connections.end (), port) != _connections.end ();
}
bool AlsaPort::is_physically_connected () const
{
for (std::vector<AlsaPort*>::const_iterator it = _connections.begin (); it != _connections.end (); ++it) {
if ((*it)->is_physical ()) {
return true;
}
}
return false;
}
/******************************************************************************/
AlsaAudioPort::AlsaAudioPort (AlsaAudioBackend &b, const std::string& name, PortFlags flags)
: AlsaPort (b, name, flags)
{
memset (_buffer, 0, sizeof (_buffer));
mlock(_buffer, sizeof (_buffer));
}
AlsaAudioPort::~AlsaAudioPort () { }
void* AlsaAudioPort::get_buffer (pframes_t n_samples)
{
if (is_input ()) {
std::vector<AlsaPort*>::const_iterator it = get_connections ().begin ();
if (it == get_connections ().end ()) {
memset (_buffer, 0, n_samples * sizeof (Sample));
} else {
AlsaAudioPort const * source = static_cast<const AlsaAudioPort*>(*it);
assert (source && source->is_output ());
memcpy (_buffer, source->const_buffer (), n_samples * sizeof (Sample));
while (++it != get_connections ().end ()) {
source = static_cast<const AlsaAudioPort*>(*it);
assert (source && source->is_output ());
Sample* dst = buffer ();
const Sample* src = source->const_buffer ();
for (uint32_t s = 0; s < n_samples; ++s, ++dst, ++src) {
*dst += *src;
}
}
}
}
return _buffer;
}
AlsaMidiPort::AlsaMidiPort (AlsaAudioBackend &b, const std::string& name, PortFlags flags)
: AlsaPort (b, name, flags)
{
_buffer.clear ();
}
AlsaMidiPort::~AlsaMidiPort () { }
struct MidiEventSorter {
bool operator() (const boost::shared_ptr<AlsaMidiEvent>& a, const boost::shared_ptr<AlsaMidiEvent>& b) {
return *a < *b;
}
};
void* AlsaMidiPort::get_buffer (pframes_t /* nframes */)
{
if (is_input ()) {
_buffer.clear ();
for (std::vector<AlsaPort*>::const_iterator i = get_connections ().begin ();
i != get_connections ().end ();
++i) {
const AlsaMidiBuffer src = static_cast<const AlsaMidiPort*>(*i)->const_buffer ();
for (AlsaMidiBuffer::const_iterator it = src.begin (); it != src.end (); ++it) {
_buffer.push_back (boost::shared_ptr<AlsaMidiEvent>(new AlsaMidiEvent (**it)));
}
}
std::sort (_buffer.begin (), _buffer.end (), MidiEventSorter());
}
return &_buffer;
}
AlsaMidiEvent::AlsaMidiEvent (const pframes_t timestamp, const uint8_t* data, size_t size)
: _size (size)
, _timestamp (timestamp)
, _data (0)
{
if (size > 0) {
_data = (uint8_t*) malloc (size);
memcpy (_data, data, size);
}
}
AlsaMidiEvent::AlsaMidiEvent (const AlsaMidiEvent& other)
: _size (other.size ())
, _timestamp (other.timestamp ())
, _data (0)
{
if (other.size () && other.const_data ()) {
_data = (uint8_t*) malloc (other.size ());
memcpy (_data, other.const_data (), other.size ());
}
};
AlsaMidiEvent::~AlsaMidiEvent () {
free (_data);
};