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 #include "thread.h"
  27
  28 // current client
  29 client_t *host_client;
  30
  31 static void SV_SaveEntFile_f(cmd_state_t *cmd);
  32 static void SV_StartDownload_f(cmd_state_t *cmd);
  33 static void SV_Download_f(cmd_state_t *cmd);
  34 static void SV_VM_Setup(void);
  35 extern cvar_t net_connecttimeout;
  36
  37 cvar_t sv_worldmessage = {CVAR_SERVER | CVAR_READONLY, "sv_worldmessage", "", "title of current level"};
  38 cvar_t sv_worldname = {CVAR_SERVER | CVAR_READONLY, "sv_worldname", "", "name of current worldmodel"};
  39 cvar_t sv_worldnamenoextension = {CVAR_SERVER | CVAR_READONLY, "sv_worldnamenoextension", "", "name of current worldmodel without extension"};
  40 cvar_t sv_worldbasename = {CVAR_SERVER | CVAR_READONLY, "sv_worldbasename", "", "name of current worldmodel without maps/ prefix or extension"};
  41
  42 cvar_t sv_disablenotify = {CVAR_SERVER, "sv_disablenotify", "0", "suppress broadcast prints when certain cvars are changed (CVAR_NOTIFY flag in engine code)"};
  43 cvar_t coop = {CVAR_SERVER, "coop","0", "coop mode, 0 = no coop, 1 = coop mode, multiple players playing through the singleplayer game (coop mode also shuts off deathmatch)"};
  44 cvar_t deathmatch = {CVAR_SERVER, "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)"};
  45 cvar_t fraglimit = {CVAR_SERVER | CVAR_NOTIFY, "fraglimit","0", "ends level if this many frags is reached by any player"};
  46 cvar_t gamecfg = {CVAR_SERVER, "gamecfg", "0", "unused cvar in quake, can be used by mods"};
  47 cvar_t noexit = {CVAR_SERVER | CVAR_NOTIFY, "noexit","0", "kills anyone attempting to use an exit"};
  48 cvar_t nomonsters = {CVAR_SERVER, "nomonsters", "0", "unused cvar in quake, can be used by mods"};
  49 cvar_t pausable = {CVAR_SERVER, "pausable","1", "allow players to pause or not (otherwise, only the server admin can)"};
  50 cvar_t pr_checkextension = {CVAR_SERVER | 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)"};
  51 cvar_t samelevel = {CVAR_SERVER | CVAR_NOTIFY, "samelevel","0", "repeats same level if level ends (due to timelimit or someone hitting an exit)"};
  52 cvar_t skill = {CVAR_SERVER, "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)"};
  53 cvar_t host_timescale = {CVAR_CLIENT | CVAR_SERVER, "host_timescale", "1.0", "controls game speed, 0.5 is half speed, 2 is double speed"};
  54
  55 cvar_t sv_accelerate = {CVAR_SERVER, "sv_accelerate", "10", "rate at which a player accelerates to sv_maxspeed"};
  56 cvar_t sv_aim = {CVAR_SERVER | 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"};
  57 cvar_t sv_airaccel_qw = {CVAR_SERVER, "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"};
  58 cvar_t sv_airaccel_qw_stretchfactor = {CVAR_SERVER, "sv_airaccel_qw_stretchfactor", "0", "when set, the maximum acceleration increase the player may get compared to forward-acceleration when strafejumping"};
  59 cvar_t sv_airaccel_sideways_friction = {CVAR_SERVER, "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"};
  60 cvar_t sv_airaccelerate = {CVAR_SERVER, "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"};
  61 cvar_t sv_airstopaccelerate = {CVAR_SERVER, "sv_airstopaccelerate", "0", "when set, replacement for sv_airaccelerate when moving backwards"};
  62 cvar_t sv_airspeedlimit_nonqw = {CVAR_SERVER, "sv_airspeedlimit_nonqw", "0", "when set, this is a soft speed limit while in air when using airaccel_qw not equal to 1"};
  63 cvar_t sv_airstrafeaccelerate = {CVAR_SERVER, "sv_airstrafeaccelerate", "0", "when set, replacement for sv_airaccelerate when just strafing"};
  64 cvar_t sv_maxairstrafespeed = {CVAR_SERVER, "sv_maxairstrafespeed", "0", "when set, replacement for sv_maxairspeed when just strafing"};
  65 cvar_t sv_airstrafeaccel_qw = {CVAR_SERVER, "sv_airstrafeaccel_qw", "0", "when set, replacement for sv_airaccel_qw when just strafing"};
  66 cvar_t sv_aircontrol = {CVAR_SERVER, "sv_aircontrol", "0", "CPMA-style air control"};
  67 cvar_t sv_aircontrol_power = {CVAR_SERVER, "sv_aircontrol_power", "2", "CPMA-style air control exponent"};
  68 cvar_t sv_aircontrol_penalty = {CVAR_SERVER, "sv_aircontrol_penalty", "0", "deceleration while using CPMA-style air control"};
  69 cvar_t sv_allowdownloads = {CVAR_SERVER, "sv_allowdownloads", "1", "whether to allow clients to download files from the server (does not affect http downloads)"};
  70 cvar_t sv_allowdownloads_archive = {CVAR_SERVER, "sv_allowdownloads_archive", "0", "whether to allow downloads of archives (pak/pk3)"};
  71 cvar_t sv_allowdownloads_config = {CVAR_SERVER, "sv_allowdownloads_config", "0", "whether to allow downloads of config files (cfg)"};
  72 cvar_t sv_allowdownloads_dlcache = {CVAR_SERVER, "sv_allowdownloads_dlcache", "0", "whether to allow downloads of dlcache files (dlcache/)"};
  73 cvar_t sv_allowdownloads_inarchive = {CVAR_SERVER, "sv_allowdownloads_inarchive", "0", "whether to allow downloads from archives (pak/pk3)"};
  74 cvar_t sv_areagrid_mingridsize = {CVAR_SERVER | CVAR_NOTIFY, "sv_areagrid_mingridsize", "128", "minimum areagrid cell size, smaller values work better for lots of small objects, higher values for large objects"};
  75 cvar_t sv_checkforpacketsduringsleep = {CVAR_SERVER, "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"};
  76 cvar_t sv_clmovement_enable = {CVAR_SERVER, "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"};
  77 cvar_t sv_clmovement_minping = {CVAR_SERVER, "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)"};
  78 cvar_t sv_clmovement_minping_disabletime = {CVAR_SERVER, "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)"};
  79 cvar_t sv_clmovement_inputtimeout = {CVAR_SERVER, "sv_clmovement_inputtimeout", "0.2", "when a client does not send input for this many seconds, force them to move anyway (unlike QuakeWorld)"};
  80 cvar_t sv_cullentities_nevercullbmodels = {CVAR_SERVER, "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!)"};
  81 cvar_t sv_cullentities_pvs = {CVAR_SERVER, "sv_cullentities_pvs", "1", "fast but loose culling of hidden entities"};
  82 cvar_t sv_cullentities_stats = {CVAR_SERVER, "sv_cullentities_stats", "0", "displays stats on network entities culled by various methods for each client"};
  83 cvar_t sv_cullentities_trace = {CVAR_SERVER, "sv_cullentities_trace", "0", "somewhat slow but very tight culling of hidden entities, minimizes network traffic and makes wallhack cheats useless"};
  84 cvar_t sv_cullentities_trace_delay = {CVAR_SERVER, "sv_cullentities_trace_delay", "1", "number of seconds until the entity gets actually culled"};
  85 cvar_t sv_cullentities_trace_delay_players = {CVAR_SERVER, "sv_cullentities_trace_delay_players", "0.2", "number of seconds until the entity gets actually culled if it is a player entity"};
  86 cvar_t sv_cullentities_trace_enlarge = {CVAR_SERVER, "sv_cullentities_trace_enlarge", "0", "box enlargement for entity culling"};
  87 cvar_t sv_cullentities_trace_expand = {CVAR_SERVER, "sv_cullentities_trace_expand", "0", "box is expanded by this many units for entity culling"};
  88 cvar_t sv_cullentities_trace_eyejitter = {CVAR_SERVER, "sv_cullentities_trace_eyejitter", "16", "jitter the eye by this much for each trace"};
  89 cvar_t sv_cullentities_trace_prediction = {CVAR_SERVER, "sv_cullentities_trace_prediction", "1", "also trace from the predicted player position"};
  90 cvar_t sv_cullentities_trace_prediction_time = {CVAR_SERVER, "sv_cullentities_trace_prediction_time", "0.2", "how many seconds of prediction to use"};
  91 cvar_t sv_cullentities_trace_entityocclusion = {CVAR_SERVER, "sv_cullentities_trace_entityocclusion", "0", "also check if doors and other bsp models are in the way"};
  92 cvar_t sv_cullentities_trace_samples = {CVAR_SERVER, "sv_cullentities_trace_samples", "2", "number of samples to test for entity culling"};
  93 cvar_t sv_cullentities_trace_samples_extra = {CVAR_SERVER, "sv_cullentities_trace_samples_extra", "2", "number of samples to test for entity culling when the entity affects its surroundings by e.g. dlight"};
  94 cvar_t sv_cullentities_trace_samples_players = {CVAR_SERVER, "sv_cullentities_trace_samples_players", "8", "number of samples to test for entity culling when the entity is a player entity"};
  95 cvar_t sv_debugmove = {CVAR_SERVER | CVAR_NOTIFY, "sv_debugmove", "0", "disables collision detection optimizations for debugging purposes"};
  96 cvar_t sv_echobprint = {CVAR_SERVER | CVAR_SAVE, "sv_echobprint", "1", "prints gamecode bprint() calls to server console"};
  97 cvar_t sv_edgefriction = {CVAR_SERVER, "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)"};
  98 cvar_t sv_entpatch = {CVAR_SERVER, "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)"};
  99 cvar_t sv_freezenonclients = {CVAR_SERVER | CVAR_NOTIFY, "sv_freezenonclients", "0", "freezes time, except for players, allowing you to walk around and take screenshots of explosions"};
 100 cvar_t sv_friction = {CVAR_SERVER | CVAR_NOTIFY, "sv_friction","4", "how fast you slow down"};
 101 cvar_t sv_gameplayfix_blowupfallenzombies = {CVAR_SERVER, "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"};
 102 cvar_t sv_gameplayfix_consistentplayerprethink = {CVAR_SERVER, "sv_gameplayfix_consistentplayerprethink", "0", "improves fairness in multiplayer by running all PlayerPreThink functions (which fire weapons) before performing physics, then running all PlayerPostThink functions"};
 103 cvar_t sv_gameplayfix_delayprojectiles = {CVAR_SERVER, "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"};
 104 cvar_t sv_gameplayfix_droptofloorstartsolid = {CVAR_SERVER, "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)"};
 105 cvar_t sv_gameplayfix_droptofloorstartsolid_nudgetocorrect = {CVAR_SERVER, "sv_gameplayfix_droptofloorstartsolid_nudgetocorrect", "1", "tries to nudge stuck items and monsters out of walls before droptofloor is performed"};
 106 cvar_t sv_gameplayfix_easierwaterjump = {CVAR_SERVER, "sv_gameplayfix_easierwaterjump", "1", "changes water jumping to make it easier to get out of water (exactly like in QuakeWorld)"};
 107 cvar_t sv_gameplayfix_findradiusdistancetobox = {CVAR_SERVER, "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"};
 108 cvar_t sv_gameplayfix_gravityunaffectedbyticrate = {CVAR_SERVER, "sv_gameplayfix_gravityunaffectedbyticrate", "0", "fix some ticrate issues in physics."};
 109 cvar_t sv_gameplayfix_grenadebouncedownslopes = {CVAR_SERVER, "sv_gameplayfix_grenadebouncedownslopes", "1", "prevents MOVETYPE_BOUNCE (grenades) from getting stuck when fired down a downward sloping surface"};
 110 cvar_t sv_gameplayfix_multiplethinksperframe = {CVAR_SERVER, "sv_gameplayfix_multiplethinksperframe", "1", "allows entities to think more often than the server framerate, primarily useful for very high fire rate weapons"};
 111 cvar_t sv_gameplayfix_noairborncorpse = {CVAR_SERVER, "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"};
 112 cvar_t sv_gameplayfix_noairborncorpse_allowsuspendeditems = {CVAR_SERVER, "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)"};
 113 cvar_t sv_gameplayfix_nudgeoutofsolid = {CVAR_SERVER, "sv_gameplayfix_nudgeoutofsolid", "0", "attempts to fix physics errors (where an object ended up in solid for some reason)"};
 114 cvar_t sv_gameplayfix_nudgeoutofsolid_separation = {CVAR_SERVER, "sv_gameplayfix_nudgeoutofsolid_separation", "0.03125", "keep objects this distance apart to prevent collision issues on seams"};
 115 cvar_t sv_gameplayfix_q2airaccelerate = {CVAR_SERVER, "sv_gameplayfix_q2airaccelerate", "0", "Quake2-style air acceleration"};
 116 cvar_t sv_gameplayfix_nogravityonground = {CVAR_SERVER, "sv_gameplayfix_nogravityonground", "0", "turn off gravity when on ground (to get rid of sliding)"};
 117 cvar_t sv_gameplayfix_setmodelrealbox = {CVAR_SERVER, "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"};
 118 cvar_t sv_gameplayfix_slidemoveprojectiles = {CVAR_SERVER, "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"};
 119 cvar_t sv_gameplayfix_stepdown = {CVAR_SERVER, "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)"};
 120 cvar_t sv_gameplayfix_stepmultipletimes = {CVAR_SERVER, "sv_gameplayfix_stepmultipletimes", "0", "applies step-up onto a ledge more than once in a single frame, when running quickly up stairs"};
 121 cvar_t sv_gameplayfix_nostepmoveonsteepslopes = {CVAR_SERVER, "sv_gameplayfix_nostepmoveonsteepslopes", "0", "crude fix which prevents MOVETYPE_STEP (not swimming or flying) to move on slopes whose angle is bigger than 45 degree"};
 122 cvar_t sv_gameplayfix_swiminbmodels = {CVAR_SERVER, "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"};
 123 cvar_t sv_gameplayfix_upwardvelocityclearsongroundflag = {CVAR_SERVER, "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"};
 124 cvar_t sv_gameplayfix_downtracesupportsongroundflag = {CVAR_SERVER, "sv_gameplayfix_downtracesupportsongroundflag", "1", "prevents very short moves from clearing onground (which may make the player stick to the floor at high netfps)"};
 125 cvar_t sv_gameplayfix_q1bsptracelinereportstexture = {CVAR_SERVER, "sv_gameplayfix_q1bsptracelinereportstexture", "1", "enables mods to get accurate trace_texture results on q1bsp by using a surface-hitting traceline implementation rather than the standard solidbsp method, q3bsp always reports texture accurately"};
 126 cvar_t sv_gameplayfix_unstickplayers = {CVAR_SERVER, "sv_gameplayfix_unstickplayers", "1", "big hack to try and fix the rare case of MOVETYPE_WALK entities getting stuck in the world clipping hull."};
 127 cvar_t sv_gameplayfix_unstickentities = {CVAR_SERVER, "sv_gameplayfix_unstickentities", "1", "hack to check if entities are crossing world collision hull and try to move them to the right position"};
 128 cvar_t sv_gameplayfix_fixedcheckwatertransition = {CVAR_SERVER, "sv_gameplayfix_fixedcheckwatertransition", "1", "fix two very stupid bugs in SV_CheckWaterTransition when watertype is CONTENTS_EMPTY (the bugs causes waterlevel to be 1 on first frame, -1 on second frame - the fix makes it 0 on both frames)"};
 129 cvar_t sv_gameplayfix_customstats = {CVAR_SERVER, "sv_gameplayfix_customstats", "0", "Disable stats higher than 220, for use by certain games such as Xonotic"};
 130 cvar_t sv_gravity = {CVAR_SERVER | CVAR_NOTIFY, "sv_gravity","800", "how fast you fall (512 = roughly earth gravity)"};
 131 cvar_t sv_init_frame_count = {CVAR_SERVER, "sv_init_frame_count", "2", "number of frames to run to allow everything to settle before letting clients connect"};
 132 cvar_t sv_idealpitchscale = {CVAR_SERVER, "sv_idealpitchscale","0.8", "how much to look up/down slopes and stairs when not using freelook"};
 133 cvar_t sv_jumpstep = {CVAR_SERVER | CVAR_NOTIFY, "sv_jumpstep", "0", "whether you can step up while jumping"};
 134 cvar_t sv_jumpvelocity = {CVAR_SERVER, "sv_jumpvelocity", "270", "cvar that can be used by QuakeC code for jump velocity"};
 135 cvar_t sv_maxairspeed = {CVAR_SERVER, "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)"};
 136 cvar_t sv_maxrate = {CVAR_SERVER | CVAR_SAVE | CVAR_NOTIFY, "sv_maxrate", "1000000", "upper limit on client rate cvar, should reflect your network connection quality"};
 137 cvar_t sv_maxspeed = {CVAR_SERVER | CVAR_NOTIFY, "sv_maxspeed", "320", "maximum speed a player can accelerate to when on ground (can be exceeded by tricks)"};
 138 cvar_t sv_maxvelocity = {CVAR_SERVER | CVAR_NOTIFY, "sv_maxvelocity","2000", "universal speed limit on all entities"};
 139 cvar_t sv_nostep = {CVAR_SERVER | CVAR_NOTIFY, "sv_nostep","0", "prevents MOVETYPE_STEP entities (monsters) from moving"};
 140 cvar_t sv_playerphysicsqc = {CVAR_SERVER | CVAR_NOTIFY, "sv_playerphysicsqc", "1", "enables QuakeC function to override player physics"};
 141 cvar_t sv_progs = {CVAR_SERVER, "sv_progs", "progs.dat", "selects which quakec progs.dat file to run" };
 142 cvar_t sv_protocolname = {CVAR_SERVER, "sv_protocolname", "DP7", "selects network protocol to host for (values include QUAKE, QUAKEDP, NEHAHRAMOVIE, DP1 and up)"};
 143 cvar_t sv_random_seed = {CVAR_SERVER, "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"};
 144 cvar_t host_limitlocal = {CVAR_SERVER, "host_limitlocal", "0", "whether to apply rate limiting to the local player in a listen server (only useful for testing)"};
 145 cvar_t sv_sound_land = {CVAR_SERVER, "sv_sound_land", "demon/dland2.wav", "sound to play when MOVETYPE_STEP entity hits the ground at high speed (empty cvar disables the sound)"};
 146 cvar_t sv_sound_watersplash = {CVAR_SERVER, "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)"};
 147 cvar_t sv_stepheight = {CVAR_SERVER | CVAR_NOTIFY, "sv_stepheight", "18", "how high you can step up (TW_SV_STEPCONTROL extension)"};
 148 cvar_t sv_stopspeed = {CVAR_SERVER | CVAR_NOTIFY, "sv_stopspeed","100", "how fast you come to a complete stop"};
 149 cvar_t sv_wallfriction = {CVAR_SERVER | CVAR_NOTIFY, "sv_wallfriction", "1", "how much you slow down when sliding along a wall"};
 150 cvar_t sv_wateraccelerate = {CVAR_SERVER, "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"};
 151 cvar_t sv_waterfriction = {CVAR_SERVER | CVAR_NOTIFY, "sv_waterfriction","-1", "how fast you slow down, if less than 0 the sv_friction variable is used instead"};
 152 cvar_t sv_warsowbunny_airforwardaccel = {CVAR_SERVER, "sv_warsowbunny_airforwardaccel", "1.00001", "how fast you accelerate until you reach sv_maxspeed"};
 153 cvar_t sv_warsowbunny_accel = {CVAR_SERVER, "sv_warsowbunny_accel", "0.1585", "how fast you accelerate until after reaching sv_maxspeed (it gets harder as you near sv_warsowbunny_topspeed)"};
 154 cvar_t sv_warsowbunny_topspeed = {CVAR_SERVER, "sv_warsowbunny_topspeed", "925", "soft speed limit (can get faster with rjs and on ramps)"};
 155 cvar_t sv_warsowbunny_turnaccel = {CVAR_SERVER, "sv_warsowbunny_turnaccel", "0", "max sharpness of turns (also master switch for the sv_warsowbunny_* mode; set this to 9 to enable)"};
 156 cvar_t sv_warsowbunny_backtosideratio = {CVAR_SERVER, "sv_warsowbunny_backtosideratio", "0.8", "lower values make it easier to change direction without losing speed; the drawback is \"understeering\" in sharp turns"};
 157 cvar_t sv_onlycsqcnetworking = {CVAR_SERVER, "sv_onlycsqcnetworking", "0", "disables legacy entity networking code for higher performance (except on clients, which can still be legacy)"};
 158 cvar_t sv_areadebug = {CVAR_SERVER, "sv_areadebug", "0", "disables physics culling for debugging purposes (only for development)"};
 159 cvar_t sys_ticrate = {CVAR_SERVER | 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"};
 160 cvar_t teamplay = {CVAR_SERVER | 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"};
 161 cvar_t timelimit = {CVAR_SERVER | CVAR_NOTIFY, "timelimit","0", "ends level at this time (in minutes)"};
 162 cvar_t sv_threaded = {CVAR_SERVER, "sv_threaded", "0", "enables a separate thread for server code, improving performance, especially when hosting a game while playing, EXPERIMENTAL, may be crashy"};
 163
 164 cvar_t saved1 = {CVAR_SERVER | CVAR_SAVE, "saved1", "0", "unused cvar in quake that is saved to config.cfg on exit, can be used by mods"};
 165 cvar_t saved2 = {CVAR_SERVER | CVAR_SAVE, "saved2", "0", "unused cvar in quake that is saved to config.cfg on exit, can be used by mods"};
 166 cvar_t saved3 = {CVAR_SERVER | CVAR_SAVE, "saved3", "0", "unused cvar in quake that is saved to config.cfg on exit, can be used by mods"};
 167 cvar_t saved4 = {CVAR_SERVER | CVAR_SAVE, "saved4", "0", "unused cvar in quake that is saved to config.cfg on exit, can be used by mods"};
 168 cvar_t savedgamecfg = {CVAR_SERVER | CVAR_SAVE, "savedgamecfg", "0", "unused cvar in quake that is saved to config.cfg on exit, can be used by mods"};
 169 cvar_t scratch1 = {CVAR_SERVER, "scratch1", "0", "unused cvar in quake, can be used by mods"};
 170 cvar_t scratch2 = {CVAR_SERVER,"scratch2", "0", "unused cvar in quake, can be used by mods"};
 171 cvar_t scratch3 = {CVAR_SERVER, "scratch3", "0", "unused cvar in quake, can be used by mods"};
 172 cvar_t scratch4 = {CVAR_SERVER, "scratch4", "0", "unused cvar in quake, can be used by mods"};
 173 cvar_t temp1 = {CVAR_SERVER, "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)"};
 174
 175 cvar_t nehx00 = {CVAR_SERVER, "nehx00", "0", "nehahra data storage cvar (used in singleplayer)"};
 176 cvar_t nehx01 = {CVAR_SERVER, "nehx01", "0", "nehahra data storage cvar (used in singleplayer)"};
 177 cvar_t nehx02 = {CVAR_SERVER, "nehx02", "0", "nehahra data storage cvar (used in singleplayer)"};
 178 cvar_t nehx03 = {CVAR_SERVER, "nehx03", "0", "nehahra data storage cvar (used in singleplayer)"};
 179 cvar_t nehx04 = {CVAR_SERVER, "nehx04", "0", "nehahra data storage cvar (used in singleplayer)"};
 180 cvar_t nehx05 = {CVAR_SERVER, "nehx05", "0", "nehahra data storage cvar (used in singleplayer)"};
 181 cvar_t nehx06 = {CVAR_SERVER, "nehx06", "0", "nehahra data storage cvar (used in singleplayer)"};
 182 cvar_t nehx07 = {CVAR_SERVER, "nehx07", "0", "nehahra data storage cvar (used in singleplayer)"};
 183 cvar_t nehx08 = {CVAR_SERVER, "nehx08", "0", "nehahra data storage cvar (used in singleplayer)"};
 184 cvar_t nehx09 = {CVAR_SERVER, "nehx09", "0", "nehahra data storage cvar (used in singleplayer)"};
 185 cvar_t nehx10 = {CVAR_SERVER, "nehx10", "0", "nehahra data storage cvar (used in singleplayer)"};
 186 cvar_t nehx11 = {CVAR_SERVER, "nehx11", "0", "nehahra data storage cvar (used in singleplayer)"};
 187 cvar_t nehx12 = {CVAR_SERVER, "nehx12", "0", "nehahra data storage cvar (used in singleplayer)"};
 188 cvar_t nehx13 = {CVAR_SERVER, "nehx13", "0", "nehahra data storage cvar (used in singleplayer)"};
 189 cvar_t nehx14 = {CVAR_SERVER, "nehx14", "0", "nehahra data storage cvar (used in singleplayer)"};
 190 cvar_t nehx15 = {CVAR_SERVER, "nehx15", "0", "nehahra data storage cvar (used in singleplayer)"};
 191 cvar_t nehx16 = {CVAR_SERVER, "nehx16", "0", "nehahra data storage cvar (used in singleplayer)"};
 192 cvar_t nehx17 = {CVAR_SERVER, "nehx17", "0", "nehahra data storage cvar (used in singleplayer)"};
 193 cvar_t nehx18 = {CVAR_SERVER, "nehx18", "0", "nehahra data storage cvar (used in singleplayer)"};
 194 cvar_t nehx19 = {CVAR_SERVER, "nehx19", "0", "nehahra data storage cvar (used in singleplayer)"};
 195 cvar_t cutscene = {CVAR_SERVER, "cutscene", "1", "enables cutscenes in nehahra, can be used by other mods"};
 196
 197 cvar_t sv_autodemo_perclient = {CVAR_SERVER | 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)"};
 198 cvar_t sv_autodemo_perclient_nameformat = {CVAR_SERVER | 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)" };
 199 cvar_t sv_autodemo_perclient_discardable = {CVAR_SERVER | CVAR_SAVE, "sv_autodemo_perclient_discardable", "0", "Allow game code to decide whether a demo should be kept or discarded."};
 200
 201 cvar_t halflifebsp = {CVAR_SERVER, "halflifebsp", "0", "indicates the current map is hlbsp format (useful to know because of different bounding box sizes)"};
 202 cvar_t sv_mapformat_is_quake2 = {CVAR_SERVER, "sv_mapformat_is_quake2", "0", "indicates the current map is q2bsp format (useful to know because of different entity behaviors, .frame on submodels and other things)"};
 203 cvar_t sv_mapformat_is_quake3 = {CVAR_SERVER, "sv_mapformat_is_quake3", "0", "indicates the current map is q2bsp format (useful to know because of different entity behaviors)"};
 204
 205 server_t sv;
 206 server_static_t svs;
 207
 208 mempool_t *sv_mempool = NULL;
 209
 210 extern cvar_t host_timescale;
 211 extern float            scr_centertime_off;
 212
 213 // MUST match effectnameindex_t in client.h
 214 static const char *standardeffectnames[EFFECT_TOTAL] =
 215 {
 216         "",
 217         "TE_GUNSHOT",
 218         "TE_GUNSHOTQUAD",
 219         "TE_SPIKE",
 220         "TE_SPIKEQUAD",
 221         "TE_SUPERSPIKE",
 222         "TE_SUPERSPIKEQUAD",
 223         "TE_WIZSPIKE",
 224         "TE_KNIGHTSPIKE",
 225         "TE_EXPLOSION",
 226         "TE_EXPLOSIONQUAD",
 227         "TE_TAREXPLOSION",
 228         "TE_TELEPORT",
 229         "TE_LAVASPLASH",
 230         "TE_SMALLFLASH",
 231         "TE_FLAMEJET",
 232         "EF_FLAME",
 233         "TE_BLOOD",
 234         "TE_SPARK",
 235         "TE_PLASMABURN",
 236         "TE_TEI_G3",
 237         "TE_TEI_SMOKE",
 238         "TE_TEI_BIGEXPLOSION",
 239         "TE_TEI_PLASMAHIT",
 240         "EF_STARDUST",
 241         "TR_ROCKET",
 242         "TR_GRENADE",
 243         "TR_BLOOD",
 244         "TR_WIZSPIKE",
 245         "TR_SLIGHTBLOOD",
 246         "TR_KNIGHTSPIKE",
 247         "TR_VORESPIKE",
 248         "TR_NEHAHRASMOKE",
 249         "TR_NEXUIZPLASMA",
 250         "TR_GLOWTRAIL",
 251         "SVC_PARTICLE"
 252 };
 253
 254 #define SV_REQFUNCS 0
 255 #define sv_reqfuncs NULL
 256
 257 //#define SV_REQFUNCS (sizeof(sv_reqfuncs) / sizeof(const char *))
 258 //static const char *sv_reqfuncs[] = {
 259 //};
 260
 261 #define SV_REQFIELDS (sizeof(sv_reqfields) / sizeof(prvm_required_field_t))
 262
 263 prvm_required_field_t sv_reqfields[] =
 264 {
 265 #define PRVM_DECLARE_serverglobalfloat(x)
 266 #define PRVM_DECLARE_serverglobalvector(x)
 267 #define PRVM_DECLARE_serverglobalstring(x)
 268 #define PRVM_DECLARE_serverglobaledict(x)
 269 #define PRVM_DECLARE_serverglobalfunction(x)
 270 #define PRVM_DECLARE_clientglobalfloat(x)
 271 #define PRVM_DECLARE_clientglobalvector(x)
 272 #define PRVM_DECLARE_clientglobalstring(x)
 273 #define PRVM_DECLARE_clientglobaledict(x)
 274 #define PRVM_DECLARE_clientglobalfunction(x)
 275 #define PRVM_DECLARE_menuglobalfloat(x)
 276 #define PRVM_DECLARE_menuglobalvector(x)
 277 #define PRVM_DECLARE_menuglobalstring(x)
 278 #define PRVM_DECLARE_menuglobaledict(x)
 279 #define PRVM_DECLARE_menuglobalfunction(x)
 280 #define PRVM_DECLARE_serverfieldfloat(x) {ev_float, #x},
 281 #define PRVM_DECLARE_serverfieldvector(x) {ev_vector, #x},
 282 #define PRVM_DECLARE_serverfieldstring(x) {ev_string, #x},
 283 #define PRVM_DECLARE_serverfieldedict(x) {ev_entity, #x},
 284 #define PRVM_DECLARE_serverfieldfunction(x) {ev_function, #x},
 285 #define PRVM_DECLARE_clientfieldfloat(x)
 286 #define PRVM_DECLARE_clientfieldvector(x)
 287 #define PRVM_DECLARE_clientfieldstring(x)
 288 #define PRVM_DECLARE_clientfieldedict(x)
 289 #define PRVM_DECLARE_clientfieldfunction(x)
 290 #define PRVM_DECLARE_menufieldfloat(x)
 291 #define PRVM_DECLARE_menufieldvector(x)
 292 #define PRVM_DECLARE_menufieldstring(x)
 293 #define PRVM_DECLARE_menufieldedict(x)
 294 #define PRVM_DECLARE_menufieldfunction(x)
 295 #define PRVM_DECLARE_serverfunction(x)
 296 #define PRVM_DECLARE_clientfunction(x)
 297 #define PRVM_DECLARE_menufunction(x)
 298 #define PRVM_DECLARE_field(x)
 299 #define PRVM_DECLARE_global(x)
 300 #define PRVM_DECLARE_function(x)
 301 #include "prvm_offsets.h"
 302 #undef PRVM_DECLARE_serverglobalfloat
 303 #undef PRVM_DECLARE_serverglobalvector
 304 #undef PRVM_DECLARE_serverglobalstring
 305 #undef PRVM_DECLARE_serverglobaledict
 306 #undef PRVM_DECLARE_serverglobalfunction
 307 #undef PRVM_DECLARE_clientglobalfloat
 308 #undef PRVM_DECLARE_clientglobalvector
 309 #undef PRVM_DECLARE_clientglobalstring
 310 #undef PRVM_DECLARE_clientglobaledict
 311 #undef PRVM_DECLARE_clientglobalfunction
 312 #undef PRVM_DECLARE_menuglobalfloat
 313 #undef PRVM_DECLARE_menuglobalvector
 314 #undef PRVM_DECLARE_menuglobalstring
 315 #undef PRVM_DECLARE_menuglobaledict
 316 #undef PRVM_DECLARE_menuglobalfunction
 317 #undef PRVM_DECLARE_serverfieldfloat
 318 #undef PRVM_DECLARE_serverfieldvector
 319 #undef PRVM_DECLARE_serverfieldstring
 320 #undef PRVM_DECLARE_serverfieldedict
 321 #undef PRVM_DECLARE_serverfieldfunction
 322 #undef PRVM_DECLARE_clientfieldfloat
 323 #undef PRVM_DECLARE_clientfieldvector
 324 #undef PRVM_DECLARE_clientfieldstring
 325 #undef PRVM_DECLARE_clientfieldedict
 326 #undef PRVM_DECLARE_clientfieldfunction
 327 #undef PRVM_DECLARE_menufieldfloat
 328 #undef PRVM_DECLARE_menufieldvector
 329 #undef PRVM_DECLARE_menufieldstring
 330 #undef PRVM_DECLARE_menufieldedict
 331 #undef PRVM_DECLARE_menufieldfunction
 332 #undef PRVM_DECLARE_serverfunction
 333 #undef PRVM_DECLARE_clientfunction
 334 #undef PRVM_DECLARE_menufunction
 335 #undef PRVM_DECLARE_field
 336 #undef PRVM_DECLARE_global
 337 #undef PRVM_DECLARE_function
 338 };
 339
 340 #define SV_REQGLOBALS (sizeof(sv_reqglobals) / sizeof(prvm_required_field_t))
 341
 342 prvm_required_field_t sv_reqglobals[] =
 343 {
 344 #define PRVM_DECLARE_serverglobalfloat(x) {ev_float, #x},
 345 #define PRVM_DECLARE_serverglobalvector(x) {ev_vector, #x},
 346 #define PRVM_DECLARE_serverglobalstring(x) {ev_string, #x},
 347 #define PRVM_DECLARE_serverglobaledict(x) {ev_entity, #x},
 348 #define PRVM_DECLARE_serverglobalfunction(x) {ev_function, #x},
 349 #define PRVM_DECLARE_clientglobalfloat(x)
 350 #define PRVM_DECLARE_clientglobalvector(x)
 351 #define PRVM_DECLARE_clientglobalstring(x)
 352 #define PRVM_DECLARE_clientglobaledict(x)
 353 #define PRVM_DECLARE_clientglobalfunction(x)
 354 #define PRVM_DECLARE_menuglobalfloat(x)
 355 #define PRVM_DECLARE_menuglobalvector(x)
 356 #define PRVM_DECLARE_menuglobalstring(x)
 357 #define PRVM_DECLARE_menuglobaledict(x)
 358 #define PRVM_DECLARE_menuglobalfunction(x)
 359 #define PRVM_DECLARE_serverfieldfloat(x)
 360 #define PRVM_DECLARE_serverfieldvector(x)
 361 #define PRVM_DECLARE_serverfieldstring(x)
 362 #define PRVM_DECLARE_serverfieldedict(x)
 363 #define PRVM_DECLARE_serverfieldfunction(x)
 364 #define PRVM_DECLARE_clientfieldfloat(x)
 365 #define PRVM_DECLARE_clientfieldvector(x)
 366 #define PRVM_DECLARE_clientfieldstring(x)
 367 #define PRVM_DECLARE_clientfieldedict(x)
 368 #define PRVM_DECLARE_clientfieldfunction(x)
 369 #define PRVM_DECLARE_menufieldfloat(x)
 370 #define PRVM_DECLARE_menufieldvector(x)
 371 #define PRVM_DECLARE_menufieldstring(x)
 372 #define PRVM_DECLARE_menufieldedict(x)
 373 #define PRVM_DECLARE_menufieldfunction(x)
 374 #define PRVM_DECLARE_serverfunction(x)
 375 #define PRVM_DECLARE_clientfunction(x)
 376 #define PRVM_DECLARE_menufunction(x)
 377 #define PRVM_DECLARE_field(x)
 378 #define PRVM_DECLARE_global(x)
 379 #define PRVM_DECLARE_function(x)
 380 #include "prvm_offsets.h"
 381 #undef PRVM_DECLARE_serverglobalfloat
 382 #undef PRVM_DECLARE_serverglobalvector
 383 #undef PRVM_DECLARE_serverglobalstring
 384 #undef PRVM_DECLARE_serverglobaledict
 385 #undef PRVM_DECLARE_serverglobalfunction
 386 #undef PRVM_DECLARE_clientglobalfloat
 387 #undef PRVM_DECLARE_clientglobalvector
 388 #undef PRVM_DECLARE_clientglobalstring
 389 #undef PRVM_DECLARE_clientglobaledict
 390 #undef PRVM_DECLARE_clientglobalfunction
 391 #undef PRVM_DECLARE_menuglobalfloat
 392 #undef PRVM_DECLARE_menuglobalvector
 393 #undef PRVM_DECLARE_menuglobalstring
 394 #undef PRVM_DECLARE_menuglobaledict
 395 #undef PRVM_DECLARE_menuglobalfunction
 396 #undef PRVM_DECLARE_serverfieldfloat
 397 #undef PRVM_DECLARE_serverfieldvector
 398 #undef PRVM_DECLARE_serverfieldstring
 399 #undef PRVM_DECLARE_serverfieldedict
 400 #undef PRVM_DECLARE_serverfieldfunction
 401 #undef PRVM_DECLARE_clientfieldfloat
 402 #undef PRVM_DECLARE_clientfieldvector
 403 #undef PRVM_DECLARE_clientfieldstring
 404 #undef PRVM_DECLARE_clientfieldedict
 405 #undef PRVM_DECLARE_clientfieldfunction
 406 #undef PRVM_DECLARE_menufieldfloat
 407 #undef PRVM_DECLARE_menufieldvector
 408 #undef PRVM_DECLARE_menufieldstring
 409 #undef PRVM_DECLARE_menufieldedict
 410 #undef PRVM_DECLARE_menufieldfunction
 411 #undef PRVM_DECLARE_serverfunction
 412 #undef PRVM_DECLARE_clientfunction
 413 #undef PRVM_DECLARE_menufunction
 414 #undef PRVM_DECLARE_field
 415 #undef PRVM_DECLARE_global
 416 #undef PRVM_DECLARE_function
 417 };
 418
 419 static void Host_Timescale_c(cvar_t *var)
 420 {
 421         if(var->value < 0.00001 && var->value != 0)
 422                 Cvar_SetValueQuick(var, 0);
 423 }
 424
 425 //============================================================================
 426
 427 static void SV_AreaStats_f(cmd_state_t *cmd)
 428 {
 429         World_PrintAreaStats(&sv.world, "server");
 430 }
 431
 432 /*
 433 ===============
 434 SV_Init
 435 ===============
 436 */
 437 void SV_Init (void)
 438 {
 439         // init the csqc progs cvars, since they are updated/used by the server code
 440         // TODO: fix this since this is a quick hack to make some of [515]'s broken code run ;) [9/13/2006 Black]
 441         extern cvar_t csqc_progname;    //[515]: csqc crc check and right csprogs name according to progs.dat
 442         extern cvar_t csqc_progcrc;
 443         extern cvar_t csqc_progsize;
 444         extern cvar_t csqc_usedemoprogs;
 445
 446         Cvar_RegisterVariable(&sv_worldmessage);
 447         Cvar_RegisterVariable(&sv_worldname);
 448         Cvar_RegisterVariable(&sv_worldnamenoextension);
 449         Cvar_RegisterVariable(&sv_worldbasename);
 450
 451         Cvar_RegisterVariable (&csqc_progname);
 452         Cvar_RegisterVariable (&csqc_progcrc);
 453         Cvar_RegisterVariable (&csqc_progsize);
 454         Cvar_RegisterVariable (&csqc_usedemoprogs);
 455
 456         Cmd_AddCommand(CMD_SHARED, "sv_saveentfile", SV_SaveEntFile_f, "save map entities to .ent file (to allow external editing)");
 457         Cmd_AddCommand(CMD_SHARED, "sv_areastats", SV_AreaStats_f, "prints statistics on entity culling during collision traces");
 458         Cmd_AddCommand(CMD_CLIENT | CMD_SERVER_FROM_CLIENT, "sv_startdownload", SV_StartDownload_f, "begins sending a file to the client (network protocol use only)");
 459         Cmd_AddCommand(CMD_CLIENT | CMD_SERVER_FROM_CLIENT, "download", SV_Download_f, "downloads a specified file from the server");
 460
 461         Cvar_RegisterVariable (&sv_disablenotify);
 462         Cvar_RegisterVariable (&coop);
 463         Cvar_RegisterVariable (&deathmatch);
 464         Cvar_RegisterVariable (&fraglimit);
 465         Cvar_RegisterVariable (&gamecfg);
 466         Cvar_RegisterVariable (&noexit);
 467         Cvar_RegisterVariable (&nomonsters);
 468         Cvar_RegisterVariable (&pausable);
 469         Cvar_RegisterVariable (&pr_checkextension);
 470         Cvar_RegisterVariable (&samelevel);
 471         Cvar_RegisterVariable (&skill);
 472         Cvar_RegisterVariable (&host_timescale);
 473         Cvar_RegisterCallback (&host_timescale, Host_Timescale_c);
 474         Cvar_RegisterAlias (&host_timescale, "slowmo");
 475         Cvar_RegisterAlias (&host_timescale, "timescale");
 476         Cvar_RegisterVariable (&sv_accelerate);
 477         Cvar_RegisterVariable (&sv_aim);
 478         Cvar_RegisterVariable (&sv_airaccel_qw);
 479         Cvar_RegisterVariable (&sv_airaccel_qw_stretchfactor);
 480         Cvar_RegisterVariable (&sv_airaccel_sideways_friction);
 481         Cvar_RegisterVariable (&sv_airaccelerate);
 482         Cvar_RegisterVariable (&sv_airstopaccelerate);
 483         Cvar_RegisterVariable (&sv_airstrafeaccelerate);
 484         Cvar_RegisterVariable (&sv_maxairstrafespeed);
 485         Cvar_RegisterVariable (&sv_airstrafeaccel_qw);
 486         Cvar_RegisterVariable (&sv_airspeedlimit_nonqw);
 487         Cvar_RegisterVariable (&sv_aircontrol);
 488         Cvar_RegisterVariable (&sv_aircontrol_power);
 489         Cvar_RegisterVariable (&sv_aircontrol_penalty);
 490         Cvar_RegisterVariable (&sv_allowdownloads);
 491         Cvar_RegisterVariable (&sv_allowdownloads_archive);
 492         Cvar_RegisterVariable (&sv_allowdownloads_config);
 493         Cvar_RegisterVariable (&sv_allowdownloads_dlcache);
 494         Cvar_RegisterVariable (&sv_allowdownloads_inarchive);
 495         Cvar_RegisterVariable (&sv_areagrid_mingridsize);
 496         Cvar_RegisterVariable (&sv_checkforpacketsduringsleep);
 497         Cvar_RegisterVariable (&sv_clmovement_enable);
 498         Cvar_RegisterVariable (&sv_clmovement_minping);
 499         Cvar_RegisterVariable (&sv_clmovement_minping_disabletime);
 500         Cvar_RegisterVariable (&sv_clmovement_inputtimeout);
 501         Cvar_RegisterVariable (&sv_cullentities_nevercullbmodels);
 502         Cvar_RegisterVariable (&sv_cullentities_pvs);
 503         Cvar_RegisterVariable (&sv_cullentities_stats);
 504         Cvar_RegisterVariable (&sv_cullentities_trace);
 505         Cvar_RegisterVariable (&sv_cullentities_trace_delay);
 506         Cvar_RegisterVariable (&sv_cullentities_trace_delay_players);
 507         Cvar_RegisterVariable (&sv_cullentities_trace_enlarge);
 508         Cvar_RegisterVariable (&sv_cullentities_trace_expand);
 509         Cvar_RegisterVariable (&sv_cullentities_trace_eyejitter);
 510         Cvar_RegisterVariable (&sv_cullentities_trace_entityocclusion);
 511         Cvar_RegisterVariable (&sv_cullentities_trace_prediction);
 512         Cvar_RegisterVariable (&sv_cullentities_trace_prediction_time);
 513         Cvar_RegisterVariable (&sv_cullentities_trace_samples);
 514         Cvar_RegisterVariable (&sv_cullentities_trace_samples_extra);
 515         Cvar_RegisterVariable (&sv_cullentities_trace_samples_players);
 516         Cvar_RegisterVariable (&sv_debugmove);
 517         Cvar_RegisterVariable (&sv_echobprint);
 518         Cvar_RegisterVariable (&sv_edgefriction);
 519         Cvar_RegisterVariable (&sv_entpatch);
 520         Cvar_RegisterVariable (&sv_freezenonclients);
 521         Cvar_RegisterVariable (&sv_friction);
 522         Cvar_RegisterVariable (&sv_gameplayfix_blowupfallenzombies);
 523         Cvar_RegisterVariable (&sv_gameplayfix_consistentplayerprethink);
 524         Cvar_RegisterVariable (&sv_gameplayfix_delayprojectiles);
 525         Cvar_RegisterVariable (&sv_gameplayfix_droptofloorstartsolid);
 526         Cvar_RegisterVariable (&sv_gameplayfix_droptofloorstartsolid_nudgetocorrect);
 527         Cvar_RegisterVariable (&sv_gameplayfix_easierwaterjump);
 528         Cvar_RegisterVariable (&sv_gameplayfix_findradiusdistancetobox);
 529         Cvar_RegisterVariable (&sv_gameplayfix_gravityunaffectedbyticrate);
 530         Cvar_RegisterVariable (&sv_gameplayfix_grenadebouncedownslopes);
 531         Cvar_RegisterVariable (&sv_gameplayfix_multiplethinksperframe);
 532         Cvar_RegisterVariable (&sv_gameplayfix_noairborncorpse);
 533         Cvar_RegisterVariable (&sv_gameplayfix_noairborncorpse_allowsuspendeditems);
 534         Cvar_RegisterVariable (&sv_gameplayfix_nudgeoutofsolid);
 535         Cvar_RegisterVariable (&sv_gameplayfix_nudgeoutofsolid_separation);
 536         Cvar_RegisterVariable (&sv_gameplayfix_q2airaccelerate);
 537         Cvar_RegisterVariable (&sv_gameplayfix_nogravityonground);
 538         Cvar_RegisterVariable (&sv_gameplayfix_setmodelrealbox);
 539         Cvar_RegisterVariable (&sv_gameplayfix_slidemoveprojectiles);
 540         Cvar_RegisterVariable (&sv_gameplayfix_stepdown);
 541         Cvar_RegisterVariable (&sv_gameplayfix_stepmultipletimes);
 542         Cvar_RegisterVariable (&sv_gameplayfix_nostepmoveonsteepslopes);
 543         Cvar_RegisterVariable (&sv_gameplayfix_swiminbmodels);
 544         Cvar_RegisterVariable (&sv_gameplayfix_upwardvelocityclearsongroundflag);
 545         Cvar_RegisterVariable (&sv_gameplayfix_downtracesupportsongroundflag);
 546         Cvar_RegisterVariable (&sv_gameplayfix_q1bsptracelinereportstexture);
 547         Cvar_RegisterVariable (&sv_gameplayfix_unstickplayers);
 548         Cvar_RegisterVariable (&sv_gameplayfix_unstickentities);
 549         Cvar_RegisterVariable (&sv_gameplayfix_fixedcheckwatertransition);
 550         Cvar_RegisterVariable (&sv_gameplayfix_customstats);
 551         Cvar_RegisterVariable (&sv_gravity);
 552         Cvar_RegisterVariable (&sv_init_frame_count);
 553         Cvar_RegisterVariable (&sv_idealpitchscale);
 554         Cvar_RegisterVariable (&sv_jumpstep);
 555         Cvar_RegisterVariable (&sv_jumpvelocity);
 556         Cvar_RegisterVariable (&sv_maxairspeed);
 557         Cvar_RegisterVariable (&sv_maxrate);
 558         Cvar_RegisterVariable (&sv_maxspeed);
 559         Cvar_RegisterVariable (&sv_maxvelocity);
 560         Cvar_RegisterVariable (&sv_nostep);
 561         Cvar_RegisterVariable (&sv_playerphysicsqc);
 562         Cvar_RegisterVariable (&sv_progs);
 563         Cvar_RegisterVariable (&sv_protocolname);
 564         Cvar_RegisterVariable (&sv_random_seed);
 565         Cvar_RegisterVariable (&host_limitlocal);
 566         Cvar_RegisterAlias(&host_limitlocal, "sv_ratelimitlocalplayer");
 567         Cvar_RegisterVariable (&sv_sound_land);
 568         Cvar_RegisterVariable (&sv_sound_watersplash);
 569         Cvar_RegisterVariable (&sv_stepheight);
 570         Cvar_RegisterVariable (&sv_stopspeed);
 571         Cvar_RegisterVariable (&sv_wallfriction);
 572         Cvar_RegisterVariable (&sv_wateraccelerate);
 573         Cvar_RegisterVariable (&sv_waterfriction);
 574         Cvar_RegisterVariable (&sv_warsowbunny_airforwardaccel);
 575         Cvar_RegisterVariable (&sv_warsowbunny_accel);
 576         Cvar_RegisterVariable (&sv_warsowbunny_topspeed);
 577         Cvar_RegisterVariable (&sv_warsowbunny_turnaccel);
 578         Cvar_RegisterVariable (&sv_warsowbunny_backtosideratio);
 579         Cvar_RegisterVariable (&sv_onlycsqcnetworking);
 580         Cvar_RegisterVariable (&sv_areadebug);
 581         Cvar_RegisterVariable (&sys_ticrate);
 582         Cvar_RegisterVariable (&teamplay);
 583         Cvar_RegisterVariable (&timelimit);
 584         Cvar_RegisterVariable (&sv_threaded);
 585
 586         Cvar_RegisterVariable (&saved1);
 587         Cvar_RegisterVariable (&saved2);
 588         Cvar_RegisterVariable (&saved3);
 589         Cvar_RegisterVariable (&saved4);
 590         Cvar_RegisterVariable (&savedgamecfg);
 591         Cvar_RegisterVariable (&scratch1);
 592         Cvar_RegisterVariable (&scratch2);
 593         Cvar_RegisterVariable (&scratch3);
 594         Cvar_RegisterVariable (&scratch4);
 595         Cvar_RegisterVariable (&temp1);
 596
 597         // LadyHavoc: Nehahra uses these to pass data around cutscene demos
 598         Cvar_RegisterVariable (&nehx00);
 599         Cvar_RegisterVariable (&nehx01);
 600         Cvar_RegisterVariable (&nehx02);
 601         Cvar_RegisterVariable (&nehx03);
 602         Cvar_RegisterVariable (&nehx04);
 603         Cvar_RegisterVariable (&nehx05);
 604         Cvar_RegisterVariable (&nehx06);
 605         Cvar_RegisterVariable (&nehx07);
 606         Cvar_RegisterVariable (&nehx08);
 607         Cvar_RegisterVariable (&nehx09);
 608         Cvar_RegisterVariable (&nehx10);
 609         Cvar_RegisterVariable (&nehx11);
 610         Cvar_RegisterVariable (&nehx12);
 611         Cvar_RegisterVariable (&nehx13);
 612         Cvar_RegisterVariable (&nehx14);
 613         Cvar_RegisterVariable (&nehx15);
 614         Cvar_RegisterVariable (&nehx16);
 615         Cvar_RegisterVariable (&nehx17);
 616         Cvar_RegisterVariable (&nehx18);
 617         Cvar_RegisterVariable (&nehx19);
 618         Cvar_RegisterVariable (&cutscene); // for Nehahra but useful to other mods as well
 619
 620         Cvar_RegisterVariable (&sv_autodemo_perclient);
 621         Cvar_RegisterVariable (&sv_autodemo_perclient_nameformat);
 622         Cvar_RegisterVariable (&sv_autodemo_perclient_discardable);
 623
 624         Cvar_RegisterVariable (&halflifebsp);
 625         Cvar_RegisterVariable (&sv_mapformat_is_quake2);
 626         Cvar_RegisterVariable (&sv_mapformat_is_quake3);
 627
 628         SV_InitOperatorCommands();
 629
 630         sv_mempool = Mem_AllocPool("server", 0, NULL);
 631 }
 632
 633 static void SV_SaveEntFile_f(cmd_state_t *cmd)
 634 {
 635         char vabuf[1024];
 636         if (!sv.active || !sv.worldmodel)
 637         {
 638                 Con_Print("Not running a server\n");
 639                 return;
 640         }
 641         FS_WriteFile(va(vabuf, sizeof(vabuf), "%s.ent", sv.worldnamenoextension), sv.worldmodel->brush.entities, (fs_offset_t)strlen(sv.worldmodel->brush.entities));
 642 }
 643
 644
 645 /*
 646 =============================================================================
 647
 648 EVENT MESSAGES
 649
 650 =============================================================================
 651 */
 652
 653 /*
 654 ==================
 655 SV_StartParticle
 656
 657 Make sure the event gets sent to all clients
 658 ==================
 659 */
 660 void SV_StartParticle (vec3_t org, vec3_t dir, int color, int count)
 661 {
 662         int i;
 663
 664         if (sv.datagram.cursize > MAX_PACKETFRAGMENT-18)
 665                 return;
 666         MSG_WriteByte (&sv.datagram, svc_particle);
 667         MSG_WriteCoord (&sv.datagram, org[0], sv.protocol);
 668         MSG_WriteCoord (&sv.datagram, org[1], sv.protocol);
 669         MSG_WriteCoord (&sv.datagram, org[2], sv.protocol);
 670         for (i=0 ; i<3 ; i++)
 671                 MSG_WriteChar (&sv.datagram, (int)bound(-128, dir[i]*16, 127));
 672         MSG_WriteByte (&sv.datagram, count);
 673         MSG_WriteByte (&sv.datagram, color);
 674         SV_FlushBroadcastMessages();
 675 }
 676
 677 /*
 678 ==================
 679 SV_StartEffect
 680
 681 Make sure the event gets sent to all clients
 682 ==================
 683 */
 684 void SV_StartEffect (vec3_t org, int modelindex, int startframe, int framecount, int framerate)
 685 {
 686         if (modelindex >= 256 || startframe >= 256)
 687         {
 688                 if (sv.datagram.cursize > MAX_PACKETFRAGMENT-19)
 689                         return;
 690                 MSG_WriteByte (&sv.datagram, svc_effect2);
 691                 MSG_WriteCoord (&sv.datagram, org[0], sv.protocol);
 692                 MSG_WriteCoord (&sv.datagram, org[1], sv.protocol);
 693                 MSG_WriteCoord (&sv.datagram, org[2], sv.protocol);
 694                 MSG_WriteShort (&sv.datagram, modelindex);
 695                 MSG_WriteShort (&sv.datagram, startframe);
 696                 MSG_WriteByte (&sv.datagram, framecount);
 697                 MSG_WriteByte (&sv.datagram, framerate);
 698         }
 699         else
 700         {
 701                 if (sv.datagram.cursize > MAX_PACKETFRAGMENT-17)
 702                         return;
 703                 MSG_WriteByte (&sv.datagram, svc_effect);
 704                 MSG_WriteCoord (&sv.datagram, org[0], sv.protocol);
 705                 MSG_WriteCoord (&sv.datagram, org[1], sv.protocol);
 706                 MSG_WriteCoord (&sv.datagram, org[2], sv.protocol);
 707                 MSG_WriteByte (&sv.datagram, modelindex);
 708                 MSG_WriteByte (&sv.datagram, startframe);
 709                 MSG_WriteByte (&sv.datagram, framecount);
 710                 MSG_WriteByte (&sv.datagram, framerate);
 711         }
 712         SV_FlushBroadcastMessages();
 713 }
 714
 715 /*
 716 ==================
 717 SV_StartSound
 718
 719 Each entity can have eight independant sound sources, like voice,
 720 weapon, feet, etc.
 721
 722 Channel 0 is an auto-allocate channel, the others override anything
 723 already running on that entity/channel pair.
 724
 725 An attenuation of 0 will play full volume everywhere in the level.
 726 Larger attenuations will drop off.  (max 4 attenuation)
 727
 728 ==================
 729 */
 730 void SV_StartSound (prvm_edict_t *entity, int channel, const char *sample, int nvolume, float attenuation, qboolean reliable, float speed)
 731 {
 732         prvm_prog_t *prog = SVVM_prog;
 733         sizebuf_t *dest;
 734         int sound_num, field_mask, i, ent, speed4000;
 735
 736         dest = (reliable ? &sv.reliable_datagram : &sv.datagram);
 737
 738         if (nvolume < 0 || nvolume > 255)
 739         {
 740                 Con_Printf ("SV_StartSound: volume = %i\n", nvolume);
 741                 return;
 742         }
 743
 744         if (attenuation < 0 || attenuation > 4)
 745         {
 746                 Con_Printf ("SV_StartSound: attenuation = %f\n", attenuation);
 747                 return;
 748         }
 749
 750         if (!IS_CHAN(channel))
 751         {
 752                 Con_Printf ("SV_StartSound: channel = %i\n", channel);
 753                 return;
 754         }
 755
 756         channel = CHAN_ENGINE2NET(channel);
 757
 758         if (sv.datagram.cursize > MAX_PACKETFRAGMENT-21)
 759                 return;
 760
 761 // find precache number for sound
 762         sound_num = SV_SoundIndex(sample, 1);
 763         if (!sound_num)
 764                 return;
 765
 766         ent = PRVM_NUM_FOR_EDICT(entity);
 767
 768         speed4000 = (int)floor(speed * 4000.0f + 0.5f);
 769         field_mask = 0;
 770         if (nvolume != DEFAULT_SOUND_PACKET_VOLUME)
 771                 field_mask |= SND_VOLUME;
 772         if (attenuation != DEFAULT_SOUND_PACKET_ATTENUATION)
 773                 field_mask |= SND_ATTENUATION;
 774         if (speed4000 && speed4000 != 4000)
 775                 field_mask |= SND_SPEEDUSHORT4000;
 776         if (ent >= 8192 || channel < 0 || channel > 7)
 777                 field_mask |= SND_LARGEENTITY;
 778         if (sound_num >= 256)
 779                 field_mask |= SND_LARGESOUND;
 780
 781 // directed messages go only to the entity they are targeted on
 782         MSG_WriteByte (dest, svc_sound);
 783         MSG_WriteByte (dest, field_mask);
 784         if (field_mask & SND_VOLUME)
 785                 MSG_WriteByte (dest, nvolume);
 786         if (field_mask & SND_ATTENUATION)
 787                 MSG_WriteByte (dest, (int)(attenuation*64));
 788         if (field_mask & SND_SPEEDUSHORT4000)
 789                 MSG_WriteShort (dest, speed4000);
 790         if (field_mask & SND_LARGEENTITY)
 791         {
 792                 MSG_WriteShort (dest, ent);
 793                 MSG_WriteChar (dest, channel);
 794         }
 795         else
 796                 MSG_WriteShort (dest, (ent<<3) | channel);
 797         if ((field_mask & SND_LARGESOUND) || sv.protocol == PROTOCOL_NEHAHRABJP2)
 798                 MSG_WriteShort (dest, sound_num);
 799         else
 800                 MSG_WriteByte (dest, sound_num);
 801         for (i = 0;i < 3;i++)
 802                 MSG_WriteCoord (dest, PRVM_serveredictvector(entity, origin)[i]+0.5*(PRVM_serveredictvector(entity, mins)[i]+PRVM_serveredictvector(entity, maxs)[i]), sv.protocol);
 803
 804         // TODO do we have to do anything here when dest is &sv.reliable_datagram?
 805         if(!reliable)
 806                 SV_FlushBroadcastMessages();
 807 }
 808
 809 /*
 810 ==================
 811 SV_StartPointSound
 812
 813 Nearly the same logic as SV_StartSound, except an origin
 814 instead of an entity is provided and channel is omitted.
 815
 816 The entity sent to the client is 0 (world) and the channel
 817 is 0 (CHAN_AUTO).  SND_LARGEENTITY will never occur in this
 818 function, therefore the check for it is omitted.
 819
 820 ==================
 821 */
 822 void SV_StartPointSound (vec3_t origin, const char *sample, int nvolume, float attenuation, float speed)
 823 {
 824         int sound_num, field_mask, i, speed4000;
 825
 826         if (nvolume < 0 || nvolume > 255)
 827         {
 828                 Con_Printf ("SV_StartPointSound: volume = %i\n", nvolume);
 829                 return;
 830         }
 831
 832         if (attenuation < 0 || attenuation > 4)
 833         {
 834                 Con_Printf ("SV_StartPointSound: attenuation = %f\n", attenuation);
 835                 return;
 836         }
 837
 838         if (sv.datagram.cursize > MAX_PACKETFRAGMENT-21)
 839                 return;
 840
 841         // find precache number for sound
 842         sound_num = SV_SoundIndex(sample, 1);
 843         if (!sound_num)
 844                 return;
 845
 846         speed4000 = (int)(speed * 40.0f);
 847         field_mask = 0;
 848         if (nvolume != DEFAULT_SOUND_PACKET_VOLUME)
 849                 field_mask |= SND_VOLUME;
 850         if (attenuation != DEFAULT_SOUND_PACKET_ATTENUATION)
 851                 field_mask |= SND_ATTENUATION;
 852         if (sound_num >= 256)
 853                 field_mask |= SND_LARGESOUND;
 854         if (speed4000 && speed4000 != 4000)
 855                 field_mask |= SND_SPEEDUSHORT4000;
 856
 857 // directed messages go only to the entity they are targeted on
 858         MSG_WriteByte (&sv.datagram, svc_sound);
 859         MSG_WriteByte (&sv.datagram, field_mask);
 860         if (field_mask & SND_VOLUME)
 861                 MSG_WriteByte (&sv.datagram, nvolume);
 862         if (field_mask & SND_ATTENUATION)
 863                 MSG_WriteByte (&sv.datagram, (int)(attenuation*64));
 864         if (field_mask & SND_SPEEDUSHORT4000)
 865                 MSG_WriteShort (&sv.datagram, speed4000);
 866         // Always write entnum 0 for the world entity
 867         MSG_WriteShort (&sv.datagram, (0<<3) | 0);
 868         if (field_mask & SND_LARGESOUND)
 869                 MSG_WriteShort (&sv.datagram, sound_num);
 870         else
 871                 MSG_WriteByte (&sv.datagram, sound_num);
 872         for (i = 0;i < 3;i++)
 873                 MSG_WriteCoord (&sv.datagram, origin[i], sv.protocol);
 874         SV_FlushBroadcastMessages();
 875 }
 876
 877 /*
 878 ==============================================================================
 879
 880 CLIENT SPAWNING
 881
 882 ==============================================================================
 883 */
 884
 885 /*
 886 ================
 887 SV_SendServerinfo
 888
 889 Sends the first message from the server to a connected client.
 890 This will be sent on the initial connection and upon each server load.
 891 ================
 892 */
 893 void SV_SendServerinfo (client_t *client)
 894 {
 895         prvm_prog_t *prog = SVVM_prog;
 896         int i;
 897         char message[128];
 898         char vabuf[1024];
 899
 900         // we know that this client has a netconnection and thus is not a bot
 901
 902         // edicts get reallocated on level changes, so we need to update it here
 903         client->edict = PRVM_EDICT_NUM((client - svs.clients) + 1);
 904
 905         // clear cached stuff that depends on the level
 906         client->weaponmodel[0] = 0;
 907         client->weaponmodelindex = 0;
 908
 909         // LadyHavoc: clear entityframe tracking
 910         client->latestframenum = 0;
 911
 912         // initialize the movetime, so a speedhack can't make use of the time before this client joined
 913         client->cmd.time = sv.time;
 914
 915         if (client->entitydatabase)
 916                 EntityFrame_FreeDatabase(client->entitydatabase);
 917         if (client->entitydatabase4)
 918                 EntityFrame4_FreeDatabase(client->entitydatabase4);
 919         if (client->entitydatabase5)
 920                 EntityFrame5_FreeDatabase(client->entitydatabase5);
 921
 922         memset(client->stats, 0, sizeof(client->stats));
 923         memset(client->statsdeltabits, 0, sizeof(client->statsdeltabits));
 924
 925         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)
 926         {
 927                 if (sv.protocol == PROTOCOL_DARKPLACES1 || sv.protocol == PROTOCOL_DARKPLACES2 || sv.protocol == PROTOCOL_DARKPLACES3)
 928                         client->entitydatabase = EntityFrame_AllocDatabase(sv_mempool);
 929                 else if (sv.protocol == PROTOCOL_DARKPLACES4)
 930                         client->entitydatabase4 = EntityFrame4_AllocDatabase(sv_mempool);
 931                 else
 932                         client->entitydatabase5 = EntityFrame5_AllocDatabase(sv_mempool);
 933         }
 934
 935         // reset csqc entity versions
 936         for (i = 0;i < prog->max_edicts;i++)
 937         {
 938                 client->csqcentityscope[i] = 0;
 939                 client->csqcentitysendflags[i] = 0xFFFFFF;
 940         }
 941         for (i = 0;i < NUM_CSQCENTITYDB_FRAMES;i++)
 942         {
 943                 client->csqcentityframehistory[i].num = 0;
 944                 client->csqcentityframehistory[i].framenum = -1;
 945         }
 946         client->csqcnumedicts = 0;
 947         client->csqcentityframehistory_next = 0;
 948
 949         SZ_Clear (&client->netconnection->message);
 950         MSG_WriteByte (&client->netconnection->message, svc_print);
 951         dpsnprintf (message, sizeof (message), "\nServer: %s build %s (progs %i crc)\n", gamename, buildstring, prog->filecrc);
 952         MSG_WriteString (&client->netconnection->message,message);
 953
 954         SV_StopDemoRecording(client); // to split up demos into different files
 955         if(sv_autodemo_perclient.integer)
 956         {
 957                 char demofile[MAX_OSPATH];
 958                 char ipaddress[MAX_QPATH];
 959                 size_t j;
 960
 961                 // start a new demo file
 962                 LHNETADDRESS_ToString(&(client->netconnection->peeraddress), ipaddress, sizeof(ipaddress), true);
 963                 for(j = 0; ipaddress[j]; ++j)
 964                         if(!isalnum(ipaddress[j]))
 965                                 ipaddress[j] = '-';
 966                 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);
 967
 968                 SV_StartDemoRecording(client, demofile, -1);
 969         }
 970
 971         //[515]: init csprogs according to version of svprogs, check the crc, etc.
 972         if (sv.csqc_progname[0])
 973         {
 974                 Con_DPrintf("sending csqc info to client (\"%s\" with size %i and crc %i)\n", sv.csqc_progname, sv.csqc_progsize, sv.csqc_progcrc);
 975                 MSG_WriteByte (&client->netconnection->message, svc_stufftext);
 976                 MSG_WriteString (&client->netconnection->message, va(vabuf, sizeof(vabuf), "csqc_progname %s\n", sv.csqc_progname));
 977                 MSG_WriteByte (&client->netconnection->message, svc_stufftext);
 978                 MSG_WriteString (&client->netconnection->message, va(vabuf, sizeof(vabuf), "csqc_progsize %i\n", sv.csqc_progsize));
 979                 MSG_WriteByte (&client->netconnection->message, svc_stufftext);
 980                 MSG_WriteString (&client->netconnection->message, va(vabuf, sizeof(vabuf), "csqc_progcrc %i\n", sv.csqc_progcrc));
 981
 982                 if(client->sv_demo_file != NULL)
 983                 {
 984                         int k;
 985                         static char buf[NET_MAXMESSAGE];
 986                         sizebuf_t sb;
 987
 988                         sb.data = (unsigned char *) buf;
 989                         sb.maxsize = sizeof(buf);
 990                         k = 0;
 991                         while(MakeDownloadPacket(sv.csqc_progname, svs.csqc_progdata, sv.csqc_progsize, sv.csqc_progcrc, k++, &sb, sv.protocol))
 992                                 SV_WriteDemoMessage(client, &sb, false);
 993                 }
 994
 995                 //[515]: init stufftext string (it is sent before svc_serverinfo)
 996                 if (PRVM_GetString(prog, PRVM_serverglobalstring(SV_InitCmd)))
 997                 {
 998                         MSG_WriteByte (&client->netconnection->message, svc_stufftext);
 999                         MSG_WriteString (&client->netconnection->message, va(vabuf, sizeof(vabuf), "%s\n", PRVM_GetString(prog, PRVM_serverglobalstring(SV_InitCmd))));
1000                 }
1001         }
1002
1003         //if (sv_allowdownloads.integer)
1004         // always send the info that the server supports the protocol, even if downloads are forbidden
1005         // only because of that, the CSQC exception can work
1006         {
1007                 MSG_WriteByte (&client->netconnection->message, svc_stufftext);
1008                 MSG_WriteString (&client->netconnection->message, "cl_serverextension_download 2\n");
1009         }
1010
1011         // send at this time so it's guaranteed to get executed at the right time
1012         {
1013                 client_t *save;
1014                 save = host_client;
1015                 host_client = client;
1016                 Curl_SendRequirements();
1017                 host_client = save;
1018         }
1019
1020         MSG_WriteByte (&client->netconnection->message, svc_serverinfo);
1021         MSG_WriteLong (&client->netconnection->message, Protocol_NumberForEnum(sv.protocol));
1022         MSG_WriteByte (&client->netconnection->message, svs.maxclients);
1023
1024         if (!coop.integer && deathmatch.integer)
1025                 MSG_WriteByte (&client->netconnection->message, GAME_DEATHMATCH);
1026         else
1027                 MSG_WriteByte (&client->netconnection->message, GAME_COOP);
1028
1029         MSG_WriteString (&client->netconnection->message,PRVM_GetString(prog, PRVM_serveredictstring(prog->edicts, message)));
1030
1031         for (i = 1;i < MAX_MODELS && sv.model_precache[i][0];i++)
1032                 MSG_WriteString (&client->netconnection->message, sv.model_precache[i]);
1033         MSG_WriteByte (&client->netconnection->message, 0);
1034
1035         for (i = 1;i < MAX_SOUNDS && sv.sound_precache[i][0];i++)
1036                 MSG_WriteString (&client->netconnection->message, sv.sound_precache[i]);
1037         MSG_WriteByte (&client->netconnection->message, 0);
1038
1039 // send music
1040         MSG_WriteByte (&client->netconnection->message, svc_cdtrack);
1041         MSG_WriteByte (&client->netconnection->message, (int)PRVM_serveredictfloat(prog->edicts, sounds));
1042         MSG_WriteByte (&client->netconnection->message, (int)PRVM_serveredictfloat(prog->edicts, sounds));
1043
1044 // set view
1045 // store this in clientcamera, too
1046         client->clientcamera = PRVM_NUM_FOR_EDICT(client->edict);
1047         MSG_WriteByte (&client->netconnection->message, svc_setview);
1048         MSG_WriteShort (&client->netconnection->message, client->clientcamera);
1049
1050         MSG_WriteByte (&client->netconnection->message, svc_signonnum);
1051         MSG_WriteByte (&client->netconnection->message, 1);
1052
1053         client->prespawned = false;             // need prespawn, spawn, etc
1054         client->spawned = false;                // need prespawn, spawn, etc
1055         client->begun = false;                  // need prespawn, spawn, etc
1056         client->sendsignon = 1;                 // send this message, and increment to 2, 2 will be set to 0 by the prespawn command
1057
1058         // clear movement info until client enters the new level properly
1059         memset(&client->cmd, 0, sizeof(client->cmd));
1060         client->movesequence = 0;
1061         client->movement_highestsequence_seen = 0;
1062         memset(&client->movement_count, 0, sizeof(client->movement_count));
1063 #ifdef NUM_PING_TIMES
1064         for (i = 0;i < NUM_PING_TIMES;i++)
1065                 client->ping_times[i] = 0;
1066         client->num_pings = 0;
1067 #endif
1068         client->ping = 0;
1069
1070         // allow the client some time to send his keepalives, even if map loading took ages
1071         client->netconnection->timeout = host.realtime + net_connecttimeout.value;
1072 }
1073
1074 /*
1075 ================
1076 SV_ConnectClient
1077
1078 Initializes a client_t for a new net connection.  This will only be called
1079 once for a player each game, not once for each level change.
1080 ================
1081 */
1082 void SV_ConnectClient (int clientnum, netconn_t *netconnection)
1083 {
1084         prvm_prog_t *prog = SVVM_prog;
1085         client_t                *client;
1086         int                             i;
1087
1088         client = svs.clients + clientnum;
1089
1090 // set up the client_t
1091         if (sv.loadgame)
1092         {
1093                 float backupparms[NUM_SPAWN_PARMS];
1094                 memcpy(backupparms, client->spawn_parms, sizeof(backupparms));
1095                 memset(client, 0, sizeof(*client));
1096                 memcpy(client->spawn_parms, backupparms, sizeof(backupparms));
1097         }
1098         else
1099                 memset(client, 0, sizeof(*client));
1100         client->active = true;
1101         client->netconnection = netconnection;
1102
1103         Con_DPrintf("Client %s connected\n", client->netconnection ? client->netconnection->address : "botclient");
1104
1105         if(client->netconnection && client->netconnection->crypto.authenticated)
1106         {
1107                 Con_Printf("%s connection to %s has been established: client is %s@%s%.*s, I am %.*s@%s%.*s\n",
1108                                 client->netconnection->crypto.use_aes ? "Encrypted" : "Authenticated",
1109                                 client->netconnection->address,
1110                                 client->netconnection->crypto.client_idfp[0] ? client->netconnection->crypto.client_idfp : "-",
1111                                 (client->netconnection->crypto.client_issigned || !client->netconnection->crypto.client_keyfp[0]) ? "" : "~",
1112                                 crypto_keyfp_recommended_length, client->netconnection->crypto.client_keyfp[0] ? client->netconnection->crypto.client_keyfp : "-",
1113                                 crypto_keyfp_recommended_length, client->netconnection->crypto.server_idfp[0] ? client->netconnection->crypto.server_idfp : "-",
1114                                 (client->netconnection->crypto.server_issigned || !client->netconnection->crypto.server_keyfp[0]) ? "" : "~",
1115                                 crypto_keyfp_recommended_length, client->netconnection->crypto.server_keyfp[0] ? client->netconnection->crypto.server_keyfp : "-"
1116                                 );
1117         }
1118
1119         strlcpy(client->name, "unconnected", sizeof(client->name));
1120         strlcpy(client->old_name, "unconnected", sizeof(client->old_name));
1121         client->prespawned = false;
1122         client->spawned = false;
1123         client->begun = false;
1124         client->edict = PRVM_EDICT_NUM(clientnum+1);
1125         if (client->netconnection)
1126                 client->netconnection->message.allowoverflow = true;            // we can catch it
1127         // prepare the unreliable message buffer
1128         client->unreliablemsg.data = client->unreliablemsg_data;
1129         client->unreliablemsg.maxsize = sizeof(client->unreliablemsg_data);
1130         // updated by receiving "rate" command from client, this is also the default if not using a DP client
1131         client->rate = 1000000000;
1132         client->connecttime = host.realtime;
1133
1134         if (!sv.loadgame)
1135         {
1136                 // call the progs to get default spawn parms for the new client
1137                 // set self to world to intentionally cause errors with broken SetNewParms code in some mods
1138                 PRVM_serverglobalfloat(time) = sv.time;
1139                 PRVM_serverglobaledict(self) = 0;
1140                 prog->ExecuteProgram(prog, PRVM_serverfunction(SetNewParms), "QC function SetNewParms is missing");
1141                 for (i=0 ; i<NUM_SPAWN_PARMS ; i++)
1142                         client->spawn_parms[i] = (&PRVM_serverglobalfloat(parm1))[i];
1143
1144                 // set up the entity for this client (including .colormap, .team, etc)
1145                 PRVM_ED_ClearEdict(prog, client->edict);
1146         }
1147
1148         // don't call SendServerinfo for a fresh botclient because its fields have
1149         // not been set up by the qc yet
1150         if (client->netconnection)
1151                 SV_SendServerinfo (client);
1152         else
1153                 client->prespawned = client->spawned = client->begun = true;
1154 }
1155
1156 /*
1157 =====================
1158 SV_DropClient
1159
1160 Called when the player is getting totally kicked off the host
1161 if (crash = true), don't bother sending signofs
1162 =====================
1163 */
1164 void SV_DropClient(qboolean crash)
1165 {
1166         prvm_prog_t *prog = SVVM_prog;
1167         int i;
1168         Con_Printf("Client \"%s\" dropped\n", host_client->name);
1169
1170         SV_StopDemoRecording(host_client);
1171
1172         // make sure edict is not corrupt (from a level change for example)
1173         host_client->edict = PRVM_EDICT_NUM(host_client - svs.clients + 1);
1174
1175         if (host_client->netconnection)
1176         {
1177                 // tell the client to be gone
1178                 if (!crash)
1179                 {
1180                         // LadyHavoc: no opportunity for resending, so use unreliable 3 times
1181                         unsigned char bufdata[8];
1182                         sizebuf_t buf;
1183                         memset(&buf, 0, sizeof(buf));
1184                         buf.data = bufdata;
1185                         buf.maxsize = sizeof(bufdata);
1186                         MSG_WriteByte(&buf, svc_disconnect);
1187                         NetConn_SendUnreliableMessage(host_client->netconnection, &buf, sv.protocol, 10000, 0, false);
1188                         NetConn_SendUnreliableMessage(host_client->netconnection, &buf, sv.protocol, 10000, 0, false);
1189                         NetConn_SendUnreliableMessage(host_client->netconnection, &buf, sv.protocol, 10000, 0, false);
1190                 }
1191         }
1192
1193         // call qc ClientDisconnect function
1194         // LadyHavoc: don't call QC if server is dead (avoids recursive
1195         // Host_Error in some mods when they run out of edicts)
1196         if (host_client->clientconnectcalled && sv.active && host_client->edict)
1197         {
1198                 // call the prog function for removing a client
1199                 // this will set the body to a dead frame, among other things
1200                 int saveSelf = PRVM_serverglobaledict(self);
1201                 host_client->clientconnectcalled = false;
1202                 PRVM_serverglobalfloat(time) = sv.time;
1203                 PRVM_serverglobaledict(self) = PRVM_EDICT_TO_PROG(host_client->edict);
1204                 prog->ExecuteProgram(prog, PRVM_serverfunction(ClientDisconnect), "QC function ClientDisconnect is missing");
1205                 PRVM_serverglobaledict(self) = saveSelf;
1206         }
1207
1208         if (host_client->netconnection)
1209         {
1210                 // break the net connection
1211                 NetConn_Close(host_client->netconnection);
1212                 host_client->netconnection = NULL;
1213         }
1214
1215         // if a download is active, close it
1216         if (host_client->download_file)
1217         {
1218                 Con_DPrintf("Download of %s aborted when %s dropped\n", host_client->download_name, host_client->name);
1219                 FS_Close(host_client->download_file);
1220                 host_client->download_file = NULL;
1221                 host_client->download_name[0] = 0;
1222                 host_client->download_expectedposition = 0;
1223                 host_client->download_started = false;
1224         }
1225
1226         // remove leaving player from scoreboard
1227         host_client->name[0] = 0;
1228         host_client->colors = 0;
1229         host_client->frags = 0;
1230         // send notification to all clients
1231         // get number of client manually just to make sure we get it right...
1232         i = host_client - svs.clients;
1233         MSG_WriteByte (&sv.reliable_datagram, svc_updatename);
1234         MSG_WriteByte (&sv.reliable_datagram, i);
1235         MSG_WriteString (&sv.reliable_datagram, host_client->name);
1236         MSG_WriteByte (&sv.reliable_datagram, svc_updatecolors);
1237         MSG_WriteByte (&sv.reliable_datagram, i);
1238         MSG_WriteByte (&sv.reliable_datagram, host_client->colors);
1239         MSG_WriteByte (&sv.reliable_datagram, svc_updatefrags);
1240         MSG_WriteByte (&sv.reliable_datagram, i);
1241         MSG_WriteShort (&sv.reliable_datagram, host_client->frags);
1242
1243         // free the client now
1244         if (host_client->entitydatabase)
1245                 EntityFrame_FreeDatabase(host_client->entitydatabase);
1246         if (host_client->entitydatabase4)
1247                 EntityFrame4_FreeDatabase(host_client->entitydatabase4);
1248         if (host_client->entitydatabase5)
1249                 EntityFrame5_FreeDatabase(host_client->entitydatabase5);
1250
1251         if (sv.active)
1252         {
1253                 // clear a fields that matter to DP_SV_CLIENTNAME and DP_SV_CLIENTCOLORS, and also frags
1254                 PRVM_ED_ClearEdict(prog, host_client->edict);
1255         }
1256
1257         // clear the client struct (this sets active to false)
1258         memset(host_client, 0, sizeof(*host_client));
1259
1260         // update server listing on the master because player count changed
1261         // (which the master uses for filtering empty/full servers)
1262         NetConn_Heartbeat(1);
1263
1264         if (sv.loadgame)
1265         {
1266                 for (i = 0;i < svs.maxclients;i++)
1267                         if (svs.clients[i].active && !svs.clients[i].spawned)
1268                                 break;
1269                 if (i == svs.maxclients)
1270                 {
1271                         Con_Printf("Loaded game, everyone rejoined - unpausing\n");
1272                         sv.paused = sv.loadgame = false; // we're basically done with loading now
1273                 }
1274         }
1275 }
1276
1277 /*
1278 ===============================================================================
1279
1280 FRAME UPDATES
1281
1282 ===============================================================================
1283 */
1284
1285 /*
1286 =============================================================================
1287
1288 The PVS must include a small area around the client to allow head bobbing
1289 or other small motion on the client side.  Otherwise, a bob might cause an
1290 entity that should be visible to not show up, especially when the bob
1291 crosses a waterline.
1292
1293 =============================================================================
1294 */
1295
1296 static qboolean SV_PrepareEntityForSending (prvm_edict_t *ent, entity_state_t *cs, int enumber)
1297 {
1298         prvm_prog_t *prog = SVVM_prog;
1299         int i;
1300         unsigned int sendflags;
1301         unsigned int version;
1302         unsigned int modelindex, effects, flags, glowsize, lightstyle, lightpflags, light[4], specialvisibilityradius;
1303         unsigned int customizeentityforclient;
1304         unsigned int sendentity;
1305         float f;
1306         prvm_vec_t *v;
1307         vec3_t cullmins, cullmaxs;
1308         dp_model_t *model;
1309
1310         // fast path for games that do not use legacy entity networking
1311         // note: still networks clients even if they are legacy
1312         sendentity = PRVM_serveredictfunction(ent, SendEntity);
1313         if (sv_onlycsqcnetworking.integer && !sendentity && enumber > svs.maxclients)
1314                 return false;
1315
1316         // this 2 billion unit check is actually to detect NAN origins
1317         // (we really don't want to send those)
1318         if (!(VectorLength2(PRVM_serveredictvector(ent, origin)) < 2000000000.0*2000000000.0))
1319                 return false;
1320
1321         // EF_NODRAW prevents sending for any reason except for your own
1322         // client, so we must keep all clients in this superset
1323         effects = (unsigned)PRVM_serveredictfloat(ent, effects);
1324
1325         // we can omit invisible entities with no effects that are not clients
1326         // LadyHavoc: this could kill tags attached to an invisible entity, I
1327         // just hope we never have to support that case
1328         i = (int)PRVM_serveredictfloat(ent, modelindex);
1329         modelindex = (i >= 1 && i < MAX_MODELS && PRVM_serveredictstring(ent, model) && *PRVM_GetString(prog, PRVM_serveredictstring(ent, model)) && sv.models[i]) ? i : 0;
1330
1331         flags = 0;
1332         i = (int)(PRVM_serveredictfloat(ent, glow_size) * 0.25f);
1333         glowsize = (unsigned char)bound(0, i, 255);
1334         if (PRVM_serveredictfloat(ent, glow_trail))
1335                 flags |= RENDER_GLOWTRAIL;
1336         if (PRVM_serveredictedict(ent, viewmodelforclient))
1337                 flags |= RENDER_VIEWMODEL;
1338
1339         v = PRVM_serveredictvector(ent, color);
1340         f = v[0]*256;
1341         light[0] = (unsigned short)bound(0, f, 65535);
1342         f = v[1]*256;
1343         light[1] = (unsigned short)bound(0, f, 65535);
1344         f = v[2]*256;
1345         light[2] = (unsigned short)bound(0, f, 65535);
1346         f = PRVM_serveredictfloat(ent, light_lev);
1347         light[3] = (unsigned short)bound(0, f, 65535);
1348         lightstyle = (unsigned char)PRVM_serveredictfloat(ent, style);
1349         lightpflags = (unsigned char)PRVM_serveredictfloat(ent, pflags);
1350
1351         if (gamemode == GAME_TENEBRAE)
1352         {
1353                 // tenebrae's EF_FULLDYNAMIC conflicts with Q2's EF_NODRAW
1354                 if (effects & 16)
1355                 {
1356                         effects &= ~16;
1357                         lightpflags |= PFLAGS_FULLDYNAMIC;
1358                 }
1359                 // tenebrae's EF_GREEN conflicts with DP's EF_ADDITIVE
1360                 if (effects & 32)
1361                 {
1362                         effects &= ~32;
1363                         light[0] = (int)(0.2*256);
1364                         light[1] = (int)(1.0*256);
1365                         light[2] = (int)(0.2*256);
1366                         light[3] = 200;
1367                         lightpflags |= PFLAGS_FULLDYNAMIC;
1368                 }
1369         }
1370
1371         specialvisibilityradius = 0;
1372         if (lightpflags & PFLAGS_FULLDYNAMIC)
1373                 specialvisibilityradius = max(specialvisibilityradius, light[3]);
1374         if (glowsize)
1375                 specialvisibilityradius = max(specialvisibilityradius, glowsize * 4);
1376         if (flags & RENDER_GLOWTRAIL)
1377                 specialvisibilityradius = max(specialvisibilityradius, 100);
1378         if (effects & (EF_BRIGHTFIELD | EF_MUZZLEFLASH | EF_BRIGHTLIGHT | EF_DIMLIGHT | EF_RED | EF_BLUE | EF_FLAME | EF_STARDUST))
1379         {
1380                 if (effects & EF_BRIGHTFIELD)
1381                         specialvisibilityradius = max(specialvisibilityradius, 80);
1382                 if (effects & EF_MUZZLEFLASH)
1383                         specialvisibilityradius = max(specialvisibilityradius, 100);
1384                 if (effects & EF_BRIGHTLIGHT)
1385                         specialvisibilityradius = max(specialvisibilityradius, 400);
1386                 if (effects & EF_DIMLIGHT)
1387                         specialvisibilityradius = max(specialvisibilityradius, 200);
1388                 if (effects & EF_RED)
1389                         specialvisibilityradius = max(specialvisibilityradius, 200);
1390                 if (effects & EF_BLUE)
1391                         specialvisibilityradius = max(specialvisibilityradius, 200);
1392                 if (effects & EF_FLAME)
1393                         specialvisibilityradius = max(specialvisibilityradius, 250);
1394                 if (effects & EF_STARDUST)
1395                         specialvisibilityradius = max(specialvisibilityradius, 100);
1396         }
1397
1398         // early culling checks
1399         // (final culling is done by SV_MarkWriteEntityStateToClient)
1400         customizeentityforclient = PRVM_serveredictfunction(ent, customizeentityforclient);
1401         if (!customizeentityforclient && enumber > svs.maxclients && (!modelindex && !specialvisibilityradius))
1402                 return false;
1403
1404         *cs = defaultstate;
1405         cs->active = ACTIVE_NETWORK;
1406         cs->number = enumber;
1407         VectorCopy(PRVM_serveredictvector(ent, origin), cs->origin);
1408         VectorCopy(PRVM_serveredictvector(ent, angles), cs->angles);
1409         cs->flags = flags;
1410         cs->effects = effects;
1411         cs->colormap = (unsigned)PRVM_serveredictfloat(ent, colormap);
1412         cs->modelindex = modelindex;
1413         cs->skin = (unsigned)PRVM_serveredictfloat(ent, skin);
1414         cs->frame = (unsigned)PRVM_serveredictfloat(ent, frame);
1415         cs->viewmodelforclient = PRVM_serveredictedict(ent, viewmodelforclient);
1416         cs->exteriormodelforclient = PRVM_serveredictedict(ent, exteriormodeltoclient);
1417         cs->nodrawtoclient = PRVM_serveredictedict(ent, nodrawtoclient);
1418         cs->drawonlytoclient = PRVM_serveredictedict(ent, drawonlytoclient);
1419         cs->customizeentityforclient = customizeentityforclient;
1420         cs->tagentity = PRVM_serveredictedict(ent, tag_entity);
1421         cs->tagindex = (unsigned char)PRVM_serveredictfloat(ent, tag_index);
1422         cs->glowsize = glowsize;
1423         cs->traileffectnum = PRVM_serveredictfloat(ent, traileffectnum);
1424
1425         // don't need to init cs->colormod because the defaultstate did that for us
1426         //cs->colormod[0] = cs->colormod[1] = cs->colormod[2] = 32;
1427         v = PRVM_serveredictvector(ent, colormod);
1428         if (VectorLength2(v))
1429         {
1430                 i = (int)(v[0] * 32.0f);cs->colormod[0] = bound(0, i, 255);
1431                 i = (int)(v[1] * 32.0f);cs->colormod[1] = bound(0, i, 255);
1432                 i = (int)(v[2] * 32.0f);cs->colormod[2] = bound(0, i, 255);
1433         }
1434
1435         // don't need to init cs->glowmod because the defaultstate did that for us
1436         //cs->glowmod[0] = cs->glowmod[1] = cs->glowmod[2] = 32;
1437         v = PRVM_serveredictvector(ent, glowmod);
1438         if (VectorLength2(v))
1439         {
1440                 i = (int)(v[0] * 32.0f);cs->glowmod[0] = bound(0, i, 255);
1441                 i = (int)(v[1] * 32.0f);cs->glowmod[1] = bound(0, i, 255);
1442                 i = (int)(v[2] * 32.0f);cs->glowmod[2] = bound(0, i, 255);
1443         }
1444
1445         cs->modelindex = modelindex;
1446
1447         cs->alpha = 255;
1448         f = (PRVM_serveredictfloat(ent, alpha) * 255.0f);
1449         if (f)
1450         {
1451                 i = (int)f;
1452                 cs->alpha = (unsigned char)bound(0, i, 255);
1453         }
1454         // halflife
1455         f = (PRVM_serveredictfloat(ent, renderamt));
1456         if (f)
1457         {
1458                 i = (int)f;
1459                 cs->alpha = (unsigned char)bound(0, i, 255);
1460         }
1461
1462         cs->scale = 16;
1463         f = (PRVM_serveredictfloat(ent, scale) * 16.0f);
1464         if (f)
1465         {
1466                 i = (int)f;
1467                 cs->scale = (unsigned char)bound(0, i, 255);
1468         }
1469
1470         cs->glowcolor = 254;
1471         f = PRVM_serveredictfloat(ent, glow_color);
1472         if (f)
1473                 cs->glowcolor = (int)f;
1474
1475         if (PRVM_serveredictfloat(ent, fullbright))
1476                 cs->effects |= EF_FULLBRIGHT;
1477
1478         f = PRVM_serveredictfloat(ent, modelflags);
1479         if (f)
1480                 cs->effects |= ((unsigned int)f & 0xff) << 24;
1481
1482         if (PRVM_serveredictfloat(ent, movetype) == MOVETYPE_STEP)
1483                 cs->flags |= RENDER_STEP;
1484         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)
1485                 cs->flags |= RENDER_LOWPRECISION;
1486         if (PRVM_serveredictfloat(ent, colormap) >= 1024)
1487                 cs->flags |= RENDER_COLORMAPPED;
1488         if (cs->viewmodelforclient)
1489                 cs->flags |= RENDER_VIEWMODEL; // show relative to the view
1490
1491         if (PRVM_serveredictfloat(ent, sendcomplexanimation))
1492         {
1493                 cs->flags |= RENDER_COMPLEXANIMATION;
1494                 if (PRVM_serveredictfloat(ent, skeletonindex) >= 1)
1495                         cs->skeletonobject = ent->priv.server->skeleton;
1496                 cs->framegroupblend[0].frame = PRVM_serveredictfloat(ent, frame);
1497                 cs->framegroupblend[1].frame = PRVM_serveredictfloat(ent, frame2);
1498                 cs->framegroupblend[2].frame = PRVM_serveredictfloat(ent, frame3);
1499                 cs->framegroupblend[3].frame = PRVM_serveredictfloat(ent, frame4);
1500                 cs->framegroupblend[0].start = PRVM_serveredictfloat(ent, frame1time);
1501                 cs->framegroupblend[1].start = PRVM_serveredictfloat(ent, frame2time);
1502                 cs->framegroupblend[2].start = PRVM_serveredictfloat(ent, frame3time);
1503                 cs->framegroupblend[3].start = PRVM_serveredictfloat(ent, frame4time);
1504                 cs->framegroupblend[1].lerp = PRVM_serveredictfloat(ent, lerpfrac);
1505                 cs->framegroupblend[2].lerp = PRVM_serveredictfloat(ent, lerpfrac3);
1506                 cs->framegroupblend[3].lerp = PRVM_serveredictfloat(ent, lerpfrac4);
1507                 cs->framegroupblend[0].lerp = 1.0f - cs->framegroupblend[1].lerp - cs->framegroupblend[2].lerp - cs->framegroupblend[3].lerp;
1508                 cs->frame = 0; // don't need the legacy frame
1509         }
1510
1511         cs->light[0] = light[0];
1512         cs->light[1] = light[1];
1513         cs->light[2] = light[2];
1514         cs->light[3] = light[3];
1515         cs->lightstyle = lightstyle;
1516         cs->lightpflags = lightpflags;
1517
1518         cs->specialvisibilityradius = specialvisibilityradius;
1519
1520         // calculate the visible box of this entity (don't use the physics box
1521         // as that is often smaller than a model, and would not count
1522         // specialvisibilityradius)
1523         if ((model = SV_GetModelByIndex(modelindex)) && (model->type != mod_null))
1524         {
1525                 float scale = cs->scale * (1.0f / 16.0f);
1526                 if (cs->angles[0] || cs->angles[2]) // pitch and roll
1527                 {
1528                         VectorMA(cs->origin, scale, model->rotatedmins, cullmins);
1529                         VectorMA(cs->origin, scale, model->rotatedmaxs, cullmaxs);
1530                 }
1531                 else if (cs->angles[1] || ((effects | model->effects) & EF_ROTATE))
1532                 {
1533                         VectorMA(cs->origin, scale, model->yawmins, cullmins);
1534                         VectorMA(cs->origin, scale, model->yawmaxs, cullmaxs);
1535                 }
1536                 else
1537                 {
1538                         VectorMA(cs->origin, scale, model->normalmins, cullmins);
1539                         VectorMA(cs->origin, scale, model->normalmaxs, cullmaxs);
1540                 }
1541         }
1542         else
1543         {
1544                 // if there is no model (or it could not be loaded), use the physics box
1545                 VectorAdd(cs->origin, PRVM_serveredictvector(ent, mins), cullmins);
1546                 VectorAdd(cs->origin, PRVM_serveredictvector(ent, maxs), cullmaxs);
1547         }
1548         if (specialvisibilityradius)
1549         {
1550                 cullmins[0] = min(cullmins[0], cs->origin[0] - specialvisibilityradius);
1551                 cullmins[1] = min(cullmins[1], cs->origin[1] - specialvisibilityradius);
1552                 cullmins[2] = min(cullmins[2], cs->origin[2] - specialvisibilityradius);
1553                 cullmaxs[0] = max(cullmaxs[0], cs->origin[0] + specialvisibilityradius);
1554                 cullmaxs[1] = max(cullmaxs[1], cs->origin[1] + specialvisibilityradius);
1555                 cullmaxs[2] = max(cullmaxs[2], cs->origin[2] + specialvisibilityradius);
1556         }
1557
1558         // calculate center of bbox for network prioritization purposes
1559         VectorMAM(0.5f, cullmins, 0.5f, cullmaxs, cs->netcenter);
1560
1561         // if culling box has moved, update pvs cluster links
1562         if (!VectorCompare(cullmins, ent->priv.server->cullmins) || !VectorCompare(cullmaxs, ent->priv.server->cullmaxs))
1563         {
1564                 VectorCopy(cullmins, ent->priv.server->cullmins);
1565                 VectorCopy(cullmaxs, ent->priv.server->cullmaxs);
1566                 // a value of -1 for pvs_numclusters indicates that the links are not
1567                 // cached, and should be re-tested each time, this is the case if the
1568                 // culling box touches too many pvs clusters to store, or if the world
1569                 // model does not support FindBoxClusters
1570                 ent->priv.server->pvs_numclusters = -1;
1571                 if (sv.worldmodel && sv.worldmodel->brush.FindBoxClusters)
1572                 {
1573                         i = sv.worldmodel->brush.FindBoxClusters(sv.worldmodel, cullmins, cullmaxs, MAX_ENTITYCLUSTERS, ent->priv.server->pvs_clusterlist);
1574                         if (i <= MAX_ENTITYCLUSTERS)
1575                                 ent->priv.server->pvs_numclusters = i;
1576                 }
1577         }
1578
1579         // we need to do some csqc entity upkeep here
1580         // get self.SendFlags and clear them
1581         // (to let the QC know that they've been read)
1582         if (sendentity)
1583         {
1584                 sendflags = (unsigned int)PRVM_serveredictfloat(ent, SendFlags);
1585                 PRVM_serveredictfloat(ent, SendFlags) = 0;
1586                 // legacy self.Version system
1587                 if ((version = (unsigned int)PRVM_serveredictfloat(ent, Version)))
1588                 {
1589                         if (sv.csqcentityversion[enumber] != version)
1590                                 sendflags = 0xFFFFFF;
1591                         sv.csqcentityversion[enumber] = version;
1592                 }
1593                 // move sendflags into the per-client sendflags
1594                 if (sendflags)
1595                         for (i = 0;i < svs.maxclients;i++)
1596                                 svs.clients[i].csqcentitysendflags[enumber] |= sendflags;
1597                 // mark it as inactive for non-csqc networking
1598                 cs->active = ACTIVE_SHARED;
1599         }
1600
1601         return true;
1602 }
1603
1604 static void SV_PrepareEntitiesForSending(void)
1605 {
1606         prvm_prog_t *prog = SVVM_prog;
1607         int e;
1608         prvm_edict_t *ent;
1609         // send all entities that touch the pvs
1610         sv.numsendentities = 0;
1611         sv.sendentitiesindex[0] = NULL;
1612         memset(sv.sendentitiesindex, 0, prog->num_edicts * sizeof(*sv.sendentitiesindex));
1613         for (e = 1, ent = PRVM_NEXT_EDICT(prog->edicts);e < prog->num_edicts;e++, ent = PRVM_NEXT_EDICT(ent))
1614         {
1615                 if (!ent->priv.server->free && SV_PrepareEntityForSending(ent, sv.sendentities + sv.numsendentities, e))
1616                 {
1617                         sv.sendentitiesindex[e] = sv.sendentities + sv.numsendentities;
1618                         sv.numsendentities++;
1619                 }
1620         }
1621 }
1622
1623 #define MAX_LINEOFSIGHTTRACES 64
1624
1625 qboolean SV_CanSeeBox(int numtraces, vec_t eyejitter, vec_t enlarge, vec_t entboxexpand, vec3_t eye, vec3_t entboxmins, vec3_t entboxmaxs)
1626 {
1627         prvm_prog_t *prog = SVVM_prog;
1628         float pitchsign;
1629         float alpha;
1630         float starttransformed[3], endtransformed[3];
1631         float boxminstransformed[3], boxmaxstransformed[3];
1632         float localboxcenter[3], localboxextents[3], localboxmins[3], localboxmaxs[3];
1633         int blocked = 0;
1634         int traceindex;
1635         int originalnumtouchedicts;
1636         int numtouchedicts = 0;
1637         int touchindex;
1638         matrix4x4_t matrix, imatrix;
1639         dp_model_t *model;
1640         prvm_edict_t *touch;
1641         static prvm_edict_t *touchedicts[MAX_EDICTS];
1642         vec3_t eyemins, eyemaxs, start;
1643         vec3_t boxmins, boxmaxs;
1644         vec3_t clipboxmins, clipboxmaxs;
1645         vec3_t endpoints[MAX_LINEOFSIGHTTRACES];
1646
1647         numtraces = min(numtraces, MAX_LINEOFSIGHTTRACES);
1648
1649         // jitter the eye location within this box
1650         eyemins[0] = eye[0] - eyejitter;
1651         eyemaxs[0] = eye[0] + eyejitter;
1652         eyemins[1] = eye[1] - eyejitter;
1653         eyemaxs[1] = eye[1] + eyejitter;
1654         eyemins[2] = eye[2] - eyejitter;
1655         eyemaxs[2] = eye[2] + eyejitter;
1656         // expand the box a little
1657         boxmins[0] = (enlarge+1) * entboxmins[0] - enlarge * entboxmaxs[0] - entboxexpand;
1658         boxmaxs[0] = (enlarge+1) * entboxmaxs[0] - enlarge * entboxmins[0] + entboxexpand;
1659         boxmins[1] = (enlarge+1) * entboxmins[1] - enlarge * entboxmaxs[1] - entboxexpand;
1660         boxmaxs[1] = (enlarge+1) * entboxmaxs[1] - enlarge * entboxmins[1] + entboxexpand;
1661         boxmins[2] = (enlarge+1) * entboxmins[2] - enlarge * entboxmaxs[2] - entboxexpand;
1662         boxmaxs[2] = (enlarge+1) * entboxmaxs[2] - enlarge * entboxmins[2] + entboxexpand;
1663
1664         VectorMAM(0.5f, boxmins, 0.5f, boxmaxs, endpoints[0]);
1665         for (traceindex = 1;traceindex < numtraces;traceindex++)
1666                 VectorSet(endpoints[traceindex], lhrandom(boxmins[0], boxmaxs[0]), lhrandom(boxmins[1], boxmaxs[1]), lhrandom(boxmins[2], boxmaxs[2]));
1667
1668         // calculate sweep box for the entire swarm of traces
1669         VectorCopy(eyemins, clipboxmins);
1670         VectorCopy(eyemaxs, clipboxmaxs);
1671         for (traceindex = 0;traceindex < numtraces;traceindex++)
1672         {
1673                 clipboxmins[0] = min(clipboxmins[0], endpoints[traceindex][0]);
1674                 clipboxmins[1] = min(clipboxmins[1], endpoints[traceindex][1]);
1675                 clipboxmins[2] = min(clipboxmins[2], endpoints[traceindex][2]);
1676                 clipboxmaxs[0] = max(clipboxmaxs[0], endpoints[traceindex][0]);
1677                 clipboxmaxs[1] = max(clipboxmaxs[1], endpoints[traceindex][1]);
1678                 clipboxmaxs[2] = max(clipboxmaxs[2], endpoints[traceindex][2]);
1679         }
1680
1681         // get the list of entities in the sweep box
1682         if (sv_cullentities_trace_entityocclusion.integer)
1683                 numtouchedicts = SV_EntitiesInBox(clipboxmins, clipboxmaxs, MAX_EDICTS, touchedicts);
1684         if (numtouchedicts > MAX_EDICTS)
1685         {
1686                 // this never happens
1687                 Con_Printf("SV_EntitiesInBox returned %i edicts, max was %i\n", numtouchedicts, MAX_EDICTS);
1688                 numtouchedicts = MAX_EDICTS;
1689         }
1690         // iterate the entities found in the sweep box and filter them
1691         originalnumtouchedicts = numtouchedicts;
1692         numtouchedicts = 0;
1693         for (touchindex = 0;touchindex < originalnumtouchedicts;touchindex++)
1694         {
1695                 touch = touchedicts[touchindex];
1696                 if (PRVM_serveredictfloat(touch, solid) != SOLID_BSP)
1697                         continue;
1698                 model = SV_GetModelFromEdict(touch);
1699                 if (!model || !model->brush.TraceLineOfSight)
1700                         continue;
1701                 // skip obviously transparent entities
1702                 alpha = PRVM_serveredictfloat(touch, alpha);
1703                 if (alpha && alpha < 1)
1704                         continue;
1705                 if ((int)PRVM_serveredictfloat(touch, effects) & EF_ADDITIVE)
1706                         continue;
1707                 touchedicts[numtouchedicts++] = touch;
1708         }
1709
1710         // now that we have a filtered list of "interesting" entities, fire each
1711         // ray against all of them, this gives us an early-out case when something
1712         // is visible (which it often is)
1713
1714         for (traceindex = 0;traceindex < numtraces;traceindex++)
1715         {
1716                 VectorSet(start, lhrandom(eyemins[0], eyemaxs[0]), lhrandom(eyemins[1], eyemaxs[1]), lhrandom(eyemins[2], eyemaxs[2]));
1717                 // check world occlusion
1718                 if (sv.worldmodel && sv.worldmodel->brush.TraceLineOfSight)
1719                         if (!sv.worldmodel->brush.TraceLineOfSight(sv.worldmodel, start, endpoints[traceindex], boxmins, boxmaxs))
1720                                 continue;
1721                 for (touchindex = 0;touchindex < numtouchedicts;touchindex++)
1722                 {
1723                         touch = touchedicts[touchindex];
1724                         model = SV_GetModelFromEdict(touch);
1725                         if(model && model->brush.TraceLineOfSight)
1726                         {
1727                                 // get the entity matrix
1728                                 pitchsign = SV_GetPitchSign(prog, touch);
1729                                 Matrix4x4_CreateFromQuakeEntity(&matrix, PRVM_serveredictvector(touch, origin)[0], PRVM_serveredictvector(touch, origin)[1], PRVM_serveredictvector(touch, origin)[2], pitchsign * PRVM_serveredictvector(touch, angles)[0], PRVM_serveredictvector(touch, angles)[1], PRVM_serveredictvector(touch, angles)[2], 1);
1730                                 Matrix4x4_Invert_Simple(&imatrix, &matrix);
1731                                 // see if the ray hits this entity
1732                                 Matrix4x4_Transform(&imatrix, start, starttransformed);
1733                                 Matrix4x4_Transform(&imatrix, endpoints[traceindex], endtransformed);
1734                                 Matrix4x4_Transform(&imatrix, boxmins, boxminstransformed);
1735                                 Matrix4x4_Transform(&imatrix, boxmaxs, boxmaxstransformed);
1736                                 // transform the AABB to local space
1737                                 VectorMAM(0.5f, boxminstransformed, 0.5f, boxmaxstransformed, localboxcenter);
1738                                 localboxextents[0] = fabs(boxmaxstransformed[0] - localboxcenter[0]);
1739                                 localboxextents[1] = fabs(boxmaxstransformed[1] - localboxcenter[1]);
1740                                 localboxextents[2] = fabs(boxmaxstransformed[2] - localboxcenter[2]);
1741                                 localboxmins[0] = localboxcenter[0] - localboxextents[0];
1742                                 localboxmins[1] = localboxcenter[1] - localboxextents[1];
1743                                 localboxmins[2] = localboxcenter[2] - localboxextents[2];
1744                                 localboxmaxs[0] = localboxcenter[0] + localboxextents[0];
1745                                 localboxmaxs[1] = localboxcenter[1] + localboxextents[1];
1746                                 localboxmaxs[2] = localboxcenter[2] + localboxextents[2];
1747                                 if (!model->brush.TraceLineOfSight(model, starttransformed, endtransformed, localboxmins, localboxmaxs))
1748                                 {
1749                                         blocked++;
1750                                         break;
1751                                 }
1752                         }
1753                 }
1754                 // check if the ray was blocked
1755                 if (touchindex < numtouchedicts)
1756                         continue;
1757                 // return if the ray was not blocked
1758                 return true;
1759         }
1760
1761         // no rays survived
1762         return false;
1763 }
1764
1765 static void SV_MarkWriteEntityStateToClient(entity_state_t *s)
1766 {
1767         prvm_prog_t *prog = SVVM_prog;
1768         int isbmodel;
1769         dp_model_t *model;
1770         prvm_edict_t *ed;
1771         if (sv.sententitiesconsideration[s->number] == sv.sententitiesmark)
1772                 return;
1773         sv.sententitiesconsideration[s->number] = sv.sententitiesmark;
1774         sv.writeentitiestoclient_stats_totalentities++;
1775
1776         if (s->customizeentityforclient)
1777         {
1778                 PRVM_serverglobalfloat(time) = sv.time;
1779                 PRVM_serverglobaledict(self) = s->number;
1780                 PRVM_serverglobaledict(other) = sv.writeentitiestoclient_cliententitynumber;
1781                 prog->ExecuteProgram(prog, s->customizeentityforclient, "customizeentityforclient: NULL function");
1782                 if(!PRVM_G_FLOAT(OFS_RETURN) || !SV_PrepareEntityForSending(PRVM_EDICT_NUM(s->number), s, s->number))
1783                         return;
1784         }
1785
1786         // never reject player
1787         if (s->number != sv.writeentitiestoclient_cliententitynumber)
1788         {
1789                 // check various rejection conditions
1790                 if (s->nodrawtoclient == sv.writeentitiestoclient_cliententitynumber)
1791                         return;
1792                 if (s->drawonlytoclient && s->drawonlytoclient != sv.writeentitiestoclient_cliententitynumber)
1793                         return;
1794                 if (s->effects & EF_NODRAW)
1795                         return;
1796                 // LadyHavoc: only send entities with a model or important effects
1797                 if (!s->modelindex && s->specialvisibilityradius == 0)
1798                         return;
1799
1800                 isbmodel = (model = SV_GetModelByIndex(s->modelindex)) != NULL && model->name[0] == '*';
1801                 // viewmodels don't have visibility checking
1802                 if (s->viewmodelforclient)
1803                 {
1804                         if (s->viewmodelforclient != sv.writeentitiestoclient_cliententitynumber)
1805                                 return;
1806                 }
1807                 else if (s->tagentity)
1808                 {
1809                         // tag attached entities simply check their parent
1810                         if (!sv.sendentitiesindex[s->tagentity])
1811                                 return;
1812                         SV_MarkWriteEntityStateToClient(sv.sendentitiesindex[s->tagentity]);
1813                         if (sv.sententities[s->tagentity] != sv.sententitiesmark)
1814                                 return;
1815                 }
1816                 // always send world submodels in newer protocols because they don't
1817                 // generate much traffic (in old protocols they hog bandwidth)
1818                 // but only if sv_cullentities_nevercullbmodels is off
1819                 else if (!(s->effects & EF_NODEPTHTEST) && (!isbmodel || !sv_cullentities_nevercullbmodels.integer || sv.protocol == PROTOCOL_QUAKE || sv.protocol == PROTOCOL_QUAKEDP || sv.protocol == PROTOCOL_NEHAHRAMOVIE))
1820                 {
1821                         // entity has survived every check so far, check if visible
1822                         ed = PRVM_EDICT_NUM(s->number);
1823
1824                         // if not touching a visible leaf
1825                         if (sv_cullentities_pvs.integer && !r_novis.integer && !r_trippy.integer && sv.writeentitiestoclient_pvsbytes)
1826                         {
1827                                 if (ed->priv.server->pvs_numclusters < 0)
1828                                 {
1829                                         // entity too big for clusters list
1830                                         if (sv.worldmodel && sv.worldmodel->brush.BoxTouchingPVS && !sv.worldmodel->brush.BoxTouchingPVS(sv.worldmodel, sv.writeentitiestoclient_pvs, ed->priv.server->cullmins, ed->priv.server->cullmaxs))
1831                                         {
1832                                                 sv.writeentitiestoclient_stats_culled_pvs++;
1833                                                 return;
1834                                         }
1835                                 }
1836                                 else
1837                                 {
1838                                         int i;
1839                                         // check cached clusters list
1840                                         for (i = 0;i < ed->priv.server->pvs_numclusters;i++)
1841                                                 if (CHECKPVSBIT(sv.writeentitiestoclient_pvs, ed->priv.server->pvs_clusterlist[i]))
1842                                                         break;
1843                                         if (i == ed->priv.server->pvs_numclusters)
1844                                         {
1845                                                 sv.writeentitiestoclient_stats_culled_pvs++;
1846                                                 return;
1847                                         }
1848                                 }
1849                         }
1850
1851                         // or not seen by random tracelines
1852                         if (sv_cullentities_trace.integer && !isbmodel && sv.worldmodel && sv.worldmodel->brush.TraceLineOfSight && !r_trippy.integer)
1853                         {
1854                                 int samples =
1855                                         s->number <= svs.maxclients
1856                                                 ? sv_cullentities_trace_samples_players.integer
1857                                                 :
1858                                         s->specialvisibilityradius
1859                                                 ? sv_cullentities_trace_samples_extra.integer
1860                                                 : sv_cullentities_trace_samples.integer;
1861                                 float enlarge = sv_cullentities_trace_enlarge.value;
1862
1863                                 if(samples > 0)
1864                                 {
1865                                         int eyeindex;
1866                                         for (eyeindex = 0;eyeindex < sv.writeentitiestoclient_numeyes;eyeindex++)
1867                                                 if(SV_CanSeeBox(samples, sv_cullentities_trace_eyejitter.value, enlarge, sv_cullentities_trace_expand.value, sv.writeentitiestoclient_eyes[eyeindex], ed->priv.server->cullmins, ed->priv.server->cullmaxs))
1868                                                         break;
1869                                         if(eyeindex < sv.writeentitiestoclient_numeyes)
1870                                                 svs.clients[sv.writeentitiestoclient_clientnumber].visibletime[s->number] =
1871                                                         host.realtime + (
1872                                                                 s->number <= svs.maxclients
1873                                                                         ? sv_cullentities_trace_delay_players.value
1874                                                                         : sv_cullentities_trace_delay.value
1875                                                         );
1876                                         else if (host.realtime > svs.clients[sv.writeentitiestoclient_clientnumber].visibletime[s->number])
1877                                         {
1878                                                 sv.writeentitiestoclient_stats_culled_trace++;
1879                                                 return;
1880                                         }
1881                                 }
1882                         }
1883                 }
1884         }
1885
1886         // this just marks it for sending
1887         // FIXME: it would be more efficient to send here, but the entity
1888         // compressor isn't that flexible
1889         sv.writeentitiestoclient_stats_visibleentities++;
1890         sv.sententities[s->number] = sv.sententitiesmark;
1891 }
1892
1893 #if MAX_LEVELNETWORKEYES > 0
1894 #define MAX_EYE_RECURSION 1 // increase if recursion gets supported by portals
1895 static void SV_AddCameraEyes(void)
1896 {
1897         prvm_prog_t *prog = SVVM_prog;
1898         int e, i, j, k;
1899         prvm_edict_t *ed;
1900         static int cameras[MAX_LEVELNETWORKEYES];
1901         static vec3_t camera_origins[MAX_LEVELNETWORKEYES];
1902         static int eye_levels[MAX_CLIENTNETWORKEYES];
1903         int n_cameras = 0;
1904         vec3_t mi, ma;
1905
1906         for(i = 0; i < sv.writeentitiestoclient_numeyes; ++i)
1907                 eye_levels[i] = 0;
1908
1909         // check line of sight to portal entities and add them to PVS
1910         for (e = 1, ed = PRVM_NEXT_EDICT(prog->edicts);e < prog->num_edicts;e++, ed = PRVM_NEXT_EDICT(ed))
1911         {
1912                 if (!ed->priv.server->free)
1913                 {
1914                         if(PRVM_serveredictfunction(ed, camera_transform))
1915                         {
1916                                 PRVM_serverglobalfloat(time) = sv.time;
1917                                 PRVM_serverglobaledict(self) = e;
1918                                 PRVM_serverglobaledict(other) = sv.writeentitiestoclient_cliententitynumber;
1919                                 VectorCopy(sv.writeentitiestoclient_eyes[0], PRVM_serverglobalvector(trace_endpos));
1920                                 VectorCopy(sv.writeentitiestoclient_eyes[0], PRVM_G_VECTOR(OFS_PARM0));
1921                                 VectorClear(PRVM_G_VECTOR(OFS_PARM1));
1922                                 prog->ExecuteProgram(prog, PRVM_serveredictfunction(ed, camera_transform), "QC function e.camera_transform is missing");
1923                                 if(!VectorCompare(PRVM_serverglobalvector(trace_endpos), sv.writeentitiestoclient_eyes[0]))
1924                                 {
1925                                         VectorCopy(PRVM_serverglobalvector(trace_endpos), camera_origins[n_cameras]);
1926                                         cameras[n_cameras] = e;
1927                                         ++n_cameras;
1928                                         if(n_cameras >= MAX_LEVELNETWORKEYES)
1929                                                 break;
1930                                 }
1931                         }
1932                 }
1933         }
1934
1935         if(!n_cameras)
1936                 return;
1937
1938         // i is loop counter, is reset to 0 when an eye got added
1939         // j is camera index to check
1940         for(i = 0, j = 0; sv.writeentitiestoclient_numeyes < MAX_CLIENTNETWORKEYES && i < n_cameras; ++i, ++j, j %= n_cameras)
1941         {
1942                 if(!cameras[j])
1943                         continue;
1944                 ed = PRVM_EDICT_NUM(cameras[j]);
1945                 VectorAdd(PRVM_serveredictvector(ed, origin), PRVM_serveredictvector(ed, mins), mi);
1946                 VectorAdd(PRVM_serveredictvector(ed, origin), PRVM_serveredictvector(ed, maxs), ma);
1947                 for(k = 0; k < sv.writeentitiestoclient_numeyes; ++k)
1948                 if(eye_levels[k] <= MAX_EYE_RECURSION)
1949                 {
1950                         if(SV_CanSeeBox(sv_cullentities_trace_samples.integer, sv_cullentities_trace_eyejitter.value, sv_cullentities_trace_enlarge.value, sv_cullentities_trace_expand.value, sv.writeentitiestoclient_eyes[k], mi, ma))
1951                         {
1952                                 eye_levels[sv.writeentitiestoclient_numeyes] = eye_levels[k] + 1;
1953                                 VectorCopy(camera_origins[j], sv.writeentitiestoclient_eyes[sv.writeentitiestoclient_numeyes]);
1954                                 // 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);
1955                                 sv.writeentitiestoclient_numeyes++;
1956                                 cameras[j] = 0;
1957                                 i = 0;
1958                                 break;
1959                         }
1960                 }
1961         }
1962 }
1963 #else
1964 void SV_AddCameraEyes(void)
1965 {
1966 }
1967 #endif
1968
1969 static void SV_WriteEntitiesToClient(client_t *client, prvm_edict_t *clent, sizebuf_t *msg, int maxsize)
1970 {
1971         prvm_prog_t *prog = SVVM_prog;
1972         qboolean need_empty = false;
1973         int i, numsendstates, numcsqcsendstates;
1974         entity_state_t *s;
1975         prvm_edict_t *camera;
1976         qboolean success;
1977         vec3_t eye;
1978
1979         // if there isn't enough space to accomplish anything, skip it
1980         if (msg->cursize + 25 > maxsize)
1981                 return;
1982
1983         sv.writeentitiestoclient_msg = msg;
1984         sv.writeentitiestoclient_clientnumber = client - svs.clients;
1985
1986         sv.writeentitiestoclient_stats_culled_pvs = 0;
1987         sv.writeentitiestoclient_stats_culled_trace = 0;
1988         sv.writeentitiestoclient_stats_visibleentities = 0;
1989         sv.writeentitiestoclient_stats_totalentities = 0;
1990         sv.writeentitiestoclient_numeyes = 0;
1991
1992         // get eye location
1993         sv.writeentitiestoclient_cliententitynumber = PRVM_EDICT_TO_PROG(clent); // LadyHavoc: for comparison purposes
1994         camera = PRVM_EDICT_NUM( client->clientcamera );
1995         VectorAdd(PRVM_serveredictvector(camera, origin), PRVM_serveredictvector(clent, view_ofs), eye);
1996         sv.writeentitiestoclient_pvsbytes = 0;
1997         // get the PVS values for the eye location, later FatPVS calls will merge
1998         if (sv.worldmodel && sv.worldmodel->brush.FatPVS)
1999                 sv.writeentitiestoclient_pvsbytes = sv.worldmodel->brush.FatPVS(sv.worldmodel, eye, 8, sv.writeentitiestoclient_pvs, sizeof(sv.writeentitiestoclient_pvs), sv.writeentitiestoclient_pvsbytes != 0);
2000
2001         // add the eye to a list for SV_CanSeeBox tests
2002         VectorCopy(eye, sv.writeentitiestoclient_eyes[sv.writeentitiestoclient_numeyes]);
2003         sv.writeentitiestoclient_numeyes++;
2004
2005         // calculate predicted eye origin for SV_CanSeeBox tests
2006         if (sv_cullentities_trace_prediction.integer)
2007         {
2008                 vec_t predtime = bound(0, host_client->ping, sv_cullentities_trace_prediction_time.value);
2009                 vec3_t predeye;
2010                 VectorMA(eye, predtime, PRVM_serveredictvector(camera, velocity), predeye);
2011                 if (SV_CanSeeBox(1, 0, 0, 0, eye, predeye, predeye))
2012                 {
2013                         VectorCopy(predeye, sv.writeentitiestoclient_eyes[sv.writeentitiestoclient_numeyes]);
2014                         sv.writeentitiestoclient_numeyes++;
2015                 }
2016                 //if (!sv.writeentitiestoclient_useprediction)
2017                 //      Con_DPrintf("Trying to walk into solid in a pingtime... not predicting for culling\n");
2018         }
2019
2020         SV_AddCameraEyes();
2021
2022         // build PVS from the new eyes
2023         if (sv.worldmodel && sv.worldmodel->brush.FatPVS)
2024                 for(i = 1; i < sv.writeentitiestoclient_numeyes; ++i)
2025                         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);
2026
2027         sv.sententitiesmark++;
2028
2029         for (i = 0;i < sv.numsendentities;i++)
2030                 SV_MarkWriteEntityStateToClient(sv.sendentities + i);
2031
2032         numsendstates = 0;
2033         numcsqcsendstates = 0;
2034         for (i = 0;i < sv.numsendentities;i++)
2035         {
2036                 s = &sv.sendentities[i];
2037                 if (sv.sententities[s->number] == sv.sententitiesmark)
2038                 {
2039                         if(s->active == ACTIVE_NETWORK)
2040                         {
2041                                 if (s->exteriormodelforclient)
2042                                 {
2043                                         if (s->exteriormodelforclient == sv.writeentitiestoclient_cliententitynumber)
2044                                                 s->flags |= RENDER_EXTERIORMODEL;
2045                                         else
2046                                                 s->flags &= ~RENDER_EXTERIORMODEL;
2047                                 }
2048                                 sv.writeentitiestoclient_sendstates[numsendstates++] = s;
2049                         }
2050                         else if(sv.sendentities[i].active == ACTIVE_SHARED)
2051                                 sv.writeentitiestoclient_csqcsendstates[numcsqcsendstates++] = s->number;
2052                         else
2053                                 Con_Printf("entity %d is in sv.sendentities and marked, but not active, please breakpoint me\n", s->number);
2054                 }
2055         }
2056
2057         if (sv_cullentities_stats.integer)
2058                 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);
2059
2060         if(client->entitydatabase5)
2061                 need_empty = EntityFrameCSQC_WriteFrame(msg, maxsize, numcsqcsendstates, sv.writeentitiestoclient_csqcsendstates, client->entitydatabase5->latestframenum + 1);
2062         else
2063                 EntityFrameCSQC_WriteFrame(msg, maxsize, numcsqcsendstates, sv.writeentitiestoclient_csqcsendstates, 0);
2064
2065         // force every 16th frame to be not empty (or cl_movement replay takes
2066         // too long)
2067         // BTW, this should normally not kick in any more due to the check
2068         // below, except if the client stopped sending movement frames
2069         if(client->num_skippedentityframes >= 16)
2070                 need_empty = true;
2071
2072         // help cl_movement a bit more
2073         if(client->movesequence != client->lastmovesequence)
2074                 need_empty = true;
2075         client->lastmovesequence = client->movesequence;
2076
2077         if (client->entitydatabase5)
2078                 success = EntityFrame5_WriteFrame(msg, maxsize, client->entitydatabase5, numsendstates, sv.writeentitiestoclient_sendstates, client - svs.clients + 1, client->movesequence, need_empty);
2079         else if (client->entitydatabase4)
2080         {
2081                 success = EntityFrame4_WriteFrame(msg, maxsize, client->entitydatabase4, numsendstates, sv.writeentitiestoclient_sendstates);
2082                 Protocol_WriteStatsReliable();
2083         }
2084         else if (client->entitydatabase)
2085         {
2086                 success = EntityFrame_WriteFrame(msg, maxsize, client->entitydatabase, numsendstates, sv.writeentitiestoclient_sendstates, client - svs.clients + 1);
2087                 Protocol_WriteStatsReliable();
2088         }
2089         else
2090         {
2091                 success = EntityFrameQuake_WriteFrame(msg, maxsize, numsendstates, sv.writeentitiestoclient_sendstates);
2092                 Protocol_WriteStatsReliable();
2093         }
2094
2095         if(success)
2096                 client->num_skippedentityframes = 0;
2097         else
2098                 ++client->num_skippedentityframes;
2099 }
2100
2101 /*
2102 =============
2103 SV_CleanupEnts
2104
2105 =============
2106 */
2107 static void SV_CleanupEnts (void)
2108 {
2109         prvm_prog_t *prog = SVVM_prog;
2110         int             e;
2111         prvm_edict_t    *ent;
2112
2113         ent = PRVM_NEXT_EDICT(prog->edicts);
2114         for (e=1 ; e<prog->num_edicts ; e++, ent = PRVM_NEXT_EDICT(ent))
2115                 PRVM_serveredictfloat(ent, effects) = (int)PRVM_serveredictfloat(ent, effects) & ~EF_MUZZLEFLASH;
2116 }
2117
2118 /*
2119 ==================
2120 SV_WriteClientdataToMessage
2121
2122 ==================
2123 */
2124 void SV_WriteClientdataToMessage (client_t *client, prvm_edict_t *ent, sizebuf_t *msg, int *stats)
2125 {
2126         prvm_prog_t *prog = SVVM_prog;
2127         int             bits;
2128         int             i;
2129         prvm_edict_t    *other;
2130         int             items;
2131         vec3_t  punchvector;
2132         int             viewzoom;
2133         const char *s;
2134         float   *statsf = (float *)stats;
2135         float gravity;
2136
2137 //
2138 // send a damage message
2139 //
2140         if (PRVM_serveredictfloat(ent, dmg_take) || PRVM_serveredictfloat(ent, dmg_save))
2141         {
2142                 other = PRVM_PROG_TO_EDICT(PRVM_serveredictedict(ent, dmg_inflictor));
2143                 MSG_WriteByte (msg, svc_damage);
2144                 MSG_WriteByte (msg, (int)PRVM_serveredictfloat(ent, dmg_save));
2145                 MSG_WriteByte (msg, (int)PRVM_serveredictfloat(ent, dmg_take));
2146                 for (i=0 ; i<3 ; i++)
2147                         MSG_WriteCoord (msg, PRVM_serveredictvector(other, origin)[i] + 0.5*(PRVM_serveredictvector(other, mins)[i] + PRVM_serveredictvector(other, maxs)[i]), sv.protocol);
2148
2149                 PRVM_serveredictfloat(ent, dmg_take) = 0;
2150                 PRVM_serveredictfloat(ent, dmg_save) = 0;
2151         }
2152
2153 //
2154 // send the current viewpos offset from the view entity
2155 //
2156         SV_SetIdealPitch ();            // how much to look up / down ideally
2157
2158 // a fixangle might get lost in a dropped packet.  Oh well.
2159         if(PRVM_serveredictfloat(ent, fixangle))
2160         {
2161                 // angle fixing was requested by global thinking code...
2162                 // so store the current angles for later use
2163                 VectorCopy(PRVM_serveredictvector(ent, angles), host_client->fixangle_angles);
2164                 host_client->fixangle_angles_set = true;
2165
2166                 // and clear fixangle for the next frame
2167                 PRVM_serveredictfloat(ent, fixangle) = 0;
2168         }
2169
2170         if (host_client->fixangle_angles_set)
2171         {
2172                 MSG_WriteByte (msg, svc_setangle);
2173                 for (i=0 ; i < 3 ; i++)
2174                         MSG_WriteAngle (msg, host_client->fixangle_angles[i], sv.protocol);
2175                 host_client->fixangle_angles_set = false;
2176         }
2177
2178         // the runes are in serverflags, pack them into the items value, also pack
2179         // in the items2 value for mission pack huds
2180         // (used only in the mission packs, which do not use serverflags)
2181         items = (int)PRVM_serveredictfloat(ent, items) | ((int)PRVM_serveredictfloat(ent, items2) << 23) | ((int)PRVM_serverglobalfloat(serverflags) << 28);
2182
2183         VectorCopy(PRVM_serveredictvector(ent, punchvector), punchvector);
2184
2185         // cache weapon model name and index in client struct to save time
2186         // (this search can be almost 1% of cpu time!)
2187         s = PRVM_GetString(prog, PRVM_serveredictstring(ent, weaponmodel));
2188         if (strcmp(s, client->weaponmodel))
2189         {
2190                 strlcpy(client->weaponmodel, s, sizeof(client->weaponmodel));
2191                 client->weaponmodelindex = SV_ModelIndex(s, 1);
2192         }
2193
2194         viewzoom = (int)(PRVM_serveredictfloat(ent, viewzoom) * 255.0f);
2195         if (viewzoom == 0)
2196                 viewzoom = 255;
2197
2198         bits = 0;
2199
2200         if ((int)PRVM_serveredictfloat(ent, flags) & FL_ONGROUND)
2201                 bits |= SU_ONGROUND;
2202         if (PRVM_serveredictfloat(ent, waterlevel) >= 2)
2203                 bits |= SU_INWATER;
2204         if (PRVM_serveredictfloat(ent, idealpitch))
2205                 bits |= SU_IDEALPITCH;
2206
2207         for (i=0 ; i<3 ; i++)
2208         {
2209                 if (PRVM_serveredictvector(ent, punchangle)[i])
2210                         bits |= (SU_PUNCH1<<i);
2211                 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)
2212                         if (punchvector[i])
2213                                 bits |= (SU_PUNCHVEC1<<i);
2214                 if (PRVM_serveredictvector(ent, velocity)[i])
2215                         bits |= (SU_VELOCITY1<<i);
2216         }
2217
2218         gravity = PRVM_serveredictfloat(ent, gravity);if (!gravity) gravity = 1.0f;
2219
2220         memset(stats, 0, sizeof(int[MAX_CL_STATS]));
2221         stats[STAT_VIEWHEIGHT] = (int)PRVM_serveredictvector(ent, view_ofs)[2];
2222         stats[STAT_ITEMS] = items;
2223         stats[STAT_WEAPONFRAME] = (int)PRVM_serveredictfloat(ent, weaponframe);
2224         stats[STAT_ARMOR] = (int)PRVM_serveredictfloat(ent, armorvalue);
2225         stats[STAT_WEAPON] = client->weaponmodelindex;
2226         stats[STAT_HEALTH] = (int)PRVM_serveredictfloat(ent, health);
2227         stats[STAT_AMMO] = (int)PRVM_serveredictfloat(ent, currentammo);
2228         stats[STAT_SHELLS] = (int)PRVM_serveredictfloat(ent, ammo_shells);
2229         stats[STAT_NAILS] = (int)PRVM_serveredictfloat(ent, ammo_nails);
2230         stats[STAT_ROCKETS] = (int)PRVM_serveredictfloat(ent, ammo_rockets);
2231         stats[STAT_CELLS] = (int)PRVM_serveredictfloat(ent, ammo_cells);
2232         stats[STAT_ACTIVEWEAPON] = (int)PRVM_serveredictfloat(ent, weapon);
2233         stats[STAT_VIEWZOOM] = viewzoom;
2234         stats[STAT_TOTALSECRETS] = (int)PRVM_serverglobalfloat(total_secrets);
2235         stats[STAT_TOTALMONSTERS] = (int)PRVM_serverglobalfloat(total_monsters);
2236         // the QC bumps these itself by sending svc_'s, so we have to keep them
2237         // zero or they'll be corrected by the engine
2238         //stats[STAT_SECRETS] = PRVM_serverglobalfloat(found_secrets);
2239         //stats[STAT_MONSTERS] = PRVM_serverglobalfloat(killed_monsters);
2240
2241         if(!sv_gameplayfix_customstats.integer)
2242         {
2243                 statsf[STAT_MOVEVARS_AIRACCEL_QW_STRETCHFACTOR] = sv_airaccel_qw_stretchfactor.value;
2244                 statsf[STAT_MOVEVARS_AIRCONTROL_PENALTY] = sv_aircontrol_penalty.value;
2245                 statsf[STAT_MOVEVARS_AIRSPEEDLIMIT_NONQW] = sv_airspeedlimit_nonqw.value;
2246                 statsf[STAT_MOVEVARS_AIRSTRAFEACCEL_QW] = sv_airstrafeaccel_qw.value;
2247                 statsf[STAT_MOVEVARS_AIRCONTROL_POWER] = sv_aircontrol_power.value;
2248                 // movement settings for prediction
2249                 // note: these are not sent in protocols with lower MAX_CL_STATS limits
2250                 stats[STAT_MOVEFLAGS] = MOVEFLAG_VALID
2251                         | (sv_gameplayfix_q2airaccelerate.integer ? MOVEFLAG_Q2AIRACCELERATE : 0)
2252                         | (sv_gameplayfix_nogravityonground.integer ? MOVEFLAG_NOGRAVITYONGROUND : 0)
2253                         | (sv_gameplayfix_gravityunaffectedbyticrate.integer ? MOVEFLAG_GRAVITYUNAFFECTEDBYTICRATE : 0)
2254                 ;
2255                 statsf[STAT_MOVEVARS_WARSOWBUNNY_AIRFORWARDACCEL] = sv_warsowbunny_airforwardaccel.value;
2256                 statsf[STAT_MOVEVARS_WARSOWBUNNY_ACCEL] = sv_warsowbunny_accel.value;
2257                 statsf[STAT_MOVEVARS_WARSOWBUNNY_TOPSPEED] = sv_warsowbunny_topspeed.value;
2258                 statsf[STAT_MOVEVARS_WARSOWBUNNY_TURNACCEL] = sv_warsowbunny_turnaccel.value;
2259                 statsf[STAT_MOVEVARS_WARSOWBUNNY_BACKTOSIDERATIO] = sv_warsowbunny_backtosideratio.value;
2260                 statsf[STAT_MOVEVARS_AIRSTOPACCELERATE] = sv_airstopaccelerate.value;
2261                 statsf[STAT_MOVEVARS_AIRSTRAFEACCELERATE] = sv_airstrafeaccelerate.value;
2262                 statsf[STAT_MOVEVARS_MAXAIRSTRAFESPEED] = sv_maxairstrafespeed.value;
2263                 statsf[STAT_MOVEVARS_AIRCONTROL] = sv_aircontrol.value;
2264                 statsf[STAT_FRAGLIMIT] = fraglimit.value;
2265                 statsf[STAT_TIMELIMIT] = timelimit.value;
2266                 statsf[STAT_MOVEVARS_FRICTION] = sv_friction.value;
2267                 statsf[STAT_MOVEVARS_WATERFRICTION] = sv_waterfriction.value >= 0 ? sv_waterfriction.value : sv_friction.value;
2268                 statsf[STAT_MOVEVARS_TICRATE] = sys_ticrate.value;
2269                 statsf[STAT_MOVEVARS_TIMESCALE] = host_timescale.value;
2270                 statsf[STAT_MOVEVARS_GRAVITY] = sv_gravity.value;
2271                 statsf[STAT_MOVEVARS_STOPSPEED] = sv_stopspeed.value;
2272                 statsf[STAT_MOVEVARS_MAXSPEED] = sv_maxspeed.value;
2273                 statsf[STAT_MOVEVARS_SPECTATORMAXSPEED] = sv_maxspeed.value; // FIXME: QW has a separate cvar for this
2274                 statsf[STAT_MOVEVARS_ACCELERATE] = sv_accelerate.value;
2275                 statsf[STAT_MOVEVARS_AIRACCELERATE] = sv_airaccelerate.value >= 0 ? sv_airaccelerate.value : sv_accelerate.value;
2276                 statsf[STAT_MOVEVARS_WATERACCELERATE] = sv_wateraccelerate.value >= 0 ? sv_wateraccelerate.value : sv_accelerate.value;
2277                 statsf[STAT_MOVEVARS_ENTGRAVITY] = gravity;
2278                 statsf[STAT_MOVEVARS_JUMPVELOCITY] = sv_jumpvelocity.value;
2279                 statsf[STAT_MOVEVARS_EDGEFRICTION] = sv_edgefriction.value;
2280                 statsf[STAT_MOVEVARS_MAXAIRSPEED] = sv_maxairspeed.value;
2281                 statsf[STAT_MOVEVARS_STEPHEIGHT] = sv_stepheight.value;
2282                 statsf[STAT_MOVEVARS_AIRACCEL_QW] = sv_airaccel_qw.value;
2283                 statsf[STAT_MOVEVARS_AIRACCEL_SIDEWAYS_FRICTION] = sv_airaccel_sideways_friction.value;
2284         }
2285
2286         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)
2287         {
2288                 if (stats[STAT_VIEWHEIGHT] != DEFAULT_VIEWHEIGHT) bits |= SU_VIEWHEIGHT;
2289                 bits |= SU_ITEMS;
2290                 if (stats[STAT_WEAPONFRAME]) bits |= SU_WEAPONFRAME;
2291                 if (stats[STAT_ARMOR]) bits |= SU_ARMOR;
2292                 bits |= SU_WEAPON;
2293                 // FIXME: which protocols support this?  does PROTOCOL_DARKPLACES3 support viewzoom?
2294                 if (sv.protocol == PROTOCOL_DARKPLACES2 || sv.protocol == PROTOCOL_DARKPLACES3 || sv.protocol == PROTOCOL_DARKPLACES4 || sv.protocol == PROTOCOL_DARKPLACES5)
2295                         if (viewzoom != 255)
2296                                 bits |= SU_VIEWZOOM;
2297         }
2298
2299         if (bits >= 65536)
2300                 bits |= SU_EXTEND1;
2301         if (bits >= 16777216)
2302                 bits |= SU_EXTEND2;
2303
2304         // send the data
2305         MSG_WriteByte (msg, svc_clientdata);
2306         MSG_WriteShort (msg, bits);
2307         if (bits & SU_EXTEND1)
2308                 MSG_WriteByte(msg, bits >> 16);
2309         if (bits & SU_EXTEND2)
2310                 MSG_WriteByte(msg, bits >> 24);
2311
2312         if (bits & SU_VIEWHEIGHT)
2313                 MSG_WriteChar (msg, stats[STAT_VIEWHEIGHT]);
2314
2315         if (bits & SU_IDEALPITCH)
2316                 MSG_WriteChar (msg, (int)PRVM_serveredictfloat(ent, idealpitch));
2317
2318         for (i=0 ; i<3 ; i++)
2319         {
2320                 if (bits & (SU_PUNCH1<<i))
2321                 {
2322                         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)
2323                                 MSG_WriteChar(msg, (int)PRVM_serveredictvector(ent, punchangle)[i]);
2324                         else
2325                                 MSG_WriteAngle16i(msg, PRVM_serveredictvector(ent, punchangle)[i]);
2326                 }
2327                 if (bits & (SU_PUNCHVEC1<<i))
2328                 {
2329                         if (sv.protocol == PROTOCOL_DARKPLACES1 || sv.protocol == PROTOCOL_DARKPLACES2 || sv.protocol == PROTOCOL_DARKPLACES3 || sv.protocol == PROTOCOL_DARKPLACES4)
2330                                 MSG_WriteCoord16i(msg, punchvector[i]);
2331                         else
2332                                 MSG_WriteCoord32f(msg, punchvector[i]);
2333                 }
2334                 if (bits & (SU_VELOCITY1<<i))
2335                 {
2336                         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)
2337                                 MSG_WriteChar(msg, (int)(PRVM_serveredictvector(ent, velocity)[i] * (1.0f / 16.0f)));
2338                         else
2339                                 MSG_WriteCoord32f(msg, PRVM_serveredictvector(ent, velocity)[i]);
2340                 }
2341         }
2342
2343         if (bits & SU_ITEMS)
2344                 MSG_WriteLong (msg, stats[STAT_ITEMS]);
2345
2346         if (sv.protocol == PROTOCOL_DARKPLACES5)
2347         {
2348                 if (bits & SU_WEAPONFRAME)
2349                         MSG_WriteShort (msg, stats[STAT_WEAPONFRAME]);
2350                 if (bits & SU_ARMOR)
2351                         MSG_WriteShort (msg, stats[STAT_ARMOR]);
2352                 if (bits & SU_WEAPON)
2353                         MSG_WriteShort (msg, stats[STAT_WEAPON]);
2354                 MSG_WriteShort (msg, stats[STAT_HEALTH]);
2355                 MSG_WriteShort (msg, stats[STAT_AMMO]);
2356                 MSG_WriteShort (msg, stats[STAT_SHELLS]);
2357                 MSG_WriteShort (msg, stats[STAT_NAILS]);
2358                 MSG_WriteShort (msg, stats[STAT_ROCKETS]);
2359                 MSG_WriteShort (msg, stats[STAT_CELLS]);
2360                 MSG_WriteShort (msg, stats[STAT_ACTIVEWEAPON]);
2361                 if (bits & SU_VIEWZOOM)
2362                         MSG_WriteShort (msg, bound(0, stats[STAT_VIEWZOOM], 65535));
2363         }
2364         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)
2365         {
2366                 if (bits & SU_WEAPONFRAME)
2367                         MSG_WriteByte (msg, stats[STAT_WEAPONFRAME]);
2368                 if (bits & SU_ARMOR)
2369                         MSG_WriteByte (msg, stats[STAT_ARMOR]);
2370                 if (bits & SU_WEAPON)
2371                 {
2372                         if (sv.protocol == PROTOCOL_NEHAHRABJP || sv.protocol == PROTOCOL_NEHAHRABJP2 || sv.protocol == PROTOCOL_NEHAHRABJP3)
2373                                 MSG_WriteShort (msg, stats[STAT_WEAPON]);
2374                         else
2375                                 MSG_WriteByte (msg, stats[STAT_WEAPON]);
2376                 }
2377                 MSG_WriteShort (msg, stats[STAT_HEALTH]);
2378                 MSG_WriteByte (msg, stats[STAT_AMMO]);
2379                 MSG_WriteByte (msg, stats[STAT_SHELLS]);
2380                 MSG_WriteByte (msg, stats[STAT_NAILS]);
2381                 MSG_WriteByte (msg, stats[STAT_ROCKETS]);
2382                 MSG_WriteByte (msg, stats[STAT_CELLS]);
2383                 if (gamemode == GAME_HIPNOTIC || gamemode == GAME_ROGUE || gamemode == GAME_QUOTH || IS_OLDNEXUIZ_DERIVED(gamemode))
2384                 {
2385                         for (i = 0;i < 32;i++)
2386                                 if (stats[STAT_ACTIVEWEAPON] & (1<<i))
2387                                         break;
2388                         MSG_WriteByte (msg, i);
2389                 }
2390                 else
2391                         MSG_WriteByte (msg, stats[STAT_ACTIVEWEAPON]);
2392                 if (bits & SU_VIEWZOOM)
2393                 {
2394                         if (sv.protocol == PROTOCOL_DARKPLACES2 || sv.protocol == PROTOCOL_DARKPLACES3 || sv.protocol == PROTOCOL_DARKPLACES4)
2395                                 MSG_WriteByte (msg, bound(0, stats[STAT_VIEWZOOM], 255));
2396                         else
2397                                 MSG_WriteShort (msg, bound(0, stats[STAT_VIEWZOOM], 65535));
2398                 }
2399         }
2400 }
2401
2402 void SV_FlushBroadcastMessages(void)
2403 {
2404         int i;
2405         client_t *client;
2406         if (sv.datagram.cursize <= 0)
2407                 return;
2408         for (i = 0, client = svs.clients;i < svs.maxclients;i++, client++)
2409         {
2410                 if (!client->begun || !client->netconnection || client->unreliablemsg.cursize + sv.datagram.cursize > client->unreliablemsg.maxsize || client->unreliablemsg_splitpoints >= (int)(sizeof(client->unreliablemsg_splitpoint)/sizeof(client->unreliablemsg_splitpoint[0])))
2411                         continue;
2412                 SZ_Write(&client->unreliablemsg, sv.datagram.data, sv.datagram.cursize);
2413                 client->unreliablemsg_splitpoint[client->unreliablemsg_splitpoints++] = client->unreliablemsg.cursize;
2414         }
2415         SZ_Clear(&sv.datagram);
2416 }
2417
2418 static void SV_WriteUnreliableMessages(client_t *client, sizebuf_t *msg, int maxsize, int maxsize2)
2419 {
2420         // scan the splitpoints to find out how many we can fit in
2421         int numsegments, j, split;
2422         if (!client->unreliablemsg_splitpoints)
2423                 return;
2424         // always accept the first one if it's within 1024 bytes, this ensures
2425         // that very big datagrams which are over the rate limit still get
2426         // through, just to keep it working
2427         for (numsegments = 1;numsegments < client->unreliablemsg_splitpoints;numsegments++)
2428                 if (msg->cursize + client->unreliablemsg_splitpoint[numsegments] > maxsize)
2429                         break;
2430         // the first segment gets an exemption from the rate limiting, otherwise
2431         // it could get dropped consistently due to a low rate limit
2432         if (numsegments == 1)
2433                 maxsize = maxsize2;
2434         // some will fit, so add the ones that will fit
2435         split = client->unreliablemsg_splitpoint[numsegments-1];
2436         // note this discards ones that were accepted by the segments scan but
2437         // can not fit, such as a really huge first one that will never ever
2438         // fit in a packet...
2439         if (msg->cursize + split <= maxsize)
2440                 SZ_Write(msg, client->unreliablemsg.data, split);
2441         // remove the part we sent, keeping any remaining data
2442         client->unreliablemsg.cursize -= split;
2443         if (client->unreliablemsg.cursize > 0)
2444                 memmove(client->unreliablemsg.data, client->unreliablemsg.data + split, client->unreliablemsg.cursize);
2445         // adjust remaining splitpoints
2446         client->unreliablemsg_splitpoints -= numsegments;
2447         for (j = 0;j < client->unreliablemsg_splitpoints;j++)
2448                 client->unreliablemsg_splitpoint[j] = client->unreliablemsg_splitpoint[numsegments + j] - split;
2449 }
2450
2451 /*
2452 =======================
2453 SV_SendClientDatagram
2454 =======================
2455 */
2456 static void SV_SendClientDatagram (client_t *client)
2457 {
2458         int clientrate, maxrate, maxsize, maxsize2, downloadsize;
2459         sizebuf_t msg;
2460         int stats[MAX_CL_STATS];
2461         static unsigned char sv_sendclientdatagram_buf[NET_MAXMESSAGE];
2462         double timedelta;
2463
2464         // obey rate limit by limiting packet frequency if the packet size
2465         // limiting fails
2466         // (usually this is caused by reliable messages)
2467         if (!NetConn_CanSend(client->netconnection))
2468                 return;
2469
2470         // PROTOCOL_DARKPLACES5 and later support packet size limiting of updates
2471         maxrate = max(NET_MINRATE, sv_maxrate.integer);
2472         if (sv_maxrate.integer != maxrate)
2473                 Cvar_SetValueQuick(&sv_maxrate, maxrate);
2474
2475         // clientrate determines the 'cleartime' of a packet
2476         // (how long to wait before sending another, based on this packet's size)
2477         clientrate = bound(NET_MINRATE, client->rate, maxrate);
2478
2479         switch (sv.protocol)
2480         {
2481         case PROTOCOL_QUAKE:
2482         case PROTOCOL_QUAKEDP:
2483         case PROTOCOL_NEHAHRAMOVIE:
2484         case PROTOCOL_NEHAHRABJP:
2485         case PROTOCOL_NEHAHRABJP2:
2486         case PROTOCOL_NEHAHRABJP3:
2487         case PROTOCOL_QUAKEWORLD:
2488                 // no packet size limit support on Quake protocols because it just
2489                 // causes missing entities/effects
2490                 // packets are simply sent less often to obey the rate limit
2491                 maxsize = 1024;
2492                 maxsize2 = 1024;
2493                 break;
2494         case PROTOCOL_DARKPLACES1:
2495         case PROTOCOL_DARKPLACES2:
2496         case PROTOCOL_DARKPLACES3:
2497         case PROTOCOL_DARKPLACES4:
2498                 // no packet size limit support on DP1-4 protocols because they kick
2499                 // the client off if they overflow, and miss effects
2500                 // packets are simply sent less often to obey the rate limit
2501                 maxsize = sizeof(sv_sendclientdatagram_buf);
2502                 maxsize2 = sizeof(sv_sendclientdatagram_buf);
2503                 break;
2504         default:
2505                 // DP5 and later protocols support packet size limiting which is a
2506                 // better method than limiting packet frequency as QW does
2507                 //
2508                 // at very low rates (or very small sys_ticrate) the packet size is
2509                 // not reduced below 128, but packets may be sent less often
2510
2511                 // how long are bursts?
2512                 timedelta = host_client->rate_burstsize / (double)client->rate;
2513
2514                 // how much of the burst do we keep reserved?
2515                 timedelta *= 1 - net_burstreserve.value;
2516
2517                 // only try to use excess time
2518                 timedelta = bound(0, host.realtime - host_client->netconnection->cleartime, timedelta);
2519
2520                 // but we know next packet will be in sys_ticrate, so we can use up THAT bandwidth
2521                 timedelta += sys_ticrate.value;
2522
2523                 // note: packet overhead (not counted in maxsize) is 28 bytes
2524                 maxsize = (int)(clientrate * timedelta) - 28;
2525
2526                 // put it in sound bounds
2527                 maxsize = bound(128, maxsize, 1400);
2528                 maxsize2 = 1400;
2529
2530                 // csqc entities can easily exceed 128 bytes, so disable throttling in
2531                 // mods that use csqc (they are likely to use less bandwidth anyway)
2532                 if((net_usesizelimit.integer == 1) ? (sv.csqc_progsize > 0) : (net_usesizelimit.integer < 1))
2533                         maxsize = maxsize2;
2534
2535                 break;
2536         }
2537
2538         if (LHNETADDRESS_GetAddressType(&host_client->netconnection->peeraddress) == LHNETADDRESSTYPE_LOOP && !host_limitlocal.integer)
2539         {
2540                 // for good singleplayer, send huge packets
2541                 maxsize = sizeof(sv_sendclientdatagram_buf);
2542                 maxsize2 = sizeof(sv_sendclientdatagram_buf);
2543                 // never limit frequency in singleplayer
2544                 clientrate = 1000000000;
2545         }
2546
2547         // while downloading, limit entity updates to half the packet
2548         // (any leftover space will be used for downloading)
2549         if (host_client->download_file)
2550                 maxsize /= 2;
2551
2552         msg.data = sv_sendclientdatagram_buf;
2553         msg.maxsize = sizeof(sv_sendclientdatagram_buf);
2554         msg.cursize = 0;
2555         msg.allowoverflow = false;
2556
2557         if (host_client->begun)
2558         {
2559                 // the player is in the game
2560                 MSG_WriteByte (&msg, svc_time);
2561                 MSG_WriteFloat (&msg, sv.time);
2562
2563                 // add the client specific data to the datagram
2564                 SV_WriteClientdataToMessage (client, client->edict, &msg, stats);
2565                 // now update the stats[] array using any registered custom fields
2566                 VM_SV_UpdateCustomStats(client, client->edict, &msg, stats);
2567                 // set host_client->statsdeltabits
2568                 Protocol_UpdateClientStats (stats);
2569
2570                 // add as many queued unreliable messages (effects) as we can fit
2571                 // limit effects to half of the remaining space
2572                 if (client->unreliablemsg.cursize)
2573                         SV_WriteUnreliableMessages (client, &msg, maxsize/2, maxsize2);
2574
2575                 // now write as many entities as we can fit, and also sends stats
2576                 SV_WriteEntitiesToClient (client, client->edict, &msg, maxsize);
2577         }
2578         else if (host.realtime > client->keepalivetime)
2579         {
2580                 // the player isn't totally in the game yet
2581                 // send small keepalive messages if too much time has passed
2582                 // (may also be sending downloads)
2583                 client->keepalivetime = host.realtime + 5;
2584                 MSG_WriteChar (&msg, svc_nop);
2585         }
2586
2587         // if a download is active, see if there is room to fit some download data
2588         // in this packet
2589         downloadsize = min(maxsize*2,maxsize2) - msg.cursize - 7;
2590         if (host_client->download_file && host_client->download_started && downloadsize > 0)
2591         {
2592                 fs_offset_t downloadstart;
2593                 unsigned char data[1400];
2594                 downloadstart = FS_Tell(host_client->download_file);
2595                 downloadsize = min(downloadsize, (int)sizeof(data));
2596                 downloadsize = FS_Read(host_client->download_file, data, downloadsize);
2597                 // note this sends empty messages if at the end of the file, which is
2598                 // necessary to keep the packet loss logic working
2599                 // (the last blocks may be lost and need to be re-sent, and that will
2600                 //  only occur if the client acks the empty end messages, revealing
2601                 //  a gap in the download progress, causing the last blocks to be
2602                 //  sent again)
2603                 MSG_WriteChar (&msg, svc_downloaddata);
2604                 MSG_WriteLong (&msg, downloadstart);
2605                 MSG_WriteShort (&msg, downloadsize);
2606                 if (downloadsize > 0)
2607                         SZ_Write (&msg, data, downloadsize);
2608         }
2609
2610         // reliable only if none is in progress
2611         if(client->sendsignon != 2 && !client->netconnection->sendMessageLength)
2612                 SV_WriteDemoMessage(client, &(client->netconnection->message), false);
2613         // unreliable
2614         SV_WriteDemoMessage(client, &msg, false);
2615
2616 // send the datagram
2617         NetConn_SendUnreliableMessage (client->netconnection, &msg, sv.protocol, clientrate, client->rate_burstsize, client->sendsignon == 2);
2618         if (client->sendsignon == 1 && !client->netconnection->message.cursize)
2619                 client->sendsignon = 2; // prevent reliable until client sends prespawn (this is the keepalive phase)
2620 }
2621
2622 /*
2623 =======================
2624 SV_UpdateToReliableMessages
2625 =======================
2626 */
2627 static void SV_UpdateToReliableMessages (void)
2628 {
2629         prvm_prog_t *prog = SVVM_prog;
2630         int i, j;
2631         client_t *client;
2632         const char *name;
2633         const char *model;
2634         const char *skin;
2635         int clientcamera;
2636
2637 // check for changes to be sent over the reliable streams
2638         for (i = 0, host_client = svs.clients;i < svs.maxclients;i++, host_client++)
2639         {
2640                 // update the host_client fields we care about according to the entity fields
2641                 host_client->edict = PRVM_EDICT_NUM(i+1);
2642
2643                 // DP_SV_CLIENTNAME
2644                 name = PRVM_GetString(prog, PRVM_serveredictstring(host_client->edict, netname));
2645                 if (name == NULL)
2646                         name = "";
2647                 // always point the string back at host_client->name to keep it safe
2648                 //strlcpy (host_client->name, name, sizeof (host_client->name));
2649                 if (name != host_client->name) // prevent buffer overlap SIGABRT on Mac OSX
2650                         strlcpy (host_client->name, name, sizeof (host_client->name));
2651                 PRVM_serveredictstring(host_client->edict, netname) = PRVM_SetEngineString(prog, host_client->name);
2652                 if (strcmp(host_client->old_name, host_client->name))
2653                 {
2654                         if (host_client->begun)
2655                                 SV_BroadcastPrintf("%s ^7changed name to %s\n", host_client->old_name, host_client->name);
2656                         strlcpy(host_client->old_name, host_client->name, sizeof(host_client->old_name));
2657                         // send notification to all clients
2658                         MSG_WriteByte (&sv.reliable_datagram, svc_updatename);
2659                         MSG_WriteByte (&sv.reliable_datagram, i);
2660                         MSG_WriteString (&sv.reliable_datagram, host_client->name);
2661                         SV_WriteNetnameIntoDemo(host_client);
2662                 }
2663
2664                 // DP_SV_CLIENTCOLORS
2665                 host_client->colors = (int)PRVM_serveredictfloat(host_client->edict, clientcolors);
2666                 if (host_client->old_colors != host_client->colors)
2667                 {
2668                         host_client->old_colors = host_client->colors;
2669                         // send notification to all clients
2670                         MSG_WriteByte (&sv.reliable_datagram, svc_updatecolors);
2671                         MSG_WriteByte (&sv.reliable_datagram, i);
2672                         MSG_WriteByte (&sv.reliable_datagram, host_client->colors);
2673                 }
2674
2675                 // NEXUIZ_PLAYERMODEL
2676                 model = PRVM_GetString(prog, PRVM_serveredictstring(host_client->edict, playermodel));
2677                 if (model == NULL)
2678                         model = "";
2679                 // always point the string back at host_client->name to keep it safe
2680                 //strlcpy (host_client->playermodel, model, sizeof (host_client->playermodel));
2681                 if (model != host_client->playermodel) // prevent buffer overlap SIGABRT on Mac OSX
2682                         strlcpy (host_client->playermodel, model, sizeof (host_client->playermodel));
2683                 PRVM_serveredictstring(host_client->edict, playermodel) = PRVM_SetEngineString(prog, host_client->playermodel);
2684
2685                 // NEXUIZ_PLAYERSKIN
2686                 skin = PRVM_GetString(prog, PRVM_serveredictstring(host_client->edict, playerskin));
2687                 if (skin == NULL)
2688                         skin = "";
2689                 // always point the string back at host_client->name to keep it safe
2690                 //strlcpy (host_client->playerskin, skin, sizeof (host_client->playerskin));
2691                 if (skin != host_client->playerskin) // prevent buffer overlap SIGABRT on Mac OSX
2692                         strlcpy (host_client->playerskin, skin, sizeof (host_client->playerskin));
2693                 PRVM_serveredictstring(host_client->edict, playerskin) = PRVM_SetEngineString(prog, host_client->playerskin);
2694
2695                 // TODO: add an extension name for this [1/17/2008 Black]
2696                 clientcamera = PRVM_serveredictedict(host_client->edict, clientcamera);
2697                 if (clientcamera > 0)
2698                 {
2699                         int oldclientcamera = host_client->clientcamera;
2700                         if (clientcamera >= prog->max_edicts || PRVM_EDICT_NUM(clientcamera)->priv.required->free)
2701                                 clientcamera = PRVM_NUM_FOR_EDICT(host_client->edict);
2702                         host_client->clientcamera = clientcamera;
2703
2704                         if (oldclientcamera != host_client->clientcamera && host_client->netconnection)
2705                         {
2706                                 MSG_WriteByte(&host_client->netconnection->message, svc_setview);
2707                                 MSG_WriteShort(&host_client->netconnection->message, host_client->clientcamera);
2708                         }
2709                 }
2710
2711                 // frags
2712                 host_client->frags = (int)PRVM_serveredictfloat(host_client->edict, frags);
2713                 if(IS_OLDNEXUIZ_DERIVED(gamemode))
2714                         if(!host_client->begun && host_client->netconnection)
2715                                 host_client->frags = -666;
2716                 if (host_client->old_frags != host_client->frags)
2717                 {
2718                         host_client->old_frags = host_client->frags;
2719                         // send notification to all clients
2720                         MSG_WriteByte (&sv.reliable_datagram, svc_updatefrags);
2721                         MSG_WriteByte (&sv.reliable_datagram, i);
2722                         MSG_WriteShort (&sv.reliable_datagram, host_client->frags);
2723                 }
2724         }
2725
2726         for (j = 0, client = svs.clients;j < svs.maxclients;j++, client++)
2727                 if (client->netconnection && (client->begun || client->clientconnectcalled)) // also send MSG_ALL to people who are past ClientConnect, but not spawned yet
2728                         SZ_Write (&client->netconnection->message, sv.reliable_datagram.data, sv.reliable_datagram.cursize);
2729
2730         SZ_Clear (&sv.reliable_datagram);
2731 }
2732
2733
2734 /*
2735 =======================
2736 SV_SendClientMessages
2737 =======================
2738 */
2739 void SV_SendClientMessages(void)
2740 {
2741         int i, prepared = false;
2742
2743         if (sv.protocol == PROTOCOL_QUAKEWORLD)
2744                 Sys_Error("SV_SendClientMessages: no quakeworld support\n");
2745
2746         SV_FlushBroadcastMessages();
2747
2748 // update frags, names, etc
2749         SV_UpdateToReliableMessages();
2750
2751 // build individual updates
2752         for (i = 0, host_client = svs.clients;i < svs.maxclients;i++, host_client++)
2753         {
2754                 if (!host_client->active)
2755                         continue;
2756                 if (!host_client->netconnection)
2757                         continue;
2758
2759                 if (host_client->netconnection->message.overflowed)
2760                 {
2761                         SV_DropClient (true);   // if the message couldn't send, kick off
2762                         continue;
2763                 }
2764
2765                 if (!prepared)
2766                 {
2767                         prepared = true;
2768                         // only prepare entities once per frame
2769                         SV_PrepareEntitiesForSending();
2770                 }
2771                 SV_SendClientDatagram(host_client);
2772         }
2773
2774 // clear muzzle flashes
2775         SV_CleanupEnts();
2776 }
2777
2778 static void SV_StartDownload_f(cmd_state_t *cmd)
2779 {
2780         if (host_client->download_file)
2781                 host_client->download_started = true;
2782 }
2783
2784 /*
2785  * Compression extension negotiation:
2786  *
2787  * Server to client:
2788  *   cl_serverextension_download 2
2789  *
2790  * Client to server:
2791  *   download <filename> <list of zero or more suppported compressions in order of preference>
2792  * e.g.
2793  *   download maps/map1.bsp lzo deflate huffman
2794  *
2795  * Server to client:
2796  *   cl_downloadbegin <compressed size> <filename> <compression method actually used>
2797  * e.g.
2798  *   cl_downloadbegin 123456 maps/map1.bsp deflate
2799  *
2800  * The server may choose not to compress the file by sending no compression name, like:
2801  *   cl_downloadbegin 345678 maps/map1.bsp
2802  *
2803  * NOTE: the "download" command may only specify compression algorithms if
2804  *       cl_serverextension_download is 2!
2805  *       If cl_serverextension_download has a different value, the client must
2806  *       assume this extension is not supported!
2807  */
2808
2809 static void Download_CheckExtensions(cmd_state_t *cmd)
2810 {
2811         int i;
2812         int argc = Cmd_Argc(cmd);
2813
2814         // first reset them all
2815         host_client->download_deflate = false;
2816
2817         for(i = 2; i < argc; ++i)
2818         {
2819                 if(!strcmp(Cmd_Argv(cmd, i), "deflate"))
2820                 {
2821                         host_client->download_deflate = true;
2822                         break;
2823                 }
2824         }
2825 }
2826
2827 static void SV_Download_f(cmd_state_t *cmd)
2828 {
2829         const char *whichpack, *whichpack2, *extension;
2830         qboolean is_csqc; // so we need to check only once
2831
2832         if (Cmd_Argc(cmd) < 2)
2833         {
2834                 SV_ClientPrintf("usage: download <filename> {<extensions>}*\n");
2835                 SV_ClientPrintf("       supported extensions: deflate\n");
2836                 return;
2837         }
2838
2839         if (FS_CheckNastyPath(Cmd_Argv(cmd, 1), false))
2840         {
2841                 SV_ClientPrintf("Download rejected: nasty filename \"%s\"\n", Cmd_Argv(cmd, 1));
2842                 return;
2843         }
2844
2845         if (host_client->download_file)
2846         {
2847                 // at this point we'll assume the previous download should be aborted
2848                 Con_DPrintf("Download of %s aborted by %s starting a new download\n", host_client->download_name, host_client->name);
2849                 SV_ClientCommands("\nstopdownload\n");
2850
2851                 // close the file and reset variables
2852                 FS_Close(host_client->download_file);
2853                 host_client->download_file = NULL;
2854                 host_client->download_name[0] = 0;
2855                 host_client->download_expectedposition = 0;
2856                 host_client->download_started = false;
2857         }
2858
2859         is_csqc = (sv.csqc_progname[0] && strcmp(Cmd_Argv(cmd, 1), sv.csqc_progname) == 0);
2860
2861         if (!sv_allowdownloads.integer && !is_csqc)
2862         {
2863                 SV_ClientPrintf("Downloads are disabled on this server\n");
2864                 SV_ClientCommands("\nstopdownload\n");
2865                 return;
2866         }
2867
2868         Download_CheckExtensions(cmd);
2869
2870         strlcpy(host_client->download_name, Cmd_Argv(cmd, 1), sizeof(host_client->download_name));
2871         extension = FS_FileExtension(host_client->download_name);
2872
2873         // host_client is asking to download a specified file
2874         if (developer_extra.integer)
2875                 Con_DPrintf("Download request for %s by %s\n", host_client->download_name, host_client->name);
2876
2877         if(is_csqc)
2878         {
2879                 char extensions[MAX_QPATH]; // make sure this can hold all extensions
2880                 extensions[0] = '\0';
2881
2882                 if(host_client->download_deflate)
2883                         strlcat(extensions, " deflate", sizeof(extensions));
2884
2885                 Con_DPrintf("Downloading %s to %s\n", host_client->download_name, host_client->name);
2886
2887                 if(host_client->download_deflate && svs.csqc_progdata_deflated)
2888                         host_client->download_file = FS_FileFromData(svs.csqc_progdata_deflated, svs.csqc_progsize_deflated, true);
2889                 else
2890                         host_client->download_file = FS_FileFromData(svs.csqc_progdata, sv.csqc_progsize, true);
2891
2892                 // no, no space is needed between %s and %s :P
2893                 SV_ClientCommands("\ncl_downloadbegin %i %s%s\n", (int)FS_FileSize(host_client->download_file), host_client->download_name, extensions);
2894
2895                 host_client->download_expectedposition = 0;
2896                 host_client->download_started = false;
2897                 host_client->sendsignon = true; // make sure this message is sent
2898                 return;
2899         }
2900
2901         if (!FS_FileExists(host_client->download_name))
2902         {
2903                 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);
2904                 SV_ClientCommands("\nstopdownload\n");
2905                 return;
2906         }
2907
2908         // check if the user is trying to download part of registered Quake(r)
2909         whichpack = FS_WhichPack(host_client->download_name);
2910         whichpack2 = FS_WhichPack("gfx/pop.lmp");
2911         if ((whichpack && whichpack2 && !strcasecmp(whichpack, whichpack2)) || FS_IsRegisteredQuakePack(host_client->download_name))
2912         {
2913                 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);
2914                 SV_ClientCommands("\nstopdownload\n");
2915                 return;
2916         }
2917
2918         // check if the server has forbidden archive downloads entirely
2919         if (!sv_allowdownloads_inarchive.integer)
2920         {
2921                 whichpack = FS_WhichPack(host_client->download_name);
2922                 if (whichpack)
2923                 {
2924                         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);
2925                         SV_ClientCommands("\nstopdownload\n");
2926                         return;
2927                 }
2928         }
2929
2930         if (!sv_allowdownloads_config.integer)
2931         {
2932                 if (!strcasecmp(extension, "cfg"))
2933                 {
2934                         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);
2935                         SV_ClientCommands("\nstopdownload\n");
2936                         return;
2937                 }
2938         }
2939
2940         if (!sv_allowdownloads_dlcache.integer)
2941         {
2942                 if (!strncasecmp(host_client->download_name, "dlcache/", 8))
2943                 {
2944                         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);
2945                         SV_ClientCommands("\nstopdownload\n");
2946                         return;
2947                 }
2948         }
2949
2950         if (!sv_allowdownloads_archive.integer)
2951         {
2952                 if (!strcasecmp(extension, "pak") || !strcasecmp(extension, "pk3"))
2953                 {
2954                         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);
2955                         SV_ClientCommands("\nstopdownload\n");
2956                         return;
2957                 }
2958         }
2959
2960         host_client->download_file = FS_OpenVirtualFile(host_client->download_name, true);
2961         if (!host_client->download_file)
2962         {
2963                 SV_ClientPrintf("Download rejected: server could not open the file \"%s\"\n", host_client->download_name);
2964                 SV_ClientCommands("\nstopdownload\n");
2965                 return;
2966         }
2967
2968         if (FS_FileSize(host_client->download_file) > 1<<30)
2969         {
2970                 SV_ClientPrintf("Download rejected: file \"%s\" is very large\n", host_client->download_name);
2971                 SV_ClientCommands("\nstopdownload\n");
2972                 FS_Close(host_client->download_file);
2973                 host_client->download_file = NULL;
2974                 return;
2975         }
2976
2977         if (FS_FileSize(host_client->download_file) < 0)
2978         {
2979                 SV_ClientPrintf("Download rejected: file \"%s\" is not a regular file\n", host_client->download_name);
2980                 SV_ClientCommands("\nstopdownload\n");
2981                 FS_Close(host_client->download_file);
2982                 host_client->download_file = NULL;
2983                 return;
2984         }
2985
2986         Con_DPrintf("Downloading %s to %s\n", host_client->download_name, host_client->name);
2987
2988         /*
2989          * we can only do this if we would actually deflate on the fly
2990          * which we do not (yet)!
2991         {
2992                 char extensions[MAX_QPATH]; // make sure this can hold all extensions
2993                 extensions[0] = '\0';
2994
2995                 if(host_client->download_deflate)
2996                         strlcat(extensions, " deflate", sizeof(extensions));
2997
2998                 // no, no space is needed between %s and %s :P
2999                 SV_ClientCommands("\ncl_downloadbegin %i %s%s\n", (int)FS_FileSize(host_client->download_file), host_client->download_name, extensions);
3000         }
3001         */
3002         SV_ClientCommands("\ncl_downloadbegin %i %s\n", (int)FS_FileSize(host_client->download_file), host_client->download_name);
3003
3004         host_client->download_expectedposition = 0;
3005         host_client->download_started = false;
3006         host_client->sendsignon = true; // make sure this message is sent
3007
3008         // the rest of the download process is handled in SV_SendClientDatagram
3009         // and other code dealing with svc_downloaddata and clc_ackdownloaddata
3010         //
3011         // no svc_downloaddata messages will be sent until sv_startdownload is
3012         // sent by the client
3013 }
3014
3015 /*
3016 ==============================================================================
3017
3018 SERVER SPAWNING
3019
3020 ==============================================================================
3021 */
3022
3023 /*
3024 ================
3025 SV_ModelIndex
3026
3027 ================
3028 */
3029 int SV_ModelIndex(const char *s, int precachemode)
3030 {
3031         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);
3032         char filename[MAX_QPATH];
3033         if (!s || !*s)
3034                 return 0;
3035         // testing
3036         //if (precachemode == 2)
3037         //      return 0;
3038         strlcpy(filename, s, sizeof(filename));
3039         for (i = 2;i < limit;i++)
3040         {
3041                 if (!sv.model_precache[i][0])
3042                 {
3043                         if (precachemode)
3044                         {
3045                                 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))
3046                                 {
3047                                         Con_Printf("SV_ModelIndex(\"%s\"): precache_model can only be done in spawn functions\n", filename);
3048                                         return 0;
3049                                 }
3050                                 if (precachemode == 1)
3051                                         Con_Printf("SV_ModelIndex(\"%s\"): not precached (fix your code), precaching anyway\n", filename);
3052                                 strlcpy(sv.model_precache[i], filename, sizeof(sv.model_precache[i]));
3053                                 if (sv.state == ss_loading)
3054                                 {
3055                                         // running from SV_SpawnServer which is launched from the client console command interpreter
3056                                         sv.models[i] = Mod_ForName (sv.model_precache[i], true, false, s[0] == '*' ? sv.worldname : NULL);
3057                                 }
3058                                 else
3059                                 {
3060                                         if (svs.threaded)
3061                                         {
3062                                                 // this is running on the server thread, we can't load a model here (it would crash on renderer calls), so only look it up, the svc_precache will cause it to be loaded when it reaches the client
3063                                                 sv.models[i] = Mod_FindName (sv.model_precache[i], s[0] == '*' ? sv.worldname : NULL);
3064                                         }
3065                                         else
3066                                         {
3067                                                 // running single threaded, so we can load the model here
3068                                                 sv.models[i] = Mod_ForName (sv.model_precache[i], true, false, s[0] == '*' ? sv.worldname : NULL);
3069                                         }
3070                                         MSG_WriteByte(&sv.reliable_datagram, svc_precache);
3071                                         MSG_WriteShort(&sv.reliable_datagram, i);
3072                                         MSG_WriteString(&sv.reliable_datagram, filename);
3073                                 }
3074                                 return i;
3075                         }
3076                         Con_Printf("SV_ModelIndex(\"%s\"): not precached\n", filename);
3077                         return 0;
3078                 }
3079                 if (!strcmp(sv.model_precache[i], filename))
3080                         return i;
3081         }
3082         Con_Printf("SV_ModelIndex(\"%s\"): i (%i) == MAX_MODELS (%i)\n", filename, i, MAX_MODELS);
3083         return 0;
3084 }
3085
3086 /*
3087 ================
3088 SV_SoundIndex
3089
3090 ================
3091 */
3092 int SV_SoundIndex(const char *s, int precachemode)
3093 {
3094         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);
3095         char filename[MAX_QPATH];
3096         if (!s || !*s)
3097                 return 0;
3098         // testing
3099         //if (precachemode == 2)
3100         //      return 0;
3101         strlcpy(filename, s, sizeof(filename));
3102         for (i = 1;i < limit;i++)
3103         {
3104                 if (!sv.sound_precache[i][0])
3105                 {
3106                         if (precachemode)
3107                         {
3108                                 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))
3109                                 {
3110                                         Con_Printf("SV_SoundIndex(\"%s\"): precache_sound can only be done in spawn functions\n", filename);
3111                                         return 0;
3112                                 }
3113                                 if (precachemode == 1)
3114                                         Con_Printf("SV_SoundIndex(\"%s\"): not precached (fix your code), precaching anyway\n", filename);
3115                                 strlcpy(sv.sound_precache[i], filename, sizeof(sv.sound_precache[i]));
3116                                 if (sv.state != ss_loading)
3117                                 {
3118                                         MSG_WriteByte(&sv.reliable_datagram, svc_precache);
3119                                         MSG_WriteShort(&sv.reliable_datagram, i + 32768);
3120                                         MSG_WriteString(&sv.reliable_datagram, filename);
3121                                 }
3122                                 return i;
3123                         }
3124                         Con_Printf("SV_SoundIndex(\"%s\"): not precached\n", filename);
3125                         return 0;
3126                 }
3127                 if (!strcmp(sv.sound_precache[i], filename))
3128                         return i;
3129         }
3130         Con_Printf("SV_SoundIndex(\"%s\"): i (%i) == MAX_SOUNDS (%i)\n", filename, i, MAX_SOUNDS);
3131         return 0;
3132 }
3133
3134 /*
3135 ================
3136 SV_ParticleEffectIndex
3137
3138 ================
3139 */
3140 int SV_ParticleEffectIndex(const char *name)
3141 {
3142         int i, argc, linenumber, effectnameindex;
3143         int filepass;
3144         fs_offset_t filesize;
3145         unsigned char *filedata;
3146         const char *text;
3147         const char *textstart;
3148         //const char *textend;
3149         char argv[16][1024];
3150         char filename[MAX_QPATH];
3151         if (!sv.particleeffectnamesloaded)
3152         {
3153                 sv.particleeffectnamesloaded = true;
3154                 memset(sv.particleeffectname, 0, sizeof(sv.particleeffectname));
3155                 for (i = 0;i < EFFECT_TOTAL;i++)
3156                         strlcpy(sv.particleeffectname[i], standardeffectnames[i], sizeof(sv.particleeffectname[i]));
3157                 for (filepass = 0;;filepass++)
3158                 {
3159                         if (filepass == 0)
3160                                 dpsnprintf(filename, sizeof(filename), "effectinfo.txt");
3161                         else if (filepass == 1)
3162                                 dpsnprintf(filename, sizeof(filename), "%s_effectinfo.txt", sv.worldnamenoextension);
3163                         else
3164                                 break;
3165                         filedata = FS_LoadFile(filename, tempmempool, true, &filesize);
3166                         if (!filedata)
3167                                 continue;
3168                         textstart = (const char *)filedata;
3169                         //textend = (const char *)filedata + filesize;
3170                         text = textstart;
3171                         for (linenumber = 1;;linenumber++)
3172                         {
3173                                 argc = 0;
3174                                 for (;;)
3175                                 {
3176                                         if (!COM_ParseToken_Simple(&text, true, false, true) || !strcmp(com_token, "\n"))
3177                                                 break;
3178                                         if (argc < 16)
3179                                         {
3180                                                 strlcpy(argv[argc], com_token, sizeof(argv[argc]));
3181                                                 argc++;
3182                                         }
3183                                 }
3184                                 if (com_token[0] == 0)
3185                                         break; // if the loop exited and it's not a \n, it's EOF
3186                                 if (argc < 1)
3187                                         continue;
3188                                 if (!strcmp(argv[0], "effect"))
3189                                 {
3190                                         if (argc == 2)
3191                                         {
3192                                                 for (effectnameindex = 1;effectnameindex < MAX_PARTICLEEFFECTNAME;effectnameindex++)
3193                                                 {
3194                                                         if (sv.particleeffectname[effectnameindex][0])
3195                                                         {
3196                                                                 if (!strcmp(sv.particleeffectname[effectnameindex], argv[1]))
3197                                                                         break;
3198                                                         }
3199                                                         else
3200                                                         {
3201                                                                 strlcpy(sv.particleeffectname[effectnameindex], argv[1], sizeof(sv.particleeffectname[effectnameindex]));
3202                                                                 break;
3203                                                         }
3204                                                 }
3205                                                 // if we run out of names, abort
3206                                                 if (effectnameindex == MAX_PARTICLEEFFECTNAME)
3207                                                 {
3208                                                         Con_Printf("%s:%i: too many effects!\n", filename, linenumber);
3209                                                         break;
3210                                                 }
3211                                         }
3212                                 }
3213                         }
3214                         Mem_Free(filedata);
3215                 }
3216         }
3217         // search for the name
3218         for (effectnameindex = 1;effectnameindex < MAX_PARTICLEEFFECTNAME && sv.particleeffectname[effectnameindex][0];effectnameindex++)
3219                 if (!strcmp(sv.particleeffectname[effectnameindex], name))
3220                         return effectnameindex;
3221         // return 0 if we couldn't find it
3222         return 0;
3223 }
3224
3225 dp_model_t *SV_GetModelByIndex(int modelindex)
3226 {
3227         return (modelindex > 0 && modelindex < MAX_MODELS) ? sv.models[modelindex] : NULL;
3228 }
3229
3230 dp_model_t *SV_GetModelFromEdict(prvm_edict_t *ed)
3231 {
3232         prvm_prog_t *prog = SVVM_prog;
3233         int modelindex;
3234         if (!ed || ed->priv.server->free)
3235                 return NULL;
3236         modelindex = (int)PRVM_serveredictfloat(ed, modelindex);
3237         return (modelindex > 0 && modelindex < MAX_MODELS) ? sv.models[modelindex] : NULL;
3238 }
3239
3240 /*
3241 ================
3242 SV_CreateBaseline
3243
3244 ================
3245 */
3246 static void SV_CreateBaseline (void)
3247 {
3248         prvm_prog_t *prog = SVVM_prog;
3249         int i, entnum, large;
3250         prvm_edict_t *svent;
3251
3252         // LadyHavoc: clear *all* baselines (not just active ones)
3253         for (entnum = 0;entnum < prog->max_edicts;entnum++)
3254         {
3255                 // get the current server version
3256                 svent = PRVM_EDICT_NUM(entnum);
3257
3258                 // LadyHavoc: always clear state values, whether the entity is in use or not
3259                 svent->priv.server->baseline = defaultstate;
3260
3261                 if (svent->priv.server->free)
3262                         continue;
3263                 if (entnum > svs.maxclients && !PRVM_serveredictfloat(svent, modelindex))
3264                         continue;
3265
3266                 // create entity baseline
3267                 VectorCopy (PRVM_serveredictvector(svent, origin), svent->priv.server->baseline.origin);
3268                 VectorCopy (PRVM_serveredictvector(svent, angles), svent->priv.server->baseline.angles);
3269                 svent->priv.server->baseline.frame = (int)PRVM_serveredictfloat(svent, frame);
3270                 svent->priv.server->baseline.skin = (int)PRVM_serveredictfloat(svent, skin);
3271                 if (entnum > 0 && entnum <= svs.maxclients)
3272                 {
3273                         svent->priv.server->baseline.colormap = entnum;
3274                         svent->priv.server->baseline.modelindex = SV_ModelIndex("progs/player.mdl", 1);
3275                 }
3276                 else
3277                 {
3278                         svent->priv.server->baseline.colormap = 0;
3279                         svent->priv.server->baseline.modelindex = (int)PRVM_serveredictfloat(svent, modelindex);
3280                 }
3281
3282                 large = false;
3283                 if (svent->priv.server->baseline.modelindex & 0xFF00 || svent->priv.server->baseline.frame & 0xFF00)
3284                 {
3285                         large = true;
3286                         if (sv.protocol == PROTOCOL_NEHAHRABJP || sv.protocol == PROTOCOL_NEHAHRABJP2 || sv.protocol == PROTOCOL_NEHAHRABJP3)
3287                                 large = false;
3288                 }
3289
3290                 // add to the message
3291                 if (large)
3292                         MSG_WriteByte (&sv.signon, svc_spawnbaseline2);
3293                 else
3294                         MSG_WriteByte (&sv.signon, svc_spawnbaseline);
3295                 MSG_WriteShort (&sv.signon, entnum);
3296
3297                 if (large)
3298                 {
3299                         MSG_WriteShort (&sv.signon, svent->priv.server->baseline.modelindex);
3300                         MSG_WriteShort (&sv.signon, svent->priv.server->baseline.frame);
3301                 }
3302                 else if (sv.protocol == PROTOCOL_NEHAHRABJP || sv.protocol == PROTOCOL_NEHAHRABJP2 || sv.protocol == PROTOCOL_NEHAHRABJP3)
3303                 {
3304                         MSG_WriteShort (&sv.signon, svent->priv.server->baseline.modelindex);
3305                         MSG_WriteByte (&sv.signon, svent->priv.server->baseline.frame);
3306                 }
3307                 else
3308                 {
3309                         MSG_WriteByte (&sv.signon, svent->priv.server->baseline.modelindex);
3310                         MSG_WriteByte (&sv.signon, svent->priv.server->baseline.frame);
3311                 }
3312                 MSG_WriteByte (&sv.signon, svent->priv.server->baseline.colormap);
3313                 MSG_WriteByte (&sv.signon, svent->priv.server->baseline.skin);
3314                 for (i=0 ; i<3 ; i++)
3315                 {
3316                         MSG_WriteCoord(&sv.signon, svent->priv.server->baseline.origin[i], sv.protocol);
3317                         MSG_WriteAngle(&sv.signon, svent->priv.server->baseline.angles[i], sv.protocol);
3318                 }
3319         }
3320 }
3321
3322 /*
3323 ================
3324 SV_Prepare_CSQC
3325
3326 Load csprogs.dat and comperss it so it doesn't need to be
3327 reloaded on request.
3328 ================
3329 */
3330 static void SV_Prepare_CSQC(void)
3331 {
3332         fs_offset_t progsize;
3333
3334         if(svs.csqc_progdata)
3335         {
3336                 Con_DPrintf("Unloading old CSQC data.\n");
3337                 Mem_Free(svs.csqc_progdata);
3338                 if(svs.csqc_progdata_deflated)
3339                         Mem_Free(svs.csqc_progdata_deflated);
3340         }
3341
3342         svs.csqc_progdata = NULL;
3343         svs.csqc_progdata_deflated = NULL;
3344
3345         sv.csqc_progname[0] = 0;
3346         svs.csqc_progdata = FS_LoadFile(csqc_progname.string, sv_mempool, false, &progsize);
3347
3348         if(progsize > 0)
3349         {
3350                 size_t deflated_size;
3351
3352                 sv.csqc_progsize = (int)progsize;
3353                 sv.csqc_progcrc = CRC_Block(svs.csqc_progdata, progsize);
3354                 strlcpy(sv.csqc_progname, csqc_progname.string, sizeof(sv.csqc_progname));
3355                 Con_DPrintf("server detected csqc progs file \"%s\" with size %i and crc %i\n", sv.csqc_progname, sv.csqc_progsize, sv.csqc_progcrc);
3356
3357                 Con_DPrint("Compressing csprogs.dat\n");
3358                 //unsigned char *FS_Deflate(const unsigned char *data, size_t size, size_t *deflated_size, int level, mempool_t *mempool);
3359                 svs.csqc_progdata_deflated = FS_Deflate(svs.csqc_progdata, progsize, &deflated_size, -1, sv_mempool);
3360                 svs.csqc_progsize_deflated = (int)deflated_size;
3361                 if(svs.csqc_progdata_deflated)
3362                 {
3363                         Con_DPrintf("Deflated: %g%%\n", 100.0 - 100.0 * (deflated_size / (float)progsize));
3364                         Con_DPrintf("Uncompressed: %u\nCompressed:   %u\n", (unsigned)sv.csqc_progsize, (unsigned)svs.csqc_progsize_deflated);
3365                 }
3366                 else
3367                         Con_DPrintf("Cannot compress - need zlib for this. Using uncompressed progs only.\n");
3368         }
3369 }
3370
3371 /*
3372 ================
3373 SV_SaveSpawnparms
3374
3375 Grabs the current state of each client for saving across the
3376 transition to another level
3377 ================
3378 */
3379 void SV_SaveSpawnparms (void)
3380 {
3381         prvm_prog_t *prog = SVVM_prog;
3382         int             i, j;
3383
3384         svs.serverflags = (int)PRVM_serverglobalfloat(serverflags);
3385
3386         for (i = 0, host_client = svs.clients;i < svs.maxclients;i++, host_client++)
3387         {
3388                 if (!host_client->active)
3389                         continue;
3390
3391         // call the progs to get default spawn parms for the new client
3392                 PRVM_serverglobalfloat(time) = sv.time;
3393                 PRVM_serverglobaledict(self) = PRVM_EDICT_TO_PROG(host_client->edict);
3394                 prog->ExecuteProgram(prog, PRVM_serverfunction(SetChangeParms), "QC function SetChangeParms is missing");
3395                 for (j=0 ; j<NUM_SPAWN_PARMS ; j++)
3396                         host_client->spawn_parms[j] = (&PRVM_serverglobalfloat(parm1))[j];
3397         }
3398 }
3399
3400 /*
3401 ================
3402 SV_SpawnServer
3403
3404 This is called at the start of each level
3405 ================
3406 */
3407
3408 void SV_SpawnServer (const char *map)
3409 {
3410         prvm_prog_t *prog = SVVM_prog;
3411         prvm_edict_t *ent;
3412         int i;
3413         char *entities;
3414         dp_model_t *worldmodel;
3415         char modelname[sizeof(sv.worldname)];
3416         char vabuf[1024];
3417
3418         Con_Printf("SpawnServer: %s\n", map);
3419
3420         dpsnprintf (modelname, sizeof(modelname), "maps/%s.bsp", map);
3421
3422         if (!FS_FileExists(modelname))
3423         {
3424                 dpsnprintf (modelname, sizeof(modelname), "maps/%s", map);
3425                 if (!FS_FileExists(modelname))
3426                 {
3427                         Con_Printf("SpawnServer: no map file named maps/%s.bsp\n", map);
3428                         return;
3429                 }
3430         }
3431
3432 //      SV_LockThreadMutex();
3433
3434         if(cls.state == ca_dedicated)
3435                 Sys_MakeProcessNice();
3436
3437         if (cls.state != ca_dedicated)
3438         {
3439                 SCR_BeginLoadingPlaque(false);
3440                 S_StopAllSounds();
3441         }
3442
3443         if(sv.active)
3444         {
3445                 client_t *client;
3446                 for (i = 0, client = svs.clients;i < svs.maxclients;i++, client++)
3447                 {
3448                         if (client->netconnection)
3449                         {
3450                                 MSG_WriteByte(&client->netconnection->message, svc_stufftext);
3451                                 MSG_WriteString(&client->netconnection->message, "reconnect\n");
3452                         }
3453                 }
3454                 World_End(&sv.world);
3455                 if(PRVM_serverfunction(SV_Shutdown))
3456                 {
3457                         func_t s = PRVM_serverfunction(SV_Shutdown);
3458                         PRVM_serverglobalfloat(time) = sv.time;
3459                         PRVM_serverfunction(SV_Shutdown) = 0; // prevent it from getting called again
3460                         prog->ExecuteProgram(prog, s,"SV_Shutdown() required");
3461                 }
3462         }
3463
3464         // free q3 shaders so that any newly downloaded shaders will be active
3465         Mod_FreeQ3Shaders();
3466
3467         worldmodel = Mod_ForName(modelname, false, developer.integer > 0, NULL);
3468         if (!worldmodel || !worldmodel->TraceBox)
3469         {
3470                 Con_Printf("Couldn't load map %s\n", modelname);
3471
3472                 if(cls.state == ca_dedicated)
3473                         Sys_MakeProcessMean();
3474
3475 //              SV_UnlockThreadMutex();
3476
3477                 return;
3478         }
3479
3480         Collision_Cache_Reset(true);
3481
3482         // let's not have any servers with no name
3483         if (hostname.string[0] == 0)
3484                 Cvar_SetQuick(&hostname, "UNNAMED");
3485         scr_centertime_off = 0;
3486
3487         svs.changelevel_issued = false;         // now safe to issue another
3488
3489         // make the map a required file for clients
3490         Curl_ClearRequirements();
3491         Curl_RequireFile(modelname);
3492
3493 //
3494 // tell all connected clients that we are going to a new level
3495 //
3496         if (!sv.active)
3497                 NetConn_OpenServerPorts(true);
3498
3499 //
3500 // make cvars consistant
3501 //
3502         if (coop.integer)
3503                 Cvar_SetValueQuick(&deathmatch, 0);
3504         // LadyHavoc: it can be useful to have skills outside the range 0-3...
3505         //current_skill = bound(0, (int)(skill.value + 0.5), 3);
3506         //Cvar_SetValue ("skill", (float)current_skill);
3507         current_skill = (int)(skill.value + 0.5);
3508
3509 //
3510 // set up the new server
3511 //
3512         memset (&sv, 0, sizeof(sv));
3513         // if running a local client, make sure it doesn't try to access the last
3514         // level's data which is no longer valiud
3515         cls.signon = 0;
3516
3517         Cvar_SetValueQuick(&halflifebsp, worldmodel->brush.ishlbsp);
3518         Cvar_SetValueQuick(&sv_mapformat_is_quake2, worldmodel->brush.isq2bsp);
3519         Cvar_SetValueQuick(&sv_mapformat_is_quake3, worldmodel->brush.isq3bsp);
3520
3521         if(*sv_random_seed.string)
3522         {
3523                 srand(sv_random_seed.integer);
3524                 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);
3525         }
3526
3527         SV_VM_Setup();
3528
3529         sv.active = true;
3530
3531         // set level base name variables for later use
3532         strlcpy (sv.name, map, sizeof (sv.name));
3533         strlcpy(sv.worldname, modelname, sizeof(sv.worldname));
3534         FS_StripExtension(sv.worldname, sv.worldnamenoextension, sizeof(sv.worldnamenoextension));
3535         strlcpy(sv.worldbasename, !strncmp(sv.worldnamenoextension, "maps/", 5) ? sv.worldnamenoextension + 5 : sv.worldnamenoextension, sizeof(sv.worldbasename));
3536         //Cvar_SetQuick(&sv_worldmessage, sv.worldmessage); // set later after QC is spawned
3537         Cvar_SetQuick(&sv_worldname, sv.worldname);
3538         Cvar_SetQuick(&sv_worldnamenoextension, sv.worldnamenoextension);
3539         Cvar_SetQuick(&sv_worldbasename, sv.worldbasename);
3540
3541         sv.protocol = Protocol_EnumForName(sv_protocolname.string);
3542         if (sv.protocol == PROTOCOL_UNKNOWN)
3543         {
3544                 char buffer[1024];
3545                 Protocol_Names(buffer, sizeof(buffer));
3546                 Con_Printf("Unknown sv_protocolname \"%s\", valid values are:\n%s\n", sv_protocolname.string, buffer);
3547                 sv.protocol = PROTOCOL_QUAKE;
3548         }
3549
3550 // load progs to get entity field count
3551         //PR_LoadProgs ( sv_progs.string );
3552
3553         sv.datagram.maxsize = sizeof(sv.datagram_buf);
3554         sv.datagram.cursize = 0;
3555         sv.datagram.data = sv.datagram_buf;
3556
3557         sv.reliable_datagram.maxsize = sizeof(sv.reliable_datagram_buf);
3558         sv.reliable_datagram.cursize = 0;
3559         sv.reliable_datagram.data = sv.reliable_datagram_buf;
3560
3561         sv.signon.maxsize = sizeof(sv.signon_buf);
3562         sv.signon.cursize = 0;
3563         sv.signon.data = sv.signon_buf;
3564
3565 // leave slots at start for clients only
3566         //prog->num_edicts = svs.maxclients+1;
3567
3568         sv.state = ss_loading;
3569         prog->allowworldwrites = true;
3570         sv.paused = false;
3571
3572         sv.time = 1.0;
3573
3574         Mod_ClearUsed();
3575         worldmodel->used = true;
3576
3577         sv.worldmodel = worldmodel;
3578         sv.models[1] = sv.worldmodel;
3579
3580 //
3581 // clear world interaction links
3582 //
3583         World_SetSize(&sv.world, sv.worldname, sv.worldmodel->normalmins, sv.worldmodel->normalmaxs, prog);
3584         World_Start(&sv.world);
3585
3586         strlcpy(sv.sound_precache[0], "", sizeof(sv.sound_precache[0]));
3587
3588         strlcpy(sv.model_precache[0], "", sizeof(sv.model_precache[0]));
3589         strlcpy(sv.model_precache[1], sv.worldname, sizeof(sv.model_precache[1]));
3590         for (i = 1;i < sv.worldmodel->brush.numsubmodels && i+1 < MAX_MODELS;i++)
3591         {
3592                 dpsnprintf(sv.model_precache[i+1], sizeof(sv.model_precache[i+1]), "*%i", i);
3593                 sv.models[i+1] = Mod_ForName (sv.model_precache[i+1], false, false, sv.worldname);
3594         }
3595         if(i < sv.worldmodel->brush.numsubmodels)
3596                 Con_Printf("Too many submodels (MAX_MODELS is %i)\n", MAX_MODELS);
3597
3598 //
3599 // load the rest of the entities
3600 //
3601         // AK possible hack since num_edicts is still 0
3602         ent = PRVM_EDICT_NUM(0);
3603         memset (ent->fields.fp, 0, prog->entityfields * sizeof(prvm_vec_t));
3604         ent->priv.server->free = false;
3605         PRVM_serveredictstring(ent, model) = PRVM_SetEngineString(prog, sv.worldname);
3606         PRVM_serveredictfloat(ent, modelindex) = 1;             // world model
3607         PRVM_serveredictfloat(ent, solid) = SOLID_BSP;
3608         PRVM_serveredictfloat(ent, movetype) = MOVETYPE_PUSH;
3609         VectorCopy(sv.world.mins, PRVM_serveredictvector(ent, mins));
3610         VectorCopy(sv.world.maxs, PRVM_serveredictvector(ent, maxs));
3611         VectorCopy(sv.world.mins, PRVM_serveredictvector(ent, absmin));
3612         VectorCopy(sv.world.maxs, PRVM_serveredictvector(ent, absmax));
3613
3614         if (coop.value)
3615                 PRVM_serverglobalfloat(coop) = coop.integer;
3616         else
3617                 PRVM_serverglobalfloat(deathmatch) = deathmatch.integer;
3618
3619         PRVM_serverglobalstring(mapname) = PRVM_SetEngineString(prog, sv.name);
3620
3621 // serverflags are for cross level information (sigils)
3622         PRVM_serverglobalfloat(serverflags) = svs.serverflags;
3623
3624         // we need to reset the spawned flag on all connected clients here so that
3625         // their thinks don't run during startup (before PutClientInServer)
3626         // we also need to set up the client entities now
3627         // and we need to set the ->edict pointers to point into the progs edicts
3628         for (i = 0, host_client = svs.clients;i < svs.maxclients;i++, host_client++)
3629         {
3630                 host_client->begun = false;
3631                 host_client->edict = PRVM_EDICT_NUM(i + 1);
3632                 PRVM_ED_ClearEdict(prog, host_client->edict);
3633         }
3634
3635         // load replacement entity file if found
3636         if (sv_entpatch.integer && (entities = (char *)FS_LoadFile(va(vabuf, sizeof(vabuf), "%s.ent", sv.worldnamenoextension), tempmempool, true, NULL)))
3637         {
3638                 Con_Printf("Loaded %s.ent\n", sv.worldnamenoextension);
3639                 PRVM_ED_LoadFromFile(prog, entities);
3640                 Mem_Free(entities);
3641         }
3642         else
3643                 PRVM_ED_LoadFromFile(prog, sv.worldmodel->brush.entities);
3644
3645
3646         // LadyHavoc: clear world angles (to fix e3m3.bsp)
3647         VectorClear(PRVM_serveredictvector(prog->edicts, angles));
3648
3649 // all setup is completed, any further precache statements are errors
3650 //      sv.state = ss_active; // LadyHavoc: workaround for svc_precache bug
3651         prog->allowworldwrites = false;
3652
3653 // run two frames to allow everything to settle
3654         sv.time = 1.0001;
3655         for (i = 0;i < sv_init_frame_count.integer;i++)
3656         {
3657                 sv.frametime = 0.1;
3658                 SV_Physics ();
3659         }
3660
3661         // Once all init frames have been run, we consider svqc code fully initialized.
3662         prog->inittime = host.realtime;
3663
3664         if (cls.state == ca_dedicated)
3665                 Mod_PurgeUnused();
3666
3667 // create a baseline for more efficient communications
3668         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)
3669                 SV_CreateBaseline ();
3670
3671         sv.state = ss_active; // LadyHavoc: workaround for svc_precache bug
3672
3673 // send serverinfo to all connected clients, and set up botclients coming back from a level change
3674         for (i = 0, host_client = svs.clients;i < svs.maxclients;i++, host_client++)
3675         {
3676                 host_client->clientconnectcalled = false; // do NOT call ClientDisconnect if he drops before ClientConnect!
3677                 if (!host_client->active)
3678                         continue;
3679                 if (host_client->netconnection)
3680                         SV_SendServerinfo(host_client);
3681                 else
3682                 {
3683                         int j;
3684                         // if client is a botclient coming from a level change, we need to
3685                         // set up client info that normally requires networking
3686
3687                         // copy spawn parms out of the client_t
3688                         for (j=0 ; j< NUM_SPAWN_PARMS ; j++)
3689                                 (&PRVM_serverglobalfloat(parm1))[j] = host_client->spawn_parms[j];
3690
3691                         // call the spawn function
3692                         host_client->clientconnectcalled = true;
3693                         PRVM_serverglobalfloat(time) = sv.time;
3694                         PRVM_serverglobaledict(self) = PRVM_EDICT_TO_PROG(host_client->edict);
3695                         prog->ExecuteProgram(prog, PRVM_serverfunction(ClientConnect), "QC function ClientConnect is missing");
3696                         prog->ExecuteProgram(prog, PRVM_serverfunction(PutClientInServer), "QC function PutClientInServer is missing");
3697                         host_client->begun = true;
3698                 }
3699         }
3700
3701         // update the map title cvar
3702         strlcpy(sv.worldmessage, PRVM_GetString(prog, PRVM_serveredictstring(prog->edicts, message)), sizeof(sv.worldmessage)); // map title (not related to filename)
3703         Cvar_SetQuick(&sv_worldmessage, sv.worldmessage);
3704
3705         Con_Printf("Server spawned.\n");
3706         NetConn_Heartbeat (2);
3707
3708         if(cls.state == ca_dedicated)
3709                 Sys_MakeProcessMean();
3710
3711 //      SV_UnlockThreadMutex();
3712 }
3713
3714 /*
3715 ==================
3716 SV_Shutdown
3717
3718 This only happens at the end of a game, not between levels
3719 ==================
3720 */
3721 void SV_Shutdown(void)
3722 {
3723         prvm_prog_t *prog = SVVM_prog;
3724         int i;
3725
3726         Con_DPrintf("SV_Shutdown\n");
3727
3728         if (!sv.active)
3729                 return;
3730
3731         NetConn_Heartbeat(2);
3732         NetConn_Heartbeat(2);
3733
3734 // make sure all the clients know we're disconnecting
3735         World_End(&sv.world);
3736         if(prog->loaded)
3737         {
3738                 if(PRVM_serverfunction(SV_Shutdown))
3739                 {
3740                         func_t s = PRVM_serverfunction(SV_Shutdown);
3741                         PRVM_serverglobalfloat(time) = sv.time;
3742                         PRVM_serverfunction(SV_Shutdown) = 0; // prevent it from getting called again
3743                         prog->ExecuteProgram(prog, s,"SV_Shutdown() required");
3744                 }
3745         }
3746         for (i = 0, host_client = svs.clients;i < svs.maxclients;i++, host_client++)
3747                 if (host_client->active)
3748                         SV_DropClient(false); // server shutdown
3749
3750         NetConn_CloseServerPorts();
3751
3752         sv.active = false;
3753 //
3754 // clear structures
3755 //
3756         memset(&sv, 0, sizeof(sv));
3757         memset(svs.clients, 0, svs.maxclients*sizeof(client_t));
3758
3759         cl.islocalgame = false;
3760 }
3761
3762 /////////////////////////////////////////////////////
3763 // SV VM stuff
3764
3765 static void SVVM_begin_increase_edicts(prvm_prog_t *prog)
3766 {
3767         // links don't survive the transition, so unlink everything
3768         World_UnlinkAll(&sv.world);
3769 }
3770
3771 static void SVVM_end_increase_edicts(prvm_prog_t *prog)
3772 {
3773         int i;
3774         prvm_edict_t *ent;
3775
3776         // link every entity except world
3777         for (i = 1, ent = prog->edicts;i < prog->num_edicts;i++, ent++)
3778                 if (!ent->priv.server->free && !VectorCompare(PRVM_serveredictvector(ent, absmin), PRVM_serveredictvector(ent, absmax)))
3779                         SV_LinkEdict(ent);
3780 }
3781
3782 static void SVVM_init_edict(prvm_prog_t *prog, prvm_edict_t *e)
3783 {
3784         // LadyHavoc: for consistency set these here
3785         int num = PRVM_NUM_FOR_EDICT(e) - 1;
3786
3787         e->priv.server->move = false; // don't move on first frame
3788
3789         if (num >= 0 && num < svs.maxclients)
3790         {
3791                 // set colormap and team on newly created player entity
3792                 PRVM_serveredictfloat(e, colormap) = num + 1;
3793                 PRVM_serveredictfloat(e, team) = (svs.clients[num].colors & 15) + 1;
3794                 // set netname/clientcolors back to client values so that
3795                 // DP_SV_CLIENTNAME and DP_SV_CLIENTCOLORS will not immediately
3796                 // reset them
3797                 PRVM_serveredictstring(e, netname) = PRVM_SetEngineString(prog, svs.clients[num].name);
3798                 PRVM_serveredictfloat(e, clientcolors) = svs.clients[num].colors;
3799                 // NEXUIZ_PLAYERMODEL and NEXUIZ_PLAYERSKIN
3800                 PRVM_serveredictstring(e, playermodel) = PRVM_SetEngineString(prog, svs.clients[num].playermodel);
3801                 PRVM_serveredictstring(e, playerskin) = PRVM_SetEngineString(prog, svs.clients[num].playerskin);
3802                 // Assign netaddress (IP Address, etc)
3803                 if(svs.clients[num].netconnection != NULL)
3804                 {
3805                         // Acquire Readable Address
3806                         LHNETADDRESS_ToString(&svs.clients[num].netconnection->peeraddress, svs.clients[num].netaddress, sizeof(svs.clients[num].netaddress), false);
3807                         PRVM_serveredictstring(e, netaddress) = PRVM_SetEngineString(prog, svs.clients[num].netaddress);
3808                 }
3809                 else
3810                         PRVM_serveredictstring(e, netaddress) = PRVM_SetEngineString(prog, "null/botclient");
3811                 if(svs.clients[num].netconnection != NULL && svs.clients[num].netconnection->crypto.authenticated && svs.clients[num].netconnection->crypto.client_idfp[0])
3812                         PRVM_serveredictstring(e, crypto_idfp) = PRVM_SetEngineString(prog, svs.clients[num].netconnection->crypto.client_idfp);
3813                 else
3814                         PRVM_serveredictstring(e, crypto_idfp) = 0;
3815                 PRVM_serveredictfloat(e, crypto_idfp_signed) = (svs.clients[num].netconnection != NULL && svs.clients[num].netconnection->crypto.authenticated && svs.clients[num].netconnection->crypto.client_issigned);
3816                 if(svs.clients[num].netconnection != NULL && svs.clients[num].netconnection->crypto.authenticated && svs.clients[num].netconnection->crypto.client_keyfp[0])
3817                         PRVM_serveredictstring(e, crypto_keyfp) = PRVM_SetEngineString(prog, svs.clients[num].netconnection->crypto.client_keyfp);
3818                 else
3819                         PRVM_serveredictstring(e, crypto_keyfp) = 0;
3820                 if(svs.clients[num].netconnection != NULL && svs.clients[num].netconnection->crypto.authenticated && svs.clients[num].netconnection->crypto.server_keyfp[0])
3821                         PRVM_serveredictstring(e, crypto_mykeyfp) = PRVM_SetEngineString(prog, svs.clients[num].netconnection->crypto.server_keyfp);
3822                 else
3823                         PRVM_serveredictstring(e, crypto_mykeyfp) = 0;
3824                 if(svs.clients[num].netconnection != NULL && svs.clients[num].netconnection->crypto.authenticated && svs.clients[num].netconnection->crypto.use_aes)
3825                         PRVM_serveredictstring(e, crypto_encryptmethod) = PRVM_SetEngineString(prog, "AES128");
3826                 else
3827                         PRVM_serveredictstring(e, crypto_encryptmethod) = 0;
3828                 if(svs.clients[num].netconnection != NULL && svs.clients[num].netconnection->crypto.authenticated)
3829                         PRVM_serveredictstring(e, crypto_signmethod) = PRVM_SetEngineString(prog, "HMAC-SHA256");
3830                 else
3831                         PRVM_serveredictstring(e, crypto_signmethod) = 0;
3832         }
3833 }
3834
3835 static void SVVM_free_edict(prvm_prog_t *prog, prvm_edict_t *ed)
3836 {
3837         int i;
3838         int e;
3839
3840         World_UnlinkEdict(ed);          // unlink from world bsp
3841
3842         PRVM_serveredictstring(ed, model) = 0;
3843         PRVM_serveredictfloat(ed, takedamage) = 0;
3844         PRVM_serveredictfloat(ed, modelindex) = 0;
3845         PRVM_serveredictfloat(ed, colormap) = 0;
3846         PRVM_serveredictfloat(ed, skin) = 0;
3847         PRVM_serveredictfloat(ed, frame) = 0;
3848         VectorClear(PRVM_serveredictvector(ed, origin));
3849         VectorClear(PRVM_serveredictvector(ed, angles));
3850         PRVM_serveredictfloat(ed, nextthink) = -1;
3851         PRVM_serveredictfloat(ed, solid) = 0;
3852
3853         VM_RemoveEdictSkeleton(prog, ed);
3854         World_Physics_RemoveFromEntity(&sv.world, ed);
3855         World_Physics_RemoveJointFromEntity(&sv.world, ed);
3856
3857         // make sure csqc networking is aware of the removed entity
3858         e = PRVM_NUM_FOR_EDICT(ed);
3859         sv.csqcentityversion[e] = 0;
3860         for (i = 0;i < svs.maxclients;i++)
3861                 svs.clients[i].csqcentitysendflags[e] = 0xFFFFFF;
3862 }
3863
3864 static void SVVM_count_edicts(prvm_prog_t *prog)
3865 {
3866         int             i;
3867         prvm_edict_t    *ent;
3868         int             active, models, solid, step;
3869
3870         active = models = solid = step = 0;
3871         for (i=0 ; i<prog->num_edicts ; i++)
3872         {
3873                 ent = PRVM_EDICT_NUM(i);
3874                 if (ent->priv.server->free)
3875                         continue;
3876                 active++;
3877                 if (PRVM_serveredictfloat(ent, solid))
3878                         solid++;
3879                 if (PRVM_serveredictstring(ent, model))
3880                         models++;
3881                 if (PRVM_serveredictfloat(ent, movetype) == MOVETYPE_STEP)
3882                         step++;
3883         }
3884
3885         Con_Printf("num_edicts:%3i\n", prog->num_edicts);
3886         Con_Printf("active    :%3i\n", active);
3887         Con_Printf("view      :%3i\n", models);
3888         Con_Printf("touch     :%3i\n", solid);
3889         Con_Printf("step      :%3i\n", step);
3890 }
3891
3892 static qboolean SVVM_load_edict(prvm_prog_t *prog, prvm_edict_t *ent)
3893 {
3894         // remove things from different skill levels or deathmatch
3895         if (gamemode != GAME_TRANSFUSION) //Transfusion does this in QC
3896         {
3897                 if (deathmatch.integer)
3898                 {
3899                         if (((int)PRVM_serveredictfloat(ent, spawnflags) & SPAWNFLAG_NOT_DEATHMATCH))
3900                         {
3901                                 return false;
3902                         }
3903                 }
3904                 else if ((current_skill <= 0 && ((int)PRVM_serveredictfloat(ent, spawnflags) & SPAWNFLAG_NOT_EASY  ))
3905                         || (current_skill == 1 && ((int)PRVM_serveredictfloat(ent, spawnflags) & SPAWNFLAG_NOT_MEDIUM))
3906                         || (current_skill >= 2 && ((int)PRVM_serveredictfloat(ent, spawnflags) & SPAWNFLAG_NOT_HARD  )))
3907                 {
3908                         return false;
3909                 }
3910         }
3911         return true;
3912 }
3913
3914 static void SV_VM_Setup(void)
3915 {
3916         prvm_prog_t *prog = SVVM_prog;
3917         PRVM_Prog_Init(prog, &cmd_server);
3918
3919         // allocate the mempools
3920         // TODO: move the magic numbers/constants into #defines [9/13/2006 Black]
3921         prog->progs_mempool = Mem_AllocPool("Server Progs", 0, NULL);
3922         prog->builtins = vm_sv_builtins;
3923         prog->numbuiltins = vm_sv_numbuiltins;
3924         prog->max_edicts = 512;
3925         if (sv.protocol == PROTOCOL_QUAKE)
3926                 prog->limit_edicts = 640; // before quake mission pack 1 this was 512
3927         else if (sv.protocol == PROTOCOL_QUAKEDP)
3928                 prog->limit_edicts = 2048; // guessing
3929         else if (sv.protocol == PROTOCOL_NEHAHRAMOVIE)
3930                 prog->limit_edicts = 2048; // guessing!
3931         else if (sv.protocol == PROTOCOL_NEHAHRABJP || sv.protocol == PROTOCOL_NEHAHRABJP2 || sv.protocol == PROTOCOL_NEHAHRABJP3)
3932                 prog->limit_edicts = 4096; // guessing!
3933         else
3934                 prog->limit_edicts = MAX_EDICTS;
3935         prog->reserved_edicts = svs.maxclients;
3936         prog->edictprivate_size = sizeof(edict_engineprivate_t);
3937         prog->name = "server";
3938         prog->extensionstring = vm_sv_extensions;
3939         prog->loadintoworld = true;
3940
3941         // all callbacks must be defined (pointers are not checked before calling)
3942         prog->begin_increase_edicts = SVVM_begin_increase_edicts;
3943         prog->end_increase_edicts   = SVVM_end_increase_edicts;
3944         prog->init_edict            = SVVM_init_edict;
3945         prog->free_edict            = SVVM_free_edict;
3946         prog->count_edicts          = SVVM_count_edicts;
3947         prog->load_edict            = SVVM_load_edict;
3948         prog->init_cmd              = SVVM_init_cmd;
3949         prog->reset_cmd             = SVVM_reset_cmd;
3950         prog->error_cmd             = Host_Error;
3951         prog->ExecuteProgram        = SVVM_ExecuteProgram;
3952
3953         PRVM_Prog_Load(prog, sv_progs.string, NULL, 0, SV_REQFUNCS, sv_reqfuncs, SV_REQFIELDS, sv_reqfields, SV_REQGLOBALS, sv_reqglobals);
3954
3955         // some mods compiled with scrambling compilers lack certain critical
3956         // global names and field names such as "self" and "time" and "nextthink"
3957         // so we have to set these offsets manually, matching the entvars_t
3958         // but we only do this if the prog header crc matches, otherwise it's totally freeform
3959         if (prog->progs_crc == PROGHEADER_CRC || prog->progs_crc == PROGHEADER_CRC_TENEBRAE)
3960         {
3961                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, modelindex);
3962                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, absmin);
3963                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, absmax);
3964                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, ltime);
3965                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, movetype);
3966                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, solid);
3967                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, origin);
3968                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, oldorigin);
3969                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, velocity);
3970                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, angles);
3971                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, avelocity);
3972                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, punchangle);
3973                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, classname);
3974                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, model);
3975                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, frame);
3976                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, skin);
3977                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, effects);
3978                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, mins);
3979                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, maxs);
3980                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, size);
3981                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, touch);
3982                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, use);
3983                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, think);
3984                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, blocked);
3985                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, nextthink);
3986                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, groundentity);
3987                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, health);
3988                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, frags);
3989                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, weapon);
3990                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, weaponmodel);
3991                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, weaponframe);
3992                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, currentammo);
3993                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, ammo_shells);
3994                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, ammo_nails);
3995                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, ammo_rockets);
3996                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, ammo_cells);
3997                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, items);
3998                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, takedamage);
3999                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, chain);
4000                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, deadflag);
4001                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, view_ofs);
4002                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, button0);
4003                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, button1);
4004                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, button2);
4005                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, impulse);
4006                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, fixangle);
4007                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, v_angle);
4008                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, idealpitch);
4009                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, netname);
4010                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, enemy);
4011                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, flags);
4012                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, colormap);
4013                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, team);
4014                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, max_health);
4015                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, teleport_time);
4016                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, armortype);
4017                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, armorvalue);
4018                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, waterlevel);
4019                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, watertype);
4020                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, ideal_yaw);
4021                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, yaw_speed);
4022                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, aiment);
4023                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, goalentity);
4024                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, spawnflags);
4025                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, target);
4026                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, targetname);
4027                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, dmg_take);
4028                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, dmg_save);
4029                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, dmg_inflictor);
4030                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, owner);
4031                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, movedir);
4032                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, message);
4033                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, sounds);
4034                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, noise);
4035                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, noise1);
4036                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, noise2);
4037                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, noise3);
4038                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, self);
4039                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, other);
4040                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, world);
4041                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, time);
4042                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, frametime);
4043                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, force_retouch);
4044                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, mapname);
4045                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, deathmatch);
4046                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, coop);
4047                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, teamplay);
4048                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, serverflags);
4049                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, total_secrets);
4050                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, total_monsters);
4051                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, found_secrets);
4052                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, killed_monsters);
4053                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, parm1);
4054                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, parm2);
4055                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, parm3);
4056                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, parm4);
4057                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, parm5);
4058                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, parm6);
4059                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, parm7);
4060                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, parm8);
4061                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, parm9);
4062                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, parm10);
4063                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, parm11);
4064                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, parm12);
4065                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, parm13);
4066                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, parm14);
4067                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, parm15);
4068                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, parm16);
4069                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, v_forward);
4070                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, v_up);
4071                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, v_right);
4072                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, trace_allsolid);
4073                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, trace_startsolid);
4074                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, trace_fraction);
4075                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, trace_endpos);
4076                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, trace_plane_normal);
4077                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, trace_plane_dist);
4078                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, trace_ent);
4079                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, trace_inopen);
4080                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, trace_inwater);
4081                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, msg_entity);
4082 //              PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, main);
4083 //              PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, StartFrame);
4084 //              PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, PlayerPreThink);
4085 //              PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, PlayerPostThink);
4086 //              PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, ClientKill);
4087 //              PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, ClientConnect);
4088 //              PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, PutClientInServer);
4089 //              PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, ClientDisconnect);
4090 //              PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, SetNewParms);
4091 //              PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, SetChangeParms);
4092         }
4093         else
4094                 Con_DPrintf("%s: %s system vars have been modified (CRC %i != engine %i), will not load in other engines\n", prog->name, sv_progs.string, prog->progs_crc, PROGHEADER_CRC);
4095
4096         // OP_STATE is always supported on server because we add fields/globals for it
4097         prog->flag |= PRVM_OP_STATE;
4098
4099         VM_CustomStats_Clear();//[515]: csqc
4100
4101         SV_Prepare_CSQC();
4102 }
4103
4104 extern cvar_t host_maxwait;
4105 extern cvar_t host_framerate;
4106 extern cvar_t cl_maxphysicsframesperserverframe;
4107 double SV_Frame(double time)
4108 {
4109         static double sv_timer;
4110         int i;
4111         qboolean playing;
4112         char vabuf[1024];
4113
4114         if((sv_timer += time) < 0)
4115                 return sv_timer;
4116         // limit the frametime steps to no more than 100ms each
4117         if (sv_timer > 0.1)
4118         {
4119                 if (!svs.threaded)
4120                         svs.perf_acc_lost += (sv_timer - 0.1);
4121                 sv_timer = 0.1;
4122         }
4123
4124         if (!svs.threaded)
4125         {
4126                 svs.perf_acc_sleeptime = host.sleeptime;
4127                 svs.perf_acc_realtime += time;
4128
4129                 // Look for clients who have spawned
4130                 playing = false;
4131                 for (i = 0, host_client = svs.clients;i < svs.maxclients;i++, host_client++)
4132                         if(host_client->begun)
4133                                 if(host_client->netconnection)
4134                                         playing = true;
4135                 if(sv.time < 10)
4136                 {
4137                         // don't accumulate time for the first 10 seconds of a match
4138                         // so things can settle
4139                         svs.perf_acc_realtime = svs.perf_acc_sleeptime = svs.perf_acc_lost = svs.perf_acc_offset = svs.perf_acc_offset_squared = svs.perf_acc_offset_max = svs.perf_acc_offset_samples = host.sleeptime = 0;
4140                 }
4141                 else if(svs.perf_acc_realtime > 5)
4142                 {
4143                         svs.perf_cpuload = 1 - svs.perf_acc_sleeptime / svs.perf_acc_realtime;
4144                         svs.perf_lost = svs.perf_acc_lost / svs.perf_acc_realtime;
4145                         if(svs.perf_acc_offset_samples > 0)
4146                         {
4147                                 svs.perf_offset_max = svs.perf_acc_offset_max;
4148                                 svs.perf_offset_avg = svs.perf_acc_offset / svs.perf_acc_offset_samples;
4149                                 svs.perf_offset_sdev = sqrt(svs.perf_acc_offset_squared / svs.perf_acc_offset_samples - svs.perf_offset_avg * svs.perf_offset_avg);
4150                         }
4151                         if(svs.perf_lost > 0 && developer_extra.integer)
4152                                 if(playing) // only complain if anyone is looking
4153                                         Con_DPrintf("Server can't keep up: %s\n", Host_TimingReport(vabuf, sizeof(vabuf)));
4154                         svs.perf_acc_realtime = svs.perf_acc_sleeptime = svs.perf_acc_lost = svs.perf_acc_offset = svs.perf_acc_offset_squared = svs.perf_acc_offset_max = svs.perf_acc_offset_samples = host.sleeptime = 0;
4155                 }
4156
4157                 if (sv.active && sv_timer > 0)
4158                 {
4159                         // execute one or more server frames, with an upper limit on how much
4160                         // execution time to spend on server frames to avoid freezing the game if
4161                         // the server is overloaded, this execution time limit means the game will
4162                         // slow down if the server is taking too long.
4163                         int framecount, framelimit = 1;
4164                         double advancetime, aborttime = 0;
4165                         float offset;
4166                         prvm_prog_t *prog = SVVM_prog;
4167                         // receive packets on each main loop iteration, as the main loop may
4168                         // be undersleeping due to select() detecting a new packet
4169                         if (sv.active && !svs.threaded)
4170                                 NetConn_ServerFrame();
4171                         // run the world state
4172                         // don't allow simulation to run too fast or too slow or logic glitches can occur
4173
4174                         // stop running server frames if the wall time reaches this value
4175                         if (sys_ticrate.value <= 0)
4176                                 advancetime = sv_timer;
4177                         else
4178                         {
4179                                 advancetime = sys_ticrate.value;
4180                                 // listen servers can run multiple server frames per client frame
4181                                 framelimit = cl_maxphysicsframesperserverframe.integer;
4182                                 aborttime = Sys_DirtyTime() + 0.1;
4183                         }
4184                         if(host_timescale.value > 0 && host_timescale.value < 1)
4185                                 advancetime = min(advancetime, 0.1 / host_timescale.value);
4186                         else
4187                                 advancetime = min(advancetime, 0.1);
4188
4189                         if(advancetime > 0)
4190                         {
4191                                 offset = Sys_DirtyTime() - host.dirtytime;
4192                                 if (offset < 0 || offset >= 1800)
4193                                         offset = 0;
4194                                 offset += sv_timer;
4195                                 ++svs.perf_acc_offset_samples;
4196                                 svs.perf_acc_offset += offset;
4197                                 svs.perf_acc_offset_squared += offset * offset;
4198                                 if(svs.perf_acc_offset_max < offset)
4199                                         svs.perf_acc_offset_max = offset;
4200                         }
4201
4202                         // only advance time if not paused
4203                         // the game also pauses in singleplayer when menu or console is used
4204                         sv.frametime = advancetime * host_timescale.value;
4205                         if (host_framerate.value)
4206                                 sv.frametime = host_framerate.value;
4207                         if (sv.paused || host.paused)
4208                                 sv.frametime = 0;
4209
4210                         for (framecount = 0;framecount < framelimit && sv_timer > 0;framecount++)
4211                         {
4212                                 sv_timer -= advancetime;
4213
4214                                 // move things around and think unless paused
4215                                 if (sv.frametime)
4216                                         SV_Physics();
4217
4218                                 // if this server frame took too long, break out of the loop
4219                                 if (framelimit > 1 && Sys_DirtyTime() >= aborttime)
4220                                         break;
4221                         }
4222                         R_TimeReport("serverphysics");
4223
4224                         // send all messages to the clients
4225                         SV_SendClientMessages();
4226
4227                         if (sv.paused == 1 && host.realtime > sv.pausedstart && sv.pausedstart > 0) {
4228                                 prog->globals.fp[OFS_PARM0] = host.realtime - sv.pausedstart;
4229                                 PRVM_serverglobalfloat(time) = sv.time;
4230                                 prog->ExecuteProgram(prog, PRVM_serverfunction(SV_PausedTic), "QC function SV_PausedTic is missing");
4231                         }
4232
4233                         // send an heartbeat if enough time has passed since the last one
4234                         NetConn_Heartbeat(0);
4235                         R_TimeReport("servernetwork");
4236                 }
4237                 else
4238                 {
4239                         // don't let r_speeds display jump around
4240                         R_TimeReport("serverphysics");
4241                         R_TimeReport("servernetwork");
4242                 }
4243         }
4244         // if there is some time remaining from this frame, reset the timer
4245         if (sv_timer >= 0)
4246         {
4247                 if (!svs.threaded)
4248                         svs.perf_acc_lost += sv_timer;
4249                 sv_timer = 0;
4250         }
4251         return sv_timer;
4252 }
4253
4254 static int SV_ThreadFunc(void *voiddata)
4255 {
4256         prvm_prog_t *prog = SVVM_prog;
4257         qboolean playing = false;
4258         double sv_timer = 0;
4259         double sv_deltarealtime, sv_oldrealtime, sv_realtime;
4260         double wait;
4261         int i;
4262         char vabuf[1024];
4263         sv_realtime = Sys_DirtyTime();
4264         while (!svs.threadstop)
4265         {
4266                 // FIXME: we need to handle Host_Error in the server thread somehow
4267 //              if (setjmp(sv_abortframe))
4268 //                      continue;                       // something bad happened in the server game
4269
4270                 sv_oldrealtime = sv_realtime;
4271                 sv_realtime = Sys_DirtyTime();
4272                 sv_deltarealtime = sv_realtime - sv_oldrealtime;
4273                 if (sv_deltarealtime < 0 || sv_deltarealtime >= 1800) sv_deltarealtime = 0;
4274
4275                 sv_timer += sv_deltarealtime;
4276
4277                 svs.perf_acc_realtime += sv_deltarealtime;
4278
4279                 // at this point we start doing real server work, and must block on any client activity pertaining to the server (such as executing SV_SpawnServer)
4280                 SV_LockThreadMutex();
4281
4282                 // Look for clients who have spawned
4283                 playing = false;
4284                 if (sv.active)
4285                         for (i = 0, host_client = svs.clients;i < svs.maxclients;i++, host_client++)
4286                                 if(host_client->begun)
4287                                         if(host_client->netconnection)
4288                                                 playing = true;
4289                 if(sv.time < 10)
4290                 {
4291                         // don't accumulate time for the first 10 seconds of a match
4292                         // so things can settle
4293                         svs.perf_acc_realtime = svs.perf_acc_sleeptime = svs.perf_acc_lost = svs.perf_acc_offset = svs.perf_acc_offset_squared = svs.perf_acc_offset_max = svs.perf_acc_offset_samples = 0;
4294                 }
4295                 else if(svs.perf_acc_realtime > 5)
4296                 {
4297                         svs.perf_cpuload = 1 - svs.perf_acc_sleeptime / svs.perf_acc_realtime;
4298                         svs.perf_lost = svs.perf_acc_lost / svs.perf_acc_realtime;
4299                         if(svs.perf_acc_offset_samples > 0)
4300                         {
4301                                 svs.perf_offset_max = svs.perf_acc_offset_max;
4302                                 svs.perf_offset_avg = svs.perf_acc_offset / svs.perf_acc_offset_samples;
4303                                 svs.perf_offset_sdev = sqrt(svs.perf_acc_offset_squared / svs.perf_acc_offset_samples - svs.perf_offset_avg * svs.perf_offset_avg);
4304                         }
4305                         if(svs.perf_lost > 0 && developer_extra.integer)
4306                                 if(playing)
4307                                         Con_DPrintf("Server can't keep up: %s\n", Host_TimingReport(vabuf, sizeof(vabuf)));
4308                         svs.perf_acc_realtime = svs.perf_acc_sleeptime = svs.perf_acc_lost = svs.perf_acc_offset = svs.perf_acc_offset_squared = svs.perf_acc_offset_max = svs.perf_acc_offset_samples = 0;
4309                 }
4310
4311                 // get new packets
4312                 if (sv.active)
4313                         NetConn_ServerFrame();
4314
4315                 // if the accumulators haven't become positive yet, wait a while
4316                 wait = sv_timer * -1000000.0;
4317                 if (wait >= 1)
4318                 {
4319                         double time0, delta;
4320                         SV_UnlockThreadMutex(); // don't keep mutex locked while sleeping
4321                         if (host_maxwait.value <= 0)
4322                                 wait = min(wait, 1000000.0);
4323                         else
4324                                 wait = min(wait, host_maxwait.value * 1000.0);
4325                         if(wait < 1)
4326                                 wait = 1; // because we cast to int
4327                         time0 = Sys_DirtyTime();
4328                         Sys_Sleep((int)wait);
4329                         delta = Sys_DirtyTime() - time0;if (delta < 0 || delta >= 1800) delta = 0;
4330                         svs.perf_acc_sleeptime += delta;
4331                         continue;
4332                 }
4333
4334                 if (sv.active && sv_timer > 0)
4335                 {
4336                         // execute one server frame
4337                         double advancetime;
4338                         float offset;
4339
4340                         if (sys_ticrate.value <= 0)
4341                                 advancetime = min(sv_timer, 0.1); // don't step more than 100ms
4342                         else
4343                                 advancetime = sys_ticrate.value;
4344
4345                         if(advancetime > 0)
4346                         {
4347                                 offset = sv_timer + (Sys_DirtyTime() - sv_realtime); // LadyHavoc: FIXME: I don't understand this line
4348                                 ++svs.perf_acc_offset_samples;
4349                                 svs.perf_acc_offset += offset;
4350                                 svs.perf_acc_offset_squared += offset * offset;
4351                                 if(svs.perf_acc_offset_max < offset)
4352                                         svs.perf_acc_offset_max = offset;
4353                         }
4354
4355                         // only advance time if not paused
4356                         // the game also pauses in singleplayer when menu or console is used
4357                         sv.frametime = advancetime * host_timescale.value;
4358                         if (host_framerate.value)
4359                                 sv.frametime = host_framerate.value;
4360                         if (sv.paused || host.paused)
4361                                 sv.frametime = 0;
4362
4363                         sv_timer -= advancetime;
4364
4365                         // move things around and think unless paused
4366                         if (sv.frametime)
4367                                 SV_Physics();
4368
4369                         // send all messages to the clients
4370                         SV_SendClientMessages();
4371
4372                         if (sv.paused == 1 && sv_realtime > sv.pausedstart && sv.pausedstart > 0)
4373                         {
4374                                 PRVM_serverglobalfloat(time) = sv.time;
4375                                 prog->globals.fp[OFS_PARM0] = sv_realtime - sv.pausedstart;
4376                                 prog->ExecuteProgram(prog, PRVM_serverfunction(SV_PausedTic), "QC function SV_PausedTic is missing");
4377                         }
4378
4379                         // send an heartbeat if enough time has passed since the last one
4380                         NetConn_Heartbeat(0);
4381
4382                 }
4383
4384                 // we're back to safe code now
4385                 SV_UnlockThreadMutex();
4386
4387                 // if there is some time remaining from this frame, reset the timers
4388                 if (sv_timer >= 0)
4389                 {
4390                         svs.perf_acc_lost += sv_timer;
4391                         sv_timer = 0;
4392                 }
4393         }
4394         return 0;
4395 }
4396
4397 void SV_StartThread(void)
4398 {
4399         if (!sv_threaded.integer || !Thread_HasThreads())
4400                 return;
4401         svs.threaded = true;
4402         svs.threadstop = false;
4403         svs.threadmutex = Thread_CreateMutex();
4404         svs.thread = Thread_CreateThread(SV_ThreadFunc, NULL);
4405 }
4406
4407 void SV_StopThread(void)
4408 {
4409         if (!svs.threaded)
4410                 return;
4411         svs.threadstop = true;
4412         Thread_WaitThread(svs.thread, 0);
4413         Thread_DestroyMutex(svs.threadmutex);
4414         svs.threaded = false;
4415 }