ViewVC Help
View File | Revision Log | Show Annotations | Download File | Root Listing
root/radiance/ray/src/cv/mgflib/parser.h
(Generate patch)

Comparing ray/src/cv/mgflib/parser.h (file contents):
Revision 1.11 by greg, Thu Jun 30 11:07:38 1994 UTC vs.
Revision 1.33 by greg, Fri Feb 28 20:11:29 2003 UTC

# Line 1 | Line 1
1 < /* Copyright (c) 1994 Regents of the University of California */
2 <
3 < /* SCCSid "$SunId$ LBL" */
4 <
1 > /* RCSid: $Id$ */
2   /*
3   * Header file for MGF interpreter
4   */
5  
6 < /* must include stdio.h before us */
6 > #ifndef MG_VMAJOR
7  
8 <                        /* 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 < #define MG_E_CMIX       3
16 < #define MG_E_CSPEC      4
17 < #define MG_E_CXY        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
8 > /* must include stdio.h and stdlib.h before us */
9  
10 < #define MG_NENTITIES    25
10 > #define MG_VMAJOR       2               /* major version number */
11 > #define MG_VMINOR       0               /* minor version number */
12  
13 < #define MG_NAMELIST     {"#","c","cone","cmix","cspec","cxy","cyl","ed","f",\
14 <                        "i","ies","m","n","o","p","prism","rd","ring","rs",\
15 <                        "sph","td","torus","ts","v","xf"}
13 >                        /* Entities (list is only appended, never modified) */
14 > #define MG_E_COMMENT    0               /* #            */
15 > #define MG_E_COLOR      1               /* c            */
16 > #define MG_E_CCT        2               /* cct          */
17 > #define MG_E_CONE       3               /* cone         */
18 > #define MG_E_CMIX       4               /* cmix         */
19 > #define MG_E_CSPEC      5               /* cspec        */
20 > #define MG_E_CXY        6               /* cxy          */
21 > #define MG_E_CYL        7               /* cyl          */
22 > #define MG_E_ED         8               /* ed           */
23 > #define MG_E_FACE       9               /* f            */
24 > #define MG_E_INCLUDE    10              /* i            */
25 > #define MG_E_IES        11              /* ies          */
26 > #define MG_E_IR         12              /* ir           */
27 > #define MG_E_MATERIAL   13              /* m            */
28 > #define MG_E_NORMAL     14              /* n            */
29 > #define MG_E_OBJECT     15              /* o            */
30 > #define MG_E_POINT      16              /* p            */
31 > #define MG_E_PRISM      17              /* prism        */
32 > #define MG_E_RD         18              /* rd           */
33 > #define MG_E_RING       19              /* ring         */
34 > #define MG_E_RS         20              /* rs           */
35 > #define MG_E_SIDES      21              /* sides        */
36 > #define MG_E_SPH        22              /* sph          */
37 > #define MG_E_TD         23              /* td           */
38 > #define MG_E_TORUS      24              /* torus        */
39 > #define MG_E_TS         25              /* ts           */
40 > #define MG_E_VERTEX     26              /* v            */
41 > #define MG_E_XF         27              /* xf           */
42 >                        /* end of Version 1 entities */
43 > #define MG_E_FACEH      28              /* fh           */
44 >                        /* end of Version 2 entities */
45  
46 + #define MG_NENTITIES    29              /* total # entities */
47 +
48 + #define MG_NELIST       {28,29}         /* entity count for version 1 and up */
49 +
50 + #define MG_NAMELIST     {"#","c","cct","cone","cmix","cspec","cxy","cyl","ed",\
51 +                        "f","i","ies","ir","m","n","o","p","prism","rd",\
52 +                        "ring","rs","sides","sph","td","torus","ts","v","xf",\
53 +                        "fh"}
54 +
55   #define MG_MAXELEN      6
56  
57   extern char     mg_ename[MG_NENTITIES][MG_MAXELEN];
58  
59 <                        /* Handler routines for each entity */
49 <
59 >                        /* Handler routines for each entity and unknown ones */
60   #ifdef NOPROTO
61   extern int      (*mg_ehand[MG_NENTITIES])();
62 + extern int      (*mg_uhand)();
63 + extern int      mg_defuhand();
64   #else
65   extern int      (*mg_ehand[MG_NENTITIES])(int argc, char **argv);
66 + extern int      (*mg_uhand)(int argc, char **argv);
67 + extern int      mg_defuhand(int, char **);
68   #endif
69  
70 + extern unsigned mg_nunknown;            /* count of unknown entities */
71 +
72                          /* Error codes */
73   #define MG_OK           0               /* normal return value */
74   #define MG_EUNK         1               /* unknown entity */
# Line 65 | Line 81 | extern int     (*mg_ehand[MG_NENTITIES])(int argc, char **
81   #define MG_EMEM         8               /* out of memory */
82   #define MG_ESEEK        9               /* file seek error */
83   #define MG_EBADMAT      10              /* bad material specification */
84 + #define MG_ELINE        11              /* input line too long */
85 + #define MG_ECNTXT       12              /* unmatched context close */
86  
87 < #define MG_NERRS        11
87 > #define MG_NERRS        13
88  
89 < extern char     *mg_err[MG_NERRS];
89 > extern char     *mg_err[MG_NERRS];      /* list of error messages */
90  
91   /*
92   * The general process for running the parser is to fill in the mg_ehand
# Line 83 | Line 101 | extern char    *mg_err[MG_NERRS];
101   * the mg_handle function rather than the mg_ehand routines directly.
102   * (The first argument to mg_handle is the entity #, or -1.)
103   * To free any data structures and clear the parser, use mg_clear.
104 < * If there is an error, mg_load, mg_open, mg_parse, and mg_rewind
105 < * will return an error from the list above.  In addition, mg_load
106 < * will report the error to stderr.  The mg_read routine returns 0
107 < * when the end of file has been reached.
104 > * If there is an error, mg_load, mg_open, mg_parse, mg_handle and
105 > * mg_fgoto will return an error from the list above.  In addition,
106 > * mg_load will report the error to stderr.  The mg_read routine
107 > * returns 0 when the end of file has been reached.
108   */
109  
110 < #define MG_MAXLINE      512             /* maximum input line length */
110 > #define MG_MAXLINE      4096            /* maximum input line length */
111   #define MG_MAXARGC      (MG_MAXLINE/4)  /* maximum argument count */
112  
113   typedef struct mg_fctxt {
# Line 146 | Line 164 | extern int     mg_nqcdivs;             /* divisions per quarter circl
164   #ifdef NOPROTO
165   extern int mg_entity();                 /* get entity number from its name */
166   extern int isint();                     /* non-zero if integer format */
167 + extern int isintd();                    /* same with delimiter set */
168   extern int isflt();                     /* non-zero if floating point format */
169 + extern int isfltd();                    /* same with delimiter set */
170 + extern int isname();                    /* non-zero if legal identifier name */
171 + extern int badarg();                    /* check argument format */
172 + extern int e_include();                 /* expand include entity */
173 + extern int e_pipe();                    /* expand piped command */
174 + extern int e_sph();                     /* expand sphere as other entities */
175 + extern int e_torus();                   /* expand torus as other entities */
176 + extern int e_cyl();                     /* expand cylinder as other entities */
177 + extern int e_ring();                    /* expand ring as other entities */
178 + extern int e_cone();                    /* expand cone as other entities */
179 + extern int e_prism();                   /* expand prism as other entities */
180 + extern int e_faceh();                   /* expand face w/ holes as face */
181   #else
182   extern int mg_entity(char *);           /* get entity number from its name */
183   extern int isint(char *);               /* non-zero if integer format */
184 + extern int isintd(char *, char *);      /* same with delimiter set */
185   extern int isflt(char *);               /* non-zero if floating point format */
186 + extern int isfltd(char *, char *);      /* same with delimiter set */
187 + extern int isname(char *);              /* non-zero if legal identifier name */
188 + extern int badarg(int, char **, char *);/* check argument format */
189 + extern int e_include(int, char **);     /* expand include entity */
190 + extern int e_pipe(int, char **);        /* expand piped command */
191 + extern int e_sph(int, char **);         /* expand sphere as other entities */
192 + extern int e_torus(int, char **);       /* expand torus as other entities */
193 + extern int e_cyl(int, char **);         /* expand cylinder as other entities */
194 + extern int e_ring(int, char **);        /* expand ring as other entities */
195 + extern int e_cone(int, char **);        /* expand cone as other entities */
196 + extern int e_prism(int, char **);       /* expand prism as other entities */
197 + extern int e_faceh(int, char **);       /* expand face w/ holes as face */
198   #endif
199  
200   /************************************************************************
# Line 182 | Line 226 | typedef FLOAT  FVECT[3];
226   extern double   normalize();            /* normalize a vector */
227   #else
228   extern double   normalize(FVECT);       /* normalize a vector */
229 + extern void     fcross(FVECT,FVECT,FVECT);/* cross product of two vectors */
230   #endif
231  
232   /************************************************************************
# Line 194 | Line 239 | extern double  normalize(FVECT);       /* normalize a vector
239   #define C_CNSS          41              /* number of spectral samples */
240   #define C_CWLI          ((C_CMAXWL-C_CMINWL)/(C_CNSS-1))
241   #define C_CMAXV         10000           /* nominal maximum sample value */
242 + #define C_CLPWM         (683./C_CMAXV)  /* peak lumens/watt multiplier */
243  
244   #define C_CSSPEC        01              /* flag if spectrum is set */
245   #define C_CDSPEC        02              /* flag if defined w/ spectrum */
246   #define C_CSXY          04              /* flag if xy is set */
247   #define C_CDXY          010             /* flag if defined w/ xy */
248 + #define C_CSEFF         020             /* flag if efficacy set */
249  
250   typedef struct {
251 <        char    *name;                  /* material name */
252 <        int     clock;                  /* incremented each change */
253 <        short   flags;                  /* what's been set */
254 <        short   ssamp[C_CNSS];          /* spectral samples, min wl to max */
255 <        long    ssum;                   /* straight sum of spectral values */
256 <        float   cx, cy;                 /* xy chromaticity value */
251 >        int     clock;          /* incremented each change */
252 >        char    *client_data;   /* pointer to private client-owned data */
253 >        short   flags;          /* what's been set */
254 >        short   ssamp[C_CNSS];  /* spectral samples, min wl to max */
255 >        long    ssum;           /* straight sum of spectral values */
256 >        float   cx, cy;         /* xy chromaticity value */
257 >        float   eff;            /* efficacy (lumens/watt) */
258   } C_COLOR;
259  
260 < #define C_DEFCOLOR      { NULL, 0, C_CDXY|C_CSXY|C_CSSPEC,\
260 > #define C_DEFCOLOR      { 1, NULL, C_CDXY|C_CSXY|C_CSSPEC|C_CSEFF,\
261                          {C_CMAXV,C_CMAXV,C_CMAXV,C_CMAXV,C_CMAXV,\
262                          C_CMAXV,C_CMAXV,C_CMAXV,C_CMAXV,C_CMAXV,C_CMAXV,\
263                          C_CMAXV,C_CMAXV,C_CMAXV,C_CMAXV,C_CMAXV,C_CMAXV,\
# Line 217 | Line 265 | typedef struct {
265                          C_CMAXV,C_CMAXV,C_CMAXV,C_CMAXV,C_CMAXV,C_CMAXV,\
266                          C_CMAXV,C_CMAXV,C_CMAXV,C_CMAXV,C_CMAXV,C_CMAXV,\
267                          C_CMAXV,C_CMAXV,C_CMAXV,C_CMAXV,C_CMAXV,C_CMAXV},\
268 <                        (long)C_CNSS*C_CMAXV, 1./3., 1./3. }
268 >                        (long)C_CNSS*C_CMAXV, 1./3., 1./3., 178.006 }
269  
270 < #define C_CIEX          { "_cie_x", 0, C_CDSPEC|C_CSSPEC|C_CSXY,\
223 <                        {14,42,143,435,1344,2839,3483,3362,2908,1954,956,\
224 <                        320,49,93,633,1655,2904,4334,5945,7621,9163,10263,\
225 <                        10622,10026,8544,6424,4479,2835,1649,874,468,227,\
226 <                        114,58,29,14,7,3,2,1,0}, 106836L, .735, .265 }
270 > #define c_cval(c,l)     ((double)(c)->ssamp[((l)-C_MINWL)/C_CWLI] / (c)->ssum)
271  
272 < #define C_CIEY          { "_cie_y", 0, C_CDSPEC|C_CSSPEC|C_CSXY,\
229 <                        {0,1,4,12,40,116,230,380,600,910,1390,2080,3230,\
230 <                        5030,7100,8620,9540,9950,9950,9520,8700,7570,6310,\
231 <                        5030,3810,2650,1750,1070,610,320,170,82,41,21,10,\
232 <                        5,2,1,1,0,0}, 106856L, .274, .717 }
272 > #define C_1SIDEDTHICK   0.005           /* assumed thickness of 1-sided mat. */
273  
234 #define C_CIEZ          { "_cie_z", 0, C_CDSPEC|C_CSSPEC|C_CSXY,\
235                        {65,201,679,2074,6456,13856,17471,17721,16692,\
236                        12876,8130,4652,2720,1582,782,422,203,87,39,21,17,\
237                        11,8,3,2,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0},\
238                        106770L, .167, .009 }
239
240 #define c_cval(c,l)     ((double)(c)->ssamp[((l)-C_MINWL)/C_CWLI] / (c)->sum)
241
274   typedef struct {
243        char    *name;          /* material name */
275          int     clock;          /* incremented each change -- resettable */
276 +        char    *client_data;   /* pointer to private client-owned data */
277 +        int     sided;          /* 1 if surface is 1-sided, 0 for 2-sided */
278 +        float   nr, ni;         /* index of refraction, real and imaginary */
279          float   rd;             /* diffuse reflectance */
280          C_COLOR rd_c;           /* diffuse reflectance color */
281          float   td;             /* diffuse transmittance */
# Line 257 | Line 291 | typedef struct {
291   } C_MATERIAL;           /* material context */
292  
293   typedef struct {
260        char    *name;          /* vector name */
294          int     clock;          /* incremented each change -- resettable */
295 +        char    *client_data;   /* pointer to private client-owned data */
296          FVECT   p, n;           /* point and normal */
297   } C_VERTEX;             /* vertex context */
298  
299 < #define C_DEFMATERIAL   {NULL,0,0.,C_DEFCOLOR,0.,C_DEFCOLOR,0.,C_DEFCOLOR,\
300 <                                        0.,C_DEFCOLOR,0.,0.,C_DEFCOLOR,0.}
301 < #define C_DEFVERTEX     {NULL,0,{0.,0.,0.},{0.,0.,0.}}
299 > #define C_DEFMATERIAL   {1,NULL,0,1.,0.,0.,C_DEFCOLOR,0.,C_DEFCOLOR,0.,\
300 >                                C_DEFCOLOR,0.,C_DEFCOLOR,0.,0.,C_DEFCOLOR,0.}
301 > #define C_DEFVERTEX     {1,NULL,{0.,0.,0.},{0.,0.,0.}}
302  
303   extern C_COLOR          *c_ccolor;      /* the current color */
304 + extern char             *c_ccname;      /* current color name */
305   extern C_MATERIAL       *c_cmaterial;   /* the current material */
306 + extern char             *c_cmname;      /* current material name */
307   extern C_VERTEX         *c_cvertex;     /* the current vertex */
308 + extern char             *c_cvname;      /* current vertex name */
309  
310   #ifdef NOPROTO
311   extern int      c_hcolor();                     /* handle color entity */
# Line 328 | Line 365 | extern MAT4  m4ident;
365  
366                                  /* regular transformation */
367   typedef struct {
368 <        MAT4  xfm;                              /* transform matrix */
369 <        FLOAT  sca;                             /* scalefactor */
368 >        MAT4    xfm;                            /* transform matrix */
369 >        FLOAT   sca;                            /* scalefactor */
370   }  XF;
371  
372   #define identxf(xp)             (void)(setident4((xp)->xfm),(xp)->sca=1.0)
# Line 347 | Line 384 | struct xf_array {
384  
385   typedef struct xf_spec {
386          long    xid;                    /* unique transform id */
387 <        short   xav0;                   /* zeroeth argument in xf_argv array */
388 <        short   xac;                    /* transform argument count */
387 >        short   xac;                    /* context argument count */
388 >        short   rev;                    /* boolean true if vertices reversed */
389          XF      xf;                     /* cumulative transformation */
390          struct xf_array *xarr;          /* transformation array pointer */
391          struct xf_spec  *prev;          /* previous transformation context */
392   } XF_SPEC;                      /* followed by argument buffer */
393  
394 < extern int      xf_argc;                        /* total # transform args. */
395 < extern char     **xf_argv;                      /* transform arguments */
359 < extern XF_SPEC  *xf_context;                    /* current context */
394 > extern XF_SPEC  *xf_context;                    /* current transform context */
395 > extern char     **xf_argend;                    /* last transform argument */
396  
397 + #define xf_ac(xf)       ((xf)==NULL ? 0 : (xf)->xac)
398 + #define xf_av(xf)       (xf_argend - (xf)->xac)
399 +
400 + #define xf_argc         xf_ac(xf_context)
401 + #define xf_argv         xf_av(xf_context)
402 +
403   /*
404   * The transformation handler should do most of the work that needs
405   * doing.  Just pass it any xf entities, then use the associated
# Line 381 | Line 423 | extern void    xf_clear();             /* clear xf stack */
423  
424   /* The following are support routines you probably won't call directly */
425  
426 + XF_SPEC         *new_xf();              /* allocate new transform */
427 + void            free_xf();              /* free a transform */
428 + int             xf_aname();             /* name this instance */
429 + long            comp_xfid();            /* compute unique ID */
430   extern void     multmat4();             /* m4a = m4b X m4c */
431   extern void     multv3();               /* v3a = v3b X m4 (vectors) */
432   extern void     multp3();               /* p3a = p3b X m4 (points) */
# Line 397 | Line 443 | extern void    xf_clear(void);                 /* clear xf stack */
443  
444   /* The following are support routines you probably won't call directly */
445  
446 + XF_SPEC         *new_xf(int, char **);          /* allocate new transform */
447 + void            free_xf(XF_SPEC *);             /* free a transform */
448 + int             xf_aname(struct xf_array *);    /* name this instance */
449 + long            comp_xfid(MAT4);                /* compute unique ID */
450   extern void     multmat4(MAT4, MAT4, MAT4);     /* m4a = m4b X m4c */
451   extern void     multv3(FVECT, FVECT, MAT4);     /* v3a = v3b X m4 (vectors) */
452   extern void     multp3(FVECT, FVECT, MAT4);     /* p3a = p3b X m4 (points) */
# Line 408 | Line 458 | extern int     xf(XF *, int, char **);         /* interpret trans
458   *      Miscellaneous definitions
459   */
460  
461 + #ifndef  PI
462   #ifdef  M_PI
463 < #define  PI             M_PI
463 > #define  PI             ((double)M_PI)
464   #else
465   #define  PI             3.14159265358979323846
466   #endif
416
417 #ifdef DCL_ATOF
418 extern double   atof();
467   #endif
468  
469   #ifndef MEM_PTR
470   #define MEM_PTR         void *
471   #endif
472  
473 < extern MEM_PTR  malloc();
426 < extern MEM_PTR  calloc();
427 < extern MEM_PTR  realloc();
428 < extern void     free();
473 > #endif /*MG_VMAJOR*/

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines