static
void psdapl_bufpair_destroy(psdapl_bufpair_t *bufp)
{
if (bufp->lmr_handle) {
dat_lmr_free(bufp->lmr_handle);
bufp->lmr_handle = 0;
}
free(bufp->lmr_mem);
bufp->lmr_mem = NULL;
}
static int udapl_dereg_mr(void *reg_data, mca_mpool_base_registration_t *reg)
{
mca_btl_udapl_reg_t *udapl_reg = (mca_btl_udapl_reg_t*)reg;
int rc;
if(udapl_reg->lmr != NULL) {
rc = dat_lmr_free(udapl_reg->lmr);
if(rc != DAT_SUCCESS) {
char* major;
char* minor;
dat_strerror(rc, (const char**)&major,
(const char**)&minor);
BTL_ERROR(("ERROR: %s %s %s\n", "dat_lmr_free",
major, minor));
return OMPI_ERROR;
}
}
return OMPI_SUCCESS;
}
int disconnect_ep(void)
{
DAT_RETURN status;
DAT_EVENT event;
DAT_COUNT nmore;
int i;
if (counters) { /* examples of query and print */
int ii;
DAT_UINT64 ia_cntrs[DCNT_IA_ALL_COUNTERS];
dat_query_counters(ia, DCNT_IA_ALL_COUNTERS, ia_cntrs, 0);
printf(" IA Cntrs:");
for (ii = 0; ii < DCNT_IA_ALL_COUNTERS; ii++)
printf(" " F64u "", ia_cntrs[ii]);
printf("\n");
dat_print_counters(ia, DCNT_IA_ALL_COUNTERS, 0);
}
if (!ud_test) {
status = dat_ep_disconnect(ep[0], DAT_CLOSE_DEFAULT);
_OK2(status, "dat_ep_disconnect");
status = dat_evd_wait(con_evd, DAT_TIMEOUT_INFINITE, 1,
&event, &nmore);
_OK(status, "dat_evd_wait");
}
if (psp) {
status = dat_psp_free(psp);
_OK2(status, "dat_psp_free");
}
for (i = 0; i < REG_MEM_COUNT * eps; i++) {
status = dat_lmr_free(lmr[i]);
_OK2(status, "dat_lmr_free");
}
if (lmr_atomic) {
status = dat_lmr_free(lmr_atomic);
_OK2(status, "dat_lmr_free_atomic");
}
for (i = 0; i < eps; i++) {
if (counters) { /* examples of query and print */
int ii;
DAT_UINT64 ep_cntrs[DCNT_EP_ALL_COUNTERS];
dat_query_counters(ep[i], DCNT_EP_ALL_COUNTERS,
ep_cntrs, 0);
printf(" EP[%d] Cntrs:", i);
for (ii = 0; ii < DCNT_EP_ALL_COUNTERS; ii++)
printf(" " F64u "", ep_cntrs[ii]);
printf("\n");
dat_print_counters(ep[i], DCNT_EP_ALL_COUNTERS, 0);
}
status = dat_ep_free(ep[i]);
_OK2(status, "dat_ep_free");
}
if (counters) { /* examples of query and print */
int ii;
DAT_UINT64 evd_cntrs[DCNT_EVD_ALL_COUNTERS];
dat_query_counters(dto_evd, DCNT_EVD_ALL_COUNTERS,
evd_cntrs, 0);
printf(" DTO_EVD Cntrs:");
for (ii = 0; ii < DCNT_EVD_ALL_COUNTERS; ii++)
printf(" " F64u "", evd_cntrs[ii]);
printf("\n");
dat_print_counters(dto_evd, DCNT_EVD_ALL_COUNTERS, 0);
dat_query_counters(con_evd, DCNT_EVD_ALL_COUNTERS,
evd_cntrs, 0);
printf(" CONN_EVD Cntrs:");
for (ii = 0; ii < DCNT_EVD_ALL_COUNTERS; ii++)
printf(" " F64u "", evd_cntrs[ii]);
printf("\n");
dat_print_counters(con_evd, DCNT_EVD_ALL_COUNTERS, 0);
dat_query_counters(cr_evd, DCNT_EVD_ALL_COUNTERS, evd_cntrs, 0);
printf(" CR_EVD Cntrs:");
for (ii = 0; ii < DCNT_EVD_ALL_COUNTERS; ii++)
printf(" " F64u "", evd_cntrs[ii]);
printf("\n");
dat_print_counters(cr_evd, DCNT_EVD_ALL_COUNTERS, 0);
}
status = dat_evd_free(dto_evd);
_OK2(status, "dat_evd_free DTO");
status = dat_evd_free(con_evd);
_OK2(status, "dat_evd_free CON");
status = dat_evd_free(cr_evd);
_OK2(status, "dat_evd_free CR");
status = dat_pz_free(pz);
_OK2(status, "dat_pz_free");
status = dat_ia_close(ia, DAT_CLOSE_DEFAULT);
_OK2(status, "dat_ia_close");
return (0);
}
