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.1 by greg, Mon Jul 13 16:15:21 1992 UTC vs.
Revision 2.10 by greg, Wed Mar 2 22:03:49 2016 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 <
12 > #include "ray.h"
13   #include "ambient.h"
14  
15  
16 < #define  putvec(v,fp)   putflt((v)[0],fp);putflt((v)[1],fp);putflt((v)[2],fp)
16 > #define  badflt(x)      ((x) < -FHUGE || (x) > FHUGE)
17  
18 < #define  getvec(v,fp)   (v)[0]=getflt(fp);(v)[1]=getflt(fp);(v)[2]=getflt(fp)
18 > #define  badvec(v)      (badflt((v)[0]) | badflt((v)[1]) | badflt((v)[2]))
19  
20  
21 < extern double  getflt();
22 < extern long  getint();
21 > void
22 > putambmagic(fp)                 /* write out ambient value magic number */
23 > FILE  *fp;
24 > {
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 +        int  magic;
34 +
35 +        magic = getint(2, fp);
36 +        if (feof(fp))
37 +                return(0);
38 +        return(magic == AMBMAGIC);
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  clr;
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(clr, colval(av->val,RED),
66 +                        colval(av->val,GRN), colval(av->val,BLU));
67 +        fwrite((char *)clr, sizeof(clr), 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->weight <= 0.) | (av->weight > 1.)) return(0);
86 +        if ((av->rad[0] <= 0.) | (av->rad[0] >= FHUGE)) return(0);
87 +        if ((av->rad[1] <= 0.) | (av->rad[1] >= FHUGE)) return(0);
88 +        if ((colval(av->val,RED) < 0.) |
89 +                        (colval(av->val,RED) >= FHUGE) |
90 +                        (colval(av->val,GRN) < 0.) |
91 +                        (colval(av->val,GRN) >= FHUGE) |
92 +                        (colval(av->val,BLU) < 0.) |
93 +                        (colval(av->val,BLU) >= FHUGE)) return(0);
94 +        if (badflt(av->gpos[0]) || badflt(av->gpos[1])) return(0);
95 +        if (badflt(av->gdir[0]) || badflt(av->gdir[1])) return(0);
96 +        return(1);
97 + }
98 +
99 +
100 + int
101 + readambval(                     /* read ambient value from stream */
102 +        AMBVAL  *av,
103 +        FILE  *fp
104 + )
105 + {
106 +        COLR  clr;
107 +
108 +        av->lvl = getint(1, fp) & 0xff;
109 +        if (feof(fp))
110 +                return(0);
111 +        av->weight = getflt(fp);
112 +        getpos(av->pos, fp);
113 +        av->ndir = getint(sizeof(av->ndir), fp);
114 +        av->udir = getint(sizeof(av->udir), fp);
115 +        if (fread((char *)clr, sizeof(clr), 1, fp) != 1)
116 +                return(0);
117 +        colr_color(av->val, clr);
118 +        getv2(av->rad, fp);
119 +        getv2(av->gpos, fp);
120 +        getv2(av->gdir, fp);
121 +        av->corral = (uint32)getint(sizeof(av->corral), fp);
122 +        return(feof(fp) ? 0 : ambvalOK(av));
123 + }
124 +
125 +
126 + #else /* ! NEWAMB */
127 +
128 +
129 + #define  putvec(v,fp)   putflt((v)[0],fp);putflt((v)[1],fp);putflt((v)[2],fp)
130 +
131 + #define  getvec(v,fp)   (v)[0]=getflt(fp);(v)[1]=getflt(fp);(v)[2]=getflt(fp)
132 +
133 +
134 + int
135   writambval(av, fp)              /* write ambient value to stream */
136 < register AMBVAL  *av;
136 > AMBVAL  *av;
137   FILE  *fp;
138   {
139 <        COLR  col;
139 >        COLR  clr;
140  
141 <        putint((long)av->lvl, 1, fp);
141 >        putint(av->lvl, 1, fp);
142          putflt(av->weight, fp);
143          putvec(av->pos, fp);
144          putvec(av->dir, fp);
145 <        setcolr(col, colval(av->val,RED),
145 >        setcolr(clr, colval(av->val,RED),
146                          colval(av->val,GRN), colval(av->val,BLU));
147 <        fwrite((char *)col, sizeof(col), 1, fp);
147 >        fwrite((char *)clr, sizeof(clr), 1, fp);
148          putflt(av->rad, fp);
149          putvec(av->gpos, fp);
150          putvec(av->gdir, fp);
# Line 44 | Line 152 | FILE  *fp;
152   }
153  
154  
155 + int
156 + ambvalOK(av)                    /* check consistency of ambient value */
157 + AMBVAL  *av;
158 + {
159 +        double  d;
160 +
161 +        if (badvec(av->pos)) return(0);
162 +        if (badvec(av->dir)) return(0);
163 +        d = DOT(av->dir,av->dir);
164 +        if (d < 0.9999 || d > 1.0001) return(0);
165 +        if (av->lvl < 0 || av->lvl > 100) return(0);
166 +        if (av->weight <= 0. || av->weight > 1.) return(0);
167 +        if (av->rad <= 0. || av->rad >= FHUGE) return(0);
168 +        if (colval(av->val,RED) < 0. ||
169 +                        colval(av->val,RED) > FHUGE ||
170 +                        colval(av->val,GRN) < 0. ||
171 +                        colval(av->val,GRN) > FHUGE ||
172 +                        colval(av->val,BLU) < 0. ||
173 +                        colval(av->val,BLU) > FHUGE) return(0);
174 +        if (badvec(av->gpos)) return(0);
175 +        if (badvec(av->gdir)) return(0);
176 +        return(1);
177 + }
178 +
179 +
180 + int
181   readambval(av, fp)              /* read ambient value from stream */
182 < register AMBVAL  *av;
182 > AMBVAL  *av;
183   FILE  *fp;
184   {
185 <        COLR  col;
185 >        COLR  clr;
186  
187          av->lvl = getint(1, fp);
188          if (feof(fp))
# Line 56 | Line 190 | FILE  *fp;
190          av->weight = getflt(fp);
191          getvec(av->pos, fp);
192          getvec(av->dir, fp);
193 <        if (fread((char *)col, sizeof(col), 1, fp) != 1)
193 >        if (fread((char *)clr, sizeof(clr), 1, fp) != 1)
194                  return(0);
195 <        colr_color(av->val, col);
195 >        colr_color(av->val, clr);
196          av->rad = getflt(fp);
197          getvec(av->gpos, fp);
198          getvec(av->gdir, fp);
199 <        return(feof(fp) ? 0 : 1);
199 >        return(feof(fp) ? 0 : ambvalOK(av));
200   }
201 +
202 + #endif  /* ! NEWAMB */

Diff Legend

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