/*
- font-config.cc -- implement FontConfig related functions
+ This file is part of LilyPond, the GNU music typesetter.
- source file of the GNU LilyPond music typesetter
+ Copyright (C) 2005--2015 Han-Wen Nienhuys <hanwen@xs4all.nl>
- (c) 2005--2006 Han-Wen Nienhuys <hanwen@xs4all.nl>
+ LilyPond 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 3 of the License, or
+ (at your option) any later version.
+
+ LilyPond is distributed in the hope that it will be useful,
+ but WITHOUT ANY WARRANTY; without even the implied warranty of
+ MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+ GNU General Public License for more details.
+
+ You should have received a copy of the GNU General Public License
+ along with LilyPond. If not, see <http://www.gnu.org/licenses/>.
*/
#include "config.hh"
#if HAVE_FONTCONFIG
+#include <cstdio>
#include <fontconfig/fontconfig.h>
#include <sys/stat.h>
#include "main.hh"
#include "warn.hh"
-
FcConfig *font_config_global = 0;
void
init_fontconfig ()
{
- if (be_verbose_global)
- message (_ ("Initializing FontConfig..."));
-
- font_config_global = FcInitLoadConfig ();
- FcChar8 *cache_file = FcConfigGetCache (font_config_global);
-
- /*
- This is a terrible kludge, but there is apparently no way for
- FontConfig to signal whether it needs to rescan directories.
- */
- if (cache_file
- && !is_file ((char const *)cache_file))
- message (_f ("Rebuilding FontConfig cache %s, this may take a while...", cache_file));
-
- vector<string> dirs;
-
- dirs.push_back (prefix_directory + "/fonts/otf/");
- dirs.push_back (prefix_directory + "/fonts/type1/");
-
- for (vsize i = 0; i < dirs.size (); i++)
+ debug_output (_ ("Initializing FontConfig..."));
+
+ /* TODO: Find a way for Fontconfig to update its cache, if needed. */
+ FcInitLoadConfig ();
+
+ /* Create an empty configuration */
+ font_config_global = FcConfigCreate ();
+
+ /* fontconfig conf files */
+ vector<string> confs;
+
+ /* LilyPond local fontconfig conf file 00
+ This file is loaded *before* fontconfig's default conf. */
+ confs.push_back (lilypond_datadir + "/fonts/00-lilypond-fonts.conf");
+
+ /* fontconfig's default conf file */
+ void *default_conf = FcConfigFilename (NULL);
+ confs.push_back (static_cast<char*>(default_conf));
+ FcStrFree(static_cast<FcChar8*>(default_conf));
+
+ /* LilyPond local fontconfig conf file 99
+ This file is loaded *after* fontconfig's default conf. */
+ confs.push_back (lilypond_datadir + "/fonts/99-lilypond-fonts.conf");
+
+ /* Load fontconfig conf files */
+ for (vector<string>::const_iterator it = confs.begin ();
+ it != confs.end ();
+ it++)
{
- string dir = dirs[i];
- if (!FcConfigAppFontAddDir (font_config_global, (FcChar8 *)dir.c_str ()))
- error (_f ("adding font directory: %s", dir.c_str ()));
- else if (be_verbose_global)
- message (_f ("adding font directory: %s", dir.c_str ()));
+ if (!FcConfigParseAndLoad (font_config_global,
+ (FcChar8 *)it->c_str (),
+ FcFalse))
+ error (_f ("failed to add fontconfig configuration file `%s'",
+ it->c_str ()));
+ else
+ debug_output (_f ("Adding fontconfig configuration file: %s",
+ it->c_str ()));
}
-
- if (be_verbose_global)
- progress_indication ("Building font database.\n");
+
+ /* Extra trailing slash suddenly breaks fontconfig (fc-cache 2.5.0)
+ on windows. */
+ string dir (lilypond_datadir + "/fonts/otf");
+
+ if (!FcConfigAppFontAddDir (font_config_global, (FcChar8 *)dir.c_str ()))
+ error (_f ("failed adding font directory: %s", dir.c_str ()));
+ else
+ debug_output (_f ("Adding font directory: %s", dir.c_str ()));
+
+ debug_output (_ ("Building font database..."));
+
FcConfigBuildFonts (font_config_global);
FcConfigSetCurrent (font_config_global);
- if (be_verbose_global)
- progress_indication ("\n");
- if (cache_file
- && !is_file ((char*)cache_file))
- {
- /* inhibit future messages. */
- FILE *f = fopen ((char*)cache_file, "w");
- if (f)
- fclose (f);
- }
-
+ debug_output ("\n");
+
}
#else