]> git.wh0rd.org - fontconfig.git/blobdiff - src/fccfg.c
Reimplement FC_LANG as FcTypeLang, freeze patterns, other cleanup
[fontconfig.git] / src / fccfg.c
index a35215ae8c042fa2e4fe85fd7cdb30dccc768489..2ec9f779eea385fb10afd165dacc40ee8e172a91 100644 (file)
@@ -1,5 +1,5 @@
 /*
- * $XFree86: xc/lib/fontconfig/src/fccfg.c,v 1.5 2002/03/01 01:00:54 keithp Exp $
+ * $XFree86: xc/lib/fontconfig/src/fccfg.c,v 1.20 2002/08/19 19:32:05 keithp Exp $
  *
  * Copyright © 2000 Keith Packard, member of The XFree86 Project, Inc.
  *
@@ -79,27 +79,25 @@ bail0:
     return 0;
 }
 
-static time_t
+typedef struct _FcFileTime {
+    time_t  time;
+    FcBool  set;
+} FcFileTime;
+
+static FcFileTime
 FcConfigNewestFile (FcStrSet *files)
 {
     FcStrList      *list = FcStrListCreate (files);
-    FcBool         set = FcFalse;
-    time_t         newest = 0;
+    FcFileTime     newest = { 0, FcFalse };
     FcChar8        *file;
     struct  stat    statb;
 
     if (list)
     {
        while ((file = FcStrListNext (list)))
-       {
            if (stat ((char *) file, &statb) == 0)
-           {
-               if (!set)
-                   newest = statb.st_mtime;
-               else if (statb.st_mtime - newest > 0)
-                   newest = statb.st_mtime;
-           }
-       }
+               if (!newest.set || statb.st_mtime - newest.time > 0)
+                   newest.time = statb.st_mtime;
        FcStrListDone (list);
     }
     return newest;
@@ -108,9 +106,8 @@ FcConfigNewestFile (FcStrSet *files)
 FcBool
 FcConfigUptoDate (FcConfig *config)
 {
-    time_t  config_time;
-    time_t  font_time;
-    time_t  now = time(0);
+    FcFileTime config_time, font_time;
+    time_t     now = time(0);
     if (!config)
     {
        config = FcConfigGetCurrent ();
@@ -119,8 +116,8 @@ FcConfigUptoDate (FcConfig *config)
     }
     config_time = FcConfigNewestFile (config->configFiles);
     font_time = FcConfigNewestFile (config->configDirs);
-    if (config_time - config->rescanTime > 0 ||
-       font_time - config->rescanTime > 0)
+    if ((config_time.set && config_time.time - config->rescanTime > 0) ||
+       (font_time.set && font_time.time - config->rescanTime) > 0)
     {
        return FcFalse;
     }
@@ -174,20 +171,20 @@ FcConfigDestroy (FcConfig *config)
 FcBool
 FcConfigBuildFonts (FcConfig *config)
 {
-    FcFontSet   *fonts;
-    FcFileCache *cache;
-    FcStrList  *list;
-    FcChar8    *dir;
+    FcFontSet      *fonts;
+    FcGlobalCache   *cache;
+    FcStrList      *list;
+    FcChar8        *dir;
 
     fonts = FcFontSetCreate ();
     if (!fonts)
        goto bail0;
     
-    cache = FcFileCacheCreate ();
+    cache = FcGlobalCacheCreate ();
     if (!cache)
        goto bail1;
 
-    FcFileCacheLoad (cache, config->cache);
+    FcGlobalCacheLoad (cache, config->cache);
 
     list = FcConfigGetFontDirs (config);
     if (!list)
@@ -205,8 +202,8 @@ FcConfigBuildFonts (FcConfig *config)
     if (FcDebug () & FC_DBG_FONTSET)
        FcFontSetPrint (fonts);
 
-    FcFileCacheSave (cache, config->cache);
-    FcFileCacheDestroy (cache);
+    FcGlobalCacheSave (cache, config->cache);
+    FcGlobalCacheDestroy (cache);
 
     FcConfigSetFonts (config, fonts, FcSetSystem);
     
@@ -441,16 +438,20 @@ FcConfigAddEdit (FcConfig *config,
     subst->next = 0;
     subst->test = test;
     subst->edit = edit;
-    if (FcDebug () & FC_DBG_EDIT)
-    {
-       printf ("Add Subst ");
-       FcSubstPrint (subst);
-    }
     num = 0;
     for (t = test; t; t = t->next)
+    {
+       if (t->kind == FcMatchDefault)
+           t->kind = kind;
        num++;
+    }
     if (config->maxObjects < num)
        config->maxObjects = num;
+    if (FcDebug () & FC_DBG_EDIT)
+    {
+       printf ("Add Subst ");
+       FcSubstPrint (subst);
+    }
     return FcTrue;
 }
 
@@ -459,8 +460,6 @@ typedef struct _FcSubState {
     FcValueList    *value;
 } FcSubState;
 
-static const FcMatrix    FcIdentityMatrix = { 1, 0, 0, 1 };
-
 static FcValue
 FcConfigPromote (FcValue v, FcValue u)
 {
@@ -471,9 +470,14 @@ FcConfigPromote (FcValue v, FcValue u)
     }
     else if (v.type == FcTypeVoid && u.type == FcTypeMatrix)
     {
-       v.u.m = (FcMatrix *) &FcIdentityMatrix;
+       v.u.m = &FcIdentityMatrix;
        v.type = FcTypeMatrix;
     }
+    else if (v.type == FcTypeString && u.type == FcTypeLangSet)
+    {
+       v.u.l = FcLangSetPromote (v.u.s);
+       v.type = FcTypeLangSet;
+    }
     return v;
 }
 
@@ -488,7 +492,6 @@ FcConfigCompareValue (FcValue       m,
     v = FcConfigPromote (v, m);
     if (m.type == v.type) 
     {
-       ret = FcFalse;
        switch (m.type) {
        case FcTypeInteger:
            break;      /* FcConfigPromote prevents this from happening */
@@ -559,8 +562,8 @@ FcConfigCompareValue (FcValue       m,
        case FcTypeCharSet:
            switch (op) {
            case FcOpContains:
-               /* m contains v if v - m is empty */
-               ret = FcCharSetSubtractCount (v.u.c, m.u.c) == 0;
+               /* m contains v if v is a subset of m */
+               ret = FcCharSetIsSubset (v.u.c, m.u.c);
                break;
            case FcOpEqual:
                ret = FcCharSetEqual (m.u.c, v.u.c);
@@ -572,6 +575,21 @@ FcConfigCompareValue (FcValue      m,
                break;
            }
            break;
+       case FcTypeLangSet:
+           switch (op) {
+           case FcOpContains:
+               ret = FcLangSetCompare (v.u.l, m.u.l) != FcLangDifferentLang;
+               break;
+           case FcOpEqual:
+               ret = FcLangSetEqual (v.u.l, m.u.l);
+               break;
+           case FcOpNotEqual:
+               ret = !FcLangSetEqual (v.u.l, m.u.l);
+               break;
+           default:
+               break;
+           }
+           break;
        case FcTypeVoid:
            switch (op) {
            case FcOpEqual:
@@ -582,6 +600,18 @@ FcConfigCompareValue (FcValue      m,
                break;
            }
            break;
+       case FcTypeFTFace:
+           switch (op) {
+           case FcOpEqual:
+               ret = m.u.f == v.u.f;
+               break;
+           case FcOpNotEqual:
+               ret = m.u.f != v.u.f;
+               break;
+           default:
+               break;
+           }
+           break;
        }
     }
     else
@@ -652,15 +682,22 @@ FcConfigEvaluate (FcPattern *p, FcExpr *e)
            v.type = FcTypeVoid;
        FcValueDestroy (vl);
        break;
-    case FcOpOr:
-    case FcOpAnd:
-    case FcOpEqual:
     case FcOpContains:
     case FcOpNotEqual:
     case FcOpLess:
     case FcOpLessEqual:
     case FcOpMore:
     case FcOpMoreEqual:
+       vl = FcConfigEvaluate (p, e->u.tree.left);
+       vr = FcConfigEvaluate (p, e->u.tree.right);
+       v.type = FcTypeBool;
+       v.u.b = FcConfigCompareValue (vl, e->op, vr);
+       FcValueDestroy (vl);
+       FcValueDestroy (vr);
+       break;  
+    case FcOpOr:
+    case FcOpAnd:
+    case FcOpEqual:
     case FcOpPlus:
     case FcOpMinus:
     case FcOpTimes:
@@ -690,31 +727,6 @@ FcConfigEvaluate (FcPattern *p, FcExpr *e)
                    v.type = FcTypeDouble;
                    v.u.d = vl.u.d / vr.u.d; 
                    break;
-               case FcOpEqual:
-               case FcOpContains:
-                   v.type = FcTypeBool; 
-                   v.u.b = vl.u.d == vr.u.d;
-                   break;
-               case FcOpNotEqual:    
-                   v.type = FcTypeBool; 
-                   v.u.b = vl.u.d != vr.u.d;
-                   break;
-               case FcOpLess:    
-                   v.type = FcTypeBool; 
-                   v.u.b = vl.u.d < vr.u.d;
-                   break;
-               case FcOpLessEqual:    
-                   v.type = FcTypeBool; 
-                   v.u.b = vl.u.d <= vr.u.d;
-                   break;
-               case FcOpMore:    
-                   v.type = FcTypeBool; 
-                   v.u.b = vl.u.d > vr.u.d;
-                   break;
-               case FcOpMoreEqual:    
-                   v.type = FcTypeBool; 
-                   v.u.b = vl.u.d >= vr.u.d;
-                   break;
                default:
                    v.type = FcTypeVoid; 
                    break;
@@ -736,15 +748,6 @@ FcConfigEvaluate (FcPattern *p, FcExpr *e)
                    v.type = FcTypeBool;
                    v.u.b = vl.u.b && vr.u.b;
                    break;
-               case FcOpEqual:
-               case FcOpContains:
-                   v.type = FcTypeBool;
-                   v.u.b = vl.u.b == vr.u.b;
-                   break;
-               case FcOpNotEqual:
-                   v.type = FcTypeBool;
-                   v.u.b = vl.u.b != vr.u.b;
-                   break;
                default:
                    v.type = FcTypeVoid; 
                    break;
@@ -752,15 +755,6 @@ FcConfigEvaluate (FcPattern *p, FcExpr *e)
                break;
            case FcTypeString:
                switch (e->op) {
-               case FcOpEqual:
-               case FcOpContains:
-                   v.type = FcTypeBool;
-                   v.u.b = FcStrCmpIgnoreCase (vl.u.s, vr.u.s) == 0;
-                   break;
-               case FcOpNotEqual:
-                   v.type = FcTypeBool;
-                   v.u.b = FcStrCmpIgnoreCase (vl.u.s, vr.u.s) != 0;
-                   break;
                case FcOpPlus:
                    v.type = FcTypeString;
                    v.u.s = FcStrPlus (vl.u.s, vr.u.s);
@@ -771,17 +765,9 @@ FcConfigEvaluate (FcPattern *p, FcExpr *e)
                    v.type = FcTypeVoid;
                    break;
                }
+               break;
            case FcTypeMatrix:
                switch (e->op) {
-               case FcOpEqual:
-               case FcOpContains:
-                   v.type = FcTypeBool;
-                   v.u.b = FcMatrixEqual (vl.u.m, vr.u.m);
-                   break;
-               case FcOpNotEqual:
-                   v.type = FcTypeBool;
-                   v.u.b = FcMatrixEqual (vl.u.m, vr.u.m);
-                   break;
                case FcOpTimes:
                    v.type = FcTypeMatrix;
                    m = malloc (sizeof (FcMatrix));
@@ -801,26 +787,6 @@ FcConfigEvaluate (FcPattern *p, FcExpr *e)
                    break;
                }
                break;
-           case FcTypeCharSet:
-               switch (e->op) {
-               case FcOpContains:
-                   /* vl contains vr if vr - vl is empty */
-                   v.type = FcTypeBool;
-                   v.u.b = FcCharSetSubtractCount (vr.u.c, vl.u.c) == 0;
-                   break;
-               case FcOpEqual:
-                   v.type = FcTypeBool;
-                   v.u.b = FcCharSetEqual (vl.u.c, vr.u.c);
-                   break;
-               case FcOpNotEqual:
-                   v.type = FcTypeBool;
-                   v.u.b = !FcCharSetEqual (vl.u.c, vr.u.c);
-                   break;
-               default:
-                   v.type = FcTypeVoid;
-                   break;
-               }
-               break;
            default:
                v.type = FcTypeVoid;
                break;
@@ -854,11 +820,12 @@ FcConfigEvaluate (FcPattern *p, FcExpr *e)
 static FcValueList *
 FcConfigMatchValueList (FcPattern      *p,
                        FcTest          *t,
-                       FcValueList     *v)
+                       FcValueList     *values)
 {
     FcValueList            *ret = 0;
     FcExpr         *e = t->expr;
     FcValue        value;
+    FcValueList            *v;
     
     while (e)
     {
@@ -873,7 +840,7 @@ FcConfigMatchValueList (FcPattern   *p,
            e = 0;
        }
 
-       for (; v; v = v->next)
+       for (v = values; v; v = v->next)
        {
            if (FcConfigCompareValue (v->value, t->op, value))
            {
@@ -889,13 +856,13 @@ FcConfigMatchValueList (FcPattern *p,
                }
            }
        }
+       FcValueDestroy (value);
     }
-    FcValueDestroy (value);
     return ret;
 }
 
 static FcValueList *
-FcConfigValues (FcPattern *p, FcExpr *e)
+FcConfigValues (FcPattern *p, FcExpr *e, FcValueBinding binding)
 {
     FcValueList        *l;
     
@@ -908,13 +875,14 @@ FcConfigValues (FcPattern *p, FcExpr *e)
     if (e->op == FcOpComma)
     {
        l->value = FcConfigEvaluate (p, e->u.tree.left);
-       l->next  = FcConfigValues (p, e->u.tree.right);
+       l->next  = FcConfigValues (p, e->u.tree.right, binding);
     }
     else
     {
        l->value = FcConfigEvaluate (p, e);
        l->next  = 0;
     }
+    l->binding = binding;
     while (l && l->value.type == FcTypeVoid)
     {
        FcValueList     *next = l->next;
@@ -1015,7 +983,7 @@ FcConfigPatternAdd (FcPattern      *p,
 {
     if (list)
     {
-       FcPatternElt    *e = FcPatternFind (p, object, FcTrue);
+       FcPatternElt    *e = FcPatternInsertElt (p, object);
     
        if (!e)
            return;
@@ -1030,7 +998,7 @@ static void
 FcConfigPatternDel (FcPattern  *p,
                    const char  *object)
 {
-    FcPatternElt    *e = FcPatternFind (p, object, FcFalse);
+    FcPatternElt    *e = FcPatternFindElt (p, object);
     if (!e)
        return;
     while (e->values)
@@ -1041,7 +1009,7 @@ static void
 FcConfigPatternCanon (FcPattern            *p,
                      const char    *object)
 {
-    FcPatternElt    *e = FcPatternFind (p, object, FcFalse);
+    FcPatternElt    *e = FcPatternFindElt (p, object);
     if (!e)
        return;
     if (!e->values)
@@ -1049,9 +1017,10 @@ FcConfigPatternCanon (FcPattern      *p,
 }
 
 FcBool
-FcConfigSubstitute (FcConfig   *config,
-                   FcPattern   *p,
-                   FcMatchKind kind)
+FcConfigSubstituteWithPat (FcConfig    *config,
+                          FcPattern   *p,
+                          FcPattern   *p_pat,
+                          FcMatchKind kind)
 {
     FcSubst        *s;
     FcSubState     *st;
@@ -1059,6 +1028,7 @@ FcConfigSubstitute (FcConfig      *config,
     FcTest         *t;
     FcEdit         *e;
     FcValueList            *l;
+    FcPattern      *m;
 
     if (!config)
     {
@@ -1094,7 +1064,15 @@ FcConfigSubstitute (FcConfig     *config,
                printf ("FcConfigSubstitute test ");
                FcTestPrint (t);
            }
-           st[i].elt = FcPatternFind (p, t->field, FcFalse);
+           st[i].elt = 0;
+           if (kind == FcMatchFont && t->kind == FcMatchPattern)
+               m = p_pat;
+           else
+               m = p;
+           if (m)
+               st[i].elt = FcPatternFindElt (m, t->field);
+           else
+               st[i].elt = 0;
            /*
             * If there's no such field in the font,
             * then FcQualAll matches while FcQualAny does not
@@ -1113,9 +1091,13 @@ FcConfigSubstitute (FcConfig     *config,
             * Check to see if there is a match, mark the location
             * to apply match-relative edits
             */
-           st[i].value = FcConfigMatchValueList (p, t, st[i].elt->values);
+           st[i].value = FcConfigMatchValueList (m, t, st[i].elt->values);
            if (!st[i].value)
                break;
+           if (t->qual == FcQualFirst && st[i].value != st[i].elt->values)
+               break;
+           if (t->qual == FcQualNotFirst && st[i].value == st[i].elt->values)
+               break;
        }
        if (t)
        {
@@ -1133,13 +1115,19 @@ FcConfigSubstitute (FcConfig    *config,
            /*
             * Evaluate the list of expressions
             */
-           l = FcConfigValues (p, e->expr);
+           l = FcConfigValues (p, e->expr, e->binding);
            /*
-            * Locate any test associated with this field
+            * Locate any test associated with this field, skipping
+            * tests associated with the pattern when substituting in
+            * the font
             */
            for (t = s->test, i = 0; t; t = t->next, i++)
-               if (!FcStrCmpIgnoreCase ((FcChar8 *) t->field, (FcChar8 *) e->field))
+           {
+               if ((t->kind == FcMatchFont || kind == FcMatchPattern) &&
+                   !FcStrCmpIgnoreCase ((FcChar8 *) t->field, 
+                                        (FcChar8 *) e->field))
                    break;
+           }
            switch (e->op) {
            case FcOpAssign:
                /*
@@ -1239,6 +1227,14 @@ FcConfigSubstitute (FcConfig     *config,
     return FcTrue;
 }
 
+FcBool
+FcConfigSubstitute (FcConfig   *config,
+                   FcPattern   *p,
+                   FcMatchKind kind)
+{
+    return FcConfigSubstituteWithPat (config, p, 0, kind);
+}
+
 #ifndef FONTCONFIG_PATH
 #define FONTCONFIG_PATH        "/etc/fonts"
 #endif