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

Comparing ray/src/common/image.c (file contents):
Revision 2.40 by greg, Wed Apr 3 00:35:09 2013 UTC vs.
Revision 2.54 by greg, Thu Jan 13 00:26:09 2022 UTC

# Line 15 | Line 15 | static const char      RCSid[] = "$Id$";
15   #include  "paths.h"
16   #include  "view.h"
17  
18 –
19 – #define  FEQ(x,y)       (fabs((x)-(y)) <= FTINY)
20 – #define  VEQ(v,w)       (FEQ((v)[0],(w)[0]) && FEQ((v)[1],(w)[1]) \
21 –                                && FEQ((v)[2],(w)[2]))
22 –
18   VIEW  stdview = STDVIEW;                /* default view parameters */
19  
20   static gethfunc gethview;
# Line 68 | Line 63 | VIEW  *v
63                          return(ill_horiz);
64                  if (v->vert >= 180.0-FTINY)
65                          return(ill_vert);
66 <                v->hn2 = 2.0 * tan(v->horiz*(PI/180.0/2.0));
67 <                v->vn2 = 2.0 * tan(v->vert*(PI/180.0/2.0));
66 >                v->hn2 = 2.0 * tan(v->horiz*(PI/360.));
67 >                v->vn2 = 2.0 * tan(v->vert*(PI/360.));
68                  break;
69          case VT_CYL:                            /* cylindrical panorama */
70                  if (v->horiz > 360.0+FTINY)
# Line 77 | Line 72 | VIEW  *v
72                  if (v->vert >= 180.0-FTINY)
73                          return(ill_vert);
74                  v->hn2 = v->horiz * (PI/180.0);
75 <                v->vn2 = 2.0 * tan(v->vert*(PI/180.0/2.0));
75 >                v->vn2 = 2.0 * tan(v->vert*(PI/360.));
76                  break;
77          case VT_ANG:                            /* angular fisheye */
78                  if (v->horiz > 360.0+FTINY)
# Line 92 | Line 87 | VIEW  *v
87                          return(ill_horiz);
88                  if (v->vert > 180.0+FTINY)
89                          return(ill_vert);
90 <                v->hn2 = 2.0 * sin(v->horiz*(PI/180.0/2.0));
91 <                v->vn2 = 2.0 * sin(v->vert*(PI/180.0/2.0));
90 >                v->hn2 = 2.0 * sin(v->horiz*(PI/360.));
91 >                v->vn2 = 2.0 * sin(v->vert*(PI/360.));
92                  break;
93          case VT_PLS:                            /* planispheric fisheye */
94                  if (v->horiz >= 360.0-FTINY)
95                          return(ill_horiz);
96                  if (v->vert >= 360.0-FTINY)
97                          return(ill_vert);
98 <                v->hn2 = 2.*sin(v->horiz*(PI/180.0/2.0)) /
99 <                                (1.0 + cos(v->horiz*(PI/180.0/2.0)));
100 <                v->vn2 = 2.*sin(v->vert*(PI/180.0/2.0)) /
101 <                                (1.0 + cos(v->vert*(PI/180.0/2.0)));
98 >                v->hn2 = 2.*sin(v->horiz*(PI/360.)) /
99 >                                (1.0 + cos(v->horiz*(PI/360.)));
100 >                v->vn2 = 2.*sin(v->vert*(PI/360.)) /
101 >                                (1.0 + cos(v->vert*(PI/360.)));
102                  break;
103          default:
104                  return("unknown view type");
# Line 125 | Line 120 | VIEW  *v
120   }
121  
122  
123 + char *
124 + cropview(                       /* crop a view to the indicated bounds */
125 + VIEW *v,
126 + double x0,
127 + double y0,
128 + double x1,
129 + double y1
130 + )
131 + {
132 +        static char     ill_hemi[] = "illegal crop for hemispherical view";
133 +        double  d;
134 +                                        /* order crop extrema */
135 +        if (x0 > x1) { d=x0; x0=x1; x1=d; }
136 +        if (y0 > y1) { d=y0; y0=y1; y1=d; }
137 +
138 +        if ((x1-x0 <= FTINY) | (y1-y0 <= FTINY))
139 +                return("zero crop area");
140 +
141 +        d = x1 - x0;                    /* adjust horizontal size? */
142 +        if (!FABSEQ(d, 1.))
143 +                switch (v->type) {
144 +                case VT_PER:
145 +                        v->horiz = 360./PI*atan( d*tan(PI/360.*v->horiz) );
146 +                        break;
147 +                case VT_PAR:
148 +                case VT_ANG:
149 +                case VT_CYL:
150 +                        v->horiz *= d;
151 +                        break;
152 +                case VT_HEM:
153 +                        d *= sin(PI/360.*v->horiz);
154 +                        if (d > 1.)
155 +                                return(ill_hemi);
156 +                        v->horiz = 360./PI*asin( d );
157 +                        break;
158 +                case VT_PLS:
159 +                        d *= sin(PI/360.*v->horiz) /
160 +                                        (1. + cos(PI/360.*v->horiz));
161 +                        v->horiz = 360./PI*acos( (1. - d*d) / (1. + d*d) );
162 +                        break;
163 +                }
164 +
165 +        d = y1 - y0;                    /* adjust vertical size? */
166 +        if (!FABSEQ(d, 1.))
167 +                switch (v->type) {
168 +                case VT_PER:
169 +                case VT_CYL:
170 +                        v->vert = 360./PI*atan( d*tan(PI/360.*v->vert) );
171 +                        break;
172 +                case VT_PAR:
173 +                case VT_ANG:
174 +                        v->vert *= d;
175 +                        break;
176 +                case VT_HEM:
177 +                        d *= sin(PI/360.*v->vert);
178 +                        if (d > 1.)
179 +                                return(ill_hemi);
180 +                        v->vert = 360./PI*asin( d );
181 +                        break;
182 +                case VT_PLS:
183 +                        d *= sin(PI/360.*v->vert) /
184 +                                        (1. + cos(PI/360.*v->vert));
185 +                        v->vert = 360./PI*acos( (1. - d*d) / (1. + d*d) );
186 +                        break;
187 +                }
188 +                                        /* adjust offsets */
189 +        v->hoff = ((x0 + x1)*.5 - .5 + v->hoff) / (x1 - x0);
190 +        v->voff = ((y0 + y1)*.5 - .5 + v->voff) / (y1 - y0);
191 +
192 +        return(setview(v));             /* final error checks & set-up */
193 + }
194 +
195 +
196   void
197   normaspect(                             /* fix pixel aspect or resolution */
198   double  va,                     /* view aspect ratio */
# Line 226 | Line 294 | double  y
294   }
295  
296  
297 < void
297 > int
298   viewloc(                        /* find image location for point */
299   FVECT  ip,
300   VIEW  *v,
301   FVECT  p
302 < )
302 > )       /* Use VL_* flags to interpret return value */
303   {
304 +        int     rflags = VL_GOOD;
305          double  d, d2;
306          FVECT  disp;
307  
# Line 244 | Line 313 | FVECT  p
313                  break;
314          case VT_PER:                    /* perspective view */
315                  d = DOT(disp,v->vdir);
316 +                if ((v->vaft > FTINY) & (d >= v->vaft))
317 +                        rflags |= VL_BEYOND;
318                  ip[2] = VLEN(disp);
319 <                if (d < 0.0) {          /* fold pyramid */
319 >                if (d < -FTINY) {       /* fold pyramid */
320                          ip[2] = -ip[2];
321                          d = -d;
322 <                }
323 <                if (d > FTINY) {
324 <                        d = 1.0/d;
325 <                        disp[0] *= d;
326 <                        disp[1] *= d;
327 <                        disp[2] *= d;
328 <                }
322 >                } else if (d <= FTINY)
323 >                        return(VL_BAD); /* at infinite edge */
324 >                d = 1.0/d;
325 >                disp[0] *= d;
326 >                disp[1] *= d;
327 >                disp[2] *= d;
328 >                if (ip[2] < 0.0) d = -d;
329                  ip[2] *= (1.0 - v->vfore*d);
330                  break;
331          case VT_HEM:                    /* hemispherical fisheye */
# Line 269 | Line 340 | FVECT  p
340                  d = DOT(disp,v->hvec);
341                  d2 = DOT(disp,v->vdir);
342                  ip[0] = 180.0/PI * atan2(d,d2) / v->horiz + 0.5 - v->hoff;
343 <                d = 1.0/sqrt(d*d + d2*d2);
343 >                d2 = d*d + d2*d2;
344 >                if (d2 <= FTINY*FTINY)
345 >                        return(VL_BAD); /* at pole */
346 >                if ((v->vaft > FTINY) & (d2 >= v->vaft*v->vaft))
347 >                        rflags |= VL_BEYOND;
348 >                d = 1.0/sqrt(d2);
349                  ip[1] = DOT(disp,v->vvec)*d/v->vn2 + 0.5 - v->voff;
350                  ip[2] = VLEN(disp);
351                  ip[2] *= (1.0 - v->vfore*d);
352 <                return;
352 >                goto gotall;
353          case VT_ANG:                    /* angular fisheye */
354                  ip[0] = 0.5 - v->hoff;
355                  ip[1] = 0.5 - v->voff;
356                  ip[2] = normalize(disp) - v->vfore;
357                  d = DOT(disp,v->vdir);
358                  if (d >= 1.0-FTINY)
359 <                        return;
359 >                        goto gotall;
360                  if (d <= -(1.0-FTINY)) {
361                          ip[0] += 180.0/v->horiz;
362 <                        return;
362 >                        goto gotall;
363                  }
364                  d = (180.0/PI)*acos(d) / sqrt(1.0 - d*d);
365                  ip[0] += DOT(disp,v->hvec)*d/v->horiz;
366                  ip[1] += DOT(disp,v->vvec)*d/v->vert;
367 <                return;
367 >                goto gotall;
368          case VT_PLS:                    /* planispheric fisheye */
369                  ip[0] = 0.5 - v->hoff;
370                  ip[1] = 0.5 - v->voff;
371                  ip[2] = normalize(disp) - v->vfore;
372                  d = DOT(disp,v->vdir);
373                  if (d >= 1.0-FTINY)
374 <                        return;
374 >                        goto gotall;
375                  if (d <= -(1.0-FTINY))
376 <                        return;         /* really an error */
376 >                        return(VL_BAD);
377                  ip[0] += DOT(disp,v->hvec)/((1. + d)*sqrt(v->hn2));
378                  ip[1] += DOT(disp,v->vvec)/((1. + d)*sqrt(v->vn2));
379 <                return;
379 >                goto gotall;
380 >        default:
381 >                return(VL_BAD);
382          }
383          ip[0] = DOT(disp,v->hvec)/v->hn2 + 0.5 - v->hoff;
384          ip[1] = DOT(disp,v->vvec)/v->vn2 + 0.5 - v->voff;
385 + gotall:                                 /* add appropriate return flags */
386 +        if (ip[2] <= 0.0)
387 +                rflags |= VL_BEHIND;
388 +        else if ((v->type != VT_PER) & (v->type != VT_CYL))
389 +                rflags |= VL_BEYOND*((v->vaft > FTINY) &
390 +                                        (ip[2] >= v->vaft - v->vfore));
391 +        rflags |= VL_OUTSIDE*((0.0 >= ip[0]) | (ip[0] >= 1.0) |
392 +                                (0.0 >= ip[1]) | (ip[1] >= 1.0));
393 +        return(rflags);
394   }
395  
396  
# Line 367 | Line 454 | int  ac,
454   char  *av[]
455   )
456   {
457 < #define check(c,l)      if ((av[0][c]&&av[0][c]!=' ') || \
457 > #define check(c,l)      if ((av[0][c]&&!isspace(av[0][c])) || \
458                          badarg(ac-1,av+1,l)) return(-1)
459  
460          if (ac <= 0 || av[0][0] != '-' || av[0][1] != 'v')
461                  return(-1);
462          switch (av[0][2]) {
463          case 't':                       /* type */
464 <                if (!av[0][3] || av[0][3]==' ')
464 >                if (!av[0][3] || isspace(av[0][3]))
465                          return(-1);
466                  check(4,"");
467                  v->type = av[0][3];
# Line 495 | Line 582 | VIEW  *vp
582                  sprintf(cp, " -vt%c", vp->type);
583                  cp += strlen(cp);
584          }
585 <        if (!VEQ(vp->vp,stdview.vp)) {
585 >        if (!VABSEQ(vp->vp,stdview.vp)) {
586                  sprintf(cp, " -vp %.6g %.6g %.6g",
587                                  vp->vp[0], vp->vp[1], vp->vp[2]);
588                  cp += strlen(cp);
589          }
590 <        if (!FEQ(vp->vdist,stdview.vdist) || !VEQ(vp->vdir,stdview.vdir)) {
590 >        if (!FABSEQ(vp->vdist,stdview.vdist) || !VABSEQ(vp->vdir,stdview.vdir)) {
591                  sprintf(cp, " -vd %.6g %.6g %.6g",
592                                  vp->vdir[0]*vp->vdist,
593                                  vp->vdir[1]*vp->vdist,
594                                  vp->vdir[2]*vp->vdist);
595                  cp += strlen(cp);
596          }
597 <        if (!VEQ(vp->vup,stdview.vup)) {
597 >        if (!VABSEQ(vp->vup,stdview.vup)) {
598                  sprintf(cp, " -vu %.6g %.6g %.6g",
599                                  vp->vup[0], vp->vup[1], vp->vup[2]);
600                  cp += strlen(cp);
601          }
602 <        if (!FEQ(vp->horiz,stdview.horiz)) {
602 >        if (!FABSEQ(vp->horiz,stdview.horiz)) {
603                  sprintf(cp, " -vh %.6g", vp->horiz);
604                  cp += strlen(cp);
605          }
606 <        if (!FEQ(vp->vert,stdview.vert)) {
606 >        if (!FABSEQ(vp->vert,stdview.vert)) {
607                  sprintf(cp, " -vv %.6g", vp->vert);
608                  cp += strlen(cp);
609          }
610 <        if (!FEQ(vp->vfore,stdview.vfore)) {
610 >        if (!FABSEQ(vp->vfore,stdview.vfore)) {
611                  sprintf(cp, " -vo %.6g", vp->vfore);
612                  cp += strlen(cp);
613          }
614 <        if (!FEQ(vp->vaft,stdview.vaft)) {
614 >        if (!FABSEQ(vp->vaft,stdview.vaft)) {
615                  sprintf(cp, " -va %.6g", vp->vaft);
616                  cp += strlen(cp);
617          }
618 <        if (!FEQ(vp->hoff,stdview.hoff)) {
618 >        if (!FABSEQ(vp->hoff,stdview.hoff)) {
619                  sprintf(cp, " -vs %.6g", vp->hoff);
620                  cp += strlen(cp);
621          }
622 <        if (!FEQ(vp->voff,stdview.voff)) {
622 >        if (!FABSEQ(vp->voff,stdview.voff)) {
623                  sprintf(cp, " -vl %.6g", vp->voff);
624                  cp += strlen(cp);
625          }
# Line 559 | Line 646 | char  *s
646          }
647                                          /* skip leading path */
648          cp = s;
649 <        while (*cp && *cp != ' ')
649 >        while (*cp && !isspace(*cp))
650                  cp++;
651          while (cp > s && !ISDIRSEP(cp[-1]))
652                  cp--;
# Line 611 | Line 698 | RESOLU  *rp
698          if (rp != NULL && !fgetsresolu(rp, fp))
699                  mvs.ok = 0;
700  
701 <        fclose(fp);
701 >        if (fp != stdin)
702 >                fclose(fp);
703  
704          return(mvs.ok);
705   }

Diff Legend

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