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

Comparing ray/src/common/bsdf_t.c (file contents):
Revision 3.23 by greg, Mon Aug 22 18:21:05 2011 UTC vs.
Revision 3.26 by greg, Sat Sep 29 21:18:20 2012 UTC

# Line 36 | Line 36 | static double          quantum = 1./256.;
36  
37   /* Struct used for our distribution-building callback */
38   typedef struct {
39 <        int             nic;            /* number of input coordinates */
39 >        short           nic;            /* number of input coordinates */
40 >        short           rev;            /* reversing query */
41          unsigned        alen;           /* current array length */
42          unsigned        nall;           /* number of allocated entries */
43          unsigned        wmin;           /* minimum square size so far */
# Line 432 | Line 433 | SDlookupTre(const SDNode *st, const double *pos, doubl
433   static float
434   SDqueryTre(const SDTre *sdt, const FVECT outVec, const FVECT inVec, double *hc)
435   {
436 <        FVECT                   rOutVec;
437 <        double                  gridPos[4];
436 >        const RREAL     *vtmp;
437 >        FVECT           rOutVec;
438 >        double          gridPos[4];
439  
440          switch (sdt->sidef) {           /* whose side are you on? */
441 <        case SD_UFRONT:
441 >        case SD_FREFL:
442                  if ((outVec[2] < 0) | (inVec[2] < 0))
443                          return -1.;
444                  break;
445 <        case SD_UBACK:
445 >        case SD_BREFL:
446                  if ((outVec[2] > 0) | (inVec[2] > 0))
447                          return -1.;
448                  break;
449 <        case SD_XMIT:
450 <                if ((outVec[2] > 0) == (inVec[2] > 0))
449 >        case SD_FXMIT:
450 >                if (outVec[2] > 0) {
451 >                        if (inVec[2] > 0)
452 >                                return -1.;
453 >                        vtmp = outVec; outVec = inVec; inVec = vtmp;
454 >                } else if (inVec[2] < 0)
455                          return -1.;
456                  break;
457 +        case SD_BXMIT:
458 +                if (inVec[2] > 0) {
459 +                        if (outVec[2] > 0)
460 +                                return -1.;
461 +                        vtmp = outVec; outVec = inVec; inVec = vtmp;
462 +                } else if (outVec[2] < 0)
463 +                        return -1.;
464 +                break;
465          default:
466                  return -1.;
467          }
# Line 485 | Line 499 | build_scaffold(float val, const double *cmin, double c
499   {
500          SDdistScaffold  *sp = (SDdistScaffold *)cptr;
501          int             wid = csiz*(double)iwmax + .5;
502 +        double          revcmin[2];
503          bitmask_t       bmin[2], bmax[2];
504  
505 <        cmin += sp->nic;                /* skip to output coords */
505 >        if (sp->rev) {                  /* need to reverse sense? */
506 >                revcmin[0] = 1. - cmin[0] - csiz;
507 >                revcmin[1] = 1. - cmin[1] - csiz;
508 >                cmin = revcmin;
509 >        } else {
510 >                cmin += sp->nic;        /* else skip to output coords */
511 >        }
512          if (wid < sp->wmin)             /* new minimum width? */
513                  sp->wmin = wid;
514          if (wid > sp->wmax)             /* new maximum? */
# Line 533 | Line 554 | sscmp(const void *p1, const void *p2)
554  
555   /* Create a new cumulative distribution for the given input direction */
556   static SDTreCDst *
557 < make_cdist(const SDTre *sdt, const double *pos)
557 > make_cdist(const SDTre *sdt, const double *invec, int rev)
558   {
559          SDdistScaffold  myScaffold;
560 +        double          pos[4];
561 +        int             cmask;
562          SDTreCDst       *cd;
563          struct outdir_s *sp;
564          double          scale, cursum;
# Line 544 | Line 567 | make_cdist(const SDTre *sdt, const double *pos)
567          myScaffold.wmin = iwmax;
568          myScaffold.wmax = 0;
569          myScaffold.nic = sdt->st->ndim - 2;
570 +        myScaffold.rev = rev;
571          myScaffold.alen = 0;
572          myScaffold.nall = 512;
573          myScaffold.darr = (struct outdir_s *)malloc(sizeof(struct outdir_s) *
574                                                          myScaffold.nall);
575          if (myScaffold.darr == NULL)
576                  return NULL;
577 +                                        /* set up traversal */
578 +        cmask = (1<<myScaffold.nic) - 1;
579 +        for (i = myScaffold.nic; i--; )
580 +                        pos[i+2*rev] = invec[i];
581 +        cmask <<= 2*rev;
582                                          /* grow the distribution */
583 <        if (SDtraverseTre(sdt->st, pos, (1<<myScaffold.nic)-1,
583 >        if (SDtraverseTre(sdt->st, pos, cmask,
584                                  &build_scaffold, &myScaffold) < 0) {
585                  free(myScaffold.darr);
586                  return NULL;
# Line 574 | Line 603 | make_cdist(const SDTre *sdt, const double *pos)
603                                          /* record input range */
604          scale = myScaffold.wmin / (double)iwmax;
605          for (i = myScaffold.nic; i--; ) {
606 <                cd->clim[i][0] = floor(pos[i]/scale) * scale;
606 >                cd->clim[i][0] = floor(pos[i+2*rev]/scale) * scale;
607                  cd->clim[i][1] = cd->clim[i][0] + scale;
608          }
609          if (cd->isodist) {              /* avoid issue in SDqueryTreProjSA() */
# Line 583 | Line 612 | make_cdist(const SDTre *sdt, const double *pos)
612          }
613          cd->max_psa = myScaffold.wmax / (double)iwmax;
614          cd->max_psa *= cd->max_psa * M_PI;
615 <        cd->sidef = sdt->sidef;
615 >        if (rev)
616 >                cd->sidef = (sdt->sidef==SD_BXMIT) ? SD_FXMIT : SD_BXMIT;
617 >        else
618 >                cd->sidef = sdt->sidef;
619          cd->cTotal = 1e-20;             /* compute directional total */
620          sp = myScaffold.darr;
621          for (i = myScaffold.alen; i--; sp++)
# Line 611 | Line 643 | SDgetTreCDist(const FVECT inVec, SDComponent *sdc)
643          const SDTre     *sdt;
644          double          inCoord[2];
645          int             i;
646 +        int             mode;
647          SDTreCDst       *cd, *cdlast;
648                                          /* check arguments */
649          if ((inVec == NULL) | (sdc == NULL) ||
650                          (sdt = (SDTre *)sdc->dist) == NULL)
651                  return NULL;
652 +        switch (mode = sdt->sidef) {    /* check direction */
653 +        case SD_FREFL:
654 +                if (inVec[2] < 0)
655 +                        return NULL;
656 +                break;
657 +        case SD_BREFL:
658 +                if (inVec[2] > 0)
659 +                        return NULL;
660 +                break;
661 +        case SD_FXMIT:
662 +                if (inVec[2] < 0)
663 +                        mode = SD_BXMIT;
664 +                break;
665 +        case SD_BXMIT:
666 +                if (inVec[2] > 0)
667 +                        mode = SD_FXMIT;
668 +                break;
669 +        default:
670 +                return NULL;
671 +        }
672          if (sdt->st->ndim == 3) {       /* isotropic BSDF? */
673 +                if (mode != sdt->sidef) /* XXX unhandled reciprocity */
674 +                        return &SDemptyCD;
675                  inCoord[0] = .5 - .5*sqrt(inVec[0]*inVec[0] + inVec[1]*inVec[1]);
676          } else if (sdt->st->ndim == 4) {
677 <                SDdisk2square(inCoord, -inVec[0], -inVec[1]);
677 >                if (mode != sdt->sidef) /* use reciprocity? */
678 >                        SDdisk2square(inCoord, inVec[0], inVec[1]);
679 >                else
680 >                        SDdisk2square(inCoord, -inVec[0], -inVec[1]);
681          } else
682                  return NULL;            /* should be internal error */
683                                          /* quantize to avoid f.p. errors */
# Line 628 | Line 686 | SDgetTreCDist(const FVECT inVec, SDComponent *sdc)
686          cdlast = NULL;                  /* check for direction in cache list */
687          for (cd = (SDTreCDst *)sdc->cdList; cd != NULL;
688                                          cdlast = cd, cd = cd->next) {
689 +                if (cd->sidef != mode)
690 +                        continue;
691                  for (i = sdt->st->ndim - 2; i--; )
692                          if ((cd->clim[i][0] > inCoord[i]) |
693                                          (inCoord[i] >= cd->clim[i][1]))
# Line 636 | Line 696 | SDgetTreCDist(const FVECT inVec, SDComponent *sdc)
696                          break;          /* means we have a match */
697          }
698          if (cd == NULL)                 /* need to create new entry? */
699 <                cdlast = cd = make_cdist(sdt, inCoord);
699 >                cdlast = cd = make_cdist(sdt, inCoord, mode != sdt->sidef);
700          if (cdlast != NULL) {           /* move entry to head of cache list */
701                  cdlast->next = cd->next;
702                  cd->next = (SDTreCDst *)sdc->cdList;
# Line 707 | Line 767 | SDsampTreCDist(FVECT ioVec, double randX, const SDCDst
767                                          /* check arguments */
768          if ((ioVec == NULL) | (cd == NULL))
769                  return SDEargument;
770 +        if (!cd->sidef)
771 +                return SDEnone;         /* XXX should never happen */
772          if (ioVec[2] > 0) {
773 <                if (!(cd->sidef & SD_UFRONT))
773 >                if ((cd->sidef != SD_FREFL) & (cd->sidef != SD_FXMIT))
774                          return SDEargument;
775 <        } else if (!(cd->sidef & SD_UBACK))
775 >        } else if ((cd->sidef != SD_BREFL) & (cd->sidef != SD_BXMIT))
776                  return SDEargument;
777                                          /* binary search to find position */
778          ilower = 0; iupper = cd->calen;
# Line 736 | Line 798 | SDsampTreCDist(FVECT ioVec, double randX, const SDCDst
798          if (gpos[2] > 0)                /* paranoia, I hope */
799                  gpos[2] = sqrt(gpos[2]);
800                                          /* emit from back? */
801 <        if (ioVec[2] > 0 ^ cd->sidef != SD_XMIT)
801 >        if ((cd->sidef == SD_BREFL) | (cd->sidef == SD_FXMIT))
802                  gpos[2] = -gpos[2];
803          if (cd->isodist) {              /* rotate isotropic result */
804                  rotangle = atan2(-ioVec[1],-ioVec[0]);
# Line 894 | Line 956 | load_bsdf_data(SDData *sd, ezxml_t wdb, int ndim)
956          /*
957           * Remember that front and back are reversed from WINDOW 6 orientations
958           */
959 <        if (!strcasecmp(sdata, "Transmission")) {
959 >        if (!strcasecmp(sdata, "Transmission Front")) {
960 >                if (sd->tb != NULL)
961 >                        SDfreeSpectralDF(sd->tb);
962 >                if ((sd->tb = SDnewSpectralDF(1)) == NULL)
963 >                        return SDEmemory;
964 >                df = sd->tb;
965 >        } else if (!strcasecmp(sdata, "Transmission Back")) {
966                  if (sd->tf != NULL)
967                          SDfreeSpectralDF(sd->tf);
968                  if ((sd->tf = SDnewSpectralDF(1)) == NULL)
969                          return SDEmemory;
970                  df = sd->tf;
971          } else if (!strcasecmp(sdata, "Reflection Front")) {
972 <                if (sd->rb != NULL)     /* note back-front reversal */
972 >                if (sd->rb != NULL)
973                          SDfreeSpectralDF(sd->rb);
974                  if ((sd->rb = SDnewSpectralDF(1)) == NULL)
975                          return SDEmemory;
976                  df = sd->rb;
977          } else if (!strcasecmp(sdata, "Reflection Back")) {
978 <                if (sd->rf != NULL)     /* note front-back reversal */
978 >                if (sd->rf != NULL)
979                          SDfreeSpectralDF(sd->rf);
980                  if ((sd->rf = SDnewSpectralDF(1)) == NULL)
981                          return SDEmemory;
# Line 927 | Line 995 | load_bsdf_data(SDData *sd, ezxml_t wdb, int ndim)
995          if (sdt == NULL)
996                  return SDEmemory;
997          if (df == sd->rf)
998 <                sdt->sidef = SD_UFRONT;
998 >                sdt->sidef = SD_FREFL;
999          else if (df == sd->rb)
1000 <                sdt->sidef = SD_UBACK;
1001 <        else
1002 <                sdt->sidef = SD_XMIT;
1000 >                sdt->sidef = SD_BREFL;
1001 >        else if (df == sd->tf)
1002 >                sdt->sidef = SD_FXMIT;
1003 >        else /* df == sd->tb */
1004 >                sdt->sidef = SD_BXMIT;
1005          sdt->st = NULL;
1006          df->comp[0].cspec[0] = c_dfcolor; /* XXX monochrome for now */
1007          df->comp[0].dist = sdt;
# Line 1093 | Line 1163 | SDloadTre(SDData *sd, ezxml_t wtl)
1163                                          /* separate diffuse components */
1164          extract_diffuse(&sd->rLambFront, sd->rf);
1165          extract_diffuse(&sd->rLambBack, sd->rb);
1166 <        extract_diffuse(&sd->tLamb, sd->tf);
1166 >        extract_diffuse(&sd->tLamb, (sd->tf != NULL) ? sd->tf : sd->tb);
1167                                          /* return success */
1168          return SDEnone;
1169   }

Diff Legend

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