1241 lines
28 KiB
C++
1241 lines
28 KiB
C++
// win_main.h
|
|
|
|
// leave this as first line for PCH reasons...
|
|
//
|
|
#include "../server/exe_headers.h"
|
|
|
|
|
|
|
|
#include "../client/client.h"
|
|
#include "win_local.h"
|
|
#include "resource.h"
|
|
#include <errno.h>
|
|
#include <float.h>
|
|
#include <fcntl.h>
|
|
#include <stdio.h>
|
|
#include <direct.h>
|
|
#include <io.h>
|
|
#include <conio.h>
|
|
#include <crtdbg.h>
|
|
|
|
// The following macros set and clear, respectively, given bits
|
|
// of the C runtime library debug flag, as specified by a bitmask.
|
|
|
|
#ifdef _DEBUG
|
|
#define SET_CRT_DEBUG_FIELD(a) \
|
|
_CrtSetDbgFlag((a) | _CrtSetDbgFlag(_CRTDBG_REPORT_FLAG))
|
|
#define CLEAR_CRT_DEBUG_FIELD(a) \
|
|
_CrtSetDbgFlag(~(a) & _CrtSetDbgFlag(_CRTDBG_REPORT_FLAG))
|
|
#else
|
|
#define SET_CRT_DEBUG_FIELD(a) ((void) 0)
|
|
#define CLEAR_CRT_DEBUG_FIELD(a) ((void) 0)
|
|
#endif
|
|
|
|
#define CD_BASEDIR "gamedata\\gamedata"
|
|
#define CD_EXE "jasp.exe"
|
|
#define CD_VOLUME "JEDIACAD"
|
|
|
|
#define MEM_THRESHOLD 128*1024*1024
|
|
|
|
static char sys_cmdline[MAX_STRING_CHARS];
|
|
|
|
|
|
/*
|
|
==================
|
|
Sys_GetFileTime()
|
|
==================
|
|
*/
|
|
bool Sys_GetFileTime(LPCSTR psFileName, FILETIME &ft)
|
|
{
|
|
bool bSuccess = false;
|
|
HANDLE hFile = INVALID_HANDLE_VALUE;
|
|
|
|
hFile = CreateFile( psFileName, // LPCTSTR lpFileName, // pointer to name of the file
|
|
GENERIC_READ, // DWORD dwDesiredAccess, // access (read-write) mode
|
|
FILE_SHARE_READ, // DWORD dwShareMode, // share mode
|
|
NULL, // LPSECURITY_ATTRIBUTES lpSecurityAttributes, // pointer to security attributes
|
|
OPEN_EXISTING, // DWORD dwCreationDisposition, // how to create
|
|
FILE_FLAG_NO_BUFFERING,// DWORD dwFlagsAndAttributes, // file attributes
|
|
NULL // HANDLE hTemplateFile // handle to file with attributes to
|
|
);
|
|
|
|
if (hFile != INVALID_HANDLE_VALUE)
|
|
{
|
|
if (GetFileTime(hFile, // handle to file
|
|
NULL, // LPFILETIME lpCreationTime
|
|
NULL, // LPFILETIME lpLastAccessTime
|
|
&ft // LPFILETIME lpLastWriteTime
|
|
)
|
|
)
|
|
{
|
|
bSuccess = true;
|
|
}
|
|
|
|
CloseHandle(hFile);
|
|
}
|
|
|
|
return bSuccess;
|
|
}
|
|
|
|
|
|
/*
|
|
==================
|
|
Sys_FileOutOfDate()
|
|
==================
|
|
*/
|
|
qboolean Sys_FileOutOfDate( LPCSTR psFinalFileName /* dest */, LPCSTR psDataFileName /* src */ )
|
|
{
|
|
FILETIME ftFinalFile, ftDataFile;
|
|
|
|
if (Sys_GetFileTime(psFinalFileName, ftFinalFile) && Sys_GetFileTime(psDataFileName, ftDataFile))
|
|
{
|
|
// timer res only accurate to within 2 seconds on FAT, so can't do exact compare...
|
|
//
|
|
//LONG l = CompareFileTime( &ftFinalFile, &ftDataFile );
|
|
if ( (abs(ftFinalFile.dwLowDateTime - ftDataFile.dwLowDateTime) <= 20000000 ) &&
|
|
ftFinalFile.dwHighDateTime == ftDataFile.dwHighDateTime
|
|
)
|
|
{
|
|
return false; // file not out of date, ie use it.
|
|
}
|
|
return true; // flag return code to copy over a replacement version of this file
|
|
}
|
|
|
|
|
|
// extra error check, report as suspicious if you find a file locally but not out on the net.,.
|
|
//
|
|
if (com_developer->integer)
|
|
{
|
|
if (!Sys_GetFileTime(psDataFileName, ftDataFile))
|
|
{
|
|
Com_Printf( "Sys_FileOutOfDate: reading %s but it's not on the net!\n", psFinalFileName);
|
|
}
|
|
}
|
|
|
|
return false;
|
|
}
|
|
|
|
/*
|
|
==================
|
|
Sys_LowPhysicalMemory()
|
|
==================
|
|
*/
|
|
qboolean Sys_CopyFile(LPCSTR lpExistingFileName, LPCSTR lpNewFileName, qboolean bOverWrite)
|
|
{
|
|
qboolean bOk = qtrue;
|
|
if (!CopyFile( lpExistingFileName, lpNewFileName, !bOverWrite ) && bOverWrite)
|
|
{
|
|
DWORD dwAttrs = GetFileAttributes(lpNewFileName);
|
|
SetFileAttributes(lpNewFileName, dwAttrs & ~FILE_ATTRIBUTE_READONLY);
|
|
bOk = CopyFile( lpExistingFileName, lpNewFileName, FALSE );
|
|
}
|
|
return bOk;
|
|
}
|
|
|
|
/*
|
|
==================
|
|
Sys_LowPhysicalMemory()
|
|
==================
|
|
*/
|
|
qboolean Sys_LowPhysicalMemory()
|
|
{
|
|
static MEMORYSTATUS stat;
|
|
static qboolean bAsked = qfalse;
|
|
static cvar_t* sys_lowmem = Cvar_Get( "sys_lowmem", "0", 0 );
|
|
|
|
if (!bAsked) // just in case it takes a little time for GlobalMemoryStatus() to gather stats on
|
|
{ // stuff we don't care about such as virtual mem etc.
|
|
bAsked = qtrue;
|
|
GlobalMemoryStatus (&stat);
|
|
}
|
|
if (sys_lowmem->integer)
|
|
{
|
|
return qtrue;
|
|
}
|
|
return (stat.dwTotalPhys <= MEM_THRESHOLD) ? qtrue : qfalse;
|
|
}
|
|
|
|
|
|
/*
|
|
==================
|
|
Sys_BeginProfiling
|
|
==================
|
|
*/
|
|
void Sys_BeginProfiling( void ) {
|
|
// this is just used on the mac build
|
|
}
|
|
|
|
/*
|
|
=============
|
|
Sys_Error
|
|
|
|
Show the early console as an error dialog
|
|
=============
|
|
*/
|
|
void QDECL Sys_Error( const char *error, ... ) {
|
|
va_list argptr;
|
|
char text[4096];
|
|
MSG msg;
|
|
|
|
va_start (argptr, error);
|
|
vsprintf (text, error, argptr);
|
|
va_end (argptr);
|
|
|
|
Conbuf_AppendText( text );
|
|
Conbuf_AppendText( "\n" );
|
|
|
|
Sys_SetErrorText( text );
|
|
Sys_ShowConsole( 1, qtrue );
|
|
|
|
timeEndPeriod( 1 );
|
|
|
|
IN_Shutdown();
|
|
|
|
// wait for the user to quit
|
|
while ( 1 ) {
|
|
if (!GetMessage (&msg, NULL, 0, 0))
|
|
Com_Quit_f ();
|
|
TranslateMessage (&msg);
|
|
DispatchMessage (&msg);
|
|
}
|
|
|
|
Sys_DestroyConsole();
|
|
Com_ShutdownZoneMemory();
|
|
Com_ShutdownHunkMemory();
|
|
|
|
exit (1);
|
|
}
|
|
|
|
/*
|
|
==============
|
|
Sys_Quit
|
|
==============
|
|
*/
|
|
void Sys_Quit( void ) {
|
|
timeEndPeriod( 1 );
|
|
IN_Shutdown();
|
|
Sys_DestroyConsole();
|
|
Com_ShutdownZoneMemory();
|
|
Com_ShutdownHunkMemory();
|
|
|
|
exit (0);
|
|
}
|
|
|
|
/*
|
|
==============
|
|
Sys_Print
|
|
==============
|
|
*/
|
|
void Sys_Print( const char *msg ) {
|
|
Conbuf_AppendText( msg );
|
|
}
|
|
|
|
|
|
/*
|
|
==============
|
|
Sys_Mkdir
|
|
==============
|
|
*/
|
|
void Sys_Mkdir( const char *path ) {
|
|
_mkdir (path);
|
|
}
|
|
|
|
/*
|
|
==============
|
|
Sys_Cwd
|
|
==============
|
|
*/
|
|
char *Sys_Cwd( void ) {
|
|
static char cwd[MAX_OSPATH];
|
|
|
|
_getcwd( cwd, sizeof( cwd ) - 1 );
|
|
cwd[MAX_OSPATH-1] = 0;
|
|
|
|
return cwd;
|
|
}
|
|
|
|
/*
|
|
==============
|
|
Sys_DefaultCDPath
|
|
==============
|
|
*/
|
|
char *Sys_DefaultCDPath( void ) {
|
|
return "";
|
|
}
|
|
|
|
/*
|
|
==============
|
|
Sys_DefaultBasePath
|
|
==============
|
|
*/
|
|
char *Sys_DefaultBasePath( void ) {
|
|
return Sys_Cwd();
|
|
}
|
|
|
|
/*
|
|
==============================================================
|
|
|
|
DIRECTORY SCANNING
|
|
|
|
==============================================================
|
|
*/
|
|
|
|
#define MAX_FOUND_FILES 0x1000
|
|
|
|
char **Sys_ListFiles( const char *directory, const char *extension, int *numfiles, qboolean wantsubs ) {
|
|
char search[MAX_OSPATH];
|
|
int nfiles;
|
|
char **listCopy;
|
|
char *list[MAX_FOUND_FILES];
|
|
struct _finddata_t findinfo;
|
|
int findhandle;
|
|
int flag;
|
|
int i;
|
|
|
|
if ( !extension) {
|
|
extension = "";
|
|
}
|
|
|
|
// passing a slash as extension will find directories
|
|
if ( extension[0] == '/' && extension[1] == 0 ) {
|
|
extension = "";
|
|
flag = 0;
|
|
} else {
|
|
flag = _A_SUBDIR;
|
|
}
|
|
|
|
Com_sprintf( search, sizeof(search), "%s\\*%s", directory, extension );
|
|
|
|
// search
|
|
nfiles = 0;
|
|
|
|
findhandle = _findfirst (search, &findinfo);
|
|
if (findhandle == -1) {
|
|
*numfiles = 0;
|
|
return NULL;
|
|
}
|
|
|
|
do {
|
|
if ( (!wantsubs && flag ^ ( findinfo.attrib & _A_SUBDIR )) || (wantsubs && findinfo.attrib & _A_SUBDIR) ) {
|
|
if ( nfiles == MAX_FOUND_FILES - 1 ) {
|
|
break;
|
|
}
|
|
list[ nfiles ] = CopyString( findinfo.name );
|
|
nfiles++;
|
|
}
|
|
} while ( _findnext (findhandle, &findinfo) != -1 );
|
|
|
|
list[ nfiles ] = 0;
|
|
|
|
_findclose (findhandle);
|
|
|
|
// return a copy of the list
|
|
*numfiles = nfiles;
|
|
|
|
if ( !nfiles ) {
|
|
return NULL;
|
|
}
|
|
|
|
listCopy = (char **) Z_Malloc( ( nfiles + 1 ) * sizeof( *listCopy ), TAG_LISTFILES, qfalse);
|
|
for ( i = 0 ; i < nfiles ; i++ ) {
|
|
listCopy[i] = list[i];
|
|
}
|
|
listCopy[i] = NULL;
|
|
|
|
return listCopy;
|
|
}
|
|
|
|
void Sys_FreeFileList( char **filelist ) {
|
|
int i;
|
|
|
|
if ( !filelist ) {
|
|
return;
|
|
}
|
|
|
|
for ( i = 0 ; filelist[i] ; i++ ) {
|
|
Z_Free( filelist[i] );
|
|
}
|
|
|
|
Z_Free( filelist );
|
|
}
|
|
|
|
//========================================================
|
|
|
|
|
|
/*
|
|
================
|
|
Sys_ScanForCD
|
|
|
|
Search all the drives to see if there is a valid CD to grab
|
|
the cddir from
|
|
================
|
|
*/
|
|
#ifdef FINAL_BUILD
|
|
static qboolean Sys_ScanForCD( void ) {
|
|
char drive[4];
|
|
FILE *f;
|
|
char test[MAX_OSPATH];
|
|
|
|
drive[0] = 'c';
|
|
drive[1] = ':';
|
|
drive[2] = '\\';
|
|
drive[3] = 0;
|
|
|
|
// scan the drives
|
|
for ( drive[0] = 'c' ; drive[0] <= 'z' ; drive[0]++ ) {
|
|
if ( GetDriveType (drive) == DRIVE_CDROM ) {
|
|
BOOL Result;
|
|
char VolumeName[MAX_PATH],FileSystemName[MAX_PATH];
|
|
DWORD VolumeSerialNumber,MaximumComponentLength,FileSystemFlags;
|
|
|
|
Result = GetVolumeInformation(drive,VolumeName,sizeof(VolumeName),&VolumeSerialNumber,
|
|
&MaximumComponentLength,&FileSystemFlags,FileSystemName,sizeof(FileSystemName));
|
|
|
|
if (Result && (strnicmp(VolumeName,CD_VOLUME,8) == 0 ) )
|
|
{
|
|
sprintf (test, "%s%s\\%s", drive, CD_BASEDIR, CD_EXE);
|
|
f = fopen( test, "r");
|
|
if ( f ) {
|
|
fclose (f);
|
|
return Result;
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
return qfalse;
|
|
}
|
|
#endif
|
|
/*
|
|
================
|
|
Sys_CheckCD
|
|
|
|
Return true if the proper CD is in the drive
|
|
================
|
|
*/
|
|
qboolean Sys_CheckCD( void ) {
|
|
#ifdef FINAL_BUILD
|
|
return Sys_ScanForCD();
|
|
#else
|
|
return qtrue;
|
|
#endif
|
|
}
|
|
|
|
/*
|
|
================
|
|
Sys_GetClipboardData
|
|
|
|
================
|
|
*/
|
|
char *Sys_GetClipboardData( void ) {
|
|
char *data = NULL;
|
|
char *cliptext;
|
|
|
|
if ( OpenClipboard( NULL ) != 0 ) {
|
|
HANDLE hClipboardData;
|
|
|
|
if ( ( hClipboardData = GetClipboardData( CF_TEXT ) ) != 0 ) {
|
|
if ( ( cliptext = (char *) GlobalLock( hClipboardData ) ) != 0 ) {
|
|
data = (char *) Z_Malloc( GlobalSize( hClipboardData ) + 1, TAG_CLIPBOARD, qfalse);
|
|
strcpy( data, cliptext );
|
|
GlobalUnlock( hClipboardData );
|
|
|
|
strtok( data, "\n\r\b" );
|
|
}
|
|
}
|
|
CloseClipboard();
|
|
}
|
|
return data;
|
|
}
|
|
|
|
|
|
/*
|
|
========================================================================
|
|
|
|
GAME DLL
|
|
|
|
========================================================================
|
|
*/
|
|
static HINSTANCE game_library;
|
|
|
|
/*
|
|
=================
|
|
Sys_UnloadGame
|
|
=================
|
|
*/
|
|
void Sys_UnloadGame( void ) {
|
|
if ( !game_library ) {
|
|
return;
|
|
}
|
|
if ( !FreeLibrary (game_library) ) {
|
|
Com_Error (ERR_FATAL, "FreeLibrary failed for game library");
|
|
}
|
|
game_library = NULL;
|
|
}
|
|
|
|
/*
|
|
=================
|
|
Sys_GetGameAPI
|
|
|
|
Loads the game dll
|
|
=================
|
|
*/
|
|
void *Sys_GetGameAPI (void *parms)
|
|
{
|
|
void *(*GetGameAPI) (void *);
|
|
char name[MAX_OSPATH];
|
|
char cwd[MAX_OSPATH];
|
|
#if defined _M_IX86
|
|
const char *gamename = "jagamex86.dll";
|
|
|
|
#ifdef NDEBUG
|
|
const char *debugdir = "release";
|
|
#elif MEM_DEBUG
|
|
const char *debugdir = "shdebug";
|
|
#else
|
|
const char *debugdir = "debug";
|
|
#endif //NDEBUG
|
|
|
|
#elif defined _M_ALPHA
|
|
const char *gamename = "jagameaxp.dll";
|
|
|
|
#ifdef NDEBUG
|
|
const char *debugdir = "releaseaxp";
|
|
#else
|
|
const char *debugdir = "debugaxp";
|
|
#endif //NDEBUG
|
|
|
|
#endif //_M__IX86
|
|
|
|
if (game_library)
|
|
Com_Error (ERR_FATAL, "Sys_GetGameAPI without Sys_UnloadingGame");
|
|
|
|
// check the current debug directory first for development purposes
|
|
_getcwd (cwd, sizeof(cwd));
|
|
Com_sprintf (name, sizeof(name), "%s/%s/%s", cwd, debugdir, gamename);
|
|
game_library = LoadLibrary ( name );
|
|
if (game_library)
|
|
{
|
|
Com_DPrintf ("LoadLibrary (%s)\n", name);
|
|
}
|
|
else
|
|
{
|
|
// check the current directory for other development purposes
|
|
Com_sprintf (name, sizeof(name), "%s/%s", cwd, gamename);
|
|
game_library = LoadLibrary ( name );
|
|
if (game_library)
|
|
{
|
|
Com_DPrintf ("LoadLibrary (%s)\n", name);
|
|
} else {
|
|
char *buf;
|
|
|
|
FormatMessage( FORMAT_MESSAGE_ALLOCATE_BUFFER | FORMAT_MESSAGE_FROM_SYSTEM, NULL, GetLastError(), MAKELANGID(LANG_NEUTRAL, SUBLANG_DEFAULT), (LPTSTR) &buf, 0, NULL );
|
|
|
|
Com_Printf( "LoadLibrary(\"%s\") failed\n", name);
|
|
Com_Printf( "...reason: '%s'\n", buf );
|
|
Com_Error( ERR_FATAL, "Couldn't load game" );
|
|
}
|
|
}
|
|
|
|
GetGameAPI = (void *(*)(void *))GetProcAddress (game_library, "GetGameAPI");
|
|
if (!GetGameAPI)
|
|
{
|
|
Sys_UnloadGame ();
|
|
return NULL;
|
|
}
|
|
return GetGameAPI (parms);
|
|
}
|
|
|
|
|
|
/*
|
|
=================
|
|
Sys_LoadCgame
|
|
|
|
Used to hook up a development dll
|
|
=================
|
|
*/
|
|
void * Sys_LoadCgame( int (**entryPoint)(int, ...), int (*systemcalls)(int, ...) )
|
|
{
|
|
void (*dllEntry)( int (*syscallptr)(int, ...) );
|
|
|
|
dllEntry = ( void (*)( int (*)( int, ... ) ) )GetProcAddress( game_library, "dllEntry" );
|
|
*entryPoint = (int (*)(int,...))GetProcAddress( game_library, "vmMain" );
|
|
if ( !*entryPoint || !dllEntry ) {
|
|
FreeLibrary( game_library );
|
|
return NULL;
|
|
}
|
|
|
|
dllEntry( systemcalls );
|
|
return game_library;
|
|
}
|
|
|
|
/*
|
|
========================================================================
|
|
|
|
BACKGROUND FILE STREAMING
|
|
|
|
========================================================================
|
|
*/
|
|
|
|
#if 1
|
|
|
|
void Sys_InitStreamThread( void ) {
|
|
}
|
|
|
|
void Sys_ShutdownStreamThread( void ) {
|
|
}
|
|
|
|
void Sys_BeginStreamedFile( fileHandle_t f, int readAhead ) {
|
|
}
|
|
|
|
void Sys_EndStreamedFile( fileHandle_t f ) {
|
|
}
|
|
|
|
int Sys_StreamedRead( void *buffer, int size, int count, fileHandle_t f ) {
|
|
return FS_Read( buffer, size * count, f );
|
|
}
|
|
|
|
void Sys_StreamSeek( fileHandle_t f, int offset, int origin ) {
|
|
FS_Seek( f, offset, origin );
|
|
}
|
|
|
|
|
|
#else
|
|
|
|
typedef struct {
|
|
HANDLE threadHandle;
|
|
int threadId;
|
|
CRITICAL_SECTION crit;
|
|
fileHandle_t file;
|
|
byte *buffer;
|
|
qboolean eof;
|
|
int bufferSize;
|
|
int streamPosition; // next byte to be returned by Sys_StreamRead
|
|
int threadPosition; // next byte to be read from file
|
|
} streamState_t;
|
|
|
|
streamState_t stream;
|
|
|
|
/*
|
|
===============
|
|
Sys_StreamThread
|
|
|
|
A thread will be sitting in this loop forever
|
|
================
|
|
*/
|
|
void Sys_StreamThread( void ) {
|
|
int buffer;
|
|
int count;
|
|
int readCount;
|
|
int bufferPoint;
|
|
int r;
|
|
|
|
while (1) {
|
|
Sleep( 10 );
|
|
EnterCriticalSection (&stream.crit);
|
|
|
|
// if there is any space left in the buffer, fill it up
|
|
while ( !stream.eof ) {
|
|
count = stream.bufferSize - (stream.threadPosition - stream.streamPosition);
|
|
if ( !count ) {
|
|
break;
|
|
}
|
|
|
|
bufferPoint = stream.threadPosition % stream.bufferSize;
|
|
buffer = stream.bufferSize - bufferPoint;
|
|
readCount = buffer < count ? buffer : count;
|
|
|
|
r = FS_Read( stream.buffer + bufferPoint, readCount, stream.file );
|
|
stream.threadPosition += r;
|
|
|
|
if ( r != readCount ) {
|
|
stream.eof = qtrue;
|
|
break;
|
|
}
|
|
}
|
|
|
|
LeaveCriticalSection (&stream.crit);
|
|
}
|
|
}
|
|
|
|
/*
|
|
===============
|
|
Sys_InitStreamThread
|
|
|
|
================
|
|
*/
|
|
void Sys_InitStreamThread( void ) {
|
|
|
|
InitializeCriticalSection ( &stream.crit );
|
|
|
|
// don't leave the critical section until there is a
|
|
// valid file to stream, which will cause the StreamThread
|
|
// to sleep without any overhead
|
|
EnterCriticalSection( &stream.crit );
|
|
|
|
stream.threadHandle = CreateThread(
|
|
NULL, // LPSECURITY_ATTRIBUTES lpsa,
|
|
0, // DWORD cbStack,
|
|
(LPTHREAD_START_ROUTINE)Sys_StreamThread, // LPTHREAD_START_ROUTINE lpStartAddr,
|
|
0, // LPVOID lpvThreadParm,
|
|
0, // DWORD fdwCreate,
|
|
(unsigned long *) &stream.threadId);
|
|
}
|
|
|
|
/*
|
|
===============
|
|
Sys_ShutdownStreamThread
|
|
|
|
================
|
|
*/
|
|
void Sys_ShutdownStreamThread( void ) {
|
|
}
|
|
|
|
|
|
/*
|
|
===============
|
|
Sys_BeginStreamedFile
|
|
|
|
================
|
|
*/
|
|
void Sys_BeginStreamedFile( fileHandle_t f, int readAhead ) {
|
|
if ( stream.file ) {
|
|
Sys_EndStreamedFile( stream.file );
|
|
}
|
|
|
|
stream.file = f;
|
|
stream.buffer = (unsigned char *) Z_Malloc( readAhead );
|
|
stream.bufferSize = readAhead;
|
|
stream.streamPosition = 0;
|
|
stream.threadPosition = 0;
|
|
stream.eof = qfalse;
|
|
|
|
// let the thread start running
|
|
LeaveCriticalSection( &stream.crit );
|
|
}
|
|
|
|
/*
|
|
===============
|
|
Sys_EndStreamedFile
|
|
|
|
================
|
|
*/
|
|
void Sys_EndStreamedFile( fileHandle_t f ) {
|
|
if ( f != stream.file ) {
|
|
Com_Error( ERR_FATAL, "Sys_EndStreamedFile: wrong file");
|
|
}
|
|
// don't leave critical section until another stream is started
|
|
EnterCriticalSection( &stream.crit );
|
|
|
|
stream.file = 0;
|
|
Z_Free( stream.buffer );
|
|
|
|
}
|
|
|
|
|
|
/*
|
|
===============
|
|
Sys_StreamedRead
|
|
|
|
================
|
|
*/
|
|
int Sys_StreamedRead( void *buffer, int size, int count, fileHandle_t f ) {
|
|
int available;
|
|
int remaining;
|
|
int sleepCount;
|
|
int copy;
|
|
int bufferCount;
|
|
int bufferPoint;
|
|
byte *dest;
|
|
|
|
dest = (byte *)buffer;
|
|
remaining = size * count;
|
|
|
|
if ( remaining <= 0 ) {
|
|
Com_Error( ERR_FATAL, "Streamed read with non-positive size" );
|
|
}
|
|
|
|
sleepCount = 0;
|
|
while ( remaining > 0 ) {
|
|
available = stream.threadPosition - stream.streamPosition;
|
|
if ( !available ) {
|
|
if ( stream.eof ) {
|
|
break;
|
|
}
|
|
if ( sleepCount == 1 ) {
|
|
Com_DPrintf( "Sys_StreamedRead: waiting\n" );
|
|
}
|
|
if ( ++sleepCount > 100 ) {
|
|
Com_Error( ERR_FATAL, "Sys_StreamedRead: thread has died");
|
|
}
|
|
Sleep( 10 );
|
|
continue;
|
|
}
|
|
|
|
bufferPoint = stream.streamPosition % stream.bufferSize;
|
|
bufferCount = stream.bufferSize - bufferPoint;
|
|
|
|
copy = available < bufferCount ? available : bufferCount;
|
|
if ( copy > remaining ) {
|
|
copy = remaining;
|
|
}
|
|
memcpy( dest, stream.buffer + bufferPoint, copy );
|
|
stream.streamPosition += copy;
|
|
dest += copy;
|
|
remaining -= copy;
|
|
}
|
|
|
|
return (count * size - remaining) / size;
|
|
}
|
|
|
|
/*
|
|
===============
|
|
Sys_StreamSeek
|
|
|
|
================
|
|
*/
|
|
void Sys_StreamSeek( fileHandle_t f, int offset, int origin ) {
|
|
|
|
// halt the thread
|
|
EnterCriticalSection( &stream.crit );
|
|
|
|
// clear to that point
|
|
FS_Seek( f, offset, origin );
|
|
stream.streamPosition = 0;
|
|
stream.threadPosition = 0;
|
|
stream.eof = qfalse;
|
|
|
|
// let the thread start running at the new position
|
|
LeaveCriticalSection( &stream.crit );
|
|
}
|
|
|
|
#endif
|
|
|
|
|
|
/*
|
|
========================================================================
|
|
|
|
EVENT LOOP
|
|
|
|
========================================================================
|
|
*/
|
|
|
|
#define MAX_QUED_EVENTS 256
|
|
#define MASK_QUED_EVENTS ( MAX_QUED_EVENTS - 1 )
|
|
|
|
sysEvent_t eventQue[MAX_QUED_EVENTS];
|
|
int eventHead, eventTail;
|
|
byte sys_packetReceived[MAX_MSGLEN];
|
|
|
|
/*
|
|
================
|
|
Sys_QueEvent
|
|
|
|
A time of 0 will get the current time
|
|
Ptr should either be null, or point to a block of data that can
|
|
be freed by the game later.
|
|
================
|
|
*/
|
|
void Sys_QueEvent( int time, sysEventType_t type, int value, int value2, int ptrLength, void *ptr ) {
|
|
sysEvent_t *ev;
|
|
|
|
ev = &eventQue[ eventHead & MASK_QUED_EVENTS ];
|
|
if ( eventHead - eventTail >= MAX_QUED_EVENTS ) {
|
|
Com_Printf("Sys_QueEvent: overflow\n");
|
|
// we are discarding an event, but don't leak memory
|
|
if ( ev->evPtr ) {
|
|
Z_Free( ev->evPtr );
|
|
}
|
|
eventTail++;
|
|
}
|
|
|
|
eventHead++;
|
|
|
|
if ( time == 0 ) {
|
|
time = Sys_Milliseconds();
|
|
}
|
|
|
|
ev->evTime = time;
|
|
ev->evType = type;
|
|
ev->evValue = value;
|
|
ev->evValue2 = value2;
|
|
ev->evPtrLength = ptrLength;
|
|
ev->evPtr = ptr;
|
|
}
|
|
|
|
/*
|
|
================
|
|
Sys_GetEvent
|
|
|
|
================
|
|
*/
|
|
sysEvent_t Sys_GetEvent( void ) {
|
|
MSG msg;
|
|
sysEvent_t ev;
|
|
char *s;
|
|
msg_t netmsg;
|
|
|
|
// return if we have data
|
|
if ( eventHead > eventTail ) {
|
|
eventTail++;
|
|
return eventQue[ ( eventTail - 1 ) & MASK_QUED_EVENTS ];
|
|
}
|
|
|
|
// pump the message loop
|
|
while (PeekMessage (&msg, NULL, 0, 0, PM_NOREMOVE)) {
|
|
if ( !GetMessage (&msg, NULL, 0, 0) ) {
|
|
Com_Quit_f();
|
|
}
|
|
|
|
// save the msg time, because wndprocs don't have access to the timestamp
|
|
g_wv.sysMsgTime = msg.time;
|
|
|
|
TranslateMessage (&msg);
|
|
DispatchMessage (&msg);
|
|
}
|
|
|
|
// check for console commands
|
|
s = Sys_ConsoleInput();
|
|
if ( s ) {
|
|
char *b;
|
|
int len;
|
|
|
|
len = strlen( s ) + 1;
|
|
b = (char *) Z_Malloc( len, TAG_EVENT, qfalse);
|
|
strcpy( b, s );
|
|
Sys_QueEvent( 0, SE_CONSOLE, 0, 0, len, b );
|
|
}
|
|
|
|
// check for network packets
|
|
MSG_Init( &netmsg, sys_packetReceived, sizeof( sys_packetReceived ) );
|
|
|
|
// return if we have data
|
|
if ( eventHead > eventTail ) {
|
|
eventTail++;
|
|
return eventQue[ ( eventTail - 1 ) & MASK_QUED_EVENTS ];
|
|
}
|
|
|
|
// create an empty event to return
|
|
|
|
memset( &ev, 0, sizeof( ev ) );
|
|
ev.evTime = timeGetTime();
|
|
|
|
return ev;
|
|
}
|
|
|
|
//================================================================
|
|
|
|
/*
|
|
=================
|
|
Sys_In_Restart_f
|
|
|
|
Restart the input subsystem
|
|
=================
|
|
*/
|
|
void Sys_In_Restart_f( void ) {
|
|
IN_Shutdown();
|
|
IN_Init();
|
|
}
|
|
|
|
static bool Sys_IsExpired()
|
|
{
|
|
#if 0
|
|
// sec min Hr Day Mon Yr
|
|
struct tm t_valid_start = { 0, 0, 8, 23, 6, 103 }; //zero based months!
|
|
// sec min Hr Day Mon Yr
|
|
struct tm t_valid_end = { 0, 0, 20, 30, 6, 103 };
|
|
// struct tm t_valid_end = t_valid_start;
|
|
// t_valid_end.tm_mday += 8;
|
|
time_t startTime = mktime( &t_valid_start);
|
|
time_t expireTime = mktime( &t_valid_end);
|
|
time_t now;
|
|
time(&now);
|
|
if((now < startTime) || (now> expireTime))
|
|
{
|
|
return true;
|
|
}
|
|
#endif
|
|
return false;
|
|
}
|
|
|
|
/*
|
|
================
|
|
Sys_Init
|
|
|
|
Called after the common systems (cvars, files, etc)
|
|
are initialized
|
|
================
|
|
*/
|
|
#define OSR2_BUILD_NUMBER 1111
|
|
#define WIN98_BUILD_NUMBER 1998
|
|
|
|
#if MEM_DEBUG
|
|
void SH_Register(void);
|
|
#endif
|
|
|
|
void Sys_Init( void ) {
|
|
int cpuid;
|
|
|
|
// make sure the timer is high precision, otherwise
|
|
// NT gets 18ms resolution
|
|
timeBeginPeriod( 1 );
|
|
|
|
Cmd_AddCommand ("in_restart", Sys_In_Restart_f);
|
|
#if MEM_DEBUG
|
|
SH_Register();
|
|
#endif
|
|
|
|
g_wv.osversion.dwOSVersionInfoSize = sizeof( g_wv.osversion );
|
|
|
|
if (!GetVersionEx (&g_wv.osversion))
|
|
Sys_Error ("Couldn't get OS info");
|
|
if (Sys_IsExpired()) {
|
|
g_wv.osversion.dwPlatformId = VER_PLATFORM_WIN32s; //sneaky: hide the expire with this error
|
|
}
|
|
|
|
if (g_wv.osversion.dwMajorVersion < 4)
|
|
Sys_Error ("This game requires Windows version 4 or greater");
|
|
if (g_wv.osversion.dwPlatformId == VER_PLATFORM_WIN32s)
|
|
Sys_Error ("This game doesn't run on Win32s");
|
|
|
|
if ( g_wv.osversion.dwPlatformId == VER_PLATFORM_WIN32_NT )
|
|
{
|
|
Cvar_Set( "arch", "winnt" );
|
|
}
|
|
else if ( g_wv.osversion.dwPlatformId == VER_PLATFORM_WIN32_WINDOWS )
|
|
{
|
|
if ( LOWORD( g_wv.osversion.dwBuildNumber ) >= WIN98_BUILD_NUMBER )
|
|
{
|
|
Cvar_Set( "arch", "win98" );
|
|
}
|
|
else if ( LOWORD( g_wv.osversion.dwBuildNumber ) >= OSR2_BUILD_NUMBER )
|
|
{
|
|
Cvar_Set( "arch", "win95 osr2.x" );
|
|
}
|
|
else
|
|
{
|
|
Cvar_Set( "arch", "win95" );
|
|
}
|
|
}
|
|
else
|
|
{
|
|
Cvar_Set( "arch", "unknown Windows variant" );
|
|
}
|
|
|
|
// save out a couple things in rom cvars for the renderer to access
|
|
Cvar_Get( "win_hinstance", va("%i", (int)g_wv.hInstance), CVAR_ROM );
|
|
Cvar_Get( "win_wndproc", va("%i", (int)MainWndProc), CVAR_ROM );
|
|
|
|
//
|
|
// figure out our CPU
|
|
//
|
|
Cvar_Get( "sys_cpustring", "detect", CVAR_ROM );
|
|
if ( !Q_stricmp( Cvar_VariableString( "sys_cpustring"), "detect" ) )
|
|
{
|
|
Com_Printf( "...detecting CPU, found " );
|
|
|
|
cpuid = Sys_GetProcessorId();
|
|
|
|
switch ( cpuid )
|
|
{
|
|
case CPUID_GENERIC:
|
|
Cvar_Set( "sys_cpustring", "generic" );
|
|
break;
|
|
case CPUID_INTEL_UNSUPPORTED:
|
|
Cvar_Set( "sys_cpustring", "x86 (pre-Pentium)" );
|
|
break;
|
|
case CPUID_INTEL_PENTIUM:
|
|
Cvar_Set( "sys_cpustring", "x86 (P5/PPro, non-MMX)" );
|
|
break;
|
|
case CPUID_INTEL_MMX:
|
|
Cvar_Set( "sys_cpustring", "x86 (P5/Pentium2, MMX)" );
|
|
break;
|
|
case CPUID_INTEL_KATMAI:
|
|
Cvar_Set( "sys_cpustring", "Intel Pentium III" );
|
|
break;
|
|
case CPUID_INTEL_WILLIAMETTE:
|
|
Cvar_Set( "sys_cpustring", "Intel Pentium IV" );
|
|
break;
|
|
case CPUID_AMD_3DNOW:
|
|
Cvar_Set( "sys_cpustring", "AMD w/ 3DNow!" );
|
|
break;
|
|
case CPUID_AXP:
|
|
Cvar_Set( "sys_cpustring", "Alpha AXP" );
|
|
break;
|
|
default:
|
|
Com_Error( ERR_FATAL, "Unknown cpu type %d\n", cpuid );
|
|
break;
|
|
}
|
|
}
|
|
else
|
|
{
|
|
Com_Printf( "...forcing CPU type to " );
|
|
if ( !Q_stricmp( Cvar_VariableString( "sys_cpustring" ), "generic" ) )
|
|
{
|
|
cpuid = CPUID_GENERIC;
|
|
}
|
|
else if ( !Q_stricmp( Cvar_VariableString( "sys_cpustring" ), "x87" ) )
|
|
{
|
|
cpuid = CPUID_INTEL_PENTIUM;
|
|
}
|
|
else if ( !Q_stricmp( Cvar_VariableString( "sys_cpustring" ), "mmx" ) )
|
|
{
|
|
cpuid = CPUID_INTEL_MMX;
|
|
}
|
|
else if ( !Q_stricmp( Cvar_VariableString( "sys_cpustring" ), "3dnow" ) )
|
|
{
|
|
cpuid = CPUID_AMD_3DNOW;
|
|
}
|
|
else if ( !Q_stricmp( Cvar_VariableString( "sys_cpustring" ), "PentiumIII" ) )
|
|
{
|
|
cpuid = CPUID_INTEL_KATMAI;
|
|
}
|
|
else if ( !Q_stricmp( Cvar_VariableString( "sys_cpustring" ), "PentiumIV" ) )
|
|
{
|
|
cpuid = CPUID_INTEL_WILLIAMETTE;
|
|
}
|
|
else if ( !Q_stricmp( Cvar_VariableString( "sys_cpustring" ), "axp" ) )
|
|
{
|
|
cpuid = CPUID_AXP;
|
|
}
|
|
else
|
|
{
|
|
Com_Printf( "WARNING: unknown sys_cpustring '%s'\n", Cvar_VariableString( "sys_cpustring" ) );
|
|
cpuid = CPUID_GENERIC;
|
|
}
|
|
}
|
|
Cvar_SetValue( "sys_cpuid", cpuid );
|
|
Com_Printf( "%s\n", Cvar_VariableString( "sys_cpustring" ) );
|
|
|
|
Cvar_Set( "username", Sys_GetCurrentUser() );
|
|
|
|
IN_Init(); // FIXME: not in dedicated?
|
|
}
|
|
|
|
|
|
|
|
// do a quick mem test to check for any potential future mem problems...
|
|
//
|
|
static void QuickMemTest(void)
|
|
{
|
|
// if (!Sys_LowPhysicalMemory())
|
|
{
|
|
const int iMemTestMegs = 128; // useful search label
|
|
// special test,
|
|
void *pvData = malloc(iMemTestMegs * 1024 * 1024);
|
|
if (pvData)
|
|
{
|
|
free(pvData);
|
|
}
|
|
else
|
|
{
|
|
// err...
|
|
//
|
|
extern qboolean Language_IsAsian(void);
|
|
LPCSTR psContinue = Language_IsAsian() ?
|
|
"Your machine failed to allocate %dMB in a memory test, which may mean you'll have problems running this game all the way through.\n\nContinue anyway?"
|
|
:
|
|
SE_GetString("CON_TEXT_FAILED_MEMTEST");
|
|
// ( since it's too much hassle doing MBCS code pages and decodings etc for MessageBox command )
|
|
|
|
#define GetYesNo(psQuery) (!!(MessageBox(NULL,psQuery,"Query",MB_YESNO|MB_ICONWARNING|MB_TASKMODAL)==IDYES))
|
|
if (!GetYesNo(va(psContinue,iMemTestMegs)))
|
|
{
|
|
LPCSTR psNoMem = Language_IsAsian() ?
|
|
"Insufficient memory to run this game!\n"
|
|
:
|
|
SE_GetString("CON_TEXT_INSUFFICIENT_MEMORY");
|
|
// ( since it's too much hassle doing MBCS code pages and decodings etc for MessageBox command )
|
|
|
|
Com_Error( ERR_FATAL, psNoMem );
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
|
|
//=======================================================================
|
|
//int totalMsec, countMsec;
|
|
|
|
/*
|
|
==================
|
|
WinMain
|
|
|
|
==================
|
|
*/
|
|
int WINAPI WinMain (HINSTANCE hInstance, HINSTANCE hPrevInstance, LPSTR lpCmdLine, int nCmdShow) {
|
|
char cwd[MAX_OSPATH];
|
|
// int startTime, endTime;
|
|
|
|
SET_CRT_DEBUG_FIELD( _CRTDBG_LEAK_CHECK_DF );
|
|
// _CrtSetBreakAlloc(34804);
|
|
|
|
// should never get a previous instance in Win32
|
|
if ( hPrevInstance ) {
|
|
return 0;
|
|
}
|
|
|
|
g_wv.hInstance = hInstance;
|
|
Q_strncpyz( sys_cmdline, lpCmdLine, sizeof( sys_cmdline ) );
|
|
|
|
// done before Com/Sys_Init since we need this for error output
|
|
Sys_CreateConsole();
|
|
|
|
// no abort/retry/fail errors
|
|
SetErrorMode( SEM_FAILCRITICALERRORS );
|
|
|
|
// get the initial time base
|
|
Sys_Milliseconds();
|
|
|
|
#if 0
|
|
// if we find the CD, add a +set cddir xxx command line
|
|
Sys_ScanForCD();
|
|
#endif
|
|
|
|
Sys_InitStreamThread();
|
|
|
|
Com_Init( sys_cmdline );
|
|
|
|
QuickMemTest();
|
|
|
|
_getcwd (cwd, sizeof(cwd));
|
|
Com_Printf("Working directory: %s\n", cwd);
|
|
|
|
// hide the early console since we've reached the point where we
|
|
// have a working graphics subsystems
|
|
if ( !com_viewlog->integer ) {
|
|
Sys_ShowConsole( 0, qfalse );
|
|
}
|
|
|
|
// main game loop
|
|
while( 1 ) {
|
|
// if not running as a game client, sleep a bit
|
|
if ( g_wv.isMinimized ) {
|
|
Sleep( 5 );
|
|
}
|
|
#ifdef _DEBUG
|
|
if (!g_wv.activeApp)
|
|
{
|
|
Sleep(50);
|
|
}
|
|
#endif // _DEBUG
|
|
|
|
// set low precision every frame, because some system calls
|
|
// reset it arbitrarily
|
|
// _controlfp( _PC_24, _MCW_PC );
|
|
|
|
// startTime = Sys_Milliseconds();
|
|
|
|
// make sure mouse and joystick are only called once a frame
|
|
IN_Frame();
|
|
|
|
// run the game
|
|
Com_Frame();
|
|
|
|
// endTime = Sys_Milliseconds();
|
|
// totalMsec += endTime - startTime;
|
|
// countMsec++;
|
|
}
|
|
|
|
// never gets here
|
|
}
|