sv_main.c

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