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

Comparing ray/src/hd/holofile.c (file contents):
Revision 3.55 by schorsch, Thu Jan 1 11:21:55 2004 UTC vs.
Revision 3.62 by greg, Tue Dec 19 20:22:36 2023 UTC

# Line 18 | Line 18 | static const char      RCSid[] = "$Id$";
18  
19   #ifndef CACHESIZE
20   #ifdef SMLMEM
21 < #define CACHESIZE       5
21 > #define CACHESIZE       100
22   #else
23 < #define CACHESIZE       17      /* default cache size (Mbytes, 0==inf) */
23 > #define CACHESIZE       1000    /* default cache size (Mbytes, 0==inf) */
24   #endif
25   #endif
26   #ifndef FREEBEAMS
# Line 30 | Line 30 | static const char      RCSid[] = "$Id$";
30   #define PCTFREE         15      /* maximum fraction to free (%) */
31   #endif
32   #ifndef MAXFRAGB
33 < #define MAXFRAGB        16      /* fragment blocks/file to track (0==inf) */
33 > #define MAXFRAGB        64      /* fragment blocks/file to track (0==inf) */
34   #endif
35   #ifndef FF_DEFAULT
36                                  /* when to free a beam fragment */
# Line 42 | Line 42 | static const char      RCSid[] = "$Id$";
42   #endif
43  
44   #ifndef BSD
45 + #ifdef write /* platform.h renames those for Windows */
46 + #undef write
47 + #endif
48   #define write   writebuf        /* safe i/o routines */
49 + #ifdef read
50 + #undef read
51 + #endif
52   #define read    readbuf
53   #endif
54  
# Line 84 | Line 90 | hdalloc(               /* allocate and set holodeck section based o
90   )
91   {
92          HOLO    hdhead;
93 <        register HOLO   *hp;
93 >        HOLO    *hp;
94          int     n;
95                                  /* copy grid to temporary header */
96          memcpy((void *)&hdhead, (void *)hproto, sizeof(HDGRID));
# Line 120 | Line 126 | hdrealloc(     /* (re)allocate memory, retry then error */
126          char    *rout
127   )
128   {
129 <        register char   *newp;
129 >        char    *newp;
130                                          /* call malloc/realloc */
131          if (ptr == NULL) newp = (char *)malloc(siz);
132          else newp = (char *)realloc((void *)ptr, siz);
# Line 140 | Line 146 | hdrealloc(     /* (re)allocate memory, retry then error */
146  
147   void
148   hdattach(       /* start tracking file fragments for some section */
149 <        register int    fd,
149 >        int     fd,
150          int     wr
151   )
152   {
# Line 163 | Line 169 | hdattach(      /* start tracking file fragments for some se
169  
170   void
171   hdrelease(              /* stop tracking file fragments for some section */
172 <        register int    fd
172 >        int     fd
173   )
174   {
175          if ((fd < 0) | (fd >= nhdfragls) || !hdfragl[fd].nlinks)
# Line 176 | Line 182 | hdrelease(             /* stop tracking file fragments for some s
182   }
183  
184  
185 < extern HOLO *
185 > HOLO *
186   hdinit( /* initialize a holodeck section in a file */
187          int     fd,                     /* corresponding file descriptor */
188          HDGRID  *hproto         /* holodeck section grid */
# Line 185 | Line 191 | hdinit(        /* initialize a holodeck section in a file */
191          off_t   rtrunc;
192          off_t   fpos;
193          int     writable;
194 <        register HOLO   *hp;
195 <        register int    n;
194 >        HOLO    *hp;
195 >        int     n;
196                                          /* prepare for system errors */
197          errno = 0;
198          if ((fpos = lseek(fd, (off_t)0, SEEK_CUR)) < 0)
# Line 246 | Line 252 | hdinit(        /* initialize a holodeck section in a file */
252                  }
253          if (rtrunc) {
254                  sprintf(errmsg, "truncated section, %ld rays lost (%.1f%%)",
255 <                                rtrunc, 100.*rtrunc/(rtrunc+biglob(hp)->nrd));
255 >                                (long)rtrunc,
256 >                                100.*rtrunc/(rtrunc+biglob(hp)->nrd));
257                  error(WARNING, errmsg);
258          }
259                                          /* add to holodeck list */
# Line 265 | Line 272 | memerr:
272  
273   void
274   hdmarkdirty(            /* mark holodeck directory position dirty */
275 <        register HOLO   *hp,
275 >        HOLO    *hp,
276          int     i
277   )
278   {
279          static BEAMI    smudge = {0, -1};
280          int     mindist, minpos;
281 <        register int    j;
281 >        int     j;
282  
283          if (!hp->dirty++) {                     /* write smudge first time */
284                  if (lseek(hp->fd, biglob(hp)->fo+(i-1)*sizeof(BEAMI),
# Line 317 | Line 324 | hdmarkdirty(           /* mark holodeck directory position dirt
324   }
325  
326  
327 < extern int
327 > int
328   hdsync(                 /* update beams and directory on disk */
329 <        register HOLO   *hp,
329 >        HOLO    *hp,
330          int     all
331   )
332   {
333 <        register int    j, n;
333 >        int     j, n;
334  
335          if (hp == NULL) {               /* do all holodecks */
336                  n = 0;
# Line 357 | Line 364 | hdmemuse(              /* return memory usage (in bytes) */
364   )
365   {
366          long    total = 0;
367 <        register int    i, j;
367 >        int     i, j;
368  
369          for (j = 0; hdlist[j] != NULL; j++) {
370                  total += blglob(hdlist[j])->nrm * sizeof(RAYVAL);
# Line 381 | Line 388 | hdmemuse(              /* return memory usage (in bytes) */
388   }
389  
390  
391 < extern off_t
391 > off_t
392   hdfilen(                /* return file length for fd */
393          int     fd
394   )
# Line 401 | Line 408 | hdfilen(               /* return file length for fd */
408   }
409  
410  
411 < extern off_t
411 > off_t
412   hdfiluse(       /* compute file usage (in bytes) */
413 <        int     fd,                     /* open file descriptor to check */
407 <        int     all                     /* include overhead and unflushed data */
413 >        int     fd                      /* open file descriptor to check */
414   )
415   {
416          off_t   total = 0;
417 <        register int    i, j;
417 >        int     j;
418  
419          for (j = 0; hdlist[j] != NULL; j++) {
420                  if (hdlist[j]->fd != fd)
421                          continue;
422                  total += biglob(hdlist[j])->nrd * sizeof(RAYVAL);
423 <                if (all) {
424 <                        for (i = nbeams(hdlist[j]); i > 0; i--)
425 <                                if (hdlist[j]->bl[i] != NULL)
426 <                                        total += sizeof(RAYVAL) *
423 >                total += nbeams(hdlist[j])*sizeof(BEAMI) + sizeof(HDGRID);
424 > #if 0
425 >                for (i = nbeams(hdlist[j]); i > 0; i--)
426 >                        if (hdlist[j]->bl[i] != NULL)
427 >                                total += sizeof(RAYVAL) *
428                                                  (hdlist[j]->bl[i]->nrm -
429                                                  hdlist[j]->bi[i].nrd);
430 <                        total += sizeof(HDGRID) +
424 <                                        nbeams(hdlist[j])*sizeof(BEAMI);
425 <                }
430 > #endif
431          }
432 <        return(total);          /* does not include fragments */
432 >        return(total);          /* doesn't include fragments, unflushed rays */
433   }
434  
435  
436 < extern RAYVAL *
436 > RAYVAL *
437   hdnewrays(      /* allocate space for add'l rays and return pointer */
438 <        register HOLO   *hp,
439 <        register int    i,
438 >        HOLO    *hp,
439 >        int     i,
440          int     nr                      /* number of new rays desired */
441   )
442   {
# Line 473 | Line 478 | hdnewrays(     /* allocate space for add'l rays and return
478   }
479  
480  
481 < extern BEAM *
481 > BEAM *
482   hdgetbeam(      /* get beam (from file if necessary) */
483 <        register HOLO   *hp,
484 <        register int    i
483 >        HOLO    *hp,
484 >        int     i
485   )
486   {
487 <        register int    n;
487 >        int     n;
488  
489          CHECK((i < 1) | (i > nbeams(hp)),
490                          CONSISTENCY, "bad beam index given to hdgetbeam");
# Line 506 | Line 511 | hdgetbeam(     /* get beam (from file if necessary) */
511  
512   int
513   hdfilord(       /* order beams for quick loading */
514 <        register const void     *hb1,
515 <        register const void     *hb2
514 >        const void      *hb1,
515 >        const void      *hb2
516   )
517   {
518 <        register off_t  c;
518 >        off_t   c;
519                                  /* residents go first */
520          if (((HDBEAMI*)hb2)->h->bl[((HDBEAMI*)hb2)->b] != NULL)
521                  return(((HDBEAMI*)hb1)->h->bl[((HDBEAMI*)hb1)->b] == NULL);
# Line 526 | Line 531 | hdfilord(      /* order beams for quick loading */
531   }
532  
533  
534 < extern void
534 > void
535   hdloadbeams(    /* load a list of beams in optimal order */
536 <        register HDBEAMI        *hb,    /* list gets sorted by hdfilord() */
536 >        HDBEAMI *hb,    /* list gets sorted by hdfilord() */
537          int     n,                      /* list length */
538          void    (*bf)(BEAM *bp, HDBEAMI *hb)    /* callback function (optional) */
539   )
540   {
541          unsigned        origcachesize, memuse;
542          int     bytesloaded, needbytes, bytes2free;
543 <        register BEAM   *bp;
544 <        register int    i;
543 >        BEAM    *bp;
544 >        int     i;
545                                          /* precheck consistency */
546          if (n <= 0) return;
547          for (i = n; i--; )
# Line 573 | Line 578 | hdloadbeams(   /* load a list of beams in optimal order
578   }
579  
580  
581 < extern int
581 > int
582   hdfreefrag(                     /* free a file fragment */
583          HOLO    *hp,
584          int     i
585   )
586   {
587 <        register BEAMI  *bi = &hp->bi[i];
588 <        register struct fraglist        *f;
589 <        register int    j, k;
587 >        BEAMI   *bi = &hp->bi[i];
588 >        struct fraglist *f;
589 >        int     j, k;
590  
591          if (bi->nrd <= 0)
592                  return(0);
# Line 610 | Line 615 | hdfreefrag(                    /* free a file fragment */
615          }
616   #endif
617          if (j % FRAGBLK == 0) {         /* more (or less) free list space */
618 <                register BEAMI  *newp;
618 >                BEAMI   *newp;
619                  if (f->fi == NULL)
620                          newp = (BEAMI *)malloc((j+FRAGBLK)*sizeof(BEAMI));
621                  else
# Line 653 | Line 658 | hdfreefrag(                    /* free a file fragment */
658   }
659  
660  
661 < extern int
661 > int
662   hdfragOK(       /* get fragment list status for file */
663          int     fd,
664          int     *listlen,
665 <        register int32  *listsiz
665 >        int32   *listsiz
666   )
667   {
668 <        register struct fraglist        *f;
669 <        register int    i;
668 >        struct fraglist *f;
669 >        int     i;
670  
671          if ((fd < 0) | (fd >= nhdfragls) || !(f = &hdfragl[fd])->nlinks)
672                  return(0);              /* listless */
# Line 684 | Line 689 | hdallocfrag(           /* allocate a file fragment */
689          uint32  nrays
690   )
691   {
692 <        register struct fraglist        *f;
693 <        register int    j;
692 >        struct fraglist *f;
693 >        int     j;
694          off_t   nfo;
695  
696          if (nrays == 0)
# Line 710 | Line 715 | hdallocfrag(           /* allocate a file fragment */
715  
716   int
717   hdsyncbeam(             /* sync beam in memory with beam on disk */
718 <        register HOLO   *hp,
719 <        register int    i
718 >        HOLO    *hp,
719 >        int     i
720   )
721   {
722          int     fragfreed;
# Line 750 | Line 755 | hdsyncbeam(            /* sync beam in memory with beam on disk
755   }
756  
757  
758 < extern int
758 > int
759   hdfreebeam(             /* free beam, writing if dirty */
760 <        register HOLO   *hp,
761 <        register int    i
760 >        HOLO    *hp,
761 >        int     i
762   )
763   {
764          int     nchanged;
# Line 792 | Line 797 | hdfreebeam(            /* free beam, writing if dirty */
797   }
798  
799  
800 < extern int
800 > int
801   hdkillbeam(             /* delete beam from holodeck */
802 <        register HOLO   *hp,
803 <        register int    i
802 >        HOLO    *hp,
803 >        int     i
804   )
805   {
806          int     nchanged;
# Line 840 | Line 845 | hdkillbeam(            /* delete beam from holodeck */
845  
846   int
847   hdlrulist(      /* add beams from holodeck to LRU list */
848 <        register HDBEAMI        *hb,            /* beam list */
848 >        HDBEAMI *hb,            /* beam list */
849          int     nents,                          /* current list length */
850          int     n,                              /* maximum list length */
851 <        register HOLO   *hp                     /* section we're adding from */
851 >        HOLO    *hp                     /* section we're adding from */
852   )
853   {
854 <        register int    i, j;
854 >        int     i, j;
855                                          /* insert each beam from hp */
856          for (i = 1; i <= nbeams(hp); i++) {
857                  if (hp->bl[i] == NULL)          /* check if loaded */
# Line 874 | Line 879 | hdlrulist(     /* add beams from holodeck to LRU list */
879   int
880   hdfreecache(            /* free up cache space, writing changes */
881          int     pct,                            /* maximum percentage to free */
882 <        register HOLO   *honly                  /* NULL means check all */
882 >        HOLO    *honly                  /* NULL means check all */
883   )
884   {
885          HDBEAMI hb[FREEBEAMS];
886          int     freetarget;
887          int     n;
888 <        register int    i;
888 >        int     i;
889   #ifdef DEBUG
890          unsigned        membefore;
891  
# Line 916 | Line 921 | hdfreecache(           /* free up cache space, writing changes
921   }
922  
923  
924 < extern void
924 > void
925   hddone(         /* clean up holodeck section and free */
926 <        register HOLO   *hp             /* NULL means clean up all */
926 >        HOLO    *hp             /* NULL means clean up all */
927   )
928   {
929 <        register int    i;
929 >        int     i;
930  
931          if (hp == NULL) {               /* NULL means clean up everything */
932                  while (hdlist[0] != NULL)

Diff Legend

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