1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121
|
From: Youhei SASAKI <uwabami@gfd-dennou.org>
Date: Tue, 12 Jul 2016 11:38:41 +0900
Subject: Update pTeX patch: fontconfig
Signed-off-by: Youhei SASAKI <uwabami@gfd-dennou.org>
---
texk/xdvik/fontconfig.c | 92 +++++++++++++++++++++++++++++++++++++++++++++++++
texk/xdvik/fontconfig.h | 11 ++++++
2 files changed, 103 insertions(+)
create mode 100644 texk/xdvik/fontconfig.c
create mode 100644 texk/xdvik/fontconfig.h
--- /dev/null
+++ b/texk/xdvik/fontconfig.c
@@ -0,0 +1,92 @@
+#include "xdvi-config.h"
+#include "xdvi.h"
+#include <stdio.h>
+#include "util.h"
+#include "string-utils.h"
+
+#ifdef PTEX
+#include "kpathsea/tex-file.h"
+
+#if HAVE_FONTCONFIG
+#include <fontconfig/fontconfig.h>
+
+char *fc_match(char *name)
+{
+ FcFontSet *fs;
+ FcPattern *pat;
+ FcResult result;
+ FcPattern *match;
+ char *ret = NULL;
+ static int inited = false;
+
+ if (!inited) {
+ if (FcInit() == 0) {
+ XDVI_WARNING((stderr, "fontconfig: Can't init library.\n"));
+ return NULL;
+ }
+ inited = true;
+ }
+
+ pat = FcNameParse((FcChar8 *)name);
+ FcConfigSubstitute(0, pat, FcMatchPattern);
+ FcDefaultSubstitute(pat);
+ fs = FcFontSetCreate();
+ match = FcFontMatch(0, pat, &result);
+ if (match != NULL) FcFontSetAdd(fs, match);
+ if (pat != NULL) FcPatternDestroy(pat);
+
+ if (fs != NULL) {
+ if (fs->nfont > 0) {
+ FcChar8 *file;
+ if (FcPatternGetString(fs->fonts[0], FC_FILE, 0, &file)
+ == FcResultMatch) {
+ ret = strdup(file);
+ }
+ }
+ FcFontSetDestroy(fs);
+ }
+ if (kpathsea_debug) {
+ fprintf(stderr, "fontconfig:fc_match(%s) => %s\n", name, ret);
+ }
+ return ret;
+}
+
+char *fc_convert(char *name) {
+ char *tmp, *s;
+
+ if (str_is_suffix(".otf", name, false)) return NULL;
+ if (str_is_suffix(".ttf", name, false)) return NULL;
+ if (str_is_suffix(".ttc", name, false)) return NULL;
+ tmp = strdup(name);
+ s = strstr(tmp, "-Light"); if (s != NULL) *s = '\0';
+ s = strstr(tmp, "-Medium"); if (s != NULL) *s = '\0';
+ s = strstr(tmp, "-Regular"); if (s != NULL) *s = '\0';
+ s = fc_match(tmp);
+ free(tmp);
+ return s;
+}
+#endif /* HAVE_FONTCONFIG */
+
+
+const char *get_ptex_font_pathname(char *name)
+{
+ char *s = NULL;
+ FILE *fp;
+
+ if ((fp=XFOPEN(name, "r")) != NULL) {
+ fclose(fp);
+ s = name;
+ }
+
+ if (s == NULL) s = kpse_find_file(name, kpse_opentype_format, true);
+ if (s == NULL) s = kpse_find_file(name, kpse_truetype_format, true);
+ if (s == NULL) s = kpse_find_file(name, kpse_miscfonts_format, true);
+ if (s == NULL) s = kpse_find_file(name, kpse_program_text_format, true);
+#if HAVE_FONTCONFIG
+ if (s == NULL) s = fc_convert(name);
+#endif /* HAVE_FONTCONFIG */
+ if (s == NULL) s = name;
+ return s;
+}
+
+#endif /* PTEX */
--- /dev/null
+++ b/texk/xdvik/fontconfig.h
@@ -0,0 +1,11 @@
+
+#ifndef FONTCONFIG_H_
+#define FONTCONFIG_H_
+
+#ifdef PTEX
+
+char *get_ptex_font_pathname(char *name);
+
+#endif /* PTEX */
+
+#endif /* FONTCONFIG_H_ */
|