mirror of
https://github.com/RaySollium99/libpicofe.git
synced 2025-09-04 22:47:44 -04:00
move common files to root
This commit is contained in:
parent
f506842df2
commit
a86e9a3e58
25 changed files with 15 additions and 15 deletions
266
readpng.c
Normal file
266
readpng.c
Normal file
|
@ -0,0 +1,266 @@
|
|||
/*
|
||||
* (C) Gražvydas "notaz" Ignotas, 2008-2011
|
||||
*
|
||||
* This work is licensed under the terms of any of these licenses
|
||||
* (at your option):
|
||||
* - GNU GPL, version 2 or later.
|
||||
* - GNU LGPL, version 2.1 or later.
|
||||
* See the COPYING file in the top-level directory.
|
||||
*/
|
||||
|
||||
#include <stdio.h>
|
||||
#include <stdlib.h>
|
||||
#include <string.h>
|
||||
#include <png.h>
|
||||
#include "readpng.h"
|
||||
#include "lprintf.h"
|
||||
|
||||
int readpng(void *dest, const char *fname, readpng_what what, int req_w, int req_h)
|
||||
{
|
||||
FILE *fp;
|
||||
png_structp png_ptr = NULL;
|
||||
png_infop info_ptr = NULL;
|
||||
png_bytepp row_ptr = NULL;
|
||||
int ret = -1;
|
||||
|
||||
if (dest == NULL || fname == NULL)
|
||||
{
|
||||
return -1;
|
||||
}
|
||||
|
||||
fp = fopen(fname, "rb");
|
||||
if (fp == NULL)
|
||||
{
|
||||
lprintf(__FILE__ ": failed to open: %s\n", fname);
|
||||
return -1;
|
||||
}
|
||||
|
||||
png_ptr = png_create_read_struct(PNG_LIBPNG_VER_STRING, NULL, NULL, NULL);
|
||||
if (!png_ptr)
|
||||
{
|
||||
lprintf(__FILE__ ": png_create_read_struct() failed\n");
|
||||
fclose(fp);
|
||||
return -1;
|
||||
}
|
||||
|
||||
info_ptr = png_create_info_struct(png_ptr);
|
||||
if (!info_ptr)
|
||||
{
|
||||
lprintf(__FILE__ ": png_create_info_struct() failed\n");
|
||||
goto done;
|
||||
}
|
||||
|
||||
// Start reading
|
||||
png_init_io(png_ptr, fp);
|
||||
png_read_png(png_ptr, info_ptr, PNG_TRANSFORM_STRIP_16 | PNG_TRANSFORM_STRIP_ALPHA | PNG_TRANSFORM_PACKING, NULL);
|
||||
row_ptr = png_get_rows(png_ptr, info_ptr);
|
||||
if (row_ptr == NULL)
|
||||
{
|
||||
lprintf(__FILE__ ": png_get_rows() failed\n");
|
||||
goto done;
|
||||
}
|
||||
|
||||
// lprintf("%s: %ix%i @ %ibpp\n", fname, (int)info_ptr->width, (int)info_ptr->height, info_ptr->pixel_depth);
|
||||
|
||||
switch (what)
|
||||
{
|
||||
case READPNG_BG:
|
||||
{
|
||||
int height, width, h;
|
||||
unsigned short *dst = dest;
|
||||
if (info_ptr->pixel_depth != 24)
|
||||
{
|
||||
lprintf(__FILE__ ": bg image uses %ibpp, needed 24bpp\n", info_ptr->pixel_depth);
|
||||
break;
|
||||
}
|
||||
height = info_ptr->height;
|
||||
if (height > req_h)
|
||||
height = req_h;
|
||||
width = info_ptr->width;
|
||||
if (width > req_w)
|
||||
width = req_w;
|
||||
|
||||
for (h = 0; h < height; h++)
|
||||
{
|
||||
unsigned char *src = row_ptr[h];
|
||||
int len = width;
|
||||
while (len--)
|
||||
{
|
||||
#ifdef PSP
|
||||
*dst++ = ((src[2]&0xf8)<<8) | ((src[1]&0xf8)<<3) | (src[0] >> 3); // BGR
|
||||
#else
|
||||
*dst++ = ((src[0]&0xf8)<<8) | ((src[1]&0xf8)<<3) | (src[2] >> 3); // RGB
|
||||
#endif
|
||||
src += 3;
|
||||
}
|
||||
dst += req_w - width;
|
||||
}
|
||||
break;
|
||||
}
|
||||
|
||||
case READPNG_FONT:
|
||||
{
|
||||
int x, y, x1, y1;
|
||||
unsigned char *dst = dest;
|
||||
if (info_ptr->width != req_w || info_ptr->height != req_h)
|
||||
{
|
||||
lprintf(__FILE__ ": unexpected font image size %dx%d, needed %dx%d\n",
|
||||
(int)info_ptr->width, (int)info_ptr->height, req_w, req_h);
|
||||
break;
|
||||
}
|
||||
if (info_ptr->pixel_depth != 8)
|
||||
{
|
||||
lprintf(__FILE__ ": font image uses %ibpp, needed 8bpp\n", info_ptr->pixel_depth);
|
||||
break;
|
||||
}
|
||||
for (y = 0; y < 16; y++)
|
||||
{
|
||||
for (x = 0; x < 16; x++)
|
||||
{
|
||||
/* 16x16 grid of syms */
|
||||
int sym_w = req_w / 16;
|
||||
int sym_h = req_h / 16;
|
||||
for (y1 = 0; y1 < sym_h; y1++)
|
||||
{
|
||||
unsigned char *src = row_ptr[y*sym_h + y1] + x*sym_w;
|
||||
for (x1 = sym_w/2; x1 > 0; x1--, src+=2)
|
||||
*dst++ = ((src[0]^0xff) & 0xf0) | ((src[1]^0xff) >> 4);
|
||||
}
|
||||
}
|
||||
}
|
||||
break;
|
||||
}
|
||||
|
||||
case READPNG_SELECTOR:
|
||||
{
|
||||
int x1, y1;
|
||||
unsigned char *dst = dest;
|
||||
if (info_ptr->width != req_w || info_ptr->height != req_h)
|
||||
{
|
||||
lprintf(__FILE__ ": unexpected selector image size %ix%i, needed %dx%d\n",
|
||||
(int)info_ptr->width, (int)info_ptr->height, req_w, req_h);
|
||||
break;
|
||||
}
|
||||
if (info_ptr->pixel_depth != 8)
|
||||
{
|
||||
lprintf(__FILE__ ": selector image uses %ibpp, needed 8bpp\n", info_ptr->pixel_depth);
|
||||
break;
|
||||
}
|
||||
for (y1 = 0; y1 < req_h; y1++)
|
||||
{
|
||||
unsigned char *src = row_ptr[y1];
|
||||
for (x1 = req_w/2; x1 > 0; x1--, src+=2)
|
||||
*dst++ = ((src[0]^0xff) & 0xf0) | ((src[1]^0xff) >> 4);
|
||||
}
|
||||
break;
|
||||
}
|
||||
|
||||
case READPNG_24:
|
||||
{
|
||||
int height, width, h;
|
||||
unsigned char *dst = dest;
|
||||
if (info_ptr->pixel_depth != 24)
|
||||
{
|
||||
lprintf(__FILE__ ": image uses %ibpp, needed 24bpp\n", info_ptr->pixel_depth);
|
||||
break;
|
||||
}
|
||||
height = info_ptr->height;
|
||||
if (height > req_h)
|
||||
height = req_h;
|
||||
width = info_ptr->width;
|
||||
if (width > req_w)
|
||||
width = req_w;
|
||||
|
||||
for (h = 0; h < height; h++)
|
||||
{
|
||||
int len = width;
|
||||
unsigned char *src = row_ptr[h];
|
||||
dst += (req_w - width) * 3;
|
||||
for (len = width; len > 0; len--, dst+=3, src+=3)
|
||||
dst[0] = src[2], dst[1] = src[1], dst[2] = src[0];
|
||||
}
|
||||
break;
|
||||
}
|
||||
}
|
||||
|
||||
|
||||
ret = 0;
|
||||
done:
|
||||
png_destroy_read_struct(&png_ptr, info_ptr ? &info_ptr : NULL, (png_infopp)NULL);
|
||||
fclose(fp);
|
||||
return ret;
|
||||
}
|
||||
|
||||
int writepng(const char *fname, unsigned short *src, int w, int h)
|
||||
{
|
||||
png_structp png_ptr = NULL;
|
||||
png_infop info_ptr = NULL;
|
||||
png_bytepp row_pointers;
|
||||
int i, j, ret = -1;
|
||||
FILE *f;
|
||||
|
||||
f = fopen(fname, "wb");
|
||||
if (f == NULL) {
|
||||
lprintf(__FILE__ ": failed to open \"%s\"\n", fname);
|
||||
return -1;
|
||||
}
|
||||
|
||||
row_pointers = calloc(h, sizeof(row_pointers[0]));
|
||||
if (row_pointers == NULL)
|
||||
goto end1;
|
||||
|
||||
for (i = 0; i < h; i++) {
|
||||
unsigned char *dst = malloc(w * 3);
|
||||
if (dst == NULL)
|
||||
goto end2;
|
||||
row_pointers[i] = dst;
|
||||
for (j = 0; j < w; j++, src++, dst += 3) {
|
||||
dst[0] = (*src & 0xf800) >> 8;
|
||||
dst[1] = (*src & 0x07e0) >> 3;
|
||||
dst[2] = (*src & 0x001f) << 3;
|
||||
}
|
||||
}
|
||||
|
||||
/* initialize stuff */
|
||||
png_ptr = png_create_write_struct(PNG_LIBPNG_VER_STRING, NULL, NULL, NULL);
|
||||
if (png_ptr == NULL) {
|
||||
fprintf(stderr, "png_create_write_struct() failed");
|
||||
goto end2;
|
||||
}
|
||||
|
||||
info_ptr = png_create_info_struct(png_ptr);
|
||||
if (info_ptr == NULL) {
|
||||
fprintf(stderr, "png_create_info_struct() failed");
|
||||
goto end3;
|
||||
}
|
||||
|
||||
if (setjmp(png_jmpbuf(png_ptr)) != 0) {
|
||||
fprintf(stderr, "error in png code\n");
|
||||
goto end4;
|
||||
}
|
||||
|
||||
png_init_io(png_ptr, f);
|
||||
|
||||
png_set_IHDR(png_ptr, info_ptr, w, h,
|
||||
8, PNG_COLOR_TYPE_RGB, PNG_INTERLACE_NONE,
|
||||
PNG_COMPRESSION_TYPE_DEFAULT, PNG_FILTER_TYPE_DEFAULT);
|
||||
|
||||
png_write_info(png_ptr, info_ptr);
|
||||
png_write_image(png_ptr, row_pointers);
|
||||
png_write_end(png_ptr, NULL);
|
||||
|
||||
ret = 0;
|
||||
|
||||
end4:
|
||||
// png_destroy_info_struct(png_ptr, &info_ptr); // freed below
|
||||
end3:
|
||||
png_destroy_write_struct(&png_ptr, &info_ptr);
|
||||
end2:
|
||||
for (i = 0; i < h; i++)
|
||||
free(row_pointers[i]);
|
||||
free(row_pointers);
|
||||
end1:
|
||||
fclose(f);
|
||||
return ret;
|
||||
}
|
||||
|
Loading…
Add table
Add a link
Reference in a new issue