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

Comparing ray/src/util/rpiece.c (file contents):
Revision 2.30 by greg, Mon Apr 11 14:44:10 1994 UTC vs.
Revision 2.55 by greg, Fri Nov 8 18:08:07 2013 UTC

# Line 1 | Line 1
1 – /* Copyright (c) 1993 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   * Generate sections of a picture.
6   */
7  
8 +
9 + #include <stdio.h>
10 + #include <signal.h>
11 + #include <sys/types.h>
12 +
13 + #include "platform.h"
14 + #ifndef NON_POSIX /* XXX need abstraction for process management */
15 + #include <sys/wait.h>
16 + #endif
17 +
18   #include "standard.h"
19 + #include "color.h"
20 + #include "view.h"
21 + #include "rtprocess.h"
22  
23   #ifndef F_SETLKW
24  
25 < main(argc, argv)
26 < int argc;
27 < char *argv[];
25 > int
26 > main(
27 >        int argc,
28 >        char *argv[]
29 > )
30   {
31          fprintf(stderr, "%s: no NFS lock manager on this machine\n", argv[0]);
32          exit(1);
# Line 22 | Line 34 | char *argv[];
34  
35   #else
36  
25 – #include <signal.h>
26 – #include "color.h"
27 – #include "view.h"
28 – #include "resolu.h"
29 –
37   #ifndef NFS
38   #define  NFS                    1
39   #endif
40 <                                /* set the following to 0 to forgo forking */
40 >
41 > #ifndef RHAS_FORK_EXEC
42 > #undef MAXFORK
43 > #define MAXFORK                 0
44 > #endif
45   #ifndef MAXFORK
46   #if NFS
47   #define  MAXFORK                3       /* allotment of duped processes */
# Line 44 | Line 55 | char *argv[];
55   #define unguard()       sigrelse(SIGALRM)
56   #endif
57   #ifndef guard_io
58 < #define guard_io()      0
59 < #define unguard()       0
58 > #define guard_io()      
59 > #define unguard()      
60   #endif
61 +
62 + extern char  *strerror();
63 +
64                                  /* rpict command */
65   char  *rpargv[128] = {"rpict", "-S", "1"};
66   int  rpargc = 3;
53 – int  rpd[3];
67   FILE  *torp, *fromrp;
68   COLR  *pbuf;
69                                  /* our view parameters */
# Line 69 | Line 82 | int  nforked = 0;
82  
83   char  *progname;
84   int  verbose = 0;
85 + int  nowarn = 0;
86 + unsigned  timelim = 0;
87   int  rvrlim = -1;
88  
74 – extern long  lseek(), ftell();
75 –
89   int  gotalrm = 0;
90 < int  onalrm() { gotalrm++; }
90 > void  onalrm(int i) { gotalrm++; }
91  
92 + static void dolock(int  fd, int  ltyp);
93 + static void init(int  ac, char  **av);
94 + static int nextpiece(int        *xp, int        *yp);
95 + static int rvrpiece(int *xp, int        *yp);
96 + static int cleanup(int  rstat);
97 + static void rpiece(void);
98 + static int putpiece(int xpos, int       ypos);
99 + static void filerr(char  *t);
100  
101 < main(argc, argv)
102 < int  argc;
103 < char  *argv[];
101 >
102 > int
103 > main(
104 >        int  argc,
105 >        char  *argv[]
106 > )
107   {
108 <        register int  i, rval;
108 >        int  i, rval;
109          
110          progname = argv[0];
111          for (i = 1; i < argc; i++) {
112                                                  /* expand arguments */
113 <                while (rval = expandarg(&argc, &argv, i))
114 <                        if (rval < 0) {
115 <                                fprintf(stderr, "%s: cannot expand '%s'",
116 <                                                argv[0], argv[i]);
117 <                                exit(1);
118 <                        }
113 >                while ((rval = expandarg(&argc, &argv, i)) > 0)
114 >                        ;
115 >                if (rval < 0) {
116 >                        fprintf(stderr, "%s: cannot expand '%s'\n",
117 >                                        argv[0], argv[i]);
118 >                        exit(1);
119 >                }
120                  if (argv[i][0] == '-')
121                          switch (argv[i][1]) {
122 +                        case 'w':
123 +                                if (!argv[i][2])
124 +                                        nowarn = !nowarn;
125 +                                else if (argv[i][2] == '+')
126 +                                        nowarn = 0;
127 +                                else if (argv[i][2] == '-')
128 +                                        nowarn = 1;
129 +                                break;
130                          case 'v':
131                                  switch (argv[i][2]) {
132                                  case '\0':      /* verbose option */
# Line 116 | Line 149 | char  *argv[];
149                                  }
150                                  break;
151                          case 'p':               /* pixel aspect ratio? */
152 +                                if (argv[i][2] == 'm') {
153 +                                        fprintf(stderr, "%s: -pm unsupported\n",
154 +                                                argv[0]);
155 +                                        ++i;
156 +                                        continue;
157 +                                }
158                                  if (argv[i][2] != 'a' || argv[i][3])
159                                          break;
160 <                                pixaspect = atof(argv[i+1]);
160 >                                pixaspect = atof(argv[++i]);
161                                  continue;
162 +                        case 'T':               /* time limit (hours) */
163 +                                if (argv[i][2])
164 +                                        break;
165 +                                timelim = atof(argv[++i])*3600. + .5;
166 +                                continue;
167                          case 'x':               /* overall x resolution */
168                                  if (argv[i][2])
169                                          break;
# Line 164 | Line 208 | char  *argv[];
208                                          break;
209                                  outfile = argv[++i];
210                                  continue;
211 <                        } else if (i >= argc-1)
212 <                                break;
211 >                        }
212 >                else if (i >= argc-1)
213 >                        break;
214                  rpargv[rpargc++] = argv[i];
215          }
216          if (i >= argc) {
# Line 182 | Line 227 | char  *argv[];
227   }
228  
229  
230 < dolock(fd, ltyp)                /* lock or unlock a file */
231 < int  fd;
232 < int  ltyp;
230 > static void
231 > dolock(         /* lock or unlock a file */
232 >        int  fd,
233 >        int  ltyp
234 > )
235   {
236          static struct flock  fls;       /* static so initialized to zeroes */
190 –        extern char  *sys_errlist[];
237  
238          fls.l_type = ltyp;
239          if (fcntl(fd, F_SETLKW, &fls) < 0) {
240                  fprintf(stderr, "%s: cannot lock/unlock file: %s\n",
241 <                                progname, sys_errlist[errno]);
242 <                exit(1);
241 >                                progname, strerror(errno));
242 >                _exit(1);
243          }
244   }
245  
246  
247 < init(ac, av)                    /* set up output file and start rpict */
248 < int  ac;
249 < char  **av;
247 > static void
248 > init(                   /* set up output file and start rpict */
249 >        int  ac,
250 >        char  **av
251 > )
252   {
253          static char  hrbuf[16], vrbuf[16];
254          extern char  VersionID[];
255          char  *err;
256          FILE  *fp;
257          int  hr, vr;
258 +        SUBPROC  rpd; /* since we don't close_process(), this can be local */
259                                          /* set up view */
260          if ((err = setview(&ourview)) != NULL) {
261                  fprintf(stderr, "%s: %s\n", progname, err);
# Line 218 | Line 267 | char  **av;
267                  sflock(F_UNLCK);
268          }
269                                          /* compute piece size */
270 +        hr = hres; vr = vres;
271 +        if (pixaspect > FTINY)
272 +                normaspect(viewaspect(&ourview), &pixaspect, &hr, &vr);
273          hres /= hmult;
274          vres /= vmult;
275 +        if (hres <= 0 || vres <= 0) {
276 +                fprintf(stderr, "%s: illegal resolution/subdivision\n", progname);
277 +                exit(1);
278 +        }
279          normaspect(viewaspect(&ourview)*hmult/vmult, &pixaspect, &hres, &vres);
280 +        if (!nowarn && (hr != hres*hmult) | (vr != vres*vmult))
281 +                fprintf(stderr,
282 +                "%s: warning - resolution changed from %dx%d to %dx%d\n",
283 +                                progname, hr, vr, hres*hmult, vres*vmult);
284          sprintf(hrbuf, "%d", hres);
285          rpargv[rpargc++] = "-x"; rpargv[rpargc++] = hrbuf;
286          sprintf(vrbuf, "%d", vres);
# Line 239 | Line 299 | char  **av;
299                  fputs(VIEWSTR, fp);
300                  fprintview(&ourview, fp);
301                  putc('\n', fp);
302 +                fputnow(fp);
303                  if (pixaspect < .99 || pixaspect > 1.01)
304                          fputaspect(pixaspect, fp);
305                  fputformat(COLRFMT, fp);
# Line 265 | Line 326 | char  **av;
326                  goto filerr;
327          dolock(outfd, F_UNLCK);
328                                          /* start rpict process */
329 <        if (open_process(rpd, rpargv) <= 0) {
329 >        if (open_process(&rpd, rpargv) <= 0) {
330                  fprintf(stderr, "%s: cannot start %s\n", progname, rpargv[0]);
331                  exit(1);
332          }
333 <        if ((fromrp = fdopen(rpd[0], "r")) == NULL ||
334 <                        (torp = fdopen(rpd[1], "w")) == NULL) {
333 >        if ((fromrp = fdopen(rpd.r, "r")) == NULL ||
334 >                        (torp = fdopen(rpd.w, "w")) == NULL) {
335                  fprintf(stderr, "%s: cannot open stream to %s\n",
336                                  progname, rpargv[0]);
337                  exit(1);
# Line 280 | Line 341 | char  **av;
341                  exit(1);
342          }
343          signal(SIGALRM, onalrm);
344 +        if (timelim)
345 +                alarm(timelim);
346          return;
347   filerr:
348          fprintf(stderr, "%s: i/o error on file \"%s\"\n", progname, outfile);
# Line 287 | Line 350 | filerr:
350   }
351  
352  
353 < int
354 < nextpiece(xp, yp)               /* get next piece assignment */
355 < int  *xp, *yp;
353 > static int
354 > nextpiece(              /* get next piece assignment */
355 >        int     *xp,
356 >        int     *yp
357 > )
358   {
359          if (gotalrm)                    /* someone wants us to quit */
360                  return(0);
# Line 329 | Line 394 | int  *xp, *yp;
394   }
395  
396  
397 < int
398 < rvrpiece(xp, yp)                /* check for recoverable pieces */
399 < register int  *xp, *yp;
397 > static int
398 > rvrpiece(               /* check for recoverable pieces */
399 >        int     *xp,
400 >        int     *yp
401 > )
402   {
403          static char  *pdone = NULL;     /* which pieces are done */
404          static long  readpos = -1;      /* how far we've read */
405 <        register int  i;
405 >        int  i;
406          /*
407           * This routine is called by nextpiece() with an
408           * exclusive lock on syncfp and the file pointer at the
# Line 373 | Line 440 | register int  *xp, *yp;
440   }
441  
442  
443 < int
444 < cleanup(rstat)                  /* close rpict process and clean up */
445 < int  rstat;
443 > static int
444 > cleanup(                        /* close rpict process and clean up */
445 >        int  rstat
446 > )
447   {
448          int  status;
449  
# Line 389 | Line 457 | int  rstat;
457   }
458  
459  
460 < rpiece()                        /* render picture piece by piece */
460 > static void
461 > rpiece(void)                    /* render picture piece by piece */
462   {
463          VIEW  pview;
464          int  xorg, yorg;
465                                          /* compute view parameters */
466 <        copystruct(&pview, &ourview);
466 >        pview = ourview;
467          switch (ourview.type) {
468          case VT_PER:
469 <                pview.horiz = 2.*180./PI*atan(
470 <                                tan(PI/180./2.*ourview.horiz)/hmult );
471 <                pview.vert = 2.*180./PI*atan(
472 <                                tan(PI/180./2.*ourview.vert)/vmult );
469 >                pview.horiz = (2.*180./PI)*atan(
470 >                                tan((PI/180./2.)*ourview.horiz)/hmult );
471 >                pview.vert = (2.*180./PI)*atan(
472 >                                tan((PI/180./2.)*ourview.vert)/vmult );
473                  break;
474          case VT_PAR:
475          case VT_ANG:
476                  pview.horiz = ourview.horiz / hmult;
477                  pview.vert = ourview.vert / vmult;
478                  break;
479 +        case VT_CYL:
480 +                pview.horiz = ourview.horiz / hmult;
481 +                pview.vert = (2.*180./PI)*atan(
482 +                                tan((PI/180./2.)*ourview.vert)/vmult );
483 +                break;
484          case VT_HEM:
485 <                pview.horiz = 2.*180./PI*asin(
486 <                                sin(PI/180./2.*ourview.horiz)/hmult );
487 <                pview.vert = 2.*180./PI*asin(
488 <                                sin(PI/180./2.*ourview.vert)/vmult );
485 >                pview.horiz = (2.*180./PI)*asin(
486 >                                sin((PI/180./2.)*ourview.horiz)/hmult );
487 >                pview.vert = (2.*180./PI)*asin(
488 >                                sin((PI/180./2.)*ourview.vert)/vmult );
489                  break;
490 +        case VT_PLS:
491 +                pview.horiz = sin((PI/180./2.)*ourview.horiz) /
492 +                                (1.0 + cos((PI/180./2.)*ourview.horiz)) / hmult;
493 +                pview.horiz *= pview.horiz;
494 +                pview.horiz = (2.*180./PI)*acos((1. - pview.horiz) /
495 +                                                (1. + pview.horiz));
496 +                pview.vert = sin((PI/180./2.)*ourview.vert) /
497 +                                (1.0 + cos((PI/180./2.)*ourview.vert)) / vmult;
498 +                pview.vert *= pview.vert;
499 +                pview.vert = (2.*180./PI)*acos((1. - pview.vert) /
500 +                                                (1. + pview.vert));
501 +                break;
502          default:
503                  fprintf(stderr, "%s: unknown view type '-vt%c'\n",
504                                  progname, ourview.type);
# Line 420 | Line 506 | rpiece()                       /* render picture piece by piece */
506          }
507                                          /* render each piece */
508          while (nextpiece(&xorg, &yorg)) {
509 <                pview.hoff = ourview.hoff + xorg - 0.5*(hmult-1);
510 <                pview.voff = ourview.voff + yorg - 0.5*(vmult-1);
509 >                pview.hoff = ourview.hoff*hmult + xorg - 0.5*(hmult-1);
510 >                pview.voff = ourview.voff*vmult + yorg - 0.5*(vmult-1);
511                  fputs(VIEWSTR, torp);
512                  fprintview(&pview, torp);
513                  putc('\n', torp);
# Line 431 | Line 517 | rpiece()                       /* render picture piece by piece */
517   }
518  
519  
520 < int
521 < putpiece(xpos, ypos)            /* get next piece from rpict */
522 < int  xpos, ypos;
520 > static int
521 > putpiece(               /* get next piece from rpict */
522 > int     xpos,
523 > int     ypos
524 > )
525   {
526          struct flock  fls;
527          int  pid, status;
528          int  hr, vr;
529 <        register int  y;
529 >        int  y;
530                                  /* check bounds */
531 <        if (xpos < 0 | ypos < 0 | xpos >= hmult | ypos >= vmult) {
531 >        if ((xpos < 0) | (ypos < 0) | (xpos >= hmult) | (ypos >= vmult)) {
532                  fprintf(stderr, "%s: requested piece (%d,%d) out of range\n",
533                                  progname, xpos, ypos);
534                  exit(cleanup(1));
# Line 448 | Line 536 | int  xpos, ypos;
536                                  /* check header from rpict */
537          guard_io();
538          getheader(fromrp, NULL, NULL);
539 <        if (!fscnresolu(&hr, &vr, fromrp) || hr != hres | vr != vres) {
539 >        if (!fscnresolu(&hr, &vr, fromrp) || (hr != hres) | (vr != vres)) {
540                  fprintf(stderr, "%s: resolution mismatch from %s\n",
541                                  progname, rpargv[0]);
542                  exit(cleanup(1));
# Line 489 | Line 577 | int  xpos, ypos;
577                                  /* lock file section so NFS doesn't mess up */
578          fls.l_whence = 0;
579          fls.l_type = F_WRLCK;
580 + #if 0
581          if (fcntl(outfd, F_SETLKW, &fls) < 0)
582                  filerr("lock");
583 + #else
584 +        dolock(outfd, F_WRLCK);
585   #endif
586 + #endif
587                                  /* write new piece to file */
588 <        if (lseek(outfd, fls.l_start, 0) == -1)
588 >        if (lseek(outfd, (off_t)fls.l_start, SEEK_SET) < 0)
589                  filerr("seek");
590          if (hmult == 1) {
591                  if (writebuf(outfd, (char *)pbuf,
# Line 505 | Line 597 | int  xpos, ypos;
597                                          hr*sizeof(COLR)) != hr*sizeof(COLR))
598                                  filerr("write");
599                          if (y < vr-1 && lseek(outfd,
600 <                                        (long)(hmult-1)*hr*sizeof(COLR),
601 <                                        1) == -1)
600 >                                        (off_t)(hmult-1)*hr*sizeof(COLR),
601 >                                        SEEK_CUR) < 0)
602                                  filerr("seek");
603                  }
604   #if NFS
605          fls.l_type = F_UNLCK;           /* release lock */
606 + #if 0
607          if (fcntl(outfd, F_SETLKW, &fls) < 0)
608                  filerr("lock");
609 + #else
610 +        dolock(outfd, F_UNLCK);
611   #endif
612 + #endif
613 +        if (verbose) {                          /* notify caller */
614 +                printf("%d %d done\n", xpos, ypos);
615 +                fflush(stdout);
616 +        }
617          if (syncfp != NULL) {                   /* record what's been done */
618                  sflock(F_WRLCK);
619                  fseek(syncfp, 0L, 2);           /* append index */
# Line 522 | Line 622 | int  xpos, ypos;
622                                  /*** Unlock not necessary, since
623                  sflock(F_UNLCK);        _exit() or nextpiece() is next ***/
624          }
525 –        if (verbose) {                          /* notify caller */
526 –                printf("%d %d done\n", xpos, ypos);
527 –                fflush(stdout);
528 –        }
625          if (pid == -1)          /* didn't fork or fork failed */
626                  return(0);
627          _exit(0);               /* else exit child process (releasing locks) */
628   }
629  
630  
631 < filerr(t)                       /* report file error and exit */
632 < char  *t;
631 > static void
632 > filerr(                 /* report file error and exit */
633 >        char  *t
634 > )
635   {
538 –        extern char  *sys_errlist[];
539 –
636          fprintf(stderr, "%s: %s error on file \"%s\": %s\n",
637 <                        progname, t, outfile, sys_errlist[errno]);
637 >                        progname, t, outfile, strerror(errno));
638          _exit(1);
639   }
640  

Diff Legend

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