src/swfextract.c

   1 /* swfextract.c
   2    Allows to extract parts of the swf into a new file.
   3
   4    Part of the swftools package.
   5
   6    Copyright (c) 2001 Matthias Kramm <kramm@quiss.org>
   7
   8    This file is distributed under the GPL, see file COPYING for details */
   9
  10 #include <unistd.h>
  11 #include <stdio.h>
  12 #include <fcntl.h>
  13 #include "../lib/rfxswf.h"
  14 #include "../lib/args.h"
  15 #include "../lib/log.h"
  16 #ifdef HAVE_ZLIB_H
  17 #ifdef HAVE_LIBZ
  18 #include "zlib.h"
  19 #define _ZLIB_INCLUDED_
  20 #endif
  21 #endif
  22
  23 char * filename = 0;
  24 char * destfilename = "output.swf";
  25 int verbose = 3;
  26
  27 char* extractids = 0;
  28 char* extractframes = 0;
  29 char* extractjpegids = 0;
  30 char* extractpngids = 0;
  31 char extractmp3 = 0;
  32
  33 char* extractname = 0;
  34
  35 char hollow = 0;
  36
  37 int numextracts = 0;
  38
  39 struct options_t options[] =
  40 {
  41  {"o","output"},
  42  {"w","hollow"},
  43  {"v","verbose"},
  44  {"i","id"},
  45  {"j","jpegs"},
  46  {"p","pngs"},
  47  {"m","mp3"},
  48  {"n","name"},
  49  {"f","frame"},
  50  {"V","version"},
  51  {0,0}
  52 };
  53
  54
  55 int args_callback_option(char*name,char*val)
  56 {
  57     if(!strcmp(name, "V")) {
  58         printf("swfextract - part of %s %s\n", PACKAGE, VERSION);
  59         exit(0);
  60     }
  61     else if(!strcmp(name, "o")) {
  62         destfilename = val;
  63         return 1;
  64     }
  65     else if(!strcmp(name, "i")) {
  66         extractids = val;
  67         numextracts++;
  68         if(extractname) {
  69             fprintf(stderr, "You can only supply either name or id\n");
  70             exit(1);
  71         }
  72         return 1;
  73     }
  74     else if(!strcmp(name, "n")) {
  75         extractname = val;
  76         numextracts++;
  77         if(extractids) {
  78             fprintf(stderr, "You can only supply either name or id\n");
  79             exit(1);
  80         }
  81         return 1;
  82     }
  83     else if(!strcmp(name, "v")) {
  84         verbose ++;
  85         return 0;
  86     }
  87     else if(!strcmp(name, "m")) {
  88         extractmp3 = 1;
  89         numextracts++;
  90         return 0;
  91     }
  92     else if(!strcmp(name, "j")) {
  93         if(extractjpegids) {
  94             fprintf(stderr, "Only one --jpegs argument is allowed. (Try to use a range, e.g. -j 1,2,3)\n");
  95             exit(1);
  96         }
  97         numextracts++;
  98         extractjpegids = val;
  99         return 1;
 100     }
 101 #ifdef _ZLIB_INCLUDED_
 102     else if(!strcmp(name, "p")) {
 103         if(extractpngids) {
 104             fprintf(stderr, "Only one --pngs argument is allowed. (Try to use a range, e.g. -p 1,2,3)\n");
 105             exit(1);
 106         }
 107         numextracts++;
 108         extractpngids = val;
 109         return 1;
 110     }
 111 #endif
 112     else if(!strcmp(name, "f")) {
 113         numextracts++;
 114         extractframes = val;
 115         return 1;
 116     }
 117     else if(!strcmp(name, "w")) {
 118         hollow = 1;
 119         return 0;
 120     }
 121     else {
 122         printf("Unknown option: -%s\n", name);
 123         return 0;
 124     }
 125
 126     return 0;
 127 }
 128 int args_callback_longoption(char*name,char*val)
 129 {
 130     return args_long2shortoption(options, name, val);
 131 }
 132 void args_callback_usage(char*name)
 133 {
 134     printf("Usage: %s [-v] [-n name] [-ijf ids] file.swf\n", name);
 135     printf("\t-v , --verbose\t\t\t Be more verbose\n");
 136     printf("\t-o , --output filename\t\t set output filename\n");
 137     printf("\t-n , --name name\t\t instance name of the object to extract\n");
 138     printf("\t-i , --id IDs\t\t\t ID of the object to extract\n");
 139     printf("\t-j , --jpeg IDs\t\t\t IDs of the JPEG pictures to extract\n");
 140 #ifdef _ZLIB_INCLUDED_
 141     printf("\t-p , --pngs IDs\t\t\t IDs of the PNG pictures to extract\n");
 142 #endif
 143     printf("\t-m , --mp3\t\t\t Extract main mp3 stream\n");
 144     printf("\t-f , --frame frames\t\t frame numbers to extract\n");
 145     printf("\t-w , --hollow\t\t\t hollow mode: don't remove empty frames\n");
 146     printf("\t             \t\t\t (use with -f)\n");
 147     printf("\t-V , --version\t\t\t Print program version and exit\n");
 148 }
 149 int args_callback_command(char*name,char*val)
 150 {
 151     if(filename) {
 152         fprintf(stderr, "Only one file allowed. You supplied at least two. (%s and %s)\n",
 153                  filename, name);
 154     }
 155     filename = name;
 156     return 0;
 157 }
 158
 159 U8 mainr,maing,mainb;
 160 /* 1 = used, not expanded,
 161    3 = used, expanded
 162    5 = wanted, not expanded
 163    7 = wanted, expanded
 164  */
 165 char used[65536];
 166 TAG*tags[65536];
 167 int changed;
 168 char * tagused;
 169
 170 void idcallback(void*data)
 171 {
 172     if(!(used[GET16(data)]&1)) {
 173         changed = 1;
 174         used[GET16(data)] |= 1;
 175     }
 176 }
 177
 178 void enumerateIDs(TAG*tag, void(*callback)(void*))
 179 {
 180 /*    U8*data;
 181     int len = tag->len;
 182     if(tag->len>=64) {
 183         len += 6;
 184         data = (U8*)malloc(len);
 185         PUT16(data, (tag->id<<6)+63);
 186         *(U8*)&data[2] = tag->len;
 187         *(U8*)&data[3] = tag->len>>8;
 188         *(U8*)&data[4] = tag->len>>16;
 189         *(U8*)&data[5] = tag->len>>24;
 190         memcpy(&data[6], tag->data, tag->len);
 191     } else {
 192         len += 2;
 193         data = (U8*)malloc(len);
 194         PUT16(data, (tag->id<<6)+tag->len);
 195         memcpy(&data[2], tag->data, tag->len);
 196     }
 197     map_ids_mem(data, len, callback);
 198  */
 199     int num = swf_GetNumUsedIDs(tag);
 200     int *ptr = malloc(sizeof(int)*num);
 201     int t;
 202     swf_GetUsedIDs(tag, ptr);
 203     for(t=0;t<num;t++)
 204         callback(&tag->data[ptr[t]]);
 205 }
 206
 207 void extractTag(SWF*swf, char*filename)
 208 {
 209     SWF newswf;
 210     TAG*desttag;
 211     TAG*srctag;
 212     RGBA rgb;
 213     char sprite;
 214     int f;
 215     int t;
 216     int tagnum;
 217     int copy = 0;
 218     memset(&newswf,0x00,sizeof(SWF));        // set global movie parameters
 219
 220     newswf.fileVersion    = swf->fileVersion;
 221     newswf.frameRate      = swf->frameRate;
 222     newswf.movieSize      = swf->movieSize;
 223
 224     newswf.firstTag = swf_InsertTag(NULL,ST_SETBACKGROUNDCOLOR);
 225     desttag = newswf.firstTag;
 226     rgb.r = mainr;
 227     rgb.g = maing;
 228     rgb.b = mainb;
 229     swf_SetRGB(desttag,&rgb);
 230
 231     do {
 232        changed = 0;
 233        for(t=0;t<65536;t++) {
 234            if(used[t] && !(used[t]&2)) {
 235              if(tags[t]->id==ST_DEFINESPRITE) {
 236                  TAG*tag = tags[t];
 237                  while(tag->id != ST_END)
 238                  {
 239                      enumerateIDs(tag, idcallback);
 240                      tag = tag->next;
 241                  }
 242              }
 243              else
 244                enumerateIDs(tags[t], idcallback);
 245              used[t] |= 2;
 246            }
 247        }
 248     }
 249     while(changed);
 250
 251     srctag = swf->firstTag;
 252     tagnum = 0;
 253     sprite = 0;
 254     while(srctag && (srctag->id || sprite)) {
 255         int reset = 0;
 256         if(!sprite) {
 257             copy = 0;
 258         }
 259         if(srctag->id == ST_END) {
 260             sprite = 0;
 261         }
 262         if(srctag->id == ST_DEFINESPRITE)
 263             sprite = 1;
 264         if(swf_isDefiningTag(srctag)) {
 265             int id = swf_GetDefineID(srctag);
 266             if(used[id])
 267                 copy = 1;
 268         } else
 269         if (((srctag->id == ST_PLACEOBJECT ||
 270               srctag->id == ST_PLACEOBJECT2 ||
 271               srctag->id == ST_STARTSOUND) && (used[swf_GetPlaceID(srctag)]&4) ) ||
 272               (swf_isPseudoDefiningTag(srctag) && used[swf_GetDefineID(srctag)]) ||
 273               (tagused[tagnum]))
 274         {
 275                 if(copy == 0)
 276                     reset = 1;
 277                 copy = 1;
 278         }
 279         if(srctag->id == ST_REMOVEOBJECT) {
 280             if(!used[swf_GetPlaceID(srctag)])
 281                 copy = 0;
 282         }
 283
 284         if(copy) {
 285             TAG*ttag = (TAG*)malloc(sizeof(TAG));
 286             desttag = swf_InsertTag(desttag, srctag->id);
 287             desttag->len = desttag->memsize = srctag->len;
 288             desttag->data = malloc(srctag->len);
 289             memcpy(desttag->data, srctag->data, srctag->len);
 290             if(reset)
 291                 copy = 0;
 292         }
 293
 294         srctag = srctag->next;
 295         tagnum ++;
 296     }
 297     if(!extractframes && !hollow)
 298         desttag = swf_InsertTag(desttag,ST_SHOWFRAME);
 299
 300     desttag = swf_InsertTag(desttag,ST_END);
 301
 302     f = open(filename, O_TRUNC|O_WRONLY|O_CREAT, 0644);
 303     if FAILED(swf_WriteSWF(f,&newswf)) fprintf(stderr,"WriteSWF() failed.\n");
 304     close(f);
 305
 306     swf_FreeTags(&newswf);                       // cleanup
 307 }
 308
 309 void listObjects(SWF*swf)
 310 {
 311     TAG*tag;
 312     char first;
 313     int t;
 314     int frame = 0;
 315     char*names[] = {"Shapes","MovieClips","JPEGs","PNGs","Sounds","Frames"};
 316     printf("Objects in file %s:\n",filename);
 317     for(t=0;t<6;t++) {
 318         tag = swf->firstTag;
 319         first = 1;
 320         while(tag) {
 321             char show = 0;
 322             char text[80];
 323             if(t == 0 &&
 324                (tag->id == ST_DEFINESHAPE ||
 325                 tag->id == ST_DEFINESHAPE2 ||
 326                 tag->id == ST_DEFINESHAPE3)) {
 327                 show = 1;
 328                 sprintf(text,"%d", swf_GetDefineID(tag));
 329             }
 330
 331             if(tag->id == ST_DEFINESPRITE) {
 332                 if (t == 1)  {
 333                     show = 1;
 334                     sprintf(text,"%d", swf_GetDefineID(tag));
 335                 }
 336
 337                 while(tag->id != ST_END)
 338                     tag = tag->next;
 339             }
 340
 341             if(t == 2 && (tag->id == ST_DEFINEBITS ||
 342                 tag->id == ST_DEFINEBITSJPEG2 ||
 343                 tag->id == ST_DEFINEBITSJPEG3)) {
 344                 show = 1;
 345                 sprintf(text,"%d", swf_GetDefineID(tag));
 346             }
 347
 348             if(t == 3 && (tag->id == ST_DEFINEBITSLOSSLESS ||
 349                 tag->id == ST_DEFINEBITSLOSSLESS2)) {
 350                 show = 1;
 351                 sprintf(text,"%d", swf_GetDefineID(tag));
 352             }
 353
 354
 355             if(t == 4 && (tag->id == ST_DEFINESOUND)) {
 356                 show = 1;
 357                 sprintf(text,"%d", swf_GetDefineID(tag));
 358             }
 359
 360             if(t == 5 && (tag->id == ST_SHOWFRAME)) {
 361                 show = 1;
 362                 sprintf(text,"%d", frame);
 363                 frame ++;
 364             }
 365
 366             if(show) {
 367                 if(!first)
 368                     printf(", ");
 369                 else
 370                     printf("%s: ", names[t]);
 371                 printf("%s", text);
 372                 first = 0;
 373             }
 374             tag=tag->next;
 375         }
 376         if(!first)
 377             printf("\n");
 378     }
 379 }
 380
 381 U8*jpegtables = 0;
 382 int jpegtablessize;
 383
 384 void handlejpegtables(TAG*tag)
 385 {
 386     if(tag->id == ST_JPEGTABLES) {
 387         jpegtables = tag->data;
 388         jpegtablessize = tag->len;
 389     }
 390 }
 391
 392 FILE* save_fopen(char* name, char* mode)
 393 {
 394     FILE*fi = fopen(name, mode);
 395     if(!fi) {
 396         fprintf(stderr, "Error: Couldn't open %s\n", name);
 397         exit(1);
 398     }
 399     return fi;
 400 }
 401
 402 int findjpegboundary(U8*data, int len)
 403 {
 404     int t;
 405     int pos=-1;
 406     for(t=0;t<len;t++) {
 407         if(data[t  ]==0xff &&
 408            data[t+1]==0xd9 &&
 409            data[t+2]==0xff &&
 410            data[t+3]==0xd8) {
 411             pos = t;
 412         }
 413     }
 414     return pos;
 415 }
 416
 417 /* extract jpeg data out of a tag */
 418 void handlejpeg(TAG*tag)
 419 {
 420     char name[80];
 421     FILE*fi;
 422     sprintf(name, "pic%d.jpeg", GET16(tag->data));
 423     /* swf jpeg images have two streams, which both start with ff d8 and
 424        end with ff d9. The following code handles sorting the middle
 425        <ff d9 ff d8> bytes out, so that one stream remains */
 426     if(tag->id == ST_DEFINEBITS && tag->len>2 && jpegtables) {
 427         fi = save_fopen(name, "wb");
 428         fwrite(jpegtables, 1, jpegtablessize-2, fi); //don't write end tag (ff,d8)
 429         fwrite(&tag->data[2+2], tag->len-2-2, 1, fi); //don't write start tag (ff,d9)
 430         fclose(fi);
 431     }
 432     if(tag->id == ST_DEFINEBITSJPEG2 && tag->len>2) {
 433         int end = tag->len;
 434         int pos = findjpegboundary(&tag->data[2], tag->len-2);
 435         if(pos<0)
 436             return;
 437         pos+=2;
 438         fi = save_fopen(name, "wb");
 439         fwrite(&tag->data[2], pos-2, 1, fi);
 440         fwrite(&tag->data[pos+4], end-(pos+4), 1, fi);
 441         fclose(fi);
 442     }
 443     if(tag->id == ST_DEFINEBITSJPEG3 && tag->len>6) {
 444         U32 end = GET32(&tag->data[2])+6;
 445         int pos = findjpegboundary(&tag->data[6], tag->len-6);
 446         if(pos<0)
 447             return;
 448         pos+=6;
 449         fi = save_fopen(name, "wb");
 450         fwrite(&tag->data[6], pos-6, 1, fi);
 451         fwrite(&tag->data[pos+4], end-(pos+4), 1, fi);
 452         fclose(fi);
 453     }
 454 }
 455
 456 #ifdef _ZLIB_INCLUDED_
 457 static U32 mycrc32;
 458
 459 static U32*crc32_table = 0;
 460 static void make_crc32_table(void)
 461 {
 462   int t;
 463   if(crc32_table)
 464       return;
 465   crc32_table = (U32*)malloc(1024);
 466
 467   for (t = 0; t < 256; t++) {
 468     U32 c = t;
 469     int s;
 470     for (s = 0; s < 8; s++) {
 471       c = (0xedb88320L*(c&1)) ^ (c >> 1);
 472     }
 473     crc32_table[t] = c;
 474   }
 475 }
 476 static void png_write_byte(FILE*fi, U8 byte)
 477 {
 478     fwrite(&byte,1,1,fi);
 479     mycrc32 = crc32_table[(mycrc32 ^ byte) & 0xff] ^ (mycrc32 >> 8);
 480 }
 481 static void png_start_chunk(FILE*fi, char*type, int len)
 482 {
 483     U8 mytype[4]={0,0,0,0};
 484     U32 mylen = REVERSESWAP32(len);
 485     memcpy(mytype,type,strlen(type));
 486     fwrite(&mylen, 4, 1, fi);
 487     mycrc32=0xffffffff;
 488     png_write_byte(fi,mytype[0]);
 489     png_write_byte(fi,mytype[1]);
 490     png_write_byte(fi,mytype[2]);
 491     png_write_byte(fi,mytype[3]);
 492 }
 493 static void png_write_bytes(FILE*fi, U8*bytes, int len)
 494 {
 495     int t;
 496     for(t=0;t<len;t++)
 497         png_write_byte(fi,bytes[t]);
 498 }
 499 static void png_write_dword(FILE*fi, U32 dword)
 500 {
 501     png_write_byte(fi,dword>>24);
 502     png_write_byte(fi,dword>>16);
 503     png_write_byte(fi,dword>>8);
 504     png_write_byte(fi,dword);
 505 }
 506 static void png_end_chunk(FILE*fi)
 507 {
 508     U32 tmp = REVERSESWAP32((mycrc32^0xffffffff));
 509     fwrite(&tmp,4,1,fi);
 510 }
 511
 512
 513 /* extract a lossless image (png) out of a tag
 514    This routine was originally meant to be a one-pager. I just
 515    didn't know png is _that_ much fun. :) -mk
 516  */
 517 void handlelossless(TAG*tag)
 518 {
 519     char name[80];
 520     FILE*fi;
 521     int width, height;
 522     int crc;
 523     int id;
 524     int t;
 525     U8 bpp = 1;
 526     U8 format;
 527     U8 tmp;
 528     U8* data=0;
 529     U8* data2=0;
 530     U8* data3=0;
 531     U32 datalen;
 532     U32 datalen2;
 533     U32 datalen3;
 534     U8 head[] = {137,80,78,71,13,10,26,10};
 535     int cols;
 536     char alpha = tag->id == ST_DEFINEBITSLOSSLESS2;
 537     RGBA* palette;
 538     int pos;
 539     int error;
 540     U32 tmp32;
 541
 542     make_crc32_table();
 543
 544     if(tag->id != ST_DEFINEBITSLOSSLESS &&
 545        tag->id != ST_DEFINEBITSLOSSLESS2)
 546         return;
 547
 548     id =swf_GetU16(tag);
 549     format = swf_GetU8(tag);
 550     if(format == 3) bpp = 8;
 551     if(format == 4) bpp = 16;
 552     if(format == 5) bpp = 32;
 553     if(format!=3 && format!=5) {
 554         if(format==4)
 555         fprintf(stderr, "Can't handle 16-bit palette images yet (image %d)\n",id);
 556         else
 557         fprintf(stderr, "Unknown image type %d in image %d\n", format, id);
 558         return;
 559     }
 560     width = swf_GetU16(tag);
 561     height = swf_GetU16(tag);
 562     if(format == 3) cols = swf_GetU8(tag) + 1;
 563 // this is what format means according to the flash specification. (which is
 564 // clearly wrong)
 565 //    if(format == 4) cols = swf_GetU16(tag) + 1;
 566 //    if(format == 5) cols = swf_GetU32(tag) + 1;
 567     else cols = 0;
 568
 569     logf("<verbose> Width %d", width);
 570     logf("<verbose> Height %d", height);
 571     logf("<verbose> Format %d", format);
 572     logf("<verbose> Cols %d", cols);
 573     logf("<verbose> Bpp %d", bpp);
 574
 575     datalen = (width*height*bpp/8+cols*8);
 576     do {
 577         if(data)
 578             free(data);
 579         datalen+=4096;
 580         data = malloc(datalen);
 581         error = uncompress (data, &datalen, &tag->data[tag->pos], tag->len-tag->pos);
 582     } while(error == Z_BUF_ERROR);
 583     if(error != Z_OK) {
 584         fprintf(stderr, "Zlib error %d (image %d)\n", error, id);
 585         return;
 586     }
 587     logf("<verbose> Uncompressed image is %d bytes (%d colormap)", datalen, (3+alpha)*cols);
 588     pos = 0;
 589     datalen2 = datalen;
 590     data2 = malloc(datalen2);
 591     palette = (RGBA*)malloc(cols*sizeof(RGBA));
 592
 593     for(t=0;t<cols;t++) {
 594         palette[t].r = data[pos++];
 595         palette[t].g = data[pos++];
 596         palette[t].b = data[pos++];
 597         if(alpha) {
 598             palette[t].a = data[pos++];
 599         }
 600     }
 601
 602     sprintf(name, "pic%d.png", id);
 603     fi = save_fopen(name, "wb");
 604     fwrite(head,sizeof(head),1,fi);
 605
 606     png_start_chunk(fi, "IHDR", 13);
 607      png_write_dword(fi,width);
 608      png_write_dword(fi,height);
 609      png_write_byte(fi,8);
 610      if(format == 3)
 611      png_write_byte(fi,3); //indexed
 612      else if(format == 5)
 613      png_write_byte(fi,2); //rgb
 614      else return;
 615
 616      png_write_byte(fi,0); //compression mode
 617      png_write_byte(fi,0); //filter mode
 618      png_write_byte(fi,0); //interlace mode
 619     png_end_chunk(fi);
 620
 621     if(format == 3) {
 622         png_start_chunk(fi, "PLTE", 768);
 623          for(t=0;t<256;t++) {
 624              png_write_byte(fi,palette[t].r);
 625              png_write_byte(fi,palette[t].g);
 626              png_write_byte(fi,palette[t].b);
 627          }
 628         png_end_chunk(fi);
 629     }
 630     {
 631         int pos2 = 0;
 632         int x,y;
 633         int srcwidth = width * (bpp/8);
 634         datalen3 = width*height*4;
 635         data3 = (U8*)malloc(datalen3);
 636         for(y=0;y<height;y++)
 637         {
 638            data3[pos2++]=0; //filter type
 639            if(bpp==32) {
 640             // 32 bit to 24 bit "conversion"
 641             for(x=0;x<width;x++) {
 642                 data3[pos2++]=data[pos+1];
 643                 data3[pos2++]=data[pos+2];
 644                 data3[pos2++]=data[pos+3];
 645                 pos+=4; //ignore padding byte
 646             }
 647            }
 648            else {
 649                 for(x=0;x<srcwidth;x++)
 650                     data3[pos2++]=data[pos++];
 651            }
 652
 653            pos+=((srcwidth+3)&~3)-srcwidth; //align
 654         }
 655         datalen3=pos2;
 656     }
 657
 658     if(compress (data2, &datalen2, data3, datalen3) != Z_OK) {
 659         fprintf(stderr, "zlib error in pic %d\n", id);
 660         return;
 661     }
 662     logf("<verbose> Compressed data is %d bytes", datalen2);
 663     png_start_chunk(fi, "IDAT", datalen2);
 664     png_write_bytes(fi,data2,datalen2);
 665     png_end_chunk(fi);
 666     png_start_chunk(fi, "IEND", 0);
 667     png_end_chunk(fi);
 668
 669     free(data);
 670     free(data2);
 671     free(data3);
 672 }
 673 #endif
 674
 675 FILE*mp3file;
 676 void handlesoundstream(TAG*tag)
 677 {
 678     char*filename = "output.mp3";
 679     if(numextracts==1) {
 680         filename = destfilename;
 681         if(!strcmp(filename,"output.swf"))
 682             filename = "output.mp3";
 683     }
 684     switch(tag->id) {
 685         case ST_SOUNDSTREAMHEAD:
 686             if((tag->data[1]&0x30) == 0x20) { //mp3 compression
 687                 mp3file = fopen(filename, "wb");
 688                 logf("<notice> Writing mp3 data to %s",filename);
 689             }
 690             else
 691                 logf("<error> Soundstream is not mp3");
 692         break;
 693         case ST_SOUNDSTREAMHEAD2:
 694             if((tag->data[1]&0x30) == 0x20) {//mp3 compression
 695                 mp3file = fopen("mainstream.mp3", "wb");
 696                 logf("<notice> Writing mp3 data to %s",filename);
 697             }
 698             else
 699                 logf("<error> Soundstream is not mp3 (2)");
 700         break;
 701         case ST_SOUNDSTREAMBLOCK:
 702             if(mp3file)
 703                 fwrite(&tag->data[4],tag->len-4,1,mp3file);
 704         break;
 705     }
 706 }
 707
 708 int main (int argc,char ** argv)
 709 {
 710     TAG*tag;
 711     SWF swf;
 712     int f;
 713     int found = 0;
 714     int frame = 0;
 715     int tagnum = 0;
 716     char depths[65536];
 717     char listavailable = 0;
 718     processargs(argc, argv);
 719
 720     if(!extractframes && !extractids && ! extractname && !extractjpegids && !extractpngids
 721         && !extractmp3)
 722         listavailable = 1;
 723
 724     if(!filename)
 725     {
 726         fprintf(stderr, "You must supply a filename.\n");
 727         return 1;
 728     }
 729     initLog(0,-1,0,0,-1, verbose);
 730
 731     f = open(filename,O_RDONLY);
 732
 733     if (f<0)
 734     {
 735         perror("Couldn't open file: ");
 736         exit(1);
 737     }
 738     if (swf_ReadSWF(f,&swf) < 0)
 739     {
 740         fprintf(stderr, "%s is not a valid SWF file or contains errors.\n",filename);
 741         close(f);
 742         exit(1);
 743     }
 744     close(f);
 745
 746     if(listavailable) {
 747         listObjects(&swf);
 748         swf_FreeTags(&swf);
 749         return 0;
 750     }
 751
 752     tag = swf.firstTag;
 753     tagnum = 0;
 754     while(tag) {
 755         tagnum ++;
 756         tag = tag->next;
 757     }
 758
 759     tagused = (char*)malloc(tagnum);
 760     memset(tagused, 0, tagnum);
 761     memset(used, 0, 65536);
 762     memset(depths, 0, 65536);
 763
 764     tag = swf.firstTag;
 765     tagnum = 0;
 766     while(tag) {
 767         if(swf_isAllowedSpriteTag(tag)) {
 768             int write = 0;
 769             if(extractframes && is_in_range(frame, extractframes)) {
 770                 write = 1;
 771                 if(tag->id == ST_PLACEOBJECT || tag->id == ST_PLACEOBJECT2) {
 772                     depths[swf_GetDepth(tag)] = 1;
 773                 }
 774                 if(tag->id == ST_REMOVEOBJECT || tag->id == ST_REMOVEOBJECT2) {
 775                     int depth = swf_GetDepth(tag);
 776                     if(!depths[depth])
 777                         write = 0;
 778                     depths[swf_GetDepth(tag)] = 0;
 779                 }
 780             } else {
 781                 if((tag->id == ST_REMOVEOBJECT || tag->id == ST_REMOVEOBJECT2) &&
 782                     (depths[swf_GetDepth(tag)]) && hollow) {
 783                     write = 1;
 784                     depths[swf_GetDepth(tag)] = 0;
 785                 }
 786             }
 787             if(write) {
 788                 enumerateIDs(tag, idcallback);
 789                 found = 1;
 790                 tagused[tagnum] = 1;
 791             }
 792         }
 793
 794         if(tag->id == ST_SOUNDSTREAMHEAD ||
 795            tag->id == ST_SOUNDSTREAMHEAD2 ||
 796            tag->id == ST_SOUNDSTREAMBLOCK) {
 797             handlesoundstream(tag);
 798         }
 799
 800         if(tag->id == ST_JPEGTABLES)
 801             handlejpegtables(tag);
 802
 803         if(swf_isDefiningTag(tag)) {
 804             int id = swf_GetDefineID(tag);
 805             tags[id] = tag;
 806             if(extractids && is_in_range(id, extractids)) {
 807                 used[id] = 5;
 808                 found = 1;
 809             }
 810             if(extractjpegids && is_in_range(id, extractjpegids)) {
 811                 handlejpeg(tag);
 812             }
 813 #ifdef _ZLIB_INCLUDED_
 814             if(extractpngids && is_in_range(id, extractpngids)) {
 815                 handlelossless(tag);
 816             }
 817 #endif
 818         }
 819         else if (tag->id == ST_SETBACKGROUNDCOLOR) {
 820             mainr = tag->data[0];
 821             maing = tag->data[1];
 822             mainb = tag->data[2];
 823         }
 824         else if(tag->id == ST_PLACEOBJECT2) {
 825             char*name = swf_GetName(tag);
 826             if(name && extractname && !strcmp(name, extractname)) {
 827                 int id = swf_GetPlaceID(tag);
 828                 used[id] = 5;
 829                 found = 1;
 830                 tagused[tagnum] = 1;
 831                 depths[swf_GetDepth(tag)] = 1;
 832             }
 833         }
 834         else if(tag->id == ST_SHOWFRAME) {
 835             frame ++;
 836             if(hollow) {
 837                 tagused[tagnum] = 1;
 838                 found = 1;
 839             }
 840         }
 841
 842         if(tag->id == ST_DEFINESPRITE) {
 843             while(tag->id != ST_END) {
 844                 tag = tag->next;
 845                 tagnum ++;
 846             }
 847         }
 848         tag = tag->next;
 849         tagnum ++;
 850     }
 851     if (found)
 852         extractTag(&swf, destfilename);
 853
 854     if(mp3file)
 855         fclose(mp3file);
 856
 857     swf_FreeTags(&swf);
 858     return 0;
 859 }
 860