X-Git-Url: https://git.wh0rd.org/?a=blobdiff_plain;f=fc-cache%2Ffc-cache.c;h=bda8b1468cfa7a0504cac35a821a186070ed0b2a;hb=b190ad9da46ff2e8a9ede0afcb59a6c59641515b;hp=2bb012d2025174fdbcbd4760dec821dcfa501d79;hpb=65018b4a468c3175790dc27dfe37987151ad97d5;p=fontconfig.git

diff --git a/fc-cache/fc-cache.c b/fc-cache/fc-cache.c
index 2bb012d..bda8b14 100644
--- a/fc-cache/fc-cache.c
+++ b/fc-cache/fc-cache.c
@@ -1,7 +1,7 @@
 /*
- * $XFree86: $
+ * $RCSId: xc/lib/fontconfig/fc-cache/fc-cache.c,v 1.8tsi Exp $
  *
- * Copyright © 2002 Keith Packard, member of The XFree86 Project, Inc.
+ * Copyright © 2002 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
@@ -22,19 +22,51 @@
  * PERFORMANCE OF THIS SOFTWARE.
  */
 
-#include <fontconfig/fontconfig.h>
-#include <stdio.h>
-#include <unistd.h>
 #ifdef HAVE_CONFIG_H
 #include <config.h>
 #else
+#ifdef linux
+#define HAVE_GETOPT_LONG 1
+#endif
 #define HAVE_GETOPT 1
 #endif
 
+#include <fontconfig/fontconfig.h>
+#include <stdio.h>
+#include <stdlib.h>
+#include <unistd.h>
+#include <sys/types.h>
+#include <sys/stat.h>
+#include <errno.h>
+#include <fcntl.h>
+#include <dirent.h>
+
+#if defined (_WIN32)
+#define STRICT
+#include <windows.h>
+#define sleep(x) Sleep((x) * 1000)
+#undef STRICT
+#endif
+
+#ifndef O_BINARY
+#define O_BINARY 0
+#endif
+
+#ifndef HAVE_GETOPT
+#define HAVE_GETOPT 0
+#endif
+#ifndef HAVE_GETOPT_LONG
+#define HAVE_GETOPT_LONG 0
+#endif
+
 #if HAVE_GETOPT_LONG
+#undef  _GNU_SOURCE
 #define _GNU_SOURCE
 #include <getopt.h>
 const struct option longopts[] = {
+    {"force", 0, 0, 'f'},
+    {"really-force", 0, 0, 'r'},
+    {"system-only", 0, 0, 's'},
     {"version", 0, 0, 'V'},
     {"verbose", 0, 0, 'v'},
     {"help", 0, 0, '?'},
@@ -50,41 +82,326 @@ extern int optind, opterr, optopt;
 static void
 usage (char *program)
 {
-    fprintf (stderr, "usage: %s [-vV?] [--verbose] [--version] [--help] [dirs]\n",
+#if HAVE_GETOPT_LONG
+    fprintf (stderr, "usage: %s [-frsvV?] [--force|--really-force] [--system-only] [--verbose] [--version] [--help] [dirs]\n",
+	     program);
+#else
+    fprintf (stderr, "usage: %s [-frsvV?] [dirs]\n",
 	     program);
+#endif
     fprintf (stderr, "Build font information caches in [dirs]\n"
 	     "(all directories in font configuration by default).\n");
     fprintf (stderr, "\n");
+#if HAVE_GETOPT_LONG
+    fprintf (stderr, "  -f, --force          scan directories with apparently valid caches\n");
+    fprintf (stderr, "  -r, --really-force   erase all existing caches, then rescan\n");
+    fprintf (stderr, "  -s, --system-only    scan system-wide directories only\n");
     fprintf (stderr, "  -v, --verbose        display status information while busy\n");
     fprintf (stderr, "  -V, --version        display font config version and exit\n");
     fprintf (stderr, "  -?, --help           display this help and exit\n");
+#else
+    fprintf (stderr, "  -f         (force)   scan directories with apparently valid caches\n");
+    fprintf (stderr, "  -r,   (really force) erase all existing caches, then rescan\n");
+    fprintf (stderr, "  -s         (system)  scan system-wide directories only\n");
+    fprintf (stderr, "  -v         (verbose) display status information while busy\n");
+    fprintf (stderr, "  -V         (version) display font config version and exit\n");
+    fprintf (stderr, "  -?         (help)    display this help and exit\n");
+#endif
     exit (1);
 }
 
+static FcStrSet *processed_dirs;
+
+static int
+scanDirs (FcStrList *list, FcConfig *config, FcBool force, FcBool really_force, FcBool verbose)
+{
+    int		    ret = 0;
+    const FcChar8   *dir;
+    FcStrSet	    *subdirs;
+    FcStrList	    *sublist;
+    FcCache	    *cache;
+    struct stat	    statb;
+    FcBool	    was_valid;
+    int		    i;
+    
+    /*
+     * Now scan all of the directories into separate databases
+     * and write out the results
+     */
+    while ((dir = FcStrListNext (list)))
+    {
+	if (verbose)
+	{
+	    printf ("%s: ", dir);
+	    fflush (stdout);
+	}
+	
+	if (!dir)
+	{
+	    if (verbose)
+		printf ("skipping, no such directory\n");
+	    continue;
+	}
+	
+	if (FcStrSetMember (processed_dirs, dir))
+	{
+	    if (verbose)
+		printf ("skipping, looped directory detected\n");
+	    continue;
+	}
+
+	if (access ((char *) dir, W_OK) < 0)
+	{
+	    switch (errno) {
+	    case ENOENT:
+	    case ENOTDIR:
+		if (verbose)
+		    printf ("skipping, no such directory\n");
+		continue;
+	    case EACCES:
+	    case EROFS:
+		/* That's ok, caches go to /var anyway. */
+		/* Ideally we'd do an access on the hashed_name. */
+		/* But we hid that behind an abstraction barrier. */
+		break;
+	    default:
+		fprintf (stderr, "\"%s\": ", dir);
+		perror ("");
+		ret++;
+
+		continue;
+	    }
+	}
+	if (stat ((char *) dir, &statb) == -1)
+	{
+	    fprintf (stderr, "\"%s\": ", dir);
+	    perror ("");
+	    ret++;
+	    continue;
+	}
+	if (!S_ISDIR (statb.st_mode))
+	{
+	    fprintf (stderr, "\"%s\": not a directory, skipping\n", dir);
+	    continue;
+	}
+
+	if (really_force)
+	    FcDirCacheUnlink (dir, config);
+
+	cache = NULL;
+	was_valid = FcFalse;
+	if (!force) {
+	    cache = FcDirCacheLoad (dir, config, NULL);
+	    if (cache)
+		was_valid = FcTrue;
+	}
+	
+	if (!cache)
+	{
+	    cache = FcDirCacheRead (dir, FcTrue, config);
+	    if (!cache)
+	    {
+		fprintf (stderr, "%s: error scanning\n", dir);
+		ret++;
+		continue;
+	    }
+	}
+
+	if (was_valid)
+	{
+	    if (verbose)
+		printf ("skipping, %d fonts, %d dirs\n",
+			FcCacheNumFont (cache), FcCacheNumSubdir (cache));
+	}
+	else
+	{
+	    if (verbose)
+		printf ("caching, %d fonts, %d dirs\n", 
+			FcCacheNumFont (cache), FcCacheNumSubdir (cache));
+
+	    if (!FcDirCacheValid (dir))
+	    {
+		fprintf (stderr, "%s: failed to write cache\n", dir);
+		(void) FcDirCacheUnlink (dir, config);
+		ret++;
+	    }
+	}
+	
+	subdirs = FcStrSetCreate ();
+	if (!subdirs)
+	{
+	    fprintf (stderr, "%s: Can't create subdir set\n", dir);
+	    ret++;
+	    FcDirCacheUnload (cache);
+	    continue;
+	}
+	for (i = 0; i < FcCacheNumSubdir (cache); i++)
+	    FcStrSetAdd (subdirs, FcCacheSubdir (cache, i));
+	
+	FcDirCacheUnload (cache);
+	
+	sublist = FcStrListCreate (subdirs);
+	FcStrSetDestroy (subdirs);
+	if (!sublist)
+	{
+	    fprintf (stderr, "%s: Can't create subdir list\n", dir);
+	    ret++;
+	    continue;
+	}
+	FcStrSetAdd (processed_dirs, dir);
+	ret += scanDirs (sublist, config, force, really_force, verbose);
+    }
+    FcStrListDone (list);
+    return ret;
+}
+
+static FcBool
+cleanCacheDirectory (FcConfig *config, FcChar8 *dir, FcBool verbose)
+{
+    DIR		*d;
+    struct dirent *ent;
+    FcChar8	*dir_base;
+    FcBool	ret = FcTrue;
+    FcBool	remove;
+    FcCache	*cache;
+    struct stat	file_stat;
+    struct stat	target_stat;
+
+    dir_base = FcStrPlus (dir, (FcChar8 *) "/");
+    if (!dir_base)
+    {
+	fprintf (stderr, "%s: out of memory\n", dir);
+	return FcFalse;
+    }
+    if (access ((char *) dir, W_OK|X_OK) != 0)
+    {
+	if (verbose)
+	    printf ("%s: not cleaning unwritable cache directory\n", dir);
+	FcStrFree (dir_base);
+	return FcTrue;
+    }
+    if (verbose)
+	printf ("%s: cleaning cache directory\n", dir);
+    d = opendir ((char *) dir);
+    if (!d)
+    {
+	perror ((char *) dir);
+	FcStrFree (dir_base);
+	return FcFalse;
+    }
+    while ((ent = readdir (d)))
+    {
+	FcChar8	*file_name;
+	const FcChar8	*target_dir;
+
+	if (ent->d_name[0] == '.')
+	    continue;
+	file_name = FcStrPlus (dir_base, (FcChar8 *) ent->d_name);
+	if (!file_name)
+	{
+	    fprintf (stderr, "%s: allocation failure\n", dir);
+	    ret = FcFalse;
+	    break;
+	}
+	cache = FcDirCacheLoadFile (file_name, &file_stat);
+	if (!cache)
+	{
+	    fprintf (stderr, "%s: invalid cache file: %s\n", dir, ent->d_name);
+	    FcStrFree (file_name);
+	    ret = FcFalse;
+	    continue;
+	}
+	target_dir = FcCacheDir (cache);
+	remove = FcFalse;
+	if (stat ((char *) target_dir, &target_stat) < 0)
+	{
+	    if (verbose)
+		printf ("%s: %s: missing directory: %s \n",
+			dir, ent->d_name, target_dir);
+	    remove = FcTrue;
+	}
+	else if (target_stat.st_mtime > file_stat.st_mtime)
+	{
+	    if (verbose)
+		printf ("%s: %s: cache outdated: %s\n",
+			dir, ent->d_name, target_dir);
+	    remove = FcTrue;
+	}
+	if (remove)
+	{
+	    if (unlink ((char *) file_name) < 0)
+	    {
+		perror ((char *) file_name);
+		ret = FcFalse;
+	    }
+	}
+	FcDirCacheUnload (cache);
+        FcStrFree (file_name);
+    }
+    
+    closedir (d);
+    FcStrFree (dir_base);
+    return ret;
+}
+
+static FcBool
+cleanCacheDirectories (FcConfig *config, FcBool verbose)
+{
+    FcStrList	*cache_dirs = FcConfigGetCacheDirs (config);
+    FcChar8	*cache_dir;
+    FcBool	ret = FcTrue;
+
+    if (!cache_dirs)
+	return FcFalse;
+    while ((cache_dir = FcStrListNext (cache_dirs)))
+    {
+	if (!cleanCacheDirectory (config, cache_dir, verbose))
+	{
+	    ret = FcFalse;
+	    break;
+	}
+    }
+    FcStrListDone (cache_dirs);
+    return ret;
+}
+
 int
 main (int argc, char **argv)
 {
-    int		ret = 0;
-    FcFontSet	*set;
-    FcChar8	**dirs;
-    int		verbose = 0;
+    FcStrSet	*dirs;
+    FcStrList	*list;
+    FcBool    	verbose = FcFalse;
+    FcBool	force = FcFalse;
+    FcBool	really_force = FcFalse;
+    FcBool	systemOnly = FcFalse;
+    FcConfig	*config;
     int		i;
+    int		ret;
 #if HAVE_GETOPT_LONG || HAVE_GETOPT
     int		c;
 
 #if HAVE_GETOPT_LONG
-    while ((c = getopt_long (argc, argv, "Vv?", longopts, NULL)) != -1)
+    while ((c = getopt_long (argc, argv, "frsVv?", longopts, NULL)) != -1)
 #else
-    while ((c = getopt (argc, argv, "Vv?")) != -1)
+    while ((c = getopt (argc, argv, "frsVv?")) != -1)
 #endif
     {
 	switch (c) {
+	case 'r':
+	    really_force = FcTrue;
+	    /* fall through */
+	case 'f':
+	    force = FcTrue;
+	    break;
+	case 's':
+	    systemOnly = FcTrue;
+	    break;
 	case 'V':
 	    fprintf (stderr, "fontconfig version %d.%d.%d\n", 
 		     FC_MAJOR, FC_MINOR, FC_REVISION);
 	    exit (0);
 	case 'v':
-	    verbose = 1;
+	    verbose = FcTrue;
 	    break;
 	default:
 	    usage (argv[0]);
@@ -95,51 +412,60 @@ main (int argc, char **argv)
     i = 1;
 #endif
 
-    if (!FcInitConfig ())
+    if (systemOnly)
+	FcConfigEnableHome (FcFalse);
+    config = FcInitLoadConfig ();
+    if (!config)
     {
-	fprintf (stderr, "Can't init font config library\n");
+	fprintf (stderr, "%s: Can't init font config library\n", argv[0]);
 	return 1;
     }
+    FcConfigSetCurrent (config);
+
     if (argv[i])
-	dirs = (FcChar8 **) (argv+i);
-    else
-	dirs = FcConfigGetDirs (0);
-    /*
-     * Now scan all of the directories into separate databases
-     * and write out the results
-     */
-    while (dirs && *dirs)
     {
-	if (verbose)
-	    printf ("%s: Scanning directory \"%s\"\n", argv[0], *dirs);
-	set = FcFontSetCreate ();
-	if (!set)
+	dirs = FcStrSetCreate ();
+	if (!dirs)
 	{
-	    fprintf (stderr, "Out of memory in \"%s\"\n", *dirs);
-	    ret++;
+	    fprintf (stderr, "%s: Can't create list of directories\n",
+		     argv[0]);
+	    return 1;
 	}
-	else
+	while (argv[i])
 	{
-	    if (!FcDirScan (set, 0, FcConfigGetBlanks (0), *dirs, FcTrue))
+	    if (!FcStrSetAddFilename (dirs, (FcChar8 *) argv[i]))
 	    {
-		fprintf (stderr, "Can't scan directory \"%s\"\n", *dirs);
-		ret++;
-	    }
-	    else
-	    {
-		if (verbose)
-		    printf ("%s: Saving %d font names for \"%s\"\n", 
-			    argv[0], set->nfont, *dirs);
-		if (!FcDirSave (set, *dirs))
-		{
-		    fprintf (stderr, "Can't save cache in \"%s\"\n", *dirs);
-		    ret++;
-		}
+		fprintf (stderr, "%s: Can't add directory\n", argv[0]);
+		return 1;
 	    }
-	    FcFontSetDestroy (set);
+	    i++;
 	}
-	++dirs;
+	list = FcStrListCreate (dirs);
+	FcStrSetDestroy (dirs);
     }
+    else
+	list = FcConfigGetConfigDirs (config);
+
+    if ((processed_dirs = FcStrSetCreate()) == NULL) {
+	fprintf(stderr, "Cannot malloc\n");
+	return 1;
+    }
+	
+    ret = scanDirs (list, config, force, really_force, verbose);
+
+    FcStrSetDestroy (processed_dirs);
+
+    cleanCacheDirectories (config, verbose);
+
+    /* 
+     * Now we need to sleep a second  (or two, to be extra sure), to make
+     * sure that timestamps for changes after this run of fc-cache are later
+     * then any timestamps we wrote.  We don't use gettimeofday() because
+     * sleep(3) can't be interrupted by a signal here -- this isn't in the
+     * library, and there aren't any signals flying around here.
+     */
+    FcConfigDestroy (config);
+    sleep (2);
     if (verbose)
 	printf ("%s: %s\n", argv[0], ret ? "failed" : "succeeded");
     return ret;