ViewVC Help
View File | Revision Log | Show Annotations | Download File | Root Listing
root/radiance/ray/src/cv/mgflib/parser.h
Revision: 1.5
Committed: Fri Jun 24 09:32:55 1994 UTC (29 years, 10 months ago) by greg
Content type: text/plain
Branch: MAIN
Changes since 1.4: +78 -24 lines
Log Message:
added prism entity and minor changes

File Contents

# User Rev Content
1 greg 1.1 /* Copyright (c) 1994 Regents of the University of California */
2    
3     /* SCCSid "$SunId$ LBL" */
4    
5     /*
6     * Header file for MGF interpreter
7     */
8    
9     /* must include stdio.h before us */
10    
11     /* Entities (order doesn't really matter) */
12     #define MG_E_COMMENT 0
13     #define MG_E_COLOR 1
14     #define MG_E_CONE 2
15 greg 1.5 #define MG_E_CMIX 3
16     #define MG_E_CXY 4
17     #define MG_E_CSPEC 5
18     #define MG_E_CYL 6
19     #define MG_E_ED 7
20     #define MG_E_FACE 8
21     #define MG_E_INCLUDE 9
22     #define MG_E_IES 10
23     #define MG_E_MATERIAL 11
24     #define MG_E_NORMAL 12
25     #define MG_E_OBJECT 13
26     #define MG_E_POINT 14
27     #define MG_E_PRISM 15
28     #define MG_E_RD 16
29     #define MG_E_RING 17
30     #define MG_E_RS 18
31     #define MG_E_SPH 19
32     #define MG_E_TD 20
33     #define MG_E_TORUS 21
34     #define MG_E_TS 22
35     #define MG_E_VERTEX 23
36     #define MG_E_XF 24
37 greg 1.1
38 greg 1.5 #define MG_NENTITIES 25
39 greg 1.1
40 greg 1.5 #define MG_NAMELIST {"#","c","cone","cmix","cspec","cxy","cyl","ed","f",\
41     "i","ies","m","n","o","p","prism","rd","ring","rs",\
42     "sph","td","torus","ts","v","xf"}
43 greg 1.1
44     #define MG_MAXELEN 6
45    
46     extern char mg_ename[MG_NENTITIES][MG_MAXELEN];
47    
48     /* Handler routines for each entity */
49    
50     #ifdef NOPROTO
51     extern int (*mg_ehand[MG_NENTITIES])();
52     #else
53     extern int (*mg_ehand[MG_NENTITIES])(int argc, char **argv);
54     #endif
55    
56     /* Error codes */
57     #define MG_OK 0 /* normal return value */
58     #define MG_EUNK 1 /* unknown entity */
59     #define MG_EARGC 2 /* wrong number of arguments */
60     #define MG_ETYPE 3 /* argument type error */
61     #define MG_EILL 4 /* illegal argument value */
62     #define MG_EUNDEF 5 /* undefined reference */
63     #define MG_ENOFILE 6 /* cannot open input file */
64     #define MG_EINCL 7 /* error in included file */
65     #define MG_EMEM 8 /* out of memory */
66     #define MG_ESEEK 9 /* file seek error */
67 greg 1.2 #define MG_EBADMAT 10 /* bad material specification */
68 greg 1.1
69 greg 1.2 #define MG_NERRS 11
70 greg 1.1
71     extern char *mg_err[MG_NERRS];
72    
73     /*
74     * The general process for running the parser is to fill in the mg_ehand
75     * array with handlers for each entity you know how to handle.
76     * Then, call mg_init to fill in the rest. This function will report
77     * an error and quit if you try to support an inconsistent set of entities.
78     * For each file you want to parse, call mg_load with the file name.
79     * To read from standard input, use NULL as the file name.
80     * For additional control over error reporting and file management,
81     * use mg_open, mg_read, mg_parse and mg_close instead of mg_load.
82     * To free any data structures and clear the parser, use mg_clear.
83     * If there is an error, mg_load, mg_open, mg_parse, and mg_rewind
84     * will return an error from the list above. In addition, mg_load
85     * will report the error to stderr. The mg_read routine returns 0
86     * when the end of file has been reached.
87     */
88    
89     #define MG_MAXLINE 512 /* maximum input line length */
90     #define MG_MAXARGC (MG_MAXLINE/4) /* maximum argument count */
91    
92     typedef struct mg_fctxt {
93     char *fname; /* file name */
94     FILE *fp; /* stream pointer */
95     char inpline[MG_MAXLINE]; /* input line */
96     int lineno; /* line number */
97     struct mg_fctxt *prev; /* previous context */
98     } MG_FCTXT;
99    
100     extern MG_FCTXT *mg_file; /* current file context */
101    
102     #ifdef NOPROTO
103     extern void mg_init(); /* fill in mg_ehand array */
104     extern int mg_load(); /* parse a file */
105     extern int mg_open(); /* open new input file */
106     extern int mg_read(); /* read next line */
107     extern int mg_parse(); /* parse current line */
108     extern int mg_rewind(); /* rewind input file */
109     extern void mg_close(); /* close input file */
110     extern void mg_clear(); /* clear parser */
111     extern int mg_iterate();
112     #else
113     extern void mg_init(void); /* fill in mg_ehand array */
114     extern int mg_load(char *); /* parse a file */
115     extern int mg_open(MG_FCTXT *, char *); /* open new input file */
116     extern int mg_read(void); /* read next line */
117     extern int mg_parse(void); /* parse current line */
118     extern int mg_rewind(void); /* rewind input file */
119     extern void mg_close(void); /* close input file */
120     extern void mg_clear(void); /* clear parser */
121     extern int mg_iterate(int, char **, int (*)(void));
122     #endif
123    
124     #ifndef MG_NQCD
125     #define MG_NQCD 5 /* default number of divisions */
126     #endif
127    
128     extern int mg_nqcdivs; /* divisions per quarter circle */
129    
130     /*
131     * The following library routines are included for your convenience:
132     */
133    
134     #ifdef NOPROTO
135     extern int mg_entity(); /* get entity number from its name */
136     extern int isint(); /* non-zero if integer format */
137     extern int isflt(); /* non-zero if floating point format */
138     #else
139     extern int mg_entity(char *); /* get entity number from its name */
140     extern int isint(char *); /* non-zero if integer format */
141     extern int isflt(char *); /* non-zero if floating point format */
142     #endif
143    
144     /************************************************************************
145     * Definitions for 3-d vector manipulation functions
146     */
147    
148 greg 1.3 #ifdef SMLFLT
149     #define FLOAT float
150     #define FTINY (1e-3)
151 greg 1.2 #else
152 greg 1.3 #define FLOAT double
153     #define FTINY (1e-6)
154 greg 1.2 #endif
155 greg 1.3 #define FHUGE (1e10)
156 greg 1.1
157 greg 1.2 typedef FLOAT FVECT[3];
158    
159 greg 1.3 #define VCOPY(v1,v2) ((v1)[0]=(v2)[0],(v1)[1]=(v2)[1],(v1)[2]=(v2)[2])
160     #define DOT(v1,v2) ((v1)[0]*(v2)[0]+(v1)[1]*(v2)[1]+(v1)[2]*(v2)[2])
161     #define VSUM(vr,v1,v2,f) ((vr)[0]=(v1)[0]+(f)*(v2)[0], \
162     (vr)[1]=(v1)[1]+(f)*(v2)[1], \
163     (vr)[2]=(v1)[2]+(f)*(v2)[2])
164    
165     #define is0vect(v) (DOT(v,v) < FTINY*FTINY)
166    
167     #define round0(x) if (x <= FTINY && x >= -FTINY) x = 0
168    
169 greg 1.1 #ifdef NOPROTO
170     extern double normalize(); /* normalize a vector */
171     #else
172     extern double normalize(FVECT); /* normalize a vector */
173     #endif
174    
175     /************************************************************************
176     * Definitions for context handling routines
177     * (materials, colors, vectors)
178     */
179    
180 greg 1.5 /* The following structure will change when we add spectral data support */
181 greg 1.1 typedef struct {
182 greg 1.2 float cx, cy; /* XY chromaticity coordinates */
183 greg 1.1 } C_COLOR; /* color context */
184    
185 greg 1.5 #ifdef later
186    
187     #define C_CMAXWL 780 /* maximum wavelength */
188     #define C_CMINWL 380 /* minimum wavelength */
189     #define C_CNSS 41 /* number of spectral samples */
190     #define C_WLINC ((C_MAXWL-C_MINWL)/(C_NSS-1)) /* 10 nm increment */
191     #define C_CMAXV 10000 /* nominal maximum sample value */
192    
193     #define C_CXY 1 /* flag if has xy chromaticity */
194     #define C_CSPEC 2 /* flag if has spectrum */
195    
196 greg 1.1 typedef struct {
197 greg 1.5 short flags; /* what's been set */
198     float cx, cy; /* xy chromaticity value */
199     short ssamp[C_CNSS]; /* spectral samples, min wl to max */
200     long ssum; /* straight sum of spectral values */
201     } C_COLOR;
202    
203     #define C_DEFCOLOR { C_CXY|C_CSPEC, 1./3., 1./3.,
204     {C_CMAXV,C_CMAXV,C_CMAXV,C_CMAXV,C_CMAXV,\
205     C_CMAXV,C_CMAXV,C_CMAXV,C_CMAXV,C_CMAXV,C_CMAXV,\
206     C_CMAXV,C_CMAXV,C_CMAXV,C_CMAXV,C_CMAXV,C_CMAXV,\
207     C_CMAXV,C_CMAXV,C_CMAXV,C_CMAXV,C_CMAXV,C_CMAXV,\
208     C_CMAXV,C_CMAXV,C_CMAXV,C_CMAXV,C_CMAXV,C_CMAXV,\
209     C_CMAXV,C_CMAXV,C_CMAXV,C_CMAXV,C_CMAXV,C_CMAXV,\
210     C_CMAXV,C_CMAXV,C_CMAXV,C_CMAXV,C_CMAXV,C_CMAXV},\
211     (long)C_CNSS*C_MAXV }
212    
213     #define C_CIEX { C_CXY|C_CSPEC, ???, ???,
214     {14,42,143,435,1344,2839,3483,3362,2908,1954,956,\
215     320,49,93,633,1655,2904,4334,5945,7621,9163,10263,\
216     10622,10026,8544,6424,4479,2835,1649,874,468,227,\
217     114,58,29,14,7,3,2,1,0}, 106836L }
218    
219     #define C_CIEY { C_CXY|C_CSPEC, ???, ???,
220     {0,1,4,12,40,116,230,380,600,910,1390,2080,3230,\
221     5030,7100,8620,9540,9950,9950,9520,8700,7570,6310,\
222     5030,3810,2650,1750,1070,610,320,170,82,41,21,10,\
223     5,2,1,1,0,0}, 106856L }
224    
225     #define C_CIEZ { C_CXY|C_CSPEC, ???, ???,
226     {65,201,679,2074,6456,13856,17471,17721,16692,\
227     12876,8130,4652,2720,1582,782,422,203,87,39,21,17,\
228     11,8,3,2,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0}, 106770L }
229    
230     #define c_cval(c,l) ((double)(c)->ssamp[((l)-C_MINWL)/C_WLINC] / (c)->sum)
231    
232     #endif
233    
234     typedef struct {
235 greg 1.2 char *name; /* material name */
236     int clock; /* incremented each change -- resettable */
237     float rd; /* diffuse reflectance */
238 greg 1.1 C_COLOR rd_c; /* diffuse reflectance color */
239 greg 1.2 float td; /* diffuse transmittance */
240 greg 1.1 C_COLOR td_c; /* diffuse transmittance color */
241 greg 1.2 float ed; /* diffuse emittance */
242 greg 1.1 C_COLOR ed_c; /* diffuse emittance color */
243 greg 1.2 float rs; /* specular reflectance */
244 greg 1.1 C_COLOR rs_c; /* specular reflectance color */
245 greg 1.2 float rs_a; /* specular reflectance roughness */
246     float ts; /* specular transmittance */
247 greg 1.1 C_COLOR ts_c; /* specular transmittance color */
248 greg 1.2 float ts_a; /* specular transmittance roughness */
249 greg 1.1 } C_MATERIAL; /* material context */
250    
251     typedef struct {
252     FVECT p, n; /* point and normal */
253     } C_VERTEX; /* vertex context */
254 greg 1.3
255 greg 1.5 #define isgrey(cxy) ((cxy)->cx > .32 && (cxy)->cx < .34 && \
256     (cxy)->cy > .32 && (cxy)->cy < .34)
257 greg 1.1
258     #define C_DEFCOLOR {.333,.333}
259 greg 1.2 #define C_DEFMATERIAL {NULL,1,0.,C_DEFCOLOR,0.,C_DEFCOLOR,0.,C_DEFCOLOR,\
260     0.,C_DEFCOLOR,0.,0.,C_DEFCOLOR,0.}
261 greg 1.1 #define C_DEFVERTEX {{0.,0.,0.},{0.,0.,0.}}
262    
263     extern C_COLOR *c_ccolor; /* the current color */
264     extern C_MATERIAL *c_cmaterial; /* the current material */
265     extern C_VERTEX *c_cvertex; /* the current vertex */
266    
267     #ifdef NOPROTO
268     extern int c_hcolor(); /* handle color entity */
269     extern int c_hmaterial(); /* handle material entity */
270     extern int c_hvertex(); /* handle vertex entity */
271     extern void c_clearall(); /* clear context tables */
272     extern C_VERTEX *c_getvert(); /* get a named vertex */
273     #else
274     extern int c_hcolor(int, char **); /* handle color entity */
275     extern int c_hmaterial(int, char **); /* handle material entity */
276     extern int c_hvertex(int, char **); /* handle vertex entity */
277     extern void c_clearall(void); /* clear context tables */
278     extern C_VERTEX *c_getvert(char *); /* get a named vertex */
279     #endif
280    
281     /*************************************************************************
282     * Definitions for hierarchical object name handler
283     */
284    
285     extern int obj_nnames; /* depth of name hierarchy */
286     extern char **obj_name; /* names in hierarchy */
287    
288     #ifdef NOPROTO
289     extern int obj_handler(); /* handle an object entity */
290 greg 1.2 extern void obj_clear(); /* clear object stack */
291 greg 1.1 #else
292     extern int obj_handler(int, char **); /* handle an object entity */
293 greg 1.2 extern void obj_clear(void); /* clear object stack */
294 greg 1.1 #endif
295    
296     /**************************************************************************
297     * Definitions for hierarchical transformation handler
298     */
299    
300 greg 1.2 typedef FLOAT MAT4[4][4];
301 greg 1.1
302     #ifdef BSD
303     #define copymat4(m4a,m4b) bcopy((char *)m4b,(char *)m4a,sizeof(MAT4))
304     #else
305     #define copymat4(m4a,m4b) (void)memcpy((char *)m4a,(char *)m4b,sizeof(MAT4))
306     extern char *memcpy();
307     #endif
308    
309     #define MAT4IDENT { {1.,0.,0.,0.}, {0.,1.,0.,0.}, \
310     {0.,0.,1.,0.}, {0.,0.,0.,1.} }
311    
312     extern MAT4 m4ident;
313    
314     #define setident4(m4) copymat4(m4, m4ident)
315    
316     /* regular transformation */
317     typedef struct {
318     MAT4 xfm; /* transform matrix */
319 greg 1.2 FLOAT sca; /* scalefactor */
320 greg 1.1 } XF;
321    
322     #define identxf(xp) (void)(setident4((xp)->xfm),(xp)->sca=1.0)
323    
324     typedef struct xf_spec {
325     short xac; /* transform argument count */
326     short xav0; /* zeroeth argument in xf_argv array */
327     XF xf; /* cumulative transformation */
328     struct xf_spec *prev; /* previous transformation context */
329     } XF_SPEC;
330    
331     extern int xf_argc; /* total # transform args. */
332     extern char **xf_argv; /* transform arguments */
333     extern XF_SPEC *xf_context; /* current context */
334    
335     /*
336     * The transformation handler should do most of the work that needs
337     * doing. Just pass it any xf entities, then use the associated
338     * functions to transform and translate points, transform vectors
339     * (without translation), rotate vectors (without scaling) and scale
340     * values appropriately.
341     *
342     * The routines xf_xfmpoint, xf_xfmvect and xf_rotvect take two
343     * 3-D vectors (which may be identical), transforms the second and
344     * puts the result into the first.
345     */
346    
347     #ifdef NOPROTO
348    
349     extern int xf_handler(); /* handle xf entity */
350     extern void xf_xfmpoint(); /* transform point */
351     extern void xf_xfmvect(); /* transform vector */
352     extern void xf_rotvect(); /* rotate vector */
353     extern double xf_scale(); /* scale a value */
354 greg 1.2 extern void xf_clear(); /* clear xf stack */
355 greg 1.1
356     /* The following are support routines you probably won't call directly */
357    
358     extern void multmat4(); /* m4a = m4b X m4c */
359     extern void multv3(); /* v3a = v3b X m4 (vectors) */
360     extern void multp3(); /* p3a = p3b X m4 (points) */
361     extern int xf(); /* interpret transform spec. */
362    
363     #else
364    
365 greg 1.2 extern int xf_handler(int, char **); /* handle xf entity */
366     extern void xf_xfmpoint(FVECT, FVECT); /* transform point */
367     extern void xf_xfmvect(FVECT, FVECT); /* transform vector */
368     extern void xf_rotvect(FVECT, FVECT); /* rotate vector */
369     extern double xf_scale(double); /* scale a value */
370     extern void xf_clear(void); /* clear xf stack */
371 greg 1.1
372     /* The following are support routines you probably won't call directly */
373    
374     extern void multmat4(MAT4, MAT4, MAT4); /* m4a = m4b X m4c */
375     extern void multv3(FVECT, FVECT, MAT4); /* v3a = v3b X m4 (vectors) */
376     extern void multp3(FVECT, FVECT, MAT4); /* p3a = p3b X m4 (points) */
377     extern int xf(XF, int, char **); /* interpret transform spec. */
378    
379     #endif
380    
381     /************************************************************************
382     * Miscellaneous definitions
383     */
384    
385     #ifdef M_PI
386     #define PI M_PI
387     #else
388     #define PI 3.14159265358979323846
389     #endif
390    
391     #ifdef DCL_ATOF
392     extern double atof();
393     #endif
394    
395     #ifndef MEM_PTR
396     #define MEM_PTR void *
397     #endif
398    
399     extern MEM_PTR malloc();
400     extern MEM_PTR calloc();
401     extern MEM_PTR realloc();
402 greg 1.4 extern void free();