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

Comparing ray/src/rt/ambio.c (file contents):
Revision 2.3 by greg, Tue May 28 13:42:46 1996 UTC vs.
Revision 2.9 by greg, Thu Jun 19 16:26:55 2014 UTC

# Line 1 | Line 1
1 – /* Copyright (c) 1992 Regents of the University of California */
2 –
1   #ifndef lint
2 < static char SCCSid[] = "$SunId$ LBL";
2 > static const char       RCSid[] = "$Id$";
3   #endif
6 –
4   /*
5   * Read and write portable ambient values
6 + *
7 + *  Declarations of external symbols in ambient.h
8   */
9  
10 < #include <stdio.h>
10 > #include "copyright.h"
11  
12 < #include "color.h"
14 <
15 < #include "fvect.h"
16 <
12 > #include "ray.h"
13   #include "ambient.h"
14  
15  
20 – #define  putvec(v,fp)   putflt((v)[0],fp);putflt((v)[1],fp);putflt((v)[2],fp)
21 –
22 – #define  getvec(v,fp)   (v)[0]=getflt(fp);(v)[1]=getflt(fp);(v)[2]=getflt(fp)
23 –
16   #define  badflt(x)      ((x) < -FHUGE || (x) > FHUGE)
17  
18 < #define  badvec(v)      (badflt((v)[0]) || badflt((v)[1]) || badflt((v)[2]))
18 > #define  badvec(v)      (badflt((v)[0]) | badflt((v)[1]) | badflt((v)[2]))
19  
20  
21 < extern double  getflt();
30 < extern long  getint();
31 <
32 <
21 > void
22   putambmagic(fp)                 /* write out ambient value magic number */
23   FILE  *fp;
24   {
25 <        putint((long)AMBMAGIC, 2, fp);
25 >        putint(AMBMAGIC, 2, fp);
26   }
27  
28  
29 + int
30   hasambmagic(fp)                 /* read in and check validity of magic # */
31   FILE  *fp;
32   {
33 <        register int  magic;
33 >        int  magic;
34  
35          magic = getint(2, fp);
36          if (feof(fp))
# Line 49 | Line 39 | FILE  *fp;
39   }
40  
41  
42 + #ifndef OLDAMB
43 +
44 + #define  putpos(v,fp)   putflt((v)[0],fp);putflt((v)[1],fp);putflt((v)[2],fp)
45 +
46 + #define  getpos(v,fp)   (v)[0]=getflt(fp);(v)[1]=getflt(fp);(v)[2]=getflt(fp)
47 +
48 + #define  putv2(v2,fp)   putflt((v2)[0],fp);putflt((v2)[1],fp)
49 +
50 + #define  getv2(v2,fp)   (v2)[0]=getflt(fp);(v2)[1]=getflt(fp)
51 +
52 + int
53 + writambval(                     /* write ambient value to stream */
54 +        AMBVAL  *av,
55 +        FILE  *fp
56 + )
57 + {
58 +        COLR  col;
59 +
60 +        putint(av->lvl, 1, fp);
61 +        putflt(av->weight, fp);
62 +        putpos(av->pos, fp);
63 +        putint(av->ndir, sizeof(av->ndir), fp);
64 +        putint(av->udir, sizeof(av->udir), fp);
65 +        setcolr(col, colval(av->val,RED),
66 +                        colval(av->val,GRN), colval(av->val,BLU));
67 +        fwrite((char *)col, sizeof(col), 1, fp);
68 +        putv2(av->rad, fp);
69 +        putv2(av->gpos, fp);
70 +        putv2(av->gdir, fp);
71 +        putint(av->corral, sizeof(av->corral), fp);
72 +        return(ferror(fp) ? -1 : 0);
73 + }
74 +
75 +
76 + int
77 + ambvalOK(                       /* check consistency of ambient value */
78 +        AMBVAL  *av
79 + )
80 + {
81 +        double  d;
82 +
83 +        if (badvec(av->pos)) return(0);
84 +        if (!av->ndir | !av->udir) return(0);
85 +        if ((av->lvl < 0) | (av->lvl > 100)) return(0);
86 +        if ((av->weight <= 0.) | (av->weight > 1.)) return(0);
87 +        if ((av->rad[0] <= 0.) | (av->rad[0] >= FHUGE)) return(0);
88 +        if ((av->rad[1] <= 0.) | (av->rad[1] >= FHUGE)) return(0);
89 +        if ((colval(av->val,RED) < 0.) |
90 +                        (colval(av->val,RED) > FHUGE) |
91 +                        (colval(av->val,GRN) < 0.) |
92 +                        (colval(av->val,GRN) > FHUGE) |
93 +                        (colval(av->val,BLU) < 0.) |
94 +                        (colval(av->val,BLU) > FHUGE)) return(0);
95 +        if (badflt(av->gpos[0]) || badflt(av->gpos[1])) return(0);
96 +        if (badflt(av->gdir[0]) || badflt(av->gdir[1])) return(0);
97 +        return(1);
98 + }
99 +
100 +
101 + int
102 + readambval(                     /* read ambient value from stream */
103 +        AMBVAL  *av,
104 +        FILE  *fp
105 + )
106 + {
107 +        COLR  col;
108 +
109 +        av->lvl = getint(1, fp);
110 +        if (feof(fp))
111 +                return(0);
112 +        av->weight = getflt(fp);
113 +        getpos(av->pos, fp);
114 +        av->ndir = getint(sizeof(av->ndir), fp);
115 +        av->udir = getint(sizeof(av->udir), fp);
116 +        if (fread((char *)col, sizeof(col), 1, fp) != 1)
117 +                return(0);
118 +        colr_color(av->val, col);
119 +        getv2(av->rad, fp);
120 +        getv2(av->gpos, fp);
121 +        getv2(av->gdir, fp);
122 +        av->corral = (uint32)getint(sizeof(av->corral), fp);
123 +        return(feof(fp) ? 0 : ambvalOK(av));
124 + }
125 +
126 +
127 + #else /* ! NEWAMB */
128 +
129 +
130 + #define  putvec(v,fp)   putflt((v)[0],fp);putflt((v)[1],fp);putflt((v)[2],fp)
131 +
132 + #define  getvec(v,fp)   (v)[0]=getflt(fp);(v)[1]=getflt(fp);(v)[2]=getflt(fp)
133 +
134 +
135 + int
136   writambval(av, fp)              /* write ambient value to stream */
137 < register AMBVAL  *av;
137 > AMBVAL  *av;
138   FILE  *fp;
139   {
140          COLR  col;
141  
142 <        putint((long)av->lvl, 1, fp);
142 >        putint(av->lvl, 1, fp);
143          putflt(av->weight, fp);
144          putvec(av->pos, fp);
145          putvec(av->dir, fp);
# Line 71 | Line 155 | FILE  *fp;
155  
156   int
157   ambvalOK(av)                    /* check consistency of ambient value */
158 < register AMBVAL  *av;
158 > AMBVAL  *av;
159   {
160          double  d;
161  
# Line 94 | Line 178 | register AMBVAL  *av;
178   }
179  
180  
181 + int
182   readambval(av, fp)              /* read ambient value from stream */
183 < register AMBVAL  *av;
183 > AMBVAL  *av;
184   FILE  *fp;
185   {
186          COLR  col;
# Line 114 | Line 199 | FILE  *fp;
199          getvec(av->gdir, fp);
200          return(feof(fp) ? 0 : ambvalOK(av));
201   }
202 +
203 + #endif  /* ! NEWAMB */

Diff Legend

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