void * pngconv_png2lossless(unsigned char *png_data, unsigned long png_data_len, int *tag_no, int *format, unsigned short *width, unsigned short *height, void **colormap, int *colormap_count, int rgb15) { volatile png_structp png_ptr = NULL; volatile png_infop png_info_ptr = NULL; my_png_buffer png_buff; int bpp, color_type; png_uint_32 png_width = 0, png_height = 0; volatile png_bytepp png_image_data = NULL; register png_uint_32 x, y; void *image_data = NULL; png_color *palette = NULL; int palette_num = 0; png_bytep trans = NULL; int num_trans = 0; png_color_16p trans_values = NULL; if (png_data == NULL) { fprintf(stderr, "pngconv_png2lossless: png_data == NULL\n"); return NULL; } if (png_sig_cmp((png_bytep)png_data, 0, 8)) { // bad signature fprintf(stderr, "pngconv_png2lossless: is not PNG!\n"); return NULL; } png_ptr = png_create_read_struct (PNG_LIBPNG_VER_STRING, NULL,NULL,NULL); if (! png_ptr) { fprintf(stderr, "pngconv_png2lossless: can't create read_struct\n"); return NULL; } if (setjmp(png_jmpbuf(png_ptr))) { fprintf(stderr, "pngconv_png2lossless: libpng error jump occured\n"); png_destroy_read_struct((png_structpp) &png_ptr, (png_infopp) &png_info_ptr, NULL); if (png_image_data) { for (y=0 ; y < png_height ; y++) { free(png_image_data[y]); } free(png_image_data); } return NULL; } png_info_ptr = png_create_info_struct(png_ptr); if (! png_info_ptr) { fprintf(stderr, "pngconv_png2lossless: can't create info_struct\n"); png_destroy_read_struct ((png_structpp)&png_ptr, NULL, NULL); return NULL; } png_buff.data = png_data; png_buff.data_len = png_data_len; png_buff.data_offset = 0; png_data_read(png_ptr, &png_buff); png_read_info(png_ptr, png_info_ptr); png_get_IHDR(png_ptr, png_info_ptr, &png_width, &png_height, &bpp, &color_type, NULL, NULL, NULL); *width = (unsigned short) png_width; *height = (unsigned short) png_height; if ((rgb15 > 0) && (color_type != PNG_COLOR_TYPE_RGB)) { // warning fprintf(stderr, "rgb15 is %d but color_type is not PNG24\n", rgb15); } switch(color_type) { case PNG_COLOR_TYPE_PALETTE: *format = 3; png_get_PLTE(png_ptr, png_info_ptr, &palette, &palette_num); if (png_get_tRNS(png_ptr, png_info_ptr, &trans, &num_trans, &trans_values) && (num_trans > 0)) { *tag_no = 36; // DefineBitsLossless2 } else { *tag_no = 20; // DefineBitsLossless } break; case PNG_COLOR_TYPE_RGB: if (rgb15 > 0) { *format = 4; } else { *format = 5; } *tag_no = 20; /* DefineBitsLossless */ break; case PNG_COLOR_TYPE_RGB_ALPHA: *format = 5; *tag_no = 36; /* DefineBitsLossless2 */ if (png_get_valid(png_ptr, png_info_ptr, PNG_INFO_tRNS)) png_set_tRNS_to_alpha(png_ptr); break; default: fprintf(stderr, "pngconv_png2lossless: color_type=%d not implemented yet.\n", color_type); png_destroy_read_struct((png_structpp)&png_ptr, (png_infopp)&png_info_ptr, NULL); return NULL; } if (bpp > 8) { fprintf(stderr, "pngconv_png2lossless: bpp=%d not implemented yet. accept only bpp <= 8\n", bpp); png_destroy_read_struct((png_structpp)&png_ptr, (png_infopp)&png_info_ptr, NULL); return NULL; } png_image_data = (png_bytepp) malloc(png_height * sizeof(png_bytep)); for (y=0 ; y < png_height ; y++) { png_image_data[y] = (png_bytep) malloc(png_get_rowbytes(png_ptr, png_info_ptr)); } png_read_image(png_ptr, png_image_data); /* * image copy */ if (color_type == PNG_COLOR_TYPE_PALETTE) { register int i; unsigned char *indices_data; *colormap_count = palette_num; if (num_trans == 0) { swf_rgb_t *result_colormap = malloc(sizeof(swf_rgb_t) * palette_num); // Lossless for (i=0 ; i < palette_num ; i++) { result_colormap[i].red = palette[i].red; result_colormap[i].green = palette[i].green; result_colormap[i].blue = palette[i].blue; } *colormap = result_colormap; } else { swf_rgba_t *result_colormap = malloc(sizeof(swf_rgba_t) * palette_num); // Lossless2 for (i=0 ; i < palette_num ; i++) { if (i < num_trans) { int alpha_value = trans[i]; result_colormap[i].red = palette[i].red * alpha_value / 0xff; result_colormap[i].green = palette[i].green * alpha_value / 0xff; result_colormap[i].blue = palette[i].blue * alpha_value / 0xff; result_colormap[i].alpha = alpha_value; } else { result_colormap[i].red = palette[i].red; result_colormap[i].green = palette[i].green; result_colormap[i].blue = palette[i].blue; result_colormap[i].alpha = 0xff; // opaque } } *colormap = result_colormap; } indices_data = malloc(((png_width+ 3) & -4) * png_height); i = 0; for (y=0 ; y < png_height ; y++) { bitstream_t *bs = bitstream_open(); if (bs == NULL) { free(*colormap); *colormap = NULL; free(indices_data); for (y=0 ; y < png_height ; y++) { free(png_image_data[y]); } free(png_image_data); return NULL; } bitstream_input(bs, png_image_data[y], png_width); for (x=0 ; x < png_width ; x++) { indices_data[i] = bitstream_getbits(bs, bpp); i++; } while (i % 4) { i++; } // 4byte alignment bitstream_close(bs); } image_data = indices_data; } else if (color_type == PNG_COLOR_TYPE_RGB) { swf_xrgb_t *xrgb_list; xrgb_list = malloc(sizeof(swf_xrgb_t) * png_width * png_height); for (y=0 ; y < png_height ; y++) { for (x=0 ; x < png_width ; x++) { xrgb_list[x+y*png_width].red = png_image_data[y][3*x + 0]; xrgb_list[x+y*png_width].green = png_image_data[y][3*x + 1]; xrgb_list[x+y*png_width].blue = png_image_data[y][3*x + 2]; } } image_data = xrgb_list; } else { // PNG_COLOR_TYPE_RGB_ALPHA swf_argb_t *argb_list; argb_list = malloc(sizeof(swf_argb_t) * png_width * png_height); for (y=0 ; y < png_height ; y++) { for (x=0 ; x < png_width ; x++) { int alpha_value = png_image_data[y][4*x + 3]; argb_list[x+y*png_width].red = png_image_data[y][4*x + 0] * alpha_value / 0xff; argb_list[x+y*png_width].green = png_image_data[y][4*x + 1] * alpha_value / 0xff; argb_list[x+y*png_width].blue = png_image_data[y][4*x + 2] * alpha_value / 0xff; argb_list[x+y*png_width].alpha = alpha_value; } } image_data = argb_list; } for (y=0 ; y < png_height ; y++) { free(png_image_data[y]); } free(png_image_data); /* * destruct */ png_destroy_read_struct((png_structpp) &png_ptr, (png_infopp) &png_info_ptr, NULL); return image_data; }
unsigned char* PPGame_DecodePNG(unsigned char* bytes,unsigned long size,unsigned long* imageWidth,unsigned long* imageHeight,unsigned long* bytesPerRow) { if (bytes == NULL || size == 0) return NULL; my_png_buffer png_buff; memset(&png_buff,0,sizeof(png_buff)); png_buff.data_len = size; png_buff.data = bytes; int is_png = png_check_sig((png_bytep)png_buff.data, 8); if (!is_png) { fprintf(stderr, "is not PNG!\n"); free(png_buff.data); return NULL; } png_structp PNG_reader = png_create_read_struct(PNG_LIBPNG_VER_STRING, NULL,NULL,NULL); if (!PNG_reader) { fprintf(stderr, "can't create read_struct\n"); free(png_buff.data); return NULL; } png_infop PNG_info = png_create_info_struct(PNG_reader); if (!PNG_info) { fprintf(stderr, "can't create info_struct\n"); png_destroy_read_struct (&PNG_reader, NULL, NULL); free(png_buff.data); return NULL; } png_infop PNG_end_info = png_create_info_struct(PNG_reader); if (PNG_end_info == NULL) { fprintf(stderr, "Can't get end info for PNG data\n"); png_destroy_read_struct(&PNG_reader, &PNG_info, NULL); free(png_buff.data); return NULL; } if (setjmp(png_jmpbuf(PNG_reader))) { fprintf(stderr, "Can't decode PNG data\n"); png_destroy_read_struct(&PNG_reader, &PNG_info, &PNG_end_info); free(png_buff.data); return NULL; } png_data_read(PNG_reader,&png_buff); png_read_info(PNG_reader,PNG_info); png_uint_32 width, height; width = png_get_image_width(PNG_reader, PNG_info); height = png_get_image_height(PNG_reader, PNG_info); //printf("width %ld\n",width); //printf("height %ld\n",height); png_uint_32 bit_depth, color_type; bit_depth = png_get_bit_depth(PNG_reader, PNG_info); color_type = png_get_color_type(PNG_reader, PNG_info); //printf("bit_depth %ld\n",bit_depth); //printf("rowbytes %ld\n",png_get_rowbytes(PNG_reader, PNG_info)); if (color_type == PNG_COLOR_TYPE_PALETTE) { png_set_palette_to_rgb(PNG_reader); } if (color_type == PNG_COLOR_TYPE_GRAY || color_type == PNG_COLOR_TYPE_GRAY_ALPHA) { png_set_gray_to_rgb(PNG_reader); } if (png_get_valid(PNG_reader, PNG_info, PNG_INFO_tRNS)) { png_set_tRNS_to_alpha(PNG_reader); } else { png_set_filler(PNG_reader, 0xff, PNG_FILLER_AFTER); } if (bit_depth == 16) { png_set_strip_16(PNG_reader); } png_read_update_info(PNG_reader, PNG_info); png_byte* PNG_image_buffer = (png_byte*)malloc(4 * width * height); png_byte** PNG_rows = (png_byte**)malloc(height * sizeof(png_byte*)); unsigned int row; for (row = 0; row < height; ++row) { //PNG_rows[height - 1 - row] = PNG_image_buffer + (row * 4 * width); PNG_rows[row] = PNG_image_buffer + (row * 4 * width); } png_read_image(PNG_reader, PNG_rows); free(PNG_rows); png_destroy_read_struct(&PNG_reader, &PNG_info, &PNG_end_info); if (png_buff.data) free(png_buff.data); *imageWidth = width; *imageHeight = height; *bytesPerRow = width*4; return convert(PNG_image_buffer,width,height); }
int main(int argc, char **argv) { char *png_filename = NULL; struct stat filestat; FILE *fp = NULL; my_png_buffer png_buff; int is_png; png_uint_32 png_width, png_height; int bpp, color_type; png_bytepp image_data; png_uint_32 x, y; png_color *palette = NULL; int palette_num = 0; png_bytep trans = NULL; int num_trans; png_color_16p trans_values = NULL; int palette_dump_unit; if (argc != 2) { char *program_filename = argv[0]; fprintf(stderr, "Usage: %s <png_filename>\n", program_filename); return EXIT_FAILURE; } png_filename = argv[1]; // printf("png_filename=%s\n", png_filename); if(stat(png_filename, &filestat)) { perror("stat pngfile"); return EXIT_FAILURE; } png_buff.data_len = filestat.st_size; png_buff.data_offset = 0; // printf("png_buff.data_len=%lu\n", png_buff.data_len); fp = fopen(png_filename, "rb"); if (! fp) { fprintf(stderr, "Can't open file(%s)\n", png_filename); return EXIT_FAILURE; } png_buff.data = calloc(png_buff.data_len, 1); fread(png_buff.data, 1, png_buff.data_len, fp); fclose(fp); is_png = png_check_sig((png_bytep)png_buff.data, 8); if (! is_png) { fprintf(stderr, "is not PNG!\n"); free(png_buff.data); return EXIT_FAILURE; } png_structp png_ptr = png_create_read_struct (PNG_LIBPNG_VER_STRING, NULL,NULL,NULL); if (! png_ptr) { fprintf(stderr, "can't create read_struct\n"); free(png_buff.data); return EXIT_FAILURE; } png_infop png_info_ptr = png_create_info_struct(png_ptr); if (! png_info_ptr) { fprintf(stderr, "can't create info_struct\n"); png_destroy_read_struct (&png_ptr, NULL, NULL); free(png_buff.data); return EXIT_FAILURE; } png_data_read(png_ptr, &png_buff); png_read_info(png_ptr, png_info_ptr); png_get_IHDR(png_ptr, png_info_ptr, &png_width, &png_height, &bpp, &color_type, NULL, NULL, NULL); printf("(width, height)=(%lu,%lu) bpp=%d", png_width, png_height, bpp); printf(" color_type=%d", color_type); switch(color_type) { case PNG_COLOR_TYPE_GRAY: printf("(GRAY)"); if (! png_get_tRNS(png_ptr, png_info_ptr, &trans, &num_trans, &trans_values)) { num_trans = 0; } printf(" num_trans=%d", num_trans); break; case PNG_COLOR_TYPE_GRAY_ALPHA: printf("(GRAY_ALPHA)"); break; case PNG_COLOR_TYPE_RGB: printf("(RGB)"); if (png_get_PLTE(png_ptr, png_info_ptr, &palette, &palette_num)) { printf(" palette_num=%d", palette_num); } if (! png_get_tRNS(png_ptr, png_info_ptr, &trans, &num_trans, &trans_values)) { num_trans = 0; } printf(" num_trans=%d", num_trans); break; case PNG_COLOR_TYPE_RGB_ALPHA: printf("(RGB_ALPHA)"); if (png_get_PLTE(png_ptr, png_info_ptr, &palette, &palette_num)) { printf(" palette_num=%d", palette_num); } // if (png_get_valid(png_ptr, png_info_ptr, PNG_INFO_tRNS)) // png_set_tRNS_to_alpha(png_ptr); break; case PNG_COLOR_TYPE_PALETTE: printf("(PALETTE)"); png_get_PLTE(png_ptr, png_info_ptr, &palette, &palette_num); printf(" palette_num=%d", palette_num); if (! png_get_tRNS(png_ptr, png_info_ptr, &trans, &num_trans, &trans_values)) { num_trans = 0; } printf(" num_trans=%d", num_trans); break; default: printf("color_type(%d) not implement yet.\n", color_type); } printf("\n"); /* image */ image_data = (png_bytepp) malloc(png_height * sizeof(png_bytep)); for (y=0; y < png_height; y++) { image_data[y] = (png_bytep) malloc(png_get_rowbytes(png_ptr, png_info_ptr)); } png_read_image(png_ptr, image_data); if (num_trans == 0) { palette_dump_unit = 8; } else { palette_dump_unit = 4; } if (color_type == PNG_COLOR_TYPE_PALETTE) { int i, j; for (i = 0 ; i < palette_num ; i+=palette_dump_unit ) { printf("[%03d]", i); for (j = 0 ; (j < palette_dump_unit) && ((i+j) < palette_num) ; j++) { if ((i+j) < num_trans) { printf(" #%02x%02x%02x(%02x)", palette[i+j].red, palette[i+j].green, palette[i+j].blue, trans[i+j] & 0xff); } else { printf(" #%02x%02x%02x", palette[i+j].red, palette[i+j].green, palette[i+j].blue); } } printf("\n"); } for (y=0; y < png_height; y++) { unsigned char *linedata = image_data[y]; bitstream_t *bs = bitstream_open(); bitstream_input(bs, linedata, png_get_rowbytes(png_ptr, png_info_ptr)); printf("y=%lu: ", y); for (x=0; x < png_width; x++) { int colorindex = bitstream_getbits(bs, bpp); printf("%02x ", colorindex); } bitstream_close(bs); printf("\n"); } } else { for (y=0; y < png_height; y++) { printf("y=%lu: ", y); for (x=0; x < png_width; x++) { switch(color_type) { case PNG_COLOR_TYPE_GRAY: printf("%02x ", image_data[y][x]); break; case PNG_COLOR_TYPE_RGB: printf("%02x%02x%02x ", image_data[y][3*x], image_data[y][3*x+1], image_data[y][3*x+2]); break; case PNG_COLOR_TYPE_RGB_ALPHA: printf("%02x%02x%02x(%02x) ", image_data[y][4*x], image_data[y][4*x+1], image_data[y][4*x+2], image_data[y][4*x+3]); break; default: break; } } printf("\n"); } } /* * finish */ for (y=0; y < png_height; y++) { free(image_data[y]); } free(image_data); png_destroy_read_struct(&png_ptr, &png_info_ptr, NULL); free(png_buff.data); return EXIT_SUCCESS; }