1

/* $Id$ */

     2

     5

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

     6

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

     7

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

     8

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

     9

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

    10

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

    11

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

    12

    13

#include "splash.h"

    14

    15

#ifdef WITH_PNG

    16

    17

#include <png.h>

    18

    19

static void PNGAPI png_my_error(png_structp png_ptr, png_const_charp message)

    20

{

    21

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

    22

	longjmp(png_ptr->jmpbuf, 1);

    23

}

    24

    25

static void PNGAPI png_my_warning(png_structp png_ptr, png_const_charp message)

    26

{

    27

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

    28

}

    29

    30

void DisplaySplashImage()

    31

{

    32

	png_byte header[8];

    33

	FILE *f;

    34

	png_structp png_ptr;

    35

	png_infop info_ptr, end_info;

    36

	uint width, height, bit_depth, color_type;

    37

	png_colorp palette;

    38

	int num_palette;

    39

	png_bytep *row_pointers;

    40

	uint8 *src;

    41

	uint y;

    42

	uint xoff, yoff;

    43

	int i;

    44

    45

	f = FioFOpenFile(SPLASH_IMAGE_FILE);

    46

	if (f == NULL) return;

    47

    48

	fread(header, 1, 8, f);

    49

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

    50

		fclose(f);

    51

		return;

    52

	}

    53

    54

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

    55

    56

	if (png_ptr == NULL) {

    57

		fclose(f);

    58

		return;

    59

	}

    60

    61

	info_ptr = png_create_info_struct(png_ptr);

    62

	if (info_ptr == NULL) {

    63

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

    64

		fclose(f);

    65

		return;

    66

	}

    67

    68

	end_info = png_create_info_struct(png_ptr);

    69

	if (end_info == NULL) {

    70

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

    71

		fclose(f);

    72

		return;

    73

	}

    74

    75

	if (setjmp(png_jmpbuf(png_ptr))) {

    76

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

    77

		fclose(f);

    78

		return;

    79

	}

    80

    81

	png_init_io(png_ptr, f);

    82

	png_set_sig_bytes(png_ptr, 8);

    83

    84

	png_read_png(png_ptr, info_ptr, PNG_TRANSFORM_IDENTITY, NULL);

    85

    86

	width            = png_get_image_width(png_ptr, info_ptr);

    87

	height           = png_get_image_height(png_ptr, info_ptr);

    88

	bit_depth        = png_get_bit_depth(png_ptr, info_ptr);

    89

	color_type       = png_get_color_type(png_ptr, info_ptr);

    90

    91

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

    92

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

    93

		fclose(f);

    94

		return;

    95

	}

    96

    97

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

    98

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

    99

		fclose(f);

   100

		return;

   101

	}

   102

   103

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

   104

   105

	row_pointers = png_get_rows(png_ptr, info_ptr);

   106

   107

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

   108

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

   109

   110

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

   111

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

   112

   113

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

   114

		case 8: {

   115

				uint8 *dst;

   116

   117

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

   118

   119

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

   120

					src = row_pointers[y];

   121

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

   122

   123

					memcpy(dst, src, width);

   124

				}

   125

   126

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

   127

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

   128

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

   129

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

   130

				}

   131

   132

				_cur_palette[0xff].r = 0;

   133

				_cur_palette[0xff].g = 0;

   134

				_cur_palette[0xff].b = 0;

   135

   136

				_pal_first_dirty = 0;

   137

				_pal_count_dirty = 256;

   138

			}

   139

			break;

   140

		case 32: {

   141

				uint32 *dst;

   142

				uint x;

   143

   144

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

   145

   146

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

   147

					src = row_pointers[y];

   148

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

   149

   150

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

   151

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

   152

				}

   153

			}

   154

			break;

   155

	}

   156

   157

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

   158

	fclose(f);

   159

	return;

   160

}

   161

   162

   163

   164

#else /* WITH_PNG */

   165

   166

void DisplaySplashImage() {}

   167

   168

#endif /* WITH_PNG */