| 165 |
|
static int runcom(char *cs); |
| 166 |
|
static int rmfile(char *fn); |
| 167 |
|
static int mvfile(char *fold, char *fnew); |
| 168 |
< |
static int next_process(void); |
| 168 |
> |
static int next_process(int reserve); |
| 169 |
|
static void wait_process(int all); |
| 170 |
|
static void finish_process(void); |
| 171 |
|
static void badvalue(int vc); |
| 1316 |
|
getview(0, vs) != NULL) { |
| 1317 |
|
if (!strcmp(c_rpict, DEF_RPICT_PATH) && |
| 1318 |
|
getview(1, NULL) == NULL) { |
| 1319 |
< |
sprintf(sfile, "rpiece_%s.txt", vs); |
| 1319 |
> |
sprintf(sfile, "rpsync_%s.txt", vs); |
| 1320 |
|
strcpy(rppopt, "-PP pfXXXXXX"); |
| 1321 |
|
} else { |
| 1322 |
|
strcpy(rppopt, "-S 1 -PP pfXXXXXX"); |
| 1323 |
|
} |
| 1324 |
|
pfile = rppopt + strlen(rppopt) - 8; |
| 1325 |
< |
if (mktemp(pfile) == NULL) |
| 1325 |
> |
if (mktemp(pfile) == NULL) { |
| 1326 |
|
if (do_rpiece) { |
| 1327 |
|
fprintf(stderr, "%s: cannot create\n", pfile); |
| 1328 |
|
quit(1); |
| 1329 |
< |
} else |
| 1330 |
< |
pfile = NULL; |
| 1329 |
> |
} |
| 1330 |
> |
pfile = NULL; |
| 1331 |
> |
} |
| 1332 |
|
} |
| 1333 |
|
vn = 0; /* do each view */ |
| 1334 |
|
while ((vw = getview(vn++, vs)) != NULL) { |
| 1357 |
|
} |
| 1358 |
|
/* parallel running? */ |
| 1359 |
|
if (do_rpiece) { |
| 1360 |
< |
if (rfdt < oct1date || fdate(sfile) < oct1date) { |
| 1360 |
> |
if (rfdt < oct1date || !fdate(sfile)) { |
| 1361 |
> |
int xdiv = 8+nprocs/3, ydiv = 8+nprocs/3; |
| 1362 |
|
rfdt = 0; /* start fresh */ |
| 1363 |
+ |
if (!silent) |
| 1364 |
+ |
printf("\techo %d %d > %s\n", |
| 1365 |
+ |
xdiv, ydiv, sfile); |
| 1366 |
|
if ((fp = fopen(sfile, "w")) == NULL) { |
| 1367 |
|
fprintf(stderr, "%s: cannot create\n", |
| 1368 |
|
sfile); |
| 1369 |
|
quit(1); |
| 1370 |
|
} |
| 1371 |
< |
fprintf(fp, "%d %d\n", 8+nprocs/3, 8+nprocs/3); |
| 1371 |
> |
fprintf(fp, "%d %d\n", xdiv, ydiv); |
| 1372 |
|
fclose(fp); |
| 1373 |
|
} |
| 1374 |
< |
} else if (next_process()) { |
| 1374 |
> |
} else if (next_process(0)) { |
| 1375 |
|
if (pfile != NULL) |
| 1376 |
|
sleep(10); |
| 1377 |
|
continue; |
| 1384 |
|
sprintf(combuf, "%s -R %s %s%s %s %s%s%s -o %s %s", |
| 1385 |
|
c_rpiece, sfile, rppopt, rep, vw, |
| 1386 |
|
res, opts, po, rawfile, oct1name); |
| 1387 |
< |
while (children_running < nprocs-1 && |
| 1383 |
< |
next_process()) { |
| 1387 |
> |
while (next_process(1)) { |
| 1388 |
|
sleep(10); |
| 1389 |
|
combuf[strlen(c_rpiece)+2] = 'F'; |
| 1390 |
|
} |
| 1399 |
|
"%s%s %s%s -x 64 -y 64 -ps 1 %s > %s", |
| 1400 |
|
c_rpict, rep, vw, opts, |
| 1401 |
|
oct1name, overfile); |
| 1402 |
+ |
if (do_rpiece) |
| 1403 |
+ |
while (next_process(1)) |
| 1404 |
+ |
sleep(5); |
| 1405 |
|
if (runcom(combuf)) { |
| 1406 |
|
fprintf(stderr, |
| 1407 |
|
"%s: error in overture for view %s\n", |
| 1408 |
|
progname, vs); |
| 1409 |
|
quit(1); |
| 1410 |
|
} |
| 1411 |
+ |
if (do_rpiece) { |
| 1412 |
+ |
finish_process(); |
| 1413 |
+ |
wait_process(1); |
| 1414 |
+ |
} |
| 1415 |
|
#ifndef NULL_DEVICE |
| 1416 |
|
rmfile(overfile); |
| 1417 |
|
#endif |
| 1420 |
|
sprintf(combuf, "%s -F %s %s%s %s %s%s%s -o %s %s", |
| 1421 |
|
c_rpiece, sfile, rppopt, rep, vw, |
| 1422 |
|
res, opts, po, rawfile, oct1name); |
| 1423 |
< |
while (children_running < nprocs-1 && |
| 1413 |
< |
next_process()) |
| 1423 |
> |
while (next_process(1)) |
| 1424 |
|
sleep(10); |
| 1425 |
|
} else { |
| 1426 |
|
sprintf(combuf, "%s%s %s %s%s%s%s %s > %s", |
| 1477 |
|
finish_process(); /* exit if child */ |
| 1478 |
|
} |
| 1479 |
|
wait_process(1); /* wait for children to finish */ |
| 1480 |
< |
if (pfile != NULL) { /* clean up rpict persistent mode */ |
| 1480 |
> |
if (pfile != NULL) { /* clean up persistent rpict */ |
| 1481 |
|
RT_PID pid; |
| 1482 |
|
fp = fopen(pfile, "r"); |
| 1483 |
|
if (fp != NULL) { |
| 1504 |
|
printf("\ttouch %s\n", fn); |
| 1505 |
|
if (!nprocs) |
| 1506 |
|
return(0); |
| 1497 |
– |
#ifdef notused |
| 1498 |
– |
if (access(fn, F_OK) == -1) /* create it */ |
| 1499 |
– |
if (close(open(fn, O_WRONLY|O_CREAT, 0666)) == -1) |
| 1500 |
– |
return(-1); |
| 1501 |
– |
#endif |
| 1507 |
|
return(setfdate(fn, time((time_t *)NULL))); |
| 1508 |
|
} |
| 1509 |
|
|
| 1551 |
|
|
| 1552 |
|
#ifdef RHAS_FORK_EXEC |
| 1553 |
|
static int |
| 1554 |
< |
next_process(void) /* fork the next process (max. nprocs) */ |
| 1554 |
> |
next_process(int reserve) /* fork the next process */ |
| 1555 |
|
{ |
| 1556 |
|
RT_PID child_pid; |
| 1557 |
|
|
| 1562 |
|
progname); |
| 1563 |
|
quit(1); |
| 1564 |
|
} |
| 1565 |
+ |
if (reserve > 0 && children_running >= nprocs-reserve) |
| 1566 |
+ |
return(0); /* caller holding back process(es) */ |
| 1567 |
|
if (children_running >= nprocs) |
| 1568 |
|
wait_process(0); /* wait for someone to finish */ |
| 1569 |
|
fflush(NULL); /* flush output */ |
| 1611 |
|
} |
| 1612 |
|
#else /* ! RHAS_FORK_EXEC */ |
| 1613 |
|
static int |
| 1614 |
< |
next_process(void) |
| 1614 |
> |
next_process(int reserve) |
| 1615 |
|
{ |
| 1616 |
|
return(0); /* cannot start new process */ |
| 1617 |
|
} |