mirror of
https://github.com/ptitSeb/Serious-Engine
synced 2024-11-22 18:30:27 +01:00
453 lines
11 KiB
C++
453 lines
11 KiB
C++
/* Copyright (c) 2002-2012 Croteam Ltd. All rights reserved. */
|
|
|
|
#include "StdAfx.h"
|
|
#include <GameMP/Game.h>
|
|
#define DECL_DLL
|
|
|
|
#if 0 /* rcg10042001 Doesn't seem to exist. */
|
|
#include <Entities/Global.h>
|
|
#endif
|
|
|
|
// application state variables
|
|
extern BOOL _bRunning = TRUE;
|
|
static BOOL _bForceRestart = FALSE;
|
|
static BOOL _bForceNextMap = FALSE;
|
|
|
|
extern CTString _strSamVersion = "no version information";
|
|
extern INDEX ded_iMaxFPS = 100;
|
|
extern CTString ded_strConfig = "";
|
|
extern CTString ded_strLevel = "";
|
|
extern INDEX ded_bRestartWhenEmpty = TRUE;
|
|
extern FLOAT ded_tmTimeout = -1;
|
|
extern CGame *_pGame = NULL;
|
|
extern CTString sam_strFirstLevel = "Levels\\KarnakDemo.wld";
|
|
extern CTString sam_strIntroLevel = "Levels\\Intro.wld";
|
|
extern CTString sam_strGameName = "serioussam";
|
|
|
|
CTimerValue _tvLastLevelEnd(-1i64);
|
|
|
|
void InitializeGame(void)
|
|
{
|
|
try {
|
|
#ifndef NDEBUG
|
|
#define GAMEDLL _fnmApplicationExe.FileDir()+"Game"+_strModExt+"D.dll"
|
|
#else
|
|
#define GAMEDLL _fnmApplicationExe.FileDir()+"Game"+_strModExt+".dll"
|
|
#endif
|
|
CTFileName fnmExpanded;
|
|
ExpandFilePath(EFP_READ, CTString(GAMEDLL), fnmExpanded);
|
|
|
|
CPrintF(TRANS("Loading game library '%s'...\n"), (const char *)fnmExpanded);
|
|
HMODULE hGame = LoadLibraryA(fnmExpanded);
|
|
if (hGame==NULL) {
|
|
ThrowF_t("%s", GetWindowsError(GetLastError()));
|
|
}
|
|
CGame* (*GAME_Create)(void) = (CGame* (*)(void))GetProcAddress(hGame, "GAME_Create");
|
|
if (GAME_Create==NULL) {
|
|
ThrowF_t("%s", GetWindowsError(GetLastError()));
|
|
}
|
|
_pGame = GAME_Create();
|
|
|
|
} catch (char *strError) {
|
|
FatalError("%s", strError);
|
|
}
|
|
// init game - this will load persistent symbols
|
|
_pGame->Initialize(CTString("Data\\DedicatedServer.gms"));
|
|
}
|
|
|
|
static void QuitGame(void)
|
|
{
|
|
_bRunning = FALSE;
|
|
}
|
|
|
|
static void RestartGame(void)
|
|
{
|
|
_bForceRestart = TRUE;
|
|
}
|
|
static void NextMap(void)
|
|
{
|
|
_bForceNextMap = TRUE;
|
|
}
|
|
|
|
|
|
void End(void);
|
|
|
|
// limit current frame rate if neeeded
|
|
|
|
void LimitFrameRate(void)
|
|
{
|
|
// measure passed time for each loop
|
|
static CTimerValue tvLast(-1.0f);
|
|
CTimerValue tvNow = _pTimer->GetHighPrecisionTimer();
|
|
TIME tmCurrentDelta = (tvNow-tvLast).GetSeconds();
|
|
|
|
// limit maximum frame rate
|
|
ded_iMaxFPS = ClampDn( ded_iMaxFPS, 1L);
|
|
TIME tmWantedDelta = 1.0f / ded_iMaxFPS;
|
|
if( tmCurrentDelta<tmWantedDelta) Sleep( (tmWantedDelta-tmCurrentDelta)*1000.0f);
|
|
|
|
// remember new time
|
|
tvLast = _pTimer->GetHighPrecisionTimer();
|
|
}
|
|
|
|
// break/close handler
|
|
BOOL WINAPI HandlerRoutine(
|
|
DWORD dwCtrlType // control signal type
|
|
)
|
|
{
|
|
if (dwCtrlType == CTRL_C_EVENT
|
|
|| dwCtrlType == CTRL_BREAK_EVENT
|
|
|| dwCtrlType == CTRL_CLOSE_EVENT
|
|
|| dwCtrlType == CTRL_LOGOFF_EVENT
|
|
|| dwCtrlType == CTRL_SHUTDOWN_EVENT) {
|
|
_bRunning = FALSE;
|
|
}
|
|
return TRUE;
|
|
}
|
|
|
|
#define REFRESHTIME (0.1f)
|
|
|
|
static void LoadingHook_t(CProgressHookInfo *pphi)
|
|
{
|
|
// measure time since last call
|
|
static CTimerValue tvLast(0I64);
|
|
CTimerValue tvNow = _pTimer->GetHighPrecisionTimer();
|
|
|
|
if (!_bRunning) {
|
|
ThrowF_t(TRANS("User break!"));
|
|
}
|
|
// if not first or final update, and not enough time passed
|
|
if (pphi->phi_fCompleted!=0 && pphi->phi_fCompleted!=1 &&
|
|
(tvNow-tvLast).GetSeconds() < REFRESHTIME) {
|
|
// do nothing
|
|
return;
|
|
}
|
|
tvLast = tvNow;
|
|
|
|
// print status text
|
|
CTString strRes;
|
|
printf("\r ");
|
|
printf("\r%s : %3.0f%%\r", pphi->phi_strDescription, pphi->phi_fCompleted*100);
|
|
}
|
|
|
|
// loading hook functions
|
|
void EnableLoadingHook(void)
|
|
{
|
|
printf("\n");
|
|
SetProgressHook(LoadingHook_t);
|
|
}
|
|
|
|
void DisableLoadingHook(void)
|
|
{
|
|
SetProgressHook(NULL);
|
|
printf("\n");
|
|
}
|
|
|
|
BOOL StartGame(CTString &strLevel)
|
|
{
|
|
_pGame->gm_aiStartLocalPlayers[0] = -1;
|
|
_pGame->gm_aiStartLocalPlayers[1] = -1;
|
|
_pGame->gm_aiStartLocalPlayers[2] = -1;
|
|
_pGame->gm_aiStartLocalPlayers[3] = -1;
|
|
|
|
_pGame->gam_strCustomLevel = strLevel;
|
|
|
|
_pGame->gm_strNetworkProvider = "TCP/IP Server";
|
|
CUniversalSessionProperties sp;
|
|
_pGame->SetMultiPlayerSession(sp);
|
|
return _pGame->NewGame( _pGame->gam_strSessionName, strLevel, sp);
|
|
}
|
|
|
|
void ExecScript(const CTString &str)
|
|
{
|
|
CPrintF("Executing: '%s'\n", str);
|
|
CTString strCmd;
|
|
strCmd.PrintF("include \"%s\"", str);
|
|
_pShell->Execute(strCmd);
|
|
}
|
|
|
|
BOOL Init(int argc, char* argv[])
|
|
{
|
|
_bDedicatedServer = TRUE;
|
|
|
|
if (argc!=1+1 && argc!=2+1) {
|
|
// NOTE: this cannot be translated - translations are not loaded yet
|
|
printf("Usage: DedicatedServer <configname> [<modname>]\n"
|
|
"This starts a server reading configs from directory 'Scripts\\Dedicated\\<configname>\\'\n");
|
|
getch();
|
|
exit(0);
|
|
}
|
|
|
|
SetConsoleTitleA(argv[1]);
|
|
|
|
ded_strConfig = CTString("Scripts\\Dedicated\\")+argv[1]+"\\";
|
|
|
|
if (argc==2+1) {
|
|
_fnmMod = CTString("Mods\\")+argv[2]+"\\";
|
|
}
|
|
|
|
|
|
_strLogFile = CTString("Dedicated_")+argv[1];
|
|
|
|
// initialize engine
|
|
SE_InitEngine(sam_strGameName);
|
|
|
|
// ParseCommandLine(strCmdLine);
|
|
|
|
// load all translation tables
|
|
InitTranslation();
|
|
CTFileName fnmTransTable;
|
|
try {
|
|
fnmTransTable = CTFILENAME("Data\\Translations\\Engine.txt");
|
|
AddTranslationTable_t(fnmTransTable);
|
|
fnmTransTable = CTFILENAME("Data\\Translations\\Game.txt");
|
|
AddTranslationTable_t(fnmTransTable);
|
|
fnmTransTable = CTFILENAME("Data\\Translations\\Entities.txt");
|
|
AddTranslationTable_t(fnmTransTable);
|
|
fnmTransTable = CTFILENAME("Data\\Translations\\SeriousSam.txt");
|
|
AddTranslationTable_t(fnmTransTable);
|
|
fnmTransTable = CTFILENAME("Data\\Translations\\Levels.txt");
|
|
AddTranslationTable_t(fnmTransTable);
|
|
|
|
FinishTranslationTable();
|
|
} catch (char *strError) {
|
|
FatalError("%s %s", CTString(fnmTransTable), strError);
|
|
}
|
|
|
|
// always disable all warnings when in serious sam
|
|
_pShell->Execute( "con_bNoWarnings=1;");
|
|
|
|
// declare shell symbols
|
|
_pShell->DeclareSymbol("persistent user INDEX ded_iMaxFPS;", &ded_iMaxFPS);
|
|
_pShell->DeclareSymbol("user void Quit(void);", &QuitGame);
|
|
_pShell->DeclareSymbol("user CTString ded_strLevel;", &ded_strLevel);
|
|
_pShell->DeclareSymbol("user FLOAT ded_tmTimeout;", &ded_tmTimeout);
|
|
_pShell->DeclareSymbol("user INDEX ded_bRestartWhenEmpty;", &ded_bRestartWhenEmpty);
|
|
_pShell->DeclareSymbol("user void Restart(void);", &RestartGame);
|
|
_pShell->DeclareSymbol("user void NextMap(void);", &NextMap);
|
|
_pShell->DeclareSymbol("persistent user CTString sam_strIntroLevel;", &sam_strIntroLevel);
|
|
_pShell->DeclareSymbol("persistent user CTString sam_strGameName;", &sam_strGameName);
|
|
_pShell->DeclareSymbol("user CTString sam_strFirstLevel;", &sam_strFirstLevel);
|
|
|
|
// init game - this will load persistent symbols
|
|
InitializeGame();
|
|
_pNetwork->md_strGameID = sam_strGameName;
|
|
|
|
LoadStringVar(CTString("Data\\Var\\Sam_Version.var"), _strSamVersion);
|
|
CPrintF(TRANS("Serious Sam version: %s\n"), _strSamVersion);
|
|
|
|
SetConsoleCtrlHandler(HandlerRoutine, TRUE);
|
|
|
|
// if there is a mod
|
|
if (_fnmMod!="") {
|
|
// execute the mod startup script
|
|
_pShell->Execute(CTString("include \"Scripts\\Mod_startup.ini\";"));
|
|
}
|
|
|
|
return TRUE;
|
|
}
|
|
void End(void)
|
|
{
|
|
|
|
// cleanup level-info subsystem
|
|
// ClearDemosList();
|
|
|
|
// end game
|
|
_pGame->End();
|
|
|
|
// end engine
|
|
SE_EndEngine();
|
|
}
|
|
|
|
static INDEX iRound = 1;
|
|
static BOOL _bHadPlayers = 0;
|
|
static BOOL _bRestart = 0;
|
|
CTString strBegScript;
|
|
CTString strEndScript;
|
|
|
|
void RoundBegin(void)
|
|
{
|
|
// repeat generate script names
|
|
FOREVER {
|
|
strBegScript.PrintF("%s%d_begin.ini", ded_strConfig, iRound);
|
|
strEndScript.PrintF("%s%d_end.ini", ded_strConfig, iRound);
|
|
// if start script exists
|
|
if (FileExists(strBegScript)) {
|
|
// stop searching
|
|
break;
|
|
|
|
// if start script doesn't exist
|
|
} else {
|
|
// if this is first round
|
|
if (iRound==1) {
|
|
// error
|
|
CPrintF(TRANS("No scripts present!\n"));
|
|
_bRunning = FALSE;
|
|
return;
|
|
}
|
|
// try again with first round
|
|
iRound = 1;
|
|
}
|
|
}
|
|
|
|
// run start script
|
|
ExecScript(strBegScript);
|
|
|
|
// start the level specified there
|
|
if (ded_strLevel=="") {
|
|
CPrintF(TRANS("ERROR: No next level specified!\n"));
|
|
_bRunning = FALSE;
|
|
} else {
|
|
EnableLoadingHook();
|
|
StartGame(ded_strLevel);
|
|
_bHadPlayers = 0;
|
|
_bRestart = 0;
|
|
DisableLoadingHook();
|
|
_tvLastLevelEnd = CTimerValue(-1i64);
|
|
CPrintF(TRANS("\nALL OK: Dedicated server is now running!\n"));
|
|
CPrintF(TRANS("Use Ctrl+C to shutdown the server.\n"));
|
|
CPrintF(TRANS("DO NOT use the 'Close' button, it might leave the port hanging!\n\n"));
|
|
}
|
|
}
|
|
|
|
void ForceNextMap(void)
|
|
{
|
|
EnableLoadingHook();
|
|
StartGame(ded_strLevel);
|
|
_bHadPlayers = 0;
|
|
_bRestart = 0;
|
|
DisableLoadingHook();
|
|
_tvLastLevelEnd = CTimerValue(-1i64);
|
|
}
|
|
|
|
void RoundEnd(void)
|
|
{
|
|
CPrintF("end of round---------------------------\n");
|
|
|
|
ExecScript(strEndScript);
|
|
iRound++;
|
|
}
|
|
|
|
// do the main game loop and render screen
|
|
void DoGame(void)
|
|
{
|
|
// do the main game loop
|
|
if( _pGame->gm_bGameOn) {
|
|
_pGame->GameMainLoop();
|
|
|
|
// if any player is connected
|
|
if (_pGame->GetPlayersCount()) {
|
|
if (!_bHadPlayers) {
|
|
// unpause server
|
|
if (_pNetwork->IsPaused()) {
|
|
_pNetwork->TogglePause();
|
|
}
|
|
}
|
|
// remember that
|
|
_bHadPlayers = 1;
|
|
// if no player is connected,
|
|
} else {
|
|
// if was before
|
|
if (_bHadPlayers) {
|
|
// make it restart
|
|
_bRestart = TRUE;
|
|
// if never had any player yet
|
|
} else {
|
|
// keep the server paused
|
|
if (!_pNetwork->IsPaused()) {
|
|
_pNetwork->TogglePause();
|
|
}
|
|
}
|
|
}
|
|
|
|
// if game is not started
|
|
} else {
|
|
// just handle broadcast messages
|
|
_pNetwork->GameInactive();
|
|
}
|
|
|
|
// limit current frame rate if needed
|
|
LimitFrameRate();
|
|
}
|
|
|
|
int SubMain(int argc, char* argv[])
|
|
{
|
|
|
|
// initialize
|
|
if( !Init(argc, argv)) {
|
|
End();
|
|
return -1;
|
|
}
|
|
|
|
// initialy, application is running
|
|
_bRunning = TRUE;
|
|
|
|
// execute dedicated server startup script
|
|
ExecScript(CTFILENAME("Scripts\\Dedicated_startup.ini"));
|
|
// execute startup script for this config
|
|
ExecScript(ded_strConfig+"init.ini");
|
|
// start first round
|
|
RoundBegin();
|
|
|
|
// while it is still running
|
|
while( _bRunning)
|
|
{
|
|
// do the main game loop
|
|
DoGame();
|
|
|
|
// if game is finished
|
|
if (_pNetwork->IsGameFinished()) {
|
|
// if not yet remembered end of level
|
|
if (_tvLastLevelEnd.tv_llValue<0) {
|
|
// remember end of level
|
|
_tvLastLevelEnd = _pTimer->GetHighPrecisionTimer();
|
|
// finish this round
|
|
RoundEnd();
|
|
// if already remembered
|
|
} else {
|
|
// if time is out
|
|
if ((_pTimer->GetHighPrecisionTimer()-_tvLastLevelEnd).GetSeconds()>ded_tmTimeout) {
|
|
// start next round
|
|
RoundBegin();
|
|
}
|
|
}
|
|
}
|
|
|
|
if (_bRestart||_bForceRestart) {
|
|
if (ded_bRestartWhenEmpty||_bForceRestart) {
|
|
_bForceRestart = FALSE;
|
|
_bRestart = FALSE;
|
|
RoundEnd();
|
|
CPrintF(TRANS("\nNOTE: Restarting server!\n\n"));
|
|
RoundBegin();
|
|
} else {
|
|
_bRestart = FALSE;
|
|
_bHadPlayers = FALSE;
|
|
}
|
|
}
|
|
if (_bForceNextMap) {
|
|
ForceNextMap();
|
|
_bForceNextMap = FALSE;
|
|
}
|
|
|
|
} // end of main application loop
|
|
|
|
_pGame->StopGame();
|
|
|
|
End();
|
|
|
|
return 0;
|
|
}
|
|
|
|
|
|
int main(int argc, char* argv[])
|
|
{
|
|
int iResult;
|
|
CTSTREAM_BEGIN {
|
|
iResult = SubMain(argc, argv);
|
|
} CTSTREAM_END;
|
|
|
|
return iResult;
|
|
}
|
|
|