Cleanup: assert result of get_font().
[dcpomatic.git] / src / lib / font_config.cc
1 /*
2     Copyright (C) 2014-2023 Carl Hetherington <cth@carlh.net>
3
4     This file is part of DCP-o-matic.
5
6     DCP-o-matic is free software; you can redistribute it and/or modify
7     it under the terms of the GNU General Public License as published by
8     the Free Software Foundation; either version 2 of the License, or
9     (at your option) any later version.
10
11     DCP-o-matic is distributed in the hope that it will be useful,
12     but WITHOUT ANY WARRANTY; without even the implied warranty of
13     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14     GNU General Public License for more details.
15
16     You should have received a copy of the GNU General Public License
17     along with DCP-o-matic.  If not, see <http://www.gnu.org/licenses/>.
18
19 */
20
21
22 #include "dcpomatic_assert.h"
23 #include "dcpomatic_log.h"
24 #include "font.h"
25 #include "font_config.h"
26 #include "util.h"
27 #include <dcp/filesystem.h>
28 #include <fontconfig/fontconfig.h>
29 #include <boost/filesystem.hpp>
30 #include <boost/optional.hpp>
31
32
33 using std::shared_ptr;
34 using std::string;
35 using boost::optional;
36
37
38 FontConfig* FontConfig::_instance;
39
40
41 FontConfig::FontConfig()
42 {
43         _config = FcInitLoadConfigAndFonts();
44         FcConfigSetCurrent(_config);
45 }
46
47
48 FontConfig::~FontConfig()
49 {
50         for (auto file: _temp_files) {
51                 boost::system::error_code ec;
52                 dcp::filesystem::remove(file, ec);
53         }
54 }
55
56
57 string
58 FontConfig::make_font_available(shared_ptr<dcpomatic::Font> font)
59 {
60         auto existing = _available_fonts.find(font->content());
61         if (existing != _available_fonts.end()) {
62                 return existing->second;
63         }
64
65         boost::filesystem::path font_file = default_font_file();
66         if (font->file()) {
67                 font_file = *font->file();
68         } else if (font->data()) {
69                 /* This font only exists in memory (so far) but FontConfig doesn't have an API to add a font
70                  * from a memory buffer (AFAICS).
71                  * https://gitlab.freedesktop.org/fontconfig/fontconfig/-/issues/12
72                  * As a workaround, write the font data to a temporary file and use that.
73                  */
74                 font_file = boost::filesystem::temp_directory_path() / boost::filesystem::unique_path();
75                 _temp_files.push_back(font_file);
76                 font->data()->write(font_file);
77         }
78
79
80         /* Make this font available to DCP-o-matic */
81         optional<string> font_name;
82         FcConfigAppFontAddFile (_config, reinterpret_cast<FcChar8 const *>(font_file.string().c_str()));
83         auto pattern = FcPatternBuild (
84                 0, FC_FILE, FcTypeString, font_file.string().c_str(), static_cast<char *>(0)
85                 );
86         auto object_set = FcObjectSetBuild (FC_FAMILY, FC_STYLE, FC_LANG, FC_FILE, static_cast<char *> (0));
87         auto font_set = FcFontList (_config, pattern, object_set);
88         if (font_set) {
89                 for (int i = 0; i < font_set->nfont; ++i) {
90                         FcPattern* font = font_set->fonts[i];
91                         FcChar8* file;
92                         FcChar8* family;
93                         FcChar8* style;
94                         if (
95                                 FcPatternGetString (font, FC_FILE, 0, &file) == FcResultMatch &&
96                                 FcPatternGetString (font, FC_FAMILY, 0, &family) == FcResultMatch &&
97                                 FcPatternGetString (font, FC_STYLE, 0, &style) == FcResultMatch
98                                 ) {
99                                 font_name = reinterpret_cast<char const *> (family);
100                         }
101                 }
102
103                 FcFontSetDestroy (font_set);
104         }
105
106         FcObjectSetDestroy (object_set);
107         FcPatternDestroy (pattern);
108
109         DCPOMATIC_ASSERT(font_name);
110
111         /* We need to use the font object as the key, as we may be passed the same shared_ptr to a modified
112          * Font object in the future and in that case we need to load the new font.
113          */
114         _available_fonts[font->content()] = *font_name;
115
116         FcConfigBuildFonts(_config);
117         return *font_name;
118 }
119
120
121 optional<boost::filesystem::path>
122 FontConfig::system_font_with_name(string name)
123 {
124         optional<boost::filesystem::path> path;
125
126         LOG_GENERAL("Searching system for font %1", name);
127         auto pattern = FcNameParse(reinterpret_cast<FcChar8 const*>(name.c_str()));
128         auto object_set = FcObjectSetBuild(FC_FILE, nullptr);
129         auto font_set = FcFontList(_config, pattern, object_set);
130         if (font_set) {
131                 LOG_GENERAL("%1 candidate fonts found", font_set->nfont);
132                 for (int i = 0; i < font_set->nfont; ++i) {
133                         auto font = font_set->fonts[i];
134                         FcChar8* file;
135                         if (FcPatternGetString(font, FC_FILE, 0, &file) == FcResultMatch) {
136                                 path = boost::filesystem::path(reinterpret_cast<char*>(file));
137                                 LOG_GENERAL("Found %1", *path);
138                                 break;
139                         }
140                 }
141                 FcFontSetDestroy(font_set);
142         } else {
143                 LOG_GENERAL_NC("No candidate fonts found");
144         }
145
146         FcObjectSetDestroy(object_set);
147         FcPatternDestroy(pattern);
148
149         if (path) {
150                 LOG_GENERAL("Searched system for font %1, found %2", name, *path);
151         } else {
152                 LOG_GENERAL("Searched system for font %1; nothing found", name);
153         }
154
155         return path;
156 }
157
158
159 FontConfig *
160 FontConfig::instance()
161 {
162         if (!_instance) {
163                 _instance = new FontConfig();
164         }
165
166         return _instance;
167 }
168
169
170 void
171 FontConfig::drop()
172 {
173         delete _instance;
174         _instance = nullptr;
175 }
176