--- ray/src/hd/sm_stree.h 1998/09/11 11:52:27 3.2 +++ ray/src/hd/sm_stree.h 1998/10/06 18:18:55 3.3 @@ -7,64 +7,102 @@ * */ -#include "sm_qtree.h" -#define SQRT3_INV 0.5773502692 +#define ST_NUM_ROOT_NODES 8 +/* The base is an octahedron: Each face contains a planar quadtree. At + the root level, the "top" (positive y) four faces, and bottom four faces + are stored together:forming two root quadtree nodes + */ typedef struct _STREE { - QUADTREE root; /* quadtree triangulation of sphere */ - FVECT center; /* sphere center */ - FVECT base[4]; /* 4 vertices on sphere that define base triangulation - of 4 triangles: assume cover sphere and triangles - are base verts (0,1,2),(0,2,3),(0,3,1), and (1,3,2) - */ + QUADTREE root[2]; /* root[0]= top four faces, root[1]=bottom 4 faces*/ + FVECT center; /* sphere center */ + FVECT base[6]; /* 6 vertices on sphere that define base octahedron: + in canonical form: origin(0,0,0) points (1,0,0), + (0,1,0),(0,0,1),(-1,0,0),(0,-1,0),(0,0,-1) */ + FPEQ fplane[8]; /* Face plane equations */ + + FVECT enorms[8][3]; /* Edge normals: For plane through edge and origin*/ }STREE; -#define ST_ROOT(s) ((s)->root) -#define ST_ROOT_PTR(s) (&(s)->root) -#define ST_NTH_ROOT(s,n) QT_NTH_CHILD(ST_ROOT(s),n) -#define ST_NTH_ROOT_PTR(s,n) QT_NTH_CHILD_PTR(ST_ROOT(s),n) -#define ST_CLEAR_ROOT(s) QT_CLEAR_CHILDREN(ST_ROOT(s)) -#define ST_CENTER(s) ((s)->center) -#define ST_SET_CENTER(s,b) VCOPY(ST_CENTER(s),b) +#define ST_BASEI(n) ((n)>>2) /* root index: top or bottom */ +#define ST_INDEX(n) ((n) & 0x3) /* which child in root */ +#define ST_ROOT(s,i) ((s)->root[ST_BASEI(i)]) /* top or bottom root*/ +#define ST_ROOT_PTR(s,i) (&ST_ROOT(s,i)) /* ptr to top(0)/bottom(1)root*/ +#define ST_TOP_ROOT(s) ((s)->root[0]) /* top root (y>0)*/ +#define ST_BOTTOM_ROOT(s) ((s)->root[1]) /* bottom root (y <= 0)*/ +#define ST_TOP_ROOT_PTR(s) (&ST_TOP_ROOT(s)) /* ptr to top root */ +#define ST_BOTTOM_ROOT_PTR(s) (&ST_BOTTOM_ROOT(s)) /* ptr to bottom root*/ +#define ST_NTH_ROOT(s,n) QT_NTH_CHILD(ST_ROOT(s,n),ST_INDEX(n)) +#define ST_NTH_ROOT_PTR(s,n) QT_NTH_CHILD_PTR(ST_ROOT(s,n),ST_INDEX(n)) +#define ST_CLEAR_ROOT(st) (ST_TOP_ROOT(st)=EMPTY,ST_BOTTOM_ROOT(st)=EMPTY) +#define ST_INIT_ROOT(st) (QT_CLEAR_CHILDREN(ST_TOP_ROOT(st)), \ + QT_CLEAR_CHILDREN(ST_BOTTOM_ROOT(st))) #define ST_BASE(s) ((s)->base) #define ST_NTH_BASE(s,n) ((s)->base[(n)]) +#define ST_NTH_V(s,n,i) ST_NTH_BASE(s,stBase_verts[(n)][(i)]) #define ST_SET_NTH_BASE(s,n,b) VCOPY(ST_NTH_BASE(s,n),b) #define ST_SET_BASE(s,b) (VCOPY(ST_NTH_BASE(s,0),(b)[0]), \ VCOPY(ST_NTH_BASE(s,1),(b)[1]), \ VCOPY(ST_NTH_BASE(s,2),(b)[2]), \ - VCOPY(ST_NTH_BASE(s,3),(b)[3])) + VCOPY(ST_NTH_BASE(s,3),(b)[3]), \ + VCOPY(ST_NTH_BASE(s,4),(b)[4]), \ + VCOPY(ST_NTH_BASE(s,5),(b)[5])) + +#define ST_CENTER(s) ((s)->center) +#define ST_SET_CENTER(s,b) VCOPY(ST_CENTER(s),b) + +#define ST_NTH_PLANE(s,i) ((s)->fplane[(i)]) +#define ST_NTH_NORM(s,i) (ST_NTH_PLANE(s,i).n) +#define ST_NTH_D(s,i) (ST_NTH_PLANE(s,i).d) +#define ST_EDGE_NORM(s,i,n) ((s)->enorms[(i)][(n)]) + #define ST_COORD(s,p,r) VSUB(r,p,ST_CENTER(s)) #define ST_CLEAR_FLAGS(s) qtClearAllFlags() + +/* Point location based on coordinate signs */ +#define TST(p) ((p)>0.0?1:0) +#define stPoint_in_root(p) stlocatetbl[TST((p)[0])<<2 | (TST((p)[1])<<1) \ + | TST((p)[2])] + /* STREE functions +void stInit(STREE *st,FVECT center) + Initializes an stree structure with origin 'center': + Frees existing quadtrees hanging off of the roots +STREE *stAlloc(STREE *st) + Allocates a stree structure and creates octahedron base - STREE *stInit(STREE *st) - Initialize STREE: if st = NULL, allocate a new one, else clear - return pointer to initialized structure +void stClear(STREE *st) + Frees any existing root children and clears roots + +QUADTREE stPoint_locate(STREE *st,FVECT p) + Returns quadtree leaf node containing point 'p'. - QUADTREE *stPoint_locate(STREE *st,FVECT pt) - Find stree node that projection of pt on sphere falls in +int stAdd_tri(STREE *st,int id,FVECT t0,t1,t2) + Add triangle 'id' with coordinates 't0,t1,t2' to the stree: returns + FALSE on error, TRUE otherwise + +int stRemove_tri(STREE *st,int id,FVECT t0,t1,t2) + Removes triangle 'id' with coordinates 't0,t1,t2' from stree: returns + FALSE on error, TRUE otherwise + +int stTrace_ray(STREE *st,FVECT orig,dir,int (*func)(),int *arg1,*arg2) + Trace ray 'orig-dir' through stree and apply 'func(arg1,arg2)' at each + node that it intersects - stInsert_tri() - for every quadtree tri in the base- find node all leaf nodes that - tri overlaps and add tri to set. If this causes any of the nodes - to be over threshhold- split - stDelete_tri() - for every quadtree tri in the base- find node all leaf nodes that - tri overlaps. If this causes any of the nodes to be under - threshold- merge +int stApply_to_tri(STREE *st,FVECT t0,t1,t2,int (*edge_func)(), + (*tri_func)(),int arg1,*arg2) + Visit nodes intersected by tri 't0,t1,t2'.Apply 'edge_func(arg1,arg2,arg3)', + to those nodes intersected by edges, and interior_func to ALL nodes: + ie some Nodes will be visited more than once */ -extern int stTri_verts[4][3]; -extern int stTri_nbrs[4][3]; -extern FVECT stDefault_base[4]; - +extern int stBase_verts[8][3]; extern STREE *stAlloc(); -extern QUADTREE *stPoint_locate_cell(); - +extern QUADTREE stPoint_locate();