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.14 by greg, Thu May 30 17:00:10 1996 UTC vs.
Revision 2.22 by greg, Thu Mar 20 14:53:17 1997 UTC

# Line 93 | Line 93 | 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 */
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 108 | Line 108 | struct pslot {
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
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();
119  
# Line 151 | 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 231 | 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);
# Line 301 | Line 302 | checkdir()                     /* make sure we have our directory */
302   setdefaults()                   /* set default values */
303   {
304          extern char     *atos();
305 +        int     decades;
306          char    buf[256];
307  
308          if (vdef(ANIMATE)) {
# Line 334 | 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 482 | Line 486 | animate()                      /* run animation */
486          i = sscanf(vval(RESOLUTION), "%d %d %f", &xres, &yres, &pa);
487          mult = vflt(OVERSAMP);
488          if (i == 3) {
489 <                sprintf(rresopt, "-x %d -y %d -pa %f", (int)(mult*xres),
489 >                sprintf(rresopt, "-x %d -y %d -pa %.3f", (int)(mult*xres),
490                                  (int)(mult*yres), pa);
491 <                sprintf(fresopt, "-x %d -y %d -pa %f", xres, yres, pa);
491 >                sprintf(fresopt, "-x %d -y %d -pa %.3f", xres, yres, pa);
492          } else if (i) {
493                  if (i == 1) yres = xres;
494                  sprintf(rresopt, "-x %d -y %d", (int)(mult*xres),
# Line 899 | Line 903 | int    rvr;
903                  strcat(combuf, viewopt(vp));
904                  if (vbool(RTRACE))
905                          sprintf(combuf+strlen(combuf), " -ff -fr '%s -w0 %s'",
906 <                                        rendopt, vval(OCTREE));
906 >                                        rendopt+1, vval(OCTREE));
907                  if (vdef(PINTERP))
908                          sprintf(combuf+strlen(combuf), " %s", vval(PINTERP));
909                  if (usepfilt)
# Line 987 | Line 991 | int    n;
991          }
992          while (n > viewnum) {           /* scan to desired view */
993                  if (fgets(linebuf, sizeof(linebuf), viewfp) == NULL)
994 <                        return(viewnum==1 ? &curview : NULL);
994 >                        return(viewnum==1 ? &curview : (VIEW *)NULL);
995                  if (isview(linebuf) && sscanview(&curview, linebuf) > 0)
996                          viewnum++;
997          }
# Line 1101 | Line 1105 | int    pn;
1105   int     status;
1106   {
1107          register PROC   *pp;
1108 +        register struct pslot   *psl;
1109  
1110          pp = ps->proc + pn;
1111          if (pp->elen) {                 /* pass errors */
# Line 1112 | Line 1117 | int    status;
1117                  if (ps->hostname[0])
1118                          status = 1;     /* because rsh doesn't return status */
1119          }
1120 +        lastpserver = NULL;
1121 +        psl = findpslot(pp->pid);       /* check for bruncom() slot */
1122 +        if (psl->pid) {
1123 +                if (status) {
1124 +                        if (psl->rcvf != NULL)  /* attempt recovery */
1125 +                                status = (*psl->rcvf)(psl->fout);
1126 +                        if (status) {
1127 +                                fprintf(stderr,
1128 +                                        "%s: error rendering frame %d\n",
1129 +                                                progname, psl->fout);
1130 +                                quit(1);
1131 +                        }
1132 +                        lastpserver = ps;
1133 +                }
1134 +                psl->pid = 0;                   /* free process slot */
1135 +        } else if (status)
1136 +                lastpserver = ps;
1137          freestr(pp->com);               /* free command string */
1116        lastpid = pp->pid;              /* record PID for bwait() */
1117        lastpserver = ps;               /* record server for serverdown() */
1138          return(status);
1139   }
1140  
# Line 1122 | Line 1142 | int    status;
1142   int
1143   serverdown()                    /* check status of last process server */
1144   {
1145 +        if (lastpserver == NULL || !lastpserver->hostname[0])
1146 +                return(0);
1147          if (pserverOK(lastpserver))     /* server still up? */
1148                  return(0);
1149          delpserver(lastpserver);        /* else delete it */
# Line 1148 | Line 1170 | int    (*rf)();
1170                          printf("\t%s\n", com);  /* echo command */
1171                  return(0);
1172          }
1173 <                                        /* else start it when we can */
1174 <        while ((pid = startjob(NULL, savestr(com), donecom)) == -1)
1173 >        com = savestr(com);             /* else start it when we can */
1174 >        while ((pid = startjob(NULL, com, donecom)) == -1)
1175                  bwait(1);
1176          if (!silent) {                          /* echo command */
1177                  PSERVER *ps;
# Line 1171 | Line 1193 | bwait(ncoms)                           /* wait for batch job(s) to finish */
1193   int     ncoms;
1194   {
1195          int     status;
1174        register struct pslot   *psl;
1196  
1197          if (noaction)
1198                  return;
1199          while ((status = wait4job(NULL, -1)) != -1) {
1200 <                psl = findpslot(lastpid);
1201 <                if (status) {           /* attempt recovery */
1202 <                        serverdown();   /* check server */
1182 <                        if (psl->rcvf == NULL || (*psl->rcvf)(psl->fout)) {
1183 <                                fprintf(stderr,
1184 <                                        "%s: error rendering frame %d\n",
1185 <                                                progname, psl->fout);
1186 <                                quit(1);
1187 <                        }
1188 <                }
1189 <                psl->pid = 0;           /* free process slot */
1190 <                if (!--ncoms)
1191 <                        return;         /* done enough */
1200 >                serverdown();           /* update server status */
1201 >                if (--ncoms == 0)
1202 >                        break;          /* done enough */
1203          }
1204   }
1205  
# Line 1200 | Line 1211 | int    maxcopies;
1211   {
1212          int     retstatus = 0;
1213          int     hostcopies;
1214 <        char    com1buf[10240], *com1, *endcom1;
1214 >        char    buf[10240], *com1, *s;
1215          int     status;
1216 +        int     pfd;
1217 +        register int    n;
1218          register PSERVER        *ps;
1219  
1220          if (!silent)
# Line 1213 | Line 1226 | int    maxcopies;
1226          for (ps = pslist; ps != NULL; ps = ps->next) {
1227                  hostcopies = 0;
1228                  if (maxcopies > 1 && ps->nprocs > 1 && ppins != NULL) {
1229 <                        strcpy(com1=com1buf, com);      /* build -PP command */
1229 >                        strcpy(com1=buf, com);  /* build -PP command */
1230                          sprintf(com1+(ppins-com), " -PP %s/%s.persist",
1231                                          vval(DIRECTORY), phostname(ps));
1232                          strcat(com1, ppins);
1233 <                        endcom1 = com1 + strlen(com1);
1221 <                        sprintf(endcom1, "; kill `sed -n '1s/^[^ ]* //p' %s/%s.persist`",
1222 <                                        vval(DIRECTORY), phostname(ps));
1223 <                } else {
1233 >                } else
1234                          com1 = com;
1235 <                        endcom1 = NULL;
1235 >                while (maxcopies > 0) {
1236 >                        s = savestr(com1);
1237 >                        if (startjob(ps, s, donecom) != -1) {
1238 >                                sleep(20);
1239 >                                hostcopies++;
1240 >                                maxcopies--;
1241 >                        } else {
1242 >                                freestr(s);
1243 >                                break;
1244 >                        }
1245                  }
1227                while (maxcopies > 0 &&
1228                                startjob(ps, savestr(com1), donecom) != -1) {
1229                        sleep(10);
1230                        hostcopies++;
1231                        maxcopies--;
1232                        if (endcom1 != NULL)
1233                                *endcom1 = '\0';
1234                }
1246                  if (!silent && hostcopies) {
1247                          if (hostcopies > 1)
1248                                  printf("\t%d duplicate processes", hostcopies);
# Line 1243 | Line 1254 | int    maxcopies;
1254          }
1255                                          /* wait for jobs to finish */
1256          while ((status = wait4job(NULL, -1)) != -1)
1257 <                if (status)
1258 <                        retstatus += !serverdown();     /* check server */
1257 >                retstatus += status && !serverdown();
1258 >                                        /* terminate parallel rpict's */
1259 >        for (ps = pslist; ps != NULL; ps = ps->next) {
1260 >                sprintf(buf, "%s/%s.persist", vval(DIRECTORY), phostname(ps));
1261 >                if ((pfd = open(buf, O_RDONLY)) >= 0) {
1262 >                        n = read(pfd, buf, sizeof(buf)-1);      /* get PID */
1263 >                        buf[n] = '\0';
1264 >                        close(pfd);
1265 >                        for (n = 0; buf[n] && !isspace(buf[n]); n++)
1266 >                                ;
1267 >                                                                /* terminate */
1268 >                        sprintf(buf, "kill -ALRM %d", atoi(buf+n));
1269 >                        wait4job(ps, startjob(ps, buf, NULL));
1270 >                }
1271 >        }
1272          return(retstatus);
1273   }
1274  

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines