ViewVC Help
View File | Revision Log | Show Annotations | Download File | Root Listing
root/radiance/ray/src/rt/initotypes.c
Revision: 2.28
Committed: Sun Jan 31 17:49:21 2021 UTC (3 years, 3 months ago) by greg
Content type: text/plain
Branch: MAIN
Changes since 2.27: +7 -5 lines
Log Message:
fix: bug in findmaterial() could return material in wrong alias modifier chain

File Contents

# Content
1 #ifndef lint
2 static const char RCSid[] = "$Id: initotypes.c,v 2.27 2021/01/30 17:53:19 greg Exp $";
3 #endif
4 /*
5 * Initialize ofun[] list for renderers
6 */
7
8 #include "copyright.h"
9
10 #include "ray.h"
11 #include "otypes.h"
12 #include "rtotypes.h"
13 #include "otspecial.h"
14
15
16 FUN ofun[NUMOTYPE] = INIT_OTYPE;
17
18
19 void
20 initotypes(void) /* initialize ofun array */
21 {
22 ofun[OBJ_SPHERE].funp =
23 ofun[OBJ_BUBBLE].funp = o_sphere;
24 ofun[OBJ_FACE].funp = o_face;
25 ofun[OBJ_CONE].funp =
26 ofun[OBJ_CUP].funp =
27 ofun[OBJ_CYLINDER].funp =
28 ofun[OBJ_TUBE].funp =
29 ofun[OBJ_RING].funp = o_cone;
30 ofun[OBJ_INSTANCE].funp = o_instance;
31 ofun[OBJ_MESH].funp = o_mesh;
32 ofun[MOD_ALIAS].funp = m_alias;
33 ofun[MAT_LIGHT].funp =
34 ofun[MAT_ILLUM].funp =
35 ofun[MAT_GLOW].funp =
36 ofun[MAT_SPOT].funp = m_light;
37 ofun[MAT_LIGHT].flags |= T_OPAQUE;
38 ofun[MAT_SPOT].flags |= T_OPAQUE;
39 ofun[MAT_PLASTIC].funp =
40 ofun[MAT_METAL].funp =
41 ofun[MAT_TRANS].funp = m_normal;
42 ofun[MAT_PLASTIC].flags |= T_OPAQUE;
43 ofun[MAT_METAL].flags |= T_OPAQUE;
44 ofun[MAT_TRANS].flags |= T_TRANSP;
45 ofun[MAT_PLASTIC2].funp =
46 ofun[MAT_METAL2].funp =
47 ofun[MAT_TRANS2].funp = m_aniso;
48 ofun[MAT_PLASTIC2].flags |= T_OPAQUE;
49 ofun[MAT_METAL2].flags |= T_OPAQUE;
50 ofun[MAT_TRANS2].flags |= T_TRANSP;
51 ofun[MAT_ASHIKHMIN].funp = m_ashikhmin;
52 ofun[MAT_ASHIKHMIN].flags |= T_OPAQUE;
53 ofun[MAT_DIELECTRIC].funp =
54 ofun[MAT_INTERFACE].funp = m_dielectric;
55 ofun[MAT_DIELECTRIC].flags |= T_TRANSP;
56 ofun[MAT_INTERFACE].flags |= T_TRANSP;
57 ofun[MAT_MIST].funp = m_mist;
58 ofun[MAT_MIST].flags |= T_TRANSP;
59 ofun[MAT_GLASS].funp = m_glass;
60 ofun[MAT_GLASS].flags |= T_TRANSP;
61 ofun[MAT_MIRROR].funp = m_mirror;
62 ofun[MAT_DIRECT1].funp =
63 ofun[MAT_DIRECT2].funp = m_direct;
64 ofun[MAT_CLIP].funp = m_clip;
65 ofun[MAT_BRTDF].funp = m_brdf;
66 ofun[MAT_BSDF].funp =
67 ofun[MAT_ABSDF].funp = m_bsdf;
68 ofun[MAT_ABSDF].flags |= T_TRANSP;
69 ofun[MAT_PFUNC].funp =
70 ofun[MAT_MFUNC].funp =
71 ofun[MAT_PDATA].funp =
72 ofun[MAT_MDATA].funp =
73 ofun[MAT_TFUNC].funp =
74 ofun[MAT_TDATA].funp = m_brdf2;
75 ofun[MAT_PFUNC].flags |= T_OPAQUE;
76 ofun[MAT_MFUNC].flags |= T_OPAQUE;
77 ofun[MAT_TFUNC].flags |= T_OPAQUE;
78 ofun[MAT_PDATA].flags |= T_OPAQUE;
79 ofun[MAT_MDATA].flags |= T_OPAQUE;
80 ofun[MAT_TDATA].flags |= T_OPAQUE;
81 ofun[TEX_FUNC].funp = t_func;
82 ofun[TEX_DATA].funp = t_data;
83 ofun[PAT_CFUNC].funp = p_cfunc;
84 ofun[PAT_BFUNC].funp = p_bfunc;
85 ofun[PAT_CPICT].funp = p_pdata;
86 ofun[PAT_CDATA].funp = p_cdata;
87 ofun[PAT_BDATA].funp = p_bdata;
88 ofun[PAT_CTEXT].funp =
89 ofun[PAT_BTEXT].funp =
90 ofun[MIX_TEXT].funp = do_text;
91 ofun[MIX_FUNC].funp = mx_func;
92 ofun[MIX_DATA].funp = mx_data;
93 ofun[MIX_PICT].funp = mx_pdata;
94 }
95
96
97 int
98 o_default(OBJREC *o, RAY *r) /* default action is error */
99 {
100 objerror(o, CONSISTENCY, "unexpected object call");
101 /* unused call to load freeobjmem.o */
102 free_objs(0, 0);
103 return(0);
104 }
105
106
107 OBJREC *
108 findmaterial(OBJREC *o) /* find an object's actual material */
109 {
110 OBJECT mod = OVOID;
111
112 while (!ismaterial(o->otype)) {
113 if (o->otype == MOD_ALIAS && o->oargs.nsargs) {
114 OBJREC *ao; /* check if aliased to material */
115 if (mod == OVOID)
116 mod = objndx(o);
117 mod = lastmod(mod, o->oargs.sarg[0]);
118 if (mod < 0)
119 objerror(o, USER, "bad reference");
120 while ((ao = objptr(mod))->otype == MOD_ALIAS &&
121 !ao->oargs.nsargs)
122 mod = ao->omod;
123 if (ismaterial(ao->otype))
124 return(ao);
125 }
126 if (o->omod == OVOID) {
127 /* void mixture de facto material? */
128 if (ismixture(o->otype))
129 break;
130 return(NULL); /* else no material found */
131 }
132 o = objptr(mod = o->omod);
133 }
134 return(o);
135 }