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