/*
- Copyright (C) 2000 Paul Davis
- Copyright (C) 2005 Sampo Savolainen
+ Copyright (C) 2000 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
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.
-
- $Id$
*/
+
+#ifdef WAF_BUILD
+#include "libardour-config.h"
+#endif
+
#include <cstdio> // Needed so that libraptor (included in lrdf) won't complain
#include <sys/stat.h>
#include <sys/types.h>
+#include <sys/time.h>
+#include <sys/resource.h>
#include <unistd.h>
#include <fcntl.h>
-#include <locale.h>
+#include <errno.h>
#ifdef VST_SUPPORT
#include <fst.h>
#endif
-#include <lrdf.h>
+#ifdef HAVE_AUDIOUNITS
+#include "ardour/audio_unit.h"
+#endif
-#include <pbd/error.h>
+#ifdef __SSE__
+#include <xmmintrin.h>
+#endif
-#include <midi++/port.h>
-#include <midi++/port_request.h>
-#include <midi++/manager.h>
-#include <midi++/mmc.h>
+#include <glibmm/fileutils.h>
+#include <glibmm/miscutils.h>
-#include <ardour/ardour.h>
-#include <ardour/audio_library.h>
-#include <ardour/configuration.h>
-#include <ardour/plugin_manager.h>
-#include <ardour/source.h>
-#include <ardour/utils.h>
-#include <ardour/session.h>
+#include <lrdf.h>
-#include <ardour/mix.h>
+#include "pbd/error.h"
+#include "pbd/id.h"
+#include "pbd/strsplit.h"
+#include "pbd/fpu.h"
+#include "pbd/file_utils.h"
+#include "pbd/enumwriter.h"
+
+#include "midi++/port.h"
+#include "midi++/manager.h"
+#include "midi++/mmc.h"
+
+#include "ardour/analyser.h"
+#include "ardour/ardour.h"
+#include "ardour/audio_library.h"
+#include "ardour/audioengine.h"
+#include "ardour/audioregion.h"
+#include "ardour/audiosource.h"
+#include "ardour/buffer_manager.h"
+#include "ardour/control_protocol_manager.h"
+#include "ardour/debug.h"
+#include "ardour/filesystem_paths.h"
+#include "ardour/mix.h"
+#include "ardour/playlist.h"
+#include "ardour/plugin_manager.h"
+#include "ardour/process_thread.h"
+#include "ardour/profile.h"
+#include "ardour/region.h"
+#include "ardour/rc_configuration.h"
+#include "ardour/route_group.h"
+#include "ardour/runtime_functions.h"
+#include "ardour/session.h"
+#include "ardour/session_event.h"
+#include "ardour/source_factory.h"
+#include "ardour/utils.h"
+
+#include "audiographer/routines.h"
#if defined (__APPLE__)
#include <Carbon/Carbon.h> // For Gestalt
#endif
-
+
#include "i18n.h"
-ARDOUR::Configuration* ARDOUR::Config = 0;
+ARDOUR::RCConfiguration* ARDOUR::Config = 0;
+ARDOUR::RuntimeProfile* ARDOUR::Profile = 0;
ARDOUR::AudioLibrary* ARDOUR::Library = 0;
using namespace ARDOUR;
using namespace std;
+using namespace PBD;
-MIDI::Port *default_mmc_port = 0;
-MIDI::Port *default_mtc_port = 0;
-MIDI::Port *default_midi_port = 0;
-
-Change ARDOUR::StartChanged = ARDOUR::new_change ();
-Change ARDOUR::LengthChanged = ARDOUR::new_change ();
-Change ARDOUR::PositionChanged = ARDOUR::new_change ();
-Change ARDOUR::NameChanged = ARDOUR::new_change ();
-Change ARDOUR::BoundsChanged = Change (0); // see init(), below
+compute_peak_t ARDOUR::compute_peak = 0;
+find_peaks_t ARDOUR::find_peaks = 0;
+apply_gain_to_buffer_t ARDOUR::apply_gain_to_buffer = 0;
+mix_buffers_with_gain_t ARDOUR::mix_buffers_with_gain = 0;
+mix_buffers_no_gain_t ARDOUR::mix_buffers_no_gain = 0;
+PBD::Signal1<void,std::string> ARDOUR::BootMessage;
-static int
-setup_midi ()
-{
- std::map<string,Configuration::MidiPortDescriptor*>::iterator i;
- int nports;
+void ARDOUR::setup_enum_writer ();
- if ((nports = Config->midi_ports.size()) == 0) {
- warning << _("no MIDI ports specified: no MMC or MTC control possible") << endmsg;
- return 0;
- }
+/* this is useful for quite a few things that want to check
+ if any bounds-related property has changed
+*/
+PBD::PropertyChange ARDOUR::bounds_change;
- for (i = Config->midi_ports.begin(); i != Config->midi_ports.end(); ++i) {
- Configuration::MidiPortDescriptor* port_descriptor;
+namespace ARDOUR {
+ namespace Properties {
- port_descriptor = (*i).second;
+ /* the envelope and fades are not scalar items and so
+ currently (2010/02) are not stored using Property.
+ However, these descriptors enable us to notify
+ about changes to them via PropertyChange.
- MIDI::PortRequest request (port_descriptor->device,
- port_descriptor->tag,
- port_descriptor->mode,
- port_descriptor->type);
+ Declared in ardour/audioregion.h ...
+ */
- if (request.status != MIDI::PortRequest::OK) {
- error << compose(_("MIDI port specifications for \"%1\" are not understandable."), port_descriptor->tag) << endmsg;
- continue;
- }
-
- MIDI::Manager::instance()->add_port (request);
+ PBD::PropertyDescriptor<bool> fade_in;
+ PBD::PropertyDescriptor<bool> fade_out;
+ PBD::PropertyDescriptor<bool> envelope;
}
+}
- if (nports > 1) {
+void
+ARDOUR::make_property_quarks ()
+{
+ Properties::fade_in.property_id = g_quark_from_static_string (X_("fade_in_FAKE"));
+ DEBUG_TRACE (DEBUG::Properties, string_compose ("quark for fade_in_FAKE = %1\n", Properties::fade_in.property_id));
+ Properties::fade_out.property_id = g_quark_from_static_string (X_("fade_out_FAKE"));
+ DEBUG_TRACE (DEBUG::Properties, string_compose ("quark for fade_out_FAKE = %1\n", Properties::fade_out.property_id));
+ Properties::envelope.property_id = g_quark_from_static_string (X_("envelope_FAKE"));
+ DEBUG_TRACE (DEBUG::Properties, string_compose ("quark for envelope_FAKE = %1\n", Properties::envelope.property_id));
+}
- /* More than one port, so try using specific names for each port */
+void
+setup_hardware_optimization (bool try_optimization)
+{
+ bool generic_mix_functions = true;
- map<string,Configuration::MidiPortDescriptor *>::iterator i;
+ if (try_optimization) {
- if (Config->get_mmc_port_name() != N_("default")) {
- default_mmc_port = MIDI::Manager::instance()->port (Config->get_mmc_port_name());
- }
+ FPU fpu;
- if (Config->get_mtc_port_name() != N_("default")) {
- default_mtc_port = MIDI::Manager::instance()->port (Config->get_mtc_port_name());
- }
+#if defined (ARCH_X86) && defined (BUILD_SSE_OPTIMIZATIONS)
- if (Config->get_midi_port_name() != N_("default")) {
- default_midi_port = MIDI::Manager::instance()->port (Config->get_midi_port_name());
- }
-
- /* If that didn't work, just use the first listed port */
+ if (fpu.has_sse()) {
- if (default_mmc_port == 0) {
- default_mmc_port = MIDI::Manager::instance()->port (0);
- }
+ info << "Using SSE optimized routines" << endmsg;
+
+ // SSE SET
+ compute_peak = x86_sse_compute_peak;
+ find_peaks = x86_sse_find_peaks;
+ apply_gain_to_buffer = x86_sse_apply_gain_to_buffer;
+ mix_buffers_with_gain = x86_sse_mix_buffers_with_gain;
+ mix_buffers_no_gain = x86_sse_mix_buffers_no_gain;
+
+ generic_mix_functions = false;
- if (default_mtc_port == 0) {
- default_mtc_port = MIDI::Manager::instance()->port (0);
}
- if (default_midi_port == 0) {
- default_midi_port = MIDI::Manager::instance()->port (0);
+#elif defined (__APPLE__) && defined (BUILD_VECLIB_OPTIMIZATIONS)
+ long sysVersion = 0;
+
+ if (noErr != Gestalt(gestaltSystemVersion, &sysVersion))
+ sysVersion = 0;
+
+ if (sysVersion >= 0x00001040) { // Tiger at least
+ compute_peak = veclib_compute_peak;
+ find_peaks = veclib_find_peaks;
+ apply_gain_to_buffer = veclib_apply_gain_to_buffer;
+ mix_buffers_with_gain = veclib_mix_buffers_with_gain;
+ mix_buffers_no_gain = veclib_mix_buffers_no_gain;
+
+ generic_mix_functions = false;
+
+ info << "Apple VecLib H/W specific optimizations in use" << endmsg;
}
-
- } else {
+#endif
- /* Only one port described, so use it for both MTC and MMC */
+ /* consider FPU denormal handling to be "h/w optimization" */
- default_mmc_port = MIDI::Manager::instance()->port (0);
- default_mtc_port = default_mmc_port;
- default_midi_port = default_mmc_port;
+ setup_fpu ();
}
- if (default_mmc_port == 0) {
- warning << compose (_("No MMC control (MIDI port \"%1\" not available)"), Config->get_mmc_port_name())
- << endmsg;
- return 0;
- }
+ if (generic_mix_functions) {
- if (default_mtc_port == 0) {
- warning << compose (_("No MTC support (MIDI port \"%1\" not available)"), Config->get_mtc_port_name())
- << endmsg;
- }
+ compute_peak = default_compute_peak;
+ find_peaks = default_find_peaks;
+ apply_gain_to_buffer = default_apply_gain_to_buffer;
+ mix_buffers_with_gain = default_mix_buffers_with_gain;
+ mix_buffers_no_gain = default_mix_buffers_no_gain;
- if (default_midi_port == 0) {
- warning << compose (_("No MIDI parameter support (MIDI port \"%1\" not available)"), Config->get_midi_port_name())
- << endmsg;
+ info << "No H/W specific optimizations in use" << endmsg;
}
+
+ AudioGrapher::Routines::override_compute_peak (compute_peak);
+ AudioGrapher::Routines::override_apply_gain_to_buffer (apply_gain_to_buffer);
+}
- return 0;
+static void
+lotsa_files_please ()
+{
+ struct rlimit rl;
+
+ if (getrlimit (RLIMIT_NOFILE, &rl) == 0) {
+
+ rl.rlim_cur = rl.rlim_max;
+
+ if (setrlimit (RLIMIT_NOFILE, &rl) != 0) {
+ if (rl.rlim_cur == RLIM_INFINITY) {
+ error << _("Could not set system open files limit to \"unlimited\"") << endmsg;
+ } else {
+ error << string_compose (_("Could not set system open files limit to %1"), rl.rlim_cur) << endmsg;
+ }
+ } else {
+ if (rl.rlim_cur == RLIM_INFINITY) {
+ info << _("Removed open file count limit. Excellent!") << endmsg;
+ } else {
+ info << string_compose (_("%1 will be limited to %2 open files"), PROGRAM_NAME, rl.rlim_cur) << endmsg;
+ }
+ }
+ } else {
+ error << string_compose (_("Could not get system open files limit (%1)"), strerror (errno)) << endmsg;
+ }
}
int
-ARDOUR::init (AudioEngine& engine, bool use_vst, bool try_optimization, void (*sighandler)(int,siginfo_t*,void*))
+ARDOUR::init (bool use_vst, bool try_optimization)
{
- bool generic_mix_functions = true;
+ if (!Glib::thread_supported()) {
+ Glib::thread_init();
+ }
(void) bindtextdomain(PACKAGE, LOCALEDIR);
- Config = new Configuration;
+ PBD::ID::init ();
+ SessionEvent::init_event_pool ();
+
+ make_property_quarks ();
+ SessionObject::make_property_quarks ();
+ Region::make_property_quarks ();
+ AudioRegion::make_property_quarks ();
+ RouteGroup::make_property_quarks ();
+ Playlist::make_property_quarks ();
+
+ /* this is a useful ready to use PropertyChange that many
+ things need to check. This avoids having to compose
+ it every time we want to check for any of the relevant
+ property changes.
+ */
+
+ bounds_change.add (ARDOUR::Properties::start);
+ bounds_change.add (ARDOUR::Properties::position);
+ bounds_change.add (ARDOUR::Properties::length);
+
+ /* provide a state version for the few cases that need it and are not
+ driven by reading state from disk (e.g. undo/redo)
+ */
+
+ Stateful::current_state_version = CURRENT_SESSION_FILE_VERSION;
+
+ setup_enum_writer ();
+
+ // allow ardour the absolute maximum number of open files
+ lotsa_files_please ();
+
+ lrdf_init();
+ Library = new AudioLibrary;
+
+ BootMessage (_("Loading configuration"));
+
+ Config = new RCConfiguration;
if (Config->load_state ()) {
return -1;
}
+
Config->set_use_vst (use_vst);
- if (setup_midi ()) {
- return -1;
- }
+ Profile = new RuntimeProfile;
+
#ifdef VST_SUPPORT
- if (Config->get_use_vst() && fst_init (sighandler)) {
+ if (Config->get_use_vst() && fst_init (0)) {
return -1;
}
#endif
- if (try_optimization) {
+#ifdef HAVE_AUDIOUNITS
+ AUPluginInfo::load_cached_info ();
+#endif
-#if defined (ARCH_X86) && defined (BUILD_SSE_OPTIMIZATIONS)
-
- unsigned int use_sse = 0;
-
- asm volatile (
- "mov $1, %%eax\n"
- "pushl %%ebx\n"
- "cpuid\n"
- "popl %%ebx\n"
- "andl $33554432, %%edx\n"
- "movl %%edx, %0\n"
- : "=m" (use_sse)
- :
- : "%eax", "%ecx", "%edx", "memory");
-
- if (use_sse) {
- cerr << "Enabling SSE optimized routines" << endl;
-
- // SSE SET
- Session::compute_peak = x86_sse_compute_peak;
- Session::apply_gain_to_buffer = x86_sse_apply_gain_to_buffer;
- Session::mix_buffers_with_gain = x86_sse_mix_buffers_with_gain;
- Session::mix_buffers_no_gain = x86_sse_mix_buffers_no_gain;
+ /* Make VAMP look in our library ahead of anything else */
- generic_mix_functions = false;
+ char *p = getenv ("VAMP_PATH");
+ string vamppath = VAMP_DIR;
+ if (p) {
+ vamppath += ':';
+ vamppath += p;
+ }
+ setenv ("VAMP_PATH", vamppath.c_str(), 1);
- }
- #elif defined (__APPLE__)
- long sysVersion = 0;
+ setup_hardware_optimization (try_optimization);
- if (noErr != Gestalt(gestaltSystemVersion, &sysVersion))
- sysVersion = 0;
+ SourceFactory::init ();
+ Analyser::init ();
- if (sysVersion >= 0x00001040) { // Tiger at least
- Session::compute_peak = veclib_compute_peak;
- Session::apply_gain_to_buffer = veclib_apply_gain_to_buffer;
- Session::mix_buffers_with_gain = veclib_mix_buffers_with_gain;
- Session::mix_buffers_no_gain = veclib_mix_buffers_no_gain;
+ /* singleton - first object is "it" */
+ new PluginManager ();
- generic_mix_functions = false;
+ ProcessThread::init ();
+ BufferManager::init (10); // XX should be num_processors_for_dsp
- info << "Apple VecLib H/W specific optimizations in use" << endmsg;
- }
-#endif
- }
+ return 0;
+}
- if (generic_mix_functions) {
+void
+ARDOUR::init_post_engine ()
+{
+ ControlProtocolManager::instance().discover_control_protocols ();
- Session::compute_peak = compute_peak;
- Session::apply_gain_to_buffer = apply_gain_to_buffer;
- Session::mix_buffers_with_gain = mix_buffers_with_gain;
- Session::mix_buffers_no_gain = mix_buffers_no_gain;
-
- info << "No H/W specific optimizations in use" << endmsg;
+ XMLNode* node;
+ if ((node = Config->control_protocol_state()) != 0) {
+ ControlProtocolManager::instance().set_state (*node, Stateful::loading_state_version);
}
-
- lrdf_init();
- Library = new AudioLibrary;
-
- /* singleton - first object is "it" */
- new PluginManager (engine);
-
- BoundsChanged = Change (StartChanged|PositionChanged|LengthChanged);
-
- return 0;
}
int
{
delete Library;
lrdf_cleanup ();
+ delete &ControlProtocolManager::instance();
+#ifdef VST_SUPPORT
+ fst_exit ();
+#endif
return 0;
}
-ARDOUR::id_t
-ARDOUR::new_id ()
+string
+ARDOUR::get_ardour_revision ()
{
- return get_uid();
+ return "$Rev$";
}
-ARDOUR::Change
-ARDOUR::new_change ()
+void
+ARDOUR::find_bindings_files (map<string,string>& files)
{
- Change c;
- static uint32_t change_bit = 1;
+ vector<sys::path> found;
+ SearchPath spath = ardour_search_path() + user_config_directory() + system_config_search_path();
- /* XXX catch out-of-range */
+ if (getenv ("ARDOUR_SAE")) {
+ Glib::PatternSpec pattern("*SAE-*.bindings");
+ find_matching_files_in_search_path (spath, pattern, found);
+ } else {
+ Glib::PatternSpec pattern("*.bindings");
+ find_matching_files_in_search_path (spath, pattern, found);
+ }
- c = Change (change_bit);
- change_bit <<= 1;
+ if (found.empty()) {
+ return;
+ }
- return c;
+ for (vector<sys::path>::iterator x = found.begin(); x != found.end(); ++x) {
+ sys::path path = *x;
+ pair<string,string> namepath;
+ namepath.second = path.to_string();
+ namepath.first = path.leaf().substr (0, path.leaf().find_first_of ('.'));
+ files.insert (namepath);
+ }
}
-static string
-find_file (string name, string dir)
+bool
+ARDOUR::no_auto_connect()
{
- string path;
-
- /* stop A: ~/.ardour/... */
-
- path = getenv ("HOME");
-
- if (path.length()) {
-
- path += "/.ardour/";
+ return getenv ("ARDOUR_NO_AUTOCONNECT") != 0;
+}
- /* try to ensure that the directory exists.
- failure doesn't mean much here.
- */
+void
+ARDOUR::setup_fpu ()
+{
- mkdir (path.c_str(), 0755);
+ if (getenv ("ARDOUR_RUNNING_UNDER_VALGRIND")) {
+ // valgrind doesn't understand this assembler stuff
+ // September 10th, 2007
+ return;
+ }
- path += name;
+#if defined(ARCH_X86) && defined(USE_XMMINTRIN)
- if (access (path.c_str(), R_OK) == 0) {
- return path;
- }
- }
+ int MXCSR;
+ FPU fpu;
- /* stop B: dir/... */
+ /* XXX use real code to determine if the processor supports
+ DenormalsAreZero and FlushToZero
+ */
- path = dir;
- path += "/ardour/";
- path += name;
-
- if (access (path.c_str(), R_OK) == 0) {
- return path;
+ if (!fpu.has_flush_to_zero() && !fpu.has_denormals_are_zero()) {
+ return;
}
- return "";
-}
+ MXCSR = _mm_getcsr();
-string
-ARDOUR::find_config_file (string name)
-{
- char* envvar;
- if ((envvar = getenv("ARDOUR_CONFIG_PATH")) == 0) {
- envvar = CONFIG_DIR;
- }
+ switch (Config->get_denormal_model()) {
+ case DenormalNone:
+ MXCSR &= ~(_MM_FLUSH_ZERO_ON|0x8000);
+ break;
- return find_file (name, envvar);
-}
+ case DenormalFTZ:
+ if (fpu.has_flush_to_zero()) {
+ MXCSR |= _MM_FLUSH_ZERO_ON;
+ }
+ break;
-string
-ARDOUR::find_data_file (string name)
-{
- char* envvar;
- if ((envvar = getenv("ARDOUR_DATA_PATH")) == 0) {
- envvar = DATA_DIR;
+ case DenormalDAZ:
+ MXCSR &= ~_MM_FLUSH_ZERO_ON;
+ if (fpu.has_denormals_are_zero()) {
+ MXCSR |= 0x8000;
+ }
+ break;
+
+ case DenormalFTZDAZ:
+ if (fpu.has_flush_to_zero()) {
+ if (fpu.has_denormals_are_zero()) {
+ MXCSR |= _MM_FLUSH_ZERO_ON | 0x8000;
+ } else {
+ MXCSR |= _MM_FLUSH_ZERO_ON;
+ }
+ }
+ break;
}
- return find_file (name, envvar);
-}
+ _mm_setcsr (MXCSR);
-ARDOUR::LocaleGuard::LocaleGuard (const char* str)
-{
- old = strdup (setlocale (LC_NUMERIC, NULL));
- if (strcmp (old, str)) {
- setlocale (LC_NUMERIC, str);
- }
-}
-
-ARDOUR::LocaleGuard::~LocaleGuard ()
-{
- setlocale (LC_NUMERIC, old);
- free ((char*)old);
+#endif
}
ARDOUR::OverlapType
-ARDOUR::coverage (jack_nframes_t sa, jack_nframes_t ea,
- jack_nframes_t sb, jack_nframes_t eb)
+ARDOUR::coverage (framepos_t sa, framepos_t ea,
+ framepos_t sb, framepos_t eb)
{
/* OverlapType returned reflects how the second (B)
range overlaps the first (A).
|-----------------| B
- "B is internal to A"
+ "B is internal to A"
*/
-#ifdef OLD_COVERAGE
- if ((sb >= sa) && (eb <= ea)) {
-#else
+
if ((sb > sa) && (eb <= ea)) {
-#endif
return OverlapInternal;
}
----| B
-----------------------| B
--| B
-
+
"B overlaps the start of A"
*/
if ((eb >= sa) && (eb <= ea)) {
return OverlapStart;
}
- /*
+ /*
|---------------------| A
|----------------- B
- |----------------------- B
+ |----------------------- B
|- B
- "B overlaps the end of A"
+ "B overlaps the end of A"
*/
- if ((sb >= sa) && (sb <= ea)) {
+ if ((sb > sa) && (sb <= ea)) {
return OverlapEnd;
}
/*
|--------------------| A
- -------------------------- B
+ -------------------------- B
|----------------------- B
----------------------| B
|--------------------| B