This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
-MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
See the GNU General Public License for more details.
*/
// sys_win.c -- Win32 system interface code
-#define WIN32_USETIMEGETTIME 0
-
#include "quakedef.h"
-#include "winquake.h"
+#include <windows.h>
+#include <mmsystem.h>
+#ifdef SUPPORTDIRECTX
+#include <dsound.h>
+#endif
#include "errno.h"
#include "resource.h"
#include "conproc.h"
#include "direct.h"
-#define CONSOLE_ERROR_TIMEOUT 60.0 // # of seconds to wait on Sys_Error running
- // dedicated before exiting
-#define PAUSE_SLEEP 50 // sleep time on pause or minimization
-#define NOT_FOCUS_SLEEP 20 // sleep time when not focus
+cvar_t sys_usetimegettime = {CVAR_SAVE, "sys_usetimegettime", "1", "use windows timeGetTime function (which has issues on some motherboards) for timing rather than QueryPerformanceCounter timer (which has issues on multicore/multiprocessor machines and processors which are designed to conserve power)"};
-int starttime;
-qboolean ActiveApp, Minimized;
-
-static qboolean sc_return_on_enter = false;
HANDLE hinput, houtput;
+#ifdef QHOST
static HANDLE tevent;
static HANDLE hFile;
static HANDLE heventParent;
static HANDLE heventChild;
-
-/*
-===============================================================================
-
-QFile IO
-
-===============================================================================
-*/
-
-// LordHavoc: 256 pak files (was 10)
-#define MAX_HANDLES 256
-QFile *sys_handles[MAX_HANDLES];
-
-int findhandle (void)
-{
- int i;
-
- for (i=1 ; i<MAX_HANDLES ; i++)
- if (!sys_handles[i])
- return i;
- Sys_Error ("out of handles");
- return -1;
-}
-
-/*
-================
-Sys_FileLength
-================
-*/
-int Sys_FileLength (QFile *f)
-{
- int pos;
- int end;
-
- pos = Qtell (f);
- Qseek (f, 0, SEEK_END);
- end = Qtell (f);
- Qseek (f, pos, SEEK_SET);
-
- return end;
-}
-
-int Sys_FileOpenRead (char *path, int *hndl)
-{
- QFile *f;
- int i, retval;
-
- i = findhandle ();
-
- f = Qopen(path, "rbz");
-
- if (!f)
- {
- *hndl = -1;
- retval = -1;
- }
- else
- {
- sys_handles[i] = f;
- *hndl = i;
- retval = Sys_FileLength(f);
- }
-
- return retval;
-}
-
-int Sys_FileOpenWrite (char *path)
-{
- QFile *f;
- int i;
-
- i = findhandle ();
-
- f = Qopen(path, "wb");
- if (!f)
- {
- Con_Printf("Sys_FileOpenWrite: Error opening %s: %s", path, strerror(errno));
- return 0;
- }
- sys_handles[i] = f;
-
- return i;
-}
-
-void Sys_FileClose (int handle)
-{
- Qclose (sys_handles[handle]);
- sys_handles[handle] = NULL;
-}
-
-void Sys_FileSeek (int handle, int position)
-{
- Qseek (sys_handles[handle], position, SEEK_SET);
-}
-
-int Sys_FileRead (int handle, void *dest, int count)
-{
- return Qread (sys_handles[handle], dest, count);
-}
-
-int Sys_FileWrite (int handle, void *data, int count)
-{
- return Qwrite (sys_handles[handle], data, count);
-}
-
-int Sys_FileTime (char *path)
-{
- QFile *f;
-
- f = Qopen(path, "rb");
- if (f)
- {
- Qclose(f);
- return 1;
- }
-
- return -1;
-}
-
-void Sys_mkdir (char *path)
-{
- _mkdir (path);
-}
+#endif
/*
===============================================================================
*/
-void Sys_Error (char *error, ...)
+void Sys_Error (const char *error, ...)
{
va_list argptr;
- char text[1024], text2[1024];
- char *text3 = "Press Enter to exit\n";
- char *text4 = "***********************************\n";
- char *text5 = "\n";
- DWORD dummy;
- double starttime;
+ char text[MAX_INPUTLINE];
static int in_sys_error0 = 0;
static int in_sys_error1 = 0;
static int in_sys_error2 = 0;
static int in_sys_error3 = 0;
- if (!in_sys_error3)
- in_sys_error3 = 1;
-
va_start (argptr, error);
- vsprintf (text, error, argptr);
+ dpvsnprintf (text, sizeof (text), error, argptr);
va_end (argptr);
- if (cls.state == ca_dedicated)
- {
- va_start (argptr, error);
- vsprintf (text, error, argptr);
- va_end (argptr);
-
- sprintf (text2, "ERROR: %s\n", text);
- WriteFile (houtput, text5, strlen (text5), &dummy, NULL);
- WriteFile (houtput, text4, strlen (text4), &dummy, NULL);
- WriteFile (houtput, text2, strlen (text2), &dummy, NULL);
- WriteFile (houtput, text3, strlen (text3), &dummy, NULL);
- WriteFile (houtput, text4, strlen (text4), &dummy, NULL);
-
+ Con_Printf ("Quake Error: %s\n", text);
- starttime = Sys_DoubleTime ();
- sc_return_on_enter = true; // so Enter will get us out of here
-
- while (!Sys_ConsoleInput () && ((Sys_DoubleTime () - starttime) < CONSOLE_ERROR_TIMEOUT))
- {
- }
+ // close video so the message box is visible, unless we already tried that
+ if (!in_sys_error0 && cls.state != ca_dedicated)
+ {
+ in_sys_error0 = 1;
+ VID_Shutdown();
}
- else
+
+ if (!in_sys_error3 && cls.state != ca_dedicated)
{
- // switch to windowed so the message box is visible, unless we already
- // tried that and failed
- if (!in_sys_error0)
- {
- in_sys_error0 = 1;
- VID_SetDefaultMode ();
- MessageBox(NULL, text, "Quake Error", MB_OK | MB_SETFOREGROUND | MB_ICONSTOP);
- }
- else
- {
- MessageBox(NULL, text, "Double Quake Error", MB_OK | MB_SETFOREGROUND | MB_ICONSTOP);
- }
+ in_sys_error3 = true;
+ MessageBox(NULL, text, "Quake Error", MB_OK | MB_SETFOREGROUND | MB_ICONSTOP);
}
if (!in_sys_error1)
if (!in_sys_error2)
{
in_sys_error2 = 1;
- DeinitConProc ();
+ Sys_Shutdown ();
}
exit (1);
}
-void Sys_Quit (void)
+void Sys_Shutdown (void)
{
-
- Host_Shutdown();
-
+#ifdef QHOST
if (tevent)
CloseHandle (tevent);
+#endif
if (cls.state == ca_dedicated)
FreeConsole ();
+#ifdef QHOST
// shut down QHOST hooks if necessary
DeinitConProc ();
-
- exit (0);
+#endif
}
+void Sys_PrintToTerminal(const char *text)
+{
+ DWORD dummy;
+ extern HANDLE houtput;
+
+ if ((houtput != 0) && (houtput != INVALID_HANDLE_VALUE))
+ WriteFile(houtput, text, (DWORD) strlen(text), &dummy, NULL);
+}
/*
================
*/
double Sys_DoubleTime (void)
{
- // LordHavoc: note to people modifying this code, DWORD is specifically defined as an unsigned 32bit number, therefore the 65536.0 * 65536.0 is fine.
-#if WIN32_USETIMEGETTIME
- // timeGetTime
- // platform:
- // Windows 95/98/ME/NT/2000
- // features:
- // reasonable accuracy (millisecond)
- // issues:
- // none known
static int first = true;
- static double oldtime = 0.0, basetime = 0.0, old = 0.0;
- double newtime, now;
-
- now = (double) timeGetTime () + basetime;
-
- if (first)
+ static double oldtime = 0.0, curtime = 0.0;
+ double newtime;
+ // LordHavoc: note to people modifying this code, DWORD is specifically defined as an unsigned 32bit number, therefore the 65536.0 * 65536.0 is fine.
+ if (sys_usetimegettime.integer)
{
- first = false;
- basetime = now;
- now = 0;
- }
+ static int firsttimegettime = true;
+ // timeGetTime
+ // platform:
+ // Windows 95/98/ME/NT/2000/XP
+ // features:
+ // reasonable accuracy (millisecond)
+ // issues:
+ // wraps around every 47 days or so (but this is non-fatal to us, odd times are rejected, only causes a one frame stutter)
+
+ // make sure the timer is high precision, otherwise different versions of windows have varying accuracy
+ if (firsttimegettime)
+ {
+ timeBeginPeriod (1);
+ firsttimegettime = false;
+ }
- if (now < old)
- {
- // wrapped
- basetime += (65536.0 * 65536.0);
- now += (65536.0 * 65536.0);
+ newtime = (double) timeGetTime () / 1000.0;
}
- old = now;
-
- newtime = now / 1000.0;
-
- if (newtime < oldtime)
- Sys_Error("Sys_DoubleTime: time running backwards??\n");
-
- oldtime = newtime;
-
- return newtime;
-#else
- // QueryPerformanceCounter
- // platform:
- // Windows 95/98/ME/NT/2000
- // features:
- // very accurate (CPU cycles)
- // known issues:
- // does not necessarily match realtime too well (tends to get faster and faster in win98)
- static int first = true;
- static double oldtime = 0.0, basetime = 0.0, timescale = 0.0;
- double newtime;
- LARGE_INTEGER PerformanceFreq;
- LARGE_INTEGER PerformanceCount;
-
- if (first)
+ else
{
+ // QueryPerformanceCounter
+ // platform:
+ // Windows 95/98/ME/NT/2000/XP
+ // features:
+ // very accurate (CPU cycles)
+ // known issues:
+ // does not necessarily match realtime too well (tends to get faster and faster in win98)
+ // wraps around occasionally on some platforms (depends on CPU speed and probably other unknown factors)
+ double timescale;
+ LARGE_INTEGER PerformanceFreq;
+ LARGE_INTEGER PerformanceCount;
+
if (!QueryPerformanceFrequency (&PerformanceFreq))
- Sys_Error ("No hardware timer available");
+ {
+ Con_Printf ("No hardware timer available\n");
+ // fall back to timeGetTime
+ Cvar_SetValueQuick(&sys_usetimegettime, true);
+ return Sys_DoubleTime();
+ }
+ QueryPerformanceCounter (&PerformanceCount);
-#ifdef __BORLANDC__
+ #ifdef __BORLANDC__
timescale = 1.0 / ((double) PerformanceFreq.u.LowPart + (double) PerformanceFreq.u.HighPart * 65536.0 * 65536.0);
-#else
+ newtime = ((double) PerformanceCount.u.LowPart + (double) PerformanceCount.u.HighPart * 65536.0 * 65536.0) * timescale;
+ #else
timescale = 1.0 / ((double) PerformanceFreq.LowPart + (double) PerformanceFreq.HighPart * 65536.0 * 65536.0);
-#endif
+ newtime = ((double) PerformanceCount.LowPart + (double) PerformanceCount.HighPart * 65536.0 * 65536.0) * timescale;
+ #endif
}
- QueryPerformanceCounter (&PerformanceCount);
-
-#ifdef __BORLANDC__
- newtime = ((double) PerformanceCount.u.LowPart + (double) PerformanceCount.u.HighPart * 65536.0 * 65536.0) * timescale - basetime;
-#else
- newtime = ((double) PerformanceCount.LowPart + (double) PerformanceCount.HighPart * 65536.0 * 65536.0) * timescale - basetime;
-#endif
-
if (first)
{
first = false;
- basetime = newtime;
- newtime = 0;
+ oldtime = newtime;
}
if (newtime < oldtime)
- Sys_Error("Sys_DoubleTime: time running backwards??\n");
-
+ {
+ // warn if it's significant
+ if (newtime - oldtime < -0.01)
+ Con_Printf("Sys_DoubleTime: time stepped backwards (went from %f to %f, difference %f)\n", oldtime, newtime, newtime - oldtime);
+ }
+ else if (newtime > oldtime + 1800)
+ {
+ Con_Printf("Sys_DoubleTime: time stepped forward (went from %f to %f, difference %f)\n", oldtime, newtime, newtime - oldtime);
+ }
+ else
+ curtime += newtime - oldtime;
oldtime = newtime;
- return newtime;
-#endif
+ return curtime;
}
char *Sys_ConsoleInput (void)
{
- static char text[256];
+ static char text[MAX_INPUTLINE];
static int len;
INPUT_RECORD recs[1024];
int ch;
if (cls.state != ca_dedicated)
return NULL;
-
for ( ;; )
{
if (!GetNumberOfConsoleInputEvents (hinput, &numevents))
- Sys_Error ("Error getting # of console events");
+ {
+ cls.state = ca_disconnected;
+ Sys_Error ("Error getting # of console events (error code %x)", (unsigned int)GetLastError());
+ }
if (numevents <= 0)
break;
if (!ReadConsoleInput(hinput, recs, 1, &numread))
- Sys_Error ("Error reading console input");
+ {
+ cls.state = ca_disconnected;
+ Sys_Error ("Error reading console input (error code %x)", (unsigned int)GetLastError());
+ }
if (numread != 1)
- Sys_Error ("Couldn't read console input");
+ {
+ cls.state = ca_disconnected;
+ Sys_Error ("Couldn't read console input (error code %x)", (unsigned int)GetLastError());
+ }
if (recs[0].EventType == KEY_EVENT)
{
switch (ch)
{
case '\r':
- WriteFile(houtput, "\r\n", 2, &dummy, NULL);
+ WriteFile(houtput, "\r\n", 2, &dummy, NULL);
if (len)
{
len = 0;
return text;
}
- else if (sc_return_on_enter)
- {
- // special case to allow exiting from the error handler on Enter
- text[0] = '\r';
- len = 0;
- return text;
- }
break;
case '\b':
- WriteFile(houtput, "\b \b", 3, &dummy, NULL);
+ WriteFile(houtput, "\b \b", 3, &dummy, NULL);
if (len)
{
len--;
default:
if (ch >= ' ')
{
- WriteFile(houtput, &ch, 1, &dummy, NULL);
+ WriteFile(houtput, &ch, 1, &dummy, NULL);
text[len] = ch;
len = (len + 1) & 0xff;
}
return NULL;
}
-void Sys_Sleep (void)
+void Sys_Sleep(int microseconds)
{
- Sleep (1);
+ Sleep(microseconds / 1000);
}
-
-void Sys_SendKeyEvents (void)
-{
- MSG msg;
-
- while (PeekMessage (&msg, NULL, 0, 0, PM_NOREMOVE))
- {
- // we always update if there are any event, even if we're paused
- scr_skipupdate = 0;
-
- if (!GetMessage (&msg, NULL, 0, 0))
- Sys_Quit ();
-
- TranslateMessage (&msg);
- DispatchMessage (&msg);
- }
-}
-
-
-/*
-==============================================================================
-
- WINDOWS CRAP
-
-==============================================================================
-*/
-
-
-void SleepUntilInput (int time)
-{
- MsgWaitForMultipleObjects(1, &tevent, false, time, QS_ALLINPUT);
-}
-
-
-/*
-==================
-WinMain
-==================
-*/
-HINSTANCE global_hInstance;
-int global_nCmdShow;
-char *argv[MAX_NUM_ARGVS];
-static char *empty_string = "";
-
-int WINAPI WinMain (HINSTANCE hInstance, HINSTANCE hPrevInstance, LPSTR lpCmdLine, int nCmdShow)
+char *Sys_GetClipboardData (void)
{
- double oldtime, newtime;
- MEMORYSTATUS lpBuffer;
- static char cwd[1024];
- int t;
-
- /* previous instances do not exist in Win32 */
- if (hPrevInstance)
- return 0;
-
- global_hInstance = hInstance;
- global_nCmdShow = nCmdShow;
-
- lpBuffer.dwLength = sizeof(MEMORYSTATUS);
- GlobalMemoryStatus (&lpBuffer);
-
- if (!GetCurrentDirectory (sizeof(cwd), cwd))
- Sys_Error ("Couldn't determine current directory");
-
- if (cwd[strlen(cwd)-1] == '/')
- cwd[strlen(cwd)-1] = 0;
+ char *data = NULL;
+ char *cliptext;
- memset(&host_parms, 0, sizeof(host_parms));
-
- host_parms.basedir = cwd;
-
- host_parms.argc = 1;
- argv[0] = empty_string;
-
- while (*lpCmdLine && (host_parms.argc < MAX_NUM_ARGVS))
+ if (OpenClipboard (NULL) != 0)
{
- while (*lpCmdLine && ((*lpCmdLine <= 32) || (*lpCmdLine > 126)))
- lpCmdLine++;
+ HANDLE hClipboardData;
- if (*lpCmdLine)
+ if ((hClipboardData = GetClipboardData (CF_TEXT)) != 0)
{
- argv[host_parms.argc] = lpCmdLine;
- host_parms.argc++;
-
- while (*lpCmdLine && ((*lpCmdLine > 32) && (*lpCmdLine <= 126)))
- lpCmdLine++;
-
- if (*lpCmdLine)
+ if ((cliptext = GlobalLock (hClipboardData)) != 0)
{
- *lpCmdLine = 0;
- lpCmdLine++;
+ size_t allocsize;
+ allocsize = GlobalSize (hClipboardData) + 1;
+ data = Z_Malloc (allocsize);
+ strlcpy (data, cliptext, allocsize);
+ GlobalUnlock (hClipboardData);
}
-
}
+ CloseClipboard ();
}
+ return data;
+}
- host_parms.argv = argv;
-
- COM_InitArgv (host_parms.argc, host_parms.argv);
-
- host_parms.argc = com_argc;
- host_parms.argv = com_argv;
-
- Sys_Shared_EarlyInit();
+void Sys_InitConsole (void)
+{
+#ifdef QHOST
+ int t;
+ // initialize the windows dedicated server console if needed
tevent = CreateEvent(NULL, false, false, NULL);
if (!tevent)
Sys_Error ("Couldn't create event");
+#endif
+
+ houtput = GetStdHandle (STD_OUTPUT_HANDLE);
+ hinput = GetStdHandle (STD_INPUT_HANDLE);
// LordHavoc: can't check cls.state because it hasn't been initialized yet
// if (cls.state == ca_dedicated)
if (COM_CheckParm("-dedicated"))
{
- if (!AllocConsole ())
+ //if ((houtput == 0) || (houtput == INVALID_HANDLE_VALUE)) // LordHavoc: on Windows XP this is never 0 or invalid, but hinput is invalid
+ {
+ if (!AllocConsole ())
+ Sys_Error ("Couldn't create dedicated server console (error code %x)", (unsigned int)GetLastError());
+ houtput = GetStdHandle (STD_OUTPUT_HANDLE);
+ hinput = GetStdHandle (STD_INPUT_HANDLE);
+ }
+ if ((houtput == 0) || (houtput == INVALID_HANDLE_VALUE))
Sys_Error ("Couldn't create dedicated server console");
- hinput = GetStdHandle (STD_INPUT_HANDLE);
- houtput = GetStdHandle (STD_OUTPUT_HANDLE);
+#ifdef QHOST
+#ifdef _WIN64
+#define atoi _atoi64
+#endif
// give QHOST a chance to hook into the console
if ((t = COM_CheckParm ("-HFILE")) > 0)
{
}
InitConProc (hFile, heventParent, heventChild);
+#endif
}
// because sound is off until we become active
S_BlockSound ();
+}
-#if WIN32_USETIMEGETTIME
- // make sure the timer is high precision, otherwise NT gets 18ms resolution
- // LordHavoc:
- // Windows 2000 Advanced Server (and possibly other versions)
- // apparently have a broken timer, because it runs at more like 10x speed
- // if this isn't used, heh
- timeBeginPeriod (1);
-#endif
+void Sys_Init_Commands (void)
+{
+ Cvar_RegisterVariable(&sys_usetimegettime);
+}
+
+/*
+==============================================================================
+
+WINDOWS CRAP
+
+==============================================================================
+*/
+
+
+/*
+==================
+WinMain
+==================
+*/
+HINSTANCE global_hInstance;
+const char *argv[MAX_NUM_ARGVS];
+char program_name[MAX_OSPATH];
+
+int WINAPI WinMain (HINSTANCE hInstance, HINSTANCE hPrevInstance, LPSTR lpCmdLine, int nCmdShow)
+{
+ MEMORYSTATUS lpBuffer;
+
+ /* previous instances do not exist in Win32 */
+ if (hPrevInstance)
+ return 0;
+
+ global_hInstance = hInstance;
- Host_Init ();
+ lpBuffer.dwLength = sizeof(MEMORYSTATUS);
+ GlobalMemoryStatus (&lpBuffer);
- Sys_Shared_LateInit();
+ program_name[sizeof(program_name)-1] = 0;
+ GetModuleFileNameA(NULL, program_name, sizeof(program_name) - 1);
- oldtime = Sys_DoubleTime ();
+ com_argc = 1;
+ com_argv = argv;
+ argv[0] = program_name;
- /* main window message loop */
- while (1)
+ // FIXME: this tokenizer is rather redundent, call a more general one
+ while (*lpCmdLine && (com_argc < MAX_NUM_ARGVS))
{
- if (cls.state != ca_dedicated)
+ while (*lpCmdLine && *lpCmdLine <= ' ')
+ lpCmdLine++;
+
+ if (!*lpCmdLine)
+ break;
+
+ if (*lpCmdLine == '\"')
{
- // yield the CPU for a little while when paused, minimized, or not the focus
- if ((cl.paused && !ActiveApp) || Minimized)
- {
- SleepUntilInput (PAUSE_SLEEP);
- scr_skipupdate = 1; // no point in bothering to draw
- }
- else if (!ActiveApp)
- SleepUntilInput (NOT_FOCUS_SLEEP);
+ // quoted string
+ lpCmdLine++;
+ argv[com_argc] = lpCmdLine;
+ com_argc++;
+ while (*lpCmdLine && (*lpCmdLine != '\"'))
+ lpCmdLine++;
+ }
+ else
+ {
+ // unquoted word
+ argv[com_argc] = lpCmdLine;
+ com_argc++;
+ while (*lpCmdLine && *lpCmdLine > ' ')
+ lpCmdLine++;
}
- newtime = Sys_DoubleTime ();
- Host_Frame (newtime - oldtime);
- oldtime = newtime;
+ if (*lpCmdLine)
+ {
+ *lpCmdLine = 0;
+ lpCmdLine++;
+ }
}
- /* return success of application */
- return true;
+ Host_Main();
+
+ /* return success of application */
+ return true;
}
+int main (int argc, const char* argv[])
+{
+ MEMORYSTATUS lpBuffer;
+
+ global_hInstance = GetModuleHandle (0);
+
+ lpBuffer.dwLength = sizeof(MEMORYSTATUS);
+ GlobalMemoryStatus (&lpBuffer);
+
+ program_name[sizeof(program_name)-1] = 0;
+ GetModuleFileNameA(NULL, program_name, sizeof(program_name) - 1);
+
+ com_argc = argc;
+ com_argv = argv;
+
+ Host_Main();
+
+ return true;
+}