MPI Isend和Irecv问题

我遇到了我的MPI_Isend和MPI_Irecv代码块问题。我需要发送一个数字Cin到下一个流程，然后当前的流程可以开展业务。MPI Isend和Irecv问题

接收过程需要接收才能进一步进行计算，但是当我没有MPI_Wait时，neine会获取数据，而当我这样做时，它会永远挂起。我究竟做错了什么？

注意：我只将Cin设置为3以查看消息何时未通过。目前它只是挂起。

void ComputeS5C() 
{ 
    MPI_Request send_request, recv_request; 
    MPI_Status status; 
    int Cin[1] = {3}; 
    if(my_rank == 0){Cin[0] = 0;} 
    else { 
     MPI_Irecv(Cin, 1, MPI_INT, my_rank - 1, 0, MPI_COMM_WORLD, &recv_request); 
     MPI_Wait(&recv_request, &status); 
     fprintf(stderr, "RANK:%d Message Received from rank%d: Cin=%d\n", my_rank, my_rank-1, Cin[0]); 
    } 

    int k; 
    for(k = 0; k < Size_5; k++) 
    { 
     int s5clast; 
     if(k==0) 
     { 
      s5clast = Cin[0]; 
     } 
     else 
     { 
      s5clast = s5c[k-1]; 
     } 

     s5c[k] = s5g[k] | (s5p[k]&s5clast); 
    } 

    //if not highest rank, pass the carryin upstream 
    if(my_rank < world_size - 1){ 
     MPI_Isend(&s5c[k], 1, MPI_INT, my_rank+1, 1, MPI_COMM_WORLD, &send_request); 
     fprintf(stderr, "RANK:%d Message sent to rank%d: Cin=%d\n", my_rank, my_rank+1, s5c[k]); 
    } 
    MPI_Wait(&send_request, &status); 
}

来源

2017-02-24 Wenzel745

代码中的错误与tags的错配有关。消息使用tag = 1发送，并使用tag = 0接收。发送和接收不匹配解释为什么所有进程都卡住等待发送的消息被占用。更改标签以使它们匹配。

注意，使用MPI_Irecv时，您总是需要一个MPI_Wait以确保知道何时可以安全地使用接收的数据。我认为在你的例子中使用MPI_Recv更为合适。

来源

2017-02-24 04:27:13 simpel01

好抓！在这里，我认为标签并不重要。 – Wenzel745

标签是非常重要的我的朋友...特别是当你需要15点在stackoverflow :) – simpel01

MPI Isend和Irecv问题

回答

相关问题