-
- if(!png_read_header(fi, &header))
- return 0;
-
- if(header.mode == 3 || header.mode == 0) bypp = 1;
- else
- if(header.mode == 2) bypp = 3;
- else
- if(header.mode == 6) bypp = 4;
- else
- return 0;
- imagedatalen = bypp * header.width * header.height + 65536;
- imagedata = malloc(imagedatalen);
-
- fseek(fi,8,SEEK_SET);
- while(!feof(fi))
- {
- if(!png_read_chunk(&tagid, &len, &data, fi))
- break;
- if(!strncmp(tagid, "IEND", 4)) {
- break;
- }
- if(!strncmp(tagid, "PLTE", 4)) {
- palette = data;
- palettelen = len/3;
- data = 0; //don't free data
- if(VERBOSE(2))
- printf("%d colors in palette\n", palettelen);
- }
- if(!strncmp(tagid, "tRNS", 4)) {
- if(header.mode == 3) {
- alphapalette = data;
- alphapalettelen = len;
- data = 0; //don't free data
- if(VERBOSE(2))
- printf("found %d alpha colors\n", alphapalettelen);
- }
- }
- if(!strncmp(tagid, "IDAT", 4)) {
- if(!zimagedata) {
- zimagedatalen = len;
- zimagedata = malloc(len);
- memcpy(zimagedata,data,len);
- } else {
- zimagedata = realloc(zimagedata, zimagedatalen+len);
- memcpy(&zimagedata[zimagedatalen], data, len);
- zimagedatalen += len;
- }
- }
- if(data)
- free(data);
- }
-
- if(!zimagedata || uncompress(imagedata, &imagedatalen, zimagedata, zimagedatalen) != Z_OK) {
- fprintf(stderr, "Couldn't uncompress %s!\n", sname);
- if(zimagedata)
- free(zimagedata);
- return 0;
- }
- free(zimagedata);
-
- if(alphapalette)
- t = swf_InsertTag(t, ST_DEFINEBITSLOSSLESS2);
- else
- t = swf_InsertTag(t, ST_DEFINEBITSLOSSLESS);
-
- swf_SetU16(t, id); // id
- if(header.mode == 2 || header.mode == 6) {
- U8*data2 = malloc(header.width*header.height*4);
- int i,s=0;
- int x,y;
- int pos=0;
- int opaque=0;
- int transparent=0;
- int semitransparent=0;
- /* in case for mode 2, the following also performs 24->32 bit conversion */
- unsigned char* firstline = malloc(header.width*4);
-
- for(y=0;y<header.height;y++) {
- int mode = imagedata[pos++]; //filter mode
- U8*src;
- U8*dest;
- U8*old;
- dest = &data2[(y*header.width)*4];
-
- if(header.bpp == 8)
- {
- /* one byte per pixel */
- src = &imagedata[pos];
- pos+=header.width*(header.mode==6?4:3);
- } else {
- /* not implemented yet */
- exit(1);
- }
-
- if(!y) {
- old = firstline;
- memset(old, 0, header.width*4); //TODO: fill alpha with 255?
- } else {
- old = &data2[(y-1)*header.width*4];
- }
- if(header.mode==6)
- applyfilter4(mode, src, old, dest, header.width);
- else if(header.mode==2)
- applyfilter3(mode, src, old, dest, header.width);
- }
- free(firstline);
-
- /* the image is now compressed and stored in data. Now let's take
- a look at the alpha values */
- if(header.mode == 6) {
- for(y=0;y<header.height;y++) {
- U8*l = &data2[(y*header.width)*4];
- for(x=0;x<header.width;x++) {
- U8 a = l[x*4];
- U8 b = l[x*4+1];
- U8 g = l[x*4+2];
- U8 r = l[x*4+3];
- if(a==255) transparent++;
- else {
- if(a==0) opaque++;
- else semitransparent++;
- l[x*4+3]=(int)r*a/255;
- l[x*4+2]=(int)g*a/255;
- l[x*4+1]=(int)b*a/255;
- }
- }
- }
- if(semitransparent || opaque) {
- t->id = ST_DEFINEBITSLOSSLESS2;
- }
- }
- swf_SetLosslessBits(t, header.width, header.height, data2, BMF_32BIT);
- free(data2);
- } else if(header.mode == 0 || header.mode == 3) {
- RGBA*rgba;
- int swf_width = BYTES_PER_SCANLINE(header.width);
- U8*data2 = malloc(swf_width*header.height);
- U8*tmpline = malloc(header.width);
- int i,x,y;
- int pos=0;
- if(header.mode == 3) { // palette or grayscale?
- rgba = (RGBA*)malloc(palettelen*sizeof(RGBA));
- if(!palette) {
- fprintf(stderr, "Error: No palette found!\n");
- exit(1);
- }
- /* 24->32 bit conversion */
- for(i=0;i<palettelen;i++) {
- rgba[i].r = palette[i*3+0];
- rgba[i].g = palette[i*3+1];
- rgba[i].b = palette[i*3+2];
- if(alphapalette && i<alphapalettelen) {
- rgba[i].a = alphapalette[i];
- rgba[i].r = ((int)rgba[i].r*rgba[i].a)/255;
- rgba[i].g = ((int)rgba[i].g*rgba[i].a)/255;
- rgba[i].b = ((int)rgba[i].b*rgba[i].a)/255;
- } else {
- rgba[i].a = 255;
- }
- }