bg.c

#include "config.h"

#ifdef ENABLE_BG

#include <stdlib.h>
#include <string.h>
#include "display.h"
#include "image.h"
#include "bg.h"

static pixel * bg_start = (pixel *)(0x44000000 + 512 * 272 * PIXEL_BYTES * 2);
static bool have_bg = false;
static dword imgwidth, imgheight;

extern void bg_load(const char * filename, pixel bgcolor, t_fs_filetype ft, dword grayscale)
{
	pixel * imgdata, * imgshow = NULL, * img_buf, * bg_buf, * bg_line, * bg_end, * bg_lineend;
	dword width, height, w2, h2, left, top;
	pixel bgc;
	int result;
	switch(ft)
	{
	case fs_filetype_png:
		result = image_readpng(filename, &width, &height, &imgdata, &bgc);
		break;
	case fs_filetype_gif:
		result = image_readgif(filename, &width, &height, &imgdata, &bgc);
		break;
	case fs_filetype_jpg:
		result = image_readjpg(filename, &width, &height, &imgdata, &bgc);
		break;
	case fs_filetype_tga:
		result = image_readtga(filename, &width, &height, &imgdata, &bgc);
		break;
	case fs_filetype_bmp:
		result = image_readbmp(filename, &width, &height, &imgdata, &bgc);
		break;
	default:
		result = -1;
	}
	if(result != 0)
		return;
	if(width > 480)
	{
		h2 = height * 480 / width;
		if(h2 > 272)
		{
			h2 = 272;
			w2 = width * 272 / height;
		}
		else
			w2 = 480;
	}
	else if(height > 272)
	{
		h2 = 272;
		w2 = width * 272 / height;
	}
	else
	{
		h2 = height;
		w2 = width;
	}
	if(width != w2 || height != h2)
	{
		imgshow = (pixel *)malloc(sizeof(pixel) * w2 * h2);
		if(imgshow == NULL)
		{
			free((void *)imgdata);
			return;
		}
		image_zoom_bicubic(imgdata, width, height, imgshow, w2, h2);
	}
	else
		imgshow = imgdata;

	if(w2 < 480)
		left = (480 - w2) / 2;
	else
		left = 0;
	if(h2 < 272)
		top = (272 - h2) / 2;
	else
		top = 0;

	for(bg_buf = bg_start, bg_end = bg_start + 0x22000; bg_buf < bg_end; bg_buf ++)
		* bg_buf = bgcolor;
	img_buf = imgshow;
	dword r = RGB_R(bgcolor), g = RGB_G(bgcolor), b = RGB_B(bgcolor);
	for(bg_buf = bg_start + top * 512 + left, bg_end = bg_buf + h2 * 512; bg_buf < bg_end; bg_buf += 512)
		for(bg_line = bg_buf, bg_lineend = bg_buf + w2; bg_line < bg_lineend; bg_line ++)
		{
			*bg_line = disp_grayscale(*img_buf, r, g, b, grayscale);
			img_buf ++;
		}

	have_bg = true;

	if(imgshow != imgdata)
		free((void *)imgshow);
	imgwidth = w2; imgheight = h2;
	free((void *)imgdata);
}

extern bool bg_display()
{
	if(have_bg)
	{
		memcpy(vram_start, bg_start, 512 * 272 * PIXEL_BYTES);
		return true;
	}
	return false;
}

extern void bg_cancel()
{
	have_bg = false;
}

static byte * _cache = NULL;

extern void bg_cache()
{
	if(!have_bg)
		return;
	if(_cache != NULL)
		free((void *)_cache);
	_cache = malloc(512 * 272 * PIXEL_BYTES);
	if(_cache == NULL)
		return;
	memcpy(_cache, bg_start, 512 * 272 * PIXEL_BYTES);
}

extern void bg_restore()
{
	if(!have_bg)
		return;
	if(_cache == NULL)
		return;
	memcpy(bg_start, _cache, 512 * 272 * PIXEL_BYTES);
	free((void *)_cache);
	_cache = NULL;
}

#endif