Set active text in buffer_size combo in EngineControl dialog

[ardour.git] / gtk2_ardour / bundle_env_mingw.cc

diff --git a/gtk2_ardour/bundle_env_mingw.cc b/gtk2_ardour/bundle_env_mingw.cc
index 723e3cee0c318a51dcbf6a19077820ae8eeff9b7..0d977cabbaa2d07efd7d2a4dfee13c27dd06d9a5 100644 (file)
--- a/gtk2_ardour/bundle_env_mingw.cc
+++ b/gtk2_ardour/bundle_env_mingw.cc
@@ -18,13 +18,18 @@
 */
 
 #include <stdlib.h>
+#include <string>
 #include "bundle_env.h"
 #include "i18n.h"
 
 #include <glibmm.h>
 #include <fontconfig/fontconfig.h>
+#include <pango/pangoft2.h>
+#include <pango/pangocairo.h>
+
 #include <windows.h>
 #include <wingdi.h>
+#include <shlobj.h> // CSIDL_*
 
 #include "ardour/ardour.h"
 #include "ardour/search_paths.h"
@@ -32,13 +37,55 @@
 
 #include "pbd/file_utils.h"
 #include "pbd/epa.h"
+#include "pbd/windows_special_dirs.h"
 
 using namespace std;
 using namespace PBD;
 using namespace ARDOUR;
 
+
+/* query top-level Ardour installation path.
+ * Typically, this will be somehwere like
+ * "C:\Program Files (x86)\Ardour"
+ */
+const std::string
+get_install_path ()
+{
+       const gchar* pExeRoot = g_win32_get_package_installation_directory_of_module (0);
+
+       if (0 == pExeRoot) {
+               HKEY key;
+               DWORD size = PATH_MAX;
+               char tmp[PATH_MAX+1];
+               if (
+#ifdef __MINGW64__
+                               (ERROR_SUCCESS == RegOpenKeyExA (HKEY_LOCAL_MACHINE, "Software\\" PROGRAM_NAME "\\v" PROGRAM_VERSION "\\w64", 0, KEY_READ, &key))
+#else
+                               (ERROR_SUCCESS == RegOpenKeyExA (HKEY_LOCAL_MACHINE, "Software\\" PROGRAM_NAME "\\v" PROGRAM_VERSION "\\w32", 0, KEY_READ, &key))
+#endif
+                               &&(ERROR_SUCCESS == RegQueryValueExA (key, "Install_Dir", 0, NULL, reinterpret_cast<LPBYTE>(tmp), &size))
+                        )
+               {
+                       pExeRoot = Glib::locale_to_utf8(tmp).c_str();
+               }
+       }
+
+       if (0 == pExeRoot) {
+               const char *program_files = PBD::get_win_special_folder (CSIDL_PROGRAM_FILES);
+               if (program_files) {
+                       pExeRoot = g_build_filename(program_files, PROGRAM_NAME, NULL);
+               }
+       }
+
+       if (pExeRoot && Glib::file_test(pExeRoot, Glib::FILE_TEST_EXISTS|Glib::FILE_TEST_IS_DIR)) {
+               return std::string (pExeRoot);
+       }
+       return "";
+}
+
+
 void
-fixup_bundle_environment (int, char* [], const char** localedir)
+fixup_bundle_environment (int, char* [], string & localedir)
 {
        EnvironmentalProtectionAgency::set_global_epa (new EnvironmentalProtectionAgency (true));
        /* what to do ? */
@@ -48,9 +95,48 @@ fixup_bundle_environment (int, char* [], const char** localedir)
 
        // Unset GTK_RC_FILES so that only ardour specific files are loaded
        Glib::unsetenv ("GTK_RC_FILES");
+
+       std::string path;
+
+       if (ARDOUR::translations_are_enabled ()) {
+               path = windows_search_path().to_string();
+               path += "\\locale";
+               Glib::setenv ("GTK_LOCALEDIR", path, true);
+
+               // and return the same path to our caller
+               localedir = path;
+       }
+
+       const char *cstr;
+       cstr = getenv ("VAMP_PATH");
+       if (cstr) {
+               path = cstr;
+               path += G_SEARCHPATH_SEPARATOR;
+       } else {
+               path = "";
+       }
+       path += Glib::build_filename(ardour_dll_directory(), "vamp");
+       path += G_SEARCHPATH_SEPARATOR;
+       path += "%ProgramFiles%\\Vamp Plugins"; // default vamp path
+       path += G_SEARCHPATH_SEPARATOR;
+       path += "%COMMONPROGRAMFILES%\\Vamp Plugins";
+       Glib::setenv ("VAMP_PATH", path, true);
+
+       Glib::setenv ("SUIL_MODULE_DIR", Glib::build_filename(ardour_dll_directory(), "suil"), true);
+
+       /* XXX this should really be PRODUCT_EXE see tools/x-win/package.sh
+        * ardour on windows does not have a startup wrapper script.
+        *
+        * then again, there's probably nobody using NSM on windows.
+        * because neither nsmd nor the GUI is currently available for windows.
+        * furthermore it'll be even less common for derived products.
+        */
+       Glib::setenv ("ARDOUR_SELF", Glib::build_filename(ardour_dll_directory(), "ardour.exe"), true);
 }
 
-static __cdecl void unload_custom_fonts() {
+static __cdecl void
+unload_custom_fonts()
+{
        std::string ardour_mono_file;
        if (!find_file (ardour_data_search_path(), "ArdourMono.ttf", ardour_mono_file)) {
                return;
@@ -58,7 +144,8 @@ static __cdecl void unload_custom_fonts() {
        RemoveFontResource(ardour_mono_file.c_str());
 }
 
-void load_custom_fonts() 
+void
+load_custom_fonts()
 {
        std::string ardour_mono_file;
 
@@ -67,24 +154,25 @@ void load_custom_fonts()
                return;
        }
 
-       // pango with fontconfig backend
-       FcConfig *config = FcInitLoadConfigAndFonts();
-       FcBool ret = FcConfigAppFontAddFile(config, reinterpret_cast<const FcChar8*>(ardour_mono_file.c_str()));
+       if (pango_font_map_get_type() == PANGO_TYPE_FT2_FONT_MAP) {
+               FcConfig *config = FcInitLoadConfigAndFonts();
+               FcBool ret = FcConfigAppFontAddFile(config, reinterpret_cast<const FcChar8*>(ardour_mono_file.c_str()));
 
-       if (ret == FcFalse) {
-               cerr << _("Cannot load ArdourMono TrueType font.") << endl;
-       }
+               if (ret == FcFalse) {
+                       cerr << _("Cannot load ArdourMono TrueType font.") << endl;
+               }
 
-       ret = FcConfigSetCurrent(config);
-
-       if (ret == FcFalse) {
-               cerr << _("Failed to set fontconfig configuration.") << endl;
-       }
+               ret = FcConfigSetCurrent(config);
 
-       // pango with win32 backend
-       if (0 == AddFontResource(ardour_mono_file.c_str())) {
-               cerr << _("Cannot register ArdourMono TrueType font with windows gdi.") << endl;
+               if (ret == FcFalse) {
+                       cerr << _("Failed to set fontconfig configuration.") << endl;
+               }
        } else {
-               atexit (&unload_custom_fonts);
+               // pango with win32 backend
+               if (0 == AddFontResource(ardour_mono_file.c_str())) {
+                       cerr << _("Cannot register ArdourMono TrueType font with windows gdi.") << endl;
+               } else {
+                       atexit (&unload_custom_fonts);
+               }
        }
 }