]> git.wh0rd.org - fontconfig.git/blobdiff - fc-cache/fc-cache.c
Make fc-arch stuff cross-compiling-safe
[fontconfig.git] / fc-cache / fc-cache.c
index 6e84ccdb75cc94c18e05e7e4e776a8e12e67fcd5..d2653507eff17f2b7e7348ca7f4bf6e29e1f789f 100644 (file)
@@ -1,43 +1,78 @@
 /*
- * $XFree86: $
+ * fontconfig/fc-cache/fc-cache.c
  *
- * 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
  * 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 Keith Packard not be used in
+ * 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.  Keith Packard makes no
+ * 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.
  *
- * KEITH PACKARD DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE,
+ * THE AUTHOR(S) DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE,
  * INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO
- * EVENT SHALL KEITH PACKARD BE LIABLE FOR ANY SPECIAL, INDIRECT OR
+ * 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 <fontconfig/fontconfig.h>
-#include <stdio.h>
-#include <unistd.h>
+#include "../src/fcarch.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>
+#include <string.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, '?'},
+    {"help", 0, 0, 'h'},
     {NULL,0,0,0},
 };
 #else
@@ -47,46 +82,326 @@ extern int optind, opterr, optopt;
 #endif
 #endif
 
-void usage (char *program)
+static void
+usage (char *program, int error)
 {
-    fprintf (stderr, "usage: %s [-vV?] [--verbose] [--version] [--help] [dirs]\n",
+    FILE *file = error ? stderr : stdout;
+#if HAVE_GETOPT_LONG
+    fprintf (file, "usage: %s [-frsvVh] [--force|--really-force] [--system-only] [--verbose] [--version] [--help] [dirs]\n",
             program);
-    fprintf (stderr, "Build font information caches in [dirs]\n"
+#else
+    fprintf (file, "usage: %s [-frsvVh] [dirs]\n",
+            program);
+#endif
+    fprintf (file, "Build font information caches in [dirs]\n"
             "(all directories in font configuration by default).\n");
-    fprintf (stderr, "\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");
-    exit (1);
+    fprintf (file, "\n");
+#if HAVE_GETOPT_LONG
+    fprintf (file, "  -f, --force          scan directories with apparently valid caches\n");
+    fprintf (file, "  -r, --really-force   erase all existing caches, then rescan\n");
+    fprintf (file, "  -s, --system-only    scan system-wide directories only\n");
+    fprintf (file, "  -v, --verbose        display status information while busy\n");
+    fprintf (file, "  -V, --version        display font config version and exit\n");
+    fprintf (file, "  -h, --help           display this help and exit\n");
+#else
+    fprintf (file, "  -f         (force)   scan directories with apparently valid caches\n");
+    fprintf (file, "  -r,   (really force) erase all existing caches, then rescan\n");
+    fprintf (file, "  -s         (system)  scan system-wide directories only\n");
+    fprintf (file, "  -v         (verbose) display status information while busy\n");
+    fprintf (file, "  -V         (version) display font config version and exit\n");
+    fprintf (file, "  -h         (help)    display this help and exit\n");
+#endif
+    exit (error);
+}
+
+static FcStrSet *processed_dirs;
+
+static int
+scanDirs (FcStrList *list, FcConfig *config, FcBool force, FcBool really_force, FcBool verbose, int *changed)
+{
+    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 (stat ((char *) dir, &statb) == -1)
+       {
+           switch (errno) {
+           case ENOENT:
+           case ENOTDIR:
+               if (verbose)
+                   printf ("skipping, no such directory\n");
+               break;
+           default:
+               fprintf (stderr, "\"%s\": ", dir);
+               perror ("");
+               ret++;
+               break;
+           }
+           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)
+       {
+           (*changed)++;
+           cache = FcDirCacheRead (dir, FcTrue, config);
+           if (!cache)
+           {
+               fprintf (stderr, "%s: error scanning\n", dir);
+               ret++;
+               continue;
+           }
+       }
+
+       if (was_valid)
+       {
+           if (verbose)
+               printf ("skipping, existing cache is valid: %d fonts, %d dirs\n",
+                       FcCacheNumFont (cache), FcCacheNumSubdir (cache));
+       }
+       else
+       {
+           if (verbose)
+               printf ("caching, new cache contents: %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, changed);
+    }
+    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        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) != 0)
+    {
+       if (verbose)
+           printf ("%s: not cleaning %s cache directory\n", dir,
+                   access ((char *) dir, F_OK) == 0 ? "unwritable" : "non-existent");
+       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;
+       /* skip cache files for different architectures and */
+       /* files which are not cache files at all */
+       if (strlen(ent->d_name) != 32 + strlen ("-" FC_ARCHITECTURE FC_CACHE_SUFFIX) ||
+           strcmp(ent->d_name + 32, "-" FC_ARCHITECTURE FC_CACHE_SUFFIX))
+           continue;
+       
+       file_name = FcStrPlus (dir_base, (FcChar8 *) ent->d_name);
+       if (!file_name)
+       {
+           fprintf (stderr, "%s: allocation failure\n", dir);
+           ret = FcFalse;
+           break;
+       }
+       remove = FcFalse;
+       cache = FcDirCacheLoadFile (file_name, NULL);
+       if (!cache)
+       {
+           if (verbose)
+               printf ("%s: invalid cache file: %s\n", dir, ent->d_name);
+           remove = FcTrue;
+       }
+       else
+       {
+           target_dir = FcCacheDir (cache);
+           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;
+           }
+       }
+       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;
-    char       **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                changed;
+    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, "frsVvh", longopts, NULL)) != -1)
 #else
-    while ((c = getopt (argc, argv, "Vv?")) != -1)
+    while ((c = getopt (argc, argv, "frsVvh")) != -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;
+       case 'h':
+           usage (argv[0], 0);
        default:
-           usage (argv[0]);
+           usage (argv[0], 1);
        }
     }
     i = optind;
@@ -94,51 +409,63 @@ 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 = 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;
+    }
+       
+    changed = 0;
+    ret = scanDirs (list, config, force, really_force, verbose, &changed);
+
+    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);
+    FcFini ();
+    if (changed)
+       sleep (2);
     if (verbose)
        printf ("%s: %s\n", argv[0], ret ? "failed" : "succeeded");
     return ret;