project64/Source/Glide64/MiClWr32b.h

251 lines
7.6 KiB
C
Raw Normal View History

2013-04-04 21:22:19 +00:00
/*
* Glide64 - Glide video plugin for Nintendo 64 emulators.
* Copyright (c) 2002 Dave2001
* Copyright (c) 2003-2009 Sergey 'Gonetz' Lipski
*
* This program is free software; you can redistribute it and/or modify
* it under the terms of the GNU General Public License as published by
* the Free Software Foundation; either version 2 of the License, or
* any later version.
*
* This program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
* GNU General Public License for more details.
*
* You should have received a copy of the GNU General Public License
* along with this program; if not, write to the Free Software
* Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
*/
//****************************************************************
//
// Glide64 - Glide Plugin for Nintendo 64 emulators
// Project started on December 29th, 2001
//
// Authors:
// Dave2001, original author, founded the project in 2001, left it in 2002
// Gugaman, joined the project in 2002, left it in 2002
// Sergey 'Gonetz' Lipski, joined the project in 2002, main author since fall of 2002
// Hiroshi 'KoolSmoky' Morii, joined the project in 2007
//
//****************************************************************
//
// To modify Glide64:
// * Write your name and (optional)email, commented by your work, so I know who did it, and so that you can find which parts you modified when it comes time to send it to me.
// * Do NOT send me the whole project or file that you modified. Take out your modified code sections, and tell me where to put them. If people sent the whole thing, I would have many different versions, but no idea how to combine them all.
//
//****************************************************************
//
// Created by Gonetz, 2007
//
//****************************************************************
2016-01-28 20:00:13 +00:00
#include <string.h>
static inline void mirror32bS(uint8_t *tex, uint8_t *start, int width, int height, int mask, int line, int full, int count)
{
2016-01-25 11:26:42 +00:00
uint32_t *v8;
int v9;
int v10;
v8 = (uint32_t *)start;
v9 = height;
do
{
2016-01-25 11:26:42 +00:00
v10 = 0;
do
{
if (width & (v10 + width))
{
*v8 = *(uint32_t *)(&tex[mask] - (mask & 4 * v10));
++v8;
}
else
{
*v8 = *(uint32_t *)&tex[mask & 4 * v10];
++v8;
}
++v10;
} while (v10 != count);
v8 = (uint32_t *)((char *)v8 + line);
tex += full;
--v9;
} while (v9);
}
static inline void wrap32bS(uint8_t *tex, uint8_t *start, int height, int mask, int line, int full, int count)
{
2016-01-25 11:26:42 +00:00
uint32_t *v7;
int v8;
int v9;
v7 = (uint32_t *)start;
v8 = height;
do
{
2016-01-25 11:26:42 +00:00
v9 = 0;
do
{
*v7 = *(uint32_t *)&tex[4 * (mask & v9)];
++v7;
++v9;
} while (v9 != count);
v7 = (uint32_t *)((char *)v7 + line);
tex += full;
--v8;
} while (v8);
}
static inline void clamp32bS(uint8_t *tex, uint8_t *constant, int height, int line, int full, int count)
{
2016-01-25 11:26:42 +00:00
uint32_t *v6;
uint32_t *v7;
int v8;
uint32_t v9;
int v10;
v6 = (uint32_t *)constant;
v7 = (uint32_t *)tex;
v8 = height;
do
{
2016-01-25 11:26:42 +00:00
v9 = *v6;
v10 = count;
do
{
*v7 = v9;
++v7;
--v10;
} while (v10);
v6 = (uint32_t *)((char *)v6 + full);
v7 = (uint32_t *)((char *)v7 + line);
--v8;
} while (v8);
}
2013-04-04 21:22:19 +00:00
//****************************************************************
// 32-bit Horizontal Mirror
2016-01-25 11:26:42 +00:00
void Mirror32bS(unsigned char * tex, uint32_t mask, uint32_t max_width, uint32_t real_width, uint32_t height)
2013-04-04 21:22:19 +00:00
{
2016-01-25 11:26:42 +00:00
if (mask == 0) return;
uint32_t mask_width = (1 << mask);
uint32_t mask_mask = (mask_width - 1) << 2;
if (mask_width >= max_width) return;
int count = max_width - mask_width;
if (count <= 0) return;
int line_full = real_width << 2;
int line = line_full - (count << 2);
if (line < 0) return;
unsigned char * start = tex + (mask_width << 2);
mirror32bS(tex, start, mask_width, height, mask_mask, line, line_full, count);
2013-04-04 21:22:19 +00:00
}
//****************************************************************
2016-01-25 11:26:42 +00:00
// 32-bit Horizontal Wrap
2013-04-04 21:22:19 +00:00
2016-01-25 11:26:42 +00:00
void Wrap32bS(unsigned char * tex, uint32_t mask, uint32_t max_width, uint32_t real_width, uint32_t height)
2013-04-04 21:22:19 +00:00
{
2016-01-25 11:26:42 +00:00
if (mask == 0) return;
uint32_t mask_width = (1 << mask);
uint32_t mask_mask = (mask_width - 1);
if (mask_width >= max_width) return;
int count = (max_width - mask_width);
if (count <= 0) return;
int line_full = real_width << 2;
int line = line_full - (count << 2);
if (line < 0) return;
unsigned char * start = tex + (mask_width << 2);
wrap32bS(tex, start, height, mask_mask, line, line_full, count);
2013-04-04 21:22:19 +00:00
}
//****************************************************************
// 32-bit Horizontal Clamp
2016-01-25 11:26:42 +00:00
void Clamp32bS(unsigned char * tex, uint32_t width, uint32_t clamp_to, uint32_t real_width, uint32_t real_height)
2013-04-04 21:22:19 +00:00
{
2016-01-25 11:26:42 +00:00
if (real_width <= width) return;
unsigned char *dest = tex + (width << 2);
unsigned char *constant = dest - 4;
int count = clamp_to - width;
int line_full = real_width << 2;
int line = width << 2;
clamp32bS(dest, constant, real_height, line, line_full, count);
2013-04-04 21:22:19 +00:00
}
//****************************************************************
// 32-bit Vertical Mirror
2016-01-25 11:26:42 +00:00
void Mirror32bT(unsigned char * tex, uint32_t mask, uint32_t max_height, uint32_t real_width)
2013-04-04 21:22:19 +00:00
{
2016-01-25 11:26:42 +00:00
if (mask == 0) return;
uint32_t mask_height = (1 << mask);
uint32_t mask_mask = mask_height - 1;
if (max_height <= mask_height) return;
int line_full = real_width << 2;
unsigned char *dst = tex + mask_height * line_full;
for (uint32_t y = mask_height; y < max_height; y++)
{
if (y & mask_height)
{
// mirrored
memcpy((void*)dst, (void*)(tex + (mask_mask - (y & mask_mask)) * line_full), line_full);
}
else
{
// not mirrored
memcpy((void*)dst, (void*)(tex + (y & mask_mask) * line_full), line_full);
}
dst += line_full;
}
2013-04-04 21:22:19 +00:00
}
//****************************************************************
// 32-bit Vertical Wrap
2016-01-25 11:26:42 +00:00
void Wrap32bT(unsigned char * tex, uint32_t mask, uint32_t max_height, uint32_t real_width)
2013-04-04 21:22:19 +00:00
{
2016-01-25 11:26:42 +00:00
if (mask == 0) return;
2013-04-04 21:22:19 +00:00
2016-01-25 11:26:42 +00:00
uint32_t mask_height = (1 << mask);
uint32_t mask_mask = mask_height - 1;
if (max_height <= mask_height) return;
int line_full = real_width << 2;
2013-04-04 21:22:19 +00:00
2016-01-25 11:26:42 +00:00
unsigned char *dst = tex + mask_height * line_full;
2013-04-04 21:22:19 +00:00
2016-01-25 11:26:42 +00:00
for (uint32_t y = mask_height; y < max_height; y++)
{
// not mirrored
memcpy((void*)dst, (void*)(tex + (y & mask_mask) * (line_full >> 2)), (line_full >> 2));
2013-04-04 21:22:19 +00:00
2016-01-25 11:26:42 +00:00
dst += line_full;
}
2013-04-04 21:22:19 +00:00
}
//****************************************************************
// 32-bit Vertical Clamp
2016-01-25 11:26:42 +00:00
void Clamp32bT(unsigned char * tex, uint32_t height, uint32_t real_width, uint32_t clamp_to)
2013-04-04 21:22:19 +00:00
{
2016-01-25 11:26:42 +00:00
int line_full = real_width << 2;
unsigned char *dst = tex + height * line_full;
unsigned char *const_line = dst - line_full;
for (uint32_t y = height; y < clamp_to; y++)
{
memcpy((void*)dst, (void*)const_line, line_full);
dst += line_full;
}
2013-04-04 21:22:19 +00:00
}