pagrnd
bcopy(pagrnd(incorb[b+1]), buf, BUFSIZE);
bcopy(buf, pagrnd(incorb[b+1]), BUFSIZE);
if (write(tfile, pagrnd(incorb[1]), i * BUFSIZE) != (i * BUFSIZE))