X-Git-Url: https://main.carlh.net/gitweb/?a=blobdiff_plain;f=libs%2Fardour%2Fglobals.cc;h=04b4543b7163091407f9644d813fa09397ec54d5;hb=f8480d6392e6d0e61aa39e564904ba67822f711e;hp=375068b9156e3ada8b3e8799953f02aacdef1a89;hpb=4c509656223d3ed1f0fab504cb483090d38972f9;p=ardour.git diff --git a/libs/ardour/globals.cc b/libs/ardour/globals.cc index 375068b915..04b4543b71 100644 --- a/libs/ardour/globals.cc +++ b/libs/ardour/globals.cc @@ -1,6 +1,5 @@ /* - 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 @@ -15,55 +14,88 @@ 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$ */ #include // Needed so that libraptor (included in lrdf) won't complain #include #include +#include +#include #include #include #include +#include #ifdef VST_SUPPORT #include #endif +#ifdef HAVE_AUDIOUNITS +#include +#endif + +#ifdef __SSE__ +#include +#endif + +#include +#include + #include #include +#include +#include +#include +#include #include -#include #include #include #include +#include #include #include +#include #include -#include +#include #include #include +#include +#include +#include +#include + +#ifdef HAVE_LIBLO +#include +#endif #include +#include #if defined (__APPLE__) #include // For Gestalt #endif - + #include "i18n.h" ARDOUR::Configuration* 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; +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 (); @@ -71,103 +103,232 @@ 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; + +sigc::signal ARDOUR::BootMessage; -static int -setup_midi () +#ifdef HAVE_LIBLO +static int +setup_osc () { - std::map::iterator i; - int nports; + /* 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 ()) { + BootMessage (_("Starting OSC")); + return osc->start (); + } else { + return 0; + } +} +#endif - if ((nports = Config->midi_ports.size()) == 0) { +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) { - 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")) { default_mmc_port = MIDI::Manager::instance()->port (Config->get_mmc_port_name()); - } + } if (Config->get_mtc_port_name() != N_("default")) { default_mtc_port = MIDI::Manager::instance()->port (Config->get_mtc_port_name()); - } + } if (Config->get_midi_port_name() != N_("default")) { default_midi_port = MIDI::Manager::instance()->port (Config->get_midi_port_name()); - } - + } + + if (Config->get_midi_clock_port_name() != N_("default")) { + 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; } return 0; } +void +setup_hardware_optimization (bool try_optimization) +{ + bool generic_mix_functions = true; + + if (try_optimization) { + + FPU fpu; + +#if defined (ARCH_X86) && defined (BUILD_SSE_OPTIMIZATIONS) + + if (fpu.has_sse()) { + + 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; + + } + +#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; + } +#endif + + /* 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; + + 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 (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; + extern void setup_enum_writer (); (void) bindtextdomain(PACKAGE, LOCALEDIR); + 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 Configuration; if (Config->load_state ()) { @@ -176,81 +337,52 @@ ARDOUR::init (AudioEngine& engine, bool use_vst, bool try_optimization, void (*s Config->set_use_vst (use_vst); - if (setup_midi ()) { + Profile = new RuntimeProfile; + +#ifdef HAVE_LIBLO + if (setup_osc ()) { return -1; } +#endif #ifdef VST_SUPPORT - if (Config->get_use_vst() && fst_init (sighandler)) { + if (Config->get_use_vst() && fst_init ()) { return -1; } #endif - if (try_optimization) { - -#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; - - generic_mix_functions = false; +#ifdef HAVE_AUDIOUNITS + AUPluginInfo::load_cached_info (); +#endif - } + /* Make VAMP look in our library ahead of anything else */ - #elif defined (__APPLE__) - long sysVersion = 0; + char *p = getenv ("VAMP_PATH"); + string vamppath = VAMP_DIR; + if (p) { + vamppath += ':'; + vamppath += p; + } + setenv ("VAMP_PATH", vamppath.c_str(), 1); - 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; + setup_hardware_optimization (try_optimization); - generic_mix_functions = false; + SourceFactory::init (); + Analyser::init (); - info << "Apple VecLib H/W specific optimizations in use" << endmsg; - } -#endif - } + /* singleton - first object is "it" */ + new PluginManager (); - if (generic_mix_functions) { + /* singleton - first object is "it" */ + new ControlProtocolManager (); + 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); } - - lrdf_init(); - Library = new AudioLibrary; - /* singleton - first object is "it" */ - new PluginManager (engine); - BoundsChanged = Change (StartChanged|PositionChanged|LengthChanged); return 0; @@ -261,13 +393,15 @@ ARDOUR::cleanup () { delete Library; lrdf_cleanup (); + delete &ControlProtocolManager::instance(); return 0; } -ARDOUR::id_t -ARDOUR::new_id () + +microseconds_t +ARDOUR::get_microseconds () { - return get_uid(); + return (microseconds_t) jack_get_time (); } ARDOUR::Change @@ -276,73 +410,52 @@ ARDOUR::new_change () Change c; static uint32_t change_bit = 1; - /* XXX catch out-of-range */ + /* catch out-of-range */ + if (!change_bit) + { + fatal << _("programming error: ") + << "change_bit out of range in ARDOUR::new_change()" + << endmsg; + /*NOTREACHED*/ + } c = Change (change_bit); - change_bit <<= 1; + change_bit <<= 1; // if it shifts too far, change_bit == 0 return c; } -static string -find_file (string name, string dir) +string +ARDOUR::get_ardour_revision () { - string path; - - /* stop A: ~/.ardour/... */ - - path = getenv ("HOME"); - - if (path.length()) { - - path += "/.ardour/"; - - /* try to ensure that the directory exists. - failure doesn't mean much here. - */ - - mkdir (path.c_str(), 0755); - - path += name; - - if (access (path.c_str(), R_OK) == 0) { - return path; - } - } - - /* stop B: dir/... */ - - path = dir; - path += "/ardour/"; - path += name; - - if (access (path.c_str(), R_OK) == 0) { - return path; - } - - return ""; + return "$Rev$"; } -string -ARDOUR::find_config_file (string name) +void +ARDOUR::find_bindings_files (map& files) { - char* envvar; - if ((envvar = getenv("ARDOUR_CONFIG_PATH")) == 0) { - envvar = CONFIG_DIR; - } + vector found; + SearchPath spath = ardour_search_path() + user_config_directory() + system_config_search_path(); - return find_file (name, envvar); -} + 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); + } -string -ARDOUR::find_data_file (string name) -{ - char* envvar; - if ((envvar = getenv("ARDOUR_DATA_PATH")) == 0) { - envvar = DATA_DIR; + if (found.empty()) { + return; } - return find_file (name, envvar); + 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); + } } ARDOUR::LocaleGuard::LocaleGuard (const char* str) @@ -350,7 +463,7 @@ ARDOUR::LocaleGuard::LocaleGuard (const char* str) old = strdup (setlocale (LC_NUMERIC, NULL)); if (strcmp (old, str)) { setlocale (LC_NUMERIC, str); - } + } } ARDOUR::LocaleGuard::~LocaleGuard () @@ -359,9 +472,68 @@ ARDOUR::LocaleGuard::~LocaleGuard () free ((char*)old); } +void +ARDOUR::setup_fpu () +{ + + if (getenv ("ARDOUR_RUNNING_UNDER_VALGRIND")) { + // valgrind doesn't understand this assembler stuff + // September 10th, 2007 + return; + } + +#if defined(ARCH_X86) && defined(USE_XMMINTRIN) + + int MXCSR; + FPU fpu; + + /* XXX use real code to determine if the processor supports + DenormalsAreZero and FlushToZero + */ + + if (!fpu.has_flush_to_zero() && !fpu.has_denormals_are_zero()) { + return; + } + + MXCSR = _mm_getcsr(); + + switch (Config->get_denormal_model()) { + case DenormalNone: + MXCSR &= ~(_MM_FLUSH_ZERO_ON|0x8000); + break; + + case DenormalFTZ: + if (fpu.has_flush_to_zero()) { + MXCSR |= _MM_FLUSH_ZERO_ON; + } + break; + + 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; + } + + _mm_setcsr (MXCSR); + +#endif +} + ARDOUR::OverlapType -ARDOUR::coverage (jack_nframes_t sa, jack_nframes_t ea, - jack_nframes_t sb, jack_nframes_t eb) +ARDOUR::coverage (nframes_t sa, nframes_t ea, + nframes_t sb, nframes_t eb) { /* OverlapType returned reflects how the second (B) range overlaps the first (A). @@ -385,7 +557,7 @@ ARDOUR::coverage (jack_nframes_t sa, jack_nframes_t ea, |-----------------| B - "B is internal to A" + "B is internal to A" */ #ifdef OLD_COVERAGE @@ -401,7 +573,7 @@ ARDOUR::coverage (jack_nframes_t sa, jack_nframes_t ea, ----| B -----------------------| B --| B - + "B overlaps the start of A" */ @@ -409,21 +581,21 @@ ARDOUR::coverage (jack_nframes_t sa, jack_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 @@ -438,3 +610,28 @@ ARDOUR::coverage (jack_nframes_t sa, jack_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, RemoteModel& 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); } +std::istream& operator>>(std::istream& o, DenormalModel& var) { return int_to_type (o, var); } +