src/rt/initotypes.c

#ifndef lint
static const char RCSid[] = "$Id: initotypes.c,v 2.29 2021/01/31 20:06:15 greg Exp $";
#endif
/*
 * Initialize ofun[] list for renderers
 */

#include  "copyright.h"

#include  "ray.h"
#include  "otypes.h"
#include  "rtotypes.h"
#include  "otspecial.h"


FUN  ofun[NUMOTYPE] = INIT_OTYPE;


void
initotypes(void)                        /* initialize ofun array */
{
        ofun[OBJ_SPHERE].funp =
        ofun[OBJ_BUBBLE].funp = o_sphere;
        ofun[OBJ_FACE].funp = o_face;
        ofun[OBJ_CONE].funp =
        ofun[OBJ_CUP].funp =
        ofun[OBJ_CYLINDER].funp =
        ofun[OBJ_TUBE].funp =
        ofun[OBJ_RING].funp = o_cone;
        ofun[OBJ_INSTANCE].funp = o_instance;
        ofun[OBJ_MESH].funp = o_mesh;
        ofun[MOD_ALIAS].funp = m_alias;
        ofun[MAT_LIGHT].funp =
        ofun[MAT_ILLUM].funp =
        ofun[MAT_GLOW].funp =
        ofun[MAT_SPOT].funp = m_light;
        ofun[MAT_LIGHT].flags |= T_OPAQUE;
        ofun[MAT_SPOT].flags |= T_OPAQUE;
        ofun[MAT_PLASTIC].funp =
        ofun[MAT_METAL].funp =
        ofun[MAT_TRANS].funp = m_normal;
        ofun[MAT_PLASTIC].flags |= T_OPAQUE;
        ofun[MAT_METAL].flags |= T_OPAQUE;
        ofun[MAT_TRANS].flags |= T_TRANSP;
        ofun[MAT_PLASTIC2].funp =
        ofun[MAT_METAL2].funp =
        ofun[MAT_TRANS2].funp = m_aniso;
        ofun[MAT_PLASTIC2].flags |= T_OPAQUE;
        ofun[MAT_METAL2].flags |= T_OPAQUE;
        ofun[MAT_TRANS2].flags |= T_TRANSP;
        ofun[MAT_ASHIKHMIN].funp = m_ashikhmin;
        ofun[MAT_ASHIKHMIN].flags |= T_OPAQUE;
        ofun[MAT_DIELECTRIC].funp =
        ofun[MAT_INTERFACE].funp = m_dielectric;
        ofun[MAT_DIELECTRIC].flags |= T_TRANSP;
        ofun[MAT_INTERFACE].flags |= T_TRANSP;
        ofun[MAT_MIST].funp = m_mist;
        ofun[MAT_MIST].flags |= T_TRANSP;
        ofun[MAT_GLASS].funp = m_glass;
        ofun[MAT_GLASS].flags |= T_TRANSP;
        ofun[MAT_MIRROR].funp = m_mirror;
        ofun[MAT_DIRECT1].funp =
        ofun[MAT_DIRECT2].funp = m_direct;
        ofun[MAT_CLIP].funp = m_clip;
        ofun[MAT_BRTDF].funp = m_brdf;
        ofun[MAT_BSDF].funp = 
        ofun[MAT_ABSDF].funp = m_bsdf;
        ofun[MAT_ABSDF].flags |= T_TRANSP;
        ofun[MAT_PFUNC].funp =
        ofun[MAT_MFUNC].funp =
        ofun[MAT_PDATA].funp =
        ofun[MAT_MDATA].funp = 
        ofun[MAT_TFUNC].funp =
        ofun[MAT_TDATA].funp = m_brdf2;
        ofun[MAT_PFUNC].flags |= T_OPAQUE;
        ofun[MAT_MFUNC].flags |= T_OPAQUE;
        ofun[MAT_TFUNC].flags |= T_OPAQUE;
        ofun[MAT_PDATA].flags |= T_OPAQUE;
        ofun[MAT_MDATA].flags |= T_OPAQUE;
        ofun[MAT_TDATA].flags |= T_OPAQUE;
        ofun[TEX_FUNC].funp = t_func;
        ofun[TEX_DATA].funp = t_data;
        ofun[PAT_CFUNC].funp = p_cfunc;
        ofun[PAT_BFUNC].funp = p_bfunc;
        ofun[PAT_CPICT].funp = p_pdata;
        ofun[PAT_CDATA].funp = p_cdata;
        ofun[PAT_BDATA].funp = p_bdata;
        ofun[PAT_CTEXT].funp =
        ofun[PAT_BTEXT].funp =
        ofun[MIX_TEXT].funp = do_text;
        ofun[MIX_FUNC].funp = mx_func;
        ofun[MIX_DATA].funp = mx_data;
        ofun[MIX_PICT].funp = mx_pdata;
}


int
o_default(OBJREC *o, RAY *r)            /* default action is error */
{
        objerror(o, CONSISTENCY, "unexpected object call");
                                        /* unused call to load freeobjmem.o */
        free_objs(0, 0);
        return(0);
}


OBJREC *        
findmaterial(OBJREC *o)                 /* find an object's actual material */
{
        OBJECT  obj = OVOID;

        while (!ismaterial(o->otype)) {
                if (o->otype == MOD_ALIAS && o->oargs.nsargs) {
                        OBJREC  *ao = o;
                        if (obj == OVOID)
                                obj = objndx(o);
                        do {
                                if (!ao->oargs.nsargs)
                                        obj = ao->omod;
                                else
                                        obj = lastmod(obj, ao->oargs.sarg[0]);
                                if (obj == OVOID)
                                        objerror(ao, USER, "bad reference");
                                ao = objptr(obj);
                        } while (ao->otype == MOD_ALIAS);
                                        /* check if aliased to material */
                        if (ismaterial(ao->otype))
                                return(ao);
                }
                if (o->omod == OVOID) {
                                        /* void mixture de facto material? */
                        if (ismixture(o->otype))
                                break;
                        return(NULL);   /* else no material found */
                }
                obj = o->omod;
                o = objptr(obj);
        }
        return(o);
}
Revision:	2.30
Committed:	Mon Feb 1 16:19:49 2021 UTC (3 years, 3 months ago) by greg
Content type:	text/plain
Branch:	MAIN
CVS Tags:	rad5R4
Changes since 2.29:	+2 -2 lines
Log Message:	perf: made use of OVOID and findmaterial() more consistent and efficient
#	User	Rev	Content
1	greg	1.1	#ifndef lint
2	greg	2.30	static const char RCSid[] = "$Id: initotypes.c,v 2.29 2021/01/31 20:06:15 greg Exp $";
3	greg	1.1	#endif
4			/*
5			* Initialize ofun[] list for renderers
6			*/
7
8	greg	2.9	#include "copyright.h"
9	greg	2.7
10	greg	2.15	#include "ray.h"
11	greg	1.1	#include "otypes.h"
12	schorsch	2.12	#include "rtotypes.h"
13	greg	1.2	#include "otspecial.h"
14
15	greg	1.1
16			FUN ofun[NUMOTYPE] = INIT_OTYPE;
17
18
19	greg	2.19	void
20	schorsch	2.12	initotypes(void) /* initialize ofun array */
21	greg	1.1	{
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	greg	2.9	ofun[OBJ_MESH].funp = o_mesh;
32	greg	2.10	ofun[MOD_ALIAS].funp = m_alias;
33	greg	1.1	ofun[MAT_LIGHT].funp =
34			ofun[MAT_ILLUM].funp =
35			ofun[MAT_GLOW].funp =
36			ofun[MAT_SPOT].funp = m_light;
37	greg	2.11	ofun[MAT_LIGHT].flags \|= T_OPAQUE;
38			ofun[MAT_SPOT].flags \|= T_OPAQUE;
39	greg	1.1	ofun[MAT_PLASTIC].funp =
40			ofun[MAT_METAL].funp =
41			ofun[MAT_TRANS].funp = m_normal;
42	greg	2.11	ofun[MAT_PLASTIC].flags \|= T_OPAQUE;
43			ofun[MAT_METAL].flags \|= T_OPAQUE;
44	greg	2.20	ofun[MAT_TRANS].flags \|= T_TRANSP;
45	greg	2.2	ofun[MAT_PLASTIC2].funp =
46			ofun[MAT_METAL2].funp =
47			ofun[MAT_TRANS2].funp = m_aniso;
48	greg	2.11	ofun[MAT_PLASTIC2].flags \|= T_OPAQUE;
49			ofun[MAT_METAL2].flags \|= T_OPAQUE;
50	greg	2.20	ofun[MAT_TRANS2].flags \|= T_TRANSP;
51	greg	2.18	ofun[MAT_ASHIKHMIN].funp = m_ashikhmin;
52			ofun[MAT_ASHIKHMIN].flags \|= T_OPAQUE;
53	greg	1.1	ofun[MAT_DIELECTRIC].funp =
54			ofun[MAT_INTERFACE].funp = m_dielectric;
55	greg	2.20	ofun[MAT_DIELECTRIC].flags \|= T_TRANSP;
56			ofun[MAT_INTERFACE].flags \|= T_TRANSP;
57	greg	2.4	ofun[MAT_MIST].funp = m_mist;
58	greg	2.20	ofun[MAT_MIST].flags \|= T_TRANSP;
59	greg	1.1	ofun[MAT_GLASS].funp = m_glass;
60	greg	2.20	ofun[MAT_GLASS].flags \|= T_TRANSP;
61	greg	1.5	ofun[MAT_MIRROR].funp = m_mirror;
62	greg	1.6	ofun[MAT_DIRECT1].funp =
63			ofun[MAT_DIRECT2].funp = m_direct;
64	greg	1.1	ofun[MAT_CLIP].funp = m_clip;
65	greg	2.3	ofun[MAT_BRTDF].funp = m_brdf;
66	greg	2.21	ofun[MAT_BSDF].funp =
67	greg	2.22	ofun[MAT_ABSDF].funp = m_bsdf;
68			ofun[MAT_ABSDF].flags \|= T_TRANSP;
69	greg	1.1	ofun[MAT_PFUNC].funp =
70			ofun[MAT_MFUNC].funp =
71			ofun[MAT_PDATA].funp =
72	greg	1.4	ofun[MAT_MDATA].funp =
73			ofun[MAT_TFUNC].funp =
74	greg	2.3	ofun[MAT_TDATA].funp = m_brdf2;
75	greg	2.11	ofun[MAT_PFUNC].flags \|= T_OPAQUE;
76			ofun[MAT_MFUNC].flags \|= T_OPAQUE;
77	greg	2.23	ofun[MAT_TFUNC].flags \|= T_OPAQUE;
78	greg	2.11	ofun[MAT_PDATA].flags \|= T_OPAQUE;
79			ofun[MAT_MDATA].flags \|= T_OPAQUE;
80	greg	2.23	ofun[MAT_TDATA].flags \|= T_OPAQUE;
81	greg	1.1	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	greg	2.5	ofun[MIX_TEXT].funp = do_text;
91	greg	1.1	ofun[MIX_FUNC].funp = mx_func;
92			ofun[MIX_DATA].funp = mx_data;
93	gwlarson	2.6	ofun[MIX_PICT].funp = mx_pdata;
94	greg	1.1	}
95
96
97	greg	2.19	int
98	greg	2.26	o_default(OBJREC o, RAY r) /* default action is error */
99	greg	1.1	{
100	greg	2.14	objerror(o, CONSISTENCY, "unexpected object call");
101	greg	2.26	/* unused call to load freeobjmem.o */
102	greg	2.7	free_objs(0, 0);
103	greg	2.16	return(0);
104	greg	1.1	}
105	greg	2.23
106
107	greg	2.26	OBJREC *
108			findmaterial(OBJREC o) / find an object's actual material */
109	greg	2.23	{
110	greg	2.29	OBJECT obj = OVOID;
111	greg	2.27
112	greg	2.23	while (!ismaterial(o->otype)) {
113			if (o->otype == MOD_ALIAS && o->oargs.nsargs) {
114	greg	2.29	OBJREC *ao = o;
115			if (obj == OVOID)
116			obj = objndx(o);
117			do {
118			if (!ao->oargs.nsargs)
119			obj = ao->omod;
120			else
121			obj = lastmod(obj, ao->oargs.sarg[0]);
122	greg	2.30	if (obj == OVOID)
123	greg	2.29	objerror(ao, USER, "bad reference");
124			ao = objptr(obj);
125			} while (ao->otype == MOD_ALIAS);
126			/* check if aliased to material */
127	greg	2.28	if (ismaterial(ao->otype))
128	greg	2.23	return(ao);
129			}
130	greg	2.25	if (o->omod == OVOID) {
131	greg	2.26	/* void mixture de facto material? */
132	greg	2.25	if (ismixture(o->otype))
133			break;
134	greg	2.26	return(NULL); /* else no material found */
135	greg	2.25	}
136	greg	2.29	obj = o->omod;
137			o = objptr(obj);
138	greg	2.23	}
139	greg	2.25	return(o);
140	greg	2.23	}