1

#include "../stdafx.h"

     2

#include "../zoom.hpp"

     3

#include "../gfx.h"

     4

#include "../debug.h"

     5

#include "../table/sprites.h"

     6

#include "../video/video_driver.hpp"

     7

#include "32bpp_anim.hpp"

     8

     9

static FBlitter_32bppAnim iFBlitter_32bppAnim;

    10

    11

void Blitter_32bppAnim::Draw(Blitter::BlitterParams *bp, BlitterMode mode, ZoomLevel zoom)

    12

{

    13

	if (bp->dst < _screen.dst_ptr || bp->dst > (uint32 *)_screen.dst_ptr + _screen.width * _screen.height) {

    14

		/* This means our output is not to the screen, so we can't be doing any animation stuff, so use our parent Draw() */

    15

		Blitter_32bppOptimized::Draw(bp, mode, zoom);

    16

		return;

    17

	}

    18

    19

	const SpriteLoader::CommonPixel *src, *src_line;

    20

	uint32 *dst, *dst_line;

    21

	uint8 *anim, *anim_line;

    22

    23

	if (_screen.width != this->anim_buf_width || _screen.height != this->anim_buf_height) {

    24

		/* The size of the screen changed; we can assume we can wipe all data from our buffer */

    25

		free(this->anim_buf);

    26

		this->anim_buf = CallocT<uint8>(_screen.width * _screen.height);

    27

		this->anim_buf_width = _screen.width;

    28

		this->anim_buf_height = _screen.height;

    29

	}

    30

    31

	/* Find where to start reading in the source sprite */

    32

	src_line = (const SpriteLoader::CommonPixel *)bp->sprite + (bp->skip_top * bp->sprite_width + bp->skip_left) * ScaleByZoom(1, zoom);

    33

	dst_line = (uint32 *)bp->dst + bp->top * bp->pitch + bp->left;

    34

	anim_line = this->anim_buf + ((uint32 *)bp->dst - (uint32 *)_screen.dst_ptr) + bp->top * this->anim_buf_width + bp->left;

    35

    36

	for (int y = 0; y < bp->height; y++) {

    37

		dst = dst_line;

    38

		dst_line += bp->pitch;

    39

    40

		src = src_line;

    41

		src_line += bp->sprite_width * ScaleByZoom(1, zoom);

    42

    43

		anim = anim_line;

    44

		anim_line += this->anim_buf_width;

    45

    46

		for (int x = 0; x < bp->width; x++) {

    47

			if (src->a == 0) {

    48

				/* src->r is 'misused' here to indicate how much more pixels are following with an alpha of 0 */

    49

				int skip = UnScaleByZoom(src->r, zoom);

    50

    51

				dst  += skip;

    52

				anim += skip;

    53

				x    += skip - 1;

    54

				src  += ScaleByZoom(1, zoom) * skip;

    55

				continue;

    56

			}

    57

    58

			switch (mode) {

    59

				case BM_COLOUR_REMAP:

    60

					/* In case the m-channel is zero, do not remap this pixel in any way */

    61

					if (src->m == 0) {

    62

						*dst = ComposeColourRGBA(src->r, src->g, src->b, src->a, *dst);

    63

						*anim = 0;

    64

					} else {

    65

						if (bp->remap[src->m] != 0) {

    66

							*dst = ComposeColourPA(this->LookupColourInPalette(bp->remap[src->m]), src->a, *dst);

    67

							*anim = bp->remap[src->m];

    68

						}

    69

					}

    70

					break;

    71

    72

				case BM_TRANSPARENT:

    73

					/* TODO -- We make an assumption here that the remap in fact is transparency, not some color.

    74

					 *  This is never a problem with the code we produce, but newgrfs can make it fail... or at least:

    75

					 *  we produce a result the newgrf maker didn't expect ;) */

    76

    77

					/* Make the current color a bit more black, so it looks like this image is transparent */

    78

					*dst = MakeTransparent(*dst, 192);

    79

					*anim = bp->remap[*anim];

    80

					break;

    81

    82

				default:

    83

					/* Above 217 is palette animation */

    84

					if (src->m >= 217) *dst = ComposeColourPA(this->LookupColourInPalette(src->m), src->a, *dst);

    85

					else               *dst = ComposeColourRGBA(src->r, src->g, src->b, src->a, *dst);

    86

					*anim = src->m;

    87

					break;

    88

			}

    89

			dst++;

    90

			anim++;

    91

			src += ScaleByZoom(1, zoom);

    92

		}

    93

	}

    94

}

    95

    96

void Blitter_32bppAnim::DrawColorMappingRect(void *dst, int width, int height, int pal)

    97

{

    98

	uint32 *udst = (uint32 *)dst;

    99

	uint8 *anim;

   100

   101

	anim = this->anim_buf + ((uint32 *)dst - (uint32 *)_screen.dst_ptr);

   102

   103

	if (pal == PALETTE_TO_TRANSPARENT) {

   104

		do {

   105

			for (int i = 0; i != width; i++) {

   106

				*udst = MakeTransparent(*udst, 154);

   107

				*anim = 0;

   108

				udst++;

   109

				anim++;

   110

			}

   111

			udst = udst - width + _screen.pitch;

   112

			anim = anim - width + this->anim_buf_width;

   113

		} while (--height);

   114

		return;

   115

	}

   116

	if (pal == PALETTE_TO_STRUCT_GREY) {

   117

		do {

   118

			for (int i = 0; i != width; i++) {

   119

				*udst = MakeGrey(*udst);

   120

				*anim = 0;

   121

				udst++;

   122

				anim++;

   123

			}

   124

			udst = udst - width + _screen.pitch;

   125

			anim = anim - width + this->anim_buf_width;

   126

		} while (--height);

   127

		return;

   128

	}

   129

   130

	DEBUG(misc, 0, "32bpp blitter doesn't know how to draw this color table ('%d')", pal);

   131

}

   132

   133

void Blitter_32bppAnim::SetPixel(void *video, int x, int y, uint8 color)

   134

{

   135

	*((uint32 *)video + x + y * _screen.pitch) = LookupColourInPalette(color);

   136

	/* Set the color in the anim-buffer too */

   137

	this->anim_buf[((uint32 *)video - (uint32 *)_screen.dst_ptr) + x + y * this->anim_buf_width] = color;

   138

}

   139

   140

void Blitter_32bppAnim::SetPixelIfEmpty(void *video, int x, int y, uint8 color)

   141

{

   142

	uint32 *dst = (uint32 *)video + x + y * _screen.pitch;

   143

	if (*dst == 0) {

   144

		*dst = LookupColourInPalette(color);

   145

		/* Set the color in the anim-buffer too */

   146

		this->anim_buf[((uint32 *)video - (uint32 *)_screen.dst_ptr) + x + y * this->anim_buf_width] = color;

   147

	}

   148

}

   149

   150

void Blitter_32bppAnim::DrawRect(void *video, int width, int height, uint8 color)

   151

{

   152

	uint32 color32 = LookupColourInPalette(color);

   153

	uint8 *anim_line;

   154

   155

	anim_line = ((uint32 *)video - (uint32 *)_screen.dst_ptr) + this->anim_buf;

   156

   157

	do {

   158

		uint32 *dst = (uint32 *)video;

   159

		uint8 *anim = anim_line;

   160

   161

		for (int i = width; i > 0; i--) {

   162

			*dst = color32;

   163

			/* Set the color in the anim-buffer too */

   164

			*anim = color;

   165

			dst++;

   166

			anim++;

   167

		}

   168

		video = (uint32 *)video + _screen.pitch;

   169

		anim_line += this->anim_buf_width;

   170

	} while (--height);

   171

}

   172

   173

void Blitter_32bppAnim::CopyFromBuffer(void *video, const void *src, int width, int height)

   174

{

   175

	assert(video >= _screen.dst_ptr && video <= (uint32 *)_screen.dst_ptr + _screen.width + _screen.height * _screen.pitch);

   176

	uint32 *dst = (uint32 *)video;

   177

	uint32 *usrc = (uint32 *)src;

   178

	uint8 *anim_line;

   179

   180

	anim_line = ((uint32 *)video - (uint32 *)_screen.dst_ptr) + this->anim_buf;

   181

   182

	for (; height > 0; height--) {

   183

		memcpy(dst, usrc, width * sizeof(uint32));

   184

		usrc += width;

   185

		dst += _screen.pitch;

   186

		/* Copy back the anim-buffer */

   187

		memcpy(anim_line, usrc, width * sizeof(uint8));

   188

		usrc = (uint32 *)((uint8 *)usrc + width);

   189

		anim_line += this->anim_buf_width;

   190

	}

   191

   192

	/* We update the palette (or the pixels that do animation) immediatly, to avoid graphical glitches */

   193

	this->PaletteAnimate(217, _use_dos_palette ? 38 : 28);

   194

}

   195

   196

void Blitter_32bppAnim::CopyToBuffer(const void *video, void *dst, int width, int height)

   197

{

   198

	assert(video >= _screen.dst_ptr && video <= (uint32 *)_screen.dst_ptr + _screen.width + _screen.height * _screen.pitch);

   199

	uint32 *udst = (uint32 *)dst;

   200

	uint32 *src = (uint32 *)video;

   201

	uint8 *anim_line;

   202

   203

	if (this->anim_buf == NULL) return;

   204

   205

	anim_line = ((uint32 *)video - (uint32 *)_screen.dst_ptr) + this->anim_buf;

   206

   207

	for (; height > 0; height--) {

   208

		memcpy(udst, src, width * sizeof(uint32));

   209

		src += _screen.pitch;

   210

		udst += width;

   211

		/* Copy the anim-buffer */

   212

		memcpy(udst, anim_line, width * sizeof(uint8));

   213

		udst = (uint32 *)((uint8 *)udst + width);

   214

		anim_line += this->anim_buf_width;

   215

	}

   216

}

   217

   218

void Blitter_32bppAnim::ScrollBuffer(void *video, int &left, int &top, int &width, int &height, int scroll_x, int scroll_y)

   219

{

   220

	uint8 *dst, *src;

   221

   222

	/* We need to scroll the anim-buffer too */

   223

	if (scroll_y > 0) {

   224

		dst = this->anim_buf + left + (top + height - 1) * this->anim_buf_width;

   225

		src = dst - scroll_y * this->anim_buf_width;

   226

   227

		/* Adjust left & width */

   228

		if (scroll_x >= 0) dst += scroll_x;

   229

		else               src -= scroll_x;

   230

   231

		uint tw = width + (scroll_x >= 0 ? -scroll_x : scroll_x);

   232

		uint th = height - scroll_y;

   233

		for (; th > 0; th--) {

   234

			memcpy(dst, src, tw * sizeof(uint8));

   235

			src -= this->anim_buf_width;

   236

			dst -= this->anim_buf_width;

   237

		}

   238

	} else {

   239

		/* Calculate pointers */

   240

		dst = this->anim_buf + left + top * this->anim_buf_width;

   241

		src = dst - scroll_y * this->anim_buf_width;

   242

   243

		/* Adjust left & width */

   244

		if (scroll_x >= 0) dst += scroll_x;

   245

		else               src -= scroll_x;

   246

   247

		/* the y-displacement may be 0 therefore we have to use memmove,

   248

		 * because source and destination may overlap */

   249

		uint tw = width + (scroll_x >= 0 ? -scroll_x : scroll_x);

   250

		uint th = height + scroll_y;

   251

		for (; th > 0; th--) {

   252

			memmove(dst, src, tw * sizeof(uint8));

   253

			src += this->anim_buf_width;

   254

			dst += this->anim_buf_width;

   255

		}

   256

	}

   257

   258

	Blitter_32bppBase::ScrollBuffer(video, left, top, width, height, scroll_x, scroll_y);

   259

}

   260

   261

int Blitter_32bppAnim::BufferSize(int width, int height)

   262

{

   263

	return width * height * (sizeof(uint32) + sizeof(uint8));

   264

}

   265

   266

void Blitter_32bppAnim::PaletteAnimate(uint start, uint count)

   267

{

   268

	uint8 *anim = this->anim_buf;

   269

   270

	/* Never repaint the transparency pixel */

   271

	if (start == 0) start++;

   272

   273

	/* Let's walk the anim buffer and try to find the pixels */

   274

	for (int y = 0; y < this->anim_buf_height; y++) {

   275

		for (int x = 0; x < this->anim_buf_width; x++) {

   276

			if (*anim >= start && *anim <= start + count) {

   277

				/* Update this pixel */

   278

				this->SetPixel(_screen.dst_ptr, x, y, *anim);

   279

			}

   280

			anim++;

   281

		}

   282

	}

   283

   284

	/* Make sure the backend redraws the whole screen */

   285

	_video_driver->MakeDirty(0, 0, _screen.width, _screen.height);

   286

}

   287

   288

Blitter::PaletteAnimation Blitter_32bppAnim::UsePaletteAnimation()

   289

{

   290

	return Blitter::PALETTE_ANIMATION_BLITTER;

   291

}