quakeforge/libs/video/renderer/gl/gl_screen.c

880 lines
17 KiB
C
Raw Normal View History

/*
gl_screen.c
master for refresh, status bar, console, chat, notify, etc
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
$Id$
*/
#ifdef HAVE_CONFIG_H
# include "config.h"
#endif
#ifdef HAVE_STRING_H
# include <string.h>
#endif
#ifdef HAVE_STRINGS_H
# include <strings.h>
#endif
#include <time.h>
#include "QF/cmd.h"
#include "QF/console.h"
2001-05-31 03:41:35 +00:00
#include "QF/cvar.h"
2001-05-09 22:40:51 +00:00
#include "QF/draw.h"
#include "QF/keys.h"
2001-05-09 17:57:57 +00:00
#include "QF/pcx.h"
#include "QF/render.h" // r_refdef
#include "QF/screen.h"
#include "QF/sys.h"
#include "QF/texture.h"
2001-05-09 17:57:57 +00:00
#include "QF/tga.h"
#include "QF/vfs.h" // MAX_OSPATH
#include "QF/GL/defines.h"
#include "QF/GL/funcs.h"
#include "QF/GL/qf_rmain.h"
#include "QF/GL/qf_vid.h"
#include "compat.h"
#include "r_cvar.h"
#include "r_local.h"
#include "sbar.h"
#include "view.h"
/*
background clear
rendering
turtle/net/ram icons
sbar
centerprint / slow centerprint
notify lines
intermission / finale overlay
loading plaque
console
menu
required background clears
required update regions
syncronous draw mode or async
One off screen buffer, with updates either copied or xblited
Need to double buffer?
async draw will require the refresh area to be cleared, because it will be
xblited, but sync draw can just ignore it.
sync
draw
CenterPrint ()
SlowPrint ()
Screen_Update ();
Con_Printf ();
net
turn off messages option
the refresh is allways rendered, unless the console is full screen
console is:
notify lines
half
full
*/
int glx, gly, glwidth, glheight;
// only the refresh window will be updated unless these variables are flagged
int scr_copytop;
int scr_copyeverything;
float scr_con_current;
float scr_conlines; // lines of console to display
int oldscreensize, oldfov;
int oldsbar;
qboolean scr_initialized; // ready to draw
qpic_t *scr_ram;
qpic_t *scr_net;
qpic_t *scr_turtle;
int scr_fullupdate;
int clearconsole;
int clearnotify;
viddef_t vid; // global video state
vrect_t scr_vrect;
qboolean scr_disabled_for_loading;
float scr_disabled_time;
qboolean block_drawing;
void SCR_ScreenShot_f (void);
/* CENTER PRINTING */
char scr_centerstring[1024];
float scr_centertime_start; // for slow victory printing
float scr_centertime_off;
int scr_center_lines;
int scr_erase_lines;
int scr_erase_center;
extern float v_blend[4];
extern int sb_lines;
extern void GL_Set2D (void);
2001-05-09 17:57:57 +00:00
/*
SCR_CenterPrint
Called for important messages that should stay in the center of the screen
for a few moments
*/
void
2001-07-15 07:04:17 +00:00
SCR_CenterPrint (const char *str)
{
strncpy (scr_centerstring, str, sizeof (scr_centerstring) - 1);
scr_centertime_off = scr_centertime->value;
scr_centertime_start = r_realtime;
// count the number of lines for centering
scr_center_lines = 1;
while (*str) {
if (*str == '\n')
scr_center_lines++;
str++;
}
}
void
SCR_DrawCenterString (void)
{
char *start;
int remaining, j, l, x, y;
// the finale prints the characters one at a time
if (r_force_fullscreen /* FIXME: better test */)
remaining = scr_printspeed->value * (r_realtime -
scr_centertime_start);
else
remaining = 9999;
scr_erase_center = 0;
start = scr_centerstring;
if (scr_center_lines <= 4)
y = vid.height * 0.35;
else
y = 48;
do {
// scan the width of the line
for (l = 0; l < 40; l++)
if (start[l] == '\n' || !start[l])
break;
x = (vid.width - l * 8) / 2;
for (j = 0; j < l; j++, x += 8) {
Draw_Character (x, y, start[j]);
if (!remaining--)
return;
}
y += 8;
while (*start && *start != '\n')
start++;
if (!*start)
break;
start++; // skip the \n
} while (1);
}
void
SCR_CheckDrawCenterString (int swap)
{
scr_copytop = 1;
if (scr_center_lines > scr_erase_lines)
scr_erase_lines = scr_center_lines;
scr_centertime_off -= r_frametime;
if (scr_centertime_off <= 0 && !r_force_fullscreen /*FIXME: better test*/)
return;
if (key_dest != key_game)
return;
SCR_DrawCenterString ();
}
float
CalcFov (float fov_x, float width, float height)
{
float a, x;
if (fov_x < 1 || fov_x > 179)
Sys_Error ("Bad fov: %f", fov_x);
x = width / tan (fov_x * (M_PI / 360));
a = (x == 0) ? 90 : atan (height / x); // 0 shouldn't happen
a = a * (360 / M_PI);
return a;
}
/*
SCR_CalcRefdef
Must be called whenever vid changes
Internal use only
*/
static void
SCR_CalcRefdef (void)
{
float size;
int h;
qboolean full = false;
scr_fullupdate = 0; // force a background redraw
vid.recalc_refdef = 0;
// force the status bar to redraw
Sbar_Changed ();
// bound viewsize
Cvar_SetValue (scr_viewsize, bound (30, scr_viewsize->int_val, 120));
// bound field of view
Cvar_SetValue (scr_fov, bound (10, scr_fov->value, 170));
if (scr_viewsize->int_val >= 120)
sb_lines = 0; // no status bar at all
else if (scr_viewsize->int_val >= 110)
sb_lines = 24; // no inventory
else
sb_lines = 24 + 16 + 8;
if (scr_viewsize->int_val >= 100) {
full = true;
size = 100.0;
} else {
size = scr_viewsize->int_val;
}
// intermission is always full screen
if (r_force_fullscreen /* FIXME: better test */) {
full = true;
size = 100.0;
sb_lines = 0;
}
size /= 100.0;
h = vid.height - r_lineadj;
r_refdef.vrect.width = vid.width * size + 0.5;
if (r_refdef.vrect.width < 96) {
size = 96.0 / r_refdef.vrect.width;
r_refdef.vrect.width = 96; // min for icons
}
r_refdef.vrect.height = vid.height * size + 0.5;
if (r_refdef.vrect.height > vid.height - r_lineadj)
r_refdef.vrect.height = vid.height - r_lineadj;
r_refdef.vrect.x = (vid.width - r_refdef.vrect.width) / 2;
if (full)
r_refdef.vrect.y = 0;
else
r_refdef.vrect.y = (h - r_refdef.vrect.height) / 2;
r_refdef.fov_x = scr_fov->int_val;
r_refdef.fov_y =
CalcFov (r_refdef.fov_x, r_refdef.vrect.width, r_refdef.vrect.height);
scr_vrect = r_refdef.vrect;
}
/*
SCR_SizeUp_f
Keybinding command
*/
void
SCR_SizeUp_f (void)
{
if (scr_viewsize->int_val < 120) {
Cvar_SetValue (scr_viewsize, scr_viewsize->int_val + 10);
vid.recalc_refdef = 1;
}
}
/*
SCR_SizeDown_f
Keybinding command
*/
void
SCR_SizeDown_f (void)
{
Cvar_SetValue (scr_viewsize, scr_viewsize->int_val - 10);
vid.recalc_refdef = 1;
}
void
SCR_Init (void)
{
// register our commands
Cmd_AddCommand ("screenshot", SCR_ScreenShot_f, "Take a screenshot, "
"saves as qfxxx.tga in the current directory");
Cmd_AddCommand ("sizeup", SCR_SizeUp_f, "Increases the screen size");
Cmd_AddCommand ("sizedown", SCR_SizeDown_f, "Decreases the screen size");
scr_ram = Draw_PicFromWad ("ram");
scr_net = Draw_PicFromWad ("net");
scr_turtle = Draw_PicFromWad ("turtle");
scr_initialized = true;
}
void
SCR_DrawRam (int swap)
{
if (!scr_showram->int_val)
return;
if (!r_cache_thrash)
return;
Draw_Pic (scr_vrect.x + 32, scr_vrect.y, scr_ram);
}
void
SCR_DrawTurtle (int swap)
{
static int count;
if (!scr_showturtle->int_val)
return;
if (r_frametime < 0.1) {
count = 0;
return;
}
count++;
if (count < 3)
return;
Draw_Pic (scr_vrect.x, scr_vrect.y, scr_turtle);
}
extern cvar_t *show_fps;
extern cvar_t *show_time;
void
SCR_DrawFPS (int swap)
{
char st[80];
double t;
static double lastframetime;
int i, x, y;
static int lastfps;
extern int fps_count;
if (!show_fps->int_val)
return;
t = Sys_DoubleTime ();
if ((t - lastframetime) >= 1.0) {
lastfps = fps_count;
fps_count = 0;
lastframetime = t;
}
snprintf (st, sizeof (st), "%3d FPS", lastfps);
// FIXME! This is evil. -- Deek
// calculate the location of the clock
if (show_time->int_val <= 0) {
i = 8;
} else if (show_time->int_val == 1) {
i = 56;
} else {
i = 80;
}
x = swap ? vid.width - ((strlen (st) * 8) + i) : i;
y = vid.height - sb_lines - 8;
Draw_String (x, y, st);
}
/*
SCR_DrawTime
Draw a clock on the screen
Written by Misty, rewritten by Deek.
*/
void
SCR_DrawTime (int swap)
{
char st[80];
char *timefmt = NULL;
int x, y;
struct tm *local = NULL;
time_t utc = 0;
// any cvar that can take multiple settings must be able to handle abuse.
if (show_time->int_val <= 0)
return;
// Get local time
utc = time (NULL);
local = localtime (&utc);
if (show_time->int_val == 1) { // Use international format
timefmt = "%k:%M";
} else if (show_time->int_val >= 2) { // US AM/PM display
timefmt = "%l:%M %P";
}
strftime (st, sizeof (st), timefmt, local);
// Print it at far left/right of screen
x = swap ? (vid.width - ((strlen (st) * 8) + 8)) : 8;
y = vid.height - (sb_lines + 8);
Draw_String (x, y, st);
}
void
SCR_DrawPause (int swap)
{
qpic_t *pic;
if (!scr_showpause->int_val) // turn off for screenshots
return;
if (!r_paused)
return;
pic = Draw_CachePic ("gfx/pause.lmp", true);
Draw_Pic ((vid.width - pic->width) / 2,
(vid.height - 48 - pic->height) / 2, pic);
}
void
SCR_SetUpToDrawConsole (void)
{
Con_CheckResize ();
// decide on the height of the console
if (!r_active) {
scr_conlines = vid.height; // full screen
scr_con_current = scr_conlines;
} else if (key_dest == key_console)
scr_conlines = vid.height * bound (0.2, scr_consize->value, 1);
else
scr_conlines = 0; // none visible
if (scr_conlines < scr_con_current) {
scr_con_current -= scr_conspeed->value * r_frametime;
if (scr_conlines > scr_con_current)
scr_con_current = scr_conlines;
} else if (scr_conlines > scr_con_current) {
scr_con_current += scr_conspeed->value * r_frametime;
if (scr_conlines < scr_con_current)
scr_con_current = scr_conlines;
}
if (clearconsole++ < vid.numpages) {
Sbar_Changed ();
} else if (clearnotify++ < vid.numpages) {
} else
con_notifylines = 0;
}
void
SCR_DrawConsole (int swap)
{
if (scr_con_current) {
scr_copyeverything = 1;
Con_DrawConsole (scr_con_current);
Con_DrawDownload (scr_con_current);
clearconsole = 0;
} else {
if (key_dest == key_game || key_dest == key_message)
Con_DrawNotify (); // only draw notify in game
}
}
/* SCREEN SHOTS */
tex_t *
SCR_ScreenShot (int width, int height)
{
unsigned char *src, *dest;
float fracw, frach;
int count, dex, dey, dx, dy, nx, r, g, b, x, y, w, h;
tex_t *tex;
tex = Hunk_TempAlloc (field_offset (tex_t, data[vid.width *
vid.height * 3]));
if (!tex)
return 0;
qfglReadPixels (glx, gly, vid.width, vid.height, GL_RGB, GL_UNSIGNED_BYTE,
tex->data + vid.width * vid.height);
w = (vid.width < width) ? vid.width : width;
h = (vid.height < height) ? vid.height : height;
fracw = (float) vid.width / (float) w;
frach = (float) vid.height / (float) h;
for (y = 0; y < h; y++) {
dest = tex->data + (w * 3 * y);
for (x = 0; x < w; x++) {
r = g = b = 0;
dx = x * fracw;
dex = (x + 1) * fracw;
if (dex == dx)
dex++; // at least one
dy = y * frach;
dey = (y + 1) * frach;
if (dey == dy)
dey++; // at least one
count = 0;
for (; dy < dey; dy++) {
src = tex->data + (vid.width * 3 * dy) + dx * 3;
for (nx = dx; nx < dex; nx++) {
r += *src++;
g += *src++;
b += *src++;
count++;
}
}
r /= count;
g /= count;
b /= count;
*dest++ = r;
*dest++ = b;
*dest++ = g;
}
}
// convert to eight bit
for (y = 0; y < h; y++) {
src = tex->data + (w * 3 * y);
dest = tex->data + (w * y);
for (x = 0; x < w; x++) {
*dest++ = MipColor (src[0], src[1], src[2]);
src += 3;
}
}
return tex;
}
2001-05-09 17:57:57 +00:00
void
SCR_ScreenShot_f (void)
{
byte *buffer;
char pcxname[MAX_OSPATH];
// find a file name to save it to
if (!COM_NextFilename (pcxname, "qf", ".tga")) {
Con_Printf ("SCR_ScreenShot_f: Couldn't create a TGA file\n");
return;
}
buffer = malloc (glwidth * glheight * 3);
qfglReadPixels (glx, gly, glwidth, glheight, GL_BGR_EXT, GL_UNSIGNED_BYTE,
buffer);
WriteTGAfile (pcxname, buffer, glwidth, glheight);
free (buffer);
Con_Printf ("Wrote %s\n", pcxname);
}
/*
2001-05-09 22:40:51 +00:00
Find closest color in the palette for named color
*/
int
MipColor (int r, int g, int b)
{
float bestdist, dist;
int r1, g1, b1, i;
int best = 0;
static int lastbest;
static int lr = -1, lg = -1, lb = -1;
if (r == lr && g == lg && b == lb)
return lastbest;
bestdist = 256 * 256 * 3;
for (i = 0; i < 256; i++) {
static int j;
j = i * 3;
r1 = vid_basepal[j] - r;
g1 = vid_basepal[j + 1] - g;
b1 = vid_basepal[j + 2] - b;
dist = r1 * r1 + g1 * g1 + b1 * b1;
if (dist < bestdist) {
bestdist = dist;
best = i;
}
}
lr = r;
lg = g;
lb = b;
lastbest = best;
return best;
}
// in gl_draw.c
extern byte *draw_chars; // 8*8 graphic characters
void
SCR_DrawCharToSnap (int num, byte * dest, int width)
{
byte *source;
int col, row, drawline, x;
row = num >> 4;
col = num & 15;
source = draw_chars + (row << 10) + (col << 3);
drawline = 8;
while (drawline--) {
for (x = 0; x < 8; x++)
if (source[x])
dest[x] = source[x];
else
dest[x] = 98;
source += 128;
dest -= width;
}
}
void
SCR_DrawStringToSnap (const char *s, tex_t *tex, int x, int y)
{
byte *dest;
byte *buf = tex->data;
const unsigned char *p;
int width = tex->width;
dest = buf + ((y * width) + x);
p = (const unsigned char *) s;
while (*p) {
SCR_DrawCharToSnap (*p++, dest, width);
dest += 8;
}
}
char *scr_notifystring;
void
SCR_DrawNotifyString (void)
{
char *start;
int j, l, x, y;
start = scr_notifystring;
y = vid.height * 0.35;
do {
// scan the width of the line
for (l = 0; l < 40; l++)
if (start[l] == '\n' || !start[l])
break;
x = (vid.width - l * 8) / 2;
for (j = 0; j < l; j++, x += 8)
Draw_Character (x, y, start[j]);
y += 8;
while (*start && *start != '\n')
start++;
if (!*start)
break;
start++; // skip the \n
} while (1);
}
void
SCR_TileClear (void)
{
if (r_refdef.vrect.x > 0) {
// left
Draw_TileClear (0, 0, r_refdef.vrect.x, vid.height - sb_lines);
// right
Draw_TileClear (r_refdef.vrect.x + r_refdef.vrect.width, 0,
vid.width - r_refdef.vrect.x + r_refdef.vrect.width,
vid.height - sb_lines);
}
if (r_refdef.vrect.y > 0) {
// top
Draw_TileClear (r_refdef.vrect.x, 0,
r_refdef.vrect.x + r_refdef.vrect.width,
r_refdef.vrect.y);
// bottom
Draw_TileClear (r_refdef.vrect.x,
r_refdef.vrect.y + r_refdef.vrect.height,
r_refdef.vrect.width,
vid.height - sb_lines -
(r_refdef.vrect.height + r_refdef.vrect.y));
}
}
2001-08-26 19:47:35 +00:00
int oldviewsize = 0;
2001-05-09 17:57:57 +00:00
/*
SCR_UpdateScreen
This is called every frame, and can also be called explicitly to flush
text to the screen.
WARNING: be very careful calling this from elsewhere, because the refresh
needs almost the entire 256k of stack space!
*/
void
SCR_UpdateScreen (double realtime, SCR_Func *scr_funcs, int swap)
{
double time1 = 0, time2;
if (block_drawing)
return;
r_realtime = realtime;
vid.numpages = 2 + gl_triplebuffer->int_val;
scr_copytop = 0;
scr_copyeverything = 0;
if (scr_disabled_for_loading) {
if (r_realtime - scr_disabled_time > 60) {
scr_disabled_for_loading = false;
Con_Printf ("load failed.\n");
} else {
return;
}
}
if (!scr_initialized || !con_initialized) // not initialized yet
return;
if (oldviewsize != scr_viewsize->int_val) {
oldviewsize = scr_viewsize->int_val;
vid.recalc_refdef = true;
}
GL_BeginRendering (&glx, &gly, &glwidth, &glheight);
if (r_speeds->int_val) {
time1 = Sys_DoubleTime ();
c_brush_polys = 0;
c_alias_polys = 0;
}
if (oldfov != scr_fov->value) { // determine size of refresh window
oldfov = scr_fov->value;
vid.recalc_refdef = true;
}
if (vid.recalc_refdef)
SCR_CalcRefdef ();
// do 3D refresh drawing, and then update the screen
SCR_SetUpToDrawConsole ();
V_RenderView ();
GL_Set2D ();
// draw any areas not covered by the refresh
SCR_TileClear ();
if (r_force_fullscreen /*FIXME better test*/ == 1 && key_dest ==
key_game) {
Sbar_IntermissionOverlay ();
} else if (r_force_fullscreen /*FIXME better test*/ == 2 &&
key_dest == key_game) {
Sbar_FinaleOverlay ();
SCR_CheckDrawCenterString (swap);
} else {
while (*scr_funcs) {
(*scr_funcs)(swap);
scr_funcs++;
}
}
// also makes polyblend apply to whole screen
qfglDisable (GL_TEXTURE_2D);
if (v_blend[3]) {
qfglBegin (GL_QUADS);
qfglColor4fv (v_blend);
qfglVertex2f (0, 0);
qfglVertex2f (vid.width, 0);
qfglVertex2f (vid.width, vid.height);
qfglVertex2f (0, vid.height);
qfglEnd ();
2001-08-30 18:24:19 +00:00
qfglColor3ubv (color_white);
}
qfglEnable (GL_TEXTURE_2D);
if (r_speeds->int_val) {
// qfglFinish ();
time2 = Sys_DoubleTime ();
Con_Printf ("%3i ms %4i wpoly %4i epoly\n",
(int) ((time2 - time1) * 1000), c_brush_polys,
c_alias_polys);
}
qfglFinish ();
GL_EndRendering ();
}