Remove unnecessary 0 checks before delete; see http://www.parashift.com/c++-faq-lite...
[ardour.git] / libs / ardour / globals.cc
index ba6a7383c8d3460e986b07709c8b468e81d170a9..8be2e3b8b643ef8a1e0a23d4229666ff4bcf8846 100644 (file)
@@ -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
 #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
 
+#ifdef HAVE_AUDIOUNITS
+#include <ardour/audio_unit.h>
+#endif
+
 #ifdef __SSE__
 #include <xmmintrin.h>
 #endif
 
+#include <glibmm/fileutils.h>
+#include <glibmm/miscutils.h>
+
 #include <lrdf.h>
 
 #include <pbd/error.h>
 #include <pbd/id.h>
 #include <pbd/strsplit.h>
 #include <pbd/fpu.h>
+#include <pbd/file_utils.h>
 
 #include <midi++/port.h>
-#include <midi++/port_request.h>
 #include <midi++/manager.h>
 #include <midi++/mmc.h>
 
 #include <ardour/ardour.h>
+#include <ardour/analyser.h>
 #include <ardour/audio_library.h>
 #include <ardour/configuration.h>
 #include <ardour/profile.h>
 #include <ardour/audiosource.h>
 #include <ardour/utils.h>
 #include <ardour/session.h>
+#include <ardour/source_factory.h>
 #include <ardour/control_protocol_manager.h>
 #include <ardour/audioengine.h>
+#include <ardour/filesystem_paths.h>
 
 #ifdef HAVE_LIBLO
 #include <ardour/osc.h>
@@ -64,7 +77,7 @@
 #if defined (__APPLE__)
        #include <Carbon/Carbon.h> // For Gestalt
 #endif
-       
+
 #include "i18n.h"
 
 ARDOUR::Configuration* ARDOUR::Config = 0;
@@ -79,9 +92,10 @@ 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 ();
@@ -89,181 +103,215 @@ 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;
+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<void,std::string> ARDOUR::BootMessage;
 
 #ifdef HAVE_LIBLO
 static int
 setup_osc ()
 {
        /* no real cost to creating this object, and it avoids
-          conditionals anywhere that uses it 
+          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
 
-int 
-ARDOUR::setup_midi (AudioEngine& engine)
+int
+ARDOUR::setup_midi ()
 {
-       std::map<string,Configuration::MidiPortDescriptor*>::iterator i;
-       int nports;
-
-       if ((nports = Config->midi_ports.size()) == 0) {
+       if (Config->midi_ports.size() == 0) {
                warning << _("no MIDI ports specified: no MMC or MTC control possible") << endmsg;
                return 0;
        }
 
-       MIDI::Manager::instance()->set_api_data(engine.jack());
-
-       for (i = Config->midi_ports.begin(); i != Config->midi_ports.end(); ++i) {
-               Configuration::MidiPortDescriptor* port_descriptor;
-
-               port_descriptor = (*i).second;
+       BootMessage (_("Configuring MIDI ports"));
 
-               MIDI::PortRequest request (port_descriptor->device, 
-                                          port_descriptor->tag, 
-                                          port_descriptor->mode, 
-                                          port_descriptor->type);
+       for (std::map<string,XMLNode>::iterator i = Config->midi_ports.begin(); i != Config->midi_ports.end(); ++i) {
+               MIDI::Manager::instance()->add_port (i->second);
+       }
 
-               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);
+       MIDI::Port* first;
+       const MIDI::Manager::PortMap& ports = MIDI::Manager::instance()->get_midi_ports();
 
-               nports++;
-       }
+       if (ports.size() > 1) {
 
-       if (nports > 1) {
+               first = ports.begin()->second;
 
                /* More than one port, so try using specific names for each port */
 
-               map<string,Configuration::MidiPortDescriptor *>::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 ("");
+                       default_mmc_port = first;
                }
 
                if (default_mtc_port == 0) {
-                       default_mtc_port = MIDI::Manager::instance()->port ("");
+                       default_mtc_port = first;
                }
 
                if (default_midi_port == 0) {
-                       default_midi_port = MIDI::Manager::instance()->port ("");
+                       default_midi_port = first;
                }
-               
-       } else {
+
+               if (default_midi_clock_port == 0) {
+                       default_midi_clock_port = first;
+               }
+
+       } 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 ("");
+               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;
-       FPU fpu;
+       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;
+                       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
-                        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;
+               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) {
-               
-               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;
-               
+
+               /* 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) {
 
-       setup_fpu ();
+               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
@@ -275,9 +323,14 @@ ARDOUR::init (bool use_vst, bool try_optimization)
 
        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 ()) {
@@ -300,11 +353,29 @@ ARDOUR::init (bool use_vst, bool try_optimization)
        }
 #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 ();
@@ -313,7 +384,7 @@ ARDOUR::init (bool use_vst, bool try_optimization)
        if ((node = Config->control_protocol_state()) != 0) {
                ControlProtocolManager::instance().set_state (*node);
        }
-       
+
        BoundsChanged = Change (StartChanged|PositionChanged|LengthChanged);
 
        return 0;
@@ -332,11 +403,7 @@ ARDOUR::cleanup ()
 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;
+       return (microseconds_t) jack_get_time ();
 }
 
 ARDOUR::Change
@@ -366,12 +433,39 @@ ARDOUR::get_ardour_revision ()
        return "$Rev$";
 }
 
+void
+ARDOUR::find_bindings_files (map<string,string>& files)
+{
+       vector<sys::path> found;
+       SearchPath spath = ardour_search_path() + user_config_directory() + system_config_search_path();
+
+       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 (found.empty()) {
+               return;
+       }
+
+       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);
+       }
+}
+
 ARDOUR::LocaleGuard::LocaleGuard (const char* str)
 {
        old = strdup (setlocale (LC_NUMERIC, NULL));
        if (strcmp (old, str)) {
                setlocale (LC_NUMERIC, str);
-       } 
+       }
 }
 
 ARDOUR::LocaleGuard::~LocaleGuard ()
@@ -383,6 +477,13 @@ ARDOUR::LocaleGuard::~LocaleGuard ()
 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;
@@ -391,7 +492,7 @@ ARDOUR::setup_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;
        }
@@ -415,7 +516,7 @@ ARDOUR::setup_fpu ()
                        MXCSR |= 0x8000;
                }
                break;
-               
+
        case DenormalFTZDAZ:
                if (fpu.has_flush_to_zero()) {
                        if (fpu.has_denormals_are_zero()) {
@@ -433,7 +534,7 @@ ARDOUR::setup_fpu ()
 }
 
 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)
@@ -458,7 +559,7 @@ ARDOUR::coverage (nframes_t sa, nframes_t ea,
                |-----------------|   B
 
 
-             "B is internal to A"              
+             "B is internal to A"
 
        */
 #ifdef OLD_COVERAGE
@@ -474,7 +575,7 @@ ARDOUR::coverage (nframes_t sa, nframes_t ea,
           ----|                      B
            -----------------------|   B
           --|                        B
-          
+
             "B overlaps the start of A"
 
        */
@@ -482,21 +583,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