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.11 by greg, Tue Apr 16 10:38:19 1996 UTC vs.
Revision 2.18 by greg, Mon Jul 8 14:53:17 1996 UTC

# 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  
120 + extern time_t   fdate(), time();
121  
122 +
123   main(argc, argv)
124   int     argc;
125   char    *argv[];
# Line 190 | Line 191 | userr:
191  
192   getastat()                      /* check/set animation status */
193   {
194 <        char    buf[256];
194 >        char    sfname[256];
195          FILE    *fp;
196  
197 <        sprintf(buf, "%s/%s", vval(DIRECTORY), SFNAME);
198 <        if ((fp = fopen(buf, "r")) == NULL) {
197 >        sprintf(sfname, "%s/%s", vval(DIRECTORY), SFNAME);
198 >        if ((fp = fopen(sfname, "r")) == NULL) {
199                  if (errno != ENOENT) {
200 <                        perror(buf);
200 >                        perror(sfname);
201                          return(-1);
202                  }
203                  astat.rnext = astat.fnext = astat.tnext = 0;
# Line 234 | Line 235 | getastat()                     /* check/set animation status */
235                                  progname, astat.cfname);
236                  return(-1);
237          }
238 +                                                /* check control file mods. */
239 +        if (!nowarn && fdate(cfname) > fdate(sfname))
240 +                fprintf(stderr,
241 +                        "%s: warning - control file modified since last run\n",
242 +                                progname);
243   setours:                                        /* set our values */
244          strcpy(astat.host, myhostname());
245          astat.pid = getpid();
# Line 241 | Line 247 | setours:                                       /* set our values */
247          return(0);
248   fmterr:
249          fprintf(stderr, "%s: format error in status file \"%s\"\n",
250 <                        progname, buf);
250 >                        progname, sfname);
251          fclose(fp);
252          return(-1);
253   }
# Line 475 | Line 481 | animate()                      /* run animation */
481          i = sscanf(vval(RESOLUTION), "%d %d %f", &xres, &yres, &pa);
482          mult = vflt(OVERSAMP);
483          if (i == 3) {
484 <                sprintf(rresopt, "-x %d -y %d -pa %f", (int)(mult*xres),
484 >                sprintf(rresopt, "-x %d -y %d -pa %.3f", (int)(mult*xres),
485                                  (int)(mult*yres), pa);
486 <                sprintf(fresopt, "-x %d -y %d -pa %f", xres, yres, pa);
486 >                sprintf(fresopt, "-x %d -y %d -pa %.3f", xres, yres, pa);
487          } else if (i) {
488                  if (i == 1) yres = xres;
489                  sprintf(rresopt, "-x %d -y %d", (int)(mult*xres),
# Line 505 | Line 511 | animate()                      /* run animation */
511                                          /* figure # frames per batch */
512          d1 = mult*xres*mult*yres*4;             /* space for orig. picture */
513          if ((i=vint(INTERP)) || atoi(vval(MBLUR)))
514 <                d1 += mult*xres*mult*yres*4;    /* space for z-buffer */
514 >                d1 += mult*xres*mult*yres*sizeof(float);        /* Z-buffer */
515          d2 = xres*yres*4;                       /* space for final picture */
516          frames_batch = (i+1)*(vflt(DISKSPACE)*1048576.-d1)/(d1+i*d2);
517          if (frames_batch < i+2) {
# Line 834 | Line 840 | int    rvr;
840                          while (*arcnext) arcnext++;
841                          strcpy(arcnext, ".unf");
842                          arcnext += 4;
843 <                        if (usepinterp || vint(INTERP)) {       /* and z-buf */
843 >                        if (usepinterp || vint(INTERP)) {       /* and Z-buf */
844                                  *arcnext++ = ' ';
845                                  sprintf(arcnext, vval(BASENAME),
846                                                  frame-vint(INTERP)-1);
# Line 980 | Line 986 | int    n;
986          }
987          while (n > viewnum) {           /* scan to desired view */
988                  if (fgets(linebuf, sizeof(linebuf), viewfp) == NULL)
989 <                        return(viewnum==1 ? &curview : NULL);
989 >                        return(viewnum==1 ? &curview : (VIEW *)NULL);
990                  if (isview(linebuf) && sscanview(&curview, linebuf) > 0)
991                          viewnum++;
992          }
# Line 1013 | Line 1019 | int    n;
1019          if (n == 0) {                           /* signal to close file */
1020                  if (expfp != NULL) {
1021                          fclose(expfp);
1022 +                        free((char *)exppos);
1023                          expfp = NULL;
1024                  }
1025                  return(NULL);
1026 <        }
1026 >        } else if (n > vint(END))               /* request past end (error?) */
1027 >                return(NULL);
1028          if (!vdef(EXPOSURE))                    /* no setting (auto) */
1029                  return(NULL);
1030          if (isflt(vval(EXPOSURE)))              /* always the same */
# Line 1054 | Line 1062 | int    n;
1062                  }
1063                  curfrm++;
1064                  cp = fskip(expval);                     /* check format */
1065 <                if (cp == NULL || *cp != '\n') {
1065 >                if (cp != NULL)
1066 >                        while (isspace(*cp))
1067 >                                *cp++ = '\0';
1068 >                if (cp == NULL || *cp) {
1069                          fprintf(stderr,
1070                                  "%s: exposure format error on line %d\n",
1071                                          vval(EXPOSURE), curfrm);
1072                          quit(1);
1073                  }
1063 –                *cp = '\0';
1074          }
1075          return(expval);                         /* return value */
1076   }
# Line 1090 | Line 1100 | int    pn;
1100   int     status;
1101   {
1102          register PROC   *pp;
1103 +        register struct pslot   *psl;
1104  
1105          pp = ps->proc + pn;
1106          if (pp->elen) {                 /* pass errors */
# Line 1101 | Line 1112 | int    status;
1112                  if (ps->hostname[0])
1113                          status = 1;     /* because rsh doesn't return status */
1114          }
1115 +        lastpserver = NULL;
1116 +        psl = findpslot(pp->pid);       /* check for bruncom() slot */
1117 +        if (psl->pid) {
1118 +                if (status) {
1119 +                        if (psl->rcvf != NULL)  /* attempt recovery */
1120 +                                status = (*psl->rcvf)(psl->fout);
1121 +                        if (status) {
1122 +                                fprintf(stderr,
1123 +                                        "%s: error rendering frame %d\n",
1124 +                                                progname, psl->fout);
1125 +                                quit(1);
1126 +                        }
1127 +                        lastpserver = ps;
1128 +                }
1129 +                psl->pid = 0;                   /* free process slot */
1130 +        } else if (status)
1131 +                lastpserver = ps;
1132          freestr(pp->com);               /* free command string */
1105 –        lastpid = pp->pid;              /* record PID for bwait() */
1106 –        lastpserver = ps;               /* record server for serverdown() */
1133          return(status);
1134   }
1135  
# Line 1111 | Line 1137 | int    status;
1137   int
1138   serverdown()                    /* check status of last process server */
1139   {
1140 +        if (lastpserver == NULL || !lastpserver->hostname[0])
1141 +                return(0);
1142          if (pserverOK(lastpserver))     /* server still up? */
1143                  return(0);
1144          delpserver(lastpserver);        /* else delete it */
# Line 1137 | Line 1165 | int    (*rf)();
1165                          printf("\t%s\n", com);  /* echo command */
1166                  return(0);
1167          }
1168 <                                        /* else start it when we can */
1169 <        while ((pid = startjob(NULL, savestr(com), donecom)) == -1)
1168 >        com = savestr(com);             /* else start it when we can */
1169 >        while ((pid = startjob(NULL, com, donecom)) == -1)
1170                  bwait(1);
1171          if (!silent) {                          /* echo command */
1172                  PSERVER *ps;
# Line 1160 | Line 1188 | bwait(ncoms)                           /* wait for batch job(s) to finish */
1188   int     ncoms;
1189   {
1190          int     status;
1163 –        register struct pslot   *psl;
1191  
1192          if (noaction)
1193                  return;
1194          while ((status = wait4job(NULL, -1)) != -1) {
1195 <                psl = findpslot(lastpid);
1196 <                if (status) {           /* attempt recovery */
1197 <                        serverdown();   /* check server */
1171 <                        if (psl->rcvf == NULL || (*psl->rcvf)(psl->fout)) {
1172 <                                fprintf(stderr,
1173 <                                        "%s: error rendering frame %d\n",
1174 <                                                progname, psl->fout);
1175 <                                quit(1);
1176 <                        }
1177 <                }
1178 <                psl->pid = 0;           /* free process slot */
1179 <                if (!--ncoms)
1180 <                        return;         /* done enough */
1195 >                serverdown();           /* update server status */
1196 >                if (--ncoms == 0)
1197 >                        break;          /* done enough */
1198          }
1199   }
1200  
# Line 1189 | Line 1206 | int    maxcopies;
1206   {
1207          int     retstatus = 0;
1208          int     hostcopies;
1209 <        char    com1buf[10240], *com1, *endcom1;
1209 >        char    buf[10240], *com1, *s;
1210          int     status;
1211 +        int     pfd;
1212 +        register int    n;
1213          register PSERVER        *ps;
1214  
1215          if (!silent)
# Line 1202 | Line 1221 | int    maxcopies;
1221          for (ps = pslist; ps != NULL; ps = ps->next) {
1222                  hostcopies = 0;
1223                  if (maxcopies > 1 && ps->nprocs > 1 && ppins != NULL) {
1224 <                        strcpy(com1=com1buf, com);      /* build -PP command */
1224 >                        strcpy(com1=buf, com);  /* build -PP command */
1225                          sprintf(com1+(ppins-com), " -PP %s/%s.persist",
1226                                          vval(DIRECTORY), phostname(ps));
1227                          strcat(com1, ppins);
1228 <                        endcom1 = com1 + strlen(com1);
1210 <                        sprintf(endcom1, "; kill `sed -n '1s/^[^ ]* //p' %s/%s.persist`",
1211 <                                        vval(DIRECTORY), phostname(ps));
1212 <                } else {
1228 >                } else
1229                          com1 = com;
1230 <                        endcom1 = NULL;
1230 >                while (maxcopies > 0) {
1231 >                        s = savestr(com1);
1232 >                        if (startjob(ps, s, donecom) != -1) {
1233 >                                sleep(20);
1234 >                                hostcopies++;
1235 >                                maxcopies--;
1236 >                        } else {
1237 >                                freestr(s);
1238 >                                break;
1239 >                        }
1240                  }
1216 –                while (maxcopies > 0 &&
1217 –                                startjob(ps, savestr(com1), donecom) != -1) {
1218 –                        sleep(10);
1219 –                        hostcopies++;
1220 –                        maxcopies--;
1221 –                        if (endcom1 != NULL)
1222 –                                *endcom1 = '\0';
1223 –                }
1241                  if (!silent && hostcopies) {
1242                          if (hostcopies > 1)
1243                                  printf("\t%d duplicate processes", hostcopies);
# Line 1232 | Line 1249 | int    maxcopies;
1249          }
1250                                          /* wait for jobs to finish */
1251          while ((status = wait4job(NULL, -1)) != -1)
1252 <                if (status)
1253 <                        retstatus += !serverdown();     /* check server */
1252 >                retstatus += status && !serverdown();
1253 >                                        /* terminate parallel rpict's */
1254 >        for (ps = pslist; ps != NULL; ps = ps->next) {
1255 >                sprintf(buf, "%s/%s.persist", vval(DIRECTORY), phostname(ps));
1256 >                if ((pfd = open(buf, O_RDONLY)) >= 0) {
1257 >                        n = read(pfd, buf, sizeof(buf)-1);      /* get PID */
1258 >                        buf[n] = '\0';
1259 >                        close(pfd);
1260 >                        for (n = 0; buf[n] && !isspace(buf[n]); n++)
1261 >                                ;
1262 >                                                                /* terminate */
1263 >                        sprintf(buf, "kill -ALRM %d", atoi(buf+n));
1264 >                        wait4job(ps, startjob(ps, buf, NULL));
1265 >                }
1266 >        }
1267          return(retstatus);
1268   }
1269  

Diff Legend

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