This repository has been archived on 2022-06-27. You can view files and clone it, but cannot push or open issues or pull requests.
Xash3DArchive/engine/server/sv_game.c

3054 lines
66 KiB
C

//=======================================================================
// Copyright XashXT Group 2008 ©
// sv_game.c - server dlls interaction
//=======================================================================
#include "common.h"
#include "server.h"
#include "byteorder.h"
#include "matrix_lib.h"
#include "com_library.h"
#include "const.h"
#define EOFS( x ) (int)&(((entvars_t *)0)->x)
void Sys_FsGetString( file_t *f, char *str )
{
char ch;
while( (ch = FS_Getc( f )) != EOF )
{
*str++ = ch;
if( !ch ) break;
}
}
void Sys_FreeNameFuncGlobals( void )
{
int i;
if( svgame.ordinals ) Mem_Free( svgame.ordinals );
if( svgame.funcs) Mem_Free( svgame.funcs);
for( i = 0; i < svgame.num_ordinals; i++ )
{
if( svgame.names[i] )
Mem_Free( svgame.names[i] );
}
svgame.num_ordinals = 0;
svgame.ordinals = NULL;
svgame.funcs = NULL;
}
char *Sys_GetMSVCName( const char *in_name )
{
char *pos, *out_name;
if( in_name[0] == '?' ) // is this a MSVC C++ mangled name?
{
if(( pos = com.strstr( in_name, "@@" )) != NULL )
{
int len = pos - in_name;
// strip off the leading '?'
out_name = com.stralloc( svgame.private, in_name + 1, __FILE__, __LINE__ );
out_name[len-1] = 0; // terminate string at the "@@"
return out_name;
}
}
return com.stralloc( svgame.private, in_name, __FILE__, __LINE__ );
}
bool Sys_LoadSymbols( const char *filename )
{
file_t *f;
DOS_HEADER dos_header;
LONG nt_signature;
PE_HEADER pe_header;
SECTION_HEADER section_header;
bool edata_found;
OPTIONAL_HEADER optional_header;
long edata_offset;
long edata_delta;
EXPORT_DIRECTORY export_directory;
long name_offset;
long ordinal_offset;
long function_offset;
string function_name;
dword *p_Names = NULL;
int i, index;
for( i = 0; i < svgame.num_ordinals; i++ )
svgame.names[i] = NULL;
f = FS_Open( filename, "rb" );
if( !f )
{
MsgDev( D_ERROR, "Sys_LoadSymbols: %s not found\n", filename );
return false;
}
if( FS_Read( f, &dos_header, sizeof(dos_header)) != sizeof( dos_header ))
{
MsgDev( D_ERROR, "Sys_LoadSymbols: %s has corrupted EXE header\n", filename );
FS_Close( f );
return false;
}
if( dos_header.e_magic != DOS_SIGNATURE )
{
MsgDev( D_ERROR, "Sys_LoadSymbols: %s does not have a valid dll signature\n", filename );
FS_Close( f );
return false;
}
if( FS_Seek( f, dos_header.e_lfanew, SEEK_SET ) == -1 )
{
MsgDev( D_ERROR, "Sys_LoadSymbols: %s error seeking to new exe header\n", filename );
FS_Close( f );
return false;
}
if( FS_Read( f, &nt_signature, sizeof( nt_signature )) != sizeof( nt_signature ))
{
MsgDev( D_ERROR, "Sys_LoadSymbols: %s has corrupted NT header\n", filename );
FS_Close( f );
return false;
}
if( nt_signature != NT_SIGNATURE )
{
MsgDev( D_ERROR, "Sys_LoadSymbols: %s does not have a valid NT signature\n", filename );
FS_Close( f );
return false;
}
if( FS_Read( f, &pe_header, sizeof( pe_header )) != sizeof( pe_header ))
{
MsgDev( D_ERROR, "Sys_LoadSymbols: %s does not have a valid PE header\n", filename );
FS_Close( f );
return false;
}
if( !pe_header.SizeOfOptionalHeader )
{
MsgDev( D_ERROR, "Sys_LoadSymbols: %s does not have an optional header\n", filename );
FS_Close( f );
return false;
}
if( FS_Read( f, &optional_header, sizeof( optional_header )) != sizeof( optional_header ))
{
MsgDev( D_ERROR, "Sys_LoadSymbols: %s optional header probably corrupted\n", filename );
FS_Close( f );
return false;
}
edata_found = false;
for( i = 0; i < pe_header.NumberOfSections; i++ )
{
if( FS_Read( f, &section_header, sizeof( section_header )) != sizeof( section_header ))
{
MsgDev( D_ERROR, "Sys_LoadSymbols: %s error during reading section header\n", filename );
FS_Close( f );
return false;
}
if( !com.strcmp((char *)section_header.Name, ".edata" ))
{
edata_found = TRUE;
break;
}
}
if( edata_found )
{
edata_offset = section_header.PointerToRawData;
edata_delta = section_header.VirtualAddress - section_header.PointerToRawData;
}
else
{
edata_offset = optional_header.DataDirectory[0].VirtualAddress;
edata_delta = 0L;
}
if( FS_Seek( f, edata_offset, SEEK_SET ) == -1 )
{
MsgDev( D_ERROR, "Sys_LoadSymbols: %s does not have a valid exports section\n", filename );
FS_Close( f );
return false;
}
if( FS_Read( f, &export_directory, sizeof( export_directory )) != sizeof( export_directory ))
{
MsgDev( D_ERROR, "Sys_LoadSymbols: %s does not have a valid optional header\n", filename );
FS_Close( f );
return false;
}
svgame.num_ordinals = export_directory.NumberOfNames; // also number of ordinals
if( svgame.num_ordinals > MAX_SYSPATH )
{
MsgDev( D_ERROR, "Sys_LoadSymbols: %s too many exports\n", filename );
FS_Close( f );
return false;
}
ordinal_offset = export_directory.AddressOfNameOrdinals - edata_delta;
if( FS_Seek( f, ordinal_offset, SEEK_SET ) == -1 )
{
MsgDev( D_ERROR, "Sys_LoadSymbols: %s does not have a valid ordinals section\n", filename );
FS_Close( f );
return false;
}
svgame.ordinals = Z_Malloc( svgame.num_ordinals * sizeof( word ));
if( FS_Read( f, svgame.ordinals, svgame.num_ordinals * sizeof( word )) != (svgame.num_ordinals * sizeof( word )))
{
Sys_FreeNameFuncGlobals();
MsgDev( D_ERROR, "Sys_LoadSymbols: %s error during reading ordinals table\n", filename );
FS_Close( f );
return false;
}
function_offset = export_directory.AddressOfFunctions - edata_delta;
if( FS_Seek( f, function_offset, SEEK_SET ) == -1 )
{
MsgDev( D_ERROR, "Sys_LoadSymbols: %s does not have a valid export address section\n", filename );
FS_Close( f );
return false;
}
svgame.funcs = Z_Malloc( svgame.num_ordinals * sizeof( dword ));
if( FS_Read( f, svgame.funcs, svgame.num_ordinals * sizeof( dword )) != (svgame.num_ordinals * sizeof( dword )))
{
Sys_FreeNameFuncGlobals();
MsgDev( D_ERROR, "Sys_LoadSymbols: %s error during reading export address section\n", filename );
FS_Close( f );
return false;
}
name_offset = export_directory.AddressOfNames - edata_delta;
if( FS_Seek( f, name_offset, SEEK_SET ) == -1 )
{
Sys_FreeNameFuncGlobals();
MsgDev( D_ERROR, "Sys_LoadSymbols: %s file does not have a valid names section\n", filename );
FS_Close( f );
return false;
}
p_Names = Z_Malloc( svgame.num_ordinals * sizeof( dword ));
if( FS_Read( f, p_Names, svgame.num_ordinals * sizeof( dword )) != (svgame.num_ordinals * sizeof( dword )))
{
Sys_FreeNameFuncGlobals();
if( p_Names ) Mem_Free( p_Names );
MsgDev( D_ERROR, "Sys_LoadSymbols: %s error during reading names table\n", filename );
FS_Close( f );
return false;
}
for( i = 0; i < svgame.num_ordinals; i++ )
{
name_offset = p_Names[i] - edata_delta;
if( name_offset != 0 )
{
if( FS_Seek( f, name_offset, SEEK_SET ) != -1 )
{
Sys_FsGetString( f, function_name );
svgame.names[i] = Sys_GetMSVCName( function_name );
}
else break;
}
}
if( i != svgame.num_ordinals )
{
Sys_FreeNameFuncGlobals();
if( p_Names ) Mem_Free( p_Names );
MsgDev( D_ERROR, "Sys_LoadSymbols: %s error during loading names section\n", filename );
FS_Close( f );
return false;
}
FS_Close( f );
for( i = 0; i < svgame.num_ordinals; i++ )
{
if( !com.strcmp( "GiveFnptrsToDll", svgame.names[i] ))
{
void *fn_offset;
index = svgame.ordinals[i];
fn_offset = (void *)Com_GetProcAddress( svgame.hInstance, "GiveFnptrsToDll" );
svgame.funcBase = (dword)(fn_offset) - svgame.funcs[index];
break;
}
}
if( p_Names ) Mem_Free( p_Names );
return true;
}
/*
============
SV_CalcBBox
FIXME: get to work
============
*/
void SV_CalcBBox( edict_t *ent, const float *mins, const float *maxs )
{
vec3_t rmin, rmax;
int i, j, k, l;
float a, *angles;
vec3_t bounds[2];
float xvector[2], yvector[2];
vec3_t base, transformed;
// find min / max for rotations
angles = ent->v.angles;
a = angles[1]/180 * M_PI;
xvector[0] = cos(a);
xvector[1] = sin(a);
yvector[0] = -sin(a);
yvector[1] = cos(a);
VectorCopy( mins, bounds[0] );
VectorCopy( maxs, bounds[1] );
rmin[0] = rmin[1] = rmin[2] = 9999;
rmax[0] = rmax[1] = rmax[2] = -9999;
for( i = 0; i <= 1; i++ )
{
base[0] = bounds[i][0];
for( j = 0; j <= 1; j++ )
{
base[1] = bounds[j][1];
for( k = 0; k <= 1; k++ )
{
base[2] = bounds[k][2];
// transform the point
transformed[0] = xvector[0] * base[0] + yvector[0] * base[1];
transformed[1] = xvector[1] * base[0] + yvector[1] * base[1];
transformed[2] = base[2];
for( l = 0; l < 3; l++ )
{
if( transformed[l] < rmin[l] ) rmin[l] = transformed[l];
if( transformed[l] > rmax[l] ) rmax[l] = transformed[l];
}
}
}
}
VectorCopy( rmin, ent->v.mins );
VectorCopy( rmax, ent->v.maxs );
}
void SV_SetMinMaxSize( edict_t *e, const float *min, const float *max, bool rotate )
{
int i;
for( i = 0; i < 3; i++ )
if( min[i] > max[i] )
Host_Error( "SV_SetMinMaxSize: backwards mins/maxs\n" );
rotate = false; // FIXME
// set derived values
if( rotate && e->v.solid == SOLID_BBOX )
{
SV_CalcBBox( e, min, max );
}
else
{
VectorCopy( min, e->v.mins);
VectorCopy( max, e->v.maxs);
}
VectorSubtract( max, min, e->v.size );
// TODO: fill also mass and density
SV_LinkEdict (e);
}
void SV_CopyTraceResult( TraceResult *out, trace_t trace )
{
if( !out ) return;
out->fAllSolid = trace.allsolid;
out->fStartSolid = trace.startsolid;
out->fStartStuck = trace.startstuck;
out->flFraction = trace.fraction;
out->iStartContents = trace.startcontents;
out->iContents = trace.contents;
out->iHitgroup = trace.hitgroup;
out->flPlaneDist = trace.plane.dist;
VectorCopy( trace.endpos, out->vecEndPos );
VectorCopy( trace.plane.normal, out->vecPlaneNormal );
if( trace.surface )
out->pTexName = trace.surface->name;
else out->pTexName = NULL;
out->pHit = trace.ent;
}
void SV_CopyTraceToGlobal( trace_t *trace )
{
svgame.globals->trace_allsolid = trace->allsolid;
svgame.globals->trace_startsolid = trace->startsolid;
svgame.globals->trace_startstuck = trace->startstuck;
svgame.globals->trace_contents = trace->contents;
svgame.globals->trace_start_contents = trace->startcontents;
svgame.globals->trace_fraction = trace->fraction;
svgame.globals->trace_plane_dist = trace->plane.dist;
svgame.globals->trace_ent = trace->ent;
VectorCopy( trace->endpos, svgame.globals->trace_endpos );
VectorCopy( trace->plane.normal, svgame.globals->trace_plane_normal );
if( trace->surface )
svgame.globals->trace_texture = trace->surface->name;
else svgame.globals->trace_texture = NULL;
svgame.globals->trace_hitgroup = trace->hitgroup;
}
static trace_t SV_TraceToss( edict_t *tossent, edict_t *ignore)
{
int i;
float gravity;
vec3_t move, end;
vec3_t original_origin;
vec3_t original_velocity;
vec3_t original_angles;
vec3_t original_avelocity;
trace_t trace;
VectorCopy( tossent->v.origin, original_origin );
VectorCopy( tossent->v.velocity, original_velocity );
VectorCopy( tossent->v.angles, original_angles );
VectorCopy( tossent->v.avelocity, original_avelocity );
gravity = tossent->v.gravity * sv_gravity->value * 0.05;
for( i = 0; i < 200; i++ )
{
// LordHavoc: sanity check; never trace more than 10 seconds
SV_CheckVelocity( tossent );
tossent->v.velocity[2] -= gravity;
VectorMA( tossent->v.angles, 0.05, tossent->v.avelocity, tossent->v.angles );
VectorScale( tossent->v.velocity, 0.05, move );
VectorAdd( tossent->v.origin, move, end );
trace = SV_Trace( tossent->v.origin, tossent->v.mins, tossent->v.maxs, end, MOVE_NORMAL, tossent, SV_ContentsMask( tossent ));
VectorCopy( trace.endpos, tossent->v.origin );
if( trace.fraction < 1 ) break;
}
VectorCopy( original_origin, tossent->v.origin );
VectorCopy( original_velocity, tossent->v.velocity );
VectorCopy( original_angles, tossent->v.angles );
VectorCopy( original_avelocity, tossent->v.avelocity );
return trace;
}
bool SV_CheckForPhysobject( edict_t *ent )
{
if( !ent ) return false;
switch( (int)ent->v.solid )
{
case SOLID_BSP:
switch( (int)ent->v.movetype )
{
case MOVETYPE_NONE: // static physobject (no gravity)
case MOVETYPE_PUSH: // dynamic physobject (no gravity)
case MOVETYPE_CONVEYOR:
// return true;
default: return false;
}
break;
case SOLID_BOX:
case SOLID_SPHERE:
case SOLID_CYLINDER:
case SOLID_MESH:
switch( (int)ent->v.movetype )
{
case MOVETYPE_PHYSIC: // dynamic physobject (with gravity)
return true;
default: return false;
}
break;
default: return false;
}
}
void SV_CreatePhysBody( edict_t *ent )
{
if( !SV_CheckForPhysobject( ent )) return;
ent->pvServerData->physbody = pe->CreateBody( ent, SV_GetModelPtr(ent), ent->v.origin, ent->v.m_pmatrix, ent->v.solid, ent->v.movetype );
pe->SetParameters( ent->pvServerData->physbody, SV_GetModelPtr(ent), 0, ent->v.mass );
}
void SV_SetPhysForce( edict_t *ent )
{
if( !SV_CheckForPhysobject( ent )) return;
pe->SetForce( ent->pvServerData->physbody, ent->v.velocity, ent->v.avelocity, ent->v.force, ent->v.torque );
}
void SV_SetMassCentre( edict_t *ent )
{
if( !SV_CheckForPhysobject( ent )) return;
pe->SetMassCentre( ent->pvServerData->physbody, ent->v.m_pcentre );
}
void SV_SetModel( edict_t *ent, const char *name )
{
int i;
cmodel_t *mod;
vec3_t angles;
int mod_type = mod_bad;
i = SV_ModelIndex( name );
if( i == 0 ) return;
ent->v.model = MAKE_STRING( sv.configstrings[CS_MODELS+i] );
ent->v.modelindex = i;
mod = pe->RegisterModel( name ); // precache sv.model
if( !mod ) MsgDev( D_ERROR, "SV_SetModel: %s not found\n", name );
else mod_type = mod->type;
// can be changed from qc-code later
switch( mod_type )
{
case mod_brush:
case mod_sprite:
SV_SetMinMaxSize( ent, mod->mins, mod->maxs, false );
break;
case mod_studio:
case mod_bad:
SV_SetMinMaxSize( ent, vec3_origin, vec3_origin, false );
break;
}
switch( ent->v.movetype )
{
case MOVETYPE_PHYSIC:
// FIXME: translate angles correctly
angles[0] = ent->v.angles[0] - 180;
angles[1] = ent->v.angles[1];
angles[2] = ent->v.angles[2] - 90;
break;
case MOVETYPE_NONE:
case MOVETYPE_PUSH:
case MOVETYPE_CONVEYOR:
VectorClear( angles );
ent->v.mass = 0.0f;
break;
}
if( !sv.loadgame )
{
Matrix3x3_FromAngles( angles, ent->v.m_pmatrix );
Matrix3x3_Transpose( ent->v.m_pmatrix, ent->v.m_pmatrix );
}
SV_CreatePhysBody( ent );
}
float SV_AngleMod( float ideal, float current, float speed )
{
float move;
if (current == ideal) // already there?
return anglemod( current );
move = ideal - current;
if (ideal > current)
{
if (move >= 180) move = move - 360;
}
else
{
if (move <= -180) move = move + 360;
}
if (move > 0)
{
if (move > speed) move = speed;
}
else
{
if (move < -speed) move = -speed;
}
return anglemod(current + move);
}
void SV_ConfigString( int index, const char *val )
{
if(index < 0 || index >= MAX_CONFIGSTRINGS)
Host_Error ("configstring: bad index %i value %s\n", index, val);
if(!*val) val = "";
// change the string in sv
com.strcpy( sv.configstrings[index], val );
if( sv.state != ss_loading )
{
// send the update to everyone
MSG_Clear( &sv.multicast );
MSG_Begin(svc_configstring);
MSG_WriteShort (&sv.multicast, index);
MSG_WriteString (&sv.multicast, (char *)val);
MSG_Send(MSG_ALL_R, vec3_origin, NULL );
}
}
bool SV_EntitiesIn( bool mode, vec3_t v1, vec3_t v2 )
{
int leafnum, cluster;
int area1, area2;
byte *mask;
leafnum = pe->PointLeafnum (v1);
cluster = pe->LeafCluster (leafnum);
area1 = pe->LeafArea (leafnum);
if( mode == DVIS_PHS ) mask = pe->ClusterPHS( cluster );
else if( mode == DVIS_PVS ) mask = pe->ClusterPVS( cluster );
else Host_Error( "SV_EntitiesIn: unsupported mode\n" );
leafnum = pe->PointLeafnum (v2);
cluster = pe->LeafCluster (leafnum);
area2 = pe->LeafArea (leafnum);
if( mask && (!(mask[cluster>>3] & (1<<(cluster&7)))))
return false;
else if (!pe->AreasConnected (area1, area2))
return false;
return true;
}
void SV_InitEdict( edict_t *pEdict )
{
Com_Assert( pEdict == NULL );
Com_Assert( pEdict->pvPrivateData != NULL );
pEdict->v.pContainingEntity = pEdict; // make cross-links for consistency
pEdict->pvServerData = (sv_priv_t *)Mem_Alloc( svgame.mempool, sizeof( sv_priv_t ));
pEdict->pvPrivateData = NULL; // will be alloced later by pfnAllocPrivateData
pEdict->serialnumber = NUM_FOR_EDICT( pEdict );
pEdict->free = false;
}
void SV_FreeEdict( edict_t *pEdict )
{
Com_Assert( pEdict == NULL );
Com_Assert( pEdict->free );
// unlink from world
SV_UnlinkEdict( pEdict );
pe->RemoveBody( pEdict->pvServerData->physbody );
if( pEdict->pvServerData ) Mem_Free( pEdict->pvServerData );
if( pEdict->pvPrivateData ) Mem_Free( pEdict->pvPrivateData );
Mem_Set( &pEdict->v, 0, sizeof( entvars_t ));
pEdict->pvServerData = NULL;
pEdict->pvPrivateData = NULL;
// mark edict as freed
pEdict->freetime = sv.time;
pEdict->v.nextthink = -1;
pEdict->serialnumber = 0;
pEdict->free = true;
}
edict_t *SV_AllocEdict( void )
{
edict_t *pEdict;
int i;
for( i = svgame.globals->maxClients + 1; i < svgame.globals->numEntities; i++ )
{
pEdict = EDICT_NUM( i );
// the first couple seconds of server time can involve a lot of
// freeing and allocating, so relax the replacement policy
if( pEdict->free && ( pEdict->freetime < 2.0f || (sv.time - pEdict->freetime) > 0.5f ))
{
SV_InitEdict( pEdict );
return pEdict;
}
}
if( i == svgame.globals->maxEntities )
Host_Error( "SV_AllocEdict: no free edicts\n" );
svgame.globals->numEntities++;
pEdict = EDICT_NUM( i );
SV_InitEdict( pEdict );
return pEdict;
}
edict_t* SV_AllocPrivateData( edict_t *ent, string_t className )
{
const char *pszClassName;
LINK_ENTITY_FUNC SpawnEdict;
pszClassName = STRING( className );
if( !ent ) ent = SV_AllocEdict();
else if( ent->free ) SV_InitEdict( ent ); // FIXME
ent->v.classname = className;
ent->v.pContainingEntity = ent; // re-link
// allocate edict private memory (passed by dlls)
SpawnEdict = (LINK_ENTITY_FUNC)Com_GetProcAddress( svgame.hInstance, pszClassName );
if( !SpawnEdict )
{
// attempt to create custom entity
if( svgame.dllFuncs.pfnCreate( ent, pszClassName ) == -1 )
{
ent->v.flags |= FL_KILLME;
MsgDev( D_ERROR, "No spawn function for %s\n", pszClassName );
return ent; // this edict will be removed from map
}
}
else SpawnEdict( &ent->v );
Com_Assert( ent->pvServerData == NULL )
// also register classname to send for client
ent->pvServerData->s.classname = SV_ClassIndex( pszClassName );
return ent;
}
void SV_FreeEdicts( void )
{
int i;
edict_t *ent;
for( i = 0; i < svgame.globals->numEntities; i++ )
{
ent = EDICT_NUM( i );
if( ent->free ) continue;
SV_FreeEdict( ent );
}
if( !sv.loadgame )
{
// leave unchanged, because we wan't load it twice
StringTable_Clear( svgame.hStringTable );
svgame.dllFuncs.pfnServerDeactivate();
}
svgame.globals->numEntities = 0;
svgame.globals->numClients = 0;
svgame.globals->mapname = 0;
}
/*
===============================================================================
Game Builtin Functions
===============================================================================
*/
/*
=========
pfnMemAlloc
=========
*/
static void *pfnMemAlloc( size_t cb, const char *filename, const int fileline )
{
return com.malloc( svgame.private, cb, filename, fileline );
}
/*
=========
pfnMemFree
=========
*/
static void pfnMemFree( void *mem, const char *filename, const int fileline )
{
com.free( mem, filename, fileline );
}
/*
=========
pfnPrecacheModel
=========
*/
int pfnPrecacheModel( const char *s )
{
return SV_ModelIndex( s );
}
/*
=========
pfnPrecacheSound
=========
*/
int pfnPrecacheSound( const char *s )
{
return SV_SoundIndex( s );
}
/*
=================
pfnSetModel
=================
*/
void pfnSetModel( edict_t *e, const char *m )
{
if( e == EDICT_NUM( 0 ))
{
MsgDev( D_WARN, "SV_SetModel: can't modify world entity\n" );
return;
}
if( e->free )
{
MsgDev( D_WARN, "SV_SetModel: can't modify free entity\n" );
return;
}
if( m[0] <= ' ' )
{
MsgDev( D_WARN, "SV_SetModel: null name\n" );
return;
}
SV_SetModel( e, m );
}
/*
=================
pfnModelIndex
=================
*/
int pfnModelIndex( const char *m )
{
int index;
if( !com.strcmp( m, "" )) return 0;
index = SV_FindIndex( m, CS_MODELS, MAX_MODELS, false );
if( !index ) MsgDev( D_WARN, "SV_ModelIndex: %s not precached\n", m );
return index;
}
/*
=================
pfnModelFrames
=================
*/
int pfnModelFrames( int modelIndex )
{
cmodel_t *mod;
// can be returned pointer on a registered model
mod = pe->RegisterModel( sv.configstrings[CS_MODELS + modelIndex] );
if( mod ) return mod->numframes;
MsgDev( D_WARN, "SV_ModelFrames: %s not found\n", sv.configstrings[CS_MODELS + modelIndex] );
return 0;
}
/*
=================
pfnSetSize
=================
*/
void pfnSetSize( edict_t *e, const float *rgflMin, const float *rgflMax )
{
if( !e || !e->pvPrivateData )
{
MsgDev( D_ERROR, "SV_SetSize: entity not exist\n" );
return;
}
else if( e == EDICT_NUM( 0 ))
{
MsgDev( D_ERROR, "SV_SetSize: can't modify world entity\n" );
return;
}
else if( e->free )
{
MsgDev( D_ERROR, "SV_SetSize: can't modify free entity\n" );
return;
}
SV_SetMinMaxSize( e, rgflMin, rgflMax, !VectorIsNull( e->v.angles ));
}
/*
=================
pfnChangeLevel
=================
*/
void pfnChangeLevel( const char* s1, const char* s2 )
{
string changelevel_cmd;
com.snprintf( changelevel_cmd, MAX_STRING, "changelevel %s %s\n", s1, s2 );
Cbuf_ExecuteText( EXEC_APPEND, changelevel_cmd );
}
/*
=================
pfnVecToYaw
=================
*/
float pfnVecToYaw( const float *rgflVector )
{
float yaw;
if( rgflVector[1] == 0 && rgflVector[0] == 0 )
{
yaw = 0;
}
else
{
yaw = (int)( com.atan2(rgflVector[1], rgflVector[0]) * 180 / M_PI );
if( yaw < 0 ) yaw += 360;
}
return yaw;
}
/*
=================
pfnVecToAngles
=================
*/
void pfnVecToAngles( const float *rgflVectorIn, float *rgflVectorOut )
{
float forward;
float yaw, pitch;
if( rgflVectorIn[1] == 0 && rgflVectorIn[0] == 0 )
{
yaw = 0;
if( rgflVectorIn[2] > 0 )
pitch = 90;
else pitch = 270;
}
else
{
if( rgflVectorIn[0] )
{
yaw = (int)( com.atan2( rgflVectorIn[1], rgflVectorIn[0] ) * 180 / M_PI );
if( yaw < 0 ) yaw += 360;
}
else if( rgflVectorIn[1] > 0 )
yaw = 90;
else yaw = 270;
forward = com.sqrt( rgflVectorIn[0] * rgflVectorIn[0] + rgflVectorIn[1] * rgflVectorIn[1] );
pitch = (int)( com.atan2( rgflVectorIn[2], forward ) * 180 / M_PI );
if( pitch < 0 ) pitch += 360;
}
if( rgflVectorOut ) VectorSet( rgflVectorOut, pitch, yaw, 0 );
else MsgDev( D_ERROR, "SV_VecToAngles: no output vector specified\n" );
}
/*
=================
pfnMoveToOrigin
FIXME: i'm not sure what is does what you want
=================
*/
void pfnMoveToOrigin( edict_t *ent, const float *pflGoal, float dist, int iMoveType )
{
vec3_t targetDir;
float accelXY = 300.0f, accelZ = 600.0f;
float decay = 9.0f, flInterval = 0.1f; // FIXME
VectorCopy( pflGoal, targetDir );
VectorNormalize( targetDir );
decay = exp( log( decay ) / 1.0f * flInterval );
accelXY *= flInterval;
accelZ *= flInterval;
ent->v.velocity[0] = ( decay * ent->v.velocity[0] + accelXY * targetDir[0] );
ent->v.velocity[1] = ( decay * ent->v.velocity[1] + accelXY * targetDir[1] );
ent->v.velocity[2] = ( decay * ent->v.velocity[2] + accelZ * targetDir[2] );
}
/*
==============
pfnChangeYaw
==============
*/
void pfnChangeYaw( edict_t* ent )
{
float current;
if( ent == EDICT_NUM( 0 ))
{
MsgDev( D_WARN, "SV_ChangeYaw: can't modify world entity\n" );
return;
}
if( ent->free )
{
MsgDev( D_WARN, "SV_ChangeYaw: can't modify free entity\n" );
return;
}
current = anglemod( ent->v.angles[YAW] );
ent->v.angles[YAW] = SV_AngleMod( ent->v.ideal_yaw, current, ent->v.yaw_speed );
}
/*
==============
pfnChangePitch
==============
*/
void pfnChangePitch( edict_t* ent )
{
float current;
if( ent == EDICT_NUM( 0 ))
{
MsgDev( D_WARN, "SV_ChangePitch: can't modify world entity\n" );
return;
}
if( ent->free )
{
MsgDev( D_WARN, "SV_ChangePitch: can't modify free entity\n" );
return;
}
current = anglemod( ent->v.angles[PITCH] );
ent->v.angles[PITCH] = SV_AngleMod( ent->v.ideal_pitch, current, ent->v.pitch_speed );
}
/*
=========
pfnFindEntityByString
=========
*/
edict_t* pfnFindEntityByString( edict_t *pStartEdict, const char *pszField, const char *pszValue )
{
int f, e = 0;
edict_t *ed;
const char *t;
if( pStartEdict ) e = NUM_FOR_EDICT( pStartEdict );
if( !pszValue || !*pszValue ) return NULL;
// FIXME: make table with hints
if( !com.strcmp( pszField, "classname" ))
f = EOFS( classname );
else if( !com.strcmp( pszField, "globalname" ))
f = EOFS( globalname );
else if( !com.strcmp( pszField, "targetname" ))
f = EOFS( targetname );
else if( !com.strcmp( pszField, "netname" ))
f = EOFS( netname );
else if( !com.strcmp( pszField, "model" ))
f = EOFS( model );
else
{
// FIXME: make cases for all fileds
MsgDev( D_ERROR, "field %s unsupported\n", pszField );
return pStartEdict;
}
for( e++; e < svgame.globals->numEntities; e++ )
{
ed = EDICT_NUM( e );
if( ed->free ) continue;
t = STRING( *(string_t *)&((byte *)&ed->v)[f] );
if( !t ) t = "";
if( !com.strcmp( t, pszValue ))
return ed;
}
return NULL;
}
/*
==============
pfnGetEntityIllum
==============
*/
int pfnGetEntityIllum( edict_t* pEnt )
{
if( pEnt == EDICT_NUM( 0 ))
{
MsgDev( D_WARN, "SV_GetEntityIllum: can't get light level at world entity\n" );
return 0;
}
if( pEnt->free )
{
MsgDev( D_WARN, "SV_GetEntityIllum: can't get light level at free entity\n" );
return 0;
}
return 255; // FIXME: implement
}
/*
=================
pfnFindEntityInSphere
return NULL instead of world
=================
*/
edict_t* pfnFindEntityInSphere( edict_t *pStartEdict, const float *org, float rad )
{
edict_t *ent;
float radSquare;
vec3_t eorg;
int e = 0;
radSquare = rad * rad;
if( pStartEdict )
e = NUM_FOR_EDICT( pStartEdict );
for( e++; e < svgame.globals->numEntities; e++ )
{
ent = EDICT_NUM( e );
if( ent->free ) continue;
VectorSubtract( org, ent->v.origin, eorg );
VectorMAMAM( 1, eorg, 0.5f, ent->v.mins, 0.5f, ent->v.maxs, eorg );
if( DotProduct( eorg, eorg ) < radSquare )
return ent;
}
return NULL;
}
/*
=================
pfnFindClientInPVS
return NULL instead of world
=================
*/
edict_t* pfnFindClientInPVS( edict_t *pEdict )
{
edict_t *pClient;
int i;
for( i = 1; i < svgame.globals->maxClients; i++ )
{
pClient = EDICT_NUM( i );
if( pClient->free ) continue;
if( SV_EntitiesIn( DVIS_PVS, pEdict->v.origin, pClient->v.origin ))
{
Msg( "found client %d\n", pClient->serialnumber );
return pEdict;
}
}
return NULL;
}
/*
=================
pfnFindClientInPHS
return NULL instead of world
=================
*/
edict_t* pfnFindClientInPHS( edict_t *pEdict )
{
edict_t *pClient;
int i;
for( i = 1; i < svgame.globals->maxClients; i++ )
{
pClient = EDICT_NUM( i );
if( pClient->free ) continue;
if( SV_EntitiesIn( DVIS_PHS, pEdict->v.origin, pClient->v.origin ))
{
Msg( "found client %d\n", pClient->serialnumber );
return pEdict;
}
}
return NULL;
}
/*
=================
pfnEntitiesInPVS
=================
*/
edict_t* pfnEntitiesInPVS( edict_t *pplayer )
{
edict_t *pEdict, *chain;
int i, numents;
chain = NULL;
numents = svgame.globals->numEntities;
for( i = svgame.globals->maxClients; i < numents; i++ )
{
pEdict = EDICT_NUM( i );
if( pEdict->free ) continue;
if( SV_EntitiesIn( DVIS_PVS, pEdict->v.origin, pplayer->v.origin ))
{
Msg( "found entity %d\n", pEdict->serialnumber );
pEdict->v.chain = chain;
chain = pEdict;
}
}
return chain;
}
/*
=================
pfnEntitiesInPHS
=================
*/
edict_t* pfnEntitiesInPHS( edict_t *pplayer )
{
edict_t *pEdict, *chain;
int i, numents;
chain = NULL;
numents = svgame.globals->numEntities;
for( i = svgame.globals->maxClients; i < numents; i++ )
{
pEdict = EDICT_NUM( i );
if( pEdict->free ) continue;
if( SV_EntitiesIn( DVIS_PHS, pEdict->v.origin, pplayer->v.origin ))
{
Msg( "found entity %d\n", pEdict->serialnumber );
pEdict->v.chain = chain;
chain = pEdict;
}
}
return chain;
}
/*
==============
pfnMakeVectors
==============
*/
void pfnMakeVectors( const float *rgflVector )
{
AngleVectors( rgflVector, svgame.globals->v_forward, svgame.globals->v_right, svgame.globals->v_up );
}
/*
==============
pfnCreateEntity
just allocate new one
==============
*/
edict_t* pfnCreateEntity( void )
{
return SV_AllocEdict();
}
/*
==============
pfnRemoveEntity
free edict private mem, unlink physics etc
==============
*/
void pfnRemoveEntity( edict_t* e )
{
// never free client or world entity
if( NUM_FOR_EDICT( e ) < svgame.globals->maxClients )
{
MsgDev( D_ERROR, "SV_RemoveEntity: can't delete %s\n", (e == EDICT_NUM( 0 )) ? "world" : "client" );
return;
}
SV_FreeEdict( e );
}
/*
==============
pfnCreateNamedEntity
==============
*/
edict_t* pfnCreateNamedEntity( string_t className )
{
return SV_AllocPrivateData( NULL, className );
}
/*
=============
pfnMakeStatic
disable entity updates to client
=============
*/
void pfnMakeStatic( edict_t *ent )
{
ent->pvServerData->s.ed_type = ED_STATIC;
}
/*
=============
pfnEntIsOnFloor
stupid unused bulletin
=============
*/
int pfnEntIsOnFloor( edict_t *e )
{
return (e->v.flags & FL_ONGROUND) ? true : false;
}
/*
===============
pfnDropToFloor
===============
*/
int pfnDropToFloor( edict_t* e )
{
vec3_t end;
trace_t trace;
// ignore world silently
if( e == EDICT_NUM( 0 )) return false;
if( e->free )
{
MsgDev( D_ERROR, "SV_DropToFloor: can't modify free entity\n" );
return false;
}
VectorCopy( e->v.origin, end );
end[2] -= 256;
SV_UnstickEntity( e );
trace = SV_Trace( e->v.origin, e->v.mins, e->v.maxs, end, MOVE_NORMAL, e, SV_ContentsMask( e ));
if( trace.startsolid )
{
vec3_t offset, org;
VectorSet( offset, 0.5f * (e->v.mins[0] + e->v.maxs[0]), 0.5f * (e->v.mins[1] + e->v.maxs[1]), e->v.mins[2] );
VectorAdd( e->v.origin, offset, org );
trace = SV_Trace( org, vec3_origin, vec3_origin, end, MOVE_NORMAL, e, SV_ContentsMask( e ));
VectorSubtract( trace.endpos, offset, trace.endpos );
if( trace.startsolid )
{
MsgDev( D_WARN, "SV_DropToFloor: startsolid at %g %g %g\n", e->v.origin[0], e->v.origin[1], e->v.origin[2] );
SV_UnstickEntity( e );
SV_LinkEdict( e );
e->v.flags |= FL_ONGROUND;
e->v.groundentity = 0;
}
else if( trace.fraction < 1 )
{
MsgDev( D_WARN, "SV_DropToFloor: moved to %g %g %g\n", e->v.origin[0], e->v.origin[1], e->v.origin[2] );
VectorCopy( trace.endpos, e->v.origin );
SV_UnstickEntity( e );
SV_LinkEdict( e );
e->v.flags |= FL_ONGROUND;
e->v.groundentity = trace.ent;
// if support is destroyed, keep suspended
// (gross hack for floating items in various maps)
e->pvServerData->suspended = true;
return true;
}
MsgDev( D_WARN, "SV_DropToFloor: startsolid at %g %g %g\n", e->v.origin[0], e->v.origin[1], e->v.origin[2] );
pfnRemoveEntity( e );
return false;
}
else
{
if( trace.fraction != 1 )
{
if( trace.fraction < 1 )
VectorCopy( trace.endpos, e->v.origin );
SV_LinkEdict( e );
e->v.flags |= FL_ONGROUND;
e->v.groundentity = trace.ent;
// if support is destroyed, keep suspended
// (gross hack for floating items in various maps)
e->pvServerData->suspended = true;
return true;
}
}
return false;
}
/*
===============
pfnWalkMove
FIXME: tune modes
===============
*/
int pfnWalkMove( edict_t *ent, float yaw, float dist, int iMode )
{
vec3_t move;
if( ent == NULL || ent == EDICT_NUM( 0 ))
return false;
if( ent->free )
{
MsgDev( D_WARN, "SV_WlakMove: can't modify free entity\n" );
return false;
}
if(!(ent->v.flags & FL_FLY|FL_SWIM|FL_ONGROUND))
return false;
yaw = yaw * M_PI * 2 / 360;
VectorSet( move, com.cos( yaw ) * dist, com.sin( yaw ) * dist, 0.0f );
return SV_movestep( ent, move, true, iMode, false );
}
/*
=================
pfnSetOrigin
=================
*/
void pfnSetOrigin( edict_t *e, const float *rgflOrigin )
{
// ignore world silently
if( e == EDICT_NUM( 0 )) return;
if( e->free )
{
MsgDev( D_ERROR, "SV_SetOrigin: can't modify free entity\n" );
return;
}
if( VectorCompare( rgflOrigin, e->v.origin ))
return; // already there ?
VectorCopy( rgflOrigin, e->v.origin );
pe->SetOrigin( e->pvServerData->physbody, e->v.origin );
SV_LinkEdict( e );
}
/*
=================
pfnSetAngles
=================
*/
void pfnSetAngles( edict_t *e, const float *rgflAngles )
{
if( e == EDICT_NUM( 0 )) return;
if( e->free )
{
MsgDev( D_ERROR, "SV_SetAngles: can't modify free entity\n" );
return;
}
if( VectorCompare( rgflAngles, e->v.angles ))
return; // already there ?
VectorCopy( rgflAngles, e->v.angles );
Matrix3x3_FromAngles( e->v.angles, e->v.m_pmatrix );
Matrix3x3_Transpose( e->v.m_pmatrix, e->v.m_pmatrix );
}
/*
=================
pfnEmitSound
=================
*/
void pfnEmitSound( edict_t *ent, int chan, const char *sample, float vol, float attn, int flags, int pitch )
{
int sound_idx;
vec3_t snd_origin;
bool reliable = false;
bool use_phs = false;
if( attn < ATTN_NONE || attn > ATTN_IDLE )
{
MsgDev( D_ERROR, "SV_StartSound: attenuation must be in range 0-2\n" );
return;
}
if( chan < 0 || chan > 7 )
{
MsgDev( D_ERROR, "SV_StartSound: channel must be in range 0-7\n" );
return;
}
if( ent == NULL )
{
MsgDev( D_ERROR, "SV_StartSound: edict == NULL\n" );
return;
}
if( vol != 1.0f ) flags |= SND_VOL;
if( attn != 1.0f ) flags |= SND_ATTN;
if( pitch != PITCH_NORM ) flags |= SND_PITCH;
switch( ent->v.movetype )
{
case MOVETYPE_NONE:
flags |= SND_POS;
break;
default:
flags |= SND_ENT;
break;
}
if( flags & SND_POS )
{
// use the entity origin unless it is a bmodel or explicitly specified
if( ent->v.solid == SOLID_BSP || VectorCompare( ent->v.origin, vec3_origin ))
{
VectorAverage( ent->v.mins, ent->v.maxs, snd_origin );
VectorAdd( snd_origin, ent->v.origin, snd_origin );
reliable = true; // because brush center can be out of PHS (outside from world)
use_phs = false;
}
else
{
VectorCopy( ent->v.origin, snd_origin );
reliable = false;
use_phs = true;
}
}
// NOTE: bsp origin for moving edicts will be done on client-side
// always sending stop sound command
if( flags & SND_STOP ) reliable = true;
// precache_sound can be used twice: cache sounds when loading
// and return sound index when server is active
sound_idx = SV_SoundIndex( sample );
MSG_Begin( svc_sound );
MSG_WriteByte( &sv.multicast, flags );
MSG_WriteWord( &sv.multicast, sound_idx );
MSG_WriteByte( &sv.multicast, chan );
if( flags & SND_VOL ) MSG_WriteByte( &sv.multicast, vol * 255 );
if( flags & SND_ATTN) MSG_WriteByte( &sv.multicast, attn * 127 );
if(flags & SND_PITCH) MSG_WriteByte( &sv.multicast, pitch );
if( flags & SND_ENT ) MSG_WriteWord( &sv.multicast, ent->serialnumber );
if( flags & SND_POS )
{
MSG_WriteCoord32( &sv.multicast, snd_origin[0] );
MSG_WriteCoord32( &sv.multicast, snd_origin[1] );
MSG_WriteCoord32( &sv.multicast, snd_origin[2] );
}
if( reliable )
{
if( use_phs ) MSG_Send( MSG_PHS_R, snd_origin, ent );
else MSG_Send( MSG_ALL_R, snd_origin, ent );
}
else
{
if( use_phs ) MSG_Send( MSG_PHS, snd_origin, ent );
else MSG_Send( MSG_ALL, snd_origin, ent );
}
}
/*
=================
pfnEmitAmbientSound
=================
*/
void pfnEmitAmbientSound( edict_t *ent, float *pos, const char *samp, float vol, float attn, int flags, int pitch )
{
// FIXME: implement
}
/*
=================
pfnTraceLine
=================
*/
static void pfnTraceLine( const float *v1, const float *v2, int fNoMonsters, edict_t *pentToSkip, TraceResult *ptr )
{
trace_t trace;
int move;
move = (fNoMonsters) ? MOVE_NOMONSTERS : MOVE_NORMAL;
if( IS_NAN(v1[0]) || IS_NAN(v1[1]) || IS_NAN(v1[2]) || IS_NAN(v2[0]) || IS_NAN(v1[2]) || IS_NAN(v2[2] ))
Host_Error( "SV_Trace: NAN errors detected ('%f %f %f', '%f %f %f'\n", v1[0], v1[1], v1[2], v2[0], v2[1], v2[2] );
trace = SV_Trace( v1, vec3_origin, vec3_origin, v2, move, pentToSkip, SV_ContentsMask( pentToSkip ));
SV_CopyTraceResult( ptr, trace );
}
/*
=================
pfnTraceToss
=================
*/
void pfnTraceToss( edict_t* pent, edict_t* pentToIgnore, TraceResult *ptr )
{
trace_t trace;
if( pent == EDICT_NUM( 0 )) return;
trace = SV_TraceToss( pent, pentToIgnore );
SV_CopyTraceResult( ptr, trace );
}
/*
=================
pfnTraceHull
FIXME: replace constant hulls with mins/maxs
=================
*/
void pfnTraceHull( const float *v1, const float *mins, const float *maxs, const float *v2, int fNoMonsters, edict_t *pentToSkip, TraceResult *ptr )
{
trace_t trace;
int move;
move = (fNoMonsters) ? MOVE_NOMONSTERS : MOVE_NORMAL;
if( IS_NAN(v1[0]) || IS_NAN(v1[1]) || IS_NAN(v1[2]) || IS_NAN(v2[0]) || IS_NAN(v1[2]) || IS_NAN(v2[2] ))
Host_Error( "SV_TraceHull: NAN errors detected ('%f %f %f', '%f %f %f'\n", v1[0], v1[1], v1[2], v2[0], v2[1], v2[2] );
trace = SV_Trace( v1, mins, mins, v2, move, pentToSkip, SV_ContentsMask( pentToSkip ));
SV_CopyTraceResult( ptr, trace );
}
void pfnTraceModel( const float *v1, const float *v2, edict_t *pent, TraceResult *ptr )
{
// FIXME: implement
}
const char *pfnTraceTexture( edict_t *pTextureEntity, const float *v1, const float *v2 )
{
trace_t trace;
if( IS_NAN(v1[0]) || IS_NAN(v1[1]) || IS_NAN(v1[2]) || IS_NAN(v2[0]) || IS_NAN(v1[2]) || IS_NAN(v2[2] ))
Host_Error( "SV_TraceTexture: NAN errors detected ('%f %f %f', '%f %f %f'\n", v1[0], v1[1], v1[2], v2[0], v2[1], v2[2] );
trace = SV_Trace( v1, vec3_origin, vec3_origin, v2, MOVE_NOMONSTERS, NULL, SV_ContentsMask( pTextureEntity ));
if( trace.surface )
return trace.surface->name;
return NULL;
}
/*
=============
pfnGetAimVector
FIXME: use speed for reduce aiming accuracy
=============
*/
void pfnGetAimVector( edict_t* ent, float speed, float *rgflReturn )
{
edict_t *check, *bestent;
vec3_t start, dir, end, bestdir;
float dist, bestdist;
bool fNoFriendlyFire;
int i, j;
trace_t tr;
// these vairable defined in server.dll
fNoFriendlyFire = Cvar_VariableValue( "mp_friendlyfire" );
VectorCopy( svgame.globals->v_forward, rgflReturn ); // assume failure if it returns early
if( ent == EDICT_NUM( 0 )) return;
if( ent->free )
{
MsgDev( D_ERROR, "SV_GetAimVector: can't aiming at free entity\n" );
return;
}
VectorCopy( ent->v.origin, start );
start[2] += 20;
// try sending a trace straight
VectorCopy( svgame.globals->v_forward, dir );
VectorMA( start, 2048, dir, end );
tr = SV_Trace( start, vec3_origin, vec3_origin, end, MOVE_NORMAL, ent, -1 );
if( tr.ent && (tr.ent->v.takedamage == DAMAGE_AIM && fNoFriendlyFire || ent->v.team <= 0 || ent->v.team != tr.ent->v.team ))
{
VectorCopy( svgame.globals->v_forward, rgflReturn );
return;
}
// try all possible entities
VectorCopy( dir, bestdir );
bestdist = 0.5f;
bestent = NULL;
check = EDICT_NUM( 1 ); // start at first client
for( i = 1; i < svgame.globals->numEntities; i++, check++ )
{
if( check->v.takedamage != DAMAGE_AIM ) continue;
if( check == ent ) continue;
if( fNoFriendlyFire && ent->v.team > 0 && ent->v.team == check->v.team )
continue; // don't aim at teammate
for( j = 0; j < 3; j++ )
end[j] = check->v.origin[j] + 0.5 * (check->v.mins[j] + check->v.maxs[j]);
VectorSubtract( end, start, dir );
VectorNormalize( dir );
dist = DotProduct( dir, svgame.globals->v_forward );
if( dist < bestdist ) continue; // to far to turn
tr = SV_Trace( start, vec3_origin, vec3_origin, end, MOVE_NORMAL, ent, -1 );
if( tr.ent == check )
{
// can shoot at this one
bestdist = dist;
bestent = check;
}
}
if( bestent )
{
VectorSubtract( bestent->v.origin, ent->v.origin, dir );
dist = DotProduct( dir, svgame.globals->v_forward );
VectorScale( svgame.globals->v_forward, dist, end );
end[2] = dir[2];
VectorNormalize( end );
VectorCopy( end, rgflReturn );
}
else VectorCopy( bestdir, rgflReturn );
}
/*
=========
pfnServerCommand
=========
*/
void pfnServerCommand( const char* str )
{
Cbuf_AddText( str );
}
/*
=========
pfnServerExecute
=========
*/
void pfnServerExecute( void )
{
Cbuf_Execute();
}
/*
=========
pfnClientCommand
=========
*/
void pfnClientCommand( edict_t* pEdict, char* szFmt, ... )
{
sv_client_t *client;
string buffer;
va_list args;
int i;
i = NUM_FOR_EDICT( pEdict );
if( sv.state != ss_active || i < 0 || i >= Host_MaxClients() || svs.clients[i].state != cs_spawned )
{
MsgDev( D_ERROR, "SV_ClientCommand: client/server is not active!\n" );
return;
}
client = svs.clients + i;
va_start( args, szFmt );
com.vsnprintf( buffer, MAX_STRING, szFmt, args );
va_end( args );
MSG_WriteByte( &client->netchan.message, svc_stufftext );
MSG_WriteString( &client->netchan.message, buffer );
MSG_Send( MSG_ONE_R, NULL, client->edict );
}
/*
=================
pfnParticleEffect
=================
*/
void pfnParticleEffect( const float *org, const float *dir, float color, float count )
{
// FIXME: implement
}
/*
===============
pfnLightStyle
===============
*/
void pfnLightStyle( int style, char* val )
{
if((uint)style >= MAX_LIGHTSTYLES )
Host_Error( "SV_LightStyle: style: %i >= %d", style, MAX_LIGHTSTYLES );
SV_ConfigString( CS_LIGHTSTYLES + style, val );
}
/*
=================
pfnDecalIndex
register decal shader on client
=================
*/
int pfnDecalIndex( const char *m )
{
return SV_DecalIndex( m );
}
/*
=============
pfnPointContents
=============
*/
static int pfnPointContents( const float *rgflVector )
{
return SV_PointContents( rgflVector );
}
/*
=============
pfnMessageBegin
=============
*/
void pfnMessageBegin( int msg_dest, int msg_type, const float *pOrigin, edict_t *ed )
{
// some users can send message with engine index
// reduce number to avoid overflow problems or cheating
svgame.msg_index = bound( svc_bad, msg_type, svc_nop );
if( svgame.msg_index >= 0 && svgame.msg_index < MAX_USER_MESSAGES )
svgame.msg_name = sv.configstrings[CS_USER_MESSAGES + svgame.msg_index];
else svgame.msg_name = NULL;
MSG_Begin( svgame.msg_index );
// save message destination
if( pOrigin ) VectorCopy( pOrigin, svgame.msg_org );
else VectorClear( svgame.msg_org );
if( svgame.msg_sizes[msg_type] == -1 )
{
// variable sized messages sent size as first byte
svgame.msg_size_index = sv.multicast.cursize;
MSG_WriteByte( &sv.multicast, 0 ); // reserve space for now
}
else svgame.msg_size_index = -1;
svgame.msg_realsize = 0;
svgame.msg_dest = msg_dest;
svgame.msg_ent = ed;
}
/*
=============
pfnMessageEnd
=============
*/
void pfnMessageEnd( void )
{
const char *name = "Unknown";
if( svgame.msg_name ) name = svgame.msg_name;
if( svgame.msg_sizes[svgame.msg_index] != -1 )
{
int expsize = svgame.msg_sizes[svgame.msg_index];
int realsize = svgame.msg_realsize;
// compare bounds
if( expsize != realsize )
{
MsgDev( D_ERROR, "SV_Message: %s expected %i bytes, it written %i\n", name, expsize, realsize );
MSG_Clear( &sv.multicast );
return;
}
}
else if( svgame.msg_size_index != -1 )
{
// variable sized message
if( svgame.msg_realsize >= 255 )
{
MsgDev( D_ERROR, "SV_Message: %s too long (more than 255 bytes)\n", name );
MSG_Clear( &sv.multicast );
return;
}
sv.multicast.data[svgame.msg_size_index] = svgame.msg_realsize;
}
else
{
// this never happen
MsgDev( D_ERROR, "SV_Message: %s have encountered error\n", name );
MSG_Clear( &sv.multicast );
return;
}
svgame.msg_dest = bound( MSG_ONE, svgame.msg_dest, MSG_PVS_R );
MSG_Send( svgame.msg_dest, svgame.msg_org, svgame.msg_ent );
}
/*
=============
pfnWriteByte
=============
*/
void pfnWriteByte( int iValue )
{
if( iValue == -1 ) iValue = 0xFF; // convert char to byte
_MSG_WriteBits( &sv.multicast, (int)iValue, svgame.msg_name, NET_BYTE, __FILE__, __LINE__ );
svgame.msg_realsize++;
}
/*
=============
pfnWriteChar
=============
*/
void pfnWriteChar( int iValue )
{
_MSG_WriteBits( &sv.multicast, (int)iValue, svgame.msg_name, NET_CHAR, __FILE__, __LINE__ );
svgame.msg_realsize++;
}
/*
=============
pfnWriteShort
=============
*/
void pfnWriteShort( int iValue )
{
_MSG_WriteBits( &sv.multicast, (int)iValue, svgame.msg_name, NET_SHORT, __FILE__, __LINE__ );
svgame.msg_realsize += 2;
}
/*
=============
pfnWriteLong
=============
*/
void pfnWriteLong( int iValue )
{
_MSG_WriteBits( &sv.multicast, (int)iValue, svgame.msg_name, NET_LONG, __FILE__, __LINE__ );
svgame.msg_realsize += 4;
}
/*
=============
pfnWriteAngle
=============
*/
void pfnWriteAngle( float flValue )
{
_MSG_WriteBits( &sv.multicast, flValue, svgame.msg_name, NET_ANGLE, __FILE__, __LINE__ );
svgame.msg_realsize += 2;
}
/*
=============
pfnWriteCoord
=============
*/
void pfnWriteCoord( float flValue )
{
_MSG_WriteBits( &sv.multicast, flValue, svgame.msg_name, NET_FLOAT, __FILE__, __LINE__ );
svgame.msg_realsize += 4;
}
/*
=============
pfnWriteFloat
=============
*/
void pfnWriteFloat( float flValue )
{
MSG_WriteFloat( &sv.multicast, flValue );
svgame.msg_realsize += 4;
}
/*
=============
pfnWriteLong64
=============
*/
void pfnWriteLong64( int64 iValue )
{
_MSG_WriteBits( &sv.multicast, iValue, svgame.msg_name, NET_INT64, __FILE__, __LINE__ );
svgame.msg_realsize += 8;
}
/*
=============
pfnWriteDouble
=============
*/
void pfnWriteDouble( double flValue )
{
MSG_WriteFloat( &sv.multicast, flValue );
svgame.msg_realsize += 8;
}
/*
=============
pfnWriteString
=============
*/
void pfnWriteString( const char *sz )
{
int cur_size = sv.multicast.cursize;
int total_size;
MSG_WriteString( &sv.multicast, sz );
total_size = sv.multicast.cursize - cur_size;
// some messages with constant string length can be marked as known sized
svgame.msg_realsize += total_size;
}
/*
=============
pfnWriteEntity
=============
*/
void pfnWriteEntity( int iValue )
{
if( iValue < 0 || iValue > svgame.globals->numEntities )
Host_Error( "MSG_WriteEntity: invalid entnumber %d\n", iValue );
MSG_WriteShort( &sv.multicast, iValue );
svgame.msg_realsize += 2;
}
/*
=============
pfnCVarRegister
=============
*/
void pfnCVarRegister( const char *name, const char *value, int flags, const char *desc )
{
// FIXME: translate server.dll flags to real cvar flags
Cvar_Get( name, value, flags, desc );
}
/*
=============
pfnCVarGetFloat
=============
*/
float pfnCVarGetFloat( const char *szVarName )
{
return Cvar_VariableValue( szVarName );
}
/*
=============
pfnCVarGetString
=============
*/
const char* pfnCVarGetString( const char *szVarName )
{
return Cvar_VariableString( szVarName );
}
/*
=============
pfnCVarSetFloat
=============
*/
void pfnCVarSetFloat( const char *szVarName, float flValue )
{
Cvar_SetValue( szVarName, flValue );
}
/*
=============
pfnCVarSetString
=============
*/
void pfnCVarSetString( const char *szVarName, const char *szValue )
{
Cvar_Set( szVarName, szValue );
}
/*
=============
pfnPvAllocEntPrivateData
=============
*/
void *pfnPvAllocEntPrivateData( edict_t *pEdict, long cb )
{
Com_Assert( pEdict == NULL );
// to avoid multiple alloc
pEdict->pvPrivateData = (void *)Mem_Realloc( svgame.private, pEdict->pvPrivateData, cb );
return pEdict->pvPrivateData;
}
/*
=============
pfnFreeEntPrivateData
=============
*/
void pfnFreeEntPrivateData( edict_t *pEdict )
{
if( pEdict->pvPrivateData )
Mem_Free( pEdict->pvPrivateData );
pEdict->pvPrivateData = NULL; // freed
}
/*
=============
SV_AllocString
=============
*/
string_t SV_AllocString( const char *szValue )
{
return StringTable_SetString( svgame.hStringTable, szValue );
}
/*
=============
SV_GetString
=============
*/
const char *SV_GetString( string_t iString )
{
return StringTable_GetString( svgame.hStringTable, iString );
}
/*
=============
pfnPEntityOfEntOffset
=============
*/
edict_t* pfnPEntityOfEntOffset( int iEntOffset )
{
return (&((edict_t*)svgame.vp)[iEntOffset]);
}
/*
=============
pfnEntOffsetOfPEntity
=============
*/
int pfnEntOffsetOfPEntity( const edict_t *pEdict )
{
return ((byte *)pEdict - (byte *)svgame.vp);
}
/*
=============
pfnIndexOfEdict
=============
*/
int pfnIndexOfEdict( const edict_t *pEdict )
{
return NUM_FOR_EDICT( pEdict );
}
/*
=============
pfnPEntityOfEntIndex
=============
*/
edict_t* pfnPEntityOfEntIndex( int iEntIndex )
{
return EDICT_NUM( iEntIndex );
}
/*
=============
pfnFindEntityByVars
slow linear brute force
=============
*/
edict_t* pfnFindEntityByVars( entvars_t* pvars )
{
edict_t *e = EDICT_NUM( 0 );
int i;
Msg("FindEntity by VARS()\n" );
// HACKHACK
if( pvars ) return pvars->pContainingEntity;
for( i = 0; i < svgame.globals->numEntities; i++, e++ )
{
if( e->free ) continue;
if( !memcmp( &e->v, pvars, sizeof( entvars_t )))
return e;
}
return NULL;
}
/*
=============
pfnGetModelPtr
returns pointer to a studiomodel
=============
*/
void* pfnGetModelPtr( edict_t* pEdict )
{
cmodel_t *mod;
mod = pe->RegisterModel( sv.configstrings[CS_MODELS + pEdict->v.modelindex] );
if( !mod ) return NULL;
return mod->extradata;
}
/*
=============
pfnRegUserMsg
=============
*/
int pfnRegUserMsg( const char *pszName, int iSize )
{
// register message first
int msg_index;
string msg_name;
// scan name for reserved symbol
if( com.strchr( pszName, '@' ))
{
MsgDev( D_ERROR, "SV_RegisterUserMessage: invalid name %s\n", pszName );
return svc_bad; // force error
}
// build message name, fmt: MsgName@size
com.snprintf( msg_name, MAX_STRING, "%s@%i", pszName, iSize );
msg_index = SV_UserMessageIndex( msg_name );
svgame.msg_sizes[msg_index] = iSize;
return msg_index;
}
/*
=============
pfnAnimationAutomove
=============
*/
void pfnAnimationAutomove( const edict_t* pEdict, float flTime )
{
// FIXME: implement
}
/*
=============
pfnGetBonePosition
=============
*/
void pfnGetBonePosition( const edict_t* pEdict, int iBone, float *rgflOrigin, float *rgflAngles )
{
// FIXME: implement
}
/*
=============
pfnFunctionFromName
=============
*/
dword pfnFunctionFromName( const char *pName )
{
int i, index;
for( i = 0; i < svgame.num_ordinals; i++ )
{
if( !com.strcmp( pName, svgame.names[i] ))
{
index = svgame.ordinals[i];
return svgame.funcs[index] + svgame.funcBase;
}
}
// couldn't find the function name to return address
return 0;
}
/*
=============
pfnNameForFunction
=============
*/
const char *pfnNameForFunction( dword function )
{
int i, index;
for( i = 0; i < svgame.num_ordinals; i++ )
{
index = svgame.ordinals[i];
if((function - svgame.funcBase) == svgame.funcs[index] )
return svgame.names[i];
}
// couldn't find the function address to return name
return NULL;
}
/*
=============
pfnServerPrint
=============
*/
void pfnServerPrint( const char *szMsg )
{
if( sv.state == ss_loading )
{
// while loading in-progress we can sending message
com.print( szMsg ); // only for local client
}
else SV_BroadcastPrintf( "%s", szMsg );
}
/*
=============
pfnAreaPortal
changes area portal state
=============
*/
void pfnAreaPortal( edict_t *pEdict, bool enable )
{
if( pEdict == EDICT_NUM( 0 )) return;
if( pEdict->free )
{
MsgDev( D_ERROR, "SV_AreaPortal: can't modify free entity\n" );
return;
}
pe->SetAreaPortalState( pEdict->v.skin, enable );
}
/*
=============
pfnClassifyEdict
classify edict for render and network usage
=============
*/
void pfnClassifyEdict( edict_t *pEdict, int class )
{
if( !pEdict || pEdict->free )
{
MsgDev( D_ERROR, "SV_ClassifyEdict: can't modify free entity\n" );
return;
}
if( !pEdict->pvServerData ) return;
pEdict->pvServerData->s.ed_type = class;
MsgDev( D_NOTE, "%s: <%s>\n", STRING( pEdict->v.classname ), ed_name[class] );
}
/*
=============
pfnCmd_Args
=============
*/
const char *pfnCmd_Args( void )
{
return Cmd_Args();
}
/*
=============
pfnCmd_Argv
=============
*/
const char *pfnCmd_Argv( int argc )
{
if( argc >= 0 && argc < Cmd_Argc())
return Cmd_Argv( argc );
return "";
}
/*
=============
pfnCmd_Argc
=============
*/
int pfnCmd_Argc( void )
{
return Cmd_Argc();
}
/*
=============
pfnGetAttachment
=============
*/
void pfnGetAttachment( const edict_t *pEdict, int iAttachment, float *rgflOrigin, float *rgflAngles )
{
// FIXME: implement
}
/*
=============
pfnCRC_Init
=============
*/
void pfnCRC_Init( word *pulCRC )
{
CRC_Init( pulCRC );
}
/*
=============
pfnCRC_ProcessBuffer
=============
*/
void pfnCRC_ProcessBuffer( word *pulCRC, void *p, int len )
{
byte *start = (byte *)p;
while( len-- ) CRC_ProcessByte( pulCRC, *start++ );
}
/*
=============
pfnCRC_Final
=============
*/
word pfnCRC_Final( word pulCRC )
{
return pulCRC ^ 0x0000;
}
/*
=============
pfnSetView
=============
*/
void pfnSetView( const edict_t *pClient, const edict_t *pViewent )
{
// FIXME: implement
}
/*
=============
pfnCrosshairAngle
=============
*/
void pfnCrosshairAngle( const edict_t *pClient, float pitch, float yaw )
{
// FIXME: implement
}
/*
=============
pfnCompareFileTime
=============
*/
int pfnCompareFileTime( const char *filename1, const char *filename2, int *iCompare )
{
int time1 = FS_FileTime( filename1 );
int time2 = FS_FileTime( filename2 );
if( iCompare )
{
if( time1 > time2 )
*iCompare = 1;
else if( time1 < time2 )
*iCompare = -1;
else *iCompare = 0;
}
return (time1 != time2);
}
/*
=============
pfnStaticDecal
=============
*/
void pfnStaticDecal( const float *origin, int decalIndex, int entityIndex, int modelIndex )
{
// FIXME: implement
}
/*
=============
pfnPrecacheGeneric
can be used for precache scripts
=============
*/
int pfnPrecacheGeneric( const char* s )
{
// FIXME: implement
return 0;
}
/*
=============
pfnIsDedicatedServer
=============
*/
int pfnIsDedicatedServer( void )
{
return (host.type == HOST_DEDICATED);
}
/*
=============
pfnIsMapValid
vaild map must contain one info_player_deatchmatch
=============
*/
int pfnIsMapValid( char *filename )
{
wfile_t *wad;
dheader_t *hdr;
bool valid;
wad = WAD_Open( filename, "rb" );
if( !wad ) return false;
hdr = (dheader_t *)WAD_Read( wad, LUMP_MAPINFO, NULL, TYPE_BINDATA );
valid = (LittleLong( hdr->flags ) & MAP_DEATHMATCH) ? true : false;
WAD_Close( wad );
return valid;
}
/*
=============
pfnInfo_RemoveKey
=============
*/
void pfnInfo_RemoveKey( char *s, char *key )
{
Info_RemoveKey( s, key );
}
/*
=============
pfnInfoKeyValue
=============
*/
char *pfnInfoKeyValue( char *infobuffer, char *key )
{
return Info_ValueForKey( infobuffer, key );
}
/*
=============
pfnSetKeyValue
=============
*/
void pfnSetKeyValue( char *infobuffer, char *key, char *value )
{
Info_SetValueForKey( infobuffer, key, value );
}
/*
=============
pfnGetInfoKeyBuffer
=============
*/
char *pfnGetInfoKeyBuffer( edict_t *e )
{
int index;
index = NUM_FOR_EDICT( e );
if( index > 0 && index < svgame.globals->numClients )
return e->pvServerData->client->userinfo;
return Cvar_Serverinfo(); // otherwise return ServerInfo
}
/*
=============
pfnSetClientKeyValue
=============
*/
void pfnSetClientKeyValue( int clientIndex, char *infobuffer, char *key, char *value )
{
if( clientIndex > 0 && clientIndex < svgame.globals->numClients )
{
sv_client_t *client = svs.clients + clientIndex;
Info_SetValueForKey( client->userinfo, key, value );
}
}
/*
=============
pfnSetSkybox
=============
*/
void pfnSetSkybox( const char *name )
{
SV_ConfigString( CS_SKYNAME, name );
}
/*
=============
pfnPlayMusic
=============
*/
void pfnPlayMusic( const char *trackname, int flags )
{
SV_ConfigString( CS_BACKGROUND_TRACK, trackname );
}
/*
=============
pfnDropClient
=============
*/
void pfnDropClient( int clientIndex )
{
if( clientIndex < 0 || clientIndex >= svgame.globals->maxClients )
{
MsgDev( D_ERROR, "SV_DropClient: not a client\n" );
return;
}
if( svs.clients[clientIndex].state != cs_spawned )
{
MsgDev( D_ERROR, "SV_DropClient: that client slot is not connected\n" );
return;
}
SV_DropClient( svs.clients + clientIndex );
}
// engine callbacks
static enginefuncs_t gEngfuncs =
{
sizeof( enginefuncs_t ),
pfnMemAlloc,
pfnMemFree,
pfnPrecacheModel,
pfnPrecacheSound,
pfnSetModel,
pfnModelIndex,
pfnModelFrames,
pfnSetSize,
pfnChangeLevel,
pfnVecToYaw,
pfnVecToAngles,
pfnMoveToOrigin,
pfnChangeYaw,
pfnChangePitch,
pfnFindEntityByString,
pfnGetEntityIllum,
pfnFindEntityInSphere,
pfnFindClientInPVS,
pfnFindClientInPHS,
pfnEntitiesInPVS,
pfnEntitiesInPHS,
pfnMakeVectors,
AngleVectors,
pfnCreateEntity,
pfnRemoveEntity,
pfnCreateNamedEntity,
pfnMakeStatic,
pfnEntIsOnFloor,
pfnDropToFloor,
pfnWalkMove,
pfnSetOrigin,
pfnSetAngles,
pfnEmitSound,
pfnEmitAmbientSound,
pfnTraceLine,
pfnTraceToss,
pfnTraceHull,
pfnTraceModel,
pfnTraceTexture,
pfnGetAimVector,
pfnServerCommand,
pfnServerExecute,
pfnClientCommand,
pfnParticleEffect,
pfnLightStyle,
pfnDecalIndex,
pfnPointContents,
pfnMessageBegin,
pfnMessageEnd,
pfnWriteByte,
pfnWriteChar,
pfnWriteShort,
pfnWriteLong,
pfnWriteAngle,
pfnWriteCoord,
pfnWriteFloat,
pfnWriteLong64,
pfnWriteDouble,
pfnWriteString,
pfnWriteEntity,
pfnCVarRegister,
pfnCVarGetFloat,
pfnCVarGetString,
pfnCVarSetFloat,
pfnCVarSetString,
pfnAlertMessage,
pfnPvAllocEntPrivateData,
pfnFreeEntPrivateData,
SV_AllocString,
SV_GetString,
pfnPEntityOfEntOffset,
pfnEntOffsetOfPEntity,
pfnIndexOfEdict,
pfnPEntityOfEntIndex,
pfnFindEntityByVars,
pfnGetModelPtr,
pfnRegUserMsg,
pfnAnimationAutomove,
pfnGetBonePosition,
pfnFunctionFromName,
pfnNameForFunction,
pfnServerPrint,
pfnAreaPortal,
pfnClassifyEdict,
pfnCmd_Args,
pfnCmd_Argv,
pfnCmd_Argc,
pfnGetAttachment,
pfnCRC_Init,
pfnCRC_ProcessBuffer,
pfnCRC_Final,
pfnRandomLong,
pfnRandomFloat,
pfnSetView,
pfnCrosshairAngle,
pfnLoadFile,
pfnFileExists,
pfnCompareFileTime,
pfnGetGameDir,
pfnStaticDecal,
pfnPrecacheGeneric,
pfnIsDedicatedServer,
pfnIsMapValid,
pfnInfo_RemoveKey,
pfnInfoKeyValue,
pfnSetKeyValue,
pfnGetInfoKeyBuffer,
pfnSetClientKeyValue,
pfnSetSkybox,
pfnPlayMusic,
pfnDropClient,
Host_Error
};
/*
====================
SV_ParseEdict
Parses an edict out of the given string, returning the new position
ed should be a properly initialized empty edict.
====================
*/
bool SV_ParseEdict( script_t *script, edict_t *ent )
{
KeyValueData pkvd[256]; // per one entity
int i, numpairs = 0;
const char *classname = NULL;
token_t token;
svgame.temppool = Mem_AllocPool( "SV Temp Strings" );
// go through all the dictionary pairs
while( 1 )
{
string keyname;
// parse key
if( !Com_ReadToken( script, SC_ALLOW_NEWLINES, &token ))
Host_Error( "SV_ParseEdict: EOF without closing brace\n" );
if( token.string[0] == '}' ) break; // end of desc
com.strncpy( keyname, token.string, sizeof( keyname ) - 1 );
// parse value
if( !Com_ReadToken( script, SC_ALLOW_PATHNAMES2, &token ))
Host_Error( "SV_ParseEdict: EOF without closing brace\n" );
if( token.string[0] == '}' )
Host_Error( "SV_ParseEdict: closing brace without data\n" );
// keynames with a leading underscore are used for utility comments,
// and are immediately discarded by engine
if( keyname[0] == '_' ) continue;
// create keyvalue strings
pkvd[numpairs].szClassName = (char *)classname; // unknown at this moment
pkvd[numpairs].szKeyName = com.stralloc( svgame.temppool, keyname, __FILE__, __LINE__ );
pkvd[numpairs].szValue = com.stralloc( svgame.temppool, token.string, __FILE__, __LINE__ );
pkvd[numpairs].fHandled = false;
if( !com.strcmp( keyname, "classname" ) && classname == NULL )
classname = pkvd[numpairs].szValue;
if( ++numpairs >= 256 ) break;
}
ent = SV_AllocPrivateData( ent, MAKE_STRING( classname ));
for( i = 0; i < numpairs; i++ )
{
if( pkvd[i].fHandled ) continue;
pkvd[i].szClassName = (char *)classname;
svgame.dllFuncs.pfnKeyValue( ent, &pkvd[i] );
}
Mem_FreePool( &svgame.temppool );
return true;
}
/*
================
SV_LoadFromFile
The entities are directly placed in the array, rather than allocated with
ED_Alloc, because otherwise an error loading the map would have entity
number references out of order.
Creates a server's entity / program execution context by
parsing textual entity definitions out of an ent file.
================
*/
void SV_LoadFromFile( script_t *entities )
{
token_t token;
int inhibited, spawned, died;
bool create_world = true;
edict_t *ent;
inhibited = 0;
spawned = 0;
died = 0;
// parse ents
while( Com_ReadToken( entities, SC_ALLOW_NEWLINES, &token ))
{
if( token.string[0] != '{' )
Host_Error( "SV_LoadFromFile: found %s when expecting {\n", token.string );
if( create_world )
{
create_world = false;
ent = EDICT_NUM( 0 );
SV_InitEdict( ent );
}
else ent = SV_AllocEdict();
if( !SV_ParseEdict( entities, ent ))
continue;
if( svgame.dllFuncs.pfnSpawn( ent ) == -1 )
died++;
else spawned++;
}
MsgDev( D_INFO, "%i entities inhibited\n", inhibited );
}
/*
==============
SpawnEntities
Creates a server's entity / program execution context by
parsing textual entity definitions out of an ent file.
==============
*/
void SV_SpawnEntities( const char *mapname, script_t *entities )
{
edict_t *ent;
int i;
MsgDev( D_NOTE, "SV_SpawnEntities()\n" );
ent = EDICT_NUM( 0 );
SV_InitEdict( ent );
ent->v.model = MAKE_STRING( sv.configstrings[CS_MODELS] );
ent->v.modelindex = 1; // world model
ent->v.solid = SOLID_BSP;
ent->v.movetype = MOVETYPE_PUSH;
ent->free = false;
SV_ConfigString( CS_MAXCLIENTS, va("%i", Host_MaxClients()));
svgame.globals->mapname = MAKE_STRING( sv.name );
svgame.globals->time = sv.time;
// spawn the rest of the entities on the map
SV_LoadFromFile( entities );
// set client fields on player ents
for( i = 0; i < svgame.globals->maxClients; i++ )
{
// setup all clients
ent = EDICT_NUM( i + 1 );
SV_InitEdict( ent );
ent->pvServerData->client = svs.clients + i;
ent->pvServerData->client->edict = ent;
svgame.globals->numClients++;
}
Msg("Total %i entities spawned\n", svgame.globals->numEntities );
}
void SV_UnloadProgs( void )
{
if( svgame.hInstance )
{
svgame.dllFuncs.pfnServerDeactivate();
}
Sys_FreeNameFuncGlobals();
StringTable_Delete( svgame.hStringTable );
Com_FreeLibrary( svgame.hInstance );
Mem_FreePool( &svgame.mempool );
Mem_FreePool( &svgame.private );
svgame.hInstance = NULL;
}
void SV_LoadProgs( const char *name )
{
static APIFUNCTION GetEntityAPI;
static GIVEFNPTRSTODLL GiveFnptrsToDll;
static globalvars_t gpGlobals;
string libname;
edict_t *e;
int i;
if( svgame.hInstance ) SV_UnloadProgs();
// fill it in
svgame.globals = &gpGlobals;
com.snprintf( libname, MAX_STRING, "bin/%s.dll", name );
svgame.mempool = Mem_AllocPool( "Server Edicts Zone" );
svgame.private = Mem_AllocPool( "Server Private Zone" );
svgame.hInstance = Com_LoadLibrary( libname );
if( !svgame.hInstance )
{
Host_Error( "SV_LoadProgs: can't initialize server.dll\n" );
return;
}
GetEntityAPI = (APIFUNCTION)Com_GetProcAddress( svgame.hInstance, "GetEntityAPI" );
if( !GetEntityAPI )
{
Host_Error( "SV_LoadProgs: failed to get address of GetEntityAPI proc\n" );
return;
}
GiveFnptrsToDll = (GIVEFNPTRSTODLL)Com_GetProcAddress( svgame.hInstance, "GiveFnptrsToDll" );
if( !GiveFnptrsToDll )
{
// can't find GiveFnptrsToDll!
Host_Error( "SV_LoadProgs: failed to get address of GiveFnptrsToDll proc\n" );
return;
}
if( !Sys_LoadSymbols( va( "bin/%s.dll", name )))
{
Host_Error( "SV_LoadProgs: can't loading export symbols\n" );
return;
}
GiveFnptrsToDll( &gEngfuncs, svgame.globals );
if( !GetEntityAPI( &svgame.dllFuncs, INTERFACE_VERSION ))
{
Host_Error( "SV_LoadProgs: couldn't get entity API\n" );
return;
}
// 65535 unique strings should be enough ...
svgame.hStringTable = StringTable_Create( "Server", 0x10000 );
svgame.globals->maxEntities = host.max_edicts;
svgame.globals->maxClients = Host_MaxClients();
svgame.edicts = Mem_Alloc( svgame.mempool, sizeof( edict_t ) * svgame.globals->maxEntities );
svgame.globals->numEntities = svgame.globals->maxClients + 1; // clients + world
svgame.globals->numClients = 0;
for( i = 0, e = svgame.edicts; i < svgame.globals->maxEntities; i++, e++ )
e->free = true; // mark all edicts as freed
// all done, initialize game
svgame.dllFuncs.pfnGameInit();
}