12 |
|
#include "platform.h" |
13 |
|
#include "ray.h" |
14 |
|
#include "otypes.h" |
15 |
+ |
#include "otspecial.h" |
16 |
|
#include "resolu.h" |
17 |
|
#include "ambient.h" |
18 |
|
#include "random.h" |
77 |
|
#define AMBFLUSH (BUFSIZ/AMBVALSIZ) |
78 |
|
|
79 |
|
#define newambval() (AMBVAL *)malloc(sizeof(AMBVAL)) |
79 |
– |
#define freeav(av) free((void *)av); |
80 |
|
|
81 |
|
static void initambfile(int creat); |
82 |
|
static void avsave(AMBVAL *av); |
184 |
|
(flen - lastpos)/AMBVALSIZ); |
185 |
|
error(WARNING, errmsg); |
186 |
|
fseek(ambfp, lastpos, SEEK_SET); |
187 |
– |
#ifndef _WIN32 /* XXX we need a replacement for that one */ |
187 |
|
ftruncate(fileno(ambfp), (off_t)lastpos); |
189 |
– |
#endif |
188 |
|
} |
189 |
|
} else if ((ambfp = fopen(ambfile, "w+")) != NULL) { |
190 |
|
initambfile(1); /* else create new file */ |
194 |
|
sprintf(errmsg, "cannot open ambient file \"%s\"", ambfile); |
195 |
|
error(SYSTEM, errmsg); |
196 |
|
} |
199 |
– |
#ifdef getc_unlocked |
200 |
– |
flockfile(ambfp); /* application-level lock */ |
201 |
– |
#endif |
197 |
|
#ifdef F_SETLKW |
198 |
|
aflock(F_UNLCK); /* release file */ |
199 |
|
#endif |
214 |
|
lastpos = -1; |
215 |
|
} |
216 |
|
/* free ambient tree */ |
217 |
< |
unloadatree(&atrunk, &avfree); |
217 |
> |
unloadatree(&atrunk, avfree); |
218 |
|
/* reset state variables */ |
219 |
|
avsum = 0.; |
220 |
|
navsum = 0; |
277 |
|
{ |
278 |
|
static int rdepth = 0; /* ambient recursion */ |
279 |
|
COLOR acol, caustic; |
280 |
< |
int ok; |
280 |
> |
int i, ok; |
281 |
|
double d, l; |
282 |
|
|
283 |
|
/* PMAP: Factor in ambient from photon map, if enabled and ray is |
303 |
|
goto dumbamb; |
304 |
|
|
305 |
|
if (ambacc <= FTINY) { /* no ambient storage */ |
306 |
+ |
FVECT uvd[2]; |
307 |
+ |
float dgrad[2], *dgp = NULL; |
308 |
+ |
|
309 |
+ |
if (nrm != r->ron && DOT(nrm,r->ron) < 0.9999) |
310 |
+ |
dgp = dgrad; /* compute rotational grad. */ |
311 |
|
copycolor(acol, aval); |
312 |
|
rdepth++; |
313 |
|
ok = doambient(acol, r, r->rweight, |
314 |
< |
NULL, NULL, NULL, NULL, NULL); |
314 |
> |
uvd, NULL, NULL, dgp, NULL); |
315 |
|
rdepth--; |
316 |
|
if (!ok) |
317 |
|
goto dumbamb; |
318 |
+ |
if ((ok > 0) & (dgp != NULL)) { /* apply texture */ |
319 |
+ |
FVECT v1; |
320 |
+ |
VCROSS(v1, r->ron, nrm); |
321 |
+ |
d = 1.0; |
322 |
+ |
for (i = 3; i--; ) |
323 |
+ |
d += v1[i] * (dgp[0]*uvd[0][i] + dgp[1]*uvd[1][i]); |
324 |
+ |
if (d >= 0.05) |
325 |
+ |
scalecolor(acol, d); |
326 |
+ |
} |
327 |
|
copycolor(aval, acol); |
328 |
|
|
329 |
|
/* PMAP: add in caustic */ |
416 |
|
VSUM(rtst.rdir, vdif, anorm, t[1]); /* further dist. > plane */ |
417 |
|
rtst.rmax = normalize(rtst.rdir); /* short ray test */ |
418 |
|
while (localhit(&rtst, &thescene)) { /* check for occluder */ |
419 |
< |
if (rtst.ro->omod != OVOID && |
419 |
> |
OBJREC *m = findmaterial(rtst.ro); |
420 |
> |
if (m != NULL && !istransp(m->otype) && !isBSDFproxy(m) && |
421 |
|
(rtst.clipset == NULL || |
422 |
|
!inset(rtst.clipset, rtst.ro->omod))) |
423 |
|
return(1); /* plug light leak */ |
1087 |
|
} |
1088 |
|
atp = atfreelist; |
1089 |
|
atfreelist = atp->kid; |
1090 |
< |
memset((char *)atp, '\0', 8*sizeof(AMBTREE)); |
1090 |
> |
memset(atp, 0, 8*sizeof(AMBTREE)); |
1091 |
|
return(atp); |
1092 |
|
} |
1093 |
|
|
1113 |
|
/* transfer values at this node */ |
1114 |
|
for (av = at->alist; av != NULL; av = at->alist) { |
1115 |
|
at->alist = av->next; |
1116 |
+ |
av->next = NULL; |
1117 |
|
(*f)(av); |
1118 |
|
} |
1119 |
|
if (at->kid == NULL) |
1191 |
|
{ |
1192 |
|
AMBVAL **avlpp; |
1193 |
|
|
1194 |
< |
avlpp = (AMBVAL **)bsearch((char *)&avaddr, (char *)avlist2, |
1195 |
< |
nambvals, sizeof(AMBVAL *), &aposcmp); |
1194 |
> |
avlpp = (AMBVAL **)bsearch(&avaddr, avlist2, |
1195 |
> |
nambvals, sizeof(AMBVAL *), aposcmp); |
1196 |
|
if (avlpp == NULL) |
1197 |
|
error(CONSISTENCY, "address not found in avlmemi"); |
1198 |
|
return(avlpp - avlist2); |
1235 |
|
} |
1236 |
|
if (avlist1 == NULL) { /* no time tracking -- rebuild tree? */ |
1237 |
|
if (avlist2 != NULL) |
1238 |
< |
free((void *)avlist2); |
1238 |
> |
free(avlist2); |
1239 |
|
if (always) { /* rebuild without sorting */ |
1240 |
|
oldatrunk = atrunk; |
1241 |
|
atrunk.alist = NULL; |
1242 |
|
atrunk.kid = NULL; |
1243 |
< |
unloadatree(&oldatrunk, &avinsert); |
1243 |
> |
unloadatree(&oldatrunk, avinsert); |
1244 |
|
} |
1245 |
|
} else { /* sort memory by last access time */ |
1246 |
|
/* |
1257 |
|
eputs(errmsg); |
1258 |
|
#endif |
1259 |
|
i_avlist = 0; |
1260 |
< |
unloadatree(&atrunk, &av2list); /* empty current tree */ |
1260 |
> |
unloadatree(&atrunk, av2list); /* empty current tree */ |
1261 |
|
#ifdef DEBUG |
1262 |
|
if (i_avlist < nambvals) |
1263 |
|
error(CONSISTENCY, "missing ambient values in sortambvals"); |
1264 |
|
#endif |
1265 |
< |
qsort((char *)avlist1, nambvals, sizeof(struct avl), alatcmp); |
1266 |
< |
qsort((char *)avlist2, nambvals, sizeof(AMBVAL *), aposcmp); |
1265 |
> |
qsort(avlist1, nambvals, sizeof(struct avl), alatcmp); |
1266 |
> |
qsort(avlist2, nambvals, sizeof(AMBVAL *), aposcmp); |
1267 |
|
for (i = 0; i < nambvals; i++) { |
1268 |
|
if (avlist1[i].p == NULL) |
1269 |
|
continue; |
1279 |
|
avinsert(avlist2[j]); |
1280 |
|
avlist1[j].p = NULL; |
1281 |
|
} |
1282 |
< |
free((void *)avlist1); |
1283 |
< |
free((void *)avlist2); |
1282 |
> |
free(avlist1); |
1283 |
> |
free(avlist2); |
1284 |
|
/* compute new sort interval */ |
1285 |
|
sortintvl = ambclock - lastsort; |
1286 |
|
if (sortintvl >= MAX_SORT_INTVL/2) |
1329 |
|
if ((flen = lseek(fileno(ambfp), (off_t)0, SEEK_END)) < 0) |
1330 |
|
goto seekerr; |
1331 |
|
if ((n = flen - lastpos) > 0) { /* file has grown */ |
1332 |
< |
if (ambinp == NULL) { /* use duplicate filedes */ |
1333 |
< |
ambinp = fdopen(dup(fileno(ambfp)), "r"); |
1332 |
> |
if (ambinp == NULL) { /* get new file pointer */ |
1333 |
> |
ambinp = fopen(ambfile, "rb"); |
1334 |
|
if (ambinp == NULL) |
1335 |
< |
error(SYSTEM, "fdopen failed in ambsync"); |
1335 |
> |
error(SYSTEM, "fopen failed in ambsync"); |
1336 |
|
} |
1337 |
|
if (fseek(ambinp, lastpos, SEEK_SET) < 0) |
1338 |
|
goto seekerr; |
1347 |
|
avstore(&avs); |
1348 |
|
n -= AMBVALSIZ; |
1349 |
|
} |
1350 |
< |
lastpos = flen - n; |
1351 |
< |
/*** seek always as safety measure |
1352 |
< |
if (n) ***/ /* alignment */ |
1342 |
< |
if (lseek(fileno(ambfp), (off_t)lastpos, SEEK_SET) < 0) |
1343 |
< |
goto seekerr; |
1350 |
> |
lastpos = flen - n; /* check alignment */ |
1351 |
> |
if (n && lseek(fileno(ambfp), (off_t)lastpos, SEEK_SET) < 0) |
1352 |
> |
goto seekerr; |
1353 |
|
} |
1354 |
|
n = fflush(ambfp); /* calls write() at last */ |
1355 |
< |
if (n != EOF) |
1347 |
< |
lastpos += (long)nunflshed*AMBVALSIZ; |
1348 |
< |
else if ((lastpos = lseek(fileno(ambfp), (off_t)0, SEEK_CUR)) < 0) |
1349 |
< |
goto seekerr; |
1350 |
< |
|
1355 |
> |
lastpos += (long)nunflshed*AMBVALSIZ; |
1356 |
|
aflock(F_UNLCK); /* release file */ |
1357 |
|
nunflshed = 0; |
1358 |
|
return(n); |
1359 |
|
seekerr: |
1360 |
|
error(SYSTEM, "seek failed in ambsync"); |
1361 |
< |
return -1; /* pro forma return */ |
1361 |
> |
return(EOF); /* pro forma return */ |
1362 |
|
} |
1363 |
|
|
1364 |
|
#else /* ! F_SETLKW */ |