私は最近MPIで働いています。私はまだMPIに非常に慣れていません。しかし最近、MPICH2 を使用しているときに問題が見つかりました。これは、Hello world プログラムを変更した私の小さな Fortran 90 プログラムです。私はそれのcバージョンをテストしていませんが、それらは非常に似ているはずです(関数名とエラーパラメータが異なります)。
私は Windows 7 64 ビット、MinGW (gcc バージョン 4.6.2、および 32 ビット コンパイラ) で作業しており、MPICH2 1.4.1-p1 32 ビット バージョンを使用しています。簡単なコードをコンパイルするために使用したコマンドは次のとおりです。
gfortran hello1.f90 -g -o hello.exe -IC:\MPICH2_x86\include -LC:\MPICH2_x86\lib -lfmpich2g
そして、ここに簡単なコードがあります:
program main
include 'mpif.h'
character * (MPI_MAX_PROCESSOR_NAME) processor_name
integer myid, numprocs, namelen, rc,ierr
integer, allocatable :: mat1(:, :, :)
call MPI_INIT( ierr )
call MPI_COMM_RANK( MPI_COMM_WORLD, myid, ierr )
call MPI_COMM_SIZE( MPI_COMM_WORLD, numprocs, ierr )
call MPI_GET_PROCESSOR_NAME(processor_name, namelen, ierr)
allocate(mat1(-36:36, -36:36, -36:36))
mat1(:,:,:) = 0
call MPI_Bcast( mat1(-36, -36, -36), 389017, MPI_INT, 0, MPI_COMM_WORLD, ierr )
call MPI_Allreduce(MPI_IN_PLACE, mat1(-36, -36, -36), 389017, MPI_INTEGER, MPI_BOR, MPI_COMM_WORLD, ierr)
print *,"MPI_Allreduce done!!!"
print *,"Hello World! Process ", myid, " of ", numprocs, " on ", processor_name
call MPI_FINALIZE(rc)
end
コンパイルできますが、実行時に失敗しました (無効なメモリ アクセスでしょうか?)。その行を削除すると正常に動作するため、MPI_Allreduce に問題があるはずです。また、マトリックスを小さくしても機能します。同じバージョンのMPIを備えたubuntuマシンでも試しました。Linux では問題ありません。
gdb(MinGWに付属)を使用してチェックする場合(gdb hello.exe、次にバックトレース)。私は意味のないものを手に入れました(または自分のためのようです):
Program received signal SIGSEGV, Segmentation fault.
[Switching to Thread 16316.0x4fd0]
0x01c03100 in mpich2nemesis!PMPI_Wtime ()
from C:\Windows\system32\mpich2nemesis.dll
(gdb) backtrace
#0 0x01c03100 in mpich2nemesis!PMPI_Wtime ()
from C:\Windows\system32\mpich2nemesis.dll
#1 0x0017be00 in ?? ()
#2 0x00000000 in ?? ()
これは、Windows 版の MPI ライブラリに何か問題があるということですか? それを機能させるための解決策は何ですか?
ありがとう。