X-Git-Url: https://main.carlh.net/gitweb/?a=blobdiff_plain;f=libs%2Fardour%2Fglobals.cc;h=4d75c30a0d09f8cd687ac0c7d38735a239559394;hb=c7c15fe1bd8c7ffe2275aeb4c6938132b3f909b8;hp=3344c61a9aa9b8f169049fa6a9941286a72cc4b5;hpb=1bddf1bc884feedb5deb5c35f08c7b9730936dae;p=ardour.git diff --git a/libs/ardour/globals.cc b/libs/ardour/globals.cc index 3344c61a9a..4d75c30a0d 100644 --- a/libs/ardour/globals.cc +++ b/libs/ardour/globals.cc @@ -1,5 +1,5 @@ /* - Copyright (C) 2000 Paul Davis + 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 @@ -14,67 +14,87 @@ 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: globals.cc 935 2006-09-29 21:39:39Z paul $ */ + +#ifdef WAF_BUILD +#include "libardour-config.h" +#endif + #include // Needed so that libraptor (included in lrdf) won't complain #include #include +#include +#include #include #include -#include +#include #ifdef VST_SUPPORT #include #endif -#include +#ifdef HAVE_AUDIOUNITS +#include "ardour/audio_unit.h" +#endif -#include -#include -#include - -#include -#include -#include -#include - -#include -#include -#include -#include -#include -#include -#include -#include - -#ifdef HAVE_LIBLO -#include +#ifdef __SSE__ +#include #endif -#include +#include +#include + +#include + +#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/audiosource.h" +#include "ardour/control_protocol_manager.h" +#include "ardour/debug.h" +#include "ardour/filesystem_paths.h" +#include "ardour/mix.h" +#include "ardour/plugin_manager.h" +#include "ardour/profile.h" +#include "ardour/rc_configuration.h" +#include "ardour/runtime_functions.h" +#include "ardour/session.h" +#include "ardour/source_factory.h" +#include "ardour/utils.h" #if defined (__APPLE__) #include // 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; -#ifdef HAVE_LIBLO -ARDOUR::OSC* ARDOUR::osc = 0; -#endif - 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; +uint64_t ARDOUR::debug_bits = 0x0; + +MIDI::Port *ARDOUR::default_mmc_port = 0; +MIDI::Port *ARDOUR::default_mtc_port = 0; +MIDI::Port *ARDOUR::default_midi_port = 0; +MIDI::Port *ARDOUR::default_midi_clock_port = 0; Change ARDOUR::StartChanged = ARDOUR::new_change (); Change ARDOUR::LengthChanged = ARDOUR::new_change (); @@ -82,109 +102,114 @@ Change ARDOUR::PositionChanged = ARDOUR::new_change (); Change ARDOUR::NameChanged = ARDOUR::new_change (); Change ARDOUR::BoundsChanged = Change (0); // see init(), below -#ifdef HAVE_LIBLO -static int -setup_osc () +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; + +sigc::signal ARDOUR::BootMessage; + +void +ARDOUR::debug_print (const char* prefix, std::string str) { - /* no real cost to creating this object, and it avoids - conditionals anywhere that uses it - */ - - osc = new OSC (Config->get_osc_port()); - - if (Config->get_use_osc ()) { - return osc->start (); - } else { - return 0; - } + cerr << prefix << ": " << str; } -#endif -static int -setup_midi () +void +ARDOUR::set_debug_bits (uint64_t bits) { - std::map::iterator i; - int nports; + debug_bits = bits; +} - if ((nports = Config->midi_ports.size()) == 0) { - warning << _("no MIDI ports specified: no MMC or MTC control possible") << endmsg; +int +ARDOUR::setup_midi () +{ + if (Config->midi_ports.size() == 0) { + //warning << _("no MIDI ports specified: no MMC or MTC control possible") << endmsg; return 0; } - for (i = Config->midi_ports.begin(); i != Config->midi_ports.end(); ++i) { - Configuration::MidiPortDescriptor* port_descriptor; + BootMessage (_("Configuring MIDI ports")); - port_descriptor = (*i).second; + for (std::map::iterator i = Config->midi_ports.begin(); i != Config->midi_ports.end(); ++i) { + MIDI::Manager::instance()->add_port (i->second); + } - MIDI::PortRequest request (port_descriptor->device, - port_descriptor->tag, - port_descriptor->mode, - port_descriptor->type); + MIDI::Port* first; + const MIDI::Manager::PortMap& ports = MIDI::Manager::instance()->get_midi_ports(); - if (request.status != MIDI::PortRequest::OK) { - error << string_compose(_("MIDI port specifications for \"%1\" are not understandable."), port_descriptor->tag) << endmsg; - continue; - } - - MIDI::Manager::instance()->add_port (request); + if (ports.size() > 1) { - nports++; - } - - if (nports > 1) { + first = ports.begin()->second; /* More than one port, so try using specific names for each port */ - map::iterator i; - - if (Config->get_mmc_port_name() != N_("default")) { + if (Config->get_mmc_port_name() != N_("control")) { default_mmc_port = MIDI::Manager::instance()->port (Config->get_mmc_port_name()); - } + } - if (Config->get_mtc_port_name() != N_("default")) { + if (Config->get_mtc_port_name() != N_("control")) { default_mtc_port = MIDI::Manager::instance()->port (Config->get_mtc_port_name()); - } + } - if (Config->get_midi_port_name() != N_("default")) { + if (Config->get_midi_port_name() != N_("control")) { default_midi_port = MIDI::Manager::instance()->port (Config->get_midi_port_name()); - } - + } + + if (Config->get_midi_clock_port_name() != N_("control")) { + default_midi_port = MIDI::Manager::instance()->port (Config->get_midi_clock_port_name()); + } + /* If that didn't work, just use the first listed port */ if (default_mmc_port == 0) { - default_mmc_port = MIDI::Manager::instance()->port (0); + default_mmc_port = first; } if (default_mtc_port == 0) { - default_mtc_port = MIDI::Manager::instance()->port (0); + default_mtc_port = first; } if (default_midi_port == 0) { - default_midi_port = MIDI::Manager::instance()->port (0); + default_midi_port = first; + } + + if (default_midi_clock_port == 0) { + default_midi_clock_port = first; } - - } else { + + } else if (ports.size() == 1) { + + first = ports.begin()->second; /* Only one port described, so use it for both MTC and MMC */ - default_mmc_port = MIDI::Manager::instance()->port (0); + default_mmc_port = first; default_mtc_port = default_mmc_port; default_midi_port = default_mmc_port; + default_midi_clock_port = default_mmc_port; } if (default_mmc_port == 0) { - warning << string_compose (_("No MMC control (MIDI port \"%1\" not available)"), Config->get_mmc_port_name()) + warning << string_compose (_("No MMC control (MIDI port \"%1\" not available)"), Config->get_mmc_port_name()) << endmsg; return 0; - } + } + if (default_mtc_port == 0) { - warning << string_compose (_("No MTC support (MIDI port \"%1\" not available)"), Config->get_mtc_port_name()) + warning << string_compose (_("No MTC support (MIDI port \"%1\" not available)"), Config->get_mtc_port_name()) << endmsg; } if (default_midi_port == 0) { - warning << string_compose (_("No MIDI parameter support (MIDI port \"%1\" not available)"), Config->get_midi_port_name()) + warning << string_compose (_("No MIDI parameter support (MIDI port \"%1\" not available)"), Config->get_midi_port_name()) + << endmsg; + } + + if (default_midi_clock_port == 0) { + warning << string_compose (_("No MIDI Clock support (MIDI port \"%1\" not available)"), Config->get_midi_clock_port_name()) << endmsg; } @@ -194,98 +219,121 @@ setup_midi () void setup_hardware_optimization (bool try_optimization) { - bool generic_mix_functions = true; + bool generic_mix_functions = true; if (try_optimization) { + FPU fpu; + #if defined (ARCH_X86) && defined (BUILD_SSE_OPTIMIZATIONS) - - unsigned int use_sse = 0; - -#ifndef USE_X86_64_ASM - 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"); -#else - asm volatile ( - "movq $1, %%rax\n" - "pushq %%rbx\n" - "cpuid\n" - "popq %%rbx\n" - "andq $33554432, %%rdx\n" - "movq %%rdx, %0\n" - : "=m" (use_sse) - : - : "%rax", "%rcx", "%rdx", "memory"); - -#endif /* USE_X86_64_ASM */ - - if (use_sse) { + if (fpu.has_sse()) { + info << "Using SSE optimized routines" << endmsg; - + // 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; + 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; - } + } #elif defined (__APPLE__) && defined (BUILD_VECLIB_OPTIMIZATIONS) - long sysVersion = 0; + long sysVersion = 0; - if (noErr != Gestalt(gestaltSystemVersion, &sysVersion)) - sysVersion = 0; + if (noErr != Gestalt(gestaltSystemVersion, &sysVersion)) + sysVersion = 0; - 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; + 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; + generic_mix_functions = false; - info << "Apple VecLib H/W specific optimizations in use" << endmsg; - } + info << "Apple VecLib H/W specific optimizations in use" << endmsg; + } #endif - } - if (generic_mix_functions) { + /* consider FPU denormal handling to be "h/w optimization" */ + + setup_fpu (); + } + + if (generic_mix_functions) { + + 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; - 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; } } +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 (_("Ardour will be limited to %1 open files"), rl.rlim_cur) << endmsg; + } + } + } else { + error << string_compose (_("Could not get system open files limit (%1)"), strerror (errno)) << endmsg; + } +} + int ARDOUR::init (bool use_vst, bool try_optimization) { + if (!Glib::thread_supported()) + Glib::thread_init(); + + PBD::ID::init (); + extern void setup_enum_writer (); (void) bindtextdomain(PACKAGE, LOCALEDIR); - PBD::ID::init (); + /* 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; - Config = new Configuration; + BootMessage (_("Loading configuration")); + + Config = new RCConfiguration; if (Config->load_state ()) { return -1; @@ -293,61 +341,66 @@ ARDOUR::init (bool use_vst, bool try_optimization) Config->set_use_vst (use_vst); - if (setup_midi ()) { - return -1; - } - -#ifdef HAVE_LIBLO - if (setup_osc ()) { - return -1; - } -#endif + Profile = new RuntimeProfile; + #ifdef VST_SUPPORT - if (Config->get_use_vst() && fst_init ()) { + if (Config->get_use_vst() && fst_init (0)) { return -1; } #endif +#ifdef HAVE_AUDIOUNITS + AUPluginInfo::load_cached_info (); +#endif + + /* Make VAMP look in our library ahead of anything else */ + + char *p = getenv ("VAMP_PATH"); + string vamppath = VAMP_DIR; + if (p) { + vamppath += ':'; + vamppath += p; + } + setenv ("VAMP_PATH", vamppath.c_str(), 1); + + setup_hardware_optimization (try_optimization); + SourceFactory::init (); + Analyser::init (); + /* singleton - first object is "it" */ new PluginManager (); - - /* singleton - first object is "it" */ - new ControlProtocolManager (); - ControlProtocolManager::instance().discover_control_protocols (Session::control_protocol_path()); - XMLNode* node; - if ((node = Config->control_protocol_state()) != 0) { - ControlProtocolManager::instance().set_state (*node); - } - BoundsChanged = Change (StartChanged|PositionChanged|LengthChanged); return 0; } +void +ARDOUR::init_post_engine () +{ + ControlProtocolManager::instance().discover_control_protocols (); + + XMLNode* node; + if ((node = Config->control_protocol_state()) != 0) { + ControlProtocolManager::instance().set_state (*node, Stateful::loading_state_version); + } +} + int ARDOUR::cleanup () { delete Library; lrdf_cleanup (); delete &ControlProtocolManager::instance(); +#ifdef VST_SUPPORT + fst_exit (); +#endif return 0; } - -microseconds_t -ARDOUR::get_microseconds () -{ - /* XXX need JACK to export its functionality */ - - struct timeval now; - gettimeofday (&now, 0); - return now.tv_sec * 1000000ULL + now.tv_usec; -} - ARDOUR::Change ARDOUR::new_change () { @@ -375,155 +428,100 @@ ARDOUR::get_ardour_revision () return "$Rev$"; } -string -ARDOUR::get_user_ardour_path () +void +ARDOUR::find_bindings_files (map& files) { - string path; - char* envvar; - - if ((envvar = getenv ("HOME")) == 0 || strlen (envvar) == 0) { - return "/"; - } - - path = envvar; - path += "/.ardour2/"; + vector found; + SearchPath spath = ardour_search_path() + user_config_directory() + system_config_search_path(); - /* create it if necessary */ + 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); + } - if (g_mkdir_with_parents (path.c_str (), 0755)) { - throw exception (); + if (found.empty()) { + return; } - return path; + for (vector::iterator x = found.begin(); x != found.end(); ++x) { + sys::path path = *x; + pair namepath; + namepath.second = path.to_string(); + namepath.first = path.leaf().substr (0, path.leaf().find_first_of ('.')); + files.insert (namepath); + } } -string -ARDOUR::get_system_data_path () +bool +ARDOUR::no_auto_connect() { - string path; - - char *envvar; - - if ((envvar = getenv ("ARDOUR_DATA_PATH")) != 0) { - path = envvar; - } else { - path += DATA_DIR; - path += "/ardour2/"; - } - - return path; + return getenv ("ARDOUR_NO_AUTOCONNECT") != 0; } -string -ARDOUR::get_system_module_path () +void +ARDOUR::setup_fpu () { - string path; - char *envvar; - if ((envvar = getenv ("ARDOUR_MODULE_PATH")) != 0) { - path = envvar; - } else { - path += MODULE_DIR; - path += "/ardour2/"; + if (getenv ("ARDOUR_RUNNING_UNDER_VALGRIND")) { + // valgrind doesn't understand this assembler stuff + // September 10th, 2007 + return; } - - return path; -} -static string -find_file (string name, string dir, string subdir = "") -{ - string path; - char* envvar = getenv("ARDOUR_PATH"); - - /* 1st attempt: any directory in ARDOUR_PATH */ - - if (envvar != 0) { - - vector split_path; - - split (envvar, split_path, ':'); - - for (vector::iterator i = split_path.begin(); i != split_path.end(); ++i) { - path = *i; - path += "/" + name; - if (access (path.c_str(), R_OK) == 0) { - // cerr << "Using file " << path << " found in ARDOUR_PATH." << endl; - return path; - } - } - } +#if defined(ARCH_X86) && defined(USE_XMMINTRIN) - /* 2nd attempt: ~/.ardour/ */ + int MXCSR; + FPU fpu; - path = get_user_ardour_path(); - - if (subdir.length()) { - path += subdir + "/"; - } - - path += name; - if (access (path.c_str(), R_OK) == 0) { - return path; - } + /* XXX use real code to determine if the processor supports + DenormalsAreZero and FlushToZero + */ - /* 3rd attempt: dir/... */ - - path = dir; - path += "/ardour2/"; - - if (subdir.length()) { - path += subdir + "/"; - } - - 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, string subdir) -{ - 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, subdir); -} + _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 (nframes_t sa, nframes_t ea, +ARDOUR::coverage (nframes_t sa, nframes_t ea, nframes_t sb, nframes_t eb) { /* OverlapType returned reflects how the second (B) @@ -548,7 +546,7 @@ ARDOUR::coverage (nframes_t sa, nframes_t ea, |-----------------| B - "B is internal to A" + "B is internal to A" */ #ifdef OLD_COVERAGE @@ -564,7 +562,7 @@ ARDOUR::coverage (nframes_t sa, nframes_t ea, ----| B -----------------------| B --| B - + "B overlaps the start of A" */ @@ -572,21 +570,21 @@ ARDOUR::coverage (nframes_t sa, nframes_t ea, 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 @@ -601,26 +599,3 @@ ARDOUR::coverage (nframes_t sa, nframes_t ea, return OverlapNone; } -/* not sure where to put these */ - -template -std::istream& int_to_type (std::istream& o, T& hf) { - int val; - o >> val; - hf = (T) val; - return o; -} - -std::istream& operator>>(std::istream& o, HeaderFormat& var) { return int_to_type (o, var); } -std::istream& operator>>(std::istream& o, SampleFormat& var) { return int_to_type (o, var); } -std::istream& operator>>(std::istream& o, AutoConnectOption& var) { return int_to_type (o, var); } -std::istream& operator>>(std::istream& o, MonitorModel& var) { return int_to_type (o, var); } -std::istream& operator>>(std::istream& o, EditMode& var) { return int_to_type (o, var); } -std::istream& operator>>(std::istream& o, SoloModel& var) { return int_to_type (o, var); } -std::istream& operator>>(std::istream& o, LayerModel& var) { return int_to_type (o, var); } -std::istream& operator>>(std::istream& o, CrossfadeModel& var) { return int_to_type (o, var); } -std::istream& operator>>(std::istream& o, SlaveSource& var) { return int_to_type (o, var); } -std::istream& operator>>(std::istream& o, ShuttleBehaviour& var) { return int_to_type (o, var); } -std::istream& operator>>(std::istream& o, ShuttleUnits& var) { return int_to_type (o, var); } -std::istream& operator>>(std::istream& o, SmpteFormat& var) { return int_to_type (o, var); } -