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 xhtml = 0;
  55 static int xy = 0;
  56 static int showtext = 0;
  57 static int showshapes = 0;
  58 static int hex = 0;
  59 static int used = 0;
  60 static int bbox = 0;
  61 static int cumulative = 0;
  62
  63 static struct options_t options[] = {
  64 {"h", "help"},
  65 {"D", "full"},
  66 {"V", "version"},
  67 {"e", "html"},
  68 {"E", "xhtml"},
  69 {"a", "action"},
  70 {"t", "text"},
  71 {"s", "shapes"},
  72 {"p", "placements"},
  73 {"b", "bbox"},
  74 {"X", "width"},
  75 {"Y", "height"},
  76 {"r", "rate"},
  77 {"f", "frames"},
  78 {"d", "hex"},
  79 {"u", "used"},
  80 {0,0}
  81 };
  82
  83 int args_callback_option(char*name,char*val)
  84 {
  85     if(!strcmp(name, "V")) {
  86         printf("swfdump - part of %s %s\n", PACKAGE, VERSION);
  87         exit(0);
  88     }
  89     else if(name[0]=='a') {
  90         action = 1;
  91         return 0;
  92     }
  93     else if(name[0]=='p') {
  94         placements = 1;
  95         return 0;
  96     }
  97     else if(name[0]=='t') {
  98         showtext = 1;
  99         return 0;
 100     }
 101     else if(name[0]=='s') {
 102         showshapes = 1;
 103         return 0;
 104     }
 105     else if(name[0]=='e') {
 106         html = 1;
 107         return 0;
 108     }
 109     else if(name[0]=='c') {
 110         cumulative = 1;
 111         return 0;
 112     }
 113     else if(name[0]=='E') {
 114         html = 1;
 115         xhtml = 1;
 116         return 0;
 117     }
 118     else if(name[0]=='X') {
 119         xy |= 1;
 120         return 0;
 121     }
 122     else if(name[0]=='Y') {
 123         xy |= 2;
 124         return 0;
 125     }
 126     else if(name[0]=='r') {
 127         xy |= 4;
 128         return 0;
 129     }
 130     else if(name[0]=='f') {
 131         xy |= 8;
 132         return 0;
 133     }
 134     else if(name[0]=='d') {
 135         hex = 1;
 136         return 0;
 137     }
 138     else if(name[0]=='u') {
 139         used = 1;
 140         return 0;
 141     }
 142     else if(name[0]=='b') {
 143         bbox = 1;
 144         return 0;
 145     }
 146     else if(name[0]=='D') {
 147         action = placements = showtext = showshapes = 1;
 148         return 0;
 149     }
 150     else {
 151         printf("Unknown option: -%s\n", name);
 152         exit(1);
 153     }
 154
 155     return 0;
 156 }
 157 int args_callback_longoption(char*name,char*val)
 158 {
 159     return args_long2shortoption(options, name, val);
 160 }
 161 void args_callback_usage(char *name)
 162 {
 163     printf("\n");
 164     printf("Usage: %s [-atpdu] file.swf\n", name);
 165     printf("\n");
 166     printf("-h , --help                    Print short help message and exit\n");
 167     printf("-D , --full                    Show everything. Same as -atp\n");
 168     printf("-V , --version                 Print version info and exit\n");
 169     printf("-e , --html                    Print out html code for embedding the file\n");
 170     printf("-E , --xhtml                   Print out xhtml code for embedding the file\n");
 171     printf("-a , --action                  Disassemble action tags\n");
 172     printf("-t , --text                    Show text fields (like swfstrings).\n");
 173     printf("-s , --shapes                  Show shape coordinates/styles\n");
 174     printf("-p , --placements              Show placement information\n");
 175     printf("-b , --bbox                    Print tag's bounding boxes\n");
 176     printf("-X , --width                   Prints out a string of the form \"-X width\".\n");
 177     printf("-Y , --height                  Prints out a string of the form \"-Y height\".\n");
 178     printf("-r , --rate                    Prints out a string of the form \"-r rate\".\n");
 179     printf("-f , --frames                  Prints out a string of the form \"-f framenum\".\n");
 180     printf("-d , --hex                     Print hex output of tag data, too.\n");
 181     printf("-u , --used                    Show referred IDs for each Tag.\n");
 182     printf("\n");
 183 }
 184 int args_callback_command(char*name,char*val)
 185 {
 186     if(filename) {
 187         fprintf(stderr, "Only one file allowed. You supplied at least two. (%s and %s)\n",
 188                  filename, name);
 189     }
 190     filename = name;
 191     return 0;
 192 }
 193
 194 char* what;
 195 char* testfunc(char*str)
 196 {
 197     printf("%s: %s\n", what, str);
 198     return 0;
 199 }
 200
 201 void dumpButton2Actions(TAG*tag, char*prefix)
 202 {
 203     U32 oldTagPos;
 204     U32 offsetpos;
 205     U32 condition;
 206
 207     oldTagPos = swf_GetTagPos(tag);
 208
 209     // scan DefineButton2 Record
 210
 211     swf_GetU16(tag);          // Character ID
 212     swf_GetU8(tag);           // Flags;
 213
 214     offsetpos = swf_GetTagPos(tag);  // first offset
 215     swf_GetU16(tag);
 216
 217     while (swf_GetU8(tag))      // state  -> parse ButtonRecord
 218     { swf_GetU16(tag);          // id
 219       swf_GetU16(tag);          // layer
 220       swf_GetMatrix(tag,NULL);  // matrix
 221       swf_GetCXForm(tag,NULL,1);  // cxform
 222     }
 223
 224     while(offsetpos)
 225     { U8 a;
 226       ActionTAG*actions;
 227
 228       if(tag->pos >= tag->len)
 229           break;
 230
 231       offsetpos = swf_GetU16(tag);
 232       condition = swf_GetU16(tag);                // condition
 233
 234       actions = swf_ActionGet(tag);
 235       printf("%s condition %04x\n", prefix, condition);
 236       swf_DumpActions(actions, prefix);
 237     }
 238
 239     swf_SetTagPos(tag,oldTagPos);
 240     return;
 241 }
 242
 243 void dumpButtonActions(TAG*tag, char*prefix)
 244 {
 245     ActionTAG*actions;
 246     swf_GetU16(tag); // id
 247     while (swf_GetU8(tag))      // state  -> parse ButtonRecord
 248     { swf_GetU16(tag);          // id
 249       swf_GetU16(tag);          // layer
 250       swf_GetMatrix(tag,NULL);  // matrix
 251     }
 252     actions = swf_ActionGet(tag);
 253     swf_DumpActions(actions, prefix);
 254 }
 255
 256 SWF swf;
 257 int fontnum = 0;
 258 SWFFONT**fonts;
 259
 260 void textcallback(void*self, int*glyphs, int*ypos, int nr, int fontid, int fontsize, int startx, int starty, RGBA*color)
 261 {
 262     int font=-1,t;
 263     printf("                <%2d glyphs in font %2d, color #%02x%02x%02x%02x> ",nr, fontid, color->r, color->g, color->b, color->a);
 264     for(t=0;t<fontnum;t++)
 265     {
 266         if(fonts[t]->id == fontid) {
 267             font = t;
 268             break;
 269         }
 270     }
 271
 272     for(t=0;t<nr;t++)
 273     {
 274         unsigned char a;
 275         if(font>=0) {
 276             if(glyphs[t] >= fonts[font]->numchars  /*glyph is in range*/
 277                     || !fonts[font]->glyph2ascii /* font has ascii<->glyph mapping */
 278               ) a = glyphs[t];
 279             else {
 280                 if(fonts[font]->glyph2ascii[glyphs[t]])
 281                     a = fonts[font]->glyph2ascii[glyphs[t]];
 282                 else
 283                     a = glyphs[t];
 284             }
 285         } else {
 286             a = glyphs[t];
 287         }
 288         if(a>=32)
 289             printf("%c", a);
 290         else
 291             printf("\\x%x", (int)a);
 292     }
 293     printf("\n");
 294 }
 295
 296 void handleText(TAG*tag)
 297 {
 298   printf("\n");
 299   swf_ParseDefineText(tag,textcallback, 0);
 300 }
 301
 302 void handleDefineSound(TAG*tag)
 303 {
 304     U16 id = swf_GetU16(tag);
 305     U8 flags = swf_GetU8(tag);
 306     int compression = (flags>>4)&7;
 307     int rate = (flags>>2)&3;
 308     int bits = flags&2?16:8;
 309     int stereo = flags&1;
 310     printf(" (");
 311     if(compression == 0) printf("Raw ");
 312     else if(compression == 1) printf("ADPCM ");
 313     else if(compression == 2) printf("MP3 ");
 314     else if(compression == 3) printf("Raw little-endian ");
 315     else if(compression == 6) printf("ASAO ");
 316     else printf("? ");
 317     if(rate == 0) printf("5.5Khz ");
 318     if(rate == 1) printf("11Khz ");
 319     if(rate == 2) printf("22Khz ");
 320     if(rate == 3) printf("44Khz ");
 321     printf("%dBit ", bits);
 322     if(stereo) printf("stereo");
 323     else printf("mono");
 324     printf(")");
 325 }
 326
 327 void handleDefineBits(TAG*tag)
 328 {
 329     U16 id;
 330     U8 mode;
 331     U16 width,height;
 332     int bpp;
 333     id = swf_GetU16(tag);
 334     mode = swf_GetU8(tag);
 335     width = swf_GetU16(tag);
 336     height = swf_GetU16(tag);
 337     printf(" image %dx%d",width,height);
 338     if(mode == 3) printf(" (8 bpp)");
 339     else if(mode == 4) printf(" (16 bpp)");
 340     else if(mode == 5) printf(" (32 bpp)");
 341     else printf(" (? bpp)");
 342 }
 343
 344 void handleEditText(TAG*tag)
 345 {
 346     U16 id ;
 347     U16 flags;
 348     int t;
 349     id = swf_GetU16(tag);
 350     swf_GetRect(tag,0);
 351
 352     //swf_ResetReadBits(tag);
 353
 354     if (tag->readBit)
 355     { tag->pos++;
 356       tag->readBit = 0;
 357     }
 358     flags = swf_GetBits(tag,16);
 359     if(flags & ET_HASFONT) {
 360         swf_GetU16(tag); //font
 361         swf_GetU16(tag); //fontheight
 362     }
 363     if(flags & ET_HASTEXTCOLOR) {
 364         swf_GetU8(tag); //rgba
 365         swf_GetU8(tag);
 366         swf_GetU8(tag);
 367         swf_GetU8(tag);
 368     }
 369     if(flags & ET_HASMAXLENGTH) {
 370         swf_GetU16(tag); //maxlength
 371     }
 372     if(flags & ET_HASLAYOUT) {
 373         swf_GetU8(tag); //align
 374         swf_GetU16(tag); //left margin
 375         swf_GetU16(tag); //right margin
 376         swf_GetU16(tag); //indent
 377         swf_GetU16(tag); //leading
 378     }
 379     printf(" variable \"%s\" ", &tag->data[tag->pos]);
 380     if(flags & ET_HTML) printf("(html)");
 381     if(flags & ET_NOSELECT) printf("(noselect)");
 382     if(flags & ET_PASSWORD) printf("(password)");
 383     if(flags & ET_READONLY) printf("(readonly)");
 384
 385     if(flags & (ET_X1 | ET_X3 ))
 386     {
 387         printf(" undefined flags: %08x (%08x)", (flags&(ET_X1|ET_X3)), flags);
 388     }
 389
 390     while(tag->data[tag->pos++]);
 391     if(flags & ET_HASTEXT)
 392    //  printf(" text \"%s\"\n", &tag->data[tag->pos]) //TODO
 393         ;
 394 }
 395 void printhandlerflags(U32 handlerflags)
 396 {
 397     if(handlerflags&1) printf("[on load]");
 398     if(handlerflags&2) printf("[enter frame]");
 399     if(handlerflags&4) printf("[unload]");
 400     if(handlerflags&8) printf("[mouse move]");
 401     if(handlerflags&16) printf("[mouse down]");
 402     if(handlerflags&32) printf("[mouse up]");
 403     if(handlerflags&64) printf("[key down]");
 404     if(handlerflags&128) printf("[key up]");
 405
 406     if(handlerflags&256) printf("[data]");
 407     if(handlerflags&512) printf("[initialize]");
 408     if(handlerflags&1024) printf("[mouse press]");
 409     if(handlerflags&2048) printf("[mouse release]");
 410     if(handlerflags&4096) printf("[mouse release outside]");
 411     if(handlerflags&8192) printf("[mouse rollover]");
 412     if(handlerflags&16384) printf("[mouse rollout]");
 413     if(handlerflags&32768) printf("[mouse drag over]");
 414
 415     if(handlerflags&0x10000) printf("[mouse drag out]");
 416     if(handlerflags&0x20000) printf("[key press]");
 417     if(handlerflags&0x40000) printf("[construct even]");
 418     if(handlerflags&0xfff80000) printf("[???]");
 419 }
 420 void handleVideoStream(TAG*tag, char*prefix)
 421 {
 422     U16 id = swf_GetU16(tag);
 423     U16 frames = swf_GetU16(tag);
 424     U16 width = swf_GetU16(tag);
 425     U16 height = swf_GetU16(tag);
 426     U8 flags = swf_GetU8(tag); //5-2(videopacket 01=off 10=on)-1(smoothing 1=on)
 427     U8 codec = swf_GetU8(tag);
 428     printf(" (%d frames, %dx%d", frames, width, height);
 429     if(flags&1)
 430         printf(" smoothed");
 431     if(codec == 2)
 432         printf(" sorenson h.263)");
 433     else
 434         printf(" codec 0x%02x)", codec);
 435 }
 436 void handleVideoFrame(TAG*tag, char*prefix)
 437 {
 438     U32 code, version, reference, sizeflags;
 439     U32 width=0, height=0;
 440     U8 type;
 441     U16 id = swf_GetU16(tag);
 442     U16 frame = swf_GetU16(tag);
 443     U8 deblock,flags, tmp, bit;
 444     U32 quantizer;
 445     char*types[] = {"I-frame", "P-frame", "disposable P-frame", "<reserved>"};
 446     printf(" (frame %d) ", frame);
 447
 448     /* video packet follows */
 449     code = swf_GetBits(tag, 17);
 450     version = swf_GetBits(tag, 5);
 451     reference = swf_GetBits(tag, 8);
 452
 453     sizeflags = swf_GetBits(tag, 3);
 454     switch(sizeflags)
 455     {
 456         case 0: width = swf_GetBits(tag, 8); height = swf_GetBits(tag, 8); break;
 457         case 1: width = swf_GetBits(tag, 16); height = swf_GetBits(tag, 16); break;
 458         case 2: width = 352; height = 288; break;
 459         case 3: width = 176; height = 144; break;
 460         case 4: width = 128; height = 96; break;
 461         case 5: width = 320; height = 240; break;
 462         case 6: width = 160; height = 120; break;
 463         case 7: width = -1; height = -1;/*reserved*/ break;
 464     }
 465     printf("%dx%d ", width, height);
 466     type = swf_GetBits(tag, 2);
 467     printf("%s", types[type]);
 468
 469     deblock = swf_GetBits(tag, 1);
 470     if(deblock)
 471         printf(" deblock ", deblock);
 472     quantizer = swf_GetBits(tag, 5);
 473     printf(" quant: %d ", quantizer);
 474 }
 475
 476 void handlePlaceObject23(TAG*tag, char*prefix)
 477 {
 478     U8 flags,flags2=0;
 479     MATRIX m;
 480     CXFORM cx;
 481     char pstr[3][256];
 482     int ppos[3] = {0,0,0};
 483     swf_SetTagPos(tag, 0);
 484     flags = swf_GetU8(tag);
 485     if(tag->id == ST_PLACEOBJECT3)
 486         flags2 = swf_GetU8(tag);
 487     swf_GetU16(tag); //depth
 488
 489     //flags&1: move
 490     if(flags&2) swf_GetU16(tag); //id
 491     if(flags&4) {
 492         swf_GetMatrix(tag,&m);
 493         if(placements) {
 494             ppos[0] += sprintf(pstr[0], "| Matrix             ");
 495             ppos[1] += sprintf(pstr[1], "| %5.3f %5.3f %6.2f ", m.sx/65536.0, m.r1/65536.0, m.tx/20.0);
 496             ppos[2] += sprintf(pstr[2], "| %5.3f %5.3f %6.2f ", m.r0/65536.0, m.sy/65536.0, m.ty/20.0);
 497         }
 498     }
 499     if(flags&8) {
 500         swf_GetCXForm(tag, &cx, 1);
 501         if(placements) {
 502             ppos[0] += sprintf(pstr[0]+ppos[0], "| CXForm    r    g    b    a ");
 503             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);
 504             ppos[2] += sprintf(pstr[2]+ppos[2], "| add    %4d %4d %4d %4d ", cx.r1, cx.g1, cx.b1, cx.a1);
 505         }
 506     }
 507     if(flags&16) {
 508         U16 ratio = swf_GetU16(tag); //ratio
 509         if(placements) {
 510             ppos[0] += sprintf(pstr[0]+ppos[0], "| Ratio ");
 511             ppos[1] += sprintf(pstr[1]+ppos[1], "| %-5d ", ratio);
 512             ppos[2] += sprintf(pstr[2]+ppos[2], "|       ");
 513         }
 514     }
 515     if(flags&64) {
 516         U16 clip = swf_GetU16(tag); //clip
 517         if(placements) {
 518             ppos[0] += sprintf(pstr[0]+ppos[0], "| Clip  ");
 519             ppos[1] += sprintf(pstr[1]+ppos[1], "| %-4d ", clip);
 520             ppos[2] += sprintf(pstr[2]+ppos[2], "|       ");
 521         }
 522     }
 523     if(flags&32) { while(swf_GetU8(tag)); }
 524
 525     if(flags2&1) { // filter list
 526         U8 num = swf_GetU8(tag);
 527         printf("%d filters\n");
 528         char*filtername[] = {"dropshadow","blur","glow","bevel","gradientglow","convolution","colormatrix","gradientbevel"};
 529         for(;num;num--) {
 530             U8 type = swf_GetU8(tag);
 531             printf("filter %d: %02x (%s)\n", type, type<sizeof(filtername)/sizeof(filtername[0])?filtername[type]:"?");
 532             return;// FIXME
 533         }
 534     }
 535     if(flags2&2) { // blend mode
 536         U8 blendmode = swf_GetU8(tag);
 537         if(placements) {
 538             int t;
 539             char name[80];
 540             sprintf(name, "%-5d", blendmode);
 541             for(t=0;blendModeNames[t];t++) {
 542                 if(blendmode==t) {
 543                     sprintf(name, "%-5s", blendModeNames[t]);
 544                     break;
 545                 }
 546             }
 547             ppos[0] += sprintf(pstr[0]+ppos[0], "| Blend ");
 548             ppos[1] += sprintf(pstr[1]+ppos[1], "| %s ", name);
 549             ppos[2] += sprintf(pstr[2]+ppos[2], "|       ");
 550         }
 551     }
 552
 553     if(placements && ppos[0]) {
 554         printf("\n");
 555         printf("%s %s\n", prefix, pstr[0]);
 556         printf("%s %s\n", prefix, pstr[1]);
 557         printf("%s %s", prefix, pstr[2]);
 558     }
 559     if(flags&128) {
 560       if (action) {
 561         U16 reserved;
 562         U32 globalflags;
 563         U32 handlerflags;
 564         char is32 = 0;
 565         printf("\n");
 566         reserved = swf_GetU16(tag); // must be 0
 567         globalflags = swf_GetU16(tag); //TODO: 32 if version>=6
 568         if(reserved) {
 569             printf("Unknown parameter field not zero: %04x\n", reserved);
 570             return;
 571         }
 572         printf("global flags: %04x\n", globalflags);
 573
 574         handlerflags = swf_GetU16(tag); //TODO: 32 if version>=6
 575         if(!handlerflags) {
 576             handlerflags = swf_GetU32(tag);
 577             is32 = 1;
 578         }
 579         while(handlerflags)  {
 580             int length;
 581             int t;
 582             ActionTAG*a;
 583
 584             globalflags &= ~handlerflags;
 585             printf("%s flags %08x ",prefix, handlerflags);
 586             printhandlerflags(handlerflags);
 587             length = swf_GetU32(tag);
 588             printf(", %d bytes actioncode\n",length);
 589             a = swf_ActionGet(tag);
 590             swf_DumpActions(a,prefix);
 591             swf_ActionFree(a);
 592
 593             handlerflags = is32?swf_GetU32(tag):swf_GetU16(tag); //TODO: 32 if version>=6
 594         }
 595         if(globalflags) // should go to sterr.
 596             printf("ERROR: unsatisfied handlerflags: %02x\n", globalflags);
 597     } else {
 598       printf(" has action code\n");
 599     }
 600     } else printf("\n");
 601 }
 602
 603 void handlePlaceObject(TAG*tag, char*prefix)
 604 {
 605     TAG*tag2 = swf_InsertTag(0, ST_PLACEOBJECT2);
 606     U16 id, depth;
 607     MATRIX matrix;
 608     CXFORM cxform;
 609
 610     swf_SetTagPos(tag, 0);
 611     id = swf_GetU16(tag);
 612     depth = swf_GetU16(tag);
 613     swf_GetMatrix(tag, &matrix);
 614     swf_GetCXForm(tag, &cxform, 0);
 615
 616     swf_SetU8(tag2, 14 /* char, matrix, cxform */);
 617     swf_SetU16(tag2, depth);
 618     swf_SetU16(tag2, id);
 619     swf_SetMatrix(tag2, &matrix);
 620     swf_SetCXForm(tag2, &cxform, 1);
 621
 622     handlePlaceObject23(tag2, prefix);
 623 }
 624 char stylebuf[256];
 625 char* fillstyle2str(FILLSTYLE*style)
 626 {
 627     switch(style->type) {
 628         case 0x00:
 629             sprintf(stylebuf, "SOLID %02x%02x%02x%02x", style->color.r, style->color.g, style->color.b, style->color.a);
 630             break;
 631         case 0x10: case 0x12:
 632             sprintf(stylebuf, "GRADIENT (%d steps)", style->gradient.num);
 633             break;
 634         case 0x40: case 0x42:
 635             /* TODO: display information about that bitmap */
 636             sprintf(stylebuf, "BITMAPt%s %d", (style->type&2)?"n":"", style->id_bitmap);
 637             /* TODO: show matrix */
 638             break;
 639         case 0x41: case 0x43:
 640             /* TODO: display information about that bitmap */
 641             sprintf(stylebuf, "BITMAPc%s %d", (style->type&2)?"n":"", style->id_bitmap);
 642             /* TODO: show matrix */
 643             break;
 644         default:
 645             sprintf(stylebuf, "UNKNOWN[%02x]",style->type);
 646     }
 647     return stylebuf;
 648 }
 649 char* linestyle2str(LINESTYLE*style)
 650 {
 651     sprintf(stylebuf, "%.2f %02x%02x%02x%02x", style->width/20.0, style->color.r, style->color.g, style->color.b, style->color.a);
 652     return stylebuf;
 653 }
 654
 655 void handleShape(TAG*tag, char*prefix)
 656 {
 657     SHAPE2 shape;
 658     SHAPELINE*line;
 659     int t,max;
 660
 661     tag->pos = 0;
 662     tag->readBit = 0;
 663     swf_ParseDefineShape(tag, &shape);
 664
 665     max = shape.numlinestyles > shape.numfillstyles?shape.numlinestyles:shape.numfillstyles;
 666
 667     if(max) printf("%s | fillstyles(%02d)        linestyles(%02d)\n",
 668             prefix,
 669             shape.numfillstyles,
 670             shape.numlinestyles
 671             );
 672     else    printf("%s | (Neither line nor fill styles)\n", prefix);
 673
 674     for(t=0;t<max;t++) {
 675         printf("%s", prefix);
 676         if(t < shape.numfillstyles) {
 677             printf(" | %-2d) %-18.18s", t+1, fillstyle2str(&shape.fillstyles[t]));
 678         } else {
 679             printf("                         ");
 680         }
 681         if(t < shape.numlinestyles) {
 682             printf("%-2d) %s", t+1, linestyle2str(&shape.linestyles[t]));
 683         }
 684         printf("\n");
 685     }
 686
 687     printf("%s |\n", prefix);
 688
 689     line = shape.lines;
 690     while(line) {
 691         printf("%s | fill: %02d/%02d line:%02d - ",
 692                 prefix,
 693                 line->fillstyle0,
 694                 line->fillstyle1,
 695                 line->linestyle);
 696         if(line->type == moveTo) {
 697             printf("moveTo %.2f %.2f\n", line->x/20.0, line->y/20.0);
 698         } else if(line->type == lineTo) {
 699             printf("lineTo %.2f %.2f\n", line->x/20.0, line->y/20.0);
 700         } else if(line->type == splineTo) {
 701             printf("splineTo (%.2f %.2f) %.2f %.2f\n",
 702                     line->sx/20.0, line->sy/20.0,
 703                     line->x/20.0, line->y/20.0
 704                     );
 705         }
 706         line = line->next;
 707     }
 708     printf("%s |\n", prefix);
 709 }
 710
 711 void fontcallback1(void*self, U16 id,U8 * name)
 712 { fontnum++;
 713 }
 714
 715 void fontcallback2(void*self, U16 id,U8 * name)
 716 {
 717   swf_FontExtract(&swf,id,&fonts[fontnum]);
 718   fontnum++;
 719 }
 720
 721 static U8 printable(U8 a)
 722 {
 723     if(a<32 || a==127) return '.';
 724     else return a;
 725 }
 726 void hexdumpTag(TAG*tag, char* prefix)
 727 {
 728     int t;
 729     char ascii[32];
 730     printf("                %s-=> ",prefix);
 731     for(t=0;t<tag->len;t++) {
 732         printf("%02x ", tag->data[t]);
 733         ascii[t&15] = printable(tag->data[t]);
 734         if((t && ((t&15)==15)) || (t==tag->len-1))
 735         {
 736             int s,p=((t)&15)+1;
 737             ascii[p] = 0;
 738             for(s=p-1;s<16;s++) {
 739                 printf("   ");
 740             }
 741             if(t==tag->len-1)
 742                 printf(" %s\n", ascii);
 743             else
 744                 printf(" %s\n                %s-=> ",ascii,prefix);
 745         }
 746     }
 747 }
 748
 749 void handleExportAssets(TAG*tag, char* prefix)
 750 {
 751     int num;
 752     U16 id;
 753     char* name;
 754     int t;
 755     num = swf_GetU16(tag);
 756     for(t=0;t<num;t++)
 757     {
 758         id = swf_GetU16(tag);
 759         name = swf_GetString(tag);
 760         printf("%sexports %04d as \"%s\"\n", prefix, id, name);
 761     }
 762 }
 763
 764 void dumperror(const char* format, ...)
 765 {
 766     char buf[1024];
 767     va_list arglist;
 768
 769     va_start(arglist, format);
 770     vsprintf(buf, format, arglist);
 771     va_end(arglist);
 772
 773     if(!html && !xy)
 774         printf("==== Error: %s ====\n", buf);
 775 }
 776
 777 static char strbuf[800];
 778 static int bufpos=0;
 779
 780 char* timestring(double f)
 781 {
 782     int hours   = (int)(f/3600);
 783     int minutes = (int)((f-hours*3600)/60);
 784     int seconds = (int)((f-hours*3600-minutes*60));
 785     int useconds = (int)((f-(int)f)*1000+0.5);
 786     bufpos+=100;
 787     bufpos%=800;
 788     sprintf(&strbuf[bufpos], "%02d:%02d:%02d,%03d",hours,minutes,seconds,useconds);
 789     return &strbuf[bufpos];
 790 }
 791
 792 int main (int argc,char ** argv)
 793 {
 794     TAG*tag;
 795 #ifdef HAVE_STAT
 796     struct stat statbuf;
 797 #endif
 798     int f;
 799     int xsize,ysize;
 800     char issprite = 0; // are we inside a sprite definition?
 801     int spriteframe = 0;
 802     int mainframe=0;
 803     char* spriteframelabel = 0;
 804     char* framelabel = 0;
 805     char prefix[128];
 806     int filesize = 0;
 807     int filepos = 0;
 808     prefix[0] = 0;
 809     memset(idtab,0,65536);
 810
 811     processargs(argc, argv);
 812
 813     if(!filename)
 814     {
 815         fprintf(stderr, "You must supply a filename.\n");
 816         return 1;
 817     }
 818
 819     f = open(filename,O_RDONLY|O_BINARY);
 820
 821     if (f<0)
 822     {
 823         char buffer[256];
 824         sprintf(buffer, "Couldn't open %s", filename);
 825         perror(buffer);
 826         exit(1);
 827     }
 828     if FAILED(swf_ReadSWF(f,&swf))
 829     {
 830         fprintf(stderr, "%s is not a valid SWF file or contains errors.\n",filename);
 831         close(f);
 832         exit(1);
 833     }
 834
 835 #ifdef HAVE_STAT
 836     fstat(f, &statbuf);
 837     if(statbuf.st_size != swf.fileSize && !swf.compressed)
 838         dumperror("Real Filesize (%d) doesn't match header Filesize (%d)",
 839                 statbuf.st_size, swf.fileSize);
 840     filesize = statbuf.st_size;
 841 #endif
 842
 843     close(f);
 844
 845     xsize = (swf.movieSize.xmax-swf.movieSize.xmin)/20;
 846     ysize = (swf.movieSize.ymax-swf.movieSize.ymin)/20;
 847     if(xy)
 848     {
 849         if(xy&1)
 850         printf("-X %d", xsize);
 851
 852         if((xy&1) && (xy&6))
 853         printf(" ");
 854
 855         if(xy&2)
 856         printf("-Y %d", ysize);
 857
 858         if((xy&3) && (xy&4))
 859         printf(" ");
 860
 861         if(xy&4)
 862         printf("-r %.2f", swf.frameRate/256.0);
 863
 864         if((xy&7) && (xy&8))
 865         printf(" ");
 866
 867         if(xy&8)
 868         printf("-f %d", swf.frameCount);
 869
 870         printf("\n");
 871         return 0;
 872     }
 873     if(html)
 874     {
 875         char*fileversions[] = {"","1,0,0,0", "2,0,0,0","3,0,0,0","4,0,0,0",
 876                                "5,0,0,0","6,0,23,0","7,0,0,0","8,0,0,0","9,0,0,0"};
 877         if(swf.fileVersion>9) {
 878             fprintf(stderr, "Fileversion>9\n");
 879             exit(1);
 880         }
 881
 882         if(xhtml) {
 883             printf("<object type=\"application/x-shockwave-flash\" data=\"%s\" width=\"%d\" height=\"%d\">\n"
 884                             "<param name=\"movie\" value=\"%s\"/>\n"
 885                             "<param name=\"play\" value=\"true\"/>\n"
 886                             "<param name=\"loop\" value=\"false\"/>\n"
 887                             "<param name=\"quality\" value=\"high\"/>\n"
 888                             "<param name=\"loop\" value=\"false\"/>\n"
 889                             "</object>\n\n", filename, xsize, ysize, filename);
 890         } else {
 891             printf("<OBJECT CLASSID=\"clsid:D27CDB6E-AE6D-11cf-96B8-444553540000\"\n"
 892                    " WIDTH=\"%d\"\n"
 893                    //" BGCOLOR=#ffffffff\n"?
 894                    " HEIGHT=\"%d\"\n"
 895                    //http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=6,0,23,0?
 896                    " CODEBASE=\"http://active.macromedia.com/flash5/cabs/swflash.cab#version=%s\">\n"
 897                    "  <PARAM NAME=\"MOVIE\" VALUE=\"%s\">\n"
 898                    "  <PARAM NAME=\"PLAY\" VALUE=\"true\">\n"
 899                    "  <PARAM NAME=\"LOOP\" VALUE=\"true\">\n"
 900                    "  <PARAM NAME=\"QUALITY\" VALUE=\"high\">\n"
 901                    "  <EMBED SRC=\"%s\" WIDTH=\"%d\" HEIGHT=\"%d\"\n" //bgcolor=#ffffff?
 902                    "   PLAY=\"true\" ALIGN=\"\" LOOP=\"true\" QUALITY=\"high\"\n"
 903                    "   TYPE=\"application/x-shockwave-flash\"\n"
 904                    "   PLUGINSPAGE=\"http://www.macromedia.com/go/getflashplayer\">\n"
 905                    "  </EMBED>\n"
 906                    "</OBJECT>\n", xsize, ysize, fileversions[swf.fileVersion],
 907                                   filename, filename, xsize, ysize);
 908         }
 909         return 0;
 910     }
 911     printf("[HEADER]        File version: %d\n", swf.fileVersion);
 912     if(swf.compressed) {
 913         printf("[HEADER]        File is zlib compressed.");
 914         if(filesize && swf.fileSize)
 915             printf(" Ratio: %02d%%\n", filesize*100/(swf.fileSize));
 916         else
 917             printf("\n");
 918     }
 919     printf("[HEADER]        File size: %ld%s\n", swf.fileSize, swf.compressed?" (Depacked)":"");
 920     printf("[HEADER]        Frame rate: %f\n",swf.frameRate/256.0);
 921     printf("[HEADER]        Frame count: %d\n",swf.frameCount);
 922     printf("[HEADER]        Movie width: %.2f",(swf.movieSize.xmax-swf.movieSize.xmin)/20.0);
 923     if(swf.movieSize.xmin)
 924         printf(" (left offset: %.2f)\n", swf.movieSize.xmin/20.0);
 925     else
 926         printf("\n");
 927     printf("[HEADER]        Movie height: %.2f",(swf.movieSize.ymax-swf.movieSize.ymin)/20.0);
 928     if(swf.movieSize.ymin)
 929         printf(" (top offset: %.2f)\n", swf.movieSize.ymin/20.0);
 930     else
 931         printf("\n");
 932
 933     tag = swf.firstTag;
 934
 935     if(showtext) {
 936         fontnum = 0;
 937         swf_FontEnumerate(&swf,&fontcallback1, 0);
 938         fonts = (SWFFONT**)malloc(fontnum*sizeof(SWFFONT*));
 939         fontnum = 0;
 940         swf_FontEnumerate(&swf,&fontcallback2, 0);
 941     }
 942
 943     while(tag) {
 944         char*name = swf_TagGetName(tag);
 945         char myprefix[128];
 946         if(!name) {
 947             dumperror("Unknown tag:0x%03x", tag->id);
 948             //tag = tag->next;
 949             //continue;
 950         }
 951         if(!name) {
 952             name = "UNKNOWN TAG";
 953         }
 954         if(cumulative) {
 955             filepos += tag->len;
 956             printf("[%03x] %9ld %9ld %s%s", tag->id, tag->len, filepos, prefix, swf_TagGetName(tag));
 957         } else {
 958             printf("[%03x] %9ld %s%s", tag->id, tag->len, prefix, swf_TagGetName(tag));
 959         }
 960
 961         if(swf_isDefiningTag(tag)) {
 962             U16 id = swf_GetDefineID(tag);
 963             printf(" defines id %04d", id);
 964             if(idtab[id])
 965                 dumperror("Id %04d is defined more than once.", id);
 966             idtab[id] = 1;
 967         }
 968         else if(swf_isPseudoDefiningTag(tag)) {
 969             U16 id = swf_GetDefineID(tag);
 970             printf(" adds information to id %04d", id);
 971             if(!idtab[id])
 972                 dumperror("Id %04d is not yet defined.\n", id);
 973         }
 974         else if(tag->id == ST_PLACEOBJECT) {
 975             printf(" places id %04d at depth %04x", swf_GetPlaceID(tag), swf_GetDepth(tag));
 976             if(swf_GetName(tag))
 977                 printf(" name \"%s\"",swf_GetName(tag));
 978         }
 979         else if(tag->id == ST_PLACEOBJECT2 || tag->id == ST_PLACEOBJECT3) {
 980             if(tag->data[0]&1)
 981                 printf(" moves");
 982             else
 983                 printf(" places");
 984
 985             if(tag->data[0]&2)
 986                 printf(" id %04d",swf_GetPlaceID(tag));
 987             else
 988                 printf(" object");
 989
 990             printf(" at depth %04d", swf_GetDepth(tag));
 991
 992             if(tag->data[1]&4)
 993                 printf(" as bitmap");
 994
 995             swf_SetTagPos(tag, 0);
 996             if(tag->data[0]&64) {
 997                 SWFPLACEOBJECT po;
 998                 swf_GetPlaceObject(tag, &po);
 999                 printf(" (clip to %04d)", po.clipdepth);
1000                 swf_PlaceObjectFree(&po);
1001             }
1002             if(swf_GetName(tag))
1003                 printf(" name \"%s\"",swf_GetName(tag));
1004
1005         }
1006         else if(tag->id == ST_REMOVEOBJECT) {
1007             printf(" removes id %04d from depth %04d", swf_GetPlaceID(tag), swf_GetDepth(tag));
1008         }
1009         else if(tag->id == ST_REMOVEOBJECT2) {
1010             printf(" removes object from depth %04d", swf_GetDepth(tag));
1011         }
1012         else if(tag->id == ST_FREECHARACTER) {
1013             printf(" frees object %04d", swf_GetPlaceID(tag));
1014         }
1015         else if(tag->id == ST_STARTSOUND) {
1016             U8 flags;
1017             U16 id;
1018             id = swf_GetU16(tag);
1019             flags = swf_GetU8(tag);
1020             if(flags & 32)
1021                 printf(" stops sound with id %04d", id);
1022             else
1023                 printf(" starts sound with id %04d", id);
1024             if(flags & 16)
1025                 printf(" (if not already playing)");
1026             if(flags & 1)
1027                 swf_GetU32(tag);
1028             if(flags & 2)
1029                 swf_GetU32(tag);
1030             if(flags & 4) {
1031                 printf(" looping %d times", swf_GetU16(tag));
1032             }
1033         }
1034         else if(tag->id == ST_FRAMELABEL) {
1035             int l = strlen(tag->data);
1036             printf(" \"%s\"", tag->data);
1037             if((l+1) < tag->len) {
1038                 printf(" has %d extra bytes", tag->len-1-l);
1039                 if(tag ->len - (l+1) == 1 && tag->data[tag->len-1] == 1)
1040                     printf(" (ANCHOR)");
1041             }
1042             if((framelabel && !issprite) ||
1043                (spriteframelabel && issprite)) {
1044                 dumperror("Frame %d has more than one label",
1045                         issprite?spriteframe:mainframe);
1046             }
1047             if(issprite) spriteframelabel = tag->data;
1048             else framelabel = tag->data;
1049         }
1050         else if(tag->id == ST_SHOWFRAME) {
1051             char*label = issprite?spriteframelabel:framelabel;
1052             int frame = issprite?spriteframe:mainframe;
1053             int nframe = frame;
1054             if(!label) {
1055                 while(tag->next && tag->next->id == ST_SHOWFRAME && tag->next->len == 0) {
1056                     tag = tag->next;
1057                     if(issprite) spriteframe++;
1058                     else mainframe++;
1059                     nframe++;
1060                 }
1061             }
1062             if(nframe == frame)
1063                 printf(" %d (%s)", frame+1, timestring(frame*(256.0/(swf.frameRate+0.1))));
1064             else
1065                 printf(" %d-%d (%s-%s)", frame+1, nframe+1,
1066                         timestring(frame*(256.0/(swf.frameRate+0.1))),
1067                         timestring(nframe*(256.0/(swf.frameRate+0.1)))
1068                         );
1069             if(label)
1070                 printf(" (label \"%s\")", label);
1071             if(issprite) {spriteframe++; spriteframelabel = 0;}
1072             if(!issprite) {mainframe++; framelabel = 0;}
1073         }
1074
1075         if(tag->id == ST_SETBACKGROUNDCOLOR) {
1076             U8 r = swf_GetU8(tag);
1077             U8 g = swf_GetU8(tag);
1078             U8 b = swf_GetU8(tag);
1079             printf(" (%02x/%02x/%02x)\n",r,g,b);
1080         }
1081         else if(tag->id == ST_PROTECT) {
1082             if(tag->len>0) {
1083                 printf(" %s\n", swf_GetString(tag));
1084             } else {
1085                 printf("\n");
1086             }
1087         }
1088         else if(tag->id == ST_DEFINEBITSLOSSLESS ||
1089            tag->id == ST_DEFINEBITSLOSSLESS2) {
1090             handleDefineBits(tag);
1091             printf("\n");
1092         }
1093         else if(tag->id == ST_DEFINESOUND) {
1094             handleDefineSound(tag);
1095             printf("\n");
1096         }
1097         else if(tag->id == ST_VIDEOFRAME) {
1098             handleVideoFrame(tag, myprefix);
1099             printf("\n");
1100         }
1101         else if(tag->id == ST_DEFINEVIDEOSTREAM) {
1102             handleVideoStream(tag, myprefix);
1103             printf("\n");
1104         }
1105         else if(tag->id == ST_DEFINEEDITTEXT) {
1106             handleEditText(tag);
1107             printf("\n");
1108         }
1109         else if(tag->id == ST_DEFINEMOVIE) {
1110             U16 id = swf_GetU16(tag);
1111             char*s = swf_GetString(tag);
1112             printf(" URL: %s\n", s);
1113         }
1114         else if(tag->id == ST_DEFINETEXT || tag->id == ST_DEFINETEXT2) {
1115             if(showtext)
1116                 handleText(tag);
1117             else
1118                 printf("\n");
1119         }
1120         else if(tag->id == ST_PLACEOBJECT2 || tag->id == ST_PLACEOBJECT3) {
1121         }
1122         else if(tag->id == ST_NAMECHARACTER) {
1123             swf_GetU16(tag);
1124             printf(" \"%s\"\n", swf_GetString(tag));
1125         }
1126         else {
1127             printf("\n");
1128         }
1129
1130         if(bbox && swf_isDefiningTag(tag) && tag->id != ST_DEFINESPRITE) {
1131             SRECT r = swf_GetDefineBBox(tag);
1132             printf("                %s bbox [%.2f, %.2f, %.2f, %.2f]\n", prefix,
1133                     r.xmin/20.0,
1134                     r.ymin/20.0,
1135                     r.xmax/20.0,
1136                     r.ymax/20.0);
1137         }
1138
1139         sprintf(myprefix, "                %s", prefix);
1140
1141         if(tag->id == ST_DEFINESPRITE) {
1142             sprintf(prefix, "         ");
1143             if(issprite) {
1144                 dumperror("Sprite definition inside a sprite definition");
1145             }
1146             issprite = 1;
1147             spriteframe = 0;
1148             spriteframelabel = 0;
1149         }
1150         else if(tag->id == ST_END) {
1151             *prefix = 0;
1152             issprite = 0;
1153             spriteframelabel = 0;
1154             if(tag->len)
1155                 dumperror("End Tag not empty");
1156         }
1157         else if(tag->id == ST_EXPORTASSETS) {
1158             handleExportAssets(tag, myprefix);
1159         }
1160         else if(tag->id == ST_DOACTION && action) {
1161             ActionTAG*actions;
1162             actions = swf_ActionGet(tag);
1163             swf_DumpActions(actions, myprefix);
1164         }
1165         else if(tag->id == ST_DOINITACTION && action) {
1166             ActionTAG*actions;
1167             swf_GetU16(tag); // id
1168             actions = swf_ActionGet(tag);
1169             swf_DumpActions(actions, myprefix);
1170         }
1171         else if(tag->id == ST_DEFINEBUTTON && action) {
1172             dumpButtonActions(tag, myprefix);
1173         }
1174         else if(tag->id == ST_DEFINEBUTTON2 && action) {
1175             dumpButton2Actions(tag, myprefix);
1176         }
1177         else if(tag->id == ST_PLACEOBJECT) {
1178             handlePlaceObject(tag, myprefix);
1179         }
1180         else if(tag->id == ST_PLACEOBJECT2 || tag->id == ST_PLACEOBJECT3) {
1181             handlePlaceObject23(tag, myprefix);
1182         }
1183         else if(tag->id == ST_DEFINESHAPE ||
1184                 tag->id == ST_DEFINESHAPE2 ||
1185                 tag->id == ST_DEFINESHAPE3) {
1186             if(showshapes)
1187                 handleShape(tag, myprefix);
1188         }
1189
1190         if(tag->len && used) {
1191             int num = swf_GetNumUsedIDs(tag);
1192             int* used;
1193             int t;
1194             if(num) {
1195                 used = (int*)malloc(sizeof(int)*num);
1196                 swf_GetUsedIDs(tag, used);
1197                 printf("%s%suses IDs: ", indent, prefix);
1198                 for(t=0;t<num;t++) {
1199                     int id;
1200                     swf_SetTagPos(tag, used[t]);
1201                     id = swf_GetU16(tag);
1202                     printf("%d%s", id, t<num-1?", ":"");
1203                     if(!idtab[id]) {
1204                         dumperror("Id %04d is not yet defined.\n", id);
1205                     }
1206                 }
1207                 printf("\n");
1208             }
1209         }
1210
1211         if(tag->id == ST_FREECHARACTER) {
1212             U16 id;
1213             swf_SetTagPos(tag, 0);
1214             id = swf_GetU16(tag);
1215             idtab[id] = 0;
1216         }
1217
1218         if(tag->len && hex) {
1219             hexdumpTag(tag, prefix);
1220         }
1221         tag = tag->next;
1222         fflush(stdout);
1223     }
1224
1225     swf_FreeTags(&swf);
1226     return 0;
1227 }
1228
1229