int o_mesh( /* determine if mesh intersects */ OBJREC *o, CUBE *cu ) { MESHINST *mip; /* get mesh bounds */ mip = getmeshinst(o, IO_BOUNDS); /* call o_cube to do the work */ return(o_cube(&mip->msh->mcube, &mip->x, cu)); }
void add2bbox( /* expand bounding box to fit object */ register OBJREC *o, FVECT bbmin, FVECT bbmax ) { CONE *co; FACE *fo; INSTANCE *io; MESHINST *mi; FVECT v; register int i, j; switch (o->otype) { case OBJ_SPHERE: case OBJ_BUBBLE: if (o->oargs.nfargs != 4) objerror(o, USER, "bad arguments"); for (i = 0; i < 3; i++) { VCOPY(v, o->oargs.farg); v[i] -= o->oargs.farg[3]; point2bbox(v, bbmin, bbmax); v[i] += 2.0 * o->oargs.farg[3]; point2bbox(v, bbmin, bbmax); } break; case OBJ_FACE: fo = getface(o); j = fo->nv; while (j--) point2bbox(VERTEX(fo,j), bbmin, bbmax); break; case OBJ_CONE: case OBJ_CUP: case OBJ_CYLINDER: case OBJ_TUBE: case OBJ_RING: co = getcone(o, 0); if (o->otype != OBJ_RING) circle2bbox(CO_P0(co), co->ad, CO_R0(co), bbmin, bbmax); circle2bbox(CO_P1(co), co->ad, CO_R1(co), bbmin, bbmax); break; case OBJ_INSTANCE: io = getinstance(o, IO_BOUNDS); for (j = 0; j < 8; j++) { for (i = 0; i < 3; i++) { v[i] = io->obj->scube.cuorg[i]; if (j & 1<<i) v[i] += io->obj->scube.cusize; } multp3(v, v, io->x.f.xfm); point2bbox(v, bbmin, bbmax); } break; case OBJ_MESH: mi = getmeshinst(o, IO_BOUNDS); for (j = 0; j < 8; j++) { for (i = 0; i < 3; i++) { v[i] = mi->msh->mcube.cuorg[i]; if (j & 1<<i) v[i] += mi->msh->mcube.cusize; } multp3(v, v, mi->x.f.xfm); point2bbox(v, bbmin, bbmax); } break; } }
extern int load_os( /* load associated data for object */ register OBJREC *op ) { DATARRAY *dp; switch (op->otype) { case OBJ_FACE: /* polygon */ getface(op); return(1); case OBJ_CONE: /* cone */ case OBJ_RING: /* disk */ case OBJ_CYLINDER: /* cylinder */ case OBJ_CUP: /* inverted cone */ case OBJ_TUBE: /* inverted cylinder */ getcone(op, 1); return(1); case OBJ_INSTANCE: /* octree instance */ getinstance(op, IO_ALL); return(1); case OBJ_MESH: /* mesh instance */ getmeshinst(op, IO_ALL); return(1); case PAT_CPICT: /* color picture */ if (op->oargs.nsargs < 4) goto sargerr; getpict(op->oargs.sarg[3]); getfunc(op, 4, 0x3<<5, 0); return(1); case PAT_CDATA: /* color data */ dp = getdata(op->oargs.sarg[3]); getdata(op->oargs.sarg[4]); getdata(op->oargs.sarg[5]); getfunc(op, 6, ((1<<dp->nd)-1)<<7, 0); return(1); case PAT_BDATA: /* brightness data */ if (op->oargs.nsargs < 2) goto sargerr; dp = getdata(op->oargs.sarg[1]); getfunc(op, 2, ((1<<dp->nd)-1)<<3, 0); return(1); case PAT_BFUNC: /* brightness function */ getfunc(op, 1, 0x1, 0); return(1); case PAT_CFUNC: /* color function */ getfunc(op, 3, 0x7, 0); return(1); case TEX_DATA: /* texture data */ if (op->oargs.nsargs < 6) goto sargerr; dp = getdata(op->oargs.sarg[3]); getdata(op->oargs.sarg[4]); getdata(op->oargs.sarg[5]); getfunc(op, 6, ((1<<dp->nd)-1)<<7, 1); return(1); case TEX_FUNC: /* texture function */ getfunc(op, 3, 0x7, 1); return(1); case MIX_DATA: /* mixture data */ dp = getdata(op->oargs.sarg[3]); getfunc(op, 4, ((1<<dp->nd)-1)<<5, 0); return(1); case MIX_PICT: /* mixture picture */ getpict(op->oargs.sarg[3]); getfunc(op, 4, 0x3<<5, 0); return(1); case MIX_FUNC: /* mixture function */ getfunc(op, 3, 0x4, 0); return(1); case MAT_PLASTIC2: /* anisotropic plastic */ case MAT_METAL2: /* anisotropic metal */ getfunc(op, 3, 0x7, 1); return(1); case MAT_BRTDF: /* BRDTfunc material */ getfunc(op, 9, 0x3f, 0); return(1); case MAT_BSDF: /* BSDF material */ if (op->oargs.nsargs < 6) goto sargerr; getfunc(op, 5, 0x1d, 1); loadBSDF(op->oargs.sarg[1]); return(1); case MAT_PDATA: /* plastic BRDF data */ case MAT_MDATA: /* metal BRDF data */ case MAT_TDATA: /* trans BRDF data */ if (op->oargs.nsargs < 2) goto sargerr; getdata(op->oargs.sarg[1]); getfunc(op, 2, 0, 0); return(1); case MAT_PFUNC: /* plastic BRDF func */ case MAT_MFUNC: /* metal BRDF func */ case MAT_TFUNC: /* trans BRDF func */ getfunc(op, 1, 0, 0); return(1); case MAT_DIRECT1: /* prism1 material */ getfunc(op, 4, 0xf, 1); return(1); case MAT_DIRECT2: /* prism2 material */ getfunc(op, 8, 0xff, 1); return(1); } /* nothing to load for the remaining types */ return(0); sargerr: objerror(op, USER, "too few string arguments"); return 0; /* pro forma return */ }