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

Comparing ray/src/px/pinterp.c (file contents):
Revision 1.16 by greg, Sat Jan 6 22:27:10 1990 UTC vs.
Revision 1.19 by greg, Tue Jan 16 11:29:14 1990 UTC

# Line 10 | Line 10 | static char SCCSid[] = "$SunId$ LBL";
10  
11   #include "standard.h"
12  
13 + #include <sys/fcntl.h>
14 +
15   #include "view.h"
16  
17   #include "color.h"
18  
19 < #define pscan(y)        (ourpict+(y)*ourview.hresolu)
20 < #define zscan(y)        (ourzbuf+(y)*ourview.hresolu)
19 > #define pscan(y)        (ourpict+(y)*hresolu)
20 > #define zscan(y)        (ourzbuf+(y)*hresolu)
21  
22   #define F_FORE          1               /* fill foreground */
23   #define F_BACK          2               /* fill background */
# Line 28 | Line 30 | static char SCCSid[] = "$SunId$ LBL";
30  
31   struct position {int x,y; float z;};
32  
33 < VIEW    ourview = STDVIEW(512);         /* desired view */
33 > VIEW    ourview = STDVIEW;              /* desired view */
34 > int     hresolu = 512;                  /* horizontal resolution */
35 > int     vresolu = 512;                  /* vertical resolution */
36 > double  pixaspect = 1.0;                /* pixel aspect ratio */
37  
38   double  zeps = .02;                     /* allowed z epsilon */
39  
# Line 45 | Line 50 | double backz = 0.0;                    /* background z value */
50   int     normdist = 1;                   /* normalized distance? */
51   double  ourexp = -1;                    /* output picture exposure */
52  
53 < VIEW    theirview = STDVIEW(512);       /* input view */
53 > VIEW    theirview = STDVIEW;            /* input view */
54   int     gotview;                        /* got input view? */
55 < double  theirs2ours[4][4];              /* transformation matrix */
55 > int     thresolu, tvresolu;             /* input resolution */
56   double  theirexp;                       /* input picture exposure */
57 + double  theirs2ours[4][4];              /* transformation matrix */
58  
59   int     childpid = -1;                  /* id of fill process */
60   FILE    *psend, *precv;                 /* pipes to/from fill calculation */
# Line 65 | Line 71 | char   *argv[];
71          int     gotvfile = 0;
72          char    *zfile = NULL;
73          char    *err;
74 <        int     i;
74 >        int     i, rval;
75  
76          progname = argv[0];
77  
78 <        for (i = 1; i < argc && argv[i][0] == '-'; i++)
78 >        for (i = 1; i < argc && argv[i][0] == '-'; i++) {
79 >                rval = getviewopt(&ourview, argc-i, argv+i);
80 >                if (rval >= 0) {
81 >                        i += rval;
82 >                        continue;
83 >                }
84                  switch (argv[i][1]) {
85                  case 't':                               /* threshold */
86                          check(2,1);
# Line 124 | Line 135 | char   *argv[];
135                          break;
136                  case 'x':                               /* x resolution */
137                          check(2,1);
138 <                        ourview.hresolu = atoi(argv[++i]);
138 >                        hresolu = atoi(argv[++i]);
139                          break;
140                  case 'y':                               /* y resolution */
141                          check(2,1);
142 <                        ourview.vresolu = atoi(argv[++i]);
142 >                        vresolu = atoi(argv[++i]);
143                          break;
144 <                case 'v':                               /* view */
145 <                        switch (argv[i][2]) {
146 <                        case 't':                               /* type */
147 <                                check(4,0);
148 <                                ourview.type = argv[i][3];
149 <                                break;
139 <                        case 'p':                               /* point */
140 <                                check(3,3);
141 <                                ourview.vp[0] = atof(argv[++i]);
142 <                                ourview.vp[1] = atof(argv[++i]);
143 <                                ourview.vp[2] = atof(argv[++i]);
144 <                                break;
145 <                        case 'd':                               /* direction */
146 <                                check(3,3);
147 <                                ourview.vdir[0] = atof(argv[++i]);
148 <                                ourview.vdir[1] = atof(argv[++i]);
149 <                                ourview.vdir[2] = atof(argv[++i]);
150 <                                break;
151 <                        case 'u':                               /* up */
152 <                                check(3,3);
153 <                                ourview.vup[0] = atof(argv[++i]);
154 <                                ourview.vup[1] = atof(argv[++i]);
155 <                                ourview.vup[2] = atof(argv[++i]);
156 <                                break;
157 <                        case 'h':                               /* horizontal */
158 <                                check(3,1);
159 <                                ourview.horiz = atof(argv[++i]);
160 <                                break;
161 <                        case 'v':                               /* vertical */
162 <                                check(3,1);
163 <                                ourview.vert = atof(argv[++i]);
164 <                                break;
165 <                        case 'f':                               /* file */
166 <                                check(3,1);
167 <                                gotvfile = viewfile(argv[++i], &ourview);
168 <                                if (gotvfile < 0) {
169 <                                        perror(argv[i]);
170 <                                        exit(1);
171 <                                } else if (gotvfile == 0) {
172 <                                        fprintf(stderr, "%s: bad view file\n",
173 <                                                        argv[i]);
174 <                                        exit(1);
175 <                                }
176 <                                break;
177 <                        default:
144 >                case 'p':                               /* pixel aspect */
145 >                        check(2,1);
146 >                        pixaspect = atof(argv[++i]);
147 >                        break;
148 >                case 'v':                               /* view file */
149 >                        if (argv[i][2] != 'f')
150                                  goto badopt;
151 +                        check(3,1);
152 +                        gotvfile = viewfile(argv[++i], &ourview, 0, 0);
153 +                        if (gotvfile < 0) {
154 +                                perror(argv[i]);
155 +                                exit(1);
156 +                        } else if (gotvfile == 0) {
157 +                                fprintf(stderr, "%s: bad view file\n",
158 +                                                argv[i]);
159 +                                exit(1);
160                          }
161                          break;
162                  default:
# Line 184 | Line 165 | char   *argv[];
165                                          progname, argv[i]);
166                          goto userr;
167                  }
168 +        }
169                                                  /* check arguments */
170          if ((argc-i)%2)
171                  goto userr;
# Line 192 | Line 174 | char   *argv[];
174                  fprintf(stderr, "%s: %s\n", progname, err);
175                  exit(1);
176          }
177 +        normaspect(viewaspect(&ourview), &pixaspect, &hresolu, &vresolu);
178                                                  /* allocate frame */
179 <        ourpict = (COLR *)malloc(ourview.hresolu*ourview.vresolu*sizeof(COLR));
180 <        ourzbuf = (float *)calloc(ourview.hresolu*ourview.vresolu,sizeof(float));
179 >        ourpict = (COLR *)malloc(hresolu*vresolu*sizeof(COLR));
180 >        ourzbuf = (float *)calloc(hresolu*vresolu,sizeof(float));
181          if (ourpict == NULL || ourzbuf == NULL)
182                  syserror();
183                                                          /* get input */
# Line 214 | Line 197 | char   *argv[];
197                  fprintview(&ourview, stdout);
198                  printf("\n");
199          }
200 <        if (ourexp > 0 && ourexp != 1.0)
200 >        if (pixaspect < .99 || pixaspect > 1.01)
201 >                fputaspect(pixaspect, stdout);
202 >        if (ourexp > 0 && (ourexp < .995 || ourexp > 1.005))
203                  fputexpos(ourexp, stdout);
204          printf("\n");
205                                                          /* write picture */
# Line 226 | Line 211 | char   *argv[];
211          exit(0);
212   userr:
213          fprintf(stderr,
214 <        "Usage: %s [view opts][-t zthresh][-z zout][-fT][-n] pfile zspec ..\n",
214 >        "Usage: %s [view opts][-t eps][-z zout][-fT][-n] pfile zspec ..\n",
215                          progname);
216          exit(1);
217   #undef check
# Line 247 | Line 232 | char   *s;
232          }
233          for (an = altname; *an != NULL; an++)
234                  if (!strncmp(*an, s, strlen(*an))) {
235 <                        if (sscanview(&theirview, s+strlen(*an)) == 0)
235 >                        if (sscanview(&theirview, s+strlen(*an)) > 0)
236                                  gotview++;
237                          break;
238                  }
# Line 258 | Line 243 | addpicture(pfile, zspec)               /* add picture to output */
243   char    *pfile, *zspec;
244   {
245          extern double   atof();
246 <        FILE    *pfp, *zfp;
246 >        FILE    *pfp;
247 >        int     zfd;
248          char    *err;
249          COLR    *scanin;
250          float   *zin;
# Line 274 | Line 260 | char   *pfile, *zspec;
260          gotview = 0;
261          printf("%s:\n", pfile);
262          getheader(pfp, headline);
263 <        if (!gotview || fgetresolu(&theirview.hresolu, &theirview.vresolu, pfp)
263 >        if (!gotview || fgetresolu(&thresolu, &tvresolu, pfp)
264                          != (YMAJOR|YDECR)) {
265                  fprintf(stderr, "%s: picture view error\n", pfile);
266                  exit(1);
# Line 290 | Line 276 | char   *pfile, *zspec;
276                                          /* compute transformation */
277          pixform(theirs2ours, &theirview, &ourview);
278                                          /* allocate scanlines */
279 <        scanin = (COLR *)malloc(theirview.hresolu*sizeof(COLR));
280 <        zin = (float *)malloc(theirview.hresolu*sizeof(float));
281 <        plast = (struct position *)calloc(theirview.hresolu,
296 <                                                sizeof(struct position));
279 >        scanin = (COLR *)malloc(thresolu*sizeof(COLR));
280 >        zin = (float *)malloc(thresolu*sizeof(float));
281 >        plast = (struct position *)calloc(thresolu, sizeof(struct position));
282          if (scanin == NULL || zin == NULL || plast == NULL)
283                  syserror();
284                                          /* get z specification or file */
285 <        if ((zfp = fopen(zspec, "r")) == NULL) {
285 >        if ((zfd = open(zspec, O_RDONLY)) == -1) {
286                  double  zvalue;
287                  register int    x;
288                  if (!isfloat(zspec) || (zvalue = atof(zspec)) <= 0.0) {
289                          perror(zspec);
290                          exit(1);
291                  }
292 <                for (x = 0; x < theirview.hresolu; x++)
292 >                for (x = 0; x < thresolu; x++)
293                          zin[x] = zvalue;
294          }
295                                          /* load image */
296 <        for (y = theirview.vresolu-1; y >= 0; y--) {
297 <                if (freadcolrs(scanin, theirview.hresolu, pfp) < 0) {
296 >        for (y = tvresolu-1; y >= 0; y--) {
297 >                if (freadcolrs(scanin, thresolu, pfp) < 0) {
298                          fprintf(stderr, "%s: read error\n", pfile);
299                          exit(1);
300                  }
301 <                if (zfp != NULL
302 <                        && fread(zin,sizeof(float),theirview.hresolu,zfp)
318 <                                < theirview.hresolu) {
301 >                if (zfd != -1 && read(zfd,zin,thresolu*sizeof(float))
302 >                                < thresolu*sizeof(float)) {
303                          fprintf(stderr, "%s: read error\n", zspec);
304                          exit(1);
305                  }
# Line 326 | Line 310 | char   *pfile, *zspec;
310          free((char *)zin);
311          free((char *)plast);
312          fclose(pfp);
313 <        if (zfp != NULL)
314 <                fclose(zfp);
313 >        if (zfd != -1)
314 >                close(zfd);
315   }
316  
317  
# Line 338 | Line 322 | register VIEW  *vw1, *vw2;
322          double  m4t[4][4];
323  
324          setident4(xfmat);
325 <        xfmat[0][0] = vw1->vhinc[0];
326 <        xfmat[0][1] = vw1->vhinc[1];
327 <        xfmat[0][2] = vw1->vhinc[2];
328 <        xfmat[1][0] = vw1->vvinc[0];
329 <        xfmat[1][1] = vw1->vvinc[1];
330 <        xfmat[1][2] = vw1->vvinc[2];
325 >        xfmat[0][0] = vw1->hvec[0];
326 >        xfmat[0][1] = vw1->hvec[1];
327 >        xfmat[0][2] = vw1->hvec[2];
328 >        xfmat[1][0] = vw1->vvec[0];
329 >        xfmat[1][1] = vw1->vvec[1];
330 >        xfmat[1][2] = vw1->vvec[2];
331          xfmat[2][0] = vw1->vdir[0];
332          xfmat[2][1] = vw1->vdir[1];
333          xfmat[2][2] = vw1->vdir[2];
# Line 351 | Line 335 | register VIEW  *vw1, *vw2;
335          xfmat[3][1] = vw1->vp[1];
336          xfmat[3][2] = vw1->vp[2];
337          setident4(m4t);
338 <        m4t[0][0] = vw2->vhinc[0]/vw2->vhn2;
339 <        m4t[1][0] = vw2->vhinc[1]/vw2->vhn2;
340 <        m4t[2][0] = vw2->vhinc[2]/vw2->vhn2;
341 <        m4t[3][0] = -DOT(vw2->vp,vw2->vhinc)/vw2->vhn2;
342 <        m4t[0][1] = vw2->vvinc[0]/vw2->vvn2;
343 <        m4t[1][1] = vw2->vvinc[1]/vw2->vvn2;
344 <        m4t[2][1] = vw2->vvinc[2]/vw2->vvn2;
345 <        m4t[3][1] = -DOT(vw2->vp,vw2->vvinc)/vw2->vvn2;
338 >        m4t[0][0] = vw2->hvec[0]/vw2->hn2;
339 >        m4t[1][0] = vw2->hvec[1]/vw2->hn2;
340 >        m4t[2][0] = vw2->hvec[2]/vw2->hn2;
341 >        m4t[3][0] = -DOT(vw2->vp,vw2->hvec)/vw2->hn2;
342 >        m4t[0][1] = vw2->vvec[0]/vw2->vn2;
343 >        m4t[1][1] = vw2->vvec[1]/vw2->vn2;
344 >        m4t[2][1] = vw2->vvec[2]/vw2->vn2;
345 >        m4t[3][1] = -DOT(vw2->vp,vw2->vvec)/vw2->vn2;
346          m4t[0][2] = vw2->vdir[0];
347          m4t[1][2] = vw2->vdir[1];
348          m4t[2][2] = vw2->vdir[2];
# Line 378 | Line 362 | struct position        *lasty;         /* input/output */
362          struct position lastx, newpos;
363          register int    x;
364  
365 <        for (x = theirview.hresolu-1; x >= 0; x--) {
366 <                pos[0] = x - .5*(theirview.hresolu-1);
367 <                pos[1] = y - .5*(theirview.vresolu-1);
365 >        for (x = thresolu-1; x >= 0; x--) {
366 >                pos[0] = (x+.5)/thresolu + theirview.hoff - .5;
367 >                pos[1] = (y+.5)/tvresolu + theirview.voff - .5;
368                  pos[2] = zline[x];
369                  if (theirview.type == VT_PER) {
370                          if (normdist)   /* adjust for eye-ray distance */
371                                  pos[2] /= sqrt( 1.
372 <                                        + pos[0]*pos[0]*theirview.vhn2
373 <                                        + pos[1]*pos[1]*theirview.vvn2 );
372 >                                        + pos[0]*pos[0]*theirview.hn2
373 >                                        + pos[1]*pos[1]*theirview.vn2 );
374                          pos[0] *= pos[2];
375                          pos[1] *= pos[2];
376                  }
# Line 399 | Line 383 | struct position        *lasty;         /* input/output */
383                          pos[0] /= pos[2];
384                          pos[1] /= pos[2];
385                  }
386 <                pos[0] += .5*ourview.hresolu;
387 <                pos[1] += .5*ourview.vresolu;
388 <                newpos.x = pos[0];
389 <                newpos.y = pos[1];
386 >                pos[0] += .5 - ourview.hoff;
387 >                pos[1] += .5 - ourview.voff;
388 >                newpos.x = pos[0] * hresolu;
389 >                newpos.y = pos[1] * vresolu;
390                  newpos.z = zline[x];
391                                          /* add pixel to our image */
392 <                if (pos[0] >= 0 && newpos.x < ourview.hresolu
393 <                                && pos[1] >= 0 && newpos.y < ourview.vresolu) {
392 >                if (pos[0] >= 0 && newpos.x < hresolu
393 >                                && pos[1] >= 0 && newpos.y < vresolu) {
394                          addpixel(&newpos, &lastx, &lasty[x], pline[x], pos[2]);
395                          lasty[x].x = lastx.x = newpos.x;
396                          lasty[x].y = lastx.y = newpos.y;
# Line 477 | Line 461 | backpicture()                          /* background fill algorithm */
461          COLR    pfill;
462          register int    x, i;
463                                                          /* get back buffer */
464 <        yback = (int *)malloc(ourview.hresolu*sizeof(int));
464 >        yback = (int *)malloc(hresolu*sizeof(int));
465          if (yback == NULL)
466                  syserror();
467 <        for (x = 0; x < ourview.hresolu; x++)
467 >        for (x = 0; x < hresolu; x++)
468                  yback[x] = -2;
469          /*
470           * Xback and yback are the pixel locations of suitable
# Line 489 | Line 473 | backpicture()                          /* background fill algorithm */
473           * that there is no suitable background in this direction.
474           */
475                                                          /* fill image */
476 <        for (y = 0; y < ourview.vresolu; y++) {
476 >        for (y = 0; y < vresolu; y++) {
477                  xback = -2;
478 <                for (x = 0; x < ourview.hresolu; x++)
478 >                for (x = 0; x < hresolu; x++)
479                          if (zscan(y)[x] <= 0) {         /* empty pixel */
480                                  /*
481                                   * First, find background from above or below.
482                                   * (farthest assigned pixel)
483                                   */
484                                  if (yback[x] == -2) {
485 <                                        for (i = y+1; i < ourview.vresolu; i++)
485 >                                        for (i = y+1; i < vresolu; i++)
486                                                  if (zscan(i)[x] > 0)
487                                                          break;
488 <                                        if (i < ourview.vresolu
488 >                                        if (i < vresolu
489                                  && (y <= 0 || zscan(y-1)[x] < zscan(i)[x]))
490                                                  yback[x] = i;
491                                          else
# Line 511 | Line 495 | backpicture()                          /* background fill algorithm */
495                                   * Next, find background from left or right.
496                                   */
497                                  if (xback == -2) {
498 <                                        for (i = x+1; i < ourview.hresolu; i++)
498 >                                        for (i = x+1; i < hresolu; i++)
499                                                  if (zscan(y)[i] > 0)
500                                                          break;
501 <                                        if (i < ourview.hresolu
501 >                                        if (i < hresolu
502                                  && (x <= 0 || zscan(y)[x-1] < zscan(y)[i]))
503                                                  xback = i;
504                                          else
# Line 556 | Line 540 | fillpicture()                          /* paint in empty pixels with default
540   {
541          register int    x, y;
542  
543 <        for (y = 0; y < ourview.vresolu; y++)
544 <                for (x = 0; x < ourview.hresolu; x++)
543 >        for (y = 0; y < vresolu; y++)
544 >                for (x = 0; x < hresolu; x++)
545                          if (zscan(y)[x] <= 0)
546                                  (*deffill)(x,y);
547   }
# Line 567 | Line 551 | writepicture()                         /* write out picture */
551   {
552          int     y;
553  
554 <        fputresolu(YMAJOR|YDECR, ourview.hresolu, ourview.vresolu, stdout);
555 <        for (y = ourview.vresolu-1; y >= 0; y--)
556 <                if (fwritecolrs(pscan(y), ourview.hresolu, stdout) < 0)
554 >        fputresolu(YMAJOR|YDECR, hresolu, vresolu, stdout);
555 >        for (y = vresolu-1; y >= 0; y--)
556 >                if (fwritecolrs(pscan(y), hresolu, stdout) < 0)
557                          syserror();
558   }
559  
# Line 579 | Line 563 | char   *fname;
563   {
564          extern double   sqrt();
565          int     donorm = normdist && ourview.type == VT_PER;
566 <        FILE    *fp;
566 >        int     fd;
567          int     y;
568          float   *zout;
569  
570 <        if ((fp = fopen(fname, "w")) == NULL) {
570 >        if ((fd = open(fname, O_WRONLY|O_CREAT|O_TRUNC, 0666)) == -1) {
571                  perror(fname);
572                  exit(1);
573          }
574          if (donorm
575 <        && (zout = (float *)malloc(ourview.hresolu*sizeof(float))) == NULL)
575 >        && (zout = (float *)malloc(hresolu*sizeof(float))) == NULL)
576                  syserror();
577 <        for (y = ourview.vresolu-1; y >= 0; y--) {
577 >        for (y = vresolu-1; y >= 0; y--) {
578                  if (donorm) {
579                          double  vx, yzn2;
580                          register int    x;
581 <                        yzn2 = y - .5*(ourview.vresolu-1);
582 <                        yzn2 = 1. + yzn2*yzn2*ourview.vvn2;
583 <                        for (x = 0; x < ourview.hresolu; x++) {
584 <                                vx = x - .5*(ourview.hresolu-1);
581 >                        yzn2 = y - .5*(vresolu-1);
582 >                        yzn2 = 1. + yzn2*yzn2*ourview.vn2;
583 >                        for (x = 0; x < hresolu; x++) {
584 >                                vx = x - .5*(hresolu-1);
585                                  zout[x] = zscan(y)[x]
586 <                                        * sqrt(vx*vx*ourview.vhn2 + yzn2);
586 >                                        * sqrt(vx*vx*ourview.hn2 + yzn2);
587                          }
588                  } else
589                          zout = zscan(y);
590 <                if (fwrite(zout, sizeof(float), ourview.hresolu, fp)
591 <                                < ourview.hresolu) {
590 >                if (write(fd, zout, hresolu*sizeof(float))
591 >                                < hresolu*sizeof(float)) {
592                          perror(fname);
593                          exit(1);
594                  }
595          }
596          if (donorm)
597                  free((char *)zout);
598 <        fclose(fp);
598 >        close(fd);
599   }
600  
601  
# Line 704 | Line 688 | int    x, y;
688                  clearqueue();
689          }
690                                          /* send new ray */
691 <        rayview(orig, dir, &ourview, x+.5, y+.5);
691 >        viewray(orig, dir, &ourview, (x+.5)/hresolu, (y+.5)/vresolu);
692          outbuf[0] = orig[0]; outbuf[1] = orig[1]; outbuf[2] = orig[2];
693          outbuf[3] = dir[0]; outbuf[4] = dir[1]; outbuf[5] = dir[2];
694          if (fwrite(outbuf, sizeof(float), 6, psend) < 6)

Diff Legend

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