Rename windows VST stuff with a Windows prefix.
[ardour.git] / gtk2_ardour / main.cc
index 6861b178d1c89d3125840c21de3d36c4a73bd8ad..6af714a02f1b423e08c8eec972386f8f4514c5c8 100644 (file)
@@ -1,6 +1,6 @@
 /*
     Copyright (C) 2001-2007 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
 
 #include <cstdlib>
 #include <signal.h>
+#include <cerrno>
+#include <fstream>
 
 #include <sigc++/bind.h>
 #include <gtkmm/settings.h>
 
 #include "pbd/error.h"
+#include "pbd/epa.h"
 #include "pbd/file_utils.h"
 #include "pbd/textreceiver.h"
 #include "pbd/failed_constructor.h"
 #include "pbd/pthread_utils.h"
+#ifdef BOOST_SP_ENABLE_DEBUG_HOOKS
+#include "pbd/boost_debug.h"
+#endif
 
 #include <jack/jack.h>
 
@@ -39,6 +45,7 @@
 #include "ardour/filesystem_paths.h"
 
 #include <gtkmm/main.h>
+#include <gtkmm2ext/application.h>
 #include <gtkmm2ext/popup.h>
 #include <gtkmm2ext/utils.h>
 
 
 #include "i18n.h"
 
+using namespace std;
 using namespace Gtk;
 using namespace ARDOUR_COMMAND_LINE;
 using namespace ARDOUR;
 using namespace PBD;
-using namespace sigc;
 
 TextReceiver text_receiver ("ardour");
 
@@ -66,10 +73,10 @@ static const char* localedir = LOCALEDIR;
 void
 gui_jack_error ()
 {
-       MessageDialog win (_("Ardour could not connect to JACK."),
-                    false,
-                    Gtk::MESSAGE_INFO,
-                    (Gtk::ButtonsType)(Gtk::BUTTONS_NONE));
+       MessageDialog win (string_compose (_("%1 could not connect to JACK."), PROGRAM_NAME),
+                          false,
+                          Gtk::MESSAGE_INFO,
+                          Gtk::BUTTONS_NONE);
 win.set_secondary_text(_("There are several possible reasons:\n\
 \n\
 1) JACK is not running.\n\
@@ -80,7 +87,7 @@ Please consider the possibilities, and perhaps (re)start JACK."));
 
        win.add_button (Stock::QUIT, RESPONSE_CLOSE);
        win.set_default_response (RESPONSE_CLOSE);
-       
+
        win.show_all ();
        win.set_position (Gtk::WIN_POS_CENTER);
 
@@ -93,28 +100,48 @@ Please consider the possibilities, and perhaps (re)start JACK."));
        win.run ();
 }
 
+static void export_search_path (const string& base_dir, const char* varname, const char* dir)
+{
+       string path;
+       const char * cstr = getenv (varname);
+
+       if (cstr) {
+               path = cstr;
+               path += ':';
+       } else {
+               path = "";
+       }
+       path += base_dir;
+       path += dir;
+
+       setenv (varname, path.c_str(), 1);
+}
 
 #ifdef __APPLE__
 
 #include <mach-o/dyld.h>
 #include <sys/param.h>
-#include <fstream>
+
+extern void set_language_preference (); // cocoacarbon.mm
 
 void
-fixup_bundle_environment ()
+fixup_bundle_environment (int, char* [])
 {
        if (!getenv ("ARDOUR_BUNDLED")) {
                return;
        }
 
+       EnvironmentalProtectionAgency::set_global_epa (new EnvironmentalProtectionAgency (true, "PREBUNDLE_ENV"));
+
+       set_language_preference ();
+
        char execpath[MAXPATHLEN+1];
        uint32_t pathsz = sizeof (execpath);
 
        _NSGetExecutablePath (execpath, &pathsz);
 
-       Glib::ustring exec_path (execpath);
-       Glib::ustring dir_path = Glib::path_get_dirname (exec_path);
-       Glib::ustring path;
+       std::string dir_path = Glib::path_get_dirname (execpath);
+       std::string path;
        const char *cstr = getenv ("PATH");
 
        /* ensure that we find any bundled executables (e.g. JACK),
@@ -123,6 +150,15 @@ fixup_bundle_environment ()
        */
 
        path = dir_path;
+
+       /* JACK is often in /usr/local/bin and since Info.plist refuses to
+          set PATH, we have to force this in order to discover a running
+          instance of JACK ...
+       */
+
+       path += ':';
+       path += "/usr/local/bin";
+
        if (cstr) {
                path += ':';
                path += cstr;
@@ -132,13 +168,15 @@ fixup_bundle_environment ()
        path = dir_path;
        path += "/../Resources";
        path += dir_path;
-       path += "/../Resources/Surfaces";
+       path += "/../Surfaces";
        path += dir_path;
-       path += "/../Resources/Panners";
+       path += "/../Panners";
 
        setenv ("ARDOUR_MODULE_PATH", path.c_str(), 1);
 
-       path = dir_path;
+       path = user_config_directory().to_string();
+       path += ':';
+       path += dir_path;
        path += "/../Resources/icons:";
        path += dir_path;
        path += "/../Resources/pixmaps:";
@@ -149,73 +187,40 @@ fixup_bundle_environment ()
 
        setenv ("ARDOUR_PATH", path.c_str(), 1);
        setenv ("ARDOUR_CONFIG_PATH", path.c_str(), 1);
-       setenv ("ARDOUR_DATA_PATH", path.c_str(), 1);
 
        path = dir_path;
        path += "/../Resources";
        setenv ("ARDOUR_INSTANT_XML_PATH", path.c_str(), 1);
 
-       cstr = getenv ("LADSPA_PATH");
-       if (cstr) {
-               path = cstr;
-               path += ':';
-       } else {
-               path = "";
-       }
-       path += dir_path;
-       path += "/../Plugins";
-       
-       setenv ("LADSPA_PATH", path.c_str(), 1);
-
-       cstr = getenv ("VAMP_PATH");
-       if (cstr) {
-               path = cstr;
-               path += ':';
-       } else {
-               path = "";
-       }
-       path += dir_path;
-       path += "/../Frameworks";
-       
-       setenv ("VAMP_PATH", path.c_str(), 1);
-
-       cstr = getenv ("ARDOUR_CONTROL_SURFACE_PATH");
-       if (cstr) {
-               path = cstr;
-               path += ':';
-       } else {
-               path = "";
-       }
-       path += dir_path;
-       path += "/../Surfaces";
-       
-       setenv ("ARDOUR_CONTROL_SURFACE_PATH", path.c_str(), 1);
-
-       cstr = getenv ("LV2_PATH");
-       if (cstr) {
-               path = cstr;
-               path += ':';
-       } else {
-               path = "";
-       }
-       path += dir_path;
-       path += "/../Plugins";
-       
-       setenv ("LV2_PATH", path.c_str(), 1);
+       export_search_path (dir_path, "LADSPA_PATH", "/../Plugins");
+       export_search_path (dir_path, "VAMP_PATH", "/../Frameworks");
+       export_search_path (dir_path, "ARDOUR_PANNER_PATH", "/../Panners");
+       export_search_path (dir_path, "ARDOUR_SURFACES_PATH", "/../Surfaces");
+       export_search_path (dir_path, "ARDOUR_MIDIMAPS_PATH", "/../MidiMaps");
+       export_search_path (dir_path, "ARDOUR_EXPORT_FORMATS_PATH", "/../ExportFormats");
 
        path = dir_path;
        path += "/../Frameworks/clearlooks";
 
        setenv ("GTK_PATH", path.c_str(), 1);
 
-       path = dir_path;
-       path += "/../Resources/locale";
-       
-       localedir = strdup (path.c_str());
+       /* unset GTK_RC_FILES so that we only load the RC files that we define
+        */
+
+       unsetenv ("GTK_RC_FILES");
+
+       if (!ARDOUR::translations_are_disabled ()) {
+
+               path = dir_path;
+               path += "/../Resources/locale";
+
+               localedir = strdup (path.c_str());
+               setenv ("GTK_LOCALEDIR", localedir, 1);
+       }
 
        /* write a pango.rc file and tell pango to use it. we'd love
-          to put this into the Ardour.app bundle and leave it there,
-          but the user may not have write permission. so ... 
+          to put this into the PROGRAM_NAME.app bundle and leave it there,
+          but the user may not have write permission. so ...
 
           we also have to make sure that the user ardour directory
           actually exists ...
@@ -227,7 +232,7 @@ fixup_bundle_environment ()
        catch (const sys::filesystem_error& ex) {
                error << _("Could not create user configuration directory") << endmsg;
        }
-       
+
        sys::path pangopath = user_config_directory();
        pangopath /= "pango.rc";
        path = pangopath.to_string();
@@ -243,7 +248,7 @@ fixup_bundle_environment ()
                pangopath /= "..";
                pangopath /= "Resources";
                pangopath /= "pango.modules";
-                       
+
                pangorc << pangopath.to_string() << endl;
 
                pangorc.close ();
@@ -256,7 +261,7 @@ fixup_bundle_environment ()
        setenv ("CHARSETALIASDIR", path.c_str(), 1);
 
        // font config
-       
+
        path = dir_path;
        path += "/../Resources/fonts.conf";
 
@@ -271,23 +276,186 @@ fixup_bundle_environment ()
 
        if (getenv ("ARDOUR_WITH_JACK")) {
                // JACK driver dir
-               
+
                path = dir_path;
                path += "/../Frameworks";
-               
+
                setenv ("JACK_DRIVER_DIR", path.c_str(), 1);
        }
 }
 
+#else
+
+void
+fixup_bundle_environment (int /*argc*/, char* argv[])
+{
+       if (!getenv ("ARDOUR_BUNDLED")) {
+               return;
+       }
+
+       EnvironmentalProtectionAgency::set_global_epa (new EnvironmentalProtectionAgency (true, "PREBUNDLE_ENV"));
+
+       Glib::ustring dir_path = Glib::path_get_dirname (Glib::path_get_dirname (argv[0]));
+       Glib::ustring path;
+       Glib::ustring userconfigdir = user_config_directory().to_string();
+
+       /* ensure that we find any bundled executables (e.g. JACK),
+          and find them before any instances of the same name
+          elsewhere in PATH
+       */
+
+       /* note that this function is POSIX/Linux specific, so using / as
+          a dir separator in this context is just fine.
+       */
+
+       path = dir_path;
+       path += "/etc:";
+       path += dir_path;
+       path += "/lib/surfaces:";
+       path += dir_path;
+       path += "/lib/panners:";
+
+       setenv ("ARDOUR_MODULE_PATH", path.c_str(), 1);
+
+       path = userconfigdir;
+       path += ':';
+       path += dir_path;
+       path += "/etc/icons:";
+       path += dir_path;
+       path += "/etc/pixmaps:";
+       path += dir_path;
+       path += "/share:";
+       path += dir_path;
+       path += "/etc";
+
+       setenv ("ARDOUR_PATH", path.c_str(), 1);
+       setenv ("ARDOUR_CONFIG_PATH", path.c_str(), 1);
+
+       path = dir_path;
+       path += "/etc";
+       setenv ("ARDOUR_INSTANT_XML_PATH", path.c_str(), 1);
+
+       export_search_path (dir_path, "LADSPA_PATH", "/../plugins");
+       export_search_path (dir_path, "VAMP_PATH", "/lib");
+       export_search_path (dir_path, "ARDOUR_PANNER_PATH", "/lib/panners");
+       export_search_path (dir_path, "ARDOUR_SURFACES_PATH", "/lib/surfaces");
+       export_search_path (dir_path, "ARDOUR_MIDIMAPS_PATH", "/share/midi_maps");
+       export_search_path (dir_path, "ARDOUR_EXPORT_FORMATS_PATH", "/share/export");
+
+       path = dir_path;
+       path += "/lib/clearlooks";
+       setenv ("GTK_PATH", path.c_str(), 1);
+
+       /* unset GTK_RC_FILES so that we only load the RC files that we define
+        */
+
+       unsetenv ("GTK_RC_FILES");
+
+       if (!ARDOUR::translations_are_disabled ()) {
+               path = dir_path;
+               path += "/share/locale";
+
+               localedir = strdup (path.c_str());
+               setenv ("GTK_LOCALEDIR", localedir, 1);
+       }
+
+       /* write a pango.rc file and tell pango to use it. we'd love
+          to put this into the Ardour.app bundle and leave it there,
+          but the user may not have write permission. so ...
+
+          we also have to make sure that the user ardour directory
+          actually exists ...
+       */
+
+       if (g_mkdir_with_parents (userconfigdir.c_str(), 0755) < 0) {
+               error << string_compose (_("cannot create user ardour folder %1 (%2)"), userconfigdir, strerror (errno))
+                     << endmsg;
+       } else {
+
+               Glib::ustring mpath;
+
+               path = Glib::build_filename (userconfigdir, "pango.rc");
+
+               std::ofstream pangorc (path.c_str());
+               if (!pangorc) {
+                       error << string_compose (_("cannot open pango.rc file %1") , path) << endmsg;
+               } else {
+                       mpath = Glib::build_filename (userconfigdir, "pango.modules");
+
+                       pangorc << "[Pango]\nModuleFiles=";
+                       pangorc << mpath << endl;
+                       pangorc.close ();
+               }
+
+               setenv ("PANGO_RC_FILE", path.c_str(), 1);
+
+               /* similar for GDK pixbuf loaders, but there's no RC file required
+                  to specify where it lives.
+               */
+
+               mpath = Glib::build_filename (userconfigdir, "gdk-pixbuf.loaders");
+               setenv ("GDK_PIXBUF_MODULE_FILE", mpath.c_str(), 1);
+       }
+}
+
 #endif
 
+static gboolean
+tell_about_jack_death (void* /* ignored */)
+{
+       if (AudioEngine::instance()->processed_frames() == 0) {
+               /* died during startup */
+               MessageDialog msg (_("JACK exited"), false);
+               msg.set_position (Gtk::WIN_POS_CENTER);
+               msg.set_secondary_text (string_compose (_(
+"JACK exited unexpectedly, and without notifying %1.\n\
+\n\
+This could be due to misconfiguration or to an error inside JACK.\n\
+\n\
+Click OK to exit %1."), PROGRAM_NAME));
+
+               msg.run ();
+               _exit (0);
+
+       } else {
+
+               /* engine has already run, so this is a mid-session JACK death */
+
+               MessageDialog* msg = manage (new MessageDialog (_("JACK exited"), false));
+               msg->set_secondary_text (string_compose (_(
+"JACK exited unexpectedly, and without notifying %1.\n\
+\n\
+This is probably due to an error inside JACK. You should restart JACK\n\
+and reconnect %1 to it, or exit %1 now. You cannot save your\n\
+session at this time, because we would lose your connection information.\n"), PROGRAM_NAME));
+               msg->present ();
+       }
+       return false; /* do not call again */
+}
+
 static void
-sigpipe_handler (int sig)
+sigpipe_handler (int /*signal*/)
 {
-       cerr << _("SIGPIPE received - JACK has probably died") << endl;
+       /* XXX fix this so that we do this again after a reconnect to JACK
+        */
+
+       static bool done_the_jack_thing = false;
+
+       if (!done_the_jack_thing) {
+               AudioEngine::instance()->died ();
+               g_idle_add (tell_about_jack_death, 0);
+               done_the_jack_thing =  true;
+       }
 }
 
-#ifdef VST_SUPPORT
+#ifdef HAVE_LV2
+void close_external_ui_windows();
+#endif
+
+#ifdef WINDOWS_VST_SUPPORT
+
+extern int windows_vst_gui_init (int* argc, char** argv[]);
+
 /* this is called from the entry point of a wine-compiled
    executable that is linked against gtk2_ardour built
    as a shared library.
@@ -298,15 +466,21 @@ int ardour_main (int argc, char *argv[])
 int main (int argc, char *argv[])
 #endif
 {
-       vector<Glib::ustring> null_file_list;
-       
-#ifdef __APPLE__
-       fixup_bundle_environment ();
-#endif
+       fixup_bundle_environment (argc, argv);
+
+       if (!Glib::thread_supported()) {
+               Glib::thread_init();
+       }
 
-        Glib::thread_init();
        gtk_set_locale ();
 
+#ifdef WINDOWS_VST_SUPPORT
+       /* this does some magic that is needed to make GTK and Wine's own
+          X11 client interact properly.
+       */
+       windows_vst_gui_init (&argc, &argv);
+#endif
+
        (void) bindtextdomain (PACKAGE, localedir);
        /* our i18n translations are all in UTF-8, so make sure
           that even if the user locale doesn't specify UTF-8,
@@ -324,6 +498,12 @@ int main (int argc, char *argv[])
        text_receiver.listen_to (fatal);
        text_receiver.listen_to (warning);
 
+#ifdef BOOST_SP_ENABLE_DEBUG_HOOKS
+       if (getenv ("BOOST_DEBUG")) {
+               boost_debug_shared_ptr_show_live_debugging (true);
+       }
+#endif
+
        if (parse_opts (argc, argv)) {
                exit (1);
        }
@@ -331,26 +511,26 @@ int main (int argc, char *argv[])
        if (curvetest_file) {
                return curvetest (curvetest_file);
        }
-       
-       cout << _("Ardour/GTK ") 
+
+       cout << PROGRAM_NAME
             << VERSIONSTRING
-            << _("\n   (built using ")
+            << _(" (built using ")
             << svn_revision
 #ifdef __GNUC__
-            << _(" and GCC version ") << __VERSION__ 
+            << _(" and GCC version ") << __VERSION__
 #endif
             << ')'
             << endl;
-       
+
        if (just_version) {
                exit (0);
        }
 
        if (no_splash) {
-               cerr << _("Copyright (C) 1999-2008 Paul Davis") << endl
+               cerr << _("Copyright (C) 1999-2011 Paul Davis") << endl
                     << _("Some portions Copyright (C) Steve Harris, Ari Johnson, Brett Viren, Joel Baker") << endl
                     << endl
-                    << _("Ardour comes with ABSOLUTELY NO WARRANTY") << endl
+                    << string_compose (_("%1 comes with ABSOLUTELY NO WARRANTY"), PROGRAM_NAME) << endl
                     << _("not even for MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.") << endl
                     << _("This is free software, and you are welcome to redistribute it ") << endl
                     << _("under certain conditions; see the source for copying conditions.")
@@ -362,10 +542,10 @@ int main (int argc, char *argv[])
        PBD::ID::init ();
 
        if (::signal (SIGPIPE, sigpipe_handler)) {
-               cerr << _("Cannot install SIGPIPE error handler") << endl;
+               cerr << _("Cannot xinstall SIGPIPE error handler") << endl;
        }
 
-        try { 
+       try {
                ui = new ARDOUR_UI (&argc, &argv);
        } catch (failed_constructor& err) {
                error << _("could not create ARDOUR GUI") << endmsg;
@@ -373,13 +553,18 @@ int main (int argc, char *argv[])
        }
 
        ui->run (text_receiver);
+       Gtkmm2ext::Application::instance()->cleanup();
        ui = 0;
 
        ARDOUR::cleanup ();
        pthread_cancel_all ();
+
+#ifdef HAVE_LV2
+       close_external_ui_windows();
+#endif
        return 0;
 }
-#ifdef VST_SUPPORT
+#ifdef WINDOWS_VST_SUPPORT
 } // end of extern C block
 #endif