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