contributed by Daichi Shinozaki.
authorkramm <kramm>
Mon, 10 Jan 2005 17:42:00 +0000 (17:42 +0000)
committerkramm <kramm>
Mon, 10 Jan 2005 17:42:00 +0000 (17:42 +0000)
src/gif2swf.c [new file with mode: 0644]

diff --git a/src/gif2swf.c b/src/gif2swf.c
new file mode 100644 (file)
index 0000000..e707a6e
--- /dev/null
@@ -0,0 +1,507 @@
+/* gif2swf.c
+
+   GIF to SWF converter tool
+
+   Copyright (c) 2005 Daichi Shinozaki <dseg@shield.jp>
+   This program is free software; you can redistribute it and/or modify
+   it under the terms of the GNU General Public License as published by
+   the Free Software Foundation; either version 2 of the License, or
+   (at your option) any later version.
+
+   This program is distributed in the hope that it will be useful,
+   but WITHOUT ANY WARRANTY; without even the implied warranty of
+   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+   GNU General Public License for more details.
+
+   You should have received a copy of the GNU General Public License
+   along with this program; if not, write to the Free Software
+   Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA */
+
+#include <stdio.h>
+#include <fcntl.h>
+#include <zlib.h>
+#include <gif_lib.h>
+#include "../lib/rfxswf.h"
+#include "../lib/args.h"
+
+#define MAX_INPUT_FILES 1024
+#define VERBOSE(x) (global.verbose>=x)
+
+#define PROGRAM_NAME "gif2swf"
+
+struct {
+    float framerate;
+    int max_image_width;
+    int max_image_height;
+    int force_width;
+    int force_height;
+    int nfiles;
+    int verbose;
+    int do_cgi;
+    int version;
+    char *outfile;
+} global;
+
+struct {
+    char *filename;
+} image[MAX_INPUT_FILES];
+
+struct gif_header {
+   int width;
+   int height;
+};
+
+// Get transparency color from graphic extension block
+//
+// Return: transparency color or -1
+
+int getTransparentColor(GifFileType * gft)
+{
+  int i;
+  ExtensionBlock* ext = gft->SavedImages[0].ExtensionBlocks;
+  for (i=0; i < gft->SavedImages[0].ExtensionBlockCount; i++, ext++)
+    if ((ext->Function == GRAPHICS_EXT_FUNC_CODE) &&
+        (ext->Bytes[0] & 1)) { // there is a transparent color
+      return ext->Bytes[3] == 0 ?
+       255 :                  // exception
+        ext->Bytes[3];
+    }
+
+  return -1;
+}
+
+TAG *MovieStart(SWF * swf, float framerate, int dx, int dy)
+{
+    TAG *t;
+    RGBA rgb;
+
+    memset(swf, 0x00, sizeof(SWF));
+
+    swf->fileVersion = global.version;
+    swf->frameRate = (int)(256.0 * framerate);
+    swf->movieSize.xmax = dx * 20;
+    swf->movieSize.ymax = dy * 20;
+
+    t = swf->firstTag = swf_InsertTag(NULL, ST_SETBACKGROUNDCOLOR);
+    
+    rgb.r = rgb.g = rgb.b = rgb.a = 0x00;
+  
+    //rgb.g = 0xff; //<--- handy for testing alpha conversion
+    swf_SetRGB(t, &rgb);
+
+    return t;
+}
+
+int MovieFinish(SWF * swf, TAG * t, char *sname)
+{
+    int f, so = fileno(stdout);
+    t = swf_InsertTag(t, ST_END);
+
+    if ((!isatty(so)) && (!sname))
+       f = so;
+    else {
+       if (!sname)
+           sname = "output.swf";
+       f = open(sname,O_WRONLY|O_CREAT|O_TRUNC|O_BINARY, 0644);
+    }
+
+    if(global.do_cgi) {
+       if FAILED(swf_WriteCGI(swf)) fprintf(stderr,"WriteCGI() failed.\n");
+    } else {
+       if(global.version >= 6) {
+           if (swf_WriteSWC(f, swf)<0) 
+               fprintf(stderr, "Unable to write output file: %s\n", sname);
+       } else {
+           if (swf_WriteSWF(f, swf)<0)
+                fprintf(stderr, "Unable to write output file: %s\n", sname);
+       }
+       if (f != so)
+           close(f);
+    }
+
+    swf_FreeTags(swf);
+    return 0;
+}
+
+TAG *MovieAddFrame(SWF * swf, TAG * t, char *sname, int id)
+{
+    SHAPE *s;
+    SRECT r;
+    MATRIX m;
+    int fs;
+
+    U8 *imagedata, *from, *to;
+    RGBA* pal;
+  
+    struct gif_header header;
+
+    int i, j, bgcolor, numcolors = 0, alphapalette = 0;
+    int bpp; // byte per pixel
+    int swf_width, padlen;
+  
+    ColorMapObject* colormap;
+    GifColorType c;
+    int interlacedOffset[] = { 0, 4, 2, 1 }; // The way Interlaced image should
+    int interlacedJumps[] = { 8, 8, 4, 2 };  // be read - offsets and jumps...
+  
+    FILE *fi;
+    GifFileType* gft; 
+  
+    if ((fi = fopen(sname, "rb")) == NULL) {
+       if (VERBOSE(1))
+           fprintf(stderr, "Read access failed: %s\n", sname);
+       return t;
+    }
+  
+    if((gft = DGifOpenFileName(sname)) == NULL) {  
+        fprintf(stderr, "%s is not a GIF file!\n", sname);
+        return t;
+    }
+    if(DGifSlurp(gft) != GIF_OK) {
+        PrintGifError();
+        return t;
+    }
+
+    header.width  = gft->SWidth;
+    header.height = gft->SHeight;
+
+    pal = (RGBA*)malloc(256*sizeof(RGBA));
+    memset(pal,0,256*sizeof(RGBA));
+  
+    // Local colormap has precedence over Global colormap
+    colormap = gft->Image.ColorMap ? gft->Image.ColorMap : gft->SColorMap;
+    numcolors = colormap->ColorCount;
+    alphapalette = getTransparentColor(gft);
+    bpp = (alphapalette >= 0 ? 4 : 3);
+
+    // bgColor is the background color to fill the bitmap with
+    // if an image is smaller than screen coordinates
+    if (gft->SColorMap) {              // There is a GlobalColorMap
+      bgcolor = gft->SBackGroundColor;  // The BackGroundColor is meaningful
+    } else {
+      if (alphapalette >= 0)           // There is a transparency color
+       bgcolor = alphapalette;         // set the bgColor to tranparent
+      else
+       bgcolor = 0;                    // Don't know what to do here.
+                                       // If this doesn't work, we could
+                                       // create a new color and set the
+                                       // alpha-channel to transparent
+                                       // (unless we are using all the 256
+                                       // colors, in which case either we
+                                       // give up, or move to 16-bits palette
+    }
+
+    for(i=0; i<numcolors; i++) {
+        c = colormap->Colors[i];
+        if(i == alphapalette)
+           pal[i].r = pal[i].g = pal[i].b = pal[i].a = 0; // Fully transparent
+        else {
+           pal[i].r = c.Red;
+           pal[i].g = c.Green;
+           pal[i].b = c.Blue;
+           pal[i].a = 255; // Fully opaque
+       }
+    }
+    
+    if(alphapalette >= 0)
+      t = swf_InsertTag(t, ST_DEFINEBITSLOSSLESS2);
+    else
+      t = swf_InsertTag(t, ST_DEFINEBITSLOSSLESS);
+
+  swf_SetU16(t, id); // id
+  
+  // Ah! The Flash specs says scanlines must be DWORD ALIGNED!
+  // (but image width is the correct number of pixels)
+  swf_width = BYTES_PER_SCANLINE(header.width);
+
+  if ((imagedata = (U8 *)malloc(swf_width*header.height)) == NULL) {
+    fprintf(stderr, "Failed to allocate memory required, aborted.");
+    exit(2);
+  }
+  to = imagedata;
+  from = (U8 *)gft->SavedImages[0].RasterBits;
+  
+  if (swf_width == header.width) {
+    // we are all nicely aligned and don't need to move the bitmap around.
+    // Just copy the bits into the image buffer.*/
+    if (!gft->Image.Interlace)
+      memcpy(to, from, header.width*header.height);
+    else // Need to perform 4 passes on the interlaced images
+        for (i = 0; i < 4; i++) 
+            for (j = interlacedOffset[i]; j < header.height; 
+                j += interlacedJumps[i], from += header.width)
+               memcpy(to + header.width*j, from, header.width);
+  } else {
+    padlen = swf_width - header.width;
+    
+    // here we need to pad the scanline
+    if (!gft->Image.Interlace) {
+      for (i=0; i < header.height; i++, from+=header.width, to+=swf_width) {
+       memcpy(to, from, header.width);
+       memset(to + header.width, bgcolor, padlen);
+      }
+    } else { // Need to perform 4 passes on the interlaced images
+      for (i = 0; i < 4; i++) 
+       for (j = interlacedOffset[i]; j < header.height; 
+            j += interlacedJumps[i], from += header.width) {
+         memcpy(to + swf_width*j, from, header.width);
+         memset(to + swf_width*j, bgcolor, padlen);
+       }
+    }
+  }
+
+    swf_SetLosslessBitsIndexed(t,header.width,header.height,imagedata,pal,256);
+    t = swf_InsertTag(t, ST_DEFINESHAPE);
+
+    swf_ShapeNew(&s);
+    swf_GetMatrix(NULL, &m);
+    m.sx = 20 * 0x10000;
+    m.sy = 20 * 0x10000;
+    fs = swf_ShapeAddBitmapFillStyle(s, &m, id, 0);
+
+    swf_SetU16(t, id + 1);     // id
+
+    r.xmin = r.ymin = 0;
+    r.xmax = header.width * 20;
+    r.ymax = header.height * 20;
+    swf_SetRect(t, &r);
+
+    swf_SetShapeHeader(t, s);
+
+    swf_ShapeSetAll(t, s, 0, 0, 0, fs, 0);
+    swf_ShapeSetLine(t, s, r.xmax, 0);
+    swf_ShapeSetLine(t, s, 0, r.ymax);
+    swf_ShapeSetLine(t, s, -r.xmax, 0);
+    swf_ShapeSetLine(t, s, 0, -r.ymax);
+
+    swf_ShapeSetEnd(t);
+  
+    t = swf_InsertTag(t, ST_PLACEOBJECT2);
+
+    swf_GetMatrix(NULL, &m);
+    m.tx = (swf->movieSize.xmax - (int) header.width * 20) / 2;
+    m.ty = (swf->movieSize.ymax - (int) header.height * 20) / 2;
+    swf_ObjectPlace(t, id + 1, 1, &m, NULL, NULL);
+
+    t = swf_InsertTag(t, ST_SHOWFRAME);
+
+    fclose(fi);
+    free(pal);
+    free(imagedata);
+    DGifCloseFile(gft);
+  
+    return t;
+}
+
+
+int CheckInputFile(char *fname, char **realname)
+{
+    FILE *fi;
+    char *s = malloc(strlen(fname) + 5);
+    GifFileType* gft;
+
+    if (!s)
+       exit(2);
+    (*realname) = s;
+    strcpy(s, fname);
+
+    // Check whether file exists (with typical extensions)
+
+    if ((fi = fopen(s, "rb")) == NULL) {
+       sprintf(s, "%s.gif", fname);
+       if ((fi = fopen(s, "rb")) == NULL) {
+           sprintf(s, "%s.GIF", fname);
+           if ((fi = fopen(s, "rb")) == NULL) {
+               sprintf(s, "%s.Gif", fname);
+               if ((fi = fopen(s, "rb")) == NULL)
+                   fprintf(stderr, "Couldn't open %s!\n", fname);
+                   return -1;
+           }
+       }
+    }
+    fclose(fi);
+  
+    if((gft = DGifOpenFileName(s)) == NULL) {  
+        fprintf(stderr, "%s is not a GIF file!\n", fname);
+        return -1;
+    }
+    if(DGifSlurp(gft) != GIF_OK) {
+        PrintGifError();
+        return -1;
+    }
+  
+    if (global.max_image_width < gft->SWidth)
+        global.max_image_width = gft->SWidth;
+    if (global.max_image_height < gft->SHeight)
+        global.max_image_height = gft->SHeight;
+
+    DGifCloseFile(gft);  
+
+    return 0;
+}
+
+int args_callback_option(char *arg, char *val)
+{
+    int res = 0;
+    if (arg[1])
+       res = -1;
+    else
+       switch (arg[0]) {
+       case 'r':
+           if (val)
+               global.framerate = atof(val);
+           if ((global.framerate < 1.0/256) ||(global.framerate >= 256.0)) {
+               if (VERBOSE(1))
+                   fprintf(stderr,
+                           "Error: You must specify a valid framerate between 1/256 and 255.\n");
+               exit(1);
+           }
+           res = 1;
+           break;
+
+       case 'o':
+           if (val)
+               global.outfile = val;
+           res = 1;
+           break;
+
+       case 'z':
+           global.version = 6;
+           res = 0;
+           break;
+
+       case 'C':
+           global.do_cgi = 1;
+           break;
+
+       case 'v':
+           if (val)
+               global.verbose = atoi(val);
+           res = 1;
+           break;
+
+       case 'X':
+           if (val)
+               global.force_width = atoi(val);
+           res = 1;
+           break;
+
+       case 'Y':
+           if (val)
+               global.force_height = atoi(val);
+           res = 1;
+           break;
+
+       case 'V':
+           printf("gif2swf - part of %s %s\n", PACKAGE, VERSION);
+           exit(0);
+
+       default:
+           res = -1;
+           break;
+       }
+
+    if (res < 0) {
+       if (VERBOSE(1))
+           fprintf(stderr, "Unknown option: -%s\n", arg);
+       exit(1);
+       return 0;
+    }
+    return res;
+}
+
+static struct options_t options[] = {
+{"r", "rate"},
+{"o", "output"},
+{"z", "zlib"},
+{"X", "pixel"},
+{"Y", "pixel"},
+{"v", "verbose"},
+{"C", "cgi"},
+{"V", "version"},
+{0,0}
+};
+
+int args_callback_longoption(char *name, char *val)
+{
+    return args_long2shortoption(options, name, val);
+}
+
+int args_callback_command(char *arg, char *next)       // actually used as filename
+{
+    char *s;
+    if (CheckInputFile(arg, &s) < 0) {
+       if (VERBOSE(1))
+           fprintf(stderr, "Error opening input file: %s\n", arg);
+       free(s);
+
+    } else {
+       image[global.nfiles].filename = s;
+       global.nfiles++;
+       if (global.nfiles >= MAX_INPUT_FILES) {
+           if (VERBOSE(1))
+               fprintf(stderr, "Error: Too many input files.\n");
+           exit(1);
+       }
+    }
+  
+    return 0;
+}
+
+void args_callback_usage(char *name)
+{
+    printf("\n");
+    printf("Usage: %s [-X width] [-Y height] [-o file.swf] [-r rate] file1.gif [file2.gif...]\n", name);
+    printf("\n");
+    printf("-r , --rate <framerate>        Set movie framerate (frames per second)\n");
+    printf("-o , --output <filename>       Set name for SWF output file.\n");
+    printf("-z , --zlib <zlib>             Enable Flash 6 (MX) Zlib Compression\n");
+    printf("-X , --pixel <width>           Force movie width to <width> (default: autodetect)\n");
+    printf("-Y , --pixel <height>          Force movie height to <height> (default: autodetect)\n");
+    printf("-v , --verbose <level>         Set verbose level (0=quiet, 1=default, 2=debug)\n");
+    printf("-C , --cgi                     For use as CGI- prepend http header, write to stdout\n");
+    printf("-V , --version                 Print version information and exit\n");
+    printf("\n");
+}
+
+int main(int argc, char **argv)
+{
+    SWF swf;
+    TAG *t;
+  
+    memset(&global, 0x00, sizeof(global));
+
+    global.framerate = 1.0;
+    global.verbose = 1;
+    global.version = 4;
+
+    processargs(argc, argv);
+    
+    if(global.nfiles<=0) {
+       fprintf(stderr, "No gif files found in arguments\n");
+       return 1;
+    }
+
+    if (VERBOSE(2))
+       fprintf(stderr, "Processing %i file(s)...\n", global.nfiles);
+
+    t = MovieStart(&swf, global.framerate,
+                  global.force_width  ? global.force_width  : global.max_image_width,
+                  global.force_height ? global.force_height : global.max_image_height);
+    {
+       int i;
+       for (i = 0; i < global.nfiles; i++) {
+           if (VERBOSE(3))
+               fprintf(stderr, "[%03i] %s\n", i,
+                       image[i].filename);
+           t = MovieAddFrame(&swf, t, image[i].filename, (i * 2) + 1);
+           free(image[i].filename);
+       }
+    }
+
+    MovieFinish(&swf, t, global.outfile);
+
+    return 0;
+}