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.10 by greg, Tue Feb 20 16:13:53 1996 UTC vs.
Revision 2.52 by greg, Tue Apr 18 04:30:35 2006 UTC

# Line 1 | Line 1
1 /* Copyright (c) 1995 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   * Radiance animation control program
6 + *
7 + * The main difference between this program and ranimove is that
8 + * we have many optimizations here for camera motion in static
9 + * environments, calling rpict and pinterp on multiple processors,
10 + * where ranimove puts its emphasis on object motion, and does
11 + * not use any external programs for image generation.
12 + *
13 + * See the ranimate(1) man page for further details.
14   */
15  
16 < #include "standard.h"
16 > #include "copyright.h"
17 >
18 > #include <stdio.h>
19   #include <ctype.h>
13 #include <sys/types.h>
20   #include <sys/stat.h>
21 + #include <time.h>
22 + #include <signal.h>
23 +
24 + #include "platform.h"
25 + #include "rtprocess.h"
26 + #include "paths.h"
27 + #include "standard.h"
28   #include "view.h"
29   #include "vars.h"
30   #include "netproc.h"
31 +                                /* default blur samples */
32 + #ifndef DEF_NBLUR
33 + #define DEF_NBLUR       5
34 + #endif
35                                  /* default remote shell */
36 < #ifdef _AUX_SOURCE
37 < #define REMSH           "remsh"
21 < #else
22 < #define REMSH           "rsh"
36 > #ifndef REMSH
37 > #define REMSH           "ssh"
38   #endif
39 <                                /* input variables */
40 < #define HOST            0               /* rendering host machine */
41 < #define RENDER          1               /* rendering options */
42 < #define PFILT           2               /* pfilt options */
43 < #define PINTERP         3               /* pinterp options */
44 < #define OCTREE          4               /* octree file name */
45 < #define DIRECTORY       5               /* working (sub)directory */
46 < #define BASENAME        6               /* output image base name */
47 < #define VIEWFILE        7               /* animation frame views */
48 < #define START           8               /* starting frame number */
49 < #define END             9               /* ending frame number */
50 < #define RIF             10              /* rad input file */
39 >                                /* input variables (alphabetical by name) */
40 > #define ANIMATE         0               /* animation command */
41 > #define ARCHIVE         1               /* archiving command */
42 > #define BASENAME        2               /* output image base name */
43 > #define DBLUR           3               /* depth of field blur */
44 > #define DIRECTORY       4               /* working (sub)directory */
45 > #define DISKSPACE       5               /* how much disk space to use */
46 > #define END             6               /* ending frame number */
47 > #define EXPOSURE        7               /* how to compute exposure */
48 > #define HOST            8               /* rendering host machine */
49 > #define INTERP          9               /* # frames to interpolate */
50 > #define MBLUR           10              /* motion blur parameters */
51   #define NEXTANIM        11              /* next animation file */
52 < #define ANIMATE         12              /* animation command */
53 < #define TRANSFER        13              /* frame transfer command */
54 < #define ARCHIVE         14              /* archiving command */
55 < #define INTERP          15              /* # frames to interpolate */
56 < #define OVERSAMP        16              /* # times to oversample image */
57 < #define MBLUR           17              /* samples for motion blur */
58 < #define RTRACE          18              /* use rtrace with pinterp? */
59 < #define DISKSPACE       19              /* how much disk space to use */
60 < #define RESOLUTION      20              /* desired final resolution */
61 < #define EXPOSURE        21              /* how to compute exposure */
62 < #define RSH             22              /* remote shell script or program */
52 > #define OCTREE          12              /* octree file name */
53 > #define OVERSAMP        13              /* # times to oversample image */
54 > #define PFILT           14              /* pfilt options */
55 > #define PINTERP         15              /* pinterp options */
56 > #define RENDER          16              /* rendering options */
57 > #define RESOLUTION      17              /* desired final resolution */
58 > #define RIF             18              /* rad input file */
59 > #define RSH             19              /* remote shell script or program */
60 > #define RTRACE          20              /* use rtrace with pinterp? */
61 > #define START           21              /* starting frame number */
62 > #define TRANSFER        22              /* frame transfer command */
63 > #define VIEWFILE        23              /* animation frame views */
64  
65 < int     NVARS = 23;             /* total number of variables */
65 > int     NVARS = 24;             /* total number of variables */
66  
67   VARIABLE        vv[] = {                /* variable-value pairs */
52        {"host",        4,      0,      NULL,   NULL},
53        {"render",      3,      0,      NULL,   catvalues},
54        {"pfilt",       2,      0,      NULL,   catvalues},
55        {"pinterp",     2,      0,      NULL,   catvalues},
56        {"OCTREE",      3,      0,      NULL,   onevalue},
57        {"DIRECTORY",   3,      0,      NULL,   onevalue},
58        {"BASENAME",    3,      0,      NULL,   onevalue},
59        {"VIEWFILE",    2,      0,      NULL,   onevalue},
60        {"START",       2,      0,      NULL,   intvalue},
61        {"END",         2,      0,      NULL,   intvalue},
62        {"RIF",         3,      0,      NULL,   onevalue},
63        {"NEXTANIM",    3,      0,      NULL,   onevalue},
68          {"ANIMATE",     2,      0,      NULL,   onevalue},
65        {"TRANSFER",    2,      0,      NULL,   onevalue},
69          {"ARCHIVE",     2,      0,      NULL,   onevalue},
70 +        {"BASENAME",    3,      0,      NULL,   onevalue},
71 +        {"DBLUR",       2,      0,      NULL,   onevalue},
72 +        {"DIRECTORY",   3,      0,      NULL,   onevalue},
73 +        {"DISKSPACE",   3,      0,      NULL,   fltvalue},
74 +        {"END",         2,      0,      NULL,   intvalue},
75 +        {"EXPOSURE",    3,      0,      NULL,   onevalue},
76 +        {"host",        4,      0,      NULL,   NULL},
77          {"INTERPOLATE", 3,      0,      NULL,   intvalue},
68        {"OVERSAMPLE",  2,      0,      NULL,   fltvalue},
78          {"MBLUR",       2,      0,      NULL,   onevalue},
79 <        {"RTRACE",      2,      0,      NULL,   boolvalue},
80 <        {"DISKSPACE",   3,      0,      NULL,   fltvalue},
79 >        {"NEXTANIM",    3,      0,      NULL,   onevalue},
80 >        {"OCTREE",      3,      0,      NULL,   onevalue},
81 >        {"OVERSAMPLE",  2,      0,      NULL,   fltvalue},
82 >        {"pfilt",       2,      0,      NULL,   catvalues},
83 >        {"pinterp",     2,      0,      NULL,   catvalues},
84 >        {"render",      3,      0,      NULL,   catvalues},
85          {"RESOLUTION",  3,      0,      NULL,   onevalue},
86 <        {"EXPOSURE",    3,      0,      NULL,   onevalue},
86 >        {"RIF",         3,      0,      NULL,   onevalue},
87          {"RSH",         3,      0,      NULL,   onevalue},
88 +        {"RTRACE",      2,      0,      NULL,   boolvalue},
89 +        {"START",       2,      0,      NULL,   intvalue},
90 +        {"TRANSFER",    2,      0,      NULL,   onevalue},
91 +        {"VIEWFILE",    2,      0,      NULL,   onevalue},
92   };
93  
94   #define SFNAME  "STATUS"                /* status file name */
95  
96   struct {
97          char    host[64];               /* control host name */
98 <        int     pid;                    /* control process id */
98 >        RT_PID  pid;                    /* control process id */
99          char    cfname[128];            /* control file name */
100          int     rnext;                  /* next frame to render */
101          int     fnext;                  /* next frame to filter */
# Line 93 | Line 110 | int    silent = 0;             /* silent mode? */
110   int     noaction = 0;           /* take no action? */
111  
112   char    *remsh;                 /* remote shell program/script */
113 < char    rendopt[2048] = "";     /* rendering options */
113 > char    rendopt[2048];          /* rendering options */
114   char    rresopt[32];            /* rendering resolution options */
115   char    fresopt[32];            /* filter resolution options */
116   int     pfiltalways;            /* always use pfilt? */
# Line 102 | Line 119 | char   arcargs[10240];         /* files to archive */
119   char    *arcfirst, *arcnext;    /* pointers to first and next argument */
120  
121   struct pslot {
122 <        int     pid;                    /* process ID (0 if empty) */
122 >        RT_PID  pid;                    /* process ID (0 if empty) */
123          int     fout;                   /* output frame number */
124          int     (*rcvf)();              /* recover function */
125   }       *pslot;                 /* process slots */
126   int     npslots;                /* number of process slots */
127  
111 int     lastpid;                /* ID of last completed background process */
112 PSERVER *lastpserver;           /* last process server used */
113
128   #define phostname(ps)   ((ps)->hostname[0] ? (ps)->hostname : astat.host)
129 + PSERVER *lastpserver;           /* last process server with error */
130  
131 < struct pslot    *findpslot();
131 > static struct pslot * findpslot(RT_PID pid);
132 > static void checkdir(void);
133 > static VIEW * getview(int n);
134  
135 < VIEW    *getview();
136 < char    *getexp();
135 > static char * dirfile(char *df, register char *path);
136 > static char * getexp(int n);
137 > static int getblur(double *mbf, double *dbf);
138 > static int getastat(void);
139 > static void getradfile(char *rfargs);
140 > static void badvalue(int vc);
141 > static int rmfile(char *fn);
142 > static int runcom(char *cs);
143 > static int pruncom(char *com, char *ppins, int maxcopies);
144 > static void bwait(int ncoms);
145 > static RT_PID bruncom(char *com, int fout, int (*rf)());
146 > static int serverdown(void);
147 > static pscompfunc donecom;
148 > static int countviews(void);
149 > static int dofilt(int frame, int rvr);
150 > static void archive(void);
151 > static int frecover(int frame);
152 > static int recover(int frame);
153 > static void sethosts(void);
154 > static void walkwait(int first, int last, char *vfn);
155 > static void animrend(int frame, VIEW *vp);
156 > static void transferframes(void);
157 > static void filterframes(void);
158 > static void renderframes(int nframes);
159 > static void animate(void);
160 > static void setdefaults(void);
161 > static void putastat(void);
162  
163  
164 < main(argc, argv)
165 < int     argc;
166 < char    *argv[];
164 > int
165 > main(
166 >        int     argc,
167 >        char    *argv[]
168 > )
169   {
170          int     explicate = 0;
171          int     i;
# Line 149 | Line 193 | char   *argv[];
193          cfname = argv[i];
194                                                  /* load variables */
195          loadvars(cfname);
196 +                                                /* check variables */
197 +        checkvalues();
198                                                  /* did we get DIRECTORY? */
199          checkdir();
200                                                  /* check status */
# Line 172 | Line 218 | char   *argv[];
218          animate();
219                                                  /* all done */
220          if (vdef(NEXTANIM)) {
221 +                char    *fullp;
222                  argv[i] = vval(NEXTANIM);       /* just change input file */
223                  if (!silent)
224                          printargs(argc, argv, stdout);
225 <                execvp(progname, argv);         /* pass to next */
226 <                quit(1);                        /* shouldn't return */
225 >                fflush(stdout);
226 >                if ((fullp = getpath(argv[0],getenv("PATH"),X_OK)) == NULL)
227 >                        fprintf(stderr, "%s: command not found\n", argv[0]);
228 >                else
229 >                        execv(fullp, argv);
230 >                quit(1);
231          }
232          quit(0);
233 +        return(0); /* pro forma return */
234   userr:
235          fprintf(stderr, "Usage: %s [-s][-n][-w][-e] anim_file\n", progname);
236          quit(1);
237 +        return 1; /* pro forma return */
238   }
239  
240  
241 < getastat()                      /* check/set animation status */
241 > static int
242 > getastat(void)                  /* check/set animation status */
243   {
244 <        char    buf[256];
244 >        char    sfname[256];
245          FILE    *fp;
246  
247 <        sprintf(buf, "%s/%s", vval(DIRECTORY), SFNAME);
248 <        if ((fp = fopen(buf, "r")) == NULL) {
247 >        sprintf(sfname, "%s/%s", vval(DIRECTORY), SFNAME);
248 >        if ((fp = fopen(sfname, "r")) == NULL) {
249                  if (errno != ENOENT) {
250 <                        perror(buf);
250 >                        perror(sfname);
251                          return(-1);
252                  }
253                  astat.rnext = astat.fnext = astat.tnext = 0;
# Line 226 | Line 280 | getastat()                     /* check/set animation status */
280                  }
281                  /* assume it is dead */
282          }
283 <        if (strcmp(cfname, astat.cfname) && astat.tnext != 0) { /* other's */
283 >        if (strcmp(cfname, astat.cfname) && astat.pid != 0) {   /* other's */
284                  fprintf(stderr, "%s: unfinished job \"%s\"\n",
285                                  progname, astat.cfname);
286                  return(-1);
287          }
288 +                                                /* check control file mods. */
289 +        if (!nowarn && fdate(cfname) > fdate(sfname))
290 +                fprintf(stderr,
291 +                        "%s: warning - control file modified since last run\n",
292 +                                progname);
293   setours:                                        /* set our values */
294          strcpy(astat.host, myhostname());
295          astat.pid = getpid();
# Line 238 | Line 297 | setours:                                       /* set our values */
297          return(0);
298   fmterr:
299          fprintf(stderr, "%s: format error in status file \"%s\"\n",
300 <                        progname, buf);
300 >                        progname, sfname);
301          fclose(fp);
302          return(-1);
303   }
304  
305  
306 < putastat()                      /* put out current status */
306 > static void
307 > putastat(void)                  /* put out current status */
308   {
309          char    buf[256];
310          FILE    *fp;
# Line 266 | Line 326 | putastat()                     /* put out current status */
326   }
327  
328  
329 < checkdir()                      /* make sure we have our directory */
329 > static void
330 > checkdir(void)                  /* make sure we have our directory */
331   {
332          struct stat     stb;
333  
# Line 288 | Line 349 | checkdir()                     /* make sure we have our directory */
349   }
350  
351  
352 < setdefaults()                   /* set default values */
352 > static void
353 > setdefaults(void)                       /* set default values */
354   {
355          extern char     *atos();
356 +        int     decades;
357          char    buf[256];
358  
359          if (vdef(ANIMATE)) {
# Line 324 | Line 387 | setdefaults()                  /* set default values */
387                  quit(1);
388          }
389          if (!vdef(BASENAME)) {
390 <                sprintf(buf, "%s/frame%%03d", vval(DIRECTORY));
390 >                decades = (int)log10((double)vint(END)) + 1;
391 >                if (decades < 3) decades = 3;
392 >                sprintf(buf, "%s/frame%%0%dd", vval(DIRECTORY), decades);
393                  vval(BASENAME) = savqstr(buf);
394                  vdef(BASENAME)++;
395          }
# Line 373 | Line 438 | setdefaults()                  /* set default values */
438   }
439  
440  
441 < sethosts()                      /* set up process servers */
441 > static void
442 > sethosts(void)                  /* set up process servers */
443   {
444          extern char     *iskip();
445          char    buf[256], *dir, *uname;
# Line 428 | Line 494 | sethosts()                     /* set up process servers */
494          }
495   }
496  
497 <
498 < getradfile(rfargs)              /* run rad and get needed variables */
433 < char    *rfargs;
497 > static void
498 > getradfile(char *rfargs)                /* run rad and get needed variables */
499   {
500          static short    mvar[] = {OCTREE,PFILT,RESOLUTION,EXPOSURE,-1};
501          char    combuf[256];
502          register int    i;
503          register char   *cp;
504 +        char    *pippt = NULL;
505                                          /* create rad command */
506          sprintf(rendopt, " @%s/render.opt", vval(DIRECTORY));
507          sprintf(combuf,
508          "rad -v 0 -s -e -w %s OPTFILE=%s | egrep '^[ \t]*(NOMATCH",
509                          rfargs, rendopt+2);
510          cp = combuf;
511 <        while (*cp) cp++;               /* match unset variables */
511 >        while (*cp) {
512 >                if (*cp == '|') pippt = cp;
513 >                cp++;
514 >        }                               /* match unset variables */
515          for (i = 0; mvar[i] >= 0; i++)
516                  if (!vdef(mvar[i])) {
517                          *cp++ = '|';
518                          strcpy(cp, vnam(mvar[i]));
519                          while (*cp) cp++;
520 +                        pippt = NULL;
521                  }
522 <        sprintf(cp, ")[ \t]*=' > %s/radset.var", vval(DIRECTORY));
523 <        cp += 11;                       /* point to file name */
524 <        if (system(combuf)) {
525 <                fprintf(stderr, "%s: error executing rad command:\n\t%s\n",
526 <                                progname, combuf);
457 <                quit(1);
522 >        if (pippt != NULL)
523 >                strcpy(pippt, "> " NULL_DEVICE);        /* nothing to match */
524 >        else {
525 >                sprintf(cp, ")[ \t]*=' > %s/radset.var", vval(DIRECTORY));
526 >                cp += 11;               /* point to file name */
527          }
528 <        loadvars(cp);                   /* load variables and remove file */
529 <        unlink(cp);
528 >        system(combuf);                 /* ignore exit code */
529 >        if (pippt == NULL) {            /* load variables and remove file */
530 >                loadvars(cp);
531 >                unlink(cp);
532 >        }
533   }
534  
535  
536 < animate()                       /* run animation */
536 > static void
537 > animate(void)                   /* run animation */
538   {
539          int     xres, yres;
540          float   pa, mult;
# Line 472 | Line 545 | animate()                      /* run animation */
545          i = sscanf(vval(RESOLUTION), "%d %d %f", &xres, &yres, &pa);
546          mult = vflt(OVERSAMP);
547          if (i == 3) {
548 <                sprintf(rresopt, "-x %d -y %d -pa %f", (int)(mult*xres),
548 >                sprintf(rresopt, "-x %d -y %d -pa %.3f", (int)(mult*xres),
549                                  (int)(mult*yres), pa);
550 <                sprintf(fresopt, "-x %d -y %d -pa %f", xres, yres, pa);
550 >                sprintf(fresopt, "-x %d -y %d -pa %.3f", xres, yres, pa);
551          } else if (i) {
552                  if (i == 1) yres = xres;
553                  sprintf(rresopt, "-x %d -y %d", (int)(mult*xres),
# Line 491 | Line 564 | animate()                      /* run animation */
564                                                  progname, vnam(INTERP));
565                          vval(INTERP) = "0";
566                  }
567 <                if (atoi(vval(MBLUR))) {        /* can't handle this yet */
567 >                if (strcmp(vval(MBLUR),"0")) {  /* can't handle this */
568                          if (!nowarn)
569                                  fprintf(stderr,
570                                          "%s: resetting %s=0 for animation\n",
# Line 501 | Line 574 | animate()                      /* run animation */
574          }
575                                          /* figure # frames per batch */
576          d1 = mult*xres*mult*yres*4;             /* space for orig. picture */
577 <        if ((i=vint(INTERP)) || atoi(vval(MBLUR)))
578 <                d1 += mult*xres*mult*yres*4;    /* space for z-buffer */
577 >        if ((i=vint(INTERP)) || getblur(NULL, NULL) > 1)
578 >                d1 += mult*xres*mult*yres*sizeof(float);        /* Z-buffer */
579          d2 = xres*yres*4;                       /* space for final picture */
580          frames_batch = (i+1)*(vflt(DISKSPACE)*1048576.-d1)/(d1+i*d2);
581          if (frames_batch < i+2) {
# Line 511 | Line 584 | animate()                      /* run animation */
584                  quit(1);
585          }
586                                          /* initialize archive argument list */
587 <        i = 16;
515 <        if (vdef(ARCHIVE) && strlen(vval(ARCHIVE)) > i)
516 <                i = strlen(vval(ARCHIVE));
587 >        i = vdef(ARCHIVE) ? strlen(vval(ARCHIVE))+132 : 132;
588          arcnext = arcfirst = arcargs + i;
589                                          /* initialize status file */
590          if (astat.rnext == 0)
# Line 534 | Line 605 | animate()                      /* run animation */
605   }
606  
607  
608 < renderframes(nframes)           /* render next nframes frames */
609 < int     nframes;
608 > static void
609 > renderframes(int nframes)               /* render next nframes frames */
610   {
611          static char     vendbuf[16];
612          VIEW    *vp;
# Line 591 | Line 662 | int    nframes;
662   }
663  
664  
665 < filterframes()                          /* catch up with filtering */
665 > static void
666 > filterframes(void)                              /* catch up with filtering */
667   {
596        VIEW    *vp;
668          register int    i;
669  
670          if (astat.tnext < astat.fnext)  /* other work to do first */
671                  return;
672                                          /* filter each view */
673 <        for (i = astat.fnext; i < astat.rnext; i++) {
674 <                if ((vp = getview(i)) == NULL) {        /* get view i */
675 <                        fprintf(stderr,
605 <                        "%s: unexpected error reading view for frame %d\n",
606 <                                        progname, i);
607 <                        quit(1);
608 <                }
609 <                dofilt(i, vp, getexp(i), 0);            /* filter frame */
610 <        }
673 >        for (i = astat.fnext; i < astat.rnext; i++)
674 >                dofilt(i, 0);
675 >
676          bwait(0);                       /* wait for filter processes */
677          archive();                      /* archive originals */
678          astat.fnext = i;                /* update status */
# Line 615 | Line 680 | filterframes()                         /* catch up with filtering */
680   }
681  
682  
683 < transferframes()                        /* catch up with picture transfers */
683 > static void
684 > transferframes(void)                    /* catch up with picture transfers */
685   {
686 <        char    combuf[10240];
686 >        char    combuf[10240], *fbase;
687          register char   *cp;
688          register int    i;
689  
# Line 628 | Line 694 | transferframes()                       /* catch up with picture transfers
694                  putastat();             /* update status */
695                  return;
696          }
697 <        strcpy(combuf, vval(TRANSFER)); /* start transfer command */
698 <        cp = combuf + strlen(combuf);
697 >        strcpy(combuf, "cd ");          /* start transfer command */
698 >        fbase = dirfile(cp = combuf+3, vval(BASENAME));
699 >        if (*cp) {
700 >                while (*++cp) ;
701 >                *cp++ = ';'; *cp++ = ' ';
702 >        } else
703 >                cp = combuf;
704 >        strcpy(cp, vval(TRANSFER));
705 >        while (*cp) cp++;
706                                          /* make argument list */
707          for (i = astat.tnext; i < astat.fnext; i++) {
708                  *cp++ = ' ';
709 <                sprintf(cp, vval(BASENAME), i);
709 >                sprintf(cp, fbase, i);
710                  while (*cp) cp++;
711                  strcpy(cp, ".pic");
712                  cp += 4;
# Line 648 | Line 721 | transferframes()                       /* catch up with picture transfers
721   }
722  
723  
724 < animrend(frame, vp)                     /* start animation frame */
725 < int     frame;
726 < VIEW    *vp;
724 > static void
725 > animrend(                       /* start animation frame */
726 > int     frame,
727 > VIEW    *vp
728 > )
729   {
655        extern int      recover();
730          char    combuf[2048];
731          char    fname[128];
732  
# Line 666 | Line 740 | VIEW   *vp;
740   }
741  
742  
743 < walkwait(first, last, vfn)              /* walk-through frames */
744 < int     first, last;
745 < char    *vfn;
743 > static void
744 > walkwait(               /* walk-through frames */
745 > int     first,
746 > int last,
747 > char    *vfn
748 > )
749   {
750 +        double  mblurf, dblurf;
751 +        int     nblur = getblur(&mblurf, &dblurf);
752          char    combuf[2048];
753 <        char    *inspoint;
753 >        register char   *inspoint;
754          register int    i;
755  
756          if (!noaction && vint(INTERP))          /* create dummy frames */
# Line 682 | Line 761 | char   *vfn;
761                                  close(open(combuf, O_RDONLY|O_CREAT, 0666));
762                          }
763                                          /* create command */
764 <        sprintf(combuf, "rpict%s -w0", rendopt);
765 <        if (vint(INTERP) || atoi(vval(MBLUR)))
766 <                sprintf(combuf+strlen(combuf), " -z %s.zbf", vval(BASENAME));
767 <        sprintf(combuf+strlen(combuf), " -o %s.unf %s -S %d",
764 >        sprintf(combuf, "rpict%s%s -w0", rendopt,
765 >                        viewopt(getview(first>1 ? first-1 : 1)));
766 >        inspoint = combuf;
767 >        while (*inspoint) inspoint++;
768 >        if (nblur) {
769 >                sprintf(inspoint, " -pm %.3f", mblurf/nblur);
770 >                while (*inspoint) inspoint++;
771 >                sprintf(inspoint, " -pd %.3f", dblurf/nblur);
772 >                while (*inspoint) inspoint++;
773 >        }
774 >        if (nblur > 1 || vint(INTERP)) {
775 >                sprintf(inspoint, " -z %s.zbf", vval(BASENAME));
776 >                while (*inspoint) inspoint++;
777 >        }
778 >        sprintf(inspoint, " -o %s.unf %s -S %d",
779                          vval(BASENAME), rresopt, first);
780 <        inspoint = combuf + strlen(combuf);
780 >        while (*inspoint) inspoint++;
781          sprintf(inspoint, " %s < %s", vval(OCTREE), vfn);
782                                          /* run in parallel */
783          i = (last-first+1)/(vint(INTERP)+1);
# Line 707 | Line 797 | char   *vfn;
797   }
798  
799  
800 < int
801 < recover(frame)                          /* recover the specified frame */
712 < int     frame;
800 > static int
801 > recover(int frame)                      /* recover the specified frame */
802   {
803          static int      *rfrm;          /* list of recovered frames */
804          static int      nrfrms = 0;
805 +        double  mblurf, dblurf;
806 +        int     nblur = getblur(&mblurf, &dblurf);
807          char    combuf[2048];
808          char    fname[128];
809          register char   *cp;
# Line 728 | Line 819 | int    frame;
819                                  vval(ANIMATE), frame, rendopt);
820          else
821                  sprintf(combuf, "rpict%s -w0", rendopt);
822 <        cp = combuf + strlen(combuf);
823 <        if (vint(INTERP) || atoi(vval(MBLUR))) {
822 >        cp = combuf;
823 >        while (*cp) cp++;
824 >        if (nblur) {
825 >                sprintf(cp, " -pm %.3f", mblurf/nblur);
826 >                while (*cp) cp++;
827 >                sprintf(cp, " -pd %.3f", dblurf/nblur);
828 >                while (*cp) cp++;
829 >        }
830 >        if (nblur > 1 || vint(INTERP)) {
831                  sprintf(cp, " -z %s.zbf", fname);
832                  while (*cp) cp++;
833          }
# Line 743 | Line 841 | int    frame;
841                  return(1);
842                                          /* add frame to recovered list */
843          if (nrfrms)
844 <                rfrm = (int *)realloc((char *)rfrm, (nrfrms+1)*sizeof(int));
844 >                rfrm = (int *)realloc((void *)rfrm, (nrfrms+1)*sizeof(int));
845          else
846                  rfrm = (int *)malloc(sizeof(int));
847          if (rfrm == NULL) {
# Line 755 | Line 853 | int    frame;
853   }
854  
855  
856 < int
857 < frecover(frame)                         /* recover filtered frame */
760 < int     frame;
856 > static int
857 > frecover(int frame)                             /* recover filtered frame */
858   {
859 <        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))
859 >        if (dofilt(frame, 2) && dofilt(frame, 1))
860                  return(1);
861          return(0);
862   }
863  
864  
865 < archive()                       /* archive and remove renderings */
865 > static void
866 > archive(void)                   /* archive and remove renderings */
867   {
868   #define RMCOML  (sizeof(rmcom)-1)
869          static char     rmcom[] = "rm -f";
870 <        register int    i;
870 >        char    basedir[128];
871 >        int     dlen, alen;
872 >        register int    j;
873  
874          if (arcnext == arcfirst)
875                  return;                         /* nothing to do */
876 +        dirfile(basedir, vval(BASENAME));
877 +        dlen = strlen(basedir);
878          if (vdef(ARCHIVE)) {                    /* run archive command */
879 <                i = strlen(vval(ARCHIVE));
880 <                strncpy(arcfirst-i, vval(ARCHIVE), i);
881 <                if (runcom(arcfirst-i)) {
879 >                alen = strlen(vval(ARCHIVE));
880 >                if (dlen) {
881 >                        j = alen + dlen + 5;
882 >                        strncpy(arcfirst-j, "cd ", 3);
883 >                        strncpy(arcfirst-j+3, basedir, dlen);
884 >                        (arcfirst-j)[dlen+3] = ';'; (arcfirst-j)[dlen+4] = ' ';
885 >                } else
886 >                        j = alen;
887 >                strncpy(arcfirst-alen, vval(ARCHIVE), alen);
888 >                if (runcom(arcfirst-j)) {
889                          fprintf(stderr, "%s: error running archive command\n",
890                                          progname);
891                          quit(1);
892                  }
893          }
894 +        if (dlen) {
895 +                j = RMCOML + dlen + 5;
896 +                strncpy(arcfirst-j, "cd ", 3);
897 +                strncpy(arcfirst-j+3, basedir, dlen);
898 +                (arcfirst-j)[dlen+3] = ';'; (arcfirst-j)[dlen+4] = ' ';
899 +        } else
900 +                j = RMCOML;
901                                                  /* run remove command */
902          strncpy(arcfirst-RMCOML, rmcom, RMCOML);
903 <        runcom(arcfirst-RMCOML);
903 >        runcom(arcfirst-j);
904          arcnext = arcfirst;                     /* reset argument list */
905   #undef RMCOML
906   }
907  
908  
909 < int
910 < dofilt(frame, vp, ep, rvr)                      /* filter frame */
911 < int     frame;
912 < VIEW    *vp;
913 < char    *ep;
803 < int     rvr;
909 > static int
910 > dofilt(                         /* filter frame */
911 > int     frame,
912 > int     rvr
913 > )
914   {
805        extern int      frecover();
915          static int      iter = 0;
916 <        char    fnbefore[128], fnafter[128];
916 >        double  mblurf, dblurf;
917 >        int     nblur = getblur(&mblurf, &dblurf);
918 >        VIEW    *vp = getview(frame);
919 >        char    *ep = getexp(frame);
920 >        char    fnbefore[128], fnafter[128], *fbase;
921          char    combuf[1024], fname0[128], fname1[128];
922          int     usepinterp, usepfilt, nora_rgbe;
923          int     frseq[2];
924                                                  /* check what is needed */
925 <        usepinterp = atoi(vval(MBLUR));
926 <        usepfilt = pfiltalways | ep==NULL;
925 >        if (vp == NULL) {
926 >                 fprintf(stderr,
927 >                        "%s: unexpected error reading view for frame %d\n",
928 >                                          progname, frame);
929 >                quit(1);
930 >        }
931 >        usepinterp = (nblur > 1);
932 >        usepfilt = pfiltalways | (ep==NULL);
933          if (ep != NULL && !strcmp(ep, "1"))
934                  ep = "+0";
935          nora_rgbe = strcmp(vval(OVERSAMP),"1") || ep==NULL ||
# Line 818 | Line 937 | int    rvr;
937                                                  /* compute rendered views */
938          frseq[0] = frame - ((frame-1) % (vint(INTERP)+1));
939          frseq[1] = frseq[0] + vint(INTERP) + 1;
940 +        fbase = dirfile(NULL, vval(BASENAME));
941          if (frseq[1] > vint(END))
942                  frseq[1] = vint(END);
943          if (frseq[1] == frame) {                        /* pfilt only */
# Line 826 | Line 946 | int    rvr;
946                  usepfilt |= nora_rgbe;
947          } else if (frseq[0] == frame) {         /* no interpolation needed */
948                  if (!rvr && frame > 1+vint(INTERP)) {   /* archive previous */
949 +                        if (arcnext - arcargs +
950 +                                        strlen(fbase) >= sizeof(arcargs)-8) {
951 +                                fprintf(stderr,
952 + "%s: too many filenames in archive command -- reduce %s variable\n",
953 +                                                progname, vnam(DISKSPACE));
954 +                                quit(1);
955 +                        }
956                          *arcnext++ = ' ';
957 <                        sprintf(arcnext, vval(BASENAME), frame-vint(INTERP)-1);
957 >                        sprintf(arcnext, fbase, frame-vint(INTERP)-1);
958                          while (*arcnext) arcnext++;
959                          strcpy(arcnext, ".unf");
960                          arcnext += 4;
961 <                        if (usepinterp || vint(INTERP)) {       /* and z-buf */
961 >                        if (usepinterp || vint(INTERP)) {       /* and Z-buf */
962                                  *arcnext++ = ' ';
963 <                                sprintf(arcnext, vval(BASENAME),
837 <                                                frame-vint(INTERP)-1);
963 >                                sprintf(arcnext, fbase, frame-vint(INTERP)-1);
964                                  while (*arcnext) arcnext++;
965                                  strcpy(arcnext, ".zbf");
966                                  arcnext += 4;
# Line 854 | Line 980 | int    rvr;
980          if (usepinterp) {                       /* using pinterp */
981                  if (rvr == 2 && recover(frseq[1]))      /* recover after? */
982                          return(1);
983 <                if (atoi(vval(MBLUR))) {
858 <                        FILE    *fp;            /* motion blurring */
983 >                if (nblur > 1) {                /* with pdmblur */
984                          sprintf(fname0, "%s/vw0%c", vval(DIRECTORY),
985                                          'a'+(iter%26));
861                        if ((fp = fopen(fname0, "w")) == NULL) {
862                                perror(fname0); quit(1);
863                        }
864                        fputs(VIEWSTR, fp);
865                        fprintview(vp, fp);
866                        putc('\n', fp); fclose(fp);
867                        if ((vp = getview(frame+1)) == NULL) {
868                                fprintf(stderr,
869                        "%s: unexpected error reading view for frame %d\n",
870                                                progname, frame+1);
871                                quit(1);
872                        }
986                          sprintf(fname1, "%s/vw1%c", vval(DIRECTORY),
987                                          'a'+(iter%26));
988 <                        if ((fp = fopen(fname1, "w")) == NULL) {
989 <                                perror(fname1); quit(1);
988 >                        if (!noaction) {
989 >                                FILE    *fp;            /* motion blurring */
990 >                                if ((fp = fopen(fname0, "w")) == NULL) {
991 >                                        perror(fname0); quit(1);
992 >                                }
993 >                                fputs(VIEWSTR, fp);
994 >                                fprintview(vp, fp);
995 >                                putc('\n', fp); fclose(fp);
996 >                                if ((vp = getview(frame+1)) == NULL) {
997 >                                        fprintf(stderr,
998 >                        "%s: unexpected error reading view for frame %d\n",
999 >                                                        progname, frame+1);
1000 >                                        quit(1);
1001 >                                }
1002 >                                if ((fp = fopen(fname1, "w")) == NULL) {
1003 >                                        perror(fname1); quit(1);
1004 >                                }
1005 >                                fputs(VIEWSTR, fp);
1006 >                                fprintview(vp, fp);
1007 >                                putc('\n', fp); fclose(fp);
1008                          }
878                        fputs(VIEWSTR, fp);
879                        fprintview(vp, fp);
880                        putc('\n', fp); fclose(fp);
1009                          sprintf(combuf,
1010 <                        "(pmblur %s %d %s %s; rm -f %s %s) | pinterp -B",
1011 <                        *sskip(vval(MBLUR)) ? sskip2(vval(MBLUR),1) : "1",
884 <                                        atoi(vval(MBLUR)),
1010 >                        "(pmdblur %.3f %.3f %d %s %s; rm -f %s %s) | pinterp -B -a",
1011 >                                        mblurf, dblurf, nblur,
1012                                          fname0, fname1, fname0, fname1);
1013                          iter++;
1014                  } else                          /* no blurring */
# Line 889 | Line 1016 | int    rvr;
1016                  strcat(combuf, viewopt(vp));
1017                  if (vbool(RTRACE))
1018                          sprintf(combuf+strlen(combuf), " -ff -fr '%s -w0 %s'",
1019 <                                        rendopt, vval(OCTREE));
1019 >                                        rendopt+1, vval(OCTREE));
1020                  if (vdef(PINTERP))
1021                          sprintf(combuf+strlen(combuf), " %s", vval(PINTERP));
1022                  if (usepfilt)
1023                          sprintf(combuf+strlen(combuf), " %s", rresopt);
1024                  else
1025 <                        sprintf(combuf+strlen(combuf), " %s -e %s",
1025 >                        sprintf(combuf+strlen(combuf), " -a %s -e %s",
1026                                          fresopt, ep);
1027                  sprintf(combuf+strlen(combuf), " %s.unf %s.zbf",
1028                                  fnbefore, fnbefore);
# Line 942 | Line 1069 | int    rvr;
1069   }
1070  
1071  
1072 < VIEW *
1073 < getview(n)                      /* get view number n */
947 < int     n;
1072 > static VIEW *
1073 > getview(int n)                  /* get view number n */
1074   {
1075          static FILE     *viewfp = NULL;         /* view file pointer */
1076          static int      viewnum = 0;            /* current view number */
# Line 956 | Line 1082 | int    n;
1082                          fclose(viewfp);
1083                          viewfp = NULL;
1084                          viewnum = 0;
1085 <                        copystruct(&curview, &stdview);
1085 >                        curview = stdview;
1086                  }
1087                  return(NULL);
1088          }
1089 <        if (viewfp == NULL) {           /* open file */
1089 >        if (viewfp == NULL) {                   /* open file */
1090                  if ((viewfp = fopen(vval(VIEWFILE), "r")) == NULL) {
1091                          perror(vval(VIEWFILE));
1092                          quit(1);
1093                  }
1094 <        } else if (n < viewnum) {       /* rewind file */
1094 >        } else if (n > 0 && n < viewnum) {      /* rewind file */
1095                  if (viewnum == 1 && feof(viewfp))
1096                          return(&curview);               /* just one view */
1097                  if (fseek(viewfp, 0L, 0) == EOF) {
1098                          perror(vval(VIEWFILE));
1099                          quit(1);
1100                  }
1101 <                copystruct(&curview, &stdview);
1101 >                curview = stdview;
1102                  viewnum = 0;
1103          }
1104 +        if (n < 0) {                            /* get next view */
1105 +                register int    c = getc(viewfp);
1106 +                if (c == EOF)
1107 +                        return((VIEW *)NULL);           /* that's it */
1108 +                ungetc(c, viewfp);
1109 +                n = viewnum + 1;
1110 +        }
1111          while (n > viewnum) {           /* scan to desired view */
1112                  if (fgets(linebuf, sizeof(linebuf), viewfp) == NULL)
1113 <                        return(viewnum==1 ? &curview : NULL);
1113 >                        return(viewnum==1 ? &curview : (VIEW *)NULL);
1114                  if (isview(linebuf) && sscanview(&curview, linebuf) > 0)
1115                          viewnum++;
1116          }
# Line 985 | Line 1118 | int    n;
1118   }
1119  
1120  
1121 < int
1122 < countviews()                    /* count views in view file */
1121 > static int
1122 > countviews(void)                        /* count views in view file */
1123   {
1124 <        register int    n = 0;
1124 >        int     n;
1125  
1126 <        while (getview(n+1) != NULL)
1126 >        if (getview(n=1) == NULL)
1127 >                return(0);
1128 >        while (getview(-1) != NULL)
1129                  n++;
1130          return(n);
1131   }
1132  
1133  
1134 < char *
1135 < getexp(n)                       /* get exposure for nth frame */
1001 < int     n;
1134 > static char *
1135 > getexp(int n)                   /* get exposure for nth frame */
1136   {
1137          extern char     *fskip();
1138          static char     expval[32];
# Line 1010 | Line 1144 | int    n;
1144          if (n == 0) {                           /* signal to close file */
1145                  if (expfp != NULL) {
1146                          fclose(expfp);
1147 +                        free((void *)exppos);
1148                          expfp = NULL;
1149                  }
1150                  return(NULL);
1151 <        }
1151 >        } else if (n > vint(END))               /* request past end (error?) */
1152 >                return(NULL);
1153          if (!vdef(EXPOSURE))                    /* no setting (auto) */
1154                  return(NULL);
1155          if (isflt(vval(EXPOSURE)))              /* always the same */
# Line 1051 | Line 1187 | int    n;
1187                  }
1188                  curfrm++;
1189                  cp = fskip(expval);                     /* check format */
1190 <                if (cp == NULL || *cp != '\n') {
1190 >                if (cp != NULL)
1191 >                        while (isspace(*cp))
1192 >                                *cp++ = '\0';
1193 >                if (cp == NULL || *cp) {
1194                          fprintf(stderr,
1195                                  "%s: exposure format error on line %d\n",
1196                                          vval(EXPOSURE), curfrm);
1197                          quit(1);
1198                  }
1060                *cp = '\0';
1199          }
1200          return(expval);                         /* return value */
1201   }
1202  
1203  
1204 < struct pslot *
1205 < findpslot(pid)                  /* find or allocate a process slot */
1068 < int     pid;
1204 > static struct pslot *
1205 > findpslot(RT_PID pid)                   /* find or allocate a process slot */
1206   {
1207          register struct pslot   *psempty = NULL;
1208          register int    i;
# Line 1080 | Line 1217 | int    pid;
1217   }
1218  
1219  
1220 < int
1221 < donecom(ps, pn, status)         /* clean up after finished process */
1222 < PSERVER *ps;
1223 < int     pn;
1224 < int     status;
1220 > static int
1221 > donecom(                /* clean up after finished process */
1222 >        PSERVER *ps,
1223 >        int     pn,
1224 >        int     status
1225 > )
1226   {
1227 <        register PROC   *pp;
1227 >        register NETPROC        *pp;
1228 >        register struct pslot   *psl;
1229  
1230          pp = ps->proc + pn;
1231          if (pp->elen) {                 /* pass errors */
# Line 1098 | Line 1237 | int    status;
1237                  if (ps->hostname[0])
1238                          status = 1;     /* because rsh doesn't return status */
1239          }
1240 +        lastpserver = NULL;
1241 +        psl = findpslot(pp->pid);       /* check for bruncom() slot */
1242 +        if (psl->pid) {
1243 +                if (status) {
1244 +                        if (psl->rcvf != NULL)  /* attempt recovery */
1245 +                                status = (*psl->rcvf)(psl->fout);
1246 +                        if (status) {
1247 +                                fprintf(stderr,
1248 +                                        "%s: error rendering frame %d\n",
1249 +                                                progname, psl->fout);
1250 +                                quit(1);
1251 +                        }
1252 +                        lastpserver = ps;
1253 +                }
1254 +                psl->pid = 0;                   /* free process slot */
1255 +        } else if (status)
1256 +                lastpserver = ps;
1257          freestr(pp->com);               /* free command string */
1102        lastpid = pp->pid;              /* record PID for bwait() */
1103        lastpserver = ps;               /* record server for serverdown() */
1258          return(status);
1259   }
1260  
1261  
1262 < int
1263 < serverdown()                    /* check status of last process server */
1262 > static int
1263 > serverdown(void)                        /* check status of last process server */
1264   {
1265 +        if (lastpserver == NULL || !lastpserver->hostname[0])
1266 +                return(0);
1267          if (pserverOK(lastpserver))     /* server still up? */
1268                  return(0);
1269          delpserver(lastpserver);        /* else delete it */
# Line 1120 | Line 1276 | serverdown()                   /* check status of last process server
1276   }
1277  
1278  
1279 < int
1280 < bruncom(com, fout, rf)          /* run a command in the background */
1281 < char    *com;
1282 < int     fout;
1283 < int     (*rf)();
1279 > static RT_PID
1280 > bruncom(                /* run a command in the background */
1281 > char    *com,
1282 > int     fout,
1283 > int     (*rf)()
1284 > )
1285   {
1286 <        int     pid;
1286 >        RT_PID  pid;
1287          register struct pslot   *psl;
1288  
1289          if (noaction) {
# Line 1134 | Line 1291 | int    (*rf)();
1291                          printf("\t%s\n", com);  /* echo command */
1292                  return(0);
1293          }
1294 <                                        /* else start it when we can */
1295 <        while ((pid = startjob(NULL, savestr(com), donecom)) == -1)
1294 >        com = savestr(com);             /* else start it when we can */
1295 >        while ((pid = startjob(NULL, com, donecom)) == -1)
1296                  bwait(1);
1297          if (!silent) {                          /* echo command */
1298                  PSERVER *ps;
1299 <                int     psn = pid;
1299 >                RT_PID  psn = pid;
1300                  ps = findjob(&psn);
1301                  printf("\t%s\n", com);
1302                  printf("\tProcess started on %s\n", phostname(ps));
# Line 1153 | Line 1310 | int    (*rf)();
1310   }
1311  
1312  
1313 < bwait(ncoms)                            /* wait for batch job(s) to finish */
1314 < int     ncoms;
1313 > static void
1314 > bwait(int ncoms)                                /* wait for batch job(s) to finish */
1315   {
1316          int     status;
1160        register struct pslot   *psl;
1317  
1318          if (noaction)
1319                  return;
1320          while ((status = wait4job(NULL, -1)) != -1) {
1321 <                psl = findpslot(lastpid);
1322 <                if (status) {           /* attempt recovery */
1323 <                        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 */
1321 >                serverdown();           /* update server status */
1322 >                if (--ncoms == 0)
1323 >                        break;          /* done enough */
1324          }
1325   }
1326  
1327  
1328 < int
1329 < pruncom(com, ppins, maxcopies)  /* run a command in parallel over network */
1330 < char    *com, *ppins;
1331 < int     maxcopies;
1328 > static int
1329 > pruncom(        /* run a command in parallel over network */
1330 > char    *com,
1331 > char    *ppins,
1332 > int     maxcopies
1333 > )
1334   {
1335          int     retstatus = 0;
1336          int     hostcopies;
1337 <        char    com1buf[10240], *com1, *endcom1;
1337 >        char    buf[10240], *com1, *s;
1338          int     status;
1339 +        int     pfd;
1340 +        register int    n;
1341          register PSERVER        *ps;
1342  
1343          if (!silent)
# Line 1199 | Line 1349 | int    maxcopies;
1349          for (ps = pslist; ps != NULL; ps = ps->next) {
1350                  hostcopies = 0;
1351                  if (maxcopies > 1 && ps->nprocs > 1 && ppins != NULL) {
1352 <                        strcpy(com1=com1buf, com);      /* build -PP command */
1352 >                        strcpy(com1=buf, com);  /* build -PP command */
1353                          sprintf(com1+(ppins-com), " -PP %s/%s.persist",
1354                                          vval(DIRECTORY), phostname(ps));
1355 +                        unlink(com1+(ppins-com)+5);
1356                          strcat(com1, ppins);
1357 <                        endcom1 = com1 + strlen(com1);
1207 <                        sprintf(endcom1, "; kill `sed -n '1s/^[^ ]* //p' %s/%s.persist`",
1208 <                                        vval(DIRECTORY), phostname(ps));
1209 <                } else {
1357 >                } else
1358                          com1 = com;
1359 <                        endcom1 = NULL;
1359 >                while (maxcopies > 0) {
1360 >                        s = savestr(com1);
1361 >                        if (startjob(ps, s, donecom) != -1) {
1362 >                                sleep(20);
1363 >                                hostcopies++;
1364 >                                maxcopies--;
1365 >                        } else {
1366 >                                freestr(s);
1367 >                                break;
1368 >                        }
1369                  }
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                }
1370                  if (!silent && hostcopies) {
1371                          if (hostcopies > 1)
1372                                  printf("\t%d duplicate processes", hostcopies);
# Line 1229 | Line 1378 | int    maxcopies;
1378          }
1379                                          /* wait for jobs to finish */
1380          while ((status = wait4job(NULL, -1)) != -1)
1381 <                if (status)
1382 <                        retstatus += !serverdown();     /* check server */
1381 >                retstatus += status && !serverdown();
1382 >                                        /* terminate parallel rpict's */
1383 >        for (ps = pslist; ps != NULL; ps = ps->next) {
1384 >                sprintf(buf, "%s/%s.persist", vval(DIRECTORY), phostname(ps));
1385 >                if ((pfd = open(buf, O_RDONLY)) >= 0) {
1386 >                        n = read(pfd, buf, sizeof(buf)-1);      /* get PID */
1387 >                        buf[n] = '\0';
1388 >                        close(pfd);
1389 >                        for (n = 0; buf[n] && !isspace(buf[n]); n++)
1390 >                                ;
1391 >                                                                /* terminate */
1392 >                        sprintf(buf, "kill -ALRM %d", atoi(buf+n));
1393 >                        wait4job(ps, startjob(ps, buf, NULL));
1394 >                }
1395 >        }
1396          return(retstatus);
1397   }
1398  
1399  
1400 < runcom(cs)                      /* run a command locally and wait for it */
1401 < char    *cs;
1400 > static int
1401 > runcom(char *cs)                        /* run a command locally and wait for it */
1402   {
1403          if (!silent)            /* echo it */
1404                  printf("\t%s\n", cs);
# Line 1247 | Line 1409 | char   *cs;
1409   }
1410  
1411  
1412 < rmfile(fn)                      /* remove a file */
1413 < char    *fn;
1412 > static int
1413 > rmfile(char *fn)                        /* remove a file */
1414   {
1415          if (!silent)
1416 < #ifdef MSDOS
1416 > #ifdef _WIN32
1417                  printf("\tdel %s\n", fn);
1418   #else
1419                  printf("\trm -f %s\n", fn);
# Line 1262 | Line 1424 | char   *fn;
1424   }
1425  
1426  
1427 < badvalue(vc)                    /* report bad variable value and exit */
1428 < int     vc;
1427 > static void
1428 > badvalue(int vc)                        /* report bad variable value and exit */
1429   {
1430          fprintf(stderr, "%s: bad value for variable '%s'\n",
1431                          progname, vnam(vc));
1432          quit(1);
1433 + }
1434 +
1435 +
1436 + static char *
1437 + dirfile(                /* separate path into directory and file */
1438 + char    *df,
1439 + register char   *path
1440 + )
1441 + {
1442 +        register int    i;
1443 +        int     psep;
1444 +
1445 +        for (i = 0, psep = -1; path[i]; i++)
1446 +                if (path[i] == '/')
1447 +                        psep = i;
1448 +        if (df != NULL) {
1449 +                if (psep == 0) {
1450 +                        df[0] = '/';
1451 +                        df[1] = '\0';
1452 +                } else if (psep > 0) {
1453 +                        strncpy(df, path, psep);
1454 +                        df[psep] = '\0';
1455 +                } else
1456 +                        df[0] = '\0';
1457 +        }
1458 +        return(path+psep+1);
1459 + }
1460 +
1461 +
1462 + static int
1463 + getblur(double *mbf, double *dbf)       /* get # blur samples (and fraction) */
1464 + {
1465 +        double  mblurf, dblurf;
1466 +        int     nmblur, ndblur;
1467 +        char    *s;
1468 +                                        /* get motion blur */
1469 +        if (!vdef(MBLUR) || (mblurf = atof(vval(MBLUR))) < 0.0)
1470 +                mblurf = 0.0;
1471 +        if (mbf != NULL)
1472 +                *mbf = mblurf;
1473 +        if (mblurf <= FTINY)
1474 +                nmblur = 0;
1475 +        else if (!*(s = sskip(vval(MBLUR))))
1476 +                nmblur = DEF_NBLUR;
1477 +        else if ((nmblur = atoi(s)) <= 0)
1478 +                nmblur = 1;
1479 +                                        /* get depth-of-field blur */
1480 +        if (!vdef(DBLUR) || (dblurf = atof(vval(DBLUR))) < 0.0)
1481 +                dblurf = 0.0;
1482 +        if (dbf != NULL)
1483 +                *dbf = dblurf;
1484 +        if (dblurf <= FTINY)
1485 +                ndblur = 0;
1486 +        else if (!*(s = sskip(vval(DBLUR))))
1487 +                ndblur = DEF_NBLUR;
1488 +        else if ((ndblur = atoi(s)) <= 0)
1489 +                ndblur = 1;
1490 +        if ((nmblur == 1) & (ndblur == 1))
1491 +                return(1);
1492 +                                        /* return combined samples */
1493 +        return(nmblur + ndblur);
1494   }

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines