9 |
|
* Created by Greg Ward on 2/2/2023. |
10 |
|
*/ |
11 |
|
|
12 |
+ |
#include <unistd.h> |
13 |
+ |
#include <ctype.h> |
14 |
|
#include "RtraceSimulManager.h" |
15 |
|
#include "source.h" |
16 |
|
|
15 |
– |
extern int castonly; // doing ray-casting only? |
16 |
– |
|
17 |
|
// Load octree and prepare renderer |
18 |
|
bool |
19 |
|
RadSimulManager::LoadOctree(const char *octn) |
21 |
|
if (octname) { // already running? |
22 |
|
if (octn && !strcmp(octn, octname)) |
23 |
|
return true; |
24 |
< |
Cleanup(false); |
24 |
> |
Cleanup(); |
25 |
|
} |
26 |
< |
if (!octn) |
26 |
> |
if (!octn) // don't support stdin octree |
27 |
|
return false; |
28 |
|
|
29 |
+ |
NewHeader(octn); // get octree header |
30 |
|
ray_init((char *)octn); |
31 |
|
return true; |
32 |
|
} |
33 |
|
|
34 |
< |
// How many processors are there? |
34 |
> |
// callback function for loading header |
35 |
> |
static int |
36 |
> |
add2header(char *str, void *p) |
37 |
> |
{ |
38 |
> |
if (isheadid(str)) |
39 |
> |
return 0; |
40 |
> |
if (isformat(str)) |
41 |
> |
return 0; |
42 |
> |
|
43 |
> |
return (*(RadSimulManager *)p).AddHeader(str); |
44 |
> |
} |
45 |
> |
|
46 |
> |
// Prepare header from previous input (or clear) |
47 |
> |
// Normally called during octree load |
48 |
> |
bool |
49 |
> |
RadSimulManager::NewHeader(const char *inspec) |
50 |
> |
{ |
51 |
> |
if (hlen) { |
52 |
> |
free(header); header = NULL; hlen = 0; |
53 |
> |
} |
54 |
> |
if (!inspec || !*inspec) |
55 |
> |
return false; |
56 |
> |
if (inspec[0] == '!') // save command as header? |
57 |
> |
return AddHeader(inspec+1); |
58 |
> |
// attempt to read from file |
59 |
> |
FILE *fp = fopen(inspec, "rb"); |
60 |
> |
if (!fp) return false; |
61 |
> |
bool ok = (getheader(fp, add2header, this) >= 0); |
62 |
> |
fclose(fp); |
63 |
> |
return ok; |
64 |
> |
} |
65 |
> |
|
66 |
> |
// Add a string to header (adds newline if missing) |
67 |
> |
bool |
68 |
> |
RadSimulManager::AddHeader(const char *str) |
69 |
> |
{ |
70 |
> |
if (!str) return false; |
71 |
> |
int len = strlen(str); |
72 |
> |
while (len && (str[len-1] == '\n') | (str[len-1] == '\r')) |
73 |
> |
--len; // don't copy EOL(s) |
74 |
> |
if (!len) |
75 |
> |
return false; |
76 |
> |
if (hlen) |
77 |
> |
header = (char *)realloc(header, hlen+len+2); |
78 |
> |
else |
79 |
> |
header = (char *)malloc(len+2); |
80 |
> |
if (!header) { |
81 |
> |
hlen = 0; // XXX should report? |
82 |
> |
return false; |
83 |
> |
} |
84 |
> |
memcpy(header+hlen, str, len); |
85 |
> |
hlen += len; |
86 |
> |
header[hlen++] = '\n'; // add single EOL |
87 |
> |
header[hlen] = '\0'; |
88 |
> |
return true; |
89 |
> |
} |
90 |
> |
|
91 |
> |
// helper function to check for white-space and quotations |
92 |
> |
static int |
93 |
> |
check_special(const char *s) |
94 |
> |
{ |
95 |
> |
int space_found = 0; |
96 |
> |
|
97 |
> |
while (*s) { |
98 |
> |
if ((*s == '"') | (*s == '\'')) |
99 |
> |
return *s; // quotes have priority |
100 |
> |
if (isspace(*s)) |
101 |
> |
space_found = *s; |
102 |
> |
s++; |
103 |
> |
} |
104 |
> |
return space_found; |
105 |
> |
} |
106 |
> |
|
107 |
> |
// Append program line to header |
108 |
> |
bool |
109 |
> |
RadSimulManager::AddHeader(int ac, char *av[]) |
110 |
> |
{ |
111 |
> |
if ((ac <= 0) | !av) return false; |
112 |
> |
int len = 0; |
113 |
> |
int n; |
114 |
> |
for (n = 0; n < ac; n++) { |
115 |
> |
if (!av[n]) return false; |
116 |
> |
len += strlen(av[n]) + 3; |
117 |
> |
} |
118 |
> |
if (hlen) // add to header |
119 |
> |
header = (char *)realloc(header, hlen+len+1); |
120 |
> |
else |
121 |
> |
header = (char *)malloc(len+1); |
122 |
> |
|
123 |
> |
for (n = 0; n < ac; n++) { |
124 |
> |
int c = check_special(av[n]); |
125 |
> |
len = strlen(av[n]); |
126 |
> |
if (c | !len) { // need to quote argument? |
127 |
> |
if ((c == '"') | (c == '\n')) c = '\''; |
128 |
> |
else c = '"'; |
129 |
> |
header[hlen++] = c; |
130 |
> |
strcpy(header+hlen, av[n]); |
131 |
> |
hlen += len; |
132 |
> |
header[hlen++] = c; |
133 |
> |
} else { |
134 |
> |
strcpy(header+hlen, av[n]); |
135 |
> |
hlen += len; |
136 |
> |
} |
137 |
> |
header[hlen++] = ' '; |
138 |
> |
} |
139 |
> |
header[hlen-1] = '\n'; // terminate line |
140 |
> |
header[hlen] = '\0'; |
141 |
> |
return true; |
142 |
> |
} |
143 |
> |
|
144 |
> |
// How many processors are available? |
145 |
|
int |
146 |
|
RadSimulManager::GetNCores() |
147 |
|
{ |
148 |
< |
return 1; // XXX temporary |
148 |
> |
return sysconf(_SC_NPROCESSORS_ONLN); |
149 |
|
} |
150 |
|
|
151 |
|
// Set number of computation threads (0 => #cores) |
152 |
|
int |
153 |
|
RadSimulManager::SetThreadCount(int nt) |
154 |
|
{ |
155 |
< |
return nThreads = 1; // XXX temporary |
155 |
> |
if (!Ready()) |
156 |
> |
return 0; |
157 |
> |
|
158 |
> |
if (nt <= 0) nt = castonly ? 1 : GetNCores(); |
159 |
> |
|
160 |
> |
if (nt == 1) |
161 |
> |
ray_pclose(ray_pnprocs); |
162 |
> |
else if (nt < ray_pnprocs) |
163 |
> |
ray_pclose(ray_pnprocs - nt); |
164 |
> |
else if (nt > ray_pnprocs) |
165 |
> |
ray_popen(nt - ray_pnprocs); |
166 |
> |
|
167 |
> |
return NThreads(); |
168 |
|
} |
169 |
|
|
170 |
+ |
// Assign ray to subthread (fails if NThreads()<2) |
171 |
+ |
bool |
172 |
+ |
RadSimulManager::SplitRay(RAY *r) |
173 |
+ |
{ |
174 |
+ |
if (!ray_pnprocs || ThreadsAvailable() < 1) |
175 |
+ |
return false; |
176 |
+ |
|
177 |
+ |
return (ray_psend(r) > 0); |
178 |
+ |
} |
179 |
+ |
|
180 |
+ |
// Process a ray (in subthread), optional result |
181 |
+ |
bool |
182 |
+ |
RadSimulManager::ProcessRay(RAY *r) |
183 |
+ |
{ |
184 |
+ |
if (!Ready()) return false; |
185 |
+ |
|
186 |
+ |
if (!ray_pnprocs) { // single-threaded mode? |
187 |
+ |
samplendx++; |
188 |
+ |
rayvalue(r); |
189 |
+ |
return true; |
190 |
+ |
} |
191 |
+ |
int rv = ray_pqueue(r); |
192 |
+ |
if (rv < 0) { |
193 |
+ |
error(WARNING, "ray tracing process(es) died"); |
194 |
+ |
return false; |
195 |
+ |
} |
196 |
+ |
return (rv > 0); |
197 |
+ |
} |
198 |
+ |
|
199 |
+ |
// Wait for next result (or fail) |
200 |
+ |
bool |
201 |
+ |
RadSimulManager::WaitResult(RAY *r) |
202 |
+ |
{ |
203 |
+ |
if (!ray_pnprocs) |
204 |
+ |
return false; |
205 |
+ |
|
206 |
+ |
return (ray_presult(r, 0) > 0); |
207 |
+ |
} |
208 |
+ |
|
209 |
|
// Close octree, free data, return status |
210 |
|
int |
211 |
|
RadSimulManager::Cleanup(bool everything) |
212 |
|
{ |
213 |
< |
ray_done(everything); |
213 |
> |
NewHeader(); |
214 |
> |
if (!ray_pnprocs) |
215 |
> |
ray_done(everything); |
216 |
> |
else |
217 |
> |
ray_pdone(everything); |
218 |
|
return 0; |
219 |
|
} |
220 |
|
|
222 |
|
int |
223 |
|
RadSimulManager::ThreadsAvailable() const |
224 |
|
{ |
225 |
< |
return 1; // XXX temporary |
225 |
> |
if (!ray_pnprocs) return 1; |
226 |
> |
|
227 |
> |
return ray_pnidle; |
228 |
|
} |
229 |
|
|
230 |
|
// Global pointer to simulation manager for trace call-back (only one) |
231 |
|
static const RtraceSimulManager * ourRTsimMan = NULL; |
232 |
|
|
233 |
< |
void // static call-back |
233 |
> |
// Call-back for trace output |
234 |
> |
void |
235 |
|
RtraceSimulManager::RTracer(RAY *r) |
236 |
|
{ |
237 |
|
(*ourRTsimMan->traceCall)(r, ourRTsimMan->tcData); |
238 |
|
} |
239 |
|
|
240 |
+ |
// Call-back for FIFO output |
241 |
+ |
int |
242 |
+ |
RtraceSimulManager::Rfifout(RAY *r) |
243 |
+ |
{ |
244 |
+ |
return (*ourRTsimMan->cookedCall)(r, ourRTsimMan->ccData); |
245 |
+ |
} |
246 |
+ |
|
247 |
|
// Check for changes to render flags & adjust accordingly |
248 |
|
bool |
249 |
|
RtraceSimulManager::UpdateMode() |
265 |
|
} else // cannot undo this... |
266 |
|
rtFlags |= RTtraceSources; |
267 |
|
} |
268 |
< |
if (misMatch & RTdoFIFO) { |
269 |
< |
if (!FlushQueue()) |
94 |
< |
return false; |
95 |
< |
} |
268 |
> |
if (misMatch & RTdoFIFO && FlushQueue() < 0) |
269 |
> |
return false; |
270 |
|
curFlags = rtFlags; |
271 |
< |
// update trace callback |
272 |
< |
if (traceCall) { |
99 |
< |
if (ourRTsimMan && ourRTsimMan != this) |
100 |
< |
error(WARNING, "Competing top-level simulation managers?"); |
101 |
< |
ourRTsimMan = this; |
271 |
> |
// update callbacks |
272 |
> |
if (traceCall) |
273 |
|
trace = RTracer; |
274 |
< |
} else if (ourRTsimMan == this) { |
274 |
> |
else if (trace == RTracer) |
275 |
|
trace = NULL; |
276 |
+ |
if (rtFlags & RTdoFIFO) |
277 |
+ |
ray_fifo_out = Rfifout; |
278 |
+ |
else if (ray_fifo_out == Rfifout) |
279 |
+ |
ray_fifo_out = NULL; |
280 |
+ |
if ((trace != RTracer) & (ray_fifo_out != Rfifout)) { |
281 |
|
ourRTsimMan = NULL; |
282 |
+ |
} else if (ourRTsimMan != this) { |
283 |
+ |
if (ourRTsimMan) |
284 |
+ |
error(WARNING, "Competing top-level simulation managers?"); |
285 |
+ |
ourRTsimMan = this; |
286 |
|
} |
287 |
|
return true; |
288 |
|
} |
289 |
|
|
290 |
|
extern "C" int m_normal(OBJREC *m, RAY *r); |
291 |
|
|
292 |
< |
/* compute irradiance rather than radiance */ |
292 |
> |
// compute irradiance rather than radiance |
293 |
|
static void |
294 |
|
rayirrad(RAY *r) |
295 |
|
{ |
306 |
|
r->revf = rayirrad; |
307 |
|
} |
308 |
|
|
309 |
< |
/* compute first ray intersection only */ |
309 |
> |
// compute first ray intersection only |
310 |
|
static void |
311 |
|
raycast(RAY *r) |
312 |
|
{ |
330 |
|
return -1; |
331 |
|
|
332 |
|
if (castonly && !cookedCall) |
333 |
< |
error(CONSISTENCY, "EnqueueBundle() called in castonly mode without cookedCall"); |
333 |
> |
error(INTERNAL, "EnqueueBundle() called in castonly mode without cookedCall"); |
334 |
|
|
335 |
|
if (!UpdateMode()) // update rendering mode if requested |
336 |
|
return -1; |
337 |
|
|
338 |
+ |
if (rID0 && curFlags&RTdoFIFO) |
339 |
+ |
error(INTERNAL, "Ray number assignment unsupported with FIFO"); |
340 |
+ |
|
341 |
|
while (n-- > 0) { // queue each ray |
159 |
– |
double d; |
342 |
|
VCOPY(res.rorg, orig_direc[0]); |
343 |
|
VCOPY(res.rdir, orig_direc[1]); |
344 |
|
orig_direc += 2; |
345 |
|
rayorigin(&res, PRIMARY, NULL, NULL); |
346 |
< |
if (rID0) res.rno = rID0++; |
165 |
< |
else res.rno = ++lastRayID; |
346 |
> |
res.rno = rID0 ? (lastRayID = rID0++) : ++lastRayID; |
347 |
|
if (curFlags & RTimmIrrad) |
348 |
|
res.revf = rayirrad; |
349 |
|
else if (castonly) |
350 |
|
res.revf = raycast; |
351 |
< |
d = normalize(res.rdir); |
352 |
< |
if (d > 0) { // direction vector is valid? |
351 |
> |
double d = normalize(res.rdir); |
352 |
> |
bool sendRes = (cookedCall != NULL); |
353 |
> |
if (d > .0) { // direction vector is valid? |
354 |
|
if (curFlags & RTlimDist) |
355 |
|
res.rmax = d; |
356 |
< |
samplendx++; |
357 |
< |
rayvalue(&res); // XXX single-threaded for now |
356 |
> |
if (((curFlags&RTdoFIFO) != 0) & (ray_pnprocs > 0)) { |
357 |
> |
if (ray_fifo_in(&res) < 0) |
358 |
> |
return -1; |
359 |
> |
sendRes = false; |
360 |
> |
} else |
361 |
> |
sendRes &= ProcessRay(&res); |
362 |
|
} else if (ThreadsAvailable() < NThreads() && |
363 |
< |
!FlushQueue()) |
363 |
> |
FlushQueue() < 0) |
364 |
|
return -1; |
365 |
< |
if (cookedCall) |
366 |
< |
(*cookedCall)(&res, ccData); |
365 |
> |
// may be dummy ray |
366 |
> |
if (sendRes && (*cookedCall)(&res, ccData) < 0) |
367 |
> |
return -1; |
368 |
|
nqueued++; |
369 |
|
} |
370 |
|
return nqueued; |
371 |
|
} |
372 |
|
|
373 |
|
// Finish pending rays and complete callbacks |
374 |
< |
bool |
374 |
> |
int |
375 |
|
RtraceSimulManager::FlushQueue() |
376 |
|
{ |
377 |
< |
return true; // XXX no-op for now |
377 |
> |
if (curFlags & RTdoFIFO) { |
378 |
> |
if (ray_pnprocs) |
379 |
> |
return ray_fifo_flush(); |
380 |
> |
return 0; |
381 |
> |
} |
382 |
> |
int nsent = 0; |
383 |
> |
RAY res; |
384 |
> |
|
385 |
> |
while (WaitResult(&res)) { |
386 |
> |
if (!cookedCall) continue; |
387 |
> |
int rv = (*cookedCall)(&res, ccData); |
388 |
> |
if (rv < 0) return -1; |
389 |
> |
nsent += rv; |
390 |
> |
} |
391 |
> |
return nsent; |
392 |
|
} |