1 /*
2 * fontconfig/src/fcdefault.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 <limits.h>
27 #include <string.h>
28
29 /* MT-safe */
30
31 static const struct {
32 FcObject field;
33 FcBool value;
34 } FcBoolDefaults[] = {
35 { FC_HINTING_OBJECT, FcTrue }, /* !FT_LOAD_NO_HINTING */
36 { FC_VERTICAL_LAYOUT_OBJECT, FcFalse }, /* FC_LOAD_VERTICAL_LAYOUT */
37 { FC_AUTOHINT_OBJECT, FcFalse }, /* FC_LOAD_FORCE_AUTOHINT */
38 { FC_GLOBAL_ADVANCE_OBJECT, FcTrue }, /* !FC_LOAD_IGNORE_GLOBAL_ADVANCE_WIDTH */
39 { FC_EMBEDDED_BITMAP_OBJECT, FcTrue }, /* !FC_LOAD_NO_BITMAP */
40 { FC_DECORATIVE_OBJECT, FcFalse },
41 { FC_SYMBOL_OBJECT, FcFalse },
42 { FC_VARIABLE_OBJECT, FcFalse },
43 };
44
45 #define NUM_FC_BOOL_DEFAULTS (int) (sizeof FcBoolDefaults / sizeof FcBoolDefaults[0])
46
47 FcStrSet *default_langs;
48
49 FcStrSet *
FcGetDefaultLangs(void)50 FcGetDefaultLangs (void)
51 {
52 FcStrSet *result;
53 retry:
54 result = (FcStrSet *) fc_atomic_ptr_get (&default_langs);
55 if (!result)
56 {
57 char *langs;
58
59 result = FcStrSetCreate ();
60
61 langs = getenv ("FC_LANG");
62 if (!langs || !langs[0])
63 langs = getenv ("LC_ALL");
64 if (!langs || !langs[0])
65 langs = getenv ("LC_CTYPE");
66 if (!langs || !langs[0])
67 langs = getenv ("LANG");
68 if (langs && langs[0])
69 {
70 if (!FcStrSetAddLangs (result, langs))
71 FcStrSetAdd (result, (const FcChar8 *) "en");
72 }
73 else
74 FcStrSetAdd (result, (const FcChar8 *) "en");
75
76 FcRefSetConst (&result->ref);
77 if (!fc_atomic_ptr_cmpexch (&default_langs, NULL, result)) {
78 FcRefInit (&result->ref, 1);
79 FcStrSetDestroy (result);
80 goto retry;
81 }
82 }
83
84 return result;
85 }
86
87 static FcChar8 *default_lang; /* MT-safe */
88
89 FcChar8 *
FcGetDefaultLang(void)90 FcGetDefaultLang (void)
91 {
92 FcChar8 *lang;
93 retry:
94 lang = fc_atomic_ptr_get (&default_lang);
95 if (!lang)
96 {
97 FcStrSet *langs = FcGetDefaultLangs ();
98 lang = FcStrdup (langs->strs[0]);
99
100 if (!fc_atomic_ptr_cmpexch (&default_lang, NULL, lang)) {
101 free (lang);
102 goto retry;
103 }
104 }
105
106 return lang;
107 }
108
109 static FcChar8 *default_prgname;
110
111 FcChar8 *
FcGetPrgname(void)112 FcGetPrgname (void)
113 {
114 FcChar8 *prgname;
115 retry:
116 prgname = fc_atomic_ptr_get (&default_prgname);
117 if (!prgname)
118 {
119 #ifdef _WIN32
120 char buf[MAX_PATH+1];
121
122 /* TODO This is ASCII-only; fix it. */
123 if (GetModuleFileNameA (GetModuleHandle (NULL), buf, sizeof (buf) / sizeof (buf[0])) > 0)
124 {
125 char *p;
126 unsigned int len;
127
128 p = strrchr (buf, '\\');
129 if (p)
130 p++;
131 else
132 p = buf;
133
134 len = strlen (p);
135
136 if (len > 4 && 0 == strcmp (p + len - 4, ".exe"))
137 {
138 len -= 4;
139 buf[len] = '\0';
140 }
141
142 prgname = FcStrdup (p);
143 }
144 #elif defined (HAVE_GETPROGNAME)
145 const char *q = getprogname ();
146 if (q)
147 prgname = FcStrdup (q);
148 else
149 prgname = FcStrdup ("");
150 #else
151 # if defined (HAVE_GETEXECNAME)
152 char *p = FcStrdup(getexecname ());
153 # elif defined (HAVE_READLINK)
154 size_t size = FC_PATH_MAX;
155 char *p = NULL;
156
157 while (1)
158 {
159 char *buf = malloc (size);
160 ssize_t len;
161
162 if (!buf)
163 break;
164
165 len = readlink ("/proc/self/exe", buf, size - 1);
166 if (len < 0)
167 {
168 free (buf);
169 break;
170 }
171 if (len < size - 1)
172 {
173 buf[len] = 0;
174 p = buf;
175 break;
176 }
177
178 free (buf);
179 size *= 2;
180 }
181 # else
182 char *p = NULL;
183 # endif
184 if (p)
185 {
186 char *r = strrchr (p, '/');
187 if (r)
188 r++;
189 else
190 r = p;
191
192 prgname = FcStrdup (r);
193 }
194
195 if (!prgname)
196 prgname = FcStrdup ("");
197
198 if (p)
199 free (p);
200 #endif
201
202 if (!fc_atomic_ptr_cmpexch (&default_prgname, NULL, prgname)) {
203 free (prgname);
204 goto retry;
205 }
206 }
207
208 if (prgname && !prgname[0])
209 return NULL;
210
211 return prgname;
212 }
213
214 void
FcDefaultFini(void)215 FcDefaultFini (void)
216 {
217 FcChar8 *lang;
218 FcStrSet *langs;
219 FcChar8 *prgname;
220
221 lang = fc_atomic_ptr_get (&default_lang);
222 if (lang && fc_atomic_ptr_cmpexch (&default_lang, lang, NULL)) {
223 free (lang);
224 }
225
226 langs = fc_atomic_ptr_get (&default_langs);
227 if (langs && fc_atomic_ptr_cmpexch (&default_langs, langs, NULL)) {
228 FcRefInit (&langs->ref, 1);
229 FcStrSetDestroy (langs);
230 }
231
232 prgname = fc_atomic_ptr_get (&default_prgname);
233 if (prgname && fc_atomic_ptr_cmpexch (&default_prgname, prgname, NULL)) {
234 free (prgname);
235 }
236 }
237
238 void
FcDefaultSubstitute(FcPattern * pattern)239 FcDefaultSubstitute (FcPattern *pattern)
240 {
241 FcPatternIter iter;
242 FcValue v, namelang, v2;
243 int i;
244 double dpi, size, scale, pixelsize;
245
246 if (!FcPatternFindObjectIter (pattern, &iter, FC_WEIGHT_OBJECT))
247 FcPatternObjectAddInteger (pattern, FC_WEIGHT_OBJECT, FC_WEIGHT_NORMAL);
248
249 if (!FcPatternFindObjectIter (pattern, &iter, FC_SLANT_OBJECT))
250 FcPatternObjectAddInteger (pattern, FC_SLANT_OBJECT, FC_SLANT_ROMAN);
251
252 if (!FcPatternFindObjectIter (pattern, &iter, FC_WIDTH_OBJECT))
253 FcPatternObjectAddInteger (pattern, FC_WIDTH_OBJECT, FC_WIDTH_NORMAL);
254
255 for (i = 0; i < NUM_FC_BOOL_DEFAULTS; i++)
256 if (!FcPatternFindObjectIter (pattern, &iter, FcBoolDefaults[i].field))
257 FcPatternObjectAddBool (pattern, FcBoolDefaults[i].field, FcBoolDefaults[i].value);
258
259 if (FcPatternObjectGetDouble (pattern, FC_SIZE_OBJECT, 0, &size) != FcResultMatch)
260 {
261 FcRange *r;
262 double b, e;
263 if (FcPatternObjectGetRange (pattern, FC_SIZE_OBJECT, 0, &r) == FcResultMatch && FcRangeGetDouble (r, &b, &e))
264 size = (b + e) * .5;
265 else
266 size = 12.0L;
267 }
268 if (FcPatternObjectGetDouble (pattern, FC_SCALE_OBJECT, 0, &scale) != FcResultMatch)
269 scale = 1.0;
270 if (FcPatternObjectGetDouble (pattern, FC_DPI_OBJECT, 0, &dpi) != FcResultMatch)
271 dpi = 75.0;
272
273 if (!FcPatternFindObjectIter (pattern, &iter, FC_PIXEL_SIZE_OBJECT))
274 {
275 (void) FcPatternObjectDel (pattern, FC_SCALE_OBJECT);
276 FcPatternObjectAddDouble (pattern, FC_SCALE_OBJECT, scale);
277 pixelsize = size * scale;
278 (void) FcPatternObjectDel (pattern, FC_DPI_OBJECT);
279 FcPatternObjectAddDouble (pattern, FC_DPI_OBJECT, dpi);
280 pixelsize *= dpi / 72.0;
281 FcPatternObjectAddDouble (pattern, FC_PIXEL_SIZE_OBJECT, pixelsize);
282 }
283 else
284 {
285 FcPatternIterGetValue(pattern, &iter, 0, &v, NULL);
286 size = v.u.d;
287 size = size / dpi * 72.0 / scale;
288 }
289 (void) FcPatternObjectDel (pattern, FC_SIZE_OBJECT);
290 FcPatternObjectAddDouble (pattern, FC_SIZE_OBJECT, size);
291
292 if (!FcPatternFindObjectIter (pattern, &iter, FC_FONTVERSION_OBJECT))
293 FcPatternObjectAddInteger (pattern, FC_FONTVERSION_OBJECT, 0x7fffffff);
294
295 if (!FcPatternFindObjectIter (pattern, &iter, FC_HINT_STYLE_OBJECT))
296 FcPatternObjectAddInteger (pattern, FC_HINT_STYLE_OBJECT, FC_HINT_FULL);
297
298 if (!FcPatternFindObjectIter (pattern, &iter, FC_NAMELANG_OBJECT))
299 FcPatternObjectAddString (pattern, FC_NAMELANG_OBJECT, FcGetDefaultLang ());
300
301 /* shouldn't be failed. */
302 FcPatternObjectGet (pattern, FC_NAMELANG_OBJECT, 0, &namelang);
303 /* Add a fallback to ensure the english name when the requested language
304 * isn't available. this would helps for the fonts that have non-English
305 * name at the beginning.
306 */
307 /* Set "en-us" instead of "en" to avoid giving higher score to "en".
308 * This is a hack for the case that the orth is not like ll-cc, because,
309 * if no namelang isn't explicitly set, it will has something like ll-cc
310 * according to current locale. which may causes FcLangDifferentTerritory
311 * at FcLangCompare(). thus, the English name is selected so that
312 * exact matched "en" has higher score than ll-cc.
313 */
314 v2.type = FcTypeString;
315 v2.u.s = (FcChar8 *) "en-us";
316 if (!FcPatternFindObjectIter (pattern, &iter, FC_FAMILYLANG_OBJECT))
317 {
318 FcPatternObjectAdd (pattern, FC_FAMILYLANG_OBJECT, namelang, FcTrue);
319 FcPatternObjectAddWithBinding (pattern, FC_FAMILYLANG_OBJECT, v2, FcValueBindingWeak, FcTrue);
320 }
321 if (!FcPatternFindObjectIter (pattern, &iter, FC_STYLELANG_OBJECT))
322 {
323 FcPatternObjectAdd (pattern, FC_STYLELANG_OBJECT, namelang, FcTrue);
324 FcPatternObjectAddWithBinding (pattern, FC_STYLELANG_OBJECT, v2, FcValueBindingWeak, FcTrue);
325 }
326 if (!FcPatternFindObjectIter (pattern, &iter, FC_FULLNAMELANG_OBJECT))
327 {
328 FcPatternObjectAdd (pattern, FC_FULLNAMELANG_OBJECT, namelang, FcTrue);
329 FcPatternObjectAddWithBinding (pattern, FC_FULLNAMELANG_OBJECT, v2, FcValueBindingWeak, FcTrue);
330 }
331
332 if (FcPatternObjectGet (pattern, FC_PRGNAME_OBJECT, 0, &v) == FcResultNoMatch)
333 {
334 FcChar8 *prgname = FcGetPrgname ();
335 if (prgname)
336 FcPatternObjectAddString (pattern, FC_PRGNAME_OBJECT, prgname);
337 }
338 }
339 #define __fcdefault__
340 #include "fcaliastail.h"
341 #undef __fcdefault__
342