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 = {CF_SERVER | CF_READONLY, "sv_worldmessage", "", "title of current level"};
  38 cvar_t sv_worldname = {CF_SERVER | CF_READONLY, "sv_worldname", "", "name of current worldmodel"};
  39 cvar_t sv_worldnamenoextension = {CF_SERVER | CF_READONLY, "sv_worldnamenoextension", "", "name of current worldmodel without extension"};
  40 cvar_t sv_worldbasename = {CF_SERVER | CF_READONLY, "sv_worldbasename", "", "name of current worldmodel without maps/ prefix or extension"};
  41
  42 cvar_t sv_disablenotify = {CF_SERVER, "sv_disablenotify", "0", "suppress broadcast prints when certain cvars are changed (CF_NOTIFY flag in engine code)"};
  43 cvar_t coop = {CF_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 = {CF_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 = {CF_SERVER | CF_NOTIFY, "fraglimit","0", "ends level if this many frags is reached by any player"};
  46 cvar_t gamecfg = {CF_SERVER, "gamecfg", "0", "unused cvar in quake, can be used by mods"};
  47 cvar_t noexit = {CF_SERVER | CF_NOTIFY, "noexit","0", "kills anyone attempting to use an exit"};
  48 cvar_t nomonsters = {CF_SERVER, "nomonsters", "0", "unused cvar in quake, can be used by mods"};
  49 cvar_t pausable = {CF_SERVER, "pausable","1", "allow players to pause or not (otherwise, only the server admin can)"};
  50 cvar_t pr_checkextension = {CF_SERVER | CF_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 = {CF_SERVER | CF_NOTIFY, "samelevel","0", "repeats same level if level ends (due to timelimit or someone hitting an exit)"};
  52 cvar_t skill = {CF_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 campaign = {CF_SERVER, "campaign", "0", "singleplayer mode"};
  54 cvar_t host_timescale = {CF_CLIENT | CF_SERVER, "host_timescale", "1.0", "controls game speed, 0.5 is half speed, 2 is double speed"};
  55
  56 cvar_t sv_accelerate = {CF_SERVER, "sv_accelerate", "10", "rate at which a player accelerates to sv_maxspeed"};
  57 cvar_t sv_aim = {CF_SERVER | CF_ARCHIVE, "sv_aim", "2", "maximum cosine angle for quake's vertical autoaim, a value above 1 completely disables the autoaim, quake used 0.93"};
  58 cvar_t sv_airaccel_qw = {CF_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"};
  59 cvar_t sv_airaccel_qw_stretchfactor = {CF_SERVER, "sv_airaccel_qw_stretchfactor", "0", "when set, the maximum acceleration increase the player may get compared to forward-acceleration when strafejumping"};
  60 cvar_t sv_airaccel_sideways_friction = {CF_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"};
  61 cvar_t sv_airaccelerate = {CF_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"};
  62 cvar_t sv_airstopaccelerate = {CF_SERVER, "sv_airstopaccelerate", "0", "when set, replacement for sv_airaccelerate when moving backwards"};
  63 cvar_t sv_airspeedlimit_nonqw = {CF_SERVER, "sv_airspeedlimit_nonqw", "0", "when set, this is a soft speed limit while in air when using airaccel_qw not equal to 1"};
  64 cvar_t sv_airstrafeaccelerate = {CF_SERVER, "sv_airstrafeaccelerate", "0", "when set, replacement for sv_airaccelerate when just strafing"};
  65 cvar_t sv_maxairstrafespeed = {CF_SERVER, "sv_maxairstrafespeed", "0", "when set, replacement for sv_maxairspeed when just strafing"};
  66 cvar_t sv_airstrafeaccel_qw = {CF_SERVER, "sv_airstrafeaccel_qw", "0", "when set, replacement for sv_airaccel_qw when just strafing"};
  67 cvar_t sv_aircontrol = {CF_SERVER, "sv_aircontrol", "0", "CPMA-style air control"};
  68 cvar_t sv_aircontrol_power = {CF_SERVER, "sv_aircontrol_power", "2", "CPMA-style air control exponent"};
  69 cvar_t sv_aircontrol_penalty = {CF_SERVER, "sv_aircontrol_penalty", "0", "deceleration while using CPMA-style air control"};
  70 cvar_t sv_allowdownloads = {CF_SERVER, "sv_allowdownloads", "1", "whether to allow clients to download files from the server (does not affect http downloads)"};
  71 cvar_t sv_allowdownloads_archive = {CF_SERVER, "sv_allowdownloads_archive", "0", "whether to allow downloads of archives (pak/pk3)"};
  72 cvar_t sv_allowdownloads_config = {CF_SERVER, "sv_allowdownloads_config", "0", "whether to allow downloads of config files (cfg)"};
  73 cvar_t sv_allowdownloads_dlcache = {CF_SERVER, "sv_allowdownloads_dlcache", "0", "whether to allow downloads of dlcache files (dlcache/)"};
  74 cvar_t sv_allowdownloads_inarchive = {CF_SERVER, "sv_allowdownloads_inarchive", "0", "whether to allow downloads from archives (pak/pk3)"};
  75 cvar_t sv_areagrid_link_SOLID_NOT = {CF_SERVER | CF_NOTIFY, "sv_areagrid_link_SOLID_NOT", "1", "set to 0 to prevent SOLID_NOT entities from being linked to the area grid, and unlink any that are already linked (in the code paths that would otherwise link them), for better performance"};
  76 cvar_t sv_areagrid_mingridsize = {CF_SERVER | CF_NOTIFY, "sv_areagrid_mingridsize", "128", "minimum areagrid cell size, smaller values work better for lots of small objects, higher values for large objects"};
  77 cvar_t sv_checkforpacketsduringsleep = {CF_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"};
  78 cvar_t sv_clmovement_enable = {CF_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"};
  79 cvar_t sv_clmovement_minping = {CF_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)"};
  80 cvar_t sv_clmovement_minping_disabletime = {CF_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)"};
  81 cvar_t sv_clmovement_inputtimeout = {CF_SERVER, "sv_clmovement_inputtimeout", "0.1", "when a client does not send input for this many seconds (max 0.1), force them to move anyway (unlike QuakeWorld)"};
  82 cvar_t sv_cullentities_nevercullbmodels = {CF_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!)"};
  83 cvar_t sv_cullentities_pvs = {CF_SERVER, "sv_cullentities_pvs", "1", "fast but loose culling of hidden entities"};
  84 cvar_t sv_cullentities_stats = {CF_SERVER, "sv_cullentities_stats", "0", "displays stats on network entities culled by various methods for each client"};
  85 cvar_t sv_cullentities_trace = {CF_SERVER, "sv_cullentities_trace", "0", "somewhat slow but very tight culling of hidden entities, minimizes network traffic and makes wallhack cheats useless"};
  86 cvar_t sv_cullentities_trace_delay = {CF_SERVER, "sv_cullentities_trace_delay", "1", "number of seconds until the entity gets actually culled (also applies to portal camera eyes even if sv_cullentities_trace is 0)"};
  87 cvar_t sv_cullentities_trace_delay_players = {CF_SERVER, "sv_cullentities_trace_delay_players", "0.2", "number of seconds until the entity gets actually culled if it is a player entity"};
  88 cvar_t sv_cullentities_trace_enlarge = {CF_SERVER, "sv_cullentities_trace_enlarge", "0", "box enlargement for entity culling (also applies to portal camera eyes even if sv_cullentities_trace is 0)"};
  89 cvar_t sv_cullentities_trace_expand = {CF_SERVER, "sv_cullentities_trace_expand", "0", "box is expanded by this many units for entity culling (also applies to portal camera eyes even if sv_cullentities_trace is 0)"};
  90 cvar_t sv_cullentities_trace_eyejitter = {CF_SERVER, "sv_cullentities_trace_eyejitter", "16", "jitter the eye by this much for each trace (also applies to portal camera eyes even if sv_cullentities_trace is 0)"};
  91 cvar_t sv_cullentities_trace_prediction = {CF_SERVER, "sv_cullentities_trace_prediction", "1", "also trace from the predicted player position"};
  92 cvar_t sv_cullentities_trace_prediction_time = {CF_SERVER, "sv_cullentities_trace_prediction_time", "0.2", "maximum ping time to predict in seconds"};
  93 cvar_t sv_cullentities_trace_entityocclusion = {CF_SERVER, "sv_cullentities_trace_entityocclusion", "0", "also check if doors and other bsp models are in the way"};
  94 cvar_t sv_cullentities_trace_samples = {CF_SERVER, "sv_cullentities_trace_samples", "2", "number of samples to test for entity culling"};
  95 cvar_t sv_cullentities_trace_samples_extra = {CF_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 (also applies to portal camera eyes even if sv_cullentities_trace is 0)"};
  96 cvar_t sv_cullentities_trace_samples_players = {CF_SERVER, "sv_cullentities_trace_samples_players", "8", "number of samples to test for entity culling when the entity is a player entity"};
  97 cvar_t sv_cullentities_trace_spectators = {CF_SERVER, "sv_cullentities_trace_spectators", "0", "enables trace entity culling for clients that are spectating"};
  98 cvar_t sv_debugmove = {CF_SERVER | CF_NOTIFY, "sv_debugmove", "0", "disables collision detection optimizations for debugging purposes"};
  99 cvar_t sv_echobprint = {CF_SERVER | CF_ARCHIVE, "sv_echobprint", "1", "prints gamecode bprint() calls to server console"};
 100 cvar_t sv_edgefriction = {CF_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)"};
 101 cvar_t sv_entpatch = {CF_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)"};
 102 cvar_t sv_freezenonclients = {CF_SERVER | CF_NOTIFY, "sv_freezenonclients", "0", "freezes time, except for players, allowing you to walk around and take screenshots of explosions"};
 103 cvar_t sv_friction = {CF_SERVER | CF_NOTIFY, "sv_friction","4", "how fast you slow down"};
 104 cvar_t sv_gameplayfix_blowupfallenzombies = {CF_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"};
 105 cvar_t sv_gameplayfix_consistentplayerprethink = {CF_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"};
 106 cvar_t sv_gameplayfix_delayprojectiles = {CF_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"};
 107 cvar_t sv_gameplayfix_droptofloorstartsolid = {CF_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)"};
 108 cvar_t sv_gameplayfix_droptofloorstartsolid_nudgetocorrect = {CF_SERVER, "sv_gameplayfix_droptofloorstartsolid_nudgetocorrect", "1", "tries to nudge stuck items and monsters out of walls before droptofloor is performed"};
 109 cvar_t sv_gameplayfix_easierwaterjump = {CF_SERVER, "sv_gameplayfix_easierwaterjump", "1", "changes water jumping to make it easier to get out of water (exactly like in QuakeWorld)"};
 110 cvar_t sv_gameplayfix_findradiusdistancetobox = {CF_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"};
 111 cvar_t sv_gameplayfix_gravityunaffectedbyticrate = {CF_SERVER, "sv_gameplayfix_gravityunaffectedbyticrate", "0", "fix some ticrate issues in physics."};
 112 cvar_t sv_gameplayfix_grenadebouncedownslopes = {CF_SERVER, "sv_gameplayfix_grenadebouncedownslopes", "1", "prevents MOVETYPE_BOUNCE (grenades) from getting stuck when fired down a downward sloping surface"};
 113 cvar_t sv_gameplayfix_multiplethinksperframe = {CF_SERVER, "sv_gameplayfix_multiplethinksperframe", "1", "allows entities to think more often than the server framerate, primarily useful for very high fire rate weapons"};
 114 cvar_t sv_gameplayfix_noairborncorpse = {CF_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"};
 115 cvar_t sv_gameplayfix_noairborncorpse_allowsuspendeditems = {CF_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)"};
 116 cvar_t sv_gameplayfix_nudgeoutofsolid = {CF_SERVER, "sv_gameplayfix_nudgeoutofsolid", "0", "attempts to fix physics errors (where an object ended up in solid for some reason)"};
 117 cvar_t sv_gameplayfix_nudgeoutofsolid_separation = {CF_SERVER, "sv_gameplayfix_nudgeoutofsolid_separation", "0.03125", "keep objects this distance apart to prevent collision issues on seams"};
 118 cvar_t sv_gameplayfix_q2airaccelerate = {CF_SERVER, "sv_gameplayfix_q2airaccelerate", "0", "Quake2-style air acceleration"};
 119 cvar_t sv_gameplayfix_nogravityonground = {CF_SERVER, "sv_gameplayfix_nogravityonground", "0", "turn off gravity when on ground (to get rid of sliding)"};
 120 cvar_t sv_gameplayfix_setmodelrealbox = {CF_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"};
 121 cvar_t sv_gameplayfix_slidemoveprojectiles = {CF_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"};
 122 cvar_t sv_gameplayfix_stepdown = {CF_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)"};
 123 cvar_t sv_gameplayfix_stepmultipletimes = {CF_SERVER, "sv_gameplayfix_stepmultipletimes", "0", "applies step-up onto a ledge more than once in a single frame, when running quickly up stairs"};
 124 cvar_t sv_gameplayfix_nostepmoveonsteepslopes = {CF_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"};
 125 cvar_t sv_gameplayfix_swiminbmodels = {CF_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"};
 126 cvar_t sv_gameplayfix_upwardvelocityclearsongroundflag = {CF_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"};
 127 cvar_t sv_gameplayfix_downtracesupportsongroundflag = {CF_SERVER, "sv_gameplayfix_downtracesupportsongroundflag", "1", "prevents very short moves from clearing onground (which may make the player stick to the floor at high netfps), fixes groundentity not being set when walking onto a mover with sv_gameplayfix_nogravityonground"};
 128 cvar_t sv_gameplayfix_q1bsptracelinereportstexture = {CF_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"};
 129 cvar_t sv_gameplayfix_unstickplayers = {CF_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."};
 130 cvar_t sv_gameplayfix_unstickentities = {CF_SERVER, "sv_gameplayfix_unstickentities", "1", "hack to check if entities are crossing world collision hull and try to move them to the right position"};
 131 cvar_t sv_gameplayfix_fixedcheckwatertransition = {CF_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)"};
 132 cvar_t sv_gameplayfix_customstats = {CF_SERVER, "sv_gameplayfix_customstats", "0", "Disable stats higher than 220, for use by certain games such as Xonotic"};
 133 cvar_t sv_gravity = {CF_SERVER | CF_NOTIFY, "sv_gravity","800", "how fast you fall (512 = roughly earth gravity)"};
 134 cvar_t sv_init_frame_count = {CF_SERVER, "sv_init_frame_count", "2", "number of frames to run to allow everything to settle before letting clients connect"};
 135 cvar_t sv_idealpitchscale = {CF_SERVER, "sv_idealpitchscale","0.8", "how much to look up/down slopes and stairs when not using freelook"};
 136 cvar_t sv_jumpstep = {CF_SERVER | CF_NOTIFY, "sv_jumpstep", "0", "whether you can step up while jumping"};
 137 cvar_t sv_jumpvelocity = {CF_SERVER, "sv_jumpvelocity", "270", "cvar that can be used by QuakeC code for jump velocity"};
 138 cvar_t sv_legacy_bbox_expand = {CF_SERVER, "sv_legacy_bbox_expand", "1", "before linking an entity to the area grid, decrease its mins and increase its maxs by '1 1 1', or '15 15 1' if it has flag FL_ITEM (this is the Quake/QuakeWorld behaviour); disable to make SVQC bboxes consistent with CSQC which never does this expansion"};
 139 cvar_t sv_maxairspeed = {CF_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)"};
 140 cvar_t sv_maxrate = {CF_SERVER | CF_ARCHIVE | CF_NOTIFY, "sv_maxrate", "1000000", "upper limit on client rate cvar, should reflect your network connection quality"};
 141 cvar_t sv_maxspeed = {CF_SERVER | CF_NOTIFY, "sv_maxspeed", "320", "maximum speed a player can accelerate to when on ground (can be exceeded by tricks)"};
 142 cvar_t sv_maxvelocity = {CF_SERVER | CF_NOTIFY, "sv_maxvelocity","2000", "universal speed limit on all entities"};
 143 cvar_t sv_nostep = {CF_SERVER | CF_NOTIFY, "sv_nostep","0", "prevents MOVETYPE_STEP entities (monsters) from moving"};
 144 cvar_t sv_playerphysicsqc = {CF_SERVER | CF_NOTIFY, "sv_playerphysicsqc", "1", "enables QuakeC function to override player physics"};
 145 cvar_t sv_progs = {CF_SERVER, "sv_progs", "progs.dat", "selects which quakec progs.dat file to run" };
 146 cvar_t sv_protocolname = {CF_SERVER, "sv_protocolname", "DP7", "selects network protocol to host for (values include QUAKE, QUAKEDP, NEHAHRAMOVIE, DP1 and up)"};
 147 cvar_t sv_random_seed = {CF_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"};
 148 cvar_t host_limitlocal = {CF_SERVER, "host_limitlocal", "0", "whether to apply rate limiting to the local player in a listen server (only useful for testing)"};
 149 cvar_t sv_sound_land = {CF_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)"};
 150 cvar_t sv_sound_watersplash = {CF_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)"};
 151 cvar_t sv_stepheight = {CF_SERVER | CF_NOTIFY, "sv_stepheight", "18", "how high you can step up (TW_SV_STEPCONTROL extension)"};
 152 cvar_t sv_stopspeed = {CF_SERVER | CF_NOTIFY, "sv_stopspeed","100", "how fast you come to a complete stop"};
 153 cvar_t sv_wallfriction = {CF_SERVER | CF_NOTIFY, "sv_wallfriction", "1", "how much you slow down when sliding along a wall"};
 154 cvar_t sv_wateraccelerate = {CF_SERVER, "sv_wateraccelerate", "-1", "rate at which a player accelerates to sv_maxspeed while in water, if less than 0 the sv_accelerate variable is used instead"};
 155 cvar_t sv_waterfriction = {CF_SERVER | CF_NOTIFY, "sv_waterfriction","-1", "how fast you slow down in water, if less than 0 the sv_friction variable is used instead"};
 156 cvar_t sv_warsowbunny_airforwardaccel = {CF_SERVER, "sv_warsowbunny_airforwardaccel", "1.00001", "how fast you accelerate until you reach sv_maxspeed"};
 157 cvar_t sv_warsowbunny_accel = {CF_SERVER, "sv_warsowbunny_accel", "0.1585", "how fast you accelerate until after reaching sv_maxspeed (it gets harder as you near sv_warsowbunny_topspeed)"};
 158 cvar_t sv_warsowbunny_topspeed = {CF_SERVER, "sv_warsowbunny_topspeed", "925", "soft speed limit (can get faster with rjs and on ramps)"};
 159 cvar_t sv_warsowbunny_turnaccel = {CF_SERVER, "sv_warsowbunny_turnaccel", "0", "max sharpness of turns (also master switch for the sv_warsowbunny_* mode; set this to 9 to enable)"};
 160 cvar_t sv_warsowbunny_backtosideratio = {CF_SERVER, "sv_warsowbunny_backtosideratio", "0.8", "lower values make it easier to change direction without losing speed; the drawback is \"understeering\" in sharp turns"};
 161 cvar_t sv_onlycsqcnetworking = {CF_SERVER, "sv_onlycsqcnetworking", "0", "disables legacy entity networking code for higher performance (except on clients, which can still be legacy)"};
 162 cvar_t sv_areadebug = {CF_SERVER, "sv_areadebug", "0", "disables physics culling for debugging purposes (only for development)"};
 163 cvar_t sys_ticrate = {CF_SERVER | CF_ARCHIVE, "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"};
 164 cvar_t sv_maxphysicsframesperserverframe = {CF_SERVER, "sv_maxphysicsframesperserverframe","10", "maximum number of physics frames per server frame"};
 165 cvar_t teamplay = {CF_SERVER | CF_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"};
 166 cvar_t timelimit = {CF_SERVER | CF_NOTIFY, "timelimit","0", "ends level at this time (in minutes)"};
 167 cvar_t sv_threaded = {CF_SERVER, "sv_threaded", "0", "enables a separate thread for server code, improving performance, especially when hosting a game while playing, EXPERIMENTAL, may be crashy"};
 168
 169 cvar_t sv_rollspeed = {CF_CLIENT, "sv_rollspeed", "200", "how much strafing is necessary to tilt the view"};
 170 cvar_t sv_rollangle = {CF_CLIENT, "sv_rollangle", "2.0", "how much to tilt the view when strafing"};
 171
 172 cvar_t saved1 = {CF_SERVER | CF_ARCHIVE, "saved1", "0", "unused cvar in quake that is saved to config.cfg on exit, can be used by mods"};
 173 cvar_t saved2 = {CF_SERVER | CF_ARCHIVE, "saved2", "0", "unused cvar in quake that is saved to config.cfg on exit, can be used by mods"};
 174 cvar_t saved3 = {CF_SERVER | CF_ARCHIVE, "saved3", "0", "unused cvar in quake that is saved to config.cfg on exit, can be used by mods"};
 175 cvar_t saved4 = {CF_SERVER | CF_ARCHIVE, "saved4", "0", "unused cvar in quake that is saved to config.cfg on exit, can be used by mods"};
 176 cvar_t savedgamecfg = {CF_SERVER | CF_ARCHIVE, "savedgamecfg", "0", "unused cvar in quake that is saved to config.cfg on exit, can be used by mods"};
 177 cvar_t scratch1 = {CF_SERVER, "scratch1", "0", "unused cvar in quake, can be used by mods"};
 178 cvar_t scratch2 = {CF_SERVER,"scratch2", "0", "unused cvar in quake, can be used by mods"};
 179 cvar_t scratch3 = {CF_SERVER, "scratch3", "0", "unused cvar in quake, can be used by mods"};
 180 cvar_t scratch4 = {CF_SERVER, "scratch4", "0", "unused cvar in quake, can be used by mods"};
 181 cvar_t temp1 = {CF_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)"};
 182
 183 cvar_t nehx00 = {CF_SERVER, "nehx00", "0", "nehahra data storage cvar (used in singleplayer)"};
 184 cvar_t nehx01 = {CF_SERVER, "nehx01", "0", "nehahra data storage cvar (used in singleplayer)"};
 185 cvar_t nehx02 = {CF_SERVER, "nehx02", "0", "nehahra data storage cvar (used in singleplayer)"};
 186 cvar_t nehx03 = {CF_SERVER, "nehx03", "0", "nehahra data storage cvar (used in singleplayer)"};
 187 cvar_t nehx04 = {CF_SERVER, "nehx04", "0", "nehahra data storage cvar (used in singleplayer)"};
 188 cvar_t nehx05 = {CF_SERVER, "nehx05", "0", "nehahra data storage cvar (used in singleplayer)"};
 189 cvar_t nehx06 = {CF_SERVER, "nehx06", "0", "nehahra data storage cvar (used in singleplayer)"};
 190 cvar_t nehx07 = {CF_SERVER, "nehx07", "0", "nehahra data storage cvar (used in singleplayer)"};
 191 cvar_t nehx08 = {CF_SERVER, "nehx08", "0", "nehahra data storage cvar (used in singleplayer)"};
 192 cvar_t nehx09 = {CF_SERVER, "nehx09", "0", "nehahra data storage cvar (used in singleplayer)"};
 193 cvar_t nehx10 = {CF_SERVER, "nehx10", "0", "nehahra data storage cvar (used in singleplayer)"};
 194 cvar_t nehx11 = {CF_SERVER, "nehx11", "0", "nehahra data storage cvar (used in singleplayer)"};
 195 cvar_t nehx12 = {CF_SERVER, "nehx12", "0", "nehahra data storage cvar (used in singleplayer)"};
 196 cvar_t nehx13 = {CF_SERVER, "nehx13", "0", "nehahra data storage cvar (used in singleplayer)"};
 197 cvar_t nehx14 = {CF_SERVER, "nehx14", "0", "nehahra data storage cvar (used in singleplayer)"};
 198 cvar_t nehx15 = {CF_SERVER, "nehx15", "0", "nehahra data storage cvar (used in singleplayer)"};
 199 cvar_t nehx16 = {CF_SERVER, "nehx16", "0", "nehahra data storage cvar (used in singleplayer)"};
 200 cvar_t nehx17 = {CF_SERVER, "nehx17", "0", "nehahra data storage cvar (used in singleplayer)"};
 201 cvar_t nehx18 = {CF_SERVER, "nehx18", "0", "nehahra data storage cvar (used in singleplayer)"};
 202 cvar_t nehx19 = {CF_SERVER, "nehx19", "0", "nehahra data storage cvar (used in singleplayer)"};
 203 cvar_t cutscene = {CF_SERVER, "cutscene", "1", "enables cutscenes in nehahra, can be used by other mods"};
 204
 205 cvar_t sv_autodemo_perclient = {CF_SERVER | CF_ARCHIVE, "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)"};
 206 cvar_t sv_autodemo_perclient_nameformat = {CF_SERVER | CF_ARCHIVE, "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)" };
 207 cvar_t sv_autodemo_perclient_discardable = {CF_SERVER | CF_ARCHIVE, "sv_autodemo_perclient_discardable", "0", "Allow game code to decide whether a demo should be kept or discarded."};
 208
 209 cvar_t halflifebsp = {CF_SERVER, "halflifebsp", "0", "indicates the current map is hlbsp format (useful to know because of different bounding box sizes)"};
 210 cvar_t sv_mapformat_is_quake2 = {CF_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)"};
 211 cvar_t sv_mapformat_is_quake3 = {CF_SERVER, "sv_mapformat_is_quake3", "0", "indicates the current map is q3bsp format (useful to know because of different entity behaviors)"};
 212
 213 cvar_t sv_writepicture_quality = {CF_SERVER | CF_ARCHIVE, "sv_writepicture_quality", "10", "WritePicture quality offset (higher means better quality, but slower)"};
 214
 215 server_t sv;
 216 server_static_t svs;
 217
 218 mempool_t *sv_mempool = NULL;
 219
 220 extern cvar_t host_timescale;
 221 extern float            scr_centertime_off;
 222
 223 // MUST match effectnameindex_t in client.h
 224 static const char *standardeffectnames[EFFECT_TOTAL] =
 225 {
 226         "",
 227         "TE_GUNSHOT",
 228         "TE_GUNSHOTQUAD",
 229         "TE_SPIKE",
 230         "TE_SPIKEQUAD",
 231         "TE_SUPERSPIKE",
 232         "TE_SUPERSPIKEQUAD",
 233         "TE_WIZSPIKE",
 234         "TE_KNIGHTSPIKE",
 235         "TE_EXPLOSION",
 236         "TE_EXPLOSIONQUAD",
 237         "TE_TAREXPLOSION",
 238         "TE_TELEPORT",
 239         "TE_LAVASPLASH",
 240         "TE_SMALLFLASH",
 241         "TE_FLAMEJET",
 242         "EF_FLAME",
 243         "TE_BLOOD",
 244         "TE_SPARK",
 245         "TE_PLASMABURN",
 246         "TE_TEI_G3",
 247         "TE_TEI_SMOKE",
 248         "TE_TEI_BIGEXPLOSION",
 249         "TE_TEI_PLASMAHIT",
 250         "EF_STARDUST",
 251         "TR_ROCKET",
 252         "TR_GRENADE",
 253         "TR_BLOOD",
 254         "TR_WIZSPIKE",
 255         "TR_SLIGHTBLOOD",
 256         "TR_KNIGHTSPIKE",
 257         "TR_VORESPIKE",
 258         "TR_NEHAHRASMOKE",
 259         "TR_NEXUIZPLASMA",
 260         "TR_GLOWTRAIL",
 261         "SVC_PARTICLE"
 262 };
 263
 264 #define SV_REQFUNCS 0
 265 #define sv_reqfuncs NULL
 266
 267 //#define SV_REQFUNCS (sizeof(sv_reqfuncs) / sizeof(const char *))
 268 //static const char *sv_reqfuncs[] = {
 269 //};
 270
 271 #define SV_REQFIELDS (sizeof(sv_reqfields) / sizeof(prvm_required_field_t))
 272
 273 prvm_required_field_t sv_reqfields[] =
 274 {
 275 #define PRVM_DECLARE_serverglobalfloat(x)
 276 #define PRVM_DECLARE_serverglobalvector(x)
 277 #define PRVM_DECLARE_serverglobalstring(x)
 278 #define PRVM_DECLARE_serverglobaledict(x)
 279 #define PRVM_DECLARE_serverglobalfunction(x)
 280 #define PRVM_DECLARE_clientglobalfloat(x)
 281 #define PRVM_DECLARE_clientglobalvector(x)
 282 #define PRVM_DECLARE_clientglobalstring(x)
 283 #define PRVM_DECLARE_clientglobaledict(x)
 284 #define PRVM_DECLARE_clientglobalfunction(x)
 285 #define PRVM_DECLARE_menuglobalfloat(x)
 286 #define PRVM_DECLARE_menuglobalvector(x)
 287 #define PRVM_DECLARE_menuglobalstring(x)
 288 #define PRVM_DECLARE_menuglobaledict(x)
 289 #define PRVM_DECLARE_menuglobalfunction(x)
 290 #define PRVM_DECLARE_serverfieldfloat(x) {ev_float, #x},
 291 #define PRVM_DECLARE_serverfieldvector(x) {ev_vector, #x},
 292 #define PRVM_DECLARE_serverfieldstring(x) {ev_string, #x},
 293 #define PRVM_DECLARE_serverfieldedict(x) {ev_entity, #x},
 294 #define PRVM_DECLARE_serverfieldfunction(x) {ev_function, #x},
 295 #define PRVM_DECLARE_clientfieldfloat(x)
 296 #define PRVM_DECLARE_clientfieldvector(x)
 297 #define PRVM_DECLARE_clientfieldstring(x)
 298 #define PRVM_DECLARE_clientfieldedict(x)
 299 #define PRVM_DECLARE_clientfieldfunction(x)
 300 #define PRVM_DECLARE_menufieldfloat(x)
 301 #define PRVM_DECLARE_menufieldvector(x)
 302 #define PRVM_DECLARE_menufieldstring(x)
 303 #define PRVM_DECLARE_menufieldedict(x)
 304 #define PRVM_DECLARE_menufieldfunction(x)
 305 #define PRVM_DECLARE_serverfunction(x)
 306 #define PRVM_DECLARE_clientfunction(x)
 307 #define PRVM_DECLARE_menufunction(x)
 308 #define PRVM_DECLARE_field(x)
 309 #define PRVM_DECLARE_global(x)
 310 #define PRVM_DECLARE_function(x)
 311 #include "prvm_offsets.h"
 312 #undef PRVM_DECLARE_serverglobalfloat
 313 #undef PRVM_DECLARE_serverglobalvector
 314 #undef PRVM_DECLARE_serverglobalstring
 315 #undef PRVM_DECLARE_serverglobaledict
 316 #undef PRVM_DECLARE_serverglobalfunction
 317 #undef PRVM_DECLARE_clientglobalfloat
 318 #undef PRVM_DECLARE_clientglobalvector
 319 #undef PRVM_DECLARE_clientglobalstring
 320 #undef PRVM_DECLARE_clientglobaledict
 321 #undef PRVM_DECLARE_clientglobalfunction
 322 #undef PRVM_DECLARE_menuglobalfloat
 323 #undef PRVM_DECLARE_menuglobalvector
 324 #undef PRVM_DECLARE_menuglobalstring
 325 #undef PRVM_DECLARE_menuglobaledict
 326 #undef PRVM_DECLARE_menuglobalfunction
 327 #undef PRVM_DECLARE_serverfieldfloat
 328 #undef PRVM_DECLARE_serverfieldvector
 329 #undef PRVM_DECLARE_serverfieldstring
 330 #undef PRVM_DECLARE_serverfieldedict
 331 #undef PRVM_DECLARE_serverfieldfunction
 332 #undef PRVM_DECLARE_clientfieldfloat
 333 #undef PRVM_DECLARE_clientfieldvector
 334 #undef PRVM_DECLARE_clientfieldstring
 335 #undef PRVM_DECLARE_clientfieldedict
 336 #undef PRVM_DECLARE_clientfieldfunction
 337 #undef PRVM_DECLARE_menufieldfloat
 338 #undef PRVM_DECLARE_menufieldvector
 339 #undef PRVM_DECLARE_menufieldstring
 340 #undef PRVM_DECLARE_menufieldedict
 341 #undef PRVM_DECLARE_menufieldfunction
 342 #undef PRVM_DECLARE_serverfunction
 343 #undef PRVM_DECLARE_clientfunction
 344 #undef PRVM_DECLARE_menufunction
 345 #undef PRVM_DECLARE_field
 346 #undef PRVM_DECLARE_global
 347 #undef PRVM_DECLARE_function
 348 };
 349
 350 #define SV_REQGLOBALS (sizeof(sv_reqglobals) / sizeof(prvm_required_field_t))
 351
 352 prvm_required_field_t sv_reqglobals[] =
 353 {
 354 #define PRVM_DECLARE_serverglobalfloat(x) {ev_float, #x},
 355 #define PRVM_DECLARE_serverglobalvector(x) {ev_vector, #x},
 356 #define PRVM_DECLARE_serverglobalstring(x) {ev_string, #x},
 357 #define PRVM_DECLARE_serverglobaledict(x) {ev_entity, #x},
 358 #define PRVM_DECLARE_serverglobalfunction(x) {ev_function, #x},
 359 #define PRVM_DECLARE_clientglobalfloat(x)
 360 #define PRVM_DECLARE_clientglobalvector(x)
 361 #define PRVM_DECLARE_clientglobalstring(x)
 362 #define PRVM_DECLARE_clientglobaledict(x)
 363 #define PRVM_DECLARE_clientglobalfunction(x)
 364 #define PRVM_DECLARE_menuglobalfloat(x)
 365 #define PRVM_DECLARE_menuglobalvector(x)
 366 #define PRVM_DECLARE_menuglobalstring(x)
 367 #define PRVM_DECLARE_menuglobaledict(x)
 368 #define PRVM_DECLARE_menuglobalfunction(x)
 369 #define PRVM_DECLARE_serverfieldfloat(x)
 370 #define PRVM_DECLARE_serverfieldvector(x)
 371 #define PRVM_DECLARE_serverfieldstring(x)
 372 #define PRVM_DECLARE_serverfieldedict(x)
 373 #define PRVM_DECLARE_serverfieldfunction(x)
 374 #define PRVM_DECLARE_clientfieldfloat(x)
 375 #define PRVM_DECLARE_clientfieldvector(x)
 376 #define PRVM_DECLARE_clientfieldstring(x)
 377 #define PRVM_DECLARE_clientfieldedict(x)
 378 #define PRVM_DECLARE_clientfieldfunction(x)
 379 #define PRVM_DECLARE_menufieldfloat(x)
 380 #define PRVM_DECLARE_menufieldvector(x)
 381 #define PRVM_DECLARE_menufieldstring(x)
 382 #define PRVM_DECLARE_menufieldedict(x)
 383 #define PRVM_DECLARE_menufieldfunction(x)
 384 #define PRVM_DECLARE_serverfunction(x)
 385 #define PRVM_DECLARE_clientfunction(x)
 386 #define PRVM_DECLARE_menufunction(x)
 387 #define PRVM_DECLARE_field(x)
 388 #define PRVM_DECLARE_global(x)
 389 #define PRVM_DECLARE_function(x)
 390 #include "prvm_offsets.h"
 391 #undef PRVM_DECLARE_serverglobalfloat
 392 #undef PRVM_DECLARE_serverglobalvector
 393 #undef PRVM_DECLARE_serverglobalstring
 394 #undef PRVM_DECLARE_serverglobaledict
 395 #undef PRVM_DECLARE_serverglobalfunction
 396 #undef PRVM_DECLARE_clientglobalfloat
 397 #undef PRVM_DECLARE_clientglobalvector
 398 #undef PRVM_DECLARE_clientglobalstring
 399 #undef PRVM_DECLARE_clientglobaledict
 400 #undef PRVM_DECLARE_clientglobalfunction
 401 #undef PRVM_DECLARE_menuglobalfloat
 402 #undef PRVM_DECLARE_menuglobalvector
 403 #undef PRVM_DECLARE_menuglobalstring
 404 #undef PRVM_DECLARE_menuglobaledict
 405 #undef PRVM_DECLARE_menuglobalfunction
 406 #undef PRVM_DECLARE_serverfieldfloat
 407 #undef PRVM_DECLARE_serverfieldvector
 408 #undef PRVM_DECLARE_serverfieldstring
 409 #undef PRVM_DECLARE_serverfieldedict
 410 #undef PRVM_DECLARE_serverfieldfunction
 411 #undef PRVM_DECLARE_clientfieldfloat
 412 #undef PRVM_DECLARE_clientfieldvector
 413 #undef PRVM_DECLARE_clientfieldstring
 414 #undef PRVM_DECLARE_clientfieldedict
 415 #undef PRVM_DECLARE_clientfieldfunction
 416 #undef PRVM_DECLARE_menufieldfloat
 417 #undef PRVM_DECLARE_menufieldvector
 418 #undef PRVM_DECLARE_menufieldstring
 419 #undef PRVM_DECLARE_menufieldedict
 420 #undef PRVM_DECLARE_menufieldfunction
 421 #undef PRVM_DECLARE_serverfunction
 422 #undef PRVM_DECLARE_clientfunction
 423 #undef PRVM_DECLARE_menufunction
 424 #undef PRVM_DECLARE_field
 425 #undef PRVM_DECLARE_global
 426 #undef PRVM_DECLARE_function
 427 };
 428
 429 static void Host_Timescale_c(cvar_t *var)
 430 {
 431         if(var->value < 0.00001 && var->value != 0)
 432                 Cvar_SetValueQuick(var, 0);
 433 }
 434
 435 //============================================================================
 436
 437 static void SV_AreaStats_f(cmd_state_t *cmd)
 438 {
 439         World_PrintAreaStats(&sv.world, "server");
 440 }
 441
 442 static void SV_ServerOptions (void)
 443 {
 444         int i;
 445
 446         // general default
 447         svs.maxclients = 8;
 448
 449 // COMMANDLINEOPTION: Server: -dedicated [playerlimit] starts a dedicated server (with a command console), default playerlimit is 8
 450 // COMMANDLINEOPTION: Server: -listen [playerlimit] starts a multiplayer server with graphical client, like singleplayer but other players can connect, default playerlimit is 8
 451         // if no client is in the executable or -dedicated is specified on
 452         // commandline, start a dedicated server
 453         i = Sys_CheckParm ("-dedicated");
 454         if (i || !cl_available)
 455         {
 456                 // check for -dedicated specifying how many players
 457                 if (i && i + 1 < sys.argc && atoi (sys.argv[i+1]) >= 1)
 458                         svs.maxclients = atoi (sys.argv[i+1]);
 459                 if (Sys_CheckParm ("-listen"))
 460                         Con_Printf ("Only one of -dedicated or -listen can be specified\n");
 461                 // default sv_public on for dedicated servers (often hosted by serious administrators), off for listen servers (often hosted by clueless users)
 462                 Cvar_SetValue(&cvars_all, "sv_public", 1);
 463         }
 464         else if (cl_available)
 465         {
 466                 // client exists and not dedicated, check if -listen is specified
 467                 cls.state = ca_disconnected;
 468                 i = Sys_CheckParm ("-listen");
 469                 if (i)
 470                 {
 471                         // default players unless specified
 472                         if (i + 1 < sys.argc && atoi (sys.argv[i+1]) >= 1)
 473                                 svs.maxclients = atoi (sys.argv[i+1]);
 474                 }
 475                 else
 476                 {
 477                         // default players in some games, singleplayer in most
 478                         if (gamemode != GAME_GOODVSBAD2 && !IS_NEXUIZ_DERIVED(gamemode) && gamemode != GAME_BATTLEMECH)
 479                                 svs.maxclients = 1;
 480                 }
 481         }
 482
 483         svs.maxclients = svs.maxclients_next = bound(1, svs.maxclients, MAX_SCOREBOARD);
 484
 485         svs.clients = (client_t *)Mem_Alloc(sv_mempool, sizeof(client_t) * svs.maxclients);
 486
 487         if (svs.maxclients > 1 && !deathmatch.integer && !coop.integer)
 488                 Cvar_SetValueQuick(&deathmatch, 1);
 489 }
 490
 491 /*
 492 ===============
 493 SV_Init
 494 ===============
 495 */
 496 void SV_Init (void)
 497 {
 498         // init the csqc progs cvars, since they are updated/used by the server code
 499         // TODO: fix this since this is a quick hack to make some of [515]'s broken code run ;) [9/13/2006 Black]
 500         extern cvar_t csqc_progname;    //[515]: csqc crc check and right csprogs name according to progs.dat
 501         extern cvar_t csqc_progcrc;
 502         extern cvar_t csqc_progsize;
 503         extern cvar_t csqc_usedemoprogs;
 504
 505         Cvar_RegisterVariable(&sv_worldmessage);
 506         Cvar_RegisterVariable(&sv_worldname);
 507         Cvar_RegisterVariable(&sv_worldnamenoextension);
 508         Cvar_RegisterVariable(&sv_worldbasename);
 509
 510         Cvar_RegisterVariable (&csqc_progname);
 511         Cvar_RegisterVariable (&csqc_progcrc);
 512         Cvar_RegisterVariable (&csqc_progsize);
 513         Cvar_RegisterVariable (&csqc_usedemoprogs);
 514
 515         Cmd_AddCommand(CF_SHARED, "sv_saveentfile", SV_SaveEntFile_f, "save map entities to .ent file (to allow external editing)");
 516         Cmd_AddCommand(CF_SHARED, "sv_areastats", SV_AreaStats_f, "prints statistics on entity culling during collision traces");
 517         Cmd_AddCommand(CF_CLIENT | CF_SERVER_FROM_CLIENT, "sv_startdownload", SV_StartDownload_f, "begins sending a file to the client (network protocol use only)");
 518         Cmd_AddCommand(CF_CLIENT | CF_SERVER_FROM_CLIENT, "download", SV_Download_f, "downloads a specified file from the server");
 519
 520         Cvar_RegisterVariable (&sv_disablenotify);
 521         Cvar_RegisterVariable (&coop);
 522         Cvar_RegisterVariable (&deathmatch);
 523         Cvar_RegisterVariable (&fraglimit);
 524         Cvar_RegisterVariable (&gamecfg);
 525         Cvar_RegisterVariable (&noexit);
 526         Cvar_RegisterVariable (&nomonsters);
 527         Cvar_RegisterVariable (&pausable);
 528         Cvar_RegisterVariable (&pr_checkextension);
 529         Cvar_RegisterVariable (&samelevel);
 530         Cvar_RegisterVariable (&skill);
 531         Cvar_RegisterVariable (&campaign);
 532         Cvar_RegisterVariable (&host_timescale);
 533         Cvar_RegisterCallback (&host_timescale, Host_Timescale_c);
 534         Cvar_RegisterVirtual (&host_timescale, "slowmo");
 535         Cvar_RegisterVirtual (&host_timescale, "timescale");
 536         Cvar_RegisterVariable (&sv_accelerate);
 537         Cvar_RegisterVariable (&sv_aim);
 538         Cvar_RegisterVariable (&sv_airaccel_qw);
 539         Cvar_RegisterVariable (&sv_airaccel_qw_stretchfactor);
 540         Cvar_RegisterVariable (&sv_airaccel_sideways_friction);
 541         Cvar_RegisterVariable (&sv_airaccelerate);
 542         Cvar_RegisterVariable (&sv_airstopaccelerate);
 543         Cvar_RegisterVariable (&sv_airstrafeaccelerate);
 544         Cvar_RegisterVariable (&sv_maxairstrafespeed);
 545         Cvar_RegisterVariable (&sv_airstrafeaccel_qw);
 546         Cvar_RegisterVariable (&sv_airspeedlimit_nonqw);
 547         Cvar_RegisterVariable (&sv_aircontrol);
 548         Cvar_RegisterVariable (&sv_aircontrol_power);
 549         Cvar_RegisterVariable (&sv_aircontrol_penalty);
 550         Cvar_RegisterVariable (&sv_allowdownloads);
 551         Cvar_RegisterVariable (&sv_allowdownloads_archive);
 552         Cvar_RegisterVariable (&sv_allowdownloads_config);
 553         Cvar_RegisterVariable (&sv_allowdownloads_dlcache);
 554         Cvar_RegisterVariable (&sv_allowdownloads_inarchive);
 555         Cvar_RegisterVariable (&sv_areagrid_link_SOLID_NOT);
 556         Cvar_RegisterVariable (&sv_areagrid_mingridsize);
 557         Cvar_RegisterVariable (&sv_checkforpacketsduringsleep);
 558         Cvar_RegisterVariable (&sv_clmovement_enable);
 559         Cvar_RegisterVariable (&sv_clmovement_minping);
 560         Cvar_RegisterVariable (&sv_clmovement_minping_disabletime);
 561         Cvar_RegisterVariable (&sv_clmovement_inputtimeout);
 562         Cvar_RegisterVariable (&sv_cullentities_nevercullbmodels);
 563         Cvar_RegisterVariable (&sv_cullentities_pvs);
 564         Cvar_RegisterVariable (&sv_cullentities_stats);
 565         Cvar_RegisterVariable (&sv_cullentities_trace);
 566         Cvar_RegisterVariable (&sv_cullentities_trace_delay);
 567         Cvar_RegisterVariable (&sv_cullentities_trace_delay_players);
 568         Cvar_RegisterVariable (&sv_cullentities_trace_enlarge);
 569         Cvar_RegisterVariable (&sv_cullentities_trace_expand);
 570         Cvar_RegisterVariable (&sv_cullentities_trace_eyejitter);
 571         Cvar_RegisterVariable (&sv_cullentities_trace_entityocclusion);
 572         Cvar_RegisterVariable (&sv_cullentities_trace_prediction);
 573         Cvar_RegisterVariable (&sv_cullentities_trace_prediction_time);
 574         Cvar_RegisterVariable (&sv_cullentities_trace_samples);
 575         Cvar_RegisterVariable (&sv_cullentities_trace_samples_extra);
 576         Cvar_RegisterVariable (&sv_cullentities_trace_samples_players);
 577         Cvar_RegisterVariable (&sv_cullentities_trace_spectators);
 578         Cvar_RegisterVariable (&sv_debugmove);
 579         Cvar_RegisterVariable (&sv_echobprint);
 580         Cvar_RegisterVariable (&sv_edgefriction);
 581         Cvar_RegisterVariable (&sv_entpatch);
 582         Cvar_RegisterVariable (&sv_freezenonclients);
 583         Cvar_RegisterVariable (&sv_friction);
 584         Cvar_RegisterVariable (&sv_gameplayfix_blowupfallenzombies);
 585         Cvar_RegisterVariable (&sv_gameplayfix_consistentplayerprethink);
 586         Cvar_RegisterVariable (&sv_gameplayfix_delayprojectiles);
 587         Cvar_RegisterVariable (&sv_gameplayfix_droptofloorstartsolid);
 588         Cvar_RegisterVariable (&sv_gameplayfix_droptofloorstartsolid_nudgetocorrect);
 589         Cvar_RegisterVariable (&sv_gameplayfix_easierwaterjump);
 590         Cvar_RegisterVariable (&sv_gameplayfix_findradiusdistancetobox);
 591         Cvar_RegisterVariable (&sv_gameplayfix_gravityunaffectedbyticrate);
 592         Cvar_RegisterVariable (&sv_gameplayfix_grenadebouncedownslopes);
 593         Cvar_RegisterVariable (&sv_gameplayfix_multiplethinksperframe);
 594         Cvar_RegisterVariable (&sv_gameplayfix_noairborncorpse);
 595         Cvar_RegisterVariable (&sv_gameplayfix_noairborncorpse_allowsuspendeditems);
 596         Cvar_RegisterVariable (&sv_gameplayfix_nudgeoutofsolid);
 597         Cvar_RegisterVariable (&sv_gameplayfix_nudgeoutofsolid_separation);
 598         Cvar_RegisterVariable (&sv_gameplayfix_q2airaccelerate);
 599         Cvar_RegisterVariable (&sv_gameplayfix_nogravityonground);
 600         Cvar_RegisterVariable (&sv_gameplayfix_setmodelrealbox);
 601         Cvar_RegisterVariable (&sv_gameplayfix_slidemoveprojectiles);
 602         Cvar_RegisterVariable (&sv_gameplayfix_stepdown);
 603         Cvar_RegisterVariable (&sv_gameplayfix_stepmultipletimes);
 604         Cvar_RegisterVariable (&sv_gameplayfix_nostepmoveonsteepslopes);
 605         Cvar_RegisterVariable (&sv_gameplayfix_swiminbmodels);
 606         Cvar_RegisterVariable (&sv_gameplayfix_upwardvelocityclearsongroundflag);
 607         Cvar_RegisterVariable (&sv_gameplayfix_downtracesupportsongroundflag);
 608         Cvar_RegisterVariable (&sv_gameplayfix_q1bsptracelinereportstexture);
 609         Cvar_RegisterVariable (&sv_gameplayfix_unstickplayers);
 610         Cvar_RegisterVariable (&sv_gameplayfix_unstickentities);
 611         Cvar_RegisterVariable (&sv_gameplayfix_fixedcheckwatertransition);
 612         Cvar_RegisterVariable (&sv_gameplayfix_customstats);
 613         Cvar_RegisterVariable (&sv_gravity);
 614         Cvar_RegisterVariable (&sv_init_frame_count);
 615         Cvar_RegisterVariable (&sv_idealpitchscale);
 616         Cvar_RegisterVariable (&sv_jumpstep);
 617         Cvar_RegisterVariable (&sv_jumpvelocity);
 618         Cvar_RegisterVariable (&sv_legacy_bbox_expand);
 619         Cvar_RegisterVariable (&sv_maxairspeed);
 620         Cvar_RegisterVariable (&sv_maxrate);
 621         Cvar_RegisterVariable (&sv_maxspeed);
 622         Cvar_RegisterVariable (&sv_maxvelocity);
 623         Cvar_RegisterVariable (&sv_nostep);
 624         Cvar_RegisterVariable (&sv_playerphysicsqc);
 625         Cvar_RegisterVariable (&sv_progs);
 626         Cvar_RegisterVariable (&sv_protocolname);
 627         Cvar_RegisterVariable (&sv_random_seed);
 628         Cvar_RegisterVariable (&host_limitlocal);
 629         Cvar_RegisterVirtual(&host_limitlocal, "sv_ratelimitlocalplayer");
 630         Cvar_RegisterVariable (&sv_sound_land);
 631         Cvar_RegisterVariable (&sv_sound_watersplash);
 632         Cvar_RegisterVariable (&sv_stepheight);
 633         Cvar_RegisterVariable (&sv_stopspeed);
 634         Cvar_RegisterVariable (&sv_wallfriction);
 635         Cvar_RegisterVariable (&sv_wateraccelerate);
 636         Cvar_RegisterVariable (&sv_waterfriction);
 637         Cvar_RegisterVariable (&sv_warsowbunny_airforwardaccel);
 638         Cvar_RegisterVariable (&sv_warsowbunny_accel);
 639         Cvar_RegisterVariable (&sv_warsowbunny_topspeed);
 640         Cvar_RegisterVariable (&sv_warsowbunny_turnaccel);
 641         Cvar_RegisterVariable (&sv_warsowbunny_backtosideratio);
 642         Cvar_RegisterVariable (&sv_onlycsqcnetworking);
 643         Cvar_RegisterVariable (&sv_areadebug);
 644         Cvar_RegisterVariable (&sys_ticrate);
 645         Cvar_RegisterVariable (&sv_maxphysicsframesperserverframe);
 646         Cvar_RegisterVariable (&teamplay);
 647         Cvar_RegisterVariable (&timelimit);
 648         Cvar_RegisterVariable (&sv_threaded);
 649
 650         Cvar_RegisterVariable (&sv_rollangle);
 651         Cvar_RegisterVariable (&sv_rollspeed);
 652
 653         Cvar_RegisterVariable (&saved1);
 654         Cvar_RegisterVariable (&saved2);
 655         Cvar_RegisterVariable (&saved3);
 656         Cvar_RegisterVariable (&saved4);
 657         Cvar_RegisterVariable (&savedgamecfg);
 658         Cvar_RegisterVariable (&scratch1);
 659         Cvar_RegisterVariable (&scratch2);
 660         Cvar_RegisterVariable (&scratch3);
 661         Cvar_RegisterVariable (&scratch4);
 662         Cvar_RegisterVariable (&temp1);
 663
 664         // LadyHavoc: Nehahra uses these to pass data around cutscene demos
 665         Cvar_RegisterVariable (&nehx00);
 666         Cvar_RegisterVariable (&nehx01);
 667         Cvar_RegisterVariable (&nehx02);
 668         Cvar_RegisterVariable (&nehx03);
 669         Cvar_RegisterVariable (&nehx04);
 670         Cvar_RegisterVariable (&nehx05);
 671         Cvar_RegisterVariable (&nehx06);
 672         Cvar_RegisterVariable (&nehx07);
 673         Cvar_RegisterVariable (&nehx08);
 674         Cvar_RegisterVariable (&nehx09);
 675         Cvar_RegisterVariable (&nehx10);
 676         Cvar_RegisterVariable (&nehx11);
 677         Cvar_RegisterVariable (&nehx12);
 678         Cvar_RegisterVariable (&nehx13);
 679         Cvar_RegisterVariable (&nehx14);
 680         Cvar_RegisterVariable (&nehx15);
 681         Cvar_RegisterVariable (&nehx16);
 682         Cvar_RegisterVariable (&nehx17);
 683         Cvar_RegisterVariable (&nehx18);
 684         Cvar_RegisterVariable (&nehx19);
 685         Cvar_RegisterVariable (&cutscene); // for Nehahra but useful to other mods as well
 686
 687         Cvar_RegisterVariable (&sv_autodemo_perclient);
 688         Cvar_RegisterVariable (&sv_autodemo_perclient_nameformat);
 689         Cvar_RegisterVariable (&sv_autodemo_perclient_discardable);
 690
 691         Cvar_RegisterVariable (&halflifebsp);
 692         Cvar_RegisterVariable (&sv_mapformat_is_quake2);
 693         Cvar_RegisterVariable (&sv_mapformat_is_quake3);
 694
 695         Cvar_RegisterVariable (&sv_writepicture_quality);
 696
 697         SV_InitOperatorCommands();
 698         host.hook.SV_Shutdown = SV_Shutdown;
 699
 700         sv_mempool = Mem_AllocPool("server", 0, NULL);
 701
 702         SV_ServerOptions();
 703         Cvar_Callback(&sv_netport);
 704 }
 705
 706 static void SV_SaveEntFile_f(cmd_state_t *cmd)
 707 {
 708         char vabuf[1024];
 709         if (!sv.active || !sv.worldmodel)
 710         {
 711                 Con_Print("Not running a server\n");
 712                 return;
 713         }
 714         FS_WriteFile(va(vabuf, sizeof(vabuf), "%s.ent", sv.worldnamenoextension), sv.worldmodel->brush.entities, (fs_offset_t)strlen(sv.worldmodel->brush.entities));
 715 }
 716
 717 /*
 718 ==============================================================================
 719
 720 CLIENT SPAWNING
 721
 722 ==============================================================================
 723 */
 724
 725 /*
 726 ================
 727 SV_SendServerinfo
 728
 729 Sends the first message from the server to a connected client.
 730 This will be sent on the initial connection and upon each server load.
 731 ================
 732 */
 733 void SV_SendServerinfo (client_t *client)
 734 {
 735         prvm_prog_t *prog = SVVM_prog;
 736         int i;
 737         char message[128];
 738         char vabuf[1024];
 739
 740         // we know that this client has a netconnection and thus is not a bot
 741
 742         // edicts get reallocated on level changes, so we need to update it here
 743         client->edict = PRVM_EDICT_NUM((client - svs.clients) + 1);
 744
 745         // clear cached stuff that depends on the level
 746         client->weaponmodel[0] = 0;
 747         client->weaponmodelindex = 0;
 748
 749         // LadyHavoc: clear entityframe tracking
 750         client->latestframenum = 0;
 751
 752         // initialize the movetime, so a speedhack can't make use of the time before this client joined
 753         client->cmd.time = sv.time;
 754
 755         if (client->entitydatabase)
 756                 EntityFrame_FreeDatabase(client->entitydatabase);
 757         if (client->entitydatabase4)
 758                 EntityFrame4_FreeDatabase(client->entitydatabase4);
 759         if (client->entitydatabase5)
 760                 EntityFrame5_FreeDatabase(client->entitydatabase5);
 761
 762         memset(client->stats, 0, sizeof(client->stats));
 763         memset(client->statsdeltabits, 0, sizeof(client->statsdeltabits));
 764
 765         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)
 766         {
 767                 if (sv.protocol == PROTOCOL_DARKPLACES1 || sv.protocol == PROTOCOL_DARKPLACES2 || sv.protocol == PROTOCOL_DARKPLACES3)
 768                         client->entitydatabase = EntityFrame_AllocDatabase(sv_mempool);
 769                 else if (sv.protocol == PROTOCOL_DARKPLACES4)
 770                         client->entitydatabase4 = EntityFrame4_AllocDatabase(sv_mempool);
 771                 else
 772                         client->entitydatabase5 = EntityFrame5_AllocDatabase(sv_mempool);
 773         }
 774
 775         // reset csqc entity versions
 776         for (i = 0;i < prog->max_edicts;i++)
 777         {
 778                 client->csqcentityscope[i] = 0;
 779                 client->csqcentitysendflags[i] = 0xFFFFFF;
 780         }
 781         for (i = 0;i < NUM_CSQCENTITYDB_FRAMES;i++)
 782         {
 783                 client->csqcentityframehistory[i].num = 0;
 784                 client->csqcentityframehistory[i].framenum = -1;
 785         }
 786         client->csqcnumedicts = 0;
 787         client->csqcentityframehistory_next = 0;
 788
 789         SZ_Clear (&client->netconnection->message);
 790         MSG_WriteByte (&client->netconnection->message, svc_print);
 791         dpsnprintf (message, sizeof (message), "\nServer: %s build %s (progs %i crc)\n", gamename, buildstring, prog->filecrc);
 792         MSG_WriteString (&client->netconnection->message,message);
 793
 794         SV_StopDemoRecording(client); // to split up demos into different files
 795         if(sv_autodemo_perclient.integer)
 796         {
 797                 char demofile[MAX_OSPATH];
 798                 char ipaddress[MAX_QPATH];
 799                 size_t j;
 800
 801                 // start a new demo file
 802                 LHNETADDRESS_ToString(&(client->netconnection->peeraddress), ipaddress, sizeof(ipaddress), true);
 803                 for(j = 0; ipaddress[j]; ++j)
 804                         if(!isalnum(ipaddress[j]))
 805                                 ipaddress[j] = '-';
 806                 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);
 807
 808                 SV_StartDemoRecording(client, demofile, -1);
 809         }
 810
 811         //[515]: init csprogs according to version of svprogs, check the crc, etc.
 812         if (sv.csqc_progname[0])
 813         {
 814                 Con_DPrintf("sending csqc info to client (\"%s\" with size %i and crc %i)\n", sv.csqc_progname, sv.csqc_progsize, sv.csqc_progcrc);
 815                 MSG_WriteByte (&client->netconnection->message, svc_stufftext);
 816                 MSG_WriteString (&client->netconnection->message, va(vabuf, sizeof(vabuf), "csqc_progname %s\n", sv.csqc_progname));
 817                 MSG_WriteByte (&client->netconnection->message, svc_stufftext);
 818                 MSG_WriteString (&client->netconnection->message, va(vabuf, sizeof(vabuf), "csqc_progsize %i\n", sv.csqc_progsize));
 819                 MSG_WriteByte (&client->netconnection->message, svc_stufftext);
 820                 MSG_WriteString (&client->netconnection->message, va(vabuf, sizeof(vabuf), "csqc_progcrc %i\n", sv.csqc_progcrc));
 821
 822                 if(client->sv_demo_file != NULL)
 823                 {
 824                         int k;
 825                         static char buf[NET_MAXMESSAGE];
 826                         sizebuf_t sb;
 827
 828                         sb.data = (unsigned char *) buf;
 829                         sb.maxsize = sizeof(buf);
 830                         k = 0;
 831                         while(MakeDownloadPacket(sv.csqc_progname, svs.csqc_progdata, sv.csqc_progsize, sv.csqc_progcrc, k++, &sb, sv.protocol))
 832                                 SV_WriteDemoMessage(client, &sb, false);
 833                 }
 834
 835                 //[515]: init stufftext string (it is sent before svc_serverinfo)
 836                 if (PRVM_GetString(prog, PRVM_serverglobalstring(SV_InitCmd)))
 837                 {
 838                         MSG_WriteByte (&client->netconnection->message, svc_stufftext);
 839                         MSG_WriteString (&client->netconnection->message, va(vabuf, sizeof(vabuf), "%s\n", PRVM_GetString(prog, PRVM_serverglobalstring(SV_InitCmd))));
 840                 }
 841         }
 842
 843         //if (sv_allowdownloads.integer)
 844         // always send the info that the server supports the protocol, even if downloads are forbidden
 845         // only because of that, the CSQC exception can work
 846         {
 847                 MSG_WriteByte (&client->netconnection->message, svc_stufftext);
 848                 MSG_WriteString (&client->netconnection->message, "cl_serverextension_download 2\n");
 849         }
 850
 851         // send at this time so it's guaranteed to get executed at the right time
 852         {
 853                 client_t *save;
 854                 save = host_client;
 855                 host_client = client;
 856                 Curl_SendRequirements();
 857                 host_client = save;
 858         }
 859
 860         MSG_WriteByte (&client->netconnection->message, svc_serverinfo);
 861         MSG_WriteLong (&client->netconnection->message, Protocol_NumberForEnum(sv.protocol));
 862         MSG_WriteByte (&client->netconnection->message, svs.maxclients);
 863
 864         if (!coop.integer && deathmatch.integer)
 865                 MSG_WriteByte (&client->netconnection->message, GAME_DEATHMATCH);
 866         else
 867                 MSG_WriteByte (&client->netconnection->message, GAME_COOP);
 868
 869         MSG_WriteString (&client->netconnection->message,PRVM_GetString(prog, PRVM_serveredictstring(prog->edicts, message)));
 870
 871         for (i = 1;i < MAX_MODELS && sv.model_precache[i][0];i++)
 872                 MSG_WriteString (&client->netconnection->message, sv.model_precache[i]);
 873         MSG_WriteByte (&client->netconnection->message, 0);
 874
 875         for (i = 1;i < MAX_SOUNDS && sv.sound_precache[i][0];i++)
 876                 MSG_WriteString (&client->netconnection->message, sv.sound_precache[i]);
 877         MSG_WriteByte (&client->netconnection->message, 0);
 878
 879 // send music
 880         MSG_WriteByte (&client->netconnection->message, svc_cdtrack);
 881         MSG_WriteByte (&client->netconnection->message, (int)PRVM_serveredictfloat(prog->edicts, sounds));
 882         MSG_WriteByte (&client->netconnection->message, (int)PRVM_serveredictfloat(prog->edicts, sounds));
 883
 884 // set view
 885 // store this in clientcamera, too
 886         client->clientcamera = PRVM_NUM_FOR_EDICT(client->edict);
 887         MSG_WriteByte (&client->netconnection->message, svc_setview);
 888         MSG_WriteShort (&client->netconnection->message, client->clientcamera);
 889
 890         MSG_WriteByte (&client->netconnection->message, svc_signonnum);
 891         MSG_WriteByte (&client->netconnection->message, 1);
 892
 893         client->prespawned = false;             // need prespawn, spawn, etc
 894         client->spawned = false;                // need prespawn, spawn, etc
 895         client->begun = false;                  // need prespawn, spawn, etc
 896         client->sendsignon = 1;                 // send this message, and increment to 2, 2 will be set to 0 by the prespawn command
 897
 898         // clear movement info until client enters the new level properly
 899         memset(&client->cmd, 0, sizeof(client->cmd));
 900         client->movesequence = 0;
 901         client->movement_highestsequence_seen = 0;
 902         memset(&client->movement_count, 0, sizeof(client->movement_count));
 903         client->ping = 0;
 904
 905         // allow the client some time to send his keepalives, even if map loading took ages
 906         client->netconnection->timeout = host.realtime + net_connecttimeout.value;
 907 }
 908
 909 /*
 910 ================
 911 SV_ConnectClient
 912
 913 Initializes a client_t for a new net connection.  This will only be called
 914 once for a player each game, not once for each level change.
 915 ================
 916 */
 917 void SV_ConnectClient (int clientnum, netconn_t *netconnection)
 918 {
 919         prvm_prog_t *prog = SVVM_prog;
 920         client_t                *client;
 921         int                             i;
 922
 923         client = svs.clients + clientnum;
 924
 925 // set up the client_t
 926         if (sv.loadgame)
 927         {
 928                 float backupparms[NUM_SPAWN_PARMS];
 929                 memcpy(backupparms, client->spawn_parms, sizeof(backupparms));
 930                 memset(client, 0, sizeof(*client));
 931                 memcpy(client->spawn_parms, backupparms, sizeof(backupparms));
 932         }
 933         else
 934                 memset(client, 0, sizeof(*client));
 935         client->active = true;
 936         client->netconnection = netconnection;
 937
 938         Con_DPrintf("Client %s connected\n", client->netconnection ? client->netconnection->address : "botclient");
 939
 940         if(client->netconnection && client->netconnection->crypto.authenticated)
 941         {
 942                 Con_Printf("%s connection to %s has been established: client is %s@%s%.*s, I am %.*s@%s%.*s\n",
 943                                 client->netconnection->crypto.use_aes ? "Encrypted" : "Authenticated",
 944                                 client->netconnection->address,
 945                                 client->netconnection->crypto.client_idfp[0] ? client->netconnection->crypto.client_idfp : "-",
 946                                 (client->netconnection->crypto.client_issigned || !client->netconnection->crypto.client_keyfp[0]) ? "" : "~",
 947                                 crypto_keyfp_recommended_length, client->netconnection->crypto.client_keyfp[0] ? client->netconnection->crypto.client_keyfp : "-",
 948                                 crypto_keyfp_recommended_length, client->netconnection->crypto.server_idfp[0] ? client->netconnection->crypto.server_idfp : "-",
 949                                 (client->netconnection->crypto.server_issigned || !client->netconnection->crypto.server_keyfp[0]) ? "" : "~",
 950                                 crypto_keyfp_recommended_length, client->netconnection->crypto.server_keyfp[0] ? client->netconnection->crypto.server_keyfp : "-"
 951                                 );
 952         }
 953
 954         strlcpy(client->name, "unconnected", sizeof(client->name));
 955         strlcpy(client->old_name, "unconnected", sizeof(client->old_name));
 956         client->prespawned = false;
 957         client->spawned = false;
 958         client->begun = false;
 959         client->edict = PRVM_EDICT_NUM(clientnum+1);
 960         if (client->netconnection)
 961                 client->netconnection->message.allowoverflow = true;            // we can catch it
 962         // prepare the unreliable message buffer
 963         client->unreliablemsg.data = client->unreliablemsg_data;
 964         client->unreliablemsg.maxsize = sizeof(client->unreliablemsg_data);
 965         // updated by receiving "rate" command from client, this is also the default if not using a DP client
 966         client->rate = 1000000000;
 967         client->connecttime = host.realtime;
 968
 969         if (!sv.loadgame)
 970         {
 971                 // call the progs to get default spawn parms for the new client
 972                 // set self to world to intentionally cause errors with broken SetNewParms code in some mods
 973                 PRVM_serverglobalfloat(time) = sv.time;
 974                 PRVM_serverglobaledict(self) = 0;
 975                 prog->ExecuteProgram(prog, PRVM_serverfunction(SetNewParms), "QC function SetNewParms is missing");
 976                 for (i=0 ; i<NUM_SPAWN_PARMS ; i++)
 977                         client->spawn_parms[i] = (&PRVM_serverglobalfloat(parm1))[i];
 978
 979                 // set up the entity for this client (including .colormap, .team, etc)
 980                 PRVM_ED_ClearEdict(prog, client->edict);
 981         }
 982
 983         // don't call SendServerinfo for a fresh botclient because its fields have
 984         // not been set up by the qc yet
 985         if (client->netconnection)
 986                 SV_SendServerinfo (client);
 987         else
 988                 client->prespawned = client->spawned = client->begun = true;
 989 }
 990
 991 /*
 992 =====================
 993 SV_DropClient
 994
 995 Called when the player is getting totally kicked off the host
 996 if (leaving = true), don't bother sending signofs
 997 =====================
 998 */
 999 void SV_DropClient(qbool leaving, const char *fmt, ... )
1000 {
1001         prvm_prog_t *prog = SVVM_prog;
1002         int i;
1003
1004         va_list argptr;
1005         char reason[512] = "";
1006
1007         Con_Printf("Client \"%s\" dropped", host_client->name);
1008
1009         if(fmt)
1010         {
1011                 va_start(argptr, fmt);
1012                 dpvsnprintf(reason, sizeof(reason), fmt, argptr);
1013                 va_end(argptr);
1014
1015                 Con_Printf(" (%s)\n", reason);
1016         }
1017         else
1018         {
1019                 Con_Printf(" \n");
1020         }
1021
1022         SV_StopDemoRecording(host_client);
1023
1024         // make sure edict is not corrupt (from a level change for example)
1025         host_client->edict = PRVM_EDICT_NUM(host_client - svs.clients + 1);
1026
1027         if (host_client->netconnection)
1028         {
1029                 // tell the client to be gone
1030                 if (!leaving)
1031                 {
1032                         // LadyHavoc: no opportunity for resending, so use unreliable 3 times
1033                         unsigned char bufdata[520]; // Disconnect reason string can be 512 characters
1034                         sizebuf_t buf;
1035                         memset(&buf, 0, sizeof(buf));
1036                         buf.data = bufdata;
1037                         buf.maxsize = sizeof(bufdata);
1038                         MSG_WriteByte(&buf, svc_disconnect);
1039                         if(fmt)
1040                         {
1041                                 if(sv.protocol == PROTOCOL_DARKPLACES8)
1042                                         MSG_WriteString(&buf, reason);
1043                                 else
1044                                         SV_ClientPrintf("%s\n", reason);
1045                         }
1046                         NetConn_SendUnreliableMessage(host_client->netconnection, &buf, sv.protocol, 10000, 0, false);
1047                         NetConn_SendUnreliableMessage(host_client->netconnection, &buf, sv.protocol, 10000, 0, false);
1048                         NetConn_SendUnreliableMessage(host_client->netconnection, &buf, sv.protocol, 10000, 0, false);
1049                 }
1050         }
1051
1052         // call qc ClientDisconnect function
1053         // LadyHavoc: don't call QC if server is dead (avoids recursive
1054         // Host_Error in some mods when they run out of edicts)
1055         if (host_client->clientconnectcalled && sv.active && host_client->edict)
1056         {
1057                 // call the prog function for removing a client
1058                 // this will set the body to a dead frame, among other things
1059                 int saveSelf = PRVM_serverglobaledict(self);
1060                 host_client->clientconnectcalled = false;
1061                 PRVM_serverglobalfloat(time) = sv.time;
1062                 PRVM_serverglobaledict(self) = PRVM_EDICT_TO_PROG(host_client->edict);
1063                 prog->ExecuteProgram(prog, PRVM_serverfunction(ClientDisconnect), "QC function ClientDisconnect is missing");
1064                 PRVM_serverglobaledict(self) = saveSelf;
1065         }
1066
1067         if (host_client->netconnection)
1068         {
1069                 // break the net connection
1070                 NetConn_Close(host_client->netconnection);
1071                 host_client->netconnection = NULL;
1072         }
1073         if(fmt)
1074                 SV_BroadcastPrintf("\003^3%s left the game (%s)\n", host_client->name, reason);
1075         else
1076                 SV_BroadcastPrintf("\003^3%s left the game\n", host_client->name);
1077
1078         // if a download is active, close it
1079         if (host_client->download_file)
1080         {
1081                 Con_DPrintf("Download of %s aborted when %s dropped\n", host_client->download_name, host_client->name);
1082                 FS_Close(host_client->download_file);
1083                 host_client->download_file = NULL;
1084                 host_client->download_name[0] = 0;
1085                 host_client->download_expectedposition = 0;
1086                 host_client->download_started = false;
1087         }
1088
1089         // remove leaving player from scoreboard
1090         host_client->name[0] = 0;
1091         host_client->colors = 0;
1092         host_client->frags = 0;
1093         // send notification to all clients
1094         // get number of client manually just to make sure we get it right...
1095         i = host_client - svs.clients;
1096         MSG_WriteByte (&sv.reliable_datagram, svc_updatename);
1097         MSG_WriteByte (&sv.reliable_datagram, i);
1098         MSG_WriteString (&sv.reliable_datagram, host_client->name);
1099         MSG_WriteByte (&sv.reliable_datagram, svc_updatecolors);
1100         MSG_WriteByte (&sv.reliable_datagram, i);
1101         MSG_WriteByte (&sv.reliable_datagram, host_client->colors);
1102         MSG_WriteByte (&sv.reliable_datagram, svc_updatefrags);
1103         MSG_WriteByte (&sv.reliable_datagram, i);
1104         MSG_WriteShort (&sv.reliable_datagram, host_client->frags);
1105
1106         // free the client now
1107         if (host_client->entitydatabase)
1108                 EntityFrame_FreeDatabase(host_client->entitydatabase);
1109         if (host_client->entitydatabase4)
1110                 EntityFrame4_FreeDatabase(host_client->entitydatabase4);
1111         if (host_client->entitydatabase5)
1112                 EntityFrame5_FreeDatabase(host_client->entitydatabase5);
1113
1114         if (sv.active)
1115         {
1116                 // clear a fields that matter to DP_SV_CLIENTNAME and DP_SV_CLIENTCOLORS, and also frags
1117                 PRVM_ED_ClearEdict(prog, host_client->edict);
1118         }
1119
1120         // clear the client struct (this sets active to false)
1121         memset(host_client, 0, sizeof(*host_client));
1122
1123         // update server listing on the master because player count changed
1124         // (which the master uses for filtering empty/full servers)
1125         NetConn_Heartbeat(1);
1126
1127         if (sv.loadgame)
1128         {
1129                 for (i = 0;i < svs.maxclients;i++)
1130                         if (svs.clients[i].active && !svs.clients[i].spawned)
1131                                 break;
1132                 if (i == svs.maxclients)
1133                 {
1134                         Con_Printf("Loaded game, everyone rejoined - unpausing\n");
1135                         sv.paused = sv.loadgame = false; // we're basically done with loading now
1136                 }
1137         }
1138 }
1139
1140 static void SV_StartDownload_f(cmd_state_t *cmd)
1141 {
1142         if (host_client->download_file)
1143                 host_client->download_started = true;
1144 }
1145
1146 /*
1147  * Compression extension negotiation:
1148  *
1149  * Server to client:
1150  *   cl_serverextension_download 2
1151  *
1152  * Client to server:
1153  *   download <filename> <list of zero or more suppported compressions in order of preference>
1154  * e.g.
1155  *   download maps/map1.bsp lzo deflate huffman
1156  *
1157  * Server to client:
1158  *   cl_downloadbegin <compressed size> <filename> <compression method actually used>
1159  * e.g.
1160  *   cl_downloadbegin 123456 maps/map1.bsp deflate
1161  *
1162  * The server may choose not to compress the file by sending no compression name, like:
1163  *   cl_downloadbegin 345678 maps/map1.bsp
1164  *
1165  * NOTE: the "download" command may only specify compression algorithms if
1166  *       cl_serverextension_download is 2!
1167  *       If cl_serverextension_download has a different value, the client must
1168  *       assume this extension is not supported!
1169  */
1170
1171 static void Download_CheckExtensions(cmd_state_t *cmd)
1172 {
1173         int i;
1174         int argc = Cmd_Argc(cmd);
1175
1176         // first reset them all
1177         host_client->download_deflate = false;
1178
1179         for(i = 2; i < argc; ++i)
1180         {
1181                 if(!strcmp(Cmd_Argv(cmd, i), "deflate"))
1182                 {
1183                         host_client->download_deflate = true;
1184                         break;
1185                 }
1186         }
1187 }
1188
1189 static void SV_Download_f(cmd_state_t *cmd)
1190 {
1191         const char *whichpack, *whichpack2, *extension;
1192         qbool is_csqc; // so we need to check only once
1193
1194         if (Cmd_Argc(cmd) < 2)
1195         {
1196                 SV_ClientPrintf("usage: download <filename> {<extensions>}*\n");
1197                 SV_ClientPrintf("       supported extensions: deflate\n");
1198                 return;
1199         }
1200
1201         if (FS_CheckNastyPath(Cmd_Argv(cmd, 1), false))
1202         {
1203                 SV_ClientPrintf("Download rejected: nasty filename \"%s\"\n", Cmd_Argv(cmd, 1));
1204                 return;
1205         }
1206
1207         if (host_client->download_file)
1208         {
1209                 // at this point we'll assume the previous download should be aborted
1210                 Con_DPrintf("Download of %s aborted by %s starting a new download\n", host_client->download_name, host_client->name);
1211                 SV_ClientCommands("\nstopdownload\n");
1212
1213                 // close the file and reset variables
1214                 FS_Close(host_client->download_file);
1215                 host_client->download_file = NULL;
1216                 host_client->download_name[0] = 0;
1217                 host_client->download_expectedposition = 0;
1218                 host_client->download_started = false;
1219         }
1220
1221         is_csqc = (sv.csqc_progname[0] && strcmp(Cmd_Argv(cmd, 1), sv.csqc_progname) == 0);
1222
1223         if (!sv_allowdownloads.integer && !is_csqc)
1224         {
1225                 SV_ClientPrintf("Downloads are disabled on this server\n");
1226                 SV_ClientCommands("\nstopdownload\n");
1227                 return;
1228         }
1229
1230         Download_CheckExtensions(cmd);
1231
1232         strlcpy(host_client->download_name, Cmd_Argv(cmd, 1), sizeof(host_client->download_name));
1233         extension = FS_FileExtension(host_client->download_name);
1234
1235         // host_client is asking to download a specified file
1236         if (developer_extra.integer)
1237                 Con_DPrintf("Download request for %s by %s\n", host_client->download_name, host_client->name);
1238
1239         if(is_csqc)
1240         {
1241                 char extensions[MAX_QPATH]; // make sure this can hold all extensions
1242                 extensions[0] = '\0';
1243
1244                 if(host_client->download_deflate)
1245                         strlcat(extensions, " deflate", sizeof(extensions));
1246
1247                 Con_DPrintf("Downloading %s to %s\n", host_client->download_name, host_client->name);
1248
1249                 if(host_client->download_deflate && svs.csqc_progdata_deflated)
1250                         host_client->download_file = FS_FileFromData(svs.csqc_progdata_deflated, svs.csqc_progsize_deflated, true);
1251                 else
1252                         host_client->download_file = FS_FileFromData(svs.csqc_progdata, sv.csqc_progsize, true);
1253
1254                 // no, no space is needed between %s and %s :P
1255                 SV_ClientCommands("\ncl_downloadbegin %i %s%s\n", (int)FS_FileSize(host_client->download_file), host_client->download_name, extensions);
1256
1257                 host_client->download_expectedposition = 0;
1258                 host_client->download_started = false;
1259                 host_client->sendsignon = true; // make sure this message is sent
1260                 return;
1261         }
1262
1263         if (!FS_FileExists(host_client->download_name))
1264         {
1265                 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);
1266                 SV_ClientCommands("\nstopdownload\n");
1267                 return;
1268         }
1269
1270         // check if the user is trying to download part of registered Quake(r)
1271         whichpack = FS_WhichPack(host_client->download_name);
1272         whichpack2 = FS_WhichPack("gfx/pop.lmp");
1273         if ((whichpack && whichpack2 && !strcasecmp(whichpack, whichpack2)) || FS_IsRegisteredQuakePack(host_client->download_name))
1274         {
1275                 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);
1276                 SV_ClientCommands("\nstopdownload\n");
1277                 return;
1278         }
1279
1280         // check if the server has forbidden archive downloads entirely
1281         if (!sv_allowdownloads_inarchive.integer)
1282         {
1283                 whichpack = FS_WhichPack(host_client->download_name);
1284                 if (whichpack)
1285                 {
1286                         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);
1287                         SV_ClientCommands("\nstopdownload\n");
1288                         return;
1289                 }
1290         }
1291
1292         if (!sv_allowdownloads_config.integer)
1293         {
1294                 if (!strcasecmp(extension, "cfg"))
1295                 {
1296                         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);
1297                         SV_ClientCommands("\nstopdownload\n");
1298                         return;
1299                 }
1300         }
1301
1302         if (!sv_allowdownloads_dlcache.integer)
1303         {
1304                 if (!strncasecmp(host_client->download_name, "dlcache/", 8))
1305                 {
1306                         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);
1307                         SV_ClientCommands("\nstopdownload\n");
1308                         return;
1309                 }
1310         }
1311
1312         if (!sv_allowdownloads_archive.integer)
1313         {
1314                 if (!strcasecmp(extension, "pak") || !strcasecmp(extension, "pk3") || !strcasecmp(extension, "dpk"))
1315                 {
1316                         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);
1317                         SV_ClientCommands("\nstopdownload\n");
1318                         return;
1319                 }
1320         }
1321
1322         host_client->download_file = FS_OpenVirtualFile(host_client->download_name, true);
1323         if (!host_client->download_file)
1324         {
1325                 SV_ClientPrintf("Download rejected: server could not open the file \"%s\"\n", host_client->download_name);
1326                 SV_ClientCommands("\nstopdownload\n");
1327                 return;
1328         }
1329
1330         if (FS_FileSize(host_client->download_file) > 1<<30)
1331         {
1332                 SV_ClientPrintf("Download rejected: file \"%s\" is very large\n", host_client->download_name);
1333                 SV_ClientCommands("\nstopdownload\n");
1334                 FS_Close(host_client->download_file);
1335                 host_client->download_file = NULL;
1336                 return;
1337         }
1338
1339         if (FS_FileSize(host_client->download_file) < 0)
1340         {
1341                 SV_ClientPrintf("Download rejected: file \"%s\" is not a regular file\n", host_client->download_name);
1342                 SV_ClientCommands("\nstopdownload\n");
1343                 FS_Close(host_client->download_file);
1344                 host_client->download_file = NULL;
1345                 return;
1346         }
1347
1348         Con_DPrintf("Downloading %s to %s\n", host_client->download_name, host_client->name);
1349
1350         /*
1351          * we can only do this if we would actually deflate on the fly
1352          * which we do not (yet)!
1353         {
1354                 char extensions[MAX_QPATH]; // make sure this can hold all extensions
1355                 extensions[0] = '\0';
1356
1357                 if(host_client->download_deflate)
1358                         strlcat(extensions, " deflate", sizeof(extensions));
1359
1360                 // no, no space is needed between %s and %s :P
1361                 SV_ClientCommands("\ncl_downloadbegin %i %s%s\n", (int)FS_FileSize(host_client->download_file), host_client->download_name, extensions);
1362         }
1363         */
1364         SV_ClientCommands("\ncl_downloadbegin %i %s\n", (int)FS_FileSize(host_client->download_file), host_client->download_name);
1365
1366         host_client->download_expectedposition = 0;
1367         host_client->download_started = false;
1368         host_client->sendsignon = true; // make sure this message is sent
1369
1370         // the rest of the download process is handled in SV_SendClientDatagram
1371         // and other code dealing with svc_downloaddata and clc_ackdownloaddata
1372         //
1373         // no svc_downloaddata messages will be sent until sv_startdownload is
1374         // sent by the client
1375 }
1376
1377 /*
1378 ==============================================================================
1379
1380 SERVER SPAWNING
1381
1382 ==============================================================================
1383 */
1384
1385 /*
1386 ================
1387 SV_ModelIndex
1388
1389 ================
1390 */
1391 int SV_ModelIndex(const char *s, int precachemode)
1392 {
1393         int i, limit = ((sv.protocol == PROTOCOL_QUAKE || sv.protocol == PROTOCOL_QUAKEDP || sv.protocol == PROTOCOL_NEHAHRAMOVIE) ? 256 : MAX_MODELS);
1394         char filename[MAX_QPATH];
1395         if (!s || !*s)
1396                 return 0;
1397         // testing
1398         //if (precachemode == 2)
1399         //      return 0;
1400         strlcpy(filename, s, sizeof(filename));
1401         for (i = 2;i < limit;i++)
1402         {
1403                 if (!sv.model_precache[i][0])
1404                 {
1405                         if (precachemode)
1406                         {
1407                                 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))
1408                                 {
1409                                         Con_Printf("SV_ModelIndex(\"%s\"): precache_model can only be done in spawn functions\n", filename);
1410                                         return 0;
1411                                 }
1412                                 if (precachemode == 1)
1413                                         Con_Printf("SV_ModelIndex(\"%s\"): not precached (fix your code), precaching anyway\n", filename);
1414                                 strlcpy(sv.model_precache[i], filename, sizeof(sv.model_precache[i]));
1415                                 if (sv.state == ss_loading)
1416                                 {
1417                                         // running from SV_SpawnServer which is launched from the client console command interpreter
1418                                         sv.models[i] = Mod_ForName (sv.model_precache[i], true, false, s[0] == '*' ? sv.worldname : NULL);
1419                                 }
1420                                 else
1421                                 {
1422                                         if (svs.threaded)
1423                                         {
1424                                                 // 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
1425                                                 sv.models[i] = Mod_FindName (sv.model_precache[i], s[0] == '*' ? sv.worldname : NULL);
1426                                         }
1427                                         else
1428                                         {
1429                                                 // running single threaded, so we can load the model here
1430                                                 sv.models[i] = Mod_ForName (sv.model_precache[i], true, false, s[0] == '*' ? sv.worldname : NULL);
1431                                         }
1432                                         MSG_WriteByte(&sv.reliable_datagram, svc_precache);
1433                                         MSG_WriteShort(&sv.reliable_datagram, i);
1434                                         MSG_WriteString(&sv.reliable_datagram, filename);
1435                                 }
1436                                 return i;
1437                         }
1438                         Con_Printf("SV_ModelIndex(\"%s\"): not precached\n", filename);
1439                         return 0;
1440                 }
1441                 if (!strcmp(sv.model_precache[i], filename))
1442                         return i;
1443         }
1444         Con_Printf("SV_ModelIndex(\"%s\"): i (%i) == MAX_MODELS (%i)\n", filename, i, MAX_MODELS);
1445         return 0;
1446 }
1447
1448 /*
1449 ================
1450 SV_SoundIndex
1451
1452 ================
1453 */
1454 int SV_SoundIndex(const char *s, int precachemode)
1455 {
1456         int i, limit = ((sv.protocol == PROTOCOL_QUAKE || sv.protocol == PROTOCOL_QUAKEDP || sv.protocol == PROTOCOL_NEHAHRAMOVIE || sv.protocol == PROTOCOL_NEHAHRABJP) ? 256 : MAX_SOUNDS);
1457         char filename[MAX_QPATH];
1458         if (!s || !*s)
1459                 return 0;
1460         // testing
1461         //if (precachemode == 2)
1462         //      return 0;
1463         strlcpy(filename, s, sizeof(filename));
1464         for (i = 1;i < limit;i++)
1465         {
1466                 if (!sv.sound_precache[i][0])
1467                 {
1468                         if (precachemode)
1469                         {
1470                                 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))
1471                                 {
1472                                         Con_Printf("SV_SoundIndex(\"%s\"): precache_sound can only be done in spawn functions\n", filename);
1473                                         return 0;
1474                                 }
1475                                 if (precachemode == 1)
1476                                         Con_Printf("SV_SoundIndex(\"%s\"): not precached (fix your code), precaching anyway\n", filename);
1477                                 strlcpy(sv.sound_precache[i], filename, sizeof(sv.sound_precache[i]));
1478                                 if (sv.state != ss_loading)
1479                                 {
1480                                         MSG_WriteByte(&sv.reliable_datagram, svc_precache);
1481                                         MSG_WriteShort(&sv.reliable_datagram, i + 32768);
1482                                         MSG_WriteString(&sv.reliable_datagram, filename);
1483                                 }
1484                                 return i;
1485                         }
1486                         Con_Printf("SV_SoundIndex(\"%s\"): not precached\n", filename);
1487                         return 0;
1488                 }
1489                 if (!strcmp(sv.sound_precache[i], filename))
1490                         return i;
1491         }
1492         Con_Printf("SV_SoundIndex(\"%s\"): i (%i) == MAX_SOUNDS (%i)\n", filename, i, MAX_SOUNDS);
1493         return 0;
1494 }
1495
1496 /*
1497 ================
1498 SV_ParticleEffectIndex
1499
1500 ================
1501 */
1502 int SV_ParticleEffectIndex(const char *name)
1503 {
1504         int i, argc, linenumber, effectnameindex;
1505         int filepass;
1506         fs_offset_t filesize;
1507         unsigned char *filedata;
1508         const char *text;
1509         const char *textstart;
1510         //const char *textend;
1511         char argv[16][1024];
1512         char filename[MAX_QPATH];
1513         if (!sv.particleeffectnamesloaded)
1514         {
1515                 sv.particleeffectnamesloaded = true;
1516                 memset(sv.particleeffectname, 0, sizeof(sv.particleeffectname));
1517                 for (i = 0;i < EFFECT_TOTAL;i++)
1518                         strlcpy(sv.particleeffectname[i], standardeffectnames[i], sizeof(sv.particleeffectname[i]));
1519                 for (filepass = 0;;filepass++)
1520                 {
1521                         if (filepass == 0)
1522                                 dpsnprintf(filename, sizeof(filename), "effectinfo.txt");
1523                         else if (filepass == 1)
1524                                 dpsnprintf(filename, sizeof(filename), "%s_effectinfo.txt", sv.worldnamenoextension);
1525                         else
1526                                 break;
1527                         filedata = FS_LoadFile(filename, tempmempool, true, &filesize);
1528                         if (!filedata)
1529                                 continue;
1530                         textstart = (const char *)filedata;
1531                         //textend = (const char *)filedata + filesize;
1532                         text = textstart;
1533                         for (linenumber = 1;;linenumber++)
1534                         {
1535                                 argc = 0;
1536                                 for (;;)
1537                                 {
1538                                         if (!COM_ParseToken_Simple(&text, true, false, true) || !strcmp(com_token, "\n"))
1539                                                 break;
1540                                         if (argc < 16)
1541                                         {
1542                                                 strlcpy(argv[argc], com_token, sizeof(argv[argc]));
1543                                                 argc++;
1544                                         }
1545                                 }
1546                                 if (com_token[0] == 0)
1547                                         break; // if the loop exited and it's not a \n, it's EOF
1548                                 if (argc < 1)
1549                                         continue;
1550                                 if (!strcmp(argv[0], "effect"))
1551                                 {
1552                                         if (argc == 2)
1553                                         {
1554                                                 for (effectnameindex = 1;effectnameindex < MAX_PARTICLEEFFECTNAME;effectnameindex++)
1555                                                 {
1556                                                         if (sv.particleeffectname[effectnameindex][0])
1557                                                         {
1558                                                                 if (!strcmp(sv.particleeffectname[effectnameindex], argv[1]))
1559                                                                         break;
1560                                                         }
1561                                                         else
1562                                                         {
1563                                                                 strlcpy(sv.particleeffectname[effectnameindex], argv[1], sizeof(sv.particleeffectname[effectnameindex]));
1564                                                                 break;
1565                                                         }
1566                                                 }
1567                                                 // if we run out of names, abort
1568                                                 if (effectnameindex == MAX_PARTICLEEFFECTNAME)
1569                                                 {
1570                                                         Con_Printf("%s:%i: too many effects!\n", filename, linenumber);
1571                                                         break;
1572                                                 }
1573                                         }
1574                                 }
1575                         }
1576                         Mem_Free(filedata);
1577                 }
1578         }
1579         // search for the name
1580         for (effectnameindex = 1;effectnameindex < MAX_PARTICLEEFFECTNAME && sv.particleeffectname[effectnameindex][0];effectnameindex++)
1581                 if (!strcmp(sv.particleeffectname[effectnameindex], name))
1582                         return effectnameindex;
1583         // return 0 if we couldn't find it
1584         return 0;
1585 }
1586
1587 model_t *SV_GetModelByIndex(int modelindex)
1588 {
1589         return (modelindex > 0 && modelindex < MAX_MODELS) ? sv.models[modelindex] : NULL;
1590 }
1591
1592 model_t *SV_GetModelFromEdict(prvm_edict_t *ed)
1593 {
1594         prvm_prog_t *prog = SVVM_prog;
1595         int modelindex;
1596         if (!ed || ed->free)
1597                 return NULL;
1598         modelindex = (int)PRVM_serveredictfloat(ed, modelindex);
1599         return (modelindex > 0 && modelindex < MAX_MODELS) ? sv.models[modelindex] : NULL;
1600 }
1601
1602 /*
1603 ================
1604 SV_CreateBaseline
1605
1606 ================
1607 */
1608 static void SV_CreateBaseline (void)
1609 {
1610         prvm_prog_t *prog = SVVM_prog;
1611         int i, entnum, large;
1612         prvm_edict_t *svent;
1613
1614         // LadyHavoc: clear *all* baselines (not just active ones)
1615         for (entnum = 0;entnum < prog->max_edicts;entnum++)
1616         {
1617                 // get the current server version
1618                 svent = PRVM_EDICT_NUM(entnum);
1619
1620                 // LadyHavoc: always clear state values, whether the entity is in use or not
1621                 svent->priv.server->baseline = defaultstate;
1622
1623                 if (svent->free)
1624                         continue;
1625                 if (entnum > svs.maxclients && !PRVM_serveredictfloat(svent, modelindex))
1626                         continue;
1627
1628                 // create entity baseline
1629                 VectorCopy (PRVM_serveredictvector(svent, origin), svent->priv.server->baseline.origin);
1630                 VectorCopy (PRVM_serveredictvector(svent, angles), svent->priv.server->baseline.angles);
1631                 svent->priv.server->baseline.frame = (int)PRVM_serveredictfloat(svent, frame);
1632                 svent->priv.server->baseline.skin = (int)PRVM_serveredictfloat(svent, skin);
1633                 if (entnum > 0 && entnum <= svs.maxclients)
1634                 {
1635                         svent->priv.server->baseline.colormap = entnum;
1636                         svent->priv.server->baseline.modelindex = SV_ModelIndex("progs/player.mdl", 1);
1637                 }
1638                 else
1639                 {
1640                         svent->priv.server->baseline.colormap = 0;
1641                         svent->priv.server->baseline.modelindex = (int)PRVM_serveredictfloat(svent, modelindex);
1642                 }
1643
1644                 large = false;
1645                 if (svent->priv.server->baseline.modelindex & 0xFF00 || svent->priv.server->baseline.frame & 0xFF00)
1646                 {
1647                         large = true;
1648                         if (sv.protocol == PROTOCOL_NEHAHRABJP || sv.protocol == PROTOCOL_NEHAHRABJP2 || sv.protocol == PROTOCOL_NEHAHRABJP3)
1649                                 large = false;
1650                 }
1651
1652                 // add to the message
1653                 if (large)
1654                         MSG_WriteByte (&sv.signon, svc_spawnbaseline2);
1655                 else
1656                         MSG_WriteByte (&sv.signon, svc_spawnbaseline);
1657                 MSG_WriteShort (&sv.signon, entnum);
1658
1659                 if (large)
1660                 {
1661                         MSG_WriteShort (&sv.signon, svent->priv.server->baseline.modelindex);
1662                         MSG_WriteShort (&sv.signon, svent->priv.server->baseline.frame);
1663                 }
1664                 else if (sv.protocol == PROTOCOL_NEHAHRABJP || sv.protocol == PROTOCOL_NEHAHRABJP2 || sv.protocol == PROTOCOL_NEHAHRABJP3)
1665                 {
1666                         MSG_WriteShort (&sv.signon, svent->priv.server->baseline.modelindex);
1667                         MSG_WriteByte (&sv.signon, svent->priv.server->baseline.frame);
1668                 }
1669                 else
1670                 {
1671                         MSG_WriteByte (&sv.signon, svent->priv.server->baseline.modelindex);
1672                         MSG_WriteByte (&sv.signon, svent->priv.server->baseline.frame);
1673                 }
1674                 MSG_WriteByte (&sv.signon, svent->priv.server->baseline.colormap);
1675                 MSG_WriteByte (&sv.signon, svent->priv.server->baseline.skin);
1676                 for (i=0 ; i<3 ; i++)
1677                 {
1678                         MSG_WriteCoord(&sv.signon, svent->priv.server->baseline.origin[i], sv.protocol);
1679                         MSG_WriteAngle(&sv.signon, svent->priv.server->baseline.angles[i], sv.protocol);
1680                 }
1681         }
1682 }
1683
1684 /*
1685 ================
1686 SV_Prepare_CSQC
1687
1688 Load csprogs.dat and comperss it so it doesn't need to be
1689 reloaded on request.
1690 ================
1691 */
1692 static void SV_Prepare_CSQC(void)
1693 {
1694         fs_offset_t progsize;
1695
1696         if(svs.csqc_progdata)
1697         {
1698                 Con_DPrintf("Unloading old CSQC data.\n");
1699                 Mem_Free(svs.csqc_progdata);
1700                 if(svs.csqc_progdata_deflated)
1701                         Mem_Free(svs.csqc_progdata_deflated);
1702         }
1703
1704         svs.csqc_progdata = NULL;
1705         svs.csqc_progdata_deflated = NULL;
1706
1707         sv.csqc_progname[0] = 0;
1708         svs.csqc_progdata = FS_LoadFile(csqc_progname.string, sv_mempool, false, &progsize);
1709
1710         if(progsize > 0)
1711         {
1712                 size_t deflated_size;
1713
1714                 sv.csqc_progsize = (int)progsize;
1715                 sv.csqc_progcrc = CRC_Block(svs.csqc_progdata, progsize);
1716                 strlcpy(sv.csqc_progname, csqc_progname.string, sizeof(sv.csqc_progname));
1717                 Con_DPrintf("server detected csqc progs file \"%s\" with size %i and crc %i\n", sv.csqc_progname, sv.csqc_progsize, sv.csqc_progcrc);
1718
1719                 Con_DPrint("Compressing csprogs.dat\n");
1720                 //unsigned char *FS_Deflate(const unsigned char *data, size_t size, size_t *deflated_size, int level, mempool_t *mempool);
1721                 svs.csqc_progdata_deflated = FS_Deflate(svs.csqc_progdata, progsize, &deflated_size, -1, sv_mempool);
1722                 svs.csqc_progsize_deflated = (int)deflated_size;
1723                 if(svs.csqc_progdata_deflated)
1724                 {
1725                         Con_DPrintf("Deflated: %g%%\n", 100.0 - 100.0 * (deflated_size / (float)progsize));
1726                         Con_DPrintf("Uncompressed: %u\nCompressed:   %u\n", (unsigned)sv.csqc_progsize, (unsigned)svs.csqc_progsize_deflated);
1727                 }
1728                 else
1729                         Con_DPrintf("Cannot compress - need zlib for this. Using uncompressed progs only.\n");
1730         }
1731 }
1732
1733 /*
1734 ================
1735 SV_SaveSpawnparms
1736
1737 Grabs the current state of each client for saving across the
1738 transition to another level
1739 ================
1740 */
1741 void SV_SaveSpawnparms (void)
1742 {
1743         prvm_prog_t *prog = SVVM_prog;
1744         int             i, j;
1745
1746         svs.serverflags = (int)PRVM_serverglobalfloat(serverflags);
1747
1748         for (i = 0, host_client = svs.clients;i < svs.maxclients;i++, host_client++)
1749         {
1750                 if (!host_client->active)
1751                         continue;
1752
1753         // call the progs to get default spawn parms for the new client
1754                 PRVM_serverglobalfloat(time) = sv.time;
1755                 PRVM_serverglobaledict(self) = PRVM_EDICT_TO_PROG(host_client->edict);
1756                 prog->ExecuteProgram(prog, PRVM_serverfunction(SetChangeParms), "QC function SetChangeParms is missing");
1757                 for (j=0 ; j<NUM_SPAWN_PARMS ; j++)
1758                         host_client->spawn_parms[j] = (&PRVM_serverglobalfloat(parm1))[j];
1759         }
1760 }
1761
1762 // Returns 1 if we're singleplayer, > 1 if we're a listen server
1763 int SV_IsLocalServer(void)
1764 {
1765         return (host_isclient.integer && sv.active ? svs.maxclients : 0);
1766 }
1767
1768 /*
1769 ================
1770 SV_SpawnServer
1771
1772 This is called at the start of each level
1773 ================
1774 */
1775
1776 void SV_SpawnServer (const char *map)
1777 {
1778         prvm_prog_t *prog = SVVM_prog;
1779         prvm_edict_t *ent;
1780         int i;
1781         char *entities;
1782         model_t *worldmodel;
1783         char modelname[sizeof(sv.worldname)];
1784         char vabuf[1024];
1785
1786         Con_Printf("SpawnServer: %s\n", map);
1787
1788         dpsnprintf (modelname, sizeof(modelname), "maps/%s.bsp", map);
1789
1790         if (!FS_FileExists(modelname))
1791         {
1792                 dpsnprintf (modelname, sizeof(modelname), "maps/%s", map);
1793                 if (!FS_FileExists(modelname))
1794                 {
1795                         Con_Printf("SpawnServer: no map file named %s\n", modelname);
1796                         return;
1797                 }
1798         }
1799
1800 //      SV_LockThreadMutex();
1801
1802         if(!host_isclient.integer)
1803                 Sys_MakeProcessNice();
1804         else
1805         {
1806                 SCR_BeginLoadingPlaque(false);
1807                 S_StopAllSounds();
1808         }
1809
1810         if(sv.active)
1811         {
1812                 World_End(&sv.world);
1813                 if(PRVM_serverfunction(SV_Shutdown))
1814                 {
1815                         func_t s = PRVM_serverfunction(SV_Shutdown);
1816                         PRVM_serverglobalfloat(time) = sv.time;
1817                         PRVM_serverfunction(SV_Shutdown) = 0; // prevent it from getting called again
1818                         prog->ExecuteProgram(prog, s,"SV_Shutdown() required");
1819                 }
1820         }
1821
1822         // free q3 shaders so that any newly downloaded shaders will be active
1823         Mod_FreeQ3Shaders();
1824
1825         worldmodel = Mod_ForName(modelname, false, developer.integer > 0, NULL);
1826         if (!worldmodel || !worldmodel->TraceBox)
1827         {
1828                 Con_Printf("Couldn't load map %s\n", modelname);
1829
1830                 if(!host_isclient.integer)
1831                         Sys_MakeProcessMean();
1832
1833 //              SV_UnlockThreadMutex();
1834
1835                 return;
1836         }
1837
1838         Collision_Cache_Reset(true);
1839
1840         // let's not have any servers with no name
1841         if (hostname.string[0] == 0)
1842                 Cvar_SetQuick(&hostname, "UNNAMED");
1843         scr_centertime_off = 0;
1844
1845         svs.changelevel_issued = false;         // now safe to issue another
1846
1847         // make the map a required file for clients
1848         Curl_ClearRequirements();
1849         Curl_RequireFile(modelname);
1850
1851 //
1852 // tell all connected clients that we are going to a new level
1853 //
1854         if (sv.active)
1855         {
1856                 client_t *client;
1857                 for (i = 0, client = svs.clients;i < svs.maxclients;i++, client++)
1858                 {
1859                         if (client->netconnection)
1860                         {
1861                                 MSG_WriteByte(&client->netconnection->message, svc_stufftext);
1862                                 MSG_WriteString(&client->netconnection->message, "reconnect\n");
1863                         }
1864                 }
1865         }
1866         else
1867         {
1868                 // open server port
1869                 NetConn_OpenServerPorts(true);
1870         }
1871
1872 //
1873 // make cvars consistant
1874 //
1875
1876         if (coop.integer)
1877         {
1878                 Cvar_SetValueQuick(&deathmatch, 0);
1879                 Cvar_SetValueQuick(&campaign, 0);
1880         }
1881         else if(!deathmatch.integer)
1882                 Cvar_SetValueQuick(&campaign, 1);
1883         else
1884                 Cvar_SetValueQuick(&campaign, 0);
1885         // LadyHavoc: it can be useful to have skills outside the range 0-3...
1886         //current_skill = bound(0, (int)(skill.value + 0.5), 3);
1887         //Cvar_SetValue ("skill", (float)current_skill);
1888         current_skill = (int)(skill.value + 0.5);
1889
1890 //
1891 // set up the new server
1892 //
1893         memset (&sv, 0, sizeof(sv));
1894
1895         // tell SV_Frame() to reset its timers
1896         sv.spawnframe = host.framecount;
1897
1898         // if running a local client, make sure it doesn't try to access the last
1899         // level's data which is no longer valiud
1900         cls.signon = 0;
1901
1902         Cvar_SetValueQuick(&halflifebsp, worldmodel->brush.ishlbsp);
1903         Cvar_SetValueQuick(&sv_mapformat_is_quake2, worldmodel->brush.isq2bsp);
1904         Cvar_SetValueQuick(&sv_mapformat_is_quake3, worldmodel->brush.isq3bsp);
1905
1906         if(*sv_random_seed.string)
1907         {
1908                 srand(sv_random_seed.integer);
1909                 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);
1910         }
1911
1912         SV_VM_Setup();
1913
1914         sv.active = true;
1915
1916         // set level base name variables for later use
1917         strlcpy (sv.name, map, sizeof (sv.name));
1918         strlcpy(sv.worldname, modelname, sizeof(sv.worldname));
1919         FS_StripExtension(sv.worldname, sv.worldnamenoextension, sizeof(sv.worldnamenoextension));
1920         strlcpy(sv.worldbasename, !strncmp(sv.worldnamenoextension, "maps/", 5) ? sv.worldnamenoextension + 5 : sv.worldnamenoextension, sizeof(sv.worldbasename));
1921         //Cvar_SetQuick(&sv_worldmessage, sv.worldmessage); // set later after QC is spawned
1922         Cvar_SetQuick(&sv_worldname, sv.worldname);
1923         Cvar_SetQuick(&sv_worldnamenoextension, sv.worldnamenoextension);
1924         Cvar_SetQuick(&sv_worldbasename, sv.worldbasename);
1925
1926         sv.protocol = Protocol_EnumForName(sv_protocolname.string);
1927         if (sv.protocol == PROTOCOL_UNKNOWN)
1928         {
1929                 char buffer[1024];
1930                 Protocol_Names(buffer, sizeof(buffer));
1931                 Con_Printf(CON_ERROR "Unknown sv_protocolname \"%s\", valid values are:\n%s\n", sv_protocolname.string, buffer);
1932                 sv.protocol = PROTOCOL_QUAKE;
1933         }
1934
1935 // load progs to get entity field count
1936         //PR_LoadProgs ( sv_progs.string );
1937
1938         sv.datagram.maxsize = sizeof(sv.datagram_buf);
1939         sv.datagram.cursize = 0;
1940         sv.datagram.data = sv.datagram_buf;
1941
1942         sv.reliable_datagram.maxsize = sizeof(sv.reliable_datagram_buf);
1943         sv.reliable_datagram.cursize = 0;
1944         sv.reliable_datagram.data = sv.reliable_datagram_buf;
1945
1946         sv.signon.maxsize = sizeof(sv.signon_buf);
1947         sv.signon.cursize = 0;
1948         sv.signon.data = sv.signon_buf;
1949
1950 // leave slots at start for clients only
1951         //prog->num_edicts = svs.maxclients+1;
1952
1953         sv.state = ss_loading;
1954         prog->allowworldwrites = true;
1955         sv.paused = false;
1956
1957         sv.time = 1.0;
1958
1959         Mod_ClearUsed();
1960         worldmodel->used = true;
1961
1962         sv.worldmodel = worldmodel;
1963         sv.models[1] = sv.worldmodel;
1964
1965 //
1966 // clear world interaction links
1967 //
1968         World_SetSize(&sv.world, sv.worldname, sv.worldmodel->normalmins, sv.worldmodel->normalmaxs, prog);
1969         World_Start(&sv.world);
1970
1971         strlcpy(sv.sound_precache[0], "", sizeof(sv.sound_precache[0]));
1972
1973         strlcpy(sv.model_precache[0], "", sizeof(sv.model_precache[0]));
1974         strlcpy(sv.model_precache[1], sv.worldname, sizeof(sv.model_precache[1]));
1975         for (i = 1;i < sv.worldmodel->brush.numsubmodels && i+1 < MAX_MODELS;i++)
1976         {
1977                 dpsnprintf(sv.model_precache[i+1], sizeof(sv.model_precache[i+1]), "*%i", i);
1978                 sv.models[i+1] = Mod_ForName (sv.model_precache[i+1], false, false, sv.worldname);
1979         }
1980         if(i < sv.worldmodel->brush.numsubmodels)
1981                 Con_Printf("Too many submodels (MAX_MODELS is %i)\n", MAX_MODELS);
1982
1983 //
1984 // load the rest of the entities
1985 //
1986         // AK possible hack since num_edicts is still 0
1987         ent = PRVM_EDICT_NUM(0);
1988         memset (ent->fields.fp, 0, prog->entityfields * sizeof(prvm_vec_t));
1989         ent->free = false;
1990         PRVM_serveredictstring(ent, model) = PRVM_SetEngineString(prog, sv.worldname);
1991         PRVM_serveredictfloat(ent, modelindex) = 1;             // world model
1992         PRVM_serveredictfloat(ent, solid) = SOLID_BSP;
1993         PRVM_serveredictfloat(ent, movetype) = MOVETYPE_PUSH;
1994         VectorCopy(sv.world.mins, PRVM_serveredictvector(ent, mins));
1995         VectorCopy(sv.world.maxs, PRVM_serveredictvector(ent, maxs));
1996         VectorCopy(sv.world.mins, PRVM_serveredictvector(ent, absmin));
1997         VectorCopy(sv.world.maxs, PRVM_serveredictvector(ent, absmax));
1998
1999         if (coop.value)
2000                 PRVM_serverglobalfloat(coop) = coop.integer;
2001         else
2002                 PRVM_serverglobalfloat(deathmatch) = deathmatch.integer;
2003
2004         PRVM_serverglobalstring(mapname) = PRVM_SetEngineString(prog, sv.name);
2005
2006 // serverflags are for cross level information (sigils)
2007         PRVM_serverglobalfloat(serverflags) = svs.serverflags;
2008
2009         // we need to reset the spawned flag on all connected clients here so that
2010         // their thinks don't run during startup (before PutClientInServer)
2011         // we also need to set up the client entities now
2012         // and we need to set the ->edict pointers to point into the progs edicts
2013         for (i = 0, host_client = svs.clients;i < svs.maxclients;i++, host_client++)
2014         {
2015                 host_client->begun = false;
2016                 host_client->edict = PRVM_EDICT_NUM(i + 1);
2017                 PRVM_ED_ClearEdict(prog, host_client->edict);
2018         }
2019
2020         // load replacement entity file if found
2021         if (sv_entpatch.integer && (entities = (char *)FS_LoadFile(va(vabuf, sizeof(vabuf), "%s.ent", sv.worldnamenoextension), tempmempool, true, NULL)))
2022         {
2023                 Con_Printf("Loaded %s.ent\n", sv.worldnamenoextension);
2024                 PRVM_ED_LoadFromFile(prog, entities);
2025                 Mem_Free(entities);
2026         }
2027         else
2028                 PRVM_ED_LoadFromFile(prog, sv.worldmodel->brush.entities);
2029
2030
2031         // LadyHavoc: clear world angles (to fix e3m3.bsp)
2032         VectorClear(PRVM_serveredictvector(prog->edicts, angles));
2033
2034 // all setup is completed, any further precache statements are errors
2035 //      sv.state = ss_active; // LadyHavoc: workaround for svc_precache bug
2036         prog->allowworldwrites = false;
2037
2038 // run two frames to allow everything to settle
2039         sv.time = 1.0001;
2040         for (i = 0;i < sv_init_frame_count.integer;i++)
2041         {
2042                 sv.frametime = 0.1;
2043                 SV_Physics ();
2044         }
2045
2046         // Once all init frames have been run, we consider svqc code fully initialized.
2047         prog->inittime = host.realtime;
2048
2049         if(!host_isclient.integer)
2050                 Mod_PurgeUnused();
2051
2052 // create a baseline for more efficient communications
2053         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)
2054                 SV_CreateBaseline ();
2055
2056         sv.state = ss_active; // LadyHavoc: workaround for svc_precache bug
2057
2058 // send serverinfo to all connected clients, and set up botclients coming back from a level change
2059         for (i = 0, host_client = svs.clients;i < svs.maxclients;i++, host_client++)
2060         {
2061                 host_client->clientconnectcalled = false; // do NOT call ClientDisconnect if he drops before ClientConnect!
2062                 if (!host_client->active)
2063                         continue;
2064                 if (host_client->netconnection)
2065                         SV_SendServerinfo(host_client);
2066                 else
2067                 {
2068                         int j;
2069                         // if client is a botclient coming from a level change, we need to
2070                         // set up client info that normally requires networking
2071
2072                         // copy spawn parms out of the client_t
2073                         for (j=0 ; j< NUM_SPAWN_PARMS ; j++)
2074                                 (&PRVM_serverglobalfloat(parm1))[j] = host_client->spawn_parms[j];
2075
2076                         // call the spawn function
2077                         host_client->clientconnectcalled = true;
2078                         PRVM_serverglobalfloat(time) = sv.time;
2079                         PRVM_serverglobaledict(self) = PRVM_EDICT_TO_PROG(host_client->edict);
2080                         prog->ExecuteProgram(prog, PRVM_serverfunction(ClientConnect), "QC function ClientConnect is missing");
2081                         prog->ExecuteProgram(prog, PRVM_serverfunction(PutClientInServer), "QC function PutClientInServer is missing");
2082                         host_client->begun = true;
2083                 }
2084         }
2085
2086         // update the map title cvar
2087         strlcpy(sv.worldmessage, PRVM_GetString(prog, PRVM_serveredictstring(prog->edicts, message)), sizeof(sv.worldmessage)); // map title (not related to filename)
2088         Cvar_SetQuick(&sv_worldmessage, sv.worldmessage);
2089
2090         Con_Printf("Server spawned.\n");
2091         NetConn_Heartbeat (2);
2092
2093         if(!host_isclient.integer)
2094                 Sys_MakeProcessMean();
2095
2096 //      SV_UnlockThreadMutex();
2097 }
2098
2099 /*
2100 ==================
2101 SV_Shutdown
2102
2103 This only happens at the end of a game, not between levels
2104 ==================
2105 */
2106 void SV_Shutdown(void)
2107 {
2108         prvm_prog_t *prog = SVVM_prog;
2109         int i;
2110
2111         SV_LockThreadMutex();
2112
2113         if (!sv.active)
2114                 goto end;
2115
2116         Con_DPrintf("SV_Shutdown\n");
2117
2118         NetConn_Heartbeat(2);
2119         NetConn_Heartbeat(2);
2120
2121 // make sure all the clients know we're disconnecting
2122         World_End(&sv.world);
2123         if(prog->loaded)
2124         {
2125                 if(PRVM_serverfunction(SV_Shutdown))
2126                 {
2127                         func_t s = PRVM_serverfunction(SV_Shutdown);
2128                         PRVM_serverglobalfloat(time) = sv.time;
2129                         PRVM_serverfunction(SV_Shutdown) = 0; // prevent it from getting called again
2130                         prog->ExecuteProgram(prog, s,"SV_Shutdown() required");
2131                 }
2132         }
2133         for (i = 0, host_client = svs.clients;i < svs.maxclients;i++, host_client++)
2134                 if (host_client->active)
2135                         SV_DropClient(false, "Server shutting down"); // server shutdown
2136
2137         NetConn_CloseServerPorts();
2138
2139         sv.active = false;
2140 //
2141 // clear structures
2142 //
2143         memset(&sv, 0, sizeof(sv));
2144         memset(svs.clients, 0, svs.maxclients*sizeof(client_t));
2145 end:
2146         SV_UnlockThreadMutex();
2147 }
2148
2149 /////////////////////////////////////////////////////
2150 // SV VM stuff
2151
2152 static void SVVM_begin_increase_edicts(prvm_prog_t *prog)
2153 {
2154         // links don't survive the transition, so unlink everything
2155         World_UnlinkAll(&sv.world);
2156 }
2157
2158 static void SVVM_end_increase_edicts(prvm_prog_t *prog)
2159 {
2160         int i;
2161         prvm_edict_t *ent;
2162
2163         // link every entity except world
2164         for (i = 1, ent = prog->edicts;i < prog->num_edicts;i++, ent++)
2165                 if (!ent->free)
2166                         SV_LinkEdict(ent);
2167 }
2168
2169 static void SVVM_init_edict(prvm_prog_t *prog, prvm_edict_t *e)
2170 {
2171         // LadyHavoc: for consistency set these here
2172         int num = PRVM_NUM_FOR_EDICT(e) - 1;
2173
2174         e->priv.server->move = false; // don't move on first frame
2175
2176         if (num >= 0 && num < svs.maxclients)
2177         {
2178                 // set colormap and team on newly created player entity
2179                 PRVM_serveredictfloat(e, colormap) = num + 1;
2180                 PRVM_serveredictfloat(e, team) = (svs.clients[num].colors & 15) + 1;
2181                 // set netname/clientcolors back to client values so that
2182                 // DP_SV_CLIENTNAME and DP_SV_CLIENTCOLORS will not immediately
2183                 // reset them
2184                 PRVM_serveredictstring(e, netname) = PRVM_SetEngineString(prog, svs.clients[num].name);
2185                 PRVM_serveredictfloat(e, clientcolors) = svs.clients[num].colors;
2186                 // NEXUIZ_PLAYERMODEL and NEXUIZ_PLAYERSKIN
2187                 PRVM_serveredictstring(e, playermodel) = PRVM_SetEngineString(prog, svs.clients[num].playermodel);
2188                 PRVM_serveredictstring(e, playerskin) = PRVM_SetEngineString(prog, svs.clients[num].playerskin);
2189                 // Assign netaddress (IP Address, etc)
2190                 if(svs.clients[num].netconnection != NULL)
2191                 {
2192                         // Acquire Readable Address
2193                         LHNETADDRESS_ToString(&svs.clients[num].netconnection->peeraddress, svs.clients[num].netaddress, sizeof(svs.clients[num].netaddress), false);
2194                         PRVM_serveredictstring(e, netaddress) = PRVM_SetEngineString(prog, svs.clients[num].netaddress);
2195                 }
2196                 else
2197                         PRVM_serveredictstring(e, netaddress) = PRVM_SetEngineString(prog, "null/botclient");
2198                 if(svs.clients[num].netconnection != NULL && svs.clients[num].netconnection->crypto.authenticated && svs.clients[num].netconnection->crypto.client_idfp[0])
2199                         PRVM_serveredictstring(e, crypto_idfp) = PRVM_SetEngineString(prog, svs.clients[num].netconnection->crypto.client_idfp);
2200                 else
2201                         PRVM_serveredictstring(e, crypto_idfp) = 0;
2202                 PRVM_serveredictfloat(e, crypto_idfp_signed) = (svs.clients[num].netconnection != NULL && svs.clients[num].netconnection->crypto.authenticated && svs.clients[num].netconnection->crypto.client_issigned);
2203                 if(svs.clients[num].netconnection != NULL && svs.clients[num].netconnection->crypto.authenticated && svs.clients[num].netconnection->crypto.client_keyfp[0])
2204                         PRVM_serveredictstring(e, crypto_keyfp) = PRVM_SetEngineString(prog, svs.clients[num].netconnection->crypto.client_keyfp);
2205                 else
2206                         PRVM_serveredictstring(e, crypto_keyfp) = 0;
2207                 if(svs.clients[num].netconnection != NULL && svs.clients[num].netconnection->crypto.authenticated && svs.clients[num].netconnection->crypto.server_keyfp[0])
2208                         PRVM_serveredictstring(e, crypto_mykeyfp) = PRVM_SetEngineString(prog, svs.clients[num].netconnection->crypto.server_keyfp);
2209                 else
2210                         PRVM_serveredictstring(e, crypto_mykeyfp) = 0;
2211                 if(svs.clients[num].netconnection != NULL && svs.clients[num].netconnection->crypto.authenticated && svs.clients[num].netconnection->crypto.use_aes)
2212                         PRVM_serveredictstring(e, crypto_encryptmethod) = PRVM_SetEngineString(prog, "AES128");
2213                 else
2214                         PRVM_serveredictstring(e, crypto_encryptmethod) = 0;
2215                 if(svs.clients[num].netconnection != NULL && svs.clients[num].netconnection->crypto.authenticated)
2216                         PRVM_serveredictstring(e, crypto_signmethod) = PRVM_SetEngineString(prog, "HMAC-SHA256");
2217                 else
2218                         PRVM_serveredictstring(e, crypto_signmethod) = 0;
2219         }
2220 }
2221
2222 static void SVVM_free_edict(prvm_prog_t *prog, prvm_edict_t *ed)
2223 {
2224         int i;
2225         int e;
2226
2227         World_UnlinkEdict(ed);          // unlink from world bsp
2228
2229         PRVM_serveredictstring(ed, model) = 0;
2230         PRVM_serveredictfloat(ed, takedamage) = 0;
2231         PRVM_serveredictfloat(ed, modelindex) = 0;
2232         PRVM_serveredictfloat(ed, colormap) = 0;
2233         PRVM_serveredictfloat(ed, skin) = 0;
2234         PRVM_serveredictfloat(ed, frame) = 0;
2235         VectorClear(PRVM_serveredictvector(ed, origin));
2236         VectorClear(PRVM_serveredictvector(ed, angles));
2237         PRVM_serveredictfloat(ed, nextthink) = -1;
2238         PRVM_serveredictfloat(ed, solid) = 0;
2239
2240         VM_RemoveEdictSkeleton(prog, ed);
2241 #ifdef USEODE
2242         World_Physics_RemoveFromEntity(&sv.world, ed);
2243         World_Physics_RemoveJointFromEntity(&sv.world, ed);
2244 #endif
2245         // make sure csqc networking is aware of the removed entity
2246         e = PRVM_NUM_FOR_EDICT(ed);
2247         sv.csqcentityversion[e] = 0;
2248         for (i = 0;i < svs.maxclients;i++)
2249                 svs.clients[i].csqcentitysendflags[e] = 0xFFFFFF;
2250 }
2251
2252 static void SVVM_count_edicts(prvm_prog_t *prog)
2253 {
2254         int             i;
2255         prvm_edict_t    *ent;
2256         int             active, models, solid, step;
2257
2258         active = models = solid = step = 0;
2259         for (i=0 ; i<prog->num_edicts ; i++)
2260         {
2261                 ent = PRVM_EDICT_NUM(i);
2262                 if (ent->free)
2263                         continue;
2264                 active++;
2265                 if (PRVM_serveredictfloat(ent, solid))
2266                         solid++;
2267                 if (PRVM_serveredictstring(ent, model))
2268                         models++;
2269                 if (PRVM_serveredictfloat(ent, movetype) == MOVETYPE_STEP)
2270                         step++;
2271         }
2272
2273         Con_Printf("num_edicts:%3i\n", prog->num_edicts);
2274         Con_Printf("active    :%3i\n", active);
2275         Con_Printf("view      :%3i\n", models);
2276         Con_Printf("touch     :%3i\n", solid);
2277         Con_Printf("step      :%3i\n", step);
2278 }
2279
2280 static qbool SVVM_load_edict(prvm_prog_t *prog, prvm_edict_t *ent)
2281 {
2282         // remove things from different skill levels or deathmatch
2283         if (gamemode != GAME_TRANSFUSION) //Transfusion does this in QC
2284         {
2285                 if (deathmatch.integer)
2286                 {
2287                         if (((int)PRVM_serveredictfloat(ent, spawnflags) & SPAWNFLAG_NOT_DEATHMATCH))
2288                         {
2289                                 return false;
2290                         }
2291                 }
2292                 else if ((current_skill <= 0 && ((int)PRVM_serveredictfloat(ent, spawnflags) & SPAWNFLAG_NOT_EASY  ))
2293                         || (current_skill == 1 && ((int)PRVM_serveredictfloat(ent, spawnflags) & SPAWNFLAG_NOT_MEDIUM))
2294                         || (current_skill >= 2 && ((int)PRVM_serveredictfloat(ent, spawnflags) & SPAWNFLAG_NOT_HARD  )))
2295                 {
2296                         return false;
2297                 }
2298         }
2299         return true;
2300 }
2301
2302 static void SV_VM_Setup(void)
2303 {
2304         prvm_prog_t *prog = SVVM_prog;
2305         PRVM_Prog_Init(prog, cmd_local);
2306
2307         // allocate the mempools
2308         // TODO: move the magic numbers/constants into #defines [9/13/2006 Black]
2309         prog->progs_mempool = Mem_AllocPool("Server Progs", 0, NULL);
2310         prog->builtins = vm_sv_builtins;
2311         prog->numbuiltins = vm_sv_numbuiltins;
2312         prog->max_edicts = 512;
2313         if (sv.protocol == PROTOCOL_QUAKE)
2314                 prog->limit_edicts = 640; // before quake mission pack 1 this was 512
2315         else if (sv.protocol == PROTOCOL_QUAKEDP)
2316                 prog->limit_edicts = 2048; // guessing
2317         else if (sv.protocol == PROTOCOL_NEHAHRAMOVIE)
2318                 prog->limit_edicts = 2048; // guessing!
2319         else if (sv.protocol == PROTOCOL_NEHAHRABJP || sv.protocol == PROTOCOL_NEHAHRABJP2 || sv.protocol == PROTOCOL_NEHAHRABJP3)
2320                 prog->limit_edicts = 4096; // guessing!
2321         else
2322                 prog->limit_edicts = MAX_EDICTS;
2323         prog->reserved_edicts = svs.maxclients;
2324         prog->edictprivate_size = sizeof(edict_engineprivate_t);
2325         prog->name = "server";
2326         prog->extensionstring = vm_sv_extensions;
2327         prog->loadintoworld = true;
2328
2329         // all callbacks must be defined (pointers are not checked before calling)
2330         prog->begin_increase_edicts = SVVM_begin_increase_edicts;
2331         prog->end_increase_edicts   = SVVM_end_increase_edicts;
2332         prog->init_edict            = SVVM_init_edict;
2333         prog->free_edict            = SVVM_free_edict;
2334         prog->count_edicts          = SVVM_count_edicts;
2335         prog->load_edict            = SVVM_load_edict;
2336         prog->init_cmd              = SVVM_init_cmd;
2337         prog->reset_cmd             = SVVM_reset_cmd;
2338         prog->error_cmd             = Host_Error;
2339         prog->ExecuteProgram        = SVVM_ExecuteProgram;
2340
2341         PRVM_Prog_Load(prog, sv_progs.string, NULL, 0, SV_REQFUNCS, sv_reqfuncs, SV_REQFIELDS, sv_reqfields, SV_REQGLOBALS, sv_reqglobals);
2342
2343         // some mods compiled with scrambling compilers lack certain critical
2344         // global names and field names such as "self" and "time" and "nextthink"
2345         // so we have to set these offsets manually, matching the entvars_t
2346         // but we only do this if the prog header crc matches, otherwise it's totally freeform
2347         if (prog->progs_crc == PROGHEADER_CRC || prog->progs_crc == PROGHEADER_CRC_TENEBRAE)
2348         {
2349                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, modelindex);
2350                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, absmin);
2351                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, absmax);
2352                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, ltime);
2353                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, movetype);
2354                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, solid);
2355                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, origin);
2356                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, oldorigin);
2357                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, velocity);
2358                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, angles);
2359                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, avelocity);
2360                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, punchangle);
2361                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, classname);
2362                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, model);
2363                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, frame);
2364                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, skin);
2365                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, effects);
2366                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, mins);
2367                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, maxs);
2368                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, size);
2369                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, touch);
2370                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, use);
2371                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, think);
2372                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, blocked);
2373                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, nextthink);
2374                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, groundentity);
2375                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, health);
2376                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, frags);
2377                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, weapon);
2378                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, weaponmodel);
2379                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, weaponframe);
2380                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, currentammo);
2381                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, ammo_shells);
2382                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, ammo_nails);
2383                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, ammo_rockets);
2384                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, ammo_cells);
2385                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, items);
2386                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, takedamage);
2387                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, chain);
2388                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, deadflag);
2389                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, view_ofs);
2390                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, button0);
2391                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, button1);
2392                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, button2);
2393                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, impulse);
2394                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, fixangle);
2395                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, v_angle);
2396                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, idealpitch);
2397                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, netname);
2398                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, enemy);
2399                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, flags);
2400                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, colormap);
2401                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, team);
2402                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, max_health);
2403                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, teleport_time);
2404                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, armortype);
2405                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, armorvalue);
2406                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, waterlevel);
2407                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, watertype);
2408                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, ideal_yaw);
2409                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, yaw_speed);
2410                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, aiment);
2411                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, goalentity);
2412                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, spawnflags);
2413                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, target);
2414                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, targetname);
2415                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, dmg_take);
2416                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, dmg_save);
2417                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, dmg_inflictor);
2418                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, owner);
2419                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, movedir);
2420                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, message);
2421                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, sounds);
2422                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, noise);
2423                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, noise1);
2424                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, noise2);
2425                 PRVM_ED_FindFieldOffset_FromStruct(entvars_t, noise3);
2426                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, self);
2427                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, other);
2428                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, world);
2429                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, time);
2430                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, frametime);
2431                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, force_retouch);
2432                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, mapname);
2433                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, deathmatch);
2434                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, coop);
2435                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, teamplay);
2436                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, serverflags);
2437                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, total_secrets);
2438                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, total_monsters);
2439                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, found_secrets);
2440                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, killed_monsters);
2441                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, parm1);
2442                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, parm2);
2443                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, parm3);
2444                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, parm4);
2445                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, parm5);
2446                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, parm6);
2447                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, parm7);
2448                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, parm8);
2449                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, parm9);
2450                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, parm10);
2451                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, parm11);
2452                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, parm12);
2453                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, parm13);
2454                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, parm14);
2455                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, parm15);
2456                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, parm16);
2457                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, v_forward);
2458                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, v_up);
2459                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, v_right);
2460                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, trace_allsolid);
2461                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, trace_startsolid);
2462                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, trace_fraction);
2463                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, trace_endpos);
2464                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, trace_plane_normal);
2465                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, trace_plane_dist);
2466                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, trace_ent);
2467                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, trace_inopen);
2468                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, trace_inwater);
2469                 PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, msg_entity);
2470 //              PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, main);
2471 //              PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, StartFrame);
2472 //              PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, PlayerPreThink);
2473 //              PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, PlayerPostThink);
2474 //              PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, ClientKill);
2475 //              PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, ClientConnect);
2476 //              PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, PutClientInServer);
2477 //              PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, ClientDisconnect);
2478 //              PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, SetNewParms);
2479 //              PRVM_ED_FindGlobalOffset_FromStruct(globalvars_t, SetChangeParms);
2480         }
2481         else
2482                 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);
2483
2484         // OP_STATE is always supported on server because we add fields/globals for it
2485         prog->flag |= PRVM_OP_STATE;
2486
2487         VM_CustomStats_Clear();//[515]: csqc
2488
2489         SV_Prepare_CSQC();
2490 }
2491
2492 static void SV_CheckTimeouts(void)
2493 {
2494         int i;
2495
2496         // never timeout loopback connections
2497         for (i = (host_isclient.integer ? 1 : 0), host_client = &svs.clients[i]; i < svs.maxclients; i++, host_client++)
2498                 if (host_client->netconnection && host.realtime > host_client->netconnection->timeout)
2499                         SV_DropClient(false, "Timed out");
2500 }
2501
2502 /*
2503 ==================
2504 SV_TimeReport
2505
2506 Returns a time report string, for example for
2507 ==================
2508 */
2509 const char *SV_TimingReport(char *buf, size_t buflen)
2510 {
2511         return va(buf, buflen, "%.1f%% CPU, %.2f%% lost, offset avg %.1fms, max %.1fms, sdev %.1fms", sv.perf_cpuload * 100, sv.perf_lost * 100, sv.perf_offset_avg * 1000, sv.perf_offset_max * 1000, sv.perf_offset_sdev * 1000);
2512 }
2513
2514 extern cvar_t host_maxwait;
2515 extern cvar_t host_framerate;
2516 double SV_Frame(double time)
2517 {
2518         static double sv_timer;
2519         int i;
2520         char vabuf[1024];
2521         qbool playing = false;
2522
2523         // reset timer after level change
2524         if (host.framecount == sv.spawnframe || host.framecount == sv.spawnframe + 1)
2525                 sv_timer = time = host.sleeptime = 0;
2526
2527         if (!svs.threaded)
2528         {
2529                 sv.perf_acc_sleeptime += host.sleeptime;
2530                 sv.perf_acc_realtime += time;
2531
2532                 // Look for clients who have spawned
2533                 for (i = 0, host_client = svs.clients; i < svs.maxclients; i++, host_client++)
2534                         if(host_client->begun && host_client->netconnection)
2535                                 playing = true;
2536
2537                 if(sv.perf_acc_realtime > 5)
2538                 {
2539                         sv.perf_cpuload = 1 - sv.perf_acc_sleeptime / sv.perf_acc_realtime;
2540                         sv.perf_lost = sv.perf_acc_lost / sv.perf_acc_realtime;
2541
2542                         if(sv.perf_acc_offset_samples > 0)
2543                         {
2544                                 sv.perf_offset_max = sv.perf_acc_offset_max;
2545                                 sv.perf_offset_avg = sv.perf_acc_offset / sv.perf_acc_offset_samples;
2546                                 sv.perf_offset_sdev = sqrt(sv.perf_acc_offset_squared / sv.perf_acc_offset_samples - sv.perf_offset_avg * sv.perf_offset_avg);
2547                         }
2548
2549                         if(sv.perf_lost > 0 && developer_extra.integer && playing) // only complain if anyone is looking
2550                                 Con_DPrintf("Server can't keep up: %s\n", SV_TimingReport(vabuf, sizeof(vabuf)));
2551
2552                         sv.perf_acc_realtime = sv.perf_acc_sleeptime =
2553                         sv.perf_acc_lost = sv.perf_acc_offset =
2554                         sv.perf_acc_offset_squared = sv.perf_acc_offset_max =
2555                         sv.perf_acc_offset_samples = 0;
2556                 }
2557
2558                 /*
2559                  * Receive packets on each main loop iteration, as the main loop may
2560                  * be undersleeping due to select() detecting a new packet
2561                  */
2562                 if (sv.active)
2563                 {
2564                         NetConn_ServerFrame();
2565                         SV_CheckTimeouts();
2566                 }
2567         }
2568
2569         /*
2570          * If the accumulator hasn't become positive, don't
2571          * run the frame. Everything that happens before this
2572          * point will happen even if we're sleeping this frame.
2573          */
2574         if((sv_timer += time) < 0)
2575                 return sv_timer;
2576
2577         // limit the frametime steps to no more than 100ms each
2578         if (sv_timer > 0.1)
2579         {
2580                 if (!svs.threaded)
2581                         sv.perf_acc_lost += (sv_timer - 0.1);
2582                 sv_timer = 0.1;
2583         }
2584
2585         if (sv.active && sv_timer > 0 && !svs.threaded)
2586         {
2587                 /*
2588                  * Execute one or more server frames, with an upper limit on how much
2589                  * execution time to spend on server frames to avoid freezing the game if
2590                  * the server is overloaded. This execution time limit means the game will
2591                  * slow down if the server is taking too long.
2592                  */
2593                 int framecount, framelimit = 1;
2594                 double advancetime, aborttime = 0;
2595                 float offset;
2596                 prvm_prog_t *prog = SVVM_prog;
2597
2598                 // run the world state
2599                 // don't allow simulation to run too fast or too slow or logic glitches can occur
2600
2601                 // stop running server frames if the wall time reaches this value
2602                 if (sys_ticrate.value <= 0)
2603                         advancetime = sv_timer;
2604                 else
2605                 {
2606                         advancetime = sys_ticrate.value;
2607                         // listen servers can run multiple server frames per client frame
2608                         if (sv_maxphysicsframesperserverframe.integer > 0)
2609                                 framelimit = sv_maxphysicsframesperserverframe.integer;
2610                         aborttime = Sys_DirtyTime() + 0.1;
2611                 }
2612
2613                 if(host_timescale.value > 0 && host_timescale.value < 1)
2614                         advancetime = min(advancetime, 0.1 / host_timescale.value);
2615                 else
2616                         advancetime = min(advancetime, 0.1);
2617
2618                 if(advancetime > 0)
2619                 {
2620                         offset = Sys_DirtyTime() - host.dirtytime;
2621                         if (offset < 0 || offset >= 1800)
2622                                 offset = 0;
2623
2624                         offset += sv_timer;
2625                         ++sv.perf_acc_offset_samples;
2626                         sv.perf_acc_offset += offset;
2627                         sv.perf_acc_offset_squared += offset * offset;
2628
2629                         if(sv.perf_acc_offset_max < offset)
2630                                 sv.perf_acc_offset_max = offset;
2631                 }
2632
2633                 // only advance time if not paused
2634                 // the game also pauses in singleplayer when menu or console is used
2635                 sv.frametime = advancetime * host_timescale.value;
2636                 if (host_framerate.value)
2637                         sv.frametime = host_framerate.value;
2638                 if (sv.paused || host.paused)
2639                         sv.frametime = 0;
2640
2641                 for (framecount = 0; framecount < framelimit && sv_timer > 0; framecount++)
2642                 {
2643                         sv_timer -= advancetime;
2644
2645                         // move things around and think unless paused
2646                         if (sv.frametime)
2647                                 SV_Physics();
2648
2649                         // if this server frame took too long, break out of the loop
2650                         if (framelimit > 1 && Sys_DirtyTime() >= aborttime)
2651                                 break;
2652                 }
2653
2654                 R_TimeReport("serverphysics");
2655
2656                 // send all messages to the clients
2657                 SV_SendClientMessages();
2658
2659                 if (sv.paused == 1 && host.realtime > sv.pausedstart && sv.pausedstart > 0) {
2660                         prog->globals.fp[OFS_PARM0] = host.realtime - sv.pausedstart;
2661                         PRVM_serverglobalfloat(time) = sv.time;
2662                         prog->ExecuteProgram(prog, PRVM_serverfunction(SV_PausedTic), "QC function SV_PausedTic is missing");
2663                 }
2664
2665                 // send an heartbeat if enough time has passed since the last one
2666                 NetConn_Heartbeat(0);
2667                 R_TimeReport("servernetwork");
2668         }
2669         else
2670         {
2671                 // don't let r_speeds display jump around
2672                 R_TimeReport("serverphysics");
2673                 R_TimeReport("servernetwork");
2674         }
2675
2676         // if there is some time remaining from this frame, reset the timer
2677         if (sv_timer >= 0)
2678         {
2679                 if (!svs.threaded)
2680                         sv.perf_acc_lost += sv_timer;
2681                 sv_timer = 0;
2682         }
2683
2684         return sv_timer;
2685 }
2686
2687 static int SV_ThreadFunc(void *voiddata)
2688 {
2689         prvm_prog_t *prog = SVVM_prog;
2690         qbool playing = false;
2691         double sv_timer = 0;
2692         double sv_deltarealtime, sv_oldrealtime, sv_realtime;
2693         double wait;
2694         int i;
2695         char vabuf[1024];
2696         sv_realtime = Sys_DirtyTime();
2697         while (!svs.threadstop)
2698         {
2699                 // FIXME: we need to handle Host_Error in the server thread somehow
2700 //              if (setjmp(sv_abortframe))
2701 //                      continue;                       // something bad happened in the server game
2702
2703                 sv_oldrealtime = sv_realtime;
2704                 sv_realtime = Sys_DirtyTime();
2705                 sv_deltarealtime = sv_realtime - sv_oldrealtime;
2706                 if (sv_deltarealtime < 0 || sv_deltarealtime >= 1800) sv_deltarealtime = 0;
2707
2708                 sv_timer += sv_deltarealtime;
2709
2710                 sv.perf_acc_realtime += sv_deltarealtime;
2711
2712                 // 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)
2713                 SV_LockThreadMutex();
2714
2715                 // Look for clients who have spawned
2716                 playing = false;
2717                 if (sv.active)
2718                         for (i = 0, host_client = svs.clients;i < svs.maxclients;i++, host_client++)
2719                                 if(host_client->begun)
2720                                         if(host_client->netconnection)
2721                                                 playing = true;
2722                 if(sv.time < 10)
2723                 {
2724                         // don't accumulate time for the first 10 seconds of a match
2725                         // so things can settle
2726                         sv.perf_acc_realtime = sv.perf_acc_sleeptime = sv.perf_acc_lost = sv.perf_acc_offset = sv.perf_acc_offset_squared = sv.perf_acc_offset_max = sv.perf_acc_offset_samples = 0;
2727                 }
2728                 else if(sv.perf_acc_realtime > 5)
2729                 {
2730                         sv.perf_cpuload = 1 - sv.perf_acc_sleeptime / sv.perf_acc_realtime;
2731                         sv.perf_lost = sv.perf_acc_lost / sv.perf_acc_realtime;
2732                         if(sv.perf_acc_offset_samples > 0)
2733                         {
2734                                 sv.perf_offset_max = sv.perf_acc_offset_max;
2735                                 sv.perf_offset_avg = sv.perf_acc_offset / sv.perf_acc_offset_samples;
2736                                 sv.perf_offset_sdev = sqrt(sv.perf_acc_offset_squared / sv.perf_acc_offset_samples - sv.perf_offset_avg * sv.perf_offset_avg);
2737                         }
2738                         if(sv.perf_lost > 0 && developer_extra.integer)
2739                                 if(playing)
2740                                         Con_DPrintf("Server can't keep up: %s\n", SV_TimingReport(vabuf, sizeof(vabuf)));
2741                         sv.perf_acc_realtime = sv.perf_acc_sleeptime = sv.perf_acc_lost = sv.perf_acc_offset = sv.perf_acc_offset_squared = sv.perf_acc_offset_max = sv.perf_acc_offset_samples = 0;
2742                 }
2743
2744                 // get new packets
2745                 if (sv.active)
2746                 {
2747                         NetConn_ServerFrame();
2748                         SV_CheckTimeouts();
2749                 }
2750
2751                 // if the accumulators haven't become positive yet, wait a while
2752                 wait = sv_timer * -1000000.0;
2753                 if (wait >= 1)
2754                 {
2755                         double time0, delta;
2756                         SV_UnlockThreadMutex(); // don't keep mutex locked while sleeping
2757                         if (host_maxwait.value <= 0)
2758                                 wait = min(wait, 1000000.0);
2759                         else
2760                                 wait = min(wait, host_maxwait.value * 1000.0);
2761                         if(wait < 1)
2762                                 wait = 1; // because we cast to int
2763                         time0 = Sys_DirtyTime();
2764                         Sys_Sleep((int)wait);
2765                         delta = Sys_DirtyTime() - time0;if (delta < 0 || delta >= 1800) delta = 0;
2766                         sv.perf_acc_sleeptime += delta;
2767                         continue;
2768                 }
2769
2770                 if (sv.active && sv_timer > 0)
2771                 {
2772                         // execute one server frame
2773                         double advancetime;
2774                         float offset;
2775
2776                         if (sys_ticrate.value <= 0)
2777                                 advancetime = min(sv_timer, 0.1); // don't step more than 100ms
2778                         else
2779                                 advancetime = sys_ticrate.value;
2780
2781                         if(advancetime > 0)
2782                         {
2783                                 offset = sv_timer + (Sys_DirtyTime() - sv_realtime); // LadyHavoc: FIXME: I don't understand this line
2784                                 ++sv.perf_acc_offset_samples;
2785                                 sv.perf_acc_offset += offset;
2786                                 sv.perf_acc_offset_squared += offset * offset;
2787                                 if(sv.perf_acc_offset_max < offset)
2788                                         sv.perf_acc_offset_max = offset;
2789                         }
2790
2791                         // only advance time if not paused
2792                         // the game also pauses in singleplayer when menu or console is used
2793                         sv.frametime = advancetime * host_timescale.value;
2794                         if (host_framerate.value)
2795                                 sv.frametime = host_framerate.value;
2796                         if (sv.paused || host.paused)
2797                                 sv.frametime = 0;
2798
2799                         sv_timer -= advancetime;
2800
2801                         // move things around and think unless paused
2802                         if (sv.frametime)
2803                                 SV_Physics();
2804
2805                         // send all messages to the clients
2806                         SV_SendClientMessages();
2807
2808                         if (sv.paused == 1 && sv_realtime > sv.pausedstart && sv.pausedstart > 0)
2809                         {
2810                                 PRVM_serverglobalfloat(time) = sv.time;
2811                                 prog->globals.fp[OFS_PARM0] = sv_realtime - sv.pausedstart;
2812                                 prog->ExecuteProgram(prog, PRVM_serverfunction(SV_PausedTic), "QC function SV_PausedTic is missing");
2813                         }
2814
2815                         // send an heartbeat if enough time has passed since the last one
2816                         NetConn_Heartbeat(0);
2817
2818                 }
2819
2820                 // we're back to safe code now
2821                 SV_UnlockThreadMutex();
2822
2823                 // if there is some time remaining from this frame, reset the timers
2824                 if (sv_timer >= 0)
2825                 {
2826                         sv.perf_acc_lost += sv_timer;
2827                         sv_timer = 0;
2828                 }
2829         }
2830         return 0;
2831 }
2832
2833 void SV_StartThread(void)
2834 {
2835         if (!sv_threaded.integer || !Thread_HasThreads())
2836                 return;
2837         svs.threaded = true;
2838         svs.threadstop = false;
2839         svs.threadmutex = Thread_CreateMutex();
2840         svs.thread = Thread_CreateThread(SV_ThreadFunc, NULL);
2841 }
2842
2843 void SV_StopThread(void)
2844 {
2845         if (!svs.threaded)
2846                 return;
2847         svs.threadstop = true;
2848         Thread_WaitThread(svs.thread, 0);
2849         Thread_DestroyMutex(svs.threadmutex);
2850         svs.threaded = false;
2851 }