Fairly ropey font-embedding support. In particular, the PDF output is

[sgt/halibut] / in_pf.c

diff --git a/in_pf.c b/in_pf.c
new file mode 100644 (file)
index 0000000..50e663e
--- /dev/null
+++ b/in_pf.c
@@ -0,0 +1,34 @@
+#include <stdio.h>
+#include "halibut.h"
+#include "paper.h"
+
+void read_pfa_file(input *in) {
+    char buf[512], *p;
+    size_t len;
+    char *fontname;
+    font_info *fi;
+
+    len = fread(buf, 1, sizeof(buf) - 1, in->currfp);
+    buf[len] = 0;
+    if (strncmp(buf, "%!FontType1-", 12) &&
+       strncmp(buf, "%!PS-AdobeFont-", 15))
+       return;
+    p = buf;
+    p += strcspn(p, ":") + 1;
+    p += strspn(p, " \t");
+    len = strcspn(p, " \t");
+    fontname = snewn(len + 1, char);
+    memcpy(fontname, p, len);
+    fontname[len] = 0;
+    for (fi = all_fonts; fi; fi = fi->next) {
+       if (strcmp(fi->name, fontname) == 0) {
+           fi->fp = in->currfp;
+           sfree(fontname);
+           return;
+       }
+    }
+    fclose(in->currfp);
+    sfree(fontname);
+}
+       
+