src/graphics/2d.cpp

   1 /*
   2  * Copyright (C) Volition, Inc. 1999.  All rights reserved.
   3  *
   4  * All source code herein is the property of Volition, Inc. You may not sell
   5  * or otherwise commercially exploit the source or things you created based on
   6  * the source.
   7  */
   8
   9 /*
  10  * $Logfile: /Freespace2/code/Graphics/2d.cpp $
  11  * $Revision$
  12  * $Date$
  13  * $Author$
  14  *
  15  * Main file for 2d primitives.
  16  *
  17  * $Log$
  18  * Revision 1.12  2004/07/04 11:31:43  taylor
  19  * amd64 support, compiler warning fixes, don't use software rendering
  20  *
  21  * Revision 1.11  2002/08/31 01:39:13  theoddone33
  22  * Speed up the renderer a tad
  23  *
  24  * Revision 1.10  2002/06/17 06:33:09  relnev
  25  * ryan's struct patch for gcc 2.95
  26  *
  27  * Revision 1.9  2002/06/09 04:41:17  relnev
  28  * added copyright header
  29  *
  30  * Revision 1.8  2002/06/05 04:03:32  relnev
  31  * finished cfilesystem.
  32  *
  33  * removed some old code.
  34  *
  35  * fixed mouse save off-by-one.
  36  *
  37  * sound cleanups.
  38  *
  39  * Revision 1.7  2002/05/30 21:44:48  relnev
  40  * implemented some missing texture stuff.
  41  *
  42  * enable bitmap polys for opengl.
  43  *
  44  * work around greenness in bitmaps.
  45  *
  46  * Revision 1.6  2002/05/28 21:36:10  relnev
  47  * some more timer junk.
  48  *
  49  * tried to fix software mode.
  50  *
  51  * Revision 1.5  2002/05/28 04:18:08  theoddone33
  52  * Fix some stuff and add -DFS2_DEMO
  53  *
  54  * Revision 1.4  2002/05/27 22:43:02  theoddone33
  55  * Fix more glide symbols
  56  *
  57  * Revision 1.3  2002/05/27 22:39:21  theoddone33
  58  * Remove glide symbols
  59  *
  60  * Revision 1.2  2002/05/07 03:16:45  theoddone33
  61  * The Great Newline Fix
  62  *
  63  * Revision 1.1.1.1  2002/05/03 03:28:09  root
  64  * Initial import.
  65  *
  66  *
  67  * 25    8/20/99 2:09p Dave
  68  * PXO banner cycling.
  69  *
  70  * 24    8/16/99 9:45a Jefff
  71  * changes to cursor management to allow a 2nd temporary cursor
  72  *
  73  * 23    7/27/99 3:52p Dave
  74  * Make star drawing a bit more robust to help lame D3D cards.
  75  *
  76  * 22    7/18/99 12:32p Dave
  77  * Randomly oriented shockwaves.
  78  *
  79  * 21    7/15/99 3:07p Dave
  80  * 32 bit detection support. Mouse coord commandline.
  81  *
  82  * 20    7/14/99 9:42a Dave
  83  * Put in clear_color debug function. Put in base for 3dnow stuff / P3
  84  * stuff
  85  *
  86  * 19    7/13/99 1:15p Dave
  87  * 32 bit support. Whee!
  88  *
  89  * 18    7/12/99 11:42a Jefff
  90  * Made rectangle drawing smarter in D3D. Made plines draw properly on Ati
  91  * Rage Pro.
  92  *
  93  * 17    7/09/99 9:51a Dave
  94  * Added thick polyline code.
  95  *
  96  * 16    7/02/99 3:05p Anoop
  97  * Oops. Fixed g3_draw_2d_poly() so that it properly handles poly bitmap
  98  * and LFB bitmap calls.
  99  *
 100  * 15    6/29/99 10:35a Dave
 101  * Interface polygon bitmaps! Whee!
 102  *
 103  * 14    4/09/99 2:21p Dave
 104  * Multiplayer beta stuff. CD checking.
 105  *
 106  * 13    2/03/99 11:44a Dave
 107  * Fixed d3d transparent textures.
 108  *
 109  * 12    1/29/99 12:47a Dave
 110  * Put in sounds for beam weapon. A bunch of interface screens (tech
 111  * database stuff).
 112  *
 113  * 11    1/15/99 11:29a Neilk
 114  * Fixed D3D screen/texture pixel formatting problem.
 115  *
 116  * 10    1/08/99 2:08p Dave
 117  * Fixed software rendering for pofview. Super early support for AWACS and
 118  * beam weapons.
 119  *
 120  * 9     1/06/99 2:24p Dave
 121  * Stubs and release build fixes.
 122  *
 123  * 8     12/18/98 1:49a Dave
 124  * Fixed Fred initialization problem resulting from hi-res mode changes.
 125  *
 126  * 7     12/18/98 1:13a Dave
 127  * Rough 1024x768 support for Direct3D. Proper detection and usage through
 128  * the launcher.
 129  *
 130  * 6     12/01/98 10:32a Johnson
 131  * Fixed direct3d font problems. Fixed sun bitmap problem. Fixed direct3d
 132  * starfield problem.
 133  *
 134  * 5     11/30/98 5:31p Dave
 135  * Fixed up Fred support for software mode.
 136  *
 137  * 4     11/30/98 1:07p Dave
 138  * 16 bit conversion, first run.
 139  *
 140  * 3     11/11/98 5:37p Dave
 141  * Checkin for multiplayer testing.
 142  *
 143  * 2     10/07/98 10:52a Dave
 144  * Initial checkin.
 145  *
 146  * 1     10/07/98 10:48a Dave
 147  *
 148  * 122   6/13/98 3:18p Hoffoss
 149  * NOX()ed out a bunch of strings that shouldn't be translated.
 150  *
 151  * 121   5/23/98 11:26a Hoffoss
 152  * Fixed bug where optimized code used EDX and my code trashed it.
 153  *
 154  * 120   5/22/98 11:09p John
 155  * put in code to hopefull not crash cyrix cpus
 156  *
 157  * 119   5/20/98 9:45p John
 158  * added code so the places in code that change half the palette don't
 159  * have to clear the screen.
 160  *
 161  * 118   5/20/98 12:59p Hoffoss
 162  * Changed temporary crossfade code to just pop the image again.
 163  *
 164  * 117   5/16/98 1:18p John
 165  * Made softtware DirectDraw reset palette after Alt+TAB.
 166  *
 167  * 116   5/14/98 5:42p John
 168  * Revamped the whole window position/mouse code for the graphics windows.
 169  *
 170  * 115   5/08/98 10:49a John
 171  * Made 'gr d' go into direct3d mode.
 172  *
 173  * 114   5/06/98 11:21p John
 174  * Fixed a bitmap bug with Direct3D.  Started adding new caching code into
 175  * D3D.
 176  *
 177  * 113   4/21/98 9:28a John
 178  * Added stub for cross-fade.
 179  *
 180  * 112   4/10/98 5:20p John
 181  * Changed RGB in lighting structure to be ubytes.  Removed old
 182  * not-necessary 24 bpp software stuff.
 183  *
 184  * 111   4/06/98 12:55p John
 185  * Upped the gamma for Fred.
 186  *
 187  * 110   3/25/98 8:07p John
 188  * Restructured software rendering into two modules; One for windowed
 189  * debug mode and one for DirectX fullscreen.
 190  *
 191  * 109   3/24/98 3:58p John
 192  * Put in (hopefully) final gamma setting code.
 193  *
 194  * 108   3/10/98 4:18p John
 195  * Cleaned up graphics lib.  Took out most unused gr functions.   Made D3D
 196  * & Glide have popups and print screen.  Took out all >8bpp software
 197  * support.  Made Fred zbuffer.  Made zbuffer allocate dynamically to
 198  * support Fred.  Made zbuffering key off of functions rather than one
 199  * global variable.
 200  *
 201  * 107   2/25/98 2:37p John
 202  * Made afterburner shake 2x less noticable.  Made 'gr a' leave Glide mode
 203  * properly.  Made model_caching never work in hardware mode.
 204  *
 205  * 106   2/23/98 2:27p John
 206  * Made int3,asserts, etc pass video through.
 207  *
 208  * 105   2/20/98 3:13p John
 209  * Made popup save code print an error an exit out if 3d accelerated.
 210  *
 211  * 104   2/19/98 6:13p John
 212  * Made Glide do texturing & zbuffering.
 213  *
 214  * 103   1/26/98 5:12p John
 215  * Added in code for Pentium Pro specific optimizations. Speed up
 216  * zbuffered correct tmapper about 35%.   Speed up non-zbuffered scalers
 217  * by about 25%.
 218  *
 219  * 102   1/14/98 11:39a Dave
 220  * Polished up a bunch of popup support items.
 221  *
 222  * 101   1/10/98 1:14p John
 223  * Added explanation to debug console commands
 224  *
 225  * 100   12/21/97 4:33p John
 226  * Made debug console functions a class that registers itself
 227  * automatically, so you don't need to add the function to
 228  * debugfunctions.cpp.
 229  *
 230  * 99    12/04/97 12:09p John
 231  * Made glows use scaler instead of tmapper so they don't rotate.  Had to
 232  * add a zbuffered scaler.
 233  *
 234  * 98    12/03/97 10:47a John
 235  * added functions to save/restore entire screens.
 236  *
 237  * 97    12/02/97 3:59p John
 238  * Added first rev of thruster glow, along with variable levels of
 239  * translucency, which retquired some restructing of palman.
 240  *
 241  * 96    11/30/97 12:18p John
 242  * added more 24 & 32-bpp primitives
 243  *
 244  * 95    11/24/97 11:20a John
 245  * added new mode
 246  *
 247  * 94    11/14/97 3:54p John
 248  * Added triple buffering.
 249  *
 250  * 93    11/14/97 12:30p John
 251  * Fixed some DirectX bugs.  Moved the 8-16 xlat tables into Graphics
 252  * libs.  Made 16-bpp DirectX modes know what bitmap format they're in.
 253  *
 254  * 92    10/09/97 5:23p John
 255  * Added support for more 16-bpp functions
 256  *
 257  * 91    9/20/97 8:16a John
 258  * Made .clr files go into the Cache directory. Replaced cfopen(name,NULL)
 259  * to delete a file with cf_delete.
 260  *
 261  * 90    9/09/97 11:01a Sandeep
 262  * fixed warning level 4 bugs
 263  *
 264  * 89    9/07/97 10:01p Lawrance
 265  * add in support for animating mouse pointer
 266  *
 267  * 88    9/03/97 4:32p John
 268  * changed bmpman to only accept ani and pcx's.  made passing .pcx or .ani
 269  * to bm_load functions not needed.   Made bmpman keep track of palettes
 270  * for bitmaps not mapped into game palettes.
 271  *
 272  * 87    8/20/97 4:19p John
 273  * added delay to hopefully fix mike's problems when getting int3's in
 274  * fullscreen.
 275  *
 276  * 86    7/16/97 3:07p John
 277  *
 278  * 85    6/18/97 12:07p John
 279  * fixed some color bugs
 280  *
 281  * 84    6/17/97 7:04p John
 282  * added d3d support for gradients.
 283  * fixed some color bugs by adding screen signatures instead of watching
 284  * flags and palette changes.
 285  *
 286  * 83    6/17/97 12:03p John
 287  * Moved color/alphacolor functions into their own module.  Made all color
 288  * functions be part of the low-level graphics drivers, not just the
 289  * grsoft.
 290  *
 291  * 82    6/12/97 5:04p John
 292  * Initial rev of Glide support
 293  *
 294  * 81    6/11/97 5:49p John
 295  * Changed palette code to only recalculate alphacolors when needed, not
 296  * when palette changes.
 297  *
 298  * 80    6/11/97 1:12p John
 299  * Started fixing all the text colors in the game.
 300  *
 301  * 79    6/06/97 5:03p John
 302  * fixed bug withalpha colors failing after gr_init
 303  *
 304  * 78    6/06/97 4:53p John
 305  * made gr_init not bash current color
 306  *
 307  * 77    6/05/97 4:53p John
 308  * First rev of new antialiased font stuff.
 309  *
 310  * 76    5/20/97 10:36a John
 311  * Fixed problem with user bitmaps and direct3d caching.
 312  *
 313  * 75    5/16/97 9:11a John
 314  * fixed bug that made Ctrl+Break in fullscreen hang
 315  *
 316  * 74    5/14/97 4:38p John
 317  * Fixed print_screen bug.
 318  *
 319  * 73    5/14/97 2:10p John
 320  * added rudimentary support for windowed direct3d.
 321  *
 322  * 72    5/14/97 10:53a John
 323  * fixed some discrepencies between d3d and software palette setting.
 324  *
 325  * 71    5/13/97 4:39p John
 326  * Added console function to set graphics modes.
 327  *
 328  * 70    5/13/97 12:39p John
 329  * Got fullscreen mode working.
 330  *
 331  * 69    5/12/97 12:27p John
 332  * Restructured Graphics Library to add support for multiple renderers.
 333  *
 334  * 68    5/07/97 2:59p John
 335  * Initial rev of D3D texturing.
 336  *
 337  * 67    5/01/97 3:32p John
 338  * oops... forced 2d to always be in 8bpp,
 339  *
 340  * 66    5/01/97 3:23p John
 341  * first hooks for some direct 3d setup stuff.
 342  *
 343  * 65    4/28/97 5:33p John
 344  * fixed a newly introduced bug with fullscreen toggle.
 345  *
 346  * 64    4/28/97 4:46p John
 347  *
 348  * 63    4/22/97 12:20p John
 349  * fixed more resource leaks
 350  *
 351  * 62    4/22/97 10:33a John
 352  * fixed the 2d resource leaks that Alan found.
 353  *
 354  * 61    3/31/97 9:45a Allender
 355  * start of new font stuff
 356  *
 357  * 60    3/26/97 10:52a Lawrance
 358  * mouse always on in menus, disappears in gameplay after 1 second
 359  *
 360  * 59    3/14/97 3:55p John
 361  * Made tiled tmapper not always be zbuffered.
 362  *
 363  * 58    3/13/97 9:09a Allender
 364  * variable to allow trashing of the palette.  kind of temporary code
 365  * right now...checking needed for undefined references
 366  *
 367  * 57    3/12/97 2:51p John
 368  * Added some test code for tmapper.
 369  *
 370  * 56    3/12/97 9:25a John
 371  * fixed a bug with zbuffering.  Reenabled it by default.
 372  *
 373  * 55    3/11/97 5:13p John
 374  * made top up bitmaps work.
 375  *
 376  * 54    2/26/97 11:59a Allender
 377  * comment out warning about display settings not being optimal
 378  *
 379  * 53    1/09/97 2:16p John
 380  * took out the "Bing!" message
 381  *
 382  * 52    1/09/97 11:35a John
 383  * Added some 2d functions to get/put screen images.
 384  *
 385  * 51    1/07/97 2:01p John
 386  * Fairly fast zbuffering for object sorting.
 387  *
 388  * 50    1/06/97 2:44p John
 389  * Added in slow (but correct) zbuffering
 390  *
 391  * 49    12/11/96 12:41p John
 392  * Added new code to draw 3d laser using 2d ellipses.
 393  *
 394  * 48    12/03/96 5:42p John
 395  * took out debug code.
 396  *
 397  * 47    12/03/96 5:42p John
 398  * made gr_bitmap clip properly.
 399  *
 400  * 46    12/03/96 5:06p John
 401  * Added code to draw our own cursor.
 402  *
 403  * 45    11/26/96 6:50p John
 404  * Added some more hicolor primitives.  Made windowed mode run as current
 405  * bpp, if bpp is 8,16,or 32.
 406  *
 407  * 44    11/21/96 11:23a John
 408  * fixed bug with previous.
 409  *
 410  * 43    11/21/96 11:21a John
 411  * Made gr_get_string_size handle multi line text.
 412  * Took out gr_get_multiline_string_size
 413  *
 414  * 42    11/21/96 11:06a John
 415  * fixed warnings.
 416  *
 417  * 41    11/20/96 10:01a Hoffoss
 418  * A few minor improvements.
 419  *
 420  * 40    11/19/96 2:47p Allender
 421  * add support for xparent bitmaps in 32bpp
 422  *
 423  * 39    11/18/96 4:46p Allender
 424  * changed warning message about bit depth to appear when requested
 425  * doesn't equal actual
 426  *
 427  * 38    11/18/96 4:35p Allender
 428  * new 16bpp gradient functions
 429  *
 430  * 37    11/18/96 3:09p John
 431  * made gr_clear always clear to black.
 432  *
 433  * 36    11/18/96 1:48p Allender
 434  * added 16 bit version of shader
 435  *
 436  * 35    11/18/96 12:36p John
 437  * Added code to dump screen to a PCX file.
 438  *
 439  * 34    11/18/96 11:40a John
 440  * Added faster gr_set_color method.
 441  *
 442  * 33    11/15/96 11:26a John
 443  * Added code to clip text to clipping region.
 444  *
 445  * 32    11/15/96 11:26a Allender
 446  * fixed up 16 bbp version of gr_bitmap
 447  *
 448  * 31    11/14/96 9:11a John
 449  * Fixed bug that didn't offset the gr_string text by the current clip
 450  * region's offset.
 451  *
 452  * 30    11/13/96 6:47p John
 453  * Added gr_flip function.
 454  *
 455  * 29    11/13/96 10:10a John
 456  * Increases MAX_WIDTH & HEIGHT for Jasen's massive 1600x1200 display.
 457  *
 458  * 28    11/07/96 6:19p John
 459  * Added a bunch of 16bpp primitives so the game sort of runs in 16bpp
 460  * mode.
 461  *
 462  * 27    10/30/96 10:36a Lawrance
 463  * added gr_diamond function
 464  *
 465  * 26    10/26/96 1:40p John
 466  * Added some now primitives to the 2d library and
 467  * cleaned up some old ones.
 468  *
 469  * $NoKeywords: $
 470  */
 471
 472 #ifndef PLAT_UNIX
 473 #include <windows.h>
 474 #include <windowsx.h>
 475 #endif
 476
 477 #include "osapi.h"
 478 #include "2d.h"
 479 #include "3d.h"
 480 #include "bmpman.h"
 481 #include "palman.h"
 482 #include "font.h"
 483 #include "grinternal.h"
 484 #include "systemvars.h"
 485 #include "cmdline.h"
 486
 487 // 3dnow stuff
 488 // #include "amd3d.h"
 489
 490 // Includes for different rendering systems
 491 #include "grsoft.h"
 492 #include "grd3d.h"
 493 #ifndef PLAT_UNIX
 494 #include "grglide.h"
 495 #endif
 496 #include "gropengl.h"
 497 #include "grdirectdraw.h"
 498
 499 screen gr_screen;
 500
 501 color_gun Gr_red, Gr_green, Gr_blue, Gr_alpha;
 502 color_gun Gr_t_red, Gr_t_green, Gr_t_blue, Gr_t_alpha;
 503 color_gun Gr_ta_red, Gr_ta_green, Gr_ta_blue, Gr_ta_alpha;
 504 color_gun *Gr_current_red, *Gr_current_green, *Gr_current_blue, *Gr_current_alpha;
 505
 506
 507 ubyte Gr_original_palette[768];         // The palette
 508 ubyte Gr_current_palette[768];
 509 char Gr_current_palette_name[128] = NOX("none");
 510
 511 int Gr_zbuffering = 0;
 512 int Gr_zbuffering_mode = 0;
 513 int Gr_global_zbuffering = 0;
 514
 515 // cursor stuff
 516 int Gr_cursor = -1;
 517 int Web_cursor_bitmap = -1;
 518
 519 int Gr_inited = 0;
 520
 521 // cpu types
 522 int Gr_cpu = 0;
 523 int Gr_amd3d = 0;
 524 int Gr_katmai = 0;
 525 int Gr_mmx = 0;
 526
 527 uint Gr_signature = 0;
 528
 529 float Gr_gamma = 1.8f;
 530 int Gr_gamma_int = 180;
 531 int Gr_gamma_lookup[256];
 532
 533 void gr_close()
 534 {
 535         if ( !Gr_inited )       return;
 536
 537         palette_flush();
 538
 539         switch( gr_screen.mode )        {
 540 #ifndef PLAT_UNIX
 541         case GR_SOFTWARE:
 542                 gr_soft_cleanup();
 543                 break;
 544         case GR_DIRECTDRAW:
 545                 Int3();
 546                 gr_directdraw_cleanup();
 547                 break;
 548         case GR_DIRECT3D:
 549                 gr_d3d_cleanup();
 550                 break;
 551         case GR_GLIDE:
 552                 gr_glide_cleanup();
 553                 break;
 554 #endif
 555         case GR_OPENGL:
 556                 gr_opengl_cleanup();
 557                 break;
 558         default:
 559                 Int3();         // Invalid graphics mode
 560                 break;
 561         }
 562
 563         gr_font_close();
 564
 565         Gr_inited = 0;
 566 }
 567
 568 //XSTR:OFF
 569 DCF(gr,"Changes graphics mode")
 570 {
 571 #ifndef HARDWARE_ONLY
 572         int mode = gr_screen.mode;
 573
 574         if ( Dc_command )       {
 575                 dc_get_arg(ARG_STRING);
 576
 577                 if ( !strcmp( Dc_arg, "a"))     {
 578                         Int3();
 579                         mode = GR_SOFTWARE;
 580                 } else if ( !strcmp( Dc_arg, "b"))      {
 581                         Int3();
 582                         mode = GR_DIRECTDRAW;
 583                 } else if ( !strcmp( Dc_arg, "d"))      {
 584                         mode = GR_DIRECT3D;
 585                 } else if ( !strcmp( Dc_arg, "g"))      {
 586 #ifndef PLAT_UNIX
 587                         mode = GR_GLIDE;
 588 #endif
 589                 } else if ( !strcmp( Dc_arg, "o"))      {
 590                         mode = GR_OPENGL;
 591                 } else {
 592                         // print usage, not stats
 593                         Dc_help = 1;
 594                 }
 595
 596                 /*
 597                 if ( mode != gr_screen.mode )   {
 598                         dc_printf( "Setting new video mode...\n" );
 599                         int errcode = gr_init( gr_screen.max_w, gr_screen.max_h, mode );
 600                         if (errcode)    {
 601                                 dc_printf( "Error %d.  Graphics unchanged.\n", errcode );
 602                         }
 603                 }
 604                 */
 605         }
 606
 607         if ( Dc_help )  {
 608                 dc_printf( "Usage: gr mode\n" );
 609                 dc_printf( "The options can be:\n" );
 610                 dc_printf( "Macros:  A=software win32 window (obsolete)\n" );
 611                 dc_printf( "         B=software directdraw fullscreen (obsolete)\n" );
 612                 dc_printf( "         D=Direct3d\n" );
 613                 dc_printf( "         G=Glide\n" );
 614                 dc_printf( "         O=OpenGl (obsolete)\n" );
 615                 Dc_status = 0;  // don't print status if help is printed.  Too messy.
 616         }
 617
 618         if ( Dc_status )        {
 619                 switch( gr_screen.mode )        {
 620                 case GR_SOFTWARE:
 621                         Int3();
 622                         dc_printf( "Win32 software windowed\n" );
 623                         break;
 624                 case GR_DIRECTDRAW:
 625                         Int3();
 626                         dc_printf( "DirectDraw software windowed\n" );
 627                         break;
 628                 case GR_DIRECT3D:
 629                         dc_printf( "Direct3D\n" );
 630                         break;
 631                 case GR_GLIDE:
 632 #ifndef PLAT_UNIX
 633                         dc_printf( "3Dfx Glide\n" );
 634 #endif
 635                         break;
 636                 case GR_OPENGL:
 637                         dc_printf( "OpenGl\n" );
 638                         break;
 639                 default:
 640                         Int3();         // Invalid graphics mode
 641                 }
 642         }
 643 #endif
 644 }
 645 //XSTR:ON
 646
 647 // set screen clear color
 648 DCF(clear_color, "set clear color r, g, b")
 649 {
 650         int r, g, b;
 651
 652         dc_get_arg(ARG_INT);
 653         r = Dc_arg_int;
 654         dc_get_arg(ARG_INT);
 655         g = Dc_arg_int;
 656         dc_get_arg(ARG_INT);
 657         b = Dc_arg_int;
 658
 659         // set the color
 660         gr_set_clear_color(r, g, b);
 661 }
 662
 663 void gr_set_palette_internal( const char *name, ubyte * palette, int restrict_font_to_128 )
 664 {
 665         if ( palette == NULL )  {
 666                 // Create a default palette
 667                 int r,g,b,i;
 668                 i = 0;
 669
 670                 for (r=0; r<6; r++ )
 671                         for (g=0; g<6; g++ )
 672                                 for (b=0; b<6; b++ )            {
 673                                         Gr_current_palette[i*3+0] = (unsigned char)(r*51);
 674                                         Gr_current_palette[i*3+1] = (unsigned char)(g*51);
 675                                         Gr_current_palette[i*3+2] = (unsigned char)(b*51);
 676                                         i++;
 677                                 }
 678                 for ( i=216;i<256; i++ )        {
 679                         Gr_current_palette[i*3+0] = (unsigned char)((i-216)*6);
 680                         Gr_current_palette[i*3+1] = (unsigned char)((i-216)*6);
 681                         Gr_current_palette[i*3+2] = (unsigned char)((i-216)*6);
 682                 }
 683                 memmove( Gr_original_palette, Gr_current_palette, 768 );
 684         } else {
 685                 memmove( Gr_original_palette, palette, 768 );
 686                 memmove( Gr_current_palette, palette, 768 );
 687         }
 688
 689 //      mprintf(("Setting new palette\n" ));
 690
 691         if ( Gr_inited )        {
 692                 // Update Palette Manager tables
 693                 memmove( gr_palette, Gr_current_palette, 768 );
 694                 palette_update(name, restrict_font_to_128);
 695         }
 696 }
 697
 698
 699 void gr_set_palette( const char *name, ubyte * palette, int restrict_font_to_128 )
 700 {
 701         char *p;
 702         palette_flush();
 703         strcpy( Gr_current_palette_name, name );
 704         p = strchr( Gr_current_palette_name, '.' );
 705         if ( p ) *p = 0;
 706         gr_screen.signature = Gr_signature++;
 707         gr_set_palette_internal( name, palette, restrict_font_to_128 );
 708 }
 709
 710
 711 //void gr_test();
 712
 713 #define CPUID _asm _emit 0fh _asm _emit 0a2h
 714
 715 // -----------------------------------------------------------------------
 716 // Returns cpu type.
 717 void gr_detect_cpu(int *cpu, int *mmx, int *amd3d, int *katmai )
 718 {
 719         // Set defaults
 720         *cpu = 0;
 721         *mmx = 0;
 722         *amd3d = 0;
 723         *katmai = 0;
 724
 725 #ifdef PLAT_UNIX
 726         STUB_FUNCTION;
 727 #else
 728         DWORD RegEDX;
 729         DWORD RegEAX;
 730
 731         char cpu_vender[16];
 732         memset( cpu_vender, 0, sizeof(cpu_vender) );
 733
 734   _asm {
 735
 736                 // Check for prescence of
 737                 push    eax
 738                 push    ebx
 739                 push    ecx
 740                 push    edx
 741
 742                 pushfd                  // get extended flags
 743                 pop     eax
 744                 mov     ebx, eax                // save current flags
 745                 xor     eax, 200000h    // toggle bit 21
 746                 push    eax                     // push new flags on stack
 747                 popfd                                   // flags updated now in flags
 748                 pushfd                  // get extended flags
 749                 pop     eax             // store extended flags in eax
 750                 xor     eax, ebx        // if bit 21 r/w then eax <> 0
 751                 je              no_cpuid
 752
 753                 mov     eax, 0          // setup CPUID to return vender id
 754       CPUID           // code bytes = 0fh,  0a2h
 755                 mov     DWORD PTR cpu_vender[0], ebx
 756                 mov     DWORD PTR cpu_vender[4], edx
 757                 mov     DWORD PTR cpu_vender[8], ecx
 758
 759       mov eax, 1      // setup CPUID to return features
 760
 761       CPUID           // code bytes = 0fh,  0a2h
 762
 763                 mov RegEAX, eax // family, etc returned in eax
 764       mov RegEDX, edx   // features returned in edx
 765                 jmp     done_checking_cpuid
 766
 767
 768 no_cpuid:
 769                 mov RegEAX, 4<<8        // family, etc returned in eax
 770       mov RegEDX, 0             // features returned in edx
 771
 772 done_checking_cpuid:
 773                 pop     edx
 774                 pop     ecx
 775                 pop     ebx
 776                 pop     eax
 777
 778         }
 779
 780
 781
 782         //RegEAX        .  Bits 11:8 is family
 783         *cpu = (RegEAX >>8) & 0xF;
 784
 785         if ( *cpu < 5 ) {
 786                 *cpu = 4;                                                               // processor does not support CPUID
 787                 *mmx = 0;
 788         }
 789
 790         //RegEAX        .  Bits 11:8 is family
 791         *cpu = (RegEAX >>8) & 0xF;
 792
 793         // Check for MMX
 794         BOOL retval = TRUE;
 795    if (RegEDX & 0x800000)               // bit 23 is set for MMX technology
 796    {
 797
 798            __try { _asm emms }          // try executing an MMX instruction "emms"
 799
 800            __except(EXCEPTION_EXECUTE_HANDLER) { retval = FALSE; }
 801
 802    } else {
 803                 retval = FALSE;
 804         }
 805         if ( retval )   {
 806                 *mmx = 1;                       // processor supports CPUID but does not support MMX technology
 807         }
 808
 809         // Check for Katmai
 810    if (RegEDX & (1<<25) )               // bit 25 is set for Katmai technology
 811    {
 812                 *katmai = 1;
 813    }
 814
 815         // Check for Amd 3dnow
 816         /*
 817         if ( !SDL_strcasecmp( cpu_vender, NOX("AuthenticAMD")) )        {
 818
 819                 _asm {
 820                         mov eax, 0x80000000      // setup CPUID to return extended number of functions
 821
 822                         CPUID           // code bytes = 0fh,  0a2h
 823
 824                         mov RegEAX, eax // highest extended function value
 825                 }
 826
 827                 if ( RegEAX > 0x80000000 )      {
 828
 829                         _asm {
 830                                 mov eax, 0x80000001      // setup CPUID to return extended flags
 831
 832                                 CPUID           // code bytes = 0fh,  0a2h
 833
 834                                 mov RegEAX, eax // family, etc returned in eax
 835                                 mov RegEDX, edx // flags in edx
 836                         }
 837
 838                         if (RegEDX & 0x80000000)               // bit 31 is set for AMD-3D technology
 839                         {
 840                                 // try executing some 3Dnow instructions
 841                                 __try {
 842
 843                                         float x = (float)1.25;
 844                                         float y = (float)1.25;
 845                                         float z;
 846
 847                                         _asm {
 848                                                 movd            mm1, x
 849                                                 movd            mm2, y
 850                                                 PFMUL(AMD_M1, AMD_M2);
 851                                                 movd            z, mm1
 852                                                 femms
 853                                                 emms
 854                                         }
 855
 856                                         int should_be_156 = int(z*100);
 857
 858                                         if ( should_be_156 == 156 )     {
 859                                                 *amd3d = 1;
 860                                         }
 861
 862                                 }
 863
 864                                 __except(EXCEPTION_EXECUTE_HANDLER) { }
 865                         }
 866
 867                 }
 868         }
 869         */
 870 #endif
 871 }
 872
 873 // --------------------------------------------------------------------------
 874
 875 int gr_init(int res, int mode, int depth, int fred_x, int fred_y)
 876 {
 877         int max_w, max_h;
 878
 879         gr_detect_cpu(&Gr_cpu, &Gr_mmx, &Gr_amd3d, &Gr_katmai );
 880
 881         mprintf(( "GR_CPU: Family %d, MMX=%s\n", Gr_cpu, (Gr_mmx?"Yes":"No") ));
 882
 883 //      gr_test();
 884
 885         if ( !Gr_inited )
 886                 atexit(gr_close);
 887
 888         // If already inited, shutdown the previous graphics
 889         if (Gr_inited) {
 890                 switch (gr_screen.mode) {
 891                         case GR_OPENGL:
 892                                 gr_opengl_cleanup();
 893                                 break;
 894                         default:
 895                                 Int3();         // Invalid graphics mode
 896                                 break;
 897                 }
 898         }
 899
 900 #if defined(HARDWARE_ONLY)
 901 #ifndef PLAT_UNIX
 902         if(!Fred_running && !Pofview_running && !Nebedit_running && !Is_standalone){
 903                 if((mode != GR_GLIDE) && (mode != GR_DIRECT3D) && (mode != GR_OPENGL)){
 904                         mprintf(("Forcing glide startup!\n"));
 905                         mode = GR_GLIDE;
 906                 }
 907         }
 908 #endif
 909 #endif
 910
 911         D3D_enabled = 0;
 912         Gr_inited = 1;
 913
 914         max_w = -1;
 915         max_h = -1;
 916         if(!Fred_running && !Pofview_running){
 917                 // set resolution based on the res type
 918                 switch(res){
 919                 case GR_640:
 920                         max_w = 640;
 921                         max_h = 480;
 922                         break;
 923
 924                 case GR_1024:
 925                         max_w = 1024;
 926                         max_h = 768;
 927                         break;
 928
 929                 default :
 930                         Int3();
 931                         break;
 932                 }
 933         } else {
 934                 max_w = fred_x;
 935                 max_h = fred_y;
 936         }
 937
 938         // Make w a multiple of 8
 939         max_w = ( max_w / 8 )*8;
 940         if ( max_w < 8 ) max_w = 8;
 941         if ( max_h < 8 ) max_h = 8;
 942
 943         memset( &gr_screen, 0, sizeof(screen) );
 944
 945         gr_screen.signature = Gr_signature++;
 946         gr_screen.mode = mode;
 947         gr_screen.res = res;
 948         gr_screen.max_w = max_w;
 949         gr_screen.max_h = max_h;
 950         gr_screen.use_sections = 1;
 951         gr_screen.aspect = 1.0f;                        // Normal PC screen
 952         gr_screen.offset_x = 0;
 953         gr_screen.offset_y = 0;
 954         gr_screen.clip_left = 0;
 955         gr_screen.clip_top = 0;
 956         gr_screen.clip_right = gr_screen.max_w - 1;
 957         gr_screen.clip_bottom = gr_screen.max_h - 1;
 958         gr_screen.clip_width = gr_screen.max_w;
 959         gr_screen.clip_height = gr_screen.max_h;
 960
 961         switch( gr_screen.mode )        {
 962                 case GR_OPENGL:
 963                         gr_opengl_init();
 964                         break;
 965                 default:
 966                         Int3();         // Invalid graphics mode
 967                         break;
 968         }
 969
 970         memmove( Gr_current_palette, Gr_original_palette, 768 );
 971         gr_set_palette_internal(Gr_current_palette_name, Gr_current_palette,0);
 972
 973         gr_set_gamma(Gr_gamma);
 974
 975         if ( Gr_cursor == -1 ){
 976                 Gr_cursor = bm_load( "cursor" );
 977         }
 978
 979         // load the web pointer cursor bitmap
 980         if (Web_cursor_bitmap < 0)      {
 981                 int nframes;                                            // used to pass, not really needed (should be 1)
 982                 Web_cursor_bitmap = bm_load_animation("cursorweb", &nframes);
 983                 SDL_assert(Web_cursor_bitmap >= 0);             // if bitmap didnt load, thats not good (this is protected for in release tho)
 984         }
 985
 986         gr_set_color(0,0,0);
 987
 988         gr_set_clear_color(0, 0, 0);
 989
 990         // Call some initialization functions
 991         gr_set_shader(NULL);
 992
 993         return 0;
 994 }
 995
 996 void gr_force_windowed()
 997 {
 998         if ( !Gr_inited ) {
 999                 return;
1000         }
1001
1002         if (gr_screen.gf_force_windowed) {
1003                 (*gr_screen.gf_force_windowed)();
1004         }
1005
1006         if (Os_debugger_running) {
1007                 SDL_Delay(1000);
1008         }
1009 }
1010
1011 void gr_force_fullscreen()
1012 {
1013         if ( !Gr_inited ) {
1014                 return;
1015         }
1016
1017         if (gr_screen.gf_force_fullscreen) {
1018                 (*gr_screen.gf_force_fullscreen)();
1019         }
1020
1021         if (Os_debugger_running) {
1022                 Sleep(1000);
1023         }
1024 }
1025
1026 void gr_activate(int active)
1027 {
1028         if ( !Gr_inited ) {
1029                 return;
1030         }
1031
1032         if (gr_screen.gf_activate) {
1033                 (*gr_screen.gf_activate)(active);
1034         }
1035 }
1036
1037 // -----------------------------------------------------------------------
1038 // gr_set_cursor_bitmap()
1039 //
1040 // Set the bitmap for the mouse pointer.  This is called by the animating mouse
1041 // pointer code.
1042 //
1043 // The lock parameter just locks basically disables the next call of this function that doesnt
1044 // have an unlock feature.  If adding in more cursor-changing situations, be aware of
1045 // unexpected results. You have been warned.
1046 //
1047 // TODO: investigate memory leak of original Gr_cursor bitmap when this is called
1048 void gr_set_cursor_bitmap(int n, int lock)
1049 {
1050         static int locked = 0;
1051         SDL_assert(n >= 0);
1052
1053         if (!locked || (lock == GR_CURSOR_UNLOCK)) {
1054                 Gr_cursor = n;
1055         } else {
1056                 locked = 0;
1057         }
1058
1059         if (lock == GR_CURSOR_LOCK) {
1060                 locked = 1;
1061         }
1062 }
1063
1064 // retrieves the current bitmap
1065 // used in UI_GADGET to save/restore current cursor state
1066 int gr_get_cursor_bitmap()
1067 {
1068         return Gr_cursor;
1069 }
1070
1071 // new bitmap functions
1072 void gr_bitmap(int x, int y)
1073 {
1074         int section_x, section_y;
1075         int x_line, y_line;
1076         int w, h;
1077         int idx, s_idx;
1078         // float u_scale, v_scale;
1079         bitmap_section_info *sections;
1080
1081         // render all sections
1082         bm_get_info(gr_screen.current_bitmap, &w, &h, NULL, NULL, NULL, &sections);
1083         y_line = 0;
1084         section_y = 0;
1085
1086         if (gr_screen.use_sections) {
1087                 for(idx=0; idx<sections->num_y; idx++){
1088                         x_line = 0;
1089                         for(s_idx=0; s_idx<sections->num_x; s_idx++){
1090                                 // get the section as a texture in vram
1091                                 gr_set_bitmap(gr_screen.current_bitmap, gr_screen.current_alphablend_mode, gr_screen.current_bitblt_mode, gr_screen.current_alpha, s_idx, idx);
1092
1093                                 // determine the width and height of this section
1094                                 bm_get_section_size(gr_screen.current_bitmap, s_idx, idx, &section_x, &section_y);
1095
1096                                 // draw as a poly
1097                                 g3_draw_2d_poly_bitmap(x + x_line, y + y_line, section_x, section_y, TMAP_FLAG_BITMAP_SECTION);
1098                                 x_line += section_x;
1099                         }
1100                         y_line += section_y;
1101                 }
1102         } else {
1103                 gr_set_bitmap(gr_screen.current_bitmap, gr_screen.current_alphablend_mode,
1104                                 gr_screen.current_bitblt_mode, gr_screen.current_alpha);
1105                 g3_draw_2d_poly_bitmap(x, y, w, h, TMAP_FLAG_BITMAP_INTERFACE);
1106
1107         }
1108 }
1109
1110 // given endpoints, and thickness, calculate coords of the endpoint
1111 void gr_pline_helper(vector *out, vector *in1, vector *in2, int thickness)
1112 {
1113         vector slope;
1114
1115         // slope of the line
1116         if(vm_vec_same(in1, in2)){
1117                 slope = vmd_zero_vector;
1118         } else {
1119                 vm_vec_sub(&slope, in2, in1);
1120                 float temp = -slope.xyz.x;
1121                 slope.xyz.x = slope.xyz.y;
1122                 slope.xyz.y = temp;
1123                 vm_vec_normalize(&slope);
1124         }
1125
1126         // get the points
1127         vm_vec_scale_add(out, in1, &slope, (float)thickness);
1128 }
1129
1130 // special function for drawing polylines. this function is specifically intended for
1131 // polylines where each section is no more than 90 degrees away from a previous section.
1132 // Moreover, it is _really_ intended for use with 45 degree angles.
1133 void gr_pline_special(vector **pts, int num_pts, int thickness)
1134 {
1135         vector s1, s2, e1, e2, dir;
1136         vector last_e1, last_e2;
1137         vertex v[4];
1138         vertex *verts[4] = {&v[0], &v[1], &v[2], &v[3]};
1139         int saved_zbuffer_mode, idx;
1140         int started_frame = 0;
1141
1142         // SDL_assert(0);
1143
1144         // if we have less than 2 pts, bail
1145         if(num_pts < 2){
1146                 return;
1147         }
1148
1149         extern int G3_count;
1150         if(G3_count == 0){
1151                 g3_start_frame(1);
1152                 started_frame = 1;
1153         }
1154
1155         // turn off zbuffering
1156         saved_zbuffer_mode = gr_zbuffer_get();
1157         gr_zbuffer_set(GR_ZBUFF_NONE);
1158
1159         // turn off culling
1160         gr_set_cull(0);
1161
1162         // draw each section
1163         last_e1 = vmd_zero_vector;
1164         last_e2 = vmd_zero_vector;
1165         for(idx=0; idx<num_pts-1; idx++){
1166                 // get the start and endpoints
1167                 s1 = *pts[idx];                                                                                                         // start 1 (on the line)
1168                 gr_pline_helper(&s2, pts[idx], pts[idx+1], thickness);  // start 2
1169                 e1 = *pts[idx+1];                                                                                                               // end 1 (on the line)
1170                 vm_vec_sub(&dir, pts[idx+1], pts[idx]);
1171                 vm_vec_add(&e2, &s2, &dir);                                                                             // end 2
1172
1173                 // stuff coords
1174                 v[0].sx = (float)ceil(s1.xyz.x);
1175                 v[0].sy = (float)ceil(s1.xyz.y);
1176                 v[0].sw = 0.0f;
1177                 v[0].u = 0.5f;
1178                 v[0].v = 0.5f;
1179                 v[0].flags = PF_PROJECTED;
1180                 v[0].codes = 0;
1181                 v[0].r = gr_screen.current_color.red;
1182                 v[0].g = gr_screen.current_color.green;
1183                 v[0].b = gr_screen.current_color.blue;
1184
1185                 v[1].sx = (float)ceil(s2.xyz.x);
1186                 v[1].sy = (float)ceil(s2.xyz.y);
1187                 v[1].sw = 0.0f;
1188                 v[1].u = 0.5f;
1189                 v[1].v = 0.5f;
1190                 v[1].flags = PF_PROJECTED;
1191                 v[1].codes = 0;
1192                 v[1].r = gr_screen.current_color.red;
1193                 v[1].g = gr_screen.current_color.green;
1194                 v[1].b = gr_screen.current_color.blue;
1195
1196                 v[2].sx = (float)ceil(e2.xyz.x);
1197                 v[2].sy = (float)ceil(e2.xyz.y);
1198                 v[2].sw = 0.0f;
1199                 v[2].u = 0.5f;
1200                 v[2].v = 0.5f;
1201                 v[2].flags = PF_PROJECTED;
1202                 v[2].codes = 0;
1203                 v[2].r = gr_screen.current_color.red;
1204                 v[2].g = gr_screen.current_color.green;
1205                 v[2].b = gr_screen.current_color.blue;
1206
1207                 v[3].sx = (float)ceil(e1.xyz.x);
1208                 v[3].sy = (float)ceil(e1.xyz.y);
1209                 v[3].sw = 0.0f;
1210                 v[3].u = 0.5f;
1211                 v[3].v = 0.5f;
1212                 v[3].flags = PF_PROJECTED;
1213                 v[3].codes = 0;
1214                 v[3].r = gr_screen.current_color.red;
1215                 v[3].g = gr_screen.current_color.green;
1216                 v[3].b = gr_screen.current_color.blue;
1217
1218                 // draw the polys
1219                 g3_draw_poly_constant_sw(4, verts, TMAP_FLAG_GOURAUD | TMAP_FLAG_RGB, 0.1f);
1220
1221                 // if we're past the first section, draw a "patch" triangle to fill any gaps
1222                 if(idx > 0){
1223                         // stuff coords
1224                         v[0].sx = (float)ceil(s1.xyz.x);
1225                         v[0].sy = (float)ceil(s1.xyz.y);
1226                         v[0].sw = 0.0f;
1227                         v[0].u = 0.5f;
1228                         v[0].v = 0.5f;
1229                         v[0].flags = PF_PROJECTED;
1230                         v[0].codes = 0;
1231                         v[0].r = gr_screen.current_color.red;
1232                         v[0].g = gr_screen.current_color.green;
1233                         v[0].b = gr_screen.current_color.blue;
1234
1235                         v[1].sx = (float)ceil(s2.xyz.x);
1236                         v[1].sy = (float)ceil(s2.xyz.y);
1237                         v[1].sw = 0.0f;
1238                         v[1].u = 0.5f;
1239                         v[1].v = 0.5f;
1240                         v[1].flags = PF_PROJECTED;
1241                         v[1].codes = 0;
1242                         v[1].r = gr_screen.current_color.red;
1243                         v[1].g = gr_screen.current_color.green;
1244                         v[1].b = gr_screen.current_color.blue;
1245
1246
1247                         v[2].sx = (float)ceil(last_e2.xyz.x);
1248                         v[2].sy = (float)ceil(last_e2.xyz.y);
1249                         v[2].sw = 0.0f;
1250                         v[2].u = 0.5f;
1251                         v[2].v = 0.5f;
1252                         v[2].flags = PF_PROJECTED;
1253                         v[2].codes = 0;
1254                         v[2].r = gr_screen.current_color.red;
1255                         v[2].g = gr_screen.current_color.green;
1256                         v[2].b = gr_screen.current_color.blue;
1257
1258                         g3_draw_poly_constant_sw(3, verts, TMAP_FLAG_GOURAUD | TMAP_FLAG_RGB, 0.1f);
1259                 }
1260
1261                 // store our endpoints
1262                 last_e1 = e1;
1263                 last_e2 = e2;
1264         }
1265
1266         if(started_frame){
1267                 g3_end_frame();
1268         }
1269
1270         // restore zbuffer mode
1271         gr_zbuffer_set(saved_zbuffer_mode);
1272
1273         // restore culling
1274         gr_set_cull(1);
1275 }
1276