1

/* $Id$ */

     2

     3

/** @file 32bpp_optimized.cpp Implementation of the optimized 32 bpp blitter. */

     4

     5

#include "../stdafx.h"

     6

#include "../zoom_func.h"

     7

#include "../gfx_func.h"

     8

#include "../debug.h"

     9

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

    10

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

    11

#include "32bpp_optimized.hpp"

    12

    13

static FBlitter_32bppOptimized iFBlitter_32bppOptimized;

    14

    15

/**

    16

 * Draws a sprite to a (screen) buffer. It is templated to allow faster operation.

    17

 *

    18

 * @param mode blitter mode

    19

 * @param bp further blitting parameters

    20

 * @param zoom zoom level at which we are drawing

    21

 */

    22

template <BlitterMode mode>

    23

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

    24

{

    25

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

    26

    27

	/* src_px : each line begins with uint32 n = 'number of bytes in this line',

    28

	 *          then n times is the Colour struct for this line */

    29

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

    30

	/* src_n  : each line begins with uint32 n = 'number of bytes in this line',

    31

	 *          then interleaved stream of 'm' and 'n' channels. 'm' is remap,

    32

	 *          'n' is number of bytes with the same alpha channel class */

    33

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

    34

    35

	/* skip upper lines in src_px and src_n */

    36

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

    37

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

    38

		src_n += *(uint32 *)src_n;

    39

	}

    40

    41

	/* skip lines in dst */

    42

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

    43

    44

	/* store so we don't have to access it via bp everytime (compiler assumes pointer aliasing) */

    45

	const byte *remap = bp->remap;

    46

    47

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

    48

		/* next dst line begins here */

    49

		uint32 *dst_ln = dst + bp->pitch;

    50

    51

		/* next src line begins here */

    52

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

    53

		src_px++;

    54

    55

		/* next src_n line begins here */

    56

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

    57

		src_n += 4;

    58

    59

		/* we will end this line when we reach this point */

    60

		uint32 *dst_end = dst + bp->skip_left;

    61

    62

		/* number of pixels with the same aplha channel class */

    63

		uint n;

    64

    65

		while (dst < dst_end) {

    66

			n = *src_n++;

    67

    68

			if (src_px->a == 0) {

    69

				dst += n;

    70

				src_px ++;

    71

				src_n++;

    72

			} else {

    73

				if (dst + n > dst_end) {

    74

					uint d = dst_end - dst;

    75

					src_px += d;

    76

					src_n += d;

    77

    78

					dst = dst_end - bp->skip_left;

    79

					dst_end = dst + bp->width;

    80

    81

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

    82

					goto draw;

    83

				}

    84

				dst += n;

    85

				src_px += n;

    86

				src_n += n;

    87

			}

    88

		}

    89

    90

		dst -= bp->skip_left;

    91

		dst_end -= bp->skip_left;

    92

    93

		dst_end += bp->width;

    94

    95

		while (dst < dst_end) {

    96

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

    97

    98

			if (src_px->a == 0) {

    99

				dst += n;

   100

				src_px++;

   101

				src_n++;

   102

				continue;

   103

			}

   104

   105

			draw:;

   106

   107

			switch (mode) {

   108

				case BM_COLOUR_REMAP:

   109

					if (src_px->a == 255) {

   110

						do {

   111

							uint m = *src_n;

   112

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

   113

							if (m == 0) {

   114

								*dst = *src_px;

   115

							} else {

   116

								uint r = remap[m];

   117

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

   118

							}

   119

							dst++;

   120

							src_px++;

   121

							src_n++;

   122

						} while (--n != 0);

   123

					} else {

   124

						do {

   125

							uint m = *src_n;

   126

							if (m == 0) {

   127

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

   128

							} else {

   129

								uint r = remap[m];

   130

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

   131

							}

   132

							dst++;

   133

							src_px++;

   134

							src_n++;

   135

						} while (--n != 0);

   136

					}

   137

					break;

   138

   139

				case BM_TRANSPARENT:

   140

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

   141

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

   142

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

   143

   144

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

   145

					src_n += n;

   146

					if (src_px->a == 255) {

   147

						src_px += n;

   148

						do {

   149

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

   150

							dst++;

   151

						} while (--n != 0);

   152

					} else {

   153

						do {

   154

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

   155

							dst++;

   156

							src_px++;

   157

						} while (--n != 0);

   158

					}

   159

					break;

   160

   161

				default:

   162

					if (src_px->a == 255) {

   163

						/* faster than memcpy(), n is usually low */

   164

						src_n += n;

   165

						do {

   166

							*dst++ = *src_px++;

   167

						} while (--n != 0);

   168

					} else {

   169

						src_n += n;

   170

						do {

   171

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

   172

							dst++;

   173

							src_px++;

   174

						} while (--n != 0);

   175

					}

   176

					break;

   177

			}

   178

		}

   179

   180

		dst = dst_ln;

   181

		src_px = src_px_ln;

   182

		src_n  = src_n_ln;

   183

	}

   184

}

   185

   186

/**

   187

 * Draws a sprite to a (screen) buffer. Calls adequate templated function.

   188

 *

   189

 * @param bp further blitting parameters

   190

 * @param mode blitter mode

   191

 * @param zoom zoom level at which we are drawing

   192

 */

   193

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

   194

{

   195

	switch (mode) {

   196

		default: NOT_REACHED();

   197

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

   198

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

   199

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

   200

	}

   201

}

   202

   203

/**

   204

 * Resizes the sprite in a very simple way, takes every n-th pixel and every n-th row

   205

 *

   206

 * @param sprite_src sprite to resize

   207

 * @param zoom resizing scale

   208

 * @return resized sprite

   209

 */

   210

static const SpriteLoader::Sprite *ResizeSprite(const SpriteLoader::Sprite *sprite_src, ZoomLevel zoom)

   211

{

   212

	SpriteLoader::Sprite *sprite = MallocT<SpriteLoader::Sprite>(1);

   213

   214

	if (zoom == ZOOM_LVL_NORMAL) {

   215

		memcpy(sprite, sprite_src, sizeof(*sprite));

   216

		uint size = sprite_src->height * sprite_src->width;

   217

		sprite->data = MallocT<SpriteLoader::CommonPixel>(size);

   218

		memcpy(sprite->data, sprite_src->data, size * sizeof(SpriteLoader::CommonPixel));

   219

		return sprite;

   220

	}

   221

   222

	sprite->height = UnScaleByZoom(sprite_src->height, zoom);

   223

	sprite->width  = UnScaleByZoom(sprite_src->width,  zoom);

   224

	sprite->x_offs = UnScaleByZoom(sprite_src->x_offs, zoom);

   225

	sprite->y_offs = UnScaleByZoom(sprite_src->y_offs, zoom);

   226

   227

	uint size = sprite->height * sprite->width;

   228

	SpriteLoader::CommonPixel *dst = sprite->data = CallocT<SpriteLoader::CommonPixel>(size);

   229

   230

	const SpriteLoader::CommonPixel *src = (SpriteLoader::CommonPixel *)sprite_src->data;

   231

	const SpriteLoader::CommonPixel *src_end = src + sprite_src->height * sprite_src->width;

   232

   233

	uint scaled_1 = ScaleByZoom(1, zoom);

   234

   235

	for (uint y = 0; y < sprite->height; y++) {

   236

		if (src >= src_end) src = src_end - sprite_src->width;

   237

   238

		const SpriteLoader::CommonPixel *src_ln = src + sprite_src->width * scaled_1;

   239

		for (uint x = 0; x < sprite->width; x++) {

   240

			if (src >= src_ln) src = src_ln - 1;

   241

			*dst = *src;

   242

			dst++;

   243

			src += scaled_1;

   244

		}

   245

   246

		src = src_ln;

   247

	}

   248

   249

	return sprite;

   250

}

   251

   252

Sprite *Blitter_32bppOptimized::Encode(SpriteLoader::Sprite *sprite, Blitter::AllocatorProc *allocator)

   253

{

   254

	/* streams of pixels (a, r, g, b channels)

   255

	 *

   256

	 * stored in separated stream so data are always aligned on 4B boundary */

   257

	Colour *dst_px_orig[ZOOM_LVL_COUNT];

   258

   259

	/* interleaved stream of 'm' channel and 'n' channel

   260

	 * 'n' is number if following pixels with the same alpha channel class

   261

	 * there are 3 classes: 0, 255, others

   262

	 *

   263

	 * it has to be stored in one stream so fewer registers are used -

   264

	 * x86 has problems with register allocation even with this solution */

   265

	uint8  *dst_n_orig[ZOOM_LVL_COUNT];

   266

   267

	/* lengths of streams */

   268

	uint32 lengths[ZOOM_LVL_COUNT][2];

   269

   270

	for (ZoomLevel z = ZOOM_LVL_BEGIN; z < ZOOM_LVL_END; z++) {

   271

		const SpriteLoader::Sprite *src_orig = ResizeSprite(sprite, z);

   272

   273

		uint size = src_orig->height * src_orig->width;

   274

   275

		dst_px_orig[z] = CallocT<Colour>(size + src_orig->height * 2);

   276

		dst_n_orig[z]  = CallocT<uint8>(size * 2 + src_orig->height * 4 * 2);

   277

   278

		uint32 *dst_px_ln = (uint32 *)dst_px_orig[z];

   279

		uint32 *dst_n_ln  = (uint32 *)dst_n_orig[z];

   280

   281

		const SpriteLoader::CommonPixel *src = (const SpriteLoader::CommonPixel *)src_orig->data;

   282

   283

		for (uint y = src_orig->height; y > 0; y--) {

   284

			Colour *dst_px = (Colour *)(dst_px_ln + 1);

   285

			uint8 *dst_n = (uint8 *)(dst_n_ln + 1);

   286

   287

			uint8 *dst_len = dst_n++;

   288

   289

			uint last = 3;

   290

			int len = 0;

   291

   292

			for (uint x = src_orig->width; x > 0; x--) {

   293

				uint8 a = src->a;

   294

				uint t = a > 0 && a < 255 ? 1 : a;

   295

   296

				if (last != t || len == 255) {

   297

					if (last != 3) {

   298

						*dst_len = len;

   299

						dst_len = dst_n++;

   300

					}

   301

					len = 0;

   302

				}

   303

   304

				last = t;

   305

				len++;

   306

   307

				if (a != 0) {

   308

					dst_px->a = a;

   309

					*dst_n = src->m;

   310

					if (src->m != 0) {

   311

						/* Pre-convert the mapping channel to a RGB value */

   312

						uint32 colour = this->LookupColourInPalette(src->m);

   313

						dst_px->r = GB(colour, 16, 8);

   314

						dst_px->g = GB(colour, 8,  8);

   315

						dst_px->b = GB(colour, 0,  8);

   316

					} else {

   317

						dst_px->r = src->r;

   318

						dst_px->g = src->g;

   319

						dst_px->b = src->b;

   320

					}

   321

					dst_px++;

   322

					dst_n++;

   323

				} else if (len == 1) {

   324

					dst_px++;

   325

					*dst_n = src->m;

   326

					dst_n++;

   327

				}

   328

   329

				src++;

   330

			}

   331

   332

			if (last != 3) {

   333

				*dst_len = len;

   334

			}

   335

   336

			dst_px = (Colour *)AlignPtr(dst_px, 4);

   337

			dst_n  = (uint8 *)AlignPtr(dst_n, 4);

   338

   339

			*dst_px_ln = (uint8 *)dst_px - (uint8 *)dst_px_ln;

   340

			*dst_n_ln  = (uint8 *)dst_n  - (uint8 *)dst_n_ln;

   341

   342

			dst_px_ln = (uint32 *)dst_px;

   343

			dst_n_ln =  (uint32 *)dst_n;

   344

		}

   345

   346

		lengths[z][0] = (byte *)dst_px_ln - (byte *)dst_px_orig[z]; // all are aligned to 4B boundary

   347

		lengths[z][1] = (byte *)dst_n_ln  - (byte *)dst_n_orig[z];

   348

   349

		free(src_orig->data);

   350

		free((void *)src_orig);

   351

	}

   352

   353

	uint len = 0; // total length of data

   354

	for (ZoomLevel z = ZOOM_LVL_BEGIN; z < ZOOM_LVL_END; z++) {

   355

		len += lengths[z][0] + lengths[z][1];

   356

	}

   357

   358

	Sprite *dest_sprite = (Sprite *)allocator(sizeof(*dest_sprite) + sizeof(SpriteData) + len);

   359

   360

	dest_sprite->height = sprite->height;

   361

	dest_sprite->width  = sprite->width;

   362

	dest_sprite->x_offs = sprite->x_offs;

   363

	dest_sprite->y_offs = sprite->y_offs;

   364

   365

	SpriteData *dst = (SpriteData *)dest_sprite->data;

   366

   367

	for (ZoomLevel z = ZOOM_LVL_BEGIN; z < ZOOM_LVL_END; z++) {

   368

		dst->offset[z][0] = z == ZOOM_LVL_BEGIN ? 0 : lengths[z - 1][1] + dst->offset[z - 1][1];

   369

		dst->offset[z][1] = lengths[z][0] + dst->offset[z][0];

   370

   371

		memcpy(dst->data + dst->offset[z][0], dst_px_orig[z], lengths[z][0]);

   372

		memcpy(dst->data + dst->offset[z][1], dst_n_orig[z],  lengths[z][1]);

   373

   374

		free(dst_px_orig[z]);

   375

		free(dst_n_orig[z]);

   376

	}

   377

   378

	return dest_sprite;

   379

}