ViewVC Help
View File | Revision Log | Show Annotations | Download File | Root Listing
root/radiance/ray/src/rt/rxcmain.cpp
Revision: 2.15
Committed: Thu Jan 2 20:19:48 2025 UTC (3 months, 4 weeks ago) by greg
Branch: MAIN
Changes since 2.14: +2 -3 lines
Log Message:
perf(rxpiece,rxcontrib): Don't bother to free data structs on exit

File Contents

# Content
1 #ifndef lint
2 static const char RCSid[] = "$Id: rxcmain.cpp,v 2.14 2025/01/02 16:16:49 greg Exp $";
3 #endif
4 /*
5 * rxcmain.c - main for rxcontrib ray contribution tracer
6 */
7
8 #include "copyright.h"
9
10 #include <signal.h>
11 #include <time.h>
12 #include <ctype.h>
13 #include "RcontribSimulManager.h"
14 #include "platform.h"
15 #include "func.h"
16
17 const char *sigerr[NSIG]; /* signal error messages */
18
19 int nproc = 1; /* number of processes requested */
20
21 int inpfmt = 'a'; /* input format */
22 int outfmt = 'f'; /* output format */
23
24 int report_intvl = 0; /* reporting interval (seconds) */
25
26 extern char * progname; // global argv[0]
27
28 RcontribSimulManager myRCmanager; // global rcontrib simulation manager
29
30 #define RCONTRIB_FEATURES "Multiprocessing\n" \
31 "Accumulation\nRecovery\n" \
32 "ImmediateIrradiance\n" \
33 "ProgressReporting\nDistanceLimiting\n" \
34 "InputFormats=a,f,d\nOutputFormats=f,d,c\n" \
35 "Outputs=V,W\n" \
36 "OutputCS=RGB,spec\n"
37
38 static void rxcontrib(const int rstart = 0);
39
40 static void
41 printdefaults(void) /* print default values to stdout */
42 {
43 printf("-c %-5d\t\t\t# accumulated rays per record\n", myRCmanager.accum);
44 printf(myRCmanager.HasFlag(RCcontrib) ?
45 "-V+\t\t\t\t# output contributions\n" :
46 "-V-\t\t\t\t# output coefficients\n");
47 if (myRCmanager.HasFlag(RTimmIrrad))
48 printf("-I+\t\t\t\t# immediate irradiance on\n");
49 printf("-n %-2d\t\t\t\t# number of rendering processes\n", nproc);
50 printf("-x %-9d\t\t\t# x resolution\n", myRCmanager.xres);
51 printf("-y %-9d\t\t\t# y resolution\n", myRCmanager.yres);
52 printf(myRCmanager.HasFlag(RTlimDist) ?
53 "-ld+\t\t\t\t# limit distance on\n" :
54 "-ld-\t\t\t\t# limit distance off\n");
55 printf("-f%c%c\t\t\t\t# format input/output = %s/%s\n",
56 inpfmt, outfmt, formstr(inpfmt), formstr(outfmt));
57 if (report_intvl > 0)
58 printf("-t %-9d\t\t\t# time between reports\n", report_intvl);
59 printf(erract[WARNING].pf != NULL ?
60 "-w+\t\t\t\t# warning messages on\n" :
61 "-w-\t\t\t\t# warning messages off\n");
62 print_rdefaults();
63 }
64
65
66 static void
67 onsig( /* fatal signal */
68 int signo
69 )
70 {
71 static int gotsig = 0;
72
73 if (gotsig++) /* two signals and we're gone! */
74 _exit(signo);
75
76 #ifdef SIGALRM
77 alarm(600); /* allow 10 minutes to clean up */
78 signal(SIGALRM, SIG_DFL); /* make certain we do die */
79 #endif
80 eputs("signal - ");
81 eputs(sigerr[signo]);
82 eputs("\n");
83 quit(3);
84 }
85
86
87 static void
88 sigdie( /* set fatal signal */
89 int signo,
90 const char *msg
91 )
92 {
93 if (signal(signo, onsig) == SIG_IGN)
94 signal(signo, SIG_IGN);
95 sigerr[signo] = msg;
96 }
97
98 /* set input/output format */
99 static void
100 setformat(const char *fmt)
101 {
102 switch (fmt[0]) {
103 case 'f':
104 case 'd':
105 SET_FILE_BINARY(stdin);
106 /* fall through */
107 case 'a':
108 inpfmt = fmt[0];
109 break;
110 default:
111 goto fmterr;
112 }
113 switch (fmt[1]) {
114 case '\0':
115 if (inpfmt == 'a')
116 goto fmterr;
117 outfmt = inpfmt;
118 return;
119 case 'f':
120 case 'd':
121 case 'c':
122 outfmt = fmt[1];
123 break;
124 default:
125 goto fmterr;
126 }
127 if (!fmt[2])
128 return;
129 fmterr:
130 sprintf(errmsg, "Unsupported i/o format: -f%s", fmt);
131 error(USER, errmsg);
132 }
133
134 /* Set default options */
135 static void
136 default_options(void)
137 {
138 rand_samp = 1;
139 dstrsrc = 0.9;
140 directrelay = 3;
141 vspretest = 512;
142 srcsizerat = .2;
143 specthresh = .02;
144 specjitter = 1.;
145 maxdepth = -10;
146 minweight = 2e-3;
147 ambres = 256;
148 ambdiv = 350;
149 ambounce = 1;
150 }
151
152 /* Set overriding options */
153 static void
154 override_options(void)
155 {
156 shadthresh = 0;
157 ambssamp = 0;
158 ambacc = 0;
159 }
160
161 int
162 main(int argc, char *argv[])
163 {
164 #define check(ol,al) if (argv[i][ol] || \
165 badarg(argc-i-1,argv+i+1,al)) \
166 goto badopt
167 #define check_bool(olen,var) switch (argv[i][olen]) { \
168 case '\0': var = !var; break; \
169 case 'y': case 'Y': case 't': case 'T': \
170 case '+': case '1': var = 1; break; \
171 case 'n': case 'N': case 'f': case 'F': \
172 case '-': case '0': var = 0; break; \
173 default: goto badopt; }
174 int force_open = 0;
175 int recover = 0;
176 char *curout = NULL;
177 char *prms = NULL;
178 char *binval = NULL;
179 int bincnt = 0;
180 int rval;
181 int i;
182 /* global program name */
183 progname = argv[0];
184 /* feature check only? */
185 strcat(RFeatureList, RCONTRIB_FEATURES);
186 if (argc > 1 && !strcmp(argv[1], "-features"))
187 return feature_status(argc-2, argv+2);
188 /* initialize calcomp routines early */
189 initfunc();
190 calcontext(RCCONTEXT);
191 /* set rcontrib defaults */
192 default_options();
193 /* option city */
194 for (i = 1; i < argc; i++) {
195 /* expand arguments */
196 while ((rval = expandarg(&argc, &argv, i)) > 0)
197 ;
198 if (rval < 0) {
199 sprintf(errmsg, "cannot expand '%s'", argv[i]);
200 error(SYSTEM, errmsg);
201 }
202 if (argv[i] == NULL || argv[i][0] != '-')
203 break; /* break from options */
204 if (!strcmp(argv[i], "-version")) {
205 puts(VersionID);
206 quit(0);
207 }
208 if (!strcmp(argv[i], "-defaults") ||
209 !strcmp(argv[i], "-help")) {
210 override_options();
211 printdefaults();
212 quit(0);
213 }
214 rval = getrenderopt(argc-i, argv+i);
215 if (rval >= 0) {
216 i += rval;
217 continue;
218 }
219 switch (argv[i][1]) {
220 case 'n': /* number of processes */
221 check(2,"i");
222 nproc = atoi(argv[++i]);
223 if (nproc < 0 && (nproc += RadSimulManager::GetNCores()) <= 0)
224 nproc = 1;
225 break;
226 case 'V': /* output contributions? */
227 rval = myRCmanager.HasFlag(RCcontrib);
228 check_bool(2,rval);
229 myRCmanager.SetFlag(RCcontrib, rval);
230 break;
231 case 'x': /* x resolution */
232 check(2,"i");
233 myRCmanager.xres = atoi(argv[++i]);
234 break;
235 case 'y': /* y resolution */
236 check(2,"i");
237 myRCmanager.yres = atoi(argv[++i]);
238 break;
239 case 'w': /* warnings on/off */
240 rval = (erract[WARNING].pf != NULL);
241 check_bool(2,rval);
242 if (rval) erract[WARNING].pf = wputs;
243 else erract[WARNING].pf = NULL;
244 break;
245 case 'e': /* .cal expression */
246 check(2,"s");
247 scompile(argv[++i], NULL, 0);
248 break;
249 case 'l': /* limit distance */
250 if (argv[i][2] != 'd')
251 goto badopt;
252 rval = myRCmanager.HasFlag(RTlimDist);
253 check_bool(3,rval);
254 myRCmanager.SetFlag(RTlimDist, rval);
255 break;
256 case 'I': /* immed. irradiance */
257 rval = myRCmanager.HasFlag(RTimmIrrad);
258 check_bool(2,rval);
259 myRCmanager.SetFlag(RTimmIrrad, rval);
260 break;
261 case 'f': /* .cal file or force or format */
262 if (!argv[i][2]) {
263 check(2,"s");
264 loadfunc(argv[++i]);
265 break;
266 }
267 if (argv[i][2] == 'o') {
268 check_bool(3,force_open);
269 break;
270 }
271 setformat(argv[i]+2);
272 myRCmanager.SetDataFormat(outfmt);
273 break;
274 case 'o': /* output file */
275 check(2,"s");
276 curout = argv[++i];
277 break;
278 case 'r': /* recover output */
279 check_bool(2,recover);
280 break;
281 case 'p': /* parameter setting(s) */
282 check(2,"s");
283 set_eparams(prms = argv[++i]);
284 break;
285 case 'c': /* sample count */
286 check(2,"i");
287 myRCmanager.accum = atoi(argv[++i]);
288 break;
289 case 'b': /* bin expression/count */
290 if (argv[i][2] == 'n') {
291 check(3,"s");
292 bincnt = (int)(eval(argv[++i]) + .5);
293 break;
294 }
295 check(2,"s");
296 binval = argv[++i];
297 break;
298 case 'm': /* modifier name */
299 check(2,"s");
300 myRCmanager.AddModifier(argv[++i], curout, prms, binval, bincnt);
301 break;
302 case 'M': /* file of modifier names */
303 check(2,"s");
304 myRCmanager.AddModFile(argv[++i], curout, prms, binval, bincnt);
305 break;
306 case 't': /* reporting interval */
307 check(2,"i");
308 report_intvl = atoi(argv[++i]);
309 break;
310 default:
311 goto badopt;
312 }
313 }
314 if (i != argc-1)
315 error(USER, "expected single octree argument");
316
317 override_options(); /* override some option settings */
318
319 if (!myRCmanager.GetOutput()) // check that we have work to do
320 error(USER, "missing required modifier argument");
321 // get ready to rock...
322 if (setspectrsamp(CNDX, WLPART) < 0)
323 error(USER, "unsupported spectral sampling");
324 /* set up signal handling */
325 sigdie(SIGINT, "Interrupt");
326 #ifdef SIGHUP
327 sigdie(SIGHUP, "Hangup");
328 #endif
329 sigdie(SIGTERM, "Terminate");
330 #ifdef SIGPIPE
331 sigdie(SIGPIPE, "Broken pipe");
332 #endif
333 #ifdef SIGALRM
334 sigdie(SIGALRM, "Alarm clock");
335 #endif
336 #ifdef SIGXCPU
337 sigdie(SIGXCPU, "CPU limit exceeded");
338 sigdie(SIGXFSZ, "File size exceeded");
339 #endif
340 #ifdef NICE
341 nice(NICE); /* lower priority */
342 #endif
343 // load octree
344 myRCmanager.LoadOctree(argv[argc-1]);
345 // add to header
346 myRCmanager.AddHeader(argc-1, argv);
347 // prepare output files
348 if (recover)
349 myRCmanager.outOp = RCOrecover;
350 else if (force_open)
351 myRCmanager.outOp = RCOforce;
352 else
353 myRCmanager.outOp = RCOnew;
354 // rval = # rows recovered
355 rval = myRCmanager.PrepOutput();
356 // check if recovered everything
357 if (rval >= myRCmanager.GetRowMax()) {
358 error(WARNING, "nothing left to compute");
359 quit(0);
360 }
361 rxcontrib(rval); /* trace ray contributions (loop) */
362
363 quit(0); /* exit clean */
364
365 badopt:
366 fprintf(stderr,
367 "Usage: %s [-V][-c count][-r][-e expr][-f source][-o ospec][-p p1=V1,p2=V2][-b binv][-bn N] {-m mod | -M file} [rtrace options] octree\n",
368 progname);
369 sprintf(errmsg, "command line error at '%s'", argv[i]);
370 error(USER, errmsg);
371 return(1); /* pro forma return */
372
373 #undef check
374 #undef check_bool
375 }
376
377
378 // skip specified number of bytes, return false if EOF
379 static bool
380 skipBytes(int n2skip)
381 {
382 while (n2skip-- > 0)
383 if (getchar() == EOF)
384 return false;
385 return true;
386 }
387
388
389 // skip specified number of whitespace-separated words, return false if EOF
390 static bool
391 skipWords(int n2skip)
392 {
393 int c;
394
395 while (n2skip-- > 0) {
396 do {
397 c = getchar();
398 } while (isspace(c));
399 do {
400 if (c == EOF) return false;
401 c = getchar();
402 } while (!isspace(c));
403 }
404 return true;
405 }
406
407
408 // read a bundle of myRCmanager.accum ray origins and directions
409 static bool
410 getRayBundle(FVECT *orig_dir = NULL)
411 {
412 int n2go = myRCmanager.accum;
413
414 switch (inpfmt) {
415 case 'a': // ASCII input
416 if (!orig_dir)
417 return skipWords(6*n2go);
418 while (n2go-- > 0) {
419 if (scanf(FVFORMAT, &orig_dir[0][0],
420 &orig_dir[0][1], &orig_dir[0][2]) != 3)
421 return false;
422 if (scanf(FVFORMAT, &orig_dir[1][0],
423 &orig_dir[1][1], &orig_dir[1][2]) != 3)
424 return false;
425 orig_dir += 2;
426 }
427 break;
428 case 'f': // float input
429 if (!orig_dir)
430 return skipBytes(6*sizeof(float)*n2go);
431 #ifdef SMLFLT
432 if (getbinary(orig_dir, sizeof(FVECT), 2*n2go, stdin) != 2*n2go)
433 return false;
434 orig_dir += 2*n2go;
435 #else
436 while (n2go-- > 0) {
437 float fvecs[6];
438 if (getbinary(fvecs, sizeof(fvecs), 1, stdin) != 1)
439 return false;
440 for (int i = 6; i--; )
441 orig_dir[0][i] = fvecs[i];
442 orig_dir += 2;
443 }
444 #endif
445 break;
446 case 'd': // double input
447 if (!orig_dir)
448 return skipBytes(6*sizeof(double)*n2go);
449 #ifndef SMLFLT
450 if (getbinary(orig_dir, sizeof(FVECT), 2*n2go, stdin) != 2*n2go)
451 return false;
452 orig_dir += 2*n2go;
453 #else
454 while (n2go-- > 0) {
455 double dvecs[6];
456 if (getbinary(dvecs, sizeof(dvecs), 1, stdin) != 1)
457 return false;
458 for (int i = 6; i--; )
459 orig_dir[0][i] = dvecs[i];
460 orig_dir += 2;
461 }
462 #endif
463 break;
464 default:
465 error(INTERNAL, "unsupported format in getRayBundle()");
466 return false;
467 }
468 n2go = myRCmanager.accum; // normalize directions
469 while (n2go-- > 0) {
470 orig_dir -= 2;
471 normalize(orig_dir[1]);
472 }
473 return true;
474 }
475
476
477 // Run loop to load data, report progress, etc.
478 void
479 rxcontrib(const int rstart)
480 {
481 const int totRows = myRCmanager.GetRowMax();
482 FVECT * odarr = (FVECT *)emalloc(sizeof(FVECT)*2*myRCmanager.accum);
483 time_t tstart, last_report;
484 int r = 0;
485
486 while (r < rstart) { // skip input rays already done
487 if (!getRayBundle())
488 goto readerr;
489 r++;
490 }
491 if (report_intvl > 0) { // set up reporting
492 if (r > 0) {
493 sprintf(errmsg, "recovered %.2f%% of total\n",
494 100.*r/totRows);
495 eputs(errmsg);
496 }
497 last_report = tstart = time(0);
498 }
499 // start children as requested
500 myRCmanager.SetThreadCount(nproc);
501
502 while (r < totRows) { // loop until done
503 time_t tnow;
504 if (!getRayBundle(odarr))
505 goto readerr;
506 if (myRCmanager.ComputeRecord(odarr) <= 0)
507 return; // error reported, hopefully...
508 r++;
509 if (report_intvl <= 0)
510 continue;
511 if (r == totRows) // need to finish up?
512 myRCmanager.SetThreadCount(1);
513 tnow = time(0);
514 if ((r < totRows) & (tnow < last_report+report_intvl))
515 continue;
516 sprintf(errmsg, "%.2f%% done after %.3f hours\n",
517 100.*myRCmanager.GetRowFinished()/totRows,
518 (1./3600.)*(tnow - tstart));
519 eputs(errmsg);
520 last_report = tnow;
521 }
522 efree(odarr);
523 return;
524 readerr:
525 sprintf(errmsg, "unexpected EOF on standard input (record %d of %d)",
526 r, totRows);
527 error(USER, errmsg);
528 }
529
530
531 void
532 wputs( /* warning output function */
533 const char *s
534 )
535 {
536 if (!erract[WARNING].pf) return;
537 int lasterrno = errno;
538 eputs(s);
539 errno = lasterrno;
540 }
541
542
543 void
544 eputs( /* put string to stderr */
545 const char *s
546 )
547 {
548 static int midline = 0;
549
550 if (!*s)
551 return;
552 if (!midline++) {
553 fputs(progname, stderr);
554 fputs(": ", stderr);
555 }
556 fputs(s, stderr);
557 if (s[strlen(s)-1] == '\n') {
558 fflush(stderr);
559 midline = 0;
560 }
561 }
562
563
564 /* Exit program */
565 void
566 quit(
567 int code
568 )
569 {
570 myRCmanager.FlushQueue(); // leave nothing in queue
571
572 exit(code);
573 }