]> git.wh0rd.org - fontconfig.git/blobdiff - src/fccache.c
Leave cache files mapped permanently.
[fontconfig.git] / src / fccache.c
index 1411766fadcfec7e60c51ce1e875eb98fdb615af..a3a758ebb2450cc3cf0256567f6e3ea918173aab 100644 (file)
@@ -112,81 +112,19 @@ FcDirCacheUnlink (const FcChar8 *dir, FcConfig *config)
 }
 
 static int
-FcCacheReadDirs (FcConfig * config,
-                FcStrList *list, FcFontSet * set, FcStrSet *processed_dirs)
+FcDirCacheOpenFile (const FcChar8 *cache_file, struct stat *file_stat)
 {
-    int                        ret = 0;
-    FcChar8            *dir;
-    FcStrSet           *subdirs;
-    FcStrList          *sublist;
+    int        fd;
 
-    /*
-     * Read in the results from 'list'.
-     */
-    while ((dir = FcStrListNext (list)))
+    fd = open((char *) cache_file, O_RDONLY | O_BINARY);
+    if (fd < 0)
+       return fd;
+    if (fstat (fd, file_stat) < 0)
     {
-       if (!FcConfigAcceptFilename (config, dir))
-           continue;
-
-       /* Skip this directory if already updated
-        * to avoid the looped directories via symlinks
-        * Clearly a dir not in fonts.conf shouldn't be globally cached.
-        */
-
-       if (FcStrSetMember (processed_dirs, dir))
-           continue;
-       if (!FcStrSetAdd (processed_dirs, dir))
-           continue;
-
-       subdirs = FcStrSetCreate ();
-       if (!subdirs)
-       {
-           fprintf (stderr, "Can't create directory set\n");
-           ret++;
-           continue;
-       }
-       
-       FcDirScanConfig (set, subdirs,
-                        config->blanks, dir, FcFalse, config);
-       
-       sublist = FcStrListCreate (subdirs);
-       FcStrSetDestroy (subdirs);
-       if (!sublist)
-       {
-           fprintf (stderr, "Can't create subdir list in \"%s\"\n", dir);
-           ret++;
-           continue;
-       }
-       ret += FcCacheReadDirs (config, sublist, set, processed_dirs);
+       close (fd);
+       return -1;
     }
-    FcStrListDone (list);
-    return ret;
-}
-
-FcFontSet *
-FcCacheRead (FcConfig *config)
-{
-    FcFontSet  *s = FcFontSetCreate();
-    FcStrSet   *processed_dirs;
-
-    if (!s) 
-       return 0;
-
-    processed_dirs = FcStrSetCreate();
-    if (!processed_dirs)
-       goto bail;
-
-    if (FcCacheReadDirs (config, FcConfigGetConfigDirs (config), s, processed_dirs))
-       goto bail1;
-
-    FcStrSetDestroy (processed_dirs);
-    return s;
-
- bail1:
-    FcStrSetDestroy (processed_dirs);
- bail:
-    FcFontSetDestroy (s);
-    return 0;
+    return fd;
 }
 
 /* 
@@ -196,8 +134,8 @@ FcCacheRead (FcConfig *config)
  */
 static FcBool
 FcDirCacheProcess (FcConfig *config, const FcChar8 *dir, 
-                  FcBool (*callback) (int fd, off_t size, void *closure),
-                  void *closure)
+                  FcBool (*callback) (int fd, struct stat *stat, void *closure),
+                  void *closure, FcChar8 **cache_file_ret)
 {
     int                fd = -1;
     FcChar8    cache_base[CACHEBASE_LEN];
@@ -220,192 +158,286 @@ FcDirCacheProcess (FcConfig *config, const FcChar8 *dir,
         FcChar8        *cache_hashed = FcStrPlus (cache_dir, cache_base);
         if (!cache_hashed)
            break;
-        fd = open((char *) cache_hashed, O_RDONLY | O_BINARY);
-       FcStrFree (cache_hashed);
+        fd = FcDirCacheOpenFile (cache_hashed, &file_stat);
         if (fd >= 0) {
-           if (fstat (fd, &file_stat) >= 0 &&
-               dir_stat.st_mtime <= file_stat.st_mtime)
+           if (dir_stat.st_mtime <= file_stat.st_mtime)
            {
-               ret = (*callback) (fd, file_stat.st_size, closure);
+               ret = (*callback) (fd, &file_stat, closure);
                if (ret)
                {
+                   if (cache_file_ret)
+                       *cache_file_ret = cache_hashed;
+                   else
+                       FcStrFree (cache_hashed);
                    close (fd);
                    break;
                }
            }
            close (fd);
        }
+       FcStrFree (cache_hashed);
     }
     FcStrListDone (list);
     
     return ret;
 }
 
+static void
+FcDirCacheDispose (FcCache *cache)
+{
+    switch (cache->magic) {
+    case FC_CACHE_MAGIC_ALLOC:
+       free (cache);
+       break;
+    case FC_CACHE_MAGIC_MMAP:
+#if defined(HAVE_MMAP) || defined(__CYGWIN__)
+       munmap (cache, cache->size);
+#elif defined(_WIN32)
+       UnmapViewOfFile (cache);
+#endif
+       break;
+    }
+}
+
+#define FC_CACHE_MIN_MMAP   1024
+
+#define FC_CACHE_HASH_SIZE  67
+
+typedef struct _FcCacheBucket FcCacheBucket;
+
+struct _FcCacheBucket {
+    FcCacheBucket   *next;
+    FcCache        *cache;
+    dev_t          cache_dev;
+    ino_t          cache_ino;
+    time_t         cache_mtime;
+};
+
+static FcCacheBucket   *FcCacheBuckets[FC_CACHE_HASH_SIZE];
+
+static uint32_t
+FcCacheStatHash (struct stat *cache_stat)
+{
+    return ((uint32_t) cache_stat->st_dev ^
+           (uint32_t) cache_stat->st_ino ^
+           (uint32_t) cache_stat->st_mtime);
+}
+
+static FcCache *
+FcCacheLookup (struct stat *cache_stat)
+{
+    uint32_t       hash = FcCacheStatHash(cache_stat);
+    FcCacheBucket   **bucket = &FcCacheBuckets[hash % FC_CACHE_HASH_SIZE];
+    FcCacheBucket   *b;
+
+    for (b = *bucket; b; b = b->next)
+       if (b->cache_dev == cache_stat->st_dev &&
+           b->cache_ino == cache_stat->st_ino &&
+           b->cache_mtime == cache_stat->st_mtime)
+           return b->cache;
+    return NULL;
+}
+
 static FcBool
-FcDirCacheLoad (int fd, off_t size, void *closure)
+FcCacheRecord (FcCache *cache, struct stat *cache_stat)
+{
+    uint32_t       hash = FcCacheStatHash(cache_stat);
+    FcCacheBucket   **bucket = &FcCacheBuckets[hash % FC_CACHE_HASH_SIZE];
+    FcCacheBucket   *b;
+
+    b = malloc (sizeof (FcCacheBucket));
+    if (!b)
+       return FcFalse;
+    b->next = *bucket;
+    b->cache = cache;
+    b->cache_dev = cache_stat->st_dev;
+    b->cache_ino = cache_stat->st_ino;
+    b->cache_mtime = cache_stat->st_mtime;
+    *bucket = b;
+    return FcTrue;
+}
+
+void
+FcCacheFini (void)
+{
+    int                    i;
+    FcCacheBucket   *b, *next;
+
+    for (i = 0; i < FC_CACHE_HASH_SIZE; i++)
+    {
+       for (b = FcCacheBuckets[i]; b; b = next)
+       {
+           next = b->next;
+           FcDirCacheDispose (b->cache);
+           free (b);
+       }
+       FcCacheBuckets[i] = NULL;
+    }
+}
+
+/*
+ * Map a cache file into memory
+ */
+static FcCache *
+FcDirCacheMapFd (int fd, struct stat *fd_stat)
 {
     FcCache    *cache;
     FcBool     allocated = FcFalse;
 
-    if (size < sizeof (FcCache))
-       return FcFalse;
+    if (fd_stat->st_size < sizeof (FcCache))
+       return NULL;
+    cache = FcCacheLookup (fd_stat);
+    if (cache)
+       return cache;
+    /*
+     * For small cache files, just read them into memory
+     */
+    if (fd_stat->st_size >= FC_CACHE_MIN_MMAP)
+    {
 #if defined(HAVE_MMAP) || defined(__CYGWIN__)
-    cache = mmap (0, size, PROT_READ, MAP_SHARED, fd, 0);
+       cache = mmap (0, fd_stat->st_size, PROT_READ, MAP_SHARED, fd, 0);
 #elif defined(_WIN32)
-    {
-       HANDLE hFileMap;
-
-       cache = NULL;
-       hFileMap = CreateFileMapping((HANDLE) _get_osfhandle(fd), NULL,
-                                    PAGE_READONLY, 0, 0, NULL);
-       if (hFileMap != NULL)
        {
-           cache = MapViewOfFile (hFileMap, FILE_MAP_READ, 0, 0, size);
-           CloseHandle (hFileMap);
+           HANDLE hFileMap;
+
+           cache = NULL;
+           hFileMap = CreateFileMapping((HANDLE) _get_osfhandle(fd), NULL,
+                                        PAGE_READONLY, 0, 0, NULL);
+           if (hFileMap != NULL)
+           {
+               cache = MapViewOfFile (hFileMap, FILE_MAP_READ, 0, 0, size);
+               CloseHandle (hFileMap);
+           }
        }
-    }
 #endif
+    }
     if (!cache)
     {
-       cache = malloc (size);
+       cache = malloc (fd_stat->st_size);
        if (!cache)
-           return FcFalse;
+           return NULL;
 
-       if (read (fd, cache, size) != size)
+       if (read (fd, cache, fd_stat->st_size) != fd_stat->st_size)
        {
            free (cache);
-           return FcFalse;
+           return NULL;
        }
        allocated = FcTrue;
     } 
-    if (cache->magic != FC_CACHE_MAGIC ||
-       cache->size != size)
+    if (cache->magic != FC_CACHE_MAGIC_MMAP || 
+       cache->version < FC_CACHE_CONTENT_VERSION ||
+       cache->size != fd_stat->st_size ||
+       !FcCacheRecord (cache, fd_stat))
     {
        if (allocated)
            free (cache);
        else
        {
 #if defined(HAVE_MMAP) || defined(__CYGWIN__)
-           munmap (cache, size);
+           munmap (cache, fd_stat->st_size);
 #elif defined(_WIN32)
            UnmapViewOfFile (cache);
 #endif
        }
-       return FcFalse;
+       return NULL;
     }
 
     /* Mark allocated caches so they're freed rather than unmapped */
     if (allocated)
-       cache->magic = FC_CACHE_MAGIC_COPY;
+       cache->magic = FC_CACHE_MAGIC_ALLOC;
        
+    return cache;
+}
+
+void
+FcDirCacheUnload (FcCache *cache)
+{
+    /* Can't free or unmap the cache as apps may point into it */
+}
+
+static FcBool
+FcDirCacheMapHelper (int fd, struct stat *fd_stat, void *closure)
+{
+    FcCache *cache = FcDirCacheMapFd (fd, fd_stat);
+
+    if (!cache)
+       return FcFalse;
     *((FcCache **) closure) = cache;
     return FcTrue;
 }
 
 FcCache *
-FcDirCacheMap (int fd, off_t size)
+FcDirCacheLoad (const FcChar8 *dir, FcConfig *config, FcChar8 **cache_file)
 {
-    FcCache *cache;
+    FcCache *cache = NULL;
 
-    if (FcDirCacheLoad (fd, size, &cache))
-       return cache;
-    return NULL;
+    if (!FcDirCacheProcess (config, dir,
+                           FcDirCacheMapHelper,
+                           &cache, cache_file))
+       return NULL;
+    return cache;
 }
 
-FcBool
-FcDirCacheRead (FcFontSet * set, FcStrSet * dirs, 
-               const FcChar8 *dir, FcConfig *config)
+FcCache *
+FcDirCacheLoadFile (const FcChar8 *cache_file, struct stat *file_stat)
 {
-    FcCache    *cache;
-    int                i;
-    FcFontSet  *cache_set;
-    intptr_t   *cache_dirs;
-    FcPattern   **cache_fonts;
+    int        fd;
+    FcCache *cache;
 
-    if (!FcDirCacheProcess (config, dir, 
-                           FcDirCacheLoad,
-                           &cache))
-       return FcFalse;
-    
-    cache_set = FcCacheSet (cache);
-    cache_fonts = FcFontSetFonts(cache_set);
-    if (FcDebug() & FC_DBG_CACHE)
-        printf ("FcDirCacheRead mapped cache for %s (%d fonts %d subdirs)\n",
-               dir, cache_set->nfont, cache->dirs_count);
-    for (i = 0; i < cache_set->nfont; i++)
-    {
-       FcPattern   *font = FcEncodedOffsetToPtr (cache_set,
-                                                 cache_fonts[i],
-                                                 FcPattern);
-       if (FcDebug() & FC_DBG_CACHEV) {
-           printf ("Mapped font %d\n", i);
-           FcPatternPrint (font);
-       }
-       FcFontSetAdd (set, font);
-    }
-    
-    cache_dirs = FcCacheDirs (cache);
-    for (i = 0; i < cache->dirs_count; i++) 
-       FcStrSetAdd (dirs, FcOffsetToPtr (cache_dirs,
-                                         cache_dirs[i],
-                                         FcChar8));
-        
-    if (config)
-       FcConfigAddFontDir (config, (FcChar8 *)dir);
-    
-    return FcTrue;
+    fd = FcDirCacheOpenFile (cache_file, file_stat);
+    if (fd < 0)
+       return NULL;
+    cache = FcDirCacheMapFd (fd, file_stat);
+    close (fd);
+    return cache;
 }
-    
+
+/*
+ * Validate a cache file by reading the header and checking
+ * the magic number and the size field
+ */
 static FcBool
-FcDirCacheValidate (int fd, off_t size, void *closure)
+FcDirCacheValidateHelper (int fd, struct stat *fd_stat, void *closure)
 {
     FcBool  ret = FcTrue;
     FcCache    c;
-    struct stat        file_stat;
     
     if (read (fd, &c, sizeof (FcCache)) != sizeof (FcCache))
        ret = FcFalse;
-    else if (fstat (fd, &file_stat) < 0)
+    else if (c.magic != FC_CACHE_MAGIC_MMAP)
        ret = FcFalse;
-    else if (c.magic != FC_CACHE_MAGIC)
+    else if (c.version < FC_CACHE_CONTENT_VERSION)
        ret = FcFalse;
-    else if (file_stat.st_size != c.size)
+    else if (fd_stat->st_size != c.size)
        ret = FcFalse;
     return ret;
 }
 
-FcBool
-FcDirCacheValid (const FcChar8 *dir, FcConfig *config)
+static FcBool
+FcDirCacheValidConfig (const FcChar8 *dir, FcConfig *config)
 {
-    return FcDirCacheProcess (config, dir, FcDirCacheValidate, NULL);
+    return FcDirCacheProcess (config, dir, 
+                             FcDirCacheValidateHelper,
+                             NULL, NULL);
 }
 
-void
-FcDirCacheUnmap (FcCache *cache)
+FcBool
+FcDirCacheValid (const FcChar8 *dir)
 {
-    if (cache->magic == FC_CACHE_MAGIC_COPY)
-    {
-       free (cache);
-       return;
-    }
-#if defined(HAVE_MMAP) || defined(__CYGWIN__)
-    munmap (cache, cache->size);
-#elif defined(_WIN32)
-    UnmapViewOfFile (cache);
-#endif
+    FcConfig   *config;
+    
+    config = FcConfigGetCurrent ();
+    if (!config)
+        return FcFalse;
+
+    return FcDirCacheValidConfig (dir, config);
 }
 
 /*
- * Cache file is:
- *
- * FcCache
- * dir name
- * subdirs
- * FcFontSet
+ * Build a cache structure from the given contents
  */
-
-static FcCache *
-FcDirCacheProduce (FcFontSet *set, const FcChar8 *dir, FcStrSet *dirs)
+FcCache *
+FcDirCacheBuild (FcFontSet *set, const FcChar8 *dir, FcStrSet *dirs)
 {
     FcSerialize        *serialize = FcSerializeCreate ();
     FcCache *cache;
@@ -450,7 +482,8 @@ FcDirCacheProduce (FcFontSet *set, const FcChar8 *dir, FcStrSet *dirs)
 
     serialize->linear = cache;
 
-    cache->magic = FC_CACHE_MAGIC;
+    cache->magic = FC_CACHE_MAGIC_ALLOC;
+    cache->version = FC_CACHE_CONTENT_VERSION;
     cache->size = serialize->size;
 
     /*
@@ -520,16 +553,18 @@ FcMakeDirectory (const FcChar8 *dir)
 
 /* write serialized state to the cache file */
 FcBool
-FcDirCacheWrite (FcFontSet *set, FcStrSet *dirs, const FcChar8 *dir, FcConfig *config)
+FcDirCacheWrite (FcCache *cache, FcConfig *config)
 {
+    FcChar8        *dir = FcCacheDir (cache);
     FcChar8        cache_base[CACHEBASE_LEN];
     FcChar8        *cache_hashed;
     int            fd;
     FcAtomic       *atomic;
-    FcCache        *cache;
     FcStrList      *list;
     FcChar8        *cache_dir = NULL;
     FcChar8        *test_dir;
+    int                    magic;
+    int                    written;
 
     /*
      * Write it to the first directory in the list which is writable
@@ -567,18 +602,13 @@ FcDirCacheWrite (FcFontSet *set, FcStrSet *dirs, const FcChar8 *dir, FcConfig *c
     if (!cache_hashed)
         return FcFalse;
 
-    cache = FcDirCacheProduce (set, dir, dirs);
-
-    if (!cache)
-       goto bail1;
-
     if (FcDebug () & FC_DBG_CACHE)
         printf ("FcDirCacheWriteDir dir \"%s\" file \"%s\"\n",
                dir, cache_hashed);
 
     atomic = FcAtomicCreate ((FcChar8 *)cache_hashed);
     if (!atomic)
-       goto bail2;
+       goto bail1;
 
     if (!FcAtomicLock (atomic))
        goto bail3;
@@ -587,7 +617,21 @@ FcDirCacheWrite (FcFontSet *set, FcStrSet *dirs, const FcChar8 *dir, FcConfig *c
     if (fd == -1)
        goto bail4;
     
-    if (write (fd, cache, cache->size) != cache->size)
+    /* Temporarily switch magic to MMAP while writing to file */
+    magic = cache->magic;
+    if (magic != FC_CACHE_MAGIC_MMAP)
+       cache->magic = FC_CACHE_MAGIC_MMAP;
+    
+    /*
+     * Write cache contents to file
+     */
+    written = write (fd, cache, cache->size);
+    
+    /* Switch magic back */
+    if (magic != FC_CACHE_MAGIC_MMAP)
+       cache->magic = magic;
+    
+    if (written != cache->size)
     {
        perror ("write cache");
        goto bail5;
@@ -596,7 +640,7 @@ FcDirCacheWrite (FcFontSet *set, FcStrSet *dirs, const FcChar8 *dir, FcConfig *c
     close(fd);
     if (!FcAtomicReplaceOrig(atomic))
         goto bail4;
-    FcStrFree ((FcChar8 *)cache_hashed);
+    FcStrFree (cache_hashed);
     FcAtomicUnlock (atomic);
     FcAtomicDestroy (atomic);
     return FcTrue;
@@ -607,13 +651,59 @@ FcDirCacheWrite (FcFontSet *set, FcStrSet *dirs, const FcChar8 *dir, FcConfig *c
     FcAtomicUnlock (atomic);
  bail3:
     FcAtomicDestroy (atomic);
- bail2:
-    free (cache);
  bail1:
-    FcStrFree ((FcChar8 *)cache_hashed);
+    FcStrFree (cache_hashed);
     return FcFalse;
 }
 
+/*
+ * Hokey little macro trick to permit the definitions of C functions
+ * with the same name as CPP macros
+ */
+#define args(x...)         (x)
+
+const FcChar8 *
+FcCacheDir args(const FcCache *c)
+{
+    return FcCacheDir (c);
+}
+
+FcFontSet *
+FcCacheCopySet args(const FcCache *c)
+{
+    FcFontSet  *old = FcCacheSet (c);
+    FcFontSet  *new = FcFontSetCreate ();
+    int                i;
+    
+    if (!new)
+       return NULL;
+    for (i = 0; i < old->nfont; i++)
+       if (!FcFontSetAdd (new, FcFontSetFont (old, i)))
+       {
+           FcFontSetDestroy (new);
+           return NULL;
+       }
+    return new;
+}
+
+const FcChar8 *
+FcCacheSubdir args(const FcCache *c, int i)
+{
+    return FcCacheSubdir (c, i);
+}
+
+int
+FcCacheNumSubdir args(const FcCache *c)
+{
+    return c->dirs_count;
+}
+
+int
+FcCacheNumFont args(const FcCache *c)
+{
+    return FcCacheSet(c)->nfont;
+}
+
 /*
  * This code implements the MD5 message-digest algorithm.
  * The algorithm is due to Ron Rivest. This code was