eliminated qbyte type, now uses unsigned char throughout the engine for this purpose
[divverent/darkplaces.git] / world.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 // world.c -- world query functions
21
22 #include "quakedef.h"
23
24 /*
25
26 entities never clip against themselves, or their owner
27
28 line of sight checks trace->inopen and trace->inwater, but bullets don't
29
30 */
31
32 cvar_t sv_debugmove = {CVAR_NOTIFY, "sv_debugmove", "0"};
33 cvar_t sv_areagrid_mingridsize = {CVAR_NOTIFY, "sv_areagrid_mingridsize", "64"};
34
35 void SV_AreaStats_f(void);
36
37 void SV_World_Init(void)
38 {
39         Cvar_RegisterVariable(&sv_debugmove);
40         Cvar_RegisterVariable(&sv_areagrid_mingridsize);
41         Cmd_AddCommand("sv_areastats", SV_AreaStats_f);
42         Collision_Init();
43 }
44
45 //============================================================================
46
47 // ClearLink is used for new headnodes
48 static void ClearLink (link_t *l)
49 {
50         l->entitynumber = 0;
51         l->prev = l->next = l;
52 }
53
54 static void RemoveLink (link_t *l)
55 {
56         l->next->prev = l->prev;
57         l->prev->next = l->next;
58 }
59
60 static void InsertLinkBefore (link_t *l, link_t *before, int entitynumber)
61 {
62         l->entitynumber = entitynumber;
63         l->next = before;
64         l->prev = before->prev;
65         l->prev->next = l;
66         l->next->prev = l;
67 }
68
69
70 /*
71 ===============================================================================
72
73 ENTITY AREA CHECKING
74
75 ===============================================================================
76 */
77
78 int sv_areagrid_stats_calls = 0;
79 int sv_areagrid_stats_nodechecks = 0;
80 int sv_areagrid_stats_entitychecks = 0;
81
82 void SV_AreaStats_f(void)
83 {
84         Con_Printf("areagrid check stats: %d calls %d nodes (%f per call) %d entities (%f per call)\n", sv_areagrid_stats_calls, sv_areagrid_stats_nodechecks, (double) sv_areagrid_stats_nodechecks / (double) sv_areagrid_stats_calls, sv_areagrid_stats_entitychecks, (double) sv_areagrid_stats_entitychecks / (double) sv_areagrid_stats_calls);
85         sv_areagrid_stats_calls = 0;
86         sv_areagrid_stats_nodechecks = 0;
87         sv_areagrid_stats_entitychecks = 0;
88 }
89
90 typedef struct areagrid_s
91 {
92         link_t edicts;
93 }
94 areagrid_t;
95
96 #define AREA_GRID 512
97 #define AREA_GRIDNODES (AREA_GRID * AREA_GRID)
98
99 static areagrid_t sv_areagrid[AREA_GRIDNODES], sv_areagrid_outside;
100 static vec3_t sv_areagrid_bias, sv_areagrid_scale, sv_areagrid_mins, sv_areagrid_maxs, sv_areagrid_size;
101 static int sv_areagrid_marknumber = 1;
102
103 void SV_CreateAreaGrid (vec3_t mins, vec3_t maxs)
104 {
105         int i;
106         ClearLink (&sv_areagrid_outside.edicts);
107         // choose either the world box size, or a larger box to ensure the grid isn't too fine
108         sv_areagrid_size[0] = max(maxs[0] - mins[0], AREA_GRID * sv_areagrid_mingridsize.value);
109         sv_areagrid_size[1] = max(maxs[1] - mins[1], AREA_GRID * sv_areagrid_mingridsize.value);
110         sv_areagrid_size[2] = max(maxs[2] - mins[2], AREA_GRID * sv_areagrid_mingridsize.value);
111         // figure out the corners of such a box, centered at the center of the world box
112         sv_areagrid_mins[0] = (mins[0] + maxs[0] - sv_areagrid_size[0]) * 0.5f;
113         sv_areagrid_mins[1] = (mins[1] + maxs[1] - sv_areagrid_size[1]) * 0.5f;
114         sv_areagrid_mins[2] = (mins[2] + maxs[2] - sv_areagrid_size[2]) * 0.5f;
115         sv_areagrid_maxs[0] = (mins[0] + maxs[0] + sv_areagrid_size[0]) * 0.5f;
116         sv_areagrid_maxs[1] = (mins[1] + maxs[1] + sv_areagrid_size[1]) * 0.5f;
117         sv_areagrid_maxs[2] = (mins[2] + maxs[2] + sv_areagrid_size[2]) * 0.5f;
118         // now calculate the actual useful info from that
119         VectorNegate(sv_areagrid_mins, sv_areagrid_bias);
120         sv_areagrid_scale[0] = AREA_GRID / sv_areagrid_size[0];
121         sv_areagrid_scale[1] = AREA_GRID / sv_areagrid_size[1];
122         sv_areagrid_scale[2] = AREA_GRID / sv_areagrid_size[2];
123         for (i = 0;i < AREA_GRIDNODES;i++)
124         {
125                 ClearLink (&sv_areagrid[i].edicts);
126         }
127         Con_DPrintf("sv_areagrid settings: divisions %ix%ix1 : box %f %f %f : %f %f %f size %f %f %f grid %f %f %f (mingrid %f)\n", AREA_GRID, AREA_GRID, sv_areagrid_mins[0], sv_areagrid_mins[1], sv_areagrid_mins[2], sv_areagrid_maxs[0], sv_areagrid_maxs[1], sv_areagrid_maxs[2], sv_areagrid_size[0], sv_areagrid_size[1], sv_areagrid_size[2], 1.0f / sv_areagrid_scale[0], 1.0f / sv_areagrid_scale[1], 1.0f / sv_areagrid_scale[2], sv_areagrid_mingridsize.value);
128 }
129
130 /*
131 ===============
132 SV_ClearWorld
133
134 ===============
135 */
136 void SV_ClearWorld (void)
137 {
138         SV_CreateAreaGrid(sv.worldmodel->normalmins, sv.worldmodel->normalmaxs);
139 }
140
141
142 /*
143 ===============
144 SV_UnlinkEdict
145
146 ===============
147 */
148 void SV_UnlinkEdict (prvm_edict_t *ent)
149 {
150         int i;
151         for (i = 0;i < ENTITYGRIDAREAS;i++)
152         {
153                 if (ent->priv.server->areagrid[i].prev)
154                 {
155                         RemoveLink (&ent->priv.server->areagrid[i]);
156                         ent->priv.server->areagrid[i].prev = ent->priv.server->areagrid[i].next = NULL;
157                 }
158         }
159 }
160
161 int SV_EntitiesInBox(vec3_t mins, vec3_t maxs, int maxlist, prvm_edict_t **list)
162 {
163         int numlist;
164         areagrid_t *grid;
165         link_t *l;
166         prvm_edict_t *ent;
167         int igrid[3], igridmins[3], igridmaxs[3];
168
169         sv_areagrid_stats_calls++;
170         sv_areagrid_marknumber++;
171         igridmins[0] = (int) ((mins[0] + sv_areagrid_bias[0]) * sv_areagrid_scale[0]);
172         igridmins[1] = (int) ((mins[1] + sv_areagrid_bias[1]) * sv_areagrid_scale[1]);
173         //igridmins[2] = (int) ((mins[2] + sv_areagrid_bias[2]) * sv_areagrid_scale[2]);
174         igridmaxs[0] = (int) ((maxs[0] + sv_areagrid_bias[0]) * sv_areagrid_scale[0]) + 1;
175         igridmaxs[1] = (int) ((maxs[1] + sv_areagrid_bias[1]) * sv_areagrid_scale[1]) + 1;
176         //igridmaxs[2] = (int) ((maxs[2] + sv_areagrid_bias[2]) * sv_areagrid_scale[2]) + 1;
177         igridmins[0] = max(0, igridmins[0]);
178         igridmins[1] = max(0, igridmins[1]);
179         //igridmins[2] = max(0, igridmins[2]);
180         igridmaxs[0] = min(AREA_GRID, igridmaxs[0]);
181         igridmaxs[1] = min(AREA_GRID, igridmaxs[1]);
182         //igridmaxs[2] = min(AREA_GRID, igridmaxs[2]);
183
184         numlist = 0;
185         // add entities not linked into areagrid because they are too big or
186         // outside the grid bounds
187         if (sv_areagrid_outside.edicts.next != &sv_areagrid_outside.edicts)
188         {
189                 for (l = sv_areagrid_outside.edicts.next;l != &sv_areagrid_outside.edicts;l = l->next)
190                 {
191                         ent = PRVM_EDICT_NUM_UNSIGNED(l->entitynumber);
192                         if (ent->priv.server->areagridmarknumber != sv_areagrid_marknumber)
193                         {
194                                 ent->priv.server->areagridmarknumber = sv_areagrid_marknumber;
195                                 if (!ent->priv.server->free && BoxesOverlap(mins, maxs, ent->fields.server->absmin, ent->fields.server->absmax))
196                                 {
197                                         if (numlist < maxlist)
198                                                 list[numlist] = ent;
199                                         numlist++;
200                                 }
201                                 sv_areagrid_stats_entitychecks++;
202                         }
203                 }
204         }
205         // add grid linked entities
206         for (igrid[1] = igridmins[1];igrid[1] < igridmaxs[1];igrid[1]++)
207         {
208                 grid = sv_areagrid + igrid[1] * AREA_GRID + igridmins[0];
209                 for (igrid[0] = igridmins[0];igrid[0] < igridmaxs[0];igrid[0]++, grid++)
210                 {
211                         if (grid->edicts.next != &grid->edicts)
212                         {
213                                 for (l = grid->edicts.next;l != &grid->edicts;l = l->next)
214                                 {
215                                         ent = PRVM_EDICT_NUM_UNSIGNED(l->entitynumber);
216                                         if (ent->priv.server->areagridmarknumber != sv_areagrid_marknumber)
217                                         {
218                                                 ent->priv.server->areagridmarknumber = sv_areagrid_marknumber;
219                                                 if (!ent->priv.server->free && BoxesOverlap(mins, maxs, ent->fields.server->absmin, ent->fields.server->absmax))
220                                                 {
221                                                         if (numlist < maxlist)
222                                                                 list[numlist] = ent;
223                                                         numlist++;
224                                                 }
225                                         }
226                                         sv_areagrid_stats_entitychecks++;
227                                 }
228                         }
229                 }
230         }
231         return numlist;
232 }
233
234 void SV_TouchAreaGrid(prvm_edict_t *ent)
235 {
236         int i, numtouchedicts, old_self, old_other;
237         prvm_edict_t *touch, *touchedicts[MAX_EDICTS];
238
239         // build a list of edicts to touch, because the link loop can be corrupted
240         // by SV_IncreaseEdicts called during touch functions
241         numtouchedicts = SV_EntitiesInBox(ent->fields.server->absmin, ent->fields.server->absmax, MAX_EDICTS, touchedicts);
242         if (numtouchedicts > MAX_EDICTS)
243         {
244                 // this never happens
245                 Con_Printf("SV_EntitiesInBox returned %i edicts, max was %i\n", numtouchedicts, MAX_EDICTS);
246                 numtouchedicts = MAX_EDICTS;
247         }
248
249         old_self = prog->globals.server->self;
250         old_other = prog->globals.server->other;
251         for (i = 0;i < numtouchedicts;i++)
252         {
253                 touch = touchedicts[i];
254                 if (touch != ent && (int)touch->fields.server->solid == SOLID_TRIGGER && touch->fields.server->touch)
255                 {
256                         prog->globals.server->self = PRVM_EDICT_TO_PROG(touch);
257                         prog->globals.server->other = PRVM_EDICT_TO_PROG(ent);
258                         prog->globals.server->time = sv.time;
259                         PRVM_ExecuteProgram (touch->fields.server->touch, "QC function self.touch is missing");
260                 }
261         }
262         prog->globals.server->self = old_self;
263         prog->globals.server->other = old_other;
264 }
265
266 void SV_LinkEdict_AreaGrid(prvm_edict_t *ent)
267 {
268         areagrid_t *grid;
269         int igrid[3], igridmins[3], igridmaxs[3], gridnum, entitynumber = PRVM_NUM_FOR_EDICT(ent);
270
271         if (entitynumber <= 0 || entitynumber >= prog->max_edicts || PRVM_EDICT_NUM(entitynumber) != ent)
272         {
273                 Con_Printf ("SV_LinkEdict_AreaGrid: invalid edict %p (edicts is %p, edict compared to prog->edicts is %i)\n", ent, prog->edicts, entitynumber);
274                 return;
275         }
276
277         igridmins[0] = (int) ((ent->fields.server->absmin[0] + sv_areagrid_bias[0]) * sv_areagrid_scale[0]);
278         igridmins[1] = (int) ((ent->fields.server->absmin[1] + sv_areagrid_bias[1]) * sv_areagrid_scale[1]);
279         //igridmins[2] = (int) ((ent->fields.server->absmin[2] + sv_areagrid_bias[2]) * sv_areagrid_scale[2]);
280         igridmaxs[0] = (int) ((ent->fields.server->absmax[0] + sv_areagrid_bias[0]) * sv_areagrid_scale[0]) + 1;
281         igridmaxs[1] = (int) ((ent->fields.server->absmax[1] + sv_areagrid_bias[1]) * sv_areagrid_scale[1]) + 1;
282         //igridmaxs[2] = (int) ((ent->fields.server->absmax[2] + sv_areagrid_bias[2]) * sv_areagrid_scale[2]) + 1;
283         if (igridmins[0] < 0 || igridmaxs[0] > AREA_GRID || igridmins[1] < 0 || igridmaxs[1] > AREA_GRID || ((igridmaxs[0] - igridmins[0]) * (igridmaxs[1] - igridmins[1])) > ENTITYGRIDAREAS)
284         {
285                 // wow, something outside the grid, store it as such
286                 InsertLinkBefore (&ent->priv.server->areagrid[0], &sv_areagrid_outside.edicts, entitynumber);
287                 return;
288         }
289
290         gridnum = 0;
291         for (igrid[1] = igridmins[1];igrid[1] < igridmaxs[1];igrid[1]++)
292         {
293                 grid = sv_areagrid + igrid[1] * AREA_GRID + igridmins[0];
294                 for (igrid[0] = igridmins[0];igrid[0] < igridmaxs[0];igrid[0]++, grid++, gridnum++)
295                         InsertLinkBefore (&ent->priv.server->areagrid[gridnum], &grid->edicts, entitynumber);
296         }
297 }
298
299 /*
300 ===============
301 SV_LinkEdict
302
303 ===============
304 */
305 void SV_LinkEdict (prvm_edict_t *ent, qboolean touch_triggers)
306 {
307         model_t *model;
308
309         if (ent->priv.server->areagrid[0].prev)
310                 SV_UnlinkEdict (ent);   // unlink from old position
311
312         if (ent == prog->edicts)
313                 return;         // don't add the world
314
315         if (ent->priv.server->free)
316                 return;
317
318 // set the abs box
319
320         if (ent->fields.server->solid == SOLID_BSP)
321         {
322                 int modelindex = ent->fields.server->modelindex;
323                 if (modelindex < 0 || modelindex > MAX_MODELS)
324                 {
325                         Con_Printf("edict %i: SOLID_BSP with invalid modelindex!\n", PRVM_NUM_FOR_EDICT(ent));
326                         modelindex = 0;
327                 }
328                 model = sv.models[modelindex];
329                 if (model != NULL)
330                 {
331                         if (!model->TraceBox)
332                                 Con_Printf("edict %i: SOLID_BSP with non-collidable model\n", PRVM_NUM_FOR_EDICT(ent));
333
334                         if (ent->fields.server->angles[0] || ent->fields.server->angles[2] || ent->fields.server->avelocity[0] || ent->fields.server->avelocity[2])
335                         {
336                                 VectorAdd(ent->fields.server->origin, model->rotatedmins, ent->fields.server->absmin);
337                                 VectorAdd(ent->fields.server->origin, model->rotatedmaxs, ent->fields.server->absmax);
338                         }
339                         else if (ent->fields.server->angles[1] || ent->fields.server->avelocity[1])
340                         {
341                                 VectorAdd(ent->fields.server->origin, model->yawmins, ent->fields.server->absmin);
342                                 VectorAdd(ent->fields.server->origin, model->yawmaxs, ent->fields.server->absmax);
343                         }
344                         else
345                         {
346                                 VectorAdd(ent->fields.server->origin, model->normalmins, ent->fields.server->absmin);
347                                 VectorAdd(ent->fields.server->origin, model->normalmaxs, ent->fields.server->absmax);
348                         }
349                 }
350                 else
351                 {
352                         // SOLID_BSP with no model is valid, mainly because some QC setup code does so temporarily
353                         VectorAdd(ent->fields.server->origin, ent->fields.server->mins, ent->fields.server->absmin);
354                         VectorAdd(ent->fields.server->origin, ent->fields.server->maxs, ent->fields.server->absmax);
355                 }
356         }
357         else
358         {
359                 VectorAdd(ent->fields.server->origin, ent->fields.server->mins, ent->fields.server->absmin);
360                 VectorAdd(ent->fields.server->origin, ent->fields.server->maxs, ent->fields.server->absmax);
361         }
362
363 //
364 // to make items easier to pick up and allow them to be grabbed off
365 // of shelves, the abs sizes are expanded
366 //
367         if ((int)ent->fields.server->flags & FL_ITEM)
368         {
369                 ent->fields.server->absmin[0] -= 15;
370                 ent->fields.server->absmin[1] -= 15;
371                 ent->fields.server->absmin[2] -= 1;
372                 ent->fields.server->absmax[0] += 15;
373                 ent->fields.server->absmax[1] += 15;
374                 ent->fields.server->absmax[2] += 1;
375         }
376         else
377         {
378                 // because movement is clipped an epsilon away from an actual edge,
379                 // we must fully check even when bounding boxes don't quite touch
380                 ent->fields.server->absmin[0] -= 1;
381                 ent->fields.server->absmin[1] -= 1;
382                 ent->fields.server->absmin[2] -= 1;
383                 ent->fields.server->absmax[0] += 1;
384                 ent->fields.server->absmax[1] += 1;
385                 ent->fields.server->absmax[2] += 1;
386         }
387
388         if (ent->fields.server->solid == SOLID_NOT)
389                 return;
390
391         SV_LinkEdict_AreaGrid(ent);
392
393 // if touch_triggers, touch all entities at this node and descend for more
394         if (touch_triggers)
395                 SV_TouchAreaGrid(ent);
396 }
397
398
399
400 /*
401 ===============================================================================
402
403 POINT TESTING IN HULLS
404
405 ===============================================================================
406 */
407
408 /*
409 ============
410 SV_TestEntityPosition
411
412 This could be a lot more efficient...
413 ============
414 */
415 int SV_TestEntityPosition (prvm_edict_t *ent)
416 {
417         return SV_Move (ent->fields.server->origin, ent->fields.server->mins, ent->fields.server->maxs, ent->fields.server->origin, MOVE_NORMAL, ent).startsolid;
418 }
419
420
421 /*
422 ===============================================================================
423
424 LINE TESTING IN HULLS
425
426 ===============================================================================
427 */
428
429 /*
430 ==================
431 SV_ClipMoveToEntity
432
433 Handles selection or creation of a clipping hull, and offseting (and
434 eventually rotation) of the end points
435 ==================
436 */
437 trace_t SV_ClipMoveToEntity(prvm_edict_t *ent, const vec3_t start, const vec3_t mins, const vec3_t maxs, const vec3_t end, int movetype, int hitsupercontents)
438 {
439         trace_t trace;
440         model_t *model = NULL;
441         matrix4x4_t matrix, imatrix;
442         float tempnormal[3], starttransformed[3], endtransformed[3];
443         float starttransformedmins[3], starttransformedmaxs[3], endtransformedmins[3], endtransformedmaxs[3];
444
445         memset(&trace, 0, sizeof(trace));
446         trace.fraction = trace.realfraction = 1;
447         VectorCopy(end, trace.endpos);
448
449         if ((int) ent->fields.server->solid == SOLID_BSP || movetype == MOVE_HITMODEL)
450         {
451                 unsigned int modelindex = ent->fields.server->modelindex;
452                 // if the modelindex is 0, it shouldn't be SOLID_BSP!
453                 if (modelindex == 0)
454                 {
455                         Con_Printf("SV_ClipMoveToEntity: edict %i: SOLID_BSP with no model\n", PRVM_NUM_FOR_EDICT(ent));
456                         return trace;
457                 }
458                 if (modelindex >= MAX_MODELS)
459                 {
460                         Con_Printf("SV_ClipMoveToEntity: edict %i: SOLID_BSP with invalid modelindex\n", PRVM_NUM_FOR_EDICT(ent));
461                         return trace;
462                 }
463                 model = sv.models[modelindex];
464                 if (modelindex != 0 && model == NULL)
465                 {
466                         Con_Printf("SV_ClipMoveToEntity: edict %i: SOLID_BSP with invalid modelindex\n", PRVM_NUM_FOR_EDICT(ent));
467                         return trace;
468                 }
469
470                 if ((int) ent->fields.server->solid == SOLID_BSP)
471                 {
472                         if (!model->TraceBox)
473                         {
474                                 Con_Printf("SV_ClipMoveToEntity: edict %i: SOLID_BSP with a non-collidable model\n", PRVM_NUM_FOR_EDICT(ent));
475                                 return trace;
476                         }
477                         //if ((int) ent->fields.server->movetype != MOVETYPE_PUSH)
478                         //{
479                         //      Con_Printf("SV_ClipMoveToEntity: edict %i: SOLID_BSP without MOVETYPE_PUSH\n", PRVM_NUM_FOR_EDICT(ent));
480                         //      return trace;
481                         //}
482                 }
483                 Matrix4x4_CreateFromQuakeEntity(&matrix, ent->fields.server->origin[0], ent->fields.server->origin[1], ent->fields.server->origin[2], ent->fields.server->angles[0], ent->fields.server->angles[1], ent->fields.server->angles[2], 1);
484         }
485         else
486                 Matrix4x4_CreateTranslate(&matrix, ent->fields.server->origin[0], ent->fields.server->origin[1], ent->fields.server->origin[2]);
487
488         Matrix4x4_Invert_Simple(&imatrix, &matrix);
489         Matrix4x4_Transform(&imatrix, start, starttransformed);
490         Matrix4x4_Transform(&imatrix, end, endtransformed);
491 #if COLLISIONPARANOID >= 3
492         Con_Printf("trans(%f %f %f -> %f %f %f, %f %f %f -> %f %f %f)", start[0], start[1], start[2], starttransformed[0], starttransformed[1], starttransformed[2], end[0], end[1], end[2], endtransformed[0], endtransformed[1], endtransformed[2]);
493 #endif
494
495         if (model && model->TraceBox)
496         {
497                 int frame;
498                 frame = (int)ent->fields.server->frame;
499                 frame = bound(0, frame, (model->numframes - 1));
500                 VectorAdd(starttransformed, maxs, starttransformedmaxs);
501                 VectorAdd(endtransformed, maxs, endtransformedmaxs);
502                 VectorAdd(starttransformed, mins, starttransformedmins);
503                 VectorAdd(endtransformed, mins, endtransformedmins);
504                 model->TraceBox(model, frame, &trace, starttransformedmins, starttransformedmaxs, endtransformedmins, endtransformedmaxs, hitsupercontents);
505         }
506         else
507                 Collision_ClipTrace_Box(&trace, ent->fields.server->mins, ent->fields.server->maxs, starttransformed, mins, maxs, endtransformed, hitsupercontents, SUPERCONTENTS_SOLID);
508         trace.fraction = bound(0, trace.fraction, 1);
509         trace.realfraction = bound(0, trace.realfraction, 1);
510
511         if (trace.fraction < 1)
512         {
513                 VectorLerp(start, trace.fraction, end, trace.endpos);
514                 VectorCopy(trace.plane.normal, tempnormal);
515                 Matrix4x4_Transform3x3(&matrix, tempnormal, trace.plane.normal);
516                 // FIXME: should recalc trace.plane.dist
517         }
518         else
519                 VectorCopy(end, trace.endpos);
520
521         return trace;
522 }
523
524 /*
525 ==================
526 SV_ClipMoveToWorld
527 ==================
528 */
529 trace_t SV_ClipMoveToWorld(const vec3_t start, const vec3_t mins, const vec3_t maxs, const vec3_t end, int movetype, int hitsupercontents)
530 {
531         trace_t trace;
532         float starttransformedmins[3], starttransformedmaxs[3], endtransformedmins[3], endtransformedmaxs[3];
533         memset(&trace, 0, sizeof(trace));
534         trace.fraction = trace.realfraction = 1;
535         VectorAdd(start, maxs, starttransformedmaxs);
536         VectorAdd(end, maxs, endtransformedmaxs);
537         VectorAdd(start, mins, starttransformedmins);
538         VectorAdd(end, mins, endtransformedmins);
539         sv.worldmodel->TraceBox(sv.worldmodel, 0, &trace, starttransformedmins, starttransformedmaxs, endtransformedmins, endtransformedmaxs, hitsupercontents);
540         trace.fraction = bound(0, trace.fraction, 1);
541         trace.realfraction = bound(0, trace.realfraction, 1);
542         VectorLerp(start, trace.fraction, end, trace.endpos);
543         return trace;
544 }
545
546 //===========================================================================
547
548 /*
549 ==================
550 SV_Move
551 ==================
552 */
553 #if COLLISIONPARANOID >= 1
554 trace_t SV_Move_(const vec3_t start, const vec3_t mins, const vec3_t maxs, const vec3_t end, int type, prvm_edict_t *passedict)
555 #else
556 trace_t SV_Move(const vec3_t start, const vec3_t mins, const vec3_t maxs, const vec3_t end, int type, prvm_edict_t *passedict)
557 #endif
558 {
559         vec3_t hullmins, hullmaxs;
560         int i;
561         int hitsupercontentsmask;
562         int passedictprog;
563         qboolean pointtrace;
564         prvm_edict_t *traceowner, *touch;
565         trace_t trace;
566         // bounding box of entire move area
567         vec3_t clipboxmins, clipboxmaxs;
568         // size of the moving object
569         vec3_t clipmins, clipmaxs;
570         // size when clipping against monsters
571         vec3_t clipmins2, clipmaxs2;
572         // start and end origin of move
573         vec3_t clipstart, clipend;
574         // trace results
575         trace_t cliptrace;
576         int numtouchedicts;
577         prvm_edict_t *touchedicts[MAX_EDICTS];
578
579         VectorCopy(start, clipstart);
580         VectorCopy(end, clipend);
581         VectorCopy(mins, clipmins);
582         VectorCopy(maxs, clipmaxs);
583         VectorCopy(mins, clipmins2);
584         VectorCopy(maxs, clipmaxs2);
585 #if COLLISIONPARANOID >= 3
586         Con_Printf("move(%f %f %f,%f %f %f)", clipstart[0], clipstart[1], clipstart[2], clipend[0], clipend[1], clipend[2]);
587 #endif
588
589         hitsupercontentsmask = SUPERCONTENTS_SOLID;
590         if (passedict)
591         {
592                 if (passedict->fields.server->solid == SOLID_SLIDEBOX)
593                         hitsupercontentsmask |= SUPERCONTENTS_PLAYERCLIP;
594                 if ((int)passedict->fields.server->flags & FL_MONSTER)
595                         hitsupercontentsmask |= SUPERCONTENTS_MONSTERCLIP;
596         }
597
598         // clip to world
599         cliptrace = SV_ClipMoveToWorld(clipstart, clipmins, clipmaxs, clipend, type, hitsupercontentsmask);
600         if (cliptrace.startsolid || cliptrace.fraction < 1)
601                 cliptrace.ent = prog->edicts;
602         if (type == MOVE_WORLDONLY)
603                 return cliptrace;
604
605         if (type == MOVE_MISSILE)
606         {
607                 // LordHavoc: modified this, was = -15, now -= 15
608                 for (i = 0;i < 3;i++)
609                 {
610                         clipmins2[i] -= 15;
611                         clipmaxs2[i] += 15;
612                 }
613         }
614
615         // get adjusted box for bmodel collisions if the world is q1bsp or hlbsp
616         if (sv.worldmodel && sv.worldmodel->brush.RoundUpToHullSize)
617                 sv.worldmodel->brush.RoundUpToHullSize(sv.worldmodel, clipmins, clipmaxs, hullmins, hullmaxs);
618         else
619         {
620                 VectorCopy(clipmins, hullmins);
621                 VectorCopy(clipmaxs, hullmaxs);
622         }
623
624         // create the bounding box of the entire move
625         for (i = 0;i < 3;i++)
626         {
627                 clipboxmins[i] = min(clipstart[i], cliptrace.endpos[i]) + min(hullmins[i], clipmins2[i]) - 1;
628                 clipboxmaxs[i] = max(clipstart[i], cliptrace.endpos[i]) + max(hullmaxs[i], clipmaxs2[i]) + 1;
629         }
630
631         // debug override to test against everything
632         if (sv_debugmove.integer)
633         {
634                 clipboxmins[0] = clipboxmins[1] = clipboxmins[2] = -999999999;
635                 clipboxmaxs[0] = clipboxmaxs[1] = clipboxmaxs[2] =  999999999;
636         }
637
638         // if the passedict is world, make it NULL (to avoid two checks each time)
639         if (passedict == prog->edicts)
640                 passedict = NULL;
641         // precalculate prog value for passedict for comparisons
642         passedictprog = PRVM_EDICT_TO_PROG(passedict);
643         // figure out whether this is a point trace for comparisons
644         pointtrace = VectorCompare(clipmins, clipmaxs);
645         // precalculate passedict's owner edict pointer for comparisons
646         traceowner = passedict ? PRVM_PROG_TO_EDICT(passedict->fields.server->owner) : 0;
647
648         // clip to enttiies
649         numtouchedicts = SV_EntitiesInBox(clipboxmins, clipboxmaxs, MAX_EDICTS, touchedicts);
650         if (numtouchedicts > MAX_EDICTS)
651         {
652                 // this never happens
653                 Con_Printf("SV_EntitiesInBox returned %i edicts, max was %i\n", numtouchedicts, MAX_EDICTS);
654                 numtouchedicts = MAX_EDICTS;
655         }
656         for (i = 0;i < numtouchedicts;i++)
657         {
658                 touch = touchedicts[i];
659
660                 if (touch->fields.server->solid < SOLID_BBOX)
661                         continue;
662                 if (type == MOVE_NOMONSTERS && touch->fields.server->solid != SOLID_BSP)
663                         continue;
664
665                 if (passedict)
666                 {
667                         // don't clip against self
668                         if (passedict == touch)
669                                 continue;
670                         // don't clip owned entities against owner
671                         if (traceowner == touch)
672                                 continue;
673                         // don't clip owner against owned entities
674                         if (passedictprog == touch->fields.server->owner)
675                                 continue;
676                         // don't clip points against points (they can't collide)
677                         if (pointtrace && VectorCompare(touch->fields.server->mins, touch->fields.server->maxs) && (type != MOVE_MISSILE || !((int)touch->fields.server->flags & FL_MONSTER)))
678                                 continue;
679                         // don't clip corpse against character
680                         if (passedict->fields.server->solid == SOLID_CORPSE && (touch->fields.server->solid == SOLID_SLIDEBOX || touch->fields.server->solid == SOLID_CORPSE))
681                                 continue;
682                         // don't clip character against corpse
683                         if (passedict->fields.server->solid == SOLID_SLIDEBOX && touch->fields.server->solid == SOLID_CORPSE)
684                                 continue;
685                 }
686
687                 // might interact, so do an exact clip
688                 if ((int)touch->fields.server->flags & FL_MONSTER)
689                         trace = SV_ClipMoveToEntity(touch, clipstart, clipmins2, clipmaxs2, clipend, type, hitsupercontentsmask);
690                 else
691                         trace = SV_ClipMoveToEntity(touch, clipstart, clipmins, clipmaxs, clipend, type, hitsupercontentsmask);
692                 // LordHavoc: take the 'best' answers from the new trace and combine with existing data
693                 if (trace.allsolid)
694                         cliptrace.allsolid = true;
695                 if (trace.startsolid)
696                 {
697                         cliptrace.startsolid = true;
698                         if (cliptrace.realfraction == 1)
699                                 cliptrace.ent = touch;
700                 }
701                 // don't set this except on the world, because it can easily confuse
702                 // monsters underwater if there's a bmodel involved in the trace
703                 // (inopen && inwater is how they check water visibility)
704                 //if (trace.inopen)
705                 //      cliptrace.inopen = true;
706                 if (trace.inwater)
707                         cliptrace.inwater = true;
708                 if (trace.realfraction < cliptrace.realfraction)
709                 {
710                         cliptrace.fraction = trace.fraction;
711                         cliptrace.realfraction = trace.realfraction;
712                         VectorCopy(trace.endpos, cliptrace.endpos);
713                         cliptrace.plane = trace.plane;
714                         cliptrace.ent = touch;
715                 }
716                 cliptrace.startsupercontents |= trace.startsupercontents;
717         }
718
719         return cliptrace;
720 }
721
722 #if COLLISIONPARANOID >= 1
723 trace_t SV_Move(const vec3_t start, const vec3_t mins, const vec3_t maxs, const vec3_t end, int type, prvm_edict_t *passedict)
724 {
725         int endstuck;
726         trace_t trace;
727         vec3_t temp;
728         trace = SV_Move_(start, mins, maxs, end, type, passedict);
729         if (passedict)
730         {
731                 VectorCopy(trace.endpos, temp);
732                 endstuck = SV_Move_(temp, mins, maxs, temp, type, passedict).startsolid;
733 #if COLLISIONPARANOID < 3
734                 if (trace.startsolid || endstuck)
735 #endif
736                         Con_Printf("%s{e%i:%f %f %f:%f %f %f:%f:%f %f %f%s%s}\n", (trace.startsolid || endstuck) ? "\002" : "", passedict ? passedict - prog->edicts : -1, passedict->fields.server->origin[0], passedict->fields.server->origin[1], passedict->fields.server->origin[2], end[0] - passedict->fields.server->origin[0], end[1] - passedict->fields.server->origin[1], end[2] - passedict->fields.server->origin[2], trace.fraction, trace.endpos[0] - passedict->fields.server->origin[0], trace.endpos[1] - passedict->fields.server->origin[1], trace.endpos[2] - passedict->fields.server->origin[2], trace.startsolid ? " startstuck" : "", endstuck ? " endstuck" : "");
737         }
738         return trace;
739 }
740 #endif
741
742