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 catcombine(SWF*master, char*slave_name, SWF*slave, SWF*newswf)
 724 {
 725     char* depths;
 726     int t;
 727     TAG*tag;
 728     TAG*mtag,*stag;
 729     if(config.isframe) {
 730         logf("<fatal> Can't combine --cat and --frame");
 731         exit(1);
 732     }
 733
 734     tag = master->firstTag;
 735     while(tag)
 736     {
 737         if(swf_isDefiningTag(tag)) {
 738             int defineid = swf_GetDefineID(tag);
 739             logf("<debug> tagid %02x defines object %d", tag->id, defineid);
 740             masterbitmap[defineid] = 1;
 741         }
 742         tag = tag->next;
 743     }
 744
 745     swf_Relocate(slave, masterbitmap);
 746     jpeg_assert(master, slave);
 747
 748     memcpy(newswf, master, sizeof(SWF));
 749     tag = newswf->firstTag = swf_InsertTag(0, ST_REFLEX); // to be removed later
 750
 751     depths = malloc(65536);
 752     if(!depths) {
 753         logf("<fatal> Couldn't allocate %d bytes of memory", 65536);
 754         return;
 755     }
 756     memset(depths, 0, 65536);
 757     mtag = master->firstTag;
 758     while(mtag && mtag->id!=ST_END)
 759     {
 760         int num=1;
 761         U16 depth;
 762         logf("<debug> [master] write tag %02x (%d bytes in body)",
 763                 mtag->id, mtag->len);
 764         switch(mtag->id) {
 765             case ST_PLACEOBJECT2:
 766                 num++;
 767             case ST_PLACEOBJECT: {
 768                depth = swf_GetDepth(mtag);
 769                depths[depth] = 1;
 770             }
 771             break;
 772             case ST_REMOVEOBJECT: {
 773                depth = swf_GetDepth(mtag);
 774                depths[depth] = 0;
 775             }
 776             break;
 777             case ST_REMOVEOBJECT2: {
 778                depth = swf_GetDepth(mtag);
 779                depths[depth] = 0;
 780             }
 781             break;
 782         }
 783         tag = swf_InsertTag(tag, mtag->id);
 784         swf_SetBlock(tag, mtag->data, mtag->len);
 785
 786         mtag = mtag->next;
 787     }
 788
 789     for(t=0;t<65536;t++)
 790     if(depths[t])
 791     {
 792         char data[16];
 793         int len;
 794         tag = swf_InsertTag(tag, ST_REMOVEOBJECT2);
 795         swf_SetU16(tag, t);
 796     }
 797     free(depths);
 798
 799     stag = slave->firstTag;
 800     while(stag && stag->id!=ST_END)
 801     {
 802         logf("<debug> [slave] write tag %02x (%d bytes in body)",
 803                 stag->id, stag->len);
 804         tag = swf_InsertTag(tag, stag->id);
 805         swf_SetBlock(tag, stag->data, stag->len);
 806         stag = stag->next;
 807     }
 808     tag = swf_InsertTag(tag, ST_END);
 809
 810     tag = newswf->firstTag;
 811     newswf->firstTag = newswf->firstTag->next; //remove temporary tag
 812     swf_DeleteTag(tag);
 813 }
 814
 815 void normalcombine(SWF*master, char*slave_name, SWF*slave, SWF*newswf)
 816 {
 817     int spriteid = -1;
 818     int replaceddefine = -1;
 819     int frame = 0;
 820     char*framelabel;
 821     TAG * tag = master->firstTag;
 822
 823     // set the idtab
 824     while(tag)
 825     {
 826         if(swf_isDefiningTag(tag)) {
 827             int defineid = swf_GetDefineID(tag);
 828             logf("<debug> tagid %02x defines object %d", tag->id, defineid);
 829             masterbitmap[defineid] = 1;
 830         } else if(tag->id == ST_PLACEOBJECT2) {
 831             char * name = swf_GetName(tag);
 832             int id = swf_GetPlaceID(tag);
 833
 834             if(name)
 835               logf("<verbose> tagid %02x places object %d named \"%s\"", tag->id, id, name);
 836             else
 837               logf("<verbose> tagid %02x places object %d (no name)", tag->id, id);
 838
 839             if ((name && slavename && !strcmp(name,slavename)) ||
 840                 (!slavename && id==slaveid)) {
 841                 if(id>=0) {
 842                   spriteid = id;
 843                   logf("<notice> Slave file attached to object %d.", id);
 844                 }
 845             }
 846         } else if(tag->id == ST_SHOWFRAME) {
 847             if(slaveframe>=0 && frame==slaveframe) {
 848                 logf("<notice> Slave file attached to frame %d.", frame);
 849             }
 850             frame++;
 851         } else if(tag->id == ST_FRAMELABEL) {
 852             char * name = tag->data;
 853             if(name && slavename && config.isframe && !strcmp(name, slavename)) {
 854                 slaveframe = frame;
 855                 logf("<notice> Slave file attached to frame %d (%s).", frame, name);
 856             }
 857         }
 858         tag = tag->next;
 859     };
 860
 861     if (spriteid<0 && !config.isframe) {
 862         if(slavename) {
 863             if(strcmp(slavename,"!!dummy!!"))
 864                 logf("<warning> Didn't find anything named %s in file. No substitutions will occur.", slavename);
 865         }
 866         else
 867             logf("<warning> Didn't find id %d in file. No substitutions will occur.", slaveid);
 868         spriteid = get_free_id(masterbitmap);
 869     }
 870
 871     swf_Relocate (slave, masterbitmap);
 872     jpeg_assert(slave, master);
 873
 874     if (config.overlay)
 875         replaceddefine = get_free_id(masterbitmap);
 876
 877     // write file
 878
 879     memcpy(newswf, master, sizeof(SWF));
 880     newswf->firstTag = tag = swf_InsertTag(0, ST_REFLEX); // to be removed later
 881
 882     if (config.antistream) {
 883         if (config.merge) {
 884             logf("<fatal> Can't combine --antistream and --merge");
 885         }
 886         tag = write_sprite_defines(tag, slave);
 887         tag = write_sprite(tag, slave, spriteid, replaceddefine);
 888         tag = write_master(tag, master, slave, spriteid, replaceddefine, FLAGS_WRITEDEFINES);
 889         tag = write_master(tag, master, slave, spriteid, replaceddefine, FLAGS_WRITENONDEFINES);
 890     } else {
 891         if (config.merge)
 892             tag = write_master(tag, master, slave, spriteid, replaceddefine,
 893                 FLAGS_WRITEDEFINES|FLAGS_WRITENONDEFINES|FLAGS_WRITESLAVE);
 894         else
 895             tag = write_master(tag, master, slave, spriteid, replaceddefine,
 896                 FLAGS_WRITEDEFINES|FLAGS_WRITENONDEFINES|FLAGS_WRITESPRITE);
 897     }
 898
 899     tag = newswf->firstTag;
 900     newswf->firstTag = newswf->firstTag->next; //remove temporary tag
 901     swf_DeleteTag(tag);
 902 }
 903
 904 void combine(SWF*master, char*slave_name, SWF*slave, SWF*newswf)
 905 {
 906     slavename = slave_name;
 907     slaveid = -1;
 908     slaveframe = -1;
 909
 910     swf_FoldAll(master);
 911     swf_FoldAll(slave);
 912
 913     if(slavename[0] == '#')
 914     {
 915         slaveid = atoi(&slavename[1]);
 916         slavename = 0;
 917     }
 918
 919     if(config.isframe)
 920     {
 921         int tmp;
 922         if(slavename && slavename[0]!='#' && (sscanf(slavename, "%d", &tmp) ==
 923                 strlen(slavename))) {
 924         /* if the name the slave should replace
 925            consists only of digits and the -f
 926            option is given, it probably is not
 927            a frame name but a frame number.
 928          */
 929             slaveid = tmp;
 930             slavename = 0;
 931         }
 932
 933         if(slaveid>=0) {
 934             slaveframe = slaveid;
 935             slaveid = -1;
 936         } else {
 937         /* if id wasn't given as either #number or number,
 938            the name is a frame label. BTW: The user wouldn't have
 939            needed to supply the -f option in this case */
 940         }
 941     }
 942
 943     logf("<debug> move x (%d)", config.movex);
 944     logf("<debug> move y (%d)", config.movey);
 945     logf("<debug> scale x (%f)", config.scalex);
 946     logf("<debug> scale y (%f)", config.scaley);
 947     logf("<debug> is frame (%d)", config.isframe);
 948
 949     memset(masterbitmap, 0, sizeof(masterbitmap));
 950
 951     if(config.cat)
 952         return catcombine(master, slave_name, slave, newswf);
 953     else
 954         return normalcombine(master, slave_name, slave, newswf);
 955 }
 956
 957 int main(int argn, char *argv[])
 958 {
 959     int fi;
 960     SWF master;
 961     SWF slave;
 962     SWF newswf;
 963     int t;
 964
 965     config.overlay = 0;
 966     config.antistream = 0;
 967     config.alloctest = 0;
 968     config.cat = 0;
 969     config.merge = 0;
 970     config.clip = 0;
 971     config.loglevel = 2;
 972     config.movex = 0;
 973     config.movey = 0;
 974     config.scalex = 1.0;
 975     config.scaley = 1.0;
 976     config.sizex = 0;
 977     config.sizey = 0;
 978     config.hassizex = 0;
 979     config.hassizey = 0;
 980     config.framerate = 0;
 981     config.stack = 0;
 982     config.stack1 = 0;
 983     config.dummy = 0;
 984     config.zlib = 0;
 985
 986     processargs(argn, argv);
 987     initLog(0,-1,0,0,-1,config.loglevel);
 988
 989     if(config.merge && config.cat) {
 990         logf("<error> Can't combine --cat and --merge");
 991         exit(1);
 992     }
 993
 994     if(config.stack) {
 995         if(config.overlay) {
 996             logf("<error> Can't combine -l and -t");
 997             exit(1);
 998         }
 999         if(config.clip) {
1000             logf("<error> Can't combine -c and -t");
1001             exit(1);
1002         }
1003         logf("<verbose> (stacking) %d files found\n", numslaves);
1004
1005         makestackmaster(&master);
1006     }
1007     else {
1008         int ret;
1009         logf("<verbose> master entity %s (named \"%s\")\n", master_filename, master_name);
1010         fi = open(master_filename, O_RDONLY);
1011         if(fi<0) {
1012             logf("<fatal> Failed to open %s\n", master_filename);
1013             exit(1);
1014         }
1015         ret = swf_ReadSWF(fi, &master);
1016         if(ret<0) {
1017             logf("<fatal> Failed to read from %s\n", master_filename);
1018             exit(1);
1019         }
1020         logf("<debug> Read %d bytes from masterfile\n", ret);
1021         close(fi);
1022     }
1023
1024     for(t=0;t<numslaves;t++) {
1025             logf("<verbose> slave entity(%d) %s (%s \"%s\")\n", t+1, slave_filename[t],
1026                     slave_isframe[t]?"frame":"object", slave_name[t]);
1027     }
1028
1029     if(config.dummy)
1030     {
1031         if(numslaves)
1032         {
1033             logf("<error> --dummy (-d) implies there are zero slave objects. You supplied %d.", numslaves);
1034             exit(1);
1035         }
1036         numslaves = 1;
1037         slave_filename[0] = "!!dummy!!";
1038         slave_name[0] = "!!dummy!!";
1039         slave_isframe[0] = 0;
1040     }
1041
1042     if (config.alloctest)
1043     {
1044         char*bitmap = malloc(sizeof(char)*65536);
1045         memset(bitmap, 0, 65536*sizeof(char));
1046         memset(bitmap, 1, 101*sizeof(char));
1047         swf_Relocate(&master, bitmap);
1048         newswf = master;
1049         free(bitmap);
1050 //      makestackmaster(&newswf);
1051     }
1052     else
1053     {
1054         if (!numslaves)
1055         {
1056             if(config.cat)
1057                 logf("<error> You must have at least two objects.");
1058             else
1059                 logf("<error> You must have at least one slave entity.");
1060             return 0;
1061         }
1062         for(t = 0; t < numslaves; t++)
1063         {
1064             config.movex = slave_movex[t];
1065             config.movey = slave_movey[t];
1066             config.scalex = slave_scalex[t];
1067             config.scaley = slave_scaley[t];
1068             config.isframe = slave_isframe[t];
1069
1070             logf("<notice> Combine [%s]%s and [%s]%s", master_name, master_filename,
1071                     slave_name[t], slave_filename[t]);
1072             if(!config.dummy)
1073             {
1074                 int ret;
1075                 fi = open(slave_filename[t], O_RDONLY);
1076                 if(!fi) {
1077                     logf("<fatal> Failed to open %s\n", slave_filename[t]);
1078                     exit(1);
1079                 }
1080                 ret = swf_ReadSWF(fi, &slave);
1081                 if(ret<0) {
1082                     logf("<fatal> Failed to read from %s\n", slave_filename[t]);
1083                     exit(1);
1084                 }
1085                 logf("<debug> Read %d bytes from slavefile\n", ret);
1086                 close(fi);
1087             }
1088             else
1089             {
1090                 memset(&slave, 0, sizeof(slave));
1091                 slave.firstTag = swf_InsertTag(0, ST_END);
1092                 slave.frameRate = 0;
1093                 slave.fileVersion = 4;
1094                 slave.frameCount = 0;
1095             }
1096
1097             combine(&master, slave_name[t], &slave, &newswf);
1098             master = newswf;
1099         }
1100     }
1101
1102     fi = open(outputname, O_RDWR|O_TRUNC|O_CREAT, 0777);
1103
1104     if(config.zlib)
1105         swf_WriteSWC(fi, &newswf);
1106     else {
1107         newswf.compressed = 0;
1108         swf_WriteSWF(fi, &newswf);
1109     }
1110     close(fi);
1111     return 0;
1112 }
1113