+
+static int fontnum = -1;
+static SWFFONT**fonts;
+static SWF*c_swf;
+static void fontcallback1(void*self, U16 id,U8 * name)
+{ fontnum++;
+}
+static void fontcallback2(void*self, U16 id,U8 * name)
+{
+ fonts[fontnum] = 0;
+ swf_FontExtract(c_swf,id,&fonts[fontnum]);
+ if(verbose) {
+ if(fonts[fontnum]) printf("Extracting font %d (%s)\n", id, name);
+ else printf("Extracting font %d (%s) failed\n", id, name);
+ fflush(stdout);
+ }
+ fontnum++;
+}
+typedef struct _textbounds
+{
+ SRECT r;
+ MATRIX m; // character transform matrix
+} textbounds_t;
+
+typedef struct _placement
+{
+ SWFPLACEOBJECT* po;
+ int num;
+} placement_t;
+
+static placement_t* placements;
+
+static placement_t* readPlacements(SWF*swf)
+{
+ placement_t* p = (placement_t*)rfx_calloc(sizeof(placement_t)*65536);
+ TAG*tag = swf->firstTag;
+ while(tag) {
+ if(swf_isPlaceTag(tag)) {
+ SWFPLACEOBJECT*po = rfx_alloc(sizeof(SWFPLACEOBJECT));
+ int id;
+ swf_GetPlaceObject(tag, po);
+ id = po->id;
+ if(po->move) {
+ fprintf(stderr, "MOVE tags not supported with -c");
+ }
+ p[id].po = po;
+ p[id].num++;
+ }
+ tag = tag->next;
+ }
+
+ return p;
+}
+
+static void freePlacements(placement_t*p)
+{
+ int t;
+ for(t=0;t<65536;t++) {
+ if(p[t].po) {
+ swf_PlaceObjectFree(p[t].po); p[t].po = 0;
+ }
+ }
+ rfx_free(p);
+}
+
+SRECT swf_ClipRect(SRECT border, SRECT r)
+{
+ if(r.xmax > border.xmax) r.xmax = border.xmax;
+ if(r.ymax > border.ymax) r.ymax = border.ymax;
+ if(r.xmax < border.xmin) r.xmax = border.xmin;
+ if(r.ymax < border.ymin) r.ymax = border.ymin;
+
+ if(r.xmin > border.xmax) r.xmin = border.xmax;
+ if(r.ymin > border.ymax) r.ymin = border.ymax;
+ if(r.xmin < border.xmin) r.xmin = border.xmin;
+ if(r.ymin < border.ymin) r.ymin = border.ymin;
+ return r;
+}
+
+static SRECT clipBBox(TAG*tag, SRECT mbbox, SRECT r)
+{
+ int id = swf_GetDefineID(tag);
+ MATRIX m;
+ if(!placements[id].po) {
+ if(verbose)
+ printf("Id %d is never set\n", id);
+ return r;
+ }
+ if(placements[id].num>1) {
+ if(verbose)
+ printf("Id %d is set more than once\n", id);
+ return r;
+ }
+ m = placements[id].po->matrix;
+ if(m.r0 || m.r1) {
+ fprintf(stderr, "Rotating PLACEOBJECTS are not supported with -c\n");
+ return r;
+ }
+
+ if(verbose) {
+ printf("ID %d\n", id);
+ swf_DumpMatrix(stdout, &m);
+ }
+ mbbox.xmin -= m.tx;
+ mbbox.ymin -= m.ty;
+ mbbox.xmax -= m.tx;
+ mbbox.ymax -= m.ty;
+ mbbox.xmin *= 65536.0/m.sx;
+ mbbox.xmax *= 65536.0/m.sx;
+ mbbox.ymin *= 65536.0/m.sy;
+ mbbox.ymax *= 65536.0/m.sy;
+
+ if(verbose) {
+ printf("border: %f/%f/%f/%f - rect: %f/%f/%f/%f\n",
+ mbbox.xmin /20.0,
+ mbbox.ymin /20.0,
+ mbbox.xmax /20.0,
+ mbbox.ymax /20.0,
+ r.xmin /20.0,
+ r.ymin /20.0,
+ r.xmax /20.0,
+ r.ymax /20.0);
+ }
+
+
+ r = swf_ClipRect(mbbox, r);
+
+ if(verbose) {
+ printf("new rect: %f/%f/%f/%f\n",
+ r.xmin /20.0,
+ r.ymin /20.0,
+ r.xmax /20.0,
+ r.ymax /20.0);
+ }
+
+ return r;
+}
+
+
+static void textcallback(void*self, int*chars, int*xpos, int nr, int fontid, int fontsize,
+ int xstart, int ystart, RGBA* color)
+{
+ textbounds_t * bounds = (textbounds_t*)self;
+ SWFFONT*font = 0;
+ int t;
+ for(t=0;t<fontnum;t++) {
+ if(fonts[t]->id == fontid) {
+ font = fonts[t];
+ break;
+ }
+ }
+ if(!font) {
+ fprintf(stderr, "Font %d unknown\n", fontid);
+ exit(1);
+ }
+ if(!font->layout) {
+ /* This is an expensive operation- but what should we do, we
+ need the glyph's bounding boxes */
+ swf_FontCreateLayout(font);
+ }
+
+ if(verbose)
+ printf("%d chars, font %d, size %d, at (%d,%d)\n", nr, fontid, fontsize, xstart, ystart);
+
+ for(t=0;t<nr;t++) {
+ /* not tested yet- the matrix/fontsize calculation is probably all wrong */
+ int x = xstart + xpos[t];
+ int y = ystart;
+ int ch = 0;
+ SRECT newglyphbbox, glyphbbox = font->layout->bounds[chars[t]];
+ MATRIX m = bounds->m;
+ SPOINT p;
+
+ if(chars[t] < font->numchars && font->glyph2ascii) {
+ ch = font->glyph2ascii[chars[t]];
+ }
+
+ p.x = x; p.y = y;
+ p = swf_TurnPoint(p, &m);
+
+ m.sx = (m.sx * fontsize) / 1024;
+ m.sy = (m.sy * fontsize) / 1024;
+ m.r0 = (m.r0 * fontsize) / 1024;
+ m.r1 = (m.r1 * fontsize) / 1024;
+
+ m.tx += p.x;
+ m.ty += p.y;
+ newglyphbbox = swf_TurnRect(glyphbbox, &m);
+
+ if(ch<32) ch='?';
+
+ swf_ExpandRect2(&(bounds->r), &newglyphbbox);
+ if(verbose >= 2) {
+ printf("%5d %c, %d %d %d %d (%d %d %d %d) -> %d %d %d %d\n",
+ xpos[t], ch,
+ glyphbbox.xmin, glyphbbox.ymin, glyphbbox.xmax, glyphbbox.ymax,
+ newglyphbbox.xmin, newglyphbbox.ymin, newglyphbbox.xmax, newglyphbbox.ymax,
+ bounds->r.xmin, bounds->r.ymin, bounds->r.xmax, bounds->r.ymax);
+ }
+
+ }
+}
+
+static void swf_OptimizeBoundingBoxes(SWF*swf)
+{
+ TAG* tag = swf->firstTag;
+
+ while (tag) {
+ if (tag->id == ST_DEFINESHAPE ||
+ tag->id == ST_DEFINESHAPE2 ||
+ tag->id == ST_DEFINESHAPE3 ||
+ tag->id == ST_DEFINESHAPE4) {
+ SHAPE2 s;
+ if(verbose) printf("%s\n", swf_TagGetName(tag));
+ swf_ParseDefineShape(tag, &s);
+ swf_Shape2Optimize(&s);
+ tag->len = 2;
+ tag->pos = 0;
+ if(!s.bbox) {
+ fprintf(stderr, "Internal error (5)\n");
+ exit(1);
+ }
+ if(clip) {
+ *s.bbox = clipBBox(tag, swf->movieSize, *s.bbox);
+ }
+ swf_SetShape2(tag, &s);
+ }
+ if (tag->id == ST_DEFINETEXT || tag->id == ST_DEFINETEXT2) {
+ SRECT oldbox;
+ int matrix_offset;
+ int len;
+ U8*data;
+ textbounds_t bounds;
+ if(verbose) printf("%s\n", swf_TagGetName(tag));
+ if(fontnum < 0) {
+ if(verbose) printf("Extracting fonts...\n");
+ c_swf = swf;
+ fontnum = 0;
+ swf_FontEnumerate(swf,&fontcallback1,0);
+ fonts = (SWFFONT**)malloc(fontnum*sizeof(SWFFONT*));
+ memset(fonts, 0, fontnum*sizeof(SWFFONT*));
+ fontnum = 0;
+ swf_FontEnumerate(swf,&fontcallback2,0);
+ }
+
+ memset(&bounds, 0, sizeof(bounds));
+
+ swf_SetTagPos(tag, 0);
+ swf_GetU16(tag);
+ swf_GetRect(tag,&oldbox);
+ swf_ResetReadBits(tag);
+ matrix_offset = tag->pos;
+ swf_GetMatrix(tag,&bounds.m);
+ swf_ParseDefineText(tag, textcallback, &bounds);
+ if(verbose) {
+ printf("\n");
+ swf_DumpMatrix(stdout, &bounds.m);
+ printf("old: %d %d %d %d\n", oldbox.xmin, oldbox.ymin, oldbox.xmax, oldbox.ymax);
+ printf("new: %d %d %d %d\n", bounds.r.xmin, bounds.r.ymin, bounds.r.xmax, bounds.r.ymax);
+ }
+ if(clip) {
+ bounds.r = clipBBox(tag, swf->movieSize, bounds.r);
+ }
+
+ /* now comes the tricky part:
+ we have to fiddle the data back in
+ thank heavens that the bbox is follow by a matrix
+ struct, which always starts on a byte boundary.
+ */
+ len = tag->len - matrix_offset;
+ data = malloc(len);
+ memcpy(data, &tag->data[matrix_offset], len);
+ tag->writeBit = 0;
+ tag->len = 2;
+ swf_SetRect(tag, &bounds.r);
+ swf_SetBlock(tag, data, len);
+ free(data);
+ tag->pos = tag->readBit = 0;
+ }
+ tag = tag->next;
+ }
+}
+
+static void showSwiftyOutput(SWF*swf)
+{
+ TAG*tag = swf->firstTag;
+ int frame=0;
+ printf("{\n\t{frame %d}\n", frame++);
+
+ while (tag) {
+ if (tag->id == ST_SHOWFRAME) {
+ printf("}\n{\n\t{frame %d}\n", frame++);
+ }
+ if (swf_isPlaceTag(tag)) {
+ if(hasid(tag)) {
+ depth2id[swf_GetDepth(tag)] = swf_GetPlaceID(tag);
+ }
+ if(hasname(tag)) {
+ depth2name[swf_GetDepth(tag)] = getname(tag);
+ }
+ }
+ if (swf_isPlaceTag(tag)) {
+ MATRIX m = getmatrix(tag);
+ U16 id = depth2id[swf_GetDepth(tag)];
+ char*name = depth2name[swf_GetDepth(tag)];
+ char buf[40];
+ SRECT bbox = bboxes[id];
+ SPOINT p1,p2,p3,p4;
+ p1.x = bbox.xmin; p1.y = bbox.ymin;
+ p2.x = bbox.xmax; p2.y = bbox.ymin;
+ p3.x = bbox.xmin; p3.y = bbox.ymax;
+ p4.x = bbox.xmax; p4.y = bbox.ymax;
+ p1 = swf_TurnPoint(p1, &m);
+ p2 = swf_TurnPoint(p2, &m);
+ p3 = swf_TurnPoint(p3, &m);
+ p4 = swf_TurnPoint(p4, &m);
+ if(!name) {
+ sprintf(buf, "ID%d", id);name = buf;
+ }
+ //printf("\t#%.4f %.4f %.4f %.4f | %.4f %.4f\n", m.sx/65536.0, m.r1/65536.0, m.r0/65536.0, m.sy/65536.0, m.tx/20.0, m.ty/20.0);
+ printf("\t{%s {%.2f %.2f %.2f %.2f %.2f %.2f %.2f %.2f}}\n", name,
+ p1.x/20.0, p1.y/20.0, p2.x/20.0, p2.y/20.0,
+ p3.x/20.0, p3.y/20.0, p4.x/20.0, p4.y/20.0);
+ }
+ tag = tag->next;
+ }
+ printf("}\n");
+}
+static SRECT getMovieClipBBox(TAG*tag)
+{
+ //TAG*tag = swf->firstTag;
+ int frame=0;
+ SRECT movieSize;
+ U16 depth2id[65536];
+ memset(depth2id, 0, sizeof(depth2id));
+
+ memset(&movieSize,0,sizeof(SRECT));
+
+ while (tag->id != ST_END) {
+ if (swf_isPlaceTag(tag)) {
+ if(hasid(tag)) {
+ depth2id[swf_GetDepth(tag)] = swf_GetPlaceID(tag);
+ }
+ }
+ if (swf_isPlaceTag(tag)) {
+ MATRIX m = getmatrix(tag);
+ U16 id = depth2id[swf_GetDepth(tag)];
+ SRECT bbox = bboxes[id];
+
+ SRECT tbbox = swf_TurnRect(bbox, &m);
+ swf_ExpandRect2(&movieSize, &tbbox);
+ }
+ tag = tag->next;
+ }
+ return movieSize;
+}
+
+static SRECT getSWFBBox(SWF*swf)
+{
+ SRECT movieSize = getMovieClipBBox(swf->firstTag);
+
+ return movieSize;
+}
+