17.2.425. MPI_Waitany
MPI_Waitany — 等待任意指定的发送或接收操作完成。
17.2.425.1. 语法
17.2.425.1.1. C语法
#include <mpi.h>
int MPI_Waitany(int count, MPI_Request array_of_requests[],
int *index, MPI_Status *status)
17.2.425.1.2. Fortran语法
USE MPI
! or the older form: INCLUDE 'mpif.h'
MPI_WAITANY(COUNT, ARRAY_OF_REQUESTS, INDEX, STATUS, IERROR)
INTEGER COUNT, ARRAY_OF_REQUESTS(*), INDEX
INTEGER STATUS(MPI_STATUS_SIZE), IERROR
17.2.425.1.3. Fortran 2008 语法
USE mpi_f08
MPI_Waitany(count, array_of_requests, index, status, ierror)
INTEGER, INTENT(IN) :: count
TYPE(MPI_Request), INTENT(INOUT) :: array_of_requests(count)
INTEGER, INTENT(OUT) :: index
TYPE(MPI_Status) :: status
INTEGER, OPTIONAL, INTENT(OUT) :: ierror
17.2.425.2. 输入参数
count: 列表长度(整数)。array_of_requests: 请求数组(句柄数组)。
17.2.425.3. 输出参数
index: 已完成操作对应的句柄索引(整数)。取值范围为0到count-1。在Fortran中,范围为1到count。status: 状态对象(status)。ierror: 仅限Fortran:错误状态(整数)。
17.2.425.4. 描述
调用 MPI_Waitany 可用于等待多个请求中任意一个的完成。
array_of_requests列表可能包含空句柄或非活动句柄。如果该列表不包含任何活动句柄(列表长度为零或所有条目均为空或非活动),则调用会立即返回,index值为MPI_UNDEFINED,并附带一个空状态。
执行MPI_Waitany(count, array_of_requests, index, status)的效果与执行MPI_Wait(&array_of_requests[i], status)相同,其中i是由index返回的值(除非index的值为MPI_UNDEFINED)。MPI_Waitany作用于仅包含一个活动条目的数组时,等同于MPI_Wait。
如果您的应用程序不需要检查status字段,可以通过使用预定义常量MPI_STATUS_IGNORE作为status参数的特殊值来节省资源。
示例: 客户端-服务器代码(可能出现饥饿问题)。
CALL MPI_COMM_SIZE(comm, size, ierr)
CALL MPI_COMM_RANK(comm, rank, ierr)
IF(rank > 0) THEN ! client code
DO
CALL MPI_ISEND(a, n, MPI_REAL, 0, tag, comm, request, ierr)
CALL MPI_WAIT(request, status, ierr)
END DO
ELSE ! rank=0: server code
DO i=1, size-1
CALL MPI_IRECV(a(1,i), n, MPI_REAL, i tag, &
comm, request_list(i), ierr)
END DO
DO
CALL MPI_WAITANY(size-1, request_list, index, status, ierr)
CALL DO_SERVICE(a(1,index)) ! handle one message
CALL MPI_IRECV(a(1, index), n, MPI_REAL, index, tag, &
comm, request_list(index), ierr)
END DO
END IF
17.2.425.5. 错误
几乎所有MPI例程都会返回一个错误值;C语言例程通过函数返回值返回,Fortran例程则通过最后一个参数返回。
在返回错误值之前,会调用与通信对象(如通信器、窗口、文件)关联的当前MPI错误处理程序。如果MPI调用未关联任何通信对象,则该调用被视为附加到MPI_COMM_SELF,并将调用关联的MPI错误处理程序。当MPI_COMM_SELF未初始化时(即在MPI_Init/MPI_Init_thread之前、MPI_Finalize之后,或仅使用会话模型时),错误会触发初始错误处理程序。初始错误处理程序可通过在使用世界模型时调用MPI_Comm_set_errhandler来修改MPI_COMM_SELF,或通过mpiexec的mpi_initial_errhandler命令行参数,或MPI_Comm_spawn/MPI_Comm_spawn_multiple的info键来设置。如果未设置其他适当的错误处理程序,则MPI I/O函数将调用MPI_ERRORS_RETURN错误处理程序,而其他所有MPI函数将调用MPI_ERRORS_ABORT错误处理程序。
Open MPI 包含三个可使用的预定义错误处理器:
MPI_ERRORS_ARE_FATAL导致程序中止所有连接的MPI进程。MPI_ERRORS_ABORT一个可在通信器、窗口、文件或会话上调用的错误处理程序。当在通信器上调用时,其行为类似于在该通信器上调用MPI_Abort。如果在窗口或文件上调用,则行为类似于在包含对应窗口或文件中进程组的通信器上调用MPI_Abort。如果在会话上调用,则仅中止本地进程。MPI_ERRORS_RETURN向应用程序返回一个错误代码。
MPI应用程序也可以通过调用以下方式实现自己的错误处理程序:
请注意,MPI不保证MPI程序在出现错误后能够继续运行。
有关更多信息,请参阅MPI-3.1标准中的错误处理部分。
请注意,根据MPI标准中"点对点通信"章节的"返回状态"部分,传递给MPI_Waitany的请求上的MPI错误不会在返回的状态中设置status.MPI_ERROR字段。错误代码总是传递给后端错误处理程序,如果后端错误处理程序返回该错误,则可能通过MPI_Waitany的返回值传回给调用者。预定义的MPI错误处理程序MPI_ERRORS_RETURN就展示了这种行为。