点对点阻塞(MPI_Send & MPI_Recv)

Question

我对MPI点对点阻塞模式有点困惑。

现在我有了下面的代码。

y = id;
j = id - 1;
if(j<0) j = p -1;

k = id + 1;
if(k>p-1) k = 0;

MPI_Recv(&x, 1, MPI_INT, k, 0, MPI_COMM_WORLD, &status);
MPI_Send(&y, 1, MPI_INT, j, 0, MPI_COMM_WORLD);

z = x + y;

这将被阻塞，因为MPI_Recv是一个阻塞函数，但是当我首先更改调用MPI_Send的顺序时，一切正常，我不知道原因。

提前谢谢，为我的英语感到抱歉。

Answer 1

MPI_Send()块，直到可以重用发送缓冲区为止。

从实用的角度来看，如果消息足够短，MPI_Send()会立即返回，否则会阻塞，直到发布匹配的MPI_Recv()。这是一种普遍的行为，但你不应该依赖它。

在这种情况下，最好的选择是使用单个MPI_Sendrecv()调用，而不是两个阻塞的发送/recv调用。

另一种选择是MPI_Irecv(); MPI_Send(); MPI_Wait();