ViewVC Help
View File | Revision Log | Show Annotations | Download File | Root Listing
root/radiance/ray/src/hd/rhd_geom.c
Revision: 3.6
Committed: Fri Jan 29 11:11:14 1999 UTC (25 years, 3 months ago) by gwlarson
Content type: text/plain
Branch: MAIN
Changes since 3.5: +3 -7 lines
Log Message: 
added the ability to handle quoted strings in gmNewPortal()

File Contents

# 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 (MAXGEO*4) /* 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.6 extern char *nextword();
37 gwlarson 3.2
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.6 gmDrawGeom() /* draw current list of octrees */
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 gwlarson 3.6 while ((pflist = nextword(newfile, sizeof(newfile), pflist)) != NULL) {
149 gwlarson 3.2 FORALLPORT(newportlist,i)
150     if (!strcmp(newportlist[i], newfile))
151     goto endloop; /* in list already */
152     if (i >= MAXPORT) {
153     error(WARNING, "too many portals -- ignoring extra");
154     return;
155     }
156     newportlist[i] = savestr(newfile);
157     endloop:;
158     }
159     }
160    
161    
162     static int
163     sstrcmp(ss0, ss1)
164     char **ss0, **ss1;
165     {
166     return(strcmp(*ss0, *ss1));
167     }
168    
169    
170     int
171     gmEndPortal() /* close portal list and return GL list */
172     {
173     register int n;
174    
175     FORALLPORT(newportlist, n);
176     if (!n) { /* free old GL list */
177     if (gmPortals)
178     glDeleteLists(gmPortals, 1);
179     gmPortals = 0;
180     } else
181     qsort(newportlist, n, sizeof(char *), sstrcmp);
182     FORALLPORT(newportlist, n) /* compare sorted lists */
183     if (curportlist[n] == NULL ||
184     strcmp(curportlist[n],newportlist[n])) {
185     /* load new list */
186     if (gmPortals)
187     glDeleteLists(gmPortals, 1);
188     FORALLPORT(newportlist, n);
189     dolights = 0;
190     domats = 0;
191     gmPortals = rgl_filelist(n, newportlist);
192     break;
193     }
194     FORALLPORT(curportlist, n) /* free old file list */
195     freestr(curportlist[n]);
196     bcopy((char *)newportlist, (char *)curportlist, sizeof(newportlist));
197     bzero((char *)newportlist, sizeof(newportlist));
198     return(gmPortals); /* return GL list id */
199 gwlarson 3.1 }