gtk2_ardour/bundle_env_mingw.cc

   1 /*
   2  * Copyright (C) 2014-2015 Robin Gareus <robin@gareus.org>
   3  * Copyright (C) 2014-2016 Paul Davis <paul@linuxaudiosystems.com>
   4  *
   5  * This program is free software; you can redistribute it and/or modify
   6  * it under the terms of the GNU General Public License as published by
   7  * the Free Software Foundation; either version 2 of the License, or
   8  * (at your option) any later version.
   9  *
  10  * This program is distributed in the hope that it will be useful,
  11  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  13  * GNU General Public License for more details.
  14  *
  15  * You should have received a copy of the GNU General Public License along
  16  * with this program; if not, write to the Free Software Foundation, Inc.,
  17  * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
  18  */
  19
  20 #include <stdlib.h>
  21 #include <string>
  22 #include "bundle_env.h"
  23 #include "pbd/i18n.h"
  24
  25 #include <glibmm.h>
  26 #include <fontconfig/fontconfig.h>
  27 #include <pango/pangoft2.h>
  28 #include <pango/pangocairo.h>
  29
  30 #include <windows.h>
  31 #include <wingdi.h>
  32
  33 #include "ardour/ardour.h"
  34 #include "ardour/search_paths.h"
  35 #include "ardour/filesystem_paths.h"
  36
  37 #include "pbd/file_utils.h"
  38 #include "pbd/epa.h"
  39
  40 using namespace std;
  41 using namespace PBD;
  42 using namespace ARDOUR;
  43
  44 void
  45 fixup_bundle_environment (int, char* [], string & localedir)
  46 {
  47         EnvironmentalProtectionAgency::set_global_epa (new EnvironmentalProtectionAgency (true));
  48         /* what to do ? */
  49         // we should at least set ARDOUR_DATA_PATH to prevent the warning message.
  50         // setting a FONTCONFIG_FILE won't hurt either see bundle_env_msvc.cc
  51         // (pangocairo prefers the windows gdi backend unless PANGOCAIRO_BACKEND=fc is set)
  52
  53         // Unset GTK2_RC_FILES so that only ardour specific files are loaded
  54         Glib::unsetenv ("GTK2_RC_FILES");
  55
  56         std::string path;
  57
  58         if (ARDOUR::translations_are_enabled ()) {
  59                 path = windows_search_path().to_string();
  60                 path += "\\locale";
  61                 Glib::setenv ("GTK_LOCALEDIR", path, true);
  62
  63                 // and return the same path to our caller
  64                 localedir = path;
  65         }
  66
  67         const char *cstr;
  68         cstr = getenv ("VAMP_PATH");
  69         if (cstr) {
  70                 path = cstr;
  71                 path += G_SEARCHPATH_SEPARATOR;
  72         } else {
  73                 path = "";
  74         }
  75         path += Glib::build_filename(ardour_dll_directory(), "vamp");
  76         path += G_SEARCHPATH_SEPARATOR;
  77         path += "%ProgramFiles%\\Vamp Plugins"; // default vamp path
  78         path += G_SEARCHPATH_SEPARATOR;
  79         path += "%COMMONPROGRAMFILES%\\Vamp Plugins";
  80         Glib::setenv ("VAMP_PATH", path, true);
  81
  82         Glib::setenv ("SUIL_MODULE_DIR", Glib::build_filename(ardour_dll_directory(), "suil"), true);
  83
  84         /* XXX this should really be PRODUCT_EXE see tools/x-win/package.sh
  85          * ardour on windows does not have a startup wrapper script.
  86          *
  87          * then again, there's probably nobody using NSM on windows.
  88          * because neither nsmd nor the GUI is currently available for windows.
  89          * furthermore it'll be even less common for derived products.
  90          */
  91         Glib::setenv ("ARDOUR_SELF", Glib::build_filename(ardour_dll_directory(), "ardour.exe"), true);
  92 }
  93
  94 static __cdecl void
  95 unload_custom_fonts()
  96 {
  97         std::string font_file;
  98         if (find_file (ardour_data_search_path(), "ArdourMono.ttf", font_file)) {
  99                 RemoveFontResource(font_file.c_str());
 100         }
 101         if (find_file (ardour_data_search_path(), "ArdourSans.ttf", font_file)) {
 102                 RemoveFontResource(font_file.c_str());
 103         }
 104 }
 105
 106 void
 107 load_custom_fonts()
 108 {
 109         std::string ardour_mono_file;
 110         std::string ardour_sans_file;
 111
 112         if (!find_file (ardour_data_search_path(), "ArdourMono.ttf", ardour_mono_file)) {
 113                 cerr << _("Cannot find ArdourMono TrueType font") << endl;
 114         }
 115
 116         if (!find_file (ardour_data_search_path(), "ArdourSans.ttf", ardour_sans_file)) {
 117                 cerr << _("Cannot find ArdourSans TrueType font") << endl;
 118         }
 119
 120         if (ardour_mono_file.empty () && ardour_sans_file.empty ()) {
 121                 return;
 122         }
 123
 124         if (pango_font_map_get_type() == PANGO_TYPE_FT2_FONT_MAP) {
 125                 FcConfig *config = FcInitLoadConfigAndFonts();
 126
 127                 if (!ardour_mono_file.empty () && FcFalse == FcConfigAppFontAddFile(config, reinterpret_cast<const FcChar8*>(ardour_mono_file.c_str()))) {
 128                         cerr << _("Cannot load ArdourMono TrueType font.") << endl;
 129                 }
 130
 131                 if (!ardour_sans_file.empty () && FcFalse == FcConfigAppFontAddFile(config, reinterpret_cast<const FcChar8*>(ardour_sans_file.c_str()))) {
 132                         cerr << _("Cannot load ArdourSans TrueType font.") << endl;
 133                 }
 134
 135                 if (FcFalse == FcConfigSetCurrent(config)) {
 136                         cerr << _("Failed to set fontconfig configuration.") << endl;
 137                 }
 138         } else {
 139                 // pango with win32 backend
 140                 if (0 == AddFontResource(ardour_mono_file.c_str())) {
 141                         cerr << _("Cannot register ArdourMono TrueType font with windows gdi.") << endl;
 142                 }
 143                 if (0 == AddFontResource(ardour_sans_file.c_str())) {
 144                         cerr << _("Cannot register ArdourSans TrueType font with windows gdi.") << endl;
 145                 }
 146                 atexit (&unload_custom_fonts);
 147         }
 148 }