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

Comparing ray/src/common/depthcodec.c (file contents):
Revision 2.1 by greg, Fri Jul 26 16:18:06 2019 UTC vs.
Revision 2.12 by greg, Thu Mar 3 16:09:31 2022 UTC

# Line 8 | Line 8 | static const char RCSid[] = "$Id$";
8   #include "copyright.h"
9  
10   #include <stdlib.h>
11 #include <string.h>
11   #include <math.h>
12   #include <ctype.h>
13   #include "rtio.h"
# Line 16 | Line 15 | static const char RCSid[] = "$Id$";
15   #include "depthcodec.h"
16  
17  
18 < #if 0                   /* defined as macro in depthcodec.h */
18 > #ifndef depth2code
19   /* Encode depth as 16-bit signed integer */
20   int
21   depth2code(double d, double dref)
# Line 25 | Line 24 | depth2code(double d, double dref)
24                  return -32768;
25  
26          if (d > dref)
27 <                return (int)(32768 - 32768*dref/d) - 1;
27 >                return (int)(32768.001 - 32768.*dref/d) - 1;
28  
29 <        return (int)(32767*d/dref - 32768);
29 >        return (int)(32767.*d/dref - 32768.999);
30   }
31   #endif
32  
33  
34 + #ifndef code2depth
35   /* Decode depth from 16-bit signed integer */
36   double
37   code2depth(int c, double dref)
# Line 41 | Line 41 | code2depth(int c, double dref)
41  
42          if (c >= 32767)
43                  return FHUGE;
44 <                
45 <        if (c < 0)
46 <                return dref*(32767.5 + c)*(1./32767.);
47 <        
48 <        return dref*32768./(32766.5 - c);
44 >
45 >        if (c >= -1)
46 >                return dref*32768./(32766.5 - c);
47 >
48 >        return dref*(32768.5 + c)*(1./32767.);
49   }
50 + #endif
51  
52  
53   /* Set codec defaults */
# Line 70 | Line 71 | static int
71   headline(char *s, void *p)
72   {
73          DEPTHCODEC      *dcp = (DEPTHCODEC *)p;
74 +        int             rv;
75  
76          if (formatval(dcp->inpfmt, s))  /* don't pass format */
77                  return 0;
78 +
79 +        if ((rv = isbigendian(s)) >= 0) {
80 +                dcp->swapped = (nativebigendian() != rv);
81 +                return 0;
82 +        }
83                                          /* check for reference depth */
84          if (!strncmp(s, DEPTHSTR, LDEPTHSTR)) {
85                  char    *cp;
# Line 83 | Line 90 | headline(char *s, void *p)
90                  *cp = '\0';
91                  dcp->refdepth = atof(dcp->depth_unit);
92                  if (dcp->refdepth <= .0) {
93 <                        fputs(dcp->inpname, stderr);
94 <                        fputs(": bad reference depth in input header\n", stderr);
93 >                        if (dcp->hdrflags & HF_STDERR) {
94 >                                fputs(dcp->inpname, stderr);
95 >                                fputs(": bad reference depth in input header\n",
96 >                                                stderr);
97 >                        }
98                          return -1;
99                  }
100 <        } else if (isview(s))           /* get view params */
100 >                if (dcp->hdrflags & HF_ENCODE)
101 >                        return 0;       /* will add this later */
102 >        } else if (!strncmp(s, "SAMP360=", 8))
103 >                dcp->gotview--;
104 >        else if (isview(s))             /* get view params */
105                  dcp->gotview += (sscanview(&dcp->vw, s) > 0);
106          if (dcp->hdrflags & HF_HEADOUT)
107                  fputs(s, stdout);       /* copy to standard output */
# Line 101 | Line 115 | process_dc_header(DEPTHCODEC *dcp, int ac, char *av[])
115   {
116          if (dcp->hdrflags & HF_HEADIN &&
117                          getheader(dcp->finp, headline, dcp) < 0) {
118 <                fputs(dcp->inpname, stderr);
119 <                fputs(": bad header\n", stderr);
120 <                return 1;
118 >                if (dcp->hdrflags & HF_STDERR) {
119 >                        fputs(dcp->inpname, stderr);
120 >                        fputs(": bad header\n", stderr);
121 >                }
122 >                return 0;
123          }
124 +        dcp->gotview *= (dcp->gotview > 0);
125 +                                        /* get resolution string? */
126 +        if (dcp->hdrflags & HF_RESIN && !fgetsresolu(&dcp->res, dcp->finp)) {
127 +                if (dcp->hdrflags & HF_STDERR) {
128 +                        fputs(dcp->inpname, stderr);
129 +                        fputs(": bad resolution string\n", stderr);
130 +                }
131 +                return 0;
132 +        }
133          if (dcp->hdrflags & HF_HEADOUT) {       /* finish header */
134                  if (!(dcp->hdrflags & HF_HEADIN))
135                          newheader("RADIANCE", stdout);
# Line 115 | Line 140 | process_dc_header(DEPTHCODEC *dcp, int ac, char *av[])
140                          fputs(dcp->depth_unit, stdout);
141                          fputc('\n', stdout);
142                          fputformat(DEPTH16FMT, stdout);
143 <                } else
143 >                } else {
144 >                        fputs("NCOMP=1\n", stdout);
145 >                        if ((dcp->hdrflags & (HF_RESIN|HF_RESOUT)) == HF_RESIN)
146 >                                printf("NCOLS=%d\nNROWS=%d\n",
147 >                                                scanlen(&dcp->res),
148 >                                                numscans(&dcp->res));
149                          switch (dcp->format) {
150                          case 'a':
151                                  fputformat("ascii", stdout);
152                                  break;
153                          case 'f':
154 +                                fputendian(stdout);
155                                  fputformat("float", stdout);
156                                  break;
157                          case 'd':
158 +                                fputendian(stdout);
159                                  fputformat("double", stdout);
160                                  break;
161                          }
162 +                }
163                  fputc('\n', stdout);
164          }
165 <                                        /* get/put resolution string */
133 <        if (dcp->hdrflags & HF_RESIN && !fgetsresolu(&dcp->res, dcp->finp)) {
134 <                fputs(dcp->inpname, stderr);
135 <                fputs(": bad resolution string\n", stderr);
136 <                return 1;
137 <        }
138 <        if (dcp->hdrflags & HF_RESOUT)
165 >        if (dcp->hdrflags & HF_RESOUT)  /* put resolution string? */
166                  fputsresolu(&dcp->res, stdout);
167  
168          dcp->dstart = dcp->curpos = ftell(dcp->finp);
# Line 148 | Line 175 | int
175   check_decode_depths(DEPTHCODEC *dcp)
176   {
177          if (dcp->hdrflags & HF_ENCODE) {
178 <                fputs(progname, stderr);
179 <                fputs(": wrong header mode for decode\n", stderr);
178 >                if (dcp->hdrflags & HF_STDERR) {
179 >                        fputs(progname, stderr);
180 >                        fputs(": wrong header mode for decode\n", stderr);
181 >                }
182                  return 0;
183          }
184          if (dcp->inpfmt[0] && strcmp(dcp->inpfmt, DEPTH16FMT)) {
185 <                fputs(dcp->inpname, stderr);
186 <                fputs(": unexpected input format: ", stderr);
187 <                fputs(dcp->inpfmt, stderr);
188 <                fputc('\n', stderr);
185 >                if (dcp->hdrflags & HF_STDERR) {
186 >                        fputs(dcp->inpname, stderr);
187 >                        fputs(": unexpected input format: ", stderr);
188 >                        fputs(dcp->inpfmt, stderr);
189 >                        fputc('\n', stderr);
190 >                }
191                  return 0;
192          }
193          return 1;
# Line 172 | Line 203 | check_decode_worldpos(DEPTHCODEC *dcp)
203          if (!check_decode_depths(dcp))
204                  return 0;
205          if ((dcp->res.xr <= 0) | (dcp->res.yr <= 0)) {
206 <                fputs(progname, stderr);
207 <                fputs(": missing map resolution\n", stderr);
206 >                if (dcp->hdrflags & HF_STDERR) {
207 >                        fputs(progname, stderr);
208 >                        fputs(": missing map resolution\n", stderr);
209 >                }
210                  return 0;
211          }
212          if (!dcp->gotview) {
213 <                fputs(dcp->inpname, stderr);
214 <                fputs(": missing view\n", stderr);
213 >                if (dcp->hdrflags & HF_STDERR) {
214 >                        fputs(dcp->inpname, stderr);
215 >                        fputs(": missing view\n", stderr);
216 >                }
217                  return 0;
218          }
219          if ((err = setview(&dcp->vw)) != NULL) {
220 <                fputs(dcp->inpname, stderr);
221 <                fputs(": input view error: ", stderr);
222 <                fputs(err, stderr);
223 <                fputc('\n', stderr);
220 >                if (dcp->hdrflags & HF_STDERR) {
221 >                        fputs(dcp->inpname, stderr);
222 >                        fputs(": input view error: ", stderr);
223 >                        fputs(err, stderr);
224 >                        fputc('\n', stderr);
225 >                }
226                  return 0;
227          }
228          return 1;      
# Line 196 | Line 233 | check_decode_worldpos(DEPTHCODEC *dcp)
233   double
234   decode_depth_next(DEPTHCODEC *dcp)
235   {
236 <        int     c = getint(2, dcp->finp);
236 >        int     c;
237  
238 +        if (dcp->use_last) {
239 +                dcp->use_last = 0;
240 +                return code2depth(dcp->last_dc, dcp->refdepth);
241 +        }
242 +        c = getint(2, dcp->finp);
243 +
244          if (c == EOF && feof(dcp->finp))
245                  return -1.;
246  
247 +        dcp->last_dc = c;
248          dcp->curpos += 2;
249  
250          return code2depth(c, dcp->refdepth);
# Line 214 | Line 258 | compute_worldpos(FVECT wpos, DEPTHCODEC *dcp, int x, i
258          RREAL   loc[2];
259          FVECT   rdir;
260  
261 +        if (d >= FHUGE*.99)
262 +                goto badval;
263 +
264          pix2loc(loc, &dcp->res, x, y);
265  
266 <        if (viewray(wpos, rdir, &dcp->vw, loc[0], loc[1]) < -FTINY) {
267 <                VCOPY(wpos, dcp->vw.vp);
268 <                return 0;
266 >        if (viewray(wpos, rdir, &dcp->vw, loc[0], loc[1]) >= -FTINY) {
267 >                VSUM(wpos, wpos, rdir, d);
268 >                return 1;
269          }
270 <        VSUM(wpos, wpos, rdir, d);
271 <        return 1;
270 > badval:
271 >        VCOPY(wpos, dcp->vw.vp);
272 >        return 0;
273   }
274  
275  
# Line 252 | Line 300 | seek_dc_pix(DEPTHCODEC *dcp, int x, int y)
300          long    seekpos;
301  
302          if ((dcp->res.xr <= 0) | (dcp->res.yr <= 0)) {
303 <                fputs(progname, stderr);
304 <                fputs(": need map resolution to seek\n", stderr);
303 >                if (dcp->hdrflags & HF_STDERR) {
304 >                        fputs(progname, stderr);
305 >                        fputs(": need map resolution to seek\n", stderr);
306 >                }
307                  return -1;
308          }
309          if ((x < 0) | (y < 0) ||
310                          (x >= scanlen(&dcp->res)) | (y >= numscans(&dcp->res))) {
311 <                fputs(dcp->inpname, stderr);
312 <                fputs(": warning - pixel index off map\n", stderr);
311 >                if (dcp->hdrflags & HF_STDERR) {
312 >                        fputs(dcp->inpname, stderr);
313 >                        fputs(": warning - pixel index off map\n", stderr);
314 >                }
315                  return 0;
316          }
317          seekpos = dcp->dstart + 2*((long)y*scanlen(&dcp->res) + x);
318  
319 +        if (seekpos == dcp->curpos-2) {
320 +                dcp->use_last++;        /* avoids seek/read */
321 +                return 1;
322 +        }
323          if (seekpos != dcp->curpos &&
324                          fseek(dcp->finp, seekpos, SEEK_SET) == EOF) {
325 <                fputs(dcp->inpname, stderr);
326 <                fputs(": seek error\n", stderr);
325 >                if (dcp->hdrflags & HF_STDERR) {
326 >                        fputs(dcp->inpname, stderr);
327 >                        fputs(": seek error\n", stderr);
328 >                }
329                  return -1;
330          }
331          dcp->curpos = seekpos;
332 +        dcp->use_last = 0;
333          return 1;
334   }
335  

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines