quakeforge/libs/video/renderer/sw32/draw.c
Bill Currie a05210d864 [video] Get 16 and 32 bit sw32 mostly working in x11
Lighting on alias models seems to be borked, and skies are borked in
both sw renderers (seems to be nothing to do with this commit, though).
2021-07-11 00:09:41 +09:00

1373 lines
30 KiB
C

/*
draw.c
this is the only file outside the refresh that touches the vid buffer
Copyright (C) 1996-1997 Id Software, Inc.
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 (at your option) 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:
Free Software Foundation, Inc.
59 Temple Place - Suite 330
Boston, MA 02111-1307, USA
*/
#ifdef HAVE_CONFIG_H
# include "config.h"
#endif
#define NH_DEFINE
#include "namehack.h"
#ifdef HAVE_STRING_H
# include <string.h>
#endif
#ifdef HAVE_STRINGS_H
# include <strings.h>
#endif
#include <stdlib.h>
#include "QF/cvar.h"
#include "QF/draw.h"
#include "QF/quakefs.h"
#include "QF/sound.h"
#include "QF/sys.h"
#include "QF/ui/view.h"
#include "d_iface.h"
#include "r_internal.h"
#include "vid_internal.h"
#include "vid_sw.h"
typedef struct {
vrect_t rect;
int width;
int height;
byte *ptexbytes;
int rowbytes;
} rectdesc_t;
static rectdesc_t r_rectdesc;
static qpic_t *draw_disc;
static qpic_t *draw_backtile;
/* Support Routines */
typedef struct cachepic_s {
char name[MAX_QPATH];
cache_user_t cache;
} cachepic_t;
#define MAX_CACHED_PICS 128
static cachepic_t cachepics[MAX_CACHED_PICS];
static int numcachepics;
#define CLIP(x,y,w,h,mw,mh) \
do { \
if (y < 0) { \
h += y; \
y = 0; \
} \
if (y + h > mh) \
h = mh - y; \
if (h <= 0) \
return; \
if (x < 0) { \
w += x; \
x = 0; \
} \
if (x + w > mw) \
w = mw - x; \
if (w <= 0) \
return; \
} while (0)
qpic_t *
sw32_Draw_MakePic (int width, int height, const byte *data)
{
qpic_t *pic;
int size = width * height;
pic = malloc (field_offset (qpic_t, data[size]));
pic->width = width;
pic->height = height;
memcpy (pic->data, data, size);
return pic;
}
void
sw32_Draw_DestroyPic (qpic_t *pic)
{
free (pic);
}
qpic_t *
sw32_Draw_PicFromWad (const char *name)
{
return W_GetLumpName (name);
}
qpic_t *
sw32_Draw_CachePic (const char *path, qboolean alpha)
{
cachepic_t *pic;
int i;
qpic_t *dat;
for (pic = cachepics, i = 0; i < numcachepics; pic++, i++)
if (!strcmp (path, pic->name))
break;
if (i == numcachepics) {
for (pic = cachepics, i = 0; i < numcachepics; pic++, i++)
if (!pic->name[0])
break;
if (i == numcachepics) {
if (numcachepics == MAX_CACHED_PICS)
Sys_Error ("numcachepics == MAX_CACHED_PICS");
numcachepics++;
}
strcpy (pic->name, path);
}
dat = Cache_Check (&pic->cache);
if (dat)
return dat;
// load the pic from disk
QFS_LoadCacheFile (QFS_FOpenFile (path), &pic->cache);
dat = (qpic_t *) pic->cache.data;
if (!dat) {
Sys_Error ("Draw_CachePic: failed to load %s", path);
}
SwapPic (dat);
return dat;
}
void
sw32_Draw_UncachePic (const char *path)
{
cachepic_t *pic;
int i;
for (pic = cachepics, i = 0; i < numcachepics; pic++, i++) {
if (!strcmp (path, pic->name)) {
Cache_Release (&pic->cache);
pic->name[0] = 0;
break;
}
}
}
void
sw32_Draw_TextBox (int x, int y, int width, int lines, byte alpha)
{
qpic_t *p;
int cx, cy;
int n;
// draw left side
cx = x;
cy = y;
p = sw32_Draw_CachePic ("gfx/box_tl.lmp", true);
sw32_Draw_Pic (cx, cy, p);
p = sw32_Draw_CachePic ("gfx/box_ml.lmp", true);
for (n = 0; n < lines; n++) {
cy += 8;
sw32_Draw_Pic (cx, cy, p);
}
p = sw32_Draw_CachePic ("gfx/box_bl.lmp", true);
sw32_Draw_Pic (cx, cy + 8, p);
// draw middle
cx += 8;
while (width > 0) {
cy = y;
p = sw32_Draw_CachePic ("gfx/box_tm.lmp", true);
sw32_Draw_Pic (cx, cy, p);
p = sw32_Draw_CachePic ("gfx/box_mm.lmp", true);
for (n = 0; n < lines; n++) {
cy += 8;
if (n == 1)
p = sw32_Draw_CachePic ("gfx/box_mm2.lmp", true);
sw32_Draw_Pic (cx, cy, p);
}
p = sw32_Draw_CachePic ("gfx/box_bm.lmp", true);
sw32_Draw_Pic (cx, cy + 8, p);
width -= 2;
cx += 16;
}
// draw right side
cy = y;
p = sw32_Draw_CachePic ("gfx/box_tr.lmp", true);
sw32_Draw_Pic (cx, cy, p);
p = sw32_Draw_CachePic ("gfx/box_mr.lmp", true);
for (n = 0; n < lines; n++) {
cy += 8;
sw32_Draw_Pic (cx, cy, p);
}
p = sw32_Draw_CachePic ("gfx/box_br.lmp", true);
sw32_Draw_Pic (cx, cy + 8, p);
}
void
sw32_Draw_Init (void)
{
draw_chars = W_GetLumpName ("conchars");
draw_disc = W_GetLumpName ("disc");
draw_backtile = W_GetLumpName ("backtile");
r_rectdesc.width = draw_backtile->width;
r_rectdesc.height = draw_backtile->height;
r_rectdesc.ptexbytes = draw_backtile->data;
r_rectdesc.rowbytes = draw_backtile->width;
}
/*
Draw_Character
Draws one 8*8 graphics character with 0 being transparent.
It can be clipped to the top of the screen to allow the console to be
smoothly scrolled off.
*/
void
sw32_Draw_Character (int x, int y, unsigned int chr)
{
byte *source;
int drawline;
int row, col;
chr &= 255;
if (y <= -8)
return; // totally off screen
if (y > vid.conview->ylen - 8 || x < 0 || x > vid.conview->xlen - 8)
return;
if (chr > 255)
return;
row = chr >> 4;
col = chr & 15;
source = draw_chars + (row << 10) + (col << 3);
if (y < 0) { // clipped
drawline = 8 + y;
source -= 128 * y;
y = 0;
} else
drawline = 8;
switch(sw32_ctx->pixbytes) {
case 1:
{
byte *dest = (byte *) vid.conbuffer + y * vid.conrowbytes + x;
while (drawline--) {
if (source[0])
dest[0] = source[0];
if (source[1])
dest[1] = source[1];
if (source[2])
dest[2] = source[2];
if (source[3])
dest[3] = source[3];
if (source[4])
dest[4] = source[4];
if (source[5])
dest[5] = source[5];
if (source[6])
dest[6] = source[6];
if (source[7])
dest[7] = source[7];
source += 128;
dest += vid.conrowbytes;
}
}
break;
case 2:
{
unsigned short *dest = (unsigned short *) vid.conbuffer + y *
(vid.conrowbytes >> 1) + x;
while (drawline--) {
if (source[0])
dest[0] = sw32_8to16table[source[0]];
if (source[1])
dest[1] = sw32_8to16table[source[1]];
if (source[2])
dest[2] = sw32_8to16table[source[2]];
if (source[3])
dest[3] = sw32_8to16table[source[3]];
if (source[4])
dest[4] = sw32_8to16table[source[4]];
if (source[5])
dest[5] = sw32_8to16table[source[5]];
if (source[6])
dest[6] = sw32_8to16table[source[6]];
if (source[7])
dest[7] = sw32_8to16table[source[7]];
source += 128;
dest += (vid.conrowbytes >> 1);
}
}
break;
case 4:
{
unsigned int *dest = (unsigned int *) vid.conbuffer + y *
(vid.conrowbytes >> 2) + x;
while (drawline--) {
if (source[0])
dest[0] = d_8to24table[source[0]];
if (source[1])
dest[1] = d_8to24table[source[1]];
if (source[2])
dest[2] = d_8to24table[source[2]];
if (source[3])
dest[3] = d_8to24table[source[3]];
if (source[4])
dest[4] = d_8to24table[source[4]];
if (source[5])
dest[5] = d_8to24table[source[5]];
if (source[6])
dest[6] = d_8to24table[source[6]];
if (source[7])
dest[7] = d_8to24table[source[7]];
source += 128;
dest += (vid.conrowbytes >> 2);
}
}
break;
default:
Sys_Error("Draw_Character: unsupported r_pixbytes %i", sw32_ctx->pixbytes);
}
}
void
sw32_Draw_String (int x, int y, const char *str)
{
while (*str) {
sw32_Draw_Character (x, y, *str++);
x += 8;
}
}
void
sw32_Draw_nString (int x, int y, const char *str, int count)
{
while (count-- && *str) {
sw32_Draw_Character (x, y, *str++);
x += 8;
}
}
void
sw32_Draw_AltString (int x, int y, const char *str)
{
while (*str) {
sw32_Draw_Character (x, y, (*str++) | 0x80);
x += 8;
}
}
static void
Draw_Pixel (int x, int y, byte color)
{
switch(sw32_ctx->pixbytes)
{
case 1:
((byte *) vid.conbuffer)[y * vid.conrowbytes + x] = color;
break;
case 2:
((unsigned short *) vid.conbuffer)[y * (vid.conrowbytes >> 1) + x] =
sw32_8to16table[color];
break;
case 4:
((unsigned int *) vid.conbuffer)[y * (vid.conrowbytes >> 2) + x] =
d_8to24table[color];
break;
default:
Sys_Error("Draw_Pixel: unsupported r_pixbytes %i", sw32_ctx->pixbytes);
}
}
static void
crosshair_1 (int x, int y)
{
sw32_Draw_Character (x - 4, y - 4, '+');
}
static void
crosshair_2 (int x, int y)
{
byte c = crosshaircolor->int_val;
Draw_Pixel (x - 1, y, c);
Draw_Pixel (x - 3, y, c);
Draw_Pixel (x + 1, y, c);
Draw_Pixel (x + 3, y, c);
Draw_Pixel (x, y - 1, c);
Draw_Pixel (x, y - 3, c);
Draw_Pixel (x, y + 1, c);
Draw_Pixel (x, y + 3, c);
}
static void
crosshair_3 (int x, int y)
{
byte c = crosshaircolor->int_val;
Draw_Pixel (x - 3, y - 3, c);
Draw_Pixel (x + 3, y - 3, c);
Draw_Pixel (x - 2, y - 2, c);
Draw_Pixel (x + 2, y - 2, c);
Draw_Pixel (x - 3, y + 3, c);
Draw_Pixel (x + 2, y + 2, c);
Draw_Pixel (x - 2, y + 2, c);
Draw_Pixel (x + 3, y + 3, c);
}
static void
crosshair_4 (int x, int y)
{
//byte c = crosshaircolor->int_val;
Draw_Pixel (x, y - 2, 8);
Draw_Pixel (x + 1, y - 2, 9);
Draw_Pixel (x, y - 1, 6);
Draw_Pixel (x + 1, y - 1, 8);
Draw_Pixel (x + 2, y - 1, 2);
Draw_Pixel (x - 2, y, 6);
Draw_Pixel (x - 1, y, 8);
Draw_Pixel (x, y, 8);
Draw_Pixel (x + 1, y, 6);
Draw_Pixel (x + 2, y, 8);
Draw_Pixel (x + 3, y, 8);
Draw_Pixel (x - 1, y + 1, 2);
Draw_Pixel (x, y + 1, 8);
Draw_Pixel (x + 1, y + 1, 8);
Draw_Pixel (x + 2, y + 1, 2);
Draw_Pixel (x + 3, y + 1, 2);
Draw_Pixel (x + 4, y + 1, 2);
Draw_Pixel (x, y + 2, 7);
Draw_Pixel (x + 1, y + 2, 8);
Draw_Pixel (x + 2, y + 2, 2);
Draw_Pixel (x + 1, y + 3, 2);
Draw_Pixel (x + 2, y + 3, 2);
}
static void
crosshair_5 (int x, int y)
{
byte c = crosshaircolor->int_val;
Draw_Pixel (x - 1, y - 3, c);
Draw_Pixel (x + 0, y - 3, c);
Draw_Pixel (x + 1, y - 3, c);
Draw_Pixel (x - 2, y - 2, c);
Draw_Pixel (x + 2, y - 2, c);
Draw_Pixel (x - 3, y - 1, c);
Draw_Pixel (x + 3, y - 1, c);
Draw_Pixel (x - 3, y, c);
Draw_Pixel (x, y, c);
Draw_Pixel (x + 3, y, c);
Draw_Pixel (x - 3, y + 1, c);
Draw_Pixel (x + 3, y + 1, c);
Draw_Pixel (x - 2, y + 2, c);
Draw_Pixel (x + 2, y + 2, c);
Draw_Pixel (x - 1, y + 3, c);
Draw_Pixel (x + 0, y + 3, c);
Draw_Pixel (x + 1, y + 3, c);
}
static void (*crosshair_func[]) (int x, int y) = {
crosshair_1,
crosshair_2,
crosshair_3,
crosshair_4,
crosshair_5,
};
void
sw32_Draw_Crosshair (void)
{
int x, y;
int ch;
ch = crosshair->int_val - 1;
if ((unsigned) ch >= sizeof (crosshair_func) / sizeof (crosshair_func[0]))
return;
x = vid.conview->xlen / 2 + cl_crossx->int_val;
y = vid.conview->ylen / 2 + cl_crossy->int_val;
crosshair_func[ch] (x, y);
}
void
sw32_Draw_CrosshairAt (int ch, int x, int y)
{
ch -= 1;
if ((unsigned) ch >= sizeof (crosshair_func) / sizeof (crosshair_func[0]))
return;
crosshair_func[ch] (x, y);
}
void
sw32_Draw_Pic (int x, int y, qpic_t *pic)
{
byte *source, tbyte;
int v, u;
if (x < 0 || (x + pic->width) > vid.conview->xlen
|| y < 0 || (y + pic->height) > vid.conview->ylen) {
Sys_MaskPrintf (SYS_vid, "Draw_Pic: bad coordinates");
sw32_Draw_SubPic (x, y, pic, 0, 0, pic->width, pic->height);
return;
}
source = pic->data;
switch(sw32_ctx->pixbytes) {
case 1:
{
byte *dest = (byte *) vid.buffer + y * vid.rowbytes + x;
if (pic->width & 7) { // general
for (v = 0; v < pic->height; v++) {
for (u = 0; u < pic->width; u++)
if ((tbyte = source[u]) != TRANSPARENT_COLOR)
dest[u] = tbyte;
dest += vid.rowbytes;
source += pic->width;
}
} else { // unwound
for (v = 0; v < pic->height; v++) {
for (u = 0; u < pic->width; u += 8) {
if ((tbyte = source[u]) != TRANSPARENT_COLOR)
dest[u] = tbyte;
if ((tbyte = source[u + 1]) != TRANSPARENT_COLOR)
dest[u + 1] = tbyte;
if ((tbyte = source[u + 2]) != TRANSPARENT_COLOR)
dest[u + 2] = tbyte;
if ((tbyte = source[u + 3]) != TRANSPARENT_COLOR)
dest[u + 3] = tbyte;
if ((tbyte = source[u + 4]) != TRANSPARENT_COLOR)
dest[u + 4] = tbyte;
if ((tbyte = source[u + 5]) != TRANSPARENT_COLOR)
dest[u + 5] = tbyte;
if ((tbyte = source[u + 6]) != TRANSPARENT_COLOR)
dest[u + 6] = tbyte;
if ((tbyte = source[u + 7]) != TRANSPARENT_COLOR)
dest[u + 7] = tbyte;
}
dest += vid.rowbytes;
source += pic->width;
}
}
}
break;
case 2:
{
unsigned short *dest = (unsigned short *) vid.buffer + y *
(vid.rowbytes >> 1) + x;
for (v = 0; v < pic->height; v++) {
for (u = 0; u < pic->width; u++) {
tbyte = source[u];
if (tbyte != TRANSPARENT_COLOR)
dest[u] = sw32_8to16table[tbyte];
}
dest += vid.rowbytes >> 1;
source += pic->width;
}
}
break;
case 4:
{
unsigned int *dest = (unsigned int *) vid.buffer + y *
(vid.rowbytes >> 2) + x;
for (v = 0; v < pic->height; v++) {
for (u = 0; u < pic->width; u++) {
tbyte = source[u];
if (tbyte != TRANSPARENT_COLOR)
dest[u] = d_8to24table[tbyte];
}
dest += vid.rowbytes >> 2;
source += pic->width;
}
}
break;
default:
Sys_Error("Draw_Pic: unsupported r_pixbytes %i", sw32_ctx->pixbytes);
}
}
void
sw32_Draw_Picf (float x, float y, qpic_t *pic)
{
sw32_Draw_Pic (x, y, pic);
}
void
sw32_Draw_SubPic (int x, int y, qpic_t *pic, int srcx, int srcy, int width,
int height)
{
byte *source, tbyte;
int v, u;
if ((x < 0) || (x + width > vid.conview->xlen)
|| (y < 0) || (y + height > vid.conview->ylen)) {
Sys_MaskPrintf (SYS_vid, "Draw_SubPic: bad coordinates");
}
// first, clip to screen
if (x < 0) {
srcx += x;
width += x;
x = 0;
}
if ((unsigned) (x + width) > vid.width)
width = vid.width - x;
if (width <= 0)
return;
if (y < 0) {
srcy += y;
height += y;
y = 0;
}
if ((unsigned) (y + height) > vid.height)
height = vid.height - y;
if (height <= 0)
return;
// next, clip to pic
CLIP (srcx, srcy, width, height, pic->width, pic->height);
source = pic->data + srcy * pic->width + srcx;
switch (sw32_ctx->pixbytes) {
case 1:
{
byte *dest = (byte *) vid.buffer + y * vid.rowbytes + x;
for (v = 0; v < height; v++) {
for (u = 0; u < width; u++)
if ((tbyte = source[u]) != TRANSPARENT_COLOR)
dest[u] = tbyte;
dest += vid.rowbytes;
source += pic->width;
}
}
break;
case 2:
{
unsigned short *dest = (unsigned short *) vid.buffer + y *
(vid.rowbytes >> 1) + x;
for (v = 0; v < height; v++, dest += vid.rowbytes >> 1,
source += pic->width)
for (u = 0; u < width; u++)
if ((tbyte = source[u]) != TRANSPARENT_COLOR)
dest[u] = sw32_8to16table[tbyte];
}
break;
case 4:
{
unsigned int *dest = (unsigned int *) vid.buffer + y *
(vid.rowbytes >> 2) + x;
for (v = 0; v < height; v++, dest += vid.rowbytes >> 2,
source += pic->width)
for (u = 0; u < width; u++)
if ((tbyte = source[u]) != TRANSPARENT_COLOR)
dest[u] = d_8to24table[tbyte];
}
break;
default:
Sys_Error("Draw_SubPic: unsupported r_pixbytes %i", sw32_ctx->pixbytes);
}
}
void
sw32_Draw_ConsoleBackground (int lines, byte alpha)
{
int x, y, v;
byte *src;
int f, fstep;
qpic_t *conback;
conback = sw32_Draw_CachePic ("gfx/conback.lmp", true);
// draw the pic
switch(sw32_ctx->pixbytes) {
case 1:
{
byte *dest = vid.conbuffer;
for (y = 0; y < lines; y++, dest += vid.conrowbytes) {
v = (vid.conview->ylen - lines + y) * 200 / vid.conview->ylen;
src = conback->data + v * 320;
if (vid.conview->xlen == 320)
memcpy (dest, src, vid.conview->xlen);
else {
f = 0;
fstep = 320 * 0x10000 / vid.conview->xlen;
for (x = 0; x < vid.conview->xlen; x += 4) {
dest[x] = src[f >> 16];
f += fstep;
dest[x + 1] = src[f >> 16];
f += fstep;
dest[x + 2] = src[f >> 16];
f += fstep;
dest[x + 3] = src[f >> 16];
f += fstep;
}
}
}
}
break;
case 2:
{
unsigned short *dest = (unsigned short *) vid.conbuffer;
for (y = 0; y < lines; y++, dest += (vid.conrowbytes >> 1)) {
// FIXME: pre-expand to native format?
// FIXME: does the endian switching go away in production?
v = (vid.conview->ylen - lines + y) * 200 / vid.conview->ylen;
src = conback->data + v * 320;
f = 0;
fstep = 320 * 0x10000 / vid.conview->xlen;
for (x = 0; x < vid.conview->xlen; x += 4) {
dest[x] = sw32_8to16table[src[f >> 16]];
f += fstep;
dest[x + 1] = sw32_8to16table[src[f >> 16]];
f += fstep;
dest[x + 2] = sw32_8to16table[src[f >> 16]];
f += fstep;
dest[x + 3] = sw32_8to16table[src[f >> 16]];
f += fstep;
}
}
}
break;
case 4:
{
unsigned int *dest = (unsigned int *) vid.conbuffer;
for (y = 0; y < lines; y++, dest += (vid.conrowbytes >> 2)) {
v = (vid.conview->ylen - lines + y) * 200 / vid.conview->ylen;
src = conback->data + v * 320;
f = 0;
fstep = 320 * 0x10000 / vid.conview->xlen;
for (x = 0; x < vid.conview->xlen; x += 4) {
dest[x ] = d_8to24table[src[f >> 16]];f += fstep;
dest[x + 1] = d_8to24table[src[f >> 16]];f += fstep;
dest[x + 2] = d_8to24table[src[f >> 16]];f += fstep;
dest[x + 3] = d_8to24table[src[f >> 16]];f += fstep;
}
}
}
break;
default:
Sys_Error("Draw_ConsoleBackground: unsupported r_pixbytes %i",
sw32_ctx->pixbytes);
}
// if (!cls.download)
int len = strlen (cl_verstring->string);
sw32_Draw_AltString (vid.conview->xlen - len * 8 - 11,
lines - 14, cl_verstring->string);
}
static void
R_DrawRect (vrect_t *prect, int rowbytes, byte * psrc, int transparent)
{
switch(sw32_ctx->pixbytes) {
case 1:
{
byte t;
int i, j, srcdelta, destdelta;
byte *pdest;
pdest = (byte *) vid.buffer + prect->y * vid.rowbytes + prect->x;
srcdelta = rowbytes - prect->width;
destdelta = vid.rowbytes - prect->width;
if (transparent)
{
for (i = 0; i < prect->height; i++)
{
for (j = 0; j < prect->width; j++)
{
t = *psrc;
if (t != TRANSPARENT_COLOR)
*pdest = t;
psrc++;
pdest++;
}
psrc += srcdelta;
pdest += destdelta;
}
}
else
{
for (i = 0; i < prect->height; i++)
{
memcpy (pdest, psrc, prect->width);
psrc += rowbytes;
pdest += vid.rowbytes;
}
}
}
break;
case 2:
{
int i, j, srcdelta, destdelta;
unsigned short *pdest;
pdest = (unsigned short *) vid.buffer +
(prect->y * (vid.rowbytes >> 1)) + prect->x;
srcdelta = rowbytes - prect->width;
destdelta = (vid.rowbytes >> 1) - prect->width;
if (transparent) {
for (i = 0; i < prect->height; i++)
{
j = prect->width;
while(j >= 8)
{
j -= 8;
if (psrc[0] != TRANSPARENT_COLOR)
pdest[0] = sw32_8to16table[psrc[0]];
if (psrc[1] != TRANSPARENT_COLOR)
pdest[1] = sw32_8to16table[psrc[1]];
if (psrc[2] != TRANSPARENT_COLOR)
pdest[2] = sw32_8to16table[psrc[2]];
if (psrc[3] != TRANSPARENT_COLOR)
pdest[3] = sw32_8to16table[psrc[3]];
if (psrc[4] != TRANSPARENT_COLOR)
pdest[4] = sw32_8to16table[psrc[4]];
if (psrc[5] != TRANSPARENT_COLOR)
pdest[5] = sw32_8to16table[psrc[5]];
if (psrc[6] != TRANSPARENT_COLOR)
pdest[6] = sw32_8to16table[psrc[6]];
if (psrc[7] != TRANSPARENT_COLOR)
pdest[7] = sw32_8to16table[psrc[7]];
psrc += 8;
pdest += 8;
}
if (j & 4)
{
if (psrc[0] != TRANSPARENT_COLOR)
pdest[0] = sw32_8to16table[psrc[0]];
if (psrc[1] != TRANSPARENT_COLOR)
pdest[1] = sw32_8to16table[psrc[1]];
if (psrc[2] != TRANSPARENT_COLOR)
pdest[2] = sw32_8to16table[psrc[2]];
if (psrc[3] != TRANSPARENT_COLOR)
pdest[3] = sw32_8to16table[psrc[3]];
psrc += 4;
pdest += 4;
}
if (j & 2)
{
if (psrc[0] != TRANSPARENT_COLOR)
pdest[0] = sw32_8to16table[psrc[0]];
if (psrc[1] != TRANSPARENT_COLOR)
pdest[1] = sw32_8to16table[psrc[1]];
psrc += 2;
pdest += 2;
}
if (j & 1)
{
if (psrc[0] != TRANSPARENT_COLOR)
pdest[0] = sw32_8to16table[psrc[0]];
psrc++;
pdest++;
}
psrc += srcdelta;
pdest += destdelta;
}
} else {
for (i = 0; i < prect->height; i++, psrc += srcdelta,
pdest += destdelta)
{
j = prect->width;
while(j >= 8)
{
j -= 8;
pdest[0] = sw32_8to16table[psrc[0]];
pdest[1] = sw32_8to16table[psrc[1]];
pdest[2] = sw32_8to16table[psrc[2]];
pdest[3] = sw32_8to16table[psrc[3]];
pdest[4] = sw32_8to16table[psrc[4]];
pdest[5] = sw32_8to16table[psrc[5]];
pdest[6] = sw32_8to16table[psrc[6]];
pdest[7] = sw32_8to16table[psrc[7]];
psrc += 8;
pdest += 8;
}
if (j & 4)
{
pdest[0] = sw32_8to16table[psrc[0]];
pdest[1] = sw32_8to16table[psrc[1]];
pdest[2] = sw32_8to16table[psrc[2]];
pdest[3] = sw32_8to16table[psrc[3]];
psrc += 4;
pdest += 4;
}
if (j & 2)
{
pdest[0] = sw32_8to16table[psrc[0]];
pdest[1] = sw32_8to16table[psrc[1]];
psrc += 2;
pdest += 2;
}
if (j & 1)
{
pdest[0] = sw32_8to16table[psrc[0]];
psrc++;
pdest++;
}
}
}
}
break;
case 4:
{
int i, j, srcdelta, destdelta;
int *pdest;
pdest = (int *) vid.buffer + prect->y * (vid.rowbytes >> 2) + prect->x;
srcdelta = rowbytes - prect->width;
destdelta = (vid.rowbytes >> 2) - prect->width;
if (transparent)
{
for (i = 0; i < prect->height; i++)
{
j = prect->width;
while(j >= 8)
{
j -= 8;
if (psrc[0] != TRANSPARENT_COLOR)
pdest[0] = d_8to24table[psrc[0]];
if (psrc[1] != TRANSPARENT_COLOR)
pdest[1] = d_8to24table[psrc[1]];
if (psrc[2] != TRANSPARENT_COLOR)
pdest[2] = d_8to24table[psrc[2]];
if (psrc[3] != TRANSPARENT_COLOR)
pdest[3] = d_8to24table[psrc[3]];
if (psrc[4] != TRANSPARENT_COLOR)
pdest[4] = d_8to24table[psrc[4]];
if (psrc[5] != TRANSPARENT_COLOR)
pdest[5] = d_8to24table[psrc[5]];
if (psrc[6] != TRANSPARENT_COLOR)
pdest[6] = d_8to24table[psrc[6]];
if (psrc[7] != TRANSPARENT_COLOR)
pdest[7] = d_8to24table[psrc[7]];
psrc += 8;
pdest += 8;
}
if (j & 4)
{
if (psrc[0] != TRANSPARENT_COLOR)
pdest[0] = d_8to24table[psrc[0]];
if (psrc[1] != TRANSPARENT_COLOR)
pdest[1] = d_8to24table[psrc[1]];
if (psrc[2] != TRANSPARENT_COLOR)
pdest[2] = d_8to24table[psrc[2]];
if (psrc[3] != TRANSPARENT_COLOR)
pdest[3] = d_8to24table[psrc[3]];
psrc += 4;
pdest += 4;
}
if (j & 2)
{
if (psrc[0] != TRANSPARENT_COLOR)
pdest[0] = d_8to24table[psrc[0]];
if (psrc[1] != TRANSPARENT_COLOR)
pdest[1] = d_8to24table[psrc[1]];
psrc += 2;
pdest += 2;
}
if (j & 1)
{
if (psrc[0] != TRANSPARENT_COLOR)
pdest[0] = d_8to24table[psrc[0]];
psrc++;
pdest++;
}
psrc += srcdelta;
pdest += destdelta;
}
}
else
{
for (i = 0; i < prect->height; i++, psrc += srcdelta,
pdest += destdelta)
{
j = prect->width;
while(j >= 8)
{
j -= 8;
pdest[0] = d_8to24table[psrc[0]];
pdest[1] = d_8to24table[psrc[1]];
pdest[2] = d_8to24table[psrc[2]];
pdest[3] = d_8to24table[psrc[3]];
pdest[4] = d_8to24table[psrc[4]];
pdest[5] = d_8to24table[psrc[5]];
pdest[6] = d_8to24table[psrc[6]];
pdest[7] = d_8to24table[psrc[7]];
psrc += 8;
pdest += 8;
}
if (j & 4)
{
pdest[0] = d_8to24table[psrc[0]];
pdest[1] = d_8to24table[psrc[1]];
pdest[2] = d_8to24table[psrc[2]];
pdest[3] = d_8to24table[psrc[3]];
psrc += 4;
pdest += 4;
}
if (j & 2)
{
pdest[0] = d_8to24table[psrc[0]];
pdest[1] = d_8to24table[psrc[1]];
psrc += 2;
pdest += 2;
}
if (j & 1)
{
pdest[0] = d_8to24table[psrc[0]];
psrc++;
pdest++;
}
}
}
}
break;
default:
Sys_Error("R_DrawRect: unsupported r_pixbytes %i", sw32_ctx->pixbytes);
}
}
/*
Draw_TileClear
This repeats a 64*64 tile graphic to fill the screen around a sized down
refresh window.
*/
void
sw32_Draw_TileClear (int x, int y, int w, int h)
{
int width, height, tileoffsetx, tileoffsety;
byte *psrc;
vrect_t vr;
CLIP (x, y, w, h, (int) vid.width, (int) vid.height);
r_rectdesc.rect.x = x;
r_rectdesc.rect.y = y;
r_rectdesc.rect.width = w;
r_rectdesc.rect.height = h;
vr.y = r_rectdesc.rect.y;
height = r_rectdesc.rect.height;
tileoffsety = vr.y % r_rectdesc.height;
while (height > 0) {
vr.x = r_rectdesc.rect.x;
width = r_rectdesc.rect.width;
if (tileoffsety != 0)
vr.height = r_rectdesc.height - tileoffsety;
else
vr.height = r_rectdesc.height;
if (vr.height > height)
vr.height = height;
tileoffsetx = vr.x % r_rectdesc.width;
while (width > 0) {
if (tileoffsetx != 0)
vr.width = r_rectdesc.width - tileoffsetx;
else
vr.width = r_rectdesc.width;
if (vr.width > width)
vr.width = width;
psrc = r_rectdesc.ptexbytes +
(tileoffsety * r_rectdesc.rowbytes) + tileoffsetx;
R_DrawRect (&vr, r_rectdesc.rowbytes, psrc, 0);
vr.x += vr.width;
width -= vr.width;
tileoffsetx = 0; // only the left tile can be left-clipped
}
vr.y += vr.height;
height -= vr.height;
tileoffsety = 0; // only the top tile can be top-clipped
}
}
/*
Draw_Fill
Fills a box of pixels with a single color
*/
void
sw32_Draw_Fill (int x, int y, int w, int h, int c)
{
int u, v;
if (x < 0 || x + w > vid.conview->xlen
|| y < 0 || y + h > vid.conview->ylen) {
Sys_MaskPrintf (SYS_vid, "Bad Draw_Fill(%d, %d, %d, %d, %c)\n",
x, y, w, h, c);
}
CLIP (x, y, w, h, (int) vid.width, (int) vid.height);
switch (sw32_ctx->pixbytes) {
case 1:
{
byte *dest = (byte *) vid.buffer + y * vid.rowbytes + x;
for (v = 0; v < h; v++, dest += vid.rowbytes)
for (u = 0; u < w; u++)
dest[u] = c;
}
break;
case 2:
{
unsigned short *dest = (unsigned short *) vid.buffer + y *
(vid.rowbytes >> 1) + x;
c = sw32_8to16table[c];
for (v = 0; v < h; v++, dest += (vid.rowbytes >> 1))
for (u = 0; u < w; u++)
dest[u] = c;
}
break;
case 4:
{
unsigned int *dest = (unsigned int *) vid.buffer + y *
(vid.rowbytes >> 2) + x;
c = d_8to24table[c];
for (v = 0; v < h; v++, dest += (vid.rowbytes >> 2))
for (u = 0; u < w; u++)
dest[u] = c;
}
break;
default:
Sys_Error("Draw_Fill: unsupported r_pixbytes %i", sw32_ctx->pixbytes);
}
}
void
sw32_Draw_FadeScreen (void)
{
int x, y;
VID_UnlockBuffer ();
S_ExtraUpdate ();
VID_LockBuffer ();
switch(sw32_ctx->pixbytes) {
case 1:
{
for (y = 0; y < vid.conview->ylen; y++) {
unsigned int t;
byte *pbuf = (byte *) ((byte *) vid.buffer + vid.rowbytes * y);
t = (y & 1) << 1;
for (x = 0; x < vid.conview->xlen; x++) {
if ((x & 3) != t)
pbuf[x] = 0;
}
}
}
break;
case 2:
{
for (y = 0; y < vid.conview->ylen; y++) {
unsigned short *pbuf = (unsigned short *)
((byte *) vid.buffer + vid.rowbytes * y);
pbuf = (unsigned short *) vid.buffer + (vid.rowbytes >> 1) * y;
for (x = 0; x < vid.conview->xlen; x++)
pbuf[x] = (pbuf[x] >> 1) & 0x7BEF;
}
}
break;
case 4:
{
for (y = 0; y < vid.conview->ylen; y++) {
unsigned int *pbuf = (unsigned int *)
((byte *) vid.buffer + vid.rowbytes * y);
for (x = 0; x < vid.conview->xlen; x++)
pbuf[x] = (pbuf[x] >> 1) & 0x7F7F7F7F;
}
}
break;
default:
Sys_Error("Draw_FadeScreen: unsupported r_pixbytes %i", sw32_ctx->pixbytes);
}
vr_data.scr_copyeverything = 1;
VID_UnlockBuffer ();
S_ExtraUpdate ();
VID_LockBuffer ();
}
void
sw32_Draw_BlendScreen (quat_t color)
{
int r, g, b, i;
const byte *basepal;
byte *newpal;
byte pal[768];
switch(sw32_ctx->pixbytes) {
case 1:
{
basepal = vid.basepal;
newpal = pal;
for (i = 0; i < 256; i++) {
r = basepal[0];
g = basepal[1];
b = basepal[2];
basepal += 3;
r += (int) (color[3] * (color[0] * 256 - r));
g += (int) (color[3] * (color[1] * 256 - g));
b += (int) (color[3] * (color[2] * 256 - b));
newpal[0] = vid.gammatable[r];
newpal[1] = vid.gammatable[g];
newpal[2] = vid.gammatable[b];
newpal += 3;
}
vid.vid_internal->set_palette (vid.vid_internal->data, pal);
}
break;
case 2:
{
int g1, g2;
unsigned x, y;
unsigned short rramp[32], gramp[64], bramp[32], *temp;
for (i = 0; i < 32; i++) {
r = i << 3;
g1 = i << 3;
g2 = g1 + 4;
b = i << 3;
r += (int) (color[3] * (color[0] * 256 - r));
g1 += (int) (color[3] * (color[1] - g1));
g2 += (int) (color[3] * (color[1] - g2));
b += (int) (color[3] * (color[2] - b));
rramp[i] = (vid.gammatable[r] << 8) & 0xF800;
gramp[i*2+0] = (vid.gammatable[g1] << 3) & 0x07E0;
gramp[i*2+1] = (vid.gammatable[g2] << 3) & 0x07E0;
bramp[i] = (vid.gammatable[b] >> 3) & 0x001F;
}
temp = vid.buffer;
for (y = 0;y < vid.height;y++, temp += (vid.rowbytes >> 1))
for (x = 0;x < vid.width;x++)
temp[x] = rramp[(temp[x] & 0xF800) >> 11]
+ gramp[(temp[x] & 0x07E0) >> 5] + bramp[temp[x] & 0x001F];
}
break;
case 4:
{
unsigned x, y;
byte ramp[256][4], *temp;
for (i = 0; i < 256; i++) {
r = i;
g = i;
b = i;
r += (int) (color[3] * (color[0] * 256 - r));
g += (int) (color[3] * (color[1] * 256 - g));
b += (int) (color[3] * (color[2] * 256 - b));
ramp[i][0] = vid.gammatable[r];
ramp[i][1] = vid.gammatable[g];
ramp[i][2] = vid.gammatable[b];
ramp[i][3] = 0;
}
temp = vid.buffer;
for (y = 0; y < vid.height; y++, temp += vid.rowbytes)
{
for (x = 0;x < vid.width;x++)
{
temp[x*4+0] = ramp[temp[x*4+0]][0];
temp[x*4+1] = ramp[temp[x*4+1]][1];
temp[x*4+2] = ramp[temp[x*4+2]][2];
temp[x*4+3] = 0;
}
}
}
break;
default:
Sys_Error("sw32_Draw_BlendScreen: unsupported r_pixbytes %i",
sw32_ctx->pixbytes);
}
}