blob: 4739885c1c6ead754b9a3589c5325a87527ba005 [file] [log] [blame]
/*
* fontconfig/src/fcname.c
*
* Copyright © 2000 Keith Packard
*
* Permission to use, copy, modify, distribute, and sell this software and its
* documentation for any purpose is hereby granted without fee, provided that
* the above copyright notice appear in all copies and that both that
* copyright notice and this permission notice appear in supporting
* documentation, and that the name of the author(s) not be used in
* advertising or publicity pertaining to distribution of the software without
* specific, written prior permission. The authors make no
* representations about the suitability of this software for any purpose. It
* is provided "as is" without express or implied warranty.
*
* THE AUTHOR(S) DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE,
* INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO
* EVENT SHALL THE AUTHOR(S) BE LIABLE FOR ANY SPECIAL, INDIRECT OR
* CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE,
* DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER
* TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR
* PERFORMANCE OF THIS SOFTWARE.
*/
#include "fcint.h"
#include <ctype.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
static const FcObjectType FcObjects[] = {
#define FC_OBJECT(NAME, Type, Cmp) { FC_##NAME, Type },
#include "fcobjs.h"
#undef FC_OBJECT
};
#define NUM_OBJECT_TYPES ((int)(sizeof FcObjects / sizeof FcObjects[0]))
static const FcObjectType *
FcObjectFindById (FcObject object)
{
if (1 <= object && object <= NUM_OBJECT_TYPES)
return &FcObjects[object - 1];
return FcObjectLookupOtherTypeById (object);
}
FcBool
FcNameRegisterObjectTypes (const FcObjectType *types, int ntypes)
{
/* Deprecated. */
return FcFalse;
}
FcBool
FcNameUnregisterObjectTypes (const FcObjectType *types, int ntypes)
{
/* Deprecated. */
return FcFalse;
}
const FcObjectType *
FcNameGetObjectType (const char *object)
{
int id = FcObjectLookupBuiltinIdByName (object);
if (!id)
return FcObjectLookupOtherTypeByName (object);
return &FcObjects[id - 1];
}
FcBool
FcObjectValidType (FcObject object, FcType type)
{
const FcObjectType *t = FcObjectFindById (object);
if (t) {
switch ((int)t->type) {
case FcTypeUnknown:
return FcTrue;
case FcTypeDouble:
case FcTypeInteger:
if (type == FcTypeDouble || type == FcTypeInteger)
return FcTrue;
break;
case FcTypeLangSet:
if (type == FcTypeLangSet || type == FcTypeString)
return FcTrue;
break;
case FcTypeRange:
if (type == FcTypeRange ||
type == FcTypeDouble ||
type == FcTypeInteger)
return FcTrue;
break;
default:
if (type == t->type)
return FcTrue;
break;
}
return FcFalse;
}
return FcTrue;
}
FcObject
FcObjectFromName (const char *name)
{
return FcObjectLookupIdByName (name);
}
FcObjectSet *
FcObjectGetSet (void)
{
int i;
FcObjectSet *os = NULL;
os = FcObjectSetCreate();
for (i = 0; i < NUM_OBJECT_TYPES; i++)
FcObjectSetAdd (os, FcObjects[i].object);
return os;
}
const char *
FcObjectName (FcObject object)
{
const FcObjectType *o = FcObjectFindById (object);
if (o)
return o->object;
return FcObjectLookupOtherNameById (object);
}
typedef FcChar8 *FC8;
static const FcConstant _FcBaseConstants[] = {
{ (FC8) "thin", "weight", FC_WEIGHT_THIN },
{ (FC8) "extralight", "weight", FC_WEIGHT_EXTRALIGHT },
{ (FC8) "ultralight", "weight", FC_WEIGHT_EXTRALIGHT },
{ (FC8) "demilight", "weight", FC_WEIGHT_DEMILIGHT },
{ (FC8) "semilight", "weight", FC_WEIGHT_DEMILIGHT },
{ (FC8) "light", "weight", FC_WEIGHT_LIGHT },
{ (FC8) "book", "weight", FC_WEIGHT_BOOK },
{ (FC8) "regular", "weight", FC_WEIGHT_REGULAR },
{ (FC8) "normal", "weight", FC_WEIGHT_NORMAL },
{ (FC8) "medium", "weight", FC_WEIGHT_MEDIUM },
{ (FC8) "demibold", "weight", FC_WEIGHT_DEMIBOLD },
{ (FC8) "semibold", "weight", FC_WEIGHT_DEMIBOLD },
{ (FC8) "bold", "weight", FC_WEIGHT_BOLD },
{ (FC8) "extrabold", "weight", FC_WEIGHT_EXTRABOLD },
{ (FC8) "ultrabold", "weight", FC_WEIGHT_EXTRABOLD },
{ (FC8) "black", "weight", FC_WEIGHT_BLACK },
{ (FC8) "heavy", "weight", FC_WEIGHT_HEAVY },
{ (FC8) "extrablack", "weight", FC_WEIGHT_EXTRABLACK },
{ (FC8) "ultrablack", "weight", FC_WEIGHT_ULTRABLACK },
{ (FC8) "roman", "slant", FC_SLANT_ROMAN },
{ (FC8) "italic", "slant", FC_SLANT_ITALIC },
{ (FC8) "oblique", "slant", FC_SLANT_OBLIQUE },
{ (FC8) "ultracondensed", "width", FC_WIDTH_ULTRACONDENSED },
{ (FC8) "extracondensed", "width", FC_WIDTH_EXTRACONDENSED },
{ (FC8) "condensed", "width", FC_WIDTH_CONDENSED },
{ (FC8) "semicondensed", "width", FC_WIDTH_SEMICONDENSED },
{ (FC8) "normal", "width", FC_WIDTH_NORMAL },
{ (FC8) "semiexpanded", "width", FC_WIDTH_SEMIEXPANDED },
{ (FC8) "expanded", "width", FC_WIDTH_EXPANDED },
{ (FC8) "extraexpanded", "width", FC_WIDTH_EXTRAEXPANDED },
{ (FC8) "ultraexpanded", "width", FC_WIDTH_ULTRAEXPANDED },
{ (FC8) "proportional", "spacing", FC_PROPORTIONAL },
{ (FC8) "dual", "spacing", FC_DUAL },
{ (FC8) "mono", "spacing", FC_MONO },
{ (FC8) "charcell", "spacing", FC_CHARCELL },
{ (FC8) "unknown", "rgba", FC_RGBA_UNKNOWN },
{ (FC8) "rgb", "rgba", FC_RGBA_RGB },
{ (FC8) "bgr", "rgba", FC_RGBA_BGR },
{ (FC8) "vrgb", "rgba", FC_RGBA_VRGB },
{ (FC8) "vbgr", "rgba", FC_RGBA_VBGR },
{ (FC8) "none", "rgba", FC_RGBA_NONE },
{ (FC8) "hintnone", "hintstyle", FC_HINT_NONE },
{ (FC8) "hintslight", "hintstyle", FC_HINT_SLIGHT },
{ (FC8) "hintmedium", "hintstyle", FC_HINT_MEDIUM },
{ (FC8) "hintfull", "hintstyle", FC_HINT_FULL },
{ (FC8) "antialias", "antialias", FcTrue },
{ (FC8) "hinting", "hinting", FcTrue },
{ (FC8) "verticallayout", "verticallayout", FcTrue },
{ (FC8) "autohint", "autohint", FcTrue },
{ (FC8) "globaladvance", "globaladvance", FcTrue }, /* deprecated */
{ (FC8) "outline", "outline", FcTrue },
{ (FC8) "scalable", "scalable", FcTrue },
{ (FC8) "minspace", "minspace", FcTrue },
{ (FC8) "embolden", "embolden", FcTrue },
{ (FC8) "embeddedbitmap", "embeddedbitmap", FcTrue },
{ (FC8) "decorative", "decorative", FcTrue },
{ (FC8) "lcdnone", "lcdfilter", FC_LCD_NONE },
{ (FC8) "lcddefault", "lcdfilter", FC_LCD_DEFAULT },
{ (FC8) "lcdlight", "lcdfilter", FC_LCD_LIGHT },
{ (FC8) "lcdlegacy", "lcdfilter", FC_LCD_LEGACY },
{ (FC8) "serif", "genericfamily", FC_FAMILY_SERIF },
{ (FC8) "sans-serif", "genericfamily", FC_FAMILY_SANS },
{ (FC8) "monospace", "genericfamily", FC_FAMILY_MONO },
{ (FC8) "cursive", "genericfamily", FC_FAMILY_CURSIVE },
{ (FC8) "fantasy", "genericfamily", FC_FAMILY_FANTASY },
{ (FC8) "system-ui", "genericfamily", FC_FAMILY_SYSTEM_UI },
{ (FC8) "ui-serif", "genericfamily", FC_FAMILY_UI_SERIF },
{ (FC8) "ui-sans-serif", "genericfamily", FC_FAMILY_UI_SANS },
{ (FC8) "ui-monospace", "genericfamily", FC_FAMILY_UI_MONO },
{ (FC8) "ui-rounded", "genericfamily", FC_FAMILY_UI_ROUNDED },
{ (FC8) "emoji", "genericfamily", FC_FAMILY_EMOJI },
{ (FC8) "math", "genericfamily", FC_FAMILY_MATH },
{ (FC8) "fangsong", "genericfamily", FC_FAMILY_FANGSONG },
};
#define NUM_FC_CONSTANTS (sizeof _FcBaseConstants / sizeof _FcBaseConstants[0])
FcBool
FcNameRegisterConstants (const FcConstant *consts, int nconsts)
{
/* Deprecated. */
return FcFalse;
}
FcBool
FcNameUnregisterConstants (const FcConstant *consts, int nconsts)
{
/* Deprecated. */
return FcFalse;
}
const FcConstant *
FcNameGetConstant (const FcChar8 *string)
{
unsigned int i;
for (i = 0; i < NUM_FC_CONSTANTS; i++)
if (!FcStrCmpIgnoreCase (string, _FcBaseConstants[i].name))
return &_FcBaseConstants[i];
return 0;
}
const FcConstant *
FcNameGetConstantFor (const FcChar8 *string, const char *object)
{
unsigned int i;
for (i = 0; i < NUM_FC_CONSTANTS; i++)
if (!FcStrCmpIgnoreCase (string, _FcBaseConstants[i].name) &&
!FcStrCmpIgnoreCase ((const FcChar8 *)object, (const FcChar8 *)_FcBaseConstants[i].object))
return &_FcBaseConstants[i];
return 0;
}
FcBool
FcNameConstant (const FcChar8 *string, int *result)
{
const FcConstant *c;
if ((c = FcNameGetConstant (string))) {
*result = c->value;
return FcTrue;
}
return FcFalse;
}
FcBool
FcNameConstantWithObjectCheck (const FcChar8 *string, const char *object, int *result)
{
const FcConstant *c;
if ((c = FcNameGetConstantFor (string, object))) {
*result = c->value;
return FcTrue;
} else if ((c = FcNameGetConstant (string))) {
if (strcmp (c->object, object) != 0) {
fprintf (stderr, "Fontconfig error: Unexpected constant name `%s' used for object `%s': should be `%s'\n", string, object, c->object);
return FcFalse;
}
/* Unlikely to reach out */
*result = c->value;
return FcTrue;
}
return FcFalse;
}
FcBool
FcNameBool (const FcChar8 *v, FcBool *result)
{
char c0, c1;
c0 = *v;
c0 = FcToLower (c0);
if (c0 == 't' || c0 == 'y' || c0 == '1') {
*result = FcTrue;
return FcTrue;
}
if (c0 == 'f' || c0 == 'n' || c0 == '0') {
*result = FcFalse;
return FcTrue;
}
if (c0 == 'd' || c0 == 'x' || c0 == '2') {
*result = FcDontCare;
return FcTrue;
}
if (c0 == 'o') {
c1 = v[1];
c1 = FcToLower (c1);
if (c1 == 'n') {
*result = FcTrue;
return FcTrue;
}
if (c1 == 'f') {
*result = FcFalse;
return FcTrue;
}
if (c1 == 'r') {
*result = FcDontCare;
return FcTrue;
}
}
return FcFalse;
}
static FcValue
FcNameConvert (FcType type, const char *object, FcChar8 *string)
{
FcValue v;
FcMatrix m;
double b, e;
char *p;
v.type = type;
switch ((int)v.type) {
case FcTypeInteger:
if (!FcNameConstantWithObjectCheck (string, object, &v.u.i))
v.u.i = atoi ((char *)string);
break;
case FcTypeString:
v.u.s = FcStrdup (string);
if (!v.u.s)
v.type = FcTypeVoid;
break;
case FcTypeBool:
if (!FcNameBool (string, &v.u.b))
v.u.b = FcFalse;
break;
case FcTypeDouble:
v.u.d = strtod ((char *)string, 0);
break;
case FcTypeMatrix:
FcMatrixInit (&m);
sscanf ((char *)string, "%lg %lg %lg %lg", &m.xx, &m.xy, &m.yx, &m.yy);
v.u.m = FcMatrixCopy (&m);
break;
case FcTypeCharSet:
v.u.c = FcNameParseCharSet (string);
if (!v.u.c)
v.type = FcTypeVoid;
break;
case FcTypeLangSet:
v.u.l = FcNameParseLangSet (string);
if (!v.u.l)
v.type = FcTypeVoid;
break;
case FcTypeRange:
if (sscanf ((char *)string, "[%lg %lg]", &b, &e) != 2) {
char *sc, *ec;
size_t len = strlen ((const char *)string);
int si, ei;
sc = malloc (len + 1);
ec = malloc (len + 1);
if (sc && ec && sscanf ((char *)string, "[%s %[^]]]", sc, ec) == 2) {
if (FcNameConstantWithObjectCheck ((const FcChar8 *)sc, object, &si) &&
FcNameConstantWithObjectCheck ((const FcChar8 *)ec, object, &ei))
v.u.r = FcRangeCreateDouble (si, ei);
else
goto bail1;
} else {
bail1:
v.type = FcTypeDouble;
if (FcNameConstantWithObjectCheck (string, object, &si)) {
v.u.d = (double)si;
} else {
v.u.d = strtod ((char *)string, &p);
if (p != NULL && p[0] != 0)
v.type = FcTypeVoid;
}
}
if (sc)
free (sc);
if (ec)
free (ec);
} else
v.u.r = FcRangeCreateDouble (b, e);
break;
default:
/* No valid type to convert */
v.type = FcTypeVoid;
break;
}
return v;
}
static const FcChar8 *
FcNameFindNext (const FcChar8 *cur, const char *delim, FcChar8 *save, FcChar8 *last)
{
FcChar8 c;
while ((c = *cur)) {
if (!isspace (c))
break;
++cur;
}
while ((c = *cur)) {
if (c == '\\') {
++cur;
if (!(c = *cur))
break;
} else if (strchr (delim, c))
break;
++cur;
*save++ = c;
}
*save = 0;
*last = *cur;
if (*cur)
cur++;
return cur;
}
FcPattern *
FcNameParse (const FcChar8 *name)
{
FcChar8 *save;
FcPattern *pat;
double d;
FcChar8 *e;
FcChar8 delim;
FcValue v;
const FcObjectType *t;
const FcConstant *c;
/* freed below */
save = malloc (strlen ((char *)name) + 1);
if (!save)
goto bail0;
pat = FcPatternCreate();
if (!pat)
goto bail1;
for (;;) {
name = FcNameFindNext (name, "-,:", save, &delim);
if (save[0]) {
if (!FcPatternObjectAddString (pat, FC_FAMILY_OBJECT, save))
goto bail2;
}
if (delim != ',')
break;
}
if (delim == '-') {
for (;;) {
name = FcNameFindNext (name, "-,:", save, &delim);
d = strtod ((char *)save, (char **)&e);
if (e != save) {
if (!FcPatternObjectAddDouble (pat, FC_SIZE_OBJECT, d))
goto bail2;
}
if (delim != ',')
break;
}
}
while (delim == ':') {
name = FcNameFindNext (name, "=_:", save, &delim);
if (save[0]) {
if (delim == '=' || delim == '_') {
t = FcNameGetObjectType ((char *)save);
for (;;) {
name = FcNameFindNext (name, ":,", save, &delim);
if (t) {
v = FcNameConvert (t->type, t->object, save);
if (!FcPatternAdd (pat, t->object, v, FcTrue)) {
FcValueDestroy (v);
goto bail2;
}
FcValueDestroy (v);
}
if (delim != ',')
break;
}
} else {
if ((c = FcNameGetConstant (save))) {
t = FcNameGetObjectType ((char *)c->object);
if (t == NULL)
goto bail2;
switch ((int)t->type) {
case FcTypeInteger:
case FcTypeDouble:
if (!FcPatternAddInteger (pat, c->object, c->value))
goto bail2;
break;
case FcTypeBool:
if (!FcPatternAddBool (pat, c->object, c->value))
goto bail2;
break;
case FcTypeRange:
if (!FcPatternAddInteger (pat, c->object, c->value))
goto bail2;
break;
default:
break;
}
}
}
}
}
free (save);
return pat;
bail2:
FcPatternDestroy (pat);
bail1:
free (save);
bail0:
return 0;
}
static FcBool
FcNameUnparseString (FcStrBuf *buf,
const FcChar8 *string,
const FcChar8 *escape)
{
FcChar8 c;
while ((c = *string++)) {
if (escape && strchr ((char *)escape, (char)c)) {
if (!FcStrBufChar (buf, escape[0]))
return FcFalse;
}
if (!FcStrBufChar (buf, c))
return FcFalse;
}
return FcTrue;
}
FcBool
FcNameUnparseValue (FcStrBuf *buf,
FcValue *v0,
FcChar8 *escape)
{
FcChar8 temp[1024];
FcValue v = FcValueCanonicalize (v0);
switch (v.type) {
case FcTypeUnknown:
case FcTypeVoid:
return FcTrue;
case FcTypeInteger:
sprintf ((char *)temp, "%d", v.u.i);
return FcNameUnparseString (buf, temp, 0);
case FcTypeDouble:
sprintf ((char *)temp, "%g", v.u.d);
return FcNameUnparseString (buf, temp, 0);
case FcTypeString:
return FcNameUnparseString (buf, v.u.s, escape);
case FcTypeBool:
return FcNameUnparseString (buf,
v.u.b == FcTrue ? (FcChar8 *)"True" : v.u.b == FcFalse ? (FcChar8 *)"False"
: (FcChar8 *)"DontCare",
0);
case FcTypeMatrix:
sprintf ((char *)temp, "%g %g %g %g",
v.u.m->xx, v.u.m->xy, v.u.m->yx, v.u.m->yy);
return FcNameUnparseString (buf, temp, 0);
case FcTypeCharSet:
return FcNameUnparseCharSet (buf, v.u.c);
case FcTypeLangSet:
return FcNameUnparseLangSet (buf, v.u.l);
case FcTypeFTFace:
return FcTrue;
case FcTypeRange:
sprintf ((char *)temp, "[%g %g]", v.u.r->begin, v.u.r->end);
return FcNameUnparseString (buf, temp, 0);
}
return FcFalse;
}
FcBool
FcNameUnparseValueList (FcStrBuf *buf,
FcValueListPtr v,
FcChar8 *escape)
{
while (v) {
if (!FcNameUnparseValue (buf, &v->value, escape))
return FcFalse;
if ((v = FcValueListNext (v)) != NULL)
if (!FcNameUnparseString (buf, (FcChar8 *)",", 0))
return FcFalse;
}
return FcTrue;
}
#define FC_ESCAPE_FIXED "\\-:,"
#define FC_ESCAPE_VARIABLE "\\=_:,"
FcChar8 *
FcNameUnparse (FcPattern *pat)
{
return FcNameUnparseEscaped (pat, FcTrue);
}
FcChar8 *
FcNameUnparseEscaped (FcPattern *pat, FcBool escape)
{
FcStrBuf buf, buf2;
FcChar8 buf_static[8192], buf2_static[256];
int i;
FcPatternElt *e;
FcStrBufInit (&buf, buf_static, sizeof (buf_static));
FcStrBufInit (&buf2, buf2_static, sizeof (buf2_static));
e = FcPatternObjectFindElt (pat, FC_FAMILY_OBJECT);
if (e) {
if (!FcNameUnparseValueList (&buf, FcPatternEltValues (e), escape ? (FcChar8 *)FC_ESCAPE_FIXED : 0))
goto bail0;
}
e = FcPatternObjectFindElt (pat, FC_SIZE_OBJECT);
if (e) {
FcChar8 *p;
if (!FcNameUnparseString (&buf2, (FcChar8 *)"-", 0))
goto bail0;
if (!FcNameUnparseValueList (&buf2, FcPatternEltValues (e), escape ? (FcChar8 *)FC_ESCAPE_FIXED : 0))
goto bail0;
p = FcStrBufDoneStatic (&buf2);
FcStrBufDestroy (&buf2);
if (strlen ((const char *)p) > 1)
if (!FcStrBufString (&buf, p))
goto bail0;
}
for (i = 0; i < NUM_OBJECT_TYPES; i++) {
FcObject id = i + 1;
const FcObjectType *o;
o = &FcObjects[i];
if (!strcmp (o->object, FC_FAMILY) ||
!strcmp (o->object, FC_SIZE))
continue;
e = FcPatternObjectFindElt (pat, id);
if (e) {
if (!FcNameUnparseString (&buf, (FcChar8 *)":", 0))
goto bail0;
if (!FcNameUnparseString (&buf, (FcChar8 *)o->object, escape ? (FcChar8 *)FC_ESCAPE_VARIABLE : 0))
goto bail0;
if (!FcNameUnparseString (&buf, (FcChar8 *)"=", 0))
goto bail0;
if (!FcNameUnparseValueList (&buf, FcPatternEltValues (e), escape ? (FcChar8 *)FC_ESCAPE_VARIABLE : 0))
goto bail0;
}
}
return FcStrBufDone (&buf);
bail0:
FcStrBufDestroy (&buf);
return 0;
}
#define __fcname__
#include "fcaliastail.h"
#undef __fcname__