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.10 by greg, Tue Feb 20 16:13:53 1996 UTC

# 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  
# Line 138 | Line 166 | char   *argv[];
166                                                  /* print variables */
167          if (explicate)
168                  printvars(stdout);
169 +                                                /* set up process servers */
170 +        sethosts();
171                                                  /* run animation */
172          animate();
173                                                  /* all done */
# Line 145 | Line 175 | char   *argv[];
175                  argv[i] = vval(NEXTANIM);       /* just change input file */
176                  if (!silent)
177                          printargs(argc, argv, stdout);
178 <                if (!noaction) {
179 <                        execvp(progname, argv);         /* pass to next */
150 <                        quit(1);                        /* shouldn't return */
151 <                }
178 >                execvp(progname, argv);         /* pass to next */
179 >                quit(1);                        /* shouldn't return */
180          }
181          quit(0);
182   userr:
# Line 185 | Line 213 | getastat()                     /* check/set animation status */
213                  goto fmterr;
214          fclose(fp);
215          if (astat.pid != 0) {                   /* thinks it's still running */
216 <                gethostname(buf, sizeof(buf));
189 <                if (strcmp(buf, astat.host)) {
216 >                if (strcmp(myhostname(), astat.host)) {
217                          fprintf(stderr,
218                          "%s: process %d may still be running on host %s\n",
219                                          progname, astat.pid, astat.host);
# Line 205 | Line 232 | getastat()                     /* check/set animation status */
232                  return(-1);
233          }
234   setours:                                        /* set our values */
235 <        gethostname(astat.host, sizeof(astat.host));
235 >        strcpy(astat.host, myhostname());
236          astat.pid = getpid();
237          strcpy(astat.cfname, cfname);
238          return(0);
# Line 222 | Line 249 | putastat()                     /* put out current status */
249          char    buf[256];
250          FILE    *fp;
251  
252 +        if (noaction)
253 +                return;
254          sprintf(buf, "%s/%s", vval(DIRECTORY), SFNAME);
255          if ((fp = fopen(buf, "w")) == NULL) {
256                  perror(buf);
# Line 261 | Line 290 | checkdir()                     /* make sure we have our directory */
290  
291   setdefaults()                   /* set default values */
292   {
293 +        extern char     *atos();
294          char    buf[256];
295  
296 <        if (vdef(OCTREE) == vdef(ANIMATE)) {
296 >        if (vdef(ANIMATE)) {
297 >                vval(OCTREE) = NULL;
298 >                vdef(OCTREE) = 0;
299 >        } else if (!vdef(OCTREE)) {
300                  fprintf(stderr, "%s: either %s or %s must be defined\n",
301                                  progname, vnam(OCTREE), vnam(ANIMATE));
302                  quit(1);
# Line 272 | Line 305 | setdefaults()                  /* set default values */
305                  fprintf(stderr, "%s: %s undefined\n", progname, vnam(VIEWFILE));
306                  quit(1);
307          }
308 +        if (!vdef(HOST)) {
309 +                vval(HOST) = LHOSTNAME;
310 +                vdef(HOST)++;
311 +        }
312          if (!vdef(START)) {
313                  vval(START) = "1";
314                  vdef(START)++;
315          }
316          if (!vdef(END)) {
317 <                sprintf(buf, "%d", countviews());
317 >                sprintf(buf, "%d", countviews()+vint(START)-1);
318                  vval(END) = savqstr(buf);
319                  vdef(END)++;
320          }
321 +        if (vint(END) < vint(START)) {
322 +                fprintf(stderr, "%s: ending frame less than starting frame\n",
323 +                                progname);
324 +                quit(1);
325 +        }
326          if (!vdef(BASENAME)) {
327                  sprintf(buf, "%s/frame%%03d", vval(DIRECTORY));
328                  vval(BASENAME) = savqstr(buf);
# Line 314 | Line 356 | setdefaults()                  /* set default values */
356                  vval(DISKSPACE) = "100";
357                  vdef(DISKSPACE)++;
358          }
359 +        if (!vdef(RSH)) {
360 +                vval(RSH) = REMSH;
361 +                vdef(RSH)++;
362 +        }
363 +                                /* locate remote shell program */
364 +        atos(buf, sizeof(buf), vval(RSH));
365 +        if ((remsh = getpath(buf, getenv("PATH"), X_OK)) != NULL)
366 +                remsh = savqstr(remsh);
367 +        else
368 +                remsh = vval(RSH);      /* will generate error if used */
369 +
370                                  /* append rendering options */
371          if (vdef(RENDER))
372                  sprintf(rendopt+strlen(rendopt), " %s", vval(RENDER));
373   }
374  
375  
376 < getradfile(rfname)              /* run rad and get needed variables */
324 < char    *rfname;
376 > sethosts()                      /* set up process servers */
377   {
378 +        extern char     *iskip();
379 +        char    buf[256], *dir, *uname;
380 +        int     np;
381 +        register char   *cp;
382 +        int     i;
383 +
384 +        npslots = 0;
385 +        if (noaction)
386 +                return;
387 +        for (i = 0; i < vdef(HOST); i++) {      /* add each host */
388 +                dir = uname = NULL;
389 +                np = 1;
390 +                strcpy(cp=buf, nvalue(HOST, i));        /* copy to buffer */
391 +                cp = sskip(cp);                         /* skip host name */
392 +                while (isspace(*cp))
393 +                        *cp++ = '\0';
394 +                if (*cp) {                              /* has # processes? */
395 +                        np = atoi(cp);
396 +                        if ((cp = iskip(cp)) == NULL || (*cp && !isspace(*cp)))
397 +                                badvalue(HOST);
398 +                        while (isspace(*cp))
399 +                                cp++;
400 +                        if (*cp) {                      /* has directory? */
401 +                                dir = cp;
402 +                                cp = sskip(cp);                 /* skip dir. */
403 +                                while (isspace(*cp))
404 +                                        *cp++ = '\0';
405 +                                if (*cp) {                      /* has user? */
406 +                                        uname = cp;
407 +                                        if (*sskip(cp))
408 +                                                badvalue(HOST);
409 +                                }
410 +                        }
411 +                }
412 +                if (addpserver(buf, dir, uname, np) == NULL) {
413 +                        if (!nowarn)
414 +                                fprintf(stderr,
415 +                                        "%s: cannot execute on host \"%s\"\n",
416 +                                                progname, buf);
417 +                } else
418 +                        npslots += np;
419 +        }
420 +        if (npslots == 0) {
421 +                fprintf(stderr, "%s: no working process servers\n", progname);
422 +                quit(1);
423 +        }
424 +        pslot = (struct pslot *)calloc(npslots, sizeof(struct pslot));
425 +        if (pslot == NULL) {
426 +                perror("malloc");
427 +                quit(1);
428 +        }
429 + }
430 +
431 +
432 + getradfile(rfargs)              /* run rad and get needed variables */
433 + char    *rfargs;
434 + {
435          static short    mvar[] = {OCTREE,PFILT,RESOLUTION,EXPOSURE,-1};
436          char    combuf[256];
437          register int    i;
# Line 331 | Line 440 | char   *rfname;
440          sprintf(rendopt, " @%s/render.opt", vval(DIRECTORY));
441          sprintf(combuf,
442          "rad -v 0 -s -e -w %s OPTFILE=%s | egrep '^[ \t]*(NOMATCH",
443 <                        rfname, rendopt+2);
443 >                        rfargs, rendopt+2);
444          cp = combuf;
445          while (*cp) cp++;               /* match unset variables */
446          for (i = 0; mvar[i] >= 0; i++)
# Line 343 | Line 452 | char   *rfname;
452          sprintf(cp, ")[ \t]*=' > %s/radset.var", vval(DIRECTORY));
453          cp += 11;                       /* point to file name */
454          if (system(combuf)) {
455 <                fprintf(stderr, "%s: bad rad input file \"%s\"\n",
456 <                                progname, rfname);
455 >                fprintf(stderr, "%s: error executing rad command:\n\t%s\n",
456 >                                progname, combuf);
457                  quit(1);
458          }
459          loadvars(cp);                   /* load variables and remove file */
# Line 401 | Line 510 | animate()                      /* run animation */
510                                  progname);
511                  quit(1);
512          }
513 +                                        /* initialize archive argument list */
514 +        i = 16;
515 +        if (vdef(ARCHIVE) && strlen(vval(ARCHIVE)) > i)
516 +                i = strlen(vval(ARCHIVE));
517 +        arcnext = arcfirst = arcargs + i;
518                                          /* initialize status file */
519          if (astat.rnext == 0)
520                  astat.rnext = astat.fnext = astat.tnext = vint(START);
521          putastat();
522                                          /* render in batches */
523 <        while (astat.rnext <= vint(END)) {
523 >        while (astat.tnext <= vint(END)) {
524                  renderframes(frames_batch);
525                  filterframes();
526                  transferframes();
# Line 466 | Line 580 | int    nframes;
580                  }
581          }
582          if (vdef(ANIMATE))              /* wait for renderings to finish */
583 <                animwait(0);
583 >                bwait(0);
584          else {                          /* else if walk-through */
585                  fclose(fp);             /* close view file */
586                  walkwait(astat.rnext, lastframe, vfname);       /* walk it */
587                  unlink(vfname);         /* remove view file */
588          }
475 –        if (vdef(ARCHIVE))              /* archive results */
476 –                archive(astat.rnext, lastframe);
589          astat.rnext = i;                /* update status */
590          putastat();
591   }
# Line 494 | Line 606 | filterframes()                         /* catch up with filtering */
606                                          progname, i);
607                          quit(1);
608                  }
609 <                dofilt(i, vp, getexp(i));               /* filter frame */
609 >                dofilt(i, vp, getexp(i), 0);            /* filter frame */
610          }
611 <        filtwait(0);                    /* wait for filter processes */
611 >        bwait(0);                       /* wait for filter processes */
612 >        archive();                      /* archive originals */
613          astat.fnext = i;                /* update status */
614          putastat();
615   }
# Line 539 | Line 652 | animrend(frame, vp)                    /* start animation frame */
652   int     frame;
653   VIEW    *vp;
654   {
655 +        extern int      recover();
656          char    combuf[2048];
657          char    fname[128];
658  
# Line 546 | Line 660 | VIEW   *vp;
660          strcat(fname, ".unf");
661          if (access(fname, F_OK) == 0)
662                  return;
663 <        sprintf(combuf, "%s %d | rpict%s%s %s > %s", vval(ANIMATE), frame,
663 >        sprintf(combuf, "%s %d | rpict%s%s -w0 %s > %s", vval(ANIMATE), frame,
664                          rendopt, viewopt(vp), rresopt, fname);
665 <        if (runcom(combuf)) {
552 <                fprintf(stderr, "%s: error rendering frame %d\n",
553 <                                progname, frame);
554 <                quit(1);
555 <        }
665 >        bruncom(combuf, frame, recover);        /* run in background */
666   }
667  
668  
559 – animwait(nwait)                         /* wait for renderings to finish */
560 – int     nwait;
561 – {
562 –        /* currently does nothing since parallel rendering not working */
563 – }
564 –
565 –
669   walkwait(first, last, vfn)              /* walk-through frames */
670   int     first, last;
671   char    *vfn;
672   {
673          char    combuf[2048];
674 +        char    *inspoint;
675          register int    i;
676  
677          if (!noaction && vint(INTERP))          /* create dummy frames */
# Line 578 | Line 682 | char   *vfn;
682                                  close(open(combuf, O_RDONLY|O_CREAT, 0666));
683                          }
684                                          /* create command */
685 <        sprintf(combuf, "rpict%s ", rendopt);
685 >        sprintf(combuf, "rpict%s -w0", rendopt);
686          if (vint(INTERP) || atoi(vval(MBLUR)))
687 <                sprintf(combuf+strlen(combuf), "-z %s.zbf ", vval(BASENAME));
688 <        sprintf(combuf+strlen(combuf), "-o %s.unf %s -S %d %s < %s",
689 <                        vval(BASENAME), rresopt, first, vval(OCTREE), vfn);
690 <        if (runcom(combuf)) {
691 <                fprintf(stderr,
692 <                "%s: error rendering walk-through frames %d through %d\n",
687 >                sprintf(combuf+strlen(combuf), " -z %s.zbf", vval(BASENAME));
688 >        sprintf(combuf+strlen(combuf), " -o %s.unf %s -S %d",
689 >                        vval(BASENAME), rresopt, first);
690 >        inspoint = combuf + strlen(combuf);
691 >        sprintf(inspoint, " %s < %s", vval(OCTREE), vfn);
692 >                                        /* run in parallel */
693 >        i = (last-first+1)/(vint(INTERP)+1);
694 >        if (i < 1) i = 1;
695 >        if (pruncom(combuf, inspoint, i)) {
696 >                fprintf(stderr, "%s: error rendering frames %d through %d\n",
697                                  progname, first, last);
698                  quit(1);
699          }
# Line 599 | Line 707 | char   *vfn;
707   }
708  
709  
710 + int
711   recover(frame)                          /* recover the specified frame */
712   int     frame;
713   {
714 +        static int      *rfrm;          /* list of recovered frames */
715 +        static int      nrfrms = 0;
716          char    combuf[2048];
717          char    fname[128];
718          register char   *cp;
719 <
719 >        register int    i;
720 >                                        /* check to see if recovered already */
721 >        for (i = nrfrms; i--; )
722 >                if (rfrm[i] == frame)
723 >                        return(0);
724 >                                        /* build command */
725          sprintf(fname, vval(BASENAME), frame);
726          if (vdef(ANIMATE))
727 <                sprintf(combuf, "%s %d | rpict%s",
727 >                sprintf(combuf, "%s %d | rpict%s -w0",
728                                  vval(ANIMATE), frame, rendopt);
729          else
730 <                sprintf(combuf, "rpict%s", rendopt);
730 >                sprintf(combuf, "rpict%s -w0", rendopt);
731          cp = combuf + strlen(combuf);
732          if (vint(INTERP) || atoi(vval(MBLUR))) {
733                  sprintf(cp, " -z %s.zbf", fname);
# Line 623 | Line 739 | int    frame;
739                  *cp++ = ' ';
740                  strcpy(cp, vval(OCTREE));
741          }
742 <        if (runcom(combuf)) {
743 <                fprintf(stderr, "%s: error recovering frame %d\n",
744 <                                progname, frame);
742 >        if (runcom(combuf))             /* run command */
743 >                return(1);
744 >                                        /* add frame to recovered list */
745 >        if (nrfrms)
746 >                rfrm = (int *)realloc((char *)rfrm, (nrfrms+1)*sizeof(int));
747 >        else
748 >                rfrm = (int *)malloc(sizeof(int));
749 >        if (rfrm == NULL) {
750 >                perror("malloc");
751                  quit(1);
752          }
753 +        rfrm[nrfrms++] = frame;
754 +        return(0);
755   }
756  
757  
758 < archive(first, last)                    /* archive finished renderings */
759 < int     first, last;
758 > int
759 > frecover(frame)                         /* recover filtered frame */
760 > int     frame;
761   {
762 <        char    combuf[10240];
763 <        int     offset;
764 <        struct stat     stb;
765 <        register char   *cp;
762 >        VIEW    *vp;
763 >        char    *ex;
764 >
765 >        vp = getview(frame);
766 >        ex = getexp(frame);
767 >        if (dofilt(frame, vp, ex, 2) && dofilt(frame, vp, ex, 1))
768 >                return(1);
769 >        return(0);
770 > }
771 >
772 >
773 > archive()                       /* archive and remove renderings */
774 > {
775 > #define RMCOML  (sizeof(rmcom)-1)
776 >        static char     rmcom[] = "rm -f";
777          register int    i;
778  
779 <        strcpy(cp=combuf, vval(ARCHIVE));
780 <        while (*cp) cp++;
781 <        offset = cp - combuf;
782 <        *cp++ = ' ';                            /* make argument list */
783 <        for (i = first; i <= last; i++) {
784 <                sprintf(cp, vval(BASENAME), i);
785 <                strcat(cp, ".unf");
786 <                if (stat(cp, &stb) == 0 && stb.st_size > 0) {   /* non-zero? */
787 <                        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 <                        }
779 >        if (arcnext == arcfirst)
780 >                return;                         /* nothing to do */
781 >        if (vdef(ARCHIVE)) {                    /* run archive command */
782 >                i = strlen(vval(ARCHIVE));
783 >                strncpy(arcfirst-i, vval(ARCHIVE), i);
784 >                if (runcom(arcfirst-i)) {
785 >                        fprintf(stderr, "%s: error running archive command\n",
786 >                                        progname);
787 >                        quit(1);
788                  }
789          }
790 <        *--cp = '\0';
791 <        if (cp <= combuf + offset)              /* no files? */
792 <                return;
793 <        if (runcom(combuf)) {                   /* run archive command */
794 <                fprintf(stderr,
666 <                "%s: error running archive command on frames %d through %d\n",
667 <                                progname, first, last);
668 <                quit(1);
669 <        }
790 >                                                /* run remove command */
791 >        strncpy(arcfirst-RMCOML, rmcom, RMCOML);
792 >        runcom(arcfirst-RMCOML);
793 >        arcnext = arcfirst;                     /* reset argument list */
794 > #undef RMCOML
795   }
796  
797  
798 < dofilt(frame, vp, ep)                           /* filter frame */
798 > int
799 > dofilt(frame, vp, ep, rvr)                      /* filter frame */
800   int     frame;
801   VIEW    *vp;
802   char    *ep;
803 + int     rvr;
804   {
805 +        extern int      frecover();
806 +        static int      iter = 0;
807          char    fnbefore[128], fnafter[128];
808 <        char    combuf[1024], fname[128];
809 <        int     usepinterp, usepfilt;
810 <        int     frbefore, frafter, triesleft;
808 >        char    combuf[1024], fname0[128], fname1[128];
809 >        int     usepinterp, usepfilt, nora_rgbe;
810 >        int     frseq[2];
811                                                  /* check what is needed */
812          usepinterp = atoi(vval(MBLUR));
813          usepfilt = pfiltalways | ep==NULL;
814 +        if (ep != NULL && !strcmp(ep, "1"))
815 +                ep = "+0";
816 +        nora_rgbe = strcmp(vval(OVERSAMP),"1") || ep==NULL ||
817 +                        *ep != '+' || *ep != '-' || !isint(ep);
818                                                  /* compute rendered views */
819 <        frbefore = frame - ((frame-1) % (vint(INTERP)+1));
820 <        frafter = frbefore + vint(INTERP) + 1;
821 <        if (frafter > vint(END))
822 <                frafter = vint(END);
823 <        if (frafter == frame) {                 /* pfilt only */
824 <                frbefore = frafter;
819 >        frseq[0] = frame - ((frame-1) % (vint(INTERP)+1));
820 >        frseq[1] = frseq[0] + vint(INTERP) + 1;
821 >        if (frseq[1] > vint(END))
822 >                frseq[1] = vint(END);
823 >        if (frseq[1] == frame) {                        /* pfilt only */
824 >                frseq[0] = frseq[1];
825                  usepinterp = 0;                 /* update what's needed */
826 <                usepfilt |= vflt(OVERSAMP)>1.01 || strcmp(ep,"1");
827 <                triesleft = 2;
828 <        } else if (frbefore == frame) {         /* no interpolation */
829 <                                                /* remove unneeded files */
830 <                if (frbefore-vint(INTERP)-1 >= 1) {
831 <                        sprintf(fname, vval(BASENAME), frbefore-vint(INTERP)-1);
832 <                        sprintf(combuf, "rm -f %s.unf %s.zbf", fname, fname);
833 <                        runcom(combuf);
826 >                usepfilt |= nora_rgbe;
827 >        } else if (frseq[0] == frame) {         /* no interpolation needed */
828 >                if (!rvr && frame > 1+vint(INTERP)) {   /* archive previous */
829 >                        *arcnext++ = ' ';
830 >                        sprintf(arcnext, vval(BASENAME), frame-vint(INTERP)-1);
831 >                        while (*arcnext) arcnext++;
832 >                        strcpy(arcnext, ".unf");
833 >                        arcnext += 4;
834 >                        if (usepinterp || vint(INTERP)) {       /* and z-buf */
835 >                                *arcnext++ = ' ';
836 >                                sprintf(arcnext, vval(BASENAME),
837 >                                                frame-vint(INTERP)-1);
838 >                                while (*arcnext) arcnext++;
839 >                                strcpy(arcnext, ".zbf");
840 >                                arcnext += 4;
841 >                        }
842                  }
843 <                                                /* update what's needed */
844 <                if (usepinterp)
845 <                        triesleft = 3;
705 <                else {
706 <                        usepfilt |= vflt(OVERSAMP)>1.01 || strcmp(ep,"1");
707 <                        triesleft = 2;
708 <                }
709 <        } else {                                /* interpolation needed */
843 >                if (!usepinterp)                /* update what's needed */
844 >                        usepfilt |= nora_rgbe;
845 >        } else                                  /* interpolation needed */
846                  usepinterp++;
847 <                triesleft = 3;
848 <        }
849 <        if (frafter >= astat.rnext) {           /* next batch unavailable */
850 <                frafter = frbefore;
851 <                if (triesleft > 2)
852 <                        triesleft = 2;
853 <        }
718 <        sprintf(fnbefore, vval(BASENAME), frbefore);
719 <        sprintf(fnafter, vval(BASENAME), frafter);
720 < tryit:                                          /* generate command */
847 >        if (frseq[1] >= astat.rnext)            /* next batch unavailable */
848 >                frseq[1] = frseq[0];
849 >        sprintf(fnbefore, vval(BASENAME), frseq[0]);
850 >        sprintf(fnafter, vval(BASENAME), frseq[1]);
851 >        if (rvr == 1 && recover(frseq[0]))      /* recover before frame? */
852 >                return(1);
853 >                                                /* generate command */
854          if (usepinterp) {                       /* using pinterp */
855 +                if (rvr == 2 && recover(frseq[1]))      /* recover after? */
856 +                        return(1);
857                  if (atoi(vval(MBLUR))) {
858                          FILE    *fp;            /* motion blurring */
859 <                        sprintf(fname, "%s/vw0", vval(DIRECTORY));
860 <                        if ((fp = fopen(fname, "w")) == NULL) {
861 <                                perror(fname); quit(1);
859 >                        sprintf(fname0, "%s/vw0%c", vval(DIRECTORY),
860 >                                        'a'+(iter%26));
861 >                        if ((fp = fopen(fname0, "w")) == NULL) {
862 >                                perror(fname0); quit(1);
863                          }
864                          fputs(VIEWSTR, fp);
865                          fprintview(vp, fp);
# Line 734 | Line 870 | tryit:                                         /* generate command */
870                                                  progname, frame+1);
871                                  quit(1);
872                          }
873 <                        sprintf(fname, "%s/vw1", vval(DIRECTORY));
874 <                        if ((fp = fopen(fname, "w")) == NULL) {
875 <                                perror(fname); quit(1);
873 >                        sprintf(fname1, "%s/vw1%c", vval(DIRECTORY),
874 >                                        'a'+(iter%26));
875 >                        if ((fp = fopen(fname1, "w")) == NULL) {
876 >                                perror(fname1); quit(1);
877                          }
878                          fputs(VIEWSTR, fp);
879                          fprintview(vp, fp);
880                          putc('\n', fp); fclose(fp);
881                          sprintf(combuf,
882 <        "(pmblur %s %d %s/vw0 %s/vw1; rm -f %s/vw0 %s/vw1) | pinterp -B",
883 <                                *sskip(vval(MBLUR)) ? sskip(vval(MBLUR)) : "1",
884 <                                        atoi(vval(MBLUR)), vval(DIRECTORY),
885 <                                        vval(DIRECTORY), vval(DIRECTORY),
886 <                                        vval(DIRECTORY), vval(DIRECTORY));
882 >                        "(pmblur %s %d %s %s; rm -f %s %s) | pinterp -B",
883 >                        *sskip(vval(MBLUR)) ? sskip2(vval(MBLUR),1) : "1",
884 >                                        atoi(vval(MBLUR)),
885 >                                        fname0, fname1, fname0, fname1);
886 >                        iter++;
887                  } else                          /* no blurring */
888                          strcpy(combuf, "pinterp");
889                  strcat(combuf, viewopt(vp));
890                  if (vbool(RTRACE))
891 <                        sprintf(combuf+strlen(combuf), " -ff -fr '%s %s'",
891 >                        sprintf(combuf+strlen(combuf), " -ff -fr '%s -w0 %s'",
892                                          rendopt, vval(OCTREE));
893                  if (vdef(PINTERP))
894                          sprintf(combuf+strlen(combuf), " %s", vval(PINTERP));
# Line 762 | Line 899 | tryit:                                         /* generate command */
899                                          fresopt, ep);
900                  sprintf(combuf+strlen(combuf), " %s.unf %s.zbf",
901                                  fnbefore, fnbefore);
902 <                if (frafter != frbefore)
902 >                if (frseq[1] != frseq[0])
903                           sprintf(combuf+strlen(combuf), " %s.unf %s.zbf",
904                                          fnafter, fnafter);
905                  if (usepfilt) {                 /* also pfilt */
# Line 778 | Line 915 | tryit:                                         /* generate command */
915                                  sprintf(combuf+strlen(combuf), " %s", fresopt);
916                  }
917          } else if (usepfilt) {                  /* pfilt only */
918 +                if (rvr == 2)
919 +                        return(1);
920                  if (vdef(PFILT))
921                          sprintf(combuf, "pfilt %s", vval(PFILT));
922                  else
# Line 789 | Line 928 | tryit:                                         /* generate command */
928                          sprintf(combuf+strlen(combuf), " %s %s.unf",
929                                          fresopt, fnbefore);
930          } else {                                /* else just check it */
931 <                sprintf(combuf, "ra_rgbe -r %s.unf", fnbefore);
931 >                if (rvr == 2)
932 >                        return(1);
933 >                sprintf(combuf, "ra_rgbe -e %s -r %s.unf", ep, fnbefore);
934          }
935                                                  /* output file name */
936 <        sprintf(fname, vval(BASENAME), frame);
937 <        sprintf(combuf+strlen(combuf), " > %s.pic", fname);
938 <        if (runcom(combuf))                     /* run filter command */
939 <                switch (--triesleft) {
940 <                case 2:                         /* try to recover frafter */
941 <                        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 <                }
936 >        sprintf(fname0, vval(BASENAME), frame);
937 >        sprintf(combuf+strlen(combuf), " > %s.pic", fname0);
938 >        if (rvr)                                /* in recovery */
939 >                return(runcom(combuf));
940 >        bruncom(combuf, frame, frecover);       /* else run in background */
941 >        return(0);
942   }
943  
944  
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 –
945   VIEW *
946   getview(n)                      /* get view number n */
947   int     n;
# Line 842 | Line 966 | int    n;
966                          quit(1);
967                  }
968          } else if (n < viewnum) {       /* rewind file */
969 +                if (viewnum == 1 && feof(viewfp))
970 +                        return(&curview);               /* just one view */
971                  if (fseek(viewfp, 0L, 0) == EOF) {
972                          perror(vval(VIEWFILE));
973                          quit(1);
# Line 851 | Line 977 | int    n;
977          }
978          while (n > viewnum) {           /* scan to desired view */
979                  if (fgets(linebuf, sizeof(linebuf), viewfp) == NULL)
980 <                        return(NULL);
980 >                        return(viewnum==1 ? &curview : NULL);
981                  if (isview(linebuf) && sscanview(&curview, linebuf) > 0)
982                          viewnum++;
983          }
# Line 937 | Line 1063 | int    n;
1063   }
1064  
1065  
1066 < runcom(cs)                      /* run command */
1066 > struct pslot *
1067 > findpslot(pid)                  /* find or allocate a process slot */
1068 > int     pid;
1069 > {
1070 >        register struct pslot   *psempty = NULL;
1071 >        register int    i;
1072 >
1073 >        for (i = 0; i < npslots; i++) {         /* look for match */
1074 >                if (pslot[i].pid == pid)
1075 >                        return(pslot+i);
1076 >                if (psempty == NULL && pslot[i].pid == 0)
1077 >                        psempty = pslot+i;
1078 >        }
1079 >        return(psempty);                /* return emtpy slot (error if NULL) */
1080 > }
1081 >
1082 >
1083 > int
1084 > donecom(ps, pn, status)         /* clean up after finished process */
1085 > PSERVER *ps;
1086 > int     pn;
1087 > int     status;
1088 > {
1089 >        register PROC   *pp;
1090 >
1091 >        pp = ps->proc + pn;
1092 >        if (pp->elen) {                 /* pass errors */
1093 >                if (ps->hostname[0])
1094 >                        fprintf(stderr, "%s: ", ps->hostname);
1095 >                fprintf(stderr, "Error output from: %s\n", pp->com);
1096 >                fputs(pp->errs, stderr);
1097 >                fflush(stderr);
1098 >                if (ps->hostname[0])
1099 >                        status = 1;     /* because rsh doesn't return status */
1100 >        }
1101 >        freestr(pp->com);               /* free command string */
1102 >        lastpid = pp->pid;              /* record PID for bwait() */
1103 >        lastpserver = ps;               /* record server for serverdown() */
1104 >        return(status);
1105 > }
1106 >
1107 >
1108 > int
1109 > serverdown()                    /* check status of last process server */
1110 > {
1111 >        if (pserverOK(lastpserver))     /* server still up? */
1112 >                return(0);
1113 >        delpserver(lastpserver);        /* else delete it */
1114 >        if (pslist == NULL) {
1115 >                fprintf(stderr, "%s: all process servers are down\n",
1116 >                                progname);
1117 >                quit(1);
1118 >        }
1119 >        return(1);
1120 > }
1121 >
1122 >
1123 > int
1124 > bruncom(com, fout, rf)          /* run a command in the background */
1125 > char    *com;
1126 > int     fout;
1127 > int     (*rf)();
1128 > {
1129 >        int     pid;
1130 >        register struct pslot   *psl;
1131 >
1132 >        if (noaction) {
1133 >                if (!silent)
1134 >                        printf("\t%s\n", com);  /* echo command */
1135 >                return(0);
1136 >        }
1137 >                                        /* else start it when we can */
1138 >        while ((pid = startjob(NULL, savestr(com), donecom)) == -1)
1139 >                bwait(1);
1140 >        if (!silent) {                          /* echo command */
1141 >                PSERVER *ps;
1142 >                int     psn = pid;
1143 >                ps = findjob(&psn);
1144 >                printf("\t%s\n", com);
1145 >                printf("\tProcess started on %s\n", phostname(ps));
1146 >                fflush(stdout);
1147 >        }
1148 >        psl = findpslot(pid);           /* record info. in appropriate slot */
1149 >        psl->pid = pid;
1150 >        psl->fout = fout;
1151 >        psl->rcvf = rf;
1152 >        return(pid);
1153 > }
1154 >
1155 >
1156 > bwait(ncoms)                            /* wait for batch job(s) to finish */
1157 > int     ncoms;
1158 > {
1159 >        int     status;
1160 >        register struct pslot   *psl;
1161 >
1162 >        if (noaction)
1163 >                return;
1164 >        while ((status = wait4job(NULL, -1)) != -1) {
1165 >                psl = findpslot(lastpid);
1166 >                if (status) {           /* attempt recovery */
1167 >                        serverdown();   /* check server */
1168 >                        if (psl->rcvf == NULL || (*psl->rcvf)(psl->fout)) {
1169 >                                fprintf(stderr,
1170 >                                        "%s: error rendering frame %d\n",
1171 >                                                progname, psl->fout);
1172 >                                quit(1);
1173 >                        }
1174 >                }
1175 >                psl->pid = 0;           /* free process slot */
1176 >                if (!--ncoms)
1177 >                        return;         /* done enough */
1178 >        }
1179 > }
1180 >
1181 >
1182 > int
1183 > pruncom(com, ppins, maxcopies)  /* run a command in parallel over network */
1184 > char    *com, *ppins;
1185 > int     maxcopies;
1186 > {
1187 >        int     retstatus = 0;
1188 >        int     hostcopies;
1189 >        char    com1buf[10240], *com1, *endcom1;
1190 >        int     status;
1191 >        register PSERVER        *ps;
1192 >
1193 >        if (!silent)
1194 >                printf("\t%s\n", com);  /* echo command */
1195 >        if (noaction)
1196 >                return(0);
1197 >        fflush(stdout);
1198 >                                        /* start jobs on each server */
1199 >        for (ps = pslist; ps != NULL; ps = ps->next) {
1200 >                hostcopies = 0;
1201 >                if (maxcopies > 1 && ps->nprocs > 1 && ppins != NULL) {
1202 >                        strcpy(com1=com1buf, com);      /* build -PP command */
1203 >                        sprintf(com1+(ppins-com), " -PP %s/%s.persist",
1204 >                                        vval(DIRECTORY), phostname(ps));
1205 >                        strcat(com1, ppins);
1206 >                        endcom1 = com1 + strlen(com1);
1207 >                        sprintf(endcom1, "; kill `sed -n '1s/^[^ ]* //p' %s/%s.persist`",
1208 >                                        vval(DIRECTORY), phostname(ps));
1209 >                } else {
1210 >                        com1 = com;
1211 >                        endcom1 = NULL;
1212 >                }
1213 >                while (maxcopies > 0 &&
1214 >                                startjob(ps, savestr(com1), donecom) != -1) {
1215 >                        sleep(10);
1216 >                        hostcopies++;
1217 >                        maxcopies--;
1218 >                        if (endcom1 != NULL)
1219 >                                *endcom1 = '\0';
1220 >                }
1221 >                if (!silent && hostcopies) {
1222 >                        if (hostcopies > 1)
1223 >                                printf("\t%d duplicate processes", hostcopies);
1224 >                        else
1225 >                                printf("\tProcess");
1226 >                        printf(" started on %s\n", phostname(ps));
1227 >                        fflush(stdout);
1228 >                }
1229 >        }
1230 >                                        /* wait for jobs to finish */
1231 >        while ((status = wait4job(NULL, -1)) != -1)
1232 >                if (status)
1233 >                        retstatus += !serverdown();     /* check server */
1234 >        return(retstatus);
1235 > }
1236 >
1237 >
1238 > runcom(cs)                      /* run a command locally and wait for it */
1239   char    *cs;
1240   {
1241          if (!silent)            /* echo it */

Diff Legend

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