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