21 |
|
#define FRAGWARN 20 /* fragmentation for warning (%) */ |
22 |
|
#endif |
23 |
|
#ifndef MAXQTIME |
24 |
< |
#define MAXQTIME 5 /* target maximum seconds in queue */ |
24 |
> |
#define MAXQTIME 3 /* target maximum seconds in queue */ |
25 |
|
#endif |
26 |
|
/* manual cache flushing frequency */ |
27 |
|
#ifndef RTFLUSH |
55 |
|
off_t maxdisk; /* maximum file space (bytes) */ |
56 |
|
|
57 |
|
int rtargc = 1; /* rtrace command */ |
58 |
< |
char *rtargv[128] = {"rtrace", NULL}; |
58 |
> |
char *rtargv[MAXRTARGC] = {"rtrace", NULL}; |
59 |
|
|
60 |
|
int orig_mode = -1; /* original file mode (-1 if unchanged) */ |
61 |
|
|
90 |
|
{ |
91 |
|
int i; |
92 |
|
|
93 |
– |
initurand(16384); /* initialize urand */ |
93 |
|
progname = argv[0]; /* get arguments */ |
94 |
|
for (i = 1; i < argc && argv[i][0] == '-'; i++) |
95 |
|
switch (argv[i][1]) { |
164 |
|
quit(0); |
165 |
|
userr: |
166 |
|
fprintf(stderr, |
167 |
< |
"Usage: %s [-n nprocs][-o disp][-w][-r|-f] output.hdk [control.hif|+|- [VAR=val ..]]\n", |
167 |
> |
"Usage: %s [-n nprocs][-o disp][-i][-w][-r|-f] output.hdk [control.hif|+|- [VAR=val ..]]\n", |
168 |
|
progname); |
169 |
|
quit(1); |
170 |
|
return 1; /* pro forma return */ |
184 |
|
hdsync(NULL, 0); /* don't leave w/o saying goodbye */ |
185 |
|
_exit(signo); |
186 |
|
} |
187 |
< |
alarm(300); /* allow 5 minutes to clean up */ |
187 |
> |
alarm(300); /* allow 10 minutes to clean up */ |
188 |
|
eputs("signal - "); |
189 |
|
eputs(sigerr[signo]); |
190 |
|
eputs("\n"); |
230 |
|
initrholo(void) /* get our holodeck running */ |
231 |
|
{ |
232 |
|
extern int global_packet(); |
233 |
< |
register int i; |
233 |
> |
int i; |
234 |
|
/* close holodeck on exec() */ |
235 |
|
fcntl(hdlist[0]->fd, F_SETFD, FD_CLOEXEC); |
236 |
|
|
250 |
|
hdcachesize = 1024.*1024.*vflt(CACHE); |
251 |
|
/* open report file */ |
252 |
|
if (vdef(REPORT)) { |
253 |
< |
register char *s = sskip2(vval(REPORT), 1); |
253 |
> |
char *s = sskip2(vval(REPORT), 1); |
254 |
|
if (*s && freopen(s, "a", stderr) == NULL) |
255 |
|
quit(2); |
256 |
|
} |
319 |
|
static int |
320 |
|
rholo(void) /* holodeck main loop */ |
321 |
|
{ |
322 |
< |
static long nextfragwarn = 100*(1L<<20); |
322 |
> |
static off_t nextfragwarn = 100L<<20; |
323 |
|
static int idle = 0; |
324 |
|
PACKET *pl = NULL, *plend; |
325 |
|
off_t fsiz; |
326 |
|
int pksiz; |
327 |
< |
register PACKET *p; |
327 |
> |
PACKET *p; |
328 |
|
time_t t; |
329 |
|
/* check display */ |
330 |
|
if (nprocs <= 0) |
338 |
|
return(0); /* all done */ |
339 |
|
fsiz = hdfilen(hdlist[0]->fd); /* check file size */ |
340 |
|
if (maxdisk > 0 && fsiz >= maxdisk) { |
341 |
< |
error(WARNING, "file limit exceeded"); |
341 |
> |
error(USER, "file limit exceeded"); |
342 |
|
done_rtrace(); |
343 |
|
return(1); /* comes back */ |
344 |
|
} |
345 |
|
#if FRAGWARN |
346 |
< |
if (fsiz >= nextfragwarn && |
347 |
< |
(fsiz-hdfiluse(hdlist[0]->fd,0))/(fsiz/100) > FRAGWARN) { |
348 |
< |
sprintf(errmsg, "holodeck file fragmentation is %.0f%%", |
349 |
< |
100.*(fsiz-hdfiluse(hdlist[0]->fd,1))/fsiz); |
350 |
< |
error(WARNING, errmsg); |
351 |
< |
nextfragwarn = fsiz + (fsiz>>2); /* decent interval */ |
346 |
> |
if (fsiz >= nextfragwarn) { |
347 |
> |
double pctfrag = 100.*(fsiz-hdfiluse(hdlist[0]->fd))/fsiz; |
348 |
> |
if (pctfrag >= (double)FRAGWARN) { |
349 |
> |
sprintf(errmsg, "holodeck file fragmentation is %.0f%%", |
350 |
> |
pctfrag); |
351 |
> |
error(WARNING, errmsg); |
352 |
> |
nextfragwarn = fsiz + (fsiz>>2); |
353 |
> |
} else |
354 |
> |
nextfragwarn = fsiz + (10L<<20); |
355 |
|
} |
356 |
|
#endif |
357 |
|
t = time(NULL); /* check time */ |
358 |
|
if (endtime > 0 && t >= endtime) { |
359 |
< |
error(WARNING, "time limit exceeded"); |
359 |
> |
error(USER, "time limit exceeded"); |
360 |
|
done_rtrace(); |
361 |
|
return(1); /* comes back */ |
362 |
|
} |
391 |
|
|
392 |
|
static void |
393 |
|
setdefaults( /* set default values */ |
394 |
< |
register HDGRID *gp |
394 |
> |
HDGRID *gp |
395 |
|
) |
396 |
|
{ |
397 |
|
extern char *atos(); |
398 |
< |
register int i; |
398 |
> |
int i; |
399 |
|
int n; |
400 |
|
double len[3], d; |
401 |
|
|
415 |
|
} |
416 |
|
/* append rendering options */ |
417 |
|
if (vdef(RENDER)) |
418 |
< |
rtargc += wordstring(rtargv+rtargc, vval(RENDER)); |
418 |
> |
rtargc += wordstring(rtargv+rtargc, MAXRTARGC-rtargc, vval(RENDER)); |
419 |
|
|
420 |
|
if (gp == NULL) /* already initialized? */ |
421 |
|
return; |
453 |
|
) |
454 |
|
{ |
455 |
|
extern char VersionID[]; |
456 |
< |
int32 lastloc, nextloc; |
456 |
> |
off_t lastloc, nextloc; |
457 |
|
int n; |
458 |
|
int fd; |
459 |
|
FILE *fp; |
460 |
|
/* open & truncate file */ |
461 |
< |
if ((fp = fopen(hdkfile, "w+")) == NULL) { |
461 |
> |
if ((fp = fopen(hdkfile, "wb+")) == NULL) { |
462 |
|
sprintf(errmsg, "cannot open \"%s\" for writing", hdkfile); |
463 |
|
error(SYSTEM, errmsg); |
464 |
|
} |
466 |
|
newheader("RADIANCE", fp); |
467 |
|
fprintf(fp, "SOFTWARE= %s\n", VersionID); |
468 |
|
printvars(fp); |
469 |
+ |
fputendian(fp); |
470 |
|
fputformat(HOLOFMT, fp); |
471 |
|
fputc('\n', fp); |
472 |
|
putw(HOLOMAGIC, fp); /* put magic number */ |
480 |
|
if (!n) |
481 |
|
break; |
482 |
|
nextloc = hdfilen(fd); /* write section pointer */ |
483 |
< |
if (lseek(fd, (off_t)lastloc, SEEK_SET) < 0) |
483 |
> |
if (lseek(fd, lastloc, SEEK_SET) < 0) |
484 |
|
error(SYSTEM, |
485 |
|
"cannot seek on holodeck file in creatholo"); |
486 |
|
write(fd, (char *)&nextloc, sizeof(nextloc)); |
487 |
< |
lseek(fd, (off_t)(lastloc=nextloc), SEEK_SET); |
487 |
> |
lseek(fd, (lastloc=nextloc), SEEK_SET); |
488 |
|
} |
489 |
|
} |
490 |
|
|
496 |
|
) |
497 |
|
{ |
498 |
|
extern char FMTSTR[]; |
499 |
< |
register char *cp; |
500 |
< |
char fmt[32]; |
499 |
> |
char *cp; |
500 |
> |
char fmt[MAXFMTLEN]; |
501 |
|
|
502 |
|
if (formatval(fmt, s)) { |
503 |
|
if (strcmp(fmt, HOLOFMT)) { |
523 |
|
FILE *fp; |
524 |
|
int fd; |
525 |
|
int n; |
526 |
< |
int32 nextloc; |
526 |
> |
off_t nextloc; |
527 |
|
|
528 |
|
if ((ncprocs > 0) & (force >= 0)) |
529 |
< |
fp = fopen(hdkfile, "r+"); |
529 |
> |
fp = fopen(hdkfile, "rb+"); |
530 |
|
else |
531 |
|
fp = NULL; |
532 |
|
if (fp == NULL) { |
533 |
< |
if ((fp = fopen(hdkfile, "r")) == NULL) { |
533 |
> |
if ((fp = fopen(hdkfile, "rb")) == NULL) { |
534 |
|
sprintf(errmsg, "cannot open \"%s\"", hdkfile); |
535 |
|
error(SYSTEM, errmsg); |
536 |
|
} |
537 |
|
if (ncprocs > 0) { |
538 |
< |
sprintf(errmsg, |
539 |
< |
"\"%s\" opened read-only; new rays will be discarded", |
540 |
< |
hdkfile); |
538 |
> |
sprintf(errmsg, "\"%s\" is read-only", hdkfile); |
539 |
> |
if (outdev == NULL) |
540 |
> |
error(USER, errmsg); |
541 |
> |
strcat(errmsg, "; new rays will be discarded"); |
542 |
|
error(WARNING, errmsg); |
543 |
|
force = -1; |
544 |
|
} |
555 |
|
fd = dup(fileno(fp)); |
556 |
|
fclose(fp); /* done with stdio */ |
557 |
|
for (n = 0; nextloc > 0L; n++) { /* initialize each section */ |
558 |
< |
lseek(fd, (off_t)nextloc, SEEK_SET); |
558 |
> |
lseek(fd, nextloc, SEEK_SET); |
559 |
|
read(fd, (char *)&nextloc, sizeof(nextloc)); |
560 |
|
hdinit(fd, NULL); |
561 |
|
} |
567 |
|
} |
568 |
|
|
569 |
|
|
570 |
< |
extern void |
570 |
> |
void |
571 |
|
done_packets( /* handle finished packets */ |
572 |
|
PACKET *pl |
573 |
|
) |
574 |
|
{ |
575 |
|
static int n2flush = 0; |
576 |
< |
register PACKET *p; |
576 |
> |
PACKET *p; |
577 |
|
|
578 |
|
while (pl != NULL) { |
579 |
|
p = pl; pl = p->next; p->next = NULL; |
604 |
|
|
605 |
|
static void |
606 |
|
rootname( /* remove tail from end of fn */ |
607 |
< |
register char *rn, |
608 |
< |
register char *fn |
607 |
> |
char *rn, |
608 |
> |
char *fn |
609 |
|
) |
610 |
|
{ |
611 |
|
char *tp, *dp; |
632 |
|
|
633 |
|
|
634 |
|
void |
635 |
< |
eputs(s) /* put error message to stderr */ |
632 |
< |
register char *s; |
635 |
> |
eputs(const char *s) /* put error message to stderr */ |
636 |
|
{ |
637 |
|
static int midline = 0; |
638 |
|
|
651 |
|
|
652 |
|
|
653 |
|
void |
654 |
< |
quit(ec) /* exit program gracefully */ |
652 |
< |
int ec; |
654 |
> |
quit(int ec) /* exit program gracefully */ |
655 |
|
{ |
656 |
|
int status = 0; |
657 |
|
|
661 |
|
if ((ncprocs > 0) & (force >= 0) && vdef(REPORT)) { |
662 |
|
off_t fsiz, fuse; |
663 |
|
fsiz = hdfilen(hdlist[0]->fd); |
664 |
< |
fuse = hdfiluse(hdlist[0]->fd, 1); |
664 |
> |
fuse = hdfiluse(hdlist[0]->fd); |
665 |
|
fprintf(stderr, |
666 |
|
"%s: %.1f Mbyte holodeck file, %.1f%% fragmentation\n", |
667 |
|
hdkfile, fsiz/(1024.*1024.), |