Felisp
84436a5ae0
http://my.svgalib.org/svgalib/svgalib-1.9.25.tar.gz http://my.svgalib.org/svgalib/
298 lines
7.3 KiB
C
298 lines
7.3 KiB
C
/*
|
|
|
|
3DKIT version 1.3
|
|
High speed 3D graphics and rendering library for Linux.
|
|
|
|
Copyright (C) 1996, 1997 Paul Sheer psheer@icon.co.za
|
|
|
|
This library is free software; you can redistribute it and/or
|
|
modify it under the terms of the GNU Library General Public
|
|
License as published by the Free Software Foundation; either
|
|
version 2 of the License, or (at your option) any later version.
|
|
|
|
This library 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
|
|
Library General Public License for more details.
|
|
|
|
You should have received a copy of the GNU Library General Public
|
|
License along with this library; if not, write to the Free
|
|
Software Foundation, Inc., 59 Temple Place - Suite 330, Boston,
|
|
MA 02111-1307, USA
|
|
|
|
*/
|
|
|
|
#include <config.h>
|
|
|
|
#ifndef DO_NOT_USE_VGALIB
|
|
#include <vga.h>
|
|
#endif
|
|
|
|
#include <vgagl.h>
|
|
|
|
|
|
#include "triangle.h"
|
|
#include <stdio.h>
|
|
|
|
#define SHLB 8
|
|
#define SHC 0
|
|
#ifdef WRAP
|
|
#define S_MASK 0x01ff00
|
|
#endif
|
|
|
|
|
|
#ifdef byte
|
|
#undef byte
|
|
#endif
|
|
#define byte unsigned char
|
|
|
|
#ifdef word
|
|
#undef word
|
|
#endif
|
|
#define word unsigned short
|
|
|
|
#ifdef quad_t
|
|
#undef quad_t
|
|
#endif
|
|
|
|
#ifdef INT_IS_16_BITS
|
|
#define quad_t unsigned long
|
|
#else
|
|
#define quad_t unsigned int
|
|
#endif
|
|
|
|
|
|
/* this assumes that BYTEWIDTH is not necessarily equal to bytes-per-pixel times WIDTH */
|
|
|
|
#define assignvpoffset8(x, y, vp) vp = (y) * BYTEWIDTH + (x);
|
|
#define assignvpoffset16(x, y, vp) vp = (y) * BYTEWIDTH + ((x) << 1);
|
|
#define assignvpoffset24(x, y, vp) vp = (y) * BYTEWIDTH + (x) * 3;
|
|
#define assignvpoffset32(x, y, vp) vp = (y) * BYTEWIDTH + ((x) << 2);
|
|
|
|
#define declarevp8 byte *vpbyte = (byte *) VBUF
|
|
#define declarevp16 word *vpword = (word *) VBUF
|
|
#define declarevp24 byte *vpbyte = (byte *) VBUF
|
|
#define declarevp32 quad_t *vpquad = (quad_t *) VBUF
|
|
|
|
#define assignvp8(x, y, vp) vpbyte = (byte *) VBUF + (y) * BYTEWIDTH + (x);
|
|
#define assignvp16(x, y, vp) vpword = (word *) ((byte *) VBUF + (y) * BYTEWIDTH) + (x);
|
|
#define assignvp24(x, y, vp) vpbyte = (byte *) VBUF + (y) * BYTEWIDTH + (x) * 3;
|
|
#define assignvp32(x, y, vp) vpquad = (quad_t *) ((byte *) VBUF + (y) * BYTEWIDTH) + (x);
|
|
|
|
/* here we would like to have a single void pointer and cast it to byte, word or
|
|
quad_t, but ansi does not allow casts on LHS :( */
|
|
|
|
#define decvp8 *(--(vpbyte)) = lookup(color)
|
|
#define incvp8 *((vpbyte)++) = lookup(color)
|
|
#define decvp16 *(--(vpword)) = lookup(color)
|
|
#define incvp16 *((vpword)++) = lookup(color)
|
|
#define decvp24 *(--(vpbyte)) = lookup(color) >> 16; \
|
|
*(--(vpbyte)) = lookup(color) >> 8; \
|
|
*(--(vpbyte)) = lookup(color);
|
|
#define incvp24 *((vpbyte)++) = lookup(color); \
|
|
*((vpbyte)++) = lookup(color) >> 8; \
|
|
*((vpbyte)++) = lookup(color) >> 16;
|
|
#define decvp32 *(--(vpquad)) = lookup(color)
|
|
#define incvp32 *((vpquad)++) = lookup(color)
|
|
|
|
#define decvpoffset8 \
|
|
if (!offst--) \
|
|
vga_setpage (--pg); \
|
|
*(vpbyte + offst) = lookup(color);
|
|
#define incvpoffset8 \
|
|
*(vpbyte + offst) = lookup(color); \
|
|
if (!(++offst)) \
|
|
vga_setpage (++pg);
|
|
#define decvpoffset16 \
|
|
if (!offst) \
|
|
vga_setpage (--pg); \
|
|
offst -= 2; \
|
|
*(vpword + offst) = lookup(color);
|
|
#define incvpoffset16 \
|
|
*(vpword + offst) = lookup(color); \
|
|
offst += 2; \
|
|
if (!offst) \
|
|
vga_setpage (++pg);
|
|
#define decvpoffset24 \
|
|
if (!offst--) \
|
|
vga_setpage (--pg); \
|
|
*(vpbyte + offst) = lookup(color) >> 16; \
|
|
if (!offst--) \
|
|
vga_setpage (--pg); \
|
|
*(vpbyte + offst) = lookup(color) >> 8; \
|
|
if (!offst--) \
|
|
vga_setpage (--pg); \
|
|
*(vpbyte + offst) = lookup(color);
|
|
#define incvpoffset24 \
|
|
*(vpbyte + offst) = lookup(color); \
|
|
if (!(++offst)) \
|
|
vga_setpage (++pg); \
|
|
*(vpbyte + offst) = lookup(color) >> 8; \
|
|
if (!(++offst)) \
|
|
vga_setpage (++pg); \
|
|
*(vpbyte + offst) = lookup(color) >> 16; \
|
|
if (!(++offst)) \
|
|
vga_setpage (++pg);
|
|
#define decvpoffset32 \
|
|
if (!offst) \
|
|
vga_setpage (--pg); \
|
|
offst -= 4; \
|
|
*(vpquad + offst) = lookup(color);
|
|
#define incvpoffset32 \
|
|
*(vpquad + offst) = lookup(color); \
|
|
offst += 4; \
|
|
if (!offst) \
|
|
vga_setpage (++pg);
|
|
|
|
|
|
static int px1, px2, py;
|
|
static int c;
|
|
|
|
#ifdef INTERP
|
|
static int c_x;
|
|
#endif
|
|
|
|
#ifdef WRAP
|
|
static int xd, xd_x, yd, yd_x;
|
|
static unsigned char *dat;
|
|
#endif
|
|
|
|
static int dx0, dy0;
|
|
|
|
#if defined(WRAP) && defined(INTERP)
|
|
|
|
/* this must only occur once */
|
|
|
|
int color_lookup[TRIANGLE_COLOR_LOOKUP_TABLE_SIZE];
|
|
static int *_color_lookup;
|
|
|
|
void gl_trisetcolorlookup (int i, int c)
|
|
{
|
|
if(i < TRIANGLE_COLOR_LOOKUP_TABLE_SIZE)
|
|
color_lookup[i] = c;
|
|
}
|
|
|
|
int gl_trigetcolorlookup (int i)
|
|
{
|
|
if(i < TRIANGLE_COLOR_LOOKUP_TABLE_SIZE)
|
|
return color_lookup[i];
|
|
return 0;
|
|
}
|
|
|
|
void (*tri_drawpoint) (int, int, int);
|
|
static void (*_tri_drawpoint) (int, int, int);
|
|
|
|
void gl_trisetdrawpoint(void (*draw_point) (int, int, int))
|
|
{
|
|
tri_drawpoint = draw_point;
|
|
}
|
|
|
|
#else
|
|
|
|
extern int color_lookup[TRIANGLE_COLOR_LOOKUP_TABLE_SIZE];
|
|
static int *_color_lookup;
|
|
extern void (*tri_drawpoint) (int, int, int);
|
|
static void (*_tri_drawpoint) (int, int, int);
|
|
|
|
#endif /* this static is just because static is faster than ordinary array (so I hear) in DLL's */
|
|
|
|
|
|
#define TRI_BPP 8
|
|
#include "trisetpixel.c"
|
|
|
|
#undef TRI_BPP
|
|
#define TRI_BPP 16
|
|
#include "trisetpixel.c"
|
|
|
|
#undef TRI_BPP
|
|
#define TRI_BPP 24
|
|
#include "trisetpixel.c"
|
|
|
|
#undef TRI_BPP
|
|
#define TRI_BPP 32
|
|
#include "trisetpixel.c"
|
|
|
|
#undef TRI_BPP
|
|
|
|
|
|
/*
|
|
#define CONTEXT_VIRTUAL 0x0
|
|
#define CONTEXT_PAGED 0x1
|
|
#define CONTEXT_LINEAR 0x2
|
|
#define CONTEXT_MODEX 0x3
|
|
#define CONTEXT_PLANAR16 0x4
|
|
*/
|
|
|
|
static void (*linefuncs[64]) (void) =
|
|
{
|
|
colhline_pos_direct8,
|
|
colhline_neg_direct8,
|
|
colhline_pos_paged8,
|
|
colhline_neg_paged8, /*2 */
|
|
colhline_pos_direct8,
|
|
colhline_neg_direct8,
|
|
colhline_pos_setpixel8,
|
|
colhline_neg_setpixel8, /*4 */
|
|
colhline_pos_setpixel8,
|
|
colhline_neg_setpixel8,
|
|
colhline_pos_setpixel8,
|
|
colhline_neg_setpixel8, /*6 */
|
|
colhline_pos_setpixel8,
|
|
colhline_neg_setpixel8,
|
|
colhline_pos_setpixel8,
|
|
colhline_neg_setpixel8, /*8 */
|
|
|
|
colhline_pos_direct16,
|
|
colhline_neg_direct16,
|
|
colhline_pos_paged16,
|
|
colhline_neg_paged16, /*2 */
|
|
colhline_pos_direct16,
|
|
colhline_neg_direct16,
|
|
colhline_pos_setpixel16,
|
|
colhline_neg_setpixel16, /*4 */
|
|
colhline_pos_setpixel16,
|
|
colhline_neg_setpixel16,
|
|
colhline_pos_setpixel16,
|
|
colhline_neg_setpixel16, /*6 */
|
|
colhline_pos_setpixel16,
|
|
colhline_neg_setpixel16,
|
|
colhline_pos_setpixel16,
|
|
colhline_neg_setpixel16, /*8 */
|
|
|
|
colhline_pos_direct24,
|
|
colhline_neg_direct24,
|
|
colhline_pos_paged24,
|
|
colhline_neg_paged24, /*2 */
|
|
colhline_pos_direct24,
|
|
colhline_neg_direct24,
|
|
colhline_pos_setpixel24,
|
|
colhline_neg_setpixel24, /*4 */
|
|
colhline_pos_setpixel24,
|
|
colhline_neg_setpixel24,
|
|
colhline_pos_setpixel24,
|
|
colhline_neg_setpixel24, /*6 */
|
|
colhline_pos_setpixel24,
|
|
colhline_neg_setpixel24,
|
|
colhline_pos_setpixel24,
|
|
colhline_neg_setpixel24, /*8 */
|
|
|
|
colhline_pos_direct32,
|
|
colhline_neg_direct32,
|
|
colhline_pos_paged32,
|
|
colhline_neg_paged32, /*2 */
|
|
colhline_pos_direct32,
|
|
colhline_neg_direct32,
|
|
colhline_pos_setpixel32,
|
|
colhline_neg_setpixel32, /*4 */
|
|
colhline_pos_setpixel32,
|
|
colhline_neg_setpixel32,
|
|
colhline_pos_setpixel32,
|
|
colhline_neg_setpixel32, /*6 */
|
|
colhline_pos_setpixel32,
|
|
colhline_neg_setpixel32,
|
|
colhline_pos_setpixel32,
|
|
colhline_neg_setpixel32, /*8 */
|
|
};
|
|
|
|
|
|
#include "tri.c"
|