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

Comparing ray/src/rt/ambient.c (file contents):
Revision 2.7 by greg, Thu Jul 16 13:37:12 1992 UTC vs.
Revision 2.11 by greg, Thu Jul 16 19:44:46 1992 UTC

# Line 7 | Line 7 | static char SCCSid[] = "$SunId$ LBL";
7   /*
8   *  ambient.c - routines dealing with ambient (inter-reflected) component.
9   *
10 *  The macro AMBFLUSH (if defined) is the number of ambient values
11 *      to wait before flushing to the ambient file.
12 *
10   *     5/9/86
11   */
12  
# Line 41 | Line 38 | double  minarad;               /* minimum ambient radius */
38   static AMBTREE  atrunk;         /* our ambient trunk node */
39  
40   static FILE  *ambfp = NULL;     /* ambient file pointer */
44 static char  *afname;           /* ambient file name */
45 static long  ambheadlen;        /* length of ambient file header */
41  
42   #define  AMBFLUSH       (BUFSIZ/AMBVALSIZ)
43  
# Line 51 | Line 46 | static long  ambheadlen;       /* length of ambient file hea
46   #define  newambtree()   (AMBTREE *)calloc(8, sizeof(AMBTREE))
47  
48   extern long  ftell(), lseek();
49 + static int  initambfile(), avsave(), avinsert(), ambsync();
50  
51  
52   setambres(ar)                           /* set ambient resolution */
# Line 74 | Line 70 | int  ar;
70   setambient(afile)                       /* initialize calculation */
71   char  *afile;
72   {
73 +        long  headlen;
74          AMBVAL  amb;
75                                                  /* init ambient limits */
76          setambres(ambres);
77                                                  /* open ambient file */
78 <        if ((afname = afile) != NULL)
78 >        if (afile != NULL)
79                  if ((ambfp = fopen(afile, "r+")) != NULL) {
80                          initambfile(0);
81 +                        headlen = ftell(ambfp);
82                          while (readambval(&amb, ambfp))
83                                  avinsert(&amb, &atrunk, thescene.cuorg,
84                                                  thescene.cusize);
85                                                          /* align */
86 <                        fseek(ambfp, -((ftell(ambfp)-ambheadlen)%AMBVALSIZ), 1);
87 <                } else if ((ambfp = fopen(afile, "w")) != NULL)
86 >                        fseek(ambfp, -((ftell(ambfp)-headlen)%AMBVALSIZ), 1);
87 >                } else if ((ambfp = fopen(afile, "w+")) != NULL)
88                          initambfile(1);
89                  else {
90                          sprintf(errmsg, "cannot open ambient file \"%s\"",
# Line 96 | Line 94 | char  *afile;
94   }
95  
96  
99 initambfile(creat)              /* initialize ambient file */
100 int  creat;
101 {
102        extern char  *progname, *octname;
103
104        setbuf(ambfp, bmalloc(BUFSIZ));
105        if (creat) {                    /* new file */
106                fprintf(ambfp, "%s -av %g %g %g -ab %d -aa %g ",
107                                progname, colval(ambval,RED),
108                                colval(ambval,GRN), colval(ambval,BLU),
109                                ambounce, ambacc);
110                fprintf(ambfp, "-ad %d -as %d -ar %d %s\n",
111                                ambdiv, ambssamp, ambres,
112                                octname==NULL ? "" : octname);
113                fputformat(AMBFMT, ambfp);
114                putc('\n', ambfp);
115                putambmagic(ambfp);
116                fflush(ambfp);
117        } else if (checkheader(ambfp, AMBFMT, NULL) < 0
118                        || !hasambmagic(ambfp)) {
119                sprintf(errmsg, "\"%s\" is not an ambient file", afname);
120                error(USER, afname);
121        }
122        ambheadlen = ftell(ambfp);
123 }
124
125
97   ambnotify(obj)                  /* record new modifier */
98   OBJECT  obj;
99   {
# Line 331 | Line 302 | FVECT  pv, nv;
302  
303  
304   static
305 + initambfile(creat)              /* initialize ambient file */
306 + int  creat;
307 + {
308 +        extern char  *progname, *octname, VersionID[];
309 +
310 +        setbuf(ambfp, bmalloc(BUFSIZ));
311 +        if (creat) {                    /* new file */
312 +                fprintf(ambfp, "%s -av %g %g %g -ab %d -aa %g ",
313 +                                progname, colval(ambval,RED),
314 +                                colval(ambval,GRN), colval(ambval,BLU),
315 +                                ambounce, ambacc);
316 +                fprintf(ambfp, "-ad %d -as %d -ar %d %s\n",
317 +                                ambdiv, ambssamp, ambres,
318 +                                octname==NULL ? "" : octname);
319 +                fprintf(ambfp, "SOFTWARE= %s\n", VersionID);
320 +                fputformat(AMBFMT, ambfp);
321 +                putc('\n', ambfp);
322 +                putambmagic(ambfp);
323 +                fflush(ambfp);
324 + #ifndef  NIX
325 +                sync();                 /* protect against NFS buffering */
326 + #endif
327 +        } else if (checkheader(ambfp, AMBFMT, NULL) < 0 || !hasambmagic(ambfp))
328 +                error(USER, "bad ambient file");
329 + }
330 +
331 +
332 + static
333   avsave(av)                              /* insert and save an ambient value */
334   AMBVAL  *av;
335   {
# Line 389 | Line 388 | memerr:
388   }
389  
390  
391 < #include  <fcntl.h>
391 > #ifdef  NIX
392  
393 + static
394 + ambsync()                       /* flush ambient file */
395 + {
396 +        return(fflush(ambfp));
397 + }
398  
399 + #else
400 +
401 + #include  <fcntl.h>
402 + #include  <sys/types.h>
403 + #include  <sys/stat.h>
404 +
405   static
406   ambsync()                       /* synchronize ambient file */
407   {
408          static FILE  *ambinp = NULL;
409          struct flock  fls;
410 +        struct stat  sts;
411          AMBVAL  avs;
412          long  lastpos, flen;
413          register int  n;
# Line 408 | Line 419 | ambsync()                      /* synchronize ambient file */
419          if (fcntl(fileno(ambfp), F_SETLKW, &fls) < 0)
420                  error(SYSTEM, "cannot lock ambient file");
421                                  /* see if file has grown */
422 <        lastpos = lseek(fileno(ambfp), 0L, 2);  /* may move pointer */
423 <        flen = lseek(fileno(ambfp), 0L, 1);     /* new(?) file length */
424 <        if (n = (flen - lastpos)%AMBVALSIZ)     /* assure alignment */
425 <                lseek(fileno(ambfp), flen -= n, 0);
422 >        lastpos = lseek(fileno(ambfp), 0L, 1);  /* get previous position */
423 >        if (fstat(fileno(ambfp), &sts) < 0)     /* get current length */
424 >                error(SYSTEM, "cannot stat ambient file");
425 >        flen = sts.st_size;
426          if (n = (flen - lastpos)/AMBVALSIZ) {   /* file has grown */
427 <                if (ambinp == NULL && (ambinp = fopen(afname, "r")) == NULL)
428 <                        error(SYSTEM, "cannot reopen ambient file");
418 <                fseek(ambinp, lastpos, 0);      /* go to previous position */
427 >                if (ambinp == NULL)             /* use duplicate file */
428 >                        ambinp = fdopen(dup(fileno(ambfp)), "r");
429                  while (n--) {                   /* load contributed values */
430                          readambval(&avs, ambinp);
431                          avinsert(&avs,&atrunk,thescene.cuorg,thescene.cusize);
432 <                }
432 >                }                               /* moves shared file pointer */
433 >                if (n = (flen - lastpos)%AMBVALSIZ)     /* alignment */
434 >                        lseek(fileno(ambfp), flen-n, 0);
435          }
436          n = fflush(ambfp);                      /* calls write() at last */
437          fls.l_type = F_UNLCK;                   /* release file */
438          fcntl(fileno(ambfp), F_SETLKW, &fls);
439          return(n);
440   }
441 +
442 + #endif

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines