src/rt/initotypes.c

#ifndef lint
static const char RCSid[] = "$Id: initotypes.c,v 2.24 2018/11/10 15:37:20 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 *                        /* find an object's actual material */
findmaterial(OBJREC *o)
{
        while (!ismaterial(o->otype)) {
                if (o->otype == MOD_ALIAS && o->oargs.nsargs) {
                        OBJECT  aobj;
                        OBJREC  *ao;
                        aobj = lastmod(objndx(o), o->oargs.sarg[0]);
                        if (aobj < 0)
                                objerror(o, USER, "bad reference");
                                /* recursive check on alias branch */
                        if ((ao = findmaterial(objptr(aobj))) != NULL)
                                return(ao);
                }
                if (o->omod == OVOID) {
                                /* assume unmodified mixture is material */
                        if (ismixture(o->otype))
                                break;
                        return(NULL);
                }
                o = objptr(o->omod);
        }
        return(o);
}
Revision:	2.25
Committed:	Sat Nov 10 16:12:26 2018 UTC (5 years, 6 months ago) by greg
Content type:	text/plain
Branch:	MAIN
Changes since 2.24:	+7 -4 lines
Log Message:	Clean-up that should not affect behavior
#	User	Rev	Content
1	greg	1.1	#ifndef lint
2	greg	2.25	static const char RCSid[] = "$Id: initotypes.c,v 2.24 2018/11/10 15:37:20 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	schorsch	2.12	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.16	/* 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
108			OBJREC * /* find an object's actual material */
109			findmaterial(OBJREC *o)
110			{
111			while (!ismaterial(o->otype)) {
112			if (o->otype == MOD_ALIAS && o->oargs.nsargs) {
113			OBJECT aobj;
114			OBJREC *ao;
115			aobj = lastmod(objndx(o), o->oargs.sarg[0]);
116			if (aobj < 0)
117			objerror(o, USER, "bad reference");
118			/* recursive check on alias branch */
119			if ((ao = findmaterial(objptr(aobj))) != NULL)
120			return(ao);
121			}
122	greg	2.25	if (o->omod == OVOID) {
123	greg	2.24	/* assume unmodified mixture is material */
124	greg	2.25	if (ismixture(o->otype))
125			break;
126			return(NULL);
127			}
128	greg	2.23	o = objptr(o->omod);
129			}
130	greg	2.25	return(o);
131	greg	2.23	}