X-Git-Url: http://git.asbjorn.biz/?p=swftools.git;a=blobdiff_plain;f=lib%2Ffilters%2Fremove_font_transforms.c;h=06b6300a707802c8573b2078479264050618dfae;hp=7e0b31c49fa8ffd88e55e4e78cec793757c107b9;hb=5244627ce001a4b2c49595fe38042628856be1d3;hpb=905772d04a1c2dd73802c6dde5bd50e9701b7af6

diff --git a/lib/filters/remove_font_transforms.c b/lib/filters/remove_font_transforms.c
index 7e0b31c..06b6300 100644
--- a/lib/filters/remove_font_transforms.c
+++ b/lib/filters/remove_font_transforms.c
@@ -19,38 +19,262 @@
    Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA */
 
 #include <stdlib.h>
+#include <math.h>
 #include <memory.h>
 #include "../gfxfilter.h"
 #include "../gfxtools.h"
+#include "../gfxfont.h"
 #include "../types.h"
 #include "../mem.h"
+#include "../q.h"
+
+typedef struct _mymatrix {
+    float m00,m01,m10,m11;
+    char*id;
+} mymatrix_t;
+
+static void* mymatrix_clone(const void*_m) {
+    if(_m==0) 
+        return 0;
+    const mymatrix_t*m1=_m;
+    mymatrix_t*m2 = malloc(sizeof(mymatrix_t));
+    *m2 = *m1;
+    m2->id = strdup(m1->id);
+    return m2;
+}
+static unsigned int mymatrix_hash(const void*_m) {
+    if(!_m)
+        return 0;
+    const mymatrix_t*m = (mymatrix_t*)_m;
+    unsigned int h=0;
+    h = crc32_add_bytes(h, (char*)&m->m00, sizeof(m->m00));
+    h = crc32_add_bytes(h, (char*)&m->m01, sizeof(m->m01));
+    h = crc32_add_bytes(h, (char*)&m->m10, sizeof(m->m10));
+    h = crc32_add_bytes(h, (char*)&m->m11, sizeof(m->m11));
+    h = crc32_add_string(h, m->id);
+    return h;
+}
+static void mymatrix_destroy(void*_m) {
+    mymatrix_t*m = (mymatrix_t*)_m;
+    free(m->id);m->id=0;
+    free(m);
+}
+static char mymatrix_equals(const void*_m1, const void*_m2) {
+    const mymatrix_t*m1=_m1;
+    const mymatrix_t*m2=_m2;
+    if(!m1 || !m2) 
+        return m1==m2;
+    
+    /* we do a binary comparison of the float32
+       bits here instead of a numerical comparison
+       to prevent the compiler from e.g. removing the
+       (float) cast during optimization, which would break
+       the equivalence between equals() and hash() (as
+       the hash is derived from the float32 values) */
+    return *(U32*)&m1->m00 == *(U32*)&m2->m00 &&
+           *(U32*)&m1->m01 == *(U32*)&m2->m01 &&
+           *(U32*)&m1->m10 == *(U32*)&m2->m10 &&
+           *(U32*)&m1->m11 == *(U32*)&m2->m11 &&
+	   !strcmp(m1->id, m2->id);
+}
+type_t mymatrix_type = {
+    dup: mymatrix_clone,
+    hash: mymatrix_hash,
+    free: mymatrix_destroy,
+    equals: mymatrix_equals
+};
 
 typedef struct _internal {
+    dict_t*matrices;
+    char first;
 } internal_t;
 
+
+#ifdef __GNUC__
+void __attribute__((noinline)) 
+     matrix_convert(gfxmatrix_t*in, const char*id, mymatrix_t*out, gfxmatrix_t*scalematrix)
+#else
+void matrix_convert(gfxmatrix_t*in, const char*id, mymatrix_t*out, gfxmatrix_t*scalematrix)
+#endif
+{
+    double l1 = sqrt(in->m00 * in->m00 + in->m01 * in->m01);
+    double l2 = sqrt(in->m10 * in->m10 + in->m11 * in->m11);
+    double l = (l1+l2)/2.0;
+    if(l < 1e-10) {
+	memset(out, 0, sizeof(*out));
+	return;
+    }
+    out->m00 = in->m00 / l;
+    out->m10 = in->m10 / l;
+    out->m01 = -in->m01 / l;
+    out->m11 = -in->m11 / l;
+    out->id = (char*)id;
+
+    if(scalematrix) {
+	scalematrix->m00 = l;
+	scalematrix->m01 = 0;
+	scalematrix->m10 = 0;
+	scalematrix->m11 = -l;
+	scalematrix->tx = in->tx;
+	scalematrix->ty = in->ty;
+    }
+}
+
+typedef struct _matrixdata {
+    gfxfontlist_t*fonts;
+} matrixdata_t;
+
+typedef struct _transformedfont {
+    gfxfont_t*orig;
+    gfxfont_t*font;
+    mymatrix_t matrix;
+    int*used;
+    double dx;
+} transformedfont_t;
+
+static transformedfont_t* transformedfont_new(gfxfont_t*orig, mymatrix_t*m)
+{
+    transformedfont_t*f = rfx_calloc(sizeof(transformedfont_t));
+    f->orig = orig;
+    f->matrix = *m;
+    f->used = rfx_calloc(sizeof(f->used[0])*orig->num_glyphs);
+    int t;
+    for(t=0;t<orig->num_glyphs;t++) {
+	if(orig->glyphs[t].unicode==32)
+	    f->used[t]=1; //always preserve the space char in fonts
+    }
+    return f;
+}
+
 static void pass1_drawchar(gfxfilter_t*f, gfxfont_t*font, int glyphnr, gfxcolor_t*color, gfxmatrix_t*matrix, gfxdevice_t*out)
 {
     internal_t*i = (internal_t*)f->internal;
+    mymatrix_t m;
+    matrix_convert(matrix, font->id, &m, 0);
+    transformedfont_t*fd = dict_lookup(i->matrices, &m);
+    if(!fd) {
+	fd = transformedfont_new(font, &m);
+	dict_put(i->matrices, &m, fd);
+    }
+    fd->used[glyphnr]=1;
     out->drawchar(out, font, glyphnr, color, matrix);
 }
 
+static void glyph_transform(gfxglyph_t*g, mymatrix_t*mm)
+{
+    gfxmatrix_t m;
+    m.m00 = mm->m00;
+    m.m01 = mm->m01;
+    m.m10 = mm->m10;
+    m.m11 = mm->m11;
+    m.tx = 0;
+    m.ty = 0;
+    g->line = gfxline_clone(g->line);
+    gfxline_transform(g->line, &m);
+    if(m.m00>0)
+	g->advance *= m.m00;
+}
+
+static gfxresult_t* pass1_finish(gfxfilter_t*f, gfxdevice_t*out)
+{
+    internal_t*i = (internal_t*)f->internal;
+    DICT_ITERATE_DATA(i->matrices, transformedfont_t*, fd) {
+	gfxfont_t*font = fd->font = rfx_calloc(sizeof(gfxfont_t));
+	char id[80];
+	static int fontcount=0;
+	sprintf(id, "font%d", fontcount++);
+	font->id = strdup(id);
+	int t;
+	int count=0;
+	for(t=0;t<fd->orig->num_glyphs;t++) {
+	    if(fd->used[t]) 
+		count++;
+	}
+	font->num_glyphs = count;
+	font->glyphs = rfx_calloc(sizeof(gfxglyph_t)*font->num_glyphs);
+	count = 0;
+	for(t=0;t<fd->orig->num_glyphs;t++) {
+	    if(fd->used[t]) {
+		font->glyphs[count] = fd->orig->glyphs[t];
+		glyph_transform(&font->glyphs[count], &fd->matrix);
+		fd->used[t] = count;
+		count++;
+	    }
+	}
+
+	/* adjust the origin so that every character is to the
+	   right of the origin */
+	gfxbbox_t total = {0,0,0,0};
+	double average_xmax = 0;
+	for(t=0;t<count;t++) {
+	    gfxline_t*line = font->glyphs[t].line;
+	    gfxbbox_t b = gfxline_getbbox(line);
+	    total = gfxbbox_expand_to_bbox(total, b);
+	}
+	if(count) 
+	    average_xmax /= count;
+
+	fd->dx = -total.xmin;
+
+	font->ascent = total.ymax;
+	font->descent = -total.ymin;
+
+	for(t=0;t<count;t++) {
+	    gfxline_t*line = font->glyphs[t].line;
+	    while(line) {
+		line->x += fd->dx;
+		line->sx += fd->dx;
+		line = line->next;
+	    }
+	}
+	gfxfont_fix_unicode(font);
+    }
+    return out->finish(out);
+}
+
+static void pass2_addfont(gfxfilter_t*f, gfxfont_t*font, gfxdevice_t*out)
+{
+    /* we throw away original fonts, and do the addfont() for the transformed
+       fonts in the first drawchar() */
+}
+
 static void pass2_drawchar(gfxfilter_t*f, gfxfont_t*font, int glyphnr, gfxcolor_t*color, gfxmatrix_t*matrix, gfxdevice_t*out)
 {
     internal_t*i = (internal_t*)f->internal;
-    out->drawchar(out, font, glyphnr, color, matrix);
+
+    if(i->first) {
+	i->first = 0;
+	DICT_ITERATE_DATA(i->matrices, transformedfont_t*, fd) {
+	    out->addfont(out, fd->font);
+	}
+    }
+
+    mymatrix_t m;
+    gfxmatrix_t scalematrix;
+    matrix_convert(matrix, font->id, &m, &scalematrix);
+    transformedfont_t*d = dict_lookup(i->matrices, &m);
+    scalematrix.tx -= d->dx*scalematrix.m00;
+    out->drawchar(out, d->font, d->used[glyphnr], color, &scalematrix);
 }
 
 void gfxtwopassfilter_remove_font_transforms_init(gfxtwopassfilter_t*f)
 {
     internal_t*i = (internal_t*)rfx_calloc(sizeof(internal_t));
+
     memset(f, 0, sizeof(gfxtwopassfilter_t));
     f->type = gfxfilter_twopass;
+
     f->pass1.name = "remove font transforms pass 1";
     f->pass1.drawchar = pass1_drawchar;
+    f->pass1.finish = pass1_finish;
     f->pass1.internal = i;
 
     f->pass2.name = "remove font transforms pass 2";
+    f->pass2.addfont = pass2_addfont;
     f->pass2.drawchar = pass2_drawchar;
     f->pass2.internal = i;
+
+    i->matrices = dict_new2(&mymatrix_type);
+    i->first = 1;
 }