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                 SV_Name(i);
2652
2653                 // DP_SV_CLIENTCOLORS
2654                 host_client->colors = (int)PRVM_serveredictfloat(host_client->edict, clientcolors);
2655                 if (host_client->old_colors != host_client->colors)
2656                 {
2657                         host_client->old_colors = host_client->colors;
2658                         // send notification to all clients
2659                         MSG_WriteByte (&sv.reliable_datagram, svc_updatecolors);
2660                         MSG_WriteByte (&sv.reliable_datagram, i);
2661                         MSG_WriteByte (&sv.reliable_datagram, host_client->colors);
2662                 }
2663
2664                 // NEXUIZ_PLAYERMODEL
2665                 model = PRVM_GetString(prog, PRVM_serveredictstring(host_client->edict, playermodel));
2666                 if (model == NULL)
2667                         model = "";
2668                 // always point the string back at host_client->name to keep it safe
2669                 //strlcpy (host_client->playermodel, model, sizeof (host_client->playermodel));
2670                 if (model != host_client->playermodel) // prevent buffer overlap SIGABRT on Mac OSX
2671                         strlcpy (host_client->playermodel, model, sizeof (host_client->playermodel));
2672                 PRVM_serveredictstring(host_client->edict, playermodel) = PRVM_SetEngineString(prog, host_client->playermodel);
2673
2674                 // NEXUIZ_PLAYERSKIN
2675                 skin = PRVM_GetString(prog, PRVM_serveredictstring(host_client->edict, playerskin));
2676                 if (skin == NULL)
2677                         skin = "";
2678                 // always point the string back at host_client->name to keep it safe
2679                 //strlcpy (host_client->playerskin, skin, sizeof (host_client->playerskin));
2680                 if (skin != host_client->playerskin) // prevent buffer overlap SIGABRT on Mac OSX
2681                         strlcpy (host_client->playerskin, skin, sizeof (host_client->playerskin));
2682                 PRVM_serveredictstring(host_client->edict, playerskin) = PRVM_SetEngineString(prog, host_client->playerskin);
2683
2684                 // TODO: add an extension name for this [1/17/2008 Black]
2685                 clientcamera = PRVM_serveredictedict(host_client->edict, clientcamera);
2686                 if (clientcamera > 0)
2687                 {
2688                         int oldclientcamera = host_client->clientcamera;
2689                         if (clientcamera >= prog->max_edicts || PRVM_EDICT_NUM(clientcamera)->priv.required->free)
2690                                 clientcamera = PRVM_NUM_FOR_EDICT(host_client->edict);
2691                         host_client->clientcamera = clientcamera;
2692
2693                         if (oldclientcamera != host_client->clientcamera && host_client->netconnection)
2694                         {
2695                                 MSG_WriteByte(&host_client->netconnection->message, svc_setview);
2696                                 MSG_WriteShort(&host_client->netconnection->message, host_client->clientcamera);
2697                         }
2698                 }
2699
2700                 // frags
2701                 host_client->frags = (int)PRVM_serveredictfloat(host_client->edict, frags);
2702                 if(IS_OLDNEXUIZ_DERIVED(gamemode))
2703                         if(!host_client->begun && host_client->netconnection)
2704                                 host_client->frags = -666;
2705                 if (host_client->old_frags != host_client->frags)
2706                 {
2707                         host_client->old_frags = host_client->frags;
2708                         // send notification to all clients
2709                         MSG_WriteByte (&sv.reliable_datagram, svc_updatefrags);
2710                         MSG_WriteByte (&sv.reliable_datagram, i);
2711                         MSG_WriteShort (&sv.reliable_datagram, host_client->frags);
2712                 }
2713         }
2714
2715         for (j = 0, client = svs.clients;j < svs.maxclients;j++, client++)
2716                 if (client->netconnection && (client->begun || client->clientconnectcalled)) // also send MSG_ALL to people who are past ClientConnect, but not spawned yet
2717                         SZ_Write (&client->netconnection->message, sv.reliable_datagram.data, sv.reliable_datagram.cursize);
2718
2719         SZ_Clear (&sv.reliable_datagram);
2720 }
2721
2722
2723 /*
2724 =======================
2725 SV_SendClientMessages
2726 =======================
2727 */
2728 void SV_SendClientMessages(void)
2729 {
2730         int i, prepared = false;
2731
2732         if (sv.protocol == PROTOCOL_QUAKEWORLD)
2733                 Sys_Error("SV_SendClientMessages: no quakeworld support\n");
2734
2735         SV_FlushBroadcastMessages();
2736
2737 // update frags, names, etc
2738         SV_UpdateToReliableMessages();
2739
2740 // build individual updates
2741         for (i = 0, host_client = svs.clients;i < svs.maxclients;i++, host_client++)
2742         {
2743                 if (!host_client->active)
2744                         continue;
2745                 if (!host_client->netconnection)
2746                         continue;
2747
2748                 if (host_client->netconnection->message.overflowed)
2749                 {
2750                         SV_DropClient (true);   // if the message couldn't send, kick off
2751                         continue;
2752                 }
2753
2754                 if (!prepared)
2755                 {
2756                         prepared = true;
2757                         // only prepare entities once per frame
2758                         SV_PrepareEntitiesForSending();
2759                 }
2760                 SV_SendClientDatagram(host_client);
2761         }
2762
2763 // clear muzzle flashes
2764         SV_CleanupEnts();
2765 }
2766
2767 static void SV_StartDownload_f(cmd_state_t *cmd)
2768 {
2769         if (host_client->download_file)
2770                 host_client->download_started = true;
2771 }
2772
2773 /*
2774  * Compression extension negotiation:
2775  *
2776  * Server to client:
2777  *   cl_serverextension_download 2
2778  *
2779  * Client to server:
2780  *   download <filename> <list of zero or more suppported compressions in order of preference>
2781  * e.g.
2782  *   download maps/map1.bsp lzo deflate huffman
2783  *
2784  * Server to client:
2785  *   cl_downloadbegin <compressed size> <filename> <compression method actually used>
2786  * e.g.
2787  *   cl_downloadbegin 123456 maps/map1.bsp deflate
2788  *
2789  * The server may choose not to compress the file by sending no compression name, like:
2790  *   cl_downloadbegin 345678 maps/map1.bsp
2791  *
2792  * NOTE: the "download" command may only specify compression algorithms if
2793  *       cl_serverextension_download is 2!
2794  *       If cl_serverextension_download has a different value, the client must
2795  *       assume this extension is not supported!
2796  */
2797
2798 static void Download_CheckExtensions(cmd_state_t *cmd)
2799 {
2800         int i;
2801         int argc = Cmd_Argc(cmd);
2802
2803         // first reset them all
2804         host_client->download_deflate = false;
2805
2806         for(i = 2; i < argc; ++i)
2807         {
2808                 if(!strcmp(Cmd_Argv(cmd, i), "deflate"))
2809                 {
2810                         host_client->download_deflate = true;
2811                         break;
2812                 }
2813         }
2814 }
2815
2816 static void SV_Download_f(cmd_state_t *cmd)
2817 {
2818         const char *whichpack, *whichpack2, *extension;
2819         qboolean is_csqc; // so we need to check only once
2820
2821         if (Cmd_Argc(cmd) < 2)
2822         {
2823                 SV_ClientPrintf("usage: download <filename> {<extensions>}*\n");
2824                 SV_ClientPrintf("       supported extensions: deflate\n");
2825                 return;
2826         }
2827
2828         if (FS_CheckNastyPath(Cmd_Argv(cmd, 1), false))
2829         {
2830                 SV_ClientPrintf("Download rejected: nasty filename \"%s\"\n", Cmd_Argv(cmd, 1));
2831                 return;
2832         }
2833
2834         if (host_client->download_file)
2835         {
2836                 // at this point we'll assume the previous download should be aborted
2837                 Con_DPrintf("Download of %s aborted by %s starting a new download\n", host_client->download_name, host_client->name);
2838                 SV_ClientCommands("\nstopdownload\n");
2839
2840                 // close the file and reset variables
2841                 FS_Close(host_client->download_file);
2842                 host_client->download_file = NULL;
2843                 host_client->download_name[0] = 0;
2844                 host_client->download_expectedposition = 0;
2845                 host_client->download_started = false;
2846         }
2847
2848         is_csqc = (sv.csqc_progname[0] && strcmp(Cmd_Argv(cmd, 1), sv.csqc_progname) == 0);
2849
2850         if (!sv_allowdownloads.integer && !is_csqc)
2851         {
2852                 SV_ClientPrintf("Downloads are disabled on this server\n");
2853                 SV_ClientCommands("\nstopdownload\n");
2854                 return;
2855         }
2856
2857         Download_CheckExtensions(cmd);
2858
2859         strlcpy(host_client->download_name, Cmd_Argv(cmd, 1), sizeof(host_client->download_name));
2860         extension = FS_FileExtension(host_client->download_name);
2861
2862         // host_client is asking to download a specified file
2863         if (developer_extra.integer)
2864                 Con_DPrintf("Download request for %s by %s\n", host_client->download_name, host_client->name);
2865
2866         if(is_csqc)
2867         {
2868                 char extensions[MAX_QPATH]; // make sure this can hold all extensions
2869                 extensions[0] = '\0';
2870
2871                 if(host_client->download_deflate)
2872                         strlcat(extensions, " deflate", sizeof(extensions));
2873
2874                 Con_DPrintf("Downloading %s to %s\n", host_client->download_name, host_client->name);
2875
2876                 if(host_client->download_deflate && svs.csqc_progdata_deflated)
2877                         host_client->download_file = FS_FileFromData(svs.csqc_progdata_deflated, svs.csqc_progsize_deflated, true);
2878                 else
2879                         host_client->download_file = FS_FileFromData(svs.csqc_progdata, sv.csqc_progsize, true);
2880
2881                 // no, no space is needed between %s and %s :P
2882                 SV_ClientCommands("\ncl_downloadbegin %i %s%s\n", (int)FS_FileSize(host_client->download_file), host_client->download_name, extensions);
2883
2884                 host_client->download_expectedposition = 0;
2885                 host_client->download_started = false;
2886                 host_client->sendsignon = true; // make sure this message is sent
2887                 return;
2888         }
2889
2890         if (!FS_FileExists(host_client->download_name))
2891         {
2892                 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);
2893                 SV_ClientCommands("\nstopdownload\n");
2894                 return;
2895         }
2896
2897         // check if the user is trying to download part of registered Quake(r)
2898         whichpack = FS_WhichPack(host_client->download_name);
2899         whichpack2 = FS_WhichPack("gfx/pop.lmp");
2900         if ((whichpack && whichpack2 && !strcasecmp(whichpack, whichpack2)) || FS_IsRegisteredQuakePack(host_client->download_name))
2901         {
2902                 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);
2903                 SV_ClientCommands("\nstopdownload\n");
2904                 return;
2905         }
2906
2907         // check if the server has forbidden archive downloads entirely
2908         if (!sv_allowdownloads_inarchive.integer)
2909         {
2910                 whichpack = FS_WhichPack(host_client->download_name);
2911                 if (whichpack)
2912                 {
2913                         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);
2914                         SV_ClientCommands("\nstopdownload\n");
2915                         return;
2916                 }
2917         }
2918
2919         if (!sv_allowdownloads_config.integer)
2920         {
2921                 if (!strcasecmp(extension, "cfg"))
2922                 {
2923                         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);
2924                         SV_ClientCommands("\nstopdownload\n");
2925                         return;
2926                 }
2927         }
2928
2929         if (!sv_allowdownloads_dlcache.integer)
2930         {
2931                 if (!strncasecmp(host_client->download_name, "dlcache/", 8))
2932                 {
2933                         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);
2934                         SV_ClientCommands("\nstopdownload\n");
2935                         return;
2936                 }
2937         }
2938
2939         if (!sv_allowdownloads_archive.integer)
2940         {
2941                 if (!strcasecmp(extension, "pak") || !strcasecmp(extension, "pk3"))
2942                 {
2943                         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);
2944                         SV_ClientCommands("\nstopdownload\n");
2945                         return;
2946                 }
2947         }
2948
2949         host_client->download_file = FS_OpenVirtualFile(host_client->download_name, true);
2950         if (!host_client->download_file)
2951         {
2952                 SV_ClientPrintf("Download rejected: server could not open the file \"%s\"\n", host_client->download_name);
2953                 SV_ClientCommands("\nstopdownload\n");
2954                 return;
2955         }
2956
2957         if (FS_FileSize(host_client->download_file) > 1<<30)
2958         {
2959                 SV_ClientPrintf("Download rejected: file \"%s\" is very large\n", host_client->download_name);
2960                 SV_ClientCommands("\nstopdownload\n");
2961                 FS_Close(host_client->download_file);
2962                 host_client->download_file = NULL;
2963                 return;
2964         }
2965
2966         if (FS_FileSize(host_client->download_file) < 0)
2967         {
2968                 SV_ClientPrintf("Download rejected: file \"%s\" is not a regular file\n", host_client->download_name);
2969                 SV_ClientCommands("\nstopdownload\n");
2970                 FS_Close(host_client->download_file);
2971                 host_client->download_file = NULL;
2972                 return;
2973         }
2974
2975         Con_DPrintf("Downloading %s to %s\n", host_client->download_name, host_client->name);
2976
2977         /*
2978          * we can only do this if we would actually deflate on the fly
2979          * which we do not (yet)!
2980         {
2981                 char extensions[MAX_QPATH]; // make sure this can hold all extensions
2982                 extensions[0] = '\0';
2983
2984                 if(host_client->download_deflate)
2985                         strlcat(extensions, " deflate", sizeof(extensions));
2986
2987                 // no, no space is needed between %s and %s :P
2988                 SV_ClientCommands("\ncl_downloadbegin %i %s%s\n", (int)FS_FileSize(host_client->download_file), host_client->download_name, extensions);
2989         }
2990         */
2991         SV_ClientCommands("\ncl_downloadbegin %i %s\n", (int)FS_FileSize(host_client->download_file), host_client->download_name);
2992
2993         host_client->download_expectedposition = 0;
2994         host_client->download_started = false;
2995         host_client->sendsignon = true; // make sure this message is sent
2996
2997         // the rest of the download process is handled in SV_SendClientDatagram
2998         // and other code dealing with svc_downloaddata and clc_ackdownloaddata
2999         //
3000         // no svc_downloaddata messages will be sent until sv_startdownload is
3001         // sent by the client
3002 }
3003
3004 /*
3005 ==============================================================================
3006
3007 SERVER SPAWNING
3008
3009 ==============================================================================
3010 */
3011
3012 /*
3013 ================
3014 SV_ModelIndex
3015
3016 ================
3017 */
3018 int SV_ModelIndex(const char *s, int precachemode)
3019 {
3020         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);
3021         char filename[MAX_QPATH];
3022         if (!s || !*s)
3023                 return 0;
3024         // testing
3025         //if (precachemode == 2)
3026         //      return 0;
3027         strlcpy(filename, s, sizeof(filename));
3028         for (i = 2;i < limit;i++)
3029         {
3030                 if (!sv.model_precache[i][0])
3031                 {
3032                         if (precachemode)
3033                         {
3034                                 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))
3035                                 {
3036                                         Con_Printf("SV_ModelIndex(\"%s\"): precache_model can only be done in spawn functions\n", filename);
3037                                         return 0;
3038                                 }
3039                                 if (precachemode == 1)
3040                                         Con_Printf("SV_ModelIndex(\"%s\"): not precached (fix your code), precaching anyway\n", filename);
3041                                 strlcpy(sv.model_precache[i], filename, sizeof(sv.model_precache[i]));
3042                                 if (sv.state == ss_loading)
3043                                 {
3044                                         // running from SV_SpawnServer which is launched from the client console command interpreter
3045                                         sv.models[i] = Mod_ForName (sv.model_precache[i], true, false, s[0] == '*' ? sv.worldname : NULL);
3046                                 }
3047                                 else
3048                                 {
3049                                         if (svs.threaded)
3050                                         {
3051                                                 // 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
3052                                                 sv.models[i] = Mod_FindName (sv.model_precache[i], s[0] == '*' ? sv.worldname : NULL);
3053                                         }
3054                                         else
3055                                         {
3056                                                 // running single threaded, so we can load the model here
3057                                                 sv.models[i] = Mod_ForName (sv.model_precache[i], true, false, s[0] == '*' ? sv.worldname : NULL);
3058                                         }
3059                                         MSG_WriteByte(&sv.reliable_datagram, svc_precache);
3060                                         MSG_WriteShort(&sv.reliable_datagram, i);
3061                                         MSG_WriteString(&sv.reliable_datagram, filename);
3062                                 }
3063                                 return i;
3064                         }
3065                         Con_Printf("SV_ModelIndex(\"%s\"): not precached\n", filename);
3066                         return 0;
3067                 }
3068                 if (!strcmp(sv.model_precache[i], filename))
3069                         return i;
3070         }
3071         Con_Printf("SV_ModelIndex(\"%s\"): i (%i) == MAX_MODELS (%i)\n", filename, i, MAX_MODELS);
3072         return 0;
3073 }
3074
3075 /*
3076 ================
3077 SV_SoundIndex
3078
3079 ================
3080 */
3081 int SV_SoundIndex(const char *s, int precachemode)
3082 {
3083         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);
3084         char filename[MAX_QPATH];
3085         if (!s || !*s)
3086                 return 0;
3087         // testing
3088         //if (precachemode == 2)
3089         //      return 0;
3090         strlcpy(filename, s, sizeof(filename));
3091         for (i = 1;i < limit;i++)
3092         {
3093                 if (!sv.sound_precache[i][0])
3094                 {
3095                         if (precachemode)
3096                         {
3097                                 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))
3098                                 {
3099                                         Con_Printf("SV_SoundIndex(\"%s\"): precache_sound can only be done in spawn functions\n", filename);
3100                                         return 0;
3101                                 }
3102                                 if (precachemode == 1)
3103                                         Con_Printf("SV_SoundIndex(\"%s\"): not precached (fix your code), precaching anyway\n", filename);
3104                                 strlcpy(sv.sound_precache[i], filename, sizeof(sv.sound_precache[i]));
3105                                 if (sv.state != ss_loading)
3106                                 {
3107                                         MSG_WriteByte(&sv.reliable_datagram, svc_precache);
3108                                         MSG_WriteShort(&sv.reliable_datagram, i + 32768);
3109                                         MSG_WriteString(&sv.reliable_datagram, filename);
3110                                 }
3111                                 return i;
3112                         }
3113                         Con_Printf("SV_SoundIndex(\"%s\"): not precached\n", filename);
3114                         return 0;
3115                 }
3116                 if (!strcmp(sv.sound_precache[i], filename))
3117                         return i;
3118         }
3119         Con_Printf("SV_SoundIndex(\"%s\"): i (%i) == MAX_SOUNDS (%i)\n", filename, i, MAX_SOUNDS);
3120         return 0;
3121 }
3122
3123 /*
3124 ================
3125 SV_ParticleEffectIndex
3126
3127 ================
3128 */
3129 int SV_ParticleEffectIndex(const char *name)
3130 {
3131         int i, argc, linenumber, effectnameindex;
3132         int filepass;
3133         fs_offset_t filesize;
3134         unsigned char *filedata;
3135         const char *text;
3136         const char *textstart;
3137         //const char *textend;
3138         char argv[16][1024];
3139         char filename[MAX_QPATH];
3140         if (!sv.particleeffectnamesloaded)
3141         {
3142                 sv.particleeffectnamesloaded = true;
3143                 memset(sv.particleeffectname, 0, sizeof(sv.particleeffectname));
3144                 for (i = 0;i < EFFECT_TOTAL;i++)
3145                         strlcpy(sv.particleeffectname[i], standardeffectnames[i], sizeof(sv.particleeffectname[i]));
3146                 for (filepass = 0;;filepass++)
3147                 {
3148                         if (filepass == 0)
3149                                 dpsnprintf(filename, sizeof(filename), "effectinfo.txt");
3150                         else if (filepass == 1)
3151                                 dpsnprintf(filename, sizeof(filename), "%s_effectinfo.txt", sv.worldnamenoextension);
3152                         else
3153                                 break;
3154                         filedata = FS_LoadFile(filename, tempmempool, true, &filesize);
3155                         if (!filedata)
3156                                 continue;
3157                         textstart = (const char *)filedata;
3158                         //textend = (const char *)filedata + filesize;
3159                         text = textstart;
3160                         for (linenumber = 1;;linenumber++)
3161                         {
3162                                 argc = 0;
3163                                 for (;;)
3164                                 {
3165                                         if (!COM_ParseToken_Simple(&text, true, false, true) || !strcmp(com_token, "\n"))
3166                                                 break;
3167                                         if (argc < 16)
3168                                         {
3169                                                 strlcpy(argv[argc], com_token, sizeof(argv[argc]));
3170                                                 argc++;
3171                                         }
3172                                 }
3173                                 if (com_token[0] == 0)
3174                                         break; // if the loop exited and it's not a \n, it's EOF
3175                                 if (argc < 1)
3176                                         continue;
3177                                 if (!strcmp(argv[0], "effect"))
3178                                 {
3179                                         if (argc == 2)
3180                                         {
3181                                                 for (effectnameindex = 1;effectnameindex < MAX_PARTICLEEFFECTNAME;effectnameindex++)
3182                                                 {
3183                                                         if (sv.particleeffectname[effectnameindex][0])
3184                                                         {
3185                                                                 if (!strcmp(sv.particleeffectname[effectnameindex], argv[1]))
3186                                                                         break;
3187                                                         }
3188                                                         else
3189                                                         {
3190                                                                 strlcpy(sv.particleeffectname[effectnameindex], argv[1], sizeof(sv.particleeffectname[effectnameindex]));
3191                                                                 break;
3192                                                         }
3193                                                 }
3194                                                 // if we run out of names, abort
3195                                                 if (effectnameindex == MAX_PARTICLEEFFECTNAME)
3196                                                 {
3197                                                         Con_Printf("%s:%i: too many effects!\n", filename, linenumber);
3198                                                         break;
3199                                                 }
3200                                         }
3201                                 }
3202                         }
3203                         Mem_Free(filedata);
3204                 }
3205         }
3206         // search for the name
3207         for (effectnameindex = 1;effectnameindex < MAX_PARTICLEEFFECTNAME && sv.particleeffectname[effectnameindex][0];effectnameindex++)
3208                 if (!strcmp(sv.particleeffectname[effectnameindex], name))
3209                         return effectnameindex;
3210         // return 0 if we couldn't find it
3211         return 0;
3212 }
3213
3214 dp_model_t *SV_GetModelByIndex(int modelindex)
3215 {
3216         return (modelindex > 0 && modelindex < MAX_MODELS) ? sv.models[modelindex] : NULL;
3217 }
3218
3219 dp_model_t *SV_GetModelFromEdict(prvm_edict_t *ed)
3220 {
3221         prvm_prog_t *prog = SVVM_prog;
3222         int modelindex;
3223         if (!ed || ed->priv.server->free)
3224                 return NULL;
3225         modelindex = (int)PRVM_serveredictfloat(ed, modelindex);
3226         return (modelindex > 0 && modelindex < MAX_MODELS) ? sv.models[modelindex] : NULL;
3227 }
3228
3229 /*
3230 ================
3231 SV_CreateBaseline
3232
3233 ================
3234 */
3235 static void SV_CreateBaseline (void)
3236 {
3237         prvm_prog_t *prog = SVVM_prog;
3238         int i, entnum, large;
3239         prvm_edict_t *svent;
3240
3241         // LadyHavoc: clear *all* baselines (not just active ones)
3242         for (entnum = 0;entnum < prog->max_edicts;entnum++)
3243         {
3244                 // get the current server version
3245                 svent = PRVM_EDICT_NUM(entnum);
3246
3247                 // LadyHavoc: always clear state values, whether the entity is in use or not
3248                 svent->priv.server->baseline = defaultstate;
3249
3250                 if (svent->priv.server->free)
3251                         continue;
3252                 if (entnum > svs.maxclients && !PRVM_serveredictfloat(svent, modelindex))
3253                         continue;
3254
3255                 // create entity baseline
3256                 VectorCopy (PRVM_serveredictvector(svent, origin), svent->priv.server->baseline.origin);
3257                 VectorCopy (PRVM_serveredictvector(svent, angles), svent->priv.server->baseline.angles);
3258                 svent->priv.server->baseline.frame = (int)PRVM_serveredictfloat(svent, frame);
3259                 svent->priv.server->baseline.skin = (int)PRVM_serveredictfloat(svent, skin);
3260                 if (entnum > 0 && entnum <= svs.maxclients)
3261                 {
3262                         svent->priv.server->baseline.colormap = entnum;
3263                         svent->priv.server->baseline.modelindex = SV_ModelIndex("progs/player.mdl", 1);
3264                 }
3265                 else
3266                 {
3267                         svent->priv.server->baseline.colormap = 0;
3268                         svent->priv.server->baseline.modelindex = (int)PRVM_serveredictfloat(svent, modelindex);
3269                 }
3270
3271                 large = false;
3272                 if (svent->priv.server->baseline.modelindex & 0xFF00 || svent->priv.server->baseline.frame & 0xFF00)
3273                 {
3274                         large = true;
3275                         if (sv.protocol == PROTOCOL_NEHAHRABJP || sv.protocol == PROTOCOL_NEHAHRABJP2 || sv.protocol == PROTOCOL_NEHAHRABJP3)
3276                                 large = false;
3277                 }
3278
3279                 // add to the message
3280                 if (large)
3281                         MSG_WriteByte (&sv.signon, svc_spawnbaseline2);
3282                 else
3283                         MSG_WriteByte (&sv.signon, svc_spawnbaseline);
3284                 MSG_WriteShort (&sv.signon, entnum);
3285
3286                 if (large)
3287                 {
3288                         MSG_WriteShort (&sv.signon, svent->priv.server->baseline.modelindex);
3289                         MSG_WriteShort (&sv.signon, svent->priv.server->baseline.frame);
3290                 }
3291                 else if (sv.protocol == PROTOCOL_NEHAHRABJP || sv.protocol == PROTOCOL_NEHAHRABJP2 || sv.protocol == PROTOCOL_NEHAHRABJP3)
3292                 {
3293                         MSG_WriteShort (&sv.signon, svent->priv.server->baseline.modelindex);
3294                         MSG_WriteByte (&sv.signon, svent->priv.server->baseline.frame);
3295                 }
3296                 else
3297                 {
3298                         MSG_WriteByte (&sv.signon, svent->priv.server->baseline.modelindex);
3299                         MSG_WriteByte (&sv.signon, svent->priv.server->baseline.frame);
3300                 }
3301                 MSG_WriteByte (&sv.signon, svent->priv.server->baseline.colormap);
3302                 MSG_WriteByte (&sv.signon, svent->priv.server->baseline.skin);
3303                 for (i=0 ; i<3 ; i++)
3304                 {
3305                         MSG_WriteCoord(&sv.signon, svent->priv.server->baseline.origin[i], sv.protocol);
3306                         MSG_WriteAngle(&sv.signon, svent->priv.server->baseline.angles[i], sv.protocol);
3307                 }
3308         }
3309 }
3310
3311 /*
3312 ================
3313 SV_Prepare_CSQC
3314
3315 Load csprogs.dat and comperss it so it doesn't need to be
3316 reloaded on request.
3317 ================
3318 */
3319 static void SV_Prepare_CSQC(void)
3320 {
3321         fs_offset_t progsize;
3322
3323         if(svs.csqc_progdata)
3324         {
3325                 Con_DPrintf("Unloading old CSQC data.\n");
3326                 Mem_Free(svs.csqc_progdata);
3327                 if(svs.csqc_progdata_deflated)
3328                         Mem_Free(svs.csqc_progdata_deflated);
3329         }
3330
3331         svs.csqc_progdata = NULL;
3332         svs.csqc_progdata_deflated = NULL;
3333
3334         sv.csqc_progname[0] = 0;
3335         svs.csqc_progdata = FS_LoadFile(csqc_progname.string, sv_mempool, false, &progsize);
3336
3337         if(progsize > 0)
3338         {
3339                 size_t deflated_size;
3340
3341                 sv.csqc_progsize = (int)progsize;
3342                 sv.csqc_progcrc = CRC_Block(svs.csqc_progdata, progsize);
3343                 strlcpy(sv.csqc_progname, csqc_progname.string, sizeof(sv.csqc_progname));
3344                 Con_DPrintf("server detected csqc progs file \"%s\" with size %i and crc %i\n", sv.csqc_progname, sv.csqc_progsize, sv.csqc_progcrc);
3345
3346                 Con_DPrint("Compressing csprogs.dat\n");
3347                 //unsigned char *FS_Deflate(const unsigned char *data, size_t size, size_t *deflated_size, int level, mempool_t *mempool);
3348                 svs.csqc_progdata_deflated = FS_Deflate(svs.csqc_progdata, progsize, &deflated_size, -1, sv_mempool);
3349                 svs.csqc_progsize_deflated = (int)deflated_size;
3350                 if(svs.csqc_progdata_deflated)
3351                 {
3352                         Con_DPrintf("Deflated: %g%%\n", 100.0 - 100.0 * (deflated_size / (float)progsize));
3353                         Con_DPrintf("Uncompressed: %u\nCompressed:   %u\n", (unsigned)sv.csqc_progsize, (unsigned)svs.csqc_progsize_deflated);
3354                 }
3355                 else
3356                         Con_DPrintf("Cannot compress - need zlib for this. Using uncompressed progs only.\n");
3357         }
3358 }
3359
3360 /*
3361 ================
3362 SV_SaveSpawnparms
3363
3364 Grabs the current state of each client for saving across the
3365 transition to another level
3366 ================
3367 */
3368 void SV_SaveSpawnparms (void)
3369 {
3370         prvm_prog_t *prog = SVVM_prog;
3371         int             i, j;
3372
3373         svs.serverflags = (int)PRVM_serverglobalfloat(serverflags);
3374
3375         for (i = 0, host_client = svs.clients;i < svs.maxclients;i++, host_client++)
3376         {
3377                 if (!host_client->active)
3378                         continue;
3379
3380         // call the progs to get default spawn parms for the new client
3381                 PRVM_serverglobalfloat(time) = sv.time;
3382                 PRVM_serverglobaledict(self) = PRVM_EDICT_TO_PROG(host_client->edict);
3383                 prog->ExecuteProgram(prog, PRVM_serverfunction(SetChangeParms), "QC function SetChangeParms is missing");
3384                 for (j=0 ; j<NUM_SPAWN_PARMS ; j++)
3385                         host_client->spawn_parms[j] = (&PRVM_serverglobalfloat(parm1))[j];
3386         }
3387 }
3388
3389 /*
3390 ================
3391 SV_SpawnServer
3392
3393 This is called at the start of each level
3394 ================
3395 */
3396
3397 void SV_SpawnServer (const char *map)
3398 {
3399         prvm_prog_t *prog = SVVM_prog;
3400         prvm_edict_t *ent;
3401         int i;
3402         char *entities;
3403         dp_model_t *worldmodel;
3404         char modelname[sizeof(sv.worldname)];
3405         char vabuf[1024];
3406
3407         Con_Printf("SpawnServer: %s\n", map);
3408
3409         dpsnprintf (modelname, sizeof(modelname), "maps/%s.bsp", map);
3410
3411         if (!FS_FileExists(modelname))
3412         {
3413                 dpsnprintf (modelname, sizeof(modelname), "maps/%s", map);
3414                 if (!FS_FileExists(modelname))
3415                 {
3416                         Con_Printf("SpawnServer: no map file named maps/%s.bsp\n", map);
3417                         return;
3418                 }
3419         }
3420
3421 //      SV_LockThreadMutex();
3422
3423         if(cls.state == ca_dedicated)
3424                 Sys_MakeProcessNice();
3425
3426         if (cls.state != ca_dedicated)
3427         {
3428                 SCR_BeginLoadingPlaque(false);
3429                 S_StopAllSounds();
3430         }
3431
3432         if(sv.active)
3433         {
3434                 client_t *client;
3435                 for (i = 0, client = svs.clients;i < svs.maxclients;i++, client++)
3436                 {
3437                         if (client->netconnection)
3438                         {
3439                                 MSG_WriteByte(&client->netconnection->message, svc_stufftext);
3440                                 MSG_WriteString(&client->netconnection->message, "reconnect\n");
3441                         }
3442                 }
3443                 World_End(&sv.world);
3444                 if(PRVM_serverfunction(SV_Shutdown))
3445                 {
3446                         func_t s = PRVM_serverfunction(SV_Shutdown);
3447                         PRVM_serverglobalfloat(time) = sv.time;
3448                         PRVM_serverfunction(SV_Shutdown) = 0; // prevent it from getting called again
3449                         prog->ExecuteProgram(prog, s,"SV_Shutdown() required");
3450                 }
3451         }
3452
3453         // free q3 shaders so that any newly downloaded shaders will be active
3454         Mod_FreeQ3Shaders();
3455
3456         worldmodel = Mod_ForName(modelname, false, developer.integer > 0, NULL);
3457         if (!worldmodel || !worldmodel->TraceBox)
3458         {
3459                 Con_Printf("Couldn't load map %s\n", modelname);
3460
3461                 if(cls.state == ca_dedicated)
3462                         Sys_MakeProcessMean();
3463
3464 //              SV_UnlockThreadMutex();
3465
3466                 return;
3467         }
3468
3469         Collision_Cache_Reset(true);
3470
3471         // let's not have any servers with no name
3472         if (hostname.string[0] == 0)
3473                 Cvar_SetQuick(&hostname, "UNNAMED");
3474         scr_centertime_off = 0;
3475
3476         svs.changelevel_issued = false;         // now safe to issue another
3477
3478         // make the map a required file for clients
3479         Curl_ClearRequirements();
3480         Curl_RequireFile(modelname);
3481
3482 //
3483 // tell all connected clients that we are going to a new level
3484 //
3485         if (!sv.active)
3486                 NetConn_OpenServerPorts(true);
3487
3488 //
3489 // make cvars consistant
3490 //
3491         if (coop.integer)
3492                 Cvar_SetValueQuick(&deathmatch, 0);
3493         // LadyHavoc: it can be useful to have skills outside the range 0-3...
3494         //current_skill = bound(0, (int)(skill.value + 0.5), 3);
3495         //Cvar_SetValue ("skill", (float)current_skill);
3496         current_skill = (int)(skill.value + 0.5);
3497
3498 //
3499 // set up the new server
3500 //
3501         memset (&sv, 0, sizeof(sv));
3502         // if running a local client, make sure it doesn't try to access the last
3503         // level's data which is no longer valiud
3504         cls.signon = 0;
3505
3506         Cvar_SetValueQuick(&halflifebsp, worldmodel->brush.ishlbsp);
3507         Cvar_SetValueQuick(&sv_mapformat_is_quake2, worldmodel->brush.isq2bsp);
3508         Cvar_SetValueQuick(&sv_mapformat_is_quake3, worldmodel->brush.isq3bsp);
3509
3510         if(*sv_random_seed.string)
3511         {
3512                 srand(sv_random_seed.integer);
3513                 Con_Printf(CON_WARN "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);
3514         }
3515
3516         SV_VM_Setup();
3517
3518         sv.active = true;
3519
3520         // set level base name variables for later use
3521         strlcpy (sv.name, map, sizeof (sv.name));
3522         strlcpy(sv.worldname, modelname, sizeof(sv.worldname));
3523         FS_StripExtension(sv.worldname, sv.worldnamenoextension, sizeof(sv.worldnamenoextension));
3524         strlcpy(sv.worldbasename, !strncmp(sv.worldnamenoextension, "maps/", 5) ? sv.worldnamenoextension + 5 : sv.worldnamenoextension, sizeof(sv.worldbasename));
3525         //Cvar_SetQuick(&sv_worldmessage, sv.worldmessage); // set later after QC is spawned
3526         Cvar_SetQuick(&sv_worldname, sv.worldname);
3527         Cvar_SetQuick(&sv_worldnamenoextension, sv.worldnamenoextension);
3528         Cvar_SetQuick(&sv_worldbasename, sv.worldbasename);
3529
3530         sv.protocol = Protocol_EnumForName(sv_protocolname.string);
3531         if (sv.protocol == PROTOCOL_UNKNOWN)
3532         {
3533                 char buffer[1024];
3534                 Protocol_Names(buffer, sizeof(buffer));
3535                 Con_Printf(CON_ERROR "Unknown sv_protocolname \"%s\", valid values are:\n%s\n", sv_protocolname.string, buffer);
3536                 sv.protocol = PROTOCOL_QUAKE;
3537         }
3538
3539 // load progs to get entity field count
3540         //PR_LoadProgs ( sv_progs.string );
3541
3542         sv.datagram.maxsize = sizeof(sv.datagram_buf);
3543         sv.datagram.cursize = 0;
3544         sv.datagram.data = sv.datagram_buf;
3545
3546         sv.reliable_datagram.maxsize = sizeof(sv.reliable_datagram_buf);
3547         sv.reliable_datagram.cursize = 0;
3548         sv.reliable_datagram.data = sv.reliable_datagram_buf;
3549
3550         sv.signon.maxsize = sizeof(sv.signon_buf);
3551         sv.signon.cursize = 0;
3552         sv.signon.data = sv.signon_buf;
3553
3554 // leave slots at start for clients only
3555         //prog->num_edicts = svs.maxclients+1;
3556
3557         sv.state = ss_loading;
3558         prog->allowworldwrites = true;
3559         sv.paused = false;
3560
3561         sv.time = 1.0;
3562
3563         Mod_ClearUsed();
3564         worldmodel->used = true;
3565
3566         sv.worldmodel = worldmodel;
3567         sv.models[1] = sv.worldmodel;
3568
3569 //
3570 // clear world interaction links
3571 //
3572         World_SetSize(&sv.world, sv.worldname, sv.worldmodel->normalmins, sv.worldmodel->normalmaxs, prog);
3573         World_Start(&sv.world);
3574
3575         strlcpy(sv.sound_precache[0], "", sizeof(sv.sound_precache[0]));
3576
3577         strlcpy(sv.model_precache[0], "", sizeof(sv.model_precache[0]));
3578         strlcpy(sv.model_precache[1], sv.worldname, sizeof(sv.model_precache[1]));
3579         for (i = 1;i < sv.worldmodel->brush.numsubmodels && i+1 < MAX_MODELS;i++)
3580         {
3581                 dpsnprintf(sv.model_precache[i+1], sizeof(sv.model_precache[i+1]), "*%i", i);
3582                 sv.models[i+1] = Mod_ForName (sv.model_precache[i+1], false, false, sv.worldname);
3583         }
3584         if(i < sv.worldmodel->brush.numsubmodels)
3585                 Con_Printf("Too many submodels (MAX_MODELS is %i)\n", MAX_MODELS);
3586
3587 //
3588 // load the rest of the entities
3589 //
3590         // AK possible hack since num_edicts is still 0
3591         ent = PRVM_EDICT_NUM(0);
3592         memset (ent->fields.fp, 0, prog->entityfields * sizeof(prvm_vec_t));
3593         ent->priv.server->free = false;
3594         PRVM_serveredictstring(ent, model) = PRVM_SetEngineString(prog, sv.worldname);
3595         PRVM_serveredictfloat(ent, modelindex) = 1;             // world model
3596         PRVM_serveredictfloat(ent, solid) = SOLID_BSP;
3597         PRVM_serveredictfloat(ent, movetype) = MOVETYPE_PUSH;
3598         VectorCopy(sv.world.mins, PRVM_serveredictvector(ent, mins));
3599         VectorCopy(sv.world.maxs, PRVM_serveredictvector(ent, maxs));
3600         VectorCopy(sv.world.mins, PRVM_serveredictvector(ent, absmin));
3601         VectorCopy(sv.world.maxs, PRVM_serveredictvector(ent, absmax));
3602
3603         if (coop.value)
3604                 PRVM_serverglobalfloat(coop) = coop.integer;
3605         else
3606                 PRVM_serverglobalfloat(deathmatch) = deathmatch.integer;
3607
3608         PRVM_serverglobalstring(mapname) = PRVM_SetEngineString(prog, sv.name);
3609
3610 // serverflags are for cross level information (sigils)
3611         PRVM_serverglobalfloat(serverflags) = svs.serverflags;
3612
3613         // we need to reset the spawned flag on all connected clients here so that
3614         // their thinks don't run during startup (before PutClientInServer)
3615         // we also need to set up the client entities now
3616         // and we need to set the ->edict pointers to point into the progs edicts
3617         for (i = 0, host_client = svs.clients;i < svs.maxclients;i++, host_client++)
3618         {
3619                 host_client->begun = false;
3620                 host_client->edict = PRVM_EDICT_NUM(i + 1);
3621                 PRVM_ED_ClearEdict(prog, host_client->edict);
3622         }
3623
3624         // load replacement entity file if found
3625         if (sv_entpatch.integer && (entities = (char *)FS_LoadFile(va(vabuf, sizeof(vabuf), "%s.ent", sv.worldnamenoextension), tempmempool, true, NULL)))
3626         {
3627                 Con_Printf("Loaded %s.ent\n", sv.worldnamenoextension);
3628                 PRVM_ED_LoadFromFile(prog, entities);
3629                 Mem_Free(entities);
3630         }
3631         else
3632                 PRVM_ED_LoadFromFile(prog, sv.worldmodel->brush.entities);
3633
3634
3635         // LadyHavoc: clear world angles (to fix e3m3.bsp)
3636         VectorClear(PRVM_serveredictvector(prog->edicts, angles));
3637
3638 // all setup is completed, any further precache statements are errors
3639 //      sv.state = ss_active; // LadyHavoc: workaround for svc_precache bug
3640         prog->allowworldwrites = false;
3641
3642 // run two frames to allow everything to settle
3643         sv.time = 1.0001;
3644         for (i = 0;i < sv_init_frame_count.integer;i++)
3645         {
3646                 sv.frametime = 0.1;
3647                 SV_Physics ();
3648         }
3649
3650         // Once all init frames have been run, we consider svqc code fully initialized.
3651         prog->inittime = host.realtime;
3652
3653         if (cls.state == ca_dedicated)
3654                 Mod_PurgeUnused();
3655
3656 // create a baseline for more efficient communications
3657         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)
3658                 SV_CreateBaseline ();
3659
3660         sv.state = ss_active; // LadyHavoc: workaround for svc_precache bug
3661
3662 // send serverinfo to all connected clients, and set up botclients coming back from a level change
3663         for (i = 0, host_client = svs.clients;i < svs.maxclients;i++, host_client++)
3664         {
3665                 host_client->clientconnectcalled = false; // do NOT call ClientDisconnect if he drops before ClientConnect!
3666                 if (!host_client->active)
3667                         continue;
3668                 if (host_client->netconnection)
3669                         SV_SendServerinfo(host_client);
3670                 else
3671                 {
3672                         int j;
3673                         // if client is a botclient coming from a level change, we need to
3674                         // set up client info that normally requires networking
3675
3676                         // copy spawn parms out of the client_t
3677                         for (j=0 ; j< NUM_SPAWN_PARMS ; j++)
3678                                 (&PRVM_serverglobalfloat(parm1))[j] = host_client->spawn_parms[j];
3679
3680                         // call the spawn function
3681                         host_client->clientconnectcalled = true;
3682                         PRVM_serverglobalfloat(time) = sv.time;
3683                         PRVM_serverglobaledict(self) = PRVM_EDICT_TO_PROG(host_client->edict);
3684                         prog->ExecuteProgram(prog, PRVM_serverfunction(ClientConnect), "QC function ClientConnect is missing");
3685                         prog->ExecuteProgram(prog, PRVM_serverfunction(PutClientInServer), "QC function PutClientInServer is missing");
3686                         host_client->begun = true;
3687                 }
3688         }
3689
3690         // update the map title cvar
3691         strlcpy(sv.worldmessage, PRVM_GetString(prog, PRVM_serveredictstring(prog->edicts, message)), sizeof(sv.worldmessage)); // map title (not related to filename)
3692         Cvar_SetQuick(&sv_worldmessage, sv.worldmessage);
3693
3694         Con_Printf("Server spawned.\n");
3695         NetConn_Heartbeat (2);
3696
3697         if(cls.state == ca_dedicated)
3698                 Sys_MakeProcessMean();
3699
3700 //      SV_UnlockThreadMutex();
3701 }
3702
3703 /*
3704 ==================
3705 SV_Shutdown
3706
3707 This only happens at the end of a game, not between levels
3708 ==================
3709 */
3710 void SV_Shutdown(void)
3711 {
3712         prvm_prog_t *prog = SVVM_prog;
3713         int i;
3714
3715         Con_DPrintf("SV_Shutdown\n");
3716
3717         if (!sv.active)
3718                 return;
3719
3720         NetConn_Heartbeat(2);
3721         NetConn_Heartbeat(2);
3722
3723 // make sure all the clients know we're disconnecting
3724         World_End(&sv.world);
3725         if(prog->loaded)
3726         {
3727                 if(PRVM_serverfunction(SV_Shutdown))
3728                 {
3729                         func_t s = PRVM_serverfunction(SV_Shutdown);
3730                         PRVM_serverglobalfloat(time) = sv.time;
3731                         PRVM_serverfunction(SV_Shutdown) = 0; // prevent it from getting called again
3732                         prog->ExecuteProgram(prog, s,"SV_Shutdown() required");
3733                 }
3734         }
3735         for (i = 0, host_client = svs.clients;i < svs.maxclients;i++, host_client++)
3736                 if (host_client->active)
3737                         SV_DropClient(false); // server shutdown
3738
3739         NetConn_CloseServerPorts();
3740
3741         sv.active = false;
3742 //
3743 // clear structures
3744 //
3745         memset(&sv, 0, sizeof(sv));
3746         memset(svs.clients, 0, svs.maxclients*sizeof(client_t));
3747
3748         cl.islocalgame = false;
3749 }
3750
3751 /////////////////////////////////////////////////////
3752 // SV VM stuff
3753
3754 static void SVVM_begin_increase_edicts(prvm_prog_t *prog)
3755 {
3756         // links don't survive the transition, so unlink everything
3757         World_UnlinkAll(&sv.world);
3758 }
3759
3760 static void SVVM_end_increase_edicts(prvm_prog_t *prog)
3761 {
3762         int i;
3763         prvm_edict_t *ent;
3764
3765         // link every entity except world
3766         for (i = 1, ent = prog->edicts;i < prog->num_edicts;i++, ent++)
3767                 if (!ent->priv.server->free && !VectorCompare(PRVM_serveredictvector(ent, absmin), PRVM_serveredictvector(ent, absmax)))
3768                         SV_LinkEdict(ent);
3769 }
3770
3771 static void SVVM_init_edict(prvm_prog_t *prog, prvm_edict_t *e)
3772 {
3773         // LadyHavoc: for consistency set these here
3774         int num = PRVM_NUM_FOR_EDICT(e) - 1;
3775
3776         e->priv.server->move = false; // don't move on first frame
3777
3778         if (num >= 0 && num < svs.maxclients)
3779         {
3780                 // set colormap and team on newly created player entity
3781                 PRVM_serveredictfloat(e, colormap) = num + 1;
3782                 PRVM_serveredictfloat(e, team) = (svs.clients[num].colors & 15) + 1;
3783                 // set netname/clientcolors back to client values so that
3784                 // DP_SV_CLIENTNAME and DP_SV_CLIENTCOLORS will not immediately
3785                 // reset them
3786                 PRVM_serveredictstring(e, netname) = PRVM_SetEngineString(prog, svs.clients[num].name);
3787                 PRVM_serveredictfloat(e, clientcolors) = svs.clients[num].colors;
3788                 // NEXUIZ_PLAYERMODEL and NEXUIZ_PLAYERSKIN
3789                 PRVM_serveredictstring(e, playermodel) = PRVM_SetEngineString(prog, svs.clients[num].playermodel);
3790                 PRVM_serveredictstring(e, playerskin) = PRVM_SetEngineString(prog, svs.clients[num].playerskin);
3791                 // Assign netaddress (IP Address, etc)
3792                 if(svs.clients[num].netconnection != NULL)
3793                 {
3794                         // Acquire Readable Address
3795                         LHNETADDRESS_ToString(&svs.clients[num].netconnection->peeraddress, svs.clients[num].netaddress, sizeof(svs.clients[num].netaddress), false);
3796                         PRVM_serveredictstring(e, netaddress) = PRVM_SetEngineString(prog, svs.clients[num].netaddress);
3797                 }
3798                 else
3799                         PRVM_serveredictstring(e, netaddress) = PRVM_SetEngineString(prog, "null/botclient");
3800                 if(svs.clients[num].netconnection != NULL && svs.clients[num].netconnection->crypto.authenticated && svs.clients[num].netconnection->crypto.client_idfp[0])
3801                         PRVM_serveredictstring(e, crypto_idfp) = PRVM_SetEngineString(prog, svs.clients[num].netconnection->crypto.client_idfp);
3802                 else
3803                         PRVM_serveredictstring(e, crypto_idfp) = 0;
3804                 PRVM_serveredictfloat(e, crypto_idfp_signed) = (svs.clients[num].netconnection != NULL && svs.clients[num].netconnection->crypto.authenticated && svs.clients[num].netconnection->crypto.client_issigned);
3805                 if(svs.clients[num].netconnection != NULL && svs.clients[num].netconnection->crypto.authenticated && svs.clients[num].netconnection->crypto.client_keyfp[0])
3806                         PRVM_serveredictstring(e, crypto_keyfp) = PRVM_SetEngineString(prog, svs.clients[num].netconnection->crypto.client_keyfp);
3807                 else
3808                         PRVM_serveredictstring(e, crypto_keyfp) = 0;
3809                 if(svs.clients[num].netconnection != NULL && svs.clients[num].netconnection->crypto.authenticated && svs.clients[num].netconnection->crypto.server_keyfp[0])
3810                         PRVM_serveredictstring(e, crypto_mykeyfp) = PRVM_SetEngineString(prog, svs.clients[num].netconnection->crypto.server_keyfp);
3811                 else
3812                         PRVM_serveredictstring(e, crypto_mykeyfp) = 0;
3813                 if(svs.clients[num].netconnection != NULL && svs.clients[num].netconnection->crypto.authenticated && svs.clients[num].netconnection->crypto.use_aes)
3814                         PRVM_serveredictstring(e, crypto_encryptmethod) = PRVM_SetEngineString(prog, "AES128");
3815                 else
3816                         PRVM_serveredictstring(e, crypto_encryptmethod) = 0;
3817                 if(svs.clients[num].netconnection != NULL && svs.clients[num].netconnection->crypto.authenticated)
3818                         PRVM_serveredictstring(e, crypto_signmethod) = PRVM_SetEngineString(prog, "HMAC-SHA256");
3819                 else
3820                         PRVM_serveredictstring(e, crypto_signmethod) = 0;
3821         }
3822 }
3823
3824 static void SVVM_free_edict(prvm_prog_t *prog, prvm_edict_t *ed)
3825 {
3826         int i;
3827         int e;
3828
3829         World_UnlinkEdict(ed);          // unlink from world bsp
3830
3831         PRVM_serveredictstring(ed, model) = 0;
3832         PRVM_serveredictfloat(ed, takedamage) = 0;
3833         PRVM_serveredictfloat(ed, modelindex) = 0;
3834         PRVM_serveredictfloat(ed, colormap) = 0;
3835         PRVM_serveredictfloat(ed, skin) = 0;
3836         PRVM_serveredictfloat(ed, frame) = 0;
3837         VectorClear(PRVM_serveredictvector(ed, origin));
3838         VectorClear(PRVM_serveredictvector(ed, angles));
3839         PRVM_serveredictfloat(ed, nextthink) = -1;
3840         PRVM_serveredictfloat(ed, solid) = 0;
3841
3842         VM_RemoveEdictSkeleton(prog, ed);
3843         World_Physics_RemoveFromEntity(&sv.world, ed);
3844         World_Physics_RemoveJointFromEntity(&sv.world, ed);
3845
3846         // make sure csqc networking is aware of the removed entity
3847         e = PRVM_NUM_FOR_EDICT(ed);
3848         sv.csqcentityversion[e] = 0;
3849         for (i = 0;i < svs.maxclients;i++)
3850                 svs.clients[i].csqcentitysendflags[e] = 0xFFFFFF;
3851 }
3852
3853 static void SVVM_count_edicts(prvm_prog_t *prog)
3854 {
3855         int             i;
3856         prvm_edict_t    *ent;
3857         int             active, models, solid, step;
3858
3859         active = models = solid = step = 0;
3860         for (i=0 ; i<prog->num_edicts ; i++)
3861         {
3862                 ent = PRVM_EDICT_NUM(i);
3863                 if (ent->priv.server->free)
3864                         continue;
3865                 active++;
3866                 if (PRVM_serveredictfloat(ent, solid))
3867                         solid++;
3868                 if (PRVM_serveredictstring(ent, model))
3869                         models++;
3870                 if (PRVM_serveredictfloat(ent, movetype) == MOVETYPE_STEP)
3871                         step++;
3872         }
3873
3874         Con_Printf("num_edicts:%3i\n", prog->num_edicts);
3875         Con_Printf("active    :%3i\n", active);
3876         Con_Printf("view      :%3i\n", models);
3877         Con_Printf("touch     :%3i\n", solid);
3878         Con_Printf("step      :%3i\n", step);
3879 }
3880
3881 static qboolean SVVM_load_edict(prvm_prog_t *prog, prvm_edict_t *ent)
3882 {
3883         // remove things from different skill levels or deathmatch
3884         if (gamemode != GAME_TRANSFUSION) //Transfusion does this in QC
3885         {
3886                 if (deathmatch.integer)
3887                 {
3888                         if (((int)PRVM_serveredictfloat(ent, spawnflags) & SPAWNFLAG_NOT_DEATHMATCH))
3889                         {
3890                                 return false;
3891                         }
3892                 }
3893                 else if ((current_skill <= 0 && ((int)PRVM_serveredictfloat(ent, spawnflags) & SPAWNFLAG_NOT_EASY  ))
3894                         || (current_skill == 1 && ((int)PRVM_serveredictfloat(ent, spawnflags) & SPAWNFLAG_NOT_MEDIUM))
3895                         || (current_skill >= 2 && ((int)PRVM_serveredictfloat(ent, spawnflags) & SPAWNFLAG_NOT_HARD  )))
3896                 {
3897                         return false;
3898                 }
3899         }
3900         return true;
3901 }
3902
3903 static void SV_VM_Setup(void)
3904 {
3905         prvm_prog_t *prog = SVVM_prog;
3906         PRVM_Prog_Init(prog, &cmd_server);
3907
3908         // allocate the mempools
3909         // TODO: move the magic numbers/constants into #defines [9/13/2006 Black]
3910         prog->progs_mempool = Mem_AllocPool("Server Progs", 0, NULL);
3911         prog->builtins = vm_sv_builtins;
3912         prog->numbuiltins = vm_sv_numbuiltins;
3913         prog->max_edicts = 512;
3914         if (sv.protocol == PROTOCOL_QUAKE)
3915                 prog->limit_edicts = 640; // before quake mission pack 1 this was 512
3916         else if (sv.protocol == PROTOCOL_QUAKEDP)
3917                 prog->limit_edicts = 2048; // guessing
3918         else if (sv.protocol == PROTOCOL_NEHAHRAMOVIE)
3919                 prog->limit_edicts = 2048; // guessing!
3920         else if (sv.protocol == PROTOCOL_NEHAHRABJP || sv.protocol == PROTOCOL_NEHAHRABJP2 || sv.protocol == PROTOCOL_NEHAHRABJP3)
3921                 prog->limit_edicts = 4096; // guessing!
3922         else
3923                 prog->limit_edicts = MAX_EDICTS;
3924         prog->reserved_edicts = svs.maxclients;
3925         prog->edictprivate_size = sizeof(edict_engineprivate_t);
3926         prog->name = "server";
3927         prog->extensionstring = vm_sv_extensions;
3928         prog->loadintoworld = true;
3929
3930         // all callbacks must be defined (pointers are not checked before calling)
3931         prog->begin_increase_edicts = SVVM_begin_increase_edicts;
3932         prog->end_increase_edicts   = SVVM_end_increase_edicts;
3933         prog->init_edict            = SVVM_init_edict;
3934         prog->free_edict            = SVVM_free_edict;
3935         prog->count_edicts          = SVVM_count_edicts;
3936         prog->load_edict            = SVVM_load_edict;
3937         prog->init_cmd              = SVVM_init_cmd;
3938         prog->reset_cmd             = SVVM_reset_cmd;
3939         prog->error_cmd             = Host_Error;
3940         prog->ExecuteProgram        = SVVM_ExecuteProgram;
3941
3942         PRVM_Prog_Load(prog, sv_progs.string, NULL, 0, SV_REQFUNCS, sv_reqfuncs, SV_REQFIELDS, sv_reqfields, SV_REQGLOBALS, sv_reqglobals);
3943
3944         // some mods compiled with scrambling compilers lack certain critical
3945         // global names and field names such as "self" and "time" and "nextthink"
3946         // so we have to set these offsets manually, matching the entvars_t
3947         // but we only do this if the prog header crc matches, otherwise it's totally freeform
3948         if (prog->progs_crc == PROGHEADER_CRC || prog->progs_crc == PROGHEADER_CRC_TENEBRAE)
3949         {
3950                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, modelindex);
3951                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, absmin);
3952                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, absmax);
3953                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, ltime);
3954                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, movetype);
3955                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, solid);
3956                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, origin);
3957                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, oldorigin);
3958                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, velocity);
3959                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, angles);
3960                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, avelocity);
3961                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, punchangle);
3962                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, classname);
3963                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, model);
3964                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, frame);
3965                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, skin);
3966                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, effects);
3967                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, mins);
3968                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, maxs);
3969                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, size);
3970                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, touch);
3971                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, use);
3972                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, think);
3973                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, blocked);
3974                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, nextthink);
3975                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, groundentity);
3976                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, health);
3977                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, frags);
3978                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, weapon);
3979                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, weaponmodel);
3980                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, weaponframe);
3981                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, currentammo);
3982                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, ammo_shells);
3983                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, ammo_nails);
3984                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, ammo_rockets);
3985                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, ammo_cells);
3986                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, items);
3987                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, takedamage);
3988                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, chain);
3989                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, deadflag);
3990                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, view_ofs);
3991                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, button0);
3992                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, button1);
3993                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, button2);
3994                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, impulse);
3995                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, fixangle);
3996                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, v_angle);
3997                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, idealpitch);
3998                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, netname);
3999                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, enemy);
4000                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, flags);
4001                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, colormap);
4002                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, team);
4003                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, max_health);
4004                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, teleport_time);
4005                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, armortype);
4006                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, armorvalue);
4007                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, waterlevel);
4008                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, watertype);
4009                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, ideal_yaw);
4010                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, yaw_speed);
4011                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, aiment);
4012                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, goalentity);
4013                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, spawnflags);
4014                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, target);
4015                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, targetname);
4016                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, dmg_take);
4017                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, dmg_save);
4018                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, dmg_inflictor);
4019                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, owner);
4020                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, movedir);
4021                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, message);
4022                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, sounds);
4023                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, noise);
4024                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, noise1);
4025                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, noise2);
4026                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, noise3);
4027                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, self);
4028                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, other);
4029                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, world);
4030                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, time);
4031                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, frametime);
4032                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, force_retouch);
4033                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, mapname);
4034                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, deathmatch);
4035                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, coop);
4036                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, teamplay);
4037                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, serverflags);
4038                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, total_secrets);
4039                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, total_monsters);
4040                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, found_secrets);
4041                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, killed_monsters);
4042                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, parm1);
4043                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, parm2);
4044                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, parm3);
4045                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, parm4);
4046                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, parm5);
4047                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, parm6);
4048                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, parm7);
4049                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, parm8);
4050                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, parm9);
4051                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, parm10);
4052                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, parm11);
4053                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, parm12);
4054                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, parm13);
4055                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, parm14);
4056                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, parm15);
4057                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, parm16);
4058                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, v_forward);
4059                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, v_up);
4060                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, v_right);
4061                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, trace_allsolid);
4062                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, trace_startsolid);
4063                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, trace_fraction);
4064                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, trace_endpos);
4065                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, trace_plane_normal);
4066                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, trace_plane_dist);
4067                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, trace_ent);
4068                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, trace_inopen);
4069                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, trace_inwater);
4070                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, msg_entity);
4071 //              PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, main);
4072 //              PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, StartFrame);
4073 //              PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, PlayerPreThink);
4074 //              PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, PlayerPostThink);
4075 //              PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, ClientKill);
4076 //              PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, ClientConnect);
4077 //              PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, PutClientInServer);
4078 //              PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, ClientDisconnect);
4079 //              PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, SetNewParms);
4080 //              PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, SetChangeParms);
4081         }
4082         else
4083                 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);
4084
4085         // OP_STATE is always supported on server because we add fields/globals for it
4086         prog->flag |= PRVM_OP_STATE;
4087
4088         VM_CustomStats_Clear();//[515]: csqc
4089
4090         SV_Prepare_CSQC();
4091 }
4092
4093 extern cvar_t host_maxwait;
4094 extern cvar_t host_framerate;
4095 extern cvar_t cl_maxphysicsframesperserverframe;
4096 double SV_Frame(double time)
4097 {
4098         static double sv_timer;
4099         int i;
4100         char vabuf[1024];
4101         qboolean playing = false;
4102
4103         if (!svs.threaded)
4104         {
4105                 svs.perf_acc_sleeptime = host.sleeptime;
4106                 svs.perf_acc_realtime += time;
4107
4108                 // Look for clients who have spawned
4109                 for (i = 0, host_client = svs.clients; i < svs.maxclients; i++, host_client++)
4110                         if(host_client->begun && host_client->netconnection)
4111                                 playing = true;
4112
4113                 if(svs.perf_acc_realtime > 5)
4114                 {
4115                         svs.perf_cpuload = 1 - svs.perf_acc_sleeptime / svs.perf_acc_realtime;
4116                         svs.perf_lost = svs.perf_acc_lost / svs.perf_acc_realtime;
4117
4118                         if(svs.perf_acc_offset_samples > 0)
4119                         {
4120                                 svs.perf_offset_max = svs.perf_acc_offset_max;
4121                                 svs.perf_offset_avg = svs.perf_acc_offset / svs.perf_acc_offset_samples;
4122                                 svs.perf_offset_sdev = sqrt(svs.perf_acc_offset_squared / svs.perf_acc_offset_samples - svs.perf_offset_avg * svs.perf_offset_avg);
4123                         }
4124
4125                         if(svs.perf_lost > 0 && developer_extra.integer && playing) // only complain if anyone is looking
4126                                 Con_DPrintf("Server can't keep up: %s\n", Host_TimingReport(vabuf, sizeof(vabuf)));
4127                 }
4128
4129                 if(svs.perf_acc_realtime > 5 || sv.time < 10)
4130                 {
4131                         /*
4132                          * Don't accumulate time for the first 10 seconds of a match
4133                          * so things can settle
4134                          */
4135                         svs.perf_acc_realtime = svs.perf_acc_sleeptime =
4136                         svs.perf_acc_lost = svs.perf_acc_offset =
4137                         svs.perf_acc_offset_squared = svs.perf_acc_offset_max =
4138                         svs.perf_acc_offset_samples = host.sleeptime = 0;
4139                 }
4140
4141                 /*
4142                  * Receive packets on each main loop iteration, as the main loop may
4143                  * be undersleeping due to select() detecting a new packet
4144                  */
4145                 if (sv.active)
4146                         NetConn_ServerFrame();
4147         }
4148
4149         /*
4150          * If the accumulator hasn't become positive, don't
4151          * run the frame. Everything that happens before this
4152          * point will happen even if we're sleeping this frame.
4153          */
4154         if((sv_timer += time) < 0)
4155                 return sv_timer;
4156
4157         // limit the frametime steps to no more than 100ms each
4158         if (sv_timer > 0.1)
4159         {
4160                 if (!svs.threaded)
4161                         svs.perf_acc_lost += (sv_timer - 0.1);
4162                 sv_timer = 0.1;
4163         }
4164
4165         if (sv.active && sv_timer > 0 && !svs.threaded)
4166         {
4167                 /*
4168                  * Execute one or more server frames, with an upper limit on how much
4169                  * execution time to spend on server frames to avoid freezing the game if
4170                  * the server is overloaded. This execution time limit means the game will
4171                  * slow down if the server is taking too long.
4172                  */
4173                 int framecount, framelimit = 1;
4174                 double advancetime, aborttime = 0;
4175                 float offset;
4176                 prvm_prog_t *prog = SVVM_prog;
4177
4178                 // run the world state
4179                 // don't allow simulation to run too fast or too slow or logic glitches can occur
4180
4181                 // stop running server frames if the wall time reaches this value
4182                 if (sys_ticrate.value <= 0)
4183                         advancetime = sv_timer;
4184                 else
4185                 {
4186                         advancetime = sys_ticrate.value;
4187                         // listen servers can run multiple server frames per client frame
4188                         framelimit = cl_maxphysicsframesperserverframe.integer;
4189                         aborttime = Sys_DirtyTime() + 0.1;
4190                 }
4191
4192                 if(host_timescale.value > 0 && host_timescale.value < 1)
4193                         advancetime = min(advancetime, 0.1 / host_timescale.value);
4194                 else
4195                         advancetime = min(advancetime, 0.1);
4196
4197                 if(advancetime > 0)
4198                 {
4199                         offset = Sys_DirtyTime() - host.dirtytime;
4200                         if (offset < 0 || offset >= 1800)
4201                                 offset = 0;
4202
4203                         offset += sv_timer;
4204                         ++svs.perf_acc_offset_samples;
4205                         svs.perf_acc_offset += offset;
4206                         svs.perf_acc_offset_squared += offset * offset;
4207
4208                         if(svs.perf_acc_offset_max < offset)
4209                                 svs.perf_acc_offset_max = offset;
4210                 }
4211
4212                 // only advance time if not paused
4213                 // the game also pauses in singleplayer when menu or console is used
4214                 sv.frametime = advancetime * host_timescale.value;
4215                 if (host_framerate.value)
4216                         sv.frametime = host_framerate.value;
4217                 if (sv.paused || host.paused)
4218                         sv.frametime = 0;
4219
4220                 for (framecount = 0; framecount < framelimit && sv_timer > 0; framecount++)
4221                 {
4222                         sv_timer -= advancetime;
4223
4224                         // move things around and think unless paused
4225                         if (sv.frametime)
4226                                 SV_Physics();
4227
4228                         // if this server frame took too long, break out of the loop
4229                         if (framelimit > 1 && Sys_DirtyTime() >= aborttime)
4230                                 break;
4231                 }
4232
4233                 R_TimeReport("serverphysics");
4234
4235                 // send all messages to the clients
4236                 SV_SendClientMessages();
4237
4238                 if (sv.paused == 1 && host.realtime > sv.pausedstart && sv.pausedstart > 0) {
4239                         prog->globals.fp[OFS_PARM0] = host.realtime - sv.pausedstart;
4240                         PRVM_serverglobalfloat(time) = sv.time;
4241                         prog->ExecuteProgram(prog, PRVM_serverfunction(SV_PausedTic), "QC function SV_PausedTic is missing");
4242                 }
4243
4244                 // send an heartbeat if enough time has passed since the last one
4245                 NetConn_Heartbeat(0);
4246                 R_TimeReport("servernetwork");
4247         }
4248         else
4249         {
4250                 // don't let r_speeds display jump around
4251                 R_TimeReport("serverphysics");
4252                 R_TimeReport("servernetwork");
4253         }
4254
4255         // if there is some time remaining from this frame, reset the timer
4256         if (sv_timer >= 0)
4257         {
4258                 if (!svs.threaded)
4259                         svs.perf_acc_lost += sv_timer;
4260                 sv_timer = 0;
4261         }
4262
4263         return sv_timer;
4264 }
4265
4266 static int SV_ThreadFunc(void *voiddata)
4267 {
4268         prvm_prog_t *prog = SVVM_prog;
4269         qboolean playing = false;
4270         double sv_timer = 0;
4271         double sv_deltarealtime, sv_oldrealtime, sv_realtime;
4272         double wait;
4273         int i;
4274         char vabuf[1024];
4275         sv_realtime = Sys_DirtyTime();
4276         while (!svs.threadstop)
4277         {
4278                 // FIXME: we need to handle Host_Error in the server thread somehow
4279 //              if (setjmp(sv_abortframe))
4280 //                      continue;                       // something bad happened in the server game
4281
4282                 sv_oldrealtime = sv_realtime;
4283                 sv_realtime = Sys_DirtyTime();
4284                 sv_deltarealtime = sv_realtime - sv_oldrealtime;
4285                 if (sv_deltarealtime < 0 || sv_deltarealtime >= 1800) sv_deltarealtime = 0;
4286
4287                 sv_timer += sv_deltarealtime;
4288
4289                 svs.perf_acc_realtime += sv_deltarealtime;
4290
4291                 // 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)
4292                 SV_LockThreadMutex();
4293
4294                 // Look for clients who have spawned
4295                 playing = false;
4296                 if (sv.active)
4297                         for (i = 0, host_client = svs.clients;i < svs.maxclients;i++, host_client++)
4298                                 if(host_client->begun)
4299                                         if(host_client->netconnection)
4300                                                 playing = true;
4301                 if(sv.time < 10)
4302                 {
4303                         // don't accumulate time for the first 10 seconds of a match
4304                         // so things can settle
4305                         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;
4306                 }
4307                 else if(svs.perf_acc_realtime > 5)
4308                 {
4309                         svs.perf_cpuload = 1 - svs.perf_acc_sleeptime / svs.perf_acc_realtime;
4310                         svs.perf_lost = svs.perf_acc_lost / svs.perf_acc_realtime;
4311                         if(svs.perf_acc_offset_samples > 0)
4312                         {
4313                                 svs.perf_offset_max = svs.perf_acc_offset_max;
4314                                 svs.perf_offset_avg = svs.perf_acc_offset / svs.perf_acc_offset_samples;
4315                                 svs.perf_offset_sdev = sqrt(svs.perf_acc_offset_squared / svs.perf_acc_offset_samples - svs.perf_offset_avg * svs.perf_offset_avg);
4316                         }
4317                         if(svs.perf_lost > 0 && developer_extra.integer)
4318                                 if(playing)
4319                                         Con_DPrintf("Server can't keep up: %s\n", Host_TimingReport(vabuf, sizeof(vabuf)));
4320                         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;
4321                 }
4322
4323                 // get new packets
4324                 if (sv.active)
4325                         NetConn_ServerFrame();
4326
4327                 // if the accumulators haven't become positive yet, wait a while
4328                 wait = sv_timer * -1000000.0;
4329                 if (wait >= 1)
4330                 {
4331                         double time0, delta;
4332                         SV_UnlockThreadMutex(); // don't keep mutex locked while sleeping
4333                         if (host_maxwait.value <= 0)
4334                                 wait = min(wait, 1000000.0);
4335                         else
4336                                 wait = min(wait, host_maxwait.value * 1000.0);
4337                         if(wait < 1)
4338                                 wait = 1; // because we cast to int
4339                         time0 = Sys_DirtyTime();
4340                         Sys_Sleep((int)wait);
4341                         delta = Sys_DirtyTime() - time0;if (delta < 0 || delta >= 1800) delta = 0;
4342                         svs.perf_acc_sleeptime += delta;
4343                         continue;
4344                 }
4345
4346                 if (sv.active && sv_timer > 0)
4347                 {
4348                         // execute one server frame
4349                         double advancetime;
4350                         float offset;
4351
4352                         if (sys_ticrate.value <= 0)
4353                                 advancetime = min(sv_timer, 0.1); // don't step more than 100ms
4354                         else
4355                                 advancetime = sys_ticrate.value;
4356
4357                         if(advancetime > 0)
4358                         {
4359                                 offset = sv_timer + (Sys_DirtyTime() - sv_realtime); // LadyHavoc: FIXME: I don't understand this line
4360                                 ++svs.perf_acc_offset_samples;
4361                                 svs.perf_acc_offset += offset;
4362                                 svs.perf_acc_offset_squared += offset * offset;
4363                                 if(svs.perf_acc_offset_max < offset)
4364                                         svs.perf_acc_offset_max = offset;
4365                         }
4366
4367                         // only advance time if not paused
4368                         // the game also pauses in singleplayer when menu or console is used
4369                         sv.frametime = advancetime * host_timescale.value;
4370                         if (host_framerate.value)
4371                                 sv.frametime = host_framerate.value;
4372                         if (sv.paused || host.paused)
4373                                 sv.frametime = 0;
4374
4375                         sv_timer -= advancetime;
4376
4377                         // move things around and think unless paused
4378                         if (sv.frametime)
4379                                 SV_Physics();
4380
4381                         // send all messages to the clients
4382                         SV_SendClientMessages();
4383
4384                         if (sv.paused == 1 && sv_realtime > sv.pausedstart && sv.pausedstart > 0)
4385                         {
4386                                 PRVM_serverglobalfloat(time) = sv.time;
4387                                 prog->globals.fp[OFS_PARM0] = sv_realtime - sv.pausedstart;
4388                                 prog->ExecuteProgram(prog, PRVM_serverfunction(SV_PausedTic), "QC function SV_PausedTic is missing");
4389                         }
4390
4391                         // send an heartbeat if enough time has passed since the last one
4392                         NetConn_Heartbeat(0);
4393
4394                 }
4395
4396                 // we're back to safe code now
4397                 SV_UnlockThreadMutex();
4398
4399                 // if there is some time remaining from this frame, reset the timers
4400                 if (sv_timer >= 0)
4401                 {
4402                         svs.perf_acc_lost += sv_timer;
4403                         sv_timer = 0;
4404                 }
4405         }
4406         return 0;
4407 }
4408
4409 void SV_StartThread(void)
4410 {
4411         if (!sv_threaded.integer || !Thread_HasThreads())
4412                 return;
4413         svs.threaded = true;
4414         svs.threadstop = false;
4415         svs.threadmutex = Thread_CreateMutex();
4416         svs.thread = Thread_CreateThread(SV_ThreadFunc, NULL);
4417 }
4418
4419 void SV_StopThread(void)
4420 {
4421         if (!svs.threaded)
4422                 return;
4423         svs.threadstop = true;
4424         Thread_WaitThread(svs.thread, 0);
4425         Thread_DestroyMutex(svs.threadmutex);
4426         svs.threaded = false;
4427 }