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