moved swf_GetMorphGradient from ../rfxswf.c.
[swftools.git] / lib / modules / swftools.c
index 2a6e542..564825d 100644 (file)
@@ -65,6 +65,14 @@ MATRIX * swf_MatrixMapTriangle(MATRIX * m,int dx,int dy,int x0,int y0,
   return m;
 }
 
+void swf_SetDefineID(TAG * tag, U16 newid)
+{
+  int oldlen = tag->len;
+  tag->len = 0;
+  swf_SetU16(tag, newid); /* set defining ID */
+  tag->len = oldlen;
+}
+
 U16 swf_GetDefineID(TAG * t)
 // up to SWF 4.0
 { U32 oldTagPos;
@@ -86,15 +94,16 @@ U16 swf_GetDefineID(TAG * t)
     case ST_DEFINEBITSLOSSLESS2:
     case ST_DEFINEBUTTON:
     case ST_DEFINEBUTTON2:
-    case ST_DEFINEBUTTONCXFORM:
-    case ST_DEFINEBUTTONSOUND:
+    case ST_DEFINEBUTTONCXFORM: //pseudodefine
+    case ST_DEFINEBUTTONSOUND: //pseudodefine
     case ST_DEFINEFONT:
     case ST_DEFINEFONT2:
-    case ST_DEFINEFONTINFO:
+    case ST_DEFINEFONTINFO: //pseudodefine
     case ST_DEFINETEXT:
     case ST_DEFINETEXT2:
     case ST_DEFINESOUND:
     case ST_DEFINESPRITE:
+    case ST_NAMECHARACTER: //pseudodefine
       id = swf_GetU16(t);
       break;
   }
@@ -115,6 +124,7 @@ U16 swf_GetPlaceID(TAG * t)
   switch (swf_GetTagID(t))
   { case ST_PLACEOBJECT:
     case ST_REMOVEOBJECT:
+    case ST_FREECHARACTER:
     case ST_STARTSOUND:
       id = swf_GetU16(t);
       break;
@@ -172,6 +182,15 @@ static int swf_spritetagids[] =
  -1
 };
 
+static int swf_pseudodefiningtagids[] = 
+{
+ ST_DEFINEFONTINFO,
+ ST_DEFINEBUTTONCXFORM,
+ ST_DEFINEBUTTONSOUND,
+ ST_NAMECHARACTER,
+ -1
+};
+
 U8 swf_isAllowedSpriteTag(TAG * tag)
 {
     int id = tag->id;
@@ -198,6 +217,19 @@ U8 swf_isDefiningTag(TAG * tag)
     return 0; 
 }
 
+U8 swf_isPseudoDefiningTag(TAG * tag)
+{
+    int id = tag->id;
+    int t=0;
+    while(swf_pseudodefiningtagids[t]>=0)
+    {
+        if(swf_pseudodefiningtagids[t] == id) 
+            return 1;
+        t++;
+    }
+    return 0; 
+}
+
 U16 swf_GetDepth(TAG * t)
 // up to SWF 4.0
 { 
@@ -259,3 +291,469 @@ char* swf_GetName(TAG * t)
     return name;
 }
 
+/* used in enumerateUsedIDs */
+void swf_GetMorphGradient(TAG * tag, GRADIENT * gradient1, GRADIENT * gradient2)
+{
+    GRADIENT dummy1;
+    GRADIENT dummy2;
+    int t;
+    if(!gradient1)
+       gradient1 = &dummy1;
+    if(!gradient2)
+       gradient2 = &dummy2;
+    gradient1->num = 
+    gradient2->num = swf_GetU8(tag);
+    for(t=0;t<gradient1->num;t++)
+    {
+       int s=t;
+       if(s>=8) //FIXME
+           s=7;
+       gradient1->ratios[t] = swf_GetU8(tag);
+       swf_GetRGBA(tag, &gradient1->rgba[t]);
+       gradient2->ratios[t] = swf_GetU8(tag);
+       swf_GetRGBA(tag, &gradient2->rgba[t]);
+    }
+}
+
+#define DEBUG_ENUMERATE if(0)
+
+static void enumerateUsedIDs_styles(TAG * tag, void (*callback)(TAG*, int, void*), void*callback_data, int num, int morph)
+{
+    U16 count;
+    int t;
+    count = swf_GetU8(tag);
+    if(count == 0xff && num>1) // defineshape2,3 only
+       count = swf_GetU16(tag);
+
+    for(t=0;t<count;t++)
+    {
+       int type;
+       U8*pos;
+       swf_ResetReadBits(tag);
+       type = swf_GetU8(tag); //type
+       if(type == 0) {
+           if(num == 3)
+               {swf_GetRGBA(tag, NULL);if(morph) swf_GetRGBA(tag, NULL);}
+           else 
+               {swf_GetRGB(tag, NULL);if(morph) swf_GetRGB(tag, NULL);}
+       }
+       else if(type == 0x10 || type == 0x12)
+       {
+           swf_ResetReadBits(tag);
+           swf_GetMatrix(tag, NULL);
+           if(morph)
+               swf_GetMatrix(tag, NULL);
+           swf_ResetReadBits(tag);
+           if(morph)
+               swf_GetMorphGradient(tag, NULL, NULL);
+           else
+               swf_GetGradient(tag, NULL, /*alpha*/ num>=3?1:0);
+       }
+       else if(type == 0x40 || type == 0x41)
+       {
+           swf_ResetReadBits(tag);
+           // we made it.
+           if(tag->data[tag->pos] != 0xff ||
+              tag->data[tag->pos+1] != 0xff)
+           (callback)(tag, tag->pos, callback_data);
+
+           swf_GetU16(tag);
+           swf_ResetReadBits(tag);
+           swf_GetMatrix(tag, NULL);
+           if(morph)
+               swf_GetMatrix(tag, NULL);
+       }
+       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);
+    for(t=0;t<count;t++) 
+    {
+       swf_GetU16(tag);
+       if(morph)
+           swf_GetU16(tag);
+       if(num == 3)
+           {swf_GetRGBA(tag, NULL);if(morph) swf_GetRGBA(tag, NULL);}
+       else
+           {swf_GetRGB(tag, NULL);if(morph) swf_GetRGB(tag, NULL);}
+    }
+}
+
+void enumerateUsedIDs(TAG * tag, int base, void (*callback)(TAG*, int, void*), void*callback_data)
+{
+    int num = 1;
+    swf_ResetReadBits(tag);
+    tag->pos = 0;
+    switch(tag->id)
+    {
+       case ST_DEFINEBUTTONCXFORM: {
+           int t;
+           callback(tag, tag->pos + base, callback_data);
+           for(t=0;t<4;t++) {
+               int flags;
+               callback(tag, tag->pos + base, callback_data);
+               swf_GetU16(tag); //sound id
+               flags = swf_GetU8(tag);
+               if(flags&1)
+                   swf_GetU32(tag); // in point
+               if(flags&2)
+                   swf_GetU32(tag); // out points
+               if(flags&4)
+                   swf_GetU16(tag); // loop count
+               if(flags&8)
+               {
+                   int npoints = swf_GetU8(tag);
+                   int s;
+                   for(s=0;s<npoints;s++)
+                   {
+                       swf_GetU32(tag);
+                       swf_GetU16(tag);
+                       swf_GetU16(tag);
+                   }
+               }
+           }
+        } break;
+       case ST_DEFINEBUTTONSOUND:
+           callback(tag, tag->pos + base, callback_data); //button id
+       break;
+
+       case ST_EXPORTASSETS: {
+           int num =  swf_GetU16(tag);
+           int t;
+           for(t=0;t<num;t++) {
+               callback(tag, tag->pos + base, callback_data); //button id
+               swf_GetU16(tag); //id
+               while(swf_GetU8(tag)); //name
+           }
+       } break;
+
+       case ST_FREECHARACTER: /* unusual tags, which all start with an ID */
+       case ST_NAMECHARACTER:
+       case ST_GENERATORTEXT:
+       case ST_MX3:
+           callback(tag, tag->pos + base, callback_data);
+        break;
+       case ST_PLACEOBJECT:
+           callback(tag, tag->pos + base, callback_data);
+        break;
+       case ST_PLACEOBJECT2:
+           // only if placeflaghascharacter
+           if(!(tag->data[0]&2))
+               break;
+           callback(tag, 3 + base, callback_data);
+        break;
+       case ST_REMOVEOBJECT:
+           callback(tag, tag->pos + base, callback_data);
+       break;
+       case ST_STARTSOUND:
+           callback(tag, tag->pos + base, callback_data);
+       break;
+       case ST_DEFINESPRITE: {
+           if(tag->len <= 4)
+               break; // sprite is expanded
+
+           swf_GetU16(tag); // id
+           swf_GetU16(tag); // framenum
+
+           while(1) {
+               U16 flags = swf_GetU16(tag);
+               U32 len;
+               U16 id = flags>>6;
+               TAG *tag2 = swf_InsertTag(NULL, id);
+               len = flags&0x3f;
+               if(len == 63)
+                   len = swf_GetU32(tag);
+               if(id == ST_END)
+                   break;
+               tag2->len = tag2->memsize = len;
+               tag2->data = malloc(len);
+               memcpy(tag2->data, &tag->data[tag->pos], len);
+               /* I never saw recursive sprites, but they are (theoretically) 
+                  possible, so better add base here again */
+               enumerateUsedIDs(tag2, tag->pos + base, callback, callback_data);
+               swf_DeleteTag(tag2);
+               swf_GetBlock(tag, NULL, len);
+           }
+       } 
+       break;
+       case ST_DEFINEBUTTON2: // has some font ids in the button records
+           num++; 
+       //fallthrough
+       case ST_DEFINEBUTTON: {
+           swf_GetU16(tag); //button id
+           if(num>1)
+           { 
+               int offset;
+               swf_GetU8(tag); //flag
+               offset = swf_GetU16(tag); //offset
+           }
+           while(1)
+           {
+               U16 charid;
+               if(!swf_GetU8(tag)) //flags
+                   break; 
+               callback(tag, tag->pos + base, callback_data);
+               swf_GetU16(tag); //char
+               swf_GetU16(tag); //layer
+               swf_ResetReadBits(tag);
+               swf_GetMatrix(tag, NULL);
+               if(num>1) {
+                 swf_ResetReadBits(tag);
+                 swf_GetCXForm(tag, NULL, 1);
+               }
+           }
+           // ...
+       }
+       break;
+       case ST_DEFINEEDITTEXT:  {
+           U8 flags1,flags2;
+           swf_GetU16(tag); //id
+           swf_GetRect(tag, NULL); //bounding box
+           swf_ResetReadBits(tag);
+           flags1 = swf_GetU8(tag);
+           flags2 = swf_GetU8(tag);
+           if(flags1 & 1)
+               callback(tag, tag->pos + base, callback_data);
+       }
+       break;
+       case ST_DEFINETEXT2:
+           num ++;
+       case ST_DEFINETEXT: { 
+           int glyphbits, advancebits;
+           int id;
+           id = swf_GetU16(tag); //id
+           swf_GetRect(tag, NULL); //bounding box
+           swf_ResetReadBits(tag);
+           swf_GetMatrix(tag, NULL); //matrix
+           swf_ResetReadBits(tag);
+           glyphbits = swf_GetU8(tag); //glyphbits
+           advancebits = swf_GetU8(tag); //advancebits
+           while(1) {
+               U16 flags;
+               swf_ResetReadBits(tag);
+               flags = swf_GetBits(tag, 8);
+               if(!flags) break;
+               if(flags & 128) // text style record
+               {
+                   swf_ResetReadBits(tag);
+                   if(flags & 8) { // hasfont
+                       callback(tag, tag->pos + base, callback_data);
+                       id = swf_GetU16(tag);
+                   }
+                   if(flags & 4) { // hascolor
+                       if(num==1) swf_GetRGB(tag, NULL);
+                       else       swf_GetRGBA(tag, NULL);
+                   }
+                   if(flags & 2) { //has x offset
+                       swf_ResetReadBits(tag);
+                       swf_GetU16(tag);
+                   }
+                   if(flags & 1) { //has y offset
+                       swf_ResetReadBits(tag);
+                       swf_GetU16(tag);
+                   }
+                   if(flags & 8) { //has height
+                       swf_ResetReadBits(tag);
+                       swf_GetU16(tag);
+                   }
+               } else { // glyph record
+                   int t;
+                   swf_ResetReadBits(tag);
+                   for(t=0;t<flags;t++) {
+                       swf_GetBits(tag, glyphbits);
+                       swf_GetBits(tag, advancebits);
+                   }
+               }
+           }
+           break;
+       }
+       case ST_DEFINEFONTINFO:
+           callback(tag, tag->pos + base, callback_data);
+       break;
+
+       //case ST_DEFINEMORPHSHAPE: /* disabled for now (doesn't work) */
+
+       case ST_DEFINESHAPE3: // these thingies might have bitmap ids in their fillstyles
+       num++; //fallthrough
+       case ST_DEFINESHAPE2:
+       num++; //fallthrough
+       case ST_DEFINESHAPE: {
+           int fillbits;
+           int linebits;
+           int id; 
+           int morph = 0;
+           if(tag->id == ST_DEFINEMORPHSHAPE)
+               morph = 1;
+
+           id = swf_GetU16(tag); // id;
+           swf_GetRect(tag, NULL); // bounds
+           if(morph) {
+               swf_GetRect(tag, NULL); // bounds2
+               swf_GetU32(tag); //offset to endedges
+           }
+    
+           DEBUG_ENUMERATE printf("Tag:%d Name:%s ID:%d\n", tag->id, swf_TagGetName(tag), id);
+
+           enumerateUsedIDs_styles(tag, callback, callback_data, num, morph);
+           DEBUG_ENUMERATE printf("-------\n");
+           while(--morph>=0) /* morph shapes define two shapes */
+           {
+               fillbits = swf_GetBits(tag, 4);
+               linebits = swf_GetBits(tag, 4);
+               DEBUG_ENUMERATE printf("%d %d\n", fillbits, linebits);
+               swf_ResetReadBits(tag);
+               while(1) {
+                   int flags;
+                   flags = swf_GetBits(tag, 1);
+                   if(!flags) { //style change
+                       flags = swf_GetBits(tag, 5);
+                       if(!flags)
+                           break;
+                       if(flags&1) { //move
+                           int n = swf_GetBits(tag, 5); 
+                           int x,y;
+                           x = swf_GetBits(tag, n); //x
+                           y = swf_GetBits(tag, n); //y
+                           DEBUG_ENUMERATE printf("move %f %f\n",x/20.0,y/20.0);
+                       }
+                       if(flags&2) { //fill0
+                           int fill0;
+                           fill0 = swf_GetBits(tag, fillbits); 
+                           DEBUG_ENUMERATE printf("fill0 %d\n", fill0);
+                       }
+                       if(flags&4) { //fill1
+                           int fill1;
+                           fill1 = swf_GetBits(tag, fillbits); 
+                           DEBUG_ENUMERATE printf("fill1 %d\n", fill1);
+                       }
+                       if(flags&8) { //linestyle
+                           int line;
+                           line = swf_GetBits(tag, linebits); 
+                           DEBUG_ENUMERATE printf("linestyle %d\n",line);
+                       }
+                       if(flags&16) {
+                           DEBUG_ENUMERATE printf("more fillstyles\n");
+                           enumerateUsedIDs_styles(tag, callback, callback_data, num, 0);
+                           fillbits = swf_GetBits(tag, 4);
+                           linebits = swf_GetBits(tag, 4);
+                       }
+                   } else {
+                       flags = swf_GetBits(tag, 1);
+                       if(flags) { //straight edge
+                           int n = swf_GetBits(tag, 4) + 2;
+                           if(swf_GetBits(tag, 1)) { //line flag
+                               int x,y;
+                               x = swf_GetSBits(tag, n); //delta x
+                               y = swf_GetSBits(tag, n); //delta y
+                               DEBUG_ENUMERATE printf("line %f %f\n",x/20.0,y/20.0);
+                           } else {
+                               int v=swf_GetBits(tag, 1);
+                               int d;
+                               d = swf_GetSBits(tag, n); //vert/horz
+                               DEBUG_ENUMERATE printf("%s %f\n",v?"vertical":"horizontal", d/20.0);
+                           }
+                       } else { //curved edge
+                           int n = swf_GetBits(tag, 4) + 2;
+                           int x1,y1,x2,y2;
+                           x1 = swf_GetSBits(tag, n);
+                           y1 = swf_GetSBits(tag, n);
+                           x2 = swf_GetSBits(tag, n);
+                           y2 = swf_GetSBits(tag, n);
+                           DEBUG_ENUMERATE printf("curve %f %f %f %f\n", x1/20.0, y1/20.0, x2/20.0, y2/20.0);
+                       }
+                   }
+               }
+           }
+       }
+       break;
+       default:
+       break;
+    }
+}
+
+void callbackCount(TAG * t,int pos, void*ptr)
+{
+    (*(int*)ptr)++;
+    DEBUG_ENUMERATE printf("callback(%d) %d\n", pos, *(U16*)&t->data[pos]);
+}
+
+void callbackFillin(TAG * t,int pos, void*ptr)
+{
+    **(int**)ptr = pos;
+    (*(int**)ptr)++;
+    DEBUG_ENUMERATE printf("callback(%d) %d\n", pos, *(U16*)&t->data[pos]);
+}
+
+int swf_GetNumUsedIDs(TAG * t)
+{
+    int num = 0;
+    enumerateUsedIDs(t, 0, callbackCount, &num);
+    return num;
+}
+
+void swf_GetUsedIDs(TAG * t, int * positions)
+{
+    int * ptr = positions;
+    enumerateUsedIDs(t, 0, callbackFillin, &ptr);
+}
+
+void swf_Relocate (SWF*swf, char*bitmap)
+{
+    TAG*tag;
+    int slaveids[65536];
+    memset(slaveids, -1, sizeof(slaveids));
+    tag = swf->firstTag;
+    while(tag)
+    {
+       int num; 
+       int *ptr;
+       int t;
+
+       if(swf_isDefiningTag(tag))
+       {
+           int newid;
+           int id;
+           
+           id = swf_GetDefineID(tag); //own id
+
+           if(!bitmap[id]) { //free
+               newid = id;
+           }
+           else {
+               newid = 0;
+               for (t=1;t<65536;t++)
+               {
+                   if(!bitmap[t])
+                   {
+                       newid = t;
+                       break;
+                   }
+               }
+           }
+           bitmap[newid] = 1;
+           slaveids[id] = newid;
+
+           swf_SetDefineID(tag, newid);
+       } 
+       
+       num = swf_GetNumUsedIDs(tag);
+       ptr = malloc(sizeof(int)*num);
+       swf_GetUsedIDs(tag, ptr);
+
+       for(t=0;t<num;t++) {
+           int id = GET16(&tag->data[ptr[t]]);
+           if(slaveids[id]<0) {
+               fprintf(stderr, "swf_Relocate: Mapping id never encountered before: %d\n", id);
+               return ;
+           }
+           id = slaveids[id];
+           PUT16(&tag->data[ptr[t]], id);
+       }
+       tag=tag->next;
+    }
+}
+