The broken pushers are PARTLY fixed. They will now stop when in contact with an entit...
[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         Mod_CheckLoaded(sv.worldmodel);
139         SV_CreateAreaGrid(sv.worldmodel->normalmins, sv.worldmodel->normalmaxs);
140 }
141
142
143 /*
144 ===============
145 SV_UnlinkEdict
146
147 ===============
148 */
149 void SV_UnlinkEdict (prvm_edict_t *ent)
150 {
151         int i;
152         for (i = 0;i < ENTITYGRIDAREAS;i++)
153         {
154                 if (ent->priv.server->areagrid[i].prev)
155                 {
156                         RemoveLink (&ent->priv.server->areagrid[i]);
157                         ent->priv.server->areagrid[i].prev = ent->priv.server->areagrid[i].next = NULL;
158                 }
159         }
160 }
161
162 int SV_EntitiesInBox(vec3_t mins, vec3_t maxs, int maxlist, prvm_edict_t **list)
163 {
164         int numlist;
165         areagrid_t *grid;
166         link_t *l;
167         prvm_edict_t *ent;
168         int igrid[3], igridmins[3], igridmaxs[3];
169
170         sv_areagrid_stats_calls++;
171         sv_areagrid_marknumber++;
172         igridmins[0] = (int) ((mins[0] + sv_areagrid_bias[0]) * sv_areagrid_scale[0]);
173         igridmins[1] = (int) ((mins[1] + sv_areagrid_bias[1]) * sv_areagrid_scale[1]);
174         //igridmins[2] = (int) ((mins[2] + sv_areagrid_bias[2]) * sv_areagrid_scale[2]);
175         igridmaxs[0] = (int) ((maxs[0] + sv_areagrid_bias[0]) * sv_areagrid_scale[0]) + 1;
176         igridmaxs[1] = (int) ((maxs[1] + sv_areagrid_bias[1]) * sv_areagrid_scale[1]) + 1;
177         //igridmaxs[2] = (int) ((maxs[2] + sv_areagrid_bias[2]) * sv_areagrid_scale[2]) + 1;
178         igridmins[0] = max(0, igridmins[0]);
179         igridmins[1] = max(0, igridmins[1]);
180         //igridmins[2] = max(0, igridmins[2]);
181         igridmaxs[0] = min(AREA_GRID, igridmaxs[0]);
182         igridmaxs[1] = min(AREA_GRID, igridmaxs[1]);
183         //igridmaxs[2] = min(AREA_GRID, igridmaxs[2]);
184
185         numlist = 0;
186         // add entities not linked into areagrid because they are too big or
187         // outside the grid bounds
188         if (sv_areagrid_outside.edicts.next != &sv_areagrid_outside.edicts)
189         {
190                 for (l = sv_areagrid_outside.edicts.next;l != &sv_areagrid_outside.edicts;l = l->next)
191                 {
192                         ent = PRVM_EDICT_NUM_UNSIGNED(l->entitynumber);
193                         if (ent->priv.server->areagridmarknumber != sv_areagrid_marknumber)
194                         {
195                                 ent->priv.server->areagridmarknumber = sv_areagrid_marknumber;
196                                 if (!ent->priv.server->free && BoxesOverlap(mins, maxs, ent->fields.server->absmin, ent->fields.server->absmax))
197                                 {
198                                         if (numlist < maxlist)
199                                                 list[numlist] = ent;
200                                         numlist++;
201                                 }
202                                 sv_areagrid_stats_entitychecks++;
203                         }
204                 }
205         }
206         // add grid linked entities
207         for (igrid[1] = igridmins[1];igrid[1] < igridmaxs[1];igrid[1]++)
208         {
209                 grid = sv_areagrid + igrid[1] * AREA_GRID + igridmins[0];
210                 for (igrid[0] = igridmins[0];igrid[0] < igridmaxs[0];igrid[0]++, grid++)
211                 {
212                         if (grid->edicts.next != &grid->edicts)
213                         {
214                                 for (l = grid->edicts.next;l != &grid->edicts;l = l->next)
215                                 {
216                                         ent = PRVM_EDICT_NUM_UNSIGNED(l->entitynumber);
217                                         if (ent->priv.server->areagridmarknumber != sv_areagrid_marknumber)
218                                         {
219                                                 ent->priv.server->areagridmarknumber = sv_areagrid_marknumber;
220                                                 if (!ent->priv.server->free && BoxesOverlap(mins, maxs, ent->fields.server->absmin, ent->fields.server->absmax))
221                                                 {
222                                                         if (numlist < maxlist)
223                                                                 list[numlist] = ent;
224                                                         numlist++;
225                                                 }
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) ((ent->fields.server->absmin[0] + sv_areagrid_bias[0]) * sv_areagrid_scale[0]);
279         igridmins[1] = (int) ((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) ((ent->fields.server->absmax[0] + sv_areagrid_bias[0]) * sv_areagrid_scale[0]) + 1;
282         igridmaxs[1] = (int) ((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                         Mod_CheckLoaded(model);
333                         if (!model->TraceBox)
334                                 Con_Printf("edict %i: SOLID_BSP with non-collidable model\n", PRVM_NUM_FOR_EDICT(ent));
335
336                         if (ent->fields.server->angles[0] || ent->fields.server->angles[2] || ent->fields.server->avelocity[0] || ent->fields.server->avelocity[2])
337                         {
338                                 VectorAdd(ent->fields.server->origin, model->rotatedmins, ent->fields.server->absmin);
339                                 VectorAdd(ent->fields.server->origin, model->rotatedmaxs, ent->fields.server->absmax);
340                         }
341                         else if (ent->fields.server->angles[1] || ent->fields.server->avelocity[1])
342                         {
343                                 VectorAdd(ent->fields.server->origin, model->yawmins, ent->fields.server->absmin);
344                                 VectorAdd(ent->fields.server->origin, model->yawmaxs, ent->fields.server->absmax);
345                         }
346                         else
347                         {
348                                 VectorAdd(ent->fields.server->origin, model->normalmins, ent->fields.server->absmin);
349                                 VectorAdd(ent->fields.server->origin, model->normalmaxs, ent->fields.server->absmax);
350                         }
351                 }
352                 else
353                 {
354                         // SOLID_BSP with no model is valid, mainly because some QC setup code does so temporarily
355                         VectorAdd(ent->fields.server->origin, ent->fields.server->mins, ent->fields.server->absmin);
356                         VectorAdd(ent->fields.server->origin, ent->fields.server->maxs, ent->fields.server->absmax);
357                 }
358         }
359         else
360         {
361                 VectorAdd(ent->fields.server->origin, ent->fields.server->mins, ent->fields.server->absmin);
362                 VectorAdd(ent->fields.server->origin, ent->fields.server->maxs, ent->fields.server->absmax);
363         }
364
365 //
366 // to make items easier to pick up and allow them to be grabbed off
367 // of shelves, the abs sizes are expanded
368 //
369         if ((int)ent->fields.server->flags & FL_ITEM)
370         {
371                 ent->fields.server->absmin[0] -= 15;
372                 ent->fields.server->absmin[1] -= 15;
373                 ent->fields.server->absmin[2] -= 1;
374                 ent->fields.server->absmax[0] += 15;
375                 ent->fields.server->absmax[1] += 15;
376                 ent->fields.server->absmax[2] += 1;
377         }
378         else
379         {
380                 // because movement is clipped an epsilon away from an actual edge,
381                 // we must fully check even when bounding boxes don't quite touch
382                 ent->fields.server->absmin[0] -= 1;
383                 ent->fields.server->absmin[1] -= 1;
384                 ent->fields.server->absmin[2] -= 1;
385                 ent->fields.server->absmax[0] += 1;
386                 ent->fields.server->absmax[1] += 1;
387                 ent->fields.server->absmax[2] += 1;
388         }
389
390         if (ent->fields.server->solid == SOLID_NOT)
391                 return;
392
393         SV_LinkEdict_AreaGrid(ent);
394
395 // if touch_triggers, touch all entities at this node and descend for more
396         if (touch_triggers)
397                 SV_TouchAreaGrid(ent);
398 }
399
400
401
402 /*
403 ===============================================================================
404
405 POINT TESTING IN HULLS
406
407 ===============================================================================
408 */
409
410 /*
411 ============
412 SV_TestEntityPosition
413
414 This could be a lot more efficient...
415 ============
416 */
417 int SV_TestEntityPosition (prvm_edict_t *ent)
418 {
419         return SV_Move (ent->fields.server->origin, ent->fields.server->mins, ent->fields.server->maxs, ent->fields.server->origin, MOVE_NORMAL, ent).startsolid;
420 }
421
422
423 /*
424 ===============================================================================
425
426 LINE TESTING IN HULLS
427
428 ===============================================================================
429 */
430
431 /*
432 ==================
433 SV_ClipMoveToEntity
434
435 Handles selection or creation of a clipping hull, and offseting (and
436 eventually rotation) of the end points
437 ==================
438 */
439 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)
440 {
441         trace_t trace;
442         model_t *model = NULL;
443         matrix4x4_t matrix, imatrix;
444         float tempnormal[3], starttransformed[3], endtransformed[3];
445         float starttransformedmins[3], starttransformedmaxs[3], endtransformedmins[3], endtransformedmaxs[3];
446
447         memset(&trace, 0, sizeof(trace));
448         trace.fraction = trace.realfraction = 1;
449         VectorCopy(end, trace.endpos);
450
451         if ((int) ent->fields.server->solid == SOLID_BSP || movetype == MOVE_HITMODEL)
452         {
453                 unsigned int modelindex = ent->fields.server->modelindex;
454                 // if the modelindex is 0, it shouldn't be SOLID_BSP!
455                 if (modelindex == 0)
456                 {
457                         Con_Printf("SV_ClipMoveToEntity: edict %i: SOLID_BSP with no model\n", PRVM_NUM_FOR_EDICT(ent));
458                         return trace;
459                 }
460                 if (modelindex >= MAX_MODELS)
461                 {
462                         Con_Printf("SV_ClipMoveToEntity: edict %i: SOLID_BSP with invalid modelindex\n", PRVM_NUM_FOR_EDICT(ent));
463                         return trace;
464                 }
465                 model = sv.models[modelindex];
466                 if (modelindex != 0 && model == NULL)
467                 {
468                         Con_Printf("SV_ClipMoveToEntity: edict %i: SOLID_BSP with invalid modelindex\n", PRVM_NUM_FOR_EDICT(ent));
469                         return trace;
470                 }
471
472                 Mod_CheckLoaded(model);
473                 if ((int) ent->fields.server->solid == SOLID_BSP)
474                 {
475                         if (!model->TraceBox)
476                         {
477                                 Con_Printf("SV_ClipMoveToEntity: edict %i: SOLID_BSP with a non-collidable model\n", PRVM_NUM_FOR_EDICT(ent));
478                                 return trace;
479                         }
480                         //if ((int) ent->fields.server->movetype != MOVETYPE_PUSH)
481                         //{
482                         //      Con_Printf("SV_ClipMoveToEntity: edict %i: SOLID_BSP without MOVETYPE_PUSH\n", PRVM_NUM_FOR_EDICT(ent));
483                         //      return trace;
484                         //}
485                 }
486                 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);
487         }
488         else
489                 Matrix4x4_CreateTranslate(&matrix, ent->fields.server->origin[0], ent->fields.server->origin[1], ent->fields.server->origin[2]);
490
491         Matrix4x4_Invert_Simple(&imatrix, &matrix);
492         Matrix4x4_Transform(&imatrix, start, starttransformed);
493         Matrix4x4_Transform(&imatrix, end, endtransformed);
494 #if COLLISIONPARANOID >= 3
495         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]);
496 #endif
497
498         if (model && model->TraceBox)
499         {
500                 int frame;
501                 frame = (int)ent->fields.server->frame;
502                 frame = bound(0, frame, (model->numframes - 1));
503                 VectorAdd(starttransformed, maxs, starttransformedmaxs);
504                 VectorAdd(endtransformed, maxs, endtransformedmaxs);
505                 VectorAdd(starttransformed, mins, starttransformedmins);
506                 VectorAdd(endtransformed, mins, endtransformedmins);
507                 model->TraceBox(model, frame, &trace, starttransformedmins, starttransformedmaxs, endtransformedmins, endtransformedmaxs, hitsupercontents);
508         }
509         else
510                 Collision_ClipTrace_Box(&trace, ent->fields.server->mins, ent->fields.server->maxs, starttransformed, mins, maxs, endtransformed, hitsupercontents, SUPERCONTENTS_SOLID);
511         trace.fraction = bound(0, trace.fraction, 1);
512         trace.realfraction = bound(0, trace.realfraction, 1);
513
514         if (trace.fraction < 1)
515         {
516                 VectorLerp(start, trace.fraction, end, trace.endpos);
517                 VectorCopy(trace.plane.normal, tempnormal);
518                 Matrix4x4_Transform3x3(&matrix, tempnormal, trace.plane.normal);
519                 // FIXME: should recalc trace.plane.dist
520         }
521         else
522                 VectorCopy(end, trace.endpos);
523
524         return trace;
525 }
526
527 //===========================================================================
528
529 /*
530 ==================
531 SV_Move
532 ==================
533 */
534 #if COLLISIONPARANOID >= 1
535 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)
536 #else
537 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)
538 #endif
539 {
540         vec3_t hullmins, hullmaxs;
541         int i;
542         int hitsupercontentsmask;
543         int passedictprog;
544         qboolean pointtrace;
545         prvm_edict_t *traceowner, *touch;
546         trace_t trace;
547         // bounding box of entire move area
548         vec3_t clipboxmins, clipboxmaxs;
549         // size of the moving object
550         vec3_t clipmins, clipmaxs;
551         // size when clipping against monsters
552         vec3_t clipmins2, clipmaxs2;
553         // start and end origin of move
554         vec3_t clipstart, clipend;
555         // trace results
556         trace_t cliptrace;
557         int numtouchedicts;
558         prvm_edict_t *touchedicts[MAX_EDICTS];
559
560         VectorCopy(start, clipstart);
561         VectorCopy(end, clipend);
562         VectorCopy(mins, clipmins);
563         VectorCopy(maxs, clipmaxs);
564         VectorCopy(mins, clipmins2);
565         VectorCopy(maxs, clipmaxs2);
566 #if COLLISIONPARANOID >= 3
567         Con_Printf("move(%f %f %f,%f %f %f)", clipstart[0], clipstart[1], clipstart[2], clipend[0], clipend[1], clipend[2]);
568 #endif
569
570         hitsupercontentsmask = SUPERCONTENTS_SOLID;
571         if (passedict)
572         {
573                 if (passedict->fields.server->solid == SOLID_SLIDEBOX)
574                         hitsupercontentsmask |= SUPERCONTENTS_PLAYERCLIP;
575                 if ((int)passedict->fields.server->flags & FL_MONSTER)
576                         hitsupercontentsmask |= SUPERCONTENTS_MONSTERCLIP;
577         }
578
579         // clip to world
580         cliptrace = SV_ClipMoveToEntity(prog->edicts, clipstart, clipmins, clipmaxs, clipend, type, hitsupercontentsmask);
581         if (cliptrace.startsolid || cliptrace.fraction < 1)
582                 cliptrace.ent = prog->edicts;
583         if (type == MOVE_WORLDONLY)
584                 return cliptrace;
585
586         if (type == MOVE_MISSILE)
587         {
588                 // LordHavoc: modified this, was = -15, now -= 15
589                 for (i = 0;i < 3;i++)
590                 {
591                         clipmins2[i] -= 15;
592                         clipmaxs2[i] += 15;
593                 }
594         }
595
596         // get adjusted box for bmodel collisions if the world is q1bsp or hlbsp
597         if (sv.worldmodel && sv.worldmodel->brush.RoundUpToHullSize)
598                 sv.worldmodel->brush.RoundUpToHullSize(sv.worldmodel, clipmins, clipmaxs, hullmins, hullmaxs);
599         else
600         {
601                 VectorCopy(clipmins, hullmins);
602                 VectorCopy(clipmaxs, hullmaxs);
603         }
604
605         // create the bounding box of the entire move
606         for (i = 0;i < 3;i++)
607         {
608                 clipboxmins[i] = min(clipstart[i], cliptrace.endpos[i]) + min(hullmins[i], clipmins2[i]) - 1;
609                 clipboxmaxs[i] = max(clipstart[i], cliptrace.endpos[i]) + max(hullmaxs[i], clipmaxs2[i]) + 1;
610         }
611
612         // debug override to test against everything
613         if (sv_debugmove.integer)
614         {
615                 clipboxmins[0] = clipboxmins[1] = clipboxmins[2] = -999999999;
616                 clipboxmaxs[0] = clipboxmaxs[1] = clipboxmaxs[2] =  999999999;
617         }
618
619         // if the passedict is world, make it NULL (to avoid two checks each time)
620         if (passedict == prog->edicts)
621                 passedict = NULL;
622         // precalculate prog value for passedict for comparisons
623         passedictprog = PRVM_EDICT_TO_PROG(passedict);
624         // figure out whether this is a point trace for comparisons
625         pointtrace = VectorCompare(clipmins, clipmaxs);
626         // precalculate passedict's owner edict pointer for comparisons
627         traceowner = passedict ? PRVM_PROG_TO_EDICT(passedict->fields.server->owner) : 0;
628
629         // clip to enttiies
630         numtouchedicts = SV_EntitiesInBox(clipboxmins, clipboxmaxs, MAX_EDICTS, touchedicts);
631         if (numtouchedicts > MAX_EDICTS)
632         {
633                 // this never happens
634                 Con_Printf("SV_EntitiesInBox returned %i edicts, max was %i\n", numtouchedicts, MAX_EDICTS);
635                 numtouchedicts = MAX_EDICTS;
636         }
637         for (i = 0;i < numtouchedicts;i++)
638         {
639                 touch = touchedicts[i];
640
641                 if (touch->fields.server->solid < SOLID_BBOX)
642                         continue;
643                 if (type == MOVE_NOMONSTERS && touch->fields.server->solid != SOLID_BSP)
644                         continue;
645
646                 if (passedict)
647                 {
648                         // don't clip against self
649                         if (passedict == touch)
650                                 continue;
651                         // don't clip owned entities against owner
652                         if (traceowner == touch)
653                                 continue;
654                         // don't clip owner against owned entities
655                         if (passedictprog == touch->fields.server->owner)
656                                 continue;
657                         // don't clip points against points (they can't collide)
658                         if (pointtrace && VectorCompare(touch->fields.server->mins, touch->fields.server->maxs) && (type != MOVE_MISSILE || !((int)touch->fields.server->flags & FL_MONSTER)))
659                                 continue;
660                         // don't clip corpse against character
661                         if (passedict->fields.server->solid == SOLID_CORPSE && (touch->fields.server->solid == SOLID_SLIDEBOX || touch->fields.server->solid == SOLID_CORPSE))
662                                 continue;
663                         // don't clip character against corpse
664                         if (passedict->fields.server->solid == SOLID_SLIDEBOX && touch->fields.server->solid == SOLID_CORPSE)
665                                 continue;
666                 }
667
668                 // might interact, so do an exact clip
669                 if ((int)touch->fields.server->flags & FL_MONSTER)
670                         trace = SV_ClipMoveToEntity(touch, clipstart, clipmins2, clipmaxs2, clipend, type, hitsupercontentsmask);
671                 else
672                         trace = SV_ClipMoveToEntity(touch, clipstart, clipmins, clipmaxs, clipend, type, hitsupercontentsmask);
673                 // LordHavoc: take the 'best' answers from the new trace and combine with existing data
674                 if (trace.allsolid)
675                         cliptrace.allsolid = true;
676                 if (trace.startsolid)
677                 {
678                         cliptrace.startsolid = true;
679                         if (cliptrace.realfraction == 1)
680                                 cliptrace.ent = touch;
681                 }
682                 // don't set this except on the world, because it can easily confuse
683                 // monsters underwater if there's a bmodel involved in the trace
684                 // (inopen && inwater is how they check water visibility)
685                 //if (trace.inopen)
686                 //      cliptrace.inopen = true;
687                 if (trace.inwater)
688                         cliptrace.inwater = true;
689                 if (trace.realfraction < cliptrace.realfraction)
690                 {
691                         cliptrace.fraction = trace.fraction;
692                         cliptrace.realfraction = trace.realfraction;
693                         VectorCopy(trace.endpos, cliptrace.endpos);
694                         cliptrace.plane = trace.plane;
695                         cliptrace.ent = touch;
696                 }
697                 cliptrace.startsupercontents |= trace.startsupercontents;
698         }
699
700         return cliptrace;
701 }
702
703 #if COLLISIONPARANOID >= 1
704 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)
705 {
706         int endstuck;
707         trace_t trace;
708         vec3_t temp;
709         trace = SV_Move_(start, mins, maxs, end, type, passedict);
710         if (passedict)
711         {
712                 VectorCopy(trace.endpos, temp);
713                 endstuck = SV_Move_(temp, mins, maxs, temp, type, passedict).startsolid;
714 #if COLLISIONPARANOID < 3
715                 if (trace.startsolid || endstuck)
716 #endif
717                         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" : "");
718         }
719         return trace;
720 }
721 #endif
722
723 int SV_PointSuperContents(const vec3_t point)
724 {
725         return SV_Move(point, vec3_origin, vec3_origin, point, sv_gameplayfix_swiminbmodels.integer ? MOVE_NOMONSTERS : MOVE_WORLDONLY, NULL).startsupercontents;
726 }
727
728 int SV_PointQ1Contents(const vec3_t point)
729 {
730         return Mod_Q1BSP_NativeContentsFromSuperContents(NULL, SV_PointSuperContents(point));
731 }
732
733