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.8 by greg, Sat Jun 25 11:55:42 1994 UTC vs.
Revision 1.23 by greg, Thu May 11 09:12:12 1995 UTC

# Line 1 | Line 1
1 < /* Copyright (c) 1994 Regents of the University of California */
1 > /* Copyright (c) 1995 Regents of the University of California */
2  
3   /* SCCSid "$SunId$ LBL" */
4  
# Line 9 | Line 9
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 < #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
12 > #define MG_E_COMMENT    0               /* #            */
13 > #define MG_E_COLOR      1               /* c            */
14 > #define MG_E_CCT        2               /* cct          */
15 > #define MG_E_CONE       3               /* cone         */
16 > #define MG_E_CMIX       4               /* cmix         */
17 > #define MG_E_CSPEC      5               /* cspec        */
18 > #define MG_E_CXY        6               /* cxy          */
19 > #define MG_E_CYL        7               /* cyl          */
20 > #define MG_E_ED         8               /* ed           */
21 > #define MG_E_FACE       9               /* f            */
22 > #define MG_E_INCLUDE    10              /* i            */
23 > #define MG_E_IES        11              /* ies          */
24 > #define MG_E_IR         12              /* ir           */
25 > #define MG_E_MATERIAL   13              /* m            */
26 > #define MG_E_NORMAL     14              /* n            */
27 > #define MG_E_OBJECT     15              /* o            */
28 > #define MG_E_POINT      16              /* p            */
29 > #define MG_E_PRISM      17              /* prism        */
30 > #define MG_E_RD         18              /* rd           */
31 > #define MG_E_RING       19              /* ring         */
32 > #define MG_E_RS         20              /* rs           */
33 > #define MG_E_SIDES      21              /* sides        */
34 > #define MG_E_SPH        22              /* sph          */
35 > #define MG_E_TD         23              /* td           */
36 > #define MG_E_TORUS      24              /* torus        */
37 > #define MG_E_TS         25              /* ts           */
38 > #define MG_E_VERTEX     26              /* v            */
39 > #define MG_E_XF         27              /* xf           */
40  
41 < #define MG_NENTITIES    25
41 > #define MG_NENTITIES    28              /* total # entities */
42  
43 < #define MG_NAMELIST     {"#","c","cone","cmix","cspec","cxy","cyl","ed","f",\
44 <                        "i","ies","m","n","o","p","prism","rd","ring","rs",\
45 <                        "sph","td","torus","ts","v","xf"}
43 > #define MG_NAMELIST     {"#","c","cct","cone","cmix","cspec","cxy","cyl","ed",\
44 >                        "f","i","ies","ir","m","n","o","p","prism","rd",\
45 >                        "ring","rs","sides","sph","td","torus","ts","v","xf"}
46  
47   #define MG_MAXELEN      6
48  
# Line 79 | Line 82 | extern char    *mg_err[MG_NERRS];
82   * To read from standard input, use NULL as the file name.
83   * For additional control over error reporting and file management,
84   * use mg_open, mg_read, mg_parse and mg_close instead of mg_load.
85 + * To pass an entity of your own construction to the parser, use
86 + * the mg_handle function rather than the mg_ehand routines directly.
87 + * (The first argument to mg_handle is the entity #, or -1.)
88   * To free any data structures and clear the parser, use mg_clear.
89 < * If there is an error, mg_load, mg_open, mg_parse, and mg_rewind
90 < * will return an error from the list above.  In addition, mg_load
91 < * will report the error to stderr.  The mg_read routine returns 0
92 < * when the end of file has been reached.
89 > * If there is an error, mg_load, mg_open, mg_parse, mg_handle and
90 > * mg_fgoto will return an error from the list above.  In addition,
91 > * mg_load will report the error to stderr.  The mg_read routine
92 > * returns 0 when the end of file has been reached.
93   */
94  
95 < #define MG_MAXLINE      512             /* maximum input line length */
95 > #define MG_MAXLINE      4096            /* maximum input line length */
96   #define MG_MAXARGC      (MG_MAXLINE/4)  /* maximum argument count */
97  
98   typedef struct mg_fctxt {
99          char    fname[96];                      /* file name */
100          FILE    *fp;                            /* stream pointer */
101 +        int     fid;                            /* unique file context id */
102          char    inpline[MG_MAXLINE];            /* input line */
103          int     lineno;                         /* line number */
104          struct mg_fctxt *prev;                  /* previous context */
105   } MG_FCTXT;
106  
107 + typedef struct {
108 +        int     fid;                            /* file this position is for */
109 +        int     lineno;                         /* line number in file */
110 +        long    offset;                         /* offset from beginning */
111 + } MG_FPOS;
112 +
113   extern MG_FCTXT *mg_file;               /* current file context */
114  
115   #ifdef NOPROTO
# Line 105 | Line 118 | extern int     mg_load();              /* parse a file */
118   extern int      mg_open();              /* open new input file */
119   extern int      mg_read();              /* read next line */
120   extern int      mg_parse();             /* parse current line */
121 < extern int      mg_rewind();            /* rewind input file */
121 > extern void     mg_fgetpos();           /* get position on input file */
122 > extern int      mg_fgoto();             /* go to position on input file */
123   extern void     mg_close();             /* close input file */
124   extern void     mg_clear();             /* clear parser */
125 < extern int      mg_iterate();
125 > extern int      mg_handle();            /* handle an entity */
126   #else
127   extern void     mg_init(void);          /* fill in mg_ehand array */
128   extern int      mg_load(char *);        /* parse a file */
129   extern int      mg_open(MG_FCTXT *, char *);    /* open new input file */
130   extern int      mg_read(void);          /* read next line */
131   extern int      mg_parse(void);         /* parse current line */
132 < extern int      mg_rewind(void);        /* rewind input file */
132 > extern void     mg_fgetpos(MG_FPOS *);  /* get position on input file */
133 > extern int      mg_fgoto(MG_FPOS *);    /* go to position on input file */
134   extern void     mg_close(void);         /* close input file */
135   extern void     mg_clear(void);         /* clear parser */
136 < extern int      mg_iterate(int, char **, int (*)(void));
136 > extern int      mg_handle(int, int, char **);   /* handle an entity */
137   #endif
138  
139   #ifndef MG_NQCD
# Line 135 | Line 150 | extern int     mg_nqcdivs;             /* divisions per quarter circl
150   extern int mg_entity();                 /* get entity number from its name */
151   extern int isint();                     /* non-zero if integer format */
152   extern int isflt();                     /* non-zero if floating point format */
153 + extern int isname();                    /* non-zero if legal identifier name */
154   #else
155   extern int mg_entity(char *);           /* get entity number from its name */
156   extern int isint(char *);               /* non-zero if integer format */
157   extern int isflt(char *);               /* non-zero if floating point format */
158 + extern int isname(char *);              /* non-zero if legal identifier name */
159   #endif
160  
161   /************************************************************************
# Line 182 | Line 199 | extern double  normalize(FVECT);       /* normalize a vector
199   #define C_CNSS          41              /* number of spectral samples */
200   #define C_CWLI          ((C_CMAXWL-C_CMINWL)/(C_CNSS-1))
201   #define C_CMAXV         10000           /* nominal maximum sample value */
202 + #define C_CLPWM         (683./C_CMAXV)  /* peak lumens/watt multiplier */
203  
204   #define C_CSSPEC        01              /* flag if spectrum is set */
205   #define C_CDSPEC        02              /* flag if defined w/ spectrum */
206   #define C_CSXY          04              /* flag if xy is set */
207   #define C_CDXY          010             /* flag if defined w/ xy */
208 + #define C_CSEFF         020             /* flag if efficacy set */
209  
210   typedef struct {
192 –        char    *name;                  /* material name */
211          int     clock;                  /* incremented each change */
212          short   flags;                  /* what's been set */
213          short   ssamp[C_CNSS];          /* spectral samples, min wl to max */
214          long    ssum;                   /* straight sum of spectral values */
215          float   cx, cy;                 /* xy chromaticity value */
216 +        float   eff;                    /* efficacy (lumens/watt) */
217   } C_COLOR;
218  
219 < #define C_DEFCOLOR      { NULL, 1, C_CDXY|C_CSXY|C_CSSPEC,\
219 > #define C_DEFCOLOR      { 1, C_CDXY|C_CSXY|C_CSSPEC|C_CSEFF,\
220                          {C_CMAXV,C_CMAXV,C_CMAXV,C_CMAXV,C_CMAXV,\
221                          C_CMAXV,C_CMAXV,C_CMAXV,C_CMAXV,C_CMAXV,C_CMAXV,\
222                          C_CMAXV,C_CMAXV,C_CMAXV,C_CMAXV,C_CMAXV,C_CMAXV,\
# Line 205 | Line 224 | typedef struct {
224                          C_CMAXV,C_CMAXV,C_CMAXV,C_CMAXV,C_CMAXV,C_CMAXV,\
225                          C_CMAXV,C_CMAXV,C_CMAXV,C_CMAXV,C_CMAXV,C_CMAXV,\
226                          C_CMAXV,C_CMAXV,C_CMAXV,C_CMAXV,C_CMAXV,C_CMAXV},\
227 <                        (long)C_CNSS*C_CMAXV, 1./3., 1./3. }
227 >                        (long)C_CNSS*C_CMAXV, 1./3., 1./3., 178.006 }
228  
229 < #define C_CIEX          { "_cie_x", 1, C_CDSPEC|C_CSSPEC|C_CSXY,\
211 <                        {14,42,143,435,1344,2839,3483,3362,2908,1954,956,\
212 <                        320,49,93,633,1655,2904,4334,5945,7621,9163,10263,\
213 <                        10622,10026,8544,6424,4479,2835,1649,874,468,227,\
214 <                        114,58,29,14,7,3,2,1,0}, 106836L, .735, .265 }
229 > #define c_cval(c,l)     ((double)(c)->ssamp[((l)-C_MINWL)/C_CWLI] / (c)->ssum)
230  
231 < #define C_CIEY          { "_cie_y", 1, C_CDSPEC|C_CSSPEC|C_CSXY,\
217 <                        {0,1,4,12,40,116,230,380,600,910,1390,2080,3230,\
218 <                        5030,7100,8620,9540,9950,9950,9520,8700,7570,6310,\
219 <                        5030,3810,2650,1750,1070,610,320,170,82,41,21,10,\
220 <                        5,2,1,1,0,0}, 106856L, .274, .717 }
231 > #define C_1SIDEDTHICK   0.005           /* assumed thickness of 1-sided mat. */
232  
222 – #define C_CIEZ          { "_cie_z", 1, C_CDSPEC|C_CSSPEC|C_CSXY,\
223 –                        {65,201,679,2074,6456,13856,17471,17721,16692,\
224 –                        12876,8130,4652,2720,1582,782,422,203,87,39,21,17,\
225 –                        11,8,3,2,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0},\
226 –                        106770L, .167, .009 }
227 –
228 – #define c_cval(c,l)     ((double)(c)->ssamp[((l)-C_MINWL)/C_CWLI] / (c)->sum)
229 –
233   typedef struct {
231 –        char    *name;          /* material name */
234          int     clock;          /* incremented each change -- resettable */
235 +        int     sided;          /* 1 if surface is 1-sided, 0 for 2-sided */
236 +        float   nr, ni;         /* index of refraction, real and imaginary */
237          float   rd;             /* diffuse reflectance */
238          C_COLOR rd_c;           /* diffuse reflectance color */
239          float   td;             /* diffuse transmittance */
# Line 245 | Line 249 | typedef struct {
249   } C_MATERIAL;           /* material context */
250  
251   typedef struct {
248 –        char    *name;          /* vector name */
252          int     clock;          /* incremented each change -- resettable */
253          FVECT   p, n;           /* point and normal */
254   } C_VERTEX;             /* vertex context */
255  
256 < #define C_DEFMATERIAL   {NULL,1,0.,C_DEFCOLOR,0.,C_DEFCOLOR,0.,C_DEFCOLOR,\
256 > #define C_DEFMATERIAL   {1,0,1.,0.,0.,C_DEFCOLOR,0.,C_DEFCOLOR,0.,C_DEFCOLOR,\
257                                          0.,C_DEFCOLOR,0.,0.,C_DEFCOLOR,0.}
258 < #define C_DEFVERTEX     {NULL,1,{0.,0.,0.},{0.,0.,0.}}
258 > #define C_DEFVERTEX     {1,{0.,0.,0.},{0.,0.,0.}}
259  
260   extern C_COLOR          *c_ccolor;      /* the current color */
261 + extern char             *c_ccname;      /* current color name */
262   extern C_MATERIAL       *c_cmaterial;   /* the current material */
263 + extern char             *c_cmname;      /* current material name */
264   extern C_VERTEX         *c_cvertex;     /* the current vertex */
265 + extern char             *c_cvname;      /* current vertex name */
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_MATERIAL       *c_getmaterial();       /* get a named material */
273   extern C_VERTEX *c_getvert();                   /* get a named vertex */
274   extern C_COLOR  *c_getcolor();                  /* get a named color */
275   extern void     c_ccvt();                       /* fix color representation */
# Line 272 | Line 279 | extern int     c_hcolor(int, char **);         /* handle color en
279   extern int      c_hmaterial(int, char **);      /* handle material entity */
280   extern int      c_hvertex(int, char **);        /* handle vertex entity */
281   extern void     c_clearall(void);               /* clear context tables */
282 + extern C_MATERIAL       *c_getmaterial(char *); /* get a named material */
283   extern C_VERTEX *c_getvert(char *);             /* get a named vertex */
284   extern C_COLOR  *c_getcolor(char *);            /* get a named color */
285   extern void     c_ccvt(C_COLOR *, int);         /* fix color representation */
# Line 314 | Line 322 | extern MAT4  m4ident;
322  
323                                  /* regular transformation */
324   typedef struct {
325 <        MAT4  xfm;                              /* transform matrix */
326 <        FLOAT  sca;                             /* scalefactor */
325 >        MAT4    xfm;                            /* transform matrix */
326 >        FLOAT   sca;                            /* scalefactor */
327   }  XF;
328  
329   #define identxf(xp)             (void)(setident4((xp)->xfm),(xp)->sca=1.0)
330  
331 + #define XF_MAXDIM       8               /* maximum array dimensions */
332 +
333 + struct xf_array {
334 +        MG_FPOS spos;                   /* starting position on input */
335 +        int     ndim;                   /* number of array dimensions */
336 +        struct {
337 +                short   i, n;           /* current count and maximum */
338 +                char    arg[8];         /* string argument value */
339 +        } aarg[XF_MAXDIM];
340 + };
341 +
342   typedef struct xf_spec {
343 <        short   xac;            /* transform argument count */
344 <        short   xav0;           /* zeroeth argument in xf_argv array */
345 <        XF      xf;             /* cumulative transformation */
346 <        struct xf_spec  *prev;  /* previous transformation context */
347 < } XF_SPEC;
343 >        long    xid;                    /* unique transform id */
344 >        short   xac;                    /* context argument count */
345 >        short   rev;                    /* boolean true if vertices reversed */
346 >        XF      xf;                     /* cumulative transformation */
347 >        struct xf_array *xarr;          /* transformation array pointer */
348 >        struct xf_spec  *prev;          /* previous transformation context */
349 > } XF_SPEC;                      /* followed by argument buffer */
350  
351 < extern int      xf_argc;                        /* total # transform args. */
352 < extern char     **xf_argv;                      /* transform arguments */
353 < extern XF_SPEC  *xf_context;                    /* current context */
351 > extern XF_SPEC  *xf_context;                    /* current transform context */
352 > extern char     **xf_argend;                    /* last transform argument */
353 >
354 > #define xf_ac(xf)       ((xf)->xac)
355 > #define xf_av(xf)       (xf_argend - (xf)->xac)
356 >
357 > #define xf_argc         (xf_context==NULL ? 0 : xf_ac(xf_context))
358 > #define xf_argv         xf_av(xf_context)
359  
360   /*
361   * The transformation handler should do most of the work that needs

Diff Legend

– Removed lines
+ Added lines
< Changed lines
> Changed lines