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

Comparing ray/src/util/ranimate.c (file contents):
Revision 2.1 by greg, Fri Jan 12 12:16:17 1996 UTC vs.
Revision 2.14 by greg, Thu May 30 17:00:10 1996 UTC

# Line 1 | Line 1
1 < /* Copyright (c) 1995 Regents of the University of California */
1 > /* Copyright (c) 1996 Regents of the University of California */
2  
3   #ifndef lint
4   static char SCCSid[] = "$SunId$ LBL";
# Line 9 | Line 9 | static char SCCSid[] = "$SunId$ LBL";
9   */
10  
11   #include "standard.h"
12 + #include <ctype.h>
13   #include <sys/types.h>
14   #include <sys/stat.h>
15   #include "view.h"
16   #include "vars.h"
17 + #include "netproc.h"
18 +                                /* default remote shell */
19 + #ifdef _AUX_SOURCE
20 + #define REMSH           "remsh"
21 + #else
22 + #define REMSH           "rsh"
23 + #endif
24                                  /* input variables */
25   #define HOST            0               /* rendering host machine */
26   #define RENDER          1               /* rendering options */
# Line 36 | Line 44 | static char SCCSid[] = "$SunId$ LBL";
44   #define DISKSPACE       19              /* how much disk space to use */
45   #define RESOLUTION      20              /* desired final resolution */
46   #define EXPOSURE        21              /* how to compute exposure */
47 + #define RSH             22              /* remote shell script or program */
48  
49 < int     NVARS = 22;             /* total number of variables */
49 > int     NVARS = 23;             /* total number of variables */
50  
51   VARIABLE        vv[] = {                /* variable-value pairs */
52          {"host",        4,      0,      NULL,   NULL},
# Line 55 | Line 64 | VARIABLE       vv[] = {                /* variable-value pairs */
64          {"ANIMATE",     2,      0,      NULL,   onevalue},
65          {"TRANSFER",    2,      0,      NULL,   onevalue},
66          {"ARCHIVE",     2,      0,      NULL,   onevalue},
67 <        {"INTERP",      3,      0,      NULL,   intvalue},
68 <        {"OVERSAMP",    2,      0,      NULL,   fltvalue},
67 >        {"INTERPOLATE", 3,      0,      NULL,   intvalue},
68 >        {"OVERSAMPLE",  2,      0,      NULL,   fltvalue},
69          {"MBLUR",       2,      0,      NULL,   onevalue},
70          {"RTRACE",      2,      0,      NULL,   boolvalue},
71          {"DISKSPACE",   3,      0,      NULL,   fltvalue},
72          {"RESOLUTION",  3,      0,      NULL,   onevalue},
73          {"EXPOSURE",    3,      0,      NULL,   onevalue},
74 +        {"RSH",         3,      0,      NULL,   onevalue},
75   };
76  
77   #define SFNAME  "STATUS"                /* status file name */
# Line 82 | Line 92 | int    nowarn = 0;             /* turn warnings off? */
92   int     silent = 0;             /* silent mode? */
93   int     noaction = 0;           /* take no action? */
94  
95 + char    *remsh;                 /* remote shell program/script */
96   char    rendopt[2048] = "";     /* rendering options */
97   char    rresopt[32];            /* rendering resolution options */
98   char    fresopt[32];            /* filter resolution options */
99   int     pfiltalways;            /* always use pfilt? */
100  
101 + char    arcargs[10240];         /* files to archive */
102 + char    *arcfirst, *arcnext;    /* pointers to first and next argument */
103 +
104 + struct pslot {
105 +        int     pid;                    /* process ID (0 if empty) */
106 +        int     fout;                   /* output frame number */
107 +        int     (*rcvf)();              /* recover function */
108 + }       *pslot;                 /* process slots */
109 + int     npslots;                /* number of process slots */
110 +
111 + int     lastpid;                /* ID of last completed background process */
112 + PSERVER *lastpserver;           /* last process server used */
113 +
114 + #define phostname(ps)   ((ps)->hostname[0] ? (ps)->hostname : astat.host)
115 +
116 + struct pslot    *findpslot();
117 +
118   VIEW    *getview();
119   char    *getexp();
120  
121 + extern time_t   fdate(), time();
122  
123 +
124   main(argc, argv)
125   int     argc;
126   char    *argv[];
# Line 138 | Line 168 | char   *argv[];
168                                                  /* print variables */
169          if (explicate)
170                  printvars(stdout);
171 +                                                /* set up process servers */
172 +        sethosts();
173                                                  /* run animation */
174          animate();
175                                                  /* all done */
# Line 145 | Line 177 | char   *argv[];
177                  argv[i] = vval(NEXTANIM);       /* just change input file */
178                  if (!silent)
179                          printargs(argc, argv, stdout);
180 <                if (!noaction) {
181 <                        execvp(progname, argv);         /* pass to next */
182 <                        quit(1);                        /* shouldn't return */
183 <                }
180 >                if ((argv[0] = getpath(progname,getenv("PATH"),X_OK)) == NULL)
181 >                        fprintf(stderr, "%s: command not found\n", progname);
182 >                else
183 >                        execv(progname, argv);
184 >                quit(1);
185          }
186          quit(0);
187   userr:
# Line 159 | Line 192 | userr:
192  
193   getastat()                      /* check/set animation status */
194   {
195 <        char    buf[256];
195 >        char    sfname[256];
196          FILE    *fp;
197  
198 <        sprintf(buf, "%s/%s", vval(DIRECTORY), SFNAME);
199 <        if ((fp = fopen(buf, "r")) == NULL) {
198 >        sprintf(sfname, "%s/%s", vval(DIRECTORY), SFNAME);
199 >        if ((fp = fopen(sfname, "r")) == NULL) {
200                  if (errno != ENOENT) {
201 <                        perror(buf);
201 >                        perror(sfname);
202                          return(-1);
203                  }
204                  astat.rnext = astat.fnext = astat.tnext = 0;
# Line 185 | Line 218 | getastat()                     /* check/set animation status */
218                  goto fmterr;
219          fclose(fp);
220          if (astat.pid != 0) {                   /* thinks it's still running */
221 <                gethostname(buf, sizeof(buf));
189 <                if (strcmp(buf, astat.host)) {
221 >                if (strcmp(myhostname(), astat.host)) {
222                          fprintf(stderr,
223                          "%s: process %d may still be running on host %s\n",
224                                          progname, astat.pid, astat.host);
# Line 204 | Line 236 | getastat()                     /* check/set animation status */
236                                  progname, astat.cfname);
237                  return(-1);
238          }
239 +                                                /* check control file mods. */
240 +        if (!nowarn && fdate(cfname) > fdate(sfname))
241 +                fprintf(stderr,
242 +                        "%s: warning - control file modified since last run\n",
243 +                                progname);
244   setours:                                        /* set our values */
245 <        gethostname(astat.host, sizeof(astat.host));
245 >        strcpy(astat.host, myhostname());
246          astat.pid = getpid();
247          strcpy(astat.cfname, cfname);
248          return(0);
249   fmterr:
250          fprintf(stderr, "%s: format error in status file \"%s\"\n",
251 <                        progname, buf);
251 >                        progname, sfname);
252          fclose(fp);
253          return(-1);
254   }
# Line 222 | Line 259 | putastat()                     /* put out current status */
259          char    buf[256];
260          FILE    *fp;
261  
262 +        if (noaction)
263 +                return;
264          sprintf(buf, "%s/%s", vval(DIRECTORY), SFNAME);
265          if ((fp = fopen(buf, "w")) == NULL) {
266                  perror(buf);
# Line 261 | Line 300 | checkdir()                     /* make sure we have our directory */
300  
301   setdefaults()                   /* set default values */
302   {
303 +        extern char     *atos();
304          char    buf[256];
305  
306 <        if (vdef(OCTREE) == vdef(ANIMATE)) {
306 >        if (vdef(ANIMATE)) {
307 >                vval(OCTREE) = NULL;
308 >                vdef(OCTREE) = 0;
309 >        } else if (!vdef(OCTREE)) {
310                  fprintf(stderr, "%s: either %s or %s must be defined\n",
311                                  progname, vnam(OCTREE), vnam(ANIMATE));
312                  quit(1);
# Line 272 | Line 315 | setdefaults()                  /* set default values */
315                  fprintf(stderr, "%s: %s undefined\n", progname, vnam(VIEWFILE));
316                  quit(1);
317          }
318 +        if (!vdef(HOST)) {
319 +                vval(HOST) = LHOSTNAME;
320 +                vdef(HOST)++;
321 +        }
322          if (!vdef(START)) {
323                  vval(START) = "1";
324                  vdef(START)++;
325          }
326          if (!vdef(END)) {
327 <                sprintf(buf, "%d", countviews());
327 >                sprintf(buf, "%d", countviews()+vint(START)-1);
328                  vval(END) = savqstr(buf);
329                  vdef(END)++;
330          }
331 +        if (vint(END) < vint(START)) {
332 +                fprintf(stderr, "%s: ending frame less than starting frame\n",
333 +                                progname);
334 +                quit(1);
335 +        }
336          if (!vdef(BASENAME)) {
337                  sprintf(buf, "%s/frame%%03d", vval(DIRECTORY));
338                  vval(BASENAME) = savqstr(buf);
# Line 314 | Line 366 | setdefaults()                  /* set default values */
366                  vval(DISKSPACE) = "100";
367                  vdef(DISKSPACE)++;
368          }
369 +        if (!vdef(RSH)) {
370 +                vval(RSH) = REMSH;
371 +                vdef(RSH)++;
372 +        }
373 +                                /* locate remote shell program */
374 +        atos(buf, sizeof(buf), vval(RSH));
375 +        if ((remsh = getpath(buf, getenv("PATH"), X_OK)) != NULL)
376 +                remsh = savqstr(remsh);
377 +        else
378 +                remsh = vval(RSH);      /* will generate error if used */
379 +
380                                  /* append rendering options */
381          if (vdef(RENDER))
382                  sprintf(rendopt+strlen(rendopt), " %s", vval(RENDER));
383   }
384  
385  
386 < getradfile(rfname)              /* run rad and get needed variables */
324 < char    *rfname;
386 > sethosts()                      /* set up process servers */
387   {
388 +        extern char     *iskip();
389 +        char    buf[256], *dir, *uname;
390 +        int     np;
391 +        register char   *cp;
392 +        int     i;
393 +
394 +        npslots = 0;
395 +        if (noaction)
396 +                return;
397 +        for (i = 0; i < vdef(HOST); i++) {      /* add each host */
398 +                dir = uname = NULL;
399 +                np = 1;
400 +                strcpy(cp=buf, nvalue(HOST, i));        /* copy to buffer */
401 +                cp = sskip(cp);                         /* skip host name */
402 +                while (isspace(*cp))
403 +                        *cp++ = '\0';
404 +                if (*cp) {                              /* has # processes? */
405 +                        np = atoi(cp);
406 +                        if ((cp = iskip(cp)) == NULL || (*cp && !isspace(*cp)))
407 +                                badvalue(HOST);
408 +                        while (isspace(*cp))
409 +                                cp++;
410 +                        if (*cp) {                      /* has directory? */
411 +                                dir = cp;
412 +                                cp = sskip(cp);                 /* skip dir. */
413 +                                while (isspace(*cp))
414 +                                        *cp++ = '\0';
415 +                                if (*cp) {                      /* has user? */
416 +                                        uname = cp;
417 +                                        if (*sskip(cp))
418 +                                                badvalue(HOST);
419 +                                }
420 +                        }
421 +                }
422 +                if (addpserver(buf, dir, uname, np) == NULL) {
423 +                        if (!nowarn)
424 +                                fprintf(stderr,
425 +                                        "%s: cannot execute on host \"%s\"\n",
426 +                                                progname, buf);
427 +                } else
428 +                        npslots += np;
429 +        }
430 +        if (npslots == 0) {
431 +                fprintf(stderr, "%s: no working process servers\n", progname);
432 +                quit(1);
433 +        }
434 +        pslot = (struct pslot *)calloc(npslots, sizeof(struct pslot));
435 +        if (pslot == NULL) {
436 +                perror("malloc");
437 +                quit(1);
438 +        }
439 + }
440 +
441 +
442 + getradfile(rfargs)              /* run rad and get needed variables */
443 + char    *rfargs;
444 + {
445          static short    mvar[] = {OCTREE,PFILT,RESOLUTION,EXPOSURE,-1};
446          char    combuf[256];
447          register int    i;
# Line 331 | Line 450 | char   *rfname;
450          sprintf(rendopt, " @%s/render.opt", vval(DIRECTORY));
451          sprintf(combuf,
452          "rad -v 0 -s -e -w %s OPTFILE=%s | egrep '^[ \t]*(NOMATCH",
453 <                        rfname, rendopt+2);
453 >                        rfargs, rendopt+2);
454          cp = combuf;
455          while (*cp) cp++;               /* match unset variables */
456          for (i = 0; mvar[i] >= 0; i++)
# Line 343 | Line 462 | char   *rfname;
462          sprintf(cp, ")[ \t]*=' > %s/radset.var", vval(DIRECTORY));
463          cp += 11;                       /* point to file name */
464          if (system(combuf)) {
465 <                fprintf(stderr, "%s: bad rad input file \"%s\"\n",
466 <                                progname, rfname);
465 >                fprintf(stderr, "%s: error executing rad command:\n\t%s\n",
466 >                                progname, combuf);
467                  quit(1);
468          }
469          loadvars(cp);                   /* load variables and remove file */
# Line 393 | Line 512 | animate()                      /* run animation */
512                                          /* figure # frames per batch */
513          d1 = mult*xres*mult*yres*4;             /* space for orig. picture */
514          if ((i=vint(INTERP)) || atoi(vval(MBLUR)))
515 <                d1 += mult*xres*mult*yres*4;    /* space for z-buffer */
515 >                d1 += mult*xres*mult*yres*sizeof(float);        /* Z-buffer */
516          d2 = xres*yres*4;                       /* space for final picture */
517          frames_batch = (i+1)*(vflt(DISKSPACE)*1048576.-d1)/(d1+i*d2);
518          if (frames_batch < i+2) {
# Line 401 | Line 520 | animate()                      /* run animation */
520                                  progname);
521                  quit(1);
522          }
523 +                                        /* initialize archive argument list */
524 +        i = 16;
525 +        if (vdef(ARCHIVE) && strlen(vval(ARCHIVE)) > i)
526 +                i = strlen(vval(ARCHIVE));
527 +        arcnext = arcfirst = arcargs + i;
528                                          /* initialize status file */
529          if (astat.rnext == 0)
530                  astat.rnext = astat.fnext = astat.tnext = vint(START);
531          putastat();
532                                          /* render in batches */
533 <        while (astat.rnext <= vint(END)) {
533 >        while (astat.tnext <= vint(END)) {
534                  renderframes(frames_batch);
535                  filterframes();
536                  transferframes();
# Line 466 | Line 590 | int    nframes;
590                  }
591          }
592          if (vdef(ANIMATE))              /* wait for renderings to finish */
593 <                animwait(0);
593 >                bwait(0);
594          else {                          /* else if walk-through */
595                  fclose(fp);             /* close view file */
596                  walkwait(astat.rnext, lastframe, vfname);       /* walk it */
597                  unlink(vfname);         /* remove view file */
598          }
475 –        if (vdef(ARCHIVE))              /* archive results */
476 –                archive(astat.rnext, lastframe);
599          astat.rnext = i;                /* update status */
600          putastat();
601   }
# Line 494 | Line 616 | filterframes()                         /* catch up with filtering */
616                                          progname, i);
617                          quit(1);
618                  }
619 <                dofilt(i, vp, getexp(i));               /* filter frame */
619 >                dofilt(i, vp, getexp(i), 0);            /* filter frame */
620          }
621 <        filtwait(0);                    /* wait for filter processes */
621 >        bwait(0);                       /* wait for filter processes */
622 >        archive();                      /* archive originals */
623          astat.fnext = i;                /* update status */
624          putastat();
625   }
# Line 539 | Line 662 | animrend(frame, vp)                    /* start animation frame */
662   int     frame;
663   VIEW    *vp;
664   {
665 +        extern int      recover();
666          char    combuf[2048];
667          char    fname[128];
668  
# Line 546 | Line 670 | VIEW   *vp;
670          strcat(fname, ".unf");
671          if (access(fname, F_OK) == 0)
672                  return;
673 <        sprintf(combuf, "%s %d | rpict%s%s %s > %s", vval(ANIMATE), frame,
673 >        sprintf(combuf, "%s %d | rpict%s%s -w0 %s > %s", vval(ANIMATE), frame,
674                          rendopt, viewopt(vp), rresopt, fname);
675 <        if (runcom(combuf)) {
552 <                fprintf(stderr, "%s: error rendering frame %d\n",
553 <                                progname, frame);
554 <                quit(1);
555 <        }
675 >        bruncom(combuf, frame, recover);        /* run in background */
676   }
677  
678  
559 – animwait(nwait)                         /* wait for renderings to finish */
560 – int     nwait;
561 – {
562 –        /* currently does nothing since parallel rendering not working */
563 – }
564 –
565 –
679   walkwait(first, last, vfn)              /* walk-through frames */
680   int     first, last;
681   char    *vfn;
682   {
683          char    combuf[2048];
684 +        char    *inspoint;
685          register int    i;
686  
687          if (!noaction && vint(INTERP))          /* create dummy frames */
# Line 578 | Line 692 | char   *vfn;
692                                  close(open(combuf, O_RDONLY|O_CREAT, 0666));
693                          }
694                                          /* create command */
695 <        sprintf(combuf, "rpict%s ", rendopt);
695 >        sprintf(combuf, "rpict%s -w0", rendopt);
696          if (vint(INTERP) || atoi(vval(MBLUR)))
697 <                sprintf(combuf+strlen(combuf), "-z %s.zbf ", vval(BASENAME));
698 <        sprintf(combuf+strlen(combuf), "-o %s.unf %s -S %d %s < %s",
699 <                        vval(BASENAME), rresopt, first, vval(OCTREE), vfn);
700 <        if (runcom(combuf)) {
701 <                fprintf(stderr,
702 <                "%s: error rendering walk-through frames %d through %d\n",
697 >                sprintf(combuf+strlen(combuf), " -z %s.zbf", vval(BASENAME));
698 >        sprintf(combuf+strlen(combuf), " -o %s.unf %s -S %d",
699 >                        vval(BASENAME), rresopt, first);
700 >        inspoint = combuf + strlen(combuf);
701 >        sprintf(inspoint, " %s < %s", vval(OCTREE), vfn);
702 >                                        /* run in parallel */
703 >        i = (last-first+1)/(vint(INTERP)+1);
704 >        if (i < 1) i = 1;
705 >        if (pruncom(combuf, inspoint, i)) {
706 >                fprintf(stderr, "%s: error rendering frames %d through %d\n",
707                                  progname, first, last);
708                  quit(1);
709          }
# Line 599 | Line 717 | char   *vfn;
717   }
718  
719  
720 + int
721   recover(frame)                          /* recover the specified frame */
722   int     frame;
723   {
724 +        static int      *rfrm;          /* list of recovered frames */
725 +        static int      nrfrms = 0;
726          char    combuf[2048];
727          char    fname[128];
728          register char   *cp;
729 <
729 >        register int    i;
730 >                                        /* check to see if recovered already */
731 >        for (i = nrfrms; i--; )
732 >                if (rfrm[i] == frame)
733 >                        return(0);
734 >                                        /* build command */
735          sprintf(fname, vval(BASENAME), frame);
736          if (vdef(ANIMATE))
737 <                sprintf(combuf, "%s %d | rpict%s",
737 >                sprintf(combuf, "%s %d | rpict%s -w0",
738                                  vval(ANIMATE), frame, rendopt);
739          else
740 <                sprintf(combuf, "rpict%s", rendopt);
740 >                sprintf(combuf, "rpict%s -w0", rendopt);
741          cp = combuf + strlen(combuf);
742          if (vint(INTERP) || atoi(vval(MBLUR))) {
743                  sprintf(cp, " -z %s.zbf", fname);
# Line 623 | Line 749 | int    frame;
749                  *cp++ = ' ';
750                  strcpy(cp, vval(OCTREE));
751          }
752 <        if (runcom(combuf)) {
753 <                fprintf(stderr, "%s: error recovering frame %d\n",
754 <                                progname, frame);
752 >        if (runcom(combuf))             /* run command */
753 >                return(1);
754 >                                        /* add frame to recovered list */
755 >        if (nrfrms)
756 >                rfrm = (int *)realloc((char *)rfrm, (nrfrms+1)*sizeof(int));
757 >        else
758 >                rfrm = (int *)malloc(sizeof(int));
759 >        if (rfrm == NULL) {
760 >                perror("malloc");
761                  quit(1);
762          }
763 +        rfrm[nrfrms++] = frame;
764 +        return(0);
765   }
766  
767  
768 < archive(first, last)                    /* archive finished renderings */
769 < int     first, last;
768 > int
769 > frecover(frame)                         /* recover filtered frame */
770 > int     frame;
771   {
772 <        char    combuf[10240];
773 <        int     offset;
774 <        struct stat     stb;
775 <        register char   *cp;
772 >        VIEW    *vp;
773 >        char    *ex;
774 >
775 >        vp = getview(frame);
776 >        ex = getexp(frame);
777 >        if (dofilt(frame, vp, ex, 2) && dofilt(frame, vp, ex, 1))
778 >                return(1);
779 >        return(0);
780 > }
781 >
782 >
783 > archive()                       /* archive and remove renderings */
784 > {
785 > #define RMCOML  (sizeof(rmcom)-1)
786 >        static char     rmcom[] = "rm -f";
787          register int    i;
788  
789 <        strcpy(cp=combuf, vval(ARCHIVE));
790 <        while (*cp) cp++;
791 <        offset = cp - combuf;
792 <        *cp++ = ' ';                            /* make argument list */
793 <        for (i = first; i <= last; i++) {
794 <                sprintf(cp, vval(BASENAME), i);
795 <                strcat(cp, ".unf");
796 <                if (stat(cp, &stb) == 0 && stb.st_size > 0) {   /* non-zero? */
797 <                        while (*cp) cp++;
652 <                        *cp++ = ' ';
653 <                        sprintf(cp, vval(BASENAME), i);
654 <                        strcat(cp, ".zbf");
655 <                        if (access(cp, F_OK) == 0) {            /* exists? */
656 <                                while (*cp) cp++;
657 <                                *cp++ = ' ';
658 <                        }
789 >        if (arcnext == arcfirst)
790 >                return;                         /* nothing to do */
791 >        if (vdef(ARCHIVE)) {                    /* run archive command */
792 >                i = strlen(vval(ARCHIVE));
793 >                strncpy(arcfirst-i, vval(ARCHIVE), i);
794 >                if (runcom(arcfirst-i)) {
795 >                        fprintf(stderr, "%s: error running archive command\n",
796 >                                        progname);
797 >                        quit(1);
798                  }
799          }
800 <        *--cp = '\0';
801 <        if (cp <= combuf + offset)              /* no files? */
802 <                return;
803 <        if (runcom(combuf)) {                   /* run archive command */
804 <                fprintf(stderr,
666 <                "%s: error running archive command on frames %d through %d\n",
667 <                                progname, first, last);
668 <                quit(1);
669 <        }
800 >                                                /* run remove command */
801 >        strncpy(arcfirst-RMCOML, rmcom, RMCOML);
802 >        runcom(arcfirst-RMCOML);
803 >        arcnext = arcfirst;                     /* reset argument list */
804 > #undef RMCOML
805   }
806  
807  
808 < dofilt(frame, vp, ep)                           /* filter frame */
808 > int
809 > dofilt(frame, vp, ep, rvr)                      /* filter frame */
810   int     frame;
811   VIEW    *vp;
812   char    *ep;
813 + int     rvr;
814   {
815 +        extern int      frecover();
816 +        static int      iter = 0;
817          char    fnbefore[128], fnafter[128];
818 <        char    combuf[1024], fname[128];
819 <        int     usepinterp, usepfilt;
820 <        int     frbefore, frafter, triesleft;
818 >        char    combuf[1024], fname0[128], fname1[128];
819 >        int     usepinterp, usepfilt, nora_rgbe;
820 >        int     frseq[2];
821                                                  /* check what is needed */
822          usepinterp = atoi(vval(MBLUR));
823          usepfilt = pfiltalways | ep==NULL;
824 +        if (ep != NULL && !strcmp(ep, "1"))
825 +                ep = "+0";
826 +        nora_rgbe = strcmp(vval(OVERSAMP),"1") || ep==NULL ||
827 +                        *ep != '+' || *ep != '-' || !isint(ep);
828                                                  /* compute rendered views */
829 <        frbefore = frame - ((frame-1) % (vint(INTERP)+1));
830 <        frafter = frbefore + vint(INTERP) + 1;
831 <        if (frafter > vint(END))
832 <                frafter = vint(END);
833 <        if (frafter == frame) {                 /* pfilt only */
834 <                frbefore = frafter;
829 >        frseq[0] = frame - ((frame-1) % (vint(INTERP)+1));
830 >        frseq[1] = frseq[0] + vint(INTERP) + 1;
831 >        if (frseq[1] > vint(END))
832 >                frseq[1] = vint(END);
833 >        if (frseq[1] == frame) {                        /* pfilt only */
834 >                frseq[0] = frseq[1];
835                  usepinterp = 0;                 /* update what's needed */
836 <                usepfilt |= vflt(OVERSAMP)>1.01 || strcmp(ep,"1");
837 <                triesleft = 2;
838 <        } else if (frbefore == frame) {         /* no interpolation */
839 <                                                /* remove unneeded files */
840 <                if (frbefore-vint(INTERP)-1 >= 1) {
841 <                        sprintf(fname, vval(BASENAME), frbefore-vint(INTERP)-1);
842 <                        sprintf(combuf, "rm -f %s.unf %s.zbf", fname, fname);
843 <                        runcom(combuf);
836 >                usepfilt |= nora_rgbe;
837 >        } else if (frseq[0] == frame) {         /* no interpolation needed */
838 >                if (!rvr && frame > 1+vint(INTERP)) {   /* archive previous */
839 >                        *arcnext++ = ' ';
840 >                        sprintf(arcnext, vval(BASENAME), frame-vint(INTERP)-1);
841 >                        while (*arcnext) arcnext++;
842 >                        strcpy(arcnext, ".unf");
843 >                        arcnext += 4;
844 >                        if (usepinterp || vint(INTERP)) {       /* and Z-buf */
845 >                                *arcnext++ = ' ';
846 >                                sprintf(arcnext, vval(BASENAME),
847 >                                                frame-vint(INTERP)-1);
848 >                                while (*arcnext) arcnext++;
849 >                                strcpy(arcnext, ".zbf");
850 >                                arcnext += 4;
851 >                        }
852                  }
853 <                                                /* update what's needed */
854 <                if (usepinterp)
855 <                        triesleft = 3;
705 <                else {
706 <                        usepfilt |= vflt(OVERSAMP)>1.01 || strcmp(ep,"1");
707 <                        triesleft = 2;
708 <                }
709 <        } else {                                /* interpolation needed */
853 >                if (!usepinterp)                /* update what's needed */
854 >                        usepfilt |= nora_rgbe;
855 >        } else                                  /* interpolation needed */
856                  usepinterp++;
857 <                triesleft = 3;
858 <        }
859 <        if (frafter >= astat.rnext) {           /* next batch unavailable */
860 <                frafter = frbefore;
861 <                if (triesleft > 2)
862 <                        triesleft = 2;
863 <        }
718 <        sprintf(fnbefore, vval(BASENAME), frbefore);
719 <        sprintf(fnafter, vval(BASENAME), frafter);
720 < tryit:                                          /* generate command */
857 >        if (frseq[1] >= astat.rnext)            /* next batch unavailable */
858 >                frseq[1] = frseq[0];
859 >        sprintf(fnbefore, vval(BASENAME), frseq[0]);
860 >        sprintf(fnafter, vval(BASENAME), frseq[1]);
861 >        if (rvr == 1 && recover(frseq[0]))      /* recover before frame? */
862 >                return(1);
863 >                                                /* generate command */
864          if (usepinterp) {                       /* using pinterp */
865 +                if (rvr == 2 && recover(frseq[1]))      /* recover after? */
866 +                        return(1);
867                  if (atoi(vval(MBLUR))) {
868                          FILE    *fp;            /* motion blurring */
869 <                        sprintf(fname, "%s/vw0", vval(DIRECTORY));
870 <                        if ((fp = fopen(fname, "w")) == NULL) {
871 <                                perror(fname); quit(1);
869 >                        sprintf(fname0, "%s/vw0%c", vval(DIRECTORY),
870 >                                        'a'+(iter%26));
871 >                        if ((fp = fopen(fname0, "w")) == NULL) {
872 >                                perror(fname0); quit(1);
873                          }
874                          fputs(VIEWSTR, fp);
875                          fprintview(vp, fp);
# Line 734 | Line 880 | tryit:                                         /* generate command */
880                                                  progname, frame+1);
881                                  quit(1);
882                          }
883 <                        sprintf(fname, "%s/vw1", vval(DIRECTORY));
884 <                        if ((fp = fopen(fname, "w")) == NULL) {
885 <                                perror(fname); quit(1);
883 >                        sprintf(fname1, "%s/vw1%c", vval(DIRECTORY),
884 >                                        'a'+(iter%26));
885 >                        if ((fp = fopen(fname1, "w")) == NULL) {
886 >                                perror(fname1); quit(1);
887                          }
888                          fputs(VIEWSTR, fp);
889                          fprintview(vp, fp);
890                          putc('\n', fp); fclose(fp);
891                          sprintf(combuf,
892 <        "(pmblur %s %d %s/vw0 %s/vw1; rm -f %s/vw0 %s/vw1) | pinterp -B",
893 <                                *sskip(vval(MBLUR)) ? sskip(vval(MBLUR)) : "1",
894 <                                        atoi(vval(MBLUR)), vval(DIRECTORY),
895 <                                        vval(DIRECTORY), vval(DIRECTORY),
896 <                                        vval(DIRECTORY), vval(DIRECTORY));
892 >                        "(pmblur %s %d %s %s; rm -f %s %s) | pinterp -B",
893 >                        *sskip(vval(MBLUR)) ? sskip2(vval(MBLUR),1) : "1",
894 >                                        atoi(vval(MBLUR)),
895 >                                        fname0, fname1, fname0, fname1);
896 >                        iter++;
897                  } else                          /* no blurring */
898                          strcpy(combuf, "pinterp");
899                  strcat(combuf, viewopt(vp));
900                  if (vbool(RTRACE))
901 <                        sprintf(combuf+strlen(combuf), " -ff -fr '%s %s'",
901 >                        sprintf(combuf+strlen(combuf), " -ff -fr '%s -w0 %s'",
902                                          rendopt, vval(OCTREE));
903                  if (vdef(PINTERP))
904                          sprintf(combuf+strlen(combuf), " %s", vval(PINTERP));
# Line 762 | Line 909 | tryit:                                         /* generate command */
909                                          fresopt, ep);
910                  sprintf(combuf+strlen(combuf), " %s.unf %s.zbf",
911                                  fnbefore, fnbefore);
912 <                if (frafter != frbefore)
912 >                if (frseq[1] != frseq[0])
913                           sprintf(combuf+strlen(combuf), " %s.unf %s.zbf",
914                                          fnafter, fnafter);
915                  if (usepfilt) {                 /* also pfilt */
# Line 778 | Line 925 | tryit:                                         /* generate command */
925                                  sprintf(combuf+strlen(combuf), " %s", fresopt);
926                  }
927          } else if (usepfilt) {                  /* pfilt only */
928 +                if (rvr == 2)
929 +                        return(1);
930                  if (vdef(PFILT))
931                          sprintf(combuf, "pfilt %s", vval(PFILT));
932                  else
# Line 789 | Line 938 | tryit:                                         /* generate command */
938                          sprintf(combuf+strlen(combuf), " %s %s.unf",
939                                          fresopt, fnbefore);
940          } else {                                /* else just check it */
941 <                sprintf(combuf, "ra_rgbe -r %s.unf", fnbefore);
941 >                if (rvr == 2)
942 >                        return(1);
943 >                sprintf(combuf, "ra_rgbe -e %s -r %s.unf", ep, fnbefore);
944          }
945                                                  /* output file name */
946 <        sprintf(fname, vval(BASENAME), frame);
947 <        sprintf(combuf+strlen(combuf), " > %s.pic", fname);
948 <        if (runcom(combuf))                     /* run filter command */
949 <                switch (--triesleft) {
950 <                case 2:                         /* try to recover frafter */
951 <                        recover(frafter);
801 <                        goto tryit;
802 <                case 1:                         /* try to recover frbefore */
803 <                        recover(frbefore);
804 <                        goto tryit;
805 <                default:                        /* we've really failed */
806 <                        fprintf(stderr,
807 <                        "%s: unrecoverable filtering error on frame %d\n",
808 <                                        progname, frame);
809 <                        quit(1);
810 <                }
946 >        sprintf(fname0, vval(BASENAME), frame);
947 >        sprintf(combuf+strlen(combuf), " > %s.pic", fname0);
948 >        if (rvr)                                /* in recovery */
949 >                return(runcom(combuf));
950 >        bruncom(combuf, frame, frecover);       /* else run in background */
951 >        return(0);
952   }
953  
954  
814 – filtwait(nwait)                 /* wait for filtering processes to finish */
815 – int     nwait;
816 – {
817 –        /* currently does nothing since parallel filtering not working */
818 – }
819 –
820 –
955   VIEW *
956   getview(n)                      /* get view number n */
957   int     n;
# Line 842 | Line 976 | int    n;
976                          quit(1);
977                  }
978          } else if (n < viewnum) {       /* rewind file */
979 +                if (viewnum == 1 && feof(viewfp))
980 +                        return(&curview);               /* just one view */
981                  if (fseek(viewfp, 0L, 0) == EOF) {
982                          perror(vval(VIEWFILE));
983                          quit(1);
# Line 851 | Line 987 | int    n;
987          }
988          while (n > viewnum) {           /* scan to desired view */
989                  if (fgets(linebuf, sizeof(linebuf), viewfp) == NULL)
990 <                        return(NULL);
990 >                        return(viewnum==1 ? &curview : NULL);
991                  if (isview(linebuf) && sscanview(&curview, linebuf) > 0)
992                          viewnum++;
993          }
# Line 884 | Line 1020 | int    n;
1020          if (n == 0) {                           /* signal to close file */
1021                  if (expfp != NULL) {
1022                          fclose(expfp);
1023 +                        free((char *)exppos);
1024                          expfp = NULL;
1025                  }
1026                  return(NULL);
1027 <        }
1027 >        } else if (n > vint(END))               /* request past end (error?) */
1028 >                return(NULL);
1029          if (!vdef(EXPOSURE))                    /* no setting (auto) */
1030                  return(NULL);
1031          if (isflt(vval(EXPOSURE)))              /* always the same */
# Line 925 | Line 1063 | int    n;
1063                  }
1064                  curfrm++;
1065                  cp = fskip(expval);                     /* check format */
1066 <                if (cp == NULL || *cp != '\n') {
1066 >                if (cp != NULL)
1067 >                        while (isspace(*cp))
1068 >                                *cp++ = '\0';
1069 >                if (cp == NULL || *cp) {
1070                          fprintf(stderr,
1071                                  "%s: exposure format error on line %d\n",
1072                                          vval(EXPOSURE), curfrm);
1073                          quit(1);
1074                  }
934 –                *cp = '\0';
1075          }
1076          return(expval);                         /* return value */
1077   }
1078  
1079  
1080 < runcom(cs)                      /* run command */
1080 > struct pslot *
1081 > findpslot(pid)                  /* find or allocate a process slot */
1082 > int     pid;
1083 > {
1084 >        register struct pslot   *psempty = NULL;
1085 >        register int    i;
1086 >
1087 >        for (i = 0; i < npslots; i++) {         /* look for match */
1088 >                if (pslot[i].pid == pid)
1089 >                        return(pslot+i);
1090 >                if (psempty == NULL && pslot[i].pid == 0)
1091 >                        psempty = pslot+i;
1092 >        }
1093 >        return(psempty);                /* return emtpy slot (error if NULL) */
1094 > }
1095 >
1096 >
1097 > int
1098 > donecom(ps, pn, status)         /* clean up after finished process */
1099 > PSERVER *ps;
1100 > int     pn;
1101 > int     status;
1102 > {
1103 >        register PROC   *pp;
1104 >
1105 >        pp = ps->proc + pn;
1106 >        if (pp->elen) {                 /* pass errors */
1107 >                if (ps->hostname[0])
1108 >                        fprintf(stderr, "%s: ", ps->hostname);
1109 >                fprintf(stderr, "Error output from: %s\n", pp->com);
1110 >                fputs(pp->errs, stderr);
1111 >                fflush(stderr);
1112 >                if (ps->hostname[0])
1113 >                        status = 1;     /* because rsh doesn't return status */
1114 >        }
1115 >        freestr(pp->com);               /* free command string */
1116 >        lastpid = pp->pid;              /* record PID for bwait() */
1117 >        lastpserver = ps;               /* record server for serverdown() */
1118 >        return(status);
1119 > }
1120 >
1121 >
1122 > int
1123 > serverdown()                    /* check status of last process server */
1124 > {
1125 >        if (pserverOK(lastpserver))     /* server still up? */
1126 >                return(0);
1127 >        delpserver(lastpserver);        /* else delete it */
1128 >        if (pslist == NULL) {
1129 >                fprintf(stderr, "%s: all process servers are down\n",
1130 >                                progname);
1131 >                quit(1);
1132 >        }
1133 >        return(1);
1134 > }
1135 >
1136 >
1137 > int
1138 > bruncom(com, fout, rf)          /* run a command in the background */
1139 > char    *com;
1140 > int     fout;
1141 > int     (*rf)();
1142 > {
1143 >        int     pid;
1144 >        register struct pslot   *psl;
1145 >
1146 >        if (noaction) {
1147 >                if (!silent)
1148 >                        printf("\t%s\n", com);  /* echo command */
1149 >                return(0);
1150 >        }
1151 >                                        /* else start it when we can */
1152 >        while ((pid = startjob(NULL, savestr(com), donecom)) == -1)
1153 >                bwait(1);
1154 >        if (!silent) {                          /* echo command */
1155 >                PSERVER *ps;
1156 >                int     psn = pid;
1157 >                ps = findjob(&psn);
1158 >                printf("\t%s\n", com);
1159 >                printf("\tProcess started on %s\n", phostname(ps));
1160 >                fflush(stdout);
1161 >        }
1162 >        psl = findpslot(pid);           /* record info. in appropriate slot */
1163 >        psl->pid = pid;
1164 >        psl->fout = fout;
1165 >        psl->rcvf = rf;
1166 >        return(pid);
1167 > }
1168 >
1169 >
1170 > bwait(ncoms)                            /* wait for batch job(s) to finish */
1171 > int     ncoms;
1172 > {
1173 >        int     status;
1174 >        register struct pslot   *psl;
1175 >
1176 >        if (noaction)
1177 >                return;
1178 >        while ((status = wait4job(NULL, -1)) != -1) {
1179 >                psl = findpslot(lastpid);
1180 >                if (status) {           /* attempt recovery */
1181 >                        serverdown();   /* check server */
1182 >                        if (psl->rcvf == NULL || (*psl->rcvf)(psl->fout)) {
1183 >                                fprintf(stderr,
1184 >                                        "%s: error rendering frame %d\n",
1185 >                                                progname, psl->fout);
1186 >                                quit(1);
1187 >                        }
1188 >                }
1189 >                psl->pid = 0;           /* free process slot */
1190 >                if (!--ncoms)
1191 >                        return;         /* done enough */
1192 >        }
1193 > }
1194 >
1195 >
1196 > int
1197 > pruncom(com, ppins, maxcopies)  /* run a command in parallel over network */
1198 > char    *com, *ppins;
1199 > int     maxcopies;
1200 > {
1201 >        int     retstatus = 0;
1202 >        int     hostcopies;
1203 >        char    com1buf[10240], *com1, *endcom1;
1204 >        int     status;
1205 >        register PSERVER        *ps;
1206 >
1207 >        if (!silent)
1208 >                printf("\t%s\n", com);  /* echo command */
1209 >        if (noaction)
1210 >                return(0);
1211 >        fflush(stdout);
1212 >                                        /* start jobs on each server */
1213 >        for (ps = pslist; ps != NULL; ps = ps->next) {
1214 >                hostcopies = 0;
1215 >                if (maxcopies > 1 && ps->nprocs > 1 && ppins != NULL) {
1216 >                        strcpy(com1=com1buf, com);      /* build -PP command */
1217 >                        sprintf(com1+(ppins-com), " -PP %s/%s.persist",
1218 >                                        vval(DIRECTORY), phostname(ps));
1219 >                        strcat(com1, ppins);
1220 >                        endcom1 = com1 + strlen(com1);
1221 >                        sprintf(endcom1, "; kill `sed -n '1s/^[^ ]* //p' %s/%s.persist`",
1222 >                                        vval(DIRECTORY), phostname(ps));
1223 >                } else {
1224 >                        com1 = com;
1225 >                        endcom1 = NULL;
1226 >                }
1227 >                while (maxcopies > 0 &&
1228 >                                startjob(ps, savestr(com1), donecom) != -1) {
1229 >                        sleep(10);
1230 >                        hostcopies++;
1231 >                        maxcopies--;
1232 >                        if (endcom1 != NULL)
1233 >                                *endcom1 = '\0';
1234 >                }
1235 >                if (!silent && hostcopies) {
1236 >                        if (hostcopies > 1)
1237 >                                printf("\t%d duplicate processes", hostcopies);
1238 >                        else
1239 >                                printf("\tProcess");
1240 >                        printf(" started on %s\n", phostname(ps));
1241 >                        fflush(stdout);
1242 >                }
1243 >        }
1244 >                                        /* wait for jobs to finish */
1245 >        while ((status = wait4job(NULL, -1)) != -1)
1246 >                if (status)
1247 >                        retstatus += !serverdown();     /* check server */
1248 >        return(retstatus);
1249 > }
1250 >
1251 >
1252 > runcom(cs)                      /* run a command locally and wait for it */
1253   char    *cs;
1254   {
1255          if (!silent)            /* echo it */

Diff Legend

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