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 // cursor stuff
 512 int Gr_cursor = -1;
 513 int Web_cursor_bitmap = -1;
 514
 515 int Gr_inited = 0;
 516
 517 // cpu types
 518 int Gr_cpu = 0;
 519 int Gr_amd3d = 0;
 520 int Gr_katmai = 0;
 521 int Gr_mmx = 0;
 522
 523 uint Gr_signature = 0;
 524
 525 float Gr_gamma = 1.8f;
 526 int Gr_gamma_int = 180;
 527 int Gr_gamma_lookup[256];
 528
 529 void gr_close()
 530 {
 531         if ( !Gr_inited )       return;
 532
 533         palette_flush();
 534
 535         switch( gr_screen.mode )        {
 536 #ifndef PLAT_UNIX
 537         case GR_SOFTWARE:
 538                 gr_soft_cleanup();
 539                 break;
 540         case GR_DIRECTDRAW:
 541                 Int3();
 542                 gr_directdraw_cleanup();
 543                 break;
 544         case GR_DIRECT3D:
 545                 gr_d3d_cleanup();
 546                 break;
 547         case GR_GLIDE:
 548                 gr_glide_cleanup();
 549                 break;
 550 #endif
 551         case GR_OPENGL:
 552                 gr_opengl_cleanup();
 553                 break;
 554         default:
 555                 Int3();         // Invalid graphics mode
 556                 break;
 557         }
 558
 559         gr_font_close();
 560
 561         Gr_inited = 0;
 562 }
 563
 564 //XSTR:OFF
 565 DCF(gr,"Changes graphics mode")
 566 {
 567 #ifndef HARDWARE_ONLY
 568         int mode = gr_screen.mode;
 569
 570         if ( Dc_command )       {
 571                 dc_get_arg(ARG_STRING);
 572
 573                 if ( !strcmp( Dc_arg, "a"))     {
 574                         Int3();
 575                         mode = GR_SOFTWARE;
 576                 } else if ( !strcmp( Dc_arg, "b"))      {
 577                         Int3();
 578                         mode = GR_DIRECTDRAW;
 579                 } else if ( !strcmp( Dc_arg, "d"))      {
 580                         mode = GR_DIRECT3D;
 581                 } else if ( !strcmp( Dc_arg, "g"))      {
 582 #ifndef PLAT_UNIX
 583                         mode = GR_GLIDE;
 584 #endif
 585                 } else if ( !strcmp( Dc_arg, "o"))      {
 586                         mode = GR_OPENGL;
 587                 } else {
 588                         // print usage, not stats
 589                         Dc_help = 1;
 590                 }
 591
 592                 /*
 593                 if ( mode != gr_screen.mode )   {
 594                         dc_printf( "Setting new video mode...\n" );
 595                         int errcode = gr_init( gr_screen.max_w, gr_screen.max_h, mode );
 596                         if (errcode)    {
 597                                 dc_printf( "Error %d.  Graphics unchanged.\n", errcode );
 598                         }
 599                 }
 600                 */
 601         }
 602
 603         if ( Dc_help )  {
 604                 dc_printf( "Usage: gr mode\n" );
 605                 dc_printf( "The options can be:\n" );
 606                 dc_printf( "Macros:  A=software win32 window (obsolete)\n" );
 607                 dc_printf( "         B=software directdraw fullscreen (obsolete)\n" );
 608                 dc_printf( "         D=Direct3d\n" );
 609                 dc_printf( "         G=Glide\n" );
 610                 dc_printf( "         O=OpenGl (obsolete)\n" );
 611                 Dc_status = 0;  // don't print status if help is printed.  Too messy.
 612         }
 613
 614         if ( Dc_status )        {
 615                 switch( gr_screen.mode )        {
 616                 case GR_SOFTWARE:
 617                         Int3();
 618                         dc_printf( "Win32 software windowed\n" );
 619                         break;
 620                 case GR_DIRECTDRAW:
 621                         Int3();
 622                         dc_printf( "DirectDraw software windowed\n" );
 623                         break;
 624                 case GR_DIRECT3D:
 625                         dc_printf( "Direct3D\n" );
 626                         break;
 627                 case GR_GLIDE:
 628 #ifndef PLAT_UNIX
 629                         dc_printf( "3Dfx Glide\n" );
 630 #endif
 631                         break;
 632                 case GR_OPENGL:
 633                         dc_printf( "OpenGl\n" );
 634                         break;
 635                 default:
 636                         Int3();         // Invalid graphics mode
 637                 }
 638         }
 639 #endif
 640 }
 641 //XSTR:ON
 642
 643 // set screen clear color
 644 DCF(clear_color, "set clear color r, g, b")
 645 {
 646         int r, g, b;
 647
 648         dc_get_arg(ARG_INT);
 649         r = Dc_arg_int;
 650         dc_get_arg(ARG_INT);
 651         g = Dc_arg_int;
 652         dc_get_arg(ARG_INT);
 653         b = Dc_arg_int;
 654
 655         // set the color
 656         gr_set_clear_color(r, g, b);
 657 }
 658
 659 void gr_set_palette_internal( const char *name, ubyte * palette, int restrict_font_to_128 )
 660 {
 661         if ( palette == NULL )  {
 662                 // Create a default palette
 663                 int r,g,b,i;
 664                 i = 0;
 665
 666                 for (r=0; r<6; r++ )
 667                         for (g=0; g<6; g++ )
 668                                 for (b=0; b<6; b++ )            {
 669                                         Gr_current_palette[i*3+0] = (unsigned char)(r*51);
 670                                         Gr_current_palette[i*3+1] = (unsigned char)(g*51);
 671                                         Gr_current_palette[i*3+2] = (unsigned char)(b*51);
 672                                         i++;
 673                                 }
 674                 for ( i=216;i<256; i++ )        {
 675                         Gr_current_palette[i*3+0] = (unsigned char)((i-216)*6);
 676                         Gr_current_palette[i*3+1] = (unsigned char)((i-216)*6);
 677                         Gr_current_palette[i*3+2] = (unsigned char)((i-216)*6);
 678                 }
 679                 memmove( Gr_original_palette, Gr_current_palette, 768 );
 680         } else {
 681                 memmove( Gr_original_palette, palette, 768 );
 682                 memmove( Gr_current_palette, palette, 768 );
 683         }
 684
 685 //      mprintf(("Setting new palette\n" ));
 686
 687         if ( Gr_inited )        {
 688                 // Update Palette Manager tables
 689                 memmove( gr_palette, Gr_current_palette, 768 );
 690                 palette_update(name, restrict_font_to_128);
 691         }
 692 }
 693
 694
 695 void gr_set_palette( const char *name, ubyte * palette, int restrict_font_to_128 )
 696 {
 697         char *p;
 698         palette_flush();
 699         strcpy( Gr_current_palette_name, name );
 700         p = strchr( Gr_current_palette_name, '.' );
 701         if ( p ) *p = 0;
 702         gr_screen.signature = Gr_signature++;
 703         gr_set_palette_internal( name, palette, restrict_font_to_128 );
 704 }
 705
 706
 707 //void gr_test();
 708
 709 #define CPUID _asm _emit 0fh _asm _emit 0a2h
 710
 711 // -----------------------------------------------------------------------
 712 // Returns cpu type.
 713 void gr_detect_cpu(int *cpu, int *mmx, int *amd3d, int *katmai )
 714 {
 715         // Set defaults
 716         *cpu = 0;
 717         *mmx = 0;
 718         *amd3d = 0;
 719         *katmai = 0;
 720
 721 #ifdef PLAT_UNIX
 722         STUB_FUNCTION;
 723 #else
 724         DWORD RegEDX;
 725         DWORD RegEAX;
 726
 727         char cpu_vender[16];
 728         memset( cpu_vender, 0, sizeof(cpu_vender) );
 729
 730   _asm {
 731
 732                 // Check for prescence of
 733                 push    eax
 734                 push    ebx
 735                 push    ecx
 736                 push    edx
 737
 738                 pushfd                  // get extended flags
 739                 pop     eax
 740                 mov     ebx, eax                // save current flags
 741                 xor     eax, 200000h    // toggle bit 21
 742                 push    eax                     // push new flags on stack
 743                 popfd                                   // flags updated now in flags
 744                 pushfd                  // get extended flags
 745                 pop     eax             // store extended flags in eax
 746                 xor     eax, ebx        // if bit 21 r/w then eax <> 0
 747                 je              no_cpuid
 748
 749                 mov     eax, 0          // setup CPUID to return vender id
 750       CPUID           // code bytes = 0fh,  0a2h
 751                 mov     DWORD PTR cpu_vender[0], ebx
 752                 mov     DWORD PTR cpu_vender[4], edx
 753                 mov     DWORD PTR cpu_vender[8], ecx
 754
 755       mov eax, 1      // setup CPUID to return features
 756
 757       CPUID           // code bytes = 0fh,  0a2h
 758
 759                 mov RegEAX, eax // family, etc returned in eax
 760       mov RegEDX, edx   // features returned in edx
 761                 jmp     done_checking_cpuid
 762
 763
 764 no_cpuid:
 765                 mov RegEAX, 4<<8        // family, etc returned in eax
 766       mov RegEDX, 0             // features returned in edx
 767
 768 done_checking_cpuid:
 769                 pop     edx
 770                 pop     ecx
 771                 pop     ebx
 772                 pop     eax
 773
 774         }
 775
 776
 777
 778         //RegEAX        .  Bits 11:8 is family
 779         *cpu = (RegEAX >>8) & 0xF;
 780
 781         if ( *cpu < 5 ) {
 782                 *cpu = 4;                                                               // processor does not support CPUID
 783                 *mmx = 0;
 784         }
 785
 786         //RegEAX        .  Bits 11:8 is family
 787         *cpu = (RegEAX >>8) & 0xF;
 788
 789         // Check for MMX
 790         BOOL retval = TRUE;
 791    if (RegEDX & 0x800000)               // bit 23 is set for MMX technology
 792    {
 793
 794            __try { _asm emms }          // try executing an MMX instruction "emms"
 795
 796            __except(EXCEPTION_EXECUTE_HANDLER) { retval = FALSE; }
 797
 798    } else {
 799                 retval = FALSE;
 800         }
 801         if ( retval )   {
 802                 *mmx = 1;                       // processor supports CPUID but does not support MMX technology
 803         }
 804
 805         // Check for Katmai
 806    if (RegEDX & (1<<25) )               // bit 25 is set for Katmai technology
 807    {
 808                 *katmai = 1;
 809    }
 810
 811         // Check for Amd 3dnow
 812         /*
 813         if ( !SDL_strcasecmp( cpu_vender, NOX("AuthenticAMD")) )        {
 814
 815                 _asm {
 816                         mov eax, 0x80000000      // setup CPUID to return extended number of functions
 817
 818                         CPUID           // code bytes = 0fh,  0a2h
 819
 820                         mov RegEAX, eax // highest extended function value
 821                 }
 822
 823                 if ( RegEAX > 0x80000000 )      {
 824
 825                         _asm {
 826                                 mov eax, 0x80000001      // setup CPUID to return extended flags
 827
 828                                 CPUID           // code bytes = 0fh,  0a2h
 829
 830                                 mov RegEAX, eax // family, etc returned in eax
 831                                 mov RegEDX, edx // flags in edx
 832                         }
 833
 834                         if (RegEDX & 0x80000000)               // bit 31 is set for AMD-3D technology
 835                         {
 836                                 // try executing some 3Dnow instructions
 837                                 __try {
 838
 839                                         float x = (float)1.25;
 840                                         float y = (float)1.25;
 841                                         float z;
 842
 843                                         _asm {
 844                                                 movd            mm1, x
 845                                                 movd            mm2, y
 846                                                 PFMUL(AMD_M1, AMD_M2);
 847                                                 movd            z, mm1
 848                                                 femms
 849                                                 emms
 850                                         }
 851
 852                                         int should_be_156 = int(z*100);
 853
 854                                         if ( should_be_156 == 156 )     {
 855                                                 *amd3d = 1;
 856                                         }
 857
 858                                 }
 859
 860                                 __except(EXCEPTION_EXECUTE_HANDLER) { }
 861                         }
 862
 863                 }
 864         }
 865         */
 866 #endif
 867 }
 868
 869 // --------------------------------------------------------------------------
 870
 871 int gr_init(int res, int mode, int depth, int fred_x, int fred_y)
 872 {
 873         int max_w, max_h;
 874
 875         gr_detect_cpu(&Gr_cpu, &Gr_mmx, &Gr_amd3d, &Gr_katmai );
 876
 877         mprintf(( "GR_CPU: Family %d, MMX=%s\n", Gr_cpu, (Gr_mmx?"Yes":"No") ));
 878
 879 //      gr_test();
 880
 881         if ( !Gr_inited )
 882                 atexit(gr_close);
 883
 884         // If already inited, shutdown the previous graphics
 885         if ( Gr_inited )        {
 886                 switch( gr_screen.mode )        {
 887 #ifndef PLAT_UNIX
 888                 case GR_SOFTWARE:
 889                         gr_soft_cleanup();
 890                         break;
 891                 case GR_DIRECTDRAW:
 892                         Int3();
 893                         gr_directdraw_cleanup();
 894                         break;
 895                 case GR_DIRECT3D:
 896                         gr_d3d_cleanup();
 897                         break;
 898                 case GR_GLIDE:
 899                         gr_glide_cleanup();
 900                         break;
 901 #endif
 902                 case GR_OPENGL:
 903                         gr_opengl_cleanup();
 904                         break;
 905                 default:
 906                         Int3();         // Invalid graphics mode
 907                         break;
 908                 }
 909         }
 910
 911 #if defined(HARDWARE_ONLY)
 912 #ifndef PLAT_UNIX
 913         if(!Fred_running && !Pofview_running && !Nebedit_running && !Is_standalone){
 914                 if((mode != GR_GLIDE) && (mode != GR_DIRECT3D) && (mode != GR_OPENGL)){
 915                         mprintf(("Forcing glide startup!\n"));
 916                         mode = GR_GLIDE;
 917                 }
 918         }
 919 #endif
 920 #endif
 921
 922         D3D_enabled = 0;
 923         Gr_inited = 1;
 924
 925         max_w = -1;
 926         max_h = -1;
 927         if(!Fred_running && !Pofview_running){
 928                 // set resolution based on the res type
 929                 switch(res){
 930                 case GR_640:
 931                         max_w = 640;
 932                         max_h = 480;
 933                         break;
 934
 935                 case GR_1024:
 936                         max_w = 1024;
 937                         max_h = 768;
 938                         break;
 939
 940                 default :
 941                         Int3();
 942                         break;
 943                 }
 944         } else {
 945                 max_w = fred_x;
 946                 max_h = fred_y;
 947         }
 948
 949         // Make w a multiple of 8
 950         max_w = ( max_w / 8 )*8;
 951         if ( max_w < 8 ) max_w = 8;
 952         if ( max_h < 8 ) max_h = 8;
 953
 954         memset( &gr_screen, 0, sizeof(screen) );
 955
 956         gr_screen.signature = Gr_signature++;
 957         gr_screen.mode = mode;
 958         gr_screen.res = res;
 959         gr_screen.max_w = max_w;
 960         gr_screen.max_h = max_h;
 961         gr_screen.use_sections = 1;
 962         gr_screen.aspect = 1.0f;                        // Normal PC screen
 963         gr_screen.offset_x = 0;
 964         gr_screen.offset_y = 0;
 965         gr_screen.clip_left = 0;
 966         gr_screen.clip_top = 0;
 967         gr_screen.clip_right = gr_screen.max_w - 1;
 968         gr_screen.clip_bottom = gr_screen.max_h - 1;
 969         gr_screen.clip_width = gr_screen.max_w;
 970         gr_screen.clip_height = gr_screen.max_h;
 971
 972         switch( gr_screen.mode )        {
 973                 case GR_OPENGL:
 974                         gr_opengl_init();
 975                         break;
 976                 default:
 977                         Int3();         // Invalid graphics mode
 978                         break;
 979         }
 980
 981         memmove( Gr_current_palette, Gr_original_palette, 768 );
 982         gr_set_palette_internal(Gr_current_palette_name, Gr_current_palette,0);
 983
 984         gr_set_gamma(Gr_gamma);
 985
 986         if ( Gr_cursor == -1 ){
 987                 Gr_cursor = bm_load( "cursor" );
 988         }
 989
 990         // load the web pointer cursor bitmap
 991         if (Web_cursor_bitmap < 0)      {
 992                 int nframes;                                            // used to pass, not really needed (should be 1)
 993                 Web_cursor_bitmap = bm_load_animation("cursorweb", &nframes);
 994                 SDL_assert(Web_cursor_bitmap >= 0);             // if bitmap didnt load, thats not good (this is protected for in release tho)
 995         }
 996
 997         gr_set_color(0,0,0);
 998
 999         gr_set_clear_color(0, 0, 0);
1000
1001         // Call some initialization functions
1002         gr_set_shader(NULL);
1003
1004         return 0;
1005 }
1006
1007 void gr_force_windowed()
1008 {
1009         if ( !Gr_inited ) {
1010                 return;
1011         }
1012
1013         if (gr_screen.gf_force_windowed) {
1014                 (*gr_screen.gf_force_windowed)();
1015         }
1016
1017         if (Os_debugger_running) {
1018                 SDL_Delay(1000);
1019         }
1020 }
1021
1022 void gr_activate(int active)
1023 {
1024         if ( !Gr_inited ) {
1025                 return;
1026         }
1027
1028         if (gr_screen.gf_activate) {
1029                 (*gr_screen.gf_activate)(active);
1030         }
1031 }
1032
1033 // -----------------------------------------------------------------------
1034 // gr_set_cursor_bitmap()
1035 //
1036 // Set the bitmap for the mouse pointer.  This is called by the animating mouse
1037 // pointer code.
1038 //
1039 // The lock parameter just locks basically disables the next call of this function that doesnt
1040 // have an unlock feature.  If adding in more cursor-changing situations, be aware of
1041 // unexpected results. You have been warned.
1042 //
1043 // TODO: investigate memory leak of original Gr_cursor bitmap when this is called
1044 void gr_set_cursor_bitmap(int n, int lock)
1045 {
1046         static int locked = 0;
1047         SDL_assert(n >= 0);
1048
1049         if (!locked || (lock == GR_CURSOR_UNLOCK)) {
1050                 Gr_cursor = n;
1051         } else {
1052                 locked = 0;
1053         }
1054
1055         if (lock == GR_CURSOR_LOCK) {
1056                 locked = 1;
1057         }
1058 }
1059
1060 // retrieves the current bitmap
1061 // used in UI_GADGET to save/restore current cursor state
1062 int gr_get_cursor_bitmap()
1063 {
1064         return Gr_cursor;
1065 }
1066
1067 // new bitmap functions
1068 void gr_bitmap(int x, int y)
1069 {
1070         int section_x, section_y;
1071         int x_line, y_line;
1072         int w, h;
1073         int idx, s_idx;
1074         // float u_scale, v_scale;
1075         bitmap_section_info *sections;
1076
1077         // render all sections
1078         bm_get_info(gr_screen.current_bitmap, &w, &h, NULL, NULL, NULL, &sections);
1079         y_line = 0;
1080         section_y = 0;
1081
1082         if (gr_screen.use_sections) {
1083                 for(idx=0; idx<sections->num_y; idx++){
1084                         x_line = 0;
1085                         for(s_idx=0; s_idx<sections->num_x; s_idx++){
1086                                 // get the section as a texture in vram
1087                                 gr_set_bitmap(gr_screen.current_bitmap, gr_screen.current_alphablend_mode, gr_screen.current_bitblt_mode, gr_screen.current_alpha, s_idx, idx);
1088
1089                                 // determine the width and height of this section
1090                                 bm_get_section_size(gr_screen.current_bitmap, s_idx, idx, &section_x, &section_y);
1091
1092                                 // draw as a poly
1093                                 g3_draw_2d_poly_bitmap(x + x_line, y + y_line, section_x, section_y, TMAP_FLAG_BITMAP_SECTION);
1094                                 x_line += section_x;
1095                         }
1096                         y_line += section_y;
1097                 }
1098         } else {
1099                 gr_set_bitmap(gr_screen.current_bitmap, gr_screen.current_alphablend_mode,
1100                                 gr_screen.current_bitblt_mode, gr_screen.current_alpha);
1101                 g3_draw_2d_poly_bitmap(x, y, w, h, TMAP_FLAG_BITMAP_INTERFACE);
1102
1103         }
1104 }
1105
1106 // given endpoints, and thickness, calculate coords of the endpoint
1107 void gr_pline_helper(vector *out, vector *in1, vector *in2, int thickness)
1108 {
1109         vector slope;
1110
1111         // slope of the line
1112         if(vm_vec_same(in1, in2)){
1113                 slope = vmd_zero_vector;
1114         } else {
1115                 vm_vec_sub(&slope, in2, in1);
1116                 float temp = -slope.xyz.x;
1117                 slope.xyz.x = slope.xyz.y;
1118                 slope.xyz.y = temp;
1119                 vm_vec_normalize(&slope);
1120         }
1121
1122         // get the points
1123         vm_vec_scale_add(out, in1, &slope, (float)thickness);
1124 }
1125
1126 // special function for drawing polylines. this function is specifically intended for
1127 // polylines where each section is no more than 90 degrees away from a previous section.
1128 // Moreover, it is _really_ intended for use with 45 degree angles.
1129 void gr_pline_special(vector **pts, int num_pts, int thickness)
1130 {
1131         vector s1, s2, e1, e2, dir;
1132         vector last_e1, last_e2;
1133         vertex v[4];
1134         vertex *verts[4] = {&v[0], &v[1], &v[2], &v[3]};
1135         int saved_zbuffer_mode, idx;
1136         int started_frame = 0;
1137
1138         // SDL_assert(0);
1139
1140         // if we have less than 2 pts, bail
1141         if(num_pts < 2){
1142                 return;
1143         }
1144
1145         extern int G3_count;
1146         if(G3_count == 0){
1147                 g3_start_frame(1);
1148                 started_frame = 1;
1149         }
1150
1151         // turn off zbuffering
1152         saved_zbuffer_mode = gr_zbuffer_get();
1153         gr_zbuffer_set(GR_ZBUFF_NONE);
1154
1155         // turn off culling
1156         gr_set_cull(0);
1157
1158         // draw each section
1159         last_e1 = vmd_zero_vector;
1160         last_e2 = vmd_zero_vector;
1161         for(idx=0; idx<num_pts-1; idx++){
1162                 // get the start and endpoints
1163                 s1 = *pts[idx];                                                                                                         // start 1 (on the line)
1164                 gr_pline_helper(&s2, pts[idx], pts[idx+1], thickness);  // start 2
1165                 e1 = *pts[idx+1];                                                                                                               // end 1 (on the line)
1166                 vm_vec_sub(&dir, pts[idx+1], pts[idx]);
1167                 vm_vec_add(&e2, &s2, &dir);                                                                             // end 2
1168
1169                 // stuff coords
1170                 v[0].sx = (float)ceil(s1.xyz.x);
1171                 v[0].sy = (float)ceil(s1.xyz.y);
1172                 v[0].sw = 0.0f;
1173                 v[0].u = 0.5f;
1174                 v[0].v = 0.5f;
1175                 v[0].flags = PF_PROJECTED;
1176                 v[0].codes = 0;
1177                 v[0].r = gr_screen.current_color.red;
1178                 v[0].g = gr_screen.current_color.green;
1179                 v[0].b = gr_screen.current_color.blue;
1180
1181                 v[1].sx = (float)ceil(s2.xyz.x);
1182                 v[1].sy = (float)ceil(s2.xyz.y);
1183                 v[1].sw = 0.0f;
1184                 v[1].u = 0.5f;
1185                 v[1].v = 0.5f;
1186                 v[1].flags = PF_PROJECTED;
1187                 v[1].codes = 0;
1188                 v[1].r = gr_screen.current_color.red;
1189                 v[1].g = gr_screen.current_color.green;
1190                 v[1].b = gr_screen.current_color.blue;
1191
1192                 v[2].sx = (float)ceil(e2.xyz.x);
1193                 v[2].sy = (float)ceil(e2.xyz.y);
1194                 v[2].sw = 0.0f;
1195                 v[2].u = 0.5f;
1196                 v[2].v = 0.5f;
1197                 v[2].flags = PF_PROJECTED;
1198                 v[2].codes = 0;
1199                 v[2].r = gr_screen.current_color.red;
1200                 v[2].g = gr_screen.current_color.green;
1201                 v[2].b = gr_screen.current_color.blue;
1202
1203                 v[3].sx = (float)ceil(e1.xyz.x);
1204                 v[3].sy = (float)ceil(e1.xyz.y);
1205                 v[3].sw = 0.0f;
1206                 v[3].u = 0.5f;
1207                 v[3].v = 0.5f;
1208                 v[3].flags = PF_PROJECTED;
1209                 v[3].codes = 0;
1210                 v[3].r = gr_screen.current_color.red;
1211                 v[3].g = gr_screen.current_color.green;
1212                 v[3].b = gr_screen.current_color.blue;
1213
1214                 // draw the polys
1215                 g3_draw_poly_constant_sw(4, verts, TMAP_FLAG_GOURAUD | TMAP_FLAG_RGB, 0.1f);
1216
1217                 // if we're past the first section, draw a "patch" triangle to fill any gaps
1218                 if(idx > 0){
1219                         // stuff coords
1220                         v[0].sx = (float)ceil(s1.xyz.x);
1221                         v[0].sy = (float)ceil(s1.xyz.y);
1222                         v[0].sw = 0.0f;
1223                         v[0].u = 0.5f;
1224                         v[0].v = 0.5f;
1225                         v[0].flags = PF_PROJECTED;
1226                         v[0].codes = 0;
1227                         v[0].r = gr_screen.current_color.red;
1228                         v[0].g = gr_screen.current_color.green;
1229                         v[0].b = gr_screen.current_color.blue;
1230
1231                         v[1].sx = (float)ceil(s2.xyz.x);
1232                         v[1].sy = (float)ceil(s2.xyz.y);
1233                         v[1].sw = 0.0f;
1234                         v[1].u = 0.5f;
1235                         v[1].v = 0.5f;
1236                         v[1].flags = PF_PROJECTED;
1237                         v[1].codes = 0;
1238                         v[1].r = gr_screen.current_color.red;
1239                         v[1].g = gr_screen.current_color.green;
1240                         v[1].b = gr_screen.current_color.blue;
1241
1242
1243                         v[2].sx = (float)ceil(last_e2.xyz.x);
1244                         v[2].sy = (float)ceil(last_e2.xyz.y);
1245                         v[2].sw = 0.0f;
1246                         v[2].u = 0.5f;
1247                         v[2].v = 0.5f;
1248                         v[2].flags = PF_PROJECTED;
1249                         v[2].codes = 0;
1250                         v[2].r = gr_screen.current_color.red;
1251                         v[2].g = gr_screen.current_color.green;
1252                         v[2].b = gr_screen.current_color.blue;
1253
1254                         g3_draw_poly_constant_sw(3, verts, TMAP_FLAG_GOURAUD | TMAP_FLAG_RGB, 0.1f);
1255                 }
1256
1257                 // store our endpoints
1258                 last_e1 = e1;
1259                 last_e2 = e2;
1260         }
1261
1262         if(started_frame){
1263                 g3_end_frame();
1264         }
1265
1266         // restore zbuffer mode
1267         gr_zbuffer_set(saved_zbuffer_mode);
1268
1269         // restore culling
1270         gr_set_cull(1);
1271 }
1272