gif2bmp(2).rar_gif2bmp

#include <stdio.h> #include <stdlib.h> #include <stdint.h> #include <string.h> #include <assert.h> typedef struct { uint16_t bfType; uint32_t bfSize; uint16_t bfReserved1; uint16_t bfReserved2; uint32_t bfOffBits; }__attribute__((packed)) BITMAPFILEHEADER; typedef struct { uint32_t biSize; int32_t biWidth; int32_t biHeight; uint16_t biPlanes; uint16_t biBitCount; uint32_t biCompression; uint32_t biSizeImage; int32_t biXPelsPerMeter; int32_t biYPelsPerMeter; uint32_t biClrUsed; uint32_t biClrImportant; } BITMAPINFOHEADER; typedef struct gifImage{ uint16_t left; uint16_t top; uint16_t width; uint16_t depth; struct LocalFlag{ unsigned palBits: 3; unsigned reserved: 2; unsigned sortFlag: 1; unsigned interlace: 1; unsigned localPal: 1; }__attribute__((packed))localFlag; }__attribute__((packed))GIFIMAGE; typedef struct gifHeader{ uint8_t signature[3]; uint8_t versicon[3]; }GIFHEADER; typedef struct gifScrDesc{ uint16_t width; uint16_t depth; struct GlobalFlag{ unsigned palBits: 3; unsigned sortFlag: 1; unsigned colorRes: 3; unsigned globalPal: 1; }__attribute__((packed))globalFlag; uint8_t backGround; uint8_t aspect; }__attribute__((packed))GIFSCRDESC; int bmp_init(size_t width, size_t height, char *bmpbuf) { size_t width3 = (width+3)&~0x3; BITMAPFILEHEADER fhdr; memcpy(&fhdr.bfType, "BM", 2); fhdr.bfReserved1 = 0; fhdr.bfReserved2 = 0; fhdr.bfOffBits = sizeof(BITMAPFILEHEADER); fhdr.bfOffBits += sizeof(BITMAPINFOHEADER); fhdr.bfOffBits += 256*4; fhdr.bfSize = width3*height+fhdr.bfOffBits; BITMAPINFOHEADER ihdr; ihdr.biSize = sizeof(ihdr); ihdr.biWidth = width; ihdr.biHeight = -height; ihdr.biPlanes = 1; ihdr.biBitCount = 8; ihdr.biCompression = 0; ihdr.biSizeImage = 0; //width3*height; ihdr.biXPelsPerMeter = 0x1075; ihdr.biYPelsPerMeter = 0x1075; ihdr.biClrUsed = 256; ihdr.biClrImportant = 256; memcpy(bmpbuf, &fhdr, sizeof(fhdr)); memcpy(bmpbuf+sizeof(fhdr), &ihdr, sizeof(ihdr)); return sizeof(fhdr)+sizeof(ihdr); } static char buffer[1024*1024*3]; static char output[1024*1024*3*3]; static size_t old = 0; static size_t cmax = 0; static size_t cclear = 0; static char * outptr = output; static size_t mask = 0; static size_t bsize = 9; static char * dictp[4096]; static size_t dictl[4096]; static const char *gifpath = "a.gif"; char *keepput = 0; int lzw_init() { int i; static char color[256]; assert(cclear==256); for (i=0; i<cclear; i++){ dictp[i] = color+i; dictl[i] = 1; color[i] = i; } for (bsize=0; cclear>>bsize; bsize++){ if (bsize > 8) printf("path: %s\n", gifpath); assert(bsize <= 8); } assert(bsize==9); mask = (1<<bsize)-1; cmax = cclear+1; old = 0; keepput = outptr; return cmax; } int lzw_code(size_t code) { if (code > cmax){ printf("%x %x\n", code, cmax); } assert(code <= cmax); char *oldptr = outptr; if (code < cmax){ size_t dl = dictl[code]; memcpy(outptr, dictp[code], dl); dictl[cmax] = dictl[old]+1; char *p = outptr-dictl[old]; dictp[cmax] = p; outptr += dl; }else{ size_t dl = dictl[old]; memcpy(outptr, dictp[old], dl); outptr[dl] = *outptr; dictp[cmax] = outptr; dictl[cmax] = dl+1; outptr += (dl+1); } #if 0 while (oldptr<outptr) printf("%02x\n", 0xff&*oldptr++); #endif old = code; return ++cmax; } int lzw_data(uint8_t *buff, size_t count) { size_t cnt; uint8_t *sp = buff; size_t csize = *buff++; outptr = output; cclear = (1<<csize); lzw_init(); size_t i; size_t code = 0; size_t avail_bits = 0; int outed = 1; while(cnt = *buff++){ for (i=0; i<cnt; i++){ code |= (*buff++<<avail_bits); avail_bits += 8; while (avail_bits >= bsize){ size_t sc = mask&code; avail_bits -= bsize; code >>= bsize; //printf("%x %x \n", mask, bsize); if (sc == cclear){ lzw_init(); outed = 0; printf("clear: %p %d\n", outptr, bsize); continue; } if (sc == cclear+1){ printf("lzw end\n"); break; } printf("%x\n", sc); if (outed == 0){ outed = 1; } if (lzw_code(sc) > mask){ if (bsize < 12){ mask = mask*2+1; bsize++; } } } } } return buff-sp; } static char defColormap[256*3]; int gifDump(const char *path); int main(int argc, char *argv[]) { int k; for (k=0; k<256; k++){ defColormap[k*3] = k; defColormap[k*3+1] = k; defColormap[k*3+2] = k; } for (k=1; k<argc; k++){ gifpath = argv[k]; gifDump(argv[k]); } return 0; } int gifDump(const char *path) { FILE *fp = fopen(path, "rb"); if (fp == NULL){ return -1; } int count = fread(buffer, 1, sizeof(buffer), fp); fclose(fp); GIFSCRDESC *desc = (GIFSCRDESC*)(buffer+6); printf("width: %d\n", desc->width); printf("depth: %d\n", desc->depth); printf("palBits: %d\n", desc->globalFlag.palBits); unsigned palBits = desc->globalFlag.palBits; unsigned palBytes = desc->globalFlag.globalPal?(1<<palBits)*6:0; int off = palBytes+6+7; printf("dumping start!\n"); while (off < count){ size_t cnt; switch(0xFF&buffer[off++]){ case 0x21: switch(0xFF&buffer[off++]){ case 0xfe: case 0x01: case 0xff: case 0xf9: while (cnt=buffer[off++]) off += (cnt&0xFF); break; default: printf("bad format!\n"); exit(0); break; } break; case 0x2c: printf("Found Image!\n"); GIFIMAGE *img = (GIFIMAGE*)(buffer+off); unsigned palBitsl = img->localFlag.palBits; unsigned palBytesl = img->localFlag.localPal?(1<<palBitsl)*6:0; char *word = (char*)(img+1) + palBytesl; printf("width: %d\n", img->width); printf("depth: %d\n", img->depth); printf("localPal: %d\n", img->localFlag.localPal); off += lzw_data(word, buffer+count-word); off += sizeof(GIFIMAGE); off += palBytesl; { char outname[256]; static size_t outindex = 0; sprintf(outname, "a-%d.bmp", outindex++); FILE *fp = fopen(outname, "wb"); if (fp != NULL){ size_t cc=bmp_init(img->width, img->depth, outname); fwrite(outname, 1, cc, fp); int i, j; uint8_t *p = (uint8_t*)output; char *colors = defColormap; if (desc->globalFlag.globalPal)