src/fcdefault.c

   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 <string.h>
  27
  28 /* MT-safe */
  29
  30 static const struct {
  31     FcObject    field;
  32     FcBool      value;
  33 } FcBoolDefaults[] = {
  34     { FC_HINTING_OBJECT,           FcTrue       },  /* !FT_LOAD_NO_HINTING */
  35     { FC_VERTICAL_LAYOUT_OBJECT,   FcFalse      },  /* FC_LOAD_VERTICAL_LAYOUT */
  36     { FC_AUTOHINT_OBJECT,          FcFalse      },  /* FC_LOAD_FORCE_AUTOHINT */
  37     { FC_GLOBAL_ADVANCE_OBJECT,    FcTrue       },  /* !FC_LOAD_IGNORE_GLOBAL_ADVANCE_WIDTH */
  38     { FC_EMBEDDED_BITMAP_OBJECT,   FcTrue       },  /* !FC_LOAD_NO_BITMAP */
  39     { FC_DECORATIVE_OBJECT,        FcFalse      },
  40 };
  41
  42 #define NUM_FC_BOOL_DEFAULTS    (int) (sizeof FcBoolDefaults / sizeof FcBoolDefaults[0])
  43
  44 FcStrSet *default_langs;
  45
  46 FcStrSet *
  47 FcGetDefaultLangs (void)
  48 {
  49     FcStrSet *result;
  50 retry:
  51     result = (FcStrSet *) fc_atomic_ptr_get (&default_langs);
  52     if (!result)
  53     {
  54         char *langs;
  55
  56         result = FcStrSetCreate ();
  57
  58         langs = getenv ("FC_LANG");
  59         if (!langs || !langs[0])
  60             langs = getenv ("LC_ALL");
  61         if (!langs || !langs[0])
  62             langs = getenv ("LC_CTYPE");
  63         if (!langs || !langs[0])
  64             langs = getenv ("LANG");
  65         if (langs && langs[0])
  66         {
  67             if (!FcStrSetAddLangs (result, langs))
  68                 FcStrSetAdd (result, (const FcChar8 *) "en");
  69         }
  70         else
  71             FcStrSetAdd (result, (const FcChar8 *) "en");
  72
  73         FcRefSetConst (&result->ref);
  74         if (!fc_atomic_ptr_cmpexch (&default_langs, NULL, result)) {
  75             FcRefInit (&result->ref, 1);
  76             FcStrSetDestroy (result);
  77             goto retry;
  78         }
  79     }
  80
  81     return result;
  82 }
  83
  84 static FcChar8 *default_lang; /* MT-safe */
  85
  86 FcChar8 *
  87 FcGetDefaultLang (void)
  88 {
  89     FcChar8 *lang;
  90 retry:
  91     lang = fc_atomic_ptr_get (&default_lang);
  92     if (!lang)
  93     {
  94         FcStrSet *langs = FcGetDefaultLangs ();
  95         lang = (FcChar8 *) strdup ((const char *) langs->strs[0]);
  96         FcStrSetDestroy (langs);
  97
  98         if (!fc_atomic_ptr_cmpexch (&default_lang, NULL, lang)) {
  99             free (lang);
 100             goto retry;
 101         }
 102     }
 103
 104     return lang;
 105 }
 106
 107 void
 108 FcDefaultFini (void)
 109 {
 110     FcChar8  *lang;
 111     FcStrSet *langs;
 112
 113     lang = fc_atomic_ptr_get (&default_lang);
 114     if (lang && fc_atomic_ptr_cmpexch (&default_lang, lang, NULL)) {
 115         free (lang);
 116     }
 117
 118     langs = fc_atomic_ptr_get (&default_langs);
 119     if (langs && fc_atomic_ptr_cmpexch (&default_langs, langs, NULL)) {
 120         FcRefInit (&langs->ref, 1);
 121         FcStrSetDestroy (langs);
 122         langs = NULL;
 123     }
 124 }
 125
 126 void
 127 FcDefaultSubstitute (FcPattern *pattern)
 128 {
 129     FcValue v, namelang, v2;
 130     int     i;
 131
 132     if (FcPatternObjectGet (pattern, FC_WEIGHT_OBJECT, 0, &v) == FcResultNoMatch )
 133         FcPatternObjectAddInteger (pattern, FC_WEIGHT_OBJECT, FC_WEIGHT_MEDIUM);
 134
 135     if (FcPatternObjectGet (pattern, FC_SLANT_OBJECT, 0, &v) == FcResultNoMatch)
 136         FcPatternObjectAddInteger (pattern, FC_SLANT_OBJECT, FC_SLANT_ROMAN);
 137
 138     if (FcPatternObjectGet (pattern, FC_WIDTH_OBJECT, 0, &v) == FcResultNoMatch)
 139         FcPatternObjectAddInteger (pattern, FC_WIDTH_OBJECT, FC_WIDTH_NORMAL);
 140
 141     for (i = 0; i < NUM_FC_BOOL_DEFAULTS; i++)
 142         if (FcPatternObjectGet (pattern, FcBoolDefaults[i].field, 0, &v) == FcResultNoMatch)
 143             FcPatternObjectAddBool (pattern, FcBoolDefaults[i].field, FcBoolDefaults[i].value);
 144
 145     if (FcPatternObjectGet (pattern, FC_PIXEL_SIZE_OBJECT, 0, &v) == FcResultNoMatch)
 146     {
 147         double  dpi, size, scale;
 148
 149         if (FcPatternObjectGetDouble (pattern, FC_SIZE_OBJECT, 0, &size) != FcResultMatch)
 150         {
 151             size = 12.0;
 152             (void) FcPatternObjectDel (pattern, FC_SIZE_OBJECT);
 153             FcPatternObjectAddDouble (pattern, FC_SIZE_OBJECT, size);
 154         }
 155         if (FcPatternObjectGetDouble (pattern, FC_SCALE_OBJECT, 0, &scale) != FcResultMatch)
 156         {
 157             scale = 1.0;
 158             (void) FcPatternObjectDel (pattern, FC_SCALE_OBJECT);
 159             FcPatternObjectAddDouble (pattern, FC_SCALE_OBJECT, scale);
 160         }
 161         size *= scale;
 162         if (FcPatternObjectGetDouble (pattern, FC_DPI_OBJECT, 0, &dpi) != FcResultMatch)
 163         {
 164             dpi = 75.0;
 165             (void) FcPatternObjectDel (pattern, FC_DPI_OBJECT);
 166             FcPatternObjectAddDouble (pattern, FC_DPI_OBJECT, dpi);
 167         }
 168         size *= dpi / 72.0;
 169         FcPatternObjectAddDouble (pattern, FC_PIXEL_SIZE_OBJECT, size);
 170     }
 171
 172     if (FcPatternObjectGet (pattern, FC_FONTVERSION_OBJECT, 0, &v) == FcResultNoMatch)
 173     {
 174         FcPatternObjectAddInteger (pattern, FC_FONTVERSION_OBJECT, 0x7fffffff);
 175     }
 176
 177     if (FcPatternObjectGet (pattern, FC_HINT_STYLE_OBJECT, 0, &v) == FcResultNoMatch)
 178     {
 179         FcPatternObjectAddInteger (pattern, FC_HINT_STYLE_OBJECT, FC_HINT_FULL);
 180     }
 181     if (FcPatternObjectGet (pattern, FC_NAMELANG_OBJECT, 0, &v) == FcResultNoMatch)
 182     {
 183         FcPatternObjectAddString (pattern, FC_NAMELANG_OBJECT, FcGetDefaultLang ());
 184     }
 185     /* shouldn't be failed. */
 186     FcPatternObjectGet (pattern, FC_NAMELANG_OBJECT, 0, &namelang);
 187     /* Add a fallback to ensure the english name when the requested language
 188      * isn't available. this would helps for the fonts that have non-English
 189      * name at the beginning.
 190      */
 191     /* Set "en-us" instead of "en" to avoid giving higher score to "en".
 192      * This is a hack for the case that the orth is not like ll-cc, because,
 193      * if no namelang isn't explicitly set, it will has something like ll-cc
 194      * according to current locale. which may causes FcLangDifferentTerritory
 195      * at FcLangCompare(). thus, the English name is selected so that
 196      * exact matched "en" has higher score than ll-cc.
 197      */
 198     v2.type = FcTypeString;
 199     v2.u.s = FcSharedStr ((FcChar8 *)"en-us");
 200     if (FcPatternObjectGet (pattern, FC_FAMILYLANG_OBJECT, 0, &v) == FcResultNoMatch)
 201     {
 202         FcPatternObjectAdd (pattern, FC_FAMILYLANG_OBJECT, namelang, FcTrue);
 203         FcPatternObjectAddWithBinding (pattern, FC_FAMILYLANG_OBJECT, v2, FcValueBindingWeak, FcTrue);
 204     }
 205     if (FcPatternObjectGet (pattern, FC_STYLELANG_OBJECT, 0, &v) == FcResultNoMatch)
 206     {
 207         FcPatternObjectAdd (pattern, FC_STYLELANG_OBJECT, namelang, FcTrue);
 208         FcPatternObjectAddWithBinding (pattern, FC_STYLELANG_OBJECT, v2, FcValueBindingWeak, FcTrue);
 209     }
 210     if (FcPatternObjectGet (pattern, FC_FULLNAMELANG_OBJECT, 0, &v) == FcResultNoMatch)
 211     {
 212         FcPatternObjectAdd (pattern, FC_FULLNAMELANG_OBJECT, namelang, FcTrue);
 213         FcPatternObjectAddWithBinding (pattern, FC_FULLNAMELANG_OBJECT, v2, FcValueBindingWeak, FcTrue);
 214     }
 215     FcSharedStrFree ((char *) v2.u.s);
 216 }
 217 #define __fcdefault__
 218 #include "fcaliastail.h"
 219 #undef __fcdefault__