下面的程序本身只包含一个重要的 MPI 函数 (MPI_Scatter)。而且它工作错误:该函数返回 MPI_SUCCESS,但客户端接收的数据(非零等级)与服务器发送的数据(零等级)不同。
#include <stdio.h>
#include <mpi.h>
int main(int argc, char* argv[])
{
int rank;
int data;
int temp;
MPI_Init(&argc, &argv);
MPI_Comm_rank(MPI_COMM_WORLD, &rank);
if (rank == 0)
{
data = 123; // data to send
MPI_Scatter(&data, 1, MPI_INT, &temp, 1, MPI_INT, 0, MPI_COMM_WORLD); // MPI_SUCCESS
}
else
{
MPI_Scatter(NULL, 0, MPI_INT, &data, 1, MPI_INT, 0, MPI_COMM_WORLD); // MPI_SUCCESS
printf("\nClient[%i] data = %i", rank, data); // Incorrect data received
}
MPI_Finalize();
return 0;
}