smatz@8587: /* $Id$ */
smatz@8587: 
truelight@7467: #include "../stdafx.h"
rubidium@8626: #include "../core/alloc_func.hpp"
rubidium@8619: #include "../gfx_func.h"
rubidium@8619: #include "../zoom_func.h"
truelight@7467: #include "../debug.h"
truelight@7467: #include "../table/sprites.h"
peter1138@7666: #include "../video/video_driver.hpp"
truelight@7467: #include "32bpp_anim.hpp"
truelight@7467: 
truelight@7467: static FBlitter_32bppAnim iFBlitter_32bppAnim;
truelight@7467: 
truelight@7467: void Blitter_32bppAnim::Draw(Blitter::BlitterParams *bp, BlitterMode mode, ZoomLevel zoom)
truelight@7467: {
truelight@8052: 	if (bp->dst < _screen.dst_ptr || bp->dst > (uint32 *)_screen.dst_ptr + _screen.width * _screen.height) {
truelight@8052: 		/* This means our output is not to the screen, so we can't be doing any animation stuff, so use our parent Draw() */
truelight@8052: 		Blitter_32bppOptimized::Draw(bp, mode, zoom);
truelight@8052: 		return;
truelight@8052: 	}
truelight@8053: 
truelight@7467: 	const SpriteLoader::CommonPixel *src, *src_line;
truelight@7467: 	uint32 *dst, *dst_line;
truelight@8052: 	uint8 *anim, *anim_line;
truelight@7467: 
truelight@7467: 	if (_screen.width != this->anim_buf_width || _screen.height != this->anim_buf_height) {
truelight@7467: 		/* The size of the screen changed; we can assume we can wipe all data from our buffer */
truelight@7467: 		free(this->anim_buf);
truelight@7467: 		this->anim_buf = CallocT<uint8>(_screen.width * _screen.height);
truelight@7467: 		this->anim_buf_width = _screen.width;
truelight@7467: 		this->anim_buf_height = _screen.height;
truelight@7467: 	}
truelight@7467: 
truelight@7467: 	/* Find where to start reading in the source sprite */
truelight@7467: 	src_line = (const SpriteLoader::CommonPixel *)bp->sprite + (bp->skip_top * bp->sprite_width + bp->skip_left) * ScaleByZoom(1, zoom);
truelight@7467: 	dst_line = (uint32 *)bp->dst + bp->top * bp->pitch + bp->left;
truelight@7467: 	anim_line = this->anim_buf + ((uint32 *)bp->dst - (uint32 *)_screen.dst_ptr) + bp->top * this->anim_buf_width + bp->left;
truelight@7467: 
truelight@7467: 	for (int y = 0; y < bp->height; y++) {
truelight@7467: 		dst = dst_line;
truelight@7467: 		dst_line += bp->pitch;
truelight@7467: 
truelight@7467: 		src = src_line;
truelight@7467: 		src_line += bp->sprite_width * ScaleByZoom(1, zoom);
truelight@7467: 
truelight@7467: 		anim = anim_line;
truelight@7467: 		anim_line += this->anim_buf_width;
truelight@7467: 
truelight@7467: 		for (int x = 0; x < bp->width; x++) {
truelight@8049: 			if (src->a == 0) {
truelight@8049: 				/* src->r is 'misused' here to indicate how much more pixels are following with an alpha of 0 */
truelight@8049: 				int skip = UnScaleByZoom(src->r, zoom);
truelight@8049: 
truelight@8049: 				dst  += skip;
truelight@8052: 				anim += skip;
truelight@8049: 				x    += skip - 1;
truelight@8049: 				src  += ScaleByZoom(1, zoom) * skip;
truelight@8049: 				continue;
truelight@8049: 			}
truelight@8049: 
truelight@7467: 			switch (mode) {
truelight@7467: 				case BM_COLOUR_REMAP:
truelight@7467: 					/* In case the m-channel is zero, do not remap this pixel in any way */
truelight@7467: 					if (src->m == 0) {
truelight@8049: 						*dst = ComposeColourRGBA(src->r, src->g, src->b, src->a, *dst);
truelight@8051: 						*anim = 0;
truelight@7467: 					} else {
truelight@7467: 						if (bp->remap[src->m] != 0) {
truelight@7467: 							*dst = ComposeColourPA(this->LookupColourInPalette(bp->remap[src->m]), src->a, *dst);
truelight@8051: 							*anim = bp->remap[src->m];
truelight@7467: 						}
truelight@7467: 					}
truelight@7467: 					break;
truelight@7467: 
truelight@7467: 				case BM_TRANSPARENT:
truelight@7467: 					/* TODO -- We make an assumption here that the remap in fact is transparency, not some color.
truelight@7467: 					 *  This is never a problem with the code we produce, but newgrfs can make it fail... or at least:
truelight@7467: 					 *  we produce a result the newgrf maker didn't expect ;) */
truelight@7467: 
truelight@7467: 					/* Make the current color a bit more black, so it looks like this image is transparent */
truelight@8049: 					*dst = MakeTransparent(*dst, 192);
truelight@8051: 					*anim = bp->remap[*anim];
truelight@7467: 					break;
truelight@7467: 
truelight@7467: 				default:
truelight@8049: 					/* Above 217 is palette animation */
truelight@8049: 					if (src->m >= 217) *dst = ComposeColourPA(this->LookupColourInPalette(src->m), src->a, *dst);
truelight@8049: 					else               *dst = ComposeColourRGBA(src->r, src->g, src->b, src->a, *dst);
truelight@8051: 					*anim = src->m;
truelight@7467: 					break;
truelight@7467: 			}
truelight@7467: 			dst++;
truelight@8052: 			anim++;
truelight@7467: 			src += ScaleByZoom(1, zoom);
truelight@7467: 		}
truelight@7467: 	}
truelight@7467: }
truelight@7467: 
truelight@7481: void Blitter_32bppAnim::DrawColorMappingRect(void *dst, int width, int height, int pal)
truelight@7481: {
truelight@7481: 	uint32 *udst = (uint32 *)dst;
truelight@7481: 	uint8 *anim;
truelight@7481: 
truelight@7481: 	anim = this->anim_buf + ((uint32 *)dst - (uint32 *)_screen.dst_ptr);
truelight@7481: 
truelight@7481: 	if (pal == PALETTE_TO_TRANSPARENT) {
truelight@7481: 		do {
truelight@7481: 			for (int i = 0; i != width; i++) {
truelight@8048: 				*udst = MakeTransparent(*udst, 154);
truelight@7481: 				*anim = 0;
truelight@7481: 				udst++;
truelight@7481: 				anim++;
truelight@7481: 			}
truelight@7481: 			udst = udst - width + _screen.pitch;
truelight@7481: 			anim = anim - width + this->anim_buf_width;
truelight@7481: 		} while (--height);
truelight@7481: 		return;
truelight@7481: 	}
truelight@7481: 	if (pal == PALETTE_TO_STRUCT_GREY) {
truelight@7481: 		do {
truelight@7481: 			for (int i = 0; i != width; i++) {
truelight@7481: 				*udst = MakeGrey(*udst);
truelight@7481: 				*anim = 0;
truelight@7481: 				udst++;
truelight@7481: 				anim++;
truelight@7481: 			}
truelight@7481: 			udst = udst - width + _screen.pitch;
truelight@7481: 			anim = anim - width + this->anim_buf_width;
truelight@7481: 		} while (--height);
truelight@7481: 		return;
truelight@7481: 	}
truelight@7481: 
truelight@7481: 	DEBUG(misc, 0, "32bpp blitter doesn't know how to draw this color table ('%d')", pal);
truelight@7481: }
truelight@7481: 
truelight@7467: void Blitter_32bppAnim::SetPixel(void *video, int x, int y, uint8 color)
truelight@7467: {
truelight@7467: 	*((uint32 *)video + x + y * _screen.pitch) = LookupColourInPalette(color);
truelight@7467: 	/* Set the color in the anim-buffer too */
truelight@7467: 	this->anim_buf[((uint32 *)video - (uint32 *)_screen.dst_ptr) + x + y * this->anim_buf_width] = color;
truelight@7467: }
truelight@7467: 
truelight@7467: void Blitter_32bppAnim::SetPixelIfEmpty(void *video, int x, int y, uint8 color)
truelight@7467: {
truelight@7467: 	uint32 *dst = (uint32 *)video + x + y * _screen.pitch;
truelight@7467: 	if (*dst == 0) {
truelight@7467: 		*dst = LookupColourInPalette(color);
truelight@7467: 		/* Set the color in the anim-buffer too */
truelight@7467: 		this->anim_buf[((uint32 *)video - (uint32 *)_screen.dst_ptr) + x + y * this->anim_buf_width] = color;
truelight@7467: 	}
truelight@7467: }
truelight@7467: 
truelight@7467: void Blitter_32bppAnim::DrawRect(void *video, int width, int height, uint8 color)
truelight@7467: {
truelight@7467: 	uint32 color32 = LookupColourInPalette(color);
truelight@7467: 	uint8 *anim_line;
truelight@7467: 
truelight@7467: 	anim_line = ((uint32 *)video - (uint32 *)_screen.dst_ptr) + this->anim_buf;
truelight@7467: 
truelight@7467: 	do {
truelight@7467: 		uint32 *dst = (uint32 *)video;
truelight@7467: 		uint8 *anim = anim_line;
truelight@7467: 
truelight@7467: 		for (int i = width; i > 0; i--) {
truelight@7467: 			*dst = color32;
truelight@7467: 			/* Set the color in the anim-buffer too */
truelight@7467: 			*anim = color;
truelight@7467: 			dst++;
truelight@7467: 			anim++;
truelight@7467: 		}
truelight@7467: 		video = (uint32 *)video + _screen.pitch;
truelight@7467: 		anim_line += this->anim_buf_width;
truelight@7467: 	} while (--height);
truelight@7467: }
truelight@7467: 
truelight@7481: void Blitter_32bppAnim::CopyFromBuffer(void *video, const void *src, int width, int height)
truelight@7481: {
truelight@7481: 	assert(video >= _screen.dst_ptr && video <= (uint32 *)_screen.dst_ptr + _screen.width + _screen.height * _screen.pitch);
truelight@7481: 	uint32 *dst = (uint32 *)video;
truelight@7481: 	uint32 *usrc = (uint32 *)src;
truelight@7481: 	uint8 *anim_line;
truelight@7481: 
truelight@7481: 	anim_line = ((uint32 *)video - (uint32 *)_screen.dst_ptr) + this->anim_buf;
truelight@7481: 
truelight@7481: 	for (; height > 0; height--) {
truelight@7481: 		memcpy(dst, usrc, width * sizeof(uint32));
truelight@7481: 		usrc += width;
truelight@7481: 		dst += _screen.pitch;
truelight@7481: 		/* Copy back the anim-buffer */
truelight@7481: 		memcpy(anim_line, usrc, width * sizeof(uint8));
truelight@7481: 		usrc = (uint32 *)((uint8 *)usrc + width);
truelight@7481: 		anim_line += this->anim_buf_width;
truelight@7481: 	}
truelight@7481: 
truelight@7481: 	/* We update the palette (or the pixels that do animation) immediatly, to avoid graphical glitches */
truelight@7481: 	this->PaletteAnimate(217, _use_dos_palette ? 38 : 28);
truelight@7481: }
truelight@7481: 
truelight@7481: void Blitter_32bppAnim::CopyToBuffer(const void *video, void *dst, int width, int height)
truelight@7481: {
truelight@7481: 	assert(video >= _screen.dst_ptr && video <= (uint32 *)_screen.dst_ptr + _screen.width + _screen.height * _screen.pitch);
truelight@7481: 	uint32 *udst = (uint32 *)dst;
truelight@7481: 	uint32 *src = (uint32 *)video;
truelight@7481: 	uint8 *anim_line;
truelight@7481: 
truelight@7482: 	if (this->anim_buf == NULL) return;
truelight@7482: 
truelight@7481: 	anim_line = ((uint32 *)video - (uint32 *)_screen.dst_ptr) + this->anim_buf;
truelight@7481: 
truelight@7481: 	for (; height > 0; height--) {
truelight@7481: 		memcpy(udst, src, width * sizeof(uint32));
truelight@7481: 		src += _screen.pitch;
truelight@7481: 		udst += width;
truelight@7481: 		/* Copy the anim-buffer */
truelight@7481: 		memcpy(udst, anim_line, width * sizeof(uint8));
truelight@7481: 		udst = (uint32 *)((uint8 *)udst + width);
truelight@7481: 		anim_line += this->anim_buf_width;
truelight@7481: 	}
truelight@7481: }
truelight@7481: 
truelight@7467: void Blitter_32bppAnim::ScrollBuffer(void *video, int &left, int &top, int &width, int &height, int scroll_x, int scroll_y)
truelight@7467: {
truelight@7467: 	uint8 *dst, *src;
truelight@7467: 
truelight@7467: 	/* We need to scroll the anim-buffer too */
truelight@7467: 	if (scroll_y > 0) {
truelight@7467: 		dst = this->anim_buf + left + (top + height - 1) * this->anim_buf_width;
truelight@7467: 		src = dst - scroll_y * this->anim_buf_width;
truelight@7467: 
truelight@7467: 		/* Adjust left & width */
truelight@7467: 		if (scroll_x >= 0) dst += scroll_x;
truelight@7467: 		else               src -= scroll_x;
truelight@7467: 
truelight@7467: 		uint tw = width + (scroll_x >= 0 ? -scroll_x : scroll_x);
truelight@7467: 		uint th = height - scroll_y;
truelight@7467: 		for (; th > 0; th--) {
truelight@7467: 			memcpy(dst, src, tw * sizeof(uint8));
truelight@7467: 			src -= this->anim_buf_width;
truelight@7467: 			dst -= this->anim_buf_width;
truelight@7467: 		}
truelight@7467: 	} else {
truelight@7467: 		/* Calculate pointers */
truelight@7467: 		dst = this->anim_buf + left + top * this->anim_buf_width;
truelight@7467: 		src = dst - scroll_y * this->anim_buf_width;
truelight@7467: 
truelight@7467: 		/* Adjust left & width */
truelight@7467: 		if (scroll_x >= 0) dst += scroll_x;
truelight@7467: 		else               src -= scroll_x;
truelight@7467: 
truelight@7467: 		/* the y-displacement may be 0 therefore we have to use memmove,
truelight@7467: 		 * because source and destination may overlap */
truelight@7467: 		uint tw = width + (scroll_x >= 0 ? -scroll_x : scroll_x);
truelight@7467: 		uint th = height + scroll_y;
truelight@7467: 		for (; th > 0; th--) {
truelight@7467: 			memmove(dst, src, tw * sizeof(uint8));
truelight@7467: 			src += this->anim_buf_width;
truelight@7467: 			dst += this->anim_buf_width;
truelight@7467: 		}
truelight@7467: 	}
truelight@7467: 
truelight@7467: 	Blitter_32bppBase::ScrollBuffer(video, left, top, width, height, scroll_x, scroll_y);
truelight@7467: }
truelight@7467: 
truelight@7484: int Blitter_32bppAnim::BufferSize(int width, int height)
truelight@7484: {
truelight@7484: 	return width * height * (sizeof(uint32) + sizeof(uint8));
truelight@7484: }
truelight@7484: 
truelight@7467: void Blitter_32bppAnim::PaletteAnimate(uint start, uint count)
truelight@7467: {
truelight@7467: 	uint8 *anim = this->anim_buf;
truelight@7467: 
truelight@7475: 	/* Never repaint the transparency pixel */
truelight@7475: 	if (start == 0) start++;
truelight@7475: 
truelight@7467: 	/* Let's walk the anim buffer and try to find the pixels */
truelight@7467: 	for (int y = 0; y < this->anim_buf_height; y++) {
truelight@7467: 		for (int x = 0; x < this->anim_buf_width; x++) {
truelight@7467: 			if (*anim >= start && *anim <= start + count) {
truelight@7467: 				/* Update this pixel */
truelight@7467: 				this->SetPixel(_screen.dst_ptr, x, y, *anim);
truelight@7467: 			}
truelight@7467: 			anim++;
truelight@7467: 		}
truelight@7467: 	}
truelight@7467: 
truelight@7467: 	/* Make sure the backend redraws the whole screen */
peter1138@7666: 	_video_driver->MakeDirty(0, 0, _screen.width, _screen.height);
truelight@7467: }
truelight@7467: 
truelight@7467: Blitter::PaletteAnimation Blitter_32bppAnim::UsePaletteAnimation()
truelight@7467: {
truelight@7467: 	return Blitter::PALETTE_ANIMATION_BLITTER;
truelight@7467: }