From 642699a19f1c07336a6fadacd6d5a9028f5d346f Mon Sep 17 00:00:00 2001 From: Brian Paul Date: Mon, 16 Jun 2003 14:32:44 +0000 Subject: DOS updates for new tree (Daniel Borca) --- src/mesa/drivers/dos/mga/mga.c | 3072 ++++++++++++++++++++-------------------- 1 file changed, 1536 insertions(+), 1536 deletions(-) (limited to 'src/mesa/drivers/dos/mga/mga.c') diff --git a/src/mesa/drivers/dos/mga/mga.c b/src/mesa/drivers/dos/mga/mga.c index 27afba0ba0..5b0ee6437e 100644 --- a/src/mesa/drivers/dos/mga/mga.c +++ b/src/mesa/drivers/dos/mga/mga.c @@ -1,1536 +1,1536 @@ -/* - * Mesa 3-D graphics library - * Version: 5.0 - * - * Copyright (C) 1999-2002 Brian Paul All Rights Reserved. - * - * Permission is hereby granted, free of charge, to any person obtaining a - * copy of this software and associated documentation files (the "Software"), - * to deal in the Software without restriction, including without limitation - * the rights to use, copy, modify, merge, publish, distribute, sublicense, - * and/or sell copies of the Software, and to permit persons to whom the - * Software is furnished to do so, subject to the following conditions: - * - * The above copyright notice and this permission notice shall be included - * in all copies or substantial portions of the Software. - * - * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS - * OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, - * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL - * BRIAN PAUL BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN - * AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN - * CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE. - */ - -/* - * DOS/DJGPP device driver v1.3 for Mesa -- MGA2064W - * - * Copyright (c) 2003 - Borca Daniel - * Email : dborca@yahoo.com - * Web : http://www.geocities.com/dborca - * - * Thanks to Shawn Hargreaves for FreeBE/AF - */ - - -#include -#include -#include - -#include "../internal.h" -#include "mga_reg.h" -#include "mga_hw.h" -#include "mga_mode.h" -#include "mga.h" - - - -/* cached drawing engine state */ -#define OP_NONE 0 - -#define OP_DRAWRECT (\ - M_DWG_TRAP | /* opcod */ \ - M_DWG_BLK | /* atype */ \ - /* linear */ \ - M_DWG_NOZCMP | /* zmode */ \ - M_DWG_SOLID | /* solid */ \ - M_DWG_ARZERO | /* arzero */ \ - M_DWG_SGNZERO | /* sgnzero */ \ - M_DWG_SHFTZERO | /* shftzero */ \ - M_DWG_BOP_SRC /* bop */ \ - /* trans */ \ - /* bltmod */ \ - /* pattern */ \ - /* transc */ ) -#define OP_DRAWRECT_TX32BGR (\ - M_DWG_TEXTURE_TRAP | /* opcod */ \ - M_DWG_I | /* atype */ \ - /* linear */ \ - M_DWG_NOZCMP | /* zmode */ \ - /* solid */ \ - M_DWG_ARZERO | /* arzero */ \ - M_DWG_SGNZERO | /* sgnzero */ \ - M_DWG_SHFTZERO | /* shftzero */ \ - M_DWG_BOP_SRC | /* bop */ \ - /* trans */ \ - M_DWG_BU32BGR /* bltmod */ \ - /* pattern */ \ - /* transc */ ) -#define OP_DRAWRECT_TX24BGR (\ - M_DWG_TEXTURE_TRAP | /* opcod */ \ - M_DWG_I | /* atype */ \ - /* linear */ \ - M_DWG_NOZCMP | /* zmode */ \ - /* solid */ \ - M_DWG_ARZERO | /* arzero */ \ - M_DWG_SGNZERO | /* sgnzero */ \ - M_DWG_SHFTZERO | /* shftzero */ \ - M_DWG_BOP_SRC | /* bop */ \ - /* trans */ \ - M_DWG_BU24BGR /* bltmod */ \ - /* pattern */ \ - /* transc */ ) -#define OP_DRAWLINE (\ - M_DWG_AUTOLINE_CLOSE | /* opcod */ \ - M_DWG_RPL | /* atype */ \ - /* linear */ \ - M_DWG_NOZCMP | /* zmode */ \ - M_DWG_SOLID | /* solid */ \ - /* arzero */ \ - /* sgnzero */ \ - M_DWG_SHFTZERO | /* shftzero */ \ - M_DWG_BOP_SRC | /* bop */ \ - /* trans */ \ - M_DWG_BFCOL /* bltmod */ \ - /* pattern */ \ - /* transc */ ) -#define OP_DRAWLINE_I (\ - M_DWG_AUTOLINE_CLOSE | /* opcod */ \ - M_DWG_I | /* atype */ \ - /* linear */ \ - M_DWG_NOZCMP | /* zmode */ \ - /* solid */ \ - /* arzero */ \ - /* sgnzero */ \ - /* shftzero */ \ - M_DWG_BOP_SRC | /* bop */ \ - /* trans */ \ - M_DWG_BFCOL /* bltmod */ \ - /* pattern */ \ - /* transc */ ) -#define OP_DRAWLINE_ZI (\ - M_DWG_AUTOLINE_CLOSE | /* opcod */ \ - M_DWG_ZI | /* atype */ \ - /* linear */ \ - M_DWG_ZLT | /* zmode */ \ - /* solid */ \ - /* arzero */ \ - /* sgnzero */ \ - /* shftzero */ \ - M_DWG_BOP_SRC | /* bop */ \ - /* trans */ \ - M_DWG_BFCOL /* bltmod */ \ - /* pattern */ \ - /* transc */ ) -#define OP_DRAWTRAP (\ - M_DWG_TRAP | /* opcod */ \ - M_DWG_BLK | /* atype */ \ - /* linear */ \ - M_DWG_NOZCMP | /* zmode */ \ - M_DWG_SOLID | /* solid */ \ - /* arzero */ \ - /* sgnzero */ \ - M_DWG_SHFTZERO | /* shftzero */ \ - M_DWG_BOP_SRC /* bop */ \ - /* trans */ \ - /* bltmod */ \ - /* pattern */ \ - /* transc */ ) -#define OP_DRAWTRAP_I (\ - M_DWG_TRAP | /* opcod */ \ - M_DWG_I | /* atype */ \ - /* linear */ \ - M_DWG_NOZCMP | /* zmode */ \ - /* solid */ \ - /* arzero */ \ - /* sgnzero */ \ - M_DWG_SHFTZERO | /* shftzero */ \ - M_DWG_BOP_SRC /* bop */ \ - /* trans */ \ - /* bltmod */ \ - /* pattern */ \ - /* transc */ ) -#define OP_DRAWTRAP_ZI (\ - M_DWG_TRAP | /* opcod */ \ - M_DWG_ZI | /* atype */ \ - /* linear */ \ - M_DWG_ZLT | /* zmode */ \ - /* solid */ \ - /* arzero */ \ - /* sgnzero */ \ - M_DWG_SHFTZERO | /* shftzero */ \ - M_DWG_BOP_SRC /* bop */ \ - /* trans */ \ - /* bltmod */ \ - /* pattern */ \ - /* transc */ ) -#define OP_ILOAD_32BGR (\ - M_DWG_ILOAD | /* opcod */ \ - M_DWG_RPL | /* atype */ \ - /* linear */ \ - /* zmode */ \ - /* solid */ \ - /* arzero */ \ - M_DWG_SGNZERO | /* sgnzero */ \ - M_DWG_SHFTZERO | /* shftzero */ \ - M_DWG_BOP_SRC | /* bop */ \ - /* trans */ \ - M_DWG_BU32BGR /* bltmod */ \ - /* pattern */ \ - /* transc */ ) -#define OP_ILOAD_24BGR (\ - M_DWG_ILOAD | /* opcod */ \ - M_DWG_RPL | /* atype */ \ - /* linear */ \ - /* zmode */ \ - /* solid */ \ - /* arzero */ \ - M_DWG_SGNZERO | /* sgnzero */ \ - M_DWG_SHFTZERO | /* shftzero */ \ - M_DWG_BOP_SRC | /* bop */ \ - /* trans */ \ - M_DWG_BU24BGR /* bltmod */ \ - /* pattern */ \ - /* transc */ ) - - - -/* internal hardware data structures */ -static int interleave; -static unsigned long zorg; -static unsigned long vram; -static char card_name[80]; - - - -/* some info about current mode */ -static int __bpp, __bypp; -static int __pixwidth, __bytwidth, __pagewidth, __width, __height, __zheight; -static int __operation; -static int __scrollx, __scrolly; - - - -/* buffers */ -static int mga_readbuffer, mga_writebuffer; -static long mga_readbuffer_ptr, mga_writebuffer_ptr; -static long mga_backbuffer_ptr, mga_frontbuffer_ptr; - - - -/* lookup table for scaling 2 bit colors up to 8 bits */ -static int _rgb_scale_2[4] = { - 0, 85, 170, 255 -}; - -/* lookup table for scaling 3 bit colors up to 8 bits */ -static int _rgb_scale_3[8] = { - 0, 36, 73, 109, 146, 182, 219, 255 -}; - -/* lookup table for scaling 5 bit colors up to 8 bits */ -static int _rgb_scale_5[32] = { - 0, 8, 16, 25, 33, 41, 49, 58, - 66, 74, 82, 90, 99, 107, 115, 123, - 132, 140, 148, 156, 165, 173, 181, 189, - 197, 206, 214, 222, 230, 239, 247, 255 -}; - -/* lookup table for scaling 6 bit colors up to 8 bits */ -static int _rgb_scale_6[64] = { - 0, 4, 8, 12, 16, 20, 24, 28, - 32, 36, 40, 45, 49, 53, 57, 61, - 65, 69, 73, 77, 81, 85, 89, 93, - 97, 101, 105, 109, 113, 117, 121, 125, - 130, 134, 138, 142, 146, 150, 154, 158, - 162, 166, 170, 174, 178, 182, 186, 190, - 194, 198, 202, 206, 210, 215, 219, 223, - 227, 231, 235, 239, 243, 247, 251, 255 -}; - - - -/* - * pixel/color routines - */ -void (*mga_putpixel) (unsigned int offset, int color); -int (*mga_getpixel) (unsigned int offset); -void (*mga_getrgba) (unsigned int offset, unsigned char rgba[4]); -int (*mga_mixrgb) (const unsigned char rgb[]); -static int (*mga_mixrgb_full) (const unsigned char rgb[]); - - - -/* mga_fifo: - * Waits until there are at least free slots in the FIFO buffer. - */ -#define mga_fifo(n) do { } while (mga_inb(M_FIFOSTATUS) < (n)) - - - -static int _mga_rread (int port, int index) -{ - mga_select(); - mga_outb(port, index); - return mga_inb(port+1); -} - - - -static void _mga_rwrite (int port, int index, int v) -{ - mga_select(); - mga_outb(port, index); - mga_outb(port+1, v); -} - - - -static void _mga_ralter (int port, int index, int mask, int v) -{ - int temp; - temp = _mga_rread(port, index); - temp &= (~mask); - temp |= (v & mask); - _mga_rwrite(port, index, temp); -} - - - -/* WaitTillIdle: - * Delay until the hardware controller has finished drawing. - */ -void mga_wait_idle (void) -{ - int tries = 2; - - /*hwptr_unselect(oldptr);*/ - - mga_select(); - - while (tries--) { - do { - } while (!(mga_inl(M_FIFOSTATUS) & 0x200)); - - do { - } while (mga_inl(M_STATUS) & 0x10000); - - mga_outb(M_CRTC_INDEX, 0); - } - - /*hwptr_select(oldptr);*/ -} - - - -/* Desc: Waits for the next vertical sync period. - * - * In : - * Out : - * - * Note: - */ -static void _mga_wait_retrace (void) -{ - int t1 = 0; - int t2 = 0; - - do { - t1 = t2; - t2 = mga_inl(M_VCOUNT); - } while (t2 >= t1); -} - - - -/* Desc: fix scan lines - * - * In : - * Out : - * - * Note: - */ -static unsigned long _mga_fix_scans (unsigned long l) -{ - unsigned long m = 0; - - switch (__bpp) { - case 8: - m = interleave?128:64; - break; - case 15: - case 16: - m = interleave?64:32; - break; - case 24: - m = interleave?128:64; - break; - case 32: - m = 32; - break; - } - - m -= 1; - return (l + m) & ~m; -} - - - -/* Desc: HW scrolling function - * - * In : - * Out : - * - * Note: view Z-buffer in 16bit modes: _mga_display_start(0, 0, __height, 1) - */ -void mga_display_start (long boffset, long x, long y, long waitVRT) -{ - long addr; - - mga_select(); - - if (waitVRT >= 0) { - - addr = __bytwidth * y + (boffset + x) * __bypp; - - if (interleave) { - addr /= 8; - } else { - addr /= 4; - } - - _mga_rwrite(M_CRTC_INDEX, 0x0D, (addr)&0xFF); - _mga_rwrite(M_CRTC_INDEX, 0x0C, (addr>>8)&0xFF); - _mga_ralter(M_CRTC_EXT_INDEX, 0, 0x0F, (addr>>16)&0x0F); - - while (waitVRT--) { - _mga_wait_retrace(); - } - } - - __scrollx = x; - __scrolly = y; -} - - - -/* Desc: set READ buffer - * - * In : either FRONT or BACK buffer - * Out : - * - * Note: - */ -void mga_set_readbuffer (int buffer) -{ - mga_readbuffer = buffer; - - mga_readbuffer_ptr = (mga_readbuffer == MGA_FRONTBUFFER) ? mga_frontbuffer_ptr : mga_backbuffer_ptr; -} - - - -/* Desc: set WRITE buffer - * - * In : either FRONT or BACK buffer - * Out : - * - * Note: - */ -void mga_set_writebuffer (int buffer) -{ - mga_writebuffer = buffer; - - mga_writebuffer_ptr = (mga_writebuffer == MGA_FRONTBUFFER) ? mga_frontbuffer_ptr : mga_backbuffer_ptr; - - mga_select(); - mga_fifo(1); - mga_outl(M_YDSTORG, mga_writebuffer_ptr); - - __operation = OP_NONE; -} - - - -/* Desc: swap buffers - * - * In : number of vertical retraces to wait - * Out : - * - * Note: - */ -void mga_swapbuffers (int swapinterval) -{ - /* flip the buffers */ - mga_backbuffer_ptr ^= __pagewidth; - mga_frontbuffer_ptr ^= __pagewidth; - - /* update READ/WRITE pointers */ - mga_set_readbuffer(mga_readbuffer); - mga_set_writebuffer(mga_writebuffer); - - /* make sure we always see the FRONT buffer */ - mga_display_start(mga_frontbuffer_ptr, __scrollx, __scrolly, swapinterval); -} - - - -/* Desc: color composition (w/o ALPHA) - * - * In : array of integers (R, G, B) - * Out : color - * - * Note: - - */ -static __inline int _mga_mixrgb8 (const unsigned char rgb[]) -{ - return (rgb[0]&0xe0)|((rgb[1]>>5)<<2)|(rgb[2]>>6); -} -static __inline int _mga_mixrgb15 (const unsigned char rgb[]) -{ - return ((rgb[0]>>3)<<10)|((rgb[1]>>3)<<5)|(rgb[2]>>3); -} -static __inline int _mga_mixrgb16 (const unsigned char rgb[]) -{ - return ((rgb[0]>>3)<<11)|((rgb[1]>>2)<<5)|(rgb[2]>>3); -} -static __inline int _mga_mixrgb32 (const unsigned char rgb[]) -{ - return (rgb[0]<<16)|(rgb[1]<<8)|(rgb[2]); -} - - - -/* Desc: color composition (w/o ALPHA) + replication - * - * In : array of integers (R, G, B) - * Out : color - * - * Note: - - */ -static int _mga_mixrgb8_full (const unsigned char rgb[]) -{ - int color = _mga_mixrgb8(rgb); - color |= color<<8; - return (color<<16) | color; -} -static int _mga_mixrgb15_full (const unsigned char rgb[]) -{ - int color = _mga_mixrgb15(rgb); - return (color<<16) | color; -} -static int _mga_mixrgb16_full (const unsigned char rgb[]) -{ - int color = _mga_mixrgb16(rgb); - return (color<<16) | color; -} -#define _mga_mixrgb32_full _mga_mixrgb32 - - - -/* Desc: putpixel - * - * In : pixel offset, pixel value - * Out : - - * - * Note: uses current write buffer - */ -static void _mga_putpixel8 (unsigned int offset, int color) -{ - hwptr_pokeb(mgaptr.linear_map, mga_writebuffer_ptr + offset, color); -} -#define _mga_putpixel15 _mga_putpixel16 -static void _mga_putpixel16 (unsigned int offset, int color) -{ - hwptr_pokew(mgaptr.linear_map, (mga_writebuffer_ptr + offset) * 2, color); -} -static void _mga_putpixel32 (unsigned int offset, int color) -{ - hwptr_pokel(mgaptr.linear_map, (mga_writebuffer_ptr + offset) * 4, color); -} - - - -/* Desc: pixel retrieval - * - * In : pixel offset - * Out : pixel value - * - * Note: uses current read buffer - */ -static __inline int _mga_getpixel8 (unsigned int offset) -{ - return hwptr_peekb(mgaptr.linear_map, mga_readbuffer_ptr + offset); -} -#define _mga_getpixel15 _mga_getpixel16 -static __inline int _mga_getpixel16 (unsigned int offset) -{ - return hwptr_peekw(mgaptr.linear_map, (mga_readbuffer_ptr + offset) * 2); -} -static __inline int _mga_getpixel32 (unsigned int offset) -{ - return hwptr_peekl(mgaptr.linear_map, (mga_readbuffer_ptr + offset) * 4); -} - - - -/* Desc: color decomposition - * - * In : pixel offset, array of integers to hold color components (R, G, B, A) - * Out : - - * - * Note: uses current read buffer - */ -static void _mga_getrgba8 (unsigned int offset, unsigned char rgba[4]) -{ - int c = _mga_getpixel8(offset); - rgba[0] = _rgb_scale_3[(c >> 5) & 0x7]; - rgba[1] = _rgb_scale_3[(c >> 2) & 0x7]; - rgba[2] = _rgb_scale_2[c & 0x3]; - rgba[3] = 255; -} -static void _mga_getrgba15 (unsigned int offset, unsigned char rgba[4]) -{ - int c = _mga_getpixel15(offset); - rgba[0] = _rgb_scale_5[(c >> 10) & 0x1F]; - rgba[1] = _rgb_scale_5[(c >> 5) & 0x1F]; - rgba[2] = _rgb_scale_5[c & 0x1F]; - rgba[3] = 255; -} -static void _mga_getrgba16 (unsigned int offset, unsigned char rgba[4]) -{ - int c = _mga_getpixel16(offset); - rgba[0] = _rgb_scale_5[(c >> 11) & 0x1F]; - rgba[1] = _rgb_scale_6[(c >> 5) & 0x3F]; - rgba[2] = _rgb_scale_5[c & 0x1F]; - rgba[3] = 255; -} -static void _mga_getrgba32 (unsigned int offset, unsigned char rgba[4]) -{ - int c = _mga_getpixel32(offset); - rgba[0] = c >> 16; - rgba[1] = c >> 8; - rgba[2] = c; - rgba[3] = c >> 24; -} - - - -/* Desc: RGB flat line - * - * In : - * Out : - * - * Note: - */ -void mga_draw_line_rgb_flat (const MGAvertex *v1, const MGAvertex *v2) -{ - unsigned long color; - int x1 = v1->win[0]; - int y1 = v1->win[1]; - int x2 = v2->win[0]; - int y2 = v2->win[1]; - - if ((x1 == x2) && (y1 == y2)) { - return; - } - - mga_select(); - - /* set engine state */ - if (__operation != OP_DRAWLINE) { - mga_fifo(1); - mga_outl(M_DWGCTL, OP_DRAWLINE); - __operation = OP_DRAWLINE; - } - - color = mga_mixrgb_full(v2->color); - - /* draw the line */ - mga_fifo(3); - mga_outl(M_FCOL, color); - mga_outl(M_XYSTRT, (y1<<16) | x1); - mga_outl(M_XYEND | M_EXEC, (y2<<16) | x2); -} - - - -/* Desc: RGB flat Z-less line - * - * In : - * Out : - * - * Note: I never figured out "diagonal increments" - */ -void mga_draw_line_rgb_flat_zless (const MGAvertex *v1, const MGAvertex *v2) -{ - int z1, dz; - int x1 = v1->win[0]; - int y1 = v1->win[1]; - int x2 = v2->win[0]; - int y2 = v2->win[1]; - int dx = abs(x2 - x1); - int dy = abs(y2 - y1); - - if ((dx == 0) && (dy == 0)) { - return; - } - - mga_select(); - - /* set engine state */ - if (__operation != OP_DRAWLINE_ZI) { - mga_fifo(1); - mga_outl(M_DWGCTL, OP_DRAWLINE_ZI); - __operation = OP_DRAWLINE_ZI; - } - - if (dx < dy) { - dx = dy; - } - - z1 = v1->win[2] << 15; - dz = ((v2->win[2] << 15) - z1) / dx; - - /* draw the line */ - mga_fifo(14); - mga_outl(M_DR0, z1); - mga_outl(M_DR2, dz); - mga_outl(M_DR3, dz); - mga_outl(M_DR4, v2->color[0] << 15); - mga_outl(M_DR6, 0); - mga_outl(M_DR7, 0); - mga_outl(M_DR8, v2->color[1] << 15); - mga_outl(M_DR10, 0); - mga_outl(M_DR11, 0); - mga_outl(M_DR12, v2->color[2] << 15); - mga_outl(M_DR14, 0); - mga_outl(M_DR15, 0); - mga_outl(M_XYSTRT, (y1<<16) | x1); - mga_outl(M_XYEND | M_EXEC, (y2<<16) | x2); -} - - - -/* Desc: RGB iterated line - * - * In : - * Out : - * - * Note: I never figured out "diagonal increments" - */ -void mga_draw_line_rgb_iter (const MGAvertex *v1, const MGAvertex *v2) -{ - int r1, g1, b1; - int dr, dg, db; - int x1 = v1->win[0]; - int y1 = v1->win[1]; - int x2 = v2->win[0]; - int y2 = v2->win[1]; - int dx = abs(x2 - x1); - int dy = abs(y2 - y1); - - if ((dx == 0) && (dy == 0)) { - return; - } - - mga_select(); - - /* set engine state */ - if (__operation != OP_DRAWLINE_I) { - mga_fifo(1); - mga_outl(M_DWGCTL, OP_DRAWLINE_I); - __operation = OP_DRAWLINE_I; - } - - if (dx < dy) { - dx = dy; - } - - r1 = v1->color[0] << 15; - g1 = v1->color[1] << 15; - b1 = v1->color[2] << 15; - dr = ((v2->color[0] << 15) - r1) / dx; - dg = ((v2->color[1] << 15) - g1) / dx; - db = ((v2->color[2] << 15) - b1) / dx; - - /* draw the line */ - mga_fifo(11); - mga_outl(M_DR4, r1); - mga_outl(M_DR6, dr); - mga_outl(M_DR7, dr); - mga_outl(M_DR8, g1); - mga_outl(M_DR10, dg); - mga_outl(M_DR11, dg); - mga_outl(M_DR12, b1); - mga_outl(M_DR14, db); - mga_outl(M_DR15, db); - mga_outl(M_XYSTRT, (y1<<16) | x1); - mga_outl(M_XYEND | M_EXEC, (y2<<16) | x2); -} - - - -/* Desc: RGB iterated Z-less line - * - * In : - * Out : - * - * Note: I never figured out "diagonal increments" - */ -void mga_draw_line_rgb_iter_zless (const MGAvertex *v1, const MGAvertex *v2) -{ - int z1, dz; - int r1, g1, b1; - int dr, dg, db; - int x1 = v1->win[0]; - int y1 = v1->win[1]; - int x2 = v2->win[0]; - int y2 = v2->win[1]; - int dx = abs(x2 - x1); - int dy = abs(y2 - y1); - - if ((dx == 0) && (dy == 0)) { - return; - } - - mga_select(); - - /* set engine state */ - if (__operation != OP_DRAWLINE_ZI) { - mga_fifo(1); - mga_outl(M_DWGCTL, OP_DRAWLINE_ZI); - __operation = OP_DRAWLINE_ZI; - } - - if (dx < dy) { - dx = dy; - } - - z1 = v1->win[2] << 15; - dz = ((v2->win[2] << 15) - z1) / dx; - - r1 = v1->color[0] << 15; - g1 = v1->color[1] << 15; - b1 = v1->color[2] << 15; - dr = ((v2->color[0] << 15) - r1) / dx; - dg = ((v2->color[1] << 15) - g1) / dx; - db = ((v2->color[2] << 15) - b1) / dx; - - /* draw the line */ - mga_fifo(14); - mga_outl(M_DR0, z1); - mga_outl(M_DR2, dz); - mga_outl(M_DR3, dz); - mga_outl(M_DR4, r1); - mga_outl(M_DR6, dr); - mga_outl(M_DR7, dr); - mga_outl(M_DR8, g1); - mga_outl(M_DR10, dg); - mga_outl(M_DR11, dg); - mga_outl(M_DR12, b1); - mga_outl(M_DR14, db); - mga_outl(M_DR15, db); - mga_outl(M_XYSTRT, (y1<<16) | x1); - mga_outl(M_XYEND | M_EXEC, (y2<<16) | x2); -} - - - -/* Desc: RGB flat triangle - * - * In : - * Out : - * - * Note: - */ -#define TAG mga_draw_tri_rgb_flat -#define CULL -#define SETUP_CODE \ - if (__operation != OP_DRAWTRAP) { \ - mga_fifo(1); \ - mga_outl(M_DWGCTL, OP_DRAWTRAP); \ - __operation = OP_DRAWTRAP; \ - } -#include "m_ttemp.h" - - - -/* Desc: RGB flat Z-less triangle - * - * In : - * Out : - * - * Note: - */ -#define TAG mga_draw_tri_rgb_flat_zless -#define CULL -#define INTERP_Z -#define SETUP_CODE \ - if (__operation != OP_DRAWTRAP_ZI) { \ - mga_fifo(1); \ - mga_outl(M_DWGCTL, OP_DRAWTRAP_ZI); \ - __operation = OP_DRAWTRAP_ZI; \ - } -#include "m_ttemp.h" - - - -/* Desc: RGB iterated triangle - * - * In : - * Out : - * - * Note: - */ -#define TAG mga_draw_tri_rgb_iter -#define CULL -#define INTERP_RGB -#define SETUP_CODE \ - if (__operation != OP_DRAWTRAP_I) { \ - mga_fifo(1); \ - mga_outl(M_DWGCTL, OP_DRAWTRAP_I); \ - __operation = OP_DRAWTRAP_I; \ - } -#include "m_ttemp.h" - - - -/* Desc: RGB iterated Z-less triangle - * - * In : - * Out : - * - * Note: - */ -#define TAG mga_draw_tri_rgb_iter_zless -#define CULL -#define INTERP_Z -#define INTERP_RGB -#define SETUP_CODE \ - if (__operation != OP_DRAWTRAP_ZI) { \ - mga_fifo(1); \ - mga_outl(M_DWGCTL, OP_DRAWTRAP_ZI); \ - __operation = OP_DRAWTRAP_ZI; \ - } -#include "m_ttemp.h" - - - -/* Desc: RGB flat rectangle - * - * In : - * Out : - * - * Note: - */ -void mga_draw_rect_rgb_flat (int left, int top, int width, int height, int color) -{ - if (__bpp == 8) { - color |= color << 8; - } - if (__bpp <= 16) { - color |= color << 16; - } - - mga_select(); - - /* set engine state */ - if (__operation != OP_DRAWRECT) { - - mga_fifo(1); - mga_outl(M_DWGCTL, OP_DRAWRECT); - __operation = OP_DRAWRECT; - } - - /* draw the rectangle */ - mga_fifo(3); - mga_outl(M_FCOL, color); - mga_outl(M_FXBNDRY, ((left+width)<<16) | left); - mga_outl(M_YDSTLEN | M_EXEC, (top<<16) | height); -} - - - -/* Desc: 32RGB textured span - * - * In : - * Out : - * - * Note: 0 <= width <= 7*1024 - */ -void mga_draw_span_rgb_tx32 (int left, int top, int width, const unsigned long *bitmap) -{ - int i; - - if (!width) { - return; - } - - mga_select(); - - /* set engine state */ - if (__operation != OP_DRAWRECT_TX32BGR) { - mga_fifo(1); - mga_outl(M_DWGCTL, OP_DRAWRECT_TX32BGR); - __operation = OP_DRAWRECT_TX32BGR; - } - - /* draw the rectangle */ - mga_fifo(2); - mga_outl(M_FXBNDRY, ((left+width)<<16) | left); - mga_outl(M_YDSTLEN | M_EXEC, (top<<16) | 1); - - /* copy data to the pseudo-dma window */ - i = 0; - do { - mga_outl(i, *bitmap); - bitmap++; - i += 4; - } while (--width); -} - - - -/* Desc: 24RGB textured span - * - * In : - * Out : - * - * Note: 0 <= width <= 7*1024 - */ -void mga_draw_span_rgb_tx24 (int left, int top, int width, const unsigned long *bitmap) -{ - int i; - - mga_select(); - - /* set engine state */ - if (__operation != OP_DRAWRECT_TX24BGR) { - mga_fifo(1); - mga_outl(M_DWGCTL, OP_DRAWRECT_TX24BGR); - __operation = OP_DRAWRECT_TX24BGR; - } - - /* draw the rectangle */ - mga_fifo(2); - mga_outl(M_FXBNDRY, ((left+width)<<16) | left); - mga_outl(M_YDSTLEN | M_EXEC, (top<<16) | 1); - - /* copy data to the pseudo-dma window */ - i = 0; - width = (width * 3 + 3) / 4; - while (width) { - mga_outl(i & (7 * 1024 - 1), *bitmap); - bitmap++; - i += 4; - width--; - } -} - - - -/* Desc: 32RGB textured rectangle - * - * In : - * Out : - * - * Note: - */ -void mga_draw_rect_rgb_tx32 (int left, int top, int width, int height, const unsigned long *bitmap) -{ - int i; - - mga_select(); - - /* set engine state */ - if (__operation != OP_DRAWRECT_TX32BGR) { - mga_fifo(1); - mga_outl(M_DWGCTL, OP_DRAWRECT_TX32BGR); - __operation = OP_DRAWRECT_TX32BGR; - } - - /* draw the rectangle */ - mga_fifo(2); - mga_outl(M_FXBNDRY, ((left+width)<<16) | left); - mga_outl(M_YDSTLEN | M_EXEC, (top<<16) | height); - - /* copy data to the pseudo-dma window */ - i = 0; - width *= height; - while (width) { - mga_outl(i & (7 * 1024 - 1), *bitmap); - bitmap++; - i += 4; - width--; - } -} - - - -/* Desc: 24RGB textured rectangle - * - * In : - * Out : - * - * Note: - */ -void mga_draw_rect_rgb_tx24 (int left, int top, int width, int height, const unsigned long *bitmap) -{ - int i; - - mga_select(); - - /* set engine state */ - if (__operation != OP_DRAWRECT_TX24BGR) { - mga_fifo(1); - mga_outl(M_DWGCTL, OP_DRAWRECT_TX24BGR); - __operation = OP_DRAWRECT_TX24BGR; - } - - /* draw the rectangle */ - mga_fifo(2); - mga_outl(M_FXBNDRY, ((left+width)<<16) | left); - mga_outl(M_YDSTLEN | M_EXEC, (top<<16) | height); - - /* copy data to the pseudo-dma window */ - i = 0; - width = (width * height * 3 + 3) / 4; - while (width) { - mga_outl(i & (7 * 1024 - 1), *bitmap); - bitmap++; - i += 4; - width--; - } -} - - - -/* Desc: copy 32RGB image to screen - * - * In : - * Out : - * - * Note: - */ -void mga_iload_32RGB (int left, int top, int width, int height, const unsigned long *bitmap) -{ - int i; - - mga_select(); - - /* set engine state */ - if (__operation != OP_ILOAD_32BGR) { - mga_fifo(1); - mga_outl(M_DWGCTL, OP_ILOAD_32BGR); - __operation = OP_ILOAD_32BGR; - } - - /* draw the bitmap */ - mga_fifo(5); - mga_outl(M_AR0, width-1); - mga_outl(M_AR3, 0); - mga_outl(M_AR5, 0); - mga_outl(M_FXBNDRY, ((left+width-1)<<16) | left); - mga_outl(M_YDSTLEN | M_EXEC, (top<<16) | height); - - /* copy data to the pseudo-dma window */ - i = 0; - width *= height; - while (width) { - mga_outl(i & (7 * 1024 - 1), *bitmap); - bitmap++; - i += 4; - width--; - } -} - - - -/* Desc: copy 24RGB image to screen - * - * In : - * Out : - * - * Note: - */ -void mga_iload_24RGB (int left, int top, int width, int height, const unsigned long *bitmap) -{ - int i; - - mga_select(); - - /* set engine state */ - if (__operation != OP_ILOAD_24BGR) { - mga_fifo(1); - mga_outl(M_DWGCTL, OP_ILOAD_24BGR); - __operation = OP_ILOAD_24BGR; - } - - /* draw the bitmap */ - mga_fifo(5); - mga_outl(M_AR0, width-1); - mga_outl(M_AR3, 0); - mga_outl(M_AR5, 0); - mga_outl(M_FXBNDRY, ((left+width-1)<<16) | left); - mga_outl(M_YDSTLEN | M_EXEC, (top<<16) | height); - - /* copy data to the pseudo-dma window */ - i = 0; - width = (width * height * 3 + 3) / 4; - while (width) { - mga_outl(i & (7 * 1024 - 1), *bitmap); - bitmap++; - i += 4; - width--; - } -} - - - -/* Desc: get Z-buffer value - * - * In : - * Out : - * - * Note: - */ -unsigned short mga_getz (int offset) -{ - return hwptr_peekw(mgaptr.linear_map, zorg + (mga_readbuffer_ptr + offset) * 2); -} - - - -/* Desc: put Z-buffer value - * - * In : - * Out : - * - * Note: - */ -void mga_setz (int offset, unsigned short z) -{ - hwptr_pokew(mgaptr.linear_map, zorg + (mga_writebuffer_ptr + offset) * 2, z); -} - - - -/* Desc: clear Z-buffer - * - * In : - * Out : - * - * Note: uses current write buffer - */ -static void _mga_clear_zed (int left, int top, int width, int height, unsigned short z) -{ - if (__bpp == 16) { - /* GPU store (high bandwidth) - * Hack alert: - * can cause problems with concurrent FB accesses - */ - mga_select(); - mga_fifo(1); - mga_outl(M_YDSTORG, mga_writebuffer_ptr + zorg/2); - mga_draw_rect_rgb_flat(left, top, width, height, z); - mga_fifo(1); - mga_outl(M_YDSTORG, mga_writebuffer_ptr); - } else { - /* CPU store */ - unsigned long i, zz = (z<<16) | z; - unsigned long ofs = zorg + (top * __pixwidth + left + mga_writebuffer_ptr) * 2; - hwptr_select(mgaptr.linear_map); - while (height--) { - i = width/2; - while (i--) { - hwptr_nspokel(mgaptr.linear_map, ofs, zz); - ofs += 4; - } - if (width & 1) { - hwptr_nspokew(mgaptr.linear_map, ofs, z); - ofs += 2; - } - ofs += (__pixwidth - width) * 2; - } - } -} - - - -/* Desc: clear color- and Z-buffer - * - * In : front = clear front buffer - * back = clear back buffer - * zed = clear depth buffer - * left = leftmost pixel to be cleared - * top = starting line - * width = number of pixels - * height = number of lines - * color = color to clear to - * z = z value (ignored if zed==0) - * Out : - * - * Note: - */ -void mga_clear (int front, int back, int zed, int left, int top, int width, int height, int color, unsigned short z) -{ - if (front) { - if (mga_writebuffer == MGA_FRONTBUFFER) { - mga_draw_rect_rgb_flat(left, top, width, height, color); - if (zed) { - _mga_clear_zed(left, top, width, height, z); - } - front = 0; - } - } - if (back) { - if (mga_writebuffer == MGA_BACKBUFFER) { - mga_draw_rect_rgb_flat(left, top, width, height, color); - if (zed) { - _mga_clear_zed(left, top, width, height, z); - } - back = 0; - } - } - if (front) { - int old = mga_writebuffer; - mga_set_writebuffer(MGA_FRONTBUFFER); - mga_draw_rect_rgb_flat(left, top, width, height, color); - if (zed) { - _mga_clear_zed(left, top, width, height, z); - } - mga_set_writebuffer(old); - front = 0; - } - if (back) { - int old = mga_writebuffer; - mga_set_writebuffer(MGA_BACKBUFFER); - mga_draw_rect_rgb_flat(left, top, width, height, color); - if (zed) { - _mga_clear_zed(left, top, width, height, z); - } - mga_set_writebuffer(old); - back = 0; - } -} - - - -/* Desc: Attempts to enter specified video mode. - * - * In : ptr to mode structure, number of pages, Z-buffer request, refresh rate - * Out : 0 if success - * - * Note: also set up the accelerator engine - */ -int mga_open (int width, int height, int bpp, int buffers, int zbuffer, int refresh) -{ - static int mill_strides[] = { 640, 768, 800, 960, 1024, 1152, 1280, 1600, 1920, 2048, 0 }; - unsigned int i, used; - MGA_MODE *p; - - if (mga_hw_init(&vram, &interleave, card_name) == 0) { - return -1; - } - - if ((p = mga_mode_find(width, height, bpp)) == NULL) { - return -1; - } - - __bpp = p->bpp; - __width = __pagewidth = p->xres; - __height = p->yres; - - if (buffers > 1) { - __pagewidth = _mga_fix_scans(__pagewidth); - __pixwidth = __pagewidth * buffers; - } else { - __pixwidth = __pagewidth; - __pixwidth = _mga_fix_scans(__pixwidth); - } - - for (i=0; mill_strides[i]; i++) { - if (__pixwidth <= mill_strides[i]) { - __pixwidth = mill_strides[i]; - break; - } - } - - __bypp = (__bpp+7)/8; - __bytwidth = __pixwidth * __bypp; - - /* compute used memory: framebuffer + zbuffer */ - used = __bytwidth * __height; - if (zbuffer) { - zorg = (used + 511) & ~511; - /* Hack alert: - * a 16-bit Z-buffer size is (stride_in_pixels * number_of_lines * 2) - * We cannot mess with the Z-buffer width, but we might decrease the - * number of lines, if the user requests less than (screen_height). For - * example with a 2MB card, one can have 640x480x16 display with 2 color - * buffers and Z-buffer if the maximum requested height is 339: - * Total = (640*480 * 2 + 640*339 * 2) * 2 - * However, this means the user must not write beyond the window's height - * and if we'll ever implement moveable windows, we'll have to reconsider - * this hack. - */ -#if 1 - __zheight = height; /* smaller */ - used = zorg + __pixwidth * 2 * __zheight; -#else - __zheight = __height; - used = zorg + __pixwidth * 2 * __zheight; -#endif - } - - if (mill_strides[i] && (vram>=used)) { - /* enter mode */ - mga_mode_switch(p, refresh); - /* change the scan line length */ - _mga_ralter(M_CRTC_INDEX, 0x14, 0x40, 0); /* disable DWORD */ - _mga_ralter(M_CRTC_INDEX, 0x17, 0x40, 0x40); /* wbmode = BYTE */ - if (interleave) { - _mga_rwrite(M_CRTC_INDEX, 0x13, __bytwidth/16); - _mga_ralter(M_CRTC_EXT_INDEX, 0, 0x30, ((__bytwidth/16)>>4)&0x30); - } else { - _mga_rwrite(M_CRTC_INDEX, 0x13, __bytwidth/8); - _mga_ralter(M_CRTC_EXT_INDEX, 0, 0x30, ((__bytwidth/8)>>4)&0x30); - } - } else { - return -1; - } - - /* setup buffers */ - mga_frontbuffer_ptr = 0; - if (buffers > 1) { - mga_backbuffer_ptr = __pagewidth; - mga_set_readbuffer(MGA_BACKBUFFER); - mga_set_writebuffer(MGA_BACKBUFFER); - } else { - mga_backbuffer_ptr = 0; - mga_set_readbuffer(MGA_FRONTBUFFER); - mga_set_writebuffer(MGA_FRONTBUFFER); - } - mga_display_start(mga_frontbuffer_ptr, __scrollx = 0, __scrolly = 0, 1); - - /* set up the accelerator engine */ - mga_select(); - - mga_fifo(8); - mga_outl(M_PITCH, __pixwidth); - mga_outl(M_PLNWT, 0xFFFFFFFF); - mga_outl(M_OPMODE, M_DMA_BLIT); - mga_outl(M_CXBNDRY, 0xFFFF0000); - mga_outl(M_YTOP, 0x00000000); - mga_outl(M_YBOT, 0x007FFFFF); - mga_outl(M_ZORG, zorg); - -#define INITPTR(bpp) \ - mga_putpixel = _mga_putpixel##bpp; \ - mga_getrgba = _mga_getrgba##bpp; \ - mga_getpixel = _mga_getpixel##bpp; \ - mga_mixrgb = _mga_mixrgb##bpp; \ - mga_mixrgb_full = _mga_mixrgb##bpp##_full - - switch (__bpp) { - case 8: - mga_outl(M_MACCESS, 0); - INITPTR(8); - break; - case 15: - mga_outl(M_MACCESS, 0x80000001); - INITPTR(15); - break; - case 16: - mga_outl(M_MACCESS, 1); - INITPTR(16); - break; - case 32: - mga_outl(M_MACCESS, 2); - INITPTR(32); - break; - } - -#undef INITPTR - - /* disable VGA aperture */ - i = mga_inb(M_MISC_R); - mga_outb(M_MISC_W, i & ~2); - - /* clear Z-buffer (if any) */ - if (zbuffer) { - unsigned long ofs = zorg; - unsigned long len = zorg + __pixwidth * 2 * __zheight; - - hwptr_select(mgaptr.linear_map); - for (; ofs +#include +#include + +#include "../internal.h" +#include "mga_reg.h" +#include "mga_hw.h" +#include "mga_mode.h" +#include "mga.h" + + + +/* cached drawing engine state */ +#define OP_NONE 0 + +#define OP_DRAWRECT (\ + M_DWG_TRAP | /* opcod */ \ + M_DWG_BLK | /* atype */ \ + /* linear */ \ + M_DWG_NOZCMP | /* zmode */ \ + M_DWG_SOLID | /* solid */ \ + M_DWG_ARZERO | /* arzero */ \ + M_DWG_SGNZERO | /* sgnzero */ \ + M_DWG_SHFTZERO | /* shftzero */ \ + M_DWG_BOP_SRC /* bop */ \ + /* trans */ \ + /* bltmod */ \ + /* pattern */ \ + /* transc */ ) +#define OP_DRAWRECT_TX32BGR (\ + M_DWG_TEXTURE_TRAP | /* opcod */ \ + M_DWG_I | /* atype */ \ + /* linear */ \ + M_DWG_NOZCMP | /* zmode */ \ + /* solid */ \ + M_DWG_ARZERO | /* arzero */ \ + M_DWG_SGNZERO | /* sgnzero */ \ + M_DWG_SHFTZERO | /* shftzero */ \ + M_DWG_BOP_SRC | /* bop */ \ + /* trans */ \ + M_DWG_BU32BGR /* bltmod */ \ + /* pattern */ \ + /* transc */ ) +#define OP_DRAWRECT_TX24BGR (\ + M_DWG_TEXTURE_TRAP | /* opcod */ \ + M_DWG_I | /* atype */ \ + /* linear */ \ + M_DWG_NOZCMP | /* zmode */ \ + /* solid */ \ + M_DWG_ARZERO | /* arzero */ \ + M_DWG_SGNZERO | /* sgnzero */ \ + M_DWG_SHFTZERO | /* shftzero */ \ + M_DWG_BOP_SRC | /* bop */ \ + /* trans */ \ + M_DWG_BU24BGR /* bltmod */ \ + /* pattern */ \ + /* transc */ ) +#define OP_DRAWLINE (\ + M_DWG_AUTOLINE_CLOSE | /* opcod */ \ + M_DWG_RPL | /* atype */ \ + /* linear */ \ + M_DWG_NOZCMP | /* zmode */ \ + M_DWG_SOLID | /* solid */ \ + /* arzero */ \ + /* sgnzero */ \ + M_DWG_SHFTZERO | /* shftzero */ \ + M_DWG_BOP_SRC | /* bop */ \ + /* trans */ \ + M_DWG_BFCOL /* bltmod */ \ + /* pattern */ \ + /* transc */ ) +#define OP_DRAWLINE_I (\ + M_DWG_AUTOLINE_CLOSE | /* opcod */ \ + M_DWG_I | /* atype */ \ + /* linear */ \ + M_DWG_NOZCMP | /* zmode */ \ + /* solid */ \ + /* arzero */ \ + /* sgnzero */ \ + /* shftzero */ \ + M_DWG_BOP_SRC | /* bop */ \ + /* trans */ \ + M_DWG_BFCOL /* bltmod */ \ + /* pattern */ \ + /* transc */ ) +#define OP_DRAWLINE_ZI (\ + M_DWG_AUTOLINE_CLOSE | /* opcod */ \ + M_DWG_ZI | /* atype */ \ + /* linear */ \ + M_DWG_ZLT | /* zmode */ \ + /* solid */ \ + /* arzero */ \ + /* sgnzero */ \ + /* shftzero */ \ + M_DWG_BOP_SRC | /* bop */ \ + /* trans */ \ + M_DWG_BFCOL /* bltmod */ \ + /* pattern */ \ + /* transc */ ) +#define OP_DRAWTRAP (\ + M_DWG_TRAP | /* opcod */ \ + M_DWG_BLK | /* atype */ \ + /* linear */ \ + M_DWG_NOZCMP | /* zmode */ \ + M_DWG_SOLID | /* solid */ \ + /* arzero */ \ + /* sgnzero */ \ + M_DWG_SHFTZERO | /* shftzero */ \ + M_DWG_BOP_SRC /* bop */ \ + /* trans */ \ + /* bltmod */ \ + /* pattern */ \ + /* transc */ ) +#define OP_DRAWTRAP_I (\ + M_DWG_TRAP | /* opcod */ \ + M_DWG_I | /* atype */ \ + /* linear */ \ + M_DWG_NOZCMP | /* zmode */ \ + /* solid */ \ + /* arzero */ \ + /* sgnzero */ \ + M_DWG_SHFTZERO | /* shftzero */ \ + M_DWG_BOP_SRC /* bop */ \ + /* trans */ \ + /* bltmod */ \ + /* pattern */ \ + /* transc */ ) +#define OP_DRAWTRAP_ZI (\ + M_DWG_TRAP | /* opcod */ \ + M_DWG_ZI | /* atype */ \ + /* linear */ \ + M_DWG_ZLT | /* zmode */ \ + /* solid */ \ + /* arzero */ \ + /* sgnzero */ \ + M_DWG_SHFTZERO | /* shftzero */ \ + M_DWG_BOP_SRC /* bop */ \ + /* trans */ \ + /* bltmod */ \ + /* pattern */ \ + /* transc */ ) +#define OP_ILOAD_32BGR (\ + M_DWG_ILOAD | /* opcod */ \ + M_DWG_RPL | /* atype */ \ + /* linear */ \ + /* zmode */ \ + /* solid */ \ + /* arzero */ \ + M_DWG_SGNZERO | /* sgnzero */ \ + M_DWG_SHFTZERO | /* shftzero */ \ + M_DWG_BOP_SRC | /* bop */ \ + /* trans */ \ + M_DWG_BU32BGR /* bltmod */ \ + /* pattern */ \ + /* transc */ ) +#define OP_ILOAD_24BGR (\ + M_DWG_ILOAD | /* opcod */ \ + M_DWG_RPL | /* atype */ \ + /* linear */ \ + /* zmode */ \ + /* solid */ \ + /* arzero */ \ + M_DWG_SGNZERO | /* sgnzero */ \ + M_DWG_SHFTZERO | /* shftzero */ \ + M_DWG_BOP_SRC | /* bop */ \ + /* trans */ \ + M_DWG_BU24BGR /* bltmod */ \ + /* pattern */ \ + /* transc */ ) + + + +/* internal hardware data structures */ +static int interleave; +static unsigned long zorg; +static unsigned long vram; +static char card_name[80]; + + + +/* some info about current mode */ +static int __bpp, __bypp; +static int __pixwidth, __bytwidth, __pagewidth, __width, __height, __zheight; +static int __operation; +static int __scrollx, __scrolly; + + + +/* buffers */ +static int mga_readbuffer, mga_writebuffer; +static long mga_readbuffer_ptr, mga_writebuffer_ptr; +static long mga_backbuffer_ptr, mga_frontbuffer_ptr; + + + +/* lookup table for scaling 2 bit colors up to 8 bits */ +static int _rgb_scale_2[4] = { + 0, 85, 170, 255 +}; + +/* lookup table for scaling 3 bit colors up to 8 bits */ +static int _rgb_scale_3[8] = { + 0, 36, 73, 109, 146, 182, 219, 255 +}; + +/* lookup table for scaling 5 bit colors up to 8 bits */ +static int _rgb_scale_5[32] = { + 0, 8, 16, 25, 33, 41, 49, 58, + 66, 74, 82, 90, 99, 107, 115, 123, + 132, 140, 148, 156, 165, 173, 181, 189, + 197, 206, 214, 222, 230, 239, 247, 255 +}; + +/* lookup table for scaling 6 bit colors up to 8 bits */ +static int _rgb_scale_6[64] = { + 0, 4, 8, 12, 16, 20, 24, 28, + 32, 36, 40, 45, 49, 53, 57, 61, + 65, 69, 73, 77, 81, 85, 89, 93, + 97, 101, 105, 109, 113, 117, 121, 125, + 130, 134, 138, 142, 146, 150, 154, 158, + 162, 166, 170, 174, 178, 182, 186, 190, + 194, 198, 202, 206, 210, 215, 219, 223, + 227, 231, 235, 239, 243, 247, 251, 255 +}; + + + +/* + * pixel/color routines + */ +void (*mga_putpixel) (unsigned int offset, int color); +int (*mga_getpixel) (unsigned int offset); +void (*mga_getrgba) (unsigned int offset, unsigned char rgba[4]); +int (*mga_mixrgb) (const unsigned char rgb[]); +static int (*mga_mixrgb_full) (const unsigned char rgb[]); + + + +/* mga_fifo: + * Waits until there are at least free slots in the FIFO buffer. + */ +#define mga_fifo(n) do { } while (mga_inb(M_FIFOSTATUS) < (n)) + + + +static int _mga_rread (int port, int index) +{ + mga_select(); + mga_outb(port, index); + return mga_inb(port+1); +} + + + +static void _mga_rwrite (int port, int index, int v) +{ + mga_select(); + mga_outb(port, index); + mga_outb(port+1, v); +} + + + +static void _mga_ralter (int port, int index, int mask, int v) +{ + int temp; + temp = _mga_rread(port, index); + temp &= (~mask); + temp |= (v & mask); + _mga_rwrite(port, index, temp); +} + + + +/* WaitTillIdle: + * Delay until the hardware controller has finished drawing. + */ +void mga_wait_idle (void) +{ + int tries = 2; + + /*hwptr_unselect(oldptr);*/ + + mga_select(); + + while (tries--) { + do { + } while (!(mga_inl(M_FIFOSTATUS) & 0x200)); + + do { + } while (mga_inl(M_STATUS) & 0x10000); + + mga_outb(M_CRTC_INDEX, 0); + } + + /*hwptr_select(oldptr);*/ +} + + + +/* Desc: Waits for the next vertical sync period. + * + * In : + * Out : + * + * Note: + */ +static void _mga_wait_retrace (void) +{ + int t1 = 0; + int t2 = 0; + + do { + t1 = t2; + t2 = mga_inl(M_VCOUNT); + } while (t2 >= t1); +} + + + +/* Desc: fix scan lines + * + * In : + * Out : + * + * Note: + */ +static unsigned long _mga_fix_scans (unsigned long l) +{ + unsigned long m = 0; + + switch (__bpp) { + case 8: + m = interleave?128:64; + break; + case 15: + case 16: + m = interleave?64:32; + break; + case 24: + m = interleave?128:64; + break; + case 32: + m = 32; + break; + } + + m -= 1; + return (l + m) & ~m; +} + + + +/* Desc: HW scrolling function + * + * In : + * Out : + * + * Note: view Z-buffer in 16bit modes: _mga_display_start(0, 0, __height, 1) + */ +void mga_display_start (long boffset, long x, long y, long waitVRT) +{ + long addr; + + mga_select(); + + if (waitVRT >= 0) { + + addr = __bytwidth * y + (boffset + x) * __bypp; + + if (interleave) { + addr /= 8; + } else { + addr /= 4; + } + + _mga_rwrite(M_CRTC_INDEX, 0x0D, (addr)&0xFF); + _mga_rwrite(M_CRTC_INDEX, 0x0C, (addr>>8)&0xFF); + _mga_ralter(M_CRTC_EXT_INDEX, 0, 0x0F, (addr>>16)&0x0F); + + while (waitVRT--) { + _mga_wait_retrace(); + } + } + + __scrollx = x; + __scrolly = y; +} + + + +/* Desc: set READ buffer + * + * In : either FRONT or BACK buffer + * Out : + * + * Note: + */ +void mga_set_readbuffer (int buffer) +{ + mga_readbuffer = buffer; + + mga_readbuffer_ptr = (mga_readbuffer == MGA_FRONTBUFFER) ? mga_frontbuffer_ptr : mga_backbuffer_ptr; +} + + + +/* Desc: set WRITE buffer + * + * In : either FRONT or BACK buffer + * Out : + * + * Note: + */ +void mga_set_writebuffer (int buffer) +{ + mga_writebuffer = buffer; + + mga_writebuffer_ptr = (mga_writebuffer == MGA_FRONTBUFFER) ? mga_frontbuffer_ptr : mga_backbuffer_ptr; + + mga_select(); + mga_fifo(1); + mga_outl(M_YDSTORG, mga_writebuffer_ptr); + + __operation = OP_NONE; +} + + + +/* Desc: swap buffers + * + * In : number of vertical retraces to wait + * Out : + * + * Note: + */ +void mga_swapbuffers (int swapinterval) +{ + /* flip the buffers */ + mga_backbuffer_ptr ^= __pagewidth; + mga_frontbuffer_ptr ^= __pagewidth; + + /* update READ/WRITE pointers */ + mga_set_readbuffer(mga_readbuffer); + mga_set_writebuffer(mga_writebuffer); + + /* make sure we always see the FRONT buffer */ + mga_display_start(mga_frontbuffer_ptr, __scrollx, __scrolly, swapinterval); +} + + + +/* Desc: color composition (w/o ALPHA) + * + * In : array of integers (R, G, B) + * Out : color + * + * Note: - + */ +static __inline int _mga_mixrgb8 (const unsigned char rgb[]) +{ + return (rgb[0]&0xe0)|((rgb[1]>>5)<<2)|(rgb[2]>>6); +} +static __inline int _mga_mixrgb15 (const unsigned char rgb[]) +{ + return ((rgb[0]>>3)<<10)|((rgb[1]>>3)<<5)|(rgb[2]>>3); +} +static __inline int _mga_mixrgb16 (const unsigned char rgb[]) +{ + return ((rgb[0]>>3)<<11)|((rgb[1]>>2)<<5)|(rgb[2]>>3); +} +static __inline int _mga_mixrgb32 (const unsigned char rgb[]) +{ + return (rgb[0]<<16)|(rgb[1]<<8)|(rgb[2]); +} + + + +/* Desc: color composition (w/o ALPHA) + replication + * + * In : array of integers (R, G, B) + * Out : color + * + * Note: - + */ +static int _mga_mixrgb8_full (const unsigned char rgb[]) +{ + int color = _mga_mixrgb8(rgb); + color |= color<<8; + return (color<<16) | color; +} +static int _mga_mixrgb15_full (const unsigned char rgb[]) +{ + int color = _mga_mixrgb15(rgb); + return (color<<16) | color; +} +static int _mga_mixrgb16_full (const unsigned char rgb[]) +{ + int color = _mga_mixrgb16(rgb); + return (color<<16) | color; +} +#define _mga_mixrgb32_full _mga_mixrgb32 + + + +/* Desc: putpixel + * + * In : pixel offset, pixel value + * Out : - + * + * Note: uses current write buffer + */ +static void _mga_putpixel8 (unsigned int offset, int color) +{ + hwptr_pokeb(mgaptr.linear_map, mga_writebuffer_ptr + offset, color); +} +#define _mga_putpixel15 _mga_putpixel16 +static void _mga_putpixel16 (unsigned int offset, int color) +{ + hwptr_pokew(mgaptr.linear_map, (mga_writebuffer_ptr + offset) * 2, color); +} +static void _mga_putpixel32 (unsigned int offset, int color) +{ + hwptr_pokel(mgaptr.linear_map, (mga_writebuffer_ptr + offset) * 4, color); +} + + + +/* Desc: pixel retrieval + * + * In : pixel offset + * Out : pixel value + * + * Note: uses current read buffer + */ +static __inline int _mga_getpixel8 (unsigned int offset) +{ + return hwptr_peekb(mgaptr.linear_map, mga_readbuffer_ptr + offset); +} +#define _mga_getpixel15 _mga_getpixel16 +static __inline int _mga_getpixel16 (unsigned int offset) +{ + return hwptr_peekw(mgaptr.linear_map, (mga_readbuffer_ptr + offset) * 2); +} +static __inline int _mga_getpixel32 (unsigned int offset) +{ + return hwptr_peekl(mgaptr.linear_map, (mga_readbuffer_ptr + offset) * 4); +} + + + +/* Desc: color decomposition + * + * In : pixel offset, array of integers to hold color components (R, G, B, A) + * Out : - + * + * Note: uses current read buffer + */ +static void _mga_getrgba8 (unsigned int offset, unsigned char rgba[4]) +{ + int c = _mga_getpixel8(offset); + rgba[0] = _rgb_scale_3[(c >> 5) & 0x7]; + rgba[1] = _rgb_scale_3[(c >> 2) & 0x7]; + rgba[2] = _rgb_scale_2[c & 0x3]; + rgba[3] = 255; +} +static void _mga_getrgba15 (unsigned int offset, unsigned char rgba[4]) +{ + int c = _mga_getpixel15(offset); + rgba[0] = _rgb_scale_5[(c >> 10) & 0x1F]; + rgba[1] = _rgb_scale_5[(c >> 5) & 0x1F]; + rgba[2] = _rgb_scale_5[c & 0x1F]; + rgba[3] = 255; +} +static void _mga_getrgba16 (unsigned int offset, unsigned char rgba[4]) +{ + int c = _mga_getpixel16(offset); + rgba[0] = _rgb_scale_5[(c >> 11) & 0x1F]; + rgba[1] = _rgb_scale_6[(c >> 5) & 0x3F]; + rgba[2] = _rgb_scale_5[c & 0x1F]; + rgba[3] = 255; +} +static void _mga_getrgba32 (unsigned int offset, unsigned char rgba[4]) +{ + int c = _mga_getpixel32(offset); + rgba[0] = c >> 16; + rgba[1] = c >> 8; + rgba[2] = c; + rgba[3] = c >> 24; +} + + + +/* Desc: RGB flat line + * + * In : + * Out : + * + * Note: + */ +void mga_draw_line_rgb_flat (const MGAvertex *v1, const MGAvertex *v2) +{ + unsigned long color; + int x1 = v1->win[0]; + int y1 = v1->win[1]; + int x2 = v2->win[0]; + int y2 = v2->win[1]; + + if ((x1 == x2) && (y1 == y2)) { + return; + } + + mga_select(); + + /* set engine state */ + if (__operation != OP_DRAWLINE) { + mga_fifo(1); + mga_outl(M_DWGCTL, OP_DRAWLINE); + __operation = OP_DRAWLINE; + } + + color = mga_mixrgb_full(v2->color); + + /* draw the line */ + mga_fifo(3); + mga_outl(M_FCOL, color); + mga_outl(M_XYSTRT, (y1<<16) | x1); + mga_outl(M_XYEND | M_EXEC, (y2<<16) | x2); +} + + + +/* Desc: RGB flat Z-less line + * + * In : + * Out : + * + * Note: I never figured out "diagonal increments" + */ +void mga_draw_line_rgb_flat_zless (const MGAvertex *v1, const MGAvertex *v2) +{ + int z1, dz; + int x1 = v1->win[0]; + int y1 = v1->win[1]; + int x2 = v2->win[0]; + int y2 = v2->win[1]; + int dx = abs(x2 - x1); + int dy = abs(y2 - y1); + + if ((dx == 0) && (dy == 0)) { + return; + } + + mga_select(); + + /* set engine state */ + if (__operation != OP_DRAWLINE_ZI) { + mga_fifo(1); + mga_outl(M_DWGCTL, OP_DRAWLINE_ZI); + __operation = OP_DRAWLINE_ZI; + } + + if (dx < dy) { + dx = dy; + } + + z1 = v1->win[2] << 15; + dz = ((v2->win[2] << 15) - z1) / dx; + + /* draw the line */ + mga_fifo(14); + mga_outl(M_DR0, z1); + mga_outl(M_DR2, dz); + mga_outl(M_DR3, dz); + mga_outl(M_DR4, v2->color[0] << 15); + mga_outl(M_DR6, 0); + mga_outl(M_DR7, 0); + mga_outl(M_DR8, v2->color[1] << 15); + mga_outl(M_DR10, 0); + mga_outl(M_DR11, 0); + mga_outl(M_DR12, v2->color[2] << 15); + mga_outl(M_DR14, 0); + mga_outl(M_DR15, 0); + mga_outl(M_XYSTRT, (y1<<16) | x1); + mga_outl(M_XYEND | M_EXEC, (y2<<16) | x2); +} + + + +/* Desc: RGB iterated line + * + * In : + * Out : + * + * Note: I never figured out "diagonal increments" + */ +void mga_draw_line_rgb_iter (const MGAvertex *v1, const MGAvertex *v2) +{ + int r1, g1, b1; + int dr, dg, db; + int x1 = v1->win[0]; + int y1 = v1->win[1]; + int x2 = v2->win[0]; + int y2 = v2->win[1]; + int dx = abs(x2 - x1); + int dy = abs(y2 - y1); + + if ((dx == 0) && (dy == 0)) { + return; + } + + mga_select(); + + /* set engine state */ + if (__operation != OP_DRAWLINE_I) { + mga_fifo(1); + mga_outl(M_DWGCTL, OP_DRAWLINE_I); + __operation = OP_DRAWLINE_I; + } + + if (dx < dy) { + dx = dy; + } + + r1 = v1->color[0] << 15; + g1 = v1->color[1] << 15; + b1 = v1->color[2] << 15; + dr = ((v2->color[0] << 15) - r1) / dx; + dg = ((v2->color[1] << 15) - g1) / dx; + db = ((v2->color[2] << 15) - b1) / dx; + + /* draw the line */ + mga_fifo(11); + mga_outl(M_DR4, r1); + mga_outl(M_DR6, dr); + mga_outl(M_DR7, dr); + mga_outl(M_DR8, g1); + mga_outl(M_DR10, dg); + mga_outl(M_DR11, dg); + mga_outl(M_DR12, b1); + mga_outl(M_DR14, db); + mga_outl(M_DR15, db); + mga_outl(M_XYSTRT, (y1<<16) | x1); + mga_outl(M_XYEND | M_EXEC, (y2<<16) | x2); +} + + + +/* Desc: RGB iterated Z-less line + * + * In : + * Out : + * + * Note: I never figured out "diagonal increments" + */ +void mga_draw_line_rgb_iter_zless (const MGAvertex *v1, const MGAvertex *v2) +{ + int z1, dz; + int r1, g1, b1; + int dr, dg, db; + int x1 = v1->win[0]; + int y1 = v1->win[1]; + int x2 = v2->win[0]; + int y2 = v2->win[1]; + int dx = abs(x2 - x1); + int dy = abs(y2 - y1); + + if ((dx == 0) && (dy == 0)) { + return; + } + + mga_select(); + + /* set engine state */ + if (__operation != OP_DRAWLINE_ZI) { + mga_fifo(1); + mga_outl(M_DWGCTL, OP_DRAWLINE_ZI); + __operation = OP_DRAWLINE_ZI; + } + + if (dx < dy) { + dx = dy; + } + + z1 = v1->win[2] << 15; + dz = ((v2->win[2] << 15) - z1) / dx; + + r1 = v1->color[0] << 15; + g1 = v1->color[1] << 15; + b1 = v1->color[2] << 15; + dr = ((v2->color[0] << 15) - r1) / dx; + dg = ((v2->color[1] << 15) - g1) / dx; + db = ((v2->color[2] << 15) - b1) / dx; + + /* draw the line */ + mga_fifo(14); + mga_outl(M_DR0, z1); + mga_outl(M_DR2, dz); + mga_outl(M_DR3, dz); + mga_outl(M_DR4, r1); + mga_outl(M_DR6, dr); + mga_outl(M_DR7, dr); + mga_outl(M_DR8, g1); + mga_outl(M_DR10, dg); + mga_outl(M_DR11, dg); + mga_outl(M_DR12, b1); + mga_outl(M_DR14, db); + mga_outl(M_DR15, db); + mga_outl(M_XYSTRT, (y1<<16) | x1); + mga_outl(M_XYEND | M_EXEC, (y2<<16) | x2); +} + + + +/* Desc: RGB flat triangle + * + * In : + * Out : + * + * Note: + */ +#define TAG mga_draw_tri_rgb_flat +#define CULL +#define SETUP_CODE \ + if (__operation != OP_DRAWTRAP) { \ + mga_fifo(1); \ + mga_outl(M_DWGCTL, OP_DRAWTRAP); \ + __operation = OP_DRAWTRAP; \ + } +#include "m_ttemp.h" + + + +/* Desc: RGB flat Z-less triangle + * + * In : + * Out : + * + * Note: + */ +#define TAG mga_draw_tri_rgb_flat_zless +#define CULL +#define INTERP_Z +#define SETUP_CODE \ + if (__operation != OP_DRAWTRAP_ZI) { \ + mga_fifo(1); \ + mga_outl(M_DWGCTL, OP_DRAWTRAP_ZI); \ + __operation = OP_DRAWTRAP_ZI; \ + } +#include "m_ttemp.h" + + + +/* Desc: RGB iterated triangle + * + * In : + * Out : + * + * Note: + */ +#define TAG mga_draw_tri_rgb_iter +#define CULL +#define INTERP_RGB +#define SETUP_CODE \ + if (__operation != OP_DRAWTRAP_I) { \ + mga_fifo(1); \ + mga_outl(M_DWGCTL, OP_DRAWTRAP_I); \ + __operation = OP_DRAWTRAP_I; \ + } +#include "m_ttemp.h" + + + +/* Desc: RGB iterated Z-less triangle + * + * In : + * Out : + * + * Note: + */ +#define TAG mga_draw_tri_rgb_iter_zless +#define CULL +#define INTERP_Z +#define INTERP_RGB +#define SETUP_CODE \ + if (__operation != OP_DRAWTRAP_ZI) { \ + mga_fifo(1); \ + mga_outl(M_DWGCTL, OP_DRAWTRAP_ZI); \ + __operation = OP_DRAWTRAP_ZI; \ + } +#include "m_ttemp.h" + + + +/* Desc: RGB flat rectangle + * + * In : + * Out : + * + * Note: + */ +void mga_draw_rect_rgb_flat (int left, int top, int width, int height, int color) +{ + if (__bpp == 8) { + color |= color << 8; + } + if (__bpp <= 16) { + color |= color << 16; + } + + mga_select(); + + /* set engine state */ + if (__operation != OP_DRAWRECT) { + + mga_fifo(1); + mga_outl(M_DWGCTL, OP_DRAWRECT); + __operation = OP_DRAWRECT; + } + + /* draw the rectangle */ + mga_fifo(3); + mga_outl(M_FCOL, color); + mga_outl(M_FXBNDRY, ((left+width)<<16) | left); + mga_outl(M_YDSTLEN | M_EXEC, (top<<16) | height); +} + + + +/* Desc: 32RGB textured span + * + * In : + * Out : + * + * Note: 0 <= width <= 7*1024 + */ +void mga_draw_span_rgb_tx32 (int left, int top, int width, const unsigned long *bitmap) +{ + int i; + + if (!width) { + return; + } + + mga_select(); + + /* set engine state */ + if (__operation != OP_DRAWRECT_TX32BGR) { + mga_fifo(1); + mga_outl(M_DWGCTL, OP_DRAWRECT_TX32BGR); + __operation = OP_DRAWRECT_TX32BGR; + } + + /* draw the rectangle */ + mga_fifo(2); + mga_outl(M_FXBNDRY, ((left+width)<<16) | left); + mga_outl(M_YDSTLEN | M_EXEC, (top<<16) | 1); + + /* copy data to the pseudo-dma window */ + i = 0; + do { + mga_outl(i, *bitmap); + bitmap++; + i += 4; + } while (--width); +} + + + +/* Desc: 24RGB textured span + * + * In : + * Out : + * + * Note: 0 <= width <= 7*1024 + */ +void mga_draw_span_rgb_tx24 (int left, int top, int width, const unsigned long *bitmap) +{ + int i; + + mga_select(); + + /* set engine state */ + if (__operation != OP_DRAWRECT_TX24BGR) { + mga_fifo(1); + mga_outl(M_DWGCTL, OP_DRAWRECT_TX24BGR); + __operation = OP_DRAWRECT_TX24BGR; + } + + /* draw the rectangle */ + mga_fifo(2); + mga_outl(M_FXBNDRY, ((left+width)<<16) | left); + mga_outl(M_YDSTLEN | M_EXEC, (top<<16) | 1); + + /* copy data to the pseudo-dma window */ + i = 0; + width = (width * 3 + 3) / 4; + while (width) { + mga_outl(i & (7 * 1024 - 1), *bitmap); + bitmap++; + i += 4; + width--; + } +} + + + +/* Desc: 32RGB textured rectangle + * + * In : + * Out : + * + * Note: + */ +void mga_draw_rect_rgb_tx32 (int left, int top, int width, int height, const unsigned long *bitmap) +{ + int i; + + mga_select(); + + /* set engine state */ + if (__operation != OP_DRAWRECT_TX32BGR) { + mga_fifo(1); + mga_outl(M_DWGCTL, OP_DRAWRECT_TX32BGR); + __operation = OP_DRAWRECT_TX32BGR; + } + + /* draw the rectangle */ + mga_fifo(2); + mga_outl(M_FXBNDRY, ((left+width)<<16) | left); + mga_outl(M_YDSTLEN | M_EXEC, (top<<16) | height); + + /* copy data to the pseudo-dma window */ + i = 0; + width *= height; + while (width) { + mga_outl(i & (7 * 1024 - 1), *bitmap); + bitmap++; + i += 4; + width--; + } +} + + + +/* Desc: 24RGB textured rectangle + * + * In : + * Out : + * + * Note: + */ +void mga_draw_rect_rgb_tx24 (int left, int top, int width, int height, const unsigned long *bitmap) +{ + int i; + + mga_select(); + + /* set engine state */ + if (__operation != OP_DRAWRECT_TX24BGR) { + mga_fifo(1); + mga_outl(M_DWGCTL, OP_DRAWRECT_TX24BGR); + __operation = OP_DRAWRECT_TX24BGR; + } + + /* draw the rectangle */ + mga_fifo(2); + mga_outl(M_FXBNDRY, ((left+width)<<16) | left); + mga_outl(M_YDSTLEN | M_EXEC, (top<<16) | height); + + /* copy data to the pseudo-dma window */ + i = 0; + width = (width * height * 3 + 3) / 4; + while (width) { + mga_outl(i & (7 * 1024 - 1), *bitmap); + bitmap++; + i += 4; + width--; + } +} + + + +/* Desc: copy 32RGB image to screen + * + * In : + * Out : + * + * Note: + */ +void mga_iload_32RGB (int left, int top, int width, int height, const unsigned long *bitmap) +{ + int i; + + mga_select(); + + /* set engine state */ + if (__operation != OP_ILOAD_32BGR) { + mga_fifo(1); + mga_outl(M_DWGCTL, OP_ILOAD_32BGR); + __operation = OP_ILOAD_32BGR; + } + + /* draw the bitmap */ + mga_fifo(5); + mga_outl(M_AR0, width-1); + mga_outl(M_AR3, 0); + mga_outl(M_AR5, 0); + mga_outl(M_FXBNDRY, ((left+width-1)<<16) | left); + mga_outl(M_YDSTLEN | M_EXEC, (top<<16) | height); + + /* copy data to the pseudo-dma window */ + i = 0; + width *= height; + while (width) { + mga_outl(i & (7 * 1024 - 1), *bitmap); + bitmap++; + i += 4; + width--; + } +} + + + +/* Desc: copy 24RGB image to screen + * + * In : + * Out : + * + * Note: + */ +void mga_iload_24RGB (int left, int top, int width, int height, const unsigned long *bitmap) +{ + int i; + + mga_select(); + + /* set engine state */ + if (__operation != OP_ILOAD_24BGR) { + mga_fifo(1); + mga_outl(M_DWGCTL, OP_ILOAD_24BGR); + __operation = OP_ILOAD_24BGR; + } + + /* draw the bitmap */ + mga_fifo(5); + mga_outl(M_AR0, width-1); + mga_outl(M_AR3, 0); + mga_outl(M_AR5, 0); + mga_outl(M_FXBNDRY, ((left+width-1)<<16) | left); + mga_outl(M_YDSTLEN | M_EXEC, (top<<16) | height); + + /* copy data to the pseudo-dma window */ + i = 0; + width = (width * height * 3 + 3) / 4; + while (width) { + mga_outl(i & (7 * 1024 - 1), *bitmap); + bitmap++; + i += 4; + width--; + } +} + + + +/* Desc: get Z-buffer value + * + * In : + * Out : + * + * Note: + */ +unsigned short mga_getz (int offset) +{ + return hwptr_peekw(mgaptr.linear_map, zorg + (mga_readbuffer_ptr + offset) * 2); +} + + + +/* Desc: put Z-buffer value + * + * In : + * Out : + * + * Note: + */ +void mga_setz (int offset, unsigned short z) +{ + hwptr_pokew(mgaptr.linear_map, zorg + (mga_writebuffer_ptr + offset) * 2, z); +} + + + +/* Desc: clear Z-buffer + * + * In : + * Out : + * + * Note: uses current write buffer + */ +static void _mga_clear_zed (int left, int top, int width, int height, unsigned short z) +{ + if (__bpp == 16) { + /* GPU store (high bandwidth) + * Hack alert: + * can cause problems with concurrent FB accesses + */ + mga_select(); + mga_fifo(1); + mga_outl(M_YDSTORG, mga_writebuffer_ptr + zorg/2); + mga_draw_rect_rgb_flat(left, top, width, height, z); + mga_fifo(1); + mga_outl(M_YDSTORG, mga_writebuffer_ptr); + } else { + /* CPU store */ + unsigned long i, zz = (z<<16) | z; + unsigned long ofs = zorg + (top * __pixwidth + left + mga_writebuffer_ptr) * 2; + hwptr_select(mgaptr.linear_map); + while (height--) { + i = width/2; + while (i--) { + hwptr_nspokel(mgaptr.linear_map, ofs, zz); + ofs += 4; + } + if (width & 1) { + hwptr_nspokew(mgaptr.linear_map, ofs, z); + ofs += 2; + } + ofs += (__pixwidth - width) * 2; + } + } +} + + + +/* Desc: clear color- and Z-buffer + * + * In : front = clear front buffer + * back = clear back buffer + * zed = clear depth buffer + * left = leftmost pixel to be cleared + * top = starting line + * width = number of pixels + * height = number of lines + * color = color to clear to + * z = z value (ignored if zed==0) + * Out : + * + * Note: + */ +void mga_clear (int front, int back, int zed, int left, int top, int width, int height, int color, unsigned short z) +{ + if (front) { + if (mga_writebuffer == MGA_FRONTBUFFER) { + mga_draw_rect_rgb_flat(left, top, width, height, color); + if (zed) { + _mga_clear_zed(left, top, width, height, z); + } + front = 0; + } + } + if (back) { + if (mga_writebuffer == MGA_BACKBUFFER) { + mga_draw_rect_rgb_flat(left, top, width, height, color); + if (zed) { + _mga_clear_zed(left, top, width, height, z); + } + back = 0; + } + } + if (front) { + int old = mga_writebuffer; + mga_set_writebuffer(MGA_FRONTBUFFER); + mga_draw_rect_rgb_flat(left, top, width, height, color); + if (zed) { + _mga_clear_zed(left, top, width, height, z); + } + mga_set_writebuffer(old); + front = 0; + } + if (back) { + int old = mga_writebuffer; + mga_set_writebuffer(MGA_BACKBUFFER); + mga_draw_rect_rgb_flat(left, top, width, height, color); + if (zed) { + _mga_clear_zed(left, top, width, height, z); + } + mga_set_writebuffer(old); + back = 0; + } +} + + + +/* Desc: Attempts to enter specified video mode. + * + * In : ptr to mode structure, number of pages, Z-buffer request, refresh rate + * Out : 0 if success + * + * Note: also set up the accelerator engine + */ +int mga_open (int width, int height, int bpp, int buffers, int zbuffer, int refresh) +{ + static int mill_strides[] = { 640, 768, 800, 960, 1024, 1152, 1280, 1600, 1920, 2048, 0 }; + unsigned int i, used; + MGA_MODE *p; + + if (mga_hw_init(&vram, &interleave, card_name) == 0) { + return -1; + } + + if ((p = mga_mode_find(width, height, bpp)) == NULL) { + return -1; + } + + __bpp = p->bpp; + __width = __pagewidth = p->xres; + __height = p->yres; + + if (buffers > 1) { + __pagewidth = _mga_fix_scans(__pagewidth); + __pixwidth = __pagewidth * buffers; + } else { + __pixwidth = __pagewidth; + __pixwidth = _mga_fix_scans(__pixwidth); + } + + for (i=0; mill_strides[i]; i++) { + if (__pixwidth <= mill_strides[i]) { + __pixwidth = mill_strides[i]; + break; + } + } + + __bypp = (__bpp+7)/8; + __bytwidth = __pixwidth * __bypp; + + /* compute used memory: framebuffer + zbuffer */ + used = __bytwidth * __height; + if (zbuffer) { + zorg = (used + 511) & ~511; + /* Hack alert: + * a 16-bit Z-buffer size is (stride_in_pixels * number_of_lines * 2) + * We cannot mess with the Z-buffer width, but we might decrease the + * number of lines, if the user requests less than (screen_height). For + * example with a 2MB card, one can have 640x480x16 display with 2 color + * buffers and Z-buffer if the maximum requested height is 339: + * Total = (640*480 * 2 + 640*339 * 2) * 2 + * However, this means the user must not write beyond the window's height + * and if we'll ever implement moveable windows, we'll have to reconsider + * this hack. + */ +#if 1 + __zheight = height; /* smaller */ + used = zorg + __pixwidth * 2 * __zheight; +#else + __zheight = __height; + used = zorg + __pixwidth * 2 * __zheight; +#endif + } + + if (mill_strides[i] && (vram>=used)) { + /* enter mode */ + mga_mode_switch(p, refresh); + /* change the scan line length */ + _mga_ralter(M_CRTC_INDEX, 0x14, 0x40, 0); /* disable DWORD */ + _mga_ralter(M_CRTC_INDEX, 0x17, 0x40, 0x40); /* wbmode = BYTE */ + if (interleave) { + _mga_rwrite(M_CRTC_INDEX, 0x13, __bytwidth/16); + _mga_ralter(M_CRTC_EXT_INDEX, 0, 0x30, ((__bytwidth/16)>>4)&0x30); + } else { + _mga_rwrite(M_CRTC_INDEX, 0x13, __bytwidth/8); + _mga_ralter(M_CRTC_EXT_INDEX, 0, 0x30, ((__bytwidth/8)>>4)&0x30); + } + } else { + return -1; + } + + /* setup buffers */ + mga_frontbuffer_ptr = 0; + if (buffers > 1) { + mga_backbuffer_ptr = __pagewidth; + mga_set_readbuffer(MGA_BACKBUFFER); + mga_set_writebuffer(MGA_BACKBUFFER); + } else { + mga_backbuffer_ptr = 0; + mga_set_readbuffer(MGA_FRONTBUFFER); + mga_set_writebuffer(MGA_FRONTBUFFER); + } + mga_display_start(mga_frontbuffer_ptr, __scrollx = 0, __scrolly = 0, 1); + + /* set up the accelerator engine */ + mga_select(); + + mga_fifo(8); + mga_outl(M_PITCH, __pixwidth); + mga_outl(M_PLNWT, 0xFFFFFFFF); + mga_outl(M_OPMODE, M_DMA_BLIT); + mga_outl(M_CXBNDRY, 0xFFFF0000); + mga_outl(M_YTOP, 0x00000000); + mga_outl(M_YBOT, 0x007FFFFF); + mga_outl(M_ZORG, zorg); + +#define INITPTR(bpp) \ + mga_putpixel = _mga_putpixel##bpp; \ + mga_getrgba = _mga_getrgba##bpp; \ + mga_getpixel = _mga_getpixel##bpp; \ + mga_mixrgb = _mga_mixrgb##bpp; \ + mga_mixrgb_full = _mga_mixrgb##bpp##_full + + switch (__bpp) { + case 8: + mga_outl(M_MACCESS, 0); + INITPTR(8); + break; + case 15: + mga_outl(M_MACCESS, 0x80000001); + INITPTR(15); + break; + case 16: + mga_outl(M_MACCESS, 1); + INITPTR(16); + break; + case 32: + mga_outl(M_MACCESS, 2); + INITPTR(32); + break; + } + +#undef INITPTR + + /* disable VGA aperture */ + i = mga_inb(M_MISC_R); + mga_outb(M_MISC_W, i & ~2); + + /* clear Z-buffer (if any) */ + if (zbuffer) { + unsigned long ofs = zorg; + unsigned long len = zorg + __pixwidth * 2 * __zheight; + + hwptr_select(mgaptr.linear_map); + for (; ofs