需要传递MPI通信器来创建数据包的逻辑是什么?
https://www.mpich.org/static/docs/v3.2/www3/MPI_Pack.html
int MPI_Pack(
const void *inbuf,
int incount,
MPI_Datatype datatype,
void *outbuf,
int outsize,
int *position,
MPI_Comm comm /*********HERE*****/
)
理论上,人们可以使用信息填充缓冲区,而无需知道数据的发送位置。是否意味着生成的数据包格式取决于通信器的某些特性?哪一个?
那里存在冗余,如果一个包装有一个通信器并使用不同的通信器发送数据包(缓冲区)会发生什么?
#include "mpi.h"
#include <stdio.h>
int main(int argc, char *argv[])
{
int rank, size;
int i;
char c[100];
char buffer[110];
int position = 0;
MPI_Status status;
MPI_Init(&argc, &argv);
MPI_Comm_size(MPI_COMM_WORLD, &size);
if (size < 2)
{
printf("Please run with 2 processes.\n");fflush(stdout);
MPI_Finalize();
return 1;
}
MPI_Comm_rank(MPI_COMM_WORLD, &rank);
if (rank == 0)
{
for (i=0; i<100; i++)
c[i] = i;
i = 123;
MPI_Pack(&i, 1, MPI_INT, buffer, 110, &position, MPI_COMM_WORLD);
MPI_Pack(c, 100, MPI_CHAR, buffer, 110, &position, MPI_COMM_WORLD);
MPI_Send(buffer, position, MPI_PACKED, 1, 100, MPI_COMM_WORLD);
}
if (rank == 1)
{
MPI_Recv(buffer, 110, MPI_PACKED, 0, 100, MPI_COMM_WORLD, &status);
MPI_Unpack(buffer, 110, &position, &i, 1, MPI_INT, MPI_COMM_WORLD);
MPI_Unpack(buffer, 110, &position, c, 100, MPI_CHAR, MPI_COMM_WORLD);
printf("i=%d\nc[0] = %d\n...\nc[99] = %d\n", i, (int)c[0], (int)c[99]);fflush(stdout);
}
MPI_Finalize();
return 0;
}
答案 0 :(得分:1)
如果您的通信器的所有MPI任务具有相同的架构,那么打包/解包非常简单。
现在,如果同一个通信器中的MPI任务在不同的arch上运行(例如x86_64和sparcv9,不同的字节顺序,MPI_LONG_DOUBLE
的不同编码等),那么数据必须以中性格式打包,所以相同的打包任何任务都可以解码缓冲区。
来自MPI 3.1标准第133页
comm参数是随后用于发送打包消息的通信器。
所以第二个问题的答案(如果一个包装有一个通信器并使用不同的通信器发送数据包(缓冲区)会发生什么情况)是关于MPI标准的非法程序具有未定义的行为。