c - 关于使用 MPI_Send 的问题

Question

我正在学习 MPI_Send，但我对这种方法感到困惑。我写了一个简单的乒乓程序，rank-0 节点发送消息给 rank-1 节点，然后后者返回消息给前一个。

if (rank == 0) {   /* Send Ping, Receive Pong */
  dest = 2;
  source = 2;
  rc = MPI_Send(pingmsg, strlen(pingmsg)+1, MPI_CHAR, dest, tag, MPI_COMM_WORLD);
  rc = MPI_Recv(buff, strlen(pongmsg)+1, MPI_CHAR, source, tag, MPI_COMM_WORLD, &Stat);
   printf("Rank0 Sent: %s & Received: %s\n", pingmsg, buff);
  }
else if (rank == 2) { /* Receive Ping, Send Pong */
  dest = 0;
  source = 0;
  rc = MPI_Recv(buff, strlen(pingmsg)+1, MPI_CHAR, source, tag, MPI_COMM_WORLD, &Stat);
  printf("Rank1 received: %s & Sending: %s\n", buff, pongmsg);
  rc = MPI_Send(pongmsg, strlen(pongmsg)+1, MPI_CHAR, dest, tag, MPI_COMM_WORLD);
  }

我在 3 节点环境中运行这个程序。但是，系统显示:

Fatal error in MPI_Send: Other MPI error, error stack:
MPI_Send(173)..............: MPI_Send(buf=0xbffffb90, count=10, MPI_CHAR, dest=2, tag=1, MPI_COMM_WORLD) failed
MPID_nem_tcp_connpoll(1811): Communication error with rank 2: Unknown error 4294967295

为什么从rank-0节点发消息到rank-1节点，从rank-0节点转成rank-1节点就报错了？谢谢。

Answer 1

实际上你检查过 MPI_SEND 和 MPI_RECV 中的 strlen(pingmsg) 是否相同

使用MPI_SEND发送的数据量应小于或等于MPI_RECV接收的数据量，否则会导致错误。