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

Comparing ray/src/rt/pmapmat.c (file contents):
Revision 2.3 by rschregle, Fri May 8 13:20:23 2015 UTC vs.
Revision 2.18 by greg, Tue Jun 26 14:42:18 2018 UTC

# Line 1 | Line 1
1 + #ifndef lint
2 + static const char RCSid[] = "$Id$";
3 + #endif
4   /*
5     ==================================================================
6     Photon map support routines for scattering by materials.
# Line 8 | Line 11
11     supported by the Swiss National Science Foundation (SNSF, #147053)
12     ==================================================================
13    
11   $Id$
14   */
15  
16  
# Line 104 | Line 106 | void photonRay (const RAY *rayIn, RAY *rayOut,
106   {
107     rayorigin(rayOut, rayOutType, rayIn, NULL);
108    
109 <   /* Transfer flux */
110 <   copycolor(rayOut -> rcol, rayIn -> rcol);
111 <  
112 <   /* Copy caustic flag & direction for transferred rays */
113 <   if (rayOutType == PMAP_XFER) {
114 <      /* rayOut -> rtype |= rayIn -> rtype & SPECULAR; */
115 <      rayOut -> rtype |= rayIn -> rtype;
116 <      VCOPY(rayOut -> rdir, rayIn -> rdir);
117 <   }
118 <   else if (fluxAtten) {
119 <      /* Attenuate and normalise flux for scattered rays */
120 <      multcolor(rayOut -> rcol, fluxAtten);
121 <      colorNorm(rayOut -> rcol);
122 <   }
109 >   if (rayIn) {
110 >      /* Transfer flux */
111 >      copycolor(rayOut -> rcol, rayIn -> rcol);
112 >      
113 >      /* Copy caustic flag & direction for transferred rays */
114 >      if (rayOutType == PMAP_XFER) {
115 >         /* rayOut -> rtype |= rayIn -> rtype & SPECULAR; */
116 >         rayOut -> rtype |= rayIn -> rtype;
117 >         VCOPY(rayOut -> rdir, rayIn -> rdir);
118 >      }
119 >      else if (fluxAtten) {
120 >         /* Attenuate and normalise flux for scattered rays */
121 >         multcolor(rayOut -> rcol, fluxAtten);
122 >         colorNorm(rayOut -> rcol);
123 >      }
124  
125 <   /* Propagate index of emitting light source */
126 <   rayOut -> rsrc = rayIn -> rsrc;
125 >      /* Propagate index of emitting light source */
126 >      rayOut -> rsrc = rayIn -> rsrc;
127 >      
128 >      /* Update maximum photon path distance */
129 >      rayOut -> rmax = rayIn -> rmax - rayIn -> rot;
130 >   }
131   }
132  
133  
# Line 130 | Line 137 | static void addPhotons (const RAY *r)
137   {
138     if (!r -> rlvl)
139        /* Add direct photon map at primary hitpoint */
140 <      addPhoton(directPmap, r);
140 >      newPhoton(directPmap, r);
141     else {
142        /* Add global or precomputed photon map at indirect hitpoint */
143 <      addPhoton(preCompPmap ? preCompPmap : globalPmap, r);
143 >      newPhoton(preCompPmap ? preCompPmap : globalPmap, r);
144  
145        /* Store caustic photon if specular flag set */
146        if (PMAP_CAUSTICRAY(r))
147 <         addPhoton(causticPmap, r);
147 >         newPhoton(causticPmap, r);
148          
149        /* Store in contribution photon map */
150 <      addPhoton(contribPmap, r);
150 >      newPhoton(contribPmap, r);
151     }
152   }
153  
# Line 199 | Line 206 | static int isoSpecPhotonScatter (NORMDAT *nd, RAY *ray
206     int      niter, i = 0;
207    
208     /* Set up sample coordinates */  
209 <   do {
203 <      v [0] = v [1] = v [2] = 0;
204 <      v [i++] = 1;
205 <      fcross(u, v, nd -> pnorm);
206 <   } while (normalize(u) < FTINY);
207 <  
209 >   getperpendicular(u, nd -> pnorm, 1);  
210     fcross(v, nd -> pnorm, u);
211    
212     if (nd -> specfl & SP_REFL) {
# Line 268 | Line 270 | static void diffPhotonScatter (FVECT normal, RAY* rayO
270     int         i = 0;
271  
272     /* Set up sample coordinates */
273 <   do {
272 <      v [0] = v [1] = v [2] = 0;
273 <      v [i++] = 1;
274 <      fcross(u, v, normal);
275 <   } while (normalize(u) < FTINY);
276 <  
273 >   getperpendicular(u, normal, 1);
274     fcross(v, normal, u);
275    
276     /* Convert theta & phi to cartesian */
# Line 324 | Line 321 | static int normalPhotonScatter (OBJREC *mat, RAY *rayI
321        nd.specfl |= SP_FLAT;  
322        
323     /* Perturb normal */
324 <   if ((hastexture = DOT(rayIn -> pert, rayIn -> pert)) > sqr(FTINY))
324 >   if ((hastexture = (DOT(rayIn -> pert, rayIn -> pert) > sqr(FTINY)) ))
325        nd.pdot = raynormal(nd.pnorm, rayIn);
326     else {
327        VCOPY(nd.pnorm, rayIn -> ron);
# Line 753 | Line 750 | static int dielectricPhotonScatter (OBJREC *mat, RAY *
750     /* get modifiers */
751     raytexture(rayIn, mat -> omod);                      
752    
753 <   if ((hastexture = DOT(rayIn -> pert, rayIn -> pert)) > FTINY * FTINY)
753 >   if ((hastexture = (DOT(rayIn -> pert, rayIn -> pert) > FTINY * FTINY)))
754        /* Perturb normal */
755        cos1 = raynormal(dnorm, rayIn);
756     else {
# Line 900 | Line 897 | static int glassPhotonScatter (OBJREC *mat, RAY *rayIn
897     /* reorient if necessary */
898     if (rayIn -> rod < 0)
899        flipsurface(rayIn);
900 <   if ((hastexture = DOT(rayIn -> pert, rayIn -> pert)) > FTINY * FTINY)
900 >   if ((hastexture = (DOT(rayIn -> pert, rayIn -> pert) > FTINY * FTINY) ))
901        pdot = raynormal(pnorm, rayIn);
902     else {
903        VCOPY(pnorm, rayIn -> ron);
# Line 986 | Line 983 | static int aliasPhotonScatter (OBJREC *mat, RAY *rayIn
983    
984     /* Straight replacement? */
985     if (!mat -> oargs.nsargs) {
986 <      mat = objptr(mat -> omod);
987 <      photonScatter [mat -> otype] (mat, rayIn);
986 >      /* Skip void modifier! */
987 >      if (mat -> omod != OVOID) {  
988 >         mat = objptr(mat -> omod);
989 >         photonScatter [mat -> otype] (mat, rayIn);
990 >      }
991        
992        return 0;
993     }
# Line 1258 | Line 1258 | static int mx_dataPhotonScatter (OBJREC *mat, RAY *ray
1258     if (errno)
1259        objerror(mat, WARNING, "compute error");
1260     else {
1261 <      mat = objptr(mod [pmapRandom(rouletteState) < coef ? 0 : 1]);
1262 <      photonScatter [mat -> otype] (mat, rayIn);
1261 >      OBJECT mxMod = mod [pmapRandom(rouletteState) < coef ? 0 : 1];
1262 >      
1263 >      if (mxMod != OVOID) {
1264 >         mat = objptr(mxMod);
1265 >         photonScatter [mat -> otype] (mat, rayIn);
1266 >      }
1267 >      else {
1268 >         /* Transfer ray if no modifier */
1269 >         RAY rayOut;
1270 >        
1271 >         photonRay(rayIn, &rayOut, PMAP_XFER, NULL);
1272 >         tracePhoton(&rayOut);      
1273 >      }            
1274     }
1275    
1276     return 0;
# Line 1311 | Line 1322 | static int mx_pdataPhotonScatter (OBJREC *mat, RAY *ra
1322     if (errno)
1323        objerror(mat, WARNING, "compute error");
1324     else {
1325 <      mat = objptr(mod [pmapRandom(rouletteState) < coef ? 0 : 1]);
1326 <      photonScatter [mat -> otype] (mat, rayIn);
1325 >      OBJECT mxMod = mod [pmapRandom(rouletteState) < coef ? 0 : 1];
1326 >      
1327 >      if (mxMod != OVOID) {
1328 >         mat = objptr(mxMod);
1329 >         photonScatter [mat -> otype] (mat, rayIn);
1330 >      }
1331 >      else {
1332 >         /* Transfer ray if no modifier */
1333 >         RAY rayOut;
1334 >        
1335 >         photonRay(rayIn, &rayOut, PMAP_XFER, NULL);
1336 >         tracePhoton(&rayOut);      
1337 >      }      
1338     }  
1339    
1340     return 0;
# Line 1351 | Line 1373 | static int mx_funcPhotonScatter (OBJREC *mat, RAY *ray
1373     if (errno)
1374        objerror(mat, WARNING, "compute error");
1375     else {        
1376 <      mat = objptr(mod [pmapRandom(rouletteState) < coef ? 0 : 1]);
1377 <      photonScatter [mat -> otype] (mat, rayIn);
1376 >      OBJECT mxMod = mod [pmapRandom(rouletteState) < coef ? 0 : 1];
1377 >      
1378 >      if (mxMod != OVOID) {
1379 >         mat = objptr(mxMod);
1380 >         photonScatter [mat -> otype] (mat, rayIn);
1381 >      }
1382 >      else {
1383 >         /* Transfer ray if no modifier */
1384 >         RAY rayOut;
1385 >        
1386 >         photonRay(rayIn, &rayOut, PMAP_XFER, NULL);
1387 >         tracePhoton(&rayOut);      
1388 >      }
1389     }
1390    
1391     return 0;
# Line 1384 | Line 1417 | static int pattexPhotonScatter (OBJREC *mat, RAY *rayI
1417  
1418  
1419  
1387 #if 0
1388   static int bsdfPhotonScatter (OBJREC *mat, RAY *rayIn)
1389   /* Generate new photon ray for BSDF modifier and recurse. */
1390   {
1391      int      hitFront;
1392      SDError  err;
1393      FVECT        upvec;
1394      MFUNC        *mf;
1395      BSDFDAT   nd;
1396      RAY      rayOut;
1397
1398      /* Following code adapted from m_bsdf() */
1399      /* Check arguments */
1400      if (mat -> oargs.nsargs < 6 || mat -> oargs.nfargs > 9 ||
1401          mat -> oargs.nfargs % 3)
1402         objerror(mat, USER, "bad # arguments");
1403        
1404      hitFront = (rayIn -> rod > 0);
1405
1406      /* Load cal file */
1407      mf = getfunc(mat, 5, 0x1d, 1);
1408      
1409      /* Get thickness */
1410      nd.thick = evalue(mf -> ep [0]);
1411      if ((-FTINY <= nd.thick) & (nd.thick <= FTINY))
1412         nd.thick = .0;
1413        
1414      if (nd.thick != .0 || (!hitFront && !backvis)) {
1415         /* Proxy geometry present, so use it instead and transfer ray */
1416         photonRay(rayIn, &rayOut, PMAP_XFER, NULL);
1417         tracePhoton(&rayOut);
1418        
1419         return 0;
1420      }
1421
1422      /* Get BSDF data */
1423      nd.sd = loadBSDF(mat -> oargs.sarg [1]);
1424      
1425      /* Diffuse reflectance */
1426      if (hitFront) {
1427         if (mat -> oargs.nfargs < 3)
1428            setcolor(nd.rdiff, .0, .0, .0);
1429         else setcolor(nd.rdiff, mat -> oargs.farg [0], mat -> oargs.farg [1],
1430                       mat -> oargs.farg [2]);
1431      }    
1432      else if (mat -> oargs.nfargs < 6) {
1433         /* Check for absorbing backside */
1434         if (!backvis && !nd.sd -> rb && !nd.sd -> tf) {
1435            SDfreeCache(nd.sd);                    
1436            return 0;
1437         }
1438        
1439         setcolor(nd.rdiff, .0, .0, .0);
1440      }
1441      else setcolor(nd.rdiff, mat -> oargs.farg [3], mat -> oargs.farg [4],
1442                    mat -> oargs.farg [5]);
1443
1444      /* Diffuse transmittance */
1445      if (mat -> oargs.nfargs < 9)
1446         setcolor(nd.tdiff, .0, .0, .0);
1447      else setcolor(nd.tdiff, mat -> oargs.farg [6], mat -> oargs.farg [7],
1448                    mat -> oargs.farg [8]);
1449                  
1450      nd.mp = mat;
1451      nd.pr = rayIn;
1452      
1453      /* Get modifiers */
1454      raytexture(rayIn, mat -> omod);
1455      
1456      /* Modify diffuse values */
1457      multcolor(nd.rdiff, rayIn -> pcol);
1458      multcolor(nd.tdiff, rayIn -> pcol);
1459        
1460      /* Get up vector & xform to world coords */
1461      upvec [0] = evalue(mf -> ep [1]);
1462      upvec [1] = evalue(mf -> ep [2]);
1463      upvec [2] = evalue(mf -> ep [3]);
1464      
1465      if (mf -> fxp != &unitxf) {
1466         multv3(upvec, upvec, mf -> fxp -> xfm);
1467         nd.thick *= mf -> fxp -> sca;
1468      }
1469      
1470      if (rayIn -> rox) {
1471         multv3(upvec, upvec, rayIn -> rox -> f.xfm);
1472         nd.thick *= rayIn -> rox -> f.sca;
1473      }
1474      
1475      /* Perturb normal */
1476      raynormal(nd.pnorm, rayIn);
1477      
1478      /* Xform incident dir to local BSDF coords */
1479      err = SDcompXform(nd.toloc, nd.pnorm, upvec);
1480      
1481      if (!err) {
1482         nd.vray [0] = -rayIn -> rdir [0];
1483         nd.vray [1] = -rayIn -> rdir [1];
1484         nd.vray [2] = -rayIn -> rdir [2];
1485         err = SDmapDir(nd.vray, nd.toloc, nd.vray);
1486      }
1487      
1488      if (!err)
1489         err = SDinvXform(nd.fromloc, nd.toloc);
1490        
1491      if (err) {
1492         objerror(mat, WARNING, "Illegal orientation vector");
1493         return 0;
1494      }
1495      
1496      /* Determine BSDF resolution */
1497      err = SDsizeBSDF(nd.sr_vpsa, nd.vray, NULL, SDqueryMin + SDqueryMax, nd.sd);
1498      
1499      if (err)
1500         objerror(mat, USER, transSDError(err));
1501        
1502      nd.sr_vpsa [0] = sqrt(nd.sr_vpsa [0]);
1503      nd.sr_vpsa [1] = sqrt(nd.sr_vpsa [1]);
1504
1505      /* Orient perturbed normal towards incident side */
1506      if (!hitFront) {                  
1507         nd.pnorm [0] = -nd.pnorm [0];
1508         nd.pnorm [1] = -nd.pnorm [1];
1509         nd.pnorm [2] = -nd.pnorm [2];
1510      }
1511      
1512      /* Following code adapted from SDsampBSDF() */
1513      {
1514         SDSpectralDF   *rdf, *tdf;
1515         SDValue        bsdfVal;
1516         double         xi, rhoDiff = 0;
1517         float          coef [SDmaxCh];
1518         int            i, j, n, nr;
1519         SDComponent       *sdc;
1520         const SDCDst   **cdarr = NULL;
1521        
1522         /* Get diffuse albedo (?) */
1523         if (hitFront) {
1524            bsdfVal = nd.sd -> rLambFront;
1525            rdf = nd.sd -> rf;
1526            tdf = nd.sd -> tf ? nd.sd -> tf : nd.sd -> tb;
1527         }
1528         else {
1529            bsdfVal = nd.sd -> rLambBack;
1530            rdf = nd.sd -> rb;
1531            tdf = nd.sd -> tb ? nd.sd -> tb : nd.sd -> tf;
1532         }
1533        
1534         rhoDiff = bsdfVal.cieY;
1535         bsdfVal.cieY += nd.sd -> tLamb.cieY;
1536        
1537         /* Allocate non-diffuse sampling */
1538         i = nr = rdf ? rdf -> ncomp : 0;
1539         j = tdf ? tdf -> ncomp : 0;
1540         n = i + j;
1541        
1542         if (n > 0 && !(cdarr = (const SDCDst**)malloc(n * sizeof(SDCDst*))))
1543            objerror(mat, USER, transSDError(SDEmemory));
1544            
1545         while (j-- > 0) {
1546            /* Sum up non-diffuse transmittance */
1547            cdarr [i + j] = (*tdf -> comp [j].func -> getCDist)(nd.vray, &tdf -> comp [j]);
1548            
1549            if (!cdarr [i + j])
1550               cdarr [i + j] = &SDemptyCD;
1551            else bsdfVal.cieY += cdarr [i + j] -> cTotal;
1552         }
1553        
1554         while (i-- > 0) {
1555            /* Sum up non-diffuse reflectance */
1556            cdarr [i] = (*rdf -> comp [i].func -> getCDist)(nd.vray, &rdf -> comp [i]);
1557            
1558            if (!cdarr [i])
1559               cdarr [i] = &SDemptyCD;
1560            else bsdfVal.cieY += cdarr [i] -> cTotal;
1561         }
1562        
1563         if (bsdfVal.cieY <= FTINY) {
1564            /* Don't bother sampling, just absorb photon */
1565            if (cdarr)
1566               free(cdarr);
1567            return 0;
1568         }      
1569        
1570         /* Insert direct and indirect photon hits if diffuse component */
1571         if (rhoDiff > FTINY || nd.sd -> tLamb.cieY > FTINY)
1572            addPhotons(rayIn);  
1573            
1574         xi = pmapRandom(rouletteState);
1575        
1576         if ((xi -= rhoDiff) <= 0) {
1577            /* Diffuse reflection */
1578            photonRay(rayIn, &rayOut, PMAP_DIFFREFL, nd.rdiff);
1579            diffPhotonScatter(nd.pnorm, &rayOut);
1580         }
1581         else if ((xi -= nd.sd -> tLamb.cieY) <= 0) {
1582            /* Diffuse transmission */
1583            flipsurface(rayIn);
1584            photonRay(rayIn, &rayOut, PMAP_DIFFTRANS, nd.tdiff);
1585            bsdfVal.spec = nd.sd -> tLamb.spec;
1586            diffPhotonScatter(nd.pnorm, &rayOut);
1587         }
1588         else {
1589            int rayOutType;
1590            COLOR bsdfRGB;
1591              
1592            /* Non-diffuse CDF inversion (?) */
1593            for (i = 0; i < n && (xi -= cdarr [i] -> cTotal) > 0; i++);
1594            
1595            if (i >= n) {
1596               /* Absorbed -- photon went Deer Hunter */
1597               if (cdarr)
1598                  free(cdarr);
1599               return 0;
1600            }
1601
1602            if (i < nr) {
1603               /* Non-diffuse reflection */
1604               sdc = &rdf -> comp [i];
1605               rayOutType = PMAP_SPECREFL;
1606            }
1607            else {
1608               /* Non-diffuse transmission */
1609               sdc = &tdf -> comp [i - nr];
1610               rayOutType = PMAP_SPECTRANS;
1611            }
1612            
1613            /* Generate non-diff sample dir */
1614            VCOPY(rayOut.rdir, nd.vray);
1615            err = (*sdc -> func -> sampCDist)
1616                  (rayOut.rdir, pmapRandom(scatterState), cdarr [i]);              
1617            if (err)
1618               objerror(mat, USER, transSDError(SDEinternal));
1619
1620            /* Get colour */
1621            j = (*sdc -> func -> getBSDFs)(coef, rayOut.rdir, nd.vray, sdc);
1622            
1623            if (j <= 0) {
1624               sprintf(SDerrorDetail, "BSDF \"%s\" sampling value error",
1625                       nd.sd -> name);
1626               objerror(mat, USER, transSDError(SDEinternal));
1627            }
1628            
1629            bsdfVal.spec = sdc -> cspec [0];
1630            rhoDiff = coef [0];
1631            
1632            while (--j) {
1633               c_cmix(&bsdfVal.spec, rhoDiff, &bsdfVal.spec, coef [j],
1634                      &sdc -> cspec [j]);
1635               rhoDiff += coef [j];
1636            }
1637            
1638            /* ? */
1639            c_ccvt(&bsdfVal.spec, C_CSXY + C_CSSPEC);
1640            ccy2rgb(&bsdfVal.spec, bsdfVal.cieY, bsdfRGB);
1641            
1642            /* Xform outgoing dir to world coords */
1643            if ((err = SDmapDir(rayOut.rdir, nd.fromloc, rayOut.rdir))) {
1644               objerror(mat, USER, transSDError(err));
1645               return 0;
1646            }
1647            
1648            photonRay(rayIn, &rayOut, rayOutType, bsdfRGB);
1649         }
1650        
1651         if (cdarr)
1652            free(cdarr);
1653      }
1654                          
1655      /* Clean up BSDF */
1656      SDfreeCache(nd.sd);
1657
1658      tracePhoton(&rayOut);
1659      return 0;
1660   }
1661 #else
1662
1420   /*
1421 +   ==================================================================
1422     The following code is
1423     (c) Lucerne University of Applied Sciences and Arts,
1424     supported by the Swiss National Science Foundation (SNSF, #147053)
1425 +   ==================================================================
1426   */  
1427  
1428   static int bsdfPhotonScatter (OBJREC *mat, RAY *rayIn)
1429   /* Generate new photon ray for BSDF modifier and recurse. */
1430   {
1431 +   int      hasthick = (mat->otype == MAT_BSDF);
1432     int      hitFront;
1433     SDError  err;
1434     SDValue  bsdfVal;
# Line 1677 | Line 1437 | static int bsdfPhotonScatter (OBJREC *mat, RAY *rayIn)
1437     BSDFDAT      nd;
1438     RAY      rayOut;
1439     COLOR    bsdfRGB;
1440 +   int      transmitted;
1441     double   prDiff, ptDiff, prDiffSD, ptDiffSD, prSpecSD, ptSpecSD,
1442 <            albedo, xi, xi2;
1443 <   const double patAlb = colorAvg(rayIn -> pcol);
1442 >            albedo, xi;
1443 >   const double patAlb = bright(rayIn -> pcol);
1444    
1445     /* Following code adapted from m_bsdf() */
1446     /* Check arguments */
1447 <   if (mat -> oargs.nsargs < 6 || mat -> oargs.nfargs > 9 ||
1447 >   if (mat -> oargs.nsargs < hasthick+5 || mat -> oargs.nfargs > 9 ||
1448         mat -> oargs.nfargs % 3)
1449        objerror(mat, USER, "bad # arguments");
1450        
1451 <        hitFront = (rayIn -> rod > 0);
1451 >   hitFront = (rayIn -> rod > 0);
1452  
1453 <        /* Load cal file */
1454 <        mf = getfunc(mat, 5, 0x1d, 1);
1455 <        
1456 <        /* Get thickness */
1453 >   /* Load cal file */
1454 >   mf = hasthick ? getfunc(mat, 5, 0x1d, 1) : getfunc(mat, 4, 0xe, 1);
1455 >
1456 >   /* Get thickness */
1457 >   nd.thick = 0;
1458 >   if (hasthick) {
1459          nd.thick = evalue(mf -> ep [0]);
1460          if ((-FTINY <= nd.thick) & (nd.thick <= FTINY))
1461                  nd.thick = .0;
1699                
1700   if (nd.thick != .0 || (!hitFront && !backvis)) {
1701      /* Proxy geometry present, so use it instead and transfer ray */
1702      photonRay(rayIn, &rayOut, PMAP_XFER, NULL);
1703      tracePhoton(&rayOut);
1704      
1705      return 0;
1462     }
1463  
1464     /* Get BSDF data */
1465 <   nd.sd = loadBSDF(mat -> oargs.sarg [1]);
1465 >   nd.sd = loadBSDF(mat -> oargs.sarg [hasthick]);
1466    
1467     /* Extra diffuse reflectance from material def */
1468     if (hitFront) {
# Line 1727 | Line 1483 | static int bsdfPhotonScatter (OBJREC *mat, RAY *rayIn)
1483     else setcolor(nd.rdiff, mat -> oargs.farg [3], mat -> oargs.farg [4],
1484                   mat -> oargs.farg [5]);
1485  
1486 <        /* Extra diffuse transmittance from material def */
1487 <        if (mat -> oargs.nfargs < 9)
1488 <           setcolor(nd.tdiff, .0, .0, .0);
1486 >   /* Extra diffuse transmittance from material def */
1487 >   if (mat -> oargs.nfargs < 9)
1488 >      setcolor(nd.tdiff, .0, .0, .0);
1489     else setcolor(nd.tdiff, mat -> oargs.farg [6], mat -> oargs.farg [7],
1490                   mat -> oargs.farg [8]);
1491                
1492     nd.mp = mat;
1493     nd.pr = rayIn;
1494 <        
1494 >
1495     /* Get modifiers */
1496     raytexture(rayIn, mat -> omod);
1497    
1498     /* Modify diffuse values */
1499     multcolor(nd.rdiff, rayIn -> pcol);
1500     multcolor(nd.tdiff, rayIn -> pcol);
1501 <                
1501 >
1502     /* Get up vector & xform to world coords */
1503 <   upvec [0] = evalue(mf -> ep [1]);
1504 <   upvec [1] = evalue(mf -> ep [2]);
1505 <   upvec [2] = evalue(mf -> ep [3]);
1503 >   upvec [0] = evalue(mf -> ep [hasthick+0]);
1504 >   upvec [1] = evalue(mf -> ep [hasthick+1]);
1505 >   upvec [2] = evalue(mf -> ep [hasthick+2]);
1506    
1507     if (mf -> fxp != &unitxf) {
1508        multv3(upvec, upvec, mf -> fxp -> xfm);
# Line 1789 | Line 1545 | static int bsdfPhotonScatter (OBJREC *mat, RAY *rayIn)
1545     nd.sr_vpsa [1] = sqrt(nd.sr_vpsa [1]);
1546  
1547     /* Orient perturbed normal towards incident side */
1548 <   if (!hitFront) {                    
1548 >   if (!hitFront) {
1549        nd.pnorm [0] = -nd.pnorm [0];
1550        nd.pnorm [1] = -nd.pnorm [1];
1551        nd.pnorm [2] = -nd.pnorm [2];
# Line 1817 | Line 1573 | static int bsdfPhotonScatter (OBJREC *mat, RAY *rayIn)
1573     if (prDiff + ptDiff + prDiffSD + ptDiffSD > FTINY)
1574        addPhotons(rayIn);        
1575  
1576 <   xi = xi2 = pmapRandom(rouletteState);
1576 >   xi = pmapRandom(rouletteState);
1577        
1578     if (xi > albedo)
1579        /* Absorbtion */
1580        return 0;
1581    
1582 +   transmitted = 0;
1583 +
1584     if ((xi -= prDiff) <= 0) {
1585        /* Diffuse reflection (extra component in material def) */
1586        photonRay(rayIn, &rayOut, PMAP_DIFFREFL, nd.rdiff);
# Line 1831 | Line 1589 | static int bsdfPhotonScatter (OBJREC *mat, RAY *rayIn)
1589    
1590     else if ((xi -= ptDiff) <= 0) {
1591        /* Diffuse transmission (extra component in material def) */
1834      flipsurface(rayIn);
1592        photonRay(rayIn, &rayOut, PMAP_DIFFTRANS, nd.tdiff);
1593 <      diffPhotonScatter(nd.pnorm, &rayOut);      
1593 >      diffPhotonScatter(nd.pnorm, &rayOut);
1594 >      transmitted = 1;
1595     }
1596 <  
1596 >  
1597     else {   /* Sample SDF */
1598        if ((xi -= prDiffSD) <= 0) {
1599           /* Diffuse SDF reflection (constant component) */
1600 <         if ((err = SDsampBSDF(&bsdfVal, nd.vray, xi2,
1600 >         if ((err = SDsampBSDF(&bsdfVal, nd.vray, pmapRandom(scatterState),
1601                                 SDsampDf | SDsampR, nd.sd)))
1602              objerror(mat, USER, transSDError(err));
1603          
# Line 1851 | Line 1609 | static int bsdfPhotonScatter (OBJREC *mat, RAY *rayIn)
1609  
1610        else if ((xi -= ptDiffSD) <= 0) {
1611           /* Diffuse SDF transmission (constant component) */
1612 <         if ((err = SDsampBSDF(&bsdfVal, nd.vray, xi2,
1612 >         if ((err = SDsampBSDF(&bsdfVal, nd.vray, pmapRandom(scatterState),
1613                                 SDsampDf | SDsampT, nd.sd)))
1614              objerror(mat, USER, transSDError(err));
1615          
# Line 1859 | Line 1617 | static int bsdfPhotonScatter (OBJREC *mat, RAY *rayIn)
1617           ccy2rgb(&bsdfVal.spec, bsdfVal.cieY, bsdfRGB);
1618           multcolor(bsdfRGB, rayIn -> pcol);
1619           addcolor(bsdfRGB, nd.tdiff);      
1862         flipsurface(rayIn);  /* Necessary? */
1620           photonRay(rayIn, &rayOut, PMAP_DIFFTRANS, bsdfRGB);
1621 +         transmitted = 1;
1622        }
1623  
1624        else if ((xi -= prSpecSD) <= 0) {
1625           /* Non-diffuse ("specular") SDF reflection */
1626 <         if ((err = SDsampBSDF(&bsdfVal, nd.vray, xi2,
1626 >         if ((err = SDsampBSDF(&bsdfVal, nd.vray, pmapRandom(scatterState),
1627                                 SDsampSp | SDsampR, nd.sd)))
1628              objerror(mat, USER, transSDError(err));
1629          
# Line 1875 | Line 1633 | static int bsdfPhotonScatter (OBJREC *mat, RAY *rayIn)
1633        
1634        else {
1635           /* Non-diffuse ("specular") SDF transmission */
1636 <         if ((err = SDsampBSDF(&bsdfVal, nd.vray, xi2,
1636 >         if ((err = SDsampBSDF(&bsdfVal, nd.vray, pmapRandom(scatterState),
1637                                 SDsampSp | SDsampT, nd.sd)))
1638              objerror(mat, USER, transSDError(err));
1639  
1640           /* Apply pattern to spectral component */
1641           ccy2rgb(&bsdfVal.spec, bsdfVal.cieY, bsdfRGB);
1642           multcolor(bsdfRGB, rayIn -> pcol);
1885         flipsurface(rayIn);  /* Necessary? */
1643           photonRay(rayIn, &rayOut, PMAP_SPECTRANS, bsdfRGB);
1644 +         transmitted = 1;
1645        }      
1646        
1647        /* Xform outgoing dir to world coords */
# Line 1896 | Line 1654 | static int bsdfPhotonScatter (OBJREC *mat, RAY *rayIn)
1654     /* Clean up */
1655     SDfreeCache(nd.sd);
1656  
1657 +   /* Offset outgoing photon origin by thickness to bypass proxy geometry */
1658 +   if (transmitted && nd.thick != 0)
1659 +      VSUM(rayOut.rorg, rayOut.rorg, rayIn -> ron, -nd.thick);
1660 +
1661     tracePhoton(&rayOut);
1662     return 0;
1663   }
1902 #endif
1664  
1665  
1666  
1667   static int lightPhotonScatter (OBJREC* mat, RAY* ray)
1668 < /* Light sources doan' reflect */
1668 > /* Light sources doan' reflect, mang */
1669   {
1670     return 0;
1671   }
# Line 1946 | Line 1707 | void initPhotonScatterFuncs ()
1707              photonScatter [TEX_DATA] = pattexPhotonScatter;
1708              
1709     photonScatter [MOD_ALIAS] = aliasPhotonScatter;
1710 <   photonScatter [MAT_BSDF] = bsdfPhotonScatter;
1710 >   photonScatter [MAT_BSDF] =
1711 >      photonScatter [MAT_ABSDF] = bsdfPhotonScatter;
1712   }

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines