1 /*
2 * fontconfig/src/fcfreetype.c
3 *
4 * Copyright © 2001 Keith Packard
5 *
6 * Permission to use, copy, modify, distribute, and sell this software and its
7 * documentation for any purpose is hereby granted without fee, provided that
8 * the above copyright notice appear in all copies and that both that
9 * copyright notice and this permission notice appear in supporting
10 * documentation, and that the name of the author(s) not be used in
11 * advertising or publicity pertaining to distribution of the software without
12 * specific, written prior permission. The authors make no
13 * representations about the suitability of this software for any purpose. It
14 * is provided "as is" without express or implied warranty.
15 *
16 * THE AUTHOR(S) DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE,
17 * INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO
18 * EVENT SHALL THE AUTHOR(S) BE LIABLE FOR ANY SPECIAL, INDIRECT OR
19 * CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE,
20 * DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER
21 * TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR
22 * PERFORMANCE OF THIS SOFTWARE.
23 */
24
25 #include "fcint.h"
26 #include "fcftint.h"
27 #include <stdlib.h>
28 #include <stdio.h>
29 #include <string.h>
30 #include <ft2build.h>
31 #include FT_FREETYPE_H
32 #include FT_ADVANCES_H
33 #include FT_TRUETYPE_TABLES_H
34 #include FT_SFNT_NAMES_H
35 #include FT_TRUETYPE_IDS_H
36 #include FT_TYPE1_TABLES_H
37 #if HAVE_FT_GET_X11_FONT_FORMAT
38 #include FT_XFREE86_H
39 #endif
40 #if HAVE_FT_GET_BDF_PROPERTY
41 #include FT_BDF_H
42 #include FT_MODULE_H
43 #endif
44 #include FT_MULTIPLE_MASTERS_H
45
46 #include "fcfoundry.h"
47 #include "ftglue.h"
48
49 /*
50 * Keep Han languages separated by eliminating languages
51 * that the codePageRange bits says aren't supported
52 */
53
54 static const struct {
55 char bit;
56 const FcChar8 lang[6];
57 } FcCodePageRange[] = {
58 { 17, "ja" },
59 { 18, "zh-cn" },
60 { 19, "ko" },
61 { 20, "zh-tw" },
62 };
63
64 #define NUM_CODE_PAGE_RANGE (int) (sizeof FcCodePageRange / sizeof FcCodePageRange[0])
65
66 FcBool
67 FcFreeTypeIsExclusiveLang (const FcChar8 *lang)
68 {
69 int i;
70
71 for (i = 0; i < NUM_CODE_PAGE_RANGE; i++)
72 {
73 if (FcLangCompare (lang, FcCodePageRange[i].lang) == FcLangEqual)
74 return FcTrue;
75 }
76 return FcFalse;
77 }
78
79 typedef struct {
80 const FT_UShort platform_id;
81 const FT_UShort encoding_id;
82 const char fromcode[12];
83 } FcFtEncoding;
84
85 #define TT_ENCODING_DONT_CARE 0xffff
86 #define FC_ENCODING_MAC_ROMAN "MACINTOSH"
87
88 static const FcFtEncoding fcFtEncoding[] = {
89 { TT_PLATFORM_APPLE_UNICODE, TT_ENCODING_DONT_CARE, "UTF-16BE" },
90 { TT_PLATFORM_MACINTOSH, TT_MAC_ID_ROMAN, "MACINTOSH" },
91 { TT_PLATFORM_MACINTOSH, TT_MAC_ID_JAPANESE, "SJIS" },
92 { TT_PLATFORM_MICROSOFT, TT_MS_ID_SYMBOL_CS, "UTF-16BE" },
93 { TT_PLATFORM_MICROSOFT, TT_MS_ID_UNICODE_CS, "UTF-16BE" },
94 { TT_PLATFORM_MICROSOFT, TT_MS_ID_SJIS, "SJIS-WIN" },
95 { TT_PLATFORM_MICROSOFT, TT_MS_ID_GB2312, "GB2312" },
96 { TT_PLATFORM_MICROSOFT, TT_MS_ID_BIG_5, "BIG-5" },
97 { TT_PLATFORM_MICROSOFT, TT_MS_ID_WANSUNG, "Wansung" },
98 { TT_PLATFORM_MICROSOFT, TT_MS_ID_JOHAB, "Johab" },
99 { TT_PLATFORM_MICROSOFT, TT_MS_ID_UCS_4, "UTF-16BE" },
100 { TT_PLATFORM_ISO, TT_ISO_ID_7BIT_ASCII, "ASCII" },
101 { TT_PLATFORM_ISO, TT_ISO_ID_10646, "UTF-16BE" },
102 { TT_PLATFORM_ISO, TT_ISO_ID_8859_1, "ISO-8859-1" },
103 };
104
105 #define NUM_FC_FT_ENCODING (int) (sizeof (fcFtEncoding) / sizeof (fcFtEncoding[0]))
106
107 typedef struct {
108 const FT_UShort platform_id;
109 const FT_UShort language_id;
110 const char lang[8];
111 } FcFtLanguage;
112
113 #define TT_LANGUAGE_DONT_CARE 0xffff
114
115 static const FcFtLanguage fcFtLanguage[] = {
116 { TT_PLATFORM_APPLE_UNICODE, TT_LANGUAGE_DONT_CARE, "" },
117 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_ENGLISH, "en" },
118 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_FRENCH, "fr" },
119 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_GERMAN, "de" },
120 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_ITALIAN, "it" },
121 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_DUTCH, "nl" },
122 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_SWEDISH, "sv" },
123 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_SPANISH, "es" },
124 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_DANISH, "da" },
125 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_PORTUGUESE, "pt" },
126 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_NORWEGIAN, "no" },
127 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_HEBREW, "he" },
128 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_JAPANESE, "ja" },
129 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_ARABIC, "ar" },
130 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_FINNISH, "fi" },
131 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_GREEK, "el" },
132 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_ICELANDIC, "is" },
133 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_MALTESE, "mt" },
134 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_TURKISH, "tr" },
135 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_CROATIAN, "hr" },
136 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_CHINESE_TRADITIONAL, "zh-tw" },
137 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_URDU, "ur" },
138 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_HINDI, "hi" },
139 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_THAI, "th" },
140 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_KOREAN, "ko" },
141 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_LITHUANIAN, "lt" },
142 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_POLISH, "pl" },
143 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_HUNGARIAN, "hu" },
144 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_ESTONIAN, "et" },
145 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_LETTISH, "lv" },
146 /* { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_SAAMISK, ??? */
147 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_FAEROESE, "fo" },
148 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_FARSI, "fa" },
149 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_RUSSIAN, "ru" },
150 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_CHINESE_SIMPLIFIED, "zh-cn" },
151 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_FLEMISH, "nl" },
152 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_IRISH, "ga" },
153 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_ALBANIAN, "sq" },
154 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_ROMANIAN, "ro" },
155 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_CZECH, "cs" },
156 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_SLOVAK, "sk" },
157 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_SLOVENIAN, "sl" },
158 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_YIDDISH, "yi" },
159 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_SERBIAN, "sr" },
160 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_MACEDONIAN, "mk" },
161 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_BULGARIAN, "bg" },
162 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_UKRAINIAN, "uk" },
163 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_BYELORUSSIAN, "be" },
164 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_UZBEK, "uz" },
165 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_KAZAKH, "kk" },
166 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_AZERBAIJANI, "az" },
167 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_AZERBAIJANI_CYRILLIC_SCRIPT, "az" },
168 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_AZERBAIJANI_ARABIC_SCRIPT, "ar" },
169 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_ARMENIAN, "hy" },
170 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_GEORGIAN, "ka" },
171 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_MOLDAVIAN, "mo" },
172 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_KIRGHIZ, "ky" },
173 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_TAJIKI, "tg" },
174 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_TURKMEN, "tk" },
175 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_MONGOLIAN, "mn" },
176 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_MONGOLIAN_MONGOLIAN_SCRIPT,"mn" },
177 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_MONGOLIAN_CYRILLIC_SCRIPT, "mn" },
178 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_PASHTO, "ps" },
179 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_KURDISH, "ku" },
180 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_KASHMIRI, "ks" },
181 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_SINDHI, "sd" },
182 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_TIBETAN, "bo" },
183 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_NEPALI, "ne" },
184 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_SANSKRIT, "sa" },
185 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_MARATHI, "mr" },
186 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_BENGALI, "bn" },
187 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_ASSAMESE, "as" },
188 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_GUJARATI, "gu" },
189 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_PUNJABI, "pa" },
190 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_ORIYA, "or" },
191 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_MALAYALAM, "ml" },
192 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_KANNADA, "kn" },
193 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_TAMIL, "ta" },
194 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_TELUGU, "te" },
195 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_SINHALESE, "si" },
196 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_BURMESE, "my" },
197 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_KHMER, "km" },
198 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_LAO, "lo" },
199 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_VIETNAMESE, "vi" },
200 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_INDONESIAN, "id" },
201 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_TAGALOG, "tl" },
202 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_MALAY_ROMAN_SCRIPT, "ms" },
203 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_MALAY_ARABIC_SCRIPT, "ms" },
204 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_AMHARIC, "am" },
205 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_TIGRINYA, "ti" },
206 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_GALLA, "om" },
207 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_SOMALI, "so" },
208 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_SWAHILI, "sw" },
209 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_RUANDA, "rw" },
210 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_RUNDI, "rn" },
211 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_CHEWA, "ny" },
212 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_MALAGASY, "mg" },
213 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_ESPERANTO, "eo" },
214 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_WELSH, "cy" },
215 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_BASQUE, "eu" },
216 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_CATALAN, "ca" },
217 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_LATIN, "la" },
218 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_QUECHUA, "qu" },
219 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_GUARANI, "gn" },
220 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_AYMARA, "ay" },
221 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_TATAR, "tt" },
222 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_UIGHUR, "ug" },
223 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_DZONGKHA, "dz" },
224 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_JAVANESE, "jw" },
225 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_SUNDANESE, "su" },
226
227 #if 0 /* these seem to be errors that have been dropped */
228
229 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_SCOTTISH_GAELIC },
230 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_IRISH_GAELIC },
231
232 #endif
233
234 /* The following codes are new as of 2000-03-10 */
235 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_GALICIAN, "gl" },
236 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_AFRIKAANS, "af" },
237 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_BRETON, "br" },
238 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_INUKTITUT, "iu" },
239 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_SCOTTISH_GAELIC, "gd" },
240 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_MANX_GAELIC, "gv" },
241 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_IRISH_GAELIC, "ga" },
242 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_TONGAN, "to" },
243 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_GREEK_POLYTONIC, "el" },
244 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_GREELANDIC, "ik" },
245 { TT_PLATFORM_MACINTOSH, TT_MAC_LANGID_AZERBAIJANI_ROMAN_SCRIPT,"az" },
246
247 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_ARABIC_SAUDI_ARABIA, "ar" },
248 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_ARABIC_IRAQ, "ar" },
249 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_ARABIC_EGYPT, "ar" },
250 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_ARABIC_LIBYA, "ar" },
251 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_ARABIC_ALGERIA, "ar" },
252 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_ARABIC_MOROCCO, "ar" },
253 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_ARABIC_TUNISIA, "ar" },
254 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_ARABIC_OMAN, "ar" },
255 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_ARABIC_YEMEN, "ar" },
256 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_ARABIC_SYRIA, "ar" },
257 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_ARABIC_JORDAN, "ar" },
258 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_ARABIC_LEBANON, "ar" },
259 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_ARABIC_KUWAIT, "ar" },
260 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_ARABIC_UAE, "ar" },
261 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_ARABIC_BAHRAIN, "ar" },
262 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_ARABIC_QATAR, "ar" },
263 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_BULGARIAN_BULGARIA, "bg" },
264 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_CATALAN_SPAIN, "ca" },
265 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_CHINESE_TAIWAN, "zh-tw" },
266 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_CHINESE_PRC, "zh-cn" },
267 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_CHINESE_HONG_KONG, "zh-hk" },
268 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_CHINESE_SINGAPORE, "zh-sg" },
269
270 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_CHINESE_MACAU, "zh-mo" },
271
272 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_CZECH_CZECH_REPUBLIC, "cs" },
273 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_DANISH_DENMARK, "da" },
274 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_GERMAN_GERMANY, "de" },
275 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_GERMAN_SWITZERLAND, "de" },
276 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_GERMAN_AUSTRIA, "de" },
277 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_GERMAN_LUXEMBOURG, "de" },
278 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_GERMAN_LIECHTENSTEI, "de" },
279 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_GREEK_GREECE, "el" },
280 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_ENGLISH_UNITED_STATES, "en" },
281 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_ENGLISH_UNITED_KINGDOM, "en" },
282 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_ENGLISH_AUSTRALIA, "en" },
283 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_ENGLISH_CANADA, "en" },
284 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_ENGLISH_NEW_ZEALAND, "en" },
285 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_ENGLISH_IRELAND, "en" },
286 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_ENGLISH_SOUTH_AFRICA, "en" },
287 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_ENGLISH_JAMAICA, "en" },
288 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_ENGLISH_CARIBBEAN, "en" },
289 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_ENGLISH_BELIZE, "en" },
290 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_ENGLISH_TRINIDAD, "en" },
291 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_ENGLISH_ZIMBABWE, "en" },
292 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_ENGLISH_PHILIPPINES, "en" },
293 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_SPANISH_SPAIN_TRADITIONAL_SORT,"es" },
294 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_SPANISH_MEXICO, "es" },
295 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_SPANISH_SPAIN_INTERNATIONAL_SORT,"es" },
296 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_SPANISH_GUATEMALA, "es" },
297 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_SPANISH_COSTA_RICA, "es" },
298 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_SPANISH_PANAMA, "es" },
299 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_SPANISH_DOMINICAN_REPUBLIC,"es" },
300 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_SPANISH_VENEZUELA, "es" },
301 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_SPANISH_COLOMBIA, "es" },
302 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_SPANISH_PERU, "es" },
303 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_SPANISH_ARGENTINA, "es" },
304 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_SPANISH_ECUADOR, "es" },
305 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_SPANISH_CHILE, "es" },
306 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_SPANISH_URUGUAY, "es" },
307 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_SPANISH_PARAGUAY, "es" },
308 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_SPANISH_BOLIVIA, "es" },
309 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_SPANISH_EL_SALVADOR, "es" },
310 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_SPANISH_HONDURAS, "es" },
311 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_SPANISH_NICARAGUA, "es" },
312 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_SPANISH_PUERTO_RICO, "es" },
313 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_FINNISH_FINLAND, "fi" },
314 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_FRENCH_FRANCE, "fr" },
315 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_FRENCH_BELGIUM, "fr" },
316 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_FRENCH_CANADA, "fr" },
317 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_FRENCH_SWITZERLAND, "fr" },
318 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_FRENCH_LUXEMBOURG, "fr" },
319 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_FRENCH_MONACO, "fr" },
320 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_HEBREW_ISRAEL, "he" },
321 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_HUNGARIAN_HUNGARY, "hu" },
322 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_ICELANDIC_ICELAND, "is" },
323 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_ITALIAN_ITALY, "it" },
324 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_ITALIAN_SWITZERLAND, "it" },
325 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_JAPANESE_JAPAN, "ja" },
326 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_KOREAN_EXTENDED_WANSUNG_KOREA,"ko" },
327 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_KOREAN_JOHAB_KOREA, "ko" },
328 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_DUTCH_NETHERLANDS, "nl" },
329 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_DUTCH_BELGIUM, "nl" },
330 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_NORWEGIAN_NORWAY_BOKMAL, "no" },
331 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_NORWEGIAN_NORWAY_NYNORSK, "nn" },
332 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_POLISH_POLAND, "pl" },
333 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_PORTUGUESE_BRAZIL, "pt" },
334 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_PORTUGUESE_PORTUGAL, "pt" },
335 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_RHAETO_ROMANIC_SWITZERLAND,"rm" },
336 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_ROMANIAN_ROMANIA, "ro" },
337 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_MOLDAVIAN_MOLDAVIA, "mo" },
338 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_RUSSIAN_RUSSIA, "ru" },
339 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_RUSSIAN_MOLDAVIA, "ru" },
340 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_CROATIAN_CROATIA, "hr" },
341 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_SERBIAN_SERBIA_LATIN, "sr" },
342 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_SERBIAN_SERBIA_CYRILLIC, "sr" },
343 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_SLOVAK_SLOVAKIA, "sk" },
344 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_ALBANIAN_ALBANIA, "sq" },
345 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_SWEDISH_SWEDEN, "sv" },
346 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_SWEDISH_FINLAND, "sv" },
347 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_THAI_THAILAND, "th" },
348 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_TURKISH_TURKEY, "tr" },
349 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_URDU_PAKISTAN, "ur" },
350 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_INDONESIAN_INDONESIA, "id" },
351 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_UKRAINIAN_UKRAINE, "uk" },
352 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_BELARUSIAN_BELARUS, "be" },
353 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_SLOVENE_SLOVENIA, "sl" },
354 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_ESTONIAN_ESTONIA, "et" },
355 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_LATVIAN_LATVIA, "lv" },
356 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_LITHUANIAN_LITHUANIA, "lt" },
357 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_CLASSIC_LITHUANIAN_LITHUANIA,"lt" },
358 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_MAORI_NEW_ZEALAND, "mi" },
359 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_FARSI_IRAN, "fa" },
360 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_VIETNAMESE_VIET_NAM, "vi" },
361 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_ARMENIAN_ARMENIA, "hy" },
362 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_AZERI_AZERBAIJAN_LATIN, "az" },
363 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_AZERI_AZERBAIJAN_CYRILLIC, "az" },
364 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_BASQUE_SPAIN, "eu" },
365 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_SORBIAN_GERMANY, "wen" },
366 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_MACEDONIAN_MACEDONIA, "mk" },
367 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_SUTU_SOUTH_AFRICA, "st" },
368 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_TSONGA_SOUTH_AFRICA, "ts" },
369 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_TSWANA_SOUTH_AFRICA, "tn" },
370 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_VENDA_SOUTH_AFRICA, "ven" },
371 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_XHOSA_SOUTH_AFRICA, "xh" },
372 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_ZULU_SOUTH_AFRICA, "zu" },
373 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_AFRIKAANS_SOUTH_AFRICA, "af" },
374 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_GEORGIAN_GEORGIA, "ka" },
375 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_FAEROESE_FAEROE_ISLANDS, "fo" },
376 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_HINDI_INDIA, "hi" },
377 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_MALTESE_MALTA, "mt" },
378 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_SAAMI_LAPONIA, "se" },
379
380 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_SCOTTISH_GAELIC_UNITED_KINGDOM,"gd" },
381 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_IRISH_GAELIC_IRELAND, "ga" },
382
383 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_MALAY_MALAYSIA, "ms" },
384 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_MALAY_BRUNEI_DARUSSALAM, "ms" },
385 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_KAZAK_KAZAKSTAN, "kk" },
386 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_SWAHILI_KENYA, "sw" },
387 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_UZBEK_UZBEKISTAN_LATIN, "uz" },
388 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_UZBEK_UZBEKISTAN_CYRILLIC, "uz" },
389 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_TATAR_TATARSTAN, "tt" },
390 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_BENGALI_INDIA, "bn" },
391 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_PUNJABI_INDIA, "pa" },
392 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_GUJARATI_INDIA, "gu" },
393 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_ORIYA_INDIA, "or" },
394 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_TAMIL_INDIA, "ta" },
395 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_TELUGU_INDIA, "te" },
396 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_KANNADA_INDIA, "kn" },
397 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_MALAYALAM_INDIA, "ml" },
398 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_ASSAMESE_INDIA, "as" },
399 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_MARATHI_INDIA, "mr" },
400 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_SANSKRIT_INDIA, "sa" },
401 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_KONKANI_INDIA, "kok" },
402
403 /* new as of 2001-01-01 */
404 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_ARABIC_GENERAL, "ar" },
405 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_CHINESE_GENERAL, "zh" },
406 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_ENGLISH_GENERAL, "en" },
407 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_FRENCH_WEST_INDIES, "fr" },
408 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_FRENCH_REUNION, "fr" },
409 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_FRENCH_CONGO, "fr" },
410
411 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_FRENCH_SENEGAL, "fr" },
412 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_FRENCH_CAMEROON, "fr" },
413 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_FRENCH_COTE_D_IVOIRE, "fr" },
414 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_FRENCH_MALI, "fr" },
415 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_BOSNIAN_BOSNIA_HERZEGOVINA,"bs" },
416 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_URDU_INDIA, "ur" },
417 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_TAJIK_TAJIKISTAN, "tg" },
418 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_YIDDISH_GERMANY, "yi" },
419 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_KIRGHIZ_KIRGHIZSTAN, "ky" },
420
421 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_TURKMEN_TURKMENISTAN, "tk" },
422 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_MONGOLIAN_MONGOLIA, "mn" },
423
424 /* the following seems to be inconsistent;
425 here is the current "official" way: */
426 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_TIBETAN_BHUTAN, "bo" },
427 /* and here is what is used by Passport SDK */
428 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_TIBETAN_CHINA, "bo" },
429 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_DZONGHKA_BHUTAN, "dz" },
430 /* end of inconsistency */
431
432 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_WELSH_WALES, "cy" },
433 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_KHMER_CAMBODIA, "km" },
434 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_LAO_LAOS, "lo" },
435 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_BURMESE_MYANMAR, "my" },
436 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_GALICIAN_SPAIN, "gl" },
437 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_MANIPURI_INDIA, "mni" },
438 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_SINDHI_INDIA, "sd" },
439 /* the following one is only encountered in Microsoft RTF specification */
440 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_KASHMIRI_PAKISTAN, "ks" },
441 /* the following one is not in the Passport list, looks like an omission */
442 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_KASHMIRI_INDIA, "ks" },
443 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_NEPALI_NEPAL, "ne" },
444 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_NEPALI_INDIA, "ne" },
445 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_FRISIAN_NETHERLANDS, "fy" },
446
447 /* new as of 2001-03-01 (from Office Xp) */
448 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_ENGLISH_HONG_KONG, "en" },
449 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_ENGLISH_INDIA, "en" },
450 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_ENGLISH_MALAYSIA, "en" },
451 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_ENGLISH_SINGAPORE, "en" },
452 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_SYRIAC_SYRIA, "syr" },
453 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_SINHALESE_SRI_LANKA, "si" },
454 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_CHEROKEE_UNITED_STATES, "chr" },
455 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_INUKTITUT_CANADA, "iu" },
456 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_AMHARIC_ETHIOPIA, "am" },
457 #if 0
458 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_TAMAZIGHT_MOROCCO },
459 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_TAMAZIGHT_MOROCCO_LATIN },
460 #endif
461 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_PASHTO_AFGHANISTAN, "ps" },
462 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_FILIPINO_PHILIPPINES, "phi" },
463 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_DHIVEHI_MALDIVES, "div" },
464
465 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_OROMO_ETHIOPIA, "om" },
466 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_TIGRIGNA_ETHIOPIA, "ti" },
467 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_TIGRIGNA_ERYTHREA, "ti" },
468
469 /* New additions from Windows Xp/Passport SDK 2001-11-10. */
470
471 /* don't ask what this one means... It is commented out currently. */
472 #if 0
473 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_GREEK_GREECE2 },
474 #endif
475
476 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_SPANISH_UNITED_STATES, "es" },
477 /* The following two IDs blatantly violate MS specs by using a */
478 /* sublanguage >,. */
479 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_SPANISH_LATIN_AMERICA, "es" },
480 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_FRENCH_NORTH_AFRICA, "fr" },
481
482 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_FRENCH_MOROCCO, "fr" },
483 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_FRENCH_HAITI, "fr" },
484 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_BENGALI_BANGLADESH, "bn" },
485 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_PUNJABI_ARABIC_PAKISTAN, "ar" },
486 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_MONGOLIAN_MONGOLIA_MONGOLIAN,"mn" },
487 #if 0
488 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_EDO_NIGERIA },
489 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_FULFULDE_NIGERIA },
490 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_IBIBIO_NIGERIA },
491 #endif
492 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_HAUSA_NIGERIA, "ha" },
493 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_YORUBA_NIGERIA, "yo" },
494 /* language codes from, to, are (still) unknown. */
495 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_IGBO_NIGERIA, "ibo" },
496 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_KANURI_NIGERIA, "kau" },
497 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_GUARANI_PARAGUAY, "gn" },
498 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_HAWAIIAN_UNITED_STATES, "haw" },
499 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_LATIN, "la" },
500 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_SOMALI_SOMALIA, "so" },
501 #if 0
502 /* Note: Yi does not have a (proper) ISO 639-2 code, since it is mostly */
503 /* not written (but OTOH the peculiar writing system is worth */
504 /* studying). */
505 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_YI_CHINA },
506 #endif
507 { TT_PLATFORM_MICROSOFT, TT_MS_LANGID_PAPIAMENTU_NETHERLANDS_ANTILLES,"pap" },
508 };
509
510 #define NUM_FC_FT_LANGUAGE (int) (sizeof (fcFtLanguage) / sizeof (fcFtLanguage[0]))
511
512 typedef struct {
513 FT_UShort language_id;
514 char fromcode[12];
515 } FcMacRomanFake;
516
517 static const FcMacRomanFake fcMacRomanFake[] = {
518 { TT_MS_LANGID_JAPANESE_JAPAN, "SJIS-WIN" },
519 { TT_MS_LANGID_ENGLISH_UNITED_STATES, "ASCII" },
520 };
521
522 static FcChar8 *
523 FcFontCapabilities(FT_Face face);
524
525 static FcBool
526 FcFontHasHint (FT_Face face);
527
528 static int
529 FcFreeTypeSpacing (FT_Face face);
530
531 #define NUM_FC_MAC_ROMAN_FAKE (int) (sizeof (fcMacRomanFake) / sizeof (fcMacRomanFake[0]))
532
533
534 /* From http://www.unicode.org/Public/MAPPINGS/VENDORS/APPLE/ROMAN.TXT */
535 static const FcChar16 fcMacRomanNonASCIIToUnicode[128] = {
536 /*0x80*/ 0x00C4, /* LATIN CAPITAL LETTER A WITH DIAERESIS */
537 /*0x81*/ 0x00C5, /* LATIN CAPITAL LETTER A WITH RING ABOVE */
538 /*0x82*/ 0x00C7, /* LATIN CAPITAL LETTER C WITH CEDILLA */
539 /*0x83*/ 0x00C9, /* LATIN CAPITAL LETTER E WITH ACUTE */
540 /*0x84*/ 0x00D1, /* LATIN CAPITAL LETTER N WITH TILDE */
541 /*0x85*/ 0x00D6, /* LATIN CAPITAL LETTER O WITH DIAERESIS */
542 /*0x86*/ 0x00DC, /* LATIN CAPITAL LETTER U WITH DIAERESIS */
543 /*0x87*/ 0x00E1, /* LATIN SMALL LETTER A WITH ACUTE */
544 /*0x88*/ 0x00E0, /* LATIN SMALL LETTER A WITH GRAVE */
545 /*0x89*/ 0x00E2, /* LATIN SMALL LETTER A WITH CIRCUMFLEX */
546 /*0x8A*/ 0x00E4, /* LATIN SMALL LETTER A WITH DIAERESIS */
547 /*0x8B*/ 0x00E3, /* LATIN SMALL LETTER A WITH TILDE */
548 /*0x8C*/ 0x00E5, /* LATIN SMALL LETTER A WITH RING ABOVE */
549 /*0x8D*/ 0x00E7, /* LATIN SMALL LETTER C WITH CEDILLA */
550 /*0x8E*/ 0x00E9, /* LATIN SMALL LETTER E WITH ACUTE */
551 /*0x8F*/ 0x00E8, /* LATIN SMALL LETTER E WITH GRAVE */
552 /*0x90*/ 0x00EA, /* LATIN SMALL LETTER E WITH CIRCUMFLEX */
553 /*0x91*/ 0x00EB, /* LATIN SMALL LETTER E WITH DIAERESIS */
554 /*0x92*/ 0x00ED, /* LATIN SMALL LETTER I WITH ACUTE */
555 /*0x93*/ 0x00EC, /* LATIN SMALL LETTER I WITH GRAVE */
556 /*0x94*/ 0x00EE, /* LATIN SMALL LETTER I WITH CIRCUMFLEX */
557 /*0x95*/ 0x00EF, /* LATIN SMALL LETTER I WITH DIAERESIS */
558 /*0x96*/ 0x00F1, /* LATIN SMALL LETTER N WITH TILDE */
559 /*0x97*/ 0x00F3, /* LATIN SMALL LETTER O WITH ACUTE */
560 /*0x98*/ 0x00F2, /* LATIN SMALL LETTER O WITH GRAVE */
561 /*0x99*/ 0x00F4, /* LATIN SMALL LETTER O WITH CIRCUMFLEX */
562 /*0x9A*/ 0x00F6, /* LATIN SMALL LETTER O WITH DIAERESIS */
563 /*0x9B*/ 0x00F5, /* LATIN SMALL LETTER O WITH TILDE */
564 /*0x9C*/ 0x00FA, /* LATIN SMALL LETTER U WITH ACUTE */
565 /*0x9D*/ 0x00F9, /* LATIN SMALL LETTER U WITH GRAVE */
566 /*0x9E*/ 0x00FB, /* LATIN SMALL LETTER U WITH CIRCUMFLEX */
567 /*0x9F*/ 0x00FC, /* LATIN SMALL LETTER U WITH DIAERESIS */
568 /*0xA0*/ 0x2020, /* DAGGER */
569 /*0xA1*/ 0x00B0, /* DEGREE SIGN */
570 /*0xA2*/ 0x00A2, /* CENT SIGN */
571 /*0xA3*/ 0x00A3, /* POUND SIGN */
572 /*0xA4*/ 0x00A7, /* SECTION SIGN */
573 /*0xA5*/ 0x2022, /* BULLET */
574 /*0xA6*/ 0x00B6, /* PILCROW SIGN */
575 /*0xA7*/ 0x00DF, /* LATIN SMALL LETTER SHARP S */
576 /*0xA8*/ 0x00AE, /* REGISTERED SIGN */
577 /*0xA9*/ 0x00A9, /* COPYRIGHT SIGN */
578 /*0xAA*/ 0x2122, /* TRADE MARK SIGN */
579 /*0xAB*/ 0x00B4, /* ACUTE ACCENT */
580 /*0xAC*/ 0x00A8, /* DIAERESIS */
581 /*0xAD*/ 0x2260, /* NOT EQUAL TO */
582 /*0xAE*/ 0x00C6, /* LATIN CAPITAL LETTER AE */
583 /*0xAF*/ 0x00D8, /* LATIN CAPITAL LETTER O WITH STROKE */
584 /*0xB0*/ 0x221E, /* INFINITY */
585 /*0xB1*/ 0x00B1, /* PLUS-MINUS SIGN */
586 /*0xB2*/ 0x2264, /* LESS-THAN OR EQUAL TO */
587 /*0xB3*/ 0x2265, /* GREATER-THAN OR EQUAL TO */
588 /*0xB4*/ 0x00A5, /* YEN SIGN */
589 /*0xB5*/ 0x00B5, /* MICRO SIGN */
590 /*0xB6*/ 0x2202, /* PARTIAL DIFFERENTIAL */
591 /*0xB7*/ 0x2211, /* N-ARY SUMMATION */
592 /*0xB8*/ 0x220F, /* N-ARY PRODUCT */
593 /*0xB9*/ 0x03C0, /* GREEK SMALL LETTER PI */
594 /*0xBA*/ 0x222B, /* INTEGRAL */
595 /*0xBB*/ 0x00AA, /* FEMININE ORDINAL INDICATOR */
596 /*0xBC*/ 0x00BA, /* MASCULINE ORDINAL INDICATOR */
597 /*0xBD*/ 0x03A9, /* GREEK CAPITAL LETTER OMEGA */
598 /*0xBE*/ 0x00E6, /* LATIN SMALL LETTER AE */
599 /*0xBF*/ 0x00F8, /* LATIN SMALL LETTER O WITH STROKE */
600 /*0xC0*/ 0x00BF, /* INVERTED QUESTION MARK */
601 /*0xC1*/ 0x00A1, /* INVERTED EXCLAMATION MARK */
602 /*0xC2*/ 0x00AC, /* NOT SIGN */
603 /*0xC3*/ 0x221A, /* SQUARE ROOT */
604 /*0xC4*/ 0x0192, /* LATIN SMALL LETTER F WITH HOOK */
605 /*0xC5*/ 0x2248, /* ALMOST EQUAL TO */
606 /*0xC6*/ 0x2206, /* INCREMENT */
607 /*0xC7*/ 0x00AB, /* LEFT-POINTING DOUBLE ANGLE QUOTATION MARK */
608 /*0xC8*/ 0x00BB, /* RIGHT-POINTING DOUBLE ANGLE QUOTATION MARK */
609 /*0xC9*/ 0x2026, /* HORIZONTAL ELLIPSIS */
610 /*0xCA*/ 0x00A0, /* NO-BREAK SPACE */
611 /*0xCB*/ 0x00C0, /* LATIN CAPITAL LETTER A WITH GRAVE */
612 /*0xCC*/ 0x00C3, /* LATIN CAPITAL LETTER A WITH TILDE */
613 /*0xCD*/ 0x00D5, /* LATIN CAPITAL LETTER O WITH TILDE */
614 /*0xCE*/ 0x0152, /* LATIN CAPITAL LIGATURE OE */
615 /*0xCF*/ 0x0153, /* LATIN SMALL LIGATURE OE */
616 /*0xD0*/ 0x2013, /* EN DASH */
617 /*0xD1*/ 0x2014, /* EM DASH */
618 /*0xD2*/ 0x201C, /* LEFT DOUBLE QUOTATION MARK */
619 /*0xD3*/ 0x201D, /* RIGHT DOUBLE QUOTATION MARK */
620 /*0xD4*/ 0x2018, /* LEFT SINGLE QUOTATION MARK */
621 /*0xD5*/ 0x2019, /* RIGHT SINGLE QUOTATION MARK */
622 /*0xD6*/ 0x00F7, /* DIVISION SIGN */
623 /*0xD7*/ 0x25CA, /* LOZENGE */
624 /*0xD8*/ 0x00FF, /* LATIN SMALL LETTER Y WITH DIAERESIS */
625 /*0xD9*/ 0x0178, /* LATIN CAPITAL LETTER Y WITH DIAERESIS */
626 /*0xDA*/ 0x2044, /* FRACTION SLASH */
627 /*0xDB*/ 0x20AC, /* EURO SIGN */
628 /*0xDC*/ 0x2039, /* SINGLE LEFT-POINTING ANGLE QUOTATION MARK */
629 /*0xDD*/ 0x203A, /* SINGLE RIGHT-POINTING ANGLE QUOTATION MARK */
630 /*0xDE*/ 0xFB01, /* LATIN SMALL LIGATURE FI */
631 /*0xDF*/ 0xFB02, /* LATIN SMALL LIGATURE FL */
632 /*0xE0*/ 0x2021, /* DOUBLE DAGGER */
633 /*0xE1*/ 0x00B7, /* MIDDLE DOT */
634 /*0xE2*/ 0x201A, /* SINGLE LOW-9 QUOTATION MARK */
635 /*0xE3*/ 0x201E, /* DOUBLE LOW-9 QUOTATION MARK */
636 /*0xE4*/ 0x2030, /* PER MILLE SIGN */
637 /*0xE5*/ 0x00C2, /* LATIN CAPITAL LETTER A WITH CIRCUMFLEX */
638 /*0xE6*/ 0x00CA, /* LATIN CAPITAL LETTER E WITH CIRCUMFLEX */
639 /*0xE7*/ 0x00C1, /* LATIN CAPITAL LETTER A WITH ACUTE */
640 /*0xE8*/ 0x00CB, /* LATIN CAPITAL LETTER E WITH DIAERESIS */
641 /*0xE9*/ 0x00C8, /* LATIN CAPITAL LETTER E WITH GRAVE */
642 /*0xEA*/ 0x00CD, /* LATIN CAPITAL LETTER I WITH ACUTE */
643 /*0xEB*/ 0x00CE, /* LATIN CAPITAL LETTER I WITH CIRCUMFLEX */
644 /*0xEC*/ 0x00CF, /* LATIN CAPITAL LETTER I WITH DIAERESIS */
645 /*0xED*/ 0x00CC, /* LATIN CAPITAL LETTER I WITH GRAVE */
646 /*0xEE*/ 0x00D3, /* LATIN CAPITAL LETTER O WITH ACUTE */
647 /*0xEF*/ 0x00D4, /* LATIN CAPITAL LETTER O WITH CIRCUMFLEX */
648 /*0xF0*/ 0xF8FF, /* Apple logo */
649 /*0xF1*/ 0x00D2, /* LATIN CAPITAL LETTER O WITH GRAVE */
650 /*0xF2*/ 0x00DA, /* LATIN CAPITAL LETTER U WITH ACUTE */
651 /*0xF3*/ 0x00DB, /* LATIN CAPITAL LETTER U WITH CIRCUMFLEX */
652 /*0xF4*/ 0x00D9, /* LATIN CAPITAL LETTER U WITH GRAVE */
653 /*0xF5*/ 0x0131, /* LATIN SMALL LETTER DOTLESS I */
654 /*0xF6*/ 0x02C6, /* MODIFIER LETTER CIRCUMFLEX ACCENT */
655 /*0xF7*/ 0x02DC, /* SMALL TILDE */
656 /*0xF8*/ 0x00AF, /* MACRON */
657 /*0xF9*/ 0x02D8, /* BREVE */
658 /*0xFA*/ 0x02D9, /* DOT ABOVE */
659 /*0xFB*/ 0x02DA, /* RING ABOVE */
660 /*0xFC*/ 0x00B8, /* CEDILLA */
661 /*0xFD*/ 0x02DD, /* DOUBLE ACUTE ACCENT */
662 /*0xFE*/ 0x02DB, /* OGONEK */
663 /*0xFF*/ 0x02C7, /* CARON */
664 };
665
666 #if USE_ICONV
667 #include <iconv.h>
668 #endif
669
670 /*
671 * A shift-JIS will have many high bits turned on
672 */
673 static FcBool
674 FcLooksLikeSJIS (FcChar8 *string, int len)
675 {
676 int nhigh = 0, nlow = 0;
677
678 while (len-- > 0)
679 {
680 if (*string++ & 0x80) nhigh++;
681 else nlow++;
682 }
683 /*
684 * Heuristic -- if more than 1/3 of the bytes have the high-bit set,
685 * this is likely to be SJIS and not ROMAN
686 */
687 if (nhigh * 2 > nlow)
688 return FcTrue;
689 return FcFalse;
690 }
691
692 static FcChar8 *
693 FcSfntNameTranscode (FT_SfntName *sname)
694 {
695 int i;
696 const char *fromcode;
697 #if USE_ICONV
698 iconv_t cd;
699 #endif
700 FcChar8 *utf8;
701
702 for (i = 0; i < NUM_FC_FT_ENCODING; i++)
703 if (fcFtEncoding[i].platform_id == sname->platform_id &&
704 (fcFtEncoding[i].encoding_id == TT_ENCODING_DONT_CARE ||
705 fcFtEncoding[i].encoding_id == sname->encoding_id))
706 break;
707 if (i == NUM_FC_FT_ENCODING)
708 return 0;
709 fromcode = fcFtEncoding[i].fromcode;
710
711 /*
712 * Many names encoded for TT_PLATFORM_MACINTOSH are broken
713 * in various ways. Kludge around them.
714 */
715 if (!strcmp (fromcode, FC_ENCODING_MAC_ROMAN))
716 {
717 if (sname->language_id == TT_MAC_LANGID_ENGLISH &&
718 FcLooksLikeSJIS (sname->string, sname->string_len))
719 {
720 fromcode = "SJIS";
721 }
722 else if (sname->language_id >= 0x100)
723 {
724 /*
725 * "real" Mac language IDs are all less than 150.
726 * Names using one of the MS language IDs are assumed
727 * to use an associated encoding (Yes, this is a kludge)
728 */
729 int f;
730
731 fromcode = NULL;
732 for (f = 0; f < NUM_FC_MAC_ROMAN_FAKE; f++)
733 if (fcMacRomanFake[f].language_id == sname->language_id)
734 {
735 fromcode = fcMacRomanFake[f].fromcode;
736 break;
737 }
738 if (!fromcode)
739 return 0;
740 }
741 }
742 if (!strcmp (fromcode, "UCS-2BE") || !strcmp (fromcode, "UTF-16BE"))
743 {
744 FcChar8 *src = sname->string;
745 int src_len = sname->string_len;
746 int len;
747 int wchar;
748 int ilen, olen;
749 FcChar8 *u8;
750 FcChar32 ucs4;
751
752 /*
753 * Convert Utf16 to Utf8
754 */
755
756 if (!FcUtf16Len (src, FcEndianBig, src_len, &len, &wchar))
757 return 0;
758
759 /*
760 * Allocate plenty of space. Freed below
761 */
762 utf8 = malloc (len * FC_UTF8_MAX_LEN + 1);
763 if (!utf8)
764 return 0;
765
766 u8 = utf8;
767
768 while ((ilen = FcUtf16ToUcs4 (src, FcEndianBig, &ucs4, src_len)) > 0)
769 {
770 src_len -= ilen;
771 src += ilen;
772 olen = FcUcs4ToUtf8 (ucs4, u8);
773 u8 += olen;
774 }
775 *u8 = '\0';
776 goto done;
777 }
778 if (!strcmp (fromcode, "ASCII") || !strcmp (fromcode, "ISO-8859-1"))
779 {
780 FcChar8 *src = sname->string;
781 int src_len = sname->string_len;
782 int olen;
783 FcChar8 *u8;
784 FcChar32 ucs4;
785
786 /*
787 * Convert Latin1 to Utf8. Freed below
788 */
789 utf8 = malloc (src_len * 2 + 1);
790 if (!utf8)
791 return 0;
792
793 u8 = utf8;
794 while (src_len > 0)
795 {
796 ucs4 = *src++;
797 src_len--;
798 olen = FcUcs4ToUtf8 (ucs4, u8);
799 u8 += olen;
800 }
801 *u8 = '\0';
802 goto done;
803 }
804 if (!strcmp (fromcode, FC_ENCODING_MAC_ROMAN))
805 {
806 FcChar8 *src = sname->string;
807 int src_len = sname->string_len;
808 int olen;
809 FcChar8 *u8;
810 FcChar32 ucs4;
811
812 /*
813 * Convert Latin1 to Utf8. Freed below
814 */
815 utf8 = malloc (src_len * 3 + 1);
816 if (!utf8)
817 return 0;
818
819 u8 = utf8;
820 while (src_len > 0)
821 {
822 ucs4 = *src++;
823 if (ucs4 >= 128)
824 ucs4 = fcMacRomanNonASCIIToUnicode[ucs4 - 128];
825 src_len--;
826 olen = FcUcs4ToUtf8 (ucs4, u8);
827 u8 += olen;
828 }
829 *u8 = '\0';
830 goto done;
831 }
832
833 #if USE_ICONV
834 cd = iconv_open ("UTF-8", fromcode);
835 if (cd && cd != (iconv_t) (-1))
836 {
837 size_t in_bytes_left = sname->string_len;
838 size_t out_bytes_left = sname->string_len * FC_UTF8_MAX_LEN;
839 char *inbuf, *outbuf;
840
841 utf8 = malloc (out_bytes_left + 1);
842 if (!utf8)
843 {
844 iconv_close (cd);
845 return 0;
846 }
847
848 outbuf = (char *) utf8;
849 inbuf = (char *) sname->string;
850
851 while (in_bytes_left)
852 {
853 size_t did = iconv (cd,
854 &inbuf, &in_bytes_left,
855 &outbuf, &out_bytes_left);
856 if (did == (size_t) (-1))
857 {
858 iconv_close (cd);
859 free (utf8);
860 return 0;
861 }
862 }
863 iconv_close (cd);
864 *outbuf = '\0';
865 goto done;
866 }
867 #endif
868 return 0;
869 done:
870 if (FcStrCmpIgnoreBlanksAndCase (utf8, (FcChar8 *) "") == 0)
871 {
872 free (utf8);
873 return 0;
874 }
875 return utf8;
876 }
877
878 static const FcChar8 *
879 FcSfntNameLanguage (FT_SfntName *sname)
880 {
881 int i;
882 FT_UShort platform_id = sname->platform_id;
883 FT_UShort language_id = sname->language_id;
884
885 /*
886 * Many names encoded for TT_PLATFORM_MACINTOSH are broken
887 * in various ways. Kludge around them.
888 */
889 if (platform_id == TT_PLATFORM_MACINTOSH &&
890 sname->encoding_id == TT_MAC_ID_ROMAN &&
891 FcLooksLikeSJIS (sname->string, sname->string_len))
892 {
893 language_id = TT_MAC_LANGID_JAPANESE;
894 }
895
896 for (i = 0; i < NUM_FC_FT_LANGUAGE; i++)
897 if (fcFtLanguage[i].platform_id == platform_id &&
898 (fcFtLanguage[i].language_id == TT_LANGUAGE_DONT_CARE ||
899 fcFtLanguage[i].language_id == language_id))
900 {
901 if (fcFtLanguage[i].lang[0] == '\0')
902 return NULL;
903 else
904 return (FcChar8 *) fcFtLanguage[i].lang;
905 }
906 return 0;
907 }
908
909 static const FcChar8 *
910 FcNoticeFoundry(const FT_String *notice)
911 {
912 int i;
913
914 if (notice)
915 for(i = 0; i < NUM_NOTICE_FOUNDRIES; i++)
916 {
917 const char *n = FcNoticeFoundries[i][0];
918 const char *f = FcNoticeFoundries[i][1];
919
920 if (strstr ((const char *) notice, n))
921 return (const FcChar8 *) f;
922 }
923 return 0;
924 }
925
926 typedef struct _FcStringConst {
927 const FcChar8 *name;
928 int value;
929 } FcStringConst;
930
931 static int
932 FcStringIsConst (const FcChar8 *string,
933 const FcStringConst *c,
934 int nc)
935 {
936 int i;
937
938 for (i = 0; i < nc; i++)
939 if (FcStrCmpIgnoreBlanksAndCase (string, c[i].name) == 0)
940 return c[i].value;
941 return -1;
942 }
943
944 static int
945 FcStringContainsConst (const FcChar8 *string,
946 const FcStringConst *c,
947 int nc)
948 {
949 int i;
950
951 for (i = 0; i < nc; i++)
952 {
953 if (c[i].name[0] == '<')
954 {
955 if (FcStrContainsWord (string, c[i].name + 1))
956 return c[i].value;
957 }
958 else
959 {
960 if (FcStrContainsIgnoreBlanksAndCase (string, c[i].name))
961 return c[i].value;
962 }
963 }
964 return -1;
965 }
966
967 typedef FcChar8 *FC8;
968
969 static const FcStringConst weightConsts[] = {
970 { (FC8) "thin", FC_WEIGHT_THIN },
971 { (FC8) "extralight", FC_WEIGHT_EXTRALIGHT },
972 { (FC8) "ultralight", FC_WEIGHT_ULTRALIGHT },
973 { (FC8) "demilight", FC_WEIGHT_DEMILIGHT },
974 { (FC8) "semilight", FC_WEIGHT_SEMILIGHT },
975 { (FC8) "light", FC_WEIGHT_LIGHT },
976 { (FC8) "book", FC_WEIGHT_BOOK },
977 { (FC8) "regular", FC_WEIGHT_REGULAR },
978 { (FC8) "normal", FC_WEIGHT_NORMAL },
979 { (FC8) "medium", FC_WEIGHT_MEDIUM },
980 { (FC8) "demibold", FC_WEIGHT_DEMIBOLD },
981 { (FC8) "demi", FC_WEIGHT_DEMIBOLD },
982 { (FC8) "semibold", FC_WEIGHT_SEMIBOLD },
983 { (FC8) "extrabold", FC_WEIGHT_EXTRABOLD },
984 { (FC8) "superbold", FC_WEIGHT_EXTRABOLD },
985 { (FC8) "ultrabold", FC_WEIGHT_ULTRABOLD },
986 { (FC8) "bold", FC_WEIGHT_BOLD },
987 { (FC8) "ultrablack", FC_WEIGHT_ULTRABLACK },
988 { (FC8) "superblack", FC_WEIGHT_EXTRABLACK },
989 { (FC8) "extrablack", FC_WEIGHT_EXTRABLACK },
990 { (FC8) "<ultra", FC_WEIGHT_ULTRABOLD }, /* only if a word */
991 { (FC8) "black", FC_WEIGHT_BLACK },
992 { (FC8) "heavy", FC_WEIGHT_HEAVY },
993 };
994
995 #define NUM_WEIGHT_CONSTS (int) (sizeof (weightConsts) / sizeof (weightConsts[0]))
996
997 #define FcIsWeight(s) FcStringIsConst(s,weightConsts,NUM_WEIGHT_CONSTS)
998 #define FcContainsWeight(s) FcStringContainsConst (s,weightConsts,NUM_WEIGHT_CONSTS)
999
1000 static const FcStringConst widthConsts[] = {
1001 { (FC8) "ultracondensed", FC_WIDTH_ULTRACONDENSED },
1002 { (FC8) "extracondensed", FC_WIDTH_EXTRACONDENSED },
1003 { (FC8) "semicondensed", FC_WIDTH_SEMICONDENSED },
1004 { (FC8) "condensed", FC_WIDTH_CONDENSED }, /* must be after *condensed */
1005 { (FC8) "normal", FC_WIDTH_NORMAL },
1006 { (FC8) "semiexpanded", FC_WIDTH_SEMIEXPANDED },
1007 { (FC8) "extraexpanded", FC_WIDTH_EXTRAEXPANDED },
1008 { (FC8) "ultraexpanded", FC_WIDTH_ULTRAEXPANDED },
1009 { (FC8) "expanded", FC_WIDTH_EXPANDED }, /* must be after *expanded */
1010 { (FC8) "extended", FC_WIDTH_EXPANDED },
1011 };
1012
1013 #define NUM_WIDTH_CONSTS (int) (sizeof (widthConsts) / sizeof (widthConsts[0]))
1014
1015 #define FcIsWidth(s) FcStringIsConst(s,widthConsts,NUM_WIDTH_CONSTS)
1016 #define FcContainsWidth(s) FcStringContainsConst (s,widthConsts,NUM_WIDTH_CONSTS)
1017
1018 static const FcStringConst slantConsts[] = {
1019 { (FC8) "italic", FC_SLANT_ITALIC },
1020 { (FC8) "kursiv", FC_SLANT_ITALIC },
1021 { (FC8) "oblique", FC_SLANT_OBLIQUE },
1022 };
1023
1024 #define NUM_SLANT_CONSTS (int) (sizeof (slantConsts) / sizeof (slantConsts[0]))
1025
1026 #define FcContainsSlant(s) FcStringContainsConst (s,slantConsts,NUM_SLANT_CONSTS)
1027
1028 static const FcStringConst decorativeConsts[] = {
1029 { (FC8) "shadow", FcTrue },
1030 { (FC8) "caps", FcTrue },
1031 { (FC8) "antiqua", FcTrue },
1032 { (FC8) "romansc", FcTrue },
1033 { (FC8) "embosed", FcTrue },
1034 { (FC8) "dunhill", FcTrue },
1035 };
1036
1037 #define NUM_DECORATIVE_CONSTS (int) (sizeof (decorativeConsts) / sizeof (decorativeConsts[0]))
1038
1039 #define FcContainsDecorative(s) FcStringContainsConst (s,decorativeConsts,NUM_DECORATIVE_CONSTS)
1040
1041 static double
1042 FcGetPixelSize (FT_Face face, int i)
1043 {
1044 #if HAVE_FT_GET_BDF_PROPERTY
1045 if (face->num_fixed_sizes == 1)
1046 {
1047 BDF_PropertyRec prop;
1048 int rc;
1049
1050 rc = FT_Get_BDF_Property (face, "PIXEL_SIZE", &prop);
1051 if (rc == 0 && prop.type == BDF_PROPERTY_TYPE_INTEGER)
1052 return (double) prop.u.integer;
1053 }
1054 #endif
1055 return (double) face->available_sizes[i].y_ppem / 64.0;
1056 }
1057
1058 static FcBool
1059 FcStringInPatternElement (FcPattern *pat, FcObject obj, const FcChar8 *string)
1060 {
1061 FcPatternIter iter;
1062 FcValueListPtr l;
1063
1064 FcPatternIterStart (pat, &iter);
1065 if (!FcPatternFindObjectIter (pat, &iter, obj))
1066 return FcFalse;
1067 for (l = FcPatternIterGetValues (pat, &iter); l; l = FcValueListNext (l))
1068 {
1069 FcValue v = FcValueCanonicalize (&l->value);
1070 if (v.type != FcTypeString)
1071 break;
1072 if (!FcStrCmpIgnoreBlanksAndCase (v.u.s, string))
1073 return FcTrue;
1074 }
1075 return FcFalse;
1076 }
1077
1078 static const FT_UShort platform_order[] = {
1079 TT_PLATFORM_MICROSOFT,
1080 TT_PLATFORM_APPLE_UNICODE,
1081 TT_PLATFORM_MACINTOSH,
1082 TT_PLATFORM_ISO,
1083 };
1084 #define NUM_PLATFORM_ORDER (sizeof (platform_order) / sizeof (platform_order[0]))
1085
1086 static const FT_UShort nameid_order[] = {
1087 TT_NAME_ID_WWS_FAMILY,
1088 TT_NAME_ID_TYPOGRAPHIC_FAMILY,
1089 TT_NAME_ID_FONT_FAMILY,
1090 TT_NAME_ID_MAC_FULL_NAME,
1091 TT_NAME_ID_FULL_NAME,
1092 TT_NAME_ID_WWS_SUBFAMILY,
1093 TT_NAME_ID_TYPOGRAPHIC_SUBFAMILY,
1094 TT_NAME_ID_FONT_SUBFAMILY,
1095 TT_NAME_ID_TRADEMARK,
1096 TT_NAME_ID_MANUFACTURER,
1097 };
1098
1099 #define NUM_NAMEID_ORDER (sizeof (nameid_order) / sizeof (nameid_order[0]))
1100
1101 typedef struct
1102 {
1103 unsigned int platform_id;
1104 unsigned int name_id;
1105 unsigned int encoding_id;
1106 unsigned int language_id;
1107 unsigned int idx;
1108 } FcNameMapping;
1109
1110 static FcBool
1111 _is_english(int platform, int language)
1112 {
1113 FcBool ret = FcFalse;
1114
1115 switch (platform)
1116 {
1117 case TT_PLATFORM_MACINTOSH:
1118 ret = language == TT_MAC_LANGID_ENGLISH;
1119 break;
1120 case TT_PLATFORM_MICROSOFT:
1121 ret = language == TT_MS_LANGID_ENGLISH_UNITED_STATES;
1122 break;
1123 }
1124 return ret;
1125 }
1126
1127 static int
1128 name_mapping_cmp (const void *pa, const void *pb)
1129 {
1130 const FcNameMapping *a = (const FcNameMapping *) pa;
1131 const FcNameMapping *b = (const FcNameMapping *) pb;
1132
1133 if (a->platform_id != b->platform_id) return (int) a->platform_id - (int) b->platform_id;
1134 if (a->name_id != b->name_id) return (int) a->name_id - (int) b->name_id;
1135 if (a->encoding_id != b->encoding_id) return (int) a->encoding_id - (int) b->encoding_id;
1136 if (a->language_id != b->language_id) return _is_english(a->platform_id, a->language_id) ? -1 : _is_english(b->platform_id, b->language_id) ? 1 : (int) a->language_id - (int) b->language_id;
1137 if (a->idx != b->idx) return (int) a->idx - (int) b->idx;
1138
1139 return 0;
1140 }
1141
1142 static int
1143 FcFreeTypeGetFirstName (const FT_Face face,
1144 unsigned int platform,
1145 unsigned int nameid,
1146 FcNameMapping *mapping,
1147 unsigned int count,
1148 FT_SfntName *sname)
1149 {
1150 int min = 0, max = (int) count - 1;
1151
1152 while (min <= max)
1153 {
1154 int mid = (min + max) / 2;
1155
1156 if (FT_Get_Sfnt_Name (face, mapping[mid].idx, sname) != 0)
1157 return FcFalse;
1158
1159 if (platform < sname->platform_id ||
1160 (platform == sname->platform_id &&
1161 (nameid < sname->name_id ||
1162 (nameid == sname->name_id &&
1163 (mid &&
1164 platform == mapping[mid - 1].platform_id &&
1165 nameid == mapping[mid - 1].name_id
1166 )))))
1167 max = mid - 1;
1168 else if (platform > sname->platform_id ||
1169 (platform == sname->platform_id &&
1170 nameid > sname->name_id))
1171 min = mid + 1;
1172 else
1173 return mid;
1174 }
1175
1176 return -1;
1177 }
1178
1179 static FcPattern *
1180 FcFreeTypeQueryFaceInternal (const FT_Face face,
1181 const FcChar8 *file,
1182 unsigned int id,
1183 FcCharSet **cs_share,
1184 FcLangSet **ls_share,
1185 FcNameMapping **nm_share)
1186 {
1187 FcPattern *pat;
1188 int slant = -1;
1189 double weight = -1;
1190 double width = -1;
1191 FcBool decorative = FcFalse;
1192 FcBool variable = FcFalse;
1193 FcBool variable_weight = FcFalse;
1194 FcBool variable_width = FcFalse;
1195 FcBool variable_size = FcFalse;
1196 FcCharSet *cs;
1197 FcLangSet *ls;
1198 FcNameMapping *name_mapping = NULL;
1199 #if 0
1200 FcChar8 *family = 0;
1201 #endif
1202 FcChar8 *complex_, *foundry_ = NULL;
1203 const FcChar8 *foundry = 0;
1204 int spacing;
1205
1206 /* Support for glyph-variation named-instances. */
1207 FT_MM_Var *master = NULL;
1208 FT_Var_Named_Style *instance = NULL;
1209 double weight_mult = 1.0;
1210 double width_mult = 1.0;
1211
1212 TT_OS2 *os2;
1213 #if HAVE_FT_GET_PS_FONT_INFO
1214 PS_FontInfoRec psfontinfo;
1215 #endif
1216 #if HAVE_FT_GET_BDF_PROPERTY
1217 BDF_PropertyRec prop;
1218 #endif
1219 TT_Header *head;
1220 const FcChar8 *exclusiveLang = 0;
1221
1222 int name_count = 0;
1223 int nfamily = 0;
1224 int nfamily_lang = 0;
1225 int nstyle = 0;
1226 int nstyle_lang = 0;
1227 int nfullname = 0;
1228 int nfullname_lang = 0;
1229 unsigned int p, n;
1230
1231 FcChar8 *style = 0;
1232 int st;
1233
1234 FcBool symbol = FcFalse;
1235 FT_Error ftresult;
1236
1237 FcInitDebug (); /* We might be called with no initizalization whatsoever. */
1238
1239 pat = FcPatternCreate ();
1240 if (!pat)
1241 goto bail0;
1242
1243 {
1244 int has_outline = !!(face->face_flags & FT_FACE_FLAG_SCALABLE);
1245 int has_color = 0;
1246
1247 if (!FcPatternObjectAddBool (pat, FC_OUTLINE_OBJECT, has_outline))
1248 goto bail1;
1249
1250 has_color = !!FT_HAS_COLOR (face);
1251 if (!FcPatternObjectAddBool (pat, FC_COLOR_OBJECT, has_color))
1252 goto bail1;
1253
1254 /* All color fonts are designed to be scaled, even if they only have
1255 * bitmap strikes. Client is responsible to scale the bitmaps. This
1256 * is in contrast to non-color strikes... */
1257 if (!FcPatternObjectAddBool (pat, FC_SCALABLE_OBJECT, has_outline || has_color))
1258 goto bail1;
1259 }
1260
1261 ftresult = FT_Get_MM_Var (face, &master);
1262
1263 if (id >> 16)
1264 {
1265 if (ftresult)
1266 goto bail1;
1267
1268 if (id >> 16 == 0x8000)
1269 {
1270 /* Query variable font itself. */
1271 unsigned int i;
1272 for (i = 0; i < master->num_axis; i++)
1273 {
1274 double min_value = master->axis[i].minimum / (double) (1U << 16);
1275 double def_value = master->axis[i].def / (double) (1U << 16);
1276 double max_value = master->axis[i].maximum / (double) (1U << 16);
1277 FcObject obj = FC_INVALID_OBJECT;
1278
1279 if (min_value > def_value || def_value > max_value || min_value == max_value)
1280 continue;
1281
1282 switch (master->axis[i].tag)
1283 {
1284 case FT_MAKE_TAG ('w','g','h','t'):
1285 obj = FC_WEIGHT_OBJECT;
1286 min_value = FcWeightFromOpenTypeDouble (min_value);
1287 max_value = FcWeightFromOpenTypeDouble (max_value);
1288 variable_weight = FcTrue;
1289 weight = 0; /* To stop looking for weight. */
1290 break;
1291
1292 case FT_MAKE_TAG ('w','d','t','h'):
1293 obj = FC_WIDTH_OBJECT;
1294 /* Values in 'wdth' match Fontconfig FC_WIDTH_* scheme directly. */
1295 variable_width = FcTrue;
1296 width = 0; /* To stop looking for width. */
1297 break;
1298
1299 case FT_MAKE_TAG ('o','p','s','z'):
1300 obj = FC_SIZE_OBJECT;
1301 /* Values in 'opsz' match Fontconfig FC_SIZE, both are in points. */
1302 variable_size = FcTrue;
1303 break;
1304 }
1305
1306 if (obj != FC_INVALID_OBJECT)
1307 {
1308 FcRange *r = FcRangeCreateDouble (min_value, max_value);
1309 if (!FcPatternObjectAddRange (pat, obj, r))
1310 {
1311 FcRangeDestroy (r);
1312 goto bail1;
1313 }
1314 FcRangeDestroy (r);
1315 variable = FcTrue;
1316 }
1317 }
1318
1319 if (!variable)
1320 goto bail1;
1321
1322 id &= 0xFFFF;
1323 }
1324 else if ((id >> 16) - 1 < master->num_namedstyles)
1325 {
1326 /* Pull out weight and width from named-instance. */
1327 unsigned int i;
1328
1329 instance = &master->namedstyle[(id >> 16) - 1];
1330
1331 for (i = 0; i < master->num_axis; i++)
1332 {
1333 double value = instance->coords[i] / (double) (1U << 16);
1334 double default_value = master->axis[i].def / (double) (1U << 16);
1335 double mult = default_value ? value / default_value : 1;
1336 //printf ("named-instance, axis %d tag %lx value %g\n", i, master->axis[i].tag, value);
1337 switch (master->axis[i].tag)
1338 {
1339 case FT_MAKE_TAG ('w','g','h','t'):
1340 weight_mult = mult;
1341 break;
1342
1343 case FT_MAKE_TAG ('w','d','t','h'):
1344 width_mult = mult;
1345 break;
1346
1347 case FT_MAKE_TAG ('o','p','s','z'):
1348 if (!FcPatternObjectAddDouble (pat, FC_SIZE_OBJECT, value))
1349 goto bail1;
1350 break;
1351 }
1352 }
1353 }
1354 else
1355 goto bail1;
1356 }
1357 else
1358 {
1359 if (!ftresult)
1360 {
1361 unsigned int i;
1362 for (i = 0; i < master->num_axis; i++)
1363 {
1364 switch (master->axis[i].tag)
1365 {
1366 case FT_MAKE_TAG ('o','p','s','z'):
1367 if (!FcPatternObjectAddDouble (pat, FC_SIZE_OBJECT, master->axis[i].def / (double) (1U << 16)))
1368 goto bail1;
1369 variable_size = FcTrue;
1370 break;
1371 }
1372 }
1373 }
1374 else
1375 {
1376 /* ignore an error of FT_Get_MM_Var() */
1377 }
1378 }
1379 if (!FcPatternObjectAddBool (pat, FC_VARIABLE_OBJECT, variable))
1380 goto bail1;
1381
1382 /*
1383 * Get the OS/2 table
1384 */
1385 os2 = (TT_OS2 *) FT_Get_Sfnt_Table (face, FT_SFNT_OS2);
1386
1387 /*
1388 * Look first in the OS/2 table for the foundry, if
1389 * not found here, the various notices will be searched for
1390 * that information, either from the sfnt name tables or
1391 * the Postscript FontInfo dictionary. Finally, the
1392 * BDF properties will queried.
1393 */
1394
1395 if (os2 && os2->version >= 0x0001 && os2->version != 0xffff)
1396 {
1397 if (os2->achVendID[0] != 0)
1398 {
1399 foundry_ = (FcChar8 *) malloc (sizeof (os2->achVendID) + 1);
1400 memcpy ((void *)foundry_, os2->achVendID, sizeof (os2->achVendID));
1401 foundry_[sizeof (os2->achVendID)] = 0;
1402 foundry = foundry_;
1403 }
1404 }
1405
1406 if (FcDebug () & FC_DBG_SCANV)
1407 printf ("\n");
1408 /*
1409 * Grub through the name table looking for family
1410 * and style names. FreeType makes quite a hash
1411 * of them
1412 */
1413 name_count = FT_Get_Sfnt_Name_Count (face);
1414 if (nm_share)
1415 name_mapping = *nm_share;
1416 if (!name_mapping)
1417 {
1418 int i = 0;
1419 name_mapping = malloc (name_count * sizeof (FcNameMapping));
1420 if (!name_mapping)
1421 name_count = 0;
1422 for (i = 0; i < name_count; i++)
1423 {
1424 FcNameMapping *p = &name_mapping[i];
1425 FT_SfntName sname;
1426 if (FT_Get_Sfnt_Name (face, i, &sname) == 0)
1427 {
1428 p->platform_id = sname.platform_id;
1429 p->name_id = sname.name_id;
1430 p->encoding_id = sname.encoding_id;
1431 p->language_id = sname.language_id;
1432 p->idx = i;
1433 }
1434 else
1435 {
1436 p->platform_id =
1437 p->name_id =
1438 p->encoding_id =
1439 p->language_id =
1440 p->idx = (unsigned int) -1;
1441 }
1442 }
1443 qsort (name_mapping, name_count, sizeof(FcNameMapping), name_mapping_cmp);
1444
1445 if (nm_share)
1446 *nm_share = name_mapping;
1447 }
1448 for (p = 0; p < NUM_PLATFORM_ORDER; p++)
1449 {
1450 int platform = platform_order[p];
1451
1452 /*
1453 * Order nameids so preferred names appear first
1454 * in the resulting list
1455 */
1456 for (n = 0; n < NUM_NAMEID_ORDER; n++)
1457 {
1458 FT_SfntName sname;
1459 int nameidx;
1460 const FcChar8 *lang;
1461 int *np = 0, *nlangp = 0;
1462 size_t len;
1463 int nameid, lookupid;
1464 FcObject obj = FC_INVALID_OBJECT, objlang = FC_INVALID_OBJECT;
1465
1466 nameid = lookupid = nameid_order[n];
1467
1468 if (instance)
1469 {
1470 /* For named-instances, we skip regular style nameIDs,
1471 * and treat the instance's nameid as FONT_SUBFAMILY.
1472 * Postscript name is automatically handled by FreeType. */
1473 if (nameid == TT_NAME_ID_WWS_SUBFAMILY ||
1474 nameid == TT_NAME_ID_TYPOGRAPHIC_SUBFAMILY ||
1475 nameid == TT_NAME_ID_FULL_NAME)
1476 continue;
1477
1478 if (nameid == TT_NAME_ID_FONT_SUBFAMILY)
1479 lookupid = instance->strid;
1480 }
1481
1482 nameidx = FcFreeTypeGetFirstName (face, platform, lookupid,
1483 name_mapping, name_count,
1484 &sname);
1485 if (nameidx == -1)
1486 continue;
1487 do
1488 {
1489 switch (nameid) {
1490 case TT_NAME_ID_WWS_FAMILY:
1491 case TT_NAME_ID_TYPOGRAPHIC_FAMILY:
1492 case TT_NAME_ID_FONT_FAMILY:
1493 #if 0
1494 case TT_NAME_ID_UNIQUE_ID:
1495 #endif
1496 if (FcDebug () & FC_DBG_SCANV)
1497 printf ("found family (n %2d p %d e %d l 0x%04x)",
1498 sname.name_id, sname.platform_id,
1499 sname.encoding_id, sname.language_id);
1500
1501 obj = FC_FAMILY_OBJECT;
1502 objlang = FC_FAMILYLANG_OBJECT;
1503 np = &nfamily;
1504 nlangp = &nfamily_lang;
1505 break;
1506 case TT_NAME_ID_MAC_FULL_NAME:
1507 case TT_NAME_ID_FULL_NAME:
1508 if (variable)
1509 break;
1510 if (FcDebug () & FC_DBG_SCANV)
1511 printf ("found full (n %2d p %d e %d l 0x%04x)",
1512 sname.name_id, sname.platform_id,
1513 sname.encoding_id, sname.language_id);
1514
1515 obj = FC_FULLNAME_OBJECT;
1516 objlang = FC_FULLNAMELANG_OBJECT;
1517 np = &nfullname;
1518 nlangp = &nfullname_lang;
1519 break;
1520 case TT_NAME_ID_WWS_SUBFAMILY:
1521 case TT_NAME_ID_TYPOGRAPHIC_SUBFAMILY:
1522 case TT_NAME_ID_FONT_SUBFAMILY:
1523 if (variable)
1524 break;
1525 if (FcDebug () & FC_DBG_SCANV)
1526 printf ("found style (n %2d p %d e %d l 0x%04x) ",
1527 sname.name_id, sname.platform_id,
1528 sname.encoding_id, sname.language_id);
1529
1530 obj = FC_STYLE_OBJECT;
1531 objlang = FC_STYLELANG_OBJECT;
1532 np = &nstyle;
1533 nlangp = &nstyle_lang;
1534 break;
1535 case TT_NAME_ID_TRADEMARK:
1536 case TT_NAME_ID_MANUFACTURER:
1537 /* If the foundry wasn't found in the OS/2 table, look here */
1538 if(!foundry)
1539 {
1540 FcChar8 *utf8;
1541 utf8 = FcSfntNameTranscode (&sname);
1542 foundry = FcNoticeFoundry((FT_String *) utf8);
1543 free (utf8);
1544 }
1545 break;
1546 }
1547 if (obj != FC_INVALID_OBJECT)
1548 {
1549 FcChar8 *utf8, *pp;
1550
1551 utf8 = FcSfntNameTranscode (&sname);
1552 lang = FcSfntNameLanguage (&sname);
1553
1554 if (FcDebug () & FC_DBG_SCANV)
1555 printf ("%s\n", utf8 ? (char *)utf8 : "(null)");
1556
1557 if (!utf8)
1558 continue;
1559
1560 /* Trim surrounding whitespace. */
1561 pp = utf8;
1562 while (*pp == ' ')
1563 pp++;
1564 len = strlen ((const char *) pp);
1565 memmove (utf8, pp, len + 1);
1566 pp = utf8 + len;
1567 while (pp > utf8 && *(pp - 1) == ' ')
1568 pp--;
1569 *pp = 0;
1570
1571 if (FcStringInPatternElement (pat, obj, utf8))
1572 {
1573 free (utf8);
1574 continue;
1575 }
1576
1577 /* add new element */
1578 if (!FcPatternObjectAddString (pat, obj, utf8))
1579 {
1580 free (utf8);
1581 goto bail1;
1582 }
1583 free (utf8);
1584 if (lang)
1585 {
1586 /* pad lang list with 'und' to line up with elt */
1587 while (*nlangp < *np)
1588 {
1589 if (!FcPatternObjectAddString (pat, objlang, (FcChar8 *) "und"))
1590 goto bail1;
1591 ++*nlangp;
1592 }
1593 if (!FcPatternObjectAddString (pat, objlang, lang))
1594 goto bail1;
1595 ++*nlangp;
1596 }
1597 ++*np;
1598 }
1599 }
1600 while (++nameidx < name_count &&
1601 FT_Get_Sfnt_Name (face, name_mapping[nameidx].idx, &sname) == 0 &&
1602 platform == sname.platform_id && lookupid == sname.name_id);
1603 }
1604 }
1605 if (!nm_share)
1606 {
1607 free (name_mapping);
1608 name_mapping = NULL;
1609 }
1610
1611 if (!nfamily && face->family_name &&
1612 FcStrCmpIgnoreBlanksAndCase ((FcChar8 *) face->family_name, (FcChar8 *) "") != 0)
1613 {
1614 if (FcDebug () & FC_DBG_SCANV)
1615 printf ("using FreeType family \"%s\"\n", face->family_name);
1616 if (!FcPatternObjectAddString (pat, FC_FAMILY_OBJECT, (FcChar8 *) face->family_name))
1617 goto bail1;
1618 if (!FcPatternObjectAddString (pat, FC_FAMILYLANG_OBJECT, (FcChar8 *) "en"))
1619 goto bail1;
1620 ++nfamily;
1621 }
1622
1623 if (!variable && !nstyle)
1624 {
1625 const FcChar8 *style_regular = (const FcChar8 *) "Regular";
1626 const FcChar8 *ss;
1627
1628 if (face->style_name &&
1629 FcStrCmpIgnoreBlanksAndCase ((FcChar8 *) face->style_name, (FcChar8 *) "") != 0)
1630 {
1631 if (FcDebug () & FC_DBG_SCANV)
1632 printf ("using FreeType style \"%s\"\n", face->style_name);
1633
1634 ss = (const FcChar8 *) face->style_name;
1635 }
1636 else
1637 {
1638 if (FcDebug () & FC_DBG_SCANV)
1639 printf ("applying default style Regular\n");
1640 ss = style_regular;
1641 }
1642 if (!FcPatternObjectAddString (pat, FC_STYLE_OBJECT, ss))
1643 goto bail1;
1644 if (!FcPatternObjectAddString (pat, FC_STYLELANG_OBJECT, (FcChar8 *) "en"))
1645 goto bail1;
1646 ++nstyle;
1647 }
1648
1649 if (!nfamily && file && *file)
1650 {
1651 FcChar8 *start, *end;
1652 FcChar8 *family;
1653
1654 start = (FcChar8 *) strrchr ((char *) file, '/');
1655 if (start)
1656 start++;
1657 else
1658 start = (FcChar8 *) file;
1659 end = (FcChar8 *) strrchr ((char *) start, '.');
1660 if (!end)
1661 end = start + strlen ((char *) start);
1662 /* freed below */
1663 family = malloc (end - start + 1);
1664 strncpy ((char *) family, (char *) start, end - start);
1665 family[end - start] = '\0';
1666 if (FcDebug () & FC_DBG_SCANV)
1667 printf ("using filename for family %s\n", family);
1668 if (!FcPatternObjectAddString (pat, FC_FAMILY_OBJECT, family))
1669 {
1670 free (family);
1671 goto bail1;
1672 }
1673 if (!FcPatternObjectAddString (pat, FC_FAMILYLANG_OBJECT, (FcChar8 *) "en"))
1674 {
1675 free (family);
1676 goto bail1;
1677 }
1678 free (family);
1679 ++nfamily;
1680 }
1681
1682 /* Add the fullname into the cache */
1683 if (!variable && !nfullname)
1684 {
1685 FcChar8 *family, *style, *lang = NULL;
1686 int n = 0;
1687 size_t len, i;
1688 FcStrBuf sbuf;
1689
1690 while (FcPatternObjectGetString (pat, FC_FAMILYLANG_OBJECT, n, &lang) == FcResultMatch)
1691 {
1692 if (FcStrCmp (lang, (const FcChar8 *) "en") == 0)
1693 break;
1694 n++;
1695 lang = NULL;
1696 }
1697 if (!lang)
1698 n = 0;
1699 if (FcPatternObjectGetString (pat, FC_FAMILY_OBJECT, n, &family) != FcResultMatch)
1700 goto bail1;
1701 len = strlen ((const char *) family);
1702 for (i = len; i > 0; i--)
1703 {
1704 if (!isspace (family[i-1]))
1705 break;
1706 }
1707 family[i] = 0;
1708 n = 0;
1709 while (FcPatternObjectGetString (pat, FC_STYLELANG_OBJECT, n, &lang) == FcResultMatch)
1710 {
1711 if (FcStrCmp (lang, (const FcChar8 *) "en") == 0)
1712 break;
1713 n++;
1714 lang = NULL;
1715 }
1716 if (!lang)
1717 n = 0;
1718 if (FcPatternObjectGetString (pat, FC_STYLE_OBJECT, n, &style) != FcResultMatch)
1719 goto bail1;
1720 len = strlen ((const char *) style);
1721 for (i = 0; style[i] != 0 && isspace (style[i]); i++);
1722 memcpy (style, &style[i], len - i);
1723 FcStrBufInit (&sbuf, NULL, 0);
1724 FcStrBufString (&sbuf, family);
1725 FcStrBufChar (&sbuf, ' ');
1726 FcStrBufString (&sbuf, style);
1727 if (!FcPatternObjectAddString (pat, FC_FULLNAME_OBJECT, FcStrBufDoneStatic (&sbuf)))
1728 {
1729 FcStrBufDestroy (&sbuf);
1730 goto bail1;
1731 }
1732 FcStrBufDestroy (&sbuf);
1733 if (!FcPatternObjectAddString (pat, FC_FULLNAMELANG_OBJECT, (const FcChar8 *) "en"))
1734 goto bail1;
1735 ++nfullname;
1736 }
1737 /* Add the PostScript name into the cache */
1738 if (!variable)
1739 {
1740 char psname[256];
1741 const char *tmp;
1742 tmp = FT_Get_Postscript_Name (face);
1743 if (!tmp)
1744 {
1745 unsigned int i;
1746 FcChar8 *family, *familylang = NULL;
1747 size_t len;
1748 int n = 0;
1749
1750 /* Workaround when FT_Get_Postscript_Name didn't give any name.
1751 * try to find out the English family name and convert.
1752 */
1753 while (FcPatternObjectGetString (pat, FC_FAMILYLANG_OBJECT, n, &familylang) == FcResultMatch)
1754 {
1755 if (FcStrCmp (familylang, (const FcChar8 *)"en") == 0)
1756 break;
1757 n++;
1758 familylang = NULL;
1759 }
1760 if (!familylang)
1761 n = 0;
1762
1763 if (FcPatternObjectGetString (pat, FC_FAMILY_OBJECT, n, &family) != FcResultMatch)
1764 goto bail1;
1765 len = strlen ((const char *)family);
1766 /* the literal name in PostScript Language is limited to 127 characters though,
1767 * It is the architectural limit. so assuming 255 characters may works enough.
1768 */
1769 for (i = 0; i < len && i < 255; i++)
1770 {
1771 /* those characters are not allowed to be the literal name in PostScript */
1772 static const char exclusive_chars[] = "\x04()/<>[]{}\t\f\r\n ";
1773
1774 if (strchr(exclusive_chars, family[i]) != NULL)
1775 psname[i] = '-';
1776 else
1777 psname[i] = family[i];
1778 }
1779 psname[i] = 0;
1780 }
1781 else
1782 {
1783 strncpy (psname, tmp, 255);
1784 psname[255] = 0;
1785 }
1786 if (!FcPatternObjectAddString (pat, FC_POSTSCRIPT_NAME_OBJECT, (const FcChar8 *)psname))
1787 goto bail1;
1788 }
1789
1790 if (file && *file && !FcPatternObjectAddString (pat, FC_FILE_OBJECT, file))
1791 goto bail1;
1792
1793 if (!FcPatternObjectAddInteger (pat, FC_INDEX_OBJECT, id))
1794 goto bail1;
1795
1796 #if 0
1797 /*
1798 * don't even try this -- CJK 'monospace' fonts are really
1799 * dual width, and most other fonts don't bother to set
1800 * the attribute. Sigh.
1801 */
1802 if ((face->face_flags & FT_FACE_FLAG_FIXED_WIDTH) != 0)
1803 if (!FcPatternObjectAddInteger (pat, FC_SPACING_OBJECT, FC_MONO))
1804 goto bail1;
1805 #endif
1806
1807 /*
1808 * Find the font revision (if available)
1809 */
1810 head = (TT_Header *) FT_Get_Sfnt_Table (face, ft_sfnt_head);
1811 if (head)
1812 {
1813 if (!FcPatternObjectAddInteger (pat, FC_FONTVERSION_OBJECT, head->Font_Revision))
1814 goto bail1;
1815 }
1816 else
1817 {
1818 if (!FcPatternObjectAddInteger (pat, FC_FONTVERSION_OBJECT, 0))
1819 goto bail1;
1820 }
1821 if (!FcPatternObjectAddInteger (pat, FC_ORDER_OBJECT, 0))
1822 goto bail1;
1823
1824 if (os2 && os2->version >= 0x0001 && os2->version != 0xffff)
1825 {
1826 unsigned int i;
1827 for (i = 0; i < NUM_CODE_PAGE_RANGE; i++)
1828 {
1829 FT_ULong bits;
1830 int bit;
1831 if (FcCodePageRange[i].bit < 32)
1832 {
1833 bits = os2->ulCodePageRange1;
1834 bit = FcCodePageRange[i].bit;
1835 }
1836 else
1837 {
1838 bits = os2->ulCodePageRange2;
1839 bit = FcCodePageRange[i].bit - 32;
1840 }
1841 if (bits & (1U << bit))
1842 {
1843 /*
1844 * If the font advertises support for multiple
1845 * "exclusive" languages, then include support
1846 * for any language found to have coverage
1847 */
1848 if (exclusiveLang)
1849 {
1850 exclusiveLang = 0;
1851 break;
1852 }
1853 exclusiveLang = FcCodePageRange[i].lang;
1854 }
1855 }
1856 }
1857
1858 if (os2 && os2->version != 0xffff)
1859 {
1860 weight = os2->usWeightClass;
1861 weight = FcWeightFromOpenTypeDouble (weight * weight_mult);
1862 if ((FcDebug() & FC_DBG_SCANV) && weight != -1)
1863 printf ("\tos2 weight class %d multiplier %g maps to weight %g\n",
1864 os2->usWeightClass, weight_mult, weight);
1865
1866 switch (os2->usWidthClass) {
1867 case 1: width = FC_WIDTH_ULTRACONDENSED; break;
1868 case 2: width = FC_WIDTH_EXTRACONDENSED; break;
1869 case 3: width = FC_WIDTH_CONDENSED; break;
1870 case 4: width = FC_WIDTH_SEMICONDENSED; break;
1871 case 5: width = FC_WIDTH_NORMAL; break;
1872 case 6: width = FC_WIDTH_SEMIEXPANDED; break;
1873 case 7: width = FC_WIDTH_EXPANDED; break;
1874 case 8: width = FC_WIDTH_EXTRAEXPANDED; break;
1875 case 9: width = FC_WIDTH_ULTRAEXPANDED; break;
1876 }
1877 width *= width_mult;
1878 if ((FcDebug() & FC_DBG_SCANV) && width != -1)
1879 printf ("\tos2 width class %d multiplier %g maps to width %g\n",
1880 os2->usWidthClass, width_mult, width);
1881 }
1882 if (os2 && (complex_ = FcFontCapabilities(face)))
1883 {
1884 if (!FcPatternObjectAddString (pat, FC_CAPABILITY_OBJECT, complex_))
1885 {
1886 free (complex_);
1887 goto bail1;
1888 }
1889 free (complex_);
1890 }
1891
1892 if (!FcPatternObjectAddBool (pat, FC_FONT_HAS_HINT_OBJECT, FcFontHasHint (face)))
1893 goto bail1;
1894
1895 if (!variable_size && os2 && os2->version >= 0x0005 && os2->version != 0xffff)
1896 {
1897 double lower_size, upper_size;
1898 FcRange *r;
1899
1900 /* usLowerPointSize and usUpperPointSize is actually twips */
1901 lower_size = os2->usLowerOpticalPointSize / 20.0L;
1902 upper_size = os2->usUpperOpticalPointSize / 20.0L;
1903
1904 if (lower_size == upper_size)
1905 {
1906 if (!FcPatternObjectAddDouble (pat, FC_SIZE_OBJECT, lower_size))
1907 goto bail1;
1908 }
1909 else
1910 {
1911 r = FcRangeCreateDouble (lower_size, upper_size);
1912 if (!FcPatternObjectAddRange (pat, FC_SIZE_OBJECT, r))
1913 {
1914 FcRangeDestroy (r);
1915 goto bail1;
1916 }
1917 FcRangeDestroy (r);
1918 }
1919 }
1920
1921 /*
1922 * Type 1: Check for FontInfo dictionary information
1923 * Code from g2@magestudios.net (Gerard Escalante)
1924 */
1925
1926 #if HAVE_FT_GET_PS_FONT_INFO
1927 if (FT_Get_PS_Font_Info(face, &psfontinfo) == 0)
1928 {
1929 if (weight == -1 && psfontinfo.weight)
1930 {
1931 weight = FcIsWeight ((FcChar8 *) psfontinfo.weight);
1932 if (FcDebug() & FC_DBG_SCANV)
1933 printf ("\tType1 weight %s maps to %g\n",
1934 psfontinfo.weight, weight);
1935 }
1936
1937 #if 0
1938 /*
1939 * Don't bother with italic_angle; FreeType already extracts that
1940 * information for us and sticks it into style_flags
1941 */
1942 if (psfontinfo.italic_angle)
1943 slant = FC_SLANT_ITALIC;
1944 else
1945 slant = FC_SLANT_ROMAN;
1946 #endif
1947
1948 if(!foundry)
1949 foundry = FcNoticeFoundry(psfontinfo.notice);
1950 }
1951 #endif /* HAVE_FT_GET_PS_FONT_INFO */
1952
1953 #if HAVE_FT_GET_BDF_PROPERTY
1954 /*
1955 * Finally, look for a FOUNDRY BDF property if no other
1956 * mechanism has managed to locate a foundry
1957 */
1958
1959 if (!foundry)
1960 {
1961 int rc;
1962 rc = FT_Get_BDF_Property(face, "FOUNDRY", &prop);
1963 if(rc == 0 && prop.type == BDF_PROPERTY_TYPE_ATOM)
1964 foundry = (FcChar8 *) prop.u.atom;
1965 }
1966
1967 if (width == -1)
1968 {
1969 if (FT_Get_BDF_Property(face, "RELATIVE_SETWIDTH", &prop) == 0 &&
1970 (prop.type == BDF_PROPERTY_TYPE_INTEGER ||
1971 prop.type == BDF_PROPERTY_TYPE_CARDINAL))
1972 {
1973 FT_Int32 value;
1974
1975 if (prop.type == BDF_PROPERTY_TYPE_INTEGER)
1976 value = prop.u.integer;
1977 else
1978 value = (FT_Int32) prop.u.cardinal;
1979 switch ((value + 5) / 10) {
1980 case 1: width = FC_WIDTH_ULTRACONDENSED; break;
1981 case 2: width = FC_WIDTH_EXTRACONDENSED; break;
1982 case 3: width = FC_WIDTH_CONDENSED; break;
1983 case 4: width = FC_WIDTH_SEMICONDENSED; break;
1984 case 5: width = FC_WIDTH_NORMAL; break;
1985 case 6: width = FC_WIDTH_SEMIEXPANDED; break;
1986 case 7: width = FC_WIDTH_EXPANDED; break;
1987 case 8: width = FC_WIDTH_EXTRAEXPANDED; break;
1988 case 9: width = FC_WIDTH_ULTRAEXPANDED; break;
1989 }
1990 }
1991 if (width == -1 &&
1992 FT_Get_BDF_Property (face, "SETWIDTH_NAME", &prop) == 0 &&
1993 prop.type == BDF_PROPERTY_TYPE_ATOM && prop.u.atom != NULL)
1994 {
1995 width = FcIsWidth ((FcChar8 *) prop.u.atom);
1996 if (FcDebug () & FC_DBG_SCANV)
1997 printf ("\tsetwidth %s maps to %g\n", prop.u.atom, width);
1998 }
1999 }
2000 #endif
2001
2002 /*
2003 * Look for weight, width and slant names in the style value
2004 */
2005 for (st = 0; FcPatternGetString (pat, FC_STYLE, st, &style) == FcResultMatch; st++)
2006 {
2007 if (weight == -1)
2008 {
2009 weight = FcContainsWeight (style);
2010 if (FcDebug() & FC_DBG_SCANV)
2011 printf ("\tStyle %s maps to weight %g\n", style, weight);
2012 }
2013 if (width == -1)
2014 {
2015 width = FcContainsWidth (style);
2016 if (FcDebug() & FC_DBG_SCANV)
2017 printf ("\tStyle %s maps to width %g\n", style, width);
2018 }
2019 if (slant == -1)
2020 {
2021 slant = FcContainsSlant (style);
2022 if (FcDebug() & FC_DBG_SCANV)
2023 printf ("\tStyle %s maps to slant %d\n", style, slant);
2024 }
2025 if (decorative == FcFalse)
2026 {
2027 decorative = FcContainsDecorative (style) > 0;
2028 if (FcDebug() & FC_DBG_SCANV)
2029 printf ("\tStyle %s maps to decorative %d\n", style, decorative);
2030 }
2031 }
2032 /*
2033 * Pull default values from the FreeType flags if more
2034 * specific values not found above
2035 */
2036 if (slant == -1)
2037 {
2038 slant = FC_SLANT_ROMAN;
2039 if (face->style_flags & FT_STYLE_FLAG_ITALIC)
2040 slant = FC_SLANT_ITALIC;
2041 }
2042
2043 if (weight == -1)
2044 {
2045 weight = FC_WEIGHT_MEDIUM;
2046 if (face->style_flags & FT_STYLE_FLAG_BOLD)
2047 weight = FC_WEIGHT_BOLD;
2048 }
2049
2050 if (width == -1)
2051 width = FC_WIDTH_NORMAL;
2052
2053 if (foundry == 0)
2054 foundry = (FcChar8 *) "unknown";
2055
2056 if (!FcPatternObjectAddInteger (pat, FC_SLANT_OBJECT, slant))
2057 goto bail1;
2058
2059 if (!variable_weight && !FcPatternObjectAddDouble (pat, FC_WEIGHT_OBJECT, weight))
2060 goto bail1;
2061
2062 if (!variable_width && !FcPatternObjectAddDouble (pat, FC_WIDTH_OBJECT, width))
2063 goto bail1;
2064
2065 if (!FcPatternObjectAddString (pat, FC_FOUNDRY_OBJECT, foundry))
2066 goto bail1;
2067
2068 if (!FcPatternObjectAddBool (pat, FC_DECORATIVE_OBJECT, decorative))
2069 goto bail1;
2070
2071
2072 /*
2073 * Compute the unicode coverage for the font
2074 */
2075 if (cs_share && *cs_share)
2076 cs = FcCharSetCopy (*cs_share);
2077 else
2078 {
2079 cs = FcFreeTypeCharSet (face, NULL);
2080 if (cs_share)
2081 *cs_share = FcCharSetCopy (cs);
2082 }
2083 if (!cs)
2084 goto bail1;
2085
2086 /* The FcFreeTypeCharSet() chose the encoding; test it for symbol. */
2087 symbol = face->charmap && face->charmap->encoding == FT_ENCODING_MS_SYMBOL;
2088 if (!FcPatternObjectAddBool (pat, FC_SYMBOL_OBJECT, symbol))
2089 goto bail1;
2090
2091 spacing = FcFreeTypeSpacing (face);
2092 #if HAVE_FT_GET_BDF_PROPERTY
2093 /* For PCF fonts, override the computed spacing with the one from
2094 the property */
2095 if(FT_Get_BDF_Property(face, "SPACING", &prop) == 0 &&
2096 prop.type == BDF_PROPERTY_TYPE_ATOM && prop.u.atom != NULL) {
2097 if(!strcmp(prop.u.atom, "c") || !strcmp(prop.u.atom, "C"))
2098 spacing = FC_CHARCELL;
2099 else if(!strcmp(prop.u.atom, "m") || !strcmp(prop.u.atom, "M"))
2100 spacing = FC_MONO;
2101 else if(!strcmp(prop.u.atom, "p") || !strcmp(prop.u.atom, "P"))
2102 spacing = FC_PROPORTIONAL;
2103 }
2104 #endif
2105
2106 /*
2107 * Skip over PCF fonts that have no encoded characters; they're
2108 * usually just Unicode fonts transcoded to some legacy encoding
2109 * FT forces us to approximate whether a font is a PCF font
2110 * or not by whether it has any BDF properties. Try PIXEL_SIZE;
2111 * I don't know how to get a list of BDF properties on the font. -PL
2112 */
2113 if (FcCharSetCount (cs) == 0)
2114 {
2115 #if HAVE_FT_GET_BDF_PROPERTY
2116 if(FT_Get_BDF_Property(face, "PIXEL_SIZE", &prop) == 0)
2117 goto bail2;
2118 #endif
2119 }
2120
2121 if (!FcPatternObjectAddCharSet (pat, FC_CHARSET_OBJECT, cs))
2122 goto bail2;
2123
2124 if (!symbol)
2125 {
2126 if (ls_share && *ls_share)
2127 ls = FcLangSetCopy (*ls_share);
2128 else
2129 {
2130 ls = FcFreeTypeLangSet (cs, exclusiveLang);
2131 if (ls_share)
2132 *ls_share = FcLangSetCopy (ls);
2133 }
2134 if (!ls)
2135 goto bail2;
2136 }
2137 else
2138 {
2139 /* Symbol fonts don't cover any language, even though they
2140 * claim to support Latin1 range. */
2141 ls = FcLangSetCreate ();
2142 }
2143
2144 if (!FcPatternObjectAddLangSet (pat, FC_LANG_OBJECT, ls))
2145 {
2146 FcLangSetDestroy (ls);
2147 goto bail2;
2148 }
2149
2150 FcLangSetDestroy (ls);
2151
2152 if (spacing != FC_PROPORTIONAL)
2153 if (!FcPatternObjectAddInteger (pat, FC_SPACING_OBJECT, spacing))
2154 goto bail2;
2155
2156 if (!(face->face_flags & FT_FACE_FLAG_SCALABLE))
2157 {
2158 int i;
2159 for (i = 0; i < face->num_fixed_sizes; i++)
2160 if (!FcPatternObjectAddDouble (pat, FC_PIXEL_SIZE_OBJECT,
2161 FcGetPixelSize (face, i)))
2162 goto bail2;
2163 if (!FcPatternObjectAddBool (pat, FC_ANTIALIAS_OBJECT, FcFalse))
2164 goto bail2;
2165 }
2166 #if HAVE_FT_GET_X11_FONT_FORMAT
2167 /*
2168 * Use the (not well documented or supported) X-specific function
2169 * from FreeType to figure out the font format
2170 */
2171 {
2172 const char *font_format = FT_Get_X11_Font_Format (face);
2173 if (font_format)
2174 if (!FcPatternObjectAddString (pat, FC_FONTFORMAT_OBJECT, (FcChar8 *) font_format))
2175 goto bail2;
2176 }
2177 #endif
2178
2179 /*
2180 * Drop our reference to the charset
2181 */
2182 FcCharSetDestroy (cs);
2183 if (foundry_)
2184 free (foundry_);
2185
2186 if (master)
2187 {
2188 #ifdef HAVE_FT_DONE_MM_VAR
2189 if (face->glyph)
2190 FT_Done_MM_Var (face->glyph->library, master);
2191 #else
2192 free (master);
2193 #endif
2194 }
2195
2196 return pat;
2197
2198 bail2:
2199 FcCharSetDestroy (cs);
2200 bail1:
2201 FcPatternDestroy (pat);
2202 if (master)
2203 {
2204 #ifdef HAVE_FT_DONE_MM_VAR
2205 if (face->glyph)
2206 FT_Done_MM_Var (face->glyph->library, master);
2207 #else
2208 free (master);
2209 #endif
2210 }
2211 if (!nm_share && name_mapping)
2212 free (name_mapping);
2213 if (foundry_)
2214 free (foundry_);
2215 bail0:
2216 return NULL;
2217 }
2218
2219 FcPattern *
2220 FcFreeTypeQueryFace (const FT_Face face,
2221 const FcChar8 *file,
2222 unsigned int id,
2223 FcBlanks *blanks FC_UNUSED)
2224 {
2225 return FcFreeTypeQueryFaceInternal (face, file, id, NULL, NULL, NULL);
2226 }
2227
2228 FcPattern *
2229 FcFreeTypeQuery(const FcChar8 *file,
2230 unsigned int id,
2231 FcBlanks *blanks FC_UNUSED,
2232 int *count)
2233 {
2234 FT_Face face;
2235 FT_Library ftLibrary;
2236 FcPattern *pat = NULL;
2237
2238 if (FT_Init_FreeType (&ftLibrary))
2239 return NULL;
2240
2241 if (FT_New_Face (ftLibrary, (char *) file, id & 0x7FFFFFFF, &face))
2242 goto bail;
2243
2244 if (count)
2245 *count = face->num_faces;
2246
2247 pat = FcFreeTypeQueryFaceInternal (face, file, id, NULL, NULL, NULL);
2248
2249 FT_Done_Face (face);
2250 bail:
2251 FT_Done_FreeType (ftLibrary);
2252 return pat;
2253 }
2254
2255 unsigned int
2256 FcFreeTypeQueryAll(const FcChar8 *file,
2257 unsigned int id,
2258 FcBlanks *blanks,
2259 int *count,
2260 FcFontSet *set)
2261 {
2262 FT_Face face = NULL;
2263 FT_Library ftLibrary = NULL;
2264 FcCharSet *cs = NULL;
2265 FcLangSet *ls = NULL;
2266 FcNameMapping *nm = NULL;
2267 FT_MM_Var *mm_var = NULL;
2268 FcBool index_set = id != (unsigned int) -1;
2269 unsigned int set_face_num = index_set ? id & 0xFFFF : 0;
2270 unsigned int set_instance_num = index_set ? id >> 16 : 0;
2271 unsigned int face_num = set_face_num;
2272 unsigned int instance_num = set_instance_num;
2273 unsigned int num_faces = 0;
2274 unsigned int num_instances = 0;
2275 unsigned int ret = 0;
2276 int err = 0;
2277
2278 if (count)
2279 *count = 0;
2280
2281 if (FT_Init_FreeType (&ftLibrary))
2282 return 0;
2283
2284 if (FT_New_Face (ftLibrary, (const char *) file, face_num, &face))
2285 goto bail;
2286
2287 num_faces = face->num_faces;
2288 num_instances = face->style_flags >> 16;
2289 if (num_instances && (!index_set || instance_num))
2290 {
2291 FT_Get_MM_Var (face, &mm_var);
2292 if (!mm_var)
2293 num_instances = 0;
2294 }
2295
2296 if (count)
2297 *count = num_faces;
2298
2299 do {
2300 FcPattern *pat = NULL;
2301
2302 if (instance_num == 0x8000 || instance_num > num_instances)
2303 FT_Set_Var_Design_Coordinates (face, 0, NULL); /* Reset variations. */
2304 else if (instance_num)
2305 {
2306 FT_Var_Named_Style *instance = &mm_var->namedstyle[instance_num - 1];
2307 FT_Fixed *coords = instance->coords;
2308 FcBool nonzero;
2309 unsigned int i;
2310
2311 /* Skip named-instance that coincides with base instance. */
2312 nonzero = FcFalse;
2313 for (i = 0; i < mm_var->num_axis; i++)
2314 if (coords[i] != mm_var->axis[i].def)
2315 {
2316 nonzero = FcTrue;
2317 break;
2318 }
2319 if (!nonzero)
2320 goto skip;
2321
2322 FT_Set_Var_Design_Coordinates (face, mm_var->num_axis, coords);
2323 }
2324
2325 id = ((instance_num << 16) + face_num);
2326 pat = FcFreeTypeQueryFaceInternal (face, (const FcChar8 *) file, id, &cs, &ls, &nm);
2327
2328 if (pat)
2329 {
2330
2331 ret++;
2332 if (!set || ! FcFontSetAdd (set, pat))
2333 FcPatternDestroy (pat);
2334 }
2335 else if (instance_num != 0x8000)
2336 err = 1;
2337
2338 skip:
2339 if (!index_set && instance_num < num_instances)
2340 instance_num++;
2341 else if (!index_set && instance_num == num_instances)
2342 instance_num = 0x8000; /* variable font */
2343 else
2344 {
2345 free (nm);
2346 nm = NULL;
2347 FcLangSetDestroy (ls);
2348 ls = NULL;
2349 FcCharSetDestroy (cs);
2350 cs = NULL;
2351 FT_Done_Face (face);
2352 face = NULL;
2353
2354 face_num++;
2355 instance_num = set_instance_num;
2356
2357 if (FT_New_Face (ftLibrary, (const char *) file, face_num, &face))
2358 break;
2359 }
2360 } while (!err && (!index_set || face_num == set_face_num) && face_num < num_faces);
2361
2362 bail:
2363 #ifdef HAVE_FT_DONE_MM_VAR
2364 FT_Done_MM_Var (ftLibrary, mm_var);
2365 #else
2366 free (mm_var);
2367 #endif
2368 FcLangSetDestroy (ls);
2369 FcCharSetDestroy (cs);
2370 if (face)
2371 FT_Done_Face (face);
2372 FT_Done_FreeType (ftLibrary);
2373 if (nm)
2374 free (nm);
2375
2376 return ret;
2377 }
2378
2379
2380 static const FT_Encoding fcFontEncodings[] = {
2381 FT_ENCODING_UNICODE,
2382 FT_ENCODING_MS_SYMBOL
2383 };
2384
2385 #define NUM_DECODE (int) (sizeof (fcFontEncodings) / sizeof (fcFontEncodings[0]))
2386
2387 /*
2388 * Map a UCS4 glyph to a glyph index. Use all available encoding
2389 * tables to try and find one that works. This information is expected
2390 * to be cached by higher levels, so performance isn't critical
2391 */
2392
2393 FT_UInt
2394 FcFreeTypeCharIndex (FT_Face face, FcChar32 ucs4)
2395 {
2396 int initial, offset, decode;
2397 FT_UInt glyphindex;
2398
2399 initial = 0;
2400
2401 if (!face)
2402 return 0;
2403
2404 /*
2405 * Find the current encoding
2406 */
2407 if (face->charmap)
2408 {
2409 for (; initial < NUM_DECODE; initial++)
2410 if (fcFontEncodings[initial] == face->charmap->encoding)
2411 break;
2412 if (initial == NUM_DECODE)
2413 initial = 0;
2414 }
2415 /*
2416 * Check each encoding for the glyph, starting with the current one
2417 */
2418 for (offset = 0; offset < NUM_DECODE; offset++)
2419 {
2420 decode = (initial + offset) % NUM_DECODE;
2421 if (!face->charmap || face->charmap->encoding != fcFontEncodings[decode])
2422 if (FT_Select_Charmap (face, fcFontEncodings[decode]) != 0)
2423 continue;
2424 glyphindex = FT_Get_Char_Index (face, (FT_ULong) ucs4);
2425 if (glyphindex)
2426 return glyphindex;
2427 if (ucs4 < 0x100 && face->charmap &&
2428 face->charmap->encoding == FT_ENCODING_MS_SYMBOL)
2429 {
2430 /* For symbol-encoded OpenType fonts, we duplicate the
2431 * U+F000..F0FF range at U+0000..U+00FF. That's what
2432 * Windows seems to do, and that's hinted about at:
2433 * http://www.microsoft.com/typography/otspec/recom.htm
2434 * under "Non-Standard (Symbol) Fonts".
2435 *
2436 * See thread with subject "Webdings and other MS symbol
2437 * fonts don't display" on mailing list from May 2015.
2438 */
2439 glyphindex = FT_Get_Char_Index (face, (FT_ULong) ucs4 + 0xF000);
2440 if (glyphindex)
2441 return glyphindex;
2442 }
2443 }
2444 return 0;
2445 }
2446
2447 static inline int fc_min (int a, int b) { return a <= b ? a : b; }
2448 static inline int fc_max (int a, int b) { return a >= b ? a : b; }
2449 static inline FcBool fc_approximately_equal (int x, int y)
2450 { return abs (x - y) * 33 <= fc_max (abs (x), abs (y)); }
2451
2452 static int
2453 FcFreeTypeSpacing (FT_Face face)
2454 {
2455 FT_Int load_flags = FT_LOAD_IGNORE_GLOBAL_ADVANCE_WIDTH | FT_LOAD_NO_SCALE | FT_LOAD_NO_HINTING;
2456 FT_Pos advances[3] = {0};
2457 unsigned int num_advances = 0;
2458 int o;
2459
2460 /* When using scalable fonts, only report those glyphs
2461 * which can be scaled; otherwise those fonts will
2462 * only be available at some sizes, and never when
2463 * transformed. Avoid this by simply reporting bitmap-only
2464 * glyphs as missing
2465 */
2466 if (face->face_flags & FT_FACE_FLAG_SCALABLE)
2467 load_flags |= FT_LOAD_NO_BITMAP;
2468
2469 if (!(face->face_flags & FT_FACE_FLAG_SCALABLE) &&
2470 face->num_fixed_sizes > 0 &&
2471 FT_Get_Sfnt_Table (face, ft_sfnt_head))
2472 {
2473 FT_Int strike_index = 0, i;
2474 /* Select the face closest to 16 pixels tall */
2475 for (i = 1; i < face->num_fixed_sizes; i++)
2476 {
2477 if (abs (face->available_sizes[i].height - 16) <
2478 abs (face->available_sizes[strike_index].height - 16))
2479 strike_index = i;
2480 }
2481
2482 FT_Select_Size (face, strike_index);
2483 }
2484
2485 for (o = 0; o < NUM_DECODE; o++)
2486 {
2487 FcChar32 ucs4;
2488 FT_UInt glyph;
2489
2490 if (FT_Select_Charmap (face, fcFontEncodings[o]) != 0)
2491 continue;
2492
2493 ucs4 = FT_Get_First_Char (face, &glyph);
2494 while (glyph != 0 && num_advances < 3)
2495 {
2496 FT_Pos advance = 0;
2497 if (!FT_Get_Advance (face, glyph, load_flags, &advance) && advance)
2498 {
2499 unsigned int j;
2500 for (j = 0; j < num_advances; j++)
2501 if (fc_approximately_equal (advance, advances[j]))
2502 break;
2503 if (j == num_advances)
2504 advances[num_advances++] = advance;
2505 }
2506
2507 ucs4 = FT_Get_Next_Char (face, ucs4, &glyph);
2508 }
2509 break;
2510 }
2511
2512 if (num_advances <= 1)
2513 return FC_MONO;
2514 else if (num_advances == 2 &&
2515 fc_approximately_equal (fc_min (advances[0], advances[1]) * 2,
2516 fc_max (advances[0], advances[1])))
2517 return FC_DUAL;
2518 else
2519 return FC_PROPORTIONAL;
2520 }
2521
2522 FcCharSet *
2523 FcFreeTypeCharSet (FT_Face face, FcBlanks *blanks FC_UNUSED)
2524 {
2525 const FT_Int load_flags = FT_LOAD_IGNORE_GLOBAL_ADVANCE_WIDTH | FT_LOAD_NO_SCALE | FT_LOAD_NO_HINTING;
2526 FcCharSet *fcs;
2527 int o;
2528
2529 fcs = FcCharSetCreate ();
2530 if (!fcs)
2531 goto bail;
2532
2533 #ifdef CHECK
2534 printf ("Family %s style %s\n", face->family_name, face->style_name);
2535 #endif
2536 for (o = 0; o < NUM_DECODE; o++)
2537 {
2538 FcChar32 page, off, ucs4;
2539 FcCharLeaf *leaf;
2540 FT_UInt glyph;
2541
2542 if (FT_Select_Charmap (face, fcFontEncodings[o]) != 0)
2543 continue;
2544
2545 page = ~0;
2546 leaf = NULL;
2547 ucs4 = FT_Get_First_Char (face, &glyph);
2548 while (glyph != 0)
2549 {
2550 FcBool good = FcTrue;
2551
2552 /* CID fonts built by Adobe used to make ASCII control chars to cid1
2553 * (space glyph). As such, always check contour for those characters. */
2554 if (ucs4 <= 0x001F)
2555 {
2556 if (FT_Load_Glyph (face, glyph, load_flags) ||
2557 (face->glyph->format == FT_GLYPH_FORMAT_OUTLINE &&
2558 face->glyph->outline.n_contours == 0))
2559 good = FcFalse;
2560 }
2561
2562 if (good)
2563 {
2564 FcCharSetAddChar (fcs, ucs4);
2565 if ((ucs4 >> 8) != page)
2566 {
2567 page = (ucs4 >> 8);
2568 leaf = FcCharSetFindLeafCreate (fcs, ucs4);
2569 if (!leaf)
2570 goto bail;
2571 }
2572 off = ucs4 & 0xff;
2573 leaf->map[off >> 5] |= (1U << (off & 0x1f));
2574 }
2575
2576 ucs4 = FT_Get_Next_Char (face, ucs4, &glyph);
2577 }
2578 if (fcFontEncodings[o] == FT_ENCODING_MS_SYMBOL)
2579 {
2580 /* For symbol-encoded OpenType fonts, we duplicate the
2581 * U+F000..F0FF range at U+0000..U+00FF. That's what
2582 * Windows seems to do, and that's hinted about at:
2583 * http://www.microsoft.com/typography/otspec/recom.htm
2584 * under "Non-Standard (Symbol) Fonts".
2585 *
2586 * See thread with subject "Webdings and other MS symbol
2587 * fonts don't display" on mailing list from May 2015.
2588 */
2589 for (ucs4 = 0xF000; ucs4 < 0xF100; ucs4++)
2590 {
2591 if (FcCharSetHasChar (fcs, ucs4))
2592 FcCharSetAddChar (fcs, ucs4 - 0xF000);
2593 }
2594 }
2595 #ifdef CHECK
2596 for (ucs4 = 0x0020; ucs4 < 0x10000; ucs4++)
2597 {
2598 FcBool FT_Has, FC_Has;
2599
2600 FT_Has = FT_Get_Char_Index (face, ucs4) != 0;
2601 FC_Has = FcCharSetHasChar (fcs, ucs4);
2602 if (FT_Has != FC_Has)
2603 {
2604 printf ("0x%08x FT says %d FC says %d\n", ucs4, FT_Has, FC_Has);
2605 }
2606 }
2607 #endif
2608 break;
2609 }
2610
2611 return fcs;
2612 bail:
2613 FcCharSetDestroy (fcs);
2614 return 0;
2615 }
2616
2617 FcCharSet *
2618 FcFreeTypeCharSetAndSpacing (FT_Face face, FcBlanks *blanks FC_UNUSED, int *spacing)
2619 {
2620
2621 if (spacing)
2622 *spacing = FcFreeTypeSpacing (face);
2623
2624 return FcFreeTypeCharSet (face, blanks);
2625 }
2626
2627
2628 #define TTAG_GPOS FT_MAKE_TAG( 'G', 'P', 'O', 'S' )
2629 #define TTAG_GSUB FT_MAKE_TAG( 'G', 'S', 'U', 'B' )
2630 #define TTAG_SILF FT_MAKE_TAG( 'S', 'i', 'l', 'f')
2631 #define TTAG_prep FT_MAKE_TAG( 'p', 'r', 'e', 'p' )
2632
2633 #define OTLAYOUT_HEAD "otlayout:"
2634 #define OTLAYOUT_HEAD_LEN 9
2635 #define OTLAYOUT_ID_LEN 4
2636 /* space + head + id */
2637 #define OTLAYOUT_LEN (1 + OTLAYOUT_HEAD_LEN + OTLAYOUT_ID_LEN)
2638
2639 /*
2640 * This is a bit generous; the registry has only lower case and space
2641 * except for 'DFLT'.
2642 */
2643 #define FcIsSpace(x) (040 == (x))
2644 #define FcIsDigit(c) (('0' <= (c) && (c) <= '9'))
2645 #define FcIsValidScript(x) (FcIsLower(x) || FcIsUpper (x) || FcIsDigit(x) || FcIsSpace(x))
2646
2647 static void
2648 addtag(FcChar8 *complex_, FT_ULong tag)
2649 {
2650 FcChar8 tagstring[OTLAYOUT_ID_LEN + 1];
2651
2652 tagstring[0] = (FcChar8)(tag >> 24),
2653 tagstring[1] = (FcChar8)(tag >> 16),
2654 tagstring[2] = (FcChar8)(tag >> 8),
2655 tagstring[3] = (FcChar8)(tag);
2656 tagstring[4] = '\0';
2657
2658 /* skip tags which aren't alphanumeric, under the assumption that
2659 * they're probably broken
2660 */
2661 if (!FcIsValidScript(tagstring[0]) ||
2662 !FcIsValidScript(tagstring[1]) ||
2663 !FcIsValidScript(tagstring[2]) ||
2664 !FcIsValidScript(tagstring[3]))
2665 return;
2666
2667 if (*complex_ != '\0')
2668 strcat ((char *) complex_, " ");
2669 strcat ((char *) complex_, OTLAYOUT_HEAD);
2670 strcat ((char *) complex_, (char *) tagstring);
2671 }
2672
2673 static int
2674 compareulong (const void *a, const void *b)
2675 {
2676 const FT_ULong *ua = (const FT_ULong *) a;
2677 const FT_ULong *ub = (const FT_ULong *) b;
2678 return *ua - *ub;
2679 }
2680
2681 static FcBool
2682 FindTable (FT_Face face, FT_ULong tabletag)
2683 {
2684 FT_Stream stream = face->stream;
2685 FT_Error error;
2686
2687 if (!stream)
2688 return FcFalse;
2689
2690 if (( error = ftglue_face_goto_table( face, tabletag, stream ) ))
2691 return FcFalse;
2692
2693 return FcTrue;
2694 }
2695
2696 static int
2697 GetScriptTags(FT_Face face, FT_ULong tabletag, FT_ULong **stags)
2698 {
2699 FT_ULong cur_offset, new_offset, base_offset;
2700 FT_Stream stream = face->stream;
2701 FT_Error error;
2702 FT_UShort n, p;
2703 int script_count;
2704
2705 if (!stream)
2706 return 0;
2707
2708 if (( error = ftglue_face_goto_table( face, tabletag, stream ) ))
2709 return 0;
2710
2711 base_offset = ftglue_stream_pos ( stream );
2712
2713 /* skip version */
2714
2715 if ( ftglue_stream_seek ( stream, base_offset + 4L ) || ftglue_stream_frame_enter( stream, 2L ) )
2716 return 0;
2717
2718 new_offset = GET_UShort() + base_offset;
2719
2720 ftglue_stream_frame_exit( stream );
2721
2722 cur_offset = ftglue_stream_pos( stream );
2723
2724 if ( ftglue_stream_seek( stream, new_offset ) != FT_Err_Ok )
2725 return 0;
2726
2727 base_offset = ftglue_stream_pos( stream );
2728
2729 if ( ftglue_stream_frame_enter( stream, 2L ) )
2730 return 0;
2731
2732 script_count = GET_UShort ();
2733
2734 ftglue_stream_frame_exit( stream );
2735
2736 *stags = malloc(script_count * sizeof (FT_ULong));
2737 if (!*stags)
2738 return 0;
2739
2740 p = 0;
2741 for ( n = 0; n < script_count; n++ )
2742 {
2743 if ( ftglue_stream_frame_enter( stream, 6L ) )
2744 goto Fail;
2745
2746 (*stags)[p] = GET_ULong ();
2747 new_offset = GET_UShort () + base_offset;
2748
2749 ftglue_stream_frame_exit( stream );
2750
2751 cur_offset = ftglue_stream_pos( stream );
2752
2753 error = ftglue_stream_seek( stream, new_offset );
2754
2755 if ( error == FT_Err_Ok )
2756 p++;
2757
2758 (void)ftglue_stream_seek( stream, cur_offset );
2759 }
2760
2761 if (!p)
2762 goto Fail;
2763
2764 /* sort the tag list before returning it */
2765 qsort(*stags, script_count, sizeof(FT_ULong), compareulong);
2766
2767 return script_count;
2768
2769 Fail:
2770 free(*stags);
2771 *stags = NULL;
2772 return 0;
2773 }
2774
2775 static FcChar8 *
2776 FcFontCapabilities(FT_Face face)
2777 {
2778 FcBool issilgraphitefont = 0;
2779 FT_Error err;
2780 FT_ULong len = 0;
2781 FT_ULong *gsubtags=NULL, *gpostags=NULL;
2782 FT_UShort gsub_count=0, gpos_count=0;
2783 FT_ULong maxsize;
2784 FcChar8 *complex_ = NULL;
2785 int indx1 = 0, indx2 = 0;
2786
2787 err = FT_Load_Sfnt_Table(face, TTAG_SILF, 0, 0, &len);
2788 issilgraphitefont = ( err == FT_Err_Ok);
2789
2790 gpos_count = GetScriptTags(face, TTAG_GPOS, &gpostags);
2791 gsub_count = GetScriptTags(face, TTAG_GSUB, &gsubtags);
2792
2793 if (!issilgraphitefont && !gsub_count && !gpos_count)
2794 goto bail;
2795
2796 maxsize = (((FT_ULong) gpos_count + (FT_ULong) gsub_count) * OTLAYOUT_LEN +
2797 (issilgraphitefont ? 13 : 0));
2798 complex_ = malloc (sizeof (FcChar8) * maxsize);
2799 if (!complex_)
2800 goto bail;
2801
2802 complex_[0] = '\0';
2803 if (issilgraphitefont)
2804 strcpy((char *) complex_, "ttable:Silf ");
2805
2806 while ((indx1 < gsub_count) || (indx2 < gpos_count)) {
2807 if (indx1 == gsub_count) {
2808 addtag(complex_, gpostags[indx2]);
2809 indx2++;
2810 } else if ((indx2 == gpos_count) || (gsubtags[indx1] < gpostags[indx2])) {
2811 addtag(complex_, gsubtags[indx1]);
2812 indx1++;
2813 } else if (gsubtags[indx1] == gpostags[indx2]) {
2814 addtag(complex_, gsubtags[indx1]);
2815 indx1++;
2816 indx2++;
2817 } else {
2818 addtag(complex_, gpostags[indx2]);
2819 indx2++;
2820 }
2821 }
2822 if (FcDebug () & FC_DBG_SCANV)
2823 printf("complex_ features in this font: %s\n", complex_);
2824 bail:
2825 free(gsubtags);
2826 free(gpostags);
2827 return complex_;
2828 }
2829
2830 static FcBool
2831 FcFontHasHint (FT_Face face)
2832 {
2833 return FindTable (face, TTAG_prep);
2834 }
2835
2836
2837 #define __fcfreetype__
2838 #include "fcaliastail.h"
2839 #include "fcftaliastail.h"
2840 #undef __fcfreetype__