clearer debug message

[taylor/freespace2.git] / src / graphics / 2d.cpp

/*
 * Copyright (C) Volition, Inc. 1999.  All rights reserved.
 *
 * All source code herein is the property of Volition, Inc. You may not sell 
 * or otherwise commercially exploit the source or things you created based on
 * the source.
 */

/*
 * $Logfile: /Freespace2/code/Graphics/2d.cpp $
 * $Revision$
 * $Date$
 * $Author$
 *
 * Main file for 2d primitives.
 *
 * $Log$
 * Revision 1.12  2004/07/04 11:31:43  taylor
 * amd64 support, compiler warning fixes, don't use software rendering
 *
 * Revision 1.11  2002/08/31 01:39:13  theoddone33
 * Speed up the renderer a tad
 *
 * Revision 1.10  2002/06/17 06:33:09  relnev
 * ryan's struct patch for gcc 2.95
 *
 * Revision 1.9  2002/06/09 04:41:17  relnev
 * added copyright header
 *
 * Revision 1.8  2002/06/05 04:03:32  relnev
 * finished cfilesystem.
 *
 * removed some old code.
 *
 * fixed mouse save off-by-one.
 *
 * sound cleanups.
 *
 * Revision 1.7  2002/05/30 21:44:48  relnev
 * implemented some missing texture stuff.
 *
 * enable bitmap polys for opengl.
 *
 * work around greenness in bitmaps.
 *
 * Revision 1.6  2002/05/28 21:36:10  relnev
 * some more timer junk.
 *
 * tried to fix software mode.
 *
 * Revision 1.5  2002/05/28 04:18:08  theoddone33
 * Fix some stuff and add -DFS2_DEMO
 *
 * Revision 1.4  2002/05/27 22:43:02  theoddone33
 * Fix more glide symbols
 *
 * Revision 1.3  2002/05/27 22:39:21  theoddone33
 * Remove glide symbols
 *
 * Revision 1.2  2002/05/07 03:16:45  theoddone33
 * The Great Newline Fix
 *
 * Revision 1.1.1.1  2002/05/03 03:28:09  root
 * Initial import.
 *
 * 
 * 25    8/20/99 2:09p Dave
 * PXO banner cycling.
 * 
 * 24    8/16/99 9:45a Jefff
 * changes to cursor management to allow a 2nd temporary cursor
 * 
 * 23    7/27/99 3:52p Dave
 * Make star drawing a bit more robust to help lame D3D cards.
 * 
 * 22    7/18/99 12:32p Dave
 * Randomly oriented shockwaves.
 * 
 * 21    7/15/99 3:07p Dave
 * 32 bit detection support. Mouse coord commandline.
 * 
 * 20    7/14/99 9:42a Dave
 * Put in clear_color debug function. Put in base for 3dnow stuff / P3
 * stuff
 * 
 * 19    7/13/99 1:15p Dave
 * 32 bit support. Whee!
 * 
 * 18    7/12/99 11:42a Jefff
 * Made rectangle drawing smarter in D3D. Made plines draw properly on Ati
 * Rage Pro.
 * 
 * 17    7/09/99 9:51a Dave
 * Added thick polyline code.
 * 
 * 16    7/02/99 3:05p Anoop
 * Oops. Fixed g3_draw_2d_poly() so that it properly handles poly bitmap
 * and LFB bitmap calls.
 * 
 * 15    6/29/99 10:35a Dave
 * Interface polygon bitmaps! Whee!
 * 
 * 14    4/09/99 2:21p Dave
 * Multiplayer beta stuff. CD checking.
 * 
 * 13    2/03/99 11:44a Dave
 * Fixed d3d transparent textures.
 * 
 * 12    1/29/99 12:47a Dave
 * Put in sounds for beam weapon. A bunch of interface screens (tech
 * database stuff).
 * 
 * 11    1/15/99 11:29a Neilk
 * Fixed D3D screen/texture pixel formatting problem. 
 * 
 * 10    1/08/99 2:08p Dave
 * Fixed software rendering for pofview. Super early support for AWACS and
 * beam weapons.
 * 
 * 9     1/06/99 2:24p Dave
 * Stubs and release build fixes.
 * 
 * 8     12/18/98 1:49a Dave
 * Fixed Fred initialization problem resulting from hi-res mode changes.
 * 
 * 7     12/18/98 1:13a Dave
 * Rough 1024x768 support for Direct3D. Proper detection and usage through
 * the launcher.
 * 
 * 6     12/01/98 10:32a Johnson
 * Fixed direct3d font problems. Fixed sun bitmap problem. Fixed direct3d
 * starfield problem.
 * 
 * 5     11/30/98 5:31p Dave
 * Fixed up Fred support for software mode.
 * 
 * 4     11/30/98 1:07p Dave
 * 16 bit conversion, first run.
 * 
 * 3     11/11/98 5:37p Dave
 * Checkin for multiplayer testing.
 * 
 * 2     10/07/98 10:52a Dave
 * Initial checkin.
 * 
 * 1     10/07/98 10:48a Dave
 * 
 * 122   6/13/98 3:18p Hoffoss
 * NOX()ed out a bunch of strings that shouldn't be translated.
 * 
 * 121   5/23/98 11:26a Hoffoss
 * Fixed bug where optimized code used EDX and my code trashed it.
 * 
 * 120   5/22/98 11:09p John
 * put in code to hopefull not crash cyrix cpus
 * 
 * 119   5/20/98 9:45p John
 * added code so the places in code that change half the palette don't
 * have to clear the screen.
 * 
 * 118   5/20/98 12:59p Hoffoss
 * Changed temporary crossfade code to just pop the image again.
 * 
 * 117   5/16/98 1:18p John
 * Made softtware DirectDraw reset palette after Alt+TAB.
 * 
 * 116   5/14/98 5:42p John
 * Revamped the whole window position/mouse code for the graphics windows.
 * 
 * 115   5/08/98 10:49a John
 * Made 'gr d' go into direct3d mode.
 * 
 * 114   5/06/98 11:21p John
 * Fixed a bitmap bug with Direct3D.  Started adding new caching code into
 * D3D.
 * 
 * 113   4/21/98 9:28a John
 * Added stub for cross-fade.
 * 
 * 112   4/10/98 5:20p John
 * Changed RGB in lighting structure to be ubytes.  Removed old
 * not-necessary 24 bpp software stuff.
 * 
 * 111   4/06/98 12:55p John
 * Upped the gamma for Fred.
 * 
 * 110   3/25/98 8:07p John
 * Restructured software rendering into two modules; One for windowed
 * debug mode and one for DirectX fullscreen.   
 * 
 * 109   3/24/98 3:58p John
 * Put in (hopefully) final gamma setting code.
 * 
 * 108   3/10/98 4:18p John
 * Cleaned up graphics lib.  Took out most unused gr functions.   Made D3D
 * & Glide have popups and print screen.  Took out all >8bpp software
 * support.  Made Fred zbuffer.  Made zbuffer allocate dynamically to
 * support Fred.  Made zbuffering key off of functions rather than one
 * global variable.
 * 
 * 107   2/25/98 2:37p John
 * Made afterburner shake 2x less noticable.  Made 'gr a' leave Glide mode
 * properly.  Made model_caching never work in hardware mode.
 * 
 * 106   2/23/98 2:27p John
 * Made int3,asserts, etc pass video through.
 * 
 * 105   2/20/98 3:13p John
 * Made popup save code print an error an exit out if 3d accelerated.
 * 
 * 104   2/19/98 6:13p John
 * Made Glide do texturing & zbuffering.
 * 
 * 103   1/26/98 5:12p John
 * Added in code for Pentium Pro specific optimizations. Speed up
 * zbuffered correct tmapper about 35%.   Speed up non-zbuffered scalers
 * by about 25%.
 * 
 * 102   1/14/98 11:39a Dave
 * Polished up a bunch of popup support items.
 * 
 * 101   1/10/98 1:14p John
 * Added explanation to debug console commands
 * 
 * 100   12/21/97 4:33p John
 * Made debug console functions a class that registers itself
 * automatically, so you don't need to add the function to
 * debugfunctions.cpp.  
 * 
 * 99    12/04/97 12:09p John
 * Made glows use scaler instead of tmapper so they don't rotate.  Had to
 * add a zbuffered scaler.
 * 
 * 98    12/03/97 10:47a John
 * added functions to save/restore entire screens.
 * 
 * 97    12/02/97 3:59p John
 * Added first rev of thruster glow, along with variable levels of
 * translucency, which retquired some restructing of palman.
 * 
 * 96    11/30/97 12:18p John
 * added more 24 & 32-bpp primitives
 * 
 * 95    11/24/97 11:20a John
 * added new mode
 * 
 * 94    11/14/97 3:54p John
 * Added triple buffering.
 * 
 * 93    11/14/97 12:30p John
 * Fixed some DirectX bugs.  Moved the 8-16 xlat tables into Graphics
 * libs.  Made 16-bpp DirectX modes know what bitmap format they're in.
 * 
 * 92    10/09/97 5:23p John
 * Added support for more 16-bpp functions
 * 
 * 91    9/20/97 8:16a John
 * Made .clr files go into the Cache directory. Replaced cfopen(name,NULL)
 * to delete a file with cf_delete.
 * 
 * 90    9/09/97 11:01a Sandeep
 * fixed warning level 4 bugs
 * 
 * 89    9/07/97 10:01p Lawrance
 * add in support for animating mouse pointer
 * 
 * 88    9/03/97 4:32p John
 * changed bmpman to only accept ani and pcx's.  made passing .pcx or .ani
 * to bm_load functions not needed.   Made bmpman keep track of palettes
 * for bitmaps not mapped into game palettes.
 * 
 * 87    8/20/97 4:19p John
 * added delay to hopefully fix mike's problems when getting int3's in
 * fullscreen.
 * 
 * 86    7/16/97 3:07p John
 * 
 * 85    6/18/97 12:07p John
 * fixed some color bugs
 * 
 * 84    6/17/97 7:04p John
 * added d3d support for gradients.
 * fixed some color bugs by adding screen signatures instead of watching
 * flags and palette changes.
 * 
 * 83    6/17/97 12:03p John
 * Moved color/alphacolor functions into their own module.  Made all color
 * functions be part of the low-level graphics drivers, not just the
 * grsoft.
 * 
 * 82    6/12/97 5:04p John
 * Initial rev of Glide support
 * 
 * 81    6/11/97 5:49p John
 * Changed palette code to only recalculate alphacolors when needed, not
 * when palette changes.
 * 
 * 80    6/11/97 1:12p John
 * Started fixing all the text colors in the game.
 * 
 * 79    6/06/97 5:03p John
 * fixed bug withalpha colors failing after gr_init
 * 
 * 78    6/06/97 4:53p John
 * made gr_init not bash current color
 * 
 * 77    6/05/97 4:53p John
 * First rev of new antialiased font stuff.
 * 
 * 76    5/20/97 10:36a John
 * Fixed problem with user bitmaps and direct3d caching.
 * 
 * 75    5/16/97 9:11a John
 * fixed bug that made Ctrl+Break in fullscreen hang
 * 
 * 74    5/14/97 4:38p John
 * Fixed print_screen bug.
 * 
 * 73    5/14/97 2:10p John
 * added rudimentary support for windowed direct3d.
 * 
 * 72    5/14/97 10:53a John
 * fixed some discrepencies between d3d and software palette setting.
 * 
 * 71    5/13/97 4:39p John
 * Added console function to set graphics modes.
 * 
 * 70    5/13/97 12:39p John
 * Got fullscreen mode working.
 * 
 * 69    5/12/97 12:27p John
 * Restructured Graphics Library to add support for multiple renderers.
 * 
 * 68    5/07/97 2:59p John
 * Initial rev of D3D texturing.
 * 
 * 67    5/01/97 3:32p John
 * oops... forced 2d to always be in 8bpp,
 * 
 * 66    5/01/97 3:23p John
 * first hooks for some direct 3d setup stuff.
 * 
 * 65    4/28/97 5:33p John
 * fixed a newly introduced bug with fullscreen toggle.
 * 
 * 64    4/28/97 4:46p John
 * 
 * 63    4/22/97 12:20p John
 * fixed more resource leaks
 * 
 * 62    4/22/97 10:33a John
 * fixed the 2d resource leaks that Alan found.
 * 
 * 61    3/31/97 9:45a Allender
 * start of new font stuff
 * 
 * 60    3/26/97 10:52a Lawrance
 * mouse always on in menus, disappears in gameplay after 1 second
 * 
 * 59    3/14/97 3:55p John
 * Made tiled tmapper not always be zbuffered.
 * 
 * 58    3/13/97 9:09a Allender
 * variable to allow trashing of the palette.  kind of temporary code
 * right now...checking needed for undefined references
 * 
 * 57    3/12/97 2:51p John
 * Added some test code for tmapper.  
 * 
 * 56    3/12/97 9:25a John
 * fixed a bug with zbuffering.  Reenabled it by default.
 * 
 * 55    3/11/97 5:13p John
 * made top up bitmaps work.
 * 
 * 54    2/26/97 11:59a Allender
 * comment out warning about display settings not being optimal
 * 
 * 53    1/09/97 2:16p John
 * took out the "Bing!" message
 * 
 * 52    1/09/97 11:35a John
 * Added some 2d functions to get/put screen images.
 * 
 * 51    1/07/97 2:01p John
 * Fairly fast zbuffering for object sorting.
 * 
 * 50    1/06/97 2:44p John
 * Added in slow (but correct) zbuffering
 * 
 * 49    12/11/96 12:41p John
 * Added new code to draw 3d laser using 2d ellipses.
 * 
 * 48    12/03/96 5:42p John
 * took out debug code.
 * 
 * 47    12/03/96 5:42p John
 * made gr_bitmap clip properly.
 * 
 * 46    12/03/96 5:06p John
 * Added code to draw our own cursor.
 * 
 * 45    11/26/96 6:50p John
 * Added some more hicolor primitives.  Made windowed mode run as current
 * bpp, if bpp is 8,16,or 32.
 * 
 * 44    11/21/96 11:23a John
 * fixed bug with previous.
 * 
 * 43    11/21/96 11:21a John
 * Made gr_get_string_size handle multi line text.
 * Took out gr_get_multiline_string_size
 * 
 * 42    11/21/96 11:06a John
 * fixed warnings.
 * 
 * 41    11/20/96 10:01a Hoffoss
 * A few minor improvements.
 * 
 * 40    11/19/96 2:47p Allender
 * add support for xparent bitmaps in 32bpp
 * 
 * 39    11/18/96 4:46p Allender
 * changed warning message about bit depth to appear when requested
 * doesn't equal actual
 * 
 * 38    11/18/96 4:35p Allender
 * new 16bpp gradient functions
 * 
 * 37    11/18/96 3:09p John
 * made gr_clear always clear to black.
 * 
 * 36    11/18/96 1:48p Allender
 * added 16 bit version of shader
 * 
 * 35    11/18/96 12:36p John
 * Added code to dump screen to a PCX file.
 * 
 * 34    11/18/96 11:40a John
 * Added faster gr_set_color method.
 * 
 * 33    11/15/96 11:26a John
 * Added code to clip text to clipping region.
 * 
 * 32    11/15/96 11:26a Allender
 * fixed up 16 bbp version of gr_bitmap
 * 
 * 31    11/14/96 9:11a John
 * Fixed bug that didn't offset the gr_string text by the current clip
 * region's offset.
 * 
 * 30    11/13/96 6:47p John
 * Added gr_flip function.
 * 
 * 29    11/13/96 10:10a John
 * Increases MAX_WIDTH & HEIGHT for Jasen's massive 1600x1200 display.
 * 
 * 28    11/07/96 6:19p John
 * Added a bunch of 16bpp primitives so the game sort of runs in 16bpp
 * mode.
 * 
 * 27    10/30/96 10:36a Lawrance
 * added gr_diamond function
 * 
 * 26    10/26/96 1:40p John
 * Added some now primitives to the 2d library and
 * cleaned up some old ones.
 *
 * $NoKeywords: $
 */

#ifndef PLAT_UNIX
#include <windows.h>
#include <windowsx.h>
#endif

#include "osapi.h"
#include "2d.h"
#include "3d.h"
#include "bmpman.h"
#include "palman.h"
#include "font.h"
#include "grinternal.h"
#include "systemvars.h"
#include "cmdline.h"
#include "osregistry.h"
#include "cfile.h"
#include "cfilesystem.h"

// Includes for different rendering systems
#include "gropengl.h"
#include "grwxgl.h"

screen gr_screen;

color_gun Gr_red, Gr_green, Gr_blue, Gr_alpha;
color_gun Gr_t_red, Gr_t_green, Gr_t_blue, Gr_t_alpha;
color_gun Gr_ta_red, Gr_ta_green, Gr_ta_blue, Gr_ta_alpha;
color_gun *Gr_current_red, *Gr_current_green, *Gr_current_blue, *Gr_current_alpha;


ubyte Gr_original_palette[768];         // The palette 
ubyte Gr_current_palette[768];
char Gr_current_palette_name[128] = NOX("none");

int Gr_zbuffering = 0;
int Gr_zbuffering_mode = 0;
int Gr_global_zbuffering = 0;

// cursor stuff
int Gr_cursor = -1;
int Web_cursor_bitmap = -1;

int Gr_inited = 0;

uint Gr_signature = 0;

float Gr_gamma = 1.8f;
int Gr_gamma_int = 180;
int Gr_gamma_lookup[256];

int Gr_textures_in = 0;


void gr_close()
{
        if ( !Gr_inited )       return;

        palette_flush();

        switch (gr_screen.mode) {
                case GR_OPENGL:
                        gr_opengl_cleanup();
                        break;

                case GR_WXGL:
                        gr_wxgl_cleanup();
                        break;

                default:
                        Int3();         // Invalid graphics mode
                        break;
        }

        Gr_textures_in = 0;

        gr_font_close();

        Gr_inited = 0;
}

// set screen clear color
DCF(clear_color, "set clear color r, g, b")
{
        int r, g, b;

        dc_get_arg(ARG_INT);
        r = Dc_arg_int;
        dc_get_arg(ARG_INT);
        g = Dc_arg_int;
        dc_get_arg(ARG_INT);
        b = Dc_arg_int;

        // set the color
        gr_set_clear_color(r, g, b);
}

void gr_set_palette_internal( const char *name, ubyte * palette, int restrict_font_to_128 )
{
        if ( palette == NULL )  {
                // Create a default palette
                int r,g,b,i;
                i = 0;
                                
                for (r=0; r<6; r++ )    
                        for (g=0; g<6; g++ )    
                                for (b=0; b<6; b++ )            {
                                        Gr_current_palette[i*3+0] = (unsigned char)(r*51);
                                        Gr_current_palette[i*3+1] = (unsigned char)(g*51);
                                        Gr_current_palette[i*3+2] = (unsigned char)(b*51);
                                        i++;
                                }
                for ( i=216;i<256; i++ )        {
                        Gr_current_palette[i*3+0] = (unsigned char)((i-216)*6);
                        Gr_current_palette[i*3+1] = (unsigned char)((i-216)*6);
                        Gr_current_palette[i*3+2] = (unsigned char)((i-216)*6);
                }
                memmove( Gr_original_palette, Gr_current_palette, 768 );
        } else {
                memmove( Gr_original_palette, palette, 768 );
                memmove( Gr_current_palette, palette, 768 );
        }

//      mprintf(("Setting new palette\n" ));

        if ( Gr_inited )        {
                // Update Palette Manager tables
                memmove( gr_palette, Gr_current_palette, 768 );
                palette_update(name, restrict_font_to_128);
        }
}


void gr_set_palette( const char *name, ubyte * palette, int restrict_font_to_128 )
{
        char *p;
        palette_flush();
        SDL_strlcpy( Gr_current_palette_name, name, sizeof(Gr_current_palette_name) );
        p = SDL_strchr( Gr_current_palette_name, '.' );
        if ( p ) *p = 0;
        gr_screen.signature = Gr_signature++;
        gr_set_palette_internal( name, palette, restrict_font_to_128 );
}

void gr_set_gamma(float gamma)
{
        int i;

        if ( !Gr_inited ) {
                return;
        }

        CAP(gamma, 0.1f, 5.0f);

        Gr_gamma = gamma;
        Gr_gamma_int = fl2i(gamma * 100.0f);

        // create the gamma lookup table
        float gamma_1f = 1.0f / gamma;

        for (i = 0; i < 256; i++) {
                int v = fl2i(pow(i2fl(i)/255.0f, gamma_1f)*255.0f);
                CAP(v, 0, 255);
                Gr_gamma_lookup[i] = v;
        }

        // save new value to cfg file
        char tmp_gamma_string[10];
        SDL_snprintf( tmp_gamma_string, sizeof(tmp_gamma_string), "%.2f", gamma);
        os_config_write_string("Video", "Gamma", tmp_gamma_string);

        // call renderer specific functionality, if needed
        if (gr_screen.gf_set_gamma) {
                (*gr_screen.gf_set_gamma)(gamma);
        }
}

static int gr_get_best_res(int *max_w, int *max_h)
{
        if (Fred_running || Pofview_running || Nebedit_running || Fonttool_running) {
                (*max_w) = 640;
                (*max_h) = 480;

                return GR_640;
        }

        // defaults
        int res = GR_640;
        (*max_w) = 640;
        (*max_h) = 480;

        // quickly bail if we are forcing low-res mode
        if ( os_config_read_uint("Video", "LowRes", 0) ) {
                return res;
        }

#ifndef MAKE_FS1
        // check to see if we have hi-res art
        if ( cf_has_packfile("sparky_hi_fs2") ) {
                // check desktop res to make sure we should use it
                if ( !SDL_InitSubSystem(SDL_INIT_VIDEO) ) {
                        SDL_DisplayMode desk_mode;

                        if ( !SDL_GetDesktopDisplayMode(0, &desk_mode) ) {
                                if ( (desk_mode.w >= 1024) && (desk_mode.h >= 768) ) {
                                        (*max_w) = 1024;
                                        (*max_h) = 768;
                                        res = GR_1024;
                                }
                        }

                        SDL_QuitSubSystem(SDL_INIT_VIDEO);
                }
        }
#endif

        return res;
}

//void gr_test();


// --------------------------------------------------------------------------

int gr_init()
{
        const char *ptr = NULL;
        int mode = GR_OPENGL;
        int res = GR_640;
        int max_w, max_h;


        if ( !Gr_inited )       
                atexit(gr_close);

        // If already inited, shutdown the previous graphics
        if (Gr_inited) {
                switch (gr_screen.mode) {
                        case GR_OPENGL:
                                gr_opengl_cleanup();
                                break;

                        case GR_WXGL:
                                gr_wxgl_cleanup();

                        default:
                                Int3();         // Invalid graphics mode
                                break;
                }
        }

        Gr_inited = 1;

        if (Fred_running || Pofview_running) {
                mode = GR_WXGL;
        } else {
                ptr = os_config_read_string("Video", "Renderer", "OpenGL");

                if ( !SDL_strcasecmp("OpenGL", ptr) ) {
                        mode = GR_OPENGL;
                } else {
                        Int3();
                }
        }

        max_w = -1;
        max_h = -1;

        // get best available resolution
        res = gr_get_best_res(&max_w, &max_h);

        mprintf(("Using %s-res graphics\n", (res == GR_1024) ? "high" : "low" ));


        memset( &gr_screen, 0, sizeof(screen) );

        gr_screen.signature = Gr_signature++;
        gr_screen.mode = mode;
        gr_screen.res = res;    
        gr_screen.max_w = max_w;
        gr_screen.max_h = max_h;
        gr_screen.use_sections = 1;
        gr_screen.aspect = 1.0f;                        // Normal PC screen
        gr_screen.offset_x = 0;
        gr_screen.offset_y = 0;
        gr_screen.clip_left = 0;
        gr_screen.clip_top = 0;
        gr_screen.clip_right = gr_screen.max_w - 1;
        gr_screen.clip_bottom = gr_screen.max_h - 1;
        gr_screen.clip_width = gr_screen.max_w;
        gr_screen.clip_height = gr_screen.max_h;

        Gr_textures_in = 0;

        switch( gr_screen.mode )        {
                case GR_OPENGL:
                        gr_opengl_init();
                        break;
                case GR_WXGL:
                        SDL_assert( Pofview_running || Fred_running );
                        gr_wxgl_init();
                        break;
                default:
                        Int3();         // Invalid graphics mode
                        break;
        }

        memmove( Gr_current_palette, Gr_original_palette, 768 );
        gr_set_palette_internal(Gr_current_palette_name, Gr_current_palette,0); 

        // Set the gamma
        extern float Freespace_gamma;

        ptr = os_config_read_string("Video", "Gamma", "1.8");

        Freespace_gamma = (float)SDL_atof(ptr);
        CAP(Freespace_gamma, 0.1f, 5.0f);

        gr_set_gamma(Freespace_gamma);


        if ( Gr_cursor == -1 ){
                Gr_cursor = bm_load( "cursor" );
        }

        // load the web pointer cursor bitmap
        if (Web_cursor_bitmap < 0)      {
                int nframes;                                            // used to pass, not really needed (should be 1)
                Web_cursor_bitmap = bm_load_animation("cursorweb", &nframes);
                SDL_assert(Web_cursor_bitmap >= 0);             // if bitmap didnt load, thats not good (this is protected for in release tho)
        }

        gr_set_color(0,0,0);

        gr_set_clear_color(0, 0, 0);

        // Call some initialization functions
        gr_set_shader(NULL);

        return 0;
}

void gr_force_windowed()
{
        if ( !Gr_inited ) {
                return;
        }

        if (gr_screen.gf_force_windowed) {
                (*gr_screen.gf_force_windowed)();
        }

        if (Os_debugger_running) {
                SDL_Delay(1000);
        }
}

void gr_force_fullscreen()
{
        if ( !Gr_inited ) {
                return;
        }

        if (gr_screen.gf_force_fullscreen) {
                (*gr_screen.gf_force_fullscreen)();
        }

        if (Os_debugger_running) {
                SDL_Delay(1000);
        }
}

void gr_toggle_fullscreen()
{
        if ( !Gr_inited ) {
                return;
        }

        // skip if a tool is running (except fonttool)
        if (Fred_running || Pofview_running || Nebedit_running) {
                return;
        }

        if (gr_screen.gf_toggle_fullscreen) {
                (*gr_screen.gf_toggle_fullscreen)();
        }

        if (Os_debugger_running) {
                SDL_Delay(1000);
        }
}

void gr_activate(int active)
{
        if ( !Gr_inited ) {
                return;
        }

        if (gr_screen.gf_activate) {
                (*gr_screen.gf_activate)(active);
        }
}

// -----------------------------------------------------------------------
// gr_set_cursor_bitmap()
//
// Set the bitmap for the mouse pointer.  This is called by the animating mouse
// pointer code.
//
// The lock parameter just locks basically disables the next call of this function that doesnt
// have an unlock feature.  If adding in more cursor-changing situations, be aware of
// unexpected results. You have been warned.
//
// TODO: investigate memory leak of original Gr_cursor bitmap when this is called
void gr_set_cursor_bitmap(int n, int lock)
{
        static int locked = 0;                  
        SDL_assert(n >= 0);

        if (!locked || (lock == GR_CURSOR_UNLOCK)) {
                Gr_cursor = n;
        } else {
                locked = 0;
        }

        if (lock == GR_CURSOR_LOCK) {
                locked = 1;
        }
}

// retrieves the current bitmap
// used in UI_GADGET to save/restore current cursor state
int gr_get_cursor_bitmap()
{
        return Gr_cursor;
}

// new bitmap functions
void gr_bitmap(int x, int y)
{
        int section_x, section_y;       
        int x_line, y_line;
        int w, h;
        int idx, s_idx;
        // float u_scale, v_scale;
        bitmap_section_info *sections;

        // render all sections
        bm_get_info(gr_screen.current_bitmap, &w, &h, NULL, NULL, NULL, &sections);
        y_line = 0;
        section_y = 0;

        if (gr_screen.use_sections) {
                for(idx=0; idx<sections->num_y; idx++){
                        x_line = 0;
                        for(s_idx=0; s_idx<sections->num_x; s_idx++){
                                // get the section as a texture in vram
                                gr_set_bitmap(gr_screen.current_bitmap, gr_screen.current_alphablend_mode, gr_screen.current_bitblt_mode, gr_screen.current_alpha, s_idx, idx);

                                // determine the width and height of this section
                                bm_get_section_size(gr_screen.current_bitmap, s_idx, idx, &section_x, &section_y);

                                // draw as a poly
                                g3_draw_2d_poly_bitmap(x + x_line, y + y_line, section_x, section_y, TMAP_FLAG_BITMAP_SECTION);
                                x_line += section_x;
                        }
                        y_line += section_y;
                }
        } else {
                gr_set_bitmap(gr_screen.current_bitmap, gr_screen.current_alphablend_mode,
                                gr_screen.current_bitblt_mode, gr_screen.current_alpha);
                g3_draw_2d_poly_bitmap(x, y, w, h, TMAP_FLAG_BITMAP_INTERFACE);

        }
}

// given endpoints, and thickness, calculate coords of the endpoint
void gr_pline_helper(vector *out, vector *in1, vector *in2, int thickness)
{
        vector slope;   

        // slope of the line    
        if(vm_vec_same(in1, in2)){
                slope = vmd_zero_vector;
        } else {
                vm_vec_sub(&slope, in2, in1);
                float temp = -slope.xyz.x;
                slope.xyz.x = slope.xyz.y;
                slope.xyz.y = temp;
                vm_vec_normalize(&slope);
        }

        // get the points               
        vm_vec_scale_add(out, in1, &slope, (float)thickness);
}

// special function for drawing polylines. this function is specifically intended for
// polylines where each section is no more than 90 degrees away from a previous section.
// Moreover, it is _really_ intended for use with 45 degree angles. 
void gr_pline_special(vector **pts, int num_pts, int thickness)
{                               
        vector s1, s2, e1, e2, dir;
        vector last_e1, last_e2;
        vertex v[4];
        vertex *verts[4] = {&v[0], &v[1], &v[2], &v[3]};
        int saved_zbuffer_mode, idx;            
        int started_frame = 0;

        // SDL_assert(0);

        // if we have less than 2 pts, bail
        if(num_pts < 2){
                return;
        }       

        extern int G3_count;
        if(G3_count == 0){
                g3_start_frame(1);              
                started_frame = 1;
        }

        // turn off zbuffering  
        saved_zbuffer_mode = gr_zbuffer_get();
        gr_zbuffer_set(GR_ZBUFF_NONE);  

        // turn off culling
        gr_set_cull(0);

        // draw each section
        last_e1 = vmd_zero_vector;
        last_e2 = vmd_zero_vector;
        for(idx=0; idx<num_pts-1; idx++){               
                // get the start and endpoints          
                s1 = *pts[idx];                                                                                                         // start 1 (on the line)
                gr_pline_helper(&s2, pts[idx], pts[idx+1], thickness);  // start 2
                e1 = *pts[idx+1];                                                                                                               // end 1 (on the line)
                vm_vec_sub(&dir, pts[idx+1], pts[idx]);         
                vm_vec_add(&e2, &s2, &dir);                                                                             // end 2
                
                // stuff coords         
                v[0].sx = (float)ceil(s1.xyz.x);
                v[0].sy = (float)ceil(s1.xyz.y);        
                v[0].sw = 0.0f;
                v[0].u = 0.5f;
                v[0].v = 0.5f;
                v[0].flags = PF_PROJECTED;
                v[0].codes = 0;
                v[0].r = gr_screen.current_color.red;
                v[0].g = gr_screen.current_color.green;
                v[0].b = gr_screen.current_color.blue;

                v[1].sx = (float)ceil(s2.xyz.x);
                v[1].sy = (float)ceil(s2.xyz.y);        
                v[1].sw = 0.0f;
                v[1].u = 0.5f;
                v[1].v = 0.5f;
                v[1].flags = PF_PROJECTED;
                v[1].codes = 0;
                v[1].r = gr_screen.current_color.red;
                v[1].g = gr_screen.current_color.green;
                v[1].b = gr_screen.current_color.blue;

                v[2].sx = (float)ceil(e2.xyz.x);
                v[2].sy = (float)ceil(e2.xyz.y);
                v[2].sw = 0.0f;
                v[2].u = 0.5f;
                v[2].v = 0.5f;
                v[2].flags = PF_PROJECTED;
                v[2].codes = 0;
                v[2].r = gr_screen.current_color.red;
                v[2].g = gr_screen.current_color.green;
                v[2].b = gr_screen.current_color.blue;

                v[3].sx = (float)ceil(e1.xyz.x);
                v[3].sy = (float)ceil(e1.xyz.y);
                v[3].sw = 0.0f;
                v[3].u = 0.5f;
                v[3].v = 0.5f;
                v[3].flags = PF_PROJECTED;
                v[3].codes = 0;                         
                v[3].r = gr_screen.current_color.red;
                v[3].g = gr_screen.current_color.green;
                v[3].b = gr_screen.current_color.blue;          

                // draw the polys
                g3_draw_poly_constant_sw(4, verts, TMAP_FLAG_GOURAUD | TMAP_FLAG_RGB, 0.1f);            

                // if we're past the first section, draw a "patch" triangle to fill any gaps
                if(idx > 0){
                        // stuff coords         
                        v[0].sx = (float)ceil(s1.xyz.x);
                        v[0].sy = (float)ceil(s1.xyz.y);
                        v[0].sw = 0.0f;
                        v[0].u = 0.5f;
                        v[0].v = 0.5f;
                        v[0].flags = PF_PROJECTED;
                        v[0].codes = 0;
                        v[0].r = gr_screen.current_color.red;
                        v[0].g = gr_screen.current_color.green;
                        v[0].b = gr_screen.current_color.blue;

                        v[1].sx = (float)ceil(s2.xyz.x);
                        v[1].sy = (float)ceil(s2.xyz.y);        
                        v[1].sw = 0.0f;
                        v[1].u = 0.5f;
                        v[1].v = 0.5f;
                        v[1].flags = PF_PROJECTED;
                        v[1].codes = 0;
                        v[1].r = gr_screen.current_color.red;
                        v[1].g = gr_screen.current_color.green;
                        v[1].b = gr_screen.current_color.blue;


                        v[2].sx = (float)ceil(last_e2.xyz.x);
                        v[2].sy = (float)ceil(last_e2.xyz.y);
                        v[2].sw = 0.0f;
                        v[2].u = 0.5f;
                        v[2].v = 0.5f;
                        v[2].flags = PF_PROJECTED;
                        v[2].codes = 0;
                        v[2].r = gr_screen.current_color.red;
                        v[2].g = gr_screen.current_color.green;
                        v[2].b = gr_screen.current_color.blue;

                        g3_draw_poly_constant_sw(3, verts, TMAP_FLAG_GOURAUD | TMAP_FLAG_RGB, 0.1f);            
                }

                // store our endpoints
                last_e1 = e1;
                last_e2 = e2;
        }

        if(started_frame){
                g3_end_frame();
        }

        // restore zbuffer mode
        gr_zbuffer_set(saved_zbuffer_mode);

        // restore culling
        gr_set_cull(1);         
}

void gr_set_color_fast(color *dst)
{
        if (dst->screen_sig != gr_screen.signature) {
                if (dst->is_alphacolor) {
                        gr_init_alphacolor(dst, dst->red, dst->green, dst->blue, dst->alpha, dst->ac_type);
                } else {
                        gr_init_color(dst, dst->red, dst->green, dst->blue);
                }
        }

        gr_screen.current_color = *dst;
}

void gr_get_color(int *r, int *g, int *b)
{
        if (r) *r = gr_screen.current_color.red;
        if (g) *g = gr_screen.current_color.green;
        if (b) *b = gr_screen.current_color.blue;
}

void gr_init_color(color *c, int r, int g, int b)
{
        c->screen_sig = gr_screen.signature;
        c->red = (unsigned char)r;
        c->green = (unsigned char)g;
        c->blue = (unsigned char)b;
        c->alpha = 255;
        c->ac_type = AC_TYPE_NONE;
        c->alphacolor = -1;
        c->is_alphacolor = 0;
        c->magic = 0xAC01;
}

void gr_init_alphacolor(color *clr, int r, int g, int b, int alpha, int type)
{
        CAP(r, 0, 255);
        CAP(g, 0, 255);
        CAP(b, 0, 255);
        CAP(alpha, 0, 255);

        gr_init_color(clr, r, g, b);

        clr->alpha = (unsigned char)alpha;
        clr->ac_type = (ubyte)type;
        clr->alphacolor = -1;
        clr->is_alphacolor = 1;
}

void gr_set_color(int r, int g, int b)
{
        SDL_assert((r >= 0) && (r < 256));
        SDL_assert((g >= 0) && (g < 256));
        SDL_assert((b >= 0) && (b < 256));

        gr_init_color(&gr_screen.current_color, r, g, b);
}

void gr_set_clear_color(int r, int g, int b)
{
        gr_init_color(&gr_screen.current_clear_color, r, g, b);
}

void gr_set_bitmap(int bitmap_num, int alphablend_mode, int bitblt_mode, float alpha, int sx, int sy)
{
        gr_screen.current_alpha = alpha;
        gr_screen.current_alphablend_mode = alphablend_mode;
        gr_screen.current_bitblt_mode = bitblt_mode;
        gr_screen.current_bitmap = bitmap_num;

        gr_screen.current_bitmap_sx = sx;
        gr_screen.current_bitmap_sy = sy;
}

void gr_create_shader(shader *shade, float r, float g, float b, float c)
{
        shade->screen_sig = gr_screen.signature;
        shade->r = r;
        shade->g = g;
        shade->b = b;
        shade->c = c;
}

void gr_set_shader(shader *shade)
{
        if (shade) {
                if (shade->screen_sig != gr_screen.signature) {
                        gr_create_shader(shade, shade->r, shade->g, shade->b, shade->c);
                }

                gr_screen.current_shader = *shade;
        } else {
                gr_create_shader(&gr_screen.current_shader, 0.0f, 0.0f, 0.0f, 0.0f);
        }
}

int gr_zbuffer_get()
{
        if ( !Gr_global_zbuffering ) {
                return GR_ZBUFF_NONE;
        }

        return Gr_zbuffering_mode;
}

int gr_zbuffer_set(int mode)
{
        int tmp = Gr_zbuffering_mode;

        Gr_zbuffering_mode = mode;

        if (Gr_zbuffering_mode == GR_ZBUFF_NONE) {
                Gr_zbuffering = 0;
        } else {
                Gr_zbuffering = 1;
        }

        return tmp;
}