src/swfcombine.c

   1 /* swfcombine.c
   2    main routine for swfcombine(1), which is 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 "../lib/args.h"
  14 #include "combine.h"
  15 #include "settings.h"
  16 #include "types.h"
  17 #include "flash.h"
  18 #include "../config.h"
  19
  20 char * master_filename = 0;
  21 char * master_name = 0;
  22 char * slave_filename[128];
  23 char * slave_name[128];
  24 int slave_movex[128];
  25 int slave_movey[128];
  26 float slave_scalex[128];
  27 float slave_scaley[128];
  28 int numslaves = 0;
  29
  30 char * outputname = "output.swf";
  31
  32 int args_callback_option(char*name,char*val) {
  33     if(!strcmp(name,"c"))
  34     {
  35         config.clip = 1;
  36         return 0;
  37     }
  38     else if(!strcmp(name,"l"))
  39     {
  40         config.overlay = 1;
  41         return 0;
  42     }
  43     else if (!strcmp(name, "o"))
  44     {
  45         outputname = val;
  46         return 1;
  47     }
  48     else if (!strcmp(name, "v"))
  49     {
  50         config.loglevel ++;
  51         return 0;
  52     }
  53     else if (!strcmp(name, "a"))
  54     {
  55         config.alloctest = 1;
  56         return 0;
  57     }
  58     else if (!strcmp(name, "x"))
  59     {
  60         config.movex = atoi(val);
  61         return 1;
  62     }
  63     else if (!strcmp(name, "y"))
  64     {
  65         config.movey = atoi(val);
  66         return 1;
  67     }
  68     else if (!strcmp(name, "s"))
  69     {
  70         config.scalex = config.scaley = atoi(val)/100.0;
  71         return 1;
  72     }
  73     else if (!strcmp(name, "t"))
  74     {
  75         if(master_filename) {
  76             fprintf(stderr, "error with arguments. Try --help.\n");
  77             exit(1);
  78         }
  79         config.stack = 1;
  80         master_filename = "__none__";
  81         return 0;
  82     }
  83     else if (!strcmp(name, "V"))
  84     {
  85         printf("swfcombine - part of %s %s\n", PACKAGE, VERSION);
  86         exit(0);
  87     }
  88     else
  89     {
  90         fprintf(stderr, "Unknown option: -%s\n", name);
  91         exit(1);
  92     }
  93 }
  94
  95 struct options_t options[] =
  96 {{"o","output"},
  97  {"s","scale"},
  98  {"x","xpos"},
  99  {"y","ypos"},
 100  {"l","overlay"},
 101  {"v","verbose"},
 102  {"V","version"},
 103  {"c","clip"},
 104  {0,0}
 105 };
 106
 107 int args_callback_longoption(char*name,char*val) {
 108     return args_long2shortoption(options, name, val);
 109 }
 110
 111 int args_callback_command(char*name, char*val) {
 112     char*myname = strdup(name);
 113     char*filename;
 114     filename = strchr(myname, '=');
 115     if(filename) {
 116         *filename = 0;
 117         filename++;
 118     } else {
 119         // argument has no explicit name field. guess one from the file name
 120         char*path = strrchr(myname, '/');
 121         char*ext = strrchr(myname, '.');
 122         if(!path) path = myname;
 123         else path ++;
 124         if(ext) *ext = 0;
 125         myname = path;
 126         filename = name;
 127     }
 128
 129     if(!master_filename) {
 130
 131         master_filename = filename;
 132         master_name = myname;
 133     } else {
 134         logf("<verbose> slave entity %s (named \"%s\")\n", filename, myname);
 135
 136         slave_filename[numslaves] = filename;
 137         slave_name[numslaves] = myname;
 138         slave_movex[numslaves] = config.movex;
 139         slave_movey[numslaves] = config.movey;
 140         slave_scalex[numslaves] = config.scalex;
 141         slave_scaley[numslaves] = config.scaley;
 142         config.movex = config.movey = 0;
 143         config.scalex = config.scaley = 1.0;
 144         numslaves ++;
 145     }
 146     return 0;
 147 }
 148
 149 void args_callback_usage(char*name)
 150 {
 151     printf("Usage: %s [-l] [-o outputfile] [name=]masterfile [-x xpos] [-y ypos] [-s scale] [name1=]slavefile1 .. [-x xpos] [-y ypos] [-s scale] [nameN=]slavefileN\n", name);
 152     printf("\n");
 153     printf("-o outputfile       explicitly specify output file. (otherwise, output.swf will be used)\n");
 154     printf("-l                  (overlay) Don't remove any master objects, only overlay new objects\n");
 155     printf("-c                  (clip) Clip the slave objects by the corresponding master objects\n");
 156     printf("-v                  (verbose) Use more than one -v for greater effect \n");
 157     printf("-x xpos             (move x) Adjust position of slave by xpos twips (1/20 pixel)\n");
 158     printf("-y ypos             (move y) Adjust position of slave by ypos twips (1/20 pixel)\n");
 159     printf("-s scale            (scale) Adjust size of slave by scale%\n");
 160 }
 161
 162 /* read a whole file in memory */
 163 char* fi_slurp(FILE*fi, unsigned int * setlength)
 164 {
 165     char * mem;
 166     long long int length; //;)
 167     long long int pos = 0;
 168     fseek(fi,0,SEEK_END);
 169     length = ftell(fi);
 170     fseek(fi,0,SEEK_SET);
 171     if(!length)
 172         return 0;
 173     mem = malloc(length);
 174     if(!mem)
 175         return 0;
 176     while(!feof(fi))
 177     {
 178         pos += fread(&mem[pos], 1, 65536, fi);
 179     }
 180     if (setlength)
 181         *setlength = length;
 182     return mem;
 183 }
 184
 185 void fi_dump(FILE*fi, void*_mem, int length)
 186 {
 187     char*mem = (char*)_mem;
 188     int pos = 0;
 189     while(pos < length)
 190     {
 191         int size = 65536;
 192         if (size > (length - pos))
 193                 size = (length - pos);
 194         pos += fwrite(&mem[pos], 1, size, fi);
 195     }
 196 }
 197
 198 void makestackmaster(u8**masterdata, int*masterlength)
 199 {
 200     u8 head[] = {'F','W','S'};
 201     u8 *pos;
 202     u32 * fixpos;
 203     int t;
 204     struct RECT box;
 205     int strlength = 0;
 206     int fileversion = 1;
 207
 208     /* scan all slaves for bounding box */
 209     for(t=0;t<numslaves;t++)
 210     {
 211         FILE*fi=fopen(slave_filename[t],"rb");
 212         u8 data[256];
 213         int ret;
 214         struct flash_header head;
 215         strlength += strlen(slave_name[t]) + 9;
 216         if(!fi) {
 217             logf("<fatal> Couldn't open %s.", slave_filename[t]);
 218             exit(1);
 219         }
 220         ret = fread(data,1,256,fi);
 221         if(ret < 13) {
 222             logf("<fatal> File %s is to small (%d bytes)", slave_filename[t], ret);
 223             exit(1);
 224         }
 225         swf_init(data,256);
 226         head = swf_read_header();
 227         logf("<verbose> File %s has bounding box %d:%d:%d:%d\n",
 228                 slave_filename[t],
 229                 head.boundingBox.x1, head.boundingBox.y1,
 230                 head.boundingBox.x2, head.boundingBox.y2);
 231         if(head.version > fileversion)
 232             fileversion = head.version;
 233         if(!t)
 234             box = head.boundingBox;
 235         else {
 236             if(head.boundingBox.x1 < box.x1)
 237                 box.x1 = head.boundingBox.x1;
 238             if(head.boundingBox.y1 < box.y1)
 239                 box.y1 = head.boundingBox.y1;
 240             if(head.boundingBox.x2 > box.x2)
 241                 box.x2 = head.boundingBox.x2;
 242             if(head.boundingBox.y2 > box.y2)
 243                 box.y2 = head.boundingBox.y2;
 244         }
 245         logf("<verbose> New master bounding box is %d:%d:%d:%d\n",
 246                 box.x1, box.y1,
 247                 box.x2, box.y2);
 248         fclose(fi);
 249     }
 250
 251     /* we don't have a master, so we create one ourselves. */
 252     /* (please notice the philosophical content) */
 253     *masterlength = (numslaves + 1) * 32 + strlength;
 254     *masterdata = (u8*)malloc(*masterlength);
 255     pos = *masterdata;
 256     memcpy(pos, head, sizeof(head));
 257     pos += sizeof(head);
 258     *pos++ = fileversion;
 259     fixpos = (u32*)pos;
 260     *(u32*)pos = 0x12345678; // to be overwritten
 261     pos += 4;
 262     writeRECT(&pos, &box);
 263     *(u16*)pos = 0x2000; // framerate
 264     pos += 2;
 265     *(u16*)pos = numslaves;
 266     pos += 2;
 267     for(t=0;t<numslaves;t++)
 268     {
 269         char buf[128];
 270         int namelen;
 271
 272         if(1) {
 273             sprintf(buf, "Frame%02d", t);
 274             slave_name[t] = strdup(buf);
 275         }
 276         namelen = strlen(slave_name[t]);
 277
 278         *(u16*)&pos[0] = (u16)(TAGID_DEFINESPRITE<<6) + 6;
 279         *(u16*)&pos[2] = t+1; //ID
 280         *(u16*)&pos[4] = 0; // Frames
 281         *(u16*)&pos[6] = 0; // TAG1
 282         *(u16*)&pos[8] = (u16)(TAGID_PLACEOBJECT2<<6) + 6 + namelen;
 283         *(u16*)&pos[10]= 34; //flags: id+name
 284         *(u16*)&pos[11]= 1; // depth
 285         *(u16*)&pos[13]= t+1; // id
 286         sprintf(&pos[15],slave_name[t]);
 287         pos += 15 + namelen + 1;
 288         *(u16*)&pos[0]= (u16)(TAGID_SHOWFRAME<<6) + 0;
 289         pos += 2;
 290         if(t!=numslaves-1)
 291         {
 292             *(u16*)&pos[0]= (u16)(TAGID_REMOVEOBJECT2<<6) + 2;
 293             *(u16*)&pos[2]= 1; // depth;
 294             pos += 4;
 295         }
 296     }
 297     *(u16*)pos = TAGID_END<<6 + 0;
 298     *masterlength = pos - *masterdata;
 299     *fixpos = *masterlength;
 300 }
 301
 302 struct config_t config;
 303 int main(int argn, char *argv[])
 304 {
 305     FILE*fi;
 306     u8*masterdata;
 307     unsigned int masterlength;
 308     u8*slavedata;
 309     unsigned int slavelength;
 310     u8*newdata;
 311     unsigned int newlength;
 312     int t;
 313
 314     config.overlay = 0;
 315     config.alloctest = 0;
 316     config.clip = 0;
 317     config.loglevel = 2;
 318     config.movex = 0;
 319     config.movey = 0;
 320     config.scalex = 1.0;
 321     config.scaley = 1.0;
 322     config.stack = 0;
 323
 324     processargs(argn, argv);
 325     initLog(0,-1,0,0,-1,config.loglevel);
 326
 327     if(config.stack) {
 328
 329         if(config.overlay) {
 330             logf("<error> Can't combine -l and -t");
 331             exit(1);
 332         }
 333         if(config.clip) {
 334             logf("<error> Can't combine -c and -t");
 335             exit(1);
 336         }
 337         logf("<verbose> (stacking) %d files found\n", numslaves);
 338
 339         makestackmaster(&masterdata,&masterlength);
 340
 341         logf("<verbose> Generated %d bytes of master data", masterlength);
 342     }
 343     else {
 344         logf("<verbose> master entity %s (named \"%s\")\n", master_filename, master_name);
 345         fi = fopen(master_filename, "rb");
 346         if(!fi) {
 347             fprintf(stderr, "Failed to open %s\n", master_filename);
 348             return 1;
 349         }
 350         masterdata = fi_slurp(fi, &masterlength);
 351         if(!masterdata) {
 352             fprintf(stderr, "Failed to read from %s\n", master_filename);
 353             return 1;
 354         }
 355         logf("<debug> Read %d bytes from masterfile\n", masterlength);
 356         fclose(fi);
 357     }
 358
 359     for(t=0;t<numslaves;t++)
 360         logf("<verbose> slave entity(%d) %s (named \"%s\")\n", t+1, slave_filename[t], slave_name[t]);
 361
 362     if (config.alloctest)
 363     {
 364         int*bitmap = malloc(sizeof(int)*65536);
 365         memset(bitmap, -1, 65536*sizeof(int));
 366         memset(bitmap, 1, 101*sizeof(int));
 367         swf_relocate(masterdata, masterlength, bitmap);
 368         newdata = masterdata;
 369         newlength = masterlength;
 370         free(bitmap);
 371     }
 372     else
 373     {
 374         if (!numslaves)
 375         {
 376             logf("<error> You must have at least one slave entity.");
 377             return 0;
 378         }
 379         for(t = 0; t < numslaves; t++)
 380         {
 381             config.movex = slave_movex[t];
 382             config.movey = slave_movey[t];
 383             config.scalex = slave_scalex[t];
 384             config.scaley = slave_scaley[t];
 385
 386             logf("<notice> Combine [%s]%s and [%s]%s", master_name, master_filename,
 387                     slave_name[t], slave_filename[t]);
 388             fi = fopen(slave_filename[t], "rb");
 389             if(!fi) {
 390                 fprintf(stderr, "Failed to open %s\n", slave_filename[t]);
 391                 return 1;
 392             }
 393             slavedata = fi_slurp(fi, &slavelength);
 394             if(!slavedata) {
 395                 fprintf(stderr, "Failed to read from %s\n", slave_filename[t]);
 396                 return 1;
 397             }
 398             logf("<debug> Read %d bytes from slavefile\n", slavelength);
 399             fclose(fi);
 400
 401             newdata = combine(masterdata, masterlength, slave_name[t], slavedata, slavelength, &newlength);
 402             if(!newdata) {
 403                 logf("<fatal> Aborting.");
 404                 return 1;
 405             }
 406
 407             free(masterdata);
 408             masterdata = newdata;
 409             masterlength = newlength;
 410         }
 411     }
 412
 413     logf("<debug> New File is %d bytes \n", newlength);
 414     if(newdata && newlength) {
 415         FILE*fi = fopen(outputname, "wb");
 416         fi_dump(fi, newdata, newlength);
 417         fclose(fi);
 418     }
 419     return 0;
 420 }
 421