vid_wgl.c

   1 /*
   2 Copyright (C) 1996-1997 Id Software, Inc.
   3
   4 This program is free software; you can redistribute it and/or
   5 modify it under the terms of the GNU General Public License
   6 as published by the Free Software Foundation; either version 2
   7 of the License, or (at your option) any later version.
   8
   9 This program is distributed in the hope that it will be useful,
  10 but WITHOUT ANY WARRANTY; without even the implied warranty of
  11 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
  12
  13 See the GNU General Public License for more details.
  14
  15 You should have received a copy of the GNU General Public License
  16 along with this program; if not, write to the Free Software
  17 Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
  18
  19 */
  20 // gl_vidnt.c -- NT GL vid component
  21
  22 #include "quakedef.h"
  23 #include "winquake.h"
  24 #include "resource.h"
  25 #include <commctrl.h>
  26
  27 #define MAX_MODE_LIST   30
  28 #define VID_ROW_SIZE    3
  29 #define MAXWIDTH                10000
  30 #define MAXHEIGHT               10000
  31
  32 #define MODE_WINDOWED                   0
  33 #define NO_MODE                                 (MODE_WINDOWED - 1)
  34 #define MODE_FULLSCREEN_DEFAULT (MODE_WINDOWED + 1)
  35
  36 typedef struct {
  37         modestate_t     type;
  38         int                     width;
  39         int                     height;
  40         int                     modenum;
  41         int                     dib;
  42         int                     fullscreen;
  43         int                     bpp;
  44         int                     halfscreen;
  45         char            modedesc[17];
  46 } vmode_t;
  47
  48 typedef struct {
  49         int                     width;
  50         int                     height;
  51 } lmode_t;
  52
  53 lmode_t lowresmodes[] = {
  54         {320, 200},
  55         {320, 240},
  56         {400, 300},
  57         {512, 384},
  58 };
  59
  60 const char *gl_vendor;
  61 const char *gl_renderer;
  62 const char *gl_version;
  63 const char *gl_extensions;
  64
  65 qboolean                DDActive;
  66 qboolean                scr_skipupdate;
  67
  68 static vmode_t  modelist[MAX_MODE_LIST];
  69 static int              nummodes;
  70 static vmode_t  *pcurrentmode;
  71 static vmode_t  badmode;
  72
  73 static DEVMODE  gdevmode;
  74 static qboolean vid_initialized = false;
  75 static qboolean windowed, leavecurrentmode;
  76 static qboolean vid_canalttab = false;
  77 static qboolean vid_wassuspended = false;
  78 static int              usingmouse;
  79 extern qboolean mouseactive;  // from in_win.c
  80 static HICON    hIcon;
  81
  82 int                     DIBWidth, DIBHeight;
  83 RECT            WindowRect;
  84 DWORD           WindowStyle, ExWindowStyle;
  85
  86 HWND    mainwindow;
  87
  88 int                     vid_modenum = NO_MODE;
  89 int                     vid_realmode;
  90 int                     vid_default = MODE_WINDOWED;
  91 static int      windowed_default;
  92 unsigned char   vid_curpal[256*3];
  93
  94 HGLRC   baseRC;
  95 HDC             maindc;
  96
  97 glvert_t glv;
  98
  99 HWND WINAPI InitializeWindow (HINSTANCE hInstance, int nCmdShow);
 100
 101 viddef_t        vid;                            // global video state
 102
 103 float           gldepthmin, gldepthmax;
 104
 105 modestate_t     modestate = MS_UNINIT;
 106
 107 void VID_MenuDraw (void);
 108 void VID_MenuKey (int key);
 109
 110 LONG WINAPI MainWndProc (HWND hWnd, UINT uMsg, WPARAM wParam, LPARAM lParam);
 111 void AppActivate(BOOL fActive, BOOL minimize);
 112 char *VID_GetModeDescription (int mode);
 113 void ClearAllStates (void);
 114 void VID_UpdateWindowStatus (void);
 115
 116 //====================================
 117
 118 // Note that 0 is MODE_WINDOWED
 119 //cvar_t                _vid_default_mode = {"_vid_default_mode","0", true};
 120 // Note that 3 is MODE_FULLSCREEN_DEFAULT
 121 //cvar_t                _vid_default_mode_win = {"_vid_default_mode_win","3", true};
 122
 123 int                     window_center_x, window_center_y, window_x, window_y, window_width, window_height;
 124 RECT            window_rect;
 125
 126 // direct draw software compatability stuff
 127
 128 void CenterWindow(HWND hWndCenter, int width, int height, BOOL lefttopjustify)
 129 {
 130     int     CenterX, CenterY;
 131
 132         CenterX = (GetSystemMetrics(SM_CXSCREEN) - width) / 2;
 133         CenterY = (GetSystemMetrics(SM_CYSCREEN) - height) / 2;
 134         if (CenterX > CenterY*2)
 135                 CenterX >>= 1;  // dual screens
 136         CenterX = (CenterX < 0) ? 0: CenterX;
 137         CenterY = (CenterY < 0) ? 0: CenterY;
 138         SetWindowPos (hWndCenter, NULL, CenterX, CenterY, 0, 0,
 139                         SWP_NOSIZE | SWP_NOZORDER | SWP_SHOWWINDOW | SWP_DRAWFRAME);
 140 }
 141
 142 qboolean VID_SetWindowedMode (int modenum)
 143 {
 144         int                             lastmodestate, width, height;
 145         RECT                    rect;
 146
 147         lastmodestate = modestate;
 148
 149         WindowRect.top = WindowRect.left = 0;
 150
 151         WindowRect.right = modelist[modenum].width;
 152         WindowRect.bottom = modelist[modenum].height;
 153
 154         DIBWidth = modelist[modenum].width;
 155         DIBHeight = modelist[modenum].height;
 156
 157         WindowStyle = WS_OVERLAPPED | WS_BORDER | WS_CAPTION | WS_SYSMENU | WS_MINIMIZEBOX;
 158         ExWindowStyle = 0;
 159
 160         rect = WindowRect;
 161         AdjustWindowRectEx(&rect, WindowStyle, false, 0);
 162
 163         width = rect.right - rect.left;
 164         height = rect.bottom - rect.top;
 165
 166         // Create the DIB window
 167         mainwindow = CreateWindowEx (ExWindowStyle, "DarkPlaces", "DarkPlacesGL", WindowStyle, rect.left, rect.top, width, height, NULL, NULL, global_hInstance, NULL);
 168
 169         if (!mainwindow)
 170                 Sys_Error ("Couldn't create DIB window");
 171
 172         // Center and show the DIB window
 173         CenterWindow(mainwindow, WindowRect.right - WindowRect.left, WindowRect.bottom - WindowRect.top, false);
 174
 175         ShowWindow (mainwindow, SW_SHOWDEFAULT);
 176         UpdateWindow (mainwindow);
 177
 178         modestate = MS_WINDOWED;
 179
 180         if (vid.conheight > modelist[modenum].height)
 181                 vid.conheight = modelist[modenum].height;
 182         if (vid.conwidth > modelist[modenum].width)
 183                 vid.conwidth = modelist[modenum].width;
 184         vid.width = vid.conwidth;
 185         vid.height = vid.conheight;
 186
 187         SendMessage (mainwindow, WM_SETICON, (WPARAM)true, (LPARAM)hIcon);
 188         SendMessage (mainwindow, WM_SETICON, (WPARAM)false, (LPARAM)hIcon);
 189
 190         return true;
 191 }
 192
 193
 194 qboolean VID_SetFullDIBMode (int modenum)
 195 {
 196         int                             lastmodestate, width, height;
 197         RECT                    rect;
 198
 199         if (!leavecurrentmode)
 200         {
 201                 gdevmode.dmFields = DM_BITSPERPEL | DM_PELSWIDTH | DM_PELSHEIGHT;
 202                 gdevmode.dmBitsPerPel = modelist[modenum].bpp;
 203                 gdevmode.dmPelsWidth = modelist[modenum].width <<
 204                                                            modelist[modenum].halfscreen;
 205                 gdevmode.dmPelsHeight = modelist[modenum].height;
 206                 gdevmode.dmSize = sizeof (gdevmode);
 207
 208                 if (ChangeDisplaySettings (&gdevmode, CDS_FULLSCREEN) != DISP_CHANGE_SUCCESSFUL)
 209                         Sys_Error ("Couldn't set fullscreen DIB mode");
 210         }
 211
 212         lastmodestate = modestate;
 213         modestate = MS_FULLDIB;
 214
 215         WindowRect.top = WindowRect.left = 0;
 216
 217         WindowRect.right = modelist[modenum].width;
 218         WindowRect.bottom = modelist[modenum].height;
 219
 220         DIBWidth = modelist[modenum].width;
 221         DIBHeight = modelist[modenum].height;
 222
 223         WindowStyle = WS_POPUP;
 224         ExWindowStyle = 0;
 225
 226         rect = WindowRect;
 227         AdjustWindowRectEx(&rect, WindowStyle, false, 0);
 228
 229         width = rect.right - rect.left;
 230         height = rect.bottom - rect.top;
 231
 232         // Create the DIB window
 233         mainwindow = CreateWindowEx (ExWindowStyle, "DarkPlaces", "DarkPlacesGL", WindowStyle, rect.left, rect.top, width, height, NULL, NULL, global_hInstance, NULL);
 234
 235         if (!mainwindow)
 236                 Sys_Error ("Couldn't create DIB window");
 237
 238         ShowWindow (mainwindow, SW_SHOWDEFAULT);
 239         UpdateWindow (mainwindow);
 240
 241         if (vid.conheight > modelist[modenum].height)
 242                 vid.conheight = modelist[modenum].height;
 243         if (vid.conwidth > modelist[modenum].width)
 244                 vid.conwidth = modelist[modenum].width;
 245         vid.width = vid.conwidth;
 246         vid.height = vid.conheight;
 247
 248 // needed because we're not getting WM_MOVE messages fullscreen on NT
 249         window_x = 0;
 250         window_y = 0;
 251
 252         SendMessage (mainwindow, WM_SETICON, (WPARAM)true, (LPARAM)hIcon);
 253         SendMessage (mainwindow, WM_SETICON, (WPARAM)false, (LPARAM)hIcon);
 254
 255         return true;
 256 }
 257
 258
 259 int VID_SetMode (int modenum)
 260 {
 261         int                             original_mode, temp;
 262         qboolean                stat;
 263     MSG                         msg;
 264
 265         if ((windowed && (modenum != 0)) || (!windowed && (modenum < 1)) || (!windowed && (modenum >= nummodes)))
 266                 Sys_Error ("Bad video mode\n");
 267
 268 // so Con_Printfs don't mess us up by forcing vid and snd updates
 269         temp = scr_disabled_for_loading;
 270         scr_disabled_for_loading = true;
 271
 272         CDAudio_Pause ();
 273
 274         if (vid_modenum == NO_MODE)
 275                 original_mode = windowed_default;
 276         else
 277                 original_mode = vid_modenum;
 278
 279         // Set either the fullscreen or windowed mode
 280         if (modelist[modenum].type == MS_WINDOWED)
 281         {
 282 //              if (vid_mouse.value && key_dest == key_game)
 283 //              {
 284 //                      stat = VID_SetWindowedMode(modenum);
 285 //                      usingmouse = true;
 286 //                      IN_ActivateMouse ();
 287 //                      IN_HideMouse ();
 288 //              }
 289 //              else
 290 //              {
 291 //                      usingmouse = false;
 292 //                      IN_DeactivateMouse ();
 293 //                      IN_ShowMouse ();
 294 //                      stat = VID_SetWindowedMode(modenum);
 295 //              }
 296                 stat = VID_SetWindowedMode(modenum);
 297         }
 298         else if (modelist[modenum].type == MS_FULLDIB)
 299         {
 300                 stat = VID_SetFullDIBMode(modenum);
 301 //              usingmouse = true;
 302 //              IN_ActivateMouse ();
 303 //              IN_HideMouse ();
 304         }
 305         else
 306                 Sys_Error ("VID_SetMode: Bad mode type in modelist");
 307
 308         window_width = DIBWidth;
 309         window_height = DIBHeight;
 310         VID_UpdateWindowStatus ();
 311
 312         CDAudio_Resume ();
 313         scr_disabled_for_loading = temp;
 314
 315         if (!stat)
 316                 Sys_Error ("Couldn't set video mode");
 317
 318 // now we try to make sure we get the focus on the mode switch, because
 319 // sometimes in some systems we don't.  We grab the foreground, then
 320 // finish setting up, pump all our messages, and sleep for a little while
 321 // to let messages finish bouncing around the system, then we put
 322 // ourselves at the top of the z order, then grab the foreground again,
 323 // Who knows if it helps, but it probably doesn't hurt
 324         SetForegroundWindow (mainwindow);
 325         vid_modenum = modenum;
 326         Cvar_SetValue ("vid_mode", (float)vid_modenum);
 327
 328         while (PeekMessage (&msg, NULL, 0, 0, PM_REMOVE))
 329         {
 330         TranslateMessage (&msg);
 331         DispatchMessage (&msg);
 332         }
 333
 334         Sleep (100);
 335
 336         SetWindowPos (mainwindow, HWND_TOP, 0, 0, 0, 0, SWP_DRAWFRAME | SWP_NOMOVE | SWP_NOSIZE | SWP_SHOWWINDOW | SWP_NOCOPYBITS);
 337
 338         SetForegroundWindow (mainwindow);
 339
 340 // fix the leftover Alt from any Alt-Tab or the like that switched us away
 341         ClearAllStates ();
 342
 343         if (!msg_suppress_1)
 344                 Con_SafePrintf ("Video mode %s initialized.\n", VID_GetModeDescription (vid_modenum));
 345
 346         vid.recalc_refdef = 1;
 347
 348         return true;
 349 }
 350
 351
 352 /*
 353 ================
 354 VID_UpdateWindowStatus
 355 ================
 356 */
 357 void VID_UpdateWindowStatus (void)
 358 {
 359
 360         window_rect.left = window_x;
 361         window_rect.top = window_y;
 362         window_rect.right = window_x + window_width;
 363         window_rect.bottom = window_y + window_height;
 364         window_center_x = (window_rect.left + window_rect.right) / 2;
 365         window_center_y = (window_rect.top + window_rect.bottom) / 2;
 366
 367         IN_UpdateClipCursor ();
 368 }
 369
 370
 371 //====================================
 372
 373 void VID_CheckMultitexture(void)
 374 {
 375         qglMTexCoord2f = NULL;
 376         qglSelectTexture = NULL;
 377         gl_mtexable = false;
 378         // Check to see if multitexture is disabled
 379         if (COM_CheckParm("-nomtex"))
 380         {
 381                 Con_Printf("...multitexture disabled\n");
 382                 return;
 383         }
 384         // Test for ARB_multitexture
 385         if (!COM_CheckParm("-SGISmtex") && strstr(gl_extensions, "GL_ARB_multitexture "))
 386         {
 387                 Con_Printf("...using GL_ARB_multitexture\n");
 388                 qglMTexCoord2f = (void *) wglGetProcAddress("glMultiTexCoord2fARB");
 389                 qglSelectTexture = (void *) wglGetProcAddress("glActiveTextureARB");
 390                 gl_mtexable = true;
 391                 gl_mtex_enum = GL_TEXTURE0_ARB;
 392         }
 393         else if (strstr(gl_extensions, "GL_SGIS_multitexture ")) // Test for SGIS_multitexture (if ARB_multitexture not found)
 394         {
 395                 Con_Printf("...using GL_SGIS_multitexture\n");
 396                 qglMTexCoord2f = (void *) wglGetProcAddress("glMTexCoord2fSGIS");
 397                 qglSelectTexture = (void *) wglGetProcAddress("glSelectTextureSGIS");
 398                 gl_mtexable = true;
 399                 gl_mtex_enum = TEXTURE0_SGIS;
 400         }
 401         else
 402                 Con_Printf("...multitexture disabled (not detected)\n");
 403 }
 404
 405 void VID_CheckCVA(void)
 406 {
 407         qglLockArraysEXT = NULL;
 408         qglUnlockArraysEXT = NULL;
 409         gl_supportslockarrays = false;
 410         if (COM_CheckParm("-nocva"))
 411         {
 412                 Con_Printf("...compiled vertex arrays disabled\n");
 413                 return;
 414         }
 415         if (strstr(gl_extensions, "GL_EXT_compiled_vertex_array"))
 416         {
 417                 Con_Printf("...using compiled vertex arrays\n");
 418                 qglLockArraysEXT = (void *) wglGetProcAddress("glLockArraysEXT");
 419                 qglUnlockArraysEXT = (void *) wglGetProcAddress("glUnlockArraysEXT");
 420                 gl_supportslockarrays = true;
 421         }
 422 }
 423
 424 /*
 425 =================
 426 GL_BeginRendering
 427
 428 =================
 429 */
 430 void GL_BeginRendering (int *x, int *y, int *width, int *height)
 431 {
 432         *x = *y = 0;
 433         *width = WindowRect.right - WindowRect.left;
 434         *height = WindowRect.bottom - WindowRect.top;
 435
 436 //      if (!wglMakeCurrent( maindc, baseRC ))
 437 //              Sys_Error ("wglMakeCurrent failed");
 438
 439 //      glViewport (*x, *y, *width, *height);
 440 }
 441
 442
 443 void GL_EndRendering (void)
 444 {
 445         int usemouse;
 446         if (r_render.value && !scr_skipupdate)
 447                 SwapBuffers(maindc);
 448
 449 // handle the mouse state when windowed if that's changed
 450         usemouse = false;
 451         if (vid_mouse.value && key_dest == key_game)
 452                 usemouse = true;
 453         if (modestate == MS_FULLDIB)
 454                 usemouse = true;
 455         if (!ActiveApp)
 456                 usemouse = false;
 457         if (usemouse)
 458         {
 459                 if (!usingmouse)
 460                 {
 461                         usingmouse = true;
 462                         IN_ActivateMouse ();
 463                         IN_HideMouse();
 464                 }
 465         }
 466         else
 467         {
 468                 if (usingmouse)
 469                 {
 470                         usingmouse = false;
 471                         IN_DeactivateMouse ();
 472                         IN_ShowMouse();
 473                 }
 474         }
 475 }
 476
 477 void VID_SetDefaultMode (void)
 478 {
 479         IN_DeactivateMouse ();
 480 }
 481
 482 void VID_RestoreSystemGamma(void);
 483
 484 void    VID_Shutdown (void)
 485 {
 486         HGLRC hRC;
 487         HDC       hDC;
 488         int i;
 489         GLuint temp[8192];
 490
 491         if (vid_initialized)
 492         {
 493                 vid_canalttab = false;
 494                 hRC = wglGetCurrentContext();
 495         hDC = wglGetCurrentDC();
 496
 497         wglMakeCurrent(NULL, NULL);
 498
 499                 // LordHavoc: free textures before closing (may help NVIDIA)
 500                 for (i = 0;i < 8192;i++)
 501                         temp[i] = i+1;
 502                 glDeleteTextures(8192, temp);
 503
 504         if (hRC)
 505             wglDeleteContext(hRC);
 506
 507                 if (hDC && mainwindow)
 508                         ReleaseDC(mainwindow, hDC);
 509
 510                 if (modestate == MS_FULLDIB)
 511                         ChangeDisplaySettings (NULL, 0);
 512
 513                 if (maindc && mainwindow)
 514                         ReleaseDC (mainwindow, maindc);
 515
 516                 AppActivate(false, false);
 517
 518                 VID_RestoreSystemGamma();
 519         }
 520 }
 521
 522
 523 //==========================================================================
 524
 525
 526 BOOL bSetupPixelFormat(HDC hDC)
 527 {
 528     static PIXELFORMATDESCRIPTOR pfd = {
 529         sizeof(PIXELFORMATDESCRIPTOR),  // size of this pfd
 530         1,                              // version number
 531         PFD_DRAW_TO_WINDOW              // support window
 532         |  PFD_SUPPORT_OPENGL   // support OpenGL
 533         |  PFD_DOUBLEBUFFER ,   // double buffered
 534         PFD_TYPE_RGBA,                  // RGBA type
 535         24,                             // 24-bit color depth
 536         0, 0, 0, 0, 0, 0,               // color bits ignored
 537         0,                              // no alpha buffer
 538         0,                              // shift bit ignored
 539         0,                              // no accumulation buffer
 540         0, 0, 0, 0,                     // accum bits ignored
 541         32,                             // 32-bit z-buffer
 542         0,                              // no stencil buffer
 543         0,                              // no auxiliary buffer
 544         PFD_MAIN_PLANE,                 // main layer
 545         0,                              // reserved
 546         0, 0, 0                         // layer masks ignored
 547     };
 548     int pixelformat;
 549
 550     if ( (pixelformat = ChoosePixelFormat(hDC, &pfd)) == 0 )
 551     {
 552         MessageBox(NULL, "ChoosePixelFormat failed", "Error", MB_OK);
 553         return false;
 554     }
 555
 556     if (SetPixelFormat(hDC, pixelformat, &pfd) == false)
 557     {
 558         MessageBox(NULL, "SetPixelFormat failed", "Error", MB_OK);
 559         return false;
 560     }
 561
 562     return true;
 563 }
 564
 565
 566
 567 byte scantokey[128] =
 568 {
 569 //      0           1      2     3     4     5       6       7      8         9      A       B           C     D            E           F
 570         0          ,27    ,'1'  ,'2'  ,'3'  ,'4'    ,'5'    ,'6'   ,'7'      ,'8'   ,'9'    ,'0'        ,'-'  ,'='         ,K_BACKSPACE,9     , // 0
 571         'q'        ,'w'   ,'e'  ,'r'  ,'t'  ,'y'    ,'u'    ,'i'   ,'o'      ,'p'   ,'['    ,']'        ,13   ,K_CTRL      ,'a'        ,'s'   , // 1
 572         'd'        ,'f'   ,'g'  ,'h'  ,'j'  ,'k'    ,'l'    ,';'   ,'\''     ,'`'   ,K_SHIFT,'\\'       ,'z'  ,'x'         ,'c'        ,'v'   , // 2
 573         'b'        ,'n'   ,'m'  ,','  ,'.'  ,'/'    ,K_SHIFT,'*'   ,K_ALT    ,' '   ,0      ,K_F1       ,K_F2 ,K_F3        ,K_F4       ,K_F5  , // 3
 574         K_F6       ,K_F7  ,K_F8 ,K_F9 ,K_F10,K_PAUSE,0      ,K_HOME,K_UPARROW,K_PGUP,'-'    ,K_LEFTARROW,'5'  ,K_RIGHTARROW,'+'        ,K_END , // 4
 575         K_DOWNARROW,K_PGDN,K_INS,K_DEL,0    ,0      ,0      ,K_F11 ,K_F12    ,0     ,0      ,0          ,0    ,0           ,0          ,0     , // 5
 576         0          ,0     ,0    ,0    ,0    ,0      ,0      ,0     ,0        ,0     ,0      ,0          ,0    ,0           ,0          ,0     , // 6
 577         0          ,0     ,0    ,0    ,0    ,0      ,0      ,0     ,0        ,0     ,0      ,0          ,0    ,0           ,0          ,0       // 7
 578 };
 579
 580 /*
 581 byte shiftscantokey[128] =
 582 {
 583 //      0           1      2     3     4     5       6       7      8         9      A       B           C    D            E           F
 584         0          ,27    ,'!'  ,'@'  ,'#'  ,'$'    ,'%'    ,'^'   ,'&'      ,'*'   ,'('    ,')'        ,'_' ,'+'         ,K_BACKSPACE,9    , // 0
 585         'Q'        ,'W'   ,'E'  ,'R'  ,'T'  ,'Y'    ,'U'    ,'I'   ,'O'      ,'P'   ,'{'    ,'}'        ,13  ,K_CTRL      ,'A'        ,'S'  , // 1
 586         'D'        ,'F'   ,'G'  ,'H'  ,'J'  ,'K'    ,'L'    ,':'   ,'"'      ,'~'   ,K_SHIFT,'|'        ,'Z' ,'X'         ,'C'        ,'V'  , // 2
 587         'B'        ,'N'   ,'M'  ,'<'  ,'>'  ,'?'    ,K_SHIFT,'*'   ,K_ALT    ,' '   ,0      ,K_F1       ,K_F2,K_F3        ,K_F4       ,K_F5 , // 3
 588         K_F6       ,K_F7  ,K_F8 ,K_F9 ,K_F10,K_PAUSE,0      ,K_HOME,K_UPARROW,K_PGUP,'_'    ,K_LEFTARROW,'%' ,K_RIGHTARROW,'+'        ,K_END, // 4
 589         K_DOWNARROW,K_PGDN,K_INS,K_DEL,0    ,0      ,0      ,K_F11 ,K_F12    ,0     ,0      ,0          ,0   ,0           ,0          ,0    , // 5
 590         0          ,0     ,0    ,0    ,0    ,0      ,0      ,0     ,0        ,0     ,0      ,0          ,0   ,0           ,0          ,0    , // 6
 591         0          ,0     ,0    ,0    ,0    ,0      ,0      ,0     ,0        ,0     ,0      ,0          ,0   ,0           ,0          ,0      // 7
 592 };
 593 */
 594
 595 /*
 596 =======
 597 MapKey
 598
 599 Map from windows to quake keynums
 600 =======
 601 */
 602 int MapKey (int key, int virtualkey)
 603 {
 604         key = (key>>16)&255;
 605         if (key > 127)
 606                 return 0;
 607         if (scantokey[key] == 0)
 608                 Con_DPrintf("key 0x%02x has no translation\n", key);
 609 //      if (scantokey[key] >= 0x20 && scantokey[key] < 0x7F)
 610 //              return realchar;
 611         return scantokey[key];
 612 }
 613
 614 /*
 615 ===================================================================
 616
 617 MAIN WINDOW
 618
 619 ===================================================================
 620 */
 621
 622 /*
 623 ================
 624 ClearAllStates
 625 ================
 626 */
 627 void ClearAllStates (void)
 628 {
 629         int             i;
 630
 631 // send an up event for each key, to make sure the server clears them all
 632         for (i=0 ; i<256 ; i++)
 633         {
 634                 Key_Event (i, false);
 635         }
 636
 637         Key_ClearStates ();
 638         IN_ClearStates ();
 639 }
 640
 641 void VID_RestoreGameGamma(void);
 642
 643 void AppActivate(BOOL fActive, BOOL minimize)
 644 /****************************************************************************
 645 *
 646 * Function:     AppActivate
 647 * Parameters:   fActive - True if app is activating
 648 *
 649 * Description:  If the application is activating, then swap the system
 650 *               into SYSPAL_NOSTATIC mode so that our palettes will display
 651 *               correctly.
 652 *
 653 ****************************************************************************/
 654 {
 655         static BOOL     sound_active;
 656
 657         ActiveApp = fActive;
 658         Minimized = minimize;
 659
 660 // enable/disable sound on focus gain/loss
 661         if (!ActiveApp && sound_active)
 662         {
 663                 S_BlockSound ();
 664                 sound_active = false;
 665         }
 666         else if (ActiveApp && !sound_active)
 667         {
 668                 S_UnblockSound ();
 669                 sound_active = true;
 670         }
 671
 672         if (fActive)
 673         {
 674                 if (modestate == MS_FULLDIB)
 675                 {
 676 //                      usingmouse = true;
 677 //                      IN_ActivateMouse ();
 678 //                      IN_HideMouse ();
 679                         if (vid_canalttab && vid_wassuspended)
 680                         {
 681                                 vid_wassuspended = false;
 682                                 ChangeDisplaySettings (&gdevmode, CDS_FULLSCREEN);
 683                                 ShowWindow(mainwindow, SW_SHOWNORMAL);
 684                         }
 685
 686                         // LordHavoc: from dabb, fix for alt-tab bug in NVidia drivers
 687                         MoveWindow(mainwindow,0,0,gdevmode.dmPelsWidth,gdevmode.dmPelsHeight,false);
 688                 }
 689 //              else if ((modestate == MS_WINDOWED) && vid_mouse.value && key_dest == key_game)
 690 //              {
 691 //                      usingmouse = true;
 692 //                      IN_ActivateMouse ();
 693 //                      IN_HideMouse ();
 694 //              }
 695                 VID_RestoreGameGamma();
 696         }
 697
 698         if (!fActive)
 699         {
 700                 usingmouse = false;
 701                 IN_DeactivateMouse ();
 702                 IN_ShowMouse ();
 703                 if (modestate == MS_FULLDIB)
 704                 {
 705 //                      usingmouse = false;
 706 //                      IN_DeactivateMouse ();
 707 //                      IN_ShowMouse ();
 708                         if (vid_canalttab)
 709                         {
 710                                 ChangeDisplaySettings (NULL, 0);
 711                                 vid_wassuspended = true;
 712                         }
 713                 }
 714 //              else if ((modestate == MS_WINDOWED) && vid_mouse.value)
 715 //              {
 716 //                      usingmouse = false;
 717 //                      IN_DeactivateMouse ();
 718 //                      IN_ShowMouse ();
 719 //              }
 720                 VID_RestoreSystemGamma();
 721         }
 722 }
 723
 724 LONG CDAudio_MessageHandler(HWND hWnd, UINT uMsg, WPARAM wParam, LPARAM lParam);
 725
 726 /* main window procedure */
 727 LONG WINAPI MainWndProc (
 728     HWND    hWnd,
 729     UINT    uMsg,
 730     WPARAM  wParam,
 731     LPARAM  lParam)
 732 {
 733     LONG    lRet = 1;
 734         int             fActive, fMinimized, temp;
 735         extern unsigned int uiWheelMessage;
 736
 737         if ( uMsg == uiWheelMessage )
 738                 uMsg = WM_MOUSEWHEEL;
 739
 740     switch (uMsg)
 741     {
 742                 case WM_KILLFOCUS:
 743                         if (modestate == MS_FULLDIB)
 744                                 ShowWindow(mainwindow, SW_SHOWMINNOACTIVE);
 745                         break;
 746
 747                 case WM_CREATE:
 748                         break;
 749
 750                 case WM_MOVE:
 751                         window_x = (int) LOWORD(lParam);
 752                         window_y = (int) HIWORD(lParam);
 753                         VID_UpdateWindowStatus ();
 754                         break;
 755
 756                 case WM_KEYDOWN:
 757                 case WM_SYSKEYDOWN:
 758                         Key_Event (MapKey(lParam, wParam), true);
 759                         break;
 760
 761                 case WM_KEYUP:
 762                 case WM_SYSKEYUP:
 763                         Key_Event (MapKey(lParam, wParam), false);
 764                         break;
 765
 766                 case WM_SYSCHAR:
 767                 // keep Alt-Space from happening
 768                         break;
 769
 770         // this is complicated because Win32 seems to pack multiple mouse events into
 771         // one update sometimes, so we always check all states and look for events
 772                 case WM_LBUTTONDOWN:
 773                 case WM_LBUTTONUP:
 774                 case WM_RBUTTONDOWN:
 775                 case WM_RBUTTONUP:
 776                 case WM_MBUTTONDOWN:
 777                 case WM_MBUTTONUP:
 778                 case WM_MOUSEMOVE:
 779                         temp = 0;
 780
 781                         if (wParam & MK_LBUTTON)
 782                                 temp |= 1;
 783
 784                         if (wParam & MK_RBUTTON)
 785                                 temp |= 2;
 786
 787                         if (wParam & MK_MBUTTON)
 788                                 temp |= 4;
 789
 790                         IN_MouseEvent (temp);
 791
 792                         break;
 793
 794                 // JACK: This is the mouse wheel with the Intellimouse
 795                 // Its delta is either positive or neg, and we generate the proper
 796                 // Event.
 797                 case WM_MOUSEWHEEL:
 798                         if ((short) HIWORD(wParam) > 0) {
 799                                 Key_Event(K_MWHEELUP, true);
 800                                 Key_Event(K_MWHEELUP, false);
 801                         } else {
 802                                 Key_Event(K_MWHEELDOWN, true);
 803                                 Key_Event(K_MWHEELDOWN, false);
 804                         }
 805                         break;
 806
 807         case WM_SIZE:
 808             break;
 809
 810             case WM_CLOSE:
 811                         if (MessageBox (mainwindow, "Are you sure you want to quit?", "Confirm Exit", MB_YESNO | MB_SETFOREGROUND | MB_ICONQUESTION) == IDYES)
 812                                 Sys_Quit ();
 813
 814                 break;
 815
 816                 case WM_ACTIVATE:
 817                         fActive = LOWORD(wParam);
 818                         fMinimized = (BOOL) HIWORD(wParam);
 819                         AppActivate(!(fActive == WA_INACTIVE), fMinimized);
 820
 821                 // fix the leftover Alt from any Alt-Tab or the like that switched us away
 822                         ClearAllStates ();
 823
 824                         break;
 825
 826             case WM_DESTROY:
 827         {
 828                         if (mainwindow)
 829                                 DestroyWindow (mainwindow);
 830
 831             PostQuitMessage (0);
 832         }
 833         break;
 834
 835                 case MM_MCINOTIFY:
 836             lRet = CDAudio_MessageHandler (hWnd, uMsg, wParam, lParam);
 837                         break;
 838
 839         default:
 840             /* pass all unhandled messages to DefWindowProc */
 841             lRet = DefWindowProc (hWnd, uMsg, wParam, lParam);
 842         break;
 843     }
 844
 845     /* return 1 if handled message, 0 if not */
 846     return lRet;
 847 }
 848
 849
 850 /*
 851 =================
 852 VID_NumModes
 853 =================
 854 */
 855 int VID_NumModes (void)
 856 {
 857         return nummodes;
 858 }
 859
 860
 861 /*
 862 =================
 863 VID_GetModePtr
 864 =================
 865 */
 866 vmode_t *VID_GetModePtr (int modenum)
 867 {
 868
 869         if ((modenum >= 0) && (modenum < nummodes))
 870                 return &modelist[modenum];
 871         else
 872                 return &badmode;
 873 }
 874
 875
 876 /*
 877 =================
 878 VID_GetModeDescription
 879 =================
 880 */
 881 char *VID_GetModeDescription (int mode)
 882 {
 883         char            *pinfo;
 884         vmode_t         *pv;
 885         static char     temp[100];
 886
 887         if ((mode < 0) || (mode >= nummodes))
 888                 return NULL;
 889
 890         if (!leavecurrentmode)
 891         {
 892                 pv = VID_GetModePtr (mode);
 893                 pinfo = pv->modedesc;
 894         }
 895         else
 896         {
 897                 sprintf (temp, "Desktop resolution (%dx%d)", modelist[MODE_FULLSCREEN_DEFAULT].width, modelist[MODE_FULLSCREEN_DEFAULT].height);
 898                 pinfo = temp;
 899         }
 900
 901         return pinfo;
 902 }
 903
 904
 905 // KJB: Added this to return the mode driver name in description for console
 906
 907 char *VID_GetExtModeDescription (int mode)
 908 {
 909         static char     pinfo[40];
 910         vmode_t         *pv;
 911
 912         if ((mode < 0) || (mode >= nummodes))
 913                 return NULL;
 914
 915         pv = VID_GetModePtr (mode);
 916         if (modelist[mode].type == MS_FULLDIB)
 917         {
 918                 if (!leavecurrentmode)
 919                         sprintf(pinfo,"%s fullscreen", pv->modedesc);
 920                 else
 921                         sprintf (pinfo, "Desktop resolution (%dx%d)", modelist[MODE_FULLSCREEN_DEFAULT].width, modelist[MODE_FULLSCREEN_DEFAULT].height);
 922         }
 923         else
 924         {
 925                 if (modestate == MS_WINDOWED)
 926                         sprintf(pinfo, "%s windowed", pv->modedesc);
 927                 else
 928                         sprintf(pinfo, "windowed");
 929         }
 930
 931         return pinfo;
 932 }
 933
 934
 935 /*
 936 =================
 937 VID_DescribeCurrentMode_f
 938 =================
 939 */
 940 void VID_DescribeCurrentMode_f (void)
 941 {
 942         Con_Printf ("%s\n", VID_GetExtModeDescription (vid_modenum));
 943 }
 944
 945
 946 /*
 947 =================
 948 VID_NumModes_f
 949 =================
 950 */
 951 void VID_NumModes_f (void)
 952 {
 953
 954         if (nummodes == 1)
 955                 Con_Printf ("%d video mode is available\n", nummodes);
 956         else
 957                 Con_Printf ("%d video modes are available\n", nummodes);
 958 }
 959
 960
 961 /*
 962 =================
 963 VID_DescribeMode_f
 964 =================
 965 */
 966 void VID_DescribeMode_f (void)
 967 {
 968         int             t, modenum;
 969
 970         modenum = atoi (Cmd_Argv(1));
 971
 972         t = leavecurrentmode;
 973         leavecurrentmode = 0;
 974
 975         Con_Printf ("%s\n", VID_GetExtModeDescription (modenum));
 976
 977         leavecurrentmode = t;
 978 }
 979
 980
 981 /*
 982 =================
 983 VID_DescribeModes_f
 984 =================
 985 */
 986 void VID_DescribeModes_f (void)
 987 {
 988         int                     i, lnummodes, t;
 989         char            *pinfo;
 990         vmode_t         *pv;
 991
 992         lnummodes = VID_NumModes ();
 993
 994         t = leavecurrentmode;
 995         leavecurrentmode = 0;
 996
 997         for (i=1 ; i<lnummodes ; i++)
 998         {
 999                 pv = VID_GetModePtr (i);
1000                 pinfo = VID_GetExtModeDescription (i);
1001                 Con_Printf ("%2d: %s\n", i, pinfo);
1002         }
1003
1004         leavecurrentmode = t;
1005 }
1006
1007 void VID_AddMode(int type, int width, int height, int modenum, int halfscreen, int dib, int fullscreen, int bpp)
1008 {
1009         int i;
1010         if (nummodes >= MAX_MODE_LIST)
1011                 return;
1012         modelist[nummodes].type = type;
1013         modelist[nummodes].width = width;
1014         modelist[nummodes].height = height;
1015         modelist[nummodes].modenum = modenum;
1016         modelist[nummodes].halfscreen = halfscreen;
1017         modelist[nummodes].dib = dib;
1018         modelist[nummodes].fullscreen = fullscreen;
1019         modelist[nummodes].bpp = bpp;
1020         if (bpp == 0)
1021                 sprintf (modelist[nummodes].modedesc, "%dx%d", width, height);
1022         else
1023                 sprintf (modelist[nummodes].modedesc, "%dx%dx%d", width, height, bpp);
1024         for (i = 0;i < nummodes;i++)
1025         {
1026                 if (!memcmp(&modelist[i], &modelist[nummodes], sizeof(vmode_t)))
1027                         return;
1028         }
1029         nummodes++;
1030 }
1031
1032 void VID_InitDIB (HINSTANCE hInstance)
1033 {
1034         int w, h;
1035         WNDCLASS                wc;
1036
1037         // Register the frame class
1038     wc.style         = 0;
1039     wc.lpfnWndProc   = (WNDPROC)MainWndProc;
1040     wc.cbClsExtra    = 0;
1041     wc.cbWndExtra    = 0;
1042     wc.hInstance     = hInstance;
1043     wc.hIcon         = 0;
1044     wc.hCursor       = LoadCursor (NULL,IDC_ARROW);
1045         wc.hbrBackground = NULL;
1046     wc.lpszMenuName  = 0;
1047     wc.lpszClassName = "DarkPlaces";
1048
1049     if (!RegisterClass (&wc) )
1050                 Sys_Error ("Couldn't register window class");
1051
1052         /*
1053         modelist[0].type = MS_WINDOWED;
1054
1055         if (COM_CheckParm("-width"))
1056                 modelist[0].width = atoi(com_argv[COM_CheckParm("-width")+1]);
1057         else
1058                 modelist[0].width = 640;
1059
1060         if (modelist[0].width < 320)
1061                 modelist[0].width = 320;
1062
1063         if (COM_CheckParm("-height"))
1064                 modelist[0].height= atoi(com_argv[COM_CheckParm("-height")+1]);
1065         else
1066                 modelist[0].height = modelist[0].width * 240/320;
1067
1068         if (modelist[0].height < 240)
1069                 modelist[0].height = 240;
1070
1071         sprintf (modelist[0].modedesc, "%dx%d", modelist[0].width, modelist[0].height);
1072
1073         modelist[0].modenum = MODE_WINDOWED;
1074         modelist[0].dib = 1;
1075         modelist[0].fullscreen = 0;
1076         modelist[0].halfscreen = 0;
1077         modelist[0].bpp = 0;
1078
1079         nummodes = 1;
1080         */
1081         if (COM_CheckParm("-width"))
1082                 w = atoi(com_argv[COM_CheckParm("-width")+1]);
1083         else
1084                 w = 640;
1085
1086         if (w < 320)
1087                 w = 320;
1088
1089         if (COM_CheckParm("-height"))
1090                 h = atoi(com_argv[COM_CheckParm("-height")+1]);
1091         else
1092                 h = w * 240/320;
1093
1094         if (h < 240)
1095                 h = 240;
1096
1097         VID_AddMode(MS_WINDOWED, w, h, 0, 0, 1, 0, 0);
1098 }
1099
1100
1101 /*
1102 =================
1103 VID_InitFullDIB
1104 =================
1105 */
1106 void VID_InitFullDIB (HINSTANCE hInstance)
1107 {
1108         DEVMODE devmode;
1109 //      int             i;
1110         int             modenum;
1111         int             originalnummodes;
1112 //      int             existingmode;
1113         int             numlowresmodes;
1114         int             j;
1115         int             bpp;
1116         int             done;
1117         BOOL    stat;
1118
1119 // enumerate >8 bpp modes
1120         originalnummodes = nummodes;
1121         modenum = 0;
1122
1123         do
1124         {
1125                 stat = EnumDisplaySettings (NULL, modenum, &devmode);
1126
1127                 if ((devmode.dmBitsPerPel >= 15) && (devmode.dmPelsWidth <= MAXWIDTH) && (devmode.dmPelsHeight <= MAXHEIGHT) && (nummodes < MAX_MODE_LIST))
1128                 {
1129                         devmode.dmFields = DM_BITSPERPEL | DM_PELSWIDTH | DM_PELSHEIGHT;
1130
1131                         if (ChangeDisplaySettings (&devmode, CDS_TEST | CDS_FULLSCREEN) == DISP_CHANGE_SUCCESSFUL)
1132                         {
1133                         // if the width is more than twice the height, reduce it by half because this
1134                         // is probably a dual-screen monitor
1135                                 if ((!COM_CheckParm("-noadjustaspect")) && (devmode.dmPelsWidth > (devmode.dmPelsHeight << 1)))
1136                                         VID_AddMode(MS_FULLDIB, devmode.dmPelsWidth >> 1, devmode.dmPelsHeight, 0, 1, 1, 1, devmode.dmBitsPerPel);
1137                                 else
1138                                         VID_AddMode(MS_FULLDIB, devmode.dmPelsWidth, devmode.dmPelsHeight, 0, 0, 1, 1, devmode.dmBitsPerPel);
1139                                 /*
1140                                 modelist[nummodes].type = MS_FULLDIB;
1141                                 modelist[nummodes].width = devmode.dmPelsWidth;
1142                                 modelist[nummodes].height = devmode.dmPelsHeight;
1143                                 modelist[nummodes].modenum = 0;
1144                                 modelist[nummodes].halfscreen = 0;
1145                                 modelist[nummodes].dib = 1;
1146                                 modelist[nummodes].fullscreen = 1;
1147                                 modelist[nummodes].bpp = devmode.dmBitsPerPel;
1148                                 sprintf (modelist[nummodes].modedesc, "%dx%dx%d", devmode.dmPelsWidth, devmode.dmPelsHeight, devmode.dmBitsPerPel);
1149
1150                         // if the width is more than twice the height, reduce it by half because this
1151                         // is probably a dual-screen monitor
1152                                 if (!COM_CheckParm("-noadjustaspect"))
1153                                 {
1154                                         if (modelist[nummodes].width > (modelist[nummodes].height << 1))
1155                                         {
1156                                                 modelist[nummodes].width >>= 1;
1157                                                 modelist[nummodes].halfscreen = 1;
1158                                                 sprintf (modelist[nummodes].modedesc, "%dx%dx%d", modelist[nummodes].width, modelist[nummodes].height, modelist[nummodes].bpp);
1159                                         }
1160                                 }
1161
1162                                 for (i=originalnummodes, existingmode = 0 ; i<nummodes ; i++)
1163                                 {
1164                                         if ((modelist[nummodes].width == modelist[i].width) && (modelist[nummodes].height == modelist[i].height) && (modelist[nummodes].bpp == modelist[i].bpp))
1165                                         {
1166                                                 existingmode = 1;
1167                                                 break;
1168                                         }
1169                                 }
1170
1171                                 if (!existingmode)
1172                                         nummodes++;
1173                                 */
1174                         }
1175                 }
1176
1177                 modenum++;
1178         }
1179         while (stat);
1180
1181 // see if there are any low-res modes that aren't being reported
1182         numlowresmodes = sizeof(lowresmodes) / sizeof(lowresmodes[0]);
1183         bpp = 16;
1184         done = 0;
1185
1186         do
1187         {
1188                 for (j=0 ; (j<numlowresmodes) && (nummodes < MAX_MODE_LIST) ; j++)
1189                 {
1190                         devmode.dmBitsPerPel = bpp;
1191                         devmode.dmPelsWidth = lowresmodes[j].width;
1192                         devmode.dmPelsHeight = lowresmodes[j].height;
1193                         devmode.dmFields = DM_BITSPERPEL | DM_PELSWIDTH | DM_PELSHEIGHT;
1194
1195                         if (ChangeDisplaySettings (&devmode, CDS_TEST | CDS_FULLSCREEN) == DISP_CHANGE_SUCCESSFUL)
1196                                 VID_AddMode(MS_FULLDIB, devmode.dmPelsWidth, devmode.dmPelsHeight, 0, 0, 1, 1, devmode.dmBitsPerPel);
1197                         /*
1198                         {
1199                                 modelist[nummodes].type = MS_FULLDIB;
1200                                 modelist[nummodes].width = devmode.dmPelsWidth;
1201                                 modelist[nummodes].height = devmode.dmPelsHeight;
1202                                 modelist[nummodes].modenum = 0;
1203                                 modelist[nummodes].halfscreen = 0;
1204                                 modelist[nummodes].dib = 1;
1205                                 modelist[nummodes].fullscreen = 1;
1206                                 modelist[nummodes].bpp = devmode.dmBitsPerPel;
1207                                 sprintf (modelist[nummodes].modedesc, "%dx%dx%d", devmode.dmPelsWidth, devmode.dmPelsHeight, devmode.dmBitsPerPel);
1208
1209                                 for (i=originalnummodes, existingmode = 0 ; i<nummodes ; i++)
1210                                 {
1211                                         if ((modelist[nummodes].width == modelist[i].width) && (modelist[nummodes].height == modelist[i].height) && (modelist[nummodes].bpp == modelist[i].bpp))
1212                                         {
1213                                                 existingmode = 1;
1214                                                 break;
1215                                         }
1216                                 }
1217
1218                                 if (!existingmode)
1219                                         nummodes++;
1220                         }
1221                         */
1222                 }
1223                 switch (bpp)
1224                 {
1225                         case 16:
1226                                 bpp = 32;
1227                                 break;
1228
1229                         case 32:
1230                                 bpp = 24;
1231                                 break;
1232
1233                         case 24:
1234                                 done = 1;
1235                                 break;
1236                 }
1237         }
1238         while (!done);
1239
1240         if (nummodes == originalnummodes)
1241                 Con_SafePrintf ("No fullscreen DIB modes found\n");
1242 }
1243
1244 static int grabsysgamma = true;
1245 WORD systemgammaramps[3][256], currentgammaramps[3][256];
1246
1247 int VID_SetGamma(float prescale, float gamma, float scale, float base)
1248 {
1249         int i;
1250         HDC hdc;
1251         hdc = GetDC (NULL);
1252
1253         BuildGammaTable16(prescale, gamma, scale, base, &currentgammaramps[0][0]);
1254         for (i = 0;i < 256;i++)
1255                 currentgammaramps[1][i] = currentgammaramps[2][i] = currentgammaramps[0][i];
1256
1257         i = SetDeviceGammaRamp(hdc, &currentgammaramps[0][0]);
1258
1259         ReleaseDC (NULL, hdc);
1260         return i; // return success or failure
1261 }
1262
1263 void VID_RestoreGameGamma(void)
1264 {
1265         VID_UpdateGamma(true);
1266 }
1267
1268 void VID_GetSystemGamma(void)
1269 {
1270         HDC hdc;
1271         hdc = GetDC (NULL);
1272
1273         GetDeviceGammaRamp(hdc, &systemgammaramps[0][0]);
1274
1275         ReleaseDC (NULL, hdc);
1276 }
1277
1278 void VID_RestoreSystemGamma(void)
1279 {
1280         HDC hdc;
1281         hdc = GetDC (NULL);
1282
1283         SetDeviceGammaRamp(hdc, &systemgammaramps[0][0]);
1284
1285         ReleaseDC (NULL, hdc);
1286 }
1287
1288 /*
1289 ===================
1290 VID_Init
1291 ===================
1292 */
1293 void    VID_Init (void)
1294 {
1295         int             i;
1296 //      int             existingmode;
1297         int             basenummodes, width, height, bpp, findbpp, done;
1298         HDC             hdc;
1299         DEVMODE devmode;
1300
1301         memset(&devmode, 0, sizeof(devmode));
1302
1303 //      Cvar_RegisterVariable (&_vid_default_mode);
1304 //      Cvar_RegisterVariable (&_vid_default_mode_win);
1305
1306         Cmd_AddCommand ("vid_nummodes", VID_NumModes_f);
1307         Cmd_AddCommand ("vid_describecurrentmode", VID_DescribeCurrentMode_f);
1308         Cmd_AddCommand ("vid_describemode", VID_DescribeMode_f);
1309         Cmd_AddCommand ("vid_describemodes", VID_DescribeModes_f);
1310
1311         VID_GetSystemGamma();
1312
1313         hIcon = LoadIcon (global_hInstance, MAKEINTRESOURCE (IDI_ICON2));
1314
1315         InitCommonControls();
1316
1317         VID_InitDIB (global_hInstance);
1318         basenummodes = nummodes = 1;
1319
1320         VID_InitFullDIB (global_hInstance);
1321
1322         if (COM_CheckParm("-window"))
1323         {
1324                 hdc = GetDC (NULL);
1325
1326                 if (GetDeviceCaps(hdc, RASTERCAPS) & RC_PALETTE)
1327                         Sys_Error ("Can't run in non-RGB mode");
1328
1329                 ReleaseDC (NULL, hdc);
1330
1331                 windowed = true;
1332
1333                 vid_default = MODE_WINDOWED;
1334         }
1335         else
1336         {
1337                 if (nummodes == 1)
1338                         Sys_Error ("No RGB fullscreen modes available");
1339
1340                 windowed = false;
1341
1342                 if (COM_CheckParm("-mode"))
1343                         vid_default = atoi(com_argv[COM_CheckParm("-mode")+1]);
1344                 else
1345                 {
1346                         if (COM_CheckParm("-current"))
1347                         {
1348                                 modelist[MODE_FULLSCREEN_DEFAULT].width = GetSystemMetrics (SM_CXSCREEN);
1349                                 modelist[MODE_FULLSCREEN_DEFAULT].height = GetSystemMetrics (SM_CYSCREEN);
1350                                 vid_default = MODE_FULLSCREEN_DEFAULT;
1351                                 leavecurrentmode = 1;
1352                         }
1353                         else
1354                         {
1355                                 if (COM_CheckParm("-width"))
1356                                         width = atoi(com_argv[COM_CheckParm("-width")+1]);
1357                                 else
1358                                         width = 640;
1359
1360                                 if (COM_CheckParm("-bpp"))
1361                                 {
1362                                         bpp = atoi(com_argv[COM_CheckParm("-bpp")+1]);
1363                                         findbpp = 0;
1364                                 }
1365                                 else
1366                                 {
1367                                         bpp = 15;
1368                                         findbpp = 1;
1369                                 }
1370
1371                                 if (COM_CheckParm("-height"))
1372                                         height = atoi(com_argv[COM_CheckParm("-height")+1]);
1373
1374                         // if they want to force it, add the specified mode to the list
1375                                 if (COM_CheckParm("-force") && (nummodes < MAX_MODE_LIST))
1376                                         VID_AddMode(MS_FULLDIB, width, height, 0, 0, 1, 1, bpp);
1377                                 /*
1378                                 {
1379                                         modelist[nummodes].type = MS_FULLDIB;
1380                                         modelist[nummodes].width = width;
1381                                         modelist[nummodes].height = height;
1382                                         modelist[nummodes].modenum = 0;
1383                                         modelist[nummodes].halfscreen = 0;
1384                                         modelist[nummodes].dib = 1;
1385                                         modelist[nummodes].fullscreen = 1;
1386                                         modelist[nummodes].bpp = bpp;
1387                                         sprintf (modelist[nummodes].modedesc, "%dx%dx%d", devmode.dmPelsWidth, devmode.dmPelsHeight, devmode.dmBitsPerPel);
1388
1389                                         for (i=nummodes, existingmode = 0 ; i<nummodes ; i++)
1390                                         {
1391                                                 if ((modelist[nummodes].width == modelist[i].width) && (modelist[nummodes].height == modelist[i].height) && (modelist[nummodes].bpp == modelist[i].bpp))
1392                                                 {
1393                                                         existingmode = 1;
1394                                                         break;
1395                                                 }
1396                                         }
1397
1398                                         if (!existingmode)
1399                                                 nummodes++;
1400                                 }
1401                                 */
1402
1403                                 done = 0;
1404
1405                                 do
1406                                 {
1407                                         if (COM_CheckParm("-height"))
1408                                         {
1409                                                 height = atoi(com_argv[COM_CheckParm("-height")+1]);
1410
1411                                                 for (i=1, vid_default=0 ; i<nummodes ; i++)
1412                                                 {
1413                                                         if ((modelist[i].width == width) && (modelist[i].height == height) && (modelist[i].bpp == bpp))
1414                                                         {
1415                                                                 vid_default = i;
1416                                                                 done = 1;
1417                                                                 break;
1418                                                         }
1419                                                 }
1420                                         }
1421                                         else
1422                                         {
1423                                                 for (i=1, vid_default=0 ; i<nummodes ; i++)
1424                                                 {
1425                                                         if ((modelist[i].width == width) && (modelist[i].bpp == bpp))
1426                                                         {
1427                                                                 vid_default = i;
1428                                                                 done = 1;
1429                                                                 break;
1430                                                         }
1431                                                 }
1432                                         }
1433
1434                                         if (!done)
1435                                         {
1436                                                 if (findbpp)
1437                                                 {
1438                                                         switch (bpp)
1439                                                         {
1440                                                         case 15: bpp = 16;break;
1441                                                         case 16: bpp = 32;break;
1442                                                         case 32: bpp = 24;break;
1443                                                         case 24: done = 1;break;
1444                                                         }
1445                                                 }
1446                                                 else
1447                                                         done = 1;
1448                                         }
1449                                 }
1450                                 while (!done);
1451
1452                                 if (!vid_default)
1453                                         Sys_Error ("Specified video mode not available");
1454                         }
1455                 }
1456         }
1457
1458         vid_initialized = true;
1459
1460         if ((i = COM_CheckParm("-conwidth")) != 0)
1461                 vid.conwidth = atoi(com_argv[i+1]);
1462         else
1463                 vid.conwidth = 640;
1464
1465         vid.conwidth &= 0xfff8; // make it a multiple of eight
1466
1467         if (vid.conwidth < 320)
1468                 vid.conwidth = 320;
1469
1470         // pick a conheight that matches with correct aspect
1471         vid.conheight = vid.conwidth*3 / 4;
1472
1473         if ((i = COM_CheckParm("-conheight")) != 0)
1474                 vid.conheight = atoi(com_argv[i+1]);
1475         if (vid.conheight < 200)
1476                 vid.conheight = 200;
1477
1478         VID_SetMode (vid_default);
1479
1480         maindc = GetDC(mainwindow);
1481         bSetupPixelFormat(maindc);
1482
1483         baseRC = wglCreateContext( maindc );
1484         if (!baseRC)
1485                 Sys_Error ("Could not initialize GL (wglCreateContext failed).\n\nMake sure you are in 65536 color mode, and try running -window.");
1486         if (!wglMakeCurrent( maindc, baseRC ))
1487                 Sys_Error ("wglMakeCurrent failed");
1488
1489         GL_Init ();
1490
1491         // LordHavoc: special differences for ATI (broken 8bit color when also using 32bit? weird!)
1492         if (strncasecmp(gl_vendor,"ATI",3)==0)
1493         {
1494                 if (strncasecmp(gl_renderer,"Rage Pro",8)==0)
1495                         isRagePro = true;
1496         }
1497         if (strncasecmp(gl_renderer,"Matrox G200 Direct3D",20)==0) // a D3D driver for GL? sigh...
1498                 isG200 = true;
1499
1500 //      sprintf (gldir, "%s/glquake", com_gamedir);
1501 //      Sys_mkdir (gldir);
1502
1503         vid_realmode = vid_modenum;
1504
1505         vid_menudrawfn = VID_MenuDraw;
1506         vid_menukeyfn = VID_MenuKey;
1507
1508         strcpy (badmode.modedesc, "Bad mode");
1509         vid_canalttab = true;
1510 }
1511
1512
1513 //========================================================
1514 // Video menu stuff
1515 //========================================================
1516
1517 extern void M_Menu_Options_f (void);
1518 extern void M_Print (int cx, int cy, char *str);
1519 extern void M_PrintWhite (int cx, int cy, char *str);
1520 extern void M_DrawCharacter (int cx, int line, int num);
1521 extern void M_DrawPic (int x, int y, qpic_t *pic);
1522
1523 static int      vid_line, vid_wmodes;
1524
1525 typedef struct
1526 {
1527         int             modenum;
1528         char    *desc;
1529         int             iscur;
1530 } modedesc_t;
1531
1532 #define MAX_COLUMN_SIZE         9
1533 #define MODE_AREA_HEIGHT        (MAX_COLUMN_SIZE + 2)
1534 #define MAX_MODEDESCS           (MAX_COLUMN_SIZE*3)
1535
1536 static modedesc_t       modedescs[MAX_MODEDESCS];
1537
1538 /*
1539 ================
1540 VID_MenuDraw
1541 ================
1542 */
1543 void VID_MenuDraw (void)
1544 {
1545         qpic_t          *p;
1546         char            *ptr;
1547         int                     lnummodes, i, k, column, row;
1548         vmode_t         *pv;
1549
1550         p = Draw_CachePic ("gfx/vidmodes.lmp");
1551         M_DrawPic ( (320-p->width)/2, 4, p);
1552
1553         vid_wmodes = 0;
1554         lnummodes = VID_NumModes ();
1555
1556         for (i=1 ; (i<lnummodes) && (vid_wmodes < MAX_MODEDESCS) ; i++)
1557         {
1558                 ptr = VID_GetModeDescription (i);
1559                 pv = VID_GetModePtr (i);
1560
1561                 k = vid_wmodes;
1562
1563                 modedescs[k].modenum = i;
1564                 modedescs[k].desc = ptr;
1565                 modedescs[k].iscur = 0;
1566
1567                 if (i == vid_modenum)
1568                         modedescs[k].iscur = 1;
1569
1570                 vid_wmodes++;
1571
1572         }
1573
1574         if (vid_wmodes > 0)
1575         {
1576                 M_Print (2*8, 36+0*8, "Fullscreen Modes (WIDTHxHEIGHTxBPP)");
1577
1578                 column = 8;
1579                 row = 36+2*8;
1580
1581                 for (i=0 ; i<vid_wmodes ; i++)
1582                 {
1583                         if (modedescs[i].iscur)
1584                                 M_PrintWhite (column, row, modedescs[i].desc);
1585                         else
1586                                 M_Print (column, row, modedescs[i].desc);
1587
1588                         column += 13*8;
1589
1590                         if ((i % VID_ROW_SIZE) == (VID_ROW_SIZE - 1))
1591                         {
1592                                 column = 8;
1593                                 row += 8;
1594                         }
1595                 }
1596         }
1597
1598         M_Print (3*8, 36 + MODE_AREA_HEIGHT * 8 + 8*2, "Video modes must be set from the");
1599         M_Print (3*8, 36 + MODE_AREA_HEIGHT * 8 + 8*3, "command line with -width <width>");
1600         M_Print (3*8, 36 + MODE_AREA_HEIGHT * 8 + 8*4, "and -bpp <bits-per-pixel>");
1601         M_Print (3*8, 36 + MODE_AREA_HEIGHT * 8 + 8*6, "Select windowed mode with -window");
1602 }
1603
1604
1605 /*
1606 ================
1607 VID_MenuKey
1608 ================
1609 */
1610 void VID_MenuKey (int key)
1611 {
1612         switch (key)
1613         {
1614         case K_ESCAPE:
1615                 S_LocalSound ("misc/menu1.wav");
1616                 M_Menu_Options_f ();
1617                 break;
1618
1619         default:
1620                 break;
1621         }
1622 }