gl_draw.c

   1 /*
   2 Copyright (C) 1996-1997 Id Software, Inc.
   3
   4 This program is free software; you can redistribute it and/or
   5 modify it under the terms of the GNU General Public License
   6 as published by the Free Software Foundation; either version 2
   7 of the License, or (at your option) any later version.
   8
   9 This program is distributed in the hope that it will be useful,
  10 but WITHOUT ANY WARRANTY; without even the implied warranty of
  11 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
  12
  13 See the GNU General Public License for more details.
  14
  15 You should have received a copy of the GNU General Public License
  16 along with this program; if not, write to the Free Software
  17 Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
  18
  19 */
  20
  21 // draw.c -- this is the only file outside the refresh that touches the
  22 // vid buffer
  23
  24 #include "quakedef.h"
  25
  26 //#define GL_COLOR_INDEX8_EXT     0x80E5
  27
  28 cvar_t          scr_conalpha = {"scr_conalpha", "1"};
  29
  30 byte            *draw_chars;                            // 8*8 graphic characters
  31 qpic_t          *draw_disc;
  32
  33 rtexture_t      *char_texture;
  34
  35 typedef struct
  36 {
  37         rtexture_t      *tex;
  38 } glpic_t;
  39
  40 rtexture_t      *conbacktex;
  41
  42 //=============================================================================
  43 /* Support Routines */
  44
  45 typedef struct cachepic_s
  46 {
  47         char            name[MAX_QPATH];
  48         qpic_t          pic;
  49         byte            padding[32];    // for appended glpic
  50 } cachepic_t;
  51
  52 #define MAX_CACHED_PICS         128
  53 cachepic_t      menu_cachepics[MAX_CACHED_PICS];
  54 int                     menu_numcachepics;
  55
  56 byte            menuplyr_pixels[4096];
  57
  58 int             pic_texels;
  59 int             pic_count;
  60
  61 qpic_t *Draw_PicFromWad (char *name)
  62 {
  63         qpic_t  *p;
  64         glpic_t *gl;
  65
  66         p = W_GetLumpName (name);
  67         gl = (glpic_t *)p->data;
  68
  69         gl->tex = R_LoadTexture (name, p->width, p->height, p->data, TEXF_ALPHA | TEXF_PRECACHE);
  70         return p;
  71 }
  72
  73
  74 /*
  75 ================
  76 Draw_CachePic
  77 ================
  78 */
  79 qpic_t  *Draw_CachePic (char *path)
  80 {
  81         cachepic_t      *pic;
  82         int                     i;
  83         qpic_t          *dat;
  84         glpic_t         *gl;
  85
  86         for (pic=menu_cachepics, i=0 ; i<menu_numcachepics ; pic++, i++)
  87                 if (!strcmp (path, pic->name))
  88                         return &pic->pic;
  89
  90         if (menu_numcachepics == MAX_CACHED_PICS)
  91                 Sys_Error ("menu_numcachepics == MAX_CACHED_PICS");
  92         menu_numcachepics++;
  93         strcpy (pic->name, path);
  94
  95 //
  96 // load the pic from disk
  97 //
  98         dat = (qpic_t *)COM_LoadMallocFile (path, false);
  99         if (!dat)
 100                 Sys_Error ("Draw_CachePic: failed to load %s", path);
 101         SwapPic (dat);
 102
 103         // HACK HACK HACK --- we need to keep the bytes for
 104         // the translatable player picture just for the menu
 105         // configuration dialog
 106         if (!strcmp (path, "gfx/menuplyr.lmp"))
 107                 memcpy (menuplyr_pixels, dat->data, dat->width*dat->height);
 108
 109         pic->pic.width = dat->width;
 110         pic->pic.height = dat->height;
 111
 112         gl = (glpic_t *)pic->pic.data;
 113         gl->tex = loadtextureimage(path, 0, 0, false, false, true);
 114         if (!gl->tex)
 115                 gl->tex = R_LoadTexture (path, dat->width, dat->height, dat->data, TEXF_ALPHA | TEXF_PRECACHE);
 116
 117         qfree(dat);
 118
 119         return &pic->pic;
 120 }
 121
 122 /*
 123 ===============
 124 Draw_Init
 125 ===============
 126 */
 127 void gl_draw_start(void)
 128 {
 129         int             i;
 130
 131         char_texture = loadtextureimage ("conchars", 0, 0, false, false, true);
 132         if (!char_texture)
 133         {
 134                 draw_chars = W_GetLumpName ("conchars");
 135                 for (i=0 ; i<128*128 ; i++)
 136                         if (draw_chars[i] == 0)
 137                                 draw_chars[i] = 255;    // proper transparent color
 138
 139                 // now turn them into textures
 140                 char_texture = R_LoadTexture ("charset", 128, 128, draw_chars, TEXF_ALPHA | TEXF_PRECACHE);
 141         }
 142
 143         conbacktex = loadtextureimage("gfx/conback", 0, 0, false, false, true);
 144
 145         // get the other pics we need
 146         draw_disc = Draw_PicFromWad ("disc");
 147 }
 148
 149 void gl_draw_shutdown(void)
 150 {
 151 }
 152
 153 void gl_draw_newmap(void)
 154 {
 155 }
 156
 157 char engineversion[40];
 158 int engineversionx, engineversiony;
 159
 160 extern void R_Textures_Init();
 161 void GL_Draw_Init (void)
 162 {
 163         int i;
 164         Cvar_RegisterVariable (&scr_conalpha);
 165
 166         Cmd_AddCommand ("loadsky", &LoadSky_f);
 167
 168 #if defined(__linux__)
 169         sprintf (engineversion, "DarkPlaces Linux   GL %.2f build %3i", (float) VERSION, buildnumber);
 170 #elif defined(WIN32)
 171         sprintf (engineversion, "DarkPlaces Windows GL %.2f build %3i", (float) VERSION, buildnumber);
 172 #else
 173         sprintf (engineversion, "DarkPlaces Unknown GL %.2f build %3i", (float) VERSION, buildnumber);
 174 #endif
 175         for (i = 0;i < 40 && engineversion[i];i++)
 176                 engineversion[i] += 0x80; // shift to orange
 177         engineversionx = vid.width - strlen(engineversion) * 8 - 8;
 178         engineversiony = vid.height - 8;
 179
 180         R_Textures_Init();
 181         R_RegisterModule("GL_Draw", gl_draw_start, gl_draw_shutdown, gl_draw_newmap);
 182 }
 183
 184 /*
 185 ================
 186 Draw_Character
 187
 188 Draws one 8*8 graphics character with 0 being transparent.
 189 It can be clipped to the top of the screen to allow the console to be
 190 smoothly scrolled off.
 191 ================
 192 */
 193 void Draw_Character (int x, int y, int num)
 194 {
 195         int                             row, col;
 196         float                   frow, fcol, size;
 197
 198         if (num == 32)
 199                 return;         // space
 200
 201         num &= 255;
 202
 203         if (y <= -8)
 204                 return;                 // totally off screen
 205
 206         row = num>>4;
 207         col = num&15;
 208
 209         frow = row*0.0625;
 210         fcol = col*0.0625;
 211         size = 0.0625;
 212
 213         if (!r_render.value)
 214                 return;
 215         glBindTexture(GL_TEXTURE_2D, R_GetTexture(char_texture));
 216         // LordHavoc: NEAREST mode on text if not scaling up
 217         if (glwidth <= (int) vid.width)
 218         {
 219                 glTexParameterf(GL_TEXTURE_2D, GL_TEXTURE_MIN_FILTER, GL_NEAREST);
 220                 glTexParameterf(GL_TEXTURE_2D, GL_TEXTURE_MAG_FILTER, GL_NEAREST);
 221         }
 222         else
 223         {
 224                 glTexParameterf(GL_TEXTURE_2D, GL_TEXTURE_MIN_FILTER, GL_LINEAR);
 225                 glTexParameterf(GL_TEXTURE_2D, GL_TEXTURE_MAG_FILTER, GL_LINEAR);
 226         }
 227
 228         if (lighthalf)
 229                 glColor3f(0.5f,0.5f,0.5f);
 230         else
 231                 glColor3f(1.0f,1.0f,1.0f);
 232         glBegin (GL_QUADS);
 233         glTexCoord2f (fcol, frow);
 234         glVertex2f (x, y);
 235         glTexCoord2f (fcol + size, frow);
 236         glVertex2f (x+8, y);
 237         glTexCoord2f (fcol + size, frow + size);
 238         glVertex2f (x+8, y+8);
 239         glTexCoord2f (fcol, frow + size);
 240         glVertex2f (x, y+8);
 241         glEnd ();
 242
 243         // LordHavoc: revert to LINEAR mode
 244 //      if (glwidth < (int) vid.width)
 245 //      {
 246 //              glTexParameterf(GL_TEXTURE_2D, GL_TEXTURE_MIN_FILTER, GL_LINEAR);
 247 //              glTexParameterf(GL_TEXTURE_2D, GL_TEXTURE_MAG_FILTER, GL_LINEAR);
 248 //      }
 249 }
 250
 251 /*
 252 ================
 253 Draw_String
 254 ================
 255 */
 256 // LordHavoc: sped this up a lot, and added maxlen
 257 void Draw_String (int x, int y, char *str, int maxlen)
 258 {
 259         int num;
 260         float frow, fcol;
 261         if (!r_render.value)
 262                 return;
 263         if (y <= -8 || y >= (int) vid.height || x >= (int) vid.width || *str == 0) // completely offscreen or no text to print
 264                 return;
 265         if (maxlen < 1)
 266                 maxlen = strlen(str);
 267         else if (maxlen > (int) strlen(str))
 268                 maxlen = strlen(str);
 269         glBindTexture(GL_TEXTURE_2D, R_GetTexture(char_texture));
 270
 271         // LordHavoc: NEAREST mode on text if not scaling up
 272         if (glwidth <= (int) vid.width)
 273         {
 274                 glTexParameterf(GL_TEXTURE_2D, GL_TEXTURE_MIN_FILTER, GL_NEAREST);
 275                 glTexParameterf(GL_TEXTURE_2D, GL_TEXTURE_MAG_FILTER, GL_NEAREST);
 276         }
 277         else
 278         {
 279                 glTexParameterf(GL_TEXTURE_2D, GL_TEXTURE_MIN_FILTER, GL_LINEAR);
 280                 glTexParameterf(GL_TEXTURE_2D, GL_TEXTURE_MAG_FILTER, GL_LINEAR);
 281         }
 282
 283         if (lighthalf)
 284                 glColor3f(0.5f,0.5f,0.5f);
 285         else
 286                 glColor3f(1.0f,1.0f,1.0f);
 287         glBegin (GL_QUADS);
 288         while (maxlen-- && x < (int) vid.width) // stop rendering when out of characters or room
 289         {
 290                 if ((num = *str++) != 32) // skip spaces
 291                 {
 292                         frow = (float) ((int) num >> 4)*0.0625;
 293                         fcol = (float) ((int) num & 15)*0.0625;
 294                         glTexCoord2f (fcol         , frow         );glVertex2f (x, y);
 295                         glTexCoord2f (fcol + 0.0625, frow         );glVertex2f (x+8, y);
 296                         glTexCoord2f (fcol + 0.0625, frow + 0.0625);glVertex2f (x+8, y+8);
 297                         glTexCoord2f (fcol         , frow + 0.0625);glVertex2f (x, y+8);
 298                 }
 299                 x += 8;
 300         }
 301         glEnd ();
 302
 303         // LordHavoc: revert to LINEAR mode
 304 //      if (glwidth < (int) vid.width)
 305 //      {
 306 //              glTexParameterf(GL_TEXTURE_2D, GL_TEXTURE_MIN_FILTER, GL_LINEAR);
 307 //              glTexParameterf(GL_TEXTURE_2D, GL_TEXTURE_MAG_FILTER, GL_LINEAR);
 308 //      }
 309 }
 310
 311 void Draw_GenericPic (rtexture_t *tex, float red, float green, float blue, float alpha, int x, int y, int width, int height)
 312 {
 313         if (!r_render.value)
 314                 return;
 315         if (lighthalf)
 316                 glColor4f(red * 0.5f, green * 0.5f, blue * 0.5f, alpha);
 317         else
 318                 glColor4f(red, green, blue, alpha);
 319         glBindTexture(GL_TEXTURE_2D, R_GetTexture(tex));
 320         glBegin (GL_QUADS);
 321         glTexCoord2f (0, 0);glVertex2f (x, y);
 322         glTexCoord2f (1, 0);glVertex2f (x+width, y);
 323         glTexCoord2f (1, 1);glVertex2f (x+width, y+height);
 324         glTexCoord2f (0, 1);glVertex2f (x, y+height);
 325         glEnd ();
 326 }
 327
 328 /*
 329 =============
 330 Draw_AlphaPic
 331 =============
 332 */
 333 void Draw_AlphaPic (int x, int y, qpic_t *pic, float alpha)
 334 {
 335         Draw_GenericPic(((glpic_t *)pic->data)->tex, 1,1,1,alpha, x,y,pic->width, pic->height);
 336 }
 337
 338
 339 /*
 340 =============
 341 Draw_Pic
 342 =============
 343 */
 344 void Draw_Pic (int x, int y, qpic_t *pic)
 345 {
 346         Draw_GenericPic(((glpic_t *)pic->data)->tex, 1,1,1,1, x,y,pic->width, pic->height);
 347 }
 348
 349
 350 /*
 351 =============
 352 Draw_PicTranslate
 353
 354 Only used for the player color selection menu
 355 =============
 356 */
 357 void Draw_PicTranslate (int x, int y, qpic_t *pic, byte *translation)
 358 {
 359         int                             i, c;
 360         byte                    *trans, *src, *dest;
 361         rtexture_t              *rt;
 362
 363         c = pic->width * pic->height;
 364         src = menuplyr_pixels;
 365         dest = trans = qmalloc(c);
 366         for (i = 0;i < c;i++)
 367                 *dest++ = translation[*src++];
 368
 369         rt = R_LoadTexture ("translatedplayerpic", pic->width, pic->height, trans, TEXF_ALPHA | TEXF_PRECACHE);
 370         qfree(trans);
 371
 372         if (!r_render.value)
 373                 return;
 374         Draw_GenericPic (rt, 1,1,1,1, x, y, pic->width, pic->height);
 375 }
 376
 377
 378 /*
 379 ================
 380 Draw_ConsoleBackground
 381
 382 ================
 383 */
 384 void Draw_ConsoleBackground (int lines)
 385 {
 386         Draw_GenericPic (conbacktex, 1,1,1,scr_conalpha.value*lines/vid.height, 0, lines - vid.height, vid.width, vid.height);
 387         // LordHavoc: draw version
 388         Draw_String(engineversionx, lines - vid.height + engineversiony, engineversion, 9999);
 389 }
 390
 391 /*
 392 =============
 393 Draw_Fill
 394
 395 Fills a box of pixels with a single color
 396 =============
 397 */
 398 void Draw_Fill (int x, int y, int w, int h, int c)
 399 {
 400         if (!r_render.value)
 401                 return;
 402         glDisable (GL_TEXTURE_2D);
 403         if (lighthalf)
 404         {
 405                 byte *tempcolor = (byte *)&d_8to24table[c];
 406                 glColor4ub ((byte) (tempcolor[0] >> 1), (byte) (tempcolor[1] >> 1), (byte) (tempcolor[2] >> 1), tempcolor[3]);
 407         }
 408         else
 409                 glColor4ubv ((byte *)&d_8to24table[c]);
 410
 411         glBegin (GL_QUADS);
 412
 413         glVertex2f (x,y);
 414         glVertex2f (x+w, y);
 415         glVertex2f (x+w, y+h);
 416         glVertex2f (x, y+h);
 417
 418         glEnd ();
 419         glColor3f(1,1,1);
 420         glEnable (GL_TEXTURE_2D);
 421 }
 422 //=============================================================================
 423
 424 //=============================================================================
 425
 426 /*
 427 ================
 428 GL_Set2D
 429
 430 Setup as if the screen was 320*200
 431 ================
 432 */
 433 void GL_Set2D (void)
 434 {
 435         if (!r_render.value)
 436                 return;
 437         glViewport (glx, gly, glwidth, glheight);
 438
 439         glMatrixMode(GL_PROJECTION);
 440     glLoadIdentity ();
 441         glOrtho  (0, vid.width, vid.height, 0, -99999, 99999);
 442
 443         glMatrixMode(GL_MODELVIEW);
 444     glLoadIdentity ();
 445
 446         glDisable (GL_DEPTH_TEST);
 447         glDisable (GL_CULL_FACE);
 448         glEnable (GL_BLEND);
 449         glDisable (GL_ALPHA_TEST);
 450         glEnable(GL_TEXTURE_2D);
 451
 452         // LordHavoc: added this
 453         glBlendFunc(GL_SRC_ALPHA, GL_ONE_MINUS_SRC_ALPHA);
 454         glTexEnvf(GL_TEXTURE_ENV, GL_TEXTURE_ENV_MODE, GL_MODULATE);
 455
 456         glColor3f(1,1,1);
 457 }
 458
 459 // LordHavoc: SHOWLMP stuff
 460 #define SHOWLMP_MAXLABELS 256
 461 typedef struct showlmp_s
 462 {
 463         qboolean        isactive;
 464         float           x;
 465         float           y;
 466         char            label[32];
 467         char            pic[128];
 468 } showlmp_t;
 469
 470 showlmp_t showlmp[SHOWLMP_MAXLABELS];
 471
 472 void SHOWLMP_decodehide(void)
 473 {
 474         int i;
 475         byte *lmplabel;
 476         lmplabel = MSG_ReadString();
 477         for (i = 0;i < SHOWLMP_MAXLABELS;i++)
 478                 if (showlmp[i].isactive && strcmp(showlmp[i].label, lmplabel) == 0)
 479                 {
 480                         showlmp[i].isactive = false;
 481                         return;
 482                 }
 483 }
 484
 485 void SHOWLMP_decodeshow(void)
 486 {
 487         int i, k;
 488         byte lmplabel[256], picname[256];
 489         float x, y;
 490         strcpy(lmplabel,MSG_ReadString());
 491         strcpy(picname, MSG_ReadString());
 492         if (nehahra) // LordHavoc: nasty old legacy junk
 493         {
 494                 x = MSG_ReadByte();
 495                 y = MSG_ReadByte();
 496         }
 497         else
 498         {
 499                 x = MSG_ReadShort();
 500                 y = MSG_ReadShort();
 501         }
 502         k = -1;
 503         for (i = 0;i < SHOWLMP_MAXLABELS;i++)
 504                 if (showlmp[i].isactive)
 505                 {
 506                         if (strcmp(showlmp[i].label, lmplabel) == 0)
 507                         {
 508                                 k = i;
 509                                 break; // drop out to replace it
 510                         }
 511                 }
 512                 else if (k < 0) // find first empty one to replace
 513                         k = i;
 514         if (k < 0)
 515                 return; // none found to replace
 516         // change existing one
 517         showlmp[k].isactive = true;
 518         strcpy(showlmp[k].label, lmplabel);
 519         strcpy(showlmp[k].pic, picname);
 520         showlmp[k].x = x;
 521         showlmp[k].y = y;
 522 }
 523
 524 void SHOWLMP_drawall(void)
 525 {
 526         int i;
 527         for (i = 0;i < SHOWLMP_MAXLABELS;i++)
 528                 if (showlmp[i].isactive)
 529                         Draw_Pic(showlmp[i].x, showlmp[i].y, Draw_CachePic(showlmp[i].pic));
 530 }
 531
 532 void SHOWLMP_clear(void)
 533 {
 534         int i;
 535         for (i = 0;i < SHOWLMP_MAXLABELS;i++)
 536                 showlmp[i].isactive = false;
 537 }