INPIPE
#define closepipe(x) (close(x[INPIPE]), close(x[OTPIPE]))
if (pipe(pv) < 0 || pv[INPIPE] < 0 || pv[OTPIPE] < 0)
initf(pv[INPIPE]); /* read from pipe */
renamef(pf1[INPIPE], 0);
close(pf2[INPIPE]);