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.6 by greg, Thu Jul 16 12:09:08 1992 UTC vs.
Revision 2.9 by greg, Thu Jul 16 15:53:42 1992 UTC

# Line 41 | Line 41 | double  minarad;               /* minimum ambient radius */
41   static AMBTREE  atrunk;         /* our ambient trunk node */
42  
43   static FILE  *ambfp = NULL;     /* ambient file pointer */
44 < static int  ambheadlen;         /* length of ambient file header */
44 > static char  *afname;           /* ambient file name */
45  
46   #define  AMBFLUSH       (BUFSIZ/AMBVALSIZ)
47  
# Line 49 | Line 49 | static int  ambheadlen;                /* length of ambient file hea
49  
50   #define  newambtree()   (AMBTREE *)calloc(8, sizeof(AMBTREE))
51  
52 + extern long  ftell(), lseek();
53  
54 +
55   setambres(ar)                           /* set ambient resolution */
56   int  ar;
57   {
# Line 71 | Line 73 | int  ar;
73   setambient(afile)                       /* initialize calculation */
74   char  *afile;
75   {
76 <        extern long  ftell();
76 >        long  headlen;
77          AMBVAL  amb;
78                                                  /* init ambient limits */
79          setambres(ambres);
80                                                  /* open ambient file */
81 <        if (afile != NULL)
81 >        if ((afname = afile) != NULL)
82                  if ((ambfp = fopen(afile, "r+")) != NULL) {
83                          initambfile(0);
84 +                        headlen = ftell(ambfp);
85                          while (readambval(&amb, ambfp))
86                                  avinsert(&amb, &atrunk, thescene.cuorg,
87                                                  thescene.cusize);
88                                                          /* align */
89 <                        fseek(ambfp, -((ftell(ambfp)-ambheadlen)%AMBVALSIZ), 1);
89 >                        fseek(ambfp, -((ftell(ambfp)-headlen)%AMBVALSIZ), 1);
90                  } else if ((ambfp = fopen(afile, "w")) != NULL)
91                          initambfile(1);
92                  else {
# Line 94 | Line 97 | char  *afile;
97   }
98  
99  
97 – initambfile(creat)              /* initialize ambient file */
98 – int  creat;
99 – {
100 –        extern char  *progname, *octname;
101 –
102 –        setbuf(ambfp, bmalloc(BUFSIZ));
103 –        if (creat) {                    /* new file */
104 –                fprintf(ambfp, "%s -av %g %g %g -ab %d -aa %g ",
105 –                                progname, colval(ambval,RED),
106 –                                colval(ambval,GRN), colval(ambval,BLU),
107 –                                ambounce, ambacc);
108 –                fprintf(ambfp, "-ad %d -as %d -ar %d %s\n",
109 –                                ambdiv, ambssamp, ambres,
110 –                                octname==NULL ? "" : octname);
111 –                fputformat(AMBFMT, ambfp);
112 –                putc('\n', ambfp);
113 –                putambmagic(ambfp);
114 –                fflush(ambfp);
115 –        } else if (checkheader(ambfp, AMBFMT, NULL) < 0 || !hasambmagic(ambfp))
116 –                error(USER, "ambient file format error");
117 –        ambheadlen = ftell(ambfp);
118 – }
119 –
120 –
100   ambnotify(obj)                  /* record new modifier */
101   OBJECT  obj;
102   {
# Line 294 | Line 273 | int  al;
273          VCOPY(amb.gpos, gp);
274          VCOPY(amb.gdir, gd);
275                                                  /* insert into tree */
276 <        avinsert(&amb, &atrunk, thescene.cuorg, thescene.cusize);
298 <        avsave(&amb);                           /* write to file */
276 >        avsave(&amb);                           /* and save to file */
277          return(amb.rad);
278   }
279  
# Line 327 | Line 305 | FVECT  pv, nv;
305  
306  
307   static
308 < avsave(av)                              /* save an ambient value */
308 > initambfile(creat)              /* initialize ambient file */
309 > int  creat;
310 > {
311 >        extern char  *progname, *octname, VersionID[];
312 >
313 >        setbuf(ambfp, bmalloc(BUFSIZ));
314 >        if (creat) {                    /* new file */
315 >                fprintf(ambfp, "%s -av %g %g %g -ab %d -aa %g ",
316 >                                progname, colval(ambval,RED),
317 >                                colval(ambval,GRN), colval(ambval,BLU),
318 >                                ambounce, ambacc);
319 >                fprintf(ambfp, "-ad %d -as %d -ar %d %s\n",
320 >                                ambdiv, ambssamp, ambres,
321 >                                octname==NULL ? "" : octname);
322 >                fprintf(ambfp, "SOFTWARE= %s\n", VersionID);
323 >                fputformat(AMBFMT, ambfp);
324 >                putc('\n', ambfp);
325 >                putambmagic(ambfp);
326 >                fflush(ambfp);
327 >        } else if (checkheader(ambfp, AMBFMT, NULL) < 0
328 >                        || !hasambmagic(ambfp)) {
329 >                sprintf(errmsg, "\"%s\" is not an ambient file", afname);
330 >                error(USER, errmsg);
331 >        }
332 > }
333 >
334 >
335 > static
336 > avsave(av)                              /* insert and save an ambient value */
337   AMBVAL  *av;
338   {
339          static int  nunflshed = 0;
340  
341 +        avinsert(av, &atrunk, thescene.cuorg, thescene.cusize);
342          if (ambfp == NULL)
343                  return;
344          if (writambval(av, ambfp) < 0)
345                  goto writerr;
346          if (++nunflshed >= AMBFLUSH) {
347 <                if (fflush(ambfp) == EOF)
347 >                if (ambsync() == EOF)
348                          goto writerr;
349                  nunflshed = 0;
350          }
# Line 381 | Line 388 | double  s;
388          return;
389   memerr:
390          error(SYSTEM, "out of memory in avinsert");
391 + }
392 +
393 +
394 + #include  <fcntl.h>
395 +
396 +
397 + static
398 + ambsync()                       /* synchronize ambient file */
399 + {
400 +        static FILE  *ambinp = NULL;
401 +        struct flock  fls;
402 +        AMBVAL  avs;
403 +        long  lastpos, flen;
404 +        register int  n;
405 +                                /* gain exclusive access */
406 +        fls.l_type = F_WRLCK;
407 +        fls.l_whence = 0;
408 +        fls.l_start = 0L;
409 +        fls.l_len = 0L;
410 +        if (fcntl(fileno(ambfp), F_SETLKW, &fls) < 0)
411 +                error(SYSTEM, "cannot lock ambient file");
412 +                                /* see if file has grown */
413 +        lastpos = lseek(fileno(ambfp), 0L, 1);  /* get previous position */
414 +        flen = lseek(fileno(ambfp), 0L, 2);     /* new(?) file length */
415 +        if (n = (flen - lastpos)%AMBVALSIZ)     /* assure alignment */
416 +                lseek(fileno(ambfp), (long)-n, 1);
417 +        if (n = (flen - lastpos)/AMBVALSIZ) {   /* file has grown */
418 +                if (ambinp == NULL && (ambinp = fopen(afname, "r")) == NULL)
419 +                        error(SYSTEM, "cannot reopen ambient file");
420 +                fseek(ambinp, lastpos, 0);      /* go to previous position */
421 +                while (n--) {                   /* load contributed values */
422 +                        readambval(&avs, ambinp);
423 +                        avinsert(&avs,&atrunk,thescene.cuorg,thescene.cusize);
424 +                }
425 +        }
426 +        n = fflush(ambfp);                      /* calls write() at last */
427 +        fls.l_type = F_UNLCK;                   /* release file */
428 +        fcntl(fileno(ambfp), F_SETLKW, &fls);
429 +        return(n);
430   }

Diff Legend

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