void do_send_recv(void)
{
int len, i, j;
switch (ep_type) {
case EP:
for (len = 2; len <= BUF_SZ; len *= 2) {
do_ep_send_recv_iter(len);
}
break;
case SEP:
for (j = 0; j < ctx_cnt; j++) {
for (len = 2; len <= BUF_SZ; len *= 2) {
do_sep_send_recv_iter(j, len);
}
for (i = 0; i < NUMEPS; i++) {
fi_cntr_set(send_cntr[i], 0);
fi_cntr_set(recv_cntr[i], 0);
}
}
break;
case PEP:
break;
default:
cr_assert_fail("Invalid endpoint type.");
}
}
void sep_clear_counters(void)
{
int i, ret;
for (i = 0; i < NUMEPS; i++) {
ret = fi_cntr_set(send_cntr[i], 0);
cr_assert(!ret, "fi_cntr_set");
ret = fi_cntr_set(recv_cntr[i], 0);
cr_assert(!ret, "fi_cntr_set");
sends[i] = 0;
recvs[i] = 0;
send_errs[i] = 0;
recv_errs[i] = 0;
}
}
static int cntr_loop()
{
size_t i, opened, cntr_cnt;
uint64_t value, expected;
struct timespec start, stop;
int ret, testret = FAIL, timeout = 5000;
cntr_cnt = MIN(fi->domain_attr->cntr_cnt, MAX_COUNTER_CHECK);
struct fid_cntr **cntrs = calloc(cntr_cnt, sizeof(struct fid_cntr *));
if (!cntrs) {
perror("calloc");
return -FI_ENOMEM;
}
for (opened = 0; opened < cntr_cnt; opened++) {
ret = ft_cntr_open(&cntrs[opened]);
if (ret) {
FT_PRINTERR("fi_cntr_open", ret);
goto close;
}
}
for (i = 0; i < opened; i++) {
ret = fi_cntr_set(cntrs[i], i);
if (ret) {
FT_PRINTERR("fi_cntr_set", ret);
goto close;
}
ret = fi_cntr_seterr(cntrs[i], i << 1);
if (ret) {
FT_PRINTERR("fi_cntr_seterr", ret);
goto close;
}
}
for (i = 0; i < opened; i++) {
ret = fi_cntr_add(cntrs[i], i);
if (ret) {
FT_PRINTERR("fi_cntr_add", ret);
goto close;
}
ret = fi_cntr_adderr(cntrs[i], i);
if (ret) {
FT_PRINTERR("fi_cntr_adderr", ret);
goto close;
}
}
for (i = 0; i < opened; i++) {
clock_gettime(CLOCK_MONOTONIC, &start);
expected = i + i;
do {
value = fi_cntr_read(cntrs[i]);
clock_gettime(CLOCK_MONOTONIC, &stop);
sched_yield();
} while ((value != expected) &&
((stop.tv_sec - start.tv_sec) > timeout));
if (value != expected) {
FT_PRINTERR("fi_cntr_read", value);
goto close;
}
clock_gettime(CLOCK_MONOTONIC, &start);
expected = (i << 1) + i;
do {
value = fi_cntr_readerr(cntrs[i]);
clock_gettime(CLOCK_MONOTONIC, &stop);
sched_yield();
} while ((value != expected) &&
((stop.tv_sec - start.tv_sec) > timeout));
if (value != expected) {
FT_PRINTERR("fi_cntr_readerr", value);
goto close;
}
}
testret = PASS;
close:
for (i = 0; i < opened; i++) {
ret = fi_close(&(cntrs[i])->fid);
if (ret) {
FT_PRINTERR("fi_cntr_close", ret);
break;
}
}
if (i < cntr_cnt)
testret = FAIL;
free(cntrs);
return TEST_RET_VAL(ret, testret);
}
