b2f00aa8fbba65d0697085911ae13459bec5fa44
[swftools.git] / src / swfdump.c
1 /* swfdump.c
2    Shows the structure of a swf file
3
4    Part of the swftools package.
5    
6    Copyright (c) 2001 Matthias Kramm <kramm@quiss.org>
7  
8    This program is free software; you can redistribute it and/or modify
9    it under the terms of the GNU General Public License as published by
10    the Free Software Foundation; either version 2 of the License, or
11    (at your option) any later version.
12
13    This program is distributed in the hope that it will be useful,
14    but WITHOUT ANY WARRANTY; without even the implied warranty of
15    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
16    GNU General Public License for more details.
17
18    You should have received a copy of the GNU General Public License
19    along with this program; if not, write to the Free Software
20    Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA */
21
22 #include "../config.h"
23
24 #ifdef HAVE_SYS_STAT_H
25 #include <sys/stat.h>
26 #else
27 #undef HAVE_STAT
28 #endif
29
30 #ifdef HAVE_SYS_TYPES_H
31 #include <sys/types.h>
32 #else
33 #undef HAVE_STAT
34 #endif
35
36 #include <unistd.h>
37 #include <stdio.h>
38 #include <fcntl.h>
39 #include <stdarg.h>
40 #include "../lib/rfxswf.h"
41 #include "../lib/args.h"
42
43 static char * filename = 0;
44
45 /* idtab stores the ids which are defined in the file. This allows us
46    to detect errors in the file. (i.e. ids which are defined more than 
47    once */
48 static char idtab[65536];
49 static char * indent = "                ";
50
51 static int placements = 0;
52 static int action = 0;
53 static int html = 0;
54 static int xy = 0;
55 static int showtext = 0;
56 static int hex = 0;
57 static int used = 0;
58
59 struct options_t options[] =
60 {
61  {"D","full"},
62  {"a","action"},
63  {"t","text"},
64  {"X","width"},
65  {"Y","height"},
66  {"f","frames"},
67  {"r","rate"},
68  {"e","html"},
69  {"p","placements"},
70  {"u","used"},
71  {"V","version"},
72  {"d","hex"},
73  {0,0}
74 };
75
76
77 int args_callback_option(char*name,char*val)
78 {
79     if(!strcmp(name, "V")) {
80         printf("swfdump - part of %s %s\n", PACKAGE, VERSION);
81         exit(0);
82     } 
83     else if(name[0]=='a') {
84         action = 1;
85         return 0;
86     }
87     else if(name[0]=='p') {
88         placements = 1;
89         return 0;
90     }
91     else if(name[0]=='t') {
92         showtext = 1;
93         return 0;
94     }
95     else if(name[0]=='e') {
96         html = 1;
97         return 0;
98     }
99     else if(name[0]=='X') {
100         xy |= 1;
101         return 0;
102     }
103     else if(name[0]=='Y') {
104         xy |= 2;
105         return 0;
106     }
107     else if(name[0]=='r') {
108         xy |= 4;
109         return 0;
110     }
111     else if(name[0]=='f') {
112         xy |= 8;
113         return 0;
114     }
115     else if(name[0]=='d') {
116         hex = 1;
117         return 0;
118     }
119     else if(name[0]=='u') {
120         used = 1;
121         return 0;
122     }
123     else if(name[0]=='D') {
124         action = placements = showtext = 1;
125         return 0;
126     }
127     else {
128         printf("Unknown option: -%s\n", name);
129         exit(1);
130     }
131
132     return 0;
133 }
134 int args_callback_longoption(char*name,char*val)
135 {
136     return args_long2shortoption(options, name, val);
137 }
138 void args_callback_usage(char*name)
139 {    
140     printf("Usage: %s [-at] file.swf\n", name);
141     printf("\t-h , --help\t\t Print help and exit\n");
142     printf("\t-D , --full\t\t Show everything. The same as -atMp\n");
143     printf("\t-e , --html\t\t Create html output embedding the file (simple, but useful)\n");
144     printf("\t-X , --width\t\t Prints out a string of the form \"-X width\"\n");
145     printf("\t-Y , --height\t\t Prints out a string of the form \"-Y height\"\n");
146     printf("\t-r , --rate\t\t Prints out a string of the form \"-r rate\"\n");
147     printf("\t-f , --frames\t\t Prints out a string of the form \"-f framenum\"\n");
148     printf("\t-a , --action\t\t Disassemble action tags\n");
149     printf("\t-p , --placements\t Show extra placement information\n");
150     printf("\t-t , --text\t\t Show text data\n");
151     printf("\t-d , --hex\t\t Print hex output of tag data, too\n");
152     printf("\t-u , --used\t\t Show referred IDs for each Tag\n");
153     printf("\t-V , --version\t\t Print program version and exit\n");
154 }
155 int args_callback_command(char*name,char*val)
156 {
157     if(filename) {
158         fprintf(stderr, "Only one file allowed. You supplied at least two. (%s and %s)\n",
159                  filename, name);
160     }
161     filename = name;
162     return 0;
163 }
164
165 char* what;
166 char* testfunc(char*str)
167 {
168     printf("%s: %s\n", what, str);
169     return 0;
170 }
171
172 void dumpButton2Actions(TAG*tag, char*prefix)
173 {
174     U32 oldTagPos;
175     U32 offsetpos;
176     U32 condition;
177
178     oldTagPos = swf_GetTagPos(tag);
179
180     // scan DefineButton2 Record
181     
182     swf_GetU16(tag);          // Character ID
183     swf_GetU8(tag);           // Flags;
184
185     offsetpos = swf_GetTagPos(tag);  // first offset
186     swf_GetU16(tag);
187
188     while (swf_GetU8(tag))      // state  -> parse ButtonRecord
189     { swf_GetU16(tag);          // id
190       swf_GetU16(tag);          // layer
191       swf_GetMatrix(tag,NULL);  // matrix
192       swf_GetCXForm(tag,NULL,1);  // cxform
193     }
194
195     while(offsetpos)
196     { U8 a;
197       ActionTAG*actions;
198
199       if(tag->pos >= tag->len)
200           break;
201         
202       offsetpos = swf_GetU16(tag);
203       condition = swf_GetU16(tag);                // condition
204       
205       actions = swf_ActionGet(tag);
206       printf("%s condition %04x\n", prefix, condition);
207       swf_DumpActions(actions, prefix);
208     }
209     
210     swf_SetTagPos(tag,oldTagPos);
211     return;
212 }
213
214 void dumpButtonActions(TAG*tag, char*prefix)
215 {
216     ActionTAG*actions;
217     swf_GetU16(tag); // id
218     while (swf_GetU8(tag))      // state  -> parse ButtonRecord
219     { swf_GetU16(tag);          // id
220       swf_GetU16(tag);          // layer
221       swf_GetMatrix(tag,NULL);  // matrix
222     }
223     actions = swf_ActionGet(tag);
224     swf_DumpActions(actions, prefix);
225 }
226
227 #define ET_HASTEXT 32768
228 #define ET_WORDWRAP 16384
229 #define ET_MULTILINE 8192
230 #define ET_PASSWORD 4096
231 #define ET_READONLY 2048
232 #define ET_HASTEXTCOLOR 1024
233 #define ET_HASMAXLENGTH 512
234 #define ET_HASFONT 256
235 #define ET_X3 128
236 #define ET_X2 64
237 #define ET_HASLAYOUT 32
238 #define ET_NOSELECT 16
239 #define ET_BORDER 8
240 #define ET_X1 4
241 #define ET_X0 2
242 #define ET_USEOUTLINES 1
243
244 SWF swf;
245 int fontnum = 0;
246 SWFFONT**fonts;
247
248 void textcallback(int*glyphs, int nr, int fontid) 
249 {
250     int font=-1,t;
251     printf("                <%2d glyphs in font %2d> ",nr, fontid);
252     for(t=0;t<fontnum;t++)
253     {
254         if(fonts[t]->id == fontid) {
255             font = t;
256             break;
257         }
258     }
259
260     for(t=0;t<nr;t++)
261     {
262         unsigned char a; 
263         if(font>=0) {
264             if(glyphs[t] >= fonts[font]->numchars  /*glyph is in range*/
265                     || !fonts[font]->glyph2ascii /* font has ascii<->glyph mapping */
266               )
267                 continue;
268             a = fonts[font]->glyph2ascii[glyphs[t]];
269         } else {
270             a = glyphs[t];
271         }
272         if(a>=32)
273             printf("%c", a);
274         else
275             printf("\\x%x", (int)a);
276     }
277     printf("\n");
278 }
279
280 void handleText(TAG*tag) 
281 {
282   printf("\n");
283   swf_FontExtract_DefineTextCallback(-1,0,tag,4, textcallback);
284 }
285             
286 void handleDefineSound(TAG*tag)
287 {
288     U16 id = swf_GetU16(tag);
289     U8 flags = swf_GetU8(tag);
290     int compression = (flags>>4)&3;
291     int rate = (flags>>2)&3;
292     int bits = flags&2?16:8;
293     int stereo = flags&1;
294     printf(" (");
295     if(compression == 0) printf("Raw ");
296     else if(compression == 1) printf("ADPCM ");
297     else if(compression == 2) printf("MP3 ");
298     else printf("? ");
299     if(rate == 0) printf("5.5Khz ");
300     if(rate == 1) printf("11Khz ");
301     if(rate == 2) printf("22Khz ");
302     if(rate == 3) printf("44Khz ");
303     printf("%dBit ", bits);
304     if(stereo) printf("stereo");
305     else printf("mono");
306     printf(")");
307 }
308
309 void handleDefineBits(TAG*tag)
310 {
311     U16 id;
312     U8 mode;
313     U16 width,height;
314     int bpp;
315     id = swf_GetU16(tag);
316     mode = swf_GetU8(tag);
317     width = swf_GetU16(tag);
318     height = swf_GetU16(tag);
319     printf(" image %dx%d",width,height);
320     if(mode == 3) printf(" (8 bpp)");
321     else if(mode == 4) printf(" (16 bpp)");
322     else if(mode == 5) printf(" (32 bpp)");
323     else printf(" (? bpp)");
324 }
325
326 void handleEditText(TAG*tag)
327 {
328     U16 id ;
329     U16 flags;
330     int t;
331     id = swf_GetU16(tag);
332     swf_GetRect(tag,0);
333     //swf_ResetReadBits(tag);
334     if (tag->readBit)  
335     { tag->pos++; 
336       tag->readBit = 0; 
337     }
338     flags = swf_GetBits(tag,16);
339     if(flags & ET_HASFONT) {
340         swf_GetU16(tag); //font
341         swf_GetU16(tag); //fontheight
342     }
343     if(flags & ET_HASTEXTCOLOR) {
344         swf_GetU8(tag); //rgba
345         swf_GetU8(tag);
346         swf_GetU8(tag);
347         swf_GetU8(tag);
348     }
349     if(flags & ET_HASMAXLENGTH) {
350         swf_GetU16(tag); //maxlength
351     }
352     if(flags & ET_HASLAYOUT) {
353         swf_GetU8(tag); //align
354         swf_GetU16(tag); //left margin
355         swf_GetU16(tag); //right margin
356         swf_GetU16(tag); //indent
357         swf_GetU16(tag); //leading
358     }
359     printf(" variable \"%s\"", &tag->data[tag->pos]);
360
361     if(flags & (ET_X1 | ET_X2 | ET_X3 | ET_X0))
362     {
363         printf(" undefined flags: %d%d%d%d", 
364                 (flags&ET_X0?1:0),
365                 (flags&ET_X1?1:0),
366                 (flags&ET_X2?1:0),
367                 (flags&ET_X3?1:0));
368     }
369     
370     while(tag->data[tag->pos++]);
371     if(flags & ET_HASTEXT)
372    //  printf(" text \"%s\"\n", &tag->data[tag->pos])
373         ;
374 }
375 void printhandlerflags(U32 handlerflags) 
376 {
377     if(handlerflags&1) printf("[on load]");
378     if(handlerflags&2) printf("[enter frame]");
379     if(handlerflags&4) printf("[unload]");
380     if(handlerflags&8) printf("[mouse move]");
381     if(handlerflags&16) printf("[mouse down]");
382     if(handlerflags&32) printf("[mouse up]");
383     if(handlerflags&64) printf("[key down]");
384     if(handlerflags&128) printf("[key up]");
385
386     if(handlerflags&256) printf("[data]");
387     if(handlerflags&512) printf("[initialize]");
388     if(handlerflags&1024) printf("[mouse press]");
389     if(handlerflags&2048) printf("[mouse release]");
390     if(handlerflags&4096) printf("[mouse release outside]");
391     if(handlerflags&8192) printf("[mouse rollover]");
392     if(handlerflags&16384) printf("[mouse rollout]");
393     if(handlerflags&32768) printf("[mouse drag over]");
394
395     if(handlerflags&0x10000) printf("[mouse drag out]");
396     if(handlerflags&0x20000) printf("[key press]");
397     if(handlerflags&0x40000) printf("[construct even]");
398     if(handlerflags&0xfff80000) printf("[???]");
399 }
400 void handleVideoStream(TAG*tag, char*prefix)
401 {
402     U16 id = swf_GetU16(tag);
403     U16 frames = swf_GetU16(tag);
404     U16 width = swf_GetU16(tag);
405     U16 height = swf_GetU16(tag);
406     U8 flags = swf_GetU8(tag); //5-2(videopacket 01=off 10=on)-1(smoothing 1=on)
407     U8 codec = swf_GetU8(tag);
408     printf(" (%d frames, %dx%d", frames, width, height);
409     if(flags&1)
410         printf(" smoothed");
411     if(codec == 2)
412         printf(" sorenson h.263)");
413     else
414         printf(" codec 0x%02x)", codec);
415 }
416 void handleVideoFrame(TAG*tag, char*prefix)
417 {
418     U32 code, version, reference, sizeflags;
419     U32 width, height;
420     U8 type;
421     U16 id = swf_GetU16(tag);
422     U16 frame = swf_GetU16(tag);
423     U8 deblock,flags, tmp, bit;
424     U32 quantizer;
425     char*types[] = {"I-frame", "P-frame", "disposable P-frame", "<reserved>"};
426     printf(" (frame %d) ", frame);
427
428     /* video packet follows */
429     code = swf_GetBits(tag, 17);
430     version = swf_GetBits(tag, 5);
431     reference = swf_GetBits(tag, 8);
432
433     sizeflags = swf_GetBits(tag, 3);
434     switch(sizeflags)
435     {
436         case 0: width = swf_GetBits(tag, 8); height = swf_GetBits(tag, 8); break;
437         case 1: width = swf_GetBits(tag, 16); height = swf_GetBits(tag, 16); break;
438         case 2: width = 352; height = 288; break;
439         case 3: width = 176; height = 144; break;
440         case 4: width = 128; height = 96; break;
441         case 5: width = 320; height = 240; break;
442         case 6: width = 160; height = 120; break;
443         case 7: width = -1; height = -1;/*reserved*/ break;
444     }
445     printf("%dx%d ", width, height);
446     type = swf_GetBits(tag, 2);
447     printf("%s", types[type]);
448
449     deblock = swf_GetBits(tag, 1);
450     if(deblock)
451         printf(" deblock ", deblock);
452     quantizer = swf_GetBits(tag, 5);
453     printf(" quant: %d ", quantizer);
454 }
455
456 void handlePlaceObject2(TAG*tag, char*prefix)
457 {
458     U8 flags = swf_GetU8(tag);
459     MATRIX m;
460     CXFORM cx;
461     char pstr[3][160];
462     int ppos[3] = {0,0,0};
463     swf_GetU16(tag); //depth
464     //flags&1: move
465     if(flags&2) swf_GetU16(tag); //id
466     if(flags&4) {
467         swf_GetMatrix(tag,&m);
468         if(placements) {
469             ppos[0] += sprintf(pstr[0], "| Matrix             ");
470             ppos[1] += sprintf(pstr[1], "| %5.3f %5.3f %6.2f ", m.sx/65536.0, m.r1/65536.0, m.tx/20.0);
471             ppos[2] += sprintf(pstr[2], "| %5.3f %5.3f %6.2f ", m.r0/65536.0, m.sy/65536.0, m.ty/20.0);
472         }
473     }
474     if(flags&8) {
475         swf_GetCXForm(tag, &cx, 1);
476         if(placements) {
477             ppos[0] += sprintf(pstr[0]+ppos[0], "| CXForm    r    g    b    a ");
478             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);
479             ppos[2] += sprintf(pstr[2]+ppos[2], "| add    %4d %4d %4d %4d ", cx.r1, cx.g1, cx.b1, cx.a1);
480         }
481     }
482     if(flags&16) {
483         U16 ratio = swf_GetU16(tag); //ratio
484         if(placements) {
485             ppos[0] += sprintf(pstr[0]+ppos[0], "| Ratio ");
486             ppos[1] += sprintf(pstr[1]+ppos[1], "| %-5d ", ratio);
487             ppos[2] += sprintf(pstr[2]+ppos[2], "|       ");
488         }
489     }
490     if(flags&64) {
491         U16 clip = swf_GetU16(tag); //clip
492         if(placements) {
493             ppos[0] += sprintf(pstr[0]+ppos[0], "| Clip  ");
494             ppos[1] += sprintf(pstr[1]+ppos[1], "| %-5d ", clip);
495             ppos[2] += sprintf(pstr[2]+ppos[2], "|       ");
496         }
497     }
498     if(flags&32) { while(swf_GetU8(tag)); }
499     if(placements && ppos[0]) {
500         printf("\n");
501         printf("%s %s\n", prefix, pstr[0]);
502         printf("%s %s\n", prefix, pstr[1]);
503         printf("%s %s", prefix, pstr[2]);
504     }
505     if(flags&128) {
506       if (action) {
507         U16 reserved;
508         U32 globalflags;
509         U32 handlerflags;
510         char is32 = 0;
511         printf("\n");
512         reserved = swf_GetU16(tag); // must be 0
513         globalflags = swf_GetU16(tag); //TODO: 32 if version>=6
514         if(reserved) {
515             printf("Unknown parameter field not zero: %04x\n", reserved);
516             return;
517         }
518         printf("global flags: %04x\n", globalflags);
519
520         handlerflags = swf_GetU16(tag); //TODO: 32 if version>=6
521         if(!handlerflags) {
522             handlerflags = swf_GetU32(tag);
523             is32 = 1;
524         }
525         while(handlerflags)  {
526             int length;
527             int t;
528             ActionTAG*a;
529
530             globalflags &= ~handlerflags;
531             printf("%s flags %08x ",prefix, handlerflags);
532             printhandlerflags(handlerflags);
533             length = swf_GetU32(tag);
534             printf(", %d bytes actioncode\n",length);
535             a = swf_ActionGet(tag);
536             swf_DumpActions(a,prefix);
537             swf_ActionFree(a);
538
539             handlerflags = is32?swf_GetU32(tag):swf_GetU16(tag); //TODO: 32 if version>=6
540         }
541         if(globalflags) // should go to sterr.
542             printf("ERROR: unsatisfied handlerflags: %02x\n", globalflags);
543     } else {
544       printf(" has action code\n");
545     }
546     } else printf("\n");
547 }
548
549 void handlePlaceObject(TAG*tag, char*prefix)
550 {
551     /*TODO*/
552 }
553     
554 void fontcallback1(U16 id,U8 * name)
555 { fontnum++;
556 }
557
558 void fontcallback2(U16 id,U8 * name)
559
560   swf_FontExtract(&swf,id,&fonts[fontnum]);
561   fontnum++;
562 }
563
564 static U8 printable(U8 a)
565 {
566     if(a<32 || a==127) return '.';
567     else return a;
568 }
569 void hexdumpTag(TAG*tag, char* prefix)
570 {
571     int t;
572     char ascii[32];
573     printf("                %s-=> ",prefix);
574     for(t=0;t<tag->len;t++) {
575         printf("%02x ", tag->data[t]);
576         ascii[t&15] = printable(tag->data[t]);
577         if((t && ((t&15)==15)) || (t==tag->len-1))
578         {
579             int s,p=((t-1)&15)+1;
580             ascii[p] = 0;
581             for(s=p;s<16;s++) {
582                 printf("   ");
583             }
584             if(t==tag->len-1)
585                 printf(" %s\n", ascii);
586             else
587                 printf(" %s\n                %s-=> ",ascii,prefix);
588         }
589     }
590 }
591
592 void handleExportAssets(TAG*tag, char* prefix)
593 {
594     int num;
595     U16 id;
596     char* name;
597     int t;
598     num = swf_GetU16(tag);
599     for(t=0;t<num;t++)
600     {
601         id = swf_GetU16(tag);
602         name = swf_GetString(tag);
603         printf("%sexports %04d as \"%s\"\n", prefix, id, name);
604     }
605 }
606
607 void dumperror(const char* format, ...)
608 {
609     char buf[1024];
610     va_list arglist;
611
612     va_start(arglist, format);
613     vsprintf(buf, format, arglist);
614     va_end(arglist);
615
616     if(!html && !xy)
617         printf("==== Error: %s ====\n", buf);
618 }
619
620 static char strbuf[800];
621 static int bufpos=0;
622
623 char* timestring(double f)
624 {
625     int hours   = (int)(f/3600);
626     int minutes = (int)((f-hours*3600)/60);
627     int seconds = (int)((f-hours*3600-minutes*60));
628     int useconds = (int)((f-(int)f)*1000+0.5);
629     bufpos+=100;
630     bufpos%=800;
631     sprintf(&strbuf[bufpos], "%02d:%02d:%02d,%03d",hours,minutes,seconds,useconds);
632     return &strbuf[bufpos];
633 }
634
635 int main (int argc,char ** argv)
636
637     TAG*tag;
638 #ifdef HAVE_STAT
639     struct stat statbuf;
640 #endif
641     int f;
642     int xsize,ysize;
643     char issprite = 0; // are we inside a sprite definition?
644     int spriteframe = 0;
645     int mainframe=0;
646     char* spriteframelabel = 0;
647     char* framelabel = 0;
648     char prefix[128];
649     int filesize = 0;
650     prefix[0] = 0;
651     memset(idtab,0,65536);
652
653     processargs(argc, argv);
654
655     if(!filename)
656     {
657         fprintf(stderr, "You must supply a filename.\n");
658         return 1;
659     }
660
661     f = open(filename,O_RDONLY|O_BINARY);
662
663     if (f<0)
664     { 
665         perror("Couldn't open file: ");
666         exit(1);
667     }
668     if FAILED(swf_ReadSWF(f,&swf))
669     { 
670         fprintf(stderr, "%s is not a valid SWF file or contains errors.\n",filename);
671         close(f);
672         exit(1);
673     }
674
675 #ifdef HAVE_STAT
676     fstat(f, &statbuf);
677     if(statbuf.st_size != swf.fileSize && !swf.compressed)
678         dumperror("Real Filesize (%d) doesn't match header Filesize (%d)",
679                 statbuf.st_size, swf.fileSize);
680     filesize = statbuf.st_size;
681 #endif
682
683     close(f);
684
685     xsize = (swf.movieSize.xmax-swf.movieSize.xmin)/20;
686     ysize = (swf.movieSize.ymax-swf.movieSize.ymin)/20;
687     if(xy)
688     {
689         if(xy&1)
690         printf("-X %d", xsize);
691
692         if((xy&1) && (xy&6))
693         printf(" ");
694
695         if(xy&2)
696         printf("-Y %d", ysize);
697         
698         if((xy&3) && (xy&4))
699         printf(" ");
700
701         if(xy&4)
702         printf("-r %d", swf.frameRate*100/256);
703         
704         if((xy&7) && (xy&8))
705         printf(" ");
706         
707         if(xy&8)
708         printf("-f %d", swf.frameCount);
709         
710         printf("\n");
711         return 0;
712     }
713     if(html)
714     {
715         char*fileversions[] = {"","1,0,0,0", "2,0,0,0","3,0,0,0","4,0,0,0",
716                                "5,0,0,0","6,0,23,0","7,0,0,0","8,0,0,0"};
717         if(swf.fileVersion>8) {
718             fprintf(stderr, "Fileversion>8\n");
719             exit(1);
720         }
721         printf("<OBJECT CLASSID=\"clsid:D27CDB6E-AE6D-11cf-96B8-444553540000\"\n"
722                " WIDTH=\"%d\"\n"
723                //" BGCOLOR=#ffffffff\n"?
724                " HEIGHT=\"%d\"\n"
725                //http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=6,0,23,0?
726                " CODEBASE=\"http://active.macromedia.com/flash5/cabs/swflash.cab#version=%s\">\n"
727                "  <PARAM NAME=\"MOVIE\" VALUE=\"%s\">\n"
728                "  <PARAM NAME=\"PLAY\" VALUE=\"true\">\n" 
729                "  <PARAM NAME=\"LOOP\" VALUE=\"true\">\n"
730                "  <PARAM NAME=\"QUALITY\" VALUE=\"high\">\n"
731                "  <EMBED SRC=\"%s\" WIDTH=\"%d\" HEIGHT=\"%d\"\n" //bgcolor=#ffffff?
732                "   PLAY=\"true\" ALIGN=\"\" LOOP=\"true\" QUALITY=\"high\"\n"
733                "   TYPE=\"application/x-shockwave-flash\"\n"
734                "   PLUGINSPAGE=\"http://www.macromedia.com/go/getflashplayer\">\n"
735                "  </EMBED>\n" 
736                "</OBJECT>\n", xsize, ysize, fileversions[swf.fileVersion], 
737                               filename, filename, xsize, ysize);
738         return 0;
739     } 
740     printf("[HEADER]        File version: %d\n", swf.fileVersion);
741     if(swf.compressed) {
742         printf("[HEADER]        File is zlib compressed.");
743         if(filesize && swf.fileSize)
744             printf(" Ratio: %02d%%\n", filesize*100/(swf.fileSize));
745         else
746             printf("\n");
747     }
748     printf("[HEADER]        File size: %ld%s\n", swf.fileSize, swf.compressed?" (Depacked)":"");
749     printf("[HEADER]        Frame rate: %f\n",swf.frameRate/256.0);
750     printf("[HEADER]        Frame count: %d\n",swf.frameCount);
751     printf("[HEADER]        Movie width: %.2f",(swf.movieSize.xmax-swf.movieSize.xmin)/20.0);
752     if(swf.movieSize.xmin)
753         printf(" (left offset: %.2f)\n", swf.movieSize.xmin/20.0);
754     else 
755         printf("\n");
756     printf("[HEADER]        Movie height: %.2f",(swf.movieSize.ymax-swf.movieSize.ymin)/20.0);
757     if(swf.movieSize.ymin)
758         printf(" (top offset: %.2f)\n", swf.movieSize.ymin/20.0);
759     else 
760         printf("\n");
761
762     tag = swf.firstTag;
763    
764     if(showtext) {
765         fontnum = 0;
766         swf_FontEnumerate(&swf,&fontcallback1);
767         fonts = (SWFFONT**)malloc(fontnum*sizeof(SWFFONT*));
768         fontnum = 0;
769         swf_FontEnumerate(&swf,&fontcallback2);
770     }
771
772     while(tag) {
773         char*name = swf_TagGetName(tag);
774         char myprefix[128];
775         if(!name) {
776             dumperror("Unknown tag:0x%03x", tag->id);
777             //tag = tag->next;
778             //continue;
779         }
780         if(swf_TagGetName(tag)) {
781             printf("[%03x] %9ld %s%s", tag->id, tag->len, prefix, swf_TagGetName(tag));
782         } else {
783             printf("[%03x] %9ld %sUNKNOWN TAG %03x", tag->id, tag->len, prefix, tag->id);
784         }
785         
786         if(tag->id == ST_FREECHARACTER) {
787             U16 id = swf_GetU16(tag);
788             idtab[id] = 0;
789         }
790
791         if(swf_isDefiningTag(tag)) {
792             U16 id = swf_GetDefineID(tag);
793             printf(" defines id %04d", id);
794             if(idtab[id])
795                 dumperror("Id %04d is defined more than once.", id);
796             idtab[id] = 1;
797         }
798         else if(swf_isPseudoDefiningTag(tag)) {
799             U16 id = swf_GetDefineID(tag);
800             printf(" adds information to id %04d", id);
801             if(!idtab[id])
802                 dumperror("Id %04d is not yet defined.\n", id);
803         }
804         else if(tag->id == ST_PLACEOBJECT) {
805             printf(" places id %04d at depth %04x", swf_GetPlaceID(tag), swf_GetDepth(tag));
806             if(swf_GetName(tag))
807                 printf(" name \"%s\"",swf_GetName(tag));
808             handlePlaceObject(tag, myprefix);
809         }
810         else if(tag->id == ST_PLACEOBJECT2) {
811             if(tag->data[0]&1)
812                 printf(" moves");
813             else
814                 printf(" places");
815             
816             if(tag->data[0]&2)
817                 printf(" id %04d",swf_GetPlaceID(tag));
818             else
819                 printf(" object");
820
821             printf(" at depth %04d", swf_GetDepth(tag));
822             if(swf_GetName(tag))
823                 printf(" name \"%s\"",swf_GetName(tag));
824         }
825         else if(tag->id == ST_REMOVEOBJECT) {
826             printf(" removes id %04d from depth %04d", swf_GetPlaceID(tag), swf_GetDepth(tag));
827         }
828         else if(tag->id == ST_REMOVEOBJECT2) {
829             printf(" removes object from depth %04d", swf_GetDepth(tag));
830         }
831         else if(tag->id == ST_FREECHARACTER) {
832             printf(" frees object %04d", swf_GetPlaceID(tag));
833         }
834         else if(tag->id == ST_STARTSOUND) {
835             U8 flags;
836             U16 id;
837             id = swf_GetU16(tag);
838             flags = swf_GetU8(tag);
839             if(flags & 32)
840                 printf(" stops sound with id %04d", id);
841             else
842                 printf(" starts sound with id %04d", id);
843             if(flags & 16)
844                 printf(" (if not already playing)");
845             if(flags & 1)
846                 swf_GetU32(tag);
847             if(flags & 2)
848                 swf_GetU32(tag);
849             if(flags & 4) {
850                 printf(" looping %d times", swf_GetU16(tag));
851             }
852         }
853         else if(tag->id == ST_FRAMELABEL) {
854             int l = strlen(tag->data);
855             printf(" \"%s\"", tag->data);
856             if(l < tag->len-1) {
857                 printf(" has %d extra bytes", tag->len-1-l);
858                 if(tag ->len-1-l == 1 && tag->data[tag->len-1] == 1)
859                     printf(" (ANCHOR)");
860             }
861             if((framelabel && !issprite) ||
862                (spriteframelabel && issprite)) {
863                 dumperror("Frame %d has more than one label", 
864                         issprite?spriteframe:mainframe);
865             }
866             if(issprite) spriteframelabel = tag->data;
867             else framelabel = tag->data;
868         }
869         else if(tag->id == ST_SHOWFRAME) {
870             char*label = issprite?spriteframelabel:framelabel;
871             int frame = issprite?spriteframe:mainframe;
872             int nframe = frame;
873             if(!label) {
874                 while(tag->next && tag->next->id == ST_SHOWFRAME && tag->next->len == 0) {
875                     tag = tag->next;
876                     if(issprite) spriteframe++;
877                     else mainframe++;
878                     nframe++;
879                 }
880             }
881             if(nframe == frame)
882                 printf(" %d (%s)", frame, timestring(frame*(256.0/(swf.frameRate+0.1))));
883             else
884                 printf(" %d-%d (%s-%s)", frame, nframe,
885                         timestring(frame*(256.0/(swf.frameRate+0.1))),
886                         timestring(nframe*(256.0/(swf.frameRate+0.1)))
887                         );
888             if(label)
889                 printf(" (label \"%s\")", label);
890             if(issprite) {spriteframe++; spriteframelabel = 0;}
891             if(!issprite) {mainframe++; framelabel = 0;}
892         }
893
894         if(tag->id == ST_SETBACKGROUNDCOLOR) {
895             U8 r = swf_GetU8(tag);
896             U8 g = swf_GetU8(tag);
897             U8 b = swf_GetU8(tag);
898             printf(" (%02x/%02x/%02x)\n",r,g,b);
899         }
900         else if(tag->id == ST_PROTECT) {
901             if(tag->len>0) {
902                 printf(" %s\n", swf_GetString(tag));
903             }
904         }
905         else if(tag->id == ST_DEFINEBITSLOSSLESS ||
906            tag->id == ST_DEFINEBITSLOSSLESS2) {
907             handleDefineBits(tag);
908             printf("\n");
909         }
910         else if(tag->id == ST_DEFINESOUND) {
911             handleDefineSound(tag);
912             printf("\n");
913         }
914         else if(tag->id == ST_VIDEOFRAME) {
915             handleVideoFrame(tag, myprefix);
916             printf("\n");
917         }
918         else if(tag->id == ST_DEFINEVIDEOSTREAM) {
919             handleVideoStream(tag, myprefix);
920             printf("\n");
921         }
922         else if(tag->id == ST_DEFINEEDITTEXT) {
923             handleEditText(tag);
924             printf("\n");
925         }
926         else if(tag->id == ST_DEFINEMOVIE) {
927             U16 id = swf_GetU16(tag);
928             char*s = swf_GetString(tag);
929             printf(" URL: %s\n", s);
930         }
931         else if(tag->id == ST_DEFINETEXT || tag->id == ST_DEFINETEXT2) {
932             if(showtext)
933                 handleText(tag);
934             else
935                 printf("\n");
936         }
937         else if(tag->id == ST_PLACEOBJECT2) {
938         }
939         else if(tag->id == ST_NAMECHARACTER) {
940             swf_GetU16(tag);
941             printf(" \"%s\"\n", swf_GetString(tag));
942         }
943         else {
944             printf("\n");
945         }
946         
947         sprintf(myprefix, "                %s", prefix);
948
949         if(tag->id == ST_DEFINESPRITE) {
950             sprintf(prefix, "         ");
951             if(issprite) {
952                 dumperror("Sprite definition inside a sprite definition");
953             }
954             issprite = 1;
955             spriteframe = 0;
956             spriteframelabel = 0;
957         }
958         else if(tag->id == ST_END) {
959             *prefix = 0;
960             issprite = 0;
961             spriteframelabel = 0;
962             if(tag->len)
963                 dumperror("End Tag not empty");
964         }
965         else if(tag->id == ST_EXPORTASSETS) {
966             handleExportAssets(tag, myprefix);
967         }
968         else if(tag->id == ST_DOACTION && action) {
969             ActionTAG*actions;
970             actions = swf_ActionGet(tag);
971             swf_DumpActions(actions, myprefix);
972         }
973         else if(tag->id == ST_DEFINEBUTTON && action) {
974             dumpButtonActions(tag, myprefix);
975         }
976         else if(tag->id == ST_DEFINEBUTTON2 && action) {
977             dumpButton2Actions(tag, myprefix);
978         }
979         else if(tag->id == ST_PLACEOBJECT2) {
980             handlePlaceObject2(tag, myprefix);
981         }
982
983         if(tag->len && used) {
984             int num = swf_GetNumUsedIDs(tag);
985             int* used;
986             int t;
987             if(num) {
988                 used = (int*)malloc(sizeof(int)*num);
989                 swf_GetUsedIDs(tag, used);
990                 printf("%s%suses IDs: ", indent, prefix);
991                 for(t=0;t<num;t++) {
992                     swf_SetTagPos(tag, used[t]);
993                     printf("%d%s", swf_GetU16(tag), t<num-1?", ":"");
994                 }
995                 printf("\n");
996             }
997         }
998
999         if(tag->len && hex) {
1000             hexdumpTag(tag, prefix);
1001         }
1002         tag = tag->next;
1003         fflush(stdout);
1004     }
1005
1006     swf_FreeTags(&swf);
1007     return 0;
1008 }
1009
1010