| 1 |
< |
/* Copyright (c) 1986 Regents of the University of California */ |
| 1 |
> |
/* Copyright (c) 1990 Regents of the University of California */ |
| 2 |
|
|
| 3 |
|
#ifndef lint |
| 4 |
|
static char SCCSid[] = "$SunId$ LBL"; |
| 32 |
|
SRCREC *source = NULL; /* our list of sources */ |
| 33 |
|
int nsources = 0; /* the number of sources */ |
| 34 |
|
|
| 35 |
+ |
static CONTRIB *srccnt; /* source contributions in direct() */ |
| 36 |
+ |
static CNTPTR *cntord; /* source ordering in direct() */ |
| 37 |
|
|
| 38 |
+ |
|
| 39 |
|
marksources() /* find and mark source objects */ |
| 40 |
|
{ |
| 41 |
|
register OBJREC *o, *m; |
| 50 |
|
|
| 51 |
|
m = objptr(o->omod); |
| 52 |
|
|
| 53 |
< |
if (m->otype != MAT_LIGHT && |
| 51 |
< |
m->otype != MAT_ILLUM && |
| 52 |
< |
m->otype != MAT_GLOW && |
| 53 |
< |
m->otype != MAT_SPOT) |
| 53 |
> |
if (!islight(m->otype)) |
| 54 |
|
continue; |
| 55 |
|
|
| 56 |
|
if (m->oargs.nfargs != (m->otype == MAT_GLOW ? 4 : |
| 68 |
|
source = (SRCREC *)realloc((char *)source, |
| 69 |
|
(unsigned)(nsources+1)*sizeof(SRCREC)); |
| 70 |
|
if (source == NULL) |
| 71 |
< |
error(SYSTEM, "out of memory in marksources"); |
| 71 |
> |
goto memerr; |
| 72 |
|
|
| 73 |
|
newsource(&source[nsources], o); |
| 74 |
|
|
| 83 |
|
} |
| 84 |
|
nsources++; |
| 85 |
|
} |
| 86 |
+ |
if (nsources <= 0) { |
| 87 |
+ |
error(WARNING, "no light sources found"); |
| 88 |
+ |
return; |
| 89 |
+ |
} |
| 90 |
+ |
srccnt = (CONTRIB *)malloc(nsources*sizeof(CONTRIB)); |
| 91 |
+ |
cntord = (CNTPTR *)malloc(nsources*sizeof(CNTPTR)); |
| 92 |
+ |
if (srccnt != NULL && cntord != NULL) |
| 93 |
+ |
return; |
| 94 |
+ |
/* fall through */ |
| 95 |
+ |
memerr: |
| 96 |
+ |
error(SYSTEM, "out of memory in marksources"); |
| 97 |
|
} |
| 98 |
|
|
| 99 |
|
|
| 288 |
|
for (i = 0; i < 3; i++) |
| 289 |
|
r->ron[i] = -r->rdir[i]; |
| 290 |
|
r->rod = 1.0; |
| 291 |
< |
r->rofs = 1.0; setident4(r->rofx); |
| 281 |
< |
r->robs = 1.0; setident4(r->robx); |
| 291 |
> |
r->rox = NULL; |
| 292 |
|
return(1); |
| 293 |
|
} |
| 294 |
|
return(0); |
| 314 |
|
{ |
| 315 |
|
extern double pow(); |
| 316 |
|
register int sn; |
| 307 |
– |
register CONTRIB *srccnt; |
| 308 |
– |
register CNTPTR *cntord; |
| 317 |
|
int nshadcheck, ncnts; |
| 318 |
|
double prob, ourthresh, hwt, test2, hit2; |
| 319 |
|
RAY sr; |
| 320 |
< |
|
| 320 |
> |
/* NOTE: srccnt and cntord global so no recursion */ |
| 321 |
|
if (nsources <= 0) |
| 322 |
< |
return; |
| 315 |
< |
srccnt = (CONTRIB *)malloc(nsources*sizeof(CONTRIB)); |
| 316 |
< |
cntord = (CNTPTR *)malloc(nsources*sizeof(CNTPTR)); |
| 317 |
< |
if (srccnt == NULL || cntord == NULL) |
| 318 |
< |
error(SYSTEM, "out of memory in direct"); |
| 322 |
> |
return; /* no sources?! */ |
| 323 |
|
/* compute number to check */ |
| 324 |
|
nshadcheck = pow((double)nsources, shadcert) + .5; |
| 325 |
|
/* modify threshold */ |
| 341 |
|
if (!( source[sn].sflags & SDISTANT ? |
| 342 |
|
sourcehit(&sr) : |
| 343 |
|
(*ofun[source[sn].so->otype].funp) |
| 344 |
< |
(source[sn].so, &sr) )) |
| 344 |
> |
(source[sn].so, &sr) )) { |
| 345 |
> |
sprintf(errmsg, |
| 346 |
> |
"aiming failure for light source \"%s\"", |
| 347 |
> |
source[sn].so->oname); |
| 348 |
> |
error(WARNING, errmsg); |
| 349 |
|
continue; |
| 350 |
+ |
} |
| 351 |
|
/* compute contribution */ |
| 352 |
|
raycont(&sr); |
| 353 |
|
multcolor(srccnt[sn].val, sr.rcol); |
| 418 |
|
scalecolor(srccnt[cntord[sn].sno].val, prob); |
| 419 |
|
addcolor(r->rcol, srccnt[cntord[sn].sno].val); |
| 420 |
|
} |
| 412 |
– |
|
| 413 |
– |
free((char *)srccnt); |
| 414 |
– |
free((char *)cntord); |
| 421 |
|
} |
| 422 |
|
|
| 423 |
|
|
| 465 |
|
r->rt = r->rot; |
| 466 |
|
} |
| 467 |
|
} |
| 462 |
– |
|
| 463 |
– |
|
| 464 |
– |
o_source() {} /* intersection with a source is done elsewhere */ |