jedioutcast/CODE-mp/server/sv_game.org

// sv_game.c – interface to the game dll

#include "server.h"

#include "../game/botlib.h" #include "../qcommon/strip.h"

#if !defined(CROFFSYSTEM_H_INC) #include "../qcommon/ROFFSystem.h" #endif

#if !defined(G2_H_INC) #include "../ghoul2/G2_local.h" #endif

botlib_export_t *botlib_export;

void SV_GameError( const char *string ) { Com_Error( ERR_DROP, "%s", string ); }

void SV_GamePrint( const char *string ) { Com_Printf( "%s", string ); }

/ these functions must be used instead of pointer arithmetic, because / the game allocates gentities with private information after the server shared part int SV_NumForGentity( sharedEntity_t *ent ) { int num;

num = ( (byte *)ent - (byte *)sv.gentities ) / sv.gentitySize;

return num; }

sharedEntity_t *SV_GentityNum( int num ) { sharedEntity_t *ent;

ent = (sharedEntity_t *)((byte *)sv.gentities + sv.gentitySize*(num));

return ent; }

playerState_t *SV_GameClientNum( int num ) { playerState_t *ps;

ps = (playerState_t *)((byte *)sv.gameClients + sv.gameClientSize*(num));

return ps; }

svEntity_t *SV_SvEntityForGentity( sharedEntity_t *gEnt ) { if ( !gEnt || gEnt->s.number < 0 || gEnt->s.number >= MAX_GENTITIES ) { Com_Error( ERR_DROP, "SV_SvEntityForGentity: bad gEnt" ); } return &sv.svEntities[ gEnt->s.number ]; }

sharedEntity_t *SV_GEntityForSvEntity( svEntity_t *svEnt ) { int num;

num = svEnt - sv.svEntities; return SV_GentityNum( num ); }

/* ============= SV_GameSendServerCommand

Sends a command string to a client ============= */ void SV_GameSendServerCommand( int clientNum, const char *text ) { if ( clientNum == -1 ) { SV_SendServerCommand( NULL, "%s", text ); } else { if ( clientNum < 0 || clientNum >= sv_maxclients->integer ) { return; } SV_SendServerCommand( svs.clients + clientNum, "%s", text ); } }

/* ============= SV_GameDropClient

Disconnects the client with a message ============= */ void SV_GameDropClient( int clientNum, const char *reason ) { if ( clientNum < 0 || clientNum >= sv_maxclients->integer ) { return; } SV_DropClient( svs.clients + clientNum, reason ); }

/* =============== SV_SetBrushModel

sets mins and maxs for inline bmodels =============== */ void SV_SetBrushModel( sharedEntity_t *ent, const char *name ) { clipHandle_t h; vec3_t mins, maxs;

if (!name) { Com_Error( ERR_DROP, "SV_SetBrushModel: NULL" ); }

if (name[0] != '*') { Com_Error( ERR_DROP, "SV_SetBrushModel: %s isn't a brush model", name ); }

ent->s.modelindex = atoi( name + 1 );

h = CM_InlineModel( ent->s.modelindex ); CM_ModelBounds( h, mins, maxs ); VectorCopy (mins, ent->r.mins); VectorCopy (maxs, ent->r.maxs); ent->r.bmodel = qtrue;

ent->r.contents = -1; // we don't know exactly what is in the brushes

SV_LinkEntity( ent ); // FIXME: remove }

/* =============== SV_inPVS

Also checks portalareas so that doors block sight =============== */ qboolean SV_inPVS (const vec3_t p1, const vec3_t p2) { int leafnum; int cluster; int area1, area2; byte *mask;

leafnum = CM_PointLeafnum (p1); cluster = CM_LeafCluster (leafnum); area1 = CM_LeafArea (leafnum); mask = CM_ClusterPVS (cluster);

leafnum = CM_PointLeafnum (p2); cluster = CM_LeafCluster (leafnum); area2 = CM_LeafArea (leafnum); if ( mask && (!(mask[cluster>>3] & (1<<(cluster&7)) ) ) ) return qfalse; if (!CM_AreasConnected (area1, area2)) return qfalse; // a door blocks sight return qtrue; }

/* =============== SV_inPVSIgnorePortals

Does NOT check portalareas =============== */ qboolean SV_inPVSIgnorePortals( const vec3_t p1, const vec3_t p2) { int leafnum; int cluster; int area1, area2; byte *mask;

leafnum = CM_PointLeafnum (p1); cluster = CM_LeafCluster (leafnum); area1 = CM_LeafArea (leafnum); mask = CM_ClusterPVS (cluster);

leafnum = CM_PointLeafnum (p2); cluster = CM_LeafCluster (leafnum); area2 = CM_LeafArea (leafnum);

if ( mask && (!(mask[cluster>>3] & (1<<(cluster&7)) ) ) ) return qfalse;

return qtrue; }

/* ====================== SV_AdjustAreaPortalState ====================== */ void SV_AdjustAreaPortalState( sharedEntity_t *ent, qboolean open ) { svEntity_t *svEnt;

svEnt = SV_SvEntityForGentity( ent ); if ( svEnt->areanum2 == -1 ) { return; } CM_AdjustAreaPortalState( svEnt->areanum, svEnt->areanum2, open ); }

/* ================ SV_GameAreaEntities ================ */ qboolean SV_EntityContact( const vec3_t mins, const vec3_t maxs, const sharedEntity_t *gEnt, int capsule ) { const float *origin, *angles; clipHandle_t ch; trace_t trace;

// check for exact collision origin = gEnt->r.currentOrigin; angles = gEnt->r.currentAngles;

ch = SV_ClipHandleForEntity( gEnt ); CM_TransformedBoxTrace ( &trace, vec3_origin, vec3_origin, mins, maxs, ch, -1, origin, angles, capsule );

return trace.startsolid; }

/* ============= SV_GetServerinfo

============= */ void SV_GetServerinfo( char *buffer, int bufferSize ) { if ( bufferSize < 1 ) { Com_Error( ERR_DROP, "SV_GetServerinfo: bufferSize == %i", bufferSize ); } Q_strncpyz( buffer, Cvar_InfoString( CVAR_SERVERINFO ), bufferSize ); }

/* ============= SV_LocateGameData

============= */ void SV_LocateGameData( sharedEntity_t *gEnts, int numGEntities, int sizeofGEntity_t, playerState_t *clients, int sizeofGameClient ) { sv.gentities = gEnts; sv.gentitySize = sizeofGEntity_t; sv.num_entities = numGEntities;

sv.gameClients = clients; sv.gameClientSize = sizeofGameClient; }

/* ============= SV_GetUsercmd

============= */ void SV_GetUsercmd( int clientNum, usercmd_t *cmd ) { if ( clientNum < 0 || clientNum >= sv_maxclients->integer ) { Com_Error( ERR_DROP, "SV_GetUsercmd: bad clientNum:%i", clientNum ); } *cmd = svs.clients[clientNum].lastUsercmd; }

//==============================================

static int FloatAsInt( float f ) { int temp;

*(float *)&temp = f;

return temp; }

/* ================== SV_GameSystemCalls

The module is making a system call ================== */ //rcg010207 - see my comments in VM_DllSyscall(), in qcommon/vm.c … #if ((defined linux) && (defined powerpc)) #define VMA(x) ((void *) args[x]) #else #define VMA(x) VM_ArgPtr(args[x]) #endif

#define VMF(x) ((float *)args)[x]

int SV_GameSystemCalls( int *args ) { switch( args[0] ) { case G_PRINT: Com_Printf( "%s", VMA(1) ); return 0; case G_ERROR: Com_Error( ERR_DROP, "%s", VMA(1) ); return 0; case G_MILLISECONDS: return Sys_Milliseconds(); case G_CVAR_REGISTER: Cvar_Register( (vmCvar_t *)VMA(1), (const char *)VMA(2), (const char *)VMA(3), args[4] ); return 0; case G_CVAR_UPDATE: Cvar_Update( (vmCvar_t *)VMA(1) ); return 0; case G_CVAR_SET: Cvar_Set( (const char *)VMA(1), (const char *)VMA(2) ); return 0; case G_CVAR_VARIABLE_INTEGER_VALUE: return Cvar_VariableIntegerValue( (const char *)VMA(1) ); case G_CVAR_VARIABLE_STRING_BUFFER: Cvar_VariableStringBuffer( (const char *)VMA(1), (char *)VMA(2), args[3] ); return 0; case G_ARGC: return Cmd_Argc(); case G_ARGV: Cmd_ArgvBuffer( args[1], (char *)VMA(2), args[3] ); return 0; case G_SEND_CONSOLE_COMMAND: Cbuf_ExecuteText( args[1], (const char *)VMA(2) ); return 0;

case G_FS_FOPEN_FILE: return FS_FOpenFileByMode( (const char *)VMA(1), (int *)VMA(2), (fsMode_t)args[3] ); case G_FS_READ: FS_Read2( VMA(1), args[2], args[3] ); return 0; case G_FS_WRITE: FS_Write( VMA(1), args[2], args[3] ); return 0; case G_FS_FCLOSE_FILE: FS_FCloseFile( args[1] ); return 0; case G_FS_GETFILELIST: return FS_GetFileList( (const char *)VMA(1), (const char *)VMA(2), (char *)VMA(3), args[4] );

case G_LOCATE_GAME_DATA: SV_LocateGameData( (sharedEntity_t *)VMA(1), args[2], args[3], (struct playerState_s *)VMA(4), args[5] ); return 0; case G_DROP_CLIENT: SV_GameDropClient( args[1], (const char *)VMA(2) ); return 0; case G_SEND_SERVER_COMMAND: SV_GameSendServerCommand( args[1], (const char *)VMA(2) ); return 0; case G_LINKENTITY: SV_LinkEntity( (sharedEntity_t *)VMA(1) ); return 0; case G_UNLINKENTITY: SV_UnlinkEntity( (sharedEntity_t *)VMA(1) ); return 0; case G_ENTITIES_IN_BOX: return SV_AreaEntities( (const float *)VMA(1), (const float *)VMA(2), (int *)VMA(3), args[4] ); case G_ENTITY_CONTACT: return SV_EntityContact( (const float *)VMA(1), (const float *)VMA(2), (const sharedEntity_t *)VMA(3), int capsule qfalse ); case G_ENTITY_CONTACTCAPSULE: return SV_EntityContact( (const float *)VMA(1), (const float *)VMA(2), (const sharedEntity_t *)VMA(3), int capsule qtrue ); case G_TRACE: SV_Trace( (trace_t *)VMA(1), (const float *)VMA(2), (const float *)VMA(3), (const float *)VMA(4), (const float *)VMA(5), args[6], args[7], int capsule qfalse, args[8], args[9] ); return 0; case G_TRACECAPSULE: SV_Trace( (trace_t *)VMA(1), (const float *)VMA(2), (const float *)VMA(3), (const float *)VMA(4), (const float *)VMA(5), args[6], args[7], int capsule qtrue, args[8], args[9] ); return 0; case G_POINT_CONTENTS: return SV_PointContents( (const float *)VMA(1), args[2] ); case G_SET_BRUSH_MODEL: SV_SetBrushModel( (sharedEntity_t *)VMA(1), (const char *)VMA(2) ); return 0; case G_IN_PVS: return SV_inPVS( (const float *)VMA(1), (const float *)VMA(2) ); case G_IN_PVS_IGNORE_PORTALS: return SV_inPVSIgnorePortals( (const float *)VMA(1), (const float *)VMA(2) );

case G_SET_CONFIGSTRING: SV_SetConfigstring( args[1], (const char *)VMA(2) ); return 0; case G_GET_CONFIGSTRING: SV_GetConfigstring( args[1], (char *)VMA(2), args[3] ); return 0; case G_SET_USERINFO: SV_SetUserinfo( args[1], (const char *)VMA(2) ); return 0; case G_GET_USERINFO: SV_GetUserinfo( args[1], (char *)VMA(2), args[3] ); return 0; case G_GET_SERVERINFO: SV_GetServerinfo( (char *)VMA(1), args[2] ); return 0; case G_ADJUST_AREA_PORTAL_STATE: SV_AdjustAreaPortalState( (sharedEntity_t *)VMA(1), (qboolean)args[2] ); return 0; case G_AREAS_CONNECTED: return CM_AreasConnected( args[1], args[2] );

case G_BOT_ALLOCATE_CLIENT: return SV_BotAllocateClient(); case G_BOT_FREE_CLIENT: SV_BotFreeClient( args[1] ); return 0;

case G_GET_USERCMD: SV_GetUsercmd( args[1], (struct usercmd_s *)VMA(2) ); return 0; case G_GET_ENTITY_TOKEN: { const char *s;

s = COM_Parse( (const char **) &sv.entityParsePoint ); Q_strncpyz( (char *)VMA(1), s, args[2] ); if ( !sv.entityParsePoint && !s[0] ) { return qfalse; } else { return qtrue; } }

/* case G_BOT_GET_MEMORY: void *ptr; ptr = Bot_GetMemoryGame(args[1]); return (int)ptr; case G_BOT_FREE_MEMORY: Bot_FreeMemoryGame((void *)VMA(1)); return 0; */ case G_DEBUG_POLYGON_CREATE: return BotImport_DebugPolygonCreate( args[1], args[2], (float (*)[3])VMA(3) ); case G_DEBUG_POLYGON_DELETE: BotImport_DebugPolygonDelete( args[1] ); return 0; case G_REAL_TIME: return Com_RealTime( (struct qtime_s *)VMA(1) ); case G_SNAPVECTOR: Sys_SnapVector( (float *)VMA(1) ); return 0;

case SP_REGISTER_SERVER_CMD: SP_RegisterServer( (const char *)VMA(1) ); return 0; case SP_GETSTRINGTEXTSTRING: //return (int)SP_GetStringTextString((char )VMA(1)); const char text;

assert(VMA(1)); assert(VMA(2));

/ if (args[0] == CG_SP_GETSTRINGTEXT) / { / text = SP_GetStringText( args[1] ); / } // else { text = SP_GetStringTextString( (const char *) VMA(1) ); }

if ( text[0] ) { Q_strncpyz( (char *) VMA(2), text, args[3] ); return qtrue; } else { Q_strncpyz( (char *) VMA(2), "??", args[3] ); return qfalse; } break;

case G_ROFF_CLEAN: return theROFFSystem.Clean(qfalse);

case G_ROFF_UPDATE_ENTITIES: theROFFSystem.UpdateEntities(qfalse); return 0;

case G_ROFF_CACHE: return theROFFSystem.Cache( (char *)VMA(1), qfalse );

case G_ROFF_PLAY: return theROFFSystem.Play(args[1], args[2], (qboolean)args[3], qfalse );

case G_ROFF_PURGE_ENT: return theROFFSystem.PurgeEnt( args[1], qfalse );

//====================================

case BOTLIB_SETUP: return SV_BotLibSetup(); case BOTLIB_SHUTDOWN: return SV_BotLibShutdown(); case BOTLIB_LIBVAR_SET: return botlib_export->BotLibVarSet( (char *)VMA(1), (char *)VMA(2) ); case BOTLIB_LIBVAR_GET: return botlib_export->BotLibVarGet( (char *)VMA(1), (char *)VMA(2), args[3] );

case BOTLIB_PC_ADD_GLOBAL_DEFINE: return botlib_export->PC_AddGlobalDefine( (char *)VMA(1) ); case BOTLIB_PC_LOAD_SOURCE: return botlib_export->PC_LoadSourceHandle( (const char *)VMA(1) ); case BOTLIB_PC_FREE_SOURCE: return botlib_export->PC_FreeSourceHandle( args[1] ); case BOTLIB_PC_READ_TOKEN: return botlib_export->PC_ReadTokenHandle( args[1], (struct pc_token_s *)VMA(2) ); case BOTLIB_PC_SOURCE_FILE_AND_LINE: return botlib_export->PC_SourceFileAndLine( args[1], (char *)VMA(2), (int *)VMA(3) );

case BOTLIB_START_FRAME: return botlib_export->BotLibStartFrame( VMF(1) ); case BOTLIB_LOAD_MAP: return botlib_export->BotLibLoadMap( (const char *)VMA(1) ); case BOTLIB_UPDATENTITY: return botlib_export->BotLibUpdateEntity( args[1], (struct bot_entitystate_s *)VMA(2) ); case BOTLIB_TEST: return botlib_export->Test( args[1], (char *)VMA(2), (float *)VMA(3), (float *)VMA(4) );

case BOTLIB_GET_SNAPSHOT_ENTITY: return SV_BotGetSnapshotEntity( args[1], args[2] ); case BOTLIB_GET_CONSOLE_MESSAGE: return SV_BotGetConsoleMessage( args[1], (char *)VMA(2), args[3] ); case BOTLIB_USER_COMMAND: SV_ClientThink( &svs.clients[args[1]], (struct usercmd_s *)VMA(2) ); return 0;

case BOTLIB_AAS_BBOX_AREAS: return botlib_export->aas.AAS_BBoxAreas( (float *)VMA(1), (float *)VMA(2), (int *)VMA(3), args[4] ); case BOTLIB_AAS_AREA_INFO: return botlib_export->aas.AAS_AreaInfo( args[1], (struct aas_areainfo_s *)VMA(2) ); case BOTLIB_AAS_ALTERNATIVE_ROUTE_GOAL: return botlib_export->aas.AAS_AlternativeRouteGoals( (float *)VMA(1), args[2], (float *)VMA(3), args[4], args[5], (struct aas_altroutegoal_s *)VMA(6), args[7], args[8] ); case BOTLIB_AAS_ENTITY_INFO: botlib_export->aas.AAS_EntityInfo( args[1], (struct aas_entityinfo_s *)VMA(2) ); return 0;

case BOTLIB_AAS_INITIALIZED: return botlib_export->aas.AAS_Initialized(); case BOTLIB_AAS_PRESENCE_TYPE_BOUNDING_BOX: botlib_export->aas.AAS_PresenceTypeBoundingBox( args[1], (float *)VMA(2), (float *)VMA(3) ); return 0; case BOTLIB_AAS_TIME: return FloatAsInt( botlib_export->aas.AAS_Time() );

case BOTLIB_AAS_POINT_AREA_NUM: return botlib_export->aas.AAS_PointAreaNum( (float *)VMA(1) ); case BOTLIB_AAS_POINT_REACHABILITY_AREA_INDEX: return botlib_export->aas.AAS_PointReachabilityAreaIndex( (float *)VMA(1) ); case BOTLIB_AAS_TRACE_AREAS: return botlib_export->aas.AAS_TraceAreas( (float )VMA(1), (float *)VMA(2), (int *)VMA(3), (float ()[3])VMA(4), args[5] );

case BOTLIB_AAS_POINT_CONTENTS: return botlib_export->aas.AAS_PointContents( (float *)VMA(1) ); case BOTLIB_AAS_NEXT_BSP_ENTITY: return botlib_export->aas.AAS_NextBSPEntity( args[1] ); case BOTLIB_AAS_VALUE_FOR_BSP_EPAIR_KEY: return botlib_export->aas.AAS_ValueForBSPEpairKey( args[1], (char *)VMA(2), (char *)VMA(3), args[4] ); case BOTLIB_AAS_VECTOR_FOR_BSP_EPAIR_KEY: return botlib_export->aas.AAS_VectorForBSPEpairKey( args[1], (char *)VMA(2), (float *)VMA(3) ); case BOTLIB_AAS_FLOAT_FOR_BSP_EPAIR_KEY: return botlib_export->aas.AAS_FloatForBSPEpairKey( args[1], (char *)VMA(2), (float *)VMA(3) ); case BOTLIB_AAS_INT_FOR_BSP_EPAIR_KEY: return botlib_export->aas.AAS_IntForBSPEpairKey( args[1], (char *)VMA(2), (int *)VMA(3) );

case BOTLIB_AAS_AREA_REACHABILITY: return botlib_export->aas.AAS_AreaReachability( args[1] );

case BOTLIB_AAS_AREA_TRAVEL_TIME_TO_GOAL_AREA: return botlib_export->aas.AAS_AreaTravelTimeToGoalArea( args[1], (float *)VMA(2), args[3], args[4] ); case BOTLIB_AAS_ENABLE_ROUTING_AREA: return botlib_export->aas.AAS_EnableRoutingArea( args[1], args[2] ); case BOTLIB_AAS_PREDICT_ROUTE: return botlib_export->aas.AAS_PredictRoute( (struct aas_predictroute_s *)VMA(1), args[2], (float *)VMA(3), args[4], args[5], args[6], args[7], args[8], args[9], args[10], args[11] );

case BOTLIB_AAS_SWIMMING: return botlib_export->aas.AAS_Swimming( (float *)VMA(1) ); case BOTLIB_AAS_PREDICT_CLIENT_MOVEMENT: return botlib_export->aas.AAS_PredictClientMovement( (struct aas_clientmove_s *)VMA(1), args[2], (float *)VMA(3), args[4], args[5], (float *)VMA(6), (float *)VMA(7), args[8], args[9], VMF(10), args[11], args[12], args[13] );

case BOTLIB_EA_SAY: botlib_export->ea.EA_Say( args[1], (char *)VMA(2) ); return 0; case BOTLIB_EA_SAY_TEAM: botlib_export->ea.EA_SayTeam( args[1], (char *)VMA(2) ); return 0; case BOTLIB_EA_COMMAND: botlib_export->ea.EA_Command( args[1], (char *)VMA(2) ); return 0;

case BOTLIB_EA_ACTION: botlib_export->ea.EA_Action( args[1], args[2] ); break; case BOTLIB_EA_GESTURE: botlib_export->ea.EA_Gesture( args[1] ); return 0; case BOTLIB_EA_TALK: botlib_export->ea.EA_Talk( args[1] ); return 0; case BOTLIB_EA_ATTACK: botlib_export->ea.EA_Attack( args[1] ); return 0; case BOTLIB_EA_ALT_ATTACK: botlib_export->ea.EA_Alt_Attack( args[1] ); return 0; case BOTLIB_EA_FORCEPOWER: botlib_export->ea.EA_ForcePower( args[1] ); return 0; case BOTLIB_EA_USE: botlib_export->ea.EA_Use( args[1] ); return 0; case BOTLIB_EA_RESPAWN: botlib_export->ea.EA_Respawn( args[1] ); return 0; case BOTLIB_EA_CROUCH: botlib_export->ea.EA_Crouch( args[1] ); return 0; case BOTLIB_EA_MOVE_UP: botlib_export->ea.EA_MoveUp( args[1] ); return 0; case BOTLIB_EA_MOVE_DOWN: botlib_export->ea.EA_MoveDown( args[1] ); return 0; case BOTLIB_EA_MOVE_FORWARD: botlib_export->ea.EA_MoveForward( args[1] ); return 0; case BOTLIB_EA_MOVE_BACK: botlib_export->ea.EA_MoveBack( args[1] ); return 0; case BOTLIB_EA_MOVE_LEFT: botlib_export->ea.EA_MoveLeft( args[1] ); return 0; case BOTLIB_EA_MOVE_RIGHT: botlib_export->ea.EA_MoveRight( args[1] ); return 0;

case BOTLIB_EA_SELECT_WEAPON: botlib_export->ea.EA_SelectWeapon( args[1], args[2] ); return 0; case BOTLIB_EA_JUMP: botlib_export->ea.EA_Jump( args[1] ); return 0; case BOTLIB_EA_DELAYED_JUMP: botlib_export->ea.EA_DelayedJump( args[1] ); return 0; case BOTLIB_EA_MOVE: botlib_export->ea.EA_Move( args[1], (float *)VMA(2), VMF(3) ); return 0; case BOTLIB_EA_VIEW: botlib_export->ea.EA_View( args[1], (float *)VMA(2) ); return 0;

case BOTLIB_EA_END_REGULAR: botlib_export->ea.EA_EndRegular( args[1], VMF(2) ); return 0; case BOTLIB_EA_GET_INPUT: botlib_export->ea.EA_GetInput( args[1], VMF(2), (struct bot_input_s *)VMA(3) ); return 0; case BOTLIB_EA_RESET_INPUT: botlib_export->ea.EA_ResetInput( args[1] ); return 0;

case BOTLIB_AI_LOAD_CHARACTER: return botlib_export->ai.BotLoadCharacter( (char *)VMA(1), VMF(2) ); case BOTLIB_AI_FREE_CHARACTER: botlib_export->ai.BotFreeCharacter( args[1] ); return 0; case BOTLIB_AI_CHARACTERISTIC_FLOAT: return FloatAsInt( botlib_export->ai.Characteristic_Float( args[1], args[2] ) ); case BOTLIB_AI_CHARACTERISTIC_BFLOAT: return FloatAsInt( botlib_export->ai.Characteristic_BFloat( args[1], args[2], VMF(3), VMF(4) ) ); case BOTLIB_AI_CHARACTERISTIC_INTEGER: return botlib_export->ai.Characteristic_Integer( args[1], args[2] ); case BOTLIB_AI_CHARACTERISTIC_BINTEGER: return botlib_export->ai.Characteristic_BInteger( args[1], args[2], args[3], args[4] ); case BOTLIB_AI_CHARACTERISTIC_STRING: botlib_export->ai.Characteristic_String( args[1], args[2], (char *)VMA(3), args[4] ); return 0;

case BOTLIB_AI_ALLOC_CHAT_STATE: return botlib_export->ai.BotAllocChatState(); case BOTLIB_AI_FREE_CHAT_STATE: botlib_export->ai.BotFreeChatState( args[1] ); return 0; case BOTLIB_AI_QUEUE_CONSOLE_MESSAGE: botlib_export->ai.BotQueueConsoleMessage( args[1], args[2], (char *)VMA(3) ); return 0; case BOTLIB_AI_REMOVE_CONSOLE_MESSAGE: botlib_export->ai.BotRemoveConsoleMessage( args[1], args[2] ); return 0; case BOTLIB_AI_NEXT_CONSOLE_MESSAGE: return botlib_export->ai.BotNextConsoleMessage( args[1], (struct bot_consolemessage_s *)VMA(2) ); case BOTLIB_AI_NUM_CONSOLE_MESSAGE: return botlib_export->ai.BotNumConsoleMessages( args[1] ); case BOTLIB_AI_INITIAL_CHAT: botlib_export->ai.BotInitialChat( args[1], (char *)VMA(2), args[3], (char *)VMA(4), (char *)VMA(5), (char *)VMA(6), (char *)VMA(7), (char *)VMA(8), (char *)VMA(9), (char *)VMA(10), (char *)VMA(11) ); return 0; case BOTLIB_AI_NUM_INITIAL_CHATS: return botlib_export->ai.BotNumInitialChats( args[1], (char *)VMA(2) ); case BOTLIB_AI_REPLY_CHAT: return botlib_export->ai.BotReplyChat( args[1], (char *)VMA(2), args[3], args[4], (char *)VMA(5), (char *)VMA(6), (char *)VMA(7), (char *)VMA(8), (char *)VMA(9), (char *)VMA(10), (char *)VMA(11), (char *)VMA(12) ); case BOTLIB_AI_CHAT_LENGTH: return botlib_export->ai.BotChatLength( args[1] ); case BOTLIB_AI_ENTER_CHAT: botlib_export->ai.BotEnterChat( args[1], args[2], args[3] ); return 0; case BOTLIB_AI_GET_CHAT_MESSAGE: botlib_export->ai.BotGetChatMessage( args[1], (char *)VMA(2), args[3] ); return 0; case BOTLIB_AI_STRING_CONTAINS: return botlib_export->ai.StringContains( (char *)VMA(1), (char *)VMA(2), args[3] ); case BOTLIB_AI_FIND_MATCH: return botlib_export->ai.BotFindMatch( (char *)VMA(1), (struct bot_match_s *)VMA(2), args[3] ); case BOTLIB_AI_MATCH_VARIABLE: botlib_export->ai.BotMatchVariable( (struct bot_match_s *)VMA(1), args[2], (char *)VMA(3), args[4] ); return 0; case BOTLIB_AI_UNIFY_WHITE_SPACES: botlib_export->ai.UnifyWhiteSpaces( (char *)VMA(1) ); return 0; case BOTLIB_AI_REPLACE_SYNONYMS: botlib_export->ai.BotReplaceSynonyms( (char *)VMA(1), args[2] ); return 0; case BOTLIB_AI_LOAD_CHAT_FILE: return botlib_export->ai.BotLoadChatFile( args[1], (char *)VMA(2), (char *)VMA(3) ); case BOTLIB_AI_SET_CHAT_GENDER: botlib_export->ai.BotSetChatGender( args[1], args[2] ); return 0; case BOTLIB_AI_SET_CHAT_NAME: botlib_export->ai.BotSetChatName( args[1], (char *)VMA(2), args[3] ); return 0;

case BOTLIB_AI_RESET_GOAL_STATE: botlib_export->ai.BotResetGoalState( args[1] ); return 0; case BOTLIB_AI_RESET_AVOID_GOALS: botlib_export->ai.BotResetAvoidGoals( args[1] ); return 0; case BOTLIB_AI_REMOVE_FROM_AVOID_GOALS: botlib_export->ai.BotRemoveFromAvoidGoals( args[1], args[2] ); return 0; case BOTLIB_AI_PUSH_GOAL: botlib_export->ai.BotPushGoal( args[1], (struct bot_goal_s *)VMA(2) ); return 0; case BOTLIB_AI_POP_GOAL: botlib_export->ai.BotPopGoal( args[1] ); return 0; case BOTLIB_AI_EMPTY_GOAL_STACK: botlib_export->ai.BotEmptyGoalStack( args[1] ); return 0; case BOTLIB_AI_DUMP_AVOID_GOALS: botlib_export->ai.BotDumpAvoidGoals( args[1] ); return 0; case BOTLIB_AI_DUMP_GOAL_STACK: botlib_export->ai.BotDumpGoalStack( args[1] ); return 0; case BOTLIB_AI_GOAL_NAME: botlib_export->ai.BotGoalName( args[1], (char *)VMA(2), args[3] ); return 0; case BOTLIB_AI_GET_TOP_GOAL: return botlib_export->ai.BotGetTopGoal( args[1], (struct bot_goal_s *)VMA(2) ); case BOTLIB_AI_GET_SECOND_GOAL: return botlib_export->ai.BotGetSecondGoal( args[1], (struct bot_goal_s *)VMA(2) ); case BOTLIB_AI_CHOOSE_LTG_ITEM: return botlib_export->ai.BotChooseLTGItem( args[1], (float *)VMA(2), (int *)VMA(3), args[4] ); case BOTLIB_AI_CHOOSE_NBG_ITEM: return botlib_export->ai.BotChooseNBGItem( args[1], (float *)VMA(2), (int *)VMA(3), args[4], (struct bot_goal_s *)VMA(5), VMF(6) ); case BOTLIB_AI_TOUCHING_GOAL: return botlib_export->ai.BotTouchingGoal( (float *)VMA(1), (struct bot_goal_s *)VMA(2) ); case BOTLIB_AI_ITEM_GOAL_IN_VIS_BUT_NOT_VISIBLE: return botlib_export->ai.BotItemGoalInVisButNotVisible( args[1], (float *)VMA(2), (float *)VMA(3), (struct bot_goal_s *)VMA(4) ); case BOTLIB_AI_GET_LEVEL_ITEM_GOAL: return botlib_export->ai.BotGetLevelItemGoal( args[1], (char *)VMA(2), (struct bot_goal_s *)VMA(3) ); case BOTLIB_AI_GET_NEXT_CAMP_SPOT_GOAL: return botlib_export->ai.BotGetNextCampSpotGoal( args[1], (struct bot_goal_s *)VMA(2) ); case BOTLIB_AI_GET_MAP_LOCATION_GOAL: return botlib_export->ai.BotGetMapLocationGoal( (char *)VMA(1), (struct bot_goal_s *)VMA(2) ); case BOTLIB_AI_AVOID_GOAL_TIME: return FloatAsInt( botlib_export->ai.BotAvoidGoalTime( args[1], args[2] ) ); case BOTLIB_AI_SET_AVOID_GOAL_TIME: botlib_export->ai.BotSetAvoidGoalTime( args[1], args[2], VMF(3)); return 0; case BOTLIB_AI_INIT_LEVEL_ITEMS: botlib_export->ai.BotInitLevelItems(); return 0; case BOTLIB_AI_UPDATE_ENTITY_ITEMS: botlib_export->ai.BotUpdateEntityItems(); return 0; case BOTLIB_AI_LOAD_ITEM_WEIGHTS: return botlib_export->ai.BotLoadItemWeights( args[1], (char *)VMA(2) ); case BOTLIB_AI_FREE_ITEM_WEIGHTS: botlib_export->ai.BotFreeItemWeights( args[1] ); return 0; case BOTLIB_AI_INTERBREED_GOAL_FUZZY_LOGIC: botlib_export->ai.BotInterbreedGoalFuzzyLogic( args[1], args[2], args[3] ); return 0; case BOTLIB_AI_SAVE_GOAL_FUZZY_LOGIC: botlib_export->ai.BotSaveGoalFuzzyLogic( args[1], (char *)VMA(2) ); return 0; case BOTLIB_AI_MUTATE_GOAL_FUZZY_LOGIC: botlib_export->ai.BotMutateGoalFuzzyLogic( args[1], VMF(2) ); return 0; case BOTLIB_AI_ALLOC_GOAL_STATE: return botlib_export->ai.BotAllocGoalState( args[1] ); case BOTLIB_AI_FREE_GOAL_STATE: botlib_export->ai.BotFreeGoalState( args[1] ); return 0;

case BOTLIB_AI_RESET_MOVE_STATE: botlib_export->ai.BotResetMoveState( args[1] ); return 0; case BOTLIB_AI_ADD_AVOID_SPOT: botlib_export->ai.BotAddAvoidSpot( args[1], (float *)VMA(2), VMF(3), args[4] ); return 0; case BOTLIB_AI_MOVE_TO_GOAL: botlib_export->ai.BotMoveToGoal( (struct bot_moveresult_s *)VMA(1), args[2], (struct bot_goal_s *)VMA(3), args[4] ); return 0; case BOTLIB_AI_MOVE_IN_DIRECTION: return botlib_export->ai.BotMoveInDirection( args[1], (float *)VMA(2), VMF(3), args[4] ); case BOTLIB_AI_RESET_AVOID_REACH: botlib_export->ai.BotResetAvoidReach( args[1] ); return 0; case BOTLIB_AI_RESET_LAST_AVOID_REACH: botlib_export->ai.BotResetLastAvoidReach( args[1] ); return 0; case BOTLIB_AI_REACHABILITY_AREA: return botlib_export->ai.BotReachabilityArea( (float *)VMA(1), args[2] ); case BOTLIB_AI_MOVEMENT_VIEW_TARGET: return botlib_export->ai.BotMovementViewTarget( args[1], (struct bot_goal_s *)VMA(2), args[3], VMF(4), (float *)VMA(5) ); case BOTLIB_AI_PREDICT_VISIBLE_POSITION: return botlib_export->ai.BotPredictVisiblePosition( (float *)VMA(1), args[2], (struct bot_goal_s *)VMA(3), args[4], (float *)VMA(5) ); case BOTLIB_AI_ALLOC_MOVE_STATE: return botlib_export->ai.BotAllocMoveState(); case BOTLIB_AI_FREE_MOVE_STATE: botlib_export->ai.BotFreeMoveState( args[1] ); return 0; case BOTLIB_AI_INIT_MOVE_STATE: botlib_export->ai.BotInitMoveState( args[1], (struct bot_initmove_s *)VMA(2) ); return 0;

case BOTLIB_AI_CHOOSE_BEST_FIGHT_WEAPON: return botlib_export->ai.BotChooseBestFightWeapon( args[1], (int *)VMA(2) ); case BOTLIB_AI_GET_WEAPON_INFO: botlib_export->ai.BotGetWeaponInfo( args[1], args[2], (struct weaponinfo_s *)VMA(3) ); return 0; case BOTLIB_AI_LOAD_WEAPON_WEIGHTS: return botlib_export->ai.BotLoadWeaponWeights( args[1], (char *)VMA(2) ); case BOTLIB_AI_ALLOC_WEAPON_STATE: return botlib_export->ai.BotAllocWeaponState(); case BOTLIB_AI_FREE_WEAPON_STATE: botlib_export->ai.BotFreeWeaponState( args[1] ); return 0; case BOTLIB_AI_RESET_WEAPON_STATE: botlib_export->ai.BotResetWeaponState( args[1] ); return 0;

case BOTLIB_AI_GENETIC_PARENTS_AND_CHILD_SELECTION: return botlib_export->ai.GeneticParentsAndChildSelection(args[1], (float *)VMA(2), (int *)VMA(3), (int *)VMA(4), (int *)VMA(5));

case TRAP_MEMSET: Com_Memset( VMA(1), args[2], args[3] ); return 0;

case TRAP_MEMCPY: Com_Memcpy( VMA(1), VMA(2), args[3] ); return 0;

case TRAP_STRNCPY: return (int)strncpy( (char *)VMA(1), (const char *)VMA(2), args[3] );

case TRAP_SIN: return FloatAsInt( sin( VMF(1) ) );

case TRAP_COS: return FloatAsInt( cos( VMF(1) ) );

case TRAP_ATAN2: return FloatAsInt( atan2( VMF(1), VMF(2) ) );

case TRAP_SQRT: return FloatAsInt( sqrt( VMF(1) ) );

case TRAP_MATRIXMULTIPLY: MatrixMultiply( (vec3_t *)VMA(1), (vec3_t *)VMA(2), (vec3_t *)VMA(3) ); return 0;

case TRAP_ANGLEVECTORS: AngleVectors( (const float *)VMA(1), (float *)VMA(2), (float *)VMA(3), (float *)VMA(4) ); return 0;

case TRAP_PERPENDICULARVECTOR: PerpendicularVector( (float *)VMA(1), (const float *)VMA(2) ); return 0;

case TRAP_FLOOR: return FloatAsInt( floor( VMF(1) ) );

case TRAP_CEIL: return FloatAsInt( ceil( VMF(1) ) );

case G_G2_LISTBONES: G2API_ListBones( (CGhoul2Info *) VMA(1), args[2]); return 0;

case G_G2_LISTSURFACES: G2API_ListSurfaces( (CGhoul2Info *) args[1] ); return 0;

case G_G2_HAVEWEGHOULMODELS: return G2API_HaveWeGhoul2Models( *((CGhoul2Info_v *)args[1]) );

case G_G2_SETMODELS: G2API_SetGhoul2ModelIndexes( *((CGhoul2Info_v *)args[1]),(qhandle_t *)VMA(2),(qhandle_t *)VMA(3)); return 0;

case G_G2_GETBOLT: return G2API_GetBoltMatrix(*((CGhoul2Info_v *)args[1]), args[2], args[3], (mdxaBone_t *)VMA(4), (const float *)VMA(5),(const float *)VMA(6), args[7], (qhandle_t *)VMA(8), (float *)VMA(9));

case G_G2_GETBOLT_NOREC: gG2_GBMNoReconstruct = qtrue; return G2API_GetBoltMatrix(*((CGhoul2Info_v *)args[1]), args[2], args[3], (mdxaBone_t *)VMA(4), (const float *)VMA(5),(const float *)VMA(6), args[7], (qhandle_t *)VMA(8), (float *)VMA(9));

case G_G2_INITGHOUL2MODEL: return G2API_InitGhoul2Model((CGhoul2Info_v **)VMA(1), (const char *)VMA(2), args[3], (qhandle_t) args[4], (qhandle_t) args[5], args[6], args[7]);

case G_G2_ADDBOLT: return G2API_AddBolt(*((CGhoul2Info_v *)args[1]), args[2], (const char *)VMA(3));

case G_G2_SETBOLTINFO: G2API_SetBoltInfo(*((CGhoul2Info_v *)args[1]), args[2], args[3]); return 0;

case G_G2_ANGLEOVERRIDE: return G2API_SetBoneAngles(*((CGhoul2Info_v *)args[1]), args[2], (const char *)VMA(3), (float *)VMA(4), args[5], (const Eorientations) args[6], (const Eorientations) args[7], (const Eorientations) args[8], (qhandle_t *)VMA(9), args[10], args[11] );

case G_G2_PLAYANIM: return G2API_SetBoneAnim(*((CGhoul2Info_v *)args[1]), args[2], (const char *)VMA(3), args[4], args[5], args[6], VMF(7), args[8], VMF(9), args[10]); case G_G2_GETGLANAME: //return (int)G2API_GetGLAName(*((CGhoul2Info_v *)args[1]), args[2]); { //Since returning a pointer in such a way to a VM seems to cause MASSIVE FAILURE<tm>, we will shove data into the pointer the vm passes instead char *point = ((char *)VMA(3)); char *local; local = G2API_GetGLAName(*((CGhoul2Info_v *)args[1]), args[2]); if (local) { strcpy(point, local); } }

return 0;

case G_G2_COPYGHOUL2INSTANCE: return (int)G2API_CopyGhoul2Instance(*((CGhoul2Info_v *)args[1]), *((CGhoul2Info_v *)args[2]), args[3]);

case G_G2_COPYSPECIFICGHOUL2MODEL: G2API_CopySpecificG2Model(*((CGhoul2Info_v *)args[1]), args[2], *((CGhoul2Info_v *)args[3]), args[4]); return 0;

case G_G2_DUPLICATEGHOUL2INSTANCE: G2API_DuplicateGhoul2Instance(((CGhoul2Info_v *)args[1]), (CGhoul2Info_v *)VMA(2)); return 0;

case G_G2_HASGHOUL2MODELONINDEX: //return (int)G2API_HasGhoul2ModelOnIndex((CGhoul2Info_v *)args[1], args[2]); return (int)G2API_HasGhoul2ModelOnIndex((CGhoul2Info_v *)VMA(1), args[2]);

case G_G2_REMOVEGHOUL2MODEL: //return (int)G2API_RemoveGhoul2Model((CGhoul2Info_v *)args[1], args[2]); return (int)G2API_RemoveGhoul2Model((CGhoul2Info_v *)VMA(1), args[2]);

case G_G2_CLEANMODELS: G2API_CleanGhoul2Models((CGhoul2Info_v *)VMA(1)); // G2API_CleanGhoul2Models((CGhoul2Info_v *)args[1]); return 0;

default: Com_Error( ERR_DROP, "Bad game system trap: %i", args[0] ); } return -1; }

/* ============= SV_ShutdownGameProgs

Called every time a map changes ============= */ void SV_ShutdownGameProgs( void ) { if ( !gvm ) { return; } VM_Call( gvm, GAME_SHUTDOWN, qfalse ); VM_Free( gvm ); gvm = NULL; }

/* ================ SV_InitGameVM

Called for both a full init and a restart ================ */ static void SV_InitGameVM( qboolean restart ) { int i;

// start the entity parsing at the beginning sv.entityParsePoint = CM_EntityString();

/ use the current msec count for a random seed / init for this gamestate VM_Call( gvm, GAME_INIT, svs.time, Com_Milliseconds(), restart );

/ clear all gentity pointers that might still be set from / a previous level for ( i = 0 ; i < sv_maxclients->integer ; i++ ) { svs.clients[i].gentity = NULL; } }

/* ================= SV_RestartGameProgs

Called on a map_restart, but not on a normal map change ================= */ void SV_RestartGameProgs( void ) { if ( !gvm ) { return; } VM_Call( gvm, GAME_SHUTDOWN, qtrue );

// do a restart instead of a free gvm = VM_Restart( gvm ); if ( !gvm ) { // bk001212 - as done below Com_Error( ERR_FATAL, "VM_Restart on game failed" ); }

SV_InitGameVM( qtrue ); }

/* ============= SV_InitGameProgs

Called on a normal map change, not on a map_restart ============= */ void SV_InitGameProgs( void ) { cvar_t *var; //FIXME these are temp while I make bots run in vm extern int bot_enable;

var = Cvar_Get( "bot_enable", "1", CVAR_LATCH ); if ( var ) { bot_enable = var->integer; } else { bot_enable = 0; }

// load the dll or bytecode gvm = VM_Create( "jk2mpgame", SV_GameSystemCalls, (vmInterpret_t)(int)Cvar_VariableValue( "vm_game" ) ); if ( !gvm ) { Com_Error( ERR_FATAL, "VM_Create on game failed" ); }

SV_InitGameVM( qfalse ); }

/* ================== SV_GameCommand

See if the current console command is claimed by the game ================== */ qboolean SV_GameCommand( void ) { if ( sv.state != SS_GAME ) { return qfalse; }

return (qboolean)VM_Call( gvm, GAME_CONSOLE_COMMAND ); }