17.2.13. MPI_Alloc_mem

MPI_Alloc_mem — 分配指定的内存段。

17.2.13.1. 语法

17.2.13.1.1. C语言语法

#include <mpi.h>

int MPI_Alloc_mem(MPI_Aint size, MPI_Info info, void *baseptr)

17.2.13.1.2. Fortran 语法

USE MPI
! or the older form: INCLUDE 'mpif.h'
MPI_ALLOC_MEM(SIZE, INFO, BASEPTR, IERROR)
     INTEGER INFO, IERROR
     INTEGER(KIND=MPI_ADDRESS_KIND) SIZE, BASEPTR

17.2.13.1.3. Fortran 2008 语法

USE mpi_f08
MPI_Alloc_mem(size, info, baseptr, ierror)
     USE, INTRINSIC :: ISO_C_BINDING, ONLY
     INTEGER(KIND=MPI_ADDRESS_KIND), INTENT(IN) :: size
     TYPE(MPI_Info), INTENT(IN) :: info
     TYPE(C_PTR), INTENT(OUT) :: baseptr
     INTEGER, OPTIONAL, INTENT(OUT) :: ierror

17.2.13.2. 输入参数

  • size: 内存段的大小，以字节为单位（非负整数）。

  • info: 信息参数（句柄）。

17.2.13.3. 输出参数

  • baseptr: 指向已分配内存段起始位置的指针。

  • ierror: 仅限Fortran：错误状态（整数）。

17.2.13.4. 描述

MPI_Alloc_mem 分配 size 字节的内存。该内存的起始地址将通过变量 baseptr 返回。

17.2.13.5. C语言注意事项

参数 baseptr 的类型为 void *，以便允许传递任何指针对象作为此参数。提供的参数应是一个指向任意类型指针的指针（例如 void **）。

17.2.13.6. Fortran 注意事项

MPI_Alloc_mem调用需要使用iso_c_binding模块，因为使用了TYPE(C_PTR)。

use iso_c_binding

type(c_ptr) :: alloc_ptr
integer :: size, ierr
double precision, pointer :: array(:,:)

! A 2D array of 100 elements
size = 10 * 10
call MPI_Alloc_Mem(size * 8, MPI_INFO_NULL, alloc_ptr, ierr)

! Point to the array
call c_f_pointer(alloc_ptr, array, [10, 10])

! ... use the array ...

! Free the memory, no need for the alloc_ptr
call MPI_Free_mem(array, ierr)

17.2.13.7. 错误

几乎所有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手册页获取完整的MPI错误代码列表。

有关更多信息，请参阅MPI-3.1标准中的错误处理部分。

另请参阅