sv_main.c

   1 /*
   2 Copyright (C) 1996-1997 Id Software, Inc.
   3
   4 This program is free software; you can redistribute it and/or
   5 modify it under the terms of the GNU General Public License
   6 as published by the Free Software Foundation; either version 2
   7 of the License, or (at your option) any later version.
   8
   9 This program is distributed in the hope that it will be useful,
  10 but WITHOUT ANY WARRANTY; without even the implied warranty of
  11 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
  12
  13 See the GNU General Public License for more details.
  14
  15 You should have received a copy of the GNU General Public License
  16 along with this program; if not, write to the Free Software
  17 Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
  18
  19 */
  20 // sv_main.c -- server main program
  21
  22 #include "quakedef.h"
  23 #include "sv_demo.h"
  24 #include "libcurl.h"
  25 #include "csprogs.h"
  26
  27 static void SV_SaveEntFile_f(void);
  28 static void SV_StartDownload_f(void);
  29 static void SV_Download_f(void);
  30 static void SV_VM_Setup();
  31 extern cvar_t net_connecttimeout;
  32
  33 void VM_CustomStats_Clear (void);
  34 void VM_SV_UpdateCustomStats (client_t *client, prvm_edict_t *ent, sizebuf_t *msg, int *stats);
  35
  36 cvar_t coop = {0, "coop","0", "coop mode, 0 = no coop, 1 = coop mode, multiple players playing through the singleplayer game (coop mode also shuts off deathmatch)"};
  37 cvar_t deathmatch = {0, "deathmatch","0", "deathmatch mode, values depend on mod but typically 0 = no deathmatch, 1 = normal deathmatch with respawning weapons, 2 = weapons stay (players can only pick up new weapons)"};
  38 cvar_t fraglimit = {CVAR_NOTIFY, "fraglimit","0", "ends level if this many frags is reached by any player"};
  39 cvar_t gamecfg = {0, "gamecfg", "0", "unused cvar in quake, can be used by mods"};
  40 cvar_t noexit = {CVAR_NOTIFY, "noexit","0", "kills anyone attempting to use an exit"};
  41 cvar_t nomonsters = {0, "nomonsters", "0", "unused cvar in quake, can be used by mods"};
  42 cvar_t pausable = {0, "pausable","1", "allow players to pause or not"};
  43 cvar_t pr_checkextension = {CVAR_READONLY, "pr_checkextension", "1", "indicates to QuakeC that the standard quakec extensions system is available (if 0, quakec should not attempt to use extensions)"};
  44 cvar_t samelevel = {CVAR_NOTIFY, "samelevel","0", "repeats same level if level ends (due to timelimit or someone hitting an exit)"};
  45 cvar_t skill = {0, "skill","1", "difficulty level of game, affects monster layouts in levels, 0 = easy, 1 = normal, 2 = hard, 3 = nightmare (same layout as hard but monsters fire twice)"};
  46 cvar_t slowmo = {0, "slowmo", "1.0", "controls game speed, 0.5 is half speed, 2 is double speed"};
  47
  48 cvar_t sv_accelerate = {0, "sv_accelerate", "10", "rate at which a player accelerates to sv_maxspeed"};
  49 cvar_t sv_aim = {CVAR_SAVE, "sv_aim", "2", "maximum cosine angle for quake's vertical autoaim, a value above 1 completely disables the autoaim, quake used 0.93"};
  50 cvar_t sv_airaccel_qw = {0, "sv_airaccel_qw", "1", "ratio of QW-style air control as opposed to simple acceleration"};
  51 cvar_t sv_airaccel_sideways_friction = {0, "sv_airaccel_sideways_friction", "", "anti-sideways movement stabilization (reduces speed gain when zigzagging)"};
  52 cvar_t sv_airaccelerate = {0, "sv_airaccelerate", "-1", "rate at which a player accelerates to sv_maxairspeed while in the air, if less than 0 the sv_accelerate variable is used instead"};
  53 cvar_t sv_allowdownloads = {0, "sv_allowdownloads", "1", "whether to allow clients to download files from the server (does not affect http downloads)"};
  54 cvar_t sv_allowdownloads_archive = {0, "sv_allowdownloads_archive", "0", "whether to allow downloads of archives (pak/pk3)"};
  55 cvar_t sv_allowdownloads_config = {0, "sv_allowdownloads_config", "0", "whether to allow downloads of config files (cfg)"};
  56 cvar_t sv_allowdownloads_dlcache = {0, "sv_allowdownloads_dlcache", "0", "whether to allow downloads of dlcache files (dlcache/)"};
  57 cvar_t sv_allowdownloads_inarchive = {0, "sv_allowdownloads_inarchive", "0", "whether to allow downloads from archives (pak/pk3)"};
  58 cvar_t sv_areagrid_mingridsize = {CVAR_NOTIFY, "sv_areagrid_mingridsize", "64", "minimum areagrid cell size, smaller values work better for lots of small objects, higher values for large objects"};
  59 cvar_t sv_checkforpacketsduringsleep = {0, "sv_checkforpacketsduringsleep", "0", "uses select() function to wait between frames which can be interrupted by packets being received, instead of Sleep()/usleep()/SDL_Sleep() functions which do not check for packets"};
  60 cvar_t sv_clmovement_enable = {0, "sv_clmovement_enable", "1", "whether to allow clients to use cl_movement prediction, which can cause choppy movement on the server which may annoy other players"};
  61 cvar_t sv_clmovement_minping = {0, "sv_clmovement_minping", "0", "if client ping is below this time in milliseconds, then their ability to use cl_movement prediction is disabled for a while (as they don't need it)"};
  62 cvar_t sv_clmovement_maxnetfps = {0, "sv_clmovement_maxnetfps", "0", "max amount of movement packets to accept per second"};
  63 cvar_t sv_clmovement_minping_disabletime = {0, "sv_clmovement_minping_disabletime", "1000", "when client falls below minping, disable their prediction for this many milliseconds (should be at least 1000 or else their prediction may turn on/off frequently)"};
  64 cvar_t sv_clmovement_inputtimeout = {0, "sv_clmovement_inputtimeout", "0.2", "when a client does not send input for this many seconds, force them to move anyway (unlike QuakeWorld)"};
  65 cvar_t sv_cullentities_nevercullbmodels = {0, "sv_cullentities_nevercullbmodels", "0", "if enabled the clients are always notified of moving doors and lifts and other submodels of world (warning: eats a lot of network bandwidth on some levels!)"};
  66 cvar_t sv_cullentities_pvs = {0, "sv_cullentities_pvs", "1", "fast but loose culling of hidden entities"};
  67 cvar_t sv_cullentities_stats = {0, "sv_cullentities_stats", "0", "displays stats on network entities culled by various methods for each client"};
  68 cvar_t sv_cullentities_trace = {0, "sv_cullentities_trace", "0", "somewhat slow but very tight culling of hidden entities, minimizes network traffic and makes wallhack cheats useless"};
  69 cvar_t sv_cullentities_trace_delay = {0, "sv_cullentities_trace_delay", "1", "number of seconds until the entity gets actually culled"};
  70 cvar_t sv_cullentities_trace_delay_players = {0, "sv_cullentities_trace_delay_players", "0.2", "number of seconds until the entity gets actually culled if it is a player entity"};
  71 cvar_t sv_cullentities_trace_enlarge = {0, "sv_cullentities_trace_enlarge", "0", "box enlargement for entity culling"};
  72 cvar_t sv_cullentities_trace_prediction = {0, "sv_cullentities_trace_prediction", "1", "also trace from the predicted player position"};
  73 cvar_t sv_cullentities_trace_samples = {0, "sv_cullentities_trace_samples", "1", "number of samples to test for entity culling"};
  74 cvar_t sv_cullentities_trace_samples_extra = {0, "sv_cullentities_trace_samples_extra", "2", "number of samples to test for entity culling when the entity affects its surroundings by e.g. dlight"};
  75 cvar_t sv_cullentities_trace_samples_players = {0, "sv_cullentities_trace_samples_players", "8", "number of samples to test for entity culling when the entity is a player entity"};
  76 cvar_t sv_debugmove = {CVAR_NOTIFY, "sv_debugmove", "0", "disables collision detection optimizations for debugging purposes"};
  77 cvar_t sv_echobprint = {CVAR_SAVE, "sv_echobprint", "1", "prints gamecode bprint() calls to server console"};
  78 cvar_t sv_edgefriction = {0, "edgefriction", "1", "how much you slow down when nearing a ledge you might fall off, multiplier of sv_friction (Quake used 2, QuakeWorld used 1 due to a bug in physics code)"};
  79 cvar_t sv_entpatch = {0, "sv_entpatch", "1", "enables loading of .ent files to override entities in the bsp (for example Threewave CTF server pack contains .ent patch files enabling play of CTF on id1 maps)"};
  80 cvar_t sv_fixedframeratesingleplayer = {0, "sv_fixedframeratesingleplayer", "1", "allows you to use server-style timing system in singleplayer (don't run faster than sys_ticrate)"};
  81 cvar_t sv_freezenonclients = {CVAR_NOTIFY, "sv_freezenonclients", "0", "freezes time, except for players, allowing you to walk around and take screenshots of explosions"};
  82 cvar_t sv_friction = {CVAR_NOTIFY, "sv_friction","4", "how fast you slow down"};
  83 cvar_t sv_gameplayfix_blowupfallenzombies = {0, "sv_gameplayfix_blowupfallenzombies", "1", "causes findradius to detect SOLID_NOT entities such as zombies and corpses on the floor, allowing splash damage to apply to them"};
  84 cvar_t sv_gameplayfix_delayprojectiles = {0, "sv_gameplayfix_delayprojectiles", "1", "causes entities to not move on the same frame they are spawned, meaning that projectiles wait until the next frame to perform their first move, giving proper interpolation and rocket trails, but making weapons harder to use at low framerates"};
  85 cvar_t sv_gameplayfix_droptofloorstartsolid = {0, "sv_gameplayfix_droptofloorstartsolid", "1", "prevents items and monsters that start in a solid area from falling out of the level (makes droptofloor treat trace_startsolid as an acceptable outcome)"};
  86 cvar_t sv_gameplayfix_droptofloorstartsolid_nudgetocorrect = {0, "sv_gameplayfix_droptofloorstartsolid_nudgetocorrect", "1", "tries to nudge stuck items and monsters out of walls before droptofloor is performed"};
  87 cvar_t sv_gameplayfix_easierwaterjump = {0, "sv_gameplayfix_easierwaterjump", "1", "changes water jumping to make it easier to get out of water (exactly like in QuakeWorld)"};
  88 cvar_t sv_gameplayfix_findradiusdistancetobox = {0, "sv_gameplayfix_findradiusdistancetobox", "1", "causes findradius to check the distance to the corner of a box rather than the center of the box, makes findradius detect bmodels such as very large doors that would otherwise be unaffected by splash damage"};
  89 cvar_t sv_gameplayfix_grenadebouncedownslopes = {0, "sv_gameplayfix_grenadebouncedownslopes", "1", "prevents MOVETYPE_BOUNCE (grenades) from getting stuck when fired down a downward sloping surface"};
  90 cvar_t sv_gameplayfix_multiplethinksperframe = {0, "sv_gameplayfix_multiplethinksperframe", "1", "allows entities to think more often than the server framerate, primarily useful for very high fire rate weapons"};
  91 cvar_t sv_gameplayfix_slidemoveprojectiles = {0, "sv_gameplayfix_slidemoveprojectiles", "1", "allows MOVETYPE_FLY/FLYMISSILE/TOSS/BOUNCE/BOUNCEMISSILE entities to finish their move in a frame even if they hit something, fixes 'gravity accumulation' bug for grenades on steep slopes"};
  92 cvar_t sv_gameplayfix_noairborncorpse = {0, "sv_gameplayfix_noairborncorpse", "1", "causes entities (corpses) sitting ontop of moving entities (players) to fall when the moving entity (player) is no longer supporting them"};
  93 cvar_t sv_gameplayfix_setmodelrealbox = {0, "sv_gameplayfix_setmodelrealbox", "1", "fixes a bug in Quake that made setmodel always set the entity box to ('-16 -16 -16', '16 16 16') rather than properly checking the model box, breaks some poorly coded mods"};
  94 cvar_t sv_gameplayfix_stepdown = {0, "sv_gameplayfix_stepdown", "0", "attempts to step down stairs, not just up them (prevents the familiar thud..thud..thud.. when running down stairs and slopes)"};
  95 cvar_t sv_gameplayfix_stepwhilejumping = {0, "sv_gameplayfix_stepwhilejumping", "1", "applies step-up onto a ledge even while airborn, useful if you would otherwise just-miss the floor when running across small areas with gaps (for instance running across the moving platforms in dm2, or jumping to the megahealth and red armor in dm2 rather than using the bridge)"};
  96 cvar_t sv_gameplayfix_swiminbmodels = {0, "sv_gameplayfix_swiminbmodels", "1", "causes pointcontents (used to determine if you are in a liquid) to check bmodel entities as well as the world model, so you can swim around in (possibly moving) water bmodel entities"};
  97 cvar_t sv_gameplayfix_upwardvelocityclearsongroundflag = {0, "sv_gameplayfix_upwardvelocityclearsongroundflag", "1", "prevents monsters, items, and most other objects from being stuck to the floor when pushed around by damage, and other situations in mods"};
  98 cvar_t sv_gameplayfix_gravityunaffectedbyticrate = {0, "sv_gameplayfix_gravityunaffectedbyticrate", "0", "fix some ticrate issues in physics."};
  99 cvar_t sv_gravity = {CVAR_NOTIFY, "sv_gravity","800", "how fast you fall (512 = roughly earth gravity)"};
 100 cvar_t sv_idealpitchscale = {0, "sv_idealpitchscale","0.8", "how much to look up/down slopes and stairs when not using freelook"};
 101 cvar_t sv_jumpstep = {CVAR_NOTIFY, "sv_jumpstep", "0", "whether you can step up while jumping (sv_gameplayfix_stepwhilejumping must also be 1)"};
 102 cvar_t sv_jumpvelocity = {0, "sv_jumpvelocity", "270", "cvar that can be used by QuakeC code for jump velocity"};
 103 cvar_t sv_maxairspeed = {0, "sv_maxairspeed", "30", "maximum speed a player can accelerate to when airborn (note that it is possible to completely stop by moving the opposite direction)"};
 104 cvar_t sv_maxrate = {CVAR_SAVE | CVAR_NOTIFY, "sv_maxrate", "1000000", "upper limit on client rate cvar, should reflect your network connection quality"};
 105 cvar_t sv_maxspeed = {CVAR_NOTIFY, "sv_maxspeed", "320", "maximum speed a player can accelerate to when on ground (can be exceeded by tricks)"};
 106 cvar_t sv_maxvelocity = {CVAR_NOTIFY, "sv_maxvelocity","2000", "universal speed limit on all entities"};
 107 cvar_t sv_newflymove = {CVAR_NOTIFY, "sv_newflymove", "0", "enables simpler/buggier player physics (not recommended)"};
 108 cvar_t sv_nostep = {CVAR_NOTIFY, "sv_nostep","0", "prevents MOVETYPE_STEP entities (monsters) from moving"};
 109 cvar_t sv_playerphysicsqc = {CVAR_NOTIFY, "sv_playerphysicsqc", "1", "enables QuakeC function to override player physics"};
 110 cvar_t sv_progs = {0, "sv_progs", "progs.dat", "selects which quakec progs.dat file to run" };
 111 cvar_t sv_protocolname = {0, "sv_protocolname", "DP7", "selects network protocol to host for (values include QUAKE, QUAKEDP, NEHAHRAMOVIE, DP1 and up)"};
 112 cvar_t sv_random_seed = {0, "sv_random_seed", "", "random seed; when set, on every map start this random seed is used to initialize the random number generator. Don't touch it unless for benchmarking or debugging"};
 113 cvar_t sv_ratelimitlocalplayer = {0, "sv_ratelimitlocalplayer", "0", "whether to apply rate limiting to the local player in a listen server (only useful for testing)"};
 114 cvar_t sv_sound_land = {0, "sv_sound_land", "demon/dland2.wav", "sound to play when MOVETYPE_STEP entity hits the ground at high speed (empty cvar disables the sound)"};
 115 cvar_t sv_sound_watersplash = {0, "sv_sound_watersplash", "misc/h2ohit1.wav", "sound to play when MOVETYPE_FLY/TOSS/BOUNCE/STEP entity enters or leaves water (empty cvar disables the sound)"};
 116 cvar_t sv_stepheight = {CVAR_NOTIFY, "sv_stepheight", "18", "how high you can step up (TW_SV_STEPCONTROL extension)"};
 117 cvar_t sv_stopspeed = {CVAR_NOTIFY, "sv_stopspeed","100", "how fast you come to a complete stop"};
 118 cvar_t sv_wallfriction = {CVAR_NOTIFY, "sv_wallfriction", "1", "how much you slow down when sliding along a wall"};
 119 cvar_t sv_wateraccelerate = {0, "sv_wateraccelerate", "-1", "rate at which a player accelerates to sv_maxspeed while in the air, if less than 0 the sv_accelerate variable is used instead"};
 120 cvar_t sv_waterfriction = {CVAR_NOTIFY, "sv_waterfriction","-1", "how fast you slow down, if less than 0 the sv_friction variable is used instead"};
 121 cvar_t sys_ticrate = {CVAR_SAVE, "sys_ticrate","0.0138889", "how long a server frame is in seconds, 0.05 is 20fps server rate, 0.1 is 10fps (can not be set higher than 0.1), 0 runs as many server frames as possible (makes games against bots a little smoother, overwhelms network players), 0.0138889 matches QuakeWorld physics"};
 122 cvar_t teamplay = {CVAR_NOTIFY, "teamplay","0", "teamplay mode, values depend on mod but typically 0 = no teams, 1 = no team damage no self damage, 2 = team damage and self damage, some mods support 3 = no team damage but can damage self"};
 123 cvar_t timelimit = {CVAR_NOTIFY, "timelimit","0", "ends level at this time (in minutes)"};
 124
 125 cvar_t saved1 = {CVAR_SAVE, "saved1", "0", "unused cvar in quake that is saved to config.cfg on exit, can be used by mods"};
 126 cvar_t saved2 = {CVAR_SAVE, "saved2", "0", "unused cvar in quake that is saved to config.cfg on exit, can be used by mods"};
 127 cvar_t saved3 = {CVAR_SAVE, "saved3", "0", "unused cvar in quake that is saved to config.cfg on exit, can be used by mods"};
 128 cvar_t saved4 = {CVAR_SAVE, "saved4", "0", "unused cvar in quake that is saved to config.cfg on exit, can be used by mods"};
 129 cvar_t savedgamecfg = {CVAR_SAVE, "savedgamecfg", "0", "unused cvar in quake that is saved to config.cfg on exit, can be used by mods"};
 130 cvar_t scratch1 = {0, "scratch1", "0", "unused cvar in quake, can be used by mods"};
 131 cvar_t scratch2 = {0,"scratch2", "0", "unused cvar in quake, can be used by mods"};
 132 cvar_t scratch3 = {0, "scratch3", "0", "unused cvar in quake, can be used by mods"};
 133 cvar_t scratch4 = {0, "scratch4", "0", "unused cvar in quake, can be used by mods"};
 134 cvar_t temp1 = {0, "temp1","0", "general cvar for mods to use, in stock id1 this selects which death animation to use on players (0 = random death, other values select specific death scenes)"};
 135
 136 cvar_t nehx00 = {0, "nehx00", "0", "nehahra data storage cvar (used in singleplayer)"};
 137 cvar_t nehx01 = {0, "nehx01", "0", "nehahra data storage cvar (used in singleplayer)"};
 138 cvar_t nehx02 = {0, "nehx02", "0", "nehahra data storage cvar (used in singleplayer)"};
 139 cvar_t nehx03 = {0, "nehx03", "0", "nehahra data storage cvar (used in singleplayer)"};
 140 cvar_t nehx04 = {0, "nehx04", "0", "nehahra data storage cvar (used in singleplayer)"};
 141 cvar_t nehx05 = {0, "nehx05", "0", "nehahra data storage cvar (used in singleplayer)"};
 142 cvar_t nehx06 = {0, "nehx06", "0", "nehahra data storage cvar (used in singleplayer)"};
 143 cvar_t nehx07 = {0, "nehx07", "0", "nehahra data storage cvar (used in singleplayer)"};
 144 cvar_t nehx08 = {0, "nehx08", "0", "nehahra data storage cvar (used in singleplayer)"};
 145 cvar_t nehx09 = {0, "nehx09", "0", "nehahra data storage cvar (used in singleplayer)"};
 146 cvar_t nehx10 = {0, "nehx10", "0", "nehahra data storage cvar (used in singleplayer)"};
 147 cvar_t nehx11 = {0, "nehx11", "0", "nehahra data storage cvar (used in singleplayer)"};
 148 cvar_t nehx12 = {0, "nehx12", "0", "nehahra data storage cvar (used in singleplayer)"};
 149 cvar_t nehx13 = {0, "nehx13", "0", "nehahra data storage cvar (used in singleplayer)"};
 150 cvar_t nehx14 = {0, "nehx14", "0", "nehahra data storage cvar (used in singleplayer)"};
 151 cvar_t nehx15 = {0, "nehx15", "0", "nehahra data storage cvar (used in singleplayer)"};
 152 cvar_t nehx16 = {0, "nehx16", "0", "nehahra data storage cvar (used in singleplayer)"};
 153 cvar_t nehx17 = {0, "nehx17", "0", "nehahra data storage cvar (used in singleplayer)"};
 154 cvar_t nehx18 = {0, "nehx18", "0", "nehahra data storage cvar (used in singleplayer)"};
 155 cvar_t nehx19 = {0, "nehx19", "0", "nehahra data storage cvar (used in singleplayer)"};
 156 cvar_t cutscene = {0, "cutscene", "1", "enables cutscenes in nehahra, can be used by other mods"};
 157
 158 cvar_t sv_autodemo_perclient = {CVAR_SAVE, "sv_autodemo_perclient", "0", "set to 1 to enable autorecorded per-client demos (they'll start to record at the beginning of a match); set it to 2 to also record client->server packets (for debugging)"};
 159 cvar_t sv_autodemo_perclient_nameformat = {CVAR_SAVE, "sv_autodemo_perclient_nameformat", "sv_autodemos/%Y-%m-%d_%H-%M", "The format of the sv_autodemo_perclient filename, followed by the map name, the client number and the IP address + port number, separated by underscores (the date is encoded using strftime escapes)" };
 160
 161 cvar_t halflifebsp = {0, "halflifebsp", "0", "indicates the current map is hlbsp format (useful to know because of different bounding box sizes)"};
 162
 163 server_t sv;
 164 server_static_t svs;
 165
 166 mempool_t *sv_mempool = NULL;
 167
 168 extern cvar_t slowmo;
 169 extern float            scr_centertime_off;
 170
 171 // MUST match effectnameindex_t in client.h
 172 static const char *standardeffectnames[EFFECT_TOTAL] =
 173 {
 174         "",
 175         "TE_GUNSHOT",
 176         "TE_GUNSHOTQUAD",
 177         "TE_SPIKE",
 178         "TE_SPIKEQUAD",
 179         "TE_SUPERSPIKE",
 180         "TE_SUPERSPIKEQUAD",
 181         "TE_WIZSPIKE",
 182         "TE_KNIGHTSPIKE",
 183         "TE_EXPLOSION",
 184         "TE_EXPLOSIONQUAD",
 185         "TE_TAREXPLOSION",
 186         "TE_TELEPORT",
 187         "TE_LAVASPLASH",
 188         "TE_SMALLFLASH",
 189         "TE_FLAMEJET",
 190         "EF_FLAME",
 191         "TE_BLOOD",
 192         "TE_SPARK",
 193         "TE_PLASMABURN",
 194         "TE_TEI_G3",
 195         "TE_TEI_SMOKE",
 196         "TE_TEI_BIGEXPLOSION",
 197         "TE_TEI_PLASMAHIT",
 198         "EF_STARDUST",
 199         "TR_ROCKET",
 200         "TR_GRENADE",
 201         "TR_BLOOD",
 202         "TR_WIZSPIKE",
 203         "TR_SLIGHTBLOOD",
 204         "TR_KNIGHTSPIKE",
 205         "TR_VORESPIKE",
 206         "TR_NEHAHRASMOKE",
 207         "TR_NEXUIZPLASMA",
 208         "TR_GLOWTRAIL",
 209         "SVC_PARTICLE"
 210 };
 211
 212 #define REQFIELDS (sizeof(reqfields) / sizeof(prvm_required_field_t))
 213
 214 prvm_required_field_t reqfields[] =
 215 {
 216         {ev_entity, "cursor_trace_ent"},
 217         {ev_entity, "drawonlytoclient"},
 218         {ev_entity, "exteriormodeltoclient"},
 219         {ev_entity, "nodrawtoclient"},
 220         {ev_entity, "tag_entity"},
 221         {ev_entity, "viewmodelforclient"},
 222         {ev_float, "SendFlags"},
 223         {ev_float, "Version"},
 224         {ev_float, "alpha"},
 225         {ev_float, "ammo_cells1"},
 226         {ev_float, "ammo_lava_nails"},
 227         {ev_float, "ammo_multi_rockets"},
 228         {ev_float, "ammo_nails1"},
 229         {ev_float, "ammo_plasma"},
 230         {ev_float, "ammo_rockets1"},
 231         {ev_float, "ammo_shells1"},
 232         {ev_float, "button3"},
 233         {ev_float, "button4"},
 234         {ev_float, "button5"},
 235         {ev_float, "button6"},
 236         {ev_float, "button7"},
 237         {ev_float, "button8"},
 238         {ev_float, "button9"},
 239         {ev_float, "button10"},
 240         {ev_float, "button11"},
 241         {ev_float, "button12"},
 242         {ev_float, "button13"},
 243         {ev_float, "button14"},
 244         {ev_float, "button15"},
 245         {ev_float, "button16"},
 246         {ev_float, "buttonchat"},
 247         {ev_float, "buttonuse"},
 248         {ev_float, "clientcolors"},
 249         {ev_float, "cursor_active"},
 250         {ev_float, "disableclientprediction"},
 251         {ev_float, "fullbright"},
 252         {ev_float, "glow_color"},
 253         {ev_float, "glow_size"},
 254         {ev_float, "glow_trail"},
 255         {ev_float, "gravity"},
 256         {ev_float, "idealpitch"},
 257         {ev_float, "items2"},
 258         {ev_float, "light_lev"},
 259         {ev_float, "modelflags"},
 260         {ev_float, "pflags"},
 261         {ev_float, "ping"},
 262         {ev_float, "pitch_speed"},
 263         {ev_float, "pmodel"},
 264         {ev_float, "renderamt"}, // HalfLife support
 265         {ev_float, "rendermode"}, // HalfLife support
 266         {ev_float, "scale"},
 267         {ev_float, "style"},
 268         {ev_float, "tag_index"},
 269         {ev_float, "viewzoom"},
 270         {ev_function, "SendEntity"},
 271         {ev_function, "contentstransition"}, // DRESK - Support for Entity Contents Transition Event
 272         {ev_function, "customizeentityforclient"},
 273         {ev_function, "movetypesteplandevent"}, // DRESK - Support for MOVETYPE_STEP Entity Land Event
 274         {ev_string, "netaddress"},
 275         {ev_string, "playermodel"},
 276         {ev_string, "playerskin"},
 277         {ev_vector, "color"},
 278         {ev_vector, "colormod"},
 279         {ev_vector, "cursor_screen"},
 280         {ev_vector, "cursor_trace_endpos"},
 281         {ev_vector, "cursor_trace_start"},
 282         {ev_vector, "movement"},
 283         {ev_vector, "punchvector"},
 284 };
 285
 286
 287
 288 //============================================================================
 289
 290 void SV_AreaStats_f(void)
 291 {
 292         World_PrintAreaStats(&sv.world, "server");
 293 }
 294
 295 /*
 296 ===============
 297 SV_Init
 298 ===============
 299 */
 300 void SV_Init (void)
 301 {
 302         // init the csqc progs cvars, since they are updated/used by the server code
 303         // TODO: fix this since this is a quick hack to make some of [515]'s broken code run ;) [9/13/2006 Black]
 304         extern cvar_t csqc_progname;    //[515]: csqc crc check and right csprogs name according to progs.dat
 305         extern cvar_t csqc_progcrc;
 306         extern cvar_t csqc_progsize;
 307         Cvar_RegisterVariable (&csqc_progname);
 308         Cvar_RegisterVariable (&csqc_progcrc);
 309         Cvar_RegisterVariable (&csqc_progsize);
 310
 311         Cmd_AddCommand("sv_saveentfile", SV_SaveEntFile_f, "save map entities to .ent file (to allow external editing)");
 312         Cmd_AddCommand("sv_areastats", SV_AreaStats_f, "prints statistics on entity culling during collision traces");
 313         Cmd_AddCommand_WithClientCommand("sv_startdownload", NULL, SV_StartDownload_f, "begins sending a file to the client (network protocol use only)");
 314         Cmd_AddCommand_WithClientCommand("download", NULL, SV_Download_f, "downloads a specified file from the server");
 315
 316         Cvar_RegisterVariable (&coop);
 317         Cvar_RegisterVariable (&deathmatch);
 318         Cvar_RegisterVariable (&fraglimit);
 319         Cvar_RegisterVariable (&gamecfg);
 320         Cvar_RegisterVariable (&noexit);
 321         Cvar_RegisterVariable (&nomonsters);
 322         Cvar_RegisterVariable (&pausable);
 323         Cvar_RegisterVariable (&pr_checkextension);
 324         Cvar_RegisterVariable (&samelevel);
 325         Cvar_RegisterVariable (&skill);
 326         Cvar_RegisterVariable (&slowmo);
 327         Cvar_RegisterVariable (&sv_accelerate);
 328         Cvar_RegisterVariable (&sv_aim);
 329         Cvar_RegisterVariable (&sv_airaccel_qw);
 330         Cvar_RegisterVariable (&sv_airaccel_sideways_friction);
 331         Cvar_RegisterVariable (&sv_airaccelerate);
 332         Cvar_RegisterVariable (&sv_allowdownloads);
 333         Cvar_RegisterVariable (&sv_allowdownloads_archive);
 334         Cvar_RegisterVariable (&sv_allowdownloads_config);
 335         Cvar_RegisterVariable (&sv_allowdownloads_dlcache);
 336         Cvar_RegisterVariable (&sv_allowdownloads_inarchive);
 337         Cvar_RegisterVariable (&sv_areagrid_mingridsize);
 338         Cvar_RegisterVariable (&sv_checkforpacketsduringsleep);
 339         Cvar_RegisterVariable (&sv_clmovement_enable);
 340         Cvar_RegisterVariable (&sv_clmovement_maxnetfps);
 341         Cvar_RegisterVariable (&sv_clmovement_minping);
 342         Cvar_RegisterVariable (&sv_clmovement_minping_disabletime);
 343         Cvar_RegisterVariable (&sv_clmovement_inputtimeout);
 344         Cvar_RegisterVariable (&sv_cullentities_nevercullbmodels);
 345         Cvar_RegisterVariable (&sv_cullentities_pvs);
 346         Cvar_RegisterVariable (&sv_cullentities_stats);
 347         Cvar_RegisterVariable (&sv_cullentities_trace);
 348         Cvar_RegisterVariable (&sv_cullentities_trace_delay);
 349         Cvar_RegisterVariable (&sv_cullentities_trace_delay_players);
 350         Cvar_RegisterVariable (&sv_cullentities_trace_enlarge);
 351         Cvar_RegisterVariable (&sv_cullentities_trace_prediction);
 352         Cvar_RegisterVariable (&sv_cullentities_trace_samples);
 353         Cvar_RegisterVariable (&sv_cullentities_trace_samples_extra);
 354         Cvar_RegisterVariable (&sv_cullentities_trace_samples_players);
 355         Cvar_RegisterVariable (&sv_debugmove);
 356         Cvar_RegisterVariable (&sv_echobprint);
 357         Cvar_RegisterVariable (&sv_edgefriction);
 358         Cvar_RegisterVariable (&sv_entpatch);
 359         Cvar_RegisterVariable (&sv_fixedframeratesingleplayer);
 360         Cvar_RegisterVariable (&sv_freezenonclients);
 361         Cvar_RegisterVariable (&sv_friction);
 362         Cvar_RegisterVariable (&sv_gameplayfix_blowupfallenzombies);
 363         Cvar_RegisterVariable (&sv_gameplayfix_delayprojectiles);
 364         Cvar_RegisterVariable (&sv_gameplayfix_droptofloorstartsolid);
 365         Cvar_RegisterVariable (&sv_gameplayfix_droptofloorstartsolid_nudgetocorrect);
 366         Cvar_RegisterVariable (&sv_gameplayfix_easierwaterjump);
 367         Cvar_RegisterVariable (&sv_gameplayfix_findradiusdistancetobox);
 368         Cvar_RegisterVariable (&sv_gameplayfix_grenadebouncedownslopes);
 369         Cvar_RegisterVariable (&sv_gameplayfix_multiplethinksperframe);
 370         Cvar_RegisterVariable (&sv_gameplayfix_slidemoveprojectiles);
 371         Cvar_RegisterVariable (&sv_gameplayfix_noairborncorpse);
 372         Cvar_RegisterVariable (&sv_gameplayfix_setmodelrealbox);
 373         Cvar_RegisterVariable (&sv_gameplayfix_stepdown);
 374         Cvar_RegisterVariable (&sv_gameplayfix_stepwhilejumping);
 375         Cvar_RegisterVariable (&sv_gameplayfix_swiminbmodels);
 376         Cvar_RegisterVariable (&sv_gameplayfix_upwardvelocityclearsongroundflag);
 377         Cvar_RegisterVariable (&sv_gameplayfix_gravityunaffectedbyticrate);
 378         Cvar_RegisterVariable (&sv_gravity);
 379         Cvar_RegisterVariable (&sv_idealpitchscale);
 380         Cvar_RegisterVariable (&sv_jumpstep);
 381         Cvar_RegisterVariable (&sv_jumpvelocity);
 382         Cvar_RegisterVariable (&sv_maxairspeed);
 383         Cvar_RegisterVariable (&sv_maxrate);
 384         Cvar_RegisterVariable (&sv_maxspeed);
 385         Cvar_RegisterVariable (&sv_maxvelocity);
 386         Cvar_RegisterVariable (&sv_newflymove);
 387         Cvar_RegisterVariable (&sv_nostep);
 388         Cvar_RegisterVariable (&sv_playerphysicsqc);
 389         Cvar_RegisterVariable (&sv_progs);
 390         Cvar_RegisterVariable (&sv_protocolname);
 391         Cvar_RegisterVariable (&sv_random_seed);
 392         Cvar_RegisterVariable (&sv_ratelimitlocalplayer);
 393         Cvar_RegisterVariable (&sv_sound_land);
 394         Cvar_RegisterVariable (&sv_sound_watersplash);
 395         Cvar_RegisterVariable (&sv_stepheight);
 396         Cvar_RegisterVariable (&sv_stopspeed);
 397         Cvar_RegisterVariable (&sv_wallfriction);
 398         Cvar_RegisterVariable (&sv_wateraccelerate);
 399         Cvar_RegisterVariable (&sv_waterfriction);
 400         Cvar_RegisterVariable (&sys_ticrate);
 401         Cvar_RegisterVariable (&teamplay);
 402         Cvar_RegisterVariable (&timelimit);
 403
 404         Cvar_RegisterVariable (&saved1);
 405         Cvar_RegisterVariable (&saved2);
 406         Cvar_RegisterVariable (&saved3);
 407         Cvar_RegisterVariable (&saved4);
 408         Cvar_RegisterVariable (&savedgamecfg);
 409         Cvar_RegisterVariable (&scratch1);
 410         Cvar_RegisterVariable (&scratch2);
 411         Cvar_RegisterVariable (&scratch3);
 412         Cvar_RegisterVariable (&scratch4);
 413         Cvar_RegisterVariable (&temp1);
 414
 415         // LordHavoc: Nehahra uses these to pass data around cutscene demos
 416         if (gamemode == GAME_NEHAHRA)
 417         {
 418                 Cvar_RegisterVariable (&nehx00);
 419                 Cvar_RegisterVariable (&nehx01);
 420                 Cvar_RegisterVariable (&nehx02);
 421                 Cvar_RegisterVariable (&nehx03);
 422                 Cvar_RegisterVariable (&nehx04);
 423                 Cvar_RegisterVariable (&nehx05);
 424                 Cvar_RegisterVariable (&nehx06);
 425                 Cvar_RegisterVariable (&nehx07);
 426                 Cvar_RegisterVariable (&nehx08);
 427                 Cvar_RegisterVariable (&nehx09);
 428                 Cvar_RegisterVariable (&nehx10);
 429                 Cvar_RegisterVariable (&nehx11);
 430                 Cvar_RegisterVariable (&nehx12);
 431                 Cvar_RegisterVariable (&nehx13);
 432                 Cvar_RegisterVariable (&nehx14);
 433                 Cvar_RegisterVariable (&nehx15);
 434                 Cvar_RegisterVariable (&nehx16);
 435                 Cvar_RegisterVariable (&nehx17);
 436                 Cvar_RegisterVariable (&nehx18);
 437                 Cvar_RegisterVariable (&nehx19);
 438         }
 439         Cvar_RegisterVariable (&cutscene); // for Nehahra but useful to other mods as well
 440
 441         Cvar_RegisterVariable (&sv_autodemo_perclient);
 442         Cvar_RegisterVariable (&sv_autodemo_perclient_nameformat);
 443
 444         Cvar_RegisterVariable (&halflifebsp);
 445
 446         // any special defaults for gamemodes go here
 447         if (gamemode == GAME_NEHAHRA)
 448         {
 449                 // Nehahra pushable crates malfunction in some levels if this is on
 450                 Cvar_SetValueQuick (&sv_gameplayfix_upwardvelocityclearsongroundflag, 0);
 451                 // Nehahra NPC AI is confused by this feature
 452                 Cvar_SetValueQuick (&sv_gameplayfix_blowupfallenzombies, 0);
 453         }
 454         if (gamemode == GAME_HIPNOTIC)
 455         {
 456                 // hipnotic mission pack has issues in their 'friendly monster' ai, which seem to attempt to attack themselves for some reason when findradius() returns non-solid entities.
 457                 Cvar_SetValueQuick (&sv_gameplayfix_blowupfallenzombies, 0);
 458                 // hipnotic mission pack has issues with bobbing water entities 'jittering' between different heights on alternate frames at the default 0.0138889 ticrate, 0.02 avoids this issue
 459                 Cvar_SetValueQuick (&sys_ticrate, 0.02);
 460         }
 461         if (gamemode == GAME_ROGUE)
 462         {
 463                 // rogue mission pack has a guardian boss that does not wake up if findradius returns one of the entities around its spawn area
 464                 Cvar_SetValueQuick (&sv_gameplayfix_findradiusdistancetobox, 0);
 465         }
 466
 467         sv_mempool = Mem_AllocPool("server", 0, NULL);
 468 }
 469
 470 static void SV_SaveEntFile_f(void)
 471 {
 472         char basename[MAX_QPATH];
 473         if (!sv.active || !sv.worldmodel)
 474         {
 475                 Con_Print("Not running a server\n");
 476                 return;
 477         }
 478         FS_StripExtension(sv.worldmodel->name, basename, sizeof(basename));
 479         FS_WriteFile(va("%s.ent", basename), sv.worldmodel->brush.entities, (fs_offset_t)strlen(sv.worldmodel->brush.entities));
 480 }
 481
 482
 483 /*
 484 =============================================================================
 485
 486 EVENT MESSAGES
 487
 488 =============================================================================
 489 */
 490
 491 /*
 492 ==================
 493 SV_StartParticle
 494
 495 Make sure the event gets sent to all clients
 496 ==================
 497 */
 498 void SV_StartParticle (vec3_t org, vec3_t dir, int color, int count)
 499 {
 500         int i;
 501
 502         if (sv.datagram.cursize > MAX_PACKETFRAGMENT-18)
 503                 return;
 504         MSG_WriteByte (&sv.datagram, svc_particle);
 505         MSG_WriteCoord (&sv.datagram, org[0], sv.protocol);
 506         MSG_WriteCoord (&sv.datagram, org[1], sv.protocol);
 507         MSG_WriteCoord (&sv.datagram, org[2], sv.protocol);
 508         for (i=0 ; i<3 ; i++)
 509                 MSG_WriteChar (&sv.datagram, (int)bound(-128, dir[i]*16, 127));
 510         MSG_WriteByte (&sv.datagram, count);
 511         MSG_WriteByte (&sv.datagram, color);
 512         SV_FlushBroadcastMessages();
 513 }
 514
 515 /*
 516 ==================
 517 SV_StartEffect
 518
 519 Make sure the event gets sent to all clients
 520 ==================
 521 */
 522 void SV_StartEffect (vec3_t org, int modelindex, int startframe, int framecount, int framerate)
 523 {
 524         if (modelindex >= 256 || startframe >= 256)
 525         {
 526                 if (sv.datagram.cursize > MAX_PACKETFRAGMENT-19)
 527                         return;
 528                 MSG_WriteByte (&sv.datagram, svc_effect2);
 529                 MSG_WriteCoord (&sv.datagram, org[0], sv.protocol);
 530                 MSG_WriteCoord (&sv.datagram, org[1], sv.protocol);
 531                 MSG_WriteCoord (&sv.datagram, org[2], sv.protocol);
 532                 MSG_WriteShort (&sv.datagram, modelindex);
 533                 MSG_WriteShort (&sv.datagram, startframe);
 534                 MSG_WriteByte (&sv.datagram, framecount);
 535                 MSG_WriteByte (&sv.datagram, framerate);
 536         }
 537         else
 538         {
 539                 if (sv.datagram.cursize > MAX_PACKETFRAGMENT-17)
 540                         return;
 541                 MSG_WriteByte (&sv.datagram, svc_effect);
 542                 MSG_WriteCoord (&sv.datagram, org[0], sv.protocol);
 543                 MSG_WriteCoord (&sv.datagram, org[1], sv.protocol);
 544                 MSG_WriteCoord (&sv.datagram, org[2], sv.protocol);
 545                 MSG_WriteByte (&sv.datagram, modelindex);
 546                 MSG_WriteByte (&sv.datagram, startframe);
 547                 MSG_WriteByte (&sv.datagram, framecount);
 548                 MSG_WriteByte (&sv.datagram, framerate);
 549         }
 550         SV_FlushBroadcastMessages();
 551 }
 552
 553 /*
 554 ==================
 555 SV_StartSound
 556
 557 Each entity can have eight independant sound sources, like voice,
 558 weapon, feet, etc.
 559
 560 Channel 0 is an auto-allocate channel, the others override anything
 561 already running on that entity/channel pair.
 562
 563 An attenuation of 0 will play full volume everywhere in the level.
 564 Larger attenuations will drop off.  (max 4 attenuation)
 565
 566 ==================
 567 */
 568 void SV_StartSound (prvm_edict_t *entity, int channel, const char *sample, int volume, float attenuation)
 569 {
 570         int sound_num, field_mask, i, ent;
 571
 572         if (volume < 0 || volume > 255)
 573         {
 574                 Con_Printf ("SV_StartSound: volume = %i\n", volume);
 575                 return;
 576         }
 577
 578         if (attenuation < 0 || attenuation > 4)
 579         {
 580                 Con_Printf ("SV_StartSound: attenuation = %f\n", attenuation);
 581                 return;
 582         }
 583
 584         if (channel < 0 || channel > 7)
 585         {
 586                 Con_Printf ("SV_StartSound: channel = %i\n", channel);
 587                 return;
 588         }
 589
 590         if (sv.datagram.cursize > MAX_PACKETFRAGMENT-21)
 591                 return;
 592
 593 // find precache number for sound
 594         sound_num = SV_SoundIndex(sample, 1);
 595         if (!sound_num)
 596                 return;
 597
 598         ent = PRVM_NUM_FOR_EDICT(entity);
 599
 600         field_mask = 0;
 601         if (volume != DEFAULT_SOUND_PACKET_VOLUME)
 602                 field_mask |= SND_VOLUME;
 603         if (attenuation != DEFAULT_SOUND_PACKET_ATTENUATION)
 604                 field_mask |= SND_ATTENUATION;
 605         if (ent >= 8192)
 606                 field_mask |= SND_LARGEENTITY;
 607         if (sound_num >= 256 || channel >= 8)
 608                 field_mask |= SND_LARGESOUND;
 609
 610 // directed messages go only to the entity they are targeted on
 611         MSG_WriteByte (&sv.datagram, svc_sound);
 612         MSG_WriteByte (&sv.datagram, field_mask);
 613         if (field_mask & SND_VOLUME)
 614                 MSG_WriteByte (&sv.datagram, volume);
 615         if (field_mask & SND_ATTENUATION)
 616                 MSG_WriteByte (&sv.datagram, (int)(attenuation*64));
 617         if (field_mask & SND_LARGEENTITY)
 618         {
 619                 MSG_WriteShort (&sv.datagram, ent);
 620                 MSG_WriteByte (&sv.datagram, channel);
 621         }
 622         else
 623                 MSG_WriteShort (&sv.datagram, (ent<<3) | channel);
 624         if ((field_mask & SND_LARGESOUND) || sv.protocol == PROTOCOL_NEHAHRABJP2)
 625                 MSG_WriteShort (&sv.datagram, sound_num);
 626         else
 627                 MSG_WriteByte (&sv.datagram, sound_num);
 628         for (i = 0;i < 3;i++)
 629                 MSG_WriteCoord (&sv.datagram, entity->fields.server->origin[i]+0.5*(entity->fields.server->mins[i]+entity->fields.server->maxs[i]), sv.protocol);
 630         SV_FlushBroadcastMessages();
 631 }
 632
 633 /*
 634 ==================
 635 SV_StartPointSound
 636
 637 Nearly the same logic as SV_StartSound, except an origin
 638 instead of an entity is provided and channel is omitted.
 639
 640 The entity sent to the client is 0 (world) and the channel
 641 is 0 (CHAN_AUTO).  SND_LARGEENTITY will never occur in this
 642 function, therefore the check for it is omitted.
 643
 644 ==================
 645 */
 646 void SV_StartPointSound (vec3_t origin, const char *sample, int volume, float attenuation)
 647 {
 648         int sound_num, field_mask, i;
 649
 650         if (volume < 0 || volume > 255)
 651         {
 652                 Con_Printf ("SV_StartPointSound: volume = %i\n", volume);
 653                 return;
 654         }
 655
 656         if (attenuation < 0 || attenuation > 4)
 657         {
 658                 Con_Printf ("SV_StartPointSound: attenuation = %f\n", attenuation);
 659                 return;
 660         }
 661
 662         if (sv.datagram.cursize > MAX_PACKETFRAGMENT-21)
 663                 return;
 664
 665         // find precache number for sound
 666         sound_num = SV_SoundIndex(sample, 1);
 667         if (!sound_num)
 668                 return;
 669
 670         field_mask = 0;
 671         if (volume != DEFAULT_SOUND_PACKET_VOLUME)
 672                 field_mask |= SND_VOLUME;
 673         if (attenuation != DEFAULT_SOUND_PACKET_ATTENUATION)
 674                 field_mask |= SND_ATTENUATION;
 675         if (sound_num >= 256)
 676                 field_mask |= SND_LARGESOUND;
 677
 678 // directed messages go only to the entity they are targeted on
 679         MSG_WriteByte (&sv.datagram, svc_sound);
 680         MSG_WriteByte (&sv.datagram, field_mask);
 681         if (field_mask & SND_VOLUME)
 682                 MSG_WriteByte (&sv.datagram, volume);
 683         if (field_mask & SND_ATTENUATION)
 684                 MSG_WriteByte (&sv.datagram, (int)(attenuation*64));
 685         // Always write entnum 0 for the world entity
 686         MSG_WriteShort (&sv.datagram, (0<<3) | 0);
 687         if (field_mask & SND_LARGESOUND)
 688                 MSG_WriteShort (&sv.datagram, sound_num);
 689         else
 690                 MSG_WriteByte (&sv.datagram, sound_num);
 691         for (i = 0;i < 3;i++)
 692                 MSG_WriteCoord (&sv.datagram, origin[i], sv.protocol);
 693         SV_FlushBroadcastMessages();
 694 }
 695
 696 /*
 697 ==============================================================================
 698
 699 CLIENT SPAWNING
 700
 701 ==============================================================================
 702 */
 703
 704 /*
 705 ================
 706 SV_SendServerinfo
 707
 708 Sends the first message from the server to a connected client.
 709 This will be sent on the initial connection and upon each server load.
 710 ================
 711 */
 712 void SV_SendServerinfo (client_t *client)
 713 {
 714         int i;
 715         char message[128];
 716
 717         // we know that this client has a netconnection and thus is not a bot
 718
 719         // edicts get reallocated on level changes, so we need to update it here
 720         client->edict = PRVM_EDICT_NUM((client - svs.clients) + 1);
 721
 722         // clear cached stuff that depends on the level
 723         client->weaponmodel[0] = 0;
 724         client->weaponmodelindex = 0;
 725
 726         // LordHavoc: clear entityframe tracking
 727         client->latestframenum = 0;
 728
 729         // initialize the movetime, so a speedhack can't make use of the time before this client joined
 730         client->cmd.time = sv.time;
 731
 732         if (client->entitydatabase)
 733                 EntityFrame_FreeDatabase(client->entitydatabase);
 734         if (client->entitydatabase4)
 735                 EntityFrame4_FreeDatabase(client->entitydatabase4);
 736         if (client->entitydatabase5)
 737                 EntityFrame5_FreeDatabase(client->entitydatabase5);
 738
 739         memset(client->stats, 0, sizeof(client->stats));
 740         memset(client->statsdeltabits, 0, sizeof(client->statsdeltabits));
 741
 742         if (sv.protocol != PROTOCOL_QUAKE && sv.protocol != PROTOCOL_QUAKEDP && sv.protocol != PROTOCOL_NEHAHRAMOVIE && sv.protocol != PROTOCOL_NEHAHRABJP && sv.protocol != PROTOCOL_NEHAHRABJP2 && sv.protocol != PROTOCOL_NEHAHRABJP3)
 743         {
 744                 if (sv.protocol == PROTOCOL_DARKPLACES1 || sv.protocol == PROTOCOL_DARKPLACES2 || sv.protocol == PROTOCOL_DARKPLACES3)
 745                         client->entitydatabase = EntityFrame_AllocDatabase(sv_mempool);
 746                 else if (sv.protocol == PROTOCOL_DARKPLACES4)
 747                         client->entitydatabase4 = EntityFrame4_AllocDatabase(sv_mempool);
 748                 else
 749                         client->entitydatabase5 = EntityFrame5_AllocDatabase(sv_mempool);
 750         }
 751
 752         // reset csqc entity versions
 753         for (i = 0;i < prog->max_edicts;i++)
 754         {
 755                 client->csqcentityscope[i] = 0;
 756                 client->csqcentitysendflags[i] = 0xFFFFFF;
 757                 client->csqcentityglobalhistory[i] = 0;
 758         }
 759         for (i = 0;i < NUM_CSQCENTITYDB_FRAMES;i++)
 760         {
 761                 client->csqcentityframehistory[i].num = 0;
 762                 client->csqcentityframehistory[i].framenum = -1;
 763         }
 764         client->csqcnumedicts = 0;
 765         client->csqcentityframehistory_next = 0;
 766
 767         SZ_Clear (&client->netconnection->message);
 768         MSG_WriteByte (&client->netconnection->message, svc_print);
 769         dpsnprintf (message, sizeof (message), "\nServer: %s build %s (progs %i crc)", gamename, buildstring, prog->filecrc);
 770         MSG_WriteString (&client->netconnection->message,message);
 771
 772         SV_StopDemoRecording(client); // to split up demos into different files
 773         if(sv_autodemo_perclient.integer && client->netconnection)
 774         {
 775                 char demofile[MAX_OSPATH];
 776                 char levelname[MAX_QPATH];
 777                 char ipaddress[MAX_QPATH];
 778                 size_t i;
 779
 780                 // start a new demo file
 781                 strlcpy(levelname, FS_FileWithoutPath(sv.worldmodel->name), sizeof(levelname));
 782                 if (strrchr(levelname, '.'))
 783                         *(strrchr(levelname, '.')) = 0;
 784
 785                 LHNETADDRESS_ToString(&(client->netconnection->peeraddress), ipaddress, sizeof(ipaddress), true);
 786                 for(i = 0; ipaddress[i]; ++i)
 787                         if(!isalnum(ipaddress[i]))
 788                                 ipaddress[i] = '-';
 789                 dpsnprintf (demofile, sizeof(demofile), "%s_%s_%d_%s.dem", Sys_TimeString (sv_autodemo_perclient_nameformat.string), levelname, PRVM_NUM_FOR_EDICT(client->edict), ipaddress);
 790
 791                 SV_StartDemoRecording(client, demofile, -1);
 792         }
 793
 794         //[515]: init csprogs according to version of svprogs, check the crc, etc.
 795         if (sv.csqc_progname[0])
 796         {
 797                 prvm_eval_t *val;
 798                 Con_DPrintf("sending csqc info to client (\"%s\" with size %i and crc %i)\n", sv.csqc_progname, sv.csqc_progsize, sv.csqc_progcrc);
 799                 MSG_WriteByte (&client->netconnection->message, svc_stufftext);
 800                 MSG_WriteString (&client->netconnection->message, va("csqc_progname %s\n", sv.csqc_progname));
 801                 MSG_WriteByte (&client->netconnection->message, svc_stufftext);
 802                 MSG_WriteString (&client->netconnection->message, va("csqc_progsize %i\n", sv.csqc_progsize));
 803                 MSG_WriteByte (&client->netconnection->message, svc_stufftext);
 804                 MSG_WriteString (&client->netconnection->message, va("csqc_progcrc %i\n", sv.csqc_progcrc));
 805
 806                 if(client->sv_demo_file != NULL)
 807                 {
 808                         int i;
 809                         char buf[NET_MAXMESSAGE];
 810                         sizebuf_t sb;
 811
 812                         sb.data = (unsigned char *) buf;
 813                         sb.maxsize = sizeof(buf);
 814                         i = 0;
 815                         while(MakeDownloadPacket(sv.csqc_progname, svs.csqc_progdata, sv.csqc_progsize, sv.csqc_progcrc, i++, &sb, sv.protocol))
 816                                 SV_WriteDemoMessage(client, &sb, false);
 817                 }
 818
 819                 //[515]: init stufftext string (it is sent before svc_serverinfo)
 820                 val = PRVM_GLOBALFIELDVALUE(prog->globaloffsets.SV_InitCmd);
 821                 if (val)
 822                 {
 823                         MSG_WriteByte (&client->netconnection->message, svc_stufftext);
 824                         MSG_WriteString (&client->netconnection->message, va("%s\n", PRVM_GetString(val->string)));
 825                 }
 826         }
 827
 828         //if (sv_allowdownloads.integer)
 829         // always send the info that the server supports the protocol, even if downloads are forbidden
 830         // only because of that, the CSQC exception can work
 831         {
 832                 MSG_WriteByte (&client->netconnection->message, svc_stufftext);
 833                 MSG_WriteString (&client->netconnection->message, "cl_serverextension_download 2\n");
 834         }
 835
 836         // send at this time so it's guaranteed to get executed at the right time
 837         {
 838                 client_t *save;
 839                 save = host_client;
 840                 host_client = client;
 841                 Curl_SendRequirements();
 842                 host_client = save;
 843         }
 844
 845         MSG_WriteByte (&client->netconnection->message, svc_serverinfo);
 846         MSG_WriteLong (&client->netconnection->message, Protocol_NumberForEnum(sv.protocol));
 847         MSG_WriteByte (&client->netconnection->message, svs.maxclients);
 848
 849         if (!coop.integer && deathmatch.integer)
 850                 MSG_WriteByte (&client->netconnection->message, GAME_DEATHMATCH);
 851         else
 852                 MSG_WriteByte (&client->netconnection->message, GAME_COOP);
 853
 854         MSG_WriteString (&client->netconnection->message,PRVM_GetString(prog->edicts->fields.server->message));
 855
 856         for (i = 1;i < MAX_MODELS && sv.model_precache[i][0];i++)
 857                 MSG_WriteString (&client->netconnection->message, sv.model_precache[i]);
 858         MSG_WriteByte (&client->netconnection->message, 0);
 859
 860         for (i = 1;i < MAX_SOUNDS && sv.sound_precache[i][0];i++)
 861                 MSG_WriteString (&client->netconnection->message, sv.sound_precache[i]);
 862         MSG_WriteByte (&client->netconnection->message, 0);
 863
 864 // send music
 865         MSG_WriteByte (&client->netconnection->message, svc_cdtrack);
 866         MSG_WriteByte (&client->netconnection->message, (int)prog->edicts->fields.server->sounds);
 867         MSG_WriteByte (&client->netconnection->message, (int)prog->edicts->fields.server->sounds);
 868
 869 // set view
 870 // store this in clientcamera, too
 871         client->clientcamera = PRVM_NUM_FOR_EDICT(client->edict);
 872         MSG_WriteByte (&client->netconnection->message, svc_setview);
 873         MSG_WriteShort (&client->netconnection->message, client->clientcamera);
 874
 875         MSG_WriteByte (&client->netconnection->message, svc_signonnum);
 876         MSG_WriteByte (&client->netconnection->message, 1);
 877
 878         client->spawned = false;                // need prespawn, spawn, etc
 879         client->sendsignon = 1;                 // send this message, and increment to 2, 2 will be set to 0 by the prespawn command
 880
 881         // clear movement info until client enters the new level properly
 882         memset(&client->cmd, 0, sizeof(client->cmd));
 883         client->movesequence = 0;
 884 #ifdef NUM_PING_TIMES
 885         for (i = 0;i < NUM_PING_TIMES;i++)
 886                 client->ping_times[i] = 0;
 887         client->num_pings = 0;
 888 #endif
 889         client->ping = 0;
 890
 891         // allow the client some time to send his keepalives, even if map loading took ages
 892         client->netconnection->timeout = realtime + net_connecttimeout.value;
 893 }
 894
 895 /*
 896 ================
 897 SV_ConnectClient
 898
 899 Initializes a client_t for a new net connection.  This will only be called
 900 once for a player each game, not once for each level change.
 901 ================
 902 */
 903 void SV_ConnectClient (int clientnum, netconn_t *netconnection)
 904 {
 905         client_t                *client;
 906         int                             i;
 907         float                   spawn_parms[NUM_SPAWN_PARMS];
 908
 909         client = svs.clients + clientnum;
 910
 911 // set up the client_t
 912         if (sv.loadgame)
 913                 memcpy (spawn_parms, client->spawn_parms, sizeof(spawn_parms));
 914         memset (client, 0, sizeof(*client));
 915         client->active = true;
 916         client->netconnection = netconnection;
 917
 918         Con_DPrintf("Client %s connected\n", client->netconnection ? client->netconnection->address : "botclient");
 919
 920         strlcpy(client->name, "unconnected", sizeof(client->name));
 921         strlcpy(client->old_name, "unconnected", sizeof(client->old_name));
 922         client->spawned = false;
 923         client->edict = PRVM_EDICT_NUM(clientnum+1);
 924         if (client->netconnection)
 925                 client->netconnection->message.allowoverflow = true;            // we can catch it
 926         // prepare the unreliable message buffer
 927         client->unreliablemsg.data = client->unreliablemsg_data;
 928         client->unreliablemsg.maxsize = sizeof(client->unreliablemsg_data);
 929         // updated by receiving "rate" command from client, this is also the default if not using a DP client
 930         client->rate = 1000000000;
 931         // no limits for local player
 932         if (client->netconnection && LHNETADDRESS_GetAddressType(&client->netconnection->peeraddress) == LHNETADDRESSTYPE_LOOP)
 933                 client->rate = 1000000000;
 934         client->connecttime = realtime;
 935
 936         if (sv.loadgame)
 937                 memcpy (client->spawn_parms, spawn_parms, sizeof(spawn_parms));
 938         else
 939         {
 940                 // call the progs to get default spawn parms for the new client
 941                 // set self to world to intentionally cause errors with broken SetNewParms code in some mods
 942                 prog->globals.server->self = 0;
 943                 PRVM_ExecuteProgram (prog->globals.server->SetNewParms, "QC function SetNewParms is missing");
 944                 for (i=0 ; i<NUM_SPAWN_PARMS ; i++)
 945                         client->spawn_parms[i] = (&prog->globals.server->parm1)[i];
 946
 947                 // set up the entity for this client (including .colormap, .team, etc)
 948                 PRVM_ED_ClearEdict(client->edict);
 949         }
 950
 951         // don't call SendServerinfo for a fresh botclient because its fields have
 952         // not been set up by the qc yet
 953         if (client->netconnection)
 954                 SV_SendServerinfo (client);
 955         else
 956                 client->spawned = true;
 957 }
 958
 959
 960 /*
 961 ===============================================================================
 962
 963 FRAME UPDATES
 964
 965 ===============================================================================
 966 */
 967
 968 /*
 969 =============================================================================
 970
 971 The PVS must include a small area around the client to allow head bobbing
 972 or other small motion on the client side.  Otherwise, a bob might cause an
 973 entity that should be visible to not show up, especially when the bob
 974 crosses a waterline.
 975
 976 =============================================================================
 977 */
 978
 979 static qboolean SV_PrepareEntityForSending (prvm_edict_t *ent, entity_state_t *cs, int enumber)
 980 {
 981         int i;
 982         unsigned int sendflags;
 983         unsigned int version;
 984         unsigned int modelindex, effects, flags, glowsize, lightstyle, lightpflags, light[4], specialvisibilityradius;
 985         unsigned int customizeentityforclient;
 986         float f;
 987         vec3_t cullmins, cullmaxs;
 988         dp_model_t *model;
 989         prvm_eval_t *val, *val2;
 990
 991         // this 2 billion unit check is actually to detect NAN origins
 992         // (we really don't want to send those)
 993         if (!(VectorLength2(ent->fields.server->origin) < 2000000000.0*2000000000.0))
 994                 return false;
 995
 996         // EF_NODRAW prevents sending for any reason except for your own
 997         // client, so we must keep all clients in this superset
 998         effects = (unsigned)ent->fields.server->effects;
 999
1000         // we can omit invisible entities with no effects that are not clients
1001         // LordHavoc: this could kill tags attached to an invisible entity, I
1002         // just hope we never have to support that case
1003         i = (int)ent->fields.server->modelindex;
1004         modelindex = (i >= 1 && i < MAX_MODELS && ent->fields.server->model && *PRVM_GetString(ent->fields.server->model)) ? i : 0;
1005
1006         flags = 0;
1007         i = (int)(PRVM_EDICTFIELDVALUE(ent, prog->fieldoffsets.glow_size)->_float * 0.25f);
1008         glowsize = (unsigned char)bound(0, i, 255);
1009         if (PRVM_EDICTFIELDVALUE(ent, prog->fieldoffsets.glow_trail)->_float)
1010                 flags |= RENDER_GLOWTRAIL;
1011         if (PRVM_EDICTFIELDVALUE(ent, prog->fieldoffsets.viewmodelforclient)->edict)
1012                 flags |= RENDER_VIEWMODEL;
1013
1014         f = PRVM_EDICTFIELDVALUE(ent, prog->fieldoffsets.color)->vector[0]*256;
1015         light[0] = (unsigned short)bound(0, f, 65535);
1016         f = PRVM_EDICTFIELDVALUE(ent, prog->fieldoffsets.color)->vector[1]*256;
1017         light[1] = (unsigned short)bound(0, f, 65535);
1018         f = PRVM_EDICTFIELDVALUE(ent, prog->fieldoffsets.color)->vector[2]*256;
1019         light[2] = (unsigned short)bound(0, f, 65535);
1020         f = PRVM_EDICTFIELDVALUE(ent, prog->fieldoffsets.light_lev)->_float;
1021         light[3] = (unsigned short)bound(0, f, 65535);
1022         lightstyle = (unsigned char)PRVM_EDICTFIELDVALUE(ent, prog->fieldoffsets.style)->_float;
1023         lightpflags = (unsigned char)PRVM_EDICTFIELDVALUE(ent, prog->fieldoffsets.pflags)->_float;
1024
1025         if (gamemode == GAME_TENEBRAE)
1026         {
1027                 // tenebrae's EF_FULLDYNAMIC conflicts with Q2's EF_NODRAW
1028                 if (effects & 16)
1029                 {
1030                         effects &= ~16;
1031                         lightpflags |= PFLAGS_FULLDYNAMIC;
1032                 }
1033                 // tenebrae's EF_GREEN conflicts with DP's EF_ADDITIVE
1034                 if (effects & 32)
1035                 {
1036                         effects &= ~32;
1037                         light[0] = (int)(0.2*256);
1038                         light[1] = (int)(1.0*256);
1039                         light[2] = (int)(0.2*256);
1040                         light[3] = 200;
1041                         lightpflags |= PFLAGS_FULLDYNAMIC;
1042                 }
1043         }
1044
1045         specialvisibilityradius = 0;
1046         if (lightpflags & PFLAGS_FULLDYNAMIC)
1047                 specialvisibilityradius = max(specialvisibilityradius, light[3]);
1048         if (glowsize)
1049                 specialvisibilityradius = max(specialvisibilityradius, glowsize * 4);
1050         if (flags & RENDER_GLOWTRAIL)
1051                 specialvisibilityradius = max(specialvisibilityradius, 100);
1052         if (effects & (EF_BRIGHTFIELD | EF_MUZZLEFLASH | EF_BRIGHTLIGHT | EF_DIMLIGHT | EF_RED | EF_BLUE | EF_FLAME | EF_STARDUST))
1053         {
1054                 if (effects & EF_BRIGHTFIELD)
1055                         specialvisibilityradius = max(specialvisibilityradius, 80);
1056                 if (effects & EF_MUZZLEFLASH)
1057                         specialvisibilityradius = max(specialvisibilityradius, 100);
1058                 if (effects & EF_BRIGHTLIGHT)
1059                         specialvisibilityradius = max(specialvisibilityradius, 400);
1060                 if (effects & EF_DIMLIGHT)
1061                         specialvisibilityradius = max(specialvisibilityradius, 200);
1062                 if (effects & EF_RED)
1063                         specialvisibilityradius = max(specialvisibilityradius, 200);
1064                 if (effects & EF_BLUE)
1065                         specialvisibilityradius = max(specialvisibilityradius, 200);
1066                 if (effects & EF_FLAME)
1067                         specialvisibilityradius = max(specialvisibilityradius, 250);
1068                 if (effects & EF_STARDUST)
1069                         specialvisibilityradius = max(specialvisibilityradius, 100);
1070         }
1071
1072         // early culling checks
1073         // (final culling is done by SV_MarkWriteEntityStateToClient)
1074         customizeentityforclient = PRVM_EDICTFIELDVALUE(ent, prog->fieldoffsets.customizeentityforclient)->function;
1075         if (!customizeentityforclient && enumber > svs.maxclients && (!modelindex && !specialvisibilityradius))
1076                 return false;
1077
1078         *cs = defaultstate;
1079         cs->active = true;
1080         cs->number = enumber;
1081         VectorCopy(ent->fields.server->origin, cs->origin);
1082         VectorCopy(ent->fields.server->angles, cs->angles);
1083         cs->flags = flags;
1084         cs->effects = effects;
1085         cs->colormap = (unsigned)ent->fields.server->colormap;
1086         cs->modelindex = modelindex;
1087         cs->skin = (unsigned)ent->fields.server->skin;
1088         cs->frame = (unsigned)ent->fields.server->frame;
1089         cs->viewmodelforclient = PRVM_EDICTFIELDVALUE(ent, prog->fieldoffsets.viewmodelforclient)->edict;
1090         cs->exteriormodelforclient = PRVM_EDICTFIELDVALUE(ent, prog->fieldoffsets.exteriormodeltoclient)->edict;
1091         cs->nodrawtoclient = PRVM_EDICTFIELDVALUE(ent, prog->fieldoffsets.nodrawtoclient)->edict;
1092         cs->drawonlytoclient = PRVM_EDICTFIELDVALUE(ent, prog->fieldoffsets.drawonlytoclient)->edict;
1093         cs->customizeentityforclient = customizeentityforclient;
1094         cs->tagentity = PRVM_EDICTFIELDVALUE(ent, prog->fieldoffsets.tag_entity)->edict;
1095         cs->tagindex = (unsigned char)PRVM_EDICTFIELDVALUE(ent, prog->fieldoffsets.tag_index)->_float;
1096         cs->glowsize = glowsize;
1097
1098         // don't need to init cs->colormod because the defaultstate did that for us
1099         //cs->colormod[0] = cs->colormod[1] = cs->colormod[2] = 32;
1100         val = PRVM_EDICTFIELDVALUE(ent, prog->fieldoffsets.colormod);
1101         if (val->vector[0] || val->vector[1] || val->vector[2])
1102         {
1103                 i = (int)(val->vector[0] * 32.0f);cs->colormod[0] = bound(0, i, 255);
1104                 i = (int)(val->vector[1] * 32.0f);cs->colormod[1] = bound(0, i, 255);
1105                 i = (int)(val->vector[2] * 32.0f);cs->colormod[2] = bound(0, i, 255);
1106         }
1107
1108         cs->modelindex = modelindex;
1109
1110         cs->alpha = 255;
1111         f = (PRVM_EDICTFIELDVALUE(ent, prog->fieldoffsets.alpha)->_float * 255.0f);
1112         if (f)
1113         {
1114                 i = (int)f;
1115                 cs->alpha = (unsigned char)bound(0, i, 255);
1116         }
1117         // halflife
1118         f = (PRVM_EDICTFIELDVALUE(ent, prog->fieldoffsets.renderamt)->_float);
1119         if (f)
1120         {
1121                 i = (int)f;
1122                 cs->alpha = (unsigned char)bound(0, i, 255);
1123         }
1124
1125         cs->scale = 16;
1126         f = (PRVM_EDICTFIELDVALUE(ent, prog->fieldoffsets.scale)->_float * 16.0f);
1127         if (f)
1128         {
1129                 i = (int)f;
1130                 cs->scale = (unsigned char)bound(0, i, 255);
1131         }
1132
1133         cs->glowcolor = 254;
1134         f = (PRVM_EDICTFIELDVALUE(ent, prog->fieldoffsets.glow_color)->_float);
1135         if (f)
1136                 cs->glowcolor = (int)f;
1137
1138         if (PRVM_EDICTFIELDVALUE(ent, prog->fieldoffsets.fullbright)->_float)
1139                 cs->effects |= EF_FULLBRIGHT;
1140
1141         val = PRVM_EDICTFIELDVALUE(ent, prog->fieldoffsets.modelflags);
1142         if (val && val->_float)
1143                 cs->effects |= ((unsigned int)val->_float & 0xff) << 24;
1144
1145         if (ent->fields.server->movetype == MOVETYPE_STEP)
1146                 cs->flags |= RENDER_STEP;
1147         if (cs->number != sv.writeentitiestoclient_cliententitynumber && (cs->effects & EF_LOWPRECISION) && cs->origin[0] >= -32768 && cs->origin[1] >= -32768 && cs->origin[2] >= -32768 && cs->origin[0] <= 32767 && cs->origin[1] <= 32767 && cs->origin[2] <= 32767)
1148                 cs->flags |= RENDER_LOWPRECISION;
1149         if (ent->fields.server->colormap >= 1024)
1150                 cs->flags |= RENDER_COLORMAPPED;
1151         if (cs->viewmodelforclient)
1152                 cs->flags |= RENDER_VIEWMODEL; // show relative to the view
1153
1154         cs->light[0] = light[0];
1155         cs->light[1] = light[1];
1156         cs->light[2] = light[2];
1157         cs->light[3] = light[3];
1158         cs->lightstyle = lightstyle;
1159         cs->lightpflags = lightpflags;
1160
1161         cs->specialvisibilityradius = specialvisibilityradius;
1162
1163         // calculate the visible box of this entity (don't use the physics box
1164         // as that is often smaller than a model, and would not count
1165         // specialvisibilityradius)
1166         if ((model = sv.models[modelindex]) && (model->type != mod_null))
1167         {
1168                 float scale = cs->scale * (1.0f / 16.0f);
1169                 if (cs->angles[0] || cs->angles[2]) // pitch and roll
1170                 {
1171                         VectorMA(cs->origin, scale, model->rotatedmins, cullmins);
1172                         VectorMA(cs->origin, scale, model->rotatedmaxs, cullmaxs);
1173                 }
1174                 else if (cs->angles[1])
1175                 {
1176                         VectorMA(cs->origin, scale, model->yawmins, cullmins);
1177                         VectorMA(cs->origin, scale, model->yawmaxs, cullmaxs);
1178                 }
1179                 else
1180                 {
1181                         VectorMA(cs->origin, scale, model->normalmins, cullmins);
1182                         VectorMA(cs->origin, scale, model->normalmaxs, cullmaxs);
1183                 }
1184         }
1185         else
1186         {
1187                 // if there is no model (or it could not be loaded), use the physics box
1188                 VectorAdd(cs->origin, ent->fields.server->mins, cullmins);
1189                 VectorAdd(cs->origin, ent->fields.server->maxs, cullmaxs);
1190         }
1191         if (specialvisibilityradius)
1192         {
1193                 cullmins[0] = min(cullmins[0], cs->origin[0] - specialvisibilityradius);
1194                 cullmins[1] = min(cullmins[1], cs->origin[1] - specialvisibilityradius);
1195                 cullmins[2] = min(cullmins[2], cs->origin[2] - specialvisibilityradius);
1196                 cullmaxs[0] = max(cullmaxs[0], cs->origin[0] + specialvisibilityradius);
1197                 cullmaxs[1] = max(cullmaxs[1], cs->origin[1] + specialvisibilityradius);
1198                 cullmaxs[2] = max(cullmaxs[2], cs->origin[2] + specialvisibilityradius);
1199         }
1200
1201         // calculate center of bbox for network prioritization purposes
1202         VectorMAM(0.5f, cullmins, 0.5f, cullmaxs, cs->netcenter);
1203
1204         // if culling box has moved, update pvs cluster links
1205         if (!VectorCompare(cullmins, ent->priv.server->cullmins) || !VectorCompare(cullmaxs, ent->priv.server->cullmaxs))
1206         {
1207                 VectorCopy(cullmins, ent->priv.server->cullmins);
1208                 VectorCopy(cullmaxs, ent->priv.server->cullmaxs);
1209                 // a value of -1 for pvs_numclusters indicates that the links are not
1210                 // cached, and should be re-tested each time, this is the case if the
1211                 // culling box touches too many pvs clusters to store, or if the world
1212                 // model does not support FindBoxClusters
1213                 ent->priv.server->pvs_numclusters = -1;
1214                 if (sv.worldmodel && sv.worldmodel->brush.FindBoxClusters)
1215                 {
1216                         i = sv.worldmodel->brush.FindBoxClusters(sv.worldmodel, cullmins, cullmaxs, MAX_ENTITYCLUSTERS, ent->priv.server->pvs_clusterlist);
1217                         if (i <= MAX_ENTITYCLUSTERS)
1218                                 ent->priv.server->pvs_numclusters = i;
1219                 }
1220         }
1221
1222         // we need to do some csqc entity upkeep here
1223         // get self.SendFlags and clear them
1224         // (to let the QC know that they've been read)
1225         val = PRVM_EDICTFIELDVALUE(ent, prog->fieldoffsets.SendEntity);
1226         if (val->function)
1227         {
1228                 val = PRVM_EDICTFIELDVALUE(ent, prog->fieldoffsets.SendFlags);
1229                 sendflags = (unsigned int)val->_float;
1230                 val->_float = 0;
1231                 // legacy self.Version system
1232                 val2 = PRVM_EDICTFIELDVALUE(ent, prog->fieldoffsets.Version);
1233                 if (val2->_float)
1234                 {
1235                         version = (unsigned int)val2->_float;
1236                         if (sv.csqcentityversion[enumber] != version)
1237                                 sendflags = 0xFFFFFF;
1238                         sv.csqcentityversion[enumber] = version;
1239                 }
1240                 // move sendflags into the per-client sendflags
1241                 if (sendflags)
1242                         for (i = 0;i < svs.maxclients;i++)
1243                                 svs.clients[i].csqcentitysendflags[enumber] |= sendflags;
1244         }
1245
1246         return true;
1247 }
1248
1249 void SV_PrepareEntitiesForSending(void)
1250 {
1251         int e;
1252         prvm_edict_t *ent;
1253         // send all entities that touch the pvs
1254         sv.numsendentities = 0;
1255         sv.sendentitiesindex[0] = NULL;
1256         memset(sv.sendentitiesindex, 0, prog->num_edicts * sizeof(*sv.sendentitiesindex));
1257         for (e = 1, ent = PRVM_NEXT_EDICT(prog->edicts);e < prog->num_edicts;e++, ent = PRVM_NEXT_EDICT(ent))
1258         {
1259                 if (!ent->priv.server->free && SV_PrepareEntityForSending(ent, sv.sendentities + sv.numsendentities, e))
1260                 {
1261                         sv.sendentitiesindex[e] = sv.sendentities + sv.numsendentities;
1262                         sv.numsendentities++;
1263                 }
1264         }
1265 }
1266
1267 void SV_MarkWriteEntityStateToClient(entity_state_t *s)
1268 {
1269         int isbmodel;
1270         dp_model_t *model;
1271         prvm_edict_t *ed;
1272         if (sv.sententitiesconsideration[s->number] == sv.sententitiesmark)
1273                 return;
1274         sv.sententitiesconsideration[s->number] = sv.sententitiesmark;
1275         sv.writeentitiestoclient_stats_totalentities++;
1276
1277         if (s->customizeentityforclient)
1278         {
1279                 prog->globals.server->self = s->number;
1280                 prog->globals.server->other = sv.writeentitiestoclient_cliententitynumber;
1281                 PRVM_ExecuteProgram(s->customizeentityforclient, "customizeentityforclient: NULL function");
1282                 if(!PRVM_G_FLOAT(OFS_RETURN) || !SV_PrepareEntityForSending(PRVM_EDICT_NUM(s->number), s, s->number))
1283                         return;
1284         }
1285
1286         // never reject player
1287         if (s->number != sv.writeentitiestoclient_cliententitynumber)
1288         {
1289                 // check various rejection conditions
1290                 if (s->nodrawtoclient == sv.writeentitiestoclient_cliententitynumber)
1291                         return;
1292                 if (s->drawonlytoclient && s->drawonlytoclient != sv.writeentitiestoclient_cliententitynumber)
1293                         return;
1294                 if (s->effects & EF_NODRAW)
1295                         return;
1296                 // LordHavoc: only send entities with a model or important effects
1297                 if (!s->modelindex && s->specialvisibilityradius == 0)
1298                         return;
1299
1300                 isbmodel = (model = sv.models[s->modelindex]) != NULL && model->name[0] == '*';
1301                 // viewmodels don't have visibility checking
1302                 if (s->viewmodelforclient)
1303                 {
1304                         if (s->viewmodelforclient != sv.writeentitiestoclient_cliententitynumber)
1305                                 return;
1306                 }
1307                 else if (s->tagentity)
1308                 {
1309                         // tag attached entities simply check their parent
1310                         if (!sv.sendentitiesindex[s->tagentity])
1311                                 return;
1312                         SV_MarkWriteEntityStateToClient(sv.sendentitiesindex[s->tagentity]);
1313                         if (sv.sententities[s->tagentity] != sv.sententitiesmark)
1314                                 return;
1315                 }
1316                 // always send world submodels in newer protocols because they don't
1317                 // generate much traffic (in old protocols they hog bandwidth)
1318                 // but only if sv_cullentities_nevercullbmodels is off
1319                 else if (!(s->effects & EF_NODEPTHTEST) && (!isbmodel || !sv_cullentities_nevercullbmodels.integer || sv.protocol == PROTOCOL_QUAKE || sv.protocol == PROTOCOL_QUAKEDP || sv.protocol == PROTOCOL_NEHAHRAMOVIE))
1320                 {
1321                         // entity has survived every check so far, check if visible
1322                         ed = PRVM_EDICT_NUM(s->number);
1323
1324                         // if not touching a visible leaf
1325                         if (sv_cullentities_pvs.integer && !r_novis.integer && sv.writeentitiestoclient_pvsbytes)
1326                         {
1327                                 if (ed->priv.server->pvs_numclusters < 0)
1328                                 {
1329                                         // entity too big for clusters list
1330                                         if (sv.worldmodel && sv.worldmodel->brush.BoxTouchingPVS && !sv.worldmodel->brush.BoxTouchingPVS(sv.worldmodel, sv.writeentitiestoclient_pvs, ed->priv.server->cullmins, ed->priv.server->cullmaxs))
1331                                         {
1332                                                 sv.writeentitiestoclient_stats_culled_pvs++;
1333                                                 return;
1334                                         }
1335                                 }
1336                                 else
1337                                 {
1338                                         int i;
1339                                         // check cached clusters list
1340                                         for (i = 0;i < ed->priv.server->pvs_numclusters;i++)
1341                                                 if (CHECKPVSBIT(sv.writeentitiestoclient_pvs, ed->priv.server->pvs_clusterlist[i]))
1342                                                         break;
1343                                         if (i == ed->priv.server->pvs_numclusters)
1344                                         {
1345                                                 sv.writeentitiestoclient_stats_culled_pvs++;
1346                                                 return;
1347                                         }
1348                                 }
1349                         }
1350
1351                         // or not seen by random tracelines
1352                         if (sv_cullentities_trace.integer && !isbmodel && sv.worldmodel->brush.TraceLineOfSight)
1353                         {
1354                                 int samples =
1355                                         s->number <= svs.maxclients
1356                                                 ? sv_cullentities_trace_samples_players.integer
1357                                                 :
1358                                         s->specialvisibilityradius
1359                                                 ? sv_cullentities_trace_samples_extra.integer
1360                                                 : sv_cullentities_trace_samples.integer;
1361                                 float enlarge = sv_cullentities_trace_enlarge.value;
1362
1363                                 qboolean visible = TRUE;
1364
1365                                 if(samples > 0)
1366                                 {
1367                                         do
1368                                         {
1369                                                 if(Mod_CanSeeBox_Trace(samples, enlarge, sv.worldmodel, sv.writeentitiestoclient_testeye, ed->priv.server->cullmins, ed->priv.server->cullmaxs))
1370                                                         break; // directly visible from the server's view
1371
1372                                                 if(sv_cullentities_trace_prediction.integer)
1373                                                 {
1374                                                         vec3_t predeye;
1375
1376                                                         // get player velocity
1377                                                         float predtime = bound(0, host_client->ping, 0.2); // / 2
1378                                                                 // sorry, no wallhacking by high ping please, and at 200ms
1379                                                                 // ping a FPS is annoying to play anyway and a player is
1380                                                                 // likely to have changed his direction
1381                                                         VectorMA(sv.writeentitiestoclient_testeye, predtime, host_client->edict->fields.server->velocity, predeye);
1382                                                         if(sv.worldmodel->brush.TraceLineOfSight(sv.worldmodel, sv.writeentitiestoclient_testeye, predeye)) // must be able to go there...
1383                                                         {
1384                                                                 if(Mod_CanSeeBox_Trace(samples, enlarge, sv.worldmodel, predeye, ed->priv.server->cullmins, ed->priv.server->cullmaxs))
1385                                                                         break; // directly visible from the predicted view
1386                                                         }
1387                                                         else
1388                                                         {
1389                                                                 //Con_DPrintf("Trying to walk into solid in a pingtime... not predicting for culling\n");
1390                                                         }
1391                                                 }
1392
1393                                                 // when we get here, we can't see the entity
1394                                                 visible = false;
1395                                         }
1396                                         while(0);
1397
1398                                         if(visible)
1399                                                 svs.clients[sv.writeentitiestoclient_clientnumber].visibletime[s->number] =
1400                                                         realtime + (
1401                                                                 s->number <= svs.maxclients
1402                                                                         ? sv_cullentities_trace_delay_players.value
1403                                                                         : sv_cullentities_trace_delay.value
1404                                                         );
1405                                         else if (realtime > svs.clients[sv.writeentitiestoclient_clientnumber].visibletime[s->number])
1406                                         {
1407                                                 sv.writeentitiestoclient_stats_culled_trace++;
1408                                                 return;
1409                                         }
1410                                 }
1411                         }
1412                 }
1413         }
1414
1415         // this just marks it for sending
1416         // FIXME: it would be more efficient to send here, but the entity
1417         // compressor isn't that flexible
1418         sv.writeentitiestoclient_stats_visibleentities++;
1419         sv.sententities[s->number] = sv.sententitiesmark;
1420 }
1421
1422 void SV_WriteEntitiesToClient(client_t *client, prvm_edict_t *clent, sizebuf_t *msg, int maxsize)
1423 {
1424         qboolean need_empty = false;
1425         int i, numsendstates;
1426         entity_state_t *s;
1427         prvm_edict_t *camera;
1428
1429         // if there isn't enough space to accomplish anything, skip it
1430         if (msg->cursize + 25 > maxsize)
1431                 return;
1432
1433         sv.writeentitiestoclient_msg = msg;
1434         sv.writeentitiestoclient_clientnumber = client - svs.clients;
1435
1436         sv.writeentitiestoclient_stats_culled_pvs = 0;
1437         sv.writeentitiestoclient_stats_culled_trace = 0;
1438         sv.writeentitiestoclient_stats_visibleentities = 0;
1439         sv.writeentitiestoclient_stats_totalentities = 0;
1440
1441 // find the client's PVS
1442         // the real place being tested from
1443         camera = PRVM_EDICT_NUM( client->clientcamera );
1444         VectorAdd(camera->fields.server->origin, clent->fields.server->view_ofs, sv.writeentitiestoclient_testeye);
1445         sv.writeentitiestoclient_pvsbytes = 0;
1446         if (sv.worldmodel && sv.worldmodel->brush.FatPVS)
1447                 sv.writeentitiestoclient_pvsbytes = sv.worldmodel->brush.FatPVS(sv.worldmodel, sv.writeentitiestoclient_testeye, 8, sv.writeentitiestoclient_pvs, sizeof(sv.writeentitiestoclient_pvs), false);
1448
1449         sv.writeentitiestoclient_cliententitynumber = PRVM_EDICT_TO_PROG(clent); // LordHavoc: for comparison purposes
1450
1451         sv.sententitiesmark++;
1452
1453         for (i = 0;i < sv.numsendentities;i++)
1454                 SV_MarkWriteEntityStateToClient(sv.sendentities + i);
1455
1456         numsendstates = 0;
1457         for (i = 0;i < sv.numsendentities;i++)
1458         {
1459                 if (sv.sententities[sv.sendentities[i].number] == sv.sententitiesmark)
1460                 {
1461                         s = &sv.writeentitiestoclient_sendstates[numsendstates++];
1462                         *s = sv.sendentities[i];
1463                         if (s->exteriormodelforclient && s->exteriormodelforclient == sv.writeentitiestoclient_cliententitynumber)
1464                                 s->flags |= RENDER_EXTERIORMODEL;
1465                 }
1466         }
1467
1468         if (sv_cullentities_stats.integer)
1469                 Con_Printf("client \"%s\" entities: %d total, %d visible, %d culled by: %d pvs %d trace\n", client->name, sv.writeentitiestoclient_stats_totalentities, sv.writeentitiestoclient_stats_visibleentities, sv.writeentitiestoclient_stats_culled_pvs + sv.writeentitiestoclient_stats_culled_trace, sv.writeentitiestoclient_stats_culled_pvs, sv.writeentitiestoclient_stats_culled_trace);
1470
1471         if(client->entitydatabase5)
1472                 need_empty = EntityFrameCSQC_WriteFrame(msg, maxsize, numsendstates, sv.writeentitiestoclient_sendstates, client->entitydatabase5->latestframenum + 1);
1473         else
1474                 EntityFrameCSQC_WriteFrame(msg, maxsize, numsendstates, sv.writeentitiestoclient_sendstates, 0);
1475
1476         if (client->entitydatabase5)
1477                 EntityFrame5_WriteFrame(msg, maxsize, client->entitydatabase5, numsendstates, sv.writeentitiestoclient_sendstates, client - svs.clients + 1, client->movesequence, need_empty);
1478         else if (client->entitydatabase4)
1479         {
1480                 EntityFrame4_WriteFrame(msg, maxsize, client->entitydatabase4, numsendstates, sv.writeentitiestoclient_sendstates);
1481                 Protocol_WriteStatsReliable();
1482         }
1483         else if (client->entitydatabase)
1484         {
1485                 EntityFrame_WriteFrame(msg, maxsize, client->entitydatabase, numsendstates, sv.writeentitiestoclient_sendstates, client - svs.clients + 1);
1486                 Protocol_WriteStatsReliable();
1487         }
1488         else
1489         {
1490                 EntityFrameQuake_WriteFrame(msg, maxsize, numsendstates, sv.writeentitiestoclient_sendstates);
1491                 Protocol_WriteStatsReliable();
1492         }
1493 }
1494
1495 /*
1496 =============
1497 SV_CleanupEnts
1498
1499 =============
1500 */
1501 static void SV_CleanupEnts (void)
1502 {
1503         int             e;
1504         prvm_edict_t    *ent;
1505
1506         ent = PRVM_NEXT_EDICT(prog->edicts);
1507         for (e=1 ; e<prog->num_edicts ; e++, ent = PRVM_NEXT_EDICT(ent))
1508                 ent->fields.server->effects = (int)ent->fields.server->effects & ~EF_MUZZLEFLASH;
1509 }
1510
1511 /*
1512 ==================
1513 SV_WriteClientdataToMessage
1514
1515 ==================
1516 */
1517 void SV_WriteClientdataToMessage (client_t *client, prvm_edict_t *ent, sizebuf_t *msg, int *stats)
1518 {
1519         int             bits;
1520         int             i;
1521         prvm_edict_t    *other;
1522         int             items;
1523         prvm_eval_t     *val;
1524         vec3_t  punchvector;
1525         int             viewzoom;
1526         const char *s;
1527         float   *statsf = (float *)stats;
1528
1529 //
1530 // send a damage message
1531 //
1532         if (ent->fields.server->dmg_take || ent->fields.server->dmg_save)
1533         {
1534                 other = PRVM_PROG_TO_EDICT(ent->fields.server->dmg_inflictor);
1535                 MSG_WriteByte (msg, svc_damage);
1536                 MSG_WriteByte (msg, (int)ent->fields.server->dmg_save);
1537                 MSG_WriteByte (msg, (int)ent->fields.server->dmg_take);
1538                 for (i=0 ; i<3 ; i++)
1539                         MSG_WriteCoord (msg, other->fields.server->origin[i] + 0.5*(other->fields.server->mins[i] + other->fields.server->maxs[i]), sv.protocol);
1540
1541                 ent->fields.server->dmg_take = 0;
1542                 ent->fields.server->dmg_save = 0;
1543         }
1544
1545 //
1546 // send the current viewpos offset from the view entity
1547 //
1548         SV_SetIdealPitch ();            // how much to look up / down ideally
1549
1550 // a fixangle might get lost in a dropped packet.  Oh well.
1551         if(ent->fields.server->fixangle)
1552         {
1553                 // angle fixing was requested by global thinking code...
1554                 // so store the current angles for later use
1555                 memcpy(host_client->fixangle_angles, ent->fields.server->angles, sizeof(host_client->fixangle_angles));
1556                 host_client->fixangle_angles_set = TRUE;
1557
1558                 // and clear fixangle for the next frame
1559                 ent->fields.server->fixangle = 0;
1560         }
1561
1562         if (host_client->fixangle_angles_set)
1563         {
1564                 MSG_WriteByte (msg, svc_setangle);
1565                 for (i=0 ; i < 3 ; i++)
1566                         MSG_WriteAngle (msg, host_client->fixangle_angles[i], sv.protocol);
1567                 host_client->fixangle_angles_set = FALSE;
1568         }
1569
1570         // stuff the sigil bits into the high bits of items for sbar, or else
1571         // mix in items2
1572         val = PRVM_EDICTFIELDVALUE(ent, prog->fieldoffsets.items2);
1573         if (gamemode == GAME_HIPNOTIC || gamemode == GAME_ROGUE)
1574                 items = (int)ent->fields.server->items | ((int)val->_float << 23);
1575         else
1576                 items = (int)ent->fields.server->items | ((int)prog->globals.server->serverflags << 28);
1577
1578         VectorClear(punchvector);
1579         if ((val = PRVM_EDICTFIELDVALUE(ent, prog->fieldoffsets.punchvector)))
1580                 VectorCopy(val->vector, punchvector);
1581
1582         // cache weapon model name and index in client struct to save time
1583         // (this search can be almost 1% of cpu time!)
1584         s = PRVM_GetString(ent->fields.server->weaponmodel);
1585         if (strcmp(s, client->weaponmodel))
1586         {
1587                 strlcpy(client->weaponmodel, s, sizeof(client->weaponmodel));
1588                 client->weaponmodelindex = SV_ModelIndex(s, 1);
1589         }
1590
1591         viewzoom = 255;
1592         if ((val = PRVM_EDICTFIELDVALUE(ent, prog->fieldoffsets.viewzoom)))
1593                 viewzoom = (int)(val->_float * 255.0f);
1594         if (viewzoom == 0)
1595                 viewzoom = 255;
1596
1597         bits = 0;
1598
1599         if ((int)ent->fields.server->flags & FL_ONGROUND)
1600                 bits |= SU_ONGROUND;
1601         if (ent->fields.server->waterlevel >= 2)
1602                 bits |= SU_INWATER;
1603         if (ent->fields.server->idealpitch)
1604                 bits |= SU_IDEALPITCH;
1605
1606         for (i=0 ; i<3 ; i++)
1607         {
1608                 if (ent->fields.server->punchangle[i])
1609                         bits |= (SU_PUNCH1<<i);
1610                 if (sv.protocol != PROTOCOL_QUAKE && sv.protocol != PROTOCOL_QUAKEDP && sv.protocol != PROTOCOL_NEHAHRAMOVIE && sv.protocol != PROTOCOL_NEHAHRABJP && sv.protocol != PROTOCOL_NEHAHRABJP2 && sv.protocol != PROTOCOL_NEHAHRABJP3)
1611                         if (punchvector[i])
1612                                 bits |= (SU_PUNCHVEC1<<i);
1613                 if (ent->fields.server->velocity[i])
1614                         bits |= (SU_VELOCITY1<<i);
1615         }
1616
1617         memset(stats, 0, sizeof(int[MAX_CL_STATS]));
1618         stats[STAT_VIEWHEIGHT] = (int)ent->fields.server->view_ofs[2];
1619         stats[STAT_ITEMS] = items;
1620         stats[STAT_WEAPONFRAME] = (int)ent->fields.server->weaponframe;
1621         stats[STAT_ARMOR] = (int)ent->fields.server->armorvalue;
1622         stats[STAT_WEAPON] = client->weaponmodelindex;
1623         stats[STAT_HEALTH] = (int)ent->fields.server->health;
1624         stats[STAT_AMMO] = (int)ent->fields.server->currentammo;
1625         stats[STAT_SHELLS] = (int)ent->fields.server->ammo_shells;
1626         stats[STAT_NAILS] = (int)ent->fields.server->ammo_nails;
1627         stats[STAT_ROCKETS] = (int)ent->fields.server->ammo_rockets;
1628         stats[STAT_CELLS] = (int)ent->fields.server->ammo_cells;
1629         stats[STAT_ACTIVEWEAPON] = (int)ent->fields.server->weapon;
1630         stats[STAT_VIEWZOOM] = viewzoom;
1631         stats[STAT_TOTALSECRETS] = (int)prog->globals.server->total_secrets;
1632         stats[STAT_TOTALMONSTERS] = (int)prog->globals.server->total_monsters;
1633         // the QC bumps these itself by sending svc_'s, so we have to keep them
1634         // zero or they'll be corrected by the engine
1635         //stats[STAT_SECRETS] = prog->globals.server->found_secrets;
1636         //stats[STAT_MONSTERS] = prog->globals.server->killed_monsters;
1637
1638         // movement settings for prediction
1639         // note: these are not sent in protocols with lower MAX_CL_STATS limits
1640         statsf[STAT_MOVEVARS_TICRATE] = sys_ticrate.value;
1641         statsf[STAT_MOVEVARS_TIMESCALE] = slowmo.value;
1642         statsf[STAT_MOVEVARS_GRAVITY] = sv_gravity.value;
1643         statsf[STAT_MOVEVARS_STOPSPEED] = sv_stopspeed.value;
1644         statsf[STAT_MOVEVARS_MAXSPEED] = sv_maxspeed.value;
1645         statsf[STAT_MOVEVARS_SPECTATORMAXSPEED] = sv_maxspeed.value; // FIXME: QW has a separate cvar for this
1646         statsf[STAT_MOVEVARS_ACCELERATE] = sv_accelerate.value;
1647         statsf[STAT_MOVEVARS_AIRACCELERATE] = sv_airaccelerate.value >= 0 ? sv_airaccelerate.value : sv_accelerate.value;
1648         statsf[STAT_MOVEVARS_WATERACCELERATE] = sv_wateraccelerate.value >= 0 ? sv_wateraccelerate.value : sv_accelerate.value;
1649         val = PRVM_EDICTFIELDVALUE(ent, prog->fieldoffsets.gravity);
1650         statsf[STAT_MOVEVARS_ENTGRAVITY] = (val && val->_float != 0) ? val->_float : 1.0f;
1651         statsf[STAT_MOVEVARS_JUMPVELOCITY] = sv_jumpvelocity.value;
1652         statsf[STAT_MOVEVARS_EDGEFRICTION] = sv_edgefriction.value;
1653         statsf[STAT_MOVEVARS_MAXAIRSPEED] = sv_maxairspeed.value;
1654         statsf[STAT_MOVEVARS_STEPHEIGHT] = sv_stepheight.value;
1655         statsf[STAT_MOVEVARS_AIRACCEL_QW] = sv_airaccel_qw.value;
1656         statsf[STAT_MOVEVARS_AIRACCEL_SIDEWAYS_FRICTION] = sv_airaccel_sideways_friction.value;
1657         statsf[STAT_MOVEVARS_FRICTION] = sv_friction.value;
1658         statsf[STAT_MOVEVARS_WATERFRICTION] = sv_waterfriction.value >= 0 ? sv_waterfriction.value : sv_friction.value;
1659         statsf[STAT_FRAGLIMIT] = fraglimit.value;
1660         statsf[STAT_TIMELIMIT] = timelimit.value;
1661
1662         if (sv.protocol == PROTOCOL_QUAKE || sv.protocol == PROTOCOL_QUAKEDP || sv.protocol == PROTOCOL_NEHAHRAMOVIE || sv.protocol == PROTOCOL_NEHAHRABJP || sv.protocol == PROTOCOL_NEHAHRABJP2 || sv.protocol == PROTOCOL_NEHAHRABJP3 || sv.protocol == PROTOCOL_DARKPLACES1 || sv.protocol == PROTOCOL_DARKPLACES2 || sv.protocol == PROTOCOL_DARKPLACES3 || sv.protocol == PROTOCOL_DARKPLACES4 || sv.protocol == PROTOCOL_DARKPLACES5)
1663         {
1664                 if (stats[STAT_VIEWHEIGHT] != DEFAULT_VIEWHEIGHT) bits |= SU_VIEWHEIGHT;
1665                 bits |= SU_ITEMS;
1666                 if (stats[STAT_WEAPONFRAME]) bits |= SU_WEAPONFRAME;
1667                 if (stats[STAT_ARMOR]) bits |= SU_ARMOR;
1668                 bits |= SU_WEAPON;
1669                 // FIXME: which protocols support this?  does PROTOCOL_DARKPLACES3 support viewzoom?
1670                 if (sv.protocol == PROTOCOL_DARKPLACES2 || sv.protocol == PROTOCOL_DARKPLACES3 || sv.protocol == PROTOCOL_DARKPLACES4 || sv.protocol == PROTOCOL_DARKPLACES5)
1671                         if (viewzoom != 255)
1672                                 bits |= SU_VIEWZOOM;
1673         }
1674
1675         if (bits >= 65536)
1676                 bits |= SU_EXTEND1;
1677         if (bits >= 16777216)
1678                 bits |= SU_EXTEND2;
1679
1680         // send the data
1681         MSG_WriteByte (msg, svc_clientdata);
1682         MSG_WriteShort (msg, bits);
1683         if (bits & SU_EXTEND1)
1684                 MSG_WriteByte(msg, bits >> 16);
1685         if (bits & SU_EXTEND2)
1686                 MSG_WriteByte(msg, bits >> 24);
1687
1688         if (bits & SU_VIEWHEIGHT)
1689                 MSG_WriteChar (msg, stats[STAT_VIEWHEIGHT]);
1690
1691         if (bits & SU_IDEALPITCH)
1692                 MSG_WriteChar (msg, (int)ent->fields.server->idealpitch);
1693
1694         for (i=0 ; i<3 ; i++)
1695         {
1696                 if (bits & (SU_PUNCH1<<i))
1697                 {
1698                         if (sv.protocol == PROTOCOL_QUAKE || sv.protocol == PROTOCOL_QUAKEDP || sv.protocol == PROTOCOL_NEHAHRAMOVIE || sv.protocol == PROTOCOL_NEHAHRABJP || sv.protocol == PROTOCOL_NEHAHRABJP2 || sv.protocol == PROTOCOL_NEHAHRABJP3)
1699                                 MSG_WriteChar(msg, (int)ent->fields.server->punchangle[i]);
1700                         else
1701                                 MSG_WriteAngle16i(msg, ent->fields.server->punchangle[i]);
1702                 }
1703                 if (bits & (SU_PUNCHVEC1<<i))
1704                 {
1705                         if (sv.protocol == PROTOCOL_DARKPLACES1 || sv.protocol == PROTOCOL_DARKPLACES2 || sv.protocol == PROTOCOL_DARKPLACES3 || sv.protocol == PROTOCOL_DARKPLACES4)
1706                                 MSG_WriteCoord16i(msg, punchvector[i]);
1707                         else
1708                                 MSG_WriteCoord32f(msg, punchvector[i]);
1709                 }
1710                 if (bits & (SU_VELOCITY1<<i))
1711                 {
1712                         if (sv.protocol == PROTOCOL_QUAKE || sv.protocol == PROTOCOL_QUAKEDP || sv.protocol == PROTOCOL_NEHAHRAMOVIE || sv.protocol == PROTOCOL_NEHAHRABJP || sv.protocol == PROTOCOL_NEHAHRABJP2 || sv.protocol == PROTOCOL_NEHAHRABJP3 || sv.protocol == PROTOCOL_DARKPLACES1 || sv.protocol == PROTOCOL_DARKPLACES2 || sv.protocol == PROTOCOL_DARKPLACES3 || sv.protocol == PROTOCOL_DARKPLACES4)
1713                                 MSG_WriteChar(msg, (int)(ent->fields.server->velocity[i] * (1.0f / 16.0f)));
1714                         else
1715                                 MSG_WriteCoord32f(msg, ent->fields.server->velocity[i]);
1716                 }
1717         }
1718
1719         if (bits & SU_ITEMS)
1720                 MSG_WriteLong (msg, stats[STAT_ITEMS]);
1721
1722         if (sv.protocol == PROTOCOL_DARKPLACES5)
1723         {
1724                 if (bits & SU_WEAPONFRAME)
1725                         MSG_WriteShort (msg, stats[STAT_WEAPONFRAME]);
1726                 if (bits & SU_ARMOR)
1727                         MSG_WriteShort (msg, stats[STAT_ARMOR]);
1728                 if (bits & SU_WEAPON)
1729                         MSG_WriteShort (msg, stats[STAT_WEAPON]);
1730                 MSG_WriteShort (msg, stats[STAT_HEALTH]);
1731                 MSG_WriteShort (msg, stats[STAT_AMMO]);
1732                 MSG_WriteShort (msg, stats[STAT_SHELLS]);
1733                 MSG_WriteShort (msg, stats[STAT_NAILS]);
1734                 MSG_WriteShort (msg, stats[STAT_ROCKETS]);
1735                 MSG_WriteShort (msg, stats[STAT_CELLS]);
1736                 MSG_WriteShort (msg, stats[STAT_ACTIVEWEAPON]);
1737                 if (bits & SU_VIEWZOOM)
1738                         MSG_WriteShort (msg, bound(0, stats[STAT_VIEWZOOM], 65535));
1739         }
1740         else if (sv.protocol == PROTOCOL_QUAKE || sv.protocol == PROTOCOL_QUAKEDP || sv.protocol == PROTOCOL_NEHAHRAMOVIE || sv.protocol == PROTOCOL_NEHAHRABJP || sv.protocol == PROTOCOL_NEHAHRABJP2 || sv.protocol == PROTOCOL_NEHAHRABJP3 || sv.protocol == PROTOCOL_DARKPLACES1 || sv.protocol == PROTOCOL_DARKPLACES2 || sv.protocol == PROTOCOL_DARKPLACES3 || sv.protocol == PROTOCOL_DARKPLACES4)
1741         {
1742                 if (bits & SU_WEAPONFRAME)
1743                         MSG_WriteByte (msg, stats[STAT_WEAPONFRAME]);
1744                 if (bits & SU_ARMOR)
1745                         MSG_WriteByte (msg, stats[STAT_ARMOR]);
1746                 if (bits & SU_WEAPON)
1747                 {
1748                         if (sv.protocol == PROTOCOL_NEHAHRABJP || sv.protocol == PROTOCOL_NEHAHRABJP2 || sv.protocol == PROTOCOL_NEHAHRABJP3)
1749                                 MSG_WriteShort (msg, stats[STAT_WEAPON]);
1750                         else
1751                                 MSG_WriteByte (msg, stats[STAT_WEAPON]);
1752                 }
1753                 MSG_WriteShort (msg, stats[STAT_HEALTH]);
1754                 MSG_WriteByte (msg, stats[STAT_AMMO]);
1755                 MSG_WriteByte (msg, stats[STAT_SHELLS]);
1756                 MSG_WriteByte (msg, stats[STAT_NAILS]);
1757                 MSG_WriteByte (msg, stats[STAT_ROCKETS]);
1758                 MSG_WriteByte (msg, stats[STAT_CELLS]);
1759                 if (gamemode == GAME_HIPNOTIC || gamemode == GAME_ROGUE || gamemode == GAME_NEXUIZ)
1760                 {
1761                         for (i = 0;i < 32;i++)
1762                                 if (stats[STAT_ACTIVEWEAPON] & (1<<i))
1763                                         break;
1764                         MSG_WriteByte (msg, i);
1765                 }
1766                 else
1767                         MSG_WriteByte (msg, stats[STAT_ACTIVEWEAPON]);
1768                 if (bits & SU_VIEWZOOM)
1769                 {
1770                         if (sv.protocol == PROTOCOL_DARKPLACES2 || sv.protocol == PROTOCOL_DARKPLACES3 || sv.protocol == PROTOCOL_DARKPLACES4)
1771                                 MSG_WriteByte (msg, bound(0, stats[STAT_VIEWZOOM], 255));
1772                         else
1773                                 MSG_WriteShort (msg, bound(0, stats[STAT_VIEWZOOM], 65535));
1774                 }
1775         }
1776 }
1777
1778 void SV_FlushBroadcastMessages(void)
1779 {
1780         int i;
1781         client_t *client;
1782         if (sv.datagram.cursize <= 0)
1783                 return;
1784         for (i = 0, client = svs.clients;i < svs.maxclients;i++, client++)
1785         {
1786                 if (!client->spawned || !client->netconnection || client->unreliablemsg.cursize + sv.datagram.cursize > client->unreliablemsg.maxsize || client->unreliablemsg_splitpoints >= (int)(sizeof(client->unreliablemsg_splitpoint)/sizeof(client->unreliablemsg_splitpoint[0])))
1787                         continue;
1788                 SZ_Write(&client->unreliablemsg, sv.datagram.data, sv.datagram.cursize);
1789                 client->unreliablemsg_splitpoint[client->unreliablemsg_splitpoints++] = client->unreliablemsg.cursize;
1790         }
1791         SZ_Clear(&sv.datagram);
1792 }
1793
1794 static void SV_WriteUnreliableMessages(client_t *client, sizebuf_t *msg, int maxsize)
1795 {
1796         // scan the splitpoints to find out how many we can fit in
1797         int numsegments, j, split;
1798         if (!client->unreliablemsg_splitpoints)
1799                 return;
1800         // always accept the first one if it's within 1024 bytes, this ensures
1801         // that very big datagrams which are over the rate limit still get
1802         // through, just to keep it working
1803         j = msg->cursize + client->unreliablemsg_splitpoint[0];
1804         if (maxsize < 1024 && j > maxsize && j <= 1024)
1805         {
1806                 numsegments = 1;
1807                 maxsize = 1024;
1808         }
1809         else
1810                 for (numsegments = 0;numsegments < client->unreliablemsg_splitpoints;numsegments++)
1811                         if (msg->cursize + client->unreliablemsg_splitpoint[numsegments] > maxsize)
1812                                 break;
1813         if (numsegments > 0)
1814         {
1815                 // some will fit, so add the ones that will fit
1816                 split = client->unreliablemsg_splitpoint[numsegments-1];
1817                 // note this discards ones that were accepted by the segments scan but
1818                 // can not fit, such as a really huge first one that will never ever
1819                 // fit in a packet...
1820                 if (msg->cursize + split <= maxsize)
1821                         SZ_Write(msg, client->unreliablemsg.data, split);
1822                 // remove the part we sent, keeping any remaining data
1823                 client->unreliablemsg.cursize -= split;
1824                 if (client->unreliablemsg.cursize > 0)
1825                         memmove(client->unreliablemsg.data, client->unreliablemsg.data + split, client->unreliablemsg.cursize);
1826                 // adjust remaining splitpoints
1827                 client->unreliablemsg_splitpoints -= numsegments;
1828                 for (j = 0;j < client->unreliablemsg_splitpoints;j++)
1829                         client->unreliablemsg_splitpoint[j] = client->unreliablemsg_splitpoint[numsegments + j] - split;
1830         }
1831 }
1832
1833 /*
1834 =======================
1835 SV_SendClientDatagram
1836 =======================
1837 */
1838 static void SV_SendClientDatagram (client_t *client)
1839 {
1840         int clientrate, maxrate, maxsize, maxsize2, downloadsize;
1841         sizebuf_t msg;
1842         int stats[MAX_CL_STATS];
1843         unsigned char sv_sendclientdatagram_buf[NET_MAXMESSAGE];
1844
1845         // obey rate limit by limiting packet frequency if the packet size
1846         // limiting fails
1847         // (usually this is caused by reliable messages)
1848         if (!NetConn_CanSend(client->netconnection))
1849                 return;
1850
1851         // PROTOCOL_DARKPLACES5 and later support packet size limiting of updates
1852         maxrate = max(NET_MINRATE, sv_maxrate.integer);
1853         if (sv_maxrate.integer != maxrate)
1854                 Cvar_SetValueQuick(&sv_maxrate, maxrate);
1855
1856         // clientrate determines the 'cleartime' of a packet
1857         // (how long to wait before sending another, based on this packet's size)
1858         clientrate = bound(NET_MINRATE, client->rate, maxrate);
1859
1860         switch (sv.protocol)
1861         {
1862         case PROTOCOL_QUAKE:
1863         case PROTOCOL_QUAKEDP:
1864         case PROTOCOL_NEHAHRAMOVIE:
1865         case PROTOCOL_NEHAHRABJP:
1866         case PROTOCOL_NEHAHRABJP2:
1867         case PROTOCOL_NEHAHRABJP3:
1868         case PROTOCOL_QUAKEWORLD:
1869                 // no packet size limit support on Quake protocols because it just
1870                 // causes missing entities/effects
1871                 // packets are simply sent less often to obey the rate limit
1872                 maxsize = 1024;
1873                 maxsize2 = 1024;
1874                 break;
1875         case PROTOCOL_DARKPLACES1:
1876         case PROTOCOL_DARKPLACES2:
1877         case PROTOCOL_DARKPLACES3:
1878         case PROTOCOL_DARKPLACES4:
1879                 // no packet size limit support on DP1-4 protocols because they kick
1880                 // the client off if they overflow, and miss effects
1881                 // packets are simply sent less often to obey the rate limit
1882                 maxsize = sizeof(sv_sendclientdatagram_buf);
1883                 maxsize2 = sizeof(sv_sendclientdatagram_buf);
1884                 break;
1885         default:
1886                 // DP5 and later protocols support packet size limiting which is a
1887                 // better method than limiting packet frequency as QW does
1888                 //
1889                 // at very low rates (or very small sys_ticrate) the packet size is
1890                 // not reduced below 128, but packets may be sent less often
1891                 maxsize = (int)(clientrate * sys_ticrate.value);
1892                 maxsize = bound(128, maxsize, 1400);
1893                 maxsize2 = 1400;
1894                 // csqc entities can easily exceed 128 bytes, so disable throttling in
1895                 // mods that use csqc (they are likely to use less bandwidth anyway)
1896                 if (sv.csqc_progsize > 0)
1897                         maxsize = maxsize2;
1898                 break;
1899         }
1900
1901         if (LHNETADDRESS_GetAddressType(&host_client->netconnection->peeraddress) == LHNETADDRESSTYPE_LOOP && !sv_ratelimitlocalplayer.integer)
1902         {
1903                 // for good singleplayer, send huge packets
1904                 maxsize = sizeof(sv_sendclientdatagram_buf);
1905                 maxsize2 = sizeof(sv_sendclientdatagram_buf);
1906                 // never limit frequency in singleplayer
1907                 clientrate = 1000000000;
1908         }
1909
1910         // while downloading, limit entity updates to half the packet
1911         // (any leftover space will be used for downloading)
1912         if (host_client->download_file)
1913                 maxsize /= 2;
1914
1915         msg.data = sv_sendclientdatagram_buf;
1916         msg.maxsize = sizeof(sv_sendclientdatagram_buf);
1917         msg.cursize = 0;
1918         msg.allowoverflow = false;
1919
1920         if (host_client->spawned)
1921         {
1922                 // the player is in the game
1923                 MSG_WriteByte (&msg, svc_time);
1924                 MSG_WriteFloat (&msg, sv.time);
1925
1926                 // add the client specific data to the datagram
1927                 SV_WriteClientdataToMessage (client, client->edict, &msg, stats);
1928                 // now update the stats[] array using any registered custom fields
1929                 VM_SV_UpdateCustomStats (client, client->edict, &msg, stats);
1930                 // set host_client->statsdeltabits
1931                 Protocol_UpdateClientStats (stats);
1932
1933                 // add as many queued unreliable messages (effects) as we can fit
1934                 // limit effects to half of the remaining space
1935                 if (client->unreliablemsg.cursize)
1936                         SV_WriteUnreliableMessages (client, &msg, (msg.cursize + maxsize) / 2);
1937
1938                 // now write as many entities as we can fit, and also sends stats
1939                 SV_WriteEntitiesToClient (client, client->edict, &msg, maxsize);
1940         }
1941         else if (realtime > client->keepalivetime)
1942         {
1943                 // the player isn't totally in the game yet
1944                 // send small keepalive messages if too much time has passed
1945                 // (may also be sending downloads)
1946                 client->keepalivetime = realtime + 5;
1947                 MSG_WriteChar (&msg, svc_nop);
1948         }
1949
1950         // if a download is active, see if there is room to fit some download data
1951         // in this packet
1952         downloadsize = min(maxsize*2,maxsize2) - msg.cursize - 7;
1953         if (host_client->download_file && host_client->download_started && downloadsize > 0)
1954         {
1955                 fs_offset_t downloadstart;
1956                 unsigned char data[1400];
1957                 downloadstart = FS_Tell(host_client->download_file);
1958                 downloadsize = min(downloadsize, (int)sizeof(data));
1959                 downloadsize = FS_Read(host_client->download_file, data, downloadsize);
1960                 // note this sends empty messages if at the end of the file, which is
1961                 // necessary to keep the packet loss logic working
1962                 // (the last blocks may be lost and need to be re-sent, and that will
1963                 //  only occur if the client acks the empty end messages, revealing
1964                 //  a gap in the download progress, causing the last blocks to be
1965                 //  sent again)
1966                 MSG_WriteChar (&msg, svc_downloaddata);
1967                 MSG_WriteLong (&msg, downloadstart);
1968                 MSG_WriteShort (&msg, downloadsize);
1969                 if (downloadsize > 0)
1970                         SZ_Write (&msg, data, downloadsize);
1971         }
1972
1973         // reliable only if none is in progress
1974         if(client->sendsignon != 2 && !client->netconnection->sendMessageLength)
1975                 SV_WriteDemoMessage(client, &(client->netconnection->message), false);
1976         // unreliable
1977         SV_WriteDemoMessage(client, &msg, false);
1978
1979 // send the datagram
1980         NetConn_SendUnreliableMessage (client->netconnection, &msg, sv.protocol, clientrate, client->sendsignon == 2);
1981         if (client->sendsignon == 1 && !client->netconnection->message.cursize)
1982                 client->sendsignon = 2; // prevent reliable until client sends prespawn (this is the keepalive phase)
1983 }
1984
1985 /*
1986 =======================
1987 SV_UpdateToReliableMessages
1988 =======================
1989 */
1990 static void SV_UpdateToReliableMessages (void)
1991 {
1992         int i, j;
1993         client_t *client;
1994         prvm_eval_t *val;
1995         const char *name;
1996         const char *model;
1997         const char *skin;
1998
1999 // check for changes to be sent over the reliable streams
2000         for (i = 0, host_client = svs.clients;i < svs.maxclients;i++, host_client++)
2001         {
2002                 // update the host_client fields we care about according to the entity fields
2003                 host_client->edict = PRVM_EDICT_NUM(i+1);
2004
2005                 // DP_SV_CLIENTNAME
2006                 name = PRVM_GetString(host_client->edict->fields.server->netname);
2007                 if (name == NULL)
2008                         name = "";
2009                 // always point the string back at host_client->name to keep it safe
2010                 strlcpy (host_client->name, name, sizeof (host_client->name));
2011                 host_client->edict->fields.server->netname = PRVM_SetEngineString(host_client->name);
2012                 if (strcmp(host_client->old_name, host_client->name))
2013                 {
2014                         if (host_client->spawned)
2015                                 SV_BroadcastPrintf("%s ^7changed name to %s\n", host_client->old_name, host_client->name);
2016                         strlcpy(host_client->old_name, host_client->name, sizeof(host_client->old_name));
2017                         // send notification to all clients
2018                         MSG_WriteByte (&sv.reliable_datagram, svc_updatename);
2019                         MSG_WriteByte (&sv.reliable_datagram, i);
2020                         MSG_WriteString (&sv.reliable_datagram, host_client->name);
2021                         SV_WriteNetnameIntoDemo(host_client);
2022                 }
2023
2024                 // DP_SV_CLIENTCOLORS
2025                 // this is always found (since it's added by the progs loader)
2026                 if ((val = PRVM_EDICTFIELDVALUE(host_client->edict, prog->fieldoffsets.clientcolors)))
2027                         host_client->colors = (int)val->_float;
2028                 if (host_client->old_colors != host_client->colors)
2029                 {
2030                         host_client->old_colors = host_client->colors;
2031                         // send notification to all clients
2032                         MSG_WriteByte (&sv.reliable_datagram, svc_updatecolors);
2033                         MSG_WriteByte (&sv.reliable_datagram, i);
2034                         MSG_WriteByte (&sv.reliable_datagram, host_client->colors);
2035                 }
2036
2037                 // NEXUIZ_PLAYERMODEL
2038                 if( prog->fieldoffsets.playermodel >= 0 ) {
2039                         model = PRVM_GetString(PRVM_EDICTFIELDVALUE(host_client->edict, prog->fieldoffsets.playermodel)->string);
2040                         if (model == NULL)
2041                                 model = "";
2042                         // always point the string back at host_client->name to keep it safe
2043                         strlcpy (host_client->playermodel, model, sizeof (host_client->playermodel));
2044                         PRVM_EDICTFIELDVALUE(host_client->edict, prog->fieldoffsets.playermodel)->string = PRVM_SetEngineString(host_client->playermodel);
2045                 }
2046
2047                 // NEXUIZ_PLAYERSKIN
2048                 if( prog->fieldoffsets.playerskin >= 0 ) {
2049                         skin = PRVM_GetString(PRVM_EDICTFIELDVALUE(host_client->edict, prog->fieldoffsets.playerskin)->string);
2050                         if (skin == NULL)
2051                                 skin = "";
2052                         // always point the string back at host_client->name to keep it safe
2053                         strlcpy (host_client->playerskin, skin, sizeof (host_client->playerskin));
2054                         PRVM_EDICTFIELDVALUE(host_client->edict, prog->fieldoffsets.playerskin)->string = PRVM_SetEngineString(host_client->playerskin);
2055                 }
2056
2057                 // TODO: add an extension name for this [1/17/2008 Black]
2058                 if ((val = PRVM_EDICTFIELDVALUE(host_client->edict, prog->fieldoffsets.clientcamera)) && val->edict > 0 ) {
2059                         int oldclientcamera = host_client->clientcamera;
2060                         if( val->edict >= prog->max_edicts || PRVM_EDICT_NUM( val->edict )->priv.required->free ) {
2061                                 val->edict = host_client->clientcamera = PRVM_NUM_FOR_EDICT( host_client->edict );
2062                         } else {
2063                                 host_client->clientcamera = val->edict;
2064                         }
2065
2066                         if( oldclientcamera != host_client->clientcamera ) {
2067                                 MSG_WriteByte (&sv.reliable_datagram, svc_setview );
2068                                 MSG_WriteShort (&host_client->netconnection->message, host_client->clientcamera);
2069                         }
2070                 }
2071
2072                 // frags
2073                 host_client->frags = (int)host_client->edict->fields.server->frags;
2074                 if(gamemode == GAME_NEXUIZ)
2075                         if(!host_client->spawned && host_client->netconnection)
2076                                 host_client->frags = -666;
2077                 if (host_client->old_frags != host_client->frags)
2078                 {
2079                         host_client->old_frags = host_client->frags;
2080                         // send notification to all clients
2081                         MSG_WriteByte (&sv.reliable_datagram, svc_updatefrags);
2082                         MSG_WriteByte (&sv.reliable_datagram, i);
2083                         MSG_WriteShort (&sv.reliable_datagram, host_client->frags);
2084                 }
2085         }
2086
2087         for (j = 0, client = svs.clients;j < svs.maxclients;j++, client++)
2088                 if (client->netconnection && (client->spawned || client->clientconnectcalled)) // also send MSG_ALL to people who are past ClientConnect, but not spawned yet
2089                         SZ_Write (&client->netconnection->message, sv.reliable_datagram.data, sv.reliable_datagram.cursize);
2090
2091         SZ_Clear (&sv.reliable_datagram);
2092 }
2093
2094
2095 /*
2096 =======================
2097 SV_SendClientMessages
2098 =======================
2099 */
2100 void SV_SendClientMessages (void)
2101 {
2102         int i, prepared = false;
2103
2104         if (sv.protocol == PROTOCOL_QUAKEWORLD)
2105                 Sys_Error("SV_SendClientMessages: no quakeworld support\n");
2106
2107         SV_FlushBroadcastMessages();
2108
2109 // update frags, names, etc
2110         SV_UpdateToReliableMessages();
2111
2112 // build individual updates
2113         for (i = 0, host_client = svs.clients;i < svs.maxclients;i++, host_client++)
2114         {
2115                 if (!host_client->active)
2116                         continue;
2117                 if (!host_client->netconnection)
2118                         continue;
2119
2120                 if (host_client->netconnection->message.overflowed)
2121                 {
2122                         SV_DropClient (true);   // if the message couldn't send, kick off
2123                         continue;
2124                 }
2125
2126                 if (!prepared)
2127                 {
2128                         prepared = true;
2129                         // only prepare entities once per frame
2130                         SV_PrepareEntitiesForSending();
2131                 }
2132                 SV_SendClientDatagram (host_client);
2133         }
2134
2135 // clear muzzle flashes
2136         SV_CleanupEnts();
2137 }
2138
2139 static void SV_StartDownload_f(void)
2140 {
2141         if (host_client->download_file)
2142                 host_client->download_started = true;
2143 }
2144
2145 /*
2146  * Compression extension negotiation:
2147  *
2148  * Server to client:
2149  *   cl_serverextension_download 2
2150  *
2151  * Client to server:
2152  *   download <filename> <list of zero or more suppported compressions in order of preference>
2153  * e.g.
2154  *   download maps/map1.bsp lzo deflate huffman
2155  *
2156  * Server to client:
2157  *   cl_downloadbegin <compressed size> <filename> <compression method actually used>
2158  * e.g.
2159  *   cl_downloadbegin 123456 maps/map1.bsp deflate
2160  *
2161  * The server may choose not to compress the file by sending no compression name, like:
2162  *   cl_downloadbegin 345678 maps/map1.bsp
2163  *
2164  * NOTE: the "download" command may only specify compression algorithms if
2165  *       cl_serverextension_download is 2!
2166  *       If cl_serverextension_download has a different value, the client must
2167  *       assume this extension is not supported!
2168  */
2169
2170 static void Download_CheckExtensions(void)
2171 {
2172         int i;
2173         int argc = Cmd_Argc();
2174
2175         // first reset them all
2176         host_client->download_deflate = false;
2177
2178         for(i = 2; i < argc; ++i)
2179         {
2180                 if(!strcmp(Cmd_Argv(i), "deflate"))
2181                 {
2182                         host_client->download_deflate = true;
2183                         break;
2184                 }
2185         }
2186 }
2187
2188 static void SV_Download_f(void)
2189 {
2190         const char *whichpack, *whichpack2, *extension;
2191         qboolean is_csqc; // so we need to check only once
2192
2193         if (Cmd_Argc() < 2)
2194         {
2195                 SV_ClientPrintf("usage: download <filename> {<extensions>}*\n");
2196                 SV_ClientPrintf("       supported extensions: deflate\n");
2197                 return;
2198         }
2199
2200         if (FS_CheckNastyPath(Cmd_Argv(1), false))
2201         {
2202                 SV_ClientPrintf("Download rejected: nasty filename \"%s\"\n", Cmd_Argv(1));
2203                 return;
2204         }
2205
2206         if (host_client->download_file)
2207         {
2208                 // at this point we'll assume the previous download should be aborted
2209                 Con_DPrintf("Download of %s aborted by %s starting a new download\n", host_client->download_name, host_client->name);
2210                 Host_ClientCommands("\nstopdownload\n");
2211
2212                 // close the file and reset variables
2213                 FS_Close(host_client->download_file);
2214                 host_client->download_file = NULL;
2215                 host_client->download_name[0] = 0;
2216                 host_client->download_expectedposition = 0;
2217                 host_client->download_started = false;
2218         }
2219
2220         is_csqc = (sv.csqc_progname[0] && strcmp(Cmd_Argv(1), sv.csqc_progname) == 0);
2221
2222         if (!sv_allowdownloads.integer && !is_csqc)
2223         {
2224                 SV_ClientPrintf("Downloads are disabled on this server\n");
2225                 Host_ClientCommands("\nstopdownload\n");
2226                 return;
2227         }
2228
2229         Download_CheckExtensions();
2230
2231         strlcpy(host_client->download_name, Cmd_Argv(1), sizeof(host_client->download_name));
2232         extension = FS_FileExtension(host_client->download_name);
2233
2234         // host_client is asking to download a specified file
2235         if (developer.integer >= 100)
2236                 Con_Printf("Download request for %s by %s\n", host_client->download_name, host_client->name);
2237
2238         if(is_csqc)
2239         {
2240                 char extensions[MAX_QPATH]; // make sure this can hold all extensions
2241                 extensions[0] = '\0';
2242
2243                 if(host_client->download_deflate)
2244                         strlcat(extensions, " deflate", sizeof(extensions));
2245
2246                 Con_DPrintf("Downloading %s to %s\n", host_client->download_name, host_client->name);
2247
2248                 if(host_client->download_deflate)
2249                         host_client->download_file = FS_FileFromData(svs.csqc_progdata_deflated, svs.csqc_progsize_deflated, true);
2250                 else
2251                         host_client->download_file = FS_FileFromData(svs.csqc_progdata, sv.csqc_progsize, true);
2252
2253                 // no, no space is needed between %s and %s :P
2254                 Host_ClientCommands("\ncl_downloadbegin %i %s%s\n", (int)FS_FileSize(host_client->download_file), host_client->download_name, extensions);
2255
2256                 host_client->download_expectedposition = 0;
2257                 host_client->download_started = false;
2258                 host_client->sendsignon = true; // make sure this message is sent
2259                 return;
2260         }
2261
2262         if (!FS_FileExists(host_client->download_name))
2263         {
2264                 SV_ClientPrintf("Download rejected: server does not have the file \"%s\"\nYou may need to separately download or purchase the data archives for this game/mod to get this file\n", host_client->download_name);
2265                 Host_ClientCommands("\nstopdownload\n");
2266                 return;
2267         }
2268
2269         // check if the user is trying to download part of registered Quake(r)
2270         whichpack = FS_WhichPack(host_client->download_name);
2271         whichpack2 = FS_WhichPack("gfx/pop.lmp");
2272         if ((whichpack && whichpack2 && !strcasecmp(whichpack, whichpack2)) || FS_IsRegisteredQuakePack(host_client->download_name))
2273         {
2274                 SV_ClientPrintf("Download rejected: file \"%s\" is part of registered Quake(r)\nYou must purchase Quake(r) from id Software or a retailer to get this file\nPlease go to http://www.idsoftware.com/games/quake/quake/index.php?game_section=buy\n", host_client->download_name);
2275                 Host_ClientCommands("\nstopdownload\n");
2276                 return;
2277         }
2278
2279         // check if the server has forbidden archive downloads entirely
2280         if (!sv_allowdownloads_inarchive.integer)
2281         {
2282                 whichpack = FS_WhichPack(host_client->download_name);
2283                 if (whichpack)
2284                 {
2285                         SV_ClientPrintf("Download rejected: file \"%s\" is in an archive (\"%s\")\nYou must separately download or purchase the data archives for this game/mod to get this file\n", host_client->download_name, whichpack);
2286                         Host_ClientCommands("\nstopdownload\n");
2287                         return;
2288                 }
2289         }
2290
2291         if (!sv_allowdownloads_config.integer)
2292         {
2293                 if (!strcasecmp(extension, "cfg"))
2294                 {
2295                         SV_ClientPrintf("Download rejected: file \"%s\" is a .cfg file which is forbidden for security reasons\nYou must separately download or purchase the data archives for this game/mod to get this file\n", host_client->download_name);
2296                         Host_ClientCommands("\nstopdownload\n");
2297                         return;
2298                 }
2299         }
2300
2301         if (!sv_allowdownloads_dlcache.integer)
2302         {
2303                 if (!strncasecmp(host_client->download_name, "dlcache/", 8))
2304                 {
2305                         SV_ClientPrintf("Download rejected: file \"%s\" is in the dlcache/ directory which is forbidden for security reasons\nYou must separately download or purchase the data archives for this game/mod to get this file\n", host_client->download_name);
2306                         Host_ClientCommands("\nstopdownload\n");
2307                         return;
2308                 }
2309         }
2310
2311         if (!sv_allowdownloads_archive.integer)
2312         {
2313                 if (!strcasecmp(extension, "pak") || !strcasecmp(extension, "pk3"))
2314                 {
2315                         SV_ClientPrintf("Download rejected: file \"%s\" is an archive\nYou must separately download or purchase the data archives for this game/mod to get this file\n", host_client->download_name);
2316                         Host_ClientCommands("\nstopdownload\n");
2317                         return;
2318                 }
2319         }
2320
2321         host_client->download_file = FS_OpenVirtualFile(host_client->download_name, true);
2322         if (!host_client->download_file)
2323         {
2324                 SV_ClientPrintf("Download rejected: server could not open the file \"%s\"\n", host_client->download_name);
2325                 Host_ClientCommands("\nstopdownload\n");
2326                 return;
2327         }
2328
2329         if (FS_FileSize(host_client->download_file) > 1<<30)
2330         {
2331                 SV_ClientPrintf("Download rejected: file \"%s\" is very large\n", host_client->download_name);
2332                 Host_ClientCommands("\nstopdownload\n");
2333                 FS_Close(host_client->download_file);
2334                 host_client->download_file = NULL;
2335                 return;
2336         }
2337
2338         if (FS_FileSize(host_client->download_file) < 0)
2339         {
2340                 SV_ClientPrintf("Download rejected: file \"%s\" is not a regular file\n", host_client->download_name);
2341                 Host_ClientCommands("\nstopdownload\n");
2342                 FS_Close(host_client->download_file);
2343                 host_client->download_file = NULL;
2344                 return;
2345         }
2346
2347         Con_DPrintf("Downloading %s to %s\n", host_client->download_name, host_client->name);
2348
2349         /*
2350          * we can only do this if we would actually deflate on the fly
2351          * which we do not (yet)!
2352         {
2353                 char extensions[MAX_QPATH]; // make sure this can hold all extensions
2354                 extensions[0] = '\0';
2355
2356                 if(host_client->download_deflate)
2357                         strlcat(extensions, " deflate", sizeof(extensions));
2358
2359                 // no, no space is needed between %s and %s :P
2360                 Host_ClientCommands("\ncl_downloadbegin %i %s%s\n", (int)FS_FileSize(host_client->download_file), host_client->download_name, extensions);
2361         }
2362         */
2363         Host_ClientCommands("\ncl_downloadbegin %i %s\n", (int)FS_FileSize(host_client->download_file), host_client->download_name);
2364
2365         host_client->download_expectedposition = 0;
2366         host_client->download_started = false;
2367         host_client->sendsignon = true; // make sure this message is sent
2368
2369         // the rest of the download process is handled in SV_SendClientDatagram
2370         // and other code dealing with svc_downloaddata and clc_ackdownloaddata
2371         //
2372         // no svc_downloaddata messages will be sent until sv_startdownload is
2373         // sent by the client
2374 }
2375
2376 /*
2377 ==============================================================================
2378
2379 SERVER SPAWNING
2380
2381 ==============================================================================
2382 */
2383
2384 /*
2385 ================
2386 SV_ModelIndex
2387
2388 ================
2389 */
2390 int SV_ModelIndex(const char *s, int precachemode)
2391 {
2392         int i, limit = ((sv.protocol == PROTOCOL_QUAKE || sv.protocol == PROTOCOL_QUAKEDP || sv.protocol == PROTOCOL_NEHAHRAMOVIE || sv.protocol == PROTOCOL_NEHAHRABJP || sv.protocol == PROTOCOL_NEHAHRABJP2 || sv.protocol == PROTOCOL_NEHAHRABJP3) ? 256 : MAX_MODELS);
2393         char filename[MAX_QPATH];
2394         if (!s || !*s)
2395                 return 0;
2396         // testing
2397         //if (precachemode == 2)
2398         //      return 0;
2399         strlcpy(filename, s, sizeof(filename));
2400         for (i = 2;i < limit;i++)
2401         {
2402                 if (!sv.model_precache[i][0])
2403                 {
2404                         if (precachemode)
2405                         {
2406                                 if (sv.state != ss_loading && (sv.protocol == PROTOCOL_QUAKE || sv.protocol == PROTOCOL_QUAKEDP || sv.protocol == PROTOCOL_NEHAHRAMOVIE || sv.protocol == PROTOCOL_NEHAHRABJP || sv.protocol == PROTOCOL_NEHAHRABJP2 || sv.protocol == PROTOCOL_NEHAHRABJP3 || sv.protocol == PROTOCOL_DARKPLACES1 || sv.protocol == PROTOCOL_DARKPLACES2 || sv.protocol == PROTOCOL_DARKPLACES3 || sv.protocol == PROTOCOL_DARKPLACES4 || sv.protocol == PROTOCOL_DARKPLACES5))
2407                                 {
2408                                         Con_Printf("SV_ModelIndex(\"%s\"): precache_model can only be done in spawn functions\n", filename);
2409                                         return 0;
2410                                 }
2411                                 if (precachemode == 1)
2412                                         Con_Printf("SV_ModelIndex(\"%s\"): not precached (fix your code), precaching anyway\n", filename);
2413                                 strlcpy(sv.model_precache[i], filename, sizeof(sv.model_precache[i]));
2414                                 sv.models[i] = Mod_ForName (sv.model_precache[i], true, false, s[0] == '*' ? sv.modelname : NULL);
2415                                 if (sv.state != ss_loading)
2416                                 {
2417                                         MSG_WriteByte(&sv.reliable_datagram, svc_precache);
2418                                         MSG_WriteShort(&sv.reliable_datagram, i);
2419                                         MSG_WriteString(&sv.reliable_datagram, filename);
2420                                 }
2421                                 return i;
2422                         }
2423                         Con_Printf("SV_ModelIndex(\"%s\"): not precached\n", filename);
2424                         return 0;
2425                 }
2426                 if (!strcmp(sv.model_precache[i], filename))
2427                         return i;
2428         }
2429         Con_Printf("SV_ModelIndex(\"%s\"): i (%i) == MAX_MODELS (%i)\n", filename, i, MAX_MODELS);
2430         return 0;
2431 }
2432
2433 /*
2434 ================
2435 SV_SoundIndex
2436
2437 ================
2438 */
2439 int SV_SoundIndex(const char *s, int precachemode)
2440 {
2441         int i, limit = ((sv.protocol == PROTOCOL_QUAKE || sv.protocol == PROTOCOL_QUAKEDP || sv.protocol == PROTOCOL_NEHAHRAMOVIE || sv.protocol == PROTOCOL_NEHAHRABJP || sv.protocol == PROTOCOL_NEHAHRABJP2 || sv.protocol == PROTOCOL_NEHAHRABJP3) ? 256 : MAX_SOUNDS);
2442         char filename[MAX_QPATH];
2443         if (!s || !*s)
2444                 return 0;
2445         // testing
2446         //if (precachemode == 2)
2447         //      return 0;
2448         strlcpy(filename, s, sizeof(filename));
2449         for (i = 1;i < limit;i++)
2450         {
2451                 if (!sv.sound_precache[i][0])
2452                 {
2453                         if (precachemode)
2454                         {
2455                                 if (sv.state != ss_loading && (sv.protocol == PROTOCOL_QUAKE || sv.protocol == PROTOCOL_QUAKEDP || sv.protocol == PROTOCOL_NEHAHRAMOVIE || sv.protocol == PROTOCOL_NEHAHRABJP || sv.protocol == PROTOCOL_NEHAHRABJP2 || sv.protocol == PROTOCOL_NEHAHRABJP3 || sv.protocol == PROTOCOL_DARKPLACES1 || sv.protocol == PROTOCOL_DARKPLACES2 || sv.protocol == PROTOCOL_DARKPLACES3 || sv.protocol == PROTOCOL_DARKPLACES4 || sv.protocol == PROTOCOL_DARKPLACES5))
2456                                 {
2457                                         Con_Printf("SV_SoundIndex(\"%s\"): precache_sound can only be done in spawn functions\n", filename);
2458                                         return 0;
2459                                 }
2460                                 if (precachemode == 1)
2461                                         Con_Printf("SV_SoundIndex(\"%s\"): not precached (fix your code), precaching anyway\n", filename);
2462                                 strlcpy(sv.sound_precache[i], filename, sizeof(sv.sound_precache[i]));
2463                                 if (sv.state != ss_loading)
2464                                 {
2465                                         MSG_WriteByte(&sv.reliable_datagram, svc_precache);
2466                                         MSG_WriteShort(&sv.reliable_datagram, i + 32768);
2467                                         MSG_WriteString(&sv.reliable_datagram, filename);
2468                                 }
2469                                 return i;
2470                         }
2471                         Con_Printf("SV_SoundIndex(\"%s\"): not precached\n", filename);
2472                         return 0;
2473                 }
2474                 if (!strcmp(sv.sound_precache[i], filename))
2475                         return i;
2476         }
2477         Con_Printf("SV_SoundIndex(\"%s\"): i (%i) == MAX_SOUNDS (%i)\n", filename, i, MAX_SOUNDS);
2478         return 0;
2479 }
2480
2481 /*
2482 ================
2483 SV_ParticleEffectIndex
2484
2485 ================
2486 */
2487 int SV_ParticleEffectIndex(const char *name)
2488 {
2489         int i, argc, linenumber, effectnameindex;
2490         fs_offset_t filesize;
2491         unsigned char *filedata;
2492         const char *text, *textstart, *textend;
2493         char argv[16][1024];
2494         if (!sv.particleeffectnamesloaded)
2495         {
2496                 sv.particleeffectnamesloaded = true;
2497                 memset(sv.particleeffectname, 0, sizeof(sv.particleeffectname));
2498                 for (i = 0;i < EFFECT_TOTAL;i++)
2499                         strlcpy(sv.particleeffectname[i], standardeffectnames[i], sizeof(sv.particleeffectname[i]));
2500                 filedata = FS_LoadFile("effectinfo.txt", tempmempool, true, &filesize);
2501                 if (filedata)
2502                 {
2503                         textstart = (const char *)filedata;
2504                         textend = (const char *)filedata + filesize;
2505                         text = textstart;
2506                         for (linenumber = 1;;linenumber++)
2507                         {
2508                                 argc = 0;
2509                                 for (;;)
2510                                 {
2511                                         if (!COM_ParseToken_Simple(&text, true, false) || !strcmp(com_token, "\n"))
2512                                                 break;
2513                                         if (argc < 16)
2514                                         {
2515                                                 strlcpy(argv[argc], com_token, sizeof(argv[argc]));
2516                                                 argc++;
2517                                         }
2518                                 }
2519                                 if (com_token[0] == 0)
2520                                         break; // if the loop exited and it's not a \n, it's EOF
2521                                 if (argc < 1)
2522                                         continue;
2523                                 if (!strcmp(argv[0], "effect"))
2524                                 {
2525                                         if (argc == 2)
2526                                         {
2527                                                 for (effectnameindex = 1;effectnameindex < SV_MAX_PARTICLEEFFECTNAME;effectnameindex++)
2528                                                 {
2529                                                         if (sv.particleeffectname[effectnameindex][0])
2530                                                         {
2531                                                                 if (!strcmp(sv.particleeffectname[effectnameindex], argv[1]))
2532                                                                         break;
2533                                                         }
2534                                                         else
2535                                                         {
2536                                                                 strlcpy(sv.particleeffectname[effectnameindex], argv[1], sizeof(sv.particleeffectname[effectnameindex]));
2537                                                                 break;
2538                                                         }
2539                                                 }
2540                                                 // if we run out of names, abort
2541                                                 if (effectnameindex == SV_MAX_PARTICLEEFFECTNAME)
2542                                                 {
2543                                                         Con_Printf("effectinfo.txt:%i: too many effects!\n", linenumber);
2544                                                         break;
2545                                                 }
2546                                         }
2547                                 }
2548                         }
2549                         Mem_Free(filedata);
2550                 }
2551         }
2552         // search for the name
2553         for (effectnameindex = 1;effectnameindex < SV_MAX_PARTICLEEFFECTNAME && sv.particleeffectname[effectnameindex][0];effectnameindex++)
2554                 if (!strcmp(sv.particleeffectname[effectnameindex], name))
2555                         return effectnameindex;
2556         // return 0 if we couldn't find it
2557         return 0;
2558 }
2559
2560 /*
2561 ================
2562 SV_CreateBaseline
2563
2564 ================
2565 */
2566 static void SV_CreateBaseline (void)
2567 {
2568         int i, entnum, large;
2569         prvm_edict_t *svent;
2570
2571         // LordHavoc: clear *all* states (note just active ones)
2572         for (entnum = 0;entnum < prog->max_edicts;entnum++)
2573         {
2574                 // get the current server version
2575                 svent = PRVM_EDICT_NUM(entnum);
2576
2577                 // LordHavoc: always clear state values, whether the entity is in use or not
2578                 svent->priv.server->baseline = defaultstate;
2579
2580                 if (svent->priv.server->free)
2581                         continue;
2582                 if (entnum > svs.maxclients && !svent->fields.server->modelindex)
2583                         continue;
2584
2585                 // create entity baseline
2586                 VectorCopy (svent->fields.server->origin, svent->priv.server->baseline.origin);
2587                 VectorCopy (svent->fields.server->angles, svent->priv.server->baseline.angles);
2588                 svent->priv.server->baseline.frame = (int)svent->fields.server->frame;
2589                 svent->priv.server->baseline.skin = (int)svent->fields.server->skin;
2590                 if (entnum > 0 && entnum <= svs.maxclients)
2591                 {
2592                         svent->priv.server->baseline.colormap = entnum;
2593                         svent->priv.server->baseline.modelindex = SV_ModelIndex("progs/player.mdl", 1);
2594                 }
2595                 else
2596                 {
2597                         svent->priv.server->baseline.colormap = 0;
2598                         svent->priv.server->baseline.modelindex = (int)svent->fields.server->modelindex;
2599                 }
2600
2601                 large = false;
2602                 if (svent->priv.server->baseline.modelindex & 0xFF00 || svent->priv.server->baseline.frame & 0xFF00)
2603                 {
2604                         large = true;
2605                         if (sv.protocol == PROTOCOL_NEHAHRABJP || sv.protocol == PROTOCOL_NEHAHRABJP2 || sv.protocol == PROTOCOL_NEHAHRABJP3)
2606                                 large = false;
2607                 }
2608
2609                 // add to the message
2610                 if (large)
2611                         MSG_WriteByte (&sv.signon, svc_spawnbaseline2);
2612                 else
2613                         MSG_WriteByte (&sv.signon, svc_spawnbaseline);
2614                 MSG_WriteShort (&sv.signon, entnum);
2615
2616                 if (large)
2617                 {
2618                         MSG_WriteShort (&sv.signon, svent->priv.server->baseline.modelindex);
2619                         MSG_WriteShort (&sv.signon, svent->priv.server->baseline.frame);
2620                 }
2621                 else if (sv.protocol == PROTOCOL_NEHAHRABJP || sv.protocol == PROTOCOL_NEHAHRABJP2 || sv.protocol == PROTOCOL_NEHAHRABJP3)
2622                 {
2623                         MSG_WriteShort (&sv.signon, svent->priv.server->baseline.modelindex);
2624                         MSG_WriteByte (&sv.signon, svent->priv.server->baseline.frame);
2625                 }
2626                 else
2627                 {
2628                         MSG_WriteByte (&sv.signon, svent->priv.server->baseline.modelindex);
2629                         MSG_WriteByte (&sv.signon, svent->priv.server->baseline.frame);
2630                 }
2631                 MSG_WriteByte (&sv.signon, svent->priv.server->baseline.colormap);
2632                 MSG_WriteByte (&sv.signon, svent->priv.server->baseline.skin);
2633                 for (i=0 ; i<3 ; i++)
2634                 {
2635                         MSG_WriteCoord(&sv.signon, svent->priv.server->baseline.origin[i], sv.protocol);
2636                         MSG_WriteAngle(&sv.signon, svent->priv.server->baseline.angles[i], sv.protocol);
2637                 }
2638         }
2639 }
2640
2641 /*
2642 ================
2643 SV_Prepare_CSQC
2644
2645 Load csprogs.dat and comperss it so it doesn't need to be
2646 reloaded on request.
2647 ================
2648 */
2649 void SV_Prepare_CSQC(void)
2650 {
2651         fs_offset_t progsize;
2652
2653         if(svs.csqc_progdata)
2654         {
2655                 Con_DPrintf("Unloading old CSQC data.\n");
2656                 Mem_Free(svs.csqc_progdata);
2657                 if(svs.csqc_progdata_deflated)
2658                         Mem_Free(svs.csqc_progdata_deflated);
2659         }
2660
2661         svs.csqc_progdata = NULL;
2662         svs.csqc_progdata_deflated = NULL;
2663
2664         Con_Print("Loading csprogs.dat\n");
2665
2666         sv.csqc_progname[0] = 0;
2667         svs.csqc_progdata = FS_LoadFile(csqc_progname.string, sv_mempool, false, &progsize);
2668
2669         if(progsize > 0)
2670         {
2671                 size_t deflated_size;
2672
2673                 sv.csqc_progsize = (int)progsize;
2674                 sv.csqc_progcrc = CRC_Block(svs.csqc_progdata, progsize);
2675                 strlcpy(sv.csqc_progname, csqc_progname.string, sizeof(sv.csqc_progname));
2676                 Con_Printf("server detected csqc progs file \"%s\" with size %i and crc %i\n", sv.csqc_progname, sv.csqc_progsize, sv.csqc_progcrc);
2677
2678                 Con_Print("Compressing csprogs.dat\n");
2679                 //unsigned char *FS_Deflate(const unsigned char *data, size_t size, size_t *deflated_size, int level, mempool_t *mempool);
2680                 svs.csqc_progdata_deflated = FS_Deflate(svs.csqc_progdata, progsize, &deflated_size, -1, sv_mempool);
2681                 svs.csqc_progsize_deflated = (int)deflated_size;
2682                 Con_Printf("Deflated: %g%%\n", 100.0 - 100.0 * (deflated_size / (float)progsize));
2683                 Con_DPrintf("Uncompressed: %u\nCompressed:   %u\n", (unsigned)sv.csqc_progsize, (unsigned)svs.csqc_progsize_deflated);
2684         }
2685 }
2686
2687 /*
2688 ================
2689 SV_SaveSpawnparms
2690
2691 Grabs the current state of each client for saving across the
2692 transition to another level
2693 ================
2694 */
2695 void SV_SaveSpawnparms (void)
2696 {
2697         int             i, j;
2698
2699         svs.serverflags = (int)prog->globals.server->serverflags;
2700
2701         for (i = 0, host_client = svs.clients;i < svs.maxclients;i++, host_client++)
2702         {
2703                 if (!host_client->active)
2704                         continue;
2705
2706         // call the progs to get default spawn parms for the new client
2707                 prog->globals.server->self = PRVM_EDICT_TO_PROG(host_client->edict);
2708                 PRVM_ExecuteProgram (prog->globals.server->SetChangeParms, "QC function SetChangeParms is missing");
2709                 for (j=0 ; j<NUM_SPAWN_PARMS ; j++)
2710                         host_client->spawn_parms[j] = (&prog->globals.server->parm1)[j];
2711         }
2712 }
2713
2714 /*
2715 ================
2716 SV_SpawnServer
2717
2718 This is called at the start of each level
2719 ================
2720 */
2721
2722 void SV_SpawnServer (const char *server)
2723 {
2724         prvm_edict_t *ent;
2725         int i;
2726         char *entities;
2727         dp_model_t *worldmodel;
2728         char modelname[sizeof(sv.modelname)];
2729
2730         Con_DPrintf("SpawnServer: %s\n", server);
2731
2732         dpsnprintf (modelname, sizeof(modelname), "maps/%s.bsp", server);
2733
2734         if (!FS_FileExists(modelname))
2735         {
2736                 Con_Printf("SpawnServer: no map file named %s\n", modelname);
2737                 return;
2738         }
2739
2740         if (cls.state != ca_dedicated)
2741         {
2742                 SCR_BeginLoadingPlaque();
2743                 S_StopAllSounds();
2744         }
2745
2746         if(sv.active)
2747         {
2748                 SV_VM_Begin();
2749                 if(prog->funcoffsets.SV_Shutdown)
2750                 {
2751                         func_t s = prog->funcoffsets.SV_Shutdown;
2752                         prog->funcoffsets.SV_Shutdown = 0; // prevent it from getting called again
2753                         PRVM_ExecuteProgram(s,"SV_Shutdown() required");
2754                 }
2755                 SV_VM_End();
2756         }
2757
2758         // free q3 shaders so that any newly downloaded shaders will be active
2759         Mod_FreeQ3Shaders();
2760
2761         worldmodel = Mod_ForName(modelname, false, true, NULL);
2762         if (!worldmodel || !worldmodel->TraceBox)
2763         {
2764                 Con_Printf("Couldn't load map %s\n", modelname);
2765                 return;
2766         }
2767
2768         // let's not have any servers with no name
2769         if (hostname.string[0] == 0)
2770                 Cvar_Set ("hostname", "UNNAMED");
2771         scr_centertime_off = 0;
2772
2773         svs.changelevel_issued = false;         // now safe to issue another
2774
2775         // make the map a required file for clients
2776         Curl_ClearRequirements();
2777         Curl_RequireFile(modelname);
2778
2779 //
2780 // tell all connected clients that we are going to a new level
2781 //
2782         if (sv.active)
2783         {
2784                 client_t *client;
2785                 for (i = 0, client = svs.clients;i < svs.maxclients;i++, client++)
2786                 {
2787                         if (client->netconnection)
2788                         {
2789                                 MSG_WriteByte(&client->netconnection->message, svc_stufftext);
2790                                 MSG_WriteString(&client->netconnection->message, "reconnect\n");
2791                         }
2792                 }
2793         }
2794         else
2795         {
2796                 // open server port
2797                 NetConn_OpenServerPorts(true);
2798         }
2799
2800 //
2801 // make cvars consistant
2802 //
2803         if (coop.integer)
2804                 Cvar_SetValue ("deathmatch", 0);
2805         // LordHavoc: it can be useful to have skills outside the range 0-3...
2806         //current_skill = bound(0, (int)(skill.value + 0.5), 3);
2807         //Cvar_SetValue ("skill", (float)current_skill);
2808         current_skill = (int)(skill.value + 0.5);
2809
2810 //
2811 // set up the new server
2812 //
2813         memset (&sv, 0, sizeof(sv));
2814         // if running a local client, make sure it doesn't try to access the last
2815         // level's data which is no longer valiud
2816         cls.signon = 0;
2817
2818         Cvar_SetValue("halflifebsp", worldmodel->brush.ishlbsp);
2819
2820         if(*sv_random_seed.string)
2821         {
2822                 srand(sv_random_seed.integer);
2823                 Con_Printf("NOTE: random seed is %d; use for debugging/benchmarking only!\nUnset sv_random_seed to get real random numbers again.\n", sv_random_seed.integer);
2824         }
2825
2826         SV_VM_Setup();
2827
2828         sv.active = true;
2829
2830         strlcpy (sv.name, server, sizeof (sv.name));
2831
2832         sv.protocol = Protocol_EnumForName(sv_protocolname.string);
2833         if (sv.protocol == PROTOCOL_UNKNOWN)
2834         {
2835                 char buffer[1024];
2836                 Protocol_Names(buffer, sizeof(buffer));
2837                 Con_Printf("Unknown sv_protocolname \"%s\", valid values are:\n%s\n", sv_protocolname.string, buffer);
2838                 sv.protocol = PROTOCOL_QUAKE;
2839         }
2840
2841         SV_VM_Begin();
2842
2843 // load progs to get entity field count
2844         //PR_LoadProgs ( sv_progs.string );
2845
2846         sv.datagram.maxsize = sizeof(sv.datagram_buf);
2847         sv.datagram.cursize = 0;
2848         sv.datagram.data = sv.datagram_buf;
2849
2850         sv.reliable_datagram.maxsize = sizeof(sv.reliable_datagram_buf);
2851         sv.reliable_datagram.cursize = 0;
2852         sv.reliable_datagram.data = sv.reliable_datagram_buf;
2853
2854         sv.signon.maxsize = sizeof(sv.signon_buf);
2855         sv.signon.cursize = 0;
2856         sv.signon.data = sv.signon_buf;
2857
2858 // leave slots at start for clients only
2859         //prog->num_edicts = svs.maxclients+1;
2860
2861         sv.state = ss_loading;
2862         prog->allowworldwrites = true;
2863         sv.paused = false;
2864
2865         prog->globals.server->time = sv.time = 1.0;
2866
2867         Mod_ClearUsed();
2868         worldmodel->used = true;
2869
2870         strlcpy (sv.name, server, sizeof (sv.name));
2871         strlcpy(sv.modelname, modelname, sizeof(sv.modelname));
2872         sv.worldmodel = worldmodel;
2873         sv.models[1] = sv.worldmodel;
2874
2875 //
2876 // clear world interaction links
2877 //
2878         World_SetSize(&sv.world, sv.worldmodel->name, sv.worldmodel->normalmins, sv.worldmodel->normalmaxs);
2879
2880         strlcpy(sv.sound_precache[0], "", sizeof(sv.sound_precache[0]));
2881
2882         strlcpy(sv.model_precache[0], "", sizeof(sv.model_precache[0]));
2883         strlcpy(sv.model_precache[1], sv.modelname, sizeof(sv.model_precache[1]));
2884         for (i = 1;i < sv.worldmodel->brush.numsubmodels;i++)
2885         {
2886                 dpsnprintf(sv.model_precache[i+1], sizeof(sv.model_precache[i+1]), "*%i", i);
2887                 sv.models[i+1] = Mod_ForName (sv.model_precache[i+1], false, false, sv.modelname);
2888         }
2889
2890 //
2891 // load the rest of the entities
2892 //
2893         // AK possible hack since num_edicts is still 0
2894         ent = PRVM_EDICT_NUM(0);
2895         memset (ent->fields.server, 0, prog->progs->entityfields * 4);
2896         ent->priv.server->free = false;
2897         ent->fields.server->model = PRVM_SetEngineString(sv.modelname);
2898         ent->fields.server->modelindex = 1;             // world model
2899         ent->fields.server->solid = SOLID_BSP;
2900         ent->fields.server->movetype = MOVETYPE_PUSH;
2901         VectorCopy(sv.world.mins, ent->fields.server->mins);
2902         VectorCopy(sv.world.maxs, ent->fields.server->maxs);
2903         VectorCopy(sv.world.mins, ent->fields.server->absmin);
2904         VectorCopy(sv.world.maxs, ent->fields.server->absmax);
2905
2906         if (coop.value)
2907                 prog->globals.server->coop = coop.integer;
2908         else
2909                 prog->globals.server->deathmatch = deathmatch.integer;
2910
2911         prog->globals.server->mapname = PRVM_SetEngineString(sv.name);
2912
2913 // serverflags are for cross level information (sigils)
2914         prog->globals.server->serverflags = svs.serverflags;
2915
2916         // we need to reset the spawned flag on all connected clients here so that
2917         // their thinks don't run during startup (before PutClientInServer)
2918         // we also need to set up the client entities now
2919         // and we need to set the ->edict pointers to point into the progs edicts
2920         for (i = 0, host_client = svs.clients;i < svs.maxclients;i++, host_client++)
2921         {
2922                 host_client->spawned = false;
2923                 host_client->edict = PRVM_EDICT_NUM(i + 1);
2924                 PRVM_ED_ClearEdict(host_client->edict);
2925         }
2926
2927         // load replacement entity file if found
2928         if (sv_entpatch.integer && (entities = (char *)FS_LoadFile(va("maps/%s.ent", sv.name), tempmempool, true, NULL)))
2929         {
2930                 Con_Printf("Loaded maps/%s.ent\n", sv.name);
2931                 PRVM_ED_LoadFromFile (entities);
2932                 Mem_Free(entities);
2933         }
2934         else
2935                 PRVM_ED_LoadFromFile (sv.worldmodel->brush.entities);
2936
2937
2938         // LordHavoc: clear world angles (to fix e3m3.bsp)
2939         VectorClear(prog->edicts->fields.server->angles);
2940
2941 // all setup is completed, any further precache statements are errors
2942 //      sv.state = ss_active; // LordHavoc: workaround for svc_precache bug
2943         prog->allowworldwrites = false;
2944
2945 // run two frames to allow everything to settle
2946         prog->globals.server->time = sv.time = 1.0001;
2947         for (i = 0;i < 2;i++)
2948         {
2949                 sv.frametime = 0.1;
2950                 SV_Physics ();
2951         }
2952
2953         if (cls.state == ca_dedicated)
2954                 Mod_PurgeUnused();
2955
2956 // create a baseline for more efficient communications
2957         if (sv.protocol == PROTOCOL_QUAKE || sv.protocol == PROTOCOL_QUAKEDP || sv.protocol == PROTOCOL_NEHAHRAMOVIE || sv.protocol == PROTOCOL_NEHAHRABJP || sv.protocol == PROTOCOL_NEHAHRABJP2 || sv.protocol == PROTOCOL_NEHAHRABJP3)
2958                 SV_CreateBaseline ();
2959
2960         sv.state = ss_active; // LordHavoc: workaround for svc_precache bug
2961
2962         // to prevent network timeouts
2963         realtime = Sys_DoubleTime();
2964
2965 // send serverinfo to all connected clients, and set up botclients coming back from a level change
2966         for (i = 0, host_client = svs.clients;i < svs.maxclients;i++, host_client++)
2967         {
2968                 host_client->clientconnectcalled = false; // do NOT call ClientDisconnect if he drops before ClientConnect!
2969                 if (!host_client->active)
2970                         continue;
2971                 if (host_client->netconnection)
2972                         SV_SendServerinfo(host_client);
2973                 else
2974                 {
2975                         int j;
2976                         // if client is a botclient coming from a level change, we need to
2977                         // set up client info that normally requires networking
2978
2979                         // copy spawn parms out of the client_t
2980                         for (j=0 ; j< NUM_SPAWN_PARMS ; j++)
2981                                 (&prog->globals.server->parm1)[j] = host_client->spawn_parms[j];
2982
2983                         // call the spawn function
2984                         host_client->clientconnectcalled = true;
2985                         prog->globals.server->time = sv.time;
2986                         prog->globals.server->self = PRVM_EDICT_TO_PROG(host_client->edict);
2987                         PRVM_ExecuteProgram (prog->globals.server->ClientConnect, "QC function ClientConnect is missing");
2988                         PRVM_ExecuteProgram (prog->globals.server->PutClientInServer, "QC function PutClientInServer is missing");
2989                         host_client->spawned = true;
2990                 }
2991         }
2992
2993         Con_DPrint("Server spawned.\n");
2994         NetConn_Heartbeat (2);
2995
2996         SV_VM_End();
2997 }
2998
2999 /////////////////////////////////////////////////////
3000 // SV VM stuff
3001
3002 static void SV_VM_CB_BeginIncreaseEdicts(void)
3003 {
3004         // links don't survive the transition, so unlink everything
3005         World_UnlinkAll(&sv.world);
3006 }
3007
3008 static void SV_VM_CB_EndIncreaseEdicts(void)
3009 {
3010         int i;
3011         prvm_edict_t *ent;
3012
3013         // link every entity except world
3014         for (i = 1, ent = prog->edicts;i < prog->max_edicts;i++, ent++)
3015                 if (!ent->priv.server->free)
3016                         SV_LinkEdict(ent, false);
3017 }
3018
3019 static void SV_VM_CB_InitEdict(prvm_edict_t *e)
3020 {
3021         // LordHavoc: for consistency set these here
3022         int num = PRVM_NUM_FOR_EDICT(e) - 1;
3023
3024         e->priv.server->move = false; // don't move on first frame
3025
3026         if (num >= 0 && num < svs.maxclients)
3027         {
3028                 prvm_eval_t *val;
3029                 // set colormap and team on newly created player entity
3030                 e->fields.server->colormap = num + 1;
3031                 e->fields.server->team = (svs.clients[num].colors & 15) + 1;
3032                 // set netname/clientcolors back to client values so that
3033                 // DP_SV_CLIENTNAME and DP_SV_CLIENTCOLORS will not immediately
3034                 // reset them
3035                 e->fields.server->netname = PRVM_SetEngineString(svs.clients[num].name);
3036                 if ((val = PRVM_EDICTFIELDVALUE(e, prog->fieldoffsets.clientcolors)))
3037                         val->_float = svs.clients[num].colors;
3038                 // NEXUIZ_PLAYERMODEL and NEXUIZ_PLAYERSKIN
3039                 if( prog->fieldoffsets.playermodel >= 0 )
3040                         PRVM_EDICTFIELDVALUE(e, prog->fieldoffsets.playermodel)->string = PRVM_SetEngineString(svs.clients[num].playermodel);
3041                 if( prog->fieldoffsets.playerskin >= 0 )
3042                         PRVM_EDICTFIELDVALUE(e, prog->fieldoffsets.playerskin)->string = PRVM_SetEngineString(svs.clients[num].playerskin);
3043                 // Assign netaddress (IP Address, etc)
3044                 if(prog->fieldoffsets.netaddress >= 0)
3045                 { // Valid Field; Process
3046                         if(svs.clients[num].netconnection != NULL)
3047                         {// Valid Address; Assign
3048                                 // Acquire Readable Address
3049                                 LHNETADDRESS_ToString(&svs.clients[num].netconnection->peeraddress, svs.clients[num].netaddress, sizeof(svs.clients[num].netaddress), false);
3050                                 PRVM_EDICTFIELDVALUE(e, prog->fieldoffsets.netaddress)->string = PRVM_SetEngineString(svs.clients[num].netaddress);
3051                         }
3052                         else
3053                                 // Invalid / Bot
3054                                 PRVM_EDICTFIELDVALUE(e, prog->fieldoffsets.netaddress)->string = PRVM_SetEngineString("null/botclient");
3055                 }
3056         }
3057 }
3058
3059 static void SV_VM_CB_FreeEdict(prvm_edict_t *ed)
3060 {
3061         int i;
3062         int e;
3063
3064         World_UnlinkEdict(ed);          // unlink from world bsp
3065
3066         ed->fields.server->model = 0;
3067         ed->fields.server->takedamage = 0;
3068         ed->fields.server->modelindex = 0;
3069         ed->fields.server->colormap = 0;
3070         ed->fields.server->skin = 0;
3071         ed->fields.server->frame = 0;
3072         VectorClear(ed->fields.server->origin);
3073         VectorClear(ed->fields.server->angles);
3074         ed->fields.server->nextthink = -1;
3075         ed->fields.server->solid = 0;
3076
3077         // make sure csqc networking is aware of the removed entity
3078         e = PRVM_NUM_FOR_EDICT(ed);
3079         sv.csqcentityversion[e] = 0;
3080         for (i = 0;i < svs.maxclients;i++)
3081         {
3082                 if (svs.clients[i].csqcentityscope[e])
3083                         svs.clients[i].csqcentityscope[e] = 1; // removed, awaiting send
3084                 svs.clients[i].csqcentitysendflags[e] = 0xFFFFFF;
3085         }
3086 }
3087
3088 static void SV_VM_CB_CountEdicts(void)
3089 {
3090         int             i;
3091         prvm_edict_t    *ent;
3092         int             active, models, solid, step;
3093
3094         active = models = solid = step = 0;
3095         for (i=0 ; i<prog->num_edicts ; i++)
3096         {
3097                 ent = PRVM_EDICT_NUM(i);
3098                 if (ent->priv.server->free)
3099                         continue;
3100                 active++;
3101                 if (ent->fields.server->solid)
3102                         solid++;
3103                 if (ent->fields.server->model)
3104                         models++;
3105                 if (ent->fields.server->movetype == MOVETYPE_STEP)
3106                         step++;
3107         }
3108
3109         Con_Printf("num_edicts:%3i\n", prog->num_edicts);
3110         Con_Printf("active    :%3i\n", active);
3111         Con_Printf("view      :%3i\n", models);
3112         Con_Printf("touch     :%3i\n", solid);
3113         Con_Printf("step      :%3i\n", step);
3114 }
3115
3116 static qboolean SV_VM_CB_LoadEdict(prvm_edict_t *ent)
3117 {
3118         // remove things from different skill levels or deathmatch
3119         if (gamemode != GAME_TRANSFUSION) //Transfusion does this in QC
3120         {
3121                 if (deathmatch.integer)
3122                 {
3123                         if (((int)ent->fields.server->spawnflags & SPAWNFLAG_NOT_DEATHMATCH))
3124                         {
3125                                 return false;
3126                         }
3127                 }
3128                 else if ((current_skill <= 0 && ((int)ent->fields.server->spawnflags & SPAWNFLAG_NOT_EASY  ))
3129                         || (current_skill == 1 && ((int)ent->fields.server->spawnflags & SPAWNFLAG_NOT_MEDIUM))
3130                         || (current_skill >= 2 && ((int)ent->fields.server->spawnflags & SPAWNFLAG_NOT_HARD  )))
3131                 {
3132                         return false;
3133                 }
3134         }
3135         return true;
3136 }
3137
3138 static void SV_VM_Setup(void)
3139 {
3140         PRVM_Begin;
3141         PRVM_InitProg( PRVM_SERVERPROG );
3142
3143         // allocate the mempools
3144         // TODO: move the magic numbers/constants into #defines [9/13/2006 Black]
3145         prog->progs_mempool = Mem_AllocPool("Server Progs", 0, NULL);
3146         prog->builtins = vm_sv_builtins;
3147         prog->numbuiltins = vm_sv_numbuiltins;
3148         prog->headercrc = PROGHEADER_CRC;
3149         prog->headercrc2 = PROGHEADER_CRC_TENEBRAE;
3150         prog->max_edicts = 512;
3151         if (sv.protocol == PROTOCOL_QUAKE)
3152                 prog->limit_edicts = 640; // before quake mission pack 1 this was 512
3153         else if (sv.protocol == PROTOCOL_QUAKEDP)
3154                 prog->limit_edicts = 2048; // guessing
3155         else if (sv.protocol == PROTOCOL_NEHAHRAMOVIE)
3156                 prog->limit_edicts = 2048; // guessing!
3157         else if (sv.protocol == PROTOCOL_NEHAHRABJP || sv.protocol == PROTOCOL_NEHAHRABJP2 || sv.protocol == PROTOCOL_NEHAHRABJP3)
3158                 prog->limit_edicts = 4096; // guessing!
3159         else
3160                 prog->limit_edicts = MAX_EDICTS;
3161         prog->reserved_edicts = svs.maxclients;
3162         prog->edictprivate_size = sizeof(edict_engineprivate_t);
3163         prog->name = "server";
3164         prog->extensionstring = vm_sv_extensions;
3165         prog->loadintoworld = true;
3166
3167         prog->begin_increase_edicts = SV_VM_CB_BeginIncreaseEdicts;
3168         prog->end_increase_edicts = SV_VM_CB_EndIncreaseEdicts;
3169         prog->init_edict = SV_VM_CB_InitEdict;
3170         prog->free_edict = SV_VM_CB_FreeEdict;
3171         prog->count_edicts = SV_VM_CB_CountEdicts;
3172         prog->load_edict = SV_VM_CB_LoadEdict;
3173         prog->init_cmd = VM_SV_Cmd_Init;
3174         prog->reset_cmd = VM_SV_Cmd_Reset;
3175         prog->error_cmd = Host_Error;
3176
3177         // TODO: add a requiredfuncs list (ask LH if this is necessary at all)
3178         PRVM_LoadProgs( sv_progs.string, 0, NULL, REQFIELDS, reqfields, 0, NULL );
3179
3180         // some mods compiled with scrambling compilers lack certain critical
3181         // global names and field names such as "self" and "time" and "nextthink"
3182         // so we have to set these offsets manually, matching the entvars_t
3183         PRVM_ED_FindFieldOffset_FromStruct(entvars_t, angles);
3184         PRVM_ED_FindFieldOffset_FromStruct(entvars_t, chain);
3185         PRVM_ED_FindFieldOffset_FromStruct(entvars_t, classname);
3186         PRVM_ED_FindFieldOffset_FromStruct(entvars_t, frame);
3187         PRVM_ED_FindFieldOffset_FromStruct(entvars_t, groundentity);
3188         PRVM_ED_FindFieldOffset_FromStruct(entvars_t, ideal_yaw);
3189         PRVM_ED_FindFieldOffset_FromStruct(entvars_t, nextthink);
3190         PRVM_ED_FindFieldOffset_FromStruct(entvars_t, think);
3191         PRVM_ED_FindFieldOffset_FromStruct(entvars_t, yaw_speed);
3192         PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, self);
3193         PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, time);
3194         PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, v_forward);
3195         PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, v_right);
3196         PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, v_up);
3197         PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, trace_allsolid);
3198         PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, trace_startsolid);
3199         PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, trace_fraction);
3200         PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, trace_inwater);
3201         PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, trace_inopen);
3202         PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, trace_endpos);
3203         PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, trace_plane_normal);
3204         PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, trace_plane_dist);
3205         PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, trace_ent);
3206         // OP_STATE is always supported on server (due to entvars_t)
3207         prog->flag |= PRVM_OP_STATE;
3208
3209         VM_CustomStats_Clear();//[515]: csqc
3210
3211         PRVM_End;
3212
3213         SV_Prepare_CSQC();
3214 }
3215
3216 void SV_VM_Begin(void)
3217 {
3218         PRVM_Begin;
3219         PRVM_SetProg( PRVM_SERVERPROG );
3220
3221         prog->globals.server->time = (float) sv.time;
3222 }
3223
3224 void SV_VM_End(void)
3225 {
3226         PRVM_End;
3227 }