ref: cd8c8d416b4245458460cfe8e3c00bcb69c3c45b
dir: /u/vid_svgalib.c/
/* 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 the Free Software Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */ #include <termios.h> #include <sys/ioctl.h> #include <sys/stat.h> #include <sys/vt.h> #include <stdarg.h> #include <stdio.h> #include <signal.h> #include <asm/io.h> #include "vga.h" #include "vgakeyboard.h" #include "vgamouse.h" #include "quakedef.h" #include "d_local.h" #define stringify(m) { #m, m } unsigned short d_8to16table[256]; static byte *vid_surfcache; static int VID_highhunkmark; int num_modes; vga_modeinfo *modes; int current_mode; int num_shades=32; struct { char *name; int num; } mice[] = { stringify(MOUSE_MICROSOFT), stringify(MOUSE_MOUSESYSTEMS), stringify(MOUSE_MMSERIES), stringify(MOUSE_LOGITECH), stringify(MOUSE_BUSMOUSE), stringify(MOUSE_PS2), }; static unsigned char scantokey[128]; static byte vid_current_palette[768]; int num_mice = sizeof (mice) / sizeof(mice[0]); int d_con_indirect = 0; int svgalib_inited=0; int UseMouse = 1; int UseDisplay = 1; int UseKeyboard = 1; int mouserate = MOUSE_DEFAULTSAMPLERATE; cvar_t vid_mode = {"vid_mode","5",false}; cvar_t vid_redrawfull = {"vid_redrawfull","0",false}; cvar_t vid_waitforrefresh = {"vid_waitforrefresh","0",true}; char *framebuffer_ptr; cvar_t mouse_button_commands[3] = { {"mouse1","+attack"}, {"mouse2","+strafe"}, {"mouse3","+forward"}, }; int mouse_buttons; int mouse_buttonstate; int mouse_oldbuttonstate; float mouse_x, mouse_y; float old_mouse_x, old_mouse_y; int mx, my; cvar_t m_filter = {"m_filter","0"}; static byte backingbuf[48*24]; int VGA_width, VGA_height, VGA_rowbytes, VGA_bufferrowbytes, VGA_planar; byte *VGA_pagebase; void VGA_UpdatePlanarScreen (void *srcbuffer); void D_BeginDirectRect (int x, int y, byte *pbitmap, int width, int height) { int i, j, k, plane, reps, repshift, offset, vidpage, off; if (!svgalib_inited || !vid.direct || !vga_oktowrite()) return; if (vid.aspect > 1.5) { reps = 2; repshift = 1; } else { reps = 1; repshift = 0; } vidpage = 0; vga_setpage(0); if (VGA_planar) { for (plane=0 ; plane<4 ; plane++) { // select the correct plane for reading and writing outb(0x02, 0x3C4); outb(1 << plane, 0x3C5); outb(4, 0x3CE); outb(plane, 0x3CF); for (i=0 ; i<(height << repshift) ; i += reps) { for (k=0 ; k<reps ; k++) { for (j=0 ; j<(width >> 2) ; j++) { backingbuf[(i + k) * 24 + (j << 2) + plane] = vid.direct[(y + i + k) * VGA_rowbytes + (x >> 2) + j]; vid.direct[(y + i + k) * VGA_rowbytes + (x>>2) + j] = pbitmap[(i >> repshift) * 24 + (j << 2) + plane]; } } } } } else { for (i=0 ; i<(height << repshift) ; i += reps) { for (j=0 ; j<reps ; j++) { offset = x + ((y << repshift) + i + j) * vid.rowbytes; off = offset % 0x10000; if ((offset / 0x10000) != vidpage) { vidpage=offset / 0x10000; vga_setpage(vidpage); } memcpy (&backingbuf[(i + j) * 24], vid.direct + off, width); memcpy (vid.direct + off, &pbitmap[(i >> repshift)*width], width); } } } } void D_EndDirectRect (int x, int y, int width, int height) { int i, j, k, plane, reps, repshift, offset, vidpage, off; if (!svgalib_inited || !vid.direct || !vga_oktowrite()) return; if (vid.aspect > 1.5) { reps = 2; repshift = 1; } else { reps = 1; repshift = 0; } vidpage = 0; vga_setpage(0); if (VGA_planar) { for (plane=0 ; plane<4 ; plane++) { // select the correct plane for writing outb(2, 0x3C4); outb(1 << plane, 0x3C5); outb(4, 0x3CE); outb(plane, 0x3CF); for (i=0 ; i<(height << repshift) ; i += reps) { for (k=0 ; k<reps ; k++) { for (j=0 ; j<(width >> 2) ; j++) { vid.direct[(y + i + k) * VGA_rowbytes + (x>>2) + j] = backingbuf[(i + k) * 24 + (j << 2) + plane]; } } } } } else { for (i=0 ; i<(height << repshift) ; i += reps) { for (j=0 ; j<reps ; j++) { offset = x + ((y << repshift) + i + j) * vid.rowbytes; off = offset % 0x10000; if ((offset / 0x10000) != vidpage) { vidpage=offset / 0x10000; vga_setpage(vidpage); } memcpy (vid.direct + off, &backingbuf[(i +j)*24], width); } } } } /* ================= VID_Gamma_f Keybinding command ================= */ void VID_Gamma_f (void) { float gamma, f, inf; unsigned char palette[768]; int i; if (Cmd_Argc () == 2) { gamma = Q_atof (Cmd_Argv(1)); for (i=0 ; i<768 ; i++) { f = pow ( (host_basepal[i]+1)/256.0 , gamma ); inf = f*255 + 0.5; if (inf < 0) inf = 0; if (inf > 255) inf = 255; palette[i] = inf; } VID_SetPalette (palette); vid.recalc_refdef = 1; // force a surface cache flush } } void VID_DescribeMode_f (void) { int modenum; modenum = Q_atoi (Cmd_Argv(1)); if ((modenum >= num_modes) || (modenum < 0 ) || !modes[modenum].width) Con_Printf("Invalid video mode: %d!\n",modenum); Con_Printf("%d: %d x %d - ",modenum,modes[modenum].width,modes[modenum].height); if (modes[modenum].bytesperpixel == 0) Con_Printf("ModeX\n"); else Con_Printf("%d bpp\n", modes[modenum].bytesperpixel<<3); } void VID_DescribeModes_f (void) { int i; for (i=0;i<num_modes;i++) if (modes[i].width) { Con_Printf("%d: %d x %d - ", i, modes[i].width,modes[i].height); if (modes[i].bytesperpixel == 0) Con_Printf("ModeX\n"); else Con_Printf("%d bpp\n", modes[i].bytesperpixel<<3); } } /* ================ VID_NumModes ================ */ int VID_NumModes () { int i,i1=0; for (i=0;i<num_modes;i++) i1+=(modes[i].width?1:0); return (i1); } void VID_NumModes_f (void) { Con_Printf("%d modes\n",VID_NumModes()); } void VID_Debug_f (void) { Con_Printf("mode: %d\n",current_mode); Con_Printf("height x width: %d x %d\n",vid.height,vid.width); Con_Printf("bpp: %d\n",modes[current_mode].bytesperpixel*8); Con_Printf("vid.aspect: %f\n",vid.aspect); } void VID_InitModes(void) { int i; // get complete information on all modes num_modes = vga_lastmodenumber()+1; modes = Z_Malloc(num_modes * sizeof(vga_modeinfo)); for (i=0 ; i<num_modes ; i++) { if (vga_hasmode(i)) Q_memcpy(&modes[i], vga_getmodeinfo(i), sizeof (vga_modeinfo)); else modes[i].width = 0; // means not available } // filter for modes i don't support for (i=0 ; i<num_modes ; i++) { if (modes[i].bytesperpixel != 1 && modes[i].colors != 256) modes[i].width = 0; } } int get_mode(char *name, int width, int height, int depth) { int i; int ok, match; match = (!!width) + (!!height)*2 + (!!depth)*4; if (name) { i = vga_getmodenumber(name); if (!modes[i].width) { Sys_Printf("Mode [%s] not supported\n", name); i = G320x200x256; } } else { for (i=0 ; i<num_modes ; i++) if (modes[i].width) { ok = (modes[i].width == width) + (modes[i].height == height)*2 + (modes[i].bytesperpixel == depth/8)*4; if ((ok & match) == ok) break; } if (i==num_modes) { Sys_Printf("Mode %dx%d (%d bits) not supported\n", width, height, depth); i = G320x200x256; } } return i; } int matchmouse(int mouse, char *name) { int i; for (i=0 ; i<num_mice ; i++) if (!strcmp(mice[i].name, name)) return i; return mouse; } #if 0 void vtswitch(int newconsole) { int fd; struct vt_stat x; // switch consoles and wait until reactivated fd = open("/dev/console", O_RDONLY); ioctl(fd, VT_GETSTATE, &x); ioctl(fd, VT_ACTIVATE, newconsole); ioctl(fd, VT_WAITACTIVE, x.v_active); close(fd); } #endif void keyhandler(int scancode, int state) { int sc; sc = scancode & 0x7f; // Con_Printf("scancode=%x (%d%s)\n", scancode, sc, scancode&0x80?"+128":""); Key_Event(scantokey[sc], state == KEY_EVENTPRESS); } void VID_Shutdown(void) { if (!svgalib_inited) return; // printf("shutdown graphics called\n"); if (UseKeyboard) keyboard_close(); if (UseDisplay) vga_setmode(TEXT); // printf("shutdown graphics finished\n"); svgalib_inited = 0; } void VID_ShiftPalette(unsigned char *p) { VID_SetPalette(p); } void VID_SetPalette(byte *palette) { static int tmppal[256*3]; int *tp; int i; if (!svgalib_inited) return; memcpy(vid_current_palette, palette, sizeof(vid_current_palette)); if (vga_getcolors() == 256) { tp = tmppal; for (i=256*3 ; i ; i--) *(tp++) = *(palette++) >> 2; if (UseDisplay && vga_oktowrite()) vga_setpalvec(0, 256, tmppal); } } int VID_SetMode (int modenum, unsigned char *palette) { int bsize, zsize, tsize; if ((modenum >= num_modes) || (modenum < 0) || !modes[modenum].width) { Cvar_SetValue ("vid_mode", (float)current_mode); Con_Printf("No such video mode: %d\n",modenum); return 0; } Cvar_SetValue ("vid_mode", (float)modenum); current_mode=modenum; vid.width = modes[current_mode].width; vid.height = modes[current_mode].height; VGA_width = modes[current_mode].width; VGA_height = modes[current_mode].height; VGA_planar = modes[current_mode].bytesperpixel == 0; VGA_rowbytes = modes[current_mode].linewidth; vid.rowbytes = modes[current_mode].linewidth; if (VGA_planar) { VGA_bufferrowbytes = modes[current_mode].linewidth * 4; vid.rowbytes = modes[current_mode].linewidth*4; } vid.aspect = ((float)vid.height / (float)vid.width) * (320.0 / 240.0); vid.colormap = (pixel_t *) host_colormap; vid.fullbright = 256 - LittleLong (*((int *)vid.colormap + 2048)); vid.conrowbytes = vid.rowbytes; vid.conwidth = vid.width; vid.conheight = vid.height; vid.numpages = 1; vid.maxwarpwidth = WARP_WIDTH; vid.maxwarpheight = WARP_HEIGHT; // alloc zbuffer and surface cache if (d_pzbuffer) { D_FlushCaches(); Hunk_FreeToHighMark (VID_highhunkmark); d_pzbuffer = NULL; vid_surfcache = NULL; } bsize = vid.rowbytes * vid.height; tsize = D_SurfaceCacheForRes (vid.width, vid.height); zsize = vid.width * vid.height * sizeof(*d_pzbuffer); VID_highhunkmark = Hunk_HighMark (); d_pzbuffer = Hunk_HighAllocName (bsize+tsize+zsize, "video"); vid_surfcache = ((byte *)d_pzbuffer) + zsize; vid.conbuffer = vid.buffer = (pixel_t *)(((byte *)d_pzbuffer) + zsize + tsize); D_InitCaches (vid_surfcache, tsize); // get goin' vga_setmode(current_mode); VID_SetPalette(palette); VGA_pagebase = vid.direct = framebuffer_ptr = (char *) vga_getgraphmem(); // if (vga_setlinearaddressing()>0) // framebuffer_ptr = (char *) vga_getgraphmem(); if (!framebuffer_ptr) Sys_Error("This mode isn't hapnin'\n"); vga_setpage(0); svgalib_inited=1; vid.recalc_refdef = 1; // force a surface cache flush return 0; } void VID_Init(unsigned char *palette) { int i; int w, h, d; if (svgalib_inited) return; // Cmd_AddCommand ("gamma", VID_Gamma_f); if (UseDisplay) { vga_init(); VID_InitModes(); Cvar_RegisterVariable (&vid_mode); Cvar_RegisterVariable (&vid_redrawfull); Cvar_RegisterVariable (&vid_waitforrefresh); Cmd_AddCommand("vid_nummodes", VID_NumModes_f); Cmd_AddCommand("vid_describemode", VID_DescribeMode_f); Cmd_AddCommand("vid_describemodes", VID_DescribeModes_f); Cmd_AddCommand("vid_debug", VID_Debug_f); // interpret command-line params w = h = d = 0; if (getenv("GSVGAMODE")) current_mode = get_mode(getenv("GSVGAMODE"), w, h, d); else if (COM_CheckParm("-mode")) current_mode = get_mode(com_argv[COM_CheckParm("-mode")+1], w, h, d); else if (COM_CheckParm("-w") || COM_CheckParm("-h") || COM_CheckParm("-d")) { if (COM_CheckParm("-w")) w = Q_atoi(com_argv[COM_CheckParm("-w")+1]); if (COM_CheckParm("-h")) h = Q_atoi(com_argv[COM_CheckParm("-h")+1]); if (COM_CheckParm("-d")) d = Q_atoi(com_argv[COM_CheckParm("-d")+1]); current_mode = get_mode(0, w, h, d); } else current_mode = G320x200x256; // set vid parameters VID_SetMode(current_mode, palette); VID_SetPalette(palette); // we do want to run in the background when switched away vga_runinbackground(1); } if (COM_CheckParm("-nokbd")) UseKeyboard = 0; if (UseKeyboard) { for (i=0 ; i<128 ; i++) scantokey[i] = ' '; scantokey[42] = K_SHIFT; scantokey[54] = K_SHIFT; scantokey[72] = K_UPARROW; scantokey[103] = K_UPARROW; scantokey[80] = K_DOWNARROW; scantokey[108] = K_DOWNARROW; scantokey[75] = K_LEFTARROW; scantokey[105] = K_LEFTARROW; scantokey[77] = K_RIGHTARROW; scantokey[106] = K_RIGHTARROW; scantokey[29] = K_CTRL; scantokey[97] = K_CTRL; scantokey[56] = K_ALT; scantokey[100] = K_ALT; // scantokey[58] = JK_CAPS; // scantokey[69] = JK_NUM_LOCK; scantokey[71] = K_HOME; scantokey[73] = K_PGUP; scantokey[79] = K_END; scantokey[81] = K_PGDN; scantokey[82] = K_INS; scantokey[83] = K_DEL; scantokey[1 ] = K_ESCAPE; scantokey[28] = K_ENTER; scantokey[15] = K_TAB; scantokey[14] = K_BACKSPACE; scantokey[119] = K_PAUSE; scantokey[57] = ' '; scantokey[102] = K_HOME; scantokey[104] = K_PGUP; scantokey[107] = K_END; scantokey[109] = K_PGDN; scantokey[110] = K_INS; scantokey[111] = K_DEL; scantokey[2] = '1'; scantokey[3] = '2'; scantokey[4] = '3'; scantokey[5] = '4'; scantokey[6] = '5'; scantokey[7] = '6'; scantokey[8] = '7'; scantokey[9] = '8'; scantokey[10] = '9'; scantokey[11] = '0'; scantokey[12] = '-'; scantokey[13] = '='; scantokey[41] = '`'; scantokey[26] = '['; scantokey[27] = ']'; scantokey[39] = ';'; scantokey[40] = '\''; scantokey[51] = ','; scantokey[52] = '.'; scantokey[53] = '/'; scantokey[43] = '\\'; scantokey[59] = K_F1; scantokey[60] = K_F2; scantokey[61] = K_F3; scantokey[62] = K_F4; scantokey[63] = K_F5; scantokey[64] = K_F6; scantokey[65] = K_F7; scantokey[66] = K_F8; scantokey[67] = K_F9; scantokey[68] = K_F10; scantokey[87] = K_F11; scantokey[88] = K_F12; scantokey[30] = 'a'; scantokey[48] = 'b'; scantokey[46] = 'c'; scantokey[32] = 'd'; scantokey[18] = 'e'; scantokey[33] = 'f'; scantokey[34] = 'g'; scantokey[35] = 'h'; scantokey[23] = 'i'; scantokey[36] = 'j'; scantokey[37] = 'k'; scantokey[38] = 'l'; scantokey[50] = 'm'; scantokey[49] = 'n'; scantokey[24] = 'o'; scantokey[25] = 'p'; scantokey[16] = 'q'; scantokey[19] = 'r'; scantokey[31] = 's'; scantokey[20] = 't'; scantokey[22] = 'u'; scantokey[47] = 'v'; scantokey[17] = 'w'; scantokey[45] = 'x'; scantokey[21] = 'y'; scantokey[44] = 'z'; if (keyboard_init()) Sys_Error("keyboard_init() failed"); keyboard_seteventhandler(keyhandler); } } void VID_Update(vrect_t *rects) { if (!svgalib_inited) return; if (!vga_oktowrite()) return; // can't update screen if it's not active if (vid_waitforrefresh.value) vga_waitretrace(); if (VGA_planar) VGA_UpdatePlanarScreen (vid.buffer); else if (vid_redrawfull.value) { int total = vid.rowbytes * vid.height; int offset; for (offset=0;offset<total;offset+=0x10000) { vga_setpage(offset/0x10000); memcpy(framebuffer_ptr, vid.buffer + offset, ((total-offset>0x10000)?0x10000:(total-offset))); } } else { int ycount; int offset; int vidpage=0; vga_setpage(0); while (rects) { ycount = rects->height; offset = rects->y * vid.rowbytes + rects->x; while (ycount--) { register int i = offset % 0x10000; if ((offset / 0x10000) != vidpage) { vidpage=offset / 0x10000; vga_setpage(vidpage); } if (rects->width + i > 0x10000) { memcpy(framebuffer_ptr + i, vid.buffer + offset, 0x10000 - i); vga_setpage(++vidpage); memcpy(framebuffer_ptr, vid.buffer + offset + 0x10000 - i, rects->width - 0x10000 + i); } else memcpy(framebuffer_ptr + i, vid.buffer + offset, rects->width); offset += vid.rowbytes; } rects = rects->pnext; } } if (vid_mode.value != current_mode) VID_SetMode ((int)vid_mode.value, vid_current_palette); } static int dither; void VID_DitherOn(void) { if (dither == 0) { // R_ViewChanged (&vrect, sb_lines, vid.aspect); dither = 1; } } void VID_DitherOff(void) { if (dither) { // R_ViewChanged (&vrect, sb_lines, vid.aspect); dither = 0; } } void Sys_SendKeyEvents(void) { if (!svgalib_inited) return; if (UseKeyboard) while (keyboard_update()); } void Force_CenterView_f (void) { cl.viewangles[PITCH] = 0; } void mousehandler(int buttonstate, int dx, int dy) { mouse_buttonstate = buttonstate; mx += dx; my += dy; } void IN_Init(void) { int mtype; char *mousedev; int mouserate; if (UseMouse) { Cvar_RegisterVariable (&mouse_button_commands[0]); Cvar_RegisterVariable (&mouse_button_commands[1]); Cvar_RegisterVariable (&mouse_button_commands[2]); Cvar_RegisterVariable (&m_filter); Cmd_AddCommand ("force_centerview", Force_CenterView_f); mouse_buttons = 3; mtype = vga_getmousetype(); mousedev = "/dev/mouse"; if (getenv("MOUSEDEV")) mousedev = getenv("MOUSEDEV"); if (COM_CheckParm("-mdev")) mousedev = com_argv[COM_CheckParm("-mdev")+1]; mouserate = 1200; if (getenv("MOUSERATE")) mouserate = atoi(getenv("MOUSERATE")); if (COM_CheckParm("-mrate")) mouserate = atoi(com_argv[COM_CheckParm("-mrate")+1]); // printf("Mouse: dev=%s,type=%s,speed=%d\n", // mousedev, mice[mtype].name, mouserate); if (mouse_init(mousedev, mtype, mouserate)) { Con_Printf("No mouse found\n"); UseMouse = 0; } else mouse_seteventhandler(mousehandler); } } void IN_Shutdown(void) { if (UseMouse) mouse_close(); } /* =========== IN_Commands =========== */ void IN_Commands (void) { if (UseMouse && cls.state != ca_dedicated) { // poll mouse values while (mouse_update()) ; // perform button actions if ((mouse_buttonstate & MOUSE_LEFTBUTTON) && !(mouse_oldbuttonstate & MOUSE_LEFTBUTTON)) Key_Event (K_MOUSE1, true); else if (!(mouse_buttonstate & MOUSE_LEFTBUTTON) && (mouse_oldbuttonstate & MOUSE_LEFTBUTTON)) Key_Event (K_MOUSE1, false); if ((mouse_buttonstate & MOUSE_RIGHTBUTTON) && !(mouse_oldbuttonstate & MOUSE_RIGHTBUTTON)) Key_Event (K_MOUSE2, true); else if (!(mouse_buttonstate & MOUSE_RIGHTBUTTON) && (mouse_oldbuttonstate & MOUSE_RIGHTBUTTON)) Key_Event (K_MOUSE2, false); if ((mouse_buttonstate & MOUSE_MIDDLEBUTTON) && !(mouse_oldbuttonstate & MOUSE_MIDDLEBUTTON)) Key_Event (K_MOUSE3, true); else if (!(mouse_buttonstate & MOUSE_MIDDLEBUTTON) && (mouse_oldbuttonstate & MOUSE_MIDDLEBUTTON)) Key_Event (K_MOUSE3, false); mouse_oldbuttonstate = mouse_buttonstate; } } /* =========== IN_Move =========== */ void IN_MouseMove (usercmd_t *cmd) { if (!UseMouse) return; // poll mouse values while (mouse_update()) ; if (m_filter.value) { mouse_x = (mx + old_mouse_x) * 0.5; mouse_y = (my + old_mouse_y) * 0.5; } else { mouse_x = mx; mouse_y = my; } old_mouse_x = mx; old_mouse_y = my; mx = my = 0; // clear for next update mouse_x *= sensitivity.value; mouse_y *= sensitivity.value; // add mouse X/Y movement to cmd if ( (in_strafe.state & 1) || (lookstrafe.value && (in_mlook.state & 1) )) cmd->sidemove += m_side.value * mouse_x; else cl.viewangles[YAW] -= m_yaw.value * mouse_x; if (in_mlook.state & 1) V_StopPitchDrift (); if ( (in_mlook.state & 1) && !(in_strafe.state & 1)) { cl.viewangles[PITCH] += m_pitch.value * mouse_y; if (cl.viewangles[PITCH] > 80) cl.viewangles[PITCH] = 80; if (cl.viewangles[PITCH] < -70) cl.viewangles[PITCH] = -70; } else { if ((in_strafe.state & 1) && noclip_anglehack) cmd->upmove -= m_forward.value * mouse_y; else cmd->forwardmove -= m_forward.value * mouse_y; } } void IN_Move (usercmd_t *cmd) { IN_MouseMove(cmd); } /* ================ VID_ModeInfo ================ */ char *VID_ModeInfo (int modenum) { static char *badmodestr = "Bad mode number"; static char modestr[40]; if (modenum == 0) { sprintf (modestr, "%d x %d, %d bpp", vid.width, vid.height, modes[current_mode].bytesperpixel*8); return (modestr); } else { return (badmodestr); } }