Revert "Make cdda optional, server does not need to play music" because it
[xonotic/darkplaces.git] / cl_parse.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 // cl_parse.c  -- parse a message received from the server
21
22 #include "quakedef.h"
23 #include "cdaudio.h"
24 #include "cl_collision.h"
25 #include "csprogs.h"
26 #include "libcurl.h"
27 #include "utf8lib.h"
28 #include "menu.h"
29 #include "cl_video.h"
30
31 const char *svc_strings[128] =
32 {
33         "svc_bad",
34         "svc_nop",
35         "svc_disconnect",
36         "svc_updatestat",
37         "svc_version",          // [int] server version
38         "svc_setview",          // [short] entity number
39         "svc_sound",                    // <see code>
40         "svc_time",                     // [float] server time
41         "svc_print",                    // [string] null terminated string
42         "svc_stufftext",                // [string] stuffed into client's console buffer
43                                                 // the string should be \n terminated
44         "svc_setangle",         // [vec3] set the view angle to this absolute value
45
46         "svc_serverinfo",               // [int] version
47                                                 // [string] signon string
48                                                 // [string]..[0]model cache [string]...[0]sounds cache
49                                                 // [string]..[0]item cache
50         "svc_lightstyle",               // [byte] [string]
51         "svc_updatename",               // [byte] [string]
52         "svc_updatefrags",      // [byte] [short]
53         "svc_clientdata",               // <shortbits + data>
54         "svc_stopsound",                // <see code>
55         "svc_updatecolors",     // [byte] [byte]
56         "svc_particle",         // [vec3] <variable>
57         "svc_damage",                   // [byte] impact [byte] blood [vec3] from
58
59         "svc_spawnstatic",
60         "OBSOLETE svc_spawnbinary",
61         "svc_spawnbaseline",
62
63         "svc_temp_entity",              // <variable>
64         "svc_setpause",
65         "svc_signonnum",
66         "svc_centerprint",
67         "svc_killedmonster",
68         "svc_foundsecret",
69         "svc_spawnstaticsound",
70         "svc_intermission",
71         "svc_finale",                   // [string] music [string] text
72         "svc_cdtrack",                  // [byte] track [byte] looptrack
73         "svc_sellscreen",
74         "svc_cutscene",
75         "svc_showlmp",  // [string] iconlabel [string] lmpfile [short] x [short] y
76         "svc_hidelmp",  // [string] iconlabel
77         "svc_skybox", // [string] skyname
78         "", // 38
79         "", // 39
80         "", // 40
81         "", // 41
82         "", // 42
83         "", // 43
84         "", // 44
85         "", // 45
86         "", // 46
87         "", // 47
88         "", // 48
89         "", // 49
90         "svc_downloaddata", //                          50              // [int] start [short] size [variable length] data
91         "svc_updatestatubyte", //                       51              // [byte] stat [byte] value
92         "svc_effect", //                        52              // [vector] org [byte] modelindex [byte] startframe [byte] framecount [byte] framerate
93         "svc_effect2", //                       53              // [vector] org [short] modelindex [short] startframe [byte] framecount [byte] framerate
94         "svc_sound2", //                        54              // short soundindex instead of byte
95         "svc_spawnbaseline2", //        55              // short modelindex instead of byte
96         "svc_spawnstatic2", //          56              // short modelindex instead of byte
97         "svc_entities", //                      57              // [int] deltaframe [int] thisframe [float vector] eye [variable length] entitydata
98         "svc_csqcentities", //          58              // [short] entnum [variable length] entitydata ... [short] 0x0000
99         "svc_spawnstaticsound2", //     59              // [coord3] [short] samp [byte] vol [byte] aten
100         "svc_trailparticles", //        60              // [short] entnum [short] effectnum [vector] start [vector] end
101         "svc_pointparticles", //        61              // [short] effectnum [vector] start [vector] velocity [short] count
102         "svc_pointparticles1", //       62              // [short] effectnum [vector] start, same as svc_pointparticles except velocity is zero and count is 1
103 };
104
105 const char *qw_svc_strings[128] =
106 {
107         "qw_svc_bad",                                   // 0
108         "qw_svc_nop",                                   // 1
109         "qw_svc_disconnect",                    // 2
110         "qw_svc_updatestat",                    // 3    // [byte] [byte]
111         "",                                                             // 4
112         "qw_svc_setview",                               // 5    // [short] entity number
113         "qw_svc_sound",                                 // 6    // <see code>
114         "",                                                             // 7
115         "qw_svc_print",                                 // 8    // [byte] id [string] null terminated string
116         "qw_svc_stufftext",                             // 9    // [string] stuffed into client's console buffer
117         "qw_svc_setangle",                              // 10   // [angle3] set the view angle to this absolute value
118         "qw_svc_serverdata",                    // 11   // [long] protocol ...
119         "qw_svc_lightstyle",                    // 12   // [byte] [string]
120         "",                                                             // 13
121         "qw_svc_updatefrags",                   // 14   // [byte] [short]
122         "",                                                             // 15
123         "qw_svc_stopsound",                             // 16   // <see code>
124         "",                                                             // 17
125         "",                                                             // 18
126         "qw_svc_damage",                                // 19
127         "qw_svc_spawnstatic",                   // 20
128         "",                                                             // 21
129         "qw_svc_spawnbaseline",                 // 22
130         "qw_svc_temp_entity",                   // 23   // variable
131         "qw_svc_setpause",                              // 24   // [byte] on / off
132         "",                                                             // 25
133         "qw_svc_centerprint",                   // 26   // [string] to put in center of the screen
134         "qw_svc_killedmonster",                 // 27
135         "qw_svc_foundsecret",                   // 28
136         "qw_svc_spawnstaticsound",              // 29   // [coord3] [byte] samp [byte] vol [byte] aten
137         "qw_svc_intermission",                  // 30           // [vec3_t] origin [vec3_t] angle
138         "qw_svc_finale",                                // 31           // [string] text
139         "qw_svc_cdtrack",                               // 32           // [byte] track
140         "qw_svc_sellscreen",                    // 33
141         "qw_svc_smallkick",                             // 34           // set client punchangle to 2
142         "qw_svc_bigkick",                               // 35           // set client punchangle to 4
143         "qw_svc_updateping",                    // 36           // [byte] [short]
144         "qw_svc_updateentertime",               // 37           // [byte] [float]
145         "qw_svc_updatestatlong",                // 38           // [byte] [long]
146         "qw_svc_muzzleflash",                   // 39           // [short] entity
147         "qw_svc_updateuserinfo",                // 40           // [byte] slot [long] uid
148         "qw_svc_download",                              // 41           // [short] size [size bytes]
149         "qw_svc_playerinfo",                    // 42           // variable
150         "qw_svc_nails",                                 // 43           // [byte] num [48 bits] xyzpy 12 12 12 4 8
151         "qw_svc_chokecount",                    // 44           // [byte] packets choked
152         "qw_svc_modellist",                             // 45           // [strings]
153         "qw_svc_soundlist",                             // 46           // [strings]
154         "qw_svc_packetentities",                // 47           // [...]
155         "qw_svc_deltapacketentities",   // 48           // [...]
156         "qw_svc_maxspeed",                              // 49           // maxspeed change, for prediction
157         "qw_svc_entgravity",                    // 50           // gravity change, for prediction
158         "qw_svc_setinfo",                               // 51           // setinfo on a client
159         "qw_svc_serverinfo",                    // 52           // serverinfo
160         "qw_svc_updatepl",                              // 53           // [byte] [byte]
161 };
162
163 //=============================================================================
164
165 cvar_t cl_worldmessage = {CVAR_READONLY, "cl_worldmessage", "", "title of current level"};
166 cvar_t cl_worldname = {CVAR_READONLY, "cl_worldname", "", "name of current worldmodel"};
167 cvar_t cl_worldnamenoextension = {CVAR_READONLY, "cl_worldnamenoextension", "", "name of current worldmodel without extension"};
168 cvar_t cl_worldbasename = {CVAR_READONLY, "cl_worldbasename", "", "name of current worldmodel without maps/ prefix or extension"};
169
170 cvar_t developer_networkentities = {0, "developer_networkentities", "0", "prints received entities, value is 0-10 (higher for more info, 10 being the most verbose)"};
171 cvar_t cl_gameplayfix_soundsmovewithentities = {0, "cl_gameplayfix_soundsmovewithentities", "1", "causes sounds made by lifts, players, projectiles, and any other entities, to move with the entity, so for example a rocket noise follows the rocket rather than staying at the starting position"};
172 cvar_t cl_sound_wizardhit = {0, "cl_sound_wizardhit", "wizard/hit.wav", "sound to play during TE_WIZSPIKE (empty cvar disables sound)"};
173 cvar_t cl_sound_hknighthit = {0, "cl_sound_hknighthit", "hknight/hit.wav", "sound to play during TE_KNIGHTSPIKE (empty cvar disables sound)"};
174 cvar_t cl_sound_tink1 = {0, "cl_sound_tink1", "weapons/tink1.wav", "sound to play with 80% chance during TE_SPIKE/TE_SUPERSPIKE (empty cvar disables sound)"};
175 cvar_t cl_sound_ric1 = {0, "cl_sound_ric1", "weapons/ric1.wav", "sound to play with 5% chance during TE_SPIKE/TE_SUPERSPIKE (empty cvar disables sound)"};
176 cvar_t cl_sound_ric2 = {0, "cl_sound_ric2", "weapons/ric2.wav", "sound to play with 5% chance during TE_SPIKE/TE_SUPERSPIKE (empty cvar disables sound)"};
177 cvar_t cl_sound_ric3 = {0, "cl_sound_ric3", "weapons/ric3.wav", "sound to play with 10% chance during TE_SPIKE/TE_SUPERSPIKE (empty cvar disables sound)"};
178 cvar_t cl_readpicture_force = {0, "cl_readpicture_force", "0", "when enabled, the low quality pictures read by ReadPicture() are preferred over the high quality pictures on the file system"};
179
180 #define RIC_GUNSHOT             1
181 #define RIC_GUNSHOTQUAD 2
182 cvar_t cl_sound_ric_gunshot = {0, "cl_sound_ric_gunshot", "0", "specifies if and when the related cl_sound_ric and cl_sound_tink sounds apply to TE_GUNSHOT/TE_GUNSHOTQUAD, 0 = no sound, 1 = TE_GUNSHOT, 2 = TE_GUNSHOTQUAD, 3 = TE_GUNSHOT and TE_GUNSHOTQUAD"};
183 cvar_t cl_sound_r_exp3 = {0, "cl_sound_r_exp3", "weapons/r_exp3.wav", "sound to play during TE_EXPLOSION and related effects (empty cvar disables sound)"};
184 cvar_t cl_serverextension_download = {0, "cl_serverextension_download", "0", "indicates whether the server supports the download command"};
185 cvar_t cl_joinbeforedownloadsfinish = {CVAR_SAVE, "cl_joinbeforedownloadsfinish", "1", "if non-zero the game will begin after the map is loaded before other downloads finish"};
186 cvar_t cl_nettimesyncfactor = {CVAR_SAVE, "cl_nettimesyncfactor", "0", "rate at which client time adapts to match server time, 1 = instantly, 0.125 = slowly, 0 = not at all (bounding still applies)"};
187 cvar_t cl_nettimesyncboundmode = {CVAR_SAVE, "cl_nettimesyncboundmode", "6", "method of restricting client time to valid values, 0 = no correction, 1 = tight bounding (jerky with packet loss), 2 = loose bounding (corrects it if out of bounds), 3 = leniant bounding (ignores temporary errors due to varying framerate), 4 = slow adjustment method from Quake3, 5 = slighttly nicer version of Quake3 method, 6 = bounding + Quake3"};
188 cvar_t cl_nettimesyncboundtolerance = {CVAR_SAVE, "cl_nettimesyncboundtolerance", "0.25", "how much error is tolerated by bounding check, as a fraction of frametime, 0.25 = up to 25% margin of error tolerated, 1 = use only new time, 0 = use only old time (same effect as setting cl_nettimesyncfactor to 1)"};
189 cvar_t cl_iplog_name = {CVAR_SAVE, "cl_iplog_name", "darkplaces_iplog.txt", "name of iplog file containing player addresses for iplog_list command and automatic ip logging when parsing status command"};
190
191 static qboolean QW_CL_CheckOrDownloadFile(const char *filename);
192 static void QW_CL_RequestNextDownload(void);
193 static void QW_CL_NextUpload(void);
194 //static qboolean QW_CL_IsUploading(void);
195 static void QW_CL_StopUpload(void);
196
197 /*
198 ==================
199 CL_ParseStartSoundPacket
200 ==================
201 */
202 static void CL_ParseStartSoundPacket(int largesoundindex)
203 {
204         vec3_t  pos;
205         int     channel, ent;
206         int     sound_num;
207         int     volume;
208         int     field_mask;
209         float   attenuation;
210         float   speed;
211         int             fflags = CHANNELFLAG_NONE;
212
213         if (cls.protocol == PROTOCOL_QUAKEWORLD)
214         {
215                 channel = MSG_ReadShort(&cl_message);
216
217                 if (channel & (1<<15))
218                         volume = MSG_ReadByte(&cl_message);
219                 else
220                         volume = DEFAULT_SOUND_PACKET_VOLUME;
221
222                 if (channel & (1<<14))
223                         attenuation = MSG_ReadByte(&cl_message) / 64.0;
224                 else
225                         attenuation = DEFAULT_SOUND_PACKET_ATTENUATION;
226         
227                 speed = 1.0f;
228
229                 ent = (channel>>3)&1023;
230                 channel &= 7;
231
232                 sound_num = MSG_ReadByte(&cl_message);
233         }
234         else
235         {
236                 field_mask = MSG_ReadByte(&cl_message);
237
238                 if (field_mask & SND_VOLUME)
239                         volume = MSG_ReadByte(&cl_message);
240                 else
241                         volume = DEFAULT_SOUND_PACKET_VOLUME;
242
243                 if (field_mask & SND_ATTENUATION)
244                         attenuation = MSG_ReadByte(&cl_message) / 64.0;
245                 else
246                         attenuation = DEFAULT_SOUND_PACKET_ATTENUATION;
247
248                 if (field_mask & SND_SPEEDUSHORT4000)
249                         speed = ((unsigned short)MSG_ReadShort(&cl_message)) / 4000.0f;
250                 else
251                         speed = 1.0f;
252
253                 if (field_mask & SND_LARGEENTITY)
254                 {
255                         ent = (unsigned short) MSG_ReadShort(&cl_message);
256                         channel = MSG_ReadChar(&cl_message);
257                 }
258                 else
259                 {
260                         channel = (unsigned short) MSG_ReadShort(&cl_message);
261                         ent = channel >> 3;
262                         channel &= 7;
263                 }
264
265                 if (largesoundindex || (field_mask & SND_LARGESOUND) || cls.protocol == PROTOCOL_NEHAHRABJP2 || cls.protocol == PROTOCOL_NEHAHRABJP3)
266                         sound_num = (unsigned short) MSG_ReadShort(&cl_message);
267                 else
268                         sound_num = MSG_ReadByte(&cl_message);
269         }
270
271         channel = CHAN_NET2ENGINE(channel);
272
273         MSG_ReadVector(&cl_message, pos, cls.protocol);
274
275         if (sound_num >= MAX_SOUNDS)
276         {
277                 Con_Printf("CL_ParseStartSoundPacket: sound_num (%i) >= MAX_SOUNDS (%i)\n", sound_num, MAX_SOUNDS);
278                 return;
279         }
280
281         if (ent >= MAX_EDICTS)
282         {
283                 Con_Printf("CL_ParseStartSoundPacket: ent = %i", ent);
284                 return;
285         }
286
287         if (ent >= cl.max_entities)
288                 CL_ExpandEntities(ent);
289
290         if( !CL_VM_Event_Sound(sound_num, volume / 255.0f, channel, attenuation, ent, pos, fflags, speed) )
291                 S_StartSound_StartPosition_Flags (ent, channel, cl.sound_precache[sound_num], pos, volume/255.0f, attenuation, 0, fflags, speed);
292 }
293
294 /*
295 ==================
296 CL_KeepaliveMessage
297
298 When the client is taking a long time to load stuff, send keepalive messages
299 so the server doesn't disconnect.
300 ==================
301 */
302
303 static unsigned char olddata[NET_MAXMESSAGE];
304 void CL_KeepaliveMessage (qboolean readmessages)
305 {
306         static double lastdirtytime = 0;
307         static qboolean recursive = false;
308         double dirtytime;
309         double deltatime;
310         static double countdownmsg = 0;
311         static double countdownupdate = 0;
312         sizebuf_t old;
313
314         qboolean thisrecursive;
315
316         thisrecursive = recursive;
317         recursive = true;
318
319         dirtytime = Sys_DirtyTime();
320         deltatime = dirtytime - lastdirtytime;
321         lastdirtytime = dirtytime;
322         if (deltatime <= 0 || deltatime >= 1800.0)
323                 return;
324
325         countdownmsg -= deltatime;
326         countdownupdate -= deltatime;
327
328         if(!thisrecursive)
329         {
330                 if(cls.state != ca_dedicated)
331                 {
332                         if(countdownupdate <= 0) // check if time stepped backwards
333                         {
334                                 SCR_UpdateLoadingScreenIfShown();
335                                 countdownupdate = 2;
336                         }
337                 }
338         }
339
340         // no need if server is local and definitely not if this is a demo
341         if (sv.active || !cls.netcon || cls.protocol == PROTOCOL_QUAKEWORLD || cls.signon >= SIGNONS)
342         {
343                 recursive = thisrecursive;
344                 return;
345         }
346
347         if (readmessages)
348         {
349                 // read messages from server, should just be nops
350                 old = cl_message;
351                 memcpy(olddata, cl_message.data, cl_message.cursize);
352
353                 NetConn_ClientFrame();
354
355                 cl_message = old;
356                 memcpy(cl_message.data, olddata, cl_message.cursize);
357         }
358
359         if (cls.netcon && countdownmsg <= 0) // check if time stepped backwards
360         {
361                 sizebuf_t       msg;
362                 unsigned char           buf[4];
363                 countdownmsg = 5;
364                 // write out a nop
365                 // LordHavoc: must use unreliable because reliable could kill the sigon message!
366                 Con_Print("--> client to server keepalive\n");
367                 memset(&msg, 0, sizeof(msg));
368                 msg.data = buf;
369                 msg.maxsize = sizeof(buf);
370                 MSG_WriteChar(&msg, clc_nop);
371                 NetConn_SendUnreliableMessage(cls.netcon, &msg, cls.protocol, 10000, 0, false);
372         }
373
374         recursive = thisrecursive;
375 }
376
377 void CL_ParseEntityLump(char *entdata)
378 {
379         const char *data;
380         char key[128], value[MAX_INPUTLINE];
381         FOG_clear(); // LordHavoc: no fog until set
382         // LordHavoc: default to the map's sky (q3 shader parsing sets this)
383         R_SetSkyBox(cl.worldmodel->brush.skybox);
384         data = entdata;
385         if (!data)
386                 return;
387         if (!COM_ParseToken_Simple(&data, false, false, true))
388                 return; // error
389         if (com_token[0] != '{')
390                 return; // error
391         while (1)
392         {
393                 if (!COM_ParseToken_Simple(&data, false, false, true))
394                         return; // error
395                 if (com_token[0] == '}')
396                         break; // end of worldspawn
397                 if (com_token[0] == '_')
398                         strlcpy (key, com_token + 1, sizeof (key));
399                 else
400                         strlcpy (key, com_token, sizeof (key));
401                 while (key[strlen(key)-1] == ' ') // remove trailing spaces
402                         key[strlen(key)-1] = 0;
403                 if (!COM_ParseToken_Simple(&data, false, false, true))
404                         return; // error
405                 strlcpy (value, com_token, sizeof (value));
406                 if (!strcmp("sky", key))
407                         R_SetSkyBox(value);
408                 else if (!strcmp("skyname", key)) // non-standard, introduced by QuakeForge... sigh.
409                         R_SetSkyBox(value);
410                 else if (!strcmp("qlsky", key)) // non-standard, introduced by QuakeLives (EEK)
411                         R_SetSkyBox(value);
412                 else if (!strcmp("fog", key))
413                 {
414                         FOG_clear(); // so missing values get good defaults
415                         r_refdef.fog_start = 0;
416                         r_refdef.fog_alpha = 1;
417                         r_refdef.fog_end = 16384;
418                         r_refdef.fog_height = 1<<30;
419                         r_refdef.fog_fadedepth = 128;
420 #if _MSC_VER >= 1400
421 #define sscanf sscanf_s
422 #endif
423                         sscanf(value, "%f %f %f %f %f %f %f %f %f", &r_refdef.fog_density, &r_refdef.fog_red, &r_refdef.fog_green, &r_refdef.fog_blue, &r_refdef.fog_alpha, &r_refdef.fog_start, &r_refdef.fog_end, &r_refdef.fog_height, &r_refdef.fog_fadedepth);
424                 }
425                 else if (!strcmp("fog_density", key))
426                         r_refdef.fog_density = atof(value);
427                 else if (!strcmp("fog_red", key))
428                         r_refdef.fog_red = atof(value);
429                 else if (!strcmp("fog_green", key))
430                         r_refdef.fog_green = atof(value);
431                 else if (!strcmp("fog_blue", key))
432                         r_refdef.fog_blue = atof(value);
433                 else if (!strcmp("fog_alpha", key))
434                         r_refdef.fog_alpha = atof(value);
435                 else if (!strcmp("fog_start", key))
436                         r_refdef.fog_start = atof(value);
437                 else if (!strcmp("fog_end", key))
438                         r_refdef.fog_end = atof(value);
439                 else if (!strcmp("fog_height", key))
440                         r_refdef.fog_height = atof(value);
441                 else if (!strcmp("fog_fadedepth", key))
442                         r_refdef.fog_fadedepth = atof(value);
443                 else if (!strcmp("fog_heighttexture", key))
444                 {
445                         FOG_clear(); // so missing values get good defaults
446 #if _MSC_VER >= 1400
447                         sscanf_s(value, "%f %f %f %f %f %f %f %f %f %s", &r_refdef.fog_density, &r_refdef.fog_red, &r_refdef.fog_green, &r_refdef.fog_blue, &r_refdef.fog_alpha, &r_refdef.fog_start, &r_refdef.fog_end, &r_refdef.fog_height, &r_refdef.fog_fadedepth, r_refdef.fog_height_texturename, (unsigned int)sizeof(r_refdef.fog_height_texturename));
448 #else
449                         sscanf(value, "%f %f %f %f %f %f %f %f %f %63s", &r_refdef.fog_density, &r_refdef.fog_red, &r_refdef.fog_green, &r_refdef.fog_blue, &r_refdef.fog_alpha, &r_refdef.fog_start, &r_refdef.fog_end, &r_refdef.fog_height, &r_refdef.fog_fadedepth, r_refdef.fog_height_texturename);
450 #endif
451                         r_refdef.fog_height_texturename[63] = 0;
452                 }
453         }
454 }
455
456 static const vec3_t defaultmins = {-4096, -4096, -4096};
457 static const vec3_t defaultmaxs = {4096, 4096, 4096};
458 static void CL_SetupWorldModel(void)
459 {
460         prvm_prog_t *prog = CLVM_prog;
461         // update the world model
462         cl.entities[0].render.model = cl.worldmodel = CL_GetModelByIndex(1);
463         CL_UpdateRenderEntity(&cl.entities[0].render);
464
465         // make sure the cl.worldname and related cvars are set up now that we know the world model name
466         // set up csqc world for collision culling
467         if (cl.worldmodel)
468         {
469                 strlcpy(cl.worldname, cl.worldmodel->name, sizeof(cl.worldname));
470                 FS_StripExtension(cl.worldname, cl.worldnamenoextension, sizeof(cl.worldnamenoextension));
471                 strlcpy(cl.worldbasename, !strncmp(cl.worldnamenoextension, "maps/", 5) ? cl.worldnamenoextension + 5 : cl.worldnamenoextension, sizeof(cl.worldbasename));
472                 Cvar_SetQuick(&cl_worldmessage, cl.worldmessage);
473                 Cvar_SetQuick(&cl_worldname, cl.worldname);
474                 Cvar_SetQuick(&cl_worldnamenoextension, cl.worldnamenoextension);
475                 Cvar_SetQuick(&cl_worldbasename, cl.worldbasename);
476                 World_SetSize(&cl.world, cl.worldname, cl.worldmodel->normalmins, cl.worldmodel->normalmaxs, prog);
477         }
478         else
479         {
480                 Cvar_SetQuick(&cl_worldmessage, cl.worldmessage);
481                 Cvar_SetQuick(&cl_worldnamenoextension, "");
482                 Cvar_SetQuick(&cl_worldbasename, "");
483                 World_SetSize(&cl.world, "", defaultmins, defaultmaxs, prog);
484         }
485         World_Start(&cl.world);
486
487         // load or reload .loc file for team chat messages
488         CL_Locs_Reload_f();
489
490         // make sure we send enough keepalives
491         CL_KeepaliveMessage(false);
492
493         // reset particles and other per-level things
494         R_Modules_NewMap();
495
496         // make sure we send enough keepalives
497         CL_KeepaliveMessage(false);
498
499         // load the team chat beep if possible
500         cl.foundtalk2wav = FS_FileExists("sound/misc/talk2.wav");
501
502         // check memory integrity
503         Mem_CheckSentinelsGlobal();
504
505         // make menu know
506         MR_NewMap();
507
508         // load the csqc now
509         if (cl.loadcsqc)
510         {
511                 cl.loadcsqc = false;
512
513                 CL_VM_Init();
514         }
515 }
516
517 static qboolean QW_CL_CheckOrDownloadFile(const char *filename)
518 {
519         qfile_t *file;
520         char vabuf[1024];
521
522         // see if the file already exists
523         file = FS_OpenVirtualFile(filename, true);
524         if (file)
525         {
526                 FS_Close(file);
527                 return true;
528         }
529
530         // download messages in a demo would be bad
531         if (cls.demorecording)
532         {
533                 Con_Printf("Unable to download \"%s\" when recording.\n", filename);
534                 return true;
535         }
536
537         // don't try to download when playing a demo
538         if (!cls.netcon)
539                 return true;
540
541         strlcpy(cls.qw_downloadname, filename, sizeof(cls.qw_downloadname));
542         Con_Printf("Downloading %s\n", filename);
543
544         if (!cls.qw_downloadmemory)
545         {
546                 cls.qw_downloadmemory = NULL;
547                 cls.qw_downloadmemorycursize = 0;
548                 cls.qw_downloadmemorymaxsize = 1024*1024; // start out with a 1MB buffer
549         }
550
551         MSG_WriteByte(&cls.netcon->message, qw_clc_stringcmd);
552         MSG_WriteString(&cls.netcon->message, va(vabuf, sizeof(vabuf), "download %s", filename));
553
554         cls.qw_downloadnumber++;
555         cls.qw_downloadpercent = 0;
556         cls.qw_downloadmemorycursize = 0;
557
558         return false;
559 }
560
561 static void QW_CL_ProcessUserInfo(int slot);
562 static void QW_CL_RequestNextDownload(void)
563 {
564         int i;
565         char vabuf[1024];
566
567         // clear name of file that just finished
568         cls.qw_downloadname[0] = 0;
569
570         switch (cls.qw_downloadtype)
571         {
572         case dl_single:
573                 break;
574         case dl_skin:
575                 if (cls.qw_downloadnumber == 0)
576                         Con_Printf("Checking skins...\n");
577                 for (;cls.qw_downloadnumber < cl.maxclients;cls.qw_downloadnumber++)
578                 {
579                         if (!cl.scores[cls.qw_downloadnumber].name[0])
580                                 continue;
581                         // check if we need to download the file, and return if so
582                         if (!QW_CL_CheckOrDownloadFile(va(vabuf, sizeof(vabuf), "skins/%s.pcx", cl.scores[cls.qw_downloadnumber].qw_skin)))
583                                 return;
584                 }
585
586                 cls.qw_downloadtype = dl_none;
587
588                 // load any newly downloaded skins
589                 for (i = 0;i < cl.maxclients;i++)
590                         QW_CL_ProcessUserInfo(i);
591
592                 // if we're still in signon stages, request the next one
593                 if (cls.signon != SIGNONS)
594                 {
595                         cls.signon = SIGNONS-1;
596                         // we'll go to SIGNONS when the first entity update is received
597                         MSG_WriteByte(&cls.netcon->message, qw_clc_stringcmd);
598                         MSG_WriteString(&cls.netcon->message, va(vabuf, sizeof(vabuf), "begin %i", cl.qw_servercount));
599                 }
600                 break;
601         case dl_model:
602                 if (cls.qw_downloadnumber == 0)
603                 {
604                         Con_Printf("Checking models...\n");
605                         cls.qw_downloadnumber = 1;
606                 }
607
608                 for (;cls.qw_downloadnumber < MAX_MODELS && cl.model_name[cls.qw_downloadnumber][0];cls.qw_downloadnumber++)
609                 {
610                         // skip submodels
611                         if (cl.model_name[cls.qw_downloadnumber][0] == '*')
612                                 continue;
613                         if (!strcmp(cl.model_name[cls.qw_downloadnumber], "progs/spike.mdl"))
614                                 cl.qw_modelindex_spike = cls.qw_downloadnumber;
615                         if (!strcmp(cl.model_name[cls.qw_downloadnumber], "progs/player.mdl"))
616                                 cl.qw_modelindex_player = cls.qw_downloadnumber;
617                         if (!strcmp(cl.model_name[cls.qw_downloadnumber], "progs/flag.mdl"))
618                                 cl.qw_modelindex_flag = cls.qw_downloadnumber;
619                         if (!strcmp(cl.model_name[cls.qw_downloadnumber], "progs/s_explod.spr"))
620                                 cl.qw_modelindex_s_explod = cls.qw_downloadnumber;
621                         // check if we need to download the file, and return if so
622                         if (!QW_CL_CheckOrDownloadFile(cl.model_name[cls.qw_downloadnumber]))
623                                 return;
624                 }
625
626                 cls.qw_downloadtype = dl_none;
627
628                 // touch all of the precached models that are still loaded so we can free
629                 // anything that isn't needed
630                 if (!sv.active)
631                         Mod_ClearUsed();
632                 for (i = 1;i < MAX_MODELS && cl.model_name[i][0];i++)
633                         Mod_FindName(cl.model_name[i], cl.model_name[i][0] == '*' ? cl.model_name[1] : NULL);
634                 // precache any models used by the client (this also marks them used)
635                 cl.model_bolt = Mod_ForName("progs/bolt.mdl", false, false, NULL);
636                 cl.model_bolt2 = Mod_ForName("progs/bolt2.mdl", false, false, NULL);
637                 cl.model_bolt3 = Mod_ForName("progs/bolt3.mdl", false, false, NULL);
638                 cl.model_beam = Mod_ForName("progs/beam.mdl", false, false, NULL);
639
640                 // we purge the models and sounds later in CL_SignonReply
641                 //Mod_PurgeUnused();
642
643                 // now we try to load everything that is new
644
645                 // world model
646                 cl.model_precache[1] = Mod_ForName(cl.model_name[1], false, false, NULL);
647                 if (cl.model_precache[1]->Draw == NULL)
648                         Con_Printf("Map %s could not be found or downloaded\n", cl.model_name[1]);
649
650                 // normal models
651                 for (i = 2;i < MAX_MODELS && cl.model_name[i][0];i++)
652                         if ((cl.model_precache[i] = Mod_ForName(cl.model_name[i], false, false, cl.model_name[i][0] == '*' ? cl.model_name[1] : NULL))->Draw == NULL)
653                                 Con_Printf("Model %s could not be found or downloaded\n", cl.model_name[i]);
654
655                 // check memory integrity
656                 Mem_CheckSentinelsGlobal();
657
658                 // now that we have a world model, set up the world entity, renderer
659                 // modules and csqc
660                 CL_SetupWorldModel();
661
662                 // add pmodel/emodel CRCs to userinfo
663                 CL_SetInfo("pmodel", va(vabuf, sizeof(vabuf), "%i", FS_CRCFile("progs/player.mdl", NULL)), true, true, true, true);
664                 CL_SetInfo("emodel", va(vabuf, sizeof(vabuf), "%i", FS_CRCFile("progs/eyes.mdl", NULL)), true, true, true, true);
665
666                 // done checking sounds and models, send a prespawn command now
667                 MSG_WriteByte(&cls.netcon->message, qw_clc_stringcmd);
668                 MSG_WriteString(&cls.netcon->message, va(vabuf, sizeof(vabuf), "prespawn %i 0 %i", cl.qw_servercount, cl.model_precache[1]->brush.qw_md4sum2));
669
670                 if (cls.qw_downloadmemory)
671                 {
672                         Mem_Free(cls.qw_downloadmemory);
673                         cls.qw_downloadmemory = NULL;
674                 }
675
676                 // done loading
677                 cl.loadfinished = true;
678                 break;
679         case dl_sound:
680                 if (cls.qw_downloadnumber == 0)
681                 {
682                         Con_Printf("Checking sounds...\n");
683                         cls.qw_downloadnumber = 1;
684                 }
685
686                 for (;cl.sound_name[cls.qw_downloadnumber][0];cls.qw_downloadnumber++)
687                 {
688                         // check if we need to download the file, and return if so
689                         if (!QW_CL_CheckOrDownloadFile(va(vabuf, sizeof(vabuf), "sound/%s", cl.sound_name[cls.qw_downloadnumber])))
690                                 return;
691                 }
692
693                 cls.qw_downloadtype = dl_none;
694
695                 // clear sound usage flags for purging of unused sounds
696                 S_ClearUsed();
697
698                 // precache any sounds used by the client
699                 cl.sfx_wizhit = S_PrecacheSound(cl_sound_wizardhit.string, false, true);
700                 cl.sfx_knighthit = S_PrecacheSound(cl_sound_hknighthit.string, false, true);
701                 cl.sfx_tink1 = S_PrecacheSound(cl_sound_tink1.string, false, true);
702                 cl.sfx_ric1 = S_PrecacheSound(cl_sound_ric1.string, false, true);
703                 cl.sfx_ric2 = S_PrecacheSound(cl_sound_ric2.string, false, true);
704                 cl.sfx_ric3 = S_PrecacheSound(cl_sound_ric3.string, false, true);
705                 cl.sfx_r_exp3 = S_PrecacheSound(cl_sound_r_exp3.string, false, true);
706
707                 // sounds used by the game
708                 for (i = 1;i < MAX_SOUNDS && cl.sound_name[i][0];i++)
709                         cl.sound_precache[i] = S_PrecacheSound(cl.sound_name[i], true, true);
710
711                 // we purge the models and sounds later in CL_SignonReply
712                 //S_PurgeUnused();
713
714                 // check memory integrity
715                 Mem_CheckSentinelsGlobal();
716
717                 // done with sound downloads, next we check models
718                 MSG_WriteByte(&cls.netcon->message, qw_clc_stringcmd);
719                 MSG_WriteString(&cls.netcon->message, va(vabuf, sizeof(vabuf), "modellist %i %i", cl.qw_servercount, 0));
720                 break;
721         case dl_none:
722         default:
723                 Con_Printf("Unknown download type.\n");
724         }
725 }
726
727 static void QW_CL_ParseDownload(void)
728 {
729         int size = (signed short)MSG_ReadShort(&cl_message);
730         int percent = MSG_ReadByte(&cl_message);
731
732         //Con_Printf("download %i %i%% (%i/%i)\n", size, percent, cls.qw_downloadmemorycursize, cls.qw_downloadmemorymaxsize);
733
734         // skip the download fragment if playing a demo
735         if (!cls.netcon)
736         {
737                 if (size > 0)
738                         cl_message.readcount += size;
739                 return;
740         }
741
742         if (size == -1)
743         {
744                 Con_Printf("File not found.\n");
745                 QW_CL_RequestNextDownload();
746                 return;
747         }
748
749         if (cl_message.readcount + (unsigned short)size > cl_message.cursize)
750                 Host_Error("corrupt download message\n");
751
752         // make sure the buffer is big enough to include this new fragment
753         if (!cls.qw_downloadmemory || cls.qw_downloadmemorymaxsize < cls.qw_downloadmemorycursize + size)
754         {
755                 unsigned char *old;
756                 while (cls.qw_downloadmemorymaxsize < cls.qw_downloadmemorycursize + size)
757                         cls.qw_downloadmemorymaxsize *= 2;
758                 old = cls.qw_downloadmemory;
759                 cls.qw_downloadmemory = (unsigned char *)Mem_Alloc(cls.permanentmempool, cls.qw_downloadmemorymaxsize);
760                 if (old)
761                 {
762                         memcpy(cls.qw_downloadmemory, old, cls.qw_downloadmemorycursize);
763                         Mem_Free(old);
764                 }
765         }
766
767         // read the fragment out of the packet
768         MSG_ReadBytes(&cl_message, size, cls.qw_downloadmemory + cls.qw_downloadmemorycursize);
769         cls.qw_downloadmemorycursize += size;
770         cls.qw_downloadspeedcount += size;
771
772         cls.qw_downloadpercent = percent;
773
774         if (percent != 100)
775         {
776                 // request next fragment
777                 MSG_WriteByte(&cls.netcon->message, qw_clc_stringcmd);
778                 MSG_WriteString(&cls.netcon->message, "nextdl");
779         }
780         else
781         {
782                 // finished file
783                 Con_Printf("Downloaded \"%s\"\n", cls.qw_downloadname);
784
785                 FS_WriteFile(cls.qw_downloadname, cls.qw_downloadmemory, cls.qw_downloadmemorycursize);
786
787                 cls.qw_downloadpercent = 0;
788
789                 // start downloading the next file (or join the game)
790                 QW_CL_RequestNextDownload();
791         }
792 }
793
794 static void QW_CL_ParseModelList(void)
795 {
796         int n;
797         int nummodels = MSG_ReadByte(&cl_message);
798         char *str;
799         char vabuf[1024];
800
801         // parse model precache list
802         for (;;)
803         {
804                 str = MSG_ReadString(&cl_message, cl_readstring, sizeof(cl_readstring));
805                 if (!str[0])
806                         break;
807                 nummodels++;
808                 if (nummodels==MAX_MODELS)
809                         Host_Error("Server sent too many model precaches");
810                 if (strlen(str) >= MAX_QPATH)
811                         Host_Error("Server sent a precache name of %i characters (max %i)", (int)strlen(str), MAX_QPATH - 1);
812                 strlcpy(cl.model_name[nummodels], str, sizeof (cl.model_name[nummodels]));
813         }
814
815         n = MSG_ReadByte(&cl_message);
816         if (n)
817         {
818                 MSG_WriteByte(&cls.netcon->message, qw_clc_stringcmd);
819                 MSG_WriteString(&cls.netcon->message, va(vabuf, sizeof(vabuf), "modellist %i %i", cl.qw_servercount, n));
820                 return;
821         }
822
823         cls.signon = 2;
824         cls.qw_downloadnumber = 0;
825         cls.qw_downloadtype = dl_model;
826         QW_CL_RequestNextDownload();
827 }
828
829 static void QW_CL_ParseSoundList(void)
830 {
831         int n;
832         int numsounds = MSG_ReadByte(&cl_message);
833         char *str;
834         char vabuf[1024];
835
836         // parse sound precache list
837         for (;;)
838         {
839                 str = MSG_ReadString(&cl_message, cl_readstring, sizeof(cl_readstring));
840                 if (!str[0])
841                         break;
842                 numsounds++;
843                 if (numsounds==MAX_SOUNDS)
844                         Host_Error("Server sent too many sound precaches");
845                 if (strlen(str) >= MAX_QPATH)
846                         Host_Error("Server sent a precache name of %i characters (max %i)", (int)strlen(str), MAX_QPATH - 1);
847                 strlcpy(cl.sound_name[numsounds], str, sizeof (cl.sound_name[numsounds]));
848         }
849
850         n = MSG_ReadByte(&cl_message);
851
852         if (n)
853         {
854                 MSG_WriteByte(&cls.netcon->message, qw_clc_stringcmd);
855                 MSG_WriteString(&cls.netcon->message, va(vabuf, sizeof(vabuf), "soundlist %i %i", cl.qw_servercount, n));
856                 return;
857         }
858
859         cls.signon = 2;
860         cls.qw_downloadnumber = 0;
861         cls.qw_downloadtype = dl_sound;
862         QW_CL_RequestNextDownload();
863 }
864
865 static void QW_CL_Skins_f(void)
866 {
867         cls.qw_downloadnumber = 0;
868         cls.qw_downloadtype = dl_skin;
869         QW_CL_RequestNextDownload();
870 }
871
872 static void QW_CL_Changing_f(void)
873 {
874         if (cls.qw_downloadmemory)  // don't change when downloading
875                 return;
876
877         S_StopAllSounds();
878         cl.intermission = 0;
879         cls.signon = 1; // not active anymore, but not disconnected
880         Con_Printf("\nChanging map...\n");
881 }
882
883 void QW_CL_NextUpload(void)
884 {
885         int r, percent, size;
886
887         if (!cls.qw_uploaddata)
888                 return;
889
890         r = cls.qw_uploadsize - cls.qw_uploadpos;
891         if (r > 768)
892                 r = 768;
893         size = min(1, cls.qw_uploadsize);
894         percent = (cls.qw_uploadpos+r)*100/size;
895
896         MSG_WriteByte(&cls.netcon->message, qw_clc_upload);
897         MSG_WriteShort(&cls.netcon->message, r);
898         MSG_WriteByte(&cls.netcon->message, percent);
899         SZ_Write(&cls.netcon->message, cls.qw_uploaddata + cls.qw_uploadpos, r);
900
901         Con_DPrintf("UPLOAD: %6d: %d written\n", cls.qw_uploadpos, r);
902
903         cls.qw_uploadpos += r;
904
905         if (cls.qw_uploadpos < cls.qw_uploadsize)
906                 return;
907
908         Con_Printf("Upload completed\n");
909
910         QW_CL_StopUpload();
911 }
912
913 void QW_CL_StartUpload(unsigned char *data, int size)
914 {
915         // do nothing in demos or if not connected
916         if (!cls.netcon)
917                 return;
918
919         // abort existing upload if in progress
920         QW_CL_StopUpload();
921
922         Con_DPrintf("Starting upload of %d bytes...\n", size);
923
924         cls.qw_uploaddata = (unsigned char *)Mem_Alloc(cls.permanentmempool, size);
925         memcpy(cls.qw_uploaddata, data, size);
926         cls.qw_uploadsize = size;
927         cls.qw_uploadpos = 0;
928
929         QW_CL_NextUpload();
930 }
931
932 #if 0
933 qboolean QW_CL_IsUploading(void)
934 {
935         return cls.qw_uploaddata != NULL;
936 }
937 #endif
938
939 void QW_CL_StopUpload(void)
940 {
941         if (cls.qw_uploaddata)
942                 Mem_Free(cls.qw_uploaddata);
943         cls.qw_uploaddata = NULL;
944         cls.qw_uploadsize = 0;
945         cls.qw_uploadpos = 0;
946 }
947
948 static void QW_CL_ProcessUserInfo(int slot)
949 {
950         int topcolor, bottomcolor;
951         char temp[2048];
952         InfoString_GetValue(cl.scores[slot].qw_userinfo, "name", cl.scores[slot].name, sizeof(cl.scores[slot].name));
953         InfoString_GetValue(cl.scores[slot].qw_userinfo, "topcolor", temp, sizeof(temp));topcolor = atoi(temp);
954         InfoString_GetValue(cl.scores[slot].qw_userinfo, "bottomcolor", temp, sizeof(temp));bottomcolor = atoi(temp);
955         cl.scores[slot].colors = topcolor * 16 + bottomcolor;
956         InfoString_GetValue(cl.scores[slot].qw_userinfo, "*spectator", temp, sizeof(temp));
957         cl.scores[slot].qw_spectator = temp[0] != 0;
958         InfoString_GetValue(cl.scores[slot].qw_userinfo, "team", cl.scores[slot].qw_team, sizeof(cl.scores[slot].qw_team));
959         InfoString_GetValue(cl.scores[slot].qw_userinfo, "skin", cl.scores[slot].qw_skin, sizeof(cl.scores[slot].qw_skin));
960         if (!cl.scores[slot].qw_skin[0])
961                 strlcpy(cl.scores[slot].qw_skin, "base", sizeof(cl.scores[slot].qw_skin));
962         // TODO: skin cache
963 }
964
965 static void QW_CL_UpdateUserInfo(void)
966 {
967         int slot;
968         slot = MSG_ReadByte(&cl_message);
969         if (slot >= cl.maxclients)
970         {
971                 Con_Printf("svc_updateuserinfo >= cl.maxclients\n");
972                 MSG_ReadLong(&cl_message);
973                 MSG_ReadString(&cl_message, cl_readstring, sizeof(cl_readstring));
974                 return;
975         }
976         cl.scores[slot].qw_userid = MSG_ReadLong(&cl_message);
977         strlcpy(cl.scores[slot].qw_userinfo, MSG_ReadString(&cl_message, cl_readstring, sizeof(cl_readstring)), sizeof(cl.scores[slot].qw_userinfo));
978
979         QW_CL_ProcessUserInfo(slot);
980 }
981
982 static void QW_CL_SetInfo(void)
983 {
984         int slot;
985         char key[2048];
986         char value[2048];
987         slot = MSG_ReadByte(&cl_message);
988         strlcpy(key, MSG_ReadString(&cl_message, cl_readstring, sizeof(cl_readstring)), sizeof(key));
989         strlcpy(value, MSG_ReadString(&cl_message, cl_readstring, sizeof(cl_readstring)), sizeof(value));
990         if (slot >= cl.maxclients)
991         {
992                 Con_Printf("svc_setinfo >= cl.maxclients\n");
993                 return;
994         }
995         InfoString_SetValue(cl.scores[slot].qw_userinfo, sizeof(cl.scores[slot].qw_userinfo), key, value);
996
997         QW_CL_ProcessUserInfo(slot);
998 }
999
1000 static void QW_CL_ServerInfo(void)
1001 {
1002         char key[2048];
1003         char value[2048];
1004         char temp[32];
1005         strlcpy(key, MSG_ReadString(&cl_message, cl_readstring, sizeof(cl_readstring)), sizeof(key));
1006         strlcpy(value, MSG_ReadString(&cl_message, cl_readstring, sizeof(cl_readstring)), sizeof(value));
1007         Con_DPrintf("SERVERINFO: %s=%s\n", key, value);
1008         InfoString_SetValue(cl.qw_serverinfo, sizeof(cl.qw_serverinfo), key, value);
1009         InfoString_GetValue(cl.qw_serverinfo, "teamplay", temp, sizeof(temp));
1010         cl.qw_teamplay = atoi(temp);
1011 }
1012
1013 static void QW_CL_ParseNails(void)
1014 {
1015         int i, j;
1016         int numnails = MSG_ReadByte(&cl_message);
1017         vec_t *v;
1018         unsigned char bits[6];
1019         for (i = 0;i < numnails;i++)
1020         {
1021                 for (j = 0;j < 6;j++)
1022                         bits[j] = MSG_ReadByte(&cl_message);
1023                 if (cl.qw_num_nails > 255)
1024                         continue;
1025                 v = cl.qw_nails[cl.qw_num_nails++];
1026                 v[0] = ( ( bits[0] + ((bits[1]&15)<<8) ) <<1) - 4096;
1027                 v[1] = ( ( (bits[1]>>4) + (bits[2]<<4) ) <<1) - 4096;
1028                 v[2] = ( ( bits[3] + ((bits[4]&15)<<8) ) <<1) - 4096;
1029                 v[3] = -360*(bits[4]>>4)/16;
1030                 v[4] = 360*bits[5]/256;
1031                 v[5] = 0;
1032         }
1033 }
1034
1035 static void CL_UpdateItemsAndWeapon(void)
1036 {
1037         int j;
1038         // check for important changes
1039
1040         // set flash times
1041         if (cl.olditems != cl.stats[STAT_ITEMS])
1042                 for (j = 0;j < 32;j++)
1043                         if ((cl.stats[STAT_ITEMS] & (1<<j)) && !(cl.olditems & (1<<j)))
1044                                 cl.item_gettime[j] = cl.time;
1045         cl.olditems = cl.stats[STAT_ITEMS];
1046
1047         // GAME_NEXUIZ hud needs weapon change time
1048         if (cl.activeweapon != cl.stats[STAT_ACTIVEWEAPON])
1049                 cl.weapontime = cl.time;
1050         cl.activeweapon = cl.stats[STAT_ACTIVEWEAPON];
1051 }
1052
1053 #define LOADPROGRESSWEIGHT_SOUND            1.0
1054 #define LOADPROGRESSWEIGHT_MODEL            4.0
1055 #define LOADPROGRESSWEIGHT_WORLDMODEL      30.0
1056 #define LOADPROGRESSWEIGHT_WORLDMODEL_INIT  2.0
1057
1058 static void CL_BeginDownloads(qboolean aborteddownload)
1059 {
1060         char vabuf[1024];
1061         // quakeworld works differently
1062         if (cls.protocol == PROTOCOL_QUAKEWORLD)
1063                 return;
1064
1065         // this would be a good place to do curl downloads
1066         if(Curl_Have_forthismap())
1067         {
1068                 Curl_Register_predownload(); // come back later
1069                 return;
1070         }
1071
1072         // if we got here...
1073         // curl is done, so let's start with the business
1074         if(!cl.loadbegun)
1075                 SCR_PushLoadingScreen(false, "Loading precaches", 1);
1076         cl.loadbegun = true;
1077
1078         // if already downloading something from the previous level, don't stop it
1079         if (cls.qw_downloadname[0])
1080                 return;
1081
1082         if (cl.downloadcsqc)
1083         {
1084                 size_t progsize;
1085                 cl.downloadcsqc = false;
1086                 if (cls.netcon
1087                  && !sv.active
1088                  && csqc_progname.string
1089                  && csqc_progname.string[0]
1090                  && csqc_progcrc.integer >= 0
1091                  && cl_serverextension_download.integer
1092                  && (FS_CRCFile(csqc_progname.string, &progsize) != csqc_progcrc.integer || ((int)progsize != csqc_progsize.integer && csqc_progsize.integer != -1))
1093                  && !FS_FileExists(va(vabuf, sizeof(vabuf), "dlcache/%s.%i.%i", csqc_progname.string, csqc_progsize.integer, csqc_progcrc.integer)))
1094                 {
1095                         Con_Printf("Downloading new CSQC code to dlcache/%s.%i.%i\n", csqc_progname.string, csqc_progsize.integer, csqc_progcrc.integer);
1096                         if(cl_serverextension_download.integer == 2 && FS_HasZlib())
1097                                 Cmd_ForwardStringToServer(va(vabuf, sizeof(vabuf), "download %s deflate", csqc_progname.string));
1098                         else
1099                                 Cmd_ForwardStringToServer(va(vabuf, sizeof(vabuf), "download %s", csqc_progname.string));
1100                         return;
1101                 }
1102         }
1103
1104         if (cl.loadmodel_current < cl.loadmodel_total)
1105         {
1106                 // loading models
1107                 if(cl.loadmodel_current == 1)
1108                 {
1109                         // worldmodel counts as 16 models (15 + world model setup), for better progress bar
1110                         SCR_PushLoadingScreen(false, "Loading precached models",
1111                                 (
1112                                         (cl.loadmodel_total - 1) * LOADPROGRESSWEIGHT_MODEL
1113                                 +       LOADPROGRESSWEIGHT_WORLDMODEL
1114                                 +       LOADPROGRESSWEIGHT_WORLDMODEL_INIT
1115                                 ) / (
1116                                         (cl.loadmodel_total - 1) * LOADPROGRESSWEIGHT_MODEL
1117                                 +       LOADPROGRESSWEIGHT_WORLDMODEL
1118                                 +       LOADPROGRESSWEIGHT_WORLDMODEL_INIT
1119                                 +       cl.loadsound_total * LOADPROGRESSWEIGHT_SOUND
1120                                 )
1121                         );
1122                         SCR_BeginLoadingPlaque(false);
1123                 }
1124                 for (;cl.loadmodel_current < cl.loadmodel_total;cl.loadmodel_current++)
1125                 {
1126                         SCR_PushLoadingScreen(false, cl.model_name[cl.loadmodel_current],
1127                                 (
1128                                         (cl.loadmodel_current == 1) ? LOADPROGRESSWEIGHT_WORLDMODEL : LOADPROGRESSWEIGHT_MODEL
1129                                 ) / (
1130                                         (cl.loadmodel_total - 1) * LOADPROGRESSWEIGHT_MODEL
1131                                 +       LOADPROGRESSWEIGHT_WORLDMODEL
1132                                 +       LOADPROGRESSWEIGHT_WORLDMODEL_INIT
1133                                 )
1134                         );
1135                         if (cl.model_precache[cl.loadmodel_current] && cl.model_precache[cl.loadmodel_current]->Draw)
1136                         {
1137                                 SCR_PopLoadingScreen(false);
1138                                 if(cl.loadmodel_current == 1)
1139                                 {
1140                                         SCR_PushLoadingScreen(false, cl.model_name[cl.loadmodel_current], 1.0 / cl.loadmodel_total);
1141                                         SCR_PopLoadingScreen(false);
1142                                 }
1143                                 continue;
1144                         }
1145                         CL_KeepaliveMessage(true);
1146
1147                         // if running a local game, calling Mod_ForName is a completely wasted effort...
1148                         if (sv.active)
1149                                 cl.model_precache[cl.loadmodel_current] = sv.models[cl.loadmodel_current];
1150                         else
1151                         {
1152                                 if(cl.loadmodel_current == 1)
1153                                 {
1154                                         // they'll be soon loaded, but make sure we apply freshly downloaded shaders from a curled pk3
1155                                         Mod_FreeQ3Shaders();
1156                                 }
1157                                 cl.model_precache[cl.loadmodel_current] = Mod_ForName(cl.model_name[cl.loadmodel_current], false, false, cl.model_name[cl.loadmodel_current][0] == '*' ? cl.model_name[1] : NULL);
1158                         }
1159                         SCR_PopLoadingScreen(false);
1160                         if (cl.model_precache[cl.loadmodel_current] && cl.model_precache[cl.loadmodel_current]->Draw && cl.loadmodel_current == 1)
1161                         {
1162                                 // we now have the worldmodel so we can set up the game world
1163                                 SCR_PushLoadingScreen(true, "world model setup",
1164                                         (
1165                                                 LOADPROGRESSWEIGHT_WORLDMODEL_INIT
1166                                         ) / (
1167                                                 (cl.loadmodel_total - 1) * LOADPROGRESSWEIGHT_MODEL
1168                                         +       LOADPROGRESSWEIGHT_WORLDMODEL
1169                                         +       LOADPROGRESSWEIGHT_WORLDMODEL_INIT
1170                                         )
1171                                 );
1172                                 CL_SetupWorldModel();
1173                                 SCR_PopLoadingScreen(true);
1174                                 if (!cl.loadfinished && cl_joinbeforedownloadsfinish.integer)
1175                                 {
1176                                         cl.loadfinished = true;
1177                                         // now issue the spawn to move on to signon 2 like normal
1178                                         if (cls.netcon)
1179                                                 Cmd_ForwardStringToServer("prespawn");
1180                                 }
1181                         }
1182                 }
1183                 SCR_PopLoadingScreen(false);
1184                 // finished loading models
1185         }
1186
1187         if (cl.loadsound_current < cl.loadsound_total)
1188         {
1189                 // loading sounds
1190                 if(cl.loadsound_current == 1)
1191                         SCR_PushLoadingScreen(false, "Loading precached sounds",
1192                                 (
1193                                         cl.loadsound_total * LOADPROGRESSWEIGHT_SOUND
1194                                 ) / (
1195                                         (cl.loadmodel_total - 1) * LOADPROGRESSWEIGHT_MODEL
1196                                 +       LOADPROGRESSWEIGHT_WORLDMODEL
1197                                 +       LOADPROGRESSWEIGHT_WORLDMODEL_INIT
1198                                 +       cl.loadsound_total * LOADPROGRESSWEIGHT_SOUND
1199                                 )
1200                         );
1201                 for (;cl.loadsound_current < cl.loadsound_total;cl.loadsound_current++)
1202                 {
1203                         SCR_PushLoadingScreen(false, cl.sound_name[cl.loadsound_current], 1.0 / cl.loadsound_total);
1204                         if (cl.sound_precache[cl.loadsound_current] && S_IsSoundPrecached(cl.sound_precache[cl.loadsound_current]))
1205                         {
1206                                 SCR_PopLoadingScreen(false);
1207                                 continue;
1208                         }
1209                         CL_KeepaliveMessage(true);
1210                         cl.sound_precache[cl.loadsound_current] = S_PrecacheSound(cl.sound_name[cl.loadsound_current], false, true);
1211                         SCR_PopLoadingScreen(false);
1212                 }
1213                 SCR_PopLoadingScreen(false);
1214                 // finished loading sounds
1215         }
1216
1217         if(gamemode == GAME_NEXUIZ || gamemode == GAME_XONOTIC)
1218                 Cvar_SetValueQuick(&cl_serverextension_download, false);
1219                 // in Nexuiz/Xonotic, the built in download protocol is kinda broken (misses lots
1220                 // of dependencies) anyway, and can mess around with the game directory;
1221                 // until this is fixed, only support pk3 downloads via curl, and turn off
1222                 // individual file downloads other than for CSQC
1223                 // on the other end of the download protocol, GAME_NEXUIZ/GAME_XONOTIC enforces writing
1224                 // to dlcache only
1225                 // idea: support download of pk3 files using this protocol later
1226
1227         // note: the reason these loops skip already-loaded things is that it
1228         // enables this command to be issued during the game if desired
1229
1230         if (cl.downloadmodel_current < cl.loadmodel_total)
1231         {
1232                 // loading models
1233
1234                 for (;cl.downloadmodel_current < cl.loadmodel_total;cl.downloadmodel_current++)
1235                 {
1236                         if (aborteddownload)
1237                         {
1238
1239                                 if (cl.downloadmodel_current == 1)
1240                                 {
1241                                         // the worldmodel failed, but we need to set up anyway
1242                                         Mod_FreeQ3Shaders();
1243                                         CL_SetupWorldModel();
1244                                         if (!cl.loadfinished && cl_joinbeforedownloadsfinish.integer)
1245                                         {
1246                                                 cl.loadfinished = true;
1247                                                 // now issue the spawn to move on to signon 2 like normal
1248                                                 if (cls.netcon)
1249                                                         Cmd_ForwardStringToServer("prespawn");
1250                                         }
1251                                 }
1252                                 aborteddownload = false;
1253                                 continue;
1254                         }
1255                         if (cl.model_precache[cl.downloadmodel_current] && cl.model_precache[cl.downloadmodel_current]->Draw)
1256                                 continue;
1257                         CL_KeepaliveMessage(true);
1258                         if (cl.model_name[cl.downloadmodel_current][0] != '*' && strcmp(cl.model_name[cl.downloadmodel_current], "null") && !FS_FileExists(cl.model_name[cl.downloadmodel_current]))
1259                         {
1260                                 if (cl.downloadmodel_current == 1)
1261                                         Con_Printf("Map %s not found\n", cl.model_name[cl.downloadmodel_current]);
1262                                 else
1263                                         Con_Printf("Model %s not found\n", cl.model_name[cl.downloadmodel_current]);
1264                                 // regarding the * check: don't try to download submodels
1265                                 if (cl_serverextension_download.integer && cls.netcon && cl.model_name[cl.downloadmodel_current][0] != '*' && !sv.active)
1266                                 {
1267                                         Cmd_ForwardStringToServer(va(vabuf, sizeof(vabuf), "download %s", cl.model_name[cl.downloadmodel_current]));
1268                                         // we'll try loading again when the download finishes
1269                                         return;
1270                                 }
1271                         }
1272
1273                         if(cl.downloadmodel_current == 1)
1274                         {
1275                                 // they'll be soon loaded, but make sure we apply freshly downloaded shaders from a curled pk3
1276                                 Mod_FreeQ3Shaders();
1277                         }
1278
1279                         cl.model_precache[cl.downloadmodel_current] = Mod_ForName(cl.model_name[cl.downloadmodel_current], false, true, cl.model_name[cl.downloadmodel_current][0] == '*' ? cl.model_name[1] : NULL);
1280                         if (cl.downloadmodel_current == 1)
1281                         {
1282                                 // we now have the worldmodel so we can set up the game world
1283                                 // or maybe we do not have it (cl_serverextension_download 0)
1284                                 // then we need to continue loading ANYWAY!
1285                                 CL_SetupWorldModel();
1286                                 if (!cl.loadfinished && cl_joinbeforedownloadsfinish.integer)
1287                                 {
1288                                         cl.loadfinished = true;
1289                                         // now issue the spawn to move on to signon 2 like normal
1290                                         if (cls.netcon)
1291                                                 Cmd_ForwardStringToServer("prespawn");
1292                                 }
1293                         }
1294                 }
1295
1296                 // finished loading models
1297         }
1298
1299         if (cl.downloadsound_current < cl.loadsound_total)
1300         {
1301                 // loading sounds
1302
1303                 for (;cl.downloadsound_current < cl.loadsound_total;cl.downloadsound_current++)
1304                 {
1305                         char soundname[MAX_QPATH];
1306                         if (aborteddownload)
1307                         {
1308                                 aborteddownload = false;
1309                                 continue;
1310                         }
1311                         if (cl.sound_precache[cl.downloadsound_current] && S_IsSoundPrecached(cl.sound_precache[cl.downloadsound_current]))
1312                                 continue;
1313                         CL_KeepaliveMessage(true);
1314                         dpsnprintf(soundname, sizeof(soundname), "sound/%s", cl.sound_name[cl.downloadsound_current]);
1315                         if (!FS_FileExists(soundname) && !FS_FileExists(cl.sound_name[cl.downloadsound_current]))
1316                         {
1317                                 Con_Printf("Sound %s not found\n", soundname);
1318                                 if (cl_serverextension_download.integer && cls.netcon && !sv.active)
1319                                 {
1320                                         Cmd_ForwardStringToServer(va(vabuf, sizeof(vabuf), "download %s", soundname));
1321                                         // we'll try loading again when the download finishes
1322                                         return;
1323                                 }
1324                         }
1325                         cl.sound_precache[cl.downloadsound_current] = S_PrecacheSound(cl.sound_name[cl.downloadsound_current], false, true);
1326                 }
1327
1328                 // finished loading sounds
1329         }
1330
1331         SCR_PopLoadingScreen(false);
1332
1333         if (!cl.loadfinished)
1334         {
1335                 cl.loadfinished = true;
1336
1337                 // check memory integrity
1338                 Mem_CheckSentinelsGlobal();
1339
1340                 // now issue the spawn to move on to signon 2 like normal
1341                 if (cls.netcon)
1342                         Cmd_ForwardStringToServer("prespawn");
1343         }
1344 }
1345
1346 static void CL_BeginDownloads_f(void)
1347 {
1348         // prevent cl_begindownloads from being issued multiple times in one match
1349         // to prevent accidentally cancelled downloads
1350         if(cl.loadbegun)
1351                 Con_Printf("cl_begindownloads is only valid once per match\n");
1352         else
1353                 CL_BeginDownloads(false);
1354 }
1355
1356 static void CL_StopDownload(int size, int crc)
1357 {
1358         if (cls.qw_downloadmemory && cls.qw_downloadmemorycursize == size && CRC_Block(cls.qw_downloadmemory, cls.qw_downloadmemorycursize) == crc)
1359         {
1360                 int existingcrc;
1361                 size_t existingsize;
1362                 const char *extension;
1363
1364                 if(cls.qw_download_deflate)
1365                 {
1366                         unsigned char *out;
1367                         size_t inflated_size;
1368                         out = FS_Inflate(cls.qw_downloadmemory, cls.qw_downloadmemorycursize, &inflated_size, tempmempool);
1369                         Mem_Free(cls.qw_downloadmemory);
1370                         if(out)
1371                         {
1372                                 Con_Printf("Inflated download: new size: %u (%g%%)\n", (unsigned)inflated_size, 100.0 - 100.0*(cls.qw_downloadmemorycursize / (float)inflated_size));
1373                                 cls.qw_downloadmemory = out;
1374                                 cls.qw_downloadmemorycursize = inflated_size;
1375                         }
1376                         else
1377                         {
1378                                 cls.qw_downloadmemory = NULL;
1379                                 cls.qw_downloadmemorycursize = 0;
1380                                 Con_Printf("Cannot inflate download, possibly corrupt or zlib not present\n");
1381                         }
1382                 }
1383
1384                 if(!cls.qw_downloadmemory)
1385                 {
1386                         Con_Printf("Download \"%s\" is corrupt (see above!)\n", cls.qw_downloadname);
1387                 }
1388                 else
1389                 {
1390                         crc = CRC_Block(cls.qw_downloadmemory, cls.qw_downloadmemorycursize);
1391                         size = cls.qw_downloadmemorycursize;
1392                         // finished file
1393                         // save to disk only if we don't already have it
1394                         // (this is mainly for playing back demos)
1395                         existingcrc = FS_CRCFile(cls.qw_downloadname, &existingsize);
1396                         if (existingsize || gamemode == GAME_NEXUIZ || gamemode == GAME_XONOTIC || !strcmp(cls.qw_downloadname, csqc_progname.string))
1397                                 // let csprogs ALWAYS go to dlcache, to prevent "viral csprogs"; also, never put files outside dlcache for Nexuiz/Xonotic
1398                         {
1399                                 if ((int)existingsize != size || existingcrc != crc)
1400                                 {
1401                                         // we have a mismatching file, pick another name for it
1402                                         char name[MAX_QPATH*2];
1403                                         dpsnprintf(name, sizeof(name), "dlcache/%s.%i.%i", cls.qw_downloadname, size, crc);
1404                                         if (!FS_FileExists(name))
1405                                         {
1406                                                 Con_Printf("Downloaded \"%s\" (%i bytes, %i CRC)\n", name, size, crc);
1407                                                 FS_WriteFile(name, cls.qw_downloadmemory, cls.qw_downloadmemorycursize);
1408                                                 if(!strcmp(cls.qw_downloadname, csqc_progname.string))
1409                                                 {
1410                                                         if(cls.caughtcsprogsdata)
1411                                                                 Mem_Free(cls.caughtcsprogsdata);
1412                                                         cls.caughtcsprogsdata = (unsigned char *) Mem_Alloc(cls.permanentmempool, cls.qw_downloadmemorycursize);
1413                                                         memcpy(cls.caughtcsprogsdata, cls.qw_downloadmemory, cls.qw_downloadmemorycursize);
1414                                                         cls.caughtcsprogsdatasize = cls.qw_downloadmemorycursize;
1415                                                         Con_DPrintf("Buffered \"%s\"\n", name);
1416                                                 }
1417                                         }
1418                                 }
1419                         }
1420                         else
1421                         {
1422                                 // we either don't have it or have a mismatching file...
1423                                 // so it's time to accept the file
1424                                 // but if we already have a mismatching file we need to rename
1425                                 // this new one, and if we already have this file in renamed form,
1426                                 // we do nothing
1427                                 Con_Printf("Downloaded \"%s\" (%i bytes, %i CRC)\n", cls.qw_downloadname, size, crc);
1428                                 FS_WriteFile(cls.qw_downloadname, cls.qw_downloadmemory, cls.qw_downloadmemorycursize);
1429                                 extension = FS_FileExtension(cls.qw_downloadname);
1430                                 if (!strcasecmp(extension, "pak") || !strcasecmp(extension, "pk3"))
1431                                         FS_Rescan();
1432                         }
1433                 }
1434         }
1435         else if (cls.qw_downloadmemory && size)
1436         {
1437                 Con_Printf("Download \"%s\" is corrupt (%i bytes, %i CRC, should be %i bytes, %i CRC), discarding\n", cls.qw_downloadname, size, crc, (int)cls.qw_downloadmemorycursize, (int)CRC_Block(cls.qw_downloadmemory, cls.qw_downloadmemorycursize));
1438                 CL_BeginDownloads(true);
1439         }
1440
1441         if (cls.qw_downloadmemory)
1442                 Mem_Free(cls.qw_downloadmemory);
1443         cls.qw_downloadmemory = NULL;
1444         cls.qw_downloadname[0] = 0;
1445         cls.qw_downloadmemorymaxsize = 0;
1446         cls.qw_downloadmemorycursize = 0;
1447         cls.qw_downloadpercent = 0;
1448 }
1449
1450 static void CL_ParseDownload(void)
1451 {
1452         int i, start, size;
1453         static unsigned char data[NET_MAXMESSAGE];
1454         start = MSG_ReadLong(&cl_message);
1455         size = (unsigned short)MSG_ReadShort(&cl_message);
1456
1457         // record the start/size information to ack in the next input packet
1458         for (i = 0;i < CL_MAX_DOWNLOADACKS;i++)
1459         {
1460                 if (!cls.dp_downloadack[i].start && !cls.dp_downloadack[i].size)
1461                 {
1462                         cls.dp_downloadack[i].start = start;
1463                         cls.dp_downloadack[i].size = size;
1464                         break;
1465                 }
1466         }
1467
1468         MSG_ReadBytes(&cl_message, size, data);
1469
1470         if (!cls.qw_downloadname[0])
1471         {
1472                 if (size > 0)
1473                         Con_Printf("CL_ParseDownload: received %i bytes with no download active\n", size);
1474                 return;
1475         }
1476
1477         if (start + size > cls.qw_downloadmemorymaxsize)
1478                 Host_Error("corrupt download message\n");
1479
1480         // only advance cursize if the data is at the expected position
1481         // (gaps are unacceptable)
1482         memcpy(cls.qw_downloadmemory + start, data, size);
1483         cls.qw_downloadmemorycursize = start + size;
1484         cls.qw_downloadpercent = (int)floor((start+size) * 100.0 / cls.qw_downloadmemorymaxsize);
1485         cls.qw_downloadpercent = bound(0, cls.qw_downloadpercent, 100);
1486         cls.qw_downloadspeedcount += size;
1487 }
1488
1489 static void CL_DownloadBegin_f(void)
1490 {
1491         int size = atoi(Cmd_Argv(1));
1492
1493         if (size < 0 || size > 1<<30 || FS_CheckNastyPath(Cmd_Argv(2), false))
1494         {
1495                 Con_Printf("cl_downloadbegin: received bogus information\n");
1496                 CL_StopDownload(0, 0);
1497                 return;
1498         }
1499
1500         if (cls.qw_downloadname[0])
1501                 Con_Printf("Download of %s aborted\n", cls.qw_downloadname);
1502
1503         CL_StopDownload(0, 0);
1504
1505         // we're really beginning a download now, so initialize stuff
1506         strlcpy(cls.qw_downloadname, Cmd_Argv(2), sizeof(cls.qw_downloadname));
1507         cls.qw_downloadmemorymaxsize = size;
1508         cls.qw_downloadmemory = (unsigned char *) Mem_Alloc(cls.permanentmempool, cls.qw_downloadmemorymaxsize);
1509         cls.qw_downloadnumber++;
1510
1511         cls.qw_download_deflate = false;
1512         if(Cmd_Argc() >= 4)
1513         {
1514                 if(!strcmp(Cmd_Argv(3), "deflate"))
1515                         cls.qw_download_deflate = true;
1516                 // check further encodings here
1517         }
1518
1519         Cmd_ForwardStringToServer("sv_startdownload");
1520 }
1521
1522 static void CL_StopDownload_f(void)
1523 {
1524         Curl_CancelAll();
1525         if (cls.qw_downloadname[0])
1526         {
1527                 Con_Printf("Download of %s aborted\n", cls.qw_downloadname);
1528                 CL_StopDownload(0, 0);
1529         }
1530         CL_BeginDownloads(true);
1531 }
1532
1533 static void CL_DownloadFinished_f(void)
1534 {
1535         if (Cmd_Argc() < 3)
1536         {
1537                 Con_Printf("Malformed cl_downloadfinished command\n");
1538                 return;
1539         }
1540         CL_StopDownload(atoi(Cmd_Argv(1)), atoi(Cmd_Argv(2)));
1541         CL_BeginDownloads(false);
1542 }
1543
1544 static void CL_SendPlayerInfo(void)
1545 {
1546         char vabuf[1024];
1547         MSG_WriteByte (&cls.netcon->message, clc_stringcmd);
1548         MSG_WriteString (&cls.netcon->message, va(vabuf, sizeof(vabuf), "name \"%s\"", cl_name.string));
1549
1550         MSG_WriteByte (&cls.netcon->message, clc_stringcmd);
1551         MSG_WriteString (&cls.netcon->message, va(vabuf, sizeof(vabuf), "color %i %i", cl_color.integer >> 4, cl_color.integer & 15));
1552
1553         MSG_WriteByte (&cls.netcon->message, clc_stringcmd);
1554         MSG_WriteString (&cls.netcon->message, va(vabuf, sizeof(vabuf), "rate %i", cl_rate.integer));
1555
1556         MSG_WriteByte (&cls.netcon->message, clc_stringcmd);
1557         MSG_WriteString (&cls.netcon->message, va(vabuf, sizeof(vabuf), "rate_burstsize %i", cl_rate_burstsize.integer));
1558
1559         if (cl_pmodel.integer)
1560         {
1561                 MSG_WriteByte (&cls.netcon->message, clc_stringcmd);
1562                 MSG_WriteString (&cls.netcon->message, va(vabuf, sizeof(vabuf), "pmodel %i", cl_pmodel.integer));
1563         }
1564         if (*cl_playermodel.string)
1565         {
1566                 MSG_WriteByte (&cls.netcon->message, clc_stringcmd);
1567                 MSG_WriteString (&cls.netcon->message, va(vabuf, sizeof(vabuf), "playermodel %s", cl_playermodel.string));
1568         }
1569         if (*cl_playerskin.string)
1570         {
1571                 MSG_WriteByte (&cls.netcon->message, clc_stringcmd);
1572                 MSG_WriteString (&cls.netcon->message, va(vabuf, sizeof(vabuf), "playerskin %s", cl_playerskin.string));
1573         }
1574 }
1575
1576 /*
1577 =====================
1578 CL_SignonReply
1579
1580 An svc_signonnum has been received, perform a client side setup
1581 =====================
1582 */
1583 static void CL_SignonReply (void)
1584 {
1585         Con_DPrintf("CL_SignonReply: %i\n", cls.signon);
1586
1587         switch (cls.signon)
1588         {
1589         case 1:
1590                 if (cls.netcon)
1591                 {
1592                         // send player info before we begin downloads
1593                         // (so that the server can see the player name while downloading)
1594                         CL_SendPlayerInfo();
1595
1596                         // execute cl_begindownloads next frame
1597                         // (after any commands added by svc_stufftext have been executed)
1598                         // when done with downloads the "prespawn" will be sent
1599                         Cbuf_AddText("\ncl_begindownloads\n");
1600
1601                         //MSG_WriteByte (&cls.netcon->message, clc_stringcmd);
1602                         //MSG_WriteString (&cls.netcon->message, "prespawn");
1603                 }
1604                 else // playing a demo...  make sure loading occurs as soon as possible
1605                         CL_BeginDownloads(false);
1606                 break;
1607
1608         case 2:
1609                 if (cls.netcon)
1610                 {
1611                         // LordHavoc: quake sent the player info here but due to downloads
1612                         // it is sent earlier instead
1613                         // CL_SendPlayerInfo();
1614
1615                         // LordHavoc: changed to begin a loading stage and issue this when done
1616                         MSG_WriteByte (&cls.netcon->message, clc_stringcmd);
1617                         MSG_WriteString (&cls.netcon->message, "spawn");
1618                 }
1619                 break;
1620
1621         case 3:
1622                 if (cls.netcon)
1623                 {
1624                         MSG_WriteByte (&cls.netcon->message, clc_stringcmd);
1625                         MSG_WriteString (&cls.netcon->message, "begin");
1626                 }
1627                 break;
1628
1629         case 4:
1630                 // after the level has been loaded, we shouldn't need the shaders, and
1631                 // if they are needed again they will be automatically loaded...
1632                 // we also don't need the unused models or sounds from the last level
1633                 Mod_FreeQ3Shaders();
1634                 Mod_PurgeUnused();
1635                 S_PurgeUnused();
1636
1637                 Con_ClearNotify();
1638                 if (COM_CheckParm("-profilegameonly"))
1639                         Sys_AllowProfiling(true);
1640                 break;
1641         }
1642 }
1643
1644 /*
1645 ==================
1646 CL_ParseServerInfo
1647 ==================
1648 */
1649 static void CL_ParseServerInfo (void)
1650 {
1651         char *str;
1652         int i;
1653         protocolversion_t protocol;
1654         int nummodels, numsounds;
1655         char vabuf[1024];
1656
1657         // if we start loading a level and a video is still playing, stop it
1658         CL_VideoStop();
1659
1660         Con_DPrint("Serverinfo packet received.\n");
1661         Collision_Cache_Reset(true);
1662
1663         // if server is active, we already began a loading plaque
1664         if (!sv.active)
1665         {
1666                 SCR_BeginLoadingPlaque(false);
1667                 S_StopAllSounds();
1668                 // free q3 shaders so that any newly downloaded shaders will be active
1669                 Mod_FreeQ3Shaders();
1670         }
1671
1672         // check memory integrity
1673         Mem_CheckSentinelsGlobal();
1674
1675         // clear cl_serverextension cvars
1676         Cvar_SetValueQuick(&cl_serverextension_download, 0);
1677
1678 //
1679 // wipe the client_state_t struct
1680 //
1681         CL_ClearState ();
1682
1683 // parse protocol version number
1684         i = MSG_ReadLong(&cl_message);
1685         protocol = Protocol_EnumForNumber(i);
1686         if (protocol == PROTOCOL_UNKNOWN)
1687         {
1688                 Host_Error("CL_ParseServerInfo: Server is unrecognized protocol number (%i)", i);
1689                 return;
1690         }
1691         // hack for unmarked Nehahra movie demos which had a custom protocol
1692         if (protocol == PROTOCOL_QUAKEDP && cls.demoplayback && gamemode == GAME_NEHAHRA)
1693                 protocol = PROTOCOL_NEHAHRAMOVIE;
1694         cls.protocol = protocol;
1695         Con_DPrintf("Server protocol is %s\n", Protocol_NameForEnum(cls.protocol));
1696
1697         cl.num_entities = 1;
1698
1699         if (protocol == PROTOCOL_QUAKEWORLD)
1700         {
1701                 char gamedir[1][MAX_QPATH];
1702
1703                 cl.qw_servercount = MSG_ReadLong(&cl_message);
1704
1705                 str = MSG_ReadString(&cl_message, cl_readstring, sizeof(cl_readstring));
1706                 Con_Printf("server gamedir is %s\n", str);
1707                 strlcpy(gamedir[0], str, sizeof(gamedir[0]));
1708
1709                 // change gamedir if needed
1710                 if (!FS_ChangeGameDirs(1, gamedir, true, false))
1711                         Host_Error("CL_ParseServerInfo: unable to switch to server specified gamedir");
1712
1713                 cl.gametype = GAME_DEATHMATCH;
1714                 cl.maxclients = 32;
1715
1716                 // parse player number
1717                 i = MSG_ReadByte(&cl_message);
1718                 // cl.qw_spectator is an unneeded flag, cl.scores[cl.playerentity].qw_spectator works better (it can be updated by the server during the game)
1719                 //cl.qw_spectator = (i & 128) != 0;
1720                 cl.realplayerentity = cl.playerentity = cl.viewentity = (i & 127) + 1;
1721                 cl.scores = (scoreboard_t *)Mem_Alloc(cls.levelmempool, cl.maxclients*sizeof(*cl.scores));
1722
1723                 // get the full level name
1724                 str = MSG_ReadString(&cl_message, cl_readstring, sizeof(cl_readstring));
1725                 strlcpy (cl.worldmessage, str, sizeof(cl.worldmessage));
1726
1727                 // get the movevars that are defined in the qw protocol
1728                 cl.movevars_gravity            = MSG_ReadFloat(&cl_message);
1729                 cl.movevars_stopspeed          = MSG_ReadFloat(&cl_message);
1730                 cl.movevars_maxspeed           = MSG_ReadFloat(&cl_message);
1731                 cl.movevars_spectatormaxspeed  = MSG_ReadFloat(&cl_message);
1732                 cl.movevars_accelerate         = MSG_ReadFloat(&cl_message);
1733                 cl.movevars_airaccelerate      = MSG_ReadFloat(&cl_message);
1734                 cl.movevars_wateraccelerate    = MSG_ReadFloat(&cl_message);
1735                 cl.movevars_friction           = MSG_ReadFloat(&cl_message);
1736                 cl.movevars_waterfriction      = MSG_ReadFloat(&cl_message);
1737                 cl.movevars_entgravity         = MSG_ReadFloat(&cl_message);
1738
1739                 // other movevars not in the protocol...
1740                 cl.movevars_wallfriction = 0;
1741                 cl.movevars_timescale = 1;
1742                 cl.movevars_jumpvelocity = 270;
1743                 cl.movevars_edgefriction = 1;
1744                 cl.movevars_maxairspeed = 30;
1745                 cl.movevars_stepheight = 18;
1746                 cl.movevars_airaccel_qw = 1;
1747                 cl.movevars_airaccel_sideways_friction = 0;
1748
1749                 // seperate the printfs so the server message can have a color
1750                 Con_Printf("\n\n<===================================>\n\n\2%s\n", str);
1751
1752                 // check memory integrity
1753                 Mem_CheckSentinelsGlobal();
1754
1755                 if (cls.netcon)
1756                 {
1757                         MSG_WriteByte(&cls.netcon->message, qw_clc_stringcmd);
1758                         MSG_WriteString(&cls.netcon->message, va(vabuf, sizeof(vabuf), "soundlist %i %i", cl.qw_servercount, 0));
1759                 }
1760
1761                 cl.loadbegun = false;
1762                 cl.loadfinished = false;
1763
1764                 cls.state = ca_connected;
1765                 cls.signon = 1;
1766
1767                 // note: on QW protocol we can't set up the gameworld until after
1768                 // downloads finish...
1769                 // (we don't even know the name of the map yet)
1770                 // this also means cl_autodemo does not work on QW protocol...
1771
1772                 strlcpy(cl.worldname, "", sizeof(cl.worldname));
1773                 strlcpy(cl.worldnamenoextension, "", sizeof(cl.worldnamenoextension));
1774                 strlcpy(cl.worldbasename, "qw", sizeof(cl.worldbasename));
1775                 Cvar_SetQuick(&cl_worldname, cl.worldname);
1776                 Cvar_SetQuick(&cl_worldnamenoextension, cl.worldnamenoextension);
1777                 Cvar_SetQuick(&cl_worldbasename, cl.worldbasename);
1778
1779                 // check memory integrity
1780                 Mem_CheckSentinelsGlobal();
1781         }
1782         else
1783         {
1784         // parse maxclients
1785                 cl.maxclients = MSG_ReadByte(&cl_message);
1786                 if (cl.maxclients < 1 || cl.maxclients > MAX_SCOREBOARD)
1787                 {
1788                         Host_Error("Bad maxclients (%u) from server", cl.maxclients);
1789                         return;
1790                 }
1791                 cl.scores = (scoreboard_t *)Mem_Alloc(cls.levelmempool, cl.maxclients*sizeof(*cl.scores));
1792
1793         // parse gametype
1794                 cl.gametype = MSG_ReadByte(&cl_message);
1795                 // the original id singleplayer demos are bugged and contain
1796                 // GAME_DEATHMATCH even for singleplayer
1797                 if (cl.maxclients == 1 && cls.protocol == PROTOCOL_QUAKE)
1798                         cl.gametype = GAME_COOP;
1799
1800         // parse signon message
1801                 str = MSG_ReadString(&cl_message, cl_readstring, sizeof(cl_readstring));
1802                 strlcpy (cl.worldmessage, str, sizeof(cl.worldmessage));
1803
1804         // seperate the printfs so the server message can have a color
1805                 if (cls.protocol != PROTOCOL_NEHAHRAMOVIE) // no messages when playing the Nehahra movie
1806                         Con_Printf("\n<===================================>\n\n\2%s\n", str);
1807
1808                 // check memory integrity
1809                 Mem_CheckSentinelsGlobal();
1810
1811                 // parse model precache list
1812                 for (nummodels=1 ; ; nummodels++)
1813                 {
1814                         str = MSG_ReadString(&cl_message, cl_readstring, sizeof(cl_readstring));
1815                         if (!str[0])
1816                                 break;
1817                         if (nummodels==MAX_MODELS)
1818                                 Host_Error ("Server sent too many model precaches");
1819                         if (strlen(str) >= MAX_QPATH)
1820                                 Host_Error ("Server sent a precache name of %i characters (max %i)", (int)strlen(str), MAX_QPATH - 1);
1821                         strlcpy (cl.model_name[nummodels], str, sizeof (cl.model_name[nummodels]));
1822                 }
1823                 // parse sound precache list
1824                 for (numsounds=1 ; ; numsounds++)
1825                 {
1826                         str = MSG_ReadString(&cl_message, cl_readstring, sizeof(cl_readstring));
1827                         if (!str[0])
1828                                 break;
1829                         if (numsounds==MAX_SOUNDS)
1830                                 Host_Error("Server sent too many sound precaches");
1831                         if (strlen(str) >= MAX_QPATH)
1832                                 Host_Error("Server sent a precache name of %i characters (max %i)", (int)strlen(str), MAX_QPATH - 1);
1833                         strlcpy (cl.sound_name[numsounds], str, sizeof (cl.sound_name[numsounds]));
1834                 }
1835
1836                 // set the base name for level-specific things...  this gets updated again by CL_SetupWorldModel later
1837                 strlcpy(cl.worldname, cl.model_name[1], sizeof(cl.worldname));
1838                 FS_StripExtension(cl.worldname, cl.worldnamenoextension, sizeof(cl.worldnamenoextension));
1839                 strlcpy(cl.worldbasename, !strncmp(cl.worldnamenoextension, "maps/", 5) ? cl.worldnamenoextension + 5 : cl.worldnamenoextension, sizeof(cl.worldbasename));
1840                 Cvar_SetQuick(&cl_worldmessage, cl.worldmessage);
1841                 Cvar_SetQuick(&cl_worldname, cl.worldname);
1842                 Cvar_SetQuick(&cl_worldnamenoextension, cl.worldnamenoextension);
1843                 Cvar_SetQuick(&cl_worldbasename, cl.worldbasename);
1844
1845                 // touch all of the precached models that are still loaded so we can free
1846                 // anything that isn't needed
1847                 if (!sv.active)
1848                         Mod_ClearUsed();
1849                 for (i = 1;i < nummodels;i++)
1850                         Mod_FindName(cl.model_name[i], cl.model_name[i][0] == '*' ? cl.model_name[1] : NULL);
1851                 // precache any models used by the client (this also marks them used)
1852                 cl.model_bolt = Mod_ForName("progs/bolt.mdl", false, false, NULL);
1853                 cl.model_bolt2 = Mod_ForName("progs/bolt2.mdl", false, false, NULL);
1854                 cl.model_bolt3 = Mod_ForName("progs/bolt3.mdl", false, false, NULL);
1855                 cl.model_beam = Mod_ForName("progs/beam.mdl", false, false, NULL);
1856
1857                 // we purge the models and sounds later in CL_SignonReply
1858                 //Mod_PurgeUnused();
1859                 //S_PurgeUnused();
1860
1861                 // clear sound usage flags for purging of unused sounds
1862                 S_ClearUsed();
1863
1864                 // precache any sounds used by the client
1865                 cl.sfx_wizhit = S_PrecacheSound(cl_sound_wizardhit.string, false, true);
1866                 cl.sfx_knighthit = S_PrecacheSound(cl_sound_hknighthit.string, false, true);
1867                 cl.sfx_tink1 = S_PrecacheSound(cl_sound_tink1.string, false, true);
1868                 cl.sfx_ric1 = S_PrecacheSound(cl_sound_ric1.string, false, true);
1869                 cl.sfx_ric2 = S_PrecacheSound(cl_sound_ric2.string, false, true);
1870                 cl.sfx_ric3 = S_PrecacheSound(cl_sound_ric3.string, false, true);
1871                 cl.sfx_r_exp3 = S_PrecacheSound(cl_sound_r_exp3.string, false, true);
1872
1873                 // sounds used by the game
1874                 for (i = 1;i < MAX_SOUNDS && cl.sound_name[i][0];i++)
1875                         cl.sound_precache[i] = S_PrecacheSound(cl.sound_name[i], true, true);
1876
1877                 // now we try to load everything that is new
1878                 cl.loadmodel_current = 1;
1879                 cl.downloadmodel_current = 1;
1880                 cl.loadmodel_total = nummodels;
1881                 cl.loadsound_current = 1;
1882                 cl.downloadsound_current = 1;
1883                 cl.loadsound_total = numsounds;
1884                 cl.downloadcsqc = true;
1885                 cl.loadbegun = false;
1886                 cl.loadfinished = false;
1887                 cl.loadcsqc = true;
1888
1889                 // check memory integrity
1890                 Mem_CheckSentinelsGlobal();
1891
1892         // if cl_autodemo is set, automatically start recording a demo if one isn't being recorded already
1893                 if (cl_autodemo.integer && cls.netcon && cls.protocol != PROTOCOL_QUAKEWORLD)
1894                 {
1895                         char demofile[MAX_OSPATH];
1896
1897                         if (cls.demorecording)
1898                         {
1899                                 // finish the previous level's demo file
1900                                 CL_Stop_f();
1901                         }
1902
1903                         // start a new demo file
1904                         dpsnprintf (demofile, sizeof(demofile), "%s_%s.dem", Sys_TimeString (cl_autodemo_nameformat.string), cl.worldbasename);
1905
1906                         Con_Printf ("Auto-recording to %s.\n", demofile);
1907
1908                         // Reset bit 0 for every new demo
1909                         Cvar_SetValueQuick(&cl_autodemo_delete,
1910                                 (cl_autodemo_delete.integer & ~0x1)
1911                                 |
1912                                 ((cl_autodemo_delete.integer & 0x2) ? 0x1 : 0)
1913                         );
1914
1915                         cls.demofile = FS_OpenRealFile(demofile, "wb", false);
1916                         if (cls.demofile)
1917                         {
1918                                 cls.forcetrack = -1;
1919                                 FS_Printf (cls.demofile, "%i\n", cls.forcetrack);
1920                                 cls.demorecording = true;
1921                                 strlcpy(cls.demoname, demofile, sizeof(cls.demoname));
1922                                 cls.demo_lastcsprogssize = -1;
1923                                 cls.demo_lastcsprogscrc = -1;
1924                         }
1925                         else
1926                                 Con_Print ("ERROR: couldn't open.\n");
1927                 }
1928         }
1929         cl.islocalgame = NetConn_IsLocalGame();
1930 }
1931
1932 void CL_ValidateState(entity_state_t *s)
1933 {
1934         dp_model_t *model;
1935
1936         if (!s->active)
1937                 return;
1938
1939         if (s->modelindex >= MAX_MODELS)
1940                 Host_Error("CL_ValidateState: modelindex (%i) >= MAX_MODELS (%i)\n", s->modelindex, MAX_MODELS);
1941
1942         // these warnings are only warnings, no corrections are made to the state
1943         // because states are often copied for decoding, which otherwise would
1944         // propogate some of the corrections accidentally
1945         // (this used to happen, sometimes affecting skin and frame)
1946
1947         // colormap is client index + 1
1948         if (!(s->flags & RENDER_COLORMAPPED) && s->colormap > cl.maxclients)
1949                 Con_DPrintf("CL_ValidateState: colormap (%i) > cl.maxclients (%i)\n", s->colormap, cl.maxclients);
1950
1951         if (developer_extra.integer)
1952         {
1953                 model = CL_GetModelByIndex(s->modelindex);
1954                 if (model && model->type && s->frame >= model->numframes)
1955                         Con_DPrintf("CL_ValidateState: no such frame %i in \"%s\" (which has %i frames)\n", s->frame, model->name, model->numframes);
1956                 if (model && model->type && s->skin > 0 && s->skin >= model->numskins && !(s->lightpflags & PFLAGS_FULLDYNAMIC))
1957                         Con_DPrintf("CL_ValidateState: no such skin %i in \"%s\" (which has %i skins)\n", s->skin, model->name, model->numskins);
1958         }
1959 }
1960
1961 void CL_MoveLerpEntityStates(entity_t *ent)
1962 {
1963         float odelta[3], adelta[3];
1964         VectorSubtract(ent->state_current.origin, ent->persistent.neworigin, odelta);
1965         VectorSubtract(ent->state_current.angles, ent->persistent.newangles, adelta);
1966         if (!ent->state_previous.active || ent->state_previous.modelindex != ent->state_current.modelindex)
1967         {
1968                 // reset all persistent stuff if this is a new entity
1969                 ent->persistent.lerpdeltatime = 0;
1970                 ent->persistent.lerpstarttime = cl.mtime[1];
1971                 VectorCopy(ent->state_current.origin, ent->persistent.oldorigin);
1972                 VectorCopy(ent->state_current.angles, ent->persistent.oldangles);
1973                 VectorCopy(ent->state_current.origin, ent->persistent.neworigin);
1974                 VectorCopy(ent->state_current.angles, ent->persistent.newangles);
1975                 // reset animation interpolation as well
1976                 ent->render.framegroupblend[0].frame = ent->render.framegroupblend[1].frame = ent->state_current.frame;
1977                 ent->render.framegroupblend[0].start = ent->render.framegroupblend[1].start = cl.time;
1978                 ent->render.framegroupblend[0].lerp = 1;ent->render.framegroupblend[1].lerp = 0;
1979                 ent->render.shadertime = cl.time;
1980                 // reset various persistent stuff
1981                 ent->persistent.muzzleflash = 0;
1982                 ent->persistent.trail_allowed = false;
1983         }
1984         else if ((ent->state_previous.effects & EF_TELEPORT_BIT) != (ent->state_current.effects & EF_TELEPORT_BIT))
1985         {
1986                 // don't interpolate the move
1987                 ent->persistent.lerpdeltatime = 0;
1988                 ent->persistent.lerpstarttime = cl.mtime[1];
1989                 VectorCopy(ent->state_current.origin, ent->persistent.oldorigin);
1990                 VectorCopy(ent->state_current.angles, ent->persistent.oldangles);
1991                 VectorCopy(ent->state_current.origin, ent->persistent.neworigin);
1992                 VectorCopy(ent->state_current.angles, ent->persistent.newangles);
1993                 ent->persistent.trail_allowed = false;
1994
1995                 // if(ent->state_current.frame != ent->state_previous.frame)
1996                 // do this even if we did change the frame
1997                 // teleport bit is only used if an animation restart, or a jump, is necessary
1998                 // so it should be always harmless to do this
1999                 {
2000                         ent->render.framegroupblend[0].frame = ent->render.framegroupblend[1].frame = ent->state_current.frame;
2001                         ent->render.framegroupblend[0].start = ent->render.framegroupblend[1].start = cl.time;
2002                         ent->render.framegroupblend[0].lerp = 1;ent->render.framegroupblend[1].lerp = 0;
2003                 }
2004
2005                 // note that this case must do everything the following case does too
2006         }
2007         else if ((ent->state_previous.effects & EF_RESTARTANIM_BIT) != (ent->state_current.effects & EF_RESTARTANIM_BIT))
2008         {
2009                 ent->render.framegroupblend[1] = ent->render.framegroupblend[0];
2010                 ent->render.framegroupblend[1].lerp = 1;
2011                 ent->render.framegroupblend[0].frame = ent->state_current.frame;
2012                 ent->render.framegroupblend[0].start = cl.time;
2013                 ent->render.framegroupblend[0].lerp = 0;
2014         }
2015         else if (DotProduct(odelta, odelta) > 1000*1000
2016                 || (cl.fixangle[0] && !cl.fixangle[1])
2017                 || (ent->state_previous.tagindex != ent->state_current.tagindex)
2018                 || (ent->state_previous.tagentity != ent->state_current.tagentity))
2019         {
2020                 // don't interpolate the move
2021                 // (the fixangle[] check detects teleports, but not constant fixangles
2022                 //  such as when spectating)
2023                 ent->persistent.lerpdeltatime = 0;
2024                 ent->persistent.lerpstarttime = cl.mtime[1];
2025                 VectorCopy(ent->state_current.origin, ent->persistent.oldorigin);
2026                 VectorCopy(ent->state_current.angles, ent->persistent.oldangles);
2027                 VectorCopy(ent->state_current.origin, ent->persistent.neworigin);
2028                 VectorCopy(ent->state_current.angles, ent->persistent.newangles);
2029                 ent->persistent.trail_allowed = false;
2030         }
2031         else if (ent->state_current.flags & RENDER_STEP)
2032         {
2033                 // monster interpolation
2034                 if (DotProduct(odelta, odelta) + DotProduct(adelta, adelta) > 0.01)
2035                 {
2036                         ent->persistent.lerpdeltatime = bound(0, cl.mtime[1] - ent->persistent.lerpstarttime, 0.1);
2037                         ent->persistent.lerpstarttime = cl.mtime[1];
2038                         VectorCopy(ent->persistent.neworigin, ent->persistent.oldorigin);
2039                         VectorCopy(ent->persistent.newangles, ent->persistent.oldangles);
2040                         VectorCopy(ent->state_current.origin, ent->persistent.neworigin);
2041                         VectorCopy(ent->state_current.angles, ent->persistent.newangles);
2042                 }
2043         }
2044         else
2045         {
2046                 // not a monster
2047                 ent->persistent.lerpstarttime = ent->state_previous.time;
2048                 // no lerp if it's singleplayer
2049                 if (cl.islocalgame && !sv_fixedframeratesingleplayer.integer)
2050                         ent->persistent.lerpdeltatime = 0;
2051                 else
2052                         ent->persistent.lerpdeltatime = bound(0, ent->state_current.time - ent->state_previous.time, 0.1);
2053                 VectorCopy(ent->persistent.neworigin, ent->persistent.oldorigin);
2054                 VectorCopy(ent->persistent.newangles, ent->persistent.oldangles);
2055                 VectorCopy(ent->state_current.origin, ent->persistent.neworigin);
2056                 VectorCopy(ent->state_current.angles, ent->persistent.newangles);
2057         }
2058         // trigger muzzleflash effect if necessary
2059         if (ent->state_current.effects & EF_MUZZLEFLASH)
2060                 ent->persistent.muzzleflash = 1;
2061
2062         // restart animation bit
2063         if ((ent->state_previous.effects & EF_RESTARTANIM_BIT) != (ent->state_current.effects & EF_RESTARTANIM_BIT))
2064         {
2065                 ent->render.framegroupblend[1] = ent->render.framegroupblend[0];
2066                 ent->render.framegroupblend[1].lerp = 1;
2067                 ent->render.framegroupblend[0].frame = ent->state_current.frame;
2068                 ent->render.framegroupblend[0].start = cl.time;
2069                 ent->render.framegroupblend[0].lerp = 0;
2070         }
2071 }
2072
2073 /*
2074 ==================
2075 CL_ParseBaseline
2076 ==================
2077 */
2078 static void CL_ParseBaseline (entity_t *ent, int large)
2079 {
2080         int i;
2081
2082         ent->state_baseline = defaultstate;
2083         // FIXME: set ent->state_baseline.number?
2084         ent->state_baseline.active = true;
2085         if (large)
2086         {
2087                 ent->state_baseline.modelindex = (unsigned short) MSG_ReadShort(&cl_message);
2088                 ent->state_baseline.frame = (unsigned short) MSG_ReadShort(&cl_message);
2089         }
2090         else if (cls.protocol == PROTOCOL_NEHAHRABJP || cls.protocol == PROTOCOL_NEHAHRABJP2 || cls.protocol == PROTOCOL_NEHAHRABJP3)
2091         {
2092                 ent->state_baseline.modelindex = (unsigned short) MSG_ReadShort(&cl_message);
2093                 ent->state_baseline.frame = MSG_ReadByte(&cl_message);
2094         }
2095         else
2096         {
2097                 ent->state_baseline.modelindex = MSG_ReadByte(&cl_message);
2098                 ent->state_baseline.frame = MSG_ReadByte(&cl_message);
2099         }
2100         ent->state_baseline.colormap = MSG_ReadByte(&cl_message);
2101         ent->state_baseline.skin = MSG_ReadByte(&cl_message);
2102         for (i = 0;i < 3;i++)
2103         {
2104                 ent->state_baseline.origin[i] = MSG_ReadCoord(&cl_message, cls.protocol);
2105                 ent->state_baseline.angles[i] = MSG_ReadAngle(&cl_message, cls.protocol);
2106         }
2107         ent->state_previous = ent->state_current = ent->state_baseline;
2108 }
2109
2110
2111 /*
2112 ==================
2113 CL_ParseClientdata
2114
2115 Server information pertaining to this client only
2116 ==================
2117 */
2118 static void CL_ParseClientdata (void)
2119 {
2120         int i, bits;
2121
2122         VectorCopy (cl.mpunchangle[0], cl.mpunchangle[1]);
2123         VectorCopy (cl.mpunchvector[0], cl.mpunchvector[1]);
2124         VectorCopy (cl.mvelocity[0], cl.mvelocity[1]);
2125         cl.mviewzoom[1] = cl.mviewzoom[0];
2126
2127         if (cls.protocol == PROTOCOL_QUAKE || cls.protocol == PROTOCOL_QUAKEDP || cls.protocol == PROTOCOL_NEHAHRAMOVIE || cls.protocol == PROTOCOL_NEHAHRABJP || cls.protocol == PROTOCOL_NEHAHRABJP2 || cls.protocol == PROTOCOL_NEHAHRABJP3 || cls.protocol == PROTOCOL_DARKPLACES1 || cls.protocol == PROTOCOL_DARKPLACES2 || cls.protocol == PROTOCOL_DARKPLACES3 || cls.protocol == PROTOCOL_DARKPLACES4 || cls.protocol == PROTOCOL_DARKPLACES5)
2128         {
2129                 cl.stats[STAT_VIEWHEIGHT] = DEFAULT_VIEWHEIGHT;
2130                 cl.stats[STAT_ITEMS] = 0;
2131                 cl.stats[STAT_VIEWZOOM] = 255;
2132         }
2133         cl.idealpitch = 0;
2134         cl.mpunchangle[0][0] = 0;
2135         cl.mpunchangle[0][1] = 0;
2136         cl.mpunchangle[0][2] = 0;
2137         cl.mpunchvector[0][0] = 0;
2138         cl.mpunchvector[0][1] = 0;
2139         cl.mpunchvector[0][2] = 0;
2140         cl.mvelocity[0][0] = 0;
2141         cl.mvelocity[0][1] = 0;
2142         cl.mvelocity[0][2] = 0;
2143         cl.mviewzoom[0] = 1;
2144
2145         bits = (unsigned short) MSG_ReadShort(&cl_message);
2146         if (bits & SU_EXTEND1)
2147                 bits |= (MSG_ReadByte(&cl_message) << 16);
2148         if (bits & SU_EXTEND2)
2149                 bits |= (MSG_ReadByte(&cl_message) << 24);
2150
2151         if (bits & SU_VIEWHEIGHT)
2152                 cl.stats[STAT_VIEWHEIGHT] = MSG_ReadChar(&cl_message);
2153
2154         if (bits & SU_IDEALPITCH)
2155                 cl.idealpitch = MSG_ReadChar(&cl_message);
2156
2157         for (i = 0;i < 3;i++)
2158         {
2159                 if (bits & (SU_PUNCH1<<i) )
2160                 {
2161                         if (cls.protocol == PROTOCOL_QUAKE || cls.protocol == PROTOCOL_QUAKEDP || cls.protocol == PROTOCOL_NEHAHRAMOVIE || cls.protocol == PROTOCOL_NEHAHRABJP || cls.protocol == PROTOCOL_NEHAHRABJP2 || cls.protocol == PROTOCOL_NEHAHRABJP3)
2162                                 cl.mpunchangle[0][i] = MSG_ReadChar(&cl_message);
2163                         else
2164                                 cl.mpunchangle[0][i] = MSG_ReadAngle16i(&cl_message);
2165                 }
2166                 if (bits & (SU_PUNCHVEC1<<i))
2167                 {
2168                         if (cls.protocol == PROTOCOL_DARKPLACES1 || cls.protocol == PROTOCOL_DARKPLACES2 || cls.protocol == PROTOCOL_DARKPLACES3 || cls.protocol == PROTOCOL_DARKPLACES4)
2169                                 cl.mpunchvector[0][i] = MSG_ReadCoord16i(&cl_message);
2170                         else
2171                                 cl.mpunchvector[0][i] = MSG_ReadCoord32f(&cl_message);
2172                 }
2173                 if (bits & (SU_VELOCITY1<<i) )
2174                 {
2175                         if (cls.protocol == PROTOCOL_QUAKE || cls.protocol == PROTOCOL_QUAKEDP || cls.protocol == PROTOCOL_NEHAHRAMOVIE || cls.protocol == PROTOCOL_NEHAHRABJP || cls.protocol == PROTOCOL_NEHAHRABJP2 || cls.protocol == PROTOCOL_NEHAHRABJP3 || cls.protocol == PROTOCOL_DARKPLACES1 || cls.protocol == PROTOCOL_DARKPLACES2 || cls.protocol == PROTOCOL_DARKPLACES3 || cls.protocol == PROTOCOL_DARKPLACES4)
2176                                 cl.mvelocity[0][i] = MSG_ReadChar(&cl_message)*16;
2177                         else
2178                                 cl.mvelocity[0][i] = MSG_ReadCoord32f(&cl_message);
2179                 }
2180         }
2181
2182         // LordHavoc: hipnotic demos don't have this bit set but should
2183         if (bits & SU_ITEMS || cls.protocol == PROTOCOL_QUAKE || cls.protocol == PROTOCOL_QUAKEDP || cls.protocol == PROTOCOL_NEHAHRAMOVIE || cls.protocol == PROTOCOL_NEHAHRABJP || cls.protocol == PROTOCOL_NEHAHRABJP2 || cls.protocol == PROTOCOL_NEHAHRABJP3 || cls.protocol == PROTOCOL_DARKPLACES1 || cls.protocol == PROTOCOL_DARKPLACES2 || cls.protocol == PROTOCOL_DARKPLACES3 || cls.protocol == PROTOCOL_DARKPLACES4 || cls.protocol == PROTOCOL_DARKPLACES5)
2184                 cl.stats[STAT_ITEMS] = MSG_ReadLong(&cl_message);
2185
2186         cl.onground = (bits & SU_ONGROUND) != 0;
2187         cl.inwater = (bits & SU_INWATER) != 0;
2188
2189         if (cls.protocol == PROTOCOL_DARKPLACES5)
2190         {
2191                 cl.stats[STAT_WEAPONFRAME] = (bits & SU_WEAPONFRAME) ? MSG_ReadShort(&cl_message) : 0;
2192                 cl.stats[STAT_ARMOR] = (bits & SU_ARMOR) ? MSG_ReadShort(&cl_message) : 0;
2193                 cl.stats[STAT_WEAPON] = (bits & SU_WEAPON) ? MSG_ReadShort(&cl_message) : 0;
2194                 cl.stats[STAT_HEALTH] = MSG_ReadShort(&cl_message);
2195                 cl.stats[STAT_AMMO] = MSG_ReadShort(&cl_message);
2196                 cl.stats[STAT_SHELLS] = MSG_ReadShort(&cl_message);
2197                 cl.stats[STAT_NAILS] = MSG_ReadShort(&cl_message);
2198                 cl.stats[STAT_ROCKETS] = MSG_ReadShort(&cl_message);
2199                 cl.stats[STAT_CELLS] = MSG_ReadShort(&cl_message);
2200                 cl.stats[STAT_ACTIVEWEAPON] = (unsigned short) MSG_ReadShort(&cl_message);
2201         }
2202         else if (cls.protocol == PROTOCOL_QUAKE || cls.protocol == PROTOCOL_QUAKEDP || cls.protocol == PROTOCOL_NEHAHRAMOVIE || cls.protocol == PROTOCOL_NEHAHRABJP || cls.protocol == PROTOCOL_NEHAHRABJP2 || cls.protocol == PROTOCOL_NEHAHRABJP3 || cls.protocol == PROTOCOL_DARKPLACES1 || cls.protocol == PROTOCOL_DARKPLACES2 || cls.protocol == PROTOCOL_DARKPLACES3 || cls.protocol == PROTOCOL_DARKPLACES4)
2203         {
2204                 cl.stats[STAT_WEAPONFRAME] = (bits & SU_WEAPONFRAME) ? MSG_ReadByte(&cl_message) : 0;
2205                 cl.stats[STAT_ARMOR] = (bits & SU_ARMOR) ? MSG_ReadByte(&cl_message) : 0;
2206                 if (cls.protocol == PROTOCOL_NEHAHRABJP || cls.protocol == PROTOCOL_NEHAHRABJP2 || cls.protocol == PROTOCOL_NEHAHRABJP3)
2207                         cl.stats[STAT_WEAPON] = (bits & SU_WEAPON) ? (unsigned short)MSG_ReadShort(&cl_message) : 0;
2208                 else
2209                         cl.stats[STAT_WEAPON] = (bits & SU_WEAPON) ? MSG_ReadByte(&cl_message) : 0;
2210                 cl.stats[STAT_HEALTH] = MSG_ReadShort(&cl_message);
2211                 cl.stats[STAT_AMMO] = MSG_ReadByte(&cl_message);
2212                 cl.stats[STAT_SHELLS] = MSG_ReadByte(&cl_message);
2213                 cl.stats[STAT_NAILS] = MSG_ReadByte(&cl_message);
2214                 cl.stats[STAT_ROCKETS] = MSG_ReadByte(&cl_message);
2215                 cl.stats[STAT_CELLS] = MSG_ReadByte(&cl_message);
2216                 if (gamemode == GAME_HIPNOTIC || gamemode == GAME_ROGUE || gamemode == GAME_QUOTH || gamemode == GAME_NEXUIZ)
2217                         cl.stats[STAT_ACTIVEWEAPON] = (1<<MSG_ReadByte(&cl_message));
2218                 else
2219                         cl.stats[STAT_ACTIVEWEAPON] = MSG_ReadByte(&cl_message);
2220         }
2221
2222         if (bits & SU_VIEWZOOM)
2223         {
2224                 if (cls.protocol == PROTOCOL_DARKPLACES2 || cls.protocol == PROTOCOL_DARKPLACES3 || cls.protocol == PROTOCOL_DARKPLACES4)
2225                         cl.stats[STAT_VIEWZOOM] = MSG_ReadByte(&cl_message);
2226                 else
2227                         cl.stats[STAT_VIEWZOOM] = (unsigned short) MSG_ReadShort(&cl_message);
2228         }
2229
2230         // viewzoom interpolation
2231         cl.mviewzoom[0] = (float) max(cl.stats[STAT_VIEWZOOM], 2) * (1.0f / 255.0f);
2232 }
2233
2234 /*
2235 =====================
2236 CL_ParseStatic
2237 =====================
2238 */
2239 static void CL_ParseStatic (int large)
2240 {
2241         entity_t *ent;
2242
2243         if (cl.num_static_entities >= cl.max_static_entities)
2244                 Host_Error ("Too many static entities");
2245         ent = &cl.static_entities[cl.num_static_entities++];
2246         CL_ParseBaseline (ent, large);
2247
2248         if (ent->state_baseline.modelindex == 0)
2249         {
2250                 Con_DPrintf("svc_parsestatic: static entity without model at %f %f %f\n", ent->state_baseline.origin[0], ent->state_baseline.origin[1], ent->state_baseline.origin[2]);
2251                 cl.num_static_entities--;
2252                 // This is definitely a cheesy way to conserve resources...
2253                 return;
2254         }
2255
2256 // copy it to the current state
2257         ent->render.model = CL_GetModelByIndex(ent->state_baseline.modelindex);
2258         ent->render.framegroupblend[0].frame = ent->state_baseline.frame;
2259         ent->render.framegroupblend[0].lerp = 1;
2260         // make torchs play out of sync
2261         ent->render.framegroupblend[0].start = lhrandom(-10, -1);
2262         ent->render.skinnum = ent->state_baseline.skin;
2263         ent->render.effects = ent->state_baseline.effects;
2264         ent->render.alpha = 1;
2265
2266         //VectorCopy (ent->state_baseline.origin, ent->render.origin);
2267         //VectorCopy (ent->state_baseline.angles, ent->render.angles);
2268
2269         Matrix4x4_CreateFromQuakeEntity(&ent->render.matrix, ent->state_baseline.origin[0], ent->state_baseline.origin[1], ent->state_baseline.origin[2], ent->state_baseline.angles[0], ent->state_baseline.angles[1], ent->state_baseline.angles[2], 1);
2270         ent->render.allowdecals = true;
2271         CL_UpdateRenderEntity(&ent->render);
2272 }
2273
2274 /*
2275 ===================
2276 CL_ParseStaticSound
2277 ===================
2278 */
2279 static void CL_ParseStaticSound (int large)
2280 {
2281         vec3_t          org;
2282         int                     sound_num, vol, atten;
2283
2284         MSG_ReadVector(&cl_message, org, cls.protocol);
2285         if (large || cls.protocol == PROTOCOL_NEHAHRABJP2)
2286                 sound_num = (unsigned short) MSG_ReadShort(&cl_message);
2287         else
2288                 sound_num = MSG_ReadByte(&cl_message);
2289         vol = MSG_ReadByte(&cl_message);
2290         atten = MSG_ReadByte(&cl_message);
2291
2292         S_StaticSound (cl.sound_precache[sound_num], org, vol/255.0f, atten);
2293 }
2294
2295 static void CL_ParseEffect (void)
2296 {
2297         vec3_t          org;
2298         int                     modelindex, startframe, framecount, framerate;
2299
2300         MSG_ReadVector(&cl_message, org, cls.protocol);
2301         modelindex = MSG_ReadByte(&cl_message);
2302         startframe = MSG_ReadByte(&cl_message);
2303         framecount = MSG_ReadByte(&cl_message);
2304         framerate = MSG_ReadByte(&cl_message);
2305
2306         CL_Effect(org, modelindex, startframe, framecount, framerate);
2307 }
2308
2309 static void CL_ParseEffect2 (void)
2310 {
2311         vec3_t          org;
2312         int                     modelindex, startframe, framecount, framerate;
2313
2314         MSG_ReadVector(&cl_message, org, cls.protocol);
2315         modelindex = (unsigned short) MSG_ReadShort(&cl_message);
2316         startframe = (unsigned short) MSG_ReadShort(&cl_message);
2317         framecount = MSG_ReadByte(&cl_message);
2318         framerate = MSG_ReadByte(&cl_message);
2319
2320         CL_Effect(org, modelindex, startframe, framecount, framerate);
2321 }
2322
2323 void CL_NewBeam (int ent, vec3_t start, vec3_t end, dp_model_t *m, int lightning)
2324 {
2325         int i;
2326         beam_t *b = NULL;
2327
2328         if (ent >= MAX_EDICTS)
2329         {
2330                 Con_Printf("CL_NewBeam: invalid entity number %i\n", ent);
2331                 ent = 0;
2332         }
2333
2334         if (ent >= cl.max_entities)
2335                 CL_ExpandEntities(ent);
2336
2337         // override any beam with the same entity
2338         i = cl.max_beams;
2339         if (ent)
2340                 for (i = 0, b = cl.beams;i < cl.max_beams;i++, b++)
2341                         if (b->entity == ent)
2342                                 break;
2343         // if the entity was not found then just replace an unused beam
2344         if (i == cl.max_beams)
2345                 for (i = 0, b = cl.beams;i < cl.max_beams;i++, b++)
2346                         if (!b->model)
2347                                 break;
2348         if (i < cl.max_beams)
2349         {
2350                 cl.num_beams = max(cl.num_beams, i + 1);
2351                 b->entity = ent;
2352                 b->lightning = lightning;
2353                 b->model = m;
2354                 b->endtime = cl.mtime[0] + 0.2;
2355                 VectorCopy (start, b->start);
2356                 VectorCopy (end, b->end);
2357         }
2358         else
2359                 Con_Print("beam list overflow!\n");
2360 }
2361
2362 static void CL_ParseBeam (dp_model_t *m, int lightning)
2363 {
2364         int ent;
2365         vec3_t start, end;
2366
2367         ent = (unsigned short) MSG_ReadShort(&cl_message);
2368         MSG_ReadVector(&cl_message, start, cls.protocol);
2369         MSG_ReadVector(&cl_message, end, cls.protocol);
2370
2371         if (ent >= MAX_EDICTS)
2372         {
2373                 Con_Printf("CL_ParseBeam: invalid entity number %i\n", ent);
2374                 ent = 0;
2375         }
2376
2377         CL_NewBeam(ent, start, end, m, lightning);
2378 }
2379
2380 static void CL_ParseTempEntity(void)
2381 {
2382         int type;
2383         vec3_t pos, pos2;
2384         vec3_t vel1, vel2;
2385         vec3_t dir;
2386         vec3_t color;
2387         int rnd;
2388         int colorStart, colorLength, count;
2389         float velspeed, radius;
2390         unsigned char *tempcolor;
2391         matrix4x4_t tempmatrix;
2392
2393         if (cls.protocol == PROTOCOL_QUAKEWORLD)
2394         {
2395                 type = MSG_ReadByte(&cl_message);
2396                 switch (type)
2397                 {
2398                 case QW_TE_WIZSPIKE:
2399                         // spike hitting wall
2400                         MSG_ReadVector(&cl_message, pos, cls.protocol);
2401                         CL_FindNonSolidLocation(pos, pos, 4);
2402                         CL_ParticleEffect(EFFECT_TE_WIZSPIKE, 1, pos, pos, vec3_origin, vec3_origin, NULL, 0);
2403                         S_StartSound(-1, 0, cl.sfx_wizhit, pos, 1, 1);
2404                         break;
2405
2406                 case QW_TE_KNIGHTSPIKE:
2407                         // spike hitting wall
2408                         MSG_ReadVector(&cl_message, pos, cls.protocol);
2409                         CL_FindNonSolidLocation(pos, pos, 4);
2410                         CL_ParticleEffect(EFFECT_TE_KNIGHTSPIKE, 1, pos, pos, vec3_origin, vec3_origin, NULL, 0);
2411                         S_StartSound(-1, 0, cl.sfx_knighthit, pos, 1, 1);
2412                         break;
2413
2414                 case QW_TE_SPIKE:
2415                         // spike hitting wall
2416                         MSG_ReadVector(&cl_message, pos, cls.protocol);
2417                         CL_FindNonSolidLocation(pos, pos, 4);
2418                         CL_ParticleEffect(EFFECT_TE_SPIKE, 1, pos, pos, vec3_origin, vec3_origin, NULL, 0);
2419                         if (rand() % 5)
2420                                 S_StartSound(-1, 0, cl.sfx_tink1, pos, 1, 1);
2421                         else
2422                         {
2423                                 rnd = rand() & 3;
2424                                 if (rnd == 1)
2425                                         S_StartSound(-1, 0, cl.sfx_ric1, pos, 1, 1);
2426                                 else if (rnd == 2)
2427                                         S_StartSound(-1, 0, cl.sfx_ric2, pos, 1, 1);
2428                                 else
2429                                         S_StartSound(-1, 0, cl.sfx_ric3, pos, 1, 1);
2430                         }
2431                         break;
2432                 case QW_TE_SUPERSPIKE:
2433                         // super spike hitting wall
2434                         MSG_ReadVector(&cl_message, pos, cls.protocol);
2435                         CL_FindNonSolidLocation(pos, pos, 4);
2436                         CL_ParticleEffect(EFFECT_TE_SUPERSPIKE, 1, pos, pos, vec3_origin, vec3_origin, NULL, 0);
2437                         if (rand() % 5)
2438                                 S_StartSound(-1, 0, cl.sfx_tink1, pos, 1, 1);
2439                         else
2440                         {
2441                                 rnd = rand() & 3;
2442                                 if (rnd == 1)
2443                                         S_StartSound(-1, 0, cl.sfx_ric1, pos, 1, 1);
2444                                 else if (rnd == 2)
2445                                         S_StartSound(-1, 0, cl.sfx_ric2, pos, 1, 1);
2446                                 else
2447                                         S_StartSound(-1, 0, cl.sfx_ric3, pos, 1, 1);
2448                         }
2449                         break;
2450
2451                 case QW_TE_EXPLOSION:
2452                         // rocket explosion
2453                         MSG_ReadVector(&cl_message, pos, cls.protocol);
2454                         CL_FindNonSolidLocation(pos, pos, 10);
2455                         CL_ParticleEffect(EFFECT_TE_EXPLOSION, 1, pos, pos, vec3_origin, vec3_origin, NULL, 0);
2456                         S_StartSound(-1, 0, cl.sfx_r_exp3, pos, 1, 1);
2457                         CL_Effect(pos, cl.qw_modelindex_s_explod, 0, 6, 10);
2458                         break;
2459
2460                 case QW_TE_TAREXPLOSION:
2461                         // tarbaby explosion
2462                         MSG_ReadVector(&cl_message, pos, cls.protocol);
2463                         CL_FindNonSolidLocation(pos, pos, 10);
2464                         CL_ParticleEffect(EFFECT_TE_TAREXPLOSION, 1, pos, pos, vec3_origin, vec3_origin, NULL, 0);
2465                         S_StartSound(-1, 0, cl.sfx_r_exp3, pos, 1, 1);
2466                         break;
2467
2468                 case QW_TE_LIGHTNING1:
2469                         // lightning bolts
2470                         CL_ParseBeam(cl.model_bolt, true);
2471                         break;
2472
2473                 case QW_TE_LIGHTNING2:
2474                         // lightning bolts
2475                         CL_ParseBeam(cl.model_bolt2, true);
2476                         break;
2477
2478                 case QW_TE_LIGHTNING3:
2479                         // lightning bolts
2480                         CL_ParseBeam(cl.model_bolt3, false);
2481                         break;
2482
2483                 case QW_TE_LAVASPLASH:
2484                         MSG_ReadVector(&cl_message, pos, cls.protocol);
2485                         CL_ParticleEffect(EFFECT_TE_LAVASPLASH, 1, pos, pos, vec3_origin, vec3_origin, NULL, 0);
2486                         break;
2487
2488                 case QW_TE_TELEPORT:
2489                         MSG_ReadVector(&cl_message, pos, cls.protocol);
2490                         CL_ParticleEffect(EFFECT_TE_TELEPORT, 1, pos, pos, vec3_origin, vec3_origin, NULL, 0);
2491                         break;
2492
2493                 case QW_TE_GUNSHOT:
2494                         // bullet hitting wall
2495                         radius = MSG_ReadByte(&cl_message);
2496                         MSG_ReadVector(&cl_message, pos, cls.protocol);
2497                         CL_FindNonSolidLocation(pos, pos, 4);
2498                         VectorSet(pos2, pos[0] + radius, pos[1] + radius, pos[2] + radius);
2499                         VectorSet(pos, pos[0] - radius, pos[1] - radius, pos[2] - radius);
2500                         CL_ParticleEffect(EFFECT_TE_GUNSHOT, radius, pos, pos2, vec3_origin, vec3_origin, NULL, 0);
2501                         if(cl_sound_ric_gunshot.integer & RIC_GUNSHOT)
2502                         {
2503                                 if (rand() % 5)
2504                                         S_StartSound(-1, 0, cl.sfx_tink1, pos, 1, 1);
2505                                 else
2506                                 {
2507                                         rnd = rand() & 3;
2508                                         if (rnd == 1)
2509                                                 S_StartSound(-1, 0, cl.sfx_ric1, pos, 1, 1);
2510                                         else if (rnd == 2)
2511                                                 S_StartSound(-1, 0, cl.sfx_ric2, pos, 1, 1);
2512                                         else
2513                                                 S_StartSound(-1, 0, cl.sfx_ric3, pos, 1, 1);
2514                                 }
2515                         }
2516                         break;
2517
2518                 case QW_TE_BLOOD:
2519                         count = MSG_ReadByte(&cl_message);
2520                         MSG_ReadVector(&cl_message, pos, cls.protocol);
2521                         CL_FindNonSolidLocation(pos, pos, 4);
2522                         CL_ParticleEffect(EFFECT_TE_BLOOD, count, pos, pos, vec3_origin, vec3_origin, NULL, 0);
2523                         break;
2524
2525                 case QW_TE_LIGHTNINGBLOOD:
2526                         MSG_ReadVector(&cl_message, pos, cls.protocol);
2527                         CL_FindNonSolidLocation(pos, pos, 4);
2528                         CL_ParticleEffect(EFFECT_TE_BLOOD, 2.5, pos, pos, vec3_origin, vec3_origin, NULL, 0);
2529                         break;
2530
2531                 default:
2532                         Host_Error("CL_ParseTempEntity: bad type %d (hex %02X)", type, type);
2533                 }
2534         }
2535         else
2536         {
2537                 type = MSG_ReadByte(&cl_message);
2538                 switch (type)
2539                 {
2540                 case TE_WIZSPIKE:
2541                         // spike hitting wall
2542                         MSG_ReadVector(&cl_message, pos, cls.protocol);
2543                         CL_FindNonSolidLocation(pos, pos, 4);
2544                         CL_ParticleEffect(EFFECT_TE_WIZSPIKE, 1, pos, pos, vec3_origin, vec3_origin, NULL, 0);
2545                         S_StartSound(-1, 0, cl.sfx_wizhit, pos, 1, 1);
2546                         break;
2547
2548                 case TE_KNIGHTSPIKE:
2549                         // spike hitting wall
2550                         MSG_ReadVector(&cl_message, pos, cls.protocol);
2551                         CL_FindNonSolidLocation(pos, pos, 4);
2552                         CL_ParticleEffect(EFFECT_TE_KNIGHTSPIKE, 1, pos, pos, vec3_origin, vec3_origin, NULL, 0);
2553                         S_StartSound(-1, 0, cl.sfx_knighthit, pos, 1, 1);
2554                         break;
2555
2556                 case TE_SPIKE:
2557                         // spike hitting wall
2558                         MSG_ReadVector(&cl_message, pos, cls.protocol);
2559                         CL_FindNonSolidLocation(pos, pos, 4);
2560                         CL_ParticleEffect(EFFECT_TE_SPIKE, 1, pos, pos, vec3_origin, vec3_origin, NULL, 0);
2561                         if (rand() % 5)
2562                                 S_StartSound(-1, 0, cl.sfx_tink1, pos, 1, 1);
2563                         else
2564                         {
2565                                 rnd = rand() & 3;
2566                                 if (rnd == 1)
2567                                         S_StartSound(-1, 0, cl.sfx_ric1, pos, 1, 1);
2568                                 else if (rnd == 2)
2569                                         S_StartSound(-1, 0, cl.sfx_ric2, pos, 1, 1);
2570                                 else
2571                                         S_StartSound(-1, 0, cl.sfx_ric3, pos, 1, 1);
2572                         }
2573                         break;
2574                 case TE_SPIKEQUAD:
2575                         // quad spike hitting wall
2576                         MSG_ReadVector(&cl_message, pos, cls.protocol);
2577                         CL_FindNonSolidLocation(pos, pos, 4);
2578                         CL_ParticleEffect(EFFECT_TE_SPIKEQUAD, 1, pos, pos, vec3_origin, vec3_origin, NULL, 0);
2579                         if (rand() % 5)
2580                                 S_StartSound(-1, 0, cl.sfx_tink1, pos, 1, 1);
2581                         else
2582                         {
2583                                 rnd = rand() & 3;
2584                                 if (rnd == 1)
2585                                         S_StartSound(-1, 0, cl.sfx_ric1, pos, 1, 1);
2586                                 else if (rnd == 2)
2587                                         S_StartSound(-1, 0, cl.sfx_ric2, pos, 1, 1);
2588                                 else
2589                                         S_StartSound(-1, 0, cl.sfx_ric3, pos, 1, 1);
2590                         }
2591                         break;
2592                 case TE_SUPERSPIKE:
2593                         // super spike hitting wall
2594                         MSG_ReadVector(&cl_message, pos, cls.protocol);
2595                         CL_FindNonSolidLocation(pos, pos, 4);
2596                         CL_ParticleEffect(EFFECT_TE_SUPERSPIKE, 1, pos, pos, vec3_origin, vec3_origin, NULL, 0);
2597                         if (rand() % 5)
2598                                 S_StartSound(-1, 0, cl.sfx_tink1, pos, 1, 1);
2599                         else
2600                         {
2601                                 rnd = rand() & 3;
2602                                 if (rnd == 1)
2603                                         S_StartSound(-1, 0, cl.sfx_ric1, pos, 1, 1);
2604                                 else if (rnd == 2)
2605                                         S_StartSound(-1, 0, cl.sfx_ric2, pos, 1, 1);
2606                                 else
2607                                         S_StartSound(-1, 0, cl.sfx_ric3, pos, 1, 1);
2608                         }
2609                         break;
2610                 case TE_SUPERSPIKEQUAD:
2611                         // quad super spike hitting wall
2612                         MSG_ReadVector(&cl_message, pos, cls.protocol);
2613                         CL_FindNonSolidLocation(pos, pos, 4);
2614                         CL_ParticleEffect(EFFECT_TE_SUPERSPIKEQUAD, 1, pos, pos, vec3_origin, vec3_origin, NULL, 0);
2615                         if (rand() % 5)
2616                                 S_StartSound(-1, 0, cl.sfx_tink1, pos, 1, 1);
2617                         else
2618                         {
2619                                 rnd = rand() & 3;
2620                                 if (rnd == 1)
2621                                         S_StartSound(-1, 0, cl.sfx_ric1, pos, 1, 1);
2622                                 else if (rnd == 2)
2623                                         S_StartSound(-1, 0, cl.sfx_ric2, pos, 1, 1);
2624                                 else
2625                                         S_StartSound(-1, 0, cl.sfx_ric3, pos, 1, 1);
2626                         }
2627                         break;
2628                         // LordHavoc: added for improved blood splatters
2629                 case TE_BLOOD:
2630                         // blood puff
2631                         MSG_ReadVector(&cl_message, pos, cls.protocol);
2632                         CL_FindNonSolidLocation(pos, pos, 4);
2633                         dir[0] = MSG_ReadChar(&cl_message);
2634                         dir[1] = MSG_ReadChar(&cl_message);
2635                         dir[2] = MSG_ReadChar(&cl_message);
2636                         count = MSG_ReadByte(&cl_message);
2637                         CL_ParticleEffect(EFFECT_TE_BLOOD, count, pos, pos, dir, dir, NULL, 0);
2638                         break;
2639                 case TE_SPARK:
2640                         // spark shower
2641                         MSG_ReadVector(&cl_message, pos, cls.protocol);
2642                         CL_FindNonSolidLocation(pos, pos, 4);
2643                         dir[0] = MSG_ReadChar(&cl_message);
2644                         dir[1] = MSG_ReadChar(&cl_message);
2645                         dir[2] = MSG_ReadChar(&cl_message);
2646                         count = MSG_ReadByte(&cl_message);
2647                         CL_ParticleEffect(EFFECT_TE_SPARK, count, pos, pos, dir, dir, NULL, 0);
2648                         break;
2649                 case TE_PLASMABURN:
2650                         MSG_ReadVector(&cl_message, pos, cls.protocol);
2651                         CL_FindNonSolidLocation(pos, pos, 4);
2652                         CL_ParticleEffect(EFFECT_TE_PLASMABURN, 1, pos, pos, vec3_origin, vec3_origin, NULL, 0);
2653                         break;
2654                         // LordHavoc: added for improved gore
2655                 case TE_BLOODSHOWER:
2656                         // vaporized body
2657                         MSG_ReadVector(&cl_message, pos, cls.protocol); // mins
2658                         MSG_ReadVector(&cl_message, pos2, cls.protocol); // maxs
2659                         velspeed = MSG_ReadCoord(&cl_message, cls.protocol); // speed
2660                         count = (unsigned short) MSG_ReadShort(&cl_message); // number of particles
2661                         vel1[0] = -velspeed;
2662                         vel1[1] = -velspeed;
2663                         vel1[2] = -velspeed;
2664                         vel2[0] = velspeed;
2665                         vel2[1] = velspeed;
2666                         vel2[2] = velspeed;
2667                         CL_ParticleEffect(EFFECT_TE_BLOOD, count, pos, pos2, vel1, vel2, NULL, 0);
2668                         break;
2669
2670                 case TE_PARTICLECUBE:
2671                         // general purpose particle effect
2672                         MSG_ReadVector(&cl_message, pos, cls.protocol); // mins
2673                         MSG_ReadVector(&cl_message, pos2, cls.protocol); // maxs
2674                         MSG_ReadVector(&cl_message, dir, cls.protocol); // dir
2675                         count = (unsigned short) MSG_ReadShort(&cl_message); // number of particles
2676                         colorStart = MSG_ReadByte(&cl_message); // color
2677                         colorLength = MSG_ReadByte(&cl_message); // gravity (1 or 0)
2678                         velspeed = MSG_ReadCoord(&cl_message, cls.protocol); // randomvel
2679                         CL_ParticleCube(pos, pos2, dir, count, colorStart, colorLength != 0, velspeed);
2680                         break;
2681
2682                 case TE_PARTICLERAIN:
2683                         // general purpose particle effect
2684                         MSG_ReadVector(&cl_message, pos, cls.protocol); // mins
2685                         MSG_ReadVector(&cl_message, pos2, cls.protocol); // maxs
2686                         MSG_ReadVector(&cl_message, dir, cls.protocol); // dir
2687                         count = (unsigned short) MSG_ReadShort(&cl_message); // number of particles
2688                         colorStart = MSG_ReadByte(&cl_message); // color
2689                         CL_ParticleRain(pos, pos2, dir, count, colorStart, 0);
2690                         break;
2691
2692                 case TE_PARTICLESNOW:
2693                         // general purpose particle effect
2694                         MSG_ReadVector(&cl_message, pos, cls.protocol); // mins
2695                         MSG_ReadVector(&cl_message, pos2, cls.protocol); // maxs
2696                         MSG_ReadVector(&cl_message, dir, cls.protocol); // dir
2697                         count = (unsigned short) MSG_ReadShort(&cl_message); // number of particles
2698                         colorStart = MSG_ReadByte(&cl_message); // color
2699                         CL_ParticleRain(pos, pos2, dir, count, colorStart, 1);
2700                         break;
2701
2702                 case TE_GUNSHOT:
2703                         // bullet hitting wall
2704                         MSG_ReadVector(&cl_message, pos, cls.protocol);
2705                         CL_FindNonSolidLocation(pos, pos, 4);
2706                         CL_ParticleEffect(EFFECT_TE_GUNSHOT, 1, pos, pos, vec3_origin, vec3_origin, NULL, 0);
2707                         if(cl_sound_ric_gunshot.integer & RIC_GUNSHOT)
2708                         {
2709                                 if (rand() % 5)
2710                                         S_StartSound(-1, 0, cl.sfx_tink1, pos, 1, 1);
2711                                 else
2712                                 {
2713                                         rnd = rand() & 3;
2714                                         if (rnd == 1)
2715                                                 S_StartSound(-1, 0, cl.sfx_ric1, pos, 1, 1);
2716                                         else if (rnd == 2)
2717                                                 S_StartSound(-1, 0, cl.sfx_ric2, pos, 1, 1);
2718                                         else
2719                                                 S_StartSound(-1, 0, cl.sfx_ric3, pos, 1, 1);
2720                                 }
2721                         }
2722                         break;
2723
2724                 case TE_GUNSHOTQUAD:
2725                         // quad bullet hitting wall
2726                         MSG_ReadVector(&cl_message, pos, cls.protocol);
2727                         CL_FindNonSolidLocation(pos, pos, 4);
2728                         CL_ParticleEffect(EFFECT_TE_GUNSHOTQUAD, 1, pos, pos, vec3_origin, vec3_origin, NULL, 0);
2729                         if(cl_sound_ric_gunshot.integer & RIC_GUNSHOTQUAD)
2730                         {
2731                                 if (rand() % 5)
2732                                         S_StartSound(-1, 0, cl.sfx_tink1, pos, 1, 1);
2733                                 else
2734                                 {
2735                                         rnd = rand() & 3;
2736                                         if (rnd == 1)
2737                                                 S_StartSound(-1, 0, cl.sfx_ric1, pos, 1, 1);
2738                                         else if (rnd == 2)
2739                                                 S_StartSound(-1, 0, cl.sfx_ric2, pos, 1, 1);
2740                                         else
2741                                                 S_StartSound(-1, 0, cl.sfx_ric3, pos, 1, 1);
2742                                 }
2743                         }
2744                         break;
2745
2746                 case TE_EXPLOSION:
2747                         // rocket explosion
2748                         MSG_ReadVector(&cl_message, pos, cls.protocol);
2749                         CL_FindNonSolidLocation(pos, pos, 10);
2750                         CL_ParticleEffect(EFFECT_TE_EXPLOSION, 1, pos, pos, vec3_origin, vec3_origin, NULL, 0);
2751                         S_StartSound(-1, 0, cl.sfx_r_exp3, pos, 1, 1);
2752                         break;
2753
2754                 case TE_EXPLOSIONQUAD:
2755                         // quad rocket explosion
2756                         MSG_ReadVector(&cl_message, pos, cls.protocol);
2757                         CL_FindNonSolidLocation(pos, pos, 10);
2758                         CL_ParticleEffect(EFFECT_TE_EXPLOSIONQUAD, 1, pos, pos, vec3_origin, vec3_origin, NULL, 0);
2759                         S_StartSound(-1, 0, cl.sfx_r_exp3, pos, 1, 1);
2760                         break;
2761
2762                 case TE_EXPLOSION3:
2763                         // Nehahra movie colored lighting explosion
2764                         MSG_ReadVector(&cl_message, pos, cls.protocol);
2765                         CL_FindNonSolidLocation(pos, pos, 10);
2766                         color[0] = MSG_ReadCoord(&cl_message, cls.protocol) * (2.0f / 1.0f);
2767                         color[1] = MSG_ReadCoord(&cl_message, cls.protocol) * (2.0f / 1.0f);
2768                         color[2] = MSG_ReadCoord(&cl_message, cls.protocol) * (2.0f / 1.0f);
2769                         CL_ParticleExplosion(pos);
2770                         Matrix4x4_CreateTranslate(&tempmatrix, pos[0], pos[1], pos[2]);
2771                         CL_AllocLightFlash(NULL, &tempmatrix, 350, color[0], color[1], color[2], 700, 0.5, 0, -1, true, 1, 0.25, 0.25, 1, 1, LIGHTFLAG_NORMALMODE | LIGHTFLAG_REALTIMEMODE);
2772                         S_StartSound(-1, 0, cl.sfx_r_exp3, pos, 1, 1);
2773                         break;
2774
2775                 case TE_EXPLOSIONRGB:
2776                         // colored lighting explosion
2777                         MSG_ReadVector(&cl_message, pos, cls.protocol);
2778                         CL_FindNonSolidLocation(pos, pos, 10);
2779                         CL_ParticleExplosion(pos);
2780                         color[0] = MSG_ReadByte(&cl_message) * (2.0f / 255.0f);
2781                         color[1] = MSG_ReadByte(&cl_message) * (2.0f / 255.0f);
2782                         color[2] = MSG_ReadByte(&cl_message) * (2.0f / 255.0f);
2783                         Matrix4x4_CreateTranslate(&tempmatrix, pos[0], pos[1], pos[2]);
2784                         CL_AllocLightFlash(NULL, &tempmatrix, 350, color[0], color[1], color[2], 700, 0.5, 0, -1, true, 1, 0.25, 0.25, 1, 1, LIGHTFLAG_NORMALMODE | LIGHTFLAG_REALTIMEMODE);
2785                         S_StartSound(-1, 0, cl.sfx_r_exp3, pos, 1, 1);
2786                         break;
2787
2788                 case TE_TAREXPLOSION:
2789                         // tarbaby explosion
2790                         MSG_ReadVector(&cl_message, pos, cls.protocol);
2791                         CL_FindNonSolidLocation(pos, pos, 10);
2792                         CL_ParticleEffect(EFFECT_TE_TAREXPLOSION, 1, pos, pos, vec3_origin, vec3_origin, NULL, 0);
2793                         S_StartSound(-1, 0, cl.sfx_r_exp3, pos, 1, 1);
2794                         break;
2795
2796                 case TE_SMALLFLASH:
2797                         MSG_ReadVector(&cl_message, pos, cls.protocol);
2798                         CL_FindNonSolidLocation(pos, pos, 10);
2799                         CL_ParticleEffect(EFFECT_TE_SMALLFLASH, 1, pos, pos, vec3_origin, vec3_origin, NULL, 0);
2800                         break;
2801
2802                 case TE_CUSTOMFLASH:
2803                         MSG_ReadVector(&cl_message, pos, cls.protocol);
2804                         CL_FindNonSolidLocation(pos, pos, 4);
2805                         radius = (MSG_ReadByte(&cl_message) + 1) * 8;
2806                         velspeed = (MSG_ReadByte(&cl_message) + 1) * (1.0 / 256.0);
2807                         color[0] = MSG_ReadByte(&cl_message) * (2.0f / 255.0f);
2808                         color[1] = MSG_ReadByte(&cl_message) * (2.0f / 255.0f);
2809                         color[2] = MSG_ReadByte(&cl_message) * (2.0f / 255.0f);
2810                         Matrix4x4_CreateTranslate(&tempmatrix, pos[0], pos[1], pos[2]);
2811                         CL_AllocLightFlash(NULL, &tempmatrix, radius, color[0], color[1], color[2], radius / velspeed, velspeed, 0, -1, true, 1, 0.25, 1, 1, 1, LIGHTFLAG_NORMALMODE | LIGHTFLAG_REALTIMEMODE);
2812                         break;
2813
2814                 case TE_FLAMEJET:
2815                         MSG_ReadVector(&cl_message, pos, cls.protocol);
2816                         MSG_ReadVector(&cl_message, dir, cls.protocol);
2817                         count = MSG_ReadByte(&cl_message);
2818                         CL_ParticleEffect(EFFECT_TE_FLAMEJET, count, pos, pos, dir, dir, NULL, 0);
2819                         break;
2820
2821                 case TE_LIGHTNING1:
2822                         // lightning bolts
2823                         CL_ParseBeam(cl.model_bolt, true);
2824                         break;
2825
2826                 case TE_LIGHTNING2:
2827                         // lightning bolts
2828                         CL_ParseBeam(cl.model_bolt2, true);
2829                         break;
2830
2831                 case TE_LIGHTNING3:
2832                         // lightning bolts
2833                         CL_ParseBeam(cl.model_bolt3, false);
2834                         break;
2835
2836         // PGM 01/21/97
2837                 case TE_BEAM:
2838                         // grappling hook beam
2839                         CL_ParseBeam(cl.model_beam, false);
2840                         break;
2841         // PGM 01/21/97
2842
2843         // LordHavoc: for compatibility with the Nehahra movie...
2844                 case TE_LIGHTNING4NEH:
2845                         CL_ParseBeam(Mod_ForName(MSG_ReadString(&cl_message, cl_readstring, sizeof(cl_readstring)), true, false, NULL), false);
2846                         break;
2847
2848                 case TE_LAVASPLASH:
2849                         MSG_ReadVector(&cl_message, pos, cls.protocol);
2850                         CL_ParticleEffect(EFFECT_TE_LAVASPLASH, 1, pos, pos, vec3_origin, vec3_origin, NULL, 0);
2851                         break;
2852
2853                 case TE_TELEPORT:
2854                         MSG_ReadVector(&cl_message, pos, cls.protocol);
2855                         CL_ParticleEffect(EFFECT_TE_TELEPORT, 1, pos, pos, vec3_origin, vec3_origin, NULL, 0);
2856                         break;
2857
2858                 case TE_EXPLOSION2:
2859                         // color mapped explosion
2860                         MSG_ReadVector(&cl_message, pos, cls.protocol);
2861                         CL_FindNonSolidLocation(pos, pos, 10);
2862                         colorStart = MSG_ReadByte(&cl_message);
2863                         colorLength = MSG_ReadByte(&cl_message);
2864                         CL_ParticleExplosion2(pos, colorStart, colorLength);
2865                         tempcolor = palette_rgb[(rand()%colorLength) + colorStart];
2866                         color[0] = tempcolor[0] * (2.0f / 255.0f);
2867                         color[1] = tempcolor[1] * (2.0f / 255.0f);
2868                         color[2] = tempcolor[2] * (2.0f / 255.0f);
2869                         Matrix4x4_CreateTranslate(&tempmatrix, pos[0], pos[1], pos[2]);
2870                         CL_AllocLightFlash(NULL, &tempmatrix, 350, color[0], color[1], color[2], 700, 0.5, 0, -1, true, 1, 0.25, 0.25, 1, 1, LIGHTFLAG_NORMALMODE | LIGHTFLAG_REALTIMEMODE);
2871                         S_StartSound(-1, 0, cl.sfx_r_exp3, pos, 1, 1);
2872                         break;
2873
2874                 case TE_TEI_G3:
2875                         MSG_ReadVector(&cl_message, pos, cls.protocol);
2876                         MSG_ReadVector(&cl_message, pos2, cls.protocol);
2877                         MSG_ReadVector(&cl_message, dir, cls.protocol);
2878                         CL_ParticleEffect(EFFECT_TE_TEI_G3, 1, pos, pos2, dir, dir, NULL, 0);
2879                         break;
2880
2881                 case TE_TEI_SMOKE:
2882                         MSG_ReadVector(&cl_message, pos, cls.protocol);
2883                         MSG_ReadVector(&cl_message, dir, cls.protocol);
2884                         count = MSG_ReadByte(&cl_message);
2885                         CL_FindNonSolidLocation(pos, pos, 4);
2886                         CL_ParticleEffect(EFFECT_TE_TEI_SMOKE, count, pos, pos, vec3_origin, vec3_origin, NULL, 0);
2887                         break;
2888
2889                 case TE_TEI_BIGEXPLOSION:
2890                         MSG_ReadVector(&cl_message, pos, cls.protocol);
2891                         CL_FindNonSolidLocation(pos, pos, 10);
2892                         CL_ParticleEffect(EFFECT_TE_TEI_BIGEXPLOSION, 1, pos, pos, vec3_origin, vec3_origin, NULL, 0);
2893                         S_StartSound(-1, 0, cl.sfx_r_exp3, pos, 1, 1);
2894                         break;
2895
2896                 case TE_TEI_PLASMAHIT:
2897                         MSG_ReadVector(&cl_message, pos, cls.protocol);
2898                         MSG_ReadVector(&cl_message, dir, cls.protocol);
2899                         count = MSG_ReadByte(&cl_message);
2900                         CL_FindNonSolidLocation(pos, pos, 5);
2901                         CL_ParticleEffect(EFFECT_TE_TEI_PLASMAHIT, count, pos, pos, vec3_origin, vec3_origin, NULL, 0);
2902                         break;
2903
2904                 default:
2905                         Host_Error("CL_ParseTempEntity: bad type %d (hex %02X)", type, type);
2906                 }
2907         }
2908 }
2909
2910 static void CL_ParseTrailParticles(void)
2911 {
2912         int entityindex;
2913         int effectindex;
2914         vec3_t start, end;
2915         entityindex = (unsigned short)MSG_ReadShort(&cl_message);
2916         if (entityindex >= MAX_EDICTS)
2917                 entityindex = 0;
2918         if (entityindex >= cl.max_entities)
2919                 CL_ExpandEntities(entityindex);
2920         effectindex = (unsigned short)MSG_ReadShort(&cl_message);
2921         MSG_ReadVector(&cl_message, start, cls.protocol);
2922         MSG_ReadVector(&cl_message, end, cls.protocol);
2923         CL_ParticleEffect(effectindex, 1, start, end, vec3_origin, vec3_origin, entityindex > 0 ? cl.entities + entityindex : NULL, 0);
2924 }
2925
2926 static void CL_ParsePointParticles(void)
2927 {
2928         int effectindex, count;
2929         vec3_t origin, velocity;
2930         effectindex = (unsigned short)MSG_ReadShort(&cl_message);
2931         MSG_ReadVector(&cl_message, origin, cls.protocol);
2932         MSG_ReadVector(&cl_message, velocity, cls.protocol);
2933         count = (unsigned short)MSG_ReadShort(&cl_message);
2934         CL_ParticleEffect(effectindex, count, origin, origin, velocity, velocity, NULL, 0);
2935 }
2936
2937 static void CL_ParsePointParticles1(void)
2938 {
2939         int effectindex;
2940         vec3_t origin;
2941         effectindex = (unsigned short)MSG_ReadShort(&cl_message);
2942         MSG_ReadVector(&cl_message, origin, cls.protocol);
2943         CL_ParticleEffect(effectindex, 1, origin, origin, vec3_origin, vec3_origin, NULL, 0);
2944 }
2945
2946 typedef struct cl_iplog_item_s
2947 {
2948         char *address;
2949         char *name;
2950 }
2951 cl_iplog_item_t;
2952
2953 static qboolean cl_iplog_loaded = false;
2954 static int cl_iplog_numitems = 0;
2955 static int cl_iplog_maxitems = 0;
2956 static cl_iplog_item_t *cl_iplog_items;
2957
2958 static void CL_IPLog_Load(void);
2959 static void CL_IPLog_Add(const char *address, const char *name, qboolean checkexisting, qboolean addtofile)
2960 {
2961         int i;
2962         size_t sz_name, sz_address;
2963         if (!address || !address[0] || !name || !name[0])
2964                 return;
2965         if (!cl_iplog_loaded)
2966                 CL_IPLog_Load();
2967         if (developer_extra.integer)
2968                 Con_DPrintf("CL_IPLog_Add(\"%s\", \"%s\", %i, %i);\n", address, name, checkexisting, addtofile);
2969         // see if it already exists
2970         if (checkexisting)
2971         {
2972                 for (i = 0;i < cl_iplog_numitems;i++)
2973                 {
2974                         if (!strcmp(cl_iplog_items[i].address, address) && !strcmp(cl_iplog_items[i].name, name))
2975                         {
2976                                 if (developer_extra.integer)
2977                                         Con_DPrintf("... found existing \"%s\" \"%s\"\n", cl_iplog_items[i].address, cl_iplog_items[i].name);
2978                                 return;
2979                         }
2980                 }
2981         }
2982         // it does not already exist in the iplog, so add it
2983         if (cl_iplog_maxitems <= cl_iplog_numitems || !cl_iplog_items)
2984         {
2985                 cl_iplog_item_t *olditems = cl_iplog_items;
2986                 cl_iplog_maxitems = max(1024, cl_iplog_maxitems + 256);
2987                 cl_iplog_items = (cl_iplog_item_t *) Mem_Alloc(cls.permanentmempool, cl_iplog_maxitems * sizeof(cl_iplog_item_t));
2988                 if (olditems)
2989                 {
2990                         if (cl_iplog_numitems)
2991                                 memcpy(cl_iplog_items, olditems, cl_iplog_numitems * sizeof(cl_iplog_item_t));
2992                         Mem_Free(olditems);
2993                 }
2994         }
2995         sz_address = strlen(address) + 1;
2996         sz_name = strlen(name) + 1;
2997         cl_iplog_items[cl_iplog_numitems].address = (char *) Mem_Alloc(cls.permanentmempool, sz_address);
2998         cl_iplog_items[cl_iplog_numitems].name = (char *) Mem_Alloc(cls.permanentmempool, sz_name);
2999         strlcpy(cl_iplog_items[cl_iplog_numitems].address, address, sz_address);
3000         // TODO: maybe it would be better to strip weird characters from name when
3001         // copying it here rather than using a straight strcpy?
3002         strlcpy(cl_iplog_items[cl_iplog_numitems].name, name, sz_name);
3003         cl_iplog_numitems++;
3004         if (addtofile)
3005         {
3006                 // add it to the iplog.txt file
3007                 // TODO: this ought to open the one in the userpath version of the base
3008                 // gamedir, not the current gamedir
3009 // not necessary for mobile
3010 #ifndef DP_MOBILETOUCH
3011                 Log_Printf(cl_iplog_name.string, "%s %s\n", address, name);
3012                 if (developer_extra.integer)
3013                         Con_DPrintf("CL_IPLog_Add: appending this line to %s: %s %s\n", cl_iplog_name.string, address, name);
3014 #endif
3015         }
3016 }
3017
3018 static void CL_IPLog_Load(void)
3019 {
3020         int i, len, linenumber;
3021         char *text, *textend;
3022         unsigned char *filedata;
3023         fs_offset_t filesize;
3024         char line[MAX_INPUTLINE];
3025         char address[MAX_INPUTLINE];
3026         cl_iplog_loaded = true;
3027         // TODO: this ought to open the one in the userpath version of the base
3028         // gamedir, not the current gamedir
3029 // not necessary for mobile
3030 #ifndef DP_MOBILETOUCH
3031         filedata = FS_LoadFile(cl_iplog_name.string, tempmempool, true, &filesize);
3032 #else
3033         filedata = NULL;
3034 #endif
3035         if (!filedata)
3036                 return;
3037         text = (char *)filedata;
3038         textend = text + filesize;
3039         for (linenumber = 1;text < textend;linenumber++)
3040         {
3041                 for (len = 0;text < textend && *text != '\r' && *text != '\n';text++)
3042                         if (len < (int)sizeof(line) - 1)
3043                                 line[len++] = *text;
3044                 line[len] = 0;
3045                 if (text < textend && *text == '\r' && text[1] == '\n')
3046                         text++;
3047                 if (text < textend && *text == '\n')
3048                         text++;
3049                 if (line[0] == '/' && line[1] == '/')
3050                         continue; // skip comments if anyone happens to add them
3051                 for (i = 0;i < len && !ISWHITESPACE(line[i]);i++)
3052                         address[i] = line[i];
3053                 address[i] = 0;
3054                 // skip exactly one space character
3055                 i++;
3056                 // address contains the address with termination,
3057                 // line + i contains the name with termination
3058                 if (address[0] && line[i])
3059                         CL_IPLog_Add(address, line + i, false, false);
3060                 else
3061                         Con_Printf("%s:%i: could not parse address and name:\n%s\n", cl_iplog_name.string, linenumber, line);
3062         }
3063 }
3064
3065 static void CL_IPLog_List_f(void)
3066 {
3067         int i, j;
3068         const char *addressprefix;
3069         if (Cmd_Argc() > 2)
3070         {
3071                 Con_Printf("usage: %s 123.456.789.\n", Cmd_Argv(0));
3072                 return;
3073         }
3074         addressprefix = "";
3075         if (Cmd_Argc() >= 2)
3076                 addressprefix = Cmd_Argv(1);
3077         if (!cl_iplog_loaded)
3078                 CL_IPLog_Load();
3079         if (addressprefix && addressprefix[0])
3080                 Con_Printf("Listing iplog addresses beginning with %s\n", addressprefix);
3081         else
3082                 Con_Printf("Listing all iplog entries\n");
3083         Con_Printf("address         name\n");
3084         for (i = 0;i < cl_iplog_numitems;i++)
3085         {
3086                 if (addressprefix && addressprefix[0])
3087                 {
3088                         for (j = 0;addressprefix[j];j++)
3089                                 if (addressprefix[j] != cl_iplog_items[i].address[j])
3090                                         break;
3091                         // if this address does not begin with the addressprefix string
3092                         // simply omit it from the output
3093                         if (addressprefix[j])
3094                                 continue;
3095                 }
3096                 // if name is less than 15 characters, left justify it and pad
3097                 // if name is more than 15 characters, print all of it, not worrying
3098                 // about the fact it will misalign the columns
3099                 if (strlen(cl_iplog_items[i].address) < 15)
3100                         Con_Printf("%-15s %s\n", cl_iplog_items[i].address, cl_iplog_items[i].name);
3101                 else
3102                         Con_Printf("%5s %s\n", cl_iplog_items[i].address, cl_iplog_items[i].name);
3103         }
3104 }
3105
3106 // look for anything interesting like player IP addresses or ping reports
3107 static qboolean CL_ExaminePrintString(const char *text)
3108 {
3109         int len;
3110         const char *t;
3111         char temp[MAX_INPUTLINE];
3112         if (!strcmp(text, "Client ping times:\n"))
3113         {
3114                 cl.parsingtextmode = CL_PARSETEXTMODE_PING;
3115                 // hide ping reports in demos
3116                 if (cls.demoplayback)
3117                         cl.parsingtextexpectingpingforscores = 1;
3118                 for(cl.parsingtextplayerindex = 0; cl.parsingtextplayerindex < cl.maxclients && !cl.scores[cl.parsingtextplayerindex].name[0]; cl.parsingtextplayerindex++)
3119                         ;
3120                 if (cl.parsingtextplayerindex >= cl.maxclients) // should never happen, since the client itself should be in cl.scores
3121                 {
3122                         Con_Printf("ping reply but empty scoreboard?!?\n");
3123                         cl.parsingtextmode = CL_PARSETEXTMODE_NONE;
3124                         cl.parsingtextexpectingpingforscores = 0;
3125                 }
3126                 cl.parsingtextexpectingpingforscores = cl.parsingtextexpectingpingforscores ? 2 : 0;
3127                 return !cl.parsingtextexpectingpingforscores;
3128         }
3129         if (!strncmp(text, "host:    ", 9))
3130         {
3131                 // cl.parsingtextexpectingpingforscores = false; // really?
3132                 cl.parsingtextmode = CL_PARSETEXTMODE_STATUS;
3133                 cl.parsingtextplayerindex = 0;
3134                 return true;
3135         }
3136         if (cl.parsingtextmode == CL_PARSETEXTMODE_PING)
3137         {
3138                 // if anything goes wrong, we'll assume this is not a ping report
3139                 qboolean expected = cl.parsingtextexpectingpingforscores != 0;
3140                 cl.parsingtextexpectingpingforscores = 0;
3141                 cl.parsingtextmode = CL_PARSETEXTMODE_NONE;
3142                 t = text;
3143                 while (*t == ' ')
3144                         t++;
3145                 if ((*t >= '0' && *t <= '9') || *t == '-')
3146                 {
3147                         int ping = atoi(t);
3148                         while ((*t >= '0' && *t <= '9') || *t == '-')
3149                                 t++;
3150                         if (*t == ' ')
3151                         {
3152                                 int charindex = 0;
3153                                 t++;
3154                                 if(cl.parsingtextplayerindex < cl.maxclients)
3155                                 {
3156                                         for (charindex = 0;cl.scores[cl.parsingtextplayerindex].name[charindex] == t[charindex];charindex++)
3157                                                 ;
3158                                         // note: the matching algorithm stops at the end of the player name because some servers append text such as " READY" after the player name in the scoreboard but not in the ping report
3159                                         //if (cl.scores[cl.parsingtextplayerindex].name[charindex] == 0 && t[charindex] == '\n')
3160                                         if (t[charindex] == '\n')
3161                                         {
3162                                                 cl.scores[cl.parsingtextplayerindex].qw_ping = bound(0, ping, 9999);
3163                                                 for (cl.parsingtextplayerindex++;cl.parsingtextplayerindex < cl.maxclients && !cl.scores[cl.parsingtextplayerindex].name[0];cl.parsingtextplayerindex++)
3164                                                         ;
3165                                                 //if (cl.parsingtextplayerindex < cl.maxclients) // we could still get unconnecteds!
3166                                                 {
3167                                                         // we parsed a valid ping entry, so expect another to follow
3168                                                         cl.parsingtextmode = CL_PARSETEXTMODE_PING;
3169                                                         cl.parsingtextexpectingpingforscores = expected;
3170                                                 }
3171                                                 return !expected;
3172                                         }
3173                                 }
3174                                 if (!strncmp(t, "unconnected\n", 12))
3175                                 {
3176                                         // just ignore
3177                                         cl.parsingtextmode = CL_PARSETEXTMODE_PING;
3178                                         cl.parsingtextexpectingpingforscores = expected;
3179                                         return !expected;
3180                                 }
3181                                 else
3182                                         Con_DPrintf("player names '%s' and '%s' didn't match\n", cl.scores[cl.parsingtextplayerindex].name, t);
3183                         }
3184                 }
3185         }
3186         if (cl.parsingtextmode == CL_PARSETEXTMODE_STATUS)
3187         {
3188                 if (!strncmp(text, "players: ", 9))
3189                 {
3190                         cl.parsingtextmode = CL_PARSETEXTMODE_STATUS_PLAYERID;
3191                         cl.parsingtextplayerindex = 0;
3192                         return true;
3193                 }
3194                 else if (!strstr(text, ": "))
3195                 {
3196                         cl.parsingtextmode = CL_PARSETEXTMODE_NONE; // status report ended
3197                         return true;
3198                 }
3199         }
3200         if (cl.parsingtextmode == CL_PARSETEXTMODE_STATUS_PLAYERID)
3201         {
3202                 // if anything goes wrong, we'll assume this is not a status report
3203                 cl.parsingtextmode = CL_PARSETEXTMODE_NONE;
3204                 if (text[0] == '#' && text[1] >= '0' && text[1] <= '9')
3205                 {
3206                         t = text + 1;
3207                         cl.parsingtextplayerindex = atoi(t) - 1;
3208                         while (*t >= '0' && *t <= '9')
3209                                 t++;
3210                         if (*t == ' ')
3211                         {
3212                                 cl.parsingtextmode = CL_PARSETEXTMODE_STATUS_PLAYERIP;
3213                                 return true;
3214                         }
3215                         // the player name follows here, along with frags and time
3216                 }
3217         }
3218         if (cl.parsingtextmode == CL_PARSETEXTMODE_STATUS_PLAYERIP)
3219         {
3220                 // if anything goes wrong, we'll assume this is not a status report
3221                 cl.parsingtextmode = CL_PARSETEXTMODE_NONE;
3222                 if (text[0] == ' ')
3223                 {
3224                         t = text;
3225                         while (*t == ' ')
3226                                 t++;
3227                         for (len = 0;*t && *t != '\n';t++)
3228                                 if (len < (int)sizeof(temp) - 1)
3229                                         temp[len++] = *t;
3230                         temp[len] = 0;
3231                         // botclient is perfectly valid, but we don't care about bots
3232                         // also don't try to look up the name of an invalid player index
3233                         if (strcmp(temp, "botclient")
3234                          && cl.parsingtextplayerindex >= 0
3235                          && cl.parsingtextplayerindex < cl.maxclients
3236                          && cl.scores[cl.parsingtextplayerindex].name[0])
3237                         {
3238                                 // log the player name and IP address string
3239                                 // (this operates entirely on strings to avoid issues with the
3240                                 //  nature of a network address)
3241                                 CL_IPLog_Add(temp, cl.scores[cl.parsingtextplayerindex].name, true, true);
3242                         }
3243                         cl.parsingtextmode = CL_PARSETEXTMODE_STATUS_PLAYERID;
3244                         return true;
3245                 }
3246         }
3247         return true;
3248 }
3249
3250 extern cvar_t slowmo;
3251 extern cvar_t cl_lerpexcess;
3252 static void CL_NetworkTimeReceived(double newtime)
3253 {
3254         double timehigh;
3255         cl.mtime[1] = cl.mtime[0];
3256         cl.mtime[0] = newtime;
3257         if (cl_nolerp.integer || cls.timedemo || (cl.islocalgame && !sv_fixedframeratesingleplayer.integer) || cl.mtime[1] == cl.mtime[0] || cls.signon < SIGNONS)
3258                 cl.time = cl.mtime[1] = newtime;
3259         else if (cls.demoplayback)
3260         {
3261                 // when time falls behind during demo playback it means the cl.mtime[1] was altered
3262                 // due to a large time gap, so treat it as an instant change in time
3263                 // (this can also happen during heavy packet loss in the demo)
3264                 if (cl.time < newtime - 0.1)
3265                         cl.mtime[1] = cl.time = newtime;
3266         }
3267         else if (cls.protocol != PROTOCOL_QUAKEWORLD)
3268         {
3269                 cl.mtime[1] = max(cl.mtime[1], cl.mtime[0] - 0.1);
3270                 if (developer_extra.integer && vid_activewindow)
3271                 {
3272                         if (cl.time < cl.mtime[1] - (cl.mtime[0] - cl.mtime[1]))
3273                                 Con_DPrintf("--- cl.time < cl.mtime[1] (%f < %f ... %f)\n", cl.time, cl.mtime[1], cl.mtime[0]);
3274                         else if (cl.time > cl.mtime[0] + (cl.mtime[0] - cl.mtime[1]))
3275                                 Con_DPrintf("--- cl.time > cl.mtime[0] (%f > %f ... %f)\n", cl.time, cl.mtime[1], cl.mtime[0]);
3276                 }
3277                 cl.time += (cl.mtime[1] - cl.time) * bound(0, cl_nettimesyncfactor.value, 1);
3278                 timehigh = cl.mtime[1] + (cl.mtime[0] - cl.mtime[1]) * cl_nettimesyncboundtolerance.value;
3279                 if (cl_nettimesyncboundmode.integer == 1)
3280                         cl.time = bound(cl.mtime[1], cl.time, cl.mtime[0]);
3281                 else if (cl_nettimesyncboundmode.integer == 2)
3282                 {
3283                         if (cl.time < cl.mtime[1] || cl.time > timehigh)
3284                                 cl.time = cl.mtime[1];
3285                 }
3286                 else if (cl_nettimesyncboundmode.integer == 3)
3287                 {
3288                         if ((cl.time < cl.mtime[1] && cl.oldtime < cl.mtime[1]) || (cl.time > timehigh && cl.oldtime > timehigh))
3289                                 cl.time = cl.mtime[1];
3290                 }
3291                 else if (cl_nettimesyncboundmode.integer == 4)
3292                 {
3293                         if (fabs(cl.time - cl.mtime[1]) > 0.5)
3294                                 cl.time = cl.mtime[1]; // reset
3295                         else if (fabs(cl.time - cl.mtime[1]) > 0.1)
3296                                 cl.time += 0.5 * (cl.mtime[1] - cl.time); // fast
3297                         else if (cl.time > cl.mtime[1])
3298                                 cl.time -= 0.002 * cl.movevars_timescale; // fall into the past by 2ms
3299                         else
3300                                 cl.time += 0.001 * cl.movevars_timescale; // creep forward 1ms
3301                 }
3302                 else if (cl_nettimesyncboundmode.integer == 5)
3303                 {
3304                         if (fabs(cl.time - cl.mtime[1]) > 0.5)
3305                                 cl.time = cl.mtime[1]; // reset
3306                         else if (fabs(cl.time - cl.mtime[1]) > 0.1)
3307                                 cl.time += 0.5 * (cl.mtime[1] - cl.time); // fast
3308                         else
3309                                 cl.time = bound(cl.time - 0.002 * cl.movevars_timescale, cl.mtime[1], cl.time + 0.001 * cl.movevars_timescale);
3310                 }
3311                 else if (cl_nettimesyncboundmode.integer == 6)
3312                 {
3313                         cl.time = bound(cl.mtime[1], cl.time, cl.mtime[0]);
3314                         cl.time = bound(cl.time - 0.002 * cl.movevars_timescale, cl.mtime[1], cl.time + 0.001 * cl.movevars_timescale);
3315                 }
3316         }
3317         // this packet probably contains a player entity update, so we will need
3318         // to update the prediction
3319         cl.movement_replay = true;
3320         // this may get updated later in parsing by svc_clientdata
3321         cl.onground = false;
3322         // if true the cl.viewangles are interpolated from cl.mviewangles[]
3323         // during this frame
3324         // (makes spectating players much smoother and prevents mouse movement from turning)
3325         cl.fixangle[1] = cl.fixangle[0];
3326         cl.fixangle[0] = false;
3327         if (!cls.demoplayback)
3328                 VectorCopy(cl.mviewangles[0], cl.mviewangles[1]);
3329         // update the csqc's server timestamps, critical for proper sync
3330         CSQC_UpdateNetworkTimes(cl.mtime[0], cl.mtime[1]);
3331
3332         if (cl.mtime[0] > cl.mtime[1])
3333                 World_Physics_Frame(&cl.world, cl.mtime[0] - cl.mtime[1], cl.movevars_gravity);
3334
3335         // only lerp entities that also get an update in this frame, when lerp excess is used
3336         if(cl_lerpexcess.value > 0)
3337         {
3338                 int i;
3339                 for (i = 1;i < cl.num_entities;i++)
3340                 {
3341                         if (cl.entities_active[i])
3342                         {
3343                                 entity_t *ent = cl.entities + i;
3344                                 ent->persistent.lerpdeltatime = 0;
3345                         }
3346                 }
3347         }
3348 }
3349
3350 #define SHOWNET(x) if(cl_shownet.integer==2)Con_Printf("%3i:%s(%i)\n", cl_message.readcount-1, x, cmd);
3351
3352 /*
3353 =====================
3354 CL_ParseServerMessage
3355 =====================
3356 */
3357 int parsingerror = false;
3358 void CL_ParseServerMessage(void)
3359 {
3360         int                     cmd;
3361         int                     i;
3362         protocolversion_t protocol;
3363         unsigned char           cmdlog[32];
3364         const char              *cmdlogname[32], *temp;
3365         int                     cmdindex, cmdcount = 0;
3366         qboolean        qwplayerupdatereceived;
3367         qboolean        strip_pqc;
3368         char vabuf[1024];
3369
3370         // LordHavoc: moved demo message writing from before the packet parse to
3371         // after the packet parse so that CL_Stop_f can be called by cl_autodemo
3372         // code in CL_ParseServerinfo
3373         //if (cls.demorecording)
3374         //      CL_WriteDemoMessage (&cl_message);
3375
3376         cl.last_received_message = realtime;
3377
3378         CL_KeepaliveMessage(false);
3379
3380 //
3381 // if recording demos, copy the message out
3382 //
3383         if (cl_shownet.integer == 1)
3384                 Con_Printf("%f %i\n", realtime, cl_message.cursize);
3385         else if (cl_shownet.integer == 2)
3386                 Con_Print("------------------\n");
3387
3388 //
3389 // parse the message
3390 //
3391         //MSG_BeginReading ();
3392
3393         parsingerror = true;
3394
3395         if (cls.protocol == PROTOCOL_QUAKEWORLD)
3396         {
3397                 CL_NetworkTimeReceived(realtime); // qw has no clock
3398
3399                 // kill all qw nails
3400                 cl.qw_num_nails = 0;
3401
3402                 // fade weapon view kick
3403                 cl.qw_weaponkick = min(cl.qw_weaponkick + 10 * bound(0, cl.time - cl.oldtime, 0.1), 0);
3404
3405                 cls.servermovesequence = cls.netcon->qw.incoming_sequence;
3406
3407                 qwplayerupdatereceived = false;
3408
3409                 while (1)
3410                 {
3411                         if (cl_message.badread)
3412                                 Host_Error ("CL_ParseServerMessage: Bad QW server message");
3413
3414                         cmd = MSG_ReadByte(&cl_message);
3415
3416                         if (cmd == -1)
3417                         {
3418                                 SHOWNET("END OF MESSAGE");
3419                                 break;          // end of message
3420                         }
3421
3422                         cmdindex = cmdcount & 31;
3423                         cmdcount++;
3424                         cmdlog[cmdindex] = cmd;
3425
3426                         SHOWNET(qw_svc_strings[cmd]);
3427                         cmdlogname[cmdindex] = qw_svc_strings[cmd];
3428                         if (!cmdlogname[cmdindex])
3429                         {
3430                                 // LordHavoc: fix for bizarre problem in MSVC that I do not understand (if I assign the string pointer directly it ends up storing a NULL pointer)
3431                                 temp = "<unknown>";
3432                                 cmdlogname[cmdindex] = temp;
3433                         }
3434
3435                         // other commands
3436                         switch (cmd)
3437                         {
3438                         default:
3439                                 {
3440                                         char description[32*64], temp[64];