src/swfcombine.c

   1 /* swfcombine.c
   2    main routine for swfcombine(1), a tool for merging .swf-files.
   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 <stdlib.h>
  11 #include <stdio.h>
  12 #include <string.h>
  13 #include <zlib.h>
  14 #include "../lib/rfxswf.h"
  15 #include "../lib/args.h"
  16 #include "../lib/log.h"
  17 #include "../config.h"
  18
  19 struct config_t
  20 {
  21    char overlay;
  22    char alloctest;
  23    char clip;
  24    char stack;
  25    char stack1;
  26    char antistream;
  27    char dummy;
  28    char zlib;
  29    char cat;
  30    char merge;
  31    char isframe;
  32    int loglevel;
  33    int movex;
  34    int movey;
  35    int sizex;
  36    char hassizex;
  37    int sizey;
  38    char hassizey;
  39    int framerate;
  40    float scalex;
  41    float scaley;
  42 };
  43 struct config_t config;
  44
  45 char * master_filename = 0;
  46 char * master_name = 0;
  47 char * slave_filename[128];
  48 char * slave_name[128];
  49 int slave_movex[128];
  50 int slave_movey[128];
  51 float slave_scalex[128];
  52 float slave_scaley[128];
  53 char slave_isframe[128];
  54 int numslaves = 0;
  55
  56 char * outputname = "output.swf";
  57
  58 int args_callback_option(char*name,char*val) {
  59     if(!strcmp(name,"c"))
  60     {
  61         config.clip = 1;
  62         return 0;
  63     }
  64     else if(!strcmp(name,"l"))
  65     {
  66         config.overlay = 1;
  67         return 0;
  68     }
  69     else if (!strcmp(name, "o"))
  70     {
  71         outputname = val;
  72         return 1;
  73     }
  74     else if (!strcmp(name, "v"))
  75     {
  76         config.loglevel ++;
  77         return 0;
  78     }
  79     else if (!strcmp(name, "a"))
  80     {
  81         config.cat = 1;
  82         return 0;
  83     }
  84     else if (!strcmp(name, "A"))
  85     {
  86         config.alloctest = 1;
  87         return 0;
  88     }
  89     else if (!strcmp(name, "x"))
  90     {
  91         config.movex = atoi(val);
  92         return 1;
  93     }
  94     else if (!strcmp(name, "y"))
  95     {
  96         config.movey = atoi(val);
  97         return 1;
  98     }
  99     else if (!strcmp(name, "m"))
 100     {
 101         config.merge = 1;
 102         return 0;
 103     }
 104     else if (!strcmp(name, "f"))
 105     {
 106         config.isframe = 1;
 107         return 0;
 108     }
 109     else if (!strcmp(name, "d"))
 110     {
 111         config.dummy = 1;
 112         return 0;
 113     }
 114     else if (!strcmp(name, "z"))
 115     {
 116         config.zlib = 1;
 117         return 0;
 118     }
 119     else if (!strcmp(name, "r"))
 120     {
 121         config.framerate = atoi(val)*256/100;
 122         return 1;
 123     }
 124     else if (!strcmp(name, "X"))
 125     {
 126         config.sizex = atoi(val)*20;
 127         config.hassizex = 1;
 128         return 1;
 129     }
 130     else if (!strcmp(name, "Y"))
 131     {
 132         config.sizey = atoi(val)*20;
 133         config.hassizey = 1;
 134         return 1;
 135     }
 136     else if (!strcmp(name, "s"))
 137     {
 138         config.scalex = config.scaley = atoi(val)/100.0;
 139         return 1;
 140     }
 141     else if (!strcmp(name, "t") || !strcmp(name, "T"))
 142     {
 143         if(master_filename) {
 144             fprintf(stderr, "error with arguments. Try --help.\n");
 145             exit(1);
 146         }
 147         config.stack = 1;
 148         if(!strcmp(name,"T"))
 149             config.stack1 = 1;
 150         master_filename = "__none__";
 151         return 0;
 152     }
 153     else if (!strcmp(name, "V"))
 154     {
 155         printf("swfcombine - part of %s %s\n", PACKAGE, VERSION);
 156         exit(0);
 157     }
 158     else
 159     {
 160         fprintf(stderr, "Unknown option: -%s\n", name);
 161         exit(1);
 162     }
 163 }
 164
 165 struct options_t options[] =
 166 {{"o","output"},
 167  {"s","scale"},
 168  {"d","dummy"},
 169  {"x","xpos"},
 170  {"y","ypos"},
 171  {"X","width"},
 172  {"Y","height"},
 173  {"r","rate"},
 174  {"f","frame"},
 175  {"l","overlay"},
 176  {"m","merge"},
 177  {"t","stack"},
 178  {"T","stack1"},
 179  {"v","verbose"},
 180  {"V","version"},
 181  {"c","clip"},
 182  {"a","cat"},
 183  {"z","zlib"},
 184  {0,0}
 185 };
 186
 187 int args_callback_longoption(char*name,char*val) {
 188     return args_long2shortoption(options, name, val);
 189 }
 190
 191 int args_callback_command(char*name, char*val) {
 192     char*myname = strdup(name);
 193     char*filename;
 194     filename = strchr(myname, '=');
 195     if(filename) {
 196         *filename = 0;
 197         filename++;
 198     } else {
 199         // argument has no explicit name field. guess one from the file name
 200         char*path = strrchr(myname, '/');
 201         char*ext = strrchr(myname, '.');
 202         if(!path) path = myname;
 203         else path ++;
 204         if(ext) *ext = 0;
 205         myname = path;
 206         filename = name;
 207     }
 208
 209     if(!master_filename) {
 210         master_filename = filename;
 211         master_name = myname;
 212     } else {
 213         logf("<verbose> slave entity %s (named \"%s\")\n", filename, myname);
 214
 215         slave_filename[numslaves] = filename;
 216         slave_name[numslaves] = myname;
 217         slave_movex[numslaves] = config.movex;
 218         slave_movey[numslaves] = config.movey;
 219         slave_scalex[numslaves] = config.scalex;
 220         slave_scaley[numslaves] = config.scaley;
 221         slave_isframe[numslaves] = config.isframe;
 222         config.isframe = 0;
 223         config.movex = config.movey = 0;
 224         config.scalex = config.scaley = 1.0;
 225         numslaves ++;
 226     }
 227     return 0;
 228 }
 229
 230 void args_callback_usage(char*name)
 231 {
 232     printf("Usage: %s [-rXYomlcv] [-f] masterfile [-xysf] [(name1|#id1)=]slavefile1 .. [-xysf] [(nameN|#idN)=]slavefileN\n", name);
 233     printf("OR:    %s [-rXYomv] --stack[1] [-xysf] [(name1|#id1)=]slavefile1 .. [-xysf] [(nameN|#idN)=]slavefileN\n", name);
 234     printf("OR:    %s [-rXYov] --cat [-xysf] [(name1|#id1)=]slavefile1 .. [-xysf] [(nameN|#idN)=]slavefileN\n", name);
 235     printf("OR:    %s [-rXYomlcv] --dummy [-xys] [file]\n", name);
 236     printf("\n");
 237     printf("-o outputfile       --output    explicitly specify output file. (otherwise, output.swf will be used\n");
 238     printf("-t                  --stack     place each slave in a seperate frame (no master movie)\n");
 239     printf("-T                  --stack1    place each slave in the first frame (no master movie)\n");
 240     printf("-m                  --merge     Don't store the slaves in Sprites/MovieClips\n");
 241     printf("-a                  --cat       concatenate all slave files (no master movie)\n");
 242     printf("-l                  --overlay   Don't remove any master objects, only overlay new objects\n");
 243     printf("-c                  --clip      Clip the slave objects by the corresponding master objects\n");
 244     printf("-v                  --verbose   Use more than one -v for greater effect \n");
 245     printf("-d                  --dummy     Don't require slave objects \n");
 246     printf("-f                  --frame     The following identifier is a frame or framelabel, not an id or objectname\n");
 247     printf("-x xpos             --movex     x Adjust position of slave by xpos twips (1/20 pixel)\n");
 248     printf("-y ypos             --movey     y Adjust position of slave by ypos twips (1/20 pixel)\n");
 249     printf("-s scale            --scale     Adjust size of slave by scale%\n");
 250     printf("-r framerate        --rate      Set movie framerate (100 frames/sec)\n");
 251     printf("-X width            --width     Force movie width to scale (default: use master width (not with -t))\n");
 252     printf("-Y height           --height    Force movie height to scale (default: use master height (not with -t))\n");
 253     printf("-z zlib             --zlib      Enable Flash 6 (MX) Zlib Compression\n");
 254 }
 255
 256 static void makestackmaster(SWF*swf)
 257 {
 258     TAG*tag;
 259     int t;
 260     SRECT box;
 261     int fileversion = 1;
 262     memset(&box, 0, sizeof(box));
 263
 264     /* scan all slaves for bounding box */
 265     for(t=0;t<numslaves;t++)
 266     {
 267         SWF head;
 268         int ret;
 269         int fi=open(slave_filename[t],O_RDONLY);
 270         if(fi<0 || swf_ReadSWF(fi, &head)<0) {
 271             logf("<fatal> Couldn't open/read %s.", slave_filename[t]);
 272             exit(1);
 273         }
 274         close(fi);
 275         logf("<verbose> File %s has bounding box %d:%d:%d:%d\n",
 276                 slave_filename[t],
 277                 head.movieSize.xmin, head.movieSize.ymin,
 278                 head.movieSize.xmax, head.movieSize.ymax);
 279         if(head.fileVersion > fileversion)
 280             fileversion = head.fileVersion;
 281         if(!t)
 282             box = head.movieSize;
 283         else {
 284             if(head.movieSize.xmin < box.xmin)
 285                 box.xmin = head.movieSize.xmin;
 286             if(head.movieSize.ymin < box.ymin)
 287                 box.ymin = head.movieSize.ymin;
 288             if(head.movieSize.xmax > box.xmax)
 289                 box.xmax = head.movieSize.xmax;
 290             if(head.movieSize.ymax > box.ymax)
 291                 box.ymax = head.movieSize.ymax;
 292         }
 293         logf("<verbose> New master bounding box is %d:%d:%d:%d\n",
 294                 box.xmin, box.ymin,
 295                 box.xmax, box.ymax);
 296         swf_FreeTags(&head);
 297     }
 298
 299     memset(swf, 0, sizeof(SWF));
 300
 301     swf->firstTag = swf_InsertTag(0, ST_SETBACKGROUNDCOLOR);
 302     tag = swf->firstTag;
 303     swf_SetU8(tag, 0);
 304     swf_SetU8(tag, 0);
 305     swf_SetU8(tag, 0);
 306
 307     for(t=0;t<numslaves;t++)
 308     {
 309         char buf[128];
 310         sprintf(buf, "Frame%02d", t);
 311         slave_name[t] = strdup(buf);
 312
 313         tag = swf_InsertTag(tag, ST_DEFINESPRITE);
 314         swf_SetU16(tag, t+1);
 315         swf_SetU16(tag, 0);
 316         tag = swf_InsertTag(tag, ST_END);
 317         tag = swf_InsertTag(tag, ST_PLACEOBJECT2);
 318         swf_ObjectPlace(tag, t+1, 1+t,0,0, slave_name[t]);
 319
 320         if(!config.stack1 || t == numslaves-1) {
 321             tag = swf_InsertTag(tag, ST_SHOWFRAME);
 322         }
 323         if(!config.stack)
 324         if(t!=numslaves-1)
 325         {
 326             tag = swf_InsertTag(tag, ST_REMOVEOBJECT2);
 327             swf_SetU16(tag, 1+t);
 328         }
 329     }
 330     tag = swf_InsertTag(tag, ST_END);
 331     logf("<verbose> temporary SWF created");
 332 }
 333
 334 static char* slavename = 0;
 335 static int slaveid = -1;
 336 static int slaveframe = -1;
 337 static char masterbitmap[65536];
 338
 339 #define FLAGS_WRITEDEFINES 1
 340 #define FLAGS_WRITENONDEFINES 2
 341 #define FLAGS_WRITESPRITE 4
 342 #define FLAGS_WRITESLAVE 8
 343
 344 int get_free_id(char*bitmap)
 345 {
 346     int t;
 347     for(t=1;t<65536;t++)
 348         if(!bitmap[t]) {
 349             bitmap[t] = 1;
 350             return t;
 351         }
 352     return -1;
 353 }
 354
 355 void jpeg_assert(SWF*master, SWF*slave)
 356 {
 357     /* TODO: if there's a jpegtable found, store it
 358        and handle it together with the flash file
 359        headers */
 360
 361     /* check that master and slave don't have both
 362        jpegtables (which would be fatal) */
 363     int pos;
 364     TAG *mpos=0, *spos=0;
 365     TAG *mtag,*stag;
 366     pos = 0;
 367     mtag = master->firstTag;
 368     stag = slave->firstTag;
 369     while(mtag)
 370     {
 371         if(mtag->id  == ST_JPEGTABLES)
 372             mpos = mtag;
 373         mtag = mtag->next;
 374     }
 375     while(stag)
 376     {
 377         if(stag->id == ST_JPEGTABLES)
 378             spos = stag;
 379         stag = stag->next;
 380     }
 381     if(mpos && spos)
 382     {
 383         if(spos->len == mpos->len &&
 384         !memcmp(spos->data, mpos->data, mpos->len))
 385         {
 386             // ok, both have jpegtables, but they're identical.
 387             // delete one and don't throw an error
 388             swf_DeleteTag(spos);
 389             spos = 0;
 390         }
 391     }
 392     if(spos && mpos) {
 393         logf("<error> Master and slave have incompatible JPEGTABLES.");
 394     }
 395 }
 396
 397 TAG* write_sprite_defines(TAG*tag, SWF*sprite)
 398 {
 399     TAG*rtag = sprite->firstTag;
 400     while(rtag && rtag->id!=ST_END) {
 401         if(!swf_isAllowedSpriteTag(rtag)) {
 402             logf("<debug> processing sprite tag %02x", tag->id);
 403             if(swf_isDefiningTag(rtag))
 404             {
 405                 logf("<debug> [sprite defs] write tag %02x (%d bytes in body)",
 406                         tag->id, tag->len);
 407                 tag = swf_InsertTag(tag, rtag->id);
 408                 swf_SetBlock(tag, rtag->data, rtag->len);
 409             }
 410             else if(swf_isPseudoDefiningTag(rtag))
 411             {
 412                 logf("<debug> [sprite defs] write tag %02x (%d bytes in body)",
 413                         tag->id, tag->len);
 414                 tag = swf_InsertTag(tag, rtag->id);
 415                 swf_SetBlock(tag, rtag->data, rtag->len);
 416             }
 417             else {
 418                 switch(rtag->id)
 419                 {
 420                     case ST_JPEGTABLES:
 421                            /* if we get here, jpeg_assert has already run,
 422                               ensuring this is the only one of it's kind,
 423                               so we may safely write it out */
 424                            tag = swf_InsertTag(tag, rtag->id);
 425                            swf_SetBlock(tag, rtag->data, rtag->len);
 426                        break;
 427                     case ST_EXPORTASSETS:
 428                        logf("<debug> deliberately ignoring EXPORTASSETS tag");
 429                        break;
 430                     case ST_ENABLEDEBUGGER:
 431                        logf("<debug> deliberately ignoring ENABLEDEBUGGER tag");
 432                        break;
 433                     case ST_SETBACKGROUNDCOLOR:
 434                        logf("<debug> deliberately ignoring BACKGROUNDCOLOR tag");
 435                        break;
 436                     case 40:
 437                     case 49:
 438                     case 51:
 439                        logf("<notice> found tag %d. This is a Generator template, isn't it?", tag->id);
 440                        break;
 441                     default:
 442                        logf("<notice> funny tag: %d is neither defining nor sprite", tag->id);
 443                 }
 444             }
 445         }
 446         rtag = rtag->next;
 447     }
 448     return tag;
 449 }
 450
 451 void changedepth(TAG*tag, int add)
 452 {
 453     /* fucking byteorders */
 454     if(tag->id == ST_PLACEOBJECT)
 455         PUT16(&tag->data[2],GET16(&tag->data[2])+add);
 456     if(tag->id == ST_PLACEOBJECT2)
 457         PUT16(&tag->data[1],GET16(&tag->data[1])+add);
 458     if(tag->id == ST_REMOVEOBJECT)
 459         PUT16(&tag->data[2],GET16(&tag->data[2])+add);
 460     if(tag->id == ST_REMOVEOBJECT2)
 461         PUT16(&tag->data[0],GET16(&tag->data[0])+add);
 462 }
 463
 464 void matrix_adjust(MATRIX*m)
 465 {
 466     m->sx = (int)(m->sx*config.scalex);
 467     m->sy = (int)(m->sy*config.scaley);
 468     m->r0 = (int)(m->r0*config.scalex);
 469     m->r1 = (int)(m->r1*config.scaley);
 470     m->tx += config.movex;
 471     m->ty += config.movey;
 472 }
 473
 474 void write_changepos(TAG*output, TAG*tag)
 475 {
 476     if(config.movex || config.movey || config.scalex != 1 || config.scaley != 1)
 477     {
 478         switch(tag->id)
 479         {
 480             case ST_PLACEOBJECT2: {
 481                 MATRIX m;
 482                 U8 flags;
 483                 swf_GetMatrix(0, &m);
 484
 485                 flags = swf_GetU8(tag);
 486                 swf_SetU8(output, flags|4);
 487                 swf_SetU16(output, swf_GetU16(tag)); //depth
 488                 //flags&1: move
 489                 if(flags&2) {
 490                     swf_SetU16(output, swf_GetU16(tag)); //id
 491                 }
 492                 // flags & 4
 493                 swf_GetMatrix(tag, &m);
 494                 matrix_adjust(&m);
 495                 swf_SetMatrix(output, &m);
 496
 497                 //swf_ResetReadBits(tag);
 498                 swf_SetBlock(output, &tag->data[tag->pos], tag->len - tag->pos);
 499                 break;
 500             }
 501             case ST_PLACEOBJECT: {
 502                 MATRIX m;
 503                 swf_SetU16(output, swf_GetU16(tag)); //id
 504                 swf_SetU16(output, swf_GetU16(tag)); //depth
 505
 506                 swf_GetMatrix(tag, &m);
 507                 matrix_adjust(&m);
 508                 swf_SetMatrix(output, &m);
 509
 510                 //swf_ResetReadBits(tag);
 511                 swf_SetBlock(output, &tag->data[tag->pos], tag->len - tag->pos);
 512                 break;
 513             }
 514             default:
 515             swf_SetBlock(output, tag->data, tag->len);
 516         }
 517     }
 518     else
 519     {
 520             swf_SetBlock(output, tag->data, tag->len);
 521     }
 522 }
 523
 524 TAG* write_sprite(TAG*tag, SWF*sprite, int spriteid, int replaceddefine)
 525 {
 526     TAG* definespritetag;
 527     TAG* rtag;
 528     int tmp;
 529
 530     definespritetag = tag = swf_InsertTag(tag, ST_DEFINESPRITE);
 531     swf_SetU16(tag, spriteid);
 532     swf_SetU16(tag, sprite->frameCount);
 533     logf ("<notice> sprite id is %d", spriteid);
 534
 535     tmp = sprite->frameCount;
 536     logf("<debug> %d frames to go",tmp);
 537
 538     if(config.clip) {
 539         tag = swf_InsertTag(tag, ST_PLACEOBJECT2);
 540         swf_SetU8(tag, 2+64); //flags: character+clipdepth
 541         swf_SetU16(tag, 0); //depth
 542         swf_SetU16(tag, replaceddefine); //id
 543         swf_SetU16(tag, 65535); //clipdepth
 544     }
 545
 546     if(config.overlay && !config.isframe) {
 547         tag = swf_InsertTag(tag, ST_PLACEOBJECT2);
 548         swf_SetU8(tag, 2); //flags: character
 549         swf_SetU16(tag, 0); //depth
 550         swf_SetU16(tag, replaceddefine); //id
 551     }
 552
 553     rtag = sprite->firstTag;
 554     while(rtag && rtag->id!=ST_END)
 555     {
 556         if (swf_isAllowedSpriteTag(rtag)) {
 557
 558             logf("<debug> [sprite main] write tag %02x (%d bytes in body)",
 559                     rtag->id, rtag->len);
 560             tag = swf_InsertTag(tag, rtag->id);
 561             write_changepos(tag, rtag);
 562
 563             changedepth(tag, +1);
 564
 565             if(tag->id == ST_SHOWFRAME)
 566             {
 567                 tmp--;
 568                 logf("<debug> %d frames to go",tmp);
 569             }
 570         }
 571         rtag = rtag->next;
 572     }
 573     tag = swf_InsertTag(tag, ST_END);
 574     return tag;
 575 }
 576
 577 static char tag_ok_for_slave(int id)
 578 {
 579     if(id == ST_SETBACKGROUNDCOLOR)
 580         return 0;
 581     return 1;
 582 }
 583
 584 TAG* write_master(TAG*tag, SWF*master, SWF*slave, int spriteid, int replaceddefine, int flags)
 585 {
 586     int outputslave = 0;
 587     int frame = 0;
 588     int sframe = 0;
 589     int slavewritten = 0;
 590
 591     TAG* rtag = master->firstTag;
 592     TAG* stag = slave->firstTag;
 593
 594     while(rtag && rtag->id!=ST_END)
 595     {
 596         if(rtag->id == ST_SHOWFRAME && outputslave)
 597         {
 598             while(stag && stag->id!=ST_END) {
 599                 if(stag->id == ST_SHOWFRAME) {
 600                     stag = stag->next;
 601                     sframe++;
 602                     break;
 603                 }
 604                 if(tag_ok_for_slave(stag->id)) {
 605                     tag = swf_InsertTag(tag, stag->id);
 606                     swf_SetBlock(tag, stag->data, stag->len);
 607                 }
 608                 stag = stag->next;
 609             }
 610         }
 611         if(rtag->id == ST_SHOWFRAME)
 612         {
 613             frame ++;
 614         }
 615
 616         if(swf_isDefiningTag(rtag) && (flags&FLAGS_WRITEDEFINES))
 617         {
 618             logf("<debug> [master] write tag %02x (%d bytes in body)",
 619                     rtag->id, rtag->len);
 620             if(swf_GetDefineID(rtag) == spriteid && !config.isframe)
 621             {
 622                 if(config.overlay)
 623                 {
 624                     tag = swf_InsertTag(tag, rtag->id);
 625                     swf_SetBlock(tag, rtag->data, rtag->len);
 626                     swf_SetDefineID(tag, replaceddefine);
 627                 } else {
 628                     /* don't write this tag */
 629                     logf("<verbose> replacing tag %d id %d with sprite", rtag->id
 630                             ,spriteid);
 631                 }
 632
 633                 if(flags&FLAGS_WRITESPRITE)
 634                 {
 635                     tag = write_sprite_defines(tag, slave);
 636                     tag = write_sprite(tag, slave, spriteid, replaceddefine);
 637                 }
 638                 if(flags&FLAGS_WRITESLAVE)
 639                 {
 640                     outputslave = 1;
 641                 }
 642             } else {
 643                 tag = swf_InsertTag(tag, rtag->id);
 644                 swf_SetBlock(tag, rtag->data, rtag->len);
 645             }
 646         }
 647         if(frame == slaveframe)
 648         {
 649             if(flags&FLAGS_WRITESLAVE) {
 650                 outputslave = 1;
 651                 slavewritten = 1;
 652             }
 653             if((flags&FLAGS_WRITESPRITE) && !slavewritten)
 654             {
 655                 int id = get_free_id(masterbitmap);
 656                 int depth = 0;
 657                 if(config.clip) {
 658                     logf("<fatal> Can't combine --clip and --frame");
 659                 }
 660
 661                 tag = write_sprite_defines(tag, slave);
 662                 tag = write_sprite(tag, slave, id, -1);
 663
 664                 tag = swf_InsertTag(tag, ST_PLACEOBJECT2);
 665                     swf_SetU8(tag, 2); //flags: id
 666                     swf_SetU16(tag, depth);
 667                     swf_SetU16(tag, id);
 668
 669                 slavewritten = 1;
 670             }
 671         }
 672         if(!swf_isDefiningTag(rtag) && (flags&FLAGS_WRITENONDEFINES))
 673         {
 674             int dontwrite = 0;
 675             switch(rtag->id) {
 676                 case ST_PLACEOBJECT:
 677                 case ST_PLACEOBJECT2:
 678                     if(frame == slaveframe && !config.overlay)
 679                         dontwrite = 1;
 680                 case ST_REMOVEOBJECT:
 681 //              case ST_REMOVEOBJECT2:
 682                     /* place/removetags for the object we replaced
 683                        should be discarded, too, as the object to insert
 684                        isn't a sprite
 685                      */
 686                     if(spriteid>=0 && swf_GetPlaceID(rtag) == spriteid &&
 687                             !config.isframe && config.merge)
 688                         dontwrite = 1;
 689                 break;
 690             }
 691             if(!dontwrite) {
 692                 logf("<debug> [master] write tag %02x (%d bytes in body)",
 693                         rtag->id, rtag->len);
 694                 tag = swf_InsertTag(tag, rtag->id);
 695                 swf_SetBlock(tag, rtag->data, rtag->len);
 696             }
 697         }
 698         rtag = rtag->next;
 699     }
 700
 701     if(outputslave)
 702     while(stag && stag->id!=ST_END)
 703     {
 704             if(tag_ok_for_slave(stag->id)) {
 705                 tag = swf_InsertTag(tag, stag->id);
 706                 swf_SetBlock(tag, stag->data, stag->len);
 707             }
 708             stag = stag->next;
 709     }
 710     if(!slavewritten && config.isframe && (flags&(FLAGS_WRITESLAVE|FLAGS_WRITESPRITE)))
 711     {
 712         if(slaveframe>=0)
 713             logf("<warning> Frame %d doesn't exist in file. No substitution will occur",
 714                     slaveframe);
 715         else
 716             logf("<warning> Frame \"%s\" doesn't exist in file. No substitution will occur",
 717                     slavename);
 718     }
 719     tag = swf_InsertTag(tag, ST_END);
 720     return tag;
 721 }
 722
 723 void adjustheader(SWF*swf)
 724 {
 725     if(config.framerate)
 726         swf->frameRate = config.framerate;
 727     if(config.hassizex) {
 728         swf->movieSize.xmax =
 729         swf->movieSize.xmin + config.sizex;
 730     }
 731     if(config.hassizey) {
 732         swf->movieSize.ymax =
 733         swf->movieSize.ymin + config.sizey;
 734     }
 735 }
 736
 737 void catcombine(SWF*master, char*slave_name, SWF*slave, SWF*newswf)
 738 {
 739     char* depths;
 740     int t;
 741     TAG*tag;
 742     TAG*mtag,*stag;
 743     if(config.isframe) {
 744         logf("<fatal> Can't combine --cat and --frame");
 745         exit(1);
 746     }
 747
 748     tag = master->firstTag;
 749     while(tag)
 750     {
 751         if(swf_isDefiningTag(tag)) {
 752             int defineid = swf_GetDefineID(tag);
 753             logf("<debug> tagid %02x defines object %d", tag->id, defineid);
 754             masterbitmap[defineid] = 1;
 755         }
 756         tag = tag->next;
 757     }
 758
 759     swf_Relocate(slave, masterbitmap);
 760     jpeg_assert(master, slave);
 761
 762     memcpy(newswf, master, sizeof(SWF));
 763     adjustheader(newswf);
 764
 765     tag = newswf->firstTag = swf_InsertTag(0, ST_REFLEX); // to be removed later
 766
 767     depths = malloc(65536);
 768     if(!depths) {
 769         logf("<fatal> Couldn't allocate %d bytes of memory", 65536);
 770         return;
 771     }
 772     memset(depths, 0, 65536);
 773     mtag = master->firstTag;
 774     while(mtag && mtag->id!=ST_END)
 775     {
 776         int num=1;
 777         U16 depth;
 778         logf("<debug> [master] write tag %02x (%d bytes in body)",
 779                 mtag->id, mtag->len);
 780         switch(mtag->id) {
 781             case ST_PLACEOBJECT2:
 782                 num++;
 783             case ST_PLACEOBJECT: {
 784                depth = swf_GetDepth(mtag);
 785                depths[depth] = 1;
 786             }
 787             break;
 788             case ST_REMOVEOBJECT: {
 789                depth = swf_GetDepth(mtag);
 790                depths[depth] = 0;
 791             }
 792             break;
 793             case ST_REMOVEOBJECT2: {
 794                depth = swf_GetDepth(mtag);
 795                depths[depth] = 0;
 796             }
 797             break;
 798         }
 799         tag = swf_InsertTag(tag, mtag->id);
 800         swf_SetBlock(tag, mtag->data, mtag->len);
 801
 802         mtag = mtag->next;
 803     }
 804
 805     for(t=0;t<65536;t++)
 806     if(depths[t])
 807     {
 808         char data[16];
 809         int len;
 810         tag = swf_InsertTag(tag, ST_REMOVEOBJECT2);
 811         swf_SetU16(tag, t);
 812     }
 813     free(depths);
 814
 815     stag = slave->firstTag;
 816     while(stag && stag->id!=ST_END)
 817     {
 818         logf("<debug> [slave] write tag %02x (%d bytes in body)",
 819                 stag->id, stag->len);
 820         tag = swf_InsertTag(tag, stag->id);
 821         swf_SetBlock(tag, stag->data, stag->len);
 822         stag = stag->next;
 823     }
 824     tag = swf_InsertTag(tag, ST_END);
 825
 826     tag = newswf->firstTag;
 827     newswf->firstTag = newswf->firstTag->next; //remove temporary tag
 828     swf_DeleteTag(tag);
 829 }
 830
 831 void normalcombine(SWF*master, char*slave_name, SWF*slave, SWF*newswf)
 832 {
 833     int spriteid = -1;
 834     int replaceddefine = -1;
 835     int frame = 0;
 836     char*framelabel;
 837     TAG * tag = master->firstTag;
 838
 839     // set the idtab
 840     while(tag)
 841     {
 842         if(swf_isDefiningTag(tag)) {
 843             int defineid = swf_GetDefineID(tag);
 844             logf("<debug> tagid %02x defines object %d", tag->id, defineid);
 845             masterbitmap[defineid] = 1;
 846         } else if(tag->id == ST_PLACEOBJECT2) {
 847             char * name = swf_GetName(tag);
 848             int id = swf_GetPlaceID(tag);
 849
 850             if(name)
 851               logf("<verbose> tagid %02x places object %d named \"%s\"", tag->id, id, name);
 852             else
 853               logf("<verbose> tagid %02x places object %d (no name)", tag->id, id);
 854
 855             if ((name && slavename && !strcmp(name,slavename)) ||
 856                 (!slavename && id==slaveid)) {
 857                 if(id>=0) {
 858                   spriteid = id;
 859                   logf("<notice> Slave file attached to object %d.", id);
 860                 }
 861             }
 862         } else if(tag->id == ST_SHOWFRAME) {
 863             if(slaveframe>=0 && frame==slaveframe) {
 864                 logf("<notice> Slave file attached to frame %d.", frame);
 865             }
 866             frame++;
 867         } else if(tag->id == ST_FRAMELABEL) {
 868             char * name = tag->data;
 869             if(name && slavename && config.isframe && !strcmp(name, slavename)) {
 870                 slaveframe = frame;
 871                 logf("<notice> Slave file attached to frame %d (%s).", frame, name);
 872             }
 873         }
 874         tag = tag->next;
 875     };
 876
 877     if (spriteid<0 && !config.isframe) {
 878         if(slavename) {
 879             if(strcmp(slavename,"!!dummy!!"))
 880                 logf("<warning> Didn't find anything named %s in file. No substitutions will occur.", slavename);
 881         }
 882         else
 883             logf("<warning> Didn't find id %d in file. No substitutions will occur.", slaveid);
 884         spriteid = get_free_id(masterbitmap);
 885     }
 886
 887     swf_Relocate (slave, masterbitmap);
 888     jpeg_assert(slave, master);
 889
 890     if (config.overlay)
 891         replaceddefine = get_free_id(masterbitmap);
 892
 893     // write file
 894
 895     memcpy(newswf, master, sizeof(SWF));
 896     adjustheader(newswf);
 897
 898     newswf->firstTag = tag = swf_InsertTag(0, ST_REFLEX); // to be removed later
 899
 900     if (config.antistream) {
 901         if (config.merge) {
 902             logf("<fatal> Can't combine --antistream and --merge");
 903         }
 904         tag = write_sprite_defines(tag, slave);
 905         tag = write_sprite(tag, slave, spriteid, replaceddefine);
 906         tag = write_master(tag, master, slave, spriteid, replaceddefine, FLAGS_WRITEDEFINES);
 907         tag = write_master(tag, master, slave, spriteid, replaceddefine, FLAGS_WRITENONDEFINES);
 908     } else {
 909         if (config.merge)
 910             tag = write_master(tag, master, slave, spriteid, replaceddefine,
 911                 FLAGS_WRITEDEFINES|FLAGS_WRITENONDEFINES|FLAGS_WRITESLAVE);
 912         else
 913             tag = write_master(tag, master, slave, spriteid, replaceddefine,
 914                 FLAGS_WRITEDEFINES|FLAGS_WRITENONDEFINES|FLAGS_WRITESPRITE);
 915     }
 916
 917     tag = newswf->firstTag;
 918     newswf->firstTag = newswf->firstTag->next; //remove temporary tag
 919     swf_DeleteTag(tag);
 920 }
 921
 922 void combine(SWF*master, char*slave_name, SWF*slave, SWF*newswf)
 923 {
 924     slavename = slave_name;
 925     slaveid = -1;
 926     slaveframe = -1;
 927
 928     swf_FoldAll(master);
 929     swf_FoldAll(slave);
 930
 931     if(slavename[0] == '#')
 932     {
 933         slaveid = atoi(&slavename[1]);
 934         slavename = 0;
 935     }
 936
 937     if(config.isframe)
 938     {
 939         int tmp;
 940         if(slavename && slavename[0]!='#' && (sscanf(slavename, "%d", &tmp) ==
 941                 strlen(slavename))) {
 942         /* if the name the slave should replace
 943            consists only of digits and the -f
 944            option is given, it probably is not
 945            a frame name but a frame number.
 946          */
 947             slaveid = tmp;
 948             slavename = 0;
 949         }
 950
 951         if(slaveid>=0) {
 952             slaveframe = slaveid;
 953             slaveid = -1;
 954         } else {
 955         /* if id wasn't given as either #number or number,
 956            the name is a frame label. BTW: The user wouldn't have
 957            needed to supply the -f option in this case */
 958         }
 959     }
 960
 961     logf("<debug> move x (%d)", config.movex);
 962     logf("<debug> move y (%d)", config.movey);
 963     logf("<debug> scale x (%f)", config.scalex);
 964     logf("<debug> scale y (%f)", config.scaley);
 965     logf("<debug> is frame (%d)", config.isframe);
 966
 967     memset(masterbitmap, 0, sizeof(masterbitmap));
 968
 969     if(config.cat)
 970         return catcombine(master, slave_name, slave, newswf);
 971     else
 972         return normalcombine(master, slave_name, slave, newswf);
 973 }
 974
 975 int main(int argn, char *argv[])
 976 {
 977     int fi;
 978     SWF master;
 979     SWF slave;
 980     SWF newswf;
 981     int t;
 982
 983     config.overlay = 0;
 984     config.antistream = 0;
 985     config.alloctest = 0;
 986     config.cat = 0;
 987     config.merge = 0;
 988     config.clip = 0;
 989     config.loglevel = 2;
 990     config.movex = 0;
 991     config.movey = 0;
 992     config.scalex = 1.0;
 993     config.scaley = 1.0;
 994     config.sizex = 0;
 995     config.sizey = 0;
 996     config.hassizex = 0;
 997     config.hassizey = 0;
 998     config.framerate = 0;
 999     config.stack = 0;
1000     config.stack1 = 0;
1001     config.dummy = 0;
1002     config.zlib = 0;
1003
1004     processargs(argn, argv);
1005     initLog(0,-1,0,0,-1,config.loglevel);
1006
1007     if(config.merge && config.cat) {
1008         logf("<error> Can't combine --cat and --merge");
1009         exit(1);
1010     }
1011
1012     if(config.stack) {
1013         if(config.overlay) {
1014             logf("<error> Can't combine -l and -t");
1015             exit(1);
1016         }
1017         if(config.clip) {
1018             logf("<error> Can't combine -c and -t");
1019             exit(1);
1020         }
1021         logf("<verbose> (stacking) %d files found\n", numslaves);
1022
1023         makestackmaster(&master);
1024     }
1025     else {
1026         int ret;
1027         logf("<verbose> master entity %s (named \"%s\")\n", master_filename, master_name);
1028         fi = open(master_filename, O_RDONLY);
1029         if(fi<0) {
1030             logf("<fatal> Failed to open %s\n", master_filename);
1031             exit(1);
1032         }
1033         ret = swf_ReadSWF(fi, &master);
1034         if(ret<0) {
1035             logf("<fatal> Failed to read from %s\n", master_filename);
1036             exit(1);
1037         }
1038         logf("<debug> Read %d bytes from masterfile\n", ret);
1039         close(fi);
1040     }
1041
1042     for(t=0;t<numslaves;t++) {
1043             logf("<verbose> slave entity(%d) %s (%s \"%s\")\n", t+1, slave_filename[t],
1044                     slave_isframe[t]?"frame":"object", slave_name[t]);
1045     }
1046
1047     if(config.dummy)
1048     {
1049         if(numslaves)
1050         {
1051             logf("<error> --dummy (-d) implies there are zero slave objects. You supplied %d.", numslaves);
1052             exit(1);
1053         }
1054         numslaves = 1;
1055         slave_filename[0] = "!!dummy!!";
1056         slave_name[0] = "!!dummy!!";
1057         slave_isframe[0] = 0;
1058     }
1059
1060     if (config.alloctest)
1061     {
1062         char*bitmap = malloc(sizeof(char)*65536);
1063         memset(bitmap, 0, 65536*sizeof(char));
1064         memset(bitmap, 1, 101*sizeof(char));
1065         swf_Relocate(&master, bitmap);
1066         newswf = master;
1067         free(bitmap);
1068 //      makestackmaster(&newswf);
1069     }
1070     else
1071     {
1072         if (!numslaves)
1073         {
1074             if(config.cat)
1075                 logf("<error> You must have at least two objects.");
1076             else
1077                 logf("<error> You must have at least one slave entity.");
1078             return 0;
1079         }
1080         for(t = 0; t < numslaves; t++)
1081         {
1082             config.movex = slave_movex[t];
1083             config.movey = slave_movey[t];
1084             config.scalex = slave_scalex[t];
1085             config.scaley = slave_scaley[t];
1086             config.isframe = slave_isframe[t];
1087
1088             logf("<notice> Combine [%s]%s and [%s]%s", master_name, master_filename,
1089                     slave_name[t], slave_filename[t]);
1090             if(!config.dummy)
1091             {
1092                 int ret;
1093                 fi = open(slave_filename[t], O_RDONLY);
1094                 if(!fi) {
1095                     logf("<fatal> Failed to open %s\n", slave_filename[t]);
1096                     exit(1);
1097                 }
1098                 ret = swf_ReadSWF(fi, &slave);
1099                 if(ret<0) {
1100                     logf("<fatal> Failed to read from %s\n", slave_filename[t]);
1101                     exit(1);
1102                 }
1103                 logf("<debug> Read %d bytes from slavefile\n", ret);
1104                 close(fi);
1105             }
1106             else
1107             {
1108                 memset(&slave, 0, sizeof(slave));
1109                 slave.firstTag = swf_InsertTag(0, ST_END);
1110                 slave.frameRate = 0;
1111                 slave.fileVersion = 4;
1112                 slave.frameCount = 0;
1113             }
1114
1115             combine(&master, slave_name[t], &slave, &newswf);
1116             master = newswf;
1117         }
1118     }
1119
1120     fi = open(outputname, O_RDWR|O_TRUNC|O_CREAT, 0777);
1121
1122     if(config.zlib)
1123         swf_WriteSWC(fi, &newswf);
1124     else {
1125         newswf.compressed = 0;
1126         swf_WriteSWF(fi, &newswf);
1127     }
1128     close(fi);
1129     return 0;
1130 }
1131