1 |
< |
/* Copyright (c) 1995 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) */ |
8 |
> |
/* must include stdio.h and stdlib.h before us */ |
9 |
> |
|
10 |
> |
#define MG_VMAJOR 2 /* major version number */ |
11 |
> |
#define MG_VMINOR 0 /* minor version number */ |
12 |
> |
|
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 */ |
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 28 /* total # entities */ |
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"} |
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 and unknown ones */ |
52 |
– |
|
60 |
|
#ifdef NOPROTO |
61 |
|
extern int (*mg_ehand[MG_NENTITIES])(); |
62 |
|
extern int (*mg_uhand)(); |
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]; /* list of error messages */ |
90 |
|
|
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 |
|
/************************************************************************ |
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 |
|
/************************************************************************ |
248 |
|
#define C_CSEFF 020 /* flag if efficacy set */ |
249 |
|
|
250 |
|
typedef struct { |
251 |
< |
int clock; /* incremented each change */ |
252 |
< |
short flags; /* what's been set */ |
253 |
< |
short ssamp[C_CNSS]; /* spectral samples, min wl to max */ |
254 |
< |
long ssum; /* straight sum of spectral values */ |
255 |
< |
float cx, cy; /* xy chromaticity value */ |
256 |
< |
float eff; /* efficacy (lumens/watt) */ |
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 { 1, C_CDXY|C_CSXY|C_CSSPEC|C_CSEFF,\ |
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,\ |
273 |
|
|
274 |
|
typedef struct { |
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 */ |
292 |
|
|
293 |
|
typedef struct { |
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 {1,0,1.,0.,0.,C_DEFCOLOR,0.,C_DEFCOLOR,0.,C_DEFCOLOR,\ |
300 |
< |
0.,C_DEFCOLOR,0.,0.,C_DEFCOLOR,0.} |
301 |
< |
#define C_DEFVERTEX {1,{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 */ |
394 |
|
extern XF_SPEC *xf_context; /* current transform context */ |
395 |
|
extern char **xf_argend; /* last transform argument */ |
396 |
|
|
397 |
< |
#define xf_ac(xf) ((xf)->xac) |
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_context==NULL ? 0 : xf_ac(xf_context)) |
400 |
> |
#define xf_argc xf_ac(xf_context) |
401 |
|
#define xf_argv xf_av(xf_context) |
402 |
|
|
403 |
|
/* |
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) */ |
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) */ |
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 |
421 |
– |
|
422 |
– |
#ifdef DCL_ATOF |
423 |
– |
extern double atof(); |
467 |
|
#endif |
468 |
|
|
469 |
|
#ifndef MEM_PTR |
470 |
|
#define MEM_PTR void * |
471 |
|
#endif |
472 |
|
|
473 |
< |
extern MEM_PTR malloc(); |
431 |
< |
extern MEM_PTR calloc(); |
432 |
< |
extern MEM_PTR realloc(); |
433 |
< |
extern void free(); |
473 |
> |
#endif /*MG_VMAJOR*/ |