1

/* $Id$ */

     2

     3

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

     4

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

     5

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

     6

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

     7

#include "../../gfx_func.h"

     8

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

     9

#include "../../blitter/factory.hpp"

    10

    11

#include "splash.h"

    12

    13

#ifdef WITH_PNG

    14

    15

#include <png.h>

    16

    17

static void PNGAPI png_my_error(png_structp png_ptr, png_const_charp message)

    18

{

    19

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

    20

	longjmp(png_ptr->jmpbuf, 1);

    21

}

    22

    23

static void PNGAPI png_my_warning(png_structp png_ptr, png_const_charp message)

    24

{

    25

	DEBUG(misc, 1, "[libpng] warning: %s - %s", message, (char *)png_get_error_ptr(png_ptr));

    26

}

    27

    28

void DisplaySplashImage()

    29

{

    30

	png_byte header[8];

    31

	FILE *f;

    32

	png_structp png_ptr;

    33

	png_infop info_ptr, end_info;

    34

	uint width, height, bit_depth, color_type;

    35

	png_colorp palette;

    36

	int num_palette;

    37

	png_bytep *row_pointers;

    38

	uint8 *src;

    39

	uint y;

    40

	uint xoff, yoff;

    41

	int i;

    42

    43

	f = FioFOpenFile(SPLASH_IMAGE_FILE);

    44

	if (f == NULL) return;

    45

    46

	fread(header, 1, 8, f);

    47

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

    48

		fclose(f);

    49

		return;

    50

	}

    51

    52

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

    53

    54

	if (png_ptr == NULL) {

    55

		fclose(f);

    56

		return;

    57

	}

    58

    59

	info_ptr = png_create_info_struct(png_ptr);

    60

	if (info_ptr == NULL) {

    61

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

    62

		fclose(f);

    63

		return;

    64

	}

    65

    66

	end_info = png_create_info_struct(png_ptr);

    67

	if (end_info == NULL) {

    68

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

    69

		fclose(f);

    70

		return;

    71

	}

    72

    73

	if (setjmp(png_jmpbuf(png_ptr))) {

    74

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

    75

		fclose(f);

    76

		return;

    77

	}

    78

    79

	png_init_io(png_ptr, f);

    80

	png_set_sig_bytes(png_ptr, 8);

    81

    82

	png_read_png(png_ptr, info_ptr, PNG_TRANSFORM_IDENTITY, NULL);

    83

    84

	width            = png_get_image_width(png_ptr, info_ptr);

    85

	height           = png_get_image_height(png_ptr, info_ptr);

    86

	bit_depth        = png_get_bit_depth(png_ptr, info_ptr);

    87

	color_type       = png_get_color_type(png_ptr, info_ptr);

    88

    89

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

    90

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

    91

		fclose(f);

    92

		return;

    93

	}

    94

    95

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

    96

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

    97

		fclose(f);

    98

		return;

    99

	}

   100

   101

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

   102

   103

	row_pointers = png_get_rows(png_ptr, info_ptr);

   104

   105

	if (width > (uint) _screen.width) width = _screen.width;

   106

	if (height > (uint) _screen.height) height = _screen.height;

   107

   108

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

   109

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

   110

   111

	switch (BlitterFactoryBase::GetCurrentBlitter()->GetScreenDepth()) {

   112

		case 8: {

   113

				uint8 *dst;

   114

   115

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

   116

   117

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

   118

					src = row_pointers[y];

   119

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

   120

   121

					memcpy(dst, src, width);

   122

				}

   123

   124

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

   125

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

   126

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

   127

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

   128

				}

   129

   130

				_cur_palette[0xff].r = 0;

   131

				_cur_palette[0xff].g = 0;

   132

				_cur_palette[0xff].b = 0;

   133

   134

				_pal_first_dirty = 0;

   135

				_pal_count_dirty = 256;

   136

			}

   137

			break;

   138

		case 32: {

   139

				uint32 *dst;

   140

				uint x;

   141

   142

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

   143

   144

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

   145

					src = row_pointers[y];

   146

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

   147

   148

					for (x = 0; x < width; x++)

   149

						dst[x] = palette[src[x]].blue | (palette[src[x]].green << 8) | (palette[src[x]].red << 16) | 0xff000000;

   150

				}

   151

			}

   152

			break;

   153

	}

   154

   155

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

   156

	fclose(f);

   157

	return;

   158

}

   159

   160

   161

   162

#else /* WITH_PNG */

   163

   164

void DisplaySplashImage() {}

   165

   166

#endif /* WITH_PNG */