gcc 2.95.* fixes.
[swftools.git] / src / swfbbox.c
index 1c80cf6..70e1ac0 100644 (file)
@@ -3,9 +3,21 @@
 
    Part of the swftools package.
    
-   Copyright (c) 2001 Matthias Kramm <kramm@quiss.org>
-
-   This file is distributed under the GPL, see file COPYING for details */
+   Copyright (c) 2003 Matthias Kramm <kramm@quiss.org>
+   This program is free software; you can redistribute it and/or modify
+   it under the terms of the GNU General Public License as published by
+   the Free Software Foundation; either version 2 of the License, or
+   (at your option) any later version.
+
+   This program is distributed in the hope that it will be useful,
+   but WITHOUT ANY WARRANTY; without even the implied warranty of
+   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+   GNU General Public License for more details.
+
+   You should have received a copy of the GNU General Public License
+   along with this program; if not, write to the Free Software
+   Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA */
 
 #include "../config.h"
 #include <stdio.h>
@@ -15,6 +27,7 @@
 #include <fcntl.h>
 #include "../lib/rfxswf.h"
 #include "../lib/args.h"
+#include "../lib/log.h"
 
 static char * filename = 0;
 static char * outfilename = "output.swf";
@@ -22,14 +35,14 @@ static int optimize = 0;
 static int swifty = 0;
 static int verbose = 0;
 
-struct options_t options[] =
-{
- {"V","version"},
- {"O","optimize"},
- {"o","output"},
- {"S","swifty"},
- {"v","verbose"},
- {0,0}
+static struct options_t options[] = {
+{"h", "help"},
+{"O", "optimize"},
+{"S", "swifty"},
+{"o", "output"},
+{"v", "verbose"},
+{"V", "version"},
+{0,0}
 };
 
 int args_callback_option(char*name,char*val)
@@ -47,7 +60,7 @@ int args_callback_option(char*name,char*val)
        return 0;
     } 
     else if(!strcmp(name, "v")) {
-       verbose = 1;
+       verbose ++;
        return 0;
     } 
     else if(!strcmp(name, "o")) {
@@ -65,14 +78,18 @@ int args_callback_longoption(char*name,char*val)
 {
     return args_long2shortoption(options, name, val);
 }
-void args_callback_usage(char*name)
-{    
-    printf("Usage: %s [-at] file.swf\n", name);
-    printf("\t-h , --help\t\t Print help and exit\n");
-    printf("\t-O , --optimize\t\t Print help and exit\n");
-    printf("\t-S , --swifty\t\t Print out transformed bounding boxes\n");
-    printf("\t-o , --output\t\t Set output filename (for -O)\n");
-    printf("\t-V , --version\t\t Print program version and exit\n");
+void args_callback_usage(char *name)
+{
+    printf("\n");
+    printf("Usage: %s [-OS] file.swf\n", name);
+    printf("\n");
+    printf("-h , --help                    Print help and exit\n");
+    printf("-O , --optimize                Recalculate bounding boxes\n");
+    printf("-S , --swifty                  Print out transformed bounding boxes\n");
+    printf("-o , --output <filename>       Set output filename to <filename> (for -O)\n");
+    printf("-v , --verbose                 Be more verbose\n");
+    printf("-V , --version                 Print program version and exit\n");
+    printf("\n");
 }
 int args_callback_command(char*name,char*val)
 {
@@ -86,118 +103,6 @@ int args_callback_command(char*name,char*val)
 
 #define swf_ResetReadBits(tag)   if (tag->readBit)  { tag->pos++; tag->readBit = 0; }
 
-void parseFillStyleArray(TAG*tag, SHAPE2*shape)
-{
-    U16 count;
-    int t;
-    int num=0;
-    if(tag->id == ST_DEFINESHAPE)
-       num = 1;
-    else if(tag->id == ST_DEFINESHAPE2)
-       num = 2;
-    else if(tag->id == ST_DEFINESHAPE3)
-       num = 3;
-
-    count = swf_GetU8(tag);
-    if(count == 0xff && num>1) // defineshape2,3 only
-       count = swf_GetU16(tag);
-
-    if(verbose) printf("num: %d\n", count);
-    shape->numfillstyles = count;
-    shape->fillstyles = malloc(sizeof(FILLSTYLE)*count);
-
-    for(t=0;t<count;t++)
-    {
-       int type;
-       U8*pos;
-       FILLSTYLE*dest = &shape->fillstyles[t];
-       swf_ResetReadBits(tag);
-       type = swf_GetU8(tag); //type
-       shape->fillstyles[t].type = type;
-       if(type == 0) {
-           /* plain color */
-           if(num == 3)
-               swf_GetRGBA(tag, &dest->color);
-           else 
-               swf_GetRGB(tag, &dest->color);
-       }
-       else if(type == 0x10 || type == 0x12)
-       {
-           /* linear/radial gradient fill */
-           swf_ResetReadBits(tag);
-           swf_GetMatrix(tag, &dest->m);
-           swf_ResetReadBits(tag);
-           dest->gradient = malloc(sizeof(GRADIENT)); // TODO: free this again
-           swf_GetGradient(tag, dest->gradient, num>=3?1:0);
-       }
-       else if(type == 0x40 || type == 0x41)
-       {
-           /* bitmap fill */
-           swf_ResetReadBits(tag);
-           dest->id_bitmap = swf_GetU16(tag); //id
-           swf_ResetReadBits(tag); //?
-           swf_GetMatrix(tag, &dest->m);
-       }
-       else {
-           fprintf(stderr, "rfxswf:swftools.c Unknown fillstyle:0x%02x\n",type);
-       }
-    }
-    swf_ResetReadBits(tag);
-    count = swf_GetU8(tag); // line style array
-    if(count == 0xff)
-       count = swf_GetU16(tag);
-
-    if(verbose) printf("lnum: %d\n", count);
-
-    shape->numlinestyles = count;
-    shape->linestyles = malloc(sizeof(LINESTYLE)*count);
-    /* TODO: should we start with 1 and insert a correct definition of the
-       "built in" linestyle 0? */
-    for(t=0;t<count;t++) 
-    {
-       shape->linestyles[t].width = swf_GetU16(tag);
-       if(num == 3)
-           swf_GetRGBA(tag, &shape->linestyles[t].color);
-       else
-           swf_GetRGB(tag, &shape->linestyles[t].color);
-    }
-    return;
-}
-
-void swf_ParseDefineShape(TAG*tag, SHAPE2*shape)
-{
-    int num = 0, id;
-    U16 fill,line;
-    SRECT r;
-    SRECT r2;
-    SHAPELINE*l;
-    if(tag->id == ST_DEFINESHAPE)
-       num = 1;
-    else if(tag->id == ST_DEFINESHAPE2)
-       num = 2;
-    else if(tag->id == ST_DEFINESHAPE3)
-       num = 3;
-    else {
-       fprintf(stderr, "parseDefineShape must be called with a shape tag");
-    }
-
-    id = swf_GetU16(tag); //id
-    memset(shape, 0, sizeof(SHAPE2));
-    shape->bbox = malloc(sizeof(SRECT));
-    swf_GetRect(tag, &r);
-
-    memcpy(shape->bbox, &r, sizeof(SRECT));
-    parseFillStyleArray(tag, shape);
-
-    swf_ResetReadBits(tag); 
-    fill = (U16)swf_GetBits(tag,4);
-    line = (U16)swf_GetBits(tag,4);
-
-    shape->lines = swf_ParseShapeData(&tag->data[tag->pos], (tag->len - tag->pos)*8, fill, line);
-
-    l = shape->lines;
-}
-
 void swf_Shape2Optimize(SHAPE2*shape)
 {
     if(!shape->bbox)
@@ -205,73 +110,6 @@ void swf_Shape2Optimize(SHAPE2*shape)
     *(shape->bbox) = swf_GetShapeBoundingBox(shape);
 }
 
-void swf_Shape2ToShape(SHAPE2*shape2, SHAPE*shape)
-{
-    TAG*tag = swf_InsertTag(0,0);
-    SHAPELINE*l,*next;
-    int newx=0,newy=0,lastx=0,lasty=0,oldls=0,oldfs0=0,oldfs1=0;
-
-    memset(shape, 0, sizeof(SHAPE));
-
-    shape->linestyle.n = shape2->numlinestyles;
-    shape->linestyle.data = (LINESTYLE*)malloc(sizeof(LINESTYLE)*shape->linestyle.n);
-    memcpy(shape->linestyle.data, shape2->linestyles, sizeof(LINESTYLE)*shape->linestyle.n);
-    
-    shape->fillstyle.n =  shape2->numfillstyles;
-    shape->fillstyle.data = (FILLSTYLE*)malloc(sizeof(FILLSTYLE)*shape->fillstyle.n);
-    memcpy(shape->fillstyle.data, shape2->fillstyles, sizeof(FILLSTYLE)*shape->fillstyle.n);
-
-    swf_ShapeCountBits(shape,NULL,NULL);
-
-    l = shape2->lines;
-
-    while(l) {
-       int ls=0,fs0=0,fs1=0;
-
-       if(l->type != moveTo) {
-           if(oldls != l->linestyle) {oldls = ls = l->linestyle;if(!ls) ls=0x8000;}
-           if(oldfs0 != l->fillstyle0) {oldfs0 = fs0 = l->fillstyle0;if(!fs0) fs0=0x8000;}
-           if(oldfs1 != l->fillstyle1) {oldfs1 = fs1 = l->fillstyle1;if(!fs1) fs1=0x8000;}
-
-           if(ls || fs0 || fs1 || newx!=0x7fffffff || newy!=0x7fffffff) {
-               swf_ShapeSetAll(tag,shape,newx,newy,ls,fs0,fs1);
-               newx = 0x7fffffff;
-               newy = 0x7fffffff;
-           }
-       }
-
-       if(l->type == lineTo) {
-           swf_ShapeSetLine(tag,shape,l->x-lastx,l->y-lasty);
-       } else if(l->type == splineTo) {
-           swf_ShapeSetCurve(tag,shape, l->sx-lastx,l->sy-lasty, l->x-l->sx,l->y-l->sy);
-       }
-       if(l->type == moveTo) {
-           newx = l->x;
-           newy = l->y;
-       }
-
-       lastx = l->x;
-       lasty = l->y;
-       l = l->next;
-    }
-    swf_ShapeSetEnd(tag);
-    shape->data = tag->data;
-    shape->bitlen = tag->len*8;
-}
-
-void swf_SetShape2(TAG*tag, SHAPE2*shape2)
-{
-    SHAPE shape;
-    swf_Shape2ToShape(shape2, &shape);
-
-    swf_SetRect(tag,shape2->bbox);
-    swf_SetShapeStyles(tag, &shape);
-    swf_ShapeCountBits(&shape,NULL,NULL);
-    swf_SetShapeBits(tag,&shape);
-
-    swf_SetBlock(tag, shape.data, (shape.bitlen+7)/8);
-}
-
 /*
    {char {x1 y1 x2 y2 x3 y3 x4 y4]]
 */
@@ -319,16 +157,216 @@ MATRIX getmatrix(TAG*tag)
     return o.matrix;
 }
 
+
+static int fontnum = -1;
+static SWFFONT**fonts;
+static SWF*c_swf;
+static void fontcallback1(U16 id,U8 * name)
+{ fontnum++;
+}
+static void fontcallback2(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;
+
+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;
+       SRECT newglyphbbox, glyphbbox = font->layout->bounds[chars[t]];
+       MATRIX m = bounds->m;
+       
+       if(ch < font->numchars && font->glyph2ascii) {
+           ch = font->glyph2ascii[ch];
+       }
+
+       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 += x;
+       m.ty += 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) {
+           SHAPE2 s;
+           if(verbose) printf("%s\n", swf_TagGetName(tag));
+           swf_ParseDefineShape(tag, &s);
+           swf_Shape2Optimize(&s);
+           tag->len = 2;
+           tag->pos = 0;
+           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);
+               fonts = (SWFFONT**)malloc(fontnum*sizeof(SWFFONT*));
+               memset(fonts, 0, fontnum*sizeof(SWFFONT*));
+               fontnum = 0;
+               swf_FontEnumerate(swf,&fontcallback2);
+           }
+
+           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);
+           }
+           
+           /* 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 (tag->id == ST_PLACEOBJECT || tag->id == ST_PLACEOBJECT2) {
+           if(hasid(tag)) {
+               depth2id[swf_GetDepth(tag)] = swf_GetPlaceID(tag);
+           }
+           if(hasname(tag)) {
+               depth2name[swf_GetDepth(tag)] = getname(tag);
+           }
+       }
+       if (tag->id == ST_PLACEOBJECT || tag->id == ST_PLACEOBJECT2) {
+           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");
+}
+
+    
 int main (int argc,char ** argv)
 { 
     TAG*tag;
     SWF swf;
     int fi;
-    int frame=0;
     memset(bboxes, 0, sizeof(bboxes));
     memset(depth2name, 0, sizeof(depth2name));
 
     processargs(argc, argv);
+    initLog(0,0,0,0,0,verbose?LOGLEVEL_DEBUG:LOGLEVEL_WARNING);
 
     if(!filename) {
         fprintf(stderr, "You must supply a filename.\n");
@@ -350,67 +388,26 @@ int main (int argc,char ** argv)
     }
     close(fi);
 
+    swf_OptimizeTagOrder(&swf);
     swf_FoldAll(&swf);
-    tag = swf.firstTag;
 
-    if(swifty) {
-       printf("{\n");
-       printf("{frame %d}\n", frame++);
+    /* Optimize bounding boxes in case -O flag was set */
+    if(optimize) {
+       swf_OptimizeBoundingBoxes(&swf);
     }
-
+    
+    /* Create an ID to Bounding Box table */
+    tag = swf.firstTag;
     while (tag) {
-       if (tag->id == ST_DEFINESHAPE ||
-           tag->id == ST_DEFINESHAPE2 ||
-           tag->id == ST_DEFINESHAPE3) {
-           SHAPE2 s;
-           if(verbose) printf("%s\n", swf_TagGetName(tag));
-           swf_ParseDefineShape(tag, &s);
-           swf_Shape2Optimize(&s);
-           tag->len = 2;
-           swf_SetShape2(tag, &s);
-       }
        if(swf_isDefiningTag(tag) && tag->id != ST_DEFINESPRITE) {
            bboxes[swf_GetDefineID(tag)] = swf_GetDefineBBox(tag);
        }
-       if(swifty) {
-           if (tag->id == ST_SHOWFRAME) {
-               printf("{frame %d}\n", frame++);
-           }
-           if (tag->id == ST_PLACEOBJECT || tag->id == ST_PLACEOBJECT2) {
-               if(hasid(tag)) {
-                   depth2id[swf_GetDepth(tag)] = swf_GetPlaceID(tag);
-               }
-               if(hasname(tag)) {
-                   depth2name[swf_GetDepth(tag)] = getname(tag);
-               }
-           }
-           if (tag->id == ST_PLACEOBJECT || tag->id == ST_PLACEOBJECT2) {
-               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("{%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;
     }
+    
+    /* Create an ID->Bounding Box table for all bounding boxes */
     if(swifty) {
-       printf("}\n");
+       showSwiftyOutput(&swf);
     }
 
     if(optimize) {