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