src/hd/rhd_geom.c

/* Copyright (c) 1999 Silicon Graphics, Inc. */

#ifndef lint
static char SCCSid[] = "$SunId$ SGI";
#endif

/*
 * Geometry drawing operations for OpenGL driver.
 */

#include "radogl.h"
#include "rhdriver.h"

#ifndef MAXGEO
#define MAXGEO          8               /* maximum geometry list length */
#endif
#ifndef MAXPORT
#define MAXPORT         (MAXGEO*4)      /* maximum number of portal files */
#endif

int     gmPortals = 0;                  /* current portal GL list id */
static char     *curportlist[MAXPORT];  /* current portal list */
static char     *newportlist[MAXPORT];  /* new portal file list */

static struct gmEntry {
        char    *gfile;                 /* geometry file name */
        FVECT   cent;                   /* centroid */
        FLOAT   rad;                    /* radius */
        int     listid;                 /* display list identifier */
} gmCurrent[MAXGEO], gmNext[MAXGEO];    /* current and next list */

#define FORALLGEOM(ot,i)        for (i=0;i<MAXGEO&&ot[i].gfile!=NULL;i++)

#define FORALLPORT(pl,i)                for (i=0;i<MAXPORT&&pl[i]!=NULL;i++)

extern char     *atos(), *sskip(), *sskip2();


gmNewGeom(file)                 /* add new geometry to next list */
char    *file;
{
        register int    i, j;
                                        /* check if already in next list */
        FORALLGEOM(gmNext, i)
                if (!strcmp(file, gmNext[i].gfile))
                        return;
        if (i >= MAXGEO) {
                error(WARNING, "too many section octrees -- ignoring extra");
                return;
        }
                                        /* check if copy in current list */
        FORALLGEOM(gmCurrent, j)
                if (!strcmp(file, gmCurrent[j].gfile)) {
                        copystruct(&gmNext[i], &gmCurrent[j]);
                        return;
                }
                                        /* else load new octree */
        gmNext[i].gfile = file;
        dolights = 0;
        domats = 1;
        gmNext[i].listid = rgl_octlist(file, gmNext[i].cent, &gmNext[i].rad);
        gmNext[i].rad *= 1.732;         /* go to corners */
#ifdef DEBUG
        fprintf(stderr, "Loaded octree \"%s\" into listID %d with radius %f\n",
                        file, gmNext[i].listid, gmNext[i].rad);
#endif
}


gmEndGeom()                     /* make next list current */
{
        register int    i, j;

        FORALLGEOM(gmCurrent, i) {
                FORALLGEOM(gmNext, j)
                        if (gmNext[j].listid == gmCurrent[i].listid)
                                break;
                if (j >= MAXGEO || gmNext[j].gfile == NULL)
                        glDeleteLists(gmCurrent[i].listid, 1);  /* not found */
        }
        bcopy((char *)gmNext, (char *)gmCurrent, sizeof(gmNext));
        bzero((char *)gmNext, sizeof(gmNext));
}


int
gmDrawGeom()                    /* draw current list of octrees (and ports) */
{
        register int    n;

        FORALLGEOM(gmCurrent, n)
                glCallList(gmCurrent[n].listid);
        return(n);
}


gmDrawPortals(r, g, b, a)       /* draw portals with specific RGBA value */
int     r, g, b, a;
{
        if (!gmPortals || r<0 & g<0 & b<0 & a<0)
                return;
        glPushAttrib(GL_DEPTH_BUFFER_BIT|GL_COLOR_BUFFER_BIT|
                        GL_POLYGON_BIT|GL_LIGHTING_BIT);
        glDisable(GL_LIGHTING);
        glDisable(GL_DITHER);
        glShadeModel(GL_FLAT);
        glPolygonMode(GL_FRONT_AND_BACK, GL_FILL);
                                        /* don't actually write depth */
        glDepthMask(GL_FALSE);
                                        /* draw only selected channels */
        glColorMask(r>=0, g>=0, b>=0, a>=0);
        glColor4ub(r&0xff, g&0xff, b&0xff, a&0xff);
        glCallList(gmPortals);          /* draw them portals */
        glPopAttrib();
}


gmDepthLimit(dl, vorg, vdir)    /* compute approximate depth limits for view */
double  dl[2];
FVECT   vorg, vdir;
{
        FVECT   v;
        double  dcent;
        register int    i;

        dl[0] = FHUGE; dl[1] = 0.;
        FORALLGEOM(gmCurrent, i) {
                VSUB(v, gmCurrent[i].cent, vorg);
                dcent = DOT(v, vdir);
                if (dl[0] > dcent-gmCurrent[i].rad)
                        dl[0] = dcent-gmCurrent[i].rad;
                if (dl[1] < dcent+gmCurrent[i].rad)
                        dl[1] = dcent+gmCurrent[i].rad;
        }
        if (dl[0] < 0.)
                dl[0] = 0.;
}


gmNewPortal(pflist)             /* add portal file(s) to our new list */
char    *pflist;
{
        register int    i, j;
        char    newfile[128];

        if (pflist == NULL)
                return;
        while (*pflist) {
                atos(newfile, sizeof(newfile), pflist);
                if (!*newfile)
                        break;
                pflist = sskip(pflist);
                FORALLPORT(newportlist,i)
                        if (!strcmp(newportlist[i], newfile))
                                goto endloop;   /* in list already */
                if (i >= MAXPORT) {
                        error(WARNING, "too many portals -- ignoring extra");
                        return;
                }
                newportlist[i] = savestr(newfile);
        endloop:;
        }
}


static int
sstrcmp(ss0, ss1)
char    **ss0, **ss1;
{
        return(strcmp(*ss0, *ss1));
}


int
gmEndPortal()                   /* close portal list and return GL list */
{
        register int    n;

        FORALLPORT(newportlist, n);
        if (!n) {                       /* free old GL list */
                if (gmPortals)
                        glDeleteLists(gmPortals, 1);
                gmPortals = 0;
        } else
                qsort(newportlist, n, sizeof(char *), sstrcmp);
        FORALLPORT(newportlist, n)              /* compare sorted lists */
                if (curportlist[n] == NULL ||
                                strcmp(curportlist[n],newportlist[n])) {
                                                /* load new list */
                        if (gmPortals)
                                glDeleteLists(gmPortals, 1);
                        FORALLPORT(newportlist, n);
                        dolights = 0;
                        domats = 0;
                        gmPortals = rgl_filelist(n, newportlist);
                        break;
                }
        FORALLPORT(curportlist, n)              /* free old file list */
                freestr(curportlist[n]);
        bcopy((char *)newportlist, (char *)curportlist, sizeof(newportlist));
        bzero((char *)newportlist, sizeof(newportlist));
        return(gmPortals);                      /* return GL list id */
}
Revision:	3.5
Committed:	Fri Jan 1 10:41:28 1999 UTC (25 years, 4 months ago) by gwlarson
Content type:	text/plain
Branch:	MAIN
Changes since 3.4:	+2 -1 lines
Log Message:	fixed aft clipping plane problem
#	User	Rev	Content
1	gwlarson	3.5	/* Copyright (c) 1999 Silicon Graphics, Inc. */
2	gwlarson	3.1
3			#ifndef lint
4			static char SCCSid[] = "$SunId$ SGI";
5			#endif
6
7			/*
8	gwlarson	3.2	* Geometry drawing operations for OpenGL driver.
9	gwlarson	3.1	*/
10
11			#include "radogl.h"
12	gwlarson	3.2	#include "rhdriver.h"
13	gwlarson	3.1
14	gwlarson	3.2	#ifndef MAXGEO
15			#define MAXGEO 8 /* maximum geometry list length */
16	gwlarson	3.1	#endif
17	gwlarson	3.2	#ifndef MAXPORT
18			#define MAXPORT (MAXGEO4) / maximum number of portal files */
19			#endif
20	gwlarson	3.1
21	gwlarson	3.2	int gmPortals = 0; /* current portal GL list id */
22			static char curportlist[MAXPORT]; / current portal list */
23			static char newportlist[MAXPORT]; / new portal file list */
24
25			static struct gmEntry {
26			char gfile; / geometry file name */
27	gwlarson	3.1	FVECT cent; /* centroid */
28			FLOAT rad; /* radius */
29			int listid; /* display list identifier */
30	gwlarson	3.2	} gmCurrent[MAXGEO], gmNext[MAXGEO]; /* current and next list */
31	gwlarson	3.1
32	gwlarson	3.2	#define FORALLGEOM(ot,i) for (i=0;i<MAXGEO&&ot[i].gfile!=NULL;i++)
33	gwlarson	3.1
34	gwlarson	3.2	#define FORALLPORT(pl,i) for (i=0;i<MAXPORT&&pl[i]!=NULL;i++)
35	gwlarson	3.1
36	gwlarson	3.2	extern char atos(), sskip(), *sskip2();
37
38
39			gmNewGeom(file) /* add new geometry to next list */
40			char *file;
41	gwlarson	3.1	{
42			register int i, j;
43			/* check if already in next list */
44	gwlarson	3.2	FORALLGEOM(gmNext, i)
45			if (!strcmp(file, gmNext[i].gfile))
46	gwlarson	3.1	return;
47	gwlarson	3.2	if (i >= MAXGEO) {
48	gwlarson	3.1	error(WARNING, "too many section octrees -- ignoring extra");
49			return;
50			}
51			/* check if copy in current list */
52	gwlarson	3.2	FORALLGEOM(gmCurrent, j)
53			if (!strcmp(file, gmCurrent[j].gfile)) {
54			copystruct(&gmNext[i], &gmCurrent[j]);
55	gwlarson	3.1	return;
56			}
57			/* else load new octree */
58	gwlarson	3.2	gmNext[i].gfile = file;
59	gwlarson	3.1	dolights = 0;
60	gwlarson	3.2	domats = 1;
61			gmNext[i].listid = rgl_octlist(file, gmNext[i].cent, &gmNext[i].rad);
62	gwlarson	3.5	gmNext[i].rad = 1.732; / go to corners */
63	gwlarson	3.1	#ifdef DEBUG
64			fprintf(stderr, "Loaded octree \"%s\" into listID %d with radius %f\n",
65	gwlarson	3.2	file, gmNext[i].listid, gmNext[i].rad);
66	gwlarson	3.1	#endif
67			}
68
69
70	gwlarson	3.2	gmEndGeom() /* make next list current */
71	gwlarson	3.1	{
72			register int i, j;
73
74	gwlarson	3.2	FORALLGEOM(gmCurrent, i) {
75			FORALLGEOM(gmNext, j)
76			if (gmNext[j].listid == gmCurrent[i].listid)
77	gwlarson	3.1	break;
78	gwlarson	3.2	if (j >= MAXGEO \|\| gmNext[j].gfile == NULL)
79			glDeleteLists(gmCurrent[i].listid, 1); /* not found */
80	gwlarson	3.1	}
81	gwlarson	3.2	bcopy((char )gmNext, (char )gmCurrent, sizeof(gmNext));
82			bzero((char *)gmNext, sizeof(gmNext));
83	gwlarson	3.1	}
84
85
86			int
87	gwlarson	3.3	gmDrawGeom() /* draw current list of octrees (and ports) */
88	gwlarson	3.1	{
89	gwlarson	3.2	register int n;
90	gwlarson	3.1
91	gwlarson	3.2	FORALLGEOM(gmCurrent, n)
92			glCallList(gmCurrent[n].listid);
93	gwlarson	3.3	return(n);
94			}
95
96
97			gmDrawPortals(r, g, b, a) /* draw portals with specific RGBA value */
98			int r, g, b, a;
99			{
100			if (!gmPortals \|\| r<0 & g<0 & b<0 & a<0)
101			return;
102			glPushAttrib(GL_DEPTH_BUFFER_BIT\|GL_COLOR_BUFFER_BIT\|
103			GL_POLYGON_BIT\|GL_LIGHTING_BIT);
104			glDisable(GL_LIGHTING);
105			glDisable(GL_DITHER);
106	gwlarson	3.4	glShadeModel(GL_FLAT);
107	gwlarson	3.3	glPolygonMode(GL_FRONT_AND_BACK, GL_FILL);
108			/* don't actually write depth */
109	gwlarson	3.2	glDepthMask(GL_FALSE);
110	gwlarson	3.3	/* draw only selected channels */
111			glColorMask(r>=0, g>=0, b>=0, a>=0);
112			glColor4ub(r&0xff, g&0xff, b&0xff, a&0xff);
113	gwlarson	3.2	glCallList(gmPortals); /* draw them portals */
114			glPopAttrib();
115	gwlarson	3.1	}
116
117
118	gwlarson	3.2	gmDepthLimit(dl, vorg, vdir) /* compute approximate depth limits for view */
119	gwlarson	3.1	double dl[2];
120			FVECT vorg, vdir;
121			{
122			FVECT v;
123			double dcent;
124			register int i;
125
126			dl[0] = FHUGE; dl[1] = 0.;
127	gwlarson	3.2	FORALLGEOM(gmCurrent, i) {
128			VSUB(v, gmCurrent[i].cent, vorg);
129	gwlarson	3.1	dcent = DOT(v, vdir);
130	gwlarson	3.2	if (dl[0] > dcent-gmCurrent[i].rad)
131			dl[0] = dcent-gmCurrent[i].rad;
132			if (dl[1] < dcent+gmCurrent[i].rad)
133			dl[1] = dcent+gmCurrent[i].rad;
134	gwlarson	3.1	}
135			if (dl[0] < 0.)
136			dl[0] = 0.;
137	gwlarson	3.2	}
138
139
140			gmNewPortal(pflist) /* add portal file(s) to our new list */
141			char *pflist;
142			{
143			register int i, j;
144			char newfile[128];
145
146			if (pflist == NULL)
147			return;
148			while (*pflist) {
149			atos(newfile, sizeof(newfile), pflist);
150			if (!*newfile)
151			break;
152			pflist = sskip(pflist);
153			FORALLPORT(newportlist,i)
154			if (!strcmp(newportlist[i], newfile))
155			goto endloop; /* in list already */
156			if (i >= MAXPORT) {
157			error(WARNING, "too many portals -- ignoring extra");
158			return;
159			}
160			newportlist[i] = savestr(newfile);
161			endloop:;
162			}
163			}
164
165
166			static int
167			sstrcmp(ss0, ss1)
168			char ss0, ss1;
169			{
170			return(strcmp(ss0, ss1));
171			}
172
173
174			int
175			gmEndPortal() /* close portal list and return GL list */
176			{
177			register int n;
178
179			FORALLPORT(newportlist, n);
180			if (!n) { /* free old GL list */
181			if (gmPortals)
182			glDeleteLists(gmPortals, 1);
183			gmPortals = 0;
184			} else
185			qsort(newportlist, n, sizeof(char *), sstrcmp);
186			FORALLPORT(newportlist, n) /* compare sorted lists */
187			if (curportlist[n] == NULL \|\|
188			strcmp(curportlist[n],newportlist[n])) {
189			/* load new list */
190			if (gmPortals)
191			glDeleteLists(gmPortals, 1);
192			FORALLPORT(newportlist, n);
193			dolights = 0;
194			domats = 0;
195			gmPortals = rgl_filelist(n, newportlist);
196			break;
197			}
198			FORALLPORT(curportlist, n) /* free old file list */
199			freestr(curportlist[n]);
200			bcopy((char )newportlist, (char )curportlist, sizeof(newportlist));
201			bzero((char *)newportlist, sizeof(newportlist));
202			return(gmPortals); /* return GL list id */
203	gwlarson	3.1	}