/*
=================
Sys_LoadDll
Used to load a development dll instead of a virtual machine
#1 look down current path
#2 look in fs_homepath
#3 look in fs_basepath
=================
*/
void *Sys_LoadDll( const char *name, char *fqpath ,
intptr_t (**entryPoint)(int, ...),
intptr_t (*systemcalls)(intptr_t, ...) )
{
void *libHandle;
void (*dllEntry)( intptr_t (*syscallptr)(intptr_t, ...) );
char fname[MAX_OSPATH];
char *basepath;
char *homepath;
char *pwdpath;
char *gamedir;
assert( name );
Q_snprintf (fname, sizeof(fname), "%s" ARCH_STRING DLL_EXT, name);
// TODO: use fs_searchpaths from files.c
pwdpath = Sys_Cwd();
basepath = Cvar_VariableString( "fs_basepath" );
homepath = Cvar_VariableString( "fs_homepath" );
gamedir = Cvar_VariableString( "fs_game" );
libHandle = Sys_TryLibraryLoad(pwdpath, gamedir, fname, fqpath);
if(!libHandle && homepath)
libHandle = Sys_TryLibraryLoad(homepath, gamedir, fname, fqpath);
if(!libHandle && basepath)
libHandle = Sys_TryLibraryLoad(basepath, gamedir, fname, fqpath);
if(!libHandle) {
Com_Printf ( "Sys_LoadDll(%s) failed to load library\n", name );
return NULL;
}
dllEntry = Sys_LoadFunction( libHandle, "dllEntry" );
*entryPoint = Sys_LoadFunction( libHandle, "vmMain" );
if ( !*entryPoint || !dllEntry )
{
Com_Printf ( "Sys_LoadDll(%s) failed to find vmMain function:\n\"%s\" !\n", name, Sys_LibraryError( ) );
Sys_UnloadLibrary(libHandle);
return NULL;
}
Com_Printf ( "Sys_LoadDll(%s) found vmMain function at %p\n", name, *entryPoint );
dllEntry( systemcalls );
return libHandle;
}
/**
* @brief Loads a mod library.
* #1 look in fs_homepath
* #2 look in fs_basepath
* #3 try to revert to the default mod library
*/
void *Sys_LoadGameDll(const char *name,
intptr_t(**entryPoint) (int, ...),
intptr_t (*systemcalls)(intptr_t, ...))
{
void *libHandle;
void (*dllEntry)(intptr_t (*syscallptr)(intptr_t, ...));
char fname[MAX_OSPATH];
char *basepath;
char *homepath;
char *gamedir;
assert(name);
Com_sprintf(fname, sizeof(fname), Sys_GetDLLName("%s"), name);
// TODO: use fs_searchpaths from files.c
basepath = Cvar_VariableString("fs_basepath");
homepath = Cvar_VariableString("fs_homepath");
gamedir = Cvar_VariableString("fs_game");
#ifndef DEDICATED
// if the server is pure, extract the dlls from the mod_bin.pk3 so
// that they can be referenced
if (Cvar_VariableValue("sv_pure") && Q_stricmp(name, "qagame"))
{
Com_Printf("Sys_LoadGameDll -> FS_CL_ExtractFromPakFile(%s, %s, %s)\n", homepath, gamedir, fname);
FS_CL_ExtractFromPakFile(homepath, gamedir, fname);
}
#endif
libHandle = Sys_TryLibraryLoad(homepath, gamedir, fname);
if (!libHandle && basepath)
{
libHandle = Sys_TryLibraryLoad(basepath, gamedir, fname);
}
#ifndef DEDICATED
// According to the code above, if the server is not pure, then the
// lib must either already be in the homepath, or in the basepath,
// without being in a pak. For a pure server, it always grabs the lib
// from within a pak. This means there must be two copies of the lib!
//
// So now, if connecting to an impure server, and the lib was not
// loaded from homepath or the basepath, let's pull it out of the pak.
// This means we only *need* the copy that's in the pak, and will use
// it if another copy isn't found first.
if (!libHandle && !Cvar_VariableValue("sv_pure") && Q_stricmp(name, "qagame"))
{
Com_Printf("Sys_LoadGameDll -> FS_CL_ExtractFromPakFile(%s, %s, %s)\n", homepath, gamedir, fname);
FS_CL_ExtractFromPakFile(homepath, gamedir, fname);
libHandle = Sys_TryLibraryLoad(homepath, gamedir, fname);
}
#endif
// HACK: sometimes a library is loaded from the mod dir when it shouldn't. Why?
if (!libHandle && strcmp(gamedir, DEFAULT_MODGAME))
{
Com_Printf("Sys_LoadDll: failed to load the mod library. Trying to revert to the default one.\n");
libHandle = Sys_TryLibraryLoad(basepath, DEFAULT_MODGAME, fname);
}
if (!libHandle)
{
Com_Printf("Sys_LoadDll(%s) failed to load library\n", name);
return NULL;
}
dllEntry = (void (QDECL *)(intptr_t (QDECL *)(intptr_t, ...)))Sys_LoadFunction(libHandle, "dllEntry");
*entryPoint = (intptr_t (QDECL *)(int, ...))Sys_LoadFunction(libHandle, "vmMain");
if (!*entryPoint || !dllEntry)
{
Com_Printf("Sys_LoadDll(%s) failed to find vmMain function:\n\"%s\" !\n", name, Sys_LibraryError());
Sys_UnloadLibrary(libHandle);
return NULL;
}
Com_Printf("Sys_LoadDll(%s) found vmMain function at %p\n", name, *entryPoint);
dllEntry(systemcalls);
return libHandle;
}
/**
* @brief Loads a mod library.
* #1 look in fs_homepath
* #2 look in fs_basepath
* #3 try to revert to the default mod library
*/
void *Sys_LoadGameDll(const char *name, qboolean extract,
intptr_t(**entryPoint) (int, ...),
intptr_t (*systemcalls)(intptr_t, ...))
{
void *libHandle;
void (*dllEntry)(intptr_t (*syscallptr)(intptr_t, ...));
char fname[MAX_OSPATH];
char *basepath;
char *homepath;
char *gamedir;
assert(name);
Com_sprintf(fname, sizeof(fname), Sys_GetDLLName("%s"), name);
// TODO: use fs_searchpaths from files.c
basepath = Cvar_VariableString("fs_basepath");
homepath = Cvar_VariableString("fs_homepath");
gamedir = Cvar_VariableString("fs_game");
// STORY TIME
//
//When doing an debug build just load the mod lib from the basepath as that will have the debug pointers
//
// Now the code always just unpacks new libraries from the packs on release builds.
// So the libraryfiles in the homepath are always refreshed with latest from the packs.
// This fixes many issues with clients loading old libraries from the mod paths.
//
// The way it used to work is described under (or in debug mode)..
//
// if the server is pure, extract the dlls from the mod_bin.pk3 so
// that they can be referenced
//
// If the server is not pure, then the
// lib must either already be in the homepath, or in the basepath,
// without being in a pak. For a pure server, it always grabs the lib
// from within a pak. This means there must be two copies of the lib!
//
// So now, if connecting to an impure server, and the lib was not
// loaded from homepath or the basepath, let's pull it out of the pak.
// This means we only *need* the copy that's in the pak, and will use
// it if another copy isn't found first.
#ifdef LEGACY_DEBUG
#define SEARCHPATH1 basepath
#define SEARCHPATH2 homepath
#define LIB_DO_UNPACK Cvar_VariableIntegerValue("sv_pure")
#else
#define LIB_DO_UNPACK qtrue
#define SEARCHPATH1 homepath
#define SEARCHPATH2 basepath
#endif
#ifndef DEDICATED
if (LIB_DO_UNPACK && extract)
{
Com_Printf("Sys_LoadGameDll -> FS_CL_ExtractFromPakFile(%s, %s, %s)\n", homepath, gamedir, fname);
FS_CL_ExtractFromPakFile(homepath, gamedir, fname);
}
#endif
libHandle = Sys_TryLibraryLoad(SEARCHPATH1, gamedir, fname);
if (!libHandle && SEARCHPATH2)
{
libHandle = Sys_TryLibraryLoad(SEARCHPATH2, gamedir, fname);
}
#ifndef DEDICATED
if (!libHandle && !LIB_DO_UNPACK && extract)
{
Com_Printf("Sys_LoadGameDll -> FS_CL_ExtractFromPakFile(%s, %s, %s)\n", homepath, gamedir, fname);
FS_CL_ExtractFromPakFile(homepath, gamedir, fname);
libHandle = Sys_TryLibraryLoad(homepath, gamedir, fname);
}
#endif
if (!libHandle)
{
Com_Printf("Sys_LoadDll(%s/%s) failed to load library\n", gamedir, name);
return NULL;
}
dllEntry = (void (QDECL *)(intptr_t (QDECL *)(intptr_t, ...)))Sys_LoadFunction(libHandle, "dllEntry");
*entryPoint = (intptr_t (QDECL *)(int, ...))Sys_LoadFunction(libHandle, "vmMain");
if (!*entryPoint || !dllEntry)
{
Com_Printf("Sys_LoadDll(%s/%s) failed to find vmMain function:\n\"%s\" !\n", gamedir, name, Sys_LibraryError());
Sys_UnloadLibrary(libHandle);
return NULL;
}
Com_Printf("Sys_LoadDll(%s/%s) found vmMain function at %p\n", gamedir, name, *entryPoint);
dllEntry(systemcalls);
return libHandle;
}
/**
* @brief Loads a mod library.
* #1 look in fs_homepath
* #2 look in fs_basepath
* #3 try to revert to the default mod library
*/
void *Sys_LoadDll(const char *name,
intptr_t(**entryPoint) (int, ...),
intptr_t (*systemcalls)(intptr_t, ...))
{
void *libHandle;
void (*dllEntry)(intptr_t (*syscallptr)(intptr_t, ...));
char fname[MAX_OSPATH];
char *basepath;
char *homepath;
char *gamedir;
assert(name);
Com_sprintf(fname, sizeof(fname), Sys_GetDLLName("%s"), name);
// TODO: use fs_searchpaths from files.c
basepath = Cvar_VariableString("fs_basepath");
homepath = Cvar_VariableString("fs_homepath");
gamedir = Cvar_VariableString("fs_game");
#ifndef DEDICATED
// if the server is pure, extract the dlls from the mp_bin.pk3 so
// that they can be referenced
if (Cvar_VariableValue("sv_pure") && Q_stricmp(name, "qagame"))
{
FS_CL_ExtractFromPakFile(homepath, gamedir, fname);
}
#endif
libHandle = Sys_TryLibraryLoad(homepath, gamedir, fname);
if (!libHandle && basepath)
{
libHandle = Sys_TryLibraryLoad(basepath, gamedir, fname);
}
// HACK: sometimes a library is loaded from the mod dir when it shouldn't. Why?
if (!libHandle && strcmp(gamedir, DEFAULT_MODGAME))
{
Com_Printf("Sys_LoadDll: failed to load the mod library. Trying to revert to the default one.\n");
libHandle = Sys_TryLibraryLoad(basepath, DEFAULT_MODGAME, fname);
}
if (!libHandle)
{
Com_Printf("Sys_LoadDll(%s) failed to load library\n", name);
return NULL;
}
dllEntry = (void (QDECL *)(intptr_t (QDECL *)(intptr_t, ...)))Sys_LoadFunction(libHandle, "dllEntry");
*entryPoint = (intptr_t (QDECL *)(int, ...))Sys_LoadFunction(libHandle, "vmMain");
if (!*entryPoint || !dllEntry)
{
Com_Printf("Sys_LoadDll(%s) failed to find vmMain function:\n\"%s\" !\n", name, Sys_LibraryError());
Sys_UnloadLibrary(libHandle);
return NULL;
}
Com_Printf("Sys_LoadDll(%s) found vmMain function at %p\n", name, *entryPoint);
dllEntry(systemcalls);
return libHandle;
}
/*
=================
Sys_LoadDll
Used to load a development dll instead of a virtual machine
#1 look in fs_homepath
#2 look in fs_basepath
#4 look in fs_libpath under FreeBSD
=================
*/
void *QDECL Sys_LoadDll( const char *name, char *fqpath, intptr_t (QDECL **entryPoint)(int, ...), intptr_t (QDECL *systemcalls)(intptr_t, ...) ) {
void *libHandle = NULL, (QDECL *dllEntry)( intptr_t (QDECL *syscallptr)(intptr_t, ...) );
char fname[MAX_QPATH], *basepath, *homepath, *gamedir, *libpath;
assert( name );
//Q_snprintf (fname, sizeof(fname), Sys_GetDLLName( "%s" ), name);
Q_strncpyz(fname, Sys_GetDLLName(name), sizeof(fname));
// TODO: use fs_searchpaths from files.c
basepath = Cvar_VariableString( "fs_basepath" );
homepath = Cvar_VariableString( "fs_homepath" );
gamedir = Cvar_VariableString( "fs_game" );
libpath = Cvar_VariableString( "fs_libpath" );
#ifndef DEDICATED
// if the server is pure, extract the dlls from the mp_bin.pk3 so
// that they can be referenced
if ( Cvar_VariableValue( "sv_pure" ) && Q_stricmp( name, "qagame" ) ) {
FS_CL_ExtractFromPakFile( homepath, gamedir, fname );
}
#endif
libHandle = Sys_TryLibraryLoad(homepath, gamedir, fname, fqpath);
if (!libHandle && libpath && libpath[0]) {
libHandle = Sys_TryLibraryLoad(libpath, gamedir, fname, fqpath);
}
if(!libHandle && basepath) {
libHandle = Sys_TryLibraryLoad(basepath, gamedir, fname, fqpath);
}
if(!libHandle) {
Com_Printf( "Sys_LoadDll(%s) could not find it\n", fname );
return NULL;
}
if(!libHandle) {
Com_Printf( "Sys_LoadDll(%s) failed:\n\"%s\"\n", name, Sys_LibraryError() );
return NULL;
}
// Try to load the dllEntry and vmMain function.
dllEntry = ( void ( QDECL * )( intptr_t ( QDECL * )( intptr_t, ... ) ) )Sys_LoadFunction( libHandle, "dllEntry" );
*entryPoint = ( intptr_t ( QDECL * )( int,... ) )Sys_LoadFunction( libHandle, "vmMain" );
if ( !*entryPoint || !dllEntry ) {
#ifndef NDEBUG
if (!dllEntry) {
Com_Error ( ERR_FATAL, "Sys_LoadDll(%s) failed SDL_LoadFunction(dllEntry):\n\"%p\" !\n", name, Sys_LibraryError() );
} else {
Com_Error ( ERR_FATAL, "Sys_LoadDll(%s) failed SDL_LoadFunction(vmMain):\n\"%p\" !\n", name, Sys_LibraryError() );
}
#else
if (!dllEntry) {
Com_Printf ( "Sys_LoadDll(%s) failed SDL_LoadFunction(dllEntry):\n\"%p\" !\n", name, Sys_LibraryError() );
} else {
Com_Printf ( "Sys_LoadDll(%s) failed SDL_LoadFunction(vmMain):\n\"%p\" !\n", name, Sys_LibraryError() );
}
#endif
Sys_UnloadLibrary(libHandle);
return NULL;
}
Com_Printf ( "Sys_LoadDll(%s) found vmMain function at %p\n", name, *entryPoint );
dllEntry( systemcalls );
Com_Printf ( "Sys_LoadDll(%s) succeeded!\n", name );
// Copy the fname to fqpath.
Q_strncpyz ( fqpath , fname , MAX_QPATH ) ;
return libHandle;
}
