我刚刚了解到MPI_Send一次不能发送太长的数据,因此我决定将数据分成几部分并将它们发送到for循环中。以下是测试用例。这里的问题是,如果我使用少量数据并将其分成几部分,程序将运行;然而,当数据很长时,无论我把它分成多少块,程序都不会运行。当我运行它时,我只是听到我的电脑发出很大的噪音。所以我想知道是什么原因以及如何让MPI_Send将大数据集发送到其他处理器。谢谢!
#include<iostream>
#include<mpi.h>
#include<vector>
using namespace std;
//This set of N and N+Parts won't work
#define N 1024*1024*5
#define N_PARTS 1000
//This works
#define N 1024*5
#define N_PARTS 10
#define MASTER 0
int main(int argc, char** argv)
{
int np, pid;
vector<int> arr;
for(int i=0; i<N; ++i) arr.push_back(i);
int LENGTH = N/N_PARTS;
int N_RES = N%N_PARTS;
// cout << LENGTH << endl;
// cout << N_RES << endl;
MPI_Init(&argc, &argv);
MPI_Comm_size(MPI_COMM_WORLD, &np);
MPI_Comm_rank(MPI_COMM_WORLD, &pid);
for(int i=0; i< N_PARTS-1; ++i){
MPI_Send(&arr[0]+i*LENGTH,LENGTH,MPI_INT,MASTER,0,MPI_COMM_WORLD);
}
MPI_Send(&arr[0]+LENGTH*(N_PARTS-1),N_RES,MPI_INT,MASTER,0,MPI_COMM_WORLD);
MPI_Finalize();
}
答案 0 :(得分:1)
MPI_Send
- MPI_Recv
是点对点互动。如果您从一个处理器发送数据,那么您应该在另一个处理器上接收数据。因此,您的代码必须如下所示:
if (pid == MASTER) {
for (int i = 1; i < np; i++) {
MPI_Send(&arr[0] + i*LENGTH, LENGTH, MPI_INT, i, 0, MPI_COMM_WORLD);
}
} else {
arr.resize(LENGTH);
MPI_Recv(&arr[0], LENGTH, MPI_INT, MASTER, 0, MPI_COMM_WORLD, &status);
}
另外,您可以阅读有关MPI_Send
和MPI_Recv
的{{3}}教程。
<强> UPD 强>: 另外我认为你不应该在每个处理器上初始化你的数据。您可以在编号为0的处理器上初始化数据,并将此数据发送到所有其他处理器:
if (pid == MASTER) {
for (int i = 0; i<N; ++i) arr.push_back(i);
}