43 |
|
{ |
44 |
|
int i; |
45 |
|
register OBJREC *o, *m; |
46 |
< |
register SRCREC *ns; |
46 |
> |
register int ns; |
47 |
|
/* initialize dispatch table */ |
48 |
|
initstypes(); |
49 |
|
/* find direct sources */ |
72 |
|
sfun[o->otype].of->setsrc == NULL) |
73 |
|
objerror(o, USER, "illegal material"); |
74 |
|
|
75 |
< |
if ((ns = newsource()) == NULL) |
75 |
> |
if ((ns = newsource()) < 0) |
76 |
|
goto memerr; |
77 |
|
|
78 |
< |
(*sfun[o->otype].of->setsrc)(ns, o); |
78 |
> |
setsource(&source[ns], o); |
79 |
|
|
80 |
|
if (m->otype == MAT_GLOW) { |
81 |
< |
ns->sflags |= SPROX; |
82 |
< |
ns->sl.prox = m->oargs.farg[3]; |
81 |
> |
source[ns].sflags |= SPROX; |
82 |
> |
source[ns].sl.prox = m->oargs.farg[3]; |
83 |
|
if (o->otype == OBJ_SOURCE) |
84 |
< |
ns->sflags |= SSKIP; |
84 |
> |
source[ns].sflags |= SSKIP; |
85 |
|
} else if (m->otype == MAT_SPOT) { |
86 |
< |
ns->sflags |= SSPOT; |
87 |
< |
if ((ns->sl.s = makespot(m)) == NULL) |
86 |
> |
source[ns].sflags |= SSPOT; |
87 |
> |
if ((source[ns].sl.s = makespot(m)) == NULL) |
88 |
|
goto memerr; |
89 |
+ |
if (source[ns].sflags & SFLAT && |
90 |
+ |
!checkspot(source[ns].sl.s,source[ns].snorm)) { |
91 |
+ |
objerror(o, WARNING, |
92 |
+ |
"invalid spotlight direction"); |
93 |
+ |
source[ns].sflags |= SSKIP; |
94 |
+ |
} |
95 |
|
} |
96 |
|
} |
97 |
|
if (nsources <= 0) { |
101 |
|
markvirtuals(); /* find and add virtual sources */ |
102 |
|
srccnt = (CONTRIB *)malloc(nsources*sizeof(CONTRIB)); |
103 |
|
cntord = (CNTPTR *)malloc(nsources*sizeof(CNTPTR)); |
104 |
< |
if (srccnt != NULL && cntord != NULL) |
104 |
> |
if (srccnt == NULL || cntord == NULL) |
105 |
|
goto memerr; |
106 |
|
return; |
107 |
|
memerr: |
128 |
|
sr->rsrc = sn; /* remember source */ |
129 |
|
/* get source direction */ |
130 |
|
if (source[sn].sflags & SDISTANT) { |
125 |
– |
if (source[sn].sflags & SSPOT) { /* check location */ |
126 |
– |
for (i = 0; i < 3; i++) |
127 |
– |
vd[i] = sr->rorg[i] - source[sn].sl.s->aim[i]; |
128 |
– |
d = DOT(source[sn].sloc,vd); |
129 |
– |
d = DOT(vd,vd) - d*d; |
130 |
– |
if (PI*d > source[sn].sl.s->siz) |
131 |
– |
return(0.0); |
132 |
– |
} |
131 |
|
/* constant direction */ |
132 |
|
VCOPY(sr->rdir, source[sn].sloc); |
133 |
|
} else { /* compute direction */ |
144 |
|
for (i = 0; i < 3; i++) { |
145 |
|
dimlist[ndims] = i + 8831; |
146 |
|
vd[i] = dstrsrc * source[sn].ss * |
147 |
< |
(1.0 - 2.0*urand(ilhash(dimlist,ndims+1)+samplendx)); |
147 |
> |
(1.0 - 2.0*urand(urind(ilhash(dimlist,ndims+1),samplendx))); |
148 |
|
} |
149 |
|
ndims--; |
150 |
|
if (source[sn].sflags & SFLAT) { /* project offset */ |
154 |
|
} |
155 |
|
for (i = 0; i < 3; i++) /* offset source direction */ |
156 |
|
sr->rdir[i] += vd[i]; |
157 |
+ |
/* normalize */ |
158 |
+ |
d = normalize(sr->rdir); |
159 |
|
|
160 |
< |
} else if (source[sn].sflags & SDISTANT) |
161 |
< |
/* already normalized */ |
162 |
< |
return(source[sn].ss2); |
160 |
> |
} else if (!(source[sn].sflags & SDISTANT)) |
161 |
> |
/* normalize direction */ |
162 |
> |
d = normalize(sr->rdir); |
163 |
|
|
164 |
< |
if ((d = normalize(sr->rdir)) == 0.0) |
165 |
< |
/* at source! */ |
164 |
> |
if (source[sn].sflags & SDISTANT) { |
165 |
> |
if (source[sn].sflags & SSPOT) { /* check location */ |
166 |
> |
for (i = 0; i < 3; i++) |
167 |
> |
vd[i] = sr->rorg[i] - source[sn].sl.s->aim[i]; |
168 |
> |
d = DOT(sr->rdir,vd); |
169 |
> |
d = DOT(vd,vd) - d*d; |
170 |
> |
if (PI*d > source[sn].sl.s->siz) |
171 |
> |
return(0.0); |
172 |
> |
} |
173 |
> |
return(source[sn].ss2); /* domega constant */ |
174 |
> |
} |
175 |
> |
/* check direction */ |
176 |
> |
if (d == 0.0) |
177 |
|
return(0.0); |
167 |
– |
|
168 |
– |
if (source[sn].sflags & SDISTANT) |
169 |
– |
/* domega constant */ |
170 |
– |
return(source[sn].ss2); |
171 |
– |
|
178 |
|
/* check proximity */ |
179 |
|
if (source[sn].sflags & SPROX && |
180 |
|
d > source[sn].sl.prox) |