1
0
mirror of https://github.com/alliedmodders/metamod-source.git synced 2024-11-29 11:24:19 +01:00
HLMetaModOfficial/loader/loader.cpp

457 lines
10 KiB
C++
Raw Normal View History

/**
* vim: set ts=4 sw=4 tw=99 noet :
* ======================================================
* Metamod:Source
* Copyright (C) 2004-2015 AlliedModders LLC and authors.
* All rights reserved.
* ======================================================
*
* This software is provided 'as-is', without any express or implied warranty.
* In no event will the authors be held liable for any damages arising from
* the use of this software.
*
* Permission is granted to anyone to use this software for any purpose,
* including commercial applications, and to alter it and redistribute it
* freely, subject to the following restrictions:
*
* 1. The origin of this software must not be misrepresented; you must not
* claim that you wrote the original software. If you use this software in a
* product, an acknowledgment in the product documentation would be
* appreciated but is not required.
* 2. Altered source versions must be plainly marked as such, and must not be
* misrepresented as being the original software.
* 3. This notice may not be removed or altered from any source distribution.
*/
#include <time.h>
#include <assert.h>
#include <stdarg.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include "loader.h"
#include "serverplugin.h"
#include "gamedll.h"
#include "utility.h"
#if defined __APPLE__
#include <crt_externs.h>
#endif
static HMODULE mm_library = NULL;
static char mm_fatal_logfile[PLATFORM_MAX_PATH] = "metamod-fatal.log";
MetamodBackend mm_backend = MMBackend_UNKNOWN;
extern void
mm_LogFatal(const char *message, ...)
{
FILE *fp;
time_t t;
va_list ap;
char header[256];
fp = fopen(mm_fatal_logfile, "at");
if (!fp && (fp = fopen("metamod-fatal.log", "at")) == NULL)
return;
t = time(NULL);
strftime(header, sizeof(header), "%m/%d/%Y - %H:%M:%S", localtime(&t));
fprintf(fp, "L %s: ", header);
va_start(ap, message);
vfprintf(fp, message, ap);
va_end(ap);
fprintf(fp, "\n");
fclose(fp);
}
static const char *backend_names[] =
{
"2.ep1",
"2.darkm",
"2.ep2",
"2.bgt",
"2.eye",
"2.css",
"2.ep2v",
"2.l4d",
"2.l4d2",
"2.swarm",
"2.portal2",
"2.csgo",
"2.dota",
"2.hl2dm",
"2.dods",
"2.tf2",
"2.nd",
"2.sdk2013",
"2.blade",
"2.insurgency",
"2.contagion",
2017-04-16 22:25:34 +02:00
"2.bms",
"2.doi",
"2.mock",
};
#if defined _WIN32
#define LIBRARY_EXT ".dll"
#define LIBRARY_MINEXT ".dll"
#elif defined __APPLE__
#define LIBRARY_EXT ".dylib"
#define LIBRARY_MINEXT ".dylib"
#elif defined __linux__
#define LIBRARY_EXT LIB_SUFFIX
#define LIBRARY_MINEXT ".so"
#endif
bool
mm_LoadMetamodLibrary(MetamodBackend backend, char *buffer, size_t maxlength)
{
size_t len, temp_len;
char mm_path[PLATFORM_MAX_PATH * 2];
/* Get our path */
if (!mm_GetFileOfAddress((void*)mm_GetFileOfAddress, mm_path, sizeof(mm_path)))
return false;
len = strlen(mm_path);
const char *pLastSlash = strrchr(mm_path, PATH_SEP_CHAR);
if (!pLastSlash)
return false;
temp_len = strlen(&pLastSlash[1]);
if (len < temp_len)
return false;
/* Build log file name */
mm_path[len - temp_len] = '\0';
mm_Format(mm_fatal_logfile,
sizeof(mm_fatal_logfile),
"%smetamod-fatal.log",
mm_path);
/* Replace server.dll with the new binary we want */
mm_Format(&mm_path[len - temp_len],
sizeof(mm_path) - (len - temp_len),
"metamod.%s" LIBRARY_MINEXT,
backend_names[backend]);
mm_library = (HMODULE)mm_LoadLibrary(mm_path, buffer, maxlength);
return (mm_library != NULL);
}
void
mm_UnloadMetamodLibrary()
{
mm_UnloadLibrary(mm_library);
mm_library = NULL;
}
#if defined _WIN32
#define EXPORT extern "C" __declspec(dllexport)
#elif defined __GNUC__
#define EXPORT extern "C" __attribute__ ((visibility("default")))
#endif
EXPORT void *
CreateInterface(const char *name, int *ret)
{
/* If we've got a VSP bridge, do nothing. */
if (vsp_bridge != NULL)
{
if (ret != NULL)
*ret = 1;
return NULL;
}
void *ptr;
if (strncmp(name, "ISERVERPLUGINCALLBACKS", 22) == 0)
{
/* Either load as VSP or start VSP listener */
ptr = mm_GetVspCallbacks(atoi(&name[22]));
}
else if (gamedll_bridge == NULL)
{
/* Load as gamedll */
ptr = mm_GameDllRequest(name, ret);
}
else
{
/* If we've got a gamedll bridge, forward the request. */
return gamedll_bridge->QueryInterface(name, ret);
}
if (ret != NULL)
*ret = (ptr != NULL) ? 0 : 1;
return ptr;
}
void *
mm_GetProcAddress(const char *name)
{
return mm_GetLibAddress(mm_library, name);
}
void
mm_GetGameName(char *buffer, size_t size)
{
buffer[0] = '\0';
2017-04-15 16:23:36 +02:00
bool bHasDedicated = false;
#if defined _WIN32
static char game[128];
LPWSTR pCmdLine = GetCommandLineW();
int argc;
LPWSTR *wargv = CommandLineToArgvW(pCmdLine, &argc);
for (int i = 0; i < argc; ++i)
{
2017-04-15 16:23:36 +02:00
if (wcscmp(wargv[i], L"-game") == 0)
{
if (++i >= argc)
break;
2017-04-15 16:23:36 +02:00
wcstombs(buffer, wargv[i], size);
buffer[size-1] = '\0';
}
else if (wcscmp(wargv[i], L"-dedicated") == 0)
{
bHasDedicated = true;
}
}
LocalFree(wargv);
#elif defined __APPLE__
int argc = *_NSGetArgc();
char **argv = *_NSGetArgv();
for (int i = 0; i < argc; ++i)
{
2017-04-15 16:23:36 +02:00
if (strcmp(argv[i], "-game") == 0)
{
if (++i >= argc)
break;
2017-04-15 16:23:36 +02:00
strncpy(buffer, argv[i], size);
buffer[size-1] = '\0';
}
else if (strcmp(argv[i], "-dedicated") == 0)
{
bHasDedicated = true;
}
}
#elif defined __linux__
FILE *pFile = fopen("/proc/self/cmdline", "rb");
if (pFile)
{
char *arg = NULL;
size_t argsize = 0;
bool bNextIsGame = false;
while (getdelim(&arg, &argsize, 0, pFile) != -1)
{
if (bNextIsGame)
{
strncpy(buffer, arg, size);
buffer[size-1] = '\0';
2017-04-15 16:23:36 +02:00
bNextIsGame = false;
}
if (strcmp(arg, "-game") == 0)
{
bNextIsGame = true;
}
2017-04-15 16:23:36 +02:00
else if (strcmp(arg, "-dedicated") == 0)
{
bHasDedicated = true;
}
}
free(arg);
fclose(pFile);
}
#else
#error unsupported platform
#endif
if (buffer[0] == 0)
{
2017-04-15 16:23:36 +02:00
// HackHackHack - Different engines have different defaults if -game isn't specified
// we only use this for game detection, and not even in all cases. Old behavior was to
// give back ".", which was only really accurate for Dark Messiah. We'll add a special
// case for Source2 / Dota as well, since it only supports gameinfo loading, which relies
// on accuracy here more than VSP loading.
if (bHasDedicated)
{
strncpy(buffer, "dota", size);
}
else
{
strncpy(buffer, ".", size);
}
}
}
MetamodBackend
mm_DetermineBackend(QueryValveInterface engineFactory, QueryValveInterface serverFactory, const char *game_name)
{
if (engineFactory("VEngineServer023", NULL) != NULL)
{
if (engineFactory("EngineTraceServer004", NULL) == NULL)
{
goto TF2branch;
}
if (engineFactory("IEngineSoundServer004", NULL) != NULL)
{
void *lib = (void *)serverFactory;
void *addr;
if (strcmp(game_name, "doi") == 0
|| (addr = mm_FindPattern(lib, "doi_gamerules_data", sizeof("doi_gamerules_data") - 1)))
{
return MMBackend_DOI;
}
return MMBackend_Insurgency;
}
2016-11-08 03:02:30 +01:00
if (serverFactory("ServerGameDLL010", NULL) != NULL)
{
return MMBackend_BMS;
}
2020-03-11 23:40:19 +01:00
if (mm_FindPattern((void *)engineFactory, " Blade Symphony ", sizeof(" Blade Symphony ") - 1))
{
return MMBackend_Blade;
}
2016-11-08 03:02:30 +01:00
return MMBackend_CSGO;
}
else if (engineFactory("VEngineServer022", NULL) != NULL &&
engineFactory("VEngineCvar007", NULL) != NULL)
{
if (engineFactory("EngineTraceServer004", NULL) != NULL)
{
if (engineFactory("XboxSystemInterface001", NULL) != NULL)
{
return MMBackend_AlienSwarm;
}
void *lib = (void *)serverFactory;
void *addr;
if (strcmp(game_name, "portal2") == 0
|| (addr = mm_FindPattern(lib, "baseportalcombatweapon", sizeof("baseportalcombatweapon") - 1)))
{
return MMBackend_Portal2;
}
return MMBackend_Blade; // Old Blade
}
else if (engineFactory("VPrecacheSystem001", NULL) != NULL)
{
2015-03-21 19:31:12 +01:00
if (serverFactory("ServerGameTags002", NULL) != NULL)
{
return MMBackend_NuclearDawn;
}
else
{
void *lib = (void *)serverFactory;
void *addr;
if (strcmp(game_name, "contagion") == 0
|| (addr = mm_FindPattern(lib, "Contagion_Chat_All", sizeof("Contagion_Chat_All") - 1)))
{
return MMBackend_Contagion;
}
else
{
return MMBackend_Left4Dead2;
}
}
}
return MMBackend_Left4Dead;
}
else if (engineFactory("VEngineServer021", NULL) != NULL)
{
/* Check for OB */
if (engineFactory("VEngineCvar004", NULL) != NULL)
{
if (engineFactory("VModelInfoServer002", NULL) != NULL)
{
/* BGT has same iface version numbers and libs as ep2 */
void *lib = (void *)serverFactory;
void *addr;
if (strcmp(game_name, "pm") == 0
|| (addr = mm_FindPattern(lib, "DT_PMPlayerResource", sizeof("DT_PMPlayerResource") - 1)))
{
return MMBackend_BloodyGoodTime;
}
else
{
return MMBackend_Episode2;
}
}
else if (engineFactory("VModelInfoServer003", NULL) != NULL)
{
if (engineFactory("VFileSystem017", NULL) != NULL)
{
return MMBackend_EYE;
}
else
{
TF2branch:
void *lib = (void *)serverFactory;
void *addr;
if (strcmp(game_name, "cstrike") == 0
|| (addr = mm_FindPattern(lib, "DT_CSPlayerResource", sizeof("DT_CSPlayerResource") - 1)))
{
return MMBackend_CSS;
}
else if (strcmp(game_name, "tf") == 0
|| (addr = mm_FindPattern(lib, "DT_TFPlayerResource", sizeof("DT_TFPlayerResource") - 1)))
{
return MMBackend_TF2;
}
else if (strcmp(game_name, "dod") == 0
|| (addr = mm_FindPattern(lib, "DT_DODPlayerResource", sizeof("DT_DODPlayerResource") - 1)))
{
return MMBackend_DODS;
}
2017-06-21 13:40:49 +02:00
else if (strcmp(game_name, "hl2mp") == 0)
{
return MMBackend_HL2DM;
}
else if (strcmp(game_name, ".") == 0 && engineFactory("MOCK_ENGINE", NULL))
{
return MMBackend_Mock;
}
else
{
return MMBackend_SDK2013;
}
}
}
}
/* Check for Episode One/Old Engine */
else if (engineFactory("VModelInfoServer001", NULL) != NULL &&
(engineFactory("VEngineCvar003", NULL) != NULL ||
engineFactory("VEngineCvar002", NULL) != NULL))
{
/* Check for Dark Messiah which has a weird directory structure */
if (strcmp(game_name, ".") == 0)
{
return MMBackend_DarkMessiah;
}
return MMBackend_Episode1;
}
}
return MMBackend_UNKNOWN;
}