compiler-errors - 访问冲突写入位置…可能是由mpi_get_processor_name函数引起的

Question

当我尝试在Visual Studio 2010环境(IVF 2013，Windows 7 64位)上建立我的第一个intel Visual fortran + ms-mpi程序时，遇到了以下错误消息。

错误消息是:

HELLO.exe中Ox001f3902的未处理异常:OxC0000005:访问冲突写入位置0x0000001e。

由我的编译器指出，问题似乎与第7行中的函数mpi_get_processor_name有关。这是否是由于我对字符串变量 name 的错误声明引起的？

此外，我可以在同一台计算机上成功编译C++ MPI示例代码。我真的很奇怪，无法在类似的环境设置下运行Fortran示例代码。感谢帮助。

代码看起来像

1  PROGRAM hello
2   INCLUDE 'mpif.h'
3   INTEGER rank, size, ierror, len
4   CHARACTER(30) name
5   INTEGER id, nthreads
6   CALL mpi_init(ierror)                            ! start MPI
7   CALL mpi_comm_size(mpi_comm_world, size, ierror) ! get number of ranks
8   CALL mpi_comm_rank(mpi_comm_world, rank, ierror) ! get rank
9   CALL mpi_get_processor_name(name,len,ierror)     ! get run-host name
10  nthreads = omp_get_num_threads()                 ! get number of threads
11  id = omp_get_thread_num()                        ! get thread
12  CALL mpi_finalize(ierror)                        ! terminate MPI
13 END PROGRAM hello                                 ! Fortran 90

Answer 1

MPI_GET_PROCESSOR_NAME要求name是一个数组，至少是 MPI_MAX_PROCESSOR_NAME字符，至少在Open MPI中等于256。写入的名称在右侧用空字符填充，直到MPI_MAX_PROCESSOR_NAME位置，并且len设置为实际名称长度。在您的情况下，name最有可能是一个堆栈变量，并且填充字符会覆盖堆栈帧，从而导致访问冲突。

更换:

CHARACTER(30) name

与

CHARACTER(MPI_MAX_PROCESSOR_NAME) name