int
main (int argc, char **argv)
{
int index_set = 0;
int set_index = 0;
FcChar8 *lang = NULL;
const FcCharSet *fcs_lang = NULL;
int err = 0;
int i;
FT_Library ftlib;
FcBool verbose = FcFalse;
#if HAVE_GETOPT_LONG || HAVE_GETOPT
int c;
setlocale (LC_ALL, "");
#if HAVE_GETOPT_LONG
while ((c = getopt_long (argc, argv, "i:l:mVhv", longopts, NULL)) != -1)
#else
while ((c = getopt (argc, argv, "i:l:mVhv")) != -1)
#endif
{
switch (c) {
case 'i':
index_set = 1;
set_index = atoi (optarg);
break;
case 'l':
lang = (FcChar8 *) FcLangNormalize ((const FcChar8 *) optarg);
break;
case 'v':
verbose = FcTrue;
break;
case 'V':
fprintf (stderr, "fontconfig version %d.%d.%d\n",
FC_MAJOR, FC_MINOR, FC_REVISION);
exit (0);
case 'h':
usage (argv[0], 0);
default:
usage (argv[0], 1);
}
}
i = optind;
#else
i = 1;
verbose = FcTrue;
#endif
if (i == argc)
usage (argv[0], 1);
if (!lang)
lang = FcLangNormalize ((const FcChar8 *) setlocale (LC_CTYPE, NULL));
if (lang)
fcs_lang = FcLangGetCharSet (lang);
if (FT_Init_FreeType (&ftlib))
{
fprintf (stderr, _("Can't initalize FreeType library\n"));
return 1;
}
for (; i < argc; i++)
{
int index;
index = set_index;
do {
FT_Face face;
FcCharSet *fcs, *fcs_sub;
if (FT_New_Face (ftlib, argv[i], index, &face))
{
if (!index_set && index > 0)
break;
fprintf (stderr, _("Unable to open %s\n"), argv[i]);
err = 1;
}
else
{
FcChar32 count;
fcs = FcFreeTypeCharSet (face, NULL);
fcs_sub = FcCharSetSubtract (fcs_lang, fcs);
count = FcCharSetCount (fcs_sub);
if (count > 0)
{
FcChar32 ucs4, pos, map[FC_CHARSET_MAP_SIZE];
printf (_("%s:%d Missing %d glyph(s) to satisfy the coverage for %s language\n"),
argv[i], index, count, lang);
if (verbose)
{
for (ucs4 = FcCharSetFirstPage (fcs_sub, map, &pos);
ucs4 != FC_CHARSET_DONE;
ucs4 = FcCharSetNextPage (fcs_sub, map, &pos))
{
int j;
for (j = 0; j < FC_CHARSET_MAP_SIZE; j++)
{
FcChar32 bits = map[j];
FcChar32 base = ucs4 + j * 32;
int b = 0;
while (bits)
{
if (bits & 1)
printf (" 0x%04x\n", base + b);
bits >>= 1;
b++;
}
}
}
}
}
else
{
printf (_("%s:%d Satisfy the coverage for %s language\n"), argv[i], index, lang);
}
FcCharSetDestroy (fcs);
FcCharSetDestroy (fcs_sub);
FT_Done_Face (face);
}
index++;
} while (index_set == 0);
FcLangSet *
FcFreeTypeLangSet (const FcCharSet *charset,
const FcChar8 *exclusiveLang)
{
int i, j;
FcChar32 missing;
const FcCharSet *exclusiveCharset = 0;
FcLangSet *ls;
if (exclusiveLang)
exclusiveCharset = FcLangGetCharSet (exclusiveLang);
ls = FcLangSetCreate ();
if (!ls)
return 0;
if (FcDebug() & FC_DBG_LANGSET)
{
printf ("font charset\n");
FcCharSetPrint (charset);
printf ("\n");
}
for (i = 0; i < NUM_LANG_CHAR_SET; i++)
{
if (FcDebug() & FC_DBG_LANGSET)
{
printf ("%s charset\n", fcLangCharSets[i].lang);
FcCharSetPrint (&fcLangCharSets[i].charset);
printf ("\n");
}
/*
* Check for Han charsets to make fonts
* which advertise support for a single language
* not support other Han languages
*/
if (exclusiveCharset &&
FcFreeTypeIsExclusiveLang (fcLangCharSets[i].lang))
{
if (fcLangCharSets[i].charset.num != exclusiveCharset->num)
continue;
for (j = 0; j < fcLangCharSets[i].charset.num; j++)
if (FcCharSetLeaf(&fcLangCharSets[i].charset, j) !=
FcCharSetLeaf(exclusiveCharset, j))
continue;
}
missing = FcCharSetSubtractCount (&fcLangCharSets[i].charset, charset);
if (FcDebug() & FC_DBG_SCANV)
{
if (missing && missing < 10)
{
FcCharSet *missed = FcCharSetSubtract (&fcLangCharSets[i].charset,
charset);
FcChar32 ucs4;
FcChar32 map[FC_CHARSET_MAP_SIZE];
FcChar32 next;
printf ("\n%s(%u) ", fcLangCharSets[i].lang, missing);
printf ("{");
for (ucs4 = FcCharSetFirstPage (missed, map, &next);
ucs4 != FC_CHARSET_DONE;
ucs4 = FcCharSetNextPage (missed, map, &next))
{
int i, j;
for (i = 0; i < FC_CHARSET_MAP_SIZE; i++)
if (map[i])
{
for (j = 0; j < 32; j++)
if (map[i] & (1 << j))
printf (" %04x", ucs4 + i * 32 + j);
}
}
printf (" }\n\t");
FcCharSetDestroy (missed);
}
else
printf ("%s(%u) ", fcLangCharSets[i].lang, missing);
}
if (!missing)
FcLangSetBitSet (ls, i);
}
if (FcDebug() & FC_DBG_SCANV)
printf ("\n");
return ls;
}
/* no character exists */
FcChar32 fcinfo_chars(FcCharSet *charset, FcChar32 **chars,
const char *uinterval, uinterval_type_t uintype,
FcBool grid, FcChar32 maxchars)
{
FcChar32 available, nchars, n;
FcBlanks *blanks = FcConfigGetBlanks(NULL);
FcChar32 ucs4;
FcChar32 map[FC_CHARSET_MAP_SIZE];
FcChar32 next;
int i, j, left, right;
int nlines;
nlines = 0;
for (ucs4 = FcCharSetFirstPage (charset, map, &next);
ucs4 != FC_CHARSET_DONE;
ucs4 = FcCharSetNextPage (charset, map, &next))
{
int i;
/* for ucs4 == 0, skip i == 0 and i == 4, see below */
for (i = (ucs4 == 0 ? 1 : 0);
i < FC_CHARSET_MAP_SIZE;
ucs4 == 0 && i == 3 ? i = 5 : i++)
if (map[i] &&
(!uinterval ||
unicode_interval_contains(uinterval, uintype, ucs4 + 32*i) ||
unicode_interval_contains(uinterval, uintype, ucs4 + 32*i + 0x10)))
nlines++;
}
if (grid)
available = 32*nlines;
else
available = FcCharSetCount(charset);
nchars = available < maxchars ? available : maxchars;
*chars = (FcChar32*)malloc(nchars*sizeof(FcChar32));
if (! *chars)
{
fprintf(stderr, "fcinfo_chars(): can't allocate memory\n");
exit(1);
}
/* for() code below borrowed from fontconfig-2.10.2/src/fclang.c */
n = 0;
for (ucs4 = FcCharSetFirstPage (charset, map, &next);
ucs4 != FC_CHARSET_DONE;
ucs4 = FcCharSetNextPage (charset, map, &next))
{
/* for some fonts (e. g. Dina) fontconfig reports they contain
control characters; skip them for sure (we get 'wrong unicode
character' while converting svg if not) */
for (i = (ucs4 == 0 ? 1 : 0);
i < FC_CHARSET_MAP_SIZE;
ucs4 == 0 && i == 3 ? i = 5 : i++)
{
if (map[i])
{
left = 0;
right = 32;
if (uinterval && !unicode_interval_contains(uinterval, uintype, ucs4 + 32*i))
left = 16;
if (uinterval && !unicode_interval_contains(uinterval, uintype, ucs4 + 32*i + 16))
right = 16;
for (j = left; j < right; j++)
{
if (map[i] & (1 << j))
{
FcChar32 ch = ucs4 + 32*i + j;
if (grid == FcTrue || !FcBlanksIsMember(blanks, ch))
(*chars)[n++] = ch;
}
else if (grid == FcTrue)
(*chars)[n++] = NO_CHAR;
if (n == nchars)
return n;
}
}
}
}
return n;
}
