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