src/hd/rhd_geom.c

#ifndef lint
static const char       RCSid[] = "$Id: rhd_geom.c,v 3.12 2003/06/30 14:59:11 schorsch Exp $";
#endif
/*
 * Geometry drawing operations for OpenGL driver.
 */

#include <string.h>

#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 int      Nlists = 0;             /* number of lists allocated */
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 */
        RREAL   rad;                    /* radius */
        int     listid;                 /* display list identifier */
        int     nlists;                 /* number of lists allocated */
} 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     *nextword();


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)) {
                        gmNext[i] = gmCurrent[j];
                        return;
                }
                                        /* else load new octree */
        gmNext[i].gfile = savestr(file);
        dolights = 0;
        domats = 1;
        gmNext[i].listid = rgl_octlist(file, gmNext[i].cent, &gmNext[i].rad,
                                        &gmNext[i].nlists);
        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,      /* not found */
                                        gmCurrent[i].nlists);
                        freestr(gmCurrent[i].gfile);
                }
        }
        memcpy((void *)gmCurrent, (void *)gmNext, sizeof(gmNext));
        memset((void *)gmNext, '\0', sizeof(gmNext));
}


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