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.1 by greg, Tue Nov 12 17:09:08 1991 UTC vs.
Revision 2.2 by greg, Mon Nov 25 09:51:03 1991 UTC

# Line 14 | Line 14 | static char SCCSid[] = "$SunId$ LBL";
14  
15   #include  "otypes.h"
16  
17 + #include  "func.h"
18 +
19   /*
20   *      Arguments to this material include the color and specularity.
21   *  String arguments include the reflection function and files.
# Line 58 | Line 60 | static char SCCSid[] = "$SunId$ LBL";
60   *              CrP, CgP, CbP -         perturbed material color
61   */
62  
61 – extern double   funvalue(), varvalue();
62 – extern XF  funcxf;
63 –
63   typedef struct {
64          OBJREC  *mp;            /* material pointer */
65          RAY  *pr;               /* intersected ray */
# Line 153 | Line 152 | double  omega;                 /* light source size */
152                  dtmp = funvalue(sa[0], 1, &dtmp);
153                  setcolor(ctmp, dtmp, dtmp, dtmp);
154          }
155 <        if (errno)
156 <                goto computerr;
155 >        if (errno) {
156 >                objerror(np->mp, WARNING, "compute error");
157 >                return;
158 >        }
159          if (dtmp <= FTINY)
160                  return;
161          if (ldot > 0.0) {
# Line 176 | Line 177 | double  omega;                 /* light source size */
177                  scalecolor(ctmp, dtmp);
178                  addcolor(cval, ctmp);
179          }
179 –        return;
180 – computerr:
181 –        objerror(np->mp, WARNING, "compute error");
182 –        return;
180   }
181  
182  
# Line 192 | Line 189 | register RAY  *r;
189          double  transtest, transdist;
190          COLOR  ctmp;
191          double  dtmp, tspect, rspecr;
192 +        MFUNC  *mf;
193          register int  i;
194                                                  /* check arguments */
195          switch (m->otype) {
# Line 238 | Line 236 | register RAY  *r;
236          multcolor(nd.mcolor, r->pcol);          /* modify material color */
237          transtest = 0;
238                                                  /* load auxiliary files */
239 <        if (m->otype == MAT_PDATA || m->otype == MAT_MDATA
242 <                        || m->otype == MAT_TDATA) {
239 >        if (hasdata(m->otype)) {
240                  nd.dp = getdata(m->oargs.sarg[1]);
241 <                for (i = 3; i < m->oargs.nsargs; i++)
242 <                        if (m->oargs.sarg[i][0] == '-')
246 <                                break;
247 <                if (i-3 != nd.dp->nd)
248 <                        objerror(m, USER, "dimension error");
249 <                funcfile(m->oargs.sarg[2]);
241 >                i = (1 << nd.dp->nd) - 1;
242 >                mf = getfunc(m, 2, i<<3, 0);
243          } else if (m->otype == MAT_BRTDF) {
244                  nd.dp = NULL;
245 <                funcfile(m->oargs.sarg[9]);
245 >                mf = getfunc(m, 9, 0x3f, 0);
246          } else {
247                  nd.dp = NULL;
248 <                funcfile(m->oargs.sarg[1]);
248 >                mf = getfunc(m, 1, 0, 0);
249          }
250                                                  /* set special variables */
251          setbrdfunc(&nd);
# Line 261 | Line 254 | register RAY  *r;
254          if (m->otype == MAT_BRTDF && nd.tspec > FTINY) {
255                  RAY  sr;
256                  errno = 0;
257 <                setcolor(ctmp, varvalue(m->oargs.sarg[3]),
258 <                                varvalue(m->oargs.sarg[4]),
259 <                                varvalue(m->oargs.sarg[5]));
257 >                setcolor(ctmp, evalue(mf->ep[3]),
258 >                                evalue(mf->ep[4]),
259 >                                evalue(mf->ep[5]));
260                  scalecolor(ctmp, nd.trans);
261                  if (errno)
262                          objerror(m, WARNING, "compute error");
# Line 293 | Line 286 | register RAY  *r;
286          if (m->otype == MAT_BRTDF && nd.rspec > FTINY) {
287                  RAY  sr;
288                  errno = 0;
289 <                setcolor(ctmp, varvalue(m->oargs.sarg[0]),
290 <                                varvalue(m->oargs.sarg[1]),
291 <                                varvalue(m->oargs.sarg[2]));
289 >                setcolor(ctmp, evalue(mf->ep[0]),
290 >                                evalue(mf->ep[1]),
291 >                                evalue(mf->ep[2]));
292                  if (errno)
293                          objerror(m, WARNING, "compute error");
294                  else if ((rspecr = bright(ctmp)) > FTINY &&

Diff Legend

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