move dynamic lights up 30 units for the client player when firstperson (so the gun...
[xonotic/darkplaces.git] / cl_main.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_main.c  -- client main loop
21
22 #include "quakedef.h"
23
24 // we need to declare some mouse variables here, because the menu system
25 // references them even when on a unix system.
26
27 // these two are not intended to be set directly
28 cvar_t  cl_name = {"_cl_name", "player", true};
29 cvar_t  cl_color = {"_cl_color", "0", true};
30 cvar_t  cl_pmodel = {"_cl_pmodel", "0", true};
31
32 cvar_t  cl_shownet = {"cl_shownet","0"};        // can be 0, 1, or 2
33 cvar_t  cl_nolerp = {"cl_nolerp","0"};
34
35 cvar_t  lookspring = {"lookspring","0", true};
36 cvar_t  lookstrafe = {"lookstrafe","0", true};
37 cvar_t  sensitivity = {"sensitivity","3", true};
38
39 cvar_t  m_pitch = {"m_pitch","0.022", true};
40 cvar_t  m_yaw = {"m_yaw","0.022", true};
41 cvar_t  m_forward = {"m_forward","1", true};
42 cvar_t  m_side = {"m_side","0.8", true};
43
44 cvar_t freelook = {"freelook", "1", true};
45
46 client_static_t cls;
47 client_state_t  cl;
48 // FIXME: put these on hunk?
49 entity_t                cl_entities[MAX_EDICTS];
50 entity_t                cl_static_entities[MAX_STATIC_ENTITIES];
51 lightstyle_t    cl_lightstyle[MAX_LIGHTSTYLES];
52 dlight_t                cl_dlights[MAX_DLIGHTS];
53
54 int                             cl_numvisedicts;
55 entity_t                *cl_visedicts[MAX_VISEDICTS];
56
57 /*
58 =====================
59 CL_ClearState
60
61 =====================
62 */
63 void CL_ClearState (void)
64 {
65         int                     i;
66
67         if (!sv.active)
68                 Host_ClearMemory ();
69
70 // wipe the entire cl structure
71         memset (&cl, 0, sizeof(cl));
72
73         SZ_Clear (&cls.message);
74
75 // clear other arrays   
76         memset (cl_entities, 0, sizeof(cl_entities));
77         memset (cl_dlights, 0, sizeof(cl_dlights));
78         memset (cl_lightstyle, 0, sizeof(cl_lightstyle));
79         memset (cl_temp_entities, 0, sizeof(cl_temp_entities));
80         memset (cl_beams, 0, sizeof(cl_beams));
81         // LordHavoc: have to set up the baseline info for alpha and other stuff
82         for (i = 0;i < MAX_EDICTS;i++)
83         {
84                 ClearStateToDefault(&cl_entities[i].state_baseline);
85                 ClearStateToDefault(&cl_entities[i].state_previous);
86                 ClearStateToDefault(&cl_entities[i].state_current);
87         }
88 }
89
90 /*
91 =====================
92 CL_Disconnect
93
94 Sends a disconnect message to the server
95 This is also called on Host_Error, so it shouldn't cause any errors
96 =====================
97 */
98 void CL_Disconnect (void)
99 {
100 // stop sounds (especially looping!)
101         S_StopAllSounds (true);
102
103         // clear contents blends
104         cl.cshifts[0].percent = 0;
105         cl.cshifts[1].percent = 0;
106         cl.cshifts[2].percent = 0;
107         cl.cshifts[3].percent = 0;
108
109 // if running a local server, shut it down
110         if (cls.demoplayback)
111                 CL_StopPlayback ();
112         else if (cls.state == ca_connected)
113         {
114                 if (cls.demorecording)
115                         CL_Stop_f ();
116
117                 Con_DPrintf ("Sending clc_disconnect\n");
118                 SZ_Clear (&cls.message);
119                 MSG_WriteByte (&cls.message, clc_disconnect);
120                 NET_SendUnreliableMessage (cls.netcon, &cls.message);
121                 SZ_Clear (&cls.message);
122                 NET_Close (cls.netcon);
123
124                 cls.state = ca_disconnected;
125                 if (sv.active)
126                         Host_ShutdownServer(false);
127         }
128
129         cls.demoplayback = cls.timedemo = false;
130         cls.signon = 0;
131 }
132
133 void CL_Disconnect_f (void)
134 {
135         CL_Disconnect ();
136         if (sv.active)
137                 Host_ShutdownServer (false);
138 }
139
140
141
142
143 /*
144 =====================
145 CL_EstablishConnection
146
147 Host should be either "local" or a net address to be passed on
148 =====================
149 */
150 void CL_EstablishConnection (char *host)
151 {
152         if (cls.state == ca_dedicated)
153                 return;
154
155         if (cls.demoplayback)
156                 return;
157
158         CL_Disconnect ();
159
160         cls.netcon = NET_Connect (host);
161         if (!cls.netcon)
162                 Host_Error ("CL_Connect: connect failed\n");
163         Con_DPrintf ("CL_EstablishConnection: connected to %s\n", host);
164         
165         cls.demonum = -1;                       // not in the demo loop now
166         cls.state = ca_connected;
167         cls.signon = 0;                         // need all the signon messages before playing
168 }
169
170 /*
171 =====================
172 CL_SignonReply
173
174 An svc_signonnum has been received, perform a client side setup
175 =====================
176 */
177 void CL_SignonReply (void)
178 {
179         char    str[8192];
180
181 Con_DPrintf ("CL_SignonReply: %i\n", cls.signon);
182
183         switch (cls.signon)
184         {
185         case 1:
186                 MSG_WriteByte (&cls.message, clc_stringcmd);
187                 MSG_WriteString (&cls.message, "prespawn");
188                 break;
189                 
190         case 2:
191                 MSG_WriteByte (&cls.message, clc_stringcmd);
192                 MSG_WriteString (&cls.message, va("name \"%s\"\n", cl_name.string));
193
194                 MSG_WriteByte (&cls.message, clc_stringcmd);
195                 MSG_WriteString (&cls.message, va("color %i %i\n", ((int)cl_color.value)>>4, ((int)cl_color.value)&15));
196         
197                 if (cl_pmodel.value)
198                 {
199                         MSG_WriteByte (&cls.message, clc_stringcmd);
200                         MSG_WriteString (&cls.message, va("pmodel %f\n", cl_pmodel.value));
201                 }
202
203                 MSG_WriteByte (&cls.message, clc_stringcmd);
204                 sprintf (str, "spawn %s", cls.spawnparms);
205                 MSG_WriteString (&cls.message, str);
206                 break;
207                 
208         case 3: 
209                 MSG_WriteByte (&cls.message, clc_stringcmd);
210                 MSG_WriteString (&cls.message, "begin");
211                 Cache_Report ();                // print remaining memory
212                 break;
213                 
214         case 4:
215 //              SCR_EndLoadingPlaque ();                // allow normal screen updates
216                 Con_ClearNotify();
217                 break;
218         }
219 }
220
221 /*
222 =====================
223 CL_NextDemo
224
225 Called to play the next demo in the demo loop
226 =====================
227 */
228 void CL_NextDemo (void)
229 {
230         char    str[1024];
231
232         if (cls.demonum == -1)
233                 return;         // don't play demos
234
235 //      SCR_BeginLoadingPlaque ();
236
237         if (!cls.demos[cls.demonum][0] || cls.demonum == MAX_DEMOS)
238         {
239                 cls.demonum = 0;
240                 if (!cls.demos[cls.demonum][0])
241                 {
242                         Con_Printf ("No demos listed with startdemos\n");
243                         cls.demonum = -1;
244                         return;
245                 }
246         }
247
248         sprintf (str,"playdemo %s\n", cls.demos[cls.demonum]);
249         Cbuf_InsertText (str);
250         cls.demonum++;
251 }
252
253 /*
254 ==============
255 CL_PrintEntities_f
256 ==============
257 */
258 void CL_PrintEntities_f (void)
259 {
260         entity_t        *ent;
261         int                     i;
262         
263         for (i = 0, ent = cl_entities;i < MAX_EDICTS /*cl.num_entities*/;i++, ent++)
264         {
265                 Con_Printf ("%3i:", i);
266                 if (!ent->render.model)
267                 {
268                         Con_Printf ("EMPTY\n");
269                         continue;
270                 }
271                 Con_Printf ("%s:%2i  (%5.1f,%5.1f,%5.1f) [%5.1f %5.1f %5.1f]\n", ent->render.model->name, ent->render.frame, ent->render.origin[0], ent->render.origin[1], ent->render.origin[2], ent->render.angles[0], ent->render.angles[1], ent->render.angles[2]);
272         }
273 }
274
275
276 /*
277 ===============
278 CL_AllocDlight
279
280 ===============
281 */
282 void CL_AllocDlight (entity_t *ent, vec3_t org, float radius, float red, float green, float blue, float decay, float lifetime)
283 {
284         int             i;
285         dlight_t        *dl;
286
287 // first look for an exact key match
288         if (ent)
289         {
290                 dl = cl_dlights;
291                 for (i = 0;i < MAX_DLIGHTS;i++, dl++)
292                         if (dl->ent == ent)
293                                 goto dlightsetup;
294         }
295
296 // then look for anything else
297         dl = cl_dlights;
298         for (i = 0;i < MAX_DLIGHTS;i++, dl++)
299                 if (!dl->radius)
300                         goto dlightsetup;
301
302         // unable to find one
303         return;
304
305 dlightsetup:
306         memset (dl, 0, sizeof(*dl));
307         dl->ent = ent;
308         VectorCopy(org, dl->origin);
309         dl->radius = radius;
310         dl->color[0] = red;
311         dl->color[1] = green;
312         dl->color[2] = blue;
313         dl->decay = decay;
314         dl->die = cl.time + lifetime;
315 }
316
317
318 /*
319 ===============
320 CL_DecayLights
321
322 ===============
323 */
324 void CL_DecayLights (void)
325 {
326         int                     i;
327         dlight_t        *dl;
328         float           time;
329         
330         time = cl.time - cl.oldtime;
331
332         c_dlights = 0;
333         dl = cl_dlights;
334         for (i=0 ; i<MAX_DLIGHTS ; i++, dl++)
335         {
336                 if (!dl->radius)
337                         continue;
338                 if (dl->die < cl.time)
339                 {
340                         dl->radius = 0;
341                         continue;
342                 }
343
344                 c_dlights++; // count every dlight in use
345
346                 dl->radius -= time*dl->decay;
347                 if (dl->radius < 0)
348                         dl->radius = 0;
349         }
350 }
351
352
353 /*
354 ===============
355 CL_LerpPoint
356
357 Determines the fraction between the last two messages that the objects
358 should be put at.
359 ===============
360 */
361 float   CL_LerpPoint (void)
362 {
363         float   f, frac;
364
365         f = cl.mtime[0] - cl.mtime[1];
366
367         // LordHavoc: lerp in listen games as the server is being capped below the client (usually)
368         if (!f || cl_nolerp.value || cls.timedemo || (sv.active && svs.maxclients == 1))
369         {
370                 cl.time = cl.mtime[0];
371                 return 1;
372         }
373                 
374         if (f > 0.1)
375         {       // dropped packet, or start of demo
376                 cl.mtime[1] = cl.mtime[0] - 0.1;
377                 f = 0.1;
378         }
379         frac = (cl.time - cl.mtime[1]) / f;
380 //      Con_Printf ("frac: %f\n",frac);
381         if (frac < 0)
382         {
383                 if (frac < -0.01)
384                 {
385                         cl.time = cl.mtime[1];
386 //                      Con_Printf ("low frac\n");
387                 }
388                 frac = 0;
389         }
390         else if (frac > 1)
391         {
392                 if (frac > 1.01)
393                 {
394                         cl.time = cl.mtime[0];
395 //                      Con_Printf ("high frac\n");
396                 }
397                 frac = 1;
398         }
399                 
400         return frac;
401 }
402
403 float CL_EntityLerpPoint (entity_t *ent)
404 {
405         float   f;
406
407         if (cl_nolerp.value || cls.timedemo || (sv.active && svs.maxclients == 1))
408                 return 1;
409
410         f = ent->state_current.time - ent->state_previous.time;
411 //      Con_Printf(" %g-%g=%g", ent->state_current.time, ent->state_previous.time, f);
412
413         if (f <= 0)
414                 return 1;
415         if (f >= 0.1)
416                 f = 0.1;
417
418 //      Con_Printf(" %g-%g/%g=%f", cl.time, ent->state_previous.time, f, (cl.time - ent->state_previous.time) / f);
419         f = (cl.time - ent->state_previous.time) / f;
420         return bound(0, f, 1);
421 }
422
423 void CL_RelinkStaticEntities(void)
424 {
425         entity_t *ent, *endent;
426         if (cl.num_statics > MAX_VISEDICTS)
427                 Host_Error("CL_RelinkStaticEntities: cl.num_statics > MAX_VISEDICTS??\n");
428
429         ent = cl_static_entities;
430         endent = ent + cl.num_statics;
431         for (;ent < endent;ent++)
432                 cl_visedicts[cl_numvisedicts++] = ent;
433 }
434
435 /*
436 ===============
437 CL_RelinkEntities
438 ===============
439 */
440 void R_RocketTrail2 (vec3_t start, vec3_t end, int color, entity_t *ent);
441 void CL_RelinkEntities (void)
442 {
443         entity_t        *ent;
444         int                     i, j, glowcolor, effects;
445         float           frac, f, d, bobjrotate/*, bobjoffset*/, dlightradius, glowsize;
446         vec3_t          oldorg, delta, dlightcolor;
447
448 // determine partial update time        
449         frac = CL_LerpPoint ();
450
451         cl_numvisedicts = 0;
452
453         CL_RelinkStaticEntities();
454
455 //
456 // interpolate player info
457 //
458         for (i = 0;i < 3;i++)
459                 cl.velocity[i] = cl.mvelocity[1][i] + frac * (cl.mvelocity[0][i] - cl.mvelocity[1][i]);
460
461         if (cls.demoplayback)
462         {
463         // interpolate the angles       
464                 for (j = 0;j < 3;j++)
465                 {
466                         d = cl.mviewangles[0][j] - cl.mviewangles[1][j];
467                         if (d > 180)
468                                 d -= 360;
469                         else if (d < -180)
470                                 d += 360;
471                         cl.viewangles[j] = cl.mviewangles[1][j] + frac*d;
472                 }
473         }
474         
475         bobjrotate = ANGLEMOD(100*cl.time);
476 //      bobjoffset = cos(180 * cl.time * M_PI / 180) * 4.0f + 4.0f;
477         
478 // start on the entity after the world
479         for (i = 1, ent = cl_entities + 1;i < MAX_EDICTS /*cl.num_entities*/;i++, ent++)
480         {
481                 // if the object wasn't included in the latest packet, remove it
482                 if (!ent->state_current.active)
483                         continue;
484
485                 VectorCopy (ent->render.origin, oldorg);
486
487                 if (!ent->state_previous.active)
488                 {
489                         // only one state available
490                         VectorCopy (ent->state_current.origin, ent->render.origin);
491                         VectorCopy (ent->state_current.angles, ent->render.angles);
492 //                      Con_Printf(" %i", i);
493                 }
494                 else
495                 {
496                         // if the delta is large, assume a teleport and don't lerp
497                         f = CL_EntityLerpPoint(ent);
498                         if (f < 1)
499                         {
500                                 for (j = 0;j < 3;j++)
501                                 {
502                                         delta[j] = ent->state_current.origin[j] - ent->state_previous.origin[j];
503                                         // LordHavoc: increased lerp tolerance from 100 to 200
504                                         if (delta[j] > 200 || delta[j] < -200)
505                                                 f = 1;
506                                 }
507                         }
508                         if (f >= 1)
509                         {
510                                 // no interpolation
511                                 VectorCopy (ent->state_current.origin, ent->render.origin);
512                                 VectorCopy (ent->state_current.angles, ent->render.angles);
513                         }
514                         else
515                         {
516                                 // interpolate the origin and angles
517                                 for (j = 0;j < 3;j++)
518                                 {
519                                         ent->render.origin[j] = ent->state_previous.origin[j] + f*delta[j];
520
521                                         d = ent->state_current.angles[j] - ent->state_previous.angles[j];
522                                         if (d > 180)
523                                                 d -= 360;
524                                         else if (d < -180)
525                                                 d += 360;
526                                         ent->render.angles[j] = ent->state_previous.angles[j] + f*d;
527                                 }
528                         }
529                 }
530
531                 ent->render.flags = ent->state_current.flags;
532                 ent->render.effects = effects = ent->state_current.effects;
533                 ent->render.model = cl.model_precache[ent->state_current.modelindex];
534                 ent->render.frame = ent->state_current.frame;
535                 if (cl.scores == NULL || !ent->state_current.colormap)
536                         ent->render.colormap = -1; // no special coloring
537                 else
538                         ent->render.colormap = cl.scores[ent->state_current.colormap - 1].colors; // color it
539                 ent->render.skinnum = ent->state_current.skin;
540                 ent->render.alpha = ent->state_current.alpha * (1.0f / 255.0f); // FIXME: interpolate?
541                 ent->render.scale = ent->state_current.scale * (1.0f / 16.0f); // FIXME: interpolate?
542                 glowsize = ent->state_current.glowsize * 4.0f; // FIXME: interpolate?
543                 glowcolor = ent->state_current.glowcolor;
544                 ent->render.colormod[0] = (float) ((ent->state_current.colormod >> 5) & 7) * (1.0f / 7.0f);
545                 ent->render.colormod[1] = (float) ((ent->state_current.colormod >> 2) & 7) * (1.0f / 7.0f);
546                 ent->render.colormod[2] = (float) (ent->state_current.colormod & 3) * (1.0f / 3.0f);
547
548                 dlightradius = 0;
549                 dlightcolor[0] = 0;
550                 dlightcolor[1] = 0;
551                 dlightcolor[2] = 0;
552
553                 // LordHavoc: if the entity has no effects, don't check each
554                 if (effects)
555                 {
556                         if (effects & EF_BRIGHTFIELD)
557                                 R_EntityParticles (ent);
558                         if (effects & EF_MUZZLEFLASH)
559                         {
560                                 vec3_t v;
561
562                                 AngleVectors (ent->render.angles, v, NULL, NULL);
563
564                                 v[0] = v[0] * 18 + ent->render.origin[0];
565                                 v[1] = v[1] * 18 + ent->render.origin[1];
566                                 v[2] = v[2] * 18 + ent->render.origin[2] + 16;
567
568                                 CL_AllocDlight (NULL, v, 100, 1, 1, 1, 0, 0.1);
569                         }
570                         if (effects & EF_DIMLIGHT)
571                         {
572                                 dlightcolor[0] += 200.0f;
573                                 dlightcolor[1] += 200.0f;
574                                 dlightcolor[2] += 200.0f;
575                         }
576                         if (effects & EF_BRIGHTLIGHT)
577                         {
578                                 dlightcolor[0] += 400.0f;
579                                 dlightcolor[1] += 400.0f;
580                                 dlightcolor[2] += 400.0f;
581                         }
582                         // LordHavoc: added EF_RED and EF_BLUE
583                         if (effects & EF_RED) // red
584                         {
585                                 dlightcolor[0] += 200.0f;
586                                 dlightcolor[1] +=  20.0f;
587                                 dlightcolor[2] +=  20.0f;
588                         }
589                         if (effects & EF_BLUE) // blue
590                         {
591                                 dlightcolor[0] +=  20.0f;
592                                 dlightcolor[1] +=  20.0f;
593                                 dlightcolor[2] += 200.0f;
594                         }
595                         else if (effects & EF_FLAME)
596                         {
597                                 if (ent->render.model)
598                                 {
599                                         vec3_t mins, maxs;
600                                         int temp;
601                                         VectorAdd(ent->render.origin, ent->render.model->mins, mins);
602                                         VectorAdd(ent->render.origin, ent->render.model->maxs, maxs);
603                                         // how many flames to make
604                                         temp = (int) (cl.time * 300) - (int) (cl.oldtime * 300);
605                                         R_FlameCube(mins, maxs, temp);
606                                 }
607                                 d = lhrandom(200, 250);
608                                 dlightcolor[0] += d * 1.0f;
609                                 dlightcolor[1] += d * 0.7f;
610                                 dlightcolor[2] += d * 0.3f;
611                         }
612                 }
613
614                 // LordHavoc: if the model has no flags, don't check each
615                 if (ent->render.model && ent->render.model->flags)
616                 {
617                         if (ent->render.model->flags & EF_ROTATE)
618                         {
619                                 ent->render.angles[1] = bobjrotate;
620 //                              ent->render.origin[2] += bobjoffset;
621                         }
622                         // only do trails if present in the previous frame as well
623                         if (ent->state_previous.active)
624                         {
625                                 if (ent->render.model->flags & EF_GIB)
626                                         R_RocketTrail (oldorg, ent->render.origin, 2, ent);
627                                 else if (ent->render.model->flags & EF_ZOMGIB)
628                                         R_RocketTrail (oldorg, ent->render.origin, 4, ent);
629                                 else if (ent->render.model->flags & EF_TRACER)
630                                         R_RocketTrail (oldorg, ent->render.origin, 3, ent);
631                                 else if (ent->render.model->flags & EF_TRACER2)
632                                         R_RocketTrail (oldorg, ent->render.origin, 5, ent);
633                                 else if (ent->render.model->flags & EF_ROCKET)
634                                 {
635                                         R_RocketTrail (oldorg, ent->render.origin, 0, ent);
636                                         dlightcolor[0] += 200.0f;
637                                         dlightcolor[1] += 160.0f;
638                                         dlightcolor[2] +=  80.0f;
639                                 }
640                                 else if (ent->render.model->flags & EF_GRENADE)
641                                 {
642                                         if (ent->render.alpha == -1) // LordHavoc: Nehahra dem compatibility
643                                                 R_RocketTrail (oldorg, ent->render.origin, 7, ent);
644                                         else
645                                                 R_RocketTrail (oldorg, ent->render.origin, 1, ent);
646                                 }
647                                 else if (ent->render.model->flags & EF_TRACER3)
648                                         R_RocketTrail (oldorg, ent->render.origin, 6, ent);
649                         }
650                 }
651                 // LordHavoc: customizable glow
652                 if (glowsize)
653                 {
654                         byte *tempcolor = (byte *)&d_8to24table[glowcolor];
655                         dlightcolor[0] += glowsize * tempcolor[0] * (1.0f / 255.0f);
656                         dlightcolor[1] += glowsize * tempcolor[1] * (1.0f / 255.0f);
657                         dlightcolor[2] += glowsize * tempcolor[2] * (1.0f / 255.0f);
658                 }
659                 // LordHavoc: customizable trail
660                 if (ent->render.flags & RENDER_GLOWTRAIL)
661                         R_RocketTrail2 (oldorg, ent->render.origin, glowcolor, ent);
662
663                 if (dlightcolor[0] || dlightcolor[1] || dlightcolor[2])
664                 {
665                         vec3_t vec;
666                         dlightradius = VectorLength(dlightcolor);
667                         d = 1.0f / dlightradius;
668                         VectorCopy(ent->render.origin, vec);
669                         if (i == cl.viewentity && !chase_active.value)
670                                 vec[2] += 30;
671                         CL_AllocDlight (ent, vec, dlightradius, dlightcolor[0] * d, dlightcolor[1] * d, dlightcolor[2] * d, 0, 0);
672                 }
673
674                 if (chase_active.value)
675                 {
676                         if (ent->render.flags & RENDER_VIEWMODEL)
677                                 continue;
678                 }
679                 else
680                 {
681                         if (i == cl.viewentity || (ent->render.flags & RENDER_EXTERIORMODEL))
682                                 continue;
683                 }
684
685                 if (ent->render.model == NULL)
686                         continue;
687                 if (effects & EF_NODRAW)
688                         continue;
689                 if (cl_numvisedicts < MAX_VISEDICTS)
690                         cl_visedicts[cl_numvisedicts++] = ent;
691         }
692 //      Con_Printf("\n");
693 }
694
695
696 /*
697 ===============
698 CL_ReadFromServer
699
700 Read all incoming data from the server
701 ===============
702 */
703 int CL_ReadFromServer (void)
704 {
705         int ret, netshown;
706
707         cl.oldtime = cl.time;
708         cl.time += cl.frametime;
709         
710         netshown = false;
711         do
712         {
713                 ret = CL_GetMessage ();
714                 if (ret == -1)
715                         Host_Error ("CL_ReadFromServer: lost server connection");
716                 if (!ret)
717                         break;
718                 
719                 cl.last_received_message = realtime;
720
721                 if (cl_shownet.value)
722                         netshown = true;
723
724                 CL_ParseServerMessage ();
725         }
726         while (ret && cls.state == ca_connected);
727         
728         if (netshown)
729                 Con_Printf ("\n");
730
731         CL_RelinkEntities ();
732         CL_UpdateTEnts ();
733         CL_DoEffects ();
734
735 //
736 // bring the links up to date
737 //
738         return 0;
739 }
740
741 /*
742 =================
743 CL_SendCmd
744 =================
745 */
746 void CL_SendCmd (void)
747 {
748         usercmd_t               cmd;
749
750         if (cls.state != ca_connected)
751                 return;
752
753         if (cls.signon == SIGNONS)
754         {
755         // get basic movement from keyboard
756                 CL_BaseMove (&cmd);
757         
758         // allow mice or other external controllers to add to the move
759                 IN_Move (&cmd);
760         
761         // send the unreliable message
762                 CL_SendMove (&cmd);
763         }
764
765         if (cls.demoplayback)
766         {
767                 SZ_Clear (&cls.message);
768                 return;
769         }
770         
771 // send the reliable message
772         if (!cls.message.cursize)
773                 return;         // no message at all
774         
775         if (!NET_CanSendMessage (cls.netcon))
776         {
777                 Con_DPrintf ("CL_WriteToServer: can't send\n");
778                 return;
779         }
780
781         if (NET_SendMessage (cls.netcon, &cls.message) == -1)
782                 Host_Error ("CL_WriteToServer: lost server connection");
783
784         SZ_Clear (&cls.message);
785 }
786
787 // LordHavoc: pausedemo command
788 void CL_PauseDemo_f (void)
789 {
790         cls.demopaused = !cls.demopaused;
791         if (cls.demopaused)
792                 Con_Printf("Demo paused\n");
793         else
794                 Con_Printf("Demo unpaused\n");
795 }
796
797 /*
798 ======================
799 CL_PModel_f
800 LordHavoc: Intended for Nehahra, I personally think this is dumb, but Mindcrime won't listen.
801 ======================
802 */
803 void CL_PModel_f (void)
804 {
805         int i;
806         eval_t *val;
807
808         if (Cmd_Argc () == 1)
809         {
810                 Con_Printf ("\"pmodel\" is \"%s\"\n", cl_pmodel.string);
811                 return;
812         }
813         i = atoi(Cmd_Argv(1));
814
815         if (cmd_source == src_command)
816         {
817                 if (cl_pmodel.value == i)
818                         return;
819                 Cvar_SetValue ("_cl_pmodel", i);
820                 if (cls.state == ca_connected)
821                         Cmd_ForwardToServer ();
822                 return;
823         }
824
825         host_client->pmodel = i;
826         if ((val = GETEDICTFIELDVALUE(host_client->edict, eval_pmodel)))
827                 val->_float = i;
828 }
829
830 /*
831 ======================
832 CL_Fog_f
833 ======================
834 */
835 void CL_Fog_f (void)
836 {
837         if (Cmd_Argc () == 1)
838         {
839                 Con_Printf ("\"fog\" is \"%f %f %f %f\"\n", fog_density, fog_red, fog_green, fog_blue);
840                 return;
841         }
842         fog_density = atof(Cmd_Argv(1));
843         fog_red = atof(Cmd_Argv(2));
844         fog_green = atof(Cmd_Argv(3));
845         fog_blue = atof(Cmd_Argv(4));
846 }
847
848 /*
849 =================
850 CL_Init
851 =================
852 */
853 void CL_Init (void)
854 {       
855         SZ_Alloc (&cls.message, 1024);
856
857         CL_InitInput ();
858         CL_InitTEnts ();
859         
860 //
861 // register our commands
862 //
863         Cvar_RegisterVariable (&cl_name);
864         Cvar_RegisterVariable (&cl_color);
865         Cvar_RegisterVariable (&cl_pmodel);
866         Cvar_RegisterVariable (&cl_upspeed);
867         Cvar_RegisterVariable (&cl_forwardspeed);
868         Cvar_RegisterVariable (&cl_backspeed);
869         Cvar_RegisterVariable (&cl_sidespeed);
870         Cvar_RegisterVariable (&cl_movespeedkey);
871         Cvar_RegisterVariable (&cl_yawspeed);
872         Cvar_RegisterVariable (&cl_pitchspeed);
873         Cvar_RegisterVariable (&cl_anglespeedkey);
874         Cvar_RegisterVariable (&cl_shownet);
875         Cvar_RegisterVariable (&cl_nolerp);
876         Cvar_RegisterVariable (&lookspring);
877         Cvar_RegisterVariable (&lookstrafe);
878         Cvar_RegisterVariable (&sensitivity);
879         Cvar_RegisterVariable (&freelook);
880
881         Cvar_RegisterVariable (&m_pitch);
882         Cvar_RegisterVariable (&m_yaw);
883         Cvar_RegisterVariable (&m_forward);
884         Cvar_RegisterVariable (&m_side);
885
886 //      Cvar_RegisterVariable (&cl_autofire);
887         
888         Cmd_AddCommand ("entities", CL_PrintEntities_f);
889         Cmd_AddCommand ("bitprofile", CL_BitProfile_f);
890         Cmd_AddCommand ("disconnect", CL_Disconnect_f);
891         Cmd_AddCommand ("record", CL_Record_f);
892         Cmd_AddCommand ("stop", CL_Stop_f);
893         Cmd_AddCommand ("playdemo", CL_PlayDemo_f);
894         Cmd_AddCommand ("timedemo", CL_TimeDemo_f);
895
896         Cmd_AddCommand ("fog", CL_Fog_f);
897
898         // LordHavoc: added pausedemo
899         Cmd_AddCommand ("pausedemo", CL_PauseDemo_f);
900         // LordHavoc: added pmodel command (like name, etc, only intended for Nehahra)
901         Cmd_AddCommand ("pmodel", CL_PModel_f);
902
903         CL_Parse_Init();
904 }
905