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.6 by greg, Fri May 22 10:27:40 2015 UTC vs.
Revision 2.7 by rschregle, Wed May 27 17:54:19 2015 UTC

# Line 1374 | Line 1374 | static int pattexPhotonScatter (OBJREC *mat, RAY *rayI
1374  
1375  
1376  
1377 #if 0
1378   static int bsdfPhotonScatter (OBJREC *mat, RAY *rayIn)
1379   /* Generate new photon ray for BSDF modifier and recurse. */
1380   {
1381      int      hitFront;
1382      SDError  err;
1383      FVECT        upvec;
1384      MFUNC        *mf;
1385      BSDFDAT   nd;
1386      RAY      rayOut;
1387
1388      /* Following code adapted from m_bsdf() */
1389      /* Check arguments */
1390      if (mat -> oargs.nsargs < 6 || mat -> oargs.nfargs > 9 ||
1391          mat -> oargs.nfargs % 3)
1392         objerror(mat, USER, "bad # arguments");
1393        
1394      hitFront = (rayIn -> rod > 0);
1395
1396      /* Load cal file */
1397      mf = getfunc(mat, 5, 0x1d, 1);
1398      
1399      /* Get thickness */
1400      nd.thick = evalue(mf -> ep [0]);
1401      if ((-FTINY <= nd.thick) & (nd.thick <= FTINY))
1402         nd.thick = .0;
1403        
1404      if (nd.thick != .0 || (!hitFront && !backvis)) {
1405         /* Proxy geometry present, so use it instead and transfer ray */
1406         photonRay(rayIn, &rayOut, PMAP_XFER, NULL);
1407         tracePhoton(&rayOut);
1408        
1409         return 0;
1410      }
1411
1412      /* Get BSDF data */
1413      nd.sd = loadBSDF(mat -> oargs.sarg [1]);
1414      
1415      /* Diffuse reflectance */
1416      if (hitFront) {
1417         if (mat -> oargs.nfargs < 3)
1418            setcolor(nd.rdiff, .0, .0, .0);
1419         else setcolor(nd.rdiff, mat -> oargs.farg [0], mat -> oargs.farg [1],
1420                       mat -> oargs.farg [2]);
1421      }    
1422      else if (mat -> oargs.nfargs < 6) {
1423         /* Check for absorbing backside */
1424         if (!backvis && !nd.sd -> rb && !nd.sd -> tf) {
1425            SDfreeCache(nd.sd);                    
1426            return 0;
1427         }
1428        
1429         setcolor(nd.rdiff, .0, .0, .0);
1430      }
1431      else setcolor(nd.rdiff, mat -> oargs.farg [3], mat -> oargs.farg [4],
1432                    mat -> oargs.farg [5]);
1433
1434      /* Diffuse transmittance */
1435      if (mat -> oargs.nfargs < 9)
1436         setcolor(nd.tdiff, .0, .0, .0);
1437      else setcolor(nd.tdiff, mat -> oargs.farg [6], mat -> oargs.farg [7],
1438                    mat -> oargs.farg [8]);
1439                  
1440      nd.mp = mat;
1441      nd.pr = rayIn;
1442      
1443      /* Get modifiers */
1444      raytexture(rayIn, mat -> omod);
1445      
1446      /* Modify diffuse values */
1447      multcolor(nd.rdiff, rayIn -> pcol);
1448      multcolor(nd.tdiff, rayIn -> pcol);
1449        
1450      /* Get up vector & xform to world coords */
1451      upvec [0] = evalue(mf -> ep [1]);
1452      upvec [1] = evalue(mf -> ep [2]);
1453      upvec [2] = evalue(mf -> ep [3]);
1454      
1455      if (mf -> fxp != &unitxf) {
1456         multv3(upvec, upvec, mf -> fxp -> xfm);
1457         nd.thick *= mf -> fxp -> sca;
1458      }
1459      
1460      if (rayIn -> rox) {
1461         multv3(upvec, upvec, rayIn -> rox -> f.xfm);
1462         nd.thick *= rayIn -> rox -> f.sca;
1463      }
1464      
1465      /* Perturb normal */
1466      raynormal(nd.pnorm, rayIn);
1467      
1468      /* Xform incident dir to local BSDF coords */
1469      err = SDcompXform(nd.toloc, nd.pnorm, upvec);
1470      
1471      if (!err) {
1472         nd.vray [0] = -rayIn -> rdir [0];
1473         nd.vray [1] = -rayIn -> rdir [1];
1474         nd.vray [2] = -rayIn -> rdir [2];
1475         err = SDmapDir(nd.vray, nd.toloc, nd.vray);
1476      }
1477      
1478      if (!err)
1479         err = SDinvXform(nd.fromloc, nd.toloc);
1480        
1481      if (err) {
1482         objerror(mat, WARNING, "Illegal orientation vector");
1483         return 0;
1484      }
1485      
1486      /* Determine BSDF resolution */
1487      err = SDsizeBSDF(nd.sr_vpsa, nd.vray, NULL, SDqueryMin + SDqueryMax, nd.sd);
1488      
1489      if (err)
1490         objerror(mat, USER, transSDError(err));
1491        
1492      nd.sr_vpsa [0] = sqrt(nd.sr_vpsa [0]);
1493      nd.sr_vpsa [1] = sqrt(nd.sr_vpsa [1]);
1494
1495      /* Orient perturbed normal towards incident side */
1496      if (!hitFront) {                  
1497         nd.pnorm [0] = -nd.pnorm [0];
1498         nd.pnorm [1] = -nd.pnorm [1];
1499         nd.pnorm [2] = -nd.pnorm [2];
1500      }
1501      
1502      /* Following code adapted from SDsampBSDF() */
1503      {
1504         SDSpectralDF   *rdf, *tdf;
1505         SDValue        bsdfVal;
1506         double         xi, rhoDiff = 0;
1507         float          coef [SDmaxCh];
1508         int            i, j, n, nr;
1509         SDComponent       *sdc;
1510         const SDCDst   **cdarr = NULL;
1511        
1512         /* Get diffuse albedo (?) */
1513         if (hitFront) {
1514            bsdfVal = nd.sd -> rLambFront;
1515            rdf = nd.sd -> rf;
1516            tdf = nd.sd -> tf ? nd.sd -> tf : nd.sd -> tb;
1517         }
1518         else {
1519            bsdfVal = nd.sd -> rLambBack;
1520            rdf = nd.sd -> rb;
1521            tdf = nd.sd -> tb ? nd.sd -> tb : nd.sd -> tf;
1522         }
1523        
1524         rhoDiff = bsdfVal.cieY;
1525         bsdfVal.cieY += nd.sd -> tLamb.cieY;
1526        
1527         /* Allocate non-diffuse sampling */
1528         i = nr = rdf ? rdf -> ncomp : 0;
1529         j = tdf ? tdf -> ncomp : 0;
1530         n = i + j;
1531        
1532         if (n > 0 && !(cdarr = (const SDCDst**)malloc(n * sizeof(SDCDst*))))
1533            objerror(mat, USER, transSDError(SDEmemory));
1534            
1535         while (j-- > 0) {
1536            /* Sum up non-diffuse transmittance */
1537            cdarr [i + j] = (*tdf -> comp [j].func -> getCDist)(nd.vray, &tdf -> comp [j]);
1538            
1539            if (!cdarr [i + j])
1540               cdarr [i + j] = &SDemptyCD;
1541            else bsdfVal.cieY += cdarr [i + j] -> cTotal;
1542         }
1543        
1544         while (i-- > 0) {
1545            /* Sum up non-diffuse reflectance */
1546            cdarr [i] = (*rdf -> comp [i].func -> getCDist)(nd.vray, &rdf -> comp [i]);
1547            
1548            if (!cdarr [i])
1549               cdarr [i] = &SDemptyCD;
1550            else bsdfVal.cieY += cdarr [i] -> cTotal;
1551         }
1552        
1553         if (bsdfVal.cieY <= FTINY) {
1554            /* Don't bother sampling, just absorb photon */
1555            if (cdarr)
1556               free(cdarr);
1557            return 0;
1558         }      
1559        
1560         /* Insert direct and indirect photon hits if diffuse component */
1561         if (rhoDiff > FTINY || nd.sd -> tLamb.cieY > FTINY)
1562            addPhotons(rayIn);  
1563            
1564         xi = pmapRandom(rouletteState);
1565        
1566         if ((xi -= rhoDiff) <= 0) {
1567            /* Diffuse reflection */
1568            photonRay(rayIn, &rayOut, PMAP_DIFFREFL, nd.rdiff);
1569            diffPhotonScatter(nd.pnorm, &rayOut);
1570         }
1571         else if ((xi -= nd.sd -> tLamb.cieY) <= 0) {
1572            /* Diffuse transmission */
1573            flipsurface(rayIn);
1574            photonRay(rayIn, &rayOut, PMAP_DIFFTRANS, nd.tdiff);
1575            bsdfVal.spec = nd.sd -> tLamb.spec;
1576            diffPhotonScatter(nd.pnorm, &rayOut);
1577         }
1578         else {
1579            int rayOutType;
1580            COLOR bsdfRGB;
1581              
1582            /* Non-diffuse CDF inversion (?) */
1583            for (i = 0; i < n && (xi -= cdarr [i] -> cTotal) > 0; i++);
1584            
1585            if (i >= n) {
1586               /* Absorbed -- photon went Deer Hunter */
1587               if (cdarr)
1588                  free(cdarr);
1589               return 0;
1590            }
1591
1592            if (i < nr) {
1593               /* Non-diffuse reflection */
1594               sdc = &rdf -> comp [i];
1595               rayOutType = PMAP_SPECREFL;
1596            }
1597            else {
1598               /* Non-diffuse transmission */
1599               sdc = &tdf -> comp [i - nr];
1600               rayOutType = PMAP_SPECTRANS;
1601            }
1602            
1603            /* Generate non-diff sample dir */
1604            VCOPY(rayOut.rdir, nd.vray);
1605            err = (*sdc -> func -> sampCDist)
1606                  (rayOut.rdir, pmapRandom(scatterState), cdarr [i]);              
1607            if (err)
1608               objerror(mat, USER, transSDError(SDEinternal));
1609
1610            /* Get colour */
1611            j = (*sdc -> func -> getBSDFs)(coef, rayOut.rdir, nd.vray, sdc);
1612            
1613            if (j <= 0) {
1614               sprintf(SDerrorDetail, "BSDF \"%s\" sampling value error",
1615                       nd.sd -> name);
1616               objerror(mat, USER, transSDError(SDEinternal));
1617            }
1618            
1619            bsdfVal.spec = sdc -> cspec [0];
1620            rhoDiff = coef [0];
1621            
1622            while (--j) {
1623               c_cmix(&bsdfVal.spec, rhoDiff, &bsdfVal.spec, coef [j],
1624                      &sdc -> cspec [j]);
1625               rhoDiff += coef [j];
1626            }
1627            
1628            /* ? */
1629            c_ccvt(&bsdfVal.spec, C_CSXY + C_CSSPEC);
1630            ccy2rgb(&bsdfVal.spec, bsdfVal.cieY, bsdfRGB);
1631            
1632            /* Xform outgoing dir to world coords */
1633            if ((err = SDmapDir(rayOut.rdir, nd.fromloc, rayOut.rdir))) {
1634               objerror(mat, USER, transSDError(err));
1635               return 0;
1636            }
1637            
1638            photonRay(rayIn, &rayOut, rayOutType, bsdfRGB);
1639         }
1640        
1641         if (cdarr)
1642            free(cdarr);
1643      }
1644                          
1645      /* Clean up BSDF */
1646      SDfreeCache(nd.sd);
1647
1648      tracePhoton(&rayOut);
1649      return 0;
1650   }
1651 #else
1652
1377   /*
1378 +   ==================================================================
1379     The following code is
1380     (c) Lucerne University of Applied Sciences and Arts,
1381     supported by the Swiss National Science Foundation (SNSF, #147053)
1382 +   ==================================================================
1383   */  
1384  
1385   static int bsdfPhotonScatter (OBJREC *mat, RAY *rayIn)
# Line 1687 | Line 1413 | static int bsdfPhotonScatter (OBJREC *mat, RAY *rayIn)
1413          nd.thick = evalue(mf -> ep [0]);
1414          if ((-FTINY <= nd.thick) & (nd.thick <= FTINY))
1415                  nd.thick = .0;
1416 < #if 0  
1691 <   if (nd.thick != .0 || (!hitFront && !backvis)) {
1692 <      /* Proxy geometry present, so use it instead and transfer ray */
1693 <      photonRay(rayIn, &rayOut, PMAP_XFER, NULL);
1694 <      tracePhoton(&rayOut);
1695 <      
1696 <      return 0;
1697 <   }
1698 < #endif
1416 >
1417     /* Get BSDF data */
1418     nd.sd = loadBSDF(mat -> oargs.sarg [1]);
1419    
# Line 1855 | Line 1573 | static int bsdfPhotonScatter (OBJREC *mat, RAY *rayIn)
1573           multcolor(bsdfRGB, rayIn -> pcol);
1574           addcolor(bsdfRGB, nd.tdiff);      
1575           flipsurface(rayIn);  /* Necessary? */
1576 <         nd.thick = -nd.thick;
1577 <         photonRay(rayIn, &rayOut, PMAP_DIFFTRANS, bsdfRGB);
1576 >         nd.thick = -nd.thick;
1577 >         photonRay(rayIn, &rayOut, PMAP_DIFFTRANS, bsdfRGB);
1578           transmitted = 1;
1579        }
1580  
# Line 1880 | Line 1598 | static int bsdfPhotonScatter (OBJREC *mat, RAY *rayIn)
1598           ccy2rgb(&bsdfVal.spec, bsdfVal.cieY, bsdfRGB);
1599           multcolor(bsdfRGB, rayIn -> pcol);
1600           flipsurface(rayIn);  /* Necessary? */
1601 <         nd.thick = -nd.thick;
1601 >         nd.thick = -nd.thick;
1602           photonRay(rayIn, &rayOut, PMAP_SPECTRANS, bsdfRGB);
1603           transmitted = 1;
1604        }      
# Line 1897 | Line 1615 | static int bsdfPhotonScatter (OBJREC *mat, RAY *rayIn)
1615  
1616     /* Need to offset ray origin to get past detail geometry? */
1617     if (transmitted && nd.thick != 0)
1618 <        VSUM(rayOut.rorg, rayOut.rorg, rayIn -> ron, -nd.thick);
1618 >      VSUM(rayOut.rorg, rayOut.rorg, rayIn -> ron, -nd.thick);
1619  
1620     tracePhoton(&rayOut);
1621     return 0;
1622   }
1905 #endif
1623  
1624  
1625  

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines