quakeforge/libs/video/renderer/sw32/draw.c
Ozkan Sezer 6e04fd5ff6 signed int viddef_t members
The attached patch (against quakeforge git) changes the [con]width,
[con]height, and most importantly the rowbytes members of viddef_t
from unsigned to signed int, like in q2.  This allows for a properly
negative vid.rowbytes which may be needed in, e.g. a DIB sections
windows driver if needed.  Along with it, I changed a few places
where unsigned int is used along with comparisons against the relevant
vid.* members.
One thing I am not 100% sure is the signedness requirements of
d_zrowbytes and d_zwidth: q2 has them as unsigned but I am not sure
whether that is because they are needed as unsigned or it was just an
oversight of the id developers. They do look like they should be OK
as signed int to me, though: comments?

==
Note from Bill Currie: I had to do some extra changes as many
signed/unsigned comparisons were somehow missed.
2012-10-21 09:00:50 +09:00

1300 lines
28 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 "d_iface.h"
#include "r_internal.h"
#include "vid_internal.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 (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.conheight - 8 || x < 0 || x > vid.conwidth - 8)
return;
if (chr < 0 || 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_r_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_r_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_r_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_r_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_func[]) (int x, int y) = {
crosshair_1,
crosshair_2,
crosshair_3,
};
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.conwidth / 2 + cl_crossx->int_val;
y = vid.conheight / 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.conwidth
|| y < 0 || (y + pic->height) > vid.conheight) {
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_r_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_r_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.conwidth)
|| (y < 0) || (y + height > vid.conheight)) {
Sys_MaskPrintf (SYS_VID, "Draw_SubPic: bad coordinates");
}
// first, clip to screen
if (x < 0) {
srcx += x;
width += x;
x = 0;
}
if (x + width > vid.width)
width = vid.width - x;
if (width <= 0)
return;
if (y < 0) {
srcy += y;
height += y;
y = 0;
}
if (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_r_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_r_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_r_pixbytes) {
case 1:
{
byte *dest = vid.conbuffer;
for (y = 0; y < lines; y++, dest += vid.conrowbytes) {
v = (vid.conheight - lines + y) * 200 / vid.conheight;
src = conback->data + v * 320;
if (vid.conwidth == 320)
memcpy (dest, src, vid.conwidth);
else {
f = 0;
fstep = 320 * 0x10000 / vid.conwidth;
for (x = 0; x < vid.conwidth; 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.conheight - lines + y) * 200 / vid.conheight;
src = conback->data + v * 320;
f = 0;
fstep = 320 * 0x10000 / vid.conwidth;
for (x = 0; x < vid.conwidth; 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.conheight - lines + y) * 200 / vid.conheight;
src = conback->data + v * 320;
f = 0;
fstep = 320 * 0x10000 / vid.conwidth;
for (x = 0; x < vid.conwidth; 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_r_pixbytes);
}
// if (!cls.download)
sw32_Draw_AltString (vid.conwidth - strlen (cl_verstring->string) * 8 - 11,
lines - 14, cl_verstring->string);
}
static void
R_DrawRect (vrect_t *prect, int rowbytes, byte * psrc, int transparent)
{
switch(sw32_r_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_r_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, vid.width, 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.conwidth
|| y < 0 || y + h > vid.conheight) {
Sys_MaskPrintf (SYS_VID, "Bad Draw_Fill(%d, %d, %d, %d, %c)\n",
x, y, w, h, c);
}
CLIP (x, y, w, h, vid.width, vid.height);
switch (sw32_r_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_r_pixbytes);
}
}
void
sw32_Draw_FadeScreen (void)
{
int x, y;
VID_UnlockBuffer ();
S_ExtraUpdate ();
VID_LockBuffer ();
switch(sw32_r_pixbytes) {
case 1:
{
for (y = 0; y < vid.conheight; y++) {
unsigned int t;
byte *pbuf = (byte *) ((byte *) vid.buffer + vid.rowbytes * y);
t = (y & 1) << 1;
for (x = 0; x < vid.conwidth; x++) {
if ((x & 3) != t)
pbuf[x] = 0;
}
}
}
break;
case 2:
{
for (y = 0; y < vid.conheight; 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.conwidth; x++)
pbuf[x] = (pbuf[x] >> 1) & 0x7BEF;
}
}
break;
case 4:
{
for (y = 0; y < vid.conheight; y++) {
unsigned int *pbuf = (unsigned int *)
((byte *) vid.buffer + vid.rowbytes * y);
for (x = 0; x < vid.conwidth; x++)
pbuf[x] = (pbuf[x] >> 1) & 0x7F7F7F7F;
}
}
break;
default:
Sys_Error("Draw_FadeScreen: unsupported r_pixbytes %i", sw32_r_pixbytes);
}
VID_UnlockBuffer ();
S_ExtraUpdate ();
VID_LockBuffer ();
}
void
sw32_Draw_BlendScreen (quat_t color)
{
int r, g, b, i;
byte *basepal, *newpal;
byte pal[768];
switch(sw32_r_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.set_palette (pal);
}
break;
case 2:
{
int g1, g2, 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:
{
int 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("V_UpdatePalette: unsupported r_pixbytes %i", sw32_r_pixbytes);
}
}