ViewVC Help
View File | Revision Log | Show Annotations | Download File | Root Listing
root/radiance/ray/src/rt/m_brdf.c
(Generate patch)

Comparing ray/src/rt/m_brdf.c (file contents):
Revision 2.21 by schorsch, Tue Mar 30 16:13:01 2004 UTC vs.
Revision 2.34 by greg, Wed Jan 10 04:08:50 2018 UTC

# Line 14 | Line 14 | static const char      RCSid[] = "$Id$";
14   #include  "otypes.h"
15   #include  "rtotypes.h"
16   #include  "func.h"
17 + #include  "pmapmat.h"
18  
19   /*
20   *      Arguments to this material include the color and specularity.
# Line 38 | Line 39 | static const char      RCSid[] = "$Id$";
39   *  Arguments for MAT_TFUNC are:
40   *      2+      func    funcfile        transform
41   *      0
42 < *      4+      red     grn     blu     rspec   trans   tspec   A7 ..
42 > *      6+      red     grn     blu     rspec   trans   tspec   A7 ..
43   *
44   *  Arguments for MAT_TDATA are:
45   *      4+      func    datafile        funcfile        v0 ..   transform
46   *      0
47 < *      4+      red     grn     blu     rspec   trans   tspec   A7 ..
47 > *      6+      red     grn     blu     rspec   trans   tspec   A7 ..
48   *
49   *  Arguments for the more general MAT_BRTDF are:
50   *      10+     rrefl   grefl   brefl
# Line 77 | Line 78 | typedef struct {
78   }  BRDFDAT;             /* BRDF material data */
79  
80  
81 < static srcdirf_t dirbrdf;
81 < static int setbrdfunc(BRDFDAT  *np);
81 > static int setbrdfunc(BRDFDAT *np);
82  
83  
84   static void
# Line 89 | Line 89 | dirbrdf(               /* compute source contribution */
89          double  omega                   /* light source size */
90   )
91   {
92 <        register BRDFDAT *np = nnp;
92 >        BRDFDAT *np = nnp;
93          double  ldot;
94          double  dtmp;
95          COLOR  ctmp;
96          FVECT  ldx;
97          static double  vldx[5], pt[MAXDIM];
98 <        register char   **sa;
99 <        register int    i;
98 >        char    **sa;
99 >        int     i;
100   #define lddx (vldx+1)
101  
102          setcolor(cval, 0.0, 0.0, 0.0);
# Line 128 | Line 128 | dirbrdf(               /* compute source contribution */
128                  scalecolor(ctmp, dtmp);
129                  addcolor(cval, ctmp);
130          }
131 <        if (ldot > 0.0 ? np->rspec <= FTINY : np->tspec <= FTINY)
132 <                return;         /* no specular component */
131 >        if ((ldot > 0.0 ? np->rspec <= FTINY : np->tspec <= FTINY) ||
132 >                        ambRayInPmap(np->pr))
133 >                return;         /* diffuse only */
134                                          /* set up function */
135          setbrdfunc(np);
136          sa = np->mp->oargs.sarg;
# Line 141 | Line 142 | dirbrdf(               /* compute source contribution */
142          lddx[3] = omega;
143                                          /* compute BRTDF */
144          if (np->mp->otype == MAT_BRTDF) {
145 <                if (sa[6][0] == '0')            /* special case */
145 >                if (sa[6][0] == '0' && !sa[6][1])       /* special case */
146                          colval(ctmp,RED) = 0.0;
147                  else
148                          colval(ctmp,RED) = funvalue(sa[6], 4, lddx);
149 <                if (!strcmp(sa[7],sa[6]))
149 >                if (sa[7][0] == '0' && !sa[7][1])
150 >                        colval(ctmp,GRN) = 0.0;
151 >                else if (!strcmp(sa[7],sa[6]))
152                          colval(ctmp,GRN) = colval(ctmp,RED);
153                  else
154                          colval(ctmp,GRN) = funvalue(sa[7], 4, lddx);
155 <                if (!strcmp(sa[8],sa[6]))
155 >                if (sa[8][0] == '0' && !sa[8][1])
156 >                        colval(ctmp,BLU) = 0.0;
157 >                else if (!strcmp(sa[8],sa[6]))
158                          colval(ctmp,BLU) = colval(ctmp,RED);
159                  else if (!strcmp(sa[8],sa[7]))
160                          colval(ctmp,BLU) = colval(ctmp,GRN);
# Line 166 | Line 171 | dirbrdf(               /* compute source contribution */
171                  dtmp = funvalue(sa[0], 5, vldx);
172                  setcolor(ctmp, dtmp, dtmp, dtmp);
173          }
174 <        if (errno == EDOM || errno == ERANGE) {
174 >        if ((errno == EDOM) | (errno == ERANGE)) {
175                  objerror(np->mp, WARNING, "compute error");
176                  return;
177          }
# Line 195 | Line 200 | dirbrdf(               /* compute source contribution */
200   }
201  
202  
203 < extern int
203 > int
204   m_brdf(                 /* color a ray that hit a BRDTfunc material */
205 <        register OBJREC  *m,
206 <        register RAY  *r
205 >        OBJREC  *m,
206 >        RAY  *r
207   )
208   {
209          int  hitfront = 1;
210          BRDFDAT  nd;
211          RAY  sr;
212 +        double  mirtest=0, mirdist=0;
213          double  transtest, transdist;
214          int  hasrefl, hastrans;
215 +        int  hastexture;
216          COLOR  ctmp;
217          FVECT  vtmp;
218 <        register MFUNC  *mf;
219 <        register int  i;
218 >        double  d;
219 >        MFUNC  *mf;
220 >        int  i;
221                                                  /* check arguments */
222          if ((m->oargs.nsargs < 10) | (m->oargs.nfargs < 9))
223                  objerror(m, USER, "bad # arguments");
# Line 233 | Line 241 | m_brdf(                        /* color a ray that hit a BRDTfunc material
241                          m->oargs.farg[8]);
242                                                  /* get modifiers */
243          raytexture(r, m->omod);
244 <        nd.pdot = raynormal(nd.pnorm, r);       /* perturb normal */
244 >        hastexture = (DOT(r->pert,r->pert) > FTINY*FTINY);
245 >        if (hastexture) {                       /* perturb normal */
246 >                nd.pdot = raynormal(nd.pnorm, r);
247 >        } else {
248 >                VCOPY(nd.pnorm, r->ron);
249 >                nd.pdot = r->rod;
250 >        }
251          if (r->rod < 0.0) {                     /* orient perturbed values */
252                  nd.pdot = -nd.pdot;
253                  for (i = 0; i < 3; i++) {
# Line 245 | Line 259 | m_brdf(                        /* color a ray that hit a BRDTfunc material
259          copycolor(nd.mcolor, r->pcol);          /* get pattern color */
260          multcolor(nd.rdiff, nd.mcolor);         /* modify diffuse values */
261          multcolor(nd.tdiff, nd.mcolor);
262 <        hasrefl = bright(nd.rdiff) > FTINY;
263 <        hastrans = bright(nd.tdiff) > FTINY;
262 >        hasrefl = (bright(nd.rdiff) > FTINY);
263 >        hastrans = (bright(nd.tdiff) > FTINY);
264 >        mirdist = transdist = r->rot;
265                                                  /* load cal file */
266          nd.dp = NULL;
267          mf = getfunc(m, 9, 0x3f, 0);
268                                                  /* compute transmitted ray */
269          setbrdfunc(&nd);
255 –        transtest = 0;
256 –        transdist = r->rot;
270          errno = 0;
271          setcolor(ctmp, evalue(mf->ep[3]),
272                          evalue(mf->ep[4]),
273                          evalue(mf->ep[5]));
274 <        if (errno == EDOM || errno == ERANGE)
274 >        if ((errno == EDOM) | (errno == ERANGE))
275                  objerror(m, WARNING, "compute error");
276 <        else if (rayorigin(&sr, r, TRANS, bright(ctmp)) == 0) {
277 <                if (!(r->crtype & SHADOW) &&
278 <                                DOT(r->pert,r->pert) > FTINY*FTINY) {
279 <                        for (i = 0; i < 3; i++) /* perturb direction */
267 <                                sr.rdir[i] = r->rdir[i] - .75*r->pert[i];
276 >        else if (rayorigin(&sr, TRANS, r, ctmp) == 0) {
277 >                if (hastexture && !(r->crtype & (SHADOW|AMBIENT))) {
278 >                                                /* perturb direction */
279 >                        VSUB(sr.rdir, r->rdir, r->pert);
280                          if (normalize(sr.rdir) == 0.0) {
281                                  objerror(m, WARNING, "illegal perturbation");
282                                  VCOPY(sr.rdir, r->rdir);
283                          }
284                  } else {
285                          VCOPY(sr.rdir, r->rdir);
274 –                        transtest = 2;
286                  }
287                  rayvalue(&sr);
288 <                multcolor(sr.rcol, ctmp);
288 >                multcolor(sr.rcol, sr.rcoef);
289                  addcolor(r->rcol, sr.rcol);
290 <                transtest *= bright(sr.rcol);
291 <                transdist = r->rot + sr.rt;
290 >                if (!hastexture || r->crtype & (SHADOW|AMBIENT)) {
291 >                        transtest = 2.0*bright(sr.rcol);
292 >                        transdist = r->rot + sr.rt;
293 >                }
294          }
295 <        if (r->crtype & SHADOW)                 /* the rest is shadow */
295 >        if (r->crtype & SHADOW) {               /* the rest is shadow */
296 >                r->rt = transdist;
297                  return(1);
298 +        }
299                                                  /* compute reflected ray */
300          setbrdfunc(&nd);
301          errno = 0;
302          setcolor(ctmp, evalue(mf->ep[0]),
303                          evalue(mf->ep[1]),
304                          evalue(mf->ep[2]));
305 <        if (errno == EDOM || errno == ERANGE)
305 >        if ((errno == EDOM) | (errno == ERANGE))
306                  objerror(m, WARNING, "compute error");
307 <        else if (rayorigin(&sr, r, REFLECTED, bright(ctmp)) == 0) {
308 <                for (i = 0; i < 3; i++)
309 <                        sr.rdir[i] = r->rdir[i] + 2.0*nd.pdot*nd.pnorm[i];
307 >        else if (rayorigin(&sr, REFLECTED, r, ctmp) == 0) {
308 >                VSUM(sr.rdir, r->rdir, nd.pnorm, 2.*nd.pdot);
309 >                checknorm(sr.rdir);
310                  rayvalue(&sr);
311 <                multcolor(sr.rcol, ctmp);
311 >                multcolor(sr.rcol, sr.rcoef);
312                  addcolor(r->rcol, sr.rcol);
313 +                if (!hastexture && r->ro != NULL && isflat(r->ro->otype)) {
314 +                        mirtest = 2.0*bright(sr.rcol);
315 +                        mirdist = r->rot + sr.rt;
316 +                }
317          }
318                                                  /* compute ambient */
319          if (hasrefl) {
320                  if (!hitfront)
321                          flipsurface(r);
322 <                ambient(ctmp, r, nd.pnorm);
323 <                multcolor(ctmp, nd.rdiff);
322 >                copycolor(ctmp, nd.rdiff);
323 >                multambient(ctmp, r, nd.pnorm);
324                  addcolor(r->rcol, ctmp);        /* add to returned color */
325                  if (!hitfront)
326                          flipsurface(r);
# Line 312 | Line 331 | m_brdf(                        /* color a ray that hit a BRDTfunc material
331                  vtmp[0] = -nd.pnorm[0];
332                  vtmp[1] = -nd.pnorm[1];
333                  vtmp[2] = -nd.pnorm[2];
334 <                ambient(ctmp, r, vtmp);
335 <                multcolor(ctmp, nd.tdiff);
334 >                copycolor(ctmp, nd.tdiff);
335 >                multambient(ctmp, r, vtmp);
336                  addcolor(r->rcol, ctmp);
337                  if (hitfront)
338                          flipsurface(r);
339          }
340          if (hasrefl | hastrans || m->oargs.sarg[6][0] != '0')
341                  direct(r, dirbrdf, &nd);        /* add direct component */
342 <                                                /* check distance */
343 <        if (transtest > bright(r->rcol))
342 >
343 >        d = bright(r->rcol);                    /* set effective distance */
344 >        if (transtest > d)
345                  r->rt = transdist;
346 +        else if (mirtest > d)
347 +                r->rt = mirdist;
348  
349          return(1);
350   }
351  
352  
353  
354 < extern int
354 > int
355   m_brdf2(                        /* color a ray that hit a BRDF material */
356 <        register OBJREC  *m,
357 <        register RAY  *r
356 >        OBJREC  *m,
357 >        RAY  *r
358   )
359   {
360          BRDFDAT  nd;
# Line 348 | Line 370 | m_brdf2(                       /* color a ray that hit a BRDF material */
370                  objerror(m, USER, "bad # arguments");
371                                                  /* check for back side */
372          if (r->rod < 0.0) {
373 <                if (!backvis && m->otype != MAT_TFUNC
352 <                                && m->otype != MAT_TDATA) {
373 >                if (!backvis) {
374                          raytrans(r);
375                          return(1);
376                  }
# Line 393 | Line 414 | m_brdf2(                       /* color a ray that hit a BRDF material */
414          }
415                                                  /* compute ambient */
416          if (nd.trans < 1.0-FTINY) {
417 <                ambient(ctmp, r, nd.pnorm);
417 >                copycolor(ctmp, nd.mcolor);     /* modified by material color */
418                  scalecolor(ctmp, 1.0-nd.trans);
419 <                multcolor(ctmp, nd.mcolor);     /* modified by material color */
419 >                multambient(ctmp, r, nd.pnorm);
420                  addcolor(r->rcol, ctmp);        /* add to returned color */
421          }
422          if (nd.trans > FTINY) {         /* from other side */
# Line 403 | Line 424 | m_brdf2(                       /* color a ray that hit a BRDF material */
424                  vtmp[0] = -nd.pnorm[0];
425                  vtmp[1] = -nd.pnorm[1];
426                  vtmp[2] = -nd.pnorm[2];
427 <                ambient(ctmp, r, vtmp);
427 >                copycolor(ctmp, nd.mcolor);
428                  scalecolor(ctmp, nd.trans);
429 <                multcolor(ctmp, nd.mcolor);
429 >                multambient(ctmp, r, vtmp);
430                  addcolor(r->rcol, ctmp);
431                  flipsurface(r);
432          }
# Line 418 | Line 439 | m_brdf2(                       /* color a ray that hit a BRDF material */
439  
440   static int
441   setbrdfunc(                     /* set up brdf function and variables */
442 <        register BRDFDAT  *np
442 >        BRDFDAT  *np
443   )
444   {
445          FVECT  vec;

Diff Legend

– Removed lines
+ Added lines
< Changed lines
> Changed lines