1

/* $Id$ */

     2

     3

/** @file png.cpp */

     4

     5

#ifdef WITH_PNG

     6

     7

#include "../stdafx.h"

     8

#include "../gfx_func.h"

     9

#include "../fileio.h"

    10

#include "../debug.h"

    11

#include "../core/alloc_func.hpp"

    12

#include "../core/endian_func.hpp"

    13

#include "png.hpp"

    14

#include <png.h>

    15

    16

#define PNG_SLOT 62

    17

    18

static void PNGAPI png_my_read(png_structp png_ptr, png_bytep data, png_size_t length)

    19

{

    20

	FioReadBlock(data, length);

    21

}

    22

    23

static void PNGAPI png_my_error(png_structp png_ptr, png_const_charp message)

    24

{

    25

	DEBUG(sprite, 0, "ERROR (libpng): %s - %s", message, (char *)png_get_error_ptr(png_ptr));

    26

	longjmp(png_ptr->jmpbuf, 1);

    27

}

    28

    29

static void PNGAPI png_my_warning(png_structp png_ptr, png_const_charp message)

    30

{

    31

	DEBUG(sprite, 0, "WARNING (libpng): %s - %s", message, (char *)png_get_error_ptr(png_ptr));

    32

}

    33

    34

static bool OpenPNGFile(const char *filename, uint32 id, bool mask)

    35

{

    36

	char png_file[MAX_PATH];

    37

    38

	snprintf(png_file, sizeof(png_file), "sprites" PATHSEP "%s" PATHSEP "%d%s.png", filename, id, mask ? "m" : "");

    39

	if (FioCheckFileExists(png_file)) {

    40

		FioOpenFile(PNG_SLOT, png_file);

    41

		return true;

    42

	}

    43

    44

	/* TODO -- Add TAR support */

    45

	return false;

    46

}

    47

    48

static bool LoadPNG(SpriteLoader::Sprite *sprite, const char *filename, uint32 id, bool mask)

    49

{

    50

	png_byte header[8];

    51

	png_structp png_ptr;

    52

	png_infop info_ptr, end_info;

    53

	uint bit_depth, color_type;

    54

	uint i, pixelsize;

    55

	png_bytep row_pointer;

    56

	SpriteLoader::CommonPixel *dst;

    57

    58

	if (!OpenPNGFile(filename, id, mask)) return mask; // If mask is true, and file not found, continue true anyway, as it isn't a show-stopper

    59

    60

	/* Check the header */

    61

	FioReadBlock(header, 8);

    62

	if (png_sig_cmp(header, 0, 8) != 0) return false;

    63

    64

	/* Create the reader */

    65

	png_ptr = png_create_read_struct(PNG_LIBPNG_VER_STRING, (png_voidp)NULL, png_my_error, png_my_warning);

    66

	if (png_ptr == NULL) return false;

    67

    68

	/* Create initial stuff */

    69

	info_ptr = png_create_info_struct(png_ptr);

    70

	if (info_ptr == NULL) {

    71

		png_destroy_read_struct(&png_ptr, (png_infopp)NULL, (png_infopp)NULL);

    72

		return false;

    73

	}

    74

	end_info = png_create_info_struct(png_ptr);

    75

	if (end_info == NULL) {

    76

		png_destroy_read_struct(&png_ptr, &info_ptr, (png_infopp)NULL);

    77

		return false;

    78

	}

    79

    80

	/* Make sure that upon error, we can clean up graceful */

    81

	if (setjmp(png_jmpbuf(png_ptr))) {

    82

		png_destroy_read_struct(&png_ptr, &info_ptr, &end_info);

    83

		return false;

    84

	}

    85

    86

	/* Read the file */

    87

	png_set_read_fn(png_ptr, NULL, png_my_read);

    88

	png_set_sig_bytes(png_ptr, 8);

    89

    90

	png_read_info(png_ptr, info_ptr);

    91

    92

	if (!mask) {

    93

		/* Read the text chunks */

    94

		png_textp text_ptr;

    95

		int num_text = 0;

    96

		png_get_text(png_ptr, info_ptr, &text_ptr, &num_text);

    97

		if (num_text == 0) DEBUG(misc, 0, "Warning: PNG Sprite '%s/%d.png' doesn't have x_offs and y_offs; expect graphical problems", filename, id);

    98

		for (int i = 0; i < num_text; i++) {

    99

			/* x_offs and y_offs are in the text-chunk of PNG */

   100

			if (strcmp("x_offs", text_ptr[i].key) == 0) sprite->x_offs = strtol(text_ptr[i].text, NULL, 0);

   101

			if (strcmp("y_offs", text_ptr[i].key) == 0) sprite->y_offs = strtol(text_ptr[i].text, NULL, 0);

   102

		}

   103

   104

		sprite->height = info_ptr->height;

   105

		sprite->width  = info_ptr->width;

   106

		sprite->data = CallocT<SpriteLoader::CommonPixel>(sprite->width * sprite->height);

   107

	}

   108

   109

	bit_depth  = png_get_bit_depth(png_ptr, info_ptr);

   110

	color_type = png_get_color_type(png_ptr, info_ptr);

   111

   112

	if (mask && (bit_depth != 8 || color_type != PNG_COLOR_TYPE_PALETTE)) {

   113

		DEBUG(misc, 0, "Ignoring mask for SpriteID %d as it isn't a 8 bit palette image", id);

   114

		return true;

   115

	}

   116

   117

	if (!mask) {

   118

		if (bit_depth == 16) png_set_strip_16(png_ptr);

   119

   120

		if (color_type == PNG_COLOR_TYPE_PALETTE) {

   121

			png_set_palette_to_rgb(png_ptr);

   122

			color_type = PNG_COLOR_TYPE_RGB;

   123

		}

   124

		if (color_type == PNG_COLOR_TYPE_GRAY || color_type == PNG_COLOR_TYPE_GRAY_ALPHA) {

   125

			png_set_gray_to_rgb(png_ptr);

   126

			color_type = PNG_COLOR_TYPE_RGB;

   127

		}

   128

   129

#ifdef TTD_LITTLE_ENDIAN

   130

		png_set_bgr(png_ptr);

   131

#else

   132

		if (color_type == PNG_COLOR_TYPE_RGB_ALPHA) png_set_swap_alpha(png_ptr);

   133

#endif

   134

   135

		if (color_type == PNG_COLOR_TYPE_RGB) {

   136

#ifdef TTD_LITTLE_ENDIAN

   137

			png_set_filler(png_ptr, 0xff, PNG_FILLER_AFTER);

   138

#else

   139

			png_set_filler(png_ptr, 0xff, PNG_FILLER_BEFORE);

   140

#endif

   141

		}

   142

   143

		pixelsize = sizeof(uint32);

   144

	} else {

   145

		pixelsize = sizeof(uint8);

   146

	}

   147

   148

	row_pointer = (png_byte *)MallocT<byte>(info_ptr->width * pixelsize);

   149

	if (row_pointer == NULL) {

   150

		png_destroy_read_struct(&png_ptr, &info_ptr, &end_info);

   151

		return false;

   152

	}

   153

   154

	for (i = 0; i < info_ptr->height; i++) {

   155

		png_read_row(png_ptr, row_pointer, NULL);

   156

   157

		dst = sprite->data + i * info_ptr->width;

   158

   159

		for (uint x = 0; x < info_ptr->width; x++) {

   160

			if (mask) {

   161

				if (row_pointer[x * sizeof(uint8)] != 0) {

   162

					dst[x].b = 0;

   163

					dst[x].g = 0;

   164

					dst[x].r = 0;

   165

					/* Alpha channel is used from the original image (to allow transparency in remap colors) */

   166

					dst[x].m = row_pointer[x * sizeof(uint8)];

   167

				}

   168

			} else {

   169

				dst[x].b = row_pointer[x * sizeof(uint32) + 0];

   170

				dst[x].g = row_pointer[x * sizeof(uint32) + 1];

   171

				dst[x].r = row_pointer[x * sizeof(uint32) + 2];

   172

				dst[x].a = row_pointer[x * sizeof(uint32) + 3];

   173

				dst[x].m = 0;

   174

			}

   175

		}

   176

	}

   177

   178

	free(row_pointer);

   179

	png_destroy_read_struct(&png_ptr, &info_ptr, &end_info);

   180

   181

	return true;

   182

}

   183

   184

bool SpriteLoaderPNG::LoadSprite(SpriteLoader::Sprite *sprite, uint8 file_slot, uint32 file_pos)

   185

{

   186

	const char *filename = FioGetFilename(file_slot);

   187

	if (!LoadPNG(sprite, filename, file_pos, false)) return false;

   188

	if (!LoadPNG(sprite, filename, file_pos, true)) return false;

   189

	return true;

   190

}

   191

   192

#endif /* WITH_PNG */