marrub
/
spingle
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity
spingle/source/sv_main.c

1484 lines
39 KiB
C
Raw Blame History

/*
Copyright (C) 1996-2001 Id Software, Inc.
Copyright (C) 2002-2009 John Fitzgibbons and others
Copyright (C) 2010-2014 QuakeSpasm developers
This program is free software; you can redistribute it and/or
modify it under the terms of the GNU General Public License
as published by the Free Software Foundation; either version 2
of the License, or (at your option) any later version.
This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
See the GNU General Public License for more details.
You should have received a copy of the GNU General Public License
along with this program; if not, write to the Free Software
Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
*/
// sv_main.c -- server main program
#include "q_defs.h"
server_t sv;
server_static_t svs;
static char localmodels[MAX_MODELS][8]; // inline model names for precache
int32_t sv_protocol = PROTOCOL_FITZQUAKE; //johnfitz
//============================================================================
/*
===============
SV_Protocol_f
===============
*/
void SV_Protocol_f(void)
{
int32_t i;
switch(Cmd_Argc())
{
case 1:
Con_Printf("\"sv_protocol\" is \"%" PRIi32 "\"\n", sv_protocol);
break;
case 2:
i = atoi(Cmd_Argv(1));
if(i != PROTOCOL_NETQUAKE && i != PROTOCOL_FITZQUAKE && i != PROTOCOL_RMQ)
Con_Printf("sv_protocol must be %" PRIi32 " or %" PRIi32 " or %" PRIi32 "\n", PROTOCOL_NETQUAKE, PROTOCOL_FITZQUAKE, PROTOCOL_RMQ);
else
{
sv_protocol = i;
if(sv.active)
Con_Printf("changes will not take effect until the next level load.\n");
}
break;
default:
Con_SafePrintf("usage: sv_protocol <protocol>\n");
break;
}
}
/*
===============
SV_Init
===============
*/
void SV_Init(void)
{
int32_t i;
const char *p;
extern cvar_t sv_maxvelocity;
extern cvar_t sv_gravity;
extern cvar_t sv_nostep;
extern cvar_t sv_freezenonclients;
extern cvar_t sv_friction;
extern cvar_t sv_edgefriction;
extern cvar_t sv_stopspeed;
extern cvar_t sv_maxspeed;
extern cvar_t sv_accelerate;
extern cvar_t sv_idealpitchscale;
extern cvar_t sv_aim;
extern cvar_t sv_altnoclip; //johnfitz
sv.edicts = NULL; // ericw -- sv.edicts switched to use malloc()
Cvar_RegisterVariable(&sv_maxvelocity);
Cvar_RegisterVariable(&sv_gravity);
Cvar_RegisterVariable(&sv_friction);
Cvar_SetCallback(&sv_gravity, Host_Callback_Notify);
Cvar_SetCallback(&sv_friction, Host_Callback_Notify);
Cvar_RegisterVariable(&sv_edgefriction);
Cvar_RegisterVariable(&sv_stopspeed);
Cvar_RegisterVariable(&sv_maxspeed);
Cvar_SetCallback(&sv_maxspeed, Host_Callback_Notify);
Cvar_RegisterVariable(&sv_accelerate);
Cvar_RegisterVariable(&sv_idealpitchscale);
Cvar_RegisterVariable(&sv_aim);
Cvar_RegisterVariable(&sv_nostep);
Cvar_RegisterVariable(&sv_freezenonclients);
Cvar_RegisterVariable(&sv_altnoclip); //johnfitz
Cmd_AddCommand("sv_protocol", &SV_Protocol_f); //johnfitz
for(i = 0 ; i < MAX_MODELS ; i++)
sprintf(localmodels[i], "*%" PRIi32, i);
i = COM_CheckParm("-protocol");
if(i && i < com_argc - 1)
sv_protocol = atoi(com_argv[i + 1]);
switch(sv_protocol)
{
case PROTOCOL_NETQUAKE:
p = "NetQuake";
break;
case PROTOCOL_FITZQUAKE:
p = "FitzQuake";
break;
case PROTOCOL_RMQ:
p = "RMQ";
break;
default:
Sys_Error("Bad protocol version request %" PRIi32 ". Accepted values: %" PRIi32 ", %" PRIi32 ", %" PRIi32 ".",
sv_protocol, PROTOCOL_NETQUAKE, PROTOCOL_FITZQUAKE, PROTOCOL_RMQ);
return; /* silence compiler */
}
Sys_Printf("Server using protocol %" PRIi32 " (%s)\n", sv_protocol, p);
}
/*
=============================================================================
EVENT MESSAGES
=============================================================================
*/
/*
==================
SV_StartParticle
Make sure the event gets sent to all clients
==================
*/
void SV_StartParticle(vec3_t org, vec3_t dir, int32_t color, int32_t count)
{
int32_t i, v;
if(sv.datagram.cursize > MAX_DATAGRAM - 16)
return;
MSG_WriteByte(&sv.datagram, svc_particle);
MSG_WriteCoord(&sv.datagram, org[0], sv.protocolflags);
MSG_WriteCoord(&sv.datagram, org[1], sv.protocolflags);
MSG_WriteCoord(&sv.datagram, org[2], sv.protocolflags);
for(i = 0 ; i < 3 ; i++)
{
v = dir[i] * 16;
if(v > 127)
v = 127;
else if(v < -128)
v = -128;
MSG_WriteChar(&sv.datagram, v);
}
MSG_WriteByte(&sv.datagram, count);
MSG_WriteByte(&sv.datagram, color);
}
/*
==================
SV_StartSound
Each entity can have eight independant sound sources, like voice,
weapon, feet, etc.
Channel 0 is an auto-allocate channel, the others override anything
allready running on that entity/channel pair.
An attenuation of 0 will play full volume everywhere in the level.
Larger attenuations will drop off. (max 4 attenuation)
==================
*/
void SV_StartSound(edict_t *entity, int32_t channel, const char *sample, int32_t volume, float attenuation)
{
int32_t sound_num, ent;
int32_t i, field_mask;
if(volume < 0 || volume > 255)
Host_Error("SV_StartSound: volume = %" PRIi32, volume);
if(attenuation < 0 || attenuation > 4)
Host_Error("SV_StartSound: attenuation = %f", attenuation);
if(channel < 0 || channel > 7)
Host_Error("SV_StartSound: channel = %" PRIi32, channel);
if(sv.datagram.cursize > MAX_DATAGRAM - 16)
return;
// find precache number for sound
for(sound_num = 1; sound_num < MAX_SOUNDS && sv.sound_precache[sound_num]; sound_num++)
{
if(!strcmp(sample, sv.sound_precache[sound_num]))
break;
}
if(sound_num == MAX_SOUNDS || !sv.sound_precache[sound_num])
{
Con_Printf("SV_StartSound: %s not precacheed\n", sample);
return;
}
ent = NumForEdict(entity);
field_mask = 0;
if(volume != DEFAULT_SOUND_PACKET_VOLUME)
field_mask |= SND_VOLUME;
if(attenuation != DEFAULT_SOUND_PACKET_ATTENUATION)
field_mask |= SND_ATTENUATION;
//johnfitz -- PROTOCOL_FITZQUAKE
if(ent >= 8192)
{
if(sv.protocol == PROTOCOL_NETQUAKE)
return; //don't send any info protocol can't support
else
field_mask |= SND_LARGEENTITY;
}
if(sound_num >= 256 || channel >= 8)
{
if(sv.protocol == PROTOCOL_NETQUAKE)
return; //don't send any info protocol can't support
else
field_mask |= SND_LARGESOUND;
}
//johnfitz
// directed messages go only to the entity the are targeted on
MSG_WriteByte(&sv.datagram, svc_sound);
MSG_WriteByte(&sv.datagram, field_mask);
if(field_mask & SND_VOLUME)
MSG_WriteByte(&sv.datagram, volume);
if(field_mask & SND_ATTENUATION)
MSG_WriteByte(&sv.datagram, attenuation * 64);
//johnfitz -- PROTOCOL_FITZQUAKE
if(field_mask & SND_LARGEENTITY)
{
MSG_WriteShort(&sv.datagram, ent);
MSG_WriteByte(&sv.datagram, channel);
}
else
MSG_WriteShort(&sv.datagram, (ent << 3) | channel);
if(field_mask & SND_LARGESOUND)
MSG_WriteShort(&sv.datagram, sound_num);
else
MSG_WriteByte(&sv.datagram, sound_num);
//johnfitz
for(i = 0; i < 3; i++)
MSG_WriteCoord(&sv.datagram, ED_Vector(entity, ED_origin)[i] + 0.5 * (ED_Vector(entity, ED_mins)[i] + ED_Vector(entity, ED_maxs)[i]), sv.protocolflags);
}
/*
==============================================================================
CLIENT SPAWNING
==============================================================================
*/
/*
================
SV_SendServerinfo
Sends the first message from the server to a connected client.
This will be sent on the initial connection and upon each server load.
================
*/
void SV_SendServerinfo(client_t *client)
{
const char **s;
char message[2048];
int32_t i; //johnfitz
MSG_WriteByte(&client->message, svc_print);
sprintf(message, "\x02\nFITZQUAKE 0.85 SERVER (%" PRIi32 " CRC)\n", pr_crc);
MSG_WriteString(&client->message, message);
MSG_WriteByte(&client->message, svc_serverinfo);
MSG_WriteLong(&client->message, sv.protocol); //johnfitz -- sv.protocol instead of PROTOCOL_VERSION
if(sv.protocol == PROTOCOL_RMQ)
{
// mh - now send protocol flags so that the client knows the protocol features to expect
MSG_WriteLong(&client->message, sv.protocolflags);
}
MSG_WriteByte(&client->message, svs.maxclients);
if(!coop.value && deathmatch.value)
MSG_WriteByte(&client->message, GAME_DEATHMATCH);
else
MSG_WriteByte(&client->message, GAME_COOP);
MSG_WriteString(&client->message, ED_String(sv.edicts, ED_message));
//johnfitz -- only send the first 256 model and sound precaches if protocol is 15
for(i = 0, s = sv.model_precache + 1 ; *s; s++, i++)
if(sv.protocol != PROTOCOL_NETQUAKE || i < 256)
MSG_WriteString(&client->message, *s);
MSG_WriteByte(&client->message, 0);
for(i = 0, s = sv.sound_precache + 1 ; *s ; s++, i++)
if(sv.protocol != PROTOCOL_NETQUAKE || i < 256)
MSG_WriteString(&client->message, *s);
MSG_WriteByte(&client->message, 0);
//johnfitz
// send music
MSG_WriteByte(&client->message, svc_cdtrack);
MSG_WriteByte(&client->message, ED_Float(sv.edicts, ED_sounds));
MSG_WriteByte(&client->message, ED_Float(sv.edicts, ED_sounds));
// set view
MSG_WriteByte(&client->message, svc_setview);
MSG_WriteShort(&client->message, NumForEdict(client->edict));
MSG_WriteByte(&client->message, svc_signonnum);
MSG_WriteByte(&client->message, 1);
client->sendsignon = true;
client->spawned = false; // need prespawn, spawn, etc
}
/*
================
SV_ConnectClient
Initializes a client_t for a new net connection. This will only be called
once for a player each game, not once for each level change.
================
*/
void SV_ConnectClient(int32_t clientnum)
{
edict_t *ent;
client_t *client;
int32_t edictnum;
struct qsocket_s *netconnection;
int32_t i;
float spawn_parms[NUM_SPAWN_PARMS];
client = svs.clients + clientnum;
Con_DPrintf("Client %s connected\n", NET_QSocketGetAddressString(client->netconnection));
edictnum = clientnum + 1;
ent = EdictNum(edictnum);
// set up the client_t
netconnection = client->netconnection;
if(sv.loadgame)
memcpy(spawn_parms, client->spawn_parms, sizeof(spawn_parms));
memset(client, 0, sizeof(*client));
client->netconnection = netconnection;
strcpy(client->name, "unconnected");
client->active = true;
client->spawned = false;
client->edict = ent;
client->message.data = client->msgbuf;
client->message.maxsize = sizeof(client->msgbuf);
client->message.allowoverflow = true; // we can catch it
if(sv.loadgame)
memcpy(client->spawn_parms, spawn_parms, sizeof(spawn_parms));
else
{
// call the progs to get default spawn parms for the new client
PR_ExecuteProgram(G_Func(GBL_SetNewParms));
for(i = 0 ; i < NUM_SPAWN_PARMS ; i++)
client->spawn_parms[i] = (&G_Float(GBL_parm1))[i];
}
SV_SendServerinfo(client);
}
/*
===================
SV_CheckForNewClients
===================
*/
void SV_CheckForNewClients(void)
{
struct qsocket_s *ret;
int32_t i;
//
// check for new connections
//
while(1)
{
ret = NET_CheckNewConnections();
if(!ret)
break;
//
// init a new client structure
//
for(i = 0 ; i < svs.maxclients ; i++)
if(!svs.clients[i].active)
break;
if(i == svs.maxclients)
Sys_Error("Host_CheckForNewClients: no free clients");
svs.clients[i].netconnection = ret;
SV_ConnectClient(i);
net_activeconnections++;
}
}
/*
===============================================================================
FRAME UPDATES
===============================================================================
*/
/*
==================
SV_ClearDatagram
==================
*/
void SV_ClearDatagram(void)
{
SZ_Clear(&sv.datagram);
}
/*
=============================================================================
The PVS must include a small area around the client to allow head bobbing
or other small motion on the client side. Otherwise, a bob might cause an
entity that should be visible to not show up, especially when the bob
crosses a waterline.
=============================================================================
*/
static int32_t fatbytes;
static byte *fatpvs;
static int32_t fatpvs_capacity;
void SV_AddToFatPVS(vec3_t org, mnode_t *node, qmodel_t *worldmodel) //johnfitz -- added worldmodel as a parameter
{
int32_t i;
byte *pvs;
mplane_t *plane;
float d;
while(1)
{
// if this is a leaf, accumulate the pvs bits
if(node->contents < 0)
{
if(node->contents != CONTENTS_SOLID)
{
pvs = Mod_LeafPVS((mleaf_t *)node, worldmodel); //johnfitz -- worldmodel as a parameter
for(i = 0 ; i < fatbytes ; i++)
fatpvs[i] |= pvs[i];
}
return;
}
plane = node->plane;
d = DotProduct(org, plane->normal) - plane->dist;
if(d > 8)
node = node->children[0];
else if(d < -8)
node = node->children[1];
else
{
// go down both
SV_AddToFatPVS(org, node->children[0], worldmodel); //johnfitz -- worldmodel as a parameter
node = node->children[1];
}
}
}
/*
=============
SV_FatPVS
Calculates a PVS that is the inclusive or of all leafs within 8 pixels of the
given point.
=============
*/
byte *SV_FatPVS(vec3_t org, qmodel_t *worldmodel) //johnfitz -- added worldmodel as a parameter
{
fatbytes = (worldmodel->numleafs + 7) >> 3; // ericw -- was +31, assumed to be a bug/typo
if(fatpvs == NULL || fatbytes > fatpvs_capacity)
{
fatpvs_capacity = fatbytes;
fatpvs = (byte *) realloc(fatpvs, fatpvs_capacity);
if(!fatpvs)
Sys_Error("SV_FatPVS: realloc() failed on %" PRIi32 " bytes", fatpvs_capacity);
}
memset(fatpvs, 0, fatbytes);
SV_AddToFatPVS(org, worldmodel->nodes, worldmodel); //johnfitz -- worldmodel as a parameter
return fatpvs;
}
/*
=============
SV_VisibleToClient -- johnfitz
PVS test encapsulated in a nice function
=============
*/
bool SV_VisibleToClient(edict_t *client, edict_t *test, qmodel_t *worldmodel)
{
byte *pvs;
vec3_t org;
int32_t i;
VectorAdd(ED_Vector(client, ED_origin), ED_Vector(client, ED_view_ofs), org);
pvs = SV_FatPVS(org, worldmodel);
for(i = 0 ; i < test->num_leafs ; i++)
if(pvs[test->leafnums[i] >> 3] & (1 << (test->leafnums[i] & 7)))
return true;
return false;
}
//=============================================================================
/*
=============
SV_WriteEntitiesToClient
=============
*/
void SV_WriteEntitiesToClient(edict_t *clent, sizebuf_t *msg)
{
int32_t e, i;
int32_t bits;
byte *pvs;
vec3_t org;
float miss;
edict_t *ent;
// find the client's PVS
VectorAdd(ED_Vector(clent, ED_origin), ED_Vector(clent, ED_view_ofs), org);
pvs = SV_FatPVS(org, sv.worldmodel);
// send over all entities (excpet the client) that touch the pvs
ent = NextEdict(sv.edicts);
for(e = 1 ; e < sv.num_edicts ; e++, ent = NextEdict(ent))
{
if(ent != clent) // clent is ALLWAYS sent
{
// ignore ents without visible models
if(!ED_Float(ent, ED_modelindex) || !ED_String(ent, ED_model)[0])
continue;
//johnfitz -- don't send model>255 entities if protocol is 15
if(sv.protocol == PROTOCOL_NETQUAKE && (int32_t)ED_Float(ent, ED_modelindex) & 0xFF00)
continue;
// ignore if not touching a PV leaf
for(i = 0 ; i < ent->num_leafs ; i++)
if(pvs[ent->leafnums[i] >> 3] & (1 << (ent->leafnums[i] & 7)))
break;
// ericw -- added ent->num_leafs < MAX_ENT_LEAFS condition.
//
// if ent->num_leafs == MAX_ENT_LEAFS, the ent is visible from too many leafs
// for us to say whether it's in the PVS, so don't try to vis cull it.
// this commonly happens with rotators, because they often have huge bboxes
// spanning the entire map, or really tall lifts, etc.
if(i == ent->num_leafs && ent->num_leafs < MAX_ENT_LEAFS)
continue; // not visible
}
//johnfitz -- max size for protocol 15 is 18 bytes, not 16 as originally
//assumed here. And, for protocol 85 the max size is actually 24 bytes.
if(msg->cursize + 24 > msg->maxsize)
{
//johnfitz -- less spammy overflow message
if(!dev_overflows.packetsize || dev_overflows.packetsize + CONSOLE_RESPAM_TIME < realtime)
{
Con_Printf("Packet overflow!\n");
dev_overflows.packetsize = realtime;
}
goto stats;
//johnfitz
}
// send an update
bits = 0;
for(i = 0 ; i < 3 ; i++)
{
miss = ED_Vector(ent, ED_origin)[i] - ent->baseline.origin[i];
if(miss < -0.1 || miss > 0.1)
bits |= U_ORIGIN1 << i;
}
if(ED_Vector(ent, ED_angles)[0] != ent->baseline.angles[0])
bits |= U_ANGLE1;
if(ED_Vector(ent, ED_angles)[1] != ent->baseline.angles[1])
bits |= U_ANGLE2;
if(ED_Vector(ent, ED_angles)[2] != ent->baseline.angles[2])
bits |= U_ANGLE3;
if(ED_Float(ent, ED_movetype) == MOVETYPE_STEP)
bits |= U_STEP; // don't mess up the step animation
if(ent->baseline.colormap != ED_Float(ent, ED_colormap))
bits |= U_COLORMAP;
if(ent->baseline.skin != ED_Float(ent, ED_skin))
bits |= U_SKIN;
if(ent->baseline.frame != ED_Float(ent, ED_frame))
bits |= U_FRAME;
if(ent->baseline.effects != ED_Float(ent, ED_effects))
bits |= U_EFFECTS;
if(ent->baseline.modelindex != ED_Float(ent, ED_modelindex))
bits |= U_MODEL;
//johnfitz -- alpha
if(pr_alpha_supported)
{
// TODO: find a cleaner place to put this code
eval_t *val;
val = GetEdictFieldValue(ent, "alpha");
if(val)
ent->alpha = ENTALPHA_ENCODE(val->flt);
}
//don't send invisible entities unless they have effects
if(ent->alpha == ENTALPHA_ZERO && !ED_Float(ent, ED_effects))
continue;
//johnfitz
//johnfitz -- PROTOCOL_FITZQUAKE
if(sv.protocol != PROTOCOL_NETQUAKE)
{
if(ent->baseline.alpha != ent->alpha) bits |= U_ALPHA;
if(bits & U_FRAME && (int32_t)ED_Float(ent, ED_frame) & 0xFF00) bits |= U_FRAME2;
if(bits & U_MODEL && (int32_t)ED_Float(ent, ED_modelindex) & 0xFF00) bits |= U_MODEL2;
if(ent->sendinterval) bits |= U_LERPFINISH;
if(bits >= 65536) bits |= U_EXTEND1;
if(bits >= 16777216) bits |= U_EXTEND2;
}
//johnfitz
if(e >= 256)
bits |= U_LONGENTITY;
if(bits >= 256)
bits |= U_MOREBITS;
//
// write the message
//
MSG_WriteByte(msg, bits | U_SIGNAL);
if(bits & U_MOREBITS)
MSG_WriteByte(msg, bits >> 8);
//johnfitz -- PROTOCOL_FITZQUAKE
if(bits & U_EXTEND1)
MSG_WriteByte(msg, bits >> 16);
if(bits & U_EXTEND2)
MSG_WriteByte(msg, bits >> 24);
//johnfitz
if(bits & U_LONGENTITY)
MSG_WriteShort(msg, e);
else
MSG_WriteByte(msg, e);
if(bits & U_MODEL)
MSG_WriteByte(msg, ED_Float(ent, ED_modelindex));
if(bits & U_FRAME)
MSG_WriteByte(msg, ED_Float(ent, ED_frame));
if(bits & U_COLORMAP)
MSG_WriteByte(msg, ED_Float(ent, ED_colormap));
if(bits & U_SKIN)
MSG_WriteByte(msg, ED_Float(ent, ED_skin));
if(bits & U_EFFECTS)
MSG_WriteByte(msg, ED_Float(ent, ED_effects));
if(bits & U_ORIGIN1)
MSG_WriteCoord(msg, ED_Vector(ent, ED_origin)[0], sv.protocolflags);
if(bits & U_ANGLE1)
MSG_WriteAngle(msg, ED_Vector(ent, ED_angles)[0], sv.protocolflags);
if(bits & U_ORIGIN2)
MSG_WriteCoord(msg, ED_Vector(ent, ED_origin)[1], sv.protocolflags);
if(bits & U_ANGLE2)
MSG_WriteAngle(msg, ED_Vector(ent, ED_angles)[1], sv.protocolflags);
if(bits & U_ORIGIN3)
MSG_WriteCoord(msg, ED_Vector(ent, ED_origin)[2], sv.protocolflags);
if(bits & U_ANGLE3)
MSG_WriteAngle(msg, ED_Vector(ent, ED_angles)[2], sv.protocolflags);
//johnfitz -- PROTOCOL_FITZQUAKE
if(bits & U_ALPHA)
MSG_WriteByte(msg, ent->alpha);
if(bits & U_FRAME2)
MSG_WriteByte(msg, (int32_t)ED_Float(ent, ED_frame) >> 8);
if(bits & U_MODEL2)
MSG_WriteByte(msg, (int32_t)ED_Float(ent, ED_modelindex) >> 8);
if(bits & U_LERPFINISH)
MSG_WriteByte(msg, (byte)(Q_rint((ED_Float(ent, ED_nextthink) - sv.time) * 255)));
//johnfitz
}
//johnfitz -- devstats
stats:
if(msg->cursize > 1024 && dev_peakstats.packetsize <= 1024)
Con_DWarning("%" PRIi32 " byte packet exceeds standard limit of 1024 (max = %" PRIi32 ").\n", msg->cursize, msg->maxsize);
dev_stats.packetsize = msg->cursize;
dev_peakstats.packetsize = q_max(msg->cursize, dev_peakstats.packetsize);
//johnfitz
}
/*
=============
SV_CleanupEnts
=============
*/
void SV_CleanupEnts(void)
{
int32_t e;
edict_t *ent;
ent = NextEdict(sv.edicts);
for(e = 1 ; e < sv.num_edicts ; e++, ent = NextEdict(ent))
{
ED_Float(ent, ED_effects) = (int32_t)ED_Float(ent, ED_effects) & ~EF_MUZZLEFLASH;
}
}
/*
==================
SV_WriteClientdataToMessage
==================
*/
void SV_WriteClientdataToMessage(edict_t *ent, sizebuf_t *msg)
{
int32_t bits;
int32_t i;
edict_t *other;
int32_t items;
eval_t *val;
//
// send a damage message
//
if(ED_Float(ent, ED_dmg_take) || ED_Float(ent, ED_dmg_save))
{
other = ProgEdict(ED_PEdict(ent, ED_dmg_inflictor));
MSG_WriteByte(msg, svc_damage);
MSG_WriteByte(msg, ED_Float(ent, ED_dmg_save));
MSG_WriteByte(msg, ED_Float(ent, ED_dmg_take));
for(i = 0 ; i < 3 ; i++)
MSG_WriteCoord(msg, ED_Vector(other, ED_origin)[i] + 0.5 * (ED_Vector(other, ED_mins)[i] + ED_Vector(other, ED_maxs)[i]), sv.protocolflags);
ED_Float(ent, ED_dmg_take) = 0;
ED_Float(ent, ED_dmg_save) = 0;
}
//
// send the current viewpos offset from the view entity
//
SV_SetIdealPitch(); // how much to look up / down ideally
// a fixangle might get lost in a dropped packet. Oh well.
if(ED_Float(ent, ED_fixangle))
{
MSG_WriteByte(msg, svc_setangle);
for(i = 0 ; i < 3 ; i++)
MSG_WriteAngle(msg, ED_Vector(ent, ED_angles)[i], sv.protocolflags);
ED_Float(ent, ED_fixangle) = 0;
}
bits = 0;
if(ED_Vector(ent, ED_view_ofs)[2] != DEFAULT_VIEWHEIGHT)
bits |= SU_VIEWHEIGHT;
if(ED_Float(ent, ED_idealpitch))
bits |= SU_IDEALPITCH;
// stuff the sigil bits into the high bits of items for sbar, or else
// mix in items2
val = GetEdictFieldValue(ent, "items2");
if(val)
items = (int32_t)ED_Float(ent, ED_items) | ((int32_t)val->flt << 23);
else
items = (int32_t)ED_Float(ent, ED_items) | ((int32_t)G_Float(GBL_serverflags) << 28);
bits |= SU_ITEMS;
if((int32_t)ED_Float(ent, ED_flags) & FL_ONGROUND)
bits |= SU_ONGROUND;
if(ED_Float(ent, ED_waterlevel) >= 2)
bits |= SU_INWATER;
for(i = 0 ; i < 3 ; i++)
{
if(ED_Vector(ent, ED_punchangle)[i])
bits |= (SU_PUNCH1 << i);
if(ED_Vector(ent, ED_velocity)[i])
bits |= (SU_VELOCITY1 << i);
}
if(ED_Float(ent, ED_weaponframe))
bits |= SU_WEAPONFRAME;
if(ED_Float(ent, ED_armorvalue))
bits |= SU_ARMOR;
// if (ED_Float(ent, ED_weapon))
bits |= SU_WEAPON;
//johnfitz -- PROTOCOL_FITZQUAKE
if(sv.protocol != PROTOCOL_NETQUAKE)
{
if(bits & SU_WEAPON && SV_ModelIndex(ED_String(ent, ED_weaponmodel)) & 0xFF00) bits |= SU_WEAPON2;
if((int32_t)ED_Float(ent, ED_armorvalue) & 0xFF00) bits |= SU_ARMOR2;
if((int32_t)ED_Float(ent, ED_currentammo) & 0xFF00) bits |= SU_AMMO2;
if((int32_t)ED_Float(ent, ED_ammo_shells) & 0xFF00) bits |= SU_SHELLS2;
if((int32_t)ED_Float(ent, ED_ammo_nails) & 0xFF00) bits |= SU_NAILS2;
if((int32_t)ED_Float(ent, ED_ammo_rockets) & 0xFF00) bits |= SU_ROCKETS2;
if((int32_t)ED_Float(ent, ED_ammo_cells) & 0xFF00) bits |= SU_CELLS2;
if(bits & SU_WEAPONFRAME && (int32_t)ED_Float(ent, ED_weaponframe) & 0xFF00) bits |= SU_WEAPONFRAME2;
if(bits & SU_WEAPON && ent->alpha != ENTALPHA_DEFAULT) bits |= SU_WEAPONALPHA; //for now, weaponalpha = client entity alpha
if(bits >= 65536) bits |= SU_EXTEND1;
if(bits >= 16777216) bits |= SU_EXTEND2;
}
//johnfitz
// send the data
MSG_WriteByte(msg, svc_clientdata);
MSG_WriteShort(msg, bits);
//johnfitz -- PROTOCOL_FITZQUAKE
if(bits & SU_EXTEND1) MSG_WriteByte(msg, bits >> 16);
if(bits & SU_EXTEND2) MSG_WriteByte(msg, bits >> 24);
//johnfitz
if(bits & SU_VIEWHEIGHT)
MSG_WriteChar(msg, ED_Vector(ent, ED_view_ofs)[2]);
if(bits & SU_IDEALPITCH)
MSG_WriteChar(msg, ED_Float(ent, ED_idealpitch));
for(i = 0 ; i < 3 ; i++)
{
if(bits & (SU_PUNCH1 << i))
MSG_WriteChar(msg, ED_Vector(ent, ED_punchangle)[i]);
if(bits & (SU_VELOCITY1 << i))
MSG_WriteChar(msg, ED_Vector(ent, ED_velocity)[i] / 16);
}
// [always sent] if (bits & SU_ITEMS)
MSG_WriteLong(msg, items);
if(bits & SU_WEAPONFRAME)
MSG_WriteByte(msg, ED_Float(ent, ED_weaponframe));
if(bits & SU_ARMOR)
MSG_WriteByte(msg, ED_Float(ent, ED_armorvalue));
if(bits & SU_WEAPON)
MSG_WriteByte(msg, SV_ModelIndex(ED_String(ent, ED_weaponmodel)));
MSG_WriteShort(msg, ED_Float(ent, ED_health));
MSG_WriteByte(msg, ED_Float(ent, ED_currentammo));
MSG_WriteByte(msg, ED_Float(ent, ED_ammo_shells));
MSG_WriteByte(msg, ED_Float(ent, ED_ammo_nails));
MSG_WriteByte(msg, ED_Float(ent, ED_ammo_rockets));
MSG_WriteByte(msg, ED_Float(ent, ED_ammo_cells));
if(standard_quake)
{
MSG_WriteByte(msg, ED_Float(ent, ED_weapon));
}
else
{
for(i = 0; i < 32; i++)
{
if(((int32_t)ED_Float(ent, ED_weapon)) & (1 << i))
{
MSG_WriteByte(msg, i);
break;
}
}
}
//johnfitz -- PROTOCOL_FITZQUAKE
if(bits & SU_WEAPON2)
MSG_WriteByte(msg, SV_ModelIndex(ED_String(ent, ED_weaponmodel)) >> 8);
if(bits & SU_ARMOR2)
MSG_WriteByte(msg, (int32_t)ED_Float(ent, ED_armorvalue) >> 8);
if(bits & SU_AMMO2)
MSG_WriteByte(msg, (int32_t)ED_Float(ent, ED_currentammo) >> 8);
if(bits & SU_SHELLS2)
MSG_WriteByte(msg, (int32_t)ED_Float(ent, ED_ammo_shells) >> 8);
if(bits & SU_NAILS2)
MSG_WriteByte(msg, (int32_t)ED_Float(ent, ED_ammo_nails) >> 8);
if(bits & SU_ROCKETS2)
MSG_WriteByte(msg, (int32_t)ED_Float(ent, ED_ammo_rockets) >> 8);
if(bits & SU_CELLS2)
MSG_WriteByte(msg, (int32_t)ED_Float(ent, ED_ammo_cells) >> 8);
if(bits & SU_WEAPONFRAME2)
MSG_WriteByte(msg, (int32_t)ED_Float(ent, ED_weaponframe) >> 8);
if(bits & SU_WEAPONALPHA)
MSG_WriteByte(msg, ent->alpha); //for now, weaponalpha = client entity alpha
//johnfitz
}
/*
=======================
SV_SendClientDatagram
=======================
*/
bool SV_SendClientDatagram(client_t *client)
{
byte buf[MAX_DATAGRAM];
sizebuf_t msg;
msg.data = buf;
msg.maxsize = sizeof(buf);
msg.cursize = 0;
//johnfitz -- if client is nonlocal, use smaller max size so packets aren't fragmented
if(strcmp(NET_QSocketGetAddressString(client->netconnection), "LOCAL") != 0)
msg.maxsize = DATAGRAM_MTU;
//johnfitz
MSG_WriteByte(&msg, svc_time);
MSG_WriteFloat(&msg, sv.time);
// add the client specific data to the datagram
SV_WriteClientdataToMessage(client->edict, &msg);
SV_WriteEntitiesToClient(client->edict, &msg);
// copy the server datagram if there is space
if(msg.cursize + sv.datagram.cursize < msg.maxsize)
SZ_Write(&msg, sv.datagram.data, sv.datagram.cursize);
// send the datagram
if(NET_SendUnreliableMessage(client->netconnection, &msg) == -1)
{
SV_DropClient(true); // if the message couldn't send, kick off
return false;
}
return true;
}
/*
=======================
SV_UpdateToReliableMessages
=======================
*/
void SV_UpdateToReliableMessages(void)
{
int32_t i, j;
client_t *client;
// check for changes to be sent over the reliable streams
for(i = 0, host_client = svs.clients ; i < svs.maxclients ; i++, host_client++)
{
if(host_client->old_frags != ED_Float(host_client->edict, ED_frags))
{
for(j = 0, client = svs.clients ; j < svs.maxclients ; j++, client++)
{
if(!client->active)
continue;
MSG_WriteByte(&client->message, svc_updatefrags);
MSG_WriteByte(&client->message, i);
MSG_WriteShort(&client->message, ED_Float(host_client->edict, ED_frags));
}
host_client->old_frags = ED_Float(host_client->edict, ED_frags);
}
}
for(j = 0, client = svs.clients ; j < svs.maxclients ; j++, client++)
{
if(!client->active)
continue;
SZ_Write(&client->message, sv.reliable_datagram.data, sv.reliable_datagram.cursize);
}
SZ_Clear(&sv.reliable_datagram);
}
/*
=======================
SV_SendNop
Send a nop message without trashing or sending the accumulated client
message buffer
=======================
*/
void SV_SendNop(client_t *client)
{
sizebuf_t msg;
byte buf[4];
msg.data = buf;
msg.maxsize = sizeof(buf);
msg.cursize = 0;
MSG_WriteChar(&msg, svc_nop);
if(NET_SendUnreliableMessage(client->netconnection, &msg) == -1)
SV_DropClient(true); // if the message couldn't send, kick off
client->last_message = realtime;
}
/*
=======================
SV_SendClientMessages
=======================
*/
void SV_SendClientMessages(void)
{
int32_t i;
// update frags, names, etc
SV_UpdateToReliableMessages();
// build individual updates
for(i = 0, host_client = svs.clients ; i < svs.maxclients ; i++, host_client++)
{
if(!host_client->active)
continue;
if(host_client->spawned)
{
if(!SV_SendClientDatagram(host_client))
continue;
}
else
{
// the player isn't totally in the game yet
// send small keepalive messages if too much time has passed
// send a full message when the next signon stage has been requested
// some other message data (name changes, etc) may accumulate
// between signon stages
if(!host_client->sendsignon)
{
if(realtime - host_client->last_message > 5)
SV_SendNop(host_client);
continue; // don't send out non-signon messages
}
}
// check for an overflowed message. Should only happen
// on a very fucked up connection that backs up a lot, then
// changes level
if(host_client->message.overflowed)
{
SV_DropClient(true);
host_client->message.overflowed = false;
continue;
}
if(host_client->message.cursize || host_client->dropasap)
{
if(!NET_CanSendMessage(host_client->netconnection))
{
// I_Printf ("can't write\n");
continue;
}
if(host_client->dropasap)
SV_DropClient(false); // went to another level
else
{
if(NET_SendMessage(host_client->netconnection
, &host_client->message) == -1)
SV_DropClient(true); // if the message couldn't send, kick off
SZ_Clear(&host_client->message);
host_client->last_message = realtime;
host_client->sendsignon = false;
}
}
}
// clear muzzle flashes
SV_CleanupEnts();
}
/*
==============================================================================
SERVER SPAWNING
==============================================================================
*/
/*
================
SV_ModelIndex
================
*/
int32_t SV_ModelIndex(const char *name)
{
int32_t i;
if(!name || !name[0])
return 0;
for(i = 0 ; i < MAX_MODELS && sv.model_precache[i] ; i++)
if(!strcmp(sv.model_precache[i], name))
return i;
if(i == MAX_MODELS || !sv.model_precache[i])
Sys_Error("SV_ModelIndex: model %s not precached", name);
return i;
}
/*
================
SV_CreateBaseline
================
*/
void SV_CreateBaseline(void)
{
int32_t i;
edict_t *svent;
int32_t entnum;
int32_t bits; //johnfitz -- PROTOCOL_FITZQUAKE
for(entnum = 0; entnum < sv.num_edicts ; entnum++)
{
// get the current server version
svent = EdictNum(entnum);
if(svent->free)
continue;
if(entnum > svs.maxclients && !ED_Float(svent, ED_modelindex))
continue;
//
// create entity baseline
//
VectorCopy(ED_Vector(svent, ED_origin), svent->baseline.origin);
VectorCopy(ED_Vector(svent, ED_angles), svent->baseline.angles);
svent->baseline.frame = ED_Float(svent, ED_frame);
svent->baseline.skin = ED_Float(svent, ED_skin);
if(entnum > 0 && entnum <= svs.maxclients)
{
svent->baseline.colormap = entnum;
svent->baseline.modelindex = SV_ModelIndex("progs/player.mdl");
svent->baseline.alpha = ENTALPHA_DEFAULT; //johnfitz -- alpha support
}
else
{
svent->baseline.colormap = 0;
svent->baseline.modelindex = SV_ModelIndex(ED_String(svent, ED_model));
svent->baseline.alpha = svent->alpha; //johnfitz -- alpha support
}
//johnfitz -- PROTOCOL_FITZQUAKE
bits = 0;
if(sv.protocol == PROTOCOL_NETQUAKE) //still want to send baseline in PROTOCOL_NETQUAKE, so reset these values
{
if(svent->baseline.modelindex & 0xFF00)
svent->baseline.modelindex = 0;
if(svent->baseline.frame & 0xFF00)
svent->baseline.frame = 0;
svent->baseline.alpha = ENTALPHA_DEFAULT;
}
else //decide which extra data needs to be sent
{
if(svent->baseline.modelindex & 0xFF00)
bits |= B_LARGEMODEL;
if(svent->baseline.frame & 0xFF00)
bits |= B_LARGEFRAME;
if(svent->baseline.alpha != ENTALPHA_DEFAULT)
bits |= B_ALPHA;
}
//johnfitz
//
// add to the message
//
//johnfitz -- PROTOCOL_FITZQUAKE
if(bits)
MSG_WriteByte(&sv.signon, svc_spawnbaseline2);
else
MSG_WriteByte(&sv.signon, svc_spawnbaseline);
//johnfitz
MSG_WriteShort(&sv.signon, entnum);
//johnfitz -- PROTOCOL_FITZQUAKE
if(bits)
MSG_WriteByte(&sv.signon, bits);
if(bits & B_LARGEMODEL)
MSG_WriteShort(&sv.signon, svent->baseline.modelindex);
else
MSG_WriteByte(&sv.signon, svent->baseline.modelindex);
if(bits & B_LARGEFRAME)
MSG_WriteShort(&sv.signon, svent->baseline.frame);
else
MSG_WriteByte(&sv.signon, svent->baseline.frame);
//johnfitz
MSG_WriteByte(&sv.signon, svent->baseline.colormap);
MSG_WriteByte(&sv.signon, svent->baseline.skin);
for(i = 0 ; i < 3 ; i++)
{
MSG_WriteCoord(&sv.signon, svent->baseline.origin[i], sv.protocolflags);
MSG_WriteAngle(&sv.signon, svent->baseline.angles[i], sv.protocolflags);
}
//johnfitz -- PROTOCOL_FITZQUAKE
if(bits & B_ALPHA)
MSG_WriteByte(&sv.signon, svent->baseline.alpha);
//johnfitz
}
}
/*
================
SV_SendReconnect
Tell all the clients that the server is changing levels
================
*/
void SV_SendReconnect(void)
{
byte data[128];
sizebuf_t msg;
msg.data = data;
msg.cursize = 0;
msg.maxsize = sizeof(data);
MSG_WriteChar(&msg, svc_stufftext);
MSG_WriteString(&msg, "reconnect\n");
NET_SendToAll(&msg, 5.0);
if(!isDedicated)
Cmd_ExecuteString("reconnect\n", src_command);
}
/*
================
SV_SaveSpawnparms
Grabs the current state of each client for saving across the
transition to another level
================
*/
void SV_SaveSpawnparms(void)
{
int32_t i, j;
svs.serverflags = G_Float(GBL_serverflags);
for(i = 0, host_client = svs.clients ; i < svs.maxclients ; i++, host_client++)
{
if(!host_client->active)
continue;
// call the progs to get default spawn parms for the new client
G_PEdict(GBL_self) = EdictProg(host_client->edict);
PR_ExecuteProgram(G_Func(GBL_SetChangeParms));
for(j = 0 ; j < NUM_SPAWN_PARMS ; j++)
host_client->spawn_parms[j] = (&G_Float(GBL_parm1))[j];
}
}
/*
================
SV_SpawnServer
This is called at the start of each level
================
*/
extern float scr_centertime_off;
void SV_SpawnServer(const char *server)
{
static char dummy[8] = { 0, 0, 0, 0, 0, 0, 0, 0 };
edict_t *ent;
int32_t i;
// let's not have any servers with no name
if(hostname.string[0] == 0)
Cvar_Set("hostname", "UNNAMED");
scr_centertime_off = 0;
Con_DPrintf("SpawnServer: %s\n", server);
svs.changelevel_issued = false; // now safe to issue another
//
// tell all connected clients that we are going to a new level
//
if(sv.active)
{
SV_SendReconnect();
}
//
// make cvars consistant
//
if(coop.value)
Cvar_Set("deathmatch", "0");
current_skill = (int32_t)(skill.value + 0.5);
if(current_skill < 0)
current_skill = 0;
if(current_skill > 3)
current_skill = 3;
Cvar_SetValue("skill", (float)current_skill);
//
// set up the new server
//
//memset (&sv, 0, sizeof(sv));
Host_ClearMemory();
q_strlcpy(sv.name, server, sizeof(sv.name));
sv.protocol = sv_protocol; // johnfitz
if(sv.protocol == PROTOCOL_RMQ)
{
// set up the protocol flags used by this server
// (note - these could be cvar-ised so that server admins could choose the protocol features used by their servers)
sv.protocolflags = PRFL_INT32COORD | PRFL_SHORTANGLE;
}
else sv.protocolflags = 0;
// load progs to get entity field count
PR_LoadProgs();
// allocate server memory
/* Host_ClearMemory() called above already cleared the whole sv structure */
sv.max_edicts = CLAMP(MIN_EDICTS, (int32_t)max_edicts.value, MAX_EDICTS); //johnfitz -- max_edicts cvar
sv.edicts = (edict_t *) malloc(sv.max_edicts * pr_edict_size); // ericw -- sv.edicts switched to use malloc()
sv.datagram.maxsize = sizeof(sv.datagram_buf);
sv.datagram.cursize = 0;
sv.datagram.data = sv.datagram_buf;
sv.reliable_datagram.maxsize = sizeof(sv.reliable_datagram_buf);
sv.reliable_datagram.cursize = 0;
sv.reliable_datagram.data = sv.reliable_datagram_buf;
sv.signon.maxsize = sizeof(sv.signon_buf);
sv.signon.cursize = 0;
sv.signon.data = sv.signon_buf;
// leave slots at start for clients only
sv.num_edicts = svs.maxclients + 1;
memset(sv.edicts, 0, sv.num_edicts * pr_edict_size); // ericw -- sv.edicts switched to use malloc()
for(i = 0 ; i < svs.maxclients ; i++)
{
ent = EdictNum(i + 1);
svs.clients[i].edict = ent;
}
sv.state = ss_loading;
sv.paused = false;
sv.time = 1.0;
q_strlcpy(sv.name, server, sizeof(sv.name));
q_snprintf(sv.modelname, sizeof(sv.modelname), "maps/%s.bsp", server);
sv.worldmodel = Mod_ForName(sv.modelname, false);
if(!sv.worldmodel)
{
Con_Printf("Couldn't spawn server %s\n", sv.modelname);
sv.active = false;
return;
}
sv.models[1] = sv.worldmodel;
//
// clear world interaction links
//
SV_ClearWorld();
sv.sound_precache[0] = dummy;
sv.model_precache[0] = dummy;
sv.model_precache[1] = sv.modelname;
for(i = 1 ; i < sv.worldmodel->numsubmodels ; i++)
{
sv.model_precache[1 + i] = localmodels[i];
sv.models[i + 1] = Mod_ForName(localmodels[i], false);
}
//
// load the rest of the entities
//
ent = EdictNum(0);
memset(ent->fields, 0, progs.entityfields * 4);
ent->free = false;
ED_RString(ent, ED_model) = PR_SetEngineString(sv.worldmodel->name);
ED_Float(ent, ED_modelindex) = 1; // world model
ED_Float(ent, ED_solid) = SOLID_BSP;
ED_Float(ent, ED_movetype) = MOVETYPE_PUSH;
if(coop.value)
G_Float(GBL_coop) = coop.value;
else
G_Float(GBL_deathmatch) = deathmatch.value;
G_RString(GBL_mapname) = PR_SetEngineString(sv.name);
// serverflags are for cross level information (sigils)
G_Float(GBL_serverflags) = svs.serverflags;
ED_LoadFromFile(sv.worldmodel->entities);
sv.active = true;
// all setup is completed, any further precache statements are errors
sv.state = ss_active;
// run two frames to allow everything to settle
host_frametime = 0.1;
SV_Physics();
SV_Physics();
// create a baseline for more efficient communications
SV_CreateBaseline();
//johnfitz -- warn if signon buffer larger than standard server can handle
if(sv.signon.cursize > 8000 - 2) //max size that will fit into 8000-sized client->message buffer with 2 extra bytes on the end
Con_DWarning("%" PRIi32 " byte signon buffer exceeds standard limit of 7998 (max = %" PRIi32 ").\n", sv.signon.cursize, sv.signon.maxsize);
//johnfitz
// send serverinfo to all connected clients
for(i = 0, host_client = svs.clients ; i < svs.maxclients ; i++, host_client++)
if(host_client->active)
SV_SendServerinfo(host_client);
Con_DPrintf("Server spawned.\n");
}
Reference in New Issue View Git Blame Copy Permalink