#include <stdio.h>
#include <stdlib.h>
#include <memory.h>
-#include "bitio.h"
+#include <assert.h>
#include "log.h"
#include "os.h"
+#include "q.h"
#include "mem.h"
#include "ttf.h"
r->pos += len;
}
}
+static void reader_reset(memreader_t*r)
+{
+ r->pos;
+}
#define INIT_READ(r,data,length,pos) memreader_t r = {(data),(pos),(length)};
static void expand(ttf_table_t*w, int newsize)
w->memsize = v1>v2?v1:v2;
w->data = rfx_realloc(w->data, w->memsize);
}
-static void writeU8(ttf_table_t*w, unsigned char b)
+static inline void writeU8(ttf_table_t*w, unsigned char b)
{
if(w->memsize<w->len+1)
expand(w, w->len+1);
w->data[w->len++] = b;
}
-static void writeU16(ttf_table_t*w, unsigned short v)
+static inline void writeU16(ttf_table_t*w, unsigned short v)
{
if(w->memsize<w->len+2)
expand(w, w->len+2);
w->data[w->len++] = v>>8;
w->data[w->len++] = v;
}
+static inline void writeU16_LE(ttf_table_t*w, unsigned short v)
+{
+ if(w->memsize<w->len+2)
+ expand(w, w->len+2);
+ w->data[w->len++] = v;
+ w->data[w->len++] = v>>8;
+}
#define writeS16 writeU16
-static void writeU32(ttf_table_t*w, unsigned long v)
+static inline void writeU32(ttf_table_t*w, unsigned long v)
{
if(w->memsize<w->len+4)
expand(w, w->len+4);
w->data[w->len++] = v>>8;
w->data[w->len++] = v;
}
-static void writeBlock(ttf_table_t*w, void*data, int len)
+static inline void writeU32_LE(ttf_table_t*w, unsigned long v)
+{
+ if(w->memsize<w->len+4)
+ expand(w, w->len+4);
+ w->data[w->len++] = v;
+ w->data[w->len++] = v>>8;
+ w->data[w->len++] = v>>16;
+ w->data[w->len++] = v>>24;
+}
+static inline void writeBlock(ttf_table_t*w, void*data, int len)
{
if(w->memsize<w->len+len)
expand(w, w->len+len);
hexdump(t->data, t->len, prefix);
}
+static table_head_t*head_new(ttf_t*ttf)
+{
+ table_head_t*head = rfx_calloc(sizeof(table_head_t));
+ head->units_per_em = 1024;
+ int t;
+ if(ttf->num_glyphs) {
+ head->xmin = ttf->glyphs[0].xmin;
+ head->ymin = ttf->glyphs[0].ymin;
+ head->xmax = ttf->glyphs[0].xmax;
+ head->ymax = ttf->glyphs[0].ymax;
+ for(t=1;t<ttf->num_glyphs;t++) {
+ if(ttf->glyphs[t].xmin < head->xmin) head->xmin = ttf->glyphs[t].xmin;
+ if(ttf->glyphs[t].ymin < head->ymin) head->ymin = ttf->glyphs[t].ymin;
+ if(ttf->glyphs[t].xmax > head->xmax) head->xmax = ttf->glyphs[t].xmax;
+ if(ttf->glyphs[t].ymax > head->ymax) head->ymax = ttf->glyphs[t].ymax;
+ }
+ }
+ head->macStyle = 0;
+ head->lowest_readable_size = 8; // not sure what font renderers actually do with this
+ head->dir_hint = 0;
+ return head;
+}
+static int head_parse(ttf_t*ttf, memreader_t*r)
+{
+ ttf->head = rfx_calloc(sizeof(table_head_t));
+ U32 version = readU32(r);
+ if(version!=VERSION_1_0)
+ msg("<warning> Font HEAD has unknown version %08x", version);
+ U32 revision = readU32(r);
+ U32 checksum2 = readU32(r);
+ U32 magic = readU32(r);
+ if(magic!=0x5f0f3cf5)
+ msg("<warning> Font HEAD has unknown magic number %08x", magic);
+ ttf->head->flags = readU16(r);
+ ttf->head->units_per_em = readU16(r);
+ readU32(r);readU32(r); //created
+ readU32(r);readU32(r); //modified
+ ttf->head->xmin = readU16(r);
+ ttf->head->ymin = readU16(r);
+ ttf->head->xmax = readU16(r);
+ ttf->head->ymax = readU16(r);
+ ttf->head->macStyle = readU16(r);
+ ttf->head->lowest_readable_size = readU16(r); //in pixels
+ ttf->head->dir_hint = readS16(r);
+ int loc_index = readS16(r); //used in 'loca' table
+ if(loc_index>1)
+ msg("<warning> loca index format %d unknown", loc_index);
+ U16 glyph_data_format = readS16(r);
+ if(glyph_data_format!=0)
+ msg("<warning> Font glyph data format unknown: %04x", glyph_data_format);
+ if(r->pos < r->size) {
+ msg("<warning> Leftover bytes (%d) in HEAD tag", r->size - r->pos);
+ }
+ return loc_index;
+}
+static void head_write(ttf_t*ttf, ttf_table_t*w, int loca_size)
+{
+ writeU32(w, 0x10000);
+ writeU32(w, 0x10000);
+ writeU32(w, 0); //checksum
+ writeU32(w, 0x5f0f3cf5); //magic
+ writeU16(w, ttf->head->flags);
+ writeU16(w, ttf->head->units_per_em);
+ writeU32(w, 0);writeU32(w, 0); //created
+ writeU32(w, 0);writeU32(w, 0); //modified
+ writeU16(w, ttf->head->xmin);
+ writeU16(w, ttf->head->ymin);
+ writeU16(w, ttf->head->xmax);
+ writeU16(w, ttf->head->ymax);
+ writeU16(w, ttf->head->macStyle);
+ writeU16(w, ttf->head->lowest_readable_size);
+ writeS16(w, ttf->head->dir_hint);
+ writeS16(w, loca_size); //loca index size (32 bit)
+ writeS16(w, 0); //glyph data format
+}
+static void head_dump(ttf_t*ttf)
+{
+ printf("head->flags: %d\n", ttf->head->flags);
+ printf("head->units_per_em: %d\n", ttf->head->units_per_em);
+ printf("head->xmin: %d\n", ttf->head->xmin);
+ printf("head->ymin: %d\n", ttf->head->ymin);
+ printf("head->xmax: %d\n", ttf->head->xmax);
+ printf("head->ymax: %d\n", ttf->head->ymax);
+ printf("head->macStyle: %d\n", ttf->head->macStyle);
+ printf("head->lowest_readable_size: %d\n", ttf->head->lowest_readable_size);
+ printf("head->dir_hint: %d\n", ttf->head->dir_hint);
+}
+static void head_delete(ttf_t*ttf)
+{
+ if(ttf->head) {
+ free(ttf->head);
+ ttf->head=0;
+ }
+}
+
+static table_os2_t*os2_new(ttf_t*ttf)
+{
+ table_os2_t*os2 = rfx_calloc(sizeof(table_os2_t));
+ if(ttf->num_glyphs) {
+ int average_width=0;
+ int t;
+ for(t=0;t<ttf->num_glyphs;t++) {
+ average_width += (ttf->glyphs[t].advance + ttf->glyphs[t].bearing);
+ }
+ os2->xAvgCharWidth = average_width / ttf->num_glyphs;
+ }
+
+ /* that's what everybody seems to fill in */
+ os2->usWeightClass = 400;
+ os2->usWidthClass = 5;
+
+ if(ttf->head) {
+ int advance = (ttf->head->xmax - ttf->head->xmin)/2;
+ int height = (ttf->head->xmax - ttf->head->xmin);
+ int ymid = height/2;
+ /* I do believe a sane font rendering engine will actually use
+ the font advance here- the subscript/superscript position will
+ not be the same for each glyph */
+ os2->ySuperscriptXSize = os2->ySubscriptXSize = (ttf->head->xmax - ttf->head->xmin)/2;
+ os2->ySuperscriptYSize = os2->ySubscriptYSize = (ttf->head->ymax - ttf->head->ymin)/2;
+ os2->ySubscriptXOffset = advance;
+ os2->ySubscriptYOffset = 0;
+ os2->ySuperscriptXOffset = advance;
+ os2->ySuperscriptYOffset = (ttf->head->ymax - ttf->head->ymin)/2;
+ os2->yStrikeoutSize = ttf->head->units_per_em / 10;
+ os2->yStrikeoutPosition = ymid;
+ os2->usWinAscent = ttf->head->ymax;
+ os2->usWinDescent = ttf->head->ymin<0?0:ttf->head->ymin;
+ os2->sxHeight = ymid;
+ os2->sCapHeight = height*2/3;
+ }
+ os2->panose_Weight = 4;
+
+ /* strictly speaking we'd have to set 92/64 bits in these tables, depending on
+ what parts of the unicode table is filled. (e.g. bit 90 = tibetan). */
+ os2->ulCharRange[0] = 1;
+ os2->ulCharRange[1] = 0;
+ os2->ulCharRange[2] = 0;
+ os2->ulCharRange[3] = 0;
+ os2->ulCodePageRange1 = 1;
+ os2->ulCodePageRange2 = 0;
+
+ if(ttf->unicode_size) {
+ int min,max;
+ for(min=0;min<ttf->unicode_size;min++)
+ if(ttf->unicode[min]) break;
+ for(max=ttf->unicode_size-1;max>=0;max--)
+ if(ttf->unicode[max]) break;
+ if(min<=max) {
+ os2->fsFirstCharIndex = min;
+ os2->fsLastCharIndex = max;
+ }
+ }
+ os2->sTypoAscender = ttf->ascent;
+ os2->sTypoDescender = ttf->descent;
+ os2->sTypoLineGap = ttf->lineGap;
+
+ os2->usDefaultChar = 0;
+ os2->usBreakChar = (ttf->unicode_size>0x20 && ttf->unicode[0x20])?0x20:0;
+ os2->usMaxContext = 0; // we don't use ligatures yet
+ return os2;
+}
static table_os2_t*os2_parse(memreader_t*r)
{
table_os2_t*os2 = rfx_calloc(sizeof(table_os2_t));
U16 version = readU16(r);
- if(version!=0 && version!=1 && version!=2)
+ /* 0 = TrueType 1.5
+ 1 = TrueType 1.66
+ 2 = OpenType 1.2
+ 3 = OpenType 1.4 */
+ if(version!=0 && version!=1 && version!=2 && version!=3)
msg("<warning> Unknown OS2 version: %04x", version);
os2->xAvgCharWidth = readS16(r);
os2->usWeightClass = readU16(r);
os2->usWidthClass = readU16(r);
- os2->fsType = readU16(r);
+ readU16(r); //fstype
os2->ySubscriptXSize = readU16(r);
os2->ySubscriptYSize = readU16(r);
os2->ySubscriptXOffset = readU16(r);
os2->ulCharRange[1] = readU32(r);
os2->ulCharRange[2] = readU32(r);
os2->ulCharRange[3] = readU32(r);
- os2->achVendID[0] = readU8(r);
- os2->achVendID[1] = readU8(r);
- os2->achVendID[2] = readU8(r);
- os2->achVendID[3] = readU8(r);
+ readU32(r); //vendor
os2->fsSelection = readU16(r);
os2->fsFirstCharIndex = readU16(r);
os2->fsLastCharIndex = readU16(r);
os2->usDefaultChar = readU16(r);
os2->usBreakChar = readU16(r);
os2->usMaxContext = readU16(r);
+
+ if(r->pos < r->size) {
+ msg("<warning> Leftover bytes (%d) in OS2 tag", r->size - r->pos);
+ }
return os2;
}
-
-static os2_write(ttf_t*ttf, ttf_table_t*w)
+static void os2_write(ttf_t*ttf, ttf_table_t*w)
{
table_os2_t*os2 = ttf->os2;
U16 version=1;
writeS16(w, os2->xAvgCharWidth);
writeU16(w, os2->usWeightClass);
writeU16(w, os2->usWidthClass);
- writeU16(w, os2->fsType);
+ writeU16(w, 0); //fstype
writeU16(w, os2->ySubscriptXSize);
writeU16(w, os2->ySubscriptYSize);
writeU16(w, os2->ySubscriptXOffset);
writeU32(w, os2->ulCharRange[1]);
writeU32(w, os2->ulCharRange[2]);
writeU32(w, os2->ulCharRange[3]);
- writeU8(w, os2->achVendID[0]);
- writeU8(w, os2->achVendID[1]);
- writeU8(w, os2->achVendID[2]);
- writeU8(w, os2->achVendID[3]);
+ writeU32(w, 0x53434244); //vendor
writeU16(w, os2->fsSelection);
writeU16(w, os2->fsFirstCharIndex);
writeU16(w, os2->fsLastCharIndex);
writeU16(w, os2->usBreakChar);
writeU16(w, os2->usMaxContext);
}
-static void os2_delete(ttf_t*ttf)
-{
- if(ttf->os2)
- free(ttf->os2);
- ttf->os2=0;
-}
-
-static os2_dump(ttf_t*ttf)
+static void os2_dump(ttf_t*ttf)
{
table_os2_t*os2 = ttf->os2;
if(!os2) return;
printf("os2->xAvgCharWidth: %d\n", os2->xAvgCharWidth);
printf("os2->usWeightClass: %d\n", os2->usWeightClass);
printf("os2->usWidthClass: %d\n", os2->usWidthClass);
- printf("os2->fsType: %d\n", os2->fsType);
printf("os2->ySubscriptXSize: %d\n", os2->ySubscriptXSize);
printf("os2->ySubscriptYSize: %d\n", os2->ySubscriptYSize);
printf("os2->ySubscriptXOffset: %d\n", os2->ySubscriptXOffset);
printf("os2->ulCharRange[1]: %d\n", os2->ulCharRange[1]);
printf("os2->ulCharRange[2]: %d\n", os2->ulCharRange[2]);
printf("os2->ulCharRange[3]: %d\n", os2->ulCharRange[3]);
- printf("os2->achVendID[0]: %d\n", os2->achVendID[0]);
- printf("os2->achVendID[1]: %d\n", os2->achVendID[1]);
- printf("os2->achVendID[2]: %d\n", os2->achVendID[2]);
- printf("os2->achVendID[3]: %d\n", os2->achVendID[3]);
printf("os2->fsSelection: %d\n", os2->fsSelection);
printf("os2->fsFirstCharIndex: %d\n", os2->fsFirstCharIndex);
printf("os2->fsLastCharIndex: %d\n", os2->fsLastCharIndex);
printf("os2->usBreakChar: %d\n", os2->usBreakChar);
printf("os2->usMaxContext: %d\n", os2->usMaxContext);
}
-
-static int head_parse(ttf_t*ttf, memreader_t*r)
+static void os2_delete(ttf_t*ttf)
{
- ttf->head = rfx_calloc(sizeof(table_head_t));
- U32 version = readU32(r);
- if(version!=VERSION_1_0)
- msg("<warning> Font HEAD has unknown version %08x", version);
- U32 revision = readU32(r);
- if(revision!=VERSION_1_0)
- msg("<warning> Font HEAD has unknown revision %08x", revision);
- U32 checksum2 = readU32(r);
- U32 magic = readU32(r);
- if(magic!=0x5f0f3cf5)
- msg("<warning> Font HEAD has unknown magic number %08x", magic);
- ttf->head->flags = readU16(r);
- ttf->head->units_per_em = readU16(r);
- readU32(r);readU32(r); //created
- readU32(r);readU32(r); //modified
- ttf->head->xmin = readU16(r);
- ttf->head->ymin = readU16(r);
- ttf->head->xmax = readU16(r);
- ttf->head->ymax = readU16(r);
- ttf->head->macStyle = readU16(r);
- ttf->head->lowest_readable_size = readU16(r); //in pixels
- ttf->head->dir_hint = readS16(r);
- int loc_index = readS16(r); //used in 'loca' table
- if(loc_index>1)
- msg("<warning> loca index format %d unknown", loc_index);
- U16 glyph_data_format = readS16(r);
- if(glyph_data_format!=0)
- msg("<warning> Font glyph data format unknown: %04x", glyph_data_format);
- return loc_index;
+ if(ttf->os2)
+ free(ttf->os2);
+ ttf->os2=0;
}
-static void head_write(ttf_t*ttf, ttf_table_t*w, int loca_size)
-{
- writeU32(w, 0x10000);
- writeU32(w, 0x10000);
- writeU32(w, 0); //checksum
- writeU32(w, 0x5f0f3cf5); //magic
- writeU16(w, ttf->head->flags);
- writeU16(w, ttf->head->units_per_em);
- writeU32(w, 0);writeU32(w, 0); //created
- writeU32(w, 0);writeU32(w, 0); //modified
- writeU16(w, ttf->head->xmin);
- writeU16(w, ttf->head->ymin);
- writeU16(w, ttf->head->xmax);
- writeU16(w, ttf->head->ymax);
- writeU16(w, ttf->head->macStyle);
- writeU16(w, ttf->head->lowest_readable_size);
- writeS16(w, ttf->head->dir_hint);
- writeS16(w, loca_size); //loca index size (32 bit)
- writeS16(w, 0); //glyph data format
-}
-static void head_dump(ttf_t*ttf)
-{
- printf("head->flags: %d\n", ttf->head->flags);
- printf("head->units_per_em: %d\n", ttf->head->units_per_em);
- printf("head->xmin: %d\n", ttf->head->xmin);
- printf("head->ymin: %d\n", ttf->head->ymin);
- printf("head->xmax: %d\n", ttf->head->xmax);
- printf("head->ymax: %d\n", ttf->head->ymax);
- printf("head->macStyle: %d\n", ttf->head->macStyle);
- printf("head->lowest_readable_size: %d\n", ttf->head->lowest_readable_size);
- printf("head->dir_hint: %d\n", ttf->head->dir_hint);
-}
-static void head_delete(ttf_t*ttf)
+static table_maxp_t*maxp_new(ttf_t*ttf)
{
- if(ttf->head) {
- free(ttf->head);
- ttf->head=0;
+ table_maxp_t*maxp = rfx_calloc(sizeof(table_maxp_t));
+ int t;
+ maxp->maxContours=1;
+ if(ttf->num_glyphs) {
+ int max = 1;
+ for(t=0;t<ttf->num_glyphs;t++) {
+ if(ttf->glyphs[t].num_points>max)
+ max = ttf->glyphs[t].num_points;
+ int contours = 0;
+ int s;
+ for(s=0;s<ttf->glyphs[t].num_points;s++) {
+ if(ttf->glyphs[t].points[s].flags&GLYPH_CONTOUR_END)
+ contours++;
+ }
+ if(maxp->maxContours < contours)
+ maxp->maxContours = contours;
+ }
+ maxp->maxPoints = max;
+
+ /* we don't generate composite glyphs yet */
+ maxp->maxComponentPoints = 0;
+ maxp->maxComponentContours = 0;
}
+ return maxp;
}
-
static table_maxp_t* maxp_parse(ttf_t*ttf, memreader_t*r)
{
U32 version = readU32(r);
/* according to freetype, older fonts (version<0x10000)
apparently only contain the number of glyphs. this is
rather rare, though. */
- if(version<0x10000) return 0;
+ if(version<0x10000 && r->size==6) return 0;
+
+ if(r->size<32)
+ msg("<warning> Truncated maxp table (version %d)", version);
table_maxp_t*maxp = rfx_calloc(sizeof(table_maxp_t));
maxp->maxPoints = readU16(r);
maxp->maxComponentDepth = readU16(r);
return maxp;
}
-
static void maxp_write(ttf_t*ttf, ttf_table_t*w)
{
table_maxp_t*maxp = ttf->maxp;
+ if(!maxp) {
+ /* version 0.5 simplified maxp table */
+ writeU32(w, 0x00005000);
+ writeU16(w, ttf->num_glyphs);
+ return;
+ }
writeU32(w, 0x10000); //version
writeU16(w, ttf->num_glyphs);
writeU16(w, maxp->maxPoints);
writeU16(w, maxp->maxComponentElements);
writeU16(w, maxp->maxComponentDepth);
}
-
static void maxp_dump(ttf_t*ttf)
{
table_maxp_t*maxp = ttf->maxp;
printf("maxp->maxComponentElements: %d\n", maxp->maxComponentElements);
printf("maxp->maxComponentDepth: %d\n", maxp->maxComponentDepth);
}
-
static void maxp_delete(ttf_t*ttf)
{
if(ttf->maxp)
ttf->maxp=0;
}
-
+static table_hea_t*hea_new(ttf_t*ttf)
+{
+ table_hea_t*hea = rfx_calloc(sizeof(table_hea_t));
+ if(ttf->num_glyphs) {
+ int t;
+ for(t=0;t<ttf->num_glyphs;t++) {
+ if(ttf->glyphs[t].advance > hea->advanceWidthMax)
+ hea->advanceWidthMax = ttf->glyphs[t].advance;
+ if(ttf->glyphs[t].xmin < hea->minLeftSideBearing)
+ hea->minLeftSideBearing = ttf->glyphs[t].xmin;
+ if(ttf->glyphs[t].xmax < hea->minRightSideBearing)
+ hea->minRightSideBearing = ttf->glyphs[t].xmax;
+ int width = ttf->glyphs[t].xmax - ttf->glyphs[t].xmin;
+ if(width > hea->xMaxExtent)
+ hea->xMaxExtent = width;
+ }
+ /* TODO: caret */
+ }
+ return hea;
+}
static int hea_parse(memreader_t*r, ttf_t*ttf)
{
table_hea_t*hea = ttf->hea = rfx_calloc(sizeof(table_hea_t));
U32 version = readU32(r);
- hea->ascent = readS16(r);
- hea->descent = readS16(r);
- hea->lineGap = readS16(r);
+ ttf->ascent = readS16(r);
+ ttf->descent = readS16(r);
+ ttf->lineGap = readS16(r);
hea->advanceWidthMax = readU16(r);
hea->minLeftSideBearing = readS16(r);
hea->minRightSideBearing = readS16(r);
}
return num_advances;
}
-
static table_hea_t*hea_write(ttf_t*ttf, ttf_table_t*w, int num_advances)
{
table_hea_t*hea = ttf->hea;
writeU32(w, 0x00010000);
- writeS16(w, hea->ascent);
- writeS16(w, hea->descent);
- writeS16(w, hea->lineGap);
+ writeS16(w, ttf->ascent);
+ writeS16(w, ttf->descent);
+ writeS16(w, ttf->lineGap);
writeU16(w, hea->advanceWidthMax);
writeS16(w, hea->minLeftSideBearing);
writeS16(w, hea->minRightSideBearing);
static void hea_dump(ttf_t*ttf)
{
table_hea_t*hea = ttf->hea;
+ if(!hea) return;
const char*dir = ttf->is_vertical?"v":"h";
- printf("%shea->ascent: %d\n", dir, hea->ascent);
- printf("%shea->descent: %d\n", dir, hea->descent);
- printf("%shea->lineGap: %d\n", dir, hea->lineGap);
+ printf("%shea->ascent: %d\n", dir, ttf->ascent);
+ printf("%shea->descent: %d\n", dir, ttf->descent);
+ printf("%shea->lineGap: %d\n", dir, ttf->lineGap);
printf("%shea->advanceWidthMax: %d\n", dir, hea->advanceWidthMax);
printf("%shea->minLeftSideBearing: %d\n", dir, hea->minLeftSideBearing);
printf("%shea->minRightSideBearing: %d\n", dir, hea->minRightSideBearing);
}
}
-static void hmtx_parse(memreader_t*r, ttf_t*ttf, int num_advances)
+static void mtx_parse(memreader_t*r, ttf_t*ttf, int num_advances)
{
U16 old_advance = 0;
int t;
}
return num_advances;
}
+
static U32*loca_parse(memreader_t*r, ttf_t*ttf, int size)
{
int t;
int num = ttf->num_glyphs+1;
U32*locations = rfx_calloc(num*sizeof(U32));
+ U32 lastloc = 0;
+ U32 loc = 0;
+ char warn_unsorted = 1;
if(size) {
if(num*4 > r->size) {
- msg("<warning> Short 'loca' table (32 bit)");
+ msg("<warning> Short 'loca' table (32 bit): %d/%d", r->size/4, num);
num=r->size/4;
}
if(num*4 < r->size) {
msg("<warning> Extraneous data (%d bytes) in 'loca' table (32 bit)", r->size-num*4);
}
for(t=0;t<num;t++) {
- locations[t] = readU32(r);
+ locations[t] = loc = readU32(r);
+ if(lastloc > loc && warn_unsorted) {
+ msg("<warning> Unsorted 'loca' table (32 bit)");
+ warn_unsorted=0;
+ }
+ lastloc = loc;
}
} else {
if(num*2 > r->size) {
msg("<warning> Extraneous data (%d bytes) in 'loca' table (16 bit)", r->size-num*2);
}
for(t=0;t<num;t++) {
- locations[t] = readU16(r)*2;
+ locations[t] = loc = readU16(r)*2;
+ if(lastloc > loc && warn_unsorted) {
+ msg("<warning> Unsorted 'loca' table");
+ warn_unsorted=0;
+ }
+ lastloc = loc;
}
}
return locations;
return 0;
}
}
+
static int parse_simple_glyph(ttf_t*ttf, memreader_t*r, int num_contours, int glyphnr)
{
ttfglyph_t*glyph = &ttf->glyphs[glyphnr];
static void glyf_parse(memreader_t*rr, ttf_t*ttf, U32*loca)
{
int t;
- char warn_about_compound_glyphs=1;
+ char warn_about_compound_glyphs=0;
for(t=0;t<ttf->num_glyphs;t++) {
INIT_READ(r, rr->mem, rr->size, loca[t]);
+ if(loca[t]==loca[t+1] || loca[t]==r.size)
+ continue; //empty glyph
if(r.pos+10>r.size) {
- msg("<warning> Unexpected end of glyph array (or bad loca entry %d/%d)", loca[t], r.size);
+ msg("<warning> Truncated glyph entry %d/%d (or bad loca entry %d/%d, next loca: %d)",
+ t, ttf->num_glyphs, loca[t], r.size, loca[t+1]);
break;
}
S16 num_contours = readS16(&r);
}
}
-
void write_simple_glyph(ttf_table_t*w, ttfglyph_t*g)
{
/* endpoints array */
else if(dy) writeS16(w, dy);
}
}
-
U32* glyf_write(ttf_t* ttf, ttf_table_t*w)
{
U32*locations = malloc(sizeof(U32)*(ttf->num_glyphs+1));
}
void glyf_dump(ttf_t* ttf)
{
+ if(!ttf->glyphs) return;
int t;
for(t=0;t<ttf->num_glyphs;t++) {
ttfglyph_t*g = &ttf->glyphs[t];
hexdump(g->code, g->code_size, " ");
}
}
-
void glyf_delete(ttf_t* ttf)
{
if(!ttf->glyphs)
free(ttf->glyphs);ttf->glyphs=0;
}
+static void grow_unicode(ttf_t*ttf, int index)
+{
+ int size = index+1;
+ if(!ttf->unicode) {
+ ttf->unicode = rfx_calloc(sizeof(ttf->unicode[0])*size);
+ } else if(ttf->unicode_size<size) {
+ ttf->unicode = rfx_realloc(ttf->unicode, sizeof(ttf->unicode[0])*size);
+ memset(ttf->unicode+ttf->unicode_size, 0, sizeof(ttf->unicode[0])*(size - ttf->unicode_size));
+ }
+ ttf->unicode_size = size;
+}
+void cmap_parse(memreader_t*r, ttf_t*ttf)
+{
+ readU16(r); // version (0)
+ int num_subtables = readU16(r);
+ int t;
+ char warn=1;
+ if(r->pos+num_subtables*8 > r->size) {
+ msg("<warning> CMap overflow");
+ num_subtables = (r->size-r->pos)/8;
+ }
+ unicode_t*data = 0;
+ for(t=0;t<num_subtables;t++) {
+ U16 platform = readU16(r);
+ U16 encoding = readU16(r);
+ U32 offset = readU32(r);
+ if(offset>r->size) {
+ msg("<warning> CMAP table %d %d is out of bounds (%d)", platform, encoding, offset);
+ continue;
+ }
+
+ int is_unicode = platform==0 ||
+ platform==3 && encoding == 1 ||
+ platform==3 && encoding == 10;
+
+ if(!is_unicode)
+ continue;
+
+ INIT_READ(t, r->mem, r->size, offset);
+ U16 format = readU16(&t);
+ int length = readU16(&t);
+ U16 language = readU16(&t);
+
+ if(language)
+ msg("<warning> Language code %02x in unicode mapping", language);
+
+ int num = 0;
+ if(format == 0) {
+ num = length-6;
+ if(t.pos+length > t.size) {
+ msg("<warning> overflow in format 0 cmap table");
+ num = t.size-t.pos;
+ }
+ data = malloc(num*sizeof(unicode_t));
+ int s;
+ grow_unicode(ttf, num);
+ for(s=0;s<num;s++) {
+ ttf->unicode[s] = readU8(&t);
+ }
+ } else if(format == 4) {
+ U16 segment_count = readU16(&t);
+ if(segment_count&1) {
+ msg("<error> Bad segmentx2 count %d", segment_count);
+ continue;
+ }
+ segment_count>>=1;
+ readU16(&t); //searchrange
+ readU16(&t); //entry selector
+ readU16(&t); //range shift
+ INIT_READ(r_end, t.mem, t.size, t.pos);
+ INIT_READ(r_start, t.mem, t.size, t.pos+2+segment_count*2);
+ INIT_READ(r_delta, t.mem, t.size, t.pos+2+segment_count*4);
+ INIT_READ(r_range, t.mem, t.size, t.pos+2+segment_count*6);
+ int glyphmap_start = t.pos+2+segment_count*8;
+ int glyphmap_size = t.size - glyphmap_start;
+ int s;
+ for(s=0;s<segment_count;s++) {
+ U16 start = readU16(&r_start);
+ U16 end = readU16(&r_end);
+ U16 delta = readU16(&r_delta);
+ U16 range = readU16(&r_range);
+ if(start==0xffff && end==0xffff && delta==1) {
+ /* this is a common (maybe even required) occurence in fonts
+ which explicitly map "unicode undefined" (0xffff) to
+ "glyph undefined" (0).
+ We don't want to blow our unicode table up to 65536 just
+ because of this, so ignore this entry.
+ */
+ continue;
+ }
+ grow_unicode(ttf, end);
+ int u;
+ if(!range) {
+ for(u=start;u<=end;u++) {
+ ttf->unicode[u] = (u + delta) & 0xffff;
+ }
+ } else {
+ int pos = r_range.pos-2+range;
+ if(warn && pos+end-start+1 > t.size) {
+ msg("<warning> glyphmap index out of bounds (%d-%d/%d)", pos, pos+end-start, t.size);
+ warn=0;
+ }
+ INIT_READ(g, t.mem, t.size, pos);
+ for(u=start;u<=end;u++) {
+ ttf->unicode[u] = readU16(&g);
+ }
+ }
+ }
+ }
+ }
+}
+static int segment_size(unicode_t*unicode, int pos, int size)
+{
+ int s;
+ int count=0;
+ for(s=pos;s<size;s++) {
+ if(!unicode[s])
+ count++;
+ if(count>4) {
+ /* a segment costs us 8 bytes, so for more than 4 consecutive
+ zero entries (16 bit each) in the glyph index array,
+ it pays off to start a new segment */
+ break;
+ }
+ }
+ s -= count; // go to the last filled in entry
+ if(s==size)
+ return size-1;
+ return s;
+}
+void cmap_write(ttf_t* ttf, ttf_table_t*w)
+{
+ writeU16(w, 0); //version
+ writeU16(w, 2); //two tables
+
+ writeU16(w, 0); //platform (unicode)
+ writeU16(w, 3); //encoding (unicode 2.0)
+ writeU32(w, 20); //offset
+
+ writeU16(w, 3); //platform (windows)
+ writeU16(w, 1); //encoding (unicode basic multilingual plane UCS-2)
+ writeU32(w, 20); //offset
+
+ writeU16(w, 4); // format=4
+ int length_pos = w->len;
+ writeU16(w, 0); // length: we don't know yet
+ writeU16(w, 0); // language (n/a for unicode)
+ int num_segments_pos = w->len;
+ writeU16(w, 0); //number of segments: we don't know yet either
+ writeU16(w, 0); //searchrange
+ writeU16(w, 0); //entry selector
+ writeU16(w, 0); //range shift
+
+ int pos=0;
+ int num_segments=0;
+ while(pos < ttf->unicode_size) {
+ if(!ttf->unicode[pos]) {
+ pos++;
+ continue;
+ }
+ int s = segment_size(ttf->unicode, pos, ttf->unicode_size);
+ pos = s+1;
+ num_segments++;
+ }
+
+ num_segments++; // account for 0xffff mapping
+
+ int glyphmap_start = w->len+2+num_segments*8;
+
+ int t;
+ int end_pos = w->len;
+ for(t=0;t<num_segments;t++) {writeU16(w, 0);} //end array
+ writeU16(w, 0); //reserved byte
+ int start_pos = w->len;
+ for(t=0;t<num_segments;t++) {writeU16(w, 0);} //start array
+ int delta_pos = w->len;
+ for(t=0;t<num_segments;t++) {writeU16(w, 0);} //delta array
+ int range_pos = w->len;
+ for(t=0;t<num_segments;t++) {writeU16(w, 0);} //range array
+
+ w->data[num_segments_pos]=(num_segments*2)>>8;
+ w->data[num_segments_pos+1]=(num_segments*2);
+
+ pos=0;
+ num_segments = 0;
+ while(pos < ttf->unicode_size) {
+ if(!ttf->unicode[pos]) {
+ pos++;
+ continue;
+ }
+ U16 end = segment_size(ttf->unicode, pos, ttf->unicode_size);
+ w->data[end_pos++]=end>>8;
+ w->data[end_pos++]=end;
+ w->data[start_pos++]=pos>>8;
+ w->data[start_pos++]=pos;
+ int s;
+ U16 delta = ttf->unicode[pos]-pos;
+ char do_delta=1;
+ for(s=pos+1;s<=end;s++) {
+ U16 delta2 = ttf->unicode[s]-s;
+ if(delta2!=delta) {
+ do_delta=0;
+ break;
+ }
+ }
+ U16 range;
+ if(do_delta) {
+ range = 0;
+ } else {
+ delta = 0;
+ range = w->len - range_pos;
+ for(s=pos;s<=end;s++) {
+ writeU16(w, ttf->unicode[s]);
+ }
+ }
+ w->data[delta_pos++]=delta>>8;
+ w->data[delta_pos++]=delta;
+ w->data[range_pos++]=range>>8;
+ w->data[range_pos++]=range;
+ num_segments++;
+ pos = end+1;
+ }
+
+ /* write out a mapping from 0xffff to 0- seems to be required
+ by some libraries (e.g. fonttools) */
+ w->data[end_pos++]=0xff;
+ w->data[end_pos++]=0xff;
+ w->data[start_pos++]=0xff;
+ w->data[start_pos++]=0xff;
+ w->data[delta_pos++]=0;
+ w->data[delta_pos++]=1;
+ w->data[range_pos++]=0;
+ w->data[range_pos++]=0;
+
+ w->data[length_pos]=(w->len-20)>>8;
+ w->data[length_pos+1]=w->len-20;
+}
+void cmap_delete(ttf_t*ttf)
+{
+ if(ttf->unicode) {
+ free(ttf->unicode);
+ ttf->unicode=0;
+ }
+ ttf->unicode_size=0;
+}
+static char*readString(memreader_t*r, int len)
+{
+ char*s = malloc(len+1);
+ readBlock(r, s, len);
+ s[len] = 0;
+ return s;
+}
+void name_parse(memreader_t*r, ttf_t*ttf)
+{
+ U16 format = readU16(r);
+ U16 count = readU16(r);
+ U16 offset = readU16(r);
+
+ int t;
+ for(t=0;t<count;t++) {
+ U16 platform = readU16(r);
+ U16 encoding = readU16(r);
+ U16 language = readU16(r);
+ U16 name_id = readU16(r);
+ U16 len = readU16(r);
+ U16 offset_2 = readU16(r);
+
+ INIT_READ(ss, r->mem, r->size, offset+offset_2);
+ if(!(platform==0 || (platform==1 && encoding==0)))
+ continue;
+
+ INIT_READ(s, r->mem, r->size, offset+offset_2);
+
+ if(name_id==1) {
+ if(ttf->family_name) free(ttf->family_name);
+ ttf->family_name = readString(&s, len);
+ }
+ if(name_id==2) {
+ if(ttf->subfamily_name) free(ttf->subfamily_name);
+ ttf->subfamily_name = readString(&s, len);
+ }
+ if(name_id==3) {
+ if(ttf->version_string) free(ttf->version_string);
+ ttf->version_string = readString(&s, len);
+ }
+ if(name_id==4) {
+ if(ttf->full_name) free(ttf->full_name);
+ ttf->full_name = readString(&s, len);
+ }
+ }
+}
+void name_write(ttf_t*ttf, ttf_table_t*table)
+{
+ char*strings[4] = {ttf->full_name, ttf->family_name, ttf->subfamily_name, ttf->version_string};
+ int codes[4] = {4,1,2,3};
+
+ writeU16(table, 0); //format
+ int count = 0;
+ int t;
+ int nr = sizeof(strings)/sizeof(strings[0]);
+
+ for(t=0;t<nr;t++) {
+ if(strings[t])
+ count++;
+ }
+ writeU16(table, count); //count
+
+ int offset_pos = table->len;
+ writeU16(table, 0); //offset (will be filled in later)
+
+ int offset = 0;
+ for(t=0;t<nr;t++) {
+ if(strings[t]) {
+ writeU16(table, 1); //platform id
+ writeU16(table, 0); //encoding id
+ writeU16(table, 0); //language
+ writeU16(table, codes[t]); //4: full name
+ int len = strlen(strings[t]);
+ writeU16(table, len);
+ writeU16(table, offset);
+ offset += len;
+ }
+ }
+ table->data[offset_pos] = table->len>>8;
+ table->data[offset_pos+1] = table->len;
+
+ for(t=0;t<nr;t++) {
+ if(strings[t]) {
+ int len = strlen(strings[t]);
+ writeBlock(table, strings[t], len);
+ }
+ }
+}
+void name_delete(ttf_t*ttf)
+{
+ if(ttf->full_name) {
+ free(ttf->full_name);
+ ttf->full_name=0;
+ }
+ if(ttf->family_name) {
+ free(ttf->family_name);
+ ttf->family_name=0;
+ }
+ if(ttf->subfamily_name) {
+ free(ttf->subfamily_name);
+ ttf->subfamily_name=0;
+ }
+ if(ttf->version_string) {
+ free(ttf->version_string);
+ ttf->version_string=0;
+ }
+}
+
+static table_post_t*post_new(ttf_t*ttf)
+{
+ table_post_t*post = rfx_calloc(sizeof(table_post_t));
+ return post;
+}
+void post_parse(memreader_t*r, ttf_t*ttf)
+{
+ table_post_t*post = ttf->post = rfx_calloc(sizeof(table_post_t));
+ U16 format = readU16(r);
+ post->italic_angle = readU16(r);
+ post->underline_position = readU16(r);
+ post->underline_thickness = readU16(r);
+ U16 is_monospaced = readU16(r);
+ readU16(r); // min mem 42
+ readU16(r);
+ readU16(r); // min mem 1
+ readU16(r);
+}
+void post_write(ttf_t*ttf, ttf_table_t*table)
+{
+ table_post_t*post = ttf->post;
+ writeU32(table, 0x00030000);
+ writeU32(table, post->italic_angle);
+ writeU16(table, post->underline_position);
+ writeU16(table, post->underline_thickness);
+ writeU32(table, 0); //is monospaced TODO
+ writeU32(table, 0); //min mem 42
+ writeU32(table, 0);
+ writeU32(table, 0); //min mem 1
+ writeU32(table, 0);
+}
+void post_delete(ttf_t*ttf)
+{
+ if(ttf->post) {
+ free(ttf->post);
+ ttf->post = 0;
+ }
+}
+
static int ttf_parse_tables(ttf_t*ttf)
{
ttf_table_t*table;
table = ttf_find_table(ttf, TAG_HMTX);
if(table) {
INIT_READ(m, table->data, table->len, 0);
- hmtx_parse(&m, ttf, num_advances);
+ mtx_parse(&m, ttf, num_advances);
ttf_table_delete(ttf, table);
}
} else {
table = ttf_find_table(ttf, TAG_VMTX);
if(table) {
INIT_READ(m, table->data, table->len, 0);
- hmtx_parse(&m, ttf, num_advances);
+ mtx_parse(&m, ttf, num_advances);
ttf_table_delete(ttf, table);
}
} else {
}
free(loca);
}
+
+ table = ttf_find_table(ttf, TAG_CMAP);
+ if(table) {
+ INIT_READ(m, table->data, table->len, 0);
+ cmap_parse(&m, ttf);
+ ttf_table_delete(ttf, table);
+ }
+
+ table = ttf_find_table(ttf, TAG_NAME);
+ if(table) {
+ INIT_READ(m, table->data, table->len, 0);
+ name_parse(&m, ttf);
+ ttf_table_delete(ttf, table);
+ }
+
+ table = ttf_find_table(ttf, TAG_POST);
+ if(table) {
+ INIT_READ(m, table->data, table->len, 0);
+ post_parse(&m, ttf);
+ ttf_table_delete(ttf, table);
+ }
+
return 1;
}
static void ttf_collapse_tables(ttf_t*ttf)
{
ttf_table_t*table;
- table = ttf_addtable(ttf, TAG_MAXP);
- maxp_write(ttf, table);
- maxp_delete(ttf);
-
- table = ttf_addtable(ttf, TAG_OS2);
- os2_write(ttf, table);
- os2_delete(ttf);
+ ttf_table_t*head = ttf_find_table(ttf, TAG_HEAD);
+ if(head)
+ return; //already collapsed
+
+ if(ttf->maxp) {
+ table = ttf_addtable(ttf, TAG_MAXP);
+ maxp_write(ttf, table);
+ maxp_delete(ttf);
+ }
- if(!ttf->is_vertical) {
- table = ttf_addtable(ttf, TAG_HMTX);
- int num_advances = mtx_write(ttf, table);
- table = ttf_addtable(ttf, TAG_HHEA);
- hea_write(ttf, table, num_advances);
- } else {
- table = ttf_addtable(ttf, TAG_VMTX);
- int num_advances = mtx_write(ttf, table);
- table = ttf_addtable(ttf, TAG_VHEA);
- hea_write(ttf, table, num_advances);
+ if(ttf->os2) {
+ table = ttf_addtable(ttf, TAG_OS2);
+ os2_write(ttf, table);
+ os2_delete(ttf);
}
+ if(ttf->hea) {
+ if(!ttf->is_vertical) {
+ table = ttf_addtable(ttf, TAG_HMTX);
+ int num_advances = mtx_write(ttf, table);
+ table = ttf_addtable(ttf, TAG_HHEA);
+ hea_write(ttf, table, num_advances);
+ hea_delete(ttf);
+ } else {
+ table = ttf_addtable(ttf, TAG_VMTX);
+ int num_advances = mtx_write(ttf, table);
+ table = ttf_addtable(ttf, TAG_VHEA);
+ hea_write(ttf, table, num_advances);
+ hea_delete(ttf);
+ }
+ }
+
int loca_size=0;
if(ttf->num_glyphs) {
- table = ttf_addtable(ttf, TAG_GLYF);
- U32*locations = glyf_write(ttf, table);
- glyf_delete(ttf);
-
- table = ttf_addtable(ttf, TAG_LOCA);
- loca_size = loca_write(ttf, table, locations);
- free(locations);
+ if(ttf->unicode) {
+ table = ttf_addtable(ttf, TAG_CMAP);
+ cmap_write(ttf, table);
+ cmap_delete(ttf);
+ }
+
+ if(ttf->glyphs) {
+ table = ttf_addtable(ttf, TAG_GLYF);
+ U32*locations = glyf_write(ttf, table);
+ table = ttf_addtable(ttf, TAG_LOCA);
+ loca_size = loca_write(ttf, table, locations);
+ free(locations);
+ glyf_delete(ttf);
+ }
+ }
+
+ if(ttf->full_name || ttf->family_name || ttf->subfamily_name) {
+ table = ttf_addtable(ttf, TAG_NAME);
+ name_write(ttf, table);
+ name_delete(ttf);
+ }
+ if(ttf->post) {
+ table = ttf_addtable(ttf, TAG_POST);
+ post_write(ttf, table);
+ post_delete(ttf);
}
table = ttf_addtable(ttf, TAG_HEAD);
head_write(ttf, table, loca_size);
head_delete(ttf);
-
}
-ttf_t* load_ttf(void*data, int length)
+ttf_t*ttf_new()
+{
+ ttf_t*ttf = rfx_calloc(sizeof(ttf_t));
+ ttf->version = VERSION_1_0;
+ return ttf;
+}
+ttf_t* ttf_load(void*data, int length)
{
INIT_READ(r,data,length, 0);
ttf_t*ttf = rfx_calloc(sizeof(ttf_t));
ttf->version = readU32(&r);
+ if(ttf->version == SWAP32(length)) {
+ U32 fontDataSize = readU32(&r);
+ U32 version = readU32(&r);
+ U32 flags = readU32(&r);
+ U8 panose[10];
+ readBlock(&r, panose, 10);
+ readU8(&r); //charset
+ readU8(&r); //italoc
+ readU32(&r); //weight
+ readU16(&r); //fstype
+ U16 magic = readU16(&r); //magicNumber
+ /* we're being paranoid: it's entirely possible for the font
+ size to be exactly 0x10000. Only treat this font as eot if
+ it has the right magic number */
+ if(magic == 0x4c50) {
+ readU32(&r); //unicoderange[0]
+ readU32(&r); //unicoderange[1]
+ readU32(&r); //unicoderange[2]
+ readU32(&r); //unicoderange[3]
+ readU32(&r); //codepagerange[0]
+ readU32(&r); //codepagerange[1]
+ readU32(&r); //checksumadjustment
+ readU32(&r); //reserved[0]
+ readU32(&r); //reserved[1]
+ readU32(&r); //reserved[2]
+ readU32(&r); //reserved[3]
+ readU16(&r); //padding
+
+ int nr=0;
+ for(nr=0;nr<4;nr++) {
+ int t, len;
+ /* All of ttf is big-endian. All of ttf? No. One small eot table
+ of indomitable little-endian... */
+ len = readU8(&r);
+ len |= readU8(&r)<<8;
+ len /= 2;
+ for(t=0;t<len;t++) {
+ U8 c = readU16(&r)>>8;
+ }
+ readU16(&r); // zero terminator
+ }
+ readU16(&r); // more padding
+
+ /* adjust the offset to the start of the actual truetype
+ data- the positions in the table header will be relative
+ to the ttf data after the header, not to the file */
+ r.mem += r.pos;
+ r.size -= r.pos;
+ r.pos = 0;
+ ttf->version = readU32(&r);
+ } else {
+ reader_reset(&r);
+ ttf->version = readU32(&r);
+ }
+ }
+
if(ttf->version == TTCFTAG) {
/* a ttc collection is a number of truetype fonts
packaged together */
readU16(&r); //range shift
if(num_tables*16 > length) {
- msg("<error> Truncated TTC file (table entries: %d)", num_tables);
+ msg("<error> Truncated TTF file (table entries: %d)", num_tables);
if(ttf->version != OPENTYPE &&
ttf->version != TRUETYPE_MACOS &&
ttf->version != VERSION_1_0) {
ttf_table_t*table = ttf_addtable(ttf, tag);
table->data = mem;
table->len = table->memsize = len;
-
+#if 0
U32 checksum2 = ttf_table_checksum(table);
if(checksum2!=checksum) {
msg("<warning> Checksum mismatch in tag %02x%02x%02x%02x %c%c%c%c (%d bytes) %08x!=%08x",
(tag>>24)&0xff, (tag>>16)&0xff, (tag>>8)&0xff, (tag)&0xff,
len, checksum2, checksum);
}
-
+#endif
}
}
free(table_data);
return ttf;
}
+void ttf_create_truetype_tables(ttf_t*ttf)
+{
+ if(!ttf->head)
+ ttf->head = head_new(ttf);
+ if(!ttf->maxp)
+ ttf->maxp = maxp_new(ttf);
+ if(!ttf->hea)
+ ttf->hea = hea_new(ttf);
+ if(!ttf->os2)
+ ttf->os2 = os2_new(ttf);
+ if(!ttf->post)
+ ttf->post = post_new(ttf);
+}
-ttf_table_t* ttf_write(ttf_t*ttf)
+ttf_table_t* ttf_write(ttf_t*ttf, U32*checksum_adjust)
{
ttf_collapse_tables(ttf);
writeBlock(file, zero, (-t->len)&3); //pad
}
U32 checksum = 0xb1b0afba - ttf_table_checksum(file);
+ if(checksum_adjust)
+ *checksum_adjust = checksum;
U8*checksum2 = file->data + head_pos + 8;
checksum2[0] = checksum>>24;
checksum2[1] = checksum>>16;
return file;
}
+ttf_table_t* ttf_eot_head(ttf_t*ttf)
+{
+ ttf_table_t*file = ttf_table_new(0);
+ writeU32(file, 0); //file size (filled in later)
+ writeU32(file, 0); //fontdatasize (filled in later)
+ writeU32(file, 0x01000200);
+ writeU32(file, 0); //flags
+ writeU8(file, ttf->os2->panose_FamilyType);
+ writeU8(file, ttf->os2->panose_SerifStyle);
+ writeU8(file, ttf->os2->panose_Weight);
+ writeU8(file, ttf->os2->panose_Proportion);
+ writeU8(file, ttf->os2->panose_Contrast);
+ writeU8(file, ttf->os2->panose_StrokeVariation);
+ writeU8(file, ttf->os2->panose_ArmStyle);
+ writeU8(file, ttf->os2->panose_Letterform);
+ writeU8(file, ttf->os2->panose_Midline);
+ writeU8(file, ttf->os2->panose_XHeight);
+ writeU8(file, 1); //charset (default)
+ writeU8(file, ttf->os2->fsSelection&1); //italic
+ writeU32_LE(file, ttf->os2->usWeightClass);
+ writeU16(file, 0); //fstype
+ writeU16(file, 0x4c50); //magic
+ writeU32_LE(file, ttf->os2->ulCharRange[0]);
+ writeU32_LE(file, ttf->os2->ulCharRange[1]);
+ writeU32_LE(file, ttf->os2->ulCharRange[2]);
+ writeU32_LE(file, ttf->os2->ulCharRange[3]);
+ writeU32_LE(file, ttf->os2->ulCodePageRange1);
+ writeU32_LE(file, ttf->os2->ulCodePageRange2);
+ writeU32(file, 0); //checksum adjust (filled in later)
+ writeU32(file, 0); //reserved[0]
+ writeU32(file, 0); //reserved[1]
+ writeU32(file, 0); //reserved[2]
+ writeU32(file, 0); //reserved[3]
+ writeU16(file, 0); //padding(1)
+
+ int t,len;
+
+ //family name
+ len = strlen(ttf->family_name);
+ writeU16_LE(file, len*2);
+ for(t=0;t<len;t++) {
+ writeU8(file, 0);
+ writeU8(file, ttf->family_name[t]);
+ }
+ writeU16(file, 0); //zero byte pad
+
+ //subfamily name
+ len = strlen(ttf->subfamily_name);
+ writeU16_LE(file, len*2);
+ for(t=0;t<len;t++) {
+ writeU8(file, 0);
+ writeU8(file, ttf->subfamily_name[t]);
+ }
+ writeU16(file, 0); //zero byte pad
+
+ //version string
+ len = strlen(ttf->version_string);
+ writeU16_LE(file, len*2); //len
+ for(t=0;t<len;t++) {
+ writeU8(file, 0);
+ writeU8(file, ttf->version_string[t]);
+ }
+ writeU16(file, 0); //zero byte pad
+
+ //full name
+ len = strlen(ttf->full_name);
+ writeU16_LE(file, len*2); //len
+ for(t=0;t<len;t++) {
+ writeU8(file, 0);
+ writeU8(file, ttf->full_name[t]);
+ }
+ writeU16(file, 0); //zero byte pad
+
+ writeU16(file, 0); //padding(2)
+ return file;
+}
+
+void ttf_save_eot(ttf_t*ttf, const char*filename)
+{
+ ttf_table_t* eot = ttf_eot_head(ttf);
+ U32 checksum_adjust = 0;
+ ttf_table_t* t = ttf_write(ttf, &checksum_adjust);
+
+ U8*len_data = eot->data;
+ U32 full_len = eot->len + t->len;
+ len_data[0] = full_len>>0;
+ len_data[1] = full_len>>8;
+ len_data[2] = full_len>>16;
+ len_data[3] = full_len>>24;
+
+ U8*len_data2 = eot->data+4;
+ len_data2[0] = t->len>>0;
+ len_data2[1] = t->len>>8;
+ len_data2[2] = t->len>>16;
+ len_data2[3] = t->len>>24;
+
+ U8*checksum_data = eot->data + 60;
+ checksum_data[0] = checksum_adjust>>0;
+ checksum_data[1] = checksum_adjust>>8;
+ checksum_data[2] = checksum_adjust>>16;
+ checksum_data[3] = checksum_adjust>>24;
+
+ FILE*fi = fopen(filename, "wb");
+ if(!fi) {
+ perror(filename);
+ return;
+ }
+
+ fwrite(eot->data, eot->len, 1, fi);
+ fwrite(t->data, t->len, 1, fi);
+ fclose(fi);
+ ttf_table_delete(0, t);
+ ttf_table_delete(0, eot);
+}
+
void ttf_save(ttf_t*ttf, const char*filename)
{
- ttf_table_t* t = ttf_write(ttf);
+ ttf_table_t* t = ttf_write(ttf, 0);
FILE*fi = fopen(filename, "wb");
if(!fi) {
perror(filename);
maxp_dump(ttf);
glyf_dump(ttf);
}
-void ttf_destroy(ttf_t*ttf)
+void ttf_destroy_tables(ttf_t*ttf)
{
ttf_table_t*table = ttf->tables;
while(table) {
free(table);
table = next;
}
+ ttf->tables = 0;
+}
+void ttf_reduce(ttf_t*ttf)
+{
+ ttf_destroy_tables(ttf);
+}
+void ttf_destroy(ttf_t*ttf)
+{
+ ttf_destroy_tables(ttf);
maxp_delete(ttf);
os2_delete(ttf);
head_delete(ttf);
hea_delete(ttf);
glyf_delete(ttf);
+ post_delete(ttf);
+ name_delete(ttf);
free(ttf);
}
filename = argv[1];
//msg("<notice> Loading %s", filename);
memfile_t*m = memfile_open(filename);
- ttf_t*ttf = load_ttf(m->data, m->len);
+ ttf_t*ttf = ttf_load(m->data, m->len);
+ if(!ttf) {
+ msg("<error> Couldn't load %s", filename);
+ return 1;
+ }
+ ttf_reduce(ttf);
+
+ ttf->full_name = strdup("Test-Normal");
+ ttf->family_name = strdup("Test");
+ ttf->subfamily_name = strdup("Normal");
+ ttf->version_string = strdup("Version 1.0");
+
if(!ttf) return 1;
memfile_close(m);
- ttf_dump(ttf);
+ //ttf_dump(ttf);
//printf("os2 version: %04x (%d), maxp size: %d\n",
// ttf->os2->version, ttf->os2->size, ttf->maxp->size);
- ttf_save(ttf, "comic2.ttf");
+ ttf_save_eot(ttf, "testfont.eot");
+ ttf_save(ttf, "testfont.ttf");
ttf_destroy(ttf);
return 0;
git.asbjorn.biz / swftools.git / blobdiff