]> icculus.org git repositories - divverent/darkplaces.git/blob - world.c
renamed varray_ arrays to rsurface_array_, and they are no longer used outside the...
[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", "disables collision detection optimizations for debugging purposes"};
33 cvar_t sv_areagrid_mingridsize = {CVAR_NOTIFY, "sv_areagrid_mingridsize", "64", "minimum areagrid cell size, smaller values work better for lots of small objects, higher values for large objects"};
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, "prints information on culling grid system");
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) floor((mins[0] + sv_areagrid_bias[0]) * sv_areagrid_scale[0]);
172         igridmins[1] = (int) floor((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) floor((maxs[0] + sv_areagrid_bias[0]) * sv_areagrid_scale[0]) + 1;
175         igridmaxs[1] = (int) floor((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                                                 //      Con_Printf("%d %f %f %f %f %f %f : %d : %f %f %f %f %f %f\n", BoxesOverlap(mins, maxs, ent->fields.server->absmin, ent->fields.server->absmax), ent->fields.server->absmin[0], ent->fields.server->absmin[1], ent->fields.server->absmin[2], ent->fields.server->absmax[0], ent->fields.server->absmax[1], ent->fields.server->absmax[2], PRVM_NUM_FOR_EDICT(ent), mins[0], mins[1], mins[2], maxs[0], maxs[1], maxs[2]);
226                                         }
227                                         sv_areagrid_stats_entitychecks++;
228                                 }
229                         }
230                 }
231         }
232         return numlist;
233 }
234
235 void SV_TouchAreaGrid(prvm_edict_t *ent)
236 {
237         int i, numtouchedicts, old_self, old_other;
238         prvm_edict_t *touch, *touchedicts[MAX_EDICTS];
239
240         // build a list of edicts to touch, because the link loop can be corrupted
241         // by SV_IncreaseEdicts called during touch functions
242         numtouchedicts = SV_EntitiesInBox(ent->fields.server->absmin, ent->fields.server->absmax, MAX_EDICTS, touchedicts);
243         if (numtouchedicts > MAX_EDICTS)
244         {
245                 // this never happens
246                 Con_Printf("SV_EntitiesInBox returned %i edicts, max was %i\n", numtouchedicts, MAX_EDICTS);
247                 numtouchedicts = MAX_EDICTS;
248         }
249
250         old_self = prog->globals.server->self;
251         old_other = prog->globals.server->other;
252         for (i = 0;i < numtouchedicts;i++)
253         {
254                 touch = touchedicts[i];
255                 if (touch != ent && (int)touch->fields.server->solid == SOLID_TRIGGER && touch->fields.server->touch)
256                 {
257                         prog->globals.server->self = PRVM_EDICT_TO_PROG(touch);
258                         prog->globals.server->other = PRVM_EDICT_TO_PROG(ent);
259                         prog->globals.server->time = sv.time;
260                         PRVM_ExecuteProgram (touch->fields.server->touch, "QC function self.touch is missing");
261                 }
262         }
263         prog->globals.server->self = old_self;
264         prog->globals.server->other = old_other;
265 }
266
267 void SV_LinkEdict_AreaGrid(prvm_edict_t *ent)
268 {
269         areagrid_t *grid;
270         int igrid[3], igridmins[3], igridmaxs[3], gridnum, entitynumber = PRVM_NUM_FOR_EDICT(ent);
271
272         if (entitynumber <= 0 || entitynumber >= prog->max_edicts || PRVM_EDICT_NUM(entitynumber) != ent)
273         {
274                 Con_Printf ("SV_LinkEdict_AreaGrid: invalid edict %p (edicts is %p, edict compared to prog->edicts is %i)\n", ent, prog->edicts, entitynumber);
275                 return;
276         }
277
278         igridmins[0] = (int) floor((ent->fields.server->absmin[0] + sv_areagrid_bias[0]) * sv_areagrid_scale[0]);
279         igridmins[1] = (int) floor((ent->fields.server->absmin[1] + sv_areagrid_bias[1]) * sv_areagrid_scale[1]);
280         //igridmins[2] = (int) ((ent->fields.server->absmin[2] + sv_areagrid_bias[2]) * sv_areagrid_scale[2]);
281         igridmaxs[0] = (int) floor((ent->fields.server->absmax[0] + sv_areagrid_bias[0]) * sv_areagrid_scale[0]) + 1;
282         igridmaxs[1] = (int) floor((ent->fields.server->absmax[1] + sv_areagrid_bias[1]) * sv_areagrid_scale[1]) + 1;
283         //igridmaxs[2] = (int) ((ent->fields.server->absmax[2] + sv_areagrid_bias[2]) * sv_areagrid_scale[2]) + 1;
284         if (igridmins[0] < 0 || igridmaxs[0] > AREA_GRID || igridmins[1] < 0 || igridmaxs[1] > AREA_GRID || ((igridmaxs[0] - igridmins[0]) * (igridmaxs[1] - igridmins[1])) > ENTITYGRIDAREAS)
285         {
286                 // wow, something outside the grid, store it as such
287                 InsertLinkBefore (&ent->priv.server->areagrid[0], &sv_areagrid_outside.edicts, entitynumber);
288                 return;
289         }
290
291         gridnum = 0;
292         for (igrid[1] = igridmins[1];igrid[1] < igridmaxs[1];igrid[1]++)
293         {
294                 grid = sv_areagrid + igrid[1] * AREA_GRID + igridmins[0];
295                 for (igrid[0] = igridmins[0];igrid[0] < igridmaxs[0];igrid[0]++, grid++, gridnum++)
296                         InsertLinkBefore (&ent->priv.server->areagrid[gridnum], &grid->edicts, entitynumber);
297         }
298 }
299
300 /*
301 ===============
302 SV_LinkEdict
303
304 ===============
305 */
306 void SV_LinkEdict (prvm_edict_t *ent, qboolean touch_triggers)
307 {
308         model_t *model;
309
310         if (ent->priv.server->areagrid[0].prev)
311                 SV_UnlinkEdict (ent);   // unlink from old position
312
313         if (ent == prog->edicts)
314                 return;         // don't add the world
315
316         if (ent->priv.server->free)
317                 return;
318
319 // set the abs box
320
321         if (ent->fields.server->solid == SOLID_BSP)
322         {
323                 int modelindex = ent->fields.server->modelindex;
324                 if (modelindex < 0 || modelindex > MAX_MODELS)
325                 {
326                         Con_Printf("edict %i: SOLID_BSP with invalid modelindex!\n", PRVM_NUM_FOR_EDICT(ent));
327                         modelindex = 0;
328                 }
329                 model = sv.models[modelindex];
330                 if (model != NULL)
331                 {
332                         if (!model->TraceBox)
333                                 Con_Printf("edict %i: SOLID_BSP with non-collidable model\n", PRVM_NUM_FOR_EDICT(ent));
334
335                         if (ent->fields.server->angles[0] || ent->fields.server->angles[2] || ent->fields.server->avelocity[0] || ent->fields.server->avelocity[2])
336                         {
337                                 VectorAdd(ent->fields.server->origin, model->rotatedmins, ent->fields.server->absmin);
338                                 VectorAdd(ent->fields.server->origin, model->rotatedmaxs, ent->fields.server->absmax);
339                         }
340                         else if (ent->fields.server->angles[1] || ent->fields.server->avelocity[1])
341                         {
342                                 VectorAdd(ent->fields.server->origin, model->yawmins, ent->fields.server->absmin);
343                                 VectorAdd(ent->fields.server->origin, model->yawmaxs, ent->fields.server->absmax);
344                         }
345                         else
346                         {
347                                 VectorAdd(ent->fields.server->origin, model->normalmins, ent->fields.server->absmin);
348                                 VectorAdd(ent->fields.server->origin, model->normalmaxs, ent->fields.server->absmax);
349                         }
350                 }
351                 else
352                 {
353                         // SOLID_BSP with no model is valid, mainly because some QC setup code does so temporarily
354                         VectorAdd(ent->fields.server->origin, ent->fields.server->mins, ent->fields.server->absmin);
355                         VectorAdd(ent->fields.server->origin, ent->fields.server->maxs, ent->fields.server->absmax);
356                 }
357         }
358         else
359         {
360                 VectorAdd(ent->fields.server->origin, ent->fields.server->mins, ent->fields.server->absmin);
361                 VectorAdd(ent->fields.server->origin, ent->fields.server->maxs, ent->fields.server->absmax);
362         }
363
364 //
365 // to make items easier to pick up and allow them to be grabbed off
366 // of shelves, the abs sizes are expanded
367 //
368         if ((int)ent->fields.server->flags & FL_ITEM)
369         {
370                 ent->fields.server->absmin[0] -= 15;
371                 ent->fields.server->absmin[1] -= 15;
372                 ent->fields.server->absmin[2] -= 1;
373                 ent->fields.server->absmax[0] += 15;
374                 ent->fields.server->absmax[1] += 15;
375                 ent->fields.server->absmax[2] += 1;
376         }
377         else
378         {
379                 // because movement is clipped an epsilon away from an actual edge,
380                 // we must fully check even when bounding boxes don't quite touch
381                 ent->fields.server->absmin[0] -= 1;
382                 ent->fields.server->absmin[1] -= 1;
383                 ent->fields.server->absmin[2] -= 1;
384                 ent->fields.server->absmax[0] += 1;
385                 ent->fields.server->absmax[1] += 1;
386                 ent->fields.server->absmax[2] += 1;
387         }
388
389         SV_LinkEdict_AreaGrid(ent);
390
391 // if touch_triggers, touch all entities at this node and descend for more
392         if (touch_triggers && ent->fields.server->solid != SOLID_NOT)
393                 SV_TouchAreaGrid(ent);
394 }
395
396
397
398 /*
399 ===============================================================================
400
401 LINE TESTING IN HULLS
402
403 ===============================================================================
404 */
405
406 /*
407 ==================
408 SV_ClipMoveToEntity
409
410 Handles selection or creation of a clipping hull, and offseting (and
411 eventually rotation) of the end points
412 ==================
413 */
414 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)
415 {
416         trace_t trace;
417         model_t *model = NULL;
418         matrix4x4_t matrix, imatrix;
419         float tempnormal[3], starttransformed[3], endtransformed[3];
420
421         memset(&trace, 0, sizeof(trace));
422         trace.fraction = trace.realfraction = 1;
423         VectorCopy(end, trace.endpos);
424
425         if ((int) ent->fields.server->solid == SOLID_BSP || movetype == MOVE_HITMODEL)
426         {
427                 unsigned int modelindex = ent->fields.server->modelindex;
428                 // if the modelindex is 0, it shouldn't be SOLID_BSP!
429                 if (modelindex == 0)
430                 {
431                         Con_Printf("SV_ClipMoveToEntity: edict %i: SOLID_BSP with no model\n", PRVM_NUM_FOR_EDICT(ent));
432                         return trace;
433                 }
434                 if (modelindex >= MAX_MODELS)
435                 {
436                         Con_Printf("SV_ClipMoveToEntity: edict %i: SOLID_BSP with invalid modelindex\n", PRVM_NUM_FOR_EDICT(ent));
437                         return trace;
438                 }
439                 model = sv.models[modelindex];
440                 if (modelindex != 0 && model == NULL)
441                 {
442                         Con_Printf("SV_ClipMoveToEntity: edict %i: SOLID_BSP with invalid modelindex\n", PRVM_NUM_FOR_EDICT(ent));
443                         return trace;
444                 }
445
446                 if ((int) ent->fields.server->solid == SOLID_BSP)
447                 {
448                         if (!model->TraceBox)
449                         {
450                                 Con_Printf("SV_ClipMoveToEntity: edict %i: SOLID_BSP with a non-collidable model\n", PRVM_NUM_FOR_EDICT(ent));
451                                 return trace;
452                         }
453                         //if ((int) ent->fields.server->movetype != MOVETYPE_PUSH)
454                         //{
455                         //      Con_Printf("SV_ClipMoveToEntity: edict %i: SOLID_BSP without MOVETYPE_PUSH\n", PRVM_NUM_FOR_EDICT(ent));
456                         //      return trace;
457                         //}
458                 }
459                 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);
460         }
461         else
462                 Matrix4x4_CreateTranslate(&matrix, ent->fields.server->origin[0], ent->fields.server->origin[1], ent->fields.server->origin[2]);
463
464         Matrix4x4_Invert_Simple(&imatrix, &matrix);
465         Matrix4x4_Transform(&imatrix, start, starttransformed);
466         Matrix4x4_Transform(&imatrix, end, endtransformed);
467 #if COLLISIONPARANOID >= 3
468         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]);
469 #endif
470
471         if (model && model->TraceBox)
472         {
473                 int frame;
474                 frame = (int)ent->fields.server->frame;
475                 frame = bound(0, frame, (model->numframes - 1));
476                 model->TraceBox(model, frame, &trace, starttransformed, mins, maxs, endtransformed, hitsupercontents);
477         }
478         else
479                 Collision_ClipTrace_Box(&trace, ent->fields.server->mins, ent->fields.server->maxs, starttransformed, mins, maxs, endtransformed, hitsupercontents, SUPERCONTENTS_SOLID);
480         trace.fraction = bound(0, trace.fraction, 1);
481         trace.realfraction = bound(0, trace.realfraction, 1);
482
483         if (trace.fraction < 1)
484         {
485                 VectorLerp(start, trace.fraction, end, trace.endpos);
486                 VectorCopy(trace.plane.normal, tempnormal);
487                 Matrix4x4_Transform3x3(&matrix, tempnormal, trace.plane.normal);
488                 // FIXME: should recalc trace.plane.dist
489         }
490         else
491                 VectorCopy(end, trace.endpos);
492
493         return trace;
494 }
495
496 /*
497 ==================
498 SV_ClipMoveToWorld
499 ==================
500 */
501 trace_t SV_ClipMoveToWorld(const vec3_t start, const vec3_t mins, const vec3_t maxs, const vec3_t end, int movetype, int hitsupercontents)
502 {
503         trace_t trace;
504         memset(&trace, 0, sizeof(trace));
505         trace.fraction = trace.realfraction = 1;
506         sv.worldmodel->TraceBox(sv.worldmodel, 0, &trace, start, mins, maxs, end, hitsupercontents);
507         trace.fraction = bound(0, trace.fraction, 1);
508         trace.realfraction = bound(0, trace.realfraction, 1);
509         VectorLerp(start, trace.fraction, end, trace.endpos);
510         return trace;
511 }
512
513 //===========================================================================
514
515 /*
516 ==================
517 SV_Move
518 ==================
519 */
520 #if COLLISIONPARANOID >= 1
521 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)
522 #else
523 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)
524 #endif
525 {
526         vec3_t hullmins, hullmaxs;
527         int i;
528         int hitsupercontentsmask;
529         int passedictprog;
530         qboolean pointtrace;
531         prvm_edict_t *traceowner, *touch;
532         trace_t trace;
533         // bounding box of entire move area
534         vec3_t clipboxmins, clipboxmaxs;
535         // size of the moving object
536         vec3_t clipmins, clipmaxs;
537         // size when clipping against monsters
538         vec3_t clipmins2, clipmaxs2;
539         // start and end origin of move
540         vec3_t clipstart, clipend;
541         // trace results
542         trace_t cliptrace;
543         int numtouchedicts;
544         prvm_edict_t *touchedicts[MAX_EDICTS];
545
546         VectorCopy(start, clipstart);
547         VectorCopy(end, clipend);
548         VectorCopy(mins, clipmins);
549         VectorCopy(maxs, clipmaxs);
550         VectorCopy(mins, clipmins2);
551         VectorCopy(maxs, clipmaxs2);
552 #if COLLISIONPARANOID >= 3
553         Con_Printf("move(%f %f %f,%f %f %f)", clipstart[0], clipstart[1], clipstart[2], clipend[0], clipend[1], clipend[2]);
554 #endif
555
556         hitsupercontentsmask = SUPERCONTENTS_SOLID;
557         if (passedict)
558         {
559                 if (passedict->fields.server->solid == SOLID_SLIDEBOX)
560                         hitsupercontentsmask |= SUPERCONTENTS_PLAYERCLIP;
561                 if ((int)passedict->fields.server->flags & FL_MONSTER)
562                         hitsupercontentsmask |= SUPERCONTENTS_MONSTERCLIP;
563         }
564
565         // clip to world
566         cliptrace = SV_ClipMoveToWorld(clipstart, clipmins, clipmaxs, clipend, type, hitsupercontentsmask);
567         cliptrace.startsolid = cliptrace.bmodelstartsolid;
568         if (cliptrace.startsolid || cliptrace.fraction < 1)
569                 cliptrace.ent = prog->edicts;
570         if (type == MOVE_WORLDONLY)
571                 return cliptrace;
572
573         if (type == MOVE_MISSILE)
574         {
575                 // LordHavoc: modified this, was = -15, now -= 15
576                 for (i = 0;i < 3;i++)
577                 {
578                         clipmins2[i] -= 15;
579                         clipmaxs2[i] += 15;
580                 }
581         }
582
583         // get adjusted box for bmodel collisions if the world is q1bsp or hlbsp
584         if (sv.worldmodel && sv.worldmodel->brush.RoundUpToHullSize)
585                 sv.worldmodel->brush.RoundUpToHullSize(sv.worldmodel, clipmins, clipmaxs, hullmins, hullmaxs);
586         else
587         {
588                 VectorCopy(clipmins, hullmins);
589                 VectorCopy(clipmaxs, hullmaxs);
590         }
591
592         // create the bounding box of the entire move
593         for (i = 0;i < 3;i++)
594         {
595                 clipboxmins[i] = min(clipstart[i], cliptrace.endpos[i]) + min(hullmins[i], clipmins2[i]) - 1;
596                 clipboxmaxs[i] = max(clipstart[i], cliptrace.endpos[i]) + max(hullmaxs[i], clipmaxs2[i]) + 1;
597         }
598
599         // debug override to test against everything
600         if (sv_debugmove.integer)
601         {
602                 clipboxmins[0] = clipboxmins[1] = clipboxmins[2] = -999999999;
603                 clipboxmaxs[0] = clipboxmaxs[1] = clipboxmaxs[2] =  999999999;
604         }
605
606         // if the passedict is world, make it NULL (to avoid two checks each time)
607         if (passedict == prog->edicts)
608                 passedict = NULL;
609         // precalculate prog value for passedict for comparisons
610         passedictprog = PRVM_EDICT_TO_PROG(passedict);
611         // figure out whether this is a point trace for comparisons
612         pointtrace = VectorCompare(clipmins, clipmaxs);
613         // precalculate passedict's owner edict pointer for comparisons
614         traceowner = passedict ? PRVM_PROG_TO_EDICT(passedict->fields.server->owner) : 0;
615
616         // clip to enttiies
617         numtouchedicts = SV_EntitiesInBox(clipboxmins, clipboxmaxs, MAX_EDICTS, touchedicts);
618         if (numtouchedicts > MAX_EDICTS)
619         {
620                 // this never happens
621                 Con_Printf("SV_EntitiesInBox returned %i edicts, max was %i\n", numtouchedicts, MAX_EDICTS);
622                 numtouchedicts = MAX_EDICTS;
623         }
624         for (i = 0;i < numtouchedicts;i++)
625         {
626                 touch = touchedicts[i];
627
628                 if (touch->fields.server->solid < SOLID_BBOX)
629                         continue;
630                 if (type == MOVE_NOMONSTERS && touch->fields.server->solid != SOLID_BSP)
631                         continue;
632
633                 if (passedict)
634                 {
635                         // don't clip against self
636                         if (passedict == touch)
637                                 continue;
638                         // don't clip owned entities against owner
639                         if (traceowner == touch)
640                                 continue;
641                         // don't clip owner against owned entities
642                         if (passedictprog == touch->fields.server->owner)
643                                 continue;
644                         // don't clip points against points (they can't collide)
645                         if (pointtrace && VectorCompare(touch->fields.server->mins, touch->fields.server->maxs) && (type != MOVE_MISSILE || !((int)touch->fields.server->flags & FL_MONSTER)))
646                                 continue;
647                         // don't clip corpse against character
648                         if (passedict->fields.server->solid == SOLID_CORPSE && (touch->fields.server->solid == SOLID_SLIDEBOX || touch->fields.server->solid == SOLID_CORPSE))
649                                 continue;
650                         // don't clip character against corpse
651                         if (passedict->fields.server->solid == SOLID_SLIDEBOX && touch->fields.server->solid == SOLID_CORPSE)
652                                 continue;
653                 }
654
655                 // might interact, so do an exact clip
656                 if ((int)touch->fields.server->flags & FL_MONSTER)
657                         trace = SV_ClipMoveToEntity(touch, clipstart, clipmins2, clipmaxs2, clipend, type, hitsupercontentsmask);
658                 else
659                         trace = SV_ClipMoveToEntity(touch, clipstart, clipmins, clipmaxs, clipend, type, hitsupercontentsmask);
660                 // LordHavoc: take the 'best' answers from the new trace and combine with existing data
661                 if (trace.allsolid)
662                         cliptrace.allsolid = true;
663                 if (trace.startsolid)
664                 {
665                         if (touch->fields.server->solid == SOLID_BSP)
666                                 cliptrace.bmodelstartsolid = true;
667                         cliptrace.startsolid = true;
668                         if (cliptrace.realfraction == 1)
669                                 cliptrace.ent = touch;
670                 }
671                 // don't set this except on the world, because it can easily confuse
672                 // monsters underwater if there's a bmodel involved in the trace
673                 // (inopen && inwater is how they check water visibility)
674                 //if (trace.inopen)
675                 //      cliptrace.inopen = true;
676                 if (trace.inwater)
677                         cliptrace.inwater = true;
678                 if (trace.realfraction < cliptrace.realfraction)
679                 {
680                         cliptrace.fraction = trace.fraction;
681                         cliptrace.realfraction = trace.realfraction;
682                         VectorCopy(trace.endpos, cliptrace.endpos);
683                         cliptrace.plane = trace.plane;
684                         cliptrace.ent = touch;
685                 }
686                 cliptrace.startsupercontents |= trace.startsupercontents;
687         }
688
689         return cliptrace;
690 }
691
692 #if COLLISIONPARANOID >= 1
693 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)
694 {
695         int endstuck;
696         trace_t trace;
697         vec3_t temp;
698         trace = SV_Move_(start, mins, maxs, end, type, passedict);
699         if (passedict)
700         {
701                 VectorCopy(trace.endpos, temp);
702                 endstuck = SV_Move_(temp, mins, maxs, temp, type, passedict).startsolid;
703 #if COLLISIONPARANOID < 3
704                 if (trace.startsolid || endstuck)
705 #endif
706                         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" : "");
707         }
708         return trace;
709 }
710 #endif
711
712