ViewVC Help
View File | Revision Log | Show Annotations | Download File | Root Listing
root/radiance/ray/src/hd/rholo.c
(Generate patch)

Comparing ray/src/hd/rholo.c (file contents):
Revision 3.2 by gregl, Fri Oct 31 11:44:09 1997 UTC vs.
Revision 3.8 by gregl, Mon Nov 10 18:05:24 1997 UTC

# Line 33 | Line 33 | time_t starttime;              /* time we got started */
33   time_t  endtime;                /* time we should end by */
34   time_t  reporttime;             /* time for next report */
35  
36 + long    maxdisk;                /* maximum file space (bytes) */
37 +
38   int     rtargc = 1;             /* rtrace command */
39   char    *rtargv[128] = {"rtrace", NULL};
40  
# Line 51 | Line 53 | char   *argv[];
53          HDGRID  hdg;
54          int     i;
55          int     force = 0;
56 <
56 >                                                /* mark start time */
57 >        starttime = time(NULL);
58          progname = argv[0];                     /* get arguments */
59          for (i = 1; i < argc && argv[i][0] == '-'; i++)
60                  switch (argv[i][1]) {
# Line 102 | Line 105 | char   *argv[];
105                                  "holodeck file exists -- use -f to overwrite");
106                                                          /* create holodeck */
107                  creatholo(&hdg);
108 <        } else                                  /* else load holodeck */
108 >        } else {                                /* else load holodeck */
109                  loadholo();
110 +                if (vdef(RIF))                          /* load RIF if any */
111 +                        getradfile(vval(RIF));
112 +        }
113                                                  /* initialize */
114          initrholo();
115                                                  /* run */
# Line 123 | Line 129 | initrholo()                    /* get our holodeck running */
129   {
130          extern int      global_packet();
131          register int    i;
132 <                                                /* check output device */
133 <        if (outdev != NULL)
134 <                open_display(outdev);
132 >
133 >        if (outdev != NULL)                     /* open output device */
134 >                disp_open(outdev);
135          else if (ncprocs > 0)                   /* else use global ray feed */
136                  init_global();
137 <                                                /* record the time */
138 <        starttime = time(NULL);
137 >                                                /* record disk space limit */
138 >        if (!vdef(DISKSPACE))
139 >                maxdisk = 0;
140 >        else
141 >                maxdisk = 1024.*1024.*vflt(DISKSPACE));
142 >                                                /* record end time */
143          if (!vdef(TIME) || vflt(TIME) <= FTINY)
144                  endtime = 0;
145          else
146                  endtime = starttime + vflt(TIME)*3600.;
147                                                  /* set up memory cache */
148 <        hdcachesize = 1024.*1024.*vflt(CACHE);
148 >        if (outdev == NULL)
149 >                hdcachesize = 0;        /* manual flushing */
150 >        else if (vdef(CACHE))
151 >                hdcachesize = 1024.*1024.*vflt(CACHE);
152                                                  /* open report file */
153          if (vdef(REPORT)) {
154                  register char   *s = sskip2(vval(REPORT), 1);
# Line 184 | Line 197 | rholo()                                /* holodeck main loop */
197          register PACKET *p;
198          time_t  t;
199          long    l;
200 <                                        /* check display */
201 <        if (outdev != NULL && !disp_check(idle))
202 <                return(0);
200 >
201 >        if (outdev != NULL)             /* check display */
202 >                if (!disp_check(idle))
203 >                        return(0);
204                                          /* display only? */
205          if (ncprocs <= 0)
206                  return(1);
207                                          /* check file size */
208 <        if ((l = 1024.*1024.*vflt(DISKSPACE)) > 0 &&
209 <                        hdfiluse(hdlist[0]->fd, 0) + hdmemuse(0) >= l)
208 >        if (maxdisk > 0 && hdfiluse(hdlist[0]->fd,0)+hdmemuse(0) >= maxdisk) {
209 >                error(WARNING, "file limit exceeded");
210                  return(0);
211 +        }
212                                          /* check time */
213 <        if (endtime > 0 || vdef(REPORT))
213 >        if (endtime > 0 || reporttime > 0)
214                  t = time(NULL);
215 <        if (endtime > 0 && t >= endtime)
215 >        if (endtime > 0 && t >= endtime) {
216 >                error(WARNING, "time limit exceeded");
217                  return(0);
218 <        if (vdef(REPORT) && t >= reporttime)
218 >        }
219 >        if (reporttime > 0 && t >= reporttime)
220                  report(t);
221                                          /* get packets to process */
222          while (freepacks != NULL) {
# Line 230 | Line 247 | time_t t;
247          fprintf(stderr, "%s: %ld packets (%ld rays) done after %.2f hours\n",
248                          progname, npacksdone, nraysdone, (t-starttime)/3600.);
249          fflush(stderr);
250 <        reporttime = t + (time_t)(vflt(REPORT)*60.);
250 >        if (vdef(REPORT))
251 >                reporttime = t + (time_t)(vflt(REPORT)*60.+.5);
252   }
253  
254  
# Line 282 | Line 300 | register HDGRID        *gp;
300                  sprintf(vval(OCTREE), "%s.oct", froot);
301                  vdef(OCTREE)++;
302          }
285 –        if (!vdef(DISKSPACE)) {
286 –                sprintf(errmsg,
287 –                        "no %s setting, assuming 100 Mbytes available",
288 –                                vnam(DISKSPACE));
289 –                error(WARNING, errmsg);
290 –                vval(DISKSPACE) = "100";
291 –                vdef(DISKSPACE)++;
292 –        }
293 –        if (!vdef(CACHE)) {
294 –                sprintf(errmsg,
295 –                        "no %s setting, assuming 10 Mbytes available",
296 –                                vnam(CACHE));
297 –                error(WARNING, errmsg);
298 –                vval(CACHE) = "10";
299 –                vdef(CACHE)++;
300 –        }
303          if (!vdef(OBSTRUCTIONS)) {
304                  vval(OBSTRUCTIONS) = "T";
305                  vdef(OBSTRUCTIONS)++;
# Line 363 | Line 365 | loadholo()                     /* start loading a holodeck from fname */
365   {
366          FILE    *fp;
367          long    endloc;
368 <                                        /* open input file */
369 <        if ((fp = fopen(hdkfile, "r+")) == NULL) {
370 <                sprintf(errmsg, "cannot open \"%s\" for appending", hdkfile);
368 >                                        /* open holodeck file */
369 >        if ((fp = fopen(hdkfile, ncprocs>0 ? "r+" : "r")) == NULL) {
370 >                sprintf(errmsg, "cannot open \"%s\" for %s", hdkfile,
371 >                                ncprocs>0 ? "appending" : "reading");
372                  error(SYSTEM, errmsg);
373          }
374                                          /* load variables from header */
# Line 388 | Line 391 | loadholo()                     /* start loading a holodeck from fname */
391   done_packets(pl)                /* handle finished packets */
392   PACKET  *pl;
393   {
394 +        static int      nunflushed = 0;
395          register PACKET *p;
396  
397          while (pl != NULL) {
# Line 397 | Line 401 | PACKET *pl;
401                                  (char *)hdnewrays(hdlist[p->hd],p->bi,p->nr),
402                                  p->nr*sizeof(RAYVAL));
403                          if (outdev != NULL)     /* display it */
404 <                                disp_packet(p);
404 >                                disp_packet((PACKHEAD *)p);
405 >                        else
406 >                                nunflushed += p->nr;
407 >                        nraysdone += p->nr;
408 >                        npacksdone++;
409                  }
402 –                nraysdone += p->nr;
403 –                npacksdone++;
410                  p->nr = 0;                      /* push onto free list */
411                  p->next = freepacks;
412                  freepacks = p;
413          }
414 +        if (nunflushed >= 256*RPACKSIZ) {
415 +                hdflush(NULL);                  /* flush holodeck buffers */
416 +                nunflushed = 0;
417 +        }
418   }
419  
420  
# Line 415 | Line 425 | char   *rfargs;
425          static char     tf1[] = TEMPLATE;
426          char    tf2[64];
427          char    combuf[256];
428 +        char    *pippt;
429          register int    i;
430          register char   *cp;
431                                          /* create rad command */
# Line 424 | Line 435 | char   *rfargs;
435                  "rad -v 0 -s -e -w %s OPTFILE=%s | egrep '^[ \t]*(NOMATCH",
436                          rfargs, tf1);
437          cp = combuf;
438 <        while (*cp) cp++;               /* match unset variables */
438 >        while (*cp){
439 >                if (*cp == '|') pippt = cp;
440 >                cp++;
441 >        }                               /* match unset variables */
442          for (i = 0; mvar[i] >= 0; i++)
443                  if (!vdef(mvar[i])) {
444                          *cp++ = '|';
445                          strcpy(cp, vnam(mvar[i]));
446                          while (*cp) cp++;
447 +                        pippt = NULL;
448                  }
449 <        sprintf(cp, ")[ \t]*=' > %s", tf2);
449 >        if (pippt != NULL)
450 >                strcpy(pippt, "> /dev/null");   /* nothing to match */
451 >        else
452 >                sprintf(cp, ")[ \t]*=' > %s", tf2);
453          if (system(combuf)) {
454                  error(SYSTEM, "cannot execute rad command");
455                  unlink(tf2);                    /* clean up */
456                  unlink(tf1);
457                  quit(1);
458          }
459 <        loadvars(tf2);                  /* load variables */
459 >        if (pippt == NULL) {
460 >                loadvars(tf2);                  /* load variables */
461 >                unlink(tf2);
462 >        }
463          rtargc += wordfile(rtargv+rtargc, tf1); /* get rtrace options */
464 <        unlink(tf2);                    /* clean up */
444 <        unlink(tf1);
464 >        unlink(tf1);                    /* clean up */
465   }
466  
467  
# Line 500 | Line 520 | int    ec;
520   {
521          int     status = 0;
522  
523 +        if (outdev != NULL)             /* close display */
524 +                disp_close();
525          if (hdlist[0] != NULL) {        /* flush holodeck */
526                  if (ncprocs > 0) {
527                          done_packets(flush_queue());
# Line 511 | Line 533 | int    ec;
533                                  fsiz = lseek(hdlist[0]->fd, 0L, 2);
534                                  fuse = hdfiluse(hdlist[0]->fd, 1);
535                                  fprintf(stderr,
536 <                        "%s: %.1f Mbyte holodeck file, %.2f%% fragmentation\n",
536 >                        "%s: %.1f Mbyte holodeck file, %.1f%% fragmentation\n",
537                                                  hdkfile, fsiz/(1024.*1024.),
538                                                  100.*(fsiz-fuse)/fsiz);
539                          }

Diff Legend

– Removed lines
+ Added lines
< Changed lines
> Changed lines