src/hd/rhd_geom.c

/* Copyright (c) 1998 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);
#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(clearports)          /* draw current list of octrees (and ports) */
int     clearports;
{
        register int    n;

        FORALLGEOM(gmCurrent, n)
                glCallList(gmCurrent[n].listid);
        if (!n | !clearports | !gmPortals)
                return(n);
                                /* mark alpha channel over the portals */
        glPushAttrib(GL_DEPTH_BUFFER_BIT|GL_COLOR_BUFFER_BIT);
        glDepthMask(GL_FALSE);
        glColorMask(GL_FALSE, GL_FALSE, GL_FALSE, GL_TRUE);
        glClear(GL_COLOR_BUFFER_BIT);
        glColor4ub(0, 0, 0, 0xff);      /* write alpha buffer as mask */
        glCallList(gmPortals);          /* draw them portals */
        glPopAttrib();
        return(n);
}


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.2
Committed:	Sun Dec 20 20:35:43 1998 UTC (25 years, 4 months ago) by gwlarson
Content type:	text/plain
Branch:	MAIN
Changes since 3.1:	+128 -38 lines
Log Message:	added port drawing into alpha buffer mask
#	User	Rev	Content
1	gwlarson	3.1	/* Copyright (c) 1998 Silicon Graphics, Inc. */
2
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.1	#ifdef DEBUG
63			fprintf(stderr, "Loaded octree \"%s\" into listID %d with radius %f\n",
64	gwlarson	3.2	file, gmNext[i].listid, gmNext[i].rad);
65	gwlarson	3.1	#endif
66			}
67
68
69	gwlarson	3.2	gmEndGeom() /* make next list current */
70	gwlarson	3.1	{
71			register int i, j;
72
73	gwlarson	3.2	FORALLGEOM(gmCurrent, i) {
74			FORALLGEOM(gmNext, j)
75			if (gmNext[j].listid == gmCurrent[i].listid)
76	gwlarson	3.1	break;
77	gwlarson	3.2	if (j >= MAXGEO \|\| gmNext[j].gfile == NULL)
78			glDeleteLists(gmCurrent[i].listid, 1); /* not found */
79	gwlarson	3.1	}
80	gwlarson	3.2	bcopy((char )gmNext, (char )gmCurrent, sizeof(gmNext));
81			bzero((char *)gmNext, sizeof(gmNext));
82	gwlarson	3.1	}
83
84
85			int
86	gwlarson	3.2	gmDrawGeom(clearports) /* draw current list of octrees (and ports) */
87			int clearports;
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			if (!n \| !clearports \| !gmPortals)
94			return(n);
95			/* mark alpha channel over the portals */
96			glPushAttrib(GL_DEPTH_BUFFER_BIT\|GL_COLOR_BUFFER_BIT);
97			glDepthMask(GL_FALSE);
98			glColorMask(GL_FALSE, GL_FALSE, GL_FALSE, GL_TRUE);
99			glClear(GL_COLOR_BUFFER_BIT);
100			glColor4ub(0, 0, 0, 0xff); /* write alpha buffer as mask */
101			glCallList(gmPortals); /* draw them portals */
102			glPopAttrib();
103			return(n);
104	gwlarson	3.1	}
105
106
107	gwlarson	3.2	gmDepthLimit(dl, vorg, vdir) /* compute approximate depth limits for view */
108	gwlarson	3.1	double dl[2];
109			FVECT vorg, vdir;
110			{
111			FVECT v;
112			double dcent;
113			register int i;
114
115			dl[0] = FHUGE; dl[1] = 0.;
116	gwlarson	3.2	FORALLGEOM(gmCurrent, i) {
117			VSUB(v, gmCurrent[i].cent, vorg);
118	gwlarson	3.1	dcent = DOT(v, vdir);
119	gwlarson	3.2	if (dl[0] > dcent-gmCurrent[i].rad)
120			dl[0] = dcent-gmCurrent[i].rad;
121			if (dl[1] < dcent+gmCurrent[i].rad)
122			dl[1] = dcent+gmCurrent[i].rad;
123	gwlarson	3.1	}
124			if (dl[0] < 0.)
125			dl[0] = 0.;
126	gwlarson	3.2	}
127
128
129			gmNewPortal(pflist) /* add portal file(s) to our new list */
130			char *pflist;
131			{
132			register int i, j;
133			char newfile[128];
134
135			if (pflist == NULL)
136			return;
137			while (*pflist) {
138			atos(newfile, sizeof(newfile), pflist);
139			if (!*newfile)
140			break;
141			pflist = sskip(pflist);
142			FORALLPORT(newportlist,i)
143			if (!strcmp(newportlist[i], newfile))
144			goto endloop; /* in list already */
145			if (i >= MAXPORT) {
146			error(WARNING, "too many portals -- ignoring extra");
147			return;
148			}
149			newportlist[i] = savestr(newfile);
150			endloop:;
151			}
152			}
153
154
155			static int
156			sstrcmp(ss0, ss1)
157			char ss0, ss1;
158			{
159			return(strcmp(ss0, ss1));
160			}
161
162
163			int
164			gmEndPortal() /* close portal list and return GL list */
165			{
166			register int n;
167
168			FORALLPORT(newportlist, n);
169			if (!n) { /* free old GL list */
170			if (gmPortals)
171			glDeleteLists(gmPortals, 1);
172			gmPortals = 0;
173			} else
174			qsort(newportlist, n, sizeof(char *), sstrcmp);
175			FORALLPORT(newportlist, n) /* compare sorted lists */
176			if (curportlist[n] == NULL \|\|
177			strcmp(curportlist[n],newportlist[n])) {
178			/* load new list */
179			if (gmPortals)
180			glDeleteLists(gmPortals, 1);
181			FORALLPORT(newportlist, n);
182			dolights = 0;
183			domats = 0;
184			gmPortals = rgl_filelist(n, newportlist);
185			break;
186			}
187			FORALLPORT(curportlist, n) /* free old file list */
188			freestr(curportlist[n]);
189			bcopy((char )newportlist, (char )curportlist, sizeof(newportlist));
190			bzero((char *)newportlist, sizeof(newportlist));
191			return(gmPortals); /* return GL list id */
192	gwlarson	3.1	}