目前我正在尝试创建一个带有“监听器”循环的主从程序,其中主设备等待来自从设备的消息从那里做出决定。但是,尽管使用非阻塞MPI例程,我遇到了错误。我需要使用一些阻止程序吗?
#include "mpi.h"
#include <stdio.h>
#include <stdlib.h>
#include <time.h>
int main(int argc, char** argv)
{
// Variable Declarations
int rank, size;
MPI_Request *requestList,requestNull;
MPI_Status status;
// Start MPI
MPI_Init(&argc, &argv);
MPI_Comm_size(MPI_COMM_WORLD, &size);
MPI_Comm_rank(MPI_COMM_WORLD, &rank);
if( rank == 0 )
{
// Process Zero
int dataOut=13, pr;
float dataIn = -1;
requestList =(MPI_Request*)malloc((size-1)*sizeof(MPI_Request));
while(1){
dataIn = -1;
// We do NOT need to wait for the MPI_ Isend(s), it is the job of the receiver processes.
for(pr=1;pr<size;pr++)
{
MPI_Irecv(&dataIn,1,MPI_FLOAT,pr,1,MPI_COMM_WORLD,&(requestList[pr-1]));
}
if((dataIn > 1.5)){
printf("From the process: %f\n", dataIn);
break;
}
}
}
else
{
// Receiver Process
float message;
int index;
//MPI_Request request;
MPI_Status status;
while(1){
message = random()/(double)1147483648;
// Send the message back to the process zero
MPI_Isend(&message,1,MPI_FLOAT,0,1,MPI_COMM_WORLD, &requestNull);
if(message > 1.5)
break;
}
}
MPI_Finalize();
return 0;
}
答案 0 :(得分:0)
问题似乎是你永远不会等待你的MPI调用完成。
非阻塞调用在MPI中的工作方式是,当您发出非阻塞调用(如MPI_IRECV
)时,最后一个输入参数是MPI_REQUEST
对象。完成初始化调用(MPI_IRECV
)后,该请求对象包含非阻塞调用的信息。但是,该呼叫尚未完成,在您对请求使用完成呼叫(MPI_WAIT
/ MPI_TEST
/和朋友)之前,您无法保证呼叫已完成。
在您的情况下,您可能不必要地使用非阻止呼叫,因为您依赖于下一行MPI_IRECV
呼叫期间收到的信息。您可能只是将非阻止性呼叫替换为阻止MPI_RECV
呼叫并使用MPI_ANY_SOURCE
,这样您就不必为通信器中的每个等级发布单独的接收呼叫。或者,您可以使用MPI_WAITANY
来完成非阻止呼叫,但是您需要担心在完成后清理所有额外操作。