1

/* $Id$ */

     2

     3

/** @file 32bpp_anim.cpp Implementation of the optimized 32 bpp blitter with animation support. */

     4

     5

#include "../stdafx.h"

     6

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

     7

#include "../core/math_func.hpp"

     8

#include "../gfx_func.h"

     9

#include "../zoom_func.h"

    10

#include "../debug.h"

    11

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

    12

#include "32bpp_anim.hpp"

    13

    14

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

    15

    16

static FBlitter_32bppAnim iFBlitter_32bppAnim;

    17

    18

template <BlitterMode mode>

    19

inline void Blitter_32bppAnim::Draw(const Blitter::BlitterParams *bp, ZoomLevel zoom)

    20

{

    21

	const SpriteData *src = (const SpriteData *)bp->sprite;

    22

    23

	const Colour *src_px = (const Colour *)(src->data + src->offset[zoom][0]);

    24

	const uint8  *src_n  = (const uint8  *)(src->data + src->offset[zoom][1]);

    25

    26

	for (uint i = bp->skip_top; i != 0; i--) {

    27

		src_px = (const Colour *)((const byte *)src_px + *(const uint32 *)src_px);

    28

		src_n += *(const uint32 *)src_n;

    29

	}

    30

    31

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

    32

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

    33

    34

	const byte *remap = bp->remap; // store so we don't have to access it via bp everytime

    35

    36

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

    37

		uint32 *dst_ln = dst + bp->pitch;

    38

		uint8 *anim_ln = anim + this->anim_buf_width;

    39

    40

		const Colour *src_px_ln = (const Colour *)((const byte *)src_px + *(const uint32 *)src_px);

    41

		src_px++;

    42

    43

		const uint8 *src_n_ln = src_n + *(uint32 *)src_n;

    44

		src_n += 4;

    45

    46

		uint32 *dst_end = dst + bp->skip_left;

    47

    48

		uint n;

    49

    50

		while (dst < dst_end) {

    51

			n = *src_n++;

    52

    53

			if (src_px->a == 0) {

    54

				dst += n;

    55

				src_px ++;

    56

				src_n++;

    57

    58

				if (dst > dst_end) anim += dst - dst_end;

    59

			} else {

    60

				if (dst + n > dst_end) {

    61

					uint d = dst_end - dst;

    62

					src_px += d;

    63

					src_n += d;

    64

    65

					dst = dst_end - bp->skip_left;

    66

					dst_end = dst + bp->width;

    67

    68

					n = min<uint>(n - d, (uint)bp->width);

    69

					goto draw;

    70

				}

    71

				dst += n;

    72

				src_px += n;

    73

				src_n += n;

    74

			}

    75

		}

    76

    77

		dst -= bp->skip_left;

    78

		dst_end -= bp->skip_left;

    79

    80

		dst_end += bp->width;

    81

    82

		while (dst < dst_end) {

    83

			n = min<uint>(*src_n++, (uint)(dst_end - dst));

    84

    85

			if (src_px->a == 0) {

    86

				anim += n;

    87

				dst += n;

    88

				src_px++;

    89

				src_n++;

    90

				continue;

    91

			}

    92

    93

			draw:;

    94

    95

			switch (mode) {

    96

				case BM_COLOUR_REMAP:

    97

					if (src_px->a == 255) {

    98

						do {

    99

							uint m = *src_n;

   100

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

   101

							if (m == 0) {

   102

								*dst = *src_px;

   103

								*anim = 0;

   104

							} else {

   105

								uint r = remap[m];

   106

								*anim = r;

   107

								if (r != 0) *dst = this->LookupColourInPalette(r);

   108

							}

   109

							anim++;

   110

							dst++;

   111

							src_px++;

   112

							src_n++;

   113

						} while (--n != 0);

   114

					} else {

   115

						do {

   116

							uint m = *src_n;

   117

							if (m == 0) {

   118

								*dst = ComposeColourRGBANoCheck(src_px->r, src_px->g, src_px->b, src_px->a, *dst);

   119

								*anim = 0;

   120

							} else {

   121

								uint r = remap[m];

   122

								*anim = r;

   123

								if (r != 0) *dst = ComposeColourPANoCheck(this->LookupColourInPalette(r), src_px->a, *dst);

   124

							}

   125

							anim++;

   126

							dst++;

   127

							src_px++;

   128

							src_n++;

   129

						} while (--n != 0);

   130

					}

   131

					break;

   132

   133

				case BM_TRANSPARENT:

   134

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

   135

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

   136

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

   137

   138

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

   139

					src_n += n;

   140

					if (src_px->a == 255) {

   141

						src_px += n;

   142

						do {

   143

							*dst = MakeTransparent(*dst, 3, 4);

   144

							*anim = remap[*anim];

   145

							anim++;

   146

							dst++;

   147

						} while (--n != 0);

   148

					} else {

   149

						do {

   150

							*dst = MakeTransparent(*dst, (256 * 4 - src_px->a), 256 * 4);

   151

							*anim = remap[*anim];

   152

							anim++;

   153

							dst++;

   154

							src_px++;

   155

						} while (--n != 0);

   156

					}

   157

					break;

   158

   159

				default:

   160

					if (src_px->a == 255) {

   161

						do {

   162

							/* Compiler assumes pointer aliasing, can't optimise this on its own */

   163

							uint m = *src_n++;

   164

							/* Above 217 (PALETTE_ANIM_SIZE_START) is palette animation */

   165

							*anim++ = m;

   166

							*dst++ = (m >= PALETTE_ANIM_SIZE_START) ? this->LookupColourInPalette(m) : *src_px;

   167

							src_px++;

   168

						} while (--n != 0);

   169

					} else {

   170

						do {

   171

							uint m = *src_n++;

   172

							*anim++ = m;

   173

							if (m >= PALETTE_ANIM_SIZE_START) {

   174

								*dst = ComposeColourPANoCheck(this->LookupColourInPalette(m), src_px->a, *dst);

   175

							} else {

   176

								*dst = ComposeColourRGBANoCheck(src_px->r, src_px->g, src_px->b, src_px->a, *dst);

   177

							}

   178

							dst++;

   179

							src_px++;

   180

						} while (--n != 0);

   181

					}

   182

					break;

   183

			}

   184

		}

   185

   186

		anim = anim_ln;

   187

		dst = dst_ln;

   188

		src_px = src_px_ln;

   189

		src_n  = src_n_ln;

   190

	}

   191

}

   192

   193

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

   194

{

   195

	if (_screen_disable_anim) {

   196

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

   197

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

   198

		return;

   199

	}

   200

   201

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

   202

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

   203

		free(this->anim_buf);

   204

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

   205

		this->anim_buf_width = _screen.width;

   206

		this->anim_buf_height = _screen.height;

   207

	}

   208

   209

	switch (mode) {

   210

		default: NOT_REACHED();

   211

		case BM_NORMAL:       Draw<BM_NORMAL>      (bp, zoom); return;

   212

		case BM_COLOUR_REMAP: Draw<BM_COLOUR_REMAP>(bp, zoom); return;

   213

		case BM_TRANSPARENT:  Draw<BM_TRANSPARENT> (bp, zoom); return;

   214

	}

   215

}

   216

   217

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

   218

{

   219

	if (_screen_disable_anim) {

   220

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

   221

		Blitter_32bppOptimized::DrawColorMappingRect(dst, width, height, pal);

   222

		return;

   223

	}

   224

   225

	uint32 *udst = (uint32 *)dst;

   226

	uint8 *anim;

   227

   228

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

   229

   230

	if (pal == PALETTE_TO_TRANSPARENT) {

   231

		do {

   232

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

   233

				*udst = MakeTransparent(*udst, 154);

   234

				*anim = 0;

   235

				udst++;

   236

				anim++;

   237

			}

   238

			udst = udst - width + _screen.pitch;

   239

			anim = anim - width + this->anim_buf_width;

   240

		} while (--height);

   241

		return;

   242

	}

   243

	if (pal == PALETTE_TO_STRUCT_GREY) {

   244

		do {

   245

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

   246

				*udst = MakeGrey(*udst);

   247

				*anim = 0;

   248

				udst++;

   249

				anim++;

   250

			}

   251

			udst = udst - width + _screen.pitch;

   252

			anim = anim - width + this->anim_buf_width;

   253

		} while (--height);

   254

		return;

   255

	}

   256

   257

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

   258

}

   259

   260

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

   261

{

   262

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

   263

   264

	/* Set the color in the anim-buffer too, if we are rendering to the screen */

   265

	if (_screen_disable_anim) return;

   266

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

   267

}

   268

   269

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

   270

{

   271

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

   272

	if (*dst == 0) {

   273

		*dst = LookupColourInPalette(color);

   274

		/* Set the color in the anim-buffer too, if we are rendering to the screen */

   275

		if (_screen_disable_anim) return;

   276

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

   277

	}

   278

}

   279

   280

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

   281

{

   282

	if (_screen_disable_anim) {

   283

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

   284

		Blitter_32bppOptimized::DrawRect(video, width, height, color);

   285

		return;

   286

	}

   287

   288

	uint32 color32 = LookupColourInPalette(color);

   289

	uint8 *anim_line;

   290

   291

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

   292

   293

	do {

   294

		uint32 *dst = (uint32 *)video;

   295

		uint8 *anim = anim_line;

   296

   297

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

   298

			*dst = color32;

   299

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

   300

			*anim = color;

   301

			dst++;

   302

			anim++;

   303

		}

   304

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

   305

		anim_line += this->anim_buf_width;

   306

	} while (--height);

   307

}

   308

   309

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

   310

{

   311

	assert(!_screen_disable_anim);

   312

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

   313

	uint32 *dst = (uint32 *)video;

   314

	uint32 *usrc = (uint32 *)src;

   315

	uint8 *anim_line;

   316

   317

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

   318

   319

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

   320

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

   321

		usrc += width;

   322

		dst += _screen.pitch;

   323

		/* Copy back the anim-buffer */

   324

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

   325

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

   326

		anim_line += this->anim_buf_width;

   327

	}

   328

   329

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

   330

	this->PaletteAnimate(PALETTE_ANIM_SIZE_START, (_use_palette == PAL_DOS) ? PALETTE_ANIM_SIZE_DOS : PALETTE_ANIM_SIZE_WIN);

   331

}

   332

   333

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

   334

{

   335

	assert(!_screen_disable_anim);

   336

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

   337

	uint32 *udst = (uint32 *)dst;

   338

	uint32 *src = (uint32 *)video;

   339

	uint8 *anim_line;

   340

   341

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

   342

   343

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

   344

   345

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

   346

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

   347

		src += _screen.pitch;

   348

		udst += width;

   349

		/* Copy the anim-buffer */

   350

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

   351

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

   352

		anim_line += this->anim_buf_width;

   353

	}

   354

}

   355

   356

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

   357

{

   358

	assert(!_screen_disable_anim);

   359

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

   360

	uint8 *dst, *src;

   361

   362

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

   363

	if (scroll_y > 0) {

   364

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

   365

		src = dst - scroll_y * this->anim_buf_width;

   366

   367

		/* Adjust left & width */

   368

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

   369

		else               src -= scroll_x;

   370

   371

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

   372

		uint th = height - scroll_y;

   373

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

   374

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

   375

			src -= this->anim_buf_width;

   376

			dst -= this->anim_buf_width;

   377

		}

   378

	} else {

   379

		/* Calculate pointers */

   380

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

   381

		src = dst - scroll_y * this->anim_buf_width;

   382

   383

		/* Adjust left & width */

   384

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

   385

		else               src -= scroll_x;

   386

   387

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

   388

		 * because source and destination may overlap */

   389

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

   390

		uint th = height + scroll_y;

   391

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

   392

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

   393

			src += this->anim_buf_width;

   394

			dst += this->anim_buf_width;

   395

		}

   396

	}

   397

   398

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

   399

}

   400

   401

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

   402

{

   403

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

   404

}

   405

   406

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

   407

{

   408

	assert(!_screen_disable_anim);

   409

   410

	/* Never repaint the transparency pixel */

   411

	if (start == 0) {

   412

		start++;

   413

		count--;

   414

	}

   415

   416

	const uint8 *anim = this->anim_buf;

   417

	uint32 *dst = (uint32 *)_screen.dst_ptr;

   418

   419

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

   420

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

   421

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

   422

			uint colour = *anim;

   423

			if (IsInsideBS(colour, start, count)) {

   424

				/* Update this pixel */

   425

				*dst = LookupColourInPalette(colour);

   426

			}

   427

			dst++;

   428

			anim++;

   429

		}

   430

		dst += _screen.pitch - this->anim_buf_width;

   431

	}

   432

   433

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

   434

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

   435

}

   436

   437

Blitter::PaletteAnimation Blitter_32bppAnim::UsePaletteAnimation()

   438

{

   439

	return Blitter::PALETTE_ANIMATION_BLITTER;

   440

}