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

Comparing src/util/ranimate.c (file contents):
Revision 2.9 by greg, Wed Feb 7 16:42:41 1996 UTC vs.
Revision 2.25 by gwlarson, Tue Mar 3 11:44:46 1998 UTC

# Line 1 | Line 1
1 < /* Copyright (c) 1995 Regents of the University of California */
1 > /* Copyright (c) 1996 Regents of the University of California */
2  
3   #ifndef lint
4   static char SCCSid[] = "$SunId$ LBL";
# Line 15 | Line 15 | static char SCCSid[] = "$SunId$ LBL";
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 38 | 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 64 | Line 71 | VARIABLE       vv[] = {                /* variable-value pairs */
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 84 | Line 92 | int    nowarn = 0;             /* turn warnings off? */
92   int     silent = 0;             /* silent mode? */
93   int     noaction = 0;           /* take no action? */
94  
95 < char    rendopt[2048] = "";     /* rendering options */
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? */
# Line 99 | Line 108 | struct pslot {
108   }       *pslot;                 /* process slots */
109   int     npslots;                /* number of process slots */
110  
102 – int     lastpid;                /* ID of last completed background process */
103 – PSERVER *lastpserver;           /* last process server used */
104 –
111   #define phostname(ps)   ((ps)->hostname[0] ? (ps)->hostname : astat.host)
112  
113   struct pslot    *findpslot();
114  
115 + PSERVER *lastpserver;           /* last process server with error */
116 +
117   VIEW    *getview();
118 < char    *getexp();
118 > char    *getexp(), *dirfile();
119  
120 + extern time_t   fdate(), time();
121  
122 +
123   main(argc, argv)
124   int     argc;
125   char    *argv[];
# Line 140 | Line 150 | char   *argv[];
150          cfname = argv[i];
151                                                  /* load variables */
152          loadvars(cfname);
153 +                                                /* check variables */
154 +        checkvalues();
155                                                  /* did we get DIRECTORY? */
156          checkdir();
157                                                  /* check status */
# Line 166 | Line 178 | char   *argv[];
178                  argv[i] = vval(NEXTANIM);       /* just change input file */
179                  if (!silent)
180                          printargs(argc, argv, stdout);
181 <                execvp(progname, argv);         /* pass to next */
182 <                quit(1);                        /* shouldn't return */
181 >                if ((argv[0] = getpath(progname,getenv("PATH"),X_OK)) == NULL)
182 >                        fprintf(stderr, "%s: command not found\n", progname);
183 >                else
184 >                        execv(progname, argv);
185 >                quit(1);
186          }
187          quit(0);
188   userr:
# Line 178 | Line 193 | userr:
193  
194   getastat()                      /* check/set animation status */
195   {
196 <        char    buf[256];
196 >        char    sfname[256];
197          FILE    *fp;
198  
199 <        sprintf(buf, "%s/%s", vval(DIRECTORY), SFNAME);
200 <        if ((fp = fopen(buf, "r")) == NULL) {
199 >        sprintf(sfname, "%s/%s", vval(DIRECTORY), SFNAME);
200 >        if ((fp = fopen(sfname, "r")) == NULL) {
201                  if (errno != ENOENT) {
202 <                        perror(buf);
202 >                        perror(sfname);
203                          return(-1);
204                  }
205                  astat.rnext = astat.fnext = astat.tnext = 0;
# Line 217 | Line 232 | getastat()                     /* check/set animation status */
232                  }
233                  /* assume it is dead */
234          }
235 <        if (strcmp(cfname, astat.cfname) && astat.tnext != 0) { /* other's */
235 >        if (strcmp(cfname, astat.cfname) && astat.pid != 0) {   /* other's */
236                  fprintf(stderr, "%s: unfinished job \"%s\"\n",
237                                  progname, astat.cfname);
238                  return(-1);
239          }
240 +                                                /* check control file mods. */
241 +        if (!nowarn && fdate(cfname) > fdate(sfname))
242 +                fprintf(stderr,
243 +                        "%s: warning - control file modified since last run\n",
244 +                                progname);
245   setours:                                        /* set our values */
246          strcpy(astat.host, myhostname());
247          astat.pid = getpid();
# Line 229 | Line 249 | setours:                                       /* set our values */
249          return(0);
250   fmterr:
251          fprintf(stderr, "%s: format error in status file \"%s\"\n",
252 <                        progname, buf);
252 >                        progname, sfname);
253          fclose(fp);
254          return(-1);
255   }
# Line 281 | Line 301 | checkdir()                     /* make sure we have our directory */
301  
302   setdefaults()                   /* set default values */
303   {
304 +        extern char     *atos();
305 +        int     decades;
306          char    buf[256];
307  
308          if (vdef(ANIMATE)) {
# Line 314 | Line 336 | setdefaults()                  /* set default values */
336                  quit(1);
337          }
338          if (!vdef(BASENAME)) {
339 <                sprintf(buf, "%s/frame%%03d", vval(DIRECTORY));
339 >                decades = (int)log10((double)vint(END)) + 1;
340 >                if (decades < 3) decades = 3;
341 >                sprintf(buf, "%s/frame%%0%dd", vval(DIRECTORY), decades);
342                  vval(BASENAME) = savqstr(buf);
343                  vdef(BASENAME)++;
344          }
# Line 346 | Line 370 | setdefaults()                  /* set default values */
370                  vval(DISKSPACE) = "100";
371                  vdef(DISKSPACE)++;
372          }
373 +        if (!vdef(RSH)) {
374 +                vval(RSH) = REMSH;
375 +                vdef(RSH)++;
376 +        }
377 +                                /* locate remote shell program */
378 +        atos(buf, sizeof(buf), vval(RSH));
379 +        if ((remsh = getpath(buf, getenv("PATH"), X_OK)) != NULL)
380 +                remsh = savqstr(remsh);
381 +        else
382 +                remsh = vval(RSH);      /* will generate error if used */
383 +
384                                  /* append rendering options */
385          if (vdef(RENDER))
386                  sprintf(rendopt+strlen(rendopt), " %s", vval(RENDER));
# Line 415 | Line 450 | char   *rfargs;
450          char    combuf[256];
451          register int    i;
452          register char   *cp;
453 +        char    *pippt;
454                                          /* create rad command */
455          sprintf(rendopt, " @%s/render.opt", vval(DIRECTORY));
456          sprintf(combuf,
457          "rad -v 0 -s -e -w %s OPTFILE=%s | egrep '^[ \t]*(NOMATCH",
458                          rfargs, rendopt+2);
459          cp = combuf;
460 <        while (*cp) cp++;               /* match unset variables */
460 >        while (*cp) {
461 >                if (*cp == '|') pippt = cp;
462 >                cp++;
463 >        }                               /* match unset variables */
464          for (i = 0; mvar[i] >= 0; i++)
465                  if (!vdef(mvar[i])) {
466                          *cp++ = '|';
467                          strcpy(cp, vnam(mvar[i]));
468                          while (*cp) cp++;
469 +                        pippt = NULL;
470                  }
471 <        sprintf(cp, ")[ \t]*=' > %s/radset.var", vval(DIRECTORY));
472 <        cp += 11;                       /* point to file name */
471 >        if (pippt != NULL)
472 >                strcpy(pippt, "> /dev/null");   /* nothing to match */
473 >        else {
474 >                sprintf(cp, ")[ \t]*=' > %s/radset.var", vval(DIRECTORY));
475 >                cp += 11;               /* point to file name */
476 >        }
477          if (system(combuf)) {
478                  fprintf(stderr, "%s: error executing rad command:\n\t%s\n",
479                                  progname, combuf);
480                  quit(1);
481          }
482 <        loadvars(cp);                   /* load variables and remove file */
483 <        unlink(cp);
482 >        if (pippt == NULL) {            /* load variables and remove file */
483 >                loadvars(cp);
484 >                unlink(cp);
485 >        }
486   }
487  
488  
# Line 451 | Line 497 | animate()                      /* run animation */
497          i = sscanf(vval(RESOLUTION), "%d %d %f", &xres, &yres, &pa);
498          mult = vflt(OVERSAMP);
499          if (i == 3) {
500 <                sprintf(rresopt, "-x %d -y %d -pa %f", (int)(mult*xres),
500 >                sprintf(rresopt, "-x %d -y %d -pa %.3f", (int)(mult*xres),
501                                  (int)(mult*yres), pa);
502 <                sprintf(fresopt, "-x %d -y %d -pa %f", xres, yres, pa);
502 >                sprintf(fresopt, "-x %d -y %d -pa %.3f", xres, yres, pa);
503          } else if (i) {
504                  if (i == 1) yres = xres;
505                  sprintf(rresopt, "-x %d -y %d", (int)(mult*xres),
# Line 481 | Line 527 | animate()                      /* run animation */
527                                          /* figure # frames per batch */
528          d1 = mult*xres*mult*yres*4;             /* space for orig. picture */
529          if ((i=vint(INTERP)) || atoi(vval(MBLUR)))
530 <                d1 += mult*xres*mult*yres*4;    /* space for z-buffer */
530 >                d1 += mult*xres*mult*yres*sizeof(float);        /* Z-buffer */
531          d2 = xres*yres*4;                       /* space for final picture */
532          frames_batch = (i+1)*(vflt(DISKSPACE)*1048576.-d1)/(d1+i*d2);
533          if (frames_batch < i+2) {
# Line 490 | Line 536 | animate()                      /* run animation */
536                  quit(1);
537          }
538                                          /* initialize archive argument list */
539 <        i = 16;
494 <        if (vdef(ARCHIVE) && strlen(vval(ARCHIVE)) > i)
495 <                i = strlen(vval(ARCHIVE));
539 >        i = vdef(ARCHIVE) ? strlen(vval(ARCHIVE))+132 : 132;
540          arcnext = arcfirst = arcargs + i;
541                                          /* initialize status file */
542          if (astat.rnext == 0)
# Line 596 | Line 640 | filterframes()                         /* catch up with filtering */
640  
641   transferframes()                        /* catch up with picture transfers */
642   {
643 <        char    combuf[10240];
643 >        char    combuf[10240], *fbase;
644          register char   *cp;
645          register int    i;
646  
# Line 607 | Line 651 | transferframes()                       /* catch up with picture transfers
651                  putastat();             /* update status */
652                  return;
653          }
654 <        strcpy(combuf, vval(TRANSFER)); /* start transfer command */
655 <        cp = combuf + strlen(combuf);
654 >        strcpy(combuf, "cd ");          /* start transfer command */
655 >        fbase = dirfile(cp = combuf+3, vval(BASENAME));
656 >        if (*cp) {
657 >                while (*++cp) ;
658 >                *cp++ = ';'; *cp++ = ' ';
659 >        } else
660 >                cp = combuf;
661 >        strcpy(cp, vval(TRANSFER));
662 >        while (*cp) cp++;
663                                          /* make argument list */
664          for (i = astat.tnext; i < astat.fnext; i++) {
665                  *cp++ = ' ';
666 <                sprintf(cp, vval(BASENAME), i);
666 >                sprintf(cp, fbase, i);
667                  while (*cp) cp++;
668                  strcpy(cp, ".pic");
669                  cp += 4;
# Line 753 | Line 804 | archive()                      /* archive and remove renderings */
804   {
805   #define RMCOML  (sizeof(rmcom)-1)
806          static char     rmcom[] = "rm -f";
807 <        register int    i;
807 >        char    basedir[128];
808 >        int     dlen, alen;
809 >        register int    j;
810  
811          if (arcnext == arcfirst)
812                  return;                         /* nothing to do */
813 +        dirfile(basedir, vval(BASENAME));
814 +        dlen = strlen(basedir);
815          if (vdef(ARCHIVE)) {                    /* run archive command */
816 <                i = strlen(vval(ARCHIVE));
817 <                strncpy(arcfirst-i, vval(ARCHIVE), i);
818 <                if (runcom(arcfirst-i)) {
816 >                alen = strlen(vval(ARCHIVE));
817 >                if (dlen) {
818 >                        j = alen + dlen + 5;
819 >                        strncpy(arcfirst-j, "cd ", 3);
820 >                        strncpy(arcfirst-j+3, basedir, dlen);
821 >                        (arcfirst-j)[dlen+3] = ';'; (arcfirst-j)[dlen+4] = ' ';
822 >                } else
823 >                        j = alen;
824 >                strncpy(arcfirst-alen, vval(ARCHIVE), alen);
825 >                if (runcom(arcfirst-j)) {
826                          fprintf(stderr, "%s: error running archive command\n",
827                                          progname);
828                          quit(1);
829                  }
830          }
831 +        if (dlen) {
832 +                j = RMCOML + dlen + 5;
833 +                strncpy(arcfirst-j, "cd ", 3);
834 +                strncpy(arcfirst-j+3, basedir, dlen);
835 +                (arcfirst-j)[dlen+3] = ';'; (arcfirst-j)[dlen+4] = ' ';
836 +        } else
837 +                j = RMCOML;
838                                                  /* run remove command */
839          strncpy(arcfirst-RMCOML, rmcom, RMCOML);
840 <        runcom(arcfirst-RMCOML);
840 >        runcom(arcfirst-j);
841          arcnext = arcfirst;                     /* reset argument list */
842   #undef RMCOML
843   }
# Line 783 | Line 852 | int    rvr;
852   {
853          extern int      frecover();
854          static int      iter = 0;
855 <        char    fnbefore[128], fnafter[128];
855 >        char    fnbefore[128], fnafter[128], *fbase;
856          char    combuf[1024], fname0[128], fname1[128];
857          int     usepinterp, usepfilt, nora_rgbe;
858          int     frseq[2];
# Line 797 | Line 866 | int    rvr;
866                                                  /* compute rendered views */
867          frseq[0] = frame - ((frame-1) % (vint(INTERP)+1));
868          frseq[1] = frseq[0] + vint(INTERP) + 1;
869 +        fbase = dirfile(NULL, vval(BASENAME));
870          if (frseq[1] > vint(END))
871                  frseq[1] = vint(END);
872          if (frseq[1] == frame) {                        /* pfilt only */
# Line 806 | Line 876 | int    rvr;
876          } else if (frseq[0] == frame) {         /* no interpolation needed */
877                  if (!rvr && frame > 1+vint(INTERP)) {   /* archive previous */
878                          *arcnext++ = ' ';
879 <                        sprintf(arcnext, vval(BASENAME), frame-vint(INTERP)-1);
879 >                        sprintf(arcnext, fbase, frame-vint(INTERP)-1);
880                          while (*arcnext) arcnext++;
881                          strcpy(arcnext, ".unf");
882                          arcnext += 4;
883 <                        if (usepinterp || vint(INTERP)) {       /* and z-buf */
883 >                        if (usepinterp || vint(INTERP)) {       /* and Z-buf */
884                                  *arcnext++ = ' ';
885 <                                sprintf(arcnext, vval(BASENAME),
816 <                                                frame-vint(INTERP)-1);
885 >                                sprintf(arcnext, fbase, frame-vint(INTERP)-1);
886                                  while (*arcnext) arcnext++;
887                                  strcpy(arcnext, ".zbf");
888                                  arcnext += 4;
# Line 834 | Line 903 | int    rvr;
903                  if (rvr == 2 && recover(frseq[1]))      /* recover after? */
904                          return(1);
905                  if (atoi(vval(MBLUR))) {
837 –                        FILE    *fp;            /* motion blurring */
906                          sprintf(fname0, "%s/vw0%c", vval(DIRECTORY),
907                                          'a'+(iter%26));
840 –                        if ((fp = fopen(fname0, "w")) == NULL) {
841 –                                perror(fname0); quit(1);
842 –                        }
843 –                        fputs(VIEWSTR, fp);
844 –                        fprintview(vp, fp);
845 –                        putc('\n', fp); fclose(fp);
846 –                        if ((vp = getview(frame+1)) == NULL) {
847 –                                fprintf(stderr,
848 –                        "%s: unexpected error reading view for frame %d\n",
849 –                                                progname, frame+1);
850 –                                quit(1);
851 –                        }
908                          sprintf(fname1, "%s/vw1%c", vval(DIRECTORY),
909                                          'a'+(iter%26));
910 <                        if ((fp = fopen(fname1, "w")) == NULL) {
911 <                                perror(fname1); quit(1);
910 >                        if (!noaction) {
911 >                                FILE    *fp;            /* motion blurring */
912 >                                if ((fp = fopen(fname0, "w")) == NULL) {
913 >                                        perror(fname0); quit(1);
914 >                                }
915 >                                fputs(VIEWSTR, fp);
916 >                                fprintview(vp, fp);
917 >                                putc('\n', fp); fclose(fp);
918 >                                if ((vp = getview(frame+1)) == NULL) {
919 >                                        fprintf(stderr,
920 >                        "%s: unexpected error reading view for frame %d\n",
921 >                                                        progname, frame+1);
922 >                                        quit(1);
923 >                                }
924 >                                if ((fp = fopen(fname1, "w")) == NULL) {
925 >                                        perror(fname1); quit(1);
926 >                                }
927 >                                fputs(VIEWSTR, fp);
928 >                                fprintview(vp, fp);
929 >                                putc('\n', fp); fclose(fp);
930                          }
857 –                        fputs(VIEWSTR, fp);
858 –                        fprintview(vp, fp);
859 –                        putc('\n', fp); fclose(fp);
931                          sprintf(combuf,
932                          "(pmblur %s %d %s %s; rm -f %s %s) | pinterp -B",
933                          *sskip(vval(MBLUR)) ? sskip2(vval(MBLUR),1) : "1",
# Line 868 | Line 939 | int    rvr;
939                  strcat(combuf, viewopt(vp));
940                  if (vbool(RTRACE))
941                          sprintf(combuf+strlen(combuf), " -ff -fr '%s -w0 %s'",
942 <                                        rendopt, vval(OCTREE));
942 >                                        rendopt+1, vval(OCTREE));
943                  if (vdef(PINTERP))
944                          sprintf(combuf+strlen(combuf), " %s", vval(PINTERP));
945                  if (usepfilt)
# Line 939 | Line 1010 | int    n;
1010                  }
1011                  return(NULL);
1012          }
1013 <        if (viewfp == NULL) {           /* open file */
1013 >        if (viewfp == NULL) {                   /* open file */
1014                  if ((viewfp = fopen(vval(VIEWFILE), "r")) == NULL) {
1015                          perror(vval(VIEWFILE));
1016                          quit(1);
1017                  }
1018 <        } else if (n < viewnum) {       /* rewind file */
1018 >        } else if (n > 0 && n < viewnum) {      /* rewind file */
1019                  if (viewnum == 1 && feof(viewfp))
1020                          return(&curview);               /* just one view */
1021                  if (fseek(viewfp, 0L, 0) == EOF) {
# Line 954 | Line 1025 | int    n;
1025                  copystruct(&curview, &stdview);
1026                  viewnum = 0;
1027          }
1028 +        if (n < 0) {                            /* get next view */
1029 +                register int    c = getc(viewfp);
1030 +                if (c == EOF)
1031 +                        return((VIEW *)NULL);           /* that's it */
1032 +                ungetc(c, viewfp);
1033 +                n = viewnum + 1;
1034 +        }
1035          while (n > viewnum) {           /* scan to desired view */
1036                  if (fgets(linebuf, sizeof(linebuf), viewfp) == NULL)
1037 <                        return(viewnum==1 ? &curview : NULL);
1037 >                        return(viewnum==1 ? &curview : (VIEW *)NULL);
1038                  if (isview(linebuf) && sscanview(&curview, linebuf) > 0)
1039                          viewnum++;
1040          }
# Line 967 | Line 1045 | int    n;
1045   int
1046   countviews()                    /* count views in view file */
1047   {
1048 <        register int    n = 0;
1048 >        int     n;
1049  
1050 <        while (getview(n+1) != NULL)
1050 >        if (getview(n=1) == NULL)
1051 >                return(0);
1052 >        while (getview(-1) != NULL)
1053                  n++;
1054          return(n);
1055   }
# Line 989 | Line 1069 | int    n;
1069          if (n == 0) {                           /* signal to close file */
1070                  if (expfp != NULL) {
1071                          fclose(expfp);
1072 +                        free((char *)exppos);
1073                          expfp = NULL;
1074                  }
1075                  return(NULL);
1076 <        }
1076 >        } else if (n > vint(END))               /* request past end (error?) */
1077 >                return(NULL);
1078          if (!vdef(EXPOSURE))                    /* no setting (auto) */
1079                  return(NULL);
1080          if (isflt(vval(EXPOSURE)))              /* always the same */
# Line 1030 | Line 1112 | int    n;
1112                  }
1113                  curfrm++;
1114                  cp = fskip(expval);                     /* check format */
1115 <                if (cp == NULL || *cp != '\n') {
1115 >                if (cp != NULL)
1116 >                        while (isspace(*cp))
1117 >                                *cp++ = '\0';
1118 >                if (cp == NULL || *cp) {
1119                          fprintf(stderr,
1120                                  "%s: exposure format error on line %d\n",
1121                                          vval(EXPOSURE), curfrm);
1122                          quit(1);
1123                  }
1039 –                *cp = '\0';
1124          }
1125          return(expval);                         /* return value */
1126   }
# Line 1066 | Line 1150 | int    pn;
1150   int     status;
1151   {
1152          register PROC   *pp;
1153 +        register struct pslot   *psl;
1154  
1155          pp = ps->proc + pn;
1156          if (pp->elen) {                 /* pass errors */
# Line 1077 | Line 1162 | int    status;
1162                  if (ps->hostname[0])
1163                          status = 1;     /* because rsh doesn't return status */
1164          }
1165 +        lastpserver = NULL;
1166 +        psl = findpslot(pp->pid);       /* check for bruncom() slot */
1167 +        if (psl->pid) {
1168 +                if (status) {
1169 +                        if (psl->rcvf != NULL)  /* attempt recovery */
1170 +                                status = (*psl->rcvf)(psl->fout);
1171 +                        if (status) {
1172 +                                fprintf(stderr,
1173 +                                        "%s: error rendering frame %d\n",
1174 +                                                progname, psl->fout);
1175 +                                quit(1);
1176 +                        }
1177 +                        lastpserver = ps;
1178 +                }
1179 +                psl->pid = 0;                   /* free process slot */
1180 +        } else if (status)
1181 +                lastpserver = ps;
1182          freestr(pp->com);               /* free command string */
1081 –        lastpid = pp->pid;              /* record PID for bwait() */
1082 –        lastpserver = ps;               /* record server for serverdown() */
1183          return(status);
1184   }
1185  
# Line 1087 | Line 1187 | int    status;
1187   int
1188   serverdown()                    /* check status of last process server */
1189   {
1190 +        if (lastpserver == NULL || !lastpserver->hostname[0])
1191 +                return(0);
1192          if (pserverOK(lastpserver))     /* server still up? */
1193                  return(0);
1194          delpserver(lastpserver);        /* else delete it */
# Line 1113 | Line 1215 | int    (*rf)();
1215                          printf("\t%s\n", com);  /* echo command */
1216                  return(0);
1217          }
1218 <                                        /* else start it when we can */
1219 <        while ((pid = startjob(NULL, savestr(com), donecom)) == -1)
1218 >        com = savestr(com);             /* else start it when we can */
1219 >        while ((pid = startjob(NULL, com, donecom)) == -1)
1220                  bwait(1);
1221          if (!silent) {                          /* echo command */
1222                  PSERVER *ps;
# Line 1136 | Line 1238 | bwait(ncoms)                           /* wait for batch job(s) to finish */
1238   int     ncoms;
1239   {
1240          int     status;
1139 –        register struct pslot   *psl;
1241  
1242          if (noaction)
1243                  return;
1244          while ((status = wait4job(NULL, -1)) != -1) {
1245 <                psl = findpslot(lastpid);
1246 <                if (status) {           /* attempt recovery */
1247 <                        serverdown();   /* check server */
1147 <                        if (psl->rcvf == NULL || (*psl->rcvf)(psl->fout)) {
1148 <                                fprintf(stderr,
1149 <                                        "%s: error rendering frame %d\n",
1150 <                                                progname, psl->fout);
1151 <                                quit(1);
1152 <                        }
1153 <                }
1154 <                psl->pid = 0;           /* free process slot */
1155 <                if (!--ncoms)
1156 <                        return;         /* done enough */
1245 >                serverdown();           /* update server status */
1246 >                if (--ncoms == 0)
1247 >                        break;          /* done enough */
1248          }
1249   }
1250  
# Line 1165 | Line 1256 | int    maxcopies;
1256   {
1257          int     retstatus = 0;
1258          int     hostcopies;
1259 <        char    com1buf[10240], *com1, *endcom1;
1259 >        char    buf[10240], *com1, *s;
1260          int     status;
1261 +        int     pfd;
1262 +        register int    n;
1263          register PSERVER        *ps;
1264  
1265          if (!silent)
# Line 1178 | Line 1271 | int    maxcopies;
1271          for (ps = pslist; ps != NULL; ps = ps->next) {
1272                  hostcopies = 0;
1273                  if (maxcopies > 1 && ps->nprocs > 1 && ppins != NULL) {
1274 <                        strcpy(com1=com1buf, com);      /* build -PP command */
1274 >                        strcpy(com1=buf, com);  /* build -PP command */
1275                          sprintf(com1+(ppins-com), " -PP %s/%s.persist",
1276                                          vval(DIRECTORY), phostname(ps));
1277                          strcat(com1, ppins);
1278 <                        endcom1 = com1 + strlen(com1);
1186 <                        sprintf(endcom1, "; kill `sed -n '1s/^[^ ]* //p' %s/%s.persist`",
1187 <                                        vval(DIRECTORY), phostname(ps));
1188 <                } else {
1278 >                } else
1279                          com1 = com;
1280 <                        endcom1 = NULL;
1280 >                while (maxcopies > 0) {
1281 >                        s = savestr(com1);
1282 >                        if (startjob(ps, s, donecom) != -1) {
1283 >                                sleep(20);
1284 >                                hostcopies++;
1285 >                                maxcopies--;
1286 >                        } else {
1287 >                                freestr(s);
1288 >                                break;
1289 >                        }
1290                  }
1192 –                while (maxcopies > 0 &&
1193 –                                startjob(ps, savestr(com1), donecom) != -1) {
1194 –                        sleep(10);
1195 –                        hostcopies++;
1196 –                        maxcopies--;
1197 –                        if (endcom1 != NULL)
1198 –                                *endcom1 = '\0';
1199 –                }
1291                  if (!silent && hostcopies) {
1292                          if (hostcopies > 1)
1293                                  printf("\t%d duplicate processes", hostcopies);
# Line 1208 | Line 1299 | int    maxcopies;
1299          }
1300                                          /* wait for jobs to finish */
1301          while ((status = wait4job(NULL, -1)) != -1)
1302 <                if (status)
1303 <                        retstatus += !serverdown();     /* check server */
1302 >                retstatus += status && !serverdown();
1303 >                                        /* terminate parallel rpict's */
1304 >        for (ps = pslist; ps != NULL; ps = ps->next) {
1305 >                sprintf(buf, "%s/%s.persist", vval(DIRECTORY), phostname(ps));
1306 >                if ((pfd = open(buf, O_RDONLY)) >= 0) {
1307 >                        n = read(pfd, buf, sizeof(buf)-1);      /* get PID */
1308 >                        buf[n] = '\0';
1309 >                        close(pfd);
1310 >                        for (n = 0; buf[n] && !isspace(buf[n]); n++)
1311 >                                ;
1312 >                                                                /* terminate */
1313 >                        sprintf(buf, "kill -ALRM %d", atoi(buf+n));
1314 >                        wait4job(ps, startjob(ps, buf, NULL));
1315 >                }
1316 >        }
1317          return(retstatus);
1318   }
1319  
# Line 1247 | Line 1351 | int    vc;
1351          fprintf(stderr, "%s: bad value for variable '%s'\n",
1352                          progname, vnam(vc));
1353          quit(1);
1354 + }
1355 +
1356 +
1357 + char *
1358 + dirfile(df, path)               /* separate path into directory and file */
1359 + char    *df;
1360 + register char   *path;
1361 + {
1362 +        register int    i;
1363 +        int     psep;
1364 +
1365 +        for (i = 0, psep = -1; path[i]; i++)
1366 +                if (path[i] == '/')
1367 +                        psep = i;
1368 +        if (df != NULL)
1369 +                if (psep == 0) {
1370 +                        df[0] = '/';
1371 +                        df[1] = '\0';
1372 +                } else if (psep > 0) {
1373 +                        strncpy(df, path, psep);
1374 +                        df[psep] = '\0';
1375 +                } else
1376 +                        df[0] = '\0';
1377 +        return(path+psep+1);
1378   }

Diff Legend

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