papiServiceSetPeer
(void) papiServiceSetPeer(svc, fileno(ifp));
papiServiceSetPeer(*svc, fd);
extern papi_status_t papiServiceSetPeer(papi_service_t handle, int peerfd);