]> git.wh0rd.org - fontconfig.git/blobdiff - src/fccfg.c
Fix weird first/not-first lameness in font matches, replacing with target
[fontconfig.git] / src / fccfg.c
index 91373d39da3fc584df96b34d0bcf3d3172c3edba..328b1ac5f52cae9d3edd45df1c30e21a8fa2605c 100644 (file)
@@ -1,5 +1,5 @@
 /*
- * $XFree86: xc/lib/fontconfig/src/fccfg.c,v 1.3 2002/02/19 08:33:23 keithp Exp $
+ * $XFree86: xc/lib/fontconfig/src/fccfg.c,v 1.18 2002/07/31 01:36:37 keithp Exp $
  *
  * Copyright © 2000 Keith Packard, member of The XFree86 Project, Inc.
  *
@@ -22,9 +22,6 @@
  * PERFORMANCE OF THIS SOFTWARE.
  */
 
-#include <stdlib.h>
-#include <string.h>
-#include <stdio.h>
 #include "fcint.h"
 
 FcConfig    *_fcConfig;
@@ -38,20 +35,23 @@ FcConfigCreate (void)
     config = malloc (sizeof (FcConfig));
     if (!config)
        goto bail0;
+    FcMemAlloc (FC_MEM_CONFIG, sizeof (FcConfig));
     
-    config->dirs = malloc (sizeof (char *));
-    if (!config->dirs)
+    config->configDirs = FcStrSetCreate ();
+    if (!config->configDirs)
        goto bail1;
-    config->dirs[0] = 0;
     
-    config->configFiles = malloc (sizeof (char *));
+    config->configFiles = FcStrSetCreate ();
     if (!config->configFiles)
        goto bail2;
-    config->configFiles[0] = 0;
+    
+    config->fontDirs = FcStrSetCreate ();
+    if (!config->fontDirs)
+       goto bail3;
     
     config->cache = 0;
     if (!FcConfigSetCache (config, (FcChar8 *) ("~/" FC_USER_CACHE_FILE)))
-       goto bail3;
+       goto bail4;
 
     config->blanks = 0;
 
@@ -60,19 +60,71 @@ FcConfigCreate (void)
     config->maxObjects = 0;
     for (set = FcSetSystem; set <= FcSetApplication; set++)
        config->fonts[set] = 0;
+
+    config->rescanTime = time(0);
+    config->rescanInterval = 30;    
     
     return config;
 
+bail4:
+    FcStrSetDestroy (config->fontDirs);
 bail3:
-    free (config->configFiles);
+    FcStrSetDestroy (config->configFiles);
 bail2:
-    free (config->dirs);
+    FcStrSetDestroy (config->configDirs);
 bail1:
     free (config);
+    FcMemFree (FC_MEM_CONFIG, sizeof (FcConfig));
 bail0:
     return 0;
 }
 
+typedef struct _FcFileTime {
+    time_t  time;
+    FcBool  set;
+} FcFileTime;
+
+static FcFileTime
+FcConfigNewestFile (FcStrSet *files)
+{
+    FcStrList      *list = FcStrListCreate (files);
+    FcFileTime     newest = { 0, FcFalse };
+    FcChar8        *file;
+    struct  stat    statb;
+
+    if (list)
+    {
+       while ((file = FcStrListNext (list)))
+           if (stat ((char *) file, &statb) == 0)
+               if (!newest.set || statb.st_mtime - newest.time > 0)
+                   newest.time = statb.st_mtime;
+       FcStrListDone (list);
+    }
+    return newest;
+}
+
+FcBool
+FcConfigUptoDate (FcConfig *config)
+{
+    FcFileTime config_time, font_time;
+    time_t     now = time(0);
+    if (!config)
+    {
+       config = FcConfigGetCurrent ();
+       if (!config)
+           return FcFalse;
+    }
+    config_time = FcConfigNewestFile (config->configFiles);
+    font_time = FcConfigNewestFile (config->configDirs);
+    if ((config_time.set && config_time.time - config->rescanTime > 0) ||
+       (font_time.set && font_time.time - config->rescanTime) > 0)
+    {
+       return FcFalse;
+    }
+    config->rescanTime = now;
+    return FcTrue;
+}
+
 static void
 FcSubstDestroy (FcSubst *s)
 {
@@ -87,51 +139,27 @@ FcSubstDestroy (FcSubst *s)
     }
 }
 
-static void
-FcConfigDestroyStrings (FcChar8 **strings)
-{
-    FcChar8    **s;
-
-    for (s = strings; s && *s; s++)
-       free (*s);
-    if (strings)
-       free (strings);
-}
-    
-static FcBool
-FcConfigAddString (FcChar8 ***strings, FcChar8 *string)
-{
-    int            n;
-    FcChar8    **s;
-    
-    n = 0;
-    for (s = *strings; s && *s; s++)
-       n++;
-    s = malloc ((n + 2) * sizeof (FcChar8 *));
-    if (!s)
-       return FcFalse;
-    s[n] = string;
-    s[n+1] = 0;
-    memcpy (s, *strings, n * sizeof (FcChar8 *));
-    free (*strings);
-    *strings = s;
-    return FcTrue;
-}
-
 void
 FcConfigDestroy (FcConfig *config)
 {
     FcSetName  set;
-    FcConfigDestroyStrings (config->dirs);
-    FcConfigDestroyStrings (config->configFiles);
 
-    free (config->cache);
+    if (config == _fcConfig)
+       _fcConfig = 0;
+
+    FcStrSetDestroy (config->configDirs);
+    FcStrSetDestroy (config->fontDirs);
+    FcStrSetDestroy (config->configFiles);
+
+    FcStrFree (config->cache);
 
     FcSubstDestroy (config->substPattern);
     FcSubstDestroy (config->substFont);
     for (set = FcSetSystem; set <= FcSetApplication; set++)
        if (config->fonts[set])
            FcFontSetDestroy (config->fonts[set]);
+    free (config);
+    FcMemFree (FC_MEM_CONFIG, sizeof (FcConfig));
 }
 
 /*
@@ -143,32 +171,39 @@ FcConfigDestroy (FcConfig *config)
 FcBool
 FcConfigBuildFonts (FcConfig *config)
 {
-    FcFontSet   *fonts;
-    FcFileCache *cache;
-    FcChar8    **d;
+    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)
+       goto bail1;
 
-    for (d = config->dirs; d && *d; d++)
+    while ((dir = FcStrListNext (list)))
     {
        if (FcDebug () & FC_DBG_FONTSET)
-           printf ("scan dir %s\n", *d);
-       FcDirScan (fonts, cache, config->blanks, *d, FcFalse);
+           printf ("scan dir %s\n", dir);
+       FcDirScan (fonts, config->fontDirs, cache, config->blanks, dir, FcFalse);
     }
     
+    FcStrListDone (list);
+    
     if (FcDebug () & FC_DBG_FONTSET)
        FcFontSetPrint (fonts);
 
-    FcFileCacheSave (cache, config->cache);
-    FcFileCacheDestroy (cache);
+    FcGlobalCacheSave (cache, config->cache);
+    FcGlobalCacheDestroy (cache);
 
     FcConfigSetFonts (config, fonts, FcSetSystem);
     
@@ -202,40 +237,41 @@ FcConfigGetCurrent (void)
 }
 
 FcBool
-FcConfigAddDir (FcConfig    *config,
-               const FcChar8  *d)
+FcConfigAddConfigDir (FcConfig     *config,
+                     const FcChar8 *d)
 {
-    FcChar8    *dir;
-    FcChar8    *h;
+    return FcStrSetAddFilename (config->configDirs, d);
+}
 
-    if (*d == '~')
-    {
-       h = (FcChar8 *) getenv ("HOME");
-       if (!h)
-           return FcFalse;
-       dir = (FcChar8 *) malloc (strlen ((char *) h) + strlen ((char *) d));
-       if (!dir)
-           return FcFalse;
-       strcpy ((char *) dir, (char *) h);
-       strcat ((char *) dir, (char *) d+1);
-    }
-    else
-    {
-       dir = (FcChar8 *) malloc (strlen ((char *) d) + 1);
-       if (!dir)
-           return FcFalse;
-       strcpy (dir, d);
-    }
-    if (!FcConfigAddString (&config->dirs, dir))
+FcStrList *
+FcConfigGetConfigDirs (FcConfig   *config)
+{
+    if (!config)
     {
-       free (dir);
-       return FcFalse;
+       config = FcConfigGetCurrent ();
+       if (!config)
+           return 0;
     }
-    return FcTrue;
+    return FcStrListCreate (config->configDirs);
+}
+
+FcBool
+FcConfigAddFontDir (FcConfig       *config,
+                   const FcChar8   *d)
+{
+    return FcStrSetAddFilename (config->fontDirs, d);
 }
 
-FcChar8 **
-FcConfigGetDirs (FcConfig   *config)
+FcBool
+FcConfigAddDir (FcConfig           *config,
+               const FcChar8       *d)
+{
+    return (FcConfigAddConfigDir (config, d) && 
+           FcConfigAddFontDir (config, d));
+}
+
+FcStrList *
+FcConfigGetFontDirs (FcConfig  *config)
 {
     if (!config)
     {
@@ -243,26 +279,25 @@ FcConfigGetDirs (FcConfig   *config)
        if (!config)
            return 0;
     }
-    return config->dirs;
+    return FcStrListCreate (config->fontDirs);
 }
 
 FcBool
 FcConfigAddConfigFile (FcConfig            *config,
                       const FcChar8   *f)
 {
-    FcChar8    *file;
-    file = FcConfigFilename (f);
+    FcBool     ret;
+    FcChar8    *file = FcConfigFilename (f);
+    
     if (!file)
        return FcFalse;
-    if (!FcConfigAddString (&config->configFiles, file))
-    {
-       free (file);
-       return FcFalse;
-    }
-    return FcTrue;
+    
+    ret = FcStrSetAdd (config->configFiles, file);
+    FcStrFree (file);
+    return ret;
 }
 
-FcChar8 **
+FcStrList *
 FcConfigGetConfigFiles (FcConfig    *config)
 {
     if (!config)
@@ -271,33 +306,19 @@ FcConfigGetConfigFiles (FcConfig    *config)
        if (!config)
            return 0;
     }
-    return config->configFiles;
+    return FcStrListCreate (config->configFiles);
 }
 
 FcBool
 FcConfigSetCache (FcConfig     *config,
                  const FcChar8 *c)
 {
-    FcChar8    *new;
-    FcChar8    *h;
-
-    if (*c == '~')
-    {
-       h = (FcChar8 *) getenv ("HOME");
-       if (!h)
-           return FcFalse;
-       new = (FcChar8 *) malloc (strlen ((char *) h) + strlen ((char *) c));
-       if (!new)
-           return FcFalse;
-       strcpy ((char *) new, (char *) h);
-       strcat ((char *) new, (char *) c+1);
-    }
-    else
-    {
-       new = FcStrCopy (c);
-    }
+    FcChar8    *new = FcStrCopyFilename (c);
+    
+    if (!new)
+       return FcFalse;
     if (config->cache)
-       free (config->cache);
+       FcStrFree (config->cache);
     config->cache = new;
     return FcTrue;
 }
@@ -337,6 +358,8 @@ FcConfigSetFonts (FcConfig  *config,
     config->fonts[set] = fonts;
 }
 
+
+
 FcBlanks *
 FcConfigGetBlanks (FcConfig    *config)
 {
@@ -368,6 +391,31 @@ FcConfigAddBlank (FcConfig *config,
     return FcTrue;
 }
 
+int
+FcConfigGetRescanInverval (FcConfig *config)
+{
+    if (!config)
+    {
+       config = FcConfigGetCurrent ();
+       if (!config)
+           return 0;
+    }
+    return config->rescanInterval;
+}
+
+FcBool
+FcConfigSetRescanInverval (FcConfig *config, int rescanInterval)
+{
+    if (!config)
+    {
+       config = FcConfigGetCurrent ();
+       if (!config)
+           return FcFalse;
+    }
+    config->rescanInterval = rescanInterval;
+    return FcTrue;
+}
+
 FcBool
 FcConfigAddEdit (FcConfig      *config,
                 FcTest         *test,
@@ -390,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;
 }
 
@@ -408,8 +460,6 @@ typedef struct _FcSubState {
     FcValueList    *value;
 } FcSubState;
 
-static const FcMatrix    FcIdentityMatrix = { 1, 0, 0, 1 };
-
 static FcValue
 FcConfigPromote (FcValue v, FcValue u)
 {
@@ -420,7 +470,7 @@ 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;
     }
     return v;
@@ -437,7 +487,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 */
@@ -508,8 +557,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);
@@ -531,6 +580,30 @@ 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;
+       case FcTypePattern:
+           switch (op) {
+           case FcOpEqual:
+               ret = FcPatternEqual (m.u.p, v.u.p);
+               break;
+           case FcOpNotEqual:
+               ret = !FcPatternEqual (m.u.p, v.u.p);
+               break;
+           default:
+               break;
+           }
+           break;
        }
     }
     else
@@ -601,15 +674,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:
@@ -639,31 +719,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;
@@ -685,15 +740,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;
@@ -701,15 +747,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);
@@ -720,17 +757,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));
@@ -750,26 +779,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;
@@ -803,33 +812,49 @@ FcConfigEvaluate (FcPattern *p, FcExpr *e)
 static FcValueList *
 FcConfigMatchValueList (FcPattern      *p,
                        FcTest          *t,
-                       FcValueList     *v)
+                       FcValueList     *values)
 {
-    FcValueList    *ret = 0;
-    FcValue        value = FcConfigEvaluate (p, t->expr);
+    FcValueList            *ret = 0;
+    FcExpr         *e = t->expr;
+    FcValue        value;
+    FcValueList            *v;
     
-    for (; v; v = v->next)
+    while (e)
     {
-       if (FcConfigCompareValue (v->value, t->op, value))
+       if (e->op == FcOpComma)
        {
-           if (!ret)
-               ret = v;
+           value = FcConfigEvaluate (p, e->u.tree.left);
+           e = e->u.tree.right;
        }
        else
        {
-           if (t->qual == FcQualAll)
+           value = FcConfigEvaluate (p, e);
+           e = 0;
+       }
+
+       for (v = values; v; v = v->next)
+       {
+           if (FcConfigCompareValue (v->value, t->op, value))
            {
-               ret = 0;
-               break;
+               if (!ret)
+                   ret = v;
+           }
+           else
+           {
+               if (t->qual == FcQualAll)
+               {
+                   ret = 0;
+                   break;
+               }
            }
        }
+       FcValueDestroy (value);
     }
-    FcValueDestroy (value);
     return ret;
 }
 
 static FcValueList *
-FcConfigValues (FcPattern *p, FcExpr *e)
+FcConfigValues (FcPattern *p, FcExpr *e, FcValueBinding binding)
 {
     FcValueList        *l;
     
@@ -842,13 +867,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;
@@ -949,7 +975,7 @@ FcConfigPatternAdd (FcPattern       *p,
 {
     if (list)
     {
-       FcPatternElt    *e = FcPatternFind (p, object, FcTrue);
+       FcPatternElt    *e = FcPatternInsertElt (p, object);
     
        if (!e)
            return;
@@ -964,7 +990,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)
@@ -975,7 +1001,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)
@@ -993,6 +1019,8 @@ FcConfigSubstitute (FcConfig       *config,
     FcTest         *t;
     FcEdit         *e;
     FcValueList            *l;
+    FcPattern      *p_pat = 0;
+    FcPattern      *m;
 
     if (!config)
     {
@@ -1014,7 +1042,10 @@ FcConfigSubstitute (FcConfig     *config,
     if (kind == FcMatchPattern)
        s = config->substPattern;
     else
+    {
        s = config->substFont;
+       (void) FcPatternGetPattern (p, FC_PATTERN, 0, &p_pat);
+    }
     for (; s; s = s->next)
     {
        /*
@@ -1028,7 +1059,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
@@ -1047,9 +1086,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)
        {
@@ -1067,13 +1110,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:
                /*
@@ -1192,7 +1241,7 @@ FcConfigFileExists (const FcChar8 *dir, const FcChar8 *file)
     if (!path)
        return 0;
 
-    strcpy (path, dir);
+    strcpy ((char *) path, (const char *) dir);
     /* make sure there's a single separating / */
     if ((!path[0] || path[strlen((char *) path)-1] != '/') && file[0] != '/')
        strcat ((char *) path, "/");
@@ -1240,7 +1289,7 @@ FcConfigGetPath (void)
            path[i] = malloc (colon - e + 1);
            if (!path[i])
                goto bail1;
-           strncpy (path[i], e, colon - e);
+           strncpy ((char *) path[i], (const char *) e, colon - e);
            path[i][colon - e] = '\0';
            if (*colon)
                e = colon + 1;
@@ -1254,7 +1303,7 @@ FcConfigGetPath (void)
     path[i] = malloc (strlen ((char *) dir) + 1);
     if (!path[i])
        goto bail1;
-    strcpy (path[i], dir);
+    strcpy ((char *) path[i], (const char *) dir);
     return path;
 
 bail1:
@@ -1323,6 +1372,9 @@ FcConfigAppFontAddFile (FcConfig    *config,
                        const FcChar8  *file)
 {
     FcFontSet  *set;
+    FcStrSet   *subdirs;
+    FcStrList  *sublist;
+    FcChar8    *subdir;
 
     if (!config)
     {
@@ -1331,15 +1383,36 @@ FcConfigAppFontAddFile (FcConfig    *config,
            return FcFalse;
     }
 
+    subdirs = FcStrSetCreate ();
+    if (!subdirs)
+       return FcFalse;
+    
     set = FcConfigGetFonts (config, FcSetApplication);
     if (!set)
     {
        set = FcFontSetCreate ();
        if (!set)
+       {
+           FcStrSetDestroy (subdirs);
            return FcFalse;
+       }
        FcConfigSetFonts (config, set, FcSetApplication);
     }
-    return FcFileScan (set, 0, config->blanks, file, FcFalse);
+       
+    if (!FcFileScan (set, subdirs, 0, config->blanks, file, FcFalse))
+    {
+       FcStrSetDestroy (subdirs);
+       return FcFalse;
+    }
+    if ((sublist = FcStrListCreate (subdirs)))
+    {
+       while ((subdir = FcStrListNext (sublist)))
+       {
+           FcConfigAppFontAddDir (config, subdir);
+       }
+       FcStrListDone (sublist);
+    }
+    return FcTrue;
 }
 
 FcBool
@@ -1347,6 +1420,9 @@ FcConfigAppFontAddDir (FcConfig       *config,
                       const FcChar8   *dir)
 {
     FcFontSet  *set;
+    FcStrSet   *subdirs;
+    FcStrList  *sublist;
+    FcChar8    *subdir;
     
     if (!config)
     {
@@ -1354,15 +1430,36 @@ FcConfigAppFontAddDir (FcConfig     *config,
        if (!config)
            return FcFalse;
     }
+    subdirs = FcStrSetCreate ();
+    if (!subdirs)
+       return FcFalse;
+    
     set = FcConfigGetFonts (config, FcSetApplication);
     if (!set)
     {
        set = FcFontSetCreate ();
        if (!set)
+       {
+           FcStrSetDestroy (subdirs);
            return FcFalse;
+       }
        FcConfigSetFonts (config, set, FcSetApplication);
     }
-    return FcDirScan (set, 0, config->blanks, dir, FcFalse);
+    
+    if (!FcDirScan (set, subdirs, 0, config->blanks, dir, FcFalse))
+    {
+       FcStrSetDestroy (subdirs);
+       return FcFalse;
+    }
+    if ((sublist = FcStrListCreate (subdirs)))
+    {
+       while ((subdir = FcStrListNext (sublist)))
+       {
+           FcConfigAppFontAddDir (config, subdir);
+       }
+       FcStrListDone (sublist);
+    }
+    return FcTrue;
 }
 
 void