/* * Copyright (C) 2014 Robin Gareus * 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 #include #include #include #include "alsa_audiobackend.h" #include "rt_thread.h" #include "pbd/compose.h" #include "pbd/error.h" #include "pbd/file_utils.h" #include "ardour/port_manager.h" #include "ardour/system_exec.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) , _run (false) , _active (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 AlsaAudioBackend::enumerate_devices () const { std::vector 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; } static int card_to_num(const char* device_name) { char* ctl_name; const char * comma; snd_ctl_t* ctl_handle; int i = -1; if (strncasecmp(device_name, "plughw:", 7) == 0) { device_name += 4; } if (!(comma = strchr(device_name, ','))) { ctl_name = strdup(device_name); } else { ctl_name = strndup(device_name, comma - device_name); } if (snd_ctl_open (&ctl_handle, ctl_name, 0) >= 0) { snd_ctl_card_info_t *card_info; snd_ctl_card_info_alloca (&card_info); if (snd_ctl_card_info(ctl_handle, card_info) >= 0) { i = snd_ctl_card_info_get_card(card_info); } snd_ctl_close(ctl_handle); } free(ctl_name); return i; } static void acquire_device(const char* device_name) { /* This is quick hack, ideally we'll link against libdbus and implement a dbus-listener * that owns the device. here we try to get away by just requesting it and then block it... * (pulseaudio periodically checks anyway) * * dbus-send --session --print-reply --type=method_call --dest=org.freedesktop.ReserveDevice1.Audio2 /org/freedesktop/ReserveDevice1/Audio2 org.freedesktop.ReserveDevice1.RequestRelease int32:4 * -> should not return 'boolean false' */ int device_number = card_to_num(device_name); if (device_number < 0) return; std::string dbus_send_path; if (PBD::find_file_in_search_path (PBD::Searchpath(Glib::getenv("PATH")), X_("dbus-send"), dbus_send_path)) { char **argp; char tmp[128]; argp=(char**) calloc(8,sizeof(char*)); argp[0] = strdup(dbus_send_path.c_str()); argp[1] = strdup("--session"); argp[2] = strdup("--print-reply"); // need to wait for the receiver to act. argp[3] = strdup("--type=method_call"); snprintf(tmp, sizeof(tmp), "--dest=org.freedesktop.ReserveDevice1.Audio%d", device_number); argp[4] = strdup(tmp); snprintf(tmp, sizeof(tmp), "/org/freedesktop/ReserveDevice1/Audio%d", device_number); argp[5] = strdup(tmp); argp[6] = strdup("org.freedesktop.ReserveDevice1.RequestRelease"); argp[7] = strdup("int32:4294967296"); snprintf(tmp, sizeof(tmp), "string:'org.freedesktop.ReserveDevice1.Audio%d'", device_number); argp[7] = strdup(tmp); argp[8] = 0; ARDOUR::SystemExec process (dbus_send_path, argp); if (!process.start(1)) { process.wait(); } } } std::vector AlsaAudioBackend::available_sample_rates (const std::string&) const { std::vector 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 AlsaAudioBackend::available_buffer_sizes (const std::string&) const { std::vector 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 &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 AlsaAudioBackend::enumerate_midi_options () const { std::vector 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(arg); d->main_process_thread (); pthread_exit (0); return 0; } int AlsaAudioBackend::_start (bool for_latency_measurement) { if (_active || _run) { 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(" "); acquire_device(_capture_device.substr(0, pos).c_str()); _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); switch (_pcmi->state ()) { case 0: /* OK */ break; case -1: PBD::error << _("AlsaAudioBackend: failed to open device.") << endmsg; break; case -2: PBD::error << _("AlsaAudioBackend: failed to allocate parameters.") << endmsg; break; case -3: PBD::error << _("AlsaAudioBackend: cannot set requested sample rate.") << endmsg; break; case -4: PBD::error << _("AlsaAudioBackend: cannot set requested period size.") << endmsg; break; case -5: PBD::error << _("AlsaAudioBackend: cannot set requested number of periods.") << endmsg; break; case -6: PBD::error << _("AlsaAudioBackend: unsupported sample format.") << endmsg; break; default: PBD::error << _("AlsaAudioBackend: initialization failed.") << endmsg; break; } if (_pcmi->state ()) { 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 (); _run = true; 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; _run = false; return -1; } else { PBD::warning << _("AlsaAudioBackend: cannot acquire realtime permissions.") << endmsg; } } int timeout = 5000; while (!_active && --timeout > 0) { Glib::usleep (1000); } if (timeout == 0 || !_active) { PBD::error << _("AlsaAudioBackend: failed to start process thread.") << endmsg; delete _pcmi; _pcmi = 0; _run = false; return -1; } return 0; } int AlsaAudioBackend::stop () { void *status; if (!_active) { return 0; } _run = 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 (_active == false) ? 0 : -1; } 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 (arg); boost::function f = td->f; delete td; f (); return 0; } int AlsaAudioBackend::create_process_thread (boost::function 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::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::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 _run && _active; } 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(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(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& 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(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(port_handle); std::vector::iterator i = std::find (_ports.begin (), _ports.end (), static_cast(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(IsOutput | IsPhysical | IsTerminal)); if (!p) return -1; set_latency_range (p, false, lr); _system_inputs.push_back(static_cast(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(IsInput | IsPhysical | IsTerminal)); if (!p) return -1; set_latency_range (p, false, lr); _system_outputs.push_back(static_cast(p)); } return 0; } int AlsaAudioBackend::register_system_midi_ports() { LatencyRange lr; std::vector 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::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(IsOutput | IsPhysical | IsTerminal)); if (!p) return -1; set_latency_range (p, false, lr); _system_midi_in.push_back(static_cast(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(IsInput | IsPhysical | IsTerminal)); if (!p) return -1; set_latency_range (p, false, lr); _system_midi_out.push_back(static_cast(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(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(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(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(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(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(port)->is_physically_connected (); } int AlsaAudioBackend::get_connections (PortEngine::PortHandle port, std::vector& 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& connected_ports = static_cast(port)->get_connections (); for (std::vector::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(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(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(new AlsaMidiEvent (timestamp, buffer, size))); return 0; } uint32_t AlsaAudioBackend::get_midi_event_count (void* port_buffer) { assert (port_buffer); return static_cast(port_buffer)->size (); } void AlsaAudioBackend::midi_clear (void* port_buffer) { assert (port_buffer); AlsaMidiBuffer * buf = static_cast(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(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(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(port)->is_physical (); } void AlsaAudioBackend::get_physical_outputs (DataType type, std::vector& 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& 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(port)->get_buffer (nframes); } /* Engine Process */ void * AlsaAudioBackend::main_process_thread () { AudioEngine::thread_init_callback (this); _active = true; _processed_samples = 0; uint64_t clock1, clock2; clock1 = g_get_monotonic_time(); _pcmi->pcm_start (); int no_proc_errors = 0; while (_run) { 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::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::const_iterator it = _system_midi_in.begin (); it != _system_midi_in.end (); ++it, ++i) { assert (_rmidi_in.size() > i); AlsaRawMidiIn *rm = static_cast(_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::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 (); _active = false; return 0; } /* queue midi*/ i = 0; for (std::vector::const_iterator it = _system_midi_out.begin (); it != _system_midi_out.end (); ++it, ++i) { assert (_rmidi_out.size() > i); AlsaRawMidiOut *rm = static_cast(_rmidi_out.at(i)); const AlsaMidiBuffer *src = static_cast((*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::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::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::const_iterator it = _system_midi_in.begin (); it != _system_midi_in.end (); ++it) { static_cast((*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 (); _active = false; if (_run) { engine.halted_callback("ALSA I/O error."); } return 0; } /******************************************************************************/ static boost::shared_ptr _instance; static boost::shared_ptr 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 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::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::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::const_iterator it = get_connections ().begin (); if (it == get_connections ().end ()) { memset (_buffer, 0, n_samples * sizeof (Sample)); } else { AlsaAudioPort const * source = static_cast(*it); assert (source && source->is_output ()); memcpy (_buffer, source->const_buffer (), n_samples * sizeof (Sample)); while (++it != get_connections ().end ()) { source = static_cast(*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& a, const boost::shared_ptr& b) { return *a < *b; } }; void* AlsaMidiPort::get_buffer (pframes_t /* nframes */) { if (is_input ()) { _buffer.clear (); for (std::vector::const_iterator i = get_connections ().begin (); i != get_connections ().end (); ++i) { const AlsaMidiBuffer src = static_cast(*i)->const_buffer (); for (AlsaMidiBuffer::const_iterator it = src.begin (); it != src.end (); ++it) { _buffer.push_back (boost::shared_ptr(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); };