1 |
+ |
#ifndef lint |
2 |
+ |
static const char RCSid[] = "$Id$"; |
3 |
+ |
#endif |
4 |
|
/* |
5 |
|
================================================================== |
6 |
|
Photon map support routines for emission from light sources |
10 |
|
(c) Lucerne University of Applied Sciences and Arts, |
11 |
|
supported by the Swiss National Science Foundation (SNSF, #147053) |
12 |
|
================================================================== |
13 |
< |
|
11 |
< |
$Id$ |
13 |
> |
|
14 |
|
*/ |
15 |
|
|
16 |
|
|
20 |
|
#include "pmaprand.h" |
21 |
|
#include "otypes.h" |
22 |
|
|
23 |
< |
|
24 |
< |
|
25 |
< |
SRCREC *photonPorts = NULL; /* Photon port list */ |
23 |
> |
/* List of photon port modifier names */ |
24 |
> |
char *photonPortList [MAXSET + 1] = {NULL}; |
25 |
> |
/* Photon port objects (with modifiers in photonPortMods) */ |
26 |
> |
SRCREC *photonPorts = NULL; |
27 |
|
unsigned numPhotonPorts = 0; |
28 |
|
|
29 |
|
void (*photonPartition [NUMOTYPE]) (EmissionMap*); |
30 |
|
void (*photonOrigin [NUMOTYPE]) (EmissionMap*); |
31 |
|
|
29 |
– |
extern OBJECT ambset []; |
30 |
– |
|
32 |
|
|
33 |
|
|
34 |
|
static int flatPhotonPartition2 (EmissionMap* emap, unsigned long mp, |
520 |
|
|
521 |
|
|
522 |
|
|
523 |
< |
void getPhotonPorts () |
524 |
< |
/* Find geometry declared as photon ports */ |
523 |
> |
void getPhotonPorts (char **portList) |
524 |
> |
/* Find geometry declared as photon ports from modifiers in portList */ |
525 |
|
{ |
526 |
|
OBJECT i; |
527 |
< |
OBJREC* obj; |
527 |
> |
OBJREC *obj, *mat; |
528 |
> |
char **lp; |
529 |
|
|
530 |
< |
/* Check for missing port modifiers */ |
531 |
< |
if (!ambset [0]) |
530 |
< |
error(USER, "no photon ports found"); |
530 |
> |
/* Init photon port objects */ |
531 |
> |
photonPorts = NULL; |
532 |
|
|
533 |
+ |
if (!portList [0]) |
534 |
+ |
return; |
535 |
+ |
|
536 |
|
for (i = 0; i < nobjects; i++) { |
537 |
|
obj = objptr(i); |
538 |
+ |
mat = findmaterial(obj); |
539 |
|
|
540 |
< |
if (inset(ambset, obj -> omod)) { |
541 |
< |
/* Add photon port */ |
542 |
< |
photonPorts = (SRCREC*)realloc(photonPorts, |
543 |
< |
(numPhotonPorts + 1) * |
544 |
< |
sizeof(SRCREC)); |
540 |
< |
if (!photonPorts) |
541 |
< |
error(USER, "can't allocate photon ports"); |
542 |
< |
|
543 |
< |
photonPorts [numPhotonPorts].so = obj; |
544 |
< |
photonPorts [numPhotonPorts].sflags = 0; |
540 |
> |
/* Check if object is a surface and NOT a light source (duh) and |
541 |
> |
* resolve its material via any aliases, then check for inclusion in |
542 |
> |
* modifier list */ |
543 |
> |
if (issurface(obj -> otype) && mat && !islight(mat -> otype)) { |
544 |
> |
for (lp = portList; *lp && strcmp(mat -> oname, *lp); lp++); |
545 |
|
|
546 |
< |
if (!sfun [obj -> otype].of || !sfun[obj -> otype].of -> setsrc) |
547 |
< |
objerror(obj, USER, "illegal photon port"); |
546 |
> |
if (*lp) { |
547 |
> |
/* Add photon port */ |
548 |
> |
photonPorts = (SRCREC*)realloc(photonPorts, |
549 |
> |
(numPhotonPorts + 1) * |
550 |
> |
sizeof(SRCREC)); |
551 |
> |
if (!photonPorts) |
552 |
> |
error(USER, "can't allocate photon ports"); |
553 |
|
|
554 |
< |
setsource(photonPorts + numPhotonPorts, obj); |
555 |
< |
numPhotonPorts++; |
554 |
> |
photonPorts [numPhotonPorts].so = obj; |
555 |
> |
photonPorts [numPhotonPorts].sflags = 0; |
556 |
> |
|
557 |
> |
if (!sfun [obj -> otype].of || !sfun[obj -> otype].of -> setsrc) |
558 |
> |
objerror(obj, USER, "illegal photon port"); |
559 |
> |
|
560 |
> |
setsource(photonPorts + numPhotonPorts, obj); |
561 |
> |
numPhotonPorts++; |
562 |
> |
} |
563 |
|
} |
564 |
|
} |
565 |
+ |
|
566 |
+ |
if (!numPhotonPorts) |
567 |
+ |
error(USER, "no valid photon ports found"); |
568 |
|
} |
569 |
|
|
570 |
|
|
686 |
|
|
687 |
|
VCOPY(r.rorg, emap -> photonOrg); |
688 |
|
VCOPY(r.rop, emap -> photonOrg); |
689 |
< |
r.rmax = FHUGE; |
689 |
> |
r.rmax = 0; |
690 |
|
|
691 |
|
for (t = 0; t < emap -> numTheta; t++) { |
692 |
|
for (p = 0; p < emap -> numPhi; p++) { |
761 |
|
/* Choose a new origin within current partition for every |
762 |
|
emitted photon to break up clustering artifacts */ |
763 |
|
photonOrigin [emap -> src -> so -> otype] ((EmissionMap*)emap); |
764 |
+ |
/* If we have a local glow source with a maximum radius, then |
765 |
+ |
restrict our photon to the specified distance, otherwise we set |
766 |
+ |
the limit imposed by photonMaxDist (or no limit if 0) */ |
767 |
+ |
if (mod -> otype == MAT_GLOW && !(emap -> src -> sflags & SDISTANT) |
768 |
+ |
&& mod -> oargs.farg[3] > FTINY) |
769 |
+ |
ray -> rmax = mod -> oargs.farg[3]; |
770 |
+ |
else |
771 |
+ |
ray -> rmax = photonMaxDist; |
772 |
|
rayorigin(ray, PRIMARY, NULL, NULL); |
750 |
– |
ray -> rmax = FHUGE; |
773 |
|
|
774 |
|
if (!emap -> numSamples) { |
775 |
|
/* Source is unmodified and has no port, and either local with |