| 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 |
| 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 */ |
| 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; |
| 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 |
|
} |
| 453 |
|
) |
| 454 |
|
{ |
| 455 |
|
extern char VersionID[]; |
| 456 |
< |
int32 lastloc, nextloc; |
| 456 |
> |
off_t lastloc, nextloc; |
| 457 |
|
int n; |
| 458 |
|
int fd; |
| 459 |
|
FILE *fp; |
| 479 |
|
if (!n) |
| 480 |
|
break; |
| 481 |
|
nextloc = hdfilen(fd); /* write section pointer */ |
| 482 |
< |
if (lseek(fd, (off_t)lastloc, SEEK_SET) < 0) |
| 482 |
> |
if (lseek(fd, lastloc, SEEK_SET) < 0) |
| 483 |
|
error(SYSTEM, |
| 484 |
|
"cannot seek on holodeck file in creatholo"); |
| 485 |
|
write(fd, (char *)&nextloc, sizeof(nextloc)); |
| 486 |
< |
lseek(fd, (off_t)(lastloc=nextloc), SEEK_SET); |
| 486 |
> |
lseek(fd, (lastloc=nextloc), SEEK_SET); |
| 487 |
|
} |
| 488 |
|
} |
| 489 |
|
|
| 522 |
|
FILE *fp; |
| 523 |
|
int fd; |
| 524 |
|
int n; |
| 525 |
< |
int32 nextloc; |
| 525 |
> |
off_t nextloc; |
| 526 |
|
|
| 527 |
|
if ((ncprocs > 0) & (force >= 0)) |
| 528 |
|
fp = fopen(hdkfile, "r+"); |
| 534 |
|
error(SYSTEM, errmsg); |
| 535 |
|
} |
| 536 |
|
if (ncprocs > 0) { |
| 537 |
< |
sprintf(errmsg, |
| 538 |
< |
"\"%s\" opened read-only; new rays will be discarded", |
| 539 |
< |
hdkfile); |
| 537 |
> |
sprintf(errmsg, "\"%s\" is read-only", hdkfile); |
| 538 |
> |
if (outdev == NULL) |
| 539 |
> |
error(USER, errmsg); |
| 540 |
> |
strcat(errmsg, "; new rays will be discarded"); |
| 541 |
|
error(WARNING, errmsg); |
| 542 |
|
force = -1; |
| 543 |
|
} |
| 554 |
|
fd = dup(fileno(fp)); |
| 555 |
|
fclose(fp); /* done with stdio */ |
| 556 |
|
for (n = 0; nextloc > 0L; n++) { /* initialize each section */ |
| 557 |
< |
lseek(fd, (off_t)nextloc, SEEK_SET); |
| 557 |
> |
lseek(fd, nextloc, SEEK_SET); |
| 558 |
|
read(fd, (char *)&nextloc, sizeof(nextloc)); |
| 559 |
|
hdinit(fd, NULL); |
| 560 |
|
} |
| 662 |
|
if ((ncprocs > 0) & (force >= 0) && vdef(REPORT)) { |
| 663 |
|
off_t fsiz, fuse; |
| 664 |
|
fsiz = hdfilen(hdlist[0]->fd); |
| 665 |
< |
fuse = hdfiluse(hdlist[0]->fd, 1); |
| 665 |
> |
fuse = hdfiluse(hdlist[0]->fd); |
| 666 |
|
fprintf(stderr, |
| 667 |
|
"%s: %.1f Mbyte holodeck file, %.1f%% fragmentation\n", |
| 668 |
|
hdkfile, fsiz/(1024.*1024.), |