1

/* $Id$ */

     2

     3

#include "../../stdafx.h"

     4

#include "../../openttd.h"

     5

#include "../../variables.h"

     6

#include "../../macros.h"

     7

#include "../../debug.h"

     8

#include "../../functions.h"

     9

#include "../../gfx.h"

    10

#include "../../fileio.h"

    11

    12

#include "splash.h"

    13

    14

#ifdef WITH_PNG

    15

    16

#include <png.h>

    17

    18

static void PNGAPI png_my_error(png_structp png_ptr, png_const_charp message)

    19

{

    20

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

    21

	longjmp(png_ptr->jmpbuf, 1);

    22

}

    23

    24

static void PNGAPI png_my_warning(png_structp png_ptr, png_const_charp message)

    25

{

    26

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

    27

}

    28

    29

void DisplaySplashImage(void)

    30

{

    31

	png_byte header[8];

    32

	FILE *f;

    33

	png_structp png_ptr;

    34

	png_infop info_ptr, end_info;

    35

	uint width, height, bit_depth, color_type;

    36

	png_colorp palette;

    37

	int num_palette;

    38

	png_bytep *row_pointers;

    39

	uint8 *src, *dst;

    40

	uint y;

    41

	uint xoff, yoff;

    42

	int i;

    43

    44

	f = FioFOpenFile(SPLASH_IMAGE_FILE);

    45

	if (f == NULL) return;

    46

    47

	fread(header, 1, 8, f);

    48

	if (png_sig_cmp(header, 0, 8) != 0) {

    49

		fclose(f);

    50

		return;

    51

	}

    52

    53

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

    54

    55

	if (png_ptr == NULL) {

    56

		fclose(f);

    57

		return;

    58

	}

    59

    60

	info_ptr = png_create_info_struct(png_ptr);

    61

	if (info_ptr == NULL) {

    62

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

    63

		fclose(f);

    64

		return;

    65

	}

    66

    67

	end_info = png_create_info_struct(png_ptr);

    68

	if (end_info == NULL) {

    69

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

    70

		fclose(f);

    71

		return;

    72

	}

    73

    74

	if (setjmp(png_jmpbuf(png_ptr))) {

    75

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

    76

		fclose(f);

    77

		return;

    78

	}

    79

    80

	png_init_io(png_ptr, f);

    81

	png_set_sig_bytes(png_ptr, 8);

    82

    83

	png_read_png(png_ptr, info_ptr, PNG_TRANSFORM_IDENTITY, NULL);

    84

    85

	width            = png_get_image_width(png_ptr, info_ptr);

    86

	height           = png_get_image_height(png_ptr, info_ptr);

    87

	bit_depth        = png_get_bit_depth(png_ptr, info_ptr);

    88

	color_type       = png_get_color_type(png_ptr, info_ptr);

    89

    90

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

    91

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

    92

		fclose(f);

    93

		return;

    94

	}

    95

    96

	if(!png_get_valid(png_ptr, info_ptr, PNG_INFO_PLTE)) {

    97

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

    98

		fclose(f);

    99

		return;

   100

	}

   101

   102

	png_get_PLTE(png_ptr, info_ptr, &palette, &num_palette);

   103

   104

	row_pointers = png_get_rows(png_ptr, info_ptr);

   105

   106

	memset(_screen.dst_ptr, 0xff, _screen.pitch * _screen.height);

   107

   108

	if(width > (uint) _screen.width)

   109

		width = _screen.width;

   110

	if(height > (uint) _screen.height)

   111

		height = _screen.height;

   112

   113

	xoff = (_screen.width - width) / 2;

   114

	yoff = (_screen.height - height) / 2;

   115

	for(y = 0; y < height; y++) {

   116

		src = row_pointers[y];

   117

		dst = ((uint8 *) _screen.dst_ptr) + (yoff + y) * _screen.pitch + xoff;

   118

   119

		memcpy(dst, src, width);

   120

	}

   121

   122

	for (i = 0; i < num_palette; i++) {

   123

		_cur_palette[i].r = palette[i].red;

   124

		_cur_palette[i].g = palette[i].green;

   125

		_cur_palette[i].b = palette[i].blue;

   126

	}

   127

   128

	_cur_palette[0xff].r = 0;

   129

	_cur_palette[0xff].g = 0;

   130

	_cur_palette[0xff].b = 0;

   131

   132

	_pal_first_dirty = 0;

   133

	_pal_last_dirty = 0xff;

   134

   135

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

   136

	fclose(f);

   137

	return;

   138

}

   139

   140

   141

   142

#else // WITH_PNG

   143

   144

void DisplaySplashImage(void) {}

   145

   146

#endif // WITH_PNG