23 |
|
* sort of context, so it is impossible to simultaneously run |
24 |
|
* this library on multiple scenes or in multiple threads. |
25 |
|
* You get one scene and one thread, and if you want more, you |
26 |
< |
* will have to go with the process model used by the programs |
27 |
< |
* gen/mkillum, hd/rholo, and px/pinterp. Finally, unrecoverable |
28 |
< |
* errors result in a call to the application-defined function |
29 |
< |
* quit(). The usual thing to do is to call exit(). |
26 |
> |
* will have to go with the process model defined in raypcalls.c. |
27 |
> |
* Finally, unrecoverable errors result in a call to the application- |
28 |
> |
* defined function quit(). The usual thing to do is to call exit(). |
29 |
|
* You might want to do something else instead, like |
30 |
|
* call setjmp()/longjmp() to bring you back to the calling |
31 |
|
* function for recovery. You may also wish to define your own |
90 |
|
*/ |
91 |
|
|
92 |
|
#include <string.h> |
93 |
+ |
#include <time.h> |
94 |
|
|
95 |
|
#include "ray.h" |
96 |
|
#include "source.h" |
119 |
|
|
120 |
|
int do_irrad = 0; /* compute irradiance? */ |
121 |
|
|
122 |
+ |
int rand_samp = 0; /* pure Monte Carlo sampling? */ |
123 |
+ |
|
124 |
|
double dstrsrc = 0.0; /* square source distribution */ |
125 |
|
double shadthresh = .03; /* shadow threshold */ |
126 |
|
double shadcert = .75; /* shadow certainty */ |
165 |
|
if (ofun[OBJ_SPHERE].funp == o_default) |
166 |
|
initotypes(); |
167 |
|
/* initialize urand */ |
168 |
< |
initurand(2048); |
168 |
> |
if (rand_samp) { |
169 |
> |
srandom((long)time(0)); |
170 |
> |
initurand(0); |
171 |
> |
} else { |
172 |
> |
srandom(0L); |
173 |
> |
initurand(2048); |
174 |
> |
} |
175 |
|
/* read scene octree */ |
176 |
|
readoct(octname = otnm, ~(IO_FILES|IO_INFO), &thescene, NULL); |
177 |
|
nsceneobjs = nobjects; |
187 |
|
RAY *r |
188 |
|
) |
189 |
|
{ |
190 |
< |
rayorigin(r, NULL, PRIMARY, 1.0); |
190 |
> |
rayorigin(r, PRIMARY, NULL, NULL); |
191 |
|
samplendx++; |
192 |
|
rayvalue(r); /* assumes origin and direction are set */ |
193 |
|
} |
371 |
|
memset(rp->ambfile, '\0', sizeof(rp->ambfile)); |
372 |
|
rp->ambvwt = 0; |
373 |
|
rp->ambres = 256; |
374 |
< |
rp->ambacc = 0.1; |
374 |
> |
rp->ambacc = 0.15; |
375 |
|
rp->ambdiv = 1024; |
376 |
|
rp->ambssamp = 512; |
377 |
|
rp->ambounce = 0; |