"cl_movement_replay 0" to disable the built-in prediction
[divverent/darkplaces.git] / sv_user.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 // sv_user.c -- server code for moving users
21
22 #include "quakedef.h"
23 #include "sv_demo.h"
24 #define DEBUGMOVES 0
25
26 static usercmd_t cmd;
27 extern cvar_t sv_autodemo_perclient;
28
29 /*
30 ===============
31 SV_SetIdealPitch
32 ===============
33 */
34 #define MAX_FORWARD     6
35 void SV_SetIdealPitch (void)
36 {
37         float   angleval, sinval, cosval, step, dir;
38         trace_t tr;
39         vec3_t  top, bottom;
40         float   z[MAX_FORWARD];
41         int             i, j;
42         int             steps;
43
44         if (!((int)host_client->edict->fields.server->flags & FL_ONGROUND))
45                 return;
46
47         angleval = host_client->edict->fields.server->angles[YAW] * M_PI*2 / 360;
48         sinval = sin(angleval);
49         cosval = cos(angleval);
50
51         for (i=0 ; i<MAX_FORWARD ; i++)
52         {
53                 top[0] = host_client->edict->fields.server->origin[0] + cosval*(i+3)*12;
54                 top[1] = host_client->edict->fields.server->origin[1] + sinval*(i+3)*12;
55                 top[2] = host_client->edict->fields.server->origin[2] + host_client->edict->fields.server->view_ofs[2];
56
57                 bottom[0] = top[0];
58                 bottom[1] = top[1];
59                 bottom[2] = top[2] - 160;
60
61                 tr = SV_TraceLine(top, bottom, MOVE_NOMONSTERS, host_client->edict, SUPERCONTENTS_SOLID);
62                 // if looking at a wall, leave ideal the way is was
63                 if (tr.startsolid)
64                         return;
65
66                 // near a dropoff
67                 if (tr.fraction == 1)
68                         return;
69
70                 z[i] = top[2] + tr.fraction*(bottom[2]-top[2]);
71         }
72
73         dir = 0;
74         steps = 0;
75         for (j=1 ; j<i ; j++)
76         {
77                 step = z[j] - z[j-1];
78                 if (step > -ON_EPSILON && step < ON_EPSILON)
79                         continue;
80
81                 // mixed changes
82                 if (dir && ( step-dir > ON_EPSILON || step-dir < -ON_EPSILON ) )
83                         return;
84
85                 steps++;
86                 dir = step;
87         }
88
89         if (!dir)
90         {
91                 host_client->edict->fields.server->idealpitch = 0;
92                 return;
93         }
94
95         if (steps < 2)
96                 return;
97         host_client->edict->fields.server->idealpitch = -dir * sv_idealpitchscale.value;
98 }
99
100 static vec3_t wishdir, forward, right, up;
101 static float wishspeed;
102
103 static qboolean onground;
104
105 /*
106 ==================
107 SV_UserFriction
108
109 ==================
110 */
111 void SV_UserFriction (void)
112 {
113         float speed, newspeed, control, friction;
114         vec3_t start, stop;
115         trace_t trace;
116
117         speed = sqrt(host_client->edict->fields.server->velocity[0]*host_client->edict->fields.server->velocity[0]+host_client->edict->fields.server->velocity[1]*host_client->edict->fields.server->velocity[1]);
118         if (!speed)
119                 return;
120
121         // if the leading edge is over a dropoff, increase friction
122         start[0] = stop[0] = host_client->edict->fields.server->origin[0] + host_client->edict->fields.server->velocity[0]/speed*16;
123         start[1] = stop[1] = host_client->edict->fields.server->origin[1] + host_client->edict->fields.server->velocity[1]/speed*16;
124         start[2] = host_client->edict->fields.server->origin[2] + host_client->edict->fields.server->mins[2];
125         stop[2] = start[2] - 34;
126
127         trace = SV_TraceLine(start, stop, MOVE_NOMONSTERS, host_client->edict, SV_GenericHitSuperContentsMask(host_client->edict));
128
129         if (trace.fraction == 1.0)
130                 friction = sv_friction.value*sv_edgefriction.value;
131         else
132                 friction = sv_friction.value;
133
134         // apply friction
135         control = speed < sv_stopspeed.value ? sv_stopspeed.value : speed;
136         newspeed = speed - sv.frametime*control*friction;
137
138         if (newspeed < 0)
139                 newspeed = 0;
140         else
141                 newspeed /= speed;
142
143         VectorScale(host_client->edict->fields.server->velocity, newspeed, host_client->edict->fields.server->velocity);
144 }
145
146 /*
147 ==============
148 SV_Accelerate
149 ==============
150 */
151 void SV_Accelerate (void)
152 {
153         int i;
154         float addspeed, accelspeed, currentspeed;
155
156         currentspeed = DotProduct (host_client->edict->fields.server->velocity, wishdir);
157         addspeed = wishspeed - currentspeed;
158         if (addspeed <= 0)
159                 return;
160         accelspeed = sv_accelerate.value*sv.frametime*wishspeed;
161         if (accelspeed > addspeed)
162                 accelspeed = addspeed;
163
164         for (i=0 ; i<3 ; i++)
165                 host_client->edict->fields.server->velocity[i] += accelspeed*wishdir[i];
166 }
167
168 extern cvar_t sv_gameplayfix_q2airaccelerate;
169 void SV_AirAccelerate (vec3_t wishveloc)
170 {
171         int i;
172         float addspeed, wishspd, accelspeed, currentspeed;
173
174         wishspd = VectorNormalizeLength (wishveloc);
175         if (wishspd > sv_maxairspeed.value)
176                 wishspd = sv_maxairspeed.value;
177         currentspeed = DotProduct (host_client->edict->fields.server->velocity, wishveloc);
178         addspeed = wishspd - currentspeed;
179         if (addspeed <= 0)
180                 return;
181         accelspeed = (sv_airaccelerate.value < 0 ? sv_accelerate.value : sv_airaccelerate.value)*(sv_gameplayfix_q2airaccelerate.integer ? wishspd : wishspeed) * sv.frametime;
182         if (accelspeed > addspeed)
183                 accelspeed = addspeed;
184
185         for (i=0 ; i<3 ; i++)
186                 host_client->edict->fields.server->velocity[i] += accelspeed*wishveloc[i];
187 }
188
189
190 void DropPunchAngle (void)
191 {
192         float len;
193         prvm_eval_t *val;
194
195         len = VectorNormalizeLength (host_client->edict->fields.server->punchangle);
196
197         len -= 10*sv.frametime;
198         if (len < 0)
199                 len = 0;
200         VectorScale (host_client->edict->fields.server->punchangle, len, host_client->edict->fields.server->punchangle);
201
202         if ((val = PRVM_EDICTFIELDVALUE(host_client->edict, prog->fieldoffsets.punchvector)))
203         {
204                 len = VectorNormalizeLength (val->vector);
205
206                 len -= 20*sv.frametime;
207                 if (len < 0)
208                         len = 0;
209                 VectorScale (val->vector, len, val->vector);
210         }
211 }
212
213 /*
214 ===================
215 SV_FreeMove
216 ===================
217 */
218 void SV_FreeMove (void)
219 {
220         int i;
221         float wishspeed;
222
223         AngleVectors (host_client->edict->fields.server->v_angle, forward, right, up);
224
225         for (i = 0; i < 3; i++)
226                 host_client->edict->fields.server->velocity[i] = forward[i] * cmd.forwardmove + right[i] * cmd.sidemove;
227
228         host_client->edict->fields.server->velocity[2] += cmd.upmove;
229
230         wishspeed = VectorLength(host_client->edict->fields.server->velocity);
231         if (wishspeed > sv_maxspeed.value)
232                 VectorScale(host_client->edict->fields.server->velocity, sv_maxspeed.value / wishspeed, host_client->edict->fields.server->velocity);
233 }
234
235 /*
236 ===================
237 SV_WaterMove
238
239 ===================
240 */
241 void SV_WaterMove (void)
242 {
243         int i;
244         vec3_t wishvel;
245         float speed, newspeed, wishspeed, addspeed, accelspeed, temp;
246
247         // user intentions
248         AngleVectors (host_client->edict->fields.server->v_angle, forward, right, up);
249
250         for (i=0 ; i<3 ; i++)
251                 wishvel[i] = forward[i]*cmd.forwardmove + right[i]*cmd.sidemove;
252
253         if (!cmd.forwardmove && !cmd.sidemove && !cmd.upmove)
254                 wishvel[2] -= 60;               // drift towards bottom
255         else
256                 wishvel[2] += cmd.upmove;
257
258         wishspeed = VectorLength(wishvel);
259         if (wishspeed > sv_maxspeed.value)
260         {
261                 temp = sv_maxspeed.value/wishspeed;
262                 VectorScale (wishvel, temp, wishvel);
263                 wishspeed = sv_maxspeed.value;
264         }
265         wishspeed *= 0.7;
266
267         // water friction
268         speed = VectorLength(host_client->edict->fields.server->velocity);
269         if (speed)
270         {
271                 newspeed = speed - sv.frametime * speed * (sv_waterfriction.value < 0 ? sv_friction.value : sv_waterfriction.value);
272                 if (newspeed < 0)
273                         newspeed = 0;
274                 temp = newspeed/speed;
275                 VectorScale(host_client->edict->fields.server->velocity, temp, host_client->edict->fields.server->velocity);
276         }
277         else
278                 newspeed = 0;
279
280         // water acceleration
281         if (!wishspeed)
282                 return;
283
284         addspeed = wishspeed - newspeed;
285         if (addspeed <= 0)
286                 return;
287
288         VectorNormalize (wishvel);
289         accelspeed = (sv_wateraccelerate.value < 0 ? sv_accelerate.value : sv_wateraccelerate.value) * wishspeed * sv.frametime;
290         if (accelspeed > addspeed)
291                 accelspeed = addspeed;
292
293         for (i=0 ; i<3 ; i++)
294                 host_client->edict->fields.server->velocity[i] += accelspeed * wishvel[i];
295 }
296
297 void SV_WaterJump (void)
298 {
299         if (sv.time > host_client->edict->fields.server->teleport_time || !host_client->edict->fields.server->waterlevel)
300         {
301                 host_client->edict->fields.server->flags = (int)host_client->edict->fields.server->flags & ~FL_WATERJUMP;
302                 host_client->edict->fields.server->teleport_time = 0;
303         }
304         host_client->edict->fields.server->velocity[0] = host_client->edict->fields.server->movedir[0];
305         host_client->edict->fields.server->velocity[1] = host_client->edict->fields.server->movedir[1];
306 }
307
308
309 /*
310 ===================
311 SV_AirMove
312
313 ===================
314 */
315 void SV_AirMove (void)
316 {
317         int i;
318         vec3_t wishvel;
319         float fmove, smove, temp;
320
321         // LordHavoc: correct quake movement speed bug when looking up/down
322         wishvel[0] = wishvel[2] = 0;
323         wishvel[1] = host_client->edict->fields.server->angles[1];
324         AngleVectors (wishvel, forward, right, up);
325
326         fmove = cmd.forwardmove;
327         smove = cmd.sidemove;
328
329 // hack to not let you back into teleporter
330         if (sv.time < host_client->edict->fields.server->teleport_time && fmove < 0)
331                 fmove = 0;
332
333         for (i=0 ; i<3 ; i++)
334                 wishvel[i] = forward[i]*fmove + right[i]*smove;
335
336         if ((int)host_client->edict->fields.server->movetype != MOVETYPE_WALK)
337                 wishvel[2] += cmd.upmove;
338
339         VectorCopy (wishvel, wishdir);
340         wishspeed = VectorNormalizeLength(wishdir);
341         if (wishspeed > sv_maxspeed.value)
342         {
343                 temp = sv_maxspeed.value/wishspeed;
344                 VectorScale (wishvel, temp, wishvel);
345                 wishspeed = sv_maxspeed.value;
346         }
347
348         if (host_client->edict->fields.server->movetype == MOVETYPE_NOCLIP)
349         {
350                 // noclip
351                 VectorCopy (wishvel, host_client->edict->fields.server->velocity);
352         }
353         else if (onground)
354         {
355                 SV_UserFriction ();
356                 SV_Accelerate ();
357         }
358         else
359         {
360                 // not on ground, so little effect on velocity
361                 SV_AirAccelerate (wishvel);
362         }
363 }
364
365 /*
366 ===================
367 SV_ClientThink
368
369 the move fields specify an intended velocity in pix/sec
370 the angle fields specify an exact angular motion in degrees
371 ===================
372 */
373 void SV_ClientThink (void)
374 {
375         vec3_t v_angle;
376
377         //Con_Printf("clientthink for %ims\n", (int) (sv.frametime * 1000));
378
379         SV_ApplyClientMove();
380         // make sure the velocity is sane (not a NaN)
381         SV_CheckVelocity(host_client->edict);
382
383         // LordHavoc: QuakeC replacement for SV_ClientThink (player movement)
384         if (prog->funcoffsets.SV_PlayerPhysics && sv_playerphysicsqc.integer)
385         {
386                 prog->globals.server->time = sv.time;
387                 prog->globals.server->self = PRVM_EDICT_TO_PROG(host_client->edict);
388                 PRVM_ExecuteProgram (prog->funcoffsets.SV_PlayerPhysics, "QC function SV_PlayerPhysics is missing");
389                 SV_CheckVelocity(host_client->edict);
390                 return;
391         }
392
393         if (host_client->edict->fields.server->movetype == MOVETYPE_NONE)
394                 return;
395
396         onground = ((int)host_client->edict->fields.server->flags & FL_ONGROUND) != 0;
397
398         DropPunchAngle ();
399
400         // if dead, behave differently
401         if (host_client->edict->fields.server->health <= 0)
402                 return;
403
404         cmd = host_client->cmd;
405
406         // angles
407         // show 1/3 the pitch angle and all the roll angle
408         VectorAdd (host_client->edict->fields.server->v_angle, host_client->edict->fields.server->punchangle, v_angle);
409         host_client->edict->fields.server->angles[ROLL] = V_CalcRoll (host_client->edict->fields.server->angles, host_client->edict->fields.server->velocity)*4;
410         if (!host_client->edict->fields.server->fixangle)
411         {
412                 host_client->edict->fields.server->angles[PITCH] = -v_angle[PITCH]/3;
413                 host_client->edict->fields.server->angles[YAW] = v_angle[YAW];
414         }
415
416         if ( (int)host_client->edict->fields.server->flags & FL_WATERJUMP )
417         {
418                 SV_WaterJump ();
419                 SV_CheckVelocity(host_client->edict);
420                 return;
421         }
422
423         /*
424         // Player is (somehow) outside of the map, or flying, or noclipping
425         if (host_client->edict->fields.server->movetype != MOVETYPE_NOCLIP && (host_client->edict->fields.server->movetype == MOVETYPE_FLY || SV_TestEntityPosition (host_client->edict)))
426         //if (host_client->edict->fields.server->movetype == MOVETYPE_NOCLIP || host_client->edict->fields.server->movetype == MOVETYPE_FLY || SV_TestEntityPosition (host_client->edict))
427         {
428                 SV_FreeMove ();
429                 return;
430         }
431         */
432
433         // walk
434         if ((host_client->edict->fields.server->waterlevel >= 2) && (host_client->edict->fields.server->movetype != MOVETYPE_NOCLIP))
435         {
436                 SV_WaterMove ();
437                 SV_CheckVelocity(host_client->edict);
438                 return;
439         }
440
441         SV_AirMove ();
442         SV_CheckVelocity(host_client->edict);
443 }
444
445 /*
446 ===================
447 SV_ReadClientMove
448 ===================
449 */
450 int sv_numreadmoves = 0;
451 usercmd_t sv_readmoves[CL_MAX_USERCMDS];
452 void SV_ReadClientMove (void)
453 {
454         int i;
455         usercmd_t newmove;
456         usercmd_t *move = &newmove;
457
458         memset(move, 0, sizeof(*move));
459
460         if (msg_badread) Con_Printf("SV_ReadClientMessage: badread at %s:%i\n", __FILE__, __LINE__);
461
462         // read ping time
463         if (sv.protocol != PROTOCOL_QUAKE && sv.protocol != PROTOCOL_QUAKEDP && sv.protocol != PROTOCOL_NEHAHRAMOVIE && sv.protocol != PROTOCOL_NEHAHRABJP && sv.protocol != PROTOCOL_NEHAHRABJP2 && sv.protocol != PROTOCOL_NEHAHRABJP3 && sv.protocol != PROTOCOL_DARKPLACES1 && sv.protocol != PROTOCOL_DARKPLACES2 && sv.protocol != PROTOCOL_DARKPLACES3 && sv.protocol != PROTOCOL_DARKPLACES4 && sv.protocol != PROTOCOL_DARKPLACES5 && sv.protocol != PROTOCOL_DARKPLACES6)
464                 move->sequence = MSG_ReadLong ();
465         move->time = move->clienttime = MSG_ReadFloat ();
466         if (msg_badread) Con_Printf("SV_ReadClientMessage: badread at %s:%i\n", __FILE__, __LINE__);
467         move->receivetime = (float)sv.time;
468
469 #if DEBUGMOVES
470         Con_Printf("%s move%i #%i %ims (%ims) %i %i '%i %i %i' '%i %i %i'\n", move->time > move->receivetime ? "^3read future" : "^4read normal", sv_numreadmoves + 1, move->sequence, (int)floor((move->time - host_client->cmd.time) * 1000.0 + 0.5), (int)floor(move->time * 1000.0 + 0.5), move->impulse, move->buttons, (int)move->viewangles[0], (int)move->viewangles[1], (int)move->viewangles[2], (int)move->forwardmove, (int)move->sidemove, (int)move->upmove);
471 #endif
472         // limit reported time to current time
473         // (incase the client is trying to cheat)
474         move->time = min(move->time, move->receivetime + sv.frametime);
475
476         // read current angles
477         for (i = 0;i < 3;i++)
478         {
479                 if (sv.protocol == PROTOCOL_QUAKE || sv.protocol == PROTOCOL_QUAKEDP || sv.protocol == PROTOCOL_NEHAHRAMOVIE || sv.protocol == PROTOCOL_NEHAHRABJP || sv.protocol == PROTOCOL_NEHAHRABJP2 || sv.protocol == PROTOCOL_NEHAHRABJP3)
480                         move->viewangles[i] = MSG_ReadAngle8i();
481                 else if (sv.protocol == PROTOCOL_DARKPLACES1)
482                         move->viewangles[i] = MSG_ReadAngle16i();
483                 else if (sv.protocol == PROTOCOL_DARKPLACES2 || sv.protocol == PROTOCOL_DARKPLACES3)
484                         move->viewangles[i] = MSG_ReadAngle32f();
485                 else
486                         move->viewangles[i] = MSG_ReadAngle16i();
487         }
488         if (msg_badread) Con_Printf("SV_ReadClientMessage: badread at %s:%i\n", __FILE__, __LINE__);
489
490         // read movement
491         move->forwardmove = MSG_ReadCoord16i ();
492         move->sidemove = MSG_ReadCoord16i ();
493         move->upmove = MSG_ReadCoord16i ();
494         if (msg_badread) Con_Printf("SV_ReadClientMessage: badread at %s:%i\n", __FILE__, __LINE__);
495
496         // read buttons
497         // be sure to bitwise OR them into the move->buttons because we want to
498         // accumulate button presses from multiple packets per actual move
499         if (sv.protocol == PROTOCOL_QUAKE || sv.protocol == PROTOCOL_QUAKEDP || sv.protocol == PROTOCOL_NEHAHRAMOVIE || sv.protocol == PROTOCOL_NEHAHRABJP || sv.protocol == PROTOCOL_NEHAHRABJP2 || sv.protocol == PROTOCOL_NEHAHRABJP3 || sv.protocol == PROTOCOL_DARKPLACES1 || sv.protocol == PROTOCOL_DARKPLACES2 || sv.protocol == PROTOCOL_DARKPLACES3 || sv.protocol == PROTOCOL_DARKPLACES4 || sv.protocol == PROTOCOL_DARKPLACES5)
500                 move->buttons = MSG_ReadByte ();
501         else
502                 move->buttons = MSG_ReadLong ();
503         if (msg_badread) Con_Printf("SV_ReadClientMessage: badread at %s:%i\n", __FILE__, __LINE__);
504
505         // read impulse
506         move->impulse = MSG_ReadByte ();
507         if (msg_badread) Con_Printf("SV_ReadClientMessage: badread at %s:%i\n", __FILE__, __LINE__);
508
509         // PRYDON_CLIENTCURSOR
510         if (sv.protocol != PROTOCOL_QUAKE && sv.protocol != PROTOCOL_QUAKEDP && sv.protocol != PROTOCOL_NEHAHRAMOVIE && sv.protocol != PROTOCOL_NEHAHRABJP && sv.protocol != PROTOCOL_NEHAHRABJP2 && sv.protocol != PROTOCOL_NEHAHRABJP3 && sv.protocol != PROTOCOL_DARKPLACES1 && sv.protocol != PROTOCOL_DARKPLACES2 && sv.protocol != PROTOCOL_DARKPLACES3 && sv.protocol != PROTOCOL_DARKPLACES4 && sv.protocol != PROTOCOL_DARKPLACES5)
511         {
512                 // 30 bytes
513                 move->cursor_screen[0] = MSG_ReadShort() * (1.0f / 32767.0f);
514                 move->cursor_screen[1] = MSG_ReadShort() * (1.0f / 32767.0f);
515                 move->cursor_start[0] = MSG_ReadFloat();
516                 move->cursor_start[1] = MSG_ReadFloat();
517                 move->cursor_start[2] = MSG_ReadFloat();
518                 move->cursor_impact[0] = MSG_ReadFloat();
519                 move->cursor_impact[1] = MSG_ReadFloat();
520                 move->cursor_impact[2] = MSG_ReadFloat();
521                 move->cursor_entitynumber = (unsigned short)MSG_ReadShort();
522                 if (move->cursor_entitynumber >= prog->max_edicts)
523                 {
524                         Con_DPrintf("SV_ReadClientMessage: client send bad cursor_entitynumber\n");
525                         move->cursor_entitynumber = 0;
526                 }
527                 // as requested by FrikaC, cursor_trace_ent is reset to world if the
528                 // entity is free at time of receipt
529                 if (PRVM_EDICT_NUM(move->cursor_entitynumber)->priv.server->free)
530                         move->cursor_entitynumber = 0;
531                 if (msg_badread) Con_Printf("SV_ReadClientMessage: badread at %s:%i\n", __FILE__, __LINE__);
532         }
533
534         // if the previous move has not been applied yet, we need to accumulate
535         // the impulse/buttons from it
536         if (!host_client->cmd.applied)
537         {
538                 if (!move->impulse)
539                         move->impulse = host_client->cmd.impulse;
540                 move->buttons |= host_client->cmd.buttons;
541         }
542
543         // now store this move for later execution
544         // (we have to buffer the moves because of old ones being repeated)
545         if (sv_numreadmoves < CL_MAX_USERCMDS)
546                 sv_readmoves[sv_numreadmoves++] = *move;
547
548         // movement packet loss tracking
549         if(move->sequence)
550         {
551                 if(move->sequence > host_client->movement_highestsequence_seen)
552                 {
553                         if(host_client->movement_highestsequence_seen)
554                         {
555                                 // mark moves in between as lost
556                                 if(move->sequence - host_client->movement_highestsequence_seen - 1 < NETGRAPH_PACKETS)
557                                         for(i = host_client->movement_highestsequence_seen + 1; i < move->sequence; ++i)
558                                                 host_client->movement_count[i % NETGRAPH_PACKETS] = -1;
559                                 else
560                                         memset(host_client->movement_count, -1, sizeof(host_client->movement_count));
561                         }
562                         // mark THIS move as seen for the first time
563                         host_client->movement_count[move->sequence % NETGRAPH_PACKETS] = 1;
564                         // update highest sequence seen
565                         host_client->movement_highestsequence_seen = move->sequence;
566                 }
567                 else
568                         if(host_client->movement_count[move->sequence % NETGRAPH_PACKETS] >= 0)
569                                 ++host_client->movement_count[move->sequence % NETGRAPH_PACKETS];
570         }
571         else
572         {
573                 host_client->movement_highestsequence_seen = 0;
574                 memset(host_client->movement_count, 0, sizeof(host_client->movement_count));
575         }
576 }
577
578 void SV_ExecuteClientMoves(void)
579 {
580         int moveindex;
581         float moveframetime;
582         double oldframetime;
583         double oldframetime2;
584 #ifdef NUM_PING_TIMES
585         double total;
586 #endif
587         prvm_eval_t *val;
588         if (sv_numreadmoves < 1)
589                 return;
590         // only start accepting input once the player is spawned
591         if (!host_client->spawned)
592                 return;
593 #if DEBUGMOVES
594         Con_Printf("SV_ExecuteClientMoves: read %i moves at sv.time %f\n", sv_numreadmoves, (float)sv.time);
595 #endif
596         // disable clientside movement prediction in some cases
597         if (ceil(max(sv_readmoves[sv_numreadmoves-1].receivetime - sv_readmoves[sv_numreadmoves-1].time, 0) * 1000.0) < sv_clmovement_minping.integer)
598                 host_client->clmovement_disabletimeout = realtime + sv_clmovement_minping_disabletime.value / 1000.0;
599         // several conditions govern whether clientside movement prediction is allowed
600         if (sv_readmoves[sv_numreadmoves-1].sequence && sv_clmovement_enable.integer && sv_clmovement_inputtimeout.value > 0 && host_client->clmovement_disabletimeout <= realtime && host_client->edict->fields.server->movetype == MOVETYPE_WALK && (!(val = PRVM_EDICTFIELDVALUE(host_client->edict, prog->fieldoffsets.disableclientprediction)) || !val->_float))
601         {
602                 // process the moves in order and ignore old ones
603                 // but always trust the latest move
604                 // (this deals with bogus initial move sequences after level change,
605                 //  where the client will eventually catch up with the level change
606                 //  and reset its move sequence)
607                 for (moveindex = 0;moveindex < sv_numreadmoves;moveindex++)
608                 {
609                         usercmd_t *move = sv_readmoves + moveindex;
610                         if (host_client->movesequence < move->sequence || moveindex == sv_numreadmoves - 1)
611                         {
612 #if DEBUGMOVES
613                                 Con_Printf("%smove #%i %ims (%ims) %i %i '%i %i %i' '%i %i %i'\n", (move->time - host_client->cmd.time) > sv.frametime * 1.01 ? "^1" : "^2", move->sequence, (int)floor((move->time - host_client->cmd.time) * 1000.0 + 0.5), (int)floor(move->time * 1000.0 + 0.5), move->impulse, move->buttons, (int)move->viewangles[0], (int)move->viewangles[1], (int)move->viewangles[2], (int)move->forwardmove, (int)move->sidemove, (int)move->upmove);
614 #endif
615                                 // this is a new move
616                                 move->time = bound(sv.time - 1, move->time, sv.time); // prevent slowhack/speedhack combos
617                                 move->time = max(move->time, host_client->cmd.time); // prevent backstepping of time
618                                 moveframetime = bound(0, move->time - host_client->cmd.time, min(0.1, sv_clmovement_inputtimeout.value));
619
620                                 // discard (treat like lost) moves with too low distance from
621                                 // the previous one to prevent hacks using float inaccuracy
622                                 // clients will see this as packet loss in the netgraph
623                                 // this should also apply if a move cannot get
624                                 // executed because it came too late and
625                                 // already was performed serverside
626                                 if(moveframetime < 0.0005)
627                                 {
628                                         // count the move as LOST if we don't
629                                         // execute it but it has higher
630                                         // sequence count
631                                         if(host_client->movesequence)
632                                                 if(move->sequence > host_client->movesequence)
633                                                         host_client->movement_count[(move->sequence) % NETGRAPH_PACKETS] = -1;
634                                         continue;
635                                 }
636
637                                 //Con_Printf("movesequence = %i (%i lost), moveframetime = %f\n", move->sequence, move->sequence ? move->sequence - host_client->movesequence - 1 : 0, moveframetime);
638                                 host_client->cmd = *move;
639                                 host_client->movesequence = move->sequence;
640
641                                 // if using prediction, we need to perform moves when packets are
642                                 // received, even if multiple occur in one frame
643                                 // (they can't go beyond the current time so there is no cheat issue
644                                 //  with this approach, and if they don't send input for a while they
645                                 //  start moving anyway, so the longest 'lagaport' possible is
646                                 //  determined by the sv_clmovement_inputtimeout cvar)
647                                 if (moveframetime <= 0)
648                                         continue;
649                                 oldframetime = prog->globals.server->frametime;
650                                 oldframetime2 = sv.frametime;
651                                 // update ping time for qc to see while executing this move
652                                 host_client->ping = host_client->cmd.receivetime - host_client->cmd.time;
653                                 // the server and qc frametime values must be changed temporarily
654                                 prog->globals.server->frametime = sv.frametime = moveframetime;
655                                 // if move is more than 50ms, split it into two moves (this matches QWSV behavior and the client prediction)
656                                 if (sv.frametime > 0.05)
657                                 {
658                                         prog->globals.server->frametime = sv.frametime = moveframetime * 0.5f;
659                                         SV_Physics_ClientMove();
660                                 }
661                                 SV_Physics_ClientMove();
662                                 sv.frametime = oldframetime2;
663                                 prog->globals.server->frametime = oldframetime;
664                                 host_client->clmovement_inputtimeout = sv_clmovement_inputtimeout.value;
665                         }
666                 }
667         }
668         else
669         {
670                 // try to gather button bits from old moves, but only if their time is
671                 // advancing (ones with the same timestamp can't be trusted)
672                 for (moveindex = 0;moveindex < sv_numreadmoves-1;moveindex++)
673                 {
674                         usercmd_t *move = sv_readmoves + moveindex;
675                         if (host_client->cmd.time < move->time)
676                         {
677                                 sv_readmoves[sv_numreadmoves-1].buttons |= move->buttons;
678                                 if (move->impulse)
679                                         sv_readmoves[sv_numreadmoves-1].impulse = move->impulse;
680                         }
681                 }
682                 // now copy the new move
683                 host_client->cmd = sv_readmoves[sv_numreadmoves-1];
684                 host_client->cmd.time = max(host_client->cmd.time, sv.time);
685                         // physics will run up to sv.time, so allow no predicted moves
686                         // before that otherwise, there is a speedhack by turning
687                         // prediction on and off repeatedly on client side because the
688                         // engine would run BOTH client and server physics for the same
689                         // time
690                 host_client->movesequence = 0;
691                 // make sure that normal physics takes over immediately
692                 host_client->clmovement_inputtimeout = 0;
693         }
694
695         // calculate average ping time
696         host_client->ping = host_client->cmd.receivetime - host_client->cmd.clienttime;
697 #ifdef NUM_PING_TIMES
698         host_client->ping_times[host_client->num_pings % NUM_PING_TIMES] = host_client->cmd.receivetime - host_client->cmd.clienttime;
699         host_client->num_pings++;
700         for (i=0, total = 0;i < NUM_PING_TIMES;i++)
701                 total += host_client->ping_times[i];
702         host_client->ping = total / NUM_PING_TIMES;
703 #endif
704 }
705
706 void SV_ApplyClientMove (void)
707 {
708         prvm_eval_t *val;
709         usercmd_t *move = &host_client->cmd;
710         int j, movementloss, packetloss;
711
712         if (!move->receivetime)
713                 return;
714
715         // note: a move can be applied multiple times if the client packets are
716         // not coming as often as the physics is executed, and the move must be
717         // applied before running qc each time because the id1 qc had a bug where
718         // it clears self.button2 in PlayerJump, causing pogostick behavior if
719         // moves are not applied every time before calling qc
720         move->applied = true;
721
722         // set the edict fields
723         host_client->edict->fields.server->button0 = move->buttons & 1;
724         host_client->edict->fields.server->button2 = (move->buttons & 2)>>1;
725         if (move->impulse)
726                 host_client->edict->fields.server->impulse = move->impulse;
727         // only send the impulse to qc once
728         move->impulse = 0;
729
730         movementloss = packetloss = 0;
731         if(host_client->netconnection)
732         {
733                 for (j = 0;j < NETGRAPH_PACKETS;j++)
734                         if (host_client->netconnection->incoming_netgraph[j].unreliablebytes == NETGRAPH_LOSTPACKET)
735                                 packetloss++;
736                 for (j = 0;j < NETGRAPH_PACKETS;j++)
737                         if (host_client->movement_count[j] < 0)
738                                 movementloss++;
739         }
740
741         VectorCopy(move->viewangles, host_client->edict->fields.server->v_angle);
742         if ((val = PRVM_EDICTFIELDVALUE(host_client->edict, prog->fieldoffsets.button3))) val->_float = ((move->buttons >> 2) & 1);
743         if ((val = PRVM_EDICTFIELDVALUE(host_client->edict, prog->fieldoffsets.button4))) val->_float = ((move->buttons >> 3) & 1);
744         if ((val = PRVM_EDICTFIELDVALUE(host_client->edict, prog->fieldoffsets.button5))) val->_float = ((move->buttons >> 4) & 1);
745         if ((val = PRVM_EDICTFIELDVALUE(host_client->edict, prog->fieldoffsets.button6))) val->_float = ((move->buttons >> 5) & 1);
746         if ((val = PRVM_EDICTFIELDVALUE(host_client->edict, prog->fieldoffsets.button7))) val->_float = ((move->buttons >> 6) & 1);
747         if ((val = PRVM_EDICTFIELDVALUE(host_client->edict, prog->fieldoffsets.button8))) val->_float = ((move->buttons >> 7) & 1);
748         if ((val = PRVM_EDICTFIELDVALUE(host_client->edict, prog->fieldoffsets.button9))) val->_float = ((move->buttons >> 11) & 1);
749         if ((val = PRVM_EDICTFIELDVALUE(host_client->edict, prog->fieldoffsets.button10))) val->_float = ((move->buttons >> 12) & 1);
750         if ((val = PRVM_EDICTFIELDVALUE(host_client->edict, prog->fieldoffsets.button11))) val->_float = ((move->buttons >> 13) & 1);
751         if ((val = PRVM_EDICTFIELDVALUE(host_client->edict, prog->fieldoffsets.button12))) val->_float = ((move->buttons >> 14) & 1);
752         if ((val = PRVM_EDICTFIELDVALUE(host_client->edict, prog->fieldoffsets.button13))) val->_float = ((move->buttons >> 15) & 1);
753         if ((val = PRVM_EDICTFIELDVALUE(host_client->edict, prog->fieldoffsets.button14))) val->_float = ((move->buttons >> 16) & 1);
754         if ((val = PRVM_EDICTFIELDVALUE(host_client->edict, prog->fieldoffsets.button15))) val->_float = ((move->buttons >> 17) & 1);
755         if ((val = PRVM_EDICTFIELDVALUE(host_client->edict, prog->fieldoffsets.button16))) val->_float = ((move->buttons >> 18) & 1);
756         if ((val = PRVM_EDICTFIELDVALUE(host_client->edict, prog->fieldoffsets.buttonuse))) val->_float = ((move->buttons >> 8) & 1);
757         if ((val = PRVM_EDICTFIELDVALUE(host_client->edict, prog->fieldoffsets.buttonchat))) val->_float = ((move->buttons >> 9) & 1);
758         if ((val = PRVM_EDICTFIELDVALUE(host_client->edict, prog->fieldoffsets.cursor_active))) val->_float = ((move->buttons >> 10) & 1);
759         if ((val = PRVM_EDICTFIELDVALUE(host_client->edict, prog->fieldoffsets.movement))) VectorSet(val->vector, move->forwardmove, move->sidemove, move->upmove);
760         if ((val = PRVM_EDICTFIELDVALUE(host_client->edict, prog->fieldoffsets.cursor_screen))) VectorCopy(move->cursor_screen, val->vector);
761         if ((val = PRVM_EDICTFIELDVALUE(host_client->edict, prog->fieldoffsets.cursor_trace_start))) VectorCopy(move->cursor_start, val->vector);
762         if ((val = PRVM_EDICTFIELDVALUE(host_client->edict, prog->fieldoffsets.cursor_trace_endpos))) VectorCopy(move->cursor_impact, val->vector);
763         if ((val = PRVM_EDICTFIELDVALUE(host_client->edict, prog->fieldoffsets.cursor_trace_ent))) val->edict = PRVM_EDICT_TO_PROG(PRVM_EDICT_NUM(move->cursor_entitynumber));
764         if ((val = PRVM_EDICTFIELDVALUE(host_client->edict, prog->fieldoffsets.ping))) val->_float = host_client->ping * 1000.0;
765         if ((val = PRVM_EDICTFIELDVALUE(host_client->edict, prog->fieldoffsets.packetloss))) val->_float = packetloss / (float) NETGRAPH_PACKETS;
766         if ((val = PRVM_EDICTFIELDVALUE(host_client->edict, prog->fieldoffsets.movementloss))) val->_float = movementloss / (float) NETGRAPH_PACKETS;
767 }
768
769 void SV_FrameLost(int framenum)
770 {
771         if (host_client->entitydatabase5)
772         {
773                 EntityFrame5_LostFrame(host_client->entitydatabase5, framenum);
774                 EntityFrameCSQC_LostFrame(host_client, framenum);
775         }
776 }
777
778 void SV_FrameAck(int framenum)
779 {
780         if (host_client->entitydatabase)
781                 EntityFrame_AckFrame(host_client->entitydatabase, framenum);
782         else if (host_client->entitydatabase4)
783                 EntityFrame4_AckFrame(host_client->entitydatabase4, framenum, true);
784         else if (host_client->entitydatabase5)
785                 EntityFrame5_AckFrame(host_client->entitydatabase5, framenum);
786 }
787
788 /*
789 ===================
790 SV_ReadClientMessage
791 ===================
792 */
793 extern void SV_SendServerinfo(client_t *client);
794 extern sizebuf_t vm_tempstringsbuf;
795 void SV_ReadClientMessage(void)
796 {
797         int cmd, num, start;
798         char *s, *p, *q;
799
800         if(sv_autodemo_perclient.integer >= 2)
801                 SV_WriteDemoMessage(host_client, &(host_client->netconnection->message), true);
802
803         //MSG_BeginReading ();
804         sv_numreadmoves = 0;
805
806         for(;;)
807         {
808                 if (!host_client->active)
809                 {
810                         // a command caused an error
811                         SV_DropClient (false);
812                         return;
813                 }
814
815                 if (msg_badread)
816                 {
817                         Con_Print("SV_ReadClientMessage: badread\n");
818                         SV_DropClient (false);
819                         return;
820                 }
821
822                 cmd = MSG_ReadByte ();
823                 if (cmd == -1)
824                 {
825                         // end of message
826                         // apply the moves that were read this frame
827                         SV_ExecuteClientMoves();
828                         break;
829                 }
830
831                 switch (cmd)
832                 {
833                 default:
834                         Con_Printf("SV_ReadClientMessage: unknown command char %i\n", cmd);
835                         SV_DropClient (false);
836                         return;
837
838                 case clc_nop:
839                         break;
840
841                 case clc_stringcmd:
842                         // allow reliable messages now as the client is done with initial loading
843                         if (host_client->sendsignon == 2)
844                                 host_client->sendsignon = 0;
845                         s = MSG_ReadString ();
846                         q = NULL;
847                         for(p = s; *p; ++p) switch(*p)
848                         {
849                                 case 10:
850                                 case 13:
851                                         if(!q)
852                                                 q = p;
853                                         break;
854                                 default:
855                                         if(q)
856                                                 goto clc_stringcmd_invalid; // newline seen, THEN something else -> possible exploit
857                                         break;
858                         }
859                         if(q)
860                                 *q = 0;
861                         if (strncasecmp(s, "spawn", 5) == 0
862                          || strncasecmp(s, "begin", 5) == 0
863                          || strncasecmp(s, "prespawn", 8) == 0)
864                                 Cmd_ExecuteString (s, src_client);
865                         else if (prog->funcoffsets.SV_ParseClientCommand)
866                         {
867                                 int restorevm_tempstringsbuf_cursize;
868                                 restorevm_tempstringsbuf_cursize = vm_tempstringsbuf.cursize;
869                                 PRVM_G_INT(OFS_PARM0) = PRVM_SetTempString(s);
870                                 prog->globals.server->self = PRVM_EDICT_TO_PROG(host_client->edict);
871                                 PRVM_ExecuteProgram (prog->funcoffsets.SV_ParseClientCommand, "QC function SV_ParseClientCommand is missing");
872                                 vm_tempstringsbuf.cursize = restorevm_tempstringsbuf_cursize;
873                         }
874                         else
875                                 Cmd_ExecuteString (s, src_client);
876                         break;
877
878 clc_stringcmd_invalid:
879                         Con_Printf("Received invalid stringcmd from %s\n", host_client->name);
880                         if(developer.integer > 0)
881                                 Com_HexDumpToConsole((unsigned char *) s, strlen(s));
882                         break;
883
884                 case clc_disconnect:
885                         SV_DropClient (false); // client wants to disconnect
886                         return;
887
888                 case clc_move:
889                         SV_ReadClientMove();
890                         break;
891
892                 case clc_ackdownloaddata:
893                         start = MSG_ReadLong();
894                         num = MSG_ReadShort();
895                         if (host_client->download_file && host_client->download_started)
896                         {
897                                 if (host_client->download_expectedposition == start)
898                                 {
899                                         int size = (int)FS_FileSize(host_client->download_file);
900                                         // a data block was successfully received by the client,
901                                         // update the expected position on the next data block
902                                         host_client->download_expectedposition = start + num;
903                                         // if this was the last data block of the file, it's done
904                                         if (host_client->download_expectedposition >= FS_FileSize(host_client->download_file))
905                                         {
906                                                 // tell the client that the download finished
907                                                 // we need to calculate the crc now
908                                                 //
909                                                 // note: at this point the OS probably has the file
910                                                 // entirely in memory, so this is a faster operation
911                                                 // now than it was when the download started.
912                                                 //
913                                                 // it is also preferable to do this at the end of the
914                                                 // download rather than the start because it reduces
915                                                 // potential for Denial Of Service attacks against the
916                                                 // server.
917                                                 int crc;
918                                                 unsigned char *temp;
919                                                 FS_Seek(host_client->download_file, 0, SEEK_SET);
920                                                 temp = (unsigned char *) Mem_Alloc(tempmempool, size);
921                                                 FS_Read(host_client->download_file, temp, size);
922                                                 crc = CRC_Block(temp, size);
923                                                 Mem_Free(temp);
924                                                 // calculated crc, send the file info to the client
925                                                 // (so that it can verify the data)
926                                                 Host_ClientCommands("\ncl_downloadfinished %i %i %s\n", size, crc, host_client->download_name);
927                                                 Con_DPrintf("Download of %s by %s has finished\n", host_client->download_name, host_client->name);
928                                                 FS_Close(host_client->download_file);
929                                                 host_client->download_file = NULL;
930                                                 host_client->download_name[0] = 0;
931                                                 host_client->download_expectedposition = 0;
932                                                 host_client->download_started = false;
933                                         }
934                                 }
935                                 else
936                                 {
937                                         // a data block was lost, reset to the expected position
938                                         // and resume sending from there
939                                         FS_Seek(host_client->download_file, host_client->download_expectedposition, SEEK_SET);
940                                 }
941                         }
942                         break;
943
944                 case clc_ackframe:
945                         if (msg_badread) Con_Printf("SV_ReadClientMessage: badread at %s:%i\n", __FILE__, __LINE__);
946                         num = MSG_ReadLong();
947                         if (msg_badread) Con_Printf("SV_ReadClientMessage: badread at %s:%i\n", __FILE__, __LINE__);
948                         if (developer_networkentities.integer >= 10)
949                                 Con_Printf("recv clc_ackframe %i\n", num);
950                         // if the client hasn't progressed through signons yet,
951                         // ignore any clc_ackframes we get (they're probably from the
952                         // previous level)
953                         if (host_client->spawned && host_client->latestframenum < num)
954                         {
955                                 int i;
956                                 for (i = host_client->latestframenum + 1;i < num;i++)
957                                         SV_FrameLost(i);
958                                 SV_FrameAck(num);
959                                 host_client->latestframenum = num;
960                         }
961                         break;
962                 }
963         }
964 }
965