3 Math and matrix functions, misc tools
5 Extension module for the rfxswf library.
6 Part of the swftools package.
8 Copyright (c) 2000, 2001 Rainer Böhme <rfxswf@reflex-studio.de>
10 This program is free software; you can redistribute it and/or modify
11 it under the terms of the GNU General Public License as published by
12 the Free Software Foundation; either version 2 of the License, or
13 (at your option) any later version.
15 This program is distributed in the hope that it will be useful,
16 but WITHOUT ANY WARRANTY; without even the implied warranty of
17 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
18 GNU General Public License for more details.
20 You should have received a copy of the GNU General Public License
21 along with this program; if not, write to the Free Software
22 Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA */
24 // Matrix & Math tools for SWF files
27 SFIXED RFXSWF_SP(SFIXED a1,SFIXED a2,SFIXED b1,SFIXED b2)
29 a = (S64)a1*(S64)b1+(S64)a2*(S64)b2;
30 return (SFIXED)(a>>16);
32 SFIXED RFXSWF_QFIX(int zaehler,int nenner) // bildet Quotient von zwei INTs in SFIXED
33 { S64 z = zaehler<<16;
34 S64 a = z/(S64)nenner;
39 MATRIX * swf_MatrixJoin(MATRIX * d,MATRIX * s1,MATRIX * s2)
42 if (!s1) return (s2)?(MATRIX *)memcpy(d,s2,sizeof(MATRIX)):NULL;
43 if (!s2) return (MATRIX *)memcpy(d,s1,sizeof(MATRIX));
45 d->tx = s1->tx + s2->tx;
46 d->ty = s1->ty + s2->ty;
48 d->sx = RFXSWF_SP(s1->sx,s1->r1,s2->sx,s2->r0);
49 d->sy = RFXSWF_SP(s1->r0,s1->sy,s2->r1,s2->sy);
50 d->r0 = RFXSWF_SP(s1->r0,s1->sy,s2->sx,s2->r0);
51 d->r1 = RFXSWF_SP(s1->sx,s1->r1,s2->r1,s2->sy);
58 MATRIX * swf_MatrixMapTriangle(MATRIX * m,int dx,int dy,int x0,int y0,
59 int x1,int y1,int x2,int y2)
66 if ((!dx)||(!dy)) return NULL; // check DIV by zero
70 m->sx = RFXSWF_QFIX(dx1,dx);
71 m->sy = RFXSWF_QFIX(dy2,dy);
72 m->r0 = RFXSWF_QFIX(dy1,dx);
73 m->r1 = RFXSWF_QFIX(dx2,dy);
78 void swf_SetDefineID(TAG * tag, U16 newid)
80 int oldlen = tag->len;
82 swf_SetU16(tag, newid); /* set defining ID */
86 U16 swf_GetDefineID(TAG * t)
91 oldTagPos = swf_GetTagPos(t);
94 switch (swf_GetTagID(t))
95 { case ST_DEFINESHAPE:
98 case ST_DEFINEMORPHSHAPE:
99 case ST_DEFINEEDITTEXT:
101 case ST_DEFINEBITSJPEG2:
102 case ST_DEFINEBITSJPEG3:
103 case ST_DEFINEBITSLOSSLESS:
104 case ST_DEFINEBITSLOSSLESS2:
105 case ST_DEFINEBUTTON:
106 case ST_DEFINEBUTTON2:
107 case ST_DEFINEBUTTONCXFORM: //pseudodefine
108 case ST_DEFINEBUTTONSOUND: //pseudodefine
111 case ST_DEFINEFONTINFO: //pseudodefine
112 case ST_DEFINEFONTINFO2: //pseudodefine
116 case ST_DEFINESPRITE:
118 case ST_DEFINEVIDEOSTREAM:
119 case ST_VIDEOFRAME: //pseudodefine
120 case ST_NAMECHARACTER: //pseudodefine
125 swf_SetTagPos(t,oldTagPos);
130 SRECT swf_GetDefineBBox(TAG * t)
136 oldTagPos = swf_GetTagPos(t);
141 switch (swf_GetTagID(t))
142 { case ST_DEFINESHAPE:
143 case ST_DEFINESHAPE2:
144 case ST_DEFINESHAPE3:
145 case ST_DEFINEEDITTEXT:
148 case ST_DEFINEVIDEOSTREAM:
152 case ST_DEFINEMORPHSHAPE:
156 swf_ExpandRect2(&b1, &b2);
158 case ST_DEFINEBITSLOSSLESS:
159 case ST_DEFINEBITSLOSSLESS2:
161 case ST_DEFINEBITSJPEG2:
162 case ST_DEFINEBITSJPEG3:
167 swf_SetTagPos(t,oldTagPos);
172 U16 swf_GetPlaceID(TAG * t)
177 oldTagPos = swf_GetTagPos(t);
180 switch (swf_GetTagID(t))
181 { case ST_PLACEOBJECT:
182 case ST_REMOVEOBJECT:
183 case ST_FREECHARACTER:
188 case ST_PLACEOBJECT2:
189 { U8 flags = swf_GetU8(t);
190 U16 d = swf_GetU16(t);
191 id = (flags&PF_CHAR)?swf_GetU16(t):id;
196 swf_SetTagPos(t,oldTagPos);
201 static int swf_definingtagids[] =
214 ST_DEFINEBITSLOSSLESS,
215 ST_DEFINEBITSLOSSLESS2,
221 ST_DEFINEVIDEOSTREAM,
225 // tags which may be used inside a sprite definition
226 static int swf_spritetagids[] =
231 ST_REMOVEOBJECT2, //?
242 static int swf_pseudodefiningtagids[] =
246 ST_DEFINEBUTTONCXFORM,
247 ST_DEFINEBUTTONSOUND,
255 U8 swf_isAllowedSpriteTag(TAG * tag)
259 while(swf_spritetagids[t]>=0)
261 if(swf_spritetagids[t] == id)
268 U8 swf_isDefiningTag(TAG * tag)
272 while(swf_definingtagids[t]>=0)
274 if(swf_definingtagids[t] == id)
281 U8 swf_isPseudoDefiningTag(TAG * tag)
285 while(swf_pseudodefiningtagids[t]>=0)
287 if(swf_pseudodefiningtagids[t] == id)
294 int swf_GetDepth(TAG * t)
298 oldTagPos = swf_GetTagPos(t);
301 switch (swf_GetTagID(t))
302 { case ST_PLACEOBJECT:
303 case ST_REMOVEOBJECT:
305 depth = swf_GetU16(t);
307 case ST_REMOVEOBJECT2:
308 depth = swf_GetU16(t);
310 case ST_PLACEOBJECT2:
311 { U8 flags = swf_GetU8(t);
312 depth = swf_GetU16(t);
316 depth = swf_GetU16(t);
319 swf_SetTagPos(t,oldTagPos);
323 void swf_SetDepth(TAG * t, U16 depth)
325 switch (swf_GetTagID(t))
326 { case ST_PLACEOBJECT:
327 case ST_REMOVEOBJECT:
328 PUT16(t->data, depth);
330 case ST_REMOVEOBJECT2:
331 PUT16(t->data, depth);
333 case ST_PLACEOBJECT2:
334 PUT16(&t->data[1], depth);
337 PUT16(t->data, depth);
340 fprintf(stderr, "rfxswf: Error: tag %d has no depth\n", t->id);
344 char* swf_GetName(TAG * t)
350 oldTagPos = swf_GetTagPos(t);
352 switch(swf_GetTagID(t))
355 name = &t->data[swf_GetTagPos(t)];
357 case ST_PLACEOBJECT2: {
358 U8 flags = swf_GetU8(t);
359 swf_GetU16(t); //depth;
363 swf_GetMatrix(t, &m);
365 swf_GetCXForm(t, &c, 1);
368 if(flags&PF_CLIPACTION)
371 swf_ResetReadBits(t);
372 name = &t->data[swf_GetTagPos(t)];
377 swf_SetTagPos(t,oldTagPos);
381 /* used in enumerateUsedIDs */
382 void swf_GetMorphGradient(TAG * tag, GRADIENT * gradient1, GRADIENT * gradient2)
392 gradient2->num = swf_GetU8(tag);
393 for(t=0;t<gradient1->num;t++)
398 gradient1->ratios[t] = swf_GetU8(tag);
399 swf_GetRGBA(tag, &gradient1->rgba[t]);
400 gradient2->ratios[t] = swf_GetU8(tag);
401 swf_GetRGBA(tag, &gradient2->rgba[t]);
405 #define DEBUG_ENUMERATE if(0)
407 static void enumerateUsedIDs_styles(TAG * tag, void (*callback)(TAG*, int, void*), void*callback_data, int num, int morph)
411 count = swf_GetU8(tag);
412 if(count == 0xff && num>1) // defineshape2,3 only
413 count = swf_GetU16(tag);
419 swf_ResetReadBits(tag);
420 type = swf_GetU8(tag); //type
423 {swf_GetRGBA(tag, NULL);if(morph) swf_GetRGBA(tag, NULL);}
425 {swf_GetRGB(tag, NULL);if(morph) swf_GetRGB(tag, NULL);}
427 else if(type == 0x10 || type == 0x12)
429 swf_ResetReadBits(tag);
430 swf_GetMatrix(tag, NULL);
432 swf_GetMatrix(tag, NULL);
433 swf_ResetReadBits(tag);
435 swf_GetMorphGradient(tag, NULL, NULL);
437 swf_GetGradient(tag, NULL, /*alpha*/ num>=3?1:0);
439 else if(type == 0x40 || type == 0x41)
441 swf_ResetReadBits(tag);
443 if(tag->data[tag->pos] != 0xff ||
444 tag->data[tag->pos+1] != 0xff)
445 (callback)(tag, tag->pos, callback_data);
448 swf_ResetReadBits(tag);
449 swf_GetMatrix(tag, NULL);
451 swf_GetMatrix(tag, NULL);
454 fprintf(stderr, "rfxswf:swftools.c Unknown fillstyle:0x%02x\n",type);
457 swf_ResetReadBits(tag);
458 count = swf_GetU8(tag); // line style array
460 count = swf_GetU16(tag);
467 {swf_GetRGBA(tag, NULL);if(morph) swf_GetRGBA(tag, NULL);}
469 {swf_GetRGB(tag, NULL);if(morph) swf_GetRGB(tag, NULL);}
473 void enumerateUsedIDs(TAG * tag, int base, void (*callback)(TAG*, int, void*), void*callback_data)
476 swf_ResetReadBits(tag);
480 case ST_DEFINEBUTTONCXFORM: {
482 callback(tag, tag->pos + base, callback_data);
485 callback(tag, tag->pos + base, callback_data);
486 swf_GetU16(tag); //sound id
487 flags = swf_GetU8(tag);
489 swf_GetU32(tag); // in point
491 swf_GetU32(tag); // out points
493 swf_GetU16(tag); // loop count
496 int npoints = swf_GetU8(tag);
498 for(s=0;s<npoints;s++)
507 case ST_DEFINEBUTTONSOUND:
508 callback(tag, tag->pos + base, callback_data); //button id
511 case ST_EXPORTASSETS: {
512 int num = swf_GetU16(tag);
515 callback(tag, tag->pos + base, callback_data); //button id
516 swf_GetU16(tag); //id
517 while(swf_GetU8(tag)); //name
521 case ST_FREECHARACTER: /* unusual tags, which all start with an ID */
522 case ST_NAMECHARACTER:
523 case ST_GENERATORTEXT:
524 callback(tag, tag->pos + base, callback_data);
527 callback(tag, tag->pos + base, callback_data);
529 case ST_PLACEOBJECT2:
530 // only if placeflaghascharacter
531 if(!(tag->data[0]&2))
533 callback(tag, 3 + base, callback_data);
535 case ST_REMOVEOBJECT:
536 callback(tag, tag->pos + base, callback_data);
539 callback(tag, tag->pos + base, callback_data);
541 case ST_DEFINESPRITE: {
543 break; // sprite is expanded
545 swf_GetU16(tag); // id
546 swf_GetU16(tag); // framenum
549 U16 flags = swf_GetU16(tag);
552 TAG *tag2 = swf_InsertTag(NULL, id);
555 len = swf_GetU32(tag);
558 tag2->len = tag2->memsize = len;
559 tag2->data = malloc(len);
560 memcpy(tag2->data, &tag->data[tag->pos], len);
561 /* I never saw recursive sprites, but they are (theoretically)
562 possible, so better add base here again */
563 enumerateUsedIDs(tag2, tag->pos + base, callback, callback_data);
565 swf_GetBlock(tag, NULL, len);
569 case ST_DEFINEBUTTON2: // has some font ids in the button records
572 case ST_DEFINEBUTTON: {
573 swf_GetU16(tag); //button id
577 swf_GetU8(tag); //flag
578 offset = swf_GetU16(tag); //offset
583 if(!swf_GetU8(tag)) //flags
585 callback(tag, tag->pos + base, callback_data);
586 swf_GetU16(tag); //char
587 swf_GetU16(tag); //layer
588 swf_ResetReadBits(tag);
589 swf_GetMatrix(tag, NULL);
591 swf_ResetReadBits(tag);
592 swf_GetCXForm(tag, NULL, 1);
598 case ST_DEFINEEDITTEXT: {
600 swf_GetU16(tag); //id
601 swf_GetRect(tag, NULL); //bounding box
602 swf_ResetReadBits(tag);
603 flags1 = swf_GetU8(tag);
604 flags2 = swf_GetU8(tag);
606 callback(tag, tag->pos + base, callback_data);
611 case ST_DEFINETEXT: {
612 int glyphbits, advancebits;
614 id = swf_GetU16(tag); //id
615 swf_GetRect(tag, NULL); //bounding box
616 swf_ResetReadBits(tag);
617 swf_GetMatrix(tag, NULL); //matrix
618 swf_ResetReadBits(tag);
619 glyphbits = swf_GetU8(tag); //glyphbits
620 advancebits = swf_GetU8(tag); //advancebits
623 swf_ResetReadBits(tag);
624 flags = swf_GetBits(tag, 8);
626 if(flags & 128) // text style record
628 swf_ResetReadBits(tag);
629 if(flags & 8) { // hasfont
630 callback(tag, tag->pos + base, callback_data);
631 id = swf_GetU16(tag);
633 if(flags & 4) { // hascolor
634 if(num==1) swf_GetRGB(tag, NULL);
635 else swf_GetRGBA(tag, NULL);
637 if(flags & 2) { //has x offset
638 swf_ResetReadBits(tag);
641 if(flags & 1) { //has y offset
642 swf_ResetReadBits(tag);
645 if(flags & 8) { //has height
646 swf_ResetReadBits(tag);
649 } else { // glyph record
651 swf_ResetReadBits(tag);
652 for(t=0;t<flags;t++) {
653 swf_GetBits(tag, glyphbits);
654 swf_GetBits(tag, advancebits);
661 case ST_DEFINEFONTINFO:
662 case ST_DEFINEFONTINFO2:
664 callback(tag, tag->pos + base, callback_data);
666 case ST_DEFINEVIDEOSTREAM:
669 case ST_DOINITACTION:
670 callback(tag, tag->pos + base, callback_data);
673 case ST_DEFINEMORPHSHAPE:
674 case ST_DEFINESHAPE3:
676 case ST_DEFINESHAPE2:
678 case ST_DEFINESHAPE: {
684 if(tag->id == ST_DEFINEMORPHSHAPE) {
689 id = swf_GetU16(tag); // id;
690 swf_GetRect(tag, NULL); // bounds
692 swf_ResetReadBits(tag);
693 swf_GetRect(tag, NULL); // bounds2
694 swf_GetU32(tag); //offset to endedges
697 DEBUG_ENUMERATE printf("Tag:%d Name:%s ID:%d\n", tag->id, swf_TagGetName(tag), id);
699 enumerateUsedIDs_styles(tag, callback, callback_data, num, morph);
700 DEBUG_ENUMERATE printf("-------\n");
701 while(--numshapes>=0) /* morph shapes define two shapes */
703 DEBUG_ENUMERATE printf("shape:%d\n", numshapes);
704 fillbits = swf_GetBits(tag, 4);
705 linebits = swf_GetBits(tag, 4);
706 DEBUG_ENUMERATE printf("%d %d\n", fillbits, linebits);
707 swf_ResetReadBits(tag);
710 flags = swf_GetBits(tag, 1);
711 if(!flags) { //style change
712 flags = swf_GetBits(tag, 5);
716 int n = swf_GetBits(tag, 5);
718 x = swf_GetBits(tag, n); //x
719 y = swf_GetBits(tag, n); //y
720 DEBUG_ENUMERATE printf("move %f %f\n",x/20.0,y/20.0);
722 if(flags&2) { //fill0
724 fill0 = swf_GetBits(tag, fillbits);
725 DEBUG_ENUMERATE printf("fill0 %d\n", fill0);
727 if(flags&4) { //fill1
729 fill1 = swf_GetBits(tag, fillbits);
730 DEBUG_ENUMERATE printf("fill1 %d\n", fill1);
732 if(flags&8) { //linestyle
734 line = swf_GetBits(tag, linebits);
735 DEBUG_ENUMERATE printf("linestyle %d\n",line);
738 DEBUG_ENUMERATE printf("more fillstyles\n");
739 enumerateUsedIDs_styles(tag, callback, callback_data, num, 0);
740 fillbits = swf_GetBits(tag, 4);
741 linebits = swf_GetBits(tag, 4);
744 flags = swf_GetBits(tag, 1);
745 if(flags) { //straight edge
746 int n = swf_GetBits(tag, 4) + 2;
747 if(swf_GetBits(tag, 1)) { //line flag
749 x = swf_GetSBits(tag, n); //delta x
750 y = swf_GetSBits(tag, n); //delta y
751 DEBUG_ENUMERATE printf("line %f %f\n",x/20.0,y/20.0);
753 int v=swf_GetBits(tag, 1);
755 d = swf_GetSBits(tag, n); //vert/horz
756 DEBUG_ENUMERATE printf("%s %f\n",v?"vertical":"horizontal", d/20.0);
758 } else { //curved edge
759 int n = swf_GetBits(tag, 4) + 2;
761 x1 = swf_GetSBits(tag, n);
762 y1 = swf_GetSBits(tag, n);
763 x2 = swf_GetSBits(tag, n);
764 y2 = swf_GetSBits(tag, n);
765 DEBUG_ENUMERATE printf("curve %f %f %f %f\n", x1/20.0, y1/20.0, x2/20.0, y2/20.0);
777 void callbackCount(TAG * t,int pos, void*ptr)
780 DEBUG_ENUMERATE printf("callback(%d) %d\n", pos, *(U16*)&t->data[pos]);
783 void callbackFillin(TAG * t,int pos, void*ptr)
787 DEBUG_ENUMERATE printf("callback(%d) %d\n", pos, *(U16*)&t->data[pos]);
790 int swf_GetNumUsedIDs(TAG * t)
793 enumerateUsedIDs(t, 0, callbackCount, &num);
797 void swf_GetUsedIDs(TAG * t, int * positions)
799 int * ptr = positions;
800 enumerateUsedIDs(t, 0, callbackFillin, &ptr);
803 void swf_Relocate (SWF*swf, char*bitmap)
807 memset(slaveids, -1, sizeof(slaveids));
815 if(swf_isDefiningTag(tag))
820 id = swf_GetDefineID(tag); //own id
822 if(!bitmap[id]) { //free
827 for (t=1;t<65536;t++)
837 slaveids[id] = newid;
839 swf_SetDefineID(tag, newid);
842 num = swf_GetNumUsedIDs(tag);
843 ptr = malloc(sizeof(int)*num);
844 swf_GetUsedIDs(tag, ptr);
847 int id = GET16(&tag->data[ptr[t]]);
849 fprintf(stderr, "swf_Relocate: Mapping id never encountered before: %d\n", id);
853 PUT16(&tag->data[ptr[t]], id);
859 void swf_RelocateDepth(SWF*swf, char*bitmap)
864 for(nr=65535;nr>=0;nr--) {
868 // now nr is the highest used depth. So we start
869 // assigning depths at nr+1
874 int depth = swf_GetDepth(tag);
876 int newdepth = depth+nr;
878 fprintf(stderr, "Couldn't relocate depths: too large values\n");
881 swf_SetDepth(tag, newdepth);
887 TAG* swf_Concatenate (TAG*list1,TAG*list2)
889 TAG*tag=0,*lasttag=0;
891 char depthmap[65536];
893 memset(bitmap, 0, sizeof(bitmap));
894 memset(depthmap, 0, sizeof(depthmap));
895 memset(&swf1, 0, sizeof(swf1));
896 memset(&swf2, 0, sizeof(swf2));
898 swf1.firstTag = list1;
900 swf2.firstTag = list2;
905 if(!swf_isDefiningTag(tag)) {
906 int id = swf_GetDefineID(tag);
909 if(tag->id == ST_PLACEOBJECT ||
910 tag->id == ST_PLACEOBJECT2) {
911 int depth = swf_GetDepth(tag);
914 if(tag->id == ST_REMOVEOBJECT ||
915 tag->id == ST_REMOVEOBJECT2) {
916 int depth = swf_GetDepth(tag);
922 swf_Relocate(&swf2, bitmap);
923 swf_RelocateDepth(&swf2, depthmap);
924 lasttag->next = swf2.firstTag;
925 swf2.firstTag->prev = lasttag;
927 return swf1.firstTag;