buffer csprogs downloads and load csprogs from the buffer instead of a file, if available
[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, 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 = 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         if (cl_pmodel.integer)
1557         {
1558                 MSG_WriteByte (&cls.netcon->message, clc_stringcmd);
1559                 MSG_WriteString (&cls.netcon->message, va(vabuf, sizeof(vabuf), "pmodel %i", cl_pmodel.integer));
1560         }
1561         if (*cl_playermodel.string)
1562         {
1563                 MSG_WriteByte (&cls.netcon->message, clc_stringcmd);
1564                 MSG_WriteString (&cls.netcon->message, va(vabuf, sizeof(vabuf), "playermodel %s", cl_playermodel.string));
1565         }
1566         if (*cl_playerskin.string)
1567         {
1568                 MSG_WriteByte (&cls.netcon->message, clc_stringcmd);
1569                 MSG_WriteString (&cls.netcon->message, va(vabuf, sizeof(vabuf), "playerskin %s", cl_playerskin.string));
1570         }
1571 }
1572
1573 /*
1574 =====================
1575 CL_SignonReply
1576
1577 An svc_signonnum has been received, perform a client side setup
1578 =====================
1579 */
1580 static void CL_SignonReply (void)
1581 {
1582         Con_DPrintf("CL_SignonReply: %i\n", cls.signon);
1583
1584         switch (cls.signon)
1585         {
1586         case 1:
1587                 if (cls.netcon)
1588                 {
1589                         // send player info before we begin downloads
1590                         // (so that the server can see the player name while downloading)
1591                         CL_SendPlayerInfo();
1592
1593                         // execute cl_begindownloads next frame
1594                         // (after any commands added by svc_stufftext have been executed)
1595                         // when done with downloads the "prespawn" will be sent
1596                         Cbuf_AddText("\ncl_begindownloads\n");
1597
1598                         //MSG_WriteByte (&cls.netcon->message, clc_stringcmd);
1599                         //MSG_WriteString (&cls.netcon->message, "prespawn");
1600                 }
1601                 else // playing a demo...  make sure loading occurs as soon as possible
1602                         CL_BeginDownloads(false);
1603                 break;
1604
1605         case 2:
1606                 if (cls.netcon)
1607                 {
1608                         // LordHavoc: quake sent the player info here but due to downloads
1609                         // it is sent earlier instead
1610                         // CL_SendPlayerInfo();
1611
1612                         // LordHavoc: changed to begin a loading stage and issue this when done
1613                         MSG_WriteByte (&cls.netcon->message, clc_stringcmd);
1614                         MSG_WriteString (&cls.netcon->message, "spawn");
1615                 }
1616                 break;
1617
1618         case 3:
1619                 if (cls.netcon)
1620                 {
1621                         MSG_WriteByte (&cls.netcon->message, clc_stringcmd);
1622                         MSG_WriteString (&cls.netcon->message, "begin");
1623                 }
1624                 break;
1625
1626         case 4:
1627                 // after the level has been loaded, we shouldn't need the shaders, and
1628                 // if they are needed again they will be automatically loaded...
1629                 // we also don't need the unused models or sounds from the last level
1630                 Mod_FreeQ3Shaders();
1631                 Mod_PurgeUnused();
1632                 S_PurgeUnused();
1633
1634                 Con_ClearNotify();
1635                 if (COM_CheckParm("-profilegameonly"))
1636                         Sys_AllowProfiling(true);
1637                 break;
1638         }
1639 }
1640
1641 /*
1642 ==================
1643 CL_ParseServerInfo
1644 ==================
1645 */
1646 static void CL_ParseServerInfo (void)
1647 {
1648         char *str;
1649         int i;
1650         protocolversion_t protocol;
1651         int nummodels, numsounds;
1652         char vabuf[1024];
1653
1654         // if we start loading a level and a video is still playing, stop it
1655         CL_VideoStop();
1656
1657         Con_DPrint("Serverinfo packet received.\n");
1658         Collision_Cache_Reset(true);
1659
1660         // if server is active, we already began a loading plaque
1661         if (!sv.active)
1662         {
1663                 SCR_BeginLoadingPlaque(false);
1664                 S_StopAllSounds();
1665                 // free q3 shaders so that any newly downloaded shaders will be active
1666                 Mod_FreeQ3Shaders();
1667         }
1668
1669         // check memory integrity
1670         Mem_CheckSentinelsGlobal();
1671
1672         // clear cl_serverextension cvars
1673         Cvar_SetValueQuick(&cl_serverextension_download, 0);
1674
1675 //
1676 // wipe the client_state_t struct
1677 //
1678         CL_ClearState ();
1679
1680 // parse protocol version number
1681         i = MSG_ReadLong(&cl_message);
1682         protocol = Protocol_EnumForNumber(i);
1683         if (protocol == PROTOCOL_UNKNOWN)
1684         {
1685                 Host_Error("CL_ParseServerInfo: Server is unrecognized protocol number (%i)", i);
1686                 return;
1687         }
1688         // hack for unmarked Nehahra movie demos which had a custom protocol
1689         if (protocol == PROTOCOL_QUAKEDP && cls.demoplayback && gamemode == GAME_NEHAHRA)
1690                 protocol = PROTOCOL_NEHAHRAMOVIE;
1691         cls.protocol = protocol;
1692         Con_DPrintf("Server protocol is %s\n", Protocol_NameForEnum(cls.protocol));
1693
1694         cl.num_entities = 1;
1695
1696         if (protocol == PROTOCOL_QUAKEWORLD)
1697         {
1698                 char gamedir[1][MAX_QPATH];
1699
1700                 cl.qw_servercount = MSG_ReadLong(&cl_message);
1701
1702                 str = MSG_ReadString(&cl_message, cl_readstring, sizeof(cl_readstring));
1703                 Con_Printf("server gamedir is %s\n", str);
1704                 strlcpy(gamedir[0], str, sizeof(gamedir[0]));
1705
1706                 // change gamedir if needed
1707                 if (!FS_ChangeGameDirs(1, gamedir, true, false))
1708                         Host_Error("CL_ParseServerInfo: unable to switch to server specified gamedir");
1709
1710                 cl.gametype = GAME_DEATHMATCH;
1711                 cl.maxclients = 32;
1712
1713                 // parse player number
1714                 i = MSG_ReadByte(&cl_message);
1715                 // 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)
1716                 //cl.qw_spectator = (i & 128) != 0;
1717                 cl.realplayerentity = cl.playerentity = cl.viewentity = (i & 127) + 1;
1718                 cl.scores = (scoreboard_t *)Mem_Alloc(cls.levelmempool, cl.maxclients*sizeof(*cl.scores));
1719
1720                 // get the full level name
1721                 str = MSG_ReadString(&cl_message, cl_readstring, sizeof(cl_readstring));
1722                 strlcpy (cl.worldmessage, str, sizeof(cl.worldmessage));
1723
1724                 // get the movevars that are defined in the qw protocol
1725                 cl.movevars_gravity            = MSG_ReadFloat(&cl_message);
1726                 cl.movevars_stopspeed          = MSG_ReadFloat(&cl_message);
1727                 cl.movevars_maxspeed           = MSG_ReadFloat(&cl_message);
1728                 cl.movevars_spectatormaxspeed  = MSG_ReadFloat(&cl_message);
1729                 cl.movevars_accelerate         = MSG_ReadFloat(&cl_message);
1730                 cl.movevars_airaccelerate      = MSG_ReadFloat(&cl_message);
1731                 cl.movevars_wateraccelerate    = MSG_ReadFloat(&cl_message);
1732                 cl.movevars_friction           = MSG_ReadFloat(&cl_message);
1733                 cl.movevars_waterfriction      = MSG_ReadFloat(&cl_message);
1734                 cl.movevars_entgravity         = MSG_ReadFloat(&cl_message);
1735
1736                 // other movevars not in the protocol...
1737                 cl.movevars_wallfriction = 0;
1738                 cl.movevars_timescale = 1;
1739                 cl.movevars_jumpvelocity = 270;
1740                 cl.movevars_edgefriction = 1;
1741                 cl.movevars_maxairspeed = 30;
1742                 cl.movevars_stepheight = 18;
1743                 cl.movevars_airaccel_qw = 1;
1744                 cl.movevars_airaccel_sideways_friction = 0;
1745
1746                 // seperate the printfs so the server message can have a color
1747                 Con_Printf("\n\n<===================================>\n\n\2%s\n", str);
1748
1749                 // check memory integrity
1750                 Mem_CheckSentinelsGlobal();
1751
1752                 if (cls.netcon)
1753                 {
1754                         MSG_WriteByte(&cls.netcon->message, qw_clc_stringcmd);
1755                         MSG_WriteString(&cls.netcon->message, va(vabuf, sizeof(vabuf), "soundlist %i %i", cl.qw_servercount, 0));
1756                 }
1757
1758                 cl.loadbegun = false;
1759                 cl.loadfinished = false;
1760
1761                 cls.state = ca_connected;
1762                 cls.signon = 1;
1763
1764                 // note: on QW protocol we can't set up the gameworld until after
1765                 // downloads finish...
1766                 // (we don't even know the name of the map yet)
1767                 // this also means cl_autodemo does not work on QW protocol...
1768
1769                 strlcpy(cl.worldname, "", sizeof(cl.worldname));
1770                 strlcpy(cl.worldnamenoextension, "", sizeof(cl.worldnamenoextension));
1771                 strlcpy(cl.worldbasename, "qw", sizeof(cl.worldbasename));
1772                 Cvar_SetQuick(&cl_worldname, cl.worldname);
1773                 Cvar_SetQuick(&cl_worldnamenoextension, cl.worldnamenoextension);
1774                 Cvar_SetQuick(&cl_worldbasename, cl.worldbasename);
1775
1776                 // check memory integrity
1777                 Mem_CheckSentinelsGlobal();
1778         }
1779         else
1780         {
1781         // parse maxclients
1782                 cl.maxclients = MSG_ReadByte(&cl_message);
1783                 if (cl.maxclients < 1 || cl.maxclients > MAX_SCOREBOARD)
1784                 {
1785                         Host_Error("Bad maxclients (%u) from server", cl.maxclients);
1786                         return;
1787                 }
1788                 cl.scores = (scoreboard_t *)Mem_Alloc(cls.levelmempool, cl.maxclients*sizeof(*cl.scores));
1789
1790         // parse gametype
1791                 cl.gametype = MSG_ReadByte(&cl_message);
1792                 // the original id singleplayer demos are bugged and contain
1793                 // GAME_DEATHMATCH even for singleplayer
1794                 if (cl.maxclients == 1 && cls.protocol == PROTOCOL_QUAKE)
1795                         cl.gametype = GAME_COOP;
1796
1797         // parse signon message
1798                 str = MSG_ReadString(&cl_message, cl_readstring, sizeof(cl_readstring));
1799                 strlcpy (cl.worldmessage, str, sizeof(cl.worldmessage));
1800
1801         // seperate the printfs so the server message can have a color
1802                 if (cls.protocol != PROTOCOL_NEHAHRAMOVIE) // no messages when playing the Nehahra movie
1803                         Con_Printf("\n<===================================>\n\n\2%s\n", str);
1804
1805                 // check memory integrity
1806                 Mem_CheckSentinelsGlobal();
1807
1808                 // parse model precache list
1809                 for (nummodels=1 ; ; nummodels++)
1810                 {
1811                         str = MSG_ReadString(&cl_message, cl_readstring, sizeof(cl_readstring));
1812                         if (!str[0])
1813                                 break;
1814                         if (nummodels==MAX_MODELS)
1815                                 Host_Error ("Server sent too many model precaches");
1816                         if (strlen(str) >= MAX_QPATH)
1817                                 Host_Error ("Server sent a precache name of %i characters (max %i)", (int)strlen(str), MAX_QPATH - 1);
1818                         strlcpy (cl.model_name[nummodels], str, sizeof (cl.model_name[nummodels]));
1819                 }
1820                 // parse sound precache list
1821                 for (numsounds=1 ; ; numsounds++)
1822                 {
1823                         str = MSG_ReadString(&cl_message, cl_readstring, sizeof(cl_readstring));
1824                         if (!str[0])
1825                                 break;
1826                         if (numsounds==MAX_SOUNDS)
1827                                 Host_Error("Server sent too many sound precaches");
1828                         if (strlen(str) >= MAX_QPATH)
1829                                 Host_Error("Server sent a precache name of %i characters (max %i)", (int)strlen(str), MAX_QPATH - 1);
1830                         strlcpy (cl.sound_name[numsounds], str, sizeof (cl.sound_name[numsounds]));
1831                 }
1832
1833                 // set the base name for level-specific things...  this gets updated again by CL_SetupWorldModel later
1834                 strlcpy(cl.worldname, cl.model_name[1], sizeof(cl.worldname));
1835                 FS_StripExtension(cl.worldname, cl.worldnamenoextension, sizeof(cl.worldnamenoextension));
1836                 strlcpy(cl.worldbasename, !strncmp(cl.worldnamenoextension, "maps/", 5) ? cl.worldnamenoextension + 5 : cl.worldnamenoextension, sizeof(cl.worldbasename));
1837                 Cvar_SetQuick(&cl_worldmessage, cl.worldmessage);
1838                 Cvar_SetQuick(&cl_worldname, cl.worldname);
1839                 Cvar_SetQuick(&cl_worldnamenoextension, cl.worldnamenoextension);
1840                 Cvar_SetQuick(&cl_worldbasename, cl.worldbasename);
1841
1842                 // touch all of the precached models that are still loaded so we can free
1843                 // anything that isn't needed
1844                 if (!sv.active)
1845                         Mod_ClearUsed();
1846                 for (i = 1;i < nummodels;i++)
1847                         Mod_FindName(cl.model_name[i], cl.model_name[i][0] == '*' ? cl.model_name[1] : NULL);
1848                 // precache any models used by the client (this also marks them used)
1849                 cl.model_bolt = Mod_ForName("progs/bolt.mdl", false, false, NULL);
1850                 cl.model_bolt2 = Mod_ForName("progs/bolt2.mdl", false, false, NULL);
1851                 cl.model_bolt3 = Mod_ForName("progs/bolt3.mdl", false, false, NULL);
1852                 cl.model_beam = Mod_ForName("progs/beam.mdl", false, false, NULL);
1853
1854                 // we purge the models and sounds later in CL_SignonReply
1855                 //Mod_PurgeUnused();
1856                 //S_PurgeUnused();
1857
1858                 // clear sound usage flags for purging of unused sounds
1859                 S_ClearUsed();
1860
1861                 // precache any sounds used by the client
1862                 cl.sfx_wizhit = S_PrecacheSound(cl_sound_wizardhit.string, false, true);
1863                 cl.sfx_knighthit = S_PrecacheSound(cl_sound_hknighthit.string, false, true);
1864                 cl.sfx_tink1 = S_PrecacheSound(cl_sound_tink1.string, false, true);
1865                 cl.sfx_ric1 = S_PrecacheSound(cl_sound_ric1.string, false, true);
1866                 cl.sfx_ric2 = S_PrecacheSound(cl_sound_ric2.string, false, true);
1867                 cl.sfx_ric3 = S_PrecacheSound(cl_sound_ric3.string, false, true);
1868                 cl.sfx_r_exp3 = S_PrecacheSound(cl_sound_r_exp3.string, false, true);
1869
1870                 // sounds used by the game
1871                 for (i = 1;i < MAX_SOUNDS && cl.sound_name[i][0];i++)
1872                         cl.sound_precache[i] = S_PrecacheSound(cl.sound_name[i], true, true);
1873
1874                 // now we try to load everything that is new
1875                 cl.loadmodel_current = 1;
1876                 cl.downloadmodel_current = 1;
1877                 cl.loadmodel_total = nummodels;
1878                 cl.loadsound_current = 1;
1879                 cl.downloadsound_current = 1;
1880                 cl.loadsound_total = numsounds;
1881                 cl.downloadcsqc = true;
1882                 cl.loadbegun = false;
1883                 cl.loadfinished = false;
1884                 cl.loadcsqc = true;
1885
1886                 // check memory integrity
1887                 Mem_CheckSentinelsGlobal();
1888
1889         // if cl_autodemo is set, automatically start recording a demo if one isn't being recorded already
1890                 if (cl_autodemo.integer && cls.netcon && cls.protocol != PROTOCOL_QUAKEWORLD)
1891                 {
1892                         char demofile[MAX_OSPATH];
1893
1894                         if (cls.demorecording)
1895                         {
1896                                 // finish the previous level's demo file
1897                                 CL_Stop_f();
1898                         }
1899
1900                         // start a new demo file
1901                         dpsnprintf (demofile, sizeof(demofile), "%s_%s.dem", Sys_TimeString (cl_autodemo_nameformat.string), cl.worldbasename);
1902
1903                         Con_Printf ("Auto-recording to %s.\n", demofile);
1904
1905                         // Reset bit 0 for every new demo
1906                         Cvar_SetValueQuick(&cl_autodemo_delete,
1907                                 (cl_autodemo_delete.integer & ~0x1)
1908                                 |
1909                                 ((cl_autodemo_delete.integer & 0x2) ? 0x1 : 0)
1910                         );
1911
1912                         cls.demofile = FS_OpenRealFile(demofile, "wb", false);
1913                         if (cls.demofile)
1914                         {
1915                                 cls.forcetrack = -1;
1916                                 FS_Printf (cls.demofile, "%i\n", cls.forcetrack);
1917                                 cls.demorecording = true;
1918                                 strlcpy(cls.demoname, demofile, sizeof(cls.demoname));
1919                                 cls.demo_lastcsprogssize = -1;
1920                                 cls.demo_lastcsprogscrc = -1;
1921                         }
1922                         else
1923                                 Con_Print ("ERROR: couldn't open.\n");
1924                 }
1925         }
1926         cl.islocalgame = NetConn_IsLocalGame();
1927 }
1928
1929 void CL_ValidateState(entity_state_t *s)
1930 {
1931         dp_model_t *model;
1932
1933         if (!s->active)
1934                 return;
1935
1936         if (s->modelindex >= MAX_MODELS)
1937                 Host_Error("CL_ValidateState: modelindex (%i) >= MAX_MODELS (%i)\n", s->modelindex, MAX_MODELS);
1938
1939         // these warnings are only warnings, no corrections are made to the state
1940         // because states are often copied for decoding, which otherwise would
1941         // propogate some of the corrections accidentally
1942         // (this used to happen, sometimes affecting skin and frame)
1943
1944         // colormap is client index + 1
1945         if (!(s->flags & RENDER_COLORMAPPED) && s->colormap > cl.maxclients)
1946                 Con_DPrintf("CL_ValidateState: colormap (%i) > cl.maxclients (%i)\n", s->colormap, cl.maxclients);
1947
1948         if (developer_extra.integer)
1949         {
1950                 model = CL_GetModelByIndex(s->modelindex);
1951                 if (model && model->type && s->frame >= model->numframes)
1952                         Con_DPrintf("CL_ValidateState: no such frame %i in \"%s\" (which has %i frames)\n", s->frame, model->name, model->numframes);
1953                 if (model && model->type && s->skin > 0 && s->skin >= model->numskins && !(s->lightpflags & PFLAGS_FULLDYNAMIC))
1954                         Con_DPrintf("CL_ValidateState: no such skin %i in \"%s\" (which has %i skins)\n", s->skin, model->name, model->numskins);
1955         }
1956 }
1957
1958 void CL_MoveLerpEntityStates(entity_t *ent)
1959 {
1960         float odelta[3], adelta[3];
1961         VectorSubtract(ent->state_current.origin, ent->persistent.neworigin, odelta);
1962         VectorSubtract(ent->state_current.angles, ent->persistent.newangles, adelta);
1963         if (!ent->state_previous.active || ent->state_previous.modelindex != ent->state_current.modelindex)
1964         {
1965                 // reset all persistent stuff if this is a new entity
1966                 ent->persistent.lerpdeltatime = 0;
1967                 ent->persistent.lerpstarttime = cl.mtime[1];
1968                 VectorCopy(ent->state_current.origin, ent->persistent.oldorigin);
1969                 VectorCopy(ent->state_current.angles, ent->persistent.oldangles);
1970                 VectorCopy(ent->state_current.origin, ent->persistent.neworigin);
1971                 VectorCopy(ent->state_current.angles, ent->persistent.newangles);
1972                 // reset animation interpolation as well
1973                 ent->render.framegroupblend[0].frame = ent->render.framegroupblend[1].frame = ent->state_current.frame;
1974                 ent->render.framegroupblend[0].start = ent->render.framegroupblend[1].start = cl.time;
1975                 ent->render.framegroupblend[0].lerp = 1;ent->render.framegroupblend[1].lerp = 0;
1976                 ent->render.shadertime = cl.time;
1977                 // reset various persistent stuff
1978                 ent->persistent.muzzleflash = 0;
1979                 ent->persistent.trail_allowed = false;
1980         }
1981         else if ((ent->state_previous.effects & EF_TELEPORT_BIT) != (ent->state_current.effects & EF_TELEPORT_BIT))
1982         {
1983                 // don't interpolate the move
1984                 ent->persistent.lerpdeltatime = 0;
1985                 ent->persistent.lerpstarttime = cl.mtime[1];
1986                 VectorCopy(ent->state_current.origin, ent->persistent.oldorigin);
1987                 VectorCopy(ent->state_current.angles, ent->persistent.oldangles);
1988                 VectorCopy(ent->state_current.origin, ent->persistent.neworigin);
1989                 VectorCopy(ent->state_current.angles, ent->persistent.newangles);
1990                 ent->persistent.trail_allowed = false;
1991
1992                 // if(ent->state_current.frame != ent->state_previous.frame)
1993                 // do this even if we did change the frame
1994                 // teleport bit is only used if an animation restart, or a jump, is necessary
1995                 // so it should be always harmless to do this
1996                 {
1997                         ent->render.framegroupblend[0].frame = ent->render.framegroupblend[1].frame = ent->state_current.frame;
1998                         ent->render.framegroupblend[0].start = ent->render.framegroupblend[1].start = cl.time;
1999                         ent->render.framegroupblend[0].lerp = 1;ent->render.framegroupblend[1].lerp = 0;
2000                 }
2001
2002                 // note that this case must do everything the following case does too
2003         }
2004         else if ((ent->state_previous.effects & EF_RESTARTANIM_BIT) != (ent->state_current.effects & EF_RESTARTANIM_BIT))
2005         {
2006                 ent->render.framegroupblend[1] = ent->render.framegroupblend[0];
2007                 ent->render.framegroupblend[1].lerp = 1;
2008                 ent->render.framegroupblend[0].frame = ent->state_current.frame;
2009                 ent->render.framegroupblend[0].start = cl.time;
2010                 ent->render.framegroupblend[0].lerp = 0;
2011         }
2012         else if (DotProduct(odelta, odelta) > 1000*1000
2013                 || (cl.fixangle[0] && !cl.fixangle[1])
2014                 || (ent->state_previous.tagindex != ent->state_current.tagindex)
2015                 || (ent->state_previous.tagentity != ent->state_current.tagentity))
2016         {
2017                 // don't interpolate the move
2018                 // (the fixangle[] check detects teleports, but not constant fixangles
2019                 //  such as when spectating)
2020                 ent->persistent.lerpdeltatime = 0;
2021                 ent->persistent.lerpstarttime = cl.mtime[1];
2022                 VectorCopy(ent->state_current.origin, ent->persistent.oldorigin);
2023                 VectorCopy(ent->state_current.angles, ent->persistent.oldangles);
2024                 VectorCopy(ent->state_current.origin, ent->persistent.neworigin);
2025                 VectorCopy(ent->state_current.angles, ent->persistent.newangles);
2026                 ent->persistent.trail_allowed = false;
2027         }
2028         else if (ent->state_current.flags & RENDER_STEP)
2029         {
2030                 // monster interpolation
2031                 if (DotProduct(odelta, odelta) + DotProduct(adelta, adelta) > 0.01)
2032                 {
2033                         ent->persistent.lerpdeltatime = bound(0, cl.mtime[1] - ent->persistent.lerpstarttime, 0.1);
2034                         ent->persistent.lerpstarttime = cl.mtime[1];
2035                         VectorCopy(ent->persistent.neworigin, ent->persistent.oldorigin);
2036                         VectorCopy(ent->persistent.newangles, ent->persistent.oldangles);
2037                         VectorCopy(ent->state_current.origin, ent->persistent.neworigin);
2038                         VectorCopy(ent->state_current.angles, ent->persistent.newangles);
2039                 }
2040         }
2041         else
2042         {
2043                 // not a monster
2044                 ent->persistent.lerpstarttime = ent->state_previous.time;
2045                 // no lerp if it's singleplayer
2046                 if (cl.islocalgame && !sv_fixedframeratesingleplayer.integer)
2047                         ent->persistent.lerpdeltatime = 0;
2048                 else
2049                         ent->persistent.lerpdeltatime = bound(0, ent->state_current.time - ent->state_previous.time, 0.1);
2050                 VectorCopy(ent->persistent.neworigin, ent->persistent.oldorigin);
2051                 VectorCopy(ent->persistent.newangles, ent->persistent.oldangles);
2052                 VectorCopy(ent->state_current.origin, ent->persistent.neworigin);
2053                 VectorCopy(ent->state_current.angles, ent->persistent.newangles);
2054         }
2055         // trigger muzzleflash effect if necessary
2056         if (ent->state_current.effects & EF_MUZZLEFLASH)
2057                 ent->persistent.muzzleflash = 1;
2058
2059         // restart animation bit
2060         if ((ent->state_previous.effects & EF_RESTARTANIM_BIT) != (ent->state_current.effects & EF_RESTARTANIM_BIT))
2061         {
2062                 ent->render.framegroupblend[1] = ent->render.framegroupblend[0];
2063                 ent->render.framegroupblend[1].lerp = 1;
2064                 ent->render.framegroupblend[0].frame = ent->state_current.frame;
2065                 ent->render.framegroupblend[0].start = cl.time;
2066                 ent->render.framegroupblend[0].lerp = 0;
2067         }
2068 }
2069
2070 /*
2071 ==================
2072 CL_ParseBaseline
2073 ==================
2074 */
2075 static void CL_ParseBaseline (entity_t *ent, int large)
2076 {
2077         int i;
2078
2079         ent->state_baseline = defaultstate;
2080         // FIXME: set ent->state_baseline.number?
2081         ent->state_baseline.active = true;
2082         if (large)
2083         {
2084                 ent->state_baseline.modelindex = (unsigned short) MSG_ReadShort(&cl_message);
2085                 ent->state_baseline.frame = (unsigned short) MSG_ReadShort(&cl_message);
2086         }
2087         else if (cls.protocol == PROTOCOL_NEHAHRABJP || cls.protocol == PROTOCOL_NEHAHRABJP2 || cls.protocol == PROTOCOL_NEHAHRABJP3)
2088         {
2089                 ent->state_baseline.modelindex = (unsigned short) MSG_ReadShort(&cl_message);
2090                 ent->state_baseline.frame = MSG_ReadByte(&cl_message);
2091         }
2092         else
2093         {
2094                 ent->state_baseline.modelindex = MSG_ReadByte(&cl_message);
2095                 ent->state_baseline.frame = MSG_ReadByte(&cl_message);
2096         }
2097         ent->state_baseline.colormap = MSG_ReadByte(&cl_message);
2098         ent->state_baseline.skin = MSG_ReadByte(&cl_message);
2099         for (i = 0;i < 3;i++)
2100         {
2101                 ent->state_baseline.origin[i] = MSG_ReadCoord(&cl_message, cls.protocol);
2102                 ent->state_baseline.angles[i] = MSG_ReadAngle(&cl_message, cls.protocol);
2103         }
2104         ent->state_previous = ent->state_current = ent->state_baseline;
2105 }
2106
2107
2108 /*
2109 ==================
2110 CL_ParseClientdata
2111
2112 Server information pertaining to this client only
2113 ==================
2114 */
2115 static void CL_ParseClientdata (void)
2116 {
2117         int i, bits;
2118
2119         VectorCopy (cl.mpunchangle[0], cl.mpunchangle[1]);
2120         VectorCopy (cl.mpunchvector[0], cl.mpunchvector[1]);
2121         VectorCopy (cl.mvelocity[0], cl.mvelocity[1]);
2122         cl.mviewzoom[1] = cl.mviewzoom[0];
2123
2124         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)
2125         {
2126                 cl.stats[STAT_VIEWHEIGHT] = DEFAULT_VIEWHEIGHT;
2127                 cl.stats[STAT_ITEMS] = 0;
2128                 cl.stats[STAT_VIEWZOOM] = 255;
2129         }
2130         cl.idealpitch = 0;
2131         cl.mpunchangle[0][0] = 0;
2132         cl.mpunchangle[0][1] = 0;
2133         cl.mpunchangle[0][2] = 0;
2134         cl.mpunchvector[0][0] = 0;
2135         cl.mpunchvector[0][1] = 0;
2136         cl.mpunchvector[0][2] = 0;
2137         cl.mvelocity[0][0] = 0;
2138         cl.mvelocity[0][1] = 0;
2139         cl.mvelocity[0][2] = 0;
2140         cl.mviewzoom[0] = 1;
2141
2142         bits = (unsigned short) MSG_ReadShort(&cl_message);
2143         if (bits & SU_EXTEND1)
2144                 bits |= (MSG_ReadByte(&cl_message) << 16);
2145         if (bits & SU_EXTEND2)
2146                 bits |= (MSG_ReadByte(&cl_message) << 24);
2147
2148         if (bits & SU_VIEWHEIGHT)
2149                 cl.stats[STAT_VIEWHEIGHT] = MSG_ReadChar(&cl_message);
2150
2151         if (bits & SU_IDEALPITCH)
2152                 cl.idealpitch = MSG_ReadChar(&cl_message);
2153
2154         for (i = 0;i < 3;i++)
2155         {
2156                 if (bits & (SU_PUNCH1<<i) )
2157                 {
2158                         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)
2159                                 cl.mpunchangle[0][i] = MSG_ReadChar(&cl_message);
2160                         else
2161                                 cl.mpunchangle[0][i] = MSG_ReadAngle16i(&cl_message);
2162                 }
2163                 if (bits & (SU_PUNCHVEC1<<i))
2164                 {
2165                         if (cls.protocol == PROTOCOL_DARKPLACES1 || cls.protocol == PROTOCOL_DARKPLACES2 || cls.protocol == PROTOCOL_DARKPLACES3 || cls.protocol == PROTOCOL_DARKPLACES4)
2166                                 cl.mpunchvector[0][i] = MSG_ReadCoord16i(&cl_message);
2167                         else
2168                                 cl.mpunchvector[0][i] = MSG_ReadCoord32f(&cl_message);
2169                 }
2170                 if (bits & (SU_VELOCITY1<<i) )
2171                 {
2172                         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)
2173                                 cl.mvelocity[0][i] = MSG_ReadChar(&cl_message)*16;
2174                         else
2175                                 cl.mvelocity[0][i] = MSG_ReadCoord32f(&cl_message);
2176                 }
2177         }
2178
2179         // LordHavoc: hipnotic demos don't have this bit set but should
2180         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)
2181                 cl.stats[STAT_ITEMS] = MSG_ReadLong(&cl_message);
2182
2183         cl.onground = (bits & SU_ONGROUND) != 0;
2184         cl.inwater = (bits & SU_INWATER) != 0;
2185
2186         if (cls.protocol == PROTOCOL_DARKPLACES5)
2187         {
2188                 cl.stats[STAT_WEAPONFRAME] = (bits & SU_WEAPONFRAME) ? MSG_ReadShort(&cl_message) : 0;
2189                 cl.stats[STAT_ARMOR] = (bits & SU_ARMOR) ? MSG_ReadShort(&cl_message) : 0;
2190                 cl.stats[STAT_WEAPON] = (bits & SU_WEAPON) ? MSG_ReadShort(&cl_message) : 0;
2191                 cl.stats[STAT_HEALTH] = MSG_ReadShort(&cl_message);
2192                 cl.stats[STAT_AMMO] = MSG_ReadShort(&cl_message);
2193                 cl.stats[STAT_SHELLS] = MSG_ReadShort(&cl_message);
2194                 cl.stats[STAT_NAILS] = MSG_ReadShort(&cl_message);
2195                 cl.stats[STAT_ROCKETS] = MSG_ReadShort(&cl_message);
2196                 cl.stats[STAT_CELLS] = MSG_ReadShort(&cl_message);
2197                 cl.stats[STAT_ACTIVEWEAPON] = (unsigned short) MSG_ReadShort(&cl_message);
2198         }
2199         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)
2200         {
2201                 cl.stats[STAT_WEAPONFRAME] = (bits & SU_WEAPONFRAME) ? MSG_ReadByte(&cl_message) : 0;
2202                 cl.stats[STAT_ARMOR] = (bits & SU_ARMOR) ? MSG_ReadByte(&cl_message) : 0;
2203                 if (cls.protocol == PROTOCOL_NEHAHRABJP || cls.protocol == PROTOCOL_NEHAHRABJP2 || cls.protocol == PROTOCOL_NEHAHRABJP3)
2204                         cl.stats[STAT_WEAPON] = (bits & SU_WEAPON) ? (unsigned short)MSG_ReadShort(&cl_message) : 0;
2205                 else
2206                         cl.stats[STAT_WEAPON] = (bits & SU_WEAPON) ? MSG_ReadByte(&cl_message) : 0;
2207                 cl.stats[STAT_HEALTH] = MSG_ReadShort(&cl_message);
2208                 cl.stats[STAT_AMMO] = MSG_ReadByte(&cl_message);
2209                 cl.stats[STAT_SHELLS] = MSG_ReadByte(&cl_message);
2210                 cl.stats[STAT_NAILS] = MSG_ReadByte(&cl_message);
2211                 cl.stats[STAT_ROCKETS] = MSG_ReadByte(&cl_message);
2212                 cl.stats[STAT_CELLS] = MSG_ReadByte(&cl_message);
2213                 if (gamemode == GAME_HIPNOTIC || gamemode == GAME_ROGUE || gamemode == GAME_NEXUIZ)
2214                         cl.stats[STAT_ACTIVEWEAPON] = (1<<MSG_ReadByte(&cl_message));
2215                 else
2216                         cl.stats[STAT_ACTIVEWEAPON] = MSG_ReadByte(&cl_message);
2217         }
2218
2219         if (bits & SU_VIEWZOOM)
2220         {
2221                 if (cls.protocol == PROTOCOL_DARKPLACES2 || cls.protocol == PROTOCOL_DARKPLACES3 || cls.protocol == PROTOCOL_DARKPLACES4)
2222                         cl.stats[STAT_VIEWZOOM] = MSG_ReadByte(&cl_message);
2223                 else
2224                         cl.stats[STAT_VIEWZOOM] = (unsigned short) MSG_ReadShort(&cl_message);
2225         }
2226
2227         // viewzoom interpolation
2228         cl.mviewzoom[0] = (float) max(cl.stats[STAT_VIEWZOOM], 2) * (1.0f / 255.0f);
2229 }
2230
2231 /*
2232 =====================
2233 CL_ParseStatic
2234 =====================
2235 */
2236 static void CL_ParseStatic (int large)
2237 {
2238         entity_t *ent;
2239
2240         if (cl.num_static_entities >= cl.max_static_entities)
2241                 Host_Error ("Too many static entities");
2242         ent = &cl.static_entities[cl.num_static_entities++];
2243         CL_ParseBaseline (ent, large);
2244
2245         if (ent->state_baseline.modelindex == 0)
2246         {
2247                 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]);
2248                 cl.num_static_entities--;
2249                 // This is definitely a cheesy way to conserve resources...
2250                 return;
2251         }
2252
2253 // copy it to the current state
2254         ent->render.model = CL_GetModelByIndex(ent->state_baseline.modelindex);
2255         ent->render.framegroupblend[0].frame = ent->state_baseline.frame;
2256         ent->render.framegroupblend[0].lerp = 1;
2257         // make torchs play out of sync
2258         ent->render.framegroupblend[0].start = lhrandom(-10, -1);
2259         ent->render.skinnum = ent->state_baseline.skin;
2260         ent->render.effects = ent->state_baseline.effects;
2261         ent->render.alpha = 1;
2262
2263         //VectorCopy (ent->state_baseline.origin, ent->render.origin);
2264         //VectorCopy (ent->state_baseline.angles, ent->render.angles);
2265
2266         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);
2267         ent->render.allowdecals = true;
2268         CL_UpdateRenderEntity(&ent->render);
2269 }
2270
2271 /*
2272 ===================
2273 CL_ParseStaticSound
2274 ===================
2275 */
2276 static void CL_ParseStaticSound (int large)
2277 {
2278         vec3_t          org;
2279         int                     sound_num, vol, atten;
2280
2281         MSG_ReadVector(&cl_message, org, cls.protocol);
2282         if (large || cls.protocol == PROTOCOL_NEHAHRABJP2)
2283                 sound_num = (unsigned short) MSG_ReadShort(&cl_message);
2284         else
2285                 sound_num = MSG_ReadByte(&cl_message);
2286         vol = MSG_ReadByte(&cl_message);
2287         atten = MSG_ReadByte(&cl_message);
2288
2289         S_StaticSound (cl.sound_precache[sound_num], org, vol/255.0f, atten);
2290 }
2291
2292 static void CL_ParseEffect (void)
2293 {
2294         vec3_t          org;
2295         int                     modelindex, startframe, framecount, framerate;
2296
2297         MSG_ReadVector(&cl_message, org, cls.protocol);
2298         modelindex = MSG_ReadByte(&cl_message);
2299         startframe = MSG_ReadByte(&cl_message);
2300         framecount = MSG_ReadByte(&cl_message);
2301         framerate = MSG_ReadByte(&cl_message);
2302
2303         CL_Effect(org, modelindex, startframe, framecount, framerate);
2304 }
2305
2306 static void CL_ParseEffect2 (void)
2307 {
2308         vec3_t          org;
2309         int                     modelindex, startframe, framecount, framerate;
2310
2311         MSG_ReadVector(&cl_message, org, cls.protocol);
2312         modelindex = (unsigned short) MSG_ReadShort(&cl_message);
2313         startframe = (unsigned short) MSG_ReadShort(&cl_message);
2314         framecount = MSG_ReadByte(&cl_message);
2315         framerate = MSG_ReadByte(&cl_message);
2316
2317         CL_Effect(org, modelindex, startframe, framecount, framerate);
2318 }
2319
2320 void CL_NewBeam (int ent, vec3_t start, vec3_t end, dp_model_t *m, int lightning)
2321 {
2322         int i;
2323         beam_t *b = NULL;
2324
2325         if (ent >= MAX_EDICTS)
2326         {
2327                 Con_Printf("CL_NewBeam: invalid entity number %i\n", ent);
2328                 ent = 0;
2329         }
2330
2331         if (ent >= cl.max_entities)
2332                 CL_ExpandEntities(ent);
2333
2334         // override any beam with the same entity
2335         i = cl.max_beams;
2336         if (ent)
2337                 for (i = 0, b = cl.beams;i < cl.max_beams;i++, b++)
2338                         if (b->entity == ent)
2339                                 break;
2340         // if the entity was not found then just replace an unused beam
2341         if (i == cl.max_beams)
2342                 for (i = 0, b = cl.beams;i < cl.max_beams;i++, b++)
2343                         if (!b->model)
2344                                 break;
2345         if (i < cl.max_beams)
2346         {
2347                 cl.num_beams = max(cl.num_beams, i + 1);
2348                 b->entity = ent;
2349                 b->lightning = lightning;
2350                 b->model = m;
2351                 b->endtime = cl.mtime[0] + 0.2;
2352                 VectorCopy (start, b->start);
2353                 VectorCopy (end, b->end);
2354         }
2355         else
2356                 Con_Print("beam list overflow!\n");
2357 }
2358
2359 static void CL_ParseBeam (dp_model_t *m, int lightning)
2360 {
2361         int ent;
2362         vec3_t start, end;
2363
2364         ent = (unsigned short) MSG_ReadShort(&cl_message);
2365         MSG_ReadVector(&cl_message, start, cls.protocol);
2366         MSG_ReadVector(&cl_message, end, cls.protocol);
2367
2368         if (ent >= MAX_EDICTS)
2369         {
2370                 Con_Printf("CL_ParseBeam: invalid entity number %i\n", ent);
2371                 ent = 0;
2372         }
2373
2374         CL_NewBeam(ent, start, end, m, lightning);
2375 }
2376
2377 static void CL_ParseTempEntity(void)
2378 {
2379         int type;
2380         vec3_t pos, pos2;
2381         vec3_t vel1, vel2;
2382         vec3_t dir;
2383         vec3_t color;
2384         int rnd;
2385         int colorStart, colorLength, count;
2386         float velspeed, radius;
2387         unsigned char *tempcolor;
2388         matrix4x4_t tempmatrix;
2389
2390         if (cls.protocol == PROTOCOL_QUAKEWORLD)
2391         {
2392                 type = MSG_ReadByte(&cl_message);
2393                 switch (type)
2394                 {
2395                 case QW_TE_WIZSPIKE:
2396                         // spike hitting wall
2397                         MSG_ReadVector(&cl_message, pos, cls.protocol);
2398                         CL_FindNonSolidLocation(pos, pos, 4);
2399                         CL_ParticleEffect(EFFECT_TE_WIZSPIKE, 1, pos, pos, vec3_origin, vec3_origin, NULL, 0);
2400                         S_StartSound(-1, 0, cl.sfx_wizhit, pos, 1, 1);
2401                         break;
2402
2403                 case QW_TE_KNIGHTSPIKE:
2404                         // spike hitting wall
2405                         MSG_ReadVector(&cl_message, pos, cls.protocol);
2406                         CL_FindNonSolidLocation(pos, pos, 4);
2407                         CL_ParticleEffect(EFFECT_TE_KNIGHTSPIKE, 1, pos, pos, vec3_origin, vec3_origin, NULL, 0);
2408                         S_StartSound(-1, 0, cl.sfx_knighthit, pos, 1, 1);
2409                         break;
2410
2411                 case QW_TE_SPIKE:
2412                         // spike hitting wall
2413                         MSG_ReadVector(&cl_message, pos, cls.protocol);
2414                         CL_FindNonSolidLocation(pos, pos, 4);
2415                         CL_ParticleEffect(EFFECT_TE_SPIKE, 1, pos, pos, vec3_origin, vec3_origin, NULL, 0);
2416                         if (rand() % 5)
2417                                 S_StartSound(-1, 0, cl.sfx_tink1, pos, 1, 1);
2418                         else
2419                         {
2420                                 rnd = rand() & 3;
2421                                 if (rnd == 1)
2422                                         S_StartSound(-1, 0, cl.sfx_ric1, pos, 1, 1);
2423                                 else if (rnd == 2)
2424                                         S_StartSound(-1, 0, cl.sfx_ric2, pos, 1, 1);
2425                                 else
2426                                         S_StartSound(-1, 0, cl.sfx_ric3, pos, 1, 1);
2427                         }
2428                         break;
2429                 case QW_TE_SUPERSPIKE:
2430                         // super spike hitting wall
2431                         MSG_ReadVector(&cl_message, pos, cls.protocol);
2432                         CL_FindNonSolidLocation(pos, pos, 4);
2433                         CL_ParticleEffect(EFFECT_TE_SUPERSPIKE, 1, pos, pos, vec3_origin, vec3_origin, NULL, 0);
2434                         if (rand() % 5)
2435                                 S_StartSound(-1, 0, cl.sfx_tink1, pos, 1, 1);
2436                         else
2437                         {
2438                                 rnd = rand() & 3;
2439                                 if (rnd == 1)
2440                                         S_StartSound(-1, 0, cl.sfx_ric1, pos, 1, 1);
2441                                 else if (rnd == 2)
2442                                         S_StartSound(-1, 0, cl.sfx_ric2, pos, 1, 1);
2443                                 else
2444                                         S_StartSound(-1, 0, cl.sfx_ric3, pos, 1, 1);
2445                         }
2446                         break;
2447
2448                 case QW_TE_EXPLOSION:
2449                         // rocket explosion
2450                         MSG_ReadVector(&cl_message, pos, cls.protocol);
2451                         CL_FindNonSolidLocation(pos, pos, 10);
2452                         CL_ParticleEffect(EFFECT_TE_EXPLOSION, 1, pos, pos, vec3_origin, vec3_origin, NULL, 0);
2453                         S_StartSound(-1, 0, cl.sfx_r_exp3, pos, 1, 1);
2454                         CL_Effect(pos, cl.qw_modelindex_s_explod, 0, 6, 10);
2455                         break;
2456
2457                 case QW_TE_TAREXPLOSION:
2458                         // tarbaby explosion
2459                         MSG_ReadVector(&cl_message, pos, cls.protocol);
2460                         CL_FindNonSolidLocation(pos, pos, 10);
2461                         CL_ParticleEffect(EFFECT_TE_TAREXPLOSION, 1, pos, pos, vec3_origin, vec3_origin, NULL, 0);
2462                         S_StartSound(-1, 0, cl.sfx_r_exp3, pos, 1, 1);
2463                         break;
2464
2465                 case QW_TE_LIGHTNING1:
2466                         // lightning bolts
2467                         CL_ParseBeam(cl.model_bolt, true);
2468                         break;
2469
2470                 case QW_TE_LIGHTNING2:
2471                         // lightning bolts
2472                         CL_ParseBeam(cl.model_bolt2, true);
2473                         break;
2474
2475                 case QW_TE_LIGHTNING3:
2476                         // lightning bolts
2477                         CL_ParseBeam(cl.model_bolt3, false);
2478                         break;
2479
2480                 case QW_TE_LAVASPLASH:
2481                         MSG_ReadVector(&cl_message, pos, cls.protocol);
2482                         CL_ParticleEffect(EFFECT_TE_LAVASPLASH, 1, pos, pos, vec3_origin, vec3_origin, NULL, 0);
2483                         break;
2484
2485                 case QW_TE_TELEPORT:
2486                         MSG_ReadVector(&cl_message, pos, cls.protocol);
2487                         CL_ParticleEffect(EFFECT_TE_TELEPORT, 1, pos, pos, vec3_origin, vec3_origin, NULL, 0);
2488                         break;
2489
2490                 case QW_TE_GUNSHOT:
2491                         // bullet hitting wall
2492                         radius = MSG_ReadByte(&cl_message);
2493                         MSG_ReadVector(&cl_message, pos, cls.protocol);
2494                         CL_FindNonSolidLocation(pos, pos, 4);
2495                         VectorSet(pos2, pos[0] + radius, pos[1] + radius, pos[2] + radius);
2496                         VectorSet(pos, pos[0] - radius, pos[1] - radius, pos[2] - radius);
2497                         CL_ParticleEffect(EFFECT_TE_GUNSHOT, radius, pos, pos2, vec3_origin, vec3_origin, NULL, 0);
2498                         if(cl_sound_ric_gunshot.integer & RIC_GUNSHOT)
2499                         {
2500                                 if (rand() % 5)
2501                                         S_StartSound(-1, 0, cl.sfx_tink1, pos, 1, 1);
2502                                 else
2503                                 {
2504                                         rnd = rand() & 3;
2505                                         if (rnd == 1)
2506                                                 S_StartSound(-1, 0, cl.sfx_ric1, pos, 1, 1);
2507                                         else if (rnd == 2)
2508                                                 S_StartSound(-1, 0, cl.sfx_ric2, pos, 1, 1);
2509                                         else
2510                                                 S_StartSound(-1, 0, cl.sfx_ric3, pos, 1, 1);
2511                                 }
2512                         }
2513                         break;
2514
2515                 case QW_TE_BLOOD:
2516                         count = MSG_ReadByte(&cl_message);
2517                         MSG_ReadVector(&cl_message, pos, cls.protocol);
2518                         CL_FindNonSolidLocation(pos, pos, 4);
2519                         CL_ParticleEffect(EFFECT_TE_BLOOD, count, pos, pos, vec3_origin, vec3_origin, NULL, 0);
2520                         break;
2521
2522                 case QW_TE_LIGHTNINGBLOOD:
2523                         MSG_ReadVector(&cl_message, pos, cls.protocol);
2524                         CL_FindNonSolidLocation(pos, pos, 4);
2525                         CL_ParticleEffect(EFFECT_TE_BLOOD, 2.5, pos, pos, vec3_origin, vec3_origin, NULL, 0);
2526                         break;
2527
2528                 default:
2529                         Host_Error("CL_ParseTempEntity: bad type %d (hex %02X)", type, type);
2530                 }
2531         }
2532         else
2533         {
2534                 type = MSG_ReadByte(&cl_message);
2535                 switch (type)
2536                 {
2537                 case TE_WIZSPIKE:
2538                         // spike hitting wall
2539                         MSG_ReadVector(&cl_message, pos, cls.protocol);
2540                         CL_FindNonSolidLocation(pos, pos, 4);
2541                         CL_ParticleEffect(EFFECT_TE_WIZSPIKE, 1, pos, pos, vec3_origin, vec3_origin, NULL, 0);
2542                         S_StartSound(-1, 0, cl.sfx_wizhit, pos, 1, 1);
2543                         break;
2544
2545                 case TE_KNIGHTSPIKE:
2546                         // spike hitting wall
2547                         MSG_ReadVector(&cl_message, pos, cls.protocol);
2548                         CL_FindNonSolidLocation(pos, pos, 4);
2549                         CL_ParticleEffect(EFFECT_TE_KNIGHTSPIKE, 1, pos, pos, vec3_origin, vec3_origin, NULL, 0);
2550                         S_StartSound(-1, 0, cl.sfx_knighthit, pos, 1, 1);
2551                         break;
2552
2553                 case TE_SPIKE:
2554                         // spike hitting wall
2555                         MSG_ReadVector(&cl_message, pos, cls.protocol);
2556                         CL_FindNonSolidLocation(pos, pos, 4);
2557                         CL_ParticleEffect(EFFECT_TE_SPIKE, 1, pos, pos, vec3_origin, vec3_origin, NULL, 0);
2558                         if (rand() % 5)
2559                                 S_StartSound(-1, 0, cl.sfx_tink1, pos, 1, 1);
2560                         else
2561                         {
2562                                 rnd = rand() & 3;
2563                                 if (rnd == 1)
2564                                         S_StartSound(-1, 0, cl.sfx_ric1, pos, 1, 1);
2565                                 else if (rnd == 2)
2566                                         S_StartSound(-1, 0, cl.sfx_ric2, pos, 1, 1);
2567                                 else
2568                                         S_StartSound(-1, 0, cl.sfx_ric3, pos, 1, 1);
2569                         }
2570                         break;
2571                 case TE_SPIKEQUAD:
2572                         // quad spike hitting wall
2573                         MSG_ReadVector(&cl_message, pos, cls.protocol);
2574                         CL_FindNonSolidLocation(pos, pos, 4);
2575                         CL_ParticleEffect(EFFECT_TE_SPIKEQUAD, 1, pos, pos, vec3_origin, vec3_origin, NULL, 0);
2576                         if (rand() % 5)
2577                                 S_StartSound(-1, 0, cl.sfx_tink1, pos, 1, 1);
2578                         else
2579                         {
2580                                 rnd = rand() & 3;
2581                                 if (rnd == 1)
2582                                         S_StartSound(-1, 0, cl.sfx_ric1, pos, 1, 1);
2583                                 else if (rnd == 2)
2584                                         S_StartSound(-1, 0, cl.sfx_ric2, pos, 1, 1);
2585                                 else
2586                                         S_StartSound(-1, 0, cl.sfx_ric3, pos, 1, 1);
2587                         }
2588                         break;
2589                 case TE_SUPERSPIKE:
2590                         // super spike hitting wall
2591                         MSG_ReadVector(&cl_message, pos, cls.protocol);
2592                         CL_FindNonSolidLocation(pos, pos, 4);
2593                         CL_ParticleEffect(EFFECT_TE_SUPERSPIKE, 1, pos, pos, vec3_origin, vec3_origin, NULL, 0);
2594                         if (rand() % 5)
2595                                 S_StartSound(-1, 0, cl.sfx_tink1, pos, 1, 1);
2596                         else
2597                         {
2598                                 rnd = rand() & 3;
2599                                 if (rnd == 1)
2600                                         S_StartSound(-1, 0, cl.sfx_ric1, pos, 1, 1);
2601                                 else if (rnd == 2)
2602                                         S_StartSound(-1, 0, cl.sfx_ric2, pos, 1, 1);
2603                                 else
2604                                         S_StartSound(-1, 0, cl.sfx_ric3, pos, 1, 1);
2605                         }
2606                         break;
2607                 case TE_SUPERSPIKEQUAD:
2608                         // quad super spike hitting wall
2609                         MSG_ReadVector(&cl_message, pos, cls.protocol);
2610                         CL_FindNonSolidLocation(pos, pos, 4);
2611                         CL_ParticleEffect(EFFECT_TE_SUPERSPIKEQUAD, 1, pos, pos, vec3_origin, vec3_origin, NULL, 0);
2612                         if (rand() % 5)
2613                                 S_StartSound(-1, 0, cl.sfx_tink1, pos, 1, 1);
2614                         else
2615                         {
2616                                 rnd = rand() & 3;
2617                                 if (rnd == 1)
2618                                         S_StartSound(-1, 0, cl.sfx_ric1, pos, 1, 1);
2619                                 else if (rnd == 2)
2620                                         S_StartSound(-1, 0, cl.sfx_ric2, pos, 1, 1);
2621                                 else
2622                                         S_StartSound(-1, 0, cl.sfx_ric3, pos, 1, 1);
2623                         }
2624                         break;
2625                         // LordHavoc: added for improved blood splatters
2626                 case TE_BLOOD:
2627                         // blood puff
2628                         MSG_ReadVector(&cl_message, pos, cls.protocol);
2629                         CL_FindNonSolidLocation(pos, pos, 4);
2630                         dir[0] = MSG_ReadChar(&cl_message);
2631                         dir[1] = MSG_ReadChar(&cl_message);
2632                         dir[2] = MSG_ReadChar(&cl_message);
2633                         count = MSG_ReadByte(&cl_message);
2634                         CL_ParticleEffect(EFFECT_TE_BLOOD, count, pos, pos, dir, dir, NULL, 0);
2635                         break;
2636                 case TE_SPARK:
2637                         // spark shower
2638                         MSG_ReadVector(&cl_message, pos, cls.protocol);
2639                         CL_FindNonSolidLocation(pos, pos, 4);
2640                         dir[0] = MSG_ReadChar(&cl_message);
2641                         dir[1] = MSG_ReadChar(&cl_message);
2642                         dir[2] = MSG_ReadChar(&cl_message);
2643                         count = MSG_ReadByte(&cl_message);
2644                         CL_ParticleEffect(EFFECT_TE_SPARK, count, pos, pos, dir, dir, NULL, 0);
2645                         break;
2646                 case TE_PLASMABURN:
2647                         MSG_ReadVector(&cl_message, pos, cls.protocol);
2648                         CL_FindNonSolidLocation(pos, pos, 4);
2649                         CL_ParticleEffect(EFFECT_TE_PLASMABURN, 1, pos, pos, vec3_origin, vec3_origin, NULL, 0);
2650                         break;
2651                         // LordHavoc: added for improved gore
2652                 case TE_BLOODSHOWER:
2653                         // vaporized body
2654                         MSG_ReadVector(&cl_message, pos, cls.protocol); // mins
2655                         MSG_ReadVector(&cl_message, pos2, cls.protocol); // maxs
2656                         velspeed = MSG_ReadCoord(&cl_message, cls.protocol); // speed
2657                         count = (unsigned short) MSG_ReadShort(&cl_message); // number of particles
2658                         vel1[0] = -velspeed;
2659                         vel1[1] = -velspeed;
2660                         vel1[2] = -velspeed;
2661                         vel2[0] = velspeed;
2662                         vel2[1] = velspeed;
2663                         vel2[2] = velspeed;
2664                         CL_ParticleEffect(EFFECT_TE_BLOOD, count, pos, pos2, vel1, vel2, NULL, 0);
2665                         break;
2666
2667                 case TE_PARTICLECUBE:
2668                         // general purpose particle effect
2669                         MSG_ReadVector(&cl_message, pos, cls.protocol); // mins
2670                         MSG_ReadVector(&cl_message, pos2, cls.protocol); // maxs
2671                         MSG_ReadVector(&cl_message, dir, cls.protocol); // dir
2672                         count = (unsigned short) MSG_ReadShort(&cl_message); // number of particles
2673                         colorStart = MSG_ReadByte(&cl_message); // color
2674                         colorLength = MSG_ReadByte(&cl_message); // gravity (1 or 0)
2675                         velspeed = MSG_ReadCoord(&cl_message, cls.protocol); // randomvel
2676                         CL_ParticleCube(pos, pos2, dir, count, colorStart, colorLength != 0, velspeed);
2677                         break;
2678
2679                 case TE_PARTICLERAIN:
2680                         // general purpose particle effect
2681                         MSG_ReadVector(&cl_message, pos, cls.protocol); // mins
2682                         MSG_ReadVector(&cl_message, pos2, cls.protocol); // maxs
2683                         MSG_ReadVector(&cl_message, dir, cls.protocol); // dir
2684                         count = (unsigned short) MSG_ReadShort(&cl_message); // number of particles
2685                         colorStart = MSG_ReadByte(&cl_message); // color
2686                         CL_ParticleRain(pos, pos2, dir, count, colorStart, 0);
2687                         break;
2688
2689                 case TE_PARTICLESNOW:
2690                         // general purpose particle effect
2691                         MSG_ReadVector(&cl_message, pos, cls.protocol); // mins
2692                         MSG_ReadVector(&cl_message, pos2, cls.protocol); // maxs
2693                         MSG_ReadVector(&cl_message, dir, cls.protocol); // dir
2694                         count = (unsigned short) MSG_ReadShort(&cl_message); // number of particles
2695                         colorStart = MSG_ReadByte(&cl_message); // color
2696                         CL_ParticleRain(pos, pos2, dir, count, colorStart, 1);
2697                         break;
2698
2699                 case TE_GUNSHOT:
2700                         // bullet hitting wall
2701                         MSG_ReadVector(&cl_message, pos, cls.protocol);
2702                         CL_FindNonSolidLocation(pos, pos, 4);
2703                         CL_ParticleEffect(EFFECT_TE_GUNSHOT, 1, pos, pos, vec3_origin, vec3_origin, NULL, 0);
2704                         if(cl_sound_ric_gunshot.integer & RIC_GUNSHOT)
2705                         {
2706                                 if (rand() % 5)
2707                                         S_StartSound(-1, 0, cl.sfx_tink1, pos, 1, 1);
2708                                 else
2709                                 {
2710                                         rnd = rand() & 3;
2711                                         if (rnd == 1)
2712                                                 S_StartSound(-1, 0, cl.sfx_ric1, pos, 1, 1);
2713                                         else if (rnd == 2)
2714                                                 S_StartSound(-1, 0, cl.sfx_ric2, pos, 1, 1);
2715                                         else
2716                                                 S_StartSound(-1, 0, cl.sfx_ric3, pos, 1, 1);
2717                                 }
2718                         }
2719                         break;
2720
2721                 case TE_GUNSHOTQUAD:
2722                         // quad bullet hitting wall
2723                         MSG_ReadVector(&cl_message, pos, cls.protocol);
2724                         CL_FindNonSolidLocation(pos, pos, 4);
2725                         CL_ParticleEffect(EFFECT_TE_GUNSHOTQUAD, 1, pos, pos, vec3_origin, vec3_origin, NULL, 0);
2726                         if(cl_sound_ric_gunshot.integer & RIC_GUNSHOTQUAD)
2727                         {
2728                                 if (rand() % 5)
2729                                         S_StartSound(-1, 0, cl.sfx_tink1, pos, 1, 1);
2730                                 else
2731                                 {
2732                                         rnd = rand() & 3;
2733                                         if (rnd == 1)
2734                                                 S_StartSound(-1, 0, cl.sfx_ric1, pos, 1, 1);
2735                                         else if (rnd == 2)
2736                                                 S_StartSound(-1, 0, cl.sfx_ric2, pos, 1, 1);
2737                                         else
2738                                                 S_StartSound(-1, 0, cl.sfx_ric3, pos, 1, 1);
2739                                 }
2740                         }
2741                         break;
2742
2743                 case TE_EXPLOSION:
2744                         // rocket explosion
2745                         MSG_ReadVector(&cl_message, pos, cls.protocol);
2746                         CL_FindNonSolidLocation(pos, pos, 10);
2747                         CL_ParticleEffect(EFFECT_TE_EXPLOSION, 1, pos, pos, vec3_origin, vec3_origin, NULL, 0);
2748                         S_StartSound(-1, 0, cl.sfx_r_exp3, pos, 1, 1);
2749                         break;
2750
2751                 case TE_EXPLOSIONQUAD:
2752                         // quad rocket explosion
2753                         MSG_ReadVector(&cl_message, pos, cls.protocol);
2754                         CL_FindNonSolidLocation(pos, pos, 10);
2755                         CL_ParticleEffect(EFFECT_TE_EXPLOSIONQUAD, 1, pos, pos, vec3_origin, vec3_origin, NULL, 0);
2756                         S_StartSound(-1, 0, cl.sfx_r_exp3, pos, 1, 1);
2757                         break;
2758
2759                 case TE_EXPLOSION3:
2760                         // Nehahra movie colored lighting explosion
2761                         MSG_ReadVector(&cl_message, pos, cls.protocol);
2762                         CL_FindNonSolidLocation(pos, pos, 10);
2763                         color[0] = MSG_ReadCoord(&cl_message, cls.protocol) * (2.0f / 1.0f);
2764                         color[1] = MSG_ReadCoord(&cl_message, cls.protocol) * (2.0f / 1.0f);
2765                         color[2] = MSG_ReadCoord(&cl_message, cls.protocol) * (2.0f / 1.0f);
2766                         CL_ParticleExplosion(pos);
2767                         Matrix4x4_CreateTranslate(&tempmatrix, pos[0], pos[1], pos[2]);
2768                         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);
2769                         S_StartSound(-1, 0, cl.sfx_r_exp3, pos, 1, 1);
2770                         break;
2771
2772                 case TE_EXPLOSIONRGB:
2773                         // colored lighting explosion
2774                         MSG_ReadVector(&cl_message, pos, cls.protocol);
2775                         CL_FindNonSolidLocation(pos, pos, 10);
2776                         CL_ParticleExplosion(pos);
2777                         color[0] = MSG_ReadByte(&cl_message) * (2.0f / 255.0f);
2778                         color[1] = MSG_ReadByte(&cl_message) * (2.0f / 255.0f);
2779                         color[2] = MSG_ReadByte(&cl_message) * (2.0f / 255.0f);
2780                         Matrix4x4_CreateTranslate(&tempmatrix, pos[0], pos[1], pos[2]);
2781                         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);
2782                         S_StartSound(-1, 0, cl.sfx_r_exp3, pos, 1, 1);
2783                         break;
2784
2785                 case TE_TAREXPLOSION:
2786                         // tarbaby explosion
2787                         MSG_ReadVector(&cl_message, pos, cls.protocol);
2788                         CL_FindNonSolidLocation(pos, pos, 10);
2789                         CL_ParticleEffect(EFFECT_TE_TAREXPLOSION, 1, pos, pos, vec3_origin, vec3_origin, NULL, 0);
2790                         S_StartSound(-1, 0, cl.sfx_r_exp3, pos, 1, 1);
2791                         break;
2792
2793                 case TE_SMALLFLASH:
2794                         MSG_ReadVector(&cl_message, pos, cls.protocol);
2795                         CL_FindNonSolidLocation(pos, pos, 10);
2796                         CL_ParticleEffect(EFFECT_TE_SMALLFLASH, 1, pos, pos, vec3_origin, vec3_origin, NULL, 0);
2797                         break;
2798
2799                 case TE_CUSTOMFLASH:
2800                         MSG_ReadVector(&cl_message, pos, cls.protocol);
2801                         CL_FindNonSolidLocation(pos, pos, 4);
2802                         radius = (MSG_ReadByte(&cl_message) + 1) * 8;
2803                         velspeed = (MSG_ReadByte(&cl_message) + 1) * (1.0 / 256.0);
2804                         color[0] = MSG_ReadByte(&cl_message) * (2.0f / 255.0f);
2805                         color[1] = MSG_ReadByte(&cl_message) * (2.0f / 255.0f);
2806                         color[2] = MSG_ReadByte(&cl_message) * (2.0f / 255.0f);
2807                         Matrix4x4_CreateTranslate(&tempmatrix, pos[0], pos[1], pos[2]);
2808                         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);
2809                         break;
2810
2811                 case TE_FLAMEJET:
2812                         MSG_ReadVector(&cl_message, pos, cls.protocol);
2813                         MSG_ReadVector(&cl_message, dir, cls.protocol);
2814                         count = MSG_ReadByte(&cl_message);
2815                         CL_ParticleEffect(EFFECT_TE_FLAMEJET, count, pos, pos, dir, dir, NULL, 0);
2816                         break;
2817
2818                 case TE_LIGHTNING1:
2819                         // lightning bolts
2820                         CL_ParseBeam(cl.model_bolt, true);
2821                         break;
2822
2823                 case TE_LIGHTNING2:
2824                         // lightning bolts
2825                         CL_ParseBeam(cl.model_bolt2, true);
2826                         break;
2827
2828                 case TE_LIGHTNING3:
2829                         // lightning bolts
2830                         CL_ParseBeam(cl.model_bolt3, false);
2831                         break;
2832
2833         // PGM 01/21/97
2834                 case TE_BEAM:
2835                         // grappling hook beam
2836                         CL_ParseBeam(cl.model_beam, false);
2837                         break;
2838         // PGM 01/21/97
2839
2840         // LordHavoc: for compatibility with the Nehahra movie...
2841                 case TE_LIGHTNING4NEH:
2842                         CL_ParseBeam(Mod_ForName(MSG_ReadString(&cl_message, cl_readstring, sizeof(cl_readstring)), true, false, NULL), false);
2843                         break;
2844
2845                 case TE_LAVASPLASH:
2846                         MSG_ReadVector(&cl_message, pos, cls.protocol);
2847                         CL_ParticleEffect(EFFECT_TE_LAVASPLASH, 1, pos, pos, vec3_origin, vec3_origin, NULL, 0);
2848                         break;
2849
2850                 case TE_TELEPORT:
2851                         MSG_ReadVector(&cl_message, pos, cls.protocol);
2852                         CL_ParticleEffect(EFFECT_TE_TELEPORT, 1, pos, pos, vec3_origin, vec3_origin, NULL, 0);
2853                         break;
2854
2855                 case TE_EXPLOSION2:
2856                         // color mapped explosion
2857                         MSG_ReadVector(&cl_message, pos, cls.protocol);
2858                         CL_FindNonSolidLocation(pos, pos, 10);
2859                         colorStart = MSG_ReadByte(&cl_message);
2860                         colorLength = MSG_ReadByte(&cl_message);
2861                         CL_ParticleExplosion2(pos, colorStart, colorLength);
2862                         tempcolor = palette_rgb[(rand()%colorLength) + colorStart];
2863                         color[0] = tempcolor[0] * (2.0f / 255.0f);
2864                         color[1] = tempcolor[1] * (2.0f / 255.0f);
2865                         color[2] = tempcolor[2] * (2.0f / 255.0f);
2866                         Matrix4x4_CreateTranslate(&tempmatrix, pos[0], pos[1], pos[2]);
2867                         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);
2868                         S_StartSound(-1, 0, cl.sfx_r_exp3, pos, 1, 1);
2869                         break;
2870
2871                 case TE_TEI_G3:
2872                         MSG_ReadVector(&cl_message, pos, cls.protocol);
2873                         MSG_ReadVector(&cl_message, pos2, cls.protocol);
2874                         MSG_ReadVector(&cl_message, dir, cls.protocol);
2875                         CL_ParticleEffect(EFFECT_TE_TEI_G3, 1, pos, pos2, dir, dir, NULL, 0);
2876                         break;
2877
2878                 case TE_TEI_SMOKE:
2879                         MSG_ReadVector(&cl_message, pos, cls.protocol);
2880                         MSG_ReadVector(&cl_message, dir, cls.protocol);
2881                         count = MSG_ReadByte(&cl_message);
2882                         CL_FindNonSolidLocation(pos, pos, 4);
2883                         CL_ParticleEffect(EFFECT_TE_TEI_SMOKE, count, pos, pos, vec3_origin, vec3_origin, NULL, 0);
2884                         break;
2885
2886                 case TE_TEI_BIGEXPLOSION:
2887                         MSG_ReadVector(&cl_message, pos, cls.protocol);
2888                         CL_FindNonSolidLocation(pos, pos, 10);
2889                         CL_ParticleEffect(EFFECT_TE_TEI_BIGEXPLOSION, 1, pos, pos, vec3_origin, vec3_origin, NULL, 0);
2890                         S_StartSound(-1, 0, cl.sfx_r_exp3, pos, 1, 1);
2891                         break;
2892
2893                 case TE_TEI_PLASMAHIT:
2894                         MSG_ReadVector(&cl_message, pos, cls.protocol);
2895                         MSG_ReadVector(&cl_message, dir, cls.protocol);
2896                         count = MSG_ReadByte(&cl_message);
2897                         CL_FindNonSolidLocation(pos, pos, 5);
2898                         CL_ParticleEffect(EFFECT_TE_TEI_PLASMAHIT, count, pos, pos, vec3_origin, vec3_origin, NULL, 0);
2899                         break;
2900
2901                 default:
2902                         Host_Error("CL_ParseTempEntity: bad type %d (hex %02X)", type, type);
2903                 }
2904         }
2905 }
2906
2907 static void CL_ParseTrailParticles(void)
2908 {
2909         int entityindex;
2910         int effectindex;
2911         vec3_t start, end;
2912         entityindex = (unsigned short)MSG_ReadShort(&cl_message);
2913         if (entityindex >= MAX_EDICTS)
2914                 entityindex = 0;
2915         if (entityindex >= cl.max_entities)
2916                 CL_ExpandEntities(entityindex);
2917         effectindex = (unsigned short)MSG_ReadShort(&cl_message);
2918         MSG_ReadVector(&cl_message, start, cls.protocol);
2919         MSG_ReadVector(&cl_message, end, cls.protocol);
2920         CL_ParticleEffect(effectindex, 1, start, end, vec3_origin, vec3_origin, entityindex > 0 ? cl.entities + entityindex : NULL, 0);
2921 }
2922
2923 static void CL_ParsePointParticles(void)
2924 {
2925         int effectindex, count;
2926         vec3_t origin, velocity;
2927         effectindex = (unsigned short)MSG_ReadShort(&cl_message);
2928         MSG_ReadVector(&cl_message, origin, cls.protocol);
2929         MSG_ReadVector(&cl_message, velocity, cls.protocol);
2930         count = (unsigned short)MSG_ReadShort(&cl_message);
2931         CL_ParticleEffect(effectindex, count, origin, origin, velocity, velocity, NULL, 0);
2932 }
2933
2934 static void CL_ParsePointParticles1(void)
2935 {
2936         int effectindex;
2937         vec3_t origin;
2938         effectindex = (unsigned short)MSG_ReadShort(&cl_message);
2939         MSG_ReadVector(&cl_message, origin, cls.protocol);
2940         CL_ParticleEffect(effectindex, 1, origin, origin, vec3_origin, vec3_origin, NULL, 0);
2941 }
2942
2943 typedef struct cl_iplog_item_s
2944 {
2945         char *address;
2946         char *name;
2947 }
2948 cl_iplog_item_t;
2949
2950 static qboolean cl_iplog_loaded = false;
2951 static int cl_iplog_numitems = 0;
2952 static int cl_iplog_maxitems = 0;
2953 static cl_iplog_item_t *cl_iplog_items;
2954
2955 static void CL_IPLog_Load(void);
2956 static void CL_IPLog_Add(const char *address, const char *name, qboolean checkexisting, qboolean addtofile)
2957 {
2958         int i;
2959         size_t sz_name, sz_address;
2960         if (!address || !address[0] || !name || !name[0])
2961                 return;
2962         if (!cl_iplog_loaded)
2963                 CL_IPLog_Load();
2964         if (developer_extra.integer)
2965                 Con_DPrintf("CL_IPLog_Add(\"%s\", \"%s\", %i, %i);\n", address, name, checkexisting, addtofile);
2966         // see if it already exists
2967         if (checkexisting)
2968         {
2969                 for (i = 0;i < cl_iplog_numitems;i++)
2970                 {
2971                         if (!strcmp(cl_iplog_items[i].address, address) && !strcmp(cl_iplog_items[i].name, name))
2972                         {
2973                                 if (developer_extra.integer)
2974                                         Con_DPrintf("... found existing \"%s\" \"%s\"\n", cl_iplog_items[i].address, cl_iplog_items[i].name);
2975                                 return;
2976                         }
2977                 }
2978         }
2979         // it does not already exist in the iplog, so add it
2980         if (cl_iplog_maxitems <= cl_iplog_numitems || !cl_iplog_items)
2981         {
2982                 cl_iplog_item_t *olditems = cl_iplog_items;
2983                 cl_iplog_maxitems = max(1024, cl_iplog_maxitems + 256);
2984                 cl_iplog_items = (cl_iplog_item_t *) Mem_Alloc(cls.permanentmempool, cl_iplog_maxitems * sizeof(cl_iplog_item_t));
2985                 if (olditems)
2986                 {
2987                         if (cl_iplog_numitems)
2988                                 memcpy(cl_iplog_items, olditems, cl_iplog_numitems * sizeof(cl_iplog_item_t));
2989                         Mem_Free(olditems);
2990                 }
2991         }
2992         sz_address = strlen(address) + 1;
2993         sz_name = strlen(name) + 1;
2994         cl_iplog_items[cl_iplog_numitems].address = (char *) Mem_Alloc(cls.permanentmempool, sz_address);
2995         cl_iplog_items[cl_iplog_numitems].name = (char *) Mem_Alloc(cls.permanentmempool, sz_name);
2996         strlcpy(cl_iplog_items[cl_iplog_numitems].address, address, sz_address);
2997         // TODO: maybe it would be better to strip weird characters from name when
2998         // copying it here rather than using a straight strcpy?
2999         strlcpy(cl_iplog_items[cl_iplog_numitems].name, name, sz_name);
3000         cl_iplog_numitems++;
3001         if (addtofile)
3002         {
3003                 // add it to the iplog.txt file
3004                 // TODO: this ought to open the one in the userpath version of the base
3005                 // gamedir, not the current gamedir
3006                 Log_Printf(cl_iplog_name.string, "%s %s\n", address, name);
3007                 if (developer_extra.integer)
3008                         Con_DPrintf("CL_IPLog_Add: appending this line to %s: %s %s\n", cl_iplog_name.string, address, name);
3009         }
3010 }
3011
3012 static void CL_IPLog_Load(void)
3013 {
3014         int i, len, linenumber;
3015         char *text, *textend;
3016         unsigned char *filedata;
3017         fs_offset_t filesize;
3018         char line[MAX_INPUTLINE];
3019         char address[MAX_INPUTLINE];
3020         cl_iplog_loaded = true;
3021         // TODO: this ought to open the one in the userpath version of the base
3022         // gamedir, not the current gamedir
3023         filedata = FS_LoadFile(cl_iplog_name.string, tempmempool, true, &filesize);
3024         if (!filedata)
3025                 return;
3026         text = (char *)filedata;
3027         textend = text + filesize;
3028         for (linenumber = 1;text < textend;linenumber++)
3029         {
3030                 for (len = 0;text < textend && *text != '\r' && *text != '\n';text++)
3031                         if (len < (int)sizeof(line) - 1)
3032                                 line[len++] = *text;
3033                 line[len] = 0;
3034                 if (text < textend && *text == '\r' && text[1] == '\n')
3035                         text++;
3036                 if (text < textend && *text == '\n')
3037                         text++;
3038                 if (line[0] == '/' && line[1] == '/')
3039                         continue; // skip comments if anyone happens to add them
3040                 for (i = 0;i < len && !ISWHITESPACE(line[i]);i++)
3041                         address[i] = line[i];
3042                 address[i] = 0;
3043                 // skip exactly one space character
3044                 i++;
3045                 // address contains the address with termination,
3046                 // line + i contains the name with termination
3047                 if (address[0] && line[i])
3048                         CL_IPLog_Add(address, line + i, false, false);
3049                 else
3050                         Con_Printf("%s:%i: could not parse address and name:\n%s\n", cl_iplog_name.string, linenumber, line);
3051         }
3052 }
3053
3054 static void CL_IPLog_List_f(void)
3055 {
3056         int i, j;
3057         const char *addressprefix;
3058         if (Cmd_Argc() > 2)
3059         {
3060                 Con_Printf("usage: %s 123.456.789.\n", Cmd_Argv(0));
3061                 return;
3062         }
3063         addressprefix = "";
3064         if (Cmd_Argc() >= 2)
3065                 addressprefix = Cmd_Argv(1);
3066         if (!cl_iplog_loaded)
3067                 CL_IPLog_Load();
3068         if (addressprefix && addressprefix[0])
3069                 Con_Printf("Listing iplog addresses beginning with %s\n", addressprefix);
3070         else
3071                 Con_Printf("Listing all iplog entries\n");
3072         Con_Printf("address         name\n");
3073         for (i = 0;i < cl_iplog_numitems;i++)
3074         {
3075                 if (addressprefix && addressprefix[0])
3076                 {
3077                         for (j = 0;addressprefix[j];j++)
3078                                 if (addressprefix[j] != cl_iplog_items[i].address[j])
3079                                         break;
3080                         // if this address does not begin with the addressprefix string
3081                         // simply omit it from the output
3082                         if (addressprefix[j])
3083                                 continue;
3084                 }
3085                 // if name is less than 15 characters, left justify it and pad
3086                 // if name is more than 15 characters, print all of it, not worrying
3087                 // about the fact it will misalign the columns
3088                 if (strlen(cl_iplog_items[i].address) < 15)
3089                         Con_Printf("%-15s %s\n", cl_iplog_items[i].address, cl_iplog_items[i].name);
3090                 else
3091                         Con_Printf("%5s %s\n", cl_iplog_items[i].address, cl_iplog_items[i].name);
3092         }
3093 }
3094
3095 // look for anything interesting like player IP addresses or ping reports
3096 static qboolean CL_ExaminePrintString(const char *text)
3097 {
3098         int len;
3099         const char *t;
3100         char temp[MAX_INPUTLINE];
3101         if (!strcmp(text, "Client ping times:\n"))
3102         {
3103                 cl.parsingtextmode = CL_PARSETEXTMODE_PING;
3104                 // hide ping reports in demos
3105                 if (cls.demoplayback)
3106                         cl.parsingtextexpectingpingforscores = 1;
3107                 for(cl.parsingtextplayerindex = 0; cl.parsingtextplayerindex < cl.maxclients && !cl.scores[cl.parsingtextplayerindex].name[0]; cl.parsingtextplayerindex++)
3108                         ;
3109                 if (cl.parsingtextplayerindex >= cl.maxclients) // should never happen, since the client itself should be in cl.scores
3110                 {
3111                         Con_Printf("ping reply but empty scoreboard?!?\n");
3112                         cl.parsingtextmode = CL_PARSETEXTMODE_NONE;
3113                         cl.parsingtextexpectingpingforscores = 0;
3114                 }
3115                 cl.parsingtextexpectingpingforscores = cl.parsingtextexpectingpingforscores ? 2 : 0;
3116                 return !cl.parsingtextexpectingpingforscores;
3117         }
3118         if (!strncmp(text, "host:    ", 9))
3119         {
3120                 // cl.parsingtextexpectingpingforscores = false; // really?
3121                 cl.parsingtextmode = CL_PARSETEXTMODE_STATUS;
3122                 cl.parsingtextplayerindex = 0;
3123                 return true;
3124         }
3125         if (cl.parsingtextmode == CL_PARSETEXTMODE_PING)
3126         {
3127                 // if anything goes wrong, we'll assume this is not a ping report
3128                 qboolean expected = cl.parsingtextexpectingpingforscores != 0;
3129                 cl.parsingtextexpectingpingforscores = 0;
3130                 cl.parsingtextmode = CL_PARSETEXTMODE_NONE;
3131                 t = text;
3132                 while (*t == ' ')
3133                         t++;
3134                 if ((*t >= '0' && *t <= '9') || *t == '-')
3135                 {
3136                         int ping = atoi(t);
3137                         while ((*t >= '0' && *t <= '9') || *t == '-')
3138                                 t++;
3139                         if (*t == ' ')
3140                         {
3141                                 int charindex = 0;
3142                                 t++;
3143                                 if(cl.parsingtextplayerindex < cl.maxclients)
3144                                 {
3145                                         for (charindex = 0;cl.scores[cl.parsingtextplayerindex].name[charindex] == t[charindex];charindex++)
3146                                                 ;
3147                                         // 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
3148                                         //if (cl.scores[cl.parsingtextplayerindex].name[charindex] == 0 && t[charindex] == '\n')
3149                                         if (t[charindex] == '\n')
3150                                         {
3151                                                 cl.scores[cl.parsingtextplayerindex].qw_ping = bound(0, ping, 9999);
3152                                                 for (cl.parsingtextplayerindex++;cl.parsingtextplayerindex < cl.maxclients && !cl.scores[cl.parsingtextplayerindex].name[0];cl.parsingtextplayerindex++)
3153                                                         ;
3154                                                 //if (cl.parsingtextplayerindex < cl.maxclients) // we could still get unconnecteds!
3155                                                 {
3156                                                         // we parsed a valid ping entry, so expect another to follow
3157                                                         cl.parsingtextmode = CL_PARSETEXTMODE_PING;
3158                                                         cl.parsingtextexpectingpingforscores = expected;
3159                                                 }
3160                                                 return !expected;
3161                                         }
3162                                 }
3163                                 if (!strncmp(t, "unconnected\n", 12))
3164                                 {
3165                                         // just ignore
3166                                         cl.parsingtextmode = CL_PARSETEXTMODE_PING;
3167                                         cl.parsingtextexpectingpingforscores = expected;
3168                                         return !expected;
3169                                 }
3170                                 else
3171                                         Con_DPrintf("player names '%s' and '%s' didn't match\n", cl.scores[cl.parsingtextplayerindex].name, t);
3172                         }
3173                 }
3174         }
3175         if (cl.parsingtextmode == CL_PARSETEXTMODE_STATUS)
3176         {
3177                 if (!strncmp(text, "players: ", 9))
3178                 {
3179                         cl.parsingtextmode = CL_PARSETEXTMODE_STATUS_PLAYERID;
3180                         cl.parsingtextplayerindex = 0;
3181                         return true;
3182                 }
3183                 else if (!strstr(text, ": "))
3184                 {
3185                         cl.parsingtextmode = CL_PARSETEXTMODE_NONE; // status report ended
3186                         return true;
3187                 }
3188         }
3189         if (cl.parsingtextmode == CL_PARSETEXTMODE_STATUS_PLAYERID)
3190         {
3191                 // if anything goes wrong, we'll assume this is not a status report
3192                 cl.parsingtextmode = CL_PARSETEXTMODE_NONE;
3193                 if (text[0] == '#' && text[1] >= '0' && text[1] <= '9')
3194                 {
3195                         t = text + 1;
3196                         cl.parsingtextplayerindex = atoi(t) - 1;
3197                         while (*t >= '0' && *t <= '9')
3198                                 t++;
3199                         if (*t == ' ')
3200                         {
3201                                 cl.parsingtextmode = CL_PARSETEXTMODE_STATUS_PLAYERIP;
3202                                 return true;
3203                         }
3204                         // the player name follows here, along with frags and time
3205                 }
3206         }
3207         if (cl.parsingtextmode == CL_PARSETEXTMODE_STATUS_PLAYERIP)
3208         {
3209                 // if anything goes wrong, we'll assume this is not a status report
3210                 cl.parsingtextmode = CL_PARSETEXTMODE_NONE;
3211                 if (text[0] == ' ')
3212                 {
3213                         t = text;
3214                         while (*t == ' ')
3215                                 t++;
3216                         for (len = 0;*t && *t != '\n';t++)
3217                                 if (len < (int)sizeof(temp) - 1)
3218                                         temp[len++] = *t;
3219                         temp[len] = 0;
3220                         // botclient is perfectly valid, but we don't care about bots
3221                         // also don't try to look up the name of an invalid player index
3222                         if (strcmp(temp, "botclient")
3223                          && cl.parsingtextplayerindex >= 0
3224                          && cl.parsingtextplayerindex < cl.maxclients
3225                          && cl.scores[cl.parsingtextplayerindex].name[0])
3226                         {
3227                                 // log the player name and IP address string
3228                                 // (this operates entirely on strings to avoid issues with the
3229                                 //  nature of a network address)
3230                                 CL_IPLog_Add(temp, cl.scores[cl.parsingtextplayerindex].name, true, true);
3231                         }
3232                         cl.parsingtextmode = CL_PARSETEXTMODE_STATUS_PLAYERID;
3233                         return true;
3234                 }
3235         }
3236         return true;
3237 }
3238
3239 extern cvar_t slowmo;
3240 extern cvar_t cl_lerpexcess;
3241 static void CL_NetworkTimeReceived(double newtime)
3242 {
3243         double timehigh;
3244         cl.mtime[1] = cl.mtime[0];
3245         cl.mtime[0] = newtime;
3246         if (cl_nolerp.integer || cls.timedemo || (cl.islocalgame && !sv_fixedframeratesingleplayer.integer) || cl.mtime[1] == cl.mtime[0] || cls.signon < SIGNONS)
3247                 cl.time = cl.mtime[1] = newtime;
3248         else if (cls.demoplayback)
3249         {
3250                 // when time falls behind during demo playback it means the cl.mtime[1] was altered
3251                 // due to a large time gap, so treat it as an instant change in time
3252                 // (this can also happen during heavy packet loss in the demo)
3253                 if (cl.time < newtime - 0.1)
3254                         cl.mtime[1] = cl.time = newtime;
3255         }
3256         else if (cls.protocol != PROTOCOL_QUAKEWORLD)
3257         {
3258                 cl.mtime[1] = max(cl.mtime[1], cl.mtime[0] - 0.1);
3259                 if (developer_extra.integer && vid_activewindow)
3260                 {
3261                         if (cl.time < cl.mtime[1] - (cl.mtime[0] - cl.mtime[1]))
3262                                 Con_DPrintf("--- cl.time < cl.mtime[1] (%f < %f ... %f)\n", cl.time, cl.mtime[1], cl.mtime[0]);
3263                         else if (cl.time > cl.mtime[0] + (cl.mtime[0] - cl.mtime[1]))
3264                                 Con_DPrintf("--- cl.time > cl.mtime[0] (%f > %f ... %f)\n", cl.time, cl.mtime[1], cl.mtime[0]);
3265                 }
3266                 cl.time += (cl.mtime[1] - cl.time) * bound(0, cl_nettimesyncfactor.value, 1);
3267                 timehigh = cl.mtime[1] + (cl.mtime[0] - cl.mtime[1]) * cl_nettimesyncboundtolerance.value;
3268                 if (cl_nettimesyncboundmode.integer == 1)
3269                         cl.time = bound(cl.mtime[1], cl.time, cl.mtime[0]);
3270                 else if (cl_nettimesyncboundmode.integer == 2)
3271                 {
3272                         if (cl.time < cl.mtime[1] || cl.time > timehigh)
3273                                 cl.time = cl.mtime[1];
3274                 }
3275                 else if (cl_nettimesyncboundmode.integer == 3)
3276                 {
3277                         if ((cl.time < cl.mtime[1] && cl.oldtime < cl.mtime[1]) || (cl.time > timehigh && cl.oldtime > timehigh))
3278                                 cl.time = cl.mtime[1];
3279                 }
3280                 else if (cl_nettimesyncboundmode.integer == 4)
3281                 {
3282                         if (fabs(cl.time - cl.mtime[1]) > 0.5)
3283                                 cl.time = cl.mtime[1]; // reset
3284                         else if (fabs(cl.time - cl.mtime[1]) > 0.1)
3285                                 cl.time += 0.5 * (cl.mtime[1] - cl.time); // fast
3286                         else if (cl.time > cl.mtime[1])
3287                                 cl.time -= 0.002 * cl.movevars_timescale; // fall into the past by 2ms
3288                         else
3289                                 cl.time += 0.001 * cl.movevars_timescale; // creep forward 1ms
3290                 }
3291                 else if (cl_nettimesyncboundmode.integer == 5)
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
3298                                 cl.time = bound(cl.time - 0.002 * cl.movevars_timescale, cl.mtime[1], cl.time + 0.001 * cl.movevars_timescale);
3299                 }
3300                 else if (cl_nettimesyncboundmode.integer == 6)
3301                 {
3302                         cl.time = bound(cl.mtime[1], cl.time, cl.mtime[0]);
3303                         cl.time = bound(cl.time - 0.002 * cl.movevars_timescale, cl.mtime[1], cl.time + 0.001 * cl.movevars_timescale);
3304                 }
3305         }
3306         // this packet probably contains a player entity update, so we will need
3307         // to update the prediction
3308         cl.movement_replay = true;
3309         // this may get updated later in parsing by svc_clientdata
3310         cl.onground = false;
3311         // if true the cl.viewangles are interpolated from cl.mviewangles[]
3312         // during this frame
3313         // (makes spectating players much smoother and prevents mouse movement from turning)
3314         cl.fixangle[1] = cl.fixangle[0];
3315         cl.fixangle[0] = false;
3316         if (!cls.demoplayback)
3317                 VectorCopy(cl.mviewangles[0], cl.mviewangles[1]);
3318         // update the csqc's server timestamps, critical for proper sync
3319         CSQC_UpdateNetworkTimes(cl.mtime[0], cl.mtime[1]);
3320
3321         if (cl.mtime[0] > cl.mtime[1])
3322                 World_Physics_Frame(&cl.world, cl.mtime[0] - cl.mtime[1], cl.movevars_gravity);
3323
3324         // only lerp entities that also get an update in this frame, when lerp excess is used
3325         if(cl_lerpexcess.value > 0)
3326         {
3327                 int i;
3328                 for (i = 1;i < cl.num_entities;i++)
3329                 {
3330                         if (cl.entities_active[i])
3331                         {
3332                                 entity_t *ent = cl.entities + i;
3333                                 ent->persistent.lerpdeltatime = 0;
3334                         }
3335                 }
3336         }
3337 }
3338
3339 #define SHOWNET(x) if(cl_shownet.integer==2)Con_Printf("%3i:%s(%i)\n", cl_message.readcount-1, x, cmd);
3340
3341 /*
3342 =====================
3343 CL_ParseServerMessage
3344 =====================
3345 */
3346 int parsingerror = false;
3347 void CL_ParseServerMessage(void)
3348 {
3349         int                     cmd;
3350         int                     i;
3351         protocolversion_t protocol;
3352         unsigned char           cmdlog[32];
3353         const char              *cmdlogname[32], *temp;
3354         int                     cmdindex, cmdcount = 0;
3355         qboolean        qwplayerupdatereceived;
3356         qboolean        strip_pqc;
3357         char vabuf[1024];
3358
3359         // LordHavoc: moved demo message writing from before the packet parse to
3360         // after the packet parse so that CL_Stop_f can be called by cl_autodemo
3361         // code in CL_ParseServerinfo
3362         //if (cls.demorecording)
3363         //      CL_WriteDemoMessage (&cl_message);
3364
3365         cl.last_received_message = realtime;
3366
3367         CL_KeepaliveMessage(false);
3368
3369 //
3370 // if recording demos, copy the message out
3371 //
3372         if (cl_shownet.integer == 1)
3373                 Con_Printf("%f %i\n", realtime, cl_message.cursize);
3374         else if (cl_shownet.integer == 2)
3375                 Con_Print("------------------\n");
3376
3377 //
3378 // parse the message
3379 //
3380         //MSG_BeginReading ();
3381
3382         parsingerror = true;
3383
3384         if (cls.protocol == PROTOCOL_QUAKEWORLD)
3385         {
3386                 CL_NetworkTimeReceived(realtime); // qw has no clock
3387
3388                 // kill all qw nails
3389                 cl.qw_num_nails = 0;
3390
3391                 // fade weapon view kick
3392                 cl.qw_weaponkick = min(cl.qw_weaponkick + 10 * bound(0, cl.time - cl.oldtime, 0.1), 0);
3393
3394                 cls.servermovesequence = cls.netcon->qw.incoming_sequence;
3395
3396                 qwplayerupdatereceived = false;
3397
3398                 while (1)
3399                 {
3400                         if (cl_message.badread)
3401                                 Host_Error ("CL_ParseServerMessage: Bad QW server message");
3402
3403                         cmd = MSG_ReadByte(&cl_message);
3404
3405                         if (cmd == -1)
3406                         {
3407                                 SHOWNET("END OF MESSAGE");
3408                                 break;          // end of message
3409                         }
3410
3411                         cmdindex = cmdcount & 31;
3412                         cmdcount++;
3413                         cmdlog[cmdindex] = cmd;
3414
3415                         SHOWNET(qw_svc_strings[cmd]);
3416                         cmdlogname[cmdindex] = qw_svc_strings[cmd];
3417                         if (!cmdlogname[cmdindex])
3418                         {
3419                                 // 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)
3420                                 temp = "<unknown>";
3421                                 cmdlogname[cmdindex] = temp;
3422                         }
3423
3424                         // other commands
3425                         switch (cmd)
3426                         {
3427                         default:
3428                                 {
3429                                         char description[32*64], temp[64];
3430                                         int count;
3431                                         strlcpy(description, "packet dump: ", sizeof(description));
3432                                         i = cmdcount - 32;
3433                                         if (i < 0)
3434                                                 i = 0;
3435                   &nb