| /* |
| * Copyright (C) 2007 The Android Open Source Project |
| * |
| * Licensed under the Apache License, Version 2.0 (the "License"); |
| * you may not use this file except in compliance with the License. |
| * You may obtain a copy of the License at |
| * |
| * http://www.apache.org/licenses/LICENSE-2.0 |
| * |
| * Unless required by applicable law or agreed to in writing, software |
| * distributed under the License is distributed on an "AS IS" BASIS, |
| * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. |
| * See the License for the specific language governing permissions and |
| * limitations under the License. |
| */ |
| |
| #include <stdlib.h> |
| #include <unistd.h> |
| |
| #include <fcntl.h> |
| #include <stdio.h> |
| |
| #include <sys/ioctl.h> |
| #include <sys/mman.h> |
| #include <sys/types.h> |
| |
| #include <linux/fb.h> |
| #include <linux/kd.h> |
| |
| #include <png.h> |
| |
| #include "minui.h" |
| |
| extern char* locale; |
| |
| #define SURFACE_DATA_ALIGNMENT 8 |
| |
| static gr_surface malloc_surface(size_t data_size) { |
| unsigned char* temp = malloc(sizeof(GRSurface) + data_size + SURFACE_DATA_ALIGNMENT); |
| if (temp == NULL) return NULL; |
| gr_surface surface = (gr_surface) temp; |
| surface->data = temp + sizeof(GRSurface) + |
| (SURFACE_DATA_ALIGNMENT - (sizeof(GRSurface) % SURFACE_DATA_ALIGNMENT)); |
| return surface; |
| } |
| |
| static int open_png(const char* name, png_structp* png_ptr, png_infop* info_ptr, |
| png_uint_32* width, png_uint_32* height, png_byte* channels) { |
| char resPath[256]; |
| unsigned char header[8]; |
| int result = 0; |
| |
| snprintf(resPath, sizeof(resPath)-1, "/res/images/%s.png", name); |
| resPath[sizeof(resPath)-1] = '\0'; |
| FILE* fp = fopen(resPath, "rb"); |
| if (fp == NULL) { |
| result = -1; |
| goto exit; |
| } |
| |
| size_t bytesRead = fread(header, 1, sizeof(header), fp); |
| if (bytesRead != sizeof(header)) { |
| result = -2; |
| goto exit; |
| } |
| |
| if (png_sig_cmp(header, 0, sizeof(header))) { |
| result = -3; |
| goto exit; |
| } |
| |
| *png_ptr = png_create_read_struct(PNG_LIBPNG_VER_STRING, NULL, NULL, NULL); |
| if (!*png_ptr) { |
| result = -4; |
| goto exit; |
| } |
| |
| *info_ptr = png_create_info_struct(*png_ptr); |
| if (!*info_ptr) { |
| result = -5; |
| goto exit; |
| } |
| |
| if (setjmp(png_jmpbuf(*png_ptr))) { |
| result = -6; |
| goto exit; |
| } |
| |
| png_init_io(*png_ptr, fp); |
| png_set_sig_bytes(*png_ptr, sizeof(header)); |
| png_read_info(*png_ptr, *info_ptr); |
| |
| int color_type, bit_depth; |
| png_get_IHDR(*png_ptr, *info_ptr, width, height, &bit_depth, |
| &color_type, NULL, NULL, NULL); |
| |
| *channels = png_get_channels(*png_ptr, *info_ptr); |
| |
| if (bit_depth == 8 && *channels == 3 && color_type == PNG_COLOR_TYPE_RGB) { |
| // 8-bit RGB images: great, nothing to do. |
| } else if (bit_depth <= 8 && *channels == 1 && color_type == PNG_COLOR_TYPE_GRAY) { |
| // 1-, 2-, 4-, or 8-bit gray images: expand to 8-bit gray. |
| png_set_expand_gray_1_2_4_to_8(*png_ptr); |
| } else if (bit_depth == 8 && *channels == 1 && color_type == PNG_COLOR_TYPE_PALETTE) { |
| // paletted images: expand to 8-bit RGB. Note that we DON'T |
| // currently expand the tRNS chunk (if any) to an alpha |
| // channel, because minui doesn't support alpha channels in |
| // general. |
| png_set_palette_to_rgb(*png_ptr); |
| *channels = 3; |
| } else { |
| fprintf(stderr, "minui doesn't support PNG depth %d channels %d color_type %d\n", |
| bit_depth, *channels, color_type); |
| result = -7; |
| goto exit; |
| } |
| |
| return result; |
| |
| exit: |
| if (result < 0) { |
| png_destroy_read_struct(png_ptr, info_ptr, NULL); |
| } |
| if (fp != NULL) { |
| fclose(fp); |
| } |
| |
| return result; |
| } |
| |
| // "display" surfaces are transformed into the framebuffer's required |
| // pixel format (currently only RGBX is supported) at load time, so |
| // gr_blit() can be nothing more than a memcpy() for each row. The |
| // next two functions are the only ones that know anything about the |
| // framebuffer pixel format; they need to be modified if the |
| // framebuffer format changes (but nothing else should). |
| |
| // Allocate and return a gr_surface sufficient for storing an image of |
| // the indicated size in the framebuffer pixel format. |
| static gr_surface init_display_surface(png_uint_32 width, png_uint_32 height) { |
| gr_surface surface; |
| |
| surface = malloc_surface(width * height * 4); |
| if (surface == NULL) return NULL; |
| |
| surface->width = width; |
| surface->height = height; |
| surface->row_bytes = width * 4; |
| surface->pixel_bytes = 4; |
| |
| return surface; |
| } |
| |
| // Copy 'input_row' to 'output_row', transforming it to the |
| // framebuffer pixel format. The input format depends on the value of |
| // 'channels': |
| // |
| // 1 - input is 8-bit grayscale |
| // 3 - input is 24-bit RGB |
| // 4 - input is 32-bit RGBA/RGBX |
| // |
| // 'width' is the number of pixels in the row. |
| static void transform_rgb_to_draw(unsigned char* input_row, |
| unsigned char* output_row, |
| int channels, int width) { |
| int x; |
| unsigned char* ip = input_row; |
| unsigned char* op = output_row; |
| |
| switch (channels) { |
| case 1: |
| // expand gray level to RGBX |
| for (x = 0; x < width; ++x) { |
| *op++ = *ip; |
| *op++ = *ip; |
| *op++ = *ip; |
| *op++ = 0xff; |
| ip++; |
| } |
| break; |
| |
| case 3: |
| // expand RGBA to RGBX |
| for (x = 0; x < width; ++x) { |
| *op++ = *ip++; |
| *op++ = *ip++; |
| *op++ = *ip++; |
| *op++ = 0xff; |
| } |
| break; |
| |
| case 4: |
| // copy RGBA to RGBX |
| memcpy(output_row, input_row, width*4); |
| break; |
| } |
| } |
| |
| int res_create_display_surface(const char* name, gr_surface* pSurface) { |
| gr_surface surface = NULL; |
| int result = 0; |
| png_structp png_ptr = NULL; |
| png_infop info_ptr = NULL; |
| png_uint_32 width, height; |
| png_byte channels; |
| |
| *pSurface = NULL; |
| |
| result = open_png(name, &png_ptr, &info_ptr, &width, &height, &channels); |
| if (result < 0) return result; |
| |
| surface = init_display_surface(width, height); |
| if (surface == NULL) { |
| result = -8; |
| goto exit; |
| } |
| |
| unsigned char* p_row = malloc(width * 4); |
| unsigned int y; |
| for (y = 0; y < height; ++y) { |
| png_read_row(png_ptr, p_row, NULL); |
| transform_rgb_to_draw(p_row, surface->data + y * surface->row_bytes, channels, width); |
| } |
| free(p_row); |
| |
| *pSurface = surface; |
| |
| exit: |
| png_destroy_read_struct(&png_ptr, &info_ptr, NULL); |
| if (result < 0 && surface != NULL) free(surface); |
| return result; |
| } |
| |
| int res_create_multi_display_surface(const char* name, int* frames, gr_surface** pSurface) { |
| gr_surface* surface = NULL; |
| int result = 0; |
| png_structp png_ptr = NULL; |
| png_infop info_ptr = NULL; |
| png_uint_32 width, height; |
| png_byte channels; |
| int i; |
| |
| *pSurface = NULL; |
| *frames = -1; |
| |
| result = open_png(name, &png_ptr, &info_ptr, &width, &height, &channels); |
| if (result < 0) return result; |
| |
| *frames = 1; |
| png_textp text; |
| int num_text; |
| if (png_get_text(png_ptr, info_ptr, &text, &num_text)) { |
| for (i = 0; i < num_text; ++i) { |
| if (text[i].key && strcmp(text[i].key, "Frames") == 0 && text[i].text) { |
| *frames = atoi(text[i].text); |
| break; |
| } |
| } |
| printf(" found frames = %d\n", *frames); |
| } |
| |
| if (height % *frames != 0) { |
| printf("bad height (%d) for frame count (%d)\n", height, *frames); |
| result = -9; |
| goto exit; |
| } |
| |
| surface = malloc(*frames * sizeof(gr_surface)); |
| if (surface == NULL) { |
| result = -8; |
| goto exit; |
| } |
| for (i = 0; i < *frames; ++i) { |
| surface[i] = init_display_surface(width, height / *frames); |
| if (surface[i] == NULL) { |
| result = -8; |
| goto exit; |
| } |
| } |
| |
| unsigned char* p_row = malloc(width * 4); |
| unsigned int y; |
| for (y = 0; y < height; ++y) { |
| png_read_row(png_ptr, p_row, NULL); |
| int frame = y % *frames; |
| unsigned char* out_row = surface[frame]->data + |
| (y / *frames) * surface[frame]->row_bytes; |
| transform_rgb_to_draw(p_row, out_row, channels, width); |
| } |
| free(p_row); |
| |
| *pSurface = (gr_surface*) surface; |
| |
| exit: |
| png_destroy_read_struct(&png_ptr, &info_ptr, NULL); |
| |
| if (result < 0) { |
| if (surface) { |
| for (i = 0; i < *frames; ++i) { |
| if (surface[i]) free(surface[i]); |
| } |
| free(surface); |
| } |
| } |
| return result; |
| } |
| |
| int res_create_alpha_surface(const char* name, gr_surface* pSurface) { |
| gr_surface surface = NULL; |
| int result = 0; |
| png_structp png_ptr = NULL; |
| png_infop info_ptr = NULL; |
| png_uint_32 width, height; |
| png_byte channels; |
| |
| *pSurface = NULL; |
| |
| result = open_png(name, &png_ptr, &info_ptr, &width, &height, &channels); |
| if (result < 0) return result; |
| |
| if (channels != 1) { |
| result = -7; |
| goto exit; |
| } |
| |
| surface = malloc_surface(width * height); |
| if (surface == NULL) { |
| result = -8; |
| goto exit; |
| } |
| surface->width = width; |
| surface->height = height; |
| surface->row_bytes = width; |
| surface->pixel_bytes = 1; |
| |
| unsigned char* p_row; |
| unsigned int y; |
| for (y = 0; y < height; ++y) { |
| p_row = surface->data + y * surface->row_bytes; |
| png_read_row(png_ptr, p_row, NULL); |
| } |
| |
| *pSurface = surface; |
| |
| exit: |
| png_destroy_read_struct(&png_ptr, &info_ptr, NULL); |
| if (result < 0 && surface != NULL) free(surface); |
| return result; |
| } |
| |
| static int matches_locale(const char* loc, const char* locale) { |
| if (locale == NULL) return 0; |
| |
| if (strcmp(loc, locale) == 0) return 1; |
| |
| // if loc does *not* have an underscore, and it matches the start |
| // of locale, and the next character in locale *is* an underscore, |
| // that's a match. For instance, loc == "en" matches locale == |
| // "en_US". |
| |
| int i; |
| for (i = 0; loc[i] != 0 && loc[i] != '_'; ++i); |
| if (loc[i] == '_') return 0; |
| |
| return (strncmp(locale, loc, i) == 0 && locale[i] == '_'); |
| } |
| |
| int res_create_localized_alpha_surface(const char* name, |
| const char* locale, |
| gr_surface* pSurface) { |
| gr_surface surface = NULL; |
| int result = 0; |
| png_structp png_ptr = NULL; |
| png_infop info_ptr = NULL; |
| png_uint_32 width, height; |
| png_byte channels; |
| |
| *pSurface = NULL; |
| |
| if (locale == NULL) { |
| surface = malloc_surface(0); |
| surface->width = 0; |
| surface->height = 0; |
| surface->row_bytes = 0; |
| surface->pixel_bytes = 1; |
| goto exit; |
| } |
| |
| result = open_png(name, &png_ptr, &info_ptr, &width, &height, &channels); |
| if (result < 0) return result; |
| |
| if (channels != 1) { |
| result = -7; |
| goto exit; |
| } |
| |
| unsigned char* row = malloc(width); |
| png_uint_32 y; |
| for (y = 0; y < height; ++y) { |
| png_read_row(png_ptr, row, NULL); |
| int w = (row[1] << 8) | row[0]; |
| int h = (row[3] << 8) | row[2]; |
| int len = row[4]; |
| char* loc = (char*)row+5; |
| |
| if (y+1+h >= height || matches_locale(loc, locale)) { |
| printf(" %20s: %s (%d x %d @ %d)\n", name, loc, w, h, y); |
| |
| surface = malloc_surface(w*h); |
| if (surface == NULL) { |
| result = -8; |
| goto exit; |
| } |
| surface->width = w; |
| surface->height = h; |
| surface->row_bytes = w; |
| surface->pixel_bytes = 1; |
| |
| int i; |
| for (i = 0; i < h; ++i, ++y) { |
| png_read_row(png_ptr, row, NULL); |
| memcpy(surface->data + i*w, row, w); |
| } |
| |
| *pSurface = (gr_surface) surface; |
| break; |
| } else { |
| int i; |
| for (i = 0; i < h; ++i, ++y) { |
| png_read_row(png_ptr, row, NULL); |
| } |
| } |
| } |
| |
| exit: |
| png_destroy_read_struct(&png_ptr, &info_ptr, NULL); |
| if (result < 0 && surface != NULL) free(surface); |
| return result; |
| } |
| |
| void res_free_surface(gr_surface surface) { |
| free(surface); |
| } |