common/readpng.c

   1 #include <stdio.h>
   2 #include <string.h>
   3 #include <png.h>
   4 #include "readpng.h"
   5 #include "lprintf.h"
   6
   7 #ifdef PSP
   8 #define BG_WIDTH  480
   9 #define BG_HEIGHT 272
  10 #else
  11 #define BG_WIDTH  320
  12 #define BG_HEIGHT 240
  13 #endif
  14
  15 void readpng(void *dest, const char *fname, readpng_what what)
  16 {
  17         FILE *fp;
  18         png_structp png_ptr = NULL;
  19         png_infop info_ptr = NULL;
  20         png_bytepp row_ptr = NULL;
  21
  22         if (dest == NULL || fname == NULL)
  23         {
  24                 return;
  25         }
  26
  27         fp = fopen(fname, "rb");
  28         if (fp == NULL)
  29         {
  30                 lprintf(__FILE__ ": failed to open: %s\n", fname);
  31                 return;
  32         }
  33
  34         png_ptr = png_create_read_struct(PNG_LIBPNG_VER_STRING, NULL, NULL, NULL);
  35         if (!png_ptr)
  36         {
  37                 lprintf(__FILE__ ": png_create_read_struct() failed\n");
  38                 fclose(fp);
  39                 return;
  40         }
  41
  42         info_ptr = png_create_info_struct(png_ptr);
  43         if (!info_ptr)
  44         {
  45                 lprintf(__FILE__ ": png_create_info_struct() failed\n");
  46                 goto done;
  47         }
  48
  49         // Start reading
  50         png_init_io(png_ptr, fp);
  51         png_read_png(png_ptr, info_ptr, PNG_TRANSFORM_STRIP_16 | PNG_TRANSFORM_STRIP_ALPHA | PNG_TRANSFORM_PACKING, NULL);
  52         row_ptr = png_get_rows(png_ptr, info_ptr);
  53         if (row_ptr == NULL)
  54         {
  55                 lprintf(__FILE__ ": png_get_rows() failed\n");
  56                 goto done;
  57         }
  58
  59         // lprintf("%s: %ix%i @ %ibpp\n", fname, (int)info_ptr->width, (int)info_ptr->height, info_ptr->pixel_depth);
  60
  61         switch (what)
  62         {
  63                 case READPNG_BG:
  64                 {
  65                         int height, width, h;
  66                         unsigned short *dst = dest;
  67                         if (info_ptr->pixel_depth != 24)
  68                         {
  69                                 lprintf(__FILE__ ": bg image uses %ibpp, needed 24bpp\n", info_ptr->pixel_depth);
  70                                 break;
  71                         }
  72                         height = info_ptr->height;
  73                         if (height > BG_HEIGHT) height = BG_HEIGHT;
  74                         width = info_ptr->width;
  75                         if (width > BG_WIDTH) width = BG_WIDTH;
  76
  77                         for (h = 0; h < height; h++)
  78                         {
  79                                 unsigned char *src = row_ptr[h];
  80                                 int len = width;
  81                                 while (len--)
  82                                 {
  83 #ifdef PSP
  84                                         *dst++ = ((src[2]&0xf8)<<8) | ((src[1]&0xf8)<<3) | (src[0] >> 3); // BGR
  85 #else
  86                                         *dst++ = ((src[0]&0xf8)<<8) | ((src[1]&0xf8)<<3) | (src[2] >> 3); // RGB
  87 #endif
  88                                         src += 3;
  89                                 }
  90                                 dst += BG_WIDTH - width;
  91                         }
  92                         break;
  93                 }
  94
  95                 case READPNG_FONT:
  96                 {
  97                         int x, y, x1, y1;
  98                         unsigned char *dst = dest;
  99                         if (info_ptr->width != 128 || info_ptr->height != 160)
 100                         {
 101                                 lprintf(__FILE__ ": unexpected font image size %ix%i, needed 128x160\n",
 102                                         (int)info_ptr->width, (int)info_ptr->height);
 103                                 break;
 104                         }
 105                         if (info_ptr->pixel_depth != 8)
 106                         {
 107                                 lprintf(__FILE__ ": font image uses %ibpp, needed 8bpp\n", info_ptr->pixel_depth);
 108                                 break;
 109                         }
 110                         for (y = 0; y < 16; y++)
 111                         {
 112                                 for (x = 0; x < 16; x++)
 113                                 {
 114                                         for (y1 = 0; y1 < 10; y1++)
 115                                         {
 116                                                 unsigned char *src = row_ptr[y*10 + y1] + x*8;
 117                                                 for (x1 = 8/2; x1 > 0; x1--, src+=2)
 118                                                         *dst++ = ((src[0]^0xff) & 0xf0) | ((src[1]^0xff) >> 4);
 119                                         }
 120                                 }
 121                         }
 122                         break;
 123                 }
 124
 125                 case READPNG_SELECTOR:
 126                 {
 127                         int x1, y1;
 128                         unsigned char *dst = dest;
 129                         if (info_ptr->width != 8 || info_ptr->height != 10)
 130                         {
 131                                 lprintf(__FILE__ ": unexpected selector image size %ix%i, needed 8x10\n",
 132                                         (int)info_ptr->width, (int)info_ptr->height);
 133                                 break;
 134                         }
 135                         if (info_ptr->pixel_depth != 8)
 136                         {
 137                                 lprintf(__FILE__ ": selector image uses %ibpp, needed 8bpp\n", info_ptr->pixel_depth);
 138                                 break;
 139                         }
 140                         for (y1 = 0; y1 < 10; y1++)
 141                         {
 142                                 unsigned char *src = row_ptr[y1];
 143                                 for (x1 = 8/2; x1 > 0; x1--, src+=2)
 144                                         *dst++ = ((src[0]^0xff) & 0xf0) | ((src[1]^0xff) >> 4);
 145                         }
 146                         break;
 147                 }
 148         }
 149
 150
 151 done:
 152         png_destroy_read_struct(&png_ptr, info_ptr ? &info_ptr : NULL, (png_infopp)NULL);
 153         fclose(fp);
 154 }
 155
 156