+char* what;
+char* testfunc(char*str)
+{
+ printf("%s: %s\n", what, str);
+ return 0;
+}
+
+void dumpButton2Actions(TAG*tag, char*prefix)
+{
+ U32 oldTagPos;
+ U32 offsetpos;
+ U32 condition;
+
+ oldTagPos = swf_GetTagPos(tag);
+
+ // scan DefineButton2 Record
+
+ swf_GetU16(tag); // Character ID
+ swf_GetU8(tag); // Flags;
+
+ offsetpos = swf_GetTagPos(tag); // first offset
+ swf_GetU16(tag);
+
+ while (swf_GetU8(tag)) // state -> parse ButtonRecord
+ { swf_GetU16(tag); // id
+ swf_GetU16(tag); // layer
+ swf_GetMatrix(tag,NULL); // matrix
+ swf_GetCXForm(tag,NULL,1); // cxform
+ }
+
+ while(offsetpos)
+ { U8 a;
+ ActionTAG*actions;
+
+ if(tag->pos >= tag->len)
+ break;
+
+ offsetpos = swf_GetU16(tag);
+ condition = swf_GetU16(tag); // condition
+
+ actions = swf_ActionGet(tag);
+ printf("%s condition %04x\n", prefix, condition);
+ swf_DumpActions(actions, prefix);
+ }
+
+ swf_SetTagPos(tag,oldTagPos);
+ return;
+}
+
+void dumpButtonActions(TAG*tag, char*prefix)
+{
+ ActionTAG*actions;
+ swf_GetU16(tag); // id
+ while (swf_GetU8(tag)) // state -> parse ButtonRecord
+ { swf_GetU16(tag); // id
+ swf_GetU16(tag); // layer
+ swf_GetMatrix(tag,NULL); // matrix
+ }
+ actions = swf_ActionGet(tag);
+ swf_DumpActions(actions, prefix);
+}
+
+#define ET_HASTEXT 32768
+#define ET_WORDWRAP 16384
+#define ET_MULTILINE 8192
+#define ET_PASSWORD 4096
+#define ET_READONLY 2048
+#define ET_HASTEXTCOLOR 1024
+#define ET_HASMAXLENGTH 512
+#define ET_HASFONT 256
+#define ET_X3 128
+#define ET_X2 64
+#define ET_HASLAYOUT 32
+#define ET_NOSELECT 16
+#define ET_BORDER 8
+#define ET_X1 4
+#define ET_X0 2
+#define ET_USEOUTLINES 1
+
+SWF swf;
+int fontnum = 0;
+SWFFONT**fonts;
+
+void textcallback(void*self, int*glyphs, int*ypos, int nr, int fontid, int fontsize, int startx, int starty, RGBA*color)
+{
+ int font=-1,t;
+ printf(" <%2d glyphs in font %2d, color #%02x%02x%02x%02x> ",nr, fontid, color->r, color->g, color->b, color->a);
+ for(t=0;t<fontnum;t++)
+ {
+ if(fonts[t]->id == fontid) {
+ font = t;
+ break;
+ }
+ }
+
+ for(t=0;t<nr;t++)
+ {
+ unsigned char a;
+ if(font>=0) {
+ if(glyphs[t] >= fonts[font]->numchars /*glyph is in range*/
+ || !fonts[font]->glyph2ascii /* font has ascii<->glyph mapping */
+ ) a = glyphs[t];
+ else
+ a = fonts[font]->glyph2ascii[glyphs[t]];
+ } else {
+ a = glyphs[t];
+ }
+ if(a>=32)
+ printf("%c", a);
+ else
+ printf("\\x%x", (int)a);
+ }
+ printf("\n");
+}
+
+void handleText(TAG*tag)
+{
+ printf("\n");
+ swf_ParseDefineText(tag,textcallback, 0);
+}
+
+void handleDefineSound(TAG*tag)
+{
+ U16 id = swf_GetU16(tag);
+ U8 flags = swf_GetU8(tag);
+ int compression = (flags>>4)&3;
+ int rate = (flags>>2)&3;
+ int bits = flags&2?16:8;
+ int stereo = flags&1;
+ printf(" (");
+ if(compression == 0) printf("Raw ");
+ else if(compression == 1) printf("ADPCM ");
+ else if(compression == 2) printf("MP3 ");
+ else printf("? ");
+ if(rate == 0) printf("5.5Khz ");
+ if(rate == 1) printf("11Khz ");
+ if(rate == 2) printf("22Khz ");
+ if(rate == 3) printf("44Khz ");
+ printf("%dBit ", bits);
+ if(stereo) printf("stereo");
+ else printf("mono");
+ printf(")");
+}
+
+void handleDefineBits(TAG*tag)
+{
+ U16 id;
+ U8 mode;
+ U16 width,height;
+ int bpp;
+ id = swf_GetU16(tag);
+ mode = swf_GetU8(tag);
+ width = swf_GetU16(tag);
+ height = swf_GetU16(tag);
+ printf(" image %dx%d",width,height);
+ if(mode == 3) printf(" (8 bpp)");
+ else if(mode == 4) printf(" (16 bpp)");
+ else if(mode == 5) printf(" (32 bpp)");
+ else printf(" (? bpp)");
+}
+
+void handleEditText(TAG*tag)
+{
+ U16 id ;
+ U16 flags;
+ int t;
+ id = swf_GetU16(tag);
+ swf_GetRect(tag,0);
+ //swf_ResetReadBits(tag);
+ if (tag->readBit)
+ { tag->pos++;
+ tag->readBit = 0;
+ }
+ flags = swf_GetBits(tag,16);
+ if(flags & ET_HASFONT) {
+ swf_GetU16(tag); //font
+ swf_GetU16(tag); //fontheight
+ }
+ if(flags & ET_HASTEXTCOLOR) {
+ swf_GetU8(tag); //rgba
+ swf_GetU8(tag);
+ swf_GetU8(tag);
+ swf_GetU8(tag);
+ }
+ if(flags & ET_HASMAXLENGTH) {
+ swf_GetU16(tag); //maxlength
+ }
+ if(flags & ET_HASLAYOUT) {
+ swf_GetU8(tag); //align
+ swf_GetU16(tag); //left margin
+ swf_GetU16(tag); //right margin
+ swf_GetU16(tag); //indent
+ swf_GetU16(tag); //leading
+ }
+ printf(" variable \"%s\"", &tag->data[tag->pos]);
+
+ if(flags & (ET_X1 | ET_X2 | ET_X3 | ET_X0))
+ {
+ printf(" undefined flags: %d%d%d%d",
+ (flags&ET_X0?1:0),
+ (flags&ET_X1?1:0),
+ (flags&ET_X2?1:0),
+ (flags&ET_X3?1:0));
+ }
+
+ while(tag->data[tag->pos++]);
+ if(flags & ET_HASTEXT)
+ // printf(" text \"%s\"\n", &tag->data[tag->pos]) //TODO
+ ;
+}
+void printhandlerflags(U32 handlerflags)
+{
+ if(handlerflags&1) printf("[on load]");
+ if(handlerflags&2) printf("[enter frame]");
+ if(handlerflags&4) printf("[unload]");
+ if(handlerflags&8) printf("[mouse move]");
+ if(handlerflags&16) printf("[mouse down]");
+ if(handlerflags&32) printf("[mouse up]");
+ if(handlerflags&64) printf("[key down]");
+ if(handlerflags&128) printf("[key up]");
+
+ if(handlerflags&256) printf("[data]");
+ if(handlerflags&512) printf("[initialize]");
+ if(handlerflags&1024) printf("[mouse press]");
+ if(handlerflags&2048) printf("[mouse release]");
+ if(handlerflags&4096) printf("[mouse release outside]");
+ if(handlerflags&8192) printf("[mouse rollover]");
+ if(handlerflags&16384) printf("[mouse rollout]");
+ if(handlerflags&32768) printf("[mouse drag over]");
+
+ if(handlerflags&0x10000) printf("[mouse drag out]");
+ if(handlerflags&0x20000) printf("[key press]");
+ if(handlerflags&0x40000) printf("[construct even]");
+ if(handlerflags&0xfff80000) printf("[???]");
+}
+void handleVideoStream(TAG*tag, char*prefix)
+{
+ U16 id = swf_GetU16(tag);
+ U16 frames = swf_GetU16(tag);
+ U16 width = swf_GetU16(tag);
+ U16 height = swf_GetU16(tag);
+ U8 flags = swf_GetU8(tag); //5-2(videopacket 01=off 10=on)-1(smoothing 1=on)
+ U8 codec = swf_GetU8(tag);
+ printf(" (%d frames, %dx%d", frames, width, height);
+ if(flags&1)
+ printf(" smoothed");
+ if(codec == 2)
+ printf(" sorenson h.263)");
+ else
+ printf(" codec 0x%02x)", codec);
+}
+void handleVideoFrame(TAG*tag, char*prefix)
+{
+ U32 code, version, reference, sizeflags;
+ U32 width=0, height=0;
+ U8 type;
+ U16 id = swf_GetU16(tag);
+ U16 frame = swf_GetU16(tag);
+ U8 deblock,flags, tmp, bit;
+ U32 quantizer;
+ char*types[] = {"I-frame", "P-frame", "disposable P-frame", "<reserved>"};
+ printf(" (frame %d) ", frame);
+
+ /* video packet follows */
+ code = swf_GetBits(tag, 17);
+ version = swf_GetBits(tag, 5);
+ reference = swf_GetBits(tag, 8);
+
+ sizeflags = swf_GetBits(tag, 3);
+ switch(sizeflags)
+ {
+ case 0: width = swf_GetBits(tag, 8); height = swf_GetBits(tag, 8); break;
+ case 1: width = swf_GetBits(tag, 16); height = swf_GetBits(tag, 16); break;
+ case 2: width = 352; height = 288; break;
+ case 3: width = 176; height = 144; break;
+ case 4: width = 128; height = 96; break;
+ case 5: width = 320; height = 240; break;
+ case 6: width = 160; height = 120; break;
+ case 7: width = -1; height = -1;/*reserved*/ break;
+ }
+ printf("%dx%d ", width, height);
+ type = swf_GetBits(tag, 2);
+ printf("%s", types[type]);
+
+ deblock = swf_GetBits(tag, 1);
+ if(deblock)
+ printf(" deblock ", deblock);
+ quantizer = swf_GetBits(tag, 5);
+ printf(" quant: %d ", quantizer);
+}
+
+void handlePlaceObject2(TAG*tag, char*prefix)
+{
+ U8 flags = swf_GetU8(tag);
+ MATRIX m;
+ CXFORM cx;
+ char pstr[3][160];
+ int ppos[3] = {0,0,0};
+ swf_GetU16(tag); //depth
+
+ //flags&1: move
+ if(flags&2) swf_GetU16(tag); //id
+ if(flags&4) {
+ swf_GetMatrix(tag,&m);
+ if(placements) {
+ ppos[0] += sprintf(pstr[0], "| Matrix ");
+ ppos[1] += sprintf(pstr[1], "| %5.3f %5.3f %6.2f ", m.sx/65536.0, m.r1/65536.0, m.tx/20.0);
+ ppos[2] += sprintf(pstr[2], "| %5.3f %5.3f %6.2f ", m.r0/65536.0, m.sy/65536.0, m.ty/20.0);
+ }
+ }
+ if(flags&8) {
+ swf_GetCXForm(tag, &cx, 1);
+ if(placements) {
+ ppos[0] += sprintf(pstr[0]+ppos[0], "| CXForm r g b a ");
+ ppos[1] += sprintf(pstr[1]+ppos[1], "| mul %4.1f %4.1f %4.1f %4.1f ", cx.r0/256.0, cx.g0/256.0, cx.b0/256.0, cx.a0/256.0);
+ ppos[2] += sprintf(pstr[2]+ppos[2], "| add %4d %4d %4d %4d ", cx.r1, cx.g1, cx.b1, cx.a1);
+ }
+ }
+ if(flags&16) {
+ U16 ratio = swf_GetU16(tag); //ratio
+ if(placements) {
+ ppos[0] += sprintf(pstr[0]+ppos[0], "| Ratio ");
+ ppos[1] += sprintf(pstr[1]+ppos[1], "| %-5d ", ratio);
+ ppos[2] += sprintf(pstr[2]+ppos[2], "| ");
+ }
+ }
+ if(flags&64) {
+ U16 clip = swf_GetU16(tag); //clip
+ if(placements) {
+ ppos[0] += sprintf(pstr[0]+ppos[0], "| Clip ");
+ ppos[1] += sprintf(pstr[1]+ppos[1], "| %-5d ", clip);
+ ppos[2] += sprintf(pstr[2]+ppos[2], "| ");
+ }
+ }
+ if(flags&32) { while(swf_GetU8(tag)); }
+ if(placements && ppos[0]) {
+ printf("\n");
+ printf("%s %s\n", prefix, pstr[0]);
+ printf("%s %s\n", prefix, pstr[1]);
+ printf("%s %s", prefix, pstr[2]);
+ }
+ if(flags&128) {
+ if (action) {
+ U16 reserved;
+ U32 globalflags;
+ U32 handlerflags;
+ char is32 = 0;
+ printf("\n");
+ reserved = swf_GetU16(tag); // must be 0
+ globalflags = swf_GetU16(tag); //TODO: 32 if version>=6
+ if(reserved) {
+ printf("Unknown parameter field not zero: %04x\n", reserved);
+ return;
+ }
+ printf("global flags: %04x\n", globalflags);
+
+ handlerflags = swf_GetU16(tag); //TODO: 32 if version>=6
+ if(!handlerflags) {
+ handlerflags = swf_GetU32(tag);
+ is32 = 1;
+ }
+ while(handlerflags) {
+ int length;
+ int t;
+ ActionTAG*a;
+
+ globalflags &= ~handlerflags;
+ printf("%s flags %08x ",prefix, handlerflags);
+ printhandlerflags(handlerflags);
+ length = swf_GetU32(tag);
+ printf(", %d bytes actioncode\n",length);
+ a = swf_ActionGet(tag);
+ swf_DumpActions(a,prefix);
+ swf_ActionFree(a);
+
+ handlerflags = is32?swf_GetU32(tag):swf_GetU16(tag); //TODO: 32 if version>=6
+ }
+ if(globalflags) // should go to sterr.
+ printf("ERROR: unsatisfied handlerflags: %02x\n", globalflags);
+ } else {
+ printf(" has action code\n");
+ }
+ } else printf("\n");
+}
+
+void handlePlaceObject(TAG*tag, char*prefix)
+{
+ TAG*tag2 = swf_InsertTag(0, ST_PLACEOBJECT2);
+
+ U16 id = swf_GetU16(tag);
+ U16 depth = swf_GetU16(tag);
+ MATRIX matrix;
+ CXFORM cxform;
+ swf_GetMatrix(tag, &matrix);
+ swf_GetCXForm(tag, &cxform, 0);
+
+ swf_SetU8(tag2, 14);
+ swf_SetU16(tag2, depth);
+ swf_SetMatrix(tag2, &matrix);
+ swf_SetCXForm(tag2, &cxform, 1);
+
+ handlePlaceObject2(tag2, prefix);
+}
+char stylebuf[256];
+char* fillstyle2str(FILLSTYLE*style)
+{
+ switch(style->type) {
+ case 0x00:
+ sprintf(stylebuf, "SOLID %02x%02x%02x%02x", style->color.r, style->color.g, style->color.b, style->color.a);
+ break;
+ case 0x10: case 0x12:
+ sprintf(stylebuf, "GRADIENT (%d steps)", style->gradient.num);
+ break;
+ case 0x40: case 0x41:
+ /* TODO: display information about that bitmap */
+ sprintf(stylebuf, "BITMAP %d", style->id_bitmap);
+ break;
+ default:
+ sprintf(stylebuf, "UNKNOWN[%02x]",style->type);
+ }
+ return stylebuf;
+}
+char* linestyle2str(LINESTYLE*style)
+{
+ sprintf(stylebuf, "%.2f %02x%02x%02x%02x", style->width/20.0, style->color.r, style->color.g, style->color.b, style->color.a);
+ return stylebuf;
+}
+
+void handleShape(TAG*tag, char*prefix)
+{
+ SHAPE2 shape;
+ SHAPELINE*line;
+ int t,max;
+
+ tag->pos = 0;
+ tag->readBit = 0;
+ swf_ParseDefineShape(tag, &shape);
+
+ max = shape.numlinestyles > shape.numfillstyles?shape.numlinestyles:shape.numfillstyles;
+
+ if(max) printf("%s | fillstyles(%02d) linestyles(%02d)\n",
+ prefix,
+ shape.numfillstyles,
+ shape.numlinestyles
+ );
+ else printf("%s | (Neither line nor fill styles)\n", prefix);
+
+ for(t=0;t<max;t++) {
+ printf("%s", prefix);
+ if(t < shape.numfillstyles) {
+ printf(" | %-2d) %-18.18s", t+1, fillstyle2str(&shape.fillstyles[t]));
+ } else {
+ printf(" ");
+ }
+ if(t < shape.numlinestyles) {
+ printf("%-2d) %s", t+1, linestyle2str(&shape.linestyles[t]));
+ }
+ printf("\n");
+ }
+
+ printf("%s |\n", prefix);
+
+ line = shape.lines;
+ while(line) {
+ printf("%s | fill: %02d/%02d line:%02d - ",
+ prefix,
+ line->fillstyle0,
+ line->fillstyle1,
+ line->linestyle);
+ if(line->type == moveTo) {
+ printf("moveTo %.2f %.2f\n", line->x/20.0, line->y/20.0);
+ } else if(line->type == lineTo) {
+ printf("lineTo %.2f %.2f\n", line->x/20.0, line->y/20.0);
+ } else if(line->type == splineTo) {
+ printf("splineTo (%.2f %.2f) %.2f %.2f\n",
+ line->sx/20.0, line->sy/20.0,
+ line->x/20.0, line->y/20.0
+ );
+ }
+ line = line->next;
+ }
+ printf("%s |\n", prefix);
+}
+
+void fontcallback1(void*self, U16 id,U8 * name)
+{ fontnum++;
+}
+
+void fontcallback2(void*self, U16 id,U8 * name)
+{
+ swf_FontExtract(&swf,id,&fonts[fontnum]);
+ fontnum++;
+}
+
+static U8 printable(U8 a)
+{
+ if(a<32 || a==127) return '.';
+ else return a;
+}
+void hexdumpTag(TAG*tag, char* prefix)
+{
+ int t;
+ char ascii[32];
+ printf(" %s-=> ",prefix);
+ for(t=0;t<tag->len;t++) {
+ printf("%02x ", tag->data[t]);
+ ascii[t&15] = printable(tag->data[t]);
+ if((t && ((t&15)==15)) || (t==tag->len-1))
+ {
+ int s,p=((t)&15)+1;
+ ascii[p] = 0;
+ for(s=p-1;s<16;s++) {
+ printf(" ");
+ }
+ if(t==tag->len-1)
+ printf(" %s\n", ascii);
+ else
+ printf(" %s\n %s-=> ",ascii,prefix);
+ }
+ }
+}
+
+void handleExportAssets(TAG*tag, char* prefix)
+{
+ int num;
+ U16 id;
+ char* name;
+ int t;
+ num = swf_GetU16(tag);
+ for(t=0;t<num;t++)
+ {
+ id = swf_GetU16(tag);
+ name = swf_GetString(tag);
+ printf("%sexports %04d as \"%s\"\n", prefix, id, name);
+ }
+}
+
+void dumperror(const char* format, ...)
+{
+ char buf[1024];
+ va_list arglist;
+
+ va_start(arglist, format);
+ vsprintf(buf, format, arglist);
+ va_end(arglist);
+
+ if(!html && !xy)
+ printf("==== Error: %s ====\n", buf);
+}
+
+static char strbuf[800];
+static int bufpos=0;
+
+char* timestring(double f)
+{
+ int hours = (int)(f/3600);
+ int minutes = (int)((f-hours*3600)/60);
+ int seconds = (int)((f-hours*3600-minutes*60));
+ int useconds = (int)((f-(int)f)*1000+0.5);
+ bufpos+=100;
+ bufpos%=800;
+ sprintf(&strbuf[bufpos], "%02d:%02d:%02d,%03d",hours,minutes,seconds,useconds);
+ return &strbuf[bufpos];
+}
+