5 #define MAXRECURSIVEPORTALPLANES 1024
6 #define MAXRECURSIVEPORTALS 256
8 static tinyplane_t portalplanes[MAXRECURSIVEPORTALPLANES];
9 static int ranoutofportalplanes;
10 static int ranoutofportals;
11 static float portaltemppoints[2][256][3];
12 static float portaltemppoints2[256][3];
13 static int portal_markid = 0;
14 static float boxpoints[4*3];
16 static int Portal_PortalThroughPortalPlanes(tinyplane_t *clipplanes, int clipnumplanes, float *targpoints, int targnumpoints, float *out, int maxpoints)
19 if (targnumpoints < 3)
23 numpoints = targnumpoints;
24 memcpy(&portaltemppoints[0][0][0], targpoints, numpoints * 3 * sizeof(float));
25 for (i = 0;i < clipnumplanes;i++)
27 PolygonF_Divide(numpoints, &portaltemppoints[0][0][0], clipplanes[i].normal[0], clipplanes[i].normal[1], clipplanes[i].normal[2], clipplanes[i].dist, 1.0f/32.0f, 256, &portaltemppoints[1][0][0], &numpoints, 0, NULL, NULL);
30 memcpy(&portaltemppoints[0][0][0], &portaltemppoints[1][0][0], numpoints * 3 * sizeof(float));
32 if (numpoints > maxpoints)
34 memcpy(out, &portaltemppoints[0][0][0], numpoints * 3 * sizeof(float));
38 static int Portal_RecursiveFlowSearch (mleaf_t *leaf, vec3_t eye, int firstclipplane, int numclipplanes)
41 int newpoints, i, prev;
42 vec3_t center, v1, v2;
43 tinyplane_t *newplanes;
45 if (leaf->portalmarkid == portal_markid)
48 // follow portals into other leafs
49 for (p = leaf->portals;p;p = p->next)
51 // only flow through portals facing away from the viewer
52 if (PlaneDiff(eye, (&p->plane)) < 0)
54 newpoints = Portal_PortalThroughPortalPlanes(&portalplanes[firstclipplane], numclipplanes, (float *) p->points, p->numpoints, &portaltemppoints2[0][0], 256);
57 else if (firstclipplane + numclipplanes + newpoints > MAXRECURSIVEPORTALPLANES)
58 ranoutofportalplanes = true;
61 // find the center by averaging
63 for (i = 0;i < newpoints;i++)
64 VectorAdd(center, portaltemppoints2[i], center);
65 // ixtable is a 1.0f / N table
66 VectorScale(center, ixtable[newpoints], center);
67 // calculate the planes, and make sure the polygon can see it's own center
68 newplanes = &portalplanes[firstclipplane + numclipplanes];
69 for (prev = newpoints - 1, i = 0;i < newpoints;prev = i, i++)
71 VectorSubtract(eye, portaltemppoints2[i], v1);
72 VectorSubtract(portaltemppoints2[prev], portaltemppoints2[i], v2);
73 CrossProduct(v1, v2, newplanes[i].normal);
74 VectorNormalize(newplanes[i].normal);
75 newplanes[i].dist = DotProduct(eye, newplanes[i].normal);
76 if (DotProduct(newplanes[i].normal, center) <= newplanes[i].dist)
78 // polygon can't see it's own center, discard and use parent portal
84 if (Portal_RecursiveFlowSearch(p->past, eye, firstclipplane + numclipplanes, newpoints))
89 if (Portal_RecursiveFlowSearch(p->past, eye, firstclipplane, numclipplanes))
99 static void Portal_PolygonRecursiveMarkLeafs(mnode_t *node, float *polypoints, int numpoints)
107 ((mleaf_t *)node)->portalmarkid = portal_markid;
112 for (i = 0, p = polypoints;i < numpoints;i++, p += 3)
114 if (DotProduct(p, node->plane->normal) > node->plane->dist)
119 if (front == numpoints)
121 node = node->children[0];
125 Portal_PolygonRecursiveMarkLeafs(node->children[0], polypoints, numpoints);
127 node = node->children[1];
131 int Portal_CheckPolygon(model_t *model, vec3_t eye, float *polypoints, int numpoints)
133 int i, prev, returnvalue;
135 vec3_t center, v1, v2;
137 // if there is no model, it can not block visibility
138 if (model == NULL || !model->brush.PointInLeaf)
143 Mod_CheckLoaded(model);
144 Portal_PolygonRecursiveMarkLeafs(model->brush.data_nodes, polypoints, numpoints);
146 eyeleaf = model->brush.PointInLeaf(model, eye);
148 // find the center by averaging
150 for (i = 0;i < numpoints;i++)
151 VectorAdd(center, (&polypoints[i * 3]), center);
152 // ixtable is a 1.0f / N table
153 VectorScale(center, ixtable[numpoints], center);
155 // calculate the planes, and make sure the polygon can see it's own center
156 for (prev = numpoints - 1, i = 0;i < numpoints;prev = i, i++)
158 VectorSubtract(eye, (&polypoints[i * 3]), v1);
159 VectorSubtract((&polypoints[prev * 3]), (&polypoints[i * 3]), v2);
160 CrossProduct(v1, v2, portalplanes[i].normal);
161 VectorNormalize(portalplanes[i].normal);
162 portalplanes[i].dist = DotProduct(eye, portalplanes[i].normal);
163 if (DotProduct(portalplanes[i].normal, center) <= portalplanes[i].dist)
165 // polygon can't see it's own center, discard
170 ranoutofportalplanes = false;
171 ranoutofportals = false;
173 returnvalue = Portal_RecursiveFlowSearch(eyeleaf, eye, 0, numpoints);
175 if (ranoutofportalplanes)
176 Con_Printf("Portal_RecursiveFlowSearch: ran out of %d plane stack when recursing through portals\n", MAXRECURSIVEPORTALPLANES);
178 Con_Printf("Portal_RecursiveFlowSearch: ran out of %d portal stack when recursing through portals\n", MAXRECURSIVEPORTALS);
183 #define Portal_MinsBoxPolygon(axis, axisvalue, x1, y1, z1, x2, y2, z2, x3, y3, z3, x4, y4, z4) \
185 if (eye[(axis)] < ((axisvalue) - 0.5f))\
187 boxpoints[ 0] = x1;boxpoints[ 1] = y1;boxpoints[ 2] = z1;\
188 boxpoints[ 3] = x2;boxpoints[ 4] = y2;boxpoints[ 5] = z2;\
189 boxpoints[ 6] = x3;boxpoints[ 7] = y3;boxpoints[ 8] = z3;\
190 boxpoints[ 9] = x4;boxpoints[10] = y4;boxpoints[11] = z4;\
191 if (Portal_CheckPolygon(model, eye, boxpoints, 4))\
196 #define Portal_MaxsBoxPolygon(axis, axisvalue, x1, y1, z1, x2, y2, z2, x3, y3, z3, x4, y4, z4) \
198 if (eye[(axis)] > ((axisvalue) + 0.5f))\
200 boxpoints[ 0] = x1;boxpoints[ 1] = y1;boxpoints[ 2] = z1;\
201 boxpoints[ 3] = x2;boxpoints[ 4] = y2;boxpoints[ 5] = z2;\
202 boxpoints[ 6] = x3;boxpoints[ 7] = y3;boxpoints[ 8] = z3;\
203 boxpoints[ 9] = x4;boxpoints[10] = y4;boxpoints[11] = z4;\
204 if (Portal_CheckPolygon(model, eye, boxpoints, 4))\
209 int Portal_CheckBox(model_t *model, vec3_t eye, vec3_t a, vec3_t b)
211 if (eye[0] >= (a[0] - 1.0f) && eye[0] < (b[0] + 1.0f)
212 && eye[1] >= (a[1] - 1.0f) && eye[1] < (b[1] + 1.0f)
213 && eye[2] >= (a[2] - 1.0f) && eye[2] < (b[2] + 1.0f))
216 Portal_MinsBoxPolygon
224 Portal_MaxsBoxPolygon
232 Portal_MinsBoxPolygon
240 Portal_MaxsBoxPolygon
248 Portal_MinsBoxPolygon
256 Portal_MaxsBoxPolygon
268 typedef struct portalrecursioninfo_s
271 int numfrustumplanes;
282 float *updateleafsmins;
283 float *updateleafsmaxs;
285 portalrecursioninfo_t;
287 static void Portal_RecursiveFlow (portalrecursioninfo_t *info, mleaf_t *leaf, int firstclipplane, int numclipplanes)
290 int newpoints, i, prev;
292 vec3_t center, v1, v2;
293 tinyplane_t *newplanes;
295 for (i = 0;i < 3;i++)
297 if (info->updateleafsmins && info->updateleafsmins[i] > leaf->mins[i]) info->updateleafsmins[i] = leaf->mins[i];
298 if (info->updateleafsmaxs && info->updateleafsmaxs[i] < leaf->maxs[i]) info->updateleafsmaxs[i] = leaf->maxs[i];
304 int leafindex = leaf - info->model->brush.data_leafs;
305 if (!CHECKPVSBIT(info->leafpvs, leafindex))
307 SETPVSBIT(info->leafpvs, leafindex);
308 info->leaflist[info->numleafs++] = leafindex;
312 // mark surfaces in leaf that can be seen through portal
313 if (leaf->numleafsurfaces && info->surfacepvs)
315 for (i = 0;i < leaf->numleafsurfaces;i++)
317 int surfaceindex = leaf->firstleafsurface[i];
318 if (!CHECKPVSBIT(info->surfacepvs, surfaceindex))
320 msurface_t *surface = info->model->data_surfaces + surfaceindex;
321 if (BoxesOverlap(surface->mins, surface->maxs, info->boxmins, info->boxmaxs))
327 const float *vertex3f;
328 float v[9], trimins[3], trimaxs[3];
329 vertex3f = surface->groupmesh->data_vertex3f;
330 elements = (surface->groupmesh->data_element3i + 3 * surface->num_firsttriangle);
331 for (j = 0;j < surface->num_triangles;j++, elements += 3)
333 VectorCopy(vertex3f + elements[0] * 3, v + 0);
334 VectorCopy(vertex3f + elements[1] * 3, v + 3);
335 VectorCopy(vertex3f + elements[2] * 3, v + 6);
336 if (PointInfrontOfTriangle(info->eye, v + 0, v + 3, v + 6))
338 trimins[0] = min(v[0], min(v[3], v[6]));
339 trimaxs[0] = max(v[0], max(v[3], v[6]));
340 trimins[1] = min(v[1], min(v[4], v[7]));
341 trimaxs[1] = max(v[1], max(v[4], v[7]));
342 trimins[2] = min(v[2], min(v[5], v[8]));
343 trimaxs[2] = max(v[2], max(v[5], v[8]));
344 if (BoxesOverlap(trimins, trimaxs, info->boxmins, info->boxmaxs) && Portal_PortalThroughPortalPlanes(&portalplanes[firstclipplane], numclipplanes, v, 3, &portaltemppoints2[0][0], 256) >= 3)
346 SETPVSBIT(info->surfacepvs, surfaceindex);
347 info->surfacelist[info->numsurfaces++] = surfaceindex;
355 SETPVSBIT(info->surfacepvs, surfaceindex);
356 info->surfacelist[info->numsurfaces++] = surfaceindex;
363 // follow portals into other leafs
364 for (p = leaf->portals;p;p = p->next)
366 // only flow through portals facing the viewer
367 dist = PlaneDiff(info->eye, (&p->plane));
368 if (dist < 0 && BoxesOverlap(p->past->mins, p->past->maxs, info->boxmins, info->boxmaxs))
370 newpoints = Portal_PortalThroughPortalPlanes(&portalplanes[firstclipplane], numclipplanes, (float *) p->points, p->numpoints, &portaltemppoints2[0][0], 256);
373 else if (firstclipplane + numclipplanes + newpoints > MAXRECURSIVEPORTALPLANES)
374 ranoutofportalplanes = true;
377 // find the center by averaging
379 for (i = 0;i < newpoints;i++)
380 VectorAdd(center, portaltemppoints2[i], center);
381 // ixtable is a 1.0f / N table
382 VectorScale(center, ixtable[newpoints], center);
383 // calculate the planes, and make sure the polygon can see its own center
384 newplanes = &portalplanes[firstclipplane + numclipplanes];
385 for (prev = newpoints - 1, i = 0;i < newpoints;prev = i, i++)
387 TriangleNormal(portaltemppoints2[prev], portaltemppoints2[i], info->eye, newplanes[i].normal);
388 VectorNormalize(newplanes[i].normal);
389 newplanes[i].dist = DotProduct(info->eye, newplanes[i].normal);
390 if (DotProduct(newplanes[i].normal, center) <= newplanes[i].dist)
392 // polygon can't see its own center, discard and use parent portal
397 Portal_RecursiveFlow(info, p->past, firstclipplane + numclipplanes, newpoints);
399 Portal_RecursiveFlow(info, p->past, firstclipplane, numclipplanes);
405 static void Portal_RecursiveFindLeafForFlow(portalrecursioninfo_t *info, mnode_t *node)
409 float f = DotProduct(info->eye, node->plane->normal) - node->plane->dist;
411 Portal_RecursiveFindLeafForFlow(info, node->children[0]);
413 Portal_RecursiveFindLeafForFlow(info, node->children[1]);
417 mleaf_t *leaf = (mleaf_t *)node;
418 if (leaf->clusterindex >= 0)
419 Portal_RecursiveFlow(info, leaf, 0, info->numfrustumplanes);
423 void Portal_Visibility(model_t *model, const vec3_t eye, int *leaflist, qbyte *leafpvs, int *numleafspointer, int *surfacelist, qbyte *surfacepvs, int *numsurfacespointer, const mplane_t *frustumplanes, int numfrustumplanes, int exact, const float *boxmins, const float *boxmaxs, float *updateleafsmins, float *updateleafsmaxs)
426 portalrecursioninfo_t info;
428 // if there is no model, it can not block visibility
431 Con_Print("Portal_Visibility: NULL model\n");
435 Mod_CheckLoaded(model);
437 if (!model->brush.data_nodes)
439 Con_Print("Portal_Visibility: not a brush model\n");
443 // put frustum planes (if any) into tinyplane format at start of buffer
444 for (i = 0;i < numfrustumplanes;i++)
446 VectorCopy(frustumplanes[i].normal, portalplanes[i].normal);
447 portalplanes[i].dist = frustumplanes[i].dist;
450 ranoutofportalplanes = false;
451 ranoutofportals = false;
453 VectorCopy(boxmins, info.boxmins);
454 VectorCopy(boxmaxs, info.boxmaxs);
456 info.numsurfaces = 0;
457 info.surfacelist = surfacelist;
458 info.surfacepvs = surfacepvs;
460 info.leaflist = leaflist;
461 info.leafpvs = leafpvs;
463 VectorCopy(eye, info.eye);
464 info.numfrustumplanes = numfrustumplanes;
465 info.updateleafsmins = updateleafsmins;
466 info.updateleafsmaxs = updateleafsmaxs;
468 Portal_RecursiveFindLeafForFlow(&info, model->brush.data_nodes);
470 if (ranoutofportalplanes)
471 Con_Printf("Portal_RecursiveFlow: ran out of %d plane stack when recursing through portals\n", MAXRECURSIVEPORTALPLANES);
473 Con_Printf("Portal_RecursiveFlow: ran out of %d portal stack when recursing through portals\n", MAXRECURSIVEPORTALS);
474 if (numsurfacespointer)
475 *numsurfacespointer = info.numsurfaces;
477 *numleafspointer = info.numleafs;